From 43998c534418ccbe387d25e0421cbed710822666 Mon Sep 17 00:00:00 2001 From: Chia-Jung Hsu Date: Wed, 6 Mar 2024 16:42:11 +0100 Subject: [PATCH] Update from naunet --- CMakeLists.txt | 24 +- demo.ipynb | 85 + include/naunet.h | 67 +- include/naunet_constants.h | 382 +- include/naunet_data.h | 33 +- include/naunet_macros.h | 1378 +- include/naunet_ode.h | 9 + include/naunet_physics.h | 20 +- include/naunet_renorm.h | 10 + include/naunet_timer.h | 4 +- include/naunet_utilities.h | 20 + naunet_config.toml | 70 +- src/CMakeLists.txt | 27 +- src/naunet.cpp | 469 +- src/naunet_constants.cu | 406 +- src/naunet_fex.cu | 59341 +++++++------- src/naunet_jac.cu | 81481 +++++++++----------- src/naunet_physics.cu | 1544 +- src/naunet_rates.cu | 35466 ++++----- src/naunet_renorm.cu | 4567 ++ src/naunet_utilities.cpp | 152 + {test => tests}/CMakeLists.txt | 44 +- {test => tests}/multiplegrid.cpp | 88 +- {test => tests}/singlegrid.cpp | 119 +- test/test.py.in => tests/singlegrid.py.in | 38 +- 25 files changed, 92330 insertions(+), 93514 deletions(-) create mode 100644 demo.ipynb create mode 100644 include/naunet_renorm.h create mode 100644 include/naunet_utilities.h create mode 100644 src/naunet_renorm.cu create mode 100644 src/naunet_utilities.cpp rename {test => tests}/CMakeLists.txt (68%) rename {test => tests}/multiplegrid.cpp (80%) rename {test => tests}/singlegrid.cpp (58%) rename test/test.py.in => tests/singlegrid.py.in (71%) diff --git a/CMakeLists.txt b/CMakeLists.txt index 5d27f17..b091ad6 100644 --- a/CMakeLists.txt +++ b/CMakeLists.txt @@ -1,15 +1,15 @@ # To use CUDA by enabling language cmake_minimum_required(VERSION 3.18) -project(NAUNET VERSION 0.2.0 LANGUAGES CUDA CXX) +project(NAUNET VERSION 0.4.2 LANGUAGES CUDA CXX) include(CMakePrintHelpers) -set(CMAKE_CXX_STANDARD 11) +set(CMAKE_CXX_STANDARD 14) set(CMAKE_CXX_STANDARD_REQUIRED ON) set(CMAKE_CXX_EXTENSIONS OFF) if(NOT CMAKE_BUILD_TYPE) - set(CMAKE_BUILD_TYPE Debug) + set(CMAKE_BUILD_TYPE Release) endif() if(CMAKE_BUILD_TYPE STREQUAL Debug) @@ -22,10 +22,13 @@ message(STATUS "CMAKE_CXX_COMPILER_VERSION = ${CMAKE_CXX_COMPILER_VERSION}") message(STATUS "CMAKE_COMPILER_IS_GNUCXX = ${CMAKE_COMPILER_IS_GNUCXX}" ) message(STATUS "CMAKE_BUILD_TYPE = ${CMAKE_BUILD_TYPE}" ) -set(SUNDIALS_MIN_VERSION "5.6.1") +set(SUNDIALS_MIN_VERSION "6.0.0") set(SUNDIALS_DIR "" CACHE PATH "Path to SUNDIALSConfig.cmake") find_package(SUNDIALS ${SUNDIALS_MIN_VERSION} REQUIRED CONFIG) +message(STATUS "SUNDIALS_FOUND = ${SUNDIALS_FOUND}") + + list(APPEND SUNDIALSLIB SUNDIALS::cvode SUNDIALS::nveccuda @@ -79,14 +82,17 @@ message(STATUS "NVIDIA_GPU_COUNT = " ${NVIDIA_GPU_COUNT}) set(MAKE_STATIC ON CACHE BOOL "") set(MAKE_SHARED ON CACHE BOOL "") set(MAKE_PYTHON OFF CACHE BOOL "") +set(MAKE_TEST ON CACHE BOOL "") set(CMAKE_POSITION_INDEPENDENT_CODE ON) if(MAKE_PYTHON) - set(PYMODNAME "chemistry" CACHE STRING "") - find_package(PythonInterp REQUIRED) + set(PYMODNAME "pynaunet" CACHE STRING "") + find_package(Python REQUIRED COMPONENTS Interpreter Development) endif() -enable_testing() - add_subdirectory(src) -add_subdirectory(test) + +if(MAKE_TEST) + enable_testing() + add_subdirectory(tests) +endif() diff --git a/demo.ipynb b/demo.ipynb new file mode 100644 index 0000000..c5a306d --- /dev/null +++ b/demo.ipynb @@ -0,0 +1,85 @@ +{ + "cells": [ + { + "cell_type": "code", + "execution_count": null, + "metadata": {}, + "outputs": [], + "source": [ + "import numpy as np\n", + "import matplotlib.pyplot as plt\n", + "import tomlkit\n", + "\n", + "from pathlib import Path\n", + "\n", + "plt.rcParams['figure.figsize'] = [8, 6]\n", + "plt.rcParams['figure.dpi'] = 100 # 200 e.g. is really fine, but slower" + ] + }, + { + "cell_type": "code", + "execution_count": null, + "metadata": {}, + "outputs": [], + "source": [ + "with open(\"naunet_config.toml\") as config:\n", + " content = tomlkit.loads(config.read())\n", + "\n", + "summary = content[\"summary\"]\n", + "species = summary[\"list_of_species\"]\n", + "nspec = summary[\"num_of_species\"]\n", + "\n", + "bindata = np.fromfile(f\"build/tests/evolution_singlegrid.bin\", dtype=\"float64\").reshape(-1, nspec+1)\n", + "time = bindata[:, 0]\n", + "\n", + "spec = \"H2\"\n", + "sidx = species.index(spec) + 1\n", + "\n", + "fig, ax = plt.subplots(facecolor=\"w\")\n", + "\n", + "ax.plot(time, bindata[:,sidx]);\n", + "\n", + "ax.set_xscale('log');\n", + "ax.set_yscale('log');\n", + "ax.set_xlabel('Time (yr)');\n", + "ax.set_ylabel(f'[{spec}]');" + ] + }, + { + "cell_type": "code", + "execution_count": null, + "metadata": {}, + "outputs": [], + "source": [ + "elapsed = np.loadtxt(\"build/tests/time_singlegrid.txt\")\n", + "\n", + "fig, ax = plt.subplots(facecolor=\"w\")\n", + "\n", + "ax.plot(np.arange(elapsed.size), elapsed);\n", + "\n", + "ax.set_yscale(\"log\");\n", + "ax.set_xlabel(\"Step\");\n", + "ax.set_ylabel(\"Elapsed Time (s)\");" + ] + } + ], + "metadata": { + "kernelspec": { + "display_name": "Python 3.8.6 ('.venv': poetry)", + "language": "python", + "name": "python3" + }, + "language_info": { + "name": "python", + "version": "3.8.6" + }, + "orig_nbformat": 4, + "vscode": { + "interpreter": { + "hash": "314ff8c970d95e799925aa8f25686df887ef025d7910d0eca0a071c657e55e81" + } + } + }, + "nbformat": 4, + "nbformat_minor": 2 +} diff --git a/include/naunet.h b/include/naunet.h index b1d0cad..0620770 100644 --- a/include/naunet.h +++ b/include/naunet.h @@ -23,14 +23,31 @@ class Naunet { public: Naunet(); ~Naunet(); - int Init(int nsystem = MAX_NSYSTEMS, double atol = 1e-20, double rtol = 1e-5, int mxsteps=500); - int DebugInfo(); int Finalize(); - /* */ - int Reset(int nsystem = MAX_NSYSTEMS, double atol = 1e-20, double rtol = 1e-5, int mxsteps=500); - /* */ + int Init(int nsystem = MAX_NSYSTEMS, double atol = 1e-20, + double rtol = 1e-5, int mxsteps = 500); + int PrintDebugInfo(); +#ifdef IDX_ELEM_H + // Renormalize the species abundances accroding to `ab_ref_`(private). + // This conserves the element fractions but does not change the overall + // density/ + int Renorm(realtype *ab); +#endif + int Reset(int nsystem = MAX_NSYSTEMS, double atol = 1e-20, + double rtol = 1e-5, int mxsteps = 500); +#ifdef IDX_ELEM_H + // Set the reference abundance `ab_ref_`. `opt == 0` assumes that the input + // is element abundances. `opt == 1` assumes the input is species + // abundances. + int SetReferenceAbund(realtype *ref, int opt = 0); +#endif int Solve(realtype *ab, realtype dt, NaunetData *data); #ifdef PYMODULE +#ifdef IDX_ELEM_H + py::array_t PyWrapRenorm(py::array_t arr); + py::array_t PyWrapSetReferenceAbund(py::array_t arr, + int opt); +#endif py::array_t PyWrapSolve(py::array_t arr, realtype dt, NaunetData *data); #endif @@ -40,6 +57,8 @@ class Naunet { int mxsteps_; realtype atol_; realtype rtol_; + FILE *errfp_; + realtype ab_ref_[NELEMENTS]; /* */ @@ -49,6 +68,7 @@ class Naunet { SUNMatrix cv_a_[NSTREAMS]; void *cv_mem_[NSTREAMS]; SUNLinearSolver cv_ls_[NSTREAMS]; + SUNContext cv_sunctx_[NSTREAMS]; cusparseHandle_t cusp_handle_[NSTREAMS]; cusolverSpHandle_t cusol_handle_[NSTREAMS]; @@ -61,6 +81,13 @@ class Naunet { NaunetData *h_data; /* */ + + int GetCVStates(void *cv_mem, long int &nst, long int &nfe, + long int &nsetups, long int &nje, long int &netf, + long int &nge, long int &nni, long int &ncfn); + int HandleError(int flag, realtype *ab, realtype dt, realtype t0); + static int CheckFlag(void *flagvalue, const char *funcname, int opt, + FILE *errf); }; #ifdef PYMODULE @@ -72,32 +99,42 @@ PYBIND11_MODULE(PYMODNAME, m) { py::arg("atol") = 1e-20, py::arg("rtol") = 1e-5, py::arg("mxsteps") = 500) .def("Finalize", &Naunet::Finalize) -#ifdef USE_CUDA +#ifdef IDX_ELEM_H + .def("Renorm", &Naunet::PyWrapRenorm) +#endif .def("Reset", &Naunet::Reset, py::arg("nsystem") = 1, py::arg("atol") = 1e-20, py::arg("rtol") = 1e-5, py::arg("mxsteps") = 500) +#ifdef IDX_ELEM_H + .def("SetReferenceAbund", &Naunet::PyWrapSetReferenceAbund, + py::arg("ref"), py::arg("opt") = 0) #endif .def("Solve", &Naunet::PyWrapSolve); // clang-format off py::class_(m, "NaunetData") .def(py::init()) + .def_readwrite("nH", &NaunetData::nH) + .def_readwrite("Tgas", &NaunetData::Tgas) + .def_readwrite("Tdust", &NaunetData::Tdust) + .def_readwrite("zeta_cr", &NaunetData::zeta_cr) + .def_readwrite("Av", &NaunetData::Av) + .def_readwrite("omega", &NaunetData::omega) + .def_readwrite("zeta_xr", &NaunetData::zeta_xr) + .def_readwrite("G0", &NaunetData::G0) .def_readwrite("rG", &NaunetData::rG) - .def_readwrite("barr", &NaunetData::barr) .def_readwrite("sites", &NaunetData::sites) + .def_readwrite("barr", &NaunetData::barr) .def_readwrite("hop", &NaunetData::hop) .def_readwrite("nMono", &NaunetData::nMono) + .def_readwrite("opt_frz", &NaunetData::opt_frz) + .def_readwrite("opt_thd", &NaunetData::opt_thd) + .def_readwrite("opt_crd", &NaunetData::opt_crd) .def_readwrite("duty", &NaunetData::duty) .def_readwrite("Tcr", &NaunetData::Tcr) + .def_readwrite("opt_uvd", &NaunetData::opt_uvd) + .def_readwrite("opt_rcd", &NaunetData::opt_rcd) .def_readwrite("branch", &NaunetData::branch) - .def_readwrite("nH", &NaunetData::nH) - .def_readwrite("zeta_cr", &NaunetData::zeta_cr) - .def_readwrite("zeta_xr", &NaunetData::zeta_xr) - .def_readwrite("Tgas", &NaunetData::Tgas) - .def_readwrite("Tdust", &NaunetData::Tdust) - .def_readwrite("Av", &NaunetData::Av) - .def_readwrite("G0", &NaunetData::G0) - .def_readwrite("omega", &NaunetData::omega) ; // clang-format on } diff --git a/include/naunet_constants.h b/include/naunet_constants.h index 966b9cb..73b56de 100644 --- a/include/naunet_constants.h +++ b/include/naunet_constants.h @@ -1,7 +1,8 @@ #ifndef __NAUNET_CONSTANTS_H__ #define __NAUNET_CONSTANTS_H__ -// clang-format off +// +// clang-format off extern __constant__ double pi; // atomic mass unit (g) @@ -28,193 +29,196 @@ extern __constant__ double echarge; // Boltzmann constant (erg/K) extern __constant__ double kerg; -extern __constant__ double gism ; -extern __constant__ double habing ; -extern __constant__ double zism ; -extern __constant__ double crphot ; -extern __constant__ double hbar ; -extern __constant__ double eb_GCI ; -extern __constant__ double eb_GC10I ; -extern __constant__ double eb_GC10HI ; -extern __constant__ double eb_GC10H2I ; -extern __constant__ double eb_GC11I ; -extern __constant__ double eb_GC2I ; -extern __constant__ double eb_GC2HI ; -extern __constant__ double eb_GC2H2I ; -extern __constant__ double eb_GC2H3I ; -extern __constant__ double eb_GC2H4I ; -extern __constant__ double eb_GC2H4CNI ; -extern __constant__ double eb_GC2H5I ; -extern __constant__ double eb_GC2H5CNI ; -extern __constant__ double eb_GC2H5OHI ; -extern __constant__ double eb_GC2H6I ; -extern __constant__ double eb_GC2NI ; -extern __constant__ double eb_GC2OI ; -extern __constant__ double eb_GC2SI ; -extern __constant__ double eb_GC3I ; -extern __constant__ double eb_GC3HI ; -extern __constant__ double eb_GC3H2I ; -extern __constant__ double eb_GC3NI ; -extern __constant__ double eb_GC3OI ; -extern __constant__ double eb_GC3PI ; -extern __constant__ double eb_GC3SI ; -extern __constant__ double eb_GC4I ; -extern __constant__ double eb_GC4HI ; -extern __constant__ double eb_GC4H2I ; -extern __constant__ double eb_GC4H3I ; -extern __constant__ double eb_GC4H6I ; -extern __constant__ double eb_GC4NI ; -extern __constant__ double eb_GC4PI ; -extern __constant__ double eb_GC4SI ; -extern __constant__ double eb_GC5I ; -extern __constant__ double eb_GC5HI ; -extern __constant__ double eb_GC5H2I ; -extern __constant__ double eb_GC5NI ; -extern __constant__ double eb_GC6I ; -extern __constant__ double eb_GC6HI ; -extern __constant__ double eb_GC6H2I ; -extern __constant__ double eb_GC6H6I ; -extern __constant__ double eb_GC7I ; -extern __constant__ double eb_GC7HI ; -extern __constant__ double eb_GC7H2I ; -extern __constant__ double eb_GC7NI ; -extern __constant__ double eb_GC8I ; -extern __constant__ double eb_GC8HI ; -extern __constant__ double eb_GC8H2I ; -extern __constant__ double eb_GC9I ; -extern __constant__ double eb_GC9HI ; -extern __constant__ double eb_GC9H2I ; -extern __constant__ double eb_GC9NI ; -extern __constant__ double eb_GCCPI ; -extern __constant__ double eb_GCClI ; -extern __constant__ double eb_GCHI ; -extern __constant__ double eb_GCH2I ; -extern __constant__ double eb_GCH2CCHI ; -extern __constant__ double eb_GCH2CCH2I ; -extern __constant__ double eb_GCH2CHCCHI ; -extern __constant__ double eb_GCH2CHCNI ; -extern __constant__ double eb_GCH2CNI ; -extern __constant__ double eb_GCH2COI ; -extern __constant__ double eb_GCH2NHI ; -extern __constant__ double eb_GCH2OHI ; -extern __constant__ double eb_GCH2OHCHOI ; -extern __constant__ double eb_GCH2OHCOI ; -extern __constant__ double eb_GCH2PHI ; -extern __constant__ double eb_GCH3I ; -extern __constant__ double eb_GCH3C3NI ; -extern __constant__ double eb_GCH3C4HI ; -extern __constant__ double eb_GCH3C5NI ; -extern __constant__ double eb_GCH3C6HI ; -extern __constant__ double eb_GCH3C7NI ; -extern __constant__ double eb_GCH3CCHI ; -extern __constant__ double eb_GCH3CHCH2I ; -extern __constant__ double eb_GCH3CHOI ; -extern __constant__ double eb_GCH3CNI ; -extern __constant__ double eb_GCH3COI ; -extern __constant__ double eb_GCH3COCH3I ; -extern __constant__ double eb_GCH3COOHI ; -extern __constant__ double eb_GCH3OI ; -extern __constant__ double eb_GCH3OCH3I ; -extern __constant__ double eb_GCH3OHI ; -extern __constant__ double eb_GCH4I ; -extern __constant__ double eb_GCNI ; -extern __constant__ double eb_GCNOI ; -extern __constant__ double eb_GCOI ; -extern __constant__ double eb_GCO2I ; -extern __constant__ double eb_GCOOCH3I ; -extern __constant__ double eb_GCOOHI ; -extern __constant__ double eb_GCPI ; -extern __constant__ double eb_GCSI ; -extern __constant__ double eb_GClI ; -extern __constant__ double eb_GClOI ; -extern __constant__ double eb_GFI ; -extern __constant__ double eb_GFeI ; -extern __constant__ double eb_GHI ; -extern __constant__ double eb_GH2I ; -extern __constant__ double eb_GH2CCCI ; -extern __constant__ double eb_GH2CNI ; -extern __constant__ double eb_GH2COI ; -extern __constant__ double eb_GH2CSI ; -extern __constant__ double eb_GH2OI ; -extern __constant__ double eb_GH2O2I ; -extern __constant__ double eb_GH2SI ; -extern __constant__ double eb_GH2S2I ; -extern __constant__ double eb_GH2SiOI ; -extern __constant__ double eb_GHC2OI ; -extern __constant__ double eb_GHC2PI ; -extern __constant__ double eb_GHC3NI ; -extern __constant__ double eb_GHC5NI ; -extern __constant__ double eb_GHC7NI ; -extern __constant__ double eb_GHC9NI ; -extern __constant__ double eb_GHCCNI ; -extern __constant__ double eb_GHCNI ; -extern __constant__ double eb_GHCNOI ; -extern __constant__ double eb_GHCOI ; -extern __constant__ double eb_GHCOOCH3I ; -extern __constant__ double eb_GHCOOHI ; -extern __constant__ double eb_GHCPI ; -extern __constant__ double eb_GHCSI ; -extern __constant__ double eb_GHCSiI ; -extern __constant__ double eb_GHClI ; -extern __constant__ double eb_GHFI ; -extern __constant__ double eb_GHNCI ; -extern __constant__ double eb_GHNC3I ; -extern __constant__ double eb_GHNCOI ; -extern __constant__ double eb_GHNOI ; -extern __constant__ double eb_GHNSiI ; -extern __constant__ double eb_GHOCNI ; -extern __constant__ double eb_GHONCI ; -extern __constant__ double eb_GHPOI ; -extern __constant__ double eb_GHSI ; -extern __constant__ double eb_GHS2I ; -extern __constant__ double eb_GHeI ; -extern __constant__ double eb_GMgI ; -extern __constant__ double eb_GNI ; -extern __constant__ double eb_GN2I ; -extern __constant__ double eb_GN2OI ; -extern __constant__ double eb_GNCCNI ; -extern __constant__ double eb_GNHI ; -extern __constant__ double eb_GNH2I ; -extern __constant__ double eb_GNH2CNI ; -extern __constant__ double eb_GNH3I ; -extern __constant__ double eb_GNOI ; -extern __constant__ double eb_GNO2I ; -extern __constant__ double eb_GNSI ; -extern __constant__ double eb_GNaI ; -extern __constant__ double eb_GOI ; -extern __constant__ double eb_GO2I ; -extern __constant__ double eb_GO2HI ; -extern __constant__ double eb_GOCNI ; -extern __constant__ double eb_GOCSI ; -extern __constant__ double eb_GOHI ; -extern __constant__ double eb_GPI ; -extern __constant__ double eb_GPHI ; -extern __constant__ double eb_GPH2I ; -extern __constant__ double eb_GPNI ; -extern __constant__ double eb_GPOI ; -extern __constant__ double eb_GSI ; -extern __constant__ double eb_GS2I ; -extern __constant__ double eb_GSOI ; -extern __constant__ double eb_GSO2I ; -extern __constant__ double eb_GSiI ; -extern __constant__ double eb_GSiCI ; -extern __constant__ double eb_GSiC2I ; -extern __constant__ double eb_GSiC2HI ; -extern __constant__ double eb_GSiC2H2I ; -extern __constant__ double eb_GSiC3I ; -extern __constant__ double eb_GSiC3HI ; -extern __constant__ double eb_GSiC4I ; -extern __constant__ double eb_GSiCH2I ; -extern __constant__ double eb_GSiCH3I ; -extern __constant__ double eb_GSiHI ; -extern __constant__ double eb_GSiH2I ; -extern __constant__ double eb_GSiH3I ; -extern __constant__ double eb_GSiH4I ; -extern __constant__ double eb_GSiNI ; -extern __constant__ double eb_GSiNCI ; -extern __constant__ double eb_GSiOI ; -extern __constant__ double eb_GSiO2I ; -extern __constant__ double eb_GSiSI ; +// reduced Planck constant +extern __constant__ double hbar; + +extern __constant__ double gism; +extern __constant__ double zism; +extern __constant__ double habing; +extern __constant__ double crphot; + +extern __constant__ double eb_GFeI; +extern __constant__ double eb_GHeI; +extern __constant__ double eb_GMgI; +extern __constant__ double eb_GNaI; +extern __constant__ double eb_GH2S2I; +extern __constant__ double eb_GC4H6I; +extern __constant__ double eb_GC4SI; +extern __constant__ double eb_GCClI; +extern __constant__ double eb_GCH3C3NI; +extern __constant__ double eb_GCH3C4HI; +extern __constant__ double eb_GCH3C5NI; +extern __constant__ double eb_GCH3C6HI; +extern __constant__ double eb_GCH3C7NI; +extern __constant__ double eb_GClOI; +extern __constant__ double eb_GHC2PI; +extern __constant__ double eb_GHClI; +extern __constant__ double eb_GHFI; +extern __constant__ double eb_GHNSiI; +extern __constant__ double eb_GHPOI; +extern __constant__ double eb_GNH2CNI; +extern __constant__ double eb_GNO2I; +extern __constant__ double eb_GPNI; +extern __constant__ double eb_GSiC3HI; +extern __constant__ double eb_GSiCH3I; +extern __constant__ double eb_GSiO2I; +extern __constant__ double eb_GSiSI; +extern __constant__ double eb_GFI; +extern __constant__ double eb_GH2SiOI; +extern __constant__ double eb_GNCCNI; +extern __constant__ double eb_GS2I; +extern __constant__ double eb_GSiC2HI; +extern __constant__ double eb_GC3SI; +extern __constant__ double eb_GC4NI; +extern __constant__ double eb_GC4PI; +extern __constant__ double eb_GCH2PHI; +extern __constant__ double eb_GCH3CHCH2I; +extern __constant__ double eb_GCH3COOHI; +extern __constant__ double eb_GH2SI; +extern __constant__ double eb_GHCNOI; +extern __constant__ double eb_GHCPI; +extern __constant__ double eb_GHNC3I; +extern __constant__ double eb_GHNCOI; +extern __constant__ double eb_GHOCNI; +extern __constant__ double eb_GHONCI; +extern __constant__ double eb_GHS2I; +extern __constant__ double eb_GN2OI; +extern __constant__ double eb_GPH2I; +extern __constant__ double eb_GPOI; +extern __constant__ double eb_GSiC2H2I; +extern __constant__ double eb_GSiC4I; +extern __constant__ double eb_GSiNCI; +extern __constant__ double eb_GC3PI; +extern __constant__ double eb_GC6H6I; +extern __constant__ double eb_GH2O2I; +extern __constant__ double eb_GHCSiI; +extern __constant__ double eb_GPHI; +extern __constant__ double eb_GSO2I; +extern __constant__ double eb_GSiH4I; +extern __constant__ double eb_GC2H4CNI; +extern __constant__ double eb_GC2SI; +extern __constant__ double eb_GC3OI; +extern __constant__ double eb_GC4H3I; +extern __constant__ double eb_GC7H2I; +extern __constant__ double eb_GC8H2I; +extern __constant__ double eb_GC9H2I; +extern __constant__ double eb_GCH2CNI; +extern __constant__ double eb_GCH3CNI; +extern __constant__ double eb_GH2CNI; +extern __constant__ double eb_GH2CSI; +extern __constant__ double eb_GHC2OI; +extern __constant__ double eb_GHC5NI; +extern __constant__ double eb_GHC7NI; +extern __constant__ double eb_GHC9NI; +extern __constant__ double eb_GHCCNI; +extern __constant__ double eb_GHCSI; +extern __constant__ double eb_GSiC3I; +extern __constant__ double eb_GSiH3I; +extern __constant__ double eb_GSiNI; +extern __constant__ double eb_GSiOI; +extern __constant__ double eb_GC2H6I; +extern __constant__ double eb_GC3H2I; +extern __constant__ double eb_GC5H2I; +extern __constant__ double eb_GCCPI; +extern __constant__ double eb_GCH2CHCCHI; +extern __constant__ double eb_GCH3COCH3I; +extern __constant__ double eb_GCH3OCH3I; +extern __constant__ double eb_GClI; +extern __constant__ double eb_GSiCH2I; +extern __constant__ double eb_GSiHI; +extern __constant__ double eb_GSiH2I; +extern __constant__ double eb_GC10H2I; +extern __constant__ double eb_GC4H2I; +extern __constant__ double eb_GCH2CHCNI; +extern __constant__ double eb_GH2CCCI; +extern __constant__ double eb_GHC3NI; +extern __constant__ double eb_GOCSI; +extern __constant__ double eb_GC2H5CNI; +extern __constant__ double eb_GC2H5OHI; +extern __constant__ double eb_GC2OI; +extern __constant__ double eb_GC6H2I; +extern __constant__ double eb_GC9NI; +extern __constant__ double eb_GCO2I; +extern __constant__ double eb_GCPI; +extern __constant__ double eb_GO2HI; +extern __constant__ double eb_GOCNI; +extern __constant__ double eb_GSOI; +extern __constant__ double eb_GSiCI; +extern __constant__ double eb_GC11I; +extern __constant__ double eb_GC2NI; +extern __constant__ double eb_GCH2CCH2I; +extern __constant__ double eb_GCH2NHI; +extern __constant__ double eb_GCH3CCHI; +extern __constant__ double eb_GCNOI; +extern __constant__ double eb_GHNCI; +extern __constant__ double eb_GNSI; +extern __constant__ double eb_GSiC2I; +extern __constant__ double eb_GCH2CCHI; +extern __constant__ double eb_GCH2COI; +extern __constant__ double eb_GHNOI; +extern __constant__ double eb_GN2I; +extern __constant__ double eb_GC5NI; +extern __constant__ double eb_GPI; +extern __constant__ double eb_GC2H5I; +extern __constant__ double eb_GC3NI; +extern __constant__ double eb_GC7NI; +extern __constant__ double eb_GCOOCH3I; +extern __constant__ double eb_GHCNI; +extern __constant__ double eb_GNH3I; +extern __constant__ double eb_GC10I; +extern __constant__ double eb_GC10HI; +extern __constant__ double eb_GC8HI; +extern __constant__ double eb_GCH2OHCOI; +extern __constant__ double eb_GCOOHI; +extern __constant__ double eb_GO2I; +extern __constant__ double eb_GC2H4I; +extern __constant__ double eb_GC9I; +extern __constant__ double eb_GC9HI; +extern __constant__ double eb_GCSI; +extern __constant__ double eb_GHSI; +extern __constant__ double eb_GCH2OHCHOI; +extern __constant__ double eb_GHCOOHI; +extern __constant__ double eb_GC2H2I; +extern __constant__ double eb_GC5I; +extern __constant__ double eb_GC7HI; +extern __constant__ double eb_GCH3COI; +extern __constant__ double eb_GHCOOCH3I; +extern __constant__ double eb_GC6I; +extern __constant__ double eb_GC8I; +extern __constant__ double eb_GCH2OHI; +extern __constant__ double eb_GCH3OHI; +extern __constant__ double eb_GC3HI; +extern __constant__ double eb_GC4HI; +extern __constant__ double eb_GC5HI; +extern __constant__ double eb_GC6HI; +extern __constant__ double eb_GC2H3I; +extern __constant__ double eb_GCH3OI; +extern __constant__ double eb_GH2OI; +extern __constant__ double eb_GC7I; +extern __constant__ double eb_GSiI; +extern __constant__ double eb_GC4I; +extern __constant__ double eb_GCH3CHOI; +extern __constant__ double eb_GH2COI; +extern __constant__ double eb_GNOI; +extern __constant__ double eb_GCH4I; +extern __constant__ double eb_GC2HI; +extern __constant__ double eb_GNH2I; +extern __constant__ double eb_GHCOI; +extern __constant__ double eb_GNHI; +extern __constant__ double eb_GSI; +extern __constant__ double eb_GC3I; +extern __constant__ double eb_GOHI; +extern __constant__ double eb_GCOI; +extern __constant__ double eb_GCH2I; +extern __constant__ double eb_GC2I; +extern __constant__ double eb_GCNI; +extern __constant__ double eb_GNI; +extern __constant__ double eb_GOI; +extern __constant__ double eb_GCH3I; +extern __constant__ double eb_GCHI; +extern __constant__ double eb_GH2I; +extern __constant__ double eb_GCI; +extern __constant__ double eb_GHI; // H2 column density extern __device__ double H2ShieldingTableX[105]; @@ -230,6 +234,7 @@ extern __device__ double COShieldingTableZ[46]; // CO shielding factor extern __device__ double COShieldingTable[5][41][46]; + // Excitation temperature extern __device__ double N2ShieldingTableX[5]; // H2 column density @@ -239,5 +244,4 @@ extern __device__ double N2ShieldingTableZ[46]; // N2 shielding factor extern __device__ double N2ShieldingTable[5][46][46]; - #endif \ No newline at end of file diff --git a/include/naunet_data.h b/include/naunet_data.h index e883cc3..b78497a 100644 --- a/include/naunet_data.h +++ b/include/naunet_data.h @@ -1,27 +1,32 @@ #ifndef __NAUNET_DATA_H__ #define __NAUNET_DATA_H__ +// // Struct for holding the nessesary additional variables for the problem. struct NaunetData { // clang-format off - double rG; - double barr; - double sites; - double hop; - double nMono; - double duty; - double Tcr; - double branch; double nH; - double zeta_cr; - double zeta_xr; double Tgas; double Tdust; - double Av; - double G0; - double omega; + double zeta_cr = 1.300e-17; + double Av = 1.000e+00; + double omega = 5.000e-01; + double zeta_xr = 0.000e+00; + double G0 = 1.000e+00; + double rG = 1.000e-05; + double sites = 1.500e+15; + double barr = 1.500e-08; + double hop = 3.000e-01; + double nMono = 2.000e+00; + double opt_frz = 1.000e+00; + double opt_thd = 1.000e+00; + double opt_crd = 1.000e+00; + double duty = 3.160e-19; + double Tcr = 7.000e+01; + double opt_uvd = 1.000e+00; + double opt_rcd = 1.000e+00; + double branch = 1.000e-02; // clang-format on }; - #endif \ No newline at end of file diff --git a/include/naunet_macros.h b/include/naunet_macros.h index cf03e38..3e4f491 100644 --- a/include/naunet_macros.h +++ b/include/naunet_macros.h @@ -1,687 +1,721 @@ #ifndef __NAUNET_MACROS_H__ #define __NAUNET_MACROS_H__ +#include + +// // clang-format off #define NAUNET_SUCCESS 0 #define NAUNET_FAIL 1 -#define NSPECIES 669 -#define NEQUATIONS 669 -#define NREACTIONS 8764 -#define NNZ 20813 #define USE_CUDA #define MAX_NSYSTEMS 4096 -#define NSTREAMS 16 +#define NSTREAMS 1 // looks no benefit to use multiple streams #define MAX_NSYSTEMS_PER_STREAM (MAX_NSYSTEMS/NSTREAMS) #define BLOCKSIZE 64 -#define IDX_CI 0 -#define IDX_CII 1 -#define IDX_CM 2 -#define IDX_C10I 3 -#define IDX_C10II 4 -#define IDX_C10M 5 -#define IDX_C10HI 6 -#define IDX_C10HII 7 -#define IDX_C10HM 8 -#define IDX_C10H2I 9 -#define IDX_C10H2II 10 -#define IDX_C10H3II 11 -#define IDX_C11I 12 -#define IDX_C11II 13 -#define IDX_C2I 14 -#define IDX_C2II 15 -#define IDX_C2M 16 -#define IDX_C2HI 17 -#define IDX_C2HII 18 -#define IDX_C2HM 19 -#define IDX_C2H2I 20 -#define IDX_C2H2II 21 -#define IDX_C2H3I 22 -#define IDX_C2H3II 23 -#define IDX_C2H4I 24 -#define IDX_C2H4II 25 -#define IDX_C2H4CNI 26 -#define IDX_C2H5I 27 -#define IDX_C2H5II 28 -#define IDX_C2H5CNI 29 -#define IDX_C2H5CNHII 30 -#define IDX_C2H5OHI 31 -#define IDX_C2H5OHII 32 -#define IDX_C2H5OH2II 33 -#define IDX_C2H6I 34 -#define IDX_C2H6II 35 -#define IDX_C2H7II 36 -#define IDX_C2NI 37 -#define IDX_C2NII 38 -#define IDX_C2N2II 39 -#define IDX_C2NHII 40 -#define IDX_C2OI 41 -#define IDX_C2OII 42 -#define IDX_C2SI 43 -#define IDX_C2SII 44 -#define IDX_C3I 45 -#define IDX_C3II 46 -#define IDX_C3M 47 -#define IDX_C3HI 48 -#define IDX_C3HII 49 -#define IDX_C3HM 50 -#define IDX_C3H2I 51 -#define IDX_C3H2II 52 -#define IDX_C3H2OII 53 -#define IDX_C3H3II 54 -#define IDX_C3H4II 55 -#define IDX_C3H5II 56 -#define IDX_C3H6II 57 -#define IDX_C3H7II 58 -#define IDX_C3NI 59 -#define IDX_C3NII 60 -#define IDX_C3NM 61 -#define IDX_C3OI 62 -#define IDX_C3OII 63 -#define IDX_C3PI 64 -#define IDX_C3SI 65 -#define IDX_C3SII 66 -#define IDX_C4I 67 -#define IDX_C4II 68 -#define IDX_C4M 69 -#define IDX_C4HI 70 -#define IDX_C4HII 71 -#define IDX_C4HM 72 -#define IDX_C4H2I 73 -#define IDX_C4H2II 74 -#define IDX_C4H3I 75 -#define IDX_C4H3II 76 -#define IDX_C4H4II 77 -#define IDX_C4H5II 78 -#define IDX_C4H6I 79 -#define IDX_C4H7II 80 -#define IDX_C4NI 81 -#define IDX_C4NII 82 -#define IDX_C4PI 83 -#define IDX_C4PII 84 -#define IDX_C4SI 85 -#define IDX_C4SII 86 -#define IDX_C5I 87 -#define IDX_C5II 88 -#define IDX_C5M 89 -#define IDX_C5HI 90 -#define IDX_C5HII 91 -#define IDX_C5HM 92 -#define IDX_C5H2I 93 -#define IDX_C5H2II 94 -#define IDX_C5H3II 95 -#define IDX_C5H5II 96 -#define IDX_C5NI 97 -#define IDX_C5NII 98 -#define IDX_C5NM 99 -#define IDX_C6I 100 -#define IDX_C6II 101 -#define IDX_C6M 102 -#define IDX_C6HI 103 -#define IDX_C6HII 104 -#define IDX_C6HM 105 -#define IDX_C6H2I 106 -#define IDX_C6H2II 107 -#define IDX_C6H3II 108 -#define IDX_C6H4II 109 -#define IDX_C6H5II 110 -#define IDX_C6H6I 111 -#define IDX_C6H6II 112 -#define IDX_C6H7II 113 -#define IDX_C7I 114 -#define IDX_C7II 115 -#define IDX_C7M 116 -#define IDX_C7HI 117 -#define IDX_C7HII 118 -#define IDX_C7HM 119 -#define IDX_C7H2I 120 -#define IDX_C7H2II 121 -#define IDX_C7H3II 122 -#define IDX_C7H4II 123 -#define IDX_C7H5II 124 -#define IDX_C7NI 125 -#define IDX_C7NII 126 -#define IDX_C8I 127 -#define IDX_C8II 128 -#define IDX_C8M 129 -#define IDX_C8HI 130 -#define IDX_C8HII 131 -#define IDX_C8HM 132 -#define IDX_C8H2I 133 -#define IDX_C8H2II 134 -#define IDX_C8H3II 135 -#define IDX_C8H4II 136 -#define IDX_C8H5II 137 -#define IDX_C9I 138 -#define IDX_C9II 139 -#define IDX_C9M 140 -#define IDX_C9HI 141 -#define IDX_C9HII 142 -#define IDX_C9HM 143 -#define IDX_C9H2I 144 -#define IDX_C9H2II 145 -#define IDX_C9H3II 146 -#define IDX_C9H4II 147 -#define IDX_C9H5II 148 -#define IDX_C9NI 149 -#define IDX_C9NII 150 -#define IDX_CCPI 151 -#define IDX_CCPII 152 -#define IDX_CClI 153 -#define IDX_CClII 154 -#define IDX_CFII 155 -#define IDX_CHI 156 -#define IDX_CHII 157 -#define IDX_CHM 158 -#define IDX_CH2I 159 -#define IDX_CH2II 160 -#define IDX_CH2CCHI 161 -#define IDX_CH2CCHII 162 -#define IDX_CH2CCH2I 163 -#define IDX_CH2CHCCHI 164 -#define IDX_CH2CHCNI 165 -#define IDX_CH2CHCNII 166 -#define IDX_CH2CHCNHII 167 -#define IDX_CH2CNI 168 -#define IDX_CH2CNII 169 -#define IDX_CH2COI 170 -#define IDX_CH2COII 171 -#define IDX_CH2NHI 172 -#define IDX_CH2NH2II 173 -#define IDX_CH2OHI 174 -#define IDX_CH2OHCH2OII 175 -#define IDX_CH2OHCHOI 176 -#define IDX_CH2OHCHOII 177 -#define IDX_CH2OHCOI 178 -#define IDX_CH2OHCOII 179 -#define IDX_CH2PHI 180 -#define IDX_CH3I 181 -#define IDX_CH3II 182 -#define IDX_CH3C3NI 183 -#define IDX_CH3C3NII 184 -#define IDX_CH3C3NHII 185 -#define IDX_CH3C4HI 186 -#define IDX_CH3C4HII 187 -#define IDX_CH3C5NI 188 -#define IDX_CH3C5NHII 189 -#define IDX_CH3C6HI 190 -#define IDX_CH3C7NI 191 -#define IDX_CH3C7NHII 192 -#define IDX_CH3CCHI 193 -#define IDX_CH3CHCH2I 194 -#define IDX_CH3CHOI 195 -#define IDX_CH3CHOII 196 -#define IDX_CH3CHOHII 197 -#define IDX_CH3CNI 198 -#define IDX_CH3CNII 199 -#define IDX_CH3CNHII 200 -#define IDX_CH3COI 201 -#define IDX_CH3COII 202 -#define IDX_CH3COCH3I 203 -#define IDX_CH3COCH3II 204 -#define IDX_CH3COCH4II 205 -#define IDX_CH3COOHI 206 -#define IDX_CH3COOHII 207 +#define NELEMENTS 14 +#define NSPECIES 669 +#define NHEATPROCS 0 +#define NCOOLPROCS 0 +#define THERMAL (NHEATPROCS || NCOOLPROCS) +#if (NSPECIES + THERMAL) +#define NEQUATIONS (NSPECIES + THERMAL) +#else +#define NEQUATIONS 1 +#endif +#define NREACTIONS 8764 +// non-zero terms in jacobian matrix, used in sparse matrix +#define NNZ 20813 + +#define IDX_ELEM_F 0 +#define IDX_ELEM_Cl 1 +#define IDX_ELEM_P 2 +#define IDX_ELEM_Fe 3 +#define IDX_ELEM_Mg 4 +#define IDX_ELEM_Na 5 +#define IDX_ELEM_Si 6 +#define IDX_ELEM_S 7 +#define IDX_ELEM_N 8 +#define IDX_ELEM_O 9 +#define IDX_ELEM_He 10 +#define IDX_ELEM_C 11 +#define IDX_ELEM_GRAIN 12 +#define IDX_ELEM_H 13 + +#define IDX_GFeI 0 +#define IDX_GHeI 1 +#define IDX_GMgI 2 +#define IDX_GNaI 3 +#define IDX_GH2S2I 4 +#define IDX_GC4H6I 5 +#define IDX_GC4SI 6 +#define IDX_GCClI 7 +#define IDX_GCH3C3NI 8 +#define IDX_GCH3C4HI 9 +#define IDX_GCH3C5NI 10 +#define IDX_GCH3C6HI 11 +#define IDX_GCH3C7NI 12 +#define IDX_GClOI 13 +#define IDX_GHC2PI 14 +#define IDX_GHClI 15 +#define IDX_GHFI 16 +#define IDX_GHNSiI 17 +#define IDX_GHPOI 18 +#define IDX_GNH2CNI 19 +#define IDX_GNO2I 20 +#define IDX_GPNI 21 +#define IDX_GSiC3HI 22 +#define IDX_GSiCH3I 23 +#define IDX_GSiO2I 24 +#define IDX_GSiSI 25 +#define IDX_GFI 26 +#define IDX_GH2SiOI 27 +#define IDX_GNCCNI 28 +#define IDX_GS2I 29 +#define IDX_GSiC2HI 30 +#define IDX_C2H4CNI 31 +#define IDX_GC3SI 32 +#define IDX_GC4NI 33 +#define IDX_GC4PI 34 +#define IDX_GCH2PHI 35 +#define IDX_GCH3CHCH2I 36 +#define IDX_GCH3COOHI 37 +#define IDX_GH2SI 38 +#define IDX_GHCNOI 39 +#define IDX_GHCPI 40 +#define IDX_GHNC3I 41 +#define IDX_GHNCOI 42 +#define IDX_GHOCNI 43 +#define IDX_GHONCI 44 +#define IDX_GHS2I 45 +#define IDX_GN2OI 46 +#define IDX_GPH2I 47 +#define IDX_GPOI 48 +#define IDX_GSiC2H2I 49 +#define IDX_GSiC4I 50 +#define IDX_GSiNCI 51 +#define IDX_HC2OI 52 +#define IDX_GC3PI 53 +#define IDX_GC6H6I 54 +#define IDX_GH2O2I 55 +#define IDX_GHCSiI 56 +#define IDX_GPHI 57 +#define IDX_GSO2I 58 +#define IDX_GSiH4I 59 +#define IDX_NCCNCH3II 60 +#define IDX_GC2H4CNI 61 +#define IDX_GC2SI 62 +#define IDX_GC3OI 63 +#define IDX_GC4H3I 64 +#define IDX_GC7H2I 65 +#define IDX_GC8H2I 66 +#define IDX_GC9H2I 67 +#define IDX_GCH2CNI 68 +#define IDX_GCH3CNI 69 +#define IDX_GH2CNI 70 +#define IDX_GH2CSI 71 +#define IDX_GHC2OI 72 +#define IDX_GHC5NI 73 +#define IDX_GHC7NI 74 +#define IDX_GHC9NI 75 +#define IDX_GHCCNI 76 +#define IDX_GHCSI 77 +#define IDX_GSiC3I 78 +#define IDX_GSiH3I 79 +#define IDX_GSiNI 80 +#define IDX_GSiOI 81 +#define IDX_HCCNI 82 +#define IDX_C3H2OII 83 +#define IDX_CFII 84 +#define IDX_ClOII 85 +#define IDX_GC2H6I 86 +#define IDX_GC3H2I 87 +#define IDX_GC5H2I 88 +#define IDX_GCCPI 89 +#define IDX_GCH2CHCCHI 90 +#define IDX_GCH3COCH3I 91 +#define IDX_GCH3OCH3I 92 +#define IDX_GClI 93 +#define IDX_GSiCH2I 94 +#define IDX_GSiHI 95 +#define IDX_GSiH2I 96 +#define IDX_H3C3OII 97 +#define IDX_HFII 98 +#define IDX_SiFII 99 +#define IDX_C8H5II 100 +#define IDX_C9H5II 101 +#define IDX_CH3C3NII 102 +#define IDX_GC10H2I 103 +#define IDX_GC4H2I 104 +#define IDX_GCH2CHCNI 105 +#define IDX_GH2CCCI 106 +#define IDX_GHC3NI 107 +#define IDX_GOCSI 108 +#define IDX_H2FII 109 +#define IDX_C4H6I 110 +#define IDX_C4PII 111 +#define IDX_C5NII 112 +#define IDX_C6H6II 113 +#define IDX_CH2CHCNII 114 +#define IDX_COOCH3II 115 +#define IDX_FII 116 +#define IDX_GC2H5CNI 117 +#define IDX_GC2H5OHI 118 +#define IDX_GC2OI 119 +#define IDX_GC6H2I 120 +#define IDX_GC9NI 121 +#define IDX_GCO2I 122 +#define IDX_GCPI 123 +#define IDX_GO2HI 124 +#define IDX_GOCNI 125 +#define IDX_GSOI 126 +#define IDX_GSiCI 127 +#define IDX_H2CNOII 128 +#define IDX_H2NCOII 129 +#define IDX_H2OCNII 130 +#define IDX_PC2H4II 131 +#define IDX_C7NII 132 +#define IDX_C9NII 133 +#define IDX_CH3NHII 134 +#define IDX_ClOI 135 +#define IDX_GC11I 136 +#define IDX_GC2NI 137 +#define IDX_GCH2CCH2I 138 +#define IDX_GCH2NHI 139 +#define IDX_GCH3CCHI 140 +#define IDX_GCNOI 141 +#define IDX_GHNCI 142 +#define IDX_GNSI 143 +#define IDX_GSiC2I 144 +#define IDX_H2C4NII 145 +#define IDX_H2CClII 146 +#define IDX_H2NOII 147 +#define IDX_HClII 148 +#define IDX_HNSII 149 +#define IDX_HOCII 150 +#define IDX_HSOII 151 +#define IDX_HSiO2II 152 +#define IDX_NH2CNHII 153 +#define IDX_C2H5OHII 154 +#define IDX_C2OII 155 +#define IDX_CH2CHCCHI 156 +#define IDX_CH2OHCOII 157 +#define IDX_GCH2CCHI 158 +#define IDX_GCH2COI 159 +#define IDX_GHNOI 160 +#define IDX_GN2I 161 +#define IDX_HC4NII 162 +#define IDX_HCNOHII 163 +#define IDX_HNCOHII 164 +#define IDX_HOCNII 165 +#define IDX_HeHII 166 +#define IDX_PC2H3II 167 +#define IDX_PNII 168 +#define IDX_PNH3II 169 +#define IDX_CH3CSII 170 +#define IDX_GC5NI 171 +#define IDX_GPI 172 +#define IDX_H2C7NII 173 +#define IDX_H2C9NII 174 +#define IDX_H2O2I 175 +#define IDX_H3S2II 176 +#define IDX_HONCII 177 +#define IDX_PCH3II 178 +#define IDX_PNH2II 179 +#define IDX_C10H3II 180 +#define IDX_C2H5CNHII 181 +#define IDX_CClII 182 +#define IDX_CH2NH2II 183 +#define IDX_CH2OHCH2OII 184 +#define IDX_CH3C5NHII 185 +#define IDX_CH3C7NHII 186 +#define IDX_GC2H5I 187 +#define IDX_GC3NI 188 +#define IDX_GC7NI 189 +#define IDX_GCOOCH3I 190 +#define IDX_GHCNI 191 +#define IDX_H2CNI 192 +#define IDX_H2SiOII 193 +#define IDX_H3C5NII 194 +#define IDX_HCNOII 195 +#define IDX_CClI 196 +#define IDX_CH3COOHII 197 +#define IDX_ClII 198 +#define IDX_GNH3I 199 +#define IDX_H2ClII 200 +#define IDX_H3C9NII 201 +#define IDX_H5C2O2II 202 +#define IDX_HCOOHII 203 +#define IDX_HPNII 204 +#define IDX_C2SII 205 +#define IDX_C3SII 206 +#define IDX_C4NI 207 #define IDX_CH3COOH2II 208 -#define IDX_CH3CSII 209 -#define IDX_CH3NHII 210 -#define IDX_CH3OI 211 -#define IDX_CH3OCH3I 212 -#define IDX_CH3OCH3II 213 -#define IDX_CH3OCH4II 214 -#define IDX_CH3OHI 215 -#define IDX_CH3OHII 216 -#define IDX_CH3OH2II 217 -#define IDX_CH4I 218 -#define IDX_CH4II 219 -#define IDX_CH5II 220 -#define IDX_CNI 221 -#define IDX_CNII 222 -#define IDX_CNM 223 -#define IDX_CNCII 224 -#define IDX_CNOI 225 -#define IDX_COI 226 -#define IDX_COII 227 -#define IDX_CO2I 228 -#define IDX_CO2II 229 -#define IDX_COOCH3I 230 -#define IDX_COOCH3II 231 -#define IDX_COOHI 232 -#define IDX_CPI 233 -#define IDX_CPII 234 -#define IDX_CSI 235 -#define IDX_CSII 236 -#define IDX_ClI 237 -#define IDX_ClII 238 -#define IDX_ClOI 239 -#define IDX_ClOII 240 -#define IDX_FI 241 -#define IDX_FII 242 -#define IDX_FeI 243 -#define IDX_FeII 244 -#define IDX_GCI 245 -#define IDX_GC10I 246 -#define IDX_GC10HI 247 -#define IDX_GC10H2I 248 -#define IDX_GC11I 249 -#define IDX_GC2I 250 -#define IDX_GC2HI 251 -#define IDX_GC2H2I 252 -#define IDX_GC2H3I 253 -#define IDX_GC2H4I 254 -#define IDX_GC2H4CNI 255 -#define IDX_GC2H5I 256 -#define IDX_GC2H5CNI 257 -#define IDX_GC2H5OHI 258 -#define IDX_GC2H6I 259 -#define IDX_GC2NI 260 -#define IDX_GC2OI 261 -#define IDX_GC2SI 262 -#define IDX_GC3I 263 -#define IDX_GC3HI 264 -#define IDX_GC3H2I 265 -#define IDX_GC3NI 266 -#define IDX_GC3OI 267 -#define IDX_GC3PI 268 -#define IDX_GC3SI 269 -#define IDX_GC4I 270 -#define IDX_GC4HI 271 -#define IDX_GC4H2I 272 -#define IDX_GC4H3I 273 -#define IDX_GC4H6I 274 -#define IDX_GC4NI 275 -#define IDX_GC4PI 276 -#define IDX_GC4SI 277 -#define IDX_GC5I 278 -#define IDX_GC5HI 279 -#define IDX_GC5H2I 280 -#define IDX_GC5NI 281 -#define IDX_GC6I 282 -#define IDX_GC6HI 283 -#define IDX_GC6H2I 284 -#define IDX_GC6H6I 285 -#define IDX_GC7I 286 -#define IDX_GC7HI 287 -#define IDX_GC7H2I 288 -#define IDX_GC7NI 289 +#define IDX_CH3OCH3II 209 +#define IDX_GC10I 210 +#define IDX_GC10HI 211 +#define IDX_GC8HI 212 +#define IDX_GCH2OHCOI 213 +#define IDX_GCOOHI 214 +#define IDX_GO2I 215 +#define IDX_H3C7NII 216 +#define IDX_H3SiOII 217 +#define IDX_HSO2II 218 +#define IDX_NH2CNI 219 +#define IDX_CH3C3NHII 220 +#define IDX_CH3OCH4II 221 +#define IDX_GC2H4I 222 +#define IDX_GC9I 223 +#define IDX_GC9HI 224 +#define IDX_GCSI 225 +#define IDX_HC7NII 226 +#define IDX_HC9NII 227 +#define IDX_HNCOII 228 +#define IDX_NO2II 229 +#define IDX_PC3HII 230 +#define IDX_PCH4II 231 +#define IDX_SiH4II 232 +#define IDX_SiO2I 233 +#define IDX_C2H5CNI 234 +#define IDX_C2H5OH2II 235 +#define IDX_C2H7II 236 +#define IDX_CCPII 237 +#define IDX_CH2CHCNHII 238 +#define IDX_COOCH3I 239 +#define IDX_FI 240 +#define IDX_GHSI 241 +#define IDX_H2POII 242 +#define IDX_HCOOCH3II 243 +#define IDX_HN2OII 244 +#define IDX_N2OII 245 +#define IDX_PC2H2II 246 +#define IDX_SiC3H2II 247 +#define IDX_SiC4II 248 +#define IDX_SiC4HII 249 +#define IDX_SiH5II 250 +#define IDX_SiNCHII 251 +#define IDX_C11I 252 +#define IDX_C3OII 253 +#define IDX_C4H5II 254 +#define IDX_C4H7II 255 +#define IDX_CH2OHCHOII 256 +#define IDX_CH3CHOII 257 +#define IDX_GCH2OHCHOI 258 +#define IDX_GHCOOHI 259 +#define IDX_H2S2I 260 +#define IDX_HNSiII 261 +#define IDX_HOCSII 262 +#define IDX_NSII 263 +#define IDX_OCNII 264 +#define IDX_PC4HII 265 +#define IDX_PH3II 266 +#define IDX_SiCH4II 267 +#define IDX_C10II 268 +#define IDX_C10H2II 269 +#define IDX_C2N2II 270 +#define IDX_CH3CNII 271 +#define IDX_GC2H2I 272 +#define IDX_GC5I 273 +#define IDX_GC7HI 274 +#define IDX_GCH3COI 275 +#define IDX_GHCOOCH3I 276 +#define IDX_HC4SII 277 +#define IDX_HC5NHII 278 +#define IDX_SiC2H3II 279 +#define IDX_SiC3HI 280 +#define IDX_SiCH3II 281 +#define IDX_SiNH2II 282 +#define IDX_C11II 283 +#define IDX_C3NII 284 +#define IDX_C4H4II 285 +#define IDX_CH2CNII 286 +#define IDX_CH3COCH3II 287 +#define IDX_CPII 288 +#define IDX_GC6I 289 #define IDX_GC8I 290 -#define IDX_GC8HI 291 -#define IDX_GC8H2I 292 -#define IDX_GC9I 293 -#define IDX_GC9HI 294 -#define IDX_GC9H2I 295 -#define IDX_GC9NI 296 -#define IDX_GCCPI 297 -#define IDX_GCClI 298 -#define IDX_GCHI 299 -#define IDX_GCH2I 300 -#define IDX_GCH2CCHI 301 -#define IDX_GCH2CCH2I 302 -#define IDX_GCH2CHCCHI 303 -#define IDX_GCH2CHCNI 304 -#define IDX_GCH2CNI 305 -#define IDX_GCH2COI 306 -#define IDX_GCH2NHI 307 -#define IDX_GCH2OHI 308 -#define IDX_GCH2OHCHOI 309 -#define IDX_GCH2OHCOI 310 -#define IDX_GCH2PHI 311 -#define IDX_GCH3I 312 -#define IDX_GCH3C3NI 313 -#define IDX_GCH3C4HI 314 -#define IDX_GCH3C5NI 315 -#define IDX_GCH3C6HI 316 -#define IDX_GCH3C7NI 317 -#define IDX_GCH3CCHI 318 -#define IDX_GCH3CHCH2I 319 -#define IDX_GCH3CHOI 320 -#define IDX_GCH3CNI 321 -#define IDX_GCH3COI 322 -#define IDX_GCH3COCH3I 323 -#define IDX_GCH3COOHI 324 -#define IDX_GCH3OI 325 -#define IDX_GCH3OCH3I 326 -#define IDX_GCH3OHI 327 -#define IDX_GCH4I 328 -#define IDX_GCNI 329 -#define IDX_GCNOI 330 -#define IDX_GCOI 331 -#define IDX_GCO2I 332 -#define IDX_GCOOCH3I 333 -#define IDX_GCOOHI 334 -#define IDX_GCPI 335 -#define IDX_GCSI 336 -#define IDX_GClI 337 -#define IDX_GClOI 338 -#define IDX_GFI 339 -#define IDX_GFeI 340 -#define IDX_GHI 341 -#define IDX_GH2I 342 -#define IDX_GH2CCCI 343 -#define IDX_GH2CNI 344 -#define IDX_GH2COI 345 -#define IDX_GH2CSI 346 -#define IDX_GH2OI 347 -#define IDX_GH2O2I 348 -#define IDX_GH2SI 349 -#define IDX_GH2S2I 350 -#define IDX_GH2SiOI 351 -#define IDX_GHC2OI 352 -#define IDX_GHC2PI 353 -#define IDX_GHC3NI 354 -#define IDX_GHC5NI 355 -#define IDX_GHC7NI 356 -#define IDX_GHC9NI 357 -#define IDX_GHCCNI 358 -#define IDX_GHCNI 359 -#define IDX_GHCNOI 360 -#define IDX_GHCOI 361 -#define IDX_GHCOOCH3I 362 -#define IDX_GHCOOHI 363 -#define IDX_GHCPI 364 -#define IDX_GHCSI 365 -#define IDX_GHCSiI 366 -#define IDX_GHClI 367 -#define IDX_GHFI 368 -#define IDX_GHNCI 369 -#define IDX_GHNC3I 370 -#define IDX_GHNCOI 371 -#define IDX_GHNOI 372 -#define IDX_GHNSiI 373 -#define IDX_GHOCNI 374 -#define IDX_GHONCI 375 -#define IDX_GHPOI 376 -#define IDX_GHSI 377 -#define IDX_GHS2I 378 -#define IDX_GHeI 379 -#define IDX_GMgI 380 -#define IDX_GNI 381 -#define IDX_GN2I 382 -#define IDX_GN2OI 383 -#define IDX_GNCCNI 384 -#define IDX_GNHI 385 -#define IDX_GNH2I 386 -#define IDX_GNH2CNI 387 -#define IDX_GNH3I 388 -#define IDX_GNOI 389 -#define IDX_GNO2I 390 -#define IDX_GNSI 391 -#define IDX_GNaI 392 -#define IDX_GOI 393 -#define IDX_GO2I 394 -#define IDX_GO2HI 395 -#define IDX_GOCNI 396 -#define IDX_GOCSI 397 -#define IDX_GOHI 398 -#define IDX_GPI 399 -#define IDX_GPHI 400 -#define IDX_GPH2I 401 -#define IDX_GPNI 402 -#define IDX_GPOI 403 -#define IDX_GRAINM 404 -#define IDX_GRAIN0I 405 -#define IDX_GSI 406 -#define IDX_GS2I 407 -#define IDX_GSOI 408 -#define IDX_GSO2I 409 -#define IDX_GSiI 410 -#define IDX_GSiCI 411 -#define IDX_GSiC2I 412 -#define IDX_GSiC2HI 413 -#define IDX_GSiC2H2I 414 -#define IDX_GSiC3I 415 -#define IDX_GSiC3HI 416 -#define IDX_GSiC4I 417 -#define IDX_GSiCH2I 418 -#define IDX_GSiCH3I 419 -#define IDX_GSiHI 420 -#define IDX_GSiH2I 421 -#define IDX_GSiH3I 422 -#define IDX_GSiH4I 423 -#define IDX_GSiNI 424 -#define IDX_GSiNCI 425 -#define IDX_GSiOI 426 -#define IDX_GSiO2I 427 -#define IDX_GSiSI 428 -#define IDX_HI 429 -#define IDX_HII 430 -#define IDX_HM 431 -#define IDX_H2I 432 -#define IDX_H2II 433 -#define IDX_H2C4NII 434 -#define IDX_H2C7NII 435 -#define IDX_H2C9NII 436 -#define IDX_H2CCCI 437 -#define IDX_H2CClII 438 -#define IDX_H2CNI 439 -#define IDX_H2CNOII 440 -#define IDX_H2COI 441 -#define IDX_H2COII 442 -#define IDX_H2CSI 443 -#define IDX_H2CSII 444 -#define IDX_H2ClII 445 -#define IDX_H2FII 446 -#define IDX_H2NCII 447 -#define IDX_H2NCOII 448 -#define IDX_H2NOII 449 -#define IDX_H2OI 450 -#define IDX_H2OII 451 -#define IDX_H2O2I 452 -#define IDX_H2OCNII 453 -#define IDX_H2POII 454 -#define IDX_H2SI 455 -#define IDX_H2SII 456 -#define IDX_H2S2I 457 -#define IDX_H2S2II 458 -#define IDX_H2SiOI 459 -#define IDX_H2SiOII 460 -#define IDX_H3II 461 -#define IDX_H3C3OII 462 -#define IDX_H3C5NII 463 -#define IDX_H3C7NII 464 -#define IDX_H3C9NII 465 -#define IDX_H3COII 466 -#define IDX_H3CSII 467 -#define IDX_H3OII 468 -#define IDX_H3SII 469 -#define IDX_H3S2II 470 -#define IDX_H3SiOII 471 -#define IDX_H5C2O2II 472 -#define IDX_HC2OI 473 -#define IDX_HC2OII 474 -#define IDX_HC2PI 475 -#define IDX_HC2PII 476 -#define IDX_HC2SII 477 -#define IDX_HC3NI 478 -#define IDX_HC3NII 479 -#define IDX_HC3NHII 480 -#define IDX_HC3OII 481 -#define IDX_HC3SII 482 -#define IDX_HC4NII 483 -#define IDX_HC4SII 484 -#define IDX_HC5NI 485 -#define IDX_HC5NII 486 -#define IDX_HC5NHII 487 -#define IDX_HC7NI 488 -#define IDX_HC7NII 489 -#define IDX_HC9NI 490 -#define IDX_HC9NII 491 -#define IDX_HCCNI 492 -#define IDX_HCNI 493 -#define IDX_HCNII 494 -#define IDX_HCNHII 495 -#define IDX_HCNOI 496 -#define IDX_HCNOII 497 -#define IDX_HCNOHII 498 -#define IDX_HCOI 499 -#define IDX_HCOII 500 -#define IDX_HCO2II 501 -#define IDX_HCOOCH3I 502 -#define IDX_HCOOCH3II 503 -#define IDX_HCOOHI 504 -#define IDX_HCOOHII 505 -#define IDX_HCOOH2II 506 -#define IDX_HCPI 507 -#define IDX_HCPII 508 -#define IDX_HCSI 509 -#define IDX_HCSII 510 -#define IDX_HCSiI 511 -#define IDX_HCSiII 512 -#define IDX_HClI 513 -#define IDX_HClII 514 -#define IDX_HFI 515 -#define IDX_HFII 516 -#define IDX_HN2OII 517 -#define IDX_HNCI 518 -#define IDX_HNC3I 519 -#define IDX_HNCOI 520 -#define IDX_HNCOII 521 -#define IDX_HNCOHII 522 -#define IDX_HNOI 523 -#define IDX_HNOII 524 -#define IDX_HNSII 525 -#define IDX_HNSiI 526 -#define IDX_HNSiII 527 -#define IDX_HOCII 528 -#define IDX_HOCNI 529 -#define IDX_HOCNII 530 -#define IDX_HOCSII 531 -#define IDX_HONCI 532 -#define IDX_HONCII 533 -#define IDX_HPNII 534 -#define IDX_HPOI 535 -#define IDX_HPOII 536 -#define IDX_HSI 537 -#define IDX_HSII 538 -#define IDX_HS2I 539 -#define IDX_HS2II 540 -#define IDX_HSOII 541 -#define IDX_HSO2II 542 -#define IDX_HSiO2II 543 -#define IDX_HSiSII 544 -#define IDX_HeI 545 -#define IDX_HeII 546 -#define IDX_HeHII 547 -#define IDX_MgI 548 -#define IDX_MgII 549 -#define IDX_NI 550 -#define IDX_NII 551 -#define IDX_N2I 552 -#define IDX_N2II 553 -#define IDX_N2HII 554 -#define IDX_N2OI 555 -#define IDX_N2OII 556 -#define IDX_NCCNI 557 -#define IDX_NCCNCH3II 558 -#define IDX_NCCNHII 559 -#define IDX_NHI 560 -#define IDX_NHII 561 -#define IDX_NH2I 562 -#define IDX_NH2II 563 -#define IDX_NH2CNI 564 -#define IDX_NH2CNHII 565 -#define IDX_NH3I 566 -#define IDX_NH3II 567 -#define IDX_NH4II 568 -#define IDX_NOI 569 -#define IDX_NOII 570 -#define IDX_NO2I 571 -#define IDX_NO2II 572 -#define IDX_NSI 573 -#define IDX_NSII 574 -#define IDX_NaI 575 -#define IDX_NaII 576 -#define IDX_OI 577 -#define IDX_OII 578 -#define IDX_OM 579 -#define IDX_O2I 580 -#define IDX_O2II 581 -#define IDX_O2M 582 -#define IDX_O2HI 583 -#define IDX_O2HII 584 -#define IDX_OCNI 585 -#define IDX_OCNII 586 -#define IDX_OCSI 587 -#define IDX_OCSII 588 -#define IDX_OHI 589 -#define IDX_OHII 590 -#define IDX_OHM 591 -#define IDX_PI 592 -#define IDX_PII 593 -#define IDX_PC2H2II 594 -#define IDX_PC2H3II 595 -#define IDX_PC2H4II 596 -#define IDX_PC3HII 597 -#define IDX_PC4HII 598 -#define IDX_PCH2II 599 -#define IDX_PCH3II 600 -#define IDX_PCH4II 601 -#define IDX_PHI 602 -#define IDX_PHII 603 -#define IDX_PH2I 604 -#define IDX_PH2II 605 -#define IDX_PH3II 606 -#define IDX_PNI 607 -#define IDX_PNII 608 -#define IDX_PNH2II 609 -#define IDX_PNH3II 610 -#define IDX_POI 611 -#define IDX_POII 612 -#define IDX_SI 613 -#define IDX_SII 614 -#define IDX_SM 615 -#define IDX_S2I 616 -#define IDX_S2II 617 -#define IDX_SOI 618 -#define IDX_SOII 619 -#define IDX_SO2I 620 -#define IDX_SO2II 621 -#define IDX_SiI 622 -#define IDX_SiII 623 -#define IDX_SiCI 624 -#define IDX_SiCII 625 -#define IDX_SiC2I 626 -#define IDX_SiC2II 627 -#define IDX_SiC2HI 628 -#define IDX_SiC2HII 629 -#define IDX_SiC2H2I 630 -#define IDX_SiC2H2II 631 -#define IDX_SiC2H3II 632 -#define IDX_SiC3I 633 -#define IDX_SiC3II 634 -#define IDX_SiC3HI 635 -#define IDX_SiC3HII 636 -#define IDX_SiC3H2II 637 -#define IDX_SiC4I 638 -#define IDX_SiC4II 639 -#define IDX_SiC4HII 640 -#define IDX_SiCH2I 641 -#define IDX_SiCH2II 642 -#define IDX_SiCH3I 643 -#define IDX_SiCH3II 644 -#define IDX_SiCH4II 645 -#define IDX_SiFII 646 -#define IDX_SiHI 647 -#define IDX_SiHII 648 -#define IDX_SiH2I 649 -#define IDX_SiH2II 650 -#define IDX_SiH3I 651 -#define IDX_SiH3II 652 -#define IDX_SiH4I 653 -#define IDX_SiH4II 654 -#define IDX_SiH5II 655 -#define IDX_SiNI 656 -#define IDX_SiNII 657 -#define IDX_SiNCI 658 -#define IDX_SiNCII 659 -#define IDX_SiNCHII 660 -#define IDX_SiNH2II 661 -#define IDX_SiOI 662 -#define IDX_SiOII 663 -#define IDX_SiO2I 664 -#define IDX_SiOHII 665 -#define IDX_SiSI 666 -#define IDX_SiSII 667 -#define IDX_eM 668 +#define IDX_GCH2OHI 291 +#define IDX_GCH3OHI 292 +#define IDX_H2S2II 293 +#define IDX_HC2PII 294 +#define IDX_HC5NII 295 +#define IDX_HFI 296 +#define IDX_HONCI 297 +#define IDX_HSiSII 298 +#define IDX_PCH2II 299 +#define IDX_SO2II 300 +#define IDX_SiNII 301 +#define IDX_C9II 302 +#define IDX_CH2OHCOI 303 +#define IDX_CH3C5NI 304 +#define IDX_CH3C7NI 305 +#define IDX_GC3HI 306 +#define IDX_GC4HI 307 +#define IDX_GC5HI 308 +#define IDX_GC6HI 309 +#define IDX_H2NCII 310 +#define IDX_H2SiOI 311 +#define IDX_H3CSII 312 +#define IDX_HC2OII 313 +#define IDX_HCPII 314 +#define IDX_SiC4I 315 +#define IDX_SiNCI 316 +#define IDX_SiNCII 317 +#define IDX_CNOI 318 +#define IDX_GC2H3I 319 +#define IDX_GCH3OI 320 +#define IDX_GH2OI 321 +#define IDX_HC3SII 322 +#define IDX_HCOOH2II 323 +#define IDX_HNSiI 324 +#define IDX_HPOII 325 +#define IDX_HS2II 326 +#define IDX_SiC2H2I 327 +#define IDX_SiC3II 328 +#define IDX_C2NHII 329 +#define IDX_C3H6II 330 +#define IDX_C6H7II 331 +#define IDX_C8H4II 332 +#define IDX_CH2OHCHOI 333 +#define IDX_ClI 334 +#define IDX_GC7I 335 +#define IDX_GSiI 336 +#define IDX_HC3OII 337 +#define IDX_HCNOI 338 +#define IDX_SiC3HII 339 +#define IDX_SiCH3I 340 +#define IDX_C3H7II 341 +#define IDX_C4NII 342 +#define IDX_C8II 343 +#define IDX_C9H4II 344 +#define IDX_CH2COII 345 +#define IDX_CH2PHI 346 +#define IDX_CH3C3NI 347 +#define IDX_GC4I 348 +#define IDX_GCH3CHOI 349 +#define IDX_GH2COI 350 +#define IDX_HOCNI 351 +#define IDX_HPOI 352 +#define IDX_HS2I 353 +#define IDX_SiC2II 354 +#define IDX_SiC2H2II 355 +#define IDX_C6H4II 356 +#define IDX_CH3COI 357 +#define IDX_CH3COCH4II 358 +#define IDX_CH3OHII 359 +#define IDX_COOHI 360 +#define IDX_GNOI 361 +#define IDX_POII 362 +#define IDX_C7H4II 363 +#define IDX_C7H5II 364 +#define IDX_CH3C6HI 365 +#define IDX_H2CSII 366 +#define IDX_HC9NI 367 +#define IDX_HCOOCH3I 368 +#define IDX_NCCNHII 369 +#define IDX_NO2I 370 +#define IDX_PH2I 371 +#define IDX_PNI 372 +#define IDX_SiC2HI 373 +#define IDX_SiC3I 374 +#define IDX_C4PI 375 +#define IDX_C7II 376 +#define IDX_CH2CNI 377 +#define IDX_CH3C4HII 378 +#define IDX_GCH4I 379 +#define IDX_HCPI 380 +#define IDX_HClI 381 +#define IDX_HNCOI 382 +#define IDX_C3PI 383 +#define IDX_C9NI 384 +#define IDX_CH3C4HI 385 +#define IDX_CH3COOHI 386 +#define IDX_CH3OCH3I 387 +#define IDX_GC2HI 388 +#define IDX_GNH2I 389 +#define IDX_H2CSI 390 +#define IDX_PH2II 391 +#define IDX_POI 392 +#define IDX_S2I 393 +#define IDX_S2II 394 +#define IDX_SiCII 395 +#define IDX_C3SI 396 +#define IDX_C6H5II 397 +#define IDX_CH2NHI 398 +#define IDX_CH3OI 399 +#define IDX_GHCOI 400 +#define IDX_HC2PI 401 +#define IDX_HCSiI 402 +#define IDX_SiCH2I 403 +#define IDX_C10HII 404 +#define IDX_HCSiII 405 +#define IDX_OCSII 406 +#define IDX_SiC2I 407 +#define IDX_C2H6II 408 +#define IDX_C2OI 409 +#define IDX_C8HII 410 +#define IDX_CH2OHI 411 +#define IDX_SiNI 412 +#define IDX_C5H5II 413 +#define IDX_GNHI 414 +#define IDX_GSI 415 +#define IDX_HCSI 416 +#define IDX_NSI 417 +#define IDX_SiC2HII 418 +#define IDX_SiH2I 419 +#define IDX_C3OI 420 +#define IDX_C6HII 421 +#define IDX_C9H2I 422 +#define IDX_CH2CHCNI 423 +#define IDX_CH3CHOHII 424 +#define IDX_CH3CNHII 425 +#define IDX_CH3COII 426 +#define IDX_HC7NI 427 +#define IDX_C6II 428 +#define IDX_C6H6I 429 +#define IDX_C7NI 430 +#define IDX_HCOOHI 431 +#define IDX_SiH2II 432 +#define IDX_SiH3II 433 +#define IDX_C10H2I 434 +#define IDX_C4II 435 +#define IDX_CCPI 436 +#define IDX_CPI 437 +#define IDX_GC3I 438 +#define IDX_O2HI 439 +#define IDX_SO2I 440 +#define IDX_SiCI 441 +#define IDX_C2H5OHI 442 +#define IDX_HNOI 443 +#define IDX_N2OI 444 +#define IDX_SiH3I 445 +#define IDX_CH3OH2II 446 +#define IDX_C2NII 447 +#define IDX_C5II 448 +#define IDX_C6H3II 449 +#define IDX_C8H3II 450 +#define IDX_C9HII 451 +#define IDX_C9H3II 452 +#define IDX_CH2COI 453 +#define IDX_HNC3I 454 +#define IDX_OCNI 455 +#define IDX_SiCH2II 456 +#define IDX_SiHII 457 +#define IDX_CH3COCH3I 458 +#define IDX_HC3NII 459 +#define IDX_C8H2I 460 +#define IDX_CO2II 461 +#define IDX_GOHI 462 +#define IDX_HC5NI 463 +#define IDX_SiHI 464 +#define IDX_SiH4I 465 +#define IDX_C7HII 466 +#define IDX_C9H2II 467 +#define IDX_PHI 468 +#define IDX_C7H2I 469 +#define IDX_GCOI 470 +#define IDX_HCSII 471 +#define IDX_PHII 472 +#define IDX_C3H4II 473 +#define IDX_C8H2II 474 +#define IDX_GCH2I 475 +#define IDX_HCO2II 476 +#define IDX_C5H3II 477 +#define IDX_HC3NHII 478 +#define IDX_C5HII 479 +#define IDX_CH3CHOI 480 +#define IDX_CSII 481 +#define IDX_C3H5II 482 +#define IDX_C7H3II 483 +#define IDX_PII 484 +#define IDX_CH3CNI 485 +#define IDX_NCCNI 486 +#define IDX_C7H2II 487 +#define IDX_GC2I 488 +#define IDX_C3II 489 +#define IDX_H3SII 490 +#define IDX_O2HII 491 +#define IDX_C6H2II 492 +#define IDX_CH4II 493 +#define IDX_HNOII 494 +#define IDX_H2CCCI 495 +#define IDX_C6H2I 496 +#define IDX_GCNI 497 +#define IDX_C2H5II 498 +#define IDX_C5H2I 499 +#define IDX_C5H2II 500 +#define IDX_CH2CCH2I 501 +#define IDX_CNII 502 +#define IDX_C2H6I 503 +#define IDX_GNI 504 +#define IDX_C3H2I 505 +#define IDX_C2H5I 506 +#define IDX_GOI 507 +#define IDX_N2II 508 +#define IDX_C4SII 509 +#define IDX_HCNII 510 +#define IDX_CH3CHCH2I 511 +#define IDX_C2II 512 +#define IDX_C4HII 513 +#define IDX_CNCII 514 +#define IDX_HSII 515 +#define IDX_NHII 516 +#define IDX_O2M 517 +#define IDX_CHM 518 +#define IDX_H2II 519 +#define IDX_OCSI 520 +#define IDX_GCH3I 521 +#define IDX_NH2II 522 +#define IDX_PI 523 +#define IDX_SM 524 +#define IDX_SiSII 525 +#define IDX_C2HM 526 +#define IDX_C4HM 527 +#define IDX_COII 528 +#define IDX_CH3CCHI 529 +#define IDX_CH5II 530 +#define IDX_HC2SII 531 +#define IDX_OHM 532 +#define IDX_C10HM 533 +#define IDX_C3HM 534 +#define IDX_C4SI 535 +#define IDX_C6HM 536 +#define IDX_C8HM 537 +#define IDX_C7HM 538 +#define IDX_C9HM 539 +#define IDX_C10M 540 +#define IDX_C5HM 541 +#define IDX_C5NM 542 +#define IDX_HSI 543 +#define IDX_CM 544 +#define IDX_CSI 545 +#define IDX_OM 546 +#define IDX_C9M 547 +#define IDX_CH3OHI 548 +#define IDX_HM 549 +#define IDX_HC3NI 550 +#define IDX_SiSI 551 +#define IDX_C3HII 552 +#define IDX_C3H3II 553 +#define IDX_C8M 554 +#define IDX_C2M 555 +#define IDX_C2SI 556 +#define IDX_C3M 557 +#define IDX_C4M 558 +#define IDX_C6M 559 +#define IDX_H3COII 560 +#define IDX_C5M 561 +#define IDX_C7M 562 +#define IDX_SiOII 563 +#define IDX_C2NI 564 +#define IDX_GCHI 565 +#define IDX_SiOHII 566 +#define IDX_NH2I 567 +#define IDX_C4H3I 568 +#define IDX_C2HII 569 +#define IDX_C3H2II 570 +#define IDX_C5NI 571 +#define IDX_CH2II 572 +#define IDX_OHII 573 +#define IDX_H2OII 574 +#define IDX_C3NM 575 +#define IDX_GH2I 576 +#define IDX_C3NI 577 +#define IDX_CHII 578 +#define IDX_CO2I 579 +#define IDX_O2II 580 +#define IDX_C10HI 581 +#define IDX_C9HI 582 +#define IDX_SiOI 583 +#define IDX_FeII 584 +#define IDX_FeI 585 +#define IDX_MgII 586 +#define IDX_NaII 587 +#define IDX_MgI 588 +#define IDX_NaI 589 +#define IDX_C10I 590 +#define IDX_C8HI 591 +#define IDX_C7I 592 +#define IDX_C9I 593 +#define IDX_C8I 594 +#define IDX_GCI 595 +#define IDX_NHI 596 +#define IDX_C5I 597 +#define IDX_C6I 598 +#define IDX_CNM 599 +#define IDX_C4I 600 +#define IDX_SOI 601 +#define IDX_C7HI 602 +#define IDX_C2H4II 603 +#define IDX_C4H3II 604 +#define IDX_N2HII 605 +#define IDX_CH2CCHI 606 +#define IDX_SOII 607 +#define IDX_CH2CCHII 608 +#define IDX_C6HI 609 +#define IDX_C5HI 610 +#define IDX_H2SII 611 +#define IDX_NII 612 +#define IDX_C3HI 613 +#define IDX_H2COII 614 +#define IDX_C3I 615 +#define IDX_C4HI 616 +#define IDX_NOII 617 +#define IDX_OII 618 +#define IDX_C4H2I 619 +#define IDX_C4H2II 620 +#define IDX_HCNHII 621 +#define IDX_CH2I 622 +#define IDX_HNCI 623 +#define IDX_NH3II 624 +#define IDX_C2H4I 625 +#define IDX_C2H3I 626 +#define IDX_NH4II 627 +#define IDX_N2I 628 +#define IDX_O2I 629 +#define IDX_SiII 630 +#define IDX_H2SI 631 +#define IDX_SII 632 +#define IDX_SiI 633 +#define IDX_C2H3II 634 +#define IDX_NOI 635 +#define IDX_HCOI 636 +#define IDX_CH4I 637 +#define IDX_C2HI 638 +#define IDX_H2COI 639 +#define IDX_HCNI 640 +#define IDX_CHI 641 +#define IDX_SI 642 +#define IDX_C2I 643 +#define IDX_OHI 644 +#define IDX_NH3I 645 +#define IDX_C2H2II 646 +#define IDX_CH3II 647 +#define IDX_C2H2I 648 +#define IDX_CNI 649 +#define IDX_GHI 650 +#define IDX_CH3I 651 +#define IDX_NI 652 +#define IDX_H3OII 653 +#define IDX_OI 654 +#define IDX_HeII 655 +#define IDX_HeI 656 +#define IDX_CII 657 +#define IDX_H2OI 658 +#define IDX_HII 659 +#define IDX_CI 660 +#define IDX_HCOII 661 +#define IDX_H3II 662 +#define IDX_COI 663 +#define IDX_GRAINM 664 +#define IDX_GRAIN0I 665 +#define IDX_H2I 666 +#define IDX_eM 667 +#define IDX_HI 668 + +#if THERMAL +#define IDX_TGAS NSPECIES +#endif +#define IJth(A, i, j) SM_ELEMENT_D(A, i, j) + #endif \ No newline at end of file diff --git a/include/naunet_ode.h b/include/naunet_ode.h index f4010f5..5c48be1 100644 --- a/include/naunet_ode.h +++ b/include/naunet_ode.h @@ -6,9 +6,18 @@ #include // defs. of realtype, sunindextype #include "naunet_data.h" +#include "naunet_macros.h" /* */ __device__ int EvalRates(realtype *k, realtype *y, NaunetData *user_data); +#if NHEATPROCS +__device__ int EvalHeatingRates(realtype *kc, realtype *y, + NaunetData *user_data); +#endif +#if NCOOLPROCS +__device__ int EvalCoolingRates(realtype *kc, realtype *y, + NaunetData *user_data); +#endif /* */ int Fex(realtype t, N_Vector u, N_Vector udot, void *user_data); int Jac(realtype t, N_Vector u, N_Vector fu, SUNMatrix jmatrix, void *user_data, diff --git a/include/naunet_physics.h b/include/naunet_physics.h index c51a13b..5c77c07 100644 --- a/include/naunet_physics.h +++ b/include/naunet_physics.h @@ -1,21 +1,25 @@ #ifndef __NAUNET_PHYSICS_H__ #define __NAUNET_PHYSICS_H__ +// +// clang-format off /* */ +__device__ __host__ double GetElementAbund(double *y, int elemidx); __device__ __host__ double GetMantleDens(double *y); +__device__ __host__ double GetHNuclei(double *y); __device__ __host__ double GetMu(double *y); __device__ __host__ double GetGamma(double *y); __device__ __host__ double GetNumDens(double *y); -__device__ double GetShieldingFactor(int specidx, double h2coldens, - double spcoldens, double tgas, int method); +/* */ +__device__ double GetShieldingFactor(int specidx, double h2coldens, double spcoldens, double tgas, int method); __device__ double GetH2shielding(double coldens, int method); -__device__ double GetCOshielding(double tgas, double h2col, double coldens, - int method); -__device__ double GetN2shielding(double tgas, double h2col, double coldens, - int method); +__device__ double GetCOshielding(double tgas, double h2col, double coldens, int method); +__device__ double GetN2shielding(double tgas, double h2col, double coldens, int method); __device__ double GetH2shieldingInt(double coldens); +__device__ double GetH2shieldingFGK(double coldens); __device__ double GetCOshieldingInt(double tgas, double h2col, double coldens); +__device__ double GetCOshieldingInt1(double h2col, double coldens); __device__ double GetN2shieldingInt(double tgas, double h2col, double coldens); -/* */ - +__device__ double GetGrainScattering(double av, double wavelength); +__device__ double GetCharactWavelength(double h2col, double cocol); #endif \ No newline at end of file diff --git a/include/naunet_renorm.h b/include/naunet_renorm.h new file mode 100644 index 0000000..d8adaf0 --- /dev/null +++ b/include/naunet_renorm.h @@ -0,0 +1,10 @@ +#ifndef __NAUNET_RENORM_H__ +#define __NAUNET_RENORM_H__ + +#include + +// clang-format off +__host__ int InitRenorm(realtype *ab, SUNMatrix A); +__host__ int RenormAbundance(realtype *rptr, realtype *ab); + +#endif \ No newline at end of file diff --git a/include/naunet_timer.h b/include/naunet_timer.h index 1b815b6..bbe3e75 100644 --- a/include/naunet_timer.h +++ b/include/naunet_timer.h @@ -1,6 +1,7 @@ #ifndef __NAUNET_TIMER_H__ #define __NAUNET_TIMER_H__ +// #include class Timer { @@ -30,5 +31,4 @@ class Timer { return m_duration.count(); }; }; - -#endif +#endif \ No newline at end of file diff --git a/include/naunet_utilities.h b/include/naunet_utilities.h new file mode 100644 index 0000000..144d549 --- /dev/null +++ b/include/naunet_utilities.h @@ -0,0 +1,20 @@ +#ifndef __NAUNET_UTILITIES_H__ +#define __NAUNET_UTILITIES_H__ + +// +namespace naunet_util { + +// From Numerical Recipes in C, 2nd ed +double *vector(long nl, long nh); +void free_vector(double *v, long nl, long nh); +double **matrix(long nrl, long nrh, long ncl, long nch); +void free_matrix(double **m, long nrl, long nrh, long ncl, long nch); +void spline(double x[], double y[], int n, double yp1, double ypn, double y2[]); +void splint(double xa[], double ya[], double y2a[], int n, double x, double *y); +void splie2(double x1a[], double x2a[], double *ya[], int m, int n, + double **y2a); +void splin2(double x1a[], double x2a[], double *ya[], double *y2a[], int m, + int n, double x1, double x2, double *y); + +} // namespace naunet_util +#endif \ No newline at end of file diff --git a/naunet_config.toml b/naunet_config.toml index 796ee7b..85fd765 100644 --- a/naunet_config.toml +++ b/naunet_config.toml @@ -1,26 +1,30 @@ # Naunet config document [general] -creation_time = "13/12/2021 11:23:48" +creation_time = "06/03/2024 15:23:48" name = "naunet_cuda_ism" -description = "example" +description = "Example: chemical network used in Walsh et al. 2015" +loads = [] [chemistry] -elements = ["e", "H", "He", "C", "N", "O", "F", "Na", "Mg", "Al", "Si", "P", "S", "Cl", "Ar", "Ca", "Fe", "GRAIN"] +[chemistry.symbol] +grain = "GRAIN" +surface = "G" +bulk = "@" + +[chemistry.element] +elements = ["e", "H", "He", "C", "N", "O", "F", "Na", "Mg", "Al", "Si", "P", "S", "Cl", "Ar", "Ca", "Fe"] pseudo_elements = ["CRP", "XRAY", "PHOTON", "CRPHOT"] -species = ["C", "C+", "C-", "C10", "C10+", "C10-", "C10H", "C10H+", "C10H-", "C10H2", "C10H2+", "C10H3+", "C11", "C11+", "C2", "C2+", "C2-", "C2H", "C2H+", "C2H-", "C2H2", "C2H2+", "C2H3", "C2H3+", "C2H4", "C2H4+", "C2H4CN", "C2H5", "C2H5+", "C2H5CN", "C2H5CNH+", "C2H5OH", "C2H5OH+", "C2H5OH2+", "C2H6", "C2H6+", "C2H7+", "C2N", "C2N+", "C2N2+", "C2NH+", "C2O", "C2O+", "C2S", "C2S+", "C3", "C3+", "C3-", "C3H", "C3H+", "C3H-", "C3H2", "C3H2+", "C3H2O+", "C3H3+", "C3H4+", "C3H5+", "C3H6+", "C3H7+", "C3N", "C3N+", "C3N-", "C3O", "C3O+", "C3P", "C3S", "C3S+", "C4", "C4+", "C4-", "C4H", "C4H+", "C4H-", "C4H2", "C4H2+", "C4H3", "C4H3+", "C4H4+", "C4H5+", "C4H6", "C4H7+", "C4N", "C4N+", "C4P", "C4P+", "C4S", "C4S+", "C5", "C5+", "C5-", "C5H", "C5H+", "C5H-", "C5H2", "C5H2+", "C5H3+", "C5H5+", "C5N", "C5N+", "C5N-", "C6", "C6+", "C6-", "C6H", "C6H+", "C6H-", "C6H2", "C6H2+", "C6H3+", "C6H4+", "C6H5+", "C6H6", "C6H6+", "C6H7+", "C7", "C7+", "C7-", "C7H", "C7H+", "C7H-", "C7H2", "C7H2+", "C7H3+", "C7H4+", "C7H5+", "C7N", "C7N+", "C8", "C8+", "C8-", "C8H", "C8H+", "C8H-", "C8H2", "C8H2+", "C8H3+", "C8H4+", "C8H5+", "C9", "C9+", "C9-", "C9H", "C9H+", "C9H-", "C9H2", "C9H2+", "C9H3+", "C9H4+", "C9H5+", "C9N", "C9N+", "CCP", "CCP+", "CCl", "CCl+", "CF+", "CH", "CH+", "CH-", "CH2", "CH2+", "CH2CCH", "CH2CCH+", "CH2CCH2", "CH2CHCCH", "CH2CHCN", "CH2CHCN+", "CH2CHCNH+", "CH2CN", "CH2CN+", "CH2CO", "CH2CO+", "CH2NH", "CH2NH2+", "CH2OH", "CH2OHCH2O+", "CH2OHCHO", "CH2OHCHO+", "CH2OHCO", "CH2OHCO+", "CH2PH", "CH3", "CH3+", "CH3C3N", "CH3C3N+", "CH3C3NH+", "CH3C4H", "CH3C4H+", "CH3C5N", "CH3C5NH+", "CH3C6H", "CH3C7N", "CH3C7NH+", "CH3CCH", "CH3CHCH2", "CH3CHO", "CH3CHO+", "CH3CHOH+", "CH3CN", "CH3CN+", "CH3CNH+", "CH3CO", "CH3CO+", "CH3COCH3", "CH3COCH3+", "CH3COCH4+", "CH3COOH", "CH3COOH+", "CH3COOH2+", "CH3CS+", "CH3NH+", "CH3O", "CH3OCH3", "CH3OCH3+", "CH3OCH4+", "CH3OH", "CH3OH+", "CH3OH2+", "CH4", "CH4+", "CH5+", "CN", "CN+", "CN-", "CNC+", "CNO", "CO", "CO+", "CO2", "CO2+", "COOCH3", "COOCH3+", "COOH", "CP", "CP+", "CS", "CS+", "Cl", "Cl+", "ClO", "ClO+", "F", "F+", "Fe", "Fe+", "GC", "GC10", "GC10H", "GC10H2", "GC11", "GC2", "GC2H", "GC2H2", "GC2H3", "GC2H4", "GC2H4CN", "GC2H5", "GC2H5CN", "GC2H5OH", "GC2H6", "GC2N", "GC2O", "GC2S", "GC3", "GC3H", "GC3H2", "GC3N", "GC3O", "GC3P", "GC3S", "GC4", "GC4H", "GC4H2", "GC4H3", "GC4H6", "GC4N", "GC4P", "GC4S", "GC5", "GC5H", "GC5H2", "GC5N", "GC6", "GC6H", "GC6H2", "GC6H6", "GC7", "GC7H", "GC7H2", "GC7N", "GC8", "GC8H", "GC8H2", "GC9", "GC9H", "GC9H2", "GC9N", "GCCP", "GCCl", "GCH", "GCH2", "GCH2CCH", "GCH2CCH2", "GCH2CHCCH", "GCH2CHCN", "GCH2CN", "GCH2CO", "GCH2NH", "GCH2OH", "GCH2OHCHO", "GCH2OHCO", "GCH2PH", "GCH3", "GCH3C3N", "GCH3C4H", "GCH3C5N", "GCH3C6H", "GCH3C7N", "GCH3CCH", "GCH3CHCH2", "GCH3CHO", "GCH3CN", "GCH3CO", "GCH3COCH3", "GCH3COOH", "GCH3O", "GCH3OCH3", "GCH3OH", "GCH4", "GCN", "GCNO", "GCO", "GCO2", "GCOOCH3", "GCOOH", "GCP", "GCS", "GCl", "GClO", "GF", "GFe", "GH", "GH2", "GH2CCC", "GH2CN", "GH2CO", "GH2CS", "GH2O", "GH2O2", "GH2S", "GH2S2", "GH2SiO", "GHC2O", "GHC2P", "GHC3N", "GHC5N", "GHC7N", "GHC9N", "GHCCN", "GHCN", "GHCNO", "GHCO", "GHCOOCH3", "GHCOOH", "GHCP", "GHCS", "GHCSi", "GHCl", "GHF", "GHNC", "GHNC3", "GHNCO", "GHNO", "GHNSi", "GHOCN", "GHONC", "GHPO", "GHS", "GHS2", "GHe", "GMg", "GN", "GN2", "GN2O", "GNCCN", "GNH", "GNH2", "GNH2CN", "GNH3", "GNO", "GNO2", "GNS", "GNa", "GO", "GO2", "GO2H", "GOCN", "GOCS", "GOH", "GP", "GPH", "GPH2", "GPN", "GPO", "GRAIN-", "GRAIN0", "GS", "GS2", "GSO", "GSO2", "GSi", "GSiC", "GSiC2", "GSiC2H", "GSiC2H2", "GSiC3", "GSiC3H", "GSiC4", "GSiCH2", "GSiCH3", "GSiH", "GSiH2", "GSiH3", "GSiH4", "GSiN", "GSiNC", "GSiO", "GSiO2", "GSiS", "H", "H+", "H-", "H2", "H2+", "H2C4N+", "H2C7N+", "H2C9N+", "H2CCC", "H2CCl+", "H2CN", "H2CNO+", "H2CO", "H2CO+", "H2CS", "H2CS+", "H2Cl+", "H2F+", "H2NC+", "H2NCO+", "H2NO+", "H2O", "H2O+", "H2O2", "H2OCN+", "H2PO+", "H2S", "H2S+", "H2S2", "H2S2+", "H2SiO", "H2SiO+", "H3+", "H3C3O+", "H3C5N+", "H3C7N+", "H3C9N+", "H3CO+", "H3CS+", "H3O+", "H3S+", "H3S2+", "H3SiO+", "H5C2O2+", "HC2O", "HC2O+", "HC2P", "HC2P+", "HC2S+", "HC3N", "HC3N+", "HC3NH+", "HC3O+", "HC3S+", "HC4N+", "HC4S+", "HC5N", "HC5N+", "HC5NH+", "HC7N", "HC7N+", "HC9N", "HC9N+", "HCCN", "HCN", "HCN+", "HCNH+", "HCNO", "HCNO+", "HCNOH+", "HCO", "HCO+", "HCO2+", "HCOOCH3", "HCOOCH3+", "HCOOH", "HCOOH+", "HCOOH2+", "HCP", "HCP+", "HCS", "HCS+", "HCSi", "HCSi+", "HCl", "HCl+", "HF", "HF+", "HN2O+", "HNC", "HNC3", "HNCO", "HNCO+", "HNCOH+", "HNO", "HNO+", "HNS+", "HNSi", "HNSi+", "HOC+", "HOCN", "HOCN+", "HOCS+", "HONC", "HONC+", "HPN+", "HPO", "HPO+", "HS", "HS+", "HS2", "HS2+", "HSO+", "HSO2+", "HSiO2+", "HSiS+", "He", "He+", "HeH+", "Mg", "Mg+", "N", "N+", "N2", "N2+", "N2H+", "N2O", "N2O+", "NCCN", "NCCNCH3+", "NCCNH+", "NH", "NH+", "NH2", "NH2+", "NH2CN", "NH2CNH+", "NH3", "NH3+", "NH4+", "NO", "NO+", "NO2", "NO2+", "NS", "NS+", "Na", "Na+", "O", "O+", "O-", "O2", "O2+", "O2-", "O2H", "O2H+", "OCN", "OCN+", "OCS", "OCS+", "OH", "OH+", "OH-", "P", "P+", "PC2H2+", "PC2H3+", "PC2H4+", "PC3H+", "PC4H+", "PCH2+", "PCH3+", "PCH4+", "PH", "PH+", "PH2", "PH2+", "PH3+", "PN", "PN+", "PNH2+", "PNH3+", "PO", "PO+", "S", "S+", "S-", "S2", "S2+", "SO", "SO+", "SO2", "SO2+", "Si", "Si+", "SiC", "SiC+", "SiC2", "SiC2+", "SiC2H", "SiC2H+", "SiC2H2", "SiC2H2+", "SiC2H3+", "SiC3", "SiC3+", "SiC3H", "SiC3H+", "SiC3H2+", "SiC4", "SiC4+", "SiC4H+", "SiCH2", "SiCH2+", "SiCH3", "SiCH3+", "SiCH4+", "SiF+", "SiH", "SiH+", "SiH2", "SiH2+", "SiH3", "SiH3+", "SiH4", "SiH4+", "SiH5+", "SiN", "SiN+", "SiNC", "SiNC+", "SiNCH+", "SiNH2+", "SiO", "SiO+", "SiO2", "SiOH+", "SiS", "SiS+", "e-"] -extra_species = [] -network = "rate12_complex.rates" -database = "leeds" -heating = [] -cooling = [] -rate_modifier = ["k[8273] = 0.0"] -ode_modifier = ["double garea = (4*pi*rG*rG) * (y[IDX_GRAIN0I]+y[IDX_GRAINM])", "double stick1 = (1.0 / (1.0 + 4.2e-2*sqrt(Tgas+Tdust) + 2.3e-3*Tgas - 1.3e-7*Tgas*Tgas))", "double stick2 = exp(-1741.0/Tgas) / (1.0 + 5e-2*sqrt(Tgas+Tdust) + 1e-14*pow(Tgas, 4.0))", "double stick = stick1 + stick2", "double hloss = stick * garea/4.0 * sqrt(8.0*kerg*Tgas/(pi*amu))", "ydot[IDX_H2I] += 0.5*hloss*y[IDX_HI]", "ydot[IDX_HI] -= hloss*y[IDX_HI]"] -[chemistry.dust] -type = "uniform" +[chemistry.element.replacement] + +[chemistry.species] +# The allowed species will limit the allowed reactions in the network +allowed = ["C", "C+", "C-", "C10", "C10+", "C10-", "C10H", "C10H+", "C10H-", "C10H2", "C10H2+", "C10H3+", "C11", "C11+", "C2", "C2+", "C2-", "C2H", "C2H+", "C2H-", "C2H2", "C2H2+", "C2H3", "C2H3+", "C2H4", "C2H4+", "C2H4CN", "C2H5", "C2H5+", "C2H5CN", "C2H5CNH+", "C2H5OH", "C2H5OH+", "C2H5OH2+", "C2H6", "C2H6+", "C2H7+", "C2N", "C2N+", "C2N2+", "C2NH+", "C2O", "C2O+", "C2S", "C2S+", "C3", "C3+", "C3-", "C3H", "C3H+", "C3H-", "C3H2", "C3H2+", "C3H2O+", "C3H3+", "C3H4+", "C3H5+", "C3H6+", "C3H7+", "C3N", "C3N+", "C3N-", "C3O", "C3O+", "C3P", "C3S", "C3S+", "C4", "C4+", "C4-", "C4H", "C4H+", "C4H-", "C4H2", "C4H2+", "C4H3", "C4H3+", "C4H4+", "C4H5+", "C4H6", "C4H7+", "C4N", "C4N+", "C4P", "C4P+", "C4S", "C4S+", "C5", "C5+", "C5-", "C5H", "C5H+", "C5H-", "C5H2", "C5H2+", "C5H3+", "C5H5+", "C5N", "C5N+", "C5N-", "C6", "C6+", "C6-", "C6H", "C6H+", "C6H-", "C6H2", "C6H2+", "C6H3+", "C6H4+", "C6H5+", "C6H6", "C6H6+", "C6H7+", "C7", "C7+", "C7-", "C7H", "C7H+", "C7H-", "C7H2", "C7H2+", "C7H3+", "C7H4+", "C7H5+", "C7N", "C7N+", "C8", "C8+", "C8-", "C8H", "C8H+", "C8H-", "C8H2", "C8H2+", "C8H3+", "C8H4+", "C8H5+", "C9", "C9+", "C9-", "C9H", "C9H+", "C9H-", "C9H2", "C9H2+", "C9H3+", "C9H4+", "C9H5+", "C9N", "C9N+", "CCP", "CCP+", "CCl", "CCl+", "CF+", "CH", "CH+", "CH-", "CH2", "CH2+", "CH2CCH", "CH2CCH+", "CH2CCH2", "CH2CHCCH", "CH2CHCN", "CH2CHCN+", "CH2CHCNH+", "CH2CN", "CH2CN+", "CH2CO", "CH2CO+", "CH2NH", "CH2NH2+", "CH2OH", "CH2OHCH2O+", "CH2OHCHO", "CH2OHCHO+", "CH2OHCO", "CH2OHCO+", "CH2PH", "CH3", "CH3+", "CH3C3N", "CH3C3N+", "CH3C3NH+", "CH3C4H", "CH3C4H+", "CH3C5N", "CH3C5NH+", "CH3C6H", "CH3C7N", "CH3C7NH+", "CH3CCH", "CH3CHCH2", "CH3CHO", "CH3CHO+", "CH3CHOH+", "CH3CN", "CH3CN+", "CH3CNH+", "CH3CO", "CH3CO+", "CH3COCH3", "CH3COCH3+", "CH3COCH4+", "CH3COOH", "CH3COOH+", "CH3COOH2+", "CH3CS+", "CH3NH+", "CH3O", "CH3OCH3", "CH3OCH3+", "CH3OCH4+", "CH3OH", "CH3OH+", "CH3OH2+", "CH4", "CH4+", "CH5+", "CN", "CN+", "CN-", "CNC+", "CNO", "CO", "CO+", "CO2", "CO2+", "COOCH3", "COOCH3+", "COOH", "CP", "CP+", "CS", "CS+", "Cl", "Cl+", "ClO", "ClO+", "F", "F+", "Fe", "Fe+", "GC", "GC10", "GC10H", "GC10H2", "GC11", "GC2", "GC2H", "GC2H2", "GC2H3", "GC2H4", "GC2H4CN", "GC2H5", "GC2H5CN", "GC2H5OH", "GC2H6", "GC2N", "GC2O", "GC2S", "GC3", "GC3H", "GC3H2", "GC3N", "GC3O", "GC3P", "GC3S", "GC4", "GC4H", "GC4H2", "GC4H3", "GC4H6", "GC4N", "GC4P", "GC4S", "GC5", "GC5H", "GC5H2", "GC5N", "GC6", "GC6H", "GC6H2", "GC6H6", "GC7", "GC7H", "GC7H2", "GC7N", "GC8", "GC8H", "GC8H2", "GC9", "GC9H", "GC9H2", "GC9N", "GCCP", "GCCl", "GCH", "GCH2", "GCH2CCH", "GCH2CCH2", "GCH2CHCCH", "GCH2CHCN", "GCH2CN", "GCH2CO", "GCH2NH", "GCH2OH", "GCH2OHCHO", "GCH2OHCO", "GCH2PH", "GCH3", "GCH3C3N", "GCH3C4H", "GCH3C5N", "GCH3C6H", "GCH3C7N", "GCH3CCH", "GCH3CHCH2", "GCH3CHO", "GCH3CN", "GCH3CO", "GCH3COCH3", "GCH3COOH", "GCH3O", "GCH3OCH3", "GCH3OH", "GCH4", "GCN", "GCNO", "GCO", "GCO2", "GCOOCH3", "GCOOH", "GCP", "GCS", "GCl", "GClO", "GF", "GFe", "GH", "GH2", "GH2CCC", "GH2CN", "GH2CO", "GH2CS", "GH2O", "GH2O2", "GH2S", "GH2S2", "GH2SiO", "GHC2O", "GHC2P", "GHC3N", "GHC5N", "GHC7N", "GHC9N", "GHCCN", "GHCN", "GHCNO", "GHCO", "GHCOOCH3", "GHCOOH", "GHCP", "GHCS", "GHCSi", "GHCl", "GHF", "GHNC", "GHNC3", "GHNCO", "GHNO", "GHNSi", "GHOCN", "GHONC", "GHPO", "GHS", "GHS2", "GHe", "GMg", "GN", "GN2", "GN2O", "GNCCN", "GNH", "GNH2", "GNH2CN", "GNH3", "GNO", "GNO2", "GNS", "GNa", "GO", "GO2", "GO2H", "GOCN", "GOCS", "GOH", "GP", "GPH", "GPH2", "GPN", "GPO", "GRAIN-", "GRAIN0", "GS", "GS2", "GSO", "GSO2", "GSi", "GSiC", "GSiC2", "GSiC2H", "GSiC2H2", "GSiC3", "GSiC3H", "GSiC4", "GSiCH2", "GSiCH3", "GSiH", "GSiH2", "GSiH3", "GSiH4", "GSiN", "GSiNC", "GSiO", "GSiO2", "GSiS", "H", "H+", "H-", "H2", "H2+", "H2C4N+", "H2C7N+", "H2C9N+", "H2CCC", "H2CCl+", "H2CN", "H2CNO+", "H2CO", "H2CO+", "H2CS", "H2CS+", "H2Cl+", "H2F+", "H2NC+", "H2NCO+", "H2NO+", "H2O", "H2O+", "H2O2", "H2OCN+", "H2PO+", "H2S", "H2S+", "H2S2", "H2S2+", "H2SiO", "H2SiO+", "H3+", "H3C3O+", "H3C5N+", "H3C7N+", "H3C9N+", "H3CO+", "H3CS+", "H3O+", "H3S+", "H3S2+", "H3SiO+", "H5C2O2+", "HC2O", "HC2O+", "HC2P", "HC2P+", "HC2S+", "HC3N", "HC3N+", "HC3NH+", "HC3O+", "HC3S+", "HC4N+", "HC4S+", "HC5N", "HC5N+", "HC5NH+", "HC7N", "HC7N+", "HC9N", "HC9N+", "HCCN", "HCN", "HCN+", "HCNH+", "HCNO", "HCNO+", "HCNOH+", "HCO", "HCO+", "HCO2+", "HCOOCH3", "HCOOCH3+", "HCOOH", "HCOOH+", "HCOOH2+", "HCP", "HCP+", "HCS", "HCS+", "HCSi", "HCSi+", "HCl", "HCl+", "HF", "HF+", "HN2O+", "HNC", "HNC3", "HNCO", "HNCO+", "HNCOH+", "HNO", "HNO+", "HNS+", "HNSi", "HNSi+", "HOC+", "HOCN", "HOCN+", "HOCS+", "HONC", "HONC+", "HPN+", "HPO", "HPO+", "HS", "HS+", "HS2", "HS2+", "HSO+", "HSO2+", "HSiO2+", "HSiS+", "He", "He+", "HeH+", "Mg", "Mg+", "N", "N+", "N2", "N2+", "N2H+", "N2O", "N2O+", "NCCN", "NCCNCH3+", "NCCNH+", "NH", "NH+", "NH2", "NH2+", "NH2CN", "NH2CNH+", "NH3", "NH3+", "NH4+", "NO", "NO+", "NO2", "NO2+", "NS", "NS+", "Na", "Na+", "O", "O+", "O-", "O2", "O2+", "O2-", "O2H", "O2H+", "OCN", "OCN+", "OCS", "OCS+", "OH", "OH+", "OH-", "P", "P+", "PC2H2+", "PC2H3+", "PC2H4+", "PC3H+", "PC4H+", "PCH2+", "PCH3+", "PCH4+", "PH", "PH+", "PH2", "PH2+", "PH3+", "PN", "PN+", "PNH2+", "PNH3+", "PO", "PO+", "S", "S+", "S-", "S2", "S2+", "SO", "SO+", "SO2", "SO2+", "Si", "Si+", "SiC", "SiC+", "SiC2", "SiC2+", "SiC2H", "SiC2H+", "SiC2H2", "SiC2H2+", "SiC2H3+", "SiC3", "SiC3+", "SiC3H", "SiC3H+", "SiC3H2+", "SiC4", "SiC4+", "SiC4H+", "SiCH2", "SiCH2+", "SiCH3", "SiCH3+", "SiCH4+", "SiF+", "SiH", "SiH+", "SiH2", "SiH2+", "SiH3", "SiH3+", "SiH4", "SiH4+", "SiH5+", "SiN", "SiN+", "SiNC", "SiNC+", "SiNCH+", "SiNH2+", "SiO", "SiO+", "SiO2", "SiOH+", "SiS", "SiS+", "e-"] +# If some species is required for heating/cooling, but does not exist in the network. +required = [] -[chemistry.binding_energy] +[chemistry.species.binding_energy] GCH = 873.0 GCH2 = 945.0 GNH = 1577.0 @@ -70,24 +74,58 @@ GC10H = 8537.0 GC10H2 = 8987.0 GC11 = 8800.0 -[chemistry.photon_yield] +[chemistry.species.photon_yield] GH2O = 0.0013 GN2 = 0.00018 GCO = 0.0027 GCH3OH = 0.0021 GCO2 = 0.0023 +[chemistry.grain] +model = "hh93i" + +[chemistry.network] +files = ["rate12_complex.rates"] +formats = ["leeds"] + +[chemistry.thermal] +heating = [] +cooling = [] + [chemistry.shielding] H2 = "L96Table" CO = "V09Table" N2 = "L13Table" +[chemistry.rate_modifier] +8274 = "0.0" + +[chemistry.ode_modifier] +[chemistry.ode_modifier.H2] +factors = ["0.5 * hloss"] +reactants = [["H"]] + +[chemistry.ode_modifier.H] +factors = ["-hloss"] +reactants = [["H"]] + [ODEsolver] solver = "cvode" device = "gpu" method = "cusparse" [summary] +num_of_elements = 14 num_of_species = 669 +num_of_grains = 1 +num_of_gas_species = 487 +num_of_ice_species = 182 +num_of_grain_species = 2 num_of_reactions = 8764 -list_of_species = ["C", "C+", "C-", "C10", "C10+", "C10-", "C10H", "C10H+", "C10H-", "C10H2", "C10H2+", "C10H3+", "C11", "C11+", "C2", "C2+", "C2-", "C2H", "C2H+", "C2H-", "C2H2", "C2H2+", "C2H3", "C2H3+", "C2H4", "C2H4+", "C2H4CN", "C2H5", "C2H5+", "C2H5CN", "C2H5CNH+", "C2H5OH", "C2H5OH+", "C2H5OH2+", "C2H6", "C2H6+", "C2H7+", "C2N", "C2N+", "C2N2+", "C2NH+", "C2O", "C2O+", "C2S", "C2S+", "C3", "C3+", "C3-", "C3H", "C3H+", "C3H-", "C3H2", "C3H2+", "C3H2O+", "C3H3+", "C3H4+", "C3H5+", "C3H6+", "C3H7+", "C3N", "C3N+", "C3N-", "C3O", "C3O+", "C3P", "C3S", "C3S+", "C4", "C4+", "C4-", "C4H", "C4H+", "C4H-", "C4H2", "C4H2+", "C4H3", "C4H3+", "C4H4+", "C4H5+", "C4H6", "C4H7+", "C4N", "C4N+", "C4P", "C4P+", "C4S", "C4S+", "C5", "C5+", "C5-", "C5H", "C5H+", "C5H-", "C5H2", "C5H2+", "C5H3+", "C5H5+", "C5N", "C5N+", "C5N-", "C6", "C6+", "C6-", "C6H", "C6H+", "C6H-", "C6H2", "C6H2+", "C6H3+", "C6H4+", "C6H5+", "C6H6", "C6H6+", "C6H7+", "C7", "C7+", "C7-", "C7H", "C7H+", "C7H-", "C7H2", "C7H2+", "C7H3+", "C7H4+", "C7H5+", "C7N", "C7N+", "C8", "C8+", "C8-", "C8H", "C8H+", "C8H-", "C8H2", "C8H2+", "C8H3+", "C8H4+", "C8H5+", "C9", "C9+", "C9-", "C9H", "C9H+", "C9H-", "C9H2", "C9H2+", "C9H3+", "C9H4+", "C9H5+", "C9N", "C9N+", "CCP", "CCP+", "CCl", "CCl+", "CF+", "CH", "CH+", "CH-", "CH2", "CH2+", "CH2CCH", "CH2CCH+", "CH2CCH2", "CH2CHCCH", "CH2CHCN", "CH2CHCN+", "CH2CHCNH+", "CH2CN", "CH2CN+", "CH2CO", "CH2CO+", "CH2NH", "CH2NH2+", "CH2OH", "CH2OHCH2O+", "CH2OHCHO", "CH2OHCHO+", "CH2OHCO", "CH2OHCO+", "CH2PH", "CH3", "CH3+", "CH3C3N", "CH3C3N+", "CH3C3NH+", "CH3C4H", "CH3C4H+", "CH3C5N", "CH3C5NH+", "CH3C6H", "CH3C7N", "CH3C7NH+", "CH3CCH", "CH3CHCH2", "CH3CHO", "CH3CHO+", "CH3CHOH+", "CH3CN", "CH3CN+", "CH3CNH+", "CH3CO", "CH3CO+", "CH3COCH3", "CH3COCH3+", "CH3COCH4+", "CH3COOH", "CH3COOH+", "CH3COOH2+", "CH3CS+", "CH3NH+", "CH3O", "CH3OCH3", "CH3OCH3+", "CH3OCH4+", "CH3OH", "CH3OH+", "CH3OH2+", "CH4", "CH4+", "CH5+", "CN", "CN+", "CN-", "CNC+", "CNO", "CO", "CO+", "CO2", "CO2+", "COOCH3", "COOCH3+", "COOH", "CP", "CP+", "CS", "CS+", "Cl", "Cl+", "ClO", "ClO+", "F", "F+", "Fe", "Fe+", "GC", "GC10", "GC10H", "GC10H2", "GC11", "GC2", "GC2H", "GC2H2", "GC2H3", "GC2H4", "GC2H4CN", "GC2H5", "GC2H5CN", "GC2H5OH", "GC2H6", "GC2N", "GC2O", "GC2S", "GC3", "GC3H", "GC3H2", "GC3N", "GC3O", "GC3P", "GC3S", "GC4", "GC4H", "GC4H2", "GC4H3", "GC4H6", "GC4N", "GC4P", "GC4S", "GC5", "GC5H", "GC5H2", "GC5N", "GC6", "GC6H", "GC6H2", "GC6H6", "GC7", "GC7H", "GC7H2", "GC7N", "GC8", "GC8H", "GC8H2", "GC9", "GC9H", "GC9H2", "GC9N", "GCCP", "GCCl", "GCH", "GCH2", "GCH2CCH", "GCH2CCH2", "GCH2CHCCH", "GCH2CHCN", "GCH2CN", "GCH2CO", "GCH2NH", "GCH2OH", "GCH2OHCHO", "GCH2OHCO", "GCH2PH", "GCH3", "GCH3C3N", "GCH3C4H", "GCH3C5N", "GCH3C6H", "GCH3C7N", "GCH3CCH", "GCH3CHCH2", "GCH3CHO", "GCH3CN", "GCH3CO", "GCH3COCH3", "GCH3COOH", "GCH3O", "GCH3OCH3", "GCH3OH", "GCH4", "GCN", "GCNO", "GCO", "GCO2", "GCOOCH3", "GCOOH", "GCP", "GCS", "GCl", "GClO", "GF", "GFe", "GH", "GH2", "GH2CCC", "GH2CN", "GH2CO", "GH2CS", "GH2O", "GH2O2", "GH2S", "GH2S2", "GH2SiO", "GHC2O", "GHC2P", "GHC3N", "GHC5N", "GHC7N", "GHC9N", "GHCCN", "GHCN", "GHCNO", "GHCO", "GHCOOCH3", "GHCOOH", "GHCP", "GHCS", "GHCSi", "GHCl", "GHF", "GHNC", "GHNC3", "GHNCO", "GHNO", "GHNSi", "GHOCN", "GHONC", "GHPO", "GHS", "GHS2", "GHe", "GMg", "GN", "GN2", "GN2O", "GNCCN", "GNH", "GNH2", "GNH2CN", "GNH3", "GNO", "GNO2", "GNS", "GNa", "GO", "GO2", "GO2H", "GOCN", "GOCS", "GOH", "GP", "GPH", "GPH2", "GPN", "GPO", "GRAIN-", "GRAIN0", "GS", "GS2", "GSO", "GSO2", "GSi", "GSiC", "GSiC2", "GSiC2H", "GSiC2H2", "GSiC3", "GSiC3H", "GSiC4", "GSiCH2", "GSiCH3", "GSiH", "GSiH2", "GSiH3", "GSiH4", "GSiN", "GSiNC", "GSiO", "GSiO2", "GSiS", "H", "H+", "H-", "H2", "H2+", "H2C4N+", "H2C7N+", "H2C9N+", "H2CCC", "H2CCl+", "H2CN", "H2CNO+", "H2CO", "H2CO+", "H2CS", "H2CS+", "H2Cl+", "H2F+", "H2NC+", "H2NCO+", "H2NO+", "H2O", "H2O+", "H2O2", "H2OCN+", "H2PO+", "H2S", "H2S+", "H2S2", "H2S2+", "H2SiO", "H2SiO+", "H3+", "H3C3O+", "H3C5N+", "H3C7N+", "H3C9N+", "H3CO+", "H3CS+", "H3O+", "H3S+", "H3S2+", "H3SiO+", "H5C2O2+", "HC2O", "HC2O+", "HC2P", "HC2P+", "HC2S+", "HC3N", "HC3N+", "HC3NH+", "HC3O+", "HC3S+", "HC4N+", "HC4S+", "HC5N", "HC5N+", "HC5NH+", "HC7N", "HC7N+", "HC9N", "HC9N+", "HCCN", "HCN", "HCN+", "HCNH+", "HCNO", "HCNO+", "HCNOH+", "HCO", "HCO+", "HCO2+", "HCOOCH3", "HCOOCH3+", "HCOOH", "HCOOH+", "HCOOH2+", "HCP", "HCP+", "HCS", "HCS+", "HCSi", "HCSi+", "HCl", "HCl+", "HF", "HF+", "HN2O+", "HNC", "HNC3", "HNCO", "HNCO+", "HNCOH+", "HNO", "HNO+", "HNS+", "HNSi", "HNSi+", "HOC+", "HOCN", "HOCN+", "HOCS+", "HONC", "HONC+", "HPN+", "HPO", "HPO+", "HS", "HS+", "HS2", "HS2+", "HSO+", "HSO2+", "HSiO2+", "HSiS+", "He", "He+", "HeH+", "Mg", "Mg+", "N", "N+", "N2", "N2+", "N2H+", "N2O", "N2O+", "NCCN", "NCCNCH3+", "NCCNH+", "NH", "NH+", "NH2", "NH2+", "NH2CN", "NH2CNH+", "NH3", "NH3+", "NH4+", "NO", "NO+", "NO2", "NO2+", "NS", "NS+", "Na", "Na+", "O", "O+", "O-", "O2", "O2+", "O2-", "O2H", "O2H+", "OCN", "OCN+", "OCS", "OCS+", "OH", "OH+", "OH-", "P", "P+", "PC2H2+", "PC2H3+", "PC2H4+", "PC3H+", "PC4H+", "PCH2+", "PCH3+", "PCH4+", "PH", "PH+", "PH2", "PH2+", "PH3+", "PN", "PN+", "PNH2+", "PNH3+", "PO", "PO+", "S", "S+", "S-", "S2", "S2+", "SO", "SO+", "SO2", "SO2+", "Si", "Si+", "SiC", "SiC+", "SiC2", "SiC2+", "SiC2H", "SiC2H+", "SiC2H2", "SiC2H2+", "SiC2H3+", "SiC3", "SiC3+", "SiC3H", "SiC3H+", "SiC3H2+", "SiC4", "SiC4+", "SiC4H+", "SiCH2", "SiCH2+", "SiCH3", "SiCH3+", "SiCH4+", "SiF+", "SiH", "SiH+", "SiH2", "SiH2+", "SiH3", "SiH3+", "SiH4", "SiH4+", "SiH5+", "SiN", "SiN+", "SiNC", "SiNC+", "SiNCH+", "SiNH2+", "SiO", "SiO+", "SiO2", "SiOH+", "SiS", "SiS+", "e-"] +list_of_elements = ["F", "Cl", "P", "Fe", "Mg", "Na", "Si", "S", "N", "O", "He", "C", "GRAIN0", "H"] +list_of_species = ["GFe", "GHe", "GMg", "GNa", "GH2S2", "GC4H6", "GC4S", "GCCl", "GCH3C3N", "GCH3C4H", "GCH3C5N", "GCH3C6H", "GCH3C7N", "GClO", "GHC2P", "GHCl", "GHF", "GHNSi", "GHPO", "GNH2CN", "GNO2", "GPN", "GSiC3H", "GSiCH3", "GSiO2", "GSiS", "GF", "GH2SiO", "GNCCN", "GS2", "GSiC2H", "C2H4CN", "GC3S", "GC4N", "GC4P", "GCH2PH", "GCH3CHCH2", "GCH3COOH", "GH2S", "GHCNO", "GHCP", "GHNC3", "GHNCO", "GHOCN", "GHONC", "GHS2", "GN2O", "GPH2", "GPO", "GSiC2H2", "GSiC4", "GSiNC", "HC2O", "GC3P", "GC6H6", "GH2O2", "GHCSi", "GPH", "GSO2", "GSiH4", "NCCNCH3+", "GC2H4CN", "GC2S", "GC3O", "GC4H3", "GC7H2", "GC8H2", "GC9H2", "GCH2CN", "GCH3CN", "GH2CN", "GH2CS", "GHC2O", "GHC5N", "GHC7N", "GHC9N", "GHCCN", "GHCS", "GSiC3", "GSiH3", "GSiN", "GSiO", "HCCN", "C3H2O+", "CF+", "ClO+", "GC2H6", "GC3H2", "GC5H2", "GCCP", "GCH2CHCCH", "GCH3COCH3", "GCH3OCH3", "GCl", "GSiCH2", "GSiH", "GSiH2", "H3C3O+", "HF+", "SiF+", "C8H5+", "C9H5+", "CH3C3N+", "GC10H2", "GC4H2", "GCH2CHCN", "GH2CCC", "GHC3N", "GOCS", "H2F+", "C4H6", "C4P+", "C5N+", "C6H6+", "CH2CHCN+", "COOCH3+", "F+", "GC2H5CN", "GC2H5OH", "GC2O", "GC6H2", "GC9N", "GCO2", "GCP", "GO2H", "GOCN", "GSO", "GSiC", "H2CNO+", "H2NCO+", "H2OCN+", "PC2H4+", "C7N+", "C9N+", "CH3NH+", "ClO", "GC11", "GC2N", "GCH2CCH2", "GCH2NH", "GCH3CCH", "GCNO", "GHNC", "GNS", "GSiC2", "H2C4N+", "H2CCl+", "H2NO+", "HCl+", "HNS+", "HOC+", "HSO+", "HSiO2+", "NH2CNH+", "C2H5OH+", "C2O+", "CH2CHCCH", "CH2OHCO+", "GCH2CCH", "GCH2CO", "GHNO", "GN2", "HC4N+", "HCNOH+", "HNCOH+", "HOCN+", "HeH+", "PC2H3+", "PN+", "PNH3+", "CH3CS+", "GC5N", "GP", "H2C7N+", "H2C9N+", "H2O2", "H3S2+", "HONC+", "PCH3+", "PNH2+", "C10H3+", "C2H5CNH+", "CCl+", "CH2NH2+", "CH2OHCH2O+", "CH3C5NH+", "CH3C7NH+", "GC2H5", "GC3N", "GC7N", "GCOOCH3", "GHCN", "H2CN", "H2SiO+", "H3C5N+", "HCNO+", "CCl", "CH3COOH+", "Cl+", "GNH3", "H2Cl+", "H3C9N+", "H5C2O2+", "HCOOH+", "HPN+", "C2S+", "C3S+", "C4N", "CH3COOH2+", "CH3OCH3+", "GC10", "GC10H", "GC8H", "GCH2OHCO", "GCOOH", "GO2", "H3C7N+", "H3SiO+", "HSO2+", "NH2CN", "CH3C3NH+", "CH3OCH4+", "GC2H4", "GC9", "GC9H", "GCS", "HC7N+", "HC9N+", "HNCO+", "NO2+", "PC3H+", "PCH4+", "SiH4+", "SiO2", "C2H5CN", "C2H5OH2+", "C2H7+", "CCP+", "CH2CHCNH+", "COOCH3", "F", "GHS", "H2PO+", "HCOOCH3+", "HN2O+", "N2O+", "PC2H2+", "SiC3H2+", "SiC4+", "SiC4H+", "SiH5+", "SiNCH+", "C11", "C3O+", "C4H5+", "C4H7+", "CH2OHCHO+", "CH3CHO+", "GCH2OHCHO", "GHCOOH", "H2S2", "HNSi+", "HOCS+", "NS+", "OCN+", "PC4H+", "PH3+", "SiCH4+", "C10+", "C10H2+", "C2N2+", "CH3CN+", "GC2H2", "GC5", "GC7H", "GCH3CO", "GHCOOCH3", "HC4S+", "HC5NH+", "SiC2H3+", "SiC3H", "SiCH3+", "SiNH2+", "C11+", "C3N+", "C4H4+", "CH2CN+", "CH3COCH3+", "CP+", "GC6", "GC8", "GCH2OH", "GCH3OH", "H2S2+", "HC2P+", "HC5N+", "HF", "HONC", "HSiS+", "PCH2+", "SO2+", "SiN+", "C9+", "CH2OHCO", "CH3C5N", "CH3C7N", "GC3H", "GC4H", "GC5H", "GC6H", "H2NC+", "H2SiO", "H3CS+", "HC2O+", "HCP+", "SiC4", "SiNC", "SiNC+", "CNO", "GC2H3", "GCH3O", "GH2O", "HC3S+", "HCOOH2+", "HNSi", "HPO+", "HS2+", "SiC2H2", "SiC3+", "C2NH+", "C3H6+", "C6H7+", "C8H4+", "CH2OHCHO", "Cl", "GC7", "GSi", "HC3O+", "HCNO", "SiC3H+", "SiCH3", "C3H7+", "C4N+", "C8+", "C9H4+", "CH2CO+", "CH2PH", "CH3C3N", "GC4", "GCH3CHO", "GH2CO", "HOCN", "HPO", "HS2", "SiC2+", "SiC2H2+", "C6H4+", "CH3CO", "CH3COCH4+", "CH3OH+", "COOH", "GNO", "PO+", "C7H4+", "C7H5+", "CH3C6H", "H2CS+", "HC9N", "HCOOCH3", "NCCNH+", "NO2", "PH2", "PN", "SiC2H", "SiC3", "C4P", "C7+", "CH2CN", "CH3C4H+", "GCH4", "HCP", "HCl", "HNCO", "C3P", "C9N", "CH3C4H", "CH3COOH", "CH3OCH3", "GC2H", "GNH2", "H2CS", "PH2+", "PO", "S2", "S2+", "SiC+", "C3S", "C6H5+", "CH2NH", "CH3O", "GHCO", "HC2P", "HCSi", "SiCH2", "C10H+", "HCSi+", "OCS+", "SiC2", "C2H6+", "C2O", "C8H+", "CH2OH", "SiN", "C5H5+", "GNH", "GS", "HCS", "NS", "SiC2H+", "SiH2", "C3O", "C6H+", "C9H2", "CH2CHCN", "CH3CHOH+", "CH3CNH+", "CH3CO+", "HC7N", "C6+", "C6H6", "C7N", "HCOOH", "SiH2+", "SiH3+", "C10H2", "C4+", "CCP", "CP", "GC3", "O2H", "SO2", "SiC", "C2H5OH", "HNO", "N2O", "SiH3", "CH3OH2+", "C2N+", "C5+", "C6H3+", "C8H3+", "C9H+", "C9H3+", "CH2CO", "HNC3", "OCN", "SiCH2+", "SiH+", "CH3COCH3", "HC3N+", "C8H2", "CO2+", "GOH", "HC5N", "SiH", "SiH4", "C7H+", "C9H2+", "PH", "C7H2", "GCO", "HCS+", "PH+", "C3H4+", "C8H2+", "GCH2", "HCO2+", "C5H3+", "HC3NH+", "C5H+", "CH3CHO", "CS+", "C3H5+", "C7H3+", "P+", "CH3CN", "NCCN", "C7H2+", "GC2", "C3+", "H3S+", "O2H+", "C6H2+", "CH4+", "HNO+", "H2CCC", "C6H2", "GCN", "C2H5+", "C5H2", "C5H2+", "CH2CCH2", "CN+", "C2H6", "GN", "C3H2", "C2H5", "GO", "N2+", "C4S+", "HCN+", "CH3CHCH2", "C2+", "C4H+", "CNC+", "HS+", "NH+", "O2-", "CH-", "H2+", "OCS", "GCH3", "NH2+", "P", "S-", "SiS+", "C2H-", "C4H-", "CO+", "CH3CCH", "CH5+", "HC2S+", "OH-", "C10H-", "C3H-", "C4S", "C6H-", "C8H-", "C7H-", "C9H-", "C10-", "C5H-", "C5N-", "HS", "C-", "CS", "O-", "C9-", "CH3OH", "H-", "HC3N", "SiS", "C3H+", "C3H3+", "C8-", "C2-", "C2S", "C3-", "C4-", "C6-", "H3CO+", "C5-", "C7-", "SiO+", "C2N", "GCH", "SiOH+", "NH2", "C4H3", "C2H+", "C3H2+", "C5N", "CH2+", "OH+", "H2O+", "C3N-", "GH2", "C3N", "CH+", "CO2", "O2+", "C10H", "C9H", "SiO", "Fe+", "Fe", "Mg+", "Na+", "Mg", "Na", "C10", "C8H", "C7", "C9", "C8", "GC", "NH", "C5", "C6", "CN-", "C4", "SO", "C7H", "C2H4+", "C4H3+", "N2H+", "CH2CCH", "SO+", "CH2CCH+", "C6H", "C5H", "H2S+", "N+", "C3H", "H2CO+", "C3", "C4H", "NO+", "O+", "C4H2", "C4H2+", "HCNH+", "CH2", "HNC", "NH3+", "C2H4", "C2H3", "NH4+", "N2", "O2", "Si+", "H2S", "S+", "Si", "C2H3+", "NO", "HCO", "CH4", "C2H", "H2CO", "HCN", "CH", "S", "C2", "OH", "NH3", "C2H2+", "CH3+", "C2H2", "CN", "GH", "CH3", "N", "H3O+", "O", "He+", "He", "C+", "H2O", "H+", "C", "HCO+", "H3+", "CO", "GRAIN-", "GRAIN0", "H2", "e-", "H"] +list_of_species_alias = ["GFeI", "GHeI", "GMgI", "GNaI", "GH2S2I", "GC4H6I", "GC4SI", "GCClI", "GCH3C3NI", "GCH3C4HI", "GCH3C5NI", "GCH3C6HI", "GCH3C7NI", "GClOI", "GHC2PI", "GHClI", "GHFI", "GHNSiI", "GHPOI", "GNH2CNI", "GNO2I", "GPNI", "GSiC3HI", "GSiCH3I", "GSiO2I", "GSiSI", "GFI", "GH2SiOI", "GNCCNI", "GS2I", "GSiC2HI", "C2H4CNI", "GC3SI", "GC4NI", "GC4PI", "GCH2PHI", "GCH3CHCH2I", "GCH3COOHI", "GH2SI", "GHCNOI", "GHCPI", "GHNC3I", "GHNCOI", "GHOCNI", "GHONCI", "GHS2I", "GN2OI", "GPH2I", "GPOI", "GSiC2H2I", "GSiC4I", "GSiNCI", "HC2OI", "GC3PI", "GC6H6I", "GH2O2I", "GHCSiI", "GPHI", "GSO2I", "GSiH4I", "NCCNCH3II", "GC2H4CNI", "GC2SI", "GC3OI", "GC4H3I", "GC7H2I", "GC8H2I", "GC9H2I", "GCH2CNI", "GCH3CNI", "GH2CNI", "GH2CSI", "GHC2OI", "GHC5NI", "GHC7NI", "GHC9NI", "GHCCNI", "GHCSI", "GSiC3I", "GSiH3I", "GSiNI", "GSiOI", "HCCNI", "C3H2OII", "CFII", "ClOII", "GC2H6I", "GC3H2I", "GC5H2I", "GCCPI", "GCH2CHCCHI", "GCH3COCH3I", "GCH3OCH3I", "GClI", "GSiCH2I", "GSiHI", "GSiH2I", "H3C3OII", "HFII", "SiFII", "C8H5II", "C9H5II", "CH3C3NII", "GC10H2I", "GC4H2I", "GCH2CHCNI", "GH2CCCI", "GHC3NI", "GOCSI", "H2FII", "C4H6I", "C4PII", "C5NII", "C6H6II", "CH2CHCNII", "COOCH3II", "FII", "GC2H5CNI", "GC2H5OHI", "GC2OI", "GC6H2I", "GC9NI", "GCO2I", "GCPI", "GO2HI", "GOCNI", "GSOI", "GSiCI", "H2CNOII", "H2NCOII", "H2OCNII", "PC2H4II", "C7NII", "C9NII", "CH3NHII", "ClOI", "GC11I", "GC2NI", "GCH2CCH2I", "GCH2NHI", "GCH3CCHI", "GCNOI", "GHNCI", "GNSI", "GSiC2I", "H2C4NII", "H2CClII", "H2NOII", "HClII", "HNSII", "HOCII", "HSOII", "HSiO2II", "NH2CNHII", "C2H5OHII", "C2OII", "CH2CHCCHI", "CH2OHCOII", "GCH2CCHI", "GCH2COI", "GHNOI", "GN2I", "HC4NII", "HCNOHII", "HNCOHII", "HOCNII", "HeHII", "PC2H3II", "PNII", "PNH3II", "CH3CSII", "GC5NI", "GPI", "H2C7NII", "H2C9NII", "H2O2I", "H3S2II", "HONCII", "PCH3II", "PNH2II", "C10H3II", "C2H5CNHII", "CClII", "CH2NH2II", "CH2OHCH2OII", "CH3C5NHII", "CH3C7NHII", "GC2H5I", "GC3NI", "GC7NI", "GCOOCH3I", "GHCNI", "H2CNI", "H2SiOII", "H3C5NII", "HCNOII", "CClI", "CH3COOHII", "ClII", "GNH3I", "H2ClII", "H3C9NII", "H5C2O2II", "HCOOHII", "HPNII", "C2SII", "C3SII", "C4NI", "CH3COOH2II", "CH3OCH3II", "GC10I", "GC10HI", "GC8HI", "GCH2OHCOI", "GCOOHI", "GO2I", "H3C7NII", "H3SiOII", "HSO2II", "NH2CNI", "CH3C3NHII", "CH3OCH4II", "GC2H4I", "GC9I", "GC9HI", "GCSI", "HC7NII", "HC9NII", "HNCOII", "NO2II", "PC3HII", "PCH4II", "SiH4II", "SiO2I", "C2H5CNI", "C2H5OH2II", "C2H7II", "CCPII", "CH2CHCNHII", "COOCH3I", "FI", "GHSI", "H2POII", "HCOOCH3II", "HN2OII", "N2OII", "PC2H2II", "SiC3H2II", "SiC4II", "SiC4HII", "SiH5II", "SiNCHII", "C11I", "C3OII", "C4H5II", "C4H7II", "CH2OHCHOII", "CH3CHOII", "GCH2OHCHOI", "GHCOOHI", "H2S2I", "HNSiII", "HOCSII", "NSII", "OCNII", "PC4HII", "PH3II", "SiCH4II", "C10II", "C10H2II", "C2N2II", "CH3CNII", "GC2H2I", "GC5I", "GC7HI", "GCH3COI", "GHCOOCH3I", "HC4SII", "HC5NHII", "SiC2H3II", "SiC3HI", "SiCH3II", "SiNH2II", "C11II", "C3NII", "C4H4II", "CH2CNII", "CH3COCH3II", "CPII", "GC6I", "GC8I", "GCH2OHI", "GCH3OHI", "H2S2II", "HC2PII", "HC5NII", "HFI", "HONCI", "HSiSII", "PCH2II", "SO2II", "SiNII", "C9II", "CH2OHCOI", "CH3C5NI", "CH3C7NI", "GC3HI", "GC4HI", "GC5HI", "GC6HI", "H2NCII", "H2SiOI", "H3CSII", "HC2OII", "HCPII", "SiC4I", "SiNCI", "SiNCII", "CNOI", "GC2H3I", "GCH3OI", "GH2OI", "HC3SII", "HCOOH2II", "HNSiI", "HPOII", "HS2II", "SiC2H2I", "SiC3II", "C2NHII", "C3H6II", "C6H7II", "C8H4II", "CH2OHCHOI", "ClI", "GC7I", "GSiI", "HC3OII", "HCNOI", "SiC3HII", "SiCH3I", "C3H7II", "C4NII", "C8II", "C9H4II", "CH2COII", "CH2PHI", "CH3C3NI", "GC4I", "GCH3CHOI", "GH2COI", "HOCNI", "HPOI", "HS2I", "SiC2II", "SiC2H2II", "C6H4II", "CH3COI", "CH3COCH4II", "CH3OHII", "COOHI", "GNOI", "POII", "C7H4II", "C7H5II", "CH3C6HI", "H2CSII", "HC9NI", "HCOOCH3I", "NCCNHII", "NO2I", "PH2I", "PNI", "SiC2HI", "SiC3I", "C4PI", "C7II", "CH2CNI", "CH3C4HII", "GCH4I", "HCPI", "HClI", "HNCOI", "C3PI", "C9NI", "CH3C4HI", "CH3COOHI", "CH3OCH3I", "GC2HI", "GNH2I", "H2CSI", "PH2II", "POI", "S2I", "S2II", "SiCII", "C3SI", "C6H5II", "CH2NHI", "CH3OI", "GHCOI", "HC2PI", "HCSiI", "SiCH2I", "C10HII", "HCSiII", "OCSII", "SiC2I", "C2H6II", "C2OI", "C8HII", "CH2OHI", "SiNI", "C5H5II", "GNHI", "GSI", "HCSI", "NSI", "SiC2HII", "SiH2I", "C3OI", "C6HII", "C9H2I", "CH2CHCNI", "CH3CHOHII", "CH3CNHII", "CH3COII", "HC7NI", "C6II", "C6H6I", "C7NI", "HCOOHI", "SiH2II", "SiH3II", "C10H2I", "C4II", "CCPI", "CPI", "GC3I", "O2HI", "SO2I", "SiCI", "C2H5OHI", "HNOI", "N2OI", "SiH3I", "CH3OH2II", "C2NII", "C5II", "C6H3II", "C8H3II", "C9HII", "C9H3II", "CH2COI", "HNC3I", "OCNI", "SiCH2II", "SiHII", "CH3COCH3I", "HC3NII", "C8H2I", "CO2II", "GOHI", "HC5NI", "SiHI", "SiH4I", "C7HII", "C9H2II", "PHI", "C7H2I", "GCOI", "HCSII", "PHII", "C3H4II", "C8H2II", "GCH2I", "HCO2II", "C5H3II", "HC3NHII", "C5HII", "CH3CHOI", "CSII", "C3H5II", "C7H3II", "PII", "CH3CNI", "NCCNI", "C7H2II", "GC2I", "C3II", "H3SII", "O2HII", "C6H2II", "CH4II", "HNOII", "H2CCCI", "C6H2I", "GCNI", "C2H5II", "C5H2I", "C5H2II", "CH2CCH2I", "CNII", "C2H6I", "GNI", "C3H2I", "C2H5I", "GOI", "N2II", "C4SII", "HCNII", "CH3CHCH2I", "C2II", "C4HII", "CNCII", "HSII", "NHII", "O2M", "CHM", "H2II", "OCSI", "GCH3I", "NH2II", "PI", "SM", "SiSII", "C2HM", "C4HM", "COII", "CH3CCHI", "CH5II", "HC2SII", "OHM", "C10HM", "C3HM", "C4SI", "C6HM", "C8HM", "C7HM", "C9HM", "C10M", "C5HM", "C5NM", "HSI", "CM", "CSI", "OM", "C9M", "CH3OHI", "HM", "HC3NI", "SiSI", "C3HII", "C3H3II", "C8M", "C2M", "C2SI", "C3M", "C4M", "C6M", "H3COII", "C5M", "C7M", "SiOII", "C2NI", "GCHI", "SiOHII", "NH2I", "C4H3I", "C2HII", "C3H2II", "C5NI", "CH2II", "OHII", "H2OII", "C3NM", "GH2I", "C3NI", "CHII", "CO2I", "O2II", "C10HI", "C9HI", "SiOI", "FeII", "FeI", "MgII", "NaII", "MgI", "NaI", "C10I", "C8HI", "C7I", "C9I", "C8I", "GCI", "NHI", "C5I", "C6I", "CNM", "C4I", "SOI", "C7HI", "C2H4II", "C4H3II", "N2HII", "CH2CCHI", "SOII", "CH2CCHII", "C6HI", "C5HI", "H2SII", "NII", "C3HI", "H2COII", "C3I", "C4HI", "NOII", "OII", "C4H2I", "C4H2II", "HCNHII", "CH2I", "HNCI", "NH3II", "C2H4I", "C2H3I", "NH4II", "N2I", "O2I", "SiII", "H2SI", "SII", "SiI", "C2H3II", "NOI", "HCOI", "CH4I", "C2HI", "H2COI", "HCNI", "CHI", "SI", "C2I", "OHI", "NH3I", "C2H2II", "CH3II", "C2H2I", "CNI", "GHI", "CH3I", "NI", "H3OII", "OI", "HeII", "HeI", "CII", "H2OI", "HII", "CI", "HCOII", "H3II", "COI", "GRAINM", "GRAIN0I", "H2I", "eM", "HI"] +list_of_gas_species = ["C2H4CN", "HC2O", "NCCNCH3+", "HCCN", "C3H2O+", "CF+", "ClO+", "H3C3O+", "HF+", "SiF+", "C8H5+", "C9H5+", "CH3C3N+", "H2F+", "C4H6", "C4P+", "C5N+", "C6H6+", "CH2CHCN+", "COOCH3+", "F+", "H2CNO+", "H2NCO+", "H2OCN+", "PC2H4+", "C7N+", "C9N+", "CH3NH+", "ClO", "H2C4N+", "H2CCl+", "H2NO+", "HCl+", "HNS+", "HOC+", "HSO+", "HSiO2+", "NH2CNH+", "C2H5OH+", "C2O+", "CH2CHCCH", "CH2OHCO+", "HC4N+", "HCNOH+", "HNCOH+", "HOCN+", "HeH+", "PC2H3+", "PN+", "PNH3+", "CH3CS+", "H2C7N+", "H2C9N+", "H2O2", "H3S2+", "HONC+", "PCH3+", "PNH2+", "C10H3+", "C2H5CNH+", "CCl+", "CH2NH2+", "CH2OHCH2O+", "CH3C5NH+", "CH3C7NH+", "H2CN", "H2SiO+", "H3C5N+", "HCNO+", "CCl", "CH3COOH+", "Cl+", "H2Cl+", "H3C9N+", "H5C2O2+", "HCOOH+", "HPN+", "C2S+", "C3S+", "C4N", "CH3COOH2+", "CH3OCH3+", "H3C7N+", "H3SiO+", "HSO2+", "NH2CN", "CH3C3NH+", "CH3OCH4+", "HC7N+", "HC9N+", "HNCO+", "NO2+", "PC3H+", "PCH4+", "SiH4+", "SiO2", "C2H5CN", "C2H5OH2+", "C2H7+", "CCP+", "CH2CHCNH+", "COOCH3", "F", "H2PO+", "HCOOCH3+", "HN2O+", "N2O+", "PC2H2+", "SiC3H2+", "SiC4+", "SiC4H+", "SiH5+", "SiNCH+", "C11", "C3O+", "C4H5+", "C4H7+", "CH2OHCHO+", "CH3CHO+", "H2S2", "HNSi+", "HOCS+", "NS+", "OCN+", "PC4H+", "PH3+", "SiCH4+", "C10+", "C10H2+", "C2N2+", "CH3CN+", "HC4S+", "HC5NH+", "SiC2H3+", "SiC3H", "SiCH3+", "SiNH2+", "C11+", "C3N+", "C4H4+", "CH2CN+", "CH3COCH3+", "CP+", "H2S2+", "HC2P+", "HC5N+", "HF", "HONC", "HSiS+", "PCH2+", "SO2+", "SiN+", "C9+", "CH2OHCO", "CH3C5N", "CH3C7N", "H2NC+", "H2SiO", "H3CS+", "HC2O+", "HCP+", "SiC4", "SiNC", "SiNC+", "CNO", "HC3S+", "HCOOH2+", "HNSi", "HPO+", "HS2+", "SiC2H2", "SiC3+", "C2NH+", "C3H6+", "C6H7+", "C8H4+", "CH2OHCHO", "Cl", "HC3O+", "HCNO", "SiC3H+", "SiCH3", "C3H7+", "C4N+", "C8+", "C9H4+", "CH2CO+", "CH2PH", "CH3C3N", "HOCN", "HPO", "HS2", "SiC2+", "SiC2H2+", "C6H4+", "CH3CO", "CH3COCH4+", "CH3OH+", "COOH", "PO+", "C7H4+", "C7H5+", "CH3C6H", "H2CS+", "HC9N", "HCOOCH3", "NCCNH+", "NO2", "PH2", "PN", "SiC2H", "SiC3", "C4P", "C7+", "CH2CN", "CH3C4H+", "HCP", "HCl", "HNCO", "C3P", "C9N", "CH3C4H", "CH3COOH", "CH3OCH3", "H2CS", "PH2+", "PO", "S2", "S2+", "SiC+", "C3S", "C6H5+", "CH2NH", "CH3O", "HC2P", "HCSi", "SiCH2", "C10H+", "HCSi+", "OCS+", "SiC2", "C2H6+", "C2O", "C8H+", "CH2OH", "SiN", "C5H5+", "HCS", "NS", "SiC2H+", "SiH2", "C3O", "C6H+", "C9H2", "CH2CHCN", "CH3CHOH+", "CH3CNH+", "CH3CO+", "HC7N", "C6+", "C6H6", "C7N", "HCOOH", "SiH2+", "SiH3+", "C10H2", "C4+", "CCP", "CP", "O2H", "SO2", "SiC", "C2H5OH", "HNO", "N2O", "SiH3", "CH3OH2+", "C2N+", "C5+", "C6H3+", "C8H3+", "C9H+", "C9H3+", "CH2CO", "HNC3", "OCN", "SiCH2+", "SiH+", "CH3COCH3", "HC3N+", "C8H2", "CO2+", "HC5N", "SiH", "SiH4", "C7H+", "C9H2+", "PH", "C7H2", "HCS+", "PH+", "C3H4+", "C8H2+", "HCO2+", "C5H3+", "HC3NH+", "C5H+", "CH3CHO", "CS+", "C3H5+", "C7H3+", "P+", "CH3CN", "NCCN", "C7H2+", "C3+", "H3S+", "O2H+", "C6H2+", "CH4+", "HNO+", "H2CCC", "C6H2", "C2H5+", "C5H2", "C5H2+", "CH2CCH2", "CN+", "C2H6", "C3H2", "C2H5", "N2+", "C4S+", "HCN+", "CH3CHCH2", "C2+", "C4H+", "CNC+", "HS+", "NH+", "O2-", "CH-", "H2+", "OCS", "NH2+", "P", "S-", "SiS+", "C2H-", "C4H-", "CO+", "CH3CCH", "CH5+", "HC2S+", "OH-", "C10H-", "C3H-", "C4S", "C6H-", "C8H-", "C7H-", "C9H-", "C10-", "C5H-", "C5N-", "HS", "C-", "CS", "O-", "C9-", "CH3OH", "H-", "HC3N", "SiS", "C3H+", "C3H3+", "C8-", "C2-", "C2S", "C3-", "C4-", "C6-", "H3CO+", "C5-", "C7-", "SiO+", "C2N", "SiOH+", "NH2", "C4H3", "C2H+", "C3H2+", "C5N", "CH2+", "OH+", "H2O+", "C3N-", "C3N", "CH+", "CO2", "O2+", "C10H", "C9H", "SiO", "Fe+", "Fe", "Mg+", "Na+", "Mg", "Na", "C10", "C8H", "C7", "C9", "C8", "NH", "C5", "C6", "CN-", "C4", "SO", "C7H", "C2H4+", "C4H3+", "N2H+", "CH2CCH", "SO+", "CH2CCH+", "C6H", "C5H", "H2S+", "N+", "C3H", "H2CO+", "C3", "C4H", "NO+", "O+", "C4H2", "C4H2+", "HCNH+", "CH2", "HNC", "NH3+", "C2H4", "C2H3", "NH4+", "N2", "O2", "Si+", "H2S", "S+", "Si", "C2H3+", "NO", "HCO", "CH4", "C2H", "H2CO", "HCN", "CH", "S", "C2", "OH", "NH3", "C2H2+", "CH3+", "C2H2", "CN", "CH3", "N", "H3O+", "O", "He+", "He", "C+", "H2O", "H+", "C", "HCO+", "H3+", "CO", "GRAIN-", "GRAIN0", "H2", "e-", "H"] +list_of_ice_species = ["GFe", "GHe", "GMg", "GNa", "GH2S2", "GC4H6", "GC4S", "GCCl", "GCH3C3N", "GCH3C4H", "GCH3C5N", "GCH3C6H", "GCH3C7N", "GClO", "GHC2P", "GHCl", "GHF", "GHNSi", "GHPO", "GNH2CN", "GNO2", "GPN", "GSiC3H", "GSiCH3", "GSiO2", "GSiS", "GF", "GH2SiO", "GNCCN", "GS2", "GSiC2H", "GC3S", "GC4N", "GC4P", "GCH2PH", "GCH3CHCH2", "GCH3COOH", "GH2S", "GHCNO", "GHCP", "GHNC3", "GHNCO", "GHOCN", "GHONC", "GHS2", "GN2O", "GPH2", "GPO", "GSiC2H2", "GSiC4", "GSiNC", "GC3P", "GC6H6", "GH2O2", "GHCSi", "GPH", "GSO2", "GSiH4", "GC2H4CN", "GC2S", "GC3O", "GC4H3", "GC7H2", "GC8H2", "GC9H2", "GCH2CN", "GCH3CN", "GH2CN", "GH2CS", "GHC2O", "GHC5N", "GHC7N", "GHC9N", "GHCCN", "GHCS", "GSiC3", "GSiH3", "GSiN", "GSiO", "GC2H6", "GC3H2", "GC5H2", "GCCP", "GCH2CHCCH", "GCH3COCH3", "GCH3OCH3", "GCl", "GSiCH2", "GSiH", "GSiH2", "GC10H2", "GC4H2", "GCH2CHCN", "GH2CCC", "GHC3N", "GOCS", "GC2H5CN", "GC2H5OH", "GC2O", "GC6H2", "GC9N", "GCO2", "GCP", "GO2H", "GOCN", "GSO", "GSiC", "GC11", "GC2N", "GCH2CCH2", "GCH2NH", "GCH3CCH", "GCNO", "GHNC", "GNS", "GSiC2", "GCH2CCH", "GCH2CO", "GHNO", "GN2", "GC5N", "GP", "GC2H5", "GC3N", "GC7N", "GCOOCH3", "GHCN", "GNH3", "GC10", "GC10H", "GC8H", "GCH2OHCO", "GCOOH", "GO2", "GC2H4", "GC9", "GC9H", "GCS", "GHS", "GCH2OHCHO", "GHCOOH", "GC2H2", "GC5", "GC7H", "GCH3CO", "GHCOOCH3", "GC6", "GC8", "GCH2OH", "GCH3OH", "GC3H", "GC4H", "GC5H", "GC6H", "GC2H3", "GCH3O", "GH2O", "GC7", "GSi", "GC4", "GCH3CHO", "GH2CO", "GNO", "GCH4", "GC2H", "GNH2", "GHCO", "GNH", "GS", "GC3", "GOH", "GCO", "GCH2", "GC2", "GCN", "GN", "GO", "GCH3", "GCH", "GH2", "GC", "GH"] +list_of_grain_species = ["GRAIN-", "GRAIN0"] + diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt index 3387a3c..d7b0a49 100644 --- a/src/CMakeLists.txt +++ b/src/CMakeLists.txt @@ -2,11 +2,27 @@ set( OBJTARGETS naunet_constants naunet_physics + naunet_renorm naunet_rates naunet_fex naunet_jac ) +# check enabled languages +get_property( + languages + GLOBAL + PROPERTY ENABLED_LANGUAGES +) + +# Functions from Numerical Recipes, not suppport GPU yet. +if(NOT "CUDA" IN_LIST languages) + list( + APPEND OBJTARGETS + naunet_utilities + ) +endif() + foreach(name ${OBJTARGETS}) add_library( ${name} @@ -20,10 +36,9 @@ foreach(name ${OBJTARGETS}) ) target_include_directories( ${name} - PRIVATE - ${CMAKE_CUDA_TOOLKIT_INCLUDE_DIRECTORIES} PUBLIC ${CMAKE_SOURCE_DIR}/include + ${CMAKE_CUDA_TOOLKIT_INCLUDE_DIRECTORIES} ) target_link_libraries( ${name} @@ -49,8 +64,6 @@ if(MAKE_SHARED) ) target_include_directories( naunet_shared - PRIVATE - ${CMAKE_CUDA_TOOLKIT_INCLUDE_DIRECTORIES} PUBLIC ${CMAKE_SOURCE_DIR}/include ) @@ -84,8 +97,6 @@ if(MAKE_STATIC) ) target_include_directories( naunet_static - PRIVATE - ${CMAKE_CUDA_TOOLKIT_INCLUDE_DIRECTORIES} PUBLIC ${CMAKE_SOURCE_DIR}/include ) @@ -108,7 +119,7 @@ if(MAKE_PYTHON) FetchContent_Declare( pybind11_sources GIT_REPOSITORY https://github.com/pybind/pybind11.git - GIT_TAG v2.6.2 + GIT_TAG v2.11.1 ) FetchContent_GetProperties(pybind11_sources) if(NOT pybind11_sources_POPULATED) @@ -137,8 +148,6 @@ if(MAKE_PYTHON) ${PYMODNAME} PUBLIC ${CMAKE_SOURCE_DIR}/include - PRIVATE - ${CMAKE_CUDA_TOOLKIT_INCLUDE_DIRECTORIES} ) target_link_libraries( diff --git a/src/naunet.cpp b/src/naunet.cpp index ca7f1be..f9108cb 100644 --- a/src/naunet.cpp +++ b/src/naunet.cpp @@ -1,63 +1,162 @@ #include // prototypes for CVODE fcts., consts. /* */ #include +#include // access to serial N_Vector #include +#include // access to dense SUNLinearSolver #include /* */ -/* */ #include "naunet.h" -/* */ #include "naunet_ode.h" +#include "naunet_physics.h" +#include "naunet_renorm.h" +/* */ + +Naunet::Naunet(){}; -// check_flag function is from the cvDiurnals_ky.c example from the CVODE -// package. Check function return value... +Naunet::~Naunet(){}; + +// Adaptedfrom the cvDiurnals_ky.c example from the CVODE package. +// Check function return value... // opt == 0 means SUNDIALS function allocates memory so check if // returned NULL pointer // opt == 1 means SUNDIALS function returns a flag so check if // flag >= 0 // opt == 2 means function allocates memory so check if returned // NULL pointer -static int check_flag(void *flagvalue, const char *funcname, int opt) { +int Naunet::CheckFlag(void *flagvalue, const char *funcname, int opt, + FILE *errf) { int *errflag; /* Check if SUNDIALS function returned NULL pointer - no memory allocated */ if (opt == 0 && flagvalue == NULL) { - fprintf(stderr, + fprintf(errf, "\nSUNDIALS_ERROR: %s() failed - returned NULL pointer\n\n", funcname); - return 1; + return NAUNET_FAIL; } /* Check if flag < 0 */ else if (opt == 1) { errflag = (int *)flagvalue; if (*errflag < 0) { - fprintf(stderr, "\nSUNDIALS_ERROR: %s() failed with flag = %d\n\n", + fprintf(errf, "\nSUNDIALS_ERROR: %s() failed with flag = %d\n\n", funcname, *errflag); - return 1; + return NAUNET_FAIL; } } /* Check if function returned NULL pointer - no memory allocated */ else if (opt == 2 && flagvalue == NULL) { - fprintf(stderr, - "\nMEMORY_ERROR: %s() failed - returned NULL pointer\n\n", + fprintf(errf, "\nMEMORY_ERROR: %s() failed - returned NULL pointer\n\n", funcname); - return 1; + return NAUNET_FAIL; } - return 0; -} + return NAUNET_SUCCESS; +}; -Naunet::Naunet(){}; +int Naunet::Finalize() { + /* */ + for (int i = 0; i < n_stream_in_use_; i++) { + // N_VDestroy(cv_y_[i]); + N_VFreeEmpty(cv_y_[i]); + SUNMatDestroy(cv_a_[i]); + // CVodeFree(&cv_mem_[i]); + SUNLinSolFree(cv_ls_[i]); + SUNContext_Free(&cv_sunctx_[i]); -Naunet::~Naunet(){}; + cusparseDestroy(cusp_handle_[i]); + cusolverSpDestroy(cusol_handle_[i]); + cudaStreamDestroy(custream_[i]); + } + + cudaFreeHost(h_ab); + cudaFreeHost(h_data); + + /* */ + + fclose(errfp_); + + return NAUNET_SUCCESS; +}; + +int Naunet::GetCVStates(void *cv_mem, long int &nst, long int &nfe, + long int &nsetups, long int &nje, long int &netf, + long int &nge, long int &nni, long int &ncfn) { + int flag; + + flag = CVodeGetNumSteps(cv_mem, &nst); + if (CheckFlag(&flag, "CVodeGetNumSteps", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + + flag = CVodeGetNumRhsEvals(cv_mem, &nfe); + if (CheckFlag(&flag, "CVodeGetNumRhsEvals", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + + flag = CVodeGetNumLinSolvSetups(cv_mem, &nsetups); + if (CheckFlag(&flag, "CVodeGetNumLinSolvSetups", 1, errfp_) == + NAUNET_FAIL) { + return NAUNET_FAIL; + } + + flag = CVodeGetNumErrTestFails(cv_mem, &netf); + if (CheckFlag(&flag, "CVodeGetNumErrTestFails", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + + flag = CVodeGetNumNonlinSolvIters(cv_mem, &nni); + if (CheckFlag(&flag, "CVodeGetNumNonlinSolvIters", 1, errfp_) == + NAUNET_FAIL) { + return NAUNET_FAIL; + } + + flag = CVodeGetNumNonlinSolvConvFails(cv_mem, &ncfn); + if (CheckFlag(&flag, "CVodeGetNumNonlinSolvConvFails", 1, errfp_) == + NAUNET_FAIL) { + return NAUNET_FAIL; + } + + flag = CVodeGetNumJacEvals(cv_mem, &nje); + if (CheckFlag(&flag, "CVodeGetNumJacEvals", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + + flag = CVodeGetNumGEvals(cv_mem, &nge); + if (CheckFlag(&flag, "CVodeGetNumGEvals", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + + return NAUNET_SUCCESS; +}; + +int Naunet::HandleError(int cvflag, realtype *ab, realtype dt, realtype t0) { + if (cvflag >= 0) { + return NAUNET_SUCCESS; + } + + fprintf(errfp_, "CVode failed in Naunet! Flag = %d\n", cvflag); + fprintf(errfp_, "Calling HandleError to fix the problem\n"); + + /* */ + + // TODO: No error handling for cusparse solver yet + + /* */ + + return NAUNET_FAIL; +} int Naunet::Init(int nsystem, double atol, double rtol, int mxsteps) { n_system_ = nsystem; mxsteps_ = mxsteps; atol_ = atol; rtol_ = rtol; + errfp_ = fopen("naunet_error_record.txt", "a"); + + int flag; /* */ @@ -69,48 +168,45 @@ int Naunet::Init(int nsystem, double atol, double rtol, int mxsteps) { cudaMallocHost((void **)&h_ab, sizeof(realtype) * n_system_ * NEQUATIONS); cudaMallocHost((void **)&h_data, sizeof(NaunetData) * n_system_); - n_stream_in_use_ = nsystem / NSTREAMS >= 32 ? NSTREAMS : 1; + n_stream_in_use_ = nsystem / NSTREAMS >= 32 ? NSTREAMS : 1; int n_system_per_stream = nsystem / n_stream_in_use_; int n_thread_per_stream = std::min(BLOCKSIZE, n_system_per_stream); cudaError_t cuerr; - int flag; for (int i = 0; i < n_stream_in_use_; i++) { - - cuerr = cudaStreamCreate(&custream_[i]); - // SUNCudaThreadDirectExecPolicy stream_exec_policy(n_thread_per_stream, custream_[i]); - // SUNCudaBlockReduceExecPolicy reduce_exec_policy(n_thread_per_stream, 0, custream_[i]); - stream_exec_policy_[i] = new SUNCudaThreadDirectExecPolicy(n_thread_per_stream, custream_[i]); - reduce_exec_policy_[i] = new SUNCudaBlockReduceExecPolicy(n_thread_per_stream, 0, custream_[i]); + cuerr = cudaStreamCreate(&custream_[i]); + // SUNCudaThreadDirectExecPolicy stream_exec_policy(n_thread_per_stream, + // custream_[i]); SUNCudaBlockReduceExecPolicy + // reduce_exec_policy(n_thread_per_stream, 0, custream_[i]); + stream_exec_policy_[i] = new SUNCudaThreadDirectExecPolicy( + n_thread_per_stream, custream_[i]); + reduce_exec_policy_[i] = new SUNCudaBlockReduceExecPolicy( + n_thread_per_stream, 0, custream_[i]); cusparseCreate(&cusp_handle_[i]); cusparseSetStream(cusp_handle_[i], custream_[i]); cusolverSpCreate(&cusol_handle_[i]); cusolverSpSetStream(cusol_handle_[i], custream_[i]); - cv_y_[i] = N_VNew_Cuda(NEQUATIONS * n_system_per_stream); - flag = N_VSetKernelExecPolicy_Cuda(cv_y_[i], stream_exec_policy_[i], reduce_exec_policy_[i]); - if (check_flag(&flag, "N_VSetKernelExecPolicy_Cuda", 0)) return 1; - cv_a_[i] = SUNMatrix_cuSparse_NewBlockCSR(n_system_per_stream, NEQUATIONS, NEQUATIONS, - NNZ, cusp_handle_[i]); - cv_ls_[i] = SUNLinSol_cuSolverSp_batchQR(cv_y_[i], cv_a_[i], cusol_handle_[i]); - // abstol = N_VNew_Cuda(neq); + flag = SUNContext_Create(NULL, &cv_sunctx_[i]); + if (CheckFlag(&flag, "SUNContext_Create", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + cv_y_[i] = N_VNew_Cuda(NEQUATIONS * n_system_per_stream, cv_sunctx_[i]); + // cv_y_[i] = N_VNewEmpty_Cuda(cv_sunctx_[i]); + flag = N_VSetKernelExecPolicy_Cuda(cv_y_[i], stream_exec_policy_[i], + reduce_exec_policy_[i]); + if (CheckFlag(&flag, "N_VSetKernelExecPolicy_Cuda", 1, errfp_) == + NAUNET_FAIL) { + return NAUNET_FAIL; + } + cv_a_[i] = SUNMatrix_cuSparse_NewBlockCSR( + n_system_per_stream, NEQUATIONS, NEQUATIONS, NNZ, cusp_handle_[i], cv_sunctx_[i]); + cv_ls_[i] = + SUNLinSol_cuSolverSp_batchQR(cv_y_[i], cv_a_[i], cusol_handle_[i], cv_sunctx_[i]); + // abstol = N_VNew_Cuda(neq, cv_sunctx_[i]); SUNMatrix_cuSparse_SetFixedPattern(cv_a_[i], 1); InitJac(cv_a_[i]); - - cv_mem_[i] = CVodeCreate(CV_BDF); - - flag = CVodeInit(cv_mem_[i], Fex, 0.0, cv_y_[i]); - if (check_flag(&flag, "CVodeInit", 1)) return 1; - flag = CVodeSetMaxNumSteps(cv_mem_[i], mxsteps_); - if (check_flag(&flag, "CVodeSetMaxNumSteps", 0)) return 1; - flag = CVodeSStolerances(cv_mem_[i], rtol_, atol_); - if (check_flag(&flag, "CVodeSStolerances", 1)) return 1; - flag = CVodeSetLinearSolver(cv_mem_[i], cv_ls_[i], cv_a_[i]); - if (check_flag(&flag, "CVodeSetLinearSolver", 1)) return 1; - flag = CVodeSetJacFn(cv_mem_[i], Jac); - if (check_flag(&flag, "CVodeSetJacFn", 1)) return 1; - } /* */ @@ -119,14 +215,16 @@ int Naunet::Init(int nsystem, double atol, double rtol, int mxsteps) { /* */ // N_VDestroy(cv_y_); - // cv_y_ = N_VNewEmpty_Cuda(); + // cv_y_ = N_VNewEmpty_Cuda(cv_sunctx_); + + /* */ /* */ return NAUNET_SUCCESS; }; -int Naunet::DebugInfo() { +int Naunet::PrintDebugInfo() { long int nst, nfe, nsetups, nje, netf, nge, nni, ncfn; int flag; @@ -134,76 +232,89 @@ int Naunet::DebugInfo() { size_t cuSpInternalSize, cuSpWorkSize; - for (int i=0; i= 32 ? NSTREAMS : 1; int n_system_per_stream = nsystem / n_stream_in_use_; int n_thread_per_stream = std::min(BLOCKSIZE, n_system_per_stream); @@ -220,68 +331,80 @@ int Naunet::Reset(int nsystem, double atol, double rtol, int mxsteps) { N_VDestroy(cv_y_[i]); SUNMatDestroy(cv_a_[i]); SUNLinSolFree(cv_ls_[i]); - CVodeFree(&cv_mem_[i]); delete stream_exec_policy_[i]; delete reduce_exec_policy_[i]; - // SUNCudaThreadDirectExecPolicy stream_exec_policy(n_thread_per_stream, custream_[i]); - // SUNCudaBlockReduceExecPolicy reduce_exec_policy(n_thread_per_stream, 0, custream_[i]); - - stream_exec_policy_[i] = new SUNCudaThreadDirectExecPolicy(n_thread_per_stream, custream_[i]); - reduce_exec_policy_[i] = new SUNCudaBlockReduceExecPolicy(n_thread_per_stream, 0, custream_[i]); - - cv_y_[i] = N_VNew_Cuda(NEQUATIONS * n_system_per_stream); - flag = N_VSetKernelExecPolicy_Cuda(cv_y_[i], stream_exec_policy_[i], reduce_exec_policy_[i]); - if (check_flag(&flag, "N_VSetKernelExecPolicy_Cuda", 0)) return 1; - cv_a_[i] = SUNMatrix_cuSparse_NewBlockCSR(n_system_per_stream, NEQUATIONS, NEQUATIONS, NNZ, - cusp_handle_[i]); - cv_ls_[i] = SUNLinSol_cuSolverSp_batchQR(cv_y_[i], cv_a_[i], cusol_handle_[i]); + // SUNCudaThreadDirectExecPolicy stream_exec_policy(n_thread_per_stream, + // custream_[i]); SUNCudaBlockReduceExecPolicy + // reduce_exec_policy(n_thread_per_stream, 0, custream_[i]); + + stream_exec_policy_[i] = new SUNCudaThreadDirectExecPolicy( + n_thread_per_stream, custream_[i]); + reduce_exec_policy_[i] = new SUNCudaBlockReduceExecPolicy( + n_thread_per_stream, 0, custream_[i]); + + cv_y_[i] = N_VNew_Cuda(NEQUATIONS * n_system_per_stream, cv_sunctx_[i]); + // cv_y_[i] = N_VNewEmpty_Cuda(cv_sunctx_[i]); + flag = N_VSetKernelExecPolicy_Cuda(cv_y_[i], stream_exec_policy_[i], + reduce_exec_policy_[i]); + if (CheckFlag(&flag, "N_VSetKernelExecPolicy_Cuda", 1, errfp_) == + NAUNET_FAIL) { + return NAUNET_FAIL; + } + cv_a_[i] = SUNMatrix_cuSparse_NewBlockCSR( + n_system_per_stream, NEQUATIONS, NEQUATIONS, NNZ, cusp_handle_[i], cv_sunctx_[i]); + cv_ls_[i] = + SUNLinSol_cuSolverSp_batchQR(cv_y_[i], cv_a_[i], cusol_handle_[i], cv_sunctx_[i]); SUNMatrix_cuSparse_SetFixedPattern(cv_a_[i], 1); InitJac(cv_a_[i]); - cv_mem_[i] = CVodeCreate(CV_BDF); - - flag = CVodeInit(cv_mem_[i], Fex, 0.0, cv_y_[i]); - if (check_flag(&flag, "CVodeInit", 1)) return 1; - flag = CVodeSetMaxNumSteps(cv_mem_[i], mxsteps_); - if (check_flag(&flag, "CVodeSetMaxNumSteps", 0)) return 1; - flag = CVodeSStolerances(cv_mem_[i], rtol_, atol_); - if (check_flag(&flag, "CVodeSStolerances", 1)) return 1; - flag = CVodeSetLinearSolver(cv_mem_[i], cv_ls_[i], cv_a_[i]); - if (check_flag(&flag, "CVodeSetLinearSolver", 1)) return 1; - flag = CVodeSetJacFn(cv_mem_[i], Jac); - if (check_flag(&flag, "CVodeSetJacFn", 1)) return 1; - // reset the n_vector to empty, maybe not necessary // N_VDestroy(cv_y_); - // cv_y_ = N_VNewEmpty_Cuda(); + // cv_y_ = N_VNewEmpty_Cuda(cv_sunctx_[i]); } + /* */ + return NAUNET_SUCCESS; }; -/* */ -int Naunet::Solve(realtype *ab, realtype dt, NaunetData *data) { +#ifdef IDX_ELEM_H +int Naunet::SetReferenceAbund(realtype *ref, int opt) { + if (opt == 0) { + for (int i = 0; i < NELEMENTS; i++) { + ab_ref_[i] = ref[i] / ref[IDX_ELEM_H]; + } + } else if (opt == 1) { + double Hnuclei = GetHNuclei(ref); + for (int i = 0; i < NELEMENTS; i++) { + ab_ref_[i] = GetElementAbund(ref, i) / Hnuclei; + } + } - int flag; + return NAUNET_SUCCESS; +} +#endif +int Naunet::Solve(realtype *ab, realtype dt, NaunetData *data) { /* */ - for (int i = 0; i < n_system_ ; i++) - { + for (int i = 0; i < n_system_; i++) { h_data[i] = data[i]; for (int j = 0; j < NEQUATIONS; j++) { - int idx = i * NEQUATIONS + j; + int idx = i * NEQUATIONS + j; h_ab[idx] = ab[idx]; } } for (int i = 0; i < n_stream_in_use_; i++) { + int cvflag; realtype t0 = 0.0; - // ! Bug: I don't know why n_vector does not save the stream_exec_policy and reduce_exec_policy - N_VSetKernelExecPolicy_Cuda(cv_y_[i], stream_exec_policy_[i], reduce_exec_policy_[i]); + // ! Bug: I don't know why n_vector does not save the stream_exec_policy + // and reduce_exec_policy + N_VSetKernelExecPolicy_Cuda(cv_y_[i], stream_exec_policy_[i], + reduce_exec_policy_[i]); // This way is too slow // realtype *ydata = N_VGetArrayPointer(cv_y_[i]); @@ -289,7 +412,8 @@ int Naunet::Solve(realtype *ab, realtype dt, NaunetData *data) { // { // ydata[i] = ab[i]; // } - N_VSetHostArrayPointer_Cuda(h_ab + i * n_system_ * NEQUATIONS / n_stream_in_use_, cv_y_[i]); + N_VSetHostArrayPointer_Cuda( + h_ab + i * n_system_ * NEQUATIONS / n_stream_in_use_, cv_y_[i]); N_VCopyToDevice_Cuda(cv_y_[i]); #ifdef NAUNET_DEBUG @@ -298,36 +422,103 @@ int Naunet::Solve(realtype *ab, realtype dt, NaunetData *data) { // printf("NVector space: real-%d, int-%d\n", lrw, liw); #endif - flag = CVodeReInit(cv_mem_[i], 0.0, cv_y_[i]); - if (check_flag(&flag, "CVodeReInit", 1)) return 1; - flag = CVodeSetUserData(cv_mem_[i], h_data + i * n_system_ / n_stream_in_use_); - if (check_flag(&flag, "CVodeSetUserData", 1)) return 1; + cv_mem_[i] = CVodeCreate(CV_BDF, cv_sunctx_[i]); + + cvflag = CVodeSetErrFile(cv_mem_[i], errfp_); + if (CheckFlag(&cvflag, "CVodeSetErrFile", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + + cvflag = CVodeSetMaxNumSteps(cv_mem_[i], mxsteps_); + if (CheckFlag(&cvflag, "CVodeSetMaxNumSteps", 1, errfp_) == + NAUNET_FAIL) { + return NAUNET_FAIL; + } + + cvflag = CVodeInit(cv_mem_[i], Fex, t0, cv_y_[i]); + if (CheckFlag(&cvflag, "CVodeInit", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + + cvflag = CVodeSStolerances(cv_mem_[i], rtol_, atol_); + if (CheckFlag(&cvflag, "CVodeSStolerances", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + + cvflag = CVodeSetLinearSolver(cv_mem_[i], cv_ls_[i], cv_a_[i]); + if (CheckFlag(&cvflag, "CVodeSetLinearSolver", 1, errfp_) == + NAUNET_FAIL) { + return NAUNET_FAIL; + } + + cvflag = CVodeSetJacFn(cv_mem_[i], Jac); + if (CheckFlag(&cvflag, "CVodeSetJacFn", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } + + cvflag = CVodeSetUserData(cv_mem_[i], + h_data + i * n_system_ / n_stream_in_use_); + if (CheckFlag(&cvflag, "CVodeSetUserData", 1, errfp_) == NAUNET_FAIL) { + return NAUNET_FAIL; + } - flag = CVode(cv_mem_[i], dt, cv_y_[i], &t0, CV_NORMAL); + cvflag = CVode(cv_mem_[i], dt, cv_y_[i], &t0, CV_NORMAL); N_VCopyFromDevice_Cuda(cv_y_[i]); realtype *local_ab = N_VGetHostArrayPointer_Cuda(cv_y_[i]); - for (int idx = 0; idx < n_system_ * NEQUATIONS / n_stream_in_use_; idx++) - { - ab[idx + i * n_system_ * NEQUATIONS / n_stream_in_use_] = local_ab[idx]; + for (int idx = 0; idx < n_system_ * NEQUATIONS / n_stream_in_use_; + idx++) { + ab[idx + i * n_system_ * NEQUATIONS / n_stream_in_use_] = + local_ab[idx]; } + CVodeFree(&cv_mem_[i]); } - cudaDeviceSynchronize(); + // TODO: error handling - /* */ + // cudaDeviceSynchronize(); return NAUNET_SUCCESS; + + /* */ }; #ifdef PYMODULE +#ifdef IDX_ELEM_H +py::array_t Naunet::PyWrapRenorm(py::array_t arr) { + py::buffer_info info = arr.request(); + realtype *ab = static_cast(info.ptr); + + int flag = Renorm(ab); + if (flag == NAUNET_FAIL) { + throw std::runtime_error("Fail to renormalization"); + } + + return py::array_t(info.shape, ab); +} +py::array_t Naunet::PyWrapSetReferenceAbund(py::array_t arr, + int opt) { + py::buffer_info info = arr.request(); + realtype *ab = static_cast(info.ptr); + + int flag = SetReferenceAbund(ab, opt); + if (flag == NAUNET_FAIL) { + throw std::runtime_error("Fail to set reference abundance"); + } + + return py::array_t(info.shape, ab); +} +#endif py::array_t Naunet::PyWrapSolve(py::array_t arr, realtype dt, NaunetData *data) { py::buffer_info info = arr.request(); realtype *ab = static_cast(info.ptr); - Solve(ab, dt, data); + int flag = Solve(ab, dt, data); + if (flag == NAUNET_FAIL) { + throw std::runtime_error("Something unrecoverable occurred"); + } return py::array_t(info.shape, ab); } diff --git a/src/naunet_constants.cu b/src/naunet_constants.cu index ab1a9f6..8158a08 100644 --- a/src/naunet_constants.cu +++ b/src/naunet_constants.cu @@ -1,6 +1,6 @@ +// // clang-format off #include "naunet_constants.h" - __constant__ double pi = 3.1415926; // atomic mass unit (g) @@ -27,200 +27,200 @@ __constant__ double echarge = 4.80320425e-10; // Boltzmann constant (erg/K) __constant__ double kerg = 1.380658e-16; -__constant__ double gism = 0.0016; -__constant__ double habing = 100000000.0; -__constant__ double zism = 1.3e-17; -__constant__ double crphot = 10000.0; +// reduced Planck constant __constant__ double hbar = 1.054571726e-27; -__constant__ double eb_GCI = 800.0; -__constant__ double eb_GC10I = 8000.0; -__constant__ double eb_GC10HI = 8537.0; -__constant__ double eb_GC10H2I = 8987.0; -__constant__ double eb_GC11I = 8800.0; -__constant__ double eb_GC2I = 1600.0; -__constant__ double eb_GC2HI = 2137.0; -__constant__ double eb_GC2H2I = 2587.0; -__constant__ double eb_GC2H3I = 3037.0; -__constant__ double eb_GC2H4I = 3487.0; -__constant__ double eb_GC2H4CNI = 5930.0; -__constant__ double eb_GC2H5I = 3937.0; -__constant__ double eb_GC2H5CNI = 6380.0; -__constant__ double eb_GC2H5OHI = 5200.0; -__constant__ double eb_GC2H6I = 2300.0; -__constant__ double eb_GC2NI = 2400.0; -__constant__ double eb_GC2OI = 1950.0; -__constant__ double eb_GC2SI = 5320.0; -__constant__ double eb_GC3I = 2400.0; -__constant__ double eb_GC3HI = 2937.0; -__constant__ double eb_GC3H2I = 3387.0; -__constant__ double eb_GC3NI = 3200.0; -__constant__ double eb_GC3OI = 2750.0; -__constant__ double eb_GC3PI = 1650.0; -__constant__ double eb_GC3SI = 3500.0; -__constant__ double eb_GC4I = 3200.0; -__constant__ double eb_GC4HI = 3737.0; -__constant__ double eb_GC4H2I = 4187.0; -__constant__ double eb_GC4H3I = 4637.0; -__constant__ double eb_GC4H6I = 5987.0; -__constant__ double eb_GC4NI = 4000.0; -__constant__ double eb_GC4PI = 1950.0; -__constant__ double eb_GC4SI = 4300.0; -__constant__ double eb_GC5I = 4000.0; -__constant__ double eb_GC5HI = 4537.0; -__constant__ double eb_GC5H2I = 4987.0; -__constant__ double eb_GC5NI = 4800.0; -__constant__ double eb_GC6I = 4800.0; -__constant__ double eb_GC6HI = 5337.0; -__constant__ double eb_GC6H2I = 5787.0; -__constant__ double eb_GC6H6I = 7587.0; -__constant__ double eb_GC7I = 5600.0; -__constant__ double eb_GC7HI = 6137.0; -__constant__ double eb_GC7H2I = 6587.0; -__constant__ double eb_GC7NI = 6400.0; -__constant__ double eb_GC8I = 6400.0; -__constant__ double eb_GC8HI = 6937.0; -__constant__ double eb_GC8H2I = 7387.0; -__constant__ double eb_GC9I = 7200.0; -__constant__ double eb_GC9HI = 7737.0; -__constant__ double eb_GC9H2I = 8187.0; -__constant__ double eb_GC9NI = 8000.0; -__constant__ double eb_GCCPI = 1350.0; -__constant__ double eb_GCClI = 1150.0; -__constant__ double eb_GCHI = 873.0; -__constant__ double eb_GCH2I = 945.0; -__constant__ double eb_GCH2CCHI = 3837.0; -__constant__ double eb_GCH2CCH2I = 4287.0; -__constant__ double eb_GCH2CHCCHI = 5087.0; -__constant__ double eb_GCH2CHCNI = 5480.0; -__constant__ double eb_GCH2CNI = 4230.0; -__constant__ double eb_GCH2COI = 2200.0; -__constant__ double eb_GCH2NHI = 3428.0; -__constant__ double eb_GCH2OHI = 4330.0; -__constant__ double eb_GCH2OHCHOI = 6680.0; -__constant__ double eb_GCH2OHCOI = 6230.0; -__constant__ double eb_GCH2PHI = 1200.0; -__constant__ double eb_GCH3I = 1018.0; -__constant__ double eb_GCH3C3NI = 6480.0; -__constant__ double eb_GCH3C4HI = 5887.0; -__constant__ double eb_GCH3C5NI = 7880.0; -__constant__ double eb_GCH3C6HI = 7487.0; -__constant__ double eb_GCH3C7NI = 9480.0; -__constant__ double eb_GCH3CCHI = 4287.0; -__constant__ double eb_GCH3CHCH2I = 5187.0; -__constant__ double eb_GCH3CHOI = 3800.0; -__constant__ double eb_GCH3CNI = 4680.0; -__constant__ double eb_GCH3COI = 2320.0; -__constant__ double eb_GCH3COCH3I = 3300.0; -__constant__ double eb_GCH3COOHI = 6300.0; -__constant__ double eb_GCH3OI = 2655.0; -__constant__ double eb_GCH3OCH3I = 3300.0; -__constant__ double eb_GCH3OHI = 4930.0; -__constant__ double eb_GCH4I = 1090.0; -__constant__ double eb_GCNI = 1600.0; -__constant__ double eb_GCNOI = 2400.0; -__constant__ double eb_GCOI = 855.0; -__constant__ double eb_GCO2I = 2990.0; -__constant__ double eb_GCOOCH3I = 3650.0; -__constant__ double eb_GCOOHI = 5120.0; -__constant__ double eb_GCPI = 1050.0; -__constant__ double eb_GCSI = 1900.0; -__constant__ double eb_GClI = 850.0; -__constant__ double eb_GClOI = 1250.0; -__constant__ double eb_GFI = 450.0; -__constant__ double eb_GFeI = 4200.0; -__constant__ double eb_GHI = 600.0; -__constant__ double eb_GH2I = 430.0; -__constant__ double eb_GH2CCCI = 2110.0; -__constant__ double eb_GH2CNI = 2400.0; -__constant__ double eb_GH2COI = 2050.0; -__constant__ double eb_GH2CSI = 2700.0; -__constant__ double eb_GH2OI = 5770.0; -__constant__ double eb_GH2O2I = 5700.0; -__constant__ double eb_GH2SI = 2743.0; -__constant__ double eb_GH2S2I = 3100.0; -__constant__ double eb_GH2SiOI = 1200.0; -__constant__ double eb_GHC2OI = 2400.0; -__constant__ double eb_GHC2PI = 1400.0; -__constant__ double eb_GHC3NI = 4580.0; -__constant__ double eb_GHC5NI = 6180.0; -__constant__ double eb_GHC7NI = 7780.0; -__constant__ double eb_GHC9NI = 9380.0; -__constant__ double eb_GHCCNI = 3780.0; -__constant__ double eb_GHCNI = 3610.0; -__constant__ double eb_GHCNOI = 2850.0; -__constant__ double eb_GHCOI = 1600.0; -__constant__ double eb_GHCOOCH3I = 4000.0; -__constant__ double eb_GHCOOHI = 5000.0; -__constant__ double eb_GHCPI = 1100.0; -__constant__ double eb_GHCSI = 2350.0; -__constant__ double eb_GHCSiI = 1050.0; -__constant__ double eb_GHClI = 900.0; -__constant__ double eb_GHFI = 500.0; -__constant__ double eb_GHNCI = 2050.0; -__constant__ double eb_GHNC3I = 4580.0; -__constant__ double eb_GHNCOI = 2850.0; -__constant__ double eb_GHNOI = 2050.0; -__constant__ double eb_GHNSiI = 1100.0; -__constant__ double eb_GHOCNI = 2850.0; -__constant__ double eb_GHONCI = 2850.0; -__constant__ double eb_GHPOI = 1200.0; -__constant__ double eb_GHSI = 1500.0; -__constant__ double eb_GHS2I = 2650.0; -__constant__ double eb_GHeI = 100.0; -__constant__ double eb_GMgI = 5300.0; -__constant__ double eb_GNI = 800.0; -__constant__ double eb_GN2I = 790.0; -__constant__ double eb_GN2OI = 2400.0; -__constant__ double eb_GNCCNI = 1300.0; -__constant__ double eb_GNHI = 1577.0; -__constant__ double eb_GNH2I = 2354.0; -__constant__ double eb_GNH2CNI = 1200.0; -__constant__ double eb_GNH3I = 3130.0; -__constant__ double eb_GNOI = 1600.0; -__constant__ double eb_GNO2I = 2400.0; -__constant__ double eb_GNSI = 1900.0; -__constant__ double eb_GNaI = 11800.0; -__constant__ double eb_GOI = 800.0; -__constant__ double eb_GO2I = 1000.0; -__constant__ double eb_GO2HI = 3650.0; -__constant__ double eb_GOCNI = 2400.0; -__constant__ double eb_GOCSI = 2888.0; -__constant__ double eb_GOHI = 2850.0; -__constant__ double eb_GPI = 750.0; -__constant__ double eb_GPHI = 800.0; -__constant__ double eb_GPH2I = 850.0; -__constant__ double eb_GPNI = 1100.0; -__constant__ double eb_GPOI = 1150.0; -__constant__ double eb_GSI = 1100.0; -__constant__ double eb_GS2I = 2200.0; -__constant__ double eb_GSOI = 2600.0; -__constant__ double eb_GSO2I = 5330.0; -__constant__ double eb_GSiI = 2700.0; -__constant__ double eb_GSiCI = 3500.0; -__constant__ double eb_GSiC2I = 1300.0; -__constant__ double eb_GSiC2HI = 1350.0; -__constant__ double eb_GSiC2H2I = 1400.0; -__constant__ double eb_GSiC3I = 1600.0; -__constant__ double eb_GSiC3HI = 1650.0; -__constant__ double eb_GSiC4I = 1900.0; -__constant__ double eb_GSiCH2I = 1100.0; -__constant__ double eb_GSiCH3I = 1150.0; -__constant__ double eb_GSiHI = 3150.0; -__constant__ double eb_GSiH2I = 3600.0; -__constant__ double eb_GSiH3I = 4050.0; -__constant__ double eb_GSiH4I = 4500.0; -__constant__ double eb_GSiNI = 3500.0; -__constant__ double eb_GSiNCI = 1350.0; -__constant__ double eb_GSiOI = 3500.0; -__constant__ double eb_GSiO2I = 4300.0; -__constant__ double eb_GSiSI = 3800.0; +__constant__ double gism = 0.0016; +__constant__ double zism = 1.3e-17; +__constant__ double habing = 100000000.0; +__constant__ double crphot = 10000.0; +__constant__ double eb_GFeI = 4200.0; +__constant__ double eb_GHeI = 100.0; +__constant__ double eb_GMgI = 5300.0; +__constant__ double eb_GNaI = 11800.0; +__constant__ double eb_GH2S2I = 3100.0; +__constant__ double eb_GC4H6I = 5987.0; +__constant__ double eb_GC4SI = 4300.0; +__constant__ double eb_GCClI = 1150.0; +__constant__ double eb_GCH3C3NI = 6480.0; +__constant__ double eb_GCH3C4HI = 5887.0; +__constant__ double eb_GCH3C5NI = 7880.0; +__constant__ double eb_GCH3C6HI = 7487.0; +__constant__ double eb_GCH3C7NI = 9480.0; +__constant__ double eb_GClOI = 1250.0; +__constant__ double eb_GHC2PI = 1400.0; +__constant__ double eb_GHClI = 900.0; +__constant__ double eb_GHFI = 500.0; +__constant__ double eb_GHNSiI = 1100.0; +__constant__ double eb_GHPOI = 1200.0; +__constant__ double eb_GNH2CNI = 1200.0; +__constant__ double eb_GNO2I = 2400.0; +__constant__ double eb_GPNI = 1100.0; +__constant__ double eb_GSiC3HI = 1650.0; +__constant__ double eb_GSiCH3I = 1150.0; +__constant__ double eb_GSiO2I = 4300.0; +__constant__ double eb_GSiSI = 3800.0; +__constant__ double eb_GFI = 450.0; +__constant__ double eb_GH2SiOI = 1200.0; +__constant__ double eb_GNCCNI = 1300.0; +__constant__ double eb_GS2I = 2200.0; +__constant__ double eb_GSiC2HI = 1350.0; +__constant__ double eb_GC3SI = 3500.0; +__constant__ double eb_GC4NI = 4000.0; +__constant__ double eb_GC4PI = 1950.0; +__constant__ double eb_GCH2PHI = 1200.0; +__constant__ double eb_GCH3CHCH2I = 5187.0; +__constant__ double eb_GCH3COOHI = 6300.0; +__constant__ double eb_GH2SI = 2743.0; +__constant__ double eb_GHCNOI = 2850.0; +__constant__ double eb_GHCPI = 1100.0; +__constant__ double eb_GHNC3I = 4580.0; +__constant__ double eb_GHNCOI = 2850.0; +__constant__ double eb_GHOCNI = 2850.0; +__constant__ double eb_GHONCI = 2850.0; +__constant__ double eb_GHS2I = 2650.0; +__constant__ double eb_GN2OI = 2400.0; +__constant__ double eb_GPH2I = 850.0; +__constant__ double eb_GPOI = 1150.0; +__constant__ double eb_GSiC2H2I = 1400.0; +__constant__ double eb_GSiC4I = 1900.0; +__constant__ double eb_GSiNCI = 1350.0; +__constant__ double eb_GC3PI = 1650.0; +__constant__ double eb_GC6H6I = 7587.0; +__constant__ double eb_GH2O2I = 5700.0; +__constant__ double eb_GHCSiI = 1050.0; +__constant__ double eb_GPHI = 800.0; +__constant__ double eb_GSO2I = 5330.0; +__constant__ double eb_GSiH4I = 4500.0; +__constant__ double eb_GC2H4CNI = 5930.0; +__constant__ double eb_GC2SI = 5320.0; +__constant__ double eb_GC3OI = 2750.0; +__constant__ double eb_GC4H3I = 4637.0; +__constant__ double eb_GC7H2I = 6587.0; +__constant__ double eb_GC8H2I = 7387.0; +__constant__ double eb_GC9H2I = 8187.0; +__constant__ double eb_GCH2CNI = 4230.0; +__constant__ double eb_GCH3CNI = 4680.0; +__constant__ double eb_GH2CNI = 2400.0; +__constant__ double eb_GH2CSI = 2700.0; +__constant__ double eb_GHC2OI = 2400.0; +__constant__ double eb_GHC5NI = 6180.0; +__constant__ double eb_GHC7NI = 7780.0; +__constant__ double eb_GHC9NI = 9380.0; +__constant__ double eb_GHCCNI = 3780.0; +__constant__ double eb_GHCSI = 2350.0; +__constant__ double eb_GSiC3I = 1600.0; +__constant__ double eb_GSiH3I = 4050.0; +__constant__ double eb_GSiNI = 3500.0; +__constant__ double eb_GSiOI = 3500.0; +__constant__ double eb_GC2H6I = 2300.0; +__constant__ double eb_GC3H2I = 3387.0; +__constant__ double eb_GC5H2I = 4987.0; +__constant__ double eb_GCCPI = 1350.0; +__constant__ double eb_GCH2CHCCHI = 5087.0; +__constant__ double eb_GCH3COCH3I = 3300.0; +__constant__ double eb_GCH3OCH3I = 3300.0; +__constant__ double eb_GClI = 850.0; +__constant__ double eb_GSiCH2I = 1100.0; +__constant__ double eb_GSiHI = 3150.0; +__constant__ double eb_GSiH2I = 3600.0; +__constant__ double eb_GC10H2I = 8987.0; +__constant__ double eb_GC4H2I = 4187.0; +__constant__ double eb_GCH2CHCNI = 5480.0; +__constant__ double eb_GH2CCCI = 2110.0; +__constant__ double eb_GHC3NI = 4580.0; +__constant__ double eb_GOCSI = 2888.0; +__constant__ double eb_GC2H5CNI = 6380.0; +__constant__ double eb_GC2H5OHI = 5200.0; +__constant__ double eb_GC2OI = 1950.0; +__constant__ double eb_GC6H2I = 5787.0; +__constant__ double eb_GC9NI = 8000.0; +__constant__ double eb_GCO2I = 2990.0; +__constant__ double eb_GCPI = 1050.0; +__constant__ double eb_GO2HI = 3650.0; +__constant__ double eb_GOCNI = 2400.0; +__constant__ double eb_GSOI = 2600.0; +__constant__ double eb_GSiCI = 3500.0; +__constant__ double eb_GC11I = 8800.0; +__constant__ double eb_GC2NI = 2400.0; +__constant__ double eb_GCH2CCH2I = 4287.0; +__constant__ double eb_GCH2NHI = 3428.0; +__constant__ double eb_GCH3CCHI = 4287.0; +__constant__ double eb_GCNOI = 2400.0; +__constant__ double eb_GHNCI = 2050.0; +__constant__ double eb_GNSI = 1900.0; +__constant__ double eb_GSiC2I = 1300.0; +__constant__ double eb_GCH2CCHI = 3837.0; +__constant__ double eb_GCH2COI = 2200.0; +__constant__ double eb_GHNOI = 2050.0; +__constant__ double eb_GN2I = 790.0; +__constant__ double eb_GC5NI = 4800.0; +__constant__ double eb_GPI = 750.0; +__constant__ double eb_GC2H5I = 3937.0; +__constant__ double eb_GC3NI = 3200.0; +__constant__ double eb_GC7NI = 6400.0; +__constant__ double eb_GCOOCH3I = 3650.0; +__constant__ double eb_GHCNI = 3610.0; +__constant__ double eb_GNH3I = 3130.0; +__constant__ double eb_GC10I = 8000.0; +__constant__ double eb_GC10HI = 8537.0; +__constant__ double eb_GC8HI = 6937.0; +__constant__ double eb_GCH2OHCOI = 6230.0; +__constant__ double eb_GCOOHI = 5120.0; +__constant__ double eb_GO2I = 1000.0; +__constant__ double eb_GC2H4I = 3487.0; +__constant__ double eb_GC9I = 7200.0; +__constant__ double eb_GC9HI = 7737.0; +__constant__ double eb_GCSI = 1900.0; +__constant__ double eb_GHSI = 1500.0; +__constant__ double eb_GCH2OHCHOI = 6680.0; +__constant__ double eb_GHCOOHI = 5000.0; +__constant__ double eb_GC2H2I = 2587.0; +__constant__ double eb_GC5I = 4000.0; +__constant__ double eb_GC7HI = 6137.0; +__constant__ double eb_GCH3COI = 2320.0; +__constant__ double eb_GHCOOCH3I = 4000.0; +__constant__ double eb_GC6I = 4800.0; +__constant__ double eb_GC8I = 6400.0; +__constant__ double eb_GCH2OHI = 4330.0; +__constant__ double eb_GCH3OHI = 4930.0; +__constant__ double eb_GC3HI = 2937.0; +__constant__ double eb_GC4HI = 3737.0; +__constant__ double eb_GC5HI = 4537.0; +__constant__ double eb_GC6HI = 5337.0; +__constant__ double eb_GC2H3I = 3037.0; +__constant__ double eb_GCH3OI = 2655.0; +__constant__ double eb_GH2OI = 5770.0; +__constant__ double eb_GC7I = 5600.0; +__constant__ double eb_GSiI = 2700.0; +__constant__ double eb_GC4I = 3200.0; +__constant__ double eb_GCH3CHOI = 3800.0; +__constant__ double eb_GH2COI = 2050.0; +__constant__ double eb_GNOI = 1600.0; +__constant__ double eb_GCH4I = 1090.0; +__constant__ double eb_GC2HI = 2137.0; +__constant__ double eb_GNH2I = 2354.0; +__constant__ double eb_GHCOI = 1600.0; +__constant__ double eb_GNHI = 1577.0; +__constant__ double eb_GSI = 1100.0; +__constant__ double eb_GC3I = 2400.0; +__constant__ double eb_GOHI = 2850.0; +__constant__ double eb_GCOI = 855.0; +__constant__ double eb_GCH2I = 945.0; +__constant__ double eb_GC2I = 1600.0; +__constant__ double eb_GCNI = 1600.0; +__constant__ double eb_GNI = 800.0; +__constant__ double eb_GOI = 800.0; +__constant__ double eb_GCH3I = 1018.0; +__constant__ double eb_GCHI = 873.0; +__constant__ double eb_GH2I = 430.0; +__constant__ double eb_GCI = 800.0; +__constant__ double eb_GHI = 600.0; // Table of H2 self-shielding factor (Walsh et al. 2015) // H2 column density -__device__ -double H2ShieldingTableX[105] = +__device__ double H2ShieldingTableX[105] = {0.000e+00, 3.690e+11, 3.715e+12, 3.948e+13, 1.233e+14, 2.536e+14, 4.342e+14, 6.653e+14, 6.689e+14, 9.075e+14, 1.234e+15, 1.631e+15, 2.105e+15, 2.363e+15, 2.899e+15, @@ -243,8 +243,7 @@ double H2ShieldingTableX[105] = 3.303e+21, 3.497e+21, 3.722e+21, 3.983e+21, 4.283e+21, 4.644e+21, 5.127e+21, 5.945e+21, 8.205e+21, 1.015e+22}; -__device__ -double H2ShieldingTable[105] = +__device__ double H2ShieldingTable[105] = {1.000e+00, 9.983e-01, 9.853e-01, 8.761e-01, 7.199e-01, 5.728e-01, 4.455e-01, 3.431e-01, 3.418e-01, 2.732e-01, 2.110e-01, 1.619e-01, 1.236e-01, 1.084e-01, 8.447e-02, @@ -269,13 +268,11 @@ double H2ShieldingTable[105] = // Table of CO self-shielding factor // Excitation temperature -__device__ -double COShieldingTableX[5] = +__device__ double COShieldingTableX[5] = {5.0, 20.0, 50.0, 100.0, 1000.0}; // H2 column density -__device__ -double COShieldingTableY[41] = +__device__ double COShieldingTableY[41] = {1.000e+15, 1.585e+15, 2.512e+15, 3.981e+15, 6.310e+15, 1.000e+16, 1.585e+16, 2.512e+16, 3.981e+16, 6.310e+16, 1.000e+17, 1.585e+17, 2.512e+17, 3.981e+17, 6.310e+17, 1.000e+18, 1.585e+18, 2.512e+18, 3.981e+18, 6.310e+18, 1.000e+19, @@ -284,8 +281,7 @@ double COShieldingTableY[41] = 1.000e+22, 1.585e+22, 2.512e+22, 3.981e+22, 6.310e+22, 1.000e+23}; // CO column density -__device__ -double COShieldingTableZ[46] = +__device__ double COShieldingTableZ[46] = {1.000e+10, 1.585e+10, 2.512e+10, 3.981e+10, 6.310e+10, 1.000e+11, 1.585e+11, 2.512e+11, 3.981e+11, 6.310e+11, 1.000e+12, 1.585e+12, 2.512e+12, 3.981e+12, 6.310e+12, 1.000e+13, 1.585e+13, 2.512e+13, 3.981e+13, 6.310e+13, 1.000e+14, @@ -294,8 +290,7 @@ double COShieldingTableZ[46] = 1.000e+17, 1.585e+17, 2.512e+17, 3.981e+17, 6.310e+17, 1.000e+18, 1.585e+18, 2.512e+18, 3.981e+18, 6.310e+18, 1.000e+19}; -__device__ -double COShieldingTable[5][41][46] = +__device__ double COShieldingTable[5][41][46] = {{{8.524e-01, 8.524e-01, 8.523e-01, 8.523e-01, 8.522e-01, 8.521e-01, 8.519e-01, 8.515e-01, 8.510e-01, 8.502e-01, 8.489e-01, 8.468e-01, 8.436e-01, 8.385e-01, 8.305e-01, 8.183e-01, 7.998e-01, 7.724e-01, @@ -1943,13 +1938,11 @@ double COShieldingTable[5][41][46] = // Table of N2 self-shielding factor // Excitation temperature -__device__ -double N2ShieldingTableX[5] = +__device__ double N2ShieldingTableX[5] = {10.0, 30.0, 50.0, 100.0, 1000.0}; // H2 column density -__device__ -double N2ShieldingTableY[46] = +__device__ double N2ShieldingTableY[46] = {1.000e+14, 1.585e+14, 2.512e+14, 3.981e+14, 6.310e+14, 1.000e+15, 1.585e+15, 2.512e+15, 3.981e+15, 6.310e+15, 1.000e+16, 1.585e+16, 2.512e+16, 3.981e+16, 6.310e+16, 1.000e+17, 1.585e+17, 2.512e+17, 3.981e+17, 6.310e+17, 1.000e+18, @@ -1959,8 +1952,7 @@ double N2ShieldingTableY[46] = 2.512e+22, 3.981e+22, 6.310e+22, 1.000e+23}; // N2 column density -__device__ -double N2ShieldingTableZ[46] = +__device__ double N2ShieldingTableZ[46] = {1.000e+10, 1.585e+10, 2.512e+10, 3.981e+10, 6.310e+10, 1.000e+11, 1.585e+11, 2.512e+11, 3.981e+11, 6.310e+11, 1.000e+12, 1.585e+12, 2.512e+12, 3.981e+12, 6.310e+12, 1.000e+13, 1.585e+13, 2.512e+13, 3.981e+13, 6.310e+13, 1.000e+14, @@ -1969,8 +1961,7 @@ double N2ShieldingTableZ[46] = 1.000e+17, 1.585e+17, 2.512e+17, 3.981e+17, 6.310e+17, 1.000e+18, 1.585e+18, 2.512e+18, 3.981e+18, 6.310e+18, 1.000e+19}; -__device__ -double N2ShieldingTable[5][46][46] = +__device__ double N2ShieldingTable[5][46][46] = {{{9.375e-01, 9.374e-01, 9.372e-01, 9.369e-01, 9.364e-01, 9.356e-01, 9.344e-01, 9.325e-01, 9.295e-01, 9.249e-01, 9.179e-01, 9.073e-01, 8.918e-01, 8.693e-01, 8.379e-01, 7.956e-01, 7.414e-01, 6.762e-01, @@ -3815,4 +3806,3 @@ double N2ShieldingTable[5][46][46] = 5.245e-28, 4.586e-28, 3.836e-28, 3.080e-28, 2.391e-28, 1.791e-28, 1.286e-28, 8.913e-29, 6.087e-29, 4.069e-29, 2.580e-29, 1.512e-29, 8.077e-30, 3.838e-30, 1.515e-30, 4.391e-31}}}; - diff --git a/src/naunet_fex.cu b/src/naunet_fex.cu index 006c4f2..129148d 100644 --- a/src/naunet_fex.cu +++ b/src/naunet_fex.cu @@ -3,18 +3,18 @@ #include #include /* */ -/* */ -#include "naunet_ode.h" -/* */ #include "naunet_constants.h" #include "naunet_macros.h" +#include "naunet_ode.h" #include "naunet_physics.h" -#define IJth(A, i, j) SM_ELEMENT_D(A, i, j) -#define NVEC_CUDA_CONTENT(x) ((N_VectorContent_Cuda)(x->content)) -#define NVEC_CUDA_STREAM(x) (NVEC_CUDA_CONTENT(x)->stream_exec_policy->stream()) -#define NVEC_CUDA_BLOCKSIZE(x) (NVEC_CUDA_CONTENT(x)->stream_exec_policy->blockSize()) -#define NVEC_CUDA_GRIDSIZE(x, n) (NVEC_CUDA_CONTENT(x)->stream_exec_policy->gridSize(n)) +#define IJth(A, i, j) SM_ELEMENT_D(A, i, j) +#define NVEC_CUDA_CONTENT(x) ((N_VectorContent_Cuda)(x->content)) +#define NVEC_CUDA_STREAM(x) (NVEC_CUDA_CONTENT(x)->stream_exec_policy->stream()) +#define NVEC_CUDA_BLOCKSIZE(x) \ + (NVEC_CUDA_CONTENT(x)->stream_exec_policy->blockSize()) +#define NVEC_CUDA_GRIDSIZE(x, n) \ + (NVEC_CUDA_CONTENT(x)->stream_exec_policy->gridSize(n)) /* */ __global__ void FexKernel(realtype *y, realtype *ydot, NaunetData *d_udata, @@ -25,22621 +25,1991 @@ __global__ void FexKernel(realtype *y, realtype *ydot, NaunetData *d_udata, for (int cur = tidx; cur < nsystem; cur += gs) { int yistart = cur * NEQUATIONS; realtype *y_cur = y + yistart; - realtype k[NREACTIONS] = {0.0}; NaunetData *udata = &d_udata[cur]; // clang-format off + realtype nH = udata->nH; + realtype Tgas = udata->Tgas; + realtype Tdust = udata->Tdust; + realtype zeta_cr = udata->zeta_cr; + realtype Av = udata->Av; + realtype omega = udata->omega; + realtype zeta_xr = udata->zeta_xr; + realtype G0 = udata->G0; realtype rG = udata->rG; - realtype barr = udata->barr; realtype sites = udata->sites; + realtype barr = udata->barr; realtype hop = udata->hop; realtype nMono = udata->nMono; + realtype opt_frz = udata->opt_frz; + realtype opt_thd = udata->opt_thd; + realtype opt_crd = udata->opt_crd; realtype duty = udata->duty; realtype Tcr = udata->Tcr; + realtype opt_uvd = udata->opt_uvd; + realtype opt_rcd = udata->opt_rcd; realtype branch = udata->branch; - realtype nH = udata->nH; - realtype zeta_cr = udata->zeta_cr; - realtype zeta_xr = udata->zeta_xr; - realtype Tgas = udata->Tgas; - realtype Tdust = udata->Tdust; - realtype Av = udata->Av; - realtype G0 = udata->G0; - realtype omega = udata->omega; + realtype h2col = 0.5*1.59e21*Av; + realtype cocol = 1e-5 * h2col; + realtype n2col = 1e-5 * h2col; + realtype stick1 = (1.0 / (1.0 + 4.2e-2*sqrt(Tgas+Tdust) + 2.3e-3*Tgas - 1.3e-7*Tgas*Tgas)); + realtype stick2 = exp(-1741.0/Tgas) / (1.0 + 5e-2*sqrt(Tgas+Tdust) + 1e-14*pow(Tgas, 4.0)); + realtype stick = stick1 + stick2; + realtype gdens = y[IDX_GRAINM] + y[IDX_GRAIN0I]; + realtype mant = GetMantleDens(y); + realtype garea = (4.0*pi*rG*rG) * gdens; + realtype unisites = sites * (4*pi*rG*rG); + realtype densites = garea * sites; + realtype freq = sqrt((2.0*sites*kerg)/((pi*pi)*amu)); + realtype quan = -2.0*(barr/hbar) * sqrt(2.0*amu*kerg); + realtype layers = mant/(nMono*densites); + realtype cov = (mant == 0.0) ? 0.0 : fmin(layers/mant, 1.0/mant); + realtype hloss = stick * garea/4.0 * sqrt(8.0*kerg*Tgas/(pi*amu)); +#if (NHEATPROCS || NCOOLPROCS) + if (mu < 0) mu = GetMu(y_cur); + if (gamma < 0) gamma = GetGamma(y_cur); +#endif + // clang-format on + realtype k[NREACTIONS] = {0.0}; EvalRates(k, y_cur, udata); +#if NHEATPROCS + realtype kh[NHEATPROCS] = {0.0}; + EvalHeatingRates(kh, y_cur, udata); +#endif + +#if NCOOLPROCS + realtype kc[NCOOLPROCS] = {0.0}; + EvalCoolingRates(kc, y_cur, udata); +#endif + // clang-format off - ydot[yistart + IDX_CI] = 0.0 - k[0]*y_cur[IDX_CM]*y_cur[IDX_CI] - - k[37]*y_cur[IDX_CI]*y_cur[IDX_C10M] - - k[38]*y_cur[IDX_CI]*y_cur[IDX_C2M] - - k[39]*y_cur[IDX_CI]*y_cur[IDX_C2HM] - - k[40]*y_cur[IDX_CI]*y_cur[IDX_C3M] - - k[41]*y_cur[IDX_CI]*y_cur[IDX_C3HM] - - k[42]*y_cur[IDX_CI]*y_cur[IDX_C3NM] - - k[43]*y_cur[IDX_CI]*y_cur[IDX_C4M] - - k[44]*y_cur[IDX_CI]*y_cur[IDX_C4HM] - - k[45]*y_cur[IDX_CI]*y_cur[IDX_C5M] - - k[46]*y_cur[IDX_CI]*y_cur[IDX_C5HM] - - k[47]*y_cur[IDX_CI]*y_cur[IDX_C6M] - - k[48]*y_cur[IDX_CI]*y_cur[IDX_C6HM] - - k[49]*y_cur[IDX_CI]*y_cur[IDX_C7M] - - k[50]*y_cur[IDX_CI]*y_cur[IDX_C7HM] - - k[51]*y_cur[IDX_CI]*y_cur[IDX_C8M] - - k[52]*y_cur[IDX_CI]*y_cur[IDX_C8HM] - - k[53]*y_cur[IDX_CI]*y_cur[IDX_C9M] - - k[54]*y_cur[IDX_CI]*y_cur[IDX_C9HM] - - k[55]*y_cur[IDX_CI]*y_cur[IDX_CHM] - - k[56]*y_cur[IDX_CI]*y_cur[IDX_OM] - - k[57]*y_cur[IDX_CI]*y_cur[IDX_OHM] - - k[58]*y_cur[IDX_CI]*y_cur[IDX_SM] - - k[68]*y_cur[IDX_HM]*y_cur[IDX_CI] + - k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + - k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] + - k[147]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + - k[148]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[149]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + - k[150]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] + - k[151]*y_cur[IDX_CII]*y_cur[IDX_C2OI] + - k[152]*y_cur[IDX_CII]*y_cur[IDX_C2SI] + - k[153]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + - k[154]*y_cur[IDX_CII]*y_cur[IDX_C3SI] + - k[155]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + - k[156]*y_cur[IDX_CII]*y_cur[IDX_C4SI] + - k[157]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + - k[158]*y_cur[IDX_CII]*y_cur[IDX_CCPI] + - k[159]*y_cur[IDX_CII]*y_cur[IDX_CClI] + - k[160]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + - k[161]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + - k[162]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + - k[163]*y_cur[IDX_CII]*y_cur[IDX_CH2CNI] + - k[164]*y_cur[IDX_CII]*y_cur[IDX_CH2COI] + - k[165]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + - k[166]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[167]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] + - k[168]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] + - k[169]*y_cur[IDX_CII]*y_cur[IDX_CH3OCH3I] + - k[170]*y_cur[IDX_CII]*y_cur[IDX_CHI] + - k[171]*y_cur[IDX_CII]*y_cur[IDX_CPI] + - k[172]*y_cur[IDX_CII]*y_cur[IDX_ClOI] + - k[173]*y_cur[IDX_CII]*y_cur[IDX_FeI] + - k[174]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + - k[175]*y_cur[IDX_CII]*y_cur[IDX_H2SI] + - k[176]*y_cur[IDX_CII]*y_cur[IDX_H2SiOI] + - k[177]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + - k[178]*y_cur[IDX_CII]*y_cur[IDX_HCOI] + - k[179]*y_cur[IDX_CII]*y_cur[IDX_HCOOCH3I] + - k[180]*y_cur[IDX_CII]*y_cur[IDX_HCPI] + - k[181]*y_cur[IDX_CII]*y_cur[IDX_HPOI] + - k[182]*y_cur[IDX_CII]*y_cur[IDX_MgI] + - k[185]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + - k[186]*y_cur[IDX_CII]*y_cur[IDX_NOI] + - k[187]*y_cur[IDX_CII]*y_cur[IDX_NSI] + - k[188]*y_cur[IDX_CII]*y_cur[IDX_NaI] + - k[189]*y_cur[IDX_CII]*y_cur[IDX_OCSI] + - k[190]*y_cur[IDX_CII]*y_cur[IDX_PI] + - k[191]*y_cur[IDX_CII]*y_cur[IDX_PHI] + - k[192]*y_cur[IDX_CII]*y_cur[IDX_POI] + - k[193]*y_cur[IDX_CII]*y_cur[IDX_SOI] + - k[194]*y_cur[IDX_CII]*y_cur[IDX_SiI] + - k[195]*y_cur[IDX_CII]*y_cur[IDX_SiC2I] + - k[196]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] + - k[197]*y_cur[IDX_CII]*y_cur[IDX_SiC3I] + - k[198]*y_cur[IDX_CII]*y_cur[IDX_SiCI] + - k[199]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + - k[200]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + - k[201]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + - k[202]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + - k[203]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + - k[204]*y_cur[IDX_CII]*y_cur[IDX_SiSI] - - k[244]*y_cur[IDX_CI]*y_cur[IDX_C2II] - - k[245]*y_cur[IDX_CI]*y_cur[IDX_CNII] - - k[246]*y_cur[IDX_CI]*y_cur[IDX_COII] - - k[247]*y_cur[IDX_CI]*y_cur[IDX_N2II] - - k[248]*y_cur[IDX_CI]*y_cur[IDX_O2II] - - k[249]*y_cur[IDX_CI]*y_cur[IDX_PNII] - - k[513]*y_cur[IDX_HeII]*y_cur[IDX_CI] + - k[707]*y_cur[IDX_SI]*y_cur[IDX_CII] + - k[708]*y_cur[IDX_SI]*y_cur[IDX_CII] + - k[728]*y_cur[IDX_C10II]*y_cur[IDX_eM] + - k[734]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + - k[739]*y_cur[IDX_C2II]*y_cur[IDX_eM] + - k[739]*y_cur[IDX_C2II]*y_cur[IDX_eM] + - k[741]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + - k[755]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[756]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[763]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[781]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + - k[785]*y_cur[IDX_C2OII]*y_cur[IDX_eM] + - k[786]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + - k[788]*y_cur[IDX_C3II]*y_cur[IDX_eM] + - k[789]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + - k[792]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[816]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + - k[820]*y_cur[IDX_C4II]*y_cur[IDX_eM] + - k[832]*y_cur[IDX_C4NII]*y_cur[IDX_eM] + - k[833]*y_cur[IDX_C4PII]*y_cur[IDX_eM] + - k[836]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + - k[839]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + - k[849]*y_cur[IDX_C6II]*y_cur[IDX_eM] + - k[850]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + - k[865]*y_cur[IDX_C7II]*y_cur[IDX_eM] + - k[866]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + - k[878]*y_cur[IDX_C8II]*y_cur[IDX_eM] + - k[879]*y_cur[IDX_C8HII]*y_cur[IDX_eM] + - k[890]*y_cur[IDX_C9II]*y_cur[IDX_eM] + - k[891]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + - k[902]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + - k[904]*y_cur[IDX_CClII]*y_cur[IDX_eM] + - k[905]*y_cur[IDX_CFII]*y_cur[IDX_eM] + - k[906]*y_cur[IDX_CHII]*y_cur[IDX_eM] + - k[907]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + - k[908]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + - k[977]*y_cur[IDX_CNII]*y_cur[IDX_eM] + - k[979]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + - k[980]*y_cur[IDX_COII]*y_cur[IDX_eM] + - k[984]*y_cur[IDX_CPII]*y_cur[IDX_eM] + - k[985]*y_cur[IDX_CSII]*y_cur[IDX_eM] + - k[1057]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + - k[1177]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + - k[1192]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + - k[1223]*y_cur[IDX_SiCII]*y_cur[IDX_eM] + - k[1225]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] + - k[1232]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + - k[1239]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] + - k[1451]*y_cur[IDX_C2II]*y_cur[IDX_C2I] + - k[1456]*y_cur[IDX_C2II]*y_cur[IDX_SI] + - k[1464]*y_cur[IDX_C2I]*y_cur[IDX_SII] - - k[1846]*y_cur[IDX_CI]*y_cur[IDX_C10HII] - - k[1847]*y_cur[IDX_CI]*y_cur[IDX_C10HM] - - k[1848]*y_cur[IDX_CI]*y_cur[IDX_C10H2II] - - k[1849]*y_cur[IDX_CI]*y_cur[IDX_C2HII] - - k[1850]*y_cur[IDX_CI]*y_cur[IDX_C2H2II] - - k[1851]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] - - k[1852]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] - - k[1853]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - - k[1854]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - - k[1855]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] - - k[1856]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] - - k[1857]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] - - k[1858]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] - - k[1859]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] - - k[1860]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] - - k[1861]*y_cur[IDX_CI]*y_cur[IDX_C3H5II] - - k[1862]*y_cur[IDX_CI]*y_cur[IDX_C4HII] - - k[1863]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] - - k[1864]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] - - k[1865]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - - k[1866]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - - k[1867]*y_cur[IDX_CI]*y_cur[IDX_C5HII] - - k[1868]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - - k[1869]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - - k[1870]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] - - k[1871]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] - - k[1872]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] - - k[1873]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] - - k[1874]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - - k[1875]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - - k[1876]*y_cur[IDX_CI]*y_cur[IDX_C7HII] - - k[1877]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] - - k[1878]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] - - k[1879]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] - - k[1880]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] - - k[1881]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] - - k[1882]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] - - k[1883]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - - k[1884]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - - k[1885]*y_cur[IDX_CI]*y_cur[IDX_C9HII] - - k[1886]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] - - k[1887]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] - - k[1888]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] - - k[1889]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] - - k[1890]*y_cur[IDX_CI]*y_cur[IDX_CHII] - - k[1891]*y_cur[IDX_CI]*y_cur[IDX_CH2II] - - k[1892]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - - k[1893]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - - k[1894]*y_cur[IDX_CI]*y_cur[IDX_CH3II] - - k[1895]*y_cur[IDX_CI]*y_cur[IDX_CH3C3NHII] - - k[1896]*y_cur[IDX_CI]*y_cur[IDX_CH3C5NHII] - - k[1897]*y_cur[IDX_CI]*y_cur[IDX_CH3C7NHII] - - k[1898]*y_cur[IDX_CI]*y_cur[IDX_CH5II] - - k[1899]*y_cur[IDX_CI]*y_cur[IDX_H2OII] - - k[1900]*y_cur[IDX_CI]*y_cur[IDX_H2SII] - - k[1901]*y_cur[IDX_CI]*y_cur[IDX_H3OII] - - k[1902]*y_cur[IDX_CI]*y_cur[IDX_HC2SII] - - k[1903]*y_cur[IDX_CI]*y_cur[IDX_HCNII] - - k[1904]*y_cur[IDX_CI]*y_cur[IDX_HCOII] - - k[1905]*y_cur[IDX_CI]*y_cur[IDX_HCO2II] - - k[1906]*y_cur[IDX_CI]*y_cur[IDX_HCPII] - - k[1907]*y_cur[IDX_CI]*y_cur[IDX_HNOII] - - k[1908]*y_cur[IDX_CI]*y_cur[IDX_HSII] - - k[1909]*y_cur[IDX_CI]*y_cur[IDX_N2HII] - - k[1910]*y_cur[IDX_CI]*y_cur[IDX_NHII] - - k[1911]*y_cur[IDX_CI]*y_cur[IDX_NH4II] - - k[1912]*y_cur[IDX_CI]*y_cur[IDX_O2II] - - k[1913]*y_cur[IDX_CI]*y_cur[IDX_O2HII] - - k[1914]*y_cur[IDX_CI]*y_cur[IDX_OHII] - - k[1915]*y_cur[IDX_CI]*y_cur[IDX_SiC2HII] - - k[1916]*y_cur[IDX_CI]*y_cur[IDX_SiC2H2II] - - k[1917]*y_cur[IDX_CI]*y_cur[IDX_SiC2H3II] - - k[1918]*y_cur[IDX_CI]*y_cur[IDX_SiC3HII] - - k[1919]*y_cur[IDX_CI]*y_cur[IDX_SiC3H2II] - - k[1920]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - - k[1921]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - - k[1922]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - - k[1923]*y_cur[IDX_CI]*y_cur[IDX_SiCH3II] - - k[1924]*y_cur[IDX_CI]*y_cur[IDX_SiCH4II] - - k[1925]*y_cur[IDX_CI]*y_cur[IDX_SiHII] - - k[1926]*y_cur[IDX_CI]*y_cur[IDX_SiH2II] - - k[1927]*y_cur[IDX_CI]*y_cur[IDX_SiH3II] - - k[1928]*y_cur[IDX_CI]*y_cur[IDX_SiH4II] - - k[1929]*y_cur[IDX_CI]*y_cur[IDX_SiH5II] - - k[1930]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] - - k[1931]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] - - k[1932]*y_cur[IDX_CI]*y_cur[IDX_SiOII] + - k[1937]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] + - k[1949]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + - k[1952]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + - k[1954]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] + - k[1958]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + - k[1960]*y_cur[IDX_CHII]*y_cur[IDX_HNCI] + - k[1964]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + - k[1971]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] + - k[1974]*y_cur[IDX_CHII]*y_cur[IDX_SI] + - k[2245]*y_cur[IDX_CHI]*y_cur[IDX_COII] + - k[2260]*y_cur[IDX_CHI]*y_cur[IDX_NH3II] + - k[2293]*y_cur[IDX_HII]*y_cur[IDX_C10I] - - k[2374]*y_cur[IDX_H2II]*y_cur[IDX_CI] - - k[2632]*y_cur[IDX_H3II]*y_cur[IDX_CI] + - k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + - k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3106]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + - k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + - k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + - k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + - k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + - k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + - k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + - k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + - k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + - k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + - k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] + - k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] + - k[3316]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + - k[3344]*y_cur[IDX_NII]*y_cur[IDX_COI] + - k[3384]*y_cur[IDX_NI]*y_cur[IDX_C2M] + - k[3456]*y_cur[IDX_NI]*y_cur[IDX_CNII] + - k[3479]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + - k[3631]*y_cur[IDX_OII]*y_cur[IDX_C2I] + - k[3639]*y_cur[IDX_OII]*y_cur[IDX_CNI] + - k[3684]*y_cur[IDX_OI]*y_cur[IDX_C2II] + - k[3686]*y_cur[IDX_OI]*y_cur[IDX_C2HII] + - k[3753]*y_cur[IDX_OI]*y_cur[IDX_SiCII] + - k[3886]*y_cur[IDX_CM]*y_cur[IDX_CII] + - k[3886]*y_cur[IDX_CM]*y_cur[IDX_CII] + - k[3887]*y_cur[IDX_CM]*y_cur[IDX_C2H2II] + - k[3888]*y_cur[IDX_CM]*y_cur[IDX_C2H3II] + - k[3889]*y_cur[IDX_CM]*y_cur[IDX_C4H2II] + - k[3890]*y_cur[IDX_CM]*y_cur[IDX_C4H3II] + - k[3891]*y_cur[IDX_CM]*y_cur[IDX_C4SII] + - k[3892]*y_cur[IDX_CM]*y_cur[IDX_CH2CCHII] + - k[3893]*y_cur[IDX_CM]*y_cur[IDX_CH3II] + - k[3894]*y_cur[IDX_CM]*y_cur[IDX_CNCII] + - k[3895]*y_cur[IDX_CM]*y_cur[IDX_FeII] + - k[3896]*y_cur[IDX_CM]*y_cur[IDX_HII] + - k[3897]*y_cur[IDX_CM]*y_cur[IDX_H2COII] + - k[3898]*y_cur[IDX_CM]*y_cur[IDX_H2SII] + - k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] + - k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] + - k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] + - k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + - k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + - k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + - k[3905]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + - k[3906]*y_cur[IDX_CM]*y_cur[IDX_HeII] + - k[3907]*y_cur[IDX_CM]*y_cur[IDX_MgII] + - k[3908]*y_cur[IDX_CM]*y_cur[IDX_NII] + - k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] + - k[3910]*y_cur[IDX_CM]*y_cur[IDX_NH3II] + - k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] + - k[3912]*y_cur[IDX_CM]*y_cur[IDX_NOII] + - k[3913]*y_cur[IDX_CM]*y_cur[IDX_NaII] + - k[3914]*y_cur[IDX_CM]*y_cur[IDX_OII] + - k[3915]*y_cur[IDX_CM]*y_cur[IDX_SII] + - k[3916]*y_cur[IDX_CM]*y_cur[IDX_SOII] + - k[3917]*y_cur[IDX_CM]*y_cur[IDX_SiII] + - k[3918]*y_cur[IDX_CM]*y_cur[IDX_SiOII] + - k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] + - k[3920]*y_cur[IDX_CM]*y_cur[IDX_SiSII] + - k[3921]*y_cur[IDX_C10M]*y_cur[IDX_CII] + - k[3956]*y_cur[IDX_C10HM]*y_cur[IDX_CII] + - k[3991]*y_cur[IDX_C2M]*y_cur[IDX_CII] + - k[4026]*y_cur[IDX_C2HM]*y_cur[IDX_CII] + - k[4061]*y_cur[IDX_C3M]*y_cur[IDX_CII] + - k[4096]*y_cur[IDX_C3HM]*y_cur[IDX_CII] + - k[4131]*y_cur[IDX_C3NM]*y_cur[IDX_CII] + - k[4166]*y_cur[IDX_C4M]*y_cur[IDX_CII] + - k[4201]*y_cur[IDX_C4HM]*y_cur[IDX_CII] + - k[4236]*y_cur[IDX_C5M]*y_cur[IDX_CII] + - k[4271]*y_cur[IDX_C5HM]*y_cur[IDX_CII] + - k[4306]*y_cur[IDX_C5NM]*y_cur[IDX_CII] + - k[4341]*y_cur[IDX_C6M]*y_cur[IDX_CII] + - k[4376]*y_cur[IDX_C6HM]*y_cur[IDX_CII] + - k[4411]*y_cur[IDX_C7M]*y_cur[IDX_CII] + - k[4446]*y_cur[IDX_C7HM]*y_cur[IDX_CII] + - k[4481]*y_cur[IDX_C8M]*y_cur[IDX_CII] + - k[4516]*y_cur[IDX_C8HM]*y_cur[IDX_CII] + - k[4551]*y_cur[IDX_C9M]*y_cur[IDX_CII] + - k[4586]*y_cur[IDX_C9HM]*y_cur[IDX_CII] + - k[4621]*y_cur[IDX_CHM]*y_cur[IDX_CII] + - k[4656]*y_cur[IDX_CNM]*y_cur[IDX_CII] + - k[4691]*y_cur[IDX_HM]*y_cur[IDX_CII] + - k[4727]*y_cur[IDX_OM]*y_cur[IDX_CII] + - k[4762]*y_cur[IDX_O2M]*y_cur[IDX_CII] + - k[4797]*y_cur[IDX_OHM]*y_cur[IDX_CII] + - k[4832]*y_cur[IDX_SM]*y_cur[IDX_CII] + - k[4876]*y_cur[IDX_C2I]*y_cur[IDX_SI] - - k[4909]*y_cur[IDX_CI]*y_cur[IDX_C10H2I] - - k[4910]*y_cur[IDX_CI]*y_cur[IDX_C10HI] - - k[4911]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] - - k[4912]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] - - k[4913]*y_cur[IDX_CI]*y_cur[IDX_C2H3I] - - k[4914]*y_cur[IDX_CI]*y_cur[IDX_C2H4I] - - k[4915]*y_cur[IDX_CI]*y_cur[IDX_C2H5I] - - k[4916]*y_cur[IDX_CI]*y_cur[IDX_C2HI] - - k[4917]*y_cur[IDX_CI]*y_cur[IDX_C2NI] - - k[4918]*y_cur[IDX_CI]*y_cur[IDX_C2OI] - - k[4919]*y_cur[IDX_CI]*y_cur[IDX_C3H2I] - - k[4920]*y_cur[IDX_CI]*y_cur[IDX_C3HI] - - k[4921]*y_cur[IDX_CI]*y_cur[IDX_C3NI] - - k[4922]*y_cur[IDX_CI]*y_cur[IDX_C3OI] - - k[4923]*y_cur[IDX_CI]*y_cur[IDX_C4I] - - k[4924]*y_cur[IDX_CI]*y_cur[IDX_C4H3I] - - k[4925]*y_cur[IDX_CI]*y_cur[IDX_C4HI] - - k[4926]*y_cur[IDX_CI]*y_cur[IDX_C5I] - - k[4927]*y_cur[IDX_CI]*y_cur[IDX_C5H2I] - - k[4928]*y_cur[IDX_CI]*y_cur[IDX_C5HI] - - k[4929]*y_cur[IDX_CI]*y_cur[IDX_C5NI] - - k[4930]*y_cur[IDX_CI]*y_cur[IDX_C6I] - - k[4931]*y_cur[IDX_CI]*y_cur[IDX_C6I] - - k[4932]*y_cur[IDX_CI]*y_cur[IDX_C6H2I] - - k[4933]*y_cur[IDX_CI]*y_cur[IDX_C6HI] - - k[4934]*y_cur[IDX_CI]*y_cur[IDX_C7I] - - k[4935]*y_cur[IDX_CI]*y_cur[IDX_C7H2I] - - k[4936]*y_cur[IDX_CI]*y_cur[IDX_C7HI] - - k[4937]*y_cur[IDX_CI]*y_cur[IDX_C7NI] - - k[4938]*y_cur[IDX_CI]*y_cur[IDX_C8I] - - k[4939]*y_cur[IDX_CI]*y_cur[IDX_C8H2I] - - k[4940]*y_cur[IDX_CI]*y_cur[IDX_C8HI] - - k[4941]*y_cur[IDX_CI]*y_cur[IDX_C9H2I] - - k[4942]*y_cur[IDX_CI]*y_cur[IDX_C9HI] - - k[4943]*y_cur[IDX_CI]*y_cur[IDX_C9NI] - - k[4944]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - - k[4945]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - - k[4946]*y_cur[IDX_CI]*y_cur[IDX_CH2CCH2I] - - k[4947]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHI] - - k[4948]*y_cur[IDX_CI]*y_cur[IDX_CH2CNI] - - k[4949]*y_cur[IDX_CI]*y_cur[IDX_CH3I] - - k[4950]*y_cur[IDX_CI]*y_cur[IDX_CH3C4HI] - - k[4951]*y_cur[IDX_CI]*y_cur[IDX_CH3C6HI] - - k[4952]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - - k[4953]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - - k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] - - k[4955]*y_cur[IDX_CI]*y_cur[IDX_CHI] - - k[4956]*y_cur[IDX_CI]*y_cur[IDX_CNI] - - k[4957]*y_cur[IDX_CI]*y_cur[IDX_COI] - - k[4958]*y_cur[IDX_CI]*y_cur[IDX_CSI] - - k[4959]*y_cur[IDX_CI]*y_cur[IDX_H2CCCI] - - k[4960]*y_cur[IDX_CI]*y_cur[IDX_H2CNI] - - k[4961]*y_cur[IDX_CI]*y_cur[IDX_C4H2I] - - k[4962]*y_cur[IDX_CI]*y_cur[IDX_HCOI] - - k[4963]*y_cur[IDX_CI]*y_cur[IDX_HCOI] - - k[4964]*y_cur[IDX_CI]*y_cur[IDX_HPOI] - - k[4965]*y_cur[IDX_CI]*y_cur[IDX_HSI] - - k[4966]*y_cur[IDX_CI]*y_cur[IDX_HSI] - - k[4967]*y_cur[IDX_CI]*y_cur[IDX_N2I] - - k[4968]*y_cur[IDX_CI]*y_cur[IDX_NCCNI] - - k[4969]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - - k[4970]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - - k[4971]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - - k[4972]*y_cur[IDX_CI]*y_cur[IDX_NHI] - - k[4973]*y_cur[IDX_CI]*y_cur[IDX_NHI] - - k[4974]*y_cur[IDX_CI]*y_cur[IDX_NOI] - - k[4975]*y_cur[IDX_CI]*y_cur[IDX_NOI] - - k[4976]*y_cur[IDX_CI]*y_cur[IDX_NSI] - - k[4977]*y_cur[IDX_CI]*y_cur[IDX_NSI] - - k[4978]*y_cur[IDX_CI]*y_cur[IDX_O2I] - - k[4979]*y_cur[IDX_CI]*y_cur[IDX_OCNI] - - k[4980]*y_cur[IDX_CI]*y_cur[IDX_OCSI] - - k[4981]*y_cur[IDX_CI]*y_cur[IDX_OHI] - - k[4982]*y_cur[IDX_CI]*y_cur[IDX_OHI] - - k[4983]*y_cur[IDX_CI]*y_cur[IDX_PHI] - - k[4984]*y_cur[IDX_CI]*y_cur[IDX_S2I] - - k[4985]*y_cur[IDX_CI]*y_cur[IDX_SO2I] - - k[4986]*y_cur[IDX_CI]*y_cur[IDX_SOI] - - k[4987]*y_cur[IDX_CI]*y_cur[IDX_SOI] - - k[4988]*y_cur[IDX_CI]*y_cur[IDX_SiH2I] - - k[4989]*y_cur[IDX_CI]*y_cur[IDX_SiH3I] - - k[4990]*y_cur[IDX_CI]*y_cur[IDX_SiHI] + - k[5081]*y_cur[IDX_CHI]*y_cur[IDX_NI] + - k[5097]*y_cur[IDX_CHI]*y_cur[IDX_OI] + - k[5101]*y_cur[IDX_CHI]*y_cur[IDX_SI] + - k[5125]*y_cur[IDX_CNI]*y_cur[IDX_SI] - - k[5134]*y_cur[IDX_H2I]*y_cur[IDX_CI] + - k[5153]*y_cur[IDX_HI]*y_cur[IDX_C2I] + - k[5160]*y_cur[IDX_HI]*y_cur[IDX_CHI] + - k[5163]*y_cur[IDX_HI]*y_cur[IDX_COI] - - k[5202]*y_cur[IDX_HCNOI]*y_cur[IDX_CI] - - k[5212]*y_cur[IDX_HNC3I]*y_cur[IDX_CI] - - k[5214]*y_cur[IDX_HNCOI]*y_cur[IDX_CI] - - k[5215]*y_cur[IDX_HOCNI]*y_cur[IDX_CI] - - k[5217]*y_cur[IDX_HONCI]*y_cur[IDX_CI] + - k[5222]*y_cur[IDX_NI]*y_cur[IDX_C2I] + - k[5260]*y_cur[IDX_NI]*y_cur[IDX_CNI] + - k[5261]*y_cur[IDX_NI]*y_cur[IDX_CNI] + - k[5293]*y_cur[IDX_NI]*y_cur[IDX_SiCI] + - k[5343]*y_cur[IDX_OI]*y_cur[IDX_C2I] + - k[5380]*y_cur[IDX_OI]*y_cur[IDX_CClI] + - k[5388]*y_cur[IDX_OI]*y_cur[IDX_CNI] + - k[5393]*y_cur[IDX_OI]*y_cur[IDX_CSI] + - k[5444]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + - k[5492]*y_cur[IDX_SiI]*y_cur[IDX_COI] - - k[5503]*y_cur[IDX_CII]*y_cur[IDX_CI] - - k[5521]*y_cur[IDX_CI]*y_cur[IDX_C2I] - - k[5522]*y_cur[IDX_CI]*y_cur[IDX_C3I] - - k[5523]*y_cur[IDX_CI]*y_cur[IDX_CI] - - k[5523]*y_cur[IDX_CI]*y_cur[IDX_CI] - - k[5524]*y_cur[IDX_CI]*y_cur[IDX_NI] - - k[5525]*y_cur[IDX_CI]*y_cur[IDX_OII] - - k[5526]*y_cur[IDX_CI]*y_cur[IDX_OI] - - k[5527]*y_cur[IDX_CI]*y_cur[IDX_PI] - - k[5528]*y_cur[IDX_CI]*y_cur[IDX_SII] - - k[5529]*y_cur[IDX_CI]*y_cur[IDX_SI] - - k[5554]*y_cur[IDX_H2I]*y_cur[IDX_CI] - - k[5572]*y_cur[IDX_HI]*y_cur[IDX_CI] - - k[5607]*y_cur[IDX_CI]*y_cur[IDX_eM] + - k[5611]*y_cur[IDX_CII]*y_cur[IDX_eM] + - k[5627]*y_cur[IDX_CII]*y_cur[IDX_CH3OI] + - k[5639]*y_cur[IDX_CII]*y_cur[IDX_CH3COI] + - k[5644]*y_cur[IDX_CII]*y_cur[IDX_COOHI] + - k[5649]*y_cur[IDX_CII]*y_cur[IDX_COOCH3I] + - k[5655]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCOI] + - k[5661]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCHOI] + - k[5667]*y_cur[IDX_CII]*y_cur[IDX_CH3COOHI] - k[5675]*y_cur[IDX_CI] + - k[5686]*y_cur[IDX_CM] + k[5688]*y_cur[IDX_C10I] + - k[5692]*y_cur[IDX_C11I] + k[5694]*y_cur[IDX_C2I] + - k[5694]*y_cur[IDX_C2I] + k[5711]*y_cur[IDX_C2NI] + - k[5713]*y_cur[IDX_C2OI] + k[5714]*y_cur[IDX_C2SI] + - k[5717]*y_cur[IDX_C3I] + k[5724]*y_cur[IDX_C3PI] + - k[5728]*y_cur[IDX_C4I] + k[5734]*y_cur[IDX_C4PI] + - k[5738]*y_cur[IDX_C5I] + k[5748]*y_cur[IDX_C6I] + - k[5756]*y_cur[IDX_C7I] + k[5762]*y_cur[IDX_C8I] + - k[5767]*y_cur[IDX_C9I] - k[5772]*y_cur[IDX_CI] + - k[5774]*y_cur[IDX_CCPI] + k[5775]*y_cur[IDX_CClI] + - k[5784]*y_cur[IDX_CH2CHCCHI] + k[5785]*y_cur[IDX_CH2CHCCHI] + - k[5786]*y_cur[IDX_C4H6I] + k[5821]*y_cur[IDX_CHI] + - k[5823]*y_cur[IDX_CNI] + k[5826]*y_cur[IDX_COI] + - k[5827]*y_cur[IDX_CPI] + k[5829]*y_cur[IDX_CSI] + - k[5918]*y_cur[IDX_SiC2I] + k[5921]*y_cur[IDX_SiC3I] + - k[5924]*y_cur[IDX_SiCI] + k[5948]*y_cur[IDX_CM] + - k[5951]*y_cur[IDX_C10I] + k[5953]*y_cur[IDX_C10I] + - k[5955]*y_cur[IDX_C10I] + k[5968]*y_cur[IDX_C10HI] + - k[5975]*y_cur[IDX_C2II] + k[5978]*y_cur[IDX_C2I] + - k[5978]*y_cur[IDX_C2I] + k[5996]*y_cur[IDX_C2NI] + - k[5998]*y_cur[IDX_C2OI] + k[6001]*y_cur[IDX_C3I] + - k[6012]*y_cur[IDX_C4I] + k[6033]*y_cur[IDX_C6I] + - k[6042]*y_cur[IDX_C7I] + k[6052]*y_cur[IDX_C8I] + - k[6060]*y_cur[IDX_C9I] - k[6069]*y_cur[IDX_CI] + - k[6071]*y_cur[IDX_CCPI] + k[6072]*y_cur[IDX_CClI] + - k[6073]*y_cur[IDX_CHII] + k[6085]*y_cur[IDX_CH2CHCCHI] + - k[6086]*y_cur[IDX_CH2CHCCHI] + k[6087]*y_cur[IDX_C4H6I] + - k[6131]*y_cur[IDX_CHI] + k[6134]*y_cur[IDX_CNI] + - k[6138]*y_cur[IDX_COI] + k[6139]*y_cur[IDX_CPI] + - k[6140]*y_cur[IDX_CSII] + k[6142]*y_cur[IDX_CSI] + - k[6264]*y_cur[IDX_SiC3I] + k[6267]*y_cur[IDX_SiCI] + - k[6282]*y_cur[IDX_SiNCI] - k[6299]*y_cur[IDX_CI] + - k[6314]*y_cur[IDX_CII]*y_cur[IDX_GRAINM] + - k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM] + - k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM] + - k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM] + - k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + - k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM] + - k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM] + - k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM] + - k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM] + - k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + - k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + - k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + - k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM] + - k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM] + - k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM] + - k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM] + - k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM] + - k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + - k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + - k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + - k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + - k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + - k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + - k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + - k[6746]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] + - k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + - k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + - k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + - k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + - k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + - k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + - k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + - k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + - k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + - k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + - k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + - k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + - k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + - k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + - k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - k[6891]*y_cur[IDX_CI] - + k[7073]*y_cur[IDX_GCI] + k[7255]*y_cur[IDX_GCI] + - k[7437]*y_cur[IDX_GCI]; - ydot[yistart + IDX_CII] = 0.0 - - k[147]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - - k[148]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - - k[149]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] - - k[150]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] - - k[151]*y_cur[IDX_CII]*y_cur[IDX_C2OI] - - k[152]*y_cur[IDX_CII]*y_cur[IDX_C2SI] - - k[153]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - - k[154]*y_cur[IDX_CII]*y_cur[IDX_C3SI] - - k[155]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - - k[156]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - - k[157]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - - k[158]*y_cur[IDX_CII]*y_cur[IDX_CCPI] - - k[159]*y_cur[IDX_CII]*y_cur[IDX_CClI] - - k[160]*y_cur[IDX_CII]*y_cur[IDX_CH2I] - - k[161]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - - k[162]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - - k[163]*y_cur[IDX_CII]*y_cur[IDX_CH2CNI] - - k[164]*y_cur[IDX_CII]*y_cur[IDX_CH2COI] - - k[165]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[166]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[167]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] - - k[168]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - - k[169]*y_cur[IDX_CII]*y_cur[IDX_CH3OCH3I] - - k[170]*y_cur[IDX_CII]*y_cur[IDX_CHI] - - k[171]*y_cur[IDX_CII]*y_cur[IDX_CPI] - - k[172]*y_cur[IDX_CII]*y_cur[IDX_ClOI] - - k[173]*y_cur[IDX_CII]*y_cur[IDX_FeI] - - k[174]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - - k[175]*y_cur[IDX_CII]*y_cur[IDX_H2SI] - - k[176]*y_cur[IDX_CII]*y_cur[IDX_H2SiOI] - - k[177]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - - k[178]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - - k[179]*y_cur[IDX_CII]*y_cur[IDX_HCOOCH3I] - - k[180]*y_cur[IDX_CII]*y_cur[IDX_HCPI] - - k[181]*y_cur[IDX_CII]*y_cur[IDX_HPOI] - - k[182]*y_cur[IDX_CII]*y_cur[IDX_MgI] - - k[183]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] - - k[184]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] - - k[185]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - - k[186]*y_cur[IDX_CII]*y_cur[IDX_NOI] - - k[187]*y_cur[IDX_CII]*y_cur[IDX_NSI] - - k[188]*y_cur[IDX_CII]*y_cur[IDX_NaI] - - k[189]*y_cur[IDX_CII]*y_cur[IDX_OCSI] - - k[190]*y_cur[IDX_CII]*y_cur[IDX_PI] - - k[191]*y_cur[IDX_CII]*y_cur[IDX_PHI] - - k[192]*y_cur[IDX_CII]*y_cur[IDX_POI] - - k[193]*y_cur[IDX_CII]*y_cur[IDX_SOI] - - k[194]*y_cur[IDX_CII]*y_cur[IDX_SiI] - - k[195]*y_cur[IDX_CII]*y_cur[IDX_SiC2I] - - k[196]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] - - k[197]*y_cur[IDX_CII]*y_cur[IDX_SiC3I] - - k[198]*y_cur[IDX_CII]*y_cur[IDX_SiCI] - - k[199]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - - k[200]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - - k[201]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - - k[202]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - - k[203]*y_cur[IDX_CII]*y_cur[IDX_SiNI] - - k[204]*y_cur[IDX_CII]*y_cur[IDX_SiSI] + - k[244]*y_cur[IDX_CI]*y_cur[IDX_C2II] + - k[245]*y_cur[IDX_CI]*y_cur[IDX_CNII] + - k[246]*y_cur[IDX_CI]*y_cur[IDX_COII] + - k[247]*y_cur[IDX_CI]*y_cur[IDX_N2II] + - k[248]*y_cur[IDX_CI]*y_cur[IDX_O2II] + - k[249]*y_cur[IDX_CI]*y_cur[IDX_PNII] + - k[513]*y_cur[IDX_HeII]*y_cur[IDX_CI] - - k[707]*y_cur[IDX_SI]*y_cur[IDX_CII] - - k[708]*y_cur[IDX_SI]*y_cur[IDX_CII] - - k[1297]*y_cur[IDX_CII]*y_cur[IDX_C10H2I] - - k[1298]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - - k[1299]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - - k[1300]*y_cur[IDX_CII]*y_cur[IDX_C2H2I] - - k[1301]*y_cur[IDX_CII]*y_cur[IDX_C2H3I] - - k[1302]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - - k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - - k[1304]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - - k[1305]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - - k[1306]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] - - k[1307]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] - - k[1308]*y_cur[IDX_CII]*y_cur[IDX_C2HI] - - k[1309]*y_cur[IDX_CII]*y_cur[IDX_C2SI] - - k[1310]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] - - k[1311]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] - - k[1312]*y_cur[IDX_CII]*y_cur[IDX_C3HI] - - k[1313]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - - k[1314]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - - k[1315]*y_cur[IDX_CII]*y_cur[IDX_C3PI] - - k[1316]*y_cur[IDX_CII]*y_cur[IDX_C3SI] - - k[1317]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - - k[1318]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - - k[1319]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - - k[1320]*y_cur[IDX_CII]*y_cur[IDX_C4HI] - - k[1321]*y_cur[IDX_CII]*y_cur[IDX_C4PI] - - k[1322]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - - k[1323]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] - - k[1324]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] - - k[1325]*y_cur[IDX_CII]*y_cur[IDX_C5HI] - - k[1326]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] - - k[1327]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] - - k[1328]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - - k[1329]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - - k[1330]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - - k[1331]*y_cur[IDX_CII]*y_cur[IDX_C6HI] - - k[1332]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] - - k[1333]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] - - k[1334]*y_cur[IDX_CII]*y_cur[IDX_C7HI] - - k[1335]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] - - k[1336]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] - - k[1337]*y_cur[IDX_CII]*y_cur[IDX_C8HI] - - k[1338]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] - - k[1339]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] - - k[1340]*y_cur[IDX_CII]*y_cur[IDX_C9HI] - - k[1341]*y_cur[IDX_CII]*y_cur[IDX_CCPI] - - k[1342]*y_cur[IDX_CII]*y_cur[IDX_CH2I] - - k[1343]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - - k[1344]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - - k[1345]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - - k[1346]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - - k[1347]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - - k[1348]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - - k[1349]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - - k[1350]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - - k[1351]*y_cur[IDX_CII]*y_cur[IDX_CH2PHI] - - k[1352]*y_cur[IDX_CII]*y_cur[IDX_CH3I] - - k[1353]*y_cur[IDX_CII]*y_cur[IDX_CH3I] - - k[1354]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - - k[1355]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - - k[1356]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - - k[1357]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - - k[1358]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - - k[1359]*y_cur[IDX_CII]*y_cur[IDX_CH3C5NI] - - k[1360]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] - - k[1361]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] - - k[1362]*y_cur[IDX_CII]*y_cur[IDX_CH3C7NI] - - k[1363]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[1364]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[1365]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[1366]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[1367]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1368]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1369]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1370]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1373]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1374]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1375]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1376]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1378]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] - - k[1379]*y_cur[IDX_CII]*y_cur[IDX_CH3CNI] - - k[1380]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - - k[1381]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - - k[1382]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - - k[1383]*y_cur[IDX_CII]*y_cur[IDX_CH4I] - - k[1384]*y_cur[IDX_CII]*y_cur[IDX_CH4I] - - k[1385]*y_cur[IDX_CII]*y_cur[IDX_CHI] - - k[1386]*y_cur[IDX_CII]*y_cur[IDX_CNOI] - - k[1387]*y_cur[IDX_CII]*y_cur[IDX_CO2I] - - k[1388]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - - k[1389]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - - k[1390]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - - k[1391]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - - k[1392]*y_cur[IDX_CII]*y_cur[IDX_H2CSI] - - k[1393]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - - k[1394]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - - k[1395]*y_cur[IDX_CII]*y_cur[IDX_H2SI] - - k[1396]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - - k[1397]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - - k[1398]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1399]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1400]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1401]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1402]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - - k[1403]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - - k[1404]*y_cur[IDX_CII]*y_cur[IDX_HC5NI] - - k[1405]*y_cur[IDX_CII]*y_cur[IDX_HC7NI] - - k[1406]*y_cur[IDX_CII]*y_cur[IDX_HC9NI] - - k[1407]*y_cur[IDX_CII]*y_cur[IDX_HCNI] - - k[1408]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - - k[1409]*y_cur[IDX_CII]*y_cur[IDX_HCPI] - - k[1410]*y_cur[IDX_CII]*y_cur[IDX_HCSiI] - - k[1411]*y_cur[IDX_CII]*y_cur[IDX_HClI] - - k[1412]*y_cur[IDX_CII]*y_cur[IDX_HFI] - - k[1413]*y_cur[IDX_CII]*y_cur[IDX_HNCI] - - k[1414]*y_cur[IDX_CII]*y_cur[IDX_HNSiI] - - k[1415]*y_cur[IDX_CII]*y_cur[IDX_HSI] - - k[1416]*y_cur[IDX_CII]*y_cur[IDX_N2OI] - - k[1417]*y_cur[IDX_CII]*y_cur[IDX_NH2I] - - k[1418]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - - k[1419]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - - k[1420]*y_cur[IDX_CII]*y_cur[IDX_NHI] - - k[1421]*y_cur[IDX_CII]*y_cur[IDX_NSI] - - k[1422]*y_cur[IDX_CII]*y_cur[IDX_O2I] - - k[1423]*y_cur[IDX_CII]*y_cur[IDX_O2I] - - k[1424]*y_cur[IDX_CII]*y_cur[IDX_OCNI] - - k[1425]*y_cur[IDX_CII]*y_cur[IDX_OCSI] - - k[1426]*y_cur[IDX_CII]*y_cur[IDX_OHI] - - k[1427]*y_cur[IDX_CII]*y_cur[IDX_SO2I] - - k[1428]*y_cur[IDX_CII]*y_cur[IDX_SOI] - - k[1429]*y_cur[IDX_CII]*y_cur[IDX_SOI] - - k[1430]*y_cur[IDX_CII]*y_cur[IDX_SOI] - - k[1431]*y_cur[IDX_CII]*y_cur[IDX_SiC2H2I] - - k[1432]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] - - k[1433]*y_cur[IDX_CII]*y_cur[IDX_SiC3HI] - - k[1434]*y_cur[IDX_CII]*y_cur[IDX_SiCI] - - k[1435]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - - k[1436]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - - k[1437]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - - k[1438]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - - k[1439]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - - k[1440]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - - k[1441]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - - k[1442]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - - k[1443]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - - k[1444]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - - k[1445]*y_cur[IDX_CII]*y_cur[IDX_SiHI] - - k[1446]*y_cur[IDX_CII]*y_cur[IDX_SiNI] - - k[1447]*y_cur[IDX_CII]*y_cur[IDX_SiOI] - - k[1448]*y_cur[IDX_CII]*y_cur[IDX_SiSI] - - k[2398]*y_cur[IDX_H2I]*y_cur[IDX_CII] + - k[2835]*y_cur[IDX_HI]*y_cur[IDX_CHII] - - k[3016]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - - k[3017]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - - k[3018]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - - k[3019]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + - k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + - k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] + - k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] + - k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] + - k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + - k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + - k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] + - k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + - k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + - k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + - k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] + - k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + - k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + - k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + - k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + - k[3383]*y_cur[IDX_NI]*y_cur[IDX_C2II] - - k[3886]*y_cur[IDX_CM]*y_cur[IDX_CII] - - k[3921]*y_cur[IDX_C10M]*y_cur[IDX_CII] - - k[3956]*y_cur[IDX_C10HM]*y_cur[IDX_CII] - - k[3991]*y_cur[IDX_C2M]*y_cur[IDX_CII] - - k[4026]*y_cur[IDX_C2HM]*y_cur[IDX_CII] - - k[4061]*y_cur[IDX_C3M]*y_cur[IDX_CII] - - k[4096]*y_cur[IDX_C3HM]*y_cur[IDX_CII] - - k[4131]*y_cur[IDX_C3NM]*y_cur[IDX_CII] - - k[4166]*y_cur[IDX_C4M]*y_cur[IDX_CII] - - k[4201]*y_cur[IDX_C4HM]*y_cur[IDX_CII] - - k[4236]*y_cur[IDX_C5M]*y_cur[IDX_CII] - - k[4271]*y_cur[IDX_C5HM]*y_cur[IDX_CII] - - k[4306]*y_cur[IDX_C5NM]*y_cur[IDX_CII] - - k[4341]*y_cur[IDX_C6M]*y_cur[IDX_CII] - - k[4376]*y_cur[IDX_C6HM]*y_cur[IDX_CII] - - k[4411]*y_cur[IDX_C7M]*y_cur[IDX_CII] - - k[4446]*y_cur[IDX_C7HM]*y_cur[IDX_CII] - - k[4481]*y_cur[IDX_C8M]*y_cur[IDX_CII] - - k[4516]*y_cur[IDX_C8HM]*y_cur[IDX_CII] - - k[4551]*y_cur[IDX_C9M]*y_cur[IDX_CII] - - k[4586]*y_cur[IDX_C9HM]*y_cur[IDX_CII] - - k[4621]*y_cur[IDX_CHM]*y_cur[IDX_CII] - - k[4656]*y_cur[IDX_CNM]*y_cur[IDX_CII] - - k[4691]*y_cur[IDX_HM]*y_cur[IDX_CII] - - k[4727]*y_cur[IDX_OM]*y_cur[IDX_CII] - - k[4762]*y_cur[IDX_O2M]*y_cur[IDX_CII] - - k[4797]*y_cur[IDX_OHM]*y_cur[IDX_CII] - - k[4832]*y_cur[IDX_SM]*y_cur[IDX_CII] - - k[5495]*y_cur[IDX_CII]*y_cur[IDX_C10I] - - k[5496]*y_cur[IDX_CII]*y_cur[IDX_C3I] - - k[5497]*y_cur[IDX_CII]*y_cur[IDX_C4I] - - k[5498]*y_cur[IDX_CII]*y_cur[IDX_C5I] - - k[5499]*y_cur[IDX_CII]*y_cur[IDX_C6I] - - k[5500]*y_cur[IDX_CII]*y_cur[IDX_C7I] - - k[5501]*y_cur[IDX_CII]*y_cur[IDX_C8I] - - k[5502]*y_cur[IDX_CII]*y_cur[IDX_C9I] - - k[5503]*y_cur[IDX_CII]*y_cur[IDX_CI] - - k[5504]*y_cur[IDX_CII]*y_cur[IDX_NI] - - k[5505]*y_cur[IDX_CII]*y_cur[IDX_OI] - - k[5506]*y_cur[IDX_CII]*y_cur[IDX_SI] - - k[5548]*y_cur[IDX_H2I]*y_cur[IDX_CII] - - k[5569]*y_cur[IDX_HI]*y_cur[IDX_CII] - - k[5611]*y_cur[IDX_CII]*y_cur[IDX_eM] - - k[5627]*y_cur[IDX_CII]*y_cur[IDX_CH3OI] - - k[5633]*y_cur[IDX_CII]*y_cur[IDX_CH2OHI] - - k[5639]*y_cur[IDX_CII]*y_cur[IDX_CH3COI] - - k[5644]*y_cur[IDX_CII]*y_cur[IDX_COOHI] - - k[5649]*y_cur[IDX_CII]*y_cur[IDX_COOCH3I] - - k[5655]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCOI] - - k[5661]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCHOI] - - k[5667]*y_cur[IDX_CII]*y_cur[IDX_CH3COOHI] + k[5675]*y_cur[IDX_CI] + - k[5772]*y_cur[IDX_CI] + k[5776]*y_cur[IDX_CHII] + - k[5975]*y_cur[IDX_C2II] + k[6069]*y_cur[IDX_CI] + - k[6075]*y_cur[IDX_CH2II] + k[6136]*y_cur[IDX_COII] + - k[6299]*y_cur[IDX_CI] - k[6314]*y_cur[IDX_CII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CM] = 0.0 - k[0]*y_cur[IDX_CM]*y_cur[IDX_CI] - - k[1]*y_cur[IDX_CM]*y_cur[IDX_CH2I] - - k[2]*y_cur[IDX_CM]*y_cur[IDX_CHI] - - k[3]*y_cur[IDX_CM]*y_cur[IDX_CO2I] - - k[4]*y_cur[IDX_CM]*y_cur[IDX_H2OI] - - k[5]*y_cur[IDX_CM]*y_cur[IDX_NI] - k[6]*y_cur[IDX_CM]*y_cur[IDX_NHI] - - k[7]*y_cur[IDX_CM]*y_cur[IDX_O2I] - - k[8]*y_cur[IDX_CM]*y_cur[IDX_OI] - k[9]*y_cur[IDX_CM]*y_cur[IDX_OHI] - - k[82]*y_cur[IDX_H2I]*y_cur[IDX_CM] - - k[84]*y_cur[IDX_HI]*y_cur[IDX_CM] - - k[1449]*y_cur[IDX_CM]*y_cur[IDX_NOI] - - k[1450]*y_cur[IDX_CM]*y_cur[IDX_O2I] + - k[3685]*y_cur[IDX_OI]*y_cur[IDX_C2M] - - k[3886]*y_cur[IDX_CM]*y_cur[IDX_CII] - - k[3887]*y_cur[IDX_CM]*y_cur[IDX_C2H2II] - - k[3888]*y_cur[IDX_CM]*y_cur[IDX_C2H3II] - - k[3889]*y_cur[IDX_CM]*y_cur[IDX_C4H2II] - - k[3890]*y_cur[IDX_CM]*y_cur[IDX_C4H3II] - - k[3891]*y_cur[IDX_CM]*y_cur[IDX_C4SII] - - k[3892]*y_cur[IDX_CM]*y_cur[IDX_CH2CCHII] - - k[3893]*y_cur[IDX_CM]*y_cur[IDX_CH3II] - - k[3894]*y_cur[IDX_CM]*y_cur[IDX_CNCII] - - k[3895]*y_cur[IDX_CM]*y_cur[IDX_FeII] - - k[3896]*y_cur[IDX_CM]*y_cur[IDX_HII] - - k[3897]*y_cur[IDX_CM]*y_cur[IDX_H2COII] - - k[3898]*y_cur[IDX_CM]*y_cur[IDX_H2SII] - - k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] - - k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] - - k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] - - k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] - - k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] - - k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] - - k[3905]*y_cur[IDX_CM]*y_cur[IDX_HCOII] - - k[3906]*y_cur[IDX_CM]*y_cur[IDX_HeII] - - k[3907]*y_cur[IDX_CM]*y_cur[IDX_MgII] - - k[3908]*y_cur[IDX_CM]*y_cur[IDX_NII] - - k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] - - k[3910]*y_cur[IDX_CM]*y_cur[IDX_NH3II] - - k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] - - k[3912]*y_cur[IDX_CM]*y_cur[IDX_NOII] - - k[3913]*y_cur[IDX_CM]*y_cur[IDX_NaII] - - k[3914]*y_cur[IDX_CM]*y_cur[IDX_OII] - - k[3915]*y_cur[IDX_CM]*y_cur[IDX_SII] - - k[3916]*y_cur[IDX_CM]*y_cur[IDX_SOII] - - k[3917]*y_cur[IDX_CM]*y_cur[IDX_SiII] - - k[3918]*y_cur[IDX_CM]*y_cur[IDX_SiOII] - - k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] - - k[3920]*y_cur[IDX_CM]*y_cur[IDX_SiSII] + - k[5607]*y_cur[IDX_CI]*y_cur[IDX_eM] - k[5686]*y_cur[IDX_CM] - - k[5948]*y_cur[IDX_CM]; - ydot[yistart + IDX_C10I] = 0.0 + k[16]*y_cur[IDX_C2M]*y_cur[IDX_C8I] - + k[21]*y_cur[IDX_C3M]*y_cur[IDX_C7I] + - k[26]*y_cur[IDX_C4M]*y_cur[IDX_C6I] + - k[30]*y_cur[IDX_C5M]*y_cur[IDX_C5I] + - k[33]*y_cur[IDX_C6M]*y_cur[IDX_C4I] + - k[35]*y_cur[IDX_C7M]*y_cur[IDX_C3I] + - k[36]*y_cur[IDX_C8M]*y_cur[IDX_C2I] + - k[53]*y_cur[IDX_CI]*y_cur[IDX_C9M] - - k[320]*y_cur[IDX_HII]*y_cur[IDX_C10I] - - k[506]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[729]*y_cur[IDX_C10HII]*y_cur[IDX_eM] - - k[2293]*y_cur[IDX_HII]*y_cur[IDX_C10I] - - k[2583]*y_cur[IDX_H3II]*y_cur[IDX_C10I] - - k[2899]*y_cur[IDX_HCOII]*y_cur[IDX_C10I] - - k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3921]*y_cur[IDX_C10M]*y_cur[IDX_CII] + - k[3922]*y_cur[IDX_C10M]*y_cur[IDX_C2H2II] + - k[3923]*y_cur[IDX_C10M]*y_cur[IDX_C2H3II] + - k[3924]*y_cur[IDX_C10M]*y_cur[IDX_C4H2II] + - k[3925]*y_cur[IDX_C10M]*y_cur[IDX_C4H3II] + - k[3926]*y_cur[IDX_C10M]*y_cur[IDX_C4SII] + - k[3927]*y_cur[IDX_C10M]*y_cur[IDX_CH2CCHII] + - k[3928]*y_cur[IDX_C10M]*y_cur[IDX_CH3II] + - k[3929]*y_cur[IDX_C10M]*y_cur[IDX_CNCII] + - k[3930]*y_cur[IDX_C10M]*y_cur[IDX_FeII] + - k[3931]*y_cur[IDX_C10M]*y_cur[IDX_HII] + - k[3932]*y_cur[IDX_C10M]*y_cur[IDX_H2COII] + - k[3933]*y_cur[IDX_C10M]*y_cur[IDX_H2SII] + - k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] + - k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] + - k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] + - k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + - k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + - k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + - k[3940]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + - k[3941]*y_cur[IDX_C10M]*y_cur[IDX_HeII] + - k[3942]*y_cur[IDX_C10M]*y_cur[IDX_MgII] + - k[3943]*y_cur[IDX_C10M]*y_cur[IDX_NII] + - k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] + - k[3945]*y_cur[IDX_C10M]*y_cur[IDX_NH3II] + - k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] + - k[3947]*y_cur[IDX_C10M]*y_cur[IDX_NOII] + - k[3948]*y_cur[IDX_C10M]*y_cur[IDX_NaII] + - k[3949]*y_cur[IDX_C10M]*y_cur[IDX_OII] + - k[3950]*y_cur[IDX_C10M]*y_cur[IDX_SII] + - k[3951]*y_cur[IDX_C10M]*y_cur[IDX_SOII] + - k[3952]*y_cur[IDX_C10M]*y_cur[IDX_SiII] + - k[3953]*y_cur[IDX_C10M]*y_cur[IDX_SiOII] + - k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] + - k[3955]*y_cur[IDX_C10M]*y_cur[IDX_SiSII] + - k[4942]*y_cur[IDX_CI]*y_cur[IDX_C9HI] - - k[5221]*y_cur[IDX_NI]*y_cur[IDX_C10I] - - k[5340]*y_cur[IDX_OI]*y_cur[IDX_C10I] + - k[5342]*y_cur[IDX_OI]*y_cur[IDX_C11I] - - k[5495]*y_cur[IDX_CII]*y_cur[IDX_C10I] - - k[5587]*y_cur[IDX_C10I]*y_cur[IDX_eM] + k[5687]*y_cur[IDX_C10M] - - k[5688]*y_cur[IDX_C10I] + k[5691]*y_cur[IDX_C10HI] + - k[5692]*y_cur[IDX_C11I] + k[5949]*y_cur[IDX_C10M] - - k[5950]*y_cur[IDX_C10I] - k[5951]*y_cur[IDX_C10I] - - k[5952]*y_cur[IDX_C10I] - k[5953]*y_cur[IDX_C10I] - - k[5954]*y_cur[IDX_C10I] - k[5955]*y_cur[IDX_C10I] + - k[5957]*y_cur[IDX_C10H2I] + k[5961]*y_cur[IDX_C10HI] + - k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - - k[7064]*y_cur[IDX_C10I] + k[7246]*y_cur[IDX_GC10I] + - k[7428]*y_cur[IDX_GC10I] + k[7610]*y_cur[IDX_GC10I] + - k[8682]*y_cur[IDX_GCI]*y_cur[IDX_GC9I]; - ydot[yistart + IDX_C10II] = 0.0 + - k[320]*y_cur[IDX_HII]*y_cur[IDX_C10I] + - k[506]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[727]*y_cur[IDX_C10II]*y_cur[IDX_eM] - - k[728]*y_cur[IDX_C10II]*y_cur[IDX_eM] + - k[1338]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] + - k[1340]*y_cur[IDX_CII]*y_cur[IDX_C9HI] + - k[1885]*y_cur[IDX_CI]*y_cur[IDX_C9HII] + - k[1886]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] - - k[2399]*y_cur[IDX_H2I]*y_cur[IDX_C10II] + - k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[5502]*y_cur[IDX_CII]*y_cur[IDX_C9I] + k[5950]*y_cur[IDX_C10I] - - k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] - - k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C10M] = 0.0 - k[37]*y_cur[IDX_CI]*y_cur[IDX_C10M] - - k[85]*y_cur[IDX_HI]*y_cur[IDX_C10M] - - k[3377]*y_cur[IDX_NI]*y_cur[IDX_C10M] - - k[3378]*y_cur[IDX_NI]*y_cur[IDX_C10M] - - k[3379]*y_cur[IDX_NI]*y_cur[IDX_C10M] - - k[3380]*y_cur[IDX_NI]*y_cur[IDX_C10M] - - k[3678]*y_cur[IDX_OI]*y_cur[IDX_C10M] - - k[3921]*y_cur[IDX_C10M]*y_cur[IDX_CII] - - k[3922]*y_cur[IDX_C10M]*y_cur[IDX_C2H2II] - - k[3923]*y_cur[IDX_C10M]*y_cur[IDX_C2H3II] - - k[3924]*y_cur[IDX_C10M]*y_cur[IDX_C4H2II] - - k[3925]*y_cur[IDX_C10M]*y_cur[IDX_C4H3II] - - k[3926]*y_cur[IDX_C10M]*y_cur[IDX_C4SII] - - k[3927]*y_cur[IDX_C10M]*y_cur[IDX_CH2CCHII] - - k[3928]*y_cur[IDX_C10M]*y_cur[IDX_CH3II] - - k[3929]*y_cur[IDX_C10M]*y_cur[IDX_CNCII] - - k[3930]*y_cur[IDX_C10M]*y_cur[IDX_FeII] - - k[3931]*y_cur[IDX_C10M]*y_cur[IDX_HII] - - k[3932]*y_cur[IDX_C10M]*y_cur[IDX_H2COII] - - k[3933]*y_cur[IDX_C10M]*y_cur[IDX_H2SII] - - k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] - - k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] - - k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] - - k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] - - k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] - - k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] - - k[3940]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] - - k[3941]*y_cur[IDX_C10M]*y_cur[IDX_HeII] - - k[3942]*y_cur[IDX_C10M]*y_cur[IDX_MgII] - - k[3943]*y_cur[IDX_C10M]*y_cur[IDX_NII] - - k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] - - k[3945]*y_cur[IDX_C10M]*y_cur[IDX_NH3II] - - k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] - - k[3947]*y_cur[IDX_C10M]*y_cur[IDX_NOII] - - k[3948]*y_cur[IDX_C10M]*y_cur[IDX_NaII] - - k[3949]*y_cur[IDX_C10M]*y_cur[IDX_OII] - - k[3950]*y_cur[IDX_C10M]*y_cur[IDX_SII] - - k[3951]*y_cur[IDX_C10M]*y_cur[IDX_SOII] - - k[3952]*y_cur[IDX_C10M]*y_cur[IDX_SiII] - - k[3953]*y_cur[IDX_C10M]*y_cur[IDX_SiOII] - - k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] - - k[3955]*y_cur[IDX_C10M]*y_cur[IDX_SiSII] + - k[5587]*y_cur[IDX_C10I]*y_cur[IDX_eM] - k[5687]*y_cur[IDX_C10M] - - k[5949]*y_cur[IDX_C10M]; - ydot[yistart + IDX_C10HI] = 0.0 + - k[54]*y_cur[IDX_CI]*y_cur[IDX_C9HM] + - k[85]*y_cur[IDX_HI]*y_cur[IDX_C10M] - - k[147]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - - k[322]*y_cur[IDX_HII]*y_cur[IDX_C10HI] - - k[507]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[732]*y_cur[IDX_C10H2II]*y_cur[IDX_eM] - - k[1298]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - - k[1299]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - - k[2585]*y_cur[IDX_H3II]*y_cur[IDX_C10HI] - - k[2901]*y_cur[IDX_HCOII]*y_cur[IDX_C10HI] - - k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3956]*y_cur[IDX_C10HM]*y_cur[IDX_CII] + - k[3957]*y_cur[IDX_C10HM]*y_cur[IDX_C2H2II] + - k[3958]*y_cur[IDX_C10HM]*y_cur[IDX_C2H3II] + - k[3959]*y_cur[IDX_C10HM]*y_cur[IDX_C4H2II] + - k[3960]*y_cur[IDX_C10HM]*y_cur[IDX_C4H3II] + - k[3961]*y_cur[IDX_C10HM]*y_cur[IDX_C4SII] + - k[3962]*y_cur[IDX_C10HM]*y_cur[IDX_CH2CCHII] + - k[3963]*y_cur[IDX_C10HM]*y_cur[IDX_CH3II] + - k[3964]*y_cur[IDX_C10HM]*y_cur[IDX_CNCII] + - k[3965]*y_cur[IDX_C10HM]*y_cur[IDX_FeII] + - k[3966]*y_cur[IDX_C10HM]*y_cur[IDX_HII] + - k[3967]*y_cur[IDX_C10HM]*y_cur[IDX_H2COII] + - k[3968]*y_cur[IDX_C10HM]*y_cur[IDX_H2SII] + - k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] + - k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] + - k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] + - k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + - k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + - k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + - k[3975]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + - k[3976]*y_cur[IDX_C10HM]*y_cur[IDX_HeII] + - k[3977]*y_cur[IDX_C10HM]*y_cur[IDX_MgII] + - k[3978]*y_cur[IDX_C10HM]*y_cur[IDX_NII] + - k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] + - k[3980]*y_cur[IDX_C10HM]*y_cur[IDX_NH3II] + - k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] + - k[3982]*y_cur[IDX_C10HM]*y_cur[IDX_NOII] + - k[3983]*y_cur[IDX_C10HM]*y_cur[IDX_NaII] + - k[3984]*y_cur[IDX_C10HM]*y_cur[IDX_OII] + - k[3985]*y_cur[IDX_C10HM]*y_cur[IDX_SII] + - k[3986]*y_cur[IDX_C10HM]*y_cur[IDX_SOII] + - k[3987]*y_cur[IDX_C10HM]*y_cur[IDX_SiII] + - k[3988]*y_cur[IDX_C10HM]*y_cur[IDX_SiOII] + - k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] + - k[3990]*y_cur[IDX_C10HM]*y_cur[IDX_SiSII] - - k[4910]*y_cur[IDX_CI]*y_cur[IDX_C10HI] + - k[4941]*y_cur[IDX_CI]*y_cur[IDX_C9H2I] - - k[5341]*y_cur[IDX_OI]*y_cur[IDX_C10HI] - - k[5588]*y_cur[IDX_C10HI]*y_cur[IDX_eM] + k[5689]*y_cur[IDX_C10HM] + - k[5690]*y_cur[IDX_C10H2I] - k[5691]*y_cur[IDX_C10HI] + - k[5956]*y_cur[IDX_C10HM] + k[5959]*y_cur[IDX_C10H2I] - - k[5961]*y_cur[IDX_C10HI] - k[5962]*y_cur[IDX_C10HI] - - k[5963]*y_cur[IDX_C10HI] - k[5964]*y_cur[IDX_C10HI] - - k[5965]*y_cur[IDX_C10HI] - k[5966]*y_cur[IDX_C10HI] - - k[5967]*y_cur[IDX_C10HI] - k[5968]*y_cur[IDX_C10HI] + - k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM] - - k[7065]*y_cur[IDX_C10HI] + k[7247]*y_cur[IDX_GC10HI] + - k[7429]*y_cur[IDX_GC10HI] + k[7611]*y_cur[IDX_GC10HI] + - k[8648]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] + - k[8683]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI]; - ydot[yistart + IDX_C10HII] = 0.0 + - k[147]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + - k[322]*y_cur[IDX_HII]*y_cur[IDX_C10HI] + - k[507]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[729]*y_cur[IDX_C10HII]*y_cur[IDX_eM] - - k[730]*y_cur[IDX_C10HII]*y_cur[IDX_eM] - - k[731]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + - k[1339]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] + - k[1505]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - - k[1846]*y_cur[IDX_CI]*y_cur[IDX_C10HII] + - k[1887]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] + - k[1888]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + - k[2294]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] + - k[2399]*y_cur[IDX_H2I]*y_cur[IDX_C10II] - - k[2400]*y_cur[IDX_H2I]*y_cur[IDX_C10HII] + - k[2583]*y_cur[IDX_H3II]*y_cur[IDX_C10I] + - k[2899]*y_cur[IDX_HCOII]*y_cur[IDX_C10I] - - k[3679]*y_cur[IDX_OI]*y_cur[IDX_C10HII] - - k[3680]*y_cur[IDX_OI]*y_cur[IDX_C10HII] + k[5962]*y_cur[IDX_C10HI] - - k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - - k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - - k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C10HM] = 0.0 - - k[86]*y_cur[IDX_HI]*y_cur[IDX_C10HM] - - k[1847]*y_cur[IDX_CI]*y_cur[IDX_C10HM] - - k[3381]*y_cur[IDX_NI]*y_cur[IDX_C10HM] - - k[3382]*y_cur[IDX_NI]*y_cur[IDX_C10HM] - - k[3681]*y_cur[IDX_OI]*y_cur[IDX_C10HM] - - k[3956]*y_cur[IDX_C10HM]*y_cur[IDX_CII] - - k[3957]*y_cur[IDX_C10HM]*y_cur[IDX_C2H2II] - - k[3958]*y_cur[IDX_C10HM]*y_cur[IDX_C2H3II] - - k[3959]*y_cur[IDX_C10HM]*y_cur[IDX_C4H2II] - - k[3960]*y_cur[IDX_C10HM]*y_cur[IDX_C4H3II] - - k[3961]*y_cur[IDX_C10HM]*y_cur[IDX_C4SII] - - k[3962]*y_cur[IDX_C10HM]*y_cur[IDX_CH2CCHII] - - k[3963]*y_cur[IDX_C10HM]*y_cur[IDX_CH3II] - - k[3964]*y_cur[IDX_C10HM]*y_cur[IDX_CNCII] - - k[3965]*y_cur[IDX_C10HM]*y_cur[IDX_FeII] - - k[3966]*y_cur[IDX_C10HM]*y_cur[IDX_HII] - - k[3967]*y_cur[IDX_C10HM]*y_cur[IDX_H2COII] - - k[3968]*y_cur[IDX_C10HM]*y_cur[IDX_H2SII] - - k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] - - k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] - - k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] - - k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] - - k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] - - k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] - - k[3975]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] - - k[3976]*y_cur[IDX_C10HM]*y_cur[IDX_HeII] - - k[3977]*y_cur[IDX_C10HM]*y_cur[IDX_MgII] - - k[3978]*y_cur[IDX_C10HM]*y_cur[IDX_NII] - - k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] - - k[3980]*y_cur[IDX_C10HM]*y_cur[IDX_NH3II] - - k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] - - k[3982]*y_cur[IDX_C10HM]*y_cur[IDX_NOII] - - k[3983]*y_cur[IDX_C10HM]*y_cur[IDX_NaII] - - k[3984]*y_cur[IDX_C10HM]*y_cur[IDX_OII] - - k[3985]*y_cur[IDX_C10HM]*y_cur[IDX_SII] - - k[3986]*y_cur[IDX_C10HM]*y_cur[IDX_SOII] - - k[3987]*y_cur[IDX_C10HM]*y_cur[IDX_SiII] - - k[3988]*y_cur[IDX_C10HM]*y_cur[IDX_SiOII] - - k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] - - k[3990]*y_cur[IDX_C10HM]*y_cur[IDX_SiSII] + - k[5588]*y_cur[IDX_C10HI]*y_cur[IDX_eM] - k[5689]*y_cur[IDX_C10HM] - - k[5956]*y_cur[IDX_C10HM]; - ydot[yistart + IDX_C10H2I] = 0.0 + - k[86]*y_cur[IDX_HI]*y_cur[IDX_C10HM] - - k[321]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] + - k[733]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] - - k[1297]*y_cur[IDX_CII]*y_cur[IDX_C10H2I] - - k[2294]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] - - k[2584]*y_cur[IDX_H3II]*y_cur[IDX_C10H2I] - - k[2900]*y_cur[IDX_HCOII]*y_cur[IDX_C10H2I] - - k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[4893]*y_cur[IDX_C2HI]*y_cur[IDX_C8H2I] - - k[4909]*y_cur[IDX_CI]*y_cur[IDX_C10H2I] - k[5690]*y_cur[IDX_C10H2I] - - k[5957]*y_cur[IDX_C10H2I] - k[5958]*y_cur[IDX_C10H2I] - - k[5959]*y_cur[IDX_C10H2I] - k[5960]*y_cur[IDX_C10H2I] + - k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - - k[7067]*y_cur[IDX_C10H2I] + k[7249]*y_cur[IDX_GC10H2I] + - k[7431]*y_cur[IDX_GC10H2I] + k[7613]*y_cur[IDX_GC10H2I] + - k[8649]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] + - k[8736]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI]; - ydot[yistart + IDX_C10H2II] = 0.0 + - k[321]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] - - k[732]*y_cur[IDX_C10H2II]*y_cur[IDX_eM] + - k[1503]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] + - k[1506]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - - k[1848]*y_cur[IDX_CI]*y_cur[IDX_C10H2II] + - k[1889]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + - k[2400]*y_cur[IDX_H2I]*y_cur[IDX_C10HII] + - k[2585]*y_cur[IDX_H3II]*y_cur[IDX_C10HI] + - k[2901]*y_cur[IDX_HCOII]*y_cur[IDX_C10HI] - - k[3682]*y_cur[IDX_OI]*y_cur[IDX_C10H2II] + k[5958]*y_cur[IDX_C10H2I] - - k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C10H3II] = 0.0 - - k[733]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] - - k[734]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + - k[1504]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] + - k[2584]*y_cur[IDX_H3II]*y_cur[IDX_C10H2I] + - k[2900]*y_cur[IDX_HCOII]*y_cur[IDX_C10H2I] - - k[3683]*y_cur[IDX_OI]*y_cur[IDX_C10H3II] - - k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - - k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C11I] = 0.0 + - k[4910]*y_cur[IDX_CI]*y_cur[IDX_C10HI] - - k[5342]*y_cur[IDX_OI]*y_cur[IDX_C11I] - k[5692]*y_cur[IDX_C11I] - - k[5969]*y_cur[IDX_C11I] - k[5970]*y_cur[IDX_C11I] - - k[5971]*y_cur[IDX_C11I] - k[5972]*y_cur[IDX_C11I] - - k[5973]*y_cur[IDX_C11I] - k[5974]*y_cur[IDX_C11I] - - k[7069]*y_cur[IDX_C11I] + k[7251]*y_cur[IDX_GC11I] + - k[7433]*y_cur[IDX_GC11I] + k[7615]*y_cur[IDX_GC11I] + - k[8684]*y_cur[IDX_GCI]*y_cur[IDX_GC10I]; - ydot[yistart + IDX_C11II] = 0.0 - - k[735]*y_cur[IDX_C11II]*y_cur[IDX_eM] - - k[736]*y_cur[IDX_C11II]*y_cur[IDX_eM] - - k[737]*y_cur[IDX_C11II]*y_cur[IDX_eM] - - k[738]*y_cur[IDX_C11II]*y_cur[IDX_eM] + - k[1297]*y_cur[IDX_CII]*y_cur[IDX_C10H2I] + - k[1298]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + - k[1846]*y_cur[IDX_CI]*y_cur[IDX_C10HII] + - k[1848]*y_cur[IDX_CI]*y_cur[IDX_C10H2II] + - k[5495]*y_cur[IDX_CII]*y_cur[IDX_C10I] + k[5969]*y_cur[IDX_C11I] - - k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - - k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - - k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - - k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2I] = 0.0 + k[0]*y_cur[IDX_CM]*y_cur[IDX_CI] - - k[10]*y_cur[IDX_C2M]*y_cur[IDX_C2I] - - k[22]*y_cur[IDX_C4M]*y_cur[IDX_C2I] - - k[27]*y_cur[IDX_C5M]*y_cur[IDX_C2I] - - k[31]*y_cur[IDX_C6M]*y_cur[IDX_C2I] - - k[34]*y_cur[IDX_C7M]*y_cur[IDX_C2I] - - k[36]*y_cur[IDX_C8M]*y_cur[IDX_C2I] - - k[66]*y_cur[IDX_HM]*y_cur[IDX_C2I] + - k[205]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + - k[206]*y_cur[IDX_C2II]*y_cur[IDX_NOI] + - k[207]*y_cur[IDX_C2II]*y_cur[IDX_SI] - - k[208]*y_cur[IDX_C2I]*y_cur[IDX_CNII] - - k[209]*y_cur[IDX_C2I]*y_cur[IDX_COII] - - k[210]*y_cur[IDX_C2I]*y_cur[IDX_N2II] - - k[211]*y_cur[IDX_C2I]*y_cur[IDX_O2II] + - k[244]*y_cur[IDX_CI]*y_cur[IDX_C2II] + - k[259]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] + - k[287]*y_cur[IDX_CHI]*y_cur[IDX_C2II] - - k[323]*y_cur[IDX_HII]*y_cur[IDX_C2I] - - k[436]*y_cur[IDX_H2II]*y_cur[IDX_C2I] - - k[462]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] - - k[508]*y_cur[IDX_HeII]*y_cur[IDX_C2I] - - k[542]*y_cur[IDX_NII]*y_cur[IDX_C2I] + - k[585]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] - - k[646]*y_cur[IDX_OII]*y_cur[IDX_C2I] - - k[685]*y_cur[IDX_OHII]*y_cur[IDX_C2I] + - k[697]*y_cur[IDX_OHI]*y_cur[IDX_C2II] + - k[727]*y_cur[IDX_C10II]*y_cur[IDX_eM] + - k[738]*y_cur[IDX_C11II]*y_cur[IDX_eM] + - k[740]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + - k[742]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + - k[745]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[746]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[780]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + - k[787]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + - k[788]*y_cur[IDX_C3II]*y_cur[IDX_eM] + - k[791]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[814]*y_cur[IDX_C3NII]*y_cur[IDX_eM] + - k[815]*y_cur[IDX_C3OII]*y_cur[IDX_eM] + - k[818]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + - k[819]*y_cur[IDX_C4II]*y_cur[IDX_eM] + - k[819]*y_cur[IDX_C4II]*y_cur[IDX_eM] + - k[831]*y_cur[IDX_C4NII]*y_cur[IDX_eM] + - k[834]*y_cur[IDX_C4PII]*y_cur[IDX_eM] + - k[835]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + - k[838]*y_cur[IDX_C5II]*y_cur[IDX_eM] + - k[847]*y_cur[IDX_C5NII]*y_cur[IDX_eM] + - k[848]*y_cur[IDX_C6II]*y_cur[IDX_eM] + - k[864]*y_cur[IDX_C7II]*y_cur[IDX_eM] + - k[876]*y_cur[IDX_C7NII]*y_cur[IDX_eM] + - k[877]*y_cur[IDX_C8II]*y_cur[IDX_eM] + - k[889]*y_cur[IDX_C9II]*y_cur[IDX_eM] + - k[901]*y_cur[IDX_C9NII]*y_cur[IDX_eM] + - k[903]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + - k[918]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + - k[978]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + - k[1065]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + - k[1224]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] + - k[1233]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + - k[1238]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] + - k[1299]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + - k[1341]*y_cur[IDX_CII]*y_cur[IDX_CCPI] + - k[1434]*y_cur[IDX_CII]*y_cur[IDX_SiCI] - - k[1451]*y_cur[IDX_C2II]*y_cur[IDX_C2I] - - k[1457]*y_cur[IDX_C2I]*y_cur[IDX_H2COII] - - k[1458]*y_cur[IDX_C2I]*y_cur[IDX_HCNII] - - k[1459]*y_cur[IDX_C2I]*y_cur[IDX_HCOII] - - k[1460]*y_cur[IDX_C2I]*y_cur[IDX_HNOII] - - k[1461]*y_cur[IDX_C2I]*y_cur[IDX_N2HII] - - k[1462]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - - k[1463]*y_cur[IDX_C2I]*y_cur[IDX_O2HII] - - k[1464]*y_cur[IDX_C2I]*y_cur[IDX_SII] - - k[1465]*y_cur[IDX_C2I]*y_cur[IDX_SiOII] + - k[1469]*y_cur[IDX_C2HII]*y_cur[IDX_H2COI] + - k[1472]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + - k[1476]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + - k[1478]*y_cur[IDX_C2HII]*y_cur[IDX_HNCI] + - k[1743]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - - k[1933]*y_cur[IDX_CHII]*y_cur[IDX_C2I] + - k[1996]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - - k[2041]*y_cur[IDX_CH3II]*y_cur[IDX_C2I] - - k[2217]*y_cur[IDX_CH5II]*y_cur[IDX_C2I] + - k[2240]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] - - k[2369]*y_cur[IDX_H2II]*y_cur[IDX_C2I] - - k[2503]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] - - k[2586]*y_cur[IDX_H3II]*y_cur[IDX_C2I] - - k[2766]*y_cur[IDX_H3OII]*y_cur[IDX_C2I] + - k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + - k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] + - k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + - k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + - k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + - k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] + - k[3117]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + - k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + - k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + - k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + - k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + - k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + - k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + - k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + - k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + - k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + - k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + - k[3307]*y_cur[IDX_HeII]*y_cur[IDX_SiC2I] + - k[3392]*y_cur[IDX_NI]*y_cur[IDX_C3M] + - k[3398]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] + - k[3409]*y_cur[IDX_NI]*y_cur[IDX_C5M] + - k[3426]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3477]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - - k[3478]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - - k[3479]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - - k[3507]*y_cur[IDX_NH2II]*y_cur[IDX_C2I] + - k[3529]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - - k[3548]*y_cur[IDX_NH3II]*y_cur[IDX_C2I] + - k[3554]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] - - k[3631]*y_cur[IDX_OII]*y_cur[IDX_C2I] - - k[3769]*y_cur[IDX_OHII]*y_cur[IDX_C2I] + - k[3991]*y_cur[IDX_C2M]*y_cur[IDX_CII] + - k[3992]*y_cur[IDX_C2M]*y_cur[IDX_C2H2II] + - k[3993]*y_cur[IDX_C2M]*y_cur[IDX_C2H3II] + - k[3994]*y_cur[IDX_C2M]*y_cur[IDX_C4H2II] + - k[3995]*y_cur[IDX_C2M]*y_cur[IDX_C4H3II] + - k[3996]*y_cur[IDX_C2M]*y_cur[IDX_C4SII] + - k[3997]*y_cur[IDX_C2M]*y_cur[IDX_CH2CCHII] + - k[3998]*y_cur[IDX_C2M]*y_cur[IDX_CH3II] + - k[3999]*y_cur[IDX_C2M]*y_cur[IDX_CNCII] + - k[4000]*y_cur[IDX_C2M]*y_cur[IDX_FeII] + - k[4001]*y_cur[IDX_C2M]*y_cur[IDX_HII] + - k[4002]*y_cur[IDX_C2M]*y_cur[IDX_H2COII] + - k[4003]*y_cur[IDX_C2M]*y_cur[IDX_H2SII] + - k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] + - k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] + - k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] + - k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + - k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + - k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + - k[4010]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + - k[4011]*y_cur[IDX_C2M]*y_cur[IDX_HeII] + - k[4012]*y_cur[IDX_C2M]*y_cur[IDX_MgII] + - k[4013]*y_cur[IDX_C2M]*y_cur[IDX_NII] + - k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] + - k[4015]*y_cur[IDX_C2M]*y_cur[IDX_NH3II] + - k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] + - k[4017]*y_cur[IDX_C2M]*y_cur[IDX_NOII] + - k[4018]*y_cur[IDX_C2M]*y_cur[IDX_NaII] + - k[4019]*y_cur[IDX_C2M]*y_cur[IDX_OII] + - k[4020]*y_cur[IDX_C2M]*y_cur[IDX_SII] + - k[4021]*y_cur[IDX_C2M]*y_cur[IDX_SOII] + - k[4022]*y_cur[IDX_C2M]*y_cur[IDX_SiII] + - k[4023]*y_cur[IDX_C2M]*y_cur[IDX_SiOII] + - k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] + - k[4025]*y_cur[IDX_C2M]*y_cur[IDX_SiSII] - - k[4867]*y_cur[IDX_C2I]*y_cur[IDX_C2H2I] - - k[4868]*y_cur[IDX_C2I]*y_cur[IDX_C2H4I] - - k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] - - k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] - - k[4871]*y_cur[IDX_C2I]*y_cur[IDX_CH4I] - - k[4872]*y_cur[IDX_C2I]*y_cur[IDX_C4H2I] - - k[4873]*y_cur[IDX_C2I]*y_cur[IDX_HCNI] - - k[4874]*y_cur[IDX_C2I]*y_cur[IDX_O2I] - - k[4875]*y_cur[IDX_C2I]*y_cur[IDX_OCSI] - - k[4876]*y_cur[IDX_C2I]*y_cur[IDX_SI] + - k[4917]*y_cur[IDX_CI]*y_cur[IDX_C2NI] + - k[4918]*y_cur[IDX_CI]*y_cur[IDX_C2OI] + - k[4923]*y_cur[IDX_CI]*y_cur[IDX_C4I] + - k[4930]*y_cur[IDX_CI]*y_cur[IDX_C6I] + - k[4938]*y_cur[IDX_CI]*y_cur[IDX_C8I] + - k[4955]*y_cur[IDX_CI]*y_cur[IDX_CHI] + - k[4956]*y_cur[IDX_CI]*y_cur[IDX_CNI] + - k[4957]*y_cur[IDX_CI]*y_cur[IDX_COI] + - k[4958]*y_cur[IDX_CI]*y_cur[IDX_CSI] + - k[5113]*y_cur[IDX_CNI]*y_cur[IDX_CNI] - - k[5153]*y_cur[IDX_HI]*y_cur[IDX_C2I] - - k[5222]*y_cur[IDX_NI]*y_cur[IDX_C2I] + - k[5231]*y_cur[IDX_NI]*y_cur[IDX_C3I] - - k[5343]*y_cur[IDX_OI]*y_cur[IDX_C2I] + - k[5356]*y_cur[IDX_OI]*y_cur[IDX_C3I] - - k[5521]*y_cur[IDX_CI]*y_cur[IDX_C2I] + - k[5523]*y_cur[IDX_CI]*y_cur[IDX_CI] - - k[5589]*y_cur[IDX_C2I]*y_cur[IDX_eM] + k[5693]*y_cur[IDX_C2M] - - k[5694]*y_cur[IDX_C2I] + k[5708]*y_cur[IDX_C2HI] + - k[5710]*y_cur[IDX_C2NI] + k[5712]*y_cur[IDX_C2OI] + - k[5715]*y_cur[IDX_C2SI] + k[5717]*y_cur[IDX_C3I] + - k[5722]*y_cur[IDX_C3NI] + k[5723]*y_cur[IDX_C3OI] + - k[5725]*y_cur[IDX_C3SI] + k[5727]*y_cur[IDX_C4I] + - k[5727]*y_cur[IDX_C4I] + k[5731]*y_cur[IDX_C4HI] + - k[5737]*y_cur[IDX_C5I] + k[5743]*y_cur[IDX_C5HI] + - k[5773]*y_cur[IDX_CCPI] + k[5923]*y_cur[IDX_SiC4I] + - k[5953]*y_cur[IDX_C10I] + k[5954]*y_cur[IDX_C10I] + - k[5967]*y_cur[IDX_C10HI] + k[5974]*y_cur[IDX_C11I] + - k[5976]*y_cur[IDX_C2M] - k[5977]*y_cur[IDX_C2I] - - k[5978]*y_cur[IDX_C2I] + k[5993]*y_cur[IDX_C2HI] + - k[5995]*y_cur[IDX_C2NI] + k[5997]*y_cur[IDX_C2OI] + - k[5999]*y_cur[IDX_C2SI] + k[6001]*y_cur[IDX_C3I] + - k[6006]*y_cur[IDX_C3NI] + k[6007]*y_cur[IDX_C3OI] + - k[6008]*y_cur[IDX_C3PI] + k[6009]*y_cur[IDX_C3SI] + - k[6011]*y_cur[IDX_C4I] + k[6011]*y_cur[IDX_C4I] + - k[6016]*y_cur[IDX_C4HI] + k[6023]*y_cur[IDX_C5I] + - k[6028]*y_cur[IDX_C5HI] + k[6070]*y_cur[IDX_CCPI] + - k[6260]*y_cur[IDX_SiC2I] + k[6263]*y_cur[IDX_SiC3I] + - k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + - k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM] + - k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + - k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + - k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + - k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + - k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + - k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM] + - k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + - k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + - k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM] + - k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + - k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + - k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM] + - k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + - k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] + - k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + - k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + - k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM] + - k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + - k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + - k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + - k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + - k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + - k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM] + - k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + - k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + - k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM] + - k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[6907]*y_cur[IDX_C2I] - + k[7089]*y_cur[IDX_GC2I] + k[7271]*y_cur[IDX_GC2I] + - k[7453]*y_cur[IDX_GC2I] + k[8654]*y_cur[IDX_GCI]*y_cur[IDX_GCI]; - ydot[yistart + IDX_C2II] = 0.0 - - k[205]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] - - k[206]*y_cur[IDX_C2II]*y_cur[IDX_NOI] - - k[207]*y_cur[IDX_C2II]*y_cur[IDX_SI] + - k[208]*y_cur[IDX_C2I]*y_cur[IDX_CNII] + - k[209]*y_cur[IDX_C2I]*y_cur[IDX_COII] + - k[210]*y_cur[IDX_C2I]*y_cur[IDX_N2II] + - k[211]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - - k[244]*y_cur[IDX_CI]*y_cur[IDX_C2II] - - k[259]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] - - k[287]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + - k[323]*y_cur[IDX_HII]*y_cur[IDX_C2I] + - k[436]*y_cur[IDX_H2II]*y_cur[IDX_C2I] + - k[462]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] + - k[508]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + - k[542]*y_cur[IDX_NII]*y_cur[IDX_C2I] - - k[585]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] + - k[646]*y_cur[IDX_OII]*y_cur[IDX_C2I] + - k[685]*y_cur[IDX_OHII]*y_cur[IDX_C2I] - - k[697]*y_cur[IDX_OHI]*y_cur[IDX_C2II] - - k[739]*y_cur[IDX_C2II]*y_cur[IDX_eM] + - k[1385]*y_cur[IDX_CII]*y_cur[IDX_CHI] - - k[1451]*y_cur[IDX_C2II]*y_cur[IDX_C2I] - - k[1452]*y_cur[IDX_C2II]*y_cur[IDX_C2H2I] - - k[1453]*y_cur[IDX_C2II]*y_cur[IDX_HCNI] - - k[1454]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] - - k[1455]*y_cur[IDX_C2II]*y_cur[IDX_O2I] - - k[1456]*y_cur[IDX_C2II]*y_cur[IDX_SI] + - k[1890]*y_cur[IDX_CI]*y_cur[IDX_CHII] + - k[1943]*y_cur[IDX_CHII]*y_cur[IDX_CHI] - - k[1995]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] - - k[2146]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2147]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2149]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2150]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2239]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + - k[2299]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - - k[2401]*y_cur[IDX_H2I]*y_cur[IDX_C2II] - - k[2519]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] - - k[2520]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] + - k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + - k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + - k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + - k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + - k[3114]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - - k[3383]*y_cur[IDX_NI]*y_cur[IDX_C2II] - - k[3528]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] - - k[3605]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - - k[3606]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - - k[3684]*y_cur[IDX_OI]*y_cur[IDX_C2II] + - k[5503]*y_cur[IDX_CII]*y_cur[IDX_CI] - k[5975]*y_cur[IDX_C2II] + - k[5977]*y_cur[IDX_C2I] + k[5979]*y_cur[IDX_C2HII] - - k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2M] = 0.0 - k[10]*y_cur[IDX_C2M]*y_cur[IDX_C2I] - - k[11]*y_cur[IDX_C2M]*y_cur[IDX_C3I] - - k[12]*y_cur[IDX_C2M]*y_cur[IDX_C4I] - - k[13]*y_cur[IDX_C2M]*y_cur[IDX_C5I] - - k[14]*y_cur[IDX_C2M]*y_cur[IDX_C6I] - - k[15]*y_cur[IDX_C2M]*y_cur[IDX_C7I] - - k[16]*y_cur[IDX_C2M]*y_cur[IDX_C8I] - - k[38]*y_cur[IDX_CI]*y_cur[IDX_C2M] - - k[87]*y_cur[IDX_HI]*y_cur[IDX_C2M] - - k[110]*y_cur[IDX_NI]*y_cur[IDX_C2M] - - k[128]*y_cur[IDX_OI]*y_cur[IDX_C2M] - - k[3384]*y_cur[IDX_NI]*y_cur[IDX_C2M] + - k[3393]*y_cur[IDX_NI]*y_cur[IDX_C3M] - - k[3685]*y_cur[IDX_OI]*y_cur[IDX_C2M] + - k[3693]*y_cur[IDX_OI]*y_cur[IDX_C3M] - - k[3991]*y_cur[IDX_C2M]*y_cur[IDX_CII] - - k[3992]*y_cur[IDX_C2M]*y_cur[IDX_C2H2II] - - k[3993]*y_cur[IDX_C2M]*y_cur[IDX_C2H3II] - - k[3994]*y_cur[IDX_C2M]*y_cur[IDX_C4H2II] - - k[3995]*y_cur[IDX_C2M]*y_cur[IDX_C4H3II] - - k[3996]*y_cur[IDX_C2M]*y_cur[IDX_C4SII] - - k[3997]*y_cur[IDX_C2M]*y_cur[IDX_CH2CCHII] - - k[3998]*y_cur[IDX_C2M]*y_cur[IDX_CH3II] - - k[3999]*y_cur[IDX_C2M]*y_cur[IDX_CNCII] - - k[4000]*y_cur[IDX_C2M]*y_cur[IDX_FeII] - - k[4001]*y_cur[IDX_C2M]*y_cur[IDX_HII] - - k[4002]*y_cur[IDX_C2M]*y_cur[IDX_H2COII] - - k[4003]*y_cur[IDX_C2M]*y_cur[IDX_H2SII] - - k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] - - k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] - - k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] - - k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] - - k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] - - k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] - - k[4010]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] - - k[4011]*y_cur[IDX_C2M]*y_cur[IDX_HeII] - - k[4012]*y_cur[IDX_C2M]*y_cur[IDX_MgII] - - k[4013]*y_cur[IDX_C2M]*y_cur[IDX_NII] - - k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] - - k[4015]*y_cur[IDX_C2M]*y_cur[IDX_NH3II] - - k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] - - k[4017]*y_cur[IDX_C2M]*y_cur[IDX_NOII] - - k[4018]*y_cur[IDX_C2M]*y_cur[IDX_NaII] - - k[4019]*y_cur[IDX_C2M]*y_cur[IDX_OII] - - k[4020]*y_cur[IDX_C2M]*y_cur[IDX_SII] - - k[4021]*y_cur[IDX_C2M]*y_cur[IDX_SOII] - - k[4022]*y_cur[IDX_C2M]*y_cur[IDX_SiII] - - k[4023]*y_cur[IDX_C2M]*y_cur[IDX_SiOII] - - k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] - - k[4025]*y_cur[IDX_C2M]*y_cur[IDX_SiSII] + - k[5589]*y_cur[IDX_C2I]*y_cur[IDX_eM] - k[5693]*y_cur[IDX_C2M] - - k[5976]*y_cur[IDX_C2M]; - ydot[yistart + IDX_C2HI] = 0.0 + k[2]*y_cur[IDX_CM]*y_cur[IDX_CHI] + - k[55]*y_cur[IDX_CI]*y_cur[IDX_CHM] + - k[66]*y_cur[IDX_HM]*y_cur[IDX_C2I] - - k[67]*y_cur[IDX_HM]*y_cur[IDX_C2HI] + - k[87]*y_cur[IDX_HI]*y_cur[IDX_C2M] + - k[212]*y_cur[IDX_C2HII]*y_cur[IDX_NOI] + - k[213]*y_cur[IDX_C2HII]*y_cur[IDX_SI] - - k[241]*y_cur[IDX_C2HI]*y_cur[IDX_CNII] - - k[242]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - - k[243]*y_cur[IDX_C2HI]*y_cur[IDX_N2II] - - k[329]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - - k[439]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] - - k[465]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] - - k[543]*y_cur[IDX_NII]*y_cur[IDX_C2HI] - - k[649]*y_cur[IDX_OII]*y_cur[IDX_C2HI] - - k[686]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] + - k[743]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + - k[749]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[750]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[751]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[752]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[760]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[789]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + - k[801]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[822]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + - k[822]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + - k[1055]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + - k[1064]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + - k[1074]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] + - k[1077]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + - k[1080]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + - k[1195]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + - k[1226]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] - - k[1308]*y_cur[IDX_CII]*y_cur[IDX_C2HI] + - k[1317]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + - k[1364]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + - k[1397]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] + - k[1398]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + - k[1402]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + - k[1515]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] + - k[1518]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + - k[1523]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + - k[1525]*y_cur[IDX_C2H2II]*y_cur[IDX_HNCI] + - k[1577]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - - k[1725]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2II] - - k[1726]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - - k[1727]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - - k[1728]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - - k[1729]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - - k[1730]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - - k[1731]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2II] - - k[1732]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - - k[1733]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - - k[1734]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] - - k[1735]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] - - k[1736]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2II] - - k[1737]*y_cur[IDX_C2HI]*y_cur[IDX_C4H3II] - - k[1738]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2II] - - k[1739]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2II] - - k[1740]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2II] - - k[1741]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] - - k[1742]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] - - k[1743]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - - k[1744]*y_cur[IDX_C2HI]*y_cur[IDX_H2COII] - - k[1745]*y_cur[IDX_C2HI]*y_cur[IDX_HCNII] - - k[1746]*y_cur[IDX_C2HI]*y_cur[IDX_HCOII] - - k[1747]*y_cur[IDX_C2HI]*y_cur[IDX_HNOII] - - k[1748]*y_cur[IDX_C2HI]*y_cur[IDX_N2HII] - - k[1749]*y_cur[IDX_C2HI]*y_cur[IDX_O2HII] - - k[1750]*y_cur[IDX_C2HI]*y_cur[IDX_SII] - - k[1751]*y_cur[IDX_C2HI]*y_cur[IDX_SiII] + - k[1755]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - - k[1935]*y_cur[IDX_CHII]*y_cur[IDX_C2HI] - - k[1975]*y_cur[IDX_CH2II]*y_cur[IDX_C2HI] - - k[2048]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] - - k[2049]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] - - k[2220]*y_cur[IDX_CH5II]*y_cur[IDX_C2HI] - - k[2299]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - - k[2373]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] - - k[2504]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] + - k[2522]*y_cur[IDX_H2OI]*y_cur[IDX_C2H2II] - - k[2597]*y_cur[IDX_H3II]*y_cur[IDX_C2HI] + - k[2852]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] + - k[3025]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - - k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - - k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + - k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + - k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + - k[3310]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + - k[3395]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - - k[3480]*y_cur[IDX_NHII]*y_cur[IDX_C2HI] - - k[3508]*y_cur[IDX_NH2II]*y_cur[IDX_C2HI] + - k[3531]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + - k[3556]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - - k[3634]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + - k[3695]*y_cur[IDX_OI]*y_cur[IDX_C3H2II] - - k[3770]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] + - k[4026]*y_cur[IDX_C2HM]*y_cur[IDX_CII] + - k[4027]*y_cur[IDX_C2HM]*y_cur[IDX_C2H2II] + - k[4028]*y_cur[IDX_C2HM]*y_cur[IDX_C2H3II] + - k[4029]*y_cur[IDX_C2HM]*y_cur[IDX_C4H2II] + - k[4030]*y_cur[IDX_C2HM]*y_cur[IDX_C4H3II] + - k[4031]*y_cur[IDX_C2HM]*y_cur[IDX_C4SII] + - k[4032]*y_cur[IDX_C2HM]*y_cur[IDX_CH2CCHII] + - k[4033]*y_cur[IDX_C2HM]*y_cur[IDX_CH3II] + - k[4034]*y_cur[IDX_C2HM]*y_cur[IDX_CNCII] + - k[4035]*y_cur[IDX_C2HM]*y_cur[IDX_FeII] + - k[4036]*y_cur[IDX_C2HM]*y_cur[IDX_HII] + - k[4037]*y_cur[IDX_C2HM]*y_cur[IDX_H2COII] + - k[4038]*y_cur[IDX_C2HM]*y_cur[IDX_H2SII] + - k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] + - k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] + - k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] + - k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + - k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + - k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + - k[4045]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + - k[4046]*y_cur[IDX_C2HM]*y_cur[IDX_HeII] + - k[4047]*y_cur[IDX_C2HM]*y_cur[IDX_MgII] + - k[4048]*y_cur[IDX_C2HM]*y_cur[IDX_NII] + - k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] + - k[4050]*y_cur[IDX_C2HM]*y_cur[IDX_NH3II] + - k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] + - k[4052]*y_cur[IDX_C2HM]*y_cur[IDX_NOII] + - k[4053]*y_cur[IDX_C2HM]*y_cur[IDX_NaII] + - k[4054]*y_cur[IDX_C2HM]*y_cur[IDX_OII] + - k[4055]*y_cur[IDX_C2HM]*y_cur[IDX_SII] + - k[4056]*y_cur[IDX_C2HM]*y_cur[IDX_SOII] + - k[4057]*y_cur[IDX_C2HM]*y_cur[IDX_SiII] + - k[4058]*y_cur[IDX_C2HM]*y_cur[IDX_SiOII] + - k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] + - k[4060]*y_cur[IDX_C2HM]*y_cur[IDX_SiSII] - - k[4888]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2I] - - k[4889]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2I] - - k[4890]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2I] - - k[4891]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2I] - - k[4892]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2I] - - k[4893]*y_cur[IDX_C2HI]*y_cur[IDX_C8H2I] - - k[4894]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] - - k[4895]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] - - k[4896]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] - - k[4897]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] - - k[4898]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CHCH2I] - - k[4899]*y_cur[IDX_C2HI]*y_cur[IDX_CSI] - - k[4900]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2I] - - k[4901]*y_cur[IDX_C2HI]*y_cur[IDX_HCNI] - - k[4902]*y_cur[IDX_C2HI]*y_cur[IDX_HNCI] - - k[4903]*y_cur[IDX_C2HI]*y_cur[IDX_NCCNI] - - k[4904]*y_cur[IDX_C2HI]*y_cur[IDX_O2I] - - k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] - - k[4906]*y_cur[IDX_C2HI]*y_cur[IDX_SI] - - k[4916]*y_cur[IDX_CI]*y_cur[IDX_C2HI] + - k[4944]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - - k[5133]*y_cur[IDX_H2I]*y_cur[IDX_C2HI] + - k[5154]*y_cur[IDX_HI]*y_cur[IDX_C2H2I] + - k[5202]*y_cur[IDX_HCNOI]*y_cur[IDX_CI] - - k[5228]*y_cur[IDX_NI]*y_cur[IDX_C2HI] - - k[5352]*y_cur[IDX_OI]*y_cur[IDX_C2HI] + - k[5357]*y_cur[IDX_OI]*y_cur[IDX_C3HI] + - k[5453]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - - k[5514]*y_cur[IDX_C2HI]*y_cur[IDX_CNI] - - k[5590]*y_cur[IDX_C2HI]*y_cur[IDX_eM] + k[5695]*y_cur[IDX_C2HM] + - k[5697]*y_cur[IDX_C2H2I] - k[5708]*y_cur[IDX_C2HI] - - k[5709]*y_cur[IDX_C2HI] + k[5731]*y_cur[IDX_C4HI] + - k[5740]*y_cur[IDX_C5H2I] + k[5742]*y_cur[IDX_C5HI] + - k[5750]*y_cur[IDX_C6H2I] + k[5753]*y_cur[IDX_C6HI] + - k[5846]*y_cur[IDX_HC3NI] + k[5847]*y_cur[IDX_C4H2I] + - k[5847]*y_cur[IDX_C4H2I] + k[5866]*y_cur[IDX_HNC3I] + - k[5980]*y_cur[IDX_C2HM] + k[5982]*y_cur[IDX_C2H2I] - - k[5993]*y_cur[IDX_C2HI] - k[5994]*y_cur[IDX_C2HI] + - k[6016]*y_cur[IDX_C4HI] + k[6025]*y_cur[IDX_C5H2I] + - k[6027]*y_cur[IDX_C5HI] + k[6040]*y_cur[IDX_C6HI] + - k[6171]*y_cur[IDX_HC3NI] + k[6172]*y_cur[IDX_C4H2I] + - k[6172]*y_cur[IDX_C4H2I] + - k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + - k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + - k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + - k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + - k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + - k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + - k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + - k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - - k[6908]*y_cur[IDX_C2HI] + k[7090]*y_cur[IDX_GC2HI] + - k[7272]*y_cur[IDX_GC2HI] + k[7454]*y_cur[IDX_GC2HI] + - k[8586]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] + - k[8655]*y_cur[IDX_GCI]*y_cur[IDX_GCHI]; - ydot[yistart + IDX_C2HII] = 0.0 - - k[212]*y_cur[IDX_C2HII]*y_cur[IDX_NOI] - - k[213]*y_cur[IDX_C2HII]*y_cur[IDX_SI] + - k[241]*y_cur[IDX_C2HI]*y_cur[IDX_CNII] + - k[242]*y_cur[IDX_C2HI]*y_cur[IDX_COII] + - k[243]*y_cur[IDX_C2HI]*y_cur[IDX_N2II] + - k[329]*y_cur[IDX_HII]*y_cur[IDX_C2HI] + - k[439]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] + - k[465]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] + - k[543]*y_cur[IDX_NII]*y_cur[IDX_C2HI] + - k[649]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + - k[686]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] - - k[740]*y_cur[IDX_C2HII]*y_cur[IDX_eM] - - k[741]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + - k[1342]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + - k[1352]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + - k[1454]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + - k[1457]*y_cur[IDX_C2I]*y_cur[IDX_H2COII] + - k[1458]*y_cur[IDX_C2I]*y_cur[IDX_HCNII] + - k[1459]*y_cur[IDX_C2I]*y_cur[IDX_HCOII] + - k[1460]*y_cur[IDX_C2I]*y_cur[IDX_HNOII] + - k[1461]*y_cur[IDX_C2I]*y_cur[IDX_N2HII] + - k[1463]*y_cur[IDX_C2I]*y_cur[IDX_O2HII] - - k[1466]*y_cur[IDX_C2HII]*y_cur[IDX_C2H2I] - - k[1467]*y_cur[IDX_C2HII]*y_cur[IDX_CNI] - - k[1468]*y_cur[IDX_C2HII]*y_cur[IDX_CO2I] - - k[1469]*y_cur[IDX_C2HII]*y_cur[IDX_H2COI] - - k[1470]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1471]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1472]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1473]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1474]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - - k[1475]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - - k[1476]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - - k[1477]*y_cur[IDX_C2HII]*y_cur[IDX_HCOI] - - k[1478]*y_cur[IDX_C2HII]*y_cur[IDX_HNCI] - - k[1849]*y_cur[IDX_CI]*y_cur[IDX_C2HII] + - k[1891]*y_cur[IDX_CI]*y_cur[IDX_CH2II] + - k[1894]*y_cur[IDX_CI]*y_cur[IDX_CH3II] + - k[1936]*y_cur[IDX_CHII]*y_cur[IDX_CH2I] - - k[1996]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - - k[1997]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] + - k[2146]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2151]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - - k[2152]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - - k[2153]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + - k[2217]*y_cur[IDX_CH5II]*y_cur[IDX_C2I] - - k[2240]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] - - k[2241]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] + - k[2369]*y_cur[IDX_H2II]*y_cur[IDX_C2I] + - k[2401]*y_cur[IDX_H2I]*y_cur[IDX_C2II] - - k[2402]*y_cur[IDX_H2I]*y_cur[IDX_C2HII] + - k[2503]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] + - k[2519]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] - - k[2521]*y_cur[IDX_H2OI]*y_cur[IDX_C2HII] + - k[2586]*y_cur[IDX_H3II]*y_cur[IDX_C2I] + - k[2766]*y_cur[IDX_H3OII]*y_cur[IDX_C2I] + - k[3026]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + - k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + - k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] - - k[3385]*y_cur[IDX_NI]*y_cur[IDX_C2HII] - - k[3386]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + - k[3477]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + - k[3507]*y_cur[IDX_NH2II]*y_cur[IDX_C2I] - - k[3529]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - - k[3530]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - - k[3554]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] - - k[3555]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] + - k[3605]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - - k[3686]*y_cur[IDX_OI]*y_cur[IDX_C2HII] + - k[3769]*y_cur[IDX_OHII]*y_cur[IDX_C2I] + k[5709]*y_cur[IDX_C2HI] - - k[5979]*y_cur[IDX_C2HII] + k[5994]*y_cur[IDX_C2HI] - - k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] - - k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2HM] = 0.0 - k[39]*y_cur[IDX_CI]*y_cur[IDX_C2HM] - - k[88]*y_cur[IDX_HI]*y_cur[IDX_C2HM] - - k[111]*y_cur[IDX_NI]*y_cur[IDX_C2HM] - - k[129]*y_cur[IDX_OI]*y_cur[IDX_C2HM] + - k[2366]*y_cur[IDX_HM]*y_cur[IDX_C2H2I] + - k[3396]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - - k[3687]*y_cur[IDX_OI]*y_cur[IDX_C2HM] + - k[3694]*y_cur[IDX_OI]*y_cur[IDX_C3HM] - - k[4026]*y_cur[IDX_C2HM]*y_cur[IDX_CII] - - k[4027]*y_cur[IDX_C2HM]*y_cur[IDX_C2H2II] - - k[4028]*y_cur[IDX_C2HM]*y_cur[IDX_C2H3II] - - k[4029]*y_cur[IDX_C2HM]*y_cur[IDX_C4H2II] - - k[4030]*y_cur[IDX_C2HM]*y_cur[IDX_C4H3II] - - k[4031]*y_cur[IDX_C2HM]*y_cur[IDX_C4SII] - - k[4032]*y_cur[IDX_C2HM]*y_cur[IDX_CH2CCHII] - - k[4033]*y_cur[IDX_C2HM]*y_cur[IDX_CH3II] - - k[4034]*y_cur[IDX_C2HM]*y_cur[IDX_CNCII] - - k[4035]*y_cur[IDX_C2HM]*y_cur[IDX_FeII] - - k[4036]*y_cur[IDX_C2HM]*y_cur[IDX_HII] - - k[4037]*y_cur[IDX_C2HM]*y_cur[IDX_H2COII] - - k[4038]*y_cur[IDX_C2HM]*y_cur[IDX_H2SII] - - k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] - - k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] - - k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] - - k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] - - k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] - - k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] - - k[4045]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] - - k[4046]*y_cur[IDX_C2HM]*y_cur[IDX_HeII] - - k[4047]*y_cur[IDX_C2HM]*y_cur[IDX_MgII] - - k[4048]*y_cur[IDX_C2HM]*y_cur[IDX_NII] - - k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] - - k[4050]*y_cur[IDX_C2HM]*y_cur[IDX_NH3II] - - k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] - - k[4052]*y_cur[IDX_C2HM]*y_cur[IDX_NOII] - - k[4053]*y_cur[IDX_C2HM]*y_cur[IDX_NaII] - - k[4054]*y_cur[IDX_C2HM]*y_cur[IDX_OII] - - k[4055]*y_cur[IDX_C2HM]*y_cur[IDX_SII] - - k[4056]*y_cur[IDX_C2HM]*y_cur[IDX_SOII] - - k[4057]*y_cur[IDX_C2HM]*y_cur[IDX_SiII] - - k[4058]*y_cur[IDX_C2HM]*y_cur[IDX_SiOII] - - k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] - - k[4060]*y_cur[IDX_C2HM]*y_cur[IDX_SiSII] + - k[5590]*y_cur[IDX_C2HI]*y_cur[IDX_eM] - k[5695]*y_cur[IDX_C2HM] - - k[5980]*y_cur[IDX_C2HM]; - ydot[yistart + IDX_C2H2I] = 0.0 + k[1]*y_cur[IDX_CM]*y_cur[IDX_CH2I] - + k[67]*y_cur[IDX_HM]*y_cur[IDX_C2HI] + - k[88]*y_cur[IDX_HI]*y_cur[IDX_C2HM] + - k[214]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + - k[215]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + - k[216]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + - k[217]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + - k[218]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + - k[219]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + - k[220]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + - k[221]*y_cur[IDX_C2H2II]*y_cur[IDX_FeI] + - k[222]*y_cur[IDX_C2H2II]*y_cur[IDX_H2COI] + - k[223]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + - k[224]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + - k[225]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] + - k[226]*y_cur[IDX_C2H2II]*y_cur[IDX_NOI] - - k[227]*y_cur[IDX_C2H2I]*y_cur[IDX_CH2CCHII] + - k[227]*y_cur[IDX_C2H2I]*y_cur[IDX_CH2CCHII] - - k[228]*y_cur[IDX_C2H2I]*y_cur[IDX_CO2II] - - k[229]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - - k[230]*y_cur[IDX_C2H2I]*y_cur[IDX_HCNII] - - k[277]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - - k[324]*y_cur[IDX_HII]*y_cur[IDX_C2H2I] - - k[437]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] - - k[463]*y_cur[IDX_H2OII]*y_cur[IDX_C2H2I] - - k[509]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[529]*y_cur[IDX_MgI]*y_cur[IDX_C2H2II] + - k[598]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] + - k[632]*y_cur[IDX_NaI]*y_cur[IDX_C2H2II] - - k[647]*y_cur[IDX_OII]*y_cur[IDX_C2H2I] - - k[668]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + - k[747]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[748]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[757]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[758]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[764]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[792]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[797]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + - k[807]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[910]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] + - k[913]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + - k[919]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + - k[1066]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + - k[1183]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + - k[1186]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] - - k[1300]*y_cur[IDX_CII]*y_cur[IDX_C2H2I] + - k[1343]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + - k[1363]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[1452]*y_cur[IDX_C2II]*y_cur[IDX_C2H2I] - - k[1466]*y_cur[IDX_C2HII]*y_cur[IDX_C2H2I] - - k[1479]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - - k[1480]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - - k[1535]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H3II] - - k[1536]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] - - k[1537]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] - - k[1538]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] - - k[1539]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] - - k[1540]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - - k[1541]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - - k[1542]*y_cur[IDX_C2H2I]*y_cur[IDX_C2N2II] - - k[1543]*y_cur[IDX_C2H2I]*y_cur[IDX_C3II] - - k[1544]*y_cur[IDX_C2H2I]*y_cur[IDX_C3HII] - - k[1545]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H2II] - - k[1546]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H3II] - - k[1547]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H4II] - - k[1548]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H5II] - - k[1549]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] - - k[1550]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] - - k[1551]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HII] - - k[1552]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] - - k[1553]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] - - k[1554]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] - - k[1555]*y_cur[IDX_C2H2I]*y_cur[IDX_C4NII] - - k[1556]*y_cur[IDX_C2H2I]*y_cur[IDX_C5II] - - k[1557]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] - - k[1558]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] - - k[1559]*y_cur[IDX_C2H2I]*y_cur[IDX_C6HII] - - k[1560]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] - - k[1561]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] - - k[1562]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - - k[1563]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - - k[1564]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - - k[1565]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - - k[1566]*y_cur[IDX_C2H2I]*y_cur[IDX_HCOII] - - k[1567]*y_cur[IDX_C2H2I]*y_cur[IDX_HCO2II] - - k[1568]*y_cur[IDX_C2H2I]*y_cur[IDX_N2HII] - - k[1569]*y_cur[IDX_C2H2I]*y_cur[IDX_PII] - - k[1570]*y_cur[IDX_C2H2I]*y_cur[IDX_PHII] - - k[1571]*y_cur[IDX_C2H2I]*y_cur[IDX_PH2II] - - k[1572]*y_cur[IDX_C2H2I]*y_cur[IDX_PH3II] - - k[1573]*y_cur[IDX_C2H2I]*y_cur[IDX_SII] - - k[1574]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - - k[1575]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2II] - - k[1576]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2HII] + - k[1579]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H4I] + - k[1580]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + - k[1583]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + - k[1586]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + - k[1589]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + - k[1592]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + - k[1595]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + - k[1598]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H6I] + - k[1599]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + - k[1602]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + - k[1605]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + - k[1608]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + - k[1611]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] + - k[1617]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + - k[1619]*y_cur[IDX_C2H3II]*y_cur[IDX_H2SI] + - k[1620]*y_cur[IDX_C2H3II]*y_cur[IDX_HC3NI] + - k[1621]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + - k[1624]*y_cur[IDX_C2H3II]*y_cur[IDX_NCCNI] + - k[1628]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + - k[1686]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + - k[1690]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] + - k[1691]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] + - k[1694]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] + - k[1698]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + - k[1704]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H5II] + - k[1726]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + - k[1754]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] + - k[1773]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1779]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + - k[1807]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] + - k[1837]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] + - k[1920]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - - k[1934]*y_cur[IDX_CHII]*y_cur[IDX_C2H2I] + - k[2031]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] - - k[2042]*y_cur[IDX_CH3II]*y_cur[IDX_C2H2I] + - k[2081]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + - k[2107]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] - - k[2133]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - - k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + - k[2160]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] + - k[2164]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + - k[2174]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + - k[2176]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + - k[2182]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - - k[2218]*y_cur[IDX_CH5II]*y_cur[IDX_C2H2I] - - k[2366]*y_cur[IDX_HM]*y_cur[IDX_C2H2I] - - k[2370]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + - k[2523]*y_cur[IDX_H2OI]*y_cur[IDX_C2H3II] + - k[2530]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + - k[2578]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - - k[2587]*y_cur[IDX_H3II]*y_cur[IDX_C2H2I] + - k[2850]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] + - k[2851]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H4II] + - k[2861]*y_cur[IDX_HCNI]*y_cur[IDX_C2H3II] + - k[3036]*y_cur[IDX_HNCI]*y_cur[IDX_C2H3II] - - k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - - k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - - k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3557]*y_cur[IDX_NH3I]*y_cur[IDX_C2H3II] + - k[3563]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - - k[3654]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - - k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + - k[3696]*y_cur[IDX_OI]*y_cur[IDX_C3H3II] + - k[3726]*y_cur[IDX_OI]*y_cur[IDX_CH2CCHII] - - k[3843]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - - k[3844]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - - k[3845]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - - k[3846]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + - k[3866]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + - k[3887]*y_cur[IDX_CM]*y_cur[IDX_C2H2II] + - k[3922]*y_cur[IDX_C10M]*y_cur[IDX_C2H2II] + - k[3957]*y_cur[IDX_C10HM]*y_cur[IDX_C2H2II] + - k[3992]*y_cur[IDX_C2M]*y_cur[IDX_C2H2II] + - k[4027]*y_cur[IDX_C2HM]*y_cur[IDX_C2H2II] + - k[4062]*y_cur[IDX_C3M]*y_cur[IDX_C2H2II] + - k[4097]*y_cur[IDX_C3HM]*y_cur[IDX_C2H2II] + - k[4132]*y_cur[IDX_C3NM]*y_cur[IDX_C2H2II] + - k[4167]*y_cur[IDX_C4M]*y_cur[IDX_C2H2II] + - k[4202]*y_cur[IDX_C4HM]*y_cur[IDX_C2H2II] + - k[4237]*y_cur[IDX_C5M]*y_cur[IDX_C2H2II] + - k[4272]*y_cur[IDX_C5HM]*y_cur[IDX_C2H2II] + - k[4307]*y_cur[IDX_C5NM]*y_cur[IDX_C2H2II] + - k[4342]*y_cur[IDX_C6M]*y_cur[IDX_C2H2II] + - k[4377]*y_cur[IDX_C6HM]*y_cur[IDX_C2H2II] + - k[4412]*y_cur[IDX_C7M]*y_cur[IDX_C2H2II] + - k[4447]*y_cur[IDX_C7HM]*y_cur[IDX_C2H2II] + - k[4482]*y_cur[IDX_C8M]*y_cur[IDX_C2H2II] + - k[4517]*y_cur[IDX_C8HM]*y_cur[IDX_C2H2II] + - k[4552]*y_cur[IDX_C9M]*y_cur[IDX_C2H2II] + - k[4587]*y_cur[IDX_C9HM]*y_cur[IDX_C2H2II] + - k[4622]*y_cur[IDX_CHM]*y_cur[IDX_C2H2II] + - k[4657]*y_cur[IDX_CNM]*y_cur[IDX_C2H2II] + - k[4692]*y_cur[IDX_HM]*y_cur[IDX_C2H2II] + - k[4728]*y_cur[IDX_OM]*y_cur[IDX_C2H2II] + - k[4763]*y_cur[IDX_O2M]*y_cur[IDX_C2H2II] + - k[4798]*y_cur[IDX_OHM]*y_cur[IDX_C2H2II] + - k[4833]*y_cur[IDX_SM]*y_cur[IDX_C2H2II] - - k[4867]*y_cur[IDX_C2I]*y_cur[IDX_C2H2I] - - k[4877]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HI] - - k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] - - k[4879]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - - k[4880]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] + - k[4882]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - - k[4888]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2I] - - k[4911]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] - - k[4912]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] + - k[4949]*y_cur[IDX_CI]*y_cur[IDX_CH3I] - - k[4991]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2I] + - k[4992]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + - k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + - k[5025]*y_cur[IDX_CH3I]*y_cur[IDX_C2H3I] - - k[5063]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - - k[5064]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - - k[5104]*y_cur[IDX_CNI]*y_cur[IDX_C2H2I] + - k[5133]*y_cur[IDX_H2I]*y_cur[IDX_C2HI] - - k[5154]*y_cur[IDX_HI]*y_cur[IDX_C2H2I] + - k[5155]*y_cur[IDX_HI]*y_cur[IDX_C2H3I] + - k[5223]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - - k[5344]*y_cur[IDX_OI]*y_cur[IDX_C2H2I] + - k[5395]*y_cur[IDX_OI]*y_cur[IDX_H2CCCI] - - k[5453]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - - k[5454]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - - k[5455]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] + - k[5456]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] - - k[5511]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] - - k[5512]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - - k[5520]*y_cur[IDX_C4H3II]*y_cur[IDX_C2H2I] - - k[5567]*y_cur[IDX_H3OII]*y_cur[IDX_C2H2I] - k[5696]*y_cur[IDX_C2H2I] - - k[5697]*y_cur[IDX_C2H2I] + k[5698]*y_cur[IDX_C2H3I] + - k[5700]*y_cur[IDX_C2H4I] - k[5981]*y_cur[IDX_C2H2I] - - k[5982]*y_cur[IDX_C2H2I] + k[5983]*y_cur[IDX_C2H3I] + - k[5985]*y_cur[IDX_C2H4I] + k[6038]*y_cur[IDX_C6H6I] + - k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + - k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + - k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + - k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + - k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + - k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - - k[6910]*y_cur[IDX_C2H2I] + k[7092]*y_cur[IDX_GC2H2I] + - k[7274]*y_cur[IDX_GC2H2I] + k[7456]*y_cur[IDX_GC2H2I] + - k[8587]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] + - k[8656]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] + - k[8715]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI]; - ydot[yistart + IDX_C2H2II] = 0.0 - - k[214]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - - k[215]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - - k[216]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - - k[217]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - - k[218]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - - k[219]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - - k[220]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - - k[221]*y_cur[IDX_C2H2II]*y_cur[IDX_FeI] - - k[222]*y_cur[IDX_C2H2II]*y_cur[IDX_H2COI] - - k[223]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - - k[224]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - - k[225]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] - - k[226]*y_cur[IDX_C2H2II]*y_cur[IDX_NOI] + - k[228]*y_cur[IDX_C2H2I]*y_cur[IDX_CO2II] + - k[229]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] + - k[230]*y_cur[IDX_C2H2I]*y_cur[IDX_HCNII] + - k[277]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + - k[324]*y_cur[IDX_HII]*y_cur[IDX_C2H2I] + - k[437]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + - k[463]*y_cur[IDX_H2OII]*y_cur[IDX_C2H2I] + - k[509]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - - k[529]*y_cur[IDX_MgI]*y_cur[IDX_C2H2II] - - k[598]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - - k[632]*y_cur[IDX_NaI]*y_cur[IDX_C2H2II] + - k[647]*y_cur[IDX_OII]*y_cur[IDX_C2H2I] + - k[668]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - - k[742]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] - - k[743]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] - - k[744]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + - k[1343]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + - k[1353]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + - k[1363]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + - k[1367]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1373]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1383]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + - k[1474]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + - k[1477]*y_cur[IDX_C2HII]*y_cur[IDX_HCOI] - - k[1479]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - - k[1480]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - - k[1481]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - - k[1482]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - - k[1483]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - - k[1484]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - - k[1485]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] - - k[1486]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] - - k[1487]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] - - k[1488]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] - - k[1489]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] - - k[1490]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] - - k[1491]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - - k[1492]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - - k[1493]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - - k[1494]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - - k[1495]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - - k[1496]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - - k[1497]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] - - k[1498]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] - - k[1499]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - - k[1500]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - - k[1501]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] - - k[1502]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] - - k[1503]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] - - k[1504]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] - - k[1505]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - - k[1506]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - - k[1507]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - - k[1508]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - - k[1509]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - - k[1510]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - - k[1511]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - - k[1512]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - - k[1513]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - - k[1514]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - - k[1515]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - - k[1516]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] - - k[1517]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] - - k[1518]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - - k[1519]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - - k[1520]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - - k[1521]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - - k[1522]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] - - k[1523]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] - - k[1524]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] - - k[1525]*y_cur[IDX_C2H2II]*y_cur[IDX_HNCI] - - k[1526]*y_cur[IDX_C2H2II]*y_cur[IDX_PI] - - k[1527]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] - - k[1528]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] - - k[1529]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - - k[1530]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - - k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1532]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1533]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1534]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + - k[1542]*y_cur[IDX_C2H2I]*y_cur[IDX_C2N2II] - - k[1725]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2II] + - k[1726]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + - k[1744]*y_cur[IDX_C2HI]*y_cur[IDX_H2COII] + - k[1745]*y_cur[IDX_C2HI]*y_cur[IDX_HCNII] + - k[1746]*y_cur[IDX_C2HI]*y_cur[IDX_HCOII] + - k[1747]*y_cur[IDX_C2HI]*y_cur[IDX_HNOII] + - k[1748]*y_cur[IDX_C2HI]*y_cur[IDX_N2HII] + - k[1749]*y_cur[IDX_C2HI]*y_cur[IDX_O2HII] - - k[1850]*y_cur[IDX_CI]*y_cur[IDX_C2H2II] + - k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - - k[1998]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2II] + - k[2147]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + - k[2151]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - - k[2154]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] - - k[2155]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + - k[2220]*y_cur[IDX_CH5II]*y_cur[IDX_C2HI] - - k[2242]*y_cur[IDX_CHI]*y_cur[IDX_C2H2II] + - k[2243]*y_cur[IDX_CHI]*y_cur[IDX_CH3II] - - k[2277]*y_cur[IDX_CNI]*y_cur[IDX_C2H2II] + - k[2295]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + - k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + - k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + - k[2373]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] + - k[2402]*y_cur[IDX_H2I]*y_cur[IDX_C2HII] - - k[2403]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] + - k[2445]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] + - k[2504]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] - - k[2522]*y_cur[IDX_H2OI]*y_cur[IDX_C2H2II] + - k[2597]*y_cur[IDX_H3II]*y_cur[IDX_C2HI] + - k[2827]*y_cur[IDX_HI]*y_cur[IDX_C2H3II] + - k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + - k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - - k[3387]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - - k[3388]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - - k[3389]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + - k[3397]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] + - k[3480]*y_cur[IDX_NHII]*y_cur[IDX_C2HI] + - k[3508]*y_cur[IDX_NH2II]*y_cur[IDX_C2HI] - - k[3531]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] - - k[3532]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + - k[3548]*y_cur[IDX_NH3II]*y_cur[IDX_C2I] - - k[3556]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - - k[3607]*y_cur[IDX_NHI]*y_cur[IDX_C2H2II] + - k[3632]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - - k[3688]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] - - k[3689]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + - k[3770]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] - - k[3796]*y_cur[IDX_OHI]*y_cur[IDX_C2H2II] - - k[3887]*y_cur[IDX_CM]*y_cur[IDX_C2H2II] - - k[3922]*y_cur[IDX_C10M]*y_cur[IDX_C2H2II] - - k[3957]*y_cur[IDX_C10HM]*y_cur[IDX_C2H2II] - - k[3992]*y_cur[IDX_C2M]*y_cur[IDX_C2H2II] - - k[4027]*y_cur[IDX_C2HM]*y_cur[IDX_C2H2II] - - k[4062]*y_cur[IDX_C3M]*y_cur[IDX_C2H2II] - - k[4097]*y_cur[IDX_C3HM]*y_cur[IDX_C2H2II] - - k[4132]*y_cur[IDX_C3NM]*y_cur[IDX_C2H2II] - - k[4167]*y_cur[IDX_C4M]*y_cur[IDX_C2H2II] - - k[4202]*y_cur[IDX_C4HM]*y_cur[IDX_C2H2II] - - k[4237]*y_cur[IDX_C5M]*y_cur[IDX_C2H2II] - - k[4272]*y_cur[IDX_C5HM]*y_cur[IDX_C2H2II] - - k[4307]*y_cur[IDX_C5NM]*y_cur[IDX_C2H2II] - - k[4342]*y_cur[IDX_C6M]*y_cur[IDX_C2H2II] - - k[4377]*y_cur[IDX_C6HM]*y_cur[IDX_C2H2II] - - k[4412]*y_cur[IDX_C7M]*y_cur[IDX_C2H2II] - - k[4447]*y_cur[IDX_C7HM]*y_cur[IDX_C2H2II] - - k[4482]*y_cur[IDX_C8M]*y_cur[IDX_C2H2II] - - k[4517]*y_cur[IDX_C8HM]*y_cur[IDX_C2H2II] - - k[4552]*y_cur[IDX_C9M]*y_cur[IDX_C2H2II] - - k[4587]*y_cur[IDX_C9HM]*y_cur[IDX_C2H2II] - - k[4622]*y_cur[IDX_CHM]*y_cur[IDX_C2H2II] - - k[4657]*y_cur[IDX_CNM]*y_cur[IDX_C2H2II] - - k[4692]*y_cur[IDX_HM]*y_cur[IDX_C2H2II] - - k[4728]*y_cur[IDX_OM]*y_cur[IDX_C2H2II] - - k[4763]*y_cur[IDX_O2M]*y_cur[IDX_C2H2II] - - k[4798]*y_cur[IDX_OHM]*y_cur[IDX_C2H2II] - - k[4833]*y_cur[IDX_SM]*y_cur[IDX_C2H2II] - - k[5507]*y_cur[IDX_C2H2II]*y_cur[IDX_COI] - - k[5508]*y_cur[IDX_C2H2II]*y_cur[IDX_HC3NI] - - k[5509]*y_cur[IDX_C2H2II]*y_cur[IDX_HC5NI] - - k[5510]*y_cur[IDX_C2H2II]*y_cur[IDX_HC7NI] - - k[5549]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] + k[5696]*y_cur[IDX_C2H2I] - + k[5981]*y_cur[IDX_C2H2I] - - k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - - k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - - k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2H3I] = 0.0 - - k[214]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - - k[231]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] - - k[269]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - - k[325]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + - k[759]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[766]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[799]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[808]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[914]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] - - k[1301]*y_cur[IDX_CII]*y_cur[IDX_C2H3I] + - k[1307]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] + - k[1329]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + - k[1374]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1380]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - - k[1481]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - - k[1482]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + - k[1534]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + - k[1562]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - - k[1577]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - - k[1578]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - - k[1628]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] - - k[1629]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] - - k[1630]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] - - k[1631]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H3II] - - k[1632]*y_cur[IDX_C2H3I]*y_cur[IDX_C4HII] - - k[1633]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] - - k[1634]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] - - k[1635]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] - - k[1636]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] - - k[1637]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] - - k[1638]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] - - k[1639]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] - - k[1640]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] - - k[1641]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] - - k[1642]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] - - k[1643]*y_cur[IDX_C2H3I]*y_cur[IDX_CH2CCHII] - - k[1644]*y_cur[IDX_C2H3I]*y_cur[IDX_HCOII] - - k[1645]*y_cur[IDX_C2H3I]*y_cur[IDX_SII] - - k[1646]*y_cur[IDX_C2H3I]*y_cur[IDX_SiII] + - k[1676]*y_cur[IDX_C2H4II]*y_cur[IDX_HC3NI] + - k[1707]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] + - k[1772]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1778]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - - k[2044]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - - k[2295]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] - - k[2588]*y_cur[IDX_H3II]*y_cur[IDX_C2H3I] - - k[2767]*y_cur[IDX_H3OII]*y_cur[IDX_C2H3I] - - k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] - - k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + - k[3697]*y_cur[IDX_OI]*y_cur[IDX_C3H4II] + - k[3888]*y_cur[IDX_CM]*y_cur[IDX_C2H3II] + - k[3923]*y_cur[IDX_C10M]*y_cur[IDX_C2H3II] + - k[3958]*y_cur[IDX_C10HM]*y_cur[IDX_C2H3II] + - k[3993]*y_cur[IDX_C2M]*y_cur[IDX_C2H3II] + - k[4028]*y_cur[IDX_C2HM]*y_cur[IDX_C2H3II] + - k[4063]*y_cur[IDX_C3M]*y_cur[IDX_C2H3II] + - k[4098]*y_cur[IDX_C3HM]*y_cur[IDX_C2H3II] + - k[4133]*y_cur[IDX_C3NM]*y_cur[IDX_C2H3II] + - k[4168]*y_cur[IDX_C4M]*y_cur[IDX_C2H3II] + - k[4203]*y_cur[IDX_C4HM]*y_cur[IDX_C2H3II] + - k[4238]*y_cur[IDX_C5M]*y_cur[IDX_C2H3II] + - k[4273]*y_cur[IDX_C5HM]*y_cur[IDX_C2H3II] + - k[4308]*y_cur[IDX_C5NM]*y_cur[IDX_C2H3II] + - k[4343]*y_cur[IDX_C6M]*y_cur[IDX_C2H3II] + - k[4378]*y_cur[IDX_C6HM]*y_cur[IDX_C2H3II] + - k[4413]*y_cur[IDX_C7M]*y_cur[IDX_C2H3II] + - k[4448]*y_cur[IDX_C7HM]*y_cur[IDX_C2H3II] + - k[4483]*y_cur[IDX_C8M]*y_cur[IDX_C2H3II] + - k[4518]*y_cur[IDX_C8HM]*y_cur[IDX_C2H3II] + - k[4553]*y_cur[IDX_C9M]*y_cur[IDX_C2H3II] + - k[4588]*y_cur[IDX_C9HM]*y_cur[IDX_C2H3II] + - k[4623]*y_cur[IDX_CHM]*y_cur[IDX_C2H3II] + - k[4658]*y_cur[IDX_CNM]*y_cur[IDX_C2H3II] + - k[4693]*y_cur[IDX_HM]*y_cur[IDX_C2H3II] + - k[4729]*y_cur[IDX_OM]*y_cur[IDX_C2H3II] + - k[4764]*y_cur[IDX_O2M]*y_cur[IDX_C2H3II] + - k[4799]*y_cur[IDX_OHM]*y_cur[IDX_C2H3II] + - k[4834]*y_cur[IDX_SM]*y_cur[IDX_C2H3II] - - k[4881]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - - k[4882]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - - k[4883]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H3I] + - k[4898]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CHCH2I] - - k[4913]*y_cur[IDX_CI]*y_cur[IDX_C2H3I] + - k[4994]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + - k[5024]*y_cur[IDX_C4H6I]*y_cur[IDX_HI] - - k[5025]*y_cur[IDX_CH3I]*y_cur[IDX_C2H3I] + - k[5105]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - - k[5155]*y_cur[IDX_HI]*y_cur[IDX_C2H3I] - - k[5223]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - - k[5224]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - - k[5345]*y_cur[IDX_OI]*y_cur[IDX_C2H3I] + - k[5346]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + - k[5383]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - - k[5456]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] - - k[5586]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] - k[5698]*y_cur[IDX_C2H3I] - - k[5699]*y_cur[IDX_C2H3I] + k[5702]*y_cur[IDX_C2H5I] + - k[5787]*y_cur[IDX_CH2CHCNI] - k[5983]*y_cur[IDX_C2H3I] - - k[5984]*y_cur[IDX_C2H3I] + k[5987]*y_cur[IDX_C2H5I] + - k[6088]*y_cur[IDX_CH2CHCNI] + - k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - - k[6912]*y_cur[IDX_C2H3I] + k[7094]*y_cur[IDX_GC2H3I] + - k[7276]*y_cur[IDX_GC2H3I] + k[7458]*y_cur[IDX_GC2H3I] + - k[8588]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] + - k[8660]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] + - k[8716]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I]; - ydot[yistart + IDX_C2H3II] = 0.0 + - k[214]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + - k[231]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + - k[269]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + - k[325]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + - k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] - - k[745]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[746]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[747]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[748]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[749]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[750]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[751]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[752]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[753]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[754]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[755]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - - k[756]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[1302]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1354]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] + - k[1364]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + - k[1368]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1374]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1379]*y_cur[IDX_CII]*y_cur[IDX_CH3CNI] + - k[1384]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + - k[1519]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + - k[1524]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] - - k[1535]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H3II] + - k[1566]*y_cur[IDX_C2H2I]*y_cur[IDX_HCOII] + - k[1567]*y_cur[IDX_C2H2I]*y_cur[IDX_HCO2II] + - k[1568]*y_cur[IDX_C2H2I]*y_cur[IDX_N2HII] - - k[1577]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - - k[1578]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - - k[1579]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H4I] - - k[1580]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - - k[1581]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - - k[1582]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - - k[1583]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - - k[1584]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - - k[1585]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - - k[1586]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - - k[1587]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - - k[1588]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - - k[1589]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - - k[1590]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - - k[1591]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - - k[1592]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - - k[1593]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - - k[1594]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - - k[1595]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - - k[1596]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - - k[1597]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - - k[1598]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H6I] - - k[1599]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - - k[1600]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - - k[1601]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - - k[1602]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - - k[1603]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - - k[1604]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - - k[1605]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - - k[1606]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - - k[1607]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - - k[1608]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - - k[1609]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - - k[1610]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - - k[1611]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] - - k[1612]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] - - k[1613]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - - k[1614]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - - k[1615]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - - k[1616]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - - k[1617]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - - k[1618]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - - k[1619]*y_cur[IDX_C2H3II]*y_cur[IDX_H2SI] - - k[1620]*y_cur[IDX_C2H3II]*y_cur[IDX_HC3NI] - - k[1621]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - - k[1622]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - - k[1623]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - - k[1624]*y_cur[IDX_C2H3II]*y_cur[IDX_NCCNI] - - k[1625]*y_cur[IDX_C2H3II]*y_cur[IDX_SI] - - k[1626]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] - - k[1627]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] + - k[1715]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - - k[1726]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - - k[1727]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - - k[1728]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - - k[1851]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] - - k[1852]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + - k[1941]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + - k[1999]*y_cur[IDX_CH2I]*y_cur[IDX_CH3II] + - k[2045]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + - k[2133]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - - k[2156]*y_cur[IDX_CH4I]*y_cur[IDX_C2H3II] + - k[2160]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] + - k[2172]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + - k[2199]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] + - k[2218]*y_cur[IDX_CH5II]*y_cur[IDX_C2H2I] + - k[2297]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + - k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + - k[2370]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + - k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + - k[2403]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] - - k[2523]*y_cur[IDX_H2OI]*y_cur[IDX_C2H3II] + - k[2528]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + - k[2576]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + - k[2587]*y_cur[IDX_H3II]*y_cur[IDX_C2H2I] + - k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + - k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + - k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2827]*y_cur[IDX_HI]*y_cur[IDX_C2H3II] + - k[2828]*y_cur[IDX_HI]*y_cur[IDX_C2H4II] - - k[2861]*y_cur[IDX_HCNI]*y_cur[IDX_C2H3II] - - k[3036]*y_cur[IDX_HNCI]*y_cur[IDX_C2H3II] + - k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + - k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - - k[3390]*y_cur[IDX_NI]*y_cur[IDX_C2H3II] - - k[3557]*y_cur[IDX_NH3I]*y_cur[IDX_C2H3II] + - k[3633]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + - k[3635]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - - k[3690]*y_cur[IDX_OI]*y_cur[IDX_C2H3II] - - k[3888]*y_cur[IDX_CM]*y_cur[IDX_C2H3II] - - k[3923]*y_cur[IDX_C10M]*y_cur[IDX_C2H3II] - - k[3958]*y_cur[IDX_C10HM]*y_cur[IDX_C2H3II] - - k[3993]*y_cur[IDX_C2M]*y_cur[IDX_C2H3II] - - k[4028]*y_cur[IDX_C2HM]*y_cur[IDX_C2H3II] - - k[4063]*y_cur[IDX_C3M]*y_cur[IDX_C2H3II] - - k[4098]*y_cur[IDX_C3HM]*y_cur[IDX_C2H3II] - - k[4133]*y_cur[IDX_C3NM]*y_cur[IDX_C2H3II] - - k[4168]*y_cur[IDX_C4M]*y_cur[IDX_C2H3II] - - k[4203]*y_cur[IDX_C4HM]*y_cur[IDX_C2H3II] - - k[4238]*y_cur[IDX_C5M]*y_cur[IDX_C2H3II] - - k[4273]*y_cur[IDX_C5HM]*y_cur[IDX_C2H3II] - - k[4308]*y_cur[IDX_C5NM]*y_cur[IDX_C2H3II] - - k[4343]*y_cur[IDX_C6M]*y_cur[IDX_C2H3II] - - k[4378]*y_cur[IDX_C6HM]*y_cur[IDX_C2H3II] - - k[4413]*y_cur[IDX_C7M]*y_cur[IDX_C2H3II] - - k[4448]*y_cur[IDX_C7HM]*y_cur[IDX_C2H3II] - - k[4483]*y_cur[IDX_C8M]*y_cur[IDX_C2H3II] - - k[4518]*y_cur[IDX_C8HM]*y_cur[IDX_C2H3II] - - k[4553]*y_cur[IDX_C9M]*y_cur[IDX_C2H3II] - - k[4588]*y_cur[IDX_C9HM]*y_cur[IDX_C2H3II] - - k[4623]*y_cur[IDX_CHM]*y_cur[IDX_C2H3II] - - k[4658]*y_cur[IDX_CNM]*y_cur[IDX_C2H3II] - - k[4693]*y_cur[IDX_HM]*y_cur[IDX_C2H3II] - - k[4729]*y_cur[IDX_OM]*y_cur[IDX_C2H3II] - - k[4764]*y_cur[IDX_O2M]*y_cur[IDX_C2H3II] - - k[4799]*y_cur[IDX_OHM]*y_cur[IDX_C2H3II] - - k[4834]*y_cur[IDX_SM]*y_cur[IDX_C2H3II] - - k[5513]*y_cur[IDX_C2H3II]*y_cur[IDX_COI] + k[5699]*y_cur[IDX_C2H3I] - + k[5984]*y_cur[IDX_C2H3I] - - k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2H4I] = 0.0 - - k[148]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - - k[215]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + - k[231]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + - k[232]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + - k[233]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - - k[234]*y_cur[IDX_C2H4I]*y_cur[IDX_C2N2II] - - k[235]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - - k[236]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - - k[237]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H6II] - - k[238]*y_cur[IDX_C2H4I]*y_cur[IDX_CO2II] - - k[239]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] - - k[240]*y_cur[IDX_C2H4I]*y_cur[IDX_O2II] - - k[278]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] - - k[326]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - - k[438]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - - k[464]*y_cur[IDX_H2OII]*y_cur[IDX_C2H4I] - - k[510]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[599]*y_cur[IDX_NH3I]*y_cur[IDX_C2H4II] - - k[648]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + - k[767]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[769]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + - k[774]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + - k[809]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[935]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] + - k[1189]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] - - k[1302]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - - k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - - k[1304]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - - k[1305]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1373]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1483]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - - k[1484]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + - k[1511]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] + - k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + - k[1533]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1579]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H4I] + - k[1613]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - - k[1647]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] - - k[1648]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] - - k[1685]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H5II] - - k[1686]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - - k[1687]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - - k[1688]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - - k[1689]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - - k[1690]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - - k[1691]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - - k[1692]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - - k[1693]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H3II] - - k[1694]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] - - k[1695]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] - - k[1696]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] - - k[1697]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] - - k[1698]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - - k[1699]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - - k[1700]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - - k[1701]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] - - k[1702]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] - - k[1703]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H2II] - - k[1704]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H5II] - - k[1705]*y_cur[IDX_C2H4I]*y_cur[IDX_C7H2II] - - k[1706]*y_cur[IDX_C2H4I]*y_cur[IDX_CH2CCHII] - - k[1707]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] - - k[1708]*y_cur[IDX_C2H4I]*y_cur[IDX_HCOII] - - k[1709]*y_cur[IDX_C2H4I]*y_cur[IDX_NCCNHII] - - k[1710]*y_cur[IDX_C2H4I]*y_cur[IDX_PII] - - k[1711]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - - k[1712]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - - k[1713]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - - k[1714]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - - k[1715]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - - k[1716]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - - k[1717]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - - k[1718]*y_cur[IDX_C2H4I]*y_cur[IDX_SiII] + - k[1719]*y_cur[IDX_C2H5II]*y_cur[IDX_CH3CNI] + - k[1720]*y_cur[IDX_C2H5II]*y_cur[IDX_H2COI] + - k[1721]*y_cur[IDX_C2H5II]*y_cur[IDX_H2SI] + - k[1722]*y_cur[IDX_C2H5II]*y_cur[IDX_HC3NI] + - k[1771]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1777]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + - k[1808]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + - k[1815]*y_cur[IDX_C3H5II]*y_cur[IDX_CH3CHCH2I] - - k[2045]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - - k[2046]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - - k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + - k[2067]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + - k[2069]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + - k[2112]*y_cur[IDX_C2H6I]*y_cur[IDX_S2II] - - k[2135]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] - - k[2219]*y_cur[IDX_CH5II]*y_cur[IDX_C2H4I] - - k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - - k[2297]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - - k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - - k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + - k[2524]*y_cur[IDX_H2OI]*y_cur[IDX_C2H5II] - - k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] - - k[2590]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + - k[2657]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2862]*y_cur[IDX_HCNI]*y_cur[IDX_C2H5II] + - k[3037]*y_cur[IDX_HNCI]*y_cur[IDX_C2H5II] - - k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3558]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5II] + - k[3564]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - - k[3632]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - - k[3633]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + - k[3772]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + - k[3825]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[3847]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - - k[3848]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - - k[3849]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - - k[3850]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - - k[4868]*y_cur[IDX_C2I]*y_cur[IDX_C2H4I] - - k[4883]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H3I] - - k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] - - k[4885]*y_cur[IDX_C2H4I]*y_cur[IDX_SiI] - - k[4914]*y_cur[IDX_CI]*y_cur[IDX_C2H4I] + - k[5024]*y_cur[IDX_C4H6I]*y_cur[IDX_HI] + - k[5026]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - - k[5065]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - - k[5066]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] + - k[5069]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] + - k[5074]*y_cur[IDX_CHI]*y_cur[IDX_CH4I] - - k[5105]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - - k[5106]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - - k[5225]*y_cur[IDX_NI]*y_cur[IDX_C2H4I] + - k[5226]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - - k[5346]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - - k[5347]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - - k[5348]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - - k[5349]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + - k[5382]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + - k[5457]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] - - k[5568]*y_cur[IDX_H3OII]*y_cur[IDX_C2H4I] - k[5700]*y_cur[IDX_C2H4I] - - k[5701]*y_cur[IDX_C2H4I] + k[5803]*y_cur[IDX_C2H6I] + - k[5805]*y_cur[IDX_CH3CHCH2I] + k[5941]*y_cur[IDX_C2H4CNI] - - k[5985]*y_cur[IDX_C2H4I] - k[5986]*y_cur[IDX_C2H4I] + - k[6108]*y_cur[IDX_C2H6I] + k[6110]*y_cur[IDX_CH3CHCH2I] + - k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + - k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + - k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - - k[6917]*y_cur[IDX_C2H4I] + k[7099]*y_cur[IDX_GC2H4I] + - k[7281]*y_cur[IDX_GC2H4I] + k[7463]*y_cur[IDX_GC2H4I] + - k[8589]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] + - k[8718]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] + - k[8745]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I]; - ydot[yistart + IDX_C2H4II] = 0.0 + - k[148]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[215]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - - k[231]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] - - k[232]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - - k[233]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + - k[234]*y_cur[IDX_C2H4I]*y_cur[IDX_C2N2II] + - k[235]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + - k[236]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + - k[237]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H6II] + - k[238]*y_cur[IDX_C2H4I]*y_cur[IDX_CO2II] + - k[239]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] + - k[240]*y_cur[IDX_C2H4I]*y_cur[IDX_O2II] + - k[278]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] + - k[326]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + - k[438]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + - k[464]*y_cur[IDX_H2OII]*y_cur[IDX_C2H4I] + - k[510]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[599]*y_cur[IDX_NH3I]*y_cur[IDX_C2H4II] + - k[648]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - - k[757]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - - k[758]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - - k[759]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - - k[760]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - - k[761]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - - k[762]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - - k[763]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[1369]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1511]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - - k[1536]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] - - k[1537]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] - - k[1628]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + - k[1644]*y_cur[IDX_C2H3I]*y_cur[IDX_HCOII] - - k[1647]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] - - k[1648]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] - - k[1649]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] - - k[1650]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] - - k[1651]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - - k[1652]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - - k[1653]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] - - k[1654]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] - - k[1655]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] - - k[1656]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] - - k[1657]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - - k[1658]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - - k[1659]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] - - k[1660]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] - - k[1661]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] - - k[1662]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] - - k[1663]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] - - k[1664]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] - - k[1665]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] - - k[1666]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] - - k[1667]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - - k[1668]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - - k[1669]*y_cur[IDX_C2H4II]*y_cur[IDX_CH3CCHI] - - k[1670]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - - k[1671]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - - k[1672]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] - - k[1673]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] - - k[1674]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - - k[1675]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - - k[1676]*y_cur[IDX_C2H4II]*y_cur[IDX_HC3NI] - - k[1677]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] - - k[1678]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] - - k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] - - k[1680]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - - k[1681]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - - k[1682]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[1683]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[1684]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[1729]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - - k[1730]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - - k[1853]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - - k[1854]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] + - k[1942]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + - k[1976]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + - k[2298]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + - k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + - k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + - k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + - k[2588]*y_cur[IDX_H3II]*y_cur[IDX_C2H3I] + - k[2767]*y_cur[IDX_H3OII]*y_cur[IDX_C2H3I] - - k[2828]*y_cur[IDX_HI]*y_cur[IDX_C2H4II] + - k[2829]*y_cur[IDX_HI]*y_cur[IDX_C2H5II] + - k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + - k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - - k[3391]*y_cur[IDX_NI]*y_cur[IDX_C2H4II] + - k[3400]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + - k[3658]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3691]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] - - k[3692]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] + - k[3771]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + - k[5549]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] + k[5701]*y_cur[IDX_C2H4I] - + k[5986]*y_cur[IDX_C2H4I] - - k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2H4CNI] = 0.0 - k[5941]*y_cur[IDX_C2H4CNI] - - k[7011]*y_cur[IDX_C2H4CNI] + k[7193]*y_cur[IDX_GC2H4CNI] + - k[7375]*y_cur[IDX_GC2H4CNI] + k[7557]*y_cur[IDX_GC2H4CNI] + - k[8634]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI]; - ydot[yistart + IDX_C2H5I] = 0.0 - - k[149]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] - - k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] - - k[511]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + - k[772]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] + - k[775]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + - k[776]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + - k[778]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + - k[936]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] - - k[1306]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + - k[1532]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + - k[1683]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] + - k[1817]*y_cur[IDX_C3H6II]*y_cur[IDX_CH3CHCH2I] + - k[2111]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - - k[2298]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + - k[2506]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + - k[2534]*y_cur[IDX_H2OI]*y_cur[IDX_C2H6II] - - k[2591]*y_cur[IDX_H3II]*y_cur[IDX_C2H5I] + - k[2872]*y_cur[IDX_HCNI]*y_cur[IDX_C2H6II] - - k[2902]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5I] - - k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - - k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + - k[3568]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + - k[3826]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + - k[3859]*y_cur[IDX_SiII]*y_cur[IDX_C2H5OHI] + - k[4886]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] + - k[4887]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] - - k[4915]*y_cur[IDX_CI]*y_cur[IDX_C2H5I] + - k[5027]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + - k[5052]*y_cur[IDX_C2H6I]*y_cur[IDX_C4HI] + - k[5056]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] + - k[5111]*y_cur[IDX_CNI]*y_cur[IDX_C2H6I] - - k[5226]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - - k[5227]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - - k[5350]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - - k[5351]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - - k[5457]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] - - k[5458]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] - k[5702]*y_cur[IDX_C2H5I] - - k[5703]*y_cur[IDX_C2H5I] + k[5705]*y_cur[IDX_C2H5CNI] + - k[5706]*y_cur[IDX_C2H5OHI] - k[5987]*y_cur[IDX_C2H5I] - - k[5988]*y_cur[IDX_C2H5I] + k[5990]*y_cur[IDX_C2H5CNI] + - k[5991]*y_cur[IDX_C2H5OHI] + - k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + - k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + - k[6576]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + - k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - - k[6922]*y_cur[IDX_C2H5I] + k[7104]*y_cur[IDX_GC2H5I] + - k[7286]*y_cur[IDX_GC2H5I] + k[7468]*y_cur[IDX_GC2H5I] + - k[8590]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] + - k[8746]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I]; - ydot[yistart + IDX_C2H5II] = 0.0 + - k[149]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + - k[511]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - - k[764]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] - - k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] - - k[766]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] - - k[767]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] - - k[768]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[1370]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1538]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] - - k[1539]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] + - k[1562]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + - k[1577]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] + - k[1579]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H4I] + - k[1613]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + - k[1628]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + - k[1684]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[1685]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H5II] + - k[1708]*y_cur[IDX_C2H4I]*y_cur[IDX_HCOII] + - k[1709]*y_cur[IDX_C2H4I]*y_cur[IDX_NCCNHII] - - k[1719]*y_cur[IDX_C2H5II]*y_cur[IDX_CH3CNI] - - k[1720]*y_cur[IDX_C2H5II]*y_cur[IDX_H2COI] - - k[1721]*y_cur[IDX_C2H5II]*y_cur[IDX_H2SI] - - k[1722]*y_cur[IDX_C2H5II]*y_cur[IDX_HC3NI] + - k[1977]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + - k[2062]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + - k[2066]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + - k[2068]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + - k[2074]*y_cur[IDX_CH3II]*y_cur[IDX_CH4I] + - k[2135]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] + - k[2219]*y_cur[IDX_CH5II]*y_cur[IDX_C2H4I] + - k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - - k[2524]*y_cur[IDX_H2OI]*y_cur[IDX_C2H5II] + - k[2590]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + - k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] + - k[2652]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2829]*y_cur[IDX_HI]*y_cur[IDX_C2H5II] + - k[2838]*y_cur[IDX_HI]*y_cur[IDX_C2H6II] - - k[2862]*y_cur[IDX_HCNI]*y_cur[IDX_C2H5II] - - k[3037]*y_cur[IDX_HNCI]*y_cur[IDX_C2H5II] + - k[3085]*y_cur[IDX_HeII]*y_cur[IDX_C2H5OHI] - - k[3558]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5II] + - k[3659]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + - k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] + - k[5703]*y_cur[IDX_C2H5I] + k[5988]*y_cur[IDX_C2H5I] - - k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - - k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - - k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - - k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - - k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2H5CNI] = 0.0 + - k[770]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + - k[1723]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_CH3COCH3I] - - k[2136]*y_cur[IDX_CH4II]*y_cur[IDX_C2H5CNI] - - k[4886]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] - - k[4887]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] - - k[5704]*y_cur[IDX_C2H5CNI] - k[5705]*y_cur[IDX_C2H5CNI] - - k[5989]*y_cur[IDX_C2H5CNI] - k[5990]*y_cur[IDX_C2H5CNI] + - k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - - k[7013]*y_cur[IDX_C2H5CNI] + k[7195]*y_cur[IDX_GC2H5CNI] + - k[7377]*y_cur[IDX_GC2H5CNI] + k[7561]*y_cur[IDX_GC2H5CNI] + - k[8635]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI]; - ydot[yistart + IDX_C2H5CNHII] = 0.0 - - k[769]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] - - k[770]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] - - k[771]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] - - k[1723]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_CH3COCH3I] + - k[2136]*y_cur[IDX_CH4II]*y_cur[IDX_C2H5CNI] + - k[5533]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - - k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - - k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - - k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2H5OHI] = 0.0 - - k[150]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] - - k[328]*y_cur[IDX_HII]*y_cur[IDX_C2H5OHI] + - k[777]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - - k[1307]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] - - k[1724]*y_cur[IDX_C2H5OHI]*y_cur[IDX_S2II] - - k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - - k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - - k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - - k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - - k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2661]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2768]*y_cur[IDX_H3OII]*y_cur[IDX_C2H5OHI] - - k[2903]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5OHI] - - k[3013]*y_cur[IDX_HCSII]*y_cur[IDX_C2H5OHI] - - k[3085]*y_cur[IDX_HeII]*y_cur[IDX_C2H5OHI] + - k[3559]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5OH2II] - - k[3859]*y_cur[IDX_SiII]*y_cur[IDX_C2H5OHI] - - k[5706]*y_cur[IDX_C2H5OHI] - k[5707]*y_cur[IDX_C2H5OHI] - - k[5991]*y_cur[IDX_C2H5OHI] - k[5992]*y_cur[IDX_C2H5OHI] + - k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - - k[6987]*y_cur[IDX_C2H5OHI] + k[7169]*y_cur[IDX_GC2H5OHI] + - k[7351]*y_cur[IDX_GC2H5OHI] + k[7533]*y_cur[IDX_GC2H5OHI] + - k[8753]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI]; - ydot[yistart + IDX_C2H5OHII] = 0.0 + - k[150]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] + - k[328]*y_cur[IDX_HII]*y_cur[IDX_C2H5OHI] - - k[772]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] - - k[773]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] + - k[5707]*y_cur[IDX_C2H5OHI] + k[5992]*y_cur[IDX_C2H5OHI] - - k[6576]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] - - k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2H5OH2II] = 0.0 - - k[774]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - - k[775]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - - k[776]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - - k[777]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - - k[2491]*y_cur[IDX_H2COI]*y_cur[IDX_C2H5OH2II] + - k[2768]*y_cur[IDX_H3OII]*y_cur[IDX_C2H5OHI] + - k[2903]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5OHI] + - k[3013]*y_cur[IDX_HCSII]*y_cur[IDX_C2H5OHI] - - k[3559]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5OH2II] + - k[5568]*y_cur[IDX_H3OII]*y_cur[IDX_C2H4I] - - k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - - k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - - k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - - k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2H6I] = 0.0 + - k[237]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H6II] + - k[276]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - - k[441]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - - k[466]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + - k[601]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] - - k[687]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + - k[779]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + - k[812]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - - k[1367]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1368]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1369]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1370]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1511]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - - k[1512]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - - k[1613]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - - k[1614]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - - k[1615]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - - k[1670]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - - k[1671]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] + - k[1682]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[2062]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - - k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - - k[2064]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + - k[2070]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - - k[2112]*y_cur[IDX_C2H6I]*y_cur[IDX_S2II] - - k[2222]*y_cur[IDX_CH5II]*y_cur[IDX_C2H6I] - - k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] - - k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] - - k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - - k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - - k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - - k[2506]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - - k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] + - k[2665]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2864]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - - k[2949]*y_cur[IDX_HCOII]*y_cur[IDX_C2H6I] - - k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - - k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - - k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + - k[3560]*y_cur[IDX_NH3I]*y_cur[IDX_C2H7II] - - k[3771]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[3772]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[3774]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] - - k[5052]*y_cur[IDX_C2H6I]*y_cur[IDX_C4HI] - - k[5069]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - - k[5070]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - - k[5111]*y_cur[IDX_CNI]*y_cur[IDX_C2H6I] + - k[5458]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] - k[5803]*y_cur[IDX_C2H6I] - - k[5804]*y_cur[IDX_C2H6I] - k[6108]*y_cur[IDX_C2H6I] - - k[6109]*y_cur[IDX_C2H6I] + - k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + - k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6923]*y_cur[IDX_C2H6I] + k[7105]*y_cur[IDX_GC2H6I] + - k[7287]*y_cur[IDX_GC2H6I] + k[7469]*y_cur[IDX_GC2H6I] + - k[8591]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] + - k[8748]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I]; - ydot[yistart + IDX_C2H6II] = 0.0 - - k[237]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H6II] - - k[276]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] + - k[441]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + - k[466]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - - k[601]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + - k[687]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[935]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] - - k[936]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] - - k[1562]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - - k[1563]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - - k[1564]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - - k[2111]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - - k[2534]*y_cur[IDX_H2OI]*y_cur[IDX_C2H6II] + - k[2591]*y_cur[IDX_H3II]*y_cur[IDX_C2H5I] - - k[2838]*y_cur[IDX_HI]*y_cur[IDX_C2H6II] - - k[2872]*y_cur[IDX_HCNI]*y_cur[IDX_C2H6II] + - k[2902]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5I] - - k[3568]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + k[5804]*y_cur[IDX_C2H6I] - + k[6109]*y_cur[IDX_C2H6I] - - k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] - - k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2H7II] = 0.0 - - k[778]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] - - k[779]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + - k[2222]*y_cur[IDX_CH5II]*y_cur[IDX_C2H6I] - - k[2863]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - - k[2864]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] + - k[2949]*y_cur[IDX_HCOII]*y_cur[IDX_C2H6I] - - k[3560]*y_cur[IDX_NH3I]*y_cur[IDX_C2H7II] + - k[3774]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] - - k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2NI] = 0.0 + k[110]*y_cur[IDX_NI]*y_cur[IDX_C2M] - + k[111]*y_cur[IDX_NI]*y_cur[IDX_C2HM] + - k[130]*y_cur[IDX_OI]*y_cur[IDX_C3NM] - - k[330]*y_cur[IDX_HII]*y_cur[IDX_C2NI] + - k[782]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] + - k[784]*y_cur[IDX_C2NHII]*y_cur[IDX_eM] + - k[831]*y_cur[IDX_C4NII]*y_cur[IDX_eM] - - k[2598]*y_cur[IDX_H3II]*y_cur[IDX_C2NI] - - k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] + - k[3894]*y_cur[IDX_CM]*y_cur[IDX_CNCII] + - k[3929]*y_cur[IDX_C10M]*y_cur[IDX_CNCII] + - k[3964]*y_cur[IDX_C10HM]*y_cur[IDX_CNCII] + - k[3999]*y_cur[IDX_C2M]*y_cur[IDX_CNCII] + - k[4034]*y_cur[IDX_C2HM]*y_cur[IDX_CNCII] + - k[4069]*y_cur[IDX_C3M]*y_cur[IDX_CNCII] + - k[4104]*y_cur[IDX_C3HM]*y_cur[IDX_CNCII] + - k[4139]*y_cur[IDX_C3NM]*y_cur[IDX_CNCII] + - k[4174]*y_cur[IDX_C4M]*y_cur[IDX_CNCII] + - k[4209]*y_cur[IDX_C4HM]*y_cur[IDX_CNCII] + - k[4244]*y_cur[IDX_C5M]*y_cur[IDX_CNCII] + - k[4279]*y_cur[IDX_C5HM]*y_cur[IDX_CNCII] + - k[4314]*y_cur[IDX_C5NM]*y_cur[IDX_CNCII] + - k[4349]*y_cur[IDX_C6M]*y_cur[IDX_CNCII] + - k[4384]*y_cur[IDX_C6HM]*y_cur[IDX_CNCII] + - k[4419]*y_cur[IDX_C7M]*y_cur[IDX_CNCII] + - k[4454]*y_cur[IDX_C7HM]*y_cur[IDX_CNCII] + - k[4489]*y_cur[IDX_C8M]*y_cur[IDX_CNCII] + - k[4524]*y_cur[IDX_C8HM]*y_cur[IDX_CNCII] + - k[4559]*y_cur[IDX_C9M]*y_cur[IDX_CNCII] + - k[4594]*y_cur[IDX_C9HM]*y_cur[IDX_CNCII] + - k[4629]*y_cur[IDX_CHM]*y_cur[IDX_CNCII] + - k[4664]*y_cur[IDX_CNM]*y_cur[IDX_CNCII] + - k[4699]*y_cur[IDX_HM]*y_cur[IDX_CNCII] + - k[4735]*y_cur[IDX_OM]*y_cur[IDX_CNCII] + - k[4770]*y_cur[IDX_O2M]*y_cur[IDX_CNCII] + - k[4805]*y_cur[IDX_OHM]*y_cur[IDX_CNCII] + - k[4840]*y_cur[IDX_SM]*y_cur[IDX_CNCII] - - k[4917]*y_cur[IDX_CI]*y_cur[IDX_C2NI] + - k[4960]*y_cur[IDX_CI]*y_cur[IDX_H2CNI] + - k[4968]*y_cur[IDX_CI]*y_cur[IDX_NCCNI] + - k[5217]*y_cur[IDX_HONCI]*y_cur[IDX_CI] + - k[5228]*y_cur[IDX_NI]*y_cur[IDX_C2HI] - - k[5229]*y_cur[IDX_NI]*y_cur[IDX_C2NI] + - k[5234]*y_cur[IDX_NI]*y_cur[IDX_C3NI] + - k[5247]*y_cur[IDX_NI]*y_cur[IDX_C7NI] + - k[5252]*y_cur[IDX_NI]*y_cur[IDX_C9NI] + - k[5273]*y_cur[IDX_NI]*y_cur[IDX_NCCNI] - - k[5353]*y_cur[IDX_OI]*y_cur[IDX_C2NI] + - k[5358]*y_cur[IDX_OI]*y_cur[IDX_C3NI] - k[5710]*y_cur[IDX_C2NI] - - k[5711]*y_cur[IDX_C2NI] + k[5940]*y_cur[IDX_HCCNI] - - k[5995]*y_cur[IDX_C2NI] - k[5996]*y_cur[IDX_C2NI] + - k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM] + - k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + - k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] - k[6947]*y_cur[IDX_C2NI] - + k[7129]*y_cur[IDX_GC2NI] + k[7311]*y_cur[IDX_GC2NI] + - k[7493]*y_cur[IDX_GC2NI] + k[8664]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] + - k[8703]*y_cur[IDX_GNI]*y_cur[IDX_GC2I]; - ydot[yistart + IDX_C2NII] = 0.0 + - k[183]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] + - k[330]*y_cur[IDX_HII]*y_cur[IDX_C2NI] - - k[780]*y_cur[IDX_C2NII]*y_cur[IDX_eM] - - k[781]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + - k[1398]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + - k[1413]*y_cur[IDX_CII]*y_cur[IDX_HNCI] - - k[1540]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - - k[1541]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] + - k[1944]*y_cur[IDX_CHII]*y_cur[IDX_CNI] + - k[1956]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - - k[2525]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] - - k[2526]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] - - k[2575]*y_cur[IDX_H2SI]*y_cur[IDX_C2NII] + - k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3351]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] + - k[3385]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + - k[3387]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + - k[3460]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] + - k[3478]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - - k[3561]*y_cur[IDX_NH3I]*y_cur[IDX_C2NII] + - k[3606]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - - k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] - - k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2N2II] = 0.0 - - k[234]*y_cur[IDX_C2H4I]*y_cur[IDX_C2N2II] - - k[782]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] - - k[783]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] - - k[1542]*y_cur[IDX_C2H2I]*y_cur[IDX_C2N2II] + - k[2272]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] - - k[2404]*y_cur[IDX_H2I]*y_cur[IDX_C2N2II] - - k[2527]*y_cur[IDX_H2OI]*y_cur[IDX_C2N2II] - - k[2830]*y_cur[IDX_HI]*y_cur[IDX_C2N2II] - - k[2865]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] - - k[2866]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] + - k[3352]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] + k[6215]*y_cur[IDX_NCCNI] - - k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] - - k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2NHII] = 0.0 - - k[784]*y_cur[IDX_C2NHII]*y_cur[IDX_eM] + - k[1957]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + - k[2525]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] + - k[2598]*y_cur[IDX_H3II]*y_cur[IDX_C2NI] + - k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3388]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + - k[3390]*y_cur[IDX_NI]*y_cur[IDX_C2H3II] + - k[3528]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] + - k[3626]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - - k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2OI] = 0.0 + k[128]*y_cur[IDX_OI]*y_cur[IDX_C2M] - + k[129]*y_cur[IDX_OI]*y_cur[IDX_C2HM] - - k[151]*y_cur[IDX_CII]*y_cur[IDX_C2OI] - - k[331]*y_cur[IDX_HII]*y_cur[IDX_C2OI] + - k[1056]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] - - k[2599]*y_cur[IDX_H3II]*y_cur[IDX_C2OI] - - k[2769]*y_cur[IDX_H3OII]*y_cur[IDX_C2OI] - - k[2904]*y_cur[IDX_HCOII]*y_cur[IDX_C2OI] - - k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] + - k[3669]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - - k[4918]*y_cur[IDX_CI]*y_cur[IDX_C2OI] + - k[4962]*y_cur[IDX_CI]*y_cur[IDX_HCOI] - - k[5230]*y_cur[IDX_NI]*y_cur[IDX_C2OI] - - k[5354]*y_cur[IDX_OI]*y_cur[IDX_C2OI] + - k[5359]*y_cur[IDX_OI]*y_cur[IDX_C3OI] - - k[5485]*y_cur[IDX_SI]*y_cur[IDX_C2OI] - k[5712]*y_cur[IDX_C2OI] - - k[5713]*y_cur[IDX_C2OI] - k[5997]*y_cur[IDX_C2OI] - - k[5998]*y_cur[IDX_C2OI] + - k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - - k[6954]*y_cur[IDX_C2OI] + k[7136]*y_cur[IDX_GC2OI] + - k[7318]*y_cur[IDX_GC2OI] + k[7500]*y_cur[IDX_GC2OI] + - k[8691]*y_cur[IDX_GOI]*y_cur[IDX_GC2I]; - ydot[yistart + IDX_C2OII] = 0.0 + - k[151]*y_cur[IDX_CII]*y_cur[IDX_C2OI] + - k[331]*y_cur[IDX_HII]*y_cur[IDX_C2OI] - - k[785]*y_cur[IDX_C2OII]*y_cur[IDX_eM] + - k[2269]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - - k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C2SI] = 0.0 - - k[152]*y_cur[IDX_CII]*y_cur[IDX_C2SI] - - k[332]*y_cur[IDX_HII]*y_cur[IDX_C2SI] + - k[816]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + - k[835]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + - k[1061]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + - k[1071]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + - k[1074]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - - k[1309]*y_cur[IDX_CII]*y_cur[IDX_C2SI] - - k[2600]*y_cur[IDX_H3II]*y_cur[IDX_C2SI] - - k[2770]*y_cur[IDX_H3OII]*y_cur[IDX_C2SI] - - k[2905]*y_cur[IDX_HCOII]*y_cur[IDX_C2SI] - - k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - - k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - - k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - - k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] + - k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] + - k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] + - k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] + - k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] + - k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] + - k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] + - k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] + - k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] + - k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] + - k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] + - k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] + - k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] + - k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] + - k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] + - k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] + - k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] + - k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] + - k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] + - k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] + - k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] + - k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] + - k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] + - k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] + - k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] + - k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] + - k[4812]*y_cur[IDX_OHM]*y_cur[IDX_HC2SII] + - k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] + - k[4875]*y_cur[IDX_C2I]*y_cur[IDX_OCSI] + - k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] + - k[4906]*y_cur[IDX_C2HI]*y_cur[IDX_SI] - - k[5355]*y_cur[IDX_OI]*y_cur[IDX_C2SI] - k[5714]*y_cur[IDX_C2SI] - - k[5715]*y_cur[IDX_C2SI] - k[5999]*y_cur[IDX_C2SI] + - k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + - k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + - k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + - k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + - k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - - k[7015]*y_cur[IDX_C2SI] + k[7197]*y_cur[IDX_GC2SI] + - k[7379]*y_cur[IDX_GC2SI] + k[7563]*y_cur[IDX_GC2SI]; - ydot[yistart + IDX_C2SII] = 0.0 + - k[152]*y_cur[IDX_CII]*y_cur[IDX_C2SI] + - k[332]*y_cur[IDX_HII]*y_cur[IDX_C2SI] - - k[786]*y_cur[IDX_C2SII]*y_cur[IDX_eM] - - k[787]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + - k[1527]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] + - k[1750]*y_cur[IDX_C2HI]*y_cur[IDX_SII] - - k[2405]*y_cur[IDX_H2I]*y_cur[IDX_C2SII] - - k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] - - k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3I] = 0.0 - k[11]*y_cur[IDX_C2M]*y_cur[IDX_C3I] - - k[17]*y_cur[IDX_C3M]*y_cur[IDX_C3I] - - k[23]*y_cur[IDX_C4M]*y_cur[IDX_C3I] - - k[28]*y_cur[IDX_C5M]*y_cur[IDX_C3I] - - k[32]*y_cur[IDX_C6M]*y_cur[IDX_C3I] - - k[35]*y_cur[IDX_C7M]*y_cur[IDX_C3I] + - k[38]*y_cur[IDX_CI]*y_cur[IDX_C2M] + - k[235]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - - k[333]*y_cur[IDX_HII]*y_cur[IDX_C3I] + - k[731]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + - k[737]*y_cur[IDX_C11II]*y_cur[IDX_eM] + - k[790]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + - k[793]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[794]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[817]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + - k[820]*y_cur[IDX_C4II]*y_cur[IDX_eM] + - k[837]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + - k[838]*y_cur[IDX_C5II]*y_cur[IDX_eM] + - k[863]*y_cur[IDX_C7II]*y_cur[IDX_eM] + - k[1549]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] + - k[1557]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] - - k[2601]*y_cur[IDX_H3II]*y_cur[IDX_C3I] - - k[2771]*y_cur[IDX_H3OII]*y_cur[IDX_C3I] - - k[2906]*y_cur[IDX_HCOII]*y_cur[IDX_C3I] + - k[3017]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + - k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] + - k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + - k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + - k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + - k[3402]*y_cur[IDX_NI]*y_cur[IDX_C4M] + - k[3407]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + - k[3418]*y_cur[IDX_NI]*y_cur[IDX_C6M] + - k[3437]*y_cur[IDX_NI]*y_cur[IDX_C8M] + - k[3562]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] + - k[3699]*y_cur[IDX_OI]*y_cur[IDX_C4HII] + - k[4061]*y_cur[IDX_C3M]*y_cur[IDX_CII] + - k[4062]*y_cur[IDX_C3M]*y_cur[IDX_C2H2II] + - k[4063]*y_cur[IDX_C3M]*y_cur[IDX_C2H3II] + - k[4064]*y_cur[IDX_C3M]*y_cur[IDX_C4H2II] + - k[4065]*y_cur[IDX_C3M]*y_cur[IDX_C4H3II] + - k[4066]*y_cur[IDX_C3M]*y_cur[IDX_C4SII] + - k[4067]*y_cur[IDX_C3M]*y_cur[IDX_CH2CCHII] + - k[4068]*y_cur[IDX_C3M]*y_cur[IDX_CH3II] + - k[4069]*y_cur[IDX_C3M]*y_cur[IDX_CNCII] + - k[4070]*y_cur[IDX_C3M]*y_cur[IDX_FeII] + - k[4071]*y_cur[IDX_C3M]*y_cur[IDX_HII] + - k[4072]*y_cur[IDX_C3M]*y_cur[IDX_H2COII] + - k[4073]*y_cur[IDX_C3M]*y_cur[IDX_H2SII] + - k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] + - k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] + - k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] + - k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + - k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + - k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + - k[4080]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + - k[4081]*y_cur[IDX_C3M]*y_cur[IDX_HeII] + - k[4082]*y_cur[IDX_C3M]*y_cur[IDX_MgII] + - k[4083]*y_cur[IDX_C3M]*y_cur[IDX_NII] + - k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] + - k[4085]*y_cur[IDX_C3M]*y_cur[IDX_NH3II] + - k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] + - k[4087]*y_cur[IDX_C3M]*y_cur[IDX_NOII] + - k[4088]*y_cur[IDX_C3M]*y_cur[IDX_NaII] + - k[4089]*y_cur[IDX_C3M]*y_cur[IDX_OII] + - k[4090]*y_cur[IDX_C3M]*y_cur[IDX_SII] + - k[4091]*y_cur[IDX_C3M]*y_cur[IDX_SOII] + - k[4092]*y_cur[IDX_C3M]*y_cur[IDX_SiII] + - k[4093]*y_cur[IDX_C3M]*y_cur[IDX_SiOII] + - k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] + - k[4095]*y_cur[IDX_C3M]*y_cur[IDX_SiSII] + - k[4911]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] + - k[4916]*y_cur[IDX_CI]*y_cur[IDX_C2HI] + - k[4921]*y_cur[IDX_CI]*y_cur[IDX_C3NI] + - k[4922]*y_cur[IDX_CI]*y_cur[IDX_C3OI] + - k[4923]*y_cur[IDX_CI]*y_cur[IDX_C4I] + - k[4926]*y_cur[IDX_CI]*y_cur[IDX_C5I] + - k[4926]*y_cur[IDX_CI]*y_cur[IDX_C5I] + - k[4931]*y_cur[IDX_CI]*y_cur[IDX_C6I] + - k[4934]*y_cur[IDX_CI]*y_cur[IDX_C7I] + - k[5212]*y_cur[IDX_HNC3I]*y_cur[IDX_CI] - - k[5231]*y_cur[IDX_NI]*y_cur[IDX_C3I] + - k[5235]*y_cur[IDX_NI]*y_cur[IDX_C4I] - - k[5356]*y_cur[IDX_OI]*y_cur[IDX_C3I] + - k[5361]*y_cur[IDX_OI]*y_cur[IDX_C4I] - - k[5496]*y_cur[IDX_CII]*y_cur[IDX_C3I] + - k[5521]*y_cur[IDX_CI]*y_cur[IDX_C2I] - - k[5522]*y_cur[IDX_CI]*y_cur[IDX_C3I] - - k[5591]*y_cur[IDX_C3I]*y_cur[IDX_eM] + k[5716]*y_cur[IDX_C3M] - - k[5717]*y_cur[IDX_C3I] + k[5720]*y_cur[IDX_C3HI] + - k[5728]*y_cur[IDX_C4I] + k[5733]*y_cur[IDX_C4NI] + - k[5735]*y_cur[IDX_C4SI] + k[5737]*y_cur[IDX_C5I] + - k[5742]*y_cur[IDX_C5HI] + k[5752]*y_cur[IDX_C6HI] + - k[5951]*y_cur[IDX_C10I] + k[5960]*y_cur[IDX_C10H2I] + - k[5965]*y_cur[IDX_C10HI] + k[5966]*y_cur[IDX_C10HI] + - k[5970]*y_cur[IDX_C11I] + k[5970]*y_cur[IDX_C11I] + - k[5973]*y_cur[IDX_C11I] + k[6000]*y_cur[IDX_C3M] - - k[6001]*y_cur[IDX_C3I] + k[6004]*y_cur[IDX_C3HI] + - k[6012]*y_cur[IDX_C4I] + k[6018]*y_cur[IDX_C4NI] + - k[6020]*y_cur[IDX_C4PI] + k[6021]*y_cur[IDX_C4SI] + - k[6023]*y_cur[IDX_C5I] + k[6027]*y_cur[IDX_C5HI] + - k[6039]*y_cur[IDX_C6HI] + k[6149]*y_cur[IDX_H2CCCI] + - k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + - k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + - k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM] + - k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + - k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + - k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + - k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + - k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[6943]*y_cur[IDX_C3I] - + k[7125]*y_cur[IDX_GC3I] + k[7307]*y_cur[IDX_GC3I] + - k[7489]*y_cur[IDX_GC3I] + k[8662]*y_cur[IDX_GCI]*y_cur[IDX_GC2I]; - ydot[yistart + IDX_C3II] = 0.0 - - k[235]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + - k[333]*y_cur[IDX_HII]*y_cur[IDX_C3I] - - k[788]*y_cur[IDX_C3II]*y_cur[IDX_eM] + - k[1308]*y_cur[IDX_CII]*y_cur[IDX_C2HI] + - k[1309]*y_cur[IDX_CII]*y_cur[IDX_C2SI] + - k[1313]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + - k[1399]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + - k[1451]*y_cur[IDX_C2II]*y_cur[IDX_C2I] - - k[1543]*y_cur[IDX_C2H2I]*y_cur[IDX_C3II] - - k[1686]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - - k[1687]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - - k[1688]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - - k[1752]*y_cur[IDX_C3II]*y_cur[IDX_HC3NI] + - k[1849]*y_cur[IDX_CI]*y_cur[IDX_C2HII] + - k[1933]*y_cur[IDX_CHII]*y_cur[IDX_C2I] + - k[1935]*y_cur[IDX_CHII]*y_cur[IDX_C2HI] - - k[2157]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - - k[2158]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - - k[2159]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + - k[2239]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + - k[2301]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - - k[2406]*y_cur[IDX_H2I]*y_cur[IDX_C3II] - - k[2867]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] - - k[2868]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + - k[3016]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + - k[3032]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3097]*y_cur[IDX_HeII]*y_cur[IDX_C3HI] + - k[3099]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + - k[3101]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + - k[3106]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + - k[3116]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + - k[3117]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + - k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - - k[3668]*y_cur[IDX_O2I]*y_cur[IDX_C3II] - - k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3M] = 0.0 - k[17]*y_cur[IDX_C3M]*y_cur[IDX_C3I] - - k[18]*y_cur[IDX_C3M]*y_cur[IDX_C4I] - - k[19]*y_cur[IDX_C3M]*y_cur[IDX_C5I] - - k[20]*y_cur[IDX_C3M]*y_cur[IDX_C6I] - - k[21]*y_cur[IDX_C3M]*y_cur[IDX_C7I] - - k[40]*y_cur[IDX_CI]*y_cur[IDX_C3M] - - k[89]*y_cur[IDX_HI]*y_cur[IDX_C3M] - - k[112]*y_cur[IDX_NI]*y_cur[IDX_C3M] - - k[3392]*y_cur[IDX_NI]*y_cur[IDX_C3M] - - k[3393]*y_cur[IDX_NI]*y_cur[IDX_C3M] + - k[3403]*y_cur[IDX_NI]*y_cur[IDX_C4M] - - k[3693]*y_cur[IDX_OI]*y_cur[IDX_C3M] + - k[3698]*y_cur[IDX_OI]*y_cur[IDX_C4M] - - k[4061]*y_cur[IDX_C3M]*y_cur[IDX_CII] - - k[4062]*y_cur[IDX_C3M]*y_cur[IDX_C2H2II] - - k[4063]*y_cur[IDX_C3M]*y_cur[IDX_C2H3II] - - k[4064]*y_cur[IDX_C3M]*y_cur[IDX_C4H2II] - - k[4065]*y_cur[IDX_C3M]*y_cur[IDX_C4H3II] - - k[4066]*y_cur[IDX_C3M]*y_cur[IDX_C4SII] - - k[4067]*y_cur[IDX_C3M]*y_cur[IDX_CH2CCHII] - - k[4068]*y_cur[IDX_C3M]*y_cur[IDX_CH3II] - - k[4069]*y_cur[IDX_C3M]*y_cur[IDX_CNCII] - - k[4070]*y_cur[IDX_C3M]*y_cur[IDX_FeII] - - k[4071]*y_cur[IDX_C3M]*y_cur[IDX_HII] - - k[4072]*y_cur[IDX_C3M]*y_cur[IDX_H2COII] - - k[4073]*y_cur[IDX_C3M]*y_cur[IDX_H2SII] - - k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] - - k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] - - k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] - - k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] - - k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] - - k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] - - k[4080]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] - - k[4081]*y_cur[IDX_C3M]*y_cur[IDX_HeII] - - k[4082]*y_cur[IDX_C3M]*y_cur[IDX_MgII] - - k[4083]*y_cur[IDX_C3M]*y_cur[IDX_NII] - - k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] - - k[4085]*y_cur[IDX_C3M]*y_cur[IDX_NH3II] - - k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] - - k[4087]*y_cur[IDX_C3M]*y_cur[IDX_NOII] - - k[4088]*y_cur[IDX_C3M]*y_cur[IDX_NaII] - - k[4089]*y_cur[IDX_C3M]*y_cur[IDX_OII] - - k[4090]*y_cur[IDX_C3M]*y_cur[IDX_SII] - - k[4091]*y_cur[IDX_C3M]*y_cur[IDX_SOII] - - k[4092]*y_cur[IDX_C3M]*y_cur[IDX_SiII] - - k[4093]*y_cur[IDX_C3M]*y_cur[IDX_SiOII] - - k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] - - k[4095]*y_cur[IDX_C3M]*y_cur[IDX_SiSII] + - k[5591]*y_cur[IDX_C3I]*y_cur[IDX_eM] - k[5716]*y_cur[IDX_C3M] - - k[6000]*y_cur[IDX_C3M]; - ydot[yistart + IDX_C3HI] = 0.0 + k[39]*y_cur[IDX_CI]*y_cur[IDX_C2HM] - + k[89]*y_cur[IDX_HI]*y_cur[IDX_C3M] + - k[115]*y_cur[IDX_NI]*y_cur[IDX_C4HM] - - k[335]*y_cur[IDX_HII]*y_cur[IDX_C3HI] + - k[600]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] + - k[621]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] + - k[795]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[1196]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + - k[1234]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] - - k[1312]*y_cur[IDX_CII]*y_cur[IDX_C3HI] - - k[1487]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] - - k[1488]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] - - k[1583]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - - k[1584]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - - k[1585]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - - k[1651]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - - k[1652]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - - k[1819]*y_cur[IDX_C3HI]*y_cur[IDX_C3H2II] - - k[1820]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - - k[1821]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - - k[1822]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] - - k[1823]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] - - k[1824]*y_cur[IDX_C3HI]*y_cur[IDX_C4H2II] - - k[1825]*y_cur[IDX_C3HI]*y_cur[IDX_C4H3II] - - k[1826]*y_cur[IDX_C3HI]*y_cur[IDX_C5H2II] - - k[1827]*y_cur[IDX_C3HI]*y_cur[IDX_C6H2II] - - k[1828]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] - - k[1829]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] - - k[2051]*y_cur[IDX_CH3II]*y_cur[IDX_C3HI] - - k[2301]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - - k[2603]*y_cur[IDX_H3II]*y_cur[IDX_C3HI] - - k[2773]*y_cur[IDX_H3OII]*y_cur[IDX_C3HI] - - k[2908]*y_cur[IDX_HCOII]*y_cur[IDX_C3HI] + - k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3097]*y_cur[IDX_HeII]*y_cur[IDX_C3HI] + - k[3313]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + - k[3404]*y_cur[IDX_NI]*y_cur[IDX_C4HM] + - k[3421]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - - k[3821]*y_cur[IDX_SII]*y_cur[IDX_C3HI] - - k[3861]*y_cur[IDX_SiII]*y_cur[IDX_C3HI] + - k[4096]*y_cur[IDX_C3HM]*y_cur[IDX_CII] + - k[4097]*y_cur[IDX_C3HM]*y_cur[IDX_C2H2II] + - k[4098]*y_cur[IDX_C3HM]*y_cur[IDX_C2H3II] + - k[4099]*y_cur[IDX_C3HM]*y_cur[IDX_C4H2II] + - k[4100]*y_cur[IDX_C3HM]*y_cur[IDX_C4H3II] + - k[4101]*y_cur[IDX_C3HM]*y_cur[IDX_C4SII] + - k[4102]*y_cur[IDX_C3HM]*y_cur[IDX_CH2CCHII] + - k[4103]*y_cur[IDX_C3HM]*y_cur[IDX_CH3II] + - k[4104]*y_cur[IDX_C3HM]*y_cur[IDX_CNCII] + - k[4105]*y_cur[IDX_C3HM]*y_cur[IDX_FeII] + - k[4106]*y_cur[IDX_C3HM]*y_cur[IDX_HII] + - k[4107]*y_cur[IDX_C3HM]*y_cur[IDX_H2COII] + - k[4108]*y_cur[IDX_C3HM]*y_cur[IDX_H2SII] + - k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] + - k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] + - k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] + - k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + - k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + - k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + - k[4115]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + - k[4116]*y_cur[IDX_C3HM]*y_cur[IDX_HeII] + - k[4117]*y_cur[IDX_C3HM]*y_cur[IDX_MgII] + - k[4118]*y_cur[IDX_C3HM]*y_cur[IDX_NII] + - k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] + - k[4120]*y_cur[IDX_C3HM]*y_cur[IDX_NH3II] + - k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] + - k[4122]*y_cur[IDX_C3HM]*y_cur[IDX_NOII] + - k[4123]*y_cur[IDX_C3HM]*y_cur[IDX_NaII] + - k[4124]*y_cur[IDX_C3HM]*y_cur[IDX_OII] + - k[4125]*y_cur[IDX_C3HM]*y_cur[IDX_SII] + - k[4126]*y_cur[IDX_C3HM]*y_cur[IDX_SOII] + - k[4127]*y_cur[IDX_C3HM]*y_cur[IDX_SiII] + - k[4128]*y_cur[IDX_C3HM]*y_cur[IDX_SiOII] + - k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] + - k[4130]*y_cur[IDX_C3HM]*y_cur[IDX_SiSII] + - k[4912]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] - - k[4920]*y_cur[IDX_CI]*y_cur[IDX_C3HI] - - k[5233]*y_cur[IDX_NI]*y_cur[IDX_C3HI] - - k[5357]*y_cur[IDX_OI]*y_cur[IDX_C3HI] + - k[5362]*y_cur[IDX_OI]*y_cur[IDX_C4HI] - - k[5592]*y_cur[IDX_C3HI]*y_cur[IDX_eM] + k[5718]*y_cur[IDX_C3HM] + - k[5719]*y_cur[IDX_C3H2I] - k[5720]*y_cur[IDX_C3HI] + - k[5740]*y_cur[IDX_C5H2I] + k[5743]*y_cur[IDX_C5HI] + - k[5752]*y_cur[IDX_C6HI] + k[5783]*y_cur[IDX_CH2CCHI] + - k[5834]*y_cur[IDX_H2CCCI] + k[6002]*y_cur[IDX_C3HM] + - k[6003]*y_cur[IDX_C3H2I] - k[6004]*y_cur[IDX_C3HI] + - k[6025]*y_cur[IDX_C5H2I] + k[6028]*y_cur[IDX_C5HI] + - k[6039]*y_cur[IDX_C6HI] + k[6084]*y_cur[IDX_CH2CCHI] + - k[6150]*y_cur[IDX_H2CCCI] + - k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + - k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[6945]*y_cur[IDX_C3HI] + k[7127]*y_cur[IDX_GC3HI] + - k[7309]*y_cur[IDX_GC3HI] + k[7491]*y_cur[IDX_GC3HI] + - k[8610]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] + - k[8663]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] + - k[8719]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I]; - ydot[yistart + IDX_C3HII] = 0.0 + - k[335]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - - k[600]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - - k[621]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - - k[789]*y_cur[IDX_C3HII]*y_cur[IDX_eM] - - k[790]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + - k[1300]*y_cur[IDX_CII]*y_cur[IDX_C2H2I] + - k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1400]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + - k[1402]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + - k[1540]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - - k[1544]*y_cur[IDX_C2H2I]*y_cur[IDX_C3HII] - - k[1689]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - - k[1690]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - - k[1753]*y_cur[IDX_C3HII]*y_cur[IDX_CO2I] - - k[1754]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - - k[1755]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - - k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - - k[1757]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - - k[1758]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + - k[1850]*y_cur[IDX_CI]*y_cur[IDX_C2H2II] + - k[1851]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + - k[1995]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] + - k[2041]*y_cur[IDX_CH3II]*y_cur[IDX_C2I] - - k[2122]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] - - k[2123]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] + - k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + - k[2157]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - - k[2160]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] - - k[2161]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] + - k[2241]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] + - k[2300]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] + - k[2335]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] + - k[2406]*y_cur[IDX_H2I]*y_cur[IDX_C3II] - - k[2407]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] + - k[2413]*y_cur[IDX_H2I]*y_cur[IDX_C4NII] - - k[2528]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - - k[2529]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - - k[2530]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - - k[2576]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - - k[2577]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - - k[2578]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + - k[2601]*y_cur[IDX_H3II]*y_cur[IDX_C3I] + - k[2771]*y_cur[IDX_H3OII]*y_cur[IDX_C3I] + - k[2831]*y_cur[IDX_HI]*y_cur[IDX_C3H2II] + - k[2867]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + - k[2906]*y_cur[IDX_HCOII]*y_cur[IDX_C3I] + - k[3021]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] + - k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + - k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + - k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + - k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - - k[3394]*y_cur[IDX_NI]*y_cur[IDX_C3HII] + - k[3405]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + - k[3461]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - - k[3562]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - - k[3563]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - - k[3626]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - - k[3669]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - - k[3670]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - - k[3671]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - - k[3872]*y_cur[IDX_SiI]*y_cur[IDX_C3HII] - - k[5550]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - - k[5551]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - - k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] - - k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3HM] = 0.0 - k[41]*y_cur[IDX_CI]*y_cur[IDX_C3HM] - - k[90]*y_cur[IDX_HI]*y_cur[IDX_C3HM] - - k[113]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - - k[3395]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - - k[3396]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - - k[3694]*y_cur[IDX_OI]*y_cur[IDX_C3HM] + - k[3700]*y_cur[IDX_OI]*y_cur[IDX_C4HM] - - k[4096]*y_cur[IDX_C3HM]*y_cur[IDX_CII] - - k[4097]*y_cur[IDX_C3HM]*y_cur[IDX_C2H2II] - - k[4098]*y_cur[IDX_C3HM]*y_cur[IDX_C2H3II] - - k[4099]*y_cur[IDX_C3HM]*y_cur[IDX_C4H2II] - - k[4100]*y_cur[IDX_C3HM]*y_cur[IDX_C4H3II] - - k[4101]*y_cur[IDX_C3HM]*y_cur[IDX_C4SII] - - k[4102]*y_cur[IDX_C3HM]*y_cur[IDX_CH2CCHII] - - k[4103]*y_cur[IDX_C3HM]*y_cur[IDX_CH3II] - - k[4104]*y_cur[IDX_C3HM]*y_cur[IDX_CNCII] - - k[4105]*y_cur[IDX_C3HM]*y_cur[IDX_FeII] - - k[4106]*y_cur[IDX_C3HM]*y_cur[IDX_HII] - - k[4107]*y_cur[IDX_C3HM]*y_cur[IDX_H2COII] - - k[4108]*y_cur[IDX_C3HM]*y_cur[IDX_H2SII] - - k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] - - k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] - - k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] - - k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] - - k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] - - k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] - - k[4115]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] - - k[4116]*y_cur[IDX_C3HM]*y_cur[IDX_HeII] - - k[4117]*y_cur[IDX_C3HM]*y_cur[IDX_MgII] - - k[4118]*y_cur[IDX_C3HM]*y_cur[IDX_NII] - - k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] - - k[4120]*y_cur[IDX_C3HM]*y_cur[IDX_NH3II] - - k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] - - k[4122]*y_cur[IDX_C3HM]*y_cur[IDX_NOII] - - k[4123]*y_cur[IDX_C3HM]*y_cur[IDX_NaII] - - k[4124]*y_cur[IDX_C3HM]*y_cur[IDX_OII] - - k[4125]*y_cur[IDX_C3HM]*y_cur[IDX_SII] - - k[4126]*y_cur[IDX_C3HM]*y_cur[IDX_SOII] - - k[4127]*y_cur[IDX_C3HM]*y_cur[IDX_SiII] - - k[4128]*y_cur[IDX_C3HM]*y_cur[IDX_SiOII] - - k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] - - k[4130]*y_cur[IDX_C3HM]*y_cur[IDX_SiSII] + - k[5592]*y_cur[IDX_C3HI]*y_cur[IDX_eM] - k[5718]*y_cur[IDX_C3HM] - - k[6002]*y_cur[IDX_C3HM]; - ydot[yistart + IDX_C3H2I] = 0.0 - - k[334]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] + - k[798]*y_cur[IDX_C3H3II]*y_cur[IDX_eM] - - k[1310]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] - - k[1311]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] - - k[1485]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] - - k[1486]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] - - k[1580]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - - k[1581]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - - k[1582]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - - k[1649]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] - - k[1650]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] - - k[1759]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] - - k[1760]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] - - k[1786]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] - - k[1787]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] - - k[1788]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H2II] - - k[1789]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H3II] - - k[1790]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] - - k[1791]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] - - k[1792]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] - - k[1793]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] - - k[1794]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] - - k[1795]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] - - k[2050]*y_cur[IDX_CH3II]*y_cur[IDX_C3H2I] + - k[2122]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] - - k[2300]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] - - k[2602]*y_cur[IDX_H3II]*y_cur[IDX_C3H2I] - - k[2772]*y_cur[IDX_H3OII]*y_cur[IDX_C3H2I] - - k[2907]*y_cur[IDX_HCOII]*y_cur[IDX_C3H2I] - - k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] + - k[3565]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - - k[3820]*y_cur[IDX_SII]*y_cur[IDX_C3H2I] - - k[3860]*y_cur[IDX_SiII]*y_cur[IDX_C3H2I] - - k[4889]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2I] + - k[4913]*y_cur[IDX_CI]*y_cur[IDX_C2H3I] - - k[4919]*y_cur[IDX_CI]*y_cur[IDX_C3H2I] + - k[5063]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - - k[5232]*y_cur[IDX_NI]*y_cur[IDX_C3H2I] - k[5719]*y_cur[IDX_C3H2I] + - k[5782]*y_cur[IDX_CH2CCHI] - k[6003]*y_cur[IDX_C3H2I] + - k[6083]*y_cur[IDX_CH2CCHI] + - k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM] - - k[6948]*y_cur[IDX_C3H2I] + k[7130]*y_cur[IDX_GC3H2I] + - k[7312]*y_cur[IDX_GC3H2I] + k[7494]*y_cur[IDX_GC3H2I] + - k[8611]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] + - k[8720]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI]; - ydot[yistart + IDX_C3H2II] = 0.0 + - k[334]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] - - k[791]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] - - k[792]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] - - k[793]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] - - k[794]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] - - k[795]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[1301]*y_cur[IDX_CII]*y_cur[IDX_C2H3I] + - k[1304]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1317]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + - k[1348]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + - k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1545]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H2II] + - k[1549]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] + - k[1583]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - - k[1629]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] - - k[1630]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + - k[1686]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - - k[1691]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - - k[1692]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - - k[1731]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2II] - - k[1759]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] - - k[1760]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] - - k[1761]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] - - k[1762]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] - - k[1763]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] - - k[1764]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] - - k[1765]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] - - k[1766]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] - - k[1767]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] - - k[1768]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] - - k[1769]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] - - k[1770]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] - - k[1771]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1772]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1773]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1774]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1775]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1776]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCHI] - - k[1777]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1778]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1779]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1780]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1781]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1782]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - - k[1783]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - - k[1784]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] - - k[1785]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] - - k[1819]*y_cur[IDX_C3HI]*y_cur[IDX_C3H2II] + - k[1852]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + - k[1853]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - - k[1855]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] - - k[1856]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] + - k[1934]*y_cur[IDX_CHII]*y_cur[IDX_C2H2I] + - k[1975]*y_cur[IDX_CH2II]*y_cur[IDX_C2HI] + - k[1997]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] + - k[2048]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] + - k[2149]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2162]*y_cur[IDX_CH4I]*y_cur[IDX_C3H2II] + - k[2164]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + - k[2242]*y_cur[IDX_CHI]*y_cur[IDX_C2H2II] + - k[2315]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] + - k[2336]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] + - k[2407]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - - k[2408]*y_cur[IDX_H2I]*y_cur[IDX_C3H2II] + - k[2603]*y_cur[IDX_H3II]*y_cur[IDX_C3HI] + - k[2773]*y_cur[IDX_H3OII]*y_cur[IDX_C3HI] - - k[2831]*y_cur[IDX_HI]*y_cur[IDX_C3H2II] + - k[2908]*y_cur[IDX_HCOII]*y_cur[IDX_C3HI] + - k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + - k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3397]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] - - k[3398]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] - - k[3695]*y_cur[IDX_OI]*y_cur[IDX_C3H2II] + - k[3701]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - - k[3814]*y_cur[IDX_PI]*y_cur[IDX_C3H2II] + - k[3831]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - - k[3834]*y_cur[IDX_SI]*y_cur[IDX_C3H2II] - - k[3873]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - - k[3874]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - - k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - - k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - - k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - - k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - - k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3H2OII] = 0.0 - - k[796]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] - - k[797]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + - k[5507]*y_cur[IDX_C2H2II]*y_cur[IDX_COI] - - k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] - - k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3H3II] = 0.0 + - k[219]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + - k[227]*y_cur[IDX_C2H2I]*y_cur[IDX_CH2CCHII] + - k[232]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + - k[360]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] - - k[798]*y_cur[IDX_C3H3II]*y_cur[IDX_eM] + - k[1328]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + - k[1344]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + - k[1349]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + - k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1375]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1536]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] + - k[1538]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] - - k[1546]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H3II] + - k[1578]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] + - k[1580]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - - k[1631]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H3II] - - k[1693]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H3II] - - k[1732]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - - k[1733]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - - k[1786]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] - - k[1787]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] - - k[1796]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] - - k[1797]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] - - k[1798]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] - - k[1799]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] - - k[1800]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] - - k[1801]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] - - k[1802]*y_cur[IDX_C3H3II]*y_cur[IDX_C6H2I] - - k[1803]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] - - k[1804]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] - - k[1805]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] - - k[1806]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] - - k[1807]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] - - k[1820]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - - k[1821]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - - k[1857]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] - - k[1858]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] + - k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + - k[2079]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] + - k[2162]*y_cur[IDX_CH4I]*y_cur[IDX_C3H2II] + - k[2408]*y_cur[IDX_H2I]*y_cur[IDX_C3H2II] - - k[2476]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] - - k[2477]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + - k[2602]*y_cur[IDX_H3II]*y_cur[IDX_C3H2I] + - k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] + - k[2772]*y_cur[IDX_H3OII]*y_cur[IDX_C3H2I] + - k[2832]*y_cur[IDX_HI]*y_cur[IDX_C3H4II] + - k[2907]*y_cur[IDX_HCOII]*y_cur[IDX_C3H2I] + - k[3020]*y_cur[IDX_HNC3I]*y_cur[IDX_CH3II] + - k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - - k[3564]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - - k[3565]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] + - k[3656]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - - k[3696]*y_cur[IDX_OI]*y_cur[IDX_C3H3II] - - k[3835]*y_cur[IDX_SI]*y_cur[IDX_C3H3II] - - k[3875]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] - - k[3876]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] - - k[5515]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] + - k[5550]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - - k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3H4II] = 0.0 + - k[161]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + - k[165]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + - k[220]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + - k[365]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] + - k[669]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + - k[711]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[799]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] - - k[800]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] - - k[801]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] - - k[802]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[1513]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - - k[1547]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H4II] + - k[1608]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + - k[1691]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - - k[1808]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - - k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - - k[1810]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - - k[1811]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - - k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - - k[1813]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - - k[1859]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] - - k[1860]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] + - k[2044]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + - k[2152]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + - k[2154]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + - k[2196]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + - k[2636]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCHI] + - k[2785]*y_cur[IDX_H3OII]*y_cur[IDX_CH2CCHI] - - k[2832]*y_cur[IDX_HI]*y_cur[IDX_C3H4II] + - k[2938]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CCHI] - - k[3399]*y_cur[IDX_NI]*y_cur[IDX_C3H4II] - - k[3697]*y_cur[IDX_OI]*y_cur[IDX_C3H4II] + - k[5780]*y_cur[IDX_CH2CCH2I] + k[5801]*y_cur[IDX_CH3CCHI] + - k[6080]*y_cur[IDX_CH2CCH2I] + k[6105]*y_cur[IDX_CH3CCHI] - - k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - - k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - - k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - - k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3H5II] = 0.0 - - k[803]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] - - k[804]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + - k[1376]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1512]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] + - k[1514]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - - k[1548]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H5II] + - k[1563]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + - k[1611]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] + - k[1614]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + - k[1647]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] + - k[1685]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H5II] + - k[1811]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - - k[1814]*y_cur[IDX_C3H5II]*y_cur[IDX_C6H6I] - - k[1815]*y_cur[IDX_C3H5II]*y_cur[IDX_CH3CHCH2I] - - k[1816]*y_cur[IDX_C3H5II]*y_cur[IDX_HC3NI] - - k[1861]*y_cur[IDX_CI]*y_cur[IDX_C3H5II] + - k[2046]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + - k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - - k[2104]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C3H5II] + - k[2155]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + - k[2156]*y_cur[IDX_CH4I]*y_cur[IDX_C2H3II] + - k[2197]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + - k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + - k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2789]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CCHI] + - k[2948]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CCHI] + - k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - - k[3400]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] - - k[3401]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + - k[3660]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3823]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[5516]*y_cur[IDX_C3H5II]*y_cur[IDX_H2I] + - k[5530]*y_cur[IDX_CH2CCHII]*y_cur[IDX_H2I] - - k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] - - k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3H6II] = 0.0 + - k[166]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[670]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[702]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + - k[712]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - - k[805]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] - - k[806]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + - k[1670]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - - k[1817]*y_cur[IDX_C3H6II]*y_cur[IDX_CH3CHCH2I] + - k[2833]*y_cur[IDX_HI]*y_cur[IDX_C3H7II] + - k[3857]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - - k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] - - k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3H7II] = 0.0 - - k[807]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - - k[808]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - - k[809]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - - k[810]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - - k[811]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - - k[812]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - - k[813]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[1671]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - - k[1818]*y_cur[IDX_C3H7II]*y_cur[IDX_NH3I] + - k[2064]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + - k[2790]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHCH2I] - - k[2833]*y_cur[IDX_HI]*y_cur[IDX_C3H7II] + - k[3370]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] + - k[5516]*y_cur[IDX_C3H5II]*y_cur[IDX_H2I] - - k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3NI] = 0.0 + k[112]*y_cur[IDX_NI]*y_cur[IDX_C3M] - - k[512]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + - k[832]*y_cur[IDX_C4NII]*y_cur[IDX_eM] + - k[847]*y_cur[IDX_C5NII]*y_cur[IDX_eM] + - k[1063]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + - k[1067]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + - k[1073]*y_cur[IDX_HC4NII]*y_cur[IDX_eM] + - k[1077]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + - k[1354]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - - k[2604]*y_cur[IDX_H3II]*y_cur[IDX_C3NI] - - k[2774]*y_cur[IDX_H3OII]*y_cur[IDX_C3NI] - - k[2909]*y_cur[IDX_HCOII]*y_cur[IDX_C3NI] - - k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + - k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] + - k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + - k[4131]*y_cur[IDX_C3NM]*y_cur[IDX_CII] + - k[4132]*y_cur[IDX_C3NM]*y_cur[IDX_C2H2II] + - k[4133]*y_cur[IDX_C3NM]*y_cur[IDX_C2H3II] + - k[4134]*y_cur[IDX_C3NM]*y_cur[IDX_C4H2II] + - k[4135]*y_cur[IDX_C3NM]*y_cur[IDX_C4H3II] + - k[4136]*y_cur[IDX_C3NM]*y_cur[IDX_C4SII] + - k[4137]*y_cur[IDX_C3NM]*y_cur[IDX_CH2CCHII] + - k[4138]*y_cur[IDX_C3NM]*y_cur[IDX_CH3II] + - k[4139]*y_cur[IDX_C3NM]*y_cur[IDX_CNCII] + - k[4140]*y_cur[IDX_C3NM]*y_cur[IDX_FeII] + - k[4141]*y_cur[IDX_C3NM]*y_cur[IDX_HII] + - k[4142]*y_cur[IDX_C3NM]*y_cur[IDX_H2COII] + - k[4143]*y_cur[IDX_C3NM]*y_cur[IDX_H2SII] + - k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] + - k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] + - k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] + - k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + - k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + - k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + - k[4150]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + - k[4151]*y_cur[IDX_C3NM]*y_cur[IDX_HeII] + - k[4152]*y_cur[IDX_C3NM]*y_cur[IDX_MgII] + - k[4153]*y_cur[IDX_C3NM]*y_cur[IDX_NII] + - k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] + - k[4155]*y_cur[IDX_C3NM]*y_cur[IDX_NH3II] + - k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] + - k[4157]*y_cur[IDX_C3NM]*y_cur[IDX_NOII] + - k[4158]*y_cur[IDX_C3NM]*y_cur[IDX_NaII] + - k[4159]*y_cur[IDX_C3NM]*y_cur[IDX_OII] + - k[4160]*y_cur[IDX_C3NM]*y_cur[IDX_SII] + - k[4161]*y_cur[IDX_C3NM]*y_cur[IDX_SOII] + - k[4162]*y_cur[IDX_C3NM]*y_cur[IDX_SiII] + - k[4163]*y_cur[IDX_C3NM]*y_cur[IDX_SiOII] + - k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] + - k[4165]*y_cur[IDX_C3NM]*y_cur[IDX_SiSII] + - k[4873]*y_cur[IDX_C2I]*y_cur[IDX_HCNI] - - k[4921]*y_cur[IDX_CI]*y_cur[IDX_C3NI] + - k[5233]*y_cur[IDX_NI]*y_cur[IDX_C3HI] - - k[5234]*y_cur[IDX_NI]*y_cur[IDX_C3NI] + - k[5237]*y_cur[IDX_NI]*y_cur[IDX_C4NI] - - k[5358]*y_cur[IDX_OI]*y_cur[IDX_C3NI] + - k[5363]*y_cur[IDX_OI]*y_cur[IDX_C4NI] - - k[5593]*y_cur[IDX_C3NI]*y_cur[IDX_eM] + k[5721]*y_cur[IDX_C3NM] - - k[5722]*y_cur[IDX_C3NI] + k[5796]*y_cur[IDX_CH3C3NI] + - k[6005]*y_cur[IDX_C3NM] - k[6006]*y_cur[IDX_C3NI] + - k[6100]*y_cur[IDX_CH3C3NI] + k[6197]*y_cur[IDX_HNC3I] + - k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + - k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + - k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM] + - k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM] + - k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] - - k[6997]*y_cur[IDX_C3NI] + k[7179]*y_cur[IDX_GC3NI] + - k[7361]*y_cur[IDX_GC3NI] + k[7543]*y_cur[IDX_GC3NI] + - k[8669]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] + - k[8705]*y_cur[IDX_GNI]*y_cur[IDX_GC3I]; - ydot[yistart + IDX_C3NII] = 0.0 + - k[512]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] - - k[814]*y_cur[IDX_C3NII]*y_cur[IDX_eM] + - k[1453]*y_cur[IDX_C2II]*y_cur[IDX_HCNI] + - k[1467]*y_cur[IDX_C2HII]*y_cur[IDX_CNI] - - k[2409]*y_cur[IDX_H2I]*y_cur[IDX_C3NII] + - k[3018]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + - k[3022]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3394]*y_cur[IDX_NI]*y_cur[IDX_C3HII] - - k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3NM] = 0.0 - k[42]*y_cur[IDX_CI]*y_cur[IDX_C3NM] - - k[91]*y_cur[IDX_HI]*y_cur[IDX_C3NM] - - k[130]*y_cur[IDX_OI]*y_cur[IDX_C3NM] + - k[1115]*y_cur[IDX_HNC3I]*y_cur[IDX_eM] + - k[3377]*y_cur[IDX_NI]*y_cur[IDX_C10M] + - k[3381]*y_cur[IDX_NI]*y_cur[IDX_C10HM] + - k[3409]*y_cur[IDX_NI]*y_cur[IDX_C5M] + - k[3418]*y_cur[IDX_NI]*y_cur[IDX_C6M] + - k[3421]*y_cur[IDX_NI]*y_cur[IDX_C6HM] + - k[3425]*y_cur[IDX_NI]*y_cur[IDX_C7M] + - k[3430]*y_cur[IDX_NI]*y_cur[IDX_C7HM] + - k[3436]*y_cur[IDX_NI]*y_cur[IDX_C8M] + - k[3440]*y_cur[IDX_NI]*y_cur[IDX_C8HM] + - k[3442]*y_cur[IDX_NI]*y_cur[IDX_C9M] + - k[3447]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - - k[4131]*y_cur[IDX_C3NM]*y_cur[IDX_CII] - - k[4132]*y_cur[IDX_C3NM]*y_cur[IDX_C2H2II] - - k[4133]*y_cur[IDX_C3NM]*y_cur[IDX_C2H3II] - - k[4134]*y_cur[IDX_C3NM]*y_cur[IDX_C4H2II] - - k[4135]*y_cur[IDX_C3NM]*y_cur[IDX_C4H3II] - - k[4136]*y_cur[IDX_C3NM]*y_cur[IDX_C4SII] - - k[4137]*y_cur[IDX_C3NM]*y_cur[IDX_CH2CCHII] - - k[4138]*y_cur[IDX_C3NM]*y_cur[IDX_CH3II] - - k[4139]*y_cur[IDX_C3NM]*y_cur[IDX_CNCII] - - k[4140]*y_cur[IDX_C3NM]*y_cur[IDX_FeII] - - k[4141]*y_cur[IDX_C3NM]*y_cur[IDX_HII] - - k[4142]*y_cur[IDX_C3NM]*y_cur[IDX_H2COII] - - k[4143]*y_cur[IDX_C3NM]*y_cur[IDX_H2SII] - - k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] - - k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] - - k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] - - k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] - - k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] - - k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] - - k[4150]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] - - k[4151]*y_cur[IDX_C3NM]*y_cur[IDX_HeII] - - k[4152]*y_cur[IDX_C3NM]*y_cur[IDX_MgII] - - k[4153]*y_cur[IDX_C3NM]*y_cur[IDX_NII] - - k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] - - k[4155]*y_cur[IDX_C3NM]*y_cur[IDX_NH3II] - - k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] - - k[4157]*y_cur[IDX_C3NM]*y_cur[IDX_NOII] - - k[4158]*y_cur[IDX_C3NM]*y_cur[IDX_NaII] - - k[4159]*y_cur[IDX_C3NM]*y_cur[IDX_OII] - - k[4160]*y_cur[IDX_C3NM]*y_cur[IDX_SII] - - k[4161]*y_cur[IDX_C3NM]*y_cur[IDX_SOII] - - k[4162]*y_cur[IDX_C3NM]*y_cur[IDX_SiII] - - k[4163]*y_cur[IDX_C3NM]*y_cur[IDX_SiOII] - - k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] - - k[4165]*y_cur[IDX_C3NM]*y_cur[IDX_SiSII] + - k[5593]*y_cur[IDX_C3NI]*y_cur[IDX_eM] - k[5721]*y_cur[IDX_C3NM] - - k[6005]*y_cur[IDX_C3NM]; - ydot[yistart + IDX_C3OI] = 0.0 - - k[153]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - - k[336]*y_cur[IDX_HII]*y_cur[IDX_C3OI] + - k[796]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + - k[1027]*y_cur[IDX_H3C3OII]*y_cur[IDX_eM] + - k[1070]*y_cur[IDX_HC3OII]*y_cur[IDX_eM] - - k[1313]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - - k[1314]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + - k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - - k[2605]*y_cur[IDX_H3II]*y_cur[IDX_C3OI] - - k[2775]*y_cur[IDX_H3OII]*y_cur[IDX_C3OI] - - k[2910]*y_cur[IDX_HCOII]*y_cur[IDX_C3OI] - - k[3099]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] - - k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] - - k[4922]*y_cur[IDX_CI]*y_cur[IDX_C3OI] - - k[5359]*y_cur[IDX_OI]*y_cur[IDX_C3OI] - k[5723]*y_cur[IDX_C3OI] - - k[6007]*y_cur[IDX_C3OI] + - k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM] + - k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + - k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] - - k[7006]*y_cur[IDX_C3OI] + k[7188]*y_cur[IDX_GC3OI] + - k[7370]*y_cur[IDX_GC3OI] + k[7552]*y_cur[IDX_GC3OI] + - k[8670]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] + - k[8695]*y_cur[IDX_GOI]*y_cur[IDX_GC3I]; - ydot[yistart + IDX_C3OII] = 0.0 + - k[153]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + - k[336]*y_cur[IDX_HII]*y_cur[IDX_C3OI] - - k[815]*y_cur[IDX_C3OII]*y_cur[IDX_eM] - - k[2163]*y_cur[IDX_CH4I]*y_cur[IDX_C3OII] - - k[2410]*y_cur[IDX_H2I]*y_cur[IDX_C3OII] - - k[2531]*y_cur[IDX_H2OI]*y_cur[IDX_C3OII] + - k[3668]*y_cur[IDX_O2I]*y_cur[IDX_C3II] - - k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C3PI] = 0.0 + - k[833]*y_cur[IDX_C4PII]*y_cur[IDX_eM] + - k[1190]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + - k[1193]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - - k[1315]*y_cur[IDX_CII]*y_cur[IDX_C3PI] - - k[2606]*y_cur[IDX_H3II]*y_cur[IDX_C3PI] - - k[2776]*y_cur[IDX_H3OII]*y_cur[IDX_C3PI] - - k[2911]*y_cur[IDX_HCOII]*y_cur[IDX_C3PI] - - k[3101]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] - - k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] - - k[5360]*y_cur[IDX_OI]*y_cur[IDX_C3PI] + - k[5364]*y_cur[IDX_OI]*y_cur[IDX_C4PI] - k[5724]*y_cur[IDX_C3PI] + - k[5734]*y_cur[IDX_C4PI] - k[6008]*y_cur[IDX_C3PI] + - k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + - k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + - k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[7039]*y_cur[IDX_C3PI] + k[7221]*y_cur[IDX_GC3PI] + - k[7403]*y_cur[IDX_GC3PI] + k[7585]*y_cur[IDX_GC3PI]; - ydot[yistart + IDX_C3SI] = 0.0 - - k[154]*y_cur[IDX_CII]*y_cur[IDX_C3SI] - - k[337]*y_cur[IDX_HII]*y_cur[IDX_C3SI] + - k[836]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + - k[1072]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + - k[1075]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - - k[1316]*y_cur[IDX_CII]*y_cur[IDX_C3SI] - - k[2607]*y_cur[IDX_H3II]*y_cur[IDX_C3SI] - - k[2777]*y_cur[IDX_H3OII]*y_cur[IDX_C3SI] - - k[2912]*y_cur[IDX_HCOII]*y_cur[IDX_C3SI] - - k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] - - k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + - k[4899]*y_cur[IDX_C2HI]*y_cur[IDX_CSI] - k[5725]*y_cur[IDX_C3SI] - - k[6009]*y_cur[IDX_C3SI] + - k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + - k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + - k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - - k[7040]*y_cur[IDX_C3SI] + k[7222]*y_cur[IDX_GC3SI] + - k[7404]*y_cur[IDX_GC3SI] + k[7586]*y_cur[IDX_GC3SI] + - k[8673]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI]; - ydot[yistart + IDX_C3SII] = 0.0 + - k[154]*y_cur[IDX_CII]*y_cur[IDX_C3SI] + - k[337]*y_cur[IDX_HII]*y_cur[IDX_C3SI] - - k[816]*y_cur[IDX_C3SII]*y_cur[IDX_eM] - - k[817]*y_cur[IDX_C3SII]*y_cur[IDX_eM] - - k[818]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + - k[1902]*y_cur[IDX_CI]*y_cur[IDX_HC2SII] + - k[3821]*y_cur[IDX_SII]*y_cur[IDX_C3HI] - - k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - - k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - - k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4I] = 0.0 + k[10]*y_cur[IDX_C2M]*y_cur[IDX_C2I] - - k[12]*y_cur[IDX_C2M]*y_cur[IDX_C4I] - - k[18]*y_cur[IDX_C3M]*y_cur[IDX_C4I] - - k[24]*y_cur[IDX_C4M]*y_cur[IDX_C4I] - - k[29]*y_cur[IDX_C5M]*y_cur[IDX_C4I] - - k[33]*y_cur[IDX_C6M]*y_cur[IDX_C4I] + - k[40]*y_cur[IDX_CI]*y_cur[IDX_C3M] - - k[338]*y_cur[IDX_HII]*y_cur[IDX_C4I] + - k[736]*y_cur[IDX_C11II]*y_cur[IDX_eM] + - k[821]*y_cur[IDX_C4HII]*y_cur[IDX_eM] + - k[848]*y_cur[IDX_C6II]*y_cur[IDX_eM] + - k[863]*y_cur[IDX_C7II]*y_cur[IDX_eM] + - k[1830]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - - k[2608]*y_cur[IDX_H3II]*y_cur[IDX_C4I] - - k[2778]*y_cur[IDX_H3OII]*y_cur[IDX_C4I] - - k[2913]*y_cur[IDX_HCOII]*y_cur[IDX_C4I] + - k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - - k[3106]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - - k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + - k[3410]*y_cur[IDX_NI]*y_cur[IDX_C5M] + - k[3425]*y_cur[IDX_NI]*y_cur[IDX_C7M] + - k[3443]*y_cur[IDX_NI]*y_cur[IDX_C9M] + - k[3704]*y_cur[IDX_OI]*y_cur[IDX_C5HII] + - k[4166]*y_cur[IDX_C4M]*y_cur[IDX_CII] + - k[4167]*y_cur[IDX_C4M]*y_cur[IDX_C2H2II] + - k[4168]*y_cur[IDX_C4M]*y_cur[IDX_C2H3II] + - k[4169]*y_cur[IDX_C4M]*y_cur[IDX_C4H2II] + - k[4170]*y_cur[IDX_C4M]*y_cur[IDX_C4H3II] + - k[4171]*y_cur[IDX_C4M]*y_cur[IDX_C4SII] + - k[4172]*y_cur[IDX_C4M]*y_cur[IDX_CH2CCHII] + - k[4173]*y_cur[IDX_C4M]*y_cur[IDX_CH3II] + - k[4174]*y_cur[IDX_C4M]*y_cur[IDX_CNCII] + - k[4175]*y_cur[IDX_C4M]*y_cur[IDX_FeII] + - k[4176]*y_cur[IDX_C4M]*y_cur[IDX_HII] + - k[4177]*y_cur[IDX_C4M]*y_cur[IDX_H2COII] + - k[4178]*y_cur[IDX_C4M]*y_cur[IDX_H2SII] + - k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] + - k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] + - k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] + - k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + - k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + - k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + - k[4185]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + - k[4186]*y_cur[IDX_C4M]*y_cur[IDX_HeII] + - k[4187]*y_cur[IDX_C4M]*y_cur[IDX_MgII] + - k[4188]*y_cur[IDX_C4M]*y_cur[IDX_NII] + - k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] + - k[4190]*y_cur[IDX_C4M]*y_cur[IDX_NH3II] + - k[4191]*y_cur[IDX_C4M]*y_cur[IDX_NH4II] + - k[4192]*y_cur[IDX_C4M]*y_cur[IDX_NOII] + - k[4193]*y_cur[IDX_C4M]*y_cur[IDX_NaII] + - k[4194]*y_cur[IDX_C4M]*y_cur[IDX_OII] + - k[4195]*y_cur[IDX_C4M]*y_cur[IDX_SII] + - k[4196]*y_cur[IDX_C4M]*y_cur[IDX_SOII] + - k[4197]*y_cur[IDX_C4M]*y_cur[IDX_SiII] + - k[4198]*y_cur[IDX_C4M]*y_cur[IDX_SiOII] + - k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] + - k[4200]*y_cur[IDX_C4M]*y_cur[IDX_SiSII] + - k[4920]*y_cur[IDX_CI]*y_cur[IDX_C3HI] - - k[4923]*y_cur[IDX_CI]*y_cur[IDX_C4I] + - k[4931]*y_cur[IDX_CI]*y_cur[IDX_C6I] - - k[5235]*y_cur[IDX_NI]*y_cur[IDX_C4I] + - k[5238]*y_cur[IDX_NI]*y_cur[IDX_C5I] - - k[5361]*y_cur[IDX_OI]*y_cur[IDX_C4I] + - k[5365]*y_cur[IDX_OI]*y_cur[IDX_C5I] - - k[5497]*y_cur[IDX_CII]*y_cur[IDX_C4I] + - k[5522]*y_cur[IDX_CI]*y_cur[IDX_C3I] - - k[5594]*y_cur[IDX_C4I]*y_cur[IDX_eM] + k[5726]*y_cur[IDX_C4M] - - k[5727]*y_cur[IDX_C4I] - k[5728]*y_cur[IDX_C4I] + - k[5732]*y_cur[IDX_C4HI] + k[5738]*y_cur[IDX_C5I] + - k[5746]*y_cur[IDX_C5NI] + k[5753]*y_cur[IDX_C6HI] + - k[5952]*y_cur[IDX_C10I] + k[5972]*y_cur[IDX_C11I] + - k[6010]*y_cur[IDX_C4M] - k[6011]*y_cur[IDX_C4I] - - k[6012]*y_cur[IDX_C4I] + k[6017]*y_cur[IDX_C4HI] + - k[6019]*y_cur[IDX_C4NI] + k[6031]*y_cur[IDX_C5NI] + - k[6040]*y_cur[IDX_C6HI] + k[6266]*y_cur[IDX_SiC4I] + - k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM] + - k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + - k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + - k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[6995]*y_cur[IDX_C4I] - + k[7177]*y_cur[IDX_GC4I] + k[7359]*y_cur[IDX_GC4I] + - k[7541]*y_cur[IDX_GC4I] + k[8667]*y_cur[IDX_GCI]*y_cur[IDX_GC3I]; - ydot[yistart + IDX_C4II] = 0.0 + - k[338]*y_cur[IDX_HII]*y_cur[IDX_C4I] - - k[819]*y_cur[IDX_C4II]*y_cur[IDX_eM] - - k[820]*y_cur[IDX_C4II]*y_cur[IDX_eM] + - k[1310]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] + - k[1312]*y_cur[IDX_CII]*y_cur[IDX_C3HI] + - k[1314]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + - k[1315]*y_cur[IDX_CII]*y_cur[IDX_C3PI] + - k[1316]*y_cur[IDX_CII]*y_cur[IDX_C3SI] + - k[1388]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - - k[1549]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] - - k[1550]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] + - k[1855]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] - - k[2164]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - - k[2165]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - - k[2166]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - - k[2167]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + - k[2303]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - - k[2411]*y_cur[IDX_H2I]*y_cur[IDX_C4II] + - k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + - k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + - k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] + - k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + - k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[5496]*y_cur[IDX_CII]*y_cur[IDX_C3I] - - k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] - - k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4M] = 0.0 - k[22]*y_cur[IDX_C4M]*y_cur[IDX_C2I] - - k[23]*y_cur[IDX_C4M]*y_cur[IDX_C3I] - - k[24]*y_cur[IDX_C4M]*y_cur[IDX_C4I] - - k[25]*y_cur[IDX_C4M]*y_cur[IDX_C5I] - - k[26]*y_cur[IDX_C4M]*y_cur[IDX_C6I] - - k[43]*y_cur[IDX_CI]*y_cur[IDX_C4M] - - k[92]*y_cur[IDX_HI]*y_cur[IDX_C4M] - - k[114]*y_cur[IDX_NI]*y_cur[IDX_C4M] - - k[3402]*y_cur[IDX_NI]*y_cur[IDX_C4M] - - k[3403]*y_cur[IDX_NI]*y_cur[IDX_C4M] + - k[3411]*y_cur[IDX_NI]*y_cur[IDX_C5M] - - k[3698]*y_cur[IDX_OI]*y_cur[IDX_C4M] + - k[3703]*y_cur[IDX_OI]*y_cur[IDX_C5M] - - k[4166]*y_cur[IDX_C4M]*y_cur[IDX_CII] - - k[4167]*y_cur[IDX_C4M]*y_cur[IDX_C2H2II] - - k[4168]*y_cur[IDX_C4M]*y_cur[IDX_C2H3II] - - k[4169]*y_cur[IDX_C4M]*y_cur[IDX_C4H2II] - - k[4170]*y_cur[IDX_C4M]*y_cur[IDX_C4H3II] - - k[4171]*y_cur[IDX_C4M]*y_cur[IDX_C4SII] - - k[4172]*y_cur[IDX_C4M]*y_cur[IDX_CH2CCHII] - - k[4173]*y_cur[IDX_C4M]*y_cur[IDX_CH3II] - - k[4174]*y_cur[IDX_C4M]*y_cur[IDX_CNCII] - - k[4175]*y_cur[IDX_C4M]*y_cur[IDX_FeII] - - k[4176]*y_cur[IDX_C4M]*y_cur[IDX_HII] - - k[4177]*y_cur[IDX_C4M]*y_cur[IDX_H2COII] - - k[4178]*y_cur[IDX_C4M]*y_cur[IDX_H2SII] - - k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] - - k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] - - k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] - - k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] - - k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] - - k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] - - k[4185]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] - - k[4186]*y_cur[IDX_C4M]*y_cur[IDX_HeII] - - k[4187]*y_cur[IDX_C4M]*y_cur[IDX_MgII] - - k[4188]*y_cur[IDX_C4M]*y_cur[IDX_NII] - - k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] - - k[4190]*y_cur[IDX_C4M]*y_cur[IDX_NH3II] - - k[4191]*y_cur[IDX_C4M]*y_cur[IDX_NH4II] - - k[4192]*y_cur[IDX_C4M]*y_cur[IDX_NOII] - - k[4193]*y_cur[IDX_C4M]*y_cur[IDX_NaII] - - k[4194]*y_cur[IDX_C4M]*y_cur[IDX_OII] - - k[4195]*y_cur[IDX_C4M]*y_cur[IDX_SII] - - k[4196]*y_cur[IDX_C4M]*y_cur[IDX_SOII] - - k[4197]*y_cur[IDX_C4M]*y_cur[IDX_SiII] - - k[4198]*y_cur[IDX_C4M]*y_cur[IDX_SiOII] - - k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] - - k[4200]*y_cur[IDX_C4M]*y_cur[IDX_SiSII] + - k[5594]*y_cur[IDX_C4I]*y_cur[IDX_eM] - k[5726]*y_cur[IDX_C4M] - - k[6010]*y_cur[IDX_C4M]; - ydot[yistart + IDX_C4HI] = 0.0 + k[41]*y_cur[IDX_CI]*y_cur[IDX_C3HM] - + k[92]*y_cur[IDX_HI]*y_cur[IDX_C4M] - - k[340]*y_cur[IDX_HII]*y_cur[IDX_C4HI] + - k[823]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + - k[824]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + - k[827]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + - k[839]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + - k[1082]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + - k[1083]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - - k[1320]*y_cur[IDX_CII]*y_cur[IDX_C4HI] - - k[1489]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] - - k[1490]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] - - k[1586]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - - k[1587]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - - k[1588]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - - k[1653]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] - - k[1654]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] - - k[1761]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] - - k[1762]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] - - k[1796]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] - - k[1797]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] - - k[1830]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - - k[1831]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - - k[1843]*y_cur[IDX_C4HI]*y_cur[IDX_C4H2II] - - k[1844]*y_cur[IDX_C4HI]*y_cur[IDX_C4H3II] - - k[1845]*y_cur[IDX_C4HI]*y_cur[IDX_C5H2II] - - k[2020]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] - - k[2021]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] - - k[2052]*y_cur[IDX_CH3II]*y_cur[IDX_C4HI] - - k[2303]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - - k[2610]*y_cur[IDX_H3II]*y_cur[IDX_C4HI] - - k[2780]*y_cur[IDX_H3OII]*y_cur[IDX_C4HI] - - k[2915]*y_cur[IDX_HCOII]*y_cur[IDX_C4HI] - - k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] - - k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + - k[3413]*y_cur[IDX_NI]*y_cur[IDX_C5HM] + - k[3430]*y_cur[IDX_NI]*y_cur[IDX_C7HM] + - k[3706]*y_cur[IDX_OI]*y_cur[IDX_C5H2II] - - k[3822]*y_cur[IDX_SII]*y_cur[IDX_C4HI] - - k[3862]*y_cur[IDX_SiII]*y_cur[IDX_C4HI] + - k[4201]*y_cur[IDX_C4HM]*y_cur[IDX_CII] + - k[4202]*y_cur[IDX_C4HM]*y_cur[IDX_C2H2II] + - k[4203]*y_cur[IDX_C4HM]*y_cur[IDX_C2H3II] + - k[4204]*y_cur[IDX_C4HM]*y_cur[IDX_C4H2II] + - k[4205]*y_cur[IDX_C4HM]*y_cur[IDX_C4H3II] + - k[4206]*y_cur[IDX_C4HM]*y_cur[IDX_C4SII] + - k[4207]*y_cur[IDX_C4HM]*y_cur[IDX_CH2CCHII] + - k[4208]*y_cur[IDX_C4HM]*y_cur[IDX_CH3II] + - k[4209]*y_cur[IDX_C4HM]*y_cur[IDX_CNCII] + - k[4210]*y_cur[IDX_C4HM]*y_cur[IDX_FeII] + - k[4211]*y_cur[IDX_C4HM]*y_cur[IDX_HII] + - k[4212]*y_cur[IDX_C4HM]*y_cur[IDX_H2COII] + - k[4213]*y_cur[IDX_C4HM]*y_cur[IDX_H2SII] + - k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] + - k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] + - k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] + - k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + - k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + - k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + - k[4220]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + - k[4221]*y_cur[IDX_C4HM]*y_cur[IDX_HeII] + - k[4222]*y_cur[IDX_C4HM]*y_cur[IDX_MgII] + - k[4223]*y_cur[IDX_C4HM]*y_cur[IDX_NII] + - k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] + - k[4225]*y_cur[IDX_C4HM]*y_cur[IDX_NH3II] + - k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] + - k[4227]*y_cur[IDX_C4HM]*y_cur[IDX_NOII] + - k[4228]*y_cur[IDX_C4HM]*y_cur[IDX_NaII] + - k[4229]*y_cur[IDX_C4HM]*y_cur[IDX_OII] + - k[4230]*y_cur[IDX_C4HM]*y_cur[IDX_SII] + - k[4231]*y_cur[IDX_C4HM]*y_cur[IDX_SOII] + - k[4232]*y_cur[IDX_C4HM]*y_cur[IDX_SiII] + - k[4233]*y_cur[IDX_C4HM]*y_cur[IDX_SiOII] + - k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] + - k[4235]*y_cur[IDX_C4HM]*y_cur[IDX_SiSII] + - k[4867]*y_cur[IDX_C2I]*y_cur[IDX_C2H2I] - - k[4877]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HI] - - k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] - - k[4907]*y_cur[IDX_C4HI]*y_cur[IDX_HNCI] - - k[4908]*y_cur[IDX_C4HI]*y_cur[IDX_NCCNI] + - k[4919]*y_cur[IDX_CI]*y_cur[IDX_C3H2I] - - k[4925]*y_cur[IDX_CI]*y_cur[IDX_C4HI] + - k[4959]*y_cur[IDX_CI]*y_cur[IDX_H2CCCI] - - k[5022]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - - k[5023]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - - k[5050]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] - - k[5051]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] - - k[5052]*y_cur[IDX_C2H6I]*y_cur[IDX_C4HI] - - k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - - k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - - k[5057]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - - k[5058]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - - k[5236]*y_cur[IDX_NI]*y_cur[IDX_C4HI] - - k[5362]*y_cur[IDX_OI]*y_cur[IDX_C4HI] + - k[5366]*y_cur[IDX_OI]*y_cur[IDX_C5HI] - - k[5595]*y_cur[IDX_C4HI]*y_cur[IDX_eM] + k[5729]*y_cur[IDX_C4HM] + - k[5730]*y_cur[IDX_C4H3I] - k[5731]*y_cur[IDX_C4HI] - - k[5732]*y_cur[IDX_C4HI] + k[5750]*y_cur[IDX_C6H2I] + - k[5797]*y_cur[IDX_CH3C4HI] + k[5849]*y_cur[IDX_C4H2I] + - k[5850]*y_cur[IDX_HC5NI] + k[6013]*y_cur[IDX_C4HM] + - k[6014]*y_cur[IDX_C4H3I] - k[6016]*y_cur[IDX_C4HI] - - k[6017]*y_cur[IDX_C4HI] + k[6101]*y_cur[IDX_CH3C4HI] + - k[6174]*y_cur[IDX_C4H2I] + k[6175]*y_cur[IDX_HC5NI] + - k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + - k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + - k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + - k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6996]*y_cur[IDX_C4HI] + k[7178]*y_cur[IDX_GC4HI] + - k[7360]*y_cur[IDX_GC4HI] + k[7542]*y_cur[IDX_GC4HI] + - k[8629]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] + - k[8668]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] + - k[8724]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I]; - ydot[yistart + IDX_C4HII] = 0.0 + - k[340]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - - k[821]*y_cur[IDX_C4HII]*y_cur[IDX_eM] + - k[1311]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] + - k[1346]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + - k[1389]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] + - k[1452]*y_cur[IDX_C2II]*y_cur[IDX_C2H2I] + - k[1470]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1551]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HII] - - k[1632]*y_cur[IDX_C2H3I]*y_cur[IDX_C4HII] - - k[1694]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] - - k[1695]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] - - k[1734]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] - - k[1735]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] - - k[1822]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] - - k[1823]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] - - k[1830]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - - k[1831]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - - k[1832]*y_cur[IDX_C4HII]*y_cur[IDX_C5H2I] - - k[1833]*y_cur[IDX_C4HII]*y_cur[IDX_C5HI] - - k[1834]*y_cur[IDX_C4HII]*y_cur[IDX_C4H2I] + - k[1856]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] + - k[1857]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] - - k[1862]*y_cur[IDX_CI]*y_cur[IDX_C4HII] + - k[1892]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - - k[2032]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4HII] - - k[2105]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HII] + - k[2165]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - - k[2168]*y_cur[IDX_CH4I]*y_cur[IDX_C4HII] + - k[2342]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] + - k[2411]*y_cur[IDX_H2I]*y_cur[IDX_C4II] - - k[2412]*y_cur[IDX_H2I]*y_cur[IDX_C4HII] - - k[2478]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4HII] + - k[2608]*y_cur[IDX_H3II]*y_cur[IDX_C4I] + - k[2778]*y_cur[IDX_H3OII]*y_cur[IDX_C4I] - - k[2869]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] - - k[2870]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + - k[2913]*y_cur[IDX_HCOII]*y_cur[IDX_C4I] + - k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + - k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[3242]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] - - k[3699]*y_cur[IDX_OI]*y_cur[IDX_C4HII] + - k[3830]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + - k[3869]*y_cur[IDX_SiII]*y_cur[IDX_C4H2I] - - k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4HM] = 0.0 - k[44]*y_cur[IDX_CI]*y_cur[IDX_C4HM] - - k[93]*y_cur[IDX_HI]*y_cur[IDX_C4HM] - - k[115]*y_cur[IDX_NI]*y_cur[IDX_C4HM] - - k[3404]*y_cur[IDX_NI]*y_cur[IDX_C4HM] + - k[3414]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - - k[3700]*y_cur[IDX_OI]*y_cur[IDX_C4HM] + - k[3705]*y_cur[IDX_OI]*y_cur[IDX_C5HM] - - k[4201]*y_cur[IDX_C4HM]*y_cur[IDX_CII] - - k[4202]*y_cur[IDX_C4HM]*y_cur[IDX_C2H2II] - - k[4203]*y_cur[IDX_C4HM]*y_cur[IDX_C2H3II] - - k[4204]*y_cur[IDX_C4HM]*y_cur[IDX_C4H2II] - - k[4205]*y_cur[IDX_C4HM]*y_cur[IDX_C4H3II] - - k[4206]*y_cur[IDX_C4HM]*y_cur[IDX_C4SII] - - k[4207]*y_cur[IDX_C4HM]*y_cur[IDX_CH2CCHII] - - k[4208]*y_cur[IDX_C4HM]*y_cur[IDX_CH3II] - - k[4209]*y_cur[IDX_C4HM]*y_cur[IDX_CNCII] - - k[4210]*y_cur[IDX_C4HM]*y_cur[IDX_FeII] - - k[4211]*y_cur[IDX_C4HM]*y_cur[IDX_HII] - - k[4212]*y_cur[IDX_C4HM]*y_cur[IDX_H2COII] - - k[4213]*y_cur[IDX_C4HM]*y_cur[IDX_H2SII] - - k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] - - k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] - - k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] - - k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] - - k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] - - k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] - - k[4220]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] - - k[4221]*y_cur[IDX_C4HM]*y_cur[IDX_HeII] - - k[4222]*y_cur[IDX_C4HM]*y_cur[IDX_MgII] - - k[4223]*y_cur[IDX_C4HM]*y_cur[IDX_NII] - - k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] - - k[4225]*y_cur[IDX_C4HM]*y_cur[IDX_NH3II] - - k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] - - k[4227]*y_cur[IDX_C4HM]*y_cur[IDX_NOII] - - k[4228]*y_cur[IDX_C4HM]*y_cur[IDX_NaII] - - k[4229]*y_cur[IDX_C4HM]*y_cur[IDX_OII] - - k[4230]*y_cur[IDX_C4HM]*y_cur[IDX_SII] - - k[4231]*y_cur[IDX_C4HM]*y_cur[IDX_SOII] - - k[4232]*y_cur[IDX_C4HM]*y_cur[IDX_SiII] - - k[4233]*y_cur[IDX_C4HM]*y_cur[IDX_SiOII] - - k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] - - k[4235]*y_cur[IDX_C4HM]*y_cur[IDX_SiSII] + - k[5595]*y_cur[IDX_C4HI]*y_cur[IDX_eM] - k[5729]*y_cur[IDX_C4HM] - - k[6013]*y_cur[IDX_C4HM]; - ydot[yistart + IDX_C4H2I] = 0.0 + - k[93]*y_cur[IDX_HI]*y_cur[IDX_C4HM] - - k[177]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - - k[224]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - - k[384]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] - - k[493]*y_cur[IDX_C4H2I]*y_cur[IDX_HC3NII] + - k[622]*y_cur[IDX_NOI]*y_cur[IDX_C4H2II] - - k[704]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + - k[825]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + - k[829]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + - k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] - - k[1402]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - - k[1403]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - - k[1520]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - - k[1521]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - - k[1621]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - - k[1622]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - - k[1623]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - - k[1677]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] - - k[1678]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] - - k[1754]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - - k[1755]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - - k[1784]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] - - k[1785]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] - - k[1807]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] - - k[1834]*y_cur[IDX_C4HII]*y_cur[IDX_C4H2I] - - k[1837]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - - k[1838]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - - k[2031]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] - - k[2080]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] - - k[2081]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + - k[2124]*y_cur[IDX_CH3OHI]*y_cur[IDX_C4H3II] - - k[2342]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] - - k[2690]*y_cur[IDX_H3II]*y_cur[IDX_C4H2I] - - k[2764]*y_cur[IDX_H3COII]*y_cur[IDX_C4H2I] - - k[2805]*y_cur[IDX_H3OII]*y_cur[IDX_C4H2I] - - k[2850]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] - - k[2851]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H4II] - - k[2852]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] - - k[2965]*y_cur[IDX_HCOII]*y_cur[IDX_C4H2I] - - k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - - k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - - k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[3707]*y_cur[IDX_OI]*y_cur[IDX_C5H3II] - - k[3830]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - - k[3831]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - - k[3832]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - - k[3869]*y_cur[IDX_SiII]*y_cur[IDX_C4H2I] + - k[3889]*y_cur[IDX_CM]*y_cur[IDX_C4H2II] + - k[3924]*y_cur[IDX_C10M]*y_cur[IDX_C4H2II] + - k[3959]*y_cur[IDX_C10HM]*y_cur[IDX_C4H2II] + - k[3994]*y_cur[IDX_C2M]*y_cur[IDX_C4H2II] + - k[4029]*y_cur[IDX_C2HM]*y_cur[IDX_C4H2II] + - k[4064]*y_cur[IDX_C3M]*y_cur[IDX_C4H2II] + - k[4099]*y_cur[IDX_C3HM]*y_cur[IDX_C4H2II] + - k[4134]*y_cur[IDX_C3NM]*y_cur[IDX_C4H2II] + - k[4169]*y_cur[IDX_C4M]*y_cur[IDX_C4H2II] + - k[4204]*y_cur[IDX_C4HM]*y_cur[IDX_C4H2II] + - k[4239]*y_cur[IDX_C5M]*y_cur[IDX_C4H2II] + - k[4274]*y_cur[IDX_C5HM]*y_cur[IDX_C4H2II] + - k[4309]*y_cur[IDX_C5NM]*y_cur[IDX_C4H2II] + - k[4344]*y_cur[IDX_C6M]*y_cur[IDX_C4H2II] + - k[4379]*y_cur[IDX_C6HM]*y_cur[IDX_C4H2II] + - k[4414]*y_cur[IDX_C7M]*y_cur[IDX_C4H2II] + - k[4449]*y_cur[IDX_C7HM]*y_cur[IDX_C4H2II] + - k[4484]*y_cur[IDX_C8M]*y_cur[IDX_C4H2II] + - k[4519]*y_cur[IDX_C8HM]*y_cur[IDX_C4H2II] + - k[4554]*y_cur[IDX_C9M]*y_cur[IDX_C4H2II] + - k[4589]*y_cur[IDX_C9HM]*y_cur[IDX_C4H2II] + - k[4624]*y_cur[IDX_CHM]*y_cur[IDX_C4H2II] + - k[4659]*y_cur[IDX_CNM]*y_cur[IDX_C4H2II] + - k[4694]*y_cur[IDX_HM]*y_cur[IDX_C4H2II] + - k[4730]*y_cur[IDX_OM]*y_cur[IDX_C4H2II] + - k[4765]*y_cur[IDX_O2M]*y_cur[IDX_C4H2II] + - k[4800]*y_cur[IDX_OHM]*y_cur[IDX_C4H2II] + - k[4835]*y_cur[IDX_SM]*y_cur[IDX_C4H2II] - - k[4872]*y_cur[IDX_C2I]*y_cur[IDX_C4H2I] + - k[4888]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2I] - - k[4900]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2I] + - k[4947]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHI] + - k[4953]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - - k[4961]*y_cur[IDX_CI]*y_cur[IDX_C4H2I] + - k[5052]*y_cur[IDX_C2H6I]*y_cur[IDX_C4HI] + - k[5057]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] + - k[5058]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - - k[5115]*y_cur[IDX_CNI]*y_cur[IDX_C4H2I] - - k[5515]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] - - k[5518]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - - k[5531]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] - - k[5576]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] - - k[5577]*y_cur[IDX_C4H2I]*y_cur[IDX_C5HII] - - k[5578]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] - - k[5579]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H3II] - - k[5847]*y_cur[IDX_C4H2I] - k[5848]*y_cur[IDX_C4H2I] - - k[5849]*y_cur[IDX_C4H2I] + k[6015]*y_cur[IDX_C4H3I] - - k[6172]*y_cur[IDX_C4H2I] - k[6173]*y_cur[IDX_C4H2I] - - k[6174]*y_cur[IDX_C4H2I] + - k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + - k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] - - k[6998]*y_cur[IDX_C4H2I] + k[7180]*y_cur[IDX_GC4H2I] + - k[7362]*y_cur[IDX_GC4H2I] + k[7544]*y_cur[IDX_GC4H2I] + - k[8630]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] + - k[8725]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI]; - ydot[yistart + IDX_C4H2II] = 0.0 + - k[177]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + - k[224]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + - k[384]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] + - k[493]*y_cur[IDX_C4H2I]*y_cur[IDX_HC3NII] - - k[622]*y_cur[IDX_NOI]*y_cur[IDX_C4H2II] + - k[704]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - - k[822]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] - - k[823]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + - k[1345]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + - k[1347]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + - k[1365]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + - k[1466]*y_cur[IDX_C2HII]*y_cur[IDX_C2H2I] + - k[1471]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + - k[1479]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - - k[1552]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] + - k[1565]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] + - k[1586]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - - k[1633]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] - - k[1634]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + - k[1651]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - - k[1696]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] - - k[1697]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] + - k[1725]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2II] + - k[1727]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - - k[1736]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2II] + - k[1771]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1777]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1788]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H2II] - - k[1824]*y_cur[IDX_C3HI]*y_cur[IDX_C4H2II] + - k[1830]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - - k[1835]*y_cur[IDX_C4H2II]*y_cur[IDX_C5H2I] - - k[1836]*y_cur[IDX_C4H2II]*y_cur[IDX_C5HI] - - k[1837]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - - k[1838]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - - k[1843]*y_cur[IDX_C4HI]*y_cur[IDX_C4H2II] + - k[1858]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] + - k[1859]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] - - k[1863]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] - - k[1864]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] + - k[1893]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - - k[2033]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] - - k[2034]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + - k[2051]*y_cur[IDX_CH3II]*y_cur[IDX_C3HI] - - k[2106]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] - - k[2107]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] + - k[2158]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - - k[2169]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] - - k[2170]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + - k[2176]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + - k[2302]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] + - k[2412]*y_cur[IDX_H2I]*y_cur[IDX_C4HII] - - k[2479]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H2II] + - k[2610]*y_cur[IDX_H3II]*y_cur[IDX_C4HI] + - k[2780]*y_cur[IDX_H3OII]*y_cur[IDX_C4HI] + - k[2869]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + - k[2915]*y_cur[IDX_HCOII]*y_cur[IDX_C4HI] + - k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - - k[3405]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - - k[3406]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - - k[3407]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - - k[3701]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - - k[3702]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - - k[3815]*y_cur[IDX_PI]*y_cur[IDX_C4H2II] - - k[3836]*y_cur[IDX_SI]*y_cur[IDX_C4H2II] - - k[3877]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - - k[3878]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - - k[3889]*y_cur[IDX_CM]*y_cur[IDX_C4H2II] - - k[3924]*y_cur[IDX_C10M]*y_cur[IDX_C4H2II] - - k[3959]*y_cur[IDX_C10HM]*y_cur[IDX_C4H2II] - - k[3994]*y_cur[IDX_C2M]*y_cur[IDX_C4H2II] - - k[4029]*y_cur[IDX_C2HM]*y_cur[IDX_C4H2II] - - k[4064]*y_cur[IDX_C3M]*y_cur[IDX_C4H2II] - - k[4099]*y_cur[IDX_C3HM]*y_cur[IDX_C4H2II] - - k[4134]*y_cur[IDX_C3NM]*y_cur[IDX_C4H2II] - - k[4169]*y_cur[IDX_C4M]*y_cur[IDX_C4H2II] - - k[4204]*y_cur[IDX_C4HM]*y_cur[IDX_C4H2II] - - k[4239]*y_cur[IDX_C5M]*y_cur[IDX_C4H2II] - - k[4274]*y_cur[IDX_C5HM]*y_cur[IDX_C4H2II] - - k[4309]*y_cur[IDX_C5NM]*y_cur[IDX_C4H2II] - - k[4344]*y_cur[IDX_C6M]*y_cur[IDX_C4H2II] - - k[4379]*y_cur[IDX_C6HM]*y_cur[IDX_C4H2II] - - k[4414]*y_cur[IDX_C7M]*y_cur[IDX_C4H2II] - - k[4449]*y_cur[IDX_C7HM]*y_cur[IDX_C4H2II] - - k[4484]*y_cur[IDX_C8M]*y_cur[IDX_C4H2II] - - k[4519]*y_cur[IDX_C8HM]*y_cur[IDX_C4H2II] - - k[4554]*y_cur[IDX_C9M]*y_cur[IDX_C4H2II] - - k[4589]*y_cur[IDX_C9HM]*y_cur[IDX_C4H2II] - - k[4624]*y_cur[IDX_CHM]*y_cur[IDX_C4H2II] - - k[4659]*y_cur[IDX_CNM]*y_cur[IDX_C4H2II] - - k[4694]*y_cur[IDX_HM]*y_cur[IDX_C4H2II] - - k[4730]*y_cur[IDX_OM]*y_cur[IDX_C4H2II] - - k[4765]*y_cur[IDX_O2M]*y_cur[IDX_C4H2II] - - k[4800]*y_cur[IDX_OHM]*y_cur[IDX_C4H2II] - - k[4835]*y_cur[IDX_SM]*y_cur[IDX_C4H2II] - - k[5511]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] - - k[5517]*y_cur[IDX_C4H2II]*y_cur[IDX_HC3NI] - - k[5518]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - - k[5519]*y_cur[IDX_C4H2II]*y_cur[IDX_HC5NI] - - k[5570]*y_cur[IDX_HI]*y_cur[IDX_C4H2II] + k[5848]*y_cur[IDX_C4H2I] + - k[6173]*y_cur[IDX_C4H2I] - - k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] - - k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4H3I] = 0.0 - - k[155]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - - k[339]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] + - k[826]*y_cur[IDX_C4H4II]*y_cur[IDX_eM] - - k[1317]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - - k[1318]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - - k[1319]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + - k[1328]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - - k[2302]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] - - k[2609]*y_cur[IDX_H3II]*y_cur[IDX_C4H3I] - - k[2779]*y_cur[IDX_H3OII]*y_cur[IDX_C4H3I] - - k[2914]*y_cur[IDX_HCOII]*y_cur[IDX_C4H3I] - - k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - - k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - - k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + - k[3890]*y_cur[IDX_CM]*y_cur[IDX_C4H3II] + - k[3925]*y_cur[IDX_C10M]*y_cur[IDX_C4H3II] + - k[3960]*y_cur[IDX_C10HM]*y_cur[IDX_C4H3II] + - k[3995]*y_cur[IDX_C2M]*y_cur[IDX_C4H3II] + - k[4030]*y_cur[IDX_C2HM]*y_cur[IDX_C4H3II] + - k[4065]*y_cur[IDX_C3M]*y_cur[IDX_C4H3II] + - k[4100]*y_cur[IDX_C3HM]*y_cur[IDX_C4H3II] + - k[4135]*y_cur[IDX_C3NM]*y_cur[IDX_C4H3II] + - k[4170]*y_cur[IDX_C4M]*y_cur[IDX_C4H3II] + - k[4205]*y_cur[IDX_C4HM]*y_cur[IDX_C4H3II] + - k[4240]*y_cur[IDX_C5M]*y_cur[IDX_C4H3II] + - k[4275]*y_cur[IDX_C5HM]*y_cur[IDX_C4H3II] + - k[4310]*y_cur[IDX_C5NM]*y_cur[IDX_C4H3II] + - k[4345]*y_cur[IDX_C6M]*y_cur[IDX_C4H3II] + - k[4380]*y_cur[IDX_C6HM]*y_cur[IDX_C4H3II] + - k[4415]*y_cur[IDX_C7M]*y_cur[IDX_C4H3II] + - k[4450]*y_cur[IDX_C7HM]*y_cur[IDX_C4H3II] + - k[4485]*y_cur[IDX_C8M]*y_cur[IDX_C4H3II] + - k[4520]*y_cur[IDX_C8HM]*y_cur[IDX_C4H3II] + - k[4555]*y_cur[IDX_C9M]*y_cur[IDX_C4H3II] + - k[4590]*y_cur[IDX_C9HM]*y_cur[IDX_C4H3II] + - k[4625]*y_cur[IDX_CHM]*y_cur[IDX_C4H3II] + - k[4660]*y_cur[IDX_CNM]*y_cur[IDX_C4H3II] + - k[4695]*y_cur[IDX_HM]*y_cur[IDX_C4H3II] + - k[4731]*y_cur[IDX_OM]*y_cur[IDX_C4H3II] + - k[4766]*y_cur[IDX_O2M]*y_cur[IDX_C4H3II] + - k[4801]*y_cur[IDX_OHM]*y_cur[IDX_C4H3II] + - k[4836]*y_cur[IDX_SM]*y_cur[IDX_C4H3II] + - k[4868]*y_cur[IDX_C2I]*y_cur[IDX_C2H4I] - - k[4924]*y_cur[IDX_CI]*y_cur[IDX_C4H3I] + - k[4946]*y_cur[IDX_CI]*y_cur[IDX_CH2CCH2I] + - k[4952]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] + - k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] - - k[5730]*y_cur[IDX_C4H3I] - k[6014]*y_cur[IDX_C4H3I] - - k[6015]*y_cur[IDX_C4H3I] + - k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM] - - k[7002]*y_cur[IDX_C4H3I] + k[7184]*y_cur[IDX_GC4H3I] + - k[7366]*y_cur[IDX_GC4H3I] + k[7548]*y_cur[IDX_GC4H3I] + - k[8631]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I]; - ydot[yistart + IDX_C4H3II] = 0.0 + - k[155]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + - k[339]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] - - k[824]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] - - k[825]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + - k[1355]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] + - k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1480]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] + - k[1481]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + - k[1535]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H3II] + - k[1621]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - - k[1635]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] - - k[1636]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + - k[1649]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] + - k[1667]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + - k[1672]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] + - k[1694]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] + - k[1728]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + - k[1729]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - - k[1737]*y_cur[IDX_C2HI]*y_cur[IDX_C4H3II] + - k[1772]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1778]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1789]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H3II] - - k[1825]*y_cur[IDX_C3HI]*y_cur[IDX_C4H3II] - - k[1839]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] - - k[1840]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] - - k[1841]*y_cur[IDX_C4H3II]*y_cur[IDX_C5HI] - - k[1844]*y_cur[IDX_C4HI]*y_cur[IDX_C4H3II] + - k[1860]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] + - k[1861]*y_cur[IDX_CI]*y_cur[IDX_C3H5II] - - k[1865]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - - k[1866]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - - k[2035]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] - - k[2036]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + - k[2050]*y_cur[IDX_CH3II]*y_cur[IDX_C3H2I] + - k[2076]*y_cur[IDX_CH3II]*y_cur[IDX_H2CCCI] - - k[2108]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H3II] - - k[2124]*y_cur[IDX_CH3OHI]*y_cur[IDX_C4H3II] + - k[2159]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + - k[2161]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] - - k[2171]*y_cur[IDX_CH4I]*y_cur[IDX_C4H3II] + - k[2173]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2480]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H3II] + - k[2690]*y_cur[IDX_H3II]*y_cur[IDX_C4H2I] + - k[2764]*y_cur[IDX_H3COII]*y_cur[IDX_C4H2I] + - k[2805]*y_cur[IDX_H3OII]*y_cur[IDX_C4H2I] - - k[2850]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] + - k[2965]*y_cur[IDX_HCOII]*y_cur[IDX_C4H2I] - - k[3837]*y_cur[IDX_SI]*y_cur[IDX_C4H3II] - - k[3890]*y_cur[IDX_CM]*y_cur[IDX_C4H3II] - - k[3925]*y_cur[IDX_C10M]*y_cur[IDX_C4H3II] - - k[3960]*y_cur[IDX_C10HM]*y_cur[IDX_C4H3II] - - k[3995]*y_cur[IDX_C2M]*y_cur[IDX_C4H3II] - - k[4030]*y_cur[IDX_C2HM]*y_cur[IDX_C4H3II] - - k[4065]*y_cur[IDX_C3M]*y_cur[IDX_C4H3II] - - k[4100]*y_cur[IDX_C3HM]*y_cur[IDX_C4H3II] - - k[4135]*y_cur[IDX_C3NM]*y_cur[IDX_C4H3II] - - k[4170]*y_cur[IDX_C4M]*y_cur[IDX_C4H3II] - - k[4205]*y_cur[IDX_C4HM]*y_cur[IDX_C4H3II] - - k[4240]*y_cur[IDX_C5M]*y_cur[IDX_C4H3II] - - k[4275]*y_cur[IDX_C5HM]*y_cur[IDX_C4H3II] - - k[4310]*y_cur[IDX_C5NM]*y_cur[IDX_C4H3II] - - k[4345]*y_cur[IDX_C6M]*y_cur[IDX_C4H3II] - - k[4380]*y_cur[IDX_C6HM]*y_cur[IDX_C4H3II] - - k[4415]*y_cur[IDX_C7M]*y_cur[IDX_C4H3II] - - k[4450]*y_cur[IDX_C7HM]*y_cur[IDX_C4H3II] - - k[4485]*y_cur[IDX_C8M]*y_cur[IDX_C4H3II] - - k[4520]*y_cur[IDX_C8HM]*y_cur[IDX_C4H3II] - - k[4555]*y_cur[IDX_C9M]*y_cur[IDX_C4H3II] - - k[4590]*y_cur[IDX_C9HM]*y_cur[IDX_C4H3II] - - k[4625]*y_cur[IDX_CHM]*y_cur[IDX_C4H3II] - - k[4660]*y_cur[IDX_CNM]*y_cur[IDX_C4H3II] - - k[4695]*y_cur[IDX_HM]*y_cur[IDX_C4H3II] - - k[4731]*y_cur[IDX_OM]*y_cur[IDX_C4H3II] - - k[4766]*y_cur[IDX_O2M]*y_cur[IDX_C4H3II] - - k[4801]*y_cur[IDX_OHM]*y_cur[IDX_C4H3II] - - k[4836]*y_cur[IDX_SM]*y_cur[IDX_C4H3II] - - k[5520]*y_cur[IDX_C4H3II]*y_cur[IDX_C2H2I] + - k[5570]*y_cur[IDX_HI]*y_cur[IDX_C4H2II] - - k[5571]*y_cur[IDX_HI]*y_cur[IDX_C4H3II] - - k[5576]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] - - k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] - - k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4H4II] = 0.0 - - k[826]*y_cur[IDX_C4H4II]*y_cur[IDX_eM] - - k[1553]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] - - k[1554]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + - k[1773]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1779]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + - k[1808]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + - k[2609]*y_cur[IDX_H3II]*y_cur[IDX_C4H3I] + - k[2779]*y_cur[IDX_H3OII]*y_cur[IDX_C4H3I] - - k[2851]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H4II] + - k[2914]*y_cur[IDX_HCOII]*y_cur[IDX_C4H3I] + - k[5571]*y_cur[IDX_HI]*y_cur[IDX_C4H3II] - - k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4H5II] = 0.0 - - k[827]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] - - k[828]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] - - k[829]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + - k[1483]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + - k[1537]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] + - k[1539]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] + - k[1669]*y_cur[IDX_C2H4II]*y_cur[IDX_CH3CCHI] + - k[2061]*y_cur[IDX_CH3II]*y_cur[IDX_CH2CCHI] - - k[3408]*y_cur[IDX_NI]*y_cur[IDX_C4H5II] - - k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - - k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - - k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4H6I] = 0.0 + - k[1842]*y_cur[IDX_C4H7II]*y_cur[IDX_CH3CNI] + - k[4883]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H3I] - - k[5024]*y_cur[IDX_C4H6I]*y_cur[IDX_HI] + - k[5072]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - - k[5786]*y_cur[IDX_C4H6I] - k[6087]*y_cur[IDX_C4H6I] - - k[7009]*y_cur[IDX_C4H6I] + k[7191]*y_cur[IDX_GC4H6I] + - k[7373]*y_cur[IDX_GC4H6I] + k[7555]*y_cur[IDX_GC4H6I]; - ydot[yistart + IDX_C4H7II] = 0.0 - - k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] + - k[1564]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + - k[1615]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + - k[1648]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] + - k[1815]*y_cur[IDX_C3H5II]*y_cur[IDX_CH3CHCH2I] + - k[1817]*y_cur[IDX_C3H6II]*y_cur[IDX_CH3CHCH2I] - - k[1842]*y_cur[IDX_C4H7II]*y_cur[IDX_CH3CNI] - - k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4NI] = 0.0 + k[42]*y_cur[IDX_CI]*y_cur[IDX_C3NM] - + k[114]*y_cur[IDX_NI]*y_cur[IDX_C4M] + - k[131]*y_cur[IDX_OI]*y_cur[IDX_C5NM] + - k[5236]*y_cur[IDX_NI]*y_cur[IDX_C4HI] - - k[5237]*y_cur[IDX_NI]*y_cur[IDX_C4NI] + - k[5241]*y_cur[IDX_NI]*y_cur[IDX_C5NI] - - k[5363]*y_cur[IDX_OI]*y_cur[IDX_C4NI] + - k[5367]*y_cur[IDX_OI]*y_cur[IDX_C5NI] - k[5733]*y_cur[IDX_C4NI] - - k[6018]*y_cur[IDX_C4NI] - k[6019]*y_cur[IDX_C4NI] - - k[7030]*y_cur[IDX_C4NI] + k[7212]*y_cur[IDX_GC4NI] + - k[7394]*y_cur[IDX_GC4NI] + k[7576]*y_cur[IDX_GC4NI]; - ydot[yistart + IDX_C4NII] = 0.0 - - k[831]*y_cur[IDX_C4NII]*y_cur[IDX_eM] - - k[832]*y_cur[IDX_C4NII]*y_cur[IDX_eM] + - k[1401]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1555]*y_cur[IDX_C2H2I]*y_cur[IDX_C4NII] - - k[2172]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2173]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2174]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2175]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2413]*y_cur[IDX_H2I]*y_cur[IDX_C4NII] - - k[2532]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] - - k[2533]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] + - k[2868]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + - k[3019]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - - k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] - - k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4PI] = 0.0 - - k[341]*y_cur[IDX_HII]*y_cur[IDX_C4PI] + - k[1194]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - - k[1321]*y_cur[IDX_CII]*y_cur[IDX_C4PI] - - k[2611]*y_cur[IDX_H3II]*y_cur[IDX_C4PI] - - k[2781]*y_cur[IDX_H3OII]*y_cur[IDX_C4PI] - - k[2916]*y_cur[IDX_HCOII]*y_cur[IDX_C4PI] - - k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - - k[3114]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - - k[5364]*y_cur[IDX_OI]*y_cur[IDX_C4PI] - k[5734]*y_cur[IDX_C4PI] - - k[6020]*y_cur[IDX_C4PI] + - k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[7048]*y_cur[IDX_C4PI] + k[7230]*y_cur[IDX_GC4PI] + - k[7412]*y_cur[IDX_GC4PI] + k[7594]*y_cur[IDX_GC4PI]; - ydot[yistart + IDX_C4PII] = 0.0 + - k[341]*y_cur[IDX_HII]*y_cur[IDX_C4PI] - - k[833]*y_cur[IDX_C4PII]*y_cur[IDX_eM] - - k[834]*y_cur[IDX_C4PII]*y_cur[IDX_eM] - - k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] - - k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C4SI] = 0.0 - - k[156]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - - k[342]*y_cur[IDX_HII]*y_cur[IDX_C4SI] + - k[1076]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - - k[1322]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - - k[2612]*y_cur[IDX_H3II]*y_cur[IDX_C4SI] - - k[2782]*y_cur[IDX_H3OII]*y_cur[IDX_C4SI] - - k[2917]*y_cur[IDX_HCOII]*y_cur[IDX_C4SI] - - k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] - - k[3116]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + - k[3891]*y_cur[IDX_CM]*y_cur[IDX_C4SII] + - k[3926]*y_cur[IDX_C10M]*y_cur[IDX_C4SII] + - k[3961]*y_cur[IDX_C10HM]*y_cur[IDX_C4SII] + - k[3996]*y_cur[IDX_C2M]*y_cur[IDX_C4SII] + - k[4031]*y_cur[IDX_C2HM]*y_cur[IDX_C4SII] + - k[4066]*y_cur[IDX_C3M]*y_cur[IDX_C4SII] + - k[4101]*y_cur[IDX_C3HM]*y_cur[IDX_C4SII] + - k[4136]*y_cur[IDX_C3NM]*y_cur[IDX_C4SII] + - k[4171]*y_cur[IDX_C4M]*y_cur[IDX_C4SII] + - k[4206]*y_cur[IDX_C4HM]*y_cur[IDX_C4SII] + - k[4241]*y_cur[IDX_C5M]*y_cur[IDX_C4SII] + - k[4276]*y_cur[IDX_C5HM]*y_cur[IDX_C4SII] + - k[4311]*y_cur[IDX_C5NM]*y_cur[IDX_C4SII] + - k[4346]*y_cur[IDX_C6M]*y_cur[IDX_C4SII] + - k[4381]*y_cur[IDX_C6HM]*y_cur[IDX_C4SII] + - k[4416]*y_cur[IDX_C7M]*y_cur[IDX_C4SII] + - k[4451]*y_cur[IDX_C7HM]*y_cur[IDX_C4SII] + - k[4486]*y_cur[IDX_C8M]*y_cur[IDX_C4SII] + - k[4521]*y_cur[IDX_C8HM]*y_cur[IDX_C4SII] + - k[4556]*y_cur[IDX_C9M]*y_cur[IDX_C4SII] + - k[4591]*y_cur[IDX_C9HM]*y_cur[IDX_C4SII] + - k[4626]*y_cur[IDX_CHM]*y_cur[IDX_C4SII] + - k[4661]*y_cur[IDX_CNM]*y_cur[IDX_C4SII] + - k[4696]*y_cur[IDX_HM]*y_cur[IDX_C4SII] + - k[4732]*y_cur[IDX_OM]*y_cur[IDX_C4SII] + - k[4767]*y_cur[IDX_O2M]*y_cur[IDX_C4SII] + - k[4802]*y_cur[IDX_OHM]*y_cur[IDX_C4SII] + - k[4837]*y_cur[IDX_SM]*y_cur[IDX_C4SII] - k[5735]*y_cur[IDX_C4SI] - - k[6021]*y_cur[IDX_C4SI] + - k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - - k[7049]*y_cur[IDX_C4SI] + k[7231]*y_cur[IDX_GC4SI] + - k[7413]*y_cur[IDX_GC4SI] + k[7595]*y_cur[IDX_GC4SI]; - ydot[yistart + IDX_C4SII] = 0.0 + - k[156]*y_cur[IDX_CII]*y_cur[IDX_C4SI] + - k[342]*y_cur[IDX_HII]*y_cur[IDX_C4SI] - - k[835]*y_cur[IDX_C4SII]*y_cur[IDX_eM] - - k[836]*y_cur[IDX_C4SII]*y_cur[IDX_eM] - - k[837]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + - k[3822]*y_cur[IDX_SII]*y_cur[IDX_C4HI] - - k[3891]*y_cur[IDX_CM]*y_cur[IDX_C4SII] - - k[3926]*y_cur[IDX_C10M]*y_cur[IDX_C4SII] - - k[3961]*y_cur[IDX_C10HM]*y_cur[IDX_C4SII] - - k[3996]*y_cur[IDX_C2M]*y_cur[IDX_C4SII] - - k[4031]*y_cur[IDX_C2HM]*y_cur[IDX_C4SII] - - k[4066]*y_cur[IDX_C3M]*y_cur[IDX_C4SII] - - k[4101]*y_cur[IDX_C3HM]*y_cur[IDX_C4SII] - - k[4136]*y_cur[IDX_C3NM]*y_cur[IDX_C4SII] - - k[4171]*y_cur[IDX_C4M]*y_cur[IDX_C4SII] - - k[4206]*y_cur[IDX_C4HM]*y_cur[IDX_C4SII] - - k[4241]*y_cur[IDX_C5M]*y_cur[IDX_C4SII] - - k[4276]*y_cur[IDX_C5HM]*y_cur[IDX_C4SII] - - k[4311]*y_cur[IDX_C5NM]*y_cur[IDX_C4SII] - - k[4346]*y_cur[IDX_C6M]*y_cur[IDX_C4SII] - - k[4381]*y_cur[IDX_C6HM]*y_cur[IDX_C4SII] - - k[4416]*y_cur[IDX_C7M]*y_cur[IDX_C4SII] - - k[4451]*y_cur[IDX_C7HM]*y_cur[IDX_C4SII] - - k[4486]*y_cur[IDX_C8M]*y_cur[IDX_C4SII] - - k[4521]*y_cur[IDX_C8HM]*y_cur[IDX_C4SII] - - k[4556]*y_cur[IDX_C9M]*y_cur[IDX_C4SII] - - k[4591]*y_cur[IDX_C9HM]*y_cur[IDX_C4SII] - - k[4626]*y_cur[IDX_CHM]*y_cur[IDX_C4SII] - - k[4661]*y_cur[IDX_CNM]*y_cur[IDX_C4SII] - - k[4696]*y_cur[IDX_HM]*y_cur[IDX_C4SII] - - k[4732]*y_cur[IDX_OM]*y_cur[IDX_C4SII] - - k[4767]*y_cur[IDX_O2M]*y_cur[IDX_C4SII] - - k[4802]*y_cur[IDX_OHM]*y_cur[IDX_C4SII] - - k[4837]*y_cur[IDX_SM]*y_cur[IDX_C4SII] - - k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - - k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - - k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C5I] = 0.0 + k[11]*y_cur[IDX_C2M]*y_cur[IDX_C3I] - - k[13]*y_cur[IDX_C2M]*y_cur[IDX_C5I] - - k[19]*y_cur[IDX_C3M]*y_cur[IDX_C5I] - - k[25]*y_cur[IDX_C4M]*y_cur[IDX_C5I] - - k[30]*y_cur[IDX_C5M]*y_cur[IDX_C5I] + - k[37]*y_cur[IDX_CI]*y_cur[IDX_C10M] + - k[43]*y_cur[IDX_CI]*y_cur[IDX_C4M] + - k[236]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - - k[343]*y_cur[IDX_HII]*y_cur[IDX_C5I] + - k[730]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + - k[735]*y_cur[IDX_C11II]*y_cur[IDX_eM] + - k[840]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + - k[841]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + - k[849]*y_cur[IDX_C6II]*y_cur[IDX_eM] + - k[864]*y_cur[IDX_C7II]*y_cur[IDX_eM] - - k[2613]*y_cur[IDX_H3II]*y_cur[IDX_C5I] - - k[2918]*y_cur[IDX_HCOII]*y_cur[IDX_C5I] + - k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3117]*y_cur[IDX_HeII]*y_cur[IDX_C5I] - - k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + - k[3378]*y_cur[IDX_NI]*y_cur[IDX_C10M] + - k[3419]*y_cur[IDX_NI]*y_cur[IDX_C6M] + - k[3436]*y_cur[IDX_NI]*y_cur[IDX_C8M] + - k[4236]*y_cur[IDX_C5M]*y_cur[IDX_CII] + - k[4237]*y_cur[IDX_C5M]*y_cur[IDX_C2H2II] + - k[4238]*y_cur[IDX_C5M]*y_cur[IDX_C2H3II] + - k[4239]*y_cur[IDX_C5M]*y_cur[IDX_C4H2II] + - k[4240]*y_cur[IDX_C5M]*y_cur[IDX_C4H3II] + - k[4241]*y_cur[IDX_C5M]*y_cur[IDX_C4SII] + - k[4242]*y_cur[IDX_C5M]*y_cur[IDX_CH2CCHII] + - k[4243]*y_cur[IDX_C5M]*y_cur[IDX_CH3II] + - k[4244]*y_cur[IDX_C5M]*y_cur[IDX_CNCII] + - k[4245]*y_cur[IDX_C5M]*y_cur[IDX_FeII] + - k[4246]*y_cur[IDX_C5M]*y_cur[IDX_HII] + - k[4247]*y_cur[IDX_C5M]*y_cur[IDX_H2COII] + - k[4248]*y_cur[IDX_C5M]*y_cur[IDX_H2SII] + - k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] + - k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] + - k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] + - k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + - k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + - k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + - k[4255]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + - k[4256]*y_cur[IDX_C5M]*y_cur[IDX_HeII] + - k[4257]*y_cur[IDX_C5M]*y_cur[IDX_MgII] + - k[4258]*y_cur[IDX_C5M]*y_cur[IDX_NII] + - k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] + - k[4260]*y_cur[IDX_C5M]*y_cur[IDX_NH3II] + - k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] + - k[4262]*y_cur[IDX_C5M]*y_cur[IDX_NOII] + - k[4263]*y_cur[IDX_C5M]*y_cur[IDX_NaII] + - k[4264]*y_cur[IDX_C5M]*y_cur[IDX_OII] + - k[4265]*y_cur[IDX_C5M]*y_cur[IDX_SII] + - k[4266]*y_cur[IDX_C5M]*y_cur[IDX_SOII] + - k[4267]*y_cur[IDX_C5M]*y_cur[IDX_SiII] + - k[4268]*y_cur[IDX_C5M]*y_cur[IDX_SiOII] + - k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] + - k[4270]*y_cur[IDX_C5M]*y_cur[IDX_SiSII] + - k[4925]*y_cur[IDX_CI]*y_cur[IDX_C4HI] - - k[4926]*y_cur[IDX_CI]*y_cur[IDX_C5I] + - k[4929]*y_cur[IDX_CI]*y_cur[IDX_C5NI] + - k[4930]*y_cur[IDX_CI]*y_cur[IDX_C6I] + - k[4934]*y_cur[IDX_CI]*y_cur[IDX_C7I] - - k[5238]*y_cur[IDX_NI]*y_cur[IDX_C5I] + - k[5242]*y_cur[IDX_NI]*y_cur[IDX_C6I] - - k[5365]*y_cur[IDX_OI]*y_cur[IDX_C5I] + - k[5368]*y_cur[IDX_OI]*y_cur[IDX_C6I] - - k[5498]*y_cur[IDX_CII]*y_cur[IDX_C5I] - - k[5596]*y_cur[IDX_C5I]*y_cur[IDX_eM] + k[5736]*y_cur[IDX_C5M] - - k[5737]*y_cur[IDX_C5I] - k[5738]*y_cur[IDX_C5I] + - k[5744]*y_cur[IDX_C5HI] + k[5748]*y_cur[IDX_C6I] + - k[5963]*y_cur[IDX_C10HI] + k[5963]*y_cur[IDX_C10HI] + - k[5964]*y_cur[IDX_C10HI] + k[5970]*y_cur[IDX_C11I] + - k[5971]*y_cur[IDX_C11I] + k[6022]*y_cur[IDX_C5M] - - k[6023]*y_cur[IDX_C5I] + k[6029]*y_cur[IDX_C5HI] + - k[6033]*y_cur[IDX_C6I] + k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] - + k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + - k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + - k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + - k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + - k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7024]*y_cur[IDX_C5I] - + k[7206]*y_cur[IDX_GC5I] + k[7388]*y_cur[IDX_GC5I] + - k[7572]*y_cur[IDX_GC5I] + k[8671]*y_cur[IDX_GCI]*y_cur[IDX_GC4I]; - ydot[yistart + IDX_C5II] = 0.0 - - k[236]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + - k[343]*y_cur[IDX_HII]*y_cur[IDX_C5I] - - k[838]*y_cur[IDX_C5II]*y_cur[IDX_eM] + - k[1320]*y_cur[IDX_CII]*y_cur[IDX_C4HI] + - k[1321]*y_cur[IDX_CII]*y_cur[IDX_C4PI] + - k[1322]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - - k[1556]*y_cur[IDX_C2H2I]*y_cur[IDX_C5II] - - k[1698]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - - k[1699]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - - k[1700]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + - k[1862]*y_cur[IDX_CI]*y_cur[IDX_C4HII] + - k[1863]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] - - k[2176]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - - k[2177]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - - k[2178]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - - k[2179]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + - k[2305]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - - k[2414]*y_cur[IDX_H2I]*y_cur[IDX_C5II] - - k[2871]*y_cur[IDX_HCNI]*y_cur[IDX_C5II] + - k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + - k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + - k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + - k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + - k[5497]*y_cur[IDX_CII]*y_cur[IDX_C4I] - - k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C5M] = 0.0 - k[27]*y_cur[IDX_C5M]*y_cur[IDX_C2I] - - k[28]*y_cur[IDX_C5M]*y_cur[IDX_C3I] - - k[29]*y_cur[IDX_C5M]*y_cur[IDX_C4I] - - k[30]*y_cur[IDX_C5M]*y_cur[IDX_C5I] - - k[45]*y_cur[IDX_CI]*y_cur[IDX_C5M] - - k[94]*y_cur[IDX_HI]*y_cur[IDX_C5M] - - k[116]*y_cur[IDX_NI]*y_cur[IDX_C5M] - - k[3409]*y_cur[IDX_NI]*y_cur[IDX_C5M] - - k[3410]*y_cur[IDX_NI]*y_cur[IDX_C5M] - - k[3411]*y_cur[IDX_NI]*y_cur[IDX_C5M] + - k[3420]*y_cur[IDX_NI]*y_cur[IDX_C6M] - - k[3703]*y_cur[IDX_OI]*y_cur[IDX_C5M] + - k[3708]*y_cur[IDX_OI]*y_cur[IDX_C6M] - - k[4236]*y_cur[IDX_C5M]*y_cur[IDX_CII] - - k[4237]*y_cur[IDX_C5M]*y_cur[IDX_C2H2II] - - k[4238]*y_cur[IDX_C5M]*y_cur[IDX_C2H3II] - - k[4239]*y_cur[IDX_C5M]*y_cur[IDX_C4H2II] - - k[4240]*y_cur[IDX_C5M]*y_cur[IDX_C4H3II] - - k[4241]*y_cur[IDX_C5M]*y_cur[IDX_C4SII] - - k[4242]*y_cur[IDX_C5M]*y_cur[IDX_CH2CCHII] - - k[4243]*y_cur[IDX_C5M]*y_cur[IDX_CH3II] - - k[4244]*y_cur[IDX_C5M]*y_cur[IDX_CNCII] - - k[4245]*y_cur[IDX_C5M]*y_cur[IDX_FeII] - - k[4246]*y_cur[IDX_C5M]*y_cur[IDX_HII] - - k[4247]*y_cur[IDX_C5M]*y_cur[IDX_H2COII] - - k[4248]*y_cur[IDX_C5M]*y_cur[IDX_H2SII] - - k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] - - k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] - - k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] - - k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] - - k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] - - k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] - - k[4255]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] - - k[4256]*y_cur[IDX_C5M]*y_cur[IDX_HeII] - - k[4257]*y_cur[IDX_C5M]*y_cur[IDX_MgII] - - k[4258]*y_cur[IDX_C5M]*y_cur[IDX_NII] - - k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] - - k[4260]*y_cur[IDX_C5M]*y_cur[IDX_NH3II] - - k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] - - k[4262]*y_cur[IDX_C5M]*y_cur[IDX_NOII] - - k[4263]*y_cur[IDX_C5M]*y_cur[IDX_NaII] - - k[4264]*y_cur[IDX_C5M]*y_cur[IDX_OII] - - k[4265]*y_cur[IDX_C5M]*y_cur[IDX_SII] - - k[4266]*y_cur[IDX_C5M]*y_cur[IDX_SOII] - - k[4267]*y_cur[IDX_C5M]*y_cur[IDX_SiII] - - k[4268]*y_cur[IDX_C5M]*y_cur[IDX_SiOII] - - k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] - - k[4270]*y_cur[IDX_C5M]*y_cur[IDX_SiSII] + - k[5596]*y_cur[IDX_C5I]*y_cur[IDX_eM] - k[5736]*y_cur[IDX_C5M] - - k[6022]*y_cur[IDX_C5M]; - ydot[yistart + IDX_C5HI] = 0.0 + k[44]*y_cur[IDX_CI]*y_cur[IDX_C4HM] - + k[94]*y_cur[IDX_HI]*y_cur[IDX_C5M] - - k[345]*y_cur[IDX_HII]*y_cur[IDX_C5HI] + - k[730]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + - k[842]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + - k[844]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + - k[850]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + - k[930]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] - - k[1325]*y_cur[IDX_CII]*y_cur[IDX_C5HI] - - k[1493]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - - k[1494]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - - k[1592]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - - k[1593]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - - k[1594]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - - k[1657]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - - k[1658]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - - k[1765]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] - - k[1766]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] - - k[1800]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] - - k[1801]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] - - k[1833]*y_cur[IDX_C4HII]*y_cur[IDX_C5HI] - - k[1836]*y_cur[IDX_C4H2II]*y_cur[IDX_C5HI] - - k[1841]*y_cur[IDX_C4H3II]*y_cur[IDX_C5HI] - - k[2024]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] - - k[2025]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] - - k[2054]*y_cur[IDX_CH3II]*y_cur[IDX_C5HI] - - k[2305]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - - k[2615]*y_cur[IDX_H3II]*y_cur[IDX_C5HI] - - k[2920]*y_cur[IDX_HCOII]*y_cur[IDX_C5HI] + - k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] - - k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + - k[3422]*y_cur[IDX_NI]*y_cur[IDX_C6HM] + - k[3440]*y_cur[IDX_NI]*y_cur[IDX_C8HM] + - k[3710]*y_cur[IDX_OI]*y_cur[IDX_C6H2II] + - k[4271]*y_cur[IDX_C5HM]*y_cur[IDX_CII] + - k[4272]*y_cur[IDX_C5HM]*y_cur[IDX_C2H2II] + - k[4273]*y_cur[IDX_C5HM]*y_cur[IDX_C2H3II] + - k[4274]*y_cur[IDX_C5HM]*y_cur[IDX_C4H2II] + - k[4275]*y_cur[IDX_C5HM]*y_cur[IDX_C4H3II] + - k[4276]*y_cur[IDX_C5HM]*y_cur[IDX_C4SII] + - k[4277]*y_cur[IDX_C5HM]*y_cur[IDX_CH2CCHII] + - k[4278]*y_cur[IDX_C5HM]*y_cur[IDX_CH3II] + - k[4279]*y_cur[IDX_C5HM]*y_cur[IDX_CNCII] + - k[4280]*y_cur[IDX_C5HM]*y_cur[IDX_FeII] + - k[4281]*y_cur[IDX_C5HM]*y_cur[IDX_HII] + - k[4282]*y_cur[IDX_C5HM]*y_cur[IDX_H2COII] + - k[4283]*y_cur[IDX_C5HM]*y_cur[IDX_H2SII] + - k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] + - k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] + - k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] + - k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + - k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + - k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + - k[4290]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + - k[4291]*y_cur[IDX_C5HM]*y_cur[IDX_HeII] + - k[4292]*y_cur[IDX_C5HM]*y_cur[IDX_MgII] + - k[4293]*y_cur[IDX_C5HM]*y_cur[IDX_NII] + - k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] + - k[4295]*y_cur[IDX_C5HM]*y_cur[IDX_NH3II] + - k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] + - k[4297]*y_cur[IDX_C5HM]*y_cur[IDX_NOII] + - k[4298]*y_cur[IDX_C5HM]*y_cur[IDX_NaII] + - k[4299]*y_cur[IDX_C5HM]*y_cur[IDX_OII] + - k[4300]*y_cur[IDX_C5HM]*y_cur[IDX_SII] + - k[4301]*y_cur[IDX_C5HM]*y_cur[IDX_SOII] + - k[4302]*y_cur[IDX_C5HM]*y_cur[IDX_SiII] + - k[4303]*y_cur[IDX_C5HM]*y_cur[IDX_SiOII] + - k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] + - k[4305]*y_cur[IDX_C5HM]*y_cur[IDX_SiSII] + - k[4909]*y_cur[IDX_CI]*y_cur[IDX_C10H2I] - - k[4928]*y_cur[IDX_CI]*y_cur[IDX_C5HI] + - k[4961]*y_cur[IDX_CI]*y_cur[IDX_C4H2I] - - k[5240]*y_cur[IDX_NI]*y_cur[IDX_C5HI] + - k[5243]*y_cur[IDX_NI]*y_cur[IDX_C6HI] - - k[5366]*y_cur[IDX_OI]*y_cur[IDX_C5HI] + - k[5369]*y_cur[IDX_OI]*y_cur[IDX_C6HI] - - k[5597]*y_cur[IDX_C5HI]*y_cur[IDX_eM] + k[5739]*y_cur[IDX_C5HM] + - k[5741]*y_cur[IDX_C5H2I] - k[5742]*y_cur[IDX_C5HI] - - k[5743]*y_cur[IDX_C5HI] - k[5744]*y_cur[IDX_C5HI] + - k[5964]*y_cur[IDX_C10HI] + k[6024]*y_cur[IDX_C5HM] + - k[6026]*y_cur[IDX_C5H2I] - k[6027]*y_cur[IDX_C5HI] - - k[6028]*y_cur[IDX_C5HI] - k[6029]*y_cur[IDX_C5HI] + - k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + - k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + - k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + - k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + - k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - - k[7028]*y_cur[IDX_C5HI] + k[7210]*y_cur[IDX_GC5HI] + - k[7392]*y_cur[IDX_GC5HI] + k[7574]*y_cur[IDX_GC5HI] + - k[8636]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] + - k[8672]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] + - k[8726]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I]; - ydot[yistart + IDX_C5HII] = 0.0 + - k[345]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - - k[839]*y_cur[IDX_C5HII]*y_cur[IDX_eM] - - k[840]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + - k[1318]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + - k[1403]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + - k[1404]*y_cur[IDX_CII]*y_cur[IDX_HC5NI] + - k[1487]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] + - k[1543]*y_cur[IDX_C2H2I]*y_cur[IDX_C3II] + - k[1555]*y_cur[IDX_C2H2I]*y_cur[IDX_C4NII] + - k[1752]*y_cur[IDX_C3II]*y_cur[IDX_HC3NI] + - k[1754]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] + - k[1864]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] + - k[1865]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - - k[1867]*y_cur[IDX_CI]*y_cur[IDX_C5HII] + - k[2177]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + - k[2304]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] + - k[2414]*y_cur[IDX_H2I]*y_cur[IDX_C5II] - - k[2415]*y_cur[IDX_H2I]*y_cur[IDX_C5HII] + - k[2613]*y_cur[IDX_H3II]*y_cur[IDX_C5I] + - k[2871]*y_cur[IDX_HCNI]*y_cur[IDX_C5II] + - k[2918]*y_cur[IDX_HCOII]*y_cur[IDX_C5I] + - k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3121]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + - k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] - - k[3412]*y_cur[IDX_NI]*y_cur[IDX_C5HII] + - k[3423]*y_cur[IDX_NI]*y_cur[IDX_C6H2II] - - k[3704]*y_cur[IDX_OI]*y_cur[IDX_C5HII] - - k[5577]*y_cur[IDX_C4H2I]*y_cur[IDX_C5HII] - - k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] - - k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C5HM] = 0.0 - k[46]*y_cur[IDX_CI]*y_cur[IDX_C5HM] - - k[95]*y_cur[IDX_HI]*y_cur[IDX_C5HM] - - k[117]*y_cur[IDX_NI]*y_cur[IDX_C5HM] + - k[1847]*y_cur[IDX_CI]*y_cur[IDX_C10HM] - - k[3413]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - - k[3414]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - - k[3705]*y_cur[IDX_OI]*y_cur[IDX_C5HM] + - k[3709]*y_cur[IDX_OI]*y_cur[IDX_C6HM] - - k[4271]*y_cur[IDX_C5HM]*y_cur[IDX_CII] - - k[4272]*y_cur[IDX_C5HM]*y_cur[IDX_C2H2II] - - k[4273]*y_cur[IDX_C5HM]*y_cur[IDX_C2H3II] - - k[4274]*y_cur[IDX_C5HM]*y_cur[IDX_C4H2II] - - k[4275]*y_cur[IDX_C5HM]*y_cur[IDX_C4H3II] - - k[4276]*y_cur[IDX_C5HM]*y_cur[IDX_C4SII] - - k[4277]*y_cur[IDX_C5HM]*y_cur[IDX_CH2CCHII] - - k[4278]*y_cur[IDX_C5HM]*y_cur[IDX_CH3II] - - k[4279]*y_cur[IDX_C5HM]*y_cur[IDX_CNCII] - - k[4280]*y_cur[IDX_C5HM]*y_cur[IDX_FeII] - - k[4281]*y_cur[IDX_C5HM]*y_cur[IDX_HII] - - k[4282]*y_cur[IDX_C5HM]*y_cur[IDX_H2COII] - - k[4283]*y_cur[IDX_C5HM]*y_cur[IDX_H2SII] - - k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] - - k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] - - k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] - - k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] - - k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] - - k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] - - k[4290]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] - - k[4291]*y_cur[IDX_C5HM]*y_cur[IDX_HeII] - - k[4292]*y_cur[IDX_C5HM]*y_cur[IDX_MgII] - - k[4293]*y_cur[IDX_C5HM]*y_cur[IDX_NII] - - k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] - - k[4295]*y_cur[IDX_C5HM]*y_cur[IDX_NH3II] - - k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] - - k[4297]*y_cur[IDX_C5HM]*y_cur[IDX_NOII] - - k[4298]*y_cur[IDX_C5HM]*y_cur[IDX_NaII] - - k[4299]*y_cur[IDX_C5HM]*y_cur[IDX_OII] - - k[4300]*y_cur[IDX_C5HM]*y_cur[IDX_SII] - - k[4301]*y_cur[IDX_C5HM]*y_cur[IDX_SOII] - - k[4302]*y_cur[IDX_C5HM]*y_cur[IDX_SiII] - - k[4303]*y_cur[IDX_C5HM]*y_cur[IDX_SiOII] - - k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] - - k[4305]*y_cur[IDX_C5HM]*y_cur[IDX_SiSII] + - k[5597]*y_cur[IDX_C5HI]*y_cur[IDX_eM] - k[5739]*y_cur[IDX_C5HM] - - k[6024]*y_cur[IDX_C5HM]; - ydot[yistart + IDX_C5H2I] = 0.0 + - k[95]*y_cur[IDX_HI]*y_cur[IDX_C5HM] - - k[216]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - - k[344]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] + - k[843]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + - k[845]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + - k[929]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] - - k[1323]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] - - k[1324]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] - - k[1491]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - - k[1492]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - - k[1589]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - - k[1590]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - - k[1591]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - - k[1655]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] - - k[1656]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] - - k[1763]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] - - k[1764]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] - - k[1798]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] - - k[1799]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] - - k[1832]*y_cur[IDX_C4HII]*y_cur[IDX_C5H2I] - - k[1835]*y_cur[IDX_C4H2II]*y_cur[IDX_C5H2I] - - k[1839]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] - - k[1840]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] - - k[2022]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] - - k[2023]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] - - k[2053]*y_cur[IDX_CH3II]*y_cur[IDX_C5H2I] - - k[2304]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] - - k[2614]*y_cur[IDX_H3II]*y_cur[IDX_C5H2I] - - k[2919]*y_cur[IDX_HCOII]*y_cur[IDX_C5H2I] - - k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - - k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - - k[3121]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + - k[3711]*y_cur[IDX_OI]*y_cur[IDX_C6H3II] + - k[4889]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2I] - - k[4890]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2I] + - k[4924]*y_cur[IDX_CI]*y_cur[IDX_C4H3I] - - k[4927]*y_cur[IDX_CI]*y_cur[IDX_C5H2I] - - k[5239]*y_cur[IDX_NI]*y_cur[IDX_C5H2I] - k[5740]*y_cur[IDX_C5H2I] - - k[5741]*y_cur[IDX_C5H2I] - k[6025]*y_cur[IDX_C5H2I] - - k[6026]*y_cur[IDX_C5H2I] + - k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + - k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + - k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - - k[7029]*y_cur[IDX_C5H2I] + k[7211]*y_cur[IDX_GC5H2I] + - k[7393]*y_cur[IDX_GC5H2I] + k[7575]*y_cur[IDX_GC5H2I] + - k[8637]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] + - k[8727]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI]; - ydot[yistart + IDX_C5H2II] = 0.0 + - k[216]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + - k[344]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] - - k[841]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] - - k[842]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + - k[1319]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + - k[1485]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] + - k[1488]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] + - k[1516]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] + - k[1544]*y_cur[IDX_C2H2I]*y_cur[IDX_C3HII] + - k[1557]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] + - k[1584]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + - k[1592]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - - k[1637]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] - - k[1638]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + - k[1653]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] + - k[1687]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + - k[1698]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - - k[1701]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] - - k[1702]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + - k[1731]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2II] + - k[1732]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - - k[1738]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2II] + - k[1741]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] + - k[1755]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - - k[1790]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] - - k[1791]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] - - k[1826]*y_cur[IDX_C3HI]*y_cur[IDX_C5H2II] - - k[1845]*y_cur[IDX_C4HI]*y_cur[IDX_C5H2II] + - k[1866]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - - k[1868]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - - k[1869]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - - k[2037]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] - - k[2038]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + - k[2052]*y_cur[IDX_CH3II]*y_cur[IDX_C4HI] - - k[2109]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C5H2II] + - k[2166]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - - k[2180]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] - - k[2181]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + - k[2182]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + - k[2415]*y_cur[IDX_H2I]*y_cur[IDX_C5HII] - - k[2481]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] - - k[2482]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + - k[2615]*y_cur[IDX_H3II]*y_cur[IDX_C5HI] - - k[2852]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] + - k[2920]*y_cur[IDX_HCOII]*y_cur[IDX_C5HI] + - k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - - k[3415]*y_cur[IDX_NI]*y_cur[IDX_C5H2II] - - k[3706]*y_cur[IDX_OI]*y_cur[IDX_C5H2II] - - k[5578]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] - - k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] - - k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C5H3II] = 0.0 - - k[843]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] - - k[844]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + - k[1329]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + - k[1356]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + - k[1486]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] + - k[1507]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + - k[1517]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] + - k[1545]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H2II] + - k[1546]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H3II] + - k[1581]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + - k[1585]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + - k[1589]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + - k[1616]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + - k[1629]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + - k[1677]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] + - k[1688]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + - k[1689]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] + - k[1733]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] + - k[1742]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] + - k[1774]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1780]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + - k[1807]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] - - k[1870]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] - - k[1871]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] + - k[2031]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] + - k[2080]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + - k[2167]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + - k[2168]*y_cur[IDX_CH4I]*y_cur[IDX_C4HII] + - k[2321]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] + - k[2614]*y_cur[IDX_H3II]*y_cur[IDX_C5H2I] + - k[2919]*y_cur[IDX_HCOII]*y_cur[IDX_C5H2I] + - k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - - k[3416]*y_cur[IDX_NI]*y_cur[IDX_C5H3II] - - k[3707]*y_cur[IDX_OI]*y_cur[IDX_C5H3II] - - k[5579]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H3II] - - k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] - - k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C5H5II] = 0.0 - - k[845]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] - - k[846]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + - k[1509]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + - k[1547]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H4II] + - k[1548]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H5II] + - k[1609]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + - k[1612]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] + - k[1650]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] + - k[1668]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + - k[1673]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] + - k[1692]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] + - k[1693]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H3II] + - k[1706]*y_cur[IDX_C2H4I]*y_cur[IDX_CH2CCHII] + - k[2169]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + - k[2171]*y_cur[IDX_CH4I]*y_cur[IDX_C4H3II] + - k[2643]*y_cur[IDX_H3II]*y_cur[IDX_CH3C4HI] + - k[2944]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C4HI] + - k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - - k[3417]*y_cur[IDX_NI]*y_cur[IDX_C5H5II] - - k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - - k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C5NI] = 0.0 + k[116]*y_cur[IDX_NI]*y_cur[IDX_C5M] - + k[876]*y_cur[IDX_C7NII]*y_cur[IDX_eM] + - k[1028]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + - k[1078]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + - k[1079]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - - k[2616]*y_cur[IDX_H3II]*y_cur[IDX_C5NI] - - k[2921]*y_cur[IDX_HCOII]*y_cur[IDX_C5NI] - - k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] + - k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] + - k[4306]*y_cur[IDX_C5NM]*y_cur[IDX_CII] + - k[4307]*y_cur[IDX_C5NM]*y_cur[IDX_C2H2II] + - k[4308]*y_cur[IDX_C5NM]*y_cur[IDX_C2H3II] + - k[4309]*y_cur[IDX_C5NM]*y_cur[IDX_C4H2II] + - k[4310]*y_cur[IDX_C5NM]*y_cur[IDX_C4H3II] + - k[4311]*y_cur[IDX_C5NM]*y_cur[IDX_C4SII] + - k[4312]*y_cur[IDX_C5NM]*y_cur[IDX_CH2CCHII] + - k[4313]*y_cur[IDX_C5NM]*y_cur[IDX_CH3II] + - k[4314]*y_cur[IDX_C5NM]*y_cur[IDX_CNCII] + - k[4315]*y_cur[IDX_C5NM]*y_cur[IDX_FeII] + - k[4316]*y_cur[IDX_C5NM]*y_cur[IDX_HII] + - k[4317]*y_cur[IDX_C5NM]*y_cur[IDX_H2COII] + - k[4318]*y_cur[IDX_C5NM]*y_cur[IDX_H2SII] + - k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] + - k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] + - k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] + - k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + - k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + - k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + - k[4325]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + - k[4326]*y_cur[IDX_C5NM]*y_cur[IDX_HeII] + - k[4327]*y_cur[IDX_C5NM]*y_cur[IDX_MgII] + - k[4328]*y_cur[IDX_C5NM]*y_cur[IDX_NII] + - k[4329]*y_cur[IDX_C5NM]*y_cur[IDX_N2HII] + - k[4330]*y_cur[IDX_C5NM]*y_cur[IDX_NH3II] + - k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] + - k[4332]*y_cur[IDX_C5NM]*y_cur[IDX_NOII] + - k[4333]*y_cur[IDX_C5NM]*y_cur[IDX_NaII] + - k[4334]*y_cur[IDX_C5NM]*y_cur[IDX_OII] + - k[4335]*y_cur[IDX_C5NM]*y_cur[IDX_SII] + - k[4336]*y_cur[IDX_C5NM]*y_cur[IDX_SOII] + - k[4337]*y_cur[IDX_C5NM]*y_cur[IDX_SiII] + - k[4338]*y_cur[IDX_C5NM]*y_cur[IDX_SiOII] + - k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] + - k[4340]*y_cur[IDX_C5NM]*y_cur[IDX_SiSII] - - k[4929]*y_cur[IDX_CI]*y_cur[IDX_C5NI] + - k[5240]*y_cur[IDX_NI]*y_cur[IDX_C5HI] - - k[5241]*y_cur[IDX_NI]*y_cur[IDX_C5NI] + - k[5247]*y_cur[IDX_NI]*y_cur[IDX_C7NI] - - k[5367]*y_cur[IDX_OI]*y_cur[IDX_C5NI] - - k[5598]*y_cur[IDX_C5NI]*y_cur[IDX_eM] + k[5745]*y_cur[IDX_C5NM] - - k[5746]*y_cur[IDX_C5NI] + k[5798]*y_cur[IDX_CH3C5NI] + - k[5851]*y_cur[IDX_HC5NI] + k[6030]*y_cur[IDX_C5NM] - - k[6031]*y_cur[IDX_C5NI] + k[6102]*y_cur[IDX_CH3C5NI] + - k[6176]*y_cur[IDX_HC5NI] + - k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + - k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + - k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM] - k[7044]*y_cur[IDX_C5NI] - + k[7226]*y_cur[IDX_GC5NI] + k[7408]*y_cur[IDX_GC5NI] + - k[7590]*y_cur[IDX_GC5NI] + k[8707]*y_cur[IDX_GNI]*y_cur[IDX_GC5I]; - ydot[yistart + IDX_C5NII] = 0.0 - - k[847]*y_cur[IDX_C5NII]*y_cur[IDX_eM] - - k[2416]*y_cur[IDX_H2I]*y_cur[IDX_C5NII] + - k[3412]*y_cur[IDX_NI]*y_cur[IDX_C5HII] - - k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C5NM] = 0.0 - k[96]*y_cur[IDX_HI]*y_cur[IDX_C5NM] - - k[131]*y_cur[IDX_OI]*y_cur[IDX_C5NM] + - k[3378]*y_cur[IDX_NI]*y_cur[IDX_C10M] + - k[3426]*y_cur[IDX_NI]*y_cur[IDX_C7M] + - k[3437]*y_cur[IDX_NI]*y_cur[IDX_C8M] + - k[3443]*y_cur[IDX_NI]*y_cur[IDX_C9M] - - k[4306]*y_cur[IDX_C5NM]*y_cur[IDX_CII] - - k[4307]*y_cur[IDX_C5NM]*y_cur[IDX_C2H2II] - - k[4308]*y_cur[IDX_C5NM]*y_cur[IDX_C2H3II] - - k[4309]*y_cur[IDX_C5NM]*y_cur[IDX_C4H2II] - - k[4310]*y_cur[IDX_C5NM]*y_cur[IDX_C4H3II] - - k[4311]*y_cur[IDX_C5NM]*y_cur[IDX_C4SII] - - k[4312]*y_cur[IDX_C5NM]*y_cur[IDX_CH2CCHII] - - k[4313]*y_cur[IDX_C5NM]*y_cur[IDX_CH3II] - - k[4314]*y_cur[IDX_C5NM]*y_cur[IDX_CNCII] - - k[4315]*y_cur[IDX_C5NM]*y_cur[IDX_FeII] - - k[4316]*y_cur[IDX_C5NM]*y_cur[IDX_HII] - - k[4317]*y_cur[IDX_C5NM]*y_cur[IDX_H2COII] - - k[4318]*y_cur[IDX_C5NM]*y_cur[IDX_H2SII] - - k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] - - k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] - - k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] - - k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] - - k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] - - k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] - - k[4325]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] - - k[4326]*y_cur[IDX_C5NM]*y_cur[IDX_HeII] - - k[4327]*y_cur[IDX_C5NM]*y_cur[IDX_MgII] - - k[4328]*y_cur[IDX_C5NM]*y_cur[IDX_NII] - - k[4329]*y_cur[IDX_C5NM]*y_cur[IDX_N2HII] - - k[4330]*y_cur[IDX_C5NM]*y_cur[IDX_NH3II] - - k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] - - k[4332]*y_cur[IDX_C5NM]*y_cur[IDX_NOII] - - k[4333]*y_cur[IDX_C5NM]*y_cur[IDX_NaII] - - k[4334]*y_cur[IDX_C5NM]*y_cur[IDX_OII] - - k[4335]*y_cur[IDX_C5NM]*y_cur[IDX_SII] - - k[4336]*y_cur[IDX_C5NM]*y_cur[IDX_SOII] - - k[4337]*y_cur[IDX_C5NM]*y_cur[IDX_SiII] - - k[4338]*y_cur[IDX_C5NM]*y_cur[IDX_SiOII] - - k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] - - k[4340]*y_cur[IDX_C5NM]*y_cur[IDX_SiSII] + - k[5598]*y_cur[IDX_C5NI]*y_cur[IDX_eM] - k[5745]*y_cur[IDX_C5NM] - - k[6030]*y_cur[IDX_C5NM]; - ydot[yistart + IDX_C6I] = 0.0 + k[12]*y_cur[IDX_C2M]*y_cur[IDX_C4I] - - k[14]*y_cur[IDX_C2M]*y_cur[IDX_C6I] + - k[17]*y_cur[IDX_C3M]*y_cur[IDX_C3I] - - k[20]*y_cur[IDX_C3M]*y_cur[IDX_C6I] + - k[22]*y_cur[IDX_C4M]*y_cur[IDX_C2I] - - k[26]*y_cur[IDX_C4M]*y_cur[IDX_C6I] + - k[37]*y_cur[IDX_CI]*y_cur[IDX_C10M] + - k[45]*y_cur[IDX_CI]*y_cur[IDX_C5M] - - k[346]*y_cur[IDX_HII]*y_cur[IDX_C6I] + - k[735]*y_cur[IDX_C11II]*y_cur[IDX_eM] + - k[851]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + - k[852]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + - k[865]*y_cur[IDX_C7II]*y_cur[IDX_eM] + - k[877]*y_cur[IDX_C8II]*y_cur[IDX_eM] + - k[1847]*y_cur[IDX_CI]*y_cur[IDX_C10HM] - - k[2617]*y_cur[IDX_H3II]*y_cur[IDX_C6I] - - k[2922]*y_cur[IDX_HCOII]*y_cur[IDX_C6I] - - k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] - - k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + - k[3427]*y_cur[IDX_NI]*y_cur[IDX_C7M] + - k[3442]*y_cur[IDX_NI]*y_cur[IDX_C9M] + - k[3713]*y_cur[IDX_OI]*y_cur[IDX_C7HII] + - k[4341]*y_cur[IDX_C6M]*y_cur[IDX_CII] + - k[4342]*y_cur[IDX_C6M]*y_cur[IDX_C2H2II] + - k[4343]*y_cur[IDX_C6M]*y_cur[IDX_C2H3II] + - k[4344]*y_cur[IDX_C6M]*y_cur[IDX_C4H2II] + - k[4345]*y_cur[IDX_C6M]*y_cur[IDX_C4H3II] + - k[4346]*y_cur[IDX_C6M]*y_cur[IDX_C4SII] + - k[4347]*y_cur[IDX_C6M]*y_cur[IDX_CH2CCHII] + - k[4348]*y_cur[IDX_C6M]*y_cur[IDX_CH3II] + - k[4349]*y_cur[IDX_C6M]*y_cur[IDX_CNCII] + - k[4350]*y_cur[IDX_C6M]*y_cur[IDX_FeII] + - k[4351]*y_cur[IDX_C6M]*y_cur[IDX_HII] + - k[4352]*y_cur[IDX_C6M]*y_cur[IDX_H2COII] + - k[4353]*y_cur[IDX_C6M]*y_cur[IDX_H2SII] + - k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] + - k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] + - k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] + - k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + - k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + - k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + - k[4360]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + - k[4361]*y_cur[IDX_C6M]*y_cur[IDX_HeII] + - k[4362]*y_cur[IDX_C6M]*y_cur[IDX_MgII] + - k[4363]*y_cur[IDX_C6M]*y_cur[IDX_NII] + - k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] + - k[4365]*y_cur[IDX_C6M]*y_cur[IDX_NH3II] + - k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] + - k[4367]*y_cur[IDX_C6M]*y_cur[IDX_NOII] + - k[4368]*y_cur[IDX_C6M]*y_cur[IDX_NaII] + - k[4369]*y_cur[IDX_C6M]*y_cur[IDX_OII] + - k[4370]*y_cur[IDX_C6M]*y_cur[IDX_SII] + - k[4371]*y_cur[IDX_C6M]*y_cur[IDX_SOII] + - k[4372]*y_cur[IDX_C6M]*y_cur[IDX_SiII] + - k[4373]*y_cur[IDX_C6M]*y_cur[IDX_SiOII] + - k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] + - k[4375]*y_cur[IDX_C6M]*y_cur[IDX_SiSII] + - k[4928]*y_cur[IDX_CI]*y_cur[IDX_C5HI] - - k[4930]*y_cur[IDX_CI]*y_cur[IDX_C6I] - - k[4931]*y_cur[IDX_CI]*y_cur[IDX_C6I] - - k[5242]*y_cur[IDX_NI]*y_cur[IDX_C6I] + - k[5244]*y_cur[IDX_NI]*y_cur[IDX_C7I] - - k[5368]*y_cur[IDX_OI]*y_cur[IDX_C6I] + - k[5370]*y_cur[IDX_OI]*y_cur[IDX_C7I] + - k[5372]*y_cur[IDX_OI]*y_cur[IDX_C7NI] - - k[5499]*y_cur[IDX_CII]*y_cur[IDX_C6I] - - k[5599]*y_cur[IDX_C6I]*y_cur[IDX_eM] + k[5747]*y_cur[IDX_C6M] - - k[5748]*y_cur[IDX_C6I] + k[5754]*y_cur[IDX_C6HI] + - k[5756]*y_cur[IDX_C7I] + k[5760]*y_cur[IDX_C7NI] + - k[5951]*y_cur[IDX_C10I] + k[5952]*y_cur[IDX_C10I] + - k[5971]*y_cur[IDX_C11I] + k[6032]*y_cur[IDX_C6M] - - k[6033]*y_cur[IDX_C6I] - k[6034]*y_cur[IDX_C6I] + - k[6042]*y_cur[IDX_C7I] + k[6049]*y_cur[IDX_C7NI] + - k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + - k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + - k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + - k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + - k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7041]*y_cur[IDX_C6I] - + k[7223]*y_cur[IDX_GC6I] + k[7405]*y_cur[IDX_GC6I] + - k[7587]*y_cur[IDX_GC6I] + k[8674]*y_cur[IDX_GCI]*y_cur[IDX_GC5I]; - ydot[yistart + IDX_C6II] = 0.0 + - k[346]*y_cur[IDX_HII]*y_cur[IDX_C6I] - - k[848]*y_cur[IDX_C6II]*y_cur[IDX_eM] - - k[849]*y_cur[IDX_C6II]*y_cur[IDX_eM] + - k[1323]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] + - k[1325]*y_cur[IDX_CII]*y_cur[IDX_C5HI] - - k[1557]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] - - k[1558]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] + - k[1734]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] + - k[1867]*y_cur[IDX_CI]*y_cur[IDX_C5HII] + - k[1868]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - - k[2182]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - - k[2183]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - - k[2184]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + - k[2307]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - - k[2417]*y_cur[IDX_H2I]*y_cur[IDX_C6II] + - k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + - k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + - k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] + - k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + - k[5498]*y_cur[IDX_CII]*y_cur[IDX_C5I] - - k[5552]*y_cur[IDX_H2I]*y_cur[IDX_C6II] + k[6034]*y_cur[IDX_C6I] - - k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] - - k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C6M] = 0.0 - k[31]*y_cur[IDX_C6M]*y_cur[IDX_C2I] - - k[32]*y_cur[IDX_C6M]*y_cur[IDX_C3I] - - k[33]*y_cur[IDX_C6M]*y_cur[IDX_C4I] - - k[47]*y_cur[IDX_CI]*y_cur[IDX_C6M] - - k[97]*y_cur[IDX_HI]*y_cur[IDX_C6M] - - k[3418]*y_cur[IDX_NI]*y_cur[IDX_C6M] - - k[3419]*y_cur[IDX_NI]*y_cur[IDX_C6M] - - k[3420]*y_cur[IDX_NI]*y_cur[IDX_C6M] + - k[3428]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3708]*y_cur[IDX_OI]*y_cur[IDX_C6M] + - k[3712]*y_cur[IDX_OI]*y_cur[IDX_C7M] - - k[4341]*y_cur[IDX_C6M]*y_cur[IDX_CII] - - k[4342]*y_cur[IDX_C6M]*y_cur[IDX_C2H2II] - - k[4343]*y_cur[IDX_C6M]*y_cur[IDX_C2H3II] - - k[4344]*y_cur[IDX_C6M]*y_cur[IDX_C4H2II] - - k[4345]*y_cur[IDX_C6M]*y_cur[IDX_C4H3II] - - k[4346]*y_cur[IDX_C6M]*y_cur[IDX_C4SII] - - k[4347]*y_cur[IDX_C6M]*y_cur[IDX_CH2CCHII] - - k[4348]*y_cur[IDX_C6M]*y_cur[IDX_CH3II] - - k[4349]*y_cur[IDX_C6M]*y_cur[IDX_CNCII] - - k[4350]*y_cur[IDX_C6M]*y_cur[IDX_FeII] - - k[4351]*y_cur[IDX_C6M]*y_cur[IDX_HII] - - k[4352]*y_cur[IDX_C6M]*y_cur[IDX_H2COII] - - k[4353]*y_cur[IDX_C6M]*y_cur[IDX_H2SII] - - k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] - - k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] - - k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] - - k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] - - k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] - - k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] - - k[4360]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] - - k[4361]*y_cur[IDX_C6M]*y_cur[IDX_HeII] - - k[4362]*y_cur[IDX_C6M]*y_cur[IDX_MgII] - - k[4363]*y_cur[IDX_C6M]*y_cur[IDX_NII] - - k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] - - k[4365]*y_cur[IDX_C6M]*y_cur[IDX_NH3II] - - k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] - - k[4367]*y_cur[IDX_C6M]*y_cur[IDX_NOII] - - k[4368]*y_cur[IDX_C6M]*y_cur[IDX_NaII] - - k[4369]*y_cur[IDX_C6M]*y_cur[IDX_OII] - - k[4370]*y_cur[IDX_C6M]*y_cur[IDX_SII] - - k[4371]*y_cur[IDX_C6M]*y_cur[IDX_SOII] - - k[4372]*y_cur[IDX_C6M]*y_cur[IDX_SiII] - - k[4373]*y_cur[IDX_C6M]*y_cur[IDX_SiOII] - - k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] - - k[4375]*y_cur[IDX_C6M]*y_cur[IDX_SiSII] + - k[5599]*y_cur[IDX_C6I]*y_cur[IDX_eM] - k[5747]*y_cur[IDX_C6M] - - k[6032]*y_cur[IDX_C6M]; - ydot[yistart + IDX_C6HI] = 0.0 + k[46]*y_cur[IDX_CI]*y_cur[IDX_C5HM] - + k[97]*y_cur[IDX_HI]*y_cur[IDX_C6M] - - k[348]*y_cur[IDX_HII]*y_cur[IDX_C6HI] + - k[853]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + - k[855]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + - k[857]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + - k[859]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + - k[866]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + - k[1084]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] - - k[1331]*y_cur[IDX_CII]*y_cur[IDX_C6HI] - - k[1497]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] - - k[1498]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] - - k[1599]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - - k[1600]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - - k[1601]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - - k[1661]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] - - k[1662]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] - - k[1769]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] - - k[1770]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] - - k[1803]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] - - k[1804]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] - - k[2027]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] - - k[2028]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] - - k[2056]*y_cur[IDX_CH3II]*y_cur[IDX_C6HI] - - k[2307]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - - k[2620]*y_cur[IDX_H3II]*y_cur[IDX_C6HI] - - k[2925]*y_cur[IDX_HCOII]*y_cur[IDX_C6HI] - - k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] - - k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + - k[3431]*y_cur[IDX_NI]*y_cur[IDX_C7HM] + - k[3447]*y_cur[IDX_NI]*y_cur[IDX_C9HM] + - k[3715]*y_cur[IDX_OI]*y_cur[IDX_C7H2II] + - k[4376]*y_cur[IDX_C6HM]*y_cur[IDX_CII] + - k[4377]*y_cur[IDX_C6HM]*y_cur[IDX_C2H2II] + - k[4378]*y_cur[IDX_C6HM]*y_cur[IDX_C2H3II] + - k[4379]*y_cur[IDX_C6HM]*y_cur[IDX_C4H2II] + - k[4380]*y_cur[IDX_C6HM]*y_cur[IDX_C4H3II] + - k[4381]*y_cur[IDX_C6HM]*y_cur[IDX_C4SII] + - k[4382]*y_cur[IDX_C6HM]*y_cur[IDX_CH2CCHII] + - k[4383]*y_cur[IDX_C6HM]*y_cur[IDX_CH3II] + - k[4384]*y_cur[IDX_C6HM]*y_cur[IDX_CNCII] + - k[4385]*y_cur[IDX_C6HM]*y_cur[IDX_FeII] + - k[4386]*y_cur[IDX_C6HM]*y_cur[IDX_HII] + - k[4387]*y_cur[IDX_C6HM]*y_cur[IDX_H2COII] + - k[4388]*y_cur[IDX_C6HM]*y_cur[IDX_H2SII] + - k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] + - k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] + - k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] + - k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + - k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + - k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + - k[4395]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + - k[4396]*y_cur[IDX_C6HM]*y_cur[IDX_HeII] + - k[4397]*y_cur[IDX_C6HM]*y_cur[IDX_MgII] + - k[4398]*y_cur[IDX_C6HM]*y_cur[IDX_NII] + - k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] + - k[4400]*y_cur[IDX_C6HM]*y_cur[IDX_NH3II] + - k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] + - k[4402]*y_cur[IDX_C6HM]*y_cur[IDX_NOII] + - k[4403]*y_cur[IDX_C6HM]*y_cur[IDX_NaII] + - k[4404]*y_cur[IDX_C6HM]*y_cur[IDX_OII] + - k[4405]*y_cur[IDX_C6HM]*y_cur[IDX_SII] + - k[4406]*y_cur[IDX_C6HM]*y_cur[IDX_SOII] + - k[4407]*y_cur[IDX_C6HM]*y_cur[IDX_SiII] + - k[4408]*y_cur[IDX_C6HM]*y_cur[IDX_SiOII] + - k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] + - k[4410]*y_cur[IDX_C6HM]*y_cur[IDX_SiSII] + - k[4872]*y_cur[IDX_C2I]*y_cur[IDX_C4H2I] + - k[4909]*y_cur[IDX_CI]*y_cur[IDX_C10H2I] + - k[4927]*y_cur[IDX_CI]*y_cur[IDX_C5H2I] - - k[4933]*y_cur[IDX_CI]*y_cur[IDX_C6HI] - - k[5243]*y_cur[IDX_NI]*y_cur[IDX_C6HI] - - k[5369]*y_cur[IDX_OI]*y_cur[IDX_C6HI] + - k[5371]*y_cur[IDX_OI]*y_cur[IDX_C7HI] - - k[5600]*y_cur[IDX_C6HI]*y_cur[IDX_eM] + k[5749]*y_cur[IDX_C6HM] - - k[5752]*y_cur[IDX_C6HI] - k[5753]*y_cur[IDX_C6HI] - - k[5754]*y_cur[IDX_C6HI] + k[5799]*y_cur[IDX_CH3C6HI] + - k[5852]*y_cur[IDX_HC7NI] + k[6035]*y_cur[IDX_C6HM] + - k[6037]*y_cur[IDX_C6H2I] - k[6039]*y_cur[IDX_C6HI] - - k[6040]*y_cur[IDX_C6HI] + k[6103]*y_cur[IDX_CH3C6HI] + - k[6177]*y_cur[IDX_HC7NI] + - k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + - k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + - k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + - k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + - k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + - k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] - - k[7042]*y_cur[IDX_C6HI] + k[7224]*y_cur[IDX_GC6HI] + - k[7406]*y_cur[IDX_GC6HI] + k[7588]*y_cur[IDX_GC6HI] + - k[8638]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] + - k[8675]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] + - k[8728]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I]; - ydot[yistart + IDX_C6HII] = 0.0 + - k[348]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - - k[850]*y_cur[IDX_C6HII]*y_cur[IDX_eM] - - k[851]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + - k[1324]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] + - k[1489]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] + - k[1550]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] - - k[1559]*y_cur[IDX_C2H2I]*y_cur[IDX_C6HII] + - k[1735]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] + - k[1869]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] + - k[1870]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] + - k[2306]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] + - k[2417]*y_cur[IDX_H2I]*y_cur[IDX_C6II] - - k[2418]*y_cur[IDX_H2I]*y_cur[IDX_C6HII] + - k[2617]*y_cur[IDX_H3II]*y_cur[IDX_C6I] + - k[2922]*y_cur[IDX_HCOII]*y_cur[IDX_C6I] + - k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + - k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] - - k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] - - k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C6HM] = 0.0 - k[48]*y_cur[IDX_CI]*y_cur[IDX_C6HM] - - k[98]*y_cur[IDX_HI]*y_cur[IDX_C6HM] - - k[3421]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - - k[3422]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - - k[3709]*y_cur[IDX_OI]*y_cur[IDX_C6HM] + - k[3714]*y_cur[IDX_OI]*y_cur[IDX_C7HM] - - k[4376]*y_cur[IDX_C6HM]*y_cur[IDX_CII] - - k[4377]*y_cur[IDX_C6HM]*y_cur[IDX_C2H2II] - - k[4378]*y_cur[IDX_C6HM]*y_cur[IDX_C2H3II] - - k[4379]*y_cur[IDX_C6HM]*y_cur[IDX_C4H2II] - - k[4380]*y_cur[IDX_C6HM]*y_cur[IDX_C4H3II] - - k[4381]*y_cur[IDX_C6HM]*y_cur[IDX_C4SII] - - k[4382]*y_cur[IDX_C6HM]*y_cur[IDX_CH2CCHII] - - k[4383]*y_cur[IDX_C6HM]*y_cur[IDX_CH3II] - - k[4384]*y_cur[IDX_C6HM]*y_cur[IDX_CNCII] - - k[4385]*y_cur[IDX_C6HM]*y_cur[IDX_FeII] - - k[4386]*y_cur[IDX_C6HM]*y_cur[IDX_HII] - - k[4387]*y_cur[IDX_C6HM]*y_cur[IDX_H2COII] - - k[4388]*y_cur[IDX_C6HM]*y_cur[IDX_H2SII] - - k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] - - k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] - - k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] - - k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] - - k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] - - k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] - - k[4395]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] - - k[4396]*y_cur[IDX_C6HM]*y_cur[IDX_HeII] - - k[4397]*y_cur[IDX_C6HM]*y_cur[IDX_MgII] - - k[4398]*y_cur[IDX_C6HM]*y_cur[IDX_NII] - - k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] - - k[4400]*y_cur[IDX_C6HM]*y_cur[IDX_NH3II] - - k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] - - k[4402]*y_cur[IDX_C6HM]*y_cur[IDX_NOII] - - k[4403]*y_cur[IDX_C6HM]*y_cur[IDX_NaII] - - k[4404]*y_cur[IDX_C6HM]*y_cur[IDX_OII] - - k[4405]*y_cur[IDX_C6HM]*y_cur[IDX_SII] - - k[4406]*y_cur[IDX_C6HM]*y_cur[IDX_SOII] - - k[4407]*y_cur[IDX_C6HM]*y_cur[IDX_SiII] - - k[4408]*y_cur[IDX_C6HM]*y_cur[IDX_SiOII] - - k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] - - k[4410]*y_cur[IDX_C6HM]*y_cur[IDX_SiSII] + - k[5600]*y_cur[IDX_C6HI]*y_cur[IDX_eM] - k[5749]*y_cur[IDX_C6HM] - - k[6035]*y_cur[IDX_C6HM]; - ydot[yistart + IDX_C6H2I] = 0.0 + - k[98]*y_cur[IDX_HI]*y_cur[IDX_C6HM] - - k[217]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - - k[347]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] + - k[854]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + - k[856]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + - k[858]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + - k[860]*y_cur[IDX_C6H6II]*y_cur[IDX_eM] + - k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] - - k[1326]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] - - k[1327]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] - - k[1495]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - - k[1496]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - - k[1595]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - - k[1596]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - - k[1597]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - - k[1659]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] - - k[1660]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] - - k[1767]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] - - k[1768]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] - - k[1802]*y_cur[IDX_C3H3II]*y_cur[IDX_C6H2I] - - k[2026]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6H2I] - - k[2055]*y_cur[IDX_CH3II]*y_cur[IDX_C6H2I] - - k[2306]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] - - k[2618]*y_cur[IDX_H3II]*y_cur[IDX_C6H2I] - - k[2923]*y_cur[IDX_HCOII]*y_cur[IDX_C6H2I] - - k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - - k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - - k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3716]*y_cur[IDX_OI]*y_cur[IDX_C7H3II] + - k[4877]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HI] + - k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] - - k[4891]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2I] + - k[4900]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2I] - - k[4932]*y_cur[IDX_CI]*y_cur[IDX_C6H2I] + - k[4950]*y_cur[IDX_CI]*y_cur[IDX_CH3C4HI] + - k[5022]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] + - k[5050]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + - k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - - k[5107]*y_cur[IDX_CNI]*y_cur[IDX_C6H2I] - k[5750]*y_cur[IDX_C6H2I] + - k[5751]*y_cur[IDX_C6H6I] - k[6036]*y_cur[IDX_C6H2I] - - k[6037]*y_cur[IDX_C6H2I] + - k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + - k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + - k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + - k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] + - k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - - k[7043]*y_cur[IDX_C6H2I] + k[7225]*y_cur[IDX_GC6H2I] + - k[7407]*y_cur[IDX_GC6H2I] + k[7589]*y_cur[IDX_GC6H2I] + - k[8639]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] + - k[8729]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI]; - ydot[yistart + IDX_C6H2II] = 0.0 + - k[217]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + - k[347]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] - - k[852]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] - - k[853]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + - k[1357]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + - k[1490]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] + - k[1520]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + - k[1551]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HII] + - k[1587]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + - k[1599]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - - k[1639]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] - - k[1640]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + - k[1657]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - - k[1703]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H2II] + - k[1736]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2II] - - k[1739]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2II] + - k[1759]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] + - k[1782]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - - k[1792]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] - - k[1793]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + - k[1819]*y_cur[IDX_C3HI]*y_cur[IDX_C3H2II] + - k[1820]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - - k[1827]*y_cur[IDX_C3HI]*y_cur[IDX_C6H2II] + - k[1828]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] + - k[1837]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] + - k[1871]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] - - k[1872]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] - - k[1873]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] - - k[2039]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] - - k[2040]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + - k[2054]*y_cur[IDX_CH3II]*y_cur[IDX_C5HI] - - k[2110]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C6H2II] + - k[2178]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - - k[2185]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] - - k[2186]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + - k[2418]*y_cur[IDX_H2I]*y_cur[IDX_C6HII] - - k[2483]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] - - k[2484]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + - k[2620]*y_cur[IDX_H3II]*y_cur[IDX_C6HI] + - k[2925]*y_cur[IDX_HCOII]*y_cur[IDX_C6HI] - - k[3423]*y_cur[IDX_NI]*y_cur[IDX_C6H2II] - - k[3710]*y_cur[IDX_OI]*y_cur[IDX_C6H2II] + - k[5552]*y_cur[IDX_H2I]*y_cur[IDX_C6II] + k[6036]*y_cur[IDX_C6H2I] - - k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] - - k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C6H3II] = 0.0 - - k[854]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] - - k[855]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + - k[1358]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + - k[1359]*y_cur[IDX_CII]*y_cur[IDX_CH3C5NI] + - k[1521]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + - k[1552]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] + - k[1588]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + - k[1595]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + - k[1622]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + - k[1632]*y_cur[IDX_C2H3I]*y_cur[IDX_C4HII] + - k[1633]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + - k[1655]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] + - k[1737]*y_cur[IDX_C2HI]*y_cur[IDX_C4H3II] + - k[1760]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] + - k[1783]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] + - k[1786]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] + - k[1794]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] + - k[1821]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] + - k[1829]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] - - k[1874]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - - k[1875]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] + - k[2053]*y_cur[IDX_CH3II]*y_cur[IDX_C5H2I] + - k[2179]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + - k[2476]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + - k[2485]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + - k[2618]*y_cur[IDX_H3II]*y_cur[IDX_C6H2I] + - k[2850]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] + - k[2923]*y_cur[IDX_HCOII]*y_cur[IDX_C6H2I] - - k[3711]*y_cur[IDX_OI]*y_cur[IDX_C6H3II] - - k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] - - k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C6H4II] = 0.0 - - k[856]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] - - k[857]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + - k[1553]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + - k[1623]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + - k[1634]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + - k[1635]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + - k[1654]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] + - k[1678]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] + - k[1695]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] + - k[1696]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] + - k[1776]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCHI] + - k[1787]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] + - k[1795]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] + - k[1805]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + - k[2029]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] + - k[2180]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + - k[2477]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + - k[2486]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + - k[2851]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H4II] + - k[5511]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] - - k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] - - k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C6H5II] = 0.0 - - k[858]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] - - k[859]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + - k[1554]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + - k[1636]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + - k[1697]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] - - k[1704]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H5II] + - k[1775]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1781]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + - k[1806]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + - k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + - k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + - k[2030]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] + - k[2181]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + - k[2834]*y_cur[IDX_HI]*y_cur[IDX_C6H6II] + - k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - - k[3424]*y_cur[IDX_NI]*y_cur[IDX_C6H5II] + - k[5520]*y_cur[IDX_C4H3II]*y_cur[IDX_C2H2I] - - k[5553]*y_cur[IDX_H2I]*y_cur[IDX_C6H5II] - - k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] - - k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C6H6I] = 0.0 - - k[157]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + - k[862]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] - - k[1328]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - - k[1329]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - - k[1330]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - - k[1598]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H6I] - - k[1814]*y_cur[IDX_C3H5II]*y_cur[IDX_C6H6I] - - k[2221]*y_cur[IDX_CH5II]*y_cur[IDX_C6H6I] - - k[2619]*y_cur[IDX_H3II]*y_cur[IDX_C6H6I] - - k[2783]*y_cur[IDX_H3OII]*y_cur[IDX_C6H6I] - - k[2924]*y_cur[IDX_HCOII]*y_cur[IDX_C6H6I] - - k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - - k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - - k[3368]*y_cur[IDX_N2HII]*y_cur[IDX_C6H6I] - k[5751]*y_cur[IDX_C6H6I] - - k[6038]*y_cur[IDX_C6H6I] + - k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - - k[7047]*y_cur[IDX_C6H6I] + k[7229]*y_cur[IDX_GC6H6I] + - k[7411]*y_cur[IDX_GC6H6I] + k[7593]*y_cur[IDX_GC6H6I]; - ydot[yistart + IDX_C6H6II] = 0.0 + - k[157]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - - k[860]*y_cur[IDX_C6H6II]*y_cur[IDX_eM] - - k[2834]*y_cur[IDX_HI]*y_cur[IDX_C6H6II] - - k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C6H7II] = 0.0 - - k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] - - k[862]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + - k[1598]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H6I] + - k[1704]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H5II] + - k[1810]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + - k[1813]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + - k[1814]*y_cur[IDX_C3H5II]*y_cur[IDX_C6H6I] + - k[2104]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C3H5II] + - k[2221]*y_cur[IDX_CH5II]*y_cur[IDX_C6H6I] + - k[2619]*y_cur[IDX_H3II]*y_cur[IDX_C6H6I] + - k[2783]*y_cur[IDX_H3OII]*y_cur[IDX_C6H6I] + - k[2924]*y_cur[IDX_HCOII]*y_cur[IDX_C6H6I] + - k[3368]*y_cur[IDX_N2HII]*y_cur[IDX_C6H6I] + - k[5553]*y_cur[IDX_H2I]*y_cur[IDX_C6H5II] - - k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - - k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C7I] = 0.0 + k[13]*y_cur[IDX_C2M]*y_cur[IDX_C5I] - - k[15]*y_cur[IDX_C2M]*y_cur[IDX_C7I] + - k[18]*y_cur[IDX_C3M]*y_cur[IDX_C4I] - - k[21]*y_cur[IDX_C3M]*y_cur[IDX_C7I] + - k[23]*y_cur[IDX_C4M]*y_cur[IDX_C3I] + - k[27]*y_cur[IDX_C5M]*y_cur[IDX_C2I] + - k[47]*y_cur[IDX_CI]*y_cur[IDX_C6M] - - k[349]*y_cur[IDX_HII]*y_cur[IDX_C7I] + - k[736]*y_cur[IDX_C11II]*y_cur[IDX_eM] + - k[867]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + - k[868]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + - k[878]*y_cur[IDX_C8II]*y_cur[IDX_eM] + - k[889]*y_cur[IDX_C9II]*y_cur[IDX_eM] - - k[2621]*y_cur[IDX_H3II]*y_cur[IDX_C7I] - - k[2926]*y_cur[IDX_HCOII]*y_cur[IDX_C7I] - - k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] - - k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + - k[3377]*y_cur[IDX_NI]*y_cur[IDX_C10M] + - k[3438]*y_cur[IDX_NI]*y_cur[IDX_C8M] + - k[4411]*y_cur[IDX_C7M]*y_cur[IDX_CII] + - k[4412]*y_cur[IDX_C7M]*y_cur[IDX_C2H2II] + - k[4413]*y_cur[IDX_C7M]*y_cur[IDX_C2H3II] + - k[4414]*y_cur[IDX_C7M]*y_cur[IDX_C4H2II] + - k[4415]*y_cur[IDX_C7M]*y_cur[IDX_C4H3II] + - k[4416]*y_cur[IDX_C7M]*y_cur[IDX_C4SII] + - k[4417]*y_cur[IDX_C7M]*y_cur[IDX_CH2CCHII] + - k[4418]*y_cur[IDX_C7M]*y_cur[IDX_CH3II] + - k[4419]*y_cur[IDX_C7M]*y_cur[IDX_CNCII] + - k[4420]*y_cur[IDX_C7M]*y_cur[IDX_FeII] + - k[4421]*y_cur[IDX_C7M]*y_cur[IDX_HII] + - k[4422]*y_cur[IDX_C7M]*y_cur[IDX_H2COII] + - k[4423]*y_cur[IDX_C7M]*y_cur[IDX_H2SII] + - k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] + - k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] + - k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] + - k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + - k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + - k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + - k[4430]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + - k[4431]*y_cur[IDX_C7M]*y_cur[IDX_HeII] + - k[4432]*y_cur[IDX_C7M]*y_cur[IDX_MgII] + - k[4433]*y_cur[IDX_C7M]*y_cur[IDX_NII] + - k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] + - k[4435]*y_cur[IDX_C7M]*y_cur[IDX_NH3II] + - k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] + - k[4437]*y_cur[IDX_C7M]*y_cur[IDX_NOII] + - k[4438]*y_cur[IDX_C7M]*y_cur[IDX_NaII] + - k[4439]*y_cur[IDX_C7M]*y_cur[IDX_OII] + - k[4440]*y_cur[IDX_C7M]*y_cur[IDX_SII] + - k[4441]*y_cur[IDX_C7M]*y_cur[IDX_SOII] + - k[4442]*y_cur[IDX_C7M]*y_cur[IDX_SiII] + - k[4443]*y_cur[IDX_C7M]*y_cur[IDX_SiOII] + - k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] + - k[4445]*y_cur[IDX_C7M]*y_cur[IDX_SiSII] + - k[4933]*y_cur[IDX_CI]*y_cur[IDX_C6HI] - - k[4934]*y_cur[IDX_CI]*y_cur[IDX_C7I] + - k[4937]*y_cur[IDX_CI]*y_cur[IDX_C7NI] + - k[4938]*y_cur[IDX_CI]*y_cur[IDX_C8I] - - k[5244]*y_cur[IDX_NI]*y_cur[IDX_C7I] + - k[5248]*y_cur[IDX_NI]*y_cur[IDX_C8I] - - k[5370]*y_cur[IDX_OI]*y_cur[IDX_C7I] + - k[5373]*y_cur[IDX_OI]*y_cur[IDX_C8I] - - k[5500]*y_cur[IDX_CII]*y_cur[IDX_C7I] - - k[5601]*y_cur[IDX_C7I]*y_cur[IDX_eM] + k[5755]*y_cur[IDX_C7M] - - k[5756]*y_cur[IDX_C7I] + k[5759]*y_cur[IDX_C7HI] + - k[5762]*y_cur[IDX_C8I] + k[5953]*y_cur[IDX_C10I] + - k[5965]*y_cur[IDX_C10HI] + k[5972]*y_cur[IDX_C11I] + - k[6041]*y_cur[IDX_C7M] - k[6042]*y_cur[IDX_C7I] - - k[6043]*y_cur[IDX_C7I] + k[6047]*y_cur[IDX_C7HI] + - k[6052]*y_cur[IDX_C8I] + k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] - + k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + - k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + - k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + - k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7050]*y_cur[IDX_C7I] - + k[7232]*y_cur[IDX_GC7I] + k[7414]*y_cur[IDX_GC7I] + - k[7596]*y_cur[IDX_GC7I] + k[8676]*y_cur[IDX_GCI]*y_cur[IDX_GC6I]; - ydot[yistart + IDX_C7II] = 0.0 + - k[349]*y_cur[IDX_HII]*y_cur[IDX_C7I] - - k[863]*y_cur[IDX_C7II]*y_cur[IDX_eM] - - k[864]*y_cur[IDX_C7II]*y_cur[IDX_eM] - - k[865]*y_cur[IDX_C7II]*y_cur[IDX_eM] + - k[1326]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] + - k[1331]*y_cur[IDX_CII]*y_cur[IDX_C6HI] + - k[1822]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] + - k[1872]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] + - k[2309]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - - k[2419]*y_cur[IDX_H2I]*y_cur[IDX_C7II] + - k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + - k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + - k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + - k[5499]*y_cur[IDX_CII]*y_cur[IDX_C6I] + k[6043]*y_cur[IDX_C7I] - - k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - - k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - - k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C7M] = 0.0 - k[34]*y_cur[IDX_C7M]*y_cur[IDX_C2I] - - k[35]*y_cur[IDX_C7M]*y_cur[IDX_C3I] - - k[49]*y_cur[IDX_CI]*y_cur[IDX_C7M] - - k[99]*y_cur[IDX_HI]*y_cur[IDX_C7M] - - k[118]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3425]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3426]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3427]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3428]*y_cur[IDX_NI]*y_cur[IDX_C7M] + - k[3439]*y_cur[IDX_NI]*y_cur[IDX_C8M] - - k[3712]*y_cur[IDX_OI]*y_cur[IDX_C7M] + - k[3717]*y_cur[IDX_OI]*y_cur[IDX_C8M] - - k[4411]*y_cur[IDX_C7M]*y_cur[IDX_CII] - - k[4412]*y_cur[IDX_C7M]*y_cur[IDX_C2H2II] - - k[4413]*y_cur[IDX_C7M]*y_cur[IDX_C2H3II] - - k[4414]*y_cur[IDX_C7M]*y_cur[IDX_C4H2II] - - k[4415]*y_cur[IDX_C7M]*y_cur[IDX_C4H3II] - - k[4416]*y_cur[IDX_C7M]*y_cur[IDX_C4SII] - - k[4417]*y_cur[IDX_C7M]*y_cur[IDX_CH2CCHII] - - k[4418]*y_cur[IDX_C7M]*y_cur[IDX_CH3II] - - k[4419]*y_cur[IDX_C7M]*y_cur[IDX_CNCII] - - k[4420]*y_cur[IDX_C7M]*y_cur[IDX_FeII] - - k[4421]*y_cur[IDX_C7M]*y_cur[IDX_HII] - - k[4422]*y_cur[IDX_C7M]*y_cur[IDX_H2COII] - - k[4423]*y_cur[IDX_C7M]*y_cur[IDX_H2SII] - - k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] - - k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] - - k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] - - k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] - - k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] - - k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] - - k[4430]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] - - k[4431]*y_cur[IDX_C7M]*y_cur[IDX_HeII] - - k[4432]*y_cur[IDX_C7M]*y_cur[IDX_MgII] - - k[4433]*y_cur[IDX_C7M]*y_cur[IDX_NII] - - k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] - - k[4435]*y_cur[IDX_C7M]*y_cur[IDX_NH3II] - - k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] - - k[4437]*y_cur[IDX_C7M]*y_cur[IDX_NOII] - - k[4438]*y_cur[IDX_C7M]*y_cur[IDX_NaII] - - k[4439]*y_cur[IDX_C7M]*y_cur[IDX_OII] - - k[4440]*y_cur[IDX_C7M]*y_cur[IDX_SII] - - k[4441]*y_cur[IDX_C7M]*y_cur[IDX_SOII] - - k[4442]*y_cur[IDX_C7M]*y_cur[IDX_SiII] - - k[4443]*y_cur[IDX_C7M]*y_cur[IDX_SiOII] - - k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] - - k[4445]*y_cur[IDX_C7M]*y_cur[IDX_SiSII] + - k[5601]*y_cur[IDX_C7I]*y_cur[IDX_eM] - k[5755]*y_cur[IDX_C7M] - - k[6041]*y_cur[IDX_C7M]; - ydot[yistart + IDX_C7HI] = 0.0 + k[48]*y_cur[IDX_CI]*y_cur[IDX_C6HM] - + k[99]*y_cur[IDX_HI]*y_cur[IDX_C7M] - - k[351]*y_cur[IDX_HII]*y_cur[IDX_C7HI] + - k[731]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + - k[869]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + - k[871]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + - k[873]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + - k[879]*y_cur[IDX_C8HII]*y_cur[IDX_eM] - - k[1334]*y_cur[IDX_CII]*y_cur[IDX_C7HI] - - k[1501]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] - - k[1502]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] - - k[1605]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - - k[1606]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - - k[1607]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - - k[1665]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] - - k[1666]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] - - k[2058]*y_cur[IDX_CH3II]*y_cur[IDX_C7HI] - - k[2309]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - - k[2623]*y_cur[IDX_H3II]*y_cur[IDX_C7HI] - - k[2928]*y_cur[IDX_HCOII]*y_cur[IDX_C7HI] - - k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] - - k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + - k[3381]*y_cur[IDX_NI]*y_cur[IDX_C10HM] + - k[3441]*y_cur[IDX_NI]*y_cur[IDX_C8HM] + - k[3719]*y_cur[IDX_OI]*y_cur[IDX_C8H2II] + - k[4446]*y_cur[IDX_C7HM]*y_cur[IDX_CII] + - k[4447]*y_cur[IDX_C7HM]*y_cur[IDX_C2H2II] + - k[4448]*y_cur[IDX_C7HM]*y_cur[IDX_C2H3II] + - k[4449]*y_cur[IDX_C7HM]*y_cur[IDX_C4H2II] + - k[4450]*y_cur[IDX_C7HM]*y_cur[IDX_C4H3II] + - k[4451]*y_cur[IDX_C7HM]*y_cur[IDX_C4SII] + - k[4452]*y_cur[IDX_C7HM]*y_cur[IDX_CH2CCHII] + - k[4453]*y_cur[IDX_C7HM]*y_cur[IDX_CH3II] + - k[4454]*y_cur[IDX_C7HM]*y_cur[IDX_CNCII] + - k[4455]*y_cur[IDX_C7HM]*y_cur[IDX_FeII] + - k[4456]*y_cur[IDX_C7HM]*y_cur[IDX_HII] + - k[4457]*y_cur[IDX_C7HM]*y_cur[IDX_H2COII] + - k[4458]*y_cur[IDX_C7HM]*y_cur[IDX_H2SII] + - k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] + - k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] + - k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] + - k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + - k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + - k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + - k[4465]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + - k[4466]*y_cur[IDX_C7HM]*y_cur[IDX_HeII] + - k[4467]*y_cur[IDX_C7HM]*y_cur[IDX_MgII] + - k[4468]*y_cur[IDX_C7HM]*y_cur[IDX_NII] + - k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] + - k[4470]*y_cur[IDX_C7HM]*y_cur[IDX_NH3II] + - k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] + - k[4472]*y_cur[IDX_C7HM]*y_cur[IDX_NOII] + - k[4473]*y_cur[IDX_C7HM]*y_cur[IDX_NaII] + - k[4474]*y_cur[IDX_C7HM]*y_cur[IDX_OII] + - k[4475]*y_cur[IDX_C7HM]*y_cur[IDX_SII] + - k[4476]*y_cur[IDX_C7HM]*y_cur[IDX_SOII] + - k[4477]*y_cur[IDX_C7HM]*y_cur[IDX_SiII] + - k[4478]*y_cur[IDX_C7HM]*y_cur[IDX_SiOII] + - k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] + - k[4480]*y_cur[IDX_C7HM]*y_cur[IDX_SiSII] + - k[4932]*y_cur[IDX_CI]*y_cur[IDX_C6H2I] - - k[4936]*y_cur[IDX_CI]*y_cur[IDX_C7HI] - - k[5246]*y_cur[IDX_NI]*y_cur[IDX_C7HI] + - k[5249]*y_cur[IDX_NI]*y_cur[IDX_C8HI] - - k[5371]*y_cur[IDX_OI]*y_cur[IDX_C7HI] + - k[5374]*y_cur[IDX_OI]*y_cur[IDX_C8HI] - - k[5602]*y_cur[IDX_C7HI]*y_cur[IDX_eM] + k[5757]*y_cur[IDX_C7HM] + - k[5758]*y_cur[IDX_C7H2I] - k[5759]*y_cur[IDX_C7HI] + - k[5960]*y_cur[IDX_C10H2I] + k[5966]*y_cur[IDX_C10HI] + - k[6044]*y_cur[IDX_C7HM] + k[6046]*y_cur[IDX_C7H2I] - - k[6047]*y_cur[IDX_C7HI] - k[6048]*y_cur[IDX_C7HI] + - k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + - k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + - k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + - k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + - k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - - k[7051]*y_cur[IDX_C7HI] + k[7233]*y_cur[IDX_GC7HI] + - k[7415]*y_cur[IDX_GC7HI] + k[7597]*y_cur[IDX_GC7HI] + - k[8641]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] + - k[8677]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] + - k[8730]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I]; - ydot[yistart + IDX_C7HII] = 0.0 + - k[351]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - - k[866]*y_cur[IDX_C7HII]*y_cur[IDX_eM] - - k[867]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + - k[1327]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] + - k[1405]*y_cur[IDX_CII]*y_cur[IDX_HC7NI] + - k[1493]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] + - k[1556]*y_cur[IDX_C2H2I]*y_cur[IDX_C5II] + - k[1761]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] + - k[1823]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] + - k[1873]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] + - k[1874]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - - k[1876]*y_cur[IDX_CI]*y_cur[IDX_C7HII] + - k[2308]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] + - k[2419]*y_cur[IDX_H2I]*y_cur[IDX_C7II] - - k[2420]*y_cur[IDX_H2I]*y_cur[IDX_C7HII] + - k[2621]*y_cur[IDX_H3II]*y_cur[IDX_C7I] + - k[2926]*y_cur[IDX_HCOII]*y_cur[IDX_C7I] + - k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + - k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] - - k[3429]*y_cur[IDX_NI]*y_cur[IDX_C7HII] - - k[3713]*y_cur[IDX_OI]*y_cur[IDX_C7HII] + k[6048]*y_cur[IDX_C7HI] - - k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] - - k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C7HM] = 0.0 - k[50]*y_cur[IDX_CI]*y_cur[IDX_C7HM] - - k[100]*y_cur[IDX_HI]*y_cur[IDX_C7HM] - - k[119]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - - k[3430]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - - k[3431]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - - k[3714]*y_cur[IDX_OI]*y_cur[IDX_C7HM] + - k[3718]*y_cur[IDX_OI]*y_cur[IDX_C8HM] - - k[4446]*y_cur[IDX_C7HM]*y_cur[IDX_CII] - - k[4447]*y_cur[IDX_C7HM]*y_cur[IDX_C2H2II] - - k[4448]*y_cur[IDX_C7HM]*y_cur[IDX_C2H3II] - - k[4449]*y_cur[IDX_C7HM]*y_cur[IDX_C4H2II] - - k[4450]*y_cur[IDX_C7HM]*y_cur[IDX_C4H3II] - - k[4451]*y_cur[IDX_C7HM]*y_cur[IDX_C4SII] - - k[4452]*y_cur[IDX_C7HM]*y_cur[IDX_CH2CCHII] - - k[4453]*y_cur[IDX_C7HM]*y_cur[IDX_CH3II] - - k[4454]*y_cur[IDX_C7HM]*y_cur[IDX_CNCII] - - k[4455]*y_cur[IDX_C7HM]*y_cur[IDX_FeII] - - k[4456]*y_cur[IDX_C7HM]*y_cur[IDX_HII] - - k[4457]*y_cur[IDX_C7HM]*y_cur[IDX_H2COII] - - k[4458]*y_cur[IDX_C7HM]*y_cur[IDX_H2SII] - - k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] - - k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] - - k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] - - k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] - - k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] - - k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] - - k[4465]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] - - k[4466]*y_cur[IDX_C7HM]*y_cur[IDX_HeII] - - k[4467]*y_cur[IDX_C7HM]*y_cur[IDX_MgII] - - k[4468]*y_cur[IDX_C7HM]*y_cur[IDX_NII] - - k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] - - k[4470]*y_cur[IDX_C7HM]*y_cur[IDX_NH3II] - - k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] - - k[4472]*y_cur[IDX_C7HM]*y_cur[IDX_NOII] - - k[4473]*y_cur[IDX_C7HM]*y_cur[IDX_NaII] - - k[4474]*y_cur[IDX_C7HM]*y_cur[IDX_OII] - - k[4475]*y_cur[IDX_C7HM]*y_cur[IDX_SII] - - k[4476]*y_cur[IDX_C7HM]*y_cur[IDX_SOII] - - k[4477]*y_cur[IDX_C7HM]*y_cur[IDX_SiII] - - k[4478]*y_cur[IDX_C7HM]*y_cur[IDX_SiOII] - - k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] - - k[4480]*y_cur[IDX_C7HM]*y_cur[IDX_SiSII] + - k[5602]*y_cur[IDX_C7HI]*y_cur[IDX_eM] - k[5757]*y_cur[IDX_C7HM] - - k[6044]*y_cur[IDX_C7HM]; - ydot[yistart + IDX_C7H2I] = 0.0 + - k[100]*y_cur[IDX_HI]*y_cur[IDX_C7HM] - - k[218]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - - k[350]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] + - k[870]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + - k[872]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + - k[874]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] - - k[1332]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] - - k[1333]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] - - k[1499]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - - k[1500]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - - k[1602]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - - k[1603]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - - k[1604]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - - k[1663]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] - - k[1664]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] - - k[2057]*y_cur[IDX_CH3II]*y_cur[IDX_C7H2I] - - k[2308]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] - - k[2622]*y_cur[IDX_H3II]*y_cur[IDX_C7H2I] - - k[2927]*y_cur[IDX_HCOII]*y_cur[IDX_C7H2I] - - k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - - k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - - k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3720]*y_cur[IDX_OI]*y_cur[IDX_C8H3II] + - k[4890]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2I] - - k[4892]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2I] - - k[4935]*y_cur[IDX_CI]*y_cur[IDX_C7H2I] - - k[5245]*y_cur[IDX_NI]*y_cur[IDX_C7H2I] - k[5758]*y_cur[IDX_C7H2I] - - k[6045]*y_cur[IDX_C7H2I] - k[6046]*y_cur[IDX_C7H2I] + - k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + - k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + - k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - - k[7052]*y_cur[IDX_C7H2I] + k[7234]*y_cur[IDX_GC7H2I] + - k[7416]*y_cur[IDX_GC7H2I] + k[7598]*y_cur[IDX_GC7H2I] + - k[8642]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] + - k[8731]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI]; - ydot[yistart + IDX_C7H2II] = 0.0 + - k[218]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + - k[350]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] - - k[868]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] - - k[869]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + - k[1491]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + - k[1494]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - - k[1560]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] - - k[1561]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + - k[1593]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + - k[1605]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - - k[1641]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] - - k[1642]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + - k[1661]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] + - k[1699]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - - k[1705]*y_cur[IDX_C2H4I]*y_cur[IDX_C7H2II] + - k[1738]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2II] - - k[1740]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2II] + - k[1762]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] + - k[1784]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] + - k[1796]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] + - k[1824]*y_cur[IDX_C3HI]*y_cur[IDX_C4H2II] + - k[1875]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - - k[1877]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] - - k[1878]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + - k[2020]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] + - k[2056]*y_cur[IDX_CH3II]*y_cur[IDX_C6HI] + - k[2183]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - - k[2187]*y_cur[IDX_CH4I]*y_cur[IDX_C7H2II] + - k[2420]*y_cur[IDX_H2I]*y_cur[IDX_C7HII] + - k[2478]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4HII] + - k[2623]*y_cur[IDX_H3II]*y_cur[IDX_C7HI] + - k[2928]*y_cur[IDX_HCOII]*y_cur[IDX_C7HI] + - k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - - k[3432]*y_cur[IDX_NI]*y_cur[IDX_C7H2II] - - k[3715]*y_cur[IDX_OI]*y_cur[IDX_C7H2II] + k[6045]*y_cur[IDX_C7H2I] - - k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] - - k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C7H3II] = 0.0 - - k[870]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] - - k[871]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + - k[1360]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] + - k[1492]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + - k[1590]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + - k[1594]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + - k[1602]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + - k[1637]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + - k[1659]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] + - k[1700]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + - k[1785]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] + - k[1788]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H2II] + - k[1797]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] + - k[1825]*y_cur[IDX_C3HI]*y_cur[IDX_C4H3II] - - k[1879]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] - - k[1880]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] + - k[2021]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] + - k[2032]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4HII] + - k[2033]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + - k[2055]*y_cur[IDX_CH3II]*y_cur[IDX_C6H2I] + - k[2184]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + - k[2323]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] + - k[2479]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H2II] + - k[2622]*y_cur[IDX_H3II]*y_cur[IDX_C7H2I] + - k[2852]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] + - k[2927]*y_cur[IDX_HCOII]*y_cur[IDX_C7H2I] + - k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - - k[3433]*y_cur[IDX_NI]*y_cur[IDX_C7H3II] - - k[3716]*y_cur[IDX_OI]*y_cur[IDX_C7H3II] - - k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] - - k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C7H4II] = 0.0 + - k[364]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] - - k[872]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] - - k[873]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + - k[1591]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + - k[1638]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + - k[1658]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] + - k[1701]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + - k[1789]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H3II] + - k[2034]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + - k[2035]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + - k[2105]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HII] + - k[2185]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + - k[2480]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H3II] - - k[3434]*y_cur[IDX_NI]*y_cur[IDX_C7H4II] - - k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] - - k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C7H5II] = 0.0 - - k[874]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] - - k[875]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] + - k[1330]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + - k[1656]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] + - k[1702]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + - k[2036]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + - k[2106]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] + - k[2108]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H3II] + - k[2186]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + - k[2645]*y_cur[IDX_H3II]*y_cur[IDX_CH3C6HI] + - k[2946]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C6HI] - - k[3435]*y_cur[IDX_NI]*y_cur[IDX_C7H5II] + - k[5515]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] + - k[5531]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] - - k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - - k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C7NI] = 0.0 + k[118]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[901]*y_cur[IDX_C9NII]*y_cur[IDX_eM] + - k[989]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + - k[1030]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + - k[1085]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] - - k[2624]*y_cur[IDX_H3II]*y_cur[IDX_C7NI] - - k[2929]*y_cur[IDX_HCOII]*y_cur[IDX_C7NI] - - k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] + - k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] - - k[4937]*y_cur[IDX_CI]*y_cur[IDX_C7NI] + - k[5246]*y_cur[IDX_NI]*y_cur[IDX_C7HI] - - k[5247]*y_cur[IDX_NI]*y_cur[IDX_C7NI] + - k[5252]*y_cur[IDX_NI]*y_cur[IDX_C9NI] - - k[5372]*y_cur[IDX_OI]*y_cur[IDX_C7NI] - k[5760]*y_cur[IDX_C7NI] + - k[5800]*y_cur[IDX_CH3C7NI] - k[6049]*y_cur[IDX_C7NI] - - k[6050]*y_cur[IDX_C7NI] + k[6104]*y_cur[IDX_CH3C7NI] + - k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + - k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + - k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + - k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM] - k[7057]*y_cur[IDX_C7NI] - + k[7239]*y_cur[IDX_GC7NI] + k[7421]*y_cur[IDX_GC7NI] + - k[7603]*y_cur[IDX_GC7NI] + k[8709]*y_cur[IDX_GNI]*y_cur[IDX_GC7I]; - ydot[yistart + IDX_C7NII] = 0.0 - - k[876]*y_cur[IDX_C7NII]*y_cur[IDX_eM] - - k[2421]*y_cur[IDX_H2I]*y_cur[IDX_C7NII] + - k[3429]*y_cur[IDX_NI]*y_cur[IDX_C7HII] + k[6050]*y_cur[IDX_C7NI] - - k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C8I] = 0.0 + k[14]*y_cur[IDX_C2M]*y_cur[IDX_C6I] - - k[16]*y_cur[IDX_C2M]*y_cur[IDX_C8I] + - k[19]*y_cur[IDX_C3M]*y_cur[IDX_C5I] + - k[24]*y_cur[IDX_C4M]*y_cur[IDX_C4I] + - k[28]*y_cur[IDX_C5M]*y_cur[IDX_C3I] + - k[31]*y_cur[IDX_C6M]*y_cur[IDX_C2I] + - k[49]*y_cur[IDX_CI]*y_cur[IDX_C7M] - - k[352]*y_cur[IDX_HII]*y_cur[IDX_C8I] + - k[727]*y_cur[IDX_C10II]*y_cur[IDX_eM] + - k[737]*y_cur[IDX_C11II]*y_cur[IDX_eM] + - k[880]*y_cur[IDX_C8HII]*y_cur[IDX_eM] + - k[881]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + - k[890]*y_cur[IDX_C9II]*y_cur[IDX_eM] - - k[2625]*y_cur[IDX_H3II]*y_cur[IDX_C8I] - - k[2930]*y_cur[IDX_HCOII]*y_cur[IDX_C8I] - - k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] - - k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + - k[3444]*y_cur[IDX_NI]*y_cur[IDX_C9M] + - k[3722]*y_cur[IDX_OI]*y_cur[IDX_C9HII] + - k[4481]*y_cur[IDX_C8M]*y_cur[IDX_CII] + - k[4482]*y_cur[IDX_C8M]*y_cur[IDX_C2H2II] + - k[4483]*y_cur[IDX_C8M]*y_cur[IDX_C2H3II] + - k[4484]*y_cur[IDX_C8M]*y_cur[IDX_C4H2II] + - k[4485]*y_cur[IDX_C8M]*y_cur[IDX_C4H3II] + - k[4486]*y_cur[IDX_C8M]*y_cur[IDX_C4SII] + - k[4487]*y_cur[IDX_C8M]*y_cur[IDX_CH2CCHII] + - k[4488]*y_cur[IDX_C8M]*y_cur[IDX_CH3II] + - k[4489]*y_cur[IDX_C8M]*y_cur[IDX_CNCII] + - k[4490]*y_cur[IDX_C8M]*y_cur[IDX_FeII] + - k[4491]*y_cur[IDX_C8M]*y_cur[IDX_HII] + - k[4492]*y_cur[IDX_C8M]*y_cur[IDX_H2COII] + - k[4493]*y_cur[IDX_C8M]*y_cur[IDX_H2SII] + - k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] + - k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] + - k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] + - k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + - k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + - k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + - k[4500]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + - k[4501]*y_cur[IDX_C8M]*y_cur[IDX_HeII] + - k[4502]*y_cur[IDX_C8M]*y_cur[IDX_MgII] + - k[4503]*y_cur[IDX_C8M]*y_cur[IDX_NII] + - k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] + - k[4505]*y_cur[IDX_C8M]*y_cur[IDX_NH3II] + - k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] + - k[4507]*y_cur[IDX_C8M]*y_cur[IDX_NOII] + - k[4508]*y_cur[IDX_C8M]*y_cur[IDX_NaII] + - k[4509]*y_cur[IDX_C8M]*y_cur[IDX_OII] + - k[4510]*y_cur[IDX_C8M]*y_cur[IDX_SII] + - k[4511]*y_cur[IDX_C8M]*y_cur[IDX_SOII] + - k[4512]*y_cur[IDX_C8M]*y_cur[IDX_SiII] + - k[4513]*y_cur[IDX_C8M]*y_cur[IDX_SiOII] + - k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] + - k[4515]*y_cur[IDX_C8M]*y_cur[IDX_SiSII] + - k[4936]*y_cur[IDX_CI]*y_cur[IDX_C7HI] - - k[4938]*y_cur[IDX_CI]*y_cur[IDX_C8I] - - k[5248]*y_cur[IDX_NI]*y_cur[IDX_C8I] + - k[5250]*y_cur[IDX_NI]*y_cur[IDX_C9I] - - k[5373]*y_cur[IDX_OI]*y_cur[IDX_C8I] + - k[5375]*y_cur[IDX_OI]*y_cur[IDX_C9I] + - k[5377]*y_cur[IDX_OI]*y_cur[IDX_C9NI] - - k[5501]*y_cur[IDX_CII]*y_cur[IDX_C8I] - - k[5603]*y_cur[IDX_C8I]*y_cur[IDX_eM] + k[5761]*y_cur[IDX_C8M] - - k[5762]*y_cur[IDX_C8I] + k[5765]*y_cur[IDX_C8HI] + - k[5767]*y_cur[IDX_C9I] + k[5771]*y_cur[IDX_C9NI] + - k[5954]*y_cur[IDX_C10I] + k[5967]*y_cur[IDX_C10HI] + - k[5973]*y_cur[IDX_C11I] + k[6051]*y_cur[IDX_C8M] - - k[6052]*y_cur[IDX_C8I] - k[6053]*y_cur[IDX_C8I] + - k[6057]*y_cur[IDX_C8HI] + k[6060]*y_cur[IDX_C9I] + - k[6067]*y_cur[IDX_C9NI] + k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] - + k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + - k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + - k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + - k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7055]*y_cur[IDX_C8I] - + k[7237]*y_cur[IDX_GC8I] + k[7419]*y_cur[IDX_GC8I] + - k[7601]*y_cur[IDX_GC8I] + k[8678]*y_cur[IDX_GCI]*y_cur[IDX_GC7I]; - ydot[yistart + IDX_C8II] = 0.0 + - k[352]*y_cur[IDX_HII]*y_cur[IDX_C8I] - - k[877]*y_cur[IDX_C8II]*y_cur[IDX_eM] - - k[878]*y_cur[IDX_C8II]*y_cur[IDX_eM] + - k[1332]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] + - k[1334]*y_cur[IDX_CII]*y_cur[IDX_C7HI] + - k[1876]*y_cur[IDX_CI]*y_cur[IDX_C7HII] + - k[1877]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + - k[2311]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - - k[2422]*y_cur[IDX_H2I]*y_cur[IDX_C8II] + - k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + - k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + - k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] + - k[5500]*y_cur[IDX_CII]*y_cur[IDX_C7I] + k[6053]*y_cur[IDX_C8I] - - k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] - - k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C8M] = 0.0 - k[36]*y_cur[IDX_C8M]*y_cur[IDX_C2I] - - k[51]*y_cur[IDX_CI]*y_cur[IDX_C8M] - - k[101]*y_cur[IDX_HI]*y_cur[IDX_C8M] - - k[3436]*y_cur[IDX_NI]*y_cur[IDX_C8M] - - k[3437]*y_cur[IDX_NI]*y_cur[IDX_C8M] - - k[3438]*y_cur[IDX_NI]*y_cur[IDX_C8M] - - k[3439]*y_cur[IDX_NI]*y_cur[IDX_C8M] + - k[3445]*y_cur[IDX_NI]*y_cur[IDX_C9M] - - k[3717]*y_cur[IDX_OI]*y_cur[IDX_C8M] + - k[3721]*y_cur[IDX_OI]*y_cur[IDX_C9M] - - k[4481]*y_cur[IDX_C8M]*y_cur[IDX_CII] - - k[4482]*y_cur[IDX_C8M]*y_cur[IDX_C2H2II] - - k[4483]*y_cur[IDX_C8M]*y_cur[IDX_C2H3II] - - k[4484]*y_cur[IDX_C8M]*y_cur[IDX_C4H2II] - - k[4485]*y_cur[IDX_C8M]*y_cur[IDX_C4H3II] - - k[4486]*y_cur[IDX_C8M]*y_cur[IDX_C4SII] - - k[4487]*y_cur[IDX_C8M]*y_cur[IDX_CH2CCHII] - - k[4488]*y_cur[IDX_C8M]*y_cur[IDX_CH3II] - - k[4489]*y_cur[IDX_C8M]*y_cur[IDX_CNCII] - - k[4490]*y_cur[IDX_C8M]*y_cur[IDX_FeII] - - k[4491]*y_cur[IDX_C8M]*y_cur[IDX_HII] - - k[4492]*y_cur[IDX_C8M]*y_cur[IDX_H2COII] - - k[4493]*y_cur[IDX_C8M]*y_cur[IDX_H2SII] - - k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] - - k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] - - k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] - - k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] - - k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] - - k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] - - k[4500]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] - - k[4501]*y_cur[IDX_C8M]*y_cur[IDX_HeII] - - k[4502]*y_cur[IDX_C8M]*y_cur[IDX_MgII] - - k[4503]*y_cur[IDX_C8M]*y_cur[IDX_NII] - - k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] - - k[4505]*y_cur[IDX_C8M]*y_cur[IDX_NH3II] - - k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] - - k[4507]*y_cur[IDX_C8M]*y_cur[IDX_NOII] - - k[4508]*y_cur[IDX_C8M]*y_cur[IDX_NaII] - - k[4509]*y_cur[IDX_C8M]*y_cur[IDX_OII] - - k[4510]*y_cur[IDX_C8M]*y_cur[IDX_SII] - - k[4511]*y_cur[IDX_C8M]*y_cur[IDX_SOII] - - k[4512]*y_cur[IDX_C8M]*y_cur[IDX_SiII] - - k[4513]*y_cur[IDX_C8M]*y_cur[IDX_SiOII] - - k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] - - k[4515]*y_cur[IDX_C8M]*y_cur[IDX_SiSII] + - k[5603]*y_cur[IDX_C8I]*y_cur[IDX_eM] - k[5761]*y_cur[IDX_C8M] - - k[6051]*y_cur[IDX_C8M]; - ydot[yistart + IDX_C8HI] = 0.0 + k[50]*y_cur[IDX_CI]*y_cur[IDX_C7HM] - + k[101]*y_cur[IDX_HI]*y_cur[IDX_C8M] - - k[354]*y_cur[IDX_HII]*y_cur[IDX_C8HI] + - k[882]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + - k[884]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + - k[886]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + - k[888]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + - k[891]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + - k[1086]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] - - k[1337]*y_cur[IDX_CII]*y_cur[IDX_C8HI] - - k[1505]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - - k[1506]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - - k[2060]*y_cur[IDX_CH3II]*y_cur[IDX_C8HI] - - k[2311]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - - k[2627]*y_cur[IDX_H3II]*y_cur[IDX_C8HI] - - k[2932]*y_cur[IDX_HCOII]*y_cur[IDX_C8HI] - - k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] - - k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + - k[3448]*y_cur[IDX_NI]*y_cur[IDX_C9HM] + - k[3724]*y_cur[IDX_OI]*y_cur[IDX_C9H2II] + - k[4516]*y_cur[IDX_C8HM]*y_cur[IDX_CII] + - k[4517]*y_cur[IDX_C8HM]*y_cur[IDX_C2H2II] + - k[4518]*y_cur[IDX_C8HM]*y_cur[IDX_C2H3II] + - k[4519]*y_cur[IDX_C8HM]*y_cur[IDX_C4H2II] + - k[4520]*y_cur[IDX_C8HM]*y_cur[IDX_C4H3II] + - k[4521]*y_cur[IDX_C8HM]*y_cur[IDX_C4SII] + - k[4522]*y_cur[IDX_C8HM]*y_cur[IDX_CH2CCHII] + - k[4523]*y_cur[IDX_C8HM]*y_cur[IDX_CH3II] + - k[4524]*y_cur[IDX_C8HM]*y_cur[IDX_CNCII] + - k[4525]*y_cur[IDX_C8HM]*y_cur[IDX_FeII] + - k[4526]*y_cur[IDX_C8HM]*y_cur[IDX_HII] + - k[4527]*y_cur[IDX_C8HM]*y_cur[IDX_H2COII] + - k[4528]*y_cur[IDX_C8HM]*y_cur[IDX_H2SII] + - k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] + - k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] + - k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] + - k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + - k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + - k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + - k[4535]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + - k[4536]*y_cur[IDX_C8HM]*y_cur[IDX_HeII] + - k[4537]*y_cur[IDX_C8HM]*y_cur[IDX_MgII] + - k[4538]*y_cur[IDX_C8HM]*y_cur[IDX_NII] + - k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] + - k[4540]*y_cur[IDX_C8HM]*y_cur[IDX_NH3II] + - k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] + - k[4542]*y_cur[IDX_C8HM]*y_cur[IDX_NOII] + - k[4543]*y_cur[IDX_C8HM]*y_cur[IDX_NaII] + - k[4544]*y_cur[IDX_C8HM]*y_cur[IDX_OII] + - k[4545]*y_cur[IDX_C8HM]*y_cur[IDX_SII] + - k[4546]*y_cur[IDX_C8HM]*y_cur[IDX_SOII] + - k[4547]*y_cur[IDX_C8HM]*y_cur[IDX_SiII] + - k[4548]*y_cur[IDX_C8HM]*y_cur[IDX_SiOII] + - k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] + - k[4550]*y_cur[IDX_C8HM]*y_cur[IDX_SiSII] + - k[4935]*y_cur[IDX_CI]*y_cur[IDX_C7H2I] - - k[4940]*y_cur[IDX_CI]*y_cur[IDX_C8HI] - - k[5249]*y_cur[IDX_NI]*y_cur[IDX_C8HI] - - k[5374]*y_cur[IDX_OI]*y_cur[IDX_C8HI] + - k[5376]*y_cur[IDX_OI]*y_cur[IDX_C9HI] - - k[5604]*y_cur[IDX_C8HI]*y_cur[IDX_eM] + k[5763]*y_cur[IDX_C8HM] + - k[5764]*y_cur[IDX_C8H2I] - k[5765]*y_cur[IDX_C8HI] + - k[5853]*y_cur[IDX_HC9NI] + k[6054]*y_cur[IDX_C8HM] + - k[6056]*y_cur[IDX_C8H2I] - k[6057]*y_cur[IDX_C8HI] - - k[6058]*y_cur[IDX_C8HI] + k[6179]*y_cur[IDX_HC9NI] + - k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + - k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + - k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + - k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + - k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + - k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - - k[7056]*y_cur[IDX_C8HI] + k[7238]*y_cur[IDX_GC8HI] + - k[7420]*y_cur[IDX_GC8HI] + k[7602]*y_cur[IDX_GC8HI] + - k[8643]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] + - k[8679]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] + - k[8732]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I]; - ydot[yistart + IDX_C8HII] = 0.0 + - k[354]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - - k[879]*y_cur[IDX_C8HII]*y_cur[IDX_eM] - - k[880]*y_cur[IDX_C8HII]*y_cur[IDX_eM] + - k[1333]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] + - k[1497]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] + - k[1558]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] + - k[1765]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] + - k[1831]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] + - k[1878]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + - k[1879]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] + - k[2310]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] + - k[2422]*y_cur[IDX_H2I]*y_cur[IDX_C8II] - - k[2423]*y_cur[IDX_H2I]*y_cur[IDX_C8HII] + - k[2625]*y_cur[IDX_H3II]*y_cur[IDX_C8I] + - k[2930]*y_cur[IDX_HCOII]*y_cur[IDX_C8I] + - k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] + k[6058]*y_cur[IDX_C8HI] - - k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] - - k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C8HM] = 0.0 - k[52]*y_cur[IDX_CI]*y_cur[IDX_C8HM] - - k[102]*y_cur[IDX_HI]*y_cur[IDX_C8HM] - - k[3440]*y_cur[IDX_NI]*y_cur[IDX_C8HM] - - k[3441]*y_cur[IDX_NI]*y_cur[IDX_C8HM] - - k[3718]*y_cur[IDX_OI]*y_cur[IDX_C8HM] + - k[3723]*y_cur[IDX_OI]*y_cur[IDX_C9HM] - - k[4516]*y_cur[IDX_C8HM]*y_cur[IDX_CII] - - k[4517]*y_cur[IDX_C8HM]*y_cur[IDX_C2H2II] - - k[4518]*y_cur[IDX_C8HM]*y_cur[IDX_C2H3II] - - k[4519]*y_cur[IDX_C8HM]*y_cur[IDX_C4H2II] - - k[4520]*y_cur[IDX_C8HM]*y_cur[IDX_C4H3II] - - k[4521]*y_cur[IDX_C8HM]*y_cur[IDX_C4SII] - - k[4522]*y_cur[IDX_C8HM]*y_cur[IDX_CH2CCHII] - - k[4523]*y_cur[IDX_C8HM]*y_cur[IDX_CH3II] - - k[4524]*y_cur[IDX_C8HM]*y_cur[IDX_CNCII] - - k[4525]*y_cur[IDX_C8HM]*y_cur[IDX_FeII] - - k[4526]*y_cur[IDX_C8HM]*y_cur[IDX_HII] - - k[4527]*y_cur[IDX_C8HM]*y_cur[IDX_H2COII] - - k[4528]*y_cur[IDX_C8HM]*y_cur[IDX_H2SII] - - k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] - - k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] - - k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] - - k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] - - k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] - - k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] - - k[4535]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] - - k[4536]*y_cur[IDX_C8HM]*y_cur[IDX_HeII] - - k[4537]*y_cur[IDX_C8HM]*y_cur[IDX_MgII] - - k[4538]*y_cur[IDX_C8HM]*y_cur[IDX_NII] - - k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] - - k[4540]*y_cur[IDX_C8HM]*y_cur[IDX_NH3II] - - k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] - - k[4542]*y_cur[IDX_C8HM]*y_cur[IDX_NOII] - - k[4543]*y_cur[IDX_C8HM]*y_cur[IDX_NaII] - - k[4544]*y_cur[IDX_C8HM]*y_cur[IDX_OII] - - k[4545]*y_cur[IDX_C8HM]*y_cur[IDX_SII] - - k[4546]*y_cur[IDX_C8HM]*y_cur[IDX_SOII] - - k[4547]*y_cur[IDX_C8HM]*y_cur[IDX_SiII] - - k[4548]*y_cur[IDX_C8HM]*y_cur[IDX_SiOII] - - k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] - - k[4550]*y_cur[IDX_C8HM]*y_cur[IDX_SiSII] + - k[5604]*y_cur[IDX_C8HI]*y_cur[IDX_eM] - k[5763]*y_cur[IDX_C8HM] - - k[6054]*y_cur[IDX_C8HM]; - ydot[yistart + IDX_C8H2I] = 0.0 + - k[102]*y_cur[IDX_HI]*y_cur[IDX_C8HM] - - k[353]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] + - k[883]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + - k[885]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + - k[887]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] - - k[1335]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] - - k[1336]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] - - k[1503]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] - - k[1504]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] - - k[2059]*y_cur[IDX_CH3II]*y_cur[IDX_C8H2I] - - k[2310]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] - - k[2626]*y_cur[IDX_H3II]*y_cur[IDX_C8H2I] - - k[2931]*y_cur[IDX_HCOII]*y_cur[IDX_C8H2I] - - k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - - k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - - k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3725]*y_cur[IDX_OI]*y_cur[IDX_C9H3II] + - k[4891]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2I] - - k[4893]*y_cur[IDX_C2HI]*y_cur[IDX_C8H2I] - - k[4939]*y_cur[IDX_CI]*y_cur[IDX_C8H2I] + - k[4951]*y_cur[IDX_CI]*y_cur[IDX_CH3C6HI] - - k[5108]*y_cur[IDX_CNI]*y_cur[IDX_C8H2I] - k[5764]*y_cur[IDX_C8H2I] - - k[6055]*y_cur[IDX_C8H2I] - k[6056]*y_cur[IDX_C8H2I] + - k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + - k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + - k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] - - k[7058]*y_cur[IDX_C8H2I] + k[7240]*y_cur[IDX_GC8H2I] + - k[7422]*y_cur[IDX_GC8H2I] + k[7604]*y_cur[IDX_GC8H2I] + - k[8644]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] + - k[8733]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI]; - ydot[yistart + IDX_C8H2II] = 0.0 + - k[353]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] - - k[881]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] - - k[882]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + - k[1361]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] + - k[1495]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + - k[1498]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] + - k[1559]*y_cur[IDX_C2H2I]*y_cur[IDX_C6HII] + - k[1600]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + - k[1665]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] + - k[1739]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2II] + - k[1763]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] + - k[1766]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] + - k[1790]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] + - k[1800]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] + - k[1826]*y_cur[IDX_C3HI]*y_cur[IDX_C5H2II] + - k[1834]*y_cur[IDX_C4HII]*y_cur[IDX_C4H2I] + - k[1843]*y_cur[IDX_C4HI]*y_cur[IDX_C4H2II] + - k[1880]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] - - k[1881]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] - - k[1882]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + - k[2024]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] + - k[2058]*y_cur[IDX_CH3II]*y_cur[IDX_C7HI] - - k[2188]*y_cur[IDX_CH4I]*y_cur[IDX_C8H2II] + - k[2423]*y_cur[IDX_H2I]*y_cur[IDX_C8HII] + - k[2481]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + - k[2627]*y_cur[IDX_H3II]*y_cur[IDX_C8HI] + - k[2932]*y_cur[IDX_HCOII]*y_cur[IDX_C8HI] - - k[3719]*y_cur[IDX_OI]*y_cur[IDX_C8H2II] + k[6055]*y_cur[IDX_C8H2I] - - k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] - - k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C8H3II] = 0.0 - - k[883]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] - - k[884]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + - k[1362]*y_cur[IDX_CII]*y_cur[IDX_CH3C7NI] + - k[1496]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + - k[1596]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + - k[1601]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + - k[1639]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + - k[1663]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] + - k[1764]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] + - k[1791]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] + - k[1798]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] + - k[1801]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] + - k[1838]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] + - k[1844]*y_cur[IDX_C4HI]*y_cur[IDX_C4H3II] - - k[1883]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - - k[1884]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] + - k[2022]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] + - k[2025]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] + - k[2037]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + - k[2057]*y_cur[IDX_CH3II]*y_cur[IDX_C7H2I] + - k[2482]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + - k[2626]*y_cur[IDX_H3II]*y_cur[IDX_C8H2I] + - k[2931]*y_cur[IDX_HCOII]*y_cur[IDX_C8H2I] - - k[3720]*y_cur[IDX_OI]*y_cur[IDX_C8H3II] - - k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] - - k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C8H4II] = 0.0 - - k[885]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] - - k[886]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + - k[1597]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + - k[1640]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + - k[1660]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] + - k[1662]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] + - k[1703]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H2II] + - k[1799]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] + - k[2023]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] + - k[2038]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + - k[2109]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C5H2II] + - k[2187]*y_cur[IDX_CH4I]*y_cur[IDX_C7H2II] + - k[5518]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - - k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] - - k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C8H5II] = 0.0 - - k[887]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] - - k[888]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + - k[5576]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] - - k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] - - k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C9I] = 0.0 + k[15]*y_cur[IDX_C2M]*y_cur[IDX_C7I] - + k[20]*y_cur[IDX_C3M]*y_cur[IDX_C6I] + - k[25]*y_cur[IDX_C4M]*y_cur[IDX_C5I] + - k[29]*y_cur[IDX_C5M]*y_cur[IDX_C4I] + - k[32]*y_cur[IDX_C6M]*y_cur[IDX_C3I] + - k[34]*y_cur[IDX_C7M]*y_cur[IDX_C2I] + - k[51]*y_cur[IDX_CI]*y_cur[IDX_C8M] - - k[355]*y_cur[IDX_HII]*y_cur[IDX_C9I] + - k[728]*y_cur[IDX_C10II]*y_cur[IDX_eM] + - k[738]*y_cur[IDX_C11II]*y_cur[IDX_eM] + - k[892]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + - k[893]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] - - k[2628]*y_cur[IDX_H3II]*y_cur[IDX_C9I] - - k[2933]*y_cur[IDX_HCOII]*y_cur[IDX_C9I] - - k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] - - k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + - k[3379]*y_cur[IDX_NI]*y_cur[IDX_C10M] + - k[3679]*y_cur[IDX_OI]*y_cur[IDX_C10HII] + - k[4551]*y_cur[IDX_C9M]*y_cur[IDX_CII] + - k[4552]*y_cur[IDX_C9M]*y_cur[IDX_C2H2II] + - k[4553]*y_cur[IDX_C9M]*y_cur[IDX_C2H3II] + - k[4554]*y_cur[IDX_C9M]*y_cur[IDX_C4H2II] + - k[4555]*y_cur[IDX_C9M]*y_cur[IDX_C4H3II] + - k[4556]*y_cur[IDX_C9M]*y_cur[IDX_C4SII] + - k[4557]*y_cur[IDX_C9M]*y_cur[IDX_CH2CCHII] + - k[4558]*y_cur[IDX_C9M]*y_cur[IDX_CH3II] + - k[4559]*y_cur[IDX_C9M]*y_cur[IDX_CNCII] + - k[4560]*y_cur[IDX_C9M]*y_cur[IDX_FeII] + - k[4561]*y_cur[IDX_C9M]*y_cur[IDX_HII] + - k[4562]*y_cur[IDX_C9M]*y_cur[IDX_H2COII] + - k[4563]*y_cur[IDX_C9M]*y_cur[IDX_H2SII] + - k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] + - k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] + - k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] + - k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + - k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + - k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + - k[4570]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + - k[4571]*y_cur[IDX_C9M]*y_cur[IDX_HeII] + - k[4572]*y_cur[IDX_C9M]*y_cur[IDX_MgII] + - k[4573]*y_cur[IDX_C9M]*y_cur[IDX_NII] + - k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] + - k[4575]*y_cur[IDX_C9M]*y_cur[IDX_NH3II] + - k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] + - k[4577]*y_cur[IDX_C9M]*y_cur[IDX_NOII] + - k[4578]*y_cur[IDX_C9M]*y_cur[IDX_NaII] + - k[4579]*y_cur[IDX_C9M]*y_cur[IDX_OII] + - k[4580]*y_cur[IDX_C9M]*y_cur[IDX_SII] + - k[4581]*y_cur[IDX_C9M]*y_cur[IDX_SOII] + - k[4582]*y_cur[IDX_C9M]*y_cur[IDX_SiII] + - k[4583]*y_cur[IDX_C9M]*y_cur[IDX_SiOII] + - k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] + - k[4585]*y_cur[IDX_C9M]*y_cur[IDX_SiSII] + - k[4940]*y_cur[IDX_CI]*y_cur[IDX_C8HI] + - k[4943]*y_cur[IDX_CI]*y_cur[IDX_C9NI] + - k[5221]*y_cur[IDX_NI]*y_cur[IDX_C10I] - - k[5250]*y_cur[IDX_NI]*y_cur[IDX_C9I] + - k[5340]*y_cur[IDX_OI]*y_cur[IDX_C10I] - - k[5375]*y_cur[IDX_OI]*y_cur[IDX_C9I] - - k[5502]*y_cur[IDX_CII]*y_cur[IDX_C9I] - - k[5605]*y_cur[IDX_C9I]*y_cur[IDX_eM] + k[5688]*y_cur[IDX_C10I] + - k[5766]*y_cur[IDX_C9M] - k[5767]*y_cur[IDX_C9I] + - k[5770]*y_cur[IDX_C9HI] + k[5955]*y_cur[IDX_C10I] + - k[5968]*y_cur[IDX_C10HI] + k[5974]*y_cur[IDX_C11I] + - k[6059]*y_cur[IDX_C9M] - k[6060]*y_cur[IDX_C9I] - - k[6061]*y_cur[IDX_C9I] + k[6065]*y_cur[IDX_C9HI] + - k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + - k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + - k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + - k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7060]*y_cur[IDX_C9I] - + k[7242]*y_cur[IDX_GC9I] + k[7424]*y_cur[IDX_GC9I] + - k[7606]*y_cur[IDX_GC9I] + k[8680]*y_cur[IDX_GCI]*y_cur[IDX_GC8I]; - ydot[yistart + IDX_C9II] = 0.0 + - k[355]*y_cur[IDX_HII]*y_cur[IDX_C9I] - - k[889]*y_cur[IDX_C9II]*y_cur[IDX_eM] - - k[890]*y_cur[IDX_C9II]*y_cur[IDX_eM] + - k[1335]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] + - k[1337]*y_cur[IDX_CII]*y_cur[IDX_C8HI] + - k[1881]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + - k[2313]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - - k[2424]*y_cur[IDX_H2I]*y_cur[IDX_C9II] + - k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + - k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + - k[5501]*y_cur[IDX_CII]*y_cur[IDX_C8I] + k[6061]*y_cur[IDX_C9I] - - k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] - - k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C9M] = 0.0 - k[53]*y_cur[IDX_CI]*y_cur[IDX_C9M] - - k[103]*y_cur[IDX_HI]*y_cur[IDX_C9M] - - k[120]*y_cur[IDX_NI]*y_cur[IDX_C9M] + - k[3380]*y_cur[IDX_NI]*y_cur[IDX_C10M] - - k[3442]*y_cur[IDX_NI]*y_cur[IDX_C9M] - - k[3443]*y_cur[IDX_NI]*y_cur[IDX_C9M] - - k[3444]*y_cur[IDX_NI]*y_cur[IDX_C9M] - - k[3445]*y_cur[IDX_NI]*y_cur[IDX_C9M] + - k[3678]*y_cur[IDX_OI]*y_cur[IDX_C10M] - - k[3721]*y_cur[IDX_OI]*y_cur[IDX_C9M] - - k[4551]*y_cur[IDX_C9M]*y_cur[IDX_CII] - - k[4552]*y_cur[IDX_C9M]*y_cur[IDX_C2H2II] - - k[4553]*y_cur[IDX_C9M]*y_cur[IDX_C2H3II] - - k[4554]*y_cur[IDX_C9M]*y_cur[IDX_C4H2II] - - k[4555]*y_cur[IDX_C9M]*y_cur[IDX_C4H3II] - - k[4556]*y_cur[IDX_C9M]*y_cur[IDX_C4SII] - - k[4557]*y_cur[IDX_C9M]*y_cur[IDX_CH2CCHII] - - k[4558]*y_cur[IDX_C9M]*y_cur[IDX_CH3II] - - k[4559]*y_cur[IDX_C9M]*y_cur[IDX_CNCII] - - k[4560]*y_cur[IDX_C9M]*y_cur[IDX_FeII] - - k[4561]*y_cur[IDX_C9M]*y_cur[IDX_HII] - - k[4562]*y_cur[IDX_C9M]*y_cur[IDX_H2COII] - - k[4563]*y_cur[IDX_C9M]*y_cur[IDX_H2SII] - - k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] - - k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] - - k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] - - k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] - - k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] - - k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] - - k[4570]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] - - k[4571]*y_cur[IDX_C9M]*y_cur[IDX_HeII] - - k[4572]*y_cur[IDX_C9M]*y_cur[IDX_MgII] - - k[4573]*y_cur[IDX_C9M]*y_cur[IDX_NII] - - k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] - - k[4575]*y_cur[IDX_C9M]*y_cur[IDX_NH3II] - - k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] - - k[4577]*y_cur[IDX_C9M]*y_cur[IDX_NOII] - - k[4578]*y_cur[IDX_C9M]*y_cur[IDX_NaII] - - k[4579]*y_cur[IDX_C9M]*y_cur[IDX_OII] - - k[4580]*y_cur[IDX_C9M]*y_cur[IDX_SII] - - k[4581]*y_cur[IDX_C9M]*y_cur[IDX_SOII] - - k[4582]*y_cur[IDX_C9M]*y_cur[IDX_SiII] - - k[4583]*y_cur[IDX_C9M]*y_cur[IDX_SiOII] - - k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] - - k[4585]*y_cur[IDX_C9M]*y_cur[IDX_SiSII] + - k[5605]*y_cur[IDX_C9I]*y_cur[IDX_eM] - k[5766]*y_cur[IDX_C9M] - - k[6059]*y_cur[IDX_C9M]; - ydot[yistart + IDX_C9HI] = 0.0 + k[52]*y_cur[IDX_CI]*y_cur[IDX_C8HM] - + k[103]*y_cur[IDX_HI]*y_cur[IDX_C9M] - - k[357]*y_cur[IDX_HII]*y_cur[IDX_C9HI] + - k[894]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] + - k[896]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + - k[898]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + - k[900]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] - - k[1340]*y_cur[IDX_CII]*y_cur[IDX_C9HI] - - k[2313]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - - k[2630]*y_cur[IDX_H3II]*y_cur[IDX_C9HI] - - k[2935]*y_cur[IDX_HCOII]*y_cur[IDX_C9HI] - - k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] - - k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + - k[3382]*y_cur[IDX_NI]*y_cur[IDX_C10HM] + - k[3682]*y_cur[IDX_OI]*y_cur[IDX_C10H2II] + - k[4586]*y_cur[IDX_C9HM]*y_cur[IDX_CII] + - k[4587]*y_cur[IDX_C9HM]*y_cur[IDX_C2H2II] + - k[4588]*y_cur[IDX_C9HM]*y_cur[IDX_C2H3II] + - k[4589]*y_cur[IDX_C9HM]*y_cur[IDX_C4H2II] + - k[4590]*y_cur[IDX_C9HM]*y_cur[IDX_C4H3II] + - k[4591]*y_cur[IDX_C9HM]*y_cur[IDX_C4SII] + - k[4592]*y_cur[IDX_C9HM]*y_cur[IDX_CH2CCHII] + - k[4593]*y_cur[IDX_C9HM]*y_cur[IDX_CH3II] + - k[4594]*y_cur[IDX_C9HM]*y_cur[IDX_CNCII] + - k[4595]*y_cur[IDX_C9HM]*y_cur[IDX_FeII] + - k[4596]*y_cur[IDX_C9HM]*y_cur[IDX_HII] + - k[4597]*y_cur[IDX_C9HM]*y_cur[IDX_H2COII] + - k[4598]*y_cur[IDX_C9HM]*y_cur[IDX_H2SII] + - k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] + - k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] + - k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] + - k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + - k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + - k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + - k[4605]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + - k[4606]*y_cur[IDX_C9HM]*y_cur[IDX_HeII] + - k[4607]*y_cur[IDX_C9HM]*y_cur[IDX_MgII] + - k[4608]*y_cur[IDX_C9HM]*y_cur[IDX_NII] + - k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] + - k[4610]*y_cur[IDX_C9HM]*y_cur[IDX_NH3II] + - k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] + - k[4612]*y_cur[IDX_C9HM]*y_cur[IDX_NOII] + - k[4613]*y_cur[IDX_C9HM]*y_cur[IDX_NaII] + - k[4614]*y_cur[IDX_C9HM]*y_cur[IDX_OII] + - k[4615]*y_cur[IDX_C9HM]*y_cur[IDX_SII] + - k[4616]*y_cur[IDX_C9HM]*y_cur[IDX_SOII] + - k[4617]*y_cur[IDX_C9HM]*y_cur[IDX_SiII] + - k[4618]*y_cur[IDX_C9HM]*y_cur[IDX_SiOII] + - k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] + - k[4620]*y_cur[IDX_C9HM]*y_cur[IDX_SiSII] + - k[4939]*y_cur[IDX_CI]*y_cur[IDX_C8H2I] - - k[4942]*y_cur[IDX_CI]*y_cur[IDX_C9HI] - - k[5251]*y_cur[IDX_NI]*y_cur[IDX_C9HI] + - k[5341]*y_cur[IDX_OI]*y_cur[IDX_C10HI] - - k[5376]*y_cur[IDX_OI]*y_cur[IDX_C9HI] - - k[5606]*y_cur[IDX_C9HI]*y_cur[IDX_eM] + k[5768]*y_cur[IDX_C9HM] + - k[5769]*y_cur[IDX_C9H2I] - k[5770]*y_cur[IDX_C9HI] + - k[6062]*y_cur[IDX_C9HM] + k[6064]*y_cur[IDX_C9H2I] - - k[6065]*y_cur[IDX_C9HI] - k[6066]*y_cur[IDX_C9HI] + - k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + - k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + - k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + - k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] - - k[7061]*y_cur[IDX_C9HI] + k[7243]*y_cur[IDX_GC9HI] + - k[7425]*y_cur[IDX_GC9HI] + k[7607]*y_cur[IDX_GC9HI] + - k[8646]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] + - k[8681]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] + - k[8734]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I]; - ydot[yistart + IDX_C9HII] = 0.0 + - k[357]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - - k[891]*y_cur[IDX_C9HII]*y_cur[IDX_eM] - - k[892]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + - k[1299]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + - k[1336]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] + - k[1406]*y_cur[IDX_CII]*y_cur[IDX_HC9NI] + - k[1501]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] + - k[1769]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] + - k[1833]*y_cur[IDX_C4HII]*y_cur[IDX_C5HI] + - k[1882]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + - k[1883]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - - k[1885]*y_cur[IDX_CI]*y_cur[IDX_C9HII] + - k[2293]*y_cur[IDX_HII]*y_cur[IDX_C10I] + - k[2312]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] + - k[2424]*y_cur[IDX_H2I]*y_cur[IDX_C9II] - - k[2425]*y_cur[IDX_H2I]*y_cur[IDX_C9HII] + - k[2628]*y_cur[IDX_H3II]*y_cur[IDX_C9I] + - k[2933]*y_cur[IDX_HCOII]*y_cur[IDX_C9I] + - k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - - k[3446]*y_cur[IDX_NI]*y_cur[IDX_C9HII] + - k[3680]*y_cur[IDX_OI]*y_cur[IDX_C10HII] - - k[3722]*y_cur[IDX_OI]*y_cur[IDX_C9HII] + k[6066]*y_cur[IDX_C9HI] - - k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] - - k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C9HM] = 0.0 - k[54]*y_cur[IDX_CI]*y_cur[IDX_C9HM] - - k[104]*y_cur[IDX_HI]*y_cur[IDX_C9HM] - - k[121]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - - k[3447]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - - k[3448]*y_cur[IDX_NI]*y_cur[IDX_C9HM] + - k[3681]*y_cur[IDX_OI]*y_cur[IDX_C10HM] - - k[3723]*y_cur[IDX_OI]*y_cur[IDX_C9HM] - - k[4586]*y_cur[IDX_C9HM]*y_cur[IDX_CII] - - k[4587]*y_cur[IDX_C9HM]*y_cur[IDX_C2H2II] - - k[4588]*y_cur[IDX_C9HM]*y_cur[IDX_C2H3II] - - k[4589]*y_cur[IDX_C9HM]*y_cur[IDX_C4H2II] - - k[4590]*y_cur[IDX_C9HM]*y_cur[IDX_C4H3II] - - k[4591]*y_cur[IDX_C9HM]*y_cur[IDX_C4SII] - - k[4592]*y_cur[IDX_C9HM]*y_cur[IDX_CH2CCHII] - - k[4593]*y_cur[IDX_C9HM]*y_cur[IDX_CH3II] - - k[4594]*y_cur[IDX_C9HM]*y_cur[IDX_CNCII] - - k[4595]*y_cur[IDX_C9HM]*y_cur[IDX_FeII] - - k[4596]*y_cur[IDX_C9HM]*y_cur[IDX_HII] - - k[4597]*y_cur[IDX_C9HM]*y_cur[IDX_H2COII] - - k[4598]*y_cur[IDX_C9HM]*y_cur[IDX_H2SII] - - k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] - - k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] - - k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] - - k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] - - k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] - - k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] - - k[4605]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] - - k[4606]*y_cur[IDX_C9HM]*y_cur[IDX_HeII] - - k[4607]*y_cur[IDX_C9HM]*y_cur[IDX_MgII] - - k[4608]*y_cur[IDX_C9HM]*y_cur[IDX_NII] - - k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] - - k[4610]*y_cur[IDX_C9HM]*y_cur[IDX_NH3II] - - k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] - - k[4612]*y_cur[IDX_C9HM]*y_cur[IDX_NOII] - - k[4613]*y_cur[IDX_C9HM]*y_cur[IDX_NaII] - - k[4614]*y_cur[IDX_C9HM]*y_cur[IDX_OII] - - k[4615]*y_cur[IDX_C9HM]*y_cur[IDX_SII] - - k[4616]*y_cur[IDX_C9HM]*y_cur[IDX_SOII] - - k[4617]*y_cur[IDX_C9HM]*y_cur[IDX_SiII] - - k[4618]*y_cur[IDX_C9HM]*y_cur[IDX_SiOII] - - k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] - - k[4620]*y_cur[IDX_C9HM]*y_cur[IDX_SiSII] + - k[5606]*y_cur[IDX_C9HI]*y_cur[IDX_eM] - k[5768]*y_cur[IDX_C9HM] - - k[6062]*y_cur[IDX_C9HM]; - ydot[yistart + IDX_C9H2I] = 0.0 + - k[104]*y_cur[IDX_HI]*y_cur[IDX_C9HM] - - k[356]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] + - k[734]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + - k[895]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + - k[897]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + - k[899]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] - - k[1338]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] - - k[1339]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] - - k[2312]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] - - k[2629]*y_cur[IDX_H3II]*y_cur[IDX_C9H2I] - - k[2934]*y_cur[IDX_HCOII]*y_cur[IDX_C9H2I] - - k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - - k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - - k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + - k[3683]*y_cur[IDX_OI]*y_cur[IDX_C10H3II] + - k[4892]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2I] - - k[4941]*y_cur[IDX_CI]*y_cur[IDX_C9H2I] - k[5769]*y_cur[IDX_C9H2I] - - k[6063]*y_cur[IDX_C9H2I] - k[6064]*y_cur[IDX_C9H2I] + - k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + - k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + - k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + - k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - - k[7062]*y_cur[IDX_C9H2I] + k[7244]*y_cur[IDX_GC9H2I] + - k[7426]*y_cur[IDX_GC9H2I] + k[7608]*y_cur[IDX_GC9H2I] + - k[8647]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] + - k[8735]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI]; - ydot[yistart + IDX_C9H2II] = 0.0 + - k[356]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] - - k[893]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] - - k[894]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] + - k[1499]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + - k[1502]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] + - k[1560]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + - k[1606]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + - k[1740]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2II] + - k[1767]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] + - k[1770]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] + - k[1792]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + - k[1803]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] + - k[1827]*y_cur[IDX_C3HI]*y_cur[IDX_C6H2II] + - k[1832]*y_cur[IDX_C4HII]*y_cur[IDX_C5H2I] + - k[1836]*y_cur[IDX_C4H2II]*y_cur[IDX_C5HI] + - k[1845]*y_cur[IDX_C4HI]*y_cur[IDX_C5H2II] + - k[1884]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - - k[1886]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] - - k[1887]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] + - k[2027]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] + - k[2060]*y_cur[IDX_CH3II]*y_cur[IDX_C8HI] + - k[2425]*y_cur[IDX_H2I]*y_cur[IDX_C9HII] + - k[2483]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + - k[2630]*y_cur[IDX_H3II]*y_cur[IDX_C9HI] + - k[2935]*y_cur[IDX_HCOII]*y_cur[IDX_C9HI] - - k[3449]*y_cur[IDX_NI]*y_cur[IDX_C9H2II] - - k[3724]*y_cur[IDX_OI]*y_cur[IDX_C9H2II] + k[6063]*y_cur[IDX_C9H2I] - - k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] - - k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C9H3II] = 0.0 - - k[895]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] - - k[896]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + - k[1500]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + - k[1561]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + - k[1603]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + - k[1607]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + - k[1641]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + - k[1768]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] + - k[1793]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + - k[1802]*y_cur[IDX_C3H3II]*y_cur[IDX_C6H2I] + - k[1804]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] + - k[1835]*y_cur[IDX_C4H2II]*y_cur[IDX_C5H2I] + - k[1839]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] + - k[1841]*y_cur[IDX_C4H3II]*y_cur[IDX_C5HI] - - k[1888]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] - - k[1889]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + - k[2026]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6H2I] + - k[2028]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] + - k[2039]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + - k[2059]*y_cur[IDX_CH3II]*y_cur[IDX_C8H2I] + - k[2484]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + - k[2629]*y_cur[IDX_H3II]*y_cur[IDX_C9H2I] + - k[2934]*y_cur[IDX_HCOII]*y_cur[IDX_C9H2I] - - k[3450]*y_cur[IDX_NI]*y_cur[IDX_C9H3II] - - k[3725]*y_cur[IDX_OI]*y_cur[IDX_C9H3II] + - k[5577]*y_cur[IDX_C4H2I]*y_cur[IDX_C5HII] - - k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] - - k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C9H4II] = 0.0 - - k[897]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] - - k[898]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + - k[1604]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + - k[1642]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + - k[1664]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] + - k[1666]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] + - k[1705]*y_cur[IDX_C2H4I]*y_cur[IDX_C7H2II] + - k[1840]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] + - k[2040]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + - k[2110]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C6H2II] + - k[2188]*y_cur[IDX_CH4I]*y_cur[IDX_C8H2II] - - k[3451]*y_cur[IDX_NI]*y_cur[IDX_C9H4II] + - k[5578]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] - - k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] - - k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C9H5II] = 0.0 - - k[899]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] - - k[900]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + - k[5579]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H3II] - - k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] - - k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_C9NI] = 0.0 + k[120]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[991]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + - k[1032]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + - k[1087]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] - - k[2631]*y_cur[IDX_H3II]*y_cur[IDX_C9NI] - - k[2936]*y_cur[IDX_HCOII]*y_cur[IDX_C9NI] - - k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] - - k[4943]*y_cur[IDX_CI]*y_cur[IDX_C9NI] + - k[5251]*y_cur[IDX_NI]*y_cur[IDX_C9HI] - - k[5252]*y_cur[IDX_NI]*y_cur[IDX_C9NI] - - k[5377]*y_cur[IDX_OI]*y_cur[IDX_C9NI] - k[5771]*y_cur[IDX_C9NI] - - k[6067]*y_cur[IDX_C9NI] - k[6068]*y_cur[IDX_C9NI] + - k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] + - k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + - k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - - k[7066]*y_cur[IDX_C9NI] + k[7248]*y_cur[IDX_GC9NI] + - k[7430]*y_cur[IDX_GC9NI] + k[7612]*y_cur[IDX_GC9NI] + - k[8711]*y_cur[IDX_GNI]*y_cur[IDX_GC9I]; - ydot[yistart + IDX_C9NII] = 0.0 - - k[901]*y_cur[IDX_C9NII]*y_cur[IDX_eM] - - k[2426]*y_cur[IDX_H2I]*y_cur[IDX_C9NII] + - k[3446]*y_cur[IDX_NI]*y_cur[IDX_C9HII] + k[6068]*y_cur[IDX_C9NI] - - k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CCPI] = 0.0 - - k[158]*y_cur[IDX_CII]*y_cur[IDX_CCPI] - - k[358]*y_cur[IDX_HII]*y_cur[IDX_CCPI] + - k[834]*y_cur[IDX_C4PII]*y_cur[IDX_eM] + - k[1059]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + - k[1181]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + - k[1184]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + - k[1187]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + - k[1191]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + - k[1195]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - - k[1341]*y_cur[IDX_CII]*y_cur[IDX_CCPI] - - k[2633]*y_cur[IDX_H3II]*y_cur[IDX_CCPI] - - k[2784]*y_cur[IDX_H3OII]*y_cur[IDX_CCPI] - - k[2937]*y_cur[IDX_HCOII]*y_cur[IDX_CCPI] + - k[3114]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - - k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] - - k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + - k[5360]*y_cur[IDX_OI]*y_cur[IDX_C3PI] - - k[5378]*y_cur[IDX_OI]*y_cur[IDX_CCPI] + k[5724]*y_cur[IDX_C3PI] - - k[5773]*y_cur[IDX_CCPI] - k[5774]*y_cur[IDX_CCPI] + - k[5845]*y_cur[IDX_HC2PI] - k[6070]*y_cur[IDX_CCPI] - - k[6071]*y_cur[IDX_CCPI] + k[6170]*y_cur[IDX_HC2PI] + - k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + - k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + - k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + - k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + - k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + - k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + - k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[7014]*y_cur[IDX_CCPI] + k[7196]*y_cur[IDX_GCCPI] + - k[7378]*y_cur[IDX_GCCPI] + k[7562]*y_cur[IDX_GCCPI]; - ydot[yistart + IDX_CCPII] = 0.0 + - k[158]*y_cur[IDX_CII]*y_cur[IDX_CCPI] + - k[358]*y_cur[IDX_HII]*y_cur[IDX_CCPI] - - k[902]*y_cur[IDX_CCPII]*y_cur[IDX_eM] - - k[903]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + - k[1396]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] + - k[1409]*y_cur[IDX_CII]*y_cur[IDX_HCPI] + - k[1906]*y_cur[IDX_CI]*y_cur[IDX_HCPII] + - k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - - k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] - - k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CClI] = 0.0 - - k[159]*y_cur[IDX_CII]*y_cur[IDX_CClI] + - k[993]*y_cur[IDX_H2CClII]*y_cur[IDX_eM] - - k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] - - k[5379]*y_cur[IDX_OI]*y_cur[IDX_CClI] - - k[5380]*y_cur[IDX_OI]*y_cur[IDX_CClI] - k[5775]*y_cur[IDX_CClI] - - k[6072]*y_cur[IDX_CClI] + - k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] - - k[6991]*y_cur[IDX_CClI] + k[7173]*y_cur[IDX_GCClI] + - k[7355]*y_cur[IDX_GCClI] + k[7537]*y_cur[IDX_GCClI]; - ydot[yistart + IDX_CClII] = 0.0 + - k[159]*y_cur[IDX_CII]*y_cur[IDX_CClI] - - k[904]*y_cur[IDX_CClII]*y_cur[IDX_eM] + - k[1411]*y_cur[IDX_CII]*y_cur[IDX_HClI] - - k[2492]*y_cur[IDX_H2COI]*y_cur[IDX_CClII] - - k[3566]*y_cur[IDX_NH3I]*y_cur[IDX_CClII] - - k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CFII] = 0.0 - - k[905]*y_cur[IDX_CFII]*y_cur[IDX_eM] + - k[1412]*y_cur[IDX_CII]*y_cur[IDX_HFI] - - k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CHI] = 0.0 - k[2]*y_cur[IDX_CM]*y_cur[IDX_CHI] - - k[62]*y_cur[IDX_CHI]*y_cur[IDX_OM] - - k[63]*y_cur[IDX_CHI]*y_cur[IDX_OI] - - k[64]*y_cur[IDX_CHI]*y_cur[IDX_OHM] + - k[68]*y_cur[IDX_HM]*y_cur[IDX_CI] - - k[71]*y_cur[IDX_HM]*y_cur[IDX_CHI] + - k[84]*y_cur[IDX_HI]*y_cur[IDX_CM] - - k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - - k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] - - k[170]*y_cur[IDX_CII]*y_cur[IDX_CHI] + - k[250]*y_cur[IDX_CHII]*y_cur[IDX_FeI] + - k[251]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] + - k[252]*y_cur[IDX_CHII]*y_cur[IDX_MgI] + - k[253]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + - k[254]*y_cur[IDX_CHII]*y_cur[IDX_NOI] + - k[255]*y_cur[IDX_CHII]*y_cur[IDX_NaI] + - k[256]*y_cur[IDX_CHII]*y_cur[IDX_SI] + - k[257]*y_cur[IDX_CHII]*y_cur[IDX_SiI] - - k[287]*y_cur[IDX_CHI]*y_cur[IDX_C2II] - - k[288]*y_cur[IDX_CHI]*y_cur[IDX_CNII] - - k[289]*y_cur[IDX_CHI]*y_cur[IDX_COII] - - k[290]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - - k[291]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] - - k[292]*y_cur[IDX_CHI]*y_cur[IDX_NII] - - k[293]*y_cur[IDX_CHI]*y_cur[IDX_N2II] - - k[294]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] - - k[295]*y_cur[IDX_CHI]*y_cur[IDX_OII] - - k[296]*y_cur[IDX_CHI]*y_cur[IDX_O2II] - - k[297]*y_cur[IDX_CHI]*y_cur[IDX_OHII] - - k[372]*y_cur[IDX_HII]*y_cur[IDX_CHI] - - k[443]*y_cur[IDX_H2II]*y_cur[IDX_CHI] - - k[515]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + - k[741]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + - k[744]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + - k[744]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + - k[753]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[754]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[762]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[799]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[812]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[828]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + - k[909]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + - k[910]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] + - k[917]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + - k[924]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[925]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[960]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + - k[976]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[988]*y_cur[IDX_H2C4NII]*y_cur[IDX_eM] + - k[1035]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1058]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + - k[1060]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + - k[1062]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + - k[1071]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + - k[1073]*y_cur[IDX_HC4NII]*y_cur[IDX_eM] + - k[1075]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] + - k[1092]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + - k[1106]*y_cur[IDX_HCPII]*y_cur[IDX_eM] + - k[1107]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + - k[1109]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + - k[1191]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + - k[1193]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + - k[1240]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] + - k[1262]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] + - k[1302]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1344]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + - k[1356]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + - k[1360]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] + - k[1366]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + - k[1370]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1376]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1378]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] + - k[1381]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - - k[1385]*y_cur[IDX_CII]*y_cur[IDX_CHI] + - k[1391]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + - k[1396]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - - k[1943]*y_cur[IDX_CHII]*y_cur[IDX_CHI] + - k[1984]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + - k[1989]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] + - k[2001]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - - k[2239]*y_cur[IDX_CHI]*y_cur[IDX_C2II] - - k[2240]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] - - k[2241]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] - - k[2242]*y_cur[IDX_CHI]*y_cur[IDX_C2H2II] - - k[2243]*y_cur[IDX_CHI]*y_cur[IDX_CH3II] - - k[2244]*y_cur[IDX_CHI]*y_cur[IDX_CH5II] - - k[2245]*y_cur[IDX_CHI]*y_cur[IDX_COII] - - k[2246]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - - k[2247]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] - - k[2248]*y_cur[IDX_CHI]*y_cur[IDX_H3COII] - - k[2249]*y_cur[IDX_CHI]*y_cur[IDX_H3OII] - - k[2250]*y_cur[IDX_CHI]*y_cur[IDX_HCNII] - - k[2251]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] - - k[2252]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] - - k[2253]*y_cur[IDX_CHI]*y_cur[IDX_HCOII] - - k[2254]*y_cur[IDX_CHI]*y_cur[IDX_HNOII] - - k[2255]*y_cur[IDX_CHI]*y_cur[IDX_HSII] - - k[2256]*y_cur[IDX_CHI]*y_cur[IDX_NII] - - k[2257]*y_cur[IDX_CHI]*y_cur[IDX_N2HII] - - k[2258]*y_cur[IDX_CHI]*y_cur[IDX_NHII] - - k[2259]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] - - k[2260]*y_cur[IDX_CHI]*y_cur[IDX_NH3II] - - k[2261]*y_cur[IDX_CHI]*y_cur[IDX_OII] - - k[2262]*y_cur[IDX_CHI]*y_cur[IDX_O2II] - - k[2263]*y_cur[IDX_CHI]*y_cur[IDX_O2HII] - - k[2264]*y_cur[IDX_CHI]*y_cur[IDX_OHII] - - k[2265]*y_cur[IDX_CHI]*y_cur[IDX_SII] - - k[2266]*y_cur[IDX_CHI]*y_cur[IDX_SiII] - - k[2267]*y_cur[IDX_CHI]*y_cur[IDX_SiHII] - - k[2268]*y_cur[IDX_CHI]*y_cur[IDX_SiOII] - - k[2380]*y_cur[IDX_H2II]*y_cur[IDX_CHI] - - k[2670]*y_cur[IDX_H3II]*y_cur[IDX_CHI] + - k[3018]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + - k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + - k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - - k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + - k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + - k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + - k[3257]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + - k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + - k[3634]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + - k[3645]*y_cur[IDX_OII]*y_cur[IDX_HCNI] + - k[3689]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + - k[3702]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] + - k[3865]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + - k[4621]*y_cur[IDX_CHM]*y_cur[IDX_CII] + - k[4622]*y_cur[IDX_CHM]*y_cur[IDX_C2H2II] + - k[4623]*y_cur[IDX_CHM]*y_cur[IDX_C2H3II] + - k[4624]*y_cur[IDX_CHM]*y_cur[IDX_C4H2II] + - k[4625]*y_cur[IDX_CHM]*y_cur[IDX_C4H3II] + - k[4626]*y_cur[IDX_CHM]*y_cur[IDX_C4SII] + - k[4627]*y_cur[IDX_CHM]*y_cur[IDX_CH2CCHII] + - k[4628]*y_cur[IDX_CHM]*y_cur[IDX_CH3II] + - k[4629]*y_cur[IDX_CHM]*y_cur[IDX_CNCII] + - k[4630]*y_cur[IDX_CHM]*y_cur[IDX_FeII] + - k[4631]*y_cur[IDX_CHM]*y_cur[IDX_HII] + - k[4632]*y_cur[IDX_CHM]*y_cur[IDX_H2COII] + - k[4633]*y_cur[IDX_CHM]*y_cur[IDX_H2SII] + - k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] + - k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] + - k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] + - k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + - k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + - k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + - k[4640]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + - k[4641]*y_cur[IDX_CHM]*y_cur[IDX_HeII] + - k[4642]*y_cur[IDX_CHM]*y_cur[IDX_MgII] + - k[4643]*y_cur[IDX_CHM]*y_cur[IDX_NII] + - k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] + - k[4645]*y_cur[IDX_CHM]*y_cur[IDX_NH3II] + - k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] + - k[4647]*y_cur[IDX_CHM]*y_cur[IDX_NOII] + - k[4648]*y_cur[IDX_CHM]*y_cur[IDX_NaII] + - k[4649]*y_cur[IDX_CHM]*y_cur[IDX_OII] + - k[4650]*y_cur[IDX_CHM]*y_cur[IDX_SII] + - k[4651]*y_cur[IDX_CHM]*y_cur[IDX_SOII] + - k[4652]*y_cur[IDX_CHM]*y_cur[IDX_SiII] + - k[4653]*y_cur[IDX_CHM]*y_cur[IDX_SiOII] + - k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] + - k[4655]*y_cur[IDX_CHM]*y_cur[IDX_SiSII] + - k[4945]*y_cur[IDX_CI]*y_cur[IDX_CH2I] + - k[4945]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - - k[4955]*y_cur[IDX_CI]*y_cur[IDX_CHI] + - k[4963]*y_cur[IDX_CI]*y_cur[IDX_HCOI] + - k[4966]*y_cur[IDX_CI]*y_cur[IDX_HSI] + - k[4971]*y_cur[IDX_CI]*y_cur[IDX_NH2I] + - k[4973]*y_cur[IDX_CI]*y_cur[IDX_NHI] + - k[4982]*y_cur[IDX_CI]*y_cur[IDX_OHI] + - k[4995]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + - k[4997]*y_cur[IDX_CH2I]*y_cur[IDX_CNI] + - k[5015]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + - k[5017]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - - k[5063]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - - k[5064]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - - k[5065]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - - k[5066]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - - k[5067]*y_cur[IDX_CHI]*y_cur[IDX_CH2CCH2I] - - k[5068]*y_cur[IDX_CHI]*y_cur[IDX_CH3CCHI] - - k[5069]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - - k[5070]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - - k[5071]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - - k[5072]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - - k[5073]*y_cur[IDX_CHI]*y_cur[IDX_CH3OHI] - - k[5074]*y_cur[IDX_CHI]*y_cur[IDX_CH4I] - - k[5075]*y_cur[IDX_CHI]*y_cur[IDX_CO2I] - - k[5076]*y_cur[IDX_CHI]*y_cur[IDX_H2COI] - - k[5077]*y_cur[IDX_CHI]*y_cur[IDX_HCOI] - - k[5078]*y_cur[IDX_CHI]*y_cur[IDX_HNOI] - - k[5079]*y_cur[IDX_CHI]*y_cur[IDX_N2I] - - k[5080]*y_cur[IDX_CHI]*y_cur[IDX_NI] - - k[5081]*y_cur[IDX_CHI]*y_cur[IDX_NI] - - k[5082]*y_cur[IDX_CHI]*y_cur[IDX_NH3I] - - k[5083]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - - k[5084]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - - k[5085]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - - k[5086]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5087]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5090]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5091]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5092]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5093]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5094]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - - k[5095]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - - k[5096]*y_cur[IDX_CHI]*y_cur[IDX_OI] - - k[5097]*y_cur[IDX_CHI]*y_cur[IDX_OI] - - k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] - - k[5099]*y_cur[IDX_CHI]*y_cur[IDX_OHI] - - k[5100]*y_cur[IDX_CHI]*y_cur[IDX_SI] - - k[5101]*y_cur[IDX_CHI]*y_cur[IDX_SI] - - k[5102]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - - k[5103]*y_cur[IDX_CHI]*y_cur[IDX_SOI] + - k[5134]*y_cur[IDX_H2I]*y_cur[IDX_CI] - - k[5137]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + - k[5153]*y_cur[IDX_HI]*y_cur[IDX_C2I] + - k[5156]*y_cur[IDX_HI]*y_cur[IDX_CH2I] - - k[5160]*y_cur[IDX_HI]*y_cur[IDX_CHI] + - k[5255]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + - k[5352]*y_cur[IDX_OI]*y_cur[IDX_C2HI] + - k[5410]*y_cur[IDX_OI]*y_cur[IDX_HCSiI] - - k[5556]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + - k[5572]*y_cur[IDX_HI]*y_cur[IDX_CI] + k[5777]*y_cur[IDX_CHM] + - k[5779]*y_cur[IDX_CH2I] + k[5795]*y_cur[IDX_CH3I] - - k[5821]*y_cur[IDX_CHI] + k[5855]*y_cur[IDX_HCNOI] + - k[5863]*y_cur[IDX_HCSiI] + k[5942]*y_cur[IDX_HC2OI] + - k[6074]*y_cur[IDX_CHM] + k[6077]*y_cur[IDX_CH2II] + - k[6079]*y_cur[IDX_CH2I] + k[6099]*y_cur[IDX_CH3I] + - k[6130]*y_cur[IDX_CH4I] - k[6131]*y_cur[IDX_CHI] - - k[6132]*y_cur[IDX_CHI] + k[6182]*y_cur[IDX_HCNOI] + - k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + - k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + - k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + - k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + - k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + - k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + - k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + - k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] + - k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + - k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + - k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM] + - k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM] + - k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + - k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + - k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] + - k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + - k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - k[6892]*y_cur[IDX_CHI] - + k[7074]*y_cur[IDX_GCHI] + k[7256]*y_cur[IDX_GCHI] + - k[7438]*y_cur[IDX_GCHI] + k[8576]*y_cur[IDX_GHI]*y_cur[IDX_GCI]; - ydot[yistart + IDX_CHII] = 0.0 + - k[170]*y_cur[IDX_CII]*y_cur[IDX_CHI] - - k[250]*y_cur[IDX_CHII]*y_cur[IDX_FeI] - - k[251]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] - - k[252]*y_cur[IDX_CHII]*y_cur[IDX_MgI] - - k[253]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - - k[254]*y_cur[IDX_CHII]*y_cur[IDX_NOI] - - k[255]*y_cur[IDX_CHII]*y_cur[IDX_NaI] - - k[256]*y_cur[IDX_CHII]*y_cur[IDX_SI] - - k[257]*y_cur[IDX_CHII]*y_cur[IDX_SiI] + - k[287]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + - k[288]*y_cur[IDX_CHI]*y_cur[IDX_CNII] + - k[289]*y_cur[IDX_CHI]*y_cur[IDX_COII] + - k[290]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] + - k[291]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] + - k[292]*y_cur[IDX_CHI]*y_cur[IDX_NII] + - k[293]*y_cur[IDX_CHI]*y_cur[IDX_N2II] + - k[294]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] + - k[295]*y_cur[IDX_CHI]*y_cur[IDX_OII] + - k[296]*y_cur[IDX_CHI]*y_cur[IDX_O2II] + - k[297]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + - k[372]*y_cur[IDX_HII]*y_cur[IDX_CHI] + - k[443]*y_cur[IDX_H2II]*y_cur[IDX_CHI] + - k[515]*y_cur[IDX_HeII]*y_cur[IDX_CHI] - - k[906]*y_cur[IDX_CHII]*y_cur[IDX_eM] + - k[1408]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - - k[1890]*y_cur[IDX_CI]*y_cur[IDX_CHII] + - k[1898]*y_cur[IDX_CI]*y_cur[IDX_CH5II] + - k[1899]*y_cur[IDX_CI]*y_cur[IDX_H2OII] + - k[1903]*y_cur[IDX_CI]*y_cur[IDX_HCNII] + - k[1904]*y_cur[IDX_CI]*y_cur[IDX_HCOII] + - k[1905]*y_cur[IDX_CI]*y_cur[IDX_HCO2II] + - k[1907]*y_cur[IDX_CI]*y_cur[IDX_HNOII] + - k[1909]*y_cur[IDX_CI]*y_cur[IDX_N2HII] + - k[1910]*y_cur[IDX_CI]*y_cur[IDX_NHII] + - k[1913]*y_cur[IDX_CI]*y_cur[IDX_O2HII] + - k[1914]*y_cur[IDX_CI]*y_cur[IDX_OHII] - - k[1933]*y_cur[IDX_CHII]*y_cur[IDX_C2I] - - k[1934]*y_cur[IDX_CHII]*y_cur[IDX_C2H2I] - - k[1935]*y_cur[IDX_CHII]*y_cur[IDX_C2HI] - - k[1936]*y_cur[IDX_CHII]*y_cur[IDX_CH2I] - - k[1937]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - - k[1938]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - - k[1939]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - - k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - - k[1941]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - - k[1942]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - - k[1943]*y_cur[IDX_CHII]*y_cur[IDX_CHI] - - k[1944]*y_cur[IDX_CHII]*y_cur[IDX_CNI] - - k[1945]*y_cur[IDX_CHII]*y_cur[IDX_CNI] - - k[1946]*y_cur[IDX_CHII]*y_cur[IDX_CO2I] - - k[1947]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - - k[1948]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - - k[1949]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - - k[1950]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - - k[1951]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - - k[1952]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - - k[1953]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - - k[1954]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] - - k[1955]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] - - k[1956]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - - k[1957]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - - k[1958]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - - k[1959]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] - - k[1960]*y_cur[IDX_CHII]*y_cur[IDX_HNCI] - - k[1961]*y_cur[IDX_CHII]*y_cur[IDX_NI] - - k[1962]*y_cur[IDX_CHII]*y_cur[IDX_NH2I] - - k[1963]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - - k[1964]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - - k[1965]*y_cur[IDX_CHII]*y_cur[IDX_NHI] - - k[1966]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - - k[1967]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - - k[1968]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - - k[1969]*y_cur[IDX_CHII]*y_cur[IDX_OI] - - k[1970]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] - - k[1971]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] - - k[1972]*y_cur[IDX_CHII]*y_cur[IDX_OHI] - - k[1973]*y_cur[IDX_CHII]*y_cur[IDX_SI] - - k[1974]*y_cur[IDX_CHII]*y_cur[IDX_SI] + - k[2314]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + - k[2374]*y_cur[IDX_H2II]*y_cur[IDX_CI] + - k[2398]*y_cur[IDX_H2I]*y_cur[IDX_CII] - - k[2427]*y_cur[IDX_H2I]*y_cur[IDX_CHII] + - k[2632]*y_cur[IDX_H3II]*y_cur[IDX_CI] - - k[2835]*y_cur[IDX_HI]*y_cur[IDX_CHII] + - k[2836]*y_cur[IDX_HI]*y_cur[IDX_CH2II] + - k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + - k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] + - k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + - k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + - k[3386]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + - k[3389]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + - k[5569]*y_cur[IDX_HI]*y_cur[IDX_CII] - k[5776]*y_cur[IDX_CHII] - - k[6073]*y_cur[IDX_CHII] + k[6076]*y_cur[IDX_CH2II] + - k[6095]*y_cur[IDX_CH3II] + k[6132]*y_cur[IDX_CHI] - - k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CHM] = 0.0 - k[55]*y_cur[IDX_CI]*y_cur[IDX_CHM] - - k[105]*y_cur[IDX_HI]*y_cur[IDX_CHM] + - k[3687]*y_cur[IDX_OI]*y_cur[IDX_C2HM] - - k[4621]*y_cur[IDX_CHM]*y_cur[IDX_CII] - - k[4622]*y_cur[IDX_CHM]*y_cur[IDX_C2H2II] - - k[4623]*y_cur[IDX_CHM]*y_cur[IDX_C2H3II] - - k[4624]*y_cur[IDX_CHM]*y_cur[IDX_C4H2II] - - k[4625]*y_cur[IDX_CHM]*y_cur[IDX_C4H3II] - - k[4626]*y_cur[IDX_CHM]*y_cur[IDX_C4SII] - - k[4627]*y_cur[IDX_CHM]*y_cur[IDX_CH2CCHII] - - k[4628]*y_cur[IDX_CHM]*y_cur[IDX_CH3II] - - k[4629]*y_cur[IDX_CHM]*y_cur[IDX_CNCII] - - k[4630]*y_cur[IDX_CHM]*y_cur[IDX_FeII] - - k[4631]*y_cur[IDX_CHM]*y_cur[IDX_HII] - - k[4632]*y_cur[IDX_CHM]*y_cur[IDX_H2COII] - - k[4633]*y_cur[IDX_CHM]*y_cur[IDX_H2SII] - - k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] - - k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] - - k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] - - k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] - - k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] - - k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] - - k[4640]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] - - k[4641]*y_cur[IDX_CHM]*y_cur[IDX_HeII] - - k[4642]*y_cur[IDX_CHM]*y_cur[IDX_MgII] - - k[4643]*y_cur[IDX_CHM]*y_cur[IDX_NII] - - k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] - - k[4645]*y_cur[IDX_CHM]*y_cur[IDX_NH3II] - - k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] - - k[4647]*y_cur[IDX_CHM]*y_cur[IDX_NOII] - - k[4648]*y_cur[IDX_CHM]*y_cur[IDX_NaII] - - k[4649]*y_cur[IDX_CHM]*y_cur[IDX_OII] - - k[4650]*y_cur[IDX_CHM]*y_cur[IDX_SII] - - k[4651]*y_cur[IDX_CHM]*y_cur[IDX_SOII] - - k[4652]*y_cur[IDX_CHM]*y_cur[IDX_SiII] - - k[4653]*y_cur[IDX_CHM]*y_cur[IDX_SiOII] - - k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] - - k[4655]*y_cur[IDX_CHM]*y_cur[IDX_SiSII] - k[5777]*y_cur[IDX_CHM] - - k[6074]*y_cur[IDX_CHM]; - ydot[yistart + IDX_CH2I] = 0.0 - k[1]*y_cur[IDX_CM]*y_cur[IDX_CH2I] - - k[59]*y_cur[IDX_CH2I]*y_cur[IDX_OM] - - k[69]*y_cur[IDX_HM]*y_cur[IDX_CH2I] + - k[71]*y_cur[IDX_HM]*y_cur[IDX_CHI] + - k[82]*y_cur[IDX_H2I]*y_cur[IDX_CM] + - k[105]*y_cur[IDX_HI]*y_cur[IDX_CHM] - - k[160]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + - k[258]*y_cur[IDX_CH2II]*y_cur[IDX_NOI] - - k[259]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] - - k[260]*y_cur[IDX_CH2I]*y_cur[IDX_CNII] - - k[261]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - - k[262]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] - - k[263]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] - - k[264]*y_cur[IDX_CH2I]*y_cur[IDX_N2II] - - k[265]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] - - k[266]*y_cur[IDX_CH2I]*y_cur[IDX_OII] - - k[267]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] - - k[268]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - - k[359]*y_cur[IDX_HII]*y_cur[IDX_CH2I] - - k[440]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] - - k[544]*y_cur[IDX_NII]*y_cur[IDX_CH2I] + - k[753]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[754]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[761]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[761]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[768]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[791]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[809]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[916]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + - k[920]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + - k[922]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] + - k[923]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[926]*y_cur[IDX_CH3C3NII]*y_cur[IDX_eM] + - k[939]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[945]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] + - k[950]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + - k[955]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + - k[963]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[968]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + - k[972]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[994]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + - k[996]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[1034]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1243]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + - k[1272]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + - k[1275]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1285]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - - k[1342]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + - k[1369]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1482]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + - k[1730]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - - k[1936]*y_cur[IDX_CHII]*y_cur[IDX_CH2I] + - k[1939]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] + - k[1950]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - - k[1995]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] - - k[1996]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - - k[1997]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - - k[1998]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2II] - - k[1999]*y_cur[IDX_CH2I]*y_cur[IDX_CH3II] - - k[2000]*y_cur[IDX_CH2I]*y_cur[IDX_CH5II] - - k[2001]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - - k[2002]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] - - k[2003]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] - - k[2004]*y_cur[IDX_CH2I]*y_cur[IDX_H3OII] - - k[2005]*y_cur[IDX_CH2I]*y_cur[IDX_HCNII] - - k[2006]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] - - k[2007]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] - - k[2008]*y_cur[IDX_CH2I]*y_cur[IDX_HCOII] - - k[2009]*y_cur[IDX_CH2I]*y_cur[IDX_HNOII] - - k[2010]*y_cur[IDX_CH2I]*y_cur[IDX_N2HII] - - k[2011]*y_cur[IDX_CH2I]*y_cur[IDX_NHII] - - k[2012]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] - - k[2013]*y_cur[IDX_CH2I]*y_cur[IDX_NH3II] - - k[2014]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] - - k[2015]*y_cur[IDX_CH2I]*y_cur[IDX_O2HII] - - k[2016]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - - k[2017]*y_cur[IDX_CH2I]*y_cur[IDX_SII] - - k[2018]*y_cur[IDX_CH2I]*y_cur[IDX_SiII] - - k[2019]*y_cur[IDX_CH2I]*y_cur[IDX_SiOII] + - k[2071]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + - k[2088]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] + - k[2147]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + - k[2210]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - - k[2314]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + - k[2317]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - - k[2375]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] - - k[2634]*y_cur[IDX_H3II]*y_cur[IDX_CH2I] + - k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] - - k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + - k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + - k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + - k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + - k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + - k[3346]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + - k[3729]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - - k[4944]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - - k[4945]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - - k[4991]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2I] - - k[4992]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - - k[4992]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - - k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - - k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - - k[4994]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - - k[4994]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - - k[4995]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - - k[4995]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - - k[4996]*y_cur[IDX_CH2I]*y_cur[IDX_CH4I] - - k[4997]*y_cur[IDX_CH2I]*y_cur[IDX_CNI] - - k[4998]*y_cur[IDX_CH2I]*y_cur[IDX_H2COI] - - k[4999]*y_cur[IDX_CH2I]*y_cur[IDX_HCOI] - - k[5000]*y_cur[IDX_CH2I]*y_cur[IDX_HNOI] - - k[5001]*y_cur[IDX_CH2I]*y_cur[IDX_N2I] - - k[5002]*y_cur[IDX_CH2I]*y_cur[IDX_NO2I] - - k[5003]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - - k[5004]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - - k[5005]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - - k[5006]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - - k[5007]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5009]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5010]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5011]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5012]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - - k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - - k[5014]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - - k[5015]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - - k[5016]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - - k[5017]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - - k[5018]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - - k[5019]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - - k[5020]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - - k[5021]*y_cur[IDX_CH2I]*y_cur[IDX_SiI] + - k[5028]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + - k[5029]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] + - k[5041]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + - k[5047]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + - k[5076]*y_cur[IDX_CHI]*y_cur[IDX_H2COI] + - k[5077]*y_cur[IDX_CHI]*y_cur[IDX_HCOI] + - k[5078]*y_cur[IDX_CHI]*y_cur[IDX_HNOI] + - k[5095]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - - k[5135]*y_cur[IDX_H2I]*y_cur[IDX_CH2I] + - k[5137]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - - k[5156]*y_cur[IDX_HI]*y_cur[IDX_CH2I] + - k[5158]*y_cur[IDX_HI]*y_cur[IDX_CH3I] + - k[5172]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - - k[5253]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - - k[5254]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - - k[5255]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + - k[5344]*y_cur[IDX_OI]*y_cur[IDX_C2H2I] + - k[5348]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + - k[5381]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + - k[5554]*y_cur[IDX_H2I]*y_cur[IDX_CI] + - k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] - k[5778]*y_cur[IDX_CH2I] - - k[5779]*y_cur[IDX_CH2I] + k[5788]*y_cur[IDX_CH2CNI] + - k[5790]*y_cur[IDX_CH2COI] + k[5791]*y_cur[IDX_CH2NHI] + - k[5793]*y_cur[IDX_CH3I] + k[5805]*y_cur[IDX_CH3CHCH2I] + - k[5820]*y_cur[IDX_CH4I] + k[5937]*y_cur[IDX_CH2OHI] - - k[6078]*y_cur[IDX_CH2I] - k[6079]*y_cur[IDX_CH2I] + - k[6090]*y_cur[IDX_CH2CNI] + k[6092]*y_cur[IDX_CH2COI] + - k[6094]*y_cur[IDX_CH2PHI] + k[6097]*y_cur[IDX_CH3I] + - k[6110]*y_cur[IDX_CH3CHCH2I] + k[6127]*y_cur[IDX_CH4I] + - k[6290]*y_cur[IDX_CH2OHI] + - k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + - k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + - k[6414]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + - k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + - k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + - k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + - k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + - k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + - k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + - k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM] - - k[6893]*y_cur[IDX_CH2I] + k[7075]*y_cur[IDX_GCH2I] + - k[7257]*y_cur[IDX_GCH2I] + k[7439]*y_cur[IDX_GCH2I] + - k[8577]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] + - k[8653]*y_cur[IDX_GH2I]*y_cur[IDX_GCI]; - ydot[yistart + IDX_CH2II] = 0.0 + - k[160]*y_cur[IDX_CII]*y_cur[IDX_CH2I] - - k[258]*y_cur[IDX_CH2II]*y_cur[IDX_NOI] + - k[259]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] + - k[260]*y_cur[IDX_CH2I]*y_cur[IDX_CNII] + - k[261]*y_cur[IDX_CH2I]*y_cur[IDX_COII] + - k[262]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] + - k[263]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] + - k[264]*y_cur[IDX_CH2I]*y_cur[IDX_N2II] + - k[265]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] + - k[266]*y_cur[IDX_CH2I]*y_cur[IDX_OII] + - k[267]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] + - k[268]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] + - k[359]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + - k[440]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] + - k[544]*y_cur[IDX_NII]*y_cur[IDX_CH2I] - - k[907]*y_cur[IDX_CH2II]*y_cur[IDX_eM] - - k[908]*y_cur[IDX_CH2II]*y_cur[IDX_eM] - - k[909]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + - k[1390]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + - k[1392]*y_cur[IDX_CII]*y_cur[IDX_H2CSI] - - k[1891]*y_cur[IDX_CI]*y_cur[IDX_CH2II] + - k[1959]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] - - k[1975]*y_cur[IDX_CH2II]*y_cur[IDX_C2HI] - - k[1976]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] - - k[1977]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] - - k[1978]*y_cur[IDX_CH2II]*y_cur[IDX_CO2I] - - k[1979]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - - k[1980]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - - k[1981]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - - k[1982]*y_cur[IDX_CH2II]*y_cur[IDX_H2OI] - - k[1983]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - - k[1984]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - - k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - - k[1986]*y_cur[IDX_CH2II]*y_cur[IDX_HCNI] - - k[1987]*y_cur[IDX_CH2II]*y_cur[IDX_HCOI] - - k[1988]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] - - k[1989]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] - - k[1990]*y_cur[IDX_CH2II]*y_cur[IDX_O2I] - - k[1991]*y_cur[IDX_CH2II]*y_cur[IDX_OI] - - k[1992]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] - - k[1993]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] - - k[1994]*y_cur[IDX_CH2II]*y_cur[IDX_SI] + - k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + - k[2240]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] + - k[2244]*y_cur[IDX_CHI]*y_cur[IDX_CH5II] + - k[2246]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] + - k[2247]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] + - k[2248]*y_cur[IDX_CHI]*y_cur[IDX_H3COII] + - k[2249]*y_cur[IDX_CHI]*y_cur[IDX_H3OII] + - k[2250]*y_cur[IDX_CHI]*y_cur[IDX_HCNII] + - k[2251]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] + - k[2252]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] + - k[2253]*y_cur[IDX_CHI]*y_cur[IDX_HCOII] + - k[2254]*y_cur[IDX_CHI]*y_cur[IDX_HNOII] + - k[2255]*y_cur[IDX_CHI]*y_cur[IDX_HSII] + - k[2257]*y_cur[IDX_CHI]*y_cur[IDX_N2HII] + - k[2258]*y_cur[IDX_CHI]*y_cur[IDX_NHII] + - k[2259]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] + - k[2263]*y_cur[IDX_CHI]*y_cur[IDX_O2HII] + - k[2264]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + - k[2267]*y_cur[IDX_CHI]*y_cur[IDX_SiHII] + - k[2318]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] + - k[2343]*y_cur[IDX_HII]*y_cur[IDX_HCNOI] + - k[2380]*y_cur[IDX_H2II]*y_cur[IDX_CHI] + - k[2427]*y_cur[IDX_H2I]*y_cur[IDX_CHII] - - k[2428]*y_cur[IDX_H2I]*y_cur[IDX_CH2II] + - k[2670]*y_cur[IDX_H3II]*y_cur[IDX_CHI] - - k[2836]*y_cur[IDX_HI]*y_cur[IDX_CH2II] + - k[2837]*y_cur[IDX_HI]*y_cur[IDX_CH3II] + - k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] + - k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + - k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] + - k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + - k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - - k[3452]*y_cur[IDX_NI]*y_cur[IDX_CH2II] + - k[5548]*y_cur[IDX_H2I]*y_cur[IDX_CII] + - k[5633]*y_cur[IDX_CII]*y_cur[IDX_CH2OHI] + - k[5638]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + k[5778]*y_cur[IDX_CH2I] - - k[6075]*y_cur[IDX_CH2II] - k[6076]*y_cur[IDX_CH2II] - - k[6077]*y_cur[IDX_CH2II] + k[6078]*y_cur[IDX_CH2I] + - k[6096]*y_cur[IDX_CH3II] + k[6125]*y_cur[IDX_CH4II] - - k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - - k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - - k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2CCHI] = 0.0 - - k[162]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - - k[219]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - - k[232]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - - k[360]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] + - k[800]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[803]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + - k[805]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] - - k[1346]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - - k[1347]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - - k[1507]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - - k[1508]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - - k[1608]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - - k[1609]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - - k[1610]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - - k[1667]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - - k[1668]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - - k[1776]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCHI] - - k[1805]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] - - k[1806]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + - k[1811]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - - k[2029]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] - - k[2030]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] - - k[2032]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4HII] - - k[2033]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] - - k[2034]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] - - k[2035]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] - - k[2036]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] - - k[2037]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] - - k[2038]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] - - k[2039]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] - - k[2040]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] - - k[2061]*y_cur[IDX_CH3II]*y_cur[IDX_CH2CCHI] - - k[2315]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] - - k[2636]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCHI] - - k[2785]*y_cur[IDX_H3OII]*y_cur[IDX_CH2CCHI] - - k[2938]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CCHI] - - k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - - k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - - k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - - k[3863]*y_cur[IDX_SiII]*y_cur[IDX_CH2CCHI] + - k[3892]*y_cur[IDX_CM]*y_cur[IDX_CH2CCHII] + - k[3927]*y_cur[IDX_C10M]*y_cur[IDX_CH2CCHII] + - k[3962]*y_cur[IDX_C10HM]*y_cur[IDX_CH2CCHII] + - k[3997]*y_cur[IDX_C2M]*y_cur[IDX_CH2CCHII] + - k[4032]*y_cur[IDX_C2HM]*y_cur[IDX_CH2CCHII] + - k[4067]*y_cur[IDX_C3M]*y_cur[IDX_CH2CCHII] + - k[4102]*y_cur[IDX_C3HM]*y_cur[IDX_CH2CCHII] + - k[4137]*y_cur[IDX_C3NM]*y_cur[IDX_CH2CCHII] + - k[4172]*y_cur[IDX_C4M]*y_cur[IDX_CH2CCHII] + - k[4207]*y_cur[IDX_C4HM]*y_cur[IDX_CH2CCHII] + - k[4242]*y_cur[IDX_C5M]*y_cur[IDX_CH2CCHII] + - k[4277]*y_cur[IDX_C5HM]*y_cur[IDX_CH2CCHII] + - k[4312]*y_cur[IDX_C5NM]*y_cur[IDX_CH2CCHII] + - k[4347]*y_cur[IDX_C6M]*y_cur[IDX_CH2CCHII] + - k[4382]*y_cur[IDX_C6HM]*y_cur[IDX_CH2CCHII] + - k[4417]*y_cur[IDX_C7M]*y_cur[IDX_CH2CCHII] + - k[4452]*y_cur[IDX_C7HM]*y_cur[IDX_CH2CCHII] + - k[4487]*y_cur[IDX_C8M]*y_cur[IDX_CH2CCHII] + - k[4522]*y_cur[IDX_C8HM]*y_cur[IDX_CH2CCHII] + - k[4557]*y_cur[IDX_C9M]*y_cur[IDX_CH2CCHII] + - k[4592]*y_cur[IDX_C9HM]*y_cur[IDX_CH2CCHII] + - k[4627]*y_cur[IDX_CHM]*y_cur[IDX_CH2CCHII] + - k[4662]*y_cur[IDX_CNM]*y_cur[IDX_CH2CCHII] + - k[4697]*y_cur[IDX_HM]*y_cur[IDX_CH2CCHII] + - k[4733]*y_cur[IDX_OM]*y_cur[IDX_CH2CCHII] + - k[4768]*y_cur[IDX_O2M]*y_cur[IDX_CH2CCHII] + - k[4803]*y_cur[IDX_OHM]*y_cur[IDX_CH2CCHII] + - k[4838]*y_cur[IDX_SM]*y_cur[IDX_CH2CCHII] + - k[4871]*y_cur[IDX_C2I]*y_cur[IDX_CH4I] + - k[4914]*y_cur[IDX_CI]*y_cur[IDX_C2H4I] - - k[4947]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHI] + - k[4991]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2I] - - k[5256]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHI] + - k[5781]*y_cur[IDX_CH2CCH2I] - k[5782]*y_cur[IDX_CH2CCHI] - - k[5783]*y_cur[IDX_CH2CCHI] + k[5802]*y_cur[IDX_CH3CCHI] + - k[6081]*y_cur[IDX_CH2CCH2I] - k[6083]*y_cur[IDX_CH2CCHI] - - k[6084]*y_cur[IDX_CH2CCHI] + k[6106]*y_cur[IDX_CH3CCHI] + - k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + - k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] - - k[6950]*y_cur[IDX_CH2CCHI] + k[7132]*y_cur[IDX_GCH2CCHI] + - k[7314]*y_cur[IDX_GCH2CCHI] + k[7496]*y_cur[IDX_GCH2CCHI] + - k[8612]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] + - k[8613]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] + - k[8665]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I]; - ydot[yistart + IDX_CH2CCHII] = 0.0 + - k[162]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - - k[227]*y_cur[IDX_C2H2I]*y_cur[IDX_CH2CCHII] - - k[910]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] - - k[911]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] + - k[1305]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1306]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + - k[1366]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + - k[1482]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + - k[1484]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + - k[1617]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - - k[1643]*y_cur[IDX_C2H3I]*y_cur[IDX_CH2CCHII] + - k[1690]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - - k[1706]*y_cur[IDX_C2H4I]*y_cur[IDX_CH2CCHII] + - k[1730]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - - k[1741]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] - - k[1742]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] - - k[1794]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] - - k[1795]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] - - k[1828]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] - - k[1829]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] + - k[1854]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - - k[1892]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - - k[1893]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] + - k[1998]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2II] - - k[2020]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] - - k[2021]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] - - k[2022]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] - - k[2023]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] - - k[2024]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] - - k[2025]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] - - k[2026]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6H2I] - - k[2027]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] - - k[2028]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] - - k[2029]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] - - k[2030]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] - - k[2031]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] + - k[2042]*y_cur[IDX_CH3II]*y_cur[IDX_C2H2I] + - k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + - k[2049]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] + - k[2081]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + - k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + - k[2150]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + - k[2153]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + - k[2325]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] - - k[2485]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] - - k[2486]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + - k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] + - k[2681]*y_cur[IDX_H3II]*y_cur[IDX_H2CCCI] + - k[2798]*y_cur[IDX_H3OII]*y_cur[IDX_H2CCCI] + - k[2957]*y_cur[IDX_HCOII]*y_cur[IDX_H2CCCI] + - k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3453]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHII] - - k[3726]*y_cur[IDX_OI]*y_cur[IDX_CH2CCHII] - - k[3838]*y_cur[IDX_SI]*y_cur[IDX_CH2CCHII] - - k[3879]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - - k[3880]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - - k[3892]*y_cur[IDX_CM]*y_cur[IDX_CH2CCHII] - - k[3927]*y_cur[IDX_C10M]*y_cur[IDX_CH2CCHII] - - k[3962]*y_cur[IDX_C10HM]*y_cur[IDX_CH2CCHII] - - k[3997]*y_cur[IDX_C2M]*y_cur[IDX_CH2CCHII] - - k[4032]*y_cur[IDX_C2HM]*y_cur[IDX_CH2CCHII] - - k[4067]*y_cur[IDX_C3M]*y_cur[IDX_CH2CCHII] - - k[4102]*y_cur[IDX_C3HM]*y_cur[IDX_CH2CCHII] - - k[4137]*y_cur[IDX_C3NM]*y_cur[IDX_CH2CCHII] - - k[4172]*y_cur[IDX_C4M]*y_cur[IDX_CH2CCHII] - - k[4207]*y_cur[IDX_C4HM]*y_cur[IDX_CH2CCHII] - - k[4242]*y_cur[IDX_C5M]*y_cur[IDX_CH2CCHII] - - k[4277]*y_cur[IDX_C5HM]*y_cur[IDX_CH2CCHII] - - k[4312]*y_cur[IDX_C5NM]*y_cur[IDX_CH2CCHII] - - k[4347]*y_cur[IDX_C6M]*y_cur[IDX_CH2CCHII] - - k[4382]*y_cur[IDX_C6HM]*y_cur[IDX_CH2CCHII] - - k[4417]*y_cur[IDX_C7M]*y_cur[IDX_CH2CCHII] - - k[4452]*y_cur[IDX_C7HM]*y_cur[IDX_CH2CCHII] - - k[4487]*y_cur[IDX_C8M]*y_cur[IDX_CH2CCHII] - - k[4522]*y_cur[IDX_C8HM]*y_cur[IDX_CH2CCHII] - - k[4557]*y_cur[IDX_C9M]*y_cur[IDX_CH2CCHII] - - k[4592]*y_cur[IDX_C9HM]*y_cur[IDX_CH2CCHII] - - k[4627]*y_cur[IDX_CHM]*y_cur[IDX_CH2CCHII] - - k[4662]*y_cur[IDX_CNM]*y_cur[IDX_CH2CCHII] - - k[4697]*y_cur[IDX_HM]*y_cur[IDX_CH2CCHII] - - k[4733]*y_cur[IDX_OM]*y_cur[IDX_CH2CCHII] - - k[4768]*y_cur[IDX_O2M]*y_cur[IDX_CH2CCHII] - - k[4803]*y_cur[IDX_OHM]*y_cur[IDX_CH2CCHII] - - k[4838]*y_cur[IDX_SM]*y_cur[IDX_CH2CCHII] - - k[5530]*y_cur[IDX_CH2CCHII]*y_cur[IDX_H2I] - - k[5531]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] + - k[5551]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - - k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] - - k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2CCH2I] = 0.0 - - k[161]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - - k[669]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - - k[711]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[810]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - - k[1343]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - - k[1344]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - - k[1345]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - - k[1771]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1772]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1773]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1774]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1775]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - - k[1808]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - - k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - - k[1810]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + - k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - - k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] - - k[3656]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - - k[3657]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - - k[3851]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[3852]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[3853]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[3854]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[4894]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] - - k[4895]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] - - k[4946]*y_cur[IDX_CI]*y_cur[IDX_CH2CCH2I] - - k[5022]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - - k[5023]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] + - k[5065]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - - k[5067]*y_cur[IDX_CHI]*y_cur[IDX_CH2CCH2I] + - k[5071]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - - k[5109]*y_cur[IDX_CNI]*y_cur[IDX_CH2CCH2I] - - k[5381]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - - k[5382]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - - k[5383]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - - k[5780]*y_cur[IDX_CH2CCH2I] - k[5781]*y_cur[IDX_CH2CCH2I] + - k[5784]*y_cur[IDX_CH2CHCCHI] - k[6080]*y_cur[IDX_CH2CCH2I] - - k[6081]*y_cur[IDX_CH2CCH2I] - k[6082]*y_cur[IDX_CH2CCH2I] + - k[6085]*y_cur[IDX_CH2CHCCHI] + - k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6951]*y_cur[IDX_CH2CCH2I] + k[7133]*y_cur[IDX_GCH2CCH2I] + - k[7315]*y_cur[IDX_GCH2CCH2I] + k[7497]*y_cur[IDX_GCH2CCH2I] + - k[8614]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + - k[8722]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; - ydot[yistart + IDX_CH2CHCCHI] = 0.0 + - k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] + - k[5067]*y_cur[IDX_CHI]*y_cur[IDX_CH2CCH2I] + - k[5068]*y_cur[IDX_CHI]*y_cur[IDX_CH3CCHI] - - k[5784]*y_cur[IDX_CH2CHCCHI] - k[5785]*y_cur[IDX_CH2CHCCHI] + - k[6038]*y_cur[IDX_C6H6I] - k[6085]*y_cur[IDX_CH2CHCCHI] - - k[6086]*y_cur[IDX_CH2CHCCHI] - k[7004]*y_cur[IDX_CH2CHCCHI] + - k[7186]*y_cur[IDX_GCH2CHCCHI] + k[7368]*y_cur[IDX_GCH2CHCCHI] + - k[7550]*y_cur[IDX_GCH2CHCCHI] + - k[8632]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I]; - ydot[yistart + IDX_CH2CHCNI] = 0.0 + - k[915]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] - - k[1348]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - - k[1349]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - - k[1350]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - - k[2316]*y_cur[IDX_HII]*y_cur[IDX_CH2CHCNI] - - k[2637]*y_cur[IDX_H3II]*y_cur[IDX_CH2CHCNI] - - k[2886]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] - - k[2887]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] - - k[2939]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CHCNI] - - k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3567]*y_cur[IDX_NH3I]*y_cur[IDX_CH2CHCNHII] + - k[5106]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] + - k[5112]*y_cur[IDX_CNI]*y_cur[IDX_CH3CHCH2I] - - k[5787]*y_cur[IDX_CH2CHCNI] - k[6088]*y_cur[IDX_CH2CHCNI] - - k[6089]*y_cur[IDX_CH2CHCNI] + - k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - - k[7007]*y_cur[IDX_CH2CHCNI] + k[7189]*y_cur[IDX_GCH2CHCNI] + - k[7371]*y_cur[IDX_GCH2CHCNI] + k[7553]*y_cur[IDX_GCH2CHCNI]; - ydot[yistart + IDX_CH2CHCNII] = 0.0 - - k[912]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_eM] - - k[2429]*y_cur[IDX_H2I]*y_cur[IDX_CH2CHCNII] + - k[3401]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + - k[6089]*y_cur[IDX_CH2CHCNI] - - k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2CHCNHII] = 0.0 - - k[913]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] - - k[914]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] - - k[915]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + - k[2429]*y_cur[IDX_H2I]*y_cur[IDX_CH2CHCNII] + - k[2637]*y_cur[IDX_H3II]*y_cur[IDX_CH2CHCNI] + - k[2886]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] + - k[2887]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] + - k[2939]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CHCNI] - - k[3567]*y_cur[IDX_NH3I]*y_cur[IDX_CH2CHCNHII] + - k[5704]*y_cur[IDX_C2H5CNI] + k[5989]*y_cur[IDX_C2H5CNI] - - k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - - k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - - k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2CNI] = 0.0 - - k[163]*y_cur[IDX_CII]*y_cur[IDX_CH2CNI] - - k[361]*y_cur[IDX_HII]*y_cur[IDX_CH2CNI] + - k[771]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + - k[944]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] + - k[2283]*y_cur[IDX_COI]*y_cur[IDX_CH3CNII] - - k[2638]*y_cur[IDX_H3II]*y_cur[IDX_CH2CNI] - - k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] - - k[4948]*y_cur[IDX_CI]*y_cur[IDX_CH2CNI] + - k[5224]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - k[5788]*y_cur[IDX_CH2CNI] - - k[6090]*y_cur[IDX_CH2CNI] + - k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + - k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - - k[6953]*y_cur[IDX_CH2CNI] + k[7135]*y_cur[IDX_GCH2CNI] + - k[7317]*y_cur[IDX_GCH2CNI] + k[7499]*y_cur[IDX_GCH2CNI] + - k[8617]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] + - k[8747]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI]; - ydot[yistart + IDX_CH2CNII] = 0.0 + - k[163]*y_cur[IDX_CII]*y_cur[IDX_CH2CNI] + - k[361]*y_cur[IDX_HII]*y_cur[IDX_CH2CNI] - - k[916]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] - - k[917]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + - k[1986]*y_cur[IDX_CH2II]*y_cur[IDX_HCNI] + - k[2075]*y_cur[IDX_CH3II]*y_cur[IDX_CNI] + - k[2328]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + - k[3530]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] + - k[3555]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] + - k[3607]*y_cur[IDX_NHI]*y_cur[IDX_C2H2II] - - k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] - - k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2COI] = 0.0 - - k[164]*y_cur[IDX_CII]*y_cur[IDX_CH2COI] + - k[937]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + - k[948]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + - k[1287]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1293]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[2639]*y_cur[IDX_H3II]*y_cur[IDX_CH2COI] - - k[2786]*y_cur[IDX_H3OII]*y_cur[IDX_CH2COI] - - k[2940]*y_cur[IDX_HCOII]*y_cur[IDX_CH2COI] - - k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] - - k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + - k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3854]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[5157]*y_cur[IDX_HI]*y_cur[IDX_CH2COI] + - k[5345]*y_cur[IDX_OI]*y_cur[IDX_C2H3I] + - k[5347]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + - k[5381]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + - k[5454]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - k[5789]*y_cur[IDX_CH2COI] - - k[5790]*y_cur[IDX_CH2COI] + k[5811]*y_cur[IDX_CH3COCH3I] - - k[6091]*y_cur[IDX_CH2COI] - k[6092]*y_cur[IDX_CH2COI] + - k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + - k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + - k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6961]*y_cur[IDX_CH2COI] + k[7143]*y_cur[IDX_GCH2COI] + - k[7325]*y_cur[IDX_GCH2COI] + k[7507]*y_cur[IDX_GCH2COI] + - k[8620]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI]; - ydot[yistart + IDX_CH2COII] = 0.0 + - k[164]*y_cur[IDX_CII]*y_cur[IDX_CH2COI] - - k[918]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] - - k[919]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] - - k[920]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + - k[1947]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + - k[1979]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + - k[2521]*y_cur[IDX_H2OI]*y_cur[IDX_C2HII] + - k[3654]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + - k[3657]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + - k[3796]*y_cur[IDX_OHI]*y_cur[IDX_C2H2II] + - k[3843]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + - k[3851]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[5789]*y_cur[IDX_CH2COI] + k[6091]*y_cur[IDX_CH2COI] - - k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - - k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - - k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2NHI] = 0.0 + - k[921]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] - - k[2317]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - - k[2318]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - - k[2787]*y_cur[IDX_H3OII]*y_cur[IDX_CH2NHI] - - k[2941]*y_cur[IDX_HCOII]*y_cur[IDX_CH2NHI] - - k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] + - k[5082]*y_cur[IDX_CHI]*y_cur[IDX_NH3I] - k[5791]*y_cur[IDX_CH2NHI] - - k[6093]*y_cur[IDX_CH2NHI] + - k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] - - k[6921]*y_cur[IDX_CH2NHI] + k[7103]*y_cur[IDX_GCH2NHI] + - k[7285]*y_cur[IDX_GCH2NHI] + k[7467]*y_cur[IDX_GCH2NHI] + - k[8593]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] + - k[8701]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] + - k[8717]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] + - k[8743]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I]; - ydot[yistart + IDX_CH2NH2II] = 0.0 - - k[921]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] - - k[922]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] + - k[2787]*y_cur[IDX_H3OII]*y_cur[IDX_CH2NHI] + - k[2941]*y_cur[IDX_HCOII]*y_cur[IDX_CH2NHI] + - k[3570]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - - k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] - - k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2OHI] = 0.0 + - k[1274]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + - k[1276]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1278]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1280]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + - k[1282]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - - k[5633]*y_cur[IDX_CII]*y_cur[IDX_CH2OHI] - - k[5634]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHI] - - k[5635]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHI] - - k[5636]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHI] - - k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] - - k[5638]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + - k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + - k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + - k[5818]*y_cur[IDX_CH3OHI] - k[5937]*y_cur[IDX_CH2OHI] + - k[5944]*y_cur[IDX_CH2OHCOI] + k[5945]*y_cur[IDX_CH2OHCHOI] + - k[6122]*y_cur[IDX_CH3OHI] - k[6290]*y_cur[IDX_CH2OHI] + - k[6294]*y_cur[IDX_CH2OHCOI] + k[6295]*y_cur[IDX_CH2OHCHOI] + - k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6929]*y_cur[IDX_CH2OHI] + k[7111]*y_cur[IDX_GCH2OHI] + - k[7293]*y_cur[IDX_GCH2OHI] + k[7475]*y_cur[IDX_GCH2OHI] + - k[8597]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + - k[8741]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I]; - ydot[yistart + IDX_CH2OHCH2OII] = 0.0 - - k[1280]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - - k[1281]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - - k[1282]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - - k[1283]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + - k[5662]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCHOI] + - k[5663]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCHOI] + - k[5664]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCHOI] - - k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2OHCHOI] = 0.0 + - k[1283]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - - k[5661]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCHOI] - - k[5662]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCHOI] - - k[5663]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCHOI] - - k[5664]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCHOI] - - k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - - k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - - k[5945]*y_cur[IDX_CH2OHCHOI] - k[6295]*y_cur[IDX_CH2OHCHOI] + - k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[7026]*y_cur[IDX_CH2OHCHOI] + k[7208]*y_cur[IDX_GCH2OHCHOI] + - k[7390]*y_cur[IDX_GCH2OHCHOI] + k[7565]*y_cur[IDX_GCH2OHCHOI] + - k[8652]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI] + - k[8762]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI]; - ydot[yistart + IDX_CH2OHCHOII] = 0.0 - - k[1275]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - - k[1276]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - - k[1277]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - - k[1278]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - - k[1279]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[5656]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCOI] + - k[5657]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCOI] + - k[5658]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCOI] + - k[5661]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCHOI] - - k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2OHCOI] = 0.0 + - k[1279]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - - k[5655]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCOI] - - k[5656]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCOI] - - k[5657]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCOI] - - k[5658]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCOI] - - k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] - - k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] - - k[5944]*y_cur[IDX_CH2OHCOI] - k[6294]*y_cur[IDX_CH2OHCOI] + - k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[7020]*y_cur[IDX_CH2OHCOI] + k[7202]*y_cur[IDX_GCH2OHCOI] + - k[7384]*y_cur[IDX_GCH2OHCOI] + k[7559]*y_cur[IDX_GCH2OHCOI] + - k[8761]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_CH2OHCOII] = 0.0 - - k[1272]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] - - k[1273]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] - - k[1274]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + - k[5655]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCOI] - - k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - - k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - - k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH2PHI] = 0.0 + - k[1202]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] - - k[1351]*y_cur[IDX_CII]*y_cur[IDX_CH2PHI] - - k[2319]*y_cur[IDX_HII]*y_cur[IDX_CH2PHI] - - k[2640]*y_cur[IDX_H3II]*y_cur[IDX_CH2PHI] - - k[2788]*y_cur[IDX_H3OII]*y_cur[IDX_CH2PHI] - - k[2942]*y_cur[IDX_HCOII]*y_cur[IDX_CH2PHI] - - k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] - - k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] - - k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] - k[5792]*y_cur[IDX_CH2PHI] - - k[6094]*y_cur[IDX_CH2PHI] + - k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - - k[6984]*y_cur[IDX_CH2PHI] + k[7166]*y_cur[IDX_GCH2PHI] + - k[7348]*y_cur[IDX_GCH2PHI] + k[7530]*y_cur[IDX_GCH2PHI]; - ydot[yistart + IDX_CH3I] = 0.0 - - k[60]*y_cur[IDX_CH3I]*y_cur[IDX_CNM] - - k[61]*y_cur[IDX_CH3I]*y_cur[IDX_OHM] + - k[69]*y_cur[IDX_HM]*y_cur[IDX_CH2I] - - k[70]*y_cur[IDX_HM]*y_cur[IDX_CH3I] + - k[269]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + - k[270]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + - k[271]*y_cur[IDX_CH3II]*y_cur[IDX_FeI] + - k[272]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] + - k[273]*y_cur[IDX_CH3II]*y_cur[IDX_MgI] + - k[274]*y_cur[IDX_CH3II]*y_cur[IDX_NOI] + - k[275]*y_cur[IDX_CH3II]*y_cur[IDX_NaI] - - k[362]*y_cur[IDX_HII]*y_cur[IDX_CH3I] + - k[755]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[756]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[762]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[768]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[771]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + - k[801]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[807]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[808]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[928]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] + - k[932]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] + - k[934]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] + - k[938]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + - k[940]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[943]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[947]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] + - k[949]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + - k[951]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + - k[951]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + - k[952]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] + - k[954]*y_cur[IDX_CH3CSII]*y_cur[IDX_eM] + - k[956]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + - k[956]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + - k[957]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + - k[959]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + - k[962]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + - k[964]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[965]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[969]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + - k[973]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[974]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[983]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + - k[1155]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_eM] + - k[1201]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + - k[1284]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1286]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1288]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1290]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1291]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1294]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[1352]*y_cur[IDX_CII]*y_cur[IDX_CH3I] - - k[1353]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + - k[1368]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1375]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1484]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + - k[1512]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] + - k[1536]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] + - k[1563]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + - k[1578]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] + - k[1647]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] + - k[1649]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] + - k[1651]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] + - k[1653]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] + - k[1655]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] + - k[1657]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] + - k[1659]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] + - k[1661]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] + - k[1663]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] + - k[1665]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] + - k[1669]*y_cur[IDX_C2H4II]*y_cur[IDX_CH3CCHI] + - k[1671]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] + - k[1672]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] + - k[1675]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + - k[1677]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] + - k[1712]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] + - k[1717]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] + - k[1774]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1780]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + - k[1981]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - - k[2101]*y_cur[IDX_CH3I]*y_cur[IDX_SII] - - k[2102]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] - - k[2103]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + - k[2133]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + - k[2135]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] + - k[2136]*y_cur[IDX_CH4II]*y_cur[IDX_C2H5CNI] + - k[2137]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] + - k[2138]*y_cur[IDX_CH4II]*y_cur[IDX_CH4I] + - k[2139]*y_cur[IDX_CH4II]*y_cur[IDX_CO2I] + - k[2140]*y_cur[IDX_CH4II]*y_cur[IDX_COI] + - k[2141]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] + - k[2142]*y_cur[IDX_CH4II]*y_cur[IDX_H2OI] + - k[2143]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] + - k[2144]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] + - k[2145]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] + - k[2146]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + - k[2151]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + - k[2157]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + - k[2162]*y_cur[IDX_CH4I]*y_cur[IDX_C3H2II] + - k[2163]*y_cur[IDX_CH4I]*y_cur[IDX_C3OII] + - k[2165]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + - k[2177]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + - k[2190]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + - k[2191]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] + - k[2192]*y_cur[IDX_CH4I]*y_cur[IDX_CSII] + - k[2194]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + - k[2195]*y_cur[IDX_CH4I]*y_cur[IDX_H2OII] + - k[2198]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + - k[2200]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] + - k[2207]*y_cur[IDX_CH4I]*y_cur[IDX_NH3II] - - k[2641]*y_cur[IDX_H3II]*y_cur[IDX_CH3I] - - k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] + - k[3192]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] + - k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] + - k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + - k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] + - k[3338]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3652]*y_cur[IDX_OM]*y_cur[IDX_CH4I] + - k[3692]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] + - k[3810]*y_cur[IDX_PII]*y_cur[IDX_CH3OHI] + - k[3816]*y_cur[IDX_PHII]*y_cur[IDX_CH3OHI] + - k[3824]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + - k[3864]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + - k[3867]*y_cur[IDX_SiII]*y_cur[IDX_CH3OHI] + - k[3893]*y_cur[IDX_CM]*y_cur[IDX_CH3II] + - k[3928]*y_cur[IDX_C10M]*y_cur[IDX_CH3II] + - k[3963]*y_cur[IDX_C10HM]*y_cur[IDX_CH3II] + - k[3998]*y_cur[IDX_C2M]*y_cur[IDX_CH3II] + - k[4033]*y_cur[IDX_C2HM]*y_cur[IDX_CH3II] + - k[4068]*y_cur[IDX_C3M]*y_cur[IDX_CH3II] + - k[4103]*y_cur[IDX_C3HM]*y_cur[IDX_CH3II] + - k[4138]*y_cur[IDX_C3NM]*y_cur[IDX_CH3II] + - k[4173]*y_cur[IDX_C4M]*y_cur[IDX_CH3II] + - k[4208]*y_cur[IDX_C4HM]*y_cur[IDX_CH3II] + - k[4243]*y_cur[IDX_C5M]*y_cur[IDX_CH3II] + - k[4278]*y_cur[IDX_C5HM]*y_cur[IDX_CH3II] + - k[4313]*y_cur[IDX_C5NM]*y_cur[IDX_CH3II] + - k[4348]*y_cur[IDX_C6M]*y_cur[IDX_CH3II] + - k[4383]*y_cur[IDX_C6HM]*y_cur[IDX_CH3II] + - k[4418]*y_cur[IDX_C7M]*y_cur[IDX_CH3II] + - k[4453]*y_cur[IDX_C7HM]*y_cur[IDX_CH3II] + - k[4488]*y_cur[IDX_C8M]*y_cur[IDX_CH3II] + - k[4523]*y_cur[IDX_C8HM]*y_cur[IDX_CH3II] + - k[4558]*y_cur[IDX_C9M]*y_cur[IDX_CH3II] + - k[4593]*y_cur[IDX_C9HM]*y_cur[IDX_CH3II] + - k[4628]*y_cur[IDX_CHM]*y_cur[IDX_CH3II] + - k[4663]*y_cur[IDX_CNM]*y_cur[IDX_CH3II] + - k[4698]*y_cur[IDX_HM]*y_cur[IDX_CH3II] + - k[4734]*y_cur[IDX_OM]*y_cur[IDX_CH3II] + - k[4769]*y_cur[IDX_O2M]*y_cur[IDX_CH3II] + - k[4804]*y_cur[IDX_OHM]*y_cur[IDX_CH3II] + - k[4839]*y_cur[IDX_SM]*y_cur[IDX_CH3II] - - k[4949]*y_cur[IDX_CI]*y_cur[IDX_CH3I] + - k[4995]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + - k[4996]*y_cur[IDX_CH2I]*y_cur[IDX_CH4I] + - k[4996]*y_cur[IDX_CH2I]*y_cur[IDX_CH4I] + - k[4998]*y_cur[IDX_CH2I]*y_cur[IDX_H2COI] + - k[4999]*y_cur[IDX_CH2I]*y_cur[IDX_HCOI] + - k[5000]*y_cur[IDX_CH2I]*y_cur[IDX_HNOI] + - k[5018]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] + - k[5022]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - - k[5025]*y_cur[IDX_CH3I]*y_cur[IDX_C2H3I] - - k[5026]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - - k[5026]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - - k[5027]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - - k[5027]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - - k[5028]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - - k[5028]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - - k[5029]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] - - k[5030]*y_cur[IDX_CH3I]*y_cur[IDX_H2COI] - - k[5031]*y_cur[IDX_CH3I]*y_cur[IDX_H2OI] - - k[5032]*y_cur[IDX_CH3I]*y_cur[IDX_H2SI] - - k[5033]*y_cur[IDX_CH3I]*y_cur[IDX_HCOI] - - k[5034]*y_cur[IDX_CH3I]*y_cur[IDX_HNOI] - - k[5035]*y_cur[IDX_CH3I]*y_cur[IDX_NH2I] - - k[5036]*y_cur[IDX_CH3I]*y_cur[IDX_NH3I] - - k[5037]*y_cur[IDX_CH3I]*y_cur[IDX_NO2I] - - k[5038]*y_cur[IDX_CH3I]*y_cur[IDX_NOI] - - k[5039]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - - k[5040]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - - k[5041]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - - k[5042]*y_cur[IDX_CH3I]*y_cur[IDX_O2HI] - - k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] - - k[5044]*y_cur[IDX_CH3I]*y_cur[IDX_OI] - - k[5045]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] - - k[5046]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] - - k[5047]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] - - k[5048]*y_cur[IDX_CH3I]*y_cur[IDX_SI] - - k[5049]*y_cur[IDX_CH3I]*y_cur[IDX_SiI] + - k[5050]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + - k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] + - k[5055]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] + - k[5057]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] + - k[5058]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] + - k[5059]*y_cur[IDX_CH4I]*y_cur[IDX_CNI] + - k[5060]*y_cur[IDX_CH4I]*y_cur[IDX_O2I] + - k[5061]*y_cur[IDX_CH4I]*y_cur[IDX_OHI] + - k[5062]*y_cur[IDX_CH4I]*y_cur[IDX_SI] + - k[5069]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] + - k[5071]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] + - k[5112]*y_cur[IDX_CNI]*y_cur[IDX_CH3CHCH2I] + - k[5135]*y_cur[IDX_H2I]*y_cur[IDX_CH2I] - - k[5136]*y_cur[IDX_H2I]*y_cur[IDX_CH3I] + - k[5157]*y_cur[IDX_HI]*y_cur[IDX_CH2COI] - - k[5158]*y_cur[IDX_HI]*y_cur[IDX_CH3I] + - k[5159]*y_cur[IDX_HI]*y_cur[IDX_CH4I] + - k[5225]*y_cur[IDX_NI]*y_cur[IDX_C2H4I] + - k[5227]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - - k[5257]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - - k[5258]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - - k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + - k[5297]*y_cur[IDX_NH2I]*y_cur[IDX_CH4I] + - k[5304]*y_cur[IDX_NHI]*y_cur[IDX_CH4I] + - k[5349]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + - k[5351]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] + - k[5385]*y_cur[IDX_OI]*y_cur[IDX_CH4I] + - k[5455]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - - k[5542]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] + - k[5556]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + - k[5612]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + - k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5793]*y_cur[IDX_CH3I] - k[5794]*y_cur[IDX_CH3I] - - k[5795]*y_cur[IDX_CH3I] + k[5796]*y_cur[IDX_CH3C3NI] + - k[5797]*y_cur[IDX_CH3C4HI] + k[5798]*y_cur[IDX_CH3C5NI] + - k[5799]*y_cur[IDX_CH3C6HI] + k[5800]*y_cur[IDX_CH3C7NI] + - k[5808]*y_cur[IDX_CH3CHOI] + k[5810]*y_cur[IDX_CH3CNI] + - k[5813]*y_cur[IDX_CH3COCH3I] + k[5813]*y_cur[IDX_CH3COCH3I] + - k[5819]*y_cur[IDX_CH3OHI] + k[5936]*y_cur[IDX_CH3OI] + - k[5938]*y_cur[IDX_CH3COI] + k[5946]*y_cur[IDX_CH3COOHI] - - k[6097]*y_cur[IDX_CH3I] - k[6098]*y_cur[IDX_CH3I] - - k[6099]*y_cur[IDX_CH3I] + k[6100]*y_cur[IDX_CH3C3NI] + - k[6101]*y_cur[IDX_CH3C4HI] + k[6102]*y_cur[IDX_CH3C5NI] + - k[6103]*y_cur[IDX_CH3C6HI] + k[6104]*y_cur[IDX_CH3C7NI] + - k[6113]*y_cur[IDX_CH3CHOI] + k[6115]*y_cur[IDX_CH3CNI] + - k[6117]*y_cur[IDX_CH3COCH3I] + k[6117]*y_cur[IDX_CH3COCH3I] + - k[6124]*y_cur[IDX_CH3OHI] + k[6128]*y_cur[IDX_CH4I] + - k[6289]*y_cur[IDX_CH3OI] + k[6291]*y_cur[IDX_CH3COI] + - k[6297]*y_cur[IDX_CH3COOHI] + - k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + - k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6430]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + - k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + - k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + - k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + - k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + - k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + - k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + - k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + - k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + - k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + - k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM] + - k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] + - k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + - k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + - k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM] + - k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] + - k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - - k[6895]*y_cur[IDX_CH3I] + k[7077]*y_cur[IDX_GCH3I] + - k[7259]*y_cur[IDX_GCH3I] + k[7441]*y_cur[IDX_GCH3I] + - k[8578]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I]; - ydot[yistart + IDX_CH3II] = 0.0 - - k[269]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - - k[270]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - - k[271]*y_cur[IDX_CH3II]*y_cur[IDX_FeI] - - k[272]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - - k[273]*y_cur[IDX_CH3II]*y_cur[IDX_MgI] - - k[274]*y_cur[IDX_CH3II]*y_cur[IDX_NOI] - - k[275]*y_cur[IDX_CH3II]*y_cur[IDX_NaI] + - k[362]*y_cur[IDX_HII]*y_cur[IDX_CH3I] - - k[923]*y_cur[IDX_CH3II]*y_cur[IDX_eM] - - k[924]*y_cur[IDX_CH3II]*y_cur[IDX_eM] - - k[925]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[1382]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - - k[1894]*y_cur[IDX_CI]*y_cur[IDX_CH3II] + - k[1938]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] + - k[1948]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + - k[1987]*y_cur[IDX_CH2II]*y_cur[IDX_HCOI] + - k[1996]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - - k[1999]*y_cur[IDX_CH2I]*y_cur[IDX_CH3II] + - k[2000]*y_cur[IDX_CH2I]*y_cur[IDX_CH5II] + - k[2002]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] + - k[2003]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] + - k[2004]*y_cur[IDX_CH2I]*y_cur[IDX_H3OII] + - k[2005]*y_cur[IDX_CH2I]*y_cur[IDX_HCNII] + - k[2006]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] + - k[2007]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] + - k[2008]*y_cur[IDX_CH2I]*y_cur[IDX_HCOII] + - k[2009]*y_cur[IDX_CH2I]*y_cur[IDX_HNOII] + - k[2010]*y_cur[IDX_CH2I]*y_cur[IDX_N2HII] + - k[2011]*y_cur[IDX_CH2I]*y_cur[IDX_NHII] + - k[2012]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] + - k[2013]*y_cur[IDX_CH2I]*y_cur[IDX_NH3II] + - k[2015]*y_cur[IDX_CH2I]*y_cur[IDX_O2HII] + - k[2016]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - - k[2041]*y_cur[IDX_CH3II]*y_cur[IDX_C2I] - - k[2042]*y_cur[IDX_CH3II]*y_cur[IDX_C2H2I] - - k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - - k[2044]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - - k[2045]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - - k[2046]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - - k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - - k[2048]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] - - k[2049]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] - - k[2050]*y_cur[IDX_CH3II]*y_cur[IDX_C3H2I] - - k[2051]*y_cur[IDX_CH3II]*y_cur[IDX_C3HI] - - k[2052]*y_cur[IDX_CH3II]*y_cur[IDX_C4HI] - - k[2053]*y_cur[IDX_CH3II]*y_cur[IDX_C5H2I] - - k[2054]*y_cur[IDX_CH3II]*y_cur[IDX_C5HI] - - k[2055]*y_cur[IDX_CH3II]*y_cur[IDX_C6H2I] - - k[2056]*y_cur[IDX_CH3II]*y_cur[IDX_C6HI] - - k[2057]*y_cur[IDX_CH3II]*y_cur[IDX_C7H2I] - - k[2058]*y_cur[IDX_CH3II]*y_cur[IDX_C7HI] - - k[2059]*y_cur[IDX_CH3II]*y_cur[IDX_C8H2I] - - k[2060]*y_cur[IDX_CH3II]*y_cur[IDX_C8HI] - - k[2061]*y_cur[IDX_CH3II]*y_cur[IDX_CH2CCHI] - - k[2062]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - - k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - - k[2064]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - - k[2065]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - - k[2066]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - - k[2067]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - - k[2068]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - - k[2069]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - - k[2070]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - - k[2071]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - - k[2072]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OCH3I] - - k[2073]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - - k[2074]*y_cur[IDX_CH3II]*y_cur[IDX_CH4I] - - k[2075]*y_cur[IDX_CH3II]*y_cur[IDX_CNI] - - k[2076]*y_cur[IDX_CH3II]*y_cur[IDX_H2CCCI] - - k[2077]*y_cur[IDX_CH3II]*y_cur[IDX_H2COI] - - k[2078]*y_cur[IDX_CH3II]*y_cur[IDX_H2SI] - - k[2079]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] - - k[2080]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] - - k[2081]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] - - k[2082]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - - k[2083]*y_cur[IDX_CH3II]*y_cur[IDX_HClI] - - k[2084]*y_cur[IDX_CH3II]*y_cur[IDX_HSI] - - k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] - - k[2086]*y_cur[IDX_CH3II]*y_cur[IDX_NH2I] - - k[2087]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - - k[2088]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - - k[2089]*y_cur[IDX_CH3II]*y_cur[IDX_O2I] - - k[2090]*y_cur[IDX_CH3II]*y_cur[IDX_OI] - - k[2091]*y_cur[IDX_CH3II]*y_cur[IDX_OI] - - k[2092]*y_cur[IDX_CH3II]*y_cur[IDX_OCSI] - - k[2093]*y_cur[IDX_CH3II]*y_cur[IDX_OHI] - - k[2094]*y_cur[IDX_CH3II]*y_cur[IDX_PI] - - k[2095]*y_cur[IDX_CH3II]*y_cur[IDX_SI] - - k[2096]*y_cur[IDX_CH3II]*y_cur[IDX_SOI] - - k[2097]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] - - k[2098]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] - - k[2099]*y_cur[IDX_CH3II]*y_cur[IDX_SiH4I] - - k[2100]*y_cur[IDX_CH3II]*y_cur[IDX_SiHI] + - k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - - k[2243]*y_cur[IDX_CHI]*y_cur[IDX_CH3II] + - k[2320]*y_cur[IDX_HII]*y_cur[IDX_CH3C3NI] + - k[2322]*y_cur[IDX_HII]*y_cur[IDX_CH3C5NI] + - k[2324]*y_cur[IDX_HII]*y_cur[IDX_CH3C7NI] + - k[2329]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + - k[2330]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + - k[2333]*y_cur[IDX_HII]*y_cur[IDX_CH4I] + - k[2375]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] + - k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + - k[2428]*y_cur[IDX_H2I]*y_cur[IDX_CH2II] + - k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2634]*y_cur[IDX_H3II]*y_cur[IDX_CH2I] + - k[2653]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2661]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - - k[2837]*y_cur[IDX_HI]*y_cur[IDX_CH3II] + - k[2839]*y_cur[IDX_HI]*y_cur[IDX_CH4II] - - k[3020]*y_cur[IDX_HNC3I]*y_cur[IDX_CH3II] + - k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] + - k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] + - k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] + - k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] + - k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] + - k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] + - k[3197]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + - k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - - k[3454]*y_cur[IDX_NI]*y_cur[IDX_CH3II] - - k[3608]*y_cur[IDX_NHI]*y_cur[IDX_CH3II] + - k[3638]*y_cur[IDX_OII]*y_cur[IDX_CH4I] + - k[3691]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] + - k[3727]*y_cur[IDX_OI]*y_cur[IDX_CH4II] - - k[3893]*y_cur[IDX_CM]*y_cur[IDX_CH3II] - - k[3928]*y_cur[IDX_C10M]*y_cur[IDX_CH3II] - - k[3963]*y_cur[IDX_C10HM]*y_cur[IDX_CH3II] - - k[3998]*y_cur[IDX_C2M]*y_cur[IDX_CH3II] - - k[4033]*y_cur[IDX_C2HM]*y_cur[IDX_CH3II] - - k[4068]*y_cur[IDX_C3M]*y_cur[IDX_CH3II] - - k[4103]*y_cur[IDX_C3HM]*y_cur[IDX_CH3II] - - k[4138]*y_cur[IDX_C3NM]*y_cur[IDX_CH3II] - - k[4173]*y_cur[IDX_C4M]*y_cur[IDX_CH3II] - - k[4208]*y_cur[IDX_C4HM]*y_cur[IDX_CH3II] - - k[4243]*y_cur[IDX_C5M]*y_cur[IDX_CH3II] - - k[4278]*y_cur[IDX_C5HM]*y_cur[IDX_CH3II] - - k[4313]*y_cur[IDX_C5NM]*y_cur[IDX_CH3II] - - k[4348]*y_cur[IDX_C6M]*y_cur[IDX_CH3II] - - k[4383]*y_cur[IDX_C6HM]*y_cur[IDX_CH3II] - - k[4418]*y_cur[IDX_C7M]*y_cur[IDX_CH3II] - - k[4453]*y_cur[IDX_C7HM]*y_cur[IDX_CH3II] - - k[4488]*y_cur[IDX_C8M]*y_cur[IDX_CH3II] - - k[4523]*y_cur[IDX_C8HM]*y_cur[IDX_CH3II] - - k[4558]*y_cur[IDX_C9M]*y_cur[IDX_CH3II] - - k[4593]*y_cur[IDX_C9HM]*y_cur[IDX_CH3II] - - k[4628]*y_cur[IDX_CHM]*y_cur[IDX_CH3II] - - k[4663]*y_cur[IDX_CNM]*y_cur[IDX_CH3II] - - k[4698]*y_cur[IDX_HM]*y_cur[IDX_CH3II] - - k[4734]*y_cur[IDX_OM]*y_cur[IDX_CH3II] - - k[4769]*y_cur[IDX_O2M]*y_cur[IDX_CH3II] - - k[4804]*y_cur[IDX_OHM]*y_cur[IDX_CH3II] - - k[4839]*y_cur[IDX_SM]*y_cur[IDX_CH3II] - - k[5532]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - - k[5533]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - - k[5534]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - - k[5535]*y_cur[IDX_CH3II]*y_cur[IDX_COI] - - k[5536]*y_cur[IDX_CH3II]*y_cur[IDX_H2OI] - - k[5537]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] - - k[5538]*y_cur[IDX_CH3II]*y_cur[IDX_HC5NI] - - k[5539]*y_cur[IDX_CH3II]*y_cur[IDX_HC7NI] - - k[5540]*y_cur[IDX_CH3II]*y_cur[IDX_HCNI] - - k[5541]*y_cur[IDX_CH3II]*y_cur[IDX_NCCNI] - - k[5555]*y_cur[IDX_H2I]*y_cur[IDX_CH3II] - - k[5612]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + - k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + - k[5794]*y_cur[IDX_CH3I] - k[6095]*y_cur[IDX_CH3II] - - k[6096]*y_cur[IDX_CH3II] + k[6098]*y_cur[IDX_CH3I] + - k[6126]*y_cur[IDX_CH4II] - - k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - - k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - - k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3C3NI] = 0.0 + - k[927]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] - - k[1354]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - - k[1355]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - - k[2320]*y_cur[IDX_HII]*y_cur[IDX_CH3C3NI] - - k[2642]*y_cur[IDX_H3II]*y_cur[IDX_CH3C3NI] - - k[2943]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C3NI] - - k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] + - k[5109]*y_cur[IDX_CNI]*y_cur[IDX_CH2CCH2I] + - k[5110]*y_cur[IDX_CNI]*y_cur[IDX_CH3CCHI] - - k[5796]*y_cur[IDX_CH3C3NI] - k[6100]*y_cur[IDX_CH3C3NI] + - k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] - - k[7036]*y_cur[IDX_CH3C3NI] + k[7218]*y_cur[IDX_GCH3C3NI] + - k[7400]*y_cur[IDX_GCH3C3NI] + k[7582]*y_cur[IDX_GCH3C3NI] + - k[8756]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI]; - ydot[yistart + IDX_CH3C3NII] = 0.0 - - k[926]*y_cur[IDX_CH3C3NII]*y_cur[IDX_eM] - - k[2430]*y_cur[IDX_H2I]*y_cur[IDX_CH3C3NII] + - k[2441]*y_cur[IDX_H2I]*y_cur[IDX_H2C4NII] - - k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3C3NHII] = 0.0 - - k[927]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] - - k[928]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] - - k[1895]*y_cur[IDX_CI]*y_cur[IDX_CH3C3NHII] + - k[2430]*y_cur[IDX_H2I]*y_cur[IDX_CH3C3NII] + - k[2642]*y_cur[IDX_H3II]*y_cur[IDX_CH3C3NI] + - k[2943]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C3NI] + - k[3408]*y_cur[IDX_NI]*y_cur[IDX_C4H5II] + - k[5537]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] - - k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] - - k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3C4HI] = 0.0 - - k[363]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] + - k[846]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] - - k[1356]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - - k[1357]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - - k[1358]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - - k[2321]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] - - k[2643]*y_cur[IDX_H3II]*y_cur[IDX_CH3C4HI] - - k[2944]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C4HI] - - k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - - k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + - k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] + - k[4894]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] + - k[4895]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] + - k[4896]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] + - k[4897]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] - - k[4950]*y_cur[IDX_CI]*y_cur[IDX_CH3C4HI] - - k[5797]*y_cur[IDX_CH3C4HI] - k[6101]*y_cur[IDX_CH3C4HI] + - k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - - k[7034]*y_cur[IDX_CH3C4HI] + k[7216]*y_cur[IDX_GCH3C4HI] + - k[7398]*y_cur[IDX_GCH3C4HI] + k[7580]*y_cur[IDX_GCH3C4HI]; - ydot[yistart + IDX_CH3C4HII] = 0.0 + - k[363]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] - - k[929]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] - - k[930]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] + - k[1508]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + - k[1510]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + - k[1582]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + - k[1610]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + - k[1618]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + - k[1630]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + - k[1631]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H3II] + - k[1643]*y_cur[IDX_C2H3I]*y_cur[IDX_CH2CCHII] + - k[1652]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] + - k[2107]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] + - k[2170]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + - k[3424]*y_cur[IDX_NI]*y_cur[IDX_C6H5II] - - k[3455]*y_cur[IDX_NI]*y_cur[IDX_CH3C4HII] - - k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] - - k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3C5NI] = 0.0 + - k[931]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] - - k[1359]*y_cur[IDX_CII]*y_cur[IDX_CH3C5NI] - - k[2322]*y_cur[IDX_HII]*y_cur[IDX_CH3C5NI] - - k[2644]*y_cur[IDX_H3II]*y_cur[IDX_CH3C5NI] - - k[2945]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C5NI] - - k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] - - k[5798]*y_cur[IDX_CH3C5NI] - k[6102]*y_cur[IDX_CH3C5NI] + - k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - - k[7054]*y_cur[IDX_CH3C5NI] + k[7236]*y_cur[IDX_GCH3C5NI] + - k[7418]*y_cur[IDX_GCH3C5NI] + k[7600]*y_cur[IDX_GCH3C5NI] + - k[8757]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI]; - ydot[yistart + IDX_CH3C5NHII] = 0.0 - - k[931]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] - - k[932]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] - - k[1896]*y_cur[IDX_CI]*y_cur[IDX_CH3C5NHII] + - k[2644]*y_cur[IDX_H3II]*y_cur[IDX_CH3C5NI] + - k[2945]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C5NI] + - k[5538]*y_cur[IDX_CH3II]*y_cur[IDX_HC5NI] - - k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - - k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3C6HI] = 0.0 - - k[364]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] + - k[875]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] - - k[1360]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] - - k[1361]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] - - k[2323]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] - - k[2645]*y_cur[IDX_H3II]*y_cur[IDX_CH3C6HI] - - k[2946]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C6HI] - - k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - - k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - - k[4951]*y_cur[IDX_CI]*y_cur[IDX_CH3C6HI] + - k[5023]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] + - k[5051]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + - k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - - k[5799]*y_cur[IDX_CH3C6HI] - k[6103]*y_cur[IDX_CH3C6HI] + - k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - - k[7053]*y_cur[IDX_CH3C6HI] + k[7235]*y_cur[IDX_GCH3C6HI] + - k[7417]*y_cur[IDX_GCH3C6HI] + k[7599]*y_cur[IDX_GCH3C6HI]; - ydot[yistart + IDX_CH3C7NI] = 0.0 + - k[933]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] - - k[1362]*y_cur[IDX_CII]*y_cur[IDX_CH3C7NI] - - k[2324]*y_cur[IDX_HII]*y_cur[IDX_CH3C7NI] - - k[2646]*y_cur[IDX_H3II]*y_cur[IDX_CH3C7NI] - - k[2947]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C7NI] - - k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] - - k[5800]*y_cur[IDX_CH3C7NI] - k[6104]*y_cur[IDX_CH3C7NI] + - k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - - k[7063]*y_cur[IDX_CH3C7NI] + k[7245]*y_cur[IDX_GCH3C7NI] + - k[7427]*y_cur[IDX_GCH3C7NI] + k[7609]*y_cur[IDX_GCH3C7NI] + - k[8758]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI]; - ydot[yistart + IDX_CH3C7NHII] = 0.0 - - k[933]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] - - k[934]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] - - k[1897]*y_cur[IDX_CI]*y_cur[IDX_CH3C7NHII] + - k[2646]*y_cur[IDX_H3II]*y_cur[IDX_CH3C7NI] + - k[2947]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C7NI] + - k[5539]*y_cur[IDX_CH3II]*y_cur[IDX_HC7NI] - - k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - - k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3CCHI] = 0.0 - - k[165]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[220]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - - k[365]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] + - k[804]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + - k[806]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + - k[811]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[828]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] - - k[1363]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[1364]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[1365]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[1366]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - - k[1509]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - - k[1510]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - - k[1611]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] - - k[1612]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] - - k[1669]*y_cur[IDX_C2H4II]*y_cur[IDX_CH3CCHI] - - k[1777]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1778]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1779]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1780]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1781]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - - k[1811]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - - k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - - k[1813]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + - k[1814]*y_cur[IDX_C3H5II]*y_cur[IDX_C6H6I] + - k[1816]*y_cur[IDX_C3H5II]*y_cur[IDX_HC3NI] - - k[2104]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C3H5II] - - k[2105]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HII] - - k[2106]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] - - k[2107]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] - - k[2108]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H3II] - - k[2109]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C5H2II] - - k[2110]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C6H2II] + - k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - - k[2325]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] - - k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] - - k[2789]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CCHI] - - k[2948]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CCHI] - - k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3864]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - - k[3865]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - - k[3866]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - - k[4896]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] - - k[4897]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] + - k[4898]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CHCH2I] + - k[4915]*y_cur[IDX_CI]*y_cur[IDX_C2H5I] - - k[4952]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - - k[4953]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - - k[5050]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] - - k[5051]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + - k[5066]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - - k[5068]*y_cur[IDX_CHI]*y_cur[IDX_CH3CCHI] - - k[5110]*y_cur[IDX_CNI]*y_cur[IDX_CH3CCHI] + - k[5785]*y_cur[IDX_CH2CHCCHI] - k[5801]*y_cur[IDX_CH3CCHI] - - k[5802]*y_cur[IDX_CH3CCHI] + k[6086]*y_cur[IDX_CH2CHCCHI] - - k[6105]*y_cur[IDX_CH3CCHI] - k[6106]*y_cur[IDX_CH3CCHI] - - k[6107]*y_cur[IDX_CH3CCHI] + - k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + - k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + - k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - - k[6952]*y_cur[IDX_CH3CCHI] + k[7134]*y_cur[IDX_GCH3CCHI] + - k[7316]*y_cur[IDX_GCH3CCHI] + k[7498]*y_cur[IDX_GCH3CCHI] + - k[8615]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + - k[8723]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; - ydot[yistart + IDX_CH3CHCH2I] = 0.0 - - k[166]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[670]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[702]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[712]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] + - k[813]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - - k[1373]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1374]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1375]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1376]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - - k[1815]*y_cur[IDX_C3H5II]*y_cur[IDX_CH3CHCH2I] - - k[1817]*y_cur[IDX_C3H6II]*y_cur[IDX_CH3CHCH2I] + - k[1818]*y_cur[IDX_C3H7II]*y_cur[IDX_NH3I] - - k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - - k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - - k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] - - k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] - - k[2790]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHCH2I] - - k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - - k[3370]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - - k[3658]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3659]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3660]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3661]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3823]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[3824]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[3825]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[3826]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - - k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] - - k[4898]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CHCH2I] - - k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] - - k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - - k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - - k[5055]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] - - k[5056]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] + - k[5070]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - - k[5071]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - - k[5072]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - - k[5112]*y_cur[IDX_CNI]*y_cur[IDX_CH3CHCH2I] + - k[5786]*y_cur[IDX_C4H6I] - k[5805]*y_cur[IDX_CH3CHCH2I] + - k[6087]*y_cur[IDX_C4H6I] - k[6110]*y_cur[IDX_CH3CHCH2I] + - k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6959]*y_cur[IDX_CH3CHCH2I] + k[7141]*y_cur[IDX_GCH3CHCH2I] + - k[7323]*y_cur[IDX_GCH3CHCH2I] + k[7505]*y_cur[IDX_GCH3CHCH2I]; - ydot[yistart + IDX_CH3CHOI] = 0.0 - - k[167]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] - - k[366]*y_cur[IDX_HII]*y_cur[IDX_CH3CHOI] + - k[941]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[950]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + - k[952]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] - - k[1378]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] - - k[2065]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - - k[2066]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - - k[2067]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - - k[2113]*y_cur[IDX_CH3CHOI]*y_cur[IDX_HCOOH2II] - - k[2114]*y_cur[IDX_CH3CHOI]*y_cur[IDX_S2II] - - k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2652]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2653]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2654]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2656]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2657]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2791]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHOI] - - k[2950]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CHOI] - - k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] + - k[3569]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] + - k[5055]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] + - k[5073]*y_cur[IDX_CHI]*y_cur[IDX_CH3OHI] + - k[5350]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - - k[5532]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + - k[5586]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] - k[5806]*y_cur[IDX_CH3CHOI] - - k[5807]*y_cur[IDX_CH3CHOI] - k[5808]*y_cur[IDX_CH3CHOI] - - k[6111]*y_cur[IDX_CH3CHOI] - k[6112]*y_cur[IDX_CH3CHOI] - - k[6113]*y_cur[IDX_CH3CHOI] + - k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + - k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - - k[6977]*y_cur[IDX_CH3CHOI] + k[7159]*y_cur[IDX_GCH3CHOI] + - k[7341]*y_cur[IDX_GCH3CHOI] + k[7523]*y_cur[IDX_GCH3CHOI] + - k[8626]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] + - k[8751]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI]; - ydot[yistart + IDX_CH3CHOII] = 0.0 + - k[167]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] + - k[366]*y_cur[IDX_HII]*y_cur[IDX_CH3CHOI] - - k[937]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] - - k[938]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + - k[3661]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[5640]*y_cur[IDX_H3II]*y_cur[IDX_CH3COI] + - k[5641]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COI] + - k[5806]*y_cur[IDX_CH3CHOI] + k[6111]*y_cur[IDX_CH3CHOI] - - k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] - - k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3CHOHII] = 0.0 - - k[939]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] - - k[940]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] - - k[941]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] - - k[942]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] - - k[943]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[1724]*y_cur[IDX_C2H5OHI]*y_cur[IDX_S2II] + - k[2072]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OCH3I] + - k[2113]*y_cur[IDX_CH3CHOI]*y_cur[IDX_HCOOH2II] + - k[2193]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + - k[2494]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + - k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2654]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2791]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHOI] + - k[2950]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CHOI] - - k[3569]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - - k[3570]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] + - k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3664]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] + - k[5543]*y_cur[IDX_CH4I]*y_cur[IDX_HCOII] + - k[5545]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + - k[5567]*y_cur[IDX_H3OII]*y_cur[IDX_C2H2I] - - k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - - k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - - k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - - k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - - k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3CNI] = 0.0 + - k[60]*y_cur[IDX_CH3I]*y_cur[IDX_CNM] - - k[367]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - - k[650]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] + - k[946]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] - - k[1379]*y_cur[IDX_CII]*y_cur[IDX_CH3CNI] - - k[1513]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - - k[1514]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - - k[1515]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - - k[1719]*y_cur[IDX_C2H5II]*y_cur[IDX_CH3CNI] - - k[1842]*y_cur[IDX_C4H7II]*y_cur[IDX_CH3CNI] - - k[2068]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - - k[2069]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - - k[2115]*y_cur[IDX_CH3CNI]*y_cur[IDX_HC3NHII] - - k[2116]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCO2II] - - k[2117]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCOOH2II] - - k[2328]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - - k[2329]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - - k[2658]*y_cur[IDX_H3II]*y_cur[IDX_CH3CNI] - - k[2792]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CNI] - - k[2888]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] - - k[2889]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] - - k[2951]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CNI] - - k[3192]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - - k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - - k[3371]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CNI] - - k[3635]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - - k[5533]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + - k[5542]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] - k[5809]*y_cur[IDX_CH3CNI] - - k[5810]*y_cur[IDX_CH3CNI] - k[6114]*y_cur[IDX_CH3CNI] - - k[6115]*y_cur[IDX_CH3CNI] + - k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] - - k[6957]*y_cur[IDX_CH3CNI] + k[7139]*y_cur[IDX_GCH3CNI] + - k[7321]*y_cur[IDX_GCH3CNI] + k[7503]*y_cur[IDX_GCH3CNI] + - k[8618]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] + - k[8749]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI]; - ydot[yistart + IDX_CH3CNII] = 0.0 + - k[367]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + - k[650]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - - k[944]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] - - k[945]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] - - k[2283]*y_cur[IDX_COI]*y_cur[IDX_CH3CNII] - - k[2431]*y_cur[IDX_H2I]*y_cur[IDX_CH3CNII] + - k[2638]*y_cur[IDX_H3II]*y_cur[IDX_CH2CNI] + - k[3391]*y_cur[IDX_NI]*y_cur[IDX_C2H4II] + - k[3532]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + - k[5809]*y_cur[IDX_CH3CNI] + k[6114]*y_cur[IDX_CH3CNI] - - k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] - - k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3CNHII] = 0.0 - - k[946]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] - - k[947]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] + - k[1515]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] + - k[1719]*y_cur[IDX_C2H5II]*y_cur[IDX_CH3CNI] + - k[1842]*y_cur[IDX_C4H7II]*y_cur[IDX_CH3CNI] + - k[2115]*y_cur[IDX_CH3CNI]*y_cur[IDX_HC3NHII] + - k[2116]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCO2II] + - k[2117]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCOOH2II] + - k[2431]*y_cur[IDX_H2I]*y_cur[IDX_CH3CNII] + - k[2658]*y_cur[IDX_H3II]*y_cur[IDX_CH3CNI] + - k[2792]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CNI] + - k[2863]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] + - k[2873]*y_cur[IDX_HCNI]*y_cur[IDX_CH3OH2II] + - k[2888]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] + - k[2889]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] + - k[2951]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CNI] + - k[3371]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CNI] + - k[5540]*y_cur[IDX_CH3II]*y_cur[IDX_HCNI] - - k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] - - k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3COI] = 0.0 + - k[1289]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1292]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1295]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[5639]*y_cur[IDX_CII]*y_cur[IDX_CH3COI] - - k[5640]*y_cur[IDX_H3II]*y_cur[IDX_CH3COI] - - k[5641]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COI] - - k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] - - k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + - k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5938]*y_cur[IDX_CH3COI] + k[5947]*y_cur[IDX_CH3COOHI] - - k[6291]*y_cur[IDX_CH3COI] + k[6296]*y_cur[IDX_CH3COOHI] + - k[6716]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6966]*y_cur[IDX_CH3COI] + k[7148]*y_cur[IDX_GCH3COI] + - k[7330]*y_cur[IDX_GCH3COI] + k[7512]*y_cur[IDX_GCH3COI] + - k[8750]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_CH3COII] = 0.0 - - k[948]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] - - k[949]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + - k[1378]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] + - k[1380]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] + - k[1980]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + - k[2065]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + - k[2070]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + - k[2114]*y_cur[IDX_CH3CHOI]*y_cur[IDX_S2II] + - k[2189]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + - k[2639]*y_cur[IDX_H3II]*y_cur[IDX_CH2COI] + - k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2786]*y_cur[IDX_H3OII]*y_cur[IDX_CH2COI] + - k[2940]*y_cur[IDX_HCOII]*y_cur[IDX_CH2COI] + - k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] + - k[3852]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[5535]*y_cur[IDX_CH3II]*y_cur[IDX_COI] + - k[5639]*y_cur[IDX_CII]*y_cur[IDX_CH3COI] + - k[5674]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] - - k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3COCH3I] = 0.0 - - k[168]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - - k[270]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - - k[368]*y_cur[IDX_HII]*y_cur[IDX_CH3COCH3I] - - k[713]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] + - k[953]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] - - k[1380]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - - k[1723]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_CH3COCH3I] - - k[2070]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - - k[2071]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - - k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2661]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2663]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2665]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2793]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COCH3I] - - k[2952]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COCH3I] - - k[3014]*y_cur[IDX_HCSII]*y_cur[IDX_CH3COCH3I] - - k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] - - k[3857]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - - k[5811]*y_cur[IDX_CH3COCH3I] - k[5812]*y_cur[IDX_CH3COCH3I] - - k[5813]*y_cur[IDX_CH3COCH3I] - k[6116]*y_cur[IDX_CH3COCH3I] - - k[6117]*y_cur[IDX_CH3COCH3I] + - k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - - k[7018]*y_cur[IDX_CH3COCH3I] + k[7200]*y_cur[IDX_GCH3COCH3I] + - k[7382]*y_cur[IDX_GCH3COCH3I] + k[7568]*y_cur[IDX_GCH3COCH3I] + - k[8754]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI]; - ydot[yistart + IDX_CH3COCH3II] = 0.0 + - k[168]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] + - k[270]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + - k[368]*y_cur[IDX_HII]*y_cur[IDX_CH3COCH3I] + - k[713]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - - k[950]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] - - k[951]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] - - k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - - k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - - k[2493]*y_cur[IDX_H2COI]*y_cur[IDX_CH3COCH3II] + - k[5812]*y_cur[IDX_CH3COCH3I] + k[6116]*y_cur[IDX_CH3COCH3I] - - k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] - - k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3COCH4II] = 0.0 - - k[952]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] - - k[953]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] + - k[1723]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_CH3COCH3I] + - k[2071]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + - k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] + - k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] + - k[2491]*y_cur[IDX_H2COI]*y_cur[IDX_C2H5OH2II] + - k[2493]*y_cur[IDX_H2COI]*y_cur[IDX_CH3COCH3II] + - k[2663]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2793]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COCH3I] + - k[2952]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COCH3I] + - k[3014]*y_cur[IDX_HCSII]*y_cur[IDX_CH3COCH3I] + - k[5532]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - - k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - - k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3COOHI] = 0.0 + - k[1296]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[5667]*y_cur[IDX_CII]*y_cur[IDX_CH3COOHI] - - k[5668]*y_cur[IDX_H3II]*y_cur[IDX_CH3COOHI] - - k[5669]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COOHI] - - k[5670]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COOHI] - - k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5674]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5946]*y_cur[IDX_CH3COOHI] - k[5947]*y_cur[IDX_CH3COOHI] - - k[6296]*y_cur[IDX_CH3COOHI] - k[6297]*y_cur[IDX_CH3COOHI] + - k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[7027]*y_cur[IDX_CH3COOHI] + k[7209]*y_cur[IDX_GCH3COOHI] + - k[7391]*y_cur[IDX_GCH3COOHI] + k[7566]*y_cur[IDX_GCH3COOHI] + - k[8742]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] + - k[8755]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI]; - ydot[yistart + IDX_CH3COOHII] = 0.0 - - k[1284]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - - k[1285]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - - k[1286]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - - k[1287]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - - k[1288]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - - k[1289]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[5667]*y_cur[IDX_CII]*y_cur[IDX_CH3COOHI] - - k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6716]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3COOH2II] = 0.0 - - k[1290]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[1291]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[1292]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[1293]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[1294]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[1295]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[1296]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[5668]*y_cur[IDX_H3II]*y_cur[IDX_CH3COOHI] + - k[5669]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COOHI] + - k[5670]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COOHI] - - k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3CSII] = 0.0 - - k[954]*y_cur[IDX_CH3CSII]*y_cur[IDX_eM] + - k[1716]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] + - k[3824]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + - k[3847]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + - k[3853]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3NHII] = 0.0 - - k[970]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] - - k[971]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + - k[1988]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] + - k[2086]*y_cur[IDX_CH3II]*y_cur[IDX_NH2I] + - k[2087]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - - k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] - - k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3OI] = 0.0 + - k[1271]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] - - k[5627]*y_cur[IDX_CII]*y_cur[IDX_CH3OI] - - k[5628]*y_cur[IDX_H3II]*y_cur[IDX_CH3OI] - - k[5629]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OI] - - k[5630]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OI] - - k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] - - k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + - k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + - k[5817]*y_cur[IDX_CH3OHI] - k[5936]*y_cur[IDX_CH3OI] + - k[5943]*y_cur[IDX_COOCH3I] + k[6121]*y_cur[IDX_CH3OHI] - - k[6289]*y_cur[IDX_CH3OI] + k[6293]*y_cur[IDX_COOCH3I] + - k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] - - k[6931]*y_cur[IDX_CH3OI] + k[7113]*y_cur[IDX_GCH3OI] + - k[7295]*y_cur[IDX_GCH3OI] + k[7477]*y_cur[IDX_GCH3OI] + - k[8596]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + - k[8688]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I]; - ydot[yistart + IDX_CH3OCH3I] = 0.0 - - k[169]*y_cur[IDX_CII]*y_cur[IDX_CH3OCH3I] - - k[369]*y_cur[IDX_HII]*y_cur[IDX_CH3OCH3I] - - k[671]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] - - k[714]*y_cur[IDX_SOII]*y_cur[IDX_CH3OCH3I] + - k[958]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] - - k[2072]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OCH3I] - - k[2666]*y_cur[IDX_H3II]*y_cur[IDX_CH3OCH3I] - - k[2794]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OCH3I] - - k[2953]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OCH3I] - - k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] - - k[3664]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] - - k[5814]*y_cur[IDX_CH3OCH3I] - k[5815]*y_cur[IDX_CH3OCH3I] - - k[6118]*y_cur[IDX_CH3OCH3I] - k[6119]*y_cur[IDX_CH3OCH3I] + - k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - - k[6983]*y_cur[IDX_CH3OCH3I] + k[7165]*y_cur[IDX_GCH3OCH3I] + - k[7347]*y_cur[IDX_GCH3OCH3I] + k[7529]*y_cur[IDX_GCH3OCH3I] + - k[8752]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI]; - ydot[yistart + IDX_CH3OCH3II] = 0.0 + - k[169]*y_cur[IDX_CII]*y_cur[IDX_CH3OCH3I] + - k[369]*y_cur[IDX_HII]*y_cur[IDX_CH3OCH3I] + - k[671]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] + - k[714]*y_cur[IDX_SOII]*y_cur[IDX_CH3OCH3I] - - k[955]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] - - k[956]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + - k[5814]*y_cur[IDX_CH3OCH3I] + k[6118]*y_cur[IDX_CH3OCH3I] - - k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] - - k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3OCH4II] = 0.0 - - k[957]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] - - k[958]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] - - k[959]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + - k[2125]*y_cur[IDX_CH3OHI]*y_cur[IDX_CH3OH2II] + - k[2666]*y_cur[IDX_H3II]*y_cur[IDX_CH3OCH3I] + - k[2794]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OCH3I] + - k[2953]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OCH3I] + - k[5534]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - - k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - - k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - - k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3OHI] = 0.0 + - k[61]*y_cur[IDX_CH3I]*y_cur[IDX_OHM] - - k[279]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] - - k[370]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - - k[545]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - - k[651]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - - k[672]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] + - k[955]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + - k[959]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + - k[966]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[982]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + - k[1053]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] - - k[1381]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - - k[1382]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - - k[1937]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - - k[1938]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - - k[1939]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - - k[2073]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] + - k[2120]*y_cur[IDX_CH3OH2II]*y_cur[IDX_HCOOHI] + - k[2121]*y_cur[IDX_CH3OH2II]*y_cur[IDX_NH3I] - - k[2122]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] - - k[2123]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] - - k[2124]*y_cur[IDX_CH3OHI]*y_cur[IDX_C4H3II] - - k[2125]*y_cur[IDX_CH3OHI]*y_cur[IDX_CH3OH2II] - - k[2126]*y_cur[IDX_CH3OHI]*y_cur[IDX_HC3NHII] - - k[2127]*y_cur[IDX_CH3OHI]*y_cur[IDX_HCOOH2II] - - k[2128]*y_cur[IDX_CH3OHI]*y_cur[IDX_NCCNHII] - - k[2129]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - - k[2130]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - - k[2131]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH3II] - - k[2132]*y_cur[IDX_CH3OHI]*y_cur[IDX_S2II] - - k[2137]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] - - k[2330]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - - k[2331]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - - k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - - k[2487]*y_cur[IDX_H2COII]*y_cur[IDX_CH3OHI] + - k[2653]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - - k[2668]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - - k[2762]*y_cur[IDX_H3COII]*y_cur[IDX_CH3OHI] - - k[2795]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OHI] - - k[2954]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OHI] - - k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] - - k[3197]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] - - k[3336]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - - k[3337]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - - k[3338]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - - k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3570]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - - k[3636]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - - k[3637]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - - k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - - k[3810]*y_cur[IDX_PII]*y_cur[IDX_CH3OHI] - - k[3816]*y_cur[IDX_PHII]*y_cur[IDX_CH3OHI] - - k[3867]*y_cur[IDX_SiII]*y_cur[IDX_CH3OHI] - - k[5073]*y_cur[IDX_CHI]*y_cur[IDX_CH3OHI] - - k[5534]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - - k[5816]*y_cur[IDX_CH3OHI] - k[5817]*y_cur[IDX_CH3OHI] - - k[5818]*y_cur[IDX_CH3OHI] - k[5819]*y_cur[IDX_CH3OHI] - - k[6120]*y_cur[IDX_CH3OHI] - k[6121]*y_cur[IDX_CH3OHI] - - k[6122]*y_cur[IDX_CH3OHI] - k[6123]*y_cur[IDX_CH3OHI] - - k[6124]*y_cur[IDX_CH3OHI] + - k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + - k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + - k[6699]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + - k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - - k[6936]*y_cur[IDX_CH3OHI] + k[7118]*y_cur[IDX_GCH3OHI] + - k[7300]*y_cur[IDX_GCH3OHI] + k[7482]*y_cur[IDX_GCH3OHI] + - k[8598]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] + - k[8599]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] + - k[8737]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I]; - ydot[yistart + IDX_CH3OHII] = 0.0 + - k[279]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] + - k[370]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + - k[545]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[651]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + - k[672]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - - k[960]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] - - k[961]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] - - k[962]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + - k[5628]*y_cur[IDX_H3II]*y_cur[IDX_CH3OI] + - k[5629]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OI] + - k[5630]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OI] + - k[5634]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHI] + - k[5635]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHI] + - k[5636]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHI] + - k[5816]*y_cur[IDX_CH3OHI] + k[6120]*y_cur[IDX_CH3OHI] - - k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - - k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - - k[6430]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH3OH2II] = 0.0 - - k[963]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] - - k[964]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] - - k[965]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] - - k[966]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] - - k[967]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[1937]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - - k[2120]*y_cur[IDX_CH3OH2II]*y_cur[IDX_HCOOHI] - - k[2121]*y_cur[IDX_CH3OH2II]*y_cur[IDX_NH3I] + - k[2124]*y_cur[IDX_CH3OHI]*y_cur[IDX_C4H3II] - - k[2125]*y_cur[IDX_CH3OHI]*y_cur[IDX_CH3OH2II] + - k[2126]*y_cur[IDX_CH3OHI]*y_cur[IDX_HC3NHII] + - k[2127]*y_cur[IDX_CH3OHI]*y_cur[IDX_HCOOH2II] + - k[2128]*y_cur[IDX_CH3OHI]*y_cur[IDX_NCCNHII] + - k[2131]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH3II] + - k[2137]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] + - k[2487]*y_cur[IDX_H2COII]*y_cur[IDX_CH3OHI] - - k[2494]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] - - k[2495]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + - k[2668]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] + - k[2762]*y_cur[IDX_H3COII]*y_cur[IDX_CH3OHI] + - k[2795]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OHI] - - k[2873]*y_cur[IDX_HCNI]*y_cur[IDX_CH3OH2II] + - k[2954]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OHI] + - k[5536]*y_cur[IDX_CH3II]*y_cur[IDX_H2OI] - - k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - - k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - - k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - - k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - - k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH4I] = 0.0 + k[70]*y_cur[IDX_HM]*y_cur[IDX_CH3I] - + k[277]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + - k[278]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] + - k[279]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] + - k[280]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] + - k[281]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] + - k[282]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] + - k[283]*y_cur[IDX_CH4II]*y_cur[IDX_O2I] + - k[284]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - - k[285]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - - k[286]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - - k[371]*y_cur[IDX_HII]*y_cur[IDX_CH4I] - - k[442]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - - k[514]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[546]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - - k[652]*y_cur[IDX_OII]*y_cur[IDX_CH4I] + - k[763]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[773]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] + - k[942]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[957]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + - k[975]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[1204]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + - k[1367]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - - k[1383]*y_cur[IDX_CII]*y_cur[IDX_CH4I] - - k[1384]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + - k[1538]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] + - k[1614]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + - k[1667]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + - k[1670]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] + - k[1674]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + - k[1685]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H5II] + - k[1714]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] + - k[1898]*y_cur[IDX_CI]*y_cur[IDX_CH5II] - - k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - - k[1941]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - - k[1942]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - - k[1976]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] - - k[1977]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + - k[2000]*y_cur[IDX_CH2I]*y_cur[IDX_CH5II] + - k[2045]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + - k[2062]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + - k[2065]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + - k[2072]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OCH3I] + - k[2073]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - - k[2074]*y_cur[IDX_CH3II]*y_cur[IDX_CH4I] + - k[2077]*y_cur[IDX_CH3II]*y_cur[IDX_H2COI] + - k[2099]*y_cur[IDX_CH3II]*y_cur[IDX_SiH4I] + - k[2123]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] + - k[2129]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - - k[2138]*y_cur[IDX_CH4II]*y_cur[IDX_CH4I] - - k[2146]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2147]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2149]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2150]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - - k[2151]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - - k[2152]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - - k[2153]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - - k[2154]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] - - k[2155]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] - - k[2156]*y_cur[IDX_CH4I]*y_cur[IDX_C2H3II] - - k[2157]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - - k[2158]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - - k[2159]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - - k[2160]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] - - k[2161]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] - - k[2162]*y_cur[IDX_CH4I]*y_cur[IDX_C3H2II] - - k[2163]*y_cur[IDX_CH4I]*y_cur[IDX_C3OII] - - k[2164]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - - k[2165]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - - k[2166]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - - k[2167]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - - k[2168]*y_cur[IDX_CH4I]*y_cur[IDX_C4HII] - - k[2169]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] - - k[2170]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] - - k[2171]*y_cur[IDX_CH4I]*y_cur[IDX_C4H3II] - - k[2172]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2173]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2174]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2175]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2176]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - - k[2177]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - - k[2178]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - - k[2179]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - - k[2180]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] - - k[2181]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] - - k[2182]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - - k[2183]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - - k[2184]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - - k[2185]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] - - k[2186]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] - - k[2187]*y_cur[IDX_CH4I]*y_cur[IDX_C7H2II] - - k[2188]*y_cur[IDX_CH4I]*y_cur[IDX_C8H2II] - - k[2189]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - - k[2190]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - - k[2191]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - - k[2192]*y_cur[IDX_CH4I]*y_cur[IDX_CSII] - - k[2193]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] - - k[2194]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] - - k[2195]*y_cur[IDX_CH4I]*y_cur[IDX_H2OII] - - k[2196]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - - k[2197]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - - k[2198]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - - k[2199]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] - - k[2200]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] - - k[2201]*y_cur[IDX_CH4I]*y_cur[IDX_HCO2II] - - k[2202]*y_cur[IDX_CH4I]*y_cur[IDX_HNOII] - - k[2203]*y_cur[IDX_CH4I]*y_cur[IDX_HSII] - - k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - - k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - - k[2206]*y_cur[IDX_CH4I]*y_cur[IDX_N2HII] - - k[2207]*y_cur[IDX_CH4I]*y_cur[IDX_NH3II] - - k[2208]*y_cur[IDX_CH4I]*y_cur[IDX_O2II] - - k[2209]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - - k[2210]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - - k[2211]*y_cur[IDX_CH4I]*y_cur[IDX_PII] - - k[2212]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] - - k[2213]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] - - k[2214]*y_cur[IDX_CH4I]*y_cur[IDX_PH2II] - - k[2215]*y_cur[IDX_CH4I]*y_cur[IDX_SII] - - k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + - k[2217]*y_cur[IDX_CH5II]*y_cur[IDX_C2I] + - k[2218]*y_cur[IDX_CH5II]*y_cur[IDX_C2H2I] + - k[2219]*y_cur[IDX_CH5II]*y_cur[IDX_C2H4I] + - k[2220]*y_cur[IDX_CH5II]*y_cur[IDX_C2HI] + - k[2221]*y_cur[IDX_CH5II]*y_cur[IDX_C6H6I] + - k[2222]*y_cur[IDX_CH5II]*y_cur[IDX_C2H6I] + - k[2223]*y_cur[IDX_CH5II]*y_cur[IDX_CO2I] + - k[2224]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + - k[2225]*y_cur[IDX_CH5II]*y_cur[IDX_H2COI] + - k[2226]*y_cur[IDX_CH5II]*y_cur[IDX_H2OI] + - k[2227]*y_cur[IDX_CH5II]*y_cur[IDX_H2SI] + - k[2228]*y_cur[IDX_CH5II]*y_cur[IDX_HC3NI] + - k[2229]*y_cur[IDX_CH5II]*y_cur[IDX_HCNI] + - k[2230]*y_cur[IDX_CH5II]*y_cur[IDX_HCOI] + - k[2231]*y_cur[IDX_CH5II]*y_cur[IDX_HClI] + - k[2232]*y_cur[IDX_CH5II]*y_cur[IDX_HNCI] + - k[2233]*y_cur[IDX_CH5II]*y_cur[IDX_MgI] + - k[2234]*y_cur[IDX_CH5II]*y_cur[IDX_N2OI] + - k[2235]*y_cur[IDX_CH5II]*y_cur[IDX_SI] + - k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] + - k[2244]*y_cur[IDX_CHI]*y_cur[IDX_CH5II] - - k[2333]*y_cur[IDX_HII]*y_cur[IDX_CH4I] - - k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - - k[2379]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + - k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + - k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2669]*y_cur[IDX_H3II]*y_cur[IDX_CH4I] + - k[2863]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - - k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - - k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - - k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[3533]*y_cur[IDX_NH2I]*y_cur[IDX_CH5II] + - k[3571]*y_cur[IDX_NH3I]*y_cur[IDX_CH5II] + - k[3609]*y_cur[IDX_NHI]*y_cur[IDX_CH5II] - - k[3638]*y_cur[IDX_OII]*y_cur[IDX_CH4I] - - k[3652]*y_cur[IDX_OM]*y_cur[IDX_CH4I] + - k[3797]*y_cur[IDX_OHI]*y_cur[IDX_CH5II] - - k[4871]*y_cur[IDX_C2I]*y_cur[IDX_CH4I] - - k[4996]*y_cur[IDX_CH2I]*y_cur[IDX_CH4I] + - k[5025]*y_cur[IDX_CH3I]*y_cur[IDX_C2H3I] + - k[5028]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + - k[5030]*y_cur[IDX_CH3I]*y_cur[IDX_H2COI] + - k[5031]*y_cur[IDX_CH3I]*y_cur[IDX_H2OI] + - k[5032]*y_cur[IDX_CH3I]*y_cur[IDX_H2SI] + - k[5033]*y_cur[IDX_CH3I]*y_cur[IDX_HCOI] + - k[5034]*y_cur[IDX_CH3I]*y_cur[IDX_HNOI] + - k[5035]*y_cur[IDX_CH3I]*y_cur[IDX_NH2I] + - k[5036]*y_cur[IDX_CH3I]*y_cur[IDX_NH3I] + - k[5042]*y_cur[IDX_CH3I]*y_cur[IDX_O2HI] + - k[5045]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] - - k[5057]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - - k[5058]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - - k[5059]*y_cur[IDX_CH4I]*y_cur[IDX_CNI] - - k[5060]*y_cur[IDX_CH4I]*y_cur[IDX_O2I] - - k[5061]*y_cur[IDX_CH4I]*y_cur[IDX_OHI] - - k[5062]*y_cur[IDX_CH4I]*y_cur[IDX_SI] - - k[5074]*y_cur[IDX_CHI]*y_cur[IDX_CH4I] + - k[5136]*y_cur[IDX_H2I]*y_cur[IDX_CH3I] - - k[5159]*y_cur[IDX_HI]*y_cur[IDX_CH4I] - - k[5297]*y_cur[IDX_NH2I]*y_cur[IDX_CH4I] - - k[5304]*y_cur[IDX_NHI]*y_cur[IDX_CH4I] - - k[5385]*y_cur[IDX_OI]*y_cur[IDX_CH4I] - - k[5543]*y_cur[IDX_CH4I]*y_cur[IDX_HCOII] - - k[5544]*y_cur[IDX_CH4I]*y_cur[IDX_SiII] + k[5807]*y_cur[IDX_CH3CHOI] - + k[5811]*y_cur[IDX_CH3COCH3I] + k[5815]*y_cur[IDX_CH3OCH3I] - - k[5820]*y_cur[IDX_CH4I] + k[5858]*y_cur[IDX_HCOOCH3I] + - k[6112]*y_cur[IDX_CH3CHOI] + k[6119]*y_cur[IDX_CH3OCH3I] - - k[6127]*y_cur[IDX_CH4I] - k[6128]*y_cur[IDX_CH4I] - - k[6129]*y_cur[IDX_CH4I] - k[6130]*y_cur[IDX_CH4I] + - k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + - k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + - k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - - k[6898]*y_cur[IDX_CH4I] + k[7080]*y_cur[IDX_GCH4I] + - k[7262]*y_cur[IDX_GCH4I] + k[7444]*y_cur[IDX_GCH4I] + - k[8579]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I]; - ydot[yistart + IDX_CH4II] = 0.0 - - k[277]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - - k[278]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] - - k[279]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] - - k[280]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] - - k[281]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] - - k[282]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] - - k[283]*y_cur[IDX_CH4II]*y_cur[IDX_O2I] - - k[284]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] + - k[285]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + - k[286]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] + - k[371]*y_cur[IDX_HII]*y_cur[IDX_CH4I] + - k[442]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + - k[514]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[546]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[652]*y_cur[IDX_OII]*y_cur[IDX_CH4I] - - k[968]*y_cur[IDX_CH4II]*y_cur[IDX_eM] - - k[969]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + - k[2082]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - - k[2133]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - - k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - - k[2135]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] - - k[2136]*y_cur[IDX_CH4II]*y_cur[IDX_C2H5CNI] - - k[2137]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] - - k[2138]*y_cur[IDX_CH4II]*y_cur[IDX_CH4I] - - k[2139]*y_cur[IDX_CH4II]*y_cur[IDX_CO2I] - - k[2140]*y_cur[IDX_CH4II]*y_cur[IDX_COI] - - k[2141]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] - - k[2142]*y_cur[IDX_CH4II]*y_cur[IDX_H2OI] - - k[2143]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] - - k[2144]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] - - k[2145]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - - k[2432]*y_cur[IDX_H2I]*y_cur[IDX_CH4II] + - k[2641]*y_cur[IDX_H3II]*y_cur[IDX_CH3I] - - k[2839]*y_cur[IDX_HI]*y_cur[IDX_CH4II] + - k[2840]*y_cur[IDX_HI]*y_cur[IDX_CH5II] - - k[3727]*y_cur[IDX_OI]*y_cur[IDX_CH4II] - k[6125]*y_cur[IDX_CH4II] - - k[6126]*y_cur[IDX_CH4II] + k[6129]*y_cur[IDX_CH4I] - - k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] - - k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CH5II] = 0.0 - - k[972]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - - k[973]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - - k[974]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - - k[975]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - - k[976]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - - k[1898]*y_cur[IDX_CI]*y_cur[IDX_CH5II] - - k[2000]*y_cur[IDX_CH2I]*y_cur[IDX_CH5II] + - k[2138]*y_cur[IDX_CH4II]*y_cur[IDX_CH4I] + - k[2201]*y_cur[IDX_CH4I]*y_cur[IDX_HCO2II] + - k[2202]*y_cur[IDX_CH4I]*y_cur[IDX_HNOII] + - k[2206]*y_cur[IDX_CH4I]*y_cur[IDX_N2HII] + - k[2209]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - - k[2217]*y_cur[IDX_CH5II]*y_cur[IDX_C2I] - - k[2218]*y_cur[IDX_CH5II]*y_cur[IDX_C2H2I] - - k[2219]*y_cur[IDX_CH5II]*y_cur[IDX_C2H4I] - - k[2220]*y_cur[IDX_CH5II]*y_cur[IDX_C2HI] - - k[2221]*y_cur[IDX_CH5II]*y_cur[IDX_C6H6I] - - k[2222]*y_cur[IDX_CH5II]*y_cur[IDX_C2H6I] - - k[2223]*y_cur[IDX_CH5II]*y_cur[IDX_CO2I] - - k[2224]*y_cur[IDX_CH5II]*y_cur[IDX_COI] - - k[2225]*y_cur[IDX_CH5II]*y_cur[IDX_H2COI] - - k[2226]*y_cur[IDX_CH5II]*y_cur[IDX_H2OI] - - k[2227]*y_cur[IDX_CH5II]*y_cur[IDX_H2SI] - - k[2228]*y_cur[IDX_CH5II]*y_cur[IDX_HC3NI] - - k[2229]*y_cur[IDX_CH5II]*y_cur[IDX_HCNI] - - k[2230]*y_cur[IDX_CH5II]*y_cur[IDX_HCOI] - - k[2231]*y_cur[IDX_CH5II]*y_cur[IDX_HClI] - - k[2232]*y_cur[IDX_CH5II]*y_cur[IDX_HNCI] - - k[2233]*y_cur[IDX_CH5II]*y_cur[IDX_MgI] - - k[2234]*y_cur[IDX_CH5II]*y_cur[IDX_N2OI] - - k[2235]*y_cur[IDX_CH5II]*y_cur[IDX_SI] - - k[2236]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] - - k[2237]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] - - k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] - - k[2244]*y_cur[IDX_CHI]*y_cur[IDX_CH5II] + - k[2379]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + - k[2432]*y_cur[IDX_H2I]*y_cur[IDX_CH4II] + - k[2656]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2669]*y_cur[IDX_H3II]*y_cur[IDX_CH4I] - - k[2840]*y_cur[IDX_HI]*y_cur[IDX_CH5II] - - k[3533]*y_cur[IDX_NH2I]*y_cur[IDX_CH5II] - - k[3571]*y_cur[IDX_NH3I]*y_cur[IDX_CH5II] - - k[3609]*y_cur[IDX_NHI]*y_cur[IDX_CH5II] - - k[3728]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - - k[3729]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - - k[3797]*y_cur[IDX_OHI]*y_cur[IDX_CH5II] - - k[5545]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + - k[5555]*y_cur[IDX_H2I]*y_cur[IDX_CH3II] - - k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - - k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - - k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - - k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - - k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CNI] = 0.0 + k[5]*y_cur[IDX_CM]*y_cur[IDX_NI] - - k[72]*y_cur[IDX_HM]*y_cur[IDX_CNI] + - k[115]*y_cur[IDX_NI]*y_cur[IDX_C4HM] + - k[183]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] + - k[184]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] + - k[208]*y_cur[IDX_C2I]*y_cur[IDX_CNII] + - k[241]*y_cur[IDX_C2HI]*y_cur[IDX_CNII] + - k[245]*y_cur[IDX_CI]*y_cur[IDX_CNII] + - k[260]*y_cur[IDX_CH2I]*y_cur[IDX_CNII] + - k[288]*y_cur[IDX_CHI]*y_cur[IDX_CNII] + - k[298]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + - k[299]*y_cur[IDX_CNII]*y_cur[IDX_COI] + - k[300]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] + - k[301]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] + - k[302]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + - k[303]*y_cur[IDX_CNII]*y_cur[IDX_NOI] + - k[304]*y_cur[IDX_CNII]*y_cur[IDX_O2I] + - k[305]*y_cur[IDX_CNII]*y_cur[IDX_SI] - - k[306]*y_cur[IDX_CNI]*y_cur[IDX_N2II] - - k[444]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + - k[487]*y_cur[IDX_HI]*y_cur[IDX_CNII] - - k[547]*y_cur[IDX_NII]*y_cur[IDX_CNI] + - k[586]*y_cur[IDX_NH2I]*y_cur[IDX_CNII] + - k[616]*y_cur[IDX_NHI]*y_cur[IDX_CNII] - - k[666]*y_cur[IDX_OM]*y_cur[IDX_CNI] + - k[681]*y_cur[IDX_OI]*y_cur[IDX_CNII] - - k[696]*y_cur[IDX_OHM]*y_cur[IDX_CNI] + - k[698]*y_cur[IDX_OHI]*y_cur[IDX_CNII] + - k[781]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + - k[783]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] + - k[783]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] + - k[814]*y_cur[IDX_C3NII]*y_cur[IDX_eM] + - k[916]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + - k[970]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + - k[979]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + - k[1006]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] + - k[1015]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + - k[1064]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + - k[1066]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + - k[1084]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] + - k[1086]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] + - k[1088]*y_cur[IDX_HCNII]*y_cur[IDX_eM] + - k[1089]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + - k[1127]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] + - k[1131]*y_cur[IDX_HONCII]*y_cur[IDX_eM] + - k[1156]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] + - k[1261]*y_cur[IDX_SiNCII]*y_cur[IDX_eM] + - k[1349]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + - k[1355]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] + - k[1359]*y_cur[IDX_CII]*y_cur[IDX_CH3C5NI] + - k[1362]*y_cur[IDX_CII]*y_cur[IDX_CH3C7NI] + - k[1379]*y_cur[IDX_CII]*y_cur[IDX_CH3CNI] + - k[1386]*y_cur[IDX_CII]*y_cur[IDX_CNOI] + - k[1400]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + - k[1404]*y_cur[IDX_CII]*y_cur[IDX_HC5NI] + - k[1405]*y_cur[IDX_CII]*y_cur[IDX_HC7NI] + - k[1406]*y_cur[IDX_CII]*y_cur[IDX_HC9NI] + - k[1416]*y_cur[IDX_CII]*y_cur[IDX_N2OI] + - k[1424]*y_cur[IDX_CII]*y_cur[IDX_OCNI] + - k[1458]*y_cur[IDX_C2I]*y_cur[IDX_HCNII] - - k[1467]*y_cur[IDX_C2HII]*y_cur[IDX_CNI] + - k[1471]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + - k[1474]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + - k[1514]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] + - k[1745]*y_cur[IDX_C2HI]*y_cur[IDX_HCNII] + - k[1752]*y_cur[IDX_C3II]*y_cur[IDX_HC3NI] + - k[1903]*y_cur[IDX_CI]*y_cur[IDX_HCNII] - - k[1944]*y_cur[IDX_CHII]*y_cur[IDX_CNI] - - k[1945]*y_cur[IDX_CHII]*y_cur[IDX_CNI] + - k[2005]*y_cur[IDX_CH2I]*y_cur[IDX_HCNII] - - k[2075]*y_cur[IDX_CH3II]*y_cur[IDX_CNI] + - k[2197]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + - k[2250]*y_cur[IDX_CHI]*y_cur[IDX_HCNII] - - k[2277]*y_cur[IDX_CNI]*y_cur[IDX_C2H2II] - - k[2278]*y_cur[IDX_CNI]*y_cur[IDX_HNOII] - - k[2279]*y_cur[IDX_CNI]*y_cur[IDX_O2HII] + - k[2351]*y_cur[IDX_HII]*y_cur[IDX_HOCNI] + - k[2352]*y_cur[IDX_HII]*y_cur[IDX_HONCI] - - k[2381]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + - k[2546]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] - - k[2671]*y_cur[IDX_H3II]*y_cur[IDX_CNI] + - k[2830]*y_cur[IDX_HI]*y_cur[IDX_C2N2II] + - k[2853]*y_cur[IDX_HCNII]*y_cur[IDX_CO2I] + - k[2854]*y_cur[IDX_HCNII]*y_cur[IDX_COI] + - k[2855]*y_cur[IDX_HCNII]*y_cur[IDX_H2COI] + - k[2856]*y_cur[IDX_HCNII]*y_cur[IDX_HCNI] + - k[2857]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] + - k[2859]*y_cur[IDX_HCNII]*y_cur[IDX_HNCI] + - k[2860]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + - k[2866]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] + - k[2867]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + - k[2869]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + - k[2871]*y_cur[IDX_HCNI]*y_cur[IDX_C5II] + - k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] + - k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + - k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] + - k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] + - k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] + - k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] + - k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - - k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] - - k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + - k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + - k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3242]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + - k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] + - k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] + - k[3279]*y_cur[IDX_HeII]*y_cur[IDX_NCCNI] + - k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] + - k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + - k[3380]*y_cur[IDX_NI]*y_cur[IDX_C10M] + - k[3383]*y_cur[IDX_NI]*y_cur[IDX_C2II] + - k[3386]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + - k[3393]*y_cur[IDX_NI]*y_cur[IDX_C3M] + - k[3396]*y_cur[IDX_NI]*y_cur[IDX_C3HM] + - k[3397]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] + - k[3403]*y_cur[IDX_NI]*y_cur[IDX_C4M] + - k[3411]*y_cur[IDX_NI]*y_cur[IDX_C5M] + - k[3414]*y_cur[IDX_NI]*y_cur[IDX_C5HM] + - k[3420]*y_cur[IDX_NI]*y_cur[IDX_C6M] + - k[3428]*y_cur[IDX_NI]*y_cur[IDX_C7M] + - k[3439]*y_cur[IDX_NI]*y_cur[IDX_C8M] + - k[3445]*y_cur[IDX_NI]*y_cur[IDX_C9M] + - k[3469]*y_cur[IDX_NI]*y_cur[IDX_SiCII] - - k[3481]*y_cur[IDX_NHII]*y_cur[IDX_CNI] - - k[3509]*y_cur[IDX_NH2II]*y_cur[IDX_CNI] + - k[3539]*y_cur[IDX_NH2I]*y_cur[IDX_HCNII] + - k[3613]*y_cur[IDX_NHI]*y_cur[IDX_HCNII] - - k[3639]*y_cur[IDX_OII]*y_cur[IDX_CNI] - - k[3775]*y_cur[IDX_OHII]*y_cur[IDX_CNI] + - k[3800]*y_cur[IDX_OHI]*y_cur[IDX_HCNII] + - k[3870]*y_cur[IDX_SiII]*y_cur[IDX_NCCNI] + - k[4656]*y_cur[IDX_CNM]*y_cur[IDX_CII] + - k[4657]*y_cur[IDX_CNM]*y_cur[IDX_C2H2II] + - k[4658]*y_cur[IDX_CNM]*y_cur[IDX_C2H3II] + - k[4659]*y_cur[IDX_CNM]*y_cur[IDX_C4H2II] + - k[4660]*y_cur[IDX_CNM]*y_cur[IDX_C4H3II] + - k[4661]*y_cur[IDX_CNM]*y_cur[IDX_C4SII] + - k[4662]*y_cur[IDX_CNM]*y_cur[IDX_CH2CCHII] + - k[4663]*y_cur[IDX_CNM]*y_cur[IDX_CH3II] + - k[4664]*y_cur[IDX_CNM]*y_cur[IDX_CNCII] + - k[4665]*y_cur[IDX_CNM]*y_cur[IDX_FeII] + - k[4666]*y_cur[IDX_CNM]*y_cur[IDX_HII] + - k[4667]*y_cur[IDX_CNM]*y_cur[IDX_H2COII] + - k[4668]*y_cur[IDX_CNM]*y_cur[IDX_H2SII] + - k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] + - k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] + - k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] + - k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + - k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + - k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + - k[4675]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + - k[4676]*y_cur[IDX_CNM]*y_cur[IDX_HeII] + - k[4677]*y_cur[IDX_CNM]*y_cur[IDX_MgII] + - k[4678]*y_cur[IDX_CNM]*y_cur[IDX_NII] + - k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] + - k[4680]*y_cur[IDX_CNM]*y_cur[IDX_NH3II] + - k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] + - k[4682]*y_cur[IDX_CNM]*y_cur[IDX_NOII] + - k[4683]*y_cur[IDX_CNM]*y_cur[IDX_NaII] + - k[4684]*y_cur[IDX_CNM]*y_cur[IDX_OII] + - k[4685]*y_cur[IDX_CNM]*y_cur[IDX_SII] + - k[4686]*y_cur[IDX_CNM]*y_cur[IDX_SOII] + - k[4687]*y_cur[IDX_CNM]*y_cur[IDX_SiII] + - k[4688]*y_cur[IDX_CNM]*y_cur[IDX_SiOII] + - k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] + - k[4690]*y_cur[IDX_CNM]*y_cur[IDX_SiSII] + - k[4903]*y_cur[IDX_C2HI]*y_cur[IDX_NCCNI] + - k[4908]*y_cur[IDX_C4HI]*y_cur[IDX_NCCNI] + - k[4917]*y_cur[IDX_CI]*y_cur[IDX_C2NI] + - k[4921]*y_cur[IDX_CI]*y_cur[IDX_C3NI] + - k[4929]*y_cur[IDX_CI]*y_cur[IDX_C5NI] + - k[4937]*y_cur[IDX_CI]*y_cur[IDX_C7NI] + - k[4943]*y_cur[IDX_CI]*y_cur[IDX_C9NI] - - k[4956]*y_cur[IDX_CI]*y_cur[IDX_CNI] + - k[4967]*y_cur[IDX_CI]*y_cur[IDX_N2I] + - k[4968]*y_cur[IDX_CI]*y_cur[IDX_NCCNI] + - k[4972]*y_cur[IDX_CI]*y_cur[IDX_NHI] + - k[4974]*y_cur[IDX_CI]*y_cur[IDX_NOI] + - k[4977]*y_cur[IDX_CI]*y_cur[IDX_NSI] + - k[4979]*y_cur[IDX_CI]*y_cur[IDX_OCNI] - - k[4997]*y_cur[IDX_CH2I]*y_cur[IDX_CNI] - - k[5029]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] - - k[5059]*y_cur[IDX_CH4I]*y_cur[IDX_CNI] + - k[5080]*y_cur[IDX_CHI]*y_cur[IDX_NI] - - k[5104]*y_cur[IDX_CNI]*y_cur[IDX_C2H2I] - - k[5105]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - - k[5106]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - - k[5107]*y_cur[IDX_CNI]*y_cur[IDX_C6H2I] - - k[5108]*y_cur[IDX_CNI]*y_cur[IDX_C8H2I] - - k[5109]*y_cur[IDX_CNI]*y_cur[IDX_CH2CCH2I] - - k[5110]*y_cur[IDX_CNI]*y_cur[IDX_CH3CCHI] - - k[5111]*y_cur[IDX_CNI]*y_cur[IDX_C2H6I] - - k[5112]*y_cur[IDX_CNI]*y_cur[IDX_CH3CHCH2I] - - k[5113]*y_cur[IDX_CNI]*y_cur[IDX_CNI] - - k[5113]*y_cur[IDX_CNI]*y_cur[IDX_CNI] - - k[5114]*y_cur[IDX_CNI]*y_cur[IDX_H2COI] - - k[5115]*y_cur[IDX_CNI]*y_cur[IDX_C4H2I] - - k[5116]*y_cur[IDX_CNI]*y_cur[IDX_HCNI] - - k[5117]*y_cur[IDX_CNI]*y_cur[IDX_HCOI] - - k[5118]*y_cur[IDX_CNI]*y_cur[IDX_HNCI] - - k[5119]*y_cur[IDX_CNI]*y_cur[IDX_HNOI] - - k[5120]*y_cur[IDX_CNI]*y_cur[IDX_NO2I] - - k[5121]*y_cur[IDX_CNI]*y_cur[IDX_NOI] - - k[5122]*y_cur[IDX_CNI]*y_cur[IDX_NOI] - - k[5123]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - - k[5124]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - - k[5125]*y_cur[IDX_CNI]*y_cur[IDX_SI] - - k[5126]*y_cur[IDX_CNI]*y_cur[IDX_SiH4I] - - k[5138]*y_cur[IDX_H2I]*y_cur[IDX_CNI] + - k[5161]*y_cur[IDX_HI]*y_cur[IDX_CNOI] + - k[5170]*y_cur[IDX_HI]*y_cur[IDX_HCNI] + - k[5181]*y_cur[IDX_HI]*y_cur[IDX_NCCNI] + - k[5196]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + - k[5221]*y_cur[IDX_NI]*y_cur[IDX_C10I] + - k[5222]*y_cur[IDX_NI]*y_cur[IDX_C2I] + - k[5229]*y_cur[IDX_NI]*y_cur[IDX_C2NI] + - k[5229]*y_cur[IDX_NI]*y_cur[IDX_C2NI] + - k[5230]*y_cur[IDX_NI]*y_cur[IDX_C2OI] + - k[5231]*y_cur[IDX_NI]*y_cur[IDX_C3I] + - k[5234]*y_cur[IDX_NI]*y_cur[IDX_C3NI] + - k[5235]*y_cur[IDX_NI]*y_cur[IDX_C4I] + - k[5237]*y_cur[IDX_NI]*y_cur[IDX_C4NI] + - k[5238]*y_cur[IDX_NI]*y_cur[IDX_C5I] + - k[5241]*y_cur[IDX_NI]*y_cur[IDX_C5NI] + - k[5242]*y_cur[IDX_NI]*y_cur[IDX_C6I] + - k[5243]*y_cur[IDX_NI]*y_cur[IDX_C6HI] + - k[5244]*y_cur[IDX_NI]*y_cur[IDX_C7I] + - k[5248]*y_cur[IDX_NI]*y_cur[IDX_C8I] + - k[5249]*y_cur[IDX_NI]*y_cur[IDX_C8HI] + - k[5250]*y_cur[IDX_NI]*y_cur[IDX_C9I] - - k[5260]*y_cur[IDX_NI]*y_cur[IDX_CNI] - - k[5261]*y_cur[IDX_NI]*y_cur[IDX_CNI] + - k[5263]*y_cur[IDX_NI]*y_cur[IDX_CSI] + - k[5292]*y_cur[IDX_NI]*y_cur[IDX_SiCI] - - k[5302]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - - k[5303]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - - k[5305]*y_cur[IDX_NHI]*y_cur[IDX_CNI] + - k[5353]*y_cur[IDX_OI]*y_cur[IDX_C2NI] - - k[5386]*y_cur[IDX_OI]*y_cur[IDX_CNI] - - k[5387]*y_cur[IDX_OI]*y_cur[IDX_CNI] - - k[5388]*y_cur[IDX_OI]*y_cur[IDX_CNI] + - k[5402]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + - k[5429]*y_cur[IDX_OI]*y_cur[IDX_OCNI] - - k[5459]*y_cur[IDX_OHI]*y_cur[IDX_CNI] - - k[5460]*y_cur[IDX_OHI]*y_cur[IDX_CNI] + - k[5469]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] - - k[5514]*y_cur[IDX_C2HI]*y_cur[IDX_CNI] + - k[5524]*y_cur[IDX_CI]*y_cur[IDX_NI] - - k[5542]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] + k[5705]*y_cur[IDX_C2H5CNI] - + k[5711]*y_cur[IDX_C2NI] + k[5722]*y_cur[IDX_C3NI] + - k[5733]*y_cur[IDX_C4NI] + k[5746]*y_cur[IDX_C5NI] + - k[5760]*y_cur[IDX_C7NI] + k[5771]*y_cur[IDX_C9NI] + - k[5787]*y_cur[IDX_CH2CHCNI] + k[5788]*y_cur[IDX_CH2CNI] + - k[5810]*y_cur[IDX_CH3CNI] + k[5822]*y_cur[IDX_CNM] - - k[5823]*y_cur[IDX_CNI] + k[5824]*y_cur[IDX_CNOI] + - k[5846]*y_cur[IDX_HC3NI] + k[5850]*y_cur[IDX_HC5NI] + - k[5852]*y_cur[IDX_HC7NI] + k[5853]*y_cur[IDX_HC9NI] + - k[5854]*y_cur[IDX_HCNI] + k[5866]*y_cur[IDX_HNC3I] + - k[5867]*y_cur[IDX_HNCI] + k[5871]*y_cur[IDX_HOCNI] + - k[5872]*y_cur[IDX_HONCI] + k[5881]*y_cur[IDX_NCCNI] + - k[5881]*y_cur[IDX_NCCNI] + k[5884]*y_cur[IDX_NH2CNI] + - k[5901]*y_cur[IDX_OCNI] + k[5932]*y_cur[IDX_SiNCI] + - k[5941]*y_cur[IDX_C2H4CNI] + k[5990]*y_cur[IDX_C2H5CNI] + - k[5996]*y_cur[IDX_C2NI] + k[6006]*y_cur[IDX_C3NI] + - k[6018]*y_cur[IDX_C4NI] + k[6031]*y_cur[IDX_C5NI] + - k[6049]*y_cur[IDX_C7NI] + k[6067]*y_cur[IDX_C9NI] + - k[6088]*y_cur[IDX_CH2CHCNI] + k[6090]*y_cur[IDX_CH2CNI] + - k[6115]*y_cur[IDX_CH3CNI] + k[6133]*y_cur[IDX_CNM] - - k[6134]*y_cur[IDX_CNI] + k[6135]*y_cur[IDX_CNOI] + - k[6171]*y_cur[IDX_HC3NI] + k[6175]*y_cur[IDX_HC5NI] + - k[6177]*y_cur[IDX_HC7NI] + k[6179]*y_cur[IDX_HC9NI] + - k[6181]*y_cur[IDX_HCNI] + k[6198]*y_cur[IDX_HNCI] + - k[6202]*y_cur[IDX_HOCNI] + k[6203]*y_cur[IDX_HONCI] + - k[6216]*y_cur[IDX_NCCNI] + k[6216]*y_cur[IDX_NCCNI] + - k[6220]*y_cur[IDX_NH2CNI] + k[6239]*y_cur[IDX_OCNI] + - k[6283]*y_cur[IDX_SiNCI] + - k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM] + - k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + - k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + - k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + - k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + - k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + - k[6521]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] + - k[6525]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] + - k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + - k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM] + - k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + - k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + - k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + - k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + - k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM] + - k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + - k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - k[6909]*y_cur[IDX_CNI] - + k[7091]*y_cur[IDX_GCNI] + k[7273]*y_cur[IDX_GCNI] + - k[7455]*y_cur[IDX_GCNI] + k[8657]*y_cur[IDX_GCI]*y_cur[IDX_GNI]; - ydot[yistart + IDX_CNII] = 0.0 - - k[208]*y_cur[IDX_C2I]*y_cur[IDX_CNII] - - k[241]*y_cur[IDX_C2HI]*y_cur[IDX_CNII] - - k[245]*y_cur[IDX_CI]*y_cur[IDX_CNII] - - k[260]*y_cur[IDX_CH2I]*y_cur[IDX_CNII] - - k[288]*y_cur[IDX_CHI]*y_cur[IDX_CNII] - - k[298]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - - k[299]*y_cur[IDX_CNII]*y_cur[IDX_COI] - - k[300]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - - k[301]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] - - k[302]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] - - k[303]*y_cur[IDX_CNII]*y_cur[IDX_NOI] - - k[304]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - - k[305]*y_cur[IDX_CNII]*y_cur[IDX_SI] + - k[306]*y_cur[IDX_CNI]*y_cur[IDX_N2II] + - k[444]*y_cur[IDX_H2II]*y_cur[IDX_CNI] - - k[487]*y_cur[IDX_HI]*y_cur[IDX_CNII] + - k[547]*y_cur[IDX_NII]*y_cur[IDX_CNI] - - k[586]*y_cur[IDX_NH2I]*y_cur[IDX_CNII] - - k[616]*y_cur[IDX_NHI]*y_cur[IDX_CNII] - - k[681]*y_cur[IDX_OI]*y_cur[IDX_CNII] - - k[698]*y_cur[IDX_OHI]*y_cur[IDX_CNII] - - k[977]*y_cur[IDX_CNII]*y_cur[IDX_eM] + - k[1420]*y_cur[IDX_CII]*y_cur[IDX_NHI] + - k[1961]*y_cur[IDX_CHII]*y_cur[IDX_NI] + - k[1965]*y_cur[IDX_CHII]*y_cur[IDX_NHI] + - k[2256]*y_cur[IDX_CHI]*y_cur[IDX_NII] - - k[2269]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - - k[2270]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - - k[2271]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - - k[2272]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] - - k[2273]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] - - k[2274]*y_cur[IDX_CNII]*y_cur[IDX_NOI] - - k[2275]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - - k[2276]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - - k[2433]*y_cur[IDX_H2I]*y_cur[IDX_CNII] - - k[2535]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2536]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2537]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2538]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] + - k[3192]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] + - k[3205]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + - k[3245]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3261]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3279]*y_cur[IDX_HeII]*y_cur[IDX_NCCNI] + - k[3291]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + - k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] - - k[3456]*y_cur[IDX_NI]*y_cur[IDX_CNII] + - k[5504]*y_cur[IDX_CII]*y_cur[IDX_NI] - - k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CNM] = 0.0 - k[60]*y_cur[IDX_CH3I]*y_cur[IDX_CNM] - - k[106]*y_cur[IDX_HI]*y_cur[IDX_CNM] + - k[666]*y_cur[IDX_OM]*y_cur[IDX_CNI] + - k[696]*y_cur[IDX_OHM]*y_cur[IDX_CNI] + - k[1449]*y_cur[IDX_CM]*y_cur[IDX_NOI] + - k[2368]*y_cur[IDX_HM]*y_cur[IDX_HCNI] + - k[3379]*y_cur[IDX_NI]*y_cur[IDX_C10M] + - k[3382]*y_cur[IDX_NI]*y_cur[IDX_C10HM] + - k[3384]*y_cur[IDX_NI]*y_cur[IDX_C2M] + - k[3392]*y_cur[IDX_NI]*y_cur[IDX_C3M] + - k[3395]*y_cur[IDX_NI]*y_cur[IDX_C3HM] + - k[3402]*y_cur[IDX_NI]*y_cur[IDX_C4M] + - k[3404]*y_cur[IDX_NI]*y_cur[IDX_C4HM] + - k[3410]*y_cur[IDX_NI]*y_cur[IDX_C5M] + - k[3413]*y_cur[IDX_NI]*y_cur[IDX_C5HM] + - k[3419]*y_cur[IDX_NI]*y_cur[IDX_C6M] + - k[3422]*y_cur[IDX_NI]*y_cur[IDX_C6HM] + - k[3427]*y_cur[IDX_NI]*y_cur[IDX_C7M] + - k[3431]*y_cur[IDX_NI]*y_cur[IDX_C7HM] + - k[3438]*y_cur[IDX_NI]*y_cur[IDX_C8M] + - k[3441]*y_cur[IDX_NI]*y_cur[IDX_C8HM] + - k[3444]*y_cur[IDX_NI]*y_cur[IDX_C9M] + - k[3448]*y_cur[IDX_NI]*y_cur[IDX_C9HM] + - k[3653]*y_cur[IDX_OM]*y_cur[IDX_HCNI] + - k[3795]*y_cur[IDX_OHM]*y_cur[IDX_HCNI] - - k[4656]*y_cur[IDX_CNM]*y_cur[IDX_CII] - - k[4657]*y_cur[IDX_CNM]*y_cur[IDX_C2H2II] - - k[4658]*y_cur[IDX_CNM]*y_cur[IDX_C2H3II] - - k[4659]*y_cur[IDX_CNM]*y_cur[IDX_C4H2II] - - k[4660]*y_cur[IDX_CNM]*y_cur[IDX_C4H3II] - - k[4661]*y_cur[IDX_CNM]*y_cur[IDX_C4SII] - - k[4662]*y_cur[IDX_CNM]*y_cur[IDX_CH2CCHII] - - k[4663]*y_cur[IDX_CNM]*y_cur[IDX_CH3II] - - k[4664]*y_cur[IDX_CNM]*y_cur[IDX_CNCII] - - k[4665]*y_cur[IDX_CNM]*y_cur[IDX_FeII] - - k[4666]*y_cur[IDX_CNM]*y_cur[IDX_HII] - - k[4667]*y_cur[IDX_CNM]*y_cur[IDX_H2COII] - - k[4668]*y_cur[IDX_CNM]*y_cur[IDX_H2SII] - - k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] - - k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] - - k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] - - k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] - - k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] - - k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] - - k[4675]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] - - k[4676]*y_cur[IDX_CNM]*y_cur[IDX_HeII] - - k[4677]*y_cur[IDX_CNM]*y_cur[IDX_MgII] - - k[4678]*y_cur[IDX_CNM]*y_cur[IDX_NII] - - k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] - - k[4680]*y_cur[IDX_CNM]*y_cur[IDX_NH3II] - - k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] - - k[4682]*y_cur[IDX_CNM]*y_cur[IDX_NOII] - - k[4683]*y_cur[IDX_CNM]*y_cur[IDX_NaII] - - k[4684]*y_cur[IDX_CNM]*y_cur[IDX_OII] - - k[4685]*y_cur[IDX_CNM]*y_cur[IDX_SII] - - k[4686]*y_cur[IDX_CNM]*y_cur[IDX_SOII] - - k[4687]*y_cur[IDX_CNM]*y_cur[IDX_SiII] - - k[4688]*y_cur[IDX_CNM]*y_cur[IDX_SiOII] - - k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] - - k[4690]*y_cur[IDX_CNM]*y_cur[IDX_SiSII] - k[5822]*y_cur[IDX_CNM] - - k[6133]*y_cur[IDX_CNM]; - ydot[yistart + IDX_CNCII] = 0.0 + - k[184]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] - - k[978]*y_cur[IDX_CNCII]*y_cur[IDX_eM] - - k[979]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + - k[1407]*y_cur[IDX_CII]*y_cur[IDX_HCNI] + - k[1945]*y_cur[IDX_CHII]*y_cur[IDX_CNI] - - k[2539]*y_cur[IDX_H2OI]*y_cur[IDX_CNCII] - - k[3572]*y_cur[IDX_NH3I]*y_cur[IDX_CNCII] - - k[3894]*y_cur[IDX_CM]*y_cur[IDX_CNCII] - - k[3929]*y_cur[IDX_C10M]*y_cur[IDX_CNCII] - - k[3964]*y_cur[IDX_C10HM]*y_cur[IDX_CNCII] - - k[3999]*y_cur[IDX_C2M]*y_cur[IDX_CNCII] - - k[4034]*y_cur[IDX_C2HM]*y_cur[IDX_CNCII] - - k[4069]*y_cur[IDX_C3M]*y_cur[IDX_CNCII] - - k[4104]*y_cur[IDX_C3HM]*y_cur[IDX_CNCII] - - k[4139]*y_cur[IDX_C3NM]*y_cur[IDX_CNCII] - - k[4174]*y_cur[IDX_C4M]*y_cur[IDX_CNCII] - - k[4209]*y_cur[IDX_C4HM]*y_cur[IDX_CNCII] - - k[4244]*y_cur[IDX_C5M]*y_cur[IDX_CNCII] - - k[4279]*y_cur[IDX_C5HM]*y_cur[IDX_CNCII] - - k[4314]*y_cur[IDX_C5NM]*y_cur[IDX_CNCII] - - k[4349]*y_cur[IDX_C6M]*y_cur[IDX_CNCII] - - k[4384]*y_cur[IDX_C6HM]*y_cur[IDX_CNCII] - - k[4419]*y_cur[IDX_C7M]*y_cur[IDX_CNCII] - - k[4454]*y_cur[IDX_C7HM]*y_cur[IDX_CNCII] - - k[4489]*y_cur[IDX_C8M]*y_cur[IDX_CNCII] - - k[4524]*y_cur[IDX_C8HM]*y_cur[IDX_CNCII] - - k[4559]*y_cur[IDX_C9M]*y_cur[IDX_CNCII] - - k[4594]*y_cur[IDX_C9HM]*y_cur[IDX_CNCII] - - k[4629]*y_cur[IDX_CHM]*y_cur[IDX_CNCII] - - k[4664]*y_cur[IDX_CNM]*y_cur[IDX_CNCII] - - k[4699]*y_cur[IDX_HM]*y_cur[IDX_CNCII] - - k[4735]*y_cur[IDX_OM]*y_cur[IDX_CNCII] - - k[4770]*y_cur[IDX_O2M]*y_cur[IDX_CNCII] - - k[4805]*y_cur[IDX_OHM]*y_cur[IDX_CNCII] - - k[4840]*y_cur[IDX_SM]*y_cur[IDX_CNCII] - - k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] - - k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CNOI] = 0.0 + - k[1093]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + - k[1130]*y_cur[IDX_HONCII]*y_cur[IDX_eM] - - k[1386]*y_cur[IDX_CII]*y_cur[IDX_CNOI] - - k[2672]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - - k[2673]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - - k[3205]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] - - k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] - - k[5161]*y_cur[IDX_HI]*y_cur[IDX_CNOI] + - k[5218]*y_cur[IDX_HONCI]*y_cur[IDX_OI] - - k[5389]*y_cur[IDX_OI]*y_cur[IDX_CNOI] - k[5824]*y_cur[IDX_CNOI] - - k[6135]*y_cur[IDX_CNOI] + - k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + - k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] - - k[6960]*y_cur[IDX_CNOI] + k[7142]*y_cur[IDX_GCNOI] + - k[7324]*y_cur[IDX_GCNOI] + k[7506]*y_cur[IDX_GCNOI] + - k[8658]*y_cur[IDX_GCI]*y_cur[IDX_GNOI]; - ydot[yistart + IDX_COI] = 0.0 + k[3]*y_cur[IDX_CM]*y_cur[IDX_CO2I] + - k[3]*y_cur[IDX_CM]*y_cur[IDX_CO2I] + - k[8]*y_cur[IDX_CM]*y_cur[IDX_OI] + k[56]*y_cur[IDX_CI]*y_cur[IDX_OM] - - k[65]*y_cur[IDX_COI]*y_cur[IDX_SM] - - k[73]*y_cur[IDX_HM]*y_cur[IDX_COI] - - k[124]*y_cur[IDX_OM]*y_cur[IDX_COI] + - k[130]*y_cur[IDX_OI]*y_cur[IDX_C3NM] + - k[131]*y_cur[IDX_OI]*y_cur[IDX_C5NM] + - k[209]*y_cur[IDX_C2I]*y_cur[IDX_COII] + - k[242]*y_cur[IDX_C2HI]*y_cur[IDX_COII] + - k[246]*y_cur[IDX_CI]*y_cur[IDX_COII] + - k[261]*y_cur[IDX_CH2I]*y_cur[IDX_COII] + - k[285]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + - k[289]*y_cur[IDX_CHI]*y_cur[IDX_COII] - - k[299]*y_cur[IDX_CNII]*y_cur[IDX_COI] + - k[307]*y_cur[IDX_COII]*y_cur[IDX_CO2I] + - k[308]*y_cur[IDX_COII]*y_cur[IDX_H2COI] + - k[309]*y_cur[IDX_COII]*y_cur[IDX_H2SI] + - k[310]*y_cur[IDX_COII]*y_cur[IDX_HCOI] + - k[311]*y_cur[IDX_COII]*y_cur[IDX_NOI] + - k[312]*y_cur[IDX_COII]*y_cur[IDX_O2I] + - k[313]*y_cur[IDX_COII]*y_cur[IDX_SI] - - k[316]*y_cur[IDX_COI]*y_cur[IDX_N2II] - - k[445]*y_cur[IDX_H2II]*y_cur[IDX_COI] + - k[478]*y_cur[IDX_H2OI]*y_cur[IDX_COII] + - k[488]*y_cur[IDX_HI]*y_cur[IDX_COII] + - k[497]*y_cur[IDX_HCNI]*y_cur[IDX_COII] - - k[549]*y_cur[IDX_NII]*y_cur[IDX_COI] + - k[587]*y_cur[IDX_NH2I]*y_cur[IDX_COII] + - k[602]*y_cur[IDX_NH3I]*y_cur[IDX_COII] + - k[617]*y_cur[IDX_NHI]*y_cur[IDX_COII] - - k[653]*y_cur[IDX_OII]*y_cur[IDX_COI] + - k[682]*y_cur[IDX_OI]*y_cur[IDX_COII] + - k[699]*y_cur[IDX_OHI]*y_cur[IDX_COII] + - k[785]*y_cur[IDX_C2OII]*y_cur[IDX_eM] + - k[797]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + - k[815]*y_cur[IDX_C3OII]*y_cur[IDX_eM] + - k[920]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + - k[942]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[949]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + - k[951]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + - k[981]*y_cur[IDX_CO2II]*y_cur[IDX_eM] + - k[982]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + - k[997]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[998]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[1009]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + - k[1036]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1057]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + - k[1058]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + - k[1097]*y_cur[IDX_HCOII]*y_cur[IDX_eM] + - k[1099]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + - k[1100]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + - k[1116]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + - k[1125]*y_cur[IDX_HOCII]*y_cur[IDX_eM] + - k[1176]*y_cur[IDX_OCNII]*y_cur[IDX_eM] + - k[1179]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + - k[1270]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + - k[1271]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + - k[1272]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + - k[1273]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + - k[1274]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + - k[1276]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1284]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1290]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1291]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1313]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + - k[1387]*y_cur[IDX_CII]*y_cur[IDX_CO2I] + - k[1390]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + - k[1408]*y_cur[IDX_CII]*y_cur[IDX_HCOI] + - k[1423]*y_cur[IDX_CII]*y_cur[IDX_O2I] + - k[1425]*y_cur[IDX_CII]*y_cur[IDX_OCSI] + - k[1427]*y_cur[IDX_CII]*y_cur[IDX_SO2I] + - k[1429]*y_cur[IDX_CII]*y_cur[IDX_SOI] + - k[1447]*y_cur[IDX_CII]*y_cur[IDX_SiOI] + - k[1450]*y_cur[IDX_CM]*y_cur[IDX_O2I] + - k[1454]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + - k[1455]*y_cur[IDX_C2II]*y_cur[IDX_O2I] + - k[1459]*y_cur[IDX_C2I]*y_cur[IDX_HCOII] + - k[1462]*y_cur[IDX_C2I]*y_cur[IDX_O2II] + - k[1465]*y_cur[IDX_C2I]*y_cur[IDX_SiOII] + - k[1468]*y_cur[IDX_C2HII]*y_cur[IDX_CO2I] + - k[1477]*y_cur[IDX_C2HII]*y_cur[IDX_HCOI] + - k[1524]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] + - k[1566]*y_cur[IDX_C2H2I]*y_cur[IDX_HCOII] + - k[1644]*y_cur[IDX_C2H3I]*y_cur[IDX_HCOII] + - k[1708]*y_cur[IDX_C2H4I]*y_cur[IDX_HCOII] + - k[1746]*y_cur[IDX_C2HI]*y_cur[IDX_HCOII] + - k[1753]*y_cur[IDX_C3HII]*y_cur[IDX_CO2I] + - k[1758]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + - k[1904]*y_cur[IDX_CI]*y_cur[IDX_HCOII] + - k[1932]*y_cur[IDX_CI]*y_cur[IDX_SiOII] + - k[1946]*y_cur[IDX_CHII]*y_cur[IDX_CO2I] + - k[1948]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + - k[1959]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] + - k[1970]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] + - k[1978]*y_cur[IDX_CH2II]*y_cur[IDX_CO2I] + - k[1987]*y_cur[IDX_CH2II]*y_cur[IDX_HCOI] + - k[1992]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] + - k[2008]*y_cur[IDX_CH2I]*y_cur[IDX_HCOII] + - k[2082]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] + - k[2092]*y_cur[IDX_CH3II]*y_cur[IDX_OCSI] - - k[2140]*y_cur[IDX_CH4II]*y_cur[IDX_COI] - - k[2224]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + - k[2253]*y_cur[IDX_CHI]*y_cur[IDX_HCOII] + - k[2270]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + - k[2273]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + - k[2275]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - - k[2283]*y_cur[IDX_COI]*y_cur[IDX_CH3CNII] - - k[2284]*y_cur[IDX_COI]*y_cur[IDX_H2ClII] - - k[2285]*y_cur[IDX_COI]*y_cur[IDX_HCO2II] - - k[2286]*y_cur[IDX_COI]*y_cur[IDX_HNOII] - - k[2287]*y_cur[IDX_COI]*y_cur[IDX_HNSiII] - - k[2288]*y_cur[IDX_COI]*y_cur[IDX_N2HII] - - k[2289]*y_cur[IDX_COI]*y_cur[IDX_O2HII] - - k[2290]*y_cur[IDX_COI]*y_cur[IDX_SO2II] - - k[2291]*y_cur[IDX_COI]*y_cur[IDX_SiH4II] - - k[2292]*y_cur[IDX_COI]*y_cur[IDX_SiOII] + - k[2345]*y_cur[IDX_HII]*y_cur[IDX_HCOI] + - k[2348]*y_cur[IDX_HII]*y_cur[IDX_HNCOI] + - k[2356]*y_cur[IDX_HII]*y_cur[IDX_OCSI] - - k[2383]*y_cur[IDX_H2II]*y_cur[IDX_COI] + - k[2389]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + - k[2492]*y_cur[IDX_H2COI]*y_cur[IDX_CClII] + - k[2500]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - - k[2507]*y_cur[IDX_H2OII]*y_cur[IDX_COI] + - k[2513]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + - k[2528]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + - k[2533]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] + - k[2547]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] + - k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2675]*y_cur[IDX_H3II]*y_cur[IDX_COI] - - k[2676]*y_cur[IDX_H3II]*y_cur[IDX_COI] + - k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - - k[2854]*y_cur[IDX_HCNII]*y_cur[IDX_COI] + - k[2858]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] + - k[2877]*y_cur[IDX_HCNI]*y_cur[IDX_HCOII] + - k[2899]*y_cur[IDX_HCOII]*y_cur[IDX_C10I] + - k[2900]*y_cur[IDX_HCOII]*y_cur[IDX_C10H2I] + - k[2901]*y_cur[IDX_HCOII]*y_cur[IDX_C10HI] + - k[2902]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5I] + - k[2903]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5OHI] + - k[2904]*y_cur[IDX_HCOII]*y_cur[IDX_C2OI] + - k[2905]*y_cur[IDX_HCOII]*y_cur[IDX_C2SI] + - k[2906]*y_cur[IDX_HCOII]*y_cur[IDX_C3I] + - k[2907]*y_cur[IDX_HCOII]*y_cur[IDX_C3H2I] + - k[2908]*y_cur[IDX_HCOII]*y_cur[IDX_C3HI] + - k[2909]*y_cur[IDX_HCOII]*y_cur[IDX_C3NI] + - k[2910]*y_cur[IDX_HCOII]*y_cur[IDX_C3OI] + - k[2911]*y_cur[IDX_HCOII]*y_cur[IDX_C3PI] + - k[2912]*y_cur[IDX_HCOII]*y_cur[IDX_C3SI] + - k[2913]*y_cur[IDX_HCOII]*y_cur[IDX_C4I] + - k[2914]*y_cur[IDX_HCOII]*y_cur[IDX_C4H3I] + - k[2915]*y_cur[IDX_HCOII]*y_cur[IDX_C4HI] + - k[2916]*y_cur[IDX_HCOII]*y_cur[IDX_C4PI] + - k[2917]*y_cur[IDX_HCOII]*y_cur[IDX_C4SI] + - k[2918]*y_cur[IDX_HCOII]*y_cur[IDX_C5I] + - k[2919]*y_cur[IDX_HCOII]*y_cur[IDX_C5H2I] + - k[2920]*y_cur[IDX_HCOII]*y_cur[IDX_C5HI] + - k[2921]*y_cur[IDX_HCOII]*y_cur[IDX_C5NI] + - k[2922]*y_cur[IDX_HCOII]*y_cur[IDX_C6I] + - k[2923]*y_cur[IDX_HCOII]*y_cur[IDX_C6H2I] + - k[2924]*y_cur[IDX_HCOII]*y_cur[IDX_C6H6I] + - k[2925]*y_cur[IDX_HCOII]*y_cur[IDX_C6HI] + - k[2926]*y_cur[IDX_HCOII]*y_cur[IDX_C7I] + - k[2927]*y_cur[IDX_HCOII]*y_cur[IDX_C7H2I] + - k[2928]*y_cur[IDX_HCOII]*y_cur[IDX_C7HI] + - k[2929]*y_cur[IDX_HCOII]*y_cur[IDX_C7NI] + - k[2930]*y_cur[IDX_HCOII]*y_cur[IDX_C8I] + - k[2931]*y_cur[IDX_HCOII]*y_cur[IDX_C8H2I] + - k[2932]*y_cur[IDX_HCOII]*y_cur[IDX_C8HI] + - k[2933]*y_cur[IDX_HCOII]*y_cur[IDX_C9I] + - k[2934]*y_cur[IDX_HCOII]*y_cur[IDX_C9H2I] + - k[2935]*y_cur[IDX_HCOII]*y_cur[IDX_C9HI] + - k[2936]*y_cur[IDX_HCOII]*y_cur[IDX_C9NI] + - k[2937]*y_cur[IDX_HCOII]*y_cur[IDX_CCPI] + - k[2938]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CCHI] + - k[2939]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CHCNI] + - k[2940]*y_cur[IDX_HCOII]*y_cur[IDX_CH2COI] + - k[2941]*y_cur[IDX_HCOII]*y_cur[IDX_CH2NHI] + - k[2942]*y_cur[IDX_HCOII]*y_cur[IDX_CH2PHI] + - k[2943]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C3NI] + - k[2944]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C4HI] + - k[2945]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C5NI] + - k[2946]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C6HI] + - k[2947]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C7NI] + - k[2948]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CCHI] + - k[2949]*y_cur[IDX_HCOII]*y_cur[IDX_C2H6I] + - k[2950]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CHOI] + - k[2951]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CNI] + - k[2952]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COCH3I] + - k[2953]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OCH3I] + - k[2954]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OHI] + - k[2955]*y_cur[IDX_HCOII]*y_cur[IDX_CPI] + - k[2956]*y_cur[IDX_HCOII]*y_cur[IDX_CSI] + - k[2957]*y_cur[IDX_HCOII]*y_cur[IDX_H2CCCI] + - k[2958]*y_cur[IDX_HCOII]*y_cur[IDX_H2COI] + - k[2959]*y_cur[IDX_HCOII]*y_cur[IDX_H2CSI] + - k[2960]*y_cur[IDX_HCOII]*y_cur[IDX_H2S2I] + - k[2961]*y_cur[IDX_HCOII]*y_cur[IDX_H2SI] + - k[2962]*y_cur[IDX_HCOII]*y_cur[IDX_H2SiOI] + - k[2963]*y_cur[IDX_HCOII]*y_cur[IDX_HC2PI] + - k[2964]*y_cur[IDX_HCOII]*y_cur[IDX_HC3NI] + - k[2965]*y_cur[IDX_HCOII]*y_cur[IDX_C4H2I] + - k[2966]*y_cur[IDX_HCOII]*y_cur[IDX_HC5NI] + - k[2967]*y_cur[IDX_HCOII]*y_cur[IDX_HC7NI] + - k[2968]*y_cur[IDX_HCOII]*y_cur[IDX_HC9NI] + - k[2969]*y_cur[IDX_HCOII]*y_cur[IDX_HCOI] + - k[2970]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOCH3I] + - k[2971]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOHI] + - k[2972]*y_cur[IDX_HCOII]*y_cur[IDX_HCPI] + - k[2973]*y_cur[IDX_HCOII]*y_cur[IDX_HCSiI] + - k[2974]*y_cur[IDX_HCOII]*y_cur[IDX_HNSiI] + - k[2975]*y_cur[IDX_HCOII]*y_cur[IDX_HPOI] + - k[2976]*y_cur[IDX_HCOII]*y_cur[IDX_HS2I] + - k[2977]*y_cur[IDX_HCOII]*y_cur[IDX_HSI] + - k[2978]*y_cur[IDX_HCOII]*y_cur[IDX_N2OI] + - k[2979]*y_cur[IDX_HCOII]*y_cur[IDX_NCCNI] + - k[2980]*y_cur[IDX_HCOII]*y_cur[IDX_NH2CNI] + - k[2981]*y_cur[IDX_HCOII]*y_cur[IDX_NSI] + - k[2982]*y_cur[IDX_HCOII]*y_cur[IDX_OCSI] + - k[2983]*y_cur[IDX_HCOII]*y_cur[IDX_PI] + - k[2984]*y_cur[IDX_HCOII]*y_cur[IDX_PH2I] + - k[2985]*y_cur[IDX_HCOII]*y_cur[IDX_PHI] + - k[2986]*y_cur[IDX_HCOII]*y_cur[IDX_PNI] + - k[2987]*y_cur[IDX_HCOII]*y_cur[IDX_POI] + - k[2988]*y_cur[IDX_HCOII]*y_cur[IDX_S2I] + - k[2989]*y_cur[IDX_HCOII]*y_cur[IDX_SI] + - k[2990]*y_cur[IDX_HCOII]*y_cur[IDX_SOI] + - k[2991]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2I] + - k[2992]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2H2I] + - k[2993]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2HI] + - k[2994]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3I] + - k[2995]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3HI] + - k[2996]*y_cur[IDX_HCOII]*y_cur[IDX_SiC4I] + - k[2997]*y_cur[IDX_HCOII]*y_cur[IDX_SiCI] + - k[2998]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH2I] + - k[2999]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH3I] + - k[3000]*y_cur[IDX_HCOII]*y_cur[IDX_SiH2I] + - k[3001]*y_cur[IDX_HCOII]*y_cur[IDX_SiH4I] + - k[3002]*y_cur[IDX_HCOII]*y_cur[IDX_SiHI] + - k[3003]*y_cur[IDX_HCOII]*y_cur[IDX_SiNCI] + - k[3004]*y_cur[IDX_HCOII]*y_cur[IDX_SiO2I] + - k[3005]*y_cur[IDX_HCOII]*y_cur[IDX_SiOI] + - k[3006]*y_cur[IDX_HCOII]*y_cur[IDX_SiSI] + - k[3007]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] + - k[3010]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] + - k[3012]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + - k[3029]*y_cur[IDX_HNC3I]*y_cur[IDX_HCOII] + - k[3041]*y_cur[IDX_HNCI]*y_cur[IDX_HCOII] + - k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] + - k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + - k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + - k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] + - k[3250]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + - k[3295]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - - k[3344]*y_cur[IDX_NII]*y_cur[IDX_COI] + - k[3350]*y_cur[IDX_NII]*y_cur[IDX_HCOI] + - k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + - k[3364]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + - k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] + - k[3483]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - - k[3485]*y_cur[IDX_NHII]*y_cur[IDX_COI] - - k[3486]*y_cur[IDX_NHII]*y_cur[IDX_COI] + - k[3542]*y_cur[IDX_NH2I]*y_cur[IDX_HCOII] + - k[3552]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + - k[3584]*y_cur[IDX_NH3I]*y_cur[IDX_HCOII] + - k[3614]*y_cur[IDX_NHI]*y_cur[IDX_HCOII] + - k[3626]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] + - k[3640]*y_cur[IDX_OII]*y_cur[IDX_CO2I] + - k[3646]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + - k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + - k[3659]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3670]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + - k[3678]*y_cur[IDX_OI]*y_cur[IDX_C10M] + - k[3680]*y_cur[IDX_OI]*y_cur[IDX_C10HII] + - k[3681]*y_cur[IDX_OI]*y_cur[IDX_C10HM] + - k[3685]*y_cur[IDX_OI]*y_cur[IDX_C2M] + - k[3687]*y_cur[IDX_OI]*y_cur[IDX_C2HM] + - k[3693]*y_cur[IDX_OI]*y_cur[IDX_C3M] + - k[3694]*y_cur[IDX_OI]*y_cur[IDX_C3HM] + - k[3698]*y_cur[IDX_OI]*y_cur[IDX_C4M] + - k[3700]*y_cur[IDX_OI]*y_cur[IDX_C4HM] + - k[3701]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] + - k[3703]*y_cur[IDX_OI]*y_cur[IDX_C5M] + - k[3705]*y_cur[IDX_OI]*y_cur[IDX_C5HM] + - k[3708]*y_cur[IDX_OI]*y_cur[IDX_C6M] + - k[3709]*y_cur[IDX_OI]*y_cur[IDX_C6HM] + - k[3712]*y_cur[IDX_OI]*y_cur[IDX_C7M] + - k[3714]*y_cur[IDX_OI]*y_cur[IDX_C7HM] + - k[3717]*y_cur[IDX_OI]*y_cur[IDX_C8M] + - k[3718]*y_cur[IDX_OI]*y_cur[IDX_C8HM] + - k[3721]*y_cur[IDX_OI]*y_cur[IDX_C9M] + - k[3723]*y_cur[IDX_OI]*y_cur[IDX_C9HM] + - k[3730]*y_cur[IDX_OI]*y_cur[IDX_CO2II] + - k[3731]*y_cur[IDX_OI]*y_cur[IDX_CPII] + - k[3737]*y_cur[IDX_OI]*y_cur[IDX_HCPII] + - k[3762]*y_cur[IDX_OI]*y_cur[IDX_SiNCII] - - k[3777]*y_cur[IDX_OHII]*y_cur[IDX_COI] + - k[3782]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + - k[3801]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + - k[3811]*y_cur[IDX_PII]*y_cur[IDX_CO2I] + - k[3833]*y_cur[IDX_SII]*y_cur[IDX_OCSI] + - k[3844]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + - k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] + - k[3871]*y_cur[IDX_SiII]*y_cur[IDX_OCSI] + - k[3881]*y_cur[IDX_SiI]*y_cur[IDX_HCOII] + - k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + - k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + - k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + - k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + - k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + - k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + - k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + - k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + - k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + - k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + - k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + - k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + - k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + - k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + - k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + - k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + - k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + - k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + - k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + - k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + - k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + - k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + - k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + - k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + - k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + - k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] + - k[4815]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] + - k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + - k[4874]*y_cur[IDX_C2I]*y_cur[IDX_O2I] + - k[4874]*y_cur[IDX_C2I]*y_cur[IDX_O2I] + - k[4875]*y_cur[IDX_C2I]*y_cur[IDX_OCSI] + - k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] + - k[4904]*y_cur[IDX_C2HI]*y_cur[IDX_O2I] + - k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] + - k[4918]*y_cur[IDX_CI]*y_cur[IDX_C2OI] + - k[4922]*y_cur[IDX_CI]*y_cur[IDX_C3OI] - - k[4957]*y_cur[IDX_CI]*y_cur[IDX_COI] + - k[4963]*y_cur[IDX_CI]*y_cur[IDX_HCOI] + - k[4964]*y_cur[IDX_CI]*y_cur[IDX_HPOI] + - k[4975]*y_cur[IDX_CI]*y_cur[IDX_NOI] + - k[4978]*y_cur[IDX_CI]*y_cur[IDX_O2I] + - k[4979]*y_cur[IDX_CI]*y_cur[IDX_OCNI] + - k[4980]*y_cur[IDX_CI]*y_cur[IDX_OCSI] + - k[4981]*y_cur[IDX_CI]*y_cur[IDX_OHI] + - k[4985]*y_cur[IDX_CI]*y_cur[IDX_SO2I] + - k[4987]*y_cur[IDX_CI]*y_cur[IDX_SOI] + - k[4999]*y_cur[IDX_CH2I]*y_cur[IDX_HCOI] + - k[5009]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + - k[5012]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + - k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + - k[5033]*y_cur[IDX_CH3I]*y_cur[IDX_HCOI] + - k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + - k[5075]*y_cur[IDX_CHI]*y_cur[IDX_CO2I] + - k[5077]*y_cur[IDX_CHI]*y_cur[IDX_HCOI] + - k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5090]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5091]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5096]*y_cur[IDX_CHI]*y_cur[IDX_OI] + - k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] + - k[5102]*y_cur[IDX_CHI]*y_cur[IDX_SOI] + - k[5117]*y_cur[IDX_CNI]*y_cur[IDX_HCOI] + - k[5121]*y_cur[IDX_CNI]*y_cur[IDX_NOI] + - k[5123]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - - k[5127]*y_cur[IDX_COI]*y_cur[IDX_HNOI] - - k[5128]*y_cur[IDX_COI]*y_cur[IDX_N2OI] - - k[5129]*y_cur[IDX_COI]*y_cur[IDX_NO2I] - - k[5130]*y_cur[IDX_COI]*y_cur[IDX_O2I] - - k[5131]*y_cur[IDX_COI]*y_cur[IDX_O2HI] + - k[5157]*y_cur[IDX_HI]*y_cur[IDX_CH2COI] + - k[5162]*y_cur[IDX_HI]*y_cur[IDX_CO2I] - - k[5163]*y_cur[IDX_HI]*y_cur[IDX_COI] + - k[5171]*y_cur[IDX_HI]*y_cur[IDX_HCOI] + - k[5195]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + - k[5197]*y_cur[IDX_HI]*y_cur[IDX_OCSI] + - k[5203]*y_cur[IDX_HCNOI]*y_cur[IDX_OI] + - k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + - k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + - k[5205]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + - k[5207]*y_cur[IDX_HCOI]*y_cur[IDX_NOI] + - k[5209]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] + - k[5214]*y_cur[IDX_HNCOI]*y_cur[IDX_CI] + - k[5215]*y_cur[IDX_HOCNI]*y_cur[IDX_CI] + - k[5230]*y_cur[IDX_NI]*y_cur[IDX_C2OI] + - k[5262]*y_cur[IDX_NI]*y_cur[IDX_CO2I] + - k[5265]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + - k[5332]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] + - k[5336]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] + - k[5340]*y_cur[IDX_OI]*y_cur[IDX_C10I] + - k[5341]*y_cur[IDX_OI]*y_cur[IDX_C10HI] + - k[5342]*y_cur[IDX_OI]*y_cur[IDX_C11I] + - k[5343]*y_cur[IDX_OI]*y_cur[IDX_C2I] + - k[5344]*y_cur[IDX_OI]*y_cur[IDX_C2H2I] + - k[5352]*y_cur[IDX_OI]*y_cur[IDX_C2HI] + - k[5353]*y_cur[IDX_OI]*y_cur[IDX_C2NI] + - k[5354]*y_cur[IDX_OI]*y_cur[IDX_C2OI] + - k[5354]*y_cur[IDX_OI]*y_cur[IDX_C2OI] + - k[5355]*y_cur[IDX_OI]*y_cur[IDX_C2SI] + - k[5356]*y_cur[IDX_OI]*y_cur[IDX_C3I] + - k[5357]*y_cur[IDX_OI]*y_cur[IDX_C3HI] + - k[5358]*y_cur[IDX_OI]*y_cur[IDX_C3NI] + - k[5359]*y_cur[IDX_OI]*y_cur[IDX_C3OI] + - k[5360]*y_cur[IDX_OI]*y_cur[IDX_C3PI] + - k[5361]*y_cur[IDX_OI]*y_cur[IDX_C4I] + - k[5362]*y_cur[IDX_OI]*y_cur[IDX_C4HI] + - k[5363]*y_cur[IDX_OI]*y_cur[IDX_C4NI] + - k[5364]*y_cur[IDX_OI]*y_cur[IDX_C4PI] + - k[5365]*y_cur[IDX_OI]*y_cur[IDX_C5I] + - k[5366]*y_cur[IDX_OI]*y_cur[IDX_C5HI] + - k[5367]*y_cur[IDX_OI]*y_cur[IDX_C5NI] + - k[5368]*y_cur[IDX_OI]*y_cur[IDX_C6I] + - k[5369]*y_cur[IDX_OI]*y_cur[IDX_C6HI] + - k[5370]*y_cur[IDX_OI]*y_cur[IDX_C7I] + - k[5371]*y_cur[IDX_OI]*y_cur[IDX_C7HI] + - k[5373]*y_cur[IDX_OI]*y_cur[IDX_C8I] + - k[5374]*y_cur[IDX_OI]*y_cur[IDX_C8HI] + - k[5375]*y_cur[IDX_OI]*y_cur[IDX_C9I] + - k[5376]*y_cur[IDX_OI]*y_cur[IDX_C9HI] + - k[5378]*y_cur[IDX_OI]*y_cur[IDX_CCPI] + - k[5379]*y_cur[IDX_OI]*y_cur[IDX_CClI] + - k[5382]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + - k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] + - k[5386]*y_cur[IDX_OI]*y_cur[IDX_CNI] + - k[5387]*y_cur[IDX_OI]*y_cur[IDX_CNI] + - k[5389]*y_cur[IDX_OI]*y_cur[IDX_CNOI] + - k[5390]*y_cur[IDX_OI]*y_cur[IDX_CO2I] + - k[5391]*y_cur[IDX_OI]*y_cur[IDX_CPI] + - k[5392]*y_cur[IDX_OI]*y_cur[IDX_CSI] + - k[5395]*y_cur[IDX_OI]*y_cur[IDX_H2CCCI] + - k[5401]*y_cur[IDX_OI]*y_cur[IDX_HC2PI] + - k[5403]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + - k[5406]*y_cur[IDX_OI]*y_cur[IDX_HCOI] + - k[5407]*y_cur[IDX_OI]*y_cur[IDX_HCPI] + - k[5408]*y_cur[IDX_OI]*y_cur[IDX_HCSI] + - k[5428]*y_cur[IDX_OI]*y_cur[IDX_OCNI] + - k[5431]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + - k[5440]*y_cur[IDX_OI]*y_cur[IDX_SiC2I] + - k[5441]*y_cur[IDX_OI]*y_cur[IDX_SiC3I] + - k[5442]*y_cur[IDX_OI]*y_cur[IDX_SiC4I] + - k[5443]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + - k[5452]*y_cur[IDX_OI]*y_cur[IDX_SiNCI] + - k[5455]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - - k[5461]*y_cur[IDX_OHI]*y_cur[IDX_COI] + - k[5462]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + - k[5470]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] + - k[5471]*y_cur[IDX_OHI]*y_cur[IDX_HCOI] + - k[5485]*y_cur[IDX_SI]*y_cur[IDX_C2OI] + - k[5487]*y_cur[IDX_SI]*y_cur[IDX_HCOI] + - k[5491]*y_cur[IDX_SiI]*y_cur[IDX_CO2I] - - k[5492]*y_cur[IDX_SiI]*y_cur[IDX_COI] - - k[5507]*y_cur[IDX_C2H2II]*y_cur[IDX_COI] - - k[5513]*y_cur[IDX_C2H3II]*y_cur[IDX_COI] + - k[5526]*y_cur[IDX_CI]*y_cur[IDX_OI] - - k[5535]*y_cur[IDX_CH3II]*y_cur[IDX_COI] - - k[5545]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + - k[5630]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OI] + - k[5636]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHI] + - k[5641]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COI] + - k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + - k[5646]*y_cur[IDX_HCOII]*y_cur[IDX_COOHI] + - k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + - k[5652]*y_cur[IDX_HCOII]*y_cur[IDX_COOCH3I] + - k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + - k[5658]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCOI] + - k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + - k[5664]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCHOI] + - k[5670]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COOHI] - - k[5676]*y_cur[IDX_COI] + k[5713]*y_cur[IDX_C2OI] + - k[5723]*y_cur[IDX_C3OI] + k[5790]*y_cur[IDX_CH2COI] + - k[5807]*y_cur[IDX_CH3CHOI] + k[5813]*y_cur[IDX_CH3COCH3I] + - k[5825]*y_cur[IDX_CO2I] - k[5826]*y_cur[IDX_COI] + - k[5836]*y_cur[IDX_H2COI] + k[5856]*y_cur[IDX_HCOI] + - k[5868]*y_cur[IDX_HNCOI] + k[5903]*y_cur[IDX_OCSI] + - k[5938]*y_cur[IDX_CH3COI] + k[5939]*y_cur[IDX_COOHI] + - k[5942]*y_cur[IDX_HC2OI] + k[5943]*y_cur[IDX_COOCH3I] + - k[5944]*y_cur[IDX_CH2OHCOI] + k[5998]*y_cur[IDX_C2OI] + - k[6007]*y_cur[IDX_C3OI] + k[6092]*y_cur[IDX_CH2COI] + - k[6112]*y_cur[IDX_CH3CHOI] + k[6117]*y_cur[IDX_CH3COCH3I] + - k[6137]*y_cur[IDX_CO2I] - k[6138]*y_cur[IDX_COI] + - k[6152]*y_cur[IDX_H2COI] + k[6153]*y_cur[IDX_H2COI] + - k[6184]*y_cur[IDX_HCOI] + k[6199]*y_cur[IDX_HNCOI] + - k[6241]*y_cur[IDX_OCSI] + k[6291]*y_cur[IDX_CH3COI] + - k[6292]*y_cur[IDX_COOHI] + k[6293]*y_cur[IDX_COOCH3I] + - k[6294]*y_cur[IDX_CH2OHCOI] + - k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM] + - k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM] + - k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM] + - k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + - k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM] + - k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + - k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + - k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + - k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM] + - k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + - k[6568]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + - k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM] + - k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + - k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + - k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + - k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + - k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6699]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + - k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + - k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6918]*y_cur[IDX_COI] + k[7100]*y_cur[IDX_GCOI] + - k[7282]*y_cur[IDX_GCOI] + k[7464]*y_cur[IDX_GCOI] + - k[8661]*y_cur[IDX_GCI]*y_cur[IDX_GOI]; - ydot[yistart + IDX_COII] = 0.0 - - k[209]*y_cur[IDX_C2I]*y_cur[IDX_COII] - - k[242]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - - k[246]*y_cur[IDX_CI]*y_cur[IDX_COII] - - k[261]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - - k[285]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - - k[289]*y_cur[IDX_CHI]*y_cur[IDX_COII] + - k[299]*y_cur[IDX_CNII]*y_cur[IDX_COI] - - k[307]*y_cur[IDX_COII]*y_cur[IDX_CO2I] - - k[308]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - - k[309]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - - k[310]*y_cur[IDX_COII]*y_cur[IDX_HCOI] - - k[311]*y_cur[IDX_COII]*y_cur[IDX_NOI] - - k[312]*y_cur[IDX_COII]*y_cur[IDX_O2I] - - k[313]*y_cur[IDX_COII]*y_cur[IDX_SI] + - k[316]*y_cur[IDX_COI]*y_cur[IDX_N2II] + - k[445]*y_cur[IDX_H2II]*y_cur[IDX_COI] - - k[478]*y_cur[IDX_H2OI]*y_cur[IDX_COII] - - k[488]*y_cur[IDX_HI]*y_cur[IDX_COII] - - k[497]*y_cur[IDX_HCNI]*y_cur[IDX_COII] + - k[549]*y_cur[IDX_NII]*y_cur[IDX_COI] - - k[587]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - - k[602]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - - k[617]*y_cur[IDX_NHI]*y_cur[IDX_COII] + - k[653]*y_cur[IDX_OII]*y_cur[IDX_COI] - - k[682]*y_cur[IDX_OI]*y_cur[IDX_COII] - - k[699]*y_cur[IDX_OHI]*y_cur[IDX_COII] - - k[980]*y_cur[IDX_COII]*y_cur[IDX_eM] + - k[1386]*y_cur[IDX_CII]*y_cur[IDX_CNOI] + - k[1387]*y_cur[IDX_CII]*y_cur[IDX_CO2I] + - k[1422]*y_cur[IDX_CII]*y_cur[IDX_O2I] + - k[1424]*y_cur[IDX_CII]*y_cur[IDX_OCNI] + - k[1426]*y_cur[IDX_CII]*y_cur[IDX_OHI] + - k[1430]*y_cur[IDX_CII]*y_cur[IDX_SOI] + - k[1455]*y_cur[IDX_C2II]*y_cur[IDX_O2I] + - k[1462]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - - k[1743]*y_cur[IDX_C2HI]*y_cur[IDX_COII] + - k[1912]*y_cur[IDX_CI]*y_cur[IDX_O2II] + - k[1966]*y_cur[IDX_CHII]*y_cur[IDX_O2I] + - k[1969]*y_cur[IDX_CHII]*y_cur[IDX_OI] + - k[1972]*y_cur[IDX_CHII]*y_cur[IDX_OHI] - - k[2001]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - - k[2189]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - - k[2190]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - - k[2245]*y_cur[IDX_CHI]*y_cur[IDX_COII] + - k[2261]*y_cur[IDX_CHI]*y_cur[IDX_OII] - - k[2280]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - - k[2281]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - - k[2282]*y_cur[IDX_COII]*y_cur[IDX_SO2I] + - k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + - k[2344]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - - k[2434]*y_cur[IDX_H2I]*y_cur[IDX_COII] - - k[2435]*y_cur[IDX_H2I]*y_cur[IDX_COII] - - k[2540]*y_cur[IDX_H2OI]*y_cur[IDX_COII] + - k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + - k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + - k[3296]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3343]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - - k[3534]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - - k[3573]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - - k[3610]*y_cur[IDX_NHI]*y_cur[IDX_COII] + - k[3631]*y_cur[IDX_OII]*y_cur[IDX_C2I] + - k[3634]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + - k[3684]*y_cur[IDX_OI]*y_cur[IDX_C2II] + - k[3732]*y_cur[IDX_OI]*y_cur[IDX_CSII] - - k[3798]*y_cur[IDX_OHI]*y_cur[IDX_COII] + - k[5505]*y_cur[IDX_CII]*y_cur[IDX_OI] + - k[5525]*y_cur[IDX_CI]*y_cur[IDX_OII] + - k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + - k[5647]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + - k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + - k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + k[5676]*y_cur[IDX_COI] - - k[6136]*y_cur[IDX_COII] + k[6183]*y_cur[IDX_HCOII] - - k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CO2I] = 0.0 - k[3]*y_cur[IDX_CM]*y_cur[IDX_CO2I] - + k[7]*y_cur[IDX_CM]*y_cur[IDX_O2I] + - k[124]*y_cur[IDX_OM]*y_cur[IDX_COI] + - k[228]*y_cur[IDX_C2H2I]*y_cur[IDX_CO2II] + - k[238]*y_cur[IDX_C2H4I]*y_cur[IDX_CO2II] + - k[286]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - - k[298]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - - k[307]*y_cur[IDX_COII]*y_cur[IDX_CO2I] + - k[314]*y_cur[IDX_CO2II]*y_cur[IDX_OCSI] + - k[315]*y_cur[IDX_CO2II]*y_cur[IDX_SO2I] + - k[479]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] + - k[484]*y_cur[IDX_H2SI]*y_cur[IDX_CO2II] - - k[516]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[548]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - - k[564]*y_cur[IDX_N2II]*y_cur[IDX_CO2I] + - k[603]*y_cur[IDX_NH3I]*y_cur[IDX_CO2II] + - k[623]*y_cur[IDX_NOI]*y_cur[IDX_CO2II] + - k[678]*y_cur[IDX_O2I]*y_cur[IDX_CO2II] + - k[683]*y_cur[IDX_OI]*y_cur[IDX_CO2II] + - k[983]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + - k[1098]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + - k[1101]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + - k[1286]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - - k[1387]*y_cur[IDX_CII]*y_cur[IDX_CO2I] - - k[1468]*y_cur[IDX_C2HII]*y_cur[IDX_CO2I] + - k[1567]*y_cur[IDX_C2H2I]*y_cur[IDX_HCO2II] - - k[1753]*y_cur[IDX_C3HII]*y_cur[IDX_CO2I] + - k[1905]*y_cur[IDX_CI]*y_cur[IDX_HCO2II] - - k[1946]*y_cur[IDX_CHII]*y_cur[IDX_CO2I] - - k[1978]*y_cur[IDX_CH2II]*y_cur[IDX_CO2I] + - k[2116]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCO2II] - - k[2139]*y_cur[IDX_CH4II]*y_cur[IDX_CO2I] + - k[2201]*y_cur[IDX_CH4I]*y_cur[IDX_HCO2II] - - k[2223]*y_cur[IDX_CH5II]*y_cur[IDX_CO2I] - - k[2269]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - - k[2270]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + - k[2282]*y_cur[IDX_COII]*y_cur[IDX_SO2I] + - k[2285]*y_cur[IDX_COI]*y_cur[IDX_HCO2II] + - k[2290]*y_cur[IDX_COI]*y_cur[IDX_SO2II] + - k[2292]*y_cur[IDX_COI]*y_cur[IDX_SiOII] - - k[2334]*y_cur[IDX_HII]*y_cur[IDX_CO2I] - - k[2382]*y_cur[IDX_H2II]*y_cur[IDX_CO2I] + - k[2548]*y_cur[IDX_H2OI]*y_cur[IDX_HCO2II] - - k[2674]*y_cur[IDX_H3II]*y_cur[IDX_CO2I] - - k[2853]*y_cur[IDX_HCNII]*y_cur[IDX_CO2I] - - k[3049]*y_cur[IDX_HNOII]*y_cur[IDX_CO2I] - - k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3343]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - - k[3372]*y_cur[IDX_N2HII]*y_cur[IDX_CO2I] - - k[3482]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - - k[3483]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - - k[3484]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] + - k[3585]*y_cur[IDX_NH3I]*y_cur[IDX_HCO2II] - - k[3640]*y_cur[IDX_OII]*y_cur[IDX_CO2I] + - k[3649]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - - k[3677]*y_cur[IDX_O2HII]*y_cur[IDX_CO2I] - - k[3776]*y_cur[IDX_OHII]*y_cur[IDX_CO2I] - - k[3811]*y_cur[IDX_PII]*y_cur[IDX_CO2I] + - k[3858]*y_cur[IDX_SOII]*y_cur[IDX_OCSI] + - k[5007]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + - k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5075]*y_cur[IDX_CHI]*y_cur[IDX_CO2I] + - k[5086]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5087]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5127]*y_cur[IDX_COI]*y_cur[IDX_HNOI] + - k[5128]*y_cur[IDX_COI]*y_cur[IDX_N2OI] + - k[5129]*y_cur[IDX_COI]*y_cur[IDX_NO2I] + - k[5130]*y_cur[IDX_COI]*y_cur[IDX_O2I] + - k[5131]*y_cur[IDX_COI]*y_cur[IDX_O2HI] - - k[5162]*y_cur[IDX_HI]*y_cur[IDX_CO2I] + - k[5208]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - - k[5262]*y_cur[IDX_NI]*y_cur[IDX_CO2I] + - k[5331]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] + - k[5335]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] - - k[5390]*y_cur[IDX_OI]*y_cur[IDX_CO2I] + - k[5405]*y_cur[IDX_OI]*y_cur[IDX_HCOI] + - k[5430]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + - k[5461]*y_cur[IDX_OHI]*y_cur[IDX_COI] - - k[5491]*y_cur[IDX_SiI]*y_cur[IDX_CO2I] - k[5825]*y_cur[IDX_CO2I] + - k[5858]*y_cur[IDX_HCOOCH3I] - k[6137]*y_cur[IDX_CO2I] + - k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + - k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + - k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + - k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6978]*y_cur[IDX_CO2I] + k[7160]*y_cur[IDX_GCO2I] + - k[7342]*y_cur[IDX_GCO2I] + k[7524]*y_cur[IDX_GCO2I] + - k[8693]*y_cur[IDX_GOI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_CO2II] = 0.0 - - k[228]*y_cur[IDX_C2H2I]*y_cur[IDX_CO2II] - - k[238]*y_cur[IDX_C2H4I]*y_cur[IDX_CO2II] - - k[286]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] + - k[298]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + - k[307]*y_cur[IDX_COII]*y_cur[IDX_CO2I] - - k[314]*y_cur[IDX_CO2II]*y_cur[IDX_OCSI] - - k[315]*y_cur[IDX_CO2II]*y_cur[IDX_SO2I] - - k[479]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - - k[484]*y_cur[IDX_H2SI]*y_cur[IDX_CO2II] + - k[516]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[548]*y_cur[IDX_NII]*y_cur[IDX_CO2I] + - k[564]*y_cur[IDX_N2II]*y_cur[IDX_CO2I] - - k[603]*y_cur[IDX_NH3I]*y_cur[IDX_CO2II] - - k[623]*y_cur[IDX_NOI]*y_cur[IDX_CO2II] - - k[678]*y_cur[IDX_O2I]*y_cur[IDX_CO2II] - - k[683]*y_cur[IDX_OI]*y_cur[IDX_CO2II] - - k[981]*y_cur[IDX_CO2II]*y_cur[IDX_eM] - - k[2191]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - - k[2436]*y_cur[IDX_H2I]*y_cur[IDX_CO2II] - - k[2541]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - - k[2841]*y_cur[IDX_HI]*y_cur[IDX_CO2II] - - k[3730]*y_cur[IDX_OI]*y_cur[IDX_CO2II] - - k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_COOCH3I] = 0.0 - - k[5649]*y_cur[IDX_CII]*y_cur[IDX_COOCH3I] - - k[5650]*y_cur[IDX_H3II]*y_cur[IDX_COOCH3I] - - k[5651]*y_cur[IDX_H3OII]*y_cur[IDX_COOCH3I] - - k[5652]*y_cur[IDX_HCOII]*y_cur[IDX_COOCH3I] - - k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] - - k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] - - k[5943]*y_cur[IDX_COOCH3I] - k[6293]*y_cur[IDX_COOCH3I] - - k[7019]*y_cur[IDX_COOCH3I] + k[7201]*y_cur[IDX_GCOOCH3I] + - k[7383]*y_cur[IDX_GCOOCH3I] + k[7558]*y_cur[IDX_GCOOCH3I] + - k[8760]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_COOCH3II] = 0.0 - - k[1270]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] - - k[1271]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + - k[5649]*y_cur[IDX_CII]*y_cur[IDX_COOCH3I] - - k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] - - k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_COOHI] = 0.0 + - k[1285]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1288]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1294]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[5644]*y_cur[IDX_CII]*y_cur[IDX_COOHI] - - k[5645]*y_cur[IDX_H3II]*y_cur[IDX_COOHI] - - k[5646]*y_cur[IDX_HCOII]*y_cur[IDX_COOHI] - - k[5647]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] - - k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + - k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5939]*y_cur[IDX_COOHI] + k[5946]*y_cur[IDX_CH3COOHI] - - k[6292]*y_cur[IDX_COOHI] + k[6297]*y_cur[IDX_CH3COOHI] + - k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6981]*y_cur[IDX_COOHI] + k[7163]*y_cur[IDX_GCOOHI] + - k[7345]*y_cur[IDX_GCOOHI] + k[7527]*y_cur[IDX_GCOOHI] + - k[8739]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_CPI] = 0.0 - k[171]*y_cur[IDX_CII]*y_cur[IDX_CPI] - - k[373]*y_cur[IDX_HII]*y_cur[IDX_CPI] + - k[902]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + - k[1060]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + - k[1105]*y_cur[IDX_HCPII]*y_cur[IDX_eM] + - k[1196]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + - k[1197]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + - k[1199]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] - - k[2677]*y_cur[IDX_H3II]*y_cur[IDX_CPI] - - k[2796]*y_cur[IDX_H3OII]*y_cur[IDX_CPI] - - k[2955]*y_cur[IDX_HCOII]*y_cur[IDX_CPI] + - k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] - - k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] - - k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + - k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + - k[4983]*y_cur[IDX_CI]*y_cur[IDX_PHI] + - k[5378]*y_cur[IDX_OI]*y_cur[IDX_CCPI] - - k[5391]*y_cur[IDX_OI]*y_cur[IDX_CPI] + - k[5527]*y_cur[IDX_CI]*y_cur[IDX_PI] + k[5774]*y_cur[IDX_CCPI] - - k[5827]*y_cur[IDX_CPI] + k[5861]*y_cur[IDX_HCPI] + - k[6008]*y_cur[IDX_C3PI] + k[6020]*y_cur[IDX_C4PI] + - k[6071]*y_cur[IDX_CCPI] - k[6139]*y_cur[IDX_CPI] + - k[6189]*y_cur[IDX_HCPI] + k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] - + k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + - k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + - k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + - k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - k[6972]*y_cur[IDX_CPI] - + k[7154]*y_cur[IDX_GCPI] + k[7336]*y_cur[IDX_GCPI] + - k[7518]*y_cur[IDX_GCPI]; - ydot[yistart + IDX_CPII] = 0.0 + - k[171]*y_cur[IDX_CII]*y_cur[IDX_CPI] + - k[373]*y_cur[IDX_HII]*y_cur[IDX_CPI] - - k[984]*y_cur[IDX_CPII]*y_cur[IDX_eM] + - k[1341]*y_cur[IDX_CII]*y_cur[IDX_CCPI] + - k[1397]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - - k[2437]*y_cur[IDX_H2I]*y_cur[IDX_CPII] + - k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - - k[3731]*y_cur[IDX_OI]*y_cur[IDX_CPII] - - k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_CSI] = 0.0 + k[58]*y_cur[IDX_CI]*y_cur[IDX_SM] + - k[317]*y_cur[IDX_CSII]*y_cur[IDX_FeI] - - k[374]*y_cur[IDX_HII]*y_cur[IDX_CSI] + - k[530]*y_cur[IDX_MgI]*y_cur[IDX_CSII] + - k[633]*y_cur[IDX_NaI]*y_cur[IDX_CSII] + - k[717]*y_cur[IDX_SiI]*y_cur[IDX_CSII] + - k[786]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + - k[818]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + - k[837]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + - k[954]*y_cur[IDX_CH3CSII]*y_cur[IDX_eM] + - k[1000]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + - k[1039]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + - k[1062]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + - k[1108]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + - k[1128]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] + - k[1178]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + - k[1392]*y_cur[IDX_CII]*y_cur[IDX_H2CSI] + - k[1757]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + - k[2576]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - - k[2678]*y_cur[IDX_H3II]*y_cur[IDX_CSI] - - k[2797]*y_cur[IDX_H3OII]*y_cur[IDX_CSI] - - k[2956]*y_cur[IDX_HCOII]*y_cur[IDX_CSI] + - k[3013]*y_cur[IDX_HCSII]*y_cur[IDX_C2H5OHI] + - k[3014]*y_cur[IDX_HCSII]*y_cur[IDX_CH3COCH3I] + - k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + - k[3116]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] - - k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] - - k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + - k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + - k[3294]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3587]*y_cur[IDX_NH3I]*y_cur[IDX_HCSII] + - k[3813]*y_cur[IDX_PII]*y_cur[IDX_OCSI] + - k[3831]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + - k[4876]*y_cur[IDX_C2I]*y_cur[IDX_SI] - - k[4899]*y_cur[IDX_C2HI]*y_cur[IDX_CSI] - - k[4958]*y_cur[IDX_CI]*y_cur[IDX_CSI] + - k[4965]*y_cur[IDX_CI]*y_cur[IDX_HSI] + - k[4976]*y_cur[IDX_CI]*y_cur[IDX_NSI] + - k[4980]*y_cur[IDX_CI]*y_cur[IDX_OCSI] + - k[4984]*y_cur[IDX_CI]*y_cur[IDX_S2I] + - k[4986]*y_cur[IDX_CI]*y_cur[IDX_SOI] + - k[5019]*y_cur[IDX_CH2I]*y_cur[IDX_SI] + - k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] + - k[5100]*y_cur[IDX_CHI]*y_cur[IDX_SI] + - k[5173]*y_cur[IDX_HI]*y_cur[IDX_HCSI] - - k[5263]*y_cur[IDX_NI]*y_cur[IDX_CSI] + - k[5355]*y_cur[IDX_OI]*y_cur[IDX_C2SI] - - k[5392]*y_cur[IDX_OI]*y_cur[IDX_CSI] - - k[5393]*y_cur[IDX_OI]*y_cur[IDX_CSI] - - k[5462]*y_cur[IDX_OHI]*y_cur[IDX_CSI] - - k[5463]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + - k[5485]*y_cur[IDX_SI]*y_cur[IDX_C2OI] + - k[5529]*y_cur[IDX_CI]*y_cur[IDX_SI] + k[5714]*y_cur[IDX_C2SI] + - k[5725]*y_cur[IDX_C3SI] + k[5735]*y_cur[IDX_C4SI] - - k[5828]*y_cur[IDX_CSI] - k[5829]*y_cur[IDX_CSI] + - k[5837]*y_cur[IDX_H2CSI] + k[6009]*y_cur[IDX_C3SI] + - k[6021]*y_cur[IDX_C4SI] - k[6141]*y_cur[IDX_CSI] - - k[6142]*y_cur[IDX_CSI] + k[6156]*y_cur[IDX_H2CSI] + - k[6190]*y_cur[IDX_HCSI] + k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] - + k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + - k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + - k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + - k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + - k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM] + - k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + - k[6717]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] + - k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + - k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - k[6975]*y_cur[IDX_CSI] - + k[7157]*y_cur[IDX_GCSI] + k[7339]*y_cur[IDX_GCSI] + - k[7521]*y_cur[IDX_GCSI] + k[8666]*y_cur[IDX_GCI]*y_cur[IDX_GSI]; - ydot[yistart + IDX_CSII] = 0.0 - - k[317]*y_cur[IDX_CSII]*y_cur[IDX_FeI] + - k[374]*y_cur[IDX_HII]*y_cur[IDX_CSI] - - k[530]*y_cur[IDX_MgI]*y_cur[IDX_CSII] - - k[633]*y_cur[IDX_NaI]*y_cur[IDX_CSII] - - k[717]*y_cur[IDX_SiI]*y_cur[IDX_CSII] - - k[985]*y_cur[IDX_CSII]*y_cur[IDX_eM] + - k[1415]*y_cur[IDX_CII]*y_cur[IDX_HSI] + - k[1421]*y_cur[IDX_CII]*y_cur[IDX_NSI] + - k[1425]*y_cur[IDX_CII]*y_cur[IDX_OCSI] + - k[1428]*y_cur[IDX_CII]*y_cur[IDX_SOI] + - k[1456]*y_cur[IDX_C2II]*y_cur[IDX_SI] + - k[1464]*y_cur[IDX_C2I]*y_cur[IDX_SII] + - k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + - k[1908]*y_cur[IDX_CI]*y_cur[IDX_HSII] + - k[1973]*y_cur[IDX_CHII]*y_cur[IDX_SI] - - k[2192]*y_cur[IDX_CH4I]*y_cur[IDX_CSII] + - k[2265]*y_cur[IDX_CHI]*y_cur[IDX_SII] + - k[2346]*y_cur[IDX_HII]*y_cur[IDX_HCSI] - - k[2438]*y_cur[IDX_H2I]*y_cur[IDX_CSII] + - k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + - k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + - k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + - k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + - k[3293]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3359]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - - k[3672]*y_cur[IDX_O2I]*y_cur[IDX_CSII] - - k[3732]*y_cur[IDX_OI]*y_cur[IDX_CSII] + - k[5506]*y_cur[IDX_CII]*y_cur[IDX_SI] + - k[5528]*y_cur[IDX_CI]*y_cur[IDX_SII] + k[5828]*y_cur[IDX_CSI] - - k[6140]*y_cur[IDX_CSII] + k[6141]*y_cur[IDX_CSI] - - k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_ClI] = 0.0 + k[318]*y_cur[IDX_ClII]*y_cur[IDX_HI] - - k[319]*y_cur[IDX_ClI]*y_cur[IDX_HII] + - k[679]*y_cur[IDX_O2I]*y_cur[IDX_ClII] + - k[904]*y_cur[IDX_CClII]*y_cur[IDX_eM] + - k[986]*y_cur[IDX_ClOII]*y_cur[IDX_eM] + - k[1002]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + - k[1111]*y_cur[IDX_HClII]*y_cur[IDX_eM] - - k[2679]*y_cur[IDX_H3II]*y_cur[IDX_ClI] + - k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] - - k[5132]*y_cur[IDX_ClI]*y_cur[IDX_H2I] + - k[5211]*y_cur[IDX_HClI]*y_cur[IDX_HI] + - k[5379]*y_cur[IDX_OI]*y_cur[IDX_CClI] + - k[5394]*y_cur[IDX_OI]*y_cur[IDX_ClOI] + - k[5613]*y_cur[IDX_ClII]*y_cur[IDX_eM] - k[5677]*y_cur[IDX_ClI] + - k[5775]*y_cur[IDX_CClI] - k[5830]*y_cur[IDX_ClI] + - k[5831]*y_cur[IDX_ClOI] + k[5864]*y_cur[IDX_HClI] + - k[6072]*y_cur[IDX_CClI] - k[6143]*y_cur[IDX_ClI] + - k[6144]*y_cur[IDX_ClOI] + k[6194]*y_cur[IDX_HClI] - - k[6307]*y_cur[IDX_ClI] + k[6454]*y_cur[IDX_ClII]*y_cur[IDX_GRAINM] + - k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM] + - k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + - k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM] + - k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM] - k[6942]*y_cur[IDX_ClI] - + k[7124]*y_cur[IDX_GClI] + k[7306]*y_cur[IDX_GClI] + - k[7488]*y_cur[IDX_GClI]; - ydot[yistart + IDX_ClII] = 0.0 - - k[318]*y_cur[IDX_ClII]*y_cur[IDX_HI] + - k[319]*y_cur[IDX_ClI]*y_cur[IDX_HII] - - k[679]*y_cur[IDX_O2I]*y_cur[IDX_ClII] - - k[2439]*y_cur[IDX_H2I]*y_cur[IDX_ClII] + - k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] + - k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] - - k[5613]*y_cur[IDX_ClII]*y_cur[IDX_eM] + k[5677]*y_cur[IDX_ClI] + - k[5830]*y_cur[IDX_ClI] + k[6143]*y_cur[IDX_ClI] + - k[6307]*y_cur[IDX_ClI] - k[6454]*y_cur[IDX_ClII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_ClOI] = 0.0 - - k[172]*y_cur[IDX_CII]*y_cur[IDX_ClOI] - - k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] + - k[5380]*y_cur[IDX_OI]*y_cur[IDX_CClI] - - k[5394]*y_cur[IDX_OI]*y_cur[IDX_ClOI] - k[5831]*y_cur[IDX_ClOI] - - k[6144]*y_cur[IDX_ClOI] - k[6999]*y_cur[IDX_ClOI] + - k[7181]*y_cur[IDX_GClOI] + k[7363]*y_cur[IDX_GClOI] + - k[7545]*y_cur[IDX_GClOI]; - ydot[yistart + IDX_ClOII] = 0.0 + - k[172]*y_cur[IDX_CII]*y_cur[IDX_ClOI] - - k[986]*y_cur[IDX_ClOII]*y_cur[IDX_eM] - - k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_FI] = 0.0 + k[457]*y_cur[IDX_H2I]*y_cur[IDX_FII] - + k[905]*y_cur[IDX_CFII]*y_cur[IDX_eM] + - k[1004]*y_cur[IDX_H2FII]*y_cur[IDX_eM] + - k[1112]*y_cur[IDX_HFII]*y_cur[IDX_eM] + - k[1249]*y_cur[IDX_SiFII]*y_cur[IDX_eM] - - k[5139]*y_cur[IDX_H2I]*y_cur[IDX_FI] - - k[5151]*y_cur[IDX_H2OI]*y_cur[IDX_FI] - - k[5464]*y_cur[IDX_OHI]*y_cur[IDX_FI] + k[5865]*y_cur[IDX_HFI] + - k[6196]*y_cur[IDX_HFI] + k[6347]*y_cur[IDX_FII]*y_cur[IDX_GRAINM] + - k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM] + - k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + - k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM] + - k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM] - k[6903]*y_cur[IDX_FI] + - k[7085]*y_cur[IDX_GFI] + k[7267]*y_cur[IDX_GFI] + - k[7449]*y_cur[IDX_GFI]; - ydot[yistart + IDX_FII] = 0.0 - k[457]*y_cur[IDX_H2I]*y_cur[IDX_FII] - - k[2440]*y_cur[IDX_H2I]*y_cur[IDX_FII] + - k[3260]*y_cur[IDX_HeII]*y_cur[IDX_HFI] - - k[6347]*y_cur[IDX_FII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_FeI] = 0.0 - k[173]*y_cur[IDX_CII]*y_cur[IDX_FeI] - - k[221]*y_cur[IDX_C2H2II]*y_cur[IDX_FeI] - - k[250]*y_cur[IDX_CHII]*y_cur[IDX_FeI] - - k[271]*y_cur[IDX_CH3II]*y_cur[IDX_FeI] - - k[317]*y_cur[IDX_CSII]*y_cur[IDX_FeI] - - k[375]*y_cur[IDX_HII]*y_cur[IDX_FeI] - - k[459]*y_cur[IDX_H2COII]*y_cur[IDX_FeI] - - k[467]*y_cur[IDX_H2OII]*y_cur[IDX_FeI] - - k[483]*y_cur[IDX_H2SII]*y_cur[IDX_FeI] - - k[499]*y_cur[IDX_HCOII]*y_cur[IDX_FeI] - - k[505]*y_cur[IDX_HSII]*y_cur[IDX_FeI] - - k[550]*y_cur[IDX_NII]*y_cur[IDX_FeI] - - k[565]*y_cur[IDX_N2II]*y_cur[IDX_FeI] - - k[592]*y_cur[IDX_NH3II]*y_cur[IDX_FeI] - - k[620]*y_cur[IDX_NOII]*y_cur[IDX_FeI] + - k[634]*y_cur[IDX_NaI]*y_cur[IDX_FeII] - - k[654]*y_cur[IDX_OII]*y_cur[IDX_FeI] - - k[673]*y_cur[IDX_O2II]*y_cur[IDX_FeI] - - k[703]*y_cur[IDX_SII]*y_cur[IDX_FeI] - - k[715]*y_cur[IDX_SOII]*y_cur[IDX_FeI] - - k[716]*y_cur[IDX_SiII]*y_cur[IDX_FeI] - - k[726]*y_cur[IDX_SiOII]*y_cur[IDX_FeI] - - k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] + - k[3895]*y_cur[IDX_CM]*y_cur[IDX_FeII] + - k[3930]*y_cur[IDX_C10M]*y_cur[IDX_FeII] + - k[3965]*y_cur[IDX_C10HM]*y_cur[IDX_FeII] + - k[4000]*y_cur[IDX_C2M]*y_cur[IDX_FeII] + - k[4035]*y_cur[IDX_C2HM]*y_cur[IDX_FeII] + - k[4070]*y_cur[IDX_C3M]*y_cur[IDX_FeII] + - k[4105]*y_cur[IDX_C3HM]*y_cur[IDX_FeII] + - k[4140]*y_cur[IDX_C3NM]*y_cur[IDX_FeII] + - k[4175]*y_cur[IDX_C4M]*y_cur[IDX_FeII] + - k[4210]*y_cur[IDX_C4HM]*y_cur[IDX_FeII] + - k[4245]*y_cur[IDX_C5M]*y_cur[IDX_FeII] + - k[4280]*y_cur[IDX_C5HM]*y_cur[IDX_FeII] + - k[4315]*y_cur[IDX_C5NM]*y_cur[IDX_FeII] + - k[4350]*y_cur[IDX_C6M]*y_cur[IDX_FeII] + - k[4385]*y_cur[IDX_C6HM]*y_cur[IDX_FeII] + - k[4420]*y_cur[IDX_C7M]*y_cur[IDX_FeII] + - k[4455]*y_cur[IDX_C7HM]*y_cur[IDX_FeII] + - k[4490]*y_cur[IDX_C8M]*y_cur[IDX_FeII] + - k[4525]*y_cur[IDX_C8HM]*y_cur[IDX_FeII] + - k[4560]*y_cur[IDX_C9M]*y_cur[IDX_FeII] + - k[4595]*y_cur[IDX_C9HM]*y_cur[IDX_FeII] + - k[4630]*y_cur[IDX_CHM]*y_cur[IDX_FeII] + - k[4665]*y_cur[IDX_CNM]*y_cur[IDX_FeII] + - k[4700]*y_cur[IDX_HM]*y_cur[IDX_FeII] + - k[4736]*y_cur[IDX_OM]*y_cur[IDX_FeII] + - k[4771]*y_cur[IDX_O2M]*y_cur[IDX_FeII] + - k[4806]*y_cur[IDX_OHM]*y_cur[IDX_FeII] + - k[4841]*y_cur[IDX_SM]*y_cur[IDX_FeII] + - k[5614]*y_cur[IDX_FeII]*y_cur[IDX_eM] - k[5832]*y_cur[IDX_FeI] - - k[6145]*y_cur[IDX_FeI] - k[6304]*y_cur[IDX_FeI] + - k[6670]*y_cur[IDX_FeII]*y_cur[IDX_GRAINM] - k[7016]*y_cur[IDX_FeI] + - k[7198]*y_cur[IDX_GFeI] + k[7380]*y_cur[IDX_GFeI] + - k[7564]*y_cur[IDX_GFeI]; - ydot[yistart + IDX_FeII] = 0.0 + - k[173]*y_cur[IDX_CII]*y_cur[IDX_FeI] + - k[221]*y_cur[IDX_C2H2II]*y_cur[IDX_FeI] + - k[250]*y_cur[IDX_CHII]*y_cur[IDX_FeI] + - k[271]*y_cur[IDX_CH3II]*y_cur[IDX_FeI] + - k[317]*y_cur[IDX_CSII]*y_cur[IDX_FeI] + - k[375]*y_cur[IDX_HII]*y_cur[IDX_FeI] + - k[459]*y_cur[IDX_H2COII]*y_cur[IDX_FeI] + - k[467]*y_cur[IDX_H2OII]*y_cur[IDX_FeI] + - k[483]*y_cur[IDX_H2SII]*y_cur[IDX_FeI] + - k[499]*y_cur[IDX_HCOII]*y_cur[IDX_FeI] + - k[505]*y_cur[IDX_HSII]*y_cur[IDX_FeI] + - k[550]*y_cur[IDX_NII]*y_cur[IDX_FeI] + - k[565]*y_cur[IDX_N2II]*y_cur[IDX_FeI] + - k[592]*y_cur[IDX_NH3II]*y_cur[IDX_FeI] + - k[620]*y_cur[IDX_NOII]*y_cur[IDX_FeI] - - k[634]*y_cur[IDX_NaI]*y_cur[IDX_FeII] + - k[654]*y_cur[IDX_OII]*y_cur[IDX_FeI] + - k[673]*y_cur[IDX_O2II]*y_cur[IDX_FeI] + - k[703]*y_cur[IDX_SII]*y_cur[IDX_FeI] + - k[715]*y_cur[IDX_SOII]*y_cur[IDX_FeI] + - k[716]*y_cur[IDX_SiII]*y_cur[IDX_FeI] + - k[726]*y_cur[IDX_SiOII]*y_cur[IDX_FeI] + - k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] - - k[3895]*y_cur[IDX_CM]*y_cur[IDX_FeII] - - k[3930]*y_cur[IDX_C10M]*y_cur[IDX_FeII] - - k[3965]*y_cur[IDX_C10HM]*y_cur[IDX_FeII] - - k[4000]*y_cur[IDX_C2M]*y_cur[IDX_FeII] - - k[4035]*y_cur[IDX_C2HM]*y_cur[IDX_FeII] - - k[4070]*y_cur[IDX_C3M]*y_cur[IDX_FeII] - - k[4105]*y_cur[IDX_C3HM]*y_cur[IDX_FeII] - - k[4140]*y_cur[IDX_C3NM]*y_cur[IDX_FeII] - - k[4175]*y_cur[IDX_C4M]*y_cur[IDX_FeII] - - k[4210]*y_cur[IDX_C4HM]*y_cur[IDX_FeII] - - k[4245]*y_cur[IDX_C5M]*y_cur[IDX_FeII] - - k[4280]*y_cur[IDX_C5HM]*y_cur[IDX_FeII] - - k[4315]*y_cur[IDX_C5NM]*y_cur[IDX_FeII] - - k[4350]*y_cur[IDX_C6M]*y_cur[IDX_FeII] - - k[4385]*y_cur[IDX_C6HM]*y_cur[IDX_FeII] - - k[4420]*y_cur[IDX_C7M]*y_cur[IDX_FeII] - - k[4455]*y_cur[IDX_C7HM]*y_cur[IDX_FeII] - - k[4490]*y_cur[IDX_C8M]*y_cur[IDX_FeII] - - k[4525]*y_cur[IDX_C8HM]*y_cur[IDX_FeII] - - k[4560]*y_cur[IDX_C9M]*y_cur[IDX_FeII] - - k[4595]*y_cur[IDX_C9HM]*y_cur[IDX_FeII] - - k[4630]*y_cur[IDX_CHM]*y_cur[IDX_FeII] - - k[4665]*y_cur[IDX_CNM]*y_cur[IDX_FeII] - - k[4700]*y_cur[IDX_HM]*y_cur[IDX_FeII] - - k[4736]*y_cur[IDX_OM]*y_cur[IDX_FeII] - - k[4771]*y_cur[IDX_O2M]*y_cur[IDX_FeII] - - k[4806]*y_cur[IDX_OHM]*y_cur[IDX_FeII] - - k[4841]*y_cur[IDX_SM]*y_cur[IDX_FeII] - - k[5614]*y_cur[IDX_FeII]*y_cur[IDX_eM] + k[5832]*y_cur[IDX_FeI] + - k[6145]*y_cur[IDX_FeI] + k[6304]*y_cur[IDX_FeI] - - k[6670]*y_cur[IDX_FeII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_GCI] = 0.0 + k[6891]*y_cur[IDX_CI] - - k[7073]*y_cur[IDX_GCI] - k[7255]*y_cur[IDX_GCI] - - k[7437]*y_cur[IDX_GCI] + k[7616]*y_cur[IDX_GCOI] + - k[7618]*y_cur[IDX_GCHI] + k[7620]*y_cur[IDX_GCH2I] + - k[7621]*y_cur[IDX_GCH2I] + k[7641]*y_cur[IDX_GC2I] + - k[7641]*y_cur[IDX_GC2I] + k[7644]*y_cur[IDX_GC2HI] + - k[7649]*y_cur[IDX_GCNI] + k[7663]*y_cur[IDX_GC2H3I] + - k[7664]*y_cur[IDX_GC2H3I] + k[7674]*y_cur[IDX_GC2H4I] + - k[7675]*y_cur[IDX_GCOI] + k[7712]*y_cur[IDX_GC3I] + - k[7718]*y_cur[IDX_GC2NI] + k[7728]*y_cur[IDX_GC2OI] + - k[7734]*y_cur[IDX_GSiCI] + k[7753]*y_cur[IDX_GCPI] + - k[7757]*y_cur[IDX_GCSI] + k[7758]*y_cur[IDX_GCSI] + - k[7781]*y_cur[IDX_GCClI] + k[7784]*y_cur[IDX_GC4I] + - k[7799]*y_cur[IDX_GCH2CHCCHI] + k[7800]*y_cur[IDX_GCH2CHCCHI] + - k[7802]*y_cur[IDX_GSiC2I] + k[7807]*y_cur[IDX_GC4H6I] + - k[7814]*y_cur[IDX_GCCPI] + k[7815]*y_cur[IDX_GC2SI] + - k[7823]*y_cur[IDX_GC5I] + k[7828]*y_cur[IDX_GOCSI] + - k[7842]*y_cur[IDX_GSiC3I] + k[7847]*y_cur[IDX_GC3PI] + - k[7849]*y_cur[IDX_GC6I] + k[7859]*y_cur[IDX_GC4PI] + - k[7861]*y_cur[IDX_GC7I] + k[7866]*y_cur[IDX_GC8I] + - k[7871]*y_cur[IDX_GC9I] + k[7875]*y_cur[IDX_GC10I] + - k[7880]*y_cur[IDX_GC11I] + k[7894]*y_cur[IDX_GCHI] + - k[7895]*y_cur[IDX_GCHI] + k[7897]*y_cur[IDX_GCH2I] + - k[7898]*y_cur[IDX_GCH2I] + k[7927]*y_cur[IDX_GC2I] + - k[7927]*y_cur[IDX_GC2I] + k[7928]*y_cur[IDX_GC2I] + - k[7928]*y_cur[IDX_GC2I] + k[7931]*y_cur[IDX_GC2HI] + - k[7936]*y_cur[IDX_GCNI] + k[7950]*y_cur[IDX_GC2H3I] + - k[7951]*y_cur[IDX_GC2H3I] + k[7961]*y_cur[IDX_GC2H4I] + - k[7962]*y_cur[IDX_GCOI] + k[8017]*y_cur[IDX_GC3I] + - k[8025]*y_cur[IDX_GC2NI] + k[8036]*y_cur[IDX_GC2OI] + - k[8043]*y_cur[IDX_GSiCI] + k[8067]*y_cur[IDX_GCPI] + - k[8075]*y_cur[IDX_GCSI] + k[8076]*y_cur[IDX_GCSI] + - k[8105]*y_cur[IDX_GCClI] + k[8108]*y_cur[IDX_GC4I] + - k[8124]*y_cur[IDX_GCH2CHCCHI] + k[8125]*y_cur[IDX_GCH2CHCCHI] + - k[8134]*y_cur[IDX_GSiNCI] + k[8136]*y_cur[IDX_GC4H6I] + - k[8143]*y_cur[IDX_GCCPI] + k[8152]*y_cur[IDX_GOCSI] + - k[8169]*y_cur[IDX_GSiC3I] + k[8178]*y_cur[IDX_GC6I] + - k[8180]*y_cur[IDX_GC6I] + k[8193]*y_cur[IDX_GC7I] + - k[8196]*y_cur[IDX_GC7I] + k[8198]*y_cur[IDX_GC7HI] + - k[8205]*y_cur[IDX_GC8I] + k[8207]*y_cur[IDX_GC8I] + - k[8209]*y_cur[IDX_GC8HI] + k[8219]*y_cur[IDX_GC9I] + - k[8221]*y_cur[IDX_GC9I] + k[8223]*y_cur[IDX_GC9HI] + - k[8229]*y_cur[IDX_GC10I] + k[8231]*y_cur[IDX_GC10I] + - k[8233]*y_cur[IDX_GC10I] + k[8235]*y_cur[IDX_GC10I] + - k[8242]*y_cur[IDX_GC10HI] - k[8274]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - - k[8369]*y_cur[IDX_GH2I]*y_cur[IDX_GCI] - - k[8394]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - - k[8394]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - - k[8395]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - - k[8396]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] - - k[8397]*y_cur[IDX_GCI]*y_cur[IDX_GNI] - - k[8398]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - - k[8399]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - - k[8400]*y_cur[IDX_GCI]*y_cur[IDX_GNSI] - - k[8401]*y_cur[IDX_GCI]*y_cur[IDX_GOCNI] - - k[8402]*y_cur[IDX_GCI]*y_cur[IDX_GCNOI] - - k[8403]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] - - k[8404]*y_cur[IDX_GCI]*y_cur[IDX_GNH2I] - - k[8405]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - - k[8406]*y_cur[IDX_GCI]*y_cur[IDX_GOI] - - k[8407]*y_cur[IDX_GCI]*y_cur[IDX_GO2I] - - k[8408]*y_cur[IDX_GCI]*y_cur[IDX_GOHI] - - k[8409]*y_cur[IDX_GCI]*y_cur[IDX_GSOI] - - k[8410]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - - k[8411]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - - k[8412]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - - k[8413]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] - - k[8414]*y_cur[IDX_GCI]*y_cur[IDX_GHSI] - - k[8415]*y_cur[IDX_GCI]*y_cur[IDX_GSI] - - k[8416]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - - k[8417]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - - k[8418]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] - - k[8419]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] - - k[8420]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - - k[8421]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] - - k[8422]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI] - - k[8423]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - - k[8424]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - - k[8425]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - - k[8426]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] - - k[8427]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - - k[8428]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - - k[8429]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - - k[8430]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] - - k[8431]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - - k[8432]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - - k[8433]*y_cur[IDX_GCI]*y_cur[IDX_GC10I] - - k[8576]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - - k[8653]*y_cur[IDX_GH2I]*y_cur[IDX_GCI] - - k[8654]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - - k[8654]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - - k[8655]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - - k[8656]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] - - k[8657]*y_cur[IDX_GCI]*y_cur[IDX_GNI] - - k[8658]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - - k[8659]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] - - k[8660]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - - k[8661]*y_cur[IDX_GCI]*y_cur[IDX_GOI] - - k[8662]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - - k[8663]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - - k[8664]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - - k[8665]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] - - k[8666]*y_cur[IDX_GCI]*y_cur[IDX_GSI] - - k[8667]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - - k[8668]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - - k[8669]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] - - k[8670]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] - - k[8671]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - - k[8672]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] - - k[8673]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI] - - k[8674]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - - k[8675]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - - k[8676]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - - k[8677]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] - - k[8678]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - - k[8679]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - - k[8680]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - - k[8681]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] - - k[8682]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - - k[8683]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - - k[8684]*y_cur[IDX_GCI]*y_cur[IDX_GC10I]; - ydot[yistart + IDX_GC10I] = 0.0 + k[7064]*y_cur[IDX_C10I] - - k[7246]*y_cur[IDX_GC10I] - k[7428]*y_cur[IDX_GC10I] - - k[7610]*y_cur[IDX_GC10I] - k[7875]*y_cur[IDX_GC10I] + - k[7876]*y_cur[IDX_GC10HI] + k[7880]*y_cur[IDX_GC11I] - - k[8229]*y_cur[IDX_GC10I] - k[8230]*y_cur[IDX_GC10I] - - k[8231]*y_cur[IDX_GC10I] - k[8232]*y_cur[IDX_GC10I] - - k[8233]*y_cur[IDX_GC10I] - k[8234]*y_cur[IDX_GC10I] - - k[8235]*y_cur[IDX_GC10I] + k[8236]*y_cur[IDX_GC10HI] + - k[8243]*y_cur[IDX_GC10HI] + k[8248]*y_cur[IDX_GC10H2I] - - k[8362]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] - - k[8392]*y_cur[IDX_GH2I]*y_cur[IDX_GC10I] + - k[8431]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - - k[8433]*y_cur[IDX_GCI]*y_cur[IDX_GC10I] - - k[8648]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] - - k[8684]*y_cur[IDX_GCI]*y_cur[IDX_GC10I]; - ydot[yistart + IDX_GC10HI] = 0.0 + k[7065]*y_cur[IDX_C10HI] - - k[7247]*y_cur[IDX_GC10HI] - k[7429]*y_cur[IDX_GC10HI] - - k[7611]*y_cur[IDX_GC10HI] - k[7876]*y_cur[IDX_GC10HI] + - k[7878]*y_cur[IDX_GC10H2I] - k[8236]*y_cur[IDX_GC10HI] - - k[8237]*y_cur[IDX_GC10HI] - k[8238]*y_cur[IDX_GC10HI] - - k[8239]*y_cur[IDX_GC10HI] - k[8240]*y_cur[IDX_GC10HI] - - k[8241]*y_cur[IDX_GC10HI] - k[8242]*y_cur[IDX_GC10HI] - - k[8243]*y_cur[IDX_GC10HI] - k[8244]*y_cur[IDX_GC10HI] - - k[8245]*y_cur[IDX_GC10HI] + k[8249]*y_cur[IDX_GC10H2I] + - k[8251]*y_cur[IDX_GC10H2I] + k[8362]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] - - k[8363]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] + - k[8392]*y_cur[IDX_GH2I]*y_cur[IDX_GC10I] - - k[8393]*y_cur[IDX_GH2I]*y_cur[IDX_GC10HI] + - k[8432]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - - k[8649]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI]; - ydot[yistart + IDX_GC10H2I] = 0.0 + k[7067]*y_cur[IDX_C10H2I] - - k[7249]*y_cur[IDX_GC10H2I] - k[7431]*y_cur[IDX_GC10H2I] - - k[7613]*y_cur[IDX_GC10H2I] - k[7878]*y_cur[IDX_GC10H2I] - - k[8248]*y_cur[IDX_GC10H2I] - k[8249]*y_cur[IDX_GC10H2I] - - k[8250]*y_cur[IDX_GC10H2I] - k[8251]*y_cur[IDX_GC10H2I] + - k[8363]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] + - k[8393]*y_cur[IDX_GH2I]*y_cur[IDX_GC10HI] + - k[8503]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI]; - ydot[yistart + IDX_GC11I] = 0.0 + k[7069]*y_cur[IDX_C11I] - - k[7251]*y_cur[IDX_GC11I] - k[7433]*y_cur[IDX_GC11I] - - k[7615]*y_cur[IDX_GC11I] - k[7880]*y_cur[IDX_GC11I] - - k[8255]*y_cur[IDX_GC11I] - k[8256]*y_cur[IDX_GC11I] - - k[8257]*y_cur[IDX_GC11I] - k[8258]*y_cur[IDX_GC11I] - - k[8259]*y_cur[IDX_GC11I] - k[8260]*y_cur[IDX_GC11I] - - k[8261]*y_cur[IDX_GC11I] - k[8262]*y_cur[IDX_GC11I] - - k[8263]*y_cur[IDX_GC11I] + k[8433]*y_cur[IDX_GCI]*y_cur[IDX_GC10I]; - ydot[yistart + IDX_GC2I] = 0.0 + k[6907]*y_cur[IDX_C2I] - - k[7089]*y_cur[IDX_GC2I] - k[7271]*y_cur[IDX_GC2I] - - k[7453]*y_cur[IDX_GC2I] - k[7641]*y_cur[IDX_GC2I] + - k[7642]*y_cur[IDX_GC2HI] + k[7643]*y_cur[IDX_GC2HI] + - k[7646]*y_cur[IDX_GC2H2I] + k[7653]*y_cur[IDX_GC2H3I] + - k[7654]*y_cur[IDX_GC2H3I] + k[7712]*y_cur[IDX_GC3I] + - k[7717]*y_cur[IDX_GC2NI] + k[7727]*y_cur[IDX_GC2OI] + - k[7743]*y_cur[IDX_GCH2COI] + k[7783]*y_cur[IDX_GC4I] + - k[7783]*y_cur[IDX_GC4I] + k[7788]*y_cur[IDX_GC4HI] + - k[7790]*y_cur[IDX_GC3NI] + k[7803]*y_cur[IDX_GC3OI] + - k[7813]*y_cur[IDX_GCCPI] + k[7816]*y_cur[IDX_GC2SI] + - k[7822]*y_cur[IDX_GC5I] + k[7834]*y_cur[IDX_GC5HI] + - k[7848]*y_cur[IDX_GC3SI] + k[7857]*y_cur[IDX_GSiC4I] - - k[7927]*y_cur[IDX_GC2I] - k[7928]*y_cur[IDX_GC2I] + - k[7929]*y_cur[IDX_GC2HI] + k[7930]*y_cur[IDX_GC2HI] + - k[7933]*y_cur[IDX_GC2H2I] + k[7940]*y_cur[IDX_GC2H3I] + - k[7941]*y_cur[IDX_GC2H3I] + k[8017]*y_cur[IDX_GC3I] + - k[8024]*y_cur[IDX_GC2NI] + k[8035]*y_cur[IDX_GC2OI] + - k[8054]*y_cur[IDX_GCH2COI] + k[8107]*y_cur[IDX_GC4I] + - k[8107]*y_cur[IDX_GC4I] + k[8112]*y_cur[IDX_GC4HI] + - k[8114]*y_cur[IDX_GC3NI] + k[8129]*y_cur[IDX_GSiC2I] + - k[8130]*y_cur[IDX_GC3OI] + k[8142]*y_cur[IDX_GCCPI] + - k[8144]*y_cur[IDX_GC2SI] + k[8149]*y_cur[IDX_GC5I] + - k[8158]*y_cur[IDX_GC5HI] + k[8168]*y_cur[IDX_GSiC3I] + - k[8176]*y_cur[IDX_GC3PI] + k[8177]*y_cur[IDX_GC3SI] + - k[8179]*y_cur[IDX_GC6I] + k[8195]*y_cur[IDX_GC7I] + - k[8206]*y_cur[IDX_GC8I] + k[8212]*y_cur[IDX_GC7NI] + - k[8220]*y_cur[IDX_GC9I] + k[8231]*y_cur[IDX_GC10I] + - k[8232]*y_cur[IDX_GC10I] + k[8234]*y_cur[IDX_GC10I] + - k[8241]*y_cur[IDX_GC10HI] + k[8247]*y_cur[IDX_GC9NI] + - k[8259]*y_cur[IDX_GC11I] + k[8263]*y_cur[IDX_GC11I] - - k[8285]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - - k[8374]*y_cur[IDX_GH2I]*y_cur[IDX_GC2I] + - k[8394]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - - k[8410]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - - k[8445]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - - k[8462]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - - k[8486]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I] - - k[8586]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - - k[8662]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - - k[8691]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - - k[8703]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - - k[8719]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I]; - ydot[yistart + IDX_GC2HI] = 0.0 + k[6908]*y_cur[IDX_C2HI] - - k[7090]*y_cur[IDX_GC2HI] - k[7272]*y_cur[IDX_GC2HI] - - k[7454]*y_cur[IDX_GC2HI] - k[7642]*y_cur[IDX_GC2HI] - - k[7643]*y_cur[IDX_GC2HI] - k[7644]*y_cur[IDX_GC2HI] + - k[7645]*y_cur[IDX_GC2H2I] + k[7647]*y_cur[IDX_GC2H2I] + - k[7657]*y_cur[IDX_GC2H3I] + k[7658]*y_cur[IDX_GC2H3I] + - k[7659]*y_cur[IDX_GC2H3I] + k[7660]*y_cur[IDX_GC2H3I] + - k[7671]*y_cur[IDX_GC2H4I] + k[7724]*y_cur[IDX_GCH2CCH2I] + - k[7732]*y_cur[IDX_GCH3CCHI] + k[7788]*y_cur[IDX_GC4HI] + - k[7791]*y_cur[IDX_GC4H2I] + k[7791]*y_cur[IDX_GC4H2I] + - k[7793]*y_cur[IDX_GC4H2I] + k[7793]*y_cur[IDX_GC4H2I] + - k[7797]*y_cur[IDX_GHNC3I] + k[7798]*y_cur[IDX_GHC3NI] + - k[7833]*y_cur[IDX_GC5HI] + k[7837]*y_cur[IDX_GC5H2I] + - k[7851]*y_cur[IDX_GC6HI] + k[7853]*y_cur[IDX_GC6H2I] - - k[7929]*y_cur[IDX_GC2HI] - k[7930]*y_cur[IDX_GC2HI] - - k[7931]*y_cur[IDX_GC2HI] + k[7932]*y_cur[IDX_GC2H2I] + - k[7934]*y_cur[IDX_GC2H2I] + k[7944]*y_cur[IDX_GC2H3I] + - k[7945]*y_cur[IDX_GC2H3I] + k[7946]*y_cur[IDX_GC2H3I] + - k[7947]*y_cur[IDX_GC2H3I] + k[7958]*y_cur[IDX_GC2H4I] + - k[8032]*y_cur[IDX_GCH2CCH2I] + k[8041]*y_cur[IDX_GCH3CCHI] + - k[8112]*y_cur[IDX_GC4HI] + k[8115]*y_cur[IDX_GC4H2I] + - k[8115]*y_cur[IDX_GC4H2I] + k[8117]*y_cur[IDX_GC4H2I] + - k[8117]*y_cur[IDX_GC4H2I] + k[8123]*y_cur[IDX_GHC3NI] + - k[8157]*y_cur[IDX_GC5HI] + k[8162]*y_cur[IDX_GC5H2I] + - k[8182]*y_cur[IDX_GC6HI] + k[8285]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - - k[8286]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] + - k[8374]*y_cur[IDX_GH2I]*y_cur[IDX_GC2I] - - k[8375]*y_cur[IDX_GH2I]*y_cur[IDX_GC2HI] + - k[8395]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - - k[8411]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - - k[8487]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI] - - k[8575]*y_cur[IDX_GC2HI]*y_cur[IDX_GCH4I] - - k[8587]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] - - k[8663]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - - k[8720]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI]; - ydot[yistart + IDX_GC2H2I] = 0.0 + k[6910]*y_cur[IDX_C2H2I] - - k[7092]*y_cur[IDX_GC2H2I] - k[7274]*y_cur[IDX_GC2H2I] - - k[7456]*y_cur[IDX_GC2H2I] - k[7645]*y_cur[IDX_GC2H2I] - - k[7646]*y_cur[IDX_GC2H2I] - k[7647]*y_cur[IDX_GC2H2I] - - k[7648]*y_cur[IDX_GC2H2I] + k[7652]*y_cur[IDX_GC2H3I] + - k[7655]*y_cur[IDX_GC2H3I] + k[7656]*y_cur[IDX_GC2H3I] + - k[7667]*y_cur[IDX_GC2H4I] + k[7668]*y_cur[IDX_GC2H4I] + - k[7669]*y_cur[IDX_GC2H4I] + k[7677]*y_cur[IDX_GC2H5I] + - k[7678]*y_cur[IDX_GC2H5I] + k[7744]*y_cur[IDX_GCH2COI] + - k[7810]*y_cur[IDX_GC2H5CNI] - k[7932]*y_cur[IDX_GC2H2I] - - k[7933]*y_cur[IDX_GC2H2I] - k[7934]*y_cur[IDX_GC2H2I] - - k[7935]*y_cur[IDX_GC2H2I] + k[7939]*y_cur[IDX_GC2H3I] + - k[7942]*y_cur[IDX_GC2H3I] + k[7943]*y_cur[IDX_GC2H3I] + - k[7954]*y_cur[IDX_GC2H4I] + k[7955]*y_cur[IDX_GC2H4I] + - k[7956]*y_cur[IDX_GC2H4I] + k[7964]*y_cur[IDX_GC2H5I] + - k[7965]*y_cur[IDX_GC2H5I] + k[8055]*y_cur[IDX_GCH2COI] + - k[8139]*y_cur[IDX_GC2H5CNI] + k[8190]*y_cur[IDX_GC6H6I] + - k[8286]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] - - k[8287]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] + - k[8375]*y_cur[IDX_GH2I]*y_cur[IDX_GC2HI] + - k[8396]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] + - k[8478]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] + - k[8575]*y_cur[IDX_GC2HI]*y_cur[IDX_GCH4I] - - k[8588]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I]; - ydot[yistart + IDX_GC2H3I] = 0.0 + k[6912]*y_cur[IDX_C2H3I] - - k[7094]*y_cur[IDX_GC2H3I] - k[7276]*y_cur[IDX_GC2H3I] - - k[7458]*y_cur[IDX_GC2H3I] - k[7652]*y_cur[IDX_GC2H3I] - - k[7653]*y_cur[IDX_GC2H3I] - k[7654]*y_cur[IDX_GC2H3I] - - k[7655]*y_cur[IDX_GC2H3I] - k[7656]*y_cur[IDX_GC2H3I] - - k[7657]*y_cur[IDX_GC2H3I] - k[7658]*y_cur[IDX_GC2H3I] - - k[7659]*y_cur[IDX_GC2H3I] - k[7660]*y_cur[IDX_GC2H3I] - - k[7661]*y_cur[IDX_GC2H3I] - k[7662]*y_cur[IDX_GC2H3I] - - k[7663]*y_cur[IDX_GC2H3I] - k[7664]*y_cur[IDX_GC2H3I] + - k[7670]*y_cur[IDX_GC2H4I] + k[7676]*y_cur[IDX_GC2H5I] + - k[7679]*y_cur[IDX_GC2H5I] + k[7722]*y_cur[IDX_GCH2CCH2I] + - k[7730]*y_cur[IDX_GCH3CCHI] + k[7804]*y_cur[IDX_GCH2CHCNI] + - k[7811]*y_cur[IDX_GC2H5CNI] - k[7939]*y_cur[IDX_GC2H3I] - - k[7940]*y_cur[IDX_GC2H3I] - k[7941]*y_cur[IDX_GC2H3I] - - k[7942]*y_cur[IDX_GC2H3I] - k[7943]*y_cur[IDX_GC2H3I] - - k[7944]*y_cur[IDX_GC2H3I] - k[7945]*y_cur[IDX_GC2H3I] - - k[7946]*y_cur[IDX_GC2H3I] - k[7947]*y_cur[IDX_GC2H3I] - - k[7948]*y_cur[IDX_GC2H3I] - k[7949]*y_cur[IDX_GC2H3I] - - k[7950]*y_cur[IDX_GC2H3I] - k[7951]*y_cur[IDX_GC2H3I] + - k[7957]*y_cur[IDX_GC2H4I] + k[7963]*y_cur[IDX_GC2H5I] + - k[7966]*y_cur[IDX_GC2H5I] + k[8030]*y_cur[IDX_GCH2CCH2I] + - k[8039]*y_cur[IDX_GCH3CCHI] + k[8131]*y_cur[IDX_GCH2CHCNI] + - k[8140]*y_cur[IDX_GC2H5CNI] + - k[8287]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] - - k[8288]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] + - k[8405]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - - k[8413]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] + - k[8482]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - - k[8489]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - - k[8490]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - - k[8589]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] - - k[8665]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] - - k[8722]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - - k[8723]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; - ydot[yistart + IDX_GC2H4I] = 0.0 + k[6917]*y_cur[IDX_C2H4I] - - k[7099]*y_cur[IDX_GC2H4I] - k[7281]*y_cur[IDX_GC2H4I] - - k[7463]*y_cur[IDX_GC2H4I] - k[7667]*y_cur[IDX_GC2H4I] - - k[7668]*y_cur[IDX_GC2H4I] - k[7669]*y_cur[IDX_GC2H4I] - - k[7670]*y_cur[IDX_GC2H4I] - k[7671]*y_cur[IDX_GC2H4I] - - k[7672]*y_cur[IDX_GC2H4I] - k[7673]*y_cur[IDX_GC2H4I] - - k[7674]*y_cur[IDX_GC2H4I] + k[7680]*y_cur[IDX_GC2H5I] + - k[7687]*y_cur[IDX_GC2H6I] + k[7688]*y_cur[IDX_GC2H6I] + - k[7740]*y_cur[IDX_GCH3CHCH2I] + k[7885]*y_cur[IDX_GC2H4CNI] - - k[7954]*y_cur[IDX_GC2H4I] - k[7955]*y_cur[IDX_GC2H4I] - - k[7956]*y_cur[IDX_GC2H4I] - k[7957]*y_cur[IDX_GC2H4I] - - k[7958]*y_cur[IDX_GC2H4I] - k[7959]*y_cur[IDX_GC2H4I] - - k[7960]*y_cur[IDX_GC2H4I] - k[7961]*y_cur[IDX_GC2H4I] + - k[7967]*y_cur[IDX_GC2H5I] + k[7977]*y_cur[IDX_GC2H6I] + - k[7978]*y_cur[IDX_GC2H6I] + k[8051]*y_cur[IDX_GCH3CHCH2I] + - k[8288]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] - - k[8289]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] + - k[8484]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] + - k[8531]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - - k[8590]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I]; - ydot[yistart + IDX_GC2H4CNI] = 0.0 + k[7011]*y_cur[IDX_C2H4CNI] - - k[7193]*y_cur[IDX_GC2H4CNI] - k[7375]*y_cur[IDX_GC2H4CNI] - - k[7557]*y_cur[IDX_GC2H4CNI] - k[7885]*y_cur[IDX_GC2H4CNI] + - k[8344]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI] - - k[8345]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI] - - k[8635]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI]; - ydot[yistart + IDX_GC2H5I] = 0.0 + k[6922]*y_cur[IDX_C2H5I] - - k[7104]*y_cur[IDX_GC2H5I] - k[7286]*y_cur[IDX_GC2H5I] - - k[7468]*y_cur[IDX_GC2H5I] - k[7676]*y_cur[IDX_GC2H5I] - - k[7677]*y_cur[IDX_GC2H5I] - k[7678]*y_cur[IDX_GC2H5I] - - k[7679]*y_cur[IDX_GC2H5I] - k[7680]*y_cur[IDX_GC2H5I] - - k[7681]*y_cur[IDX_GC2H5I] + k[7689]*y_cur[IDX_GC2H6I] + - k[7772]*y_cur[IDX_GC2H5OHI] + k[7773]*y_cur[IDX_GC2H5OHI] + - k[7809]*y_cur[IDX_GC2H5CNI] - k[7963]*y_cur[IDX_GC2H5I] - - k[7964]*y_cur[IDX_GC2H5I] - k[7965]*y_cur[IDX_GC2H5I] - - k[7966]*y_cur[IDX_GC2H5I] - k[7967]*y_cur[IDX_GC2H5I] - - k[7968]*y_cur[IDX_GC2H5I] + k[7979]*y_cur[IDX_GC2H6I] + - k[8092]*y_cur[IDX_GC2H5OHI] + k[8093]*y_cur[IDX_GC2H5OHI] + - k[8138]*y_cur[IDX_GC2H5CNI] + - k[8289]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] - - k[8290]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] + - k[8291]*y_cur[IDX_GHI]*y_cur[IDX_GC2H6I] + - k[8532]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] - - k[8591]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I]; - ydot[yistart + IDX_GC2H5CNI] = 0.0 + k[7013]*y_cur[IDX_C2H5CNI] - - k[7195]*y_cur[IDX_GC2H5CNI] - k[7377]*y_cur[IDX_GC2H5CNI] - - k[7561]*y_cur[IDX_GC2H5CNI] - k[7809]*y_cur[IDX_GC2H5CNI] - - k[7810]*y_cur[IDX_GC2H5CNI] - k[7811]*y_cur[IDX_GC2H5CNI] - - k[7812]*y_cur[IDX_GC2H5CNI] - k[8138]*y_cur[IDX_GC2H5CNI] - - k[8139]*y_cur[IDX_GC2H5CNI] - k[8140]*y_cur[IDX_GC2H5CNI] - - k[8141]*y_cur[IDX_GC2H5CNI] + - k[8345]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI]; - ydot[yistart + IDX_GC2H5OHI] = 0.0 + k[6987]*y_cur[IDX_C2H5OHI] - - k[7169]*y_cur[IDX_GC2H5OHI] - k[7351]*y_cur[IDX_GC2H5OHI] - - k[7533]*y_cur[IDX_GC2H5OHI] - k[7772]*y_cur[IDX_GC2H5OHI] - - k[7773]*y_cur[IDX_GC2H5OHI] - k[7774]*y_cur[IDX_GC2H5OHI] - - k[8092]*y_cur[IDX_GC2H5OHI] - k[8093]*y_cur[IDX_GC2H5OHI] - - k[8094]*y_cur[IDX_GC2H5OHI] + - k[8546]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] + - k[8557]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] + - k[8571]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI]; - ydot[yistart + IDX_GC2H6I] = 0.0 + k[6923]*y_cur[IDX_C2H6I] - - k[7105]*y_cur[IDX_GC2H6I] - k[7287]*y_cur[IDX_GC2H6I] - - k[7469]*y_cur[IDX_GC2H6I] - k[7687]*y_cur[IDX_GC2H6I] - - k[7688]*y_cur[IDX_GC2H6I] - k[7689]*y_cur[IDX_GC2H6I] - - k[7977]*y_cur[IDX_GC2H6I] - k[7978]*y_cur[IDX_GC2H6I] - - k[7979]*y_cur[IDX_GC2H6I] + k[8290]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] - - k[8291]*y_cur[IDX_GHI]*y_cur[IDX_GC2H6I] + - k[8542]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] + - k[8548]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI]; - ydot[yistart + IDX_GC2NI] = 0.0 + k[6947]*y_cur[IDX_C2NI] - - k[7129]*y_cur[IDX_GC2NI] - k[7311]*y_cur[IDX_GC2NI] - - k[7493]*y_cur[IDX_GC2NI] - k[7717]*y_cur[IDX_GC2NI] - - k[7718]*y_cur[IDX_GC2NI] + k[7886]*y_cur[IDX_GHCCNI] - - k[8024]*y_cur[IDX_GC2NI] - k[8025]*y_cur[IDX_GC2NI] + - k[8127]*y_cur[IDX_GNCCNI] - k[8321]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] - + k[8412]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - - k[8418]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] + - k[8462]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - - k[8616]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] - - k[8669]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI]; - ydot[yistart + IDX_GC2OI] = 0.0 + k[6954]*y_cur[IDX_C2OI] - - k[7136]*y_cur[IDX_GC2OI] - k[7318]*y_cur[IDX_GC2OI] - - k[7500]*y_cur[IDX_GC2OI] - k[7727]*y_cur[IDX_GC2OI] - - k[7728]*y_cur[IDX_GC2OI] - k[8035]*y_cur[IDX_GC2OI] - - k[8036]*y_cur[IDX_GC2OI] - k[8324]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - - k[8419]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] + - k[8445]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - - k[8619]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - - k[8670]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI]; - ydot[yistart + IDX_GC2SI] = 0.0 + k[7015]*y_cur[IDX_C2SI] - - k[7197]*y_cur[IDX_GC2SI] - k[7379]*y_cur[IDX_GC2SI] - - k[7563]*y_cur[IDX_GC2SI] - k[7815]*y_cur[IDX_GC2SI] - - k[7816]*y_cur[IDX_GC2SI] - k[8144]*y_cur[IDX_GC2SI] - - k[8422]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI] - - k[8673]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI]; - ydot[yistart + IDX_GC3I] = 0.0 + k[6943]*y_cur[IDX_C3I] - - k[7125]*y_cur[IDX_GC3I] - k[7307]*y_cur[IDX_GC3I] - - k[7489]*y_cur[IDX_GC3I] - k[7712]*y_cur[IDX_GC3I] + - k[7714]*y_cur[IDX_GC3HI] + k[7784]*y_cur[IDX_GC4I] + - k[7822]*y_cur[IDX_GC5I] + k[7833]*y_cur[IDX_GC5HI] + - k[7836]*y_cur[IDX_GC4NI] + k[7850]*y_cur[IDX_GC6HI] + - k[7860]*y_cur[IDX_GC4SI] - k[8017]*y_cur[IDX_GC3I] + - k[8020]*y_cur[IDX_GC3HI] + k[8022]*y_cur[IDX_GH2CCCI] + - k[8108]*y_cur[IDX_GC4I] + k[8149]*y_cur[IDX_GC5I] + - k[8157]*y_cur[IDX_GC5HI] + k[8160]*y_cur[IDX_GC4NI] + - k[8181]*y_cur[IDX_GC6HI] + k[8191]*y_cur[IDX_GC4PI] + - k[8192]*y_cur[IDX_GC4SI] + k[8194]*y_cur[IDX_GC7I] + - k[8229]*y_cur[IDX_GC10I] + k[8239]*y_cur[IDX_GC10HI] + - k[8240]*y_cur[IDX_GC10HI] + k[8245]*y_cur[IDX_GC10HI] + - k[8250]*y_cur[IDX_GC10H2I] + k[8255]*y_cur[IDX_GC11I] + - k[8255]*y_cur[IDX_GC11I] + k[8258]*y_cur[IDX_GC11I] + - k[8262]*y_cur[IDX_GC11I] - k[8315]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - - k[8377]*y_cur[IDX_GH2I]*y_cur[IDX_GC3I] + - k[8410]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - - k[8416]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - - k[8451]*y_cur[IDX_GOI]*y_cur[IDX_GC3I] - - k[8465]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - - k[8491]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I] - - k[8610]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - - k[8667]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - - k[8695]*y_cur[IDX_GOI]*y_cur[IDX_GC3I] - - k[8705]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - - k[8724]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I]; - ydot[yistart + IDX_GC3HI] = 0.0 + k[6945]*y_cur[IDX_C3HI] - - k[7127]*y_cur[IDX_GC3HI] - k[7309]*y_cur[IDX_GC3HI] - - k[7491]*y_cur[IDX_GC3HI] - k[7714]*y_cur[IDX_GC3HI] + - k[7715]*y_cur[IDX_GC3H2I] + k[7716]*y_cur[IDX_GH2CCCI] + - k[7720]*y_cur[IDX_GCH2CCHI] + k[7834]*y_cur[IDX_GC5HI] + - k[7837]*y_cur[IDX_GC5H2I] + k[7850]*y_cur[IDX_GC6HI] - - k[8020]*y_cur[IDX_GC3HI] + k[8021]*y_cur[IDX_GC3H2I] + - k[8023]*y_cur[IDX_GH2CCCI] + k[8027]*y_cur[IDX_GCH2CCHI] + - k[8158]*y_cur[IDX_GC5HI] + k[8162]*y_cur[IDX_GC5H2I] + - k[8181]*y_cur[IDX_GC6HI] + k[8315]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - - k[8316]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] + - k[8377]*y_cur[IDX_GH2I]*y_cur[IDX_GC3I] - - k[8378]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] - - k[8379]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] + - k[8411]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - - k[8417]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - - k[8466]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI] + - k[8486]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I] - - k[8492]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI] - - k[8611]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] - - k[8668]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - - k[8706]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI] - - k[8725]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI]; - ydot[yistart + IDX_GC3H2I] = 0.0 + k[6948]*y_cur[IDX_C3H2I] - - k[7130]*y_cur[IDX_GC3H2I] - k[7312]*y_cur[IDX_GC3H2I] - - k[7494]*y_cur[IDX_GC3H2I] - k[7715]*y_cur[IDX_GC3H2I] + - k[7719]*y_cur[IDX_GCH2CCHI] - k[8021]*y_cur[IDX_GC3H2I] + - k[8026]*y_cur[IDX_GCH2CCHI] + - k[8316]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] - - k[8317]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] + - k[8379]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] + - k[8487]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI] - - k[8612]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I]; - ydot[yistart + IDX_GC3NI] = 0.0 + k[6997]*y_cur[IDX_C3NI] - - k[7179]*y_cur[IDX_GC3NI] - k[7361]*y_cur[IDX_GC3NI] - - k[7543]*y_cur[IDX_GC3NI] - k[7790]*y_cur[IDX_GC3NI] + - k[7844]*y_cur[IDX_GCH3C3NI] - k[8114]*y_cur[IDX_GC3NI] + - k[8122]*y_cur[IDX_GHNC3I] + k[8171]*y_cur[IDX_GCH3C3NI] - - k[8343]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] + - k[8418]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] + - k[8465]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - - k[8552]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI] - - k[8633]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] - - k[8756]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI]; - ydot[yistart + IDX_GC3OI] = 0.0 + k[7006]*y_cur[IDX_C3OI] - - k[7188]*y_cur[IDX_GC3OI] - k[7370]*y_cur[IDX_GC3OI] - - k[7552]*y_cur[IDX_GC3OI] - k[7803]*y_cur[IDX_GC3OI] - - k[8130]*y_cur[IDX_GC3OI] + k[8419]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] + - k[8451]*y_cur[IDX_GOI]*y_cur[IDX_GC3I]; - ydot[yistart + IDX_GC3PI] = 0.0 + k[7039]*y_cur[IDX_C3PI] - - k[7221]*y_cur[IDX_GC3PI] - k[7403]*y_cur[IDX_GC3PI] - - k[7585]*y_cur[IDX_GC3PI] - k[7847]*y_cur[IDX_GC3PI] + - k[7859]*y_cur[IDX_GC4PI] - k[8176]*y_cur[IDX_GC3PI]; - ydot[yistart + IDX_GC3SI] = 0.0 + k[7040]*y_cur[IDX_C3SI] - - k[7222]*y_cur[IDX_GC3SI] - k[7404]*y_cur[IDX_GC3SI] - - k[7586]*y_cur[IDX_GC3SI] - k[7848]*y_cur[IDX_GC3SI] - - k[8177]*y_cur[IDX_GC3SI] + k[8422]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI]; - ydot[yistart + IDX_GC4I] = 0.0 + k[6995]*y_cur[IDX_C4I] - - k[7177]*y_cur[IDX_GC4I] - k[7359]*y_cur[IDX_GC4I] - - k[7541]*y_cur[IDX_GC4I] - k[7783]*y_cur[IDX_GC4I] - - k[7784]*y_cur[IDX_GC4I] + k[7789]*y_cur[IDX_GC4HI] + - k[7823]*y_cur[IDX_GC5I] + k[7851]*y_cur[IDX_GC6HI] + - k[7854]*y_cur[IDX_GC5NI] - k[8107]*y_cur[IDX_GC4I] - - k[8108]*y_cur[IDX_GC4I] + k[8113]*y_cur[IDX_GC4HI] + - k[8161]*y_cur[IDX_GC4NI] + k[8179]*y_cur[IDX_GC6I] + - k[8182]*y_cur[IDX_GC6HI] + k[8186]*y_cur[IDX_GC5NI] + - k[8189]*y_cur[IDX_GSiC4I] + k[8194]*y_cur[IDX_GC7I] + - k[8230]*y_cur[IDX_GC10I] + k[8257]*y_cur[IDX_GC11I] + - k[8261]*y_cur[IDX_GC11I] - k[8339]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - - k[8380]*y_cur[IDX_GH2I]*y_cur[IDX_GC4I] + - k[8416]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - - k[8420]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - - k[8493]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I] - - k[8629]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - - k[8671]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - - k[8726]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I]; - ydot[yistart + IDX_GC4HI] = 0.0 + k[6996]*y_cur[IDX_C4HI] - - k[7178]*y_cur[IDX_GC4HI] - k[7360]*y_cur[IDX_GC4HI] - - k[7542]*y_cur[IDX_GC4HI] - k[7788]*y_cur[IDX_GC4HI] - - k[7789]*y_cur[IDX_GC4HI] + k[7792]*y_cur[IDX_GC4H2I] + - k[7794]*y_cur[IDX_GC4H2I] + k[7795]*y_cur[IDX_GC4H3I] + - k[7841]*y_cur[IDX_GCH3C4HI] + k[7853]*y_cur[IDX_GC6H2I] + - k[7855]*y_cur[IDX_GHC5NI] - k[8112]*y_cur[IDX_GC4HI] - - k[8113]*y_cur[IDX_GC4HI] + k[8116]*y_cur[IDX_GC4H2I] + - k[8118]*y_cur[IDX_GC4H2I] + k[8119]*y_cur[IDX_GC4H3I] + - k[8167]*y_cur[IDX_GCH3C4HI] + k[8187]*y_cur[IDX_GHC5NI] + - k[8339]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - - k[8340]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] + - k[8380]*y_cur[IDX_GH2I]*y_cur[IDX_GC4I] - - k[8381]*y_cur[IDX_GH2I]*y_cur[IDX_GC4HI] + - k[8417]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - - k[8421]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] + - k[8491]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I] - - k[8494]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI] - - k[8630]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] - - k[8672]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] - - k[8727]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI]; - ydot[yistart + IDX_GC4H2I] = 0.0 + k[6998]*y_cur[IDX_C4H2I] - - k[7180]*y_cur[IDX_GC4H2I] - k[7362]*y_cur[IDX_GC4H2I] - - k[7544]*y_cur[IDX_GC4H2I] - k[7791]*y_cur[IDX_GC4H2I] - - k[7792]*y_cur[IDX_GC4H2I] - k[7793]*y_cur[IDX_GC4H2I] - - k[7794]*y_cur[IDX_GC4H2I] - k[8115]*y_cur[IDX_GC4H2I] - - k[8116]*y_cur[IDX_GC4H2I] - k[8117]*y_cur[IDX_GC4H2I] - - k[8118]*y_cur[IDX_GC4H2I] + k[8120]*y_cur[IDX_GC4H3I] + - k[8340]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] - - k[8341]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I] + - k[8381]*y_cur[IDX_GH2I]*y_cur[IDX_GC4HI] + - k[8492]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI] - - k[8631]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I]; - ydot[yistart + IDX_GC4H3I] = 0.0 + k[7002]*y_cur[IDX_C4H3I] - - k[7184]*y_cur[IDX_GC4H3I] - k[7366]*y_cur[IDX_GC4H3I] - - k[7548]*y_cur[IDX_GC4H3I] - k[7795]*y_cur[IDX_GC4H3I] - - k[8119]*y_cur[IDX_GC4H3I] - k[8120]*y_cur[IDX_GC4H3I] + - k[8341]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I] - - k[8342]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I] - - k[8632]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I]; - ydot[yistart + IDX_GC4H6I] = 0.0 + k[7009]*y_cur[IDX_C4H6I] - - k[7191]*y_cur[IDX_GC4H6I] - k[7373]*y_cur[IDX_GC4H6I] - - k[7555]*y_cur[IDX_GC4H6I] - k[7807]*y_cur[IDX_GC4H6I] - - k[8136]*y_cur[IDX_GC4H6I]; - ydot[yistart + IDX_GC4NI] = 0.0 + k[7030]*y_cur[IDX_C4NI] - - k[7212]*y_cur[IDX_GC4NI] - k[7394]*y_cur[IDX_GC4NI] - - k[7576]*y_cur[IDX_GC4NI] - k[7836]*y_cur[IDX_GC4NI] - - k[8160]*y_cur[IDX_GC4NI] - k[8161]*y_cur[IDX_GC4NI]; - ydot[yistart + IDX_GC4PI] = 0.0 + k[7048]*y_cur[IDX_C4PI] - - k[7230]*y_cur[IDX_GC4PI] - k[7412]*y_cur[IDX_GC4PI] - - k[7594]*y_cur[IDX_GC4PI] - k[7859]*y_cur[IDX_GC4PI] - - k[8191]*y_cur[IDX_GC4PI]; - ydot[yistart + IDX_GC4SI] = 0.0 + k[7049]*y_cur[IDX_C4SI] - - k[7231]*y_cur[IDX_GC4SI] - k[7413]*y_cur[IDX_GC4SI] - - k[7595]*y_cur[IDX_GC4SI] - k[7860]*y_cur[IDX_GC4SI] - - k[8192]*y_cur[IDX_GC4SI]; - ydot[yistart + IDX_GC5I] = 0.0 + k[7024]*y_cur[IDX_C5I] - - k[7206]*y_cur[IDX_GC5I] - k[7388]*y_cur[IDX_GC5I] - - k[7572]*y_cur[IDX_GC5I] - k[7822]*y_cur[IDX_GC5I] - - k[7823]*y_cur[IDX_GC5I] + k[7835]*y_cur[IDX_GC5HI] + - k[7849]*y_cur[IDX_GC6I] - k[8149]*y_cur[IDX_GC5I] + - k[8159]*y_cur[IDX_GC5HI] + k[8178]*y_cur[IDX_GC6I] + - k[8180]*y_cur[IDX_GC6I] + k[8195]*y_cur[IDX_GC7I] + - k[8237]*y_cur[IDX_GC10HI] + k[8237]*y_cur[IDX_GC10HI] + - k[8238]*y_cur[IDX_GC10HI] + k[8244]*y_cur[IDX_GC10HI] + - k[8255]*y_cur[IDX_GC11I] + k[8256]*y_cur[IDX_GC11I] + - k[8260]*y_cur[IDX_GC11I] - k[8350]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - - k[8382]*y_cur[IDX_GH2I]*y_cur[IDX_GC5I] + - k[8420]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - - k[8423]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - - k[8467]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - - k[8495]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I] - - k[8636]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - - k[8674]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - - k[8707]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - - k[8728]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I]; - ydot[yistart + IDX_GC5HI] = 0.0 + k[7028]*y_cur[IDX_C5HI] - - k[7210]*y_cur[IDX_GC5HI] - k[7392]*y_cur[IDX_GC5HI] - - k[7574]*y_cur[IDX_GC5HI] - k[7833]*y_cur[IDX_GC5HI] - - k[7834]*y_cur[IDX_GC5HI] - k[7835]*y_cur[IDX_GC5HI] + - k[7838]*y_cur[IDX_GC5H2I] - k[8157]*y_cur[IDX_GC5HI] - - k[8158]*y_cur[IDX_GC5HI] - k[8159]*y_cur[IDX_GC5HI] + - k[8163]*y_cur[IDX_GC5H2I] + k[8238]*y_cur[IDX_GC10HI] + - k[8244]*y_cur[IDX_GC10HI] + k[8350]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - - k[8351]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] + - k[8382]*y_cur[IDX_GH2I]*y_cur[IDX_GC5I] - - k[8383]*y_cur[IDX_GH2I]*y_cur[IDX_GC5HI] + - k[8421]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] - - k[8424]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - - k[8468]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI] + - k[8493]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I] - - k[8496]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI] - - k[8637]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] - - k[8675]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - - k[8708]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI] - - k[8729]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI]; - ydot[yistart + IDX_GC5H2I] = 0.0 + k[7029]*y_cur[IDX_C5H2I] - - k[7211]*y_cur[IDX_GC5H2I] - k[7393]*y_cur[IDX_GC5H2I] - - k[7575]*y_cur[IDX_GC5H2I] - k[7837]*y_cur[IDX_GC5H2I] - - k[7838]*y_cur[IDX_GC5H2I] - k[8162]*y_cur[IDX_GC5H2I] - - k[8163]*y_cur[IDX_GC5H2I] + k[8351]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] - + k[8383]*y_cur[IDX_GH2I]*y_cur[IDX_GC5HI] + - k[8494]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI]; - ydot[yistart + IDX_GC5NI] = 0.0 + k[7044]*y_cur[IDX_C5NI] - - k[7226]*y_cur[IDX_GC5NI] - k[7408]*y_cur[IDX_GC5NI] - - k[7590]*y_cur[IDX_GC5NI] - k[7854]*y_cur[IDX_GC5NI] + - k[7856]*y_cur[IDX_GHC5NI] + k[7865]*y_cur[IDX_GCH3C5NI] - - k[8186]*y_cur[IDX_GC5NI] + k[8188]*y_cur[IDX_GHC5NI] + - k[8204]*y_cur[IDX_GCH3C5NI] + k[8212]*y_cur[IDX_GC7NI] - - k[8354]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] + - k[8467]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - - k[8553]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI] - - k[8640]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] - - k[8757]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI]; - ydot[yistart + IDX_GC6I] = 0.0 + k[7041]*y_cur[IDX_C6I] - - k[7223]*y_cur[IDX_GC6I] - k[7405]*y_cur[IDX_GC6I] - - k[7587]*y_cur[IDX_GC6I] - k[7849]*y_cur[IDX_GC6I] + - k[7852]*y_cur[IDX_GC6HI] + k[7861]*y_cur[IDX_GC7I] + - k[7868]*y_cur[IDX_GC7NI] - k[8178]*y_cur[IDX_GC6I] - - k[8179]*y_cur[IDX_GC6I] - k[8180]*y_cur[IDX_GC6I] + - k[8184]*y_cur[IDX_GC6H2I] + k[8193]*y_cur[IDX_GC7I] + - k[8196]*y_cur[IDX_GC7I] + k[8206]*y_cur[IDX_GC8I] + - k[8211]*y_cur[IDX_GC7NI] + k[8229]*y_cur[IDX_GC10I] + - k[8230]*y_cur[IDX_GC10I] + k[8256]*y_cur[IDX_GC11I] + - k[8260]*y_cur[IDX_GC11I] - k[8352]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - - k[8384]*y_cur[IDX_GH2I]*y_cur[IDX_GC6I] + - k[8423]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - - k[8425]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - - k[8497]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I] - - k[8638]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - - k[8676]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - - k[8730]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I]; - ydot[yistart + IDX_GC6HI] = 0.0 + k[7042]*y_cur[IDX_C6HI] - - k[7224]*y_cur[IDX_GC6HI] - k[7406]*y_cur[IDX_GC6HI] - - k[7588]*y_cur[IDX_GC6HI] - k[7850]*y_cur[IDX_GC6HI] - - k[7851]*y_cur[IDX_GC6HI] - k[7852]*y_cur[IDX_GC6HI] + - k[7864]*y_cur[IDX_GCH3C6HI] + k[7870]*y_cur[IDX_GHC7NI] - - k[8181]*y_cur[IDX_GC6HI] - k[8182]*y_cur[IDX_GC6HI] + - k[8183]*y_cur[IDX_GC6H2I] + k[8185]*y_cur[IDX_GC6H2I] + - k[8198]*y_cur[IDX_GC7HI] + k[8203]*y_cur[IDX_GCH3C6HI] + - k[8216]*y_cur[IDX_GHC7NI] + k[8217]*y_cur[IDX_GHC7NI] + - k[8352]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - - k[8353]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] + - k[8384]*y_cur[IDX_GH2I]*y_cur[IDX_GC6I] - - k[8385]*y_cur[IDX_GH2I]*y_cur[IDX_GC6HI] + - k[8424]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - - k[8426]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] + - k[8495]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I] - - k[8498]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI] - - k[8639]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] - - k[8677]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] - - k[8731]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI]; - ydot[yistart + IDX_GC6H2I] = 0.0 + k[7043]*y_cur[IDX_C6H2I] - - k[7225]*y_cur[IDX_GC6H2I] - k[7407]*y_cur[IDX_GC6H2I] - - k[7589]*y_cur[IDX_GC6H2I] - k[7853]*y_cur[IDX_GC6H2I] + - k[7858]*y_cur[IDX_GC6H6I] - k[8183]*y_cur[IDX_GC6H2I] - - k[8184]*y_cur[IDX_GC6H2I] - k[8185]*y_cur[IDX_GC6H2I] + - k[8353]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] + - k[8385]*y_cur[IDX_GH2I]*y_cur[IDX_GC6HI] + - k[8496]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI]; - ydot[yistart + IDX_GC6H6I] = 0.0 + k[7047]*y_cur[IDX_C6H6I] - - k[7229]*y_cur[IDX_GC6H6I] - k[7411]*y_cur[IDX_GC6H6I] - - k[7593]*y_cur[IDX_GC6H6I] - k[7858]*y_cur[IDX_GC6H6I] - - k[8190]*y_cur[IDX_GC6H6I]; - ydot[yistart + IDX_GC7I] = 0.0 + k[7050]*y_cur[IDX_C7I] - - k[7232]*y_cur[IDX_GC7I] - k[7414]*y_cur[IDX_GC7I] - - k[7596]*y_cur[IDX_GC7I] - k[7861]*y_cur[IDX_GC7I] + - k[7862]*y_cur[IDX_GC7HI] + k[7866]*y_cur[IDX_GC8I] - - k[8193]*y_cur[IDX_GC7I] - k[8194]*y_cur[IDX_GC7I] - - k[8195]*y_cur[IDX_GC7I] - k[8196]*y_cur[IDX_GC7I] + - k[8197]*y_cur[IDX_GC7HI] + k[8199]*y_cur[IDX_GC7HI] + - k[8201]*y_cur[IDX_GC7H2I] + k[8205]*y_cur[IDX_GC8I] + - k[8207]*y_cur[IDX_GC8I] + k[8220]*y_cur[IDX_GC9I] + - k[8231]*y_cur[IDX_GC10I] + k[8239]*y_cur[IDX_GC10HI] + - k[8257]*y_cur[IDX_GC11I] + k[8261]*y_cur[IDX_GC11I] - - k[8355]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - - k[8386]*y_cur[IDX_GH2I]*y_cur[IDX_GC7I] + - k[8425]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - - k[8427]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - - k[8469]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - - k[8499]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I] - - k[8641]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - - k[8678]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - - k[8709]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - - k[8732]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I]; - ydot[yistart + IDX_GC7HI] = 0.0 + k[7051]*y_cur[IDX_C7HI] - - k[7233]*y_cur[IDX_GC7HI] - k[7415]*y_cur[IDX_GC7HI] - - k[7597]*y_cur[IDX_GC7HI] - k[7862]*y_cur[IDX_GC7HI] + - k[7863]*y_cur[IDX_GC7H2I] - k[8197]*y_cur[IDX_GC7HI] - - k[8198]*y_cur[IDX_GC7HI] - k[8199]*y_cur[IDX_GC7HI] + - k[8200]*y_cur[IDX_GC7H2I] + k[8202]*y_cur[IDX_GC7H2I] + - k[8209]*y_cur[IDX_GC8HI] + k[8240]*y_cur[IDX_GC10HI] + - k[8245]*y_cur[IDX_GC10HI] + k[8250]*y_cur[IDX_GC10H2I] + - k[8355]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - - k[8356]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] + - k[8386]*y_cur[IDX_GH2I]*y_cur[IDX_GC7I] - - k[8387]*y_cur[IDX_GH2I]*y_cur[IDX_GC7HI] + - k[8426]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] - - k[8428]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - - k[8470]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI] + - k[8497]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I] - - k[8500]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI] - - k[8642]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] - - k[8679]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - - k[8710]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI] - - k[8733]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI]; - ydot[yistart + IDX_GC7H2I] = 0.0 + k[7052]*y_cur[IDX_C7H2I] - - k[7234]*y_cur[IDX_GC7H2I] - k[7416]*y_cur[IDX_GC7H2I] - - k[7598]*y_cur[IDX_GC7H2I] - k[7863]*y_cur[IDX_GC7H2I] - - k[8200]*y_cur[IDX_GC7H2I] - k[8201]*y_cur[IDX_GC7H2I] - - k[8202]*y_cur[IDX_GC7H2I] + k[8356]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] - + k[8387]*y_cur[IDX_GH2I]*y_cur[IDX_GC7HI] + - k[8498]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI]; - ydot[yistart + IDX_GC7NI] = 0.0 + k[7057]*y_cur[IDX_C7NI] - - k[7239]*y_cur[IDX_GC7NI] - k[7421]*y_cur[IDX_GC7NI] - - k[7603]*y_cur[IDX_GC7NI] - k[7868]*y_cur[IDX_GC7NI] + - k[7874]*y_cur[IDX_GCH3C7NI] - k[8211]*y_cur[IDX_GC7NI] - - k[8212]*y_cur[IDX_GC7NI] + k[8218]*y_cur[IDX_GHC7NI] + - k[8228]*y_cur[IDX_GCH3C7NI] + k[8247]*y_cur[IDX_GC9NI] - - k[8359]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] + - k[8469]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - - k[8554]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI] - - k[8645]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] - - k[8758]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI]; - ydot[yistart + IDX_GC8I] = 0.0 + k[7055]*y_cur[IDX_C8I] - - k[7237]*y_cur[IDX_GC8I] - k[7419]*y_cur[IDX_GC8I] - - k[7601]*y_cur[IDX_GC8I] - k[7866]*y_cur[IDX_GC8I] + - k[7867]*y_cur[IDX_GC8HI] + k[7871]*y_cur[IDX_GC9I] + - k[7877]*y_cur[IDX_GC9NI] - k[8205]*y_cur[IDX_GC8I] - - k[8206]*y_cur[IDX_GC8I] - k[8207]*y_cur[IDX_GC8I] + - k[8208]*y_cur[IDX_GC8HI] + k[8210]*y_cur[IDX_GC8HI] + - k[8214]*y_cur[IDX_GC8H2I] + k[8219]*y_cur[IDX_GC9I] + - k[8221]*y_cur[IDX_GC9I] + k[8232]*y_cur[IDX_GC10I] + - k[8234]*y_cur[IDX_GC10I] + k[8241]*y_cur[IDX_GC10HI] + - k[8246]*y_cur[IDX_GC9NI] + k[8258]*y_cur[IDX_GC11I] + - k[8262]*y_cur[IDX_GC11I] - k[8357]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - - k[8388]*y_cur[IDX_GH2I]*y_cur[IDX_GC8I] + - k[8427]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - - k[8429]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - - k[8501]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I] - - k[8643]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - - k[8680]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - - k[8734]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I]; - ydot[yistart + IDX_GC8HI] = 0.0 + k[7056]*y_cur[IDX_C8HI] - - k[7238]*y_cur[IDX_GC8HI] - k[7420]*y_cur[IDX_GC8HI] - - k[7602]*y_cur[IDX_GC8HI] - k[7867]*y_cur[IDX_GC8HI] + - k[7869]*y_cur[IDX_GC8H2I] + k[7879]*y_cur[IDX_GHC9NI] - - k[8208]*y_cur[IDX_GC8HI] - k[8209]*y_cur[IDX_GC8HI] - - k[8210]*y_cur[IDX_GC8HI] + k[8213]*y_cur[IDX_GC8H2I] + - k[8215]*y_cur[IDX_GC8H2I] + k[8223]*y_cur[IDX_GC9HI] + - k[8252]*y_cur[IDX_GHC9NI] + k[8253]*y_cur[IDX_GHC9NI] + - k[8357]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - - k[8358]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] + - k[8388]*y_cur[IDX_GH2I]*y_cur[IDX_GC8I] - - k[8389]*y_cur[IDX_GH2I]*y_cur[IDX_GC8HI] + - k[8428]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - - k[8430]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] + - k[8499]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I] - - k[8502]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI] - - k[8644]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] - - k[8681]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] - - k[8735]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI]; - ydot[yistart + IDX_GC8H2I] = 0.0 + k[7058]*y_cur[IDX_C8H2I] - - k[7240]*y_cur[IDX_GC8H2I] - k[7422]*y_cur[IDX_GC8H2I] - - k[7604]*y_cur[IDX_GC8H2I] - k[7869]*y_cur[IDX_GC8H2I] - - k[8213]*y_cur[IDX_GC8H2I] - k[8214]*y_cur[IDX_GC8H2I] - - k[8215]*y_cur[IDX_GC8H2I] + k[8358]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] - + k[8389]*y_cur[IDX_GH2I]*y_cur[IDX_GC8HI] + - k[8500]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI]; - ydot[yistart + IDX_GC9I] = 0.0 + k[7060]*y_cur[IDX_C9I] - - k[7242]*y_cur[IDX_GC9I] - k[7424]*y_cur[IDX_GC9I] - - k[7606]*y_cur[IDX_GC9I] - k[7871]*y_cur[IDX_GC9I] + - k[7872]*y_cur[IDX_GC9HI] + k[7875]*y_cur[IDX_GC10I] - - k[8219]*y_cur[IDX_GC9I] - k[8220]*y_cur[IDX_GC9I] - - k[8221]*y_cur[IDX_GC9I] + k[8222]*y_cur[IDX_GC9HI] + - k[8224]*y_cur[IDX_GC9HI] + k[8226]*y_cur[IDX_GC9H2I] + - k[8233]*y_cur[IDX_GC10I] + k[8235]*y_cur[IDX_GC10I] + - k[8242]*y_cur[IDX_GC10HI] + k[8259]*y_cur[IDX_GC11I] + - k[8263]*y_cur[IDX_GC11I] - k[8360]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - - k[8390]*y_cur[IDX_GH2I]*y_cur[IDX_GC9I] + - k[8429]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - - k[8431]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - - k[8471]*y_cur[IDX_GNI]*y_cur[IDX_GC9I] - - k[8646]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - - k[8682]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - - k[8711]*y_cur[IDX_GNI]*y_cur[IDX_GC9I]; - ydot[yistart + IDX_GC9HI] = 0.0 + k[7061]*y_cur[IDX_C9HI] - - k[7243]*y_cur[IDX_GC9HI] - k[7425]*y_cur[IDX_GC9HI] - - k[7607]*y_cur[IDX_GC9HI] - k[7872]*y_cur[IDX_GC9HI] + - k[7873]*y_cur[IDX_GC9H2I] - k[8222]*y_cur[IDX_GC9HI] - - k[8223]*y_cur[IDX_GC9HI] - k[8224]*y_cur[IDX_GC9HI] + - k[8225]*y_cur[IDX_GC9H2I] + k[8227]*y_cur[IDX_GC9H2I] + - k[8360]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - - k[8361]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] + - k[8390]*y_cur[IDX_GH2I]*y_cur[IDX_GC9I] - - k[8391]*y_cur[IDX_GH2I]*y_cur[IDX_GC9HI] + - k[8430]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] - - k[8432]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - - k[8472]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI] + - k[8501]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I] - - k[8503]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI] - - k[8647]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] - - k[8683]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - - k[8712]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI] - - k[8736]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI]; - ydot[yistart + IDX_GC9H2I] = 0.0 + k[7062]*y_cur[IDX_C9H2I] - - k[7244]*y_cur[IDX_GC9H2I] - k[7426]*y_cur[IDX_GC9H2I] - - k[7608]*y_cur[IDX_GC9H2I] - k[7873]*y_cur[IDX_GC9H2I] - - k[8225]*y_cur[IDX_GC9H2I] - k[8226]*y_cur[IDX_GC9H2I] - - k[8227]*y_cur[IDX_GC9H2I] + k[8361]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] - + k[8391]*y_cur[IDX_GH2I]*y_cur[IDX_GC9HI] + - k[8502]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI]; - ydot[yistart + IDX_GC9NI] = 0.0 + k[7066]*y_cur[IDX_C9NI] - - k[7248]*y_cur[IDX_GC9NI] - k[7430]*y_cur[IDX_GC9NI] - - k[7612]*y_cur[IDX_GC9NI] - k[7877]*y_cur[IDX_GC9NI] - - k[8246]*y_cur[IDX_GC9NI] - k[8247]*y_cur[IDX_GC9NI] + - k[8254]*y_cur[IDX_GHC9NI] - k[8364]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] - + k[8471]*y_cur[IDX_GNI]*y_cur[IDX_GC9I] - - k[8650]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI]; - ydot[yistart + IDX_GCCPI] = 0.0 + k[7014]*y_cur[IDX_CCPI] - - k[7196]*y_cur[IDX_GCCPI] - k[7378]*y_cur[IDX_GCCPI] - - k[7562]*y_cur[IDX_GCCPI] - k[7813]*y_cur[IDX_GCCPI] - - k[7814]*y_cur[IDX_GCCPI] + k[7817]*y_cur[IDX_GHC2PI] + - k[7847]*y_cur[IDX_GC3PI] - k[8142]*y_cur[IDX_GCCPI] - - k[8143]*y_cur[IDX_GCCPI] + k[8145]*y_cur[IDX_GHC2PI]; - ydot[yistart + IDX_GCClI] = 0.0 + k[6991]*y_cur[IDX_CClI] - - k[7173]*y_cur[IDX_GCClI] - k[7355]*y_cur[IDX_GCClI] - - k[7537]*y_cur[IDX_GCClI] - k[7781]*y_cur[IDX_GCClI] - - k[8105]*y_cur[IDX_GCClI]; - ydot[yistart + IDX_GCHI] = 0.0 + k[6892]*y_cur[IDX_CHI] - - k[7074]*y_cur[IDX_GCHI] - k[7256]*y_cur[IDX_GCHI] - - k[7438]*y_cur[IDX_GCHI] - k[7618]*y_cur[IDX_GCHI] + - k[7619]*y_cur[IDX_GCH2I] + k[7622]*y_cur[IDX_GCH2I] + - k[7626]*y_cur[IDX_GCH3I] + k[7628]*y_cur[IDX_GCH3I] + - k[7629]*y_cur[IDX_GCH3I] + k[7644]*y_cur[IDX_GC2HI] + - k[7648]*y_cur[IDX_GC2H2I] + k[7648]*y_cur[IDX_GC2H2I] + - k[7661]*y_cur[IDX_GC2H3I] + k[7662]*y_cur[IDX_GC2H3I] + - k[7673]*y_cur[IDX_GC2H4I] + k[7700]*y_cur[IDX_GCH3OHI] + - k[7722]*y_cur[IDX_GCH2CCH2I] + k[7730]*y_cur[IDX_GCH3CCHI] + - k[7738]*y_cur[IDX_GHCSiI] + k[7752]*y_cur[IDX_GHCNOI] + - k[7766]*y_cur[IDX_GHCSI] + k[7887]*y_cur[IDX_GHC2OI] - - k[7894]*y_cur[IDX_GCHI] - k[7895]*y_cur[IDX_GCHI] + - k[7896]*y_cur[IDX_GCH2I] + k[7899]*y_cur[IDX_GCH2I] + - k[7903]*y_cur[IDX_GCH3I] + k[7905]*y_cur[IDX_GCH3I] + - k[7906]*y_cur[IDX_GCH3I] + k[7912]*y_cur[IDX_GCH4I] + - k[7931]*y_cur[IDX_GC2HI] + k[7935]*y_cur[IDX_GC2H2I] + - k[7935]*y_cur[IDX_GC2H2I] + k[7948]*y_cur[IDX_GC2H3I] + - k[7949]*y_cur[IDX_GC2H3I] + k[7960]*y_cur[IDX_GC2H4I] + - k[8000]*y_cur[IDX_GCH3OHI] + k[8030]*y_cur[IDX_GCH2CCH2I] + - k[8039]*y_cur[IDX_GCH3CCHI] + k[8048]*y_cur[IDX_GHCSiI] + - k[8066]*y_cur[IDX_GHCNOI] + k[8086]*y_cur[IDX_GHCSI] + - k[8274]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - - k[8275]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - - k[8395]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - - k[8437]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - - k[8455]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] - - k[8473]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - - k[8477]*y_cur[IDX_GCHI]*y_cur[IDX_GHNOI] - - k[8478]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] - - k[8478]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] - - k[8479]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] - - k[8480]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] - - k[8481]*y_cur[IDX_GCHI]*y_cur[IDX_GNOI] - - k[8482]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - - k[8483]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] - - k[8484]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] - - k[8485]*y_cur[IDX_GCHI]*y_cur[IDX_GO2I] - - k[8486]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I] - - k[8487]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI] - - k[8488]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - - k[8489]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - - k[8490]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - - k[8491]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I] - - k[8492]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI] - - k[8493]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I] - - k[8494]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI] - - k[8495]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I] - - k[8496]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI] - - k[8497]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I] - - k[8498]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI] - - k[8499]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I] - - k[8500]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI] - - k[8501]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I] - - k[8502]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI] - - k[8503]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI] - - k[8577]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - - k[8655]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - - k[8685]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - - k[8698]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] - - k[8713]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - - k[8715]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] - - k[8715]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] - - k[8716]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - - k[8717]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] - - k[8718]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] - - k[8719]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I] - - k[8720]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI] - - k[8721]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - - k[8722]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - - k[8723]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - - k[8724]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I] - - k[8725]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI] - - k[8726]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I] - - k[8727]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI] - - k[8728]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I] - - k[8729]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI] - - k[8730]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I] - - k[8731]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI] - - k[8732]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I] - - k[8733]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI] - - k[8734]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I] - - k[8735]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI] - - k[8736]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI]; - ydot[yistart + IDX_GCH2I] = 0.0 + k[6893]*y_cur[IDX_CH2I] - - k[7075]*y_cur[IDX_GCH2I] - k[7257]*y_cur[IDX_GCH2I] - - k[7439]*y_cur[IDX_GCH2I] - k[7619]*y_cur[IDX_GCH2I] - - k[7620]*y_cur[IDX_GCH2I] - k[7621]*y_cur[IDX_GCH2I] - - k[7622]*y_cur[IDX_GCH2I] + k[7625]*y_cur[IDX_GCH3I] + - k[7627]*y_cur[IDX_GCH3I] + k[7633]*y_cur[IDX_GCH4I] + - k[7661]*y_cur[IDX_GC2H3I] + k[7662]*y_cur[IDX_GC2H3I] + - k[7672]*y_cur[IDX_GC2H4I] + k[7672]*y_cur[IDX_GC2H4I] + - k[7681]*y_cur[IDX_GC2H5I] + k[7685]*y_cur[IDX_GCH2NHI] + - k[7726]*y_cur[IDX_GCH2CNI] + k[7737]*y_cur[IDX_GCH3CNI] + - k[7740]*y_cur[IDX_GCH3CHCH2I] + k[7742]*y_cur[IDX_GCH2COI] + - k[7745]*y_cur[IDX_GCH2COI] + k[7770]*y_cur[IDX_GCH3OCH3I] + - k[7820]*y_cur[IDX_GCH3COCH3I] + k[7882]*y_cur[IDX_GCH2OHI] - - k[7896]*y_cur[IDX_GCH2I] - k[7897]*y_cur[IDX_GCH2I] - - k[7898]*y_cur[IDX_GCH2I] - k[7899]*y_cur[IDX_GCH2I] + - k[7902]*y_cur[IDX_GCH3I] + k[7904]*y_cur[IDX_GCH3I] + - k[7910]*y_cur[IDX_GCH4I] + k[7913]*y_cur[IDX_GCH4I] + - k[7948]*y_cur[IDX_GC2H3I] + k[7949]*y_cur[IDX_GC2H3I] + - k[7959]*y_cur[IDX_GC2H4I] + k[7959]*y_cur[IDX_GC2H4I] + - k[7968]*y_cur[IDX_GC2H5I] + k[7984]*y_cur[IDX_GH2COI] + - k[8034]*y_cur[IDX_GCH2CNI] + k[8046]*y_cur[IDX_GCH3CNI] + - k[8051]*y_cur[IDX_GCH3CHCH2I] + k[8053]*y_cur[IDX_GCH2COI] + - k[8056]*y_cur[IDX_GCH2COI] + k[8059]*y_cur[IDX_GSiCH2I] + - k[8090]*y_cur[IDX_GCH3OCH3I] + k[8095]*y_cur[IDX_GCH2PHI] + - k[8147]*y_cur[IDX_GCH3COCH3I] + k[8265]*y_cur[IDX_GCH2OHI] + - k[8275]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - - k[8276]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] + - k[8369]*y_cur[IDX_GH2I]*y_cur[IDX_GCI] - - k[8370]*y_cur[IDX_GH2I]*y_cur[IDX_GCH2I] - - k[8396]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] - - k[8438]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - - k[8456]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] + - k[8477]*y_cur[IDX_GCHI]*y_cur[IDX_GHNOI] - - k[8482]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - - k[8518]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] - - k[8523]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I] - - k[8528]*y_cur[IDX_GCH2I]*y_cur[IDX_GO2I] - - k[8529]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI] - - k[8531]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - - k[8531]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - - k[8532]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] - - k[8533]*y_cur[IDX_GCH2I]*y_cur[IDX_GHNOI] - - k[8578]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] - - k[8656]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] - - k[8686]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - - k[8699]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] - - k[8716]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - - k[8741]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] - - k[8743]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I] - - k[8745]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - - k[8745]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - - k[8746]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] - - k[8747]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI]; - ydot[yistart + IDX_GCH2CCHI] = 0.0 + k[6950]*y_cur[IDX_CH2CCHI] - - k[7132]*y_cur[IDX_GCH2CCHI] - k[7314]*y_cur[IDX_GCH2CCHI] - - k[7496]*y_cur[IDX_GCH2CCHI] - k[7719]*y_cur[IDX_GCH2CCHI] - - k[7720]*y_cur[IDX_GCH2CCHI] + k[7721]*y_cur[IDX_GCH2CCH2I] + - k[7723]*y_cur[IDX_GCH2CCH2I] + k[7729]*y_cur[IDX_GCH3CCHI] + - k[7731]*y_cur[IDX_GCH3CCHI] - k[8026]*y_cur[IDX_GCH2CCHI] - - k[8027]*y_cur[IDX_GCH2CCHI] + k[8028]*y_cur[IDX_GCH2CCH2I] + - k[8031]*y_cur[IDX_GCH2CCH2I] + k[8037]*y_cur[IDX_GCH3CCHI] + - k[8040]*y_cur[IDX_GCH3CCHI] + - k[8317]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] + - k[8318]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] - - k[8319]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - - k[8320]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + - k[8413]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] - - k[8614]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - - k[8615]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI]; - ydot[yistart + IDX_GCH2CCH2I] = 0.0 + k[6951]*y_cur[IDX_CH2CCH2I] - - k[7133]*y_cur[IDX_GCH2CCH2I] - k[7315]*y_cur[IDX_GCH2CCH2I] - - k[7497]*y_cur[IDX_GCH2CCH2I] - k[7721]*y_cur[IDX_GCH2CCH2I] - - k[7722]*y_cur[IDX_GCH2CCH2I] - k[7723]*y_cur[IDX_GCH2CCH2I] - - k[7724]*y_cur[IDX_GCH2CCH2I] - k[7725]*y_cur[IDX_GCH2CCH2I] + - k[7799]*y_cur[IDX_GCH2CHCCHI] - k[8028]*y_cur[IDX_GCH2CCH2I] - - k[8029]*y_cur[IDX_GCH2CCH2I] - k[8030]*y_cur[IDX_GCH2CCH2I] - - k[8031]*y_cur[IDX_GCH2CCH2I] - k[8032]*y_cur[IDX_GCH2CCH2I] - - k[8033]*y_cur[IDX_GCH2CCH2I] + k[8124]*y_cur[IDX_GCH2CHCCHI] + - k[8319]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + - k[8489]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; - ydot[yistart + IDX_GCH2CHCCHI] = 0.0 + k[7004]*y_cur[IDX_CH2CHCCHI] - - k[7186]*y_cur[IDX_GCH2CHCCHI] - k[7368]*y_cur[IDX_GCH2CHCCHI] - - k[7550]*y_cur[IDX_GCH2CHCCHI] - k[7799]*y_cur[IDX_GCH2CHCCHI] - - k[7800]*y_cur[IDX_GCH2CHCCHI] - k[8124]*y_cur[IDX_GCH2CHCCHI] - - k[8125]*y_cur[IDX_GCH2CHCCHI] + k[8190]*y_cur[IDX_GC6H6I] + - k[8342]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I]; - ydot[yistart + IDX_GCH2CHCNI] = 0.0 + k[7007]*y_cur[IDX_CH2CHCNI] - - k[7189]*y_cur[IDX_GCH2CHCNI] - k[7371]*y_cur[IDX_GCH2CHCNI] - - k[7553]*y_cur[IDX_GCH2CHCNI] - k[7804]*y_cur[IDX_GCH2CHCNI] + - k[7812]*y_cur[IDX_GC2H5CNI] - k[8131]*y_cur[IDX_GCH2CHCNI] - - k[8132]*y_cur[IDX_GCH2CHCNI] + k[8141]*y_cur[IDX_GC2H5CNI] - - k[8344]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI] - - k[8634]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI]; - ydot[yistart + IDX_GCH2CNI] = 0.0 + k[6953]*y_cur[IDX_CH2CNI] - - k[7135]*y_cur[IDX_GCH2CNI] - k[7317]*y_cur[IDX_GCH2CNI] - - k[7499]*y_cur[IDX_GCH2CNI] - k[7726]*y_cur[IDX_GCH2CNI] + - k[7736]*y_cur[IDX_GCH3CNI] - k[8034]*y_cur[IDX_GCH2CNI] + - k[8045]*y_cur[IDX_GCH3CNI] + - k[8322]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] - - k[8323]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] + - k[8529]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI] - - k[8618]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI]; - ydot[yistart + IDX_GCH2COI] = 0.0 + k[6961]*y_cur[IDX_CH2COI] - - k[7143]*y_cur[IDX_GCH2COI] - k[7325]*y_cur[IDX_GCH2COI] - - k[7507]*y_cur[IDX_GCH2COI] - k[7742]*y_cur[IDX_GCH2COI] - - k[7743]*y_cur[IDX_GCH2COI] - k[7744]*y_cur[IDX_GCH2COI] - - k[7745]*y_cur[IDX_GCH2COI] + k[7762]*y_cur[IDX_GCH3CHOI] + - k[7818]*y_cur[IDX_GCH3COCH3I] - k[8053]*y_cur[IDX_GCH2COI] - - k[8054]*y_cur[IDX_GCH2COI] - k[8055]*y_cur[IDX_GCH2COI] - - k[8056]*y_cur[IDX_GCH2COI] + k[8080]*y_cur[IDX_GCH3CHOI] + - k[8325]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI]; - ydot[yistart + IDX_GCH2NHI] = 0.0 + k[6921]*y_cur[IDX_CH2NHI] - - k[7103]*y_cur[IDX_GCH2NHI] - k[7285]*y_cur[IDX_GCH2NHI] - - k[7467]*y_cur[IDX_GCH2NHI] - k[7685]*y_cur[IDX_GCH2NHI] - - k[7972]*y_cur[IDX_GCH2NHI] + - k[8293]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] + - k[8460]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] + - k[8483]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] + - k[8523]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I]; - ydot[yistart + IDX_GCH2OHI] = 0.0 + k[6929]*y_cur[IDX_CH2OHI] - - k[7111]*y_cur[IDX_GCH2OHI] - k[7293]*y_cur[IDX_GCH2OHI] - - k[7475]*y_cur[IDX_GCH2OHI] + k[7697]*y_cur[IDX_GCH3OHI] - - k[7882]*y_cur[IDX_GCH2OHI] + k[7889]*y_cur[IDX_GCH2OHCOI] + - k[7890]*y_cur[IDX_GCH2OHCHOI] + k[7998]*y_cur[IDX_GCH3OHI] - - k[8265]*y_cur[IDX_GCH2OHI] + k[8269]*y_cur[IDX_GCH2OHCOI] + - k[8270]*y_cur[IDX_GCH2OHCHOI] + - k[8297]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8300]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] + - k[8518]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] + - k[8520]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - - k[8546]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] + - k[8566]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] - - k[8568]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI] - - k[8569]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI] - - k[8570]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GH2COI] - - k[8571]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - - k[8572]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - - k[8573]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - - k[8574]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH2OHCHOI] - - k[8599]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] - - k[8753]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] - - k[8761]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI] - - k[8762]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI]; - ydot[yistart + IDX_GCH2OHCHOI] = 0.0 + k[7026]*y_cur[IDX_CH2OHCHOI] - - k[7208]*y_cur[IDX_GCH2OHCHOI] - k[7390]*y_cur[IDX_GCH2OHCHOI] - - k[7565]*y_cur[IDX_GCH2OHCHOI] - k[7890]*y_cur[IDX_GCH2OHCHOI] - - k[8270]*y_cur[IDX_GCH2OHCHOI] + - k[8366]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI] - - k[8367]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - - k[8368]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - - k[8519]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - - k[8520]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - - k[8527]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2OHCHOI] - - k[8538]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH2OHCHOI] - - k[8556]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - - k[8557]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - - k[8566]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] - - k[8567]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] + - k[8569]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI] + - k[8573]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - - k[8574]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH2OHCHOI]; - ydot[yistart + IDX_GCH2OHCOI] = 0.0 + k[7020]*y_cur[IDX_CH2OHCOI] - - k[7202]*y_cur[IDX_GCH2OHCOI] - k[7384]*y_cur[IDX_GCH2OHCOI] - - k[7559]*y_cur[IDX_GCH2OHCOI] - k[7889]*y_cur[IDX_GCH2OHCOI] - - k[8269]*y_cur[IDX_GCH2OHCOI] - - k[8366]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI] + - k[8367]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] + - k[8519]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] + - k[8527]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2OHCHOI] + - k[8538]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH2OHCHOI] + - k[8556]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] + - k[8567]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] + - k[8568]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI] + - k[8574]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH2OHCHOI] - - k[8652]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI]; - ydot[yistart + IDX_GCH2PHI] = 0.0 + k[6984]*y_cur[IDX_CH2PHI] - - k[7166]*y_cur[IDX_GCH2PHI] - k[7348]*y_cur[IDX_GCH2PHI] - - k[7530]*y_cur[IDX_GCH2PHI] - k[7775]*y_cur[IDX_GCH2PHI] - - k[8095]*y_cur[IDX_GCH2PHI]; - ydot[yistart + IDX_GCH3I] = 0.0 + k[6895]*y_cur[IDX_CH3I] - - k[7077]*y_cur[IDX_GCH3I] - k[7259]*y_cur[IDX_GCH3I] - - k[7441]*y_cur[IDX_GCH3I] - k[7625]*y_cur[IDX_GCH3I] - - k[7626]*y_cur[IDX_GCH3I] - k[7627]*y_cur[IDX_GCH3I] - - k[7628]*y_cur[IDX_GCH3I] - k[7629]*y_cur[IDX_GCH3I] + - k[7663]*y_cur[IDX_GC2H3I] + k[7664]*y_cur[IDX_GC2H3I] + - k[7673]*y_cur[IDX_GC2H4I] + k[7681]*y_cur[IDX_GC2H5I] + - k[7699]*y_cur[IDX_GCH3OHI] + k[7702]*y_cur[IDX_GCH3OHI] + - k[7724]*y_cur[IDX_GCH2CCH2I] + k[7732]*y_cur[IDX_GCH3CCHI] + - k[7735]*y_cur[IDX_GCH3CNI] + k[7761]*y_cur[IDX_GCH3CHOI] + - k[7763]*y_cur[IDX_GCH3CHOI] + k[7771]*y_cur[IDX_GCH3OCH3I] + - k[7771]*y_cur[IDX_GCH3OCH3I] + k[7819]*y_cur[IDX_GCH3COCH3I] + - k[7819]*y_cur[IDX_GCH3COCH3I] + k[7821]*y_cur[IDX_GCH3COCH3I] + - k[7821]*y_cur[IDX_GCH3COCH3I] + k[7826]*y_cur[IDX_GHCOOCH3I] + - k[7841]*y_cur[IDX_GCH3C4HI] + k[7844]*y_cur[IDX_GCH3C3NI] + - k[7864]*y_cur[IDX_GCH3C6HI] + k[7865]*y_cur[IDX_GCH3C5NI] + - k[7874]*y_cur[IDX_GCH3C7NI] + k[7881]*y_cur[IDX_GCH3OI] + - k[7883]*y_cur[IDX_GCH3COI] + k[7891]*y_cur[IDX_GCH3COOHI] - - k[7902]*y_cur[IDX_GCH3I] - k[7903]*y_cur[IDX_GCH3I] - - k[7904]*y_cur[IDX_GCH3I] - k[7905]*y_cur[IDX_GCH3I] - - k[7906]*y_cur[IDX_GCH3I] + k[7911]*y_cur[IDX_GCH4I] + - k[7914]*y_cur[IDX_GCH4I] + k[7950]*y_cur[IDX_GC2H3I] + - k[7951]*y_cur[IDX_GC2H3I] + k[7960]*y_cur[IDX_GC2H4I] + - k[7968]*y_cur[IDX_GC2H5I] + k[7997]*y_cur[IDX_GCH3OHI] + - k[8002]*y_cur[IDX_GCH3OHI] + k[8032]*y_cur[IDX_GCH2CCH2I] + - k[8041]*y_cur[IDX_GCH3CCHI] + k[8044]*y_cur[IDX_GCH3CNI] + - k[8079]*y_cur[IDX_GCH3CHOI] + k[8081]*y_cur[IDX_GCH3CHOI] + - k[8091]*y_cur[IDX_GCH3OCH3I] + k[8091]*y_cur[IDX_GCH3OCH3I] + - k[8146]*y_cur[IDX_GCH3COCH3I] + k[8146]*y_cur[IDX_GCH3COCH3I] + - k[8148]*y_cur[IDX_GCH3COCH3I] + k[8148]*y_cur[IDX_GCH3COCH3I] + - k[8167]*y_cur[IDX_GCH3C4HI] + k[8171]*y_cur[IDX_GCH3C3NI] + - k[8203]*y_cur[IDX_GCH3C6HI] + k[8204]*y_cur[IDX_GCH3C5NI] + - k[8228]*y_cur[IDX_GCH3C7NI] + k[8264]*y_cur[IDX_GCH3OI] + - k[8266]*y_cur[IDX_GCH3COI] + k[8272]*y_cur[IDX_GCH3COOHI] + - k[8276]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] - - k[8277]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] + - k[8278]*y_cur[IDX_GHI]*y_cur[IDX_GCH4I] + - k[8334]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + - k[8370]*y_cur[IDX_GH2I]*y_cur[IDX_GCH2I] - - k[8371]*y_cur[IDX_GH2I]*y_cur[IDX_GCH3I] - - k[8405]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - - k[8441]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] - - k[8460]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] - - k[8474]*y_cur[IDX_GSI]*y_cur[IDX_GCH3I] - - k[8484]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] + - k[8505]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - - k[8513]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] - - k[8532]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] + - k[8533]*y_cur[IDX_GCH2I]*y_cur[IDX_GHNOI] - - k[8539]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] - - k[8540]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI] - - k[8541]*y_cur[IDX_GCH3I]*y_cur[IDX_GHNOI] - - k[8542]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] - - k[8542]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] - - k[8543]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] - - k[8544]*y_cur[IDX_GCH3I]*y_cur[IDX_GH2COI] - - k[8545]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI] - - k[8546]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] - - k[8547]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - - k[8548]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - - k[8549]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI] - - k[8550]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOHI] - - k[8551]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI] - - k[8552]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI] - - k[8553]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI] - - k[8554]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI] - - k[8555]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOCH3I] - - k[8556]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - - k[8557]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] + - k[8563]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] + - k[8573]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] + - k[8575]*y_cur[IDX_GC2HI]*y_cur[IDX_GCH4I] - - k[8579]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] - - k[8660]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - - k[8688]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] - - k[8701]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] - - k[8718]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] - - k[8737]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] - - k[8746]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] - - k[8748]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] - - k[8748]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] - - k[8749]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI] - - k[8750]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] - - k[8751]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] - - k[8752]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI] - - k[8753]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] - - k[8754]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI] - - k[8755]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI] - - k[8756]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI] - - k[8757]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI] - - k[8758]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI]; - ydot[yistart + IDX_GCH3C3NI] = 0.0 + k[7036]*y_cur[IDX_CH3C3NI] - - k[7218]*y_cur[IDX_GCH3C3NI] - k[7400]*y_cur[IDX_GCH3C3NI] - - k[7582]*y_cur[IDX_GCH3C3NI] - k[7844]*y_cur[IDX_GCH3C3NI] - - k[8171]*y_cur[IDX_GCH3C3NI] + - k[8552]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI]; - ydot[yistart + IDX_GCH3C4HI] = 0.0 + k[7034]*y_cur[IDX_CH3C4HI] - - k[7216]*y_cur[IDX_GCH3C4HI] - k[7398]*y_cur[IDX_GCH3C4HI] - - k[7580]*y_cur[IDX_GCH3C4HI] - k[7841]*y_cur[IDX_GCH3C4HI] - - k[8167]*y_cur[IDX_GCH3C4HI]; - ydot[yistart + IDX_GCH3C5NI] = 0.0 + k[7054]*y_cur[IDX_CH3C5NI] - - k[7236]*y_cur[IDX_GCH3C5NI] - k[7418]*y_cur[IDX_GCH3C5NI] - - k[7600]*y_cur[IDX_GCH3C5NI] - k[7865]*y_cur[IDX_GCH3C5NI] - - k[8204]*y_cur[IDX_GCH3C5NI] + - k[8553]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI]; - ydot[yistart + IDX_GCH3C6HI] = 0.0 + k[7053]*y_cur[IDX_CH3C6HI] - - k[7235]*y_cur[IDX_GCH3C6HI] - k[7417]*y_cur[IDX_GCH3C6HI] - - k[7599]*y_cur[IDX_GCH3C6HI] - k[7864]*y_cur[IDX_GCH3C6HI] - - k[8203]*y_cur[IDX_GCH3C6HI]; - ydot[yistart + IDX_GCH3C7NI] = 0.0 + k[7063]*y_cur[IDX_CH3C7NI] - - k[7245]*y_cur[IDX_GCH3C7NI] - k[7427]*y_cur[IDX_GCH3C7NI] - - k[7609]*y_cur[IDX_GCH3C7NI] - k[7874]*y_cur[IDX_GCH3C7NI] - - k[8228]*y_cur[IDX_GCH3C7NI] + - k[8554]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI]; - ydot[yistart + IDX_GCH3CCHI] = 0.0 + k[6952]*y_cur[IDX_CH3CCHI] - - k[7134]*y_cur[IDX_GCH3CCHI] - k[7316]*y_cur[IDX_GCH3CCHI] - - k[7498]*y_cur[IDX_GCH3CCHI] - k[7729]*y_cur[IDX_GCH3CCHI] - - k[7730]*y_cur[IDX_GCH3CCHI] - k[7731]*y_cur[IDX_GCH3CCHI] - - k[7732]*y_cur[IDX_GCH3CCHI] - k[7733]*y_cur[IDX_GCH3CCHI] + - k[7800]*y_cur[IDX_GCH2CHCCHI] - k[8037]*y_cur[IDX_GCH3CCHI] - - k[8038]*y_cur[IDX_GCH3CCHI] - k[8039]*y_cur[IDX_GCH3CCHI] - - k[8040]*y_cur[IDX_GCH3CCHI] - k[8041]*y_cur[IDX_GCH3CCHI] - - k[8042]*y_cur[IDX_GCH3CCHI] + k[8125]*y_cur[IDX_GCH2CHCCHI] + - k[8320]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + - k[8490]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; - ydot[yistart + IDX_GCH3CHCH2I] = 0.0 + k[6959]*y_cur[IDX_CH3CHCH2I] - - k[7141]*y_cur[IDX_GCH3CHCH2I] - k[7323]*y_cur[IDX_GCH3CHCH2I] - - k[7505]*y_cur[IDX_GCH3CHCH2I] - k[7740]*y_cur[IDX_GCH3CHCH2I] + - k[7807]*y_cur[IDX_GC4H6I] - k[8051]*y_cur[IDX_GCH3CHCH2I] + - k[8136]*y_cur[IDX_GC4H6I]; - ydot[yistart + IDX_GCH3CHOI] = 0.0 + k[6977]*y_cur[IDX_CH3CHOI] - - k[7159]*y_cur[IDX_GCH3CHOI] - k[7341]*y_cur[IDX_GCH3CHOI] - - k[7523]*y_cur[IDX_GCH3CHOI] - k[7760]*y_cur[IDX_GCH3CHOI] - - k[7761]*y_cur[IDX_GCH3CHOI] - k[7762]*y_cur[IDX_GCH3CHOI] - - k[7763]*y_cur[IDX_GCH3CHOI] + k[7820]*y_cur[IDX_GCH3COCH3I] - - k[8078]*y_cur[IDX_GCH3CHOI] - k[8079]*y_cur[IDX_GCH3CHOI] - - k[8080]*y_cur[IDX_GCH3CHOI] - k[8081]*y_cur[IDX_GCH3CHOI] + - k[8147]*y_cur[IDX_GCH3COCH3I] + - k[8331]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] - - k[8332]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - - k[8333]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - - k[8334]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - - k[8505]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - - k[8506]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - - k[8507]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - - k[8521]*y_cur[IDX_GNHI]*y_cur[IDX_GCH3CHOI] - - k[8535]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH3CHOI] + - k[8543]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] - - k[8547]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - - k[8548]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - - k[8562]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - - k[8563]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - - k[8571]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - - k[8572]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - - k[8573]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI]; - ydot[yistart + IDX_GCH3CNI] = 0.0 + k[6957]*y_cur[IDX_CH3CNI] - - k[7139]*y_cur[IDX_GCH3CNI] - k[7321]*y_cur[IDX_GCH3CNI] - - k[7503]*y_cur[IDX_GCH3CNI] - k[7735]*y_cur[IDX_GCH3CNI] - - k[7736]*y_cur[IDX_GCH3CNI] - k[7737]*y_cur[IDX_GCH3CNI] - - k[8044]*y_cur[IDX_GCH3CNI] - k[8045]*y_cur[IDX_GCH3CNI] - - k[8046]*y_cur[IDX_GCH3CNI] + - k[8323]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] + - k[8540]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI]; - ydot[yistart + IDX_GCH3COI] = 0.0 + k[6966]*y_cur[IDX_CH3COI] - - k[7148]*y_cur[IDX_GCH3COI] - k[7330]*y_cur[IDX_GCH3COI] - - k[7512]*y_cur[IDX_GCH3COI] - k[7883]*y_cur[IDX_GCH3COI] + - k[7892]*y_cur[IDX_GCH3COOHI] - k[8266]*y_cur[IDX_GCH3COI] + - k[8271]*y_cur[IDX_GCH3COOHI] - - k[8331]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] + - k[8332]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - - k[8504]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] + - k[8506]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + - k[8521]*y_cur[IDX_GNHI]*y_cur[IDX_GCH3CHOI] + - k[8535]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH3CHOI] + - k[8539]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] + - k[8547]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - - k[8551]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI] + - k[8562]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] + - k[8572]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - - k[8626]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] - - k[8742]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] - - k[8754]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI]; - ydot[yistart + IDX_GCH3COCH3I] = 0.0 + k[7018]*y_cur[IDX_CH3COCH3I] - - k[7200]*y_cur[IDX_GCH3COCH3I] - k[7382]*y_cur[IDX_GCH3COCH3I] - - k[7568]*y_cur[IDX_GCH3COCH3I] - k[7818]*y_cur[IDX_GCH3COCH3I] - - k[7819]*y_cur[IDX_GCH3COCH3I] - k[7820]*y_cur[IDX_GCH3COCH3I] - - k[7821]*y_cur[IDX_GCH3COCH3I] - k[8146]*y_cur[IDX_GCH3COCH3I] - - k[8147]*y_cur[IDX_GCH3COCH3I] - k[8148]*y_cur[IDX_GCH3COCH3I] + - k[8551]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI]; - ydot[yistart + IDX_GCH3COOHI] = 0.0 + k[7027]*y_cur[IDX_CH3COOHI] - - k[7209]*y_cur[IDX_GCH3COOHI] - k[7391]*y_cur[IDX_GCH3COOHI] - - k[7566]*y_cur[IDX_GCH3COOHI] - k[7891]*y_cur[IDX_GCH3COOHI] - - k[7892]*y_cur[IDX_GCH3COOHI] - k[8271]*y_cur[IDX_GCH3COOHI] - - k[8272]*y_cur[IDX_GCH3COOHI] + - k[8504]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] + - k[8549]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI]; - ydot[yistart + IDX_GCH3OI] = 0.0 + k[6931]*y_cur[IDX_CH3OI] - - k[7113]*y_cur[IDX_GCH3OI] - k[7295]*y_cur[IDX_GCH3OI] - - k[7477]*y_cur[IDX_GCH3OI] + k[7698]*y_cur[IDX_GCH3OHI] - - k[7881]*y_cur[IDX_GCH3OI] + k[7888]*y_cur[IDX_GCOOCH3I] + - k[7999]*y_cur[IDX_GCH3OHI] - k[8264]*y_cur[IDX_GCH3OI] + - k[8268]*y_cur[IDX_GCOOCH3I] + - k[8296]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8299]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] + - k[8441]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] + - k[8511]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - - k[8545]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI] - - k[8558]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI] - - k[8559]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] - - k[8560]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - - k[8561]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - - k[8562]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - - k[8563]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - - k[8564]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOHI] - - k[8565]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOCH3I] - - k[8566]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] - - k[8567]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] - - k[8598]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] - - k[8752]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI] - - k[8759]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] - - k[8760]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_GCH3OCH3I] = 0.0 + k[6983]*y_cur[IDX_CH3OCH3I] - - k[7165]*y_cur[IDX_GCH3OCH3I] - k[7347]*y_cur[IDX_GCH3OCH3I] - - k[7529]*y_cur[IDX_GCH3OCH3I] - k[7769]*y_cur[IDX_GCH3OCH3I] - - k[7770]*y_cur[IDX_GCH3OCH3I] - k[7771]*y_cur[IDX_GCH3OCH3I] - - k[8089]*y_cur[IDX_GCH3OCH3I] - k[8090]*y_cur[IDX_GCH3OCH3I] - - k[8091]*y_cur[IDX_GCH3OCH3I] + - k[8545]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI]; - ydot[yistart + IDX_GCH3OHI] = 0.0 + k[6936]*y_cur[IDX_CH3OHI] - - k[7118]*y_cur[IDX_GCH3OHI] - k[7300]*y_cur[IDX_GCH3OHI] - - k[7482]*y_cur[IDX_GCH3OHI] - k[7697]*y_cur[IDX_GCH3OHI] - - k[7698]*y_cur[IDX_GCH3OHI] - k[7699]*y_cur[IDX_GCH3OHI] - - k[7700]*y_cur[IDX_GCH3OHI] - k[7701]*y_cur[IDX_GCH3OHI] - - k[7702]*y_cur[IDX_GCH3OHI] + k[7770]*y_cur[IDX_GCH3OCH3I] + - k[7825]*y_cur[IDX_GHCOOCH3I] - k[7997]*y_cur[IDX_GCH3OHI] - - k[7998]*y_cur[IDX_GCH3OHI] - k[7999]*y_cur[IDX_GCH3OHI] - - k[8000]*y_cur[IDX_GCH3OHI] - k[8001]*y_cur[IDX_GCH3OHI] - - k[8002]*y_cur[IDX_GCH3OHI] + k[8090]*y_cur[IDX_GCH3OCH3I] + - k[8299]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] + - k[8300]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] + - k[8346]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] + - k[8368]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] + - k[8507]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + - k[8513]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] + - k[8560]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] + - k[8562]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] + - k[8564]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOHI] + - k[8565]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOCH3I] + - k[8567]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] + - k[8570]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GH2COI] + - k[8572]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] + - k[8574]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH2OHCHOI]; - ydot[yistart + IDX_GCH4I] = 0.0 + k[6898]*y_cur[IDX_CH4I] - - k[7080]*y_cur[IDX_GCH4I] - k[7262]*y_cur[IDX_GCH4I] - - k[7444]*y_cur[IDX_GCH4I] - k[7633]*y_cur[IDX_GCH4I] + - k[7674]*y_cur[IDX_GC2H4I] + k[7760]*y_cur[IDX_GCH3CHOI] + - k[7769]*y_cur[IDX_GCH3OCH3I] + k[7774]*y_cur[IDX_GC2H5OHI] + - k[7818]*y_cur[IDX_GCH3COCH3I] + k[7824]*y_cur[IDX_GHCOOCH3I] - - k[7910]*y_cur[IDX_GCH4I] - k[7911]*y_cur[IDX_GCH4I] - - k[7912]*y_cur[IDX_GCH4I] - k[7913]*y_cur[IDX_GCH4I] - - k[7914]*y_cur[IDX_GCH4I] + k[7961]*y_cur[IDX_GC2H4I] + - k[8078]*y_cur[IDX_GCH3CHOI] + k[8089]*y_cur[IDX_GCH3OCH3I] + - k[8094]*y_cur[IDX_GC2H5OHI] + - k[8277]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] - - k[8278]*y_cur[IDX_GHI]*y_cur[IDX_GCH4I] + - k[8333]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + - k[8371]*y_cur[IDX_GH2I]*y_cur[IDX_GCH3I] + - k[8541]*y_cur[IDX_GCH3I]*y_cur[IDX_GHNOI] + - k[8544]*y_cur[IDX_GCH3I]*y_cur[IDX_GH2COI] + - k[8547]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] + - k[8550]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOHI] + - k[8555]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOCH3I] + - k[8556]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - - k[8575]*y_cur[IDX_GC2HI]*y_cur[IDX_GCH4I]; - ydot[yistart + IDX_GCNI] = 0.0 + k[6909]*y_cur[IDX_CNI] - - k[7091]*y_cur[IDX_GCNI] - k[7273]*y_cur[IDX_GCNI] - - k[7455]*y_cur[IDX_GCNI] - k[7649]*y_cur[IDX_GCNI] + - k[7650]*y_cur[IDX_GHNCI] + k[7651]*y_cur[IDX_GHCNI] + - k[7718]*y_cur[IDX_GC2NI] + k[7726]*y_cur[IDX_GCH2CNI] + - k[7735]*y_cur[IDX_GCH3CNI] + k[7739]*y_cur[IDX_GNH2CNI] + - k[7741]*y_cur[IDX_GCNOI] + k[7747]*y_cur[IDX_GOCNI] + - k[7754]*y_cur[IDX_GHONCI] + k[7755]*y_cur[IDX_GHOCNI] + - k[7790]*y_cur[IDX_GC3NI] + k[7797]*y_cur[IDX_GHNC3I] + - k[7798]*y_cur[IDX_GHC3NI] + k[7801]*y_cur[IDX_GNCCNI] + - k[7801]*y_cur[IDX_GNCCNI] + k[7804]*y_cur[IDX_GCH2CHCNI] + - k[7806]*y_cur[IDX_GSiNCI] + k[7809]*y_cur[IDX_GC2H5CNI] + - k[7836]*y_cur[IDX_GC4NI] + k[7854]*y_cur[IDX_GC5NI] + - k[7855]*y_cur[IDX_GHC5NI] + k[7868]*y_cur[IDX_GC7NI] + - k[7870]*y_cur[IDX_GHC7NI] + k[7877]*y_cur[IDX_GC9NI] + - k[7879]*y_cur[IDX_GHC9NI] + k[7885]*y_cur[IDX_GC2H4CNI] - - k[7936]*y_cur[IDX_GCNI] + k[7937]*y_cur[IDX_GHNCI] + - k[7938]*y_cur[IDX_GHCNI] + k[8025]*y_cur[IDX_GC2NI] + - k[8034]*y_cur[IDX_GCH2CNI] + k[8044]*y_cur[IDX_GCH3CNI] + - k[8050]*y_cur[IDX_GNH2CNI] + k[8052]*y_cur[IDX_GCNOI] + - k[8061]*y_cur[IDX_GOCNI] + k[8068]*y_cur[IDX_GHONCI] + - k[8069]*y_cur[IDX_GHOCNI] + k[8114]*y_cur[IDX_GC3NI] + - k[8123]*y_cur[IDX_GHC3NI] + k[8126]*y_cur[IDX_GNCCNI] + - k[8126]*y_cur[IDX_GNCCNI] + k[8128]*y_cur[IDX_GNCCNI] + - k[8128]*y_cur[IDX_GNCCNI] + k[8131]*y_cur[IDX_GCH2CHCNI] + - k[8135]*y_cur[IDX_GSiNCI] + k[8138]*y_cur[IDX_GC2H5CNI] + - k[8160]*y_cur[IDX_GC4NI] + k[8186]*y_cur[IDX_GC5NI] + - k[8187]*y_cur[IDX_GHC5NI] + k[8211]*y_cur[IDX_GC7NI] + - k[8216]*y_cur[IDX_GHC7NI] + k[8217]*y_cur[IDX_GHC7NI] + - k[8246]*y_cur[IDX_GC9NI] + k[8252]*y_cur[IDX_GHC9NI] + - k[8253]*y_cur[IDX_GHC9NI] - k[8292]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] - - k[8376]*y_cur[IDX_GH2I]*y_cur[IDX_GCNI] + - k[8397]*y_cur[IDX_GCI]*y_cur[IDX_GNI] + - k[8398]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] + - k[8400]*y_cur[IDX_GCI]*y_cur[IDX_GNSI] + - k[8401]*y_cur[IDX_GCI]*y_cur[IDX_GOCNI] + - k[8402]*y_cur[IDX_GCI]*y_cur[IDX_GCNOI] - - k[8412]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - - k[8446]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - - k[8488]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - - k[8529]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI] - - k[8540]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI] - - k[8592]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] - - k[8664]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - - k[8692]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - - k[8721]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - - k[8747]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI] - - k[8749]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI]; - ydot[yistart + IDX_GCNOI] = 0.0 + k[6960]*y_cur[IDX_CNOI] - - k[7142]*y_cur[IDX_GCNOI] - k[7324]*y_cur[IDX_GCNOI] - - k[7506]*y_cur[IDX_GCNOI] - k[7741]*y_cur[IDX_GCNOI] - - k[8052]*y_cur[IDX_GCNOI] - k[8326]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - - k[8327]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] + - k[8399]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - - k[8402]*y_cur[IDX_GCI]*y_cur[IDX_GCNOI] - - k[8621]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - - k[8622]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; - ydot[yistart + IDX_GCOI] = 0.0 + k[6918]*y_cur[IDX_COI] - - k[7100]*y_cur[IDX_GCOI] - k[7282]*y_cur[IDX_GCOI] - - k[7464]*y_cur[IDX_GCOI] - k[7616]*y_cur[IDX_GCOI] - - k[7675]*y_cur[IDX_GCOI] + k[7682]*y_cur[IDX_GHCOI] + - k[7683]*y_cur[IDX_GHCOI] + k[7692]*y_cur[IDX_GH2COI] + - k[7728]*y_cur[IDX_GC2OI] + k[7742]*y_cur[IDX_GCH2COI] + - k[7745]*y_cur[IDX_GCH2COI] + k[7751]*y_cur[IDX_GHNCOI] + - k[7760]*y_cur[IDX_GCH3CHOI] + k[7764]*y_cur[IDX_GCO2I] + - k[7803]*y_cur[IDX_GC3OI] + k[7819]*y_cur[IDX_GCH3COCH3I] + - k[7821]*y_cur[IDX_GCH3COCH3I] + k[7825]*y_cur[IDX_GHCOOCH3I] + - k[7827]*y_cur[IDX_GOCSI] + k[7830]*y_cur[IDX_GOCSI] + - k[7883]*y_cur[IDX_GCH3COI] + k[7884]*y_cur[IDX_GCOOHI] + - k[7887]*y_cur[IDX_GHC2OI] + k[7888]*y_cur[IDX_GCOOCH3I] + - k[7889]*y_cur[IDX_GCH2OHCOI] - k[7962]*y_cur[IDX_GCOI] + - k[7969]*y_cur[IDX_GHCOI] + k[7970]*y_cur[IDX_GHCOI] + - k[7982]*y_cur[IDX_GH2COI] + k[7983]*y_cur[IDX_GH2COI] + - k[7985]*y_cur[IDX_GH2COI] + k[7986]*y_cur[IDX_GH2COI] + - k[8036]*y_cur[IDX_GC2OI] + k[8053]*y_cur[IDX_GCH2COI] + - k[8056]*y_cur[IDX_GCH2COI] + k[8065]*y_cur[IDX_GHNCOI] + - k[8078]*y_cur[IDX_GCH3CHOI] + k[8082]*y_cur[IDX_GCO2I] + - k[8130]*y_cur[IDX_GC3OI] + k[8146]*y_cur[IDX_GCH3COCH3I] + - k[8148]*y_cur[IDX_GCH3COCH3I] + k[8151]*y_cur[IDX_GOCSI] + - k[8154]*y_cur[IDX_GOCSI] + k[8266]*y_cur[IDX_GCH3COI] + - k[8267]*y_cur[IDX_GCOOHI] + k[8268]*y_cur[IDX_GCOOCH3I] + - k[8269]*y_cur[IDX_GCH2OHCOI] - - k[8294]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] + - k[8348]*y_cur[IDX_GHI]*y_cur[IDX_GOCSI] + - k[8401]*y_cur[IDX_GCI]*y_cur[IDX_GOCNI] + - k[8402]*y_cur[IDX_GCI]*y_cur[IDX_GCNOI] + - k[8406]*y_cur[IDX_GCI]*y_cur[IDX_GOI] + - k[8407]*y_cur[IDX_GCI]*y_cur[IDX_GO2I] + - k[8408]*y_cur[IDX_GCI]*y_cur[IDX_GOHI] + - k[8409]*y_cur[IDX_GCI]*y_cur[IDX_GSOI] + - k[8434]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] - - k[8447]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] - - k[8476]*y_cur[IDX_GSI]*y_cur[IDX_GCOI] - - k[8515]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - - k[8516]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - - k[8526]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI] - - k[8539]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] - - k[8558]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI] - - k[8568]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI] - - k[8594]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] - - k[8693]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] - - k[8714]*y_cur[IDX_GSI]*y_cur[IDX_GCOI] - - k[8739]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - - k[8744]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI] - - k[8750]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] - - k[8760]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI] - - k[8761]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_GCO2I] = 0.0 + k[6978]*y_cur[IDX_CO2I] - - k[7160]*y_cur[IDX_GCO2I] - k[7342]*y_cur[IDX_GCO2I] - - k[7524]*y_cur[IDX_GCO2I] - k[7764]*y_cur[IDX_GCO2I] + - k[7824]*y_cur[IDX_GHCOOCH3I] + k[7826]*y_cur[IDX_GHCOOCH3I] - - k[8082]*y_cur[IDX_GCO2I] + k[8103]*y_cur[IDX_GHCOOHI] + - k[8447]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] + - k[8448]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + - k[8515]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_GCOOCH3I] = 0.0 + k[7019]*y_cur[IDX_COOCH3I] - - k[7201]*y_cur[IDX_GCOOCH3I] - k[7383]*y_cur[IDX_GCOOCH3I] - - k[7558]*y_cur[IDX_GCOOCH3I] - k[7888]*y_cur[IDX_GCOOCH3I] - - k[8268]*y_cur[IDX_GCOOCH3I] + - k[8347]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] - - k[8365]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] + - k[8512]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] + - k[8537]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOCH3I] + - k[8555]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOCH3I] + - k[8558]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI] + - k[8565]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOCH3I] - - k[8651]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I]; - ydot[yistart + IDX_GCOOHI] = 0.0 + k[6981]*y_cur[IDX_COOHI] - - k[7163]*y_cur[IDX_GCOOHI] - k[7345]*y_cur[IDX_GCOOHI] - - k[7527]*y_cur[IDX_GCOOHI] - k[7884]*y_cur[IDX_GCOOHI] + - k[7891]*y_cur[IDX_GCH3COOHI] - k[8267]*y_cur[IDX_GCOOHI] + - k[8272]*y_cur[IDX_GCH3COOHI] - - k[8336]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] + - k[8337]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + - k[8510]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOHI] + - k[8516]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] + - k[8536]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOHI] - - k[8549]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI] + - k[8550]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOHI] + - k[8564]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOHI] - - k[8628]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] - - k[8755]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI]; - ydot[yistart + IDX_GCPI] = 0.0 + k[6972]*y_cur[IDX_CPI] - - k[7154]*y_cur[IDX_GCPI] - k[7336]*y_cur[IDX_GCPI] - - k[7518]*y_cur[IDX_GCPI] - k[7753]*y_cur[IDX_GCPI] + - k[7759]*y_cur[IDX_GHCPI] + k[7814]*y_cur[IDX_GCCPI] - - k[8067]*y_cur[IDX_GCPI] + k[8077]*y_cur[IDX_GHCPI] + - k[8143]*y_cur[IDX_GCCPI] + k[8176]*y_cur[IDX_GC3PI] + - k[8191]*y_cur[IDX_GC4PI]; - ydot[yistart + IDX_GCSI] = 0.0 + k[6975]*y_cur[IDX_CSI] - - k[7157]*y_cur[IDX_GCSI] - k[7339]*y_cur[IDX_GCSI] - - k[7521]*y_cur[IDX_GCSI] - k[7757]*y_cur[IDX_GCSI] - - k[7758]*y_cur[IDX_GCSI] + k[7767]*y_cur[IDX_GHCSI] + - k[7777]*y_cur[IDX_GH2CSI] + k[7815]*y_cur[IDX_GC2SI] + - k[7829]*y_cur[IDX_GOCSI] + k[7848]*y_cur[IDX_GC3SI] + - k[7860]*y_cur[IDX_GC4SI] - k[8075]*y_cur[IDX_GCSI] - - k[8076]*y_cur[IDX_GCSI] + k[8085]*y_cur[IDX_GHCSI] + - k[8087]*y_cur[IDX_GHCSI] + k[8098]*y_cur[IDX_GH2CSI] + - k[8153]*y_cur[IDX_GOCSI] + k[8177]*y_cur[IDX_GC3SI] + - k[8192]*y_cur[IDX_GC4SI] - k[8330]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] + - k[8414]*y_cur[IDX_GCI]*y_cur[IDX_GHSI] + - k[8415]*y_cur[IDX_GCI]*y_cur[IDX_GSI] - - k[8452]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] - - k[8625]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] - - k[8696]*y_cur[IDX_GOI]*y_cur[IDX_GCSI]; - ydot[yistart + IDX_GClI] = 0.0 + k[6942]*y_cur[IDX_ClI] - - k[7124]*y_cur[IDX_GClI] - k[7306]*y_cur[IDX_GClI] - - k[7488]*y_cur[IDX_GClI] + k[7713]*y_cur[IDX_GHClI] + - k[7781]*y_cur[IDX_GCClI] + k[7796]*y_cur[IDX_GClOI] + - k[8018]*y_cur[IDX_GHClI] + k[8019]*y_cur[IDX_GHClI] + - k[8105]*y_cur[IDX_GCClI] + k[8121]*y_cur[IDX_GClOI] - - k[8314]*y_cur[IDX_GHI]*y_cur[IDX_GClI] - - k[8609]*y_cur[IDX_GHI]*y_cur[IDX_GClI]; - ydot[yistart + IDX_GClOI] = 0.0 + k[6999]*y_cur[IDX_ClOI] - - k[7181]*y_cur[IDX_GClOI] - k[7363]*y_cur[IDX_GClOI] - - k[7545]*y_cur[IDX_GClOI] - k[7796]*y_cur[IDX_GClOI] - - k[8121]*y_cur[IDX_GClOI]; - ydot[yistart + IDX_GFI] = 0.0 + k[6903]*y_cur[IDX_FI] - - k[7085]*y_cur[IDX_GFI] - k[7267]*y_cur[IDX_GFI] - - k[7449]*y_cur[IDX_GFI] + k[7640]*y_cur[IDX_GHFI] + - k[7926]*y_cur[IDX_GHFI] - k[8284]*y_cur[IDX_GHI]*y_cur[IDX_GFI] - - k[8585]*y_cur[IDX_GHI]*y_cur[IDX_GFI]; - ydot[yistart + IDX_GFeI] = 0.0 + k[7016]*y_cur[IDX_FeI] - - k[7198]*y_cur[IDX_GFeI] - k[7380]*y_cur[IDX_GFeI] - - k[7564]*y_cur[IDX_GFeI]; - ydot[yistart + IDX_GHI] = 0.0 + k[6888]*y_cur[IDX_HI] - - k[7070]*y_cur[IDX_GHI] - k[7252]*y_cur[IDX_GHI] - - k[7434]*y_cur[IDX_GHI] + k[7617]*y_cur[IDX_GH2I] + - k[7617]*y_cur[IDX_GH2I] + k[7618]*y_cur[IDX_GCHI] + - k[7619]*y_cur[IDX_GCH2I] + k[7621]*y_cur[IDX_GCH2I] + - k[7621]*y_cur[IDX_GCH2I] + k[7622]*y_cur[IDX_GCH2I] + - k[7623]*y_cur[IDX_GNHI] + k[7624]*y_cur[IDX_GNHI] + - k[7625]*y_cur[IDX_GCH3I] + k[7627]*y_cur[IDX_GCH3I] + - k[7629]*y_cur[IDX_GCH3I] + k[7629]*y_cur[IDX_GCH3I] + - k[7630]*y_cur[IDX_GNH2I] + k[7631]*y_cur[IDX_GNH2I] + - k[7631]*y_cur[IDX_GNH2I] + k[7632]*y_cur[IDX_GNH2I] + - k[7634]*y_cur[IDX_GNH3I] + k[7636]*y_cur[IDX_GNH3I] + - k[7637]*y_cur[IDX_GNH3I] + k[7637]*y_cur[IDX_GNH3I] + - k[7638]*y_cur[IDX_GOHI] + k[7639]*y_cur[IDX_GH2OI] + - k[7640]*y_cur[IDX_GHFI] + k[7642]*y_cur[IDX_GC2HI] + - k[7643]*y_cur[IDX_GC2HI] + k[7645]*y_cur[IDX_GC2H2I] + - k[7646]*y_cur[IDX_GC2H2I] + k[7646]*y_cur[IDX_GC2H2I] + - k[7647]*y_cur[IDX_GC2H2I] + k[7650]*y_cur[IDX_GHNCI] + - k[7651]*y_cur[IDX_GHCNI] + k[7652]*y_cur[IDX_GC2H3I] + - k[7653]*y_cur[IDX_GC2H3I] + k[7654]*y_cur[IDX_GC2H3I] + - k[7655]*y_cur[IDX_GC2H3I] + k[7656]*y_cur[IDX_GC2H3I] + - k[7659]*y_cur[IDX_GC2H3I] + k[7659]*y_cur[IDX_GC2H3I] + - k[7660]*y_cur[IDX_GC2H3I] + k[7660]*y_cur[IDX_GC2H3I] + - k[7665]*y_cur[IDX_GH2CNI] + k[7669]*y_cur[IDX_GC2H4I] + - k[7669]*y_cur[IDX_GC2H4I] + k[7670]*y_cur[IDX_GC2H4I] + - k[7671]*y_cur[IDX_GC2H4I] + k[7677]*y_cur[IDX_GC2H5I] + - k[7678]*y_cur[IDX_GC2H5I] + k[7678]*y_cur[IDX_GC2H5I] + - k[7678]*y_cur[IDX_GC2H5I] + k[7679]*y_cur[IDX_GC2H5I] + - k[7679]*y_cur[IDX_GC2H5I] + k[7680]*y_cur[IDX_GC2H5I] + - k[7682]*y_cur[IDX_GHCOI] + k[7683]*y_cur[IDX_GHCOI] + - k[7684]*y_cur[IDX_GSiHI] + k[7686]*y_cur[IDX_GSiH2I] + - k[7689]*y_cur[IDX_GC2H6I] + k[7693]*y_cur[IDX_GSiH3I] + - k[7694]*y_cur[IDX_GHNOI] + k[7696]*y_cur[IDX_GPHI] + - k[7697]*y_cur[IDX_GCH3OHI] + k[7698]*y_cur[IDX_GCH3OHI] + - k[7700]*y_cur[IDX_GCH3OHI] + k[7701]*y_cur[IDX_GCH3OHI] + - k[7701]*y_cur[IDX_GCH3OHI] + k[7705]*y_cur[IDX_GO2HI] + - k[7706]*y_cur[IDX_GPH2I] + k[7707]*y_cur[IDX_GHSI] + - k[7710]*y_cur[IDX_GH2SI] + k[7711]*y_cur[IDX_GH2SI] + - k[7711]*y_cur[IDX_GH2SI] + k[7713]*y_cur[IDX_GHClI] + - k[7714]*y_cur[IDX_GC3HI] + k[7715]*y_cur[IDX_GC3H2I] + - k[7716]*y_cur[IDX_GH2CCCI] + k[7719]*y_cur[IDX_GCH2CCHI] + - k[7721]*y_cur[IDX_GCH2CCH2I] + k[7723]*y_cur[IDX_GCH2CCH2I] + - k[7725]*y_cur[IDX_GCH2CCH2I] + k[7725]*y_cur[IDX_GCH2CCH2I] + - k[7729]*y_cur[IDX_GCH3CCHI] + k[7731]*y_cur[IDX_GCH3CCHI] + - k[7733]*y_cur[IDX_GCH3CCHI] + k[7733]*y_cur[IDX_GCH3CCHI] + - k[7736]*y_cur[IDX_GCH3CNI] + k[7749]*y_cur[IDX_GSiCH3I] + - k[7750]*y_cur[IDX_GHNSiI] + k[7759]*y_cur[IDX_GHCPI] + - k[7762]*y_cur[IDX_GCH3CHOI] + k[7762]*y_cur[IDX_GCH3CHOI] + - k[7767]*y_cur[IDX_GHCSI] + k[7785]*y_cur[IDX_GHPOI] + - k[7789]*y_cur[IDX_GC4HI] + k[7792]*y_cur[IDX_GC4H2I] + - k[7794]*y_cur[IDX_GC4H2I] + k[7795]*y_cur[IDX_GC4H3I] + - k[7795]*y_cur[IDX_GC4H3I] + k[7805]*y_cur[IDX_GSiC2HI] + - k[7810]*y_cur[IDX_GC2H5CNI] + k[7810]*y_cur[IDX_GC2H5CNI] + - k[7811]*y_cur[IDX_GC2H5CNI] + k[7812]*y_cur[IDX_GC2H5CNI] + - k[7812]*y_cur[IDX_GC2H5CNI] + k[7817]*y_cur[IDX_GHC2PI] + - k[7826]*y_cur[IDX_GHCOOCH3I] + k[7835]*y_cur[IDX_GC5HI] + - k[7838]*y_cur[IDX_GC5H2I] + k[7843]*y_cur[IDX_GSiC3HI] + - k[7852]*y_cur[IDX_GC6HI] + k[7856]*y_cur[IDX_GHC5NI] + - k[7858]*y_cur[IDX_GC6H6I] + k[7858]*y_cur[IDX_GC6H6I] + - k[7862]*y_cur[IDX_GC7HI] + k[7863]*y_cur[IDX_GC7H2I] + - k[7867]*y_cur[IDX_GC8HI] + k[7869]*y_cur[IDX_GC8H2I] + - k[7872]*y_cur[IDX_GC9HI] + k[7873]*y_cur[IDX_GC9H2I] + - k[7876]*y_cur[IDX_GC10HI] + k[7878]*y_cur[IDX_GC10H2I] + - k[7886]*y_cur[IDX_GHCCNI] + k[7893]*y_cur[IDX_GH2I] + - k[7893]*y_cur[IDX_GH2I] + k[7894]*y_cur[IDX_GCHI] + - k[7895]*y_cur[IDX_GCHI] + k[7896]*y_cur[IDX_GCH2I] + - k[7898]*y_cur[IDX_GCH2I] + k[7898]*y_cur[IDX_GCH2I] + - k[7899]*y_cur[IDX_GCH2I] + k[7900]*y_cur[IDX_GNHI] + - k[7901]*y_cur[IDX_GNHI] + k[7902]*y_cur[IDX_GCH3I] + - k[7904]*y_cur[IDX_GCH3I] + k[7906]*y_cur[IDX_GCH3I] + - k[7906]*y_cur[IDX_GCH3I] + k[7907]*y_cur[IDX_GNH2I] + - k[7908]*y_cur[IDX_GNH2I] + k[7908]*y_cur[IDX_GNH2I] + - k[7909]*y_cur[IDX_GNH2I] + k[7911]*y_cur[IDX_GCH4I] + - k[7912]*y_cur[IDX_GCH4I] + k[7913]*y_cur[IDX_GCH4I] + - k[7913]*y_cur[IDX_GCH4I] + k[7914]*y_cur[IDX_GCH4I] + - k[7915]*y_cur[IDX_GNH3I] + k[7917]*y_cur[IDX_GNH3I] + - k[7918]*y_cur[IDX_GNH3I] + k[7918]*y_cur[IDX_GNH3I] + - k[7919]*y_cur[IDX_GOHI] + k[7920]*y_cur[IDX_GOHI] + - k[7921]*y_cur[IDX_GH2OI] + k[7924]*y_cur[IDX_GH2OI] + - k[7924]*y_cur[IDX_GH2OI] + k[7925]*y_cur[IDX_GH2OI] + - k[7926]*y_cur[IDX_GHFI] + k[7929]*y_cur[IDX_GC2HI] + - k[7930]*y_cur[IDX_GC2HI] + k[7932]*y_cur[IDX_GC2H2I] + - k[7933]*y_cur[IDX_GC2H2I] + k[7933]*y_cur[IDX_GC2H2I] + - k[7934]*y_cur[IDX_GC2H2I] + k[7937]*y_cur[IDX_GHNCI] + - k[7938]*y_cur[IDX_GHCNI] + k[7939]*y_cur[IDX_GC2H3I] + - k[7940]*y_cur[IDX_GC2H3I] + k[7941]*y_cur[IDX_GC2H3I] + - k[7942]*y_cur[IDX_GC2H3I] + k[7943]*y_cur[IDX_GC2H3I] + - k[7946]*y_cur[IDX_GC2H3I] + k[7946]*y_cur[IDX_GC2H3I] + - k[7947]*y_cur[IDX_GC2H3I] + k[7947]*y_cur[IDX_GC2H3I] + - k[7952]*y_cur[IDX_GH2CNI] + k[7956]*y_cur[IDX_GC2H4I] + - k[7956]*y_cur[IDX_GC2H4I] + k[7957]*y_cur[IDX_GC2H4I] + - k[7958]*y_cur[IDX_GC2H4I] + k[7964]*y_cur[IDX_GC2H5I] + - k[7965]*y_cur[IDX_GC2H5I] + k[7965]*y_cur[IDX_GC2H5I] + - k[7965]*y_cur[IDX_GC2H5I] + k[7966]*y_cur[IDX_GC2H5I] + - k[7966]*y_cur[IDX_GC2H5I] + k[7967]*y_cur[IDX_GC2H5I] + - k[7969]*y_cur[IDX_GHCOI] + k[7970]*y_cur[IDX_GHCOI] + - k[7971]*y_cur[IDX_GSiHI] + k[7973]*y_cur[IDX_GSiH2I] + - k[7975]*y_cur[IDX_GSiH2I] + k[7975]*y_cur[IDX_GSiH2I] + - k[7976]*y_cur[IDX_GSiH2I] + k[7979]*y_cur[IDX_GC2H6I] + - k[7983]*y_cur[IDX_GH2COI] + k[7983]*y_cur[IDX_GH2COI] + - k[7986]*y_cur[IDX_GH2COI] + k[7986]*y_cur[IDX_GH2COI] + - k[7987]*y_cur[IDX_GH2COI] + k[7988]*y_cur[IDX_GSiH3I] + - k[7990]*y_cur[IDX_GSiH3I] + k[7992]*y_cur[IDX_GHNOI] + - k[7994]*y_cur[IDX_GSiH4I] + k[7995]*y_cur[IDX_GSiH4I] + - k[7996]*y_cur[IDX_GPHI] + k[7998]*y_cur[IDX_GCH3OHI] + - k[7999]*y_cur[IDX_GCH3OHI] + k[8000]*y_cur[IDX_GCH3OHI] + - k[8001]*y_cur[IDX_GCH3OHI] + k[8001]*y_cur[IDX_GCH3OHI] + - k[8005]*y_cur[IDX_GO2HI] + k[8007]*y_cur[IDX_GPH2I] + - k[8009]*y_cur[IDX_GPH2I] + k[8009]*y_cur[IDX_GPH2I] + - k[8010]*y_cur[IDX_GPH2I] + k[8011]*y_cur[IDX_GHSI] + - k[8013]*y_cur[IDX_GH2SI] + k[8015]*y_cur[IDX_GH2SI] + - k[8016]*y_cur[IDX_GH2SI] + k[8016]*y_cur[IDX_GH2SI] + - k[8018]*y_cur[IDX_GHClI] + k[8019]*y_cur[IDX_GHClI] + - k[8020]*y_cur[IDX_GC3HI] + k[8021]*y_cur[IDX_GC3H2I] + - k[8023]*y_cur[IDX_GH2CCCI] + k[8026]*y_cur[IDX_GCH2CCHI] + - k[8028]*y_cur[IDX_GCH2CCH2I] + k[8031]*y_cur[IDX_GCH2CCH2I] + - k[8033]*y_cur[IDX_GCH2CCH2I] + k[8033]*y_cur[IDX_GCH2CCH2I] + - k[8037]*y_cur[IDX_GCH3CCHI] + k[8040]*y_cur[IDX_GCH3CCHI] + - k[8042]*y_cur[IDX_GCH3CCHI] + k[8042]*y_cur[IDX_GCH3CCHI] + - k[8045]*y_cur[IDX_GCH3CNI] + k[8047]*y_cur[IDX_GHCSiI] + - k[8049]*y_cur[IDX_GHCSiI] + k[8057]*y_cur[IDX_GSiCH2I] + - k[8058]*y_cur[IDX_GSiCH2I] + k[8063]*y_cur[IDX_GSiCH3I] + - k[8064]*y_cur[IDX_GHNSiI] + k[8077]*y_cur[IDX_GHCPI] + - k[8080]*y_cur[IDX_GCH3CHOI] + k[8080]*y_cur[IDX_GCH3CHOI] + - k[8085]*y_cur[IDX_GHCSI] + k[8087]*y_cur[IDX_GHCSI] + - k[8097]*y_cur[IDX_GH2SiOI] + k[8097]*y_cur[IDX_GH2SiOI] + - k[8103]*y_cur[IDX_GHCOOHI] + k[8103]*y_cur[IDX_GHCOOHI] + - k[8109]*y_cur[IDX_GHPOI] + k[8113]*y_cur[IDX_GC4HI] + - k[8116]*y_cur[IDX_GC4H2I] + k[8118]*y_cur[IDX_GC4H2I] + - k[8120]*y_cur[IDX_GC4H3I] + k[8122]*y_cur[IDX_GHNC3I] + - k[8133]*y_cur[IDX_GSiC2HI] + k[8137]*y_cur[IDX_GSiC2H2I] + - k[8139]*y_cur[IDX_GC2H5CNI] + k[8139]*y_cur[IDX_GC2H5CNI] + - k[8140]*y_cur[IDX_GC2H5CNI] + k[8141]*y_cur[IDX_GC2H5CNI] + - k[8141]*y_cur[IDX_GC2H5CNI] + k[8145]*y_cur[IDX_GHC2PI] + - k[8159]*y_cur[IDX_GC5HI] + k[8163]*y_cur[IDX_GC5H2I] + - k[8170]*y_cur[IDX_GSiC3HI] + k[8174]*y_cur[IDX_GHS2I] + - k[8183]*y_cur[IDX_GC6H2I] + k[8185]*y_cur[IDX_GC6H2I] + - k[8188]*y_cur[IDX_GHC5NI] + k[8197]*y_cur[IDX_GC7HI] + - k[8199]*y_cur[IDX_GC7HI] + k[8200]*y_cur[IDX_GC7H2I] + - k[8202]*y_cur[IDX_GC7H2I] + k[8208]*y_cur[IDX_GC8HI] + - k[8210]*y_cur[IDX_GC8HI] + k[8213]*y_cur[IDX_GC8H2I] + - k[8215]*y_cur[IDX_GC8H2I] + k[8218]*y_cur[IDX_GHC7NI] + - k[8222]*y_cur[IDX_GC9HI] + k[8224]*y_cur[IDX_GC9HI] + - k[8225]*y_cur[IDX_GC9H2I] + k[8227]*y_cur[IDX_GC9H2I] + - k[8236]*y_cur[IDX_GC10HI] + k[8237]*y_cur[IDX_GC10HI] + - k[8239]*y_cur[IDX_GC10HI] + k[8241]*y_cur[IDX_GC10HI] + - k[8242]*y_cur[IDX_GC10HI] + k[8243]*y_cur[IDX_GC10HI] + - k[8248]*y_cur[IDX_GC10H2I] + k[8248]*y_cur[IDX_GC10H2I] + - k[8249]*y_cur[IDX_GC10H2I] + k[8250]*y_cur[IDX_GC10H2I] + - k[8251]*y_cur[IDX_GC10H2I] + k[8254]*y_cur[IDX_GHC9NI] - - k[8273]*y_cur[IDX_GHI]*y_cur[IDX_GHI] - - k[8273]*y_cur[IDX_GHI]*y_cur[IDX_GHI] - - k[8274]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - - k[8275]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - - k[8276]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] - - k[8277]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] - - k[8278]*y_cur[IDX_GHI]*y_cur[IDX_GCH4I] - - k[8279]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - - k[8280]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] - - k[8281]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] - - k[8282]*y_cur[IDX_GHI]*y_cur[IDX_GOI] - - k[8283]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] - - k[8284]*y_cur[IDX_GHI]*y_cur[IDX_GFI] - - k[8285]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - - k[8286]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] - - k[8287]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] - - k[8288]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] - - k[8289]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] - - k[8290]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] - - k[8291]*y_cur[IDX_GHI]*y_cur[IDX_GC2H6I] - - k[8292]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] - - k[8293]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] - - k[8294]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] - - k[8295]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] - - k[8296]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8297]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8298]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8299]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] - - k[8300]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] - - k[8301]*y_cur[IDX_GHI]*y_cur[IDX_GSiI] - - k[8302]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI] - - k[8303]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I] - - k[8304]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I] - - k[8305]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] - - k[8306]*y_cur[IDX_GHI]*y_cur[IDX_GHNOI] - - k[8307]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] - - k[8308]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] - - k[8309]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - - k[8310]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - - k[8311]*y_cur[IDX_GHI]*y_cur[IDX_GSI] - - k[8312]*y_cur[IDX_GHI]*y_cur[IDX_GHSI] - - k[8313]*y_cur[IDX_GHI]*y_cur[IDX_GH2SI] - - k[8314]*y_cur[IDX_GHI]*y_cur[IDX_GClI] - - k[8315]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - - k[8316]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] - - k[8317]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] - - k[8318]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] - - k[8319]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - - k[8320]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - - k[8321]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] - - k[8322]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] - - k[8323]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] - - k[8324]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - - k[8325]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI] - - k[8326]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - - k[8327]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - - k[8328]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - - k[8329]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - - k[8330]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] - - k[8331]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] - - k[8332]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - - k[8333]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - - k[8334]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - - k[8335]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI] - - k[8336]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] - - k[8337]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] - - k[8338]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] - - k[8339]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - - k[8340]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] - - k[8341]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I] - - k[8342]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I] - - k[8343]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] - - k[8344]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI] - - k[8345]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI] - - k[8346]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] - - k[8347]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] - - k[8348]*y_cur[IDX_GHI]*y_cur[IDX_GOCSI] - - k[8349]*y_cur[IDX_GHI]*y_cur[IDX_GSO2I] - - k[8350]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - - k[8351]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] - - k[8352]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - - k[8353]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] - - k[8354]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] - - k[8355]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - - k[8356]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] - - k[8357]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - - k[8358]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] - - k[8359]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] - - k[8360]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - - k[8361]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] - - k[8362]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] - - k[8363]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] - - k[8364]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] - - k[8365]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] - - k[8366]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI] - - k[8367]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - - k[8368]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] + - k[8370]*y_cur[IDX_GH2I]*y_cur[IDX_GCH2I] + - k[8371]*y_cur[IDX_GH2I]*y_cur[IDX_GCH3I] + - k[8372]*y_cur[IDX_GH2I]*y_cur[IDX_GNH2I] + - k[8373]*y_cur[IDX_GH2I]*y_cur[IDX_GOHI] + - k[8374]*y_cur[IDX_GH2I]*y_cur[IDX_GC2I] + - k[8375]*y_cur[IDX_GH2I]*y_cur[IDX_GC2HI] + - k[8376]*y_cur[IDX_GH2I]*y_cur[IDX_GCNI] + - k[8377]*y_cur[IDX_GH2I]*y_cur[IDX_GC3I] + - k[8378]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] + - k[8379]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] + - k[8380]*y_cur[IDX_GH2I]*y_cur[IDX_GC4I] + - k[8381]*y_cur[IDX_GH2I]*y_cur[IDX_GC4HI] + - k[8382]*y_cur[IDX_GH2I]*y_cur[IDX_GC5I] + - k[8383]*y_cur[IDX_GH2I]*y_cur[IDX_GC5HI] + - k[8384]*y_cur[IDX_GH2I]*y_cur[IDX_GC6I] + - k[8385]*y_cur[IDX_GH2I]*y_cur[IDX_GC6HI] + - k[8386]*y_cur[IDX_GH2I]*y_cur[IDX_GC7I] + - k[8387]*y_cur[IDX_GH2I]*y_cur[IDX_GC7HI] + - k[8388]*y_cur[IDX_GH2I]*y_cur[IDX_GC8I] + - k[8389]*y_cur[IDX_GH2I]*y_cur[IDX_GC8HI] + - k[8390]*y_cur[IDX_GH2I]*y_cur[IDX_GC9I] + - k[8391]*y_cur[IDX_GH2I]*y_cur[IDX_GC9HI] + - k[8392]*y_cur[IDX_GH2I]*y_cur[IDX_GC10I] + - k[8393]*y_cur[IDX_GH2I]*y_cur[IDX_GC10HI] + - k[8404]*y_cur[IDX_GCI]*y_cur[IDX_GNH2I] + - k[8408]*y_cur[IDX_GCI]*y_cur[IDX_GOHI] + - k[8414]*y_cur[IDX_GCI]*y_cur[IDX_GHSI] + - k[8440]*y_cur[IDX_GOI]*y_cur[IDX_GNH2I] + - k[8448]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + - k[8449]*y_cur[IDX_GOI]*y_cur[IDX_GHSI] + - k[8458]*y_cur[IDX_GNI]*y_cur[IDX_GNHI] + - k[8463]*y_cur[IDX_GNI]*y_cur[IDX_GHSI] + - k[8474]*y_cur[IDX_GSI]*y_cur[IDX_GCH3I] + - k[8475]*y_cur[IDX_GSI]*y_cur[IDX_GNHI] + - k[8479]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] + - k[8480]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] + - k[8509]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] + - k[8515]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] + - k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] + - k[8561]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - - k[8576]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - - k[8577]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - - k[8578]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] - - k[8579]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] - - k[8580]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - - k[8581]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] - - k[8582]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] - - k[8583]*y_cur[IDX_GHI]*y_cur[IDX_GOI] - - k[8584]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] - - k[8585]*y_cur[IDX_GHI]*y_cur[IDX_GFI] - - k[8586]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - - k[8587]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] - - k[8588]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] - - k[8589]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] - - k[8590]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] - - k[8591]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] - - k[8592]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] - - k[8593]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] - - k[8594]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] - - k[8595]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] - - k[8596]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8597]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8598]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] - - k[8599]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] - - k[8600]*y_cur[IDX_GHI]*y_cur[IDX_GSiI] - - k[8601]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI] - - k[8602]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I] - - k[8603]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I] - - k[8604]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] - - k[8605]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] - - k[8606]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] - - k[8607]*y_cur[IDX_GHI]*y_cur[IDX_GSI] - - k[8608]*y_cur[IDX_GHI]*y_cur[IDX_GHSI] - - k[8609]*y_cur[IDX_GHI]*y_cur[IDX_GClI] - - k[8610]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - - k[8611]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] - - k[8612]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] - - k[8613]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] - - k[8614]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - - k[8615]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - - k[8616]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] - - k[8617]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] - - k[8618]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] - - k[8619]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - - k[8620]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI] - - k[8621]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - - k[8622]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - - k[8623]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - - k[8624]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - - k[8625]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] - - k[8626]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] - - k[8627]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI] - - k[8628]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] - - k[8629]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - - k[8630]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] - - k[8631]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I] - - k[8632]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I] - - k[8633]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] - - k[8634]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI] - - k[8635]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI] - - k[8636]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - - k[8637]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] - - k[8638]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - - k[8639]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] - - k[8640]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] - - k[8641]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - - k[8642]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] - - k[8643]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - - k[8644]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] - - k[8645]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] - - k[8646]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - - k[8647]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] - - k[8648]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] - - k[8649]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] - - k[8650]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] - - k[8651]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] - - k[8652]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI]; - ydot[yistart + IDX_GH2I] = 0.0 + k[6889]*y_cur[IDX_H2I] - - k[7071]*y_cur[IDX_GH2I] - k[7253]*y_cur[IDX_GH2I] - - k[7435]*y_cur[IDX_GH2I] - k[7617]*y_cur[IDX_GH2I] + - k[7620]*y_cur[IDX_GCH2I] + k[7626]*y_cur[IDX_GCH3I] + - k[7628]*y_cur[IDX_GCH3I] + k[7633]*y_cur[IDX_GCH4I] + - k[7635]*y_cur[IDX_GNH3I] + k[7653]*y_cur[IDX_GC2H3I] + - k[7654]*y_cur[IDX_GC2H3I] + k[7657]*y_cur[IDX_GC2H3I] + - k[7658]*y_cur[IDX_GC2H3I] + k[7667]*y_cur[IDX_GC2H4I] + - k[7668]*y_cur[IDX_GC2H4I] + k[7671]*y_cur[IDX_GC2H4I] + - k[7676]*y_cur[IDX_GC2H5I] + k[7677]*y_cur[IDX_GC2H5I] + - k[7687]*y_cur[IDX_GC2H6I] + k[7688]*y_cur[IDX_GC2H6I] + - k[7692]*y_cur[IDX_GH2COI] + k[7695]*y_cur[IDX_GSiH4I] + - k[7709]*y_cur[IDX_GH2SI] + k[7720]*y_cur[IDX_GCH2CCHI] + - k[7746]*y_cur[IDX_GSiCH2I] + k[7775]*y_cur[IDX_GCH2PHI] + - k[7776]*y_cur[IDX_GH2SiOI] + k[7777]*y_cur[IDX_GH2CSI] + - k[7808]*y_cur[IDX_GSiC2H2I] + k[7858]*y_cur[IDX_GC6H6I] - - k[7893]*y_cur[IDX_GH2I] + k[7897]*y_cur[IDX_GCH2I] + - k[7903]*y_cur[IDX_GCH3I] + k[7905]*y_cur[IDX_GCH3I] + - k[7910]*y_cur[IDX_GCH4I] + k[7912]*y_cur[IDX_GCH4I] + - k[7916]*y_cur[IDX_GNH3I] + k[7922]*y_cur[IDX_GH2OI] + - k[7923]*y_cur[IDX_GH2OI] + k[7940]*y_cur[IDX_GC2H3I] + - k[7941]*y_cur[IDX_GC2H3I] + k[7944]*y_cur[IDX_GC2H3I] + - k[7945]*y_cur[IDX_GC2H3I] + k[7954]*y_cur[IDX_GC2H4I] + - k[7955]*y_cur[IDX_GC2H4I] + k[7958]*y_cur[IDX_GC2H4I] + - k[7963]*y_cur[IDX_GC2H5I] + k[7964]*y_cur[IDX_GC2H5I] + - k[7972]*y_cur[IDX_GCH2NHI] + k[7974]*y_cur[IDX_GSiH2I] + - k[7977]*y_cur[IDX_GC2H6I] + k[7978]*y_cur[IDX_GC2H6I] + - k[7982]*y_cur[IDX_GH2COI] + k[7985]*y_cur[IDX_GH2COI] + - k[7989]*y_cur[IDX_GSiH3I] + k[7991]*y_cur[IDX_GSiH3I] + - k[7993]*y_cur[IDX_GSiH4I] + k[7995]*y_cur[IDX_GSiH4I] + - k[8008]*y_cur[IDX_GPH2I] + k[8014]*y_cur[IDX_GH2SI] + - k[8022]*y_cur[IDX_GH2CCCI] + k[8027]*y_cur[IDX_GCH2CCHI] + - k[8029]*y_cur[IDX_GCH2CCH2I] + k[8038]*y_cur[IDX_GCH3CCHI] + - k[8060]*y_cur[IDX_GSiCH2I] + k[8096]*y_cur[IDX_GH2SiOI] + - k[8098]*y_cur[IDX_GH2CSI] + k[8119]*y_cur[IDX_GC4H3I] + - k[8132]*y_cur[IDX_GCH2CHCNI] + k[8184]*y_cur[IDX_GC6H2I] + - k[8201]*y_cur[IDX_GC7H2I] + k[8214]*y_cur[IDX_GC8H2I] + - k[8226]*y_cur[IDX_GC9H2I] + k[8278]*y_cur[IDX_GHI]*y_cur[IDX_GCH4I] - + k[8291]*y_cur[IDX_GHI]*y_cur[IDX_GC2H6I] + - k[8298]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + - k[8306]*y_cur[IDX_GHI]*y_cur[IDX_GHNOI] + - k[8309]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] + - k[8313]*y_cur[IDX_GHI]*y_cur[IDX_GH2SI] + - k[8332]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + - k[8337]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + - k[8347]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] + - k[8367]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - - k[8369]*y_cur[IDX_GH2I]*y_cur[IDX_GCI] - - k[8370]*y_cur[IDX_GH2I]*y_cur[IDX_GCH2I] - - k[8371]*y_cur[IDX_GH2I]*y_cur[IDX_GCH3I] - - k[8372]*y_cur[IDX_GH2I]*y_cur[IDX_GNH2I] - - k[8373]*y_cur[IDX_GH2I]*y_cur[IDX_GOHI] - - k[8374]*y_cur[IDX_GH2I]*y_cur[IDX_GC2I] - - k[8375]*y_cur[IDX_GH2I]*y_cur[IDX_GC2HI] - - k[8376]*y_cur[IDX_GH2I]*y_cur[IDX_GCNI] - - k[8377]*y_cur[IDX_GH2I]*y_cur[IDX_GC3I] - - k[8378]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] - - k[8379]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] - - k[8380]*y_cur[IDX_GH2I]*y_cur[IDX_GC4I] - - k[8381]*y_cur[IDX_GH2I]*y_cur[IDX_GC4HI] - - k[8382]*y_cur[IDX_GH2I]*y_cur[IDX_GC5I] - - k[8383]*y_cur[IDX_GH2I]*y_cur[IDX_GC5HI] - - k[8384]*y_cur[IDX_GH2I]*y_cur[IDX_GC6I] - - k[8385]*y_cur[IDX_GH2I]*y_cur[IDX_GC6HI] - - k[8386]*y_cur[IDX_GH2I]*y_cur[IDX_GC7I] - - k[8387]*y_cur[IDX_GH2I]*y_cur[IDX_GC7HI] - - k[8388]*y_cur[IDX_GH2I]*y_cur[IDX_GC8I] - - k[8389]*y_cur[IDX_GH2I]*y_cur[IDX_GC8HI] - - k[8390]*y_cur[IDX_GH2I]*y_cur[IDX_GC9I] - - k[8391]*y_cur[IDX_GH2I]*y_cur[IDX_GC9HI] - - k[8392]*y_cur[IDX_GH2I]*y_cur[IDX_GC10I] - - k[8393]*y_cur[IDX_GH2I]*y_cur[IDX_GC10HI] + - k[8524]*y_cur[IDX_GNHI]*y_cur[IDX_GNHI] - - k[8653]*y_cur[IDX_GH2I]*y_cur[IDX_GCI]; - ydot[yistart + IDX_GH2CCCI] = 0.0 + k[6946]*y_cur[IDX_H2CCCI] - - k[7128]*y_cur[IDX_GH2CCCI] - k[7310]*y_cur[IDX_GH2CCCI] - - k[7492]*y_cur[IDX_GH2CCCI] - k[7716]*y_cur[IDX_GH2CCCI] + - k[7725]*y_cur[IDX_GCH2CCH2I] + k[7733]*y_cur[IDX_GCH3CCHI] - - k[8022]*y_cur[IDX_GH2CCCI] - k[8023]*y_cur[IDX_GH2CCCI] + - k[8029]*y_cur[IDX_GCH2CCH2I] + k[8033]*y_cur[IDX_GCH2CCH2I] + - k[8038]*y_cur[IDX_GCH3CCHI] + k[8042]*y_cur[IDX_GCH3CCHI] - - k[8318]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] + - k[8378]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] - - k[8613]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI]; - ydot[yistart + IDX_GH2CNI] = 0.0 + k[6914]*y_cur[IDX_H2CNI] - - k[7096]*y_cur[IDX_GH2CNI] - k[7278]*y_cur[IDX_GH2CNI] - - k[7460]*y_cur[IDX_GH2CNI] - k[7665]*y_cur[IDX_GH2CNI] - - k[7952]*y_cur[IDX_GH2CNI] - k[8293]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] - + k[8456]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] - - k[8593]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI]; - ydot[yistart + IDX_GH2COI] = 0.0 + k[6926]*y_cur[IDX_H2COI] - - k[7108]*y_cur[IDX_GH2COI] - k[7290]*y_cur[IDX_GH2COI] - - k[7472]*y_cur[IDX_GH2COI] - k[7692]*y_cur[IDX_GH2COI] + - k[7701]*y_cur[IDX_GCH3OHI] + k[7769]*y_cur[IDX_GCH3OCH3I] + - k[7774]*y_cur[IDX_GC2H5OHI] - k[7982]*y_cur[IDX_GH2COI] - - k[7983]*y_cur[IDX_GH2COI] - k[7984]*y_cur[IDX_GH2COI] - - k[7985]*y_cur[IDX_GH2COI] - k[7986]*y_cur[IDX_GH2COI] - - k[7987]*y_cur[IDX_GH2COI] + k[8001]*y_cur[IDX_GCH3OHI] + - k[8089]*y_cur[IDX_GCH3OCH3I] + k[8094]*y_cur[IDX_GC2H5OHI] + - k[8150]*y_cur[IDX_GHCOOCH3I] + k[8150]*y_cur[IDX_GHCOOCH3I] + - k[8295]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] - - k[8296]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8297]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8298]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + - k[8334]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + - k[8438]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - - k[8508]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - - k[8509]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - - k[8522]*y_cur[IDX_GNHI]*y_cur[IDX_GH2COI] + - k[8528]*y_cur[IDX_GCH2I]*y_cur[IDX_GO2I] - - k[8534]*y_cur[IDX_GNH2I]*y_cur[IDX_GH2COI] - - k[8544]*y_cur[IDX_GCH3I]*y_cur[IDX_GH2COI] - - k[8560]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - - k[8561]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - - k[8570]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GH2COI] - - k[8596]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - - k[8597]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI]; - ydot[yistart + IDX_GH2CSI] = 0.0 + k[6989]*y_cur[IDX_H2CSI] - - k[7171]*y_cur[IDX_GH2CSI] - k[7353]*y_cur[IDX_GH2CSI] - - k[7535]*y_cur[IDX_GH2CSI] - k[7777]*y_cur[IDX_GH2CSI] - - k[8098]*y_cur[IDX_GH2CSI] + k[8335]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI] - + k[8474]*y_cur[IDX_GSI]*y_cur[IDX_GCH3I]; - ydot[yistart + IDX_GH2OI] = 0.0 + k[6902]*y_cur[IDX_H2OI] - - k[7084]*y_cur[IDX_GH2OI] - k[7266]*y_cur[IDX_GH2OI] - - k[7448]*y_cur[IDX_GH2OI] - k[7639]*y_cur[IDX_GH2OI] + - k[7700]*y_cur[IDX_GCH3OHI] + k[7743]*y_cur[IDX_GCH2COI] - - k[7921]*y_cur[IDX_GH2OI] - k[7922]*y_cur[IDX_GH2OI] - - k[7923]*y_cur[IDX_GH2OI] - k[7924]*y_cur[IDX_GH2OI] - - k[7925]*y_cur[IDX_GH2OI] + k[8000]*y_cur[IDX_GCH3OHI] + - k[8054]*y_cur[IDX_GCH2COI] + k[8283]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] - + k[8310]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] + - k[8338]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + - k[8373]*y_cur[IDX_GH2I]*y_cur[IDX_GOHI] + - k[8506]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + - k[8508]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] + - k[8510]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOHI] + - k[8512]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] + - k[8519]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] + - k[8530]*y_cur[IDX_GNH2I]*y_cur[IDX_GNOI]; - ydot[yistart + IDX_GH2O2I] = 0.0 + k[6940]*y_cur[IDX_H2O2I] - - k[7122]*y_cur[IDX_GH2O2I] - k[7304]*y_cur[IDX_GH2O2I] - - k[7486]*y_cur[IDX_GH2O2I] - k[7708]*y_cur[IDX_GH2O2I] - - k[8012]*y_cur[IDX_GH2O2I] + k[8308]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] - - k[8309]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - - k[8310]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] + - k[8514]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI]; - ydot[yistart + IDX_GH2SI] = 0.0 + k[6941]*y_cur[IDX_H2SI] - - k[7123]*y_cur[IDX_GH2SI] - k[7305]*y_cur[IDX_GH2SI] - - k[7487]*y_cur[IDX_GH2SI] - k[7709]*y_cur[IDX_GH2SI] - - k[7710]*y_cur[IDX_GH2SI] - k[7711]*y_cur[IDX_GH2SI] - - k[8013]*y_cur[IDX_GH2SI] - k[8014]*y_cur[IDX_GH2SI] - - k[8015]*y_cur[IDX_GH2SI] - k[8016]*y_cur[IDX_GH2SI] + - k[8312]*y_cur[IDX_GHI]*y_cur[IDX_GHSI] - - k[8313]*y_cur[IDX_GHI]*y_cur[IDX_GH2SI]; - ydot[yistart + IDX_GH2S2I] = 0.0 + k[7038]*y_cur[IDX_H2S2I] - - k[7220]*y_cur[IDX_GH2S2I] - k[7402]*y_cur[IDX_GH2S2I] - - k[7584]*y_cur[IDX_GH2S2I] - k[7846]*y_cur[IDX_GH2S2I] - - k[8175]*y_cur[IDX_GH2S2I]; - ydot[yistart + IDX_GH2SiOI] = 0.0 + k[6988]*y_cur[IDX_H2SiOI] - - k[7170]*y_cur[IDX_GH2SiOI] - k[7352]*y_cur[IDX_GH2SiOI] - - k[7534]*y_cur[IDX_GH2SiOI] - k[7776]*y_cur[IDX_GH2SiOI] - - k[8096]*y_cur[IDX_GH2SiOI] - k[8097]*y_cur[IDX_GH2SiOI]; - ydot[yistart + IDX_GHC2OI] = 0.0 + k[6958]*y_cur[IDX_HC2OI] - - k[7140]*y_cur[IDX_GHC2OI] - k[7322]*y_cur[IDX_GHC2OI] - - k[7504]*y_cur[IDX_GHC2OI] - k[7887]*y_cur[IDX_GHC2OI] + - k[8324]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - - k[8325]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI] - - k[8620]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI]; - ydot[yistart + IDX_GHC2PI] = 0.0 + k[7017]*y_cur[IDX_HC2PI] - - k[7199]*y_cur[IDX_GHC2PI] - k[7381]*y_cur[IDX_GHC2PI] - - k[7567]*y_cur[IDX_GHC2PI] - k[7817]*y_cur[IDX_GHC2PI] - - k[8145]*y_cur[IDX_GHC2PI]; - ydot[yistart + IDX_GHC3NI] = 0.0 + k[7001]*y_cur[IDX_HC3NI] - - k[7183]*y_cur[IDX_GHC3NI] - k[7365]*y_cur[IDX_GHC3NI] - - k[7547]*y_cur[IDX_GHC3NI] - k[7798]*y_cur[IDX_GHC3NI] - - k[8123]*y_cur[IDX_GHC3NI] + k[8132]*y_cur[IDX_GCH2CHCNI] + - k[8343]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] + - k[8466]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI]; - ydot[yistart + IDX_GHC5NI] = 0.0 + k[7045]*y_cur[IDX_HC5NI] - - k[7227]*y_cur[IDX_GHC5NI] - k[7409]*y_cur[IDX_GHC5NI] - - k[7591]*y_cur[IDX_GHC5NI] - k[7855]*y_cur[IDX_GHC5NI] - - k[7856]*y_cur[IDX_GHC5NI] - k[8187]*y_cur[IDX_GHC5NI] - - k[8188]*y_cur[IDX_GHC5NI] + k[8354]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] - + k[8468]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI]; - ydot[yistart + IDX_GHC7NI] = 0.0 + k[7059]*y_cur[IDX_HC7NI] - - k[7241]*y_cur[IDX_GHC7NI] - k[7423]*y_cur[IDX_GHC7NI] - - k[7605]*y_cur[IDX_GHC7NI] - k[7870]*y_cur[IDX_GHC7NI] - - k[8216]*y_cur[IDX_GHC7NI] - k[8217]*y_cur[IDX_GHC7NI] - - k[8218]*y_cur[IDX_GHC7NI] + k[8359]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] - + k[8470]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI]; - ydot[yistart + IDX_GHC9NI] = 0.0 + k[7068]*y_cur[IDX_HC9NI] - - k[7250]*y_cur[IDX_GHC9NI] - k[7432]*y_cur[IDX_GHC9NI] - - k[7614]*y_cur[IDX_GHC9NI] - k[7879]*y_cur[IDX_GHC9NI] - - k[8252]*y_cur[IDX_GHC9NI] - k[8253]*y_cur[IDX_GHC9NI] - - k[8254]*y_cur[IDX_GHC9NI] + k[8364]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] - + k[8472]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI]; - ydot[yistart + IDX_GHCCNI] = 0.0 + k[6949]*y_cur[IDX_HCCNI] - - k[7131]*y_cur[IDX_GHCCNI] - k[7313]*y_cur[IDX_GHCCNI] - - k[7495]*y_cur[IDX_GHCCNI] - k[7886]*y_cur[IDX_GHCCNI] + - k[8321]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] - - k[8322]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] + - k[8488]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - - k[8617]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI]; - ydot[yistart + IDX_GHCNI] = 0.0 + k[6911]*y_cur[IDX_HCNI] - - k[7093]*y_cur[IDX_GHCNI] - k[7275]*y_cur[IDX_GHCNI] - - k[7457]*y_cur[IDX_GHCNI] - k[7651]*y_cur[IDX_GHCNI] + - k[7665]*y_cur[IDX_GH2CNI] + k[7737]*y_cur[IDX_GCH3CNI] + - k[7810]*y_cur[IDX_GC2H5CNI] - k[7938]*y_cur[IDX_GHCNI] + - k[7952]*y_cur[IDX_GH2CNI] + k[8046]*y_cur[IDX_GCH3CNI] + - k[8139]*y_cur[IDX_GC2H5CNI] + k[8292]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] - + k[8376]*y_cur[IDX_GH2I]*y_cur[IDX_GCNI] + - k[8455]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] + - k[8480]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] + - k[8481]*y_cur[IDX_GCHI]*y_cur[IDX_GNOI]; - ydot[yistart + IDX_GHCNOI] = 0.0 + k[6971]*y_cur[IDX_HCNOI] - - k[7153]*y_cur[IDX_GHCNOI] - k[7335]*y_cur[IDX_GHCNOI] - - k[7517]*y_cur[IDX_GHCNOI] - k[7752]*y_cur[IDX_GHCNOI] - - k[8066]*y_cur[IDX_GHCNOI] + k[8326]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; - ydot[yistart + IDX_GHCOI] = 0.0 + k[6919]*y_cur[IDX_HCOI] - - k[7101]*y_cur[IDX_GHCOI] - k[7283]*y_cur[IDX_GHCOI] - - k[7465]*y_cur[IDX_GHCOI] - k[7682]*y_cur[IDX_GHCOI] - - k[7683]*y_cur[IDX_GHCOI] + k[7761]*y_cur[IDX_GCH3CHOI] + - k[7763]*y_cur[IDX_GCH3CHOI] + k[7780]*y_cur[IDX_GHCOOHI] + - k[7890]*y_cur[IDX_GCH2OHCHOI] - k[7969]*y_cur[IDX_GHCOI] - - k[7970]*y_cur[IDX_GHCOI] + k[7987]*y_cur[IDX_GH2COI] + - k[8079]*y_cur[IDX_GCH3CHOI] + k[8081]*y_cur[IDX_GCH3CHOI] + - k[8102]*y_cur[IDX_GHCOOHI] + k[8104]*y_cur[IDX_GHCOOHI] + - k[8270]*y_cur[IDX_GCH2OHCHOI] + - k[8294]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] - - k[8295]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] + - k[8298]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + - k[8333]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + - k[8338]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + - k[8346]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] + - k[8368]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - - k[8434]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + - k[8437]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - - k[8448]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + - k[8485]*y_cur[IDX_GCHI]*y_cur[IDX_GO2I] + - k[8507]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + - k[8508]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - - k[8517]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] + - k[8522]*y_cur[IDX_GNHI]*y_cur[IDX_GH2COI] + - k[8534]*y_cur[IDX_GNH2I]*y_cur[IDX_GH2COI] - - k[8543]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] + - k[8544]*y_cur[IDX_GCH3I]*y_cur[IDX_GH2COI] + - k[8548]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] + - k[8557]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - - k[8559]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] + - k[8560]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - - k[8569]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI] + - k[8570]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GH2COI] + - k[8571]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - - k[8595]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] - - k[8740]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] - - k[8751]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] - - k[8759]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] - - k[8762]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI]; - ydot[yistart + IDX_GHCOOCH3I] = 0.0 + k[7021]*y_cur[IDX_HCOOCH3I] - - k[7203]*y_cur[IDX_GHCOOCH3I] - k[7385]*y_cur[IDX_GHCOOCH3I] - - k[7569]*y_cur[IDX_GHCOOCH3I] - k[7824]*y_cur[IDX_GHCOOCH3I] - - k[7825]*y_cur[IDX_GHCOOCH3I] - k[7826]*y_cur[IDX_GHCOOCH3I] - - k[8150]*y_cur[IDX_GHCOOCH3I] - - k[8346]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] - - k[8347]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] + - k[8365]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] - - k[8511]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - - k[8512]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - - k[8537]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOCH3I] - - k[8555]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOCH3I] + - k[8559]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] + - k[8561]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] + - k[8563]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - - k[8565]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOCH3I] + - k[8566]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI]; - ydot[yistart + IDX_GHCOOHI] = 0.0 + k[6986]*y_cur[IDX_HCOOHI] - - k[7168]*y_cur[IDX_GHCOOHI] - k[7350]*y_cur[IDX_GHCOOHI] - - k[7532]*y_cur[IDX_GHCOOHI] - k[7780]*y_cur[IDX_GHCOOHI] - - k[8102]*y_cur[IDX_GHCOOHI] - k[8103]*y_cur[IDX_GHCOOHI] - - k[8104]*y_cur[IDX_GHCOOHI] + - k[8336]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] - - k[8337]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] - - k[8338]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + - k[8505]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + - k[8509]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - - k[8510]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOHI] + - k[8511]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] + - k[8517]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] + - k[8520]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - - k[8536]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOHI] - - k[8550]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOHI] - - k[8564]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOHI]; - ydot[yistart + IDX_GHCPI] = 0.0 + k[6976]*y_cur[IDX_HCPI] - - k[7158]*y_cur[IDX_GHCPI] - k[7340]*y_cur[IDX_GHCPI] - - k[7522]*y_cur[IDX_GHCPI] - k[7759]*y_cur[IDX_GHCPI] + - k[7775]*y_cur[IDX_GCH2PHI] - k[8077]*y_cur[IDX_GHCPI]; - ydot[yistart + IDX_GHCSI] = 0.0 + k[6980]*y_cur[IDX_HCSI] - - k[7162]*y_cur[IDX_GHCSI] - k[7344]*y_cur[IDX_GHCSI] - - k[7526]*y_cur[IDX_GHCSI] - k[7766]*y_cur[IDX_GHCSI] - - k[7767]*y_cur[IDX_GHCSI] - k[8085]*y_cur[IDX_GHCSI] - - k[8086]*y_cur[IDX_GHCSI] - k[8087]*y_cur[IDX_GHCSI] + - k[8330]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] - - k[8335]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI] + - k[8473]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - - k[8627]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI]; - ydot[yistart + IDX_GHCSiI] = 0.0 + k[6956]*y_cur[IDX_HCSiI] - - k[7138]*y_cur[IDX_GHCSiI] - k[7320]*y_cur[IDX_GHCSiI] - - k[7502]*y_cur[IDX_GHCSiI] - k[7738]*y_cur[IDX_GHCSiI] - - k[8047]*y_cur[IDX_GHCSiI] - k[8048]*y_cur[IDX_GHCSiI] - - k[8049]*y_cur[IDX_GHCSiI] + k[8057]*y_cur[IDX_GSiCH2I] + - k[8058]*y_cur[IDX_GSiCH2I]; - ydot[yistart + IDX_GHClI] = 0.0 + k[6944]*y_cur[IDX_HClI] - - k[7126]*y_cur[IDX_GHClI] - k[7308]*y_cur[IDX_GHClI] - - k[7490]*y_cur[IDX_GHClI] - k[7713]*y_cur[IDX_GHClI] - - k[8018]*y_cur[IDX_GHClI] - k[8019]*y_cur[IDX_GHClI] + - k[8314]*y_cur[IDX_GHI]*y_cur[IDX_GClI]; - ydot[yistart + IDX_GHFI] = 0.0 + k[6904]*y_cur[IDX_HFI] - - k[7086]*y_cur[IDX_GHFI] - k[7268]*y_cur[IDX_GHFI] - - k[7450]*y_cur[IDX_GHFI] - k[7640]*y_cur[IDX_GHFI] - - k[7926]*y_cur[IDX_GHFI] + k[8284]*y_cur[IDX_GHI]*y_cur[IDX_GFI]; - ydot[yistart + IDX_GHNCI] = 0.0 + k[6913]*y_cur[IDX_HNCI] - - k[7095]*y_cur[IDX_GHNCI] - k[7277]*y_cur[IDX_GHNCI] - - k[7459]*y_cur[IDX_GHNCI] - k[7650]*y_cur[IDX_GHNCI] + - k[7811]*y_cur[IDX_GC2H5CNI] - k[7937]*y_cur[IDX_GHNCI] + - k[7972]*y_cur[IDX_GCH2NHI] + k[8140]*y_cur[IDX_GC2H5CNI] + - k[8403]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] + - k[8404]*y_cur[IDX_GCI]*y_cur[IDX_GNH2I] + - k[8479]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI]; - ydot[yistart + IDX_GHNC3I] = 0.0 + k[7000]*y_cur[IDX_HNC3I] - - k[7182]*y_cur[IDX_GHNC3I] - k[7364]*y_cur[IDX_GHNC3I] - - k[7546]*y_cur[IDX_GHNC3I] - k[7797]*y_cur[IDX_GHNC3I] - - k[8122]*y_cur[IDX_GHNC3I]; - ydot[yistart + IDX_GHNCOI] = 0.0 + k[6968]*y_cur[IDX_HNCOI] - - k[7150]*y_cur[IDX_GHNCOI] - k[7332]*y_cur[IDX_GHNCOI] - - k[7514]*y_cur[IDX_GHNCOI] - k[7751]*y_cur[IDX_GHNCOI] - - k[8065]*y_cur[IDX_GHNCOI] + k[8329]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - + k[8526]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_GHNOI] = 0.0 + k[6930]*y_cur[IDX_HNOI] - - k[7112]*y_cur[IDX_GHNOI] - k[7294]*y_cur[IDX_GHNOI] - - k[7476]*y_cur[IDX_GHNOI] - k[7694]*y_cur[IDX_GHNOI] - - k[7992]*y_cur[IDX_GHNOI] + k[8305]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] - - k[8306]*y_cur[IDX_GHI]*y_cur[IDX_GHNOI] - - k[8435]*y_cur[IDX_GOI]*y_cur[IDX_GHNOI] + - k[8439]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] + - k[8440]*y_cur[IDX_GOI]*y_cur[IDX_GNH2I] - - k[8477]*y_cur[IDX_GCHI]*y_cur[IDX_GHNOI] - - k[8533]*y_cur[IDX_GCH2I]*y_cur[IDX_GHNOI] - - k[8541]*y_cur[IDX_GCH3I]*y_cur[IDX_GHNOI]; - ydot[yistart + IDX_GHNSiI] = 0.0 + k[6967]*y_cur[IDX_HNSiI] - - k[7149]*y_cur[IDX_GHNSiI] - k[7331]*y_cur[IDX_GHNSiI] - - k[7513]*y_cur[IDX_GHNSiI] - k[7750]*y_cur[IDX_GHNSiI] - - k[8064]*y_cur[IDX_GHNSiI]; - ydot[yistart + IDX_GHOCNI] = 0.0 + k[6969]*y_cur[IDX_HOCNI] - - k[7151]*y_cur[IDX_GHOCNI] - k[7333]*y_cur[IDX_GHOCNI] - - k[7515]*y_cur[IDX_GHOCNI] - k[7755]*y_cur[IDX_GHOCNI] - - k[8069]*y_cur[IDX_GHOCNI] + k[8328]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI]; - ydot[yistart + IDX_GHONCI] = 0.0 + k[6973]*y_cur[IDX_HONCI] - - k[7155]*y_cur[IDX_GHONCI] - k[7337]*y_cur[IDX_GHONCI] - - k[7519]*y_cur[IDX_GHONCI] - k[7754]*y_cur[IDX_GHONCI] - - k[8068]*y_cur[IDX_GHONCI] + k[8327]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; - ydot[yistart + IDX_GHPOI] = 0.0 + k[6993]*y_cur[IDX_HPOI] - - k[7175]*y_cur[IDX_GHPOI] - k[7357]*y_cur[IDX_GHPOI] - - k[7539]*y_cur[IDX_GHPOI] - k[7785]*y_cur[IDX_GHPOI] - - k[8109]*y_cur[IDX_GHPOI]; - ydot[yistart + IDX_GHSI] = 0.0 + k[6938]*y_cur[IDX_HSI] - - k[7120]*y_cur[IDX_GHSI] - k[7302]*y_cur[IDX_GHSI] - - k[7484]*y_cur[IDX_GHSI] - k[7707]*y_cur[IDX_GHSI] + - k[7710]*y_cur[IDX_GH2SI] + k[7845]*y_cur[IDX_GHS2I] + - k[7846]*y_cur[IDX_GH2S2I] + k[7846]*y_cur[IDX_GH2S2I] - - k[8011]*y_cur[IDX_GHSI] + k[8013]*y_cur[IDX_GH2SI] + - k[8015]*y_cur[IDX_GH2SI] + k[8172]*y_cur[IDX_GHS2I] + - k[8173]*y_cur[IDX_GHS2I] + k[8175]*y_cur[IDX_GH2S2I] + - k[8175]*y_cur[IDX_GH2S2I] + k[8311]*y_cur[IDX_GHI]*y_cur[IDX_GSI] - - k[8312]*y_cur[IDX_GHI]*y_cur[IDX_GHSI] + - k[8313]*y_cur[IDX_GHI]*y_cur[IDX_GH2SI] + - k[8348]*y_cur[IDX_GHI]*y_cur[IDX_GOCSI] + - k[8349]*y_cur[IDX_GHI]*y_cur[IDX_GSO2I] - - k[8414]*y_cur[IDX_GCI]*y_cur[IDX_GHSI] - - k[8449]*y_cur[IDX_GOI]*y_cur[IDX_GHSI] - - k[8463]*y_cur[IDX_GNI]*y_cur[IDX_GHSI] - - k[8608]*y_cur[IDX_GHI]*y_cur[IDX_GHSI]; - ydot[yistart + IDX_GHS2I] = 0.0 + k[7037]*y_cur[IDX_HS2I] - - k[7219]*y_cur[IDX_GHS2I] - k[7401]*y_cur[IDX_GHS2I] - - k[7583]*y_cur[IDX_GHS2I] - k[7845]*y_cur[IDX_GHS2I] - - k[8172]*y_cur[IDX_GHS2I] - k[8173]*y_cur[IDX_GHS2I] - - k[8174]*y_cur[IDX_GHS2I]; - ydot[yistart + IDX_GHeI] = 0.0 + k[6890]*y_cur[IDX_HeI] - - k[7072]*y_cur[IDX_GHeI] - k[7254]*y_cur[IDX_GHeI] - - k[7436]*y_cur[IDX_GHeI]; - ydot[yistart + IDX_GMgI] = 0.0 + k[6906]*y_cur[IDX_MgI] - - k[7088]*y_cur[IDX_GMgI] - k[7270]*y_cur[IDX_GMgI] - - k[7452]*y_cur[IDX_GMgI]; - ydot[yistart + IDX_GNI] = 0.0 + k[6894]*y_cur[IDX_NI] - - k[7076]*y_cur[IDX_GNI] - k[7258]*y_cur[IDX_GNI] - - k[7440]*y_cur[IDX_GNI] + k[7623]*y_cur[IDX_GNHI] + - k[7624]*y_cur[IDX_GNHI] + k[7631]*y_cur[IDX_GNH2I] + - k[7649]*y_cur[IDX_GCNI] + k[7666]*y_cur[IDX_GN2I] + - k[7666]*y_cur[IDX_GN2I] + k[7690]*y_cur[IDX_GNOI] + - k[7691]*y_cur[IDX_GNOI] + k[7717]*y_cur[IDX_GC2NI] + - k[7748]*y_cur[IDX_GSiNI] + k[7756]*y_cur[IDX_GN2OI] + - k[7768]*y_cur[IDX_GPNI] + k[7779]*y_cur[IDX_GNSI] + - k[7900]*y_cur[IDX_GNHI] + k[7901]*y_cur[IDX_GNHI] + - k[7908]*y_cur[IDX_GNH2I] + k[7936]*y_cur[IDX_GCNI] + - k[7953]*y_cur[IDX_GN2I] + k[7953]*y_cur[IDX_GN2I] + - k[7980]*y_cur[IDX_GNOI] + k[7981]*y_cur[IDX_GNOI] + - k[8024]*y_cur[IDX_GC2NI] + k[8062]*y_cur[IDX_GSiNI] + - k[8071]*y_cur[IDX_GN2OI] + k[8073]*y_cur[IDX_GN2OI] + - k[8074]*y_cur[IDX_GN2OI] + k[8074]*y_cur[IDX_GN2OI] + - k[8088]*y_cur[IDX_GPNI] + k[8101]*y_cur[IDX_GNSI] + - k[8127]*y_cur[IDX_GNCCNI] + k[8161]*y_cur[IDX_GC4NI] - - k[8279]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - - k[8397]*y_cur[IDX_GCI]*y_cur[IDX_GNI] - - k[8454]*y_cur[IDX_GNI]*y_cur[IDX_GO2HI] - - k[8455]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] - - k[8456]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] - - k[8457]*y_cur[IDX_GNI]*y_cur[IDX_GNI] - - k[8457]*y_cur[IDX_GNI]*y_cur[IDX_GNI] - - k[8458]*y_cur[IDX_GNI]*y_cur[IDX_GNHI] - - k[8459]*y_cur[IDX_GNI]*y_cur[IDX_GNSI] - - k[8460]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] - - k[8461]*y_cur[IDX_GNI]*y_cur[IDX_GOI] - - k[8462]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - - k[8463]*y_cur[IDX_GNI]*y_cur[IDX_GHSI] - - k[8464]*y_cur[IDX_GNI]*y_cur[IDX_GSI] - - k[8465]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - - k[8466]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI] - - k[8467]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - - k[8468]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI] - - k[8469]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - - k[8470]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI] - - k[8471]*y_cur[IDX_GNI]*y_cur[IDX_GC9I] - - k[8472]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI] - - k[8580]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - - k[8657]*y_cur[IDX_GCI]*y_cur[IDX_GNI] - - k[8698]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] - - k[8699]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] - - k[8700]*y_cur[IDX_GNI]*y_cur[IDX_GNI] - - k[8700]*y_cur[IDX_GNI]*y_cur[IDX_GNI] - - k[8701]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] - - k[8702]*y_cur[IDX_GNI]*y_cur[IDX_GOI] - - k[8703]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - - k[8704]*y_cur[IDX_GNI]*y_cur[IDX_GSI] - - k[8705]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - - k[8706]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI] - - k[8707]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - - k[8708]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI] - - k[8709]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - - k[8710]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI] - - k[8711]*y_cur[IDX_GNI]*y_cur[IDX_GC9I] - - k[8712]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI]; - ydot[yistart + IDX_GN2I] = 0.0 + k[6916]*y_cur[IDX_N2I] - - k[7098]*y_cur[IDX_GN2I] - k[7280]*y_cur[IDX_GN2I] - - k[7462]*y_cur[IDX_GN2I] - k[7666]*y_cur[IDX_GN2I] - - k[7953]*y_cur[IDX_GN2I] + k[8070]*y_cur[IDX_GN2OI] + - k[8072]*y_cur[IDX_GN2OI] + k[8457]*y_cur[IDX_GNI]*y_cur[IDX_GNI] + - k[8458]*y_cur[IDX_GNI]*y_cur[IDX_GNHI] + - k[8459]*y_cur[IDX_GNI]*y_cur[IDX_GNSI] + - k[8524]*y_cur[IDX_GNHI]*y_cur[IDX_GNHI] + - k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] + - k[8530]*y_cur[IDX_GNH2I]*y_cur[IDX_GNOI]; - ydot[yistart + IDX_GN2OI] = 0.0 + k[6974]*y_cur[IDX_N2OI] - - k[7156]*y_cur[IDX_GN2OI] - k[7338]*y_cur[IDX_GN2OI] - - k[7520]*y_cur[IDX_GN2OI] - k[7756]*y_cur[IDX_GN2OI] - - k[8070]*y_cur[IDX_GN2OI] - k[8071]*y_cur[IDX_GN2OI] - - k[8072]*y_cur[IDX_GN2OI] - k[8073]*y_cur[IDX_GN2OI] - - k[8074]*y_cur[IDX_GN2OI]; - ydot[yistart + IDX_GNCCNI] = 0.0 + k[7005]*y_cur[IDX_NCCNI] - - k[7187]*y_cur[IDX_GNCCNI] - k[7369]*y_cur[IDX_GNCCNI] - - k[7551]*y_cur[IDX_GNCCNI] - k[7801]*y_cur[IDX_GNCCNI] - - k[8126]*y_cur[IDX_GNCCNI] - k[8127]*y_cur[IDX_GNCCNI] - - k[8128]*y_cur[IDX_GNCCNI]; - ydot[yistart + IDX_GNHI] = 0.0 + k[6896]*y_cur[IDX_NHI] - - k[7078]*y_cur[IDX_GNHI] - k[7260]*y_cur[IDX_GNHI] - - k[7442]*y_cur[IDX_GNHI] - k[7623]*y_cur[IDX_GNHI] - - k[7624]*y_cur[IDX_GNHI] + k[7630]*y_cur[IDX_GNH2I] + - k[7632]*y_cur[IDX_GNH2I] + k[7635]*y_cur[IDX_GNH3I] + - k[7637]*y_cur[IDX_GNH3I] + k[7685]*y_cur[IDX_GCH2NHI] + - k[7751]*y_cur[IDX_GHNCOI] - k[7900]*y_cur[IDX_GNHI] - - k[7901]*y_cur[IDX_GNHI] + k[7907]*y_cur[IDX_GNH2I] + - k[7909]*y_cur[IDX_GNH2I] + k[7916]*y_cur[IDX_GNH3I] + - k[7918]*y_cur[IDX_GNH3I] + k[8065]*y_cur[IDX_GHNCOI] + - k[8279]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - - k[8280]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] - - k[8403]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] - - k[8439]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] + - k[8454]*y_cur[IDX_GNI]*y_cur[IDX_GO2HI] - - k[8458]*y_cur[IDX_GNI]*y_cur[IDX_GNHI] - - k[8475]*y_cur[IDX_GSI]*y_cur[IDX_GNHI] - - k[8479]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] - - k[8480]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] - - k[8521]*y_cur[IDX_GNHI]*y_cur[IDX_GCH3CHOI] - - k[8522]*y_cur[IDX_GNHI]*y_cur[IDX_GH2COI] - - k[8523]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I] - - k[8524]*y_cur[IDX_GNHI]*y_cur[IDX_GNHI] - - k[8524]*y_cur[IDX_GNHI]*y_cur[IDX_GNHI] - - k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] - - k[8526]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI] - - k[8527]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2OHCHOI] - - k[8581]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] - - k[8659]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] - - k[8687]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] - - k[8743]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I] - - k[8744]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_GNH2I] = 0.0 + k[6897]*y_cur[IDX_NH2I] - - k[7079]*y_cur[IDX_GNH2I] - k[7261]*y_cur[IDX_GNH2I] - - k[7443]*y_cur[IDX_GNH2I] - k[7630]*y_cur[IDX_GNH2I] - - k[7631]*y_cur[IDX_GNH2I] - k[7632]*y_cur[IDX_GNH2I] + - k[7634]*y_cur[IDX_GNH3I] + k[7636]*y_cur[IDX_GNH3I] + - k[7739]*y_cur[IDX_GNH2CNI] - k[7907]*y_cur[IDX_GNH2I] - - k[7908]*y_cur[IDX_GNH2I] - k[7909]*y_cur[IDX_GNH2I] + - k[7915]*y_cur[IDX_GNH3I] + k[7917]*y_cur[IDX_GNH3I] + - k[8050]*y_cur[IDX_GNH2CNI] + k[8280]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] - - k[8281]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] - - k[8372]*y_cur[IDX_GH2I]*y_cur[IDX_GNH2I] - - k[8404]*y_cur[IDX_GCI]*y_cur[IDX_GNH2I] - - k[8440]*y_cur[IDX_GOI]*y_cur[IDX_GNH2I] - - k[8483]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] + - k[8521]*y_cur[IDX_GNHI]*y_cur[IDX_GCH3CHOI] + - k[8522]*y_cur[IDX_GNHI]*y_cur[IDX_GH2COI] + - k[8527]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2OHCHOI] - - k[8530]*y_cur[IDX_GNH2I]*y_cur[IDX_GNOI] - - k[8534]*y_cur[IDX_GNH2I]*y_cur[IDX_GH2COI] - - k[8535]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH3CHOI] - - k[8536]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOHI] - - k[8537]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOCH3I] - - k[8538]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH2OHCHOI] - - k[8582]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] - - k[8717]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I]; - ydot[yistart + IDX_GNH2CNI] = 0.0 + k[6962]*y_cur[IDX_NH2CNI] - - k[7144]*y_cur[IDX_GNH2CNI] - k[7326]*y_cur[IDX_GNH2CNI] - - k[7508]*y_cur[IDX_GNH2CNI] - k[7739]*y_cur[IDX_GNH2CNI] - - k[8050]*y_cur[IDX_GNH2CNI]; - ydot[yistart + IDX_GNH3I] = 0.0 + k[6900]*y_cur[IDX_NH3I] - - k[7082]*y_cur[IDX_GNH3I] - k[7264]*y_cur[IDX_GNH3I] - - k[7446]*y_cur[IDX_GNH3I] - k[7634]*y_cur[IDX_GNH3I] - - k[7635]*y_cur[IDX_GNH3I] - k[7636]*y_cur[IDX_GNH3I] - - k[7637]*y_cur[IDX_GNH3I] - k[7915]*y_cur[IDX_GNH3I] - - k[7916]*y_cur[IDX_GNH3I] - k[7917]*y_cur[IDX_GNH3I] - - k[7918]*y_cur[IDX_GNH3I] + k[8281]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] + - k[8372]*y_cur[IDX_GH2I]*y_cur[IDX_GNH2I] + - k[8534]*y_cur[IDX_GNH2I]*y_cur[IDX_GH2COI] + - k[8535]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH3CHOI] + - k[8536]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOHI] + - k[8537]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOCH3I] + - k[8538]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH2OHCHOI]; - ydot[yistart + IDX_GNOI] = 0.0 + k[6925]*y_cur[IDX_NOI] - - k[7107]*y_cur[IDX_GNOI] - k[7289]*y_cur[IDX_GNOI] - - k[7471]*y_cur[IDX_GNOI] - k[7690]*y_cur[IDX_GNOI] - - k[7691]*y_cur[IDX_GNOI] + k[7694]*y_cur[IDX_GHNOI] + - k[7752]*y_cur[IDX_GHCNOI] + k[7756]*y_cur[IDX_GN2OI] + - k[7778]*y_cur[IDX_GNO2I] - k[7980]*y_cur[IDX_GNOI] - - k[7981]*y_cur[IDX_GNOI] + k[7992]*y_cur[IDX_GHNOI] + - k[8066]*y_cur[IDX_GHCNOI] + k[8071]*y_cur[IDX_GN2OI] + - k[8073]*y_cur[IDX_GN2OI] + k[8099]*y_cur[IDX_GNO2I] + - k[8100]*y_cur[IDX_GNO2I] - k[8305]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] + - k[8306]*y_cur[IDX_GHI]*y_cur[IDX_GHNOI] - - k[8398]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - - k[8399]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] + - k[8435]*y_cur[IDX_GOI]*y_cur[IDX_GHNOI] + - k[8442]*y_cur[IDX_GOI]*y_cur[IDX_GNSI] + - k[8461]*y_cur[IDX_GNI]*y_cur[IDX_GOI] + - k[8477]*y_cur[IDX_GCHI]*y_cur[IDX_GHNOI] - - k[8481]*y_cur[IDX_GCHI]*y_cur[IDX_GNOI] - - k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] - - k[8530]*y_cur[IDX_GNH2I]*y_cur[IDX_GNOI] + - k[8533]*y_cur[IDX_GCH2I]*y_cur[IDX_GHNOI] + - k[8541]*y_cur[IDX_GCH3I]*y_cur[IDX_GHNOI] - - k[8604]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] - - k[8658]*y_cur[IDX_GCI]*y_cur[IDX_GNOI]; - ydot[yistart + IDX_GNO2I] = 0.0 + k[6985]*y_cur[IDX_NO2I] - - k[7167]*y_cur[IDX_GNO2I] - k[7349]*y_cur[IDX_GNO2I] - - k[7531]*y_cur[IDX_GNO2I] - k[7778]*y_cur[IDX_GNO2I] - - k[8099]*y_cur[IDX_GNO2I] - k[8100]*y_cur[IDX_GNO2I]; - ydot[yistart + IDX_GNSI] = 0.0 + k[6990]*y_cur[IDX_NSI] - - k[7172]*y_cur[IDX_GNSI] - k[7354]*y_cur[IDX_GNSI] - - k[7536]*y_cur[IDX_GNSI] - k[7779]*y_cur[IDX_GNSI] - - k[8101]*y_cur[IDX_GNSI] - k[8400]*y_cur[IDX_GCI]*y_cur[IDX_GNSI] - - k[8442]*y_cur[IDX_GOI]*y_cur[IDX_GNSI] - - k[8459]*y_cur[IDX_GNI]*y_cur[IDX_GNSI] + - k[8463]*y_cur[IDX_GNI]*y_cur[IDX_GHSI] + - k[8464]*y_cur[IDX_GNI]*y_cur[IDX_GSI] + - k[8475]*y_cur[IDX_GSI]*y_cur[IDX_GNHI]; - ydot[yistart + IDX_GNaI] = 0.0 + k[6905]*y_cur[IDX_NaI] - - k[7087]*y_cur[IDX_GNaI] - k[7269]*y_cur[IDX_GNaI] - - k[7451]*y_cur[IDX_GNaI]; - ydot[yistart + IDX_GOI] = 0.0 + k[6899]*y_cur[IDX_OI] - - k[7081]*y_cur[IDX_GOI] - k[7263]*y_cur[IDX_GOI] - - k[7445]*y_cur[IDX_GOI] + k[7616]*y_cur[IDX_GCOI] + - k[7638]*y_cur[IDX_GOHI] + k[7675]*y_cur[IDX_GCOI] + - k[7690]*y_cur[IDX_GNOI] + k[7691]*y_cur[IDX_GNOI] + - k[7703]*y_cur[IDX_GO2I] + k[7703]*y_cur[IDX_GO2I] + - k[7704]*y_cur[IDX_GO2I] + k[7704]*y_cur[IDX_GO2I] + - k[7727]*y_cur[IDX_GC2OI] + k[7741]*y_cur[IDX_GCNOI] + - k[7744]*y_cur[IDX_GCH2COI] + k[7747]*y_cur[IDX_GOCNI] + - k[7764]*y_cur[IDX_GCO2I] + k[7765]*y_cur[IDX_GSiOI] + - k[7771]*y_cur[IDX_GCH3OCH3I] + k[7778]*y_cur[IDX_GNO2I] + - k[7782]*y_cur[IDX_GPOI] + k[7786]*y_cur[IDX_GSOI] + - k[7787]*y_cur[IDX_GSOI] + k[7796]*y_cur[IDX_GClOI] + - k[7829]*y_cur[IDX_GOCSI] + k[7832]*y_cur[IDX_GSiO2I] + - k[7839]*y_cur[IDX_GSO2I] + k[7881]*y_cur[IDX_GCH3OI] + - k[7919]*y_cur[IDX_GOHI] + k[7920]*y_cur[IDX_GOHI] + - k[7922]*y_cur[IDX_GH2OI] + k[7923]*y_cur[IDX_GH2OI] + - k[7924]*y_cur[IDX_GH2OI] + k[7962]*y_cur[IDX_GCOI] + - k[7980]*y_cur[IDX_GNOI] + k[7981]*y_cur[IDX_GNOI] + - k[7984]*y_cur[IDX_GH2COI] + k[8003]*y_cur[IDX_GO2I] + - k[8003]*y_cur[IDX_GO2I] + k[8004]*y_cur[IDX_GO2I] + - k[8004]*y_cur[IDX_GO2I] + k[8006]*y_cur[IDX_GO2HI] + - k[8035]*y_cur[IDX_GC2OI] + k[8052]*y_cur[IDX_GCNOI] + - k[8055]*y_cur[IDX_GCH2COI] + k[8061]*y_cur[IDX_GOCNI] + - k[8070]*y_cur[IDX_GN2OI] + k[8072]*y_cur[IDX_GN2OI] + - k[8074]*y_cur[IDX_GN2OI] + k[8082]*y_cur[IDX_GCO2I] + - k[8083]*y_cur[IDX_GSiOI] + k[8084]*y_cur[IDX_GSiOI] + - k[8091]*y_cur[IDX_GCH3OCH3I] + k[8099]*y_cur[IDX_GNO2I] + - k[8100]*y_cur[IDX_GNO2I] + k[8106]*y_cur[IDX_GPOI] + - k[8110]*y_cur[IDX_GSOI] + k[8111]*y_cur[IDX_GSOI] + - k[8121]*y_cur[IDX_GClOI] + k[8153]*y_cur[IDX_GOCSI] + - k[8156]*y_cur[IDX_GSiO2I] + k[8164]*y_cur[IDX_GSO2I] + - k[8264]*y_cur[IDX_GCH3OI] - k[8282]*y_cur[IDX_GHI]*y_cur[IDX_GOI] + - k[8398]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - - k[8406]*y_cur[IDX_GCI]*y_cur[IDX_GOI] + - k[8407]*y_cur[IDX_GCI]*y_cur[IDX_GO2I] - - k[8434]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] - - k[8435]*y_cur[IDX_GOI]*y_cur[IDX_GHNOI] - - k[8436]*y_cur[IDX_GOI]*y_cur[IDX_GO2HI] - - k[8437]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - - k[8438]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - - k[8439]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] - - k[8440]*y_cur[IDX_GOI]*y_cur[IDX_GNH2I] - - k[8441]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] - - k[8442]*y_cur[IDX_GOI]*y_cur[IDX_GNSI] - - k[8443]*y_cur[IDX_GOI]*y_cur[IDX_GOI] - - k[8443]*y_cur[IDX_GOI]*y_cur[IDX_GOI] - - k[8444]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - - k[8445]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - - k[8446]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - - k[8447]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] - - k[8448]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] - - k[8449]*y_cur[IDX_GOI]*y_cur[IDX_GHSI] - - k[8450]*y_cur[IDX_GOI]*y_cur[IDX_GSI] - - k[8451]*y_cur[IDX_GOI]*y_cur[IDX_GC3I] - - k[8452]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] - - k[8453]*y_cur[IDX_GOI]*y_cur[IDX_GSOI] - - k[8461]*y_cur[IDX_GNI]*y_cur[IDX_GOI] + - k[8481]*y_cur[IDX_GCHI]*y_cur[IDX_GNOI] + - k[8485]*y_cur[IDX_GCHI]*y_cur[IDX_GO2I] + - k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] + - k[8528]*y_cur[IDX_GCH2I]*y_cur[IDX_GO2I] - - k[8583]*y_cur[IDX_GHI]*y_cur[IDX_GOI] - - k[8661]*y_cur[IDX_GCI]*y_cur[IDX_GOI] - - k[8685]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - - k[8686]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - - k[8687]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] - - k[8688]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] - - k[8689]*y_cur[IDX_GOI]*y_cur[IDX_GOI] - - k[8689]*y_cur[IDX_GOI]*y_cur[IDX_GOI] - - k[8690]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - - k[8691]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - - k[8692]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - - k[8693]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] - - k[8694]*y_cur[IDX_GOI]*y_cur[IDX_GSI] - - k[8695]*y_cur[IDX_GOI]*y_cur[IDX_GC3I] - - k[8696]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] - - k[8697]*y_cur[IDX_GOI]*y_cur[IDX_GSOI] - - k[8702]*y_cur[IDX_GNI]*y_cur[IDX_GOI]; - ydot[yistart + IDX_GO2I] = 0.0 + k[6934]*y_cur[IDX_O2I] - - k[7116]*y_cur[IDX_GO2I] - k[7298]*y_cur[IDX_GO2I] - - k[7480]*y_cur[IDX_GO2I] - k[7703]*y_cur[IDX_GO2I] - - k[7704]*y_cur[IDX_GO2I] + k[7705]*y_cur[IDX_GO2HI] - - k[8003]*y_cur[IDX_GO2I] - k[8004]*y_cur[IDX_GO2I] + - k[8005]*y_cur[IDX_GO2HI] - k[8307]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] + - k[8349]*y_cur[IDX_GHI]*y_cur[IDX_GSO2I] - - k[8407]*y_cur[IDX_GCI]*y_cur[IDX_GO2I] + - k[8436]*y_cur[IDX_GOI]*y_cur[IDX_GO2HI] + - k[8443]*y_cur[IDX_GOI]*y_cur[IDX_GOI] + - k[8454]*y_cur[IDX_GNI]*y_cur[IDX_GO2HI] - - k[8485]*y_cur[IDX_GCHI]*y_cur[IDX_GO2I] - - k[8528]*y_cur[IDX_GCH2I]*y_cur[IDX_GO2I] - - k[8605]*y_cur[IDX_GHI]*y_cur[IDX_GO2I]; - ydot[yistart + IDX_GO2HI] = 0.0 + k[6937]*y_cur[IDX_O2HI] - - k[7119]*y_cur[IDX_GO2HI] - k[7301]*y_cur[IDX_GO2HI] - - k[7483]*y_cur[IDX_GO2HI] - k[7705]*y_cur[IDX_GO2HI] - - k[8005]*y_cur[IDX_GO2HI] - k[8006]*y_cur[IDX_GO2HI] + - k[8307]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] - - k[8308]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] + - k[8309]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - - k[8436]*y_cur[IDX_GOI]*y_cur[IDX_GO2HI] + - k[8444]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - - k[8454]*y_cur[IDX_GNI]*y_cur[IDX_GO2HI] - - k[8606]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI]; - ydot[yistart + IDX_GOCNI] = 0.0 + k[6964]*y_cur[IDX_OCNI] - - k[7146]*y_cur[IDX_GOCNI] - k[7328]*y_cur[IDX_GOCNI] - - k[7510]*y_cur[IDX_GOCNI] - k[7747]*y_cur[IDX_GOCNI] - - k[8061]*y_cur[IDX_GOCNI] - k[8328]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - - k[8329]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - - k[8401]*y_cur[IDX_GCI]*y_cur[IDX_GOCNI] + - k[8446]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - - k[8623]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - - k[8624]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI]; - ydot[yistart + IDX_GOCSI] = 0.0 + k[7022]*y_cur[IDX_OCSI] - - k[7204]*y_cur[IDX_GOCSI] - k[7386]*y_cur[IDX_GOCSI] - - k[7570]*y_cur[IDX_GOCSI] - k[7827]*y_cur[IDX_GOCSI] - - k[7828]*y_cur[IDX_GOCSI] - k[7829]*y_cur[IDX_GOCSI] - - k[7830]*y_cur[IDX_GOCSI] - k[8151]*y_cur[IDX_GOCSI] - - k[8152]*y_cur[IDX_GOCSI] - k[8153]*y_cur[IDX_GOCSI] - - k[8154]*y_cur[IDX_GOCSI] - k[8348]*y_cur[IDX_GHI]*y_cur[IDX_GOCSI] + - k[8452]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] + - k[8476]*y_cur[IDX_GSI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_GOHI] = 0.0 + k[6901]*y_cur[IDX_OHI] - - k[7083]*y_cur[IDX_GOHI] - k[7265]*y_cur[IDX_GOHI] - - k[7447]*y_cur[IDX_GOHI] - k[7638]*y_cur[IDX_GOHI] + - k[7639]*y_cur[IDX_GH2OI] + k[7699]*y_cur[IDX_GCH3OHI] + - k[7702]*y_cur[IDX_GCH3OHI] + k[7708]*y_cur[IDX_GH2O2I] + - k[7708]*y_cur[IDX_GH2O2I] + k[7754]*y_cur[IDX_GHONCI] + - k[7755]*y_cur[IDX_GHOCNI] + k[7772]*y_cur[IDX_GC2H5OHI] + - k[7773]*y_cur[IDX_GC2H5OHI] + k[7780]*y_cur[IDX_GHCOOHI] + - k[7882]*y_cur[IDX_GCH2OHI] + k[7884]*y_cur[IDX_GCOOHI] + - k[7892]*y_cur[IDX_GCH3COOHI] - k[7919]*y_cur[IDX_GOHI] - - k[7920]*y_cur[IDX_GOHI] + k[7921]*y_cur[IDX_GH2OI] + - k[7925]*y_cur[IDX_GH2OI] + k[7997]*y_cur[IDX_GCH3OHI] + - k[8002]*y_cur[IDX_GCH3OHI] + k[8006]*y_cur[IDX_GO2HI] + - k[8012]*y_cur[IDX_GH2O2I] + k[8012]*y_cur[IDX_GH2O2I] + - k[8068]*y_cur[IDX_GHONCI] + k[8069]*y_cur[IDX_GHOCNI] + - k[8092]*y_cur[IDX_GC2H5OHI] + k[8093]*y_cur[IDX_GC2H5OHI] + - k[8102]*y_cur[IDX_GHCOOHI] + k[8104]*y_cur[IDX_GHCOOHI] + - k[8265]*y_cur[IDX_GCH2OHI] + k[8267]*y_cur[IDX_GCOOHI] + - k[8271]*y_cur[IDX_GCH3COOHI] + k[8282]*y_cur[IDX_GHI]*y_cur[IDX_GOI] - - k[8283]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] + - k[8310]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - - k[8373]*y_cur[IDX_GH2I]*y_cur[IDX_GOHI] - - k[8408]*y_cur[IDX_GCI]*y_cur[IDX_GOHI] + - k[8434]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + - k[8435]*y_cur[IDX_GOI]*y_cur[IDX_GHNOI] + - k[8436]*y_cur[IDX_GOI]*y_cur[IDX_GO2HI] - - k[8444]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - - k[8504]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] - - k[8505]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - - k[8506]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - - k[8507]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - - k[8508]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - - k[8509]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - - k[8510]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOHI] - - k[8511]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - - k[8512]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - - k[8513]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] - - k[8514]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI] - - k[8514]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI] - - k[8515]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - - k[8516]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - - k[8517]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] - - k[8518]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] - - k[8519]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - - k[8520]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - - k[8584]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] - - k[8690]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - - k[8737]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] - - k[8738]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI] - - k[8738]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI] - - k[8739]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - - k[8740]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] - - k[8741]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] - - k[8742]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI]; - ydot[yistart + IDX_GPI] = 0.0 + k[6928]*y_cur[IDX_PI] - - k[7110]*y_cur[IDX_GPI] - k[7292]*y_cur[IDX_GPI] - - k[7474]*y_cur[IDX_GPI] + k[7696]*y_cur[IDX_GPHI] + - k[7753]*y_cur[IDX_GCPI] + k[7768]*y_cur[IDX_GPNI] + - k[7782]*y_cur[IDX_GPOI] + k[7813]*y_cur[IDX_GCCPI] + - k[7996]*y_cur[IDX_GPHI] + k[8008]*y_cur[IDX_GPH2I] + - k[8009]*y_cur[IDX_GPH2I] + k[8067]*y_cur[IDX_GCPI] + - k[8088]*y_cur[IDX_GPNI] + k[8106]*y_cur[IDX_GPOI] + - k[8142]*y_cur[IDX_GCCPI]; - ydot[yistart + IDX_GPHI] = 0.0 + k[6933]*y_cur[IDX_PHI] - - k[7115]*y_cur[IDX_GPHI] - k[7297]*y_cur[IDX_GPHI] - - k[7479]*y_cur[IDX_GPHI] - k[7696]*y_cur[IDX_GPHI] + - k[7706]*y_cur[IDX_GPH2I] - k[7996]*y_cur[IDX_GPHI] + - k[8007]*y_cur[IDX_GPH2I] + k[8010]*y_cur[IDX_GPH2I] + - k[8095]*y_cur[IDX_GCH2PHI]; - ydot[yistart + IDX_GPH2I] = 0.0 + k[6939]*y_cur[IDX_PH2I] - - k[7121]*y_cur[IDX_GPH2I] - k[7303]*y_cur[IDX_GPH2I] - - k[7485]*y_cur[IDX_GPH2I] - k[7706]*y_cur[IDX_GPH2I] - - k[8007]*y_cur[IDX_GPH2I] - k[8008]*y_cur[IDX_GPH2I] - - k[8009]*y_cur[IDX_GPH2I] - k[8010]*y_cur[IDX_GPH2I]; - ydot[yistart + IDX_GPNI] = 0.0 + k[6982]*y_cur[IDX_PNI] - - k[7164]*y_cur[IDX_GPNI] - k[7346]*y_cur[IDX_GPNI] - - k[7528]*y_cur[IDX_GPNI] - k[7768]*y_cur[IDX_GPNI] - - k[8088]*y_cur[IDX_GPNI]; - ydot[yistart + IDX_GPOI] = 0.0 + k[6992]*y_cur[IDX_POI] - - k[7174]*y_cur[IDX_GPOI] - k[7356]*y_cur[IDX_GPOI] - - k[7538]*y_cur[IDX_GPOI] - k[7782]*y_cur[IDX_GPOI] + - k[7785]*y_cur[IDX_GHPOI] - k[8106]*y_cur[IDX_GPOI] + - k[8109]*y_cur[IDX_GHPOI]; - ydot[yistart + IDX_GRAINM] = 0.0 - - k[6308]*y_cur[IDX_HII]*y_cur[IDX_GRAINM] - - k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM] - - k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] - - k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] - - k[6312]*y_cur[IDX_HeII]*y_cur[IDX_GRAINM] - - k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM] - - k[6314]*y_cur[IDX_CII]*y_cur[IDX_GRAINM] - - k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM] - - k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - - k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - - k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - - k[6319]*y_cur[IDX_NII]*y_cur[IDX_GRAINM] - - k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM] - - k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - - k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - - k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - - k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] - - k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] - - k[6326]*y_cur[IDX_OII]*y_cur[IDX_GRAINM] - - k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] - - k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] - - k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM] - - k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] - - k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] - - k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - - k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - - k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - - k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - - k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - - k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - - k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - - k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - - k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] - - k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] - - k[6342]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] - - k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - - k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - - k[6345]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - - k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - - k[6347]*y_cur[IDX_FII]*y_cur[IDX_GRAINM] - - k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM] - - k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] - - k[6350]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] - - k[6351]*y_cur[IDX_NaII]*y_cur[IDX_GRAINM] - - k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM] - - k[6353]*y_cur[IDX_MgII]*y_cur[IDX_GRAINM] - - k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] - - k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] - - k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - - k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - - k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - - k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM] - - k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - - k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM] - - k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM] - - k[6374]*y_cur[IDX_SiII]*y_cur[IDX_GRAINM] - - k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM] - - k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] - - k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] - - k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - - k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - - k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - - k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - - k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM] - - k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM] - - k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM] - - k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - - k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - - k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - - k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - - k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - - k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] - - k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] - - k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - - k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - - k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - - k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - - k[6402]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] - - k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] - - k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] - - k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] - - k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] - - k[6407]*y_cur[IDX_NOII]*y_cur[IDX_GRAINM] - - k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] - - k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] - - k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] - - k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] - - k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] - - k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] - - k[6414]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - - k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - - k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - - k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - - k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - - k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] - - k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] - - k[6421]*y_cur[IDX_PII]*y_cur[IDX_GRAINM] - - k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM] - - k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM] - - k[6424]*y_cur[IDX_SII]*y_cur[IDX_GRAINM] - - k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM] - - k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] - - k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] - - k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - - k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - - k[6430]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - - k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] - - k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] - - k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM] - - k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - - k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - - k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - - k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM] - - k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - - k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - - k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - - k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - - k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - - k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - - k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - - k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM] - - k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] - - k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] - - k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] - - k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] - - k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - - k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - - k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - - k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - - k[6454]*y_cur[IDX_ClII]*y_cur[IDX_GRAINM] - - k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM] - - k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM] - - k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] - - k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] - - k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] - - k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] - - k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - - k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - - k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - - k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - - k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - - k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] - - k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] - - k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] - - k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] - - k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] - - k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] - - k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM] - - k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM] - - k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM] - - k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] - - k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] - - k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - - k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - - k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - - k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - - k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM] - - k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] - - k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] - - k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] - - k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] - - k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - - k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - - k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - - k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - - k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] - - k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] - - k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - - k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - - k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - - k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM] - - k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - - k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - - k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - - k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] - - k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] - - k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM] - - k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] - - k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] - - k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - - k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM] - - k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] - - k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] - - k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] - - k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] - - k[6516]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] - - k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] - - k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] - - k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] - - k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] - - k[6521]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] - - k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] - - k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] - - k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] - - k[6525]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] - - k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] - - k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] - - k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - - k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - - k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - - k[6531]*y_cur[IDX_SiOII]*y_cur[IDX_GRAINM] - - k[6532]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - - k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - - k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - - k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM] - - k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] - - k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] - - k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] - - k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] - - k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM] - - k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - - k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - - k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] - - k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] - - k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] - - k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] - - k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] - - k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] - - k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - - k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - - k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - - k[6552]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] - - k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] - - k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] - - k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] - - k[6556]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] - - k[6557]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] - - k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] - - k[6559]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] - - k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM] - - k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - - k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - - k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - - k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - - k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - - k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - - k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - - k[6568]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - - k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] - - k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] - - k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - - k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - - k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - - k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] - - k[6575]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] - - k[6576]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] - - k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] - - k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - - k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - - k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - - k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM] - - k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] - - k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] - - k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM] - - k[6585]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] - - k[6586]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] - - k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] - - k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] - - k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM] - - k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] - - k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] - - k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM] - - k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - - k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - - k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - - k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - - k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - - k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - - k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM] - - k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM] - - k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] - - k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] - - k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - - k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - - k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - - k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - - k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - - k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - - k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - - k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] - - k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] - - k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - - k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - - k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - - k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] - - k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] - - k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - - k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - - k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - - k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM] - - k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM] - - k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] - - k[6623]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] - - k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] - - k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM] - - k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM] - - k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] - - k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] - - k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - - k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - - k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - - k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM] - - k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] - - k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] - - k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] - - k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] - - k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - - k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - - k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - - k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - - k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM] - - k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] - - k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] - - k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM] - - k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - - k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - - k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - - k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM] - - k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] - - k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] - - k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM] - - k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] - - k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] - - k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM] - - k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] - - k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] - - k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - - k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - - k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - - k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] - - k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] - - k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] - - k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] - - k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - - k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - - k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] - - k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] - - k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - - k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - - k[6670]*y_cur[IDX_FeII]*y_cur[IDX_GRAINM] - - k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - - k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - - k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - - k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] - - k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] - - k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] - - k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] - - k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] - - k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] - - k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - - k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - - k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - - k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] - - k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] - - k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - - k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - - k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - - k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM] - - k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - - k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - - k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - - k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - - k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - - k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] - - k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] - - k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - - k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - - k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - - k[6699]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] - - k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] - - k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - - k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] - - k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] - - k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] - - k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM] - - k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM] - - k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6716]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - - k[6717]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] - - k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] - - k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] - - k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] - - k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] - - k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] - - k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - - k[6724]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - - k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - - k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - - k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] - - k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] - - k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] - - k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] - - k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] - - k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] - - k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM] - - k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM] - - k[6746]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] - - k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] - - k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] - - k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] - - k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] - - k[6751]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] - - k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM] - - k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - - k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - - k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - - k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - - k[6757]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - - k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] - - k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] - - k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM] - - k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] - - k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] - - k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] - - k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] - - k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] - - k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] - - k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] - - k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] - - k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM] - - k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - - k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - - k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - - k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - - k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - - k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - - k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - - k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - - k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] - - k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] - - k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] - - k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] - - k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] - - k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] - - k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM] - - k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] - - k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] - - k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] - - k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] - - k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] - - k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] - - k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] - - k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] - - k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] - - k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] - - k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - - k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - - k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] - - k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] - - k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] - - k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] - - k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] - - k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - - k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - - k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] - - k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] - - k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - - k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - - k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - - k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - - k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - - k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - - k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - - k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - - k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - - k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] - - k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] - - k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] - - k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] - - k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] - - k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] - - k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] - - k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] - - k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - - k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - - k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - - k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - - k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] - - k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] - - k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] - - k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] - - k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM] - - k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] - - k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] - - k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] - - k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] - - k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] - - k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] - - k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] - - k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] - - k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] - - k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] - - k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] - - k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] - - k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] - - k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] - - k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] - - k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] - - k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] - - k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] - - k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] - - k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] - - k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] - - k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] - - k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] - - k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] - - k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] - - k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] - - k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - - k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - - k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] - - k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] - - k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - - k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - - k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - - k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM] - - k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM] - - k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - - k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - - k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - - k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - - k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] - - k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] - - k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - - k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - - k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - - k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - - k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - - k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] + - k[8763]*y_cur[IDX_GRAIN0I]*y_cur[IDX_eM]; - ydot[yistart + IDX_GRAIN0I] = 0.0 + - k[6308]*y_cur[IDX_HII]*y_cur[IDX_GRAINM] + - k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM] + - k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + - k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + - k[6312]*y_cur[IDX_HeII]*y_cur[IDX_GRAINM] + - k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM] + - k[6314]*y_cur[IDX_CII]*y_cur[IDX_GRAINM] + - k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM] + - k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6319]*y_cur[IDX_NII]*y_cur[IDX_GRAINM] + - k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM] + - k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + - k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + - k[6326]*y_cur[IDX_OII]*y_cur[IDX_GRAINM] + - k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + - k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + - k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM] + - k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + - k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + - k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + - k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + - k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + - k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6342]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6345]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6347]*y_cur[IDX_FII]*y_cur[IDX_GRAINM] + - k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM] + - k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + - k[6350]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + - k[6351]*y_cur[IDX_NaII]*y_cur[IDX_GRAINM] + - k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM] + - k[6353]*y_cur[IDX_MgII]*y_cur[IDX_GRAINM] + - k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + - k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + - k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM] + - k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM] + - k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM] + - k[6374]*y_cur[IDX_SiII]*y_cur[IDX_GRAINM] + - k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM] + - k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + - k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + - k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM] + - k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM] + - k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM] + - k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + - k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + - k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6402]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + - k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + - k[6407]*y_cur[IDX_NOII]*y_cur[IDX_GRAINM] + - k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + - k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + - k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + - k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + - k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + - k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + - k[6414]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + - k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + - k[6421]*y_cur[IDX_PII]*y_cur[IDX_GRAINM] + - k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM] + - k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM] + - k[6424]*y_cur[IDX_SII]*y_cur[IDX_GRAINM] + - k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM] + - k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + - k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + - k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6430]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + - k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + - k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM] + - k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM] + - k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] + - k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] + - k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM] + - k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + - k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + - k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + - k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + - k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6454]*y_cur[IDX_ClII]*y_cur[IDX_GRAINM] + - k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM] + - k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM] + - k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + - k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + - k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + - k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + - k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + - k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + - k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + - k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + - k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + - k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + - k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM] + - k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM] + - k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM] + - k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + - k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + - k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM] + - k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + - k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + - k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + - k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + - k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + - k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + - k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + - k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + - k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + - k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM] + - k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + - k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + - k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + - k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + - k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + - k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM] + - k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + - k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + - k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM] + - k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + - k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + - k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + - k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + - k[6516]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + - k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + - k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + - k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + - k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] + - k[6521]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] + - k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + - k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + - k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] + - k[6525]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] + - k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + - k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + - k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + - k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + - k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + - k[6531]*y_cur[IDX_SiOII]*y_cur[IDX_GRAINM] + - k[6532]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + - k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + - k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + - k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM] + - k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + - k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + - k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + - k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + - k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM] + - k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] + - k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] + - k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + - k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + - k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + - k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + - k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + - k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + - k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + - k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + - k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + - k[6552]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + - k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + - k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + - k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + - k[6556]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] + - k[6557]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] + - k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + - k[6559]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + - k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM] + - k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + - k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + - k[6568]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + - k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + - k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + - k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + - k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + - k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + - k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + - k[6575]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + - k[6576]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + - k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + - k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM] + - k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + - k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + - k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM] + - k[6585]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] + - k[6586]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] + - k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + - k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + - k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM] + - k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + - k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + - k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM] + - k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + - k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + - k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + - k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + - k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + - k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + - k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM] + - k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM] + - k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + - k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + - k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + - k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + - k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + - k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + - k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + - k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + - k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + - k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + - k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + - k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + - k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM] + - k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM] + - k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] + - k[6623]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] + - k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] + - k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM] + - k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM] + - k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + - k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + - k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + - k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + - k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + - k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM] + - k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + - k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + - k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + - k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + - k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM] + - k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + - k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + - k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM] + - k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM] + - k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + - k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + - k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM] + - k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + - k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + - k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM] + - k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + - k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + - k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + - k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + - k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + - k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + - k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + - k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + - k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + - k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] + - k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] + - k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] + - k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] + - k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] + - k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] + - k[6670]*y_cur[IDX_FeII]*y_cur[IDX_GRAINM] + - k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + - k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + - k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + - k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + - k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + - k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + - k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + - k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + - k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + - k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + - k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + - k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + - k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + - k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + - k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + - k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + - k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + - k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM] + - k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + - k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + - k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + - k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] + - k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] + - k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + - k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + - k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6699]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + - k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + - k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + - k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + - k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + - k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM] + - k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM] + - k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6716]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6717]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] + - k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] + - k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + - k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + - k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + - k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + - k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] + - k[6724]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] + - k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] + - k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] + - k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + - k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + - k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + - k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + - k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + - k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + - k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM] + - k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM] + - k[6746]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] + - k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] + - k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + - k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + - k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + - k[6751]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + - k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM] + - k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + - k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + - k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + - k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + - k[6757]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + - k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + - k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + - k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM] + - k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + - k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + - k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + - k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + - k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + - k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + - k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + - k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + - k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM] + - k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] + - k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] + - k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + - k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + - k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + - k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + - k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + - k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + - k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + - k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + - k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + - k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + - k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + - k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + - k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM] + - k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + - k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + - k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + - k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + - k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + - k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + - k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + - k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + - k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + - k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + - k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] + - k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] + - k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + - k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + - k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + - k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + - k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] + - k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + - k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + - k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + - k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + - k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + - k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + - k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + - k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + - k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + - k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + - k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + - k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] + - k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] + - k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] + - k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + - k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + - k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + - k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + - k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + - k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + - k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + - k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + - k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + - k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + - k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + - k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + - k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + - k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] + - k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] + - k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + - k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + - k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + - k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + - k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM] + - k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + - k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + - k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + - k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + - k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + - k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + - k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + - k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + - k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + - k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + - k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + - k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + - k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + - k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + - k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + - k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + - k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + - k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + - k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + - k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + - k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + - k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + - k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + - k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + - k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + - k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + - k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] + - k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] + - k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + - k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + - k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + - k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + - k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + - k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM] + - k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM] + - k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] + - k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] + - k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] + - k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] + - k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + - k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + - k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] + - k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] + - k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] + - k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] + - k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] + - k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - - k[8763]*y_cur[IDX_GRAIN0I]*y_cur[IDX_eM]; - ydot[yistart + IDX_GSI] = 0.0 + k[6932]*y_cur[IDX_SI] - - k[7114]*y_cur[IDX_GSI] - k[7296]*y_cur[IDX_GSI] - - k[7478]*y_cur[IDX_GSI] + k[7707]*y_cur[IDX_GHSI] + - k[7709]*y_cur[IDX_GH2SI] + k[7711]*y_cur[IDX_GH2SI] + - k[7757]*y_cur[IDX_GCSI] + k[7758]*y_cur[IDX_GCSI] + - k[7766]*y_cur[IDX_GHCSI] + k[7779]*y_cur[IDX_GNSI] + - k[7786]*y_cur[IDX_GSOI] + k[7787]*y_cur[IDX_GSOI] + - k[7816]*y_cur[IDX_GC2SI] + k[7827]*y_cur[IDX_GOCSI] + - k[7830]*y_cur[IDX_GOCSI] + k[7831]*y_cur[IDX_GSiSI] + - k[7840]*y_cur[IDX_GS2I] + k[7840]*y_cur[IDX_GS2I] + - k[7845]*y_cur[IDX_GHS2I] + k[8011]*y_cur[IDX_GHSI] + - k[8014]*y_cur[IDX_GH2SI] + k[8016]*y_cur[IDX_GH2SI] + - k[8075]*y_cur[IDX_GCSI] + k[8076]*y_cur[IDX_GCSI] + - k[8086]*y_cur[IDX_GHCSI] + k[8101]*y_cur[IDX_GNSI] + - k[8110]*y_cur[IDX_GSOI] + k[8111]*y_cur[IDX_GSOI] + - k[8144]*y_cur[IDX_GC2SI] + k[8151]*y_cur[IDX_GOCSI] + - k[8154]*y_cur[IDX_GOCSI] + k[8155]*y_cur[IDX_GSiSI] + - k[8165]*y_cur[IDX_GS2I] + k[8165]*y_cur[IDX_GS2I] + - k[8166]*y_cur[IDX_GS2I] + k[8166]*y_cur[IDX_GS2I] + - k[8172]*y_cur[IDX_GHS2I] + k[8173]*y_cur[IDX_GHS2I] - - k[8311]*y_cur[IDX_GHI]*y_cur[IDX_GSI] + - k[8400]*y_cur[IDX_GCI]*y_cur[IDX_GNSI] + - k[8409]*y_cur[IDX_GCI]*y_cur[IDX_GSOI] - - k[8415]*y_cur[IDX_GCI]*y_cur[IDX_GSI] + - k[8442]*y_cur[IDX_GOI]*y_cur[IDX_GNSI] - - k[8450]*y_cur[IDX_GOI]*y_cur[IDX_GSI] + - k[8459]*y_cur[IDX_GNI]*y_cur[IDX_GNSI] - - k[8464]*y_cur[IDX_GNI]*y_cur[IDX_GSI] - - k[8473]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - - k[8474]*y_cur[IDX_GSI]*y_cur[IDX_GCH3I] - - k[8475]*y_cur[IDX_GSI]*y_cur[IDX_GNHI] - - k[8476]*y_cur[IDX_GSI]*y_cur[IDX_GCOI] - - k[8607]*y_cur[IDX_GHI]*y_cur[IDX_GSI] - - k[8666]*y_cur[IDX_GCI]*y_cur[IDX_GSI] - - k[8694]*y_cur[IDX_GOI]*y_cur[IDX_GSI] - - k[8704]*y_cur[IDX_GNI]*y_cur[IDX_GSI] - - k[8713]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - - k[8714]*y_cur[IDX_GSI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_GS2I] = 0.0 + k[7033]*y_cur[IDX_S2I] - - k[7215]*y_cur[IDX_GS2I] - k[7397]*y_cur[IDX_GS2I] - - k[7579]*y_cur[IDX_GS2I] - k[7840]*y_cur[IDX_GS2I] - - k[8165]*y_cur[IDX_GS2I] - k[8166]*y_cur[IDX_GS2I] + - k[8174]*y_cur[IDX_GHS2I]; - ydot[yistart + IDX_GSOI] = 0.0 + k[6994]*y_cur[IDX_SOI] - - k[7176]*y_cur[IDX_GSOI] - k[7358]*y_cur[IDX_GSOI] - - k[7540]*y_cur[IDX_GSOI] - k[7786]*y_cur[IDX_GSOI] - - k[7787]*y_cur[IDX_GSOI] + k[7828]*y_cur[IDX_GOCSI] + - k[7839]*y_cur[IDX_GSO2I] - k[8110]*y_cur[IDX_GSOI] - - k[8111]*y_cur[IDX_GSOI] + k[8152]*y_cur[IDX_GOCSI] + - k[8164]*y_cur[IDX_GSO2I] - k[8409]*y_cur[IDX_GCI]*y_cur[IDX_GSOI] + - k[8449]*y_cur[IDX_GOI]*y_cur[IDX_GHSI] + - k[8450]*y_cur[IDX_GOI]*y_cur[IDX_GSI] - - k[8453]*y_cur[IDX_GOI]*y_cur[IDX_GSOI] - - k[8697]*y_cur[IDX_GOI]*y_cur[IDX_GSOI]; - ydot[yistart + IDX_GSO2I] = 0.0 + k[7032]*y_cur[IDX_SO2I] - - k[7214]*y_cur[IDX_GSO2I] - k[7396]*y_cur[IDX_GSO2I] - - k[7578]*y_cur[IDX_GSO2I] - k[7839]*y_cur[IDX_GSO2I] - - k[8164]*y_cur[IDX_GSO2I] - k[8349]*y_cur[IDX_GHI]*y_cur[IDX_GSO2I] + - k[8453]*y_cur[IDX_GOI]*y_cur[IDX_GSOI]; - ydot[yistart + IDX_GSiI] = 0.0 + k[6915]*y_cur[IDX_SiI] - - k[7097]*y_cur[IDX_GSiI] - k[7279]*y_cur[IDX_GSiI] - - k[7461]*y_cur[IDX_GSiI] + k[7684]*y_cur[IDX_GSiHI] + - k[7734]*y_cur[IDX_GSiCI] + k[7738]*y_cur[IDX_GHCSiI] + - k[7748]*y_cur[IDX_GSiNI] + k[7765]*y_cur[IDX_GSiOI] + - k[7806]*y_cur[IDX_GSiNCI] + k[7831]*y_cur[IDX_GSiSI] + - k[7971]*y_cur[IDX_GSiHI] + k[7974]*y_cur[IDX_GSiH2I] + - k[7975]*y_cur[IDX_GSiH2I] + k[8043]*y_cur[IDX_GSiCI] + - k[8048]*y_cur[IDX_GHCSiI] + k[8059]*y_cur[IDX_GSiCH2I] + - k[8062]*y_cur[IDX_GSiNI] + k[8083]*y_cur[IDX_GSiOI] + - k[8084]*y_cur[IDX_GSiOI] + k[8129]*y_cur[IDX_GSiC2I] + - k[8135]*y_cur[IDX_GSiNCI] + k[8155]*y_cur[IDX_GSiSI] + - k[8189]*y_cur[IDX_GSiC4I] - k[8301]*y_cur[IDX_GHI]*y_cur[IDX_GSiI] - - k[8600]*y_cur[IDX_GHI]*y_cur[IDX_GSiI]; - ydot[yistart + IDX_GSiCI] = 0.0 + k[6955]*y_cur[IDX_SiCI] - - k[7137]*y_cur[IDX_GSiCI] - k[7319]*y_cur[IDX_GSiCI] - - k[7501]*y_cur[IDX_GSiCI] - k[7734]*y_cur[IDX_GSiCI] + - k[7746]*y_cur[IDX_GSiCH2I] + k[7802]*y_cur[IDX_GSiC2I] - - k[8043]*y_cur[IDX_GSiCI] + k[8047]*y_cur[IDX_GHCSiI] + - k[8049]*y_cur[IDX_GHCSiI] + k[8060]*y_cur[IDX_GSiCH2I] + - k[8168]*y_cur[IDX_GSiC3I]; - ydot[yistart + IDX_GSiC2I] = 0.0 + k[7003]*y_cur[IDX_SiC2I] - - k[7185]*y_cur[IDX_GSiC2I] - k[7367]*y_cur[IDX_GSiC2I] - - k[7549]*y_cur[IDX_GSiC2I] - k[7802]*y_cur[IDX_GSiC2I] + - k[7805]*y_cur[IDX_GSiC2HI] + k[7808]*y_cur[IDX_GSiC2H2I] + - k[7842]*y_cur[IDX_GSiC3I] + k[7857]*y_cur[IDX_GSiC4I] - - k[8129]*y_cur[IDX_GSiC2I] + k[8133]*y_cur[IDX_GSiC2HI] + - k[8169]*y_cur[IDX_GSiC3I]; - ydot[yistart + IDX_GSiC2HI] = 0.0 + k[7008]*y_cur[IDX_SiC2HI] - - k[7190]*y_cur[IDX_GSiC2HI] - k[7372]*y_cur[IDX_GSiC2HI] - - k[7554]*y_cur[IDX_GSiC2HI] - k[7805]*y_cur[IDX_GSiC2HI] - - k[8133]*y_cur[IDX_GSiC2HI] + k[8137]*y_cur[IDX_GSiC2H2I]; - ydot[yistart + IDX_GSiC2H2I] = 0.0 + k[7010]*y_cur[IDX_SiC2H2I] - - k[7192]*y_cur[IDX_GSiC2H2I] - k[7374]*y_cur[IDX_GSiC2H2I] - - k[7556]*y_cur[IDX_GSiC2H2I] - k[7808]*y_cur[IDX_GSiC2H2I] - - k[8137]*y_cur[IDX_GSiC2H2I]; - ydot[yistart + IDX_GSiC3I] = 0.0 + k[7031]*y_cur[IDX_SiC3I] - - k[7213]*y_cur[IDX_GSiC3I] - k[7395]*y_cur[IDX_GSiC3I] - - k[7577]*y_cur[IDX_GSiC3I] - k[7842]*y_cur[IDX_GSiC3I] + - k[7843]*y_cur[IDX_GSiC3HI] - k[8168]*y_cur[IDX_GSiC3I] - - k[8169]*y_cur[IDX_GSiC3I] + k[8170]*y_cur[IDX_GSiC3HI]; - ydot[yistart + IDX_GSiC3HI] = 0.0 + k[7035]*y_cur[IDX_SiC3HI] - - k[7217]*y_cur[IDX_GSiC3HI] - k[7399]*y_cur[IDX_GSiC3HI] - - k[7581]*y_cur[IDX_GSiC3HI] - k[7843]*y_cur[IDX_GSiC3HI] - - k[8170]*y_cur[IDX_GSiC3HI]; - ydot[yistart + IDX_GSiC4I] = 0.0 + k[7046]*y_cur[IDX_SiC4I] - - k[7228]*y_cur[IDX_GSiC4I] - k[7410]*y_cur[IDX_GSiC4I] - - k[7592]*y_cur[IDX_GSiC4I] - k[7857]*y_cur[IDX_GSiC4I] - - k[8189]*y_cur[IDX_GSiC4I]; - ydot[yistart + IDX_GSiCH2I] = 0.0 + k[6963]*y_cur[IDX_SiCH2I] - - k[7145]*y_cur[IDX_GSiCH2I] - k[7327]*y_cur[IDX_GSiCH2I] - - k[7509]*y_cur[IDX_GSiCH2I] - k[7746]*y_cur[IDX_GSiCH2I] + - k[7749]*y_cur[IDX_GSiCH3I] - k[8057]*y_cur[IDX_GSiCH2I] - - k[8058]*y_cur[IDX_GSiCH2I] - k[8059]*y_cur[IDX_GSiCH2I] - - k[8060]*y_cur[IDX_GSiCH2I] + k[8063]*y_cur[IDX_GSiCH3I]; - ydot[yistart + IDX_GSiCH3I] = 0.0 + k[6970]*y_cur[IDX_SiCH3I] - - k[7152]*y_cur[IDX_GSiCH3I] - k[7334]*y_cur[IDX_GSiCH3I] - - k[7516]*y_cur[IDX_GSiCH3I] - k[7749]*y_cur[IDX_GSiCH3I] - - k[8063]*y_cur[IDX_GSiCH3I]; - ydot[yistart + IDX_GSiHI] = 0.0 + k[6920]*y_cur[IDX_SiHI] - - k[7102]*y_cur[IDX_GSiHI] - k[7284]*y_cur[IDX_GSiHI] - - k[7466]*y_cur[IDX_GSiHI] - k[7684]*y_cur[IDX_GSiHI] + - k[7686]*y_cur[IDX_GSiH2I] - k[7971]*y_cur[IDX_GSiHI] + - k[7973]*y_cur[IDX_GSiH2I] + k[7976]*y_cur[IDX_GSiH2I] + - k[7989]*y_cur[IDX_GSiH3I] + k[7991]*y_cur[IDX_GSiH3I] + - k[7995]*y_cur[IDX_GSiH4I] + k[8301]*y_cur[IDX_GHI]*y_cur[IDX_GSiI] - - k[8302]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI] - - k[8601]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI]; - ydot[yistart + IDX_GSiH2I] = 0.0 + k[6924]*y_cur[IDX_SiH2I] - - k[7106]*y_cur[IDX_GSiH2I] - k[7288]*y_cur[IDX_GSiH2I] - - k[7470]*y_cur[IDX_GSiH2I] - k[7686]*y_cur[IDX_GSiH2I] + - k[7693]*y_cur[IDX_GSiH3I] + k[7695]*y_cur[IDX_GSiH4I] - - k[7973]*y_cur[IDX_GSiH2I] - k[7974]*y_cur[IDX_GSiH2I] - - k[7975]*y_cur[IDX_GSiH2I] - k[7976]*y_cur[IDX_GSiH2I] + - k[7988]*y_cur[IDX_GSiH3I] + k[7990]*y_cur[IDX_GSiH3I] + - k[7993]*y_cur[IDX_GSiH4I] + k[8302]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI] - - k[8303]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I] - - k[8602]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I]; - ydot[yistart + IDX_GSiH3I] = 0.0 + k[6927]*y_cur[IDX_SiH3I] - - k[7109]*y_cur[IDX_GSiH3I] - k[7291]*y_cur[IDX_GSiH3I] - - k[7473]*y_cur[IDX_GSiH3I] - k[7693]*y_cur[IDX_GSiH3I] - - k[7988]*y_cur[IDX_GSiH3I] - k[7989]*y_cur[IDX_GSiH3I] - - k[7990]*y_cur[IDX_GSiH3I] - k[7991]*y_cur[IDX_GSiH3I] + - k[7994]*y_cur[IDX_GSiH4I] + k[8303]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I] - - k[8304]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I] - - k[8603]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I]; - ydot[yistart + IDX_GSiH4I] = 0.0 + k[6935]*y_cur[IDX_SiH4I] - - k[7117]*y_cur[IDX_GSiH4I] - k[7299]*y_cur[IDX_GSiH4I] - - k[7481]*y_cur[IDX_GSiH4I] - k[7695]*y_cur[IDX_GSiH4I] - - k[7993]*y_cur[IDX_GSiH4I] - k[7994]*y_cur[IDX_GSiH4I] - - k[7995]*y_cur[IDX_GSiH4I] + - k[8304]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I]; - ydot[yistart + IDX_GSiNI] = 0.0 + k[6965]*y_cur[IDX_SiNI] - - k[7147]*y_cur[IDX_GSiNI] - k[7329]*y_cur[IDX_GSiNI] - - k[7511]*y_cur[IDX_GSiNI] - k[7748]*y_cur[IDX_GSiNI] + - k[7750]*y_cur[IDX_GHNSiI] - k[8062]*y_cur[IDX_GSiNI] + - k[8064]*y_cur[IDX_GHNSiI] + k[8134]*y_cur[IDX_GSiNCI]; - ydot[yistart + IDX_GSiNCI] = 0.0 + k[7012]*y_cur[IDX_SiNCI] - - k[7194]*y_cur[IDX_GSiNCI] - k[7376]*y_cur[IDX_GSiNCI] - - k[7560]*y_cur[IDX_GSiNCI] - k[7806]*y_cur[IDX_GSiNCI] - - k[8134]*y_cur[IDX_GSiNCI] - k[8135]*y_cur[IDX_GSiNCI]; - ydot[yistart + IDX_GSiOI] = 0.0 + k[6979]*y_cur[IDX_SiOI] - - k[7161]*y_cur[IDX_GSiOI] - k[7343]*y_cur[IDX_GSiOI] - - k[7525]*y_cur[IDX_GSiOI] - k[7765]*y_cur[IDX_GSiOI] + - k[7776]*y_cur[IDX_GH2SiOI] + k[7832]*y_cur[IDX_GSiO2I] - - k[8083]*y_cur[IDX_GSiOI] - k[8084]*y_cur[IDX_GSiOI] + - k[8096]*y_cur[IDX_GH2SiOI] + k[8097]*y_cur[IDX_GH2SiOI] + - k[8156]*y_cur[IDX_GSiO2I]; - ydot[yistart + IDX_GSiO2I] = 0.0 + k[7025]*y_cur[IDX_SiO2I] - - k[7207]*y_cur[IDX_GSiO2I] - k[7389]*y_cur[IDX_GSiO2I] - - k[7573]*y_cur[IDX_GSiO2I] - k[7832]*y_cur[IDX_GSiO2I] - - k[8156]*y_cur[IDX_GSiO2I]; - ydot[yistart + IDX_GSiSI] = 0.0 + k[7023]*y_cur[IDX_SiSI] - - k[7205]*y_cur[IDX_GSiSI] - k[7387]*y_cur[IDX_GSiSI] - - k[7571]*y_cur[IDX_GSiSI] - k[7831]*y_cur[IDX_GSiSI] - - k[8155]*y_cur[IDX_GSiSI]; - ydot[yistart + IDX_HI] = 0.0 - k[74]*y_cur[IDX_HM]*y_cur[IDX_HI] - - k[75]*y_cur[IDX_HM]*y_cur[IDX_HI] - - k[84]*y_cur[IDX_HI]*y_cur[IDX_CM] - - k[85]*y_cur[IDX_HI]*y_cur[IDX_C10M] - - k[86]*y_cur[IDX_HI]*y_cur[IDX_C10HM] - - k[87]*y_cur[IDX_HI]*y_cur[IDX_C2M] - - k[88]*y_cur[IDX_HI]*y_cur[IDX_C2HM] - - k[89]*y_cur[IDX_HI]*y_cur[IDX_C3M] - - k[90]*y_cur[IDX_HI]*y_cur[IDX_C3HM] - - k[91]*y_cur[IDX_HI]*y_cur[IDX_C3NM] - - k[92]*y_cur[IDX_HI]*y_cur[IDX_C4M] - - k[93]*y_cur[IDX_HI]*y_cur[IDX_C4HM] - - k[94]*y_cur[IDX_HI]*y_cur[IDX_C5M] - - k[95]*y_cur[IDX_HI]*y_cur[IDX_C5HM] - - k[96]*y_cur[IDX_HI]*y_cur[IDX_C5NM] - - k[97]*y_cur[IDX_HI]*y_cur[IDX_C6M] - - k[98]*y_cur[IDX_HI]*y_cur[IDX_C6HM] - - k[99]*y_cur[IDX_HI]*y_cur[IDX_C7M] - - k[100]*y_cur[IDX_HI]*y_cur[IDX_C7HM] - - k[101]*y_cur[IDX_HI]*y_cur[IDX_C8M] - - k[102]*y_cur[IDX_HI]*y_cur[IDX_C8HM] - - k[103]*y_cur[IDX_HI]*y_cur[IDX_C9M] - - k[104]*y_cur[IDX_HI]*y_cur[IDX_C9HM] - - k[105]*y_cur[IDX_HI]*y_cur[IDX_CHM] - - k[106]*y_cur[IDX_HI]*y_cur[IDX_CNM] - - k[107]*y_cur[IDX_HI]*y_cur[IDX_OM] - - k[108]*y_cur[IDX_HI]*y_cur[IDX_OHM] - - k[109]*y_cur[IDX_HI]*y_cur[IDX_SM] + - k[111]*y_cur[IDX_NI]*y_cur[IDX_C2HM] + - k[129]*y_cur[IDX_OI]*y_cur[IDX_C2HM] + - k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + - k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] + - k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] + - k[136]*y_cur[IDX_H2I]*y_cur[IDX_H2OI] + - k[139]*y_cur[IDX_H2I]*y_cur[IDX_OHI] + - k[140]*y_cur[IDX_H2I]*y_cur[IDX_eM] + - k[140]*y_cur[IDX_H2I]*y_cur[IDX_eM] - - k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] + - k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] + - k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] - - k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] + - k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] + - k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] + - k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] - - k[143]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + - k[143]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + - k[143]*y_cur[IDX_HI]*y_cur[IDX_H2OI] - - k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] + - k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] - - k[145]*y_cur[IDX_HI]*y_cur[IDX_OHI] + - k[145]*y_cur[IDX_HI]*y_cur[IDX_OHI] + - k[145]*y_cur[IDX_HI]*y_cur[IDX_OHI] - - k[318]*y_cur[IDX_ClII]*y_cur[IDX_HI] + - k[319]*y_cur[IDX_ClI]*y_cur[IDX_HII] + - k[320]*y_cur[IDX_HII]*y_cur[IDX_C10I] + - k[321]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] + - k[322]*y_cur[IDX_HII]*y_cur[IDX_C10HI] + - k[323]*y_cur[IDX_HII]*y_cur[IDX_C2I] + - k[324]*y_cur[IDX_HII]*y_cur[IDX_C2H2I] + - k[325]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + - k[326]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + - k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + - k[328]*y_cur[IDX_HII]*y_cur[IDX_C2H5OHI] + - k[329]*y_cur[IDX_HII]*y_cur[IDX_C2HI] + - k[330]*y_cur[IDX_HII]*y_cur[IDX_C2NI] + - k[331]*y_cur[IDX_HII]*y_cur[IDX_C2OI] + - k[332]*y_cur[IDX_HII]*y_cur[IDX_C2SI] + - k[333]*y_cur[IDX_HII]*y_cur[IDX_C3I] + - k[334]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] + - k[335]*y_cur[IDX_HII]*y_cur[IDX_C3HI] + - k[336]*y_cur[IDX_HII]*y_cur[IDX_C3OI] + - k[337]*y_cur[IDX_HII]*y_cur[IDX_C3SI] + - k[338]*y_cur[IDX_HII]*y_cur[IDX_C4I] + - k[339]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] + - k[340]*y_cur[IDX_HII]*y_cur[IDX_C4HI] + - k[341]*y_cur[IDX_HII]*y_cur[IDX_C4PI] + - k[342]*y_cur[IDX_HII]*y_cur[IDX_C4SI] + - k[343]*y_cur[IDX_HII]*y_cur[IDX_C5I] + - k[344]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] + - k[345]*y_cur[IDX_HII]*y_cur[IDX_C5HI] + - k[346]*y_cur[IDX_HII]*y_cur[IDX_C6I] + - k[347]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] + - k[348]*y_cur[IDX_HII]*y_cur[IDX_C6HI] + - k[349]*y_cur[IDX_HII]*y_cur[IDX_C7I] + - k[350]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] + - k[351]*y_cur[IDX_HII]*y_cur[IDX_C7HI] + - k[352]*y_cur[IDX_HII]*y_cur[IDX_C8I] + - k[353]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] + - k[354]*y_cur[IDX_HII]*y_cur[IDX_C8HI] + - k[355]*y_cur[IDX_HII]*y_cur[IDX_C9I] + - k[356]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] + - k[357]*y_cur[IDX_HII]*y_cur[IDX_C9HI] + - k[358]*y_cur[IDX_HII]*y_cur[IDX_CCPI] + - k[359]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + - k[360]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] + - k[361]*y_cur[IDX_HII]*y_cur[IDX_CH2CNI] + - k[362]*y_cur[IDX_HII]*y_cur[IDX_CH3I] + - k[363]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] + - k[364]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] + - k[365]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] + - k[366]*y_cur[IDX_HII]*y_cur[IDX_CH3CHOI] + - k[367]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + - k[368]*y_cur[IDX_HII]*y_cur[IDX_CH3COCH3I] + - k[369]*y_cur[IDX_HII]*y_cur[IDX_CH3OCH3I] + - k[370]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + - k[371]*y_cur[IDX_HII]*y_cur[IDX_CH4I] + - k[372]*y_cur[IDX_HII]*y_cur[IDX_CHI] + - k[373]*y_cur[IDX_HII]*y_cur[IDX_CPI] + - k[374]*y_cur[IDX_HII]*y_cur[IDX_CSI] + - k[375]*y_cur[IDX_HII]*y_cur[IDX_FeI] + - k[376]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + - k[377]*y_cur[IDX_HII]*y_cur[IDX_H2CSI] + - k[378]*y_cur[IDX_HII]*y_cur[IDX_H2OI] + - k[379]*y_cur[IDX_HII]*y_cur[IDX_H2S2I] + - k[380]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + - k[381]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] + - k[382]*y_cur[IDX_HII]*y_cur[IDX_HC2PI] + - k[383]*y_cur[IDX_HII]*y_cur[IDX_HC3NI] + - k[384]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] + - k[385]*y_cur[IDX_HII]*y_cur[IDX_HC5NI] + - k[386]*y_cur[IDX_HII]*y_cur[IDX_HC7NI] + - k[387]*y_cur[IDX_HII]*y_cur[IDX_HC9NI] + - k[388]*y_cur[IDX_HII]*y_cur[IDX_HCNI] + - k[389]*y_cur[IDX_HII]*y_cur[IDX_HCOI] + - k[390]*y_cur[IDX_HII]*y_cur[IDX_HCOOCH3I] + - k[391]*y_cur[IDX_HII]*y_cur[IDX_HCPI] + - k[392]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] + - k[393]*y_cur[IDX_HII]*y_cur[IDX_HClI] + - k[394]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] + - k[395]*y_cur[IDX_HII]*y_cur[IDX_HPOI] + - k[396]*y_cur[IDX_HII]*y_cur[IDX_HS2I] + - k[397]*y_cur[IDX_HII]*y_cur[IDX_HSI] + - k[398]*y_cur[IDX_HII]*y_cur[IDX_MgI] + - k[399]*y_cur[IDX_HII]*y_cur[IDX_N2OI] + - k[400]*y_cur[IDX_HII]*y_cur[IDX_NH2I] + - k[401]*y_cur[IDX_HII]*y_cur[IDX_NH3I] + - k[402]*y_cur[IDX_HII]*y_cur[IDX_NHI] + - k[403]*y_cur[IDX_HII]*y_cur[IDX_NOI] + - k[404]*y_cur[IDX_HII]*y_cur[IDX_NSI] + - k[405]*y_cur[IDX_HII]*y_cur[IDX_O2I] + - k[406]*y_cur[IDX_HII]*y_cur[IDX_OI] + - k[407]*y_cur[IDX_HII]*y_cur[IDX_OCSI] + - k[408]*y_cur[IDX_HII]*y_cur[IDX_OHI] + - k[409]*y_cur[IDX_HII]*y_cur[IDX_PI] + - k[410]*y_cur[IDX_HII]*y_cur[IDX_PH2I] + - k[411]*y_cur[IDX_HII]*y_cur[IDX_PHI] + - k[412]*y_cur[IDX_HII]*y_cur[IDX_PNI] + - k[413]*y_cur[IDX_HII]*y_cur[IDX_POI] + - k[414]*y_cur[IDX_HII]*y_cur[IDX_S2I] + - k[415]*y_cur[IDX_HII]*y_cur[IDX_SI] + - k[416]*y_cur[IDX_HII]*y_cur[IDX_SO2I] + - k[417]*y_cur[IDX_HII]*y_cur[IDX_SOI] + - k[418]*y_cur[IDX_HII]*y_cur[IDX_SiI] + - k[419]*y_cur[IDX_HII]*y_cur[IDX_SiC2I] + - k[420]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] + - k[421]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] + - k[422]*y_cur[IDX_HII]*y_cur[IDX_SiC3I] + - k[423]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] + - k[424]*y_cur[IDX_HII]*y_cur[IDX_SiC4I] + - k[425]*y_cur[IDX_HII]*y_cur[IDX_SiCI] + - k[426]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] + - k[427]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] + - k[428]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] + - k[429]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + - k[430]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + - k[431]*y_cur[IDX_HII]*y_cur[IDX_SiHI] + - k[432]*y_cur[IDX_HII]*y_cur[IDX_SiNI] + - k[433]*y_cur[IDX_HII]*y_cur[IDX_SiNCI] + - k[434]*y_cur[IDX_HII]*y_cur[IDX_SiOI] + - k[435]*y_cur[IDX_HII]*y_cur[IDX_SiSI] - - k[487]*y_cur[IDX_HI]*y_cur[IDX_CNII] - - k[488]*y_cur[IDX_HI]*y_cur[IDX_COII] - - k[489]*y_cur[IDX_HI]*y_cur[IDX_H2II] - - k[490]*y_cur[IDX_HI]*y_cur[IDX_HCNII] - - k[491]*y_cur[IDX_HI]*y_cur[IDX_HeII] - - k[492]*y_cur[IDX_HI]*y_cur[IDX_OII] + - k[729]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + - k[732]*y_cur[IDX_C10H2II]*y_cur[IDX_eM] + - k[733]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + - k[734]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + - k[740]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + - k[742]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + - k[742]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + - k[743]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + - k[745]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[746]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[747]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[748]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[751]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[751]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[752]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[752]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[758]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[758]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[759]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[760]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[764]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[766]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[766]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[767]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[769]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + - k[770]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + - k[771]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + - k[774]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + - k[776]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + - k[777]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + - k[779]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + - k[784]*y_cur[IDX_C2NHII]*y_cur[IDX_eM] + - k[790]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + - k[794]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[794]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[795]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[796]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + - k[796]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + - k[798]*y_cur[IDX_C3H3II]*y_cur[IDX_eM] + - k[800]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[802]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[802]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[804]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + - k[805]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + - k[808]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[809]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[810]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[811]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[813]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[821]*y_cur[IDX_C4HII]*y_cur[IDX_eM] + - k[823]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + - k[825]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + - k[826]*y_cur[IDX_C4H4II]*y_cur[IDX_eM] + - k[829]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + - k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] + - k[840]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + - k[842]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + - k[843]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + - k[845]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + - k[846]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + - k[851]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + - k[853]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + - k[854]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + - k[857]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + - k[858]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + - k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + - k[862]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + - k[867]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + - k[869]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + - k[870]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + - k[873]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + - k[874]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] + - k[875]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] + - k[880]*y_cur[IDX_C8HII]*y_cur[IDX_eM] + - k[882]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + - k[883]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + - k[886]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + - k[887]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + - k[892]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + - k[894]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] + - k[895]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + - k[898]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + - k[899]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + - k[906]*y_cur[IDX_CHII]*y_cur[IDX_eM] + - k[908]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + - k[908]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + - k[909]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + - k[911]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] + - k[913]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + - k[915]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + - k[921]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] + - k[923]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[925]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[925]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[927]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] + - k[930]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] + - k[931]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] + - k[933]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] + - k[936]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] + - k[937]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + - k[937]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + - k[939]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[940]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[941]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[942]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[944]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] + - k[946]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] + - k[948]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + - k[953]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] + - k[958]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + - k[960]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + - k[961]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + - k[961]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + - k[963]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[965]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[966]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[967]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[968]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + - k[968]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + - k[969]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + - k[971]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + - k[972]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[974]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[974]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[975]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[983]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + - k[987]*y_cur[IDX_H2II]*y_cur[IDX_eM] + - k[987]*y_cur[IDX_H2II]*y_cur[IDX_eM] + - k[990]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + - k[992]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + - k[993]*y_cur[IDX_H2CClII]*y_cur[IDX_eM] + - k[993]*y_cur[IDX_H2CClII]*y_cur[IDX_eM] + - k[995]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + - k[998]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[998]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[999]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[1000]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + - k[1000]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + - k[1001]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + - k[1002]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + - k[1002]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + - k[1003]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + - k[1005]*y_cur[IDX_H2FII]*y_cur[IDX_eM] + - k[1007]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] + - k[1008]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + - k[1010]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] + - k[1013]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + - k[1013]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + - k[1014]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + - k[1016]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + - k[1017]*y_cur[IDX_H2POII]*y_cur[IDX_eM] + - k[1019]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + - k[1020]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + - k[1020]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + - k[1021]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + - k[1025]*y_cur[IDX_H3II]*y_cur[IDX_eM] + - k[1026]*y_cur[IDX_H3II]*y_cur[IDX_eM] + - k[1026]*y_cur[IDX_H3II]*y_cur[IDX_eM] + - k[1026]*y_cur[IDX_H3II]*y_cur[IDX_eM] + - k[1027]*y_cur[IDX_H3C3OII]*y_cur[IDX_eM] + - k[1028]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + - k[1030]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + - k[1032]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + - k[1036]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1037]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1038]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1038]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1039]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + - k[1040]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + - k[1041]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + - k[1042]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + - k[1044]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + - k[1044]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + - k[1045]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1047]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1047]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1048]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1049]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] + - k[1051]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + - k[1052]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + - k[1054]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] + - k[1056]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + - k[1057]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + - k[1059]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + - k[1061]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + - k[1063]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + - k[1068]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + - k[1069]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + - k[1070]*y_cur[IDX_HC3OII]*y_cur[IDX_eM] + - k[1072]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + - k[1076]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] + - k[1078]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + - k[1081]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + - k[1085]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] + - k[1087]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] + - k[1088]*y_cur[IDX_HCNII]*y_cur[IDX_eM] + - k[1089]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + - k[1089]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + - k[1090]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + - k[1091]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + - k[1093]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + - k[1095]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] + - k[1096]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] + - k[1097]*y_cur[IDX_HCOII]*y_cur[IDX_eM] + - k[1098]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + - k[1099]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + - k[1101]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + - k[1101]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + - k[1103]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] + - k[1104]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] + - k[1105]*y_cur[IDX_HCPII]*y_cur[IDX_eM] + - k[1108]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + - k[1110]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + - k[1111]*y_cur[IDX_HClII]*y_cur[IDX_eM] + - k[1112]*y_cur[IDX_HFII]*y_cur[IDX_eM] + - k[1113]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] + - k[1115]*y_cur[IDX_HNC3I]*y_cur[IDX_eM] + - k[1117]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + - k[1118]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + - k[1119]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + - k[1121]*y_cur[IDX_HNOII]*y_cur[IDX_eM] + - k[1122]*y_cur[IDX_HNSII]*y_cur[IDX_eM] + - k[1124]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] + - k[1125]*y_cur[IDX_HOCII]*y_cur[IDX_eM] + - k[1126]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] + - k[1129]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] + - k[1130]*y_cur[IDX_HONCII]*y_cur[IDX_eM] + - k[1134]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + - k[1135]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + - k[1137]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + - k[1138]*y_cur[IDX_HSII]*y_cur[IDX_eM] + - k[1140]*y_cur[IDX_HS2II]*y_cur[IDX_eM] + - k[1141]*y_cur[IDX_HSOII]*y_cur[IDX_eM] + - k[1142]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + - k[1143]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + - k[1145]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] + - k[1148]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] + - k[1149]*y_cur[IDX_HeHII]*y_cur[IDX_eM] + - k[1151]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + - k[1152]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + - k[1157]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] + - k[1158]*y_cur[IDX_NHII]*y_cur[IDX_eM] + - k[1159]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + - k[1159]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + - k[1160]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + - k[1162]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] + - k[1163]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + - k[1164]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + - k[1164]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + - k[1166]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + - k[1166]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + - k[1167]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + - k[1175]*y_cur[IDX_O2HII]*y_cur[IDX_eM] + - k[1180]*y_cur[IDX_OHII]*y_cur[IDX_eM] + - k[1182]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + - k[1184]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + - k[1188]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + - k[1190]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + - k[1194]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + - k[1198]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + - k[1199]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + - k[1202]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + - k[1203]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + - k[1205]*y_cur[IDX_PHII]*y_cur[IDX_eM] + - k[1207]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + - k[1207]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + - k[1208]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + - k[1209]*y_cur[IDX_PH3II]*y_cur[IDX_eM] + - k[1217]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + - k[1227]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] + - k[1229]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + - k[1230]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] + - k[1235]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] + - k[1237]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] + - k[1241]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] + - k[1242]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + - k[1246]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] + - k[1248]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] + - k[1250]*y_cur[IDX_SiHII]*y_cur[IDX_eM] + - k[1252]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + - k[1252]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + - k[1253]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + - k[1254]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] + - k[1257]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] + - k[1259]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] + - k[1263]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] + - k[1264]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] + - k[1268]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] + - k[1270]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + - k[1273]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + - k[1276]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1277]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1279]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1280]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + - k[1281]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + - k[1283]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + - k[1285]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1286]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1287]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + - k[1290]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1292]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1293]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1294]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1296]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1298]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + - k[1300]*y_cur[IDX_CII]*y_cur[IDX_C2H2I] + - k[1301]*y_cur[IDX_CII]*y_cur[IDX_C2H3I] + - k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1305]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1308]*y_cur[IDX_CII]*y_cur[IDX_C2HI] + - k[1311]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] + - k[1312]*y_cur[IDX_CII]*y_cur[IDX_C3HI] + - k[1319]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + - k[1320]*y_cur[IDX_CII]*y_cur[IDX_C4HI] + - k[1324]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] + - k[1325]*y_cur[IDX_CII]*y_cur[IDX_C5HI] + - k[1327]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] + - k[1330]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + - k[1331]*y_cur[IDX_CII]*y_cur[IDX_C6HI] + - k[1333]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] + - k[1334]*y_cur[IDX_CII]*y_cur[IDX_C7HI] + - k[1336]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] + - k[1337]*y_cur[IDX_CII]*y_cur[IDX_C8HI] + - k[1339]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] + - k[1340]*y_cur[IDX_CII]*y_cur[IDX_C9HI] + - k[1342]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + - k[1347]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + - k[1350]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + - k[1353]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + - k[1358]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + - k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1384]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + - k[1385]*y_cur[IDX_CII]*y_cur[IDX_CHI] + - k[1389]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] + - k[1393]*y_cur[IDX_CII]*y_cur[IDX_H2OI] + - k[1394]*y_cur[IDX_CII]*y_cur[IDX_H2OI] + - k[1395]*y_cur[IDX_CII]*y_cur[IDX_H2SI] + - k[1401]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + - k[1403]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + - k[1407]*y_cur[IDX_CII]*y_cur[IDX_HCNI] + - k[1409]*y_cur[IDX_CII]*y_cur[IDX_HCPI] + - k[1410]*y_cur[IDX_CII]*y_cur[IDX_HCSiI] + - k[1411]*y_cur[IDX_CII]*y_cur[IDX_HClI] + - k[1412]*y_cur[IDX_CII]*y_cur[IDX_HFI] + - k[1413]*y_cur[IDX_CII]*y_cur[IDX_HNCI] + - k[1414]*y_cur[IDX_CII]*y_cur[IDX_HNSiI] + - k[1415]*y_cur[IDX_CII]*y_cur[IDX_HSI] + - k[1417]*y_cur[IDX_CII]*y_cur[IDX_NH2I] + - k[1418]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + - k[1420]*y_cur[IDX_CII]*y_cur[IDX_NHI] + - k[1426]*y_cur[IDX_CII]*y_cur[IDX_OHI] + - k[1431]*y_cur[IDX_CII]*y_cur[IDX_SiC2H2I] + - k[1432]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] + - k[1433]*y_cur[IDX_CII]*y_cur[IDX_SiC3HI] + - k[1436]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + - k[1438]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + - k[1439]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + - k[1442]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + - k[1444]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] + - k[1445]*y_cur[IDX_CII]*y_cur[IDX_SiHI] + - k[1452]*y_cur[IDX_C2II]*y_cur[IDX_C2H2I] + - k[1453]*y_cur[IDX_C2II]*y_cur[IDX_HCNI] + - k[1466]*y_cur[IDX_C2HII]*y_cur[IDX_C2H2I] + - k[1467]*y_cur[IDX_C2HII]*y_cur[IDX_CNI] + - k[1473]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + - k[1475]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + - k[1480]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] + - k[1483]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + - k[1486]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] + - k[1488]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] + - k[1490]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] + - k[1492]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + - k[1494]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] + - k[1496]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + - k[1498]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] + - k[1500]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + - k[1502]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] + - k[1504]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] + - k[1506]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] + - k[1508]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + - k[1509]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + - k[1517]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] + - k[1521]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + - k[1522]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + - k[1526]*y_cur[IDX_C2H2II]*y_cur[IDX_PI] + - k[1528]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] + - k[1530]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] + - k[1537]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] + - k[1541]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] + - k[1543]*y_cur[IDX_C2H2I]*y_cur[IDX_C3II] + - k[1544]*y_cur[IDX_C2H2I]*y_cur[IDX_C3HII] + - k[1545]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H2II] + - k[1547]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H4II] + - k[1550]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] + - k[1551]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HII] + - k[1552]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] + - k[1554]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + - k[1556]*y_cur[IDX_C2H2I]*y_cur[IDX_C5II] + - k[1558]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] + - k[1559]*y_cur[IDX_C2H2I]*y_cur[IDX_C6HII] + - k[1561]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + - k[1564]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + - k[1569]*y_cur[IDX_C2H2I]*y_cur[IDX_PII] + - k[1570]*y_cur[IDX_C2H2I]*y_cur[IDX_PHII] + - k[1573]*y_cur[IDX_C2H2I]*y_cur[IDX_SII] + - k[1574]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] + - k[1575]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2II] + - k[1582]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + - k[1585]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + - k[1588]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + - k[1591]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + - k[1594]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + - k[1597]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + - k[1601]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + - k[1604]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + - k[1607]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + - k[1609]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + - k[1618]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + - k[1623]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + - k[1627]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] + - k[1630]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + - k[1632]*y_cur[IDX_C2H3I]*y_cur[IDX_C4HII] + - k[1634]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + - k[1636]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + - k[1638]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + - k[1640]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + - k[1642]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + - k[1646]*y_cur[IDX_C2H3I]*y_cur[IDX_SiII] + - k[1648]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] + - k[1650]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] + - k[1652]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] + - k[1654]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] + - k[1656]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] + - k[1658]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] + - k[1662]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] + - k[1666]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] + - k[1673]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] + - k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] + - k[1681]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] + - k[1688]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + - k[1692]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] + - k[1695]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] + - k[1697]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] + - k[1700]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + - k[1702]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + - k[1716]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] + - k[1718]*y_cur[IDX_C2H4I]*y_cur[IDX_SiII] + - k[1725]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2II] + - k[1728]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + - k[1731]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2II] + - k[1733]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] + - k[1735]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] + - k[1736]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2II] + - k[1737]*y_cur[IDX_C2HI]*y_cur[IDX_C4H3II] + - k[1738]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2II] + - k[1739]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2II] + - k[1740]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2II] + - k[1742]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] + - k[1750]*y_cur[IDX_C2HI]*y_cur[IDX_SII] + - k[1751]*y_cur[IDX_C2HI]*y_cur[IDX_SiII] + - k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + - k[1760]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] + - k[1762]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] + - k[1764]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] + - k[1766]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] + - k[1768]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] + - k[1770]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] + - k[1775]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + - k[1776]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCHI] + - k[1781]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + - k[1783]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] + - k[1785]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] + - k[1787]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] + - k[1788]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H2II] + - k[1789]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H3II] + - k[1791]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] + - k[1793]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + - k[1795]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] + - k[1797]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] + - k[1799]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] + - k[1801]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] + - k[1804]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] + - k[1806]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + - k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + - k[1810]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + - k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + - k[1813]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + - k[1819]*y_cur[IDX_C3HI]*y_cur[IDX_C3H2II] + - k[1821]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] + - k[1823]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] + - k[1824]*y_cur[IDX_C3HI]*y_cur[IDX_C4H2II] + - k[1825]*y_cur[IDX_C3HI]*y_cur[IDX_C4H3II] + - k[1826]*y_cur[IDX_C3HI]*y_cur[IDX_C5H2II] + - k[1827]*y_cur[IDX_C3HI]*y_cur[IDX_C6H2II] + - k[1829]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] + - k[1831]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] + - k[1832]*y_cur[IDX_C4HII]*y_cur[IDX_C5H2I] + - k[1833]*y_cur[IDX_C4HII]*y_cur[IDX_C5HI] + - k[1834]*y_cur[IDX_C4HII]*y_cur[IDX_C4H2I] + - k[1835]*y_cur[IDX_C4H2II]*y_cur[IDX_C5H2I] + - k[1836]*y_cur[IDX_C4H2II]*y_cur[IDX_C5HI] + - k[1838]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] + - k[1840]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] + - k[1841]*y_cur[IDX_C4H3II]*y_cur[IDX_C5HI] + - k[1843]*y_cur[IDX_C4HI]*y_cur[IDX_C4H2II] + - k[1844]*y_cur[IDX_C4HI]*y_cur[IDX_C4H3II] + - k[1845]*y_cur[IDX_C4HI]*y_cur[IDX_C5H2II] + - k[1846]*y_cur[IDX_CI]*y_cur[IDX_C10HII] + - k[1849]*y_cur[IDX_CI]*y_cur[IDX_C2HII] + - k[1850]*y_cur[IDX_CI]*y_cur[IDX_C2H2II] + - k[1852]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + - k[1854]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] + - k[1856]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] + - k[1858]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] + - k[1860]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] + - k[1862]*y_cur[IDX_CI]*y_cur[IDX_C4HII] + - k[1864]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] + - k[1866]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] + - k[1867]*y_cur[IDX_CI]*y_cur[IDX_C5HII] + - k[1869]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] + - k[1871]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] + - k[1873]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] + - k[1875]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] + - k[1876]*y_cur[IDX_CI]*y_cur[IDX_C7HII] + - k[1878]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + - k[1880]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] + - k[1882]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + - k[1884]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] + - k[1885]*y_cur[IDX_CI]*y_cur[IDX_C9HII] + - k[1887]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] + - k[1889]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + - k[1890]*y_cur[IDX_CI]*y_cur[IDX_CHII] + - k[1891]*y_cur[IDX_CI]*y_cur[IDX_CH2II] + - k[1893]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] + - k[1895]*y_cur[IDX_CI]*y_cur[IDX_CH3C3NHII] + - k[1896]*y_cur[IDX_CI]*y_cur[IDX_CH3C5NHII] + - k[1897]*y_cur[IDX_CI]*y_cur[IDX_CH3C7NHII] + - k[1900]*y_cur[IDX_CI]*y_cur[IDX_H2SII] + - k[1902]*y_cur[IDX_CI]*y_cur[IDX_HC2SII] + - k[1906]*y_cur[IDX_CI]*y_cur[IDX_HCPII] + - k[1908]*y_cur[IDX_CI]*y_cur[IDX_HSII] + - k[1915]*y_cur[IDX_CI]*y_cur[IDX_SiC2HII] + - k[1916]*y_cur[IDX_CI]*y_cur[IDX_SiC2H2II] + - k[1917]*y_cur[IDX_CI]*y_cur[IDX_SiC2H3II] + - k[1918]*y_cur[IDX_CI]*y_cur[IDX_SiC3HII] + - k[1919]*y_cur[IDX_CI]*y_cur[IDX_SiC3H2II] + - k[1922]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + - k[1923]*y_cur[IDX_CI]*y_cur[IDX_SiCH3II] + - k[1924]*y_cur[IDX_CI]*y_cur[IDX_SiCH4II] + - k[1925]*y_cur[IDX_CI]*y_cur[IDX_SiHII] + - k[1926]*y_cur[IDX_CI]*y_cur[IDX_SiH2II] + - k[1927]*y_cur[IDX_CI]*y_cur[IDX_SiH3II] + - k[1929]*y_cur[IDX_CI]*y_cur[IDX_SiH5II] + - k[1931]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + - k[1933]*y_cur[IDX_CHII]*y_cur[IDX_C2I] + - k[1934]*y_cur[IDX_CHII]*y_cur[IDX_C2H2I] + - k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + - k[1942]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + - k[1944]*y_cur[IDX_CHII]*y_cur[IDX_CNI] + - k[1945]*y_cur[IDX_CHII]*y_cur[IDX_CNI] + - k[1947]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + - k[1951]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + - k[1957]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + - k[1961]*y_cur[IDX_CHII]*y_cur[IDX_NI] + - k[1969]*y_cur[IDX_CHII]*y_cur[IDX_OI] + - k[1973]*y_cur[IDX_CHII]*y_cur[IDX_SI] + - k[1975]*y_cur[IDX_CH2II]*y_cur[IDX_C2HI] + - k[1977]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + - k[1980]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + - k[1982]*y_cur[IDX_CH2II]*y_cur[IDX_H2OI] + - k[1983]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + - k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + - k[1986]*y_cur[IDX_CH2II]*y_cur[IDX_HCNI] + - k[1988]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] + - k[1991]*y_cur[IDX_CH2II]*y_cur[IDX_OI] + - k[1994]*y_cur[IDX_CH2II]*y_cur[IDX_SI] + - k[1995]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] + - k[1997]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] + - k[1998]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2II] + - k[2017]*y_cur[IDX_CH2I]*y_cur[IDX_SII] + - k[2018]*y_cur[IDX_CH2I]*y_cur[IDX_SiII] + - k[2021]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] + - k[2023]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] + - k[2025]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] + - k[2028]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] + - k[2030]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] + - k[2032]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4HII] + - k[2034]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + - k[2036]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + - k[2038]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + - k[2040]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + - k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + - k[2049]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] + - k[2061]*y_cur[IDX_CH3II]*y_cur[IDX_CH2CCHI] + - k[2075]*y_cur[IDX_CH3II]*y_cur[IDX_CNI] + - k[2086]*y_cur[IDX_CH3II]*y_cur[IDX_NH2I] + - k[2090]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + - k[2094]*y_cur[IDX_CH3II]*y_cur[IDX_PI] + - k[2098]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] + - k[2101]*y_cur[IDX_CH3I]*y_cur[IDX_SII] + - k[2103]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + - k[2105]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HII] + - k[2106]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] + - k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] + - k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] + - k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + - k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + - k[2150]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + - k[2152]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + - k[2155]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + - k[2159]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + - k[2167]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + - k[2169]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + - k[2179]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + - k[2181]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + - k[2184]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + - k[2186]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + - k[2189]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + - k[2193]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + - k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + - k[2208]*y_cur[IDX_CH4I]*y_cur[IDX_O2II] + - k[2213]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] + - k[2215]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + - k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + - k[2233]*y_cur[IDX_CH5II]*y_cur[IDX_MgI] + - k[2237]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] + - k[2239]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + - k[2241]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] + - k[2242]*y_cur[IDX_CHI]*y_cur[IDX_C2H2II] + - k[2256]*y_cur[IDX_CHI]*y_cur[IDX_NII] + - k[2261]*y_cur[IDX_CHI]*y_cur[IDX_OII] + - k[2265]*y_cur[IDX_CHI]*y_cur[IDX_SII] + - k[2266]*y_cur[IDX_CHI]*y_cur[IDX_SiII] + - k[2272]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] + - k[2277]*y_cur[IDX_CNI]*y_cur[IDX_C2H2II] + - k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + - k[2319]*y_cur[IDX_HII]*y_cur[IDX_CH2PHI] + - k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + - k[2336]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] + - k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + - k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + - k[2369]*y_cur[IDX_H2II]*y_cur[IDX_C2I] + - k[2370]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + - k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + - k[2373]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] + - k[2374]*y_cur[IDX_H2II]*y_cur[IDX_CI] + - k[2375]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] + - k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + - k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + - k[2379]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + - k[2380]*y_cur[IDX_H2II]*y_cur[IDX_CHI] + - k[2381]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + - k[2382]*y_cur[IDX_H2II]*y_cur[IDX_CO2I] + - k[2383]*y_cur[IDX_H2II]*y_cur[IDX_COI] + - k[2384]*y_cur[IDX_H2II]*y_cur[IDX_H2I] + - k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + - k[2386]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + - k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + - k[2390]*y_cur[IDX_H2II]*y_cur[IDX_HeI] + - k[2391]*y_cur[IDX_H2II]*y_cur[IDX_N2I] + - k[2392]*y_cur[IDX_H2II]*y_cur[IDX_NI] + - k[2393]*y_cur[IDX_H2II]*y_cur[IDX_NHI] + - k[2394]*y_cur[IDX_H2II]*y_cur[IDX_NOI] + - k[2395]*y_cur[IDX_H2II]*y_cur[IDX_O2I] + - k[2396]*y_cur[IDX_H2II]*y_cur[IDX_OI] + - k[2397]*y_cur[IDX_H2II]*y_cur[IDX_OHI] + - k[2398]*y_cur[IDX_H2I]*y_cur[IDX_CII] + - k[2399]*y_cur[IDX_H2I]*y_cur[IDX_C10II] + - k[2400]*y_cur[IDX_H2I]*y_cur[IDX_C10HII] + - k[2401]*y_cur[IDX_H2I]*y_cur[IDX_C2II] + - k[2402]*y_cur[IDX_H2I]*y_cur[IDX_C2HII] + - k[2403]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] + - k[2404]*y_cur[IDX_H2I]*y_cur[IDX_C2N2II] + - k[2405]*y_cur[IDX_H2I]*y_cur[IDX_C2SII] + - k[2406]*y_cur[IDX_H2I]*y_cur[IDX_C3II] + - k[2407]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] + - k[2408]*y_cur[IDX_H2I]*y_cur[IDX_C3H2II] + - k[2409]*y_cur[IDX_H2I]*y_cur[IDX_C3NII] + - k[2410]*y_cur[IDX_H2I]*y_cur[IDX_C3OII] + - k[2411]*y_cur[IDX_H2I]*y_cur[IDX_C4II] + - k[2412]*y_cur[IDX_H2I]*y_cur[IDX_C4HII] + - k[2414]*y_cur[IDX_H2I]*y_cur[IDX_C5II] + - k[2415]*y_cur[IDX_H2I]*y_cur[IDX_C5HII] + - k[2416]*y_cur[IDX_H2I]*y_cur[IDX_C5NII] + - k[2417]*y_cur[IDX_H2I]*y_cur[IDX_C6II] + - k[2418]*y_cur[IDX_H2I]*y_cur[IDX_C6HII] + - k[2419]*y_cur[IDX_H2I]*y_cur[IDX_C7II] + - k[2420]*y_cur[IDX_H2I]*y_cur[IDX_C7HII] + - k[2421]*y_cur[IDX_H2I]*y_cur[IDX_C7NII] + - k[2422]*y_cur[IDX_H2I]*y_cur[IDX_C8II] + - k[2423]*y_cur[IDX_H2I]*y_cur[IDX_C8HII] + - k[2424]*y_cur[IDX_H2I]*y_cur[IDX_C9II] + - k[2425]*y_cur[IDX_H2I]*y_cur[IDX_C9HII] + - k[2426]*y_cur[IDX_H2I]*y_cur[IDX_C9NII] + - k[2427]*y_cur[IDX_H2I]*y_cur[IDX_CHII] + - k[2428]*y_cur[IDX_H2I]*y_cur[IDX_CH2II] + - k[2429]*y_cur[IDX_H2I]*y_cur[IDX_CH2CHCNII] + - k[2430]*y_cur[IDX_H2I]*y_cur[IDX_CH3C3NII] + - k[2431]*y_cur[IDX_H2I]*y_cur[IDX_CH3CNII] + - k[2432]*y_cur[IDX_H2I]*y_cur[IDX_CH4II] + - k[2433]*y_cur[IDX_H2I]*y_cur[IDX_CNII] + - k[2434]*y_cur[IDX_H2I]*y_cur[IDX_COII] + - k[2435]*y_cur[IDX_H2I]*y_cur[IDX_COII] + - k[2436]*y_cur[IDX_H2I]*y_cur[IDX_CO2II] + - k[2437]*y_cur[IDX_H2I]*y_cur[IDX_CPII] + - k[2438]*y_cur[IDX_H2I]*y_cur[IDX_CSII] + - k[2439]*y_cur[IDX_H2I]*y_cur[IDX_ClII] + - k[2440]*y_cur[IDX_H2I]*y_cur[IDX_FII] + - k[2441]*y_cur[IDX_H2I]*y_cur[IDX_H2C4NII] + - k[2442]*y_cur[IDX_H2I]*y_cur[IDX_H2OII] + - k[2443]*y_cur[IDX_H2I]*y_cur[IDX_H2SII] + - k[2444]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] + - k[2446]*y_cur[IDX_H2I]*y_cur[IDX_HC4NII] + - k[2447]*y_cur[IDX_H2I]*y_cur[IDX_HC5NII] + - k[2448]*y_cur[IDX_H2I]*y_cur[IDX_HC7NII] + - k[2449]*y_cur[IDX_H2I]*y_cur[IDX_HC9NII] + - k[2450]*y_cur[IDX_H2I]*y_cur[IDX_HCNII] + - k[2451]*y_cur[IDX_H2I]*y_cur[IDX_HCPII] + - k[2452]*y_cur[IDX_H2I]*y_cur[IDX_HCSiII] + - k[2453]*y_cur[IDX_H2I]*y_cur[IDX_HClII] + - k[2454]*y_cur[IDX_H2I]*y_cur[IDX_HFII] + - k[2455]*y_cur[IDX_H2I]*y_cur[IDX_HNSiII] + - k[2456]*y_cur[IDX_H2I]*y_cur[IDX_HSII] + - k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] + - k[2459]*y_cur[IDX_H2I]*y_cur[IDX_NII] + - k[2460]*y_cur[IDX_H2I]*y_cur[IDX_N2II] + - k[2462]*y_cur[IDX_H2I]*y_cur[IDX_NHII] + - k[2463]*y_cur[IDX_H2I]*y_cur[IDX_NH2II] + - k[2464]*y_cur[IDX_H2I]*y_cur[IDX_NH3II] + - k[2466]*y_cur[IDX_H2I]*y_cur[IDX_OII] + - k[2467]*y_cur[IDX_H2I]*y_cur[IDX_OM] + - k[2469]*y_cur[IDX_H2I]*y_cur[IDX_OHII] + - k[2470]*y_cur[IDX_H2I]*y_cur[IDX_SII] + - k[2471]*y_cur[IDX_H2I]*y_cur[IDX_SO2II] + - k[2472]*y_cur[IDX_H2I]*y_cur[IDX_SiCII] + - k[2473]*y_cur[IDX_H2I]*y_cur[IDX_SiC2II] + - k[2474]*y_cur[IDX_H2I]*y_cur[IDX_SiH4II] + - k[2475]*y_cur[IDX_H2I]*y_cur[IDX_SiOII] + - k[2477]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + - k[2478]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4HII] + - k[2479]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H2II] + - k[2480]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H3II] + - k[2482]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + - k[2484]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + - k[2486]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + - k[2498]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + - k[2517]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + - k[2520]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] + - k[2521]*y_cur[IDX_H2OI]*y_cur[IDX_C2HII] + - k[2538]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] + - k[2562]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + - k[2564]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + - k[2569]*y_cur[IDX_H2OI]*y_cur[IDX_SiII] + - k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] + - k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] + - k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] + - k[2730]*y_cur[IDX_H3II]*y_cur[IDX_OI] + - k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] - - k[2827]*y_cur[IDX_HI]*y_cur[IDX_C2H3II] - - k[2828]*y_cur[IDX_HI]*y_cur[IDX_C2H4II] - - k[2829]*y_cur[IDX_HI]*y_cur[IDX_C2H5II] - - k[2830]*y_cur[IDX_HI]*y_cur[IDX_C2N2II] - - k[2831]*y_cur[IDX_HI]*y_cur[IDX_C3H2II] - - k[2832]*y_cur[IDX_HI]*y_cur[IDX_C3H4II] - - k[2833]*y_cur[IDX_HI]*y_cur[IDX_C3H7II] - - k[2834]*y_cur[IDX_HI]*y_cur[IDX_C6H6II] - - k[2835]*y_cur[IDX_HI]*y_cur[IDX_CHII] - - k[2836]*y_cur[IDX_HI]*y_cur[IDX_CH2II] - - k[2837]*y_cur[IDX_HI]*y_cur[IDX_CH3II] - - k[2838]*y_cur[IDX_HI]*y_cur[IDX_C2H6II] - - k[2839]*y_cur[IDX_HI]*y_cur[IDX_CH4II] - - k[2840]*y_cur[IDX_HI]*y_cur[IDX_CH5II] - - k[2841]*y_cur[IDX_HI]*y_cur[IDX_CO2II] - - k[2842]*y_cur[IDX_HI]*y_cur[IDX_H2SII] - - k[2843]*y_cur[IDX_HI]*y_cur[IDX_H3SII] - - k[2844]*y_cur[IDX_HI]*y_cur[IDX_HSII] - - k[2845]*y_cur[IDX_HI]*y_cur[IDX_HeHII] - - k[2846]*y_cur[IDX_HI]*y_cur[IDX_NO2II] - - k[2847]*y_cur[IDX_HI]*y_cur[IDX_SO2II] - - k[2848]*y_cur[IDX_HI]*y_cur[IDX_SiHII] - - k[2849]*y_cur[IDX_HI]*y_cur[IDX_SiSII] + - k[2868]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + - k[2870]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + - k[2885]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] + - k[2897]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] + - k[2898]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] + - k[3015]*y_cur[IDX_HFI]*y_cur[IDX_SiII] + - k[3019]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + - k[3023]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3046]*y_cur[IDX_HNCI]*y_cur[IDX_SiII] + - k[3047]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] + - k[3048]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] + - k[3051]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] + - k[3052]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] + - k[3053]*y_cur[IDX_HONCII]*y_cur[IDX_H2I] + - k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + - k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + - k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] + - k[3097]*y_cur[IDX_HeII]*y_cur[IDX_C3HI] + - k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + - k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + - k[3121]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + - k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + - k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] + - k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + - k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + - k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + - k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + - k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + - k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + - k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + - k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] + - k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + - k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] + - k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + - k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + - k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + - k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + - k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + - k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] + - k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[3245]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + - k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + - k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + - k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] + - k[3260]*y_cur[IDX_HeII]*y_cur[IDX_HFI] + - k[3261]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + - k[3265]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] + - k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] + - k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] + - k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + - k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + - k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] + - k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + - k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + - k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] + - k[3297]*y_cur[IDX_HeII]*y_cur[IDX_OHI] + - k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] + - k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + - k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + - k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + - k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + - k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + - k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + - k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + - k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + - k[3328]*y_cur[IDX_HeII]*y_cur[IDX_SiHI] + - k[3336]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3338]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + - k[3355]*y_cur[IDX_NII]*y_cur[IDX_NHI] + - k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + - k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + - k[3385]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + - k[3388]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + - k[3391]*y_cur[IDX_NI]*y_cur[IDX_C2H4II] + - k[3394]*y_cur[IDX_NI]*y_cur[IDX_C3HII] + - k[3406]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + - k[3408]*y_cur[IDX_NI]*y_cur[IDX_C4H5II] + - k[3412]*y_cur[IDX_NI]*y_cur[IDX_C5HII] + - k[3415]*y_cur[IDX_NI]*y_cur[IDX_C5H2II] + - k[3416]*y_cur[IDX_NI]*y_cur[IDX_C5H3II] + - k[3429]*y_cur[IDX_NI]*y_cur[IDX_C7HII] + - k[3432]*y_cur[IDX_NI]*y_cur[IDX_C7H2II] + - k[3433]*y_cur[IDX_NI]*y_cur[IDX_C7H3II] + - k[3434]*y_cur[IDX_NI]*y_cur[IDX_C7H4II] + - k[3446]*y_cur[IDX_NI]*y_cur[IDX_C9HII] + - k[3449]*y_cur[IDX_NI]*y_cur[IDX_C9H2II] + - k[3450]*y_cur[IDX_NI]*y_cur[IDX_C9H3II] + - k[3451]*y_cur[IDX_NI]*y_cur[IDX_C9H4II] + - k[3452]*y_cur[IDX_NI]*y_cur[IDX_CH2II] + - k[3453]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHII] + - k[3454]*y_cur[IDX_NI]*y_cur[IDX_CH3II] + - k[3455]*y_cur[IDX_NI]*y_cur[IDX_CH3C4HII] + - k[3457]*y_cur[IDX_NI]*y_cur[IDX_H2OII] + - k[3462]*y_cur[IDX_NI]*y_cur[IDX_HSII] + - k[3463]*y_cur[IDX_NI]*y_cur[IDX_NHII] + - k[3464]*y_cur[IDX_NI]*y_cur[IDX_NH2II] + - k[3466]*y_cur[IDX_NI]*y_cur[IDX_O2HII] + - k[3467]*y_cur[IDX_NI]*y_cur[IDX_OHII] + - k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] + - k[3471]*y_cur[IDX_NI]*y_cur[IDX_SiHII] + - k[3472]*y_cur[IDX_NI]*y_cur[IDX_SiH2II] + - k[3474]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] + - k[3478]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + - k[3486]*y_cur[IDX_NHII]*y_cur[IDX_COI] + - k[3506]*y_cur[IDX_NHII]*y_cur[IDX_SI] + - k[3526]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + - k[3528]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] + - k[3530]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] + - k[3532]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + - k[3595]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + - k[3598]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + - k[3602]*y_cur[IDX_NH3I]*y_cur[IDX_SiII] + - k[3606]*y_cur[IDX_NHI]*y_cur[IDX_C2II] + - k[3607]*y_cur[IDX_NHI]*y_cur[IDX_C2H2II] + - k[3619]*y_cur[IDX_NHI]*y_cur[IDX_OII] + - k[3621]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + - k[3624]*y_cur[IDX_NHI]*y_cur[IDX_SII] + - k[3625]*y_cur[IDX_NHI]*y_cur[IDX_SiII] + - k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] + - k[3629]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] + - k[3630]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] + - k[3650]*y_cur[IDX_OII]*y_cur[IDX_OHI] + - k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + - k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] + - k[3688]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + - k[3738]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + - k[3740]*y_cur[IDX_OI]*y_cur[IDX_HNOII] + - k[3743]*y_cur[IDX_OI]*y_cur[IDX_HSII] + - k[3746]*y_cur[IDX_OI]*y_cur[IDX_NH2II] + - k[3750]*y_cur[IDX_OI]*y_cur[IDX_OHII] + - k[3751]*y_cur[IDX_OI]*y_cur[IDX_PHII] + - k[3756]*y_cur[IDX_OI]*y_cur[IDX_SiHII] + - k[3757]*y_cur[IDX_OI]*y_cur[IDX_SiH2II] + - k[3758]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] + - k[3765]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + - k[3766]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + - k[3790]*y_cur[IDX_OHII]*y_cur[IDX_SI] + - k[3796]*y_cur[IDX_OHI]*y_cur[IDX_C2H2II] + - k[3802]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + - k[3807]*y_cur[IDX_OHI]*y_cur[IDX_PII] + - k[3808]*y_cur[IDX_OHI]*y_cur[IDX_SII] + - k[3809]*y_cur[IDX_OHI]*y_cur[IDX_SiII] + - k[3814]*y_cur[IDX_PI]*y_cur[IDX_C3H2II] + - k[3815]*y_cur[IDX_PI]*y_cur[IDX_C4H2II] + - k[3820]*y_cur[IDX_SII]*y_cur[IDX_C3H2I] + - k[3821]*y_cur[IDX_SII]*y_cur[IDX_C3HI] + - k[3822]*y_cur[IDX_SII]*y_cur[IDX_C4HI] + - k[3827]*y_cur[IDX_SII]*y_cur[IDX_H2CCCI] + - k[3828]*y_cur[IDX_SII]*y_cur[IDX_H2SI] + - k[3832]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + - k[3834]*y_cur[IDX_SI]*y_cur[IDX_C3H2II] + - k[3836]*y_cur[IDX_SI]*y_cur[IDX_C4H2II] + - k[3839]*y_cur[IDX_SI]*y_cur[IDX_H3SII] + - k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[3860]*y_cur[IDX_SiII]*y_cur[IDX_C3H2I] + - k[3861]*y_cur[IDX_SiII]*y_cur[IDX_C3HI] + - k[3862]*y_cur[IDX_SiII]*y_cur[IDX_C4HI] + - k[3863]*y_cur[IDX_SiII]*y_cur[IDX_CH2CCHI] + - k[3868]*y_cur[IDX_SiII]*y_cur[IDX_H2CCCI] + - k[3872]*y_cur[IDX_SiI]*y_cur[IDX_C3HII] + - k[3874]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] + - k[3876]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] + - k[3878]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] + - k[3880]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] + - k[3883]*y_cur[IDX_SiH2II]*y_cur[IDX_SI] + - k[3885]*y_cur[IDX_SiHI]*y_cur[IDX_SII] + - k[3896]*y_cur[IDX_CM]*y_cur[IDX_HII] + - k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] + - k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] + - k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] + - k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + - k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + - k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + - k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] + - k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] + - k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] + - k[3931]*y_cur[IDX_C10M]*y_cur[IDX_HII] + - k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] + - k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] + - k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] + - k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + - k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + - k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + - k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] + - k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] + - k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] + - k[3966]*y_cur[IDX_C10HM]*y_cur[IDX_HII] + - k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] + - k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] + - k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] + - k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + - k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + - k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + - k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] + - k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] + - k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] + - k[4001]*y_cur[IDX_C2M]*y_cur[IDX_HII] + - k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] + - k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] + - k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] + - k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + - k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + - k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + - k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] + - k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] + - k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] + - k[4036]*y_cur[IDX_C2HM]*y_cur[IDX_HII] + - k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] + - k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] + - k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] + - k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + - k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + - k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + - k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] + - k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] + - k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] + - k[4071]*y_cur[IDX_C3M]*y_cur[IDX_HII] + - k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] + - k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] + - k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] + - k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + - k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + - k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + - k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] + - k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] + - k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] + - k[4106]*y_cur[IDX_C3HM]*y_cur[IDX_HII] + - k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] + - k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] + - k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] + - k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + - k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + - k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + - k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] + - k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] + - k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] + - k[4141]*y_cur[IDX_C3NM]*y_cur[IDX_HII] + - k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] + - k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] + - k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] + - k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + - k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + - k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + - k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] + - k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] + - k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] + - k[4176]*y_cur[IDX_C4M]*y_cur[IDX_HII] + - k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] + - k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] + - k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] + - k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + - k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + - k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + - k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] + - k[4191]*y_cur[IDX_C4M]*y_cur[IDX_NH4II] + - k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] + - k[4211]*y_cur[IDX_C4HM]*y_cur[IDX_HII] + - k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] + - k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] + - k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] + - k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + - k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + - k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + - k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] + - k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] + - k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] + - k[4246]*y_cur[IDX_C5M]*y_cur[IDX_HII] + - k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] + - k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] + - k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] + - k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + - k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + - k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + - k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] + - k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] + - k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] + - k[4281]*y_cur[IDX_C5HM]*y_cur[IDX_HII] + - k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] + - k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] + - k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] + - k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + - k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + - k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + - k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] + - k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] + - k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] + - k[4316]*y_cur[IDX_C5NM]*y_cur[IDX_HII] + - k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] + - k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] + - k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] + - k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + - k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + - k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + - k[4329]*y_cur[IDX_C5NM]*y_cur[IDX_N2HII] + - k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] + - k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] + - k[4351]*y_cur[IDX_C6M]*y_cur[IDX_HII] + - k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] + - k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] + - k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] + - k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + - k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + - k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + - k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] + - k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] + - k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] + - k[4386]*y_cur[IDX_C6HM]*y_cur[IDX_HII] + - k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] + - k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] + - k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] + - k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + - k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + - k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + - k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] + - k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] + - k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] + - k[4421]*y_cur[IDX_C7M]*y_cur[IDX_HII] + - k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] + - k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] + - k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] + - k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + - k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + - k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + - k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] + - k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] + - k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] + - k[4456]*y_cur[IDX_C7HM]*y_cur[IDX_HII] + - k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] + - k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] + - k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] + - k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + - k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + - k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + - k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] + - k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] + - k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] + - k[4491]*y_cur[IDX_C8M]*y_cur[IDX_HII] + - k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] + - k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] + - k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] + - k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + - k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + - k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + - k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] + - k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] + - k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] + - k[4526]*y_cur[IDX_C8HM]*y_cur[IDX_HII] + - k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] + - k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] + - k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] + - k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + - k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + - k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + - k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] + - k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] + - k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] + - k[4561]*y_cur[IDX_C9M]*y_cur[IDX_HII] + - k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] + - k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] + - k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] + - k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + - k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + - k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + - k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] + - k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] + - k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] + - k[4596]*y_cur[IDX_C9HM]*y_cur[IDX_HII] + - k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] + - k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] + - k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] + - k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + - k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + - k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + - k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] + - k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] + - k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] + - k[4631]*y_cur[IDX_CHM]*y_cur[IDX_HII] + - k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] + - k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] + - k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] + - k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + - k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + - k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + - k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] + - k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] + - k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] + - k[4666]*y_cur[IDX_CNM]*y_cur[IDX_HII] + - k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] + - k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] + - k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] + - k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + - k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + - k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + - k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] + - k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] + - k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] + - k[4691]*y_cur[IDX_HM]*y_cur[IDX_CII] + - k[4692]*y_cur[IDX_HM]*y_cur[IDX_C2H2II] + - k[4693]*y_cur[IDX_HM]*y_cur[IDX_C2H3II] + - k[4694]*y_cur[IDX_HM]*y_cur[IDX_C4H2II] + - k[4695]*y_cur[IDX_HM]*y_cur[IDX_C4H3II] + - k[4696]*y_cur[IDX_HM]*y_cur[IDX_C4SII] + - k[4697]*y_cur[IDX_HM]*y_cur[IDX_CH2CCHII] + - k[4698]*y_cur[IDX_HM]*y_cur[IDX_CH3II] + - k[4699]*y_cur[IDX_HM]*y_cur[IDX_CNCII] + - k[4700]*y_cur[IDX_HM]*y_cur[IDX_FeII] + - k[4701]*y_cur[IDX_HM]*y_cur[IDX_HII] + - k[4701]*y_cur[IDX_HM]*y_cur[IDX_HII] + - k[4702]*y_cur[IDX_HM]*y_cur[IDX_H2II] + - k[4703]*y_cur[IDX_HM]*y_cur[IDX_H2COII] + - k[4704]*y_cur[IDX_HM]*y_cur[IDX_H2SII] + - k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] + - k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] + - k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] + - k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] + - k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] + - k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] + - k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + - k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + - k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + - k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + - k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + - k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + - k[4711]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + - k[4712]*y_cur[IDX_HM]*y_cur[IDX_HeII] + - k[4713]*y_cur[IDX_HM]*y_cur[IDX_MgII] + - k[4714]*y_cur[IDX_HM]*y_cur[IDX_NII] + - k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] + - k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] + - k[4716]*y_cur[IDX_HM]*y_cur[IDX_NH3II] + - k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] + - k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] + - k[4718]*y_cur[IDX_HM]*y_cur[IDX_NOII] + - k[4719]*y_cur[IDX_HM]*y_cur[IDX_NaII] + - k[4720]*y_cur[IDX_HM]*y_cur[IDX_OII] + - k[4721]*y_cur[IDX_HM]*y_cur[IDX_SII] + - k[4722]*y_cur[IDX_HM]*y_cur[IDX_SOII] + - k[4723]*y_cur[IDX_HM]*y_cur[IDX_SiII] + - k[4724]*y_cur[IDX_HM]*y_cur[IDX_SiOII] + - k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] + - k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] + - k[4726]*y_cur[IDX_HM]*y_cur[IDX_SiSII] + - k[4737]*y_cur[IDX_OM]*y_cur[IDX_HII] + - k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] + - k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] + - k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] + - k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + - k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + - k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + - k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] + - k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] + - k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] + - k[4772]*y_cur[IDX_O2M]*y_cur[IDX_HII] + - k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] + - k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] + - k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] + - k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + - k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + - k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] + - k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] + - k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] + - k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] + - k[4807]*y_cur[IDX_OHM]*y_cur[IDX_HII] + - k[4810]*y_cur[IDX_OHM]*y_cur[IDX_H3II] + - k[4811]*y_cur[IDX_OHM]*y_cur[IDX_H3OII] + - k[4812]*y_cur[IDX_OHM]*y_cur[IDX_HC2SII] + - k[4813]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] + - k[4814]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] + - k[4815]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] + - k[4820]*y_cur[IDX_OHM]*y_cur[IDX_N2HII] + - k[4822]*y_cur[IDX_OHM]*y_cur[IDX_NH4II] + - k[4830]*y_cur[IDX_OHM]*y_cur[IDX_SiOHII] + - k[4842]*y_cur[IDX_SM]*y_cur[IDX_HII] + - k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] + - k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] + - k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] + - k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] + - k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] + - k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + - k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] + - k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] + - k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] + - k[4867]*y_cur[IDX_C2I]*y_cur[IDX_C2H2I] + - k[4868]*y_cur[IDX_C2I]*y_cur[IDX_C2H4I] + - k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] + - k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] + - k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] + - k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] + - k[4871]*y_cur[IDX_C2I]*y_cur[IDX_CH4I] + - k[4872]*y_cur[IDX_C2I]*y_cur[IDX_C4H2I] + - k[4873]*y_cur[IDX_C2I]*y_cur[IDX_HCNI] + - k[4877]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HI] + - k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] + - k[4880]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] + - k[4883]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H3I] + - k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] + - k[4888]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2I] + - k[4889]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2I] + - k[4890]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2I] + - k[4891]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2I] + - k[4892]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2I] + - k[4893]*y_cur[IDX_C2HI]*y_cur[IDX_C8H2I] + - k[4894]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] + - k[4895]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] + - k[4896]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] + - k[4897]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] + - k[4899]*y_cur[IDX_C2HI]*y_cur[IDX_CSI] + - k[4900]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2I] + - k[4901]*y_cur[IDX_C2HI]*y_cur[IDX_HCNI] + - k[4902]*y_cur[IDX_C2HI]*y_cur[IDX_HNCI] + - k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] + - k[4906]*y_cur[IDX_C2HI]*y_cur[IDX_SI] + - k[4907]*y_cur[IDX_C4HI]*y_cur[IDX_HNCI] + - k[4910]*y_cur[IDX_CI]*y_cur[IDX_C10HI] + - k[4912]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] + - k[4913]*y_cur[IDX_CI]*y_cur[IDX_C2H3I] + - k[4914]*y_cur[IDX_CI]*y_cur[IDX_C2H4I] + - k[4915]*y_cur[IDX_CI]*y_cur[IDX_C2H5I] + - k[4916]*y_cur[IDX_CI]*y_cur[IDX_C2HI] + - k[4919]*y_cur[IDX_CI]*y_cur[IDX_C3H2I] + - k[4920]*y_cur[IDX_CI]*y_cur[IDX_C3HI] + - k[4924]*y_cur[IDX_CI]*y_cur[IDX_C4H3I] + - k[4925]*y_cur[IDX_CI]*y_cur[IDX_C4HI] + - k[4927]*y_cur[IDX_CI]*y_cur[IDX_C5H2I] + - k[4928]*y_cur[IDX_CI]*y_cur[IDX_C5HI] + - k[4932]*y_cur[IDX_CI]*y_cur[IDX_C6H2I] + - k[4933]*y_cur[IDX_CI]*y_cur[IDX_C6HI] + - k[4935]*y_cur[IDX_CI]*y_cur[IDX_C7H2I] + - k[4936]*y_cur[IDX_CI]*y_cur[IDX_C7HI] + - k[4939]*y_cur[IDX_CI]*y_cur[IDX_C8H2I] + - k[4940]*y_cur[IDX_CI]*y_cur[IDX_C8HI] + - k[4941]*y_cur[IDX_CI]*y_cur[IDX_C9H2I] + - k[4942]*y_cur[IDX_CI]*y_cur[IDX_C9HI] + - k[4944]*y_cur[IDX_CI]*y_cur[IDX_CH2I] + - k[4946]*y_cur[IDX_CI]*y_cur[IDX_CH2CCH2I] + - k[4947]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHI] + - k[4948]*y_cur[IDX_CI]*y_cur[IDX_CH2CNI] + - k[4949]*y_cur[IDX_CI]*y_cur[IDX_CH3I] + - k[4952]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] + - k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] + - k[4955]*y_cur[IDX_CI]*y_cur[IDX_CHI] + - k[4959]*y_cur[IDX_CI]*y_cur[IDX_H2CCCI] + - k[4961]*y_cur[IDX_CI]*y_cur[IDX_C4H2I] + - k[4962]*y_cur[IDX_CI]*y_cur[IDX_HCOI] + - k[4965]*y_cur[IDX_CI]*y_cur[IDX_HSI] + - k[4969]*y_cur[IDX_CI]*y_cur[IDX_NH2I] + - k[4970]*y_cur[IDX_CI]*y_cur[IDX_NH2I] + - k[4972]*y_cur[IDX_CI]*y_cur[IDX_NHI] + - k[4981]*y_cur[IDX_CI]*y_cur[IDX_OHI] + - k[4983]*y_cur[IDX_CI]*y_cur[IDX_PHI] + - k[4988]*y_cur[IDX_CI]*y_cur[IDX_SiH2I] + - k[4989]*y_cur[IDX_CI]*y_cur[IDX_SiH3I] + - k[4990]*y_cur[IDX_CI]*y_cur[IDX_SiHI] + - k[4991]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2I] + - k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + - k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + - k[4994]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + - k[5005]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + - k[5006]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + - k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + - k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + - k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + - k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + - k[5014]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + - k[5016]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] + - k[5020]*y_cur[IDX_CH2I]*y_cur[IDX_SI] + - k[5021]*y_cur[IDX_CH2I]*y_cur[IDX_SiI] + - k[5023]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - - k[5024]*y_cur[IDX_C4H6I]*y_cur[IDX_HI] + - k[5027]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + - k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + - k[5044]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + - k[5048]*y_cur[IDX_CH3I]*y_cur[IDX_SI] + - k[5049]*y_cur[IDX_CH3I]*y_cur[IDX_SiI] + - k[5051]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + - k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] + - k[5063]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] + - k[5064]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] + - k[5065]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] + - k[5066]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] + - k[5067]*y_cur[IDX_CHI]*y_cur[IDX_CH2CCH2I] + - k[5068]*y_cur[IDX_CHI]*y_cur[IDX_CH3CCHI] + - k[5070]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] + - k[5072]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] + - k[5073]*y_cur[IDX_CHI]*y_cur[IDX_CH3OHI] + - k[5074]*y_cur[IDX_CHI]*y_cur[IDX_CH4I] + - k[5080]*y_cur[IDX_CHI]*y_cur[IDX_NI] + - k[5082]*y_cur[IDX_CHI]*y_cur[IDX_NH3I] + - k[5085]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + - k[5086]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5087]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5096]*y_cur[IDX_CHI]*y_cur[IDX_OI] + - k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] + - k[5099]*y_cur[IDX_CHI]*y_cur[IDX_OHI] + - k[5100]*y_cur[IDX_CHI]*y_cur[IDX_SI] + - k[5103]*y_cur[IDX_CHI]*y_cur[IDX_SOI] + - k[5104]*y_cur[IDX_CNI]*y_cur[IDX_C2H2I] + - k[5106]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] + - k[5107]*y_cur[IDX_CNI]*y_cur[IDX_C6H2I] + - k[5108]*y_cur[IDX_CNI]*y_cur[IDX_C8H2I] + - k[5109]*y_cur[IDX_CNI]*y_cur[IDX_CH2CCH2I] + - k[5110]*y_cur[IDX_CNI]*y_cur[IDX_CH3CCHI] + - k[5115]*y_cur[IDX_CNI]*y_cur[IDX_C4H2I] + - k[5116]*y_cur[IDX_CNI]*y_cur[IDX_HCNI] + - k[5118]*y_cur[IDX_CNI]*y_cur[IDX_HNCI] + - k[5132]*y_cur[IDX_ClI]*y_cur[IDX_H2I] + - k[5133]*y_cur[IDX_H2I]*y_cur[IDX_C2HI] + - k[5134]*y_cur[IDX_H2I]*y_cur[IDX_CI] + - k[5135]*y_cur[IDX_H2I]*y_cur[IDX_CH2I] + - k[5136]*y_cur[IDX_H2I]*y_cur[IDX_CH3I] + - k[5137]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + - k[5138]*y_cur[IDX_H2I]*y_cur[IDX_CNI] + - k[5139]*y_cur[IDX_H2I]*y_cur[IDX_FI] + - k[5140]*y_cur[IDX_H2I]*y_cur[IDX_HSI] + - k[5141]*y_cur[IDX_H2I]*y_cur[IDX_NI] + - k[5142]*y_cur[IDX_H2I]*y_cur[IDX_NH2I] + - k[5143]*y_cur[IDX_H2I]*y_cur[IDX_NHI] + - k[5144]*y_cur[IDX_H2I]*y_cur[IDX_O2I] + - k[5146]*y_cur[IDX_H2I]*y_cur[IDX_O2HI] + - k[5147]*y_cur[IDX_H2I]*y_cur[IDX_OI] + - k[5148]*y_cur[IDX_H2I]*y_cur[IDX_OHI] + - k[5149]*y_cur[IDX_H2I]*y_cur[IDX_SI] - - k[5153]*y_cur[IDX_HI]*y_cur[IDX_C2I] - - k[5154]*y_cur[IDX_HI]*y_cur[IDX_C2H2I] - - k[5155]*y_cur[IDX_HI]*y_cur[IDX_C2H3I] - - k[5156]*y_cur[IDX_HI]*y_cur[IDX_CH2I] - - k[5157]*y_cur[IDX_HI]*y_cur[IDX_CH2COI] - - k[5158]*y_cur[IDX_HI]*y_cur[IDX_CH3I] - - k[5159]*y_cur[IDX_HI]*y_cur[IDX_CH4I] - - k[5160]*y_cur[IDX_HI]*y_cur[IDX_CHI] - - k[5161]*y_cur[IDX_HI]*y_cur[IDX_CNOI] - - k[5162]*y_cur[IDX_HI]*y_cur[IDX_CO2I] - - k[5163]*y_cur[IDX_HI]*y_cur[IDX_COI] - - k[5164]*y_cur[IDX_HI]*y_cur[IDX_H2CNI] - - k[5165]*y_cur[IDX_HI]*y_cur[IDX_H2COI] - - k[5166]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - - k[5167]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - - k[5168]*y_cur[IDX_HI]*y_cur[IDX_H2OI] - - k[5169]*y_cur[IDX_HI]*y_cur[IDX_H2SI] - - k[5170]*y_cur[IDX_HI]*y_cur[IDX_HCNI] - - k[5171]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - - k[5172]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - - k[5173]*y_cur[IDX_HI]*y_cur[IDX_HCSI] - - k[5174]*y_cur[IDX_HI]*y_cur[IDX_HNCI] + - k[5174]*y_cur[IDX_HI]*y_cur[IDX_HNCI] - - k[5175]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - - k[5176]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - - k[5177]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - - k[5178]*y_cur[IDX_HI]*y_cur[IDX_HSI] - - k[5179]*y_cur[IDX_HI]*y_cur[IDX_N2OI] - - k[5180]*y_cur[IDX_HI]*y_cur[IDX_N2OI] - - k[5181]*y_cur[IDX_HI]*y_cur[IDX_NCCNI] - - k[5182]*y_cur[IDX_HI]*y_cur[IDX_NH2I] - - k[5183]*y_cur[IDX_HI]*y_cur[IDX_NH3I] - - k[5184]*y_cur[IDX_HI]*y_cur[IDX_NHI] - - k[5185]*y_cur[IDX_HI]*y_cur[IDX_NO2I] - - k[5186]*y_cur[IDX_HI]*y_cur[IDX_NOI] - - k[5187]*y_cur[IDX_HI]*y_cur[IDX_NOI] - - k[5188]*y_cur[IDX_HI]*y_cur[IDX_NSI] - - k[5189]*y_cur[IDX_HI]*y_cur[IDX_NSI] - - k[5190]*y_cur[IDX_HI]*y_cur[IDX_O2I] - - k[5191]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - - k[5192]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - - k[5193]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - - k[5194]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - - k[5195]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - - k[5196]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - - k[5197]*y_cur[IDX_HI]*y_cur[IDX_OCSI] - - k[5198]*y_cur[IDX_HI]*y_cur[IDX_OHI] - - k[5199]*y_cur[IDX_HI]*y_cur[IDX_S2I] - - k[5200]*y_cur[IDX_HI]*y_cur[IDX_SOI] - - k[5201]*y_cur[IDX_HI]*y_cur[IDX_SOI] - - k[5211]*y_cur[IDX_HClI]*y_cur[IDX_HI] - - k[5213]*y_cur[IDX_HNC3I]*y_cur[IDX_HI] + - k[5213]*y_cur[IDX_HNC3I]*y_cur[IDX_HI] + - k[5224]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] + - k[5228]*y_cur[IDX_NI]*y_cur[IDX_C2HI] + - k[5232]*y_cur[IDX_NI]*y_cur[IDX_C3H2I] + - k[5233]*y_cur[IDX_NI]*y_cur[IDX_C3HI] + - k[5236]*y_cur[IDX_NI]*y_cur[IDX_C4HI] + - k[5239]*y_cur[IDX_NI]*y_cur[IDX_C5H2I] + - k[5240]*y_cur[IDX_NI]*y_cur[IDX_C5HI] + - k[5245]*y_cur[IDX_NI]*y_cur[IDX_C7H2I] + - k[5246]*y_cur[IDX_NI]*y_cur[IDX_C7HI] + - k[5251]*y_cur[IDX_NI]*y_cur[IDX_C9HI] + - k[5253]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + - k[5254]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + - k[5257]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + - k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + - k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + - k[5267]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + - k[5269]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + - k[5271]*y_cur[IDX_NI]*y_cur[IDX_HSI] + - k[5274]*y_cur[IDX_NI]*y_cur[IDX_NHI] + - k[5283]*y_cur[IDX_NI]*y_cur[IDX_OHI] + - k[5285]*y_cur[IDX_NI]*y_cur[IDX_PHI] + - k[5294]*y_cur[IDX_NI]*y_cur[IDX_SiH2I] + - k[5296]*y_cur[IDX_NI]*y_cur[IDX_SiHI] + - k[5299]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + - k[5303]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] + - k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + - k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + - k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + - k[5315]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + - k[5318]*y_cur[IDX_NHI]*y_cur[IDX_OI] + - k[5319]*y_cur[IDX_NHI]*y_cur[IDX_OI] + - k[5322]*y_cur[IDX_NHI]*y_cur[IDX_OHI] + - k[5325]*y_cur[IDX_NHI]*y_cur[IDX_SI] + - k[5345]*y_cur[IDX_OI]*y_cur[IDX_C2H3I] + - k[5350]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] + - k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] + - k[5404]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + - k[5405]*y_cur[IDX_OI]*y_cur[IDX_HCOI] + - k[5409]*y_cur[IDX_OI]*y_cur[IDX_HCSI] + - k[5411]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + - k[5416]*y_cur[IDX_OI]*y_cur[IDX_HSI] + - k[5420]*y_cur[IDX_OI]*y_cur[IDX_NH2I] + - k[5432]*y_cur[IDX_OI]*y_cur[IDX_OHI] + - k[5433]*y_cur[IDX_OI]*y_cur[IDX_PH2I] + - k[5436]*y_cur[IDX_OI]*y_cur[IDX_PHI] + - k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] + - k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] + - k[5447]*y_cur[IDX_OI]*y_cur[IDX_SiH3I] + - k[5449]*y_cur[IDX_OI]*y_cur[IDX_SiHI] + - k[5454]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] + - k[5460]*y_cur[IDX_OHI]*y_cur[IDX_CNI] + - k[5461]*y_cur[IDX_OHI]*y_cur[IDX_COI] + - k[5463]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + - k[5466]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] + - k[5477]*y_cur[IDX_OHI]*y_cur[IDX_NOI] + - k[5480]*y_cur[IDX_OHI]*y_cur[IDX_SI] + - k[5481]*y_cur[IDX_OHI]*y_cur[IDX_SOI] + - k[5482]*y_cur[IDX_OHI]*y_cur[IDX_SiI] + - k[5483]*y_cur[IDX_OHI]*y_cur[IDX_SiOI] + - k[5486]*y_cur[IDX_SI]*y_cur[IDX_HCOI] + - k[5488]*y_cur[IDX_SI]*y_cur[IDX_HSI] - - k[5546]*y_cur[IDX_HII]*y_cur[IDX_HI] - - k[5569]*y_cur[IDX_HI]*y_cur[IDX_CII] - - k[5570]*y_cur[IDX_HI]*y_cur[IDX_C4H2II] - - k[5571]*y_cur[IDX_HI]*y_cur[IDX_C4H3II] - - k[5572]*y_cur[IDX_HI]*y_cur[IDX_CI] - - k[5573]*y_cur[IDX_HI]*y_cur[IDX_OI] - - k[5574]*y_cur[IDX_HI]*y_cur[IDX_OHI] - - k[5575]*y_cur[IDX_HI]*y_cur[IDX_SiII] - - k[5608]*y_cur[IDX_HI]*y_cur[IDX_eM] + - k[5615]*y_cur[IDX_HII]*y_cur[IDX_eM] + - k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + k[5679]*y_cur[IDX_H2I] + - k[5681]*y_cur[IDX_H2I] + k[5681]*y_cur[IDX_H2I] - - k[5682]*y_cur[IDX_HI] + k[5690]*y_cur[IDX_C10H2I] + - k[5691]*y_cur[IDX_C10HI] + k[5697]*y_cur[IDX_C2H2I] + - k[5698]*y_cur[IDX_C2H3I] + k[5704]*y_cur[IDX_C2H5CNI] + - k[5708]*y_cur[IDX_C2HI] + k[5719]*y_cur[IDX_C3H2I] + - k[5720]*y_cur[IDX_C3HI] + k[5730]*y_cur[IDX_C4H3I] + - k[5730]*y_cur[IDX_C4H3I] + k[5732]*y_cur[IDX_C4HI] + - k[5741]*y_cur[IDX_C5H2I] + k[5744]*y_cur[IDX_C5HI] + - k[5751]*y_cur[IDX_C6H6I] + k[5751]*y_cur[IDX_C6H6I] + - k[5754]*y_cur[IDX_C6HI] + k[5758]*y_cur[IDX_C7H2I] + - k[5759]*y_cur[IDX_C7HI] + k[5764]*y_cur[IDX_C8H2I] + - k[5765]*y_cur[IDX_C8HI] + k[5769]*y_cur[IDX_C9H2I] + - k[5770]*y_cur[IDX_C9HI] + k[5776]*y_cur[IDX_CHII] + - k[5779]*y_cur[IDX_CH2I] + k[5781]*y_cur[IDX_CH2CCH2I] + - k[5782]*y_cur[IDX_CH2CCHI] + k[5793]*y_cur[IDX_CH3I] + - k[5802]*y_cur[IDX_CH3CCHI] + k[5817]*y_cur[IDX_CH3OHI] + - k[5818]*y_cur[IDX_CH3OHI] + k[5821]*y_cur[IDX_CHI] + - k[5833]*y_cur[IDX_HM] + k[5834]*y_cur[IDX_H2CCCI] + - k[5835]*y_cur[IDX_H2CNI] + k[5839]*y_cur[IDX_H2OI] - - k[5844]*y_cur[IDX_HI] + k[5845]*y_cur[IDX_HC2PI] + - k[5849]*y_cur[IDX_C4H2I] + k[5851]*y_cur[IDX_HC5NI] + - k[5854]*y_cur[IDX_HCNI] + k[5856]*y_cur[IDX_HCOI] + - k[5861]*y_cur[IDX_HCPI] + k[5864]*y_cur[IDX_HClI] + - k[5865]*y_cur[IDX_HFI] + k[5867]*y_cur[IDX_HNCI] + - k[5869]*y_cur[IDX_HNOI] + k[5870]*y_cur[IDX_HNSiI] + - k[5873]*y_cur[IDX_HPOI] + k[5875]*y_cur[IDX_HSI] + - k[5883]*y_cur[IDX_NH2I] + k[5885]*y_cur[IDX_NH3I] + - k[5888]*y_cur[IDX_NHI] + k[5899]*y_cur[IDX_O2HI] + - k[5905]*y_cur[IDX_OHI] + k[5907]*y_cur[IDX_PH2I] + - k[5908]*y_cur[IDX_PHI] + k[5920]*y_cur[IDX_SiC2HI] + - k[5922]*y_cur[IDX_SiC3HI] + k[5926]*y_cur[IDX_SiCH3I] + - k[5927]*y_cur[IDX_SiH2I] + k[5928]*y_cur[IDX_SiH3I] + - k[5930]*y_cur[IDX_SiHI] + k[5940]*y_cur[IDX_HCCNI] + - k[5957]*y_cur[IDX_C10H2I] + k[5957]*y_cur[IDX_C10H2I] + - k[5959]*y_cur[IDX_C10H2I] + k[5960]*y_cur[IDX_C10H2I] + - k[5961]*y_cur[IDX_C10HI] + k[5963]*y_cur[IDX_C10HI] + - k[5965]*y_cur[IDX_C10HI] + k[5967]*y_cur[IDX_C10HI] + - k[5968]*y_cur[IDX_C10HI] + k[5979]*y_cur[IDX_C2HII] + - k[5982]*y_cur[IDX_C2H2I] + k[5983]*y_cur[IDX_C2H3I] + - k[5989]*y_cur[IDX_C2H5CNI] + k[5993]*y_cur[IDX_C2HI] + - k[6003]*y_cur[IDX_C3H2I] + k[6004]*y_cur[IDX_C3HI] + - k[6015]*y_cur[IDX_C4H3I] + k[6017]*y_cur[IDX_C4HI] + - k[6026]*y_cur[IDX_C5H2I] + k[6029]*y_cur[IDX_C5HI] + - k[6037]*y_cur[IDX_C6H2I] + k[6046]*y_cur[IDX_C7H2I] + - k[6047]*y_cur[IDX_C7HI] + k[6056]*y_cur[IDX_C8H2I] + - k[6057]*y_cur[IDX_C8HI] + k[6064]*y_cur[IDX_C9H2I] + - k[6065]*y_cur[IDX_C9HI] + k[6076]*y_cur[IDX_CH2II] + - k[6079]*y_cur[IDX_CH2I] + k[6081]*y_cur[IDX_CH2CCH2I] + - k[6083]*y_cur[IDX_CH2CCHI] + k[6096]*y_cur[IDX_CH3II] + - k[6097]*y_cur[IDX_CH3I] + k[6106]*y_cur[IDX_CH3CCHI] + - k[6121]*y_cur[IDX_CH3OHI] + k[6122]*y_cur[IDX_CH3OHI] + - k[6123]*y_cur[IDX_CH3OHI] + k[6126]*y_cur[IDX_CH4II] + - k[6128]*y_cur[IDX_CH4I] + k[6130]*y_cur[IDX_CH4I] + - k[6131]*y_cur[IDX_CHI] + k[6146]*y_cur[IDX_HM] + - k[6147]*y_cur[IDX_H2I] + k[6147]*y_cur[IDX_H2I] + - k[6148]*y_cur[IDX_H2II] + k[6150]*y_cur[IDX_H2CCCI] + - k[6151]*y_cur[IDX_H2CNI] + k[6153]*y_cur[IDX_H2COI] + - k[6153]*y_cur[IDX_H2COI] + k[6155]*y_cur[IDX_H2COI] + - k[6157]*y_cur[IDX_H2OII] + k[6160]*y_cur[IDX_H2OI] + - k[6164]*y_cur[IDX_H2SI] + k[6167]*y_cur[IDX_H2SiOI] + - k[6167]*y_cur[IDX_H2SiOI] + k[6168]*y_cur[IDX_H3II] + - k[6170]*y_cur[IDX_HC2PI] + k[6174]*y_cur[IDX_C4H2I] + - k[6176]*y_cur[IDX_HC5NI] + k[6181]*y_cur[IDX_HCNI] + - k[6183]*y_cur[IDX_HCOII] + k[6184]*y_cur[IDX_HCOI] + - k[6189]*y_cur[IDX_HCPI] + k[6190]*y_cur[IDX_HCSI] + - k[6193]*y_cur[IDX_HCSiI] + k[6194]*y_cur[IDX_HClI] + - k[6196]*y_cur[IDX_HFI] + k[6197]*y_cur[IDX_HNC3I] + - k[6198]*y_cur[IDX_HNCI] + k[6200]*y_cur[IDX_HNOI] + - k[6201]*y_cur[IDX_HNSiI] + k[6204]*y_cur[IDX_HPOI] + - k[6205]*y_cur[IDX_HSII] + k[6209]*y_cur[IDX_HSI] + - k[6219]*y_cur[IDX_NH2I] + k[6221]*y_cur[IDX_NH3I] + - k[6224]*y_cur[IDX_NHI] + k[6237]*y_cur[IDX_O2HI] + - k[6242]*y_cur[IDX_OHII] + k[6244]*y_cur[IDX_OHI] + - k[6248]*y_cur[IDX_PH2I] + k[6249]*y_cur[IDX_PHI] + - k[6261]*y_cur[IDX_SiC2H2I] + k[6262]*y_cur[IDX_SiC2HI] + - k[6265]*y_cur[IDX_SiC3HI] + k[6268]*y_cur[IDX_SiCH2I] + - k[6270]*y_cur[IDX_SiCH3I] + k[6271]*y_cur[IDX_SiHII] + - k[6273]*y_cur[IDX_SiH2I] + k[6274]*y_cur[IDX_SiH3I] + - k[6278]*y_cur[IDX_SiH4I] + k[6279]*y_cur[IDX_SiH4I] + - k[6280]*y_cur[IDX_SiHI] + k[6308]*y_cur[IDX_HII]*y_cur[IDX_GRAINM] + - k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM] + - k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM] + - k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + - k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + - k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + - k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + - k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM] + - k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM] + - k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM] + - k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + - k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + - k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + - k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + - k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + - k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + - k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM] + - k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + - k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + - k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + - k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + - k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + - k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + - k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6342]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM] + - k[6350]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + - k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + - k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + - k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM] + - k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + - k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM] + - k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM] + - k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM] + - k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + - k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + - k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + - k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + - k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + - k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + - k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM] + - k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + - k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + - k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM] + - k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM] + - k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] + - k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM] + - k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + - k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + - k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + - k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + - k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM] + - k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + - k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + - k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + - k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + - k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + - k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM] + - k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM] + - k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + - k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + - k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + - k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + - k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + - k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + - k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + - k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + - k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + - k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + - k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + - k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] + - k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + - k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] + - k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + - k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + - k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + - k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + - k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + - k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] + - k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + - k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + - k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + - k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + - k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + - k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + - k[6552]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + - k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + - k[6557]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] + - k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + - k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + - k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + - k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + - k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + - k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + - k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + - k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + - k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + - k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + - k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM] + - k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + - k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + - k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + - k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + - k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + - k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + - k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + - k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + - k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + - k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + - k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM] + - k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] + - k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] + - k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] + - k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM] + - k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + - k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + - k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + - k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM] + - k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM] + - k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + - k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + - k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + - k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + - k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + - k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + - k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + - k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] + - k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] + - k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] + - k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] + - k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + - k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + - k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + - k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + - k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + - k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + - k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + - k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + - k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] + - k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + - k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + - k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + - k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] + - k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + - k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + - k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] + - k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] + - k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + - k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + - k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + - k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + - k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + - k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + - k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + - k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + - k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + - k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + - k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + - k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + - k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] + - k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + - k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + - k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + - k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + - k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + - k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + - k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + - k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] + - k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + - k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + - k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + - k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + - k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + - k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] + - k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + - k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + - k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + - k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + - k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + - k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + - k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] + - k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + - k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + - k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + - k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + - k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + - k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + - k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + - k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + - k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + - k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + - k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + - k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + - k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + - k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] + - k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + - k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM] + - k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] + - k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] + - k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] + - k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + - k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - k[6888]*y_cur[IDX_HI] - + k[7070]*y_cur[IDX_GHI] + k[7252]*y_cur[IDX_GHI] + - k[7434]*y_cur[IDX_GHI]; - ydot[yistart + IDX_HII] = 0.0 - - k[133]*y_cur[IDX_HII]*y_cur[IDX_HNCI] + - k[133]*y_cur[IDX_HII]*y_cur[IDX_HNCI] + - k[318]*y_cur[IDX_ClII]*y_cur[IDX_HI] - - k[319]*y_cur[IDX_ClI]*y_cur[IDX_HII] - - k[320]*y_cur[IDX_HII]*y_cur[IDX_C10I] - - k[321]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] - - k[322]*y_cur[IDX_HII]*y_cur[IDX_C10HI] - - k[323]*y_cur[IDX_HII]*y_cur[IDX_C2I] - - k[324]*y_cur[IDX_HII]*y_cur[IDX_C2H2I] - - k[325]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] - - k[326]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - - k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] - - k[328]*y_cur[IDX_HII]*y_cur[IDX_C2H5OHI] - - k[329]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - - k[330]*y_cur[IDX_HII]*y_cur[IDX_C2NI] - - k[331]*y_cur[IDX_HII]*y_cur[IDX_C2OI] - - k[332]*y_cur[IDX_HII]*y_cur[IDX_C2SI] - - k[333]*y_cur[IDX_HII]*y_cur[IDX_C3I] - - k[334]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] - - k[335]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - - k[336]*y_cur[IDX_HII]*y_cur[IDX_C3OI] - - k[337]*y_cur[IDX_HII]*y_cur[IDX_C3SI] - - k[338]*y_cur[IDX_HII]*y_cur[IDX_C4I] - - k[339]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] - - k[340]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - - k[341]*y_cur[IDX_HII]*y_cur[IDX_C4PI] - - k[342]*y_cur[IDX_HII]*y_cur[IDX_C4SI] - - k[343]*y_cur[IDX_HII]*y_cur[IDX_C5I] - - k[344]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] - - k[345]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - - k[346]*y_cur[IDX_HII]*y_cur[IDX_C6I] - - k[347]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] - - k[348]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - - k[349]*y_cur[IDX_HII]*y_cur[IDX_C7I] - - k[350]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] - - k[351]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - - k[352]*y_cur[IDX_HII]*y_cur[IDX_C8I] - - k[353]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] - - k[354]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - - k[355]*y_cur[IDX_HII]*y_cur[IDX_C9I] - - k[356]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] - - k[357]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - - k[358]*y_cur[IDX_HII]*y_cur[IDX_CCPI] - - k[359]*y_cur[IDX_HII]*y_cur[IDX_CH2I] - - k[360]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] - - k[361]*y_cur[IDX_HII]*y_cur[IDX_CH2CNI] - - k[362]*y_cur[IDX_HII]*y_cur[IDX_CH3I] - - k[363]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] - - k[364]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] - - k[365]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] - - k[366]*y_cur[IDX_HII]*y_cur[IDX_CH3CHOI] - - k[367]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - - k[368]*y_cur[IDX_HII]*y_cur[IDX_CH3COCH3I] - - k[369]*y_cur[IDX_HII]*y_cur[IDX_CH3OCH3I] - - k[370]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - - k[371]*y_cur[IDX_HII]*y_cur[IDX_CH4I] - - k[372]*y_cur[IDX_HII]*y_cur[IDX_CHI] - - k[373]*y_cur[IDX_HII]*y_cur[IDX_CPI] - - k[374]*y_cur[IDX_HII]*y_cur[IDX_CSI] - - k[375]*y_cur[IDX_HII]*y_cur[IDX_FeI] - - k[376]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - - k[377]*y_cur[IDX_HII]*y_cur[IDX_H2CSI] - - k[378]*y_cur[IDX_HII]*y_cur[IDX_H2OI] - - k[379]*y_cur[IDX_HII]*y_cur[IDX_H2S2I] - - k[380]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - - k[381]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] - - k[382]*y_cur[IDX_HII]*y_cur[IDX_HC2PI] - - k[383]*y_cur[IDX_HII]*y_cur[IDX_HC3NI] - - k[384]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] - - k[385]*y_cur[IDX_HII]*y_cur[IDX_HC5NI] - - k[386]*y_cur[IDX_HII]*y_cur[IDX_HC7NI] - - k[387]*y_cur[IDX_HII]*y_cur[IDX_HC9NI] - - k[388]*y_cur[IDX_HII]*y_cur[IDX_HCNI] - - k[389]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - - k[390]*y_cur[IDX_HII]*y_cur[IDX_HCOOCH3I] - - k[391]*y_cur[IDX_HII]*y_cur[IDX_HCPI] - - k[392]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - - k[393]*y_cur[IDX_HII]*y_cur[IDX_HClI] - - k[394]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] - - k[395]*y_cur[IDX_HII]*y_cur[IDX_HPOI] - - k[396]*y_cur[IDX_HII]*y_cur[IDX_HS2I] - - k[397]*y_cur[IDX_HII]*y_cur[IDX_HSI] - - k[398]*y_cur[IDX_HII]*y_cur[IDX_MgI] - - k[399]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - - k[400]*y_cur[IDX_HII]*y_cur[IDX_NH2I] - - k[401]*y_cur[IDX_HII]*y_cur[IDX_NH3I] - - k[402]*y_cur[IDX_HII]*y_cur[IDX_NHI] - - k[403]*y_cur[IDX_HII]*y_cur[IDX_NOI] - - k[404]*y_cur[IDX_HII]*y_cur[IDX_NSI] - - k[405]*y_cur[IDX_HII]*y_cur[IDX_O2I] - - k[406]*y_cur[IDX_HII]*y_cur[IDX_OI] - - k[407]*y_cur[IDX_HII]*y_cur[IDX_OCSI] - - k[408]*y_cur[IDX_HII]*y_cur[IDX_OHI] - - k[409]*y_cur[IDX_HII]*y_cur[IDX_PI] - - k[410]*y_cur[IDX_HII]*y_cur[IDX_PH2I] - - k[411]*y_cur[IDX_HII]*y_cur[IDX_PHI] - - k[412]*y_cur[IDX_HII]*y_cur[IDX_PNI] - - k[413]*y_cur[IDX_HII]*y_cur[IDX_POI] - - k[414]*y_cur[IDX_HII]*y_cur[IDX_S2I] - - k[415]*y_cur[IDX_HII]*y_cur[IDX_SI] - - k[416]*y_cur[IDX_HII]*y_cur[IDX_SO2I] - - k[417]*y_cur[IDX_HII]*y_cur[IDX_SOI] - - k[418]*y_cur[IDX_HII]*y_cur[IDX_SiI] - - k[419]*y_cur[IDX_HII]*y_cur[IDX_SiC2I] - - k[420]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] - - k[421]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - - k[422]*y_cur[IDX_HII]*y_cur[IDX_SiC3I] - - k[423]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] - - k[424]*y_cur[IDX_HII]*y_cur[IDX_SiC4I] - - k[425]*y_cur[IDX_HII]*y_cur[IDX_SiCI] - - k[426]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] - - k[427]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] - - k[428]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - - k[429]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] - - k[430]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] - - k[431]*y_cur[IDX_HII]*y_cur[IDX_SiHI] - - k[432]*y_cur[IDX_HII]*y_cur[IDX_SiNI] - - k[433]*y_cur[IDX_HII]*y_cur[IDX_SiNCI] - - k[434]*y_cur[IDX_HII]*y_cur[IDX_SiOI] - - k[435]*y_cur[IDX_HII]*y_cur[IDX_SiSI] + - k[487]*y_cur[IDX_HI]*y_cur[IDX_CNII] + - k[488]*y_cur[IDX_HI]*y_cur[IDX_COII] + - k[489]*y_cur[IDX_HI]*y_cur[IDX_H2II] + - k[490]*y_cur[IDX_HI]*y_cur[IDX_HCNII] + - k[491]*y_cur[IDX_HI]*y_cur[IDX_HeII] + - k[492]*y_cur[IDX_HI]*y_cur[IDX_OII] - - k[2293]*y_cur[IDX_HII]*y_cur[IDX_C10I] - - k[2294]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] - - k[2295]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] - - k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - - k[2297]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - - k[2298]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] - - k[2299]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - - k[2300]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] - - k[2301]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - - k[2302]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] - - k[2303]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - - k[2304]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] - - k[2305]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - - k[2306]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] - - k[2307]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - - k[2308]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] - - k[2309]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - - k[2310]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] - - k[2311]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - - k[2312]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] - - k[2313]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - - k[2314]*y_cur[IDX_HII]*y_cur[IDX_CH2I] - - k[2315]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] - - k[2316]*y_cur[IDX_HII]*y_cur[IDX_CH2CHCNI] - - k[2317]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - - k[2318]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - - k[2319]*y_cur[IDX_HII]*y_cur[IDX_CH2PHI] - - k[2320]*y_cur[IDX_HII]*y_cur[IDX_CH3C3NI] - - k[2321]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] - - k[2322]*y_cur[IDX_HII]*y_cur[IDX_CH3C5NI] - - k[2323]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] - - k[2324]*y_cur[IDX_HII]*y_cur[IDX_CH3C7NI] - - k[2325]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] - - k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] - - k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] - - k[2328]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - - k[2329]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - - k[2330]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - - k[2331]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - - k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - - k[2333]*y_cur[IDX_HII]*y_cur[IDX_CH4I] - - k[2334]*y_cur[IDX_HII]*y_cur[IDX_CO2I] - - k[2335]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] - - k[2336]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] - - k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - - k[2338]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - - k[2339]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - - k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - - k[2341]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] - - k[2342]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] - - k[2343]*y_cur[IDX_HII]*y_cur[IDX_HCNOI] - - k[2344]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - - k[2345]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - - k[2346]*y_cur[IDX_HII]*y_cur[IDX_HCSI] - - k[2347]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - - k[2348]*y_cur[IDX_HII]*y_cur[IDX_HNCOI] - - k[2349]*y_cur[IDX_HII]*y_cur[IDX_HNOI] - - k[2350]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] - - k[2351]*y_cur[IDX_HII]*y_cur[IDX_HOCNI] - - k[2352]*y_cur[IDX_HII]*y_cur[IDX_HONCI] - - k[2353]*y_cur[IDX_HII]*y_cur[IDX_HSI] - - k[2354]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - - k[2355]*y_cur[IDX_HII]*y_cur[IDX_NO2I] - - k[2356]*y_cur[IDX_HII]*y_cur[IDX_OCSI] - - k[2357]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] - - k[2358]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - - k[2359]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] - - k[2360]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] - - k[2361]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] - - k[2362]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - - k[2363]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] - - k[2364]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] - - k[2365]*y_cur[IDX_HII]*y_cur[IDX_SiHI] + - k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - - k[3021]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3022]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3023]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3024]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3024]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3025]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3026]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3226]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + - k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + - k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - - k[3896]*y_cur[IDX_CM]*y_cur[IDX_HII] - - k[3931]*y_cur[IDX_C10M]*y_cur[IDX_HII] - - k[3966]*y_cur[IDX_C10HM]*y_cur[IDX_HII] - - k[4001]*y_cur[IDX_C2M]*y_cur[IDX_HII] - - k[4036]*y_cur[IDX_C2HM]*y_cur[IDX_HII] - - k[4071]*y_cur[IDX_C3M]*y_cur[IDX_HII] - - k[4106]*y_cur[IDX_C3HM]*y_cur[IDX_HII] - - k[4141]*y_cur[IDX_C3NM]*y_cur[IDX_HII] - - k[4176]*y_cur[IDX_C4M]*y_cur[IDX_HII] - - k[4211]*y_cur[IDX_C4HM]*y_cur[IDX_HII] - - k[4246]*y_cur[IDX_C5M]*y_cur[IDX_HII] - - k[4281]*y_cur[IDX_C5HM]*y_cur[IDX_HII] - - k[4316]*y_cur[IDX_C5NM]*y_cur[IDX_HII] - - k[4351]*y_cur[IDX_C6M]*y_cur[IDX_HII] - - k[4386]*y_cur[IDX_C6HM]*y_cur[IDX_HII] - - k[4421]*y_cur[IDX_C7M]*y_cur[IDX_HII] - - k[4456]*y_cur[IDX_C7HM]*y_cur[IDX_HII] - - k[4491]*y_cur[IDX_C8M]*y_cur[IDX_HII] - - k[4526]*y_cur[IDX_C8HM]*y_cur[IDX_HII] - - k[4561]*y_cur[IDX_C9M]*y_cur[IDX_HII] - - k[4596]*y_cur[IDX_C9HM]*y_cur[IDX_HII] - - k[4631]*y_cur[IDX_CHM]*y_cur[IDX_HII] - - k[4666]*y_cur[IDX_CNM]*y_cur[IDX_HII] - - k[4701]*y_cur[IDX_HM]*y_cur[IDX_HII] - - k[4737]*y_cur[IDX_OM]*y_cur[IDX_HII] - - k[4772]*y_cur[IDX_O2M]*y_cur[IDX_HII] - - k[4807]*y_cur[IDX_OHM]*y_cur[IDX_HII] - - k[4842]*y_cur[IDX_SM]*y_cur[IDX_HII] - - k[5546]*y_cur[IDX_HII]*y_cur[IDX_HI] - - k[5547]*y_cur[IDX_HII]*y_cur[IDX_HeI] - - k[5615]*y_cur[IDX_HII]*y_cur[IDX_eM] + - k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + k[5678]*y_cur[IDX_H2I] + - k[5679]*y_cur[IDX_H2I] + k[5682]*y_cur[IDX_HI] + - k[5844]*y_cur[IDX_HI] + k[6073]*y_cur[IDX_CHII] + - k[6077]*y_cur[IDX_CH2II] + k[6148]*y_cur[IDX_H2II] + - k[6169]*y_cur[IDX_H3II] + k[6206]*y_cur[IDX_HSII] + - k[6217]*y_cur[IDX_NHII] - k[6308]*y_cur[IDX_HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HM] = 0.0 - k[66]*y_cur[IDX_HM]*y_cur[IDX_C2I] - - k[67]*y_cur[IDX_HM]*y_cur[IDX_C2HI] - - k[68]*y_cur[IDX_HM]*y_cur[IDX_CI] - - k[69]*y_cur[IDX_HM]*y_cur[IDX_CH2I] - - k[70]*y_cur[IDX_HM]*y_cur[IDX_CH3I] - - k[71]*y_cur[IDX_HM]*y_cur[IDX_CHI] - - k[72]*y_cur[IDX_HM]*y_cur[IDX_CNI] - - k[73]*y_cur[IDX_HM]*y_cur[IDX_COI] - - k[74]*y_cur[IDX_HM]*y_cur[IDX_HI] - - k[75]*y_cur[IDX_HM]*y_cur[IDX_HI] - - k[76]*y_cur[IDX_HM]*y_cur[IDX_HCOI] - - k[77]*y_cur[IDX_HM]*y_cur[IDX_NI] - - k[78]*y_cur[IDX_HM]*y_cur[IDX_NH2I] - - k[79]*y_cur[IDX_HM]*y_cur[IDX_NHI] - - k[80]*y_cur[IDX_HM]*y_cur[IDX_OI] - - k[81]*y_cur[IDX_HM]*y_cur[IDX_OHI] - - k[2366]*y_cur[IDX_HM]*y_cur[IDX_C2H2I] - - k[2367]*y_cur[IDX_HM]*y_cur[IDX_H2OI] - - k[2368]*y_cur[IDX_HM]*y_cur[IDX_HCNI] - - k[4691]*y_cur[IDX_HM]*y_cur[IDX_CII] - - k[4692]*y_cur[IDX_HM]*y_cur[IDX_C2H2II] - - k[4693]*y_cur[IDX_HM]*y_cur[IDX_C2H3II] - - k[4694]*y_cur[IDX_HM]*y_cur[IDX_C4H2II] - - k[4695]*y_cur[IDX_HM]*y_cur[IDX_C4H3II] - - k[4696]*y_cur[IDX_HM]*y_cur[IDX_C4SII] - - k[4697]*y_cur[IDX_HM]*y_cur[IDX_CH2CCHII] - - k[4698]*y_cur[IDX_HM]*y_cur[IDX_CH3II] - - k[4699]*y_cur[IDX_HM]*y_cur[IDX_CNCII] - - k[4700]*y_cur[IDX_HM]*y_cur[IDX_FeII] - - k[4701]*y_cur[IDX_HM]*y_cur[IDX_HII] - - k[4702]*y_cur[IDX_HM]*y_cur[IDX_H2II] - - k[4703]*y_cur[IDX_HM]*y_cur[IDX_H2COII] - - k[4704]*y_cur[IDX_HM]*y_cur[IDX_H2SII] - - k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] - - k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] - - k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] - - k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] - - k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] - - k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] - - k[4711]*y_cur[IDX_HM]*y_cur[IDX_HCOII] - - k[4712]*y_cur[IDX_HM]*y_cur[IDX_HeII] - - k[4713]*y_cur[IDX_HM]*y_cur[IDX_MgII] - - k[4714]*y_cur[IDX_HM]*y_cur[IDX_NII] - - k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] - - k[4716]*y_cur[IDX_HM]*y_cur[IDX_NH3II] - - k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] - - k[4718]*y_cur[IDX_HM]*y_cur[IDX_NOII] - - k[4719]*y_cur[IDX_HM]*y_cur[IDX_NaII] - - k[4720]*y_cur[IDX_HM]*y_cur[IDX_OII] - - k[4721]*y_cur[IDX_HM]*y_cur[IDX_SII] - - k[4722]*y_cur[IDX_HM]*y_cur[IDX_SOII] - - k[4723]*y_cur[IDX_HM]*y_cur[IDX_SiII] - - k[4724]*y_cur[IDX_HM]*y_cur[IDX_SiOII] - - k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] - - k[4726]*y_cur[IDX_HM]*y_cur[IDX_SiSII] + - k[5608]*y_cur[IDX_HI]*y_cur[IDX_eM] + k[5678]*y_cur[IDX_H2I] - - k[5833]*y_cur[IDX_HM] - k[6146]*y_cur[IDX_HM]; - ydot[yistart + IDX_H2I] = 0.0 + k[74]*y_cur[IDX_HM]*y_cur[IDX_HI] + - k[75]*y_cur[IDX_HM]*y_cur[IDX_HI] - - k[82]*y_cur[IDX_H2I]*y_cur[IDX_CM] - - k[83]*y_cur[IDX_H2I]*y_cur[IDX_OM] - - k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + - k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - - k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] - - k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] + - k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] - - k[136]*y_cur[IDX_H2I]*y_cur[IDX_H2OI] + - k[136]*y_cur[IDX_H2I]*y_cur[IDX_H2OI] - - k[137]*y_cur[IDX_H2I]*y_cur[IDX_HOCII] + - k[137]*y_cur[IDX_H2I]*y_cur[IDX_HOCII] - - k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] + - k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - - k[139]*y_cur[IDX_H2I]*y_cur[IDX_OHI] + - k[139]*y_cur[IDX_H2I]*y_cur[IDX_OHI] - - k[140]*y_cur[IDX_H2I]*y_cur[IDX_eM] - - k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] + - k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + - k[436]*y_cur[IDX_H2II]*y_cur[IDX_C2I] + - k[437]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + - k[438]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + - k[439]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] + - k[440]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] + - k[441]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + - k[442]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + - k[443]*y_cur[IDX_H2II]*y_cur[IDX_CHI] + - k[444]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + - k[445]*y_cur[IDX_H2II]*y_cur[IDX_COI] + - k[446]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + - k[447]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + - k[448]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + - k[449]*y_cur[IDX_H2II]*y_cur[IDX_HCNI] + - k[450]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + - k[451]*y_cur[IDX_H2II]*y_cur[IDX_NH2I] + - k[452]*y_cur[IDX_H2II]*y_cur[IDX_NH3I] + - k[453]*y_cur[IDX_H2II]*y_cur[IDX_NHI] + - k[454]*y_cur[IDX_H2II]*y_cur[IDX_NOI] + - k[455]*y_cur[IDX_H2II]*y_cur[IDX_O2I] + - k[456]*y_cur[IDX_H2II]*y_cur[IDX_OHI] - - k[457]*y_cur[IDX_H2I]*y_cur[IDX_FII] - - k[458]*y_cur[IDX_H2I]*y_cur[IDX_HeII] + - k[489]*y_cur[IDX_HI]*y_cur[IDX_H2II] + - k[745]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[746]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[749]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[750]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + - k[757]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[760]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + - k[764]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + - k[778]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + - k[793]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + - k[803]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + - k[805]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + - k[806]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + - k[807]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[810]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[811]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + - k[824]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + - k[827]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + - k[827]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + - k[829]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + - k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] + - k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] + - k[841]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + - k[844]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + - k[845]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + - k[852]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + - k[855]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + - k[856]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + - k[857]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + - k[858]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + - k[859]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + - k[859]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + - k[860]*y_cur[IDX_C6H6II]*y_cur[IDX_eM] + - k[860]*y_cur[IDX_C6H6II]*y_cur[IDX_eM] + - k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + - k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + - k[868]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + - k[871]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + - k[872]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + - k[873]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + - k[874]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] + - k[881]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + - k[884]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + - k[885]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + - k[886]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + - k[887]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + - k[888]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + - k[888]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + - k[893]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] + - k[896]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + - k[897]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + - k[898]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + - k[899]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + - k[900]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + - k[900]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + - k[907]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + - k[912]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_eM] + - k[924]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + - k[929]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] + - k[930]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] + - k[935]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] + - k[967]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[970]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + - k[970]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + - k[971]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + - k[972]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[973]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[976]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[976]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + - k[989]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + - k[991]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + - k[997]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[1004]*y_cur[IDX_H2FII]*y_cur[IDX_eM] + - k[1006]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] + - k[1011]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] + - k[1012]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + - k[1024]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] + - k[1025]*y_cur[IDX_H3II]*y_cur[IDX_eM] + - k[1027]*y_cur[IDX_H3C3OII]*y_cur[IDX_eM] + - k[1028]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + - k[1029]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + - k[1030]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + - k[1031]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + - k[1032]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + - k[1033]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + - k[1036]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1039]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + - k[1042]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + - k[1043]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + - k[1046]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1048]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1050]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] + - k[1052]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + - k[1067]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + - k[1079]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + - k[1165]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + - k[1181]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + - k[1184]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + - k[1185]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + - k[1187]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + - k[1187]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + - k[1188]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + - k[1197]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + - k[1199]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + - k[1200]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + - k[1203]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + - k[1206]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + - k[1210]*y_cur[IDX_PH3II]*y_cur[IDX_eM] + - k[1214]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + - k[1217]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + - k[1228]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + - k[1231]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] + - k[1236]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] + - k[1244]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + - k[1245]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] + - k[1247]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] + - k[1251]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + - k[1255]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] + - k[1256]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] + - k[1258]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] + - k[1265]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] + - k[1297]*y_cur[IDX_CII]*y_cur[IDX_C10H2I] + - k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1304]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + - k[1306]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + - k[1310]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] + - k[1318]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + - k[1323]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] + - k[1326]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] + - k[1332]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] + - k[1335]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] + - k[1338]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] + - k[1345]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + - k[1346]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + - k[1351]*y_cur[IDX_CII]*y_cur[IDX_CH2PHI] + - k[1352]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + - k[1357]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + - k[1361]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] + - k[1365]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + - k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + - k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + - k[1383]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + - k[1388]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] + - k[1419]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + - k[1435]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + - k[1437]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + - k[1440]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + - k[1441]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + - k[1443]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] + - k[1479]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] + - k[1481]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + - k[1485]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] + - k[1487]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] + - k[1489]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] + - k[1491]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + - k[1493]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] + - k[1495]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + - k[1497]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] + - k[1499]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + - k[1501]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] + - k[1503]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] + - k[1505]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] + - k[1507]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + - k[1510]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + - k[1516]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] + - k[1520]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + - k[1527]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] + - k[1529]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] + - k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + - k[1535]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H3II] + - k[1539]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] + - k[1546]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H3II] + - k[1548]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H5II] + - k[1553]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + - k[1560]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + - k[1571]*y_cur[IDX_C2H2I]*y_cur[IDX_PH2II] + - k[1572]*y_cur[IDX_C2H2I]*y_cur[IDX_PH3II] + - k[1576]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2HII] + - k[1581]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + - k[1584]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + - k[1587]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + - k[1590]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + - k[1593]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + - k[1596]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + - k[1600]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + - k[1603]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + - k[1606]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + - k[1610]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + - k[1612]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] + - k[1615]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + - k[1616]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + - k[1622]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + - k[1625]*y_cur[IDX_C2H3II]*y_cur[IDX_SI] + - k[1626]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] + - k[1629]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + - k[1631]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H3II] + - k[1633]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + - k[1635]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + - k[1637]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + - k[1639]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + - k[1641]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + - k[1643]*y_cur[IDX_C2H3I]*y_cur[IDX_CH2CCHII] + - k[1645]*y_cur[IDX_C2H3I]*y_cur[IDX_SII] + - k[1660]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] + - k[1664]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] + - k[1668]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + - k[1678]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] + - k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] + - k[1680]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] + - k[1687]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + - k[1689]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] + - k[1693]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H3II] + - k[1696]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] + - k[1699]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + - k[1701]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + - k[1703]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H2II] + - k[1705]*y_cur[IDX_C2H4I]*y_cur[IDX_C7H2II] + - k[1706]*y_cur[IDX_C2H4I]*y_cur[IDX_CH2CCHII] + - k[1710]*y_cur[IDX_C2H4I]*y_cur[IDX_PII] + - k[1711]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] + - k[1713]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] + - k[1727]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + - k[1729]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] + - k[1732]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] + - k[1734]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] + - k[1741]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] + - k[1759]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] + - k[1761]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] + - k[1763]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] + - k[1765]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] + - k[1767]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] + - k[1769]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] + - k[1782]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] + - k[1784]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] + - k[1786]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] + - k[1790]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] + - k[1792]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + - k[1794]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] + - k[1796]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] + - k[1798]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] + - k[1800]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] + - k[1802]*y_cur[IDX_C3H3II]*y_cur[IDX_C6H2I] + - k[1803]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] + - k[1805]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + - k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + - k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + - k[1820]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] + - k[1822]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] + - k[1828]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] + - k[1839]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] + - k[1848]*y_cur[IDX_CI]*y_cur[IDX_C10H2II] + - k[1851]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + - k[1853]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] + - k[1855]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] + - k[1857]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] + - k[1859]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] + - k[1861]*y_cur[IDX_CI]*y_cur[IDX_C3H5II] + - k[1863]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] + - k[1865]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] + - k[1868]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] + - k[1870]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] + - k[1872]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] + - k[1874]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] + - k[1877]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + - k[1879]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] + - k[1881]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + - k[1883]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] + - k[1886]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] + - k[1888]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + - k[1892]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] + - k[1894]*y_cur[IDX_CI]*y_cur[IDX_CH3II] + - k[1901]*y_cur[IDX_CI]*y_cur[IDX_H3OII] + - k[1911]*y_cur[IDX_CI]*y_cur[IDX_NH4II] + - k[1921]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + - k[1928]*y_cur[IDX_CI]*y_cur[IDX_SiH4II] + - k[1930]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + - k[1935]*y_cur[IDX_CHII]*y_cur[IDX_C2HI] + - k[1936]*y_cur[IDX_CHII]*y_cur[IDX_CH2I] + - k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + - k[1941]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + - k[1943]*y_cur[IDX_CHII]*y_cur[IDX_CHI] + - k[1953]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + - k[1955]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] + - k[1956]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + - k[1962]*y_cur[IDX_CHII]*y_cur[IDX_NH2I] + - k[1963]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + - k[1965]*y_cur[IDX_CHII]*y_cur[IDX_NHI] + - k[1972]*y_cur[IDX_CHII]*y_cur[IDX_OHI] + - k[1976]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + - k[1979]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + - k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + - k[1999]*y_cur[IDX_CH2I]*y_cur[IDX_CH3II] + - k[2020]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] + - k[2022]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] + - k[2024]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] + - k[2026]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6H2I] + - k[2027]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] + - k[2029]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] + - k[2033]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + - k[2035]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + - k[2037]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + - k[2039]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + - k[2041]*y_cur[IDX_CH3II]*y_cur[IDX_C2I] + - k[2042]*y_cur[IDX_CH3II]*y_cur[IDX_C2H2I] + - k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + - k[2044]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + - k[2046]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + - k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + - k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + - k[2048]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] + - k[2050]*y_cur[IDX_CH3II]*y_cur[IDX_C3H2I] + - k[2051]*y_cur[IDX_CH3II]*y_cur[IDX_C3HI] + - k[2052]*y_cur[IDX_CH3II]*y_cur[IDX_C4HI] + - k[2053]*y_cur[IDX_CH3II]*y_cur[IDX_C5H2I] + - k[2054]*y_cur[IDX_CH3II]*y_cur[IDX_C5HI] + - k[2055]*y_cur[IDX_CH3II]*y_cur[IDX_C6H2I] + - k[2056]*y_cur[IDX_CH3II]*y_cur[IDX_C6HI] + - k[2057]*y_cur[IDX_CH3II]*y_cur[IDX_C7H2I] + - k[2058]*y_cur[IDX_CH3II]*y_cur[IDX_C7HI] + - k[2059]*y_cur[IDX_CH3II]*y_cur[IDX_C8H2I] + - k[2060]*y_cur[IDX_CH3II]*y_cur[IDX_C8HI] + - k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + - k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + - k[2064]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + - k[2074]*y_cur[IDX_CH3II]*y_cur[IDX_CH4I] + - k[2076]*y_cur[IDX_CH3II]*y_cur[IDX_H2CCCI] + - k[2078]*y_cur[IDX_CH3II]*y_cur[IDX_H2SI] + - k[2080]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + - k[2083]*y_cur[IDX_CH3II]*y_cur[IDX_HClI] + - k[2084]*y_cur[IDX_CH3II]*y_cur[IDX_HSI] + - k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] + - k[2087]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] + - k[2091]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + - k[2093]*y_cur[IDX_CH3II]*y_cur[IDX_OHI] + - k[2095]*y_cur[IDX_CH3II]*y_cur[IDX_SI] + - k[2096]*y_cur[IDX_CH3II]*y_cur[IDX_SOI] + - k[2097]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] + - k[2100]*y_cur[IDX_CH3II]*y_cur[IDX_SiHI] + - k[2102]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + - k[2104]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C3H5II] + - k[2108]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H3II] + - k[2109]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C5H2II] + - k[2110]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C6H2II] + - k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + - k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + - k[2149]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + - k[2153]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + - k[2154]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + - k[2156]*y_cur[IDX_CH4I]*y_cur[IDX_C2H3II] + - k[2158]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + - k[2161]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] + - k[2166]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + - k[2168]*y_cur[IDX_CH4I]*y_cur[IDX_C4HII] + - k[2170]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + - k[2171]*y_cur[IDX_CH4I]*y_cur[IDX_C4H3II] + - k[2175]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + - k[2178]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + - k[2180]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + - k[2183]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + - k[2185]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + - k[2187]*y_cur[IDX_CH4I]*y_cur[IDX_C7H2II] + - k[2188]*y_cur[IDX_CH4I]*y_cur[IDX_C8H2II] + - k[2203]*y_cur[IDX_CH4I]*y_cur[IDX_HSII] + - k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + - k[2211]*y_cur[IDX_CH4I]*y_cur[IDX_PII] + - k[2212]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] + - k[2214]*y_cur[IDX_CH4I]*y_cur[IDX_PH2II] + - k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + - k[2236]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] + - k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] + - k[2243]*y_cur[IDX_CHI]*y_cur[IDX_CH3II] + - k[2294]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] + - k[2295]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + - k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + - k[2297]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + - k[2298]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + - k[2299]*y_cur[IDX_HII]*y_cur[IDX_C2HI] + - k[2300]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] + - k[2301]*y_cur[IDX_HII]*y_cur[IDX_C3HI] + - k[2302]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] + - k[2303]*y_cur[IDX_HII]*y_cur[IDX_C4HI] + - k[2304]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] + - k[2305]*y_cur[IDX_HII]*y_cur[IDX_C5HI] + - k[2306]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] + - k[2307]*y_cur[IDX_HII]*y_cur[IDX_C6HI] + - k[2308]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] + - k[2309]*y_cur[IDX_HII]*y_cur[IDX_C7HI] + - k[2310]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] + - k[2311]*y_cur[IDX_HII]*y_cur[IDX_C8HI] + - k[2312]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] + - k[2313]*y_cur[IDX_HII]*y_cur[IDX_C9HI] + - k[2314]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + - k[2315]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] + - k[2316]*y_cur[IDX_HII]*y_cur[IDX_CH2CHCNI] + - k[2321]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] + - k[2323]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] + - k[2325]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] + - k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + - k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + - k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + - k[2328]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + - k[2331]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + - k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + - k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + - k[2333]*y_cur[IDX_HII]*y_cur[IDX_CH4I] + - k[2335]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] + - k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + - k[2338]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + - k[2339]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + - k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + - k[2341]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] + - k[2342]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] + - k[2344]*y_cur[IDX_HII]*y_cur[IDX_HCOI] + - k[2346]*y_cur[IDX_HII]*y_cur[IDX_HCSI] + - k[2347]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] + - k[2349]*y_cur[IDX_HII]*y_cur[IDX_HNOI] + - k[2350]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] + - k[2353]*y_cur[IDX_HII]*y_cur[IDX_HSI] + - k[2357]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] + - k[2358]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] + - k[2359]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] + - k[2360]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] + - k[2361]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] + - k[2362]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] + - k[2363]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + - k[2364]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + - k[2365]*y_cur[IDX_HII]*y_cur[IDX_SiHI] + - k[2366]*y_cur[IDX_HM]*y_cur[IDX_C2H2I] + - k[2367]*y_cur[IDX_HM]*y_cur[IDX_H2OI] + - k[2368]*y_cur[IDX_HM]*y_cur[IDX_HCNI] + - k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + - k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + - k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + - k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + - k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + - k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + - k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - - k[2384]*y_cur[IDX_H2II]*y_cur[IDX_H2I] + - k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + - k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + - k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + - k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - - k[2398]*y_cur[IDX_H2I]*y_cur[IDX_CII] - - k[2399]*y_cur[IDX_H2I]*y_cur[IDX_C10II] - - k[2400]*y_cur[IDX_H2I]*y_cur[IDX_C10HII] - - k[2401]*y_cur[IDX_H2I]*y_cur[IDX_C2II] - - k[2402]*y_cur[IDX_H2I]*y_cur[IDX_C2HII] - - k[2403]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] - - k[2404]*y_cur[IDX_H2I]*y_cur[IDX_C2N2II] - - k[2405]*y_cur[IDX_H2I]*y_cur[IDX_C2SII] - - k[2406]*y_cur[IDX_H2I]*y_cur[IDX_C3II] - - k[2407]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - - k[2408]*y_cur[IDX_H2I]*y_cur[IDX_C3H2II] - - k[2409]*y_cur[IDX_H2I]*y_cur[IDX_C3NII] - - k[2410]*y_cur[IDX_H2I]*y_cur[IDX_C3OII] - - k[2411]*y_cur[IDX_H2I]*y_cur[IDX_C4II] - - k[2412]*y_cur[IDX_H2I]*y_cur[IDX_C4HII] - - k[2413]*y_cur[IDX_H2I]*y_cur[IDX_C4NII] - - k[2414]*y_cur[IDX_H2I]*y_cur[IDX_C5II] - - k[2415]*y_cur[IDX_H2I]*y_cur[IDX_C5HII] - - k[2416]*y_cur[IDX_H2I]*y_cur[IDX_C5NII] - - k[2417]*y_cur[IDX_H2I]*y_cur[IDX_C6II] - - k[2418]*y_cur[IDX_H2I]*y_cur[IDX_C6HII] - - k[2419]*y_cur[IDX_H2I]*y_cur[IDX_C7II] - - k[2420]*y_cur[IDX_H2I]*y_cur[IDX_C7HII] - - k[2421]*y_cur[IDX_H2I]*y_cur[IDX_C7NII] - - k[2422]*y_cur[IDX_H2I]*y_cur[IDX_C8II] - - k[2423]*y_cur[IDX_H2I]*y_cur[IDX_C8HII] - - k[2424]*y_cur[IDX_H2I]*y_cur[IDX_C9II] - - k[2425]*y_cur[IDX_H2I]*y_cur[IDX_C9HII] - - k[2426]*y_cur[IDX_H2I]*y_cur[IDX_C9NII] - - k[2427]*y_cur[IDX_H2I]*y_cur[IDX_CHII] - - k[2428]*y_cur[IDX_H2I]*y_cur[IDX_CH2II] - - k[2429]*y_cur[IDX_H2I]*y_cur[IDX_CH2CHCNII] - - k[2430]*y_cur[IDX_H2I]*y_cur[IDX_CH3C3NII] - - k[2431]*y_cur[IDX_H2I]*y_cur[IDX_CH3CNII] - - k[2432]*y_cur[IDX_H2I]*y_cur[IDX_CH4II] - - k[2433]*y_cur[IDX_H2I]*y_cur[IDX_CNII] - - k[2434]*y_cur[IDX_H2I]*y_cur[IDX_COII] - - k[2435]*y_cur[IDX_H2I]*y_cur[IDX_COII] - - k[2436]*y_cur[IDX_H2I]*y_cur[IDX_CO2II] - - k[2437]*y_cur[IDX_H2I]*y_cur[IDX_CPII] - - k[2438]*y_cur[IDX_H2I]*y_cur[IDX_CSII] - - k[2439]*y_cur[IDX_H2I]*y_cur[IDX_ClII] - - k[2440]*y_cur[IDX_H2I]*y_cur[IDX_FII] - - k[2441]*y_cur[IDX_H2I]*y_cur[IDX_H2C4NII] - - k[2442]*y_cur[IDX_H2I]*y_cur[IDX_H2OII] - - k[2443]*y_cur[IDX_H2I]*y_cur[IDX_H2SII] - - k[2444]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] - - k[2445]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] - - k[2446]*y_cur[IDX_H2I]*y_cur[IDX_HC4NII] - - k[2447]*y_cur[IDX_H2I]*y_cur[IDX_HC5NII] - - k[2448]*y_cur[IDX_H2I]*y_cur[IDX_HC7NII] - - k[2449]*y_cur[IDX_H2I]*y_cur[IDX_HC9NII] - - k[2450]*y_cur[IDX_H2I]*y_cur[IDX_HCNII] - - k[2451]*y_cur[IDX_H2I]*y_cur[IDX_HCPII] - - k[2452]*y_cur[IDX_H2I]*y_cur[IDX_HCSiII] - - k[2453]*y_cur[IDX_H2I]*y_cur[IDX_HClII] - - k[2454]*y_cur[IDX_H2I]*y_cur[IDX_HFII] - - k[2455]*y_cur[IDX_H2I]*y_cur[IDX_HNSiII] - - k[2456]*y_cur[IDX_H2I]*y_cur[IDX_HSII] - - k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - - k[2458]*y_cur[IDX_H2I]*y_cur[IDX_HeHII] - - k[2459]*y_cur[IDX_H2I]*y_cur[IDX_NII] - - k[2460]*y_cur[IDX_H2I]*y_cur[IDX_N2II] - - k[2461]*y_cur[IDX_H2I]*y_cur[IDX_NHII] - - k[2462]*y_cur[IDX_H2I]*y_cur[IDX_NHII] - - k[2463]*y_cur[IDX_H2I]*y_cur[IDX_NH2II] - - k[2464]*y_cur[IDX_H2I]*y_cur[IDX_NH3II] - - k[2465]*y_cur[IDX_H2I]*y_cur[IDX_NO2II] - - k[2466]*y_cur[IDX_H2I]*y_cur[IDX_OII] - - k[2467]*y_cur[IDX_H2I]*y_cur[IDX_OM] - - k[2468]*y_cur[IDX_H2I]*y_cur[IDX_O2HII] - - k[2469]*y_cur[IDX_H2I]*y_cur[IDX_OHII] - - k[2470]*y_cur[IDX_H2I]*y_cur[IDX_SII] - - k[2471]*y_cur[IDX_H2I]*y_cur[IDX_SO2II] - - k[2472]*y_cur[IDX_H2I]*y_cur[IDX_SiCII] - - k[2473]*y_cur[IDX_H2I]*y_cur[IDX_SiC2II] - - k[2474]*y_cur[IDX_H2I]*y_cur[IDX_SiH4II] - - k[2475]*y_cur[IDX_H2I]*y_cur[IDX_SiOII] + - k[2476]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + - k[2481]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + - k[2483]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + - k[2485]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + - k[2495]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + - k[2502]*y_cur[IDX_H2NCII]*y_cur[IDX_SiI] + - k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + - k[2529]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + - k[2563]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + - k[2565]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + - k[2567]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] + - k[2577]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + - k[2583]*y_cur[IDX_H3II]*y_cur[IDX_C10I] + - k[2584]*y_cur[IDX_H3II]*y_cur[IDX_C10H2I] + - k[2585]*y_cur[IDX_H3II]*y_cur[IDX_C10HI] + - k[2586]*y_cur[IDX_H3II]*y_cur[IDX_C2I] + - k[2587]*y_cur[IDX_H3II]*y_cur[IDX_C2H2I] + - k[2588]*y_cur[IDX_H3II]*y_cur[IDX_C2H3I] + - k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + - k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + - k[2590]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + - k[2591]*y_cur[IDX_H3II]*y_cur[IDX_C2H5I] + - k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2597]*y_cur[IDX_H3II]*y_cur[IDX_C2HI] + - k[2598]*y_cur[IDX_H3II]*y_cur[IDX_C2NI] + - k[2599]*y_cur[IDX_H3II]*y_cur[IDX_C2OI] + - k[2600]*y_cur[IDX_H3II]*y_cur[IDX_C2SI] + - k[2601]*y_cur[IDX_H3II]*y_cur[IDX_C3I] + - k[2602]*y_cur[IDX_H3II]*y_cur[IDX_C3H2I] + - k[2603]*y_cur[IDX_H3II]*y_cur[IDX_C3HI] + - k[2604]*y_cur[IDX_H3II]*y_cur[IDX_C3NI] + - k[2605]*y_cur[IDX_H3II]*y_cur[IDX_C3OI] + - k[2606]*y_cur[IDX_H3II]*y_cur[IDX_C3PI] + - k[2607]*y_cur[IDX_H3II]*y_cur[IDX_C3SI] + - k[2608]*y_cur[IDX_H3II]*y_cur[IDX_C4I] + - k[2609]*y_cur[IDX_H3II]*y_cur[IDX_C4H3I] + - k[2610]*y_cur[IDX_H3II]*y_cur[IDX_C4HI] + - k[2611]*y_cur[IDX_H3II]*y_cur[IDX_C4PI] + - k[2612]*y_cur[IDX_H3II]*y_cur[IDX_C4SI] + - k[2613]*y_cur[IDX_H3II]*y_cur[IDX_C5I] + - k[2614]*y_cur[IDX_H3II]*y_cur[IDX_C5H2I] + - k[2615]*y_cur[IDX_H3II]*y_cur[IDX_C5HI] + - k[2616]*y_cur[IDX_H3II]*y_cur[IDX_C5NI] + - k[2617]*y_cur[IDX_H3II]*y_cur[IDX_C6I] + - k[2618]*y_cur[IDX_H3II]*y_cur[IDX_C6H2I] + - k[2619]*y_cur[IDX_H3II]*y_cur[IDX_C6H6I] + - k[2620]*y_cur[IDX_H3II]*y_cur[IDX_C6HI] + - k[2621]*y_cur[IDX_H3II]*y_cur[IDX_C7I] + - k[2622]*y_cur[IDX_H3II]*y_cur[IDX_C7H2I] + - k[2623]*y_cur[IDX_H3II]*y_cur[IDX_C7HI] + - k[2624]*y_cur[IDX_H3II]*y_cur[IDX_C7NI] + - k[2625]*y_cur[IDX_H3II]*y_cur[IDX_C8I] + - k[2626]*y_cur[IDX_H3II]*y_cur[IDX_C8H2I] + - k[2627]*y_cur[IDX_H3II]*y_cur[IDX_C8HI] + - k[2628]*y_cur[IDX_H3II]*y_cur[IDX_C9I] + - k[2629]*y_cur[IDX_H3II]*y_cur[IDX_C9H2I] + - k[2630]*y_cur[IDX_H3II]*y_cur[IDX_C9HI] + - k[2631]*y_cur[IDX_H3II]*y_cur[IDX_C9NI] + - k[2632]*y_cur[IDX_H3II]*y_cur[IDX_CI] + - k[2633]*y_cur[IDX_H3II]*y_cur[IDX_CCPI] + - k[2634]*y_cur[IDX_H3II]*y_cur[IDX_CH2I] + - k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] + - k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] + - k[2636]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCHI] + - k[2637]*y_cur[IDX_H3II]*y_cur[IDX_CH2CHCNI] + - k[2638]*y_cur[IDX_H3II]*y_cur[IDX_CH2CNI] + - k[2639]*y_cur[IDX_H3II]*y_cur[IDX_CH2COI] + - k[2640]*y_cur[IDX_H3II]*y_cur[IDX_CH2PHI] + - k[2641]*y_cur[IDX_H3II]*y_cur[IDX_CH3I] + - k[2642]*y_cur[IDX_H3II]*y_cur[IDX_CH3C3NI] + - k[2643]*y_cur[IDX_H3II]*y_cur[IDX_CH3C4HI] + - k[2644]*y_cur[IDX_H3II]*y_cur[IDX_CH3C5NI] + - k[2645]*y_cur[IDX_H3II]*y_cur[IDX_CH3C6HI] + - k[2646]*y_cur[IDX_H3II]*y_cur[IDX_CH3C7NI] + - k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] + - k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] + - k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] + - k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] + - k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + - k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + - k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + - k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2654]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2658]*y_cur[IDX_H3II]*y_cur[IDX_CH3CNI] + - k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2663]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2666]*y_cur[IDX_H3II]*y_cur[IDX_CH3OCH3I] + - k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] + - k[2668]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] + - k[2669]*y_cur[IDX_H3II]*y_cur[IDX_CH4I] + - k[2670]*y_cur[IDX_H3II]*y_cur[IDX_CHI] + - k[2671]*y_cur[IDX_H3II]*y_cur[IDX_CNI] + - k[2672]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] + - k[2673]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] + - k[2674]*y_cur[IDX_H3II]*y_cur[IDX_CO2I] + - k[2675]*y_cur[IDX_H3II]*y_cur[IDX_COI] + - k[2676]*y_cur[IDX_H3II]*y_cur[IDX_COI] + - k[2677]*y_cur[IDX_H3II]*y_cur[IDX_CPI] + - k[2678]*y_cur[IDX_H3II]*y_cur[IDX_CSI] + - k[2679]*y_cur[IDX_H3II]*y_cur[IDX_ClI] + - k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] + - k[2681]*y_cur[IDX_H3II]*y_cur[IDX_H2CCCI] + - k[2682]*y_cur[IDX_H3II]*y_cur[IDX_H2COI] + - k[2683]*y_cur[IDX_H3II]*y_cur[IDX_H2CSI] + - k[2684]*y_cur[IDX_H3II]*y_cur[IDX_H2OI] + - k[2685]*y_cur[IDX_H3II]*y_cur[IDX_H2S2I] + - k[2686]*y_cur[IDX_H3II]*y_cur[IDX_H2SI] + - k[2687]*y_cur[IDX_H3II]*y_cur[IDX_H2SiOI] + - k[2688]*y_cur[IDX_H3II]*y_cur[IDX_HC2PI] + - k[2689]*y_cur[IDX_H3II]*y_cur[IDX_HC3NI] + - k[2690]*y_cur[IDX_H3II]*y_cur[IDX_C4H2I] + - k[2691]*y_cur[IDX_H3II]*y_cur[IDX_HC5NI] + - k[2692]*y_cur[IDX_H3II]*y_cur[IDX_HC7NI] + - k[2693]*y_cur[IDX_H3II]*y_cur[IDX_HC9NI] + - k[2694]*y_cur[IDX_H3II]*y_cur[IDX_HCNI] + - k[2695]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + - k[2696]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + - k[2697]*y_cur[IDX_H3II]*y_cur[IDX_HCOI] + - k[2698]*y_cur[IDX_H3II]*y_cur[IDX_HCOOCH3I] + - k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] + - k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] + - k[2701]*y_cur[IDX_H3II]*y_cur[IDX_HCPI] + - k[2702]*y_cur[IDX_H3II]*y_cur[IDX_HCSI] + - k[2703]*y_cur[IDX_H3II]*y_cur[IDX_HCSiI] + - k[2704]*y_cur[IDX_H3II]*y_cur[IDX_HClI] + - k[2705]*y_cur[IDX_H3II]*y_cur[IDX_HFI] + - k[2706]*y_cur[IDX_H3II]*y_cur[IDX_HNCI] + - k[2707]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] + - k[2708]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] + - k[2709]*y_cur[IDX_H3II]*y_cur[IDX_HNOI] + - k[2710]*y_cur[IDX_H3II]*y_cur[IDX_HNSiI] + - k[2711]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] + - k[2712]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] + - k[2713]*y_cur[IDX_H3II]*y_cur[IDX_HONCI] + - k[2714]*y_cur[IDX_H3II]*y_cur[IDX_HPOI] + - k[2715]*y_cur[IDX_H3II]*y_cur[IDX_HS2I] + - k[2716]*y_cur[IDX_H3II]*y_cur[IDX_HSI] + - k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] + - k[2718]*y_cur[IDX_H3II]*y_cur[IDX_N2I] + - k[2719]*y_cur[IDX_H3II]*y_cur[IDX_N2OI] + - k[2720]*y_cur[IDX_H3II]*y_cur[IDX_NCCNI] + - k[2721]*y_cur[IDX_H3II]*y_cur[IDX_NH2I] + - k[2722]*y_cur[IDX_H3II]*y_cur[IDX_NH2CNI] + - k[2723]*y_cur[IDX_H3II]*y_cur[IDX_NH3I] + - k[2724]*y_cur[IDX_H3II]*y_cur[IDX_NHI] + - k[2725]*y_cur[IDX_H3II]*y_cur[IDX_NO2I] + - k[2726]*y_cur[IDX_H3II]*y_cur[IDX_NOI] + - k[2727]*y_cur[IDX_H3II]*y_cur[IDX_NSI] + - k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] + - k[2729]*y_cur[IDX_H3II]*y_cur[IDX_O2I] + - k[2731]*y_cur[IDX_H3II]*y_cur[IDX_OI] + - k[2732]*y_cur[IDX_H3II]*y_cur[IDX_OCSI] + - k[2733]*y_cur[IDX_H3II]*y_cur[IDX_OHI] + - k[2734]*y_cur[IDX_H3II]*y_cur[IDX_PI] + - k[2735]*y_cur[IDX_H3II]*y_cur[IDX_PH2I] + - k[2736]*y_cur[IDX_H3II]*y_cur[IDX_PHI] + - k[2737]*y_cur[IDX_H3II]*y_cur[IDX_PNI] + - k[2738]*y_cur[IDX_H3II]*y_cur[IDX_POI] + - k[2739]*y_cur[IDX_H3II]*y_cur[IDX_S2I] + - k[2740]*y_cur[IDX_H3II]*y_cur[IDX_SI] + - k[2741]*y_cur[IDX_H3II]*y_cur[IDX_SO2I] + - k[2742]*y_cur[IDX_H3II]*y_cur[IDX_SOI] + - k[2743]*y_cur[IDX_H3II]*y_cur[IDX_SiI] + - k[2744]*y_cur[IDX_H3II]*y_cur[IDX_SiC2I] + - k[2745]*y_cur[IDX_H3II]*y_cur[IDX_SiC2H2I] + - k[2746]*y_cur[IDX_H3II]*y_cur[IDX_SiC2HI] + - k[2747]*y_cur[IDX_H3II]*y_cur[IDX_SiC3I] + - k[2748]*y_cur[IDX_H3II]*y_cur[IDX_SiC3HI] + - k[2749]*y_cur[IDX_H3II]*y_cur[IDX_SiC4I] + - k[2750]*y_cur[IDX_H3II]*y_cur[IDX_SiCI] + - k[2751]*y_cur[IDX_H3II]*y_cur[IDX_SiCH2I] + - k[2752]*y_cur[IDX_H3II]*y_cur[IDX_SiCH3I] + - k[2753]*y_cur[IDX_H3II]*y_cur[IDX_SiH2I] + - k[2754]*y_cur[IDX_H3II]*y_cur[IDX_SiH3I] + - k[2755]*y_cur[IDX_H3II]*y_cur[IDX_SiH4I] + - k[2756]*y_cur[IDX_H3II]*y_cur[IDX_SiHI] + - k[2757]*y_cur[IDX_H3II]*y_cur[IDX_SiNI] + - k[2758]*y_cur[IDX_H3II]*y_cur[IDX_SiNCI] + - k[2759]*y_cur[IDX_H3II]*y_cur[IDX_SiO2I] + - k[2760]*y_cur[IDX_H3II]*y_cur[IDX_SiOI] + - k[2761]*y_cur[IDX_H3II]*y_cur[IDX_SiSI] + - k[2815]*y_cur[IDX_H3OII]*y_cur[IDX_PI] + - k[2827]*y_cur[IDX_HI]*y_cur[IDX_C2H3II] + - k[2828]*y_cur[IDX_HI]*y_cur[IDX_C2H4II] + - k[2829]*y_cur[IDX_HI]*y_cur[IDX_C2H5II] + - k[2831]*y_cur[IDX_HI]*y_cur[IDX_C3H2II] + - k[2832]*y_cur[IDX_HI]*y_cur[IDX_C3H4II] + - k[2833]*y_cur[IDX_HI]*y_cur[IDX_C3H7II] + - k[2834]*y_cur[IDX_HI]*y_cur[IDX_C6H6II] + - k[2835]*y_cur[IDX_HI]*y_cur[IDX_CHII] + - k[2836]*y_cur[IDX_HI]*y_cur[IDX_CH2II] + - k[2837]*y_cur[IDX_HI]*y_cur[IDX_CH3II] + - k[2838]*y_cur[IDX_HI]*y_cur[IDX_C2H6II] + - k[2839]*y_cur[IDX_HI]*y_cur[IDX_CH4II] + - k[2840]*y_cur[IDX_HI]*y_cur[IDX_CH5II] + - k[2842]*y_cur[IDX_HI]*y_cur[IDX_H2SII] + - k[2843]*y_cur[IDX_HI]*y_cur[IDX_H3SII] + - k[2844]*y_cur[IDX_HI]*y_cur[IDX_HSII] + - k[2848]*y_cur[IDX_HI]*y_cur[IDX_SiHII] + - k[2896]*y_cur[IDX_HCNHII]*y_cur[IDX_SiI] - - k[2897]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] - - k[2898]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] + - k[3022]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3027]*y_cur[IDX_HNC3I]*y_cur[IDX_H3II] - - k[3047]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] - - k[3048]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] - - k[3051]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - - k[3052]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - - k[3053]*y_cur[IDX_HONCII]*y_cur[IDX_H2I] + - k[3055]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + - k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + - k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + - k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + - k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + - k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + - k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] + - k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + - k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] + - k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + - k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + - k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + - k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + - k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + - k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + - k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + - k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + - k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + - k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] + - k[3322]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + - k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + - k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + - k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + - k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + - k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[3353]*y_cur[IDX_NII]*y_cur[IDX_NH3I] + - k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + - k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] + - k[3387]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + - k[3390]*y_cur[IDX_NI]*y_cur[IDX_C2H3II] + - k[3399]*y_cur[IDX_NI]*y_cur[IDX_C3H4II] + - k[3401]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + - k[3417]*y_cur[IDX_NI]*y_cur[IDX_C5H5II] + - k[3435]*y_cur[IDX_NI]*y_cur[IDX_C7H5II] + - k[3458]*y_cur[IDX_NI]*y_cur[IDX_H2OII] + - k[3459]*y_cur[IDX_NI]*y_cur[IDX_H2SII] + - k[3473]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] + - k[3490]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + - k[3555]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] + - k[3597]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + - k[3600]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] + - k[3608]*y_cur[IDX_NHI]*y_cur[IDX_CH3II] + - k[3690]*y_cur[IDX_OI]*y_cur[IDX_C2H3II] + - k[3728]*y_cur[IDX_OI]*y_cur[IDX_CH5II] + - k[3733]*y_cur[IDX_OI]*y_cur[IDX_H2OII] + - k[3735]*y_cur[IDX_OI]*y_cur[IDX_H2SII] + - k[3747]*y_cur[IDX_OI]*y_cur[IDX_NH3II] + - k[3759]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] + - k[3760]*y_cur[IDX_OI]*y_cur[IDX_SiH5II] - - k[3765]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] - - k[3766]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + - k[3767]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] + - k[3768]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] + - k[3771]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + - k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + - k[3829]*y_cur[IDX_SII]*y_cur[IDX_H2SI] + - k[3835]*y_cur[IDX_SI]*y_cur[IDX_C3H3II] + - k[3837]*y_cur[IDX_SI]*y_cur[IDX_C4H3II] + - k[3838]*y_cur[IDX_SI]*y_cur[IDX_CH2CCHII] + - k[3873]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] + - k[3875]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] + - k[3877]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] + - k[3879]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] + - k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] + - k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] + - k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] + - k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] + - k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] + - k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] + - k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] + - k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] + - k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] + - k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] + - k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] + - k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] + - k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] + - k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] + - k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] + - k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] + - k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] + - k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] + - k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] + - k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] + - k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] + - k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] + - k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] + - k[4702]*y_cur[IDX_HM]*y_cur[IDX_H2II] + - k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] + - k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] + - k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] + - k[4810]*y_cur[IDX_OHM]*y_cur[IDX_H3II] + - k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] + - k[4879]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] + - k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] + - k[4885]*y_cur[IDX_C2H4I]*y_cur[IDX_SiI] + - k[4911]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] + - k[4950]*y_cur[IDX_CI]*y_cur[IDX_CH3C4HI] + - k[4951]*y_cur[IDX_CI]*y_cur[IDX_CH3C6HI] + - k[4953]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] + - k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] + - k[4960]*y_cur[IDX_CI]*y_cur[IDX_H2CNI] + - k[4992]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + - k[5007]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + - k[5012]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + - k[5019]*y_cur[IDX_CH2I]*y_cur[IDX_SI] + - k[5026]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + - k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + - k[5046]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + - k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] + - k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - - k[5132]*y_cur[IDX_ClI]*y_cur[IDX_H2I] - - k[5133]*y_cur[IDX_H2I]*y_cur[IDX_C2HI] - - k[5134]*y_cur[IDX_H2I]*y_cur[IDX_CI] - - k[5135]*y_cur[IDX_H2I]*y_cur[IDX_CH2I] - - k[5136]*y_cur[IDX_H2I]*y_cur[IDX_CH3I] - - k[5137]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - - k[5138]*y_cur[IDX_H2I]*y_cur[IDX_CNI] - - k[5139]*y_cur[IDX_H2I]*y_cur[IDX_FI] - - k[5140]*y_cur[IDX_H2I]*y_cur[IDX_HSI] - - k[5141]*y_cur[IDX_H2I]*y_cur[IDX_NI] - - k[5142]*y_cur[IDX_H2I]*y_cur[IDX_NH2I] - - k[5143]*y_cur[IDX_H2I]*y_cur[IDX_NHI] - - k[5144]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - - k[5145]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - - k[5146]*y_cur[IDX_H2I]*y_cur[IDX_O2HI] - - k[5147]*y_cur[IDX_H2I]*y_cur[IDX_OI] - - k[5148]*y_cur[IDX_H2I]*y_cur[IDX_OHI] - - k[5149]*y_cur[IDX_H2I]*y_cur[IDX_SI] + - k[5154]*y_cur[IDX_HI]*y_cur[IDX_C2H2I] + - k[5155]*y_cur[IDX_HI]*y_cur[IDX_C2H3I] + - k[5156]*y_cur[IDX_HI]*y_cur[IDX_CH2I] + - k[5158]*y_cur[IDX_HI]*y_cur[IDX_CH3I] + - k[5159]*y_cur[IDX_HI]*y_cur[IDX_CH4I] + - k[5160]*y_cur[IDX_HI]*y_cur[IDX_CHI] + - k[5164]*y_cur[IDX_HI]*y_cur[IDX_H2CNI] + - k[5165]*y_cur[IDX_HI]*y_cur[IDX_H2COI] + - k[5167]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] + - k[5168]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + - k[5169]*y_cur[IDX_HI]*y_cur[IDX_H2SI] + - k[5170]*y_cur[IDX_HI]*y_cur[IDX_HCNI] + - k[5171]*y_cur[IDX_HI]*y_cur[IDX_HCOI] + - k[5173]*y_cur[IDX_HI]*y_cur[IDX_HCSI] + - k[5176]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + - k[5178]*y_cur[IDX_HI]*y_cur[IDX_HSI] + - k[5182]*y_cur[IDX_HI]*y_cur[IDX_NH2I] + - k[5183]*y_cur[IDX_HI]*y_cur[IDX_NH3I] + - k[5184]*y_cur[IDX_HI]*y_cur[IDX_NHI] + - k[5192]*y_cur[IDX_HI]*y_cur[IDX_O2HI] + - k[5198]*y_cur[IDX_HI]*y_cur[IDX_OHI] + - k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + - k[5211]*y_cur[IDX_HClI]*y_cur[IDX_HI] + - k[5256]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHI] + - k[5258]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + - k[5295]*y_cur[IDX_NI]*y_cur[IDX_SiH3I] + - k[5308]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + - k[5347]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + - k[5396]*y_cur[IDX_OI]*y_cur[IDX_H2CNI] + - k[5435]*y_cur[IDX_OI]*y_cur[IDX_PH2I] + - k[5445]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - - k[5516]*y_cur[IDX_C3H5II]*y_cur[IDX_H2I] - - k[5530]*y_cur[IDX_CH2CCHII]*y_cur[IDX_H2I] - - k[5548]*y_cur[IDX_H2I]*y_cur[IDX_CII] - - k[5549]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] - - k[5550]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - - k[5551]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - - k[5552]*y_cur[IDX_H2I]*y_cur[IDX_C6II] - - k[5553]*y_cur[IDX_H2I]*y_cur[IDX_C6H5II] - - k[5554]*y_cur[IDX_H2I]*y_cur[IDX_CI] - - k[5555]*y_cur[IDX_H2I]*y_cur[IDX_CH3II] - - k[5556]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - - k[5557]*y_cur[IDX_H2I]*y_cur[IDX_HSII] - - k[5558]*y_cur[IDX_H2I]*y_cur[IDX_HS2II] - - k[5559]*y_cur[IDX_H2I]*y_cur[IDX_PII] - - k[5560]*y_cur[IDX_H2I]*y_cur[IDX_PHII] - - k[5561]*y_cur[IDX_H2I]*y_cur[IDX_SII] - - k[5562]*y_cur[IDX_H2I]*y_cur[IDX_SiII] - - k[5563]*y_cur[IDX_H2I]*y_cur[IDX_SiC2HII] - - k[5564]*y_cur[IDX_H2I]*y_cur[IDX_SiHII] - - k[5565]*y_cur[IDX_H2I]*y_cur[IDX_SiH3II] + - k[5628]*y_cur[IDX_H3II]*y_cur[IDX_CH3OI] + - k[5634]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHI] + - k[5640]*y_cur[IDX_H3II]*y_cur[IDX_CH3COI] + - k[5645]*y_cur[IDX_H3II]*y_cur[IDX_COOHI] + - k[5650]*y_cur[IDX_H3II]*y_cur[IDX_COOCH3I] + - k[5656]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCOI] + - k[5662]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCHOI] + - k[5668]*y_cur[IDX_H3II]*y_cur[IDX_CH3COOHI] - k[5678]*y_cur[IDX_H2I] - - k[5679]*y_cur[IDX_H2I] - k[5680]*y_cur[IDX_H2I] - - k[5681]*y_cur[IDX_H2I] + k[5700]*y_cur[IDX_C2H4I] + - k[5702]*y_cur[IDX_C2H5I] + k[5751]*y_cur[IDX_C6H6I] + - k[5783]*y_cur[IDX_CH2CCHI] + k[5792]*y_cur[IDX_CH2PHI] + - k[5795]*y_cur[IDX_CH3I] + k[5803]*y_cur[IDX_C2H6I] + - k[5820]*y_cur[IDX_CH4I] + k[5836]*y_cur[IDX_H2COI] + - k[5837]*y_cur[IDX_H2CSI] + k[5842]*y_cur[IDX_H2SI] + - k[5843]*y_cur[IDX_H2SiOI] + k[5887]*y_cur[IDX_NH3I] + - k[5919]*y_cur[IDX_SiC2H2I] + k[5925]*y_cur[IDX_SiCH2I] + - k[5929]*y_cur[IDX_SiH4I] + k[5985]*y_cur[IDX_C2H4I] + - k[5987]*y_cur[IDX_C2H5I] + k[6014]*y_cur[IDX_C4H3I] + - k[6075]*y_cur[IDX_CH2II] + k[6082]*y_cur[IDX_CH2CCH2I] + - k[6084]*y_cur[IDX_CH2CCHI] + k[6093]*y_cur[IDX_CH2NHI] + - k[6095]*y_cur[IDX_CH3II] + k[6099]*y_cur[IDX_CH3I] + - k[6107]*y_cur[IDX_CH3CCHI] + k[6108]*y_cur[IDX_C2H6I] + - k[6125]*y_cur[IDX_CH4II] + k[6127]*y_cur[IDX_CH4I] + - k[6130]*y_cur[IDX_CH4I] - k[6147]*y_cur[IDX_H2I] + - k[6149]*y_cur[IDX_H2CCCI] + k[6152]*y_cur[IDX_H2COI] + - k[6156]*y_cur[IDX_H2CSI] + k[6161]*y_cur[IDX_H2OI] + - k[6165]*y_cur[IDX_H2SI] + k[6166]*y_cur[IDX_H2SiOI] + - k[6169]*y_cur[IDX_H3II] + k[6223]*y_cur[IDX_NH3I] + - k[6276]*y_cur[IDX_SiH3I] + k[6277]*y_cur[IDX_SiH4I] + - k[6279]*y_cur[IDX_SiH4I] + k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] - + k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + - k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + - k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + - k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + - k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6345]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + - k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + - k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + - k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + - k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + - k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6402]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + - k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + - k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + - k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + - k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + - k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + - k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + - k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + - k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] + - k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + - k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + - k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + - k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + - k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + - k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + - k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + - k[6516]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + - k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] + - k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + - k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + - k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6586]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] + - k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + - k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + - k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + - k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + - k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + - k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + - k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + - k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM] + - k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + - k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] + - k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] + - k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] + - k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] + - k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + - k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + - k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + - k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + - k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + - k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + - k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + - k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + - k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + - k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + - k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + - k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + - k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] + - k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + - k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + - k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + - k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + - k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + - k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + - k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + - k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + - k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + - k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] + - k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] + - k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + - k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + - k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + - k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + - k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + - k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + - k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + - k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + - k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + - k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + - k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + - k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + - k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + - k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + - k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + - k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + - k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + - k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + - k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + - k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + - k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + - k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + - k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + - k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + - k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + - k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] + - k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - - k[6889]*y_cur[IDX_H2I] + k[7071]*y_cur[IDX_GH2I] + - k[7253]*y_cur[IDX_GH2I] + k[7435]*y_cur[IDX_GH2I] + - k[8273]*y_cur[IDX_GHI]*y_cur[IDX_GHI]; - ydot[yistart + IDX_H2II] = 0.0 - - k[436]*y_cur[IDX_H2II]*y_cur[IDX_C2I] - - k[437]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] - - k[438]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - - k[439]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] - - k[440]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] - - k[441]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - - k[442]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - - k[443]*y_cur[IDX_H2II]*y_cur[IDX_CHI] - - k[444]*y_cur[IDX_H2II]*y_cur[IDX_CNI] - - k[445]*y_cur[IDX_H2II]*y_cur[IDX_COI] - - k[446]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] - - k[447]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] - - k[448]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - - k[449]*y_cur[IDX_H2II]*y_cur[IDX_HCNI] - - k[450]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] - - k[451]*y_cur[IDX_H2II]*y_cur[IDX_NH2I] - - k[452]*y_cur[IDX_H2II]*y_cur[IDX_NH3I] - - k[453]*y_cur[IDX_H2II]*y_cur[IDX_NHI] - - k[454]*y_cur[IDX_H2II]*y_cur[IDX_NOI] - - k[455]*y_cur[IDX_H2II]*y_cur[IDX_O2I] - - k[456]*y_cur[IDX_H2II]*y_cur[IDX_OHI] + - k[457]*y_cur[IDX_H2I]*y_cur[IDX_FII] + - k[458]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - - k[489]*y_cur[IDX_HI]*y_cur[IDX_H2II] - - k[987]*y_cur[IDX_H2II]*y_cur[IDX_eM] + - k[2345]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - - k[2369]*y_cur[IDX_H2II]*y_cur[IDX_C2I] - - k[2370]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] - - k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - - k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - - k[2373]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] - - k[2374]*y_cur[IDX_H2II]*y_cur[IDX_CI] - - k[2375]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] - - k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - - k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - - k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - - k[2379]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - - k[2380]*y_cur[IDX_H2II]*y_cur[IDX_CHI] - - k[2381]*y_cur[IDX_H2II]*y_cur[IDX_CNI] - - k[2382]*y_cur[IDX_H2II]*y_cur[IDX_CO2I] - - k[2383]*y_cur[IDX_H2II]*y_cur[IDX_COI] - - k[2384]*y_cur[IDX_H2II]*y_cur[IDX_H2I] - - k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] - - k[2386]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] - - k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - - k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - - k[2389]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] - - k[2390]*y_cur[IDX_H2II]*y_cur[IDX_HeI] - - k[2391]*y_cur[IDX_H2II]*y_cur[IDX_N2I] - - k[2392]*y_cur[IDX_H2II]*y_cur[IDX_NI] - - k[2393]*y_cur[IDX_H2II]*y_cur[IDX_NHI] - - k[2394]*y_cur[IDX_H2II]*y_cur[IDX_NOI] - - k[2395]*y_cur[IDX_H2II]*y_cur[IDX_O2I] - - k[2396]*y_cur[IDX_H2II]*y_cur[IDX_OI] - - k[2397]*y_cur[IDX_H2II]*y_cur[IDX_OHI] + - k[2845]*y_cur[IDX_HI]*y_cur[IDX_HeHII] - - k[4702]*y_cur[IDX_HM]*y_cur[IDX_H2II] + - k[5546]*y_cur[IDX_HII]*y_cur[IDX_HI] + k[5680]*y_cur[IDX_H2I] - - k[6148]*y_cur[IDX_H2II] + k[6168]*y_cur[IDX_H3II] - - k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2C4NII] = 0.0 - - k[988]*y_cur[IDX_H2C4NII]*y_cur[IDX_eM] + - k[1350]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - - k[2441]*y_cur[IDX_H2I]*y_cur[IDX_H2C4NII] + - k[2446]*y_cur[IDX_H2I]*y_cur[IDX_HC4NII] - - k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2C7NII] = 0.0 - - k[989]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] - - k[990]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + - k[2448]*y_cur[IDX_H2I]*y_cur[IDX_HC7NII] + - k[2692]*y_cur[IDX_H3II]*y_cur[IDX_HC7NI] + - k[2967]*y_cur[IDX_HCOII]*y_cur[IDX_HC7NI] + - k[3433]*y_cur[IDX_NI]*y_cur[IDX_C7H3II] - - k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] - - k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2C9NII] = 0.0 - - k[991]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] - - k[992]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + - k[2449]*y_cur[IDX_H2I]*y_cur[IDX_HC9NII] + - k[2693]*y_cur[IDX_H3II]*y_cur[IDX_HC9NI] + - k[2968]*y_cur[IDX_HCOII]*y_cur[IDX_HC9NI] + - k[3450]*y_cur[IDX_NI]*y_cur[IDX_C9H3II] - - k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] - - k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2CCCI] = 0.0 + - k[90]*y_cur[IDX_HI]*y_cur[IDX_C3HM] + - k[802]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + - k[911]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] - - k[1388]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - - k[1389]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - - k[1516]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] - - k[1517]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] - - k[1616]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - - k[1617]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - - k[1618]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - - k[1672]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] - - k[1673]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] - - k[1782]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - - k[1783]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - - k[2076]*y_cur[IDX_CH3II]*y_cur[IDX_H2CCCI] - - k[2335]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] - - k[2336]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] - - k[2476]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] - - k[2477]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] - - k[2478]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4HII] - - k[2479]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H2II] - - k[2480]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H3II] - - k[2481]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] - - k[2482]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] - - k[2483]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] - - k[2484]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] - - k[2485]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] - - k[2486]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] - - k[2681]*y_cur[IDX_H3II]*y_cur[IDX_H2CCCI] - - k[2798]*y_cur[IDX_H3OII]*y_cur[IDX_H2CCCI] - - k[2957]*y_cur[IDX_HCOII]*y_cur[IDX_H2CCCI] - - k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - - k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - - k[3827]*y_cur[IDX_SII]*y_cur[IDX_H2CCCI] - - k[3868]*y_cur[IDX_SiII]*y_cur[IDX_H2CCCI] - - k[4959]*y_cur[IDX_CI]*y_cur[IDX_H2CCCI] + - k[5064]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - - k[5395]*y_cur[IDX_OI]*y_cur[IDX_H2CCCI] - k[5834]*y_cur[IDX_H2CCCI] - + k[6082]*y_cur[IDX_CH2CCH2I] + k[6107]*y_cur[IDX_CH3CCHI] - - k[6149]*y_cur[IDX_H2CCCI] - k[6150]*y_cur[IDX_H2CCCI] + - k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + - k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - - k[6946]*y_cur[IDX_H2CCCI] + k[7128]*y_cur[IDX_GH2CCCI] + - k[7310]*y_cur[IDX_GH2CCCI] + k[7492]*y_cur[IDX_GH2CCCI]; - ydot[yistart + IDX_H2CClII] = 0.0 - - k[993]*y_cur[IDX_H2CClII]*y_cur[IDX_eM] + - k[2083]*y_cur[IDX_CH3II]*y_cur[IDX_HClI] + - k[2492]*y_cur[IDX_H2COI]*y_cur[IDX_CClII] - - k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2CNI] = 0.0 - - k[4960]*y_cur[IDX_CI]*y_cur[IDX_H2CNI] - - k[5164]*y_cur[IDX_HI]*y_cur[IDX_H2CNI] + - k[5227]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] + - k[5257]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - - k[5264]*y_cur[IDX_NI]*y_cur[IDX_H2CNI] - - k[5396]*y_cur[IDX_OI]*y_cur[IDX_H2CNI] - k[5835]*y_cur[IDX_H2CNI] - - k[6151]*y_cur[IDX_H2CNI] - k[6914]*y_cur[IDX_H2CNI] + - k[7096]*y_cur[IDX_GH2CNI] + k[7278]*y_cur[IDX_GH2CNI] + - k[7460]*y_cur[IDX_GH2CNI] + k[8699]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I]; - ydot[yistart + IDX_H2CNOII] = 0.0 - - k[994]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] - - k[995]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + - k[2695]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + - k[2897]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] - - k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] - - k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2COI] = 0.0 + k[4]*y_cur[IDX_CM]*y_cur[IDX_H2OI] - + k[59]*y_cur[IDX_CH2I]*y_cur[IDX_OM] + - k[64]*y_cur[IDX_CHI]*y_cur[IDX_OHM] + - k[76]*y_cur[IDX_HM]*y_cur[IDX_HCOI] - - k[174]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - - k[222]*y_cur[IDX_C2H2II]*y_cur[IDX_H2COI] + - k[262]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] - - k[280]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] + - k[290]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - - k[300]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - - k[308]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - - k[376]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - - k[446]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + - k[459]*y_cur[IDX_H2COII]*y_cur[IDX_FeI] + - k[460]*y_cur[IDX_H2COII]*y_cur[IDX_SI] - - k[461]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] - - k[468]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] + - k[500]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] - - k[517]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[531]*y_cur[IDX_MgI]*y_cur[IDX_H2COII] - - k[551]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - - k[566]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] - - k[574]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + - k[604]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] + - k[624]*y_cur[IDX_NOI]*y_cur[IDX_H2COII] + - k[635]*y_cur[IDX_NaI]*y_cur[IDX_H2COII] - - k[655]*y_cur[IDX_OII]*y_cur[IDX_H2COI] - - k[688]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] + - k[718]*y_cur[IDX_SiI]*y_cur[IDX_H2COII] + - k[773]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] + - k[939]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[943]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[961]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + - k[967]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[1037]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1270]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + - k[1273]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + - k[1277]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1281]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + - k[1281]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + - k[1282]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - - k[1390]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - - k[1391]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - - k[1469]*y_cur[IDX_C2HII]*y_cur[IDX_H2COI] - - k[1720]*y_cur[IDX_C2H5II]*y_cur[IDX_H2COI] + - k[1938]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - - k[1947]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - - k[1948]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - - k[1949]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - - k[1950]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - - k[1979]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - - k[1980]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - - k[1981]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + - k[2019]*y_cur[IDX_CH2I]*y_cur[IDX_SiOII] + - k[2066]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - - k[2077]*y_cur[IDX_CH3II]*y_cur[IDX_H2COI] + - k[2132]*y_cur[IDX_CH3OHI]*y_cur[IDX_S2II] - - k[2141]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] - - k[2225]*y_cur[IDX_CH5II]*y_cur[IDX_H2COI] + - k[2248]*y_cur[IDX_CHI]*y_cur[IDX_H3COII] - - k[2271]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - - k[2280]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - - k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - - k[2338]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - - k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] - - k[2488]*y_cur[IDX_H2COII]*y_cur[IDX_H2COI] - - k[2491]*y_cur[IDX_H2COI]*y_cur[IDX_C2H5OH2II] - - k[2492]*y_cur[IDX_H2COI]*y_cur[IDX_CClII] - - k[2493]*y_cur[IDX_H2COI]*y_cur[IDX_CH3COCH3II] - - k[2494]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] - - k[2495]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] - - k[2496]*y_cur[IDX_H2COI]*y_cur[IDX_H3SII] - - k[2497]*y_cur[IDX_H2COI]*y_cur[IDX_HNOII] - - k[2498]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] - - k[2499]*y_cur[IDX_H2COI]*y_cur[IDX_O2HII] - - k[2500]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - - k[2501]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - - k[2508]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] + - k[2545]*y_cur[IDX_H2OI]*y_cur[IDX_H3COII] + - k[2656]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2682]*y_cur[IDX_H3II]*y_cur[IDX_H2COI] + - k[2762]*y_cur[IDX_H3COII]*y_cur[IDX_CH3OHI] + - k[2763]*y_cur[IDX_H3COII]*y_cur[IDX_H2SI] + - k[2764]*y_cur[IDX_H3COII]*y_cur[IDX_C4H2I] + - k[2765]*y_cur[IDX_H3COII]*y_cur[IDX_HCOOHI] - - k[2799]*y_cur[IDX_H3OII]*y_cur[IDX_H2COI] - - k[2855]*y_cur[IDX_HCNII]*y_cur[IDX_H2COI] + - k[2875]*y_cur[IDX_HCNI]*y_cur[IDX_H3COII] - - k[2890]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] - - k[2891]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] - - k[2958]*y_cur[IDX_HCOII]*y_cur[IDX_H2COI] + - k[3039]*y_cur[IDX_HNCI]*y_cur[IDX_H3COII] + - k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] - - k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - - k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - - k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - - k[3345]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - - k[3346]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - - k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] - - k[3373]*y_cur[IDX_N2HII]*y_cur[IDX_H2COI] - - k[3487]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - - k[3488]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - - k[3510]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - - k[3511]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] + - k[3537]*y_cur[IDX_NH2I]*y_cur[IDX_H3COII] - - k[3549]*y_cur[IDX_NH3II]*y_cur[IDX_H2COI] + - k[3577]*y_cur[IDX_NH3I]*y_cur[IDX_H3COII] + - k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] - - k[3641]*y_cur[IDX_OII]*y_cur[IDX_H2COI] + - k[3657]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + - k[3661]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3754]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - - k[3778]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] + - k[3848]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + - k[3897]*y_cur[IDX_CM]*y_cur[IDX_H2COII] + - k[3932]*y_cur[IDX_C10M]*y_cur[IDX_H2COII] + - k[3967]*y_cur[IDX_C10HM]*y_cur[IDX_H2COII] + - k[4002]*y_cur[IDX_C2M]*y_cur[IDX_H2COII] + - k[4037]*y_cur[IDX_C2HM]*y_cur[IDX_H2COII] + - k[4072]*y_cur[IDX_C3M]*y_cur[IDX_H2COII] + - k[4107]*y_cur[IDX_C3HM]*y_cur[IDX_H2COII] + - k[4142]*y_cur[IDX_C3NM]*y_cur[IDX_H2COII] + - k[4177]*y_cur[IDX_C4M]*y_cur[IDX_H2COII] + - k[4212]*y_cur[IDX_C4HM]*y_cur[IDX_H2COII] + - k[4247]*y_cur[IDX_C5M]*y_cur[IDX_H2COII] + - k[4282]*y_cur[IDX_C5HM]*y_cur[IDX_H2COII] + - k[4317]*y_cur[IDX_C5NM]*y_cur[IDX_H2COII] + - k[4352]*y_cur[IDX_C6M]*y_cur[IDX_H2COII] + - k[4387]*y_cur[IDX_C6HM]*y_cur[IDX_H2COII] + - k[4422]*y_cur[IDX_C7M]*y_cur[IDX_H2COII] + - k[4457]*y_cur[IDX_C7HM]*y_cur[IDX_H2COII] + - k[4492]*y_cur[IDX_C8M]*y_cur[IDX_H2COII] + - k[4527]*y_cur[IDX_C8HM]*y_cur[IDX_H2COII] + - k[4562]*y_cur[IDX_C9M]*y_cur[IDX_H2COII] + - k[4597]*y_cur[IDX_C9HM]*y_cur[IDX_H2COII] + - k[4632]*y_cur[IDX_CHM]*y_cur[IDX_H2COII] + - k[4667]*y_cur[IDX_CNM]*y_cur[IDX_H2COII] + - k[4703]*y_cur[IDX_HM]*y_cur[IDX_H2COII] + - k[4738]*y_cur[IDX_OM]*y_cur[IDX_H2COII] + - k[4773]*y_cur[IDX_O2M]*y_cur[IDX_H2COII] + - k[4808]*y_cur[IDX_OHM]*y_cur[IDX_H2COII] + - k[4843]*y_cur[IDX_SM]*y_cur[IDX_H2COII] + - k[4881]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - - k[4998]*y_cur[IDX_CH2I]*y_cur[IDX_H2COI] + - k[5002]*y_cur[IDX_CH2I]*y_cur[IDX_NO2I] + - k[5003]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + - k[5010]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + - k[5016]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - - k[5030]*y_cur[IDX_CH3I]*y_cur[IDX_H2COI] + - k[5037]*y_cur[IDX_CH3I]*y_cur[IDX_NO2I] + - k[5039]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + - k[5044]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + - k[5046]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + - k[5056]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] - - k[5076]*y_cur[IDX_CHI]*y_cur[IDX_H2COI] - - k[5114]*y_cur[IDX_CNI]*y_cur[IDX_H2COI] - - k[5150]*y_cur[IDX_H2COI]*y_cur[IDX_O2HI] - - k[5165]*y_cur[IDX_HI]*y_cur[IDX_H2COI] + - k[5205]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + - k[5206]*y_cur[IDX_HCOI]*y_cur[IDX_HNOI] + - k[5210]*y_cur[IDX_HCOI]*y_cur[IDX_O2HI] + - k[5348]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + - k[5351]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - - k[5397]*y_cur[IDX_OI]*y_cur[IDX_H2COI] - - k[5465]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] - - k[5466]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] + - k[5616]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + - k[5815]*y_cur[IDX_CH3OCH3I] - k[5836]*y_cur[IDX_H2COI] + - k[6119]*y_cur[IDX_CH3OCH3I] - k[6152]*y_cur[IDX_H2COI] - - k[6153]*y_cur[IDX_H2COI] - k[6154]*y_cur[IDX_H2COI] - - k[6155]*y_cur[IDX_H2COI] + k[6186]*y_cur[IDX_HCOOCH3I] + - k[6186]*y_cur[IDX_HCOOCH3I] + - k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + - k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + - k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + - k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + - k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6926]*y_cur[IDX_H2COI] + k[7108]*y_cur[IDX_GH2COI] + - k[7290]*y_cur[IDX_GH2COI] + k[7472]*y_cur[IDX_GH2COI] + - k[8595]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] + - k[8686]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I]; - ydot[yistart + IDX_H2COII] = 0.0 + - k[174]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + - k[222]*y_cur[IDX_C2H2II]*y_cur[IDX_H2COI] - - k[262]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] + - k[280]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] - - k[290]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] + - k[300]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] + - k[308]*y_cur[IDX_COII]*y_cur[IDX_H2COI] + - k[376]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + - k[446]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] - - k[459]*y_cur[IDX_H2COII]*y_cur[IDX_FeI] - - k[460]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + - k[461]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + - k[468]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] - - k[500]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] + - k[517]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - - k[531]*y_cur[IDX_MgI]*y_cur[IDX_H2COII] + - k[551]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + - k[566]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + - k[574]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - - k[604]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - - k[624]*y_cur[IDX_NOI]*y_cur[IDX_H2COII] - - k[635]*y_cur[IDX_NaI]*y_cur[IDX_H2COII] + - k[655]*y_cur[IDX_OII]*y_cur[IDX_H2COI] + - k[688]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] - - k[718]*y_cur[IDX_SiI]*y_cur[IDX_H2COII] - - k[996]*y_cur[IDX_H2COII]*y_cur[IDX_eM] - - k[997]*y_cur[IDX_H2COII]*y_cur[IDX_eM] - - k[998]*y_cur[IDX_H2COII]*y_cur[IDX_eM] - - k[999]*y_cur[IDX_H2COII]*y_cur[IDX_eM] - - k[1457]*y_cur[IDX_C2I]*y_cur[IDX_H2COII] - - k[1744]*y_cur[IDX_C2HI]*y_cur[IDX_H2COII] + - k[1951]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + - k[1978]*y_cur[IDX_CH2II]*y_cur[IDX_CO2I] - - k[2002]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] + - k[2014]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] + - k[2090]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + - k[2093]*y_cur[IDX_CH3II]*y_cur[IDX_OHI] - - k[2193]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] - - k[2194]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + - k[2230]*y_cur[IDX_CH5II]*y_cur[IDX_HCOI] - - k[2246]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - - k[2487]*y_cur[IDX_H2COII]*y_cur[IDX_CH3OHI] - - k[2488]*y_cur[IDX_H2COII]*y_cur[IDX_H2COI] - - k[2489]*y_cur[IDX_H2COII]*y_cur[IDX_O2I] - - k[2490]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + - k[2514]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - - k[2542]*y_cur[IDX_H2OI]*y_cur[IDX_H2COII] + - k[2697]*y_cur[IDX_H3II]*y_cur[IDX_HCOI] + - k[2857]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] - - k[2874]*y_cur[IDX_HCNI]*y_cur[IDX_H2COII] + - k[2969]*y_cur[IDX_HCOII]*y_cur[IDX_HCOI] - - k[3007]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] + - k[3008]*y_cur[IDX_HCOI]*y_cur[IDX_HNOII] + - k[3009]*y_cur[IDX_HCOI]*y_cur[IDX_N2HII] + - k[3011]*y_cur[IDX_HCOI]*y_cur[IDX_O2HII] - - k[3038]*y_cur[IDX_HNCI]*y_cur[IDX_H2COII] + - k[3336]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3494]*y_cur[IDX_NHII]*y_cur[IDX_HCOI] + - k[3520]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] - - k[3535]*y_cur[IDX_NH2I]*y_cur[IDX_H2COII] - - k[3574]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - - k[3611]*y_cur[IDX_NHI]*y_cur[IDX_H2COII] + - k[3636]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + - k[3783]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - - k[3897]*y_cur[IDX_CM]*y_cur[IDX_H2COII] - - k[3932]*y_cur[IDX_C10M]*y_cur[IDX_H2COII] - - k[3967]*y_cur[IDX_C10HM]*y_cur[IDX_H2COII] - - k[4002]*y_cur[IDX_C2M]*y_cur[IDX_H2COII] - - k[4037]*y_cur[IDX_C2HM]*y_cur[IDX_H2COII] - - k[4072]*y_cur[IDX_C3M]*y_cur[IDX_H2COII] - - k[4107]*y_cur[IDX_C3HM]*y_cur[IDX_H2COII] - - k[4142]*y_cur[IDX_C3NM]*y_cur[IDX_H2COII] - - k[4177]*y_cur[IDX_C4M]*y_cur[IDX_H2COII] - - k[4212]*y_cur[IDX_C4HM]*y_cur[IDX_H2COII] - - k[4247]*y_cur[IDX_C5M]*y_cur[IDX_H2COII] - - k[4282]*y_cur[IDX_C5HM]*y_cur[IDX_H2COII] - - k[4317]*y_cur[IDX_C5NM]*y_cur[IDX_H2COII] - - k[4352]*y_cur[IDX_C6M]*y_cur[IDX_H2COII] - - k[4387]*y_cur[IDX_C6HM]*y_cur[IDX_H2COII] - - k[4422]*y_cur[IDX_C7M]*y_cur[IDX_H2COII] - - k[4457]*y_cur[IDX_C7HM]*y_cur[IDX_H2COII] - - k[4492]*y_cur[IDX_C8M]*y_cur[IDX_H2COII] - - k[4527]*y_cur[IDX_C8HM]*y_cur[IDX_H2COII] - - k[4562]*y_cur[IDX_C9M]*y_cur[IDX_H2COII] - - k[4597]*y_cur[IDX_C9HM]*y_cur[IDX_H2COII] - - k[4632]*y_cur[IDX_CHM]*y_cur[IDX_H2COII] - - k[4667]*y_cur[IDX_CNM]*y_cur[IDX_H2COII] - - k[4703]*y_cur[IDX_HM]*y_cur[IDX_H2COII] - - k[4738]*y_cur[IDX_OM]*y_cur[IDX_H2COII] - - k[4773]*y_cur[IDX_O2M]*y_cur[IDX_H2COII] - - k[4808]*y_cur[IDX_OHM]*y_cur[IDX_H2COII] - - k[4843]*y_cur[IDX_SM]*y_cur[IDX_H2COII] - - k[5616]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + k[6154]*y_cur[IDX_H2COI] - - k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - - k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - - k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - - k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2CSI] = 0.0 - - k[377]*y_cur[IDX_HII]*y_cur[IDX_H2CSI] + - k[1040]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] - - k[1392]*y_cur[IDX_CII]*y_cur[IDX_H2CSI] - - k[2683]*y_cur[IDX_H3II]*y_cur[IDX_H2CSI] - - k[2959]*y_cur[IDX_HCOII]*y_cur[IDX_H2CSI] - - k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - - k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - - k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + - k[3841]*y_cur[IDX_SI]*y_cur[IDX_SiCH2II] + - k[3851]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[5048]*y_cur[IDX_CH3I]*y_cur[IDX_SI] + - k[5617]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] - k[5837]*y_cur[IDX_H2CSI] - - k[6156]*y_cur[IDX_H2CSI] + - k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] - - k[6989]*y_cur[IDX_H2CSI] + k[7171]*y_cur[IDX_GH2CSI] + - k[7353]*y_cur[IDX_GH2CSI] + k[7535]*y_cur[IDX_GH2CSI] + - k[8627]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI]; - ydot[yistart + IDX_H2CSII] = 0.0 + - k[377]*y_cur[IDX_HII]*y_cur[IDX_H2CSI] - - k[1000]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] - - k[1001]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + - k[1674]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + - k[1992]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] + - k[2084]*y_cur[IDX_CH3II]*y_cur[IDX_HSI] + - k[2101]*y_cur[IDX_CH3I]*y_cur[IDX_SII] + - k[2702]*y_cur[IDX_H3II]*y_cur[IDX_HCSI] + - k[3825]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + - k[3844]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + - k[3848]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + - k[3854]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[5617]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] - - k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] - - k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2ClII] = 0.0 - - k[1002]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] - - k[1003]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + - k[2231]*y_cur[IDX_CH5II]*y_cur[IDX_HClI] - - k[2284]*y_cur[IDX_COI]*y_cur[IDX_H2ClII] + - k[2453]*y_cur[IDX_H2I]*y_cur[IDX_HClII] - - k[2543]*y_cur[IDX_H2OI]*y_cur[IDX_H2ClII] + - k[2704]*y_cur[IDX_H3II]*y_cur[IDX_HClI] - - k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] - - k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2FII] = 0.0 - - k[1004]*y_cur[IDX_H2FII]*y_cur[IDX_eM] - - k[1005]*y_cur[IDX_H2FII]*y_cur[IDX_eM] + - k[2454]*y_cur[IDX_H2I]*y_cur[IDX_HFII] + - k[2705]*y_cur[IDX_H3II]*y_cur[IDX_HFI] - - k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] - - k[6350]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2NCII] = 0.0 - - k[1006]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] - - k[1007]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] + - k[1418]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + - k[1911]*y_cur[IDX_CI]*y_cur[IDX_NH4II] + - k[1963]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - - k[2502]*y_cur[IDX_H2NCII]*y_cur[IDX_SiI] + - k[2535]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] + - k[3454]*y_cur[IDX_NI]*y_cur[IDX_CH3II] + - k[3509]*y_cur[IDX_NH2II]*y_cur[IDX_CNI] + - k[3563]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - - k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] - - k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2NCOII] = 0.0 - - k[1008]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] - - k[1009]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + - k[2707]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] + - k[3047]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] - - k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] - - k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2NOII] = 0.0 - - k[1010]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] - - k[1011]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] + - k[2709]*y_cur[IDX_H3II]*y_cur[IDX_HNOI] + - k[3524]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - - k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] - - k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2OI] = 0.0 - k[4]*y_cur[IDX_CM]*y_cur[IDX_H2OI] - + k[81]*y_cur[IDX_HM]*y_cur[IDX_OHI] + - k[83]*y_cur[IDX_H2I]*y_cur[IDX_OM] + - k[108]*y_cur[IDX_HI]*y_cur[IDX_OHM] - - k[136]*y_cur[IDX_H2I]*y_cur[IDX_H2OI] - - k[143]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + - k[263]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] + - k[291]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] - - k[378]*y_cur[IDX_HII]*y_cur[IDX_H2OI] - - k[447]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + - k[462]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] + - k[463]*y_cur[IDX_H2OII]*y_cur[IDX_C2H2I] + - k[464]*y_cur[IDX_H2OII]*y_cur[IDX_C2H4I] + - k[465]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] + - k[466]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + - k[467]*y_cur[IDX_H2OII]*y_cur[IDX_FeI] + - k[468]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] + - k[469]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + - k[470]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + - k[471]*y_cur[IDX_H2OII]*y_cur[IDX_MgI] + - k[472]*y_cur[IDX_H2OII]*y_cur[IDX_NOI] + - k[473]*y_cur[IDX_H2OII]*y_cur[IDX_NaI] + - k[474]*y_cur[IDX_H2OII]*y_cur[IDX_O2I] + - k[475]*y_cur[IDX_H2OII]*y_cur[IDX_OCSI] + - k[476]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + - k[477]*y_cur[IDX_H2OII]*y_cur[IDX_SiI] - - k[478]*y_cur[IDX_H2OI]*y_cur[IDX_COII] - - k[479]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - - k[480]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] - - k[481]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] - - k[482]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] - - k[518]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - - k[552]*y_cur[IDX_NII]*y_cur[IDX_H2OI] - - k[575]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + - k[588]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] + - k[605]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] - - k[656]*y_cur[IDX_OII]*y_cur[IDX_H2OI] - - k[689]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] + - k[774]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + - k[775]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + - k[918]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + - k[960]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + - k[963]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[964]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + - k[1015]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + - k[1035]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1041]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + - k[1291]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1293]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + - k[1295]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - - k[1393]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - - k[1394]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - - k[1951]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - - k[1952]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - - k[1953]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - - k[1982]*y_cur[IDX_CH2II]*y_cur[IDX_H2OI] + - k[2004]*y_cur[IDX_CH2I]*y_cur[IDX_H3OII] + - k[2125]*y_cur[IDX_CH3OHI]*y_cur[IDX_CH3OH2II] + - k[2130]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - - k[2142]*y_cur[IDX_CH4II]*y_cur[IDX_H2OI] - - k[2226]*y_cur[IDX_CH5II]*y_cur[IDX_H2OI] + - k[2249]*y_cur[IDX_CHI]*y_cur[IDX_H3OII] + - k[2330]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - - k[2367]*y_cur[IDX_HM]*y_cur[IDX_H2OI] - - k[2386]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + - k[2465]*y_cur[IDX_H2I]*y_cur[IDX_NO2II] + - k[2491]*y_cur[IDX_H2COI]*y_cur[IDX_C2H5OH2II] + - k[2494]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + - k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - - k[2509]*y_cur[IDX_H2OII]*y_cur[IDX_H2OI] - - k[2519]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] - - k[2520]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] - - k[2521]*y_cur[IDX_H2OI]*y_cur[IDX_C2HII] - - k[2522]*y_cur[IDX_H2OI]*y_cur[IDX_C2H2II] - - k[2523]*y_cur[IDX_H2OI]*y_cur[IDX_C2H3II] - - k[2524]*y_cur[IDX_H2OI]*y_cur[IDX_C2H5II] - - k[2525]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] - - k[2526]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] - - k[2527]*y_cur[IDX_H2OI]*y_cur[IDX_C2N2II] - - k[2528]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - - k[2529]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - - k[2530]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - - k[2531]*y_cur[IDX_H2OI]*y_cur[IDX_C3OII] - - k[2532]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] - - k[2533]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] - - k[2534]*y_cur[IDX_H2OI]*y_cur[IDX_C2H6II] - - k[2535]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2536]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2537]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2538]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2539]*y_cur[IDX_H2OI]*y_cur[IDX_CNCII] - - k[2540]*y_cur[IDX_H2OI]*y_cur[IDX_COII] - - k[2541]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - - k[2542]*y_cur[IDX_H2OI]*y_cur[IDX_H2COII] - - k[2543]*y_cur[IDX_H2OI]*y_cur[IDX_H2ClII] - - k[2544]*y_cur[IDX_H2OI]*y_cur[IDX_H2SII] - - k[2545]*y_cur[IDX_H2OI]*y_cur[IDX_H3COII] - - k[2546]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] - - k[2547]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] - - k[2548]*y_cur[IDX_H2OI]*y_cur[IDX_HCO2II] - - k[2549]*y_cur[IDX_H2OI]*y_cur[IDX_HCOOH2II] - - k[2550]*y_cur[IDX_H2OI]*y_cur[IDX_HNOII] - - k[2551]*y_cur[IDX_H2OI]*y_cur[IDX_HNSiII] - - k[2552]*y_cur[IDX_H2OI]*y_cur[IDX_HOCSII] - - k[2553]*y_cur[IDX_H2OI]*y_cur[IDX_HPOII] - - k[2554]*y_cur[IDX_H2OI]*y_cur[IDX_HSII] - - k[2555]*y_cur[IDX_H2OI]*y_cur[IDX_HSO2II] - - k[2556]*y_cur[IDX_H2OI]*y_cur[IDX_HSiSII] - - k[2557]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] - - k[2558]*y_cur[IDX_H2OI]*y_cur[IDX_N2HII] - - k[2559]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] - - k[2560]*y_cur[IDX_H2OI]*y_cur[IDX_NCCNHII] - - k[2561]*y_cur[IDX_H2OI]*y_cur[IDX_O2HII] - - k[2562]*y_cur[IDX_H2OI]*y_cur[IDX_PII] - - k[2563]*y_cur[IDX_H2OI]*y_cur[IDX_PII] - - k[2564]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - - k[2565]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - - k[2566]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - - k[2567]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] - - k[2568]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] - - k[2569]*y_cur[IDX_H2OI]*y_cur[IDX_SiII] - - k[2570]*y_cur[IDX_H2OI]*y_cur[IDX_SiCH3II] - - k[2571]*y_cur[IDX_H2OI]*y_cur[IDX_SiHII] - - k[2572]*y_cur[IDX_H2OI]*y_cur[IDX_SiH4II] - - k[2573]*y_cur[IDX_H2OI]*y_cur[IDX_SiH5II] + - k[2582]*y_cur[IDX_H2SI]*y_cur[IDX_SOII] + - k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2652]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - - k[2684]*y_cur[IDX_H3II]*y_cur[IDX_H2OI] + - k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] + - k[2766]*y_cur[IDX_H3OII]*y_cur[IDX_C2I] + - k[2767]*y_cur[IDX_H3OII]*y_cur[IDX_C2H3I] + - k[2768]*y_cur[IDX_H3OII]*y_cur[IDX_C2H5OHI] + - k[2769]*y_cur[IDX_H3OII]*y_cur[IDX_C2OI] + - k[2770]*y_cur[IDX_H3OII]*y_cur[IDX_C2SI] + - k[2771]*y_cur[IDX_H3OII]*y_cur[IDX_C3I] + - k[2772]*y_cur[IDX_H3OII]*y_cur[IDX_C3H2I] + - k[2773]*y_cur[IDX_H3OII]*y_cur[IDX_C3HI] + - k[2774]*y_cur[IDX_H3OII]*y_cur[IDX_C3NI] + - k[2775]*y_cur[IDX_H3OII]*y_cur[IDX_C3OI] + - k[2776]*y_cur[IDX_H3OII]*y_cur[IDX_C3PI] + - k[2777]*y_cur[IDX_H3OII]*y_cur[IDX_C3SI] + - k[2778]*y_cur[IDX_H3OII]*y_cur[IDX_C4I] + - k[2779]*y_cur[IDX_H3OII]*y_cur[IDX_C4H3I] + - k[2780]*y_cur[IDX_H3OII]*y_cur[IDX_C4HI] + - k[2781]*y_cur[IDX_H3OII]*y_cur[IDX_C4PI] + - k[2782]*y_cur[IDX_H3OII]*y_cur[IDX_C4SI] + - k[2783]*y_cur[IDX_H3OII]*y_cur[IDX_C6H6I] + - k[2784]*y_cur[IDX_H3OII]*y_cur[IDX_CCPI] + - k[2785]*y_cur[IDX_H3OII]*y_cur[IDX_CH2CCHI] + - k[2786]*y_cur[IDX_H3OII]*y_cur[IDX_CH2COI] + - k[2787]*y_cur[IDX_H3OII]*y_cur[IDX_CH2NHI] + - k[2788]*y_cur[IDX_H3OII]*y_cur[IDX_CH2PHI] + - k[2789]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CCHI] + - k[2790]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHCH2I] + - k[2791]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHOI] + - k[2792]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CNI] + - k[2793]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COCH3I] + - k[2794]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OCH3I] + - k[2795]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OHI] + - k[2796]*y_cur[IDX_H3OII]*y_cur[IDX_CPI] + - k[2797]*y_cur[IDX_H3OII]*y_cur[IDX_CSI] + - k[2798]*y_cur[IDX_H3OII]*y_cur[IDX_H2CCCI] + - k[2799]*y_cur[IDX_H3OII]*y_cur[IDX_H2COI] + - k[2800]*y_cur[IDX_H3OII]*y_cur[IDX_H2S2I] + - k[2801]*y_cur[IDX_H3OII]*y_cur[IDX_H2SI] + - k[2802]*y_cur[IDX_H3OII]*y_cur[IDX_H2SiOI] + - k[2803]*y_cur[IDX_H3OII]*y_cur[IDX_HC2PI] + - k[2804]*y_cur[IDX_H3OII]*y_cur[IDX_HC3NI] + - k[2805]*y_cur[IDX_H3OII]*y_cur[IDX_C4H2I] + - k[2806]*y_cur[IDX_H3OII]*y_cur[IDX_HCNI] + - k[2807]*y_cur[IDX_H3OII]*y_cur[IDX_HCOOCH3I] + - k[2808]*y_cur[IDX_H3OII]*y_cur[IDX_HCPI] + - k[2809]*y_cur[IDX_H3OII]*y_cur[IDX_HCSiI] + - k[2810]*y_cur[IDX_H3OII]*y_cur[IDX_HNCI] + - k[2811]*y_cur[IDX_H3OII]*y_cur[IDX_HNSiI] + - k[2812]*y_cur[IDX_H3OII]*y_cur[IDX_HPOI] + - k[2813]*y_cur[IDX_H3OII]*y_cur[IDX_HS2I] + - k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] + - k[2816]*y_cur[IDX_H3OII]*y_cur[IDX_PNI] + - k[2817]*y_cur[IDX_H3OII]*y_cur[IDX_S2I] + - k[2818]*y_cur[IDX_H3OII]*y_cur[IDX_SiI] + - k[2819]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2I] + - k[2820]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2HI] + - k[2821]*y_cur[IDX_H3OII]*y_cur[IDX_SiCI] + - k[2822]*y_cur[IDX_H3OII]*y_cur[IDX_SiCH3I] + - k[2823]*y_cur[IDX_H3OII]*y_cur[IDX_SiH2I] + - k[2824]*y_cur[IDX_H3OII]*y_cur[IDX_SiHI] + - k[2825]*y_cur[IDX_H3OII]*y_cur[IDX_SiNCI] + - k[2826]*y_cur[IDX_H3OII]*y_cur[IDX_SiOI] + - k[2873]*y_cur[IDX_HCNI]*y_cur[IDX_CH3OH2II] + - k[3028]*y_cur[IDX_HNC3I]*y_cur[IDX_H3OII] - - k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - - k[3226]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - - k[3489]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[3490]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[3491]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[3492]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[3512]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - - k[3513]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - - k[3514]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + - k[3538]*y_cur[IDX_NH2I]*y_cur[IDX_H3OII] - - k[3550]*y_cur[IDX_NH3II]*y_cur[IDX_H2OI] + - k[3578]*y_cur[IDX_NH3I]*y_cur[IDX_H3OII] + - k[3632]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + - k[3636]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + - k[3643]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + - k[3673]*y_cur[IDX_O2I]*y_cur[IDX_PH2II] - - k[3779]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] + - k[3795]*y_cur[IDX_OHM]*y_cur[IDX_HCNI] + - k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] + - k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] + - k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] + - k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] + - k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] + - k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] + - k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] + - k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] + - k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] + - k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] + - k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] + - k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] + - k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] + - k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] + - k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] + - k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] + - k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] + - k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] + - k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] + - k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] + - k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] + - k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] + - k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] + - k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] + - k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] + - k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] + - k[4811]*y_cur[IDX_OHM]*y_cur[IDX_H3OII] + - k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] + - k[5009]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + - k[5017]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - - k[5031]*y_cur[IDX_CH3I]*y_cur[IDX_H2OI] + - k[5038]*y_cur[IDX_CH3I]*y_cur[IDX_NOI] + - k[5040]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + - k[5047]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + - k[5061]*y_cur[IDX_CH4I]*y_cur[IDX_OHI] + - k[5148]*y_cur[IDX_H2I]*y_cur[IDX_OHI] - - k[5151]*y_cur[IDX_H2OI]*y_cur[IDX_FI] - - k[5152]*y_cur[IDX_H2OI]*y_cur[IDX_O2HI] + - k[5166]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - - k[5168]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + - k[5191]*y_cur[IDX_HI]*y_cur[IDX_O2HI] + - k[5298]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + - k[5300]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] - - k[5306]*y_cur[IDX_NHI]*y_cur[IDX_H2OI] + - k[5321]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - - k[5399]*y_cur[IDX_OI]*y_cur[IDX_H2OI] + - k[5453]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] + - k[5456]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] + - k[5457]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] + - k[5465]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] + - k[5467]*y_cur[IDX_OHI]*y_cur[IDX_H2O2I] + - k[5468]*y_cur[IDX_OHI]*y_cur[IDX_H2SI] + - k[5469]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] + - k[5471]*y_cur[IDX_OHI]*y_cur[IDX_HCOI] + - k[5472]*y_cur[IDX_OHI]*y_cur[IDX_HNOI] + - k[5476]*y_cur[IDX_OHI]*y_cur[IDX_NH3I] + - k[5478]*y_cur[IDX_OHI]*y_cur[IDX_O2HI] + - k[5479]*y_cur[IDX_OHI]*y_cur[IDX_OHI] - - k[5536]*y_cur[IDX_CH3II]*y_cur[IDX_H2OI] - - k[5566]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] + - k[5574]*y_cur[IDX_HI]*y_cur[IDX_OHI] + - k[5629]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OI] + - k[5635]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHI] + - k[5651]*y_cur[IDX_H3OII]*y_cur[IDX_COOCH3I] + - k[5657]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCOI] + - k[5663]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCHOI] + - k[5669]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COOHI] - - k[5839]*y_cur[IDX_H2OI] - k[6159]*y_cur[IDX_H2OI] - - k[6160]*y_cur[IDX_H2OI] - k[6161]*y_cur[IDX_H2OI] + - k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + - k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + - k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + - k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + - k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + - k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + - k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - - k[6902]*y_cur[IDX_H2OI] + k[7084]*y_cur[IDX_GH2OI] + - k[7266]*y_cur[IDX_GH2OI] + k[7448]*y_cur[IDX_GH2OI] + - k[8584]*y_cur[IDX_GHI]*y_cur[IDX_GOHI]; - ydot[yistart + IDX_H2OII] = 0.0 - - k[263]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] - - k[291]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] + - k[378]*y_cur[IDX_HII]*y_cur[IDX_H2OI] + - k[447]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] - - k[462]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] - - k[463]*y_cur[IDX_H2OII]*y_cur[IDX_C2H2I] - - k[464]*y_cur[IDX_H2OII]*y_cur[IDX_C2H4I] - - k[465]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] - - k[466]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - - k[467]*y_cur[IDX_H2OII]*y_cur[IDX_FeI] - - k[468]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] - - k[469]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - - k[470]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - - k[471]*y_cur[IDX_H2OII]*y_cur[IDX_MgI] - - k[472]*y_cur[IDX_H2OII]*y_cur[IDX_NOI] - - k[473]*y_cur[IDX_H2OII]*y_cur[IDX_NaI] - - k[474]*y_cur[IDX_H2OII]*y_cur[IDX_O2I] - - k[475]*y_cur[IDX_H2OII]*y_cur[IDX_OCSI] - - k[476]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - - k[477]*y_cur[IDX_H2OII]*y_cur[IDX_SiI] + - k[478]*y_cur[IDX_H2OI]*y_cur[IDX_COII] + - k[479]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] + - k[480]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] + - k[481]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] + - k[482]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] + - k[518]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + - k[552]*y_cur[IDX_NII]*y_cur[IDX_H2OI] + - k[575]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[588]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] - - k[605]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] + - k[656]*y_cur[IDX_OII]*y_cur[IDX_H2OI] + - k[689]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] - - k[1012]*y_cur[IDX_H2OII]*y_cur[IDX_eM] - - k[1013]*y_cur[IDX_H2OII]*y_cur[IDX_eM] - - k[1014]*y_cur[IDX_H2OII]*y_cur[IDX_eM] - - k[1899]*y_cur[IDX_CI]*y_cur[IDX_H2OII] - - k[2003]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] - - k[2195]*y_cur[IDX_CH4I]*y_cur[IDX_H2OII] - - k[2247]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] + - k[2351]*y_cur[IDX_HII]*y_cur[IDX_HOCNI] + - k[2352]*y_cur[IDX_HII]*y_cur[IDX_HONCI] + - k[2397]*y_cur[IDX_H2II]*y_cur[IDX_OHI] - - k[2442]*y_cur[IDX_H2I]*y_cur[IDX_H2OII] + - k[2469]*y_cur[IDX_H2I]*y_cur[IDX_OHII] - - k[2503]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] - - k[2504]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] - - k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - - k[2506]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - - k[2507]*y_cur[IDX_H2OII]*y_cur[IDX_COI] - - k[2508]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] - - k[2509]*y_cur[IDX_H2OII]*y_cur[IDX_H2OI] - - k[2510]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - - k[2511]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - - k[2512]*y_cur[IDX_H2OII]*y_cur[IDX_HCNI] - - k[2513]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - - k[2514]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - - k[2515]*y_cur[IDX_H2OII]*y_cur[IDX_HNCI] - - k[2516]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - - k[2517]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - - k[2518]*y_cur[IDX_H2OII]*y_cur[IDX_SO2I] + - k[2730]*y_cur[IDX_H3II]*y_cur[IDX_OI] + - k[2733]*y_cur[IDX_H3II]*y_cur[IDX_OHI] - - k[3457]*y_cur[IDX_NI]*y_cur[IDX_H2OII] - - k[3458]*y_cur[IDX_NI]*y_cur[IDX_H2OII] + - k[3504]*y_cur[IDX_NHII]*y_cur[IDX_OHI] - - k[3536]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] - - k[3575]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] - - k[3612]*y_cur[IDX_NHI]*y_cur[IDX_H2OII] - - k[3733]*y_cur[IDX_OI]*y_cur[IDX_H2OII] + - k[3782]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + - k[3788]*y_cur[IDX_OHII]*y_cur[IDX_OHI] + - k[3797]*y_cur[IDX_OHI]*y_cur[IDX_CH5II] - - k[3799]*y_cur[IDX_OHI]*y_cur[IDX_H2OII] + - k[3800]*y_cur[IDX_OHI]*y_cur[IDX_HCNII] + - k[3801]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + - k[3803]*y_cur[IDX_OHI]*y_cur[IDX_HNOII] + - k[3804]*y_cur[IDX_OHI]*y_cur[IDX_N2HII] + - k[3806]*y_cur[IDX_OHI]*y_cur[IDX_O2HII] - k[6157]*y_cur[IDX_H2OII] + - k[6159]*y_cur[IDX_H2OI] - k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] - - k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] - - k[6342]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2O2I] = 0.0 + - k[5146]*y_cur[IDX_H2I]*y_cur[IDX_O2HI] + - k[5150]*y_cur[IDX_H2COI]*y_cur[IDX_O2HI] + - k[5152]*y_cur[IDX_H2OI]*y_cur[IDX_O2HI] - - k[5166]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - - k[5167]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] + - k[5339]*y_cur[IDX_O2HI]*y_cur[IDX_O2HI] - - k[5398]*y_cur[IDX_OI]*y_cur[IDX_H2O2I] - - k[5467]*y_cur[IDX_OHI]*y_cur[IDX_H2O2I] - k[5838]*y_cur[IDX_H2O2I] - - k[6158]*y_cur[IDX_H2O2I] - k[6940]*y_cur[IDX_H2O2I] + - k[7122]*y_cur[IDX_GH2O2I] + k[7304]*y_cur[IDX_GH2O2I] + - k[7486]*y_cur[IDX_GH2O2I] + k[8606]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] - + k[8738]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI]; - ydot[yistart + IDX_H2OCNII] = 0.0 - - k[1015]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] - - k[1016]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + - k[2711]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] + - k[3051]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - - k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] - - k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2POII] = 0.0 - - k[1017]*y_cur[IDX_H2POII]*y_cur[IDX_eM] - - k[1018]*y_cur[IDX_H2POII]*y_cur[IDX_eM] + - k[2129]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] + - k[2564]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + - k[2567]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] + - k[2714]*y_cur[IDX_H3II]*y_cur[IDX_HPOI] + - k[2812]*y_cur[IDX_H3OII]*y_cur[IDX_HPOI] + - k[2975]*y_cur[IDX_HCOII]*y_cur[IDX_HPOI] + - k[3816]*y_cur[IDX_PHII]*y_cur[IDX_CH3OHI] - - k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] - - k[6623]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2SI] = 0.0 - - k[175]*y_cur[IDX_CII]*y_cur[IDX_H2SI] - - k[223]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - - k[233]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - - k[276]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - - k[281]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] - - k[309]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - - k[380]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - - k[448]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - - k[469]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + - k[483]*y_cur[IDX_H2SII]*y_cur[IDX_FeI] - - k[484]*y_cur[IDX_H2SI]*y_cur[IDX_CO2II] - - k[485]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] - - k[486]*y_cur[IDX_H2SI]*y_cur[IDX_OCSII] + - k[501]*y_cur[IDX_HCOI]*y_cur[IDX_H2SII] - - k[519]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + - k[532]*y_cur[IDX_MgI]*y_cur[IDX_H2SII] - - k[553]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - - k[567]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - - k[580]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + - k[606]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] + - k[625]*y_cur[IDX_NOI]*y_cur[IDX_H2SII] + - k[636]*y_cur[IDX_NaI]*y_cur[IDX_H2SII] - - k[657]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - - k[674]*y_cur[IDX_O2II]*y_cur[IDX_H2SI] - - k[690]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] - - k[701]*y_cur[IDX_PII]*y_cur[IDX_H2SI] + - k[709]*y_cur[IDX_SI]*y_cur[IDX_H2SII] + - k[719]*y_cur[IDX_SiI]*y_cur[IDX_H2SII] + - k[1045]*y_cur[IDX_H3SII]*y_cur[IDX_eM] - - k[1395]*y_cur[IDX_CII]*y_cur[IDX_H2SI] - - k[1518]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - - k[1519]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - - k[1619]*y_cur[IDX_C2H3II]*y_cur[IDX_H2SI] - - k[1674]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - - k[1675]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - - k[1721]*y_cur[IDX_C2H5II]*y_cur[IDX_H2SI] - - k[1954]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] - - k[1955]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] - - k[1983]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - - k[1984]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - - k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - - k[2078]*y_cur[IDX_CH3II]*y_cur[IDX_H2SI] - - k[2111]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - - k[2143]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] - - k[2227]*y_cur[IDX_CH5II]*y_cur[IDX_H2SI] - - k[2281]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - - k[2339]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - - k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - - k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - - k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + - k[2496]*y_cur[IDX_H2COI]*y_cur[IDX_H3SII] - - k[2510]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - - k[2511]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + - k[2556]*y_cur[IDX_H2OI]*y_cur[IDX_HSiSII] - - k[2574]*y_cur[IDX_H2SII]*y_cur[IDX_H2SI] - - k[2575]*y_cur[IDX_H2SI]*y_cur[IDX_C2NII] - - k[2576]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - - k[2577]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - - k[2578]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - - k[2579]*y_cur[IDX_H2SI]*y_cur[IDX_HS2II] - - k[2580]*y_cur[IDX_H2SI]*y_cur[IDX_HSiSII] - - k[2581]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] - - k[2582]*y_cur[IDX_H2SI]*y_cur[IDX_SOII] - - k[2686]*y_cur[IDX_H3II]*y_cur[IDX_H2SI] - - k[2763]*y_cur[IDX_H3COII]*y_cur[IDX_H2SI] - - k[2801]*y_cur[IDX_H3OII]*y_cur[IDX_H2SI] + - k[2876]*y_cur[IDX_HCNI]*y_cur[IDX_H3SII] - - k[2892]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] - - k[2893]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] - - k[2961]*y_cur[IDX_HCOII]*y_cur[IDX_H2SI] + - k[3040]*y_cur[IDX_HNCI]*y_cur[IDX_H3SII] - - k[3054]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] - - k[3055]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] - - k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - - k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - - k[3347]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - - k[3348]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - - k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - - k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - - k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - - k[3515]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3516]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3517]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3518]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3551]*y_cur[IDX_NH3II]*y_cur[IDX_H2SI] + - k[3579]*y_cur[IDX_NH3I]*y_cur[IDX_H3SII] - - k[3642]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - - k[3643]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - - k[3780]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] - - k[3817]*y_cur[IDX_PHII]*y_cur[IDX_H2SI] - - k[3819]*y_cur[IDX_PH3II]*y_cur[IDX_H2SI] - - k[3828]*y_cur[IDX_SII]*y_cur[IDX_H2SI] - - k[3829]*y_cur[IDX_SII]*y_cur[IDX_H2SI] + - k[3898]*y_cur[IDX_CM]*y_cur[IDX_H2SII] + - k[3933]*y_cur[IDX_C10M]*y_cur[IDX_H2SII] + - k[3968]*y_cur[IDX_C10HM]*y_cur[IDX_H2SII] + - k[4003]*y_cur[IDX_C2M]*y_cur[IDX_H2SII] + - k[4038]*y_cur[IDX_C2HM]*y_cur[IDX_H2SII] + - k[4073]*y_cur[IDX_C3M]*y_cur[IDX_H2SII] + - k[4108]*y_cur[IDX_C3HM]*y_cur[IDX_H2SII] + - k[4143]*y_cur[IDX_C3NM]*y_cur[IDX_H2SII] + - k[4178]*y_cur[IDX_C4M]*y_cur[IDX_H2SII] + - k[4213]*y_cur[IDX_C4HM]*y_cur[IDX_H2SII] + - k[4248]*y_cur[IDX_C5M]*y_cur[IDX_H2SII] + - k[4283]*y_cur[IDX_C5HM]*y_cur[IDX_H2SII] + - k[4318]*y_cur[IDX_C5NM]*y_cur[IDX_H2SII] + - k[4353]*y_cur[IDX_C6M]*y_cur[IDX_H2SII] + - k[4388]*y_cur[IDX_C6HM]*y_cur[IDX_H2SII] + - k[4423]*y_cur[IDX_C7M]*y_cur[IDX_H2SII] + - k[4458]*y_cur[IDX_C7HM]*y_cur[IDX_H2SII] + - k[4493]*y_cur[IDX_C8M]*y_cur[IDX_H2SII] + - k[4528]*y_cur[IDX_C8HM]*y_cur[IDX_H2SII] + - k[4563]*y_cur[IDX_C9M]*y_cur[IDX_H2SII] + - k[4598]*y_cur[IDX_C9HM]*y_cur[IDX_H2SII] + - k[4633]*y_cur[IDX_CHM]*y_cur[IDX_H2SII] + - k[4668]*y_cur[IDX_CNM]*y_cur[IDX_H2SII] + - k[4704]*y_cur[IDX_HM]*y_cur[IDX_H2SII] + - k[4739]*y_cur[IDX_OM]*y_cur[IDX_H2SII] + - k[4774]*y_cur[IDX_O2M]*y_cur[IDX_H2SII] + - k[4809]*y_cur[IDX_OHM]*y_cur[IDX_H2SII] + - k[4844]*y_cur[IDX_SM]*y_cur[IDX_H2SII] - - k[5032]*y_cur[IDX_CH3I]*y_cur[IDX_H2SI] + - k[5140]*y_cur[IDX_H2I]*y_cur[IDX_HSI] - - k[5169]*y_cur[IDX_HI]*y_cur[IDX_H2SI] + - k[5219]*y_cur[IDX_HSI]*y_cur[IDX_HSI] - - k[5400]*y_cur[IDX_OI]*y_cur[IDX_H2SI] - - k[5468]*y_cur[IDX_OHI]*y_cur[IDX_H2SI] + - k[5618]*y_cur[IDX_H2SII]*y_cur[IDX_eM] - k[5841]*y_cur[IDX_H2SI] - - k[5842]*y_cur[IDX_H2SI] - k[6163]*y_cur[IDX_H2SI] - - k[6164]*y_cur[IDX_H2SI] - k[6165]*y_cur[IDX_H2SI] + - k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - k[6941]*y_cur[IDX_H2SI] - + k[7123]*y_cur[IDX_GH2SI] + k[7305]*y_cur[IDX_GH2SI] + - k[7487]*y_cur[IDX_GH2SI] + k[8608]*y_cur[IDX_GHI]*y_cur[IDX_GHSI]; - ydot[yistart + IDX_H2SII] = 0.0 + - k[175]*y_cur[IDX_CII]*y_cur[IDX_H2SI] + - k[223]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + - k[233]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + - k[276]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] + - k[281]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] + - k[309]*y_cur[IDX_COII]*y_cur[IDX_H2SI] + - k[380]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + - k[448]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + - k[469]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - - k[483]*y_cur[IDX_H2SII]*y_cur[IDX_FeI] + - k[484]*y_cur[IDX_H2SI]*y_cur[IDX_CO2II] + - k[485]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] + - k[486]*y_cur[IDX_H2SI]*y_cur[IDX_OCSII] - - k[501]*y_cur[IDX_HCOI]*y_cur[IDX_H2SII] + - k[519]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - - k[532]*y_cur[IDX_MgI]*y_cur[IDX_H2SII] + - k[553]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + - k[567]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + - k[580]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[606]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] - - k[625]*y_cur[IDX_NOI]*y_cur[IDX_H2SII] - - k[636]*y_cur[IDX_NaI]*y_cur[IDX_H2SII] + - k[657]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + - k[674]*y_cur[IDX_O2II]*y_cur[IDX_H2SI] + - k[690]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] + - k[701]*y_cur[IDX_PII]*y_cur[IDX_H2SI] - - k[709]*y_cur[IDX_SI]*y_cur[IDX_H2SII] - - k[719]*y_cur[IDX_SiI]*y_cur[IDX_H2SII] - - k[1019]*y_cur[IDX_H2SII]*y_cur[IDX_eM] - - k[1020]*y_cur[IDX_H2SII]*y_cur[IDX_eM] - - k[1900]*y_cur[IDX_CI]*y_cur[IDX_H2SII] - - k[2443]*y_cur[IDX_H2I]*y_cur[IDX_H2SII] + - k[2456]*y_cur[IDX_H2I]*y_cur[IDX_HSII] + - k[2500]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - - k[2544]*y_cur[IDX_H2OI]*y_cur[IDX_H2SII] - - k[2574]*y_cur[IDX_H2SII]*y_cur[IDX_H2SI] + - k[2716]*y_cur[IDX_H3II]*y_cur[IDX_HSI] - - k[2842]*y_cur[IDX_HI]*y_cur[IDX_H2SII] + - k[2843]*y_cur[IDX_HI]*y_cur[IDX_H3SII] + - k[2977]*y_cur[IDX_HCOII]*y_cur[IDX_HSI] - - k[3459]*y_cur[IDX_NI]*y_cur[IDX_H2SII] - - k[3576]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] - - k[3734]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - - k[3735]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - - k[3898]*y_cur[IDX_CM]*y_cur[IDX_H2SII] - - k[3933]*y_cur[IDX_C10M]*y_cur[IDX_H2SII] - - k[3968]*y_cur[IDX_C10HM]*y_cur[IDX_H2SII] - - k[4003]*y_cur[IDX_C2M]*y_cur[IDX_H2SII] - - k[4038]*y_cur[IDX_C2HM]*y_cur[IDX_H2SII] - - k[4073]*y_cur[IDX_C3M]*y_cur[IDX_H2SII] - - k[4108]*y_cur[IDX_C3HM]*y_cur[IDX_H2SII] - - k[4143]*y_cur[IDX_C3NM]*y_cur[IDX_H2SII] - - k[4178]*y_cur[IDX_C4M]*y_cur[IDX_H2SII] - - k[4213]*y_cur[IDX_C4HM]*y_cur[IDX_H2SII] - - k[4248]*y_cur[IDX_C5M]*y_cur[IDX_H2SII] - - k[4283]*y_cur[IDX_C5HM]*y_cur[IDX_H2SII] - - k[4318]*y_cur[IDX_C5NM]*y_cur[IDX_H2SII] - - k[4353]*y_cur[IDX_C6M]*y_cur[IDX_H2SII] - - k[4388]*y_cur[IDX_C6HM]*y_cur[IDX_H2SII] - - k[4423]*y_cur[IDX_C7M]*y_cur[IDX_H2SII] - - k[4458]*y_cur[IDX_C7HM]*y_cur[IDX_H2SII] - - k[4493]*y_cur[IDX_C8M]*y_cur[IDX_H2SII] - - k[4528]*y_cur[IDX_C8HM]*y_cur[IDX_H2SII] - - k[4563]*y_cur[IDX_C9M]*y_cur[IDX_H2SII] - - k[4598]*y_cur[IDX_C9HM]*y_cur[IDX_H2SII] - - k[4633]*y_cur[IDX_CHM]*y_cur[IDX_H2SII] - - k[4668]*y_cur[IDX_CNM]*y_cur[IDX_H2SII] - - k[4704]*y_cur[IDX_HM]*y_cur[IDX_H2SII] - - k[4739]*y_cur[IDX_OM]*y_cur[IDX_H2SII] - - k[4774]*y_cur[IDX_O2M]*y_cur[IDX_H2SII] - - k[4809]*y_cur[IDX_OHM]*y_cur[IDX_H2SII] - - k[4844]*y_cur[IDX_SM]*y_cur[IDX_H2SII] + - k[5561]*y_cur[IDX_H2I]*y_cur[IDX_SII] - - k[5618]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + k[5841]*y_cur[IDX_H2SI] + - k[6163]*y_cur[IDX_H2SI] - k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] - - k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2S2I] = 0.0 - - k[379]*y_cur[IDX_HII]*y_cur[IDX_H2S2I] + - k[1049]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] - - k[2685]*y_cur[IDX_H3II]*y_cur[IDX_H2S2I] - - k[2800]*y_cur[IDX_H3OII]*y_cur[IDX_H2S2I] - - k[2960]*y_cur[IDX_HCOII]*y_cur[IDX_H2S2I] - - k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] - - k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] - k[5840]*y_cur[IDX_H2S2I] - - k[6162]*y_cur[IDX_H2S2I] + - k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - - k[7038]*y_cur[IDX_H2S2I] + k[7220]*y_cur[IDX_GH2S2I] + - k[7402]*y_cur[IDX_GH2S2I] + k[7584]*y_cur[IDX_GH2S2I]; - ydot[yistart + IDX_H2S2II] = 0.0 + - k[379]*y_cur[IDX_HII]*y_cur[IDX_H2S2I] - - k[1021]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] - - k[1022]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + - k[2112]*y_cur[IDX_C2H6I]*y_cur[IDX_S2II] + - k[2132]*y_cur[IDX_CH3OHI]*y_cur[IDX_S2II] + - k[2715]*y_cur[IDX_H3II]*y_cur[IDX_HS2I] + - k[2813]*y_cur[IDX_H3OII]*y_cur[IDX_HS2I] + - k[2976]*y_cur[IDX_HCOII]*y_cur[IDX_HS2I] + - k[3839]*y_cur[IDX_SI]*y_cur[IDX_H3SII] - - k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] - - k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H2SiOI] = 0.0 - - k[176]*y_cur[IDX_CII]*y_cur[IDX_H2SiOI] - - k[381]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] + - k[1051]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] - - k[2341]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] - - k[2687]*y_cur[IDX_H3II]*y_cur[IDX_H2SiOI] - - k[2802]*y_cur[IDX_H3OII]*y_cur[IDX_H2SiOI] - - k[2962]*y_cur[IDX_HCOII]*y_cur[IDX_H2SiOI] - - k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] + - k[5447]*y_cur[IDX_OI]*y_cur[IDX_SiH3I] - k[5843]*y_cur[IDX_H2SiOI] - - k[6166]*y_cur[IDX_H2SiOI] - k[6167]*y_cur[IDX_H2SiOI] + - k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] - - k[6988]*y_cur[IDX_H2SiOI] + k[7170]*y_cur[IDX_GH2SiOI] + - k[7352]*y_cur[IDX_GH2SiOI] + k[7534]*y_cur[IDX_GH2SiOI]; - ydot[yistart + IDX_H2SiOII] = 0.0 + - k[176]*y_cur[IDX_CII]*y_cur[IDX_H2SiOI] + - k[381]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] - - k[1023]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] - - k[1024]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] + - k[3758]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - - k[6585]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] - - k[6586]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3II] = 0.0 - - k[1025]*y_cur[IDX_H3II]*y_cur[IDX_eM] - - k[1026]*y_cur[IDX_H3II]*y_cur[IDX_eM] + - k[2384]*y_cur[IDX_H2II]*y_cur[IDX_H2I] + - k[2389]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + - k[2458]*y_cur[IDX_H2I]*y_cur[IDX_HeHII] + - k[2461]*y_cur[IDX_H2I]*y_cur[IDX_NHII] + - k[2468]*y_cur[IDX_H2I]*y_cur[IDX_O2HII] - - k[2583]*y_cur[IDX_H3II]*y_cur[IDX_C10I] - - k[2584]*y_cur[IDX_H3II]*y_cur[IDX_C10H2I] - - k[2585]*y_cur[IDX_H3II]*y_cur[IDX_C10HI] - - k[2586]*y_cur[IDX_H3II]*y_cur[IDX_C2I] - - k[2587]*y_cur[IDX_H3II]*y_cur[IDX_C2H2I] - - k[2588]*y_cur[IDX_H3II]*y_cur[IDX_C2H3I] - - k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] - - k[2590]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] - - k[2591]*y_cur[IDX_H3II]*y_cur[IDX_C2H5I] - - k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - - k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - - k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - - k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - - k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - - k[2597]*y_cur[IDX_H3II]*y_cur[IDX_C2HI] - - k[2598]*y_cur[IDX_H3II]*y_cur[IDX_C2NI] - - k[2599]*y_cur[IDX_H3II]*y_cur[IDX_C2OI] - - k[2600]*y_cur[IDX_H3II]*y_cur[IDX_C2SI] - - k[2601]*y_cur[IDX_H3II]*y_cur[IDX_C3I] - - k[2602]*y_cur[IDX_H3II]*y_cur[IDX_C3H2I] - - k[2603]*y_cur[IDX_H3II]*y_cur[IDX_C3HI] - - k[2604]*y_cur[IDX_H3II]*y_cur[IDX_C3NI] - - k[2605]*y_cur[IDX_H3II]*y_cur[IDX_C3OI] - - k[2606]*y_cur[IDX_H3II]*y_cur[IDX_C3PI] - - k[2607]*y_cur[IDX_H3II]*y_cur[IDX_C3SI] - - k[2608]*y_cur[IDX_H3II]*y_cur[IDX_C4I] - - k[2609]*y_cur[IDX_H3II]*y_cur[IDX_C4H3I] - - k[2610]*y_cur[IDX_H3II]*y_cur[IDX_C4HI] - - k[2611]*y_cur[IDX_H3II]*y_cur[IDX_C4PI] - - k[2612]*y_cur[IDX_H3II]*y_cur[IDX_C4SI] - - k[2613]*y_cur[IDX_H3II]*y_cur[IDX_C5I] - - k[2614]*y_cur[IDX_H3II]*y_cur[IDX_C5H2I] - - k[2615]*y_cur[IDX_H3II]*y_cur[IDX_C5HI] - - k[2616]*y_cur[IDX_H3II]*y_cur[IDX_C5NI] - - k[2617]*y_cur[IDX_H3II]*y_cur[IDX_C6I] - - k[2618]*y_cur[IDX_H3II]*y_cur[IDX_C6H2I] - - k[2619]*y_cur[IDX_H3II]*y_cur[IDX_C6H6I] - - k[2620]*y_cur[IDX_H3II]*y_cur[IDX_C6HI] - - k[2621]*y_cur[IDX_H3II]*y_cur[IDX_C7I] - - k[2622]*y_cur[IDX_H3II]*y_cur[IDX_C7H2I] - - k[2623]*y_cur[IDX_H3II]*y_cur[IDX_C7HI] - - k[2624]*y_cur[IDX_H3II]*y_cur[IDX_C7NI] - - k[2625]*y_cur[IDX_H3II]*y_cur[IDX_C8I] - - k[2626]*y_cur[IDX_H3II]*y_cur[IDX_C8H2I] - - k[2627]*y_cur[IDX_H3II]*y_cur[IDX_C8HI] - - k[2628]*y_cur[IDX_H3II]*y_cur[IDX_C9I] - - k[2629]*y_cur[IDX_H3II]*y_cur[IDX_C9H2I] - - k[2630]*y_cur[IDX_H3II]*y_cur[IDX_C9HI] - - k[2631]*y_cur[IDX_H3II]*y_cur[IDX_C9NI] - - k[2632]*y_cur[IDX_H3II]*y_cur[IDX_CI] - - k[2633]*y_cur[IDX_H3II]*y_cur[IDX_CCPI] - - k[2634]*y_cur[IDX_H3II]*y_cur[IDX_CH2I] - - k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] - - k[2636]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCHI] - - k[2637]*y_cur[IDX_H3II]*y_cur[IDX_CH2CHCNI] - - k[2638]*y_cur[IDX_H3II]*y_cur[IDX_CH2CNI] - - k[2639]*y_cur[IDX_H3II]*y_cur[IDX_CH2COI] - - k[2640]*y_cur[IDX_H3II]*y_cur[IDX_CH2PHI] - - k[2641]*y_cur[IDX_H3II]*y_cur[IDX_CH3I] - - k[2642]*y_cur[IDX_H3II]*y_cur[IDX_CH3C3NI] - - k[2643]*y_cur[IDX_H3II]*y_cur[IDX_CH3C4HI] - - k[2644]*y_cur[IDX_H3II]*y_cur[IDX_CH3C5NI] - - k[2645]*y_cur[IDX_H3II]*y_cur[IDX_CH3C6HI] - - k[2646]*y_cur[IDX_H3II]*y_cur[IDX_CH3C7NI] - - k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] - - k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] - - k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] - - k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] - - k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2652]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2653]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2654]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2656]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2657]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - - k[2658]*y_cur[IDX_H3II]*y_cur[IDX_CH3CNI] - - k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2661]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2663]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2665]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - - k[2666]*y_cur[IDX_H3II]*y_cur[IDX_CH3OCH3I] - - k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - - k[2668]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - - k[2669]*y_cur[IDX_H3II]*y_cur[IDX_CH4I] - - k[2670]*y_cur[IDX_H3II]*y_cur[IDX_CHI] - - k[2671]*y_cur[IDX_H3II]*y_cur[IDX_CNI] - - k[2672]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - - k[2673]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - - k[2674]*y_cur[IDX_H3II]*y_cur[IDX_CO2I] - - k[2675]*y_cur[IDX_H3II]*y_cur[IDX_COI] - - k[2676]*y_cur[IDX_H3II]*y_cur[IDX_COI] - - k[2677]*y_cur[IDX_H3II]*y_cur[IDX_CPI] - - k[2678]*y_cur[IDX_H3II]*y_cur[IDX_CSI] - - k[2679]*y_cur[IDX_H3II]*y_cur[IDX_ClI] - - k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] - - k[2681]*y_cur[IDX_H3II]*y_cur[IDX_H2CCCI] - - k[2682]*y_cur[IDX_H3II]*y_cur[IDX_H2COI] - - k[2683]*y_cur[IDX_H3II]*y_cur[IDX_H2CSI] - - k[2684]*y_cur[IDX_H3II]*y_cur[IDX_H2OI] - - k[2685]*y_cur[IDX_H3II]*y_cur[IDX_H2S2I] - - k[2686]*y_cur[IDX_H3II]*y_cur[IDX_H2SI] - - k[2687]*y_cur[IDX_H3II]*y_cur[IDX_H2SiOI] - - k[2688]*y_cur[IDX_H3II]*y_cur[IDX_HC2PI] - - k[2689]*y_cur[IDX_H3II]*y_cur[IDX_HC3NI] - - k[2690]*y_cur[IDX_H3II]*y_cur[IDX_C4H2I] - - k[2691]*y_cur[IDX_H3II]*y_cur[IDX_HC5NI] - - k[2692]*y_cur[IDX_H3II]*y_cur[IDX_HC7NI] - - k[2693]*y_cur[IDX_H3II]*y_cur[IDX_HC9NI] - - k[2694]*y_cur[IDX_H3II]*y_cur[IDX_HCNI] - - k[2695]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] - - k[2696]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] - - k[2697]*y_cur[IDX_H3II]*y_cur[IDX_HCOI] - - k[2698]*y_cur[IDX_H3II]*y_cur[IDX_HCOOCH3I] - - k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - - k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - - k[2701]*y_cur[IDX_H3II]*y_cur[IDX_HCPI] - - k[2702]*y_cur[IDX_H3II]*y_cur[IDX_HCSI] - - k[2703]*y_cur[IDX_H3II]*y_cur[IDX_HCSiI] - - k[2704]*y_cur[IDX_H3II]*y_cur[IDX_HClI] - - k[2705]*y_cur[IDX_H3II]*y_cur[IDX_HFI] - - k[2706]*y_cur[IDX_H3II]*y_cur[IDX_HNCI] - - k[2707]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] - - k[2708]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] - - k[2709]*y_cur[IDX_H3II]*y_cur[IDX_HNOI] - - k[2710]*y_cur[IDX_H3II]*y_cur[IDX_HNSiI] - - k[2711]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] - - k[2712]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] - - k[2713]*y_cur[IDX_H3II]*y_cur[IDX_HONCI] - - k[2714]*y_cur[IDX_H3II]*y_cur[IDX_HPOI] - - k[2715]*y_cur[IDX_H3II]*y_cur[IDX_HS2I] - - k[2716]*y_cur[IDX_H3II]*y_cur[IDX_HSI] - - k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] - - k[2718]*y_cur[IDX_H3II]*y_cur[IDX_N2I] - - k[2719]*y_cur[IDX_H3II]*y_cur[IDX_N2OI] - - k[2720]*y_cur[IDX_H3II]*y_cur[IDX_NCCNI] - - k[2721]*y_cur[IDX_H3II]*y_cur[IDX_NH2I] - - k[2722]*y_cur[IDX_H3II]*y_cur[IDX_NH2CNI] - - k[2723]*y_cur[IDX_H3II]*y_cur[IDX_NH3I] - - k[2724]*y_cur[IDX_H3II]*y_cur[IDX_NHI] - - k[2725]*y_cur[IDX_H3II]*y_cur[IDX_NO2I] - - k[2726]*y_cur[IDX_H3II]*y_cur[IDX_NOI] - - k[2727]*y_cur[IDX_H3II]*y_cur[IDX_NSI] - - k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] - - k[2729]*y_cur[IDX_H3II]*y_cur[IDX_O2I] - - k[2730]*y_cur[IDX_H3II]*y_cur[IDX_OI] - - k[2731]*y_cur[IDX_H3II]*y_cur[IDX_OI] - - k[2732]*y_cur[IDX_H3II]*y_cur[IDX_OCSI] - - k[2733]*y_cur[IDX_H3II]*y_cur[IDX_OHI] - - k[2734]*y_cur[IDX_H3II]*y_cur[IDX_PI] - - k[2735]*y_cur[IDX_H3II]*y_cur[IDX_PH2I] - - k[2736]*y_cur[IDX_H3II]*y_cur[IDX_PHI] - - k[2737]*y_cur[IDX_H3II]*y_cur[IDX_PNI] - - k[2738]*y_cur[IDX_H3II]*y_cur[IDX_POI] - - k[2739]*y_cur[IDX_H3II]*y_cur[IDX_S2I] - - k[2740]*y_cur[IDX_H3II]*y_cur[IDX_SI] - - k[2741]*y_cur[IDX_H3II]*y_cur[IDX_SO2I] - - k[2742]*y_cur[IDX_H3II]*y_cur[IDX_SOI] - - k[2743]*y_cur[IDX_H3II]*y_cur[IDX_SiI] - - k[2744]*y_cur[IDX_H3II]*y_cur[IDX_SiC2I] - - k[2745]*y_cur[IDX_H3II]*y_cur[IDX_SiC2H2I] - - k[2746]*y_cur[IDX_H3II]*y_cur[IDX_SiC2HI] - - k[2747]*y_cur[IDX_H3II]*y_cur[IDX_SiC3I] - - k[2748]*y_cur[IDX_H3II]*y_cur[IDX_SiC3HI] - - k[2749]*y_cur[IDX_H3II]*y_cur[IDX_SiC4I] - - k[2750]*y_cur[IDX_H3II]*y_cur[IDX_SiCI] - - k[2751]*y_cur[IDX_H3II]*y_cur[IDX_SiCH2I] - - k[2752]*y_cur[IDX_H3II]*y_cur[IDX_SiCH3I] - - k[2753]*y_cur[IDX_H3II]*y_cur[IDX_SiH2I] - - k[2754]*y_cur[IDX_H3II]*y_cur[IDX_SiH3I] - - k[2755]*y_cur[IDX_H3II]*y_cur[IDX_SiH4I] - - k[2756]*y_cur[IDX_H3II]*y_cur[IDX_SiHI] - - k[2757]*y_cur[IDX_H3II]*y_cur[IDX_SiNI] - - k[2758]*y_cur[IDX_H3II]*y_cur[IDX_SiNCI] - - k[2759]*y_cur[IDX_H3II]*y_cur[IDX_SiO2I] - - k[2760]*y_cur[IDX_H3II]*y_cur[IDX_SiOI] - - k[2761]*y_cur[IDX_H3II]*y_cur[IDX_SiSI] - - k[3027]*y_cur[IDX_HNC3I]*y_cur[IDX_H3II] - - k[3767]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - - k[3768]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - - k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] - - k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] - - k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] - - k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] - - k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] - - k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] - - k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] - - k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] - - k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] - - k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] - - k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] - - k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] - - k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] - - k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] - - k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] - - k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] - - k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] - - k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] - - k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] - - k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] - - k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] - - k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] - - k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] - - k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] - - k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] - - k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] - - k[4810]*y_cur[IDX_OHM]*y_cur[IDX_H3II] - - k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] - - k[5628]*y_cur[IDX_H3II]*y_cur[IDX_CH3OI] - - k[5634]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHI] - - k[5640]*y_cur[IDX_H3II]*y_cur[IDX_CH3COI] - - k[5645]*y_cur[IDX_H3II]*y_cur[IDX_COOHI] - - k[5650]*y_cur[IDX_H3II]*y_cur[IDX_COOCH3I] - - k[5656]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCOI] - - k[5662]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCHOI] - - k[5668]*y_cur[IDX_H3II]*y_cur[IDX_CH3COOHI] - - k[6168]*y_cur[IDX_H3II] - k[6169]*y_cur[IDX_H3II] - - k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] - - k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3C3OII] = 0.0 - - k[1027]*y_cur[IDX_H3C3OII]*y_cur[IDX_eM] + - k[5513]*y_cur[IDX_C2H3II]*y_cur[IDX_COI] - - k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3C5NII] = 0.0 - - k[1028]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] - - k[1029]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + - k[1895]*y_cur[IDX_CI]*y_cur[IDX_CH3C3NHII] + - k[3417]*y_cur[IDX_NI]*y_cur[IDX_C5H5II] + - k[3455]*y_cur[IDX_NI]*y_cur[IDX_CH3C4HII] + - k[5508]*y_cur[IDX_C2H2II]*y_cur[IDX_HC3NI] - - k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] - - k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3C7NII] = 0.0 - - k[1030]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] - - k[1031]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + - k[1896]*y_cur[IDX_CI]*y_cur[IDX_CH3C5NHII] + - k[3434]*y_cur[IDX_NI]*y_cur[IDX_C7H4II] + - k[3435]*y_cur[IDX_NI]*y_cur[IDX_C7H5II] + - k[5509]*y_cur[IDX_C2H2II]*y_cur[IDX_HC5NI] + - k[5517]*y_cur[IDX_C4H2II]*y_cur[IDX_HC3NI] - - k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] - - k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3C9NII] = 0.0 - - k[1032]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] - - k[1033]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + - k[1897]*y_cur[IDX_CI]*y_cur[IDX_CH3C7NHII] + - k[3451]*y_cur[IDX_NI]*y_cur[IDX_C9H4II] + - k[5510]*y_cur[IDX_C2H2II]*y_cur[IDX_HC7NI] + - k[5519]*y_cur[IDX_C4H2II]*y_cur[IDX_HC5NI] - - k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - - k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3COII] = 0.0 - - k[1034]*y_cur[IDX_H3COII]*y_cur[IDX_eM] - - k[1035]*y_cur[IDX_H3COII]*y_cur[IDX_eM] - - k[1036]*y_cur[IDX_H3COII]*y_cur[IDX_eM] - - k[1037]*y_cur[IDX_H3COII]*y_cur[IDX_eM] - - k[1038]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1307]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] + - k[1381]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] + - k[1469]*y_cur[IDX_C2HII]*y_cur[IDX_H2COI] + - k[1720]*y_cur[IDX_C2H5II]*y_cur[IDX_H2COI] + - k[1939]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] + - k[1949]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + - k[1982]*y_cur[IDX_CH2II]*y_cur[IDX_H2OI] + - k[2067]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + - k[2073]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] + - k[2089]*y_cur[IDX_CH3II]*y_cur[IDX_O2I] + - k[2122]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] + - k[2141]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] + - k[2194]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + - k[2225]*y_cur[IDX_CH5II]*y_cur[IDX_H2COI] - - k[2248]*y_cur[IDX_CHI]*y_cur[IDX_H3COII] + - k[2331]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + - k[2488]*y_cur[IDX_H2COII]*y_cur[IDX_H2COI] + - k[2496]*y_cur[IDX_H2COI]*y_cur[IDX_H3SII] + - k[2497]*y_cur[IDX_H2COI]*y_cur[IDX_HNOII] + - k[2499]*y_cur[IDX_H2COI]*y_cur[IDX_O2HII] + - k[2508]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] - - k[2545]*y_cur[IDX_H2OI]*y_cur[IDX_H3COII] + - k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + - k[2665]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + - k[2682]*y_cur[IDX_H3II]*y_cur[IDX_H2COI] - - k[2762]*y_cur[IDX_H3COII]*y_cur[IDX_CH3OHI] - - k[2763]*y_cur[IDX_H3COII]*y_cur[IDX_H2SI] - - k[2764]*y_cur[IDX_H3COII]*y_cur[IDX_C4H2I] - - k[2765]*y_cur[IDX_H3COII]*y_cur[IDX_HCOOHI] + - k[2799]*y_cur[IDX_H3OII]*y_cur[IDX_H2COI] + - k[2855]*y_cur[IDX_HCNII]*y_cur[IDX_H2COI] - - k[2875]*y_cur[IDX_HCNI]*y_cur[IDX_H3COII] + - k[2890]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] + - k[2891]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] + - k[2958]*y_cur[IDX_HCOII]*y_cur[IDX_H2COI] + - k[3007]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] - - k[3039]*y_cur[IDX_HNCI]*y_cur[IDX_H3COII] + - k[3337]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3373]*y_cur[IDX_N2HII]*y_cur[IDX_H2COI] + - k[3487]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + - k[3510]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - - k[3537]*y_cur[IDX_NH2I]*y_cur[IDX_H3COII] - - k[3577]*y_cur[IDX_NH3I]*y_cur[IDX_H3COII] + - k[3611]*y_cur[IDX_NHI]*y_cur[IDX_H2COII] - - k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] + - k[3637]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + - k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] + - k[3728]*y_cur[IDX_OI]*y_cur[IDX_CH5II] + - k[3778]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] + - k[3849]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + - k[5627]*y_cur[IDX_CII]*y_cur[IDX_CH3OI] + - k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + - k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + - k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + - k[6123]*y_cur[IDX_CH3OHI] - - k[6414]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - - k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - - k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - - k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - - k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3CSII] = 0.0 - - k[1039]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] - - k[1040]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + - k[1675]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + - k[1983]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + - k[2078]*y_cur[IDX_CH3II]*y_cur[IDX_H2SI] + - k[2092]*y_cur[IDX_CH3II]*y_cur[IDX_OCSI] + - k[2203]*y_cur[IDX_CH4I]*y_cur[IDX_HSII] + - k[2215]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + - k[2683]*y_cur[IDX_H3II]*y_cur[IDX_H2CSI] + - k[2959]*y_cur[IDX_HCOII]*y_cur[IDX_H2CSI] + - k[3850]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - - k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] - - k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3OII] = 0.0 - - k[1041]*y_cur[IDX_H3OII]*y_cur[IDX_eM] - - k[1042]*y_cur[IDX_H3OII]*y_cur[IDX_eM] - - k[1043]*y_cur[IDX_H3OII]*y_cur[IDX_eM] - - k[1044]*y_cur[IDX_H3OII]*y_cur[IDX_eM] - - k[1901]*y_cur[IDX_CI]*y_cur[IDX_H3OII] + - k[1952]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - - k[2004]*y_cur[IDX_CH2I]*y_cur[IDX_H3OII] + - k[2142]*y_cur[IDX_CH4II]*y_cur[IDX_H2OI] + - k[2195]*y_cur[IDX_CH4I]*y_cur[IDX_H2OII] + - k[2210]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] + - k[2226]*y_cur[IDX_CH5II]*y_cur[IDX_H2OI] - - k[2249]*y_cur[IDX_CHI]*y_cur[IDX_H3OII] + - k[2386]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + - k[2442]*y_cur[IDX_H2I]*y_cur[IDX_H2OII] + - k[2506]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + - k[2509]*y_cur[IDX_H2OII]*y_cur[IDX_H2OI] + - k[2511]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + - k[2513]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + - k[2522]*y_cur[IDX_H2OI]*y_cur[IDX_C2H2II] + - k[2523]*y_cur[IDX_H2OI]*y_cur[IDX_C2H3II] + - k[2524]*y_cur[IDX_H2OI]*y_cur[IDX_C2H5II] + - k[2534]*y_cur[IDX_H2OI]*y_cur[IDX_C2H6II] + - k[2542]*y_cur[IDX_H2OI]*y_cur[IDX_H2COII] + - k[2543]*y_cur[IDX_H2OI]*y_cur[IDX_H2ClII] + - k[2544]*y_cur[IDX_H2OI]*y_cur[IDX_H2SII] + - k[2545]*y_cur[IDX_H2OI]*y_cur[IDX_H3COII] + - k[2546]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] + - k[2547]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] + - k[2548]*y_cur[IDX_H2OI]*y_cur[IDX_HCO2II] + - k[2549]*y_cur[IDX_H2OI]*y_cur[IDX_HCOOH2II] + - k[2550]*y_cur[IDX_H2OI]*y_cur[IDX_HNOII] + - k[2551]*y_cur[IDX_H2OI]*y_cur[IDX_HNSiII] + - k[2552]*y_cur[IDX_H2OI]*y_cur[IDX_HOCSII] + - k[2553]*y_cur[IDX_H2OI]*y_cur[IDX_HPOII] + - k[2554]*y_cur[IDX_H2OI]*y_cur[IDX_HSII] + - k[2555]*y_cur[IDX_H2OI]*y_cur[IDX_HSO2II] + - k[2558]*y_cur[IDX_H2OI]*y_cur[IDX_N2HII] + - k[2560]*y_cur[IDX_H2OI]*y_cur[IDX_NCCNHII] + - k[2561]*y_cur[IDX_H2OI]*y_cur[IDX_O2HII] + - k[2566]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + - k[2568]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] + - k[2570]*y_cur[IDX_H2OI]*y_cur[IDX_SiCH3II] + - k[2571]*y_cur[IDX_H2OI]*y_cur[IDX_SiHII] + - k[2572]*y_cur[IDX_H2OI]*y_cur[IDX_SiH4II] + - k[2573]*y_cur[IDX_H2OI]*y_cur[IDX_SiH5II] + - k[2657]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + - k[2684]*y_cur[IDX_H3II]*y_cur[IDX_H2OI] + - k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - - k[2766]*y_cur[IDX_H3OII]*y_cur[IDX_C2I] - - k[2767]*y_cur[IDX_H3OII]*y_cur[IDX_C2H3I] - - k[2768]*y_cur[IDX_H3OII]*y_cur[IDX_C2H5OHI] - - k[2769]*y_cur[IDX_H3OII]*y_cur[IDX_C2OI] - - k[2770]*y_cur[IDX_H3OII]*y_cur[IDX_C2SI] - - k[2771]*y_cur[IDX_H3OII]*y_cur[IDX_C3I] - - k[2772]*y_cur[IDX_H3OII]*y_cur[IDX_C3H2I] - - k[2773]*y_cur[IDX_H3OII]*y_cur[IDX_C3HI] - - k[2774]*y_cur[IDX_H3OII]*y_cur[IDX_C3NI] - - k[2775]*y_cur[IDX_H3OII]*y_cur[IDX_C3OI] - - k[2776]*y_cur[IDX_H3OII]*y_cur[IDX_C3PI] - - k[2777]*y_cur[IDX_H3OII]*y_cur[IDX_C3SI] - - k[2778]*y_cur[IDX_H3OII]*y_cur[IDX_C4I] - - k[2779]*y_cur[IDX_H3OII]*y_cur[IDX_C4H3I] - - k[2780]*y_cur[IDX_H3OII]*y_cur[IDX_C4HI] - - k[2781]*y_cur[IDX_H3OII]*y_cur[IDX_C4PI] - - k[2782]*y_cur[IDX_H3OII]*y_cur[IDX_C4SI] - - k[2783]*y_cur[IDX_H3OII]*y_cur[IDX_C6H6I] - - k[2784]*y_cur[IDX_H3OII]*y_cur[IDX_CCPI] - - k[2785]*y_cur[IDX_H3OII]*y_cur[IDX_CH2CCHI] - - k[2786]*y_cur[IDX_H3OII]*y_cur[IDX_CH2COI] - - k[2787]*y_cur[IDX_H3OII]*y_cur[IDX_CH2NHI] - - k[2788]*y_cur[IDX_H3OII]*y_cur[IDX_CH2PHI] - - k[2789]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CCHI] - - k[2790]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHCH2I] - - k[2791]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHOI] - - k[2792]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CNI] - - k[2793]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COCH3I] - - k[2794]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OCH3I] - - k[2795]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OHI] - - k[2796]*y_cur[IDX_H3OII]*y_cur[IDX_CPI] - - k[2797]*y_cur[IDX_H3OII]*y_cur[IDX_CSI] - - k[2798]*y_cur[IDX_H3OII]*y_cur[IDX_H2CCCI] - - k[2799]*y_cur[IDX_H3OII]*y_cur[IDX_H2COI] - - k[2800]*y_cur[IDX_H3OII]*y_cur[IDX_H2S2I] - - k[2801]*y_cur[IDX_H3OII]*y_cur[IDX_H2SI] - - k[2802]*y_cur[IDX_H3OII]*y_cur[IDX_H2SiOI] - - k[2803]*y_cur[IDX_H3OII]*y_cur[IDX_HC2PI] - - k[2804]*y_cur[IDX_H3OII]*y_cur[IDX_HC3NI] - - k[2805]*y_cur[IDX_H3OII]*y_cur[IDX_C4H2I] - - k[2806]*y_cur[IDX_H3OII]*y_cur[IDX_HCNI] - - k[2807]*y_cur[IDX_H3OII]*y_cur[IDX_HCOOCH3I] - - k[2808]*y_cur[IDX_H3OII]*y_cur[IDX_HCPI] - - k[2809]*y_cur[IDX_H3OII]*y_cur[IDX_HCSiI] - - k[2810]*y_cur[IDX_H3OII]*y_cur[IDX_HNCI] - - k[2811]*y_cur[IDX_H3OII]*y_cur[IDX_HNSiI] - - k[2812]*y_cur[IDX_H3OII]*y_cur[IDX_HPOI] - - k[2813]*y_cur[IDX_H3OII]*y_cur[IDX_HS2I] - - k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] - - k[2815]*y_cur[IDX_H3OII]*y_cur[IDX_PI] - - k[2816]*y_cur[IDX_H3OII]*y_cur[IDX_PNI] - - k[2817]*y_cur[IDX_H3OII]*y_cur[IDX_S2I] - - k[2818]*y_cur[IDX_H3OII]*y_cur[IDX_SiI] - - k[2819]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2I] - - k[2820]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2HI] - - k[2821]*y_cur[IDX_H3OII]*y_cur[IDX_SiCI] - - k[2822]*y_cur[IDX_H3OII]*y_cur[IDX_SiCH3I] - - k[2823]*y_cur[IDX_H3OII]*y_cur[IDX_SiH2I] - - k[2824]*y_cur[IDX_H3OII]*y_cur[IDX_SiHI] - - k[2825]*y_cur[IDX_H3OII]*y_cur[IDX_SiNCI] - - k[2826]*y_cur[IDX_H3OII]*y_cur[IDX_SiOI] - - k[3028]*y_cur[IDX_HNC3I]*y_cur[IDX_H3OII] + - k[3489]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + - k[3512]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - - k[3538]*y_cur[IDX_NH2I]*y_cur[IDX_H3OII] - - k[3578]*y_cur[IDX_NH3I]*y_cur[IDX_H3OII] + - k[3612]*y_cur[IDX_NHI]*y_cur[IDX_H2OII] + - k[3729]*y_cur[IDX_OI]*y_cur[IDX_CH5II] + - k[3772]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + - k[3779]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] + - k[3799]*y_cur[IDX_OHI]*y_cur[IDX_H2OII] - - k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] - - k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] - - k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] - - k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] - - k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] - - k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] - - k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] - - k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] - - k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] - - k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] - - k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] - - k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] - - k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] - - k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] - - k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] - - k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] - - k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] - - k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] - - k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] - - k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] - - k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] - - k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] - - k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] - - k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] - - k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] - - k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] - - k[4811]*y_cur[IDX_OHM]*y_cur[IDX_H3OII] - - k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] - - k[5567]*y_cur[IDX_H3OII]*y_cur[IDX_C2H2I] - - k[5568]*y_cur[IDX_H3OII]*y_cur[IDX_C2H4I] - - k[5629]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OI] - - k[5635]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHI] - - k[5651]*y_cur[IDX_H3OII]*y_cur[IDX_COOCH3I] - - k[5657]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCOI] - - k[5663]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCHOI] - - k[5669]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COOHI] - - k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - - k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - - k[6345]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - - k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3SII] = 0.0 - - k[1045]*y_cur[IDX_H3SII]*y_cur[IDX_eM] - - k[1046]*y_cur[IDX_H3SII]*y_cur[IDX_eM] - - k[1047]*y_cur[IDX_H3SII]*y_cur[IDX_eM] - - k[1048]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1518]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + - k[1619]*y_cur[IDX_C2H3II]*y_cur[IDX_H2SI] + - k[1721]*y_cur[IDX_C2H5II]*y_cur[IDX_H2SI] + - k[1954]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] + - k[1984]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + - k[2111]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] + - k[2143]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] + - k[2227]*y_cur[IDX_CH5II]*y_cur[IDX_H2SI] + - k[2443]*y_cur[IDX_H2I]*y_cur[IDX_H2SII] - - k[2496]*y_cur[IDX_H2COI]*y_cur[IDX_H3SII] + - k[2510]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + - k[2574]*y_cur[IDX_H2SII]*y_cur[IDX_H2SI] + - k[2579]*y_cur[IDX_H2SI]*y_cur[IDX_HS2II] + - k[2580]*y_cur[IDX_H2SI]*y_cur[IDX_HSiSII] + - k[2686]*y_cur[IDX_H3II]*y_cur[IDX_H2SI] + - k[2763]*y_cur[IDX_H3COII]*y_cur[IDX_H2SI] + - k[2801]*y_cur[IDX_H3OII]*y_cur[IDX_H2SI] - - k[2843]*y_cur[IDX_HI]*y_cur[IDX_H3SII] - - k[2876]*y_cur[IDX_HCNI]*y_cur[IDX_H3SII] + - k[2892]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] + - k[2893]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] + - k[2961]*y_cur[IDX_HCOII]*y_cur[IDX_H2SI] - - k[3040]*y_cur[IDX_HNCI]*y_cur[IDX_H3SII] + - k[3054]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + - k[3515]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3579]*y_cur[IDX_NH3I]*y_cur[IDX_H3SII] + - k[3780]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] + - k[3817]*y_cur[IDX_PHII]*y_cur[IDX_H2SI] + - k[3819]*y_cur[IDX_PH3II]*y_cur[IDX_H2SI] - - k[3839]*y_cur[IDX_SI]*y_cur[IDX_H3SII] + - k[5557]*y_cur[IDX_H2I]*y_cur[IDX_HSII] - - k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - - k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - - k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - - k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3S2II] = 0.0 - - k[1049]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] - - k[1050]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] + - k[2685]*y_cur[IDX_H3II]*y_cur[IDX_H2S2I] + - k[2800]*y_cur[IDX_H3OII]*y_cur[IDX_H2S2I] + - k[2960]*y_cur[IDX_HCOII]*y_cur[IDX_H2S2I] + - k[5558]*y_cur[IDX_H2I]*y_cur[IDX_HS2II] - - k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - - k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H3SiOII] = 0.0 - - k[1051]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] - - k[1052]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + - k[2687]*y_cur[IDX_H3II]*y_cur[IDX_H2SiOI] + - k[2802]*y_cur[IDX_H3OII]*y_cur[IDX_H2SiOI] + - k[2962]*y_cur[IDX_HCOII]*y_cur[IDX_H2SiOI] + - k[3760]*y_cur[IDX_OI]*y_cur[IDX_SiH5II] + - k[3884]*y_cur[IDX_SiH3II]*y_cur[IDX_O2I] - - k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] - - k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_H5C2O2II] = 0.0 - - k[1053]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] - - k[1054]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] + - k[2495]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + - k[2698]*y_cur[IDX_H3II]*y_cur[IDX_HCOOCH3I] + - k[2807]*y_cur[IDX_H3OII]*y_cur[IDX_HCOOCH3I] + - k[2970]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOCH3I] - - k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - - k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC2OI] = 0.0 - k[5942]*y_cur[IDX_HC2OI] - - k[6958]*y_cur[IDX_HC2OI] + k[7140]*y_cur[IDX_GHC2OI] + - k[7322]*y_cur[IDX_GHC2OI] + k[7504]*y_cur[IDX_GHC2OI] + - k[8619]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI]; - ydot[yistart + IDX_HC2OII] = 0.0 - - k[1055]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] - - k[1056]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] - - k[1057]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] - - k[1058]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + - k[1468]*y_cur[IDX_C2HII]*y_cur[IDX_CO2I] + - k[2520]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] + - k[2599]*y_cur[IDX_H3II]*y_cur[IDX_C2OI] + - k[2769]*y_cur[IDX_H3OII]*y_cur[IDX_C2OI] + - k[2904]*y_cur[IDX_HCOII]*y_cur[IDX_C2OI] + - k[3670]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + - k[3688]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + - k[3690]*y_cur[IDX_OI]*y_cur[IDX_C2H3II] - - k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - - k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - - k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - - k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC2PI] = 0.0 - - k[382]*y_cur[IDX_HII]*y_cur[IDX_HC2PI] + - k[1182]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + - k[1185]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + - k[1188]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + - k[1192]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] - - k[1396]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - - k[1397]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - - k[2688]*y_cur[IDX_H3II]*y_cur[IDX_HC2PI] - - k[2803]*y_cur[IDX_H3OII]*y_cur[IDX_HC2PI] - - k[2963]*y_cur[IDX_HCOII]*y_cur[IDX_HC2PI] - - k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - - k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - - k[5401]*y_cur[IDX_OI]*y_cur[IDX_HC2PI] - k[5845]*y_cur[IDX_HC2PI] - - k[6170]*y_cur[IDX_HC2PI] + - k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + - k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + - k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + - k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - - k[7017]*y_cur[IDX_HC2PI] + k[7199]*y_cur[IDX_GHC2PI] + - k[7381]*y_cur[IDX_GHC2PI] + k[7567]*y_cur[IDX_GHC2PI]; - ydot[yistart + IDX_HC2PII] = 0.0 + - k[382]*y_cur[IDX_HII]*y_cur[IDX_HC2PI] - - k[1059]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] - - k[1060]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + - k[1351]*y_cur[IDX_CII]*y_cur[IDX_CH2PHI] + - k[1526]*y_cur[IDX_C2H2II]*y_cur[IDX_PI] + - k[1569]*y_cur[IDX_C2H2I]*y_cur[IDX_PII] + - k[2633]*y_cur[IDX_H3II]*y_cur[IDX_CCPI] + - k[2784]*y_cur[IDX_H3OII]*y_cur[IDX_CCPI] + - k[2937]*y_cur[IDX_HCOII]*y_cur[IDX_CCPI] - - k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] - - k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC2SII] = 0.0 - - k[1061]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] - - k[1062]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + - k[1528]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] + - k[1573]*y_cur[IDX_C2H2I]*y_cur[IDX_SII] + - k[1625]*y_cur[IDX_C2H3II]*y_cur[IDX_SI] + - k[1645]*y_cur[IDX_C2H3I]*y_cur[IDX_SII] + - k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] - - k[1902]*y_cur[IDX_CI]*y_cur[IDX_HC2SII] + - k[2405]*y_cur[IDX_H2I]*y_cur[IDX_C2SII] + - k[2600]*y_cur[IDX_H3II]*y_cur[IDX_C2SI] + - k[2770]*y_cur[IDX_H3OII]*y_cur[IDX_C2SI] + - k[2905]*y_cur[IDX_HCOII]*y_cur[IDX_C2SI] - - k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] - - k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] - - k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] - - k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] - - k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] - - k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] - - k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] - - k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] - - k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] - - k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] - - k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] - - k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] - - k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] - - k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] - - k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] - - k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] - - k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] - - k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] - - k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] - - k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] - - k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] - - k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] - - k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] - - k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] - - k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] - - k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] - - k[4812]*y_cur[IDX_OHM]*y_cur[IDX_HC2SII] - - k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] - - k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] - - k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC3NI] = 0.0 + - k[91]*y_cur[IDX_HI]*y_cur[IDX_C3NM] + - k[113]*y_cur[IDX_NI]*y_cur[IDX_C3HM] + - k[229]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] + - k[239]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] - - k[383]*y_cur[IDX_HII]*y_cur[IDX_HC3NI] + - k[493]*y_cur[IDX_C4H2I]*y_cur[IDX_HC3NII] + - k[607]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NII] + - k[912]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_eM] + - k[926]*y_cur[IDX_CH3C3NII]*y_cur[IDX_eM] + - k[928]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] + - k[988]*y_cur[IDX_H2C4NII]*y_cur[IDX_eM] + - k[1068]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + - k[1080]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - - k[1398]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1399]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1400]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1401]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1470]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1471]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1472]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1473]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1620]*y_cur[IDX_C2H3II]*y_cur[IDX_HC3NI] - - k[1676]*y_cur[IDX_C2H4II]*y_cur[IDX_HC3NI] - - k[1722]*y_cur[IDX_C2H5II]*y_cur[IDX_HC3NI] - - k[1752]*y_cur[IDX_C3II]*y_cur[IDX_HC3NI] - - k[1816]*y_cur[IDX_C3H5II]*y_cur[IDX_HC3NI] - - k[2079]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] + - k[2115]*y_cur[IDX_CH3CNI]*y_cur[IDX_HC3NHII] + - k[2126]*y_cur[IDX_CH3OHI]*y_cur[IDX_HC3NHII] + - k[2172]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - - k[2228]*y_cur[IDX_CH5II]*y_cur[IDX_HC3NI] + - k[2320]*y_cur[IDX_HII]*y_cur[IDX_CH3C3NI] + - k[2532]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] - - k[2689]*y_cur[IDX_H3II]*y_cur[IDX_HC3NI] - - k[2804]*y_cur[IDX_H3OII]*y_cur[IDX_HC3NI] - - k[2894]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] - - k[2895]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] - - k[2964]*y_cur[IDX_HCOII]*y_cur[IDX_HC3NI] + - k[3024]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - - k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - - k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - - k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - - k[3374]*y_cur[IDX_N2HII]*y_cur[IDX_HC3NI] + - k[3580]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NHII] + - k[4901]*y_cur[IDX_C2HI]*y_cur[IDX_HCNI] + - k[4902]*y_cur[IDX_C2HI]*y_cur[IDX_HNCI] + - k[4903]*y_cur[IDX_C2HI]*y_cur[IDX_NCCNI] + - k[4948]*y_cur[IDX_CI]*y_cur[IDX_CH2CNI] + - k[5104]*y_cur[IDX_CNI]*y_cur[IDX_C2H2I] + - k[5213]*y_cur[IDX_HNC3I]*y_cur[IDX_HI] + - k[5232]*y_cur[IDX_NI]*y_cur[IDX_C3H2I] + - k[5256]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHI] - - k[5508]*y_cur[IDX_C2H2II]*y_cur[IDX_HC3NI] + - k[5514]*y_cur[IDX_C2HI]*y_cur[IDX_CNI] - - k[5517]*y_cur[IDX_C4H2II]*y_cur[IDX_HC3NI] - - k[5537]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] - k[5846]*y_cur[IDX_HC3NI] - - k[6171]*y_cur[IDX_HC3NI] + - k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + - k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM] + - k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM] + - k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM] + - k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + - k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[7001]*y_cur[IDX_HC3NI] + k[7183]*y_cur[IDX_GHC3NI] + - k[7365]*y_cur[IDX_GHC3NI] + k[7547]*y_cur[IDX_GHC3NI] + - k[8633]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] + - k[8706]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI]; - ydot[yistart + IDX_HC3NII] = 0.0 - - k[229]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - - k[239]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] + - k[383]*y_cur[IDX_HII]*y_cur[IDX_HC3NI] - - k[493]*y_cur[IDX_C4H2I]*y_cur[IDX_HC3NII] - - k[607]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NII] - - k[1063]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] - - k[1064]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] - - k[1065]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + - k[1475]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - - k[1565]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - - k[1707]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] - - k[2196]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - - k[2197]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - - k[2198]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + - k[2277]*y_cur[IDX_CNI]*y_cur[IDX_C2H2II] + - k[2409]*y_cur[IDX_H2I]*y_cur[IDX_C3NII] - - k[2444]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] - - k[2445]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] + - k[2604]*y_cur[IDX_H3II]*y_cur[IDX_C3NI] + - k[2774]*y_cur[IDX_H3OII]*y_cur[IDX_C3NI] + - k[2909]*y_cur[IDX_HCOII]*y_cur[IDX_C3NI] + - k[3023]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3460]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - - k[3461]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - - k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - - k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - - k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC3NHII] = 0.0 - - k[1066]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] - - k[1067]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] - - k[1068]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] - - k[1069]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + - k[1472]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + - k[1522]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + - k[1620]*y_cur[IDX_C2H3II]*y_cur[IDX_HC3NI] + - k[1676]*y_cur[IDX_C2H4II]*y_cur[IDX_HC3NI] + - k[1707]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] + - k[1722]*y_cur[IDX_C2H5II]*y_cur[IDX_HC3NI] + - k[1816]*y_cur[IDX_C3H5II]*y_cur[IDX_HC3NI] - - k[2115]*y_cur[IDX_CH3CNI]*y_cur[IDX_HC3NHII] - - k[2126]*y_cur[IDX_CH3OHI]*y_cur[IDX_HC3NHII] + - k[2174]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + - k[2198]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + - k[2228]*y_cur[IDX_CH5II]*y_cur[IDX_HC3NI] + - k[2316]*y_cur[IDX_HII]*y_cur[IDX_CH2CHCNI] + - k[2444]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] + - k[2533]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] + - k[2689]*y_cur[IDX_H3II]*y_cur[IDX_HC3NI] + - k[2804]*y_cur[IDX_H3OII]*y_cur[IDX_HC3NI] + - k[2894]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] + - k[2895]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] + - k[2964]*y_cur[IDX_HCOII]*y_cur[IDX_HC3NI] + - k[3027]*y_cur[IDX_HNC3I]*y_cur[IDX_H3II] + - k[3028]*y_cur[IDX_HNC3I]*y_cur[IDX_H3OII] + - k[3029]*y_cur[IDX_HNC3I]*y_cur[IDX_HCOII] + - k[3035]*y_cur[IDX_HNC3I]*y_cur[IDX_N2HII] + - k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3374]*y_cur[IDX_N2HII]*y_cur[IDX_HC3NI] + - k[3399]*y_cur[IDX_NI]*y_cur[IDX_C3H4II] + - k[3453]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHII] - - k[3580]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NHII] - - k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - - k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - - k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - - k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC3OII] = 0.0 - - k[1070]*y_cur[IDX_HC3OII]*y_cur[IDX_eM] + - k[1753]*y_cur[IDX_C3HII]*y_cur[IDX_CO2I] + - k[1757]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + - k[2123]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] + - k[2163]*y_cur[IDX_CH4I]*y_cur[IDX_C3OII] + - k[2410]*y_cur[IDX_H2I]*y_cur[IDX_C3OII] + - k[2529]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + - k[2531]*y_cur[IDX_H2OI]*y_cur[IDX_C3OII] + - k[2605]*y_cur[IDX_H3II]*y_cur[IDX_C3OI] + - k[2775]*y_cur[IDX_H3OII]*y_cur[IDX_C3OI] + - k[2910]*y_cur[IDX_HCOII]*y_cur[IDX_C3OI] + - k[3671]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + - k[3702]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - - k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC3SII] = 0.0 - - k[1071]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] - - k[1072]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + - k[1758]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + - k[2577]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + - k[2607]*y_cur[IDX_H3II]*y_cur[IDX_C3SI] + - k[2777]*y_cur[IDX_H3OII]*y_cur[IDX_C3SI] + - k[2912]*y_cur[IDX_HCOII]*y_cur[IDX_C3SI] + - k[3820]*y_cur[IDX_SII]*y_cur[IDX_C3H2I] + - k[3827]*y_cur[IDX_SII]*y_cur[IDX_H2CCCI] + - k[3834]*y_cur[IDX_SI]*y_cur[IDX_C3H2II] + - k[3835]*y_cur[IDX_SI]*y_cur[IDX_C3H3II] + - k[3838]*y_cur[IDX_SI]*y_cur[IDX_CH2CCHII] - - k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] - - k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC4NII] = 0.0 - - k[1073]*y_cur[IDX_HC4NII]*y_cur[IDX_eM] + - k[1541]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - - k[2446]*y_cur[IDX_H2I]*y_cur[IDX_HC4NII] + - k[3406]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - - k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC4SII] = 0.0 - - k[1074]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - - k[1075]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - - k[1076]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] + - k[2612]*y_cur[IDX_H3II]*y_cur[IDX_C4SI] + - k[2782]*y_cur[IDX_H3OII]*y_cur[IDX_C4SI] + - k[2917]*y_cur[IDX_HCOII]*y_cur[IDX_C4SI] + - k[3832]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + - k[3836]*y_cur[IDX_SI]*y_cur[IDX_C4H2II] + - k[3837]*y_cur[IDX_SI]*y_cur[IDX_C4H3II] - - k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - - k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - - k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC5NI] = 0.0 + - k[96]*y_cur[IDX_HI]*y_cur[IDX_C5NM] + - k[117]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - - k[385]*y_cur[IDX_HII]*y_cur[IDX_HC5NI] + - k[932]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] + - k[1029]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + - k[1081]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - - k[1404]*y_cur[IDX_CII]*y_cur[IDX_HC5NI] + - k[2322]*y_cur[IDX_HII]*y_cur[IDX_CH3C5NI] - - k[2691]*y_cur[IDX_H3II]*y_cur[IDX_HC5NI] - - k[2966]*y_cur[IDX_HCOII]*y_cur[IDX_HC5NI] - - k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] - - k[3242]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + - k[4907]*y_cur[IDX_C4HI]*y_cur[IDX_HNCI] + - k[4908]*y_cur[IDX_C4HI]*y_cur[IDX_NCCNI] + - k[5115]*y_cur[IDX_CNI]*y_cur[IDX_C4H2I] + - k[5239]*y_cur[IDX_NI]*y_cur[IDX_C5H2I] - - k[5509]*y_cur[IDX_C2H2II]*y_cur[IDX_HC5NI] - - k[5519]*y_cur[IDX_C4H2II]*y_cur[IDX_HC5NI] - - k[5538]*y_cur[IDX_CH3II]*y_cur[IDX_HC5NI] - k[5850]*y_cur[IDX_HC5NI] - - k[5851]*y_cur[IDX_HC5NI] - k[6175]*y_cur[IDX_HC5NI] - - k[6176]*y_cur[IDX_HC5NI] + - k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + - k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + - k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - - k[7045]*y_cur[IDX_HC5NI] + k[7227]*y_cur[IDX_GHC5NI] + - k[7409]*y_cur[IDX_GHC5NI] + k[7591]*y_cur[IDX_GHC5NI] + - k[8640]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] + - k[8708]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI]; - ydot[yistart + IDX_HC5NII] = 0.0 + - k[385]*y_cur[IDX_HII]*y_cur[IDX_HC5NI] - - k[1077]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] - - k[1078]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + - k[1473]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + - k[2416]*y_cur[IDX_H2I]*y_cur[IDX_C5NII] - - k[2447]*y_cur[IDX_H2I]*y_cur[IDX_HC5NII] + - k[2616]*y_cur[IDX_H3II]*y_cur[IDX_C5NI] + - k[2870]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + - k[2921]*y_cur[IDX_HCOII]*y_cur[IDX_C5NI] + - k[3415]*y_cur[IDX_NI]*y_cur[IDX_C5H2II] - - k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] - - k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC5NHII] = 0.0 - - k[1079]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - - k[1080]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - - k[1081]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - - k[1082]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - - k[1083]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + - k[2175]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + - k[2447]*y_cur[IDX_H2I]*y_cur[IDX_HC5NII] + - k[2691]*y_cur[IDX_H3II]*y_cur[IDX_HC5NI] + - k[2966]*y_cur[IDX_HCOII]*y_cur[IDX_HC5NI] + - k[3416]*y_cur[IDX_NI]*y_cur[IDX_C5H3II] - - k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC7NI] = 0.0 + - k[119]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - - k[386]*y_cur[IDX_HII]*y_cur[IDX_HC7NI] + - k[934]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] + - k[990]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + - k[1031]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] - - k[1405]*y_cur[IDX_CII]*y_cur[IDX_HC7NI] + - k[2324]*y_cur[IDX_HII]*y_cur[IDX_CH3C7NI] - - k[2692]*y_cur[IDX_H3II]*y_cur[IDX_HC7NI] - - k[2967]*y_cur[IDX_HCOII]*y_cur[IDX_HC7NI] - - k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] + - k[5107]*y_cur[IDX_CNI]*y_cur[IDX_C6H2I] + - k[5245]*y_cur[IDX_NI]*y_cur[IDX_C7H2I] - - k[5510]*y_cur[IDX_C2H2II]*y_cur[IDX_HC7NI] - - k[5539]*y_cur[IDX_CH3II]*y_cur[IDX_HC7NI] - k[5852]*y_cur[IDX_HC7NI] - - k[6177]*y_cur[IDX_HC7NI] - k[6178]*y_cur[IDX_HC7NI] + - k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + - k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + - k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - - k[7059]*y_cur[IDX_HC7NI] + k[7241]*y_cur[IDX_GHC7NI] + - k[7423]*y_cur[IDX_GHC7NI] + k[7605]*y_cur[IDX_GHC7NI] + - k[8645]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] + - k[8710]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI]; - ydot[yistart + IDX_HC7NII] = 0.0 + - k[386]*y_cur[IDX_HII]*y_cur[IDX_HC7NI] - - k[1084]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] - - k[1085]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] + - k[2421]*y_cur[IDX_H2I]*y_cur[IDX_C7NII] - - k[2448]*y_cur[IDX_H2I]*y_cur[IDX_HC7NII] + - k[2624]*y_cur[IDX_H3II]*y_cur[IDX_C7NI] + - k[2929]*y_cur[IDX_HCOII]*y_cur[IDX_C7NI] + - k[3432]*y_cur[IDX_NI]*y_cur[IDX_C7H2II] + k[6178]*y_cur[IDX_HC7NI] - - k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] - - k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HC9NI] = 0.0 + - k[121]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - - k[387]*y_cur[IDX_HII]*y_cur[IDX_HC9NI] + - k[992]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + - k[1033]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] - - k[1406]*y_cur[IDX_CII]*y_cur[IDX_HC9NI] - - k[2693]*y_cur[IDX_H3II]*y_cur[IDX_HC9NI] - - k[2968]*y_cur[IDX_HCOII]*y_cur[IDX_HC9NI] - - k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] + - k[5108]*y_cur[IDX_CNI]*y_cur[IDX_C8H2I] - k[5853]*y_cur[IDX_HC9NI] - - k[6179]*y_cur[IDX_HC9NI] - k[6180]*y_cur[IDX_HC9NI] + - k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + - k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - - k[7068]*y_cur[IDX_HC9NI] + k[7250]*y_cur[IDX_GHC9NI] + - k[7432]*y_cur[IDX_GHC9NI] + k[7614]*y_cur[IDX_GHC9NI] + - k[8650]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] + - k[8712]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI]; - ydot[yistart + IDX_HC9NII] = 0.0 + - k[387]*y_cur[IDX_HII]*y_cur[IDX_HC9NI] - - k[1086]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] - - k[1087]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] + - k[2426]*y_cur[IDX_H2I]*y_cur[IDX_C9NII] - - k[2449]*y_cur[IDX_H2I]*y_cur[IDX_HC9NII] + - k[2631]*y_cur[IDX_H3II]*y_cur[IDX_C9NI] + - k[2936]*y_cur[IDX_HCOII]*y_cur[IDX_C9NI] + - k[3449]*y_cur[IDX_NI]*y_cur[IDX_C9H2II] + k[6180]*y_cur[IDX_HC9NI] - - k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - - k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCCNI] = 0.0 - k[5940]*y_cur[IDX_HCCNI] - - k[6949]*y_cur[IDX_HCCNI] + k[7131]*y_cur[IDX_GHCCNI] + - k[7313]*y_cur[IDX_GHCCNI] + k[7495]*y_cur[IDX_GHCCNI] + - k[8616]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] + - k[8721]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI]; - ydot[yistart + IDX_HCNI] = 0.0 + k[6]*y_cur[IDX_CM]*y_cur[IDX_NHI] + - k[72]*y_cur[IDX_HM]*y_cur[IDX_CNI] + - k[106]*y_cur[IDX_HI]*y_cur[IDX_CNM] + - k[133]*y_cur[IDX_HII]*y_cur[IDX_HNCI] + - k[230]*y_cur[IDX_C2H2I]*y_cur[IDX_HCNII] - - k[301]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] - - k[388]*y_cur[IDX_HII]*y_cur[IDX_HCNI] - - k[449]*y_cur[IDX_H2II]*y_cur[IDX_HCNI] + - k[480]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] + - k[490]*y_cur[IDX_HI]*y_cur[IDX_HCNII] + - k[494]*y_cur[IDX_HCNII]*y_cur[IDX_NOI] + - k[495]*y_cur[IDX_HCNII]*y_cur[IDX_O2I] + - k[496]*y_cur[IDX_HCNII]*y_cur[IDX_SI] - - k[497]*y_cur[IDX_HCNI]*y_cur[IDX_COII] - - k[498]*y_cur[IDX_HCNI]*y_cur[IDX_N2II] - - k[554]*y_cur[IDX_NII]*y_cur[IDX_HCNI] + - k[608]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] + - k[913]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + - k[917]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + - k[945]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] + - k[971]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + - k[1065]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + - k[1082]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + - k[1090]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + - k[1094]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] + - k[1161]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] + - k[1348]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + - k[1399]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - - k[1407]*y_cur[IDX_CII]*y_cur[IDX_HCNI] - - k[1453]*y_cur[IDX_C2II]*y_cur[IDX_HCNI] + - k[1470]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - - k[1474]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - - k[1475]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - - k[1476]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + - k[1513]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - - k[1522]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] - - k[1523]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + - k[1540]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] + - k[1555]*y_cur[IDX_C2H2I]*y_cur[IDX_C4NII] + - k[1565]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - - k[1956]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - - k[1957]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - - k[1958]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - - k[1986]*y_cur[IDX_CH2II]*y_cur[IDX_HCNI] + - k[2006]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] + - k[2068]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + - k[2079]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] + - k[2173]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + - k[2196]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - - k[2229]*y_cur[IDX_CH5II]*y_cur[IDX_HCNI] + - k[2251]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] + - k[2271]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - - k[2272]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] + - k[2329]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - - k[2368]*y_cur[IDX_HM]*y_cur[IDX_HCNI] + - k[2413]*y_cur[IDX_H2I]*y_cur[IDX_C4NII] + - k[2445]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] - - k[2512]*y_cur[IDX_H2OII]*y_cur[IDX_HCNI] + - k[2526]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] + - k[2539]*y_cur[IDX_H2OI]*y_cur[IDX_CNCII] + - k[2575]*y_cur[IDX_H2SI]*y_cur[IDX_C2NII] - - k[2694]*y_cur[IDX_H3II]*y_cur[IDX_HCNI] - - k[2806]*y_cur[IDX_H3OII]*y_cur[IDX_HCNI] - - k[2856]*y_cur[IDX_HCNII]*y_cur[IDX_HCNI] - - k[2861]*y_cur[IDX_HCNI]*y_cur[IDX_C2H3II] - - k[2862]*y_cur[IDX_HCNI]*y_cur[IDX_C2H5II] - - k[2863]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - - k[2864]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - - k[2865]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] - - k[2866]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] - - k[2867]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] - - k[2868]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] - - k[2869]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] - - k[2870]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] - - k[2871]*y_cur[IDX_HCNI]*y_cur[IDX_C5II] - - k[2872]*y_cur[IDX_HCNI]*y_cur[IDX_C2H6II] - - k[2873]*y_cur[IDX_HCNI]*y_cur[IDX_CH3OH2II] - - k[2874]*y_cur[IDX_HCNI]*y_cur[IDX_H2COII] - - k[2875]*y_cur[IDX_HCNI]*y_cur[IDX_H3COII] - - k[2876]*y_cur[IDX_HCNI]*y_cur[IDX_H3SII] - - k[2877]*y_cur[IDX_HCNI]*y_cur[IDX_HCOII] - - k[2878]*y_cur[IDX_HCNI]*y_cur[IDX_HNOII] - - k[2879]*y_cur[IDX_HCNI]*y_cur[IDX_HSII] - - k[2880]*y_cur[IDX_HCNI]*y_cur[IDX_HSiSII] - - k[2881]*y_cur[IDX_HCNI]*y_cur[IDX_N2HII] - - k[2882]*y_cur[IDX_HCNI]*y_cur[IDX_NCCNHII] - - k[2883]*y_cur[IDX_HCNI]*y_cur[IDX_O2HII] - - k[2884]*y_cur[IDX_HCNI]*y_cur[IDX_PHII] - - k[2885]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] + - k[2886]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] + - k[2888]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] + - k[2890]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] + - k[2892]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] + - k[2894]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] + - k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3245]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - - k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - - k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - - k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3389]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + - k[3400]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + - k[3405]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + - k[3423]*y_cur[IDX_NI]*y_cur[IDX_C6H2II] + - k[3424]*y_cur[IDX_NI]*y_cur[IDX_C6H5II] + - k[3460]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] + - k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] - - k[3493]*y_cur[IDX_NHII]*y_cur[IDX_HCNI] - - k[3519]*y_cur[IDX_NH2II]*y_cur[IDX_HCNI] + - k[3540]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + - k[3561]*y_cur[IDX_NH3I]*y_cur[IDX_C2NII] + - k[3572]*y_cur[IDX_NH3I]*y_cur[IDX_CNCII] + - k[3582]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + - k[3629]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] - - k[3644]*y_cur[IDX_OII]*y_cur[IDX_HCNI] - - k[3645]*y_cur[IDX_OII]*y_cur[IDX_HCNI] - - k[3653]*y_cur[IDX_OM]*y_cur[IDX_HCNI] - - k[3781]*y_cur[IDX_OHII]*y_cur[IDX_HCNI] - - k[3795]*y_cur[IDX_OHM]*y_cur[IDX_HCNI] + - k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + - k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + - k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + - k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + - k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + - k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + - k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + - k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + - k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + - k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + - k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + - k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + - k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + - k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + - k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + - k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + - k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + - k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + - k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + - k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + - k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + - k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + - k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + - k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + - k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + - k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + - k[4813]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] + - k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - - k[4873]*y_cur[IDX_C2I]*y_cur[IDX_HCNI] + - k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] - - k[4901]*y_cur[IDX_C2HI]*y_cur[IDX_HCNI] + - k[4969]*y_cur[IDX_CI]*y_cur[IDX_NH2I] + - k[4997]*y_cur[IDX_CH2I]*y_cur[IDX_CNI] + - k[5001]*y_cur[IDX_CH2I]*y_cur[IDX_N2I] + - k[5004]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + - k[5029]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] + - k[5038]*y_cur[IDX_CH3I]*y_cur[IDX_NOI] + - k[5059]*y_cur[IDX_CH4I]*y_cur[IDX_CNI] + - k[5079]*y_cur[IDX_CHI]*y_cur[IDX_N2I] + - k[5083]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + - k[5105]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] + - k[5111]*y_cur[IDX_CNI]*y_cur[IDX_C2H6I] + - k[5114]*y_cur[IDX_CNI]*y_cur[IDX_H2COI] - - k[5116]*y_cur[IDX_CNI]*y_cur[IDX_HCNI] + - k[5117]*y_cur[IDX_CNI]*y_cur[IDX_HCOI] + - k[5119]*y_cur[IDX_CNI]*y_cur[IDX_HNOI] + - k[5126]*y_cur[IDX_CNI]*y_cur[IDX_SiH4I] + - k[5138]*y_cur[IDX_H2I]*y_cur[IDX_CNI] + - k[5164]*y_cur[IDX_HI]*y_cur[IDX_H2CNI] - - k[5170]*y_cur[IDX_HI]*y_cur[IDX_HCNI] + - k[5174]*y_cur[IDX_HI]*y_cur[IDX_HNCI] + - k[5181]*y_cur[IDX_HI]*y_cur[IDX_NCCNI] + - k[5194]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + - k[5215]*y_cur[IDX_HOCNI]*y_cur[IDX_CI] + - k[5225]*y_cur[IDX_NI]*y_cur[IDX_C2H4I] + - k[5253]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + - k[5258]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + - k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + - k[5264]*y_cur[IDX_NI]*y_cur[IDX_H2CNI] + - k[5266]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + - k[5268]*y_cur[IDX_NI]*y_cur[IDX_HCSI] + - k[5302]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] + - k[5305]*y_cur[IDX_NHI]*y_cur[IDX_CNI] - - k[5402]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - - k[5403]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - - k[5404]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + - k[5459]*y_cur[IDX_OHI]*y_cur[IDX_CNI] - - k[5469]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] - - k[5470]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] + - k[5475]*y_cur[IDX_OHI]*y_cur[IDX_NCCNI] - - k[5540]*y_cur[IDX_CH3II]*y_cur[IDX_HCNI] - - k[5580]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] + k[5835]*y_cur[IDX_H2CNI] - - k[5854]*y_cur[IDX_HCNI] + k[6151]*y_cur[IDX_H2CNI] - - k[6181]*y_cur[IDX_HCNI] + - k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + - k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + - k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + - k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + - k[6532]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + - k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + - k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + - k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6911]*y_cur[IDX_HCNI] + k[7093]*y_cur[IDX_GHCNI] + - k[7275]*y_cur[IDX_GHCNI] + k[7457]*y_cur[IDX_GHCNI] + - k[8592]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] + - k[8698]*y_cur[IDX_GNI]*y_cur[IDX_GCHI]; - ydot[yistart + IDX_HCNII] = 0.0 - - k[230]*y_cur[IDX_C2H2I]*y_cur[IDX_HCNII] + - k[301]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] + - k[388]*y_cur[IDX_HII]*y_cur[IDX_HCNI] + - k[449]*y_cur[IDX_H2II]*y_cur[IDX_HCNI] - - k[480]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] - - k[490]*y_cur[IDX_HI]*y_cur[IDX_HCNII] - - k[494]*y_cur[IDX_HCNII]*y_cur[IDX_NOI] - - k[495]*y_cur[IDX_HCNII]*y_cur[IDX_O2I] - - k[496]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + - k[497]*y_cur[IDX_HCNI]*y_cur[IDX_COII] + - k[498]*y_cur[IDX_HCNI]*y_cur[IDX_N2II] + - k[554]*y_cur[IDX_NII]*y_cur[IDX_HCNI] - - k[608]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - - k[1088]*y_cur[IDX_HCNII]*y_cur[IDX_eM] + - k[1417]*y_cur[IDX_CII]*y_cur[IDX_NH2I] + - k[1419]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - - k[1458]*y_cur[IDX_C2I]*y_cur[IDX_HCNII] - - k[1745]*y_cur[IDX_C2HI]*y_cur[IDX_HCNII] - - k[1903]*y_cur[IDX_CI]*y_cur[IDX_HCNII] + - k[1962]*y_cur[IDX_CHII]*y_cur[IDX_NH2I] - - k[2005]*y_cur[IDX_CH2I]*y_cur[IDX_HCNII] - - k[2199]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] - - k[2200]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] - - k[2250]*y_cur[IDX_CHI]*y_cur[IDX_HCNII] + - k[2273]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + - k[2278]*y_cur[IDX_CNI]*y_cur[IDX_HNOII] + - k[2279]*y_cur[IDX_CNI]*y_cur[IDX_O2HII] + - k[2381]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + - k[2433]*y_cur[IDX_H2I]*y_cur[IDX_CNII] - - k[2450]*y_cur[IDX_H2I]*y_cur[IDX_HCNII] + - k[2536]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2546]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] + - k[2671]*y_cur[IDX_H3II]*y_cur[IDX_CNI] + - k[2830]*y_cur[IDX_HI]*y_cur[IDX_C2N2II] - - k[2853]*y_cur[IDX_HCNII]*y_cur[IDX_CO2I] - - k[2854]*y_cur[IDX_HCNII]*y_cur[IDX_COI] - - k[2855]*y_cur[IDX_HCNII]*y_cur[IDX_H2COI] - - k[2856]*y_cur[IDX_HCNII]*y_cur[IDX_HCNI] - - k[2857]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] - - k[2858]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] - - k[2859]*y_cur[IDX_HCNII]*y_cur[IDX_HNCI] - - k[2860]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + - k[2865]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] + - k[3017]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + - k[3025]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[3452]*y_cur[IDX_NI]*y_cur[IDX_CH2II] + - k[3479]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + - k[3481]*y_cur[IDX_NHII]*y_cur[IDX_CNI] - - k[3539]*y_cur[IDX_NH2I]*y_cur[IDX_HCNII] - - k[3581]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - - k[3613]*y_cur[IDX_NHI]*y_cur[IDX_HCNII] + - k[3775]*y_cur[IDX_OHII]*y_cur[IDX_CNI] - - k[3800]*y_cur[IDX_OHI]*y_cur[IDX_HCNII] - - k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCNHII] = 0.0 - - k[1089]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] - - k[1090]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] - - k[1091]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + - k[1476]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + - k[1478]*y_cur[IDX_C2HII]*y_cur[IDX_HNCI] + - k[1523]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + - k[1525]*y_cur[IDX_C2H2II]*y_cur[IDX_HNCI] + - k[1958]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + - k[1960]*y_cur[IDX_CHII]*y_cur[IDX_HNCI] - - k[2006]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] - - k[2007]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] + - k[2069]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + - k[2200]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] + - k[2229]*y_cur[IDX_CH5II]*y_cur[IDX_HCNI] + - k[2232]*y_cur[IDX_CH5II]*y_cur[IDX_HNCI] - - k[2251]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] - - k[2252]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] + - k[2450]*y_cur[IDX_H2I]*y_cur[IDX_HCNII] + - k[2512]*y_cur[IDX_H2OII]*y_cur[IDX_HCNI] + - k[2515]*y_cur[IDX_H2OII]*y_cur[IDX_HNCI] + - k[2694]*y_cur[IDX_H3II]*y_cur[IDX_HCNI] + - k[2706]*y_cur[IDX_H3II]*y_cur[IDX_HNCI] + - k[2806]*y_cur[IDX_H3OII]*y_cur[IDX_HCNI] + - k[2810]*y_cur[IDX_H3OII]*y_cur[IDX_HNCI] + - k[2856]*y_cur[IDX_HCNII]*y_cur[IDX_HCNI] + - k[2858]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] + - k[2859]*y_cur[IDX_HCNII]*y_cur[IDX_HNCI] + - k[2861]*y_cur[IDX_HCNI]*y_cur[IDX_C2H3II] + - k[2862]*y_cur[IDX_HCNI]*y_cur[IDX_C2H5II] + - k[2864]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] + - k[2872]*y_cur[IDX_HCNI]*y_cur[IDX_C2H6II] + - k[2874]*y_cur[IDX_HCNI]*y_cur[IDX_H2COII] + - k[2875]*y_cur[IDX_HCNI]*y_cur[IDX_H3COII] + - k[2876]*y_cur[IDX_HCNI]*y_cur[IDX_H3SII] + - k[2877]*y_cur[IDX_HCNI]*y_cur[IDX_HCOII] + - k[2878]*y_cur[IDX_HCNI]*y_cur[IDX_HNOII] + - k[2879]*y_cur[IDX_HCNI]*y_cur[IDX_HSII] + - k[2880]*y_cur[IDX_HCNI]*y_cur[IDX_HSiSII] + - k[2881]*y_cur[IDX_HCNI]*y_cur[IDX_N2HII] + - k[2882]*y_cur[IDX_HCNI]*y_cur[IDX_NCCNHII] + - k[2883]*y_cur[IDX_HCNI]*y_cur[IDX_O2HII] + - k[2884]*y_cur[IDX_HCNI]*y_cur[IDX_PHII] - - k[2886]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] - - k[2887]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] - - k[2888]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] - - k[2889]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] - - k[2890]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] - - k[2891]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] - - k[2892]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] - - k[2893]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] - - k[2894]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] - - k[2895]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] - - k[2896]*y_cur[IDX_HCNHII]*y_cur[IDX_SiI] + - k[3036]*y_cur[IDX_HNCI]*y_cur[IDX_C2H3II] + - k[3037]*y_cur[IDX_HNCI]*y_cur[IDX_C2H5II] + - k[3038]*y_cur[IDX_HNCI]*y_cur[IDX_H2COII] + - k[3039]*y_cur[IDX_HNCI]*y_cur[IDX_H3COII] + - k[3040]*y_cur[IDX_HNCI]*y_cur[IDX_H3SII] + - k[3041]*y_cur[IDX_HNCI]*y_cur[IDX_HCOII] + - k[3042]*y_cur[IDX_HNCI]*y_cur[IDX_HNOII] + - k[3043]*y_cur[IDX_HNCI]*y_cur[IDX_HSII] + - k[3044]*y_cur[IDX_HNCI]*y_cur[IDX_N2HII] + - k[3045]*y_cur[IDX_HNCI]*y_cur[IDX_O2HII] + - k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[3398]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] + - k[3407]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + - k[3493]*y_cur[IDX_NHII]*y_cur[IDX_HCNI] + - k[3495]*y_cur[IDX_NHII]*y_cur[IDX_HNCI] + - k[3519]*y_cur[IDX_NH2II]*y_cur[IDX_HCNI] + - k[3521]*y_cur[IDX_NH2II]*y_cur[IDX_HNCI] - - k[3540]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] - - k[3541]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + - k[3561]*y_cur[IDX_NH3I]*y_cur[IDX_C2NII] + - k[3564]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] + - k[3566]*y_cur[IDX_NH3I]*y_cur[IDX_CClII] + - k[3572]*y_cur[IDX_NH3I]*y_cur[IDX_CNCII] + - k[3581]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - - k[3582]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] - - k[3583]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + - k[3608]*y_cur[IDX_NHI]*y_cur[IDX_CH3II] - - k[3629]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] - - k[3630]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] + - k[3781]*y_cur[IDX_OHII]*y_cur[IDX_HCNI] + - k[3784]*y_cur[IDX_OHII]*y_cur[IDX_HNCI] - - k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] - - k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] - - k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] - - k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] - - k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] - - k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] - - k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] - - k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] - - k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] - - k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] - - k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] - - k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] - - k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] - - k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] - - k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] - - k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] - - k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] - - k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] - - k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] - - k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] - - k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] - - k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] - - k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] - - k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] - - k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] - - k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] - - k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] - - k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] - - k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] - - k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] - - k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] - - k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] - - k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] - - k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] - - k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] - - k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] - - k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] - - k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] - - k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] - - k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] - - k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] - - k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] - - k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] - - k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] - - k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] - - k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] - - k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] - - k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] - - k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] - - k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] - - k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] - - k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] - - k[4813]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] - - k[4814]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] - - k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - - k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - - k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - - k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - - k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCNOI] = 0.0 - - k[520]*y_cur[IDX_HeII]*y_cur[IDX_HCNOI] + - k[995]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + - k[1095]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] - - k[2343]*y_cur[IDX_HII]*y_cur[IDX_HCNOI] - - k[2695]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] - - k[2696]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + - k[5005]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - - k[5202]*y_cur[IDX_HCNOI]*y_cur[IDX_CI] - - k[5203]*y_cur[IDX_HCNOI]*y_cur[IDX_OI] - k[5855]*y_cur[IDX_HCNOI] - - k[6182]*y_cur[IDX_HCNOI] + - k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + - k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] - - k[6971]*y_cur[IDX_HCNOI] + k[7153]*y_cur[IDX_GHCNOI] + - k[7335]*y_cur[IDX_GHCNOI] + k[7517]*y_cur[IDX_GHCNOI] + - k[8621]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; - ydot[yistart + IDX_HCNOII] = 0.0 + - k[520]*y_cur[IDX_HeII]*y_cur[IDX_HCNOI] - - k[1092]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] - - k[1093]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + - k[2672]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - - k[2897]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] - - k[2898]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] - - k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] - - k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCNOHII] = 0.0 - - k[1094]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] - - k[1095]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] - - k[1096]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] + - k[2696]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + - k[2713]*y_cur[IDX_H3II]*y_cur[IDX_HONCI] + - k[2898]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] + - k[3053]*y_cur[IDX_HONCII]*y_cur[IDX_H2I] - - k[6532]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - - k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - - k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCOI] = 0.0 + k[9]*y_cur[IDX_CM]*y_cur[IDX_OHI] + - k[57]*y_cur[IDX_CI]*y_cur[IDX_OHM] + - k[62]*y_cur[IDX_CHI]*y_cur[IDX_OM] + - k[73]*y_cur[IDX_HM]*y_cur[IDX_COI] - - k[76]*y_cur[IDX_HM]*y_cur[IDX_HCOI] - - k[178]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - - k[205]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] - - k[225]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] - - k[251]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] - - k[272]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - - k[302]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] - - k[310]*y_cur[IDX_COII]*y_cur[IDX_HCOI] - - k[389]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - - k[450]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] - - k[470]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + - k[499]*y_cur[IDX_HCOII]*y_cur[IDX_FeI] - - k[500]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] - - k[501]*y_cur[IDX_HCOI]*y_cur[IDX_H2SII] - - k[502]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] - - k[503]*y_cur[IDX_HCOI]*y_cur[IDX_SII] - - k[504]*y_cur[IDX_HCOI]*y_cur[IDX_SiOII] + - k[533]*y_cur[IDX_MgI]*y_cur[IDX_HCOII] - - k[555]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - - k[568]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] - - k[581]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] - - k[593]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + - k[637]*y_cur[IDX_NaI]*y_cur[IDX_HCOII] - - k[658]*y_cur[IDX_OII]*y_cur[IDX_HCOI] - - k[691]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + - k[938]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + - k[940]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + - k[999]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[1038]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + - k[1053]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] + - k[1102]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + - k[1103]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] + - k[1120]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + - k[1275]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1277]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1278]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + - k[1280]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + - k[1382]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - - k[1408]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - - k[1454]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + - k[1457]*y_cur[IDX_C2I]*y_cur[IDX_H2COII] - - k[1477]*y_cur[IDX_C2HII]*y_cur[IDX_HCOI] - - k[1524]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] + - k[1744]*y_cur[IDX_C2HI]*y_cur[IDX_H2COII] - - k[1959]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] + - k[1968]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - - k[1987]*y_cur[IDX_CH2II]*y_cur[IDX_HCOI] + - k[1993]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] + - k[2002]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] - - k[2082]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - - k[2230]*y_cur[IDX_CH5II]*y_cur[IDX_HCOI] + - k[2246]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - - k[2273]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + - k[2280]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - - k[2344]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - - k[2345]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - - k[2389]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + - k[2487]*y_cur[IDX_H2COII]*y_cur[IDX_CH3OHI] + - k[2488]*y_cur[IDX_H2COII]*y_cur[IDX_H2COI] + - k[2490]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + - k[2493]*y_cur[IDX_H2COI]*y_cur[IDX_CH3COCH3II] - - k[2513]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - - k[2514]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + - k[2542]*y_cur[IDX_H2OI]*y_cur[IDX_H2COII] - - k[2697]*y_cur[IDX_H3II]*y_cur[IDX_HCOI] - - k[2857]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] - - k[2858]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] + - k[2874]*y_cur[IDX_HCNI]*y_cur[IDX_H2COII] - - k[2969]*y_cur[IDX_HCOII]*y_cur[IDX_HCOI] - - k[3007]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] - - k[3008]*y_cur[IDX_HCOI]*y_cur[IDX_HNOII] - - k[3009]*y_cur[IDX_HCOI]*y_cur[IDX_N2HII] - - k[3010]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] - - k[3011]*y_cur[IDX_HCOI]*y_cur[IDX_O2HII] - - k[3012]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + - k[3038]*y_cur[IDX_HNCI]*y_cur[IDX_H2COII] + - k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] - - k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - - k[3250]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - - k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - - k[3350]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - - k[3364]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + - k[3484]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - - k[3494]*y_cur[IDX_NHII]*y_cur[IDX_HCOI] + - k[3511]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - - k[3520]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] + - k[3535]*y_cur[IDX_NH2I]*y_cur[IDX_H2COII] + - k[3549]*y_cur[IDX_NH3II]*y_cur[IDX_H2COI] - - k[3552]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + - k[3574]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - - k[3646]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + - k[3691]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] - - k[3782]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - - k[3783]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + - k[3846]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + - k[3850]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + - k[3853]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[3905]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + - k[3940]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + - k[3975]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + - k[4010]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + - k[4045]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + - k[4080]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + - k[4115]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + - k[4150]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + - k[4185]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + - k[4220]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + - k[4255]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + - k[4290]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + - k[4325]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + - k[4360]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + - k[4395]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + - k[4430]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + - k[4465]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + - k[4500]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + - k[4535]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + - k[4570]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + - k[4605]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + - k[4640]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + - k[4675]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + - k[4711]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + - k[4746]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + - k[4781]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] + - k[4816]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] + - k[4851]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + - k[4881]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] + - k[4904]*y_cur[IDX_C2HI]*y_cur[IDX_O2I] - - k[4962]*y_cur[IDX_CI]*y_cur[IDX_HCOI] - - k[4963]*y_cur[IDX_CI]*y_cur[IDX_HCOI] + - k[4998]*y_cur[IDX_CH2I]*y_cur[IDX_H2COI] - - k[4999]*y_cur[IDX_CH2I]*y_cur[IDX_HCOI] + - k[5011]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + - k[5014]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + - k[5030]*y_cur[IDX_CH3I]*y_cur[IDX_H2COI] - - k[5033]*y_cur[IDX_CH3I]*y_cur[IDX_HCOI] + - k[5040]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + - k[5075]*y_cur[IDX_CHI]*y_cur[IDX_CO2I] + - k[5076]*y_cur[IDX_CHI]*y_cur[IDX_H2COI] - - k[5077]*y_cur[IDX_CHI]*y_cur[IDX_HCOI] + - k[5084]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + - k[5092]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5093]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5094]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] + - k[5099]*y_cur[IDX_CHI]*y_cur[IDX_OHI] + - k[5114]*y_cur[IDX_CNI]*y_cur[IDX_H2COI] - - k[5117]*y_cur[IDX_CNI]*y_cur[IDX_HCOI] + - k[5150]*y_cur[IDX_H2COI]*y_cur[IDX_O2HI] + - k[5165]*y_cur[IDX_HI]*y_cur[IDX_H2COI] - - k[5171]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - - k[5172]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - - k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] - - k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] - - k[5205]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] - - k[5205]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] - - k[5206]*y_cur[IDX_HCOI]*y_cur[IDX_HNOI] - - k[5207]*y_cur[IDX_HCOI]*y_cur[IDX_NOI] - - k[5208]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - - k[5209]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - - k[5210]*y_cur[IDX_HCOI]*y_cur[IDX_O2HI] - - k[5265]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - - k[5266]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - - k[5267]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + - k[5349]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + - k[5383]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + - k[5397]*y_cur[IDX_OI]*y_cur[IDX_H2COI] - - k[5405]*y_cur[IDX_OI]*y_cur[IDX_HCOI] - - k[5406]*y_cur[IDX_OI]*y_cur[IDX_HCOI] + - k[5465]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] - - k[5471]*y_cur[IDX_OHI]*y_cur[IDX_HCOI] - - k[5486]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - - k[5487]*y_cur[IDX_SI]*y_cur[IDX_HCOI] + - k[5633]*y_cur[IDX_CII]*y_cur[IDX_CH2OHI] + - k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + - k[5808]*y_cur[IDX_CH3CHOI] - k[5856]*y_cur[IDX_HCOI] - - k[5857]*y_cur[IDX_HCOI] + k[5860]*y_cur[IDX_HCOOHI] + - k[5945]*y_cur[IDX_CH2OHCHOI] + k[6113]*y_cur[IDX_CH3CHOI] - - k[6184]*y_cur[IDX_HCOI] - k[6185]*y_cur[IDX_HCOI] + - k[6187]*y_cur[IDX_HCOOHI] + k[6295]*y_cur[IDX_CH2OHCHOI] + - k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + - k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + - k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + - k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + - k[6575]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + - k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + - k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + - k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] + - k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - - k[6919]*y_cur[IDX_HCOI] + k[7101]*y_cur[IDX_GHCOI] + - k[7283]*y_cur[IDX_GHCOI] + k[7465]*y_cur[IDX_GHCOI] + - k[8594]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] + - k[8685]*y_cur[IDX_GOI]*y_cur[IDX_GCHI]; - ydot[yistart + IDX_HCOII] = 0.0 + k[63]*y_cur[IDX_CHI]*y_cur[IDX_OI] - + k[137]*y_cur[IDX_H2I]*y_cur[IDX_HOCII] + - k[178]*y_cur[IDX_CII]*y_cur[IDX_HCOI] + - k[205]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + - k[225]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] + - k[251]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] + - k[272]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] + - k[302]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + - k[310]*y_cur[IDX_COII]*y_cur[IDX_HCOI] + - k[389]*y_cur[IDX_HII]*y_cur[IDX_HCOI] + - k[450]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + - k[470]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - - k[499]*y_cur[IDX_HCOII]*y_cur[IDX_FeI] + - k[500]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] + - k[501]*y_cur[IDX_HCOI]*y_cur[IDX_H2SII] + - k[502]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] + - k[503]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + - k[504]*y_cur[IDX_HCOI]*y_cur[IDX_SiOII] - - k[533]*y_cur[IDX_MgI]*y_cur[IDX_HCOII] + - k[555]*y_cur[IDX_NII]*y_cur[IDX_HCOI] + - k[568]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + - k[581]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] + - k[593]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] - - k[637]*y_cur[IDX_NaI]*y_cur[IDX_HCOII] + - k[658]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + - k[691]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - - k[1097]*y_cur[IDX_HCOII]*y_cur[IDX_eM] + - k[1391]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + - k[1393]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - - k[1459]*y_cur[IDX_C2I]*y_cur[IDX_HCOII] - - k[1566]*y_cur[IDX_C2H2I]*y_cur[IDX_HCOII] - - k[1644]*y_cur[IDX_C2H3I]*y_cur[IDX_HCOII] - - k[1708]*y_cur[IDX_C2H4I]*y_cur[IDX_HCOII] + - k[1743]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - - k[1746]*y_cur[IDX_C2HI]*y_cur[IDX_HCOII] + - k[1901]*y_cur[IDX_CI]*y_cur[IDX_H3OII] - - k[1904]*y_cur[IDX_CI]*y_cur[IDX_HCOII] + - k[1946]*y_cur[IDX_CHII]*y_cur[IDX_CO2I] + - k[1950]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + - k[1953]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + - k[1967]*y_cur[IDX_CHII]*y_cur[IDX_O2I] + - k[1981]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + - k[1990]*y_cur[IDX_CH2II]*y_cur[IDX_O2I] + - k[1991]*y_cur[IDX_CH2II]*y_cur[IDX_OI] + - k[2001]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - - k[2008]*y_cur[IDX_CH2I]*y_cur[IDX_HCOII] + - k[2077]*y_cur[IDX_CH3II]*y_cur[IDX_H2COI] + - k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] + - k[2091]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + - k[2140]*y_cur[IDX_CH4II]*y_cur[IDX_COI] + - k[2190]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + - k[2224]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + - k[2245]*y_cur[IDX_CHI]*y_cur[IDX_COII] - - k[2253]*y_cur[IDX_CHI]*y_cur[IDX_HCOII] + - k[2262]*y_cur[IDX_CHI]*y_cur[IDX_O2II] + - k[2268]*y_cur[IDX_CHI]*y_cur[IDX_SiOII] + - k[2271]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] + - k[2280]*y_cur[IDX_COII]*y_cur[IDX_H2COI] + - k[2281]*y_cur[IDX_COII]*y_cur[IDX_H2SI] + - k[2283]*y_cur[IDX_COI]*y_cur[IDX_CH3CNII] + - k[2284]*y_cur[IDX_COI]*y_cur[IDX_H2ClII] + - k[2285]*y_cur[IDX_COI]*y_cur[IDX_HCO2II] + - k[2286]*y_cur[IDX_COI]*y_cur[IDX_HNOII] + - k[2287]*y_cur[IDX_COI]*y_cur[IDX_HNSiII] + - k[2288]*y_cur[IDX_COI]*y_cur[IDX_N2HII] + - k[2289]*y_cur[IDX_COI]*y_cur[IDX_O2HII] + - k[2291]*y_cur[IDX_COI]*y_cur[IDX_SiH4II] + - k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + - k[2334]*y_cur[IDX_HII]*y_cur[IDX_CO2I] + - k[2338]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + - k[2383]*y_cur[IDX_H2II]*y_cur[IDX_COI] + - k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + - k[2434]*y_cur[IDX_H2I]*y_cur[IDX_COII] + - k[2489]*y_cur[IDX_H2COII]*y_cur[IDX_O2I] + - k[2498]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + - k[2501]*y_cur[IDX_H2COI]*y_cur[IDX_SII] + - k[2507]*y_cur[IDX_H2OII]*y_cur[IDX_COI] + - k[2526]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] + - k[2530]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + - k[2532]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] + - k[2537]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] + - k[2539]*y_cur[IDX_H2OI]*y_cur[IDX_CNCII] + - k[2540]*y_cur[IDX_H2OI]*y_cur[IDX_COII] - - k[2547]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] + - k[2675]*y_cur[IDX_H3II]*y_cur[IDX_COI] + - k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] + - k[2841]*y_cur[IDX_HI]*y_cur[IDX_CO2II] + - k[2854]*y_cur[IDX_HCNII]*y_cur[IDX_COI] - - k[2877]*y_cur[IDX_HCNI]*y_cur[IDX_HCOII] - - k[2899]*y_cur[IDX_HCOII]*y_cur[IDX_C10I] - + ydot[yistart + IDX_GFeI] = 0.0 + k[7016]*y_cur[IDX_FeI] - + k[7198]*y_cur[IDX_GFeI] - k[7380]*y_cur[IDX_GFeI] - + k[7564]*y_cur[IDX_GFeI]; + ydot[yistart + IDX_GHeI] = 0.0 + k[6890]*y_cur[IDX_HeI] - + k[7072]*y_cur[IDX_GHeI] - k[7254]*y_cur[IDX_GHeI] - + k[7436]*y_cur[IDX_GHeI]; + ydot[yistart + IDX_GMgI] = 0.0 + k[6906]*y_cur[IDX_MgI] - + k[7088]*y_cur[IDX_GMgI] - k[7270]*y_cur[IDX_GMgI] - + k[7452]*y_cur[IDX_GMgI]; + ydot[yistart + IDX_GNaI] = 0.0 + k[6905]*y_cur[IDX_NaI] - + k[7087]*y_cur[IDX_GNaI] - k[7269]*y_cur[IDX_GNaI] - + k[7451]*y_cur[IDX_GNaI]; + ydot[yistart + IDX_GH2S2I] = 0.0 + k[7038]*y_cur[IDX_H2S2I] - + k[7220]*y_cur[IDX_GH2S2I] - k[7402]*y_cur[IDX_GH2S2I] - + k[7584]*y_cur[IDX_GH2S2I] - k[7846]*y_cur[IDX_GH2S2I] - + k[8175]*y_cur[IDX_GH2S2I]; + ydot[yistart + IDX_GC4H6I] = 0.0 + k[7009]*y_cur[IDX_C4H6I] - + k[7191]*y_cur[IDX_GC4H6I] - k[7373]*y_cur[IDX_GC4H6I] - + k[7555]*y_cur[IDX_GC4H6I] - k[7807]*y_cur[IDX_GC4H6I] - + k[8136]*y_cur[IDX_GC4H6I]; + ydot[yistart + IDX_GC4SI] = 0.0 + k[7049]*y_cur[IDX_C4SI] - + k[7231]*y_cur[IDX_GC4SI] - k[7413]*y_cur[IDX_GC4SI] - + k[7595]*y_cur[IDX_GC4SI] - k[7860]*y_cur[IDX_GC4SI] - + k[8192]*y_cur[IDX_GC4SI]; + ydot[yistart + IDX_GCClI] = 0.0 + k[6991]*y_cur[IDX_CClI] - + k[7173]*y_cur[IDX_GCClI] - k[7355]*y_cur[IDX_GCClI] - + k[7537]*y_cur[IDX_GCClI] - k[7781]*y_cur[IDX_GCClI] - + k[8105]*y_cur[IDX_GCClI]; + ydot[yistart + IDX_GCH3C3NI] = 0.0 + k[7036]*y_cur[IDX_CH3C3NI] - + k[7218]*y_cur[IDX_GCH3C3NI] - k[7400]*y_cur[IDX_GCH3C3NI] - + k[7582]*y_cur[IDX_GCH3C3NI] - k[7844]*y_cur[IDX_GCH3C3NI] - + k[8171]*y_cur[IDX_GCH3C3NI] + + k[8552]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI]; + ydot[yistart + IDX_GCH3C4HI] = 0.0 + k[7034]*y_cur[IDX_CH3C4HI] - + k[7216]*y_cur[IDX_GCH3C4HI] - k[7398]*y_cur[IDX_GCH3C4HI] - + k[7580]*y_cur[IDX_GCH3C4HI] - k[7841]*y_cur[IDX_GCH3C4HI] - + k[8167]*y_cur[IDX_GCH3C4HI]; + ydot[yistart + IDX_GCH3C5NI] = 0.0 + k[7054]*y_cur[IDX_CH3C5NI] - + k[7236]*y_cur[IDX_GCH3C5NI] - k[7418]*y_cur[IDX_GCH3C5NI] - + k[7600]*y_cur[IDX_GCH3C5NI] - k[7865]*y_cur[IDX_GCH3C5NI] - + k[8204]*y_cur[IDX_GCH3C5NI] + + k[8553]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI]; + ydot[yistart + IDX_GCH3C6HI] = 0.0 + k[7053]*y_cur[IDX_CH3C6HI] - + k[7235]*y_cur[IDX_GCH3C6HI] - k[7417]*y_cur[IDX_GCH3C6HI] - + k[7599]*y_cur[IDX_GCH3C6HI] - k[7864]*y_cur[IDX_GCH3C6HI] - + k[8203]*y_cur[IDX_GCH3C6HI]; + ydot[yistart + IDX_GCH3C7NI] = 0.0 + k[7063]*y_cur[IDX_CH3C7NI] - + k[7245]*y_cur[IDX_GCH3C7NI] - k[7427]*y_cur[IDX_GCH3C7NI] - + k[7609]*y_cur[IDX_GCH3C7NI] - k[7874]*y_cur[IDX_GCH3C7NI] - + k[8228]*y_cur[IDX_GCH3C7NI] + + k[8554]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI]; + ydot[yistart + IDX_GClOI] = 0.0 + k[6999]*y_cur[IDX_ClOI] - + k[7181]*y_cur[IDX_GClOI] - k[7363]*y_cur[IDX_GClOI] - + k[7545]*y_cur[IDX_GClOI] - k[7796]*y_cur[IDX_GClOI] - + k[8121]*y_cur[IDX_GClOI]; + ydot[yistart + IDX_GHC2PI] = 0.0 + k[7017]*y_cur[IDX_HC2PI] - + k[7199]*y_cur[IDX_GHC2PI] - k[7381]*y_cur[IDX_GHC2PI] - + k[7567]*y_cur[IDX_GHC2PI] - k[7817]*y_cur[IDX_GHC2PI] - + k[8145]*y_cur[IDX_GHC2PI]; + ydot[yistart + IDX_GHClI] = 0.0 + k[6944]*y_cur[IDX_HClI] - + k[7126]*y_cur[IDX_GHClI] - k[7308]*y_cur[IDX_GHClI] - + k[7490]*y_cur[IDX_GHClI] - k[7713]*y_cur[IDX_GHClI] - + k[8018]*y_cur[IDX_GHClI] - k[8019]*y_cur[IDX_GHClI] + + k[8314]*y_cur[IDX_GHI]*y_cur[IDX_GClI]; + ydot[yistart + IDX_GHFI] = 0.0 + k[6904]*y_cur[IDX_HFI] - + k[7086]*y_cur[IDX_GHFI] - k[7268]*y_cur[IDX_GHFI] - + k[7450]*y_cur[IDX_GHFI] - k[7640]*y_cur[IDX_GHFI] - + k[7926]*y_cur[IDX_GHFI] + k[8284]*y_cur[IDX_GHI]*y_cur[IDX_GFI]; + ydot[yistart + IDX_GHNSiI] = 0.0 + k[6967]*y_cur[IDX_HNSiI] - + k[7149]*y_cur[IDX_GHNSiI] - k[7331]*y_cur[IDX_GHNSiI] - + k[7513]*y_cur[IDX_GHNSiI] - k[7750]*y_cur[IDX_GHNSiI] - + k[8064]*y_cur[IDX_GHNSiI]; + ydot[yistart + IDX_GHPOI] = 0.0 + k[6993]*y_cur[IDX_HPOI] - + k[7175]*y_cur[IDX_GHPOI] - k[7357]*y_cur[IDX_GHPOI] - + k[7539]*y_cur[IDX_GHPOI] - k[7785]*y_cur[IDX_GHPOI] - + k[8109]*y_cur[IDX_GHPOI]; + ydot[yistart + IDX_GNH2CNI] = 0.0 + k[6962]*y_cur[IDX_NH2CNI] - + k[7144]*y_cur[IDX_GNH2CNI] - k[7326]*y_cur[IDX_GNH2CNI] - + k[7508]*y_cur[IDX_GNH2CNI] - k[7739]*y_cur[IDX_GNH2CNI] - + k[8050]*y_cur[IDX_GNH2CNI]; + ydot[yistart + IDX_GNO2I] = 0.0 + k[6985]*y_cur[IDX_NO2I] - + k[7167]*y_cur[IDX_GNO2I] - k[7349]*y_cur[IDX_GNO2I] - + k[7531]*y_cur[IDX_GNO2I] - k[7778]*y_cur[IDX_GNO2I] - + k[8099]*y_cur[IDX_GNO2I] - k[8100]*y_cur[IDX_GNO2I]; + ydot[yistart + IDX_GPNI] = 0.0 + k[6982]*y_cur[IDX_PNI] - + k[7164]*y_cur[IDX_GPNI] - k[7346]*y_cur[IDX_GPNI] - + k[7528]*y_cur[IDX_GPNI] - k[7768]*y_cur[IDX_GPNI] - + k[8088]*y_cur[IDX_GPNI]; + ydot[yistart + IDX_GSiC3HI] = 0.0 + k[7035]*y_cur[IDX_SiC3HI] - + k[7217]*y_cur[IDX_GSiC3HI] - k[7399]*y_cur[IDX_GSiC3HI] - + k[7581]*y_cur[IDX_GSiC3HI] - k[7843]*y_cur[IDX_GSiC3HI] - + k[8170]*y_cur[IDX_GSiC3HI]; + ydot[yistart + IDX_GSiCH3I] = 0.0 + k[6970]*y_cur[IDX_SiCH3I] - + k[7152]*y_cur[IDX_GSiCH3I] - k[7334]*y_cur[IDX_GSiCH3I] - + k[7516]*y_cur[IDX_GSiCH3I] - k[7749]*y_cur[IDX_GSiCH3I] - + k[8063]*y_cur[IDX_GSiCH3I]; + ydot[yistart + IDX_GSiO2I] = 0.0 + k[7025]*y_cur[IDX_SiO2I] - + k[7207]*y_cur[IDX_GSiO2I] - k[7389]*y_cur[IDX_GSiO2I] - + k[7573]*y_cur[IDX_GSiO2I] - k[7832]*y_cur[IDX_GSiO2I] - + k[8156]*y_cur[IDX_GSiO2I]; + ydot[yistart + IDX_GSiSI] = 0.0 + k[7023]*y_cur[IDX_SiSI] - + k[7205]*y_cur[IDX_GSiSI] - k[7387]*y_cur[IDX_GSiSI] - + k[7571]*y_cur[IDX_GSiSI] - k[7831]*y_cur[IDX_GSiSI] - + k[8155]*y_cur[IDX_GSiSI]; + ydot[yistart + IDX_GFI] = 0.0 + k[6903]*y_cur[IDX_FI] - + k[7085]*y_cur[IDX_GFI] - k[7267]*y_cur[IDX_GFI] - + k[7449]*y_cur[IDX_GFI] + k[7640]*y_cur[IDX_GHFI] + + k[7926]*y_cur[IDX_GHFI] - k[8284]*y_cur[IDX_GHI]*y_cur[IDX_GFI] - + k[8585]*y_cur[IDX_GHI]*y_cur[IDX_GFI]; + ydot[yistart + IDX_GH2SiOI] = 0.0 + k[6988]*y_cur[IDX_H2SiOI] - + k[7170]*y_cur[IDX_GH2SiOI] - k[7352]*y_cur[IDX_GH2SiOI] - + k[7534]*y_cur[IDX_GH2SiOI] - k[7776]*y_cur[IDX_GH2SiOI] - + k[8096]*y_cur[IDX_GH2SiOI] - k[8097]*y_cur[IDX_GH2SiOI]; + ydot[yistart + IDX_GNCCNI] = 0.0 + k[7005]*y_cur[IDX_NCCNI] - + k[7187]*y_cur[IDX_GNCCNI] - k[7369]*y_cur[IDX_GNCCNI] - + k[7551]*y_cur[IDX_GNCCNI] - k[7801]*y_cur[IDX_GNCCNI] - + k[8126]*y_cur[IDX_GNCCNI] - k[8127]*y_cur[IDX_GNCCNI] - + k[8128]*y_cur[IDX_GNCCNI]; + ydot[yistart + IDX_GS2I] = 0.0 + k[7033]*y_cur[IDX_S2I] - + k[7215]*y_cur[IDX_GS2I] - k[7397]*y_cur[IDX_GS2I] - + k[7579]*y_cur[IDX_GS2I] - k[7840]*y_cur[IDX_GS2I] - + k[8165]*y_cur[IDX_GS2I] - k[8166]*y_cur[IDX_GS2I] + + k[8174]*y_cur[IDX_GHS2I]; + ydot[yistart + IDX_GSiC2HI] = 0.0 + k[7008]*y_cur[IDX_SiC2HI] - + k[7190]*y_cur[IDX_GSiC2HI] - k[7372]*y_cur[IDX_GSiC2HI] - + k[7554]*y_cur[IDX_GSiC2HI] - k[7805]*y_cur[IDX_GSiC2HI] - + k[8133]*y_cur[IDX_GSiC2HI] + k[8137]*y_cur[IDX_GSiC2H2I]; + ydot[yistart + IDX_C2H4CNI] = 0.0 - k[5941]*y_cur[IDX_C2H4CNI] - + k[7011]*y_cur[IDX_C2H4CNI] + k[7193]*y_cur[IDX_GC2H4CNI] + + k[7375]*y_cur[IDX_GC2H4CNI] + k[7557]*y_cur[IDX_GC2H4CNI] + + k[8634]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI]; + ydot[yistart + IDX_GC3SI] = 0.0 + k[7040]*y_cur[IDX_C3SI] - + k[7222]*y_cur[IDX_GC3SI] - k[7404]*y_cur[IDX_GC3SI] - + k[7586]*y_cur[IDX_GC3SI] - k[7848]*y_cur[IDX_GC3SI] - + k[8177]*y_cur[IDX_GC3SI] + k[8422]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI]; + ydot[yistart + IDX_GC4NI] = 0.0 + k[7030]*y_cur[IDX_C4NI] - + k[7212]*y_cur[IDX_GC4NI] - k[7394]*y_cur[IDX_GC4NI] - + k[7576]*y_cur[IDX_GC4NI] - k[7836]*y_cur[IDX_GC4NI] - + k[8160]*y_cur[IDX_GC4NI] - k[8161]*y_cur[IDX_GC4NI]; + ydot[yistart + IDX_GC4PI] = 0.0 + k[7048]*y_cur[IDX_C4PI] - + k[7230]*y_cur[IDX_GC4PI] - k[7412]*y_cur[IDX_GC4PI] - + k[7594]*y_cur[IDX_GC4PI] - k[7859]*y_cur[IDX_GC4PI] - + k[8191]*y_cur[IDX_GC4PI]; + ydot[yistart + IDX_GCH2PHI] = 0.0 + k[6984]*y_cur[IDX_CH2PHI] - + k[7166]*y_cur[IDX_GCH2PHI] - k[7348]*y_cur[IDX_GCH2PHI] - + k[7530]*y_cur[IDX_GCH2PHI] - k[7775]*y_cur[IDX_GCH2PHI] - + k[8095]*y_cur[IDX_GCH2PHI]; + ydot[yistart + IDX_GCH3CHCH2I] = 0.0 + k[6959]*y_cur[IDX_CH3CHCH2I] + - k[7141]*y_cur[IDX_GCH3CHCH2I] - k[7323]*y_cur[IDX_GCH3CHCH2I] - + k[7505]*y_cur[IDX_GCH3CHCH2I] - k[7740]*y_cur[IDX_GCH3CHCH2I] + + k[7807]*y_cur[IDX_GC4H6I] - k[8051]*y_cur[IDX_GCH3CHCH2I] + + k[8136]*y_cur[IDX_GC4H6I]; + ydot[yistart + IDX_GCH3COOHI] = 0.0 + k[7027]*y_cur[IDX_CH3COOHI] - + k[7209]*y_cur[IDX_GCH3COOHI] - k[7391]*y_cur[IDX_GCH3COOHI] - + k[7566]*y_cur[IDX_GCH3COOHI] - k[7891]*y_cur[IDX_GCH3COOHI] - + k[7892]*y_cur[IDX_GCH3COOHI] - k[8271]*y_cur[IDX_GCH3COOHI] - + k[8272]*y_cur[IDX_GCH3COOHI] + + k[8504]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] + + k[8549]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI]; + ydot[yistart + IDX_GH2SI] = 0.0 + k[6941]*y_cur[IDX_H2SI] - + k[7123]*y_cur[IDX_GH2SI] - k[7305]*y_cur[IDX_GH2SI] - + k[7487]*y_cur[IDX_GH2SI] - k[7709]*y_cur[IDX_GH2SI] - + k[7710]*y_cur[IDX_GH2SI] - k[7711]*y_cur[IDX_GH2SI] - + k[8013]*y_cur[IDX_GH2SI] - k[8014]*y_cur[IDX_GH2SI] - + k[8015]*y_cur[IDX_GH2SI] - k[8016]*y_cur[IDX_GH2SI] + + k[8312]*y_cur[IDX_GHI]*y_cur[IDX_GHSI] - + k[8313]*y_cur[IDX_GHI]*y_cur[IDX_GH2SI]; + ydot[yistart + IDX_GHCNOI] = 0.0 + k[6971]*y_cur[IDX_HCNOI] - + k[7153]*y_cur[IDX_GHCNOI] - k[7335]*y_cur[IDX_GHCNOI] - + k[7517]*y_cur[IDX_GHCNOI] - k[7752]*y_cur[IDX_GHCNOI] - + k[8066]*y_cur[IDX_GHCNOI] + k[8326]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; + ydot[yistart + IDX_GHCPI] = 0.0 + k[6976]*y_cur[IDX_HCPI] - + k[7158]*y_cur[IDX_GHCPI] - k[7340]*y_cur[IDX_GHCPI] - + k[7522]*y_cur[IDX_GHCPI] - k[7759]*y_cur[IDX_GHCPI] + + k[7775]*y_cur[IDX_GCH2PHI] - k[8077]*y_cur[IDX_GHCPI]; + ydot[yistart + IDX_GHNC3I] = 0.0 + k[7000]*y_cur[IDX_HNC3I] - + k[7182]*y_cur[IDX_GHNC3I] - k[7364]*y_cur[IDX_GHNC3I] - + k[7546]*y_cur[IDX_GHNC3I] - k[7797]*y_cur[IDX_GHNC3I] - + k[8122]*y_cur[IDX_GHNC3I]; + ydot[yistart + IDX_GHNCOI] = 0.0 + k[6968]*y_cur[IDX_HNCOI] - + k[7150]*y_cur[IDX_GHNCOI] - k[7332]*y_cur[IDX_GHNCOI] - + k[7514]*y_cur[IDX_GHNCOI] - k[7751]*y_cur[IDX_GHNCOI] - + k[8065]*y_cur[IDX_GHNCOI] + k[8329]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] + + k[8526]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_GHOCNI] = 0.0 + k[6969]*y_cur[IDX_HOCNI] - + k[7151]*y_cur[IDX_GHOCNI] - k[7333]*y_cur[IDX_GHOCNI] - + k[7515]*y_cur[IDX_GHOCNI] - k[7755]*y_cur[IDX_GHOCNI] - + k[8069]*y_cur[IDX_GHOCNI] + k[8328]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI]; + ydot[yistart + IDX_GHONCI] = 0.0 + k[6973]*y_cur[IDX_HONCI] - + k[7155]*y_cur[IDX_GHONCI] - k[7337]*y_cur[IDX_GHONCI] - + k[7519]*y_cur[IDX_GHONCI] - k[7754]*y_cur[IDX_GHONCI] - + k[8068]*y_cur[IDX_GHONCI] + k[8327]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; + ydot[yistart + IDX_GHS2I] = 0.0 + k[7037]*y_cur[IDX_HS2I] - + k[7219]*y_cur[IDX_GHS2I] - k[7401]*y_cur[IDX_GHS2I] - + k[7583]*y_cur[IDX_GHS2I] - k[7845]*y_cur[IDX_GHS2I] - + k[8172]*y_cur[IDX_GHS2I] - k[8173]*y_cur[IDX_GHS2I] - + k[8174]*y_cur[IDX_GHS2I]; + ydot[yistart + IDX_GN2OI] = 0.0 + k[6974]*y_cur[IDX_N2OI] - + k[7156]*y_cur[IDX_GN2OI] - k[7338]*y_cur[IDX_GN2OI] - + k[7520]*y_cur[IDX_GN2OI] - k[7756]*y_cur[IDX_GN2OI] - + k[8070]*y_cur[IDX_GN2OI] - k[8071]*y_cur[IDX_GN2OI] - + k[8072]*y_cur[IDX_GN2OI] - k[8073]*y_cur[IDX_GN2OI] - + k[8074]*y_cur[IDX_GN2OI]; + ydot[yistart + IDX_GPH2I] = 0.0 + k[6939]*y_cur[IDX_PH2I] - + k[7121]*y_cur[IDX_GPH2I] - k[7303]*y_cur[IDX_GPH2I] - + k[7485]*y_cur[IDX_GPH2I] - k[7706]*y_cur[IDX_GPH2I] - + k[8007]*y_cur[IDX_GPH2I] - k[8008]*y_cur[IDX_GPH2I] - + k[8009]*y_cur[IDX_GPH2I] - k[8010]*y_cur[IDX_GPH2I]; + ydot[yistart + IDX_GPOI] = 0.0 + k[6992]*y_cur[IDX_POI] - + k[7174]*y_cur[IDX_GPOI] - k[7356]*y_cur[IDX_GPOI] - + k[7538]*y_cur[IDX_GPOI] - k[7782]*y_cur[IDX_GPOI] + + k[7785]*y_cur[IDX_GHPOI] - k[8106]*y_cur[IDX_GPOI] + + k[8109]*y_cur[IDX_GHPOI]; + ydot[yistart + IDX_GSiC2H2I] = 0.0 + k[7010]*y_cur[IDX_SiC2H2I] - + k[7192]*y_cur[IDX_GSiC2H2I] - k[7374]*y_cur[IDX_GSiC2H2I] - + k[7556]*y_cur[IDX_GSiC2H2I] - k[7808]*y_cur[IDX_GSiC2H2I] - + k[8137]*y_cur[IDX_GSiC2H2I]; + ydot[yistart + IDX_GSiC4I] = 0.0 + k[7046]*y_cur[IDX_SiC4I] - + k[7228]*y_cur[IDX_GSiC4I] - k[7410]*y_cur[IDX_GSiC4I] - + k[7592]*y_cur[IDX_GSiC4I] - k[7857]*y_cur[IDX_GSiC4I] - + k[8189]*y_cur[IDX_GSiC4I]; + ydot[yistart + IDX_GSiNCI] = 0.0 + k[7012]*y_cur[IDX_SiNCI] - + k[7194]*y_cur[IDX_GSiNCI] - k[7376]*y_cur[IDX_GSiNCI] - + k[7560]*y_cur[IDX_GSiNCI] - k[7806]*y_cur[IDX_GSiNCI] - + k[8134]*y_cur[IDX_GSiNCI] - k[8135]*y_cur[IDX_GSiNCI]; + ydot[yistart + IDX_HC2OI] = 0.0 - k[5942]*y_cur[IDX_HC2OI] - + k[6958]*y_cur[IDX_HC2OI] + k[7140]*y_cur[IDX_GHC2OI] + + k[7322]*y_cur[IDX_GHC2OI] + k[7504]*y_cur[IDX_GHC2OI] + + k[8619]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI]; + ydot[yistart + IDX_GC3PI] = 0.0 + k[7039]*y_cur[IDX_C3PI] - + k[7221]*y_cur[IDX_GC3PI] - k[7403]*y_cur[IDX_GC3PI] - + k[7585]*y_cur[IDX_GC3PI] - k[7847]*y_cur[IDX_GC3PI] + + k[7859]*y_cur[IDX_GC4PI] - k[8176]*y_cur[IDX_GC3PI]; + ydot[yistart + IDX_GC6H6I] = 0.0 + k[7047]*y_cur[IDX_C6H6I] - + k[7229]*y_cur[IDX_GC6H6I] - k[7411]*y_cur[IDX_GC6H6I] - + k[7593]*y_cur[IDX_GC6H6I] - k[7858]*y_cur[IDX_GC6H6I] - + k[8190]*y_cur[IDX_GC6H6I]; + ydot[yistart + IDX_GH2O2I] = 0.0 + k[6940]*y_cur[IDX_H2O2I] - + k[7122]*y_cur[IDX_GH2O2I] - k[7304]*y_cur[IDX_GH2O2I] - + k[7486]*y_cur[IDX_GH2O2I] - k[7708]*y_cur[IDX_GH2O2I] - + k[8012]*y_cur[IDX_GH2O2I] + k[8308]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] + - k[8309]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - + k[8310]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] + + k[8514]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI]; + ydot[yistart + IDX_GHCSiI] = 0.0 + k[6956]*y_cur[IDX_HCSiI] - + k[7138]*y_cur[IDX_GHCSiI] - k[7320]*y_cur[IDX_GHCSiI] - + k[7502]*y_cur[IDX_GHCSiI] - k[7738]*y_cur[IDX_GHCSiI] - + k[8047]*y_cur[IDX_GHCSiI] - k[8048]*y_cur[IDX_GHCSiI] - + k[8049]*y_cur[IDX_GHCSiI] + k[8057]*y_cur[IDX_GSiCH2I] + + k[8058]*y_cur[IDX_GSiCH2I]; + ydot[yistart + IDX_GPHI] = 0.0 + k[6933]*y_cur[IDX_PHI] - + k[7115]*y_cur[IDX_GPHI] - k[7297]*y_cur[IDX_GPHI] - + k[7479]*y_cur[IDX_GPHI] - k[7696]*y_cur[IDX_GPHI] + + k[7706]*y_cur[IDX_GPH2I] - k[7996]*y_cur[IDX_GPHI] + + k[8007]*y_cur[IDX_GPH2I] + k[8010]*y_cur[IDX_GPH2I] + + k[8095]*y_cur[IDX_GCH2PHI]; + ydot[yistart + IDX_GSO2I] = 0.0 + k[7032]*y_cur[IDX_SO2I] - + k[7214]*y_cur[IDX_GSO2I] - k[7396]*y_cur[IDX_GSO2I] - + k[7578]*y_cur[IDX_GSO2I] - k[7839]*y_cur[IDX_GSO2I] - + k[8164]*y_cur[IDX_GSO2I] - k[8349]*y_cur[IDX_GHI]*y_cur[IDX_GSO2I] + + k[8453]*y_cur[IDX_GOI]*y_cur[IDX_GSOI]; + ydot[yistart + IDX_GSiH4I] = 0.0 + k[6935]*y_cur[IDX_SiH4I] - + k[7117]*y_cur[IDX_GSiH4I] - k[7299]*y_cur[IDX_GSiH4I] - + k[7481]*y_cur[IDX_GSiH4I] - k[7695]*y_cur[IDX_GSiH4I] - + k[7993]*y_cur[IDX_GSiH4I] - k[7994]*y_cur[IDX_GSiH4I] - + k[7995]*y_cur[IDX_GSiH4I] + + k[8304]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I]; + ydot[yistart + IDX_NCCNCH3II] = 0.0 - + k[1155]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_eM] + + k[5541]*y_cur[IDX_CH3II]*y_cur[IDX_NCCNI] - + k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC2H4CNI] = 0.0 + k[7011]*y_cur[IDX_C2H4CNI] - + k[7193]*y_cur[IDX_GC2H4CNI] - k[7375]*y_cur[IDX_GC2H4CNI] - + k[7557]*y_cur[IDX_GC2H4CNI] - k[7885]*y_cur[IDX_GC2H4CNI] + + k[8344]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI] - + k[8345]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI] - + k[8635]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI]; + ydot[yistart + IDX_GC2SI] = 0.0 + k[7015]*y_cur[IDX_C2SI] - + k[7197]*y_cur[IDX_GC2SI] - k[7379]*y_cur[IDX_GC2SI] - + k[7563]*y_cur[IDX_GC2SI] - k[7815]*y_cur[IDX_GC2SI] - + k[7816]*y_cur[IDX_GC2SI] - k[8144]*y_cur[IDX_GC2SI] - + k[8422]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI] - + k[8673]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI]; + ydot[yistart + IDX_GC3OI] = 0.0 + k[7006]*y_cur[IDX_C3OI] - + k[7188]*y_cur[IDX_GC3OI] - k[7370]*y_cur[IDX_GC3OI] - + k[7552]*y_cur[IDX_GC3OI] - k[7803]*y_cur[IDX_GC3OI] - + k[8130]*y_cur[IDX_GC3OI] + k[8419]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] + + k[8451]*y_cur[IDX_GOI]*y_cur[IDX_GC3I]; + ydot[yistart + IDX_GC4H3I] = 0.0 + k[7002]*y_cur[IDX_C4H3I] - + k[7184]*y_cur[IDX_GC4H3I] - k[7366]*y_cur[IDX_GC4H3I] - + k[7548]*y_cur[IDX_GC4H3I] - k[7795]*y_cur[IDX_GC4H3I] - + k[8119]*y_cur[IDX_GC4H3I] - k[8120]*y_cur[IDX_GC4H3I] + + k[8341]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I] - + k[8342]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I] - + k[8632]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I]; + ydot[yistart + IDX_GC7H2I] = 0.0 + k[7052]*y_cur[IDX_C7H2I] - + k[7234]*y_cur[IDX_GC7H2I] - k[7416]*y_cur[IDX_GC7H2I] - + k[7598]*y_cur[IDX_GC7H2I] - k[7863]*y_cur[IDX_GC7H2I] - + k[8200]*y_cur[IDX_GC7H2I] - k[8201]*y_cur[IDX_GC7H2I] - + k[8202]*y_cur[IDX_GC7H2I] + k[8356]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] + + k[8387]*y_cur[IDX_GH2I]*y_cur[IDX_GC7HI] + + k[8498]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI]; + ydot[yistart + IDX_GC8H2I] = 0.0 + k[7058]*y_cur[IDX_C8H2I] - + k[7240]*y_cur[IDX_GC8H2I] - k[7422]*y_cur[IDX_GC8H2I] - + k[7604]*y_cur[IDX_GC8H2I] - k[7869]*y_cur[IDX_GC8H2I] - + k[8213]*y_cur[IDX_GC8H2I] - k[8214]*y_cur[IDX_GC8H2I] - + k[8215]*y_cur[IDX_GC8H2I] + k[8358]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] + + k[8389]*y_cur[IDX_GH2I]*y_cur[IDX_GC8HI] + + k[8500]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI]; + ydot[yistart + IDX_GC9H2I] = 0.0 + k[7062]*y_cur[IDX_C9H2I] - + k[7244]*y_cur[IDX_GC9H2I] - k[7426]*y_cur[IDX_GC9H2I] - + k[7608]*y_cur[IDX_GC9H2I] - k[7873]*y_cur[IDX_GC9H2I] - + k[8225]*y_cur[IDX_GC9H2I] - k[8226]*y_cur[IDX_GC9H2I] - + k[8227]*y_cur[IDX_GC9H2I] + k[8361]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] + + k[8391]*y_cur[IDX_GH2I]*y_cur[IDX_GC9HI] + + k[8502]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI]; + ydot[yistart + IDX_GCH2CNI] = 0.0 + k[6953]*y_cur[IDX_CH2CNI] - + k[7135]*y_cur[IDX_GCH2CNI] - k[7317]*y_cur[IDX_GCH2CNI] - + k[7499]*y_cur[IDX_GCH2CNI] - k[7726]*y_cur[IDX_GCH2CNI] + + k[7736]*y_cur[IDX_GCH3CNI] - k[8034]*y_cur[IDX_GCH2CNI] + + k[8045]*y_cur[IDX_GCH3CNI] + + k[8322]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] - + k[8323]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] + + k[8529]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI] - + k[8618]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI]; + ydot[yistart + IDX_GCH3CNI] = 0.0 + k[6957]*y_cur[IDX_CH3CNI] - + k[7139]*y_cur[IDX_GCH3CNI] - k[7321]*y_cur[IDX_GCH3CNI] - + k[7503]*y_cur[IDX_GCH3CNI] - k[7735]*y_cur[IDX_GCH3CNI] - + k[7736]*y_cur[IDX_GCH3CNI] - k[7737]*y_cur[IDX_GCH3CNI] - + k[8044]*y_cur[IDX_GCH3CNI] - k[8045]*y_cur[IDX_GCH3CNI] - + k[8046]*y_cur[IDX_GCH3CNI] + + k[8323]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] + + k[8540]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI]; + ydot[yistart + IDX_GH2CNI] = 0.0 + k[6914]*y_cur[IDX_H2CNI] - + k[7096]*y_cur[IDX_GH2CNI] - k[7278]*y_cur[IDX_GH2CNI] - + k[7460]*y_cur[IDX_GH2CNI] - k[7665]*y_cur[IDX_GH2CNI] - + k[7952]*y_cur[IDX_GH2CNI] - k[8293]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] + + k[8456]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] - + k[8593]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI]; + ydot[yistart + IDX_GH2CSI] = 0.0 + k[6989]*y_cur[IDX_H2CSI] - + k[7171]*y_cur[IDX_GH2CSI] - k[7353]*y_cur[IDX_GH2CSI] - + k[7535]*y_cur[IDX_GH2CSI] - k[7777]*y_cur[IDX_GH2CSI] - + k[8098]*y_cur[IDX_GH2CSI] + k[8335]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI] + + k[8474]*y_cur[IDX_GSI]*y_cur[IDX_GCH3I]; + ydot[yistart + IDX_GHC2OI] = 0.0 + k[6958]*y_cur[IDX_HC2OI] - + k[7140]*y_cur[IDX_GHC2OI] - k[7322]*y_cur[IDX_GHC2OI] - + k[7504]*y_cur[IDX_GHC2OI] - k[7887]*y_cur[IDX_GHC2OI] + + k[8324]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - + k[8325]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI] - + k[8620]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI]; + ydot[yistart + IDX_GHC5NI] = 0.0 + k[7045]*y_cur[IDX_HC5NI] - + k[7227]*y_cur[IDX_GHC5NI] - k[7409]*y_cur[IDX_GHC5NI] - + k[7591]*y_cur[IDX_GHC5NI] - k[7855]*y_cur[IDX_GHC5NI] - + k[7856]*y_cur[IDX_GHC5NI] - k[8187]*y_cur[IDX_GHC5NI] - + k[8188]*y_cur[IDX_GHC5NI] + k[8354]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] + + k[8468]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI]; + ydot[yistart + IDX_GHC7NI] = 0.0 + k[7059]*y_cur[IDX_HC7NI] - + k[7241]*y_cur[IDX_GHC7NI] - k[7423]*y_cur[IDX_GHC7NI] - + k[7605]*y_cur[IDX_GHC7NI] - k[7870]*y_cur[IDX_GHC7NI] - + k[8216]*y_cur[IDX_GHC7NI] - k[8217]*y_cur[IDX_GHC7NI] - + k[8218]*y_cur[IDX_GHC7NI] + k[8359]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] + + k[8470]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI]; + ydot[yistart + IDX_GHC9NI] = 0.0 + k[7068]*y_cur[IDX_HC9NI] - + k[7250]*y_cur[IDX_GHC9NI] - k[7432]*y_cur[IDX_GHC9NI] - + k[7614]*y_cur[IDX_GHC9NI] - k[7879]*y_cur[IDX_GHC9NI] - + k[8252]*y_cur[IDX_GHC9NI] - k[8253]*y_cur[IDX_GHC9NI] - + k[8254]*y_cur[IDX_GHC9NI] + k[8364]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] + + k[8472]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI]; + ydot[yistart + IDX_GHCCNI] = 0.0 + k[6949]*y_cur[IDX_HCCNI] - + k[7131]*y_cur[IDX_GHCCNI] - k[7313]*y_cur[IDX_GHCCNI] - + k[7495]*y_cur[IDX_GHCCNI] - k[7886]*y_cur[IDX_GHCCNI] + + k[8321]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] - + k[8322]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] + + k[8488]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - + k[8617]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI]; + ydot[yistart + IDX_GHCSI] = 0.0 + k[6980]*y_cur[IDX_HCSI] - + k[7162]*y_cur[IDX_GHCSI] - k[7344]*y_cur[IDX_GHCSI] - + k[7526]*y_cur[IDX_GHCSI] - k[7766]*y_cur[IDX_GHCSI] - + k[7767]*y_cur[IDX_GHCSI] - k[8085]*y_cur[IDX_GHCSI] - + k[8086]*y_cur[IDX_GHCSI] - k[8087]*y_cur[IDX_GHCSI] + + k[8330]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] - + k[8335]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI] + + k[8473]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - + k[8627]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI]; + ydot[yistart + IDX_GSiC3I] = 0.0 + k[7031]*y_cur[IDX_SiC3I] - + k[7213]*y_cur[IDX_GSiC3I] - k[7395]*y_cur[IDX_GSiC3I] - + k[7577]*y_cur[IDX_GSiC3I] - k[7842]*y_cur[IDX_GSiC3I] + + k[7843]*y_cur[IDX_GSiC3HI] - k[8168]*y_cur[IDX_GSiC3I] - + k[8169]*y_cur[IDX_GSiC3I] + k[8170]*y_cur[IDX_GSiC3HI]; + ydot[yistart + IDX_GSiH3I] = 0.0 + k[6927]*y_cur[IDX_SiH3I] - + k[7109]*y_cur[IDX_GSiH3I] - k[7291]*y_cur[IDX_GSiH3I] - + k[7473]*y_cur[IDX_GSiH3I] - k[7693]*y_cur[IDX_GSiH3I] - + k[7988]*y_cur[IDX_GSiH3I] - k[7989]*y_cur[IDX_GSiH3I] - + k[7990]*y_cur[IDX_GSiH3I] - k[7991]*y_cur[IDX_GSiH3I] + + k[7994]*y_cur[IDX_GSiH4I] + k[8303]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I] + - k[8304]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I] - + k[8603]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I]; + ydot[yistart + IDX_GSiNI] = 0.0 + k[6965]*y_cur[IDX_SiNI] - + k[7147]*y_cur[IDX_GSiNI] - k[7329]*y_cur[IDX_GSiNI] - + k[7511]*y_cur[IDX_GSiNI] - k[7748]*y_cur[IDX_GSiNI] + + k[7750]*y_cur[IDX_GHNSiI] - k[8062]*y_cur[IDX_GSiNI] + + k[8064]*y_cur[IDX_GHNSiI] + k[8134]*y_cur[IDX_GSiNCI]; + ydot[yistart + IDX_GSiOI] = 0.0 + k[6979]*y_cur[IDX_SiOI] - + k[7161]*y_cur[IDX_GSiOI] - k[7343]*y_cur[IDX_GSiOI] - + k[7525]*y_cur[IDX_GSiOI] - k[7765]*y_cur[IDX_GSiOI] + + k[7776]*y_cur[IDX_GH2SiOI] + k[7832]*y_cur[IDX_GSiO2I] - + k[8083]*y_cur[IDX_GSiOI] - k[8084]*y_cur[IDX_GSiOI] + + k[8096]*y_cur[IDX_GH2SiOI] + k[8097]*y_cur[IDX_GH2SiOI] + + k[8156]*y_cur[IDX_GSiO2I]; + ydot[yistart + IDX_HCCNI] = 0.0 - k[5940]*y_cur[IDX_HCCNI] - + k[6949]*y_cur[IDX_HCCNI] + k[7131]*y_cur[IDX_GHCCNI] + + k[7313]*y_cur[IDX_GHCCNI] + k[7495]*y_cur[IDX_GHCCNI] + + k[8616]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] + + k[8721]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI]; + ydot[yistart + IDX_C3H2OII] = 0.0 - + k[796]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] - + k[797]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + + k[5507]*y_cur[IDX_C2H2II]*y_cur[IDX_COI] - + k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] - + k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CFII] = 0.0 - + k[905]*y_cur[IDX_CFII]*y_cur[IDX_eM] + + k[1412]*y_cur[IDX_CII]*y_cur[IDX_HFI] - + k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_ClOII] = 0.0 + + k[172]*y_cur[IDX_CII]*y_cur[IDX_ClOI] - + k[986]*y_cur[IDX_ClOII]*y_cur[IDX_eM] - + k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC2H6I] = 0.0 + k[6923]*y_cur[IDX_C2H6I] - + k[7105]*y_cur[IDX_GC2H6I] - k[7287]*y_cur[IDX_GC2H6I] - + k[7469]*y_cur[IDX_GC2H6I] - k[7687]*y_cur[IDX_GC2H6I] - + k[7688]*y_cur[IDX_GC2H6I] - k[7689]*y_cur[IDX_GC2H6I] - + k[7977]*y_cur[IDX_GC2H6I] - k[7978]*y_cur[IDX_GC2H6I] - + k[7979]*y_cur[IDX_GC2H6I] + k[8290]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] + - k[8291]*y_cur[IDX_GHI]*y_cur[IDX_GC2H6I] + + k[8542]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] + + k[8548]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI]; + ydot[yistart + IDX_GC3H2I] = 0.0 + k[6948]*y_cur[IDX_C3H2I] - + k[7130]*y_cur[IDX_GC3H2I] - k[7312]*y_cur[IDX_GC3H2I] - + k[7494]*y_cur[IDX_GC3H2I] - k[7715]*y_cur[IDX_GC3H2I] + + k[7719]*y_cur[IDX_GCH2CCHI] - k[8021]*y_cur[IDX_GC3H2I] + + k[8026]*y_cur[IDX_GCH2CCHI] + + k[8316]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] - + k[8317]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] + + k[8379]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] + + k[8487]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI] - + k[8612]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I]; + ydot[yistart + IDX_GC5H2I] = 0.0 + k[7029]*y_cur[IDX_C5H2I] - + k[7211]*y_cur[IDX_GC5H2I] - k[7393]*y_cur[IDX_GC5H2I] - + k[7575]*y_cur[IDX_GC5H2I] - k[7837]*y_cur[IDX_GC5H2I] - + k[7838]*y_cur[IDX_GC5H2I] - k[8162]*y_cur[IDX_GC5H2I] - + k[8163]*y_cur[IDX_GC5H2I] + k[8351]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] + + k[8383]*y_cur[IDX_GH2I]*y_cur[IDX_GC5HI] + + k[8494]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI]; + ydot[yistart + IDX_GCCPI] = 0.0 + k[7014]*y_cur[IDX_CCPI] - + k[7196]*y_cur[IDX_GCCPI] - k[7378]*y_cur[IDX_GCCPI] - + k[7562]*y_cur[IDX_GCCPI] - k[7813]*y_cur[IDX_GCCPI] - + k[7814]*y_cur[IDX_GCCPI] + k[7817]*y_cur[IDX_GHC2PI] + + k[7847]*y_cur[IDX_GC3PI] - k[8142]*y_cur[IDX_GCCPI] - + k[8143]*y_cur[IDX_GCCPI] + k[8145]*y_cur[IDX_GHC2PI]; + ydot[yistart + IDX_GCH2CHCCHI] = 0.0 + k[7004]*y_cur[IDX_CH2CHCCHI] + - k[7186]*y_cur[IDX_GCH2CHCCHI] - k[7368]*y_cur[IDX_GCH2CHCCHI] - + k[7550]*y_cur[IDX_GCH2CHCCHI] - k[7799]*y_cur[IDX_GCH2CHCCHI] - + k[7800]*y_cur[IDX_GCH2CHCCHI] - k[8124]*y_cur[IDX_GCH2CHCCHI] - + k[8125]*y_cur[IDX_GCH2CHCCHI] + k[8190]*y_cur[IDX_GC6H6I] + + k[8342]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I]; + ydot[yistart + IDX_GCH3COCH3I] = 0.0 + k[7018]*y_cur[IDX_CH3COCH3I] + - k[7200]*y_cur[IDX_GCH3COCH3I] - k[7382]*y_cur[IDX_GCH3COCH3I] - + k[7568]*y_cur[IDX_GCH3COCH3I] - k[7818]*y_cur[IDX_GCH3COCH3I] - + k[7819]*y_cur[IDX_GCH3COCH3I] - k[7820]*y_cur[IDX_GCH3COCH3I] - + k[7821]*y_cur[IDX_GCH3COCH3I] - k[8146]*y_cur[IDX_GCH3COCH3I] - + k[8147]*y_cur[IDX_GCH3COCH3I] - k[8148]*y_cur[IDX_GCH3COCH3I] + + k[8551]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI]; + ydot[yistart + IDX_GCH3OCH3I] = 0.0 + k[6983]*y_cur[IDX_CH3OCH3I] - + k[7165]*y_cur[IDX_GCH3OCH3I] - k[7347]*y_cur[IDX_GCH3OCH3I] - + k[7529]*y_cur[IDX_GCH3OCH3I] - k[7769]*y_cur[IDX_GCH3OCH3I] - + k[7770]*y_cur[IDX_GCH3OCH3I] - k[7771]*y_cur[IDX_GCH3OCH3I] - + k[8089]*y_cur[IDX_GCH3OCH3I] - k[8090]*y_cur[IDX_GCH3OCH3I] - + k[8091]*y_cur[IDX_GCH3OCH3I] + + k[8545]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI]; + ydot[yistart + IDX_GClI] = 0.0 + k[6942]*y_cur[IDX_ClI] - + k[7124]*y_cur[IDX_GClI] - k[7306]*y_cur[IDX_GClI] - + k[7488]*y_cur[IDX_GClI] + k[7713]*y_cur[IDX_GHClI] + + k[7781]*y_cur[IDX_GCClI] + k[7796]*y_cur[IDX_GClOI] + + k[8018]*y_cur[IDX_GHClI] + k[8019]*y_cur[IDX_GHClI] + + k[8105]*y_cur[IDX_GCClI] + k[8121]*y_cur[IDX_GClOI] - + k[8314]*y_cur[IDX_GHI]*y_cur[IDX_GClI] - + k[8609]*y_cur[IDX_GHI]*y_cur[IDX_GClI]; + ydot[yistart + IDX_GSiCH2I] = 0.0 + k[6963]*y_cur[IDX_SiCH2I] - + k[7145]*y_cur[IDX_GSiCH2I] - k[7327]*y_cur[IDX_GSiCH2I] - + k[7509]*y_cur[IDX_GSiCH2I] - k[7746]*y_cur[IDX_GSiCH2I] + + k[7749]*y_cur[IDX_GSiCH3I] - k[8057]*y_cur[IDX_GSiCH2I] - + k[8058]*y_cur[IDX_GSiCH2I] - k[8059]*y_cur[IDX_GSiCH2I] - + k[8060]*y_cur[IDX_GSiCH2I] + k[8063]*y_cur[IDX_GSiCH3I]; + ydot[yistart + IDX_GSiHI] = 0.0 + k[6920]*y_cur[IDX_SiHI] - + k[7102]*y_cur[IDX_GSiHI] - k[7284]*y_cur[IDX_GSiHI] - + k[7466]*y_cur[IDX_GSiHI] - k[7684]*y_cur[IDX_GSiHI] + + k[7686]*y_cur[IDX_GSiH2I] - k[7971]*y_cur[IDX_GSiHI] + + k[7973]*y_cur[IDX_GSiH2I] + k[7976]*y_cur[IDX_GSiH2I] + + k[7989]*y_cur[IDX_GSiH3I] + k[7991]*y_cur[IDX_GSiH3I] + + k[7995]*y_cur[IDX_GSiH4I] + k[8301]*y_cur[IDX_GHI]*y_cur[IDX_GSiI] - + k[8302]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI] - + k[8601]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI]; + ydot[yistart + IDX_GSiH2I] = 0.0 + k[6924]*y_cur[IDX_SiH2I] - + k[7106]*y_cur[IDX_GSiH2I] - k[7288]*y_cur[IDX_GSiH2I] - + k[7470]*y_cur[IDX_GSiH2I] - k[7686]*y_cur[IDX_GSiH2I] + + k[7693]*y_cur[IDX_GSiH3I] + k[7695]*y_cur[IDX_GSiH4I] - + k[7973]*y_cur[IDX_GSiH2I] - k[7974]*y_cur[IDX_GSiH2I] - + k[7975]*y_cur[IDX_GSiH2I] - k[7976]*y_cur[IDX_GSiH2I] + + k[7988]*y_cur[IDX_GSiH3I] + k[7990]*y_cur[IDX_GSiH3I] + + k[7993]*y_cur[IDX_GSiH4I] + k[8302]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI] + - k[8303]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I] - + k[8602]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I]; + ydot[yistart + IDX_H3C3OII] = 0.0 - + k[1027]*y_cur[IDX_H3C3OII]*y_cur[IDX_eM] + + k[5513]*y_cur[IDX_C2H3II]*y_cur[IDX_COI] - + k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HFII] = 0.0 - + k[1112]*y_cur[IDX_HFII]*y_cur[IDX_eM] + + k[2440]*y_cur[IDX_H2I]*y_cur[IDX_FII] - + k[2454]*y_cur[IDX_H2I]*y_cur[IDX_HFII] - + k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiFII] = 0.0 - + k[1249]*y_cur[IDX_SiFII]*y_cur[IDX_eM] + + k[3015]*y_cur[IDX_HFI]*y_cur[IDX_SiII] - + k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C8H5II] = 0.0 - + k[887]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] - + k[888]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + + k[5576]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] - + k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] - + k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C9H5II] = 0.0 - + k[899]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] - + k[900]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + + k[5579]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H3II] - + k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] - + k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3C3NII] = 0.0 - + k[926]*y_cur[IDX_CH3C3NII]*y_cur[IDX_eM] - + k[2430]*y_cur[IDX_H2I]*y_cur[IDX_CH3C3NII] + + k[2441]*y_cur[IDX_H2I]*y_cur[IDX_H2C4NII] - + k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC10H2I] = 0.0 + k[7067]*y_cur[IDX_C10H2I] - + k[7249]*y_cur[IDX_GC10H2I] - k[7431]*y_cur[IDX_GC10H2I] - + k[7613]*y_cur[IDX_GC10H2I] - k[7878]*y_cur[IDX_GC10H2I] - + k[8248]*y_cur[IDX_GC10H2I] - k[8249]*y_cur[IDX_GC10H2I] - + k[8250]*y_cur[IDX_GC10H2I] - k[8251]*y_cur[IDX_GC10H2I] + + k[8363]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] + + k[8393]*y_cur[IDX_GH2I]*y_cur[IDX_GC10HI] + + k[8503]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI]; + ydot[yistart + IDX_GC4H2I] = 0.0 + k[6998]*y_cur[IDX_C4H2I] - + k[7180]*y_cur[IDX_GC4H2I] - k[7362]*y_cur[IDX_GC4H2I] - + k[7544]*y_cur[IDX_GC4H2I] - k[7791]*y_cur[IDX_GC4H2I] - + k[7792]*y_cur[IDX_GC4H2I] - k[7793]*y_cur[IDX_GC4H2I] - + k[7794]*y_cur[IDX_GC4H2I] - k[8115]*y_cur[IDX_GC4H2I] - + k[8116]*y_cur[IDX_GC4H2I] - k[8117]*y_cur[IDX_GC4H2I] - + k[8118]*y_cur[IDX_GC4H2I] + k[8120]*y_cur[IDX_GC4H3I] + + k[8340]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] - + k[8341]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I] + + k[8381]*y_cur[IDX_GH2I]*y_cur[IDX_GC4HI] + + k[8492]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI] - + k[8631]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I]; + ydot[yistart + IDX_GCH2CHCNI] = 0.0 + k[7007]*y_cur[IDX_CH2CHCNI] - + k[7189]*y_cur[IDX_GCH2CHCNI] - k[7371]*y_cur[IDX_GCH2CHCNI] - + k[7553]*y_cur[IDX_GCH2CHCNI] - k[7804]*y_cur[IDX_GCH2CHCNI] + + k[7812]*y_cur[IDX_GC2H5CNI] - k[8131]*y_cur[IDX_GCH2CHCNI] - + k[8132]*y_cur[IDX_GCH2CHCNI] + k[8141]*y_cur[IDX_GC2H5CNI] - + k[8344]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI] - + k[8634]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI]; + ydot[yistart + IDX_GH2CCCI] = 0.0 + k[6946]*y_cur[IDX_H2CCCI] - + k[7128]*y_cur[IDX_GH2CCCI] - k[7310]*y_cur[IDX_GH2CCCI] - + k[7492]*y_cur[IDX_GH2CCCI] - k[7716]*y_cur[IDX_GH2CCCI] + + k[7725]*y_cur[IDX_GCH2CCH2I] + k[7733]*y_cur[IDX_GCH3CCHI] - + k[8022]*y_cur[IDX_GH2CCCI] - k[8023]*y_cur[IDX_GH2CCCI] + + k[8029]*y_cur[IDX_GCH2CCH2I] + k[8033]*y_cur[IDX_GCH2CCH2I] + + k[8038]*y_cur[IDX_GCH3CCHI] + k[8042]*y_cur[IDX_GCH3CCHI] - + k[8318]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] + + k[8378]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] - + k[8613]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI]; + ydot[yistart + IDX_GHC3NI] = 0.0 + k[7001]*y_cur[IDX_HC3NI] - + k[7183]*y_cur[IDX_GHC3NI] - k[7365]*y_cur[IDX_GHC3NI] - + k[7547]*y_cur[IDX_GHC3NI] - k[7798]*y_cur[IDX_GHC3NI] - + k[8123]*y_cur[IDX_GHC3NI] + k[8132]*y_cur[IDX_GCH2CHCNI] + + k[8343]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] + + k[8466]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI]; + ydot[yistart + IDX_GOCSI] = 0.0 + k[7022]*y_cur[IDX_OCSI] - + k[7204]*y_cur[IDX_GOCSI] - k[7386]*y_cur[IDX_GOCSI] - + k[7570]*y_cur[IDX_GOCSI] - k[7827]*y_cur[IDX_GOCSI] - + k[7828]*y_cur[IDX_GOCSI] - k[7829]*y_cur[IDX_GOCSI] - + k[7830]*y_cur[IDX_GOCSI] - k[8151]*y_cur[IDX_GOCSI] - + k[8152]*y_cur[IDX_GOCSI] - k[8153]*y_cur[IDX_GOCSI] - + k[8154]*y_cur[IDX_GOCSI] - k[8348]*y_cur[IDX_GHI]*y_cur[IDX_GOCSI] + + k[8452]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] + + k[8476]*y_cur[IDX_GSI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_H2FII] = 0.0 - + k[1004]*y_cur[IDX_H2FII]*y_cur[IDX_eM] - + k[1005]*y_cur[IDX_H2FII]*y_cur[IDX_eM] + + k[2454]*y_cur[IDX_H2I]*y_cur[IDX_HFII] + + k[2705]*y_cur[IDX_H3II]*y_cur[IDX_HFI] - + k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] - + k[6350]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4H6I] = 0.0 + + k[1842]*y_cur[IDX_C4H7II]*y_cur[IDX_CH3CNI] + + k[4883]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H3I] - + k[5024]*y_cur[IDX_C4H6I]*y_cur[IDX_HI] + + k[5072]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - + k[5786]*y_cur[IDX_C4H6I] - k[6087]*y_cur[IDX_C4H6I] - + k[7009]*y_cur[IDX_C4H6I] + k[7191]*y_cur[IDX_GC4H6I] + + k[7373]*y_cur[IDX_GC4H6I] + k[7555]*y_cur[IDX_GC4H6I]; + ydot[yistart + IDX_C4PII] = 0.0 + + k[341]*y_cur[IDX_HII]*y_cur[IDX_C4PI] - + k[833]*y_cur[IDX_C4PII]*y_cur[IDX_eM] - + k[834]*y_cur[IDX_C4PII]*y_cur[IDX_eM] - + k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] - + k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C5NII] = 0.0 - + k[847]*y_cur[IDX_C5NII]*y_cur[IDX_eM] - + k[2416]*y_cur[IDX_H2I]*y_cur[IDX_C5NII] + + k[3412]*y_cur[IDX_NI]*y_cur[IDX_C5HII] - + k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C6H6II] = 0.0 + + k[157]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - + k[860]*y_cur[IDX_C6H6II]*y_cur[IDX_eM] - + k[2834]*y_cur[IDX_HI]*y_cur[IDX_C6H6II] - + k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2CHCNII] = 0.0 - + k[912]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_eM] - + k[2429]*y_cur[IDX_H2I]*y_cur[IDX_CH2CHCNII] + + k[3401]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + + k[6089]*y_cur[IDX_CH2CHCNI] - + k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_COOCH3II] = 0.0 - + k[1270]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] - + k[1271]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + + k[5649]*y_cur[IDX_CII]*y_cur[IDX_COOCH3I] - + k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] - + k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_FII] = 0.0 - k[457]*y_cur[IDX_H2I]*y_cur[IDX_FII] + - k[2440]*y_cur[IDX_H2I]*y_cur[IDX_FII] + + k[3260]*y_cur[IDX_HeII]*y_cur[IDX_HFI] - + k[6347]*y_cur[IDX_FII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC2H5CNI] = 0.0 + k[7013]*y_cur[IDX_C2H5CNI] - + k[7195]*y_cur[IDX_GC2H5CNI] - k[7377]*y_cur[IDX_GC2H5CNI] - + k[7561]*y_cur[IDX_GC2H5CNI] - k[7809]*y_cur[IDX_GC2H5CNI] - + k[7810]*y_cur[IDX_GC2H5CNI] - k[7811]*y_cur[IDX_GC2H5CNI] - + k[7812]*y_cur[IDX_GC2H5CNI] - k[8138]*y_cur[IDX_GC2H5CNI] - + k[8139]*y_cur[IDX_GC2H5CNI] - k[8140]*y_cur[IDX_GC2H5CNI] - + k[8141]*y_cur[IDX_GC2H5CNI] + + k[8345]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI]; + ydot[yistart + IDX_GC2H5OHI] = 0.0 + k[6987]*y_cur[IDX_C2H5OHI] - + k[7169]*y_cur[IDX_GC2H5OHI] - k[7351]*y_cur[IDX_GC2H5OHI] - + k[7533]*y_cur[IDX_GC2H5OHI] - k[7772]*y_cur[IDX_GC2H5OHI] - + k[7773]*y_cur[IDX_GC2H5OHI] - k[7774]*y_cur[IDX_GC2H5OHI] - + k[8092]*y_cur[IDX_GC2H5OHI] - k[8093]*y_cur[IDX_GC2H5OHI] - + k[8094]*y_cur[IDX_GC2H5OHI] + + k[8546]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] + + k[8557]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] + + k[8571]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI]; + ydot[yistart + IDX_GC2OI] = 0.0 + k[6954]*y_cur[IDX_C2OI] - + k[7136]*y_cur[IDX_GC2OI] - k[7318]*y_cur[IDX_GC2OI] - + k[7500]*y_cur[IDX_GC2OI] - k[7727]*y_cur[IDX_GC2OI] - + k[7728]*y_cur[IDX_GC2OI] - k[8035]*y_cur[IDX_GC2OI] - + k[8036]*y_cur[IDX_GC2OI] - k[8324]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - + k[8419]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] + + k[8445]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - + k[8619]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - + k[8670]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI]; + ydot[yistart + IDX_GC6H2I] = 0.0 + k[7043]*y_cur[IDX_C6H2I] - + k[7225]*y_cur[IDX_GC6H2I] - k[7407]*y_cur[IDX_GC6H2I] - + k[7589]*y_cur[IDX_GC6H2I] - k[7853]*y_cur[IDX_GC6H2I] + + k[7858]*y_cur[IDX_GC6H6I] - k[8183]*y_cur[IDX_GC6H2I] - + k[8184]*y_cur[IDX_GC6H2I] - k[8185]*y_cur[IDX_GC6H2I] + + k[8353]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] + + k[8385]*y_cur[IDX_GH2I]*y_cur[IDX_GC6HI] + + k[8496]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI]; + ydot[yistart + IDX_GC9NI] = 0.0 + k[7066]*y_cur[IDX_C9NI] - + k[7248]*y_cur[IDX_GC9NI] - k[7430]*y_cur[IDX_GC9NI] - + k[7612]*y_cur[IDX_GC9NI] - k[7877]*y_cur[IDX_GC9NI] - + k[8246]*y_cur[IDX_GC9NI] - k[8247]*y_cur[IDX_GC9NI] + + k[8254]*y_cur[IDX_GHC9NI] - k[8364]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] + + k[8471]*y_cur[IDX_GNI]*y_cur[IDX_GC9I] - + k[8650]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI]; + ydot[yistart + IDX_GCO2I] = 0.0 + k[6978]*y_cur[IDX_CO2I] - + k[7160]*y_cur[IDX_GCO2I] - k[7342]*y_cur[IDX_GCO2I] - + k[7524]*y_cur[IDX_GCO2I] - k[7764]*y_cur[IDX_GCO2I] + + k[7824]*y_cur[IDX_GHCOOCH3I] + k[7826]*y_cur[IDX_GHCOOCH3I] - + k[8082]*y_cur[IDX_GCO2I] + k[8103]*y_cur[IDX_GHCOOHI] + + k[8447]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] + + k[8448]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + + k[8515]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_GCPI] = 0.0 + k[6972]*y_cur[IDX_CPI] - + k[7154]*y_cur[IDX_GCPI] - k[7336]*y_cur[IDX_GCPI] - + k[7518]*y_cur[IDX_GCPI] - k[7753]*y_cur[IDX_GCPI] + + k[7759]*y_cur[IDX_GHCPI] + k[7814]*y_cur[IDX_GCCPI] - + k[8067]*y_cur[IDX_GCPI] + k[8077]*y_cur[IDX_GHCPI] + + k[8143]*y_cur[IDX_GCCPI] + k[8176]*y_cur[IDX_GC3PI] + + k[8191]*y_cur[IDX_GC4PI]; + ydot[yistart + IDX_GO2HI] = 0.0 + k[6937]*y_cur[IDX_O2HI] - + k[7119]*y_cur[IDX_GO2HI] - k[7301]*y_cur[IDX_GO2HI] - + k[7483]*y_cur[IDX_GO2HI] - k[7705]*y_cur[IDX_GO2HI] - + k[8005]*y_cur[IDX_GO2HI] - k[8006]*y_cur[IDX_GO2HI] + + k[8307]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] - + k[8308]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] + + k[8309]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - + k[8436]*y_cur[IDX_GOI]*y_cur[IDX_GO2HI] + + k[8444]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - + k[8454]*y_cur[IDX_GNI]*y_cur[IDX_GO2HI] - + k[8606]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI]; + ydot[yistart + IDX_GOCNI] = 0.0 + k[6964]*y_cur[IDX_OCNI] - + k[7146]*y_cur[IDX_GOCNI] - k[7328]*y_cur[IDX_GOCNI] - + k[7510]*y_cur[IDX_GOCNI] - k[7747]*y_cur[IDX_GOCNI] - + k[8061]*y_cur[IDX_GOCNI] - k[8328]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - + k[8329]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - + k[8401]*y_cur[IDX_GCI]*y_cur[IDX_GOCNI] + + k[8446]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - + k[8623]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - + k[8624]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI]; + ydot[yistart + IDX_GSOI] = 0.0 + k[6994]*y_cur[IDX_SOI] - + k[7176]*y_cur[IDX_GSOI] - k[7358]*y_cur[IDX_GSOI] - + k[7540]*y_cur[IDX_GSOI] - k[7786]*y_cur[IDX_GSOI] - + k[7787]*y_cur[IDX_GSOI] + k[7828]*y_cur[IDX_GOCSI] + + k[7839]*y_cur[IDX_GSO2I] - k[8110]*y_cur[IDX_GSOI] - + k[8111]*y_cur[IDX_GSOI] + k[8152]*y_cur[IDX_GOCSI] + + k[8164]*y_cur[IDX_GSO2I] - k[8409]*y_cur[IDX_GCI]*y_cur[IDX_GSOI] + + k[8449]*y_cur[IDX_GOI]*y_cur[IDX_GHSI] + + k[8450]*y_cur[IDX_GOI]*y_cur[IDX_GSI] - + k[8453]*y_cur[IDX_GOI]*y_cur[IDX_GSOI] - + k[8697]*y_cur[IDX_GOI]*y_cur[IDX_GSOI]; + ydot[yistart + IDX_GSiCI] = 0.0 + k[6955]*y_cur[IDX_SiCI] - + k[7137]*y_cur[IDX_GSiCI] - k[7319]*y_cur[IDX_GSiCI] - + k[7501]*y_cur[IDX_GSiCI] - k[7734]*y_cur[IDX_GSiCI] + + k[7746]*y_cur[IDX_GSiCH2I] + k[7802]*y_cur[IDX_GSiC2I] - + k[8043]*y_cur[IDX_GSiCI] + k[8047]*y_cur[IDX_GHCSiI] + + k[8049]*y_cur[IDX_GHCSiI] + k[8060]*y_cur[IDX_GSiCH2I] + + k[8168]*y_cur[IDX_GSiC3I]; + ydot[yistart + IDX_H2CNOII] = 0.0 - + k[994]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] - + k[995]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + + k[2695]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + + k[2897]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] - + k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] - + k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2NCOII] = 0.0 - + k[1008]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] - + k[1009]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + + k[2707]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] + + k[3047]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] - + k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] - + k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2OCNII] = 0.0 - + k[1015]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] - + k[1016]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + + k[2711]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] + + k[3051]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - + k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] - + k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PC2H4II] = 0.0 - + k[1187]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] - + k[1188]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] - + k[1189]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + + k[1713]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - + k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - + k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - + k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C7NII] = 0.0 - + k[876]*y_cur[IDX_C7NII]*y_cur[IDX_eM] - + k[2421]*y_cur[IDX_H2I]*y_cur[IDX_C7NII] + + k[3429]*y_cur[IDX_NI]*y_cur[IDX_C7HII] + k[6050]*y_cur[IDX_C7NI] - + k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C9NII] = 0.0 - + k[901]*y_cur[IDX_C9NII]*y_cur[IDX_eM] - + k[2426]*y_cur[IDX_H2I]*y_cur[IDX_C9NII] + + k[3446]*y_cur[IDX_NI]*y_cur[IDX_C9HII] + k[6068]*y_cur[IDX_C9NI] - + k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3NHII] = 0.0 - + k[970]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] - + k[971]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + + k[1988]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] + + k[2086]*y_cur[IDX_CH3II]*y_cur[IDX_NH2I] + + k[2087]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - + k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] - + k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_ClOI] = 0.0 - + k[172]*y_cur[IDX_CII]*y_cur[IDX_ClOI] - + k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] + + k[5380]*y_cur[IDX_OI]*y_cur[IDX_CClI] - + k[5394]*y_cur[IDX_OI]*y_cur[IDX_ClOI] - k[5831]*y_cur[IDX_ClOI] - + k[6144]*y_cur[IDX_ClOI] - k[6999]*y_cur[IDX_ClOI] + + k[7181]*y_cur[IDX_GClOI] + k[7363]*y_cur[IDX_GClOI] + + k[7545]*y_cur[IDX_GClOI]; + ydot[yistart + IDX_GC11I] = 0.0 + k[7069]*y_cur[IDX_C11I] - + k[7251]*y_cur[IDX_GC11I] - k[7433]*y_cur[IDX_GC11I] - + k[7615]*y_cur[IDX_GC11I] - k[7880]*y_cur[IDX_GC11I] - + k[8255]*y_cur[IDX_GC11I] - k[8256]*y_cur[IDX_GC11I] - + k[8257]*y_cur[IDX_GC11I] - k[8258]*y_cur[IDX_GC11I] - + k[8259]*y_cur[IDX_GC11I] - k[8260]*y_cur[IDX_GC11I] - + k[8261]*y_cur[IDX_GC11I] - k[8262]*y_cur[IDX_GC11I] - + k[8263]*y_cur[IDX_GC11I] + k[8433]*y_cur[IDX_GCI]*y_cur[IDX_GC10I]; + ydot[yistart + IDX_GC2NI] = 0.0 + k[6947]*y_cur[IDX_C2NI] - + k[7129]*y_cur[IDX_GC2NI] - k[7311]*y_cur[IDX_GC2NI] - + k[7493]*y_cur[IDX_GC2NI] - k[7717]*y_cur[IDX_GC2NI] - + k[7718]*y_cur[IDX_GC2NI] + k[7886]*y_cur[IDX_GHCCNI] - + k[8024]*y_cur[IDX_GC2NI] - k[8025]*y_cur[IDX_GC2NI] + + k[8127]*y_cur[IDX_GNCCNI] - k[8321]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] + + k[8412]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - + k[8418]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] + + k[8462]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - + k[8616]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] - + k[8669]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI]; + ydot[yistart + IDX_GCH2CCH2I] = 0.0 + k[6951]*y_cur[IDX_CH2CCH2I] - + k[7133]*y_cur[IDX_GCH2CCH2I] - k[7315]*y_cur[IDX_GCH2CCH2I] - + k[7497]*y_cur[IDX_GCH2CCH2I] - k[7721]*y_cur[IDX_GCH2CCH2I] - + k[7722]*y_cur[IDX_GCH2CCH2I] - k[7723]*y_cur[IDX_GCH2CCH2I] - + k[7724]*y_cur[IDX_GCH2CCH2I] - k[7725]*y_cur[IDX_GCH2CCH2I] + + k[7799]*y_cur[IDX_GCH2CHCCHI] - k[8028]*y_cur[IDX_GCH2CCH2I] - + k[8029]*y_cur[IDX_GCH2CCH2I] - k[8030]*y_cur[IDX_GCH2CCH2I] - + k[8031]*y_cur[IDX_GCH2CCH2I] - k[8032]*y_cur[IDX_GCH2CCH2I] - + k[8033]*y_cur[IDX_GCH2CCH2I] + k[8124]*y_cur[IDX_GCH2CHCCHI] + + k[8319]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + + k[8489]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; + ydot[yistart + IDX_GCH2NHI] = 0.0 + k[6921]*y_cur[IDX_CH2NHI] - + k[7103]*y_cur[IDX_GCH2NHI] - k[7285]*y_cur[IDX_GCH2NHI] - + k[7467]*y_cur[IDX_GCH2NHI] - k[7685]*y_cur[IDX_GCH2NHI] - + k[7972]*y_cur[IDX_GCH2NHI] + + k[8293]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] + + k[8460]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] + + k[8483]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] + + k[8523]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I]; + ydot[yistart + IDX_GCH3CCHI] = 0.0 + k[6952]*y_cur[IDX_CH3CCHI] - + k[7134]*y_cur[IDX_GCH3CCHI] - k[7316]*y_cur[IDX_GCH3CCHI] - + k[7498]*y_cur[IDX_GCH3CCHI] - k[7729]*y_cur[IDX_GCH3CCHI] - + k[7730]*y_cur[IDX_GCH3CCHI] - k[7731]*y_cur[IDX_GCH3CCHI] - + k[7732]*y_cur[IDX_GCH3CCHI] - k[7733]*y_cur[IDX_GCH3CCHI] + + k[7800]*y_cur[IDX_GCH2CHCCHI] - k[8037]*y_cur[IDX_GCH3CCHI] - + k[8038]*y_cur[IDX_GCH3CCHI] - k[8039]*y_cur[IDX_GCH3CCHI] - + k[8040]*y_cur[IDX_GCH3CCHI] - k[8041]*y_cur[IDX_GCH3CCHI] - + k[8042]*y_cur[IDX_GCH3CCHI] + k[8125]*y_cur[IDX_GCH2CHCCHI] + + k[8320]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + + k[8490]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; + ydot[yistart + IDX_GCNOI] = 0.0 + k[6960]*y_cur[IDX_CNOI] - + k[7142]*y_cur[IDX_GCNOI] - k[7324]*y_cur[IDX_GCNOI] - + k[7506]*y_cur[IDX_GCNOI] - k[7741]*y_cur[IDX_GCNOI] - + k[8052]*y_cur[IDX_GCNOI] - k[8326]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - + k[8327]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] + + k[8399]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - + k[8402]*y_cur[IDX_GCI]*y_cur[IDX_GCNOI] - + k[8621]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - + k[8622]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; + ydot[yistart + IDX_GHNCI] = 0.0 + k[6913]*y_cur[IDX_HNCI] - + k[7095]*y_cur[IDX_GHNCI] - k[7277]*y_cur[IDX_GHNCI] - + k[7459]*y_cur[IDX_GHNCI] - k[7650]*y_cur[IDX_GHNCI] + + k[7811]*y_cur[IDX_GC2H5CNI] - k[7937]*y_cur[IDX_GHNCI] + + k[7972]*y_cur[IDX_GCH2NHI] + k[8140]*y_cur[IDX_GC2H5CNI] + + k[8403]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] + + k[8404]*y_cur[IDX_GCI]*y_cur[IDX_GNH2I] + + k[8479]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI]; + ydot[yistart + IDX_GNSI] = 0.0 + k[6990]*y_cur[IDX_NSI] - + k[7172]*y_cur[IDX_GNSI] - k[7354]*y_cur[IDX_GNSI] - + k[7536]*y_cur[IDX_GNSI] - k[7779]*y_cur[IDX_GNSI] - + k[8101]*y_cur[IDX_GNSI] - k[8400]*y_cur[IDX_GCI]*y_cur[IDX_GNSI] - + k[8442]*y_cur[IDX_GOI]*y_cur[IDX_GNSI] - + k[8459]*y_cur[IDX_GNI]*y_cur[IDX_GNSI] + + k[8463]*y_cur[IDX_GNI]*y_cur[IDX_GHSI] + + k[8464]*y_cur[IDX_GNI]*y_cur[IDX_GSI] + + k[8475]*y_cur[IDX_GSI]*y_cur[IDX_GNHI]; + ydot[yistart + IDX_GSiC2I] = 0.0 + k[7003]*y_cur[IDX_SiC2I] - + k[7185]*y_cur[IDX_GSiC2I] - k[7367]*y_cur[IDX_GSiC2I] - + k[7549]*y_cur[IDX_GSiC2I] - k[7802]*y_cur[IDX_GSiC2I] + + k[7805]*y_cur[IDX_GSiC2HI] + k[7808]*y_cur[IDX_GSiC2H2I] + + k[7842]*y_cur[IDX_GSiC3I] + k[7857]*y_cur[IDX_GSiC4I] - + k[8129]*y_cur[IDX_GSiC2I] + k[8133]*y_cur[IDX_GSiC2HI] + + k[8169]*y_cur[IDX_GSiC3I]; + ydot[yistart + IDX_H2C4NII] = 0.0 - + k[988]*y_cur[IDX_H2C4NII]*y_cur[IDX_eM] + + k[1350]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - + k[2441]*y_cur[IDX_H2I]*y_cur[IDX_H2C4NII] + + k[2446]*y_cur[IDX_H2I]*y_cur[IDX_HC4NII] - + k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2CClII] = 0.0 - + k[993]*y_cur[IDX_H2CClII]*y_cur[IDX_eM] + + k[2083]*y_cur[IDX_CH3II]*y_cur[IDX_HClI] + + k[2492]*y_cur[IDX_H2COI]*y_cur[IDX_CClII] - + k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2NOII] = 0.0 - + k[1010]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] - + k[1011]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] + + k[2709]*y_cur[IDX_H3II]*y_cur[IDX_HNOI] + + k[3524]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - + k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] - + k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HClII] = 0.0 + + k[393]*y_cur[IDX_HII]*y_cur[IDX_HClI] - + k[1111]*y_cur[IDX_HClII]*y_cur[IDX_eM] + + k[2439]*y_cur[IDX_H2I]*y_cur[IDX_ClII] - + k[2453]*y_cur[IDX_H2I]*y_cur[IDX_HClII] + + k[2679]*y_cur[IDX_H3II]*y_cur[IDX_ClI] + k[6195]*y_cur[IDX_HClI] - + k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HNSII] = 0.0 - + k[1122]*y_cur[IDX_HNSII]*y_cur[IDX_eM] + + k[2727]*y_cur[IDX_H3II]*y_cur[IDX_NSI] + + k[2981]*y_cur[IDX_HCOII]*y_cur[IDX_NSI] + + k[3526]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - + k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HOCII] = 0.0 - + k[137]*y_cur[IDX_H2I]*y_cur[IDX_HOCII] - + k[1125]*y_cur[IDX_HOCII]*y_cur[IDX_eM] + + k[1394]*y_cur[IDX_CII]*y_cur[IDX_H2OI] + + k[2435]*y_cur[IDX_H2I]*y_cur[IDX_COII] + + k[2676]*y_cur[IDX_H3II]*y_cur[IDX_COI] - + k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HSOII] = 0.0 - + k[1141]*y_cur[IDX_HSOII]*y_cur[IDX_eM] + + k[2517]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + + k[2742]*y_cur[IDX_H3II]*y_cur[IDX_SOI] + + k[2990]*y_cur[IDX_HCOII]*y_cur[IDX_SOI] - + k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HSiO2II] = 0.0 - + k[1145]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] - + k[1146]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] + + k[2759]*y_cur[IDX_H3II]*y_cur[IDX_SiO2I] + + k[3004]*y_cur[IDX_HCOII]*y_cur[IDX_SiO2I] - + k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - + k[6724]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NH2CNHII] = 0.0 - + k[1161]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] - + k[1162]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] + + k[2722]*y_cur[IDX_H3II]*y_cur[IDX_NH2CNI] + + k[2980]*y_cur[IDX_HCOII]*y_cur[IDX_NH2CNI] - + k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] - + k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2H5OHII] = 0.0 + + k[150]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] + + k[328]*y_cur[IDX_HII]*y_cur[IDX_C2H5OHI] - + k[772]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] - + k[773]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] + + k[5707]*y_cur[IDX_C2H5OHI] + k[5992]*y_cur[IDX_C2H5OHI] - + k[6576]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] - + k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2OII] = 0.0 + + k[151]*y_cur[IDX_CII]*y_cur[IDX_C2OI] + + k[331]*y_cur[IDX_HII]*y_cur[IDX_C2OI] - + k[785]*y_cur[IDX_C2OII]*y_cur[IDX_eM] + + k[2269]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - + k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2CHCCHI] = 0.0 + + k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] + + k[5067]*y_cur[IDX_CHI]*y_cur[IDX_CH2CCH2I] + + k[5068]*y_cur[IDX_CHI]*y_cur[IDX_CH3CCHI] - + k[5784]*y_cur[IDX_CH2CHCCHI] - k[5785]*y_cur[IDX_CH2CHCCHI] + + k[6038]*y_cur[IDX_C6H6I] - k[6085]*y_cur[IDX_CH2CHCCHI] - + k[6086]*y_cur[IDX_CH2CHCCHI] - k[7004]*y_cur[IDX_CH2CHCCHI] + + k[7186]*y_cur[IDX_GCH2CHCCHI] + k[7368]*y_cur[IDX_GCH2CHCCHI] + + k[7550]*y_cur[IDX_GCH2CHCCHI] + + k[8632]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I]; + ydot[yistart + IDX_CH2OHCOII] = 0.0 - + k[1272]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] - + k[1273]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] - + k[1274]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + + k[5655]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCOI] - + k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - + k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - + k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GCH2CCHI] = 0.0 + k[6950]*y_cur[IDX_CH2CCHI] - + k[7132]*y_cur[IDX_GCH2CCHI] - k[7314]*y_cur[IDX_GCH2CCHI] - + k[7496]*y_cur[IDX_GCH2CCHI] - k[7719]*y_cur[IDX_GCH2CCHI] - + k[7720]*y_cur[IDX_GCH2CCHI] + k[7721]*y_cur[IDX_GCH2CCH2I] + + k[7723]*y_cur[IDX_GCH2CCH2I] + k[7729]*y_cur[IDX_GCH3CCHI] + + k[7731]*y_cur[IDX_GCH3CCHI] - k[8026]*y_cur[IDX_GCH2CCHI] - + k[8027]*y_cur[IDX_GCH2CCHI] + k[8028]*y_cur[IDX_GCH2CCH2I] + + k[8031]*y_cur[IDX_GCH2CCH2I] + k[8037]*y_cur[IDX_GCH3CCHI] + + k[8040]*y_cur[IDX_GCH3CCHI] + + k[8317]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] + + k[8318]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] - + k[8319]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - + k[8320]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + + k[8413]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] - + k[8614]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - + k[8615]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI]; + ydot[yistart + IDX_GCH2COI] = 0.0 + k[6961]*y_cur[IDX_CH2COI] - + k[7143]*y_cur[IDX_GCH2COI] - k[7325]*y_cur[IDX_GCH2COI] - + k[7507]*y_cur[IDX_GCH2COI] - k[7742]*y_cur[IDX_GCH2COI] - + k[7743]*y_cur[IDX_GCH2COI] - k[7744]*y_cur[IDX_GCH2COI] - + k[7745]*y_cur[IDX_GCH2COI] + k[7762]*y_cur[IDX_GCH3CHOI] + + k[7818]*y_cur[IDX_GCH3COCH3I] - k[8053]*y_cur[IDX_GCH2COI] - + k[8054]*y_cur[IDX_GCH2COI] - k[8055]*y_cur[IDX_GCH2COI] - + k[8056]*y_cur[IDX_GCH2COI] + k[8080]*y_cur[IDX_GCH3CHOI] + + k[8325]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI]; + ydot[yistart + IDX_GHNOI] = 0.0 + k[6930]*y_cur[IDX_HNOI] - + k[7112]*y_cur[IDX_GHNOI] - k[7294]*y_cur[IDX_GHNOI] - + k[7476]*y_cur[IDX_GHNOI] - k[7694]*y_cur[IDX_GHNOI] - + k[7992]*y_cur[IDX_GHNOI] + k[8305]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] - + k[8306]*y_cur[IDX_GHI]*y_cur[IDX_GHNOI] - + k[8435]*y_cur[IDX_GOI]*y_cur[IDX_GHNOI] + + k[8439]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] + + k[8440]*y_cur[IDX_GOI]*y_cur[IDX_GNH2I] - + k[8477]*y_cur[IDX_GCHI]*y_cur[IDX_GHNOI] - + k[8533]*y_cur[IDX_GCH2I]*y_cur[IDX_GHNOI] - + k[8541]*y_cur[IDX_GCH3I]*y_cur[IDX_GHNOI]; + ydot[yistart + IDX_GN2I] = 0.0 + k[6916]*y_cur[IDX_N2I] - + k[7098]*y_cur[IDX_GN2I] - k[7280]*y_cur[IDX_GN2I] - + k[7462]*y_cur[IDX_GN2I] - k[7666]*y_cur[IDX_GN2I] - + k[7953]*y_cur[IDX_GN2I] + k[8070]*y_cur[IDX_GN2OI] + + k[8072]*y_cur[IDX_GN2OI] + k[8457]*y_cur[IDX_GNI]*y_cur[IDX_GNI] + + k[8458]*y_cur[IDX_GNI]*y_cur[IDX_GNHI] + + k[8459]*y_cur[IDX_GNI]*y_cur[IDX_GNSI] + + k[8524]*y_cur[IDX_GNHI]*y_cur[IDX_GNHI] + + k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] + + k[8530]*y_cur[IDX_GNH2I]*y_cur[IDX_GNOI]; + ydot[yistart + IDX_HC4NII] = 0.0 - + k[1073]*y_cur[IDX_HC4NII]*y_cur[IDX_eM] + + k[1541]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - + k[2446]*y_cur[IDX_H2I]*y_cur[IDX_HC4NII] + + k[3406]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - + k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HCNOHII] = 0.0 - + k[1094]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] - + k[1095]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] - + k[1096]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] + + k[2696]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + + k[2713]*y_cur[IDX_H3II]*y_cur[IDX_HONCI] + + k[2898]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] + + k[3053]*y_cur[IDX_HONCII]*y_cur[IDX_H2I] - + k[6532]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - + k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - + k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HNCOHII] = 0.0 - + k[1118]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] - + k[1119]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] - + k[1120]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + + k[2708]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] + + k[2712]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] + + k[3048]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] + + k[3052]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - + k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - + k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - + k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HOCNII] = 0.0 - + k[1126]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] - + k[1127]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] - + k[3051]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - + k[3052]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] + + k[3766]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + + k[3768]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - + k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] - + k[6525]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HeHII] = 0.0 - + k[1149]*y_cur[IDX_HeHII]*y_cur[IDX_eM] + + k[2390]*y_cur[IDX_H2II]*y_cur[IDX_HeI] - + k[2458]*y_cur[IDX_H2I]*y_cur[IDX_HeHII] - + k[2845]*y_cur[IDX_HI]*y_cur[IDX_HeHII] + + k[3250]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + + k[5547]*y_cur[IDX_HII]*y_cur[IDX_HeI] - + k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PC2H3II] = 0.0 - + k[1184]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] - + k[1185]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] - + k[1186]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + + k[1572]*y_cur[IDX_C2H2I]*y_cur[IDX_PH3II] + + k[1711]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - + k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - + k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - + k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PNII] = 0.0 - + k[249]*y_cur[IDX_CI]*y_cur[IDX_PNII] + + k[412]*y_cur[IDX_HII]*y_cur[IDX_PNI] - + k[1211]*y_cur[IDX_PNII]*y_cur[IDX_eM] - + k[3752]*y_cur[IDX_OI]*y_cur[IDX_PNII] - + k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PNH3II] = 0.0 - + k[1215]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - + k[1216]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - + k[1217]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + + k[3598]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + + k[3600]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - + k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - + k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - + k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3CSII] = 0.0 - + k[954]*y_cur[IDX_CH3CSII]*y_cur[IDX_eM] + + k[1716]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] + + k[3824]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + + k[3847]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + + k[3853]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC5NI] = 0.0 + k[7044]*y_cur[IDX_C5NI] - + k[7226]*y_cur[IDX_GC5NI] - k[7408]*y_cur[IDX_GC5NI] - + k[7590]*y_cur[IDX_GC5NI] - k[7854]*y_cur[IDX_GC5NI] + + k[7856]*y_cur[IDX_GHC5NI] + k[7865]*y_cur[IDX_GCH3C5NI] - + k[8186]*y_cur[IDX_GC5NI] + k[8188]*y_cur[IDX_GHC5NI] + + k[8204]*y_cur[IDX_GCH3C5NI] + k[8212]*y_cur[IDX_GC7NI] - + k[8354]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] + + k[8467]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - + k[8553]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI] - + k[8640]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] - + k[8757]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI]; + ydot[yistart + IDX_GPI] = 0.0 + k[6928]*y_cur[IDX_PI] - + k[7110]*y_cur[IDX_GPI] - k[7292]*y_cur[IDX_GPI] - + k[7474]*y_cur[IDX_GPI] + k[7696]*y_cur[IDX_GPHI] + + k[7753]*y_cur[IDX_GCPI] + k[7768]*y_cur[IDX_GPNI] + + k[7782]*y_cur[IDX_GPOI] + k[7813]*y_cur[IDX_GCCPI] + + k[7996]*y_cur[IDX_GPHI] + k[8008]*y_cur[IDX_GPH2I] + + k[8009]*y_cur[IDX_GPH2I] + k[8067]*y_cur[IDX_GCPI] + + k[8088]*y_cur[IDX_GPNI] + k[8106]*y_cur[IDX_GPOI] + + k[8142]*y_cur[IDX_GCCPI]; + ydot[yistart + IDX_H2C7NII] = 0.0 - + k[989]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] - + k[990]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + + k[2448]*y_cur[IDX_H2I]*y_cur[IDX_HC7NII] + + k[2692]*y_cur[IDX_H3II]*y_cur[IDX_HC7NI] + + k[2967]*y_cur[IDX_HCOII]*y_cur[IDX_HC7NI] + + k[3433]*y_cur[IDX_NI]*y_cur[IDX_C7H3II] - + k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] - + k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2C9NII] = 0.0 - + k[991]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] - + k[992]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + + k[2449]*y_cur[IDX_H2I]*y_cur[IDX_HC9NII] + + k[2693]*y_cur[IDX_H3II]*y_cur[IDX_HC9NI] + + k[2968]*y_cur[IDX_HCOII]*y_cur[IDX_HC9NI] + + k[3450]*y_cur[IDX_NI]*y_cur[IDX_C9H3II] - + k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] - + k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2O2I] = 0.0 + + k[5146]*y_cur[IDX_H2I]*y_cur[IDX_O2HI] + + k[5150]*y_cur[IDX_H2COI]*y_cur[IDX_O2HI] + + k[5152]*y_cur[IDX_H2OI]*y_cur[IDX_O2HI] - + k[5166]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - + k[5167]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] + + k[5339]*y_cur[IDX_O2HI]*y_cur[IDX_O2HI] - + k[5398]*y_cur[IDX_OI]*y_cur[IDX_H2O2I] - + k[5467]*y_cur[IDX_OHI]*y_cur[IDX_H2O2I] - k[5838]*y_cur[IDX_H2O2I] - + k[6158]*y_cur[IDX_H2O2I] - k[6940]*y_cur[IDX_H2O2I] + + k[7122]*y_cur[IDX_GH2O2I] + k[7304]*y_cur[IDX_GH2O2I] + + k[7486]*y_cur[IDX_GH2O2I] + k[8606]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] + + k[8738]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI]; + ydot[yistart + IDX_H3S2II] = 0.0 - + k[1049]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] - + k[1050]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] + + k[2685]*y_cur[IDX_H3II]*y_cur[IDX_H2S2I] + + k[2800]*y_cur[IDX_H3OII]*y_cur[IDX_H2S2I] + + k[2960]*y_cur[IDX_HCOII]*y_cur[IDX_H2S2I] + + k[5558]*y_cur[IDX_H2I]*y_cur[IDX_HS2II] - + k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - + k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HONCII] = 0.0 + + k[522]*y_cur[IDX_HeII]*y_cur[IDX_HONCI] - + k[1130]*y_cur[IDX_HONCII]*y_cur[IDX_eM] - + k[1131]*y_cur[IDX_HONCII]*y_cur[IDX_eM] + + k[2673]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - + k[3053]*y_cur[IDX_HONCII]*y_cur[IDX_H2I] - + k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] - + k[6521]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PCH3II] = 0.0 - + k[1199]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] - + k[1200]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] - + k[1201]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + + k[2212]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] + + k[2319]*y_cur[IDX_HII]*y_cur[IDX_CH2PHI] - + k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - + k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - + k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PNH2II] = 0.0 - + k[1212]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] - + k[1213]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] - + k[1214]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + + k[3595]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + + k[3597]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - + k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - + k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - + k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C10H3II] = 0.0 - + k[733]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] - + k[734]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + + k[1504]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] + + k[2584]*y_cur[IDX_H3II]*y_cur[IDX_C10H2I] + k[2900]*y_cur[IDX_HCOII]*y_cur[IDX_C10H2I] - - k[2901]*y_cur[IDX_HCOII]*y_cur[IDX_C10HI] - - k[2902]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5I] - - k[2903]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5OHI] - - k[2904]*y_cur[IDX_HCOII]*y_cur[IDX_C2OI] - - k[2905]*y_cur[IDX_HCOII]*y_cur[IDX_C2SI] - - k[2906]*y_cur[IDX_HCOII]*y_cur[IDX_C3I] - - k[2907]*y_cur[IDX_HCOII]*y_cur[IDX_C3H2I] - - k[2908]*y_cur[IDX_HCOII]*y_cur[IDX_C3HI] - - k[2909]*y_cur[IDX_HCOII]*y_cur[IDX_C3NI] - - k[2910]*y_cur[IDX_HCOII]*y_cur[IDX_C3OI] - - k[2911]*y_cur[IDX_HCOII]*y_cur[IDX_C3PI] - - k[2912]*y_cur[IDX_HCOII]*y_cur[IDX_C3SI] - - k[2913]*y_cur[IDX_HCOII]*y_cur[IDX_C4I] - - k[2914]*y_cur[IDX_HCOII]*y_cur[IDX_C4H3I] - - k[2915]*y_cur[IDX_HCOII]*y_cur[IDX_C4HI] - - k[2916]*y_cur[IDX_HCOII]*y_cur[IDX_C4PI] - - k[2917]*y_cur[IDX_HCOII]*y_cur[IDX_C4SI] - - k[2918]*y_cur[IDX_HCOII]*y_cur[IDX_C5I] - - k[2919]*y_cur[IDX_HCOII]*y_cur[IDX_C5H2I] - - k[2920]*y_cur[IDX_HCOII]*y_cur[IDX_C5HI] - - k[2921]*y_cur[IDX_HCOII]*y_cur[IDX_C5NI] - - k[2922]*y_cur[IDX_HCOII]*y_cur[IDX_C6I] - - k[2923]*y_cur[IDX_HCOII]*y_cur[IDX_C6H2I] - - k[2924]*y_cur[IDX_HCOII]*y_cur[IDX_C6H6I] - - k[2925]*y_cur[IDX_HCOII]*y_cur[IDX_C6HI] - - k[2926]*y_cur[IDX_HCOII]*y_cur[IDX_C7I] - - k[2927]*y_cur[IDX_HCOII]*y_cur[IDX_C7H2I] - - k[2928]*y_cur[IDX_HCOII]*y_cur[IDX_C7HI] - - k[2929]*y_cur[IDX_HCOII]*y_cur[IDX_C7NI] - - k[2930]*y_cur[IDX_HCOII]*y_cur[IDX_C8I] - - k[2931]*y_cur[IDX_HCOII]*y_cur[IDX_C8H2I] - - k[2932]*y_cur[IDX_HCOII]*y_cur[IDX_C8HI] - - k[2933]*y_cur[IDX_HCOII]*y_cur[IDX_C9I] - - k[2934]*y_cur[IDX_HCOII]*y_cur[IDX_C9H2I] - - k[2935]*y_cur[IDX_HCOII]*y_cur[IDX_C9HI] - - k[2936]*y_cur[IDX_HCOII]*y_cur[IDX_C9NI] - - k[2937]*y_cur[IDX_HCOII]*y_cur[IDX_CCPI] - - k[2938]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CCHI] - - k[2939]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CHCNI] - - k[2940]*y_cur[IDX_HCOII]*y_cur[IDX_CH2COI] - - k[2941]*y_cur[IDX_HCOII]*y_cur[IDX_CH2NHI] - - k[2942]*y_cur[IDX_HCOII]*y_cur[IDX_CH2PHI] - - k[2943]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C3NI] - - k[2944]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C4HI] - - k[2945]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C5NI] - - k[2946]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C6HI] - - k[2947]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C7NI] - - k[2948]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CCHI] - - k[2949]*y_cur[IDX_HCOII]*y_cur[IDX_C2H6I] - - k[2950]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CHOI] - - k[2951]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CNI] - - k[2952]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COCH3I] - - k[2953]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OCH3I] - - k[2954]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OHI] - - k[2955]*y_cur[IDX_HCOII]*y_cur[IDX_CPI] - - k[2956]*y_cur[IDX_HCOII]*y_cur[IDX_CSI] - - k[2957]*y_cur[IDX_HCOII]*y_cur[IDX_H2CCCI] - - k[2958]*y_cur[IDX_HCOII]*y_cur[IDX_H2COI] - - k[2959]*y_cur[IDX_HCOII]*y_cur[IDX_H2CSI] - - k[2960]*y_cur[IDX_HCOII]*y_cur[IDX_H2S2I] - - k[2961]*y_cur[IDX_HCOII]*y_cur[IDX_H2SI] - - k[2962]*y_cur[IDX_HCOII]*y_cur[IDX_H2SiOI] - - k[2963]*y_cur[IDX_HCOII]*y_cur[IDX_HC2PI] - - k[2964]*y_cur[IDX_HCOII]*y_cur[IDX_HC3NI] - - k[2965]*y_cur[IDX_HCOII]*y_cur[IDX_C4H2I] - - k[2966]*y_cur[IDX_HCOII]*y_cur[IDX_HC5NI] - - k[2967]*y_cur[IDX_HCOII]*y_cur[IDX_HC7NI] - - k[2968]*y_cur[IDX_HCOII]*y_cur[IDX_HC9NI] - - k[2969]*y_cur[IDX_HCOII]*y_cur[IDX_HCOI] - + k[3683]*y_cur[IDX_OI]*y_cur[IDX_C10H3II] - + k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - + k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2H5CNHII] = 0.0 - + k[769]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] - + k[770]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] - + k[771]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] - + k[1723]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_CH3COCH3I] + + k[2136]*y_cur[IDX_CH4II]*y_cur[IDX_C2H5CNI] + + k[5533]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - + k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - + k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - + k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CClII] = 0.0 + + k[159]*y_cur[IDX_CII]*y_cur[IDX_CClI] - + k[904]*y_cur[IDX_CClII]*y_cur[IDX_eM] + + k[1411]*y_cur[IDX_CII]*y_cur[IDX_HClI] - + k[2492]*y_cur[IDX_H2COI]*y_cur[IDX_CClII] - + k[3566]*y_cur[IDX_NH3I]*y_cur[IDX_CClII] - + k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2NH2II] = 0.0 - + k[921]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] - + k[922]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] + + k[2787]*y_cur[IDX_H3OII]*y_cur[IDX_CH2NHI] + + k[2941]*y_cur[IDX_HCOII]*y_cur[IDX_CH2NHI] + + k[3570]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - + k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] - + k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2OHCH2OII] = 0.0 - + k[1280]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - + k[1281]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - + k[1282]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - + k[1283]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + + k[5662]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCHOI] + + k[5663]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCHOI] + + k[5664]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCHOI] - + k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3C5NHII] = 0.0 - + k[931]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] - + k[932]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] - + k[1896]*y_cur[IDX_CI]*y_cur[IDX_CH3C5NHII] + + k[2644]*y_cur[IDX_H3II]*y_cur[IDX_CH3C5NI] + + k[2945]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C5NI] + + k[5538]*y_cur[IDX_CH3II]*y_cur[IDX_HC5NI] - + k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - + k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3C7NHII] = 0.0 - + k[933]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] - + k[934]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] - + k[1897]*y_cur[IDX_CI]*y_cur[IDX_CH3C7NHII] + + k[2646]*y_cur[IDX_H3II]*y_cur[IDX_CH3C7NI] + + k[2947]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C7NI] + + k[5539]*y_cur[IDX_CH3II]*y_cur[IDX_HC7NI] - + k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - + k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC2H5I] = 0.0 + k[6922]*y_cur[IDX_C2H5I] - + k[7104]*y_cur[IDX_GC2H5I] - k[7286]*y_cur[IDX_GC2H5I] - + k[7468]*y_cur[IDX_GC2H5I] - k[7676]*y_cur[IDX_GC2H5I] - + k[7677]*y_cur[IDX_GC2H5I] - k[7678]*y_cur[IDX_GC2H5I] - + k[7679]*y_cur[IDX_GC2H5I] - k[7680]*y_cur[IDX_GC2H5I] - + k[7681]*y_cur[IDX_GC2H5I] + k[7689]*y_cur[IDX_GC2H6I] + + k[7772]*y_cur[IDX_GC2H5OHI] + k[7773]*y_cur[IDX_GC2H5OHI] + + k[7809]*y_cur[IDX_GC2H5CNI] - k[7963]*y_cur[IDX_GC2H5I] - + k[7964]*y_cur[IDX_GC2H5I] - k[7965]*y_cur[IDX_GC2H5I] - + k[7966]*y_cur[IDX_GC2H5I] - k[7967]*y_cur[IDX_GC2H5I] - + k[7968]*y_cur[IDX_GC2H5I] + k[7979]*y_cur[IDX_GC2H6I] + + k[8092]*y_cur[IDX_GC2H5OHI] + k[8093]*y_cur[IDX_GC2H5OHI] + + k[8138]*y_cur[IDX_GC2H5CNI] + + k[8289]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] - + k[8290]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] + + k[8291]*y_cur[IDX_GHI]*y_cur[IDX_GC2H6I] + + k[8532]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] - + k[8591]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I]; + ydot[yistart + IDX_GC3NI] = 0.0 + k[6997]*y_cur[IDX_C3NI] - + k[7179]*y_cur[IDX_GC3NI] - k[7361]*y_cur[IDX_GC3NI] - + k[7543]*y_cur[IDX_GC3NI] - k[7790]*y_cur[IDX_GC3NI] + + k[7844]*y_cur[IDX_GCH3C3NI] - k[8114]*y_cur[IDX_GC3NI] + + k[8122]*y_cur[IDX_GHNC3I] + k[8171]*y_cur[IDX_GCH3C3NI] - + k[8343]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] + + k[8418]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] + + k[8465]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - + k[8552]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI] - + k[8633]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] - + k[8756]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI]; + ydot[yistart + IDX_GC7NI] = 0.0 + k[7057]*y_cur[IDX_C7NI] - + k[7239]*y_cur[IDX_GC7NI] - k[7421]*y_cur[IDX_GC7NI] - + k[7603]*y_cur[IDX_GC7NI] - k[7868]*y_cur[IDX_GC7NI] + + k[7874]*y_cur[IDX_GCH3C7NI] - k[8211]*y_cur[IDX_GC7NI] - + k[8212]*y_cur[IDX_GC7NI] + k[8218]*y_cur[IDX_GHC7NI] + + k[8228]*y_cur[IDX_GCH3C7NI] + k[8247]*y_cur[IDX_GC9NI] - + k[8359]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] + + k[8469]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - + k[8554]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI] - + k[8645]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] - + k[8758]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI]; + ydot[yistart + IDX_GCOOCH3I] = 0.0 + k[7019]*y_cur[IDX_COOCH3I] - + k[7201]*y_cur[IDX_GCOOCH3I] - k[7383]*y_cur[IDX_GCOOCH3I] - + k[7558]*y_cur[IDX_GCOOCH3I] - k[7888]*y_cur[IDX_GCOOCH3I] - + k[8268]*y_cur[IDX_GCOOCH3I] + + k[8347]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] - + k[8365]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] + + k[8512]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] + + k[8537]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOCH3I] + + k[8555]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOCH3I] + + k[8558]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI] + + k[8565]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOCH3I] - + k[8651]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I]; + ydot[yistart + IDX_GHCNI] = 0.0 + k[6911]*y_cur[IDX_HCNI] - + k[7093]*y_cur[IDX_GHCNI] - k[7275]*y_cur[IDX_GHCNI] - + k[7457]*y_cur[IDX_GHCNI] - k[7651]*y_cur[IDX_GHCNI] + + k[7665]*y_cur[IDX_GH2CNI] + k[7737]*y_cur[IDX_GCH3CNI] + + k[7810]*y_cur[IDX_GC2H5CNI] - k[7938]*y_cur[IDX_GHCNI] + + k[7952]*y_cur[IDX_GH2CNI] + k[8046]*y_cur[IDX_GCH3CNI] + + k[8139]*y_cur[IDX_GC2H5CNI] + k[8292]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] + + k[8376]*y_cur[IDX_GH2I]*y_cur[IDX_GCNI] + + k[8455]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] + + k[8480]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] + + k[8481]*y_cur[IDX_GCHI]*y_cur[IDX_GNOI]; + ydot[yistart + IDX_H2CNI] = 0.0 - + k[4960]*y_cur[IDX_CI]*y_cur[IDX_H2CNI] - + k[5164]*y_cur[IDX_HI]*y_cur[IDX_H2CNI] + + k[5227]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] + + k[5257]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - + k[5264]*y_cur[IDX_NI]*y_cur[IDX_H2CNI] - + k[5396]*y_cur[IDX_OI]*y_cur[IDX_H2CNI] - k[5835]*y_cur[IDX_H2CNI] - + k[6151]*y_cur[IDX_H2CNI] - k[6914]*y_cur[IDX_H2CNI] + + k[7096]*y_cur[IDX_GH2CNI] + k[7278]*y_cur[IDX_GH2CNI] + + k[7460]*y_cur[IDX_GH2CNI] + k[8699]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I]; + ydot[yistart + IDX_H2SiOII] = 0.0 + + k[176]*y_cur[IDX_CII]*y_cur[IDX_H2SiOI] + + k[381]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] - + k[1023]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] - + k[1024]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] + + k[3758]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - + k[6585]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] - + k[6586]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H3C5NII] = 0.0 - + k[1028]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] - + k[1029]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + + k[1895]*y_cur[IDX_CI]*y_cur[IDX_CH3C3NHII] + + k[3417]*y_cur[IDX_NI]*y_cur[IDX_C5H5II] + + k[3455]*y_cur[IDX_NI]*y_cur[IDX_CH3C4HII] + + k[5508]*y_cur[IDX_C2H2II]*y_cur[IDX_HC3NI] - + k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] - + k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HCNOII] = 0.0 + + k[520]*y_cur[IDX_HeII]*y_cur[IDX_HCNOI] - + k[1092]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] - + k[1093]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + + k[2672]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - + k[2897]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] - + k[2898]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] - + k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] - + k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CClI] = 0.0 - + k[159]*y_cur[IDX_CII]*y_cur[IDX_CClI] + + k[993]*y_cur[IDX_H2CClII]*y_cur[IDX_eM] - + k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] - + k[5379]*y_cur[IDX_OI]*y_cur[IDX_CClI] - + k[5380]*y_cur[IDX_OI]*y_cur[IDX_CClI] - k[5775]*y_cur[IDX_CClI] - + k[6072]*y_cur[IDX_CClI] + + k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] - + k[6991]*y_cur[IDX_CClI] + k[7173]*y_cur[IDX_GCClI] + + k[7355]*y_cur[IDX_GCClI] + k[7537]*y_cur[IDX_GCClI]; + ydot[yistart + IDX_CH3COOHII] = 0.0 - + k[1284]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - + k[1285]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - + k[1286]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - + k[1287]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - + k[1288]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - + k[1289]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[5667]*y_cur[IDX_CII]*y_cur[IDX_CH3COOHI] - + k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6716]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_ClII] = 0.0 - + k[318]*y_cur[IDX_ClII]*y_cur[IDX_HI] + + k[319]*y_cur[IDX_ClI]*y_cur[IDX_HII] - + k[679]*y_cur[IDX_O2I]*y_cur[IDX_ClII] - + k[2439]*y_cur[IDX_H2I]*y_cur[IDX_ClII] + + k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] + + k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] - + k[5613]*y_cur[IDX_ClII]*y_cur[IDX_eM] + k[5677]*y_cur[IDX_ClI] + + k[5830]*y_cur[IDX_ClI] + k[6143]*y_cur[IDX_ClI] + + k[6307]*y_cur[IDX_ClI] - k[6454]*y_cur[IDX_ClII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GNH3I] = 0.0 + k[6900]*y_cur[IDX_NH3I] - + k[7082]*y_cur[IDX_GNH3I] - k[7264]*y_cur[IDX_GNH3I] - + k[7446]*y_cur[IDX_GNH3I] - k[7634]*y_cur[IDX_GNH3I] - + k[7635]*y_cur[IDX_GNH3I] - k[7636]*y_cur[IDX_GNH3I] - + k[7637]*y_cur[IDX_GNH3I] - k[7915]*y_cur[IDX_GNH3I] - + k[7916]*y_cur[IDX_GNH3I] - k[7917]*y_cur[IDX_GNH3I] - + k[7918]*y_cur[IDX_GNH3I] + k[8281]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] + + k[8372]*y_cur[IDX_GH2I]*y_cur[IDX_GNH2I] + + k[8534]*y_cur[IDX_GNH2I]*y_cur[IDX_GH2COI] + + k[8535]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH3CHOI] + + k[8536]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOHI] + + k[8537]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOCH3I] + + k[8538]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH2OHCHOI]; + ydot[yistart + IDX_H2ClII] = 0.0 - + k[1002]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] - + k[1003]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + + k[2231]*y_cur[IDX_CH5II]*y_cur[IDX_HClI] - + k[2284]*y_cur[IDX_COI]*y_cur[IDX_H2ClII] + + k[2453]*y_cur[IDX_H2I]*y_cur[IDX_HClII] - + k[2543]*y_cur[IDX_H2OI]*y_cur[IDX_H2ClII] + + k[2704]*y_cur[IDX_H3II]*y_cur[IDX_HClI] - + k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] - + k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H3C9NII] = 0.0 - + k[1032]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] - + k[1033]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + + k[1897]*y_cur[IDX_CI]*y_cur[IDX_CH3C7NHII] + + k[3451]*y_cur[IDX_NI]*y_cur[IDX_C9H4II] + + k[5510]*y_cur[IDX_C2H2II]*y_cur[IDX_HC7NI] + + k[5519]*y_cur[IDX_C4H2II]*y_cur[IDX_HC5NI] - + k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - + k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H5C2O2II] = 0.0 - + k[1053]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] - + k[1054]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] + + k[2495]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + + k[2698]*y_cur[IDX_H3II]*y_cur[IDX_HCOOCH3I] + + k[2807]*y_cur[IDX_H3OII]*y_cur[IDX_HCOOCH3I] + k[2970]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOCH3I] - - k[2971]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOHI] - - k[2972]*y_cur[IDX_HCOII]*y_cur[IDX_HCPI] - - k[2973]*y_cur[IDX_HCOII]*y_cur[IDX_HCSiI] - - k[2974]*y_cur[IDX_HCOII]*y_cur[IDX_HNSiI] - - k[2975]*y_cur[IDX_HCOII]*y_cur[IDX_HPOI] - - k[2976]*y_cur[IDX_HCOII]*y_cur[IDX_HS2I] - - k[2977]*y_cur[IDX_HCOII]*y_cur[IDX_HSI] - - k[2978]*y_cur[IDX_HCOII]*y_cur[IDX_N2OI] - - k[2979]*y_cur[IDX_HCOII]*y_cur[IDX_NCCNI] - + k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - + k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HCOOHII] = 0.0 + + k[675]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] - + k[1101]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] - + k[1102]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + + k[5645]*y_cur[IDX_H3II]*y_cur[IDX_COOHI] + + k[5646]*y_cur[IDX_HCOII]*y_cur[IDX_COOHI] + + k[6188]*y_cur[IDX_HCOOHI] - + k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] - + k[6575]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HPNII] = 0.0 - + k[1132]*y_cur[IDX_HPNII]*y_cur[IDX_eM] - + k[1133]*y_cur[IDX_HPNII]*y_cur[IDX_eM] - + k[1134]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + + k[2737]*y_cur[IDX_H3II]*y_cur[IDX_PNI] + + k[2816]*y_cur[IDX_H3OII]*y_cur[IDX_PNI] + + k[2986]*y_cur[IDX_HCOII]*y_cur[IDX_PNI] - + k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - + k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - + k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2SII] = 0.0 + + k[152]*y_cur[IDX_CII]*y_cur[IDX_C2SI] + + k[332]*y_cur[IDX_HII]*y_cur[IDX_C2SI] - + k[786]*y_cur[IDX_C2SII]*y_cur[IDX_eM] - + k[787]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + + k[1527]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] + + k[1750]*y_cur[IDX_C2HI]*y_cur[IDX_SII] - + k[2405]*y_cur[IDX_H2I]*y_cur[IDX_C2SII] - + k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] - + k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3SII] = 0.0 + + k[154]*y_cur[IDX_CII]*y_cur[IDX_C3SI] + + k[337]*y_cur[IDX_HII]*y_cur[IDX_C3SI] - + k[816]*y_cur[IDX_C3SII]*y_cur[IDX_eM] - + k[817]*y_cur[IDX_C3SII]*y_cur[IDX_eM] - + k[818]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + + k[1902]*y_cur[IDX_CI]*y_cur[IDX_HC2SII] + + k[3821]*y_cur[IDX_SII]*y_cur[IDX_C3HI] - + k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - + k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - + k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4NI] = 0.0 + k[42]*y_cur[IDX_CI]*y_cur[IDX_C3NM] + + k[114]*y_cur[IDX_NI]*y_cur[IDX_C4M] + + k[131]*y_cur[IDX_OI]*y_cur[IDX_C5NM] + + k[5236]*y_cur[IDX_NI]*y_cur[IDX_C4HI] - + k[5237]*y_cur[IDX_NI]*y_cur[IDX_C4NI] + + k[5241]*y_cur[IDX_NI]*y_cur[IDX_C5NI] - + k[5363]*y_cur[IDX_OI]*y_cur[IDX_C4NI] + + k[5367]*y_cur[IDX_OI]*y_cur[IDX_C5NI] - k[5733]*y_cur[IDX_C4NI] - + k[6018]*y_cur[IDX_C4NI] - k[6019]*y_cur[IDX_C4NI] - + k[7030]*y_cur[IDX_C4NI] + k[7212]*y_cur[IDX_GC4NI] + + k[7394]*y_cur[IDX_GC4NI] + k[7576]*y_cur[IDX_GC4NI]; + ydot[yistart + IDX_CH3COOH2II] = 0.0 - + k[1290]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[1291]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[1292]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[1293]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[1294]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[1295]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[1296]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[5668]*y_cur[IDX_H3II]*y_cur[IDX_CH3COOHI] + + k[5669]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COOHI] + + k[5670]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COOHI] - + k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3OCH3II] = 0.0 + + k[169]*y_cur[IDX_CII]*y_cur[IDX_CH3OCH3I] + + k[369]*y_cur[IDX_HII]*y_cur[IDX_CH3OCH3I] + + k[671]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] + + k[714]*y_cur[IDX_SOII]*y_cur[IDX_CH3OCH3I] - + k[955]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] - + k[956]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + + k[5814]*y_cur[IDX_CH3OCH3I] + k[6118]*y_cur[IDX_CH3OCH3I] - + k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] - + k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC10I] = 0.0 + k[7064]*y_cur[IDX_C10I] - + k[7246]*y_cur[IDX_GC10I] - k[7428]*y_cur[IDX_GC10I] - + k[7610]*y_cur[IDX_GC10I] - k[7875]*y_cur[IDX_GC10I] + + k[7876]*y_cur[IDX_GC10HI] + k[7880]*y_cur[IDX_GC11I] - + k[8229]*y_cur[IDX_GC10I] - k[8230]*y_cur[IDX_GC10I] - + k[8231]*y_cur[IDX_GC10I] - k[8232]*y_cur[IDX_GC10I] - + k[8233]*y_cur[IDX_GC10I] - k[8234]*y_cur[IDX_GC10I] - + k[8235]*y_cur[IDX_GC10I] + k[8236]*y_cur[IDX_GC10HI] + + k[8243]*y_cur[IDX_GC10HI] + k[8248]*y_cur[IDX_GC10H2I] - + k[8362]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] - + k[8392]*y_cur[IDX_GH2I]*y_cur[IDX_GC10I] + + k[8431]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - + k[8433]*y_cur[IDX_GCI]*y_cur[IDX_GC10I] - + k[8648]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] - + k[8684]*y_cur[IDX_GCI]*y_cur[IDX_GC10I]; + ydot[yistart + IDX_GC10HI] = 0.0 + k[7065]*y_cur[IDX_C10HI] - + k[7247]*y_cur[IDX_GC10HI] - k[7429]*y_cur[IDX_GC10HI] - + k[7611]*y_cur[IDX_GC10HI] - k[7876]*y_cur[IDX_GC10HI] + + k[7878]*y_cur[IDX_GC10H2I] - k[8236]*y_cur[IDX_GC10HI] - + k[8237]*y_cur[IDX_GC10HI] - k[8238]*y_cur[IDX_GC10HI] - + k[8239]*y_cur[IDX_GC10HI] - k[8240]*y_cur[IDX_GC10HI] - + k[8241]*y_cur[IDX_GC10HI] - k[8242]*y_cur[IDX_GC10HI] - + k[8243]*y_cur[IDX_GC10HI] - k[8244]*y_cur[IDX_GC10HI] - + k[8245]*y_cur[IDX_GC10HI] + k[8249]*y_cur[IDX_GC10H2I] + + k[8251]*y_cur[IDX_GC10H2I] + k[8362]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] + - k[8363]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] + + k[8392]*y_cur[IDX_GH2I]*y_cur[IDX_GC10I] - + k[8393]*y_cur[IDX_GH2I]*y_cur[IDX_GC10HI] + + k[8432]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - + k[8649]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI]; + ydot[yistart + IDX_GC8HI] = 0.0 + k[7056]*y_cur[IDX_C8HI] - + k[7238]*y_cur[IDX_GC8HI] - k[7420]*y_cur[IDX_GC8HI] - + k[7602]*y_cur[IDX_GC8HI] - k[7867]*y_cur[IDX_GC8HI] + + k[7869]*y_cur[IDX_GC8H2I] + k[7879]*y_cur[IDX_GHC9NI] - + k[8208]*y_cur[IDX_GC8HI] - k[8209]*y_cur[IDX_GC8HI] - + k[8210]*y_cur[IDX_GC8HI] + k[8213]*y_cur[IDX_GC8H2I] + + k[8215]*y_cur[IDX_GC8H2I] + k[8223]*y_cur[IDX_GC9HI] + + k[8252]*y_cur[IDX_GHC9NI] + k[8253]*y_cur[IDX_GHC9NI] + + k[8357]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - + k[8358]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] + + k[8388]*y_cur[IDX_GH2I]*y_cur[IDX_GC8I] - + k[8389]*y_cur[IDX_GH2I]*y_cur[IDX_GC8HI] + + k[8428]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - + k[8430]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] + + k[8499]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I] - + k[8502]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI] - + k[8644]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] - + k[8681]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] - + k[8735]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI]; + ydot[yistart + IDX_GCH2OHCOI] = 0.0 + k[7020]*y_cur[IDX_CH2OHCOI] - + k[7202]*y_cur[IDX_GCH2OHCOI] - k[7384]*y_cur[IDX_GCH2OHCOI] - + k[7559]*y_cur[IDX_GCH2OHCOI] - k[7889]*y_cur[IDX_GCH2OHCOI] - + k[8269]*y_cur[IDX_GCH2OHCOI] - + k[8366]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI] + + k[8367]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] + + k[8519]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] + + k[8527]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2OHCHOI] + + k[8538]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH2OHCHOI] + + k[8556]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] + + k[8567]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] + + k[8568]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI] + + k[8574]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH2OHCHOI] - + k[8652]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI]; + ydot[yistart + IDX_GCOOHI] = 0.0 + k[6981]*y_cur[IDX_COOHI] - + k[7163]*y_cur[IDX_GCOOHI] - k[7345]*y_cur[IDX_GCOOHI] - + k[7527]*y_cur[IDX_GCOOHI] - k[7884]*y_cur[IDX_GCOOHI] + + k[7891]*y_cur[IDX_GCH3COOHI] - k[8267]*y_cur[IDX_GCOOHI] + + k[8272]*y_cur[IDX_GCH3COOHI] - + k[8336]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] + + k[8337]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + + k[8510]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOHI] + + k[8516]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] + + k[8536]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOHI] - + k[8549]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI] + + k[8550]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOHI] + + k[8564]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOHI] - + k[8628]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] - + k[8755]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI]; + ydot[yistart + IDX_GO2I] = 0.0 + k[6934]*y_cur[IDX_O2I] - + k[7116]*y_cur[IDX_GO2I] - k[7298]*y_cur[IDX_GO2I] - + k[7480]*y_cur[IDX_GO2I] - k[7703]*y_cur[IDX_GO2I] - + k[7704]*y_cur[IDX_GO2I] + k[7705]*y_cur[IDX_GO2HI] - + k[8003]*y_cur[IDX_GO2I] - k[8004]*y_cur[IDX_GO2I] + + k[8005]*y_cur[IDX_GO2HI] - k[8307]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] + + k[8349]*y_cur[IDX_GHI]*y_cur[IDX_GSO2I] - + k[8407]*y_cur[IDX_GCI]*y_cur[IDX_GO2I] + + k[8436]*y_cur[IDX_GOI]*y_cur[IDX_GO2HI] + + k[8443]*y_cur[IDX_GOI]*y_cur[IDX_GOI] + + k[8454]*y_cur[IDX_GNI]*y_cur[IDX_GO2HI] - + k[8485]*y_cur[IDX_GCHI]*y_cur[IDX_GO2I] - + k[8528]*y_cur[IDX_GCH2I]*y_cur[IDX_GO2I] - + k[8605]*y_cur[IDX_GHI]*y_cur[IDX_GO2I]; + ydot[yistart + IDX_H3C7NII] = 0.0 - + k[1030]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] - + k[1031]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + + k[1896]*y_cur[IDX_CI]*y_cur[IDX_CH3C5NHII] + + k[3434]*y_cur[IDX_NI]*y_cur[IDX_C7H4II] + + k[3435]*y_cur[IDX_NI]*y_cur[IDX_C7H5II] + + k[5509]*y_cur[IDX_C2H2II]*y_cur[IDX_HC5NI] + + k[5517]*y_cur[IDX_C4H2II]*y_cur[IDX_HC3NI] - + k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] - + k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H3SiOII] = 0.0 - + k[1051]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] - + k[1052]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + + k[2687]*y_cur[IDX_H3II]*y_cur[IDX_H2SiOI] + + k[2802]*y_cur[IDX_H3OII]*y_cur[IDX_H2SiOI] + + k[2962]*y_cur[IDX_HCOII]*y_cur[IDX_H2SiOI] + + k[3760]*y_cur[IDX_OI]*y_cur[IDX_SiH5II] + + k[3884]*y_cur[IDX_SiH3II]*y_cur[IDX_O2I] - + k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] - + k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HSO2II] = 0.0 - + k[1142]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] - + k[1143]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] - + k[1144]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + + k[2471]*y_cur[IDX_H2I]*y_cur[IDX_SO2II] + + k[2518]*y_cur[IDX_H2OII]*y_cur[IDX_SO2I] - + k[2555]*y_cur[IDX_H2OI]*y_cur[IDX_HSO2II] + + k[2741]*y_cur[IDX_H3II]*y_cur[IDX_SO2I] - + k[3590]*y_cur[IDX_NH3I]*y_cur[IDX_HSO2II] - + k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - + k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - + k[6757]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NH2CNI] = 0.0 + + k[1162]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] - + k[2722]*y_cur[IDX_H3II]*y_cur[IDX_NH2CNI] - k[2980]*y_cur[IDX_HCOII]*y_cur[IDX_NH2CNI] - - k[2981]*y_cur[IDX_HCOII]*y_cur[IDX_NSI] - - k[2982]*y_cur[IDX_HCOII]*y_cur[IDX_OCSI] - - k[2983]*y_cur[IDX_HCOII]*y_cur[IDX_PI] - - k[2984]*y_cur[IDX_HCOII]*y_cur[IDX_PH2I] - - k[2985]*y_cur[IDX_HCOII]*y_cur[IDX_PHI] - - k[2986]*y_cur[IDX_HCOII]*y_cur[IDX_PNI] - - k[2987]*y_cur[IDX_HCOII]*y_cur[IDX_POI] - - k[2988]*y_cur[IDX_HCOII]*y_cur[IDX_S2I] - - k[2989]*y_cur[IDX_HCOII]*y_cur[IDX_SI] - - k[2990]*y_cur[IDX_HCOII]*y_cur[IDX_SOI] - - k[2991]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2I] - - k[2992]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2H2I] - - k[2993]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2HI] - - k[2994]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3I] - - k[2995]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3HI] - - k[2996]*y_cur[IDX_HCOII]*y_cur[IDX_SiC4I] - - k[2997]*y_cur[IDX_HCOII]*y_cur[IDX_SiCI] - - k[2998]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH2I] - - k[2999]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH3I] - - k[3000]*y_cur[IDX_HCOII]*y_cur[IDX_SiH2I] - - k[3001]*y_cur[IDX_HCOII]*y_cur[IDX_SiH4I] - - k[3002]*y_cur[IDX_HCOII]*y_cur[IDX_SiHI] - - k[3003]*y_cur[IDX_HCOII]*y_cur[IDX_SiNCI] - + k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] + + k[5303]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - k[5884]*y_cur[IDX_NH2CNI] - + k[6220]*y_cur[IDX_NH2CNI] + + k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] - + k[6962]*y_cur[IDX_NH2CNI] + k[7144]*y_cur[IDX_GNH2CNI] + + k[7326]*y_cur[IDX_GNH2CNI] + k[7508]*y_cur[IDX_GNH2CNI]; + ydot[yistart + IDX_CH3C3NHII] = 0.0 - + k[927]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] - + k[928]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] - + k[1895]*y_cur[IDX_CI]*y_cur[IDX_CH3C3NHII] + + k[2430]*y_cur[IDX_H2I]*y_cur[IDX_CH3C3NII] + + k[2642]*y_cur[IDX_H3II]*y_cur[IDX_CH3C3NI] + + k[2943]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C3NI] + + k[3408]*y_cur[IDX_NI]*y_cur[IDX_C4H5II] + + k[5537]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] - + k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] - + k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3OCH4II] = 0.0 - + k[957]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] - + k[958]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] - + k[959]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + + k[2125]*y_cur[IDX_CH3OHI]*y_cur[IDX_CH3OH2II] + + k[2666]*y_cur[IDX_H3II]*y_cur[IDX_CH3OCH3I] + + k[2794]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OCH3I] + + k[2953]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OCH3I] + + k[5534]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - + k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - + k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - + k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC2H4I] = 0.0 + k[6917]*y_cur[IDX_C2H4I] - + k[7099]*y_cur[IDX_GC2H4I] - k[7281]*y_cur[IDX_GC2H4I] - + k[7463]*y_cur[IDX_GC2H4I] - k[7667]*y_cur[IDX_GC2H4I] - + k[7668]*y_cur[IDX_GC2H4I] - k[7669]*y_cur[IDX_GC2H4I] - + k[7670]*y_cur[IDX_GC2H4I] - k[7671]*y_cur[IDX_GC2H4I] - + k[7672]*y_cur[IDX_GC2H4I] - k[7673]*y_cur[IDX_GC2H4I] - + k[7674]*y_cur[IDX_GC2H4I] + k[7680]*y_cur[IDX_GC2H5I] + + k[7687]*y_cur[IDX_GC2H6I] + k[7688]*y_cur[IDX_GC2H6I] + + k[7740]*y_cur[IDX_GCH3CHCH2I] + k[7885]*y_cur[IDX_GC2H4CNI] - + k[7954]*y_cur[IDX_GC2H4I] - k[7955]*y_cur[IDX_GC2H4I] - + k[7956]*y_cur[IDX_GC2H4I] - k[7957]*y_cur[IDX_GC2H4I] - + k[7958]*y_cur[IDX_GC2H4I] - k[7959]*y_cur[IDX_GC2H4I] - + k[7960]*y_cur[IDX_GC2H4I] - k[7961]*y_cur[IDX_GC2H4I] + + k[7967]*y_cur[IDX_GC2H5I] + k[7977]*y_cur[IDX_GC2H6I] + + k[7978]*y_cur[IDX_GC2H6I] + k[8051]*y_cur[IDX_GCH3CHCH2I] + + k[8288]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] - + k[8289]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] + + k[8484]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] + + k[8531]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - + k[8590]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I]; + ydot[yistart + IDX_GC9I] = 0.0 + k[7060]*y_cur[IDX_C9I] - + k[7242]*y_cur[IDX_GC9I] - k[7424]*y_cur[IDX_GC9I] - + k[7606]*y_cur[IDX_GC9I] - k[7871]*y_cur[IDX_GC9I] + + k[7872]*y_cur[IDX_GC9HI] + k[7875]*y_cur[IDX_GC10I] - + k[8219]*y_cur[IDX_GC9I] - k[8220]*y_cur[IDX_GC9I] - + k[8221]*y_cur[IDX_GC9I] + k[8222]*y_cur[IDX_GC9HI] + + k[8224]*y_cur[IDX_GC9HI] + k[8226]*y_cur[IDX_GC9H2I] + + k[8233]*y_cur[IDX_GC10I] + k[8235]*y_cur[IDX_GC10I] + + k[8242]*y_cur[IDX_GC10HI] + k[8259]*y_cur[IDX_GC11I] + + k[8263]*y_cur[IDX_GC11I] - k[8360]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - + k[8390]*y_cur[IDX_GH2I]*y_cur[IDX_GC9I] + + k[8429]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - + k[8431]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - + k[8471]*y_cur[IDX_GNI]*y_cur[IDX_GC9I] - + k[8646]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - + k[8682]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - + k[8711]*y_cur[IDX_GNI]*y_cur[IDX_GC9I]; + ydot[yistart + IDX_GC9HI] = 0.0 + k[7061]*y_cur[IDX_C9HI] - + k[7243]*y_cur[IDX_GC9HI] - k[7425]*y_cur[IDX_GC9HI] - + k[7607]*y_cur[IDX_GC9HI] - k[7872]*y_cur[IDX_GC9HI] + + k[7873]*y_cur[IDX_GC9H2I] - k[8222]*y_cur[IDX_GC9HI] - + k[8223]*y_cur[IDX_GC9HI] - k[8224]*y_cur[IDX_GC9HI] + + k[8225]*y_cur[IDX_GC9H2I] + k[8227]*y_cur[IDX_GC9H2I] + + k[8360]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - + k[8361]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] + + k[8390]*y_cur[IDX_GH2I]*y_cur[IDX_GC9I] - + k[8391]*y_cur[IDX_GH2I]*y_cur[IDX_GC9HI] + + k[8430]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] - + k[8432]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - + k[8472]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI] + + k[8501]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I] - + k[8503]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI] - + k[8647]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] - + k[8683]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - + k[8712]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI] - + k[8736]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI]; + ydot[yistart + IDX_GCSI] = 0.0 + k[6975]*y_cur[IDX_CSI] - + k[7157]*y_cur[IDX_GCSI] - k[7339]*y_cur[IDX_GCSI] - + k[7521]*y_cur[IDX_GCSI] - k[7757]*y_cur[IDX_GCSI] - + k[7758]*y_cur[IDX_GCSI] + k[7767]*y_cur[IDX_GHCSI] + + k[7777]*y_cur[IDX_GH2CSI] + k[7815]*y_cur[IDX_GC2SI] + + k[7829]*y_cur[IDX_GOCSI] + k[7848]*y_cur[IDX_GC3SI] + + k[7860]*y_cur[IDX_GC4SI] - k[8075]*y_cur[IDX_GCSI] - + k[8076]*y_cur[IDX_GCSI] + k[8085]*y_cur[IDX_GHCSI] + + k[8087]*y_cur[IDX_GHCSI] + k[8098]*y_cur[IDX_GH2CSI] + + k[8153]*y_cur[IDX_GOCSI] + k[8177]*y_cur[IDX_GC3SI] + + k[8192]*y_cur[IDX_GC4SI] - k[8330]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] + + k[8414]*y_cur[IDX_GCI]*y_cur[IDX_GHSI] + + k[8415]*y_cur[IDX_GCI]*y_cur[IDX_GSI] - + k[8452]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] - + k[8625]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] - + k[8696]*y_cur[IDX_GOI]*y_cur[IDX_GCSI]; + ydot[yistart + IDX_HC7NII] = 0.0 + + k[386]*y_cur[IDX_HII]*y_cur[IDX_HC7NI] - + k[1084]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] - + k[1085]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] + + k[2421]*y_cur[IDX_H2I]*y_cur[IDX_C7NII] - + k[2448]*y_cur[IDX_H2I]*y_cur[IDX_HC7NII] + + k[2624]*y_cur[IDX_H3II]*y_cur[IDX_C7NI] + + k[2929]*y_cur[IDX_HCOII]*y_cur[IDX_C7NI] + + k[3432]*y_cur[IDX_NI]*y_cur[IDX_C7H2II] + k[6178]*y_cur[IDX_HC7NI] - + k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] - + k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HC9NII] = 0.0 + + k[387]*y_cur[IDX_HII]*y_cur[IDX_HC9NI] - + k[1086]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] - + k[1087]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] + + k[2426]*y_cur[IDX_H2I]*y_cur[IDX_C9NII] - + k[2449]*y_cur[IDX_H2I]*y_cur[IDX_HC9NII] + + k[2631]*y_cur[IDX_H3II]*y_cur[IDX_C9NI] + + k[2936]*y_cur[IDX_HCOII]*y_cur[IDX_C9NI] + + k[3449]*y_cur[IDX_NI]*y_cur[IDX_C9H2II] + k[6180]*y_cur[IDX_HC9NI] - + k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - + k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HNCOII] = 0.0 + + k[521]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] - + k[1116]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] - + k[1117]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + + k[2538]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[3047]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] - + k[3048]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] + + k[3765]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + + k[3767]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - + k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] - + k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NO2II] = 0.0 + + k[676]*y_cur[IDX_O2II]*y_cur[IDX_NO2I] - + k[1169]*y_cur[IDX_NO2II]*y_cur[IDX_eM] - + k[2465]*y_cur[IDX_H2I]*y_cur[IDX_NO2II] - + k[2846]*y_cur[IDX_HI]*y_cur[IDX_NO2II] + + k[3466]*y_cur[IDX_NI]*y_cur[IDX_O2HII] + + k[3621]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + + k[3740]*y_cur[IDX_OI]*y_cur[IDX_HNOII] + k[6226]*y_cur[IDX_NO2I] - + k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PC3HII] = 0.0 - + k[1190]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] - + k[1191]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] - + k[1192]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + + k[2606]*y_cur[IDX_H3II]*y_cur[IDX_C3PI] + + k[2776]*y_cur[IDX_H3OII]*y_cur[IDX_C3PI] + + k[2911]*y_cur[IDX_HCOII]*y_cur[IDX_C3PI] + + k[3814]*y_cur[IDX_PI]*y_cur[IDX_C3H2II] - + k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - + k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - + k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PCH4II] = 0.0 - + k[1202]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] - + k[1203]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] - + k[1204]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + + k[2130]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] + + k[2213]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] + + k[2214]*y_cur[IDX_CH4I]*y_cur[IDX_PH2II] + + k[2640]*y_cur[IDX_H3II]*y_cur[IDX_CH2PHI] + + k[2788]*y_cur[IDX_H3OII]*y_cur[IDX_CH2PHI] + + k[2942]*y_cur[IDX_HCOII]*y_cur[IDX_CH2PHI] - + k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - + k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - + k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiH4II] = 0.0 + + k[430]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] - + k[1256]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] - + k[1257]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] - + k[1928]*y_cur[IDX_CI]*y_cur[IDX_SiH4II] - + k[2291]*y_cur[IDX_COI]*y_cur[IDX_SiH4II] - + k[2474]*y_cur[IDX_H2I]*y_cur[IDX_SiH4II] - + k[2572]*y_cur[IDX_H2OI]*y_cur[IDX_SiH4II] + + k[2754]*y_cur[IDX_H3II]*y_cur[IDX_SiH3I] - + k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] - + k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiO2I] = 0.0 + + k[1145]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] - + k[2759]*y_cur[IDX_H3II]*y_cur[IDX_SiO2I] - k[3004]*y_cur[IDX_HCOII]*y_cur[IDX_SiO2I] - - k[3005]*y_cur[IDX_HCOII]*y_cur[IDX_SiOI] - - k[3006]*y_cur[IDX_HCOII]*y_cur[IDX_SiSI] - - k[3029]*y_cur[IDX_HNC3I]*y_cur[IDX_HCOII] - - k[3041]*y_cur[IDX_HNCI]*y_cur[IDX_HCOII] + - k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[3345]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + - k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + - k[3485]*y_cur[IDX_NHII]*y_cur[IDX_COI] + - k[3488]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + - k[3534]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - - k[3542]*y_cur[IDX_NH2I]*y_cur[IDX_HCOII] + - k[3573]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - - k[3584]*y_cur[IDX_NH3I]*y_cur[IDX_HCOII] + - k[3610]*y_cur[IDX_NHI]*y_cur[IDX_COII] - - k[3614]*y_cur[IDX_NHI]*y_cur[IDX_HCOII] + - k[3641]*y_cur[IDX_OII]*y_cur[IDX_H2COI] + - k[3644]*y_cur[IDX_OII]*y_cur[IDX_HCNI] + - k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + - k[3669]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + - k[3679]*y_cur[IDX_OI]*y_cur[IDX_C10HII] + - k[3682]*y_cur[IDX_OI]*y_cur[IDX_C10H2II] + - k[3683]*y_cur[IDX_OI]*y_cur[IDX_C10H3II] + - k[3686]*y_cur[IDX_OI]*y_cur[IDX_C2HII] + - k[3689]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + - k[3692]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] + - k[3695]*y_cur[IDX_OI]*y_cur[IDX_C3H2II] + - k[3696]*y_cur[IDX_OI]*y_cur[IDX_C3H3II] + - k[3697]*y_cur[IDX_OI]*y_cur[IDX_C3H4II] + - k[3699]*y_cur[IDX_OI]*y_cur[IDX_C4HII] + - k[3704]*y_cur[IDX_OI]*y_cur[IDX_C5HII] + - k[3706]*y_cur[IDX_OI]*y_cur[IDX_C5H2II] + - k[3707]*y_cur[IDX_OI]*y_cur[IDX_C5H3II] + - k[3710]*y_cur[IDX_OI]*y_cur[IDX_C6H2II] + - k[3711]*y_cur[IDX_OI]*y_cur[IDX_C6H3II] + - k[3713]*y_cur[IDX_OI]*y_cur[IDX_C7HII] + - k[3715]*y_cur[IDX_OI]*y_cur[IDX_C7H2II] + - k[3716]*y_cur[IDX_OI]*y_cur[IDX_C7H3II] + - k[3719]*y_cur[IDX_OI]*y_cur[IDX_C8H2II] + - k[3720]*y_cur[IDX_OI]*y_cur[IDX_C8H3II] + - k[3722]*y_cur[IDX_OI]*y_cur[IDX_C9HII] + - k[3724]*y_cur[IDX_OI]*y_cur[IDX_C9H2II] + - k[3725]*y_cur[IDX_OI]*y_cur[IDX_C9H3II] + - k[3726]*y_cur[IDX_OI]*y_cur[IDX_CH2CCHII] + - k[3736]*y_cur[IDX_OI]*y_cur[IDX_HCO2II] + - k[3739]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + - k[3755]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] + - k[3763]*y_cur[IDX_OI]*y_cur[IDX_SiNCHII] + - k[3777]*y_cur[IDX_OHII]*y_cur[IDX_COI] + - k[3798]*y_cur[IDX_OHI]*y_cur[IDX_COII] - - k[3801]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] - - k[3802]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + - k[3845]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - - k[3881]*y_cur[IDX_SiI]*y_cur[IDX_HCOII] - - k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] - - k[3905]*y_cur[IDX_CM]*y_cur[IDX_HCOII] - - k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] - - k[3940]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] - - k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] - - k[3975]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] - - k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] - - k[4010]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] - - k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] - - k[4045]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] - - k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] - - k[4080]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] - - k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] - - k[4115]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] - - k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] - - k[4150]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] - - k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] - - k[4185]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] - - k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] - - k[4220]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] - - k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] - - k[4255]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] - - k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] - - k[4290]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] - - k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] - - k[4325]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] - - k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] - - k[4360]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] - - k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] - - k[4395]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] - - k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] - - k[4430]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] - - k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] - - k[4465]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] - - k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] - - k[4500]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] - - k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] - - k[4535]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] - - k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] - - k[4570]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] - - k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] - - k[4605]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] - - k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] - - k[4640]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] - - k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] - - k[4675]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] - - k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] - - k[4711]*y_cur[IDX_HM]*y_cur[IDX_HCOII] - - k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] - - k[4746]*y_cur[IDX_OM]*y_cur[IDX_HCOII] - - k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] - - k[4781]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] - - k[4815]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] - - k[4816]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] - - k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] - - k[4851]*y_cur[IDX_SM]*y_cur[IDX_HCOII] - - k[5543]*y_cur[IDX_CH4I]*y_cur[IDX_HCOII] - - k[5566]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] - - k[5630]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OI] - - k[5636]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHI] - - k[5641]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COI] - - k[5646]*y_cur[IDX_HCOII]*y_cur[IDX_COOHI] - - k[5652]*y_cur[IDX_HCOII]*y_cur[IDX_COOCH3I] - - k[5658]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCOI] - - k[5664]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCHOI] + - k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - - k[5670]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COOHI] + - k[5857]*y_cur[IDX_HCOI] + k[6155]*y_cur[IDX_H2COI] - - k[6183]*y_cur[IDX_HCOII] + k[6185]*y_cur[IDX_HCOI] - - k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCO2II] = 0.0 - - k[1098]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] - - k[1099]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] - - k[1100]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] - - k[1567]*y_cur[IDX_C2H2I]*y_cur[IDX_HCO2II] - - k[1905]*y_cur[IDX_CI]*y_cur[IDX_HCO2II] - - k[2116]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCO2II] + - k[2139]*y_cur[IDX_CH4II]*y_cur[IDX_CO2I] + - k[2191]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - - k[2201]*y_cur[IDX_CH4I]*y_cur[IDX_HCO2II] + - k[2223]*y_cur[IDX_CH5II]*y_cur[IDX_CO2I] - - k[2285]*y_cur[IDX_COI]*y_cur[IDX_HCO2II] + - k[2382]*y_cur[IDX_H2II]*y_cur[IDX_CO2I] + - k[2436]*y_cur[IDX_H2I]*y_cur[IDX_CO2II] + - k[2541]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - - k[2548]*y_cur[IDX_H2OI]*y_cur[IDX_HCO2II] + - k[2674]*y_cur[IDX_H3II]*y_cur[IDX_CO2I] + - k[2853]*y_cur[IDX_HCNII]*y_cur[IDX_CO2I] + - k[3049]*y_cur[IDX_HNOII]*y_cur[IDX_CO2I] + - k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] + - k[3372]*y_cur[IDX_N2HII]*y_cur[IDX_CO2I] + - k[3482]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - - k[3585]*y_cur[IDX_NH3I]*y_cur[IDX_HCO2II] + - k[3666]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + - k[3677]*y_cur[IDX_O2HII]*y_cur[IDX_CO2I] - - k[3736]*y_cur[IDX_OI]*y_cur[IDX_HCO2II] + - k[3776]*y_cur[IDX_OHII]*y_cur[IDX_CO2I] + - k[3802]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + - k[5644]*y_cur[IDX_CII]*y_cur[IDX_COOHI] + - k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - - k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - - k[6568]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCOOCH3I] = 0.0 - - k[179]*y_cur[IDX_CII]*y_cur[IDX_HCOOCH3I] - - k[390]*y_cur[IDX_HII]*y_cur[IDX_HCOOCH3I] + - k[1054]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] - - k[2698]*y_cur[IDX_H3II]*y_cur[IDX_HCOOCH3I] - - k[2807]*y_cur[IDX_H3OII]*y_cur[IDX_HCOOCH3I] - - k[2970]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOCH3I] - - k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] - - k[5858]*y_cur[IDX_HCOOCH3I] - k[5859]*y_cur[IDX_HCOOCH3I] - - k[6186]*y_cur[IDX_HCOOCH3I] + - k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - - k[7021]*y_cur[IDX_HCOOCH3I] + k[7203]*y_cur[IDX_GHCOOCH3I] + - k[7385]*y_cur[IDX_GHCOOCH3I] + k[7569]*y_cur[IDX_GHCOOCH3I] + - k[8651]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] + - k[8759]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI]; + k[3331]*y_cur[IDX_HeII]*y_cur[IDX_SiO2I] + + k[5483]*y_cur[IDX_OHI]*y_cur[IDX_SiOI] - k[5933]*y_cur[IDX_SiO2I] - + k[6285]*y_cur[IDX_SiO2I] + + k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - + k[7025]*y_cur[IDX_SiO2I] + k[7207]*y_cur[IDX_GSiO2I] + + k[7389]*y_cur[IDX_GSiO2I] + k[7573]*y_cur[IDX_GSiO2I]; + ydot[yistart + IDX_C2H5CNI] = 0.0 + + k[770]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + + k[1723]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_CH3COCH3I] - + k[2136]*y_cur[IDX_CH4II]*y_cur[IDX_C2H5CNI] - + k[4886]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] - + k[4887]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] - + k[5704]*y_cur[IDX_C2H5CNI] - k[5705]*y_cur[IDX_C2H5CNI] - + k[5989]*y_cur[IDX_C2H5CNI] - k[5990]*y_cur[IDX_C2H5CNI] + + k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - + k[7013]*y_cur[IDX_C2H5CNI] + k[7195]*y_cur[IDX_GC2H5CNI] + + k[7377]*y_cur[IDX_GC2H5CNI] + k[7561]*y_cur[IDX_GC2H5CNI] + + k[8635]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI]; + ydot[yistart + IDX_C2H5OH2II] = 0.0 - + k[774]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - + k[775]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - + k[776]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - + k[777]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - + k[2491]*y_cur[IDX_H2COI]*y_cur[IDX_C2H5OH2II] + + k[2768]*y_cur[IDX_H3OII]*y_cur[IDX_C2H5OHI] + + k[2903]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5OHI] + + k[3013]*y_cur[IDX_HCSII]*y_cur[IDX_C2H5OHI] - + k[3559]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5OH2II] + + k[5568]*y_cur[IDX_H3OII]*y_cur[IDX_C2H4I] - + k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - + k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - + k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - + k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2H7II] = 0.0 - + k[778]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] - + k[779]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + + k[2222]*y_cur[IDX_CH5II]*y_cur[IDX_C2H6I] - + k[2863]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - + k[2864]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] + + k[2949]*y_cur[IDX_HCOII]*y_cur[IDX_C2H6I] - + k[3560]*y_cur[IDX_NH3I]*y_cur[IDX_C2H7II] + + k[3774]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] - + k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CCPII] = 0.0 + + k[158]*y_cur[IDX_CII]*y_cur[IDX_CCPI] + + k[358]*y_cur[IDX_HII]*y_cur[IDX_CCPI] - + k[902]*y_cur[IDX_CCPII]*y_cur[IDX_eM] - + k[903]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + + k[1396]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] + + k[1409]*y_cur[IDX_CII]*y_cur[IDX_HCPI] + + k[1906]*y_cur[IDX_CI]*y_cur[IDX_HCPII] + + k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - + k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] - + k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2CHCNHII] = 0.0 - + k[913]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] - + k[914]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] - + k[915]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + + k[2429]*y_cur[IDX_H2I]*y_cur[IDX_CH2CHCNII] + + k[2637]*y_cur[IDX_H3II]*y_cur[IDX_CH2CHCNI] + + k[2886]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] + + k[2887]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] + + k[2939]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CHCNI] - + k[3567]*y_cur[IDX_NH3I]*y_cur[IDX_CH2CHCNHII] + + k[5704]*y_cur[IDX_C2H5CNI] + k[5989]*y_cur[IDX_C2H5CNI] - + k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - + k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - + k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_COOCH3I] = 0.0 - + k[5649]*y_cur[IDX_CII]*y_cur[IDX_COOCH3I] - + k[5650]*y_cur[IDX_H3II]*y_cur[IDX_COOCH3I] - + k[5651]*y_cur[IDX_H3OII]*y_cur[IDX_COOCH3I] - + k[5652]*y_cur[IDX_HCOII]*y_cur[IDX_COOCH3I] - + k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] - + k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] - + k[5943]*y_cur[IDX_COOCH3I] - k[6293]*y_cur[IDX_COOCH3I] - + k[7019]*y_cur[IDX_COOCH3I] + k[7201]*y_cur[IDX_GCOOCH3I] + + k[7383]*y_cur[IDX_GCOOCH3I] + k[7558]*y_cur[IDX_GCOOCH3I] + + k[8760]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_FI] = 0.0 + k[457]*y_cur[IDX_H2I]*y_cur[IDX_FII] + + k[905]*y_cur[IDX_CFII]*y_cur[IDX_eM] + + k[1004]*y_cur[IDX_H2FII]*y_cur[IDX_eM] + + k[1112]*y_cur[IDX_HFII]*y_cur[IDX_eM] + + k[1249]*y_cur[IDX_SiFII]*y_cur[IDX_eM] - + k[5139]*y_cur[IDX_H2I]*y_cur[IDX_FI] - + k[5151]*y_cur[IDX_H2OI]*y_cur[IDX_FI] - + k[5464]*y_cur[IDX_OHI]*y_cur[IDX_FI] + k[5865]*y_cur[IDX_HFI] + + k[6196]*y_cur[IDX_HFI] + k[6347]*y_cur[IDX_FII]*y_cur[IDX_GRAINM] + + k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM] + + k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + + k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM] + + k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM] - k[6903]*y_cur[IDX_FI] + + k[7085]*y_cur[IDX_GFI] + k[7267]*y_cur[IDX_GFI] + + k[7449]*y_cur[IDX_GFI]; + ydot[yistart + IDX_GHSI] = 0.0 + k[6938]*y_cur[IDX_HSI] - + k[7120]*y_cur[IDX_GHSI] - k[7302]*y_cur[IDX_GHSI] - + k[7484]*y_cur[IDX_GHSI] - k[7707]*y_cur[IDX_GHSI] + + k[7710]*y_cur[IDX_GH2SI] + k[7845]*y_cur[IDX_GHS2I] + + k[7846]*y_cur[IDX_GH2S2I] + k[7846]*y_cur[IDX_GH2S2I] - + k[8011]*y_cur[IDX_GHSI] + k[8013]*y_cur[IDX_GH2SI] + + k[8015]*y_cur[IDX_GH2SI] + k[8172]*y_cur[IDX_GHS2I] + + k[8173]*y_cur[IDX_GHS2I] + k[8175]*y_cur[IDX_GH2S2I] + + k[8175]*y_cur[IDX_GH2S2I] + k[8311]*y_cur[IDX_GHI]*y_cur[IDX_GSI] - + k[8312]*y_cur[IDX_GHI]*y_cur[IDX_GHSI] + + k[8313]*y_cur[IDX_GHI]*y_cur[IDX_GH2SI] + + k[8348]*y_cur[IDX_GHI]*y_cur[IDX_GOCSI] + + k[8349]*y_cur[IDX_GHI]*y_cur[IDX_GSO2I] - + k[8414]*y_cur[IDX_GCI]*y_cur[IDX_GHSI] - + k[8449]*y_cur[IDX_GOI]*y_cur[IDX_GHSI] - + k[8463]*y_cur[IDX_GNI]*y_cur[IDX_GHSI] - + k[8608]*y_cur[IDX_GHI]*y_cur[IDX_GHSI]; + ydot[yistart + IDX_H2POII] = 0.0 - + k[1017]*y_cur[IDX_H2POII]*y_cur[IDX_eM] - + k[1018]*y_cur[IDX_H2POII]*y_cur[IDX_eM] + + k[2129]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] + + k[2564]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + + k[2567]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] + + k[2714]*y_cur[IDX_H3II]*y_cur[IDX_HPOI] + + k[2812]*y_cur[IDX_H3OII]*y_cur[IDX_HPOI] + + k[2975]*y_cur[IDX_HCOII]*y_cur[IDX_HPOI] + + k[3816]*y_cur[IDX_PHII]*y_cur[IDX_CH3OHI] - + k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] - + k[6623]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM]; ydot[yistart + IDX_HCOOCH3II] = 0.0 + k[179]*y_cur[IDX_CII]*y_cur[IDX_HCOOCH3I] + k[390]*y_cur[IDX_HII]*y_cur[IDX_HCOOCH3I] - @@ -22651,203 +2021,725 @@ __global__ void FexKernel(realtype *y, realtype *ydot, NaunetData *d_udata, k[5859]*y_cur[IDX_HCOOCH3I] - k[6699]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] - k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCOOHI] = 0.0 - - k[675]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + - k[1104]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] + - k[2113]*y_cur[IDX_CH3CHOI]*y_cur[IDX_HCOOH2II] + - k[2117]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCOOH2II] - - k[2120]*y_cur[IDX_CH3OH2II]*y_cur[IDX_HCOOHI] + - k[2127]*y_cur[IDX_CH3OHI]*y_cur[IDX_HCOOH2II] + - k[2549]*y_cur[IDX_H2OI]*y_cur[IDX_HCOOH2II] - - k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - - k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - - k[2765]*y_cur[IDX_H3COII]*y_cur[IDX_HCOOHI] - - k[2971]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOHI] + - k[3586]*y_cur[IDX_NH3I]*y_cur[IDX_HCOOH2II] + - k[3658]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3666]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + - k[5466]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] - k[5860]*y_cur[IDX_HCOOHI] - - k[6187]*y_cur[IDX_HCOOHI] - k[6188]*y_cur[IDX_HCOOHI] + - k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] - - k[6986]*y_cur[IDX_HCOOHI] + k[7168]*y_cur[IDX_GHCOOHI] + - k[7350]*y_cur[IDX_GHCOOHI] + k[7532]*y_cur[IDX_GHCOOHI] + - k[8628]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] + - k[8740]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI]; - ydot[yistart + IDX_HCOOHII] = 0.0 + - k[675]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] - - k[1101]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] - - k[1102]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + - k[5645]*y_cur[IDX_H3II]*y_cur[IDX_COOHI] + - k[5646]*y_cur[IDX_HCOII]*y_cur[IDX_COOHI] + - k[6188]*y_cur[IDX_HCOOHI] - - k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] - - k[6575]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCOOH2II] = 0.0 - - k[1103]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] - - k[1104]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] - - k[2113]*y_cur[IDX_CH3CHOI]*y_cur[IDX_HCOOH2II] - - k[2117]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCOOH2II] + - k[2120]*y_cur[IDX_CH3OH2II]*y_cur[IDX_HCOOHI] - - k[2127]*y_cur[IDX_CH3OHI]*y_cur[IDX_HCOOH2II] + - k[2208]*y_cur[IDX_CH4I]*y_cur[IDX_O2II] - - k[2549]*y_cur[IDX_H2OI]*y_cur[IDX_HCOOH2II] + - k[2765]*y_cur[IDX_H3COII]*y_cur[IDX_HCOOHI] + - k[2971]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOHI] - - k[3586]*y_cur[IDX_NH3I]*y_cur[IDX_HCOOH2II] + - k[5566]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] - - k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] - - k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCPI] = 0.0 - - k[180]*y_cur[IDX_CII]*y_cur[IDX_HCPI] - - k[391]*y_cur[IDX_HII]*y_cur[IDX_HCPI] + - k[1198]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + - k[1200]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + - k[1203]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] - - k[1409]*y_cur[IDX_CII]*y_cur[IDX_HCPI] - - k[2701]*y_cur[IDX_H3II]*y_cur[IDX_HCPI] - - k[2808]*y_cur[IDX_H3OII]*y_cur[IDX_HCPI] - - k[2972]*y_cur[IDX_HCOII]*y_cur[IDX_HCPI] - - k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] - - k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + - k[5401]*y_cur[IDX_OI]*y_cur[IDX_HC2PI] - - k[5407]*y_cur[IDX_OI]*y_cur[IDX_HCPI] + k[5792]*y_cur[IDX_CH2PHI] - - k[5861]*y_cur[IDX_HCPI] - k[6189]*y_cur[IDX_HCPI] + - k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + - k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - - k[6976]*y_cur[IDX_HCPI] + k[7158]*y_cur[IDX_GHCPI] + - k[7340]*y_cur[IDX_GHCPI] + k[7522]*y_cur[IDX_GHCPI]; - ydot[yistart + IDX_HCPII] = 0.0 + - k[180]*y_cur[IDX_CII]*y_cur[IDX_HCPI] + - k[391]*y_cur[IDX_HII]*y_cur[IDX_HCPI] - - k[1105]*y_cur[IDX_HCPII]*y_cur[IDX_eM] - - k[1106]*y_cur[IDX_HCPII]*y_cur[IDX_eM] - - k[1906]*y_cur[IDX_CI]*y_cur[IDX_HCPII] + - k[2437]*y_cur[IDX_H2I]*y_cur[IDX_CPII] - - k[2451]*y_cur[IDX_H2I]*y_cur[IDX_HCPII] + - k[2677]*y_cur[IDX_H3II]*y_cur[IDX_CPI] + - k[2796]*y_cur[IDX_H3OII]*y_cur[IDX_CPI] + - k[2955]*y_cur[IDX_HCOII]*y_cur[IDX_CPI] - - k[3737]*y_cur[IDX_OI]*y_cur[IDX_HCPII] - - k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] - - k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCSI] = 0.0 + - k[1001]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] - - k[2346]*y_cur[IDX_HII]*y_cur[IDX_HCSI] - - k[2702]*y_cur[IDX_H3II]*y_cur[IDX_HCSI] - - k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] - - k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + - k[3845]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + - k[3849]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + - k[3852]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[5020]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - - k[5173]*y_cur[IDX_HI]*y_cur[IDX_HCSI] - - k[5268]*y_cur[IDX_NI]*y_cur[IDX_HCSI] - - k[5408]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - - k[5409]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - k[5862]*y_cur[IDX_HCSI] - - k[6190]*y_cur[IDX_HCSI] - k[6191]*y_cur[IDX_HCSI] + - k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] - - k[6980]*y_cur[IDX_HCSI] + k[7162]*y_cur[IDX_GHCSI] + - k[7344]*y_cur[IDX_GHCSI] + k[7526]*y_cur[IDX_GHCSI] + - k[8625]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] + - k[8713]*y_cur[IDX_GSI]*y_cur[IDX_GCHI]; - ydot[yistart + IDX_HCSII] = 0.0 - - k[1107]*y_cur[IDX_HCSII]*y_cur[IDX_eM] - - k[1108]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + - k[1395]*y_cur[IDX_CII]*y_cur[IDX_H2SI] + - k[1717]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] + - k[1900]*y_cur[IDX_CI]*y_cur[IDX_H2SII] + - k[1955]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] + - k[1970]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] + - k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + - k[1993]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] + - k[1994]*y_cur[IDX_CH2II]*y_cur[IDX_SI] + - k[2017]*y_cur[IDX_CH2I]*y_cur[IDX_SII] + - k[2095]*y_cur[IDX_CH3II]*y_cur[IDX_SI] + - k[2192]*y_cur[IDX_CH4I]*y_cur[IDX_CSII] + - k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + - k[2438]*y_cur[IDX_H2I]*y_cur[IDX_CSII] + - k[2575]*y_cur[IDX_H2SI]*y_cur[IDX_C2NII] + - k[2578]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + - k[2678]*y_cur[IDX_H3II]*y_cur[IDX_CSI] + - k[2797]*y_cur[IDX_H3OII]*y_cur[IDX_CSI] + - k[2956]*y_cur[IDX_HCOII]*y_cur[IDX_CSI] - - k[3013]*y_cur[IDX_HCSII]*y_cur[IDX_C2H5OHI] - - k[3014]*y_cur[IDX_HCSII]*y_cur[IDX_CH3COCH3I] - - k[3587]*y_cur[IDX_NH3I]*y_cur[IDX_HCSII] - - k[3738]*y_cur[IDX_OI]*y_cur[IDX_HCSII] - - k[3739]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + - k[3826]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + - k[3846]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + - k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[5862]*y_cur[IDX_HCSI] + k[6191]*y_cur[IDX_HCSI] - - k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] - - k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HCSiI] = 0.0 - - k[392]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] + - k[1242]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + + ydot[yistart + IDX_HN2OII] = 0.0 - + k[1113]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] - + k[1114]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] + + k[2234]*y_cur[IDX_CH5II]*y_cur[IDX_N2OI] + + k[2559]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] + + k[2581]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] + + k[2719]*y_cur[IDX_H3II]*y_cur[IDX_N2OI] + + k[2978]*y_cur[IDX_HCOII]*y_cur[IDX_N2OI] - + k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] - + k[6559]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_N2OII] = 0.0 + + k[399]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - + k[482]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] - + k[485]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] + + k[659]*y_cur[IDX_OII]*y_cur[IDX_N2OI] - + k[1170]*y_cur[IDX_N2OII]*y_cur[IDX_eM] - + k[1171]*y_cur[IDX_N2OII]*y_cur[IDX_eM] - + k[1172]*y_cur[IDX_N2OII]*y_cur[IDX_eM] - + k[2559]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] - + k[2581]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] + k[6213]*y_cur[IDX_N2OI] - + k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - + k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - + k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PC2H2II] = 0.0 - + k[1181]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] - + k[1182]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] - + k[1183]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + + k[1570]*y_cur[IDX_C2H2I]*y_cur[IDX_PHII] + + k[1571]*y_cur[IDX_C2H2I]*y_cur[IDX_PH2II] + + k[1710]*y_cur[IDX_C2H4I]*y_cur[IDX_PII] + + k[2688]*y_cur[IDX_H3II]*y_cur[IDX_HC2PI] + + k[2803]*y_cur[IDX_H3OII]*y_cur[IDX_HC2PI] + + k[2963]*y_cur[IDX_HCOII]*y_cur[IDX_HC2PI] - + k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - + k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - + k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiC3H2II] = 0.0 - + k[1236]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] - + k[1237]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] + + k[1917]*y_cur[IDX_CI]*y_cur[IDX_SiC2H3II] - + k[1919]*y_cur[IDX_CI]*y_cur[IDX_SiC3H2II] + + k[2748]*y_cur[IDX_H3II]*y_cur[IDX_SiC3HI] + + k[2995]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3HI] + + k[3863]*y_cur[IDX_SiII]*y_cur[IDX_CH2CCHI] + + k[3876]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] + + k[3880]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - + k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] - + k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiC4II] = 0.0 + + k[424]*y_cur[IDX_HII]*y_cur[IDX_SiC4I] - + k[1238]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] - + k[1239]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] + + k[1433]*y_cur[IDX_CII]*y_cur[IDX_SiC3HI] + + k[1918]*y_cur[IDX_CI]*y_cur[IDX_SiC3HII] + + k[3862]*y_cur[IDX_SiII]*y_cur[IDX_C4HI] + + k[3877]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - + k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] - + k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiC4HII] = 0.0 - + k[1240]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] - + k[1241]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] + + k[1575]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2II] + + k[1576]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2HII] + + k[1919]*y_cur[IDX_CI]*y_cur[IDX_SiC3H2II] + + k[2749]*y_cur[IDX_H3II]*y_cur[IDX_SiC4I] + + k[2996]*y_cur[IDX_HCOII]*y_cur[IDX_SiC4I] + + k[3878]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - + k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - + k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiH5II] = 0.0 - + k[1258]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] - + k[1259]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] - + k[1929]*y_cur[IDX_CI]*y_cur[IDX_SiH5II] + + k[2474]*y_cur[IDX_H2I]*y_cur[IDX_SiH4II] - + k[2573]*y_cur[IDX_H2OI]*y_cur[IDX_SiH5II] + + k[2755]*y_cur[IDX_H3II]*y_cur[IDX_SiH4I] + + k[3001]*y_cur[IDX_HCOII]*y_cur[IDX_SiH4I] - + k[3760]*y_cur[IDX_OI]*y_cur[IDX_SiH5II] + + k[5565]*y_cur[IDX_H2I]*y_cur[IDX_SiH3II] - + k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - + k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiNCHII] = 0.0 - + k[1262]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] - + k[1263]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] + + k[1931]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + + k[2758]*y_cur[IDX_H3II]*y_cur[IDX_SiNCI] + + k[2825]*y_cur[IDX_H3OII]*y_cur[IDX_SiNCI] + + k[3003]*y_cur[IDX_HCOII]*y_cur[IDX_SiNCI] - + k[3763]*y_cur[IDX_OI]*y_cur[IDX_SiNCHII] + + k[5580]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] - + k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - + k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C11I] = 0.0 + + k[4910]*y_cur[IDX_CI]*y_cur[IDX_C10HI] - + k[5342]*y_cur[IDX_OI]*y_cur[IDX_C11I] - k[5692]*y_cur[IDX_C11I] - + k[5969]*y_cur[IDX_C11I] - k[5970]*y_cur[IDX_C11I] - + k[5971]*y_cur[IDX_C11I] - k[5972]*y_cur[IDX_C11I] - + k[5973]*y_cur[IDX_C11I] - k[5974]*y_cur[IDX_C11I] - + k[7069]*y_cur[IDX_C11I] + k[7251]*y_cur[IDX_GC11I] + + k[7433]*y_cur[IDX_GC11I] + k[7615]*y_cur[IDX_GC11I] + + k[8684]*y_cur[IDX_GCI]*y_cur[IDX_GC10I]; + ydot[yistart + IDX_C3OII] = 0.0 + + k[153]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + + k[336]*y_cur[IDX_HII]*y_cur[IDX_C3OI] - + k[815]*y_cur[IDX_C3OII]*y_cur[IDX_eM] - + k[2163]*y_cur[IDX_CH4I]*y_cur[IDX_C3OII] - + k[2410]*y_cur[IDX_H2I]*y_cur[IDX_C3OII] - + k[2531]*y_cur[IDX_H2OI]*y_cur[IDX_C3OII] + + k[3668]*y_cur[IDX_O2I]*y_cur[IDX_C3II] - + k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4H5II] = 0.0 - + k[827]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] - + k[828]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] - + k[829]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + + k[1483]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + + k[1537]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] + + k[1539]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] + + k[1669]*y_cur[IDX_C2H4II]*y_cur[IDX_CH3CCHI] + + k[2061]*y_cur[IDX_CH3II]*y_cur[IDX_CH2CCHI] - + k[3408]*y_cur[IDX_NI]*y_cur[IDX_C4H5II] - + k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - + k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - + k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4H7II] = 0.0 - + k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] + + k[1564]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + + k[1615]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + + k[1648]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] + + k[1815]*y_cur[IDX_C3H5II]*y_cur[IDX_CH3CHCH2I] + + k[1817]*y_cur[IDX_C3H6II]*y_cur[IDX_CH3CHCH2I] - + k[1842]*y_cur[IDX_C4H7II]*y_cur[IDX_CH3CNI] - + k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2OHCHOII] = 0.0 - + k[1275]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - + k[1276]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - + k[1277]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - + k[1278]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - + k[1279]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[5656]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCOI] + + k[5657]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCOI] + + k[5658]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCOI] + + k[5661]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCHOI] - + k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3CHOII] = 0.0 + + k[167]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] + + k[366]*y_cur[IDX_HII]*y_cur[IDX_CH3CHOI] - + k[937]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] - + k[938]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + + k[3661]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[5640]*y_cur[IDX_H3II]*y_cur[IDX_CH3COI] + + k[5641]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COI] + + k[5806]*y_cur[IDX_CH3CHOI] + k[6111]*y_cur[IDX_CH3CHOI] - + k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] - + k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GCH2OHCHOI] = 0.0 + k[7026]*y_cur[IDX_CH2OHCHOI] + - k[7208]*y_cur[IDX_GCH2OHCHOI] - k[7390]*y_cur[IDX_GCH2OHCHOI] - + k[7565]*y_cur[IDX_GCH2OHCHOI] - k[7890]*y_cur[IDX_GCH2OHCHOI] - + k[8270]*y_cur[IDX_GCH2OHCHOI] + + k[8366]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI] - + k[8367]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - + k[8368]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - + k[8519]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - + k[8520]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - + k[8527]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2OHCHOI] - + k[8538]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH2OHCHOI] - + k[8556]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - + k[8557]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - + k[8566]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] - + k[8567]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] + + k[8569]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI] + + k[8573]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - + k[8574]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH2OHCHOI]; + ydot[yistart + IDX_GHCOOHI] = 0.0 + k[6986]*y_cur[IDX_HCOOHI] - + k[7168]*y_cur[IDX_GHCOOHI] - k[7350]*y_cur[IDX_GHCOOHI] - + k[7532]*y_cur[IDX_GHCOOHI] - k[7780]*y_cur[IDX_GHCOOHI] - + k[8102]*y_cur[IDX_GHCOOHI] - k[8103]*y_cur[IDX_GHCOOHI] - + k[8104]*y_cur[IDX_GHCOOHI] + + k[8336]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] - + k[8337]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] - + k[8338]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + + k[8505]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + + k[8509]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - + k[8510]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOHI] + + k[8511]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] + + k[8517]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] + + k[8520]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - + k[8536]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOHI] - + k[8550]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOHI] - + k[8564]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOHI]; + ydot[yistart + IDX_H2S2I] = 0.0 - + k[379]*y_cur[IDX_HII]*y_cur[IDX_H2S2I] + + k[1049]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] - + k[2685]*y_cur[IDX_H3II]*y_cur[IDX_H2S2I] - + k[2800]*y_cur[IDX_H3OII]*y_cur[IDX_H2S2I] - + k[2960]*y_cur[IDX_HCOII]*y_cur[IDX_H2S2I] - + k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] - + k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] - k[5840]*y_cur[IDX_H2S2I] + - k[6162]*y_cur[IDX_H2S2I] + + k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - + k[7038]*y_cur[IDX_H2S2I] + k[7220]*y_cur[IDX_GH2S2I] + + k[7402]*y_cur[IDX_GH2S2I] + k[7584]*y_cur[IDX_GH2S2I]; + ydot[yistart + IDX_HNSiII] = 0.0 + + k[394]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] - + k[1123]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] - + k[1124]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] - + k[2287]*y_cur[IDX_COI]*y_cur[IDX_HNSiII] - + k[2455]*y_cur[IDX_H2I]*y_cur[IDX_HNSiII] - + k[2551]*y_cur[IDX_H2OI]*y_cur[IDX_HNSiII] + + k[2757]*y_cur[IDX_H3II]*y_cur[IDX_SiNI] + + k[3472]*y_cur[IDX_NI]*y_cur[IDX_SiH2II] + + k[3473]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - + k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] - + k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HOCSII] = 0.0 - + k[1128]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] - + k[1129]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] + + k[1971]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] + + k[2096]*y_cur[IDX_CH3II]*y_cur[IDX_SOI] + + k[2145]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - + k[2552]*y_cur[IDX_H2OI]*y_cur[IDX_HOCSII] + + k[2732]*y_cur[IDX_H3II]*y_cur[IDX_OCSI] + + k[2982]*y_cur[IDX_HCOII]*y_cur[IDX_OCSI] - + k[6717]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] - + k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NSII] = 0.0 + + k[187]*y_cur[IDX_CII]*y_cur[IDX_NSI] + + k[404]*y_cur[IDX_HII]*y_cur[IDX_NSI] - + k[1173]*y_cur[IDX_NSII]*y_cur[IDX_eM] + + k[3459]*y_cur[IDX_NI]*y_cur[IDX_H2SII] + + k[3462]*y_cur[IDX_NI]*y_cur[IDX_HSII] + + k[3468]*y_cur[IDX_NI]*y_cur[IDX_SOII] + + k[3506]*y_cur[IDX_NHII]*y_cur[IDX_SI] + + k[3624]*y_cur[IDX_NHI]*y_cur[IDX_SII] - + k[3748]*y_cur[IDX_OI]*y_cur[IDX_NSII] - + k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_OCNII] = 0.0 - + k[1176]*y_cur[IDX_OCNII]*y_cur[IDX_eM] + + k[2270]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + + k[2274]*y_cur[IDX_CNII]*y_cur[IDX_NOI] + + k[2276]*y_cur[IDX_CNII]*y_cur[IDX_O2I] + + k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + + k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] + + k[3486]*y_cur[IDX_NHII]*y_cur[IDX_COI] - + k[3765]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] - + k[3766]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] - + k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PC4HII] = 0.0 - + k[1193]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - + k[1194]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - + k[1195]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - + k[1196]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + + k[2611]*y_cur[IDX_H3II]*y_cur[IDX_C4PI] + + k[2781]*y_cur[IDX_H3OII]*y_cur[IDX_C4PI] + + k[2916]*y_cur[IDX_HCOII]*y_cur[IDX_C4PI] + + k[3815]*y_cur[IDX_PI]*y_cur[IDX_C4H2II] - + k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PH3II] = 0.0 - + k[1209]*y_cur[IDX_PH3II]*y_cur[IDX_eM] - + k[1210]*y_cur[IDX_PH3II]*y_cur[IDX_eM] - + k[1572]*y_cur[IDX_C2H2I]*y_cur[IDX_PH3II] - + k[2131]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH3II] + + k[2735]*y_cur[IDX_H3II]*y_cur[IDX_PH2I] + + k[2984]*y_cur[IDX_HCOII]*y_cur[IDX_PH2I] - + k[3601]*y_cur[IDX_NH3I]*y_cur[IDX_PH3II] - + k[3819]*y_cur[IDX_PH3II]*y_cur[IDX_H2SI] + + k[5560]*y_cur[IDX_H2I]*y_cur[IDX_PHII] - + k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] - + k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiCH4II] = 0.0 - + k[1247]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] - + k[1248]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] - + k[1924]*y_cur[IDX_CI]*y_cur[IDX_SiCH4II] + + k[1929]*y_cur[IDX_CI]*y_cur[IDX_SiH5II] + + k[2237]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] + + k[2752]*y_cur[IDX_H3II]*y_cur[IDX_SiCH3I] + + k[2822]*y_cur[IDX_H3OII]*y_cur[IDX_SiCH3I] + + k[2999]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH3I] + + k[5544]*y_cur[IDX_CH4I]*y_cur[IDX_SiII] - + k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - + k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C10II] = 0.0 + + k[320]*y_cur[IDX_HII]*y_cur[IDX_C10I] + + k[506]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[727]*y_cur[IDX_C10II]*y_cur[IDX_eM] - + k[728]*y_cur[IDX_C10II]*y_cur[IDX_eM] + + k[1338]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] + + k[1340]*y_cur[IDX_CII]*y_cur[IDX_C9HI] + + k[1885]*y_cur[IDX_CI]*y_cur[IDX_C9HII] + + k[1886]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] - + k[2399]*y_cur[IDX_H2I]*y_cur[IDX_C10II] + + k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[5502]*y_cur[IDX_CII]*y_cur[IDX_C9I] + k[5950]*y_cur[IDX_C10I] - + k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] - + k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C10H2II] = 0.0 + + k[321]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] - + k[732]*y_cur[IDX_C10H2II]*y_cur[IDX_eM] + + k[1503]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] + + k[1506]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - + k[1848]*y_cur[IDX_CI]*y_cur[IDX_C10H2II] + + k[1889]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + + k[2400]*y_cur[IDX_H2I]*y_cur[IDX_C10HII] + + k[2585]*y_cur[IDX_H3II]*y_cur[IDX_C10HI] + + k[2901]*y_cur[IDX_HCOII]*y_cur[IDX_C10HI] - + k[3682]*y_cur[IDX_OI]*y_cur[IDX_C10H2II] + k[5958]*y_cur[IDX_C10H2I] + - k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2N2II] = 0.0 - + k[234]*y_cur[IDX_C2H4I]*y_cur[IDX_C2N2II] - + k[782]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] - + k[783]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] - + k[1542]*y_cur[IDX_C2H2I]*y_cur[IDX_C2N2II] + + k[2272]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] - + k[2404]*y_cur[IDX_H2I]*y_cur[IDX_C2N2II] - + k[2527]*y_cur[IDX_H2OI]*y_cur[IDX_C2N2II] - + k[2830]*y_cur[IDX_HI]*y_cur[IDX_C2N2II] - + k[2865]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] - + k[2866]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] + + k[3352]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] + k[6215]*y_cur[IDX_NCCNI] - + k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] - + k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3CNII] = 0.0 + + k[367]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + + k[650]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - + k[944]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] - + k[945]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] - + k[2283]*y_cur[IDX_COI]*y_cur[IDX_CH3CNII] - + k[2431]*y_cur[IDX_H2I]*y_cur[IDX_CH3CNII] + + k[2638]*y_cur[IDX_H3II]*y_cur[IDX_CH2CNI] + + k[3391]*y_cur[IDX_NI]*y_cur[IDX_C2H4II] + + k[3532]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + + k[5809]*y_cur[IDX_CH3CNI] + k[6114]*y_cur[IDX_CH3CNI] - + k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] - + k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC2H2I] = 0.0 + k[6910]*y_cur[IDX_C2H2I] - + k[7092]*y_cur[IDX_GC2H2I] - k[7274]*y_cur[IDX_GC2H2I] - + k[7456]*y_cur[IDX_GC2H2I] - k[7645]*y_cur[IDX_GC2H2I] - + k[7646]*y_cur[IDX_GC2H2I] - k[7647]*y_cur[IDX_GC2H2I] - + k[7648]*y_cur[IDX_GC2H2I] + k[7652]*y_cur[IDX_GC2H3I] + + k[7655]*y_cur[IDX_GC2H3I] + k[7656]*y_cur[IDX_GC2H3I] + + k[7667]*y_cur[IDX_GC2H4I] + k[7668]*y_cur[IDX_GC2H4I] + + k[7669]*y_cur[IDX_GC2H4I] + k[7677]*y_cur[IDX_GC2H5I] + + k[7678]*y_cur[IDX_GC2H5I] + k[7744]*y_cur[IDX_GCH2COI] + + k[7810]*y_cur[IDX_GC2H5CNI] - k[7932]*y_cur[IDX_GC2H2I] - + k[7933]*y_cur[IDX_GC2H2I] - k[7934]*y_cur[IDX_GC2H2I] - + k[7935]*y_cur[IDX_GC2H2I] + k[7939]*y_cur[IDX_GC2H3I] + + k[7942]*y_cur[IDX_GC2H3I] + k[7943]*y_cur[IDX_GC2H3I] + + k[7954]*y_cur[IDX_GC2H4I] + k[7955]*y_cur[IDX_GC2H4I] + + k[7956]*y_cur[IDX_GC2H4I] + k[7964]*y_cur[IDX_GC2H5I] + + k[7965]*y_cur[IDX_GC2H5I] + k[8055]*y_cur[IDX_GCH2COI] + + k[8139]*y_cur[IDX_GC2H5CNI] + k[8190]*y_cur[IDX_GC6H6I] + + k[8286]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] - + k[8287]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] + + k[8375]*y_cur[IDX_GH2I]*y_cur[IDX_GC2HI] + + k[8396]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] + + k[8478]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] + + k[8575]*y_cur[IDX_GC2HI]*y_cur[IDX_GCH4I] - + k[8588]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I]; + ydot[yistart + IDX_GC5I] = 0.0 + k[7024]*y_cur[IDX_C5I] - + k[7206]*y_cur[IDX_GC5I] - k[7388]*y_cur[IDX_GC5I] - + k[7572]*y_cur[IDX_GC5I] - k[7822]*y_cur[IDX_GC5I] - + k[7823]*y_cur[IDX_GC5I] + k[7835]*y_cur[IDX_GC5HI] + + k[7849]*y_cur[IDX_GC6I] - k[8149]*y_cur[IDX_GC5I] + + k[8159]*y_cur[IDX_GC5HI] + k[8178]*y_cur[IDX_GC6I] + + k[8180]*y_cur[IDX_GC6I] + k[8195]*y_cur[IDX_GC7I] + + k[8237]*y_cur[IDX_GC10HI] + k[8237]*y_cur[IDX_GC10HI] + + k[8238]*y_cur[IDX_GC10HI] + k[8244]*y_cur[IDX_GC10HI] + + k[8255]*y_cur[IDX_GC11I] + k[8256]*y_cur[IDX_GC11I] + + k[8260]*y_cur[IDX_GC11I] - k[8350]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - + k[8382]*y_cur[IDX_GH2I]*y_cur[IDX_GC5I] + + k[8420]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - + k[8423]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - + k[8467]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - + k[8495]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I] - + k[8636]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - + k[8674]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - + k[8707]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - + k[8728]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I]; + ydot[yistart + IDX_GC7HI] = 0.0 + k[7051]*y_cur[IDX_C7HI] - + k[7233]*y_cur[IDX_GC7HI] - k[7415]*y_cur[IDX_GC7HI] - + k[7597]*y_cur[IDX_GC7HI] - k[7862]*y_cur[IDX_GC7HI] + + k[7863]*y_cur[IDX_GC7H2I] - k[8197]*y_cur[IDX_GC7HI] - + k[8198]*y_cur[IDX_GC7HI] - k[8199]*y_cur[IDX_GC7HI] + + k[8200]*y_cur[IDX_GC7H2I] + k[8202]*y_cur[IDX_GC7H2I] + + k[8209]*y_cur[IDX_GC8HI] + k[8240]*y_cur[IDX_GC10HI] + + k[8245]*y_cur[IDX_GC10HI] + k[8250]*y_cur[IDX_GC10H2I] + + k[8355]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - + k[8356]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] + + k[8386]*y_cur[IDX_GH2I]*y_cur[IDX_GC7I] - + k[8387]*y_cur[IDX_GH2I]*y_cur[IDX_GC7HI] + + k[8426]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] - + k[8428]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - + k[8470]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI] + + k[8497]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I] - + k[8500]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI] - + k[8642]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] - + k[8679]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - + k[8710]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI] - + k[8733]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI]; + ydot[yistart + IDX_GCH3COI] = 0.0 + k[6966]*y_cur[IDX_CH3COI] - + k[7148]*y_cur[IDX_GCH3COI] - k[7330]*y_cur[IDX_GCH3COI] - + k[7512]*y_cur[IDX_GCH3COI] - k[7883]*y_cur[IDX_GCH3COI] + + k[7892]*y_cur[IDX_GCH3COOHI] - k[8266]*y_cur[IDX_GCH3COI] + + k[8271]*y_cur[IDX_GCH3COOHI] - + k[8331]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] + + k[8332]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - + k[8504]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] + + k[8506]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + + k[8521]*y_cur[IDX_GNHI]*y_cur[IDX_GCH3CHOI] + + k[8535]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH3CHOI] + + k[8539]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] + + k[8547]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - + k[8551]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI] + + k[8562]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] + + k[8572]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - + k[8626]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] - + k[8742]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] - + k[8754]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI]; + ydot[yistart + IDX_GHCOOCH3I] = 0.0 + k[7021]*y_cur[IDX_HCOOCH3I] - + k[7203]*y_cur[IDX_GHCOOCH3I] - k[7385]*y_cur[IDX_GHCOOCH3I] - + k[7569]*y_cur[IDX_GHCOOCH3I] - k[7824]*y_cur[IDX_GHCOOCH3I] - + k[7825]*y_cur[IDX_GHCOOCH3I] - k[7826]*y_cur[IDX_GHCOOCH3I] - + k[8150]*y_cur[IDX_GHCOOCH3I] - + k[8346]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] - + k[8347]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] + + k[8365]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] - + k[8511]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - + k[8512]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - + k[8537]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOCH3I] - + k[8555]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOCH3I] + + k[8559]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] + + k[8561]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] + + k[8563]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - + k[8565]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOCH3I] + + k[8566]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI]; + ydot[yistart + IDX_HC4SII] = 0.0 - + k[1074]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - + k[1075]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - + k[1076]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] + + k[2612]*y_cur[IDX_H3II]*y_cur[IDX_C4SI] + + k[2782]*y_cur[IDX_H3OII]*y_cur[IDX_C4SI] + + k[2917]*y_cur[IDX_HCOII]*y_cur[IDX_C4SI] + + k[3832]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + + k[3836]*y_cur[IDX_SI]*y_cur[IDX_C4H2II] + + k[3837]*y_cur[IDX_SI]*y_cur[IDX_C4H3II] - + k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - + k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - + k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HC5NHII] = 0.0 - + k[1079]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - + k[1080]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - + k[1081]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - + k[1082]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - + k[1083]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + + k[2175]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + + k[2447]*y_cur[IDX_H2I]*y_cur[IDX_HC5NII] + + k[2691]*y_cur[IDX_H3II]*y_cur[IDX_HC5NI] + + k[2966]*y_cur[IDX_HCOII]*y_cur[IDX_HC5NI] + + k[3416]*y_cur[IDX_NI]*y_cur[IDX_C5H3II] - + k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiC2H3II] = 0.0 - + k[1230]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] - + k[1231]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] + + k[1681]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] + + k[1718]*y_cur[IDX_C2H4I]*y_cur[IDX_SiII] - + k[1917]*y_cur[IDX_CI]*y_cur[IDX_SiC2H3II] + + k[1924]*y_cur[IDX_CI]*y_cur[IDX_SiCH4II] + + k[2745]*y_cur[IDX_H3II]*y_cur[IDX_SiC2H2I] + + k[2992]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2H2I] + + k[3865]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + + k[5563]*y_cur[IDX_H2I]*y_cur[IDX_SiC2HII] - + k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - + k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiC3HI] = 0.0 - + k[423]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] + + k[1237]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] - + k[1433]*y_cur[IDX_CII]*y_cur[IDX_SiC3HI] - + k[2359]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] - + k[2748]*y_cur[IDX_H3II]*y_cur[IDX_SiC3HI] - + k[2995]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3HI] - + k[3313]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] - + k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] - + k[5922]*y_cur[IDX_SiC3HI] - k[6265]*y_cur[IDX_SiC3HI] + + k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] - + k[7035]*y_cur[IDX_SiC3HI] + k[7217]*y_cur[IDX_GSiC3HI] + + k[7399]*y_cur[IDX_GSiC3HI] + k[7581]*y_cur[IDX_GSiC3HI]; + ydot[yistart + IDX_SiCH3II] = 0.0 + + k[200]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + + k[427]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] - k[1245]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] - - k[1410]*y_cur[IDX_CII]*y_cur[IDX_HCSiI] - - k[2347]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - - k[2703]*y_cur[IDX_H3II]*y_cur[IDX_HCSiI] - - k[2809]*y_cur[IDX_H3OII]*y_cur[IDX_HCSiI] - - k[2973]*y_cur[IDX_HCOII]*y_cur[IDX_HCSiI] - - k[3257]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] - - k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + - k[4988]*y_cur[IDX_CI]*y_cur[IDX_SiH2I] + - k[5021]*y_cur[IDX_CH2I]*y_cur[IDX_SiI] - - k[5410]*y_cur[IDX_OI]*y_cur[IDX_HCSiI] - k[5863]*y_cur[IDX_HCSiI] - - k[6192]*y_cur[IDX_HCSiI] - k[6193]*y_cur[IDX_HCSiI] + - k[6268]*y_cur[IDX_SiCH2I] + - k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[1246]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] + + k[1444]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - + k[1923]*y_cur[IDX_CI]*y_cur[IDX_SiCH3II] + + k[2236]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] - + k[2570]*y_cur[IDX_H2OI]*y_cur[IDX_SiCH3II] + + k[2751]*y_cur[IDX_H3II]*y_cur[IDX_SiCH2I] + + k[2998]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH2I] - k[6516]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] - - k[6956]*y_cur[IDX_HCSiI] + k[7138]*y_cur[IDX_GHCSiI] + - k[7320]*y_cur[IDX_GHCSiI] + k[7502]*y_cur[IDX_GHCSiI]; - ydot[yistart + IDX_HCSiII] = 0.0 + - k[392]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - - k[1109]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] - - k[1110]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + - k[1439]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + - k[1441]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + - k[1926]*y_cur[IDX_CI]*y_cur[IDX_SiH2II] + - k[2018]*y_cur[IDX_CH2I]*y_cur[IDX_SiII] + - k[2097]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] + - k[2102]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + - k[2360]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] - - k[2452]*y_cur[IDX_H2I]*y_cur[IDX_HCSiII] + - k[2472]*y_cur[IDX_H2I]*y_cur[IDX_SiCII] + - k[2750]*y_cur[IDX_H3II]*y_cur[IDX_SiCI] + - k[2821]*y_cur[IDX_H3OII]*y_cur[IDX_SiCI] + - k[2997]*y_cur[IDX_HCOII]*y_cur[IDX_SiCI] + - k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + - k[3792]*y_cur[IDX_OHII]*y_cur[IDX_SiCI] + k[6192]*y_cur[IDX_HCSiI] - - k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] - - k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HClI] = 0.0 - - k[393]*y_cur[IDX_HII]*y_cur[IDX_HClI] + - k[1003]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] - - k[1411]*y_cur[IDX_CII]*y_cur[IDX_HClI] - - k[2083]*y_cur[IDX_CH3II]*y_cur[IDX_HClI] - - k[2231]*y_cur[IDX_CH5II]*y_cur[IDX_HClI] + - k[2284]*y_cur[IDX_COI]*y_cur[IDX_H2ClII] + - k[2543]*y_cur[IDX_H2OI]*y_cur[IDX_H2ClII] - - k[2704]*y_cur[IDX_H3II]*y_cur[IDX_HClI] - - k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] + - k[3566]*y_cur[IDX_NH3I]*y_cur[IDX_CClII] + - k[5132]*y_cur[IDX_ClI]*y_cur[IDX_H2I] - - k[5211]*y_cur[IDX_HClI]*y_cur[IDX_HI] - k[5864]*y_cur[IDX_HClI] - - k[6194]*y_cur[IDX_HClI] - k[6195]*y_cur[IDX_HClI] + - k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] - - k[6944]*y_cur[IDX_HClI] + k[7126]*y_cur[IDX_GHClI] + - k[7308]*y_cur[IDX_GHClI] + k[7490]*y_cur[IDX_GHClI] + - k[8609]*y_cur[IDX_GHI]*y_cur[IDX_GClI]; - ydot[yistart + IDX_HClII] = 0.0 + - k[393]*y_cur[IDX_HII]*y_cur[IDX_HClI] - - k[1111]*y_cur[IDX_HClII]*y_cur[IDX_eM] + - k[2439]*y_cur[IDX_H2I]*y_cur[IDX_ClII] - - k[2453]*y_cur[IDX_H2I]*y_cur[IDX_HClII] + - k[2679]*y_cur[IDX_H3II]*y_cur[IDX_ClI] + k[6195]*y_cur[IDX_HClI] - - k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM]; + k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiNH2II] = 0.0 - + k[1264]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] - + k[1265]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] - + k[1930]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] - + k[1931]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + + k[2455]*y_cur[IDX_H2I]*y_cur[IDX_HNSiII] + + k[2710]*y_cur[IDX_H3II]*y_cur[IDX_HNSiI] + + k[2811]*y_cur[IDX_H3OII]*y_cur[IDX_HNSiI] + + k[2974]*y_cur[IDX_HCOII]*y_cur[IDX_HNSiI] + + k[3474]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] + + k[3602]*y_cur[IDX_NH3I]*y_cur[IDX_SiII] - + k[6552]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] - + k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C11II] = 0.0 - + k[735]*y_cur[IDX_C11II]*y_cur[IDX_eM] - + k[736]*y_cur[IDX_C11II]*y_cur[IDX_eM] - + k[737]*y_cur[IDX_C11II]*y_cur[IDX_eM] - + k[738]*y_cur[IDX_C11II]*y_cur[IDX_eM] + + k[1297]*y_cur[IDX_CII]*y_cur[IDX_C10H2I] + + k[1298]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + + k[1846]*y_cur[IDX_CI]*y_cur[IDX_C10HII] + + k[1848]*y_cur[IDX_CI]*y_cur[IDX_C10H2II] + + k[5495]*y_cur[IDX_CII]*y_cur[IDX_C10I] + k[5969]*y_cur[IDX_C11I] - + k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - + k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - + k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - + k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3NII] = 0.0 + + k[512]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] - + k[814]*y_cur[IDX_C3NII]*y_cur[IDX_eM] + + k[1453]*y_cur[IDX_C2II]*y_cur[IDX_HCNI] + + k[1467]*y_cur[IDX_C2HII]*y_cur[IDX_CNI] - + k[2409]*y_cur[IDX_H2I]*y_cur[IDX_C3NII] + + k[3018]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + + k[3022]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3394]*y_cur[IDX_NI]*y_cur[IDX_C3HII] - + k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4H4II] = 0.0 - + k[826]*y_cur[IDX_C4H4II]*y_cur[IDX_eM] - + k[1553]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] - + k[1554]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + + k[1773]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1779]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + + k[1808]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + + k[2609]*y_cur[IDX_H3II]*y_cur[IDX_C4H3I] + + k[2779]*y_cur[IDX_H3OII]*y_cur[IDX_C4H3I] - + k[2851]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H4II] + + k[2914]*y_cur[IDX_HCOII]*y_cur[IDX_C4H3I] + + k[5571]*y_cur[IDX_HI]*y_cur[IDX_C4H3II] - + k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2CNII] = 0.0 + + k[163]*y_cur[IDX_CII]*y_cur[IDX_CH2CNI] + + k[361]*y_cur[IDX_HII]*y_cur[IDX_CH2CNI] - + k[916]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] - + k[917]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + + k[1986]*y_cur[IDX_CH2II]*y_cur[IDX_HCNI] + + k[2075]*y_cur[IDX_CH3II]*y_cur[IDX_CNI] + + k[2328]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + + k[3530]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] + + k[3555]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] + + k[3607]*y_cur[IDX_NHI]*y_cur[IDX_C2H2II] - + k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] - + k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3COCH3II] = 0.0 + + k[168]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] + + k[270]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + + k[368]*y_cur[IDX_HII]*y_cur[IDX_CH3COCH3I] + + k[713]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - + k[950]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] - + k[951]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] - + k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - + k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - + k[2493]*y_cur[IDX_H2COI]*y_cur[IDX_CH3COCH3II] + + k[5812]*y_cur[IDX_CH3COCH3I] + k[6116]*y_cur[IDX_CH3COCH3I] - + k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] - + k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CPII] = 0.0 + + k[171]*y_cur[IDX_CII]*y_cur[IDX_CPI] + + k[373]*y_cur[IDX_HII]*y_cur[IDX_CPI] - + k[984]*y_cur[IDX_CPII]*y_cur[IDX_eM] + + k[1341]*y_cur[IDX_CII]*y_cur[IDX_CCPI] + + k[1397]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - + k[2437]*y_cur[IDX_H2I]*y_cur[IDX_CPII] + + k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - + k[3731]*y_cur[IDX_OI]*y_cur[IDX_CPII] - + k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC6I] = 0.0 + k[7041]*y_cur[IDX_C6I] - + k[7223]*y_cur[IDX_GC6I] - k[7405]*y_cur[IDX_GC6I] - + k[7587]*y_cur[IDX_GC6I] - k[7849]*y_cur[IDX_GC6I] + + k[7852]*y_cur[IDX_GC6HI] + k[7861]*y_cur[IDX_GC7I] + + k[7868]*y_cur[IDX_GC7NI] - k[8178]*y_cur[IDX_GC6I] - + k[8179]*y_cur[IDX_GC6I] - k[8180]*y_cur[IDX_GC6I] + + k[8184]*y_cur[IDX_GC6H2I] + k[8193]*y_cur[IDX_GC7I] + + k[8196]*y_cur[IDX_GC7I] + k[8206]*y_cur[IDX_GC8I] + + k[8211]*y_cur[IDX_GC7NI] + k[8229]*y_cur[IDX_GC10I] + + k[8230]*y_cur[IDX_GC10I] + k[8256]*y_cur[IDX_GC11I] + + k[8260]*y_cur[IDX_GC11I] - k[8352]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - + k[8384]*y_cur[IDX_GH2I]*y_cur[IDX_GC6I] + + k[8423]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - + k[8425]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - + k[8497]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I] - + k[8638]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - + k[8676]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - + k[8730]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I]; + ydot[yistart + IDX_GC8I] = 0.0 + k[7055]*y_cur[IDX_C8I] - + k[7237]*y_cur[IDX_GC8I] - k[7419]*y_cur[IDX_GC8I] - + k[7601]*y_cur[IDX_GC8I] - k[7866]*y_cur[IDX_GC8I] + + k[7867]*y_cur[IDX_GC8HI] + k[7871]*y_cur[IDX_GC9I] + + k[7877]*y_cur[IDX_GC9NI] - k[8205]*y_cur[IDX_GC8I] - + k[8206]*y_cur[IDX_GC8I] - k[8207]*y_cur[IDX_GC8I] + + k[8208]*y_cur[IDX_GC8HI] + k[8210]*y_cur[IDX_GC8HI] + + k[8214]*y_cur[IDX_GC8H2I] + k[8219]*y_cur[IDX_GC9I] + + k[8221]*y_cur[IDX_GC9I] + k[8232]*y_cur[IDX_GC10I] + + k[8234]*y_cur[IDX_GC10I] + k[8241]*y_cur[IDX_GC10HI] + + k[8246]*y_cur[IDX_GC9NI] + k[8258]*y_cur[IDX_GC11I] + + k[8262]*y_cur[IDX_GC11I] - k[8357]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - + k[8388]*y_cur[IDX_GH2I]*y_cur[IDX_GC8I] + + k[8427]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - + k[8429]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - + k[8501]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I] - + k[8643]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - + k[8680]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - + k[8734]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I]; + ydot[yistart + IDX_GCH2OHI] = 0.0 + k[6929]*y_cur[IDX_CH2OHI] - + k[7111]*y_cur[IDX_GCH2OHI] - k[7293]*y_cur[IDX_GCH2OHI] - + k[7475]*y_cur[IDX_GCH2OHI] + k[7697]*y_cur[IDX_GCH3OHI] - + k[7882]*y_cur[IDX_GCH2OHI] + k[7889]*y_cur[IDX_GCH2OHCOI] + + k[7890]*y_cur[IDX_GCH2OHCHOI] + k[7998]*y_cur[IDX_GCH3OHI] - + k[8265]*y_cur[IDX_GCH2OHI] + k[8269]*y_cur[IDX_GCH2OHCOI] + + k[8270]*y_cur[IDX_GCH2OHCHOI] + + k[8297]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8300]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] + + k[8518]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] + + k[8520]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - + k[8546]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] + + k[8566]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] - + k[8568]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI] - + k[8569]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI] - + k[8570]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GH2COI] - + k[8571]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - + k[8572]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - + k[8573]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - + k[8574]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH2OHCHOI] - + k[8599]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] - + k[8753]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] - + k[8761]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI] - + k[8762]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI]; + ydot[yistart + IDX_GCH3OHI] = 0.0 + k[6936]*y_cur[IDX_CH3OHI] - + k[7118]*y_cur[IDX_GCH3OHI] - k[7300]*y_cur[IDX_GCH3OHI] - + k[7482]*y_cur[IDX_GCH3OHI] - k[7697]*y_cur[IDX_GCH3OHI] - + k[7698]*y_cur[IDX_GCH3OHI] - k[7699]*y_cur[IDX_GCH3OHI] - + k[7700]*y_cur[IDX_GCH3OHI] - k[7701]*y_cur[IDX_GCH3OHI] - + k[7702]*y_cur[IDX_GCH3OHI] + k[7770]*y_cur[IDX_GCH3OCH3I] + + k[7825]*y_cur[IDX_GHCOOCH3I] - k[7997]*y_cur[IDX_GCH3OHI] - + k[7998]*y_cur[IDX_GCH3OHI] - k[7999]*y_cur[IDX_GCH3OHI] - + k[8000]*y_cur[IDX_GCH3OHI] - k[8001]*y_cur[IDX_GCH3OHI] - + k[8002]*y_cur[IDX_GCH3OHI] + k[8090]*y_cur[IDX_GCH3OCH3I] + + k[8299]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] + + k[8300]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] + + k[8346]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] + + k[8368]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] + + k[8507]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + + k[8513]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] + + k[8560]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] + + k[8562]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] + + k[8564]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOHI] + + k[8565]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOCH3I] + + k[8567]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] + + k[8570]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GH2COI] + + k[8572]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] + + k[8574]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH2OHCHOI]; + ydot[yistart + IDX_H2S2II] = 0.0 + + k[379]*y_cur[IDX_HII]*y_cur[IDX_H2S2I] - + k[1021]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] - + k[1022]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + + k[2112]*y_cur[IDX_C2H6I]*y_cur[IDX_S2II] + + k[2132]*y_cur[IDX_CH3OHI]*y_cur[IDX_S2II] + + k[2715]*y_cur[IDX_H3II]*y_cur[IDX_HS2I] + + k[2813]*y_cur[IDX_H3OII]*y_cur[IDX_HS2I] + + k[2976]*y_cur[IDX_HCOII]*y_cur[IDX_HS2I] + + k[3839]*y_cur[IDX_SI]*y_cur[IDX_H3SII] - + k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] - + k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HC2PII] = 0.0 + + k[382]*y_cur[IDX_HII]*y_cur[IDX_HC2PI] - + k[1059]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] - + k[1060]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + + k[1351]*y_cur[IDX_CII]*y_cur[IDX_CH2PHI] + + k[1526]*y_cur[IDX_C2H2II]*y_cur[IDX_PI] + + k[1569]*y_cur[IDX_C2H2I]*y_cur[IDX_PII] + + k[2633]*y_cur[IDX_H3II]*y_cur[IDX_CCPI] + + k[2784]*y_cur[IDX_H3OII]*y_cur[IDX_CCPI] + + k[2937]*y_cur[IDX_HCOII]*y_cur[IDX_CCPI] - + k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] - + k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HC5NII] = 0.0 + + k[385]*y_cur[IDX_HII]*y_cur[IDX_HC5NI] - + k[1077]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] - + k[1078]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + + k[1473]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + + k[2416]*y_cur[IDX_H2I]*y_cur[IDX_C5NII] - + k[2447]*y_cur[IDX_H2I]*y_cur[IDX_HC5NII] + + k[2616]*y_cur[IDX_H3II]*y_cur[IDX_C5NI] + + k[2870]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + + k[2921]*y_cur[IDX_HCOII]*y_cur[IDX_C5NI] + + k[3415]*y_cur[IDX_NI]*y_cur[IDX_C5H2II] - + k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] - + k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM]; ydot[yistart + IDX_HFI] = 0.0 + k[1005]*y_cur[IDX_H2FII]*y_cur[IDX_eM] - k[1412]*y_cur[IDX_CII]*y_cur[IDX_HFI] - @@ -22861,3267 +2753,12515 @@ __global__ void FexKernel(realtype *y, realtype *ydot, NaunetData *d_udata, - k[6904]*y_cur[IDX_HFI] + k[7086]*y_cur[IDX_GHFI] + k[7268]*y_cur[IDX_GHFI] + k[7450]*y_cur[IDX_GHFI] + k[8585]*y_cur[IDX_GHI]*y_cur[IDX_GFI]; - ydot[yistart + IDX_HFII] = 0.0 - - k[1112]*y_cur[IDX_HFII]*y_cur[IDX_eM] + - k[2440]*y_cur[IDX_H2I]*y_cur[IDX_FII] - - k[2454]*y_cur[IDX_H2I]*y_cur[IDX_HFII] - - k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HN2OII] = 0.0 - - k[1113]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] - - k[1114]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] + - k[2234]*y_cur[IDX_CH5II]*y_cur[IDX_N2OI] + - k[2559]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] + - k[2581]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] + - k[2719]*y_cur[IDX_H3II]*y_cur[IDX_N2OI] + - k[2978]*y_cur[IDX_HCOII]*y_cur[IDX_N2OI] - - k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] - - k[6559]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HNCI] = 0.0 - - k[133]*y_cur[IDX_HII]*y_cur[IDX_HNCI] + - k[769]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + - k[914]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + - k[947]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] + + ydot[yistart + IDX_HONCI] = 0.0 - + k[522]*y_cur[IDX_HeII]*y_cur[IDX_HONCI] + + k[1096]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] - + k[2352]*y_cur[IDX_HII]*y_cur[IDX_HONCI] - + k[2713]*y_cur[IDX_H3II]*y_cur[IDX_HONCI] - + k[5217]*y_cur[IDX_HONCI]*y_cur[IDX_CI] - + k[5218]*y_cur[IDX_HONCI]*y_cur[IDX_OI] - k[5872]*y_cur[IDX_HONCI] - + k[6203]*y_cur[IDX_HONCI] + + k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - + k[6973]*y_cur[IDX_HONCI] + k[7155]*y_cur[IDX_GHONCI] + + k[7337]*y_cur[IDX_GHONCI] + k[7519]*y_cur[IDX_GHONCI] + + k[8622]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; + ydot[yistart + IDX_HSiSII] = 0.0 - + k[1147]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] - + k[1148]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] - + k[2556]*y_cur[IDX_H2OI]*y_cur[IDX_HSiSII] - + k[2580]*y_cur[IDX_H2SI]*y_cur[IDX_HSiSII] + + k[2761]*y_cur[IDX_H3II]*y_cur[IDX_SiSI] - + k[2880]*y_cur[IDX_HCNI]*y_cur[IDX_HSiSII] + + k[3006]*y_cur[IDX_HCOII]*y_cur[IDX_SiSI] - + k[3591]*y_cur[IDX_NH3I]*y_cur[IDX_HSiSII] + + k[3883]*y_cur[IDX_SiH2II]*y_cur[IDX_SI] - + k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] - + k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PCH2II] = 0.0 - + k[1197]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] - + k[1198]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + + k[1712]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] + + k[1714]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] + + k[2094]*y_cur[IDX_CH3II]*y_cur[IDX_PI] + + k[2211]*y_cur[IDX_CH4I]*y_cur[IDX_PII] + + k[2451]*y_cur[IDX_H2I]*y_cur[IDX_HCPII] + + k[2701]*y_cur[IDX_H3II]*y_cur[IDX_HCPI] + + k[2808]*y_cur[IDX_H3OII]*y_cur[IDX_HCPI] + + k[2972]*y_cur[IDX_HCOII]*y_cur[IDX_HCPI] - + k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] - + k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SO2II] = 0.0 + + k[315]*y_cur[IDX_CO2II]*y_cur[IDX_SO2I] + + k[416]*y_cur[IDX_HII]*y_cur[IDX_SO2I] + + k[527]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + + k[665]*y_cur[IDX_OII]*y_cur[IDX_SO2I] - + k[680]*y_cur[IDX_O2I]*y_cur[IDX_SO2II] - + k[1221]*y_cur[IDX_SO2II]*y_cur[IDX_eM] - + k[1222]*y_cur[IDX_SO2II]*y_cur[IDX_eM] - + k[2290]*y_cur[IDX_COI]*y_cur[IDX_SO2II] - + k[2471]*y_cur[IDX_H2I]*y_cur[IDX_SO2II] - + k[2847]*y_cur[IDX_HI]*y_cur[IDX_SO2II] - + k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] - + k[6751]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiNII] = 0.0 + + k[203]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + + k[432]*y_cur[IDX_HII]*y_cur[IDX_SiNI] - + k[1260]*y_cur[IDX_SiNII]*y_cur[IDX_eM] + + k[2350]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] + + k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] + + k[3471]*y_cur[IDX_NI]*y_cur[IDX_SiHII] + + k[3625]*y_cur[IDX_NHI]*y_cur[IDX_SiII] - + k[3761]*y_cur[IDX_OI]*y_cur[IDX_SiNII] + + k[3762]*y_cur[IDX_OI]*y_cur[IDX_SiNCII] - + k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C9II] = 0.0 + + k[355]*y_cur[IDX_HII]*y_cur[IDX_C9I] - + k[889]*y_cur[IDX_C9II]*y_cur[IDX_eM] - + k[890]*y_cur[IDX_C9II]*y_cur[IDX_eM] + + k[1335]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] + + k[1337]*y_cur[IDX_CII]*y_cur[IDX_C8HI] + + k[1881]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + + k[2313]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - + k[2424]*y_cur[IDX_H2I]*y_cur[IDX_C9II] + + k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + + k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + + k[5501]*y_cur[IDX_CII]*y_cur[IDX_C8I] + k[6061]*y_cur[IDX_C9I] - + k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] - + k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2OHCOI] = 0.0 + + k[1279]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] - + k[5655]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCOI] - + k[5656]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCOI] - + k[5657]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCOI] - + k[5658]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCOI] - + k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] - + k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] - + k[5944]*y_cur[IDX_CH2OHCOI] - k[6294]*y_cur[IDX_CH2OHCOI] + + k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[7020]*y_cur[IDX_CH2OHCOI] + k[7202]*y_cur[IDX_GCH2OHCOI] + + k[7384]*y_cur[IDX_GCH2OHCOI] + k[7559]*y_cur[IDX_GCH2OHCOI] + + k[8761]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_CH3C5NI] = 0.0 + + k[931]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] - + k[1359]*y_cur[IDX_CII]*y_cur[IDX_CH3C5NI] - + k[2322]*y_cur[IDX_HII]*y_cur[IDX_CH3C5NI] - + k[2644]*y_cur[IDX_H3II]*y_cur[IDX_CH3C5NI] - + k[2945]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C5NI] - + k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] - + k[5798]*y_cur[IDX_CH3C5NI] - k[6102]*y_cur[IDX_CH3C5NI] + + k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - + k[7054]*y_cur[IDX_CH3C5NI] + k[7236]*y_cur[IDX_GCH3C5NI] + + k[7418]*y_cur[IDX_GCH3C5NI] + k[7600]*y_cur[IDX_GCH3C5NI] + + k[8757]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI]; + ydot[yistart + IDX_CH3C7NI] = 0.0 + + k[933]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] - + k[1362]*y_cur[IDX_CII]*y_cur[IDX_CH3C7NI] - + k[2324]*y_cur[IDX_HII]*y_cur[IDX_CH3C7NI] - + k[2646]*y_cur[IDX_H3II]*y_cur[IDX_CH3C7NI] - + k[2947]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C7NI] - + k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] - + k[5800]*y_cur[IDX_CH3C7NI] - k[6104]*y_cur[IDX_CH3C7NI] + + k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - + k[7063]*y_cur[IDX_CH3C7NI] + k[7245]*y_cur[IDX_GCH3C7NI] + + k[7427]*y_cur[IDX_GCH3C7NI] + k[7609]*y_cur[IDX_GCH3C7NI] + + k[8758]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI]; + ydot[yistart + IDX_GC3HI] = 0.0 + k[6945]*y_cur[IDX_C3HI] - + k[7127]*y_cur[IDX_GC3HI] - k[7309]*y_cur[IDX_GC3HI] - + k[7491]*y_cur[IDX_GC3HI] - k[7714]*y_cur[IDX_GC3HI] + + k[7715]*y_cur[IDX_GC3H2I] + k[7716]*y_cur[IDX_GH2CCCI] + + k[7720]*y_cur[IDX_GCH2CCHI] + k[7834]*y_cur[IDX_GC5HI] + + k[7837]*y_cur[IDX_GC5H2I] + k[7850]*y_cur[IDX_GC6HI] - + k[8020]*y_cur[IDX_GC3HI] + k[8021]*y_cur[IDX_GC3H2I] + + k[8023]*y_cur[IDX_GH2CCCI] + k[8027]*y_cur[IDX_GCH2CCHI] + + k[8158]*y_cur[IDX_GC5HI] + k[8162]*y_cur[IDX_GC5H2I] + + k[8181]*y_cur[IDX_GC6HI] + k[8315]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - + k[8316]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] + + k[8377]*y_cur[IDX_GH2I]*y_cur[IDX_GC3I] - + k[8378]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] - + k[8379]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] + + k[8411]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - + k[8417]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - + k[8466]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI] + + k[8486]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I] - + k[8492]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI] - + k[8611]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] - + k[8668]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - + k[8706]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI] - + k[8725]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI]; + ydot[yistart + IDX_GC4HI] = 0.0 + k[6996]*y_cur[IDX_C4HI] - + k[7178]*y_cur[IDX_GC4HI] - k[7360]*y_cur[IDX_GC4HI] - + k[7542]*y_cur[IDX_GC4HI] - k[7788]*y_cur[IDX_GC4HI] - + k[7789]*y_cur[IDX_GC4HI] + k[7792]*y_cur[IDX_GC4H2I] + + k[7794]*y_cur[IDX_GC4H2I] + k[7795]*y_cur[IDX_GC4H3I] + + k[7841]*y_cur[IDX_GCH3C4HI] + k[7853]*y_cur[IDX_GC6H2I] + + k[7855]*y_cur[IDX_GHC5NI] - k[8112]*y_cur[IDX_GC4HI] - + k[8113]*y_cur[IDX_GC4HI] + k[8116]*y_cur[IDX_GC4H2I] + + k[8118]*y_cur[IDX_GC4H2I] + k[8119]*y_cur[IDX_GC4H3I] + + k[8167]*y_cur[IDX_GCH3C4HI] + k[8187]*y_cur[IDX_GHC5NI] + + k[8339]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - + k[8340]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] + + k[8380]*y_cur[IDX_GH2I]*y_cur[IDX_GC4I] - + k[8381]*y_cur[IDX_GH2I]*y_cur[IDX_GC4HI] + + k[8417]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - + k[8421]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] + + k[8491]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I] - + k[8494]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI] - + k[8630]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] - + k[8672]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] - + k[8727]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI]; + ydot[yistart + IDX_GC5HI] = 0.0 + k[7028]*y_cur[IDX_C5HI] - + k[7210]*y_cur[IDX_GC5HI] - k[7392]*y_cur[IDX_GC5HI] - + k[7574]*y_cur[IDX_GC5HI] - k[7833]*y_cur[IDX_GC5HI] - + k[7834]*y_cur[IDX_GC5HI] - k[7835]*y_cur[IDX_GC5HI] + + k[7838]*y_cur[IDX_GC5H2I] - k[8157]*y_cur[IDX_GC5HI] - + k[8158]*y_cur[IDX_GC5HI] - k[8159]*y_cur[IDX_GC5HI] + + k[8163]*y_cur[IDX_GC5H2I] + k[8238]*y_cur[IDX_GC10HI] + + k[8244]*y_cur[IDX_GC10HI] + k[8350]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - + k[8351]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] + + k[8382]*y_cur[IDX_GH2I]*y_cur[IDX_GC5I] - + k[8383]*y_cur[IDX_GH2I]*y_cur[IDX_GC5HI] + + k[8421]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] - + k[8424]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - + k[8468]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI] + + k[8493]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I] - + k[8496]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI] - + k[8637]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] - + k[8675]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - + k[8708]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI] - + k[8729]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI]; + ydot[yistart + IDX_GC6HI] = 0.0 + k[7042]*y_cur[IDX_C6HI] - + k[7224]*y_cur[IDX_GC6HI] - k[7406]*y_cur[IDX_GC6HI] - + k[7588]*y_cur[IDX_GC6HI] - k[7850]*y_cur[IDX_GC6HI] - + k[7851]*y_cur[IDX_GC6HI] - k[7852]*y_cur[IDX_GC6HI] + + k[7864]*y_cur[IDX_GCH3C6HI] + k[7870]*y_cur[IDX_GHC7NI] - + k[8181]*y_cur[IDX_GC6HI] - k[8182]*y_cur[IDX_GC6HI] + + k[8183]*y_cur[IDX_GC6H2I] + k[8185]*y_cur[IDX_GC6H2I] + + k[8198]*y_cur[IDX_GC7HI] + k[8203]*y_cur[IDX_GCH3C6HI] + + k[8216]*y_cur[IDX_GHC7NI] + k[8217]*y_cur[IDX_GHC7NI] + + k[8352]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - + k[8353]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] + + k[8384]*y_cur[IDX_GH2I]*y_cur[IDX_GC6I] - + k[8385]*y_cur[IDX_GH2I]*y_cur[IDX_GC6HI] + + k[8424]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - + k[8426]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] + + k[8495]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I] - + k[8498]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI] - + k[8639]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] - + k[8677]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] - + k[8731]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI]; + ydot[yistart + IDX_H2NCII] = 0.0 - + k[1006]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] - k[1007]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] + - k[1083]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + - k[1091]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + - k[1156]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] - - k[1413]*y_cur[IDX_CII]*y_cur[IDX_HNCI] - - k[1478]*y_cur[IDX_C2HII]*y_cur[IDX_HNCI] - - k[1525]*y_cur[IDX_C2H2II]*y_cur[IDX_HNCI] - - k[1960]*y_cur[IDX_CHII]*y_cur[IDX_HNCI] + - k[2007]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] - - k[2232]*y_cur[IDX_CH5II]*y_cur[IDX_HNCI] + - k[2252]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] - - k[2515]*y_cur[IDX_H2OII]*y_cur[IDX_HNCI] - - k[2706]*y_cur[IDX_H3II]*y_cur[IDX_HNCI] - - k[2810]*y_cur[IDX_H3OII]*y_cur[IDX_HNCI] - - k[2859]*y_cur[IDX_HCNII]*y_cur[IDX_HNCI] + - k[2887]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] + - k[2889]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] + - k[2891]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] + - k[2893]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] + - k[2895]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] + - k[3016]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + - k[3020]*y_cur[IDX_HNC3I]*y_cur[IDX_CH3II] + - k[3026]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3036]*y_cur[IDX_HNCI]*y_cur[IDX_C2H3II] - - k[3037]*y_cur[IDX_HNCI]*y_cur[IDX_C2H5II] - - k[3038]*y_cur[IDX_HNCI]*y_cur[IDX_H2COII] - - k[3039]*y_cur[IDX_HNCI]*y_cur[IDX_H3COII] - - k[3040]*y_cur[IDX_HNCI]*y_cur[IDX_H3SII] - - k[3041]*y_cur[IDX_HNCI]*y_cur[IDX_HCOII] - - k[3042]*y_cur[IDX_HNCI]*y_cur[IDX_HNOII] - - k[3043]*y_cur[IDX_HNCI]*y_cur[IDX_HSII] - - k[3044]*y_cur[IDX_HNCI]*y_cur[IDX_N2HII] - - k[3045]*y_cur[IDX_HNCI]*y_cur[IDX_O2HII] - + k[1418]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + + k[1911]*y_cur[IDX_CI]*y_cur[IDX_NH4II] + + k[1963]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - + k[2502]*y_cur[IDX_H2NCII]*y_cur[IDX_SiI] + + k[2535]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] + + k[3454]*y_cur[IDX_NI]*y_cur[IDX_CH3II] + + k[3509]*y_cur[IDX_NH2II]*y_cur[IDX_CNI] + + k[3563]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - + k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] - + k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2SiOI] = 0.0 - + k[176]*y_cur[IDX_CII]*y_cur[IDX_H2SiOI] - + k[381]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] + + k[1051]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] - + k[2341]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] - + k[2687]*y_cur[IDX_H3II]*y_cur[IDX_H2SiOI] - + k[2802]*y_cur[IDX_H3OII]*y_cur[IDX_H2SiOI] - + k[2962]*y_cur[IDX_HCOII]*y_cur[IDX_H2SiOI] - + k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] + + k[5447]*y_cur[IDX_OI]*y_cur[IDX_SiH3I] - k[5843]*y_cur[IDX_H2SiOI] - + k[6166]*y_cur[IDX_H2SiOI] - k[6167]*y_cur[IDX_H2SiOI] + + k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] - + k[6988]*y_cur[IDX_H2SiOI] + k[7170]*y_cur[IDX_GH2SiOI] + + k[7352]*y_cur[IDX_GH2SiOI] + k[7534]*y_cur[IDX_GH2SiOI]; + ydot[yistart + IDX_H3CSII] = 0.0 - + k[1039]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] - + k[1040]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + + k[1675]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + + k[1983]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + + k[2078]*y_cur[IDX_CH3II]*y_cur[IDX_H2SI] + + k[2092]*y_cur[IDX_CH3II]*y_cur[IDX_OCSI] + + k[2203]*y_cur[IDX_CH4I]*y_cur[IDX_HSII] + + k[2215]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + + k[2683]*y_cur[IDX_H3II]*y_cur[IDX_H2CSI] + + k[2959]*y_cur[IDX_HCOII]*y_cur[IDX_H2CSI] + + k[3850]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - + k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] - + k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HC2OII] = 0.0 - + k[1055]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] - + k[1056]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] - + k[1057]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] - + k[1058]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + + k[1468]*y_cur[IDX_C2HII]*y_cur[IDX_CO2I] + + k[2520]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] + + k[2599]*y_cur[IDX_H3II]*y_cur[IDX_C2OI] + + k[2769]*y_cur[IDX_H3OII]*y_cur[IDX_C2OI] + + k[2904]*y_cur[IDX_HCOII]*y_cur[IDX_C2OI] + + k[3670]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + + k[3688]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + + k[3690]*y_cur[IDX_OI]*y_cur[IDX_C2H3II] - + k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - + k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - + k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - + k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HCPII] = 0.0 + + k[180]*y_cur[IDX_CII]*y_cur[IDX_HCPI] + + k[391]*y_cur[IDX_HII]*y_cur[IDX_HCPI] - + k[1105]*y_cur[IDX_HCPII]*y_cur[IDX_eM] - + k[1106]*y_cur[IDX_HCPII]*y_cur[IDX_eM] - + k[1906]*y_cur[IDX_CI]*y_cur[IDX_HCPII] + + k[2437]*y_cur[IDX_H2I]*y_cur[IDX_CPII] - + k[2451]*y_cur[IDX_H2I]*y_cur[IDX_HCPII] + + k[2677]*y_cur[IDX_H3II]*y_cur[IDX_CPI] + + k[2796]*y_cur[IDX_H3OII]*y_cur[IDX_CPI] + + k[2955]*y_cur[IDX_HCOII]*y_cur[IDX_CPI] - + k[3737]*y_cur[IDX_OI]*y_cur[IDX_HCPII] - + k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] - + k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiC4I] = 0.0 - + k[424]*y_cur[IDX_HII]*y_cur[IDX_SiC4I] + + k[1241]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] - + k[2749]*y_cur[IDX_H3II]*y_cur[IDX_SiC4I] - + k[2996]*y_cur[IDX_HCOII]*y_cur[IDX_SiC4I] - + k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] - + k[5442]*y_cur[IDX_OI]*y_cur[IDX_SiC4I] - k[5923]*y_cur[IDX_SiC4I] - + k[6266]*y_cur[IDX_SiC4I] + + k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - + k[7046]*y_cur[IDX_SiC4I] + k[7228]*y_cur[IDX_GSiC4I] + + k[7410]*y_cur[IDX_GSiC4I] + k[7592]*y_cur[IDX_GSiC4I]; + ydot[yistart + IDX_SiNCI] = 0.0 - + k[433]*y_cur[IDX_HII]*y_cur[IDX_SiNCI] + + k[1263]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] - + k[2758]*y_cur[IDX_H3II]*y_cur[IDX_SiNCI] - + k[2825]*y_cur[IDX_H3OII]*y_cur[IDX_SiNCI] - + k[3003]*y_cur[IDX_HCOII]*y_cur[IDX_SiNCI] - + k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] - + k[5452]*y_cur[IDX_OI]*y_cur[IDX_SiNCI] - k[5932]*y_cur[IDX_SiNCI] - + k[6282]*y_cur[IDX_SiNCI] - k[6283]*y_cur[IDX_SiNCI] + + k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - + k[7012]*y_cur[IDX_SiNCI] + k[7194]*y_cur[IDX_GSiNCI] + + k[7376]*y_cur[IDX_GSiNCI] + k[7560]*y_cur[IDX_GSiNCI]; + ydot[yistart + IDX_SiNCII] = 0.0 + + k[433]*y_cur[IDX_HII]*y_cur[IDX_SiNCI] - + k[1261]*y_cur[IDX_SiNCII]*y_cur[IDX_eM] + + k[1414]*y_cur[IDX_CII]*y_cur[IDX_HNSiI] + + k[1930]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + + k[2502]*y_cur[IDX_H2NCII]*y_cur[IDX_SiI] + + k[2885]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] + + k[2896]*y_cur[IDX_HCNHII]*y_cur[IDX_SiI] + k[3046]*y_cur[IDX_HNCI]*y_cur[IDX_SiII] - - k[3261]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - - k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - - k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - - k[3495]*y_cur[IDX_NHII]*y_cur[IDX_HNCI] - - k[3521]*y_cur[IDX_NH2II]*y_cur[IDX_HNCI] + - k[3541]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + - k[3583]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + - k[3630]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] - - k[3784]*y_cur[IDX_OHII]*y_cur[IDX_HNCI] + - k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + - k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + - k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + - k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + - k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + - k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + - k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + - k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + - k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + - k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + - k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + - k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + - k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + - k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + - k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + - k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + - k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + - k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + - k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + - k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + - k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + - k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + - k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + - k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + - k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + - k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + - k[4814]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] + - k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - - k[4902]*y_cur[IDX_C2HI]*y_cur[IDX_HNCI] - - k[4907]*y_cur[IDX_C4HI]*y_cur[IDX_HNCI] + - k[4970]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - - k[5118]*y_cur[IDX_CNI]*y_cur[IDX_HNCI] - - k[5174]*y_cur[IDX_HI]*y_cur[IDX_HNCI] + - k[5212]*y_cur[IDX_HNC3I]*y_cur[IDX_CI] + - k[5214]*y_cur[IDX_HNCOI]*y_cur[IDX_CI] + - k[5254]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - k[5867]*y_cur[IDX_HNCI] + - k[6093]*y_cur[IDX_CH2NHI] - k[6198]*y_cur[IDX_HNCI] + - k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + - k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + - k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + - k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + - k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + - k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + - k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - - k[6913]*y_cur[IDX_HNCI] + k[7095]*y_cur[IDX_GHNCI] + - k[7277]*y_cur[IDX_GHNCI] + k[7459]*y_cur[IDX_GHNCI] + - k[8659]*y_cur[IDX_GCI]*y_cur[IDX_GNHI]; - ydot[yistart + IDX_HNC3I] = 0.0 + - k[1069]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] - - k[1115]*y_cur[IDX_HNC3I]*y_cur[IDX_eM] - - k[3016]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - - k[3017]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - - k[3018]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - + k[3762]*y_cur[IDX_OI]*y_cur[IDX_SiNCII] + + k[3870]*y_cur[IDX_SiII]*y_cur[IDX_NCCNI] - + k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CNOI] = 0.0 + + k[1093]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + + k[1130]*y_cur[IDX_HONCII]*y_cur[IDX_eM] - + k[1386]*y_cur[IDX_CII]*y_cur[IDX_CNOI] - + k[2672]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - + k[2673]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - + k[3205]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] - + k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] - + k[5161]*y_cur[IDX_HI]*y_cur[IDX_CNOI] + + k[5218]*y_cur[IDX_HONCI]*y_cur[IDX_OI] - + k[5389]*y_cur[IDX_OI]*y_cur[IDX_CNOI] - k[5824]*y_cur[IDX_CNOI] - + k[6135]*y_cur[IDX_CNOI] + + k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + + k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] - + k[6960]*y_cur[IDX_CNOI] + k[7142]*y_cur[IDX_GCNOI] + + k[7324]*y_cur[IDX_GCNOI] + k[7506]*y_cur[IDX_GCNOI] + + k[8658]*y_cur[IDX_GCI]*y_cur[IDX_GNOI]; + ydot[yistart + IDX_GC2H3I] = 0.0 + k[6912]*y_cur[IDX_C2H3I] - + k[7094]*y_cur[IDX_GC2H3I] - k[7276]*y_cur[IDX_GC2H3I] - + k[7458]*y_cur[IDX_GC2H3I] - k[7652]*y_cur[IDX_GC2H3I] - + k[7653]*y_cur[IDX_GC2H3I] - k[7654]*y_cur[IDX_GC2H3I] - + k[7655]*y_cur[IDX_GC2H3I] - k[7656]*y_cur[IDX_GC2H3I] - + k[7657]*y_cur[IDX_GC2H3I] - k[7658]*y_cur[IDX_GC2H3I] - + k[7659]*y_cur[IDX_GC2H3I] - k[7660]*y_cur[IDX_GC2H3I] - + k[7661]*y_cur[IDX_GC2H3I] - k[7662]*y_cur[IDX_GC2H3I] - + k[7663]*y_cur[IDX_GC2H3I] - k[7664]*y_cur[IDX_GC2H3I] + + k[7670]*y_cur[IDX_GC2H4I] + k[7676]*y_cur[IDX_GC2H5I] + + k[7679]*y_cur[IDX_GC2H5I] + k[7722]*y_cur[IDX_GCH2CCH2I] + + k[7730]*y_cur[IDX_GCH3CCHI] + k[7804]*y_cur[IDX_GCH2CHCNI] + + k[7811]*y_cur[IDX_GC2H5CNI] - k[7939]*y_cur[IDX_GC2H3I] - + k[7940]*y_cur[IDX_GC2H3I] - k[7941]*y_cur[IDX_GC2H3I] - + k[7942]*y_cur[IDX_GC2H3I] - k[7943]*y_cur[IDX_GC2H3I] - + k[7944]*y_cur[IDX_GC2H3I] - k[7945]*y_cur[IDX_GC2H3I] - + k[7946]*y_cur[IDX_GC2H3I] - k[7947]*y_cur[IDX_GC2H3I] - + k[7948]*y_cur[IDX_GC2H3I] - k[7949]*y_cur[IDX_GC2H3I] - + k[7950]*y_cur[IDX_GC2H3I] - k[7951]*y_cur[IDX_GC2H3I] + + k[7957]*y_cur[IDX_GC2H4I] + k[7963]*y_cur[IDX_GC2H5I] + + k[7966]*y_cur[IDX_GC2H5I] + k[8030]*y_cur[IDX_GCH2CCH2I] + + k[8039]*y_cur[IDX_GCH3CCHI] + k[8131]*y_cur[IDX_GCH2CHCNI] + + k[8140]*y_cur[IDX_GC2H5CNI] + + k[8287]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] - + k[8288]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] + + k[8405]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - + k[8413]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] + + k[8482]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - + k[8489]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - + k[8490]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - + k[8589]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] - + k[8665]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] - + k[8722]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - + k[8723]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; + ydot[yistart + IDX_GCH3OI] = 0.0 + k[6931]*y_cur[IDX_CH3OI] - + k[7113]*y_cur[IDX_GCH3OI] - k[7295]*y_cur[IDX_GCH3OI] - + k[7477]*y_cur[IDX_GCH3OI] + k[7698]*y_cur[IDX_GCH3OHI] - + k[7881]*y_cur[IDX_GCH3OI] + k[7888]*y_cur[IDX_GCOOCH3I] + + k[7999]*y_cur[IDX_GCH3OHI] - k[8264]*y_cur[IDX_GCH3OI] + + k[8268]*y_cur[IDX_GCOOCH3I] + + k[8296]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8299]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] + + k[8441]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] + + k[8511]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - + k[8545]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI] - + k[8558]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI] - + k[8559]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] - + k[8560]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - + k[8561]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - + k[8562]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - + k[8563]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - + k[8564]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOHI] - + k[8565]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOOCH3I] - + k[8566]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] - + k[8567]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH2OHCHOI] - + k[8598]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] - + k[8752]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI] - + k[8759]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] - + k[8760]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_GH2OI] = 0.0 + k[6902]*y_cur[IDX_H2OI] - + k[7084]*y_cur[IDX_GH2OI] - k[7266]*y_cur[IDX_GH2OI] - + k[7448]*y_cur[IDX_GH2OI] - k[7639]*y_cur[IDX_GH2OI] + + k[7700]*y_cur[IDX_GCH3OHI] + k[7743]*y_cur[IDX_GCH2COI] - + k[7921]*y_cur[IDX_GH2OI] - k[7922]*y_cur[IDX_GH2OI] - + k[7923]*y_cur[IDX_GH2OI] - k[7924]*y_cur[IDX_GH2OI] - + k[7925]*y_cur[IDX_GH2OI] + k[8000]*y_cur[IDX_GCH3OHI] + + k[8054]*y_cur[IDX_GCH2COI] + k[8283]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] + + k[8310]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] + + k[8338]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + + k[8373]*y_cur[IDX_GH2I]*y_cur[IDX_GOHI] + + k[8506]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + + k[8508]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] + + k[8510]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOHI] + + k[8512]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] + + k[8519]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] + + k[8530]*y_cur[IDX_GNH2I]*y_cur[IDX_GNOI]; + ydot[yistart + IDX_HC3SII] = 0.0 - + k[1071]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] - + k[1072]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + + k[1758]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + + k[2577]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + + k[2607]*y_cur[IDX_H3II]*y_cur[IDX_C3SI] + + k[2777]*y_cur[IDX_H3OII]*y_cur[IDX_C3SI] + + k[2912]*y_cur[IDX_HCOII]*y_cur[IDX_C3SI] + + k[3820]*y_cur[IDX_SII]*y_cur[IDX_C3H2I] + + k[3827]*y_cur[IDX_SII]*y_cur[IDX_H2CCCI] + + k[3834]*y_cur[IDX_SI]*y_cur[IDX_C3H2II] + + k[3835]*y_cur[IDX_SI]*y_cur[IDX_C3H3II] + + k[3838]*y_cur[IDX_SI]*y_cur[IDX_CH2CCHII] - + k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] - + k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HCOOH2II] = 0.0 - + k[1103]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] - + k[1104]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] - + k[2113]*y_cur[IDX_CH3CHOI]*y_cur[IDX_HCOOH2II] - + k[2117]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCOOH2II] + + k[2120]*y_cur[IDX_CH3OH2II]*y_cur[IDX_HCOOHI] - + k[2127]*y_cur[IDX_CH3OHI]*y_cur[IDX_HCOOH2II] + + k[2208]*y_cur[IDX_CH4I]*y_cur[IDX_O2II] - + k[2549]*y_cur[IDX_H2OI]*y_cur[IDX_HCOOH2II] + + k[2765]*y_cur[IDX_H3COII]*y_cur[IDX_HCOOHI] + + k[2971]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOHI] - + k[3586]*y_cur[IDX_NH3I]*y_cur[IDX_HCOOH2II] + + k[5566]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] - + k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] - + k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HNSiI] = 0.0 - + k[394]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] + + k[1264]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] - + k[1414]*y_cur[IDX_CII]*y_cur[IDX_HNSiI] - + k[2350]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] - + k[2710]*y_cur[IDX_H3II]*y_cur[IDX_HNSiI] - + k[2811]*y_cur[IDX_H3OII]*y_cur[IDX_HNSiI] - + k[2974]*y_cur[IDX_HCOII]*y_cur[IDX_HNSiI] - + k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] + + k[5294]*y_cur[IDX_NI]*y_cur[IDX_SiH2I] + + k[5295]*y_cur[IDX_NI]*y_cur[IDX_SiH3I] - k[5870]*y_cur[IDX_HNSiI] - + k[6201]*y_cur[IDX_HNSiI] + + k[6552]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] - + k[6967]*y_cur[IDX_HNSiI] + k[7149]*y_cur[IDX_GHNSiI] + + k[7331]*y_cur[IDX_GHNSiI] + k[7513]*y_cur[IDX_GHNSiI]; + ydot[yistart + IDX_HPOII] = 0.0 + + k[181]*y_cur[IDX_CII]*y_cur[IDX_HPOI] + + k[395]*y_cur[IDX_HII]*y_cur[IDX_HPOI] - + k[1135]*y_cur[IDX_HPOII]*y_cur[IDX_eM] - + k[1136]*y_cur[IDX_HPOII]*y_cur[IDX_eM] - + k[1137]*y_cur[IDX_HPOII]*y_cur[IDX_eM] - + k[2553]*y_cur[IDX_H2OI]*y_cur[IDX_HPOII] + + k[2562]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + + k[2565]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + + k[2738]*y_cur[IDX_H3II]*y_cur[IDX_POI] + + k[2815]*y_cur[IDX_H3OII]*y_cur[IDX_PI] + + k[2987]*y_cur[IDX_HCOII]*y_cur[IDX_POI] - + k[3741]*y_cur[IDX_OI]*y_cur[IDX_HPOII] + + k[3810]*y_cur[IDX_PII]*y_cur[IDX_CH3OHI] - + k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - + k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - + k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HS2II] = 0.0 + + k[396]*y_cur[IDX_HII]*y_cur[IDX_HS2I] - + k[1139]*y_cur[IDX_HS2II]*y_cur[IDX_eM] - + k[1140]*y_cur[IDX_HS2II]*y_cur[IDX_eM] - + k[2579]*y_cur[IDX_H2SI]*y_cur[IDX_HS2II] + + k[2739]*y_cur[IDX_H3II]*y_cur[IDX_S2I] + + k[2817]*y_cur[IDX_H3OII]*y_cur[IDX_S2I] + + k[2988]*y_cur[IDX_HCOII]*y_cur[IDX_S2I] + + k[3055]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + + k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + + k[3828]*y_cur[IDX_SII]*y_cur[IDX_H2SI] - + k[5558]*y_cur[IDX_H2I]*y_cur[IDX_HS2II] + k[6207]*y_cur[IDX_HS2I] - + k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] - + k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiC2H2I] = 0.0 - + k[420]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] + + k[1230]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] - + k[1431]*y_cur[IDX_CII]*y_cur[IDX_SiC2H2I] - + k[2357]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] - + k[2745]*y_cur[IDX_H3II]*y_cur[IDX_SiC2H2I] - + k[2992]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2H2I] - + k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] - + k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + + k[4885]*y_cur[IDX_C2H4I]*y_cur[IDX_SiI] - k[5919]*y_cur[IDX_SiC2H2I] + - k[6261]*y_cur[IDX_SiC2H2I] + + k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - + k[7010]*y_cur[IDX_SiC2H2I] + k[7192]*y_cur[IDX_GSiC2H2I] + + k[7374]*y_cur[IDX_GSiC2H2I] + k[7556]*y_cur[IDX_GSiC2H2I]; + ydot[yistart + IDX_SiC3II] = 0.0 + + k[197]*y_cur[IDX_CII]*y_cur[IDX_SiC3I] + + k[422]*y_cur[IDX_HII]*y_cur[IDX_SiC3I] - + k[1232]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] - + k[1233]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + + k[1432]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] + + k[1915]*y_cur[IDX_CI]*y_cur[IDX_SiC2HII] + + k[2359]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] + + k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + + k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] + + k[3861]*y_cur[IDX_SiII]*y_cur[IDX_C3HI] + + k[3872]*y_cur[IDX_SiI]*y_cur[IDX_C3HII] + + k[3873]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - + k[6746]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] - + k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2NHII] = 0.0 - + k[784]*y_cur[IDX_C2NHII]*y_cur[IDX_eM] + + k[1957]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + + k[2525]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] + + k[2598]*y_cur[IDX_H3II]*y_cur[IDX_C2NI] + + k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3388]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + + k[3390]*y_cur[IDX_NI]*y_cur[IDX_C2H3II] + + k[3528]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] + + k[3626]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - + k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3H6II] = 0.0 + + k[166]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[670]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[702]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + + k[712]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - + k[805]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] - + k[806]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + + k[1670]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - + k[1817]*y_cur[IDX_C3H6II]*y_cur[IDX_CH3CHCH2I] + + k[2833]*y_cur[IDX_HI]*y_cur[IDX_C3H7II] + + k[3857]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - + k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] - + k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C6H7II] = 0.0 - + k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] - + k[862]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + + k[1598]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H6I] + + k[1704]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H5II] + + k[1810]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + + k[1813]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + + k[1814]*y_cur[IDX_C3H5II]*y_cur[IDX_C6H6I] + + k[2104]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C3H5II] + + k[2221]*y_cur[IDX_CH5II]*y_cur[IDX_C6H6I] + + k[2619]*y_cur[IDX_H3II]*y_cur[IDX_C6H6I] + + k[2783]*y_cur[IDX_H3OII]*y_cur[IDX_C6H6I] + + k[2924]*y_cur[IDX_HCOII]*y_cur[IDX_C6H6I] + + k[3368]*y_cur[IDX_N2HII]*y_cur[IDX_C6H6I] + + k[5553]*y_cur[IDX_H2I]*y_cur[IDX_C6H5II] - + k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - + k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C8H4II] = 0.0 - + k[885]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] - + k[886]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + + k[1597]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + + k[1640]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + + k[1660]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] + + k[1662]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] + + k[1703]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H2II] + + k[1799]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] + + k[2023]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] + + k[2038]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + + k[2109]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C5H2II] + + k[2187]*y_cur[IDX_CH4I]*y_cur[IDX_C7H2II] + + k[5518]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - + k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] - + k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2OHCHOI] = 0.0 + + k[1283]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - + k[5661]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCHOI] - + k[5662]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCHOI] - + k[5663]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCHOI] - + k[5664]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCHOI] - + k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - + k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - + k[5945]*y_cur[IDX_CH2OHCHOI] - k[6295]*y_cur[IDX_CH2OHCHOI] + + k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[7026]*y_cur[IDX_CH2OHCHOI] + k[7208]*y_cur[IDX_GCH2OHCHOI] + + k[7390]*y_cur[IDX_GCH2OHCHOI] + k[7565]*y_cur[IDX_GCH2OHCHOI] + + k[8652]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI] + + k[8762]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI]; + ydot[yistart + IDX_ClI] = 0.0 + k[318]*y_cur[IDX_ClII]*y_cur[IDX_HI] + - k[319]*y_cur[IDX_ClI]*y_cur[IDX_HII] + + k[679]*y_cur[IDX_O2I]*y_cur[IDX_ClII] + + k[904]*y_cur[IDX_CClII]*y_cur[IDX_eM] + + k[986]*y_cur[IDX_ClOII]*y_cur[IDX_eM] + + k[1002]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + + k[1111]*y_cur[IDX_HClII]*y_cur[IDX_eM] - + k[2679]*y_cur[IDX_H3II]*y_cur[IDX_ClI] + + k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] - + k[5132]*y_cur[IDX_ClI]*y_cur[IDX_H2I] + + k[5211]*y_cur[IDX_HClI]*y_cur[IDX_HI] + + k[5379]*y_cur[IDX_OI]*y_cur[IDX_CClI] + + k[5394]*y_cur[IDX_OI]*y_cur[IDX_ClOI] + + k[5613]*y_cur[IDX_ClII]*y_cur[IDX_eM] - k[5677]*y_cur[IDX_ClI] + + k[5775]*y_cur[IDX_CClI] - k[5830]*y_cur[IDX_ClI] + + k[5831]*y_cur[IDX_ClOI] + k[5864]*y_cur[IDX_HClI] + + k[6072]*y_cur[IDX_CClI] - k[6143]*y_cur[IDX_ClI] + + k[6144]*y_cur[IDX_ClOI] + k[6194]*y_cur[IDX_HClI] - + k[6307]*y_cur[IDX_ClI] + k[6454]*y_cur[IDX_ClII]*y_cur[IDX_GRAINM] + + k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM] + + k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + + k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM] + + k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM] - k[6942]*y_cur[IDX_ClI] + + k[7124]*y_cur[IDX_GClI] + k[7306]*y_cur[IDX_GClI] + + k[7488]*y_cur[IDX_GClI]; + ydot[yistart + IDX_GC7I] = 0.0 + k[7050]*y_cur[IDX_C7I] - + k[7232]*y_cur[IDX_GC7I] - k[7414]*y_cur[IDX_GC7I] - + k[7596]*y_cur[IDX_GC7I] - k[7861]*y_cur[IDX_GC7I] + + k[7862]*y_cur[IDX_GC7HI] + k[7866]*y_cur[IDX_GC8I] - + k[8193]*y_cur[IDX_GC7I] - k[8194]*y_cur[IDX_GC7I] - + k[8195]*y_cur[IDX_GC7I] - k[8196]*y_cur[IDX_GC7I] + + k[8197]*y_cur[IDX_GC7HI] + k[8199]*y_cur[IDX_GC7HI] + + k[8201]*y_cur[IDX_GC7H2I] + k[8205]*y_cur[IDX_GC8I] + + k[8207]*y_cur[IDX_GC8I] + k[8220]*y_cur[IDX_GC9I] + + k[8231]*y_cur[IDX_GC10I] + k[8239]*y_cur[IDX_GC10HI] + + k[8257]*y_cur[IDX_GC11I] + k[8261]*y_cur[IDX_GC11I] - + k[8355]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - + k[8386]*y_cur[IDX_GH2I]*y_cur[IDX_GC7I] + + k[8425]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - + k[8427]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - + k[8469]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - + k[8499]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I] - + k[8641]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - + k[8678]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - + k[8709]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - + k[8732]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I]; + ydot[yistart + IDX_GSiI] = 0.0 + k[6915]*y_cur[IDX_SiI] - + k[7097]*y_cur[IDX_GSiI] - k[7279]*y_cur[IDX_GSiI] - + k[7461]*y_cur[IDX_GSiI] + k[7684]*y_cur[IDX_GSiHI] + + k[7734]*y_cur[IDX_GSiCI] + k[7738]*y_cur[IDX_GHCSiI] + + k[7748]*y_cur[IDX_GSiNI] + k[7765]*y_cur[IDX_GSiOI] + + k[7806]*y_cur[IDX_GSiNCI] + k[7831]*y_cur[IDX_GSiSI] + + k[7971]*y_cur[IDX_GSiHI] + k[7974]*y_cur[IDX_GSiH2I] + + k[7975]*y_cur[IDX_GSiH2I] + k[8043]*y_cur[IDX_GSiCI] + + k[8048]*y_cur[IDX_GHCSiI] + k[8059]*y_cur[IDX_GSiCH2I] + + k[8062]*y_cur[IDX_GSiNI] + k[8083]*y_cur[IDX_GSiOI] + + k[8084]*y_cur[IDX_GSiOI] + k[8129]*y_cur[IDX_GSiC2I] + + k[8135]*y_cur[IDX_GSiNCI] + k[8155]*y_cur[IDX_GSiSI] + + k[8189]*y_cur[IDX_GSiC4I] - k[8301]*y_cur[IDX_GHI]*y_cur[IDX_GSiI] - + k[8600]*y_cur[IDX_GHI]*y_cur[IDX_GSiI]; + ydot[yistart + IDX_HC3OII] = 0.0 - + k[1070]*y_cur[IDX_HC3OII]*y_cur[IDX_eM] + + k[1753]*y_cur[IDX_C3HII]*y_cur[IDX_CO2I] + + k[1757]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + + k[2123]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] + + k[2163]*y_cur[IDX_CH4I]*y_cur[IDX_C3OII] + + k[2410]*y_cur[IDX_H2I]*y_cur[IDX_C3OII] + + k[2529]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + + k[2531]*y_cur[IDX_H2OI]*y_cur[IDX_C3OII] + + k[2605]*y_cur[IDX_H3II]*y_cur[IDX_C3OI] + + k[2775]*y_cur[IDX_H3OII]*y_cur[IDX_C3OI] + + k[2910]*y_cur[IDX_HCOII]*y_cur[IDX_C3OI] + + k[3671]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + + k[3702]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - + k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HCNOI] = 0.0 - + k[520]*y_cur[IDX_HeII]*y_cur[IDX_HCNOI] + + k[995]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + + k[1095]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] - + k[2343]*y_cur[IDX_HII]*y_cur[IDX_HCNOI] - + k[2695]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] - + k[2696]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + + k[5005]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - + k[5202]*y_cur[IDX_HCNOI]*y_cur[IDX_CI] - + k[5203]*y_cur[IDX_HCNOI]*y_cur[IDX_OI] - k[5855]*y_cur[IDX_HCNOI] - + k[6182]*y_cur[IDX_HCNOI] + + k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + + k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] - + k[6971]*y_cur[IDX_HCNOI] + k[7153]*y_cur[IDX_GHCNOI] + + k[7335]*y_cur[IDX_GHCNOI] + k[7517]*y_cur[IDX_GHCNOI] + + k[8621]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; + ydot[yistart + IDX_SiC3HII] = 0.0 + + k[423]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] - + k[1234]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] - + k[1235]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] + + k[1431]*y_cur[IDX_CII]*y_cur[IDX_SiC2H2I] + + k[1916]*y_cur[IDX_CI]*y_cur[IDX_SiC2H2II] - + k[1918]*y_cur[IDX_CI]*y_cur[IDX_SiC3HII] + + k[2747]*y_cur[IDX_H3II]*y_cur[IDX_SiC3I] + + k[2994]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3I] + + k[3860]*y_cur[IDX_SiII]*y_cur[IDX_C3H2I] + + k[3868]*y_cur[IDX_SiII]*y_cur[IDX_H2CCCI] + + k[3874]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] + + k[3875]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] + + k[3879]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - + k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] - + k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiCH3I] = 0.0 - + k[200]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - + k[427]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] + + k[1248]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] - + k[1437]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - + k[1438]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - + k[2361]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] - + k[2752]*y_cur[IDX_H3II]*y_cur[IDX_SiCH3I] - + k[2822]*y_cur[IDX_H3OII]*y_cur[IDX_SiCH3I] - + k[2999]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH3I] - + k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - + k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - + k[5926]*y_cur[IDX_SiCH3I] - k[6270]*y_cur[IDX_SiCH3I] + + k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - + k[6970]*y_cur[IDX_SiCH3I] + k[7152]*y_cur[IDX_GSiCH3I] + + k[7334]*y_cur[IDX_GSiCH3I] + k[7516]*y_cur[IDX_GSiCH3I]; + ydot[yistart + IDX_C3H7II] = 0.0 - + k[807]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - + k[808]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - + k[809]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - + k[810]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - + k[811]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - + k[812]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - + k[813]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[1671]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - + k[1818]*y_cur[IDX_C3H7II]*y_cur[IDX_NH3I] + + k[2064]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + + k[2790]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHCH2I] - + k[2833]*y_cur[IDX_HI]*y_cur[IDX_C3H7II] + + k[3370]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] + + k[5516]*y_cur[IDX_C3H5II]*y_cur[IDX_H2I] - + k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4NII] = 0.0 - + k[831]*y_cur[IDX_C4NII]*y_cur[IDX_eM] - + k[832]*y_cur[IDX_C4NII]*y_cur[IDX_eM] + + k[1401]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1555]*y_cur[IDX_C2H2I]*y_cur[IDX_C4NII] - + k[2172]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2173]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2174]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2175]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2413]*y_cur[IDX_H2I]*y_cur[IDX_C4NII] - + k[2532]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] - + k[2533]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] + + k[2868]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + k[3019]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - - k[3020]*y_cur[IDX_HNC3I]*y_cur[IDX_CH3II] - - k[3021]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3022]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3023]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3024]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3025]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3026]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - - k[3027]*y_cur[IDX_HNC3I]*y_cur[IDX_H3II] - - k[3028]*y_cur[IDX_HNC3I]*y_cur[IDX_H3OII] - - k[3029]*y_cur[IDX_HNC3I]*y_cur[IDX_HCOII] - - k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3032]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3035]*y_cur[IDX_HNC3I]*y_cur[IDX_N2HII] - - k[5212]*y_cur[IDX_HNC3I]*y_cur[IDX_CI] - - k[5213]*y_cur[IDX_HNC3I]*y_cur[IDX_HI] - k[5866]*y_cur[IDX_HNC3I] - - k[6197]*y_cur[IDX_HNC3I] + - k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - - k[7000]*y_cur[IDX_HNC3I] + k[7182]*y_cur[IDX_GHNC3I] + - k[7364]*y_cur[IDX_GHNC3I] + k[7546]*y_cur[IDX_GHNC3I]; - ydot[yistart + IDX_HNCOI] = 0.0 - - k[521]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + - k[1008]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + - k[1118]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] - - k[2348]*y_cur[IDX_HII]*y_cur[IDX_HNCOI] - - k[2707]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] - - k[2708]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] - - k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + - k[4886]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] + - k[5006]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - - k[5214]*y_cur[IDX_HNCOI]*y_cur[IDX_CI] - k[5868]*y_cur[IDX_HNCOI] - - k[6199]*y_cur[IDX_HNCOI] + - k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + - k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - - k[6968]*y_cur[IDX_HNCOI] + k[7150]*y_cur[IDX_GHNCOI] + - k[7332]*y_cur[IDX_GHNCOI] + k[7514]*y_cur[IDX_GHNCOI] + - k[8624]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] + - k[8744]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_HNCOII] = 0.0 + - k[521]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] - - k[1116]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] - - k[1117]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + - k[2538]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[3047]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] - - k[3048]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] + - k[3765]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + - k[3767]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - - k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] - - k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HNCOHII] = 0.0 - - k[1118]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] - + k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] - + k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C8II] = 0.0 + + k[352]*y_cur[IDX_HII]*y_cur[IDX_C8I] - + k[877]*y_cur[IDX_C8II]*y_cur[IDX_eM] - + k[878]*y_cur[IDX_C8II]*y_cur[IDX_eM] + + k[1332]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] + + k[1334]*y_cur[IDX_CII]*y_cur[IDX_C7HI] + + k[1876]*y_cur[IDX_CI]*y_cur[IDX_C7HII] + + k[1877]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + + k[2311]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - + k[2422]*y_cur[IDX_H2I]*y_cur[IDX_C8II] + + k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + + k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + + k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] + + k[5500]*y_cur[IDX_CII]*y_cur[IDX_C7I] + k[6053]*y_cur[IDX_C8I] - + k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] - + k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C9H4II] = 0.0 - + k[897]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] - + k[898]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + + k[1604]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + + k[1642]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + + k[1664]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] + + k[1666]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] + + k[1705]*y_cur[IDX_C2H4I]*y_cur[IDX_C7H2II] + + k[1840]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] + + k[2040]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + + k[2110]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C6H2II] + + k[2188]*y_cur[IDX_CH4I]*y_cur[IDX_C8H2II] - + k[3451]*y_cur[IDX_NI]*y_cur[IDX_C9H4II] + + k[5578]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] - + k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] - + k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2COII] = 0.0 + + k[164]*y_cur[IDX_CII]*y_cur[IDX_CH2COI] - + k[918]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] - + k[919]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] - + k[920]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + + k[1947]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + + k[1979]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + + k[2521]*y_cur[IDX_H2OI]*y_cur[IDX_C2HII] + + k[3654]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + + k[3657]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + + k[3796]*y_cur[IDX_OHI]*y_cur[IDX_C2H2II] + + k[3843]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + + k[3851]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[5789]*y_cur[IDX_CH2COI] + k[6091]*y_cur[IDX_CH2COI] - + k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - + k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - + k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2PHI] = 0.0 + + k[1202]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] - + k[1351]*y_cur[IDX_CII]*y_cur[IDX_CH2PHI] - + k[2319]*y_cur[IDX_HII]*y_cur[IDX_CH2PHI] - + k[2640]*y_cur[IDX_H3II]*y_cur[IDX_CH2PHI] - + k[2788]*y_cur[IDX_H3OII]*y_cur[IDX_CH2PHI] - + k[2942]*y_cur[IDX_HCOII]*y_cur[IDX_CH2PHI] - + k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] - + k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] - + k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] - k[5792]*y_cur[IDX_CH2PHI] + - k[6094]*y_cur[IDX_CH2PHI] + + k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - + k[6984]*y_cur[IDX_CH2PHI] + k[7166]*y_cur[IDX_GCH2PHI] + + k[7348]*y_cur[IDX_GCH2PHI] + k[7530]*y_cur[IDX_GCH2PHI]; + ydot[yistart + IDX_CH3C3NI] = 0.0 + + k[927]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] - + k[1354]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - + k[1355]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - + k[2320]*y_cur[IDX_HII]*y_cur[IDX_CH3C3NI] - + k[2642]*y_cur[IDX_H3II]*y_cur[IDX_CH3C3NI] - + k[2943]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C3NI] - + k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] + + k[5109]*y_cur[IDX_CNI]*y_cur[IDX_CH2CCH2I] + + k[5110]*y_cur[IDX_CNI]*y_cur[IDX_CH3CCHI] - + k[5796]*y_cur[IDX_CH3C3NI] - k[6100]*y_cur[IDX_CH3C3NI] + + k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] - + k[7036]*y_cur[IDX_CH3C3NI] + k[7218]*y_cur[IDX_GCH3C3NI] + + k[7400]*y_cur[IDX_GCH3C3NI] + k[7582]*y_cur[IDX_GCH3C3NI] + + k[8756]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI]; + ydot[yistart + IDX_GC4I] = 0.0 + k[6995]*y_cur[IDX_C4I] - + k[7177]*y_cur[IDX_GC4I] - k[7359]*y_cur[IDX_GC4I] - + k[7541]*y_cur[IDX_GC4I] - k[7783]*y_cur[IDX_GC4I] - + k[7784]*y_cur[IDX_GC4I] + k[7789]*y_cur[IDX_GC4HI] + + k[7823]*y_cur[IDX_GC5I] + k[7851]*y_cur[IDX_GC6HI] + + k[7854]*y_cur[IDX_GC5NI] - k[8107]*y_cur[IDX_GC4I] - + k[8108]*y_cur[IDX_GC4I] + k[8113]*y_cur[IDX_GC4HI] + + k[8161]*y_cur[IDX_GC4NI] + k[8179]*y_cur[IDX_GC6I] + + k[8182]*y_cur[IDX_GC6HI] + k[8186]*y_cur[IDX_GC5NI] + + k[8189]*y_cur[IDX_GSiC4I] + k[8194]*y_cur[IDX_GC7I] + + k[8230]*y_cur[IDX_GC10I] + k[8257]*y_cur[IDX_GC11I] + + k[8261]*y_cur[IDX_GC11I] - k[8339]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - + k[8380]*y_cur[IDX_GH2I]*y_cur[IDX_GC4I] + + k[8416]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - + k[8420]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - + k[8493]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I] - + k[8629]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - + k[8671]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - + k[8726]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I]; + ydot[yistart + IDX_GCH3CHOI] = 0.0 + k[6977]*y_cur[IDX_CH3CHOI] - + k[7159]*y_cur[IDX_GCH3CHOI] - k[7341]*y_cur[IDX_GCH3CHOI] - + k[7523]*y_cur[IDX_GCH3CHOI] - k[7760]*y_cur[IDX_GCH3CHOI] - + k[7761]*y_cur[IDX_GCH3CHOI] - k[7762]*y_cur[IDX_GCH3CHOI] - + k[7763]*y_cur[IDX_GCH3CHOI] + k[7820]*y_cur[IDX_GCH3COCH3I] - + k[8078]*y_cur[IDX_GCH3CHOI] - k[8079]*y_cur[IDX_GCH3CHOI] - + k[8080]*y_cur[IDX_GCH3CHOI] - k[8081]*y_cur[IDX_GCH3CHOI] + + k[8147]*y_cur[IDX_GCH3COCH3I] + + k[8331]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] - + k[8332]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - + k[8333]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - + k[8334]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - + k[8505]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - + k[8506]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - + k[8507]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - + k[8521]*y_cur[IDX_GNHI]*y_cur[IDX_GCH3CHOI] - + k[8535]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH3CHOI] + + k[8543]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] - + k[8547]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - + k[8548]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - + k[8562]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - + k[8563]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] - + k[8571]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - + k[8572]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - + k[8573]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI]; + ydot[yistart + IDX_GH2COI] = 0.0 + k[6926]*y_cur[IDX_H2COI] - + k[7108]*y_cur[IDX_GH2COI] - k[7290]*y_cur[IDX_GH2COI] - + k[7472]*y_cur[IDX_GH2COI] - k[7692]*y_cur[IDX_GH2COI] + + k[7701]*y_cur[IDX_GCH3OHI] + k[7769]*y_cur[IDX_GCH3OCH3I] + + k[7774]*y_cur[IDX_GC2H5OHI] - k[7982]*y_cur[IDX_GH2COI] - + k[7983]*y_cur[IDX_GH2COI] - k[7984]*y_cur[IDX_GH2COI] - + k[7985]*y_cur[IDX_GH2COI] - k[7986]*y_cur[IDX_GH2COI] - + k[7987]*y_cur[IDX_GH2COI] + k[8001]*y_cur[IDX_GCH3OHI] + + k[8089]*y_cur[IDX_GCH3OCH3I] + k[8094]*y_cur[IDX_GC2H5OHI] + + k[8150]*y_cur[IDX_GHCOOCH3I] + k[8150]*y_cur[IDX_GHCOOCH3I] + + k[8295]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] - + k[8296]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8297]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8298]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + + k[8334]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + + k[8438]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - + k[8508]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - + k[8509]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - + k[8522]*y_cur[IDX_GNHI]*y_cur[IDX_GH2COI] + + k[8528]*y_cur[IDX_GCH2I]*y_cur[IDX_GO2I] - + k[8534]*y_cur[IDX_GNH2I]*y_cur[IDX_GH2COI] - + k[8544]*y_cur[IDX_GCH3I]*y_cur[IDX_GH2COI] - + k[8560]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - + k[8561]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - + k[8570]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GH2COI] - + k[8596]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8597]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI]; + ydot[yistart + IDX_HOCNI] = 0.0 + + k[1016]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + k[1119]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] - - k[1120]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + - k[2708]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] + - k[2712]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] + - k[3048]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] + - k[3052]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - - k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - - k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - - k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HNOI] = 0.0 + - k[626]*y_cur[IDX_NOI]*y_cur[IDX_HNOII] + - k[1010]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] - - k[2349]*y_cur[IDX_HII]*y_cur[IDX_HNOI] - - k[2709]*y_cur[IDX_H3II]*y_cur[IDX_HNOI] - - k[3265]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - - k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - - k[5000]*y_cur[IDX_CH2I]*y_cur[IDX_HNOI] - - k[5034]*y_cur[IDX_CH3I]*y_cur[IDX_HNOI] + + k[2351]*y_cur[IDX_HII]*y_cur[IDX_HOCNI] - + k[2711]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] - + k[2712]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] - + k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] + + k[4887]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] - + k[5215]*y_cur[IDX_HOCNI]*y_cur[IDX_CI] - + k[5216]*y_cur[IDX_HOCNI]*y_cur[IDX_OI] - k[5871]*y_cur[IDX_HOCNI] - + k[6202]*y_cur[IDX_HOCNI] + + k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + + k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - + k[6969]*y_cur[IDX_HOCNI] + k[7151]*y_cur[IDX_GHOCNI] + + k[7333]*y_cur[IDX_GHOCNI] + k[7515]*y_cur[IDX_GHOCNI] + + k[8623]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI]; + ydot[yistart + IDX_HPOI] = 0.0 - + k[181]*y_cur[IDX_CII]*y_cur[IDX_HPOI] - + k[395]*y_cur[IDX_HII]*y_cur[IDX_HPOI] + + k[1017]*y_cur[IDX_H2POII]*y_cur[IDX_eM] - + k[2714]*y_cur[IDX_H3II]*y_cur[IDX_HPOI] - + k[2812]*y_cur[IDX_H3OII]*y_cur[IDX_HPOI] - + k[2975]*y_cur[IDX_HCOII]*y_cur[IDX_HPOI] - + k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - + k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - + k[4964]*y_cur[IDX_CI]*y_cur[IDX_HPOI] - + k[5414]*y_cur[IDX_OI]*y_cur[IDX_HPOI] + + k[5433]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - k[5873]*y_cur[IDX_HPOI] - + k[6204]*y_cur[IDX_HPOI] + + k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] - + k[6993]*y_cur[IDX_HPOI] + k[7175]*y_cur[IDX_GHPOI] + + k[7357]*y_cur[IDX_GHPOI] + k[7539]*y_cur[IDX_GHPOI]; + ydot[yistart + IDX_HS2I] = 0.0 - + k[396]*y_cur[IDX_HII]*y_cur[IDX_HS2I] + + k[1021]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + + k[1050]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] + + k[1724]*y_cur[IDX_C2H5OHI]*y_cur[IDX_S2II] + + k[2114]*y_cur[IDX_CH3CHOI]*y_cur[IDX_S2II] - + k[2715]*y_cur[IDX_H3II]*y_cur[IDX_HS2I] - + k[2813]*y_cur[IDX_H3OII]*y_cur[IDX_HS2I] - + k[2976]*y_cur[IDX_HCOII]*y_cur[IDX_HS2I] - + k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - + k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - k[5874]*y_cur[IDX_HS2I] - + k[6207]*y_cur[IDX_HS2I] - k[6208]*y_cur[IDX_HS2I] + + k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + + k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - + k[7037]*y_cur[IDX_HS2I] + k[7219]*y_cur[IDX_GHS2I] + + k[7401]*y_cur[IDX_GHS2I] + k[7583]*y_cur[IDX_GHS2I]; + ydot[yistart + IDX_SiC2II] = 0.0 + + k[195]*y_cur[IDX_CII]*y_cur[IDX_SiC2I] + + k[419]*y_cur[IDX_HII]*y_cur[IDX_SiC2I] - + k[1224]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] - + k[1225]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] + + k[1410]*y_cur[IDX_CII]*y_cur[IDX_HCSiI] + + k[1435]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + + k[1529]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - + k[1575]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2II] + + k[1751]*y_cur[IDX_C2HI]*y_cur[IDX_SiII] + + k[1921]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + + k[2358]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - + k[2473]*y_cur[IDX_H2I]*y_cur[IDX_SiC2II] + + k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + + k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] - + k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] - + k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiC2H2II] = 0.0 + + k[420]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] - + k[1228]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] - + k[1229]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + + k[1438]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + + k[1627]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] + + k[1646]*y_cur[IDX_C2H3I]*y_cur[IDX_SiII] + + k[1680]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - + k[1916]*y_cur[IDX_CI]*y_cur[IDX_SiC2H2II] + + k[1923]*y_cur[IDX_CI]*y_cur[IDX_SiCH3II] + + k[2746]*y_cur[IDX_H3II]*y_cur[IDX_SiC2HI] + + k[2820]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2HI] + + k[2993]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2HI] + + k[5512]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - + k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] - + k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C6H4II] = 0.0 - + k[856]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] - + k[857]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + + k[1553]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + + k[1623]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + + k[1634]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + + k[1635]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + + k[1654]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] + + k[1678]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] + + k[1695]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] + + k[1696]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] + + k[1776]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCHI] + + k[1787]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] + + k[1795]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] + + k[1805]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + + k[2029]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] + + k[2180]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + + k[2477]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + + k[2486]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + + k[2851]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H4II] + + k[5511]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] - + k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] - + k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3COI] = 0.0 + + k[1289]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1292]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1295]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[5639]*y_cur[IDX_CII]*y_cur[IDX_CH3COI] - + k[5640]*y_cur[IDX_H3II]*y_cur[IDX_CH3COI] - + k[5641]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COI] - + k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] - + k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + + k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5938]*y_cur[IDX_CH3COI] + k[5947]*y_cur[IDX_CH3COOHI] - + k[6291]*y_cur[IDX_CH3COI] + k[6296]*y_cur[IDX_CH3COOHI] + + k[6716]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6966]*y_cur[IDX_CH3COI] + k[7148]*y_cur[IDX_GCH3COI] + + k[7330]*y_cur[IDX_GCH3COI] + k[7512]*y_cur[IDX_GCH3COI] + + k[8750]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_CH3COCH4II] = 0.0 - + k[952]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] - + k[953]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] + + k[1723]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_CH3COCH3I] + + k[2071]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + + k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] + + k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] + + k[2491]*y_cur[IDX_H2COI]*y_cur[IDX_C2H5OH2II] + + k[2493]*y_cur[IDX_H2COI]*y_cur[IDX_CH3COCH3II] + + k[2663]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2793]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COCH3I] + + k[2952]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COCH3I] + + k[3014]*y_cur[IDX_HCSII]*y_cur[IDX_CH3COCH3I] + + k[5532]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - + k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - + k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3OHII] = 0.0 + + k[279]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] + + k[370]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + + k[545]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[651]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + + k[672]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - + k[960]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] - + k[961]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] - + k[962]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + + k[5628]*y_cur[IDX_H3II]*y_cur[IDX_CH3OI] + + k[5629]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OI] + + k[5630]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OI] + + k[5634]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHI] + + k[5635]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHI] + + k[5636]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHI] + + k[5816]*y_cur[IDX_CH3OHI] + k[6120]*y_cur[IDX_CH3OHI] - + k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - + k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - + k[6430]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_COOHI] = 0.0 + + k[1285]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1288]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1294]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[5644]*y_cur[IDX_CII]*y_cur[IDX_COOHI] - + k[5645]*y_cur[IDX_H3II]*y_cur[IDX_COOHI] - + k[5646]*y_cur[IDX_HCOII]*y_cur[IDX_COOHI] - + k[5647]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] - + k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + + k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5939]*y_cur[IDX_COOHI] + k[5946]*y_cur[IDX_CH3COOHI] - + k[6292]*y_cur[IDX_COOHI] + k[6297]*y_cur[IDX_CH3COOHI] + + k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6981]*y_cur[IDX_COOHI] + k[7163]*y_cur[IDX_GCOOHI] + + k[7345]*y_cur[IDX_GCOOHI] + k[7527]*y_cur[IDX_GCOOHI] + + k[8739]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_GNOI] = 0.0 + k[6925]*y_cur[IDX_NOI] - + k[7107]*y_cur[IDX_GNOI] - k[7289]*y_cur[IDX_GNOI] - + k[7471]*y_cur[IDX_GNOI] - k[7690]*y_cur[IDX_GNOI] - + k[7691]*y_cur[IDX_GNOI] + k[7694]*y_cur[IDX_GHNOI] + + k[7752]*y_cur[IDX_GHCNOI] + k[7756]*y_cur[IDX_GN2OI] + + k[7778]*y_cur[IDX_GNO2I] - k[7980]*y_cur[IDX_GNOI] - + k[7981]*y_cur[IDX_GNOI] + k[7992]*y_cur[IDX_GHNOI] + + k[8066]*y_cur[IDX_GHCNOI] + k[8071]*y_cur[IDX_GN2OI] + + k[8073]*y_cur[IDX_GN2OI] + k[8099]*y_cur[IDX_GNO2I] + + k[8100]*y_cur[IDX_GNO2I] - k[8305]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] + + k[8306]*y_cur[IDX_GHI]*y_cur[IDX_GHNOI] - + k[8398]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - + k[8399]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] + + k[8435]*y_cur[IDX_GOI]*y_cur[IDX_GHNOI] + + k[8442]*y_cur[IDX_GOI]*y_cur[IDX_GNSI] + + k[8461]*y_cur[IDX_GNI]*y_cur[IDX_GOI] + + k[8477]*y_cur[IDX_GCHI]*y_cur[IDX_GHNOI] - + k[8481]*y_cur[IDX_GCHI]*y_cur[IDX_GNOI] - + k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] - + k[8530]*y_cur[IDX_GNH2I]*y_cur[IDX_GNOI] + + k[8533]*y_cur[IDX_GCH2I]*y_cur[IDX_GHNOI] + + k[8541]*y_cur[IDX_GCH3I]*y_cur[IDX_GHNOI] - + k[8604]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] - + k[8658]*y_cur[IDX_GCI]*y_cur[IDX_GNOI]; + ydot[yistart + IDX_POII] = 0.0 + + k[192]*y_cur[IDX_CII]*y_cur[IDX_POI] + + k[413]*y_cur[IDX_HII]*y_cur[IDX_POI] - + k[1218]*y_cur[IDX_POII]*y_cur[IDX_eM] + + k[2563]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + + k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + + k[3673]*y_cur[IDX_O2I]*y_cur[IDX_PH2II] + + k[3751]*y_cur[IDX_OI]*y_cur[IDX_PHII] + + k[3752]*y_cur[IDX_OI]*y_cur[IDX_PNII] + + k[3807]*y_cur[IDX_OHI]*y_cur[IDX_PII] + + k[3811]*y_cur[IDX_PII]*y_cur[IDX_CO2I] + + k[3812]*y_cur[IDX_PII]*y_cur[IDX_O2I] + + k[3813]*y_cur[IDX_PII]*y_cur[IDX_OCSI] + + k[3818]*y_cur[IDX_PHII]*y_cur[IDX_O2I] - + k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C7H4II] = 0.0 + + k[364]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] - + k[872]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] - + k[873]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + + k[1591]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + + k[1638]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + + k[1658]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] + + k[1701]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + + k[1789]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H3II] + + k[2034]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + + k[2035]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + + k[2105]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HII] + + k[2185]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + + k[2480]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H3II] - + k[3434]*y_cur[IDX_NI]*y_cur[IDX_C7H4II] - + k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] - + k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C7H5II] = 0.0 - + k[874]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] - + k[875]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] + + k[1330]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + + k[1656]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] + + k[1702]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + + k[2036]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + + k[2106]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] + + k[2108]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H3II] + + k[2186]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + + k[2645]*y_cur[IDX_H3II]*y_cur[IDX_CH3C6HI] + + k[2946]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C6HI] - + k[3435]*y_cur[IDX_NI]*y_cur[IDX_C7H5II] + + k[5515]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] + + k[5531]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] - + k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - + k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3C6HI] = 0.0 - + k[364]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] + + k[875]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] - + k[1360]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] - + k[1361]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] - + k[2323]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] - + k[2645]*y_cur[IDX_H3II]*y_cur[IDX_CH3C6HI] - + k[2946]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C6HI] - + k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - + k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - + k[4951]*y_cur[IDX_CI]*y_cur[IDX_CH3C6HI] + + k[5023]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] + + k[5051]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + + k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - + k[5799]*y_cur[IDX_CH3C6HI] - k[6103]*y_cur[IDX_CH3C6HI] + + k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - + k[7053]*y_cur[IDX_CH3C6HI] + k[7235]*y_cur[IDX_GCH3C6HI] + + k[7417]*y_cur[IDX_GCH3C6HI] + k[7599]*y_cur[IDX_GCH3C6HI]; + ydot[yistart + IDX_H2CSII] = 0.0 + + k[377]*y_cur[IDX_HII]*y_cur[IDX_H2CSI] - + k[1000]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] - + k[1001]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + + k[1674]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + + k[1992]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] + + k[2084]*y_cur[IDX_CH3II]*y_cur[IDX_HSI] + + k[2101]*y_cur[IDX_CH3I]*y_cur[IDX_SII] + + k[2702]*y_cur[IDX_H3II]*y_cur[IDX_HCSI] + + k[3825]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + + k[3844]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + + k[3848]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + + k[3854]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[5617]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] - + k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] - + k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HC9NI] = 0.0 + + k[121]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - + k[387]*y_cur[IDX_HII]*y_cur[IDX_HC9NI] + + k[992]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + + k[1033]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] - + k[1406]*y_cur[IDX_CII]*y_cur[IDX_HC9NI] - + k[2693]*y_cur[IDX_H3II]*y_cur[IDX_HC9NI] - + k[2968]*y_cur[IDX_HCOII]*y_cur[IDX_HC9NI] - + k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] + + k[5108]*y_cur[IDX_CNI]*y_cur[IDX_C8H2I] - k[5853]*y_cur[IDX_HC9NI] - + k[6179]*y_cur[IDX_HC9NI] - k[6180]*y_cur[IDX_HC9NI] + + k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + + k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - + k[7068]*y_cur[IDX_HC9NI] + k[7250]*y_cur[IDX_GHC9NI] + + k[7432]*y_cur[IDX_GHC9NI] + k[7614]*y_cur[IDX_GHC9NI] + + k[8650]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] + + k[8712]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI]; + ydot[yistart + IDX_HCOOCH3I] = 0.0 - + k[179]*y_cur[IDX_CII]*y_cur[IDX_HCOOCH3I] - + k[390]*y_cur[IDX_HII]*y_cur[IDX_HCOOCH3I] + + k[1054]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] - + k[2698]*y_cur[IDX_H3II]*y_cur[IDX_HCOOCH3I] - + k[2807]*y_cur[IDX_H3OII]*y_cur[IDX_HCOOCH3I] - + k[2970]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOCH3I] - + k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] - + k[5858]*y_cur[IDX_HCOOCH3I] - k[5859]*y_cur[IDX_HCOOCH3I] - + k[6186]*y_cur[IDX_HCOOCH3I] + + k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - + k[7021]*y_cur[IDX_HCOOCH3I] + k[7203]*y_cur[IDX_GHCOOCH3I] + + k[7385]*y_cur[IDX_GHCOOCH3I] + k[7569]*y_cur[IDX_GHCOOCH3I] + + k[8651]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] + + k[8759]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI]; + ydot[yistart + IDX_NCCNHII] = 0.0 - + k[1156]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] - + k[1157]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] + + k[1624]*y_cur[IDX_C2H3II]*y_cur[IDX_NCCNI] - + k[1709]*y_cur[IDX_C2H4I]*y_cur[IDX_NCCNHII] - + k[2128]*y_cur[IDX_CH3OHI]*y_cur[IDX_NCCNHII] + + k[2404]*y_cur[IDX_H2I]*y_cur[IDX_C2N2II] + + k[2527]*y_cur[IDX_H2OI]*y_cur[IDX_C2N2II] - + k[2560]*y_cur[IDX_H2OI]*y_cur[IDX_NCCNHII] + + k[2720]*y_cur[IDX_H3II]*y_cur[IDX_NCCNI] + + k[2866]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] - + k[2882]*y_cur[IDX_HCNI]*y_cur[IDX_NCCNHII] + + k[2979]*y_cur[IDX_HCOII]*y_cur[IDX_NCCNI] + + k[3375]*y_cur[IDX_N2HII]*y_cur[IDX_NCCNI] - + k[3593]*y_cur[IDX_NH3I]*y_cur[IDX_NCCNHII] - + k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] - + k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NO2I] = 0.0 + k[125]*y_cur[IDX_OM]*y_cur[IDX_NOI] + - k[676]*y_cur[IDX_O2II]*y_cur[IDX_NO2I] - + k[2355]*y_cur[IDX_HII]*y_cur[IDX_NO2I] - + k[2725]*y_cur[IDX_H3II]*y_cur[IDX_NO2I] - + k[3648]*y_cur[IDX_OII]*y_cur[IDX_NO2I] - + k[5002]*y_cur[IDX_CH2I]*y_cur[IDX_NO2I] - k[5037]*y_cur[IDX_CH3I]*y_cur[IDX_NO2I] - - k[5078]*y_cur[IDX_CHI]*y_cur[IDX_HNOI] - - k[5119]*y_cur[IDX_CNI]*y_cur[IDX_HNOI] - - k[5127]*y_cur[IDX_COI]*y_cur[IDX_HNOI] - - k[5175]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - - k[5176]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - - k[5177]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + - k[5203]*y_cur[IDX_HCNOI]*y_cur[IDX_OI] - - k[5206]*y_cur[IDX_HCOI]*y_cur[IDX_HNOI] + - k[5207]*y_cur[IDX_HCOI]*y_cur[IDX_NOI] - - k[5269]*y_cur[IDX_NI]*y_cur[IDX_HNOI] - - k[5270]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + - k[5311]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] + - k[5316]*y_cur[IDX_NHI]*y_cur[IDX_O2I] + - k[5322]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - - k[5326]*y_cur[IDX_NOI]*y_cur[IDX_HNOI] - + k[5120]*y_cur[IDX_CNI]*y_cur[IDX_NO2I] - + k[5129]*y_cur[IDX_COI]*y_cur[IDX_NO2I] - + k[5185]*y_cur[IDX_HI]*y_cur[IDX_NO2I] - + k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5276]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5277]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5278]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5311]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] - + k[5312]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] + + k[5327]*y_cur[IDX_NOI]*y_cur[IDX_N2OI] + + k[5330]*y_cur[IDX_NOI]*y_cur[IDX_O2I] + + k[5336]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] + k[5411]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - - k[5412]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - - k[5413]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + - k[5420]*y_cur[IDX_OI]*y_cur[IDX_NH2I] - - k[5472]*y_cur[IDX_OHI]*y_cur[IDX_HNOI] + - k[5473]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - k[5869]*y_cur[IDX_HNOI] - - k[6200]*y_cur[IDX_HNOI] + - k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] - - k[6930]*y_cur[IDX_HNOI] + k[7112]*y_cur[IDX_GHNOI] + - k[7294]*y_cur[IDX_GHNOI] + k[7476]*y_cur[IDX_GHNOI] + - k[8604]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] + - k[8687]*y_cur[IDX_GOI]*y_cur[IDX_GNHI]; - ydot[yistart + IDX_HNOII] = 0.0 - - k[626]*y_cur[IDX_NOI]*y_cur[IDX_HNOII] - - k[1121]*y_cur[IDX_HNOII]*y_cur[IDX_eM] - - k[1460]*y_cur[IDX_C2I]*y_cur[IDX_HNOII] - - k[1747]*y_cur[IDX_C2HI]*y_cur[IDX_HNOII] - - k[1907]*y_cur[IDX_CI]*y_cur[IDX_HNOII] - - k[2009]*y_cur[IDX_CH2I]*y_cur[IDX_HNOII] - - k[2202]*y_cur[IDX_CH4I]*y_cur[IDX_HNOII] - - k[2254]*y_cur[IDX_CHI]*y_cur[IDX_HNOII] - - k[2278]*y_cur[IDX_CNI]*y_cur[IDX_HNOII] - - k[2286]*y_cur[IDX_COI]*y_cur[IDX_HNOII] + - k[2394]*y_cur[IDX_H2II]*y_cur[IDX_NOI] - - k[2497]*y_cur[IDX_H2COI]*y_cur[IDX_HNOII] - - k[2550]*y_cur[IDX_H2OI]*y_cur[IDX_HNOII] + - k[2726]*y_cur[IDX_H3II]*y_cur[IDX_NOI] - - k[2878]*y_cur[IDX_HCNI]*y_cur[IDX_HNOII] - - k[3008]*y_cur[IDX_HCOI]*y_cur[IDX_HNOII] - - k[3042]*y_cur[IDX_HNCI]*y_cur[IDX_HNOII] - - k[3049]*y_cur[IDX_HNOII]*y_cur[IDX_CO2I] - - k[3050]*y_cur[IDX_HNOII]*y_cur[IDX_SI] - - k[3366]*y_cur[IDX_N2I]*y_cur[IDX_HNOII] + - k[3457]*y_cur[IDX_NI]*y_cur[IDX_H2OII] + - k[3483]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] + - k[3490]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + - k[3525]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - - k[3543]*y_cur[IDX_NH2I]*y_cur[IDX_HNOII] - - k[3588]*y_cur[IDX_NH3I]*y_cur[IDX_HNOII] - - k[3615]*y_cur[IDX_NHI]*y_cur[IDX_HNOII] + - k[3620]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + - k[3627]*y_cur[IDX_NOI]*y_cur[IDX_O2HII] - - k[3740]*y_cur[IDX_OI]*y_cur[IDX_HNOII] + - k[3746]*y_cur[IDX_OI]*y_cur[IDX_NH2II] + - k[3747]*y_cur[IDX_OI]*y_cur[IDX_NH3II] + - k[3787]*y_cur[IDX_OHII]*y_cur[IDX_NOI] - - k[3803]*y_cur[IDX_OHI]*y_cur[IDX_HNOII] - - k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HNSII] = 0.0 - - k[1122]*y_cur[IDX_HNSII]*y_cur[IDX_eM] + - k[2727]*y_cur[IDX_H3II]*y_cur[IDX_NSI] + - k[2981]*y_cur[IDX_HCOII]*y_cur[IDX_NSI] + - k[3526]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - - k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HNSiI] = 0.0 - - k[394]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] + - k[1264]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] - - k[1414]*y_cur[IDX_CII]*y_cur[IDX_HNSiI] - - k[2350]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] - - k[2710]*y_cur[IDX_H3II]*y_cur[IDX_HNSiI] - - k[2811]*y_cur[IDX_H3OII]*y_cur[IDX_HNSiI] - - k[2974]*y_cur[IDX_HCOII]*y_cur[IDX_HNSiI] - - k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] + - k[5294]*y_cur[IDX_NI]*y_cur[IDX_SiH2I] + - k[5295]*y_cur[IDX_NI]*y_cur[IDX_SiH3I] - k[5870]*y_cur[IDX_HNSiI] - - k[6201]*y_cur[IDX_HNSiI] + - k[6552]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] - - k[6967]*y_cur[IDX_HNSiI] + k[7149]*y_cur[IDX_GHNSiI] + - k[7331]*y_cur[IDX_GHNSiI] + k[7513]*y_cur[IDX_GHNSiI]; - ydot[yistart + IDX_HNSiII] = 0.0 + - k[394]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] - - k[1123]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] - - k[1124]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] - - k[2287]*y_cur[IDX_COI]*y_cur[IDX_HNSiII] - - k[2455]*y_cur[IDX_H2I]*y_cur[IDX_HNSiII] - - k[2551]*y_cur[IDX_H2OI]*y_cur[IDX_HNSiII] + - k[2757]*y_cur[IDX_H3II]*y_cur[IDX_SiNI] + - k[3472]*y_cur[IDX_NI]*y_cur[IDX_SiH2II] + - k[3473]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - - k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] - - k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HOCII] = 0.0 - - k[137]*y_cur[IDX_H2I]*y_cur[IDX_HOCII] - - k[1125]*y_cur[IDX_HOCII]*y_cur[IDX_eM] + - k[1394]*y_cur[IDX_CII]*y_cur[IDX_H2OI] + - k[2435]*y_cur[IDX_H2I]*y_cur[IDX_COII] + - k[2676]*y_cur[IDX_H3II]*y_cur[IDX_COI] - - k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HOCNI] = 0.0 + - k[1016]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + - k[1119]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] - - k[2351]*y_cur[IDX_HII]*y_cur[IDX_HOCNI] - - k[2711]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] - - k[2712]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] - - k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] + - k[4887]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] - - k[5215]*y_cur[IDX_HOCNI]*y_cur[IDX_CI] - - k[5216]*y_cur[IDX_HOCNI]*y_cur[IDX_OI] - k[5871]*y_cur[IDX_HOCNI] - - k[6202]*y_cur[IDX_HOCNI] + - k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + - k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - - k[6969]*y_cur[IDX_HOCNI] + k[7151]*y_cur[IDX_GHOCNI] + - k[7333]*y_cur[IDX_GHOCNI] + k[7515]*y_cur[IDX_GHOCNI] + - k[8623]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI]; - ydot[yistart + IDX_HOCNII] = 0.0 - - k[1126]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] - - k[1127]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] - - k[3051]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - - k[3052]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] + - k[3766]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + - k[3768]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - - k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] - - k[6525]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HOCSII] = 0.0 - - k[1128]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] - - k[1129]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] + - k[1971]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] + - k[2096]*y_cur[IDX_CH3II]*y_cur[IDX_SOI] + - k[2145]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - - k[2552]*y_cur[IDX_H2OI]*y_cur[IDX_HOCSII] + - k[2732]*y_cur[IDX_H3II]*y_cur[IDX_OCSI] + - k[2982]*y_cur[IDX_HCOII]*y_cur[IDX_OCSI] - - k[6717]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] - - k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HONCI] = 0.0 - - k[522]*y_cur[IDX_HeII]*y_cur[IDX_HONCI] + - k[1096]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] - - k[2352]*y_cur[IDX_HII]*y_cur[IDX_HONCI] - - k[2713]*y_cur[IDX_H3II]*y_cur[IDX_HONCI] - - k[5217]*y_cur[IDX_HONCI]*y_cur[IDX_CI] - - k[5218]*y_cur[IDX_HONCI]*y_cur[IDX_OI] - k[5872]*y_cur[IDX_HONCI] - - k[6203]*y_cur[IDX_HONCI] + - k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - - k[6973]*y_cur[IDX_HONCI] + k[7155]*y_cur[IDX_GHONCI] + - k[7337]*y_cur[IDX_GHONCI] + k[7519]*y_cur[IDX_GHONCI] + - k[8622]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI]; - ydot[yistart + IDX_HONCII] = 0.0 + - k[522]*y_cur[IDX_HeII]*y_cur[IDX_HONCI] - - k[1130]*y_cur[IDX_HONCII]*y_cur[IDX_eM] - - k[1131]*y_cur[IDX_HONCII]*y_cur[IDX_eM] + - k[2673]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - - k[3053]*y_cur[IDX_HONCII]*y_cur[IDX_H2I] - - k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] - - k[6521]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HPNII] = 0.0 - - k[1132]*y_cur[IDX_HPNII]*y_cur[IDX_eM] - - k[1133]*y_cur[IDX_HPNII]*y_cur[IDX_eM] - + k[5423]*y_cur[IDX_OI]*y_cur[IDX_NO2I] + + k[5477]*y_cur[IDX_OHI]*y_cur[IDX_NOI] - k[5890]*y_cur[IDX_NO2I] - + k[6226]*y_cur[IDX_NO2I] - k[6227]*y_cur[IDX_NO2I] - + k[6985]*y_cur[IDX_NO2I] + k[7167]*y_cur[IDX_GNO2I] + + k[7349]*y_cur[IDX_GNO2I] + k[7531]*y_cur[IDX_GNO2I]; + ydot[yistart + IDX_PH2I] = 0.0 - + k[410]*y_cur[IDX_HII]*y_cur[IDX_PH2I] + + k[1209]*y_cur[IDX_PH3II]*y_cur[IDX_eM] + + k[2131]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH3II] - + k[2735]*y_cur[IDX_H3II]*y_cur[IDX_PH2I] - + k[2984]*y_cur[IDX_HCOII]*y_cur[IDX_PH2I] - + k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] + + k[3601]*y_cur[IDX_NH3I]*y_cur[IDX_PH3II] + + k[3819]*y_cur[IDX_PH3II]*y_cur[IDX_H2SI] + + k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] - + k[5433]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - + k[5434]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - + k[5435]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - k[5907]*y_cur[IDX_PH2I] - + k[6247]*y_cur[IDX_PH2I] - k[6248]*y_cur[IDX_PH2I] + + k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] - k[6939]*y_cur[IDX_PH2I] + + k[7121]*y_cur[IDX_GPH2I] + k[7303]*y_cur[IDX_GPH2I] + + k[7485]*y_cur[IDX_GPH2I]; + ydot[yistart + IDX_PNI] = 0.0 + k[249]*y_cur[IDX_CI]*y_cur[IDX_PNII] + - k[412]*y_cur[IDX_HII]*y_cur[IDX_PNI] + k[1134]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + - k[2737]*y_cur[IDX_H3II]*y_cur[IDX_PNI] + - k[2816]*y_cur[IDX_H3OII]*y_cur[IDX_PNI] + + k[1214]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + + k[1217]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - + k[2737]*y_cur[IDX_H3II]*y_cur[IDX_PNI] - + k[2816]*y_cur[IDX_H3OII]*y_cur[IDX_PNI] - k[2986]*y_cur[IDX_HCOII]*y_cur[IDX_PNI] - - k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - - k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - - k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HPOI] = 0.0 - - k[181]*y_cur[IDX_CII]*y_cur[IDX_HPOI] - - k[395]*y_cur[IDX_HII]*y_cur[IDX_HPOI] + - k[1017]*y_cur[IDX_H2POII]*y_cur[IDX_eM] - - k[2714]*y_cur[IDX_H3II]*y_cur[IDX_HPOI] - - k[2812]*y_cur[IDX_H3OII]*y_cur[IDX_HPOI] - - k[2975]*y_cur[IDX_HCOII]*y_cur[IDX_HPOI] - - k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - - k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - - k[4964]*y_cur[IDX_CI]*y_cur[IDX_HPOI] - - k[5414]*y_cur[IDX_OI]*y_cur[IDX_HPOI] + - k[5433]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - k[5873]*y_cur[IDX_HPOI] - - k[6204]*y_cur[IDX_HPOI] + - k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] - - k[6993]*y_cur[IDX_HPOI] + k[7175]*y_cur[IDX_GHPOI] + - k[7357]*y_cur[IDX_GHPOI] + k[7539]*y_cur[IDX_GHPOI]; - ydot[yistart + IDX_HPOII] = 0.0 + - k[181]*y_cur[IDX_CII]*y_cur[IDX_HPOI] + - k[395]*y_cur[IDX_HII]*y_cur[IDX_HPOI] - - k[1135]*y_cur[IDX_HPOII]*y_cur[IDX_eM] - - k[1136]*y_cur[IDX_HPOII]*y_cur[IDX_eM] - - k[1137]*y_cur[IDX_HPOII]*y_cur[IDX_eM] - - k[2553]*y_cur[IDX_H2OI]*y_cur[IDX_HPOII] + - k[2562]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + - k[2565]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + - k[2738]*y_cur[IDX_H3II]*y_cur[IDX_POI] + - k[2815]*y_cur[IDX_H3OII]*y_cur[IDX_PI] + - k[2987]*y_cur[IDX_HCOII]*y_cur[IDX_POI] - - k[3741]*y_cur[IDX_OI]*y_cur[IDX_HPOII] + - k[3810]*y_cur[IDX_PII]*y_cur[IDX_CH3OHI] - - k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - - k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - - k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HSI] = 0.0 + k[109]*y_cur[IDX_HI]*y_cur[IDX_SM] - - k[397]*y_cur[IDX_HII]*y_cur[IDX_HSI] + - k[505]*y_cur[IDX_HSII]*y_cur[IDX_FeI] + - k[534]*y_cur[IDX_MgI]*y_cur[IDX_HSII] + - k[609]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] + - k[627]*y_cur[IDX_NOI]*y_cur[IDX_HSII] + - k[638]*y_cur[IDX_NaI]*y_cur[IDX_HSII] + - k[710]*y_cur[IDX_SI]*y_cur[IDX_HSII] + - k[720]*y_cur[IDX_SiI]*y_cur[IDX_HSII] + - k[1019]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + - k[1022]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + - k[1022]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + - k[1046]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1047]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1139]*y_cur[IDX_HS2II]*y_cur[IDX_eM] + - k[1147]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] - - k[1415]*y_cur[IDX_CII]*y_cur[IDX_HSI] + - k[1519]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + - k[1715]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - - k[2084]*y_cur[IDX_CH3II]*y_cur[IDX_HSI] + - k[2281]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - - k[2353]*y_cur[IDX_HII]*y_cur[IDX_HSI] + - k[2501]*y_cur[IDX_H2COI]*y_cur[IDX_SII] + - k[2511]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + - k[2544]*y_cur[IDX_H2OI]*y_cur[IDX_H2SII] + - k[2574]*y_cur[IDX_H2SII]*y_cur[IDX_H2SI] + - k[2581]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] - - k[2716]*y_cur[IDX_H3II]*y_cur[IDX_HSI] + - k[2849]*y_cur[IDX_HI]*y_cur[IDX_SiSII] - - k[2977]*y_cur[IDX_HCOII]*y_cur[IDX_HSI] + - k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + - k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - - k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] + - k[3348]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + - k[3517]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + - k[3551]*y_cur[IDX_NH3II]*y_cur[IDX_H2SI] + - k[3576]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] + - k[3823]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + - k[3830]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + - k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - - k[4965]*y_cur[IDX_CI]*y_cur[IDX_HSI] - - k[4966]*y_cur[IDX_CI]*y_cur[IDX_HSI] + - k[5032]*y_cur[IDX_CH3I]*y_cur[IDX_H2SI] + - k[5062]*y_cur[IDX_CH4I]*y_cur[IDX_SI] + - k[5101]*y_cur[IDX_CHI]*y_cur[IDX_SI] + - k[5102]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - - k[5140]*y_cur[IDX_H2I]*y_cur[IDX_HSI] + - k[5149]*y_cur[IDX_H2I]*y_cur[IDX_SI] + - k[5169]*y_cur[IDX_HI]*y_cur[IDX_H2SI] - - k[5178]*y_cur[IDX_HI]*y_cur[IDX_HSI] + - k[5188]*y_cur[IDX_HI]*y_cur[IDX_NSI] + - k[5197]*y_cur[IDX_HI]*y_cur[IDX_OCSI] + - k[5199]*y_cur[IDX_HI]*y_cur[IDX_S2I] + - k[5200]*y_cur[IDX_HI]*y_cur[IDX_SOI] - - k[5219]*y_cur[IDX_HSI]*y_cur[IDX_HSI] - - k[5219]*y_cur[IDX_HSI]*y_cur[IDX_HSI] - - k[5271]*y_cur[IDX_NI]*y_cur[IDX_HSI] - - k[5272]*y_cur[IDX_NI]*y_cur[IDX_HSI] + - k[5324]*y_cur[IDX_NHI]*y_cur[IDX_SI] + - k[5400]*y_cur[IDX_OI]*y_cur[IDX_H2SI] + + k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] + + k[5285]*y_cur[IDX_NI]*y_cur[IDX_PHI] - + k[5286]*y_cur[IDX_NI]*y_cur[IDX_PNI] + + k[5288]*y_cur[IDX_NI]*y_cur[IDX_POI] - k[5909]*y_cur[IDX_PNI] - + k[6250]*y_cur[IDX_PNI] + k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + + k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + + k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - k[6982]*y_cur[IDX_PNI] + + k[7164]*y_cur[IDX_GPNI] + k[7346]*y_cur[IDX_GPNI] + + k[7528]*y_cur[IDX_GPNI]; + ydot[yistart + IDX_SiC2HI] = 0.0 - + k[196]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] - + k[421]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] + + k[1229]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + + k[1231]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] - + k[1432]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] - + k[2358]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - + k[2746]*y_cur[IDX_H3II]*y_cur[IDX_SiC2HI] - + k[2820]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2HI] - + k[2993]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2HI] - + k[3310]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] - + k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + + k[4880]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - k[5920]*y_cur[IDX_SiC2HI] + + k[6261]*y_cur[IDX_SiC2H2I] - k[6262]*y_cur[IDX_SiC2HI] + + k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + + k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - + k[7008]*y_cur[IDX_SiC2HI] + k[7190]*y_cur[IDX_GSiC2HI] + + k[7372]*y_cur[IDX_GSiC2HI] + k[7554]*y_cur[IDX_GSiC2HI]; + ydot[yistart + IDX_SiC3I] = 0.0 - + k[197]*y_cur[IDX_CII]*y_cur[IDX_SiC3I] - + k[422]*y_cur[IDX_HII]*y_cur[IDX_SiC3I] + + k[1235]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] + + k[1236]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] + + k[1239]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] + + k[1240]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] - + k[2747]*y_cur[IDX_H3II]*y_cur[IDX_SiC3I] - + k[2994]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3I] - + k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] - + k[5441]*y_cur[IDX_OI]*y_cur[IDX_SiC3I] + + k[5442]*y_cur[IDX_OI]*y_cur[IDX_SiC4I] - k[5921]*y_cur[IDX_SiC3I] + + k[5922]*y_cur[IDX_SiC3HI] - k[6263]*y_cur[IDX_SiC3I] - + k[6264]*y_cur[IDX_SiC3I] + k[6265]*y_cur[IDX_SiC3HI] + + k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + + k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + + k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + + k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - + k[7031]*y_cur[IDX_SiC3I] + k[7213]*y_cur[IDX_GSiC3I] + + k[7395]*y_cur[IDX_GSiC3I] + k[7577]*y_cur[IDX_GSiC3I]; + ydot[yistart + IDX_C4PI] = 0.0 - + k[341]*y_cur[IDX_HII]*y_cur[IDX_C4PI] + + k[1194]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - + k[1321]*y_cur[IDX_CII]*y_cur[IDX_C4PI] - + k[2611]*y_cur[IDX_H3II]*y_cur[IDX_C4PI] - + k[2781]*y_cur[IDX_H3OII]*y_cur[IDX_C4PI] - + k[2916]*y_cur[IDX_HCOII]*y_cur[IDX_C4PI] - + k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - + k[3114]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - + k[5364]*y_cur[IDX_OI]*y_cur[IDX_C4PI] - k[5734]*y_cur[IDX_C4PI] - + k[6020]*y_cur[IDX_C4PI] + + k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[7048]*y_cur[IDX_C4PI] + k[7230]*y_cur[IDX_GC4PI] + + k[7412]*y_cur[IDX_GC4PI] + k[7594]*y_cur[IDX_GC4PI]; + ydot[yistart + IDX_C7II] = 0.0 + + k[349]*y_cur[IDX_HII]*y_cur[IDX_C7I] - + k[863]*y_cur[IDX_C7II]*y_cur[IDX_eM] - + k[864]*y_cur[IDX_C7II]*y_cur[IDX_eM] - + k[865]*y_cur[IDX_C7II]*y_cur[IDX_eM] + + k[1326]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] + + k[1331]*y_cur[IDX_CII]*y_cur[IDX_C6HI] + + k[1822]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] + + k[1872]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] + + k[2309]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - + k[2419]*y_cur[IDX_H2I]*y_cur[IDX_C7II] + + k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + + k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + + k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + + k[5499]*y_cur[IDX_CII]*y_cur[IDX_C6I] + k[6043]*y_cur[IDX_C7I] - + k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - + k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - + k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2CNI] = 0.0 - + k[163]*y_cur[IDX_CII]*y_cur[IDX_CH2CNI] - + k[361]*y_cur[IDX_HII]*y_cur[IDX_CH2CNI] + + k[771]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + + k[944]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] + + k[2283]*y_cur[IDX_COI]*y_cur[IDX_CH3CNII] - + k[2638]*y_cur[IDX_H3II]*y_cur[IDX_CH2CNI] - + k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] - + k[4948]*y_cur[IDX_CI]*y_cur[IDX_CH2CNI] + + k[5224]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - k[5788]*y_cur[IDX_CH2CNI] - + k[6090]*y_cur[IDX_CH2CNI] + + k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + + k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - + k[6953]*y_cur[IDX_CH2CNI] + k[7135]*y_cur[IDX_GCH2CNI] + + k[7317]*y_cur[IDX_GCH2CNI] + k[7499]*y_cur[IDX_GCH2CNI] + + k[8617]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] + + k[8747]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI]; + ydot[yistart + IDX_CH3C4HII] = 0.0 + + k[363]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] - + k[929]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] - + k[930]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] + + k[1508]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + + k[1510]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + + k[1582]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + + k[1610]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + + k[1618]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + + k[1630]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + + k[1631]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H3II] + + k[1643]*y_cur[IDX_C2H3I]*y_cur[IDX_CH2CCHII] + + k[1652]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] + + k[2107]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] + + k[2170]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + + k[3424]*y_cur[IDX_NI]*y_cur[IDX_C6H5II] - + k[3455]*y_cur[IDX_NI]*y_cur[IDX_CH3C4HII] - + k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] - + k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GCH4I] = 0.0 + k[6898]*y_cur[IDX_CH4I] - + k[7080]*y_cur[IDX_GCH4I] - k[7262]*y_cur[IDX_GCH4I] - + k[7444]*y_cur[IDX_GCH4I] - k[7633]*y_cur[IDX_GCH4I] + + k[7674]*y_cur[IDX_GC2H4I] + k[7760]*y_cur[IDX_GCH3CHOI] + + k[7769]*y_cur[IDX_GCH3OCH3I] + k[7774]*y_cur[IDX_GC2H5OHI] + + k[7818]*y_cur[IDX_GCH3COCH3I] + k[7824]*y_cur[IDX_GHCOOCH3I] - + k[7910]*y_cur[IDX_GCH4I] - k[7911]*y_cur[IDX_GCH4I] - + k[7912]*y_cur[IDX_GCH4I] - k[7913]*y_cur[IDX_GCH4I] - + k[7914]*y_cur[IDX_GCH4I] + k[7961]*y_cur[IDX_GC2H4I] + + k[8078]*y_cur[IDX_GCH3CHOI] + k[8089]*y_cur[IDX_GCH3OCH3I] + + k[8094]*y_cur[IDX_GC2H5OHI] + + k[8277]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] - + k[8278]*y_cur[IDX_GHI]*y_cur[IDX_GCH4I] + + k[8333]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + + k[8371]*y_cur[IDX_GH2I]*y_cur[IDX_GCH3I] + + k[8541]*y_cur[IDX_GCH3I]*y_cur[IDX_GHNOI] + + k[8544]*y_cur[IDX_GCH3I]*y_cur[IDX_GH2COI] + + k[8547]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] + + k[8550]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOHI] + + k[8555]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOCH3I] + + k[8556]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - + k[8575]*y_cur[IDX_GC2HI]*y_cur[IDX_GCH4I]; + ydot[yistart + IDX_HCPI] = 0.0 - + k[180]*y_cur[IDX_CII]*y_cur[IDX_HCPI] - + k[391]*y_cur[IDX_HII]*y_cur[IDX_HCPI] + + k[1198]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + + k[1200]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + + k[1203]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] - + k[1409]*y_cur[IDX_CII]*y_cur[IDX_HCPI] - + k[2701]*y_cur[IDX_H3II]*y_cur[IDX_HCPI] - + k[2808]*y_cur[IDX_H3OII]*y_cur[IDX_HCPI] - + k[2972]*y_cur[IDX_HCOII]*y_cur[IDX_HCPI] - + k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] - + k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + + k[5401]*y_cur[IDX_OI]*y_cur[IDX_HC2PI] - + k[5407]*y_cur[IDX_OI]*y_cur[IDX_HCPI] + k[5792]*y_cur[IDX_CH2PHI] - + k[5861]*y_cur[IDX_HCPI] - k[6189]*y_cur[IDX_HCPI] + + k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + + k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - + k[6976]*y_cur[IDX_HCPI] + k[7158]*y_cur[IDX_GHCPI] + + k[7340]*y_cur[IDX_GHCPI] + k[7522]*y_cur[IDX_GHCPI]; + ydot[yistart + IDX_HClI] = 0.0 - + k[393]*y_cur[IDX_HII]*y_cur[IDX_HClI] + + k[1003]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] - + k[1411]*y_cur[IDX_CII]*y_cur[IDX_HClI] - + k[2083]*y_cur[IDX_CH3II]*y_cur[IDX_HClI] - + k[2231]*y_cur[IDX_CH5II]*y_cur[IDX_HClI] + + k[2284]*y_cur[IDX_COI]*y_cur[IDX_H2ClII] + + k[2543]*y_cur[IDX_H2OI]*y_cur[IDX_H2ClII] - + k[2704]*y_cur[IDX_H3II]*y_cur[IDX_HClI] - + k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] + + k[3566]*y_cur[IDX_NH3I]*y_cur[IDX_CClII] + + k[5132]*y_cur[IDX_ClI]*y_cur[IDX_H2I] - + k[5211]*y_cur[IDX_HClI]*y_cur[IDX_HI] - k[5864]*y_cur[IDX_HClI] - + k[6194]*y_cur[IDX_HClI] - k[6195]*y_cur[IDX_HClI] + + k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] - + k[6944]*y_cur[IDX_HClI] + k[7126]*y_cur[IDX_GHClI] + + k[7308]*y_cur[IDX_GHClI] + k[7490]*y_cur[IDX_GHClI] + + k[8609]*y_cur[IDX_GHI]*y_cur[IDX_GClI]; + ydot[yistart + IDX_HNCOI] = 0.0 - + k[521]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + + k[1008]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + + k[1118]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] - + k[2348]*y_cur[IDX_HII]*y_cur[IDX_HNCOI] - + k[2707]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] - + k[2708]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] - + k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + + k[4886]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] + + k[5006]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - + k[5214]*y_cur[IDX_HNCOI]*y_cur[IDX_CI] - k[5868]*y_cur[IDX_HNCOI] - + k[6199]*y_cur[IDX_HNCOI] + + k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + + k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - + k[6968]*y_cur[IDX_HNCOI] + k[7150]*y_cur[IDX_GHNCOI] + + k[7332]*y_cur[IDX_GHNCOI] + k[7514]*y_cur[IDX_GHNCOI] + + k[8624]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] + + k[8744]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_C3PI] = 0.0 + + k[833]*y_cur[IDX_C4PII]*y_cur[IDX_eM] + + k[1190]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + + k[1193]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - + k[1315]*y_cur[IDX_CII]*y_cur[IDX_C3PI] - + k[2606]*y_cur[IDX_H3II]*y_cur[IDX_C3PI] - + k[2776]*y_cur[IDX_H3OII]*y_cur[IDX_C3PI] - + k[2911]*y_cur[IDX_HCOII]*y_cur[IDX_C3PI] - + k[3101]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] - + k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] - + k[5360]*y_cur[IDX_OI]*y_cur[IDX_C3PI] + + k[5364]*y_cur[IDX_OI]*y_cur[IDX_C4PI] - k[5724]*y_cur[IDX_C3PI] + + k[5734]*y_cur[IDX_C4PI] - k[6008]*y_cur[IDX_C3PI] + + k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + + k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + + k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[7039]*y_cur[IDX_C3PI] + k[7221]*y_cur[IDX_GC3PI] + + k[7403]*y_cur[IDX_GC3PI] + k[7585]*y_cur[IDX_GC3PI]; + ydot[yistart + IDX_C9NI] = 0.0 + k[120]*y_cur[IDX_NI]*y_cur[IDX_C9M] + + k[991]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + + k[1032]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + + k[1087]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] - + k[2631]*y_cur[IDX_H3II]*y_cur[IDX_C9NI] - + k[2936]*y_cur[IDX_HCOII]*y_cur[IDX_C9NI] - + k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] - + k[4943]*y_cur[IDX_CI]*y_cur[IDX_C9NI] + + k[5251]*y_cur[IDX_NI]*y_cur[IDX_C9HI] - + k[5252]*y_cur[IDX_NI]*y_cur[IDX_C9NI] - + k[5377]*y_cur[IDX_OI]*y_cur[IDX_C9NI] - k[5771]*y_cur[IDX_C9NI] - + k[6067]*y_cur[IDX_C9NI] - k[6068]*y_cur[IDX_C9NI] + + k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] + + k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + + k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - + k[7066]*y_cur[IDX_C9NI] + k[7248]*y_cur[IDX_GC9NI] + + k[7430]*y_cur[IDX_GC9NI] + k[7612]*y_cur[IDX_GC9NI] + + k[8711]*y_cur[IDX_GNI]*y_cur[IDX_GC9I]; + ydot[yistart + IDX_CH3C4HI] = 0.0 - + k[363]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] + + k[846]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] - + k[1356]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - + k[1357]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - + k[1358]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - + k[2321]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] - + k[2643]*y_cur[IDX_H3II]*y_cur[IDX_CH3C4HI] - + k[2944]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C4HI] - + k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - + k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + + k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] + + k[4894]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] + + k[4895]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] + + k[4896]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] + + k[4897]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] - + k[4950]*y_cur[IDX_CI]*y_cur[IDX_CH3C4HI] - + k[5797]*y_cur[IDX_CH3C4HI] - k[6101]*y_cur[IDX_CH3C4HI] + + k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - + k[7034]*y_cur[IDX_CH3C4HI] + k[7216]*y_cur[IDX_GCH3C4HI] + + k[7398]*y_cur[IDX_GCH3C4HI] + k[7580]*y_cur[IDX_GCH3C4HI]; + ydot[yistart + IDX_CH3COOHI] = 0.0 + + k[1296]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[5667]*y_cur[IDX_CII]*y_cur[IDX_CH3COOHI] - + k[5668]*y_cur[IDX_H3II]*y_cur[IDX_CH3COOHI] - + k[5669]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COOHI] - + k[5670]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COOHI] - + k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5674]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5946]*y_cur[IDX_CH3COOHI] - k[5947]*y_cur[IDX_CH3COOHI] - + k[6296]*y_cur[IDX_CH3COOHI] - k[6297]*y_cur[IDX_CH3COOHI] + + k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[7027]*y_cur[IDX_CH3COOHI] + k[7209]*y_cur[IDX_GCH3COOHI] + + k[7391]*y_cur[IDX_GCH3COOHI] + k[7566]*y_cur[IDX_GCH3COOHI] + + k[8742]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] + + k[8755]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI]; + ydot[yistart + IDX_CH3OCH3I] = 0.0 - + k[169]*y_cur[IDX_CII]*y_cur[IDX_CH3OCH3I] - + k[369]*y_cur[IDX_HII]*y_cur[IDX_CH3OCH3I] - + k[671]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] - + k[714]*y_cur[IDX_SOII]*y_cur[IDX_CH3OCH3I] + + k[958]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] - + k[2072]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OCH3I] - + k[2666]*y_cur[IDX_H3II]*y_cur[IDX_CH3OCH3I] - + k[2794]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OCH3I] - + k[2953]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OCH3I] - + k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] - + k[3664]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] - + k[5814]*y_cur[IDX_CH3OCH3I] - k[5815]*y_cur[IDX_CH3OCH3I] - + k[6118]*y_cur[IDX_CH3OCH3I] - k[6119]*y_cur[IDX_CH3OCH3I] + + k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - + k[6983]*y_cur[IDX_CH3OCH3I] + k[7165]*y_cur[IDX_GCH3OCH3I] + + k[7347]*y_cur[IDX_GCH3OCH3I] + k[7529]*y_cur[IDX_GCH3OCH3I] + + k[8752]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI]; + ydot[yistart + IDX_GC2HI] = 0.0 + k[6908]*y_cur[IDX_C2HI] - + k[7090]*y_cur[IDX_GC2HI] - k[7272]*y_cur[IDX_GC2HI] - + k[7454]*y_cur[IDX_GC2HI] - k[7642]*y_cur[IDX_GC2HI] - + k[7643]*y_cur[IDX_GC2HI] - k[7644]*y_cur[IDX_GC2HI] + + k[7645]*y_cur[IDX_GC2H2I] + k[7647]*y_cur[IDX_GC2H2I] + + k[7657]*y_cur[IDX_GC2H3I] + k[7658]*y_cur[IDX_GC2H3I] + + k[7659]*y_cur[IDX_GC2H3I] + k[7660]*y_cur[IDX_GC2H3I] + + k[7671]*y_cur[IDX_GC2H4I] + k[7724]*y_cur[IDX_GCH2CCH2I] + + k[7732]*y_cur[IDX_GCH3CCHI] + k[7788]*y_cur[IDX_GC4HI] + + k[7791]*y_cur[IDX_GC4H2I] + k[7791]*y_cur[IDX_GC4H2I] + + k[7793]*y_cur[IDX_GC4H2I] + k[7793]*y_cur[IDX_GC4H2I] + + k[7797]*y_cur[IDX_GHNC3I] + k[7798]*y_cur[IDX_GHC3NI] + + k[7833]*y_cur[IDX_GC5HI] + k[7837]*y_cur[IDX_GC5H2I] + + k[7851]*y_cur[IDX_GC6HI] + k[7853]*y_cur[IDX_GC6H2I] - + k[7929]*y_cur[IDX_GC2HI] - k[7930]*y_cur[IDX_GC2HI] - + k[7931]*y_cur[IDX_GC2HI] + k[7932]*y_cur[IDX_GC2H2I] + + k[7934]*y_cur[IDX_GC2H2I] + k[7944]*y_cur[IDX_GC2H3I] + + k[7945]*y_cur[IDX_GC2H3I] + k[7946]*y_cur[IDX_GC2H3I] + + k[7947]*y_cur[IDX_GC2H3I] + k[7958]*y_cur[IDX_GC2H4I] + + k[8032]*y_cur[IDX_GCH2CCH2I] + k[8041]*y_cur[IDX_GCH3CCHI] + + k[8112]*y_cur[IDX_GC4HI] + k[8115]*y_cur[IDX_GC4H2I] + + k[8115]*y_cur[IDX_GC4H2I] + k[8117]*y_cur[IDX_GC4H2I] + + k[8117]*y_cur[IDX_GC4H2I] + k[8123]*y_cur[IDX_GHC3NI] + + k[8157]*y_cur[IDX_GC5HI] + k[8162]*y_cur[IDX_GC5H2I] + + k[8182]*y_cur[IDX_GC6HI] + k[8285]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - + k[8286]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] + + k[8374]*y_cur[IDX_GH2I]*y_cur[IDX_GC2I] - + k[8375]*y_cur[IDX_GH2I]*y_cur[IDX_GC2HI] + + k[8395]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - + k[8411]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - + k[8487]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI] - + k[8575]*y_cur[IDX_GC2HI]*y_cur[IDX_GCH4I] - + k[8587]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] - + k[8663]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - + k[8720]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI]; + ydot[yistart + IDX_GNH2I] = 0.0 + k[6897]*y_cur[IDX_NH2I] - + k[7079]*y_cur[IDX_GNH2I] - k[7261]*y_cur[IDX_GNH2I] - + k[7443]*y_cur[IDX_GNH2I] - k[7630]*y_cur[IDX_GNH2I] - + k[7631]*y_cur[IDX_GNH2I] - k[7632]*y_cur[IDX_GNH2I] + + k[7634]*y_cur[IDX_GNH3I] + k[7636]*y_cur[IDX_GNH3I] + + k[7739]*y_cur[IDX_GNH2CNI] - k[7907]*y_cur[IDX_GNH2I] - + k[7908]*y_cur[IDX_GNH2I] - k[7909]*y_cur[IDX_GNH2I] + + k[7915]*y_cur[IDX_GNH3I] + k[7917]*y_cur[IDX_GNH3I] + + k[8050]*y_cur[IDX_GNH2CNI] + k[8280]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] + - k[8281]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] - + k[8372]*y_cur[IDX_GH2I]*y_cur[IDX_GNH2I] - + k[8404]*y_cur[IDX_GCI]*y_cur[IDX_GNH2I] - + k[8440]*y_cur[IDX_GOI]*y_cur[IDX_GNH2I] - + k[8483]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] + + k[8521]*y_cur[IDX_GNHI]*y_cur[IDX_GCH3CHOI] + + k[8522]*y_cur[IDX_GNHI]*y_cur[IDX_GH2COI] + + k[8527]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2OHCHOI] - + k[8530]*y_cur[IDX_GNH2I]*y_cur[IDX_GNOI] - + k[8534]*y_cur[IDX_GNH2I]*y_cur[IDX_GH2COI] - + k[8535]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH3CHOI] - + k[8536]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOHI] - + k[8537]*y_cur[IDX_GNH2I]*y_cur[IDX_GHCOOCH3I] - + k[8538]*y_cur[IDX_GNH2I]*y_cur[IDX_GCH2OHCHOI] - + k[8582]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] - + k[8717]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I]; + ydot[yistart + IDX_H2CSI] = 0.0 - + k[377]*y_cur[IDX_HII]*y_cur[IDX_H2CSI] + + k[1040]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] - + k[1392]*y_cur[IDX_CII]*y_cur[IDX_H2CSI] - + k[2683]*y_cur[IDX_H3II]*y_cur[IDX_H2CSI] - + k[2959]*y_cur[IDX_HCOII]*y_cur[IDX_H2CSI] - + k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - + k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - + k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + + k[3841]*y_cur[IDX_SI]*y_cur[IDX_SiCH2II] + + k[3851]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[5048]*y_cur[IDX_CH3I]*y_cur[IDX_SI] + + k[5617]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] - k[5837]*y_cur[IDX_H2CSI] - + k[6156]*y_cur[IDX_H2CSI] + + k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] - + k[6989]*y_cur[IDX_H2CSI] + k[7171]*y_cur[IDX_GH2CSI] + + k[7353]*y_cur[IDX_GH2CSI] + k[7535]*y_cur[IDX_GH2CSI] + + k[8627]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI]; + ydot[yistart + IDX_PH2II] = 0.0 + + k[410]*y_cur[IDX_HII]*y_cur[IDX_PH2I] - + k[1206]*y_cur[IDX_PH2II]*y_cur[IDX_eM] - + k[1207]*y_cur[IDX_PH2II]*y_cur[IDX_eM] - + k[1208]*y_cur[IDX_PH2II]*y_cur[IDX_eM] - + k[1571]*y_cur[IDX_C2H2I]*y_cur[IDX_PH2II] - + k[1713]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - + k[1714]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - + k[2129]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - + k[2130]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - + k[2214]*y_cur[IDX_CH4I]*y_cur[IDX_PH2II] - + k[2567]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] - + k[2568]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] + + k[2736]*y_cur[IDX_H3II]*y_cur[IDX_PHI] + + k[2985]*y_cur[IDX_HCOII]*y_cur[IDX_PHI] - + k[3599]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - + k[3600]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - + k[3673]*y_cur[IDX_O2I]*y_cur[IDX_PH2II] + + k[5559]*y_cur[IDX_H2I]*y_cur[IDX_PII] + k[6247]*y_cur[IDX_PH2I] - + k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - + k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - + k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_POI] = 0.0 - k[192]*y_cur[IDX_CII]*y_cur[IDX_POI] + - k[413]*y_cur[IDX_HII]*y_cur[IDX_POI] + + k[1137]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + + k[2553]*y_cur[IDX_H2OI]*y_cur[IDX_HPOII] - + k[2738]*y_cur[IDX_H3II]*y_cur[IDX_POI] - + k[2987]*y_cur[IDX_HCOII]*y_cur[IDX_POI] - + k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] - + k[5287]*y_cur[IDX_NI]*y_cur[IDX_POI] - + k[5288]*y_cur[IDX_NI]*y_cur[IDX_POI] + + k[5414]*y_cur[IDX_OI]*y_cur[IDX_HPOI] + + k[5435]*y_cur[IDX_OI]*y_cur[IDX_PH2I] + + k[5436]*y_cur[IDX_OI]*y_cur[IDX_PHI] + + k[5484]*y_cur[IDX_PI]*y_cur[IDX_O2I] + k[5873]*y_cur[IDX_HPOI] - + k[5910]*y_cur[IDX_POI] + k[6204]*y_cur[IDX_HPOI] - + k[6251]*y_cur[IDX_POI] + k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6992]*y_cur[IDX_POI] + k[7174]*y_cur[IDX_GPOI] + + k[7356]*y_cur[IDX_GPOI] + k[7538]*y_cur[IDX_GPOI]; + ydot[yistart + IDX_S2I] = 0.0 - k[414]*y_cur[IDX_HII]*y_cur[IDX_S2I] + + k[630]*y_cur[IDX_NOI]*y_cur[IDX_S2II] + + k[1140]*y_cur[IDX_HS2II]*y_cur[IDX_eM] + + k[2579]*y_cur[IDX_H2SI]*y_cur[IDX_HS2II] - + k[2739]*y_cur[IDX_H3II]*y_cur[IDX_S2I] - + k[2817]*y_cur[IDX_H3OII]*y_cur[IDX_S2I] - + k[2988]*y_cur[IDX_HCOII]*y_cur[IDX_S2I] - + k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] - + k[4984]*y_cur[IDX_CI]*y_cur[IDX_S2I] - + k[5199]*y_cur[IDX_HI]*y_cur[IDX_S2I] - + k[5289]*y_cur[IDX_NI]*y_cur[IDX_S2I] - + k[5437]*y_cur[IDX_OI]*y_cur[IDX_S2I] + + k[5488]*y_cur[IDX_SI]*y_cur[IDX_HSI] + + k[5490]*y_cur[IDX_SI]*y_cur[IDX_SOI] - k[5912]*y_cur[IDX_S2I] - + k[6253]*y_cur[IDX_S2I] - k[6254]*y_cur[IDX_S2I] + + k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] - k[7033]*y_cur[IDX_S2I] + + k[7215]*y_cur[IDX_GS2I] + k[7397]*y_cur[IDX_GS2I] + + k[7579]*y_cur[IDX_GS2I]; + ydot[yistart + IDX_S2II] = 0.0 + + k[414]*y_cur[IDX_HII]*y_cur[IDX_S2I] - + k[630]*y_cur[IDX_NOI]*y_cur[IDX_S2II] - + k[1219]*y_cur[IDX_S2II]*y_cur[IDX_eM] - + k[1724]*y_cur[IDX_C2H5OHI]*y_cur[IDX_S2II] - + k[2112]*y_cur[IDX_C2H6I]*y_cur[IDX_S2II] - + k[2114]*y_cur[IDX_CH3CHOI]*y_cur[IDX_S2II] - + k[2132]*y_cur[IDX_CH3OHI]*y_cur[IDX_S2II] + + k[2582]*y_cur[IDX_H2SI]*y_cur[IDX_SOII] + + k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + + k[3829]*y_cur[IDX_SII]*y_cur[IDX_H2SI] + + k[3833]*y_cur[IDX_SII]*y_cur[IDX_OCSI] + + k[3858]*y_cur[IDX_SOII]*y_cur[IDX_OCSI] + k[6253]*y_cur[IDX_S2I] - + k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiCII] = 0.0 + + k[198]*y_cur[IDX_CII]*y_cur[IDX_SiCI] + + k[425]*y_cur[IDX_HII]*y_cur[IDX_SiCI] + + k[705]*y_cur[IDX_SII]*y_cur[IDX_SiCI] - + k[1223]*y_cur[IDX_SiCII]*y_cur[IDX_eM] + + k[1440]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + + k[1445]*y_cur[IDX_CII]*y_cur[IDX_SiHI] + + k[1446]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + + k[1448]*y_cur[IDX_CII]*y_cur[IDX_SiSI] + + k[1465]*y_cur[IDX_C2I]*y_cur[IDX_SiOII] + + k[1925]*y_cur[IDX_CI]*y_cur[IDX_SiHII] + + k[2266]*y_cur[IDX_CHI]*y_cur[IDX_SiII] + + k[2347]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - + k[2472]*y_cur[IDX_H2I]*y_cur[IDX_SiCII] + + k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] - + k[3469]*y_cur[IDX_NI]*y_cur[IDX_SiCII] - + k[3753]*y_cur[IDX_OI]*y_cur[IDX_SiCII] - + k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3SI] = 0.0 - + k[154]*y_cur[IDX_CII]*y_cur[IDX_C3SI] - + k[337]*y_cur[IDX_HII]*y_cur[IDX_C3SI] + + k[836]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + + k[1072]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + + k[1075]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - + k[1316]*y_cur[IDX_CII]*y_cur[IDX_C3SI] - + k[2607]*y_cur[IDX_H3II]*y_cur[IDX_C3SI] - + k[2777]*y_cur[IDX_H3OII]*y_cur[IDX_C3SI] - + k[2912]*y_cur[IDX_HCOII]*y_cur[IDX_C3SI] - + k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] - + k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + + k[4899]*y_cur[IDX_C2HI]*y_cur[IDX_CSI] - k[5725]*y_cur[IDX_C3SI] - + k[6009]*y_cur[IDX_C3SI] + + k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + + k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + + k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - + k[7040]*y_cur[IDX_C3SI] + k[7222]*y_cur[IDX_GC3SI] + + k[7404]*y_cur[IDX_GC3SI] + k[7586]*y_cur[IDX_GC3SI] + + k[8673]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI]; + ydot[yistart + IDX_C6H5II] = 0.0 - + k[858]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] - + k[859]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + + k[1554]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + + k[1636]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + + k[1697]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] - + k[1704]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H5II] + + k[1775]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1781]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + + k[1806]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + + k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + + k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + + k[2030]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] + + k[2181]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + + k[2834]*y_cur[IDX_HI]*y_cur[IDX_C6H6II] + + k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - + k[3424]*y_cur[IDX_NI]*y_cur[IDX_C6H5II] + + k[5520]*y_cur[IDX_C4H3II]*y_cur[IDX_C2H2I] - + k[5553]*y_cur[IDX_H2I]*y_cur[IDX_C6H5II] - + k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] - + k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2NHI] = 0.0 + + k[921]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] - + k[2317]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - + k[2318]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - + k[2787]*y_cur[IDX_H3OII]*y_cur[IDX_CH2NHI] - + k[2941]*y_cur[IDX_HCOII]*y_cur[IDX_CH2NHI] - + k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] + + k[5082]*y_cur[IDX_CHI]*y_cur[IDX_NH3I] - k[5791]*y_cur[IDX_CH2NHI] - + k[6093]*y_cur[IDX_CH2NHI] + + k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] - + k[6921]*y_cur[IDX_CH2NHI] + k[7103]*y_cur[IDX_GCH2NHI] + + k[7285]*y_cur[IDX_GCH2NHI] + k[7467]*y_cur[IDX_GCH2NHI] + + k[8593]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] + + k[8701]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] + + k[8717]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] + + k[8743]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I]; + ydot[yistart + IDX_CH3OI] = 0.0 + + k[1271]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] - + k[5627]*y_cur[IDX_CII]*y_cur[IDX_CH3OI] - + k[5628]*y_cur[IDX_H3II]*y_cur[IDX_CH3OI] - + k[5629]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OI] - + k[5630]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OI] - + k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] - + k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + + k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + + k[5817]*y_cur[IDX_CH3OHI] - k[5936]*y_cur[IDX_CH3OI] + + k[5943]*y_cur[IDX_COOCH3I] + k[6121]*y_cur[IDX_CH3OHI] - + k[6289]*y_cur[IDX_CH3OI] + k[6293]*y_cur[IDX_COOCH3I] + + k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] - + k[6931]*y_cur[IDX_CH3OI] + k[7113]*y_cur[IDX_GCH3OI] + + k[7295]*y_cur[IDX_GCH3OI] + k[7477]*y_cur[IDX_GCH3OI] + + k[8596]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + + k[8688]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I]; + ydot[yistart + IDX_GHCOI] = 0.0 + k[6919]*y_cur[IDX_HCOI] - + k[7101]*y_cur[IDX_GHCOI] - k[7283]*y_cur[IDX_GHCOI] - + k[7465]*y_cur[IDX_GHCOI] - k[7682]*y_cur[IDX_GHCOI] - + k[7683]*y_cur[IDX_GHCOI] + k[7761]*y_cur[IDX_GCH3CHOI] + + k[7763]*y_cur[IDX_GCH3CHOI] + k[7780]*y_cur[IDX_GHCOOHI] + + k[7890]*y_cur[IDX_GCH2OHCHOI] - k[7969]*y_cur[IDX_GHCOI] - + k[7970]*y_cur[IDX_GHCOI] + k[7987]*y_cur[IDX_GH2COI] + + k[8079]*y_cur[IDX_GCH3CHOI] + k[8081]*y_cur[IDX_GCH3CHOI] + + k[8102]*y_cur[IDX_GHCOOHI] + k[8104]*y_cur[IDX_GHCOOHI] + + k[8270]*y_cur[IDX_GCH2OHCHOI] + + k[8294]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] - + k[8295]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] + + k[8298]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + + k[8333]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + + k[8338]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + + k[8346]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] + + k[8368]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - + k[8434]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + + k[8437]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - + k[8448]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + + k[8485]*y_cur[IDX_GCHI]*y_cur[IDX_GO2I] + + k[8507]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] + + k[8508]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - + k[8517]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] + + k[8522]*y_cur[IDX_GNHI]*y_cur[IDX_GH2COI] + + k[8534]*y_cur[IDX_GNH2I]*y_cur[IDX_GH2COI] - + k[8543]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] + + k[8544]*y_cur[IDX_GCH3I]*y_cur[IDX_GH2COI] + + k[8548]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] + + k[8557]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - + k[8559]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] + + k[8560]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - + k[8569]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI] + + k[8570]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GH2COI] + + k[8571]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] - + k[8595]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] - + k[8740]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] - + k[8751]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] - + k[8759]*y_cur[IDX_GCH3OI]*y_cur[IDX_GHCOI] - + k[8762]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GHCOI]; + ydot[yistart + IDX_HC2PI] = 0.0 - + k[382]*y_cur[IDX_HII]*y_cur[IDX_HC2PI] + + k[1182]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + + k[1185]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + + k[1188]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + + k[1192]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] - + k[1396]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - + k[1397]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - + k[2688]*y_cur[IDX_H3II]*y_cur[IDX_HC2PI] - + k[2803]*y_cur[IDX_H3OII]*y_cur[IDX_HC2PI] - + k[2963]*y_cur[IDX_HCOII]*y_cur[IDX_HC2PI] - + k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - + k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - + k[5401]*y_cur[IDX_OI]*y_cur[IDX_HC2PI] - k[5845]*y_cur[IDX_HC2PI] - + k[6170]*y_cur[IDX_HC2PI] + + k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + + k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + + k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + + k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - + k[7017]*y_cur[IDX_HC2PI] + k[7199]*y_cur[IDX_GHC2PI] + + k[7381]*y_cur[IDX_GHC2PI] + k[7567]*y_cur[IDX_GHC2PI]; + ydot[yistart + IDX_HCSiI] = 0.0 - + k[392]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] + + k[1242]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + + k[1245]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] - + k[1410]*y_cur[IDX_CII]*y_cur[IDX_HCSiI] - + k[2347]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - + k[2703]*y_cur[IDX_H3II]*y_cur[IDX_HCSiI] - + k[2809]*y_cur[IDX_H3OII]*y_cur[IDX_HCSiI] - + k[2973]*y_cur[IDX_HCOII]*y_cur[IDX_HCSiI] - + k[3257]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] - + k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + + k[4988]*y_cur[IDX_CI]*y_cur[IDX_SiH2I] + + k[5021]*y_cur[IDX_CH2I]*y_cur[IDX_SiI] - + k[5410]*y_cur[IDX_OI]*y_cur[IDX_HCSiI] - k[5863]*y_cur[IDX_HCSiI] - + k[6192]*y_cur[IDX_HCSiI] - k[6193]*y_cur[IDX_HCSiI] + + k[6268]*y_cur[IDX_SiCH2I] + + k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[6516]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] - + k[6956]*y_cur[IDX_HCSiI] + k[7138]*y_cur[IDX_GHCSiI] + + k[7320]*y_cur[IDX_GHCSiI] + k[7502]*y_cur[IDX_GHCSiI]; + ydot[yistart + IDX_SiCH2I] = 0.0 - + k[199]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - + k[426]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] + + k[1246]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] + + k[1247]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] - + k[1435]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - + k[1436]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - + k[2360]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] + + k[2570]*y_cur[IDX_H2OI]*y_cur[IDX_SiCH3II] - + k[2751]*y_cur[IDX_H3II]*y_cur[IDX_SiCH2I] - + k[2998]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH2I] - + k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] - + k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + + k[4989]*y_cur[IDX_CI]*y_cur[IDX_SiH3I] + + k[5049]*y_cur[IDX_CH3I]*y_cur[IDX_SiI] - k[5925]*y_cur[IDX_SiCH2I] + + k[5926]*y_cur[IDX_SiCH3I] - k[6268]*y_cur[IDX_SiCH2I] - + k[6269]*y_cur[IDX_SiCH2I] + k[6270]*y_cur[IDX_SiCH3I] + + k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + + k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - + k[6963]*y_cur[IDX_SiCH2I] + k[7145]*y_cur[IDX_GSiCH2I] + + k[7327]*y_cur[IDX_GSiCH2I] + k[7509]*y_cur[IDX_GSiCH2I]; + ydot[yistart + IDX_C10HII] = 0.0 + + k[147]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + + k[322]*y_cur[IDX_HII]*y_cur[IDX_C10HI] + + k[507]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[729]*y_cur[IDX_C10HII]*y_cur[IDX_eM] - + k[730]*y_cur[IDX_C10HII]*y_cur[IDX_eM] - + k[731]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + + k[1339]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] + + k[1505]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - + k[1846]*y_cur[IDX_CI]*y_cur[IDX_C10HII] + + k[1887]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] + + k[1888]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + + k[2294]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] + + k[2399]*y_cur[IDX_H2I]*y_cur[IDX_C10II] - + k[2400]*y_cur[IDX_H2I]*y_cur[IDX_C10HII] + + k[2583]*y_cur[IDX_H3II]*y_cur[IDX_C10I] + + k[2899]*y_cur[IDX_HCOII]*y_cur[IDX_C10I] - + k[3679]*y_cur[IDX_OI]*y_cur[IDX_C10HII] - + k[3680]*y_cur[IDX_OI]*y_cur[IDX_C10HII] + k[5962]*y_cur[IDX_C10HI] - + k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - + k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - + k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HCSiII] = 0.0 + + k[392]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - + k[1109]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] - + k[1110]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + + k[1439]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + + k[1441]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + + k[1926]*y_cur[IDX_CI]*y_cur[IDX_SiH2II] + + k[2018]*y_cur[IDX_CH2I]*y_cur[IDX_SiII] + + k[2097]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] + + k[2102]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + + k[2360]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] - + k[2452]*y_cur[IDX_H2I]*y_cur[IDX_HCSiII] + + k[2472]*y_cur[IDX_H2I]*y_cur[IDX_SiCII] + + k[2750]*y_cur[IDX_H3II]*y_cur[IDX_SiCI] + + k[2821]*y_cur[IDX_H3OII]*y_cur[IDX_SiCI] + + k[2997]*y_cur[IDX_HCOII]*y_cur[IDX_SiCI] + + k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + + k[3792]*y_cur[IDX_OHII]*y_cur[IDX_SiCI] + k[6192]*y_cur[IDX_HCSiI] - + k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] - + k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_OCSII] = 0.0 + + k[189]*y_cur[IDX_CII]*y_cur[IDX_OCSI] + + k[284]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] + + k[314]*y_cur[IDX_CO2II]*y_cur[IDX_OCSI] + + k[407]*y_cur[IDX_HII]*y_cur[IDX_OCSI] + + k[475]*y_cur[IDX_H2OII]*y_cur[IDX_OCSI] - + k[486]*y_cur[IDX_H2SI]*y_cur[IDX_OCSII] + + k[562]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + + k[571]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - + k[612]*y_cur[IDX_NH3I]*y_cur[IDX_OCSII] + + k[663]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - + k[1177]*y_cur[IDX_OCSII]*y_cur[IDX_eM] - + k[1178]*y_cur[IDX_OCSII]*y_cur[IDX_eM] - + k[1179]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + + k[3672]*y_cur[IDX_O2I]*y_cur[IDX_CSII] + + k[3738]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + k[5902]*y_cur[IDX_OCSI] + + k[6240]*y_cur[IDX_OCSI] - k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + - k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] - + k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiC2I] = 0.0 - + k[195]*y_cur[IDX_CII]*y_cur[IDX_SiC2I] - + k[419]*y_cur[IDX_HII]*y_cur[IDX_SiC2I] + + k[1227]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] + + k[1228]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + + k[1232]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + + k[1238]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] - + k[2744]*y_cur[IDX_H3II]*y_cur[IDX_SiC2I] - + k[2819]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2I] - + k[2991]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2I] - + k[3307]*y_cur[IDX_HeII]*y_cur[IDX_SiC2I] + + k[4879]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - + k[5440]*y_cur[IDX_OI]*y_cur[IDX_SiC2I] + + k[5441]*y_cur[IDX_OI]*y_cur[IDX_SiC3I] - k[5918]*y_cur[IDX_SiC2I] + + k[5919]*y_cur[IDX_SiC2H2I] + k[5920]*y_cur[IDX_SiC2HI] + + k[5921]*y_cur[IDX_SiC3I] + k[5923]*y_cur[IDX_SiC4I] - + k[6260]*y_cur[IDX_SiC2I] + k[6262]*y_cur[IDX_SiC2HI] + + k[6264]*y_cur[IDX_SiC3I] + + k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + + k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + + k[6746]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] + + k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] - + k[7003]*y_cur[IDX_SiC2I] + k[7185]*y_cur[IDX_GSiC2I] + + k[7367]*y_cur[IDX_GSiC2I] + k[7549]*y_cur[IDX_GSiC2I]; + ydot[yistart + IDX_C2H6II] = 0.0 - + k[237]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H6II] - + k[276]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] + + k[441]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + + k[466]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - + k[601]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + + k[687]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[935]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] - + k[936]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] - + k[1562]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - + k[1563]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - + k[1564]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - + k[2111]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - + k[2534]*y_cur[IDX_H2OI]*y_cur[IDX_C2H6II] + + k[2591]*y_cur[IDX_H3II]*y_cur[IDX_C2H5I] - + k[2838]*y_cur[IDX_HI]*y_cur[IDX_C2H6II] - + k[2872]*y_cur[IDX_HCNI]*y_cur[IDX_C2H6II] + + k[2902]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5I] - + k[3568]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + k[5804]*y_cur[IDX_C2H6I] + + k[6109]*y_cur[IDX_C2H6I] - + k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] - + k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2OI] = 0.0 + k[128]*y_cur[IDX_OI]*y_cur[IDX_C2M] + + k[129]*y_cur[IDX_OI]*y_cur[IDX_C2HM] - + k[151]*y_cur[IDX_CII]*y_cur[IDX_C2OI] - + k[331]*y_cur[IDX_HII]*y_cur[IDX_C2OI] + + k[1056]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] - + k[2599]*y_cur[IDX_H3II]*y_cur[IDX_C2OI] - + k[2769]*y_cur[IDX_H3OII]*y_cur[IDX_C2OI] - + k[2904]*y_cur[IDX_HCOII]*y_cur[IDX_C2OI] - + k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] + + k[3669]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - + k[4918]*y_cur[IDX_CI]*y_cur[IDX_C2OI] + + k[4962]*y_cur[IDX_CI]*y_cur[IDX_HCOI] - + k[5230]*y_cur[IDX_NI]*y_cur[IDX_C2OI] - + k[5354]*y_cur[IDX_OI]*y_cur[IDX_C2OI] + + k[5359]*y_cur[IDX_OI]*y_cur[IDX_C3OI] - + k[5485]*y_cur[IDX_SI]*y_cur[IDX_C2OI] - k[5712]*y_cur[IDX_C2OI] - + k[5713]*y_cur[IDX_C2OI] - k[5997]*y_cur[IDX_C2OI] - + k[5998]*y_cur[IDX_C2OI] + + k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - + k[6954]*y_cur[IDX_C2OI] + k[7136]*y_cur[IDX_GC2OI] + + k[7318]*y_cur[IDX_GC2OI] + k[7500]*y_cur[IDX_GC2OI] + + k[8691]*y_cur[IDX_GOI]*y_cur[IDX_GC2I]; + ydot[yistart + IDX_C8HII] = 0.0 + + k[354]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - + k[879]*y_cur[IDX_C8HII]*y_cur[IDX_eM] - + k[880]*y_cur[IDX_C8HII]*y_cur[IDX_eM] + + k[1333]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] + + k[1497]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] + + k[1558]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] + + k[1765]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] + + k[1831]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] + + k[1878]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + + k[1879]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] + + k[2310]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] + + k[2422]*y_cur[IDX_H2I]*y_cur[IDX_C8II] - + k[2423]*y_cur[IDX_H2I]*y_cur[IDX_C8HII] + + k[2625]*y_cur[IDX_H3II]*y_cur[IDX_C8I] + + k[2930]*y_cur[IDX_HCOII]*y_cur[IDX_C8I] + + k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] + k[6058]*y_cur[IDX_C8HI] - + k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] - + k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2OHI] = 0.0 + + k[1274]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + + k[1276]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1278]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1280]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + + k[1282]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - + k[5633]*y_cur[IDX_CII]*y_cur[IDX_CH2OHI] - + k[5634]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHI] - + k[5635]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHI] - + k[5636]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHI] - + k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] - + k[5638]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + + k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + + k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + + k[5818]*y_cur[IDX_CH3OHI] - k[5937]*y_cur[IDX_CH2OHI] + + k[5944]*y_cur[IDX_CH2OHCOI] + k[5945]*y_cur[IDX_CH2OHCHOI] + + k[6122]*y_cur[IDX_CH3OHI] - k[6290]*y_cur[IDX_CH2OHI] + + k[6294]*y_cur[IDX_CH2OHCOI] + k[6295]*y_cur[IDX_CH2OHCHOI] + + k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6929]*y_cur[IDX_CH2OHI] + k[7111]*y_cur[IDX_GCH2OHI] + + k[7293]*y_cur[IDX_GCH2OHI] + k[7475]*y_cur[IDX_GCH2OHI] + + k[8597]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + + k[8741]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I]; + ydot[yistart + IDX_SiNI] = 0.0 - + k[203]*y_cur[IDX_CII]*y_cur[IDX_SiNI] - + k[432]*y_cur[IDX_HII]*y_cur[IDX_SiNI] + + k[1124]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] + + k[1262]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] + + k[1265]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] - + k[1446]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + + k[2287]*y_cur[IDX_COI]*y_cur[IDX_HNSiII] + + k[2551]*y_cur[IDX_H2OI]*y_cur[IDX_HNSiII] - + k[2757]*y_cur[IDX_H3II]*y_cur[IDX_SiNI] - + k[3329]*y_cur[IDX_HeII]*y_cur[IDX_SiNI] + + k[3763]*y_cur[IDX_OI]*y_cur[IDX_SiNCHII] + + k[5293]*y_cur[IDX_NI]*y_cur[IDX_SiCI] + + k[5296]*y_cur[IDX_NI]*y_cur[IDX_SiHI] - + k[5450]*y_cur[IDX_OI]*y_cur[IDX_SiNI] - + k[5451]*y_cur[IDX_OI]*y_cur[IDX_SiNI] + + k[5452]*y_cur[IDX_OI]*y_cur[IDX_SiNCI] + k[5870]*y_cur[IDX_HNSiI] - + k[5931]*y_cur[IDX_SiNI] + k[6201]*y_cur[IDX_HNSiI] - + k[6281]*y_cur[IDX_SiNI] + k[6282]*y_cur[IDX_SiNCI] + + k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + + k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + + k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - + k[6965]*y_cur[IDX_SiNI] + k[7147]*y_cur[IDX_GSiNI] + + k[7329]*y_cur[IDX_GSiNI] + k[7511]*y_cur[IDX_GSiNI]; + ydot[yistart + IDX_C5H5II] = 0.0 - + k[845]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] - + k[846]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + + k[1509]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + + k[1547]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H4II] + + k[1548]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H5II] + + k[1609]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + + k[1612]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] + + k[1650]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] + + k[1668]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + + k[1673]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] + + k[1692]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] + + k[1693]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H3II] + + k[1706]*y_cur[IDX_C2H4I]*y_cur[IDX_CH2CCHII] + + k[2169]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + + k[2171]*y_cur[IDX_CH4I]*y_cur[IDX_C4H3II] + + k[2643]*y_cur[IDX_H3II]*y_cur[IDX_CH3C4HI] + + k[2944]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C4HI] + + k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - + k[3417]*y_cur[IDX_NI]*y_cur[IDX_C5H5II] - + k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - + k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GNHI] = 0.0 + k[6896]*y_cur[IDX_NHI] - + k[7078]*y_cur[IDX_GNHI] - k[7260]*y_cur[IDX_GNHI] - + k[7442]*y_cur[IDX_GNHI] - k[7623]*y_cur[IDX_GNHI] - + k[7624]*y_cur[IDX_GNHI] + k[7630]*y_cur[IDX_GNH2I] + + k[7632]*y_cur[IDX_GNH2I] + k[7635]*y_cur[IDX_GNH3I] + + k[7637]*y_cur[IDX_GNH3I] + k[7685]*y_cur[IDX_GCH2NHI] + + k[7751]*y_cur[IDX_GHNCOI] - k[7900]*y_cur[IDX_GNHI] - + k[7901]*y_cur[IDX_GNHI] + k[7907]*y_cur[IDX_GNH2I] + + k[7909]*y_cur[IDX_GNH2I] + k[7916]*y_cur[IDX_GNH3I] + + k[7918]*y_cur[IDX_GNH3I] + k[8065]*y_cur[IDX_GHNCOI] + + k[8279]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - + k[8280]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] - + k[8403]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] - + k[8439]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] + + k[8454]*y_cur[IDX_GNI]*y_cur[IDX_GO2HI] - + k[8458]*y_cur[IDX_GNI]*y_cur[IDX_GNHI] - + k[8475]*y_cur[IDX_GSI]*y_cur[IDX_GNHI] - + k[8479]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] - + k[8480]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] - + k[8521]*y_cur[IDX_GNHI]*y_cur[IDX_GCH3CHOI] - + k[8522]*y_cur[IDX_GNHI]*y_cur[IDX_GH2COI] - + k[8523]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I] - + k[8524]*y_cur[IDX_GNHI]*y_cur[IDX_GNHI] - + k[8524]*y_cur[IDX_GNHI]*y_cur[IDX_GNHI] - + k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] - + k[8526]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI] - + k[8527]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2OHCHOI] - + k[8581]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] - + k[8659]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] - + k[8687]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] - + k[8743]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I] - + k[8744]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_GSI] = 0.0 + k[6932]*y_cur[IDX_SI] - + k[7114]*y_cur[IDX_GSI] - k[7296]*y_cur[IDX_GSI] - + k[7478]*y_cur[IDX_GSI] + k[7707]*y_cur[IDX_GHSI] + + k[7709]*y_cur[IDX_GH2SI] + k[7711]*y_cur[IDX_GH2SI] + + k[7757]*y_cur[IDX_GCSI] + k[7758]*y_cur[IDX_GCSI] + + k[7766]*y_cur[IDX_GHCSI] + k[7779]*y_cur[IDX_GNSI] + + k[7786]*y_cur[IDX_GSOI] + k[7787]*y_cur[IDX_GSOI] + + k[7816]*y_cur[IDX_GC2SI] + k[7827]*y_cur[IDX_GOCSI] + + k[7830]*y_cur[IDX_GOCSI] + k[7831]*y_cur[IDX_GSiSI] + + k[7840]*y_cur[IDX_GS2I] + k[7840]*y_cur[IDX_GS2I] + + k[7845]*y_cur[IDX_GHS2I] + k[8011]*y_cur[IDX_GHSI] + + k[8014]*y_cur[IDX_GH2SI] + k[8016]*y_cur[IDX_GH2SI] + + k[8075]*y_cur[IDX_GCSI] + k[8076]*y_cur[IDX_GCSI] + + k[8086]*y_cur[IDX_GHCSI] + k[8101]*y_cur[IDX_GNSI] + + k[8110]*y_cur[IDX_GSOI] + k[8111]*y_cur[IDX_GSOI] + + k[8144]*y_cur[IDX_GC2SI] + k[8151]*y_cur[IDX_GOCSI] + + k[8154]*y_cur[IDX_GOCSI] + k[8155]*y_cur[IDX_GSiSI] + + k[8165]*y_cur[IDX_GS2I] + k[8165]*y_cur[IDX_GS2I] + + k[8166]*y_cur[IDX_GS2I] + k[8166]*y_cur[IDX_GS2I] + + k[8172]*y_cur[IDX_GHS2I] + k[8173]*y_cur[IDX_GHS2I] - + k[8311]*y_cur[IDX_GHI]*y_cur[IDX_GSI] + + k[8400]*y_cur[IDX_GCI]*y_cur[IDX_GNSI] + + k[8409]*y_cur[IDX_GCI]*y_cur[IDX_GSOI] - + k[8415]*y_cur[IDX_GCI]*y_cur[IDX_GSI] + + k[8442]*y_cur[IDX_GOI]*y_cur[IDX_GNSI] - + k[8450]*y_cur[IDX_GOI]*y_cur[IDX_GSI] + + k[8459]*y_cur[IDX_GNI]*y_cur[IDX_GNSI] - + k[8464]*y_cur[IDX_GNI]*y_cur[IDX_GSI] - + k[8473]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - + k[8474]*y_cur[IDX_GSI]*y_cur[IDX_GCH3I] - + k[8475]*y_cur[IDX_GSI]*y_cur[IDX_GNHI] - + k[8476]*y_cur[IDX_GSI]*y_cur[IDX_GCOI] - + k[8607]*y_cur[IDX_GHI]*y_cur[IDX_GSI] - + k[8666]*y_cur[IDX_GCI]*y_cur[IDX_GSI] - + k[8694]*y_cur[IDX_GOI]*y_cur[IDX_GSI] - + k[8704]*y_cur[IDX_GNI]*y_cur[IDX_GSI] - + k[8713]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - + k[8714]*y_cur[IDX_GSI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_HCSI] = 0.0 + + k[1001]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] - + k[2346]*y_cur[IDX_HII]*y_cur[IDX_HCSI] - + k[2702]*y_cur[IDX_H3II]*y_cur[IDX_HCSI] - + k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] - + k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + + k[3845]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + + k[3849]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + + k[3852]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[5020]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - + k[5173]*y_cur[IDX_HI]*y_cur[IDX_HCSI] - + k[5268]*y_cur[IDX_NI]*y_cur[IDX_HCSI] - k[5408]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - - k[5415]*y_cur[IDX_OI]*y_cur[IDX_HSI] - - k[5416]*y_cur[IDX_OI]*y_cur[IDX_HSI] + - k[5462]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + - k[5468]*y_cur[IDX_OHI]*y_cur[IDX_H2SI] + - k[5487]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - - k[5488]*y_cur[IDX_SI]*y_cur[IDX_HSI] + k[5840]*y_cur[IDX_H2S2I] + - k[5840]*y_cur[IDX_H2S2I] + k[5874]*y_cur[IDX_HS2I] - - k[5875]*y_cur[IDX_HSI] + k[6162]*y_cur[IDX_H2S2I] + - k[6162]*y_cur[IDX_H2S2I] + k[6164]*y_cur[IDX_H2SI] + - k[6208]*y_cur[IDX_HS2I] - k[6209]*y_cur[IDX_HSI] + - k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + - k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + - k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + - k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + - k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] - k[6938]*y_cur[IDX_HSI] - + k[7120]*y_cur[IDX_GHSI] + k[7302]*y_cur[IDX_GHSI] + - k[7484]*y_cur[IDX_GHSI] + k[8607]*y_cur[IDX_GHI]*y_cur[IDX_GSI]; - ydot[yistart + IDX_HSII] = 0.0 + - k[397]*y_cur[IDX_HII]*y_cur[IDX_HSI] - - k[505]*y_cur[IDX_HSII]*y_cur[IDX_FeI] - - k[534]*y_cur[IDX_MgI]*y_cur[IDX_HSII] - - k[609]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] - - k[627]*y_cur[IDX_NOI]*y_cur[IDX_HSII] - - k[638]*y_cur[IDX_NaI]*y_cur[IDX_HSII] - - k[710]*y_cur[IDX_SI]*y_cur[IDX_HSII] - - k[720]*y_cur[IDX_SiI]*y_cur[IDX_HSII] - - k[1138]*y_cur[IDX_HSII]*y_cur[IDX_eM] - - k[1908]*y_cur[IDX_CI]*y_cur[IDX_HSII] + - k[1974]*y_cur[IDX_CHII]*y_cur[IDX_SI] - - k[2203]*y_cur[IDX_CH4I]*y_cur[IDX_HSII] + - k[2235]*y_cur[IDX_CH5II]*y_cur[IDX_SI] - - k[2255]*y_cur[IDX_CHI]*y_cur[IDX_HSII] + - k[2339]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + - k[2356]*y_cur[IDX_HII]*y_cur[IDX_OCSI] + - k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - - k[2456]*y_cur[IDX_H2I]*y_cur[IDX_HSII] + - k[2470]*y_cur[IDX_H2I]*y_cur[IDX_SII] + - k[2490]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + - k[2516]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - - k[2554]*y_cur[IDX_H2OI]*y_cur[IDX_HSII] + - k[2740]*y_cur[IDX_H3II]*y_cur[IDX_SI] + - k[2842]*y_cur[IDX_HI]*y_cur[IDX_H2SII] - - k[2844]*y_cur[IDX_HI]*y_cur[IDX_HSII] + - k[2860]*y_cur[IDX_HCNII]*y_cur[IDX_SI] - - k[2879]*y_cur[IDX_HCNI]*y_cur[IDX_HSII] + - k[2989]*y_cur[IDX_HCOII]*y_cur[IDX_SI] + - k[3012]*y_cur[IDX_HCOI]*y_cur[IDX_SII] - - k[3043]*y_cur[IDX_HNCI]*y_cur[IDX_HSII] + - k[3050]*y_cur[IDX_HNOII]*y_cur[IDX_SI] - - k[3054]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] - - k[3055]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + - k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + - k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + - k[3347]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + - k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + - k[3376]*y_cur[IDX_N2HII]*y_cur[IDX_SI] - - k[3462]*y_cur[IDX_NI]*y_cur[IDX_HSII] + - k[3505]*y_cur[IDX_NHII]*y_cur[IDX_SI] + - k[3516]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + - k[3527]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - - k[3589]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] + - k[3642]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + - k[3734]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - - k[3742]*y_cur[IDX_OI]*y_cur[IDX_HSII] - - k[3743]*y_cur[IDX_OI]*y_cur[IDX_HSII] + - k[3789]*y_cur[IDX_OHII]*y_cur[IDX_SI] + - k[3840]*y_cur[IDX_SI]*y_cur[IDX_O2HII] - - k[5557]*y_cur[IDX_H2I]*y_cur[IDX_HSII] - k[6205]*y_cur[IDX_HSII] - - k[6206]*y_cur[IDX_HSII] - k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HS2I] = 0.0 - - k[396]*y_cur[IDX_HII]*y_cur[IDX_HS2I] + - k[1021]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + - k[1050]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] + + k[5409]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - k[5862]*y_cur[IDX_HCSI] - + k[6190]*y_cur[IDX_HCSI] - k[6191]*y_cur[IDX_HCSI] + + k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] - + k[6980]*y_cur[IDX_HCSI] + k[7162]*y_cur[IDX_GHCSI] + + k[7344]*y_cur[IDX_GHCSI] + k[7526]*y_cur[IDX_GHCSI] + + k[8625]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] + + k[8713]*y_cur[IDX_GSI]*y_cur[IDX_GCHI]; + ydot[yistart + IDX_NSI] = 0.0 + k[123]*y_cur[IDX_NI]*y_cur[IDX_SM] - + k[187]*y_cur[IDX_CII]*y_cur[IDX_NSI] - + k[404]*y_cur[IDX_HII]*y_cur[IDX_NSI] + + k[1122]*y_cur[IDX_HNSII]*y_cur[IDX_eM] - + k[1421]*y_cur[IDX_CII]*y_cur[IDX_NSI] - + k[2727]*y_cur[IDX_H3II]*y_cur[IDX_NSI] - + k[2981]*y_cur[IDX_HCOII]*y_cur[IDX_NSI] - + k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - + k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - + k[4976]*y_cur[IDX_CI]*y_cur[IDX_NSI] - + k[4977]*y_cur[IDX_CI]*y_cur[IDX_NSI] + + k[5125]*y_cur[IDX_CNI]*y_cur[IDX_SI] - + k[5188]*y_cur[IDX_HI]*y_cur[IDX_NSI] - + k[5189]*y_cur[IDX_HI]*y_cur[IDX_NSI] + + k[5271]*y_cur[IDX_NI]*y_cur[IDX_HSI] - + k[5280]*y_cur[IDX_NI]*y_cur[IDX_NSI] + + k[5289]*y_cur[IDX_NI]*y_cur[IDX_S2I] + + k[5290]*y_cur[IDX_NI]*y_cur[IDX_SOI] + + k[5325]*y_cur[IDX_NHI]*y_cur[IDX_SI] + + k[5333]*y_cur[IDX_NOI]*y_cur[IDX_SI] - + k[5425]*y_cur[IDX_OI]*y_cur[IDX_NSI] - + k[5426]*y_cur[IDX_OI]*y_cur[IDX_NSI] - k[5893]*y_cur[IDX_NSI] - + k[6230]*y_cur[IDX_NSI] + k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM] + - k[6990]*y_cur[IDX_NSI] + k[7172]*y_cur[IDX_GNSI] + + k[7354]*y_cur[IDX_GNSI] + k[7536]*y_cur[IDX_GNSI] + + k[8704]*y_cur[IDX_GNI]*y_cur[IDX_GSI]; + ydot[yistart + IDX_SiC2HII] = 0.0 + + k[196]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] + + k[421]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - + k[1226]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] - + k[1227]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] + + k[1436]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + + k[1437]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + + k[1530]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] + + k[1574]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - + k[1576]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2HII] + + k[1626]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] - + k[1915]*y_cur[IDX_CI]*y_cur[IDX_SiC2HII] + + k[1922]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + + k[2357]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] + + k[2473]*y_cur[IDX_H2I]*y_cur[IDX_SiC2II] + + k[2744]*y_cur[IDX_H3II]*y_cur[IDX_SiC2I] + + k[2819]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2I] + + k[2991]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2I] + + k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + + k[3864]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - + k[5563]*y_cur[IDX_H2I]*y_cur[IDX_SiC2HII] - + k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] - + k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiH2I] = 0.0 - + k[201]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - + k[428]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] + + k[1254]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] + + k[1256]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] - + k[1439]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - + k[1440]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - + k[2362]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - + k[2753]*y_cur[IDX_H3II]*y_cur[IDX_SiH2I] - + k[2823]*y_cur[IDX_H3OII]*y_cur[IDX_SiH2I] - + k[3000]*y_cur[IDX_HCOII]*y_cur[IDX_SiH2I] - + k[3322]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] - + k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] - + k[4988]*y_cur[IDX_CI]*y_cur[IDX_SiH2I] - + k[5294]*y_cur[IDX_NI]*y_cur[IDX_SiH2I] - + k[5445]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - + k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - k[5927]*y_cur[IDX_SiH2I] + + k[5928]*y_cur[IDX_SiH3I] + k[5929]*y_cur[IDX_SiH4I] - + k[6272]*y_cur[IDX_SiH2I] - k[6273]*y_cur[IDX_SiH2I] + + k[6274]*y_cur[IDX_SiH3I] + k[6277]*y_cur[IDX_SiH4I] + + k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + + k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] - + k[6924]*y_cur[IDX_SiH2I] + k[7106]*y_cur[IDX_GSiH2I] + + k[7288]*y_cur[IDX_GSiH2I] + k[7470]*y_cur[IDX_GSiH2I] + + k[8601]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI]; + ydot[yistart + IDX_C3OI] = 0.0 - + k[153]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - + k[336]*y_cur[IDX_HII]*y_cur[IDX_C3OI] + + k[796]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + + k[1027]*y_cur[IDX_H3C3OII]*y_cur[IDX_eM] + + k[1070]*y_cur[IDX_HC3OII]*y_cur[IDX_eM] - + k[1313]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - + k[1314]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + + k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - + k[2605]*y_cur[IDX_H3II]*y_cur[IDX_C3OI] - + k[2775]*y_cur[IDX_H3OII]*y_cur[IDX_C3OI] - + k[2910]*y_cur[IDX_HCOII]*y_cur[IDX_C3OI] - + k[3099]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] - + k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] - + k[4922]*y_cur[IDX_CI]*y_cur[IDX_C3OI] - + k[5359]*y_cur[IDX_OI]*y_cur[IDX_C3OI] - k[5723]*y_cur[IDX_C3OI] - + k[6007]*y_cur[IDX_C3OI] + + k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM] + + k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + + k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] - + k[7006]*y_cur[IDX_C3OI] + k[7188]*y_cur[IDX_GC3OI] + + k[7370]*y_cur[IDX_GC3OI] + k[7552]*y_cur[IDX_GC3OI] + + k[8670]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] + + k[8695]*y_cur[IDX_GOI]*y_cur[IDX_GC3I]; + ydot[yistart + IDX_C6HII] = 0.0 + + k[348]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - + k[850]*y_cur[IDX_C6HII]*y_cur[IDX_eM] - + k[851]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + + k[1324]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] + + k[1489]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] + + k[1550]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] - + k[1559]*y_cur[IDX_C2H2I]*y_cur[IDX_C6HII] + + k[1735]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] + + k[1869]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] + + k[1870]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] + + k[2306]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] + + k[2417]*y_cur[IDX_H2I]*y_cur[IDX_C6II] - + k[2418]*y_cur[IDX_H2I]*y_cur[IDX_C6HII] + + k[2617]*y_cur[IDX_H3II]*y_cur[IDX_C6I] + + k[2922]*y_cur[IDX_HCOII]*y_cur[IDX_C6I] + + k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + + k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] - + k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] - + k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C9H2I] = 0.0 + + k[104]*y_cur[IDX_HI]*y_cur[IDX_C9HM] - + k[356]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] + + k[734]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + + k[895]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + + k[897]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + + k[899]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] - + k[1338]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] - + k[1339]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] - + k[2312]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] - + k[2629]*y_cur[IDX_H3II]*y_cur[IDX_C9H2I] - + k[2934]*y_cur[IDX_HCOII]*y_cur[IDX_C9H2I] - + k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - + k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - + k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + + k[3683]*y_cur[IDX_OI]*y_cur[IDX_C10H3II] + + k[4892]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2I] - + k[4941]*y_cur[IDX_CI]*y_cur[IDX_C9H2I] - k[5769]*y_cur[IDX_C9H2I] - + k[6063]*y_cur[IDX_C9H2I] - k[6064]*y_cur[IDX_C9H2I] + + k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + + k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + + k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + + k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - + k[7062]*y_cur[IDX_C9H2I] + k[7244]*y_cur[IDX_GC9H2I] + + k[7426]*y_cur[IDX_GC9H2I] + k[7608]*y_cur[IDX_GC9H2I] + + k[8647]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] + + k[8735]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI]; + ydot[yistart + IDX_CH2CHCNI] = 0.0 + + k[915]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] - + k[1348]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - + k[1349]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - + k[1350]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - + k[2316]*y_cur[IDX_HII]*y_cur[IDX_CH2CHCNI] - + k[2637]*y_cur[IDX_H3II]*y_cur[IDX_CH2CHCNI] - + k[2886]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] - + k[2887]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] - + k[2939]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CHCNI] - + k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3567]*y_cur[IDX_NH3I]*y_cur[IDX_CH2CHCNHII] + + k[5106]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] + + k[5112]*y_cur[IDX_CNI]*y_cur[IDX_CH3CHCH2I] - + k[5787]*y_cur[IDX_CH2CHCNI] - k[6088]*y_cur[IDX_CH2CHCNI] - + k[6089]*y_cur[IDX_CH2CHCNI] + + k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - + k[7007]*y_cur[IDX_CH2CHCNI] + k[7189]*y_cur[IDX_GCH2CHCNI] + + k[7371]*y_cur[IDX_GCH2CHCNI] + k[7553]*y_cur[IDX_GCH2CHCNI]; + ydot[yistart + IDX_CH3CHOHII] = 0.0 - + k[939]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] - + k[940]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] - + k[941]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] - + k[942]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] - + k[943]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + k[1724]*y_cur[IDX_C2H5OHI]*y_cur[IDX_S2II] + - k[2114]*y_cur[IDX_CH3CHOI]*y_cur[IDX_S2II] - - k[2715]*y_cur[IDX_H3II]*y_cur[IDX_HS2I] - - k[2813]*y_cur[IDX_H3OII]*y_cur[IDX_HS2I] - - k[2976]*y_cur[IDX_HCOII]*y_cur[IDX_HS2I] - - k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - - k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - k[5874]*y_cur[IDX_HS2I] - - k[6207]*y_cur[IDX_HS2I] - k[6208]*y_cur[IDX_HS2I] + - k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + - k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - - k[7037]*y_cur[IDX_HS2I] + k[7219]*y_cur[IDX_GHS2I] + - k[7401]*y_cur[IDX_GHS2I] + k[7583]*y_cur[IDX_GHS2I]; - ydot[yistart + IDX_HS2II] = 0.0 + - k[396]*y_cur[IDX_HII]*y_cur[IDX_HS2I] - - k[1139]*y_cur[IDX_HS2II]*y_cur[IDX_eM] - - k[1140]*y_cur[IDX_HS2II]*y_cur[IDX_eM] - - k[2579]*y_cur[IDX_H2SI]*y_cur[IDX_HS2II] + - k[2739]*y_cur[IDX_H3II]*y_cur[IDX_S2I] + - k[2817]*y_cur[IDX_H3OII]*y_cur[IDX_S2I] + - k[2988]*y_cur[IDX_HCOII]*y_cur[IDX_S2I] + - k[3055]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + - k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + - k[3828]*y_cur[IDX_SII]*y_cur[IDX_H2SI] - - k[5558]*y_cur[IDX_H2I]*y_cur[IDX_HS2II] + k[6207]*y_cur[IDX_HS2I] - - k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] - - k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HSOII] = 0.0 - - k[1141]*y_cur[IDX_HSOII]*y_cur[IDX_eM] + - k[2517]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + - k[2742]*y_cur[IDX_H3II]*y_cur[IDX_SOI] + - k[2990]*y_cur[IDX_HCOII]*y_cur[IDX_SOI] - - k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HSO2II] = 0.0 - + k[2072]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OCH3I] + + k[2113]*y_cur[IDX_CH3CHOI]*y_cur[IDX_HCOOH2II] + + k[2193]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + + k[2494]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + + k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2654]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2791]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHOI] + + k[2950]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CHOI] - + k[3569]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - + k[3570]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] + + k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3664]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] + + k[5543]*y_cur[IDX_CH4I]*y_cur[IDX_HCOII] + + k[5545]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + + k[5567]*y_cur[IDX_H3OII]*y_cur[IDX_C2H2I] - + k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - + k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - + k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - + k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - + k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3CNHII] = 0.0 - + k[946]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] - + k[947]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] + + k[1515]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] + + k[1719]*y_cur[IDX_C2H5II]*y_cur[IDX_CH3CNI] + + k[1842]*y_cur[IDX_C4H7II]*y_cur[IDX_CH3CNI] + + k[2115]*y_cur[IDX_CH3CNI]*y_cur[IDX_HC3NHII] + + k[2116]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCO2II] + + k[2117]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCOOH2II] + + k[2431]*y_cur[IDX_H2I]*y_cur[IDX_CH3CNII] + + k[2658]*y_cur[IDX_H3II]*y_cur[IDX_CH3CNI] + + k[2792]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CNI] + + k[2863]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] + + k[2873]*y_cur[IDX_HCNI]*y_cur[IDX_CH3OH2II] + + k[2888]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] + + k[2889]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] + + k[2951]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CNI] + + k[3371]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CNI] + + k[5540]*y_cur[IDX_CH3II]*y_cur[IDX_HCNI] - + k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] - + k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3COII] = 0.0 - + k[948]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] - + k[949]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + + k[1378]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] + + k[1380]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] + + k[1980]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + + k[2065]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + + k[2070]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + + k[2114]*y_cur[IDX_CH3CHOI]*y_cur[IDX_S2II] + + k[2189]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + + k[2639]*y_cur[IDX_H3II]*y_cur[IDX_CH2COI] + + k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2786]*y_cur[IDX_H3OII]*y_cur[IDX_CH2COI] + + k[2940]*y_cur[IDX_HCOII]*y_cur[IDX_CH2COI] + + k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] + + k[3852]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[5535]*y_cur[IDX_CH3II]*y_cur[IDX_COI] + + k[5639]*y_cur[IDX_CII]*y_cur[IDX_CH3COI] + + k[5674]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] - + k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HC7NI] = 0.0 + + k[119]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - + k[386]*y_cur[IDX_HII]*y_cur[IDX_HC7NI] + + k[934]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] + + k[990]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + + k[1031]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] - + k[1405]*y_cur[IDX_CII]*y_cur[IDX_HC7NI] + + k[2324]*y_cur[IDX_HII]*y_cur[IDX_CH3C7NI] - + k[2692]*y_cur[IDX_H3II]*y_cur[IDX_HC7NI] - + k[2967]*y_cur[IDX_HCOII]*y_cur[IDX_HC7NI] - + k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] + + k[5107]*y_cur[IDX_CNI]*y_cur[IDX_C6H2I] + + k[5245]*y_cur[IDX_NI]*y_cur[IDX_C7H2I] - + k[5510]*y_cur[IDX_C2H2II]*y_cur[IDX_HC7NI] - + k[5539]*y_cur[IDX_CH3II]*y_cur[IDX_HC7NI] - k[5852]*y_cur[IDX_HC7NI] + - k[6177]*y_cur[IDX_HC7NI] - k[6178]*y_cur[IDX_HC7NI] + + k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + + k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + + k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - + k[7059]*y_cur[IDX_HC7NI] + k[7241]*y_cur[IDX_GHC7NI] + + k[7423]*y_cur[IDX_GHC7NI] + k[7605]*y_cur[IDX_GHC7NI] + + k[8645]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] + + k[8710]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI]; + ydot[yistart + IDX_C6II] = 0.0 + + k[346]*y_cur[IDX_HII]*y_cur[IDX_C6I] - + k[848]*y_cur[IDX_C6II]*y_cur[IDX_eM] - + k[849]*y_cur[IDX_C6II]*y_cur[IDX_eM] + + k[1323]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] + + k[1325]*y_cur[IDX_CII]*y_cur[IDX_C5HI] - + k[1557]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] - + k[1558]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] + + k[1734]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] + + k[1867]*y_cur[IDX_CI]*y_cur[IDX_C5HII] + + k[1868]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - + k[2182]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - + k[2183]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - + k[2184]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + + k[2307]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - + k[2417]*y_cur[IDX_H2I]*y_cur[IDX_C6II] + + k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + + k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + + k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] + + k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + + k[5498]*y_cur[IDX_CII]*y_cur[IDX_C5I] - + k[5552]*y_cur[IDX_H2I]*y_cur[IDX_C6II] + k[6034]*y_cur[IDX_C6I] - + k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] - + k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C6H6I] = 0.0 - + k[157]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + + k[862]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] - + k[1328]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - + k[1329]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - + k[1330]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - + k[1598]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H6I] - + k[1814]*y_cur[IDX_C3H5II]*y_cur[IDX_C6H6I] - + k[2221]*y_cur[IDX_CH5II]*y_cur[IDX_C6H6I] - + k[2619]*y_cur[IDX_H3II]*y_cur[IDX_C6H6I] - + k[2783]*y_cur[IDX_H3OII]*y_cur[IDX_C6H6I] - + k[2924]*y_cur[IDX_HCOII]*y_cur[IDX_C6H6I] - + k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - + k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - + k[3368]*y_cur[IDX_N2HII]*y_cur[IDX_C6H6I] - k[5751]*y_cur[IDX_C6H6I] + - k[6038]*y_cur[IDX_C6H6I] + + k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - + k[7047]*y_cur[IDX_C6H6I] + k[7229]*y_cur[IDX_GC6H6I] + + k[7411]*y_cur[IDX_GC6H6I] + k[7593]*y_cur[IDX_GC6H6I]; + ydot[yistart + IDX_C7NI] = 0.0 + k[118]*y_cur[IDX_NI]*y_cur[IDX_C7M] + + k[901]*y_cur[IDX_C9NII]*y_cur[IDX_eM] + + k[989]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + + k[1030]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + + k[1085]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] - + k[2624]*y_cur[IDX_H3II]*y_cur[IDX_C7NI] - + k[2929]*y_cur[IDX_HCOII]*y_cur[IDX_C7NI] - + k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] + + k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] - + k[4937]*y_cur[IDX_CI]*y_cur[IDX_C7NI] + + k[5246]*y_cur[IDX_NI]*y_cur[IDX_C7HI] - + k[5247]*y_cur[IDX_NI]*y_cur[IDX_C7NI] + + k[5252]*y_cur[IDX_NI]*y_cur[IDX_C9NI] - + k[5372]*y_cur[IDX_OI]*y_cur[IDX_C7NI] - k[5760]*y_cur[IDX_C7NI] + + k[5800]*y_cur[IDX_CH3C7NI] - k[6049]*y_cur[IDX_C7NI] - + k[6050]*y_cur[IDX_C7NI] + k[6104]*y_cur[IDX_CH3C7NI] + + k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + + k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + + k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + + k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM] - k[7057]*y_cur[IDX_C7NI] + + k[7239]*y_cur[IDX_GC7NI] + k[7421]*y_cur[IDX_GC7NI] + + k[7603]*y_cur[IDX_GC7NI] + k[8709]*y_cur[IDX_GNI]*y_cur[IDX_GC7I]; + ydot[yistart + IDX_HCOOHI] = 0.0 - + k[675]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + + k[1104]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] + + k[2113]*y_cur[IDX_CH3CHOI]*y_cur[IDX_HCOOH2II] + + k[2117]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCOOH2II] - + k[2120]*y_cur[IDX_CH3OH2II]*y_cur[IDX_HCOOHI] + + k[2127]*y_cur[IDX_CH3OHI]*y_cur[IDX_HCOOH2II] + + k[2549]*y_cur[IDX_H2OI]*y_cur[IDX_HCOOH2II] - + k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - + k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - + k[2765]*y_cur[IDX_H3COII]*y_cur[IDX_HCOOHI] - + k[2971]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOHI] + + k[3586]*y_cur[IDX_NH3I]*y_cur[IDX_HCOOH2II] + + k[3658]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3666]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + + k[5466]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] - k[5860]*y_cur[IDX_HCOOHI] + - k[6187]*y_cur[IDX_HCOOHI] - k[6188]*y_cur[IDX_HCOOHI] + + k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] - + k[6986]*y_cur[IDX_HCOOHI] + k[7168]*y_cur[IDX_GHCOOHI] + + k[7350]*y_cur[IDX_GHCOOHI] + k[7532]*y_cur[IDX_GHCOOHI] + + k[8628]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] + + k[8740]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI]; + ydot[yistart + IDX_SiH2II] = 0.0 + + k[201]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + + k[428]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - + k[1251]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] - + k[1252]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] - + k[1253]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + + k[1533]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + + k[1682]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[1926]*y_cur[IDX_CI]*y_cur[IDX_SiH2II] + + k[2363]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + + k[2756]*y_cur[IDX_H3II]*y_cur[IDX_SiHI] + + k[2824]*y_cur[IDX_H3OII]*y_cur[IDX_SiHI] + + k[3002]*y_cur[IDX_HCOII]*y_cur[IDX_SiHI] + + k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - + k[3472]*y_cur[IDX_NI]*y_cur[IDX_SiH2II] - + k[3757]*y_cur[IDX_OI]*y_cur[IDX_SiH2II] + + k[3793]*y_cur[IDX_OHII]*y_cur[IDX_SiHI] - + k[3882]*y_cur[IDX_SiH2II]*y_cur[IDX_O2I] - + k[3883]*y_cur[IDX_SiH2II]*y_cur[IDX_SI] + + k[5562]*y_cur[IDX_H2I]*y_cur[IDX_SiII] + k[6272]*y_cur[IDX_SiH2I] - + k[6402]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] - + k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] - + k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiH3II] = 0.0 + + k[202]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + + k[429]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] - + k[1254]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] - + k[1255]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] + + k[1534]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + + k[1683]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[1927]*y_cur[IDX_CI]*y_cur[IDX_SiH3II] + + k[2099]*y_cur[IDX_CH3II]*y_cur[IDX_SiH4I] + + k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] + + k[2364]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + + k[2753]*y_cur[IDX_H3II]*y_cur[IDX_SiH2I] + + k[2823]*y_cur[IDX_H3OII]*y_cur[IDX_SiH2I] + + k[3000]*y_cur[IDX_HCOII]*y_cur[IDX_SiH2I] - + k[3473]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - + k[3474]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - + k[3758]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - + k[3759]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - + k[3884]*y_cur[IDX_SiH3II]*y_cur[IDX_O2I] + + k[5564]*y_cur[IDX_H2I]*y_cur[IDX_SiHII] - + k[5565]*y_cur[IDX_H2I]*y_cur[IDX_SiH3II] + k[6275]*y_cur[IDX_SiH3I] + - k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] - + k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C10H2I] = 0.0 + + k[86]*y_cur[IDX_HI]*y_cur[IDX_C10HM] - + k[321]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] + + k[733]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] - + k[1297]*y_cur[IDX_CII]*y_cur[IDX_C10H2I] - + k[2294]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] - + k[2584]*y_cur[IDX_H3II]*y_cur[IDX_C10H2I] - + k[2900]*y_cur[IDX_HCOII]*y_cur[IDX_C10H2I] - + k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[4893]*y_cur[IDX_C2HI]*y_cur[IDX_C8H2I] - + k[4909]*y_cur[IDX_CI]*y_cur[IDX_C10H2I] - k[5690]*y_cur[IDX_C10H2I] + - k[5957]*y_cur[IDX_C10H2I] - k[5958]*y_cur[IDX_C10H2I] - + k[5959]*y_cur[IDX_C10H2I] - k[5960]*y_cur[IDX_C10H2I] + + k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - + k[7067]*y_cur[IDX_C10H2I] + k[7249]*y_cur[IDX_GC10H2I] + + k[7431]*y_cur[IDX_GC10H2I] + k[7613]*y_cur[IDX_GC10H2I] + + k[8649]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] + + k[8736]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI]; + ydot[yistart + IDX_C4II] = 0.0 + + k[338]*y_cur[IDX_HII]*y_cur[IDX_C4I] - + k[819]*y_cur[IDX_C4II]*y_cur[IDX_eM] - + k[820]*y_cur[IDX_C4II]*y_cur[IDX_eM] + + k[1310]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] + + k[1312]*y_cur[IDX_CII]*y_cur[IDX_C3HI] + + k[1314]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + + k[1315]*y_cur[IDX_CII]*y_cur[IDX_C3PI] + + k[1316]*y_cur[IDX_CII]*y_cur[IDX_C3SI] + + k[1388]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - + k[1549]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] - + k[1550]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] + + k[1855]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] - + k[2164]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - + k[2165]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - + k[2166]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - + k[2167]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + + k[2303]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - + k[2411]*y_cur[IDX_H2I]*y_cur[IDX_C4II] + + k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + + k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + + k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] + + k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + + k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + + k[5496]*y_cur[IDX_CII]*y_cur[IDX_C3I] - + k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] - + k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CCPI] = 0.0 - + k[158]*y_cur[IDX_CII]*y_cur[IDX_CCPI] - + k[358]*y_cur[IDX_HII]*y_cur[IDX_CCPI] + + k[834]*y_cur[IDX_C4PII]*y_cur[IDX_eM] + + k[1059]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + + k[1181]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + + k[1184]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + + k[1187]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + + k[1191]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + + k[1195]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - + k[1341]*y_cur[IDX_CII]*y_cur[IDX_CCPI] - + k[2633]*y_cur[IDX_H3II]*y_cur[IDX_CCPI] - + k[2784]*y_cur[IDX_H3OII]*y_cur[IDX_CCPI] - + k[2937]*y_cur[IDX_HCOII]*y_cur[IDX_CCPI] + + k[3114]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - + k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] - + k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + + k[5360]*y_cur[IDX_OI]*y_cur[IDX_C3PI] - + k[5378]*y_cur[IDX_OI]*y_cur[IDX_CCPI] + k[5724]*y_cur[IDX_C3PI] - + k[5773]*y_cur[IDX_CCPI] - k[5774]*y_cur[IDX_CCPI] + + k[5845]*y_cur[IDX_HC2PI] - k[6070]*y_cur[IDX_CCPI] - + k[6071]*y_cur[IDX_CCPI] + k[6170]*y_cur[IDX_HC2PI] + + k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + + k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + + k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + + k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + + k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + + k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + + k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[7014]*y_cur[IDX_CCPI] + k[7196]*y_cur[IDX_GCCPI] + + k[7378]*y_cur[IDX_GCCPI] + k[7562]*y_cur[IDX_GCCPI]; + ydot[yistart + IDX_CPI] = 0.0 - k[171]*y_cur[IDX_CII]*y_cur[IDX_CPI] + - k[373]*y_cur[IDX_HII]*y_cur[IDX_CPI] + + k[902]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + + k[1060]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + + k[1105]*y_cur[IDX_HCPII]*y_cur[IDX_eM] + + k[1196]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + + k[1197]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + + k[1199]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] - + k[2677]*y_cur[IDX_H3II]*y_cur[IDX_CPI] - + k[2796]*y_cur[IDX_H3OII]*y_cur[IDX_CPI] - + k[2955]*y_cur[IDX_HCOII]*y_cur[IDX_CPI] + + k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] - + k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] - + k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + + k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + + k[4983]*y_cur[IDX_CI]*y_cur[IDX_PHI] + + k[5378]*y_cur[IDX_OI]*y_cur[IDX_CCPI] - + k[5391]*y_cur[IDX_OI]*y_cur[IDX_CPI] + + k[5527]*y_cur[IDX_CI]*y_cur[IDX_PI] + k[5774]*y_cur[IDX_CCPI] - + k[5827]*y_cur[IDX_CPI] + k[5861]*y_cur[IDX_HCPI] + + k[6008]*y_cur[IDX_C3PI] + k[6020]*y_cur[IDX_C4PI] + + k[6071]*y_cur[IDX_CCPI] - k[6139]*y_cur[IDX_CPI] + + k[6189]*y_cur[IDX_HCPI] + k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + + k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + + k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + + k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + + k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - k[6972]*y_cur[IDX_CPI] + + k[7154]*y_cur[IDX_GCPI] + k[7336]*y_cur[IDX_GCPI] + + k[7518]*y_cur[IDX_GCPI]; + ydot[yistart + IDX_GC3I] = 0.0 + k[6943]*y_cur[IDX_C3I] - + k[7125]*y_cur[IDX_GC3I] - k[7307]*y_cur[IDX_GC3I] - + k[7489]*y_cur[IDX_GC3I] - k[7712]*y_cur[IDX_GC3I] + + k[7714]*y_cur[IDX_GC3HI] + k[7784]*y_cur[IDX_GC4I] + + k[7822]*y_cur[IDX_GC5I] + k[7833]*y_cur[IDX_GC5HI] + + k[7836]*y_cur[IDX_GC4NI] + k[7850]*y_cur[IDX_GC6HI] + + k[7860]*y_cur[IDX_GC4SI] - k[8017]*y_cur[IDX_GC3I] + + k[8020]*y_cur[IDX_GC3HI] + k[8022]*y_cur[IDX_GH2CCCI] + + k[8108]*y_cur[IDX_GC4I] + k[8149]*y_cur[IDX_GC5I] + + k[8157]*y_cur[IDX_GC5HI] + k[8160]*y_cur[IDX_GC4NI] + + k[8181]*y_cur[IDX_GC6HI] + k[8191]*y_cur[IDX_GC4PI] + + k[8192]*y_cur[IDX_GC4SI] + k[8194]*y_cur[IDX_GC7I] + + k[8229]*y_cur[IDX_GC10I] + k[8239]*y_cur[IDX_GC10HI] + + k[8240]*y_cur[IDX_GC10HI] + k[8245]*y_cur[IDX_GC10HI] + + k[8250]*y_cur[IDX_GC10H2I] + k[8255]*y_cur[IDX_GC11I] + + k[8255]*y_cur[IDX_GC11I] + k[8258]*y_cur[IDX_GC11I] + + k[8262]*y_cur[IDX_GC11I] - k[8315]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - + k[8377]*y_cur[IDX_GH2I]*y_cur[IDX_GC3I] + + k[8410]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - + k[8416]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - + k[8451]*y_cur[IDX_GOI]*y_cur[IDX_GC3I] - + k[8465]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - + k[8491]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I] - + k[8610]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - + k[8667]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - + k[8695]*y_cur[IDX_GOI]*y_cur[IDX_GC3I] - + k[8705]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - + k[8724]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I]; + ydot[yistart + IDX_O2HI] = 0.0 + + k[2489]*y_cur[IDX_H2COII]*y_cur[IDX_O2I] + + k[3656]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + + k[3660]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3664]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] + + k[3666]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + + k[4882]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] + + k[5041]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - + k[5042]*y_cur[IDX_CH3I]*y_cur[IDX_O2HI] + + k[5060]*y_cur[IDX_CH4I]*y_cur[IDX_O2I] - + k[5094]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - + k[5095]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - + k[5131]*y_cur[IDX_COI]*y_cur[IDX_O2HI] + + k[5144]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - + k[5146]*y_cur[IDX_H2I]*y_cur[IDX_O2HI] - + k[5150]*y_cur[IDX_H2COI]*y_cur[IDX_O2HI] - + k[5152]*y_cur[IDX_H2OI]*y_cur[IDX_O2HI] + + k[5167]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - + k[5191]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - + k[5192]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - + k[5193]*y_cur[IDX_HI]*y_cur[IDX_O2HI] + + k[5209]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - + k[5210]*y_cur[IDX_HCOI]*y_cur[IDX_O2HI] - + k[5282]*y_cur[IDX_NI]*y_cur[IDX_O2HI] - + k[5339]*y_cur[IDX_O2HI]*y_cur[IDX_O2HI] - + k[5339]*y_cur[IDX_O2HI]*y_cur[IDX_O2HI] + + k[5398]*y_cur[IDX_OI]*y_cur[IDX_H2O2I] - + k[5427]*y_cur[IDX_OI]*y_cur[IDX_O2HI] + + k[5467]*y_cur[IDX_OHI]*y_cur[IDX_H2O2I] + + k[5474]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - + k[5478]*y_cur[IDX_OHI]*y_cur[IDX_O2HI] - k[5899]*y_cur[IDX_O2HI] - + k[6237]*y_cur[IDX_O2HI] - k[6238]*y_cur[IDX_O2HI] - + k[6937]*y_cur[IDX_O2HI] + k[7119]*y_cur[IDX_GO2HI] + + k[7301]*y_cur[IDX_GO2HI] + k[7483]*y_cur[IDX_GO2HI] + + k[8605]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] + + k[8690]*y_cur[IDX_GOI]*y_cur[IDX_GOHI]; + ydot[yistart + IDX_SO2I] = 0.0 + k[127]*y_cur[IDX_O2I]*y_cur[IDX_SM] + - k[315]*y_cur[IDX_CO2II]*y_cur[IDX_SO2I] - + k[416]*y_cur[IDX_HII]*y_cur[IDX_SO2I] - + k[527]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - + k[665]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + + k[680]*y_cur[IDX_O2I]*y_cur[IDX_SO2II] + k[1142]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] - - k[1143]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] - - k[1144]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + - k[2471]*y_cur[IDX_H2I]*y_cur[IDX_SO2II] + - k[2518]*y_cur[IDX_H2OII]*y_cur[IDX_SO2I] - - k[2555]*y_cur[IDX_H2OI]*y_cur[IDX_HSO2II] + + k[1427]*y_cur[IDX_CII]*y_cur[IDX_SO2I] - + k[2282]*y_cur[IDX_COII]*y_cur[IDX_SO2I] - + k[2518]*y_cur[IDX_H2OII]*y_cur[IDX_SO2I] + + k[2555]*y_cur[IDX_H2OI]*y_cur[IDX_HSO2II] - k[2741]*y_cur[IDX_H3II]*y_cur[IDX_SO2I] - - k[3590]*y_cur[IDX_NH3I]*y_cur[IDX_HSO2II] - - k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - - k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - - k[6757]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HSiO2II] = 0.0 - - k[1145]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] - - k[1146]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] + - k[2759]*y_cur[IDX_H3II]*y_cur[IDX_SiO2I] + - k[3004]*y_cur[IDX_HCOII]*y_cur[IDX_SiO2I] - - k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - - k[6724]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HSiSII] = 0.0 - - k[1147]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] - - k[1148]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] - - k[2556]*y_cur[IDX_H2OI]*y_cur[IDX_HSiSII] - - k[2580]*y_cur[IDX_H2SI]*y_cur[IDX_HSiSII] + - k[2761]*y_cur[IDX_H3II]*y_cur[IDX_SiSI] - - k[2880]*y_cur[IDX_HCNI]*y_cur[IDX_HSiSII] + - k[3006]*y_cur[IDX_HCOII]*y_cur[IDX_SiSI] - - k[3591]*y_cur[IDX_NH3I]*y_cur[IDX_HSiSII] + - k[3883]*y_cur[IDX_SiH2II]*y_cur[IDX_SI] - - k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] - - k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HeI] = 0.0 + - k[458]*y_cur[IDX_H2I]*y_cur[IDX_HeII] + - k[491]*y_cur[IDX_HI]*y_cur[IDX_HeII] + - k[506]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[507]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[508]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + - k[509]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[510]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[511]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + - k[512]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + - k[513]*y_cur[IDX_HeII]*y_cur[IDX_CI] + - k[514]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[515]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + + k[3303]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - + k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + + k[3590]*y_cur[IDX_NH3I]*y_cur[IDX_HSO2II] - + k[3651]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + + k[3857]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - + k[4985]*y_cur[IDX_CI]*y_cur[IDX_SO2I] + + k[5338]*y_cur[IDX_O2I]*y_cur[IDX_SOI] - + k[5438]*y_cur[IDX_OI]*y_cur[IDX_SO2I] + + k[5481]*y_cur[IDX_OHI]*y_cur[IDX_SOI] - + k[5489]*y_cur[IDX_SI]*y_cur[IDX_SO2I] + + k[5583]*y_cur[IDX_OI]*y_cur[IDX_SOI] - k[5914]*y_cur[IDX_SO2I] - + k[6256]*y_cur[IDX_SO2I] + + k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - + k[7032]*y_cur[IDX_SO2I] + k[7214]*y_cur[IDX_GSO2I] + + k[7396]*y_cur[IDX_GSO2I] + k[7578]*y_cur[IDX_GSO2I] + + k[8697]*y_cur[IDX_GOI]*y_cur[IDX_GSOI]; + ydot[yistart + IDX_SiCI] = 0.0 - + k[198]*y_cur[IDX_CII]*y_cur[IDX_SiCI] - + k[425]*y_cur[IDX_HII]*y_cur[IDX_SiCI] - + k[705]*y_cur[IDX_SII]*y_cur[IDX_SiCI] + + k[1110]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + + k[1225]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] + + k[1233]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + + k[1244]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] - + k[1434]*y_cur[IDX_CII]*y_cur[IDX_SiCI] - + k[2750]*y_cur[IDX_H3II]*y_cur[IDX_SiCI] - + k[2821]*y_cur[IDX_H3OII]*y_cur[IDX_SiCI] - + k[2997]*y_cur[IDX_HCOII]*y_cur[IDX_SiCI] - + k[3316]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] - + k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] - + k[3792]*y_cur[IDX_OHII]*y_cur[IDX_SiCI] + + k[4990]*y_cur[IDX_CI]*y_cur[IDX_SiHI] - + k[5292]*y_cur[IDX_NI]*y_cur[IDX_SiCI] - + k[5293]*y_cur[IDX_NI]*y_cur[IDX_SiCI] + + k[5440]*y_cur[IDX_OI]*y_cur[IDX_SiC2I] - + k[5443]*y_cur[IDX_OI]*y_cur[IDX_SiCI] - + k[5444]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + k[5918]*y_cur[IDX_SiC2I] - + k[5924]*y_cur[IDX_SiCI] + k[5925]*y_cur[IDX_SiCH2I] + + k[6193]*y_cur[IDX_HCSiI] + k[6263]*y_cur[IDX_SiC3I] - + k[6267]*y_cur[IDX_SiCI] + + k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + + k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + + k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] - + k[6955]*y_cur[IDX_SiCI] + k[7137]*y_cur[IDX_GSiCI] + + k[7319]*y_cur[IDX_GSiCI] + k[7501]*y_cur[IDX_GSiCI]; + ydot[yistart + IDX_C2H5OHI] = 0.0 - + k[150]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] - + k[328]*y_cur[IDX_HII]*y_cur[IDX_C2H5OHI] + + k[777]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] - + k[1307]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] - + k[1724]*y_cur[IDX_C2H5OHI]*y_cur[IDX_S2II] - + k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - + k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - + k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - + k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - + k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2661]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2768]*y_cur[IDX_H3OII]*y_cur[IDX_C2H5OHI] - + k[2903]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5OHI] - + k[3013]*y_cur[IDX_HCSII]*y_cur[IDX_C2H5OHI] - + k[3085]*y_cur[IDX_HeII]*y_cur[IDX_C2H5OHI] + + k[3559]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5OH2II] - + k[3859]*y_cur[IDX_SiII]*y_cur[IDX_C2H5OHI] - + k[5706]*y_cur[IDX_C2H5OHI] - k[5707]*y_cur[IDX_C2H5OHI] - + k[5991]*y_cur[IDX_C2H5OHI] - k[5992]*y_cur[IDX_C2H5OHI] + + k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - + k[6987]*y_cur[IDX_C2H5OHI] + k[7169]*y_cur[IDX_GC2H5OHI] + + k[7351]*y_cur[IDX_GC2H5OHI] + k[7533]*y_cur[IDX_GC2H5OHI] + + k[8753]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI]; + ydot[yistart + IDX_HNOI] = 0.0 + + k[626]*y_cur[IDX_NOI]*y_cur[IDX_HNOII] + + k[1010]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] - + k[2349]*y_cur[IDX_HII]*y_cur[IDX_HNOI] - + k[2709]*y_cur[IDX_H3II]*y_cur[IDX_HNOI] - + k[3265]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - + k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - + k[5000]*y_cur[IDX_CH2I]*y_cur[IDX_HNOI] - + k[5034]*y_cur[IDX_CH3I]*y_cur[IDX_HNOI] + + k[5037]*y_cur[IDX_CH3I]*y_cur[IDX_NO2I] - + k[5078]*y_cur[IDX_CHI]*y_cur[IDX_HNOI] - + k[5119]*y_cur[IDX_CNI]*y_cur[IDX_HNOI] - + k[5127]*y_cur[IDX_COI]*y_cur[IDX_HNOI] - + k[5175]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - + k[5176]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - + k[5177]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + + k[5203]*y_cur[IDX_HCNOI]*y_cur[IDX_OI] - + k[5206]*y_cur[IDX_HCOI]*y_cur[IDX_HNOI] + + k[5207]*y_cur[IDX_HCOI]*y_cur[IDX_NOI] - + k[5269]*y_cur[IDX_NI]*y_cur[IDX_HNOI] - + k[5270]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + + k[5311]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] + + k[5316]*y_cur[IDX_NHI]*y_cur[IDX_O2I] + + k[5322]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - + k[5326]*y_cur[IDX_NOI]*y_cur[IDX_HNOI] - + k[5411]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - + k[5412]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - + k[5413]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + + k[5420]*y_cur[IDX_OI]*y_cur[IDX_NH2I] - + k[5472]*y_cur[IDX_OHI]*y_cur[IDX_HNOI] + + k[5473]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - k[5869]*y_cur[IDX_HNOI] - + k[6200]*y_cur[IDX_HNOI] + + k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] - + k[6930]*y_cur[IDX_HNOI] + k[7112]*y_cur[IDX_GHNOI] + + k[7294]*y_cur[IDX_GHNOI] + k[7476]*y_cur[IDX_GHNOI] + + k[8604]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] + + k[8687]*y_cur[IDX_GOI]*y_cur[IDX_GNHI]; + ydot[yistart + IDX_N2OI] = 0.0 - + k[399]*y_cur[IDX_HII]*y_cur[IDX_N2OI] + + k[482]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] + + k[485]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] - + k[659]*y_cur[IDX_OII]*y_cur[IDX_N2OI] - + k[1416]*y_cur[IDX_CII]*y_cur[IDX_N2OI] - + k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] - + k[2234]*y_cur[IDX_CH5II]*y_cur[IDX_N2OI] - + k[2354]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - + k[2719]*y_cur[IDX_H3II]*y_cur[IDX_N2OI] - + k[2978]*y_cur[IDX_HCOII]*y_cur[IDX_N2OI] - + k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - + k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - + k[3277]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - + k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - + k[5128]*y_cur[IDX_COI]*y_cur[IDX_N2OI] - + k[5179]*y_cur[IDX_HI]*y_cur[IDX_N2OI] - + k[5180]*y_cur[IDX_HI]*y_cur[IDX_N2OI] + + k[5220]*y_cur[IDX_N2I]*y_cur[IDX_O2I] + + k[5269]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + + k[5276]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + + k[5312]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] + + k[5315]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + + k[5326]*y_cur[IDX_NOI]*y_cur[IDX_HNOI] - + k[5327]*y_cur[IDX_NOI]*y_cur[IDX_N2OI] + + k[5328]*y_cur[IDX_NOI]*y_cur[IDX_NOI] + + k[5332]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - + k[5418]*y_cur[IDX_OI]*y_cur[IDX_N2OI] - + k[5419]*y_cur[IDX_OI]*y_cur[IDX_N2OI] - + k[5473]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - + k[5474]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - k[5879]*y_cur[IDX_N2OI] - + k[6212]*y_cur[IDX_N2OI] - k[6213]*y_cur[IDX_N2OI] - + k[6214]*y_cur[IDX_N2OI] - k[6974]*y_cur[IDX_N2OI] + + k[7156]*y_cur[IDX_GN2OI] + k[7338]*y_cur[IDX_GN2OI] + + k[7520]*y_cur[IDX_GN2OI]; + ydot[yistart + IDX_SiH3I] = 0.0 - + k[202]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - + k[429]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + + k[1257]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] + + k[1258]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] - + k[1441]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - + k[1442]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + + k[1684]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] + + k[2291]*y_cur[IDX_COI]*y_cur[IDX_SiH4II] - + k[2363]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + + k[2572]*y_cur[IDX_H2OI]*y_cur[IDX_SiH4II] - + k[2754]*y_cur[IDX_H3II]*y_cur[IDX_SiH3I] - + k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - + k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - + k[4989]*y_cur[IDX_CI]*y_cur[IDX_SiH3I] + + k[5126]*y_cur[IDX_CNI]*y_cur[IDX_SiH4I] - + k[5295]*y_cur[IDX_NI]*y_cur[IDX_SiH3I] - + k[5447]*y_cur[IDX_OI]*y_cur[IDX_SiH3I] + + k[5448]*y_cur[IDX_OI]*y_cur[IDX_SiH4I] - k[5928]*y_cur[IDX_SiH3I] - + k[6274]*y_cur[IDX_SiH3I] - k[6275]*y_cur[IDX_SiH3I] - + k[6276]*y_cur[IDX_SiH3I] + k[6278]*y_cur[IDX_SiH4I] + + k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + + k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - + k[6927]*y_cur[IDX_SiH3I] + k[7109]*y_cur[IDX_GSiH3I] + + k[7291]*y_cur[IDX_GSiH3I] + k[7473]*y_cur[IDX_GSiH3I] + + k[8602]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I]; + ydot[yistart + IDX_CH3OH2II] = 0.0 - + k[963]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] - + k[964]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] - + k[965]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] - + k[966]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] - + k[967]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[1937]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - + k[2120]*y_cur[IDX_CH3OH2II]*y_cur[IDX_HCOOHI] - + k[2121]*y_cur[IDX_CH3OH2II]*y_cur[IDX_NH3I] + + k[2124]*y_cur[IDX_CH3OHI]*y_cur[IDX_C4H3II] - + k[2125]*y_cur[IDX_CH3OHI]*y_cur[IDX_CH3OH2II] + + k[2126]*y_cur[IDX_CH3OHI]*y_cur[IDX_HC3NHII] + + k[2127]*y_cur[IDX_CH3OHI]*y_cur[IDX_HCOOH2II] + + k[2128]*y_cur[IDX_CH3OHI]*y_cur[IDX_NCCNHII] + + k[2131]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH3II] + + k[2137]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] + + k[2487]*y_cur[IDX_H2COII]*y_cur[IDX_CH3OHI] - + k[2494]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] - + k[2495]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + + k[2668]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] + + k[2762]*y_cur[IDX_H3COII]*y_cur[IDX_CH3OHI] + + k[2795]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OHI] - + k[2873]*y_cur[IDX_HCNI]*y_cur[IDX_CH3OH2II] + + k[2954]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OHI] + + k[5536]*y_cur[IDX_CH3II]*y_cur[IDX_H2OI] - + k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - + k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - + k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - + k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - + k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2NII] = 0.0 + + k[183]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] + + k[330]*y_cur[IDX_HII]*y_cur[IDX_C2NI] - + k[780]*y_cur[IDX_C2NII]*y_cur[IDX_eM] - + k[781]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + + k[1398]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + + k[1413]*y_cur[IDX_CII]*y_cur[IDX_HNCI] - + k[1540]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - + k[1541]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] + + k[1944]*y_cur[IDX_CHII]*y_cur[IDX_CNI] + + k[1956]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - + k[2525]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] - + k[2526]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] - + k[2575]*y_cur[IDX_H2SI]*y_cur[IDX_C2NII] + + k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3351]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] + + k[3385]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + + k[3387]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + + k[3460]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] + + k[3478]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - + k[3561]*y_cur[IDX_NH3I]*y_cur[IDX_C2NII] + + k[3606]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - + k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] - + k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C5II] = 0.0 - + k[236]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + + k[343]*y_cur[IDX_HII]*y_cur[IDX_C5I] - + k[838]*y_cur[IDX_C5II]*y_cur[IDX_eM] + + k[1320]*y_cur[IDX_CII]*y_cur[IDX_C4HI] + + k[1321]*y_cur[IDX_CII]*y_cur[IDX_C4PI] + + k[1322]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - + k[1556]*y_cur[IDX_C2H2I]*y_cur[IDX_C5II] - + k[1698]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - + k[1699]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - + k[1700]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + + k[1862]*y_cur[IDX_CI]*y_cur[IDX_C4HII] + + k[1863]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] - + k[2176]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - + k[2177]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - + k[2178]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - + k[2179]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + + k[2305]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - + k[2414]*y_cur[IDX_H2I]*y_cur[IDX_C5II] - + k[2871]*y_cur[IDX_HCNI]*y_cur[IDX_C5II] + + k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + + k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + + k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + + k[5497]*y_cur[IDX_CII]*y_cur[IDX_C4I] - + k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C6H3II] = 0.0 - + k[854]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] - + k[855]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + + k[1358]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + + k[1359]*y_cur[IDX_CII]*y_cur[IDX_CH3C5NI] + + k[1521]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + + k[1552]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] + + k[1588]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + + k[1595]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + + k[1622]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + + k[1632]*y_cur[IDX_C2H3I]*y_cur[IDX_C4HII] + + k[1633]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + + k[1655]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] + + k[1737]*y_cur[IDX_C2HI]*y_cur[IDX_C4H3II] + + k[1760]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] + + k[1783]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] + + k[1786]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] + + k[1794]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] + + k[1821]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] + + k[1829]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] - + k[1874]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - + k[1875]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] + + k[2053]*y_cur[IDX_CH3II]*y_cur[IDX_C5H2I] + + k[2179]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + + k[2476]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + + k[2485]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + + k[2618]*y_cur[IDX_H3II]*y_cur[IDX_C6H2I] + + k[2850]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] + + k[2923]*y_cur[IDX_HCOII]*y_cur[IDX_C6H2I] - + k[3711]*y_cur[IDX_OI]*y_cur[IDX_C6H3II] - + k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] - + k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C8H3II] = 0.0 - + k[883]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] - + k[884]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + + k[1362]*y_cur[IDX_CII]*y_cur[IDX_CH3C7NI] + + k[1496]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + + k[1596]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + + k[1601]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + + k[1639]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + + k[1663]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] + + k[1764]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] + + k[1791]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] + + k[1798]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] + + k[1801]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] + + k[1838]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] + + k[1844]*y_cur[IDX_C4HI]*y_cur[IDX_C4H3II] - + k[1883]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - + k[1884]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] + + k[2022]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] + + k[2025]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] + + k[2037]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + + k[2057]*y_cur[IDX_CH3II]*y_cur[IDX_C7H2I] + + k[2482]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + + k[2626]*y_cur[IDX_H3II]*y_cur[IDX_C8H2I] + + k[2931]*y_cur[IDX_HCOII]*y_cur[IDX_C8H2I] - + k[3720]*y_cur[IDX_OI]*y_cur[IDX_C8H3II] - + k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] - + k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C9HII] = 0.0 + + k[357]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - + k[891]*y_cur[IDX_C9HII]*y_cur[IDX_eM] - + k[892]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + + k[1299]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + + k[1336]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] + + k[1406]*y_cur[IDX_CII]*y_cur[IDX_HC9NI] + + k[1501]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] + + k[1769]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] + + k[1833]*y_cur[IDX_C4HII]*y_cur[IDX_C5HI] + + k[1882]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + + k[1883]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - + k[1885]*y_cur[IDX_CI]*y_cur[IDX_C9HII] + + k[2293]*y_cur[IDX_HII]*y_cur[IDX_C10I] + + k[2312]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] + + k[2424]*y_cur[IDX_H2I]*y_cur[IDX_C9II] - + k[2425]*y_cur[IDX_H2I]*y_cur[IDX_C9HII] + + k[2628]*y_cur[IDX_H3II]*y_cur[IDX_C9I] + + k[2933]*y_cur[IDX_HCOII]*y_cur[IDX_C9I] + + k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - + k[3446]*y_cur[IDX_NI]*y_cur[IDX_C9HII] + + k[3680]*y_cur[IDX_OI]*y_cur[IDX_C10HII] - + k[3722]*y_cur[IDX_OI]*y_cur[IDX_C9HII] + k[6066]*y_cur[IDX_C9HI] - + k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] - + k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C9H3II] = 0.0 - + k[895]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] - + k[896]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + + k[1500]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + + k[1561]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + + k[1603]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + + k[1607]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + + k[1641]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + + k[1768]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] + + k[1793]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + + k[1802]*y_cur[IDX_C3H3II]*y_cur[IDX_C6H2I] + + k[1804]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] + + k[1835]*y_cur[IDX_C4H2II]*y_cur[IDX_C5H2I] + + k[1839]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] + + k[1841]*y_cur[IDX_C4H3II]*y_cur[IDX_C5HI] - + k[1888]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] - + k[1889]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + + k[2026]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6H2I] + + k[2028]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] + + k[2039]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + + k[2059]*y_cur[IDX_CH3II]*y_cur[IDX_C8H2I] + + k[2484]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + + k[2629]*y_cur[IDX_H3II]*y_cur[IDX_C9H2I] + + k[2934]*y_cur[IDX_HCOII]*y_cur[IDX_C9H2I] - + k[3450]*y_cur[IDX_NI]*y_cur[IDX_C9H3II] - + k[3725]*y_cur[IDX_OI]*y_cur[IDX_C9H3II] + + k[5577]*y_cur[IDX_C4H2I]*y_cur[IDX_C5HII] - + k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] - + k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2COI] = 0.0 - + k[164]*y_cur[IDX_CII]*y_cur[IDX_CH2COI] + + k[937]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + + k[948]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + + k[1287]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1293]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[2639]*y_cur[IDX_H3II]*y_cur[IDX_CH2COI] - + k[2786]*y_cur[IDX_H3OII]*y_cur[IDX_CH2COI] - + k[2940]*y_cur[IDX_HCOII]*y_cur[IDX_CH2COI] - + k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] - + k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + + k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3854]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[5157]*y_cur[IDX_HI]*y_cur[IDX_CH2COI] + + k[5345]*y_cur[IDX_OI]*y_cur[IDX_C2H3I] + + k[5347]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + + k[5381]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + + k[5454]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - k[5789]*y_cur[IDX_CH2COI] + - k[5790]*y_cur[IDX_CH2COI] + k[5811]*y_cur[IDX_CH3COCH3I] - + k[6091]*y_cur[IDX_CH2COI] - k[6092]*y_cur[IDX_CH2COI] + + k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + + k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + + k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6961]*y_cur[IDX_CH2COI] + k[7143]*y_cur[IDX_GCH2COI] + + k[7325]*y_cur[IDX_GCH2COI] + k[7507]*y_cur[IDX_GCH2COI] + + k[8620]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI]; + ydot[yistart + IDX_HNC3I] = 0.0 + + k[1069]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] - + k[1115]*y_cur[IDX_HNC3I]*y_cur[IDX_eM] - + k[3016]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - + k[3017]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - + k[3018]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - + k[3019]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - + k[3020]*y_cur[IDX_HNC3I]*y_cur[IDX_CH3II] - + k[3021]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3022]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3023]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3024]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3025]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3026]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3027]*y_cur[IDX_HNC3I]*y_cur[IDX_H3II] - + k[3028]*y_cur[IDX_HNC3I]*y_cur[IDX_H3OII] - + k[3029]*y_cur[IDX_HNC3I]*y_cur[IDX_HCOII] - + k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3032]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3035]*y_cur[IDX_HNC3I]*y_cur[IDX_N2HII] - + k[5212]*y_cur[IDX_HNC3I]*y_cur[IDX_CI] - + k[5213]*y_cur[IDX_HNC3I]*y_cur[IDX_HI] - k[5866]*y_cur[IDX_HNC3I] - + k[6197]*y_cur[IDX_HNC3I] + + k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - + k[7000]*y_cur[IDX_HNC3I] + k[7182]*y_cur[IDX_GHNC3I] + + k[7364]*y_cur[IDX_GHNC3I] + k[7546]*y_cur[IDX_GHNC3I]; + ydot[yistart + IDX_OCNI] = 0.0 + + k[1117]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + + k[1126]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] - + k[1424]*y_cur[IDX_CII]*y_cur[IDX_OCNI] - + k[3291]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] - + k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] - + k[3767]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - + k[3768]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - + k[4979]*y_cur[IDX_CI]*y_cur[IDX_OCNI] + + k[5085]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + + k[5120]*y_cur[IDX_CNI]*y_cur[IDX_NO2I] + + k[5122]*y_cur[IDX_CNI]*y_cur[IDX_NOI] + + k[5124]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - + k[5194]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - + k[5195]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - + k[5196]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + + k[5216]*y_cur[IDX_HOCNI]*y_cur[IDX_OI] + + k[5267]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - + k[5331]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - + k[5332]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - + k[5335]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] - + k[5336]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] + + k[5372]*y_cur[IDX_OI]*y_cur[IDX_C7NI] + + k[5377]*y_cur[IDX_OI]*y_cur[IDX_C9NI] + + k[5396]*y_cur[IDX_OI]*y_cur[IDX_H2CNI] + + k[5404]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - + k[5428]*y_cur[IDX_OI]*y_cur[IDX_OCNI] - + k[5429]*y_cur[IDX_OI]*y_cur[IDX_OCNI] + + k[5460]*y_cur[IDX_OHI]*y_cur[IDX_CNI] + + k[5475]*y_cur[IDX_OHI]*y_cur[IDX_NCCNI] - k[5901]*y_cur[IDX_OCNI] - + k[6239]*y_cur[IDX_OCNI] + + k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + + k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] - + k[6964]*y_cur[IDX_OCNI] + k[7146]*y_cur[IDX_GOCNI] + + k[7328]*y_cur[IDX_GOCNI] + k[7510]*y_cur[IDX_GOCNI] + + k[8692]*y_cur[IDX_GOI]*y_cur[IDX_GCNI]; + ydot[yistart + IDX_SiCH2II] = 0.0 + + k[199]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + + k[426]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] - + k[1242]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] - + k[1243]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] - + k[1244]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + + k[1442]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + + k[1443]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - + k[1920]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - + k[1921]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - + k[1922]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + + k[1927]*y_cur[IDX_CI]*y_cur[IDX_SiH3II] + + k[1928]*y_cur[IDX_CI]*y_cur[IDX_SiH4II] + + k[2098]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] + + k[2100]*y_cur[IDX_CH3II]*y_cur[IDX_SiHI] + + k[2103]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + + k[2361]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] + + k[2452]*y_cur[IDX_H2I]*y_cur[IDX_HCSiII] + + k[2703]*y_cur[IDX_H3II]*y_cur[IDX_HCSiI] + + k[2809]*y_cur[IDX_H3OII]*y_cur[IDX_HCSiI] + + k[2973]*y_cur[IDX_HCOII]*y_cur[IDX_HCSiI] + + k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - + k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] - + k[3754]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - + k[3755]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - + k[3841]*y_cur[IDX_SI]*y_cur[IDX_SiCH2II] + + k[3866]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + + k[6269]*y_cur[IDX_SiCH2I] - + k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - + k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - + k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiHII] = 0.0 + + k[431]*y_cur[IDX_HII]*y_cur[IDX_SiHI] + + k[725]*y_cur[IDX_SiHI]*y_cur[IDX_SII] - + k[1250]*y_cur[IDX_SiHII]*y_cur[IDX_eM] + + k[1532]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1925]*y_cur[IDX_CI]*y_cur[IDX_SiHII] - + k[2267]*y_cur[IDX_CHI]*y_cur[IDX_SiHII] + + k[2362]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - + k[2571]*y_cur[IDX_H2OI]*y_cur[IDX_SiHII] + + k[2743]*y_cur[IDX_H3II]*y_cur[IDX_SiI] + + k[2818]*y_cur[IDX_H3OII]*y_cur[IDX_SiI] - + k[2848]*y_cur[IDX_HI]*y_cur[IDX_SiHII] + + k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + + k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + + k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + + k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + + k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + + k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - + k[3471]*y_cur[IDX_NI]*y_cur[IDX_SiHII] - + k[3603]*y_cur[IDX_NH3I]*y_cur[IDX_SiHII] - + k[3756]*y_cur[IDX_OI]*y_cur[IDX_SiHII] + + k[3791]*y_cur[IDX_OHII]*y_cur[IDX_SiI] + + k[3881]*y_cur[IDX_SiI]*y_cur[IDX_HCOII] - + k[5564]*y_cur[IDX_H2I]*y_cur[IDX_SiHII] + + k[5575]*y_cur[IDX_HI]*y_cur[IDX_SiII] - k[6271]*y_cur[IDX_SiHII] - + k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3COCH3I] = 0.0 - + k[168]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - + k[270]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - + k[368]*y_cur[IDX_HII]*y_cur[IDX_CH3COCH3I] - + k[713]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] + + k[953]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] - + k[1380]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - + k[1723]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_CH3COCH3I] - + k[2070]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - + k[2071]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - + k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2661]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2663]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2665]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2793]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COCH3I] - + k[2952]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COCH3I] - + k[3014]*y_cur[IDX_HCSII]*y_cur[IDX_CH3COCH3I] - + k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] - + k[3857]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - + k[5811]*y_cur[IDX_CH3COCH3I] - k[5812]*y_cur[IDX_CH3COCH3I] - + k[5813]*y_cur[IDX_CH3COCH3I] - k[6116]*y_cur[IDX_CH3COCH3I] - + k[6117]*y_cur[IDX_CH3COCH3I] + + k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - + k[7018]*y_cur[IDX_CH3COCH3I] + k[7200]*y_cur[IDX_GCH3COCH3I] + + k[7382]*y_cur[IDX_GCH3COCH3I] + k[7568]*y_cur[IDX_GCH3COCH3I] + + k[8754]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI]; + ydot[yistart + IDX_HC3NII] = 0.0 - + k[229]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - + k[239]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] + + k[383]*y_cur[IDX_HII]*y_cur[IDX_HC3NI] - + k[493]*y_cur[IDX_C4H2I]*y_cur[IDX_HC3NII] - + k[607]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NII] - + k[1063]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] - + k[1064]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] - + k[1065]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + + k[1475]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - + k[1565]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - + k[1707]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] - + k[2196]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - + k[2197]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - + k[2198]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + + k[2277]*y_cur[IDX_CNI]*y_cur[IDX_C2H2II] + + k[2409]*y_cur[IDX_H2I]*y_cur[IDX_C3NII] - + k[2444]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] - + k[2445]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] + + k[2604]*y_cur[IDX_H3II]*y_cur[IDX_C3NI] + + k[2774]*y_cur[IDX_H3OII]*y_cur[IDX_C3NI] + + k[2909]*y_cur[IDX_HCOII]*y_cur[IDX_C3NI] + + k[3023]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3460]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - + k[3461]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - + k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - + k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - + k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C8H2I] = 0.0 + + k[102]*y_cur[IDX_HI]*y_cur[IDX_C8HM] - + k[353]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] + + k[883]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + + k[885]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + + k[887]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] - + k[1335]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] - + k[1336]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] - + k[1503]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] - + k[1504]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] - + k[2059]*y_cur[IDX_CH3II]*y_cur[IDX_C8H2I] - + k[2310]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] - + k[2626]*y_cur[IDX_H3II]*y_cur[IDX_C8H2I] - + k[2931]*y_cur[IDX_HCOII]*y_cur[IDX_C8H2I] - + k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - + k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - + k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3725]*y_cur[IDX_OI]*y_cur[IDX_C9H3II] + + k[4891]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2I] - + k[4893]*y_cur[IDX_C2HI]*y_cur[IDX_C8H2I] - + k[4939]*y_cur[IDX_CI]*y_cur[IDX_C8H2I] + + k[4951]*y_cur[IDX_CI]*y_cur[IDX_CH3C6HI] - + k[5108]*y_cur[IDX_CNI]*y_cur[IDX_C8H2I] - k[5764]*y_cur[IDX_C8H2I] - + k[6055]*y_cur[IDX_C8H2I] - k[6056]*y_cur[IDX_C8H2I] + + k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + + k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + + k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] - + k[7058]*y_cur[IDX_C8H2I] + k[7240]*y_cur[IDX_GC8H2I] + + k[7422]*y_cur[IDX_GC8H2I] + k[7604]*y_cur[IDX_GC8H2I] + + k[8644]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] + + k[8733]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI]; + ydot[yistart + IDX_CO2II] = 0.0 - + k[228]*y_cur[IDX_C2H2I]*y_cur[IDX_CO2II] - + k[238]*y_cur[IDX_C2H4I]*y_cur[IDX_CO2II] - + k[286]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] + + k[298]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + + k[307]*y_cur[IDX_COII]*y_cur[IDX_CO2I] - + k[314]*y_cur[IDX_CO2II]*y_cur[IDX_OCSI] - + k[315]*y_cur[IDX_CO2II]*y_cur[IDX_SO2I] - + k[479]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - + k[484]*y_cur[IDX_H2SI]*y_cur[IDX_CO2II] + k[516]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[517]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[518]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + - k[519]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + - k[520]*y_cur[IDX_HeII]*y_cur[IDX_HCNOI] + - k[521]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + - k[522]*y_cur[IDX_HeII]*y_cur[IDX_HONCI] + - k[523]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + - k[524]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + - k[525]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + - k[526]*y_cur[IDX_HeII]*y_cur[IDX_PI] + - k[527]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + - k[528]*y_cur[IDX_HeII]*y_cur[IDX_SiI] + - k[1149]*y_cur[IDX_HeHII]*y_cur[IDX_eM] - - k[2390]*y_cur[IDX_H2II]*y_cur[IDX_HeI] + - k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] + - k[2458]*y_cur[IDX_H2I]*y_cur[IDX_HeHII] + - k[2845]*y_cur[IDX_HI]*y_cur[IDX_HeHII] + - k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[548]*y_cur[IDX_NII]*y_cur[IDX_CO2I] + + k[564]*y_cur[IDX_N2II]*y_cur[IDX_CO2I] - + k[603]*y_cur[IDX_NH3I]*y_cur[IDX_CO2II] - + k[623]*y_cur[IDX_NOI]*y_cur[IDX_CO2II] - + k[678]*y_cur[IDX_O2I]*y_cur[IDX_CO2II] - + k[683]*y_cur[IDX_OI]*y_cur[IDX_CO2II] - + k[981]*y_cur[IDX_CO2II]*y_cur[IDX_eM] - + k[2191]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - + k[2436]*y_cur[IDX_H2I]*y_cur[IDX_CO2II] - + k[2541]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - + k[2841]*y_cur[IDX_HI]*y_cur[IDX_CO2II] - + k[3730]*y_cur[IDX_OI]*y_cur[IDX_CO2II] - + k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GOHI] = 0.0 + k[6901]*y_cur[IDX_OHI] - + k[7083]*y_cur[IDX_GOHI] - k[7265]*y_cur[IDX_GOHI] - + k[7447]*y_cur[IDX_GOHI] - k[7638]*y_cur[IDX_GOHI] + + k[7639]*y_cur[IDX_GH2OI] + k[7699]*y_cur[IDX_GCH3OHI] + + k[7702]*y_cur[IDX_GCH3OHI] + k[7708]*y_cur[IDX_GH2O2I] + + k[7708]*y_cur[IDX_GH2O2I] + k[7754]*y_cur[IDX_GHONCI] + + k[7755]*y_cur[IDX_GHOCNI] + k[7772]*y_cur[IDX_GC2H5OHI] + + k[7773]*y_cur[IDX_GC2H5OHI] + k[7780]*y_cur[IDX_GHCOOHI] + + k[7882]*y_cur[IDX_GCH2OHI] + k[7884]*y_cur[IDX_GCOOHI] + + k[7892]*y_cur[IDX_GCH3COOHI] - k[7919]*y_cur[IDX_GOHI] - + k[7920]*y_cur[IDX_GOHI] + k[7921]*y_cur[IDX_GH2OI] + + k[7925]*y_cur[IDX_GH2OI] + k[7997]*y_cur[IDX_GCH3OHI] + + k[8002]*y_cur[IDX_GCH3OHI] + k[8006]*y_cur[IDX_GO2HI] + + k[8012]*y_cur[IDX_GH2O2I] + k[8012]*y_cur[IDX_GH2O2I] + + k[8068]*y_cur[IDX_GHONCI] + k[8069]*y_cur[IDX_GHOCNI] + + k[8092]*y_cur[IDX_GC2H5OHI] + k[8093]*y_cur[IDX_GC2H5OHI] + + k[8102]*y_cur[IDX_GHCOOHI] + k[8104]*y_cur[IDX_GHCOOHI] + + k[8265]*y_cur[IDX_GCH2OHI] + k[8267]*y_cur[IDX_GCOOHI] + + k[8271]*y_cur[IDX_GCH3COOHI] + k[8282]*y_cur[IDX_GHI]*y_cur[IDX_GOI] + - k[8283]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] + + k[8310]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - + k[8373]*y_cur[IDX_GH2I]*y_cur[IDX_GOHI] - + k[8408]*y_cur[IDX_GCI]*y_cur[IDX_GOHI] + + k[8434]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + + k[8435]*y_cur[IDX_GOI]*y_cur[IDX_GHNOI] + + k[8436]*y_cur[IDX_GOI]*y_cur[IDX_GO2HI] - + k[8444]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - + k[8504]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI] - + k[8505]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - + k[8506]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - + k[8507]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - + k[8508]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - + k[8509]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] - + k[8510]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOHI] - + k[8511]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - + k[8512]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOOCH3I] - + k[8513]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] - + k[8514]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI] - + k[8514]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI] - + k[8515]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - + k[8516]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - + k[8517]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] - + k[8518]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] - + k[8519]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - + k[8520]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2OHCHOI] - + k[8584]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] - + k[8690]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - + k[8737]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] - + k[8738]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI] - + k[8738]*y_cur[IDX_GOHI]*y_cur[IDX_GOHI] - + k[8739]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - + k[8740]*y_cur[IDX_GOHI]*y_cur[IDX_GHCOI] - + k[8741]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] - + k[8742]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3COI]; + ydot[yistart + IDX_HC5NI] = 0.0 + + k[96]*y_cur[IDX_HI]*y_cur[IDX_C5NM] + + k[117]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - + k[385]*y_cur[IDX_HII]*y_cur[IDX_HC5NI] + + k[932]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] + + k[1029]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + + k[1081]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - + k[1404]*y_cur[IDX_CII]*y_cur[IDX_HC5NI] + + k[2322]*y_cur[IDX_HII]*y_cur[IDX_CH3C5NI] - + k[2691]*y_cur[IDX_H3II]*y_cur[IDX_HC5NI] - + k[2966]*y_cur[IDX_HCOII]*y_cur[IDX_HC5NI] - + k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] - + k[3242]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + + k[4907]*y_cur[IDX_C4HI]*y_cur[IDX_HNCI] + + k[4908]*y_cur[IDX_C4HI]*y_cur[IDX_NCCNI] + + k[5115]*y_cur[IDX_CNI]*y_cur[IDX_C4H2I] + + k[5239]*y_cur[IDX_NI]*y_cur[IDX_C5H2I] - + k[5509]*y_cur[IDX_C2H2II]*y_cur[IDX_HC5NI] - + k[5519]*y_cur[IDX_C4H2II]*y_cur[IDX_HC5NI] - + k[5538]*y_cur[IDX_CH3II]*y_cur[IDX_HC5NI] - k[5850]*y_cur[IDX_HC5NI] + - k[5851]*y_cur[IDX_HC5NI] - k[6175]*y_cur[IDX_HC5NI] - + k[6176]*y_cur[IDX_HC5NI] + + k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + + k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - + k[7045]*y_cur[IDX_HC5NI] + k[7227]*y_cur[IDX_GHC5NI] + + k[7409]*y_cur[IDX_GHC5NI] + k[7591]*y_cur[IDX_GHC5NI] + + k[8640]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] + + k[8708]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI]; + ydot[yistart + IDX_SiHI] = 0.0 - + k[431]*y_cur[IDX_HII]*y_cur[IDX_SiHI] - + k[725]*y_cur[IDX_SiHI]*y_cur[IDX_SII] + + k[1023]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] + + k[1253]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + + k[1255]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] - + k[1445]*y_cur[IDX_CII]*y_cur[IDX_SiHI] - + k[2100]*y_cur[IDX_CH3II]*y_cur[IDX_SiHI] - + k[2365]*y_cur[IDX_HII]*y_cur[IDX_SiHI] - + k[2756]*y_cur[IDX_H3II]*y_cur[IDX_SiHI] - + k[2824]*y_cur[IDX_H3OII]*y_cur[IDX_SiHI] - + k[3002]*y_cur[IDX_HCOII]*y_cur[IDX_SiHI] - + k[3328]*y_cur[IDX_HeII]*y_cur[IDX_SiHI] + + k[3755]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - + k[3793]*y_cur[IDX_OHII]*y_cur[IDX_SiHI] + + k[3869]*y_cur[IDX_SiII]*y_cur[IDX_C4H2I] - + k[3885]*y_cur[IDX_SiHI]*y_cur[IDX_SII] - + k[4990]*y_cur[IDX_CI]*y_cur[IDX_SiHI] - + k[5296]*y_cur[IDX_NI]*y_cur[IDX_SiHI] - + k[5449]*y_cur[IDX_OI]*y_cur[IDX_SiHI] + k[5927]*y_cur[IDX_SiH2I] - + k[5930]*y_cur[IDX_SiHI] + k[6273]*y_cur[IDX_SiH2I] + + k[6276]*y_cur[IDX_SiH3I] + k[6279]*y_cur[IDX_SiH4I] - + k[6280]*y_cur[IDX_SiHI] + + k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + + k[6585]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] - + k[6920]*y_cur[IDX_SiHI] + k[7102]*y_cur[IDX_GSiHI] + + k[7284]*y_cur[IDX_GSiHI] + k[7466]*y_cur[IDX_GSiHI] + + k[8600]*y_cur[IDX_GHI]*y_cur[IDX_GSiI]; + ydot[yistart + IDX_SiH4I] = 0.0 - + k[430]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + + k[1259]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] - + k[1443]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - + k[1444]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - + k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1532]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1533]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1534]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1682]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[1683]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[1684]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[2099]*y_cur[IDX_CH3II]*y_cur[IDX_SiH4I] - + k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] - + k[2364]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + + k[2573]*y_cur[IDX_H2OI]*y_cur[IDX_SiH5II] - + k[2755]*y_cur[IDX_H3II]*y_cur[IDX_SiH4I] - + k[3001]*y_cur[IDX_HCOII]*y_cur[IDX_SiH4I] - + k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - + k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - + k[5126]*y_cur[IDX_CNI]*y_cur[IDX_SiH4I] - + k[5448]*y_cur[IDX_OI]*y_cur[IDX_SiH4I] - k[5929]*y_cur[IDX_SiH4I] - + k[6277]*y_cur[IDX_SiH4I] - k[6278]*y_cur[IDX_SiH4I] - + k[6279]*y_cur[IDX_SiH4I] + + k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - + k[6935]*y_cur[IDX_SiH4I] + k[7117]*y_cur[IDX_GSiH4I] + + k[7299]*y_cur[IDX_GSiH4I] + k[7481]*y_cur[IDX_GSiH4I] + + k[8603]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I]; + ydot[yistart + IDX_C7HII] = 0.0 + + k[351]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - + k[866]*y_cur[IDX_C7HII]*y_cur[IDX_eM] - + k[867]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + + k[1327]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] + + k[1405]*y_cur[IDX_CII]*y_cur[IDX_HC7NI] + + k[1493]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] + + k[1556]*y_cur[IDX_C2H2I]*y_cur[IDX_C5II] + + k[1761]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] + + k[1823]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] + + k[1873]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] + + k[1874]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - + k[1876]*y_cur[IDX_CI]*y_cur[IDX_C7HII] + + k[2308]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] + + k[2419]*y_cur[IDX_H2I]*y_cur[IDX_C7II] - + k[2420]*y_cur[IDX_H2I]*y_cur[IDX_C7HII] + + k[2621]*y_cur[IDX_H3II]*y_cur[IDX_C7I] + + k[2926]*y_cur[IDX_HCOII]*y_cur[IDX_C7I] + + k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + + k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] - + k[3429]*y_cur[IDX_NI]*y_cur[IDX_C7HII] - + k[3713]*y_cur[IDX_OI]*y_cur[IDX_C7HII] + k[6048]*y_cur[IDX_C7HI] - + k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] - + k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C9H2II] = 0.0 + + k[356]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] - + k[893]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] - + k[894]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] + + k[1499]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + + k[1502]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] + + k[1560]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + + k[1606]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + + k[1740]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2II] + + k[1767]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] + + k[1770]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] + + k[1792]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + + k[1803]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] + + k[1827]*y_cur[IDX_C3HI]*y_cur[IDX_C6H2II] + + k[1832]*y_cur[IDX_C4HII]*y_cur[IDX_C5H2I] + + k[1836]*y_cur[IDX_C4H2II]*y_cur[IDX_C5HI] + + k[1845]*y_cur[IDX_C4HI]*y_cur[IDX_C5H2II] + + k[1884]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - + k[1886]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] - + k[1887]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] + + k[2027]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] + + k[2060]*y_cur[IDX_CH3II]*y_cur[IDX_C8HI] + + k[2425]*y_cur[IDX_H2I]*y_cur[IDX_C9HII] + + k[2483]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + + k[2630]*y_cur[IDX_H3II]*y_cur[IDX_C9HI] + + k[2935]*y_cur[IDX_HCOII]*y_cur[IDX_C9HI] - + k[3449]*y_cur[IDX_NI]*y_cur[IDX_C9H2II] - + k[3724]*y_cur[IDX_OI]*y_cur[IDX_C9H2II] + k[6063]*y_cur[IDX_C9H2I] - + k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] - + k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PHI] = 0.0 - k[191]*y_cur[IDX_CII]*y_cur[IDX_PHI] + - k[411]*y_cur[IDX_HII]*y_cur[IDX_PHI] + + k[1018]*y_cur[IDX_H2POII]*y_cur[IDX_eM] + + k[1133]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + + k[1136]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + + k[1186]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + + k[1208]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + + k[1210]*y_cur[IDX_PH3II]*y_cur[IDX_eM] + + k[1213]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + + k[1216]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + + k[2568]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] - + k[2736]*y_cur[IDX_H3II]*y_cur[IDX_PHI] - + k[2985]*y_cur[IDX_HCOII]*y_cur[IDX_PHI] + + k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + + k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] - + k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] + + k[3599]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] + + k[4964]*y_cur[IDX_CI]*y_cur[IDX_HPOI] - + k[4983]*y_cur[IDX_CI]*y_cur[IDX_PHI] - + k[5285]*y_cur[IDX_NI]*y_cur[IDX_PHI] + + k[5407]*y_cur[IDX_OI]*y_cur[IDX_HCPI] + + k[5434]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - + k[5436]*y_cur[IDX_OI]*y_cur[IDX_PHI] + k[5907]*y_cur[IDX_PH2I] - + k[5908]*y_cur[IDX_PHI] + k[6094]*y_cur[IDX_CH2PHI] + + k[6248]*y_cur[IDX_PH2I] - k[6249]*y_cur[IDX_PHI] + + k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + + k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + + k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + + k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + + k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + + k[6623]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] + + k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - + k[6933]*y_cur[IDX_PHI] + k[7115]*y_cur[IDX_GPHI] + + k[7297]*y_cur[IDX_GPHI] + k[7479]*y_cur[IDX_GPHI]; + ydot[yistart + IDX_C7H2I] = 0.0 + + k[100]*y_cur[IDX_HI]*y_cur[IDX_C7HM] - + k[218]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - + k[350]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] + + k[870]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + + k[872]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + + k[874]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] - + k[1332]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] - + k[1333]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] - + k[1499]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - + k[1500]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - + k[1602]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - + k[1603]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - + k[1604]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - + k[1663]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] - + k[1664]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] - + k[2057]*y_cur[IDX_CH3II]*y_cur[IDX_C7H2I] - + k[2308]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] - + k[2622]*y_cur[IDX_H3II]*y_cur[IDX_C7H2I] - + k[2927]*y_cur[IDX_HCOII]*y_cur[IDX_C7H2I] - + k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - + k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - + k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3720]*y_cur[IDX_OI]*y_cur[IDX_C8H3II] + + k[4890]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2I] - + k[4892]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2I] - + k[4935]*y_cur[IDX_CI]*y_cur[IDX_C7H2I] - + k[5245]*y_cur[IDX_NI]*y_cur[IDX_C7H2I] - k[5758]*y_cur[IDX_C7H2I] - + k[6045]*y_cur[IDX_C7H2I] - k[6046]*y_cur[IDX_C7H2I] + + k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + + k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + + k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - + k[7052]*y_cur[IDX_C7H2I] + k[7234]*y_cur[IDX_GC7H2I] + + k[7416]*y_cur[IDX_GC7H2I] + k[7598]*y_cur[IDX_GC7H2I] + + k[8642]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] + + k[8731]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI]; + ydot[yistart + IDX_GCOI] = 0.0 + k[6918]*y_cur[IDX_COI] - + k[7100]*y_cur[IDX_GCOI] - k[7282]*y_cur[IDX_GCOI] - + k[7464]*y_cur[IDX_GCOI] - k[7616]*y_cur[IDX_GCOI] - + k[7675]*y_cur[IDX_GCOI] + k[7682]*y_cur[IDX_GHCOI] + + k[7683]*y_cur[IDX_GHCOI] + k[7692]*y_cur[IDX_GH2COI] + + k[7728]*y_cur[IDX_GC2OI] + k[7742]*y_cur[IDX_GCH2COI] + + k[7745]*y_cur[IDX_GCH2COI] + k[7751]*y_cur[IDX_GHNCOI] + + k[7760]*y_cur[IDX_GCH3CHOI] + k[7764]*y_cur[IDX_GCO2I] + + k[7803]*y_cur[IDX_GC3OI] + k[7819]*y_cur[IDX_GCH3COCH3I] + + k[7821]*y_cur[IDX_GCH3COCH3I] + k[7825]*y_cur[IDX_GHCOOCH3I] + + k[7827]*y_cur[IDX_GOCSI] + k[7830]*y_cur[IDX_GOCSI] + + k[7883]*y_cur[IDX_GCH3COI] + k[7884]*y_cur[IDX_GCOOHI] + + k[7887]*y_cur[IDX_GHC2OI] + k[7888]*y_cur[IDX_GCOOCH3I] + + k[7889]*y_cur[IDX_GCH2OHCOI] - k[7962]*y_cur[IDX_GCOI] + + k[7969]*y_cur[IDX_GHCOI] + k[7970]*y_cur[IDX_GHCOI] + + k[7982]*y_cur[IDX_GH2COI] + k[7983]*y_cur[IDX_GH2COI] + + k[7985]*y_cur[IDX_GH2COI] + k[7986]*y_cur[IDX_GH2COI] + + k[8036]*y_cur[IDX_GC2OI] + k[8053]*y_cur[IDX_GCH2COI] + + k[8056]*y_cur[IDX_GCH2COI] + k[8065]*y_cur[IDX_GHNCOI] + + k[8078]*y_cur[IDX_GCH3CHOI] + k[8082]*y_cur[IDX_GCO2I] + + k[8130]*y_cur[IDX_GC3OI] + k[8146]*y_cur[IDX_GCH3COCH3I] + + k[8148]*y_cur[IDX_GCH3COCH3I] + k[8151]*y_cur[IDX_GOCSI] + + k[8154]*y_cur[IDX_GOCSI] + k[8266]*y_cur[IDX_GCH3COI] + + k[8267]*y_cur[IDX_GCOOHI] + k[8268]*y_cur[IDX_GCOOCH3I] + + k[8269]*y_cur[IDX_GCH2OHCOI] - + k[8294]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] + + k[8348]*y_cur[IDX_GHI]*y_cur[IDX_GOCSI] + + k[8401]*y_cur[IDX_GCI]*y_cur[IDX_GOCNI] + + k[8402]*y_cur[IDX_GCI]*y_cur[IDX_GCNOI] + + k[8406]*y_cur[IDX_GCI]*y_cur[IDX_GOI] + + k[8407]*y_cur[IDX_GCI]*y_cur[IDX_GO2I] + + k[8408]*y_cur[IDX_GCI]*y_cur[IDX_GOHI] + + k[8409]*y_cur[IDX_GCI]*y_cur[IDX_GSOI] + + k[8434]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] - + k[8447]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] - + k[8476]*y_cur[IDX_GSI]*y_cur[IDX_GCOI] - + k[8515]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - + k[8516]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - + k[8526]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI] - + k[8539]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] - + k[8558]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI] - + k[8568]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI] - + k[8594]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] - + k[8693]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] - + k[8714]*y_cur[IDX_GSI]*y_cur[IDX_GCOI] - + k[8739]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] - + k[8744]*y_cur[IDX_GNHI]*y_cur[IDX_GCOI] - + k[8750]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] - + k[8760]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCOI] - + k[8761]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_HCSII] = 0.0 - + k[1107]*y_cur[IDX_HCSII]*y_cur[IDX_eM] - + k[1108]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + + k[1395]*y_cur[IDX_CII]*y_cur[IDX_H2SI] + + k[1717]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] + + k[1900]*y_cur[IDX_CI]*y_cur[IDX_H2SII] + + k[1955]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] + + k[1970]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] + + k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + + k[1993]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] + + k[1994]*y_cur[IDX_CH2II]*y_cur[IDX_SI] + + k[2017]*y_cur[IDX_CH2I]*y_cur[IDX_SII] + + k[2095]*y_cur[IDX_CH3II]*y_cur[IDX_SI] + + k[2192]*y_cur[IDX_CH4I]*y_cur[IDX_CSII] + + k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + + k[2438]*y_cur[IDX_H2I]*y_cur[IDX_CSII] + + k[2575]*y_cur[IDX_H2SI]*y_cur[IDX_C2NII] + + k[2578]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + + k[2678]*y_cur[IDX_H3II]*y_cur[IDX_CSI] + + k[2797]*y_cur[IDX_H3OII]*y_cur[IDX_CSI] + + k[2956]*y_cur[IDX_HCOII]*y_cur[IDX_CSI] - + k[3013]*y_cur[IDX_HCSII]*y_cur[IDX_C2H5OHI] - + k[3014]*y_cur[IDX_HCSII]*y_cur[IDX_CH3COCH3I] - + k[3587]*y_cur[IDX_NH3I]*y_cur[IDX_HCSII] - + k[3738]*y_cur[IDX_OI]*y_cur[IDX_HCSII] - + k[3739]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + + k[3826]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + + k[3846]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + + k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[5862]*y_cur[IDX_HCSI] + k[6191]*y_cur[IDX_HCSI] - + k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] - + k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PHII] = 0.0 + + k[191]*y_cur[IDX_CII]*y_cur[IDX_PHI] + + k[411]*y_cur[IDX_HII]*y_cur[IDX_PHI] - + k[1205]*y_cur[IDX_PHII]*y_cur[IDX_eM] - + k[1570]*y_cur[IDX_C2H2I]*y_cur[IDX_PHII] - + k[1711]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - + k[1712]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - + k[2212]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] - + k[2213]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] - + k[2564]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - + k[2565]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - + k[2566]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + + k[2734]*y_cur[IDX_H3II]*y_cur[IDX_PI] - + k[2884]*y_cur[IDX_HCNI]*y_cur[IDX_PHII] + + k[2983]*y_cur[IDX_HCOII]*y_cur[IDX_PI] + + k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + + k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - + k[3596]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - + k[3597]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - + k[3598]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + + k[3737]*y_cur[IDX_OI]*y_cur[IDX_HCPII] + + k[3741]*y_cur[IDX_OI]*y_cur[IDX_HPOII] - + k[3751]*y_cur[IDX_OI]*y_cur[IDX_PHII] - + k[3816]*y_cur[IDX_PHII]*y_cur[IDX_CH3OHI] - + k[3817]*y_cur[IDX_PHII]*y_cur[IDX_H2SI] - + k[3818]*y_cur[IDX_PHII]*y_cur[IDX_O2I] - + k[5560]*y_cur[IDX_H2I]*y_cur[IDX_PHII] - + k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3H4II] = 0.0 + + k[161]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + + k[165]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + + k[220]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + + k[365]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] + + k[669]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + + k[711]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[799]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] - + k[800]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] - + k[801]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] - + k[802]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[1513]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - + k[1547]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H4II] + + k[1608]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + + k[1691]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - + k[1808]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - + k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - + k[1810]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - + k[1811]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - + k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - + k[1813]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - + k[1859]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] - + k[1860]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] + + k[2044]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + + k[2152]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + + k[2154]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + + k[2196]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + + k[2636]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCHI] + + k[2785]*y_cur[IDX_H3OII]*y_cur[IDX_CH2CCHI] - + k[2832]*y_cur[IDX_HI]*y_cur[IDX_C3H4II] + + k[2938]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CCHI] - + k[3399]*y_cur[IDX_NI]*y_cur[IDX_C3H4II] - + k[3697]*y_cur[IDX_OI]*y_cur[IDX_C3H4II] + + k[5780]*y_cur[IDX_CH2CCH2I] + k[5801]*y_cur[IDX_CH3CCHI] + + k[6080]*y_cur[IDX_CH2CCH2I] + k[6105]*y_cur[IDX_CH3CCHI] - + k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - + k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - + k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - + k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C8H2II] = 0.0 + + k[353]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] - + k[881]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] - + k[882]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + + k[1361]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] + + k[1495]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + + k[1498]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] + + k[1559]*y_cur[IDX_C2H2I]*y_cur[IDX_C6HII] + + k[1600]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + + k[1665]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] + + k[1739]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2II] + + k[1763]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] + + k[1766]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] + + k[1790]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] + + k[1800]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] + + k[1826]*y_cur[IDX_C3HI]*y_cur[IDX_C5H2II] + + k[1834]*y_cur[IDX_C4HII]*y_cur[IDX_C4H2I] + + k[1843]*y_cur[IDX_C4HI]*y_cur[IDX_C4H2II] + + k[1880]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] - + k[1881]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] - + k[1882]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + + k[2024]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] + + k[2058]*y_cur[IDX_CH3II]*y_cur[IDX_C7HI] - + k[2188]*y_cur[IDX_CH4I]*y_cur[IDX_C8H2II] + + k[2423]*y_cur[IDX_H2I]*y_cur[IDX_C8HII] + + k[2481]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + + k[2627]*y_cur[IDX_H3II]*y_cur[IDX_C8HI] + + k[2932]*y_cur[IDX_HCOII]*y_cur[IDX_C8HI] - + k[3719]*y_cur[IDX_OI]*y_cur[IDX_C8H2II] + k[6055]*y_cur[IDX_C8H2I] - + k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] - + k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GCH2I] = 0.0 + k[6893]*y_cur[IDX_CH2I] - + k[7075]*y_cur[IDX_GCH2I] - k[7257]*y_cur[IDX_GCH2I] - + k[7439]*y_cur[IDX_GCH2I] - k[7619]*y_cur[IDX_GCH2I] - + k[7620]*y_cur[IDX_GCH2I] - k[7621]*y_cur[IDX_GCH2I] - + k[7622]*y_cur[IDX_GCH2I] + k[7625]*y_cur[IDX_GCH3I] + + k[7627]*y_cur[IDX_GCH3I] + k[7633]*y_cur[IDX_GCH4I] + + k[7661]*y_cur[IDX_GC2H3I] + k[7662]*y_cur[IDX_GC2H3I] + + k[7672]*y_cur[IDX_GC2H4I] + k[7672]*y_cur[IDX_GC2H4I] + + k[7681]*y_cur[IDX_GC2H5I] + k[7685]*y_cur[IDX_GCH2NHI] + + k[7726]*y_cur[IDX_GCH2CNI] + k[7737]*y_cur[IDX_GCH3CNI] + + k[7740]*y_cur[IDX_GCH3CHCH2I] + k[7742]*y_cur[IDX_GCH2COI] + + k[7745]*y_cur[IDX_GCH2COI] + k[7770]*y_cur[IDX_GCH3OCH3I] + + k[7820]*y_cur[IDX_GCH3COCH3I] + k[7882]*y_cur[IDX_GCH2OHI] - + k[7896]*y_cur[IDX_GCH2I] - k[7897]*y_cur[IDX_GCH2I] - + k[7898]*y_cur[IDX_GCH2I] - k[7899]*y_cur[IDX_GCH2I] + + k[7902]*y_cur[IDX_GCH3I] + k[7904]*y_cur[IDX_GCH3I] + + k[7910]*y_cur[IDX_GCH4I] + k[7913]*y_cur[IDX_GCH4I] + + k[7948]*y_cur[IDX_GC2H3I] + k[7949]*y_cur[IDX_GC2H3I] + + k[7959]*y_cur[IDX_GC2H4I] + k[7959]*y_cur[IDX_GC2H4I] + + k[7968]*y_cur[IDX_GC2H5I] + k[7984]*y_cur[IDX_GH2COI] + + k[8034]*y_cur[IDX_GCH2CNI] + k[8046]*y_cur[IDX_GCH3CNI] + + k[8051]*y_cur[IDX_GCH3CHCH2I] + k[8053]*y_cur[IDX_GCH2COI] + + k[8056]*y_cur[IDX_GCH2COI] + k[8059]*y_cur[IDX_GSiCH2I] + + k[8090]*y_cur[IDX_GCH3OCH3I] + k[8095]*y_cur[IDX_GCH2PHI] + + k[8147]*y_cur[IDX_GCH3COCH3I] + k[8265]*y_cur[IDX_GCH2OHI] + + k[8275]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - + k[8276]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] + + k[8369]*y_cur[IDX_GH2I]*y_cur[IDX_GCI] - + k[8370]*y_cur[IDX_GH2I]*y_cur[IDX_GCH2I] - + k[8396]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] - + k[8438]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - + k[8456]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] + + k[8477]*y_cur[IDX_GCHI]*y_cur[IDX_GHNOI] - + k[8482]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - + k[8518]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] - + k[8523]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I] - + k[8528]*y_cur[IDX_GCH2I]*y_cur[IDX_GO2I] - + k[8529]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI] - + k[8531]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - + k[8531]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - + k[8532]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] - + k[8533]*y_cur[IDX_GCH2I]*y_cur[IDX_GHNOI] - + k[8578]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] - + k[8656]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] - + k[8686]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - + k[8699]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] - + k[8716]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - + k[8741]*y_cur[IDX_GOHI]*y_cur[IDX_GCH2I] - + k[8743]*y_cur[IDX_GNHI]*y_cur[IDX_GCH2I] - + k[8745]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - + k[8745]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I] - + k[8746]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] - + k[8747]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI]; + ydot[yistart + IDX_HCO2II] = 0.0 - + k[1098]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] - + k[1099]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] - + k[1100]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] - + k[1567]*y_cur[IDX_C2H2I]*y_cur[IDX_HCO2II] - + k[1905]*y_cur[IDX_CI]*y_cur[IDX_HCO2II] - + k[2116]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCO2II] + + k[2139]*y_cur[IDX_CH4II]*y_cur[IDX_CO2I] + + k[2191]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - + k[2201]*y_cur[IDX_CH4I]*y_cur[IDX_HCO2II] + + k[2223]*y_cur[IDX_CH5II]*y_cur[IDX_CO2I] - + k[2285]*y_cur[IDX_COI]*y_cur[IDX_HCO2II] + + k[2382]*y_cur[IDX_H2II]*y_cur[IDX_CO2I] + + k[2436]*y_cur[IDX_H2I]*y_cur[IDX_CO2II] + + k[2541]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - + k[2548]*y_cur[IDX_H2OI]*y_cur[IDX_HCO2II] + + k[2674]*y_cur[IDX_H3II]*y_cur[IDX_CO2I] + + k[2853]*y_cur[IDX_HCNII]*y_cur[IDX_CO2I] + + k[3049]*y_cur[IDX_HNOII]*y_cur[IDX_CO2I] + + k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] + + k[3372]*y_cur[IDX_N2HII]*y_cur[IDX_CO2I] + + k[3482]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - + k[3585]*y_cur[IDX_NH3I]*y_cur[IDX_HCO2II] + + k[3666]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + + k[3677]*y_cur[IDX_O2HII]*y_cur[IDX_CO2I] - + k[3736]*y_cur[IDX_OI]*y_cur[IDX_HCO2II] + + k[3776]*y_cur[IDX_OHII]*y_cur[IDX_CO2I] + + k[3802]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + + k[5644]*y_cur[IDX_CII]*y_cur[IDX_COOHI] + + k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - + k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - + k[6568]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C5H3II] = 0.0 - + k[843]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] - + k[844]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + + k[1329]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + + k[1356]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + + k[1486]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] + + k[1507]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + + k[1517]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] + + k[1545]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H2II] + + k[1546]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H3II] + + k[1581]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + + k[1585]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + + k[1589]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + + k[1616]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + + k[1629]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + + k[1677]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] + + k[1688]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + + k[1689]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] + + k[1733]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] + + k[1742]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] + + k[1774]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1780]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + + k[1807]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] - + k[1870]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] - + k[1871]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] + + k[2031]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] + + k[2080]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + + k[2167]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + + k[2168]*y_cur[IDX_CH4I]*y_cur[IDX_C4HII] + + k[2321]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] + + k[2614]*y_cur[IDX_H3II]*y_cur[IDX_C5H2I] + + k[2919]*y_cur[IDX_HCOII]*y_cur[IDX_C5H2I] + + k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - + k[3416]*y_cur[IDX_NI]*y_cur[IDX_C5H3II] - + k[3707]*y_cur[IDX_OI]*y_cur[IDX_C5H3II] - + k[5579]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H3II] - + k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] - + k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HC3NHII] = 0.0 - + k[1066]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] - + k[1067]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] - + k[1068]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] - + k[1069]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + + k[1472]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + + k[1522]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + + k[1620]*y_cur[IDX_C2H3II]*y_cur[IDX_HC3NI] + + k[1676]*y_cur[IDX_C2H4II]*y_cur[IDX_HC3NI] + + k[1707]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] + + k[1722]*y_cur[IDX_C2H5II]*y_cur[IDX_HC3NI] + + k[1816]*y_cur[IDX_C3H5II]*y_cur[IDX_HC3NI] - + k[2115]*y_cur[IDX_CH3CNI]*y_cur[IDX_HC3NHII] - + k[2126]*y_cur[IDX_CH3OHI]*y_cur[IDX_HC3NHII] + + k[2174]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + + k[2198]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + + k[2228]*y_cur[IDX_CH5II]*y_cur[IDX_HC3NI] + + k[2316]*y_cur[IDX_HII]*y_cur[IDX_CH2CHCNI] + + k[2444]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] + + k[2533]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] + + k[2689]*y_cur[IDX_H3II]*y_cur[IDX_HC3NI] + + k[2804]*y_cur[IDX_H3OII]*y_cur[IDX_HC3NI] + + k[2894]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] + + k[2895]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] + + k[2964]*y_cur[IDX_HCOII]*y_cur[IDX_HC3NI] + + k[3027]*y_cur[IDX_HNC3I]*y_cur[IDX_H3II] + + k[3028]*y_cur[IDX_HNC3I]*y_cur[IDX_H3OII] + + k[3029]*y_cur[IDX_HNC3I]*y_cur[IDX_HCOII] + + k[3035]*y_cur[IDX_HNC3I]*y_cur[IDX_N2HII] + + k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3374]*y_cur[IDX_N2HII]*y_cur[IDX_HC3NI] + + k[3399]*y_cur[IDX_NI]*y_cur[IDX_C3H4II] + + k[3453]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHII] - + k[3580]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NHII] - + k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - + k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - + k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - + k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C5HII] = 0.0 + + k[345]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - + k[839]*y_cur[IDX_C5HII]*y_cur[IDX_eM] - + k[840]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + + k[1318]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + + k[1403]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + + k[1404]*y_cur[IDX_CII]*y_cur[IDX_HC5NI] + + k[1487]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] + + k[1543]*y_cur[IDX_C2H2I]*y_cur[IDX_C3II] + + k[1555]*y_cur[IDX_C2H2I]*y_cur[IDX_C4NII] + + k[1752]*y_cur[IDX_C3II]*y_cur[IDX_HC3NI] + + k[1754]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] + + k[1864]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] + + k[1865]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - + k[1867]*y_cur[IDX_CI]*y_cur[IDX_C5HII] + + k[2177]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + + k[2304]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] + + k[2414]*y_cur[IDX_H2I]*y_cur[IDX_C5II] - + k[2415]*y_cur[IDX_H2I]*y_cur[IDX_C5HII] + + k[2613]*y_cur[IDX_H3II]*y_cur[IDX_C5I] + + k[2871]*y_cur[IDX_HCNI]*y_cur[IDX_C5II] + + k[2918]*y_cur[IDX_HCOII]*y_cur[IDX_C5I] + + k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3121]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] - + k[3412]*y_cur[IDX_NI]*y_cur[IDX_C5HII] + + k[3423]*y_cur[IDX_NI]*y_cur[IDX_C6H2II] - + k[3704]*y_cur[IDX_OI]*y_cur[IDX_C5HII] - + k[5577]*y_cur[IDX_C4H2I]*y_cur[IDX_C5HII] - + k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] - + k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3CHOI] = 0.0 - + k[167]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] - + k[366]*y_cur[IDX_HII]*y_cur[IDX_CH3CHOI] + + k[941]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[950]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + + k[952]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] - + k[1378]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] - + k[2065]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - + k[2066]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - + k[2067]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - + k[2113]*y_cur[IDX_CH3CHOI]*y_cur[IDX_HCOOH2II] - + k[2114]*y_cur[IDX_CH3CHOI]*y_cur[IDX_S2II] - + k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2652]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2653]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2654]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2656]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2657]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2791]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHOI] - + k[2950]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CHOI] - + k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] + + k[3569]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] + + k[5055]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] + + k[5073]*y_cur[IDX_CHI]*y_cur[IDX_CH3OHI] + + k[5350]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - + k[5532]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + + k[5586]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] - k[5806]*y_cur[IDX_CH3CHOI] + - k[5807]*y_cur[IDX_CH3CHOI] - k[5808]*y_cur[IDX_CH3CHOI] - + k[6111]*y_cur[IDX_CH3CHOI] - k[6112]*y_cur[IDX_CH3CHOI] - + k[6113]*y_cur[IDX_CH3CHOI] + + k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + + k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - + k[6977]*y_cur[IDX_CH3CHOI] + k[7159]*y_cur[IDX_GCH3CHOI] + + k[7341]*y_cur[IDX_GCH3CHOI] + k[7523]*y_cur[IDX_GCH3CHOI] + + k[8626]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] + + k[8751]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI]; + ydot[yistart + IDX_CSII] = 0.0 - + k[317]*y_cur[IDX_CSII]*y_cur[IDX_FeI] + + k[374]*y_cur[IDX_HII]*y_cur[IDX_CSI] - + k[530]*y_cur[IDX_MgI]*y_cur[IDX_CSII] - + k[633]*y_cur[IDX_NaI]*y_cur[IDX_CSII] - + k[717]*y_cur[IDX_SiI]*y_cur[IDX_CSII] - + k[985]*y_cur[IDX_CSII]*y_cur[IDX_eM] + + k[1415]*y_cur[IDX_CII]*y_cur[IDX_HSI] + + k[1421]*y_cur[IDX_CII]*y_cur[IDX_NSI] + + k[1425]*y_cur[IDX_CII]*y_cur[IDX_OCSI] + + k[1428]*y_cur[IDX_CII]*y_cur[IDX_SOI] + + k[1456]*y_cur[IDX_C2II]*y_cur[IDX_SI] + + k[1464]*y_cur[IDX_C2I]*y_cur[IDX_SII] + + k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + + k[1908]*y_cur[IDX_CI]*y_cur[IDX_HSII] + + k[1973]*y_cur[IDX_CHII]*y_cur[IDX_SI] - + k[2192]*y_cur[IDX_CH4I]*y_cur[IDX_CSII] + + k[2265]*y_cur[IDX_CHI]*y_cur[IDX_SII] + + k[2346]*y_cur[IDX_HII]*y_cur[IDX_HCSI] - + k[2438]*y_cur[IDX_H2I]*y_cur[IDX_CSII] + + k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + + k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + + k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + + k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + + k[3293]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3359]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - + k[3672]*y_cur[IDX_O2I]*y_cur[IDX_CSII] - + k[3732]*y_cur[IDX_OI]*y_cur[IDX_CSII] + + k[5506]*y_cur[IDX_CII]*y_cur[IDX_SI] + + k[5528]*y_cur[IDX_CI]*y_cur[IDX_SII] + k[5828]*y_cur[IDX_CSI] - + k[6140]*y_cur[IDX_CSII] + k[6141]*y_cur[IDX_CSI] - + k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3H5II] = 0.0 - + k[803]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] - + k[804]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + + k[1376]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1512]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] + + k[1514]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - + k[1548]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H5II] + + k[1563]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + + k[1611]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] + + k[1614]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + + k[1647]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] + + k[1685]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H5II] + + k[1811]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - + k[1814]*y_cur[IDX_C3H5II]*y_cur[IDX_C6H6I] - + k[1815]*y_cur[IDX_C3H5II]*y_cur[IDX_CH3CHCH2I] - + k[1816]*y_cur[IDX_C3H5II]*y_cur[IDX_HC3NI] - + k[1861]*y_cur[IDX_CI]*y_cur[IDX_C3H5II] + + k[2046]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + + k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - + k[2104]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C3H5II] + + k[2155]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + + k[2156]*y_cur[IDX_CH4I]*y_cur[IDX_C2H3II] + + k[2197]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + + k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + + k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2789]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CCHI] + + k[2948]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CCHI] + + k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - + k[3400]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] - + k[3401]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + + k[3660]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3823]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[5516]*y_cur[IDX_C3H5II]*y_cur[IDX_H2I] + + k[5530]*y_cur[IDX_CH2CCHII]*y_cur[IDX_H2I] - + k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] - + k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C7H3II] = 0.0 - + k[870]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] - + k[871]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + + k[1360]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] + + k[1492]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + + k[1590]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + + k[1594]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + + k[1602]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + + k[1637]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + + k[1659]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] + + k[1700]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + + k[1785]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] + + k[1788]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H2II] + + k[1797]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] + + k[1825]*y_cur[IDX_C3HI]*y_cur[IDX_C4H3II] - + k[1879]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] - + k[1880]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] + + k[2021]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] + + k[2032]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4HII] + + k[2033]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + + k[2055]*y_cur[IDX_CH3II]*y_cur[IDX_C6H2I] + + k[2184]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + + k[2323]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] + + k[2479]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H2II] + + k[2622]*y_cur[IDX_H3II]*y_cur[IDX_C7H2I] + + k[2852]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] + + k[2927]*y_cur[IDX_HCOII]*y_cur[IDX_C7H2I] + + k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - + k[3433]*y_cur[IDX_NI]*y_cur[IDX_C7H3II] - + k[3716]*y_cur[IDX_OI]*y_cur[IDX_C7H3II] - + k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] - + k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PII] = 0.0 + k[190]*y_cur[IDX_CII]*y_cur[IDX_PI] + + k[409]*y_cur[IDX_HII]*y_cur[IDX_PI] + + k[526]*y_cur[IDX_HeII]*y_cur[IDX_PI] - + k[613]*y_cur[IDX_NH3I]*y_cur[IDX_PII] - + k[701]*y_cur[IDX_PII]*y_cur[IDX_H2SI] - + k[723]*y_cur[IDX_SiI]*y_cur[IDX_PII] - + k[1569]*y_cur[IDX_C2H2I]*y_cur[IDX_PII] - + k[1710]*y_cur[IDX_C2H4I]*y_cur[IDX_PII] - + k[2211]*y_cur[IDX_CH4I]*y_cur[IDX_PII] - + k[2562]*y_cur[IDX_H2OI]*y_cur[IDX_PII] - + k[2563]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + + k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + + k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + + k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + + k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + + k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] + + k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] + + k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] + + k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] - + k[3595]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + + k[3731]*y_cur[IDX_OI]*y_cur[IDX_CPII] - + k[3807]*y_cur[IDX_OHI]*y_cur[IDX_PII] - + k[3810]*y_cur[IDX_PII]*y_cur[IDX_CH3OHI] - + k[3811]*y_cur[IDX_PII]*y_cur[IDX_CO2I] - + k[3812]*y_cur[IDX_PII]*y_cur[IDX_O2I] - + k[3813]*y_cur[IDX_PII]*y_cur[IDX_OCSI] - + k[5559]*y_cur[IDX_H2I]*y_cur[IDX_PII] - + k[5624]*y_cur[IDX_PII]*y_cur[IDX_eM] + k[5906]*y_cur[IDX_PI] + + k[6246]*y_cur[IDX_PI] - k[6421]*y_cur[IDX_PII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3CNI] = 0.0 + + k[60]*y_cur[IDX_CH3I]*y_cur[IDX_CNM] - + k[367]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - + k[650]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] + + k[946]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] - + k[1379]*y_cur[IDX_CII]*y_cur[IDX_CH3CNI] - + k[1513]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - + k[1514]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - + k[1515]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - + k[1719]*y_cur[IDX_C2H5II]*y_cur[IDX_CH3CNI] - + k[1842]*y_cur[IDX_C4H7II]*y_cur[IDX_CH3CNI] - + k[2068]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - + k[2069]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - + k[2115]*y_cur[IDX_CH3CNI]*y_cur[IDX_HC3NHII] - + k[2116]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCO2II] - + k[2117]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCOOH2II] - + k[2328]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - + k[2329]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - + k[2658]*y_cur[IDX_H3II]*y_cur[IDX_CH3CNI] - + k[2792]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CNI] - + k[2888]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] - + k[2889]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] - + k[2951]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CNI] - + k[3192]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - + k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - + k[3371]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CNI] - + k[3635]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - + k[5533]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + + k[5542]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] - k[5809]*y_cur[IDX_CH3CNI] - + k[5810]*y_cur[IDX_CH3CNI] - k[6114]*y_cur[IDX_CH3CNI] - + k[6115]*y_cur[IDX_CH3CNI] + + k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] - + k[6957]*y_cur[IDX_CH3CNI] + k[7139]*y_cur[IDX_GCH3CNI] + + k[7321]*y_cur[IDX_GCH3CNI] + k[7503]*y_cur[IDX_GCH3CNI] + + k[8618]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] + + k[8749]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI]; + ydot[yistart + IDX_NCCNI] = 0.0 - + k[183]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] - + k[184]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] + + k[234]*y_cur[IDX_C2H4I]*y_cur[IDX_C2N2II] + + k[1155]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_eM] + + k[1157]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] + + k[1542]*y_cur[IDX_C2H2I]*y_cur[IDX_C2N2II] - + k[1624]*y_cur[IDX_C2H3II]*y_cur[IDX_NCCNI] + + k[1709]*y_cur[IDX_C2H4I]*y_cur[IDX_NCCNHII] + + k[2128]*y_cur[IDX_CH3OHI]*y_cur[IDX_NCCNHII] + + k[2560]*y_cur[IDX_H2OI]*y_cur[IDX_NCCNHII] - + k[2720]*y_cur[IDX_H3II]*y_cur[IDX_NCCNI] + + k[2865]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] + + k[2882]*y_cur[IDX_HCNI]*y_cur[IDX_NCCNHII] - + k[2979]*y_cur[IDX_HCOII]*y_cur[IDX_NCCNI] - + k[3279]*y_cur[IDX_HeII]*y_cur[IDX_NCCNI] - + k[3351]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] - + k[3352]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] - + k[3375]*y_cur[IDX_N2HII]*y_cur[IDX_NCCNI] + + k[3593]*y_cur[IDX_NH3I]*y_cur[IDX_NCCNHII] - + k[3870]*y_cur[IDX_SiII]*y_cur[IDX_NCCNI] - + k[4903]*y_cur[IDX_C2HI]*y_cur[IDX_NCCNI] - + k[4908]*y_cur[IDX_C4HI]*y_cur[IDX_NCCNI] - + k[4968]*y_cur[IDX_CI]*y_cur[IDX_NCCNI] + + k[5116]*y_cur[IDX_CNI]*y_cur[IDX_HCNI] + + k[5118]*y_cur[IDX_CNI]*y_cur[IDX_HNCI] - + k[5181]*y_cur[IDX_HI]*y_cur[IDX_NCCNI] - + k[5273]*y_cur[IDX_NI]*y_cur[IDX_NCCNI] - + k[5475]*y_cur[IDX_OHI]*y_cur[IDX_NCCNI] - + k[5541]*y_cur[IDX_CH3II]*y_cur[IDX_NCCNI] - k[5881]*y_cur[IDX_NCCNI] + - k[6215]*y_cur[IDX_NCCNI] - k[6216]*y_cur[IDX_NCCNI] + + k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + + k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM] - + k[7005]*y_cur[IDX_NCCNI] + k[7187]*y_cur[IDX_GNCCNI] + + k[7369]*y_cur[IDX_GNCCNI] + k[7551]*y_cur[IDX_GNCCNI]; + ydot[yistart + IDX_C7H2II] = 0.0 + + k[218]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + + k[350]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] - + k[868]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] - + k[869]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + + k[1491]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + + k[1494]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - + k[1560]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] - + k[1561]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + + k[1593]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + + k[1605]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - + k[1641]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] - + k[1642]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + + k[1661]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] + + k[1699]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - + k[1705]*y_cur[IDX_C2H4I]*y_cur[IDX_C7H2II] + + k[1738]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2II] - + k[1740]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2II] + + k[1762]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] + + k[1784]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] + + k[1796]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] + + k[1824]*y_cur[IDX_C3HI]*y_cur[IDX_C4H2II] + + k[1875]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - + k[1877]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] - + k[1878]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + + k[2020]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] + + k[2056]*y_cur[IDX_CH3II]*y_cur[IDX_C6HI] + + k[2183]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - + k[2187]*y_cur[IDX_CH4I]*y_cur[IDX_C7H2II] + + k[2420]*y_cur[IDX_H2I]*y_cur[IDX_C7HII] + + k[2478]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4HII] + + k[2623]*y_cur[IDX_H3II]*y_cur[IDX_C7HI] + + k[2928]*y_cur[IDX_HCOII]*y_cur[IDX_C7HI] + + k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - + k[3432]*y_cur[IDX_NI]*y_cur[IDX_C7H2II] - + k[3715]*y_cur[IDX_OI]*y_cur[IDX_C7H2II] + k[6045]*y_cur[IDX_C7H2I] - + k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] - + k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_GC2I] = 0.0 + k[6907]*y_cur[IDX_C2I] - + k[7089]*y_cur[IDX_GC2I] - k[7271]*y_cur[IDX_GC2I] - + k[7453]*y_cur[IDX_GC2I] - k[7641]*y_cur[IDX_GC2I] + + k[7642]*y_cur[IDX_GC2HI] + k[7643]*y_cur[IDX_GC2HI] + + k[7646]*y_cur[IDX_GC2H2I] + k[7653]*y_cur[IDX_GC2H3I] + + k[7654]*y_cur[IDX_GC2H3I] + k[7712]*y_cur[IDX_GC3I] + + k[7717]*y_cur[IDX_GC2NI] + k[7727]*y_cur[IDX_GC2OI] + + k[7743]*y_cur[IDX_GCH2COI] + k[7783]*y_cur[IDX_GC4I] + + k[7783]*y_cur[IDX_GC4I] + k[7788]*y_cur[IDX_GC4HI] + + k[7790]*y_cur[IDX_GC3NI] + k[7803]*y_cur[IDX_GC3OI] + + k[7813]*y_cur[IDX_GCCPI] + k[7816]*y_cur[IDX_GC2SI] + + k[7822]*y_cur[IDX_GC5I] + k[7834]*y_cur[IDX_GC5HI] + + k[7848]*y_cur[IDX_GC3SI] + k[7857]*y_cur[IDX_GSiC4I] - + k[7927]*y_cur[IDX_GC2I] - k[7928]*y_cur[IDX_GC2I] + + k[7929]*y_cur[IDX_GC2HI] + k[7930]*y_cur[IDX_GC2HI] + + k[7933]*y_cur[IDX_GC2H2I] + k[7940]*y_cur[IDX_GC2H3I] + + k[7941]*y_cur[IDX_GC2H3I] + k[8017]*y_cur[IDX_GC3I] + + k[8024]*y_cur[IDX_GC2NI] + k[8035]*y_cur[IDX_GC2OI] + + k[8054]*y_cur[IDX_GCH2COI] + k[8107]*y_cur[IDX_GC4I] + + k[8107]*y_cur[IDX_GC4I] + k[8112]*y_cur[IDX_GC4HI] + + k[8114]*y_cur[IDX_GC3NI] + k[8129]*y_cur[IDX_GSiC2I] + + k[8130]*y_cur[IDX_GC3OI] + k[8142]*y_cur[IDX_GCCPI] + + k[8144]*y_cur[IDX_GC2SI] + k[8149]*y_cur[IDX_GC5I] + + k[8158]*y_cur[IDX_GC5HI] + k[8168]*y_cur[IDX_GSiC3I] + + k[8176]*y_cur[IDX_GC3PI] + k[8177]*y_cur[IDX_GC3SI] + + k[8179]*y_cur[IDX_GC6I] + k[8195]*y_cur[IDX_GC7I] + + k[8206]*y_cur[IDX_GC8I] + k[8212]*y_cur[IDX_GC7NI] + + k[8220]*y_cur[IDX_GC9I] + k[8231]*y_cur[IDX_GC10I] + + k[8232]*y_cur[IDX_GC10I] + k[8234]*y_cur[IDX_GC10I] + + k[8241]*y_cur[IDX_GC10HI] + k[8247]*y_cur[IDX_GC9NI] + + k[8259]*y_cur[IDX_GC11I] + k[8263]*y_cur[IDX_GC11I] - + k[8285]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - + k[8374]*y_cur[IDX_GH2I]*y_cur[IDX_GC2I] + + k[8394]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - + k[8410]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - + k[8445]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - + k[8462]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - + k[8486]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I] - + k[8586]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - + k[8662]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - + k[8691]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - + k[8703]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - + k[8719]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I]; + ydot[yistart + IDX_C3II] = 0.0 - + k[235]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + + k[333]*y_cur[IDX_HII]*y_cur[IDX_C3I] - + k[788]*y_cur[IDX_C3II]*y_cur[IDX_eM] + + k[1308]*y_cur[IDX_CII]*y_cur[IDX_C2HI] + + k[1309]*y_cur[IDX_CII]*y_cur[IDX_C2SI] + + k[1313]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + + k[1399]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + + k[1451]*y_cur[IDX_C2II]*y_cur[IDX_C2I] - + k[1543]*y_cur[IDX_C2H2I]*y_cur[IDX_C3II] - + k[1686]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - + k[1687]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - + k[1688]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - + k[1752]*y_cur[IDX_C3II]*y_cur[IDX_HC3NI] + + k[1849]*y_cur[IDX_CI]*y_cur[IDX_C2HII] + + k[1933]*y_cur[IDX_CHII]*y_cur[IDX_C2I] + + k[1935]*y_cur[IDX_CHII]*y_cur[IDX_C2HI] - + k[2157]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - + k[2158]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - + k[2159]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + + k[2239]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + + k[2301]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - + k[2406]*y_cur[IDX_H2I]*y_cur[IDX_C3II] - + k[2867]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] - + k[2868]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + + k[3016]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + k[3032]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + - k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + - k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + - k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + - k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + - k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + - k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + - k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + - k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + - k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + - k[3085]*y_cur[IDX_HeII]*y_cur[IDX_C2H5OHI] + - k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + - k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] + - k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] + - k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] + - k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] + k[3097]*y_cur[IDX_HeII]*y_cur[IDX_C3HI] + - k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + k[3099]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + - k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + k[3101]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + - k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + - k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + - k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + - k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + k[3106]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + - k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + - k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + - k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + - k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + - k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + - k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + - k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] + - k[3114]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] + - k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + k[3116]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + k[3117]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + - k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + - k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + - k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - + k[3668]*y_cur[IDX_O2I]*y_cur[IDX_C3II] - + k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H3SII] = 0.0 - + k[1045]*y_cur[IDX_H3SII]*y_cur[IDX_eM] - + k[1046]*y_cur[IDX_H3SII]*y_cur[IDX_eM] - + k[1047]*y_cur[IDX_H3SII]*y_cur[IDX_eM] - + k[1048]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1518]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + + k[1619]*y_cur[IDX_C2H3II]*y_cur[IDX_H2SI] + + k[1721]*y_cur[IDX_C2H5II]*y_cur[IDX_H2SI] + + k[1954]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] + + k[1984]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + + k[2111]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] + + k[2143]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] + + k[2227]*y_cur[IDX_CH5II]*y_cur[IDX_H2SI] + + k[2443]*y_cur[IDX_H2I]*y_cur[IDX_H2SII] - + k[2496]*y_cur[IDX_H2COI]*y_cur[IDX_H3SII] + + k[2510]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + + k[2574]*y_cur[IDX_H2SII]*y_cur[IDX_H2SI] + + k[2579]*y_cur[IDX_H2SI]*y_cur[IDX_HS2II] + + k[2580]*y_cur[IDX_H2SI]*y_cur[IDX_HSiSII] + + k[2686]*y_cur[IDX_H3II]*y_cur[IDX_H2SI] + + k[2763]*y_cur[IDX_H3COII]*y_cur[IDX_H2SI] + + k[2801]*y_cur[IDX_H3OII]*y_cur[IDX_H2SI] - + k[2843]*y_cur[IDX_HI]*y_cur[IDX_H3SII] - + k[2876]*y_cur[IDX_HCNI]*y_cur[IDX_H3SII] + + k[2892]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] + + k[2893]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] + + k[2961]*y_cur[IDX_HCOII]*y_cur[IDX_H2SI] - + k[3040]*y_cur[IDX_HNCI]*y_cur[IDX_H3SII] + + k[3054]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + + k[3515]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3579]*y_cur[IDX_NH3I]*y_cur[IDX_H3SII] + + k[3780]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] + + k[3817]*y_cur[IDX_PHII]*y_cur[IDX_H2SI] + + k[3819]*y_cur[IDX_PH3II]*y_cur[IDX_H2SI] - + k[3839]*y_cur[IDX_SI]*y_cur[IDX_H3SII] + + k[5557]*y_cur[IDX_H2I]*y_cur[IDX_HSII] - + k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - + k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - + k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - + k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_O2HII] = 0.0 - + k[1175]*y_cur[IDX_O2HII]*y_cur[IDX_eM] - + k[1463]*y_cur[IDX_C2I]*y_cur[IDX_O2HII] - + k[1749]*y_cur[IDX_C2HI]*y_cur[IDX_O2HII] - + k[1913]*y_cur[IDX_CI]*y_cur[IDX_O2HII] - + k[2015]*y_cur[IDX_CH2I]*y_cur[IDX_O2HII] - + k[2263]*y_cur[IDX_CHI]*y_cur[IDX_O2HII] - + k[2279]*y_cur[IDX_CNI]*y_cur[IDX_O2HII] - + k[2289]*y_cur[IDX_COI]*y_cur[IDX_O2HII] + + k[2395]*y_cur[IDX_H2II]*y_cur[IDX_O2I] - + k[2468]*y_cur[IDX_H2I]*y_cur[IDX_O2HII] - + k[2499]*y_cur[IDX_H2COI]*y_cur[IDX_O2HII] - + k[2561]*y_cur[IDX_H2OI]*y_cur[IDX_O2HII] + + k[2729]*y_cur[IDX_H3II]*y_cur[IDX_O2I] - + k[2883]*y_cur[IDX_HCNI]*y_cur[IDX_O2HII] + + k[3010]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] - + k[3011]*y_cur[IDX_HCOI]*y_cur[IDX_O2HII] - + k[3045]*y_cur[IDX_HNCI]*y_cur[IDX_O2HII] - + k[3367]*y_cur[IDX_N2I]*y_cur[IDX_O2HII] - + k[3466]*y_cur[IDX_NI]*y_cur[IDX_O2HII] + + k[3502]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - + k[3546]*y_cur[IDX_NH2I]*y_cur[IDX_O2HII] - + k[3594]*y_cur[IDX_NH3I]*y_cur[IDX_O2HII] - + k[3622]*y_cur[IDX_NHI]*y_cur[IDX_O2HII] - + k[3627]*y_cur[IDX_NOI]*y_cur[IDX_O2HII] - + k[3677]*y_cur[IDX_O2HII]*y_cur[IDX_CO2I] - + k[3749]*y_cur[IDX_OI]*y_cur[IDX_O2HII] - + k[3806]*y_cur[IDX_OHI]*y_cur[IDX_O2HII] - + k[3840]*y_cur[IDX_SI]*y_cur[IDX_O2HII] - + k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C6H2II] = 0.0 + + k[217]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + + k[347]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] - + k[852]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] - + k[853]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + + k[1357]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + + k[1490]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] + + k[1520]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + + k[1551]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HII] + + k[1587]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + + k[1599]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - + k[1639]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] - + k[1640]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + + k[1657]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - + k[1703]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H2II] + + k[1736]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2II] - + k[1739]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2II] + + k[1759]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] + + k[1782]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - + k[1792]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] - + k[1793]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + + k[1819]*y_cur[IDX_C3HI]*y_cur[IDX_C3H2II] + + k[1820]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - + k[1827]*y_cur[IDX_C3HI]*y_cur[IDX_C6H2II] + + k[1828]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] + + k[1837]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] + + k[1871]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] - + k[1872]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] - + k[1873]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] - + k[2039]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] - + k[2040]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + + k[2054]*y_cur[IDX_CH3II]*y_cur[IDX_C5HI] - + k[2110]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C6H2II] + + k[2178]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - + k[2185]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] - + k[2186]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + + k[2418]*y_cur[IDX_H2I]*y_cur[IDX_C6HII] - + k[2483]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] - + k[2484]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + + k[2620]*y_cur[IDX_H3II]*y_cur[IDX_C6HI] + + k[2925]*y_cur[IDX_HCOII]*y_cur[IDX_C6HI] - + k[3423]*y_cur[IDX_NI]*y_cur[IDX_C6H2II] - + k[3710]*y_cur[IDX_OI]*y_cur[IDX_C6H2II] + + k[5552]*y_cur[IDX_H2I]*y_cur[IDX_C6II] + k[6036]*y_cur[IDX_C6H2I] - + k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] - + k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH4II] = 0.0 - + k[277]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - + k[278]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] - + k[279]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] - + k[280]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] - + k[281]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] - + k[282]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] - + k[283]*y_cur[IDX_CH4II]*y_cur[IDX_O2I] - + k[284]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] + + k[285]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + + k[286]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] + + k[371]*y_cur[IDX_HII]*y_cur[IDX_CH4I] + + k[442]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + + k[514]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[546]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[652]*y_cur[IDX_OII]*y_cur[IDX_CH4I] - + k[968]*y_cur[IDX_CH4II]*y_cur[IDX_eM] - + k[969]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + + k[2082]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - + k[2133]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - + k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - + k[2135]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] - + k[2136]*y_cur[IDX_CH4II]*y_cur[IDX_C2H5CNI] - + k[2137]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] - + k[2138]*y_cur[IDX_CH4II]*y_cur[IDX_CH4I] - + k[2139]*y_cur[IDX_CH4II]*y_cur[IDX_CO2I] - + k[2140]*y_cur[IDX_CH4II]*y_cur[IDX_COI] - + k[2141]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] - + k[2142]*y_cur[IDX_CH4II]*y_cur[IDX_H2OI] - + k[2143]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] - + k[2144]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] - + k[2145]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - + k[2432]*y_cur[IDX_H2I]*y_cur[IDX_CH4II] + + k[2641]*y_cur[IDX_H3II]*y_cur[IDX_CH3I] - + k[2839]*y_cur[IDX_HI]*y_cur[IDX_CH4II] + + k[2840]*y_cur[IDX_HI]*y_cur[IDX_CH5II] - + k[3727]*y_cur[IDX_OI]*y_cur[IDX_CH4II] - k[6125]*y_cur[IDX_CH4II] - + k[6126]*y_cur[IDX_CH4II] + k[6129]*y_cur[IDX_CH4I] - + k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] - + k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HNOII] = 0.0 - + k[626]*y_cur[IDX_NOI]*y_cur[IDX_HNOII] - + k[1121]*y_cur[IDX_HNOII]*y_cur[IDX_eM] - + k[1460]*y_cur[IDX_C2I]*y_cur[IDX_HNOII] - + k[1747]*y_cur[IDX_C2HI]*y_cur[IDX_HNOII] - + k[1907]*y_cur[IDX_CI]*y_cur[IDX_HNOII] - + k[2009]*y_cur[IDX_CH2I]*y_cur[IDX_HNOII] - + k[2202]*y_cur[IDX_CH4I]*y_cur[IDX_HNOII] - + k[2254]*y_cur[IDX_CHI]*y_cur[IDX_HNOII] - + k[2278]*y_cur[IDX_CNI]*y_cur[IDX_HNOII] - + k[2286]*y_cur[IDX_COI]*y_cur[IDX_HNOII] + + k[2394]*y_cur[IDX_H2II]*y_cur[IDX_NOI] - + k[2497]*y_cur[IDX_H2COI]*y_cur[IDX_HNOII] - + k[2550]*y_cur[IDX_H2OI]*y_cur[IDX_HNOII] + + k[2726]*y_cur[IDX_H3II]*y_cur[IDX_NOI] - + k[2878]*y_cur[IDX_HCNI]*y_cur[IDX_HNOII] - + k[3008]*y_cur[IDX_HCOI]*y_cur[IDX_HNOII] - + k[3042]*y_cur[IDX_HNCI]*y_cur[IDX_HNOII] - + k[3049]*y_cur[IDX_HNOII]*y_cur[IDX_CO2I] - + k[3050]*y_cur[IDX_HNOII]*y_cur[IDX_SI] - + k[3366]*y_cur[IDX_N2I]*y_cur[IDX_HNOII] + + k[3457]*y_cur[IDX_NI]*y_cur[IDX_H2OII] + + k[3483]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] + + k[3490]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + + k[3525]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - + k[3543]*y_cur[IDX_NH2I]*y_cur[IDX_HNOII] - + k[3588]*y_cur[IDX_NH3I]*y_cur[IDX_HNOII] - + k[3615]*y_cur[IDX_NHI]*y_cur[IDX_HNOII] + + k[3620]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + + k[3627]*y_cur[IDX_NOI]*y_cur[IDX_O2HII] - + k[3740]*y_cur[IDX_OI]*y_cur[IDX_HNOII] + + k[3746]*y_cur[IDX_OI]*y_cur[IDX_NH2II] + + k[3747]*y_cur[IDX_OI]*y_cur[IDX_NH3II] + + k[3787]*y_cur[IDX_OHII]*y_cur[IDX_NOI] - + k[3803]*y_cur[IDX_OHI]*y_cur[IDX_HNOII] - + k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2CCCI] = 0.0 + + k[90]*y_cur[IDX_HI]*y_cur[IDX_C3HM] + + k[802]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[911]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] - + k[1388]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - + k[1389]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - + k[1516]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] - + k[1517]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] - + k[1616]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - + k[1617]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - + k[1618]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - + k[1672]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] - + k[1673]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] - + k[1782]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - + k[1783]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - + k[2076]*y_cur[IDX_CH3II]*y_cur[IDX_H2CCCI] - + k[2335]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] - + k[2336]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] - + k[2476]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] - + k[2477]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] - + k[2478]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4HII] - + k[2479]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H2II] - + k[2480]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H3II] - + k[2481]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] - + k[2482]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] - + k[2483]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] - + k[2484]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] - + k[2485]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] - + k[2486]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] - + k[2681]*y_cur[IDX_H3II]*y_cur[IDX_H2CCCI] - + k[2798]*y_cur[IDX_H3OII]*y_cur[IDX_H2CCCI] - + k[2957]*y_cur[IDX_HCOII]*y_cur[IDX_H2CCCI] - + k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - + k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - + k[3827]*y_cur[IDX_SII]*y_cur[IDX_H2CCCI] - + k[3868]*y_cur[IDX_SiII]*y_cur[IDX_H2CCCI] - + k[4959]*y_cur[IDX_CI]*y_cur[IDX_H2CCCI] + + k[5064]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - + k[5395]*y_cur[IDX_OI]*y_cur[IDX_H2CCCI] - k[5834]*y_cur[IDX_H2CCCI] + + k[6082]*y_cur[IDX_CH2CCH2I] + k[6107]*y_cur[IDX_CH3CCHI] - + k[6149]*y_cur[IDX_H2CCCI] - k[6150]*y_cur[IDX_H2CCCI] + + k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + + k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - + k[6946]*y_cur[IDX_H2CCCI] + k[7128]*y_cur[IDX_GH2CCCI] + + k[7310]*y_cur[IDX_GH2CCCI] + k[7492]*y_cur[IDX_GH2CCCI]; + ydot[yistart + IDX_C6H2I] = 0.0 + + k[98]*y_cur[IDX_HI]*y_cur[IDX_C6HM] - + k[217]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - + k[347]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] + + k[854]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + + k[856]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + + k[858]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + + k[860]*y_cur[IDX_C6H6II]*y_cur[IDX_eM] + + k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] - + k[1326]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] - + k[1327]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] - + k[1495]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - + k[1496]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - + k[1595]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - + k[1596]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - + k[1597]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - + k[1659]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] - + k[1660]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] - + k[1767]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] - + k[1768]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] - + k[1802]*y_cur[IDX_C3H3II]*y_cur[IDX_C6H2I] - + k[2026]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6H2I] - + k[2055]*y_cur[IDX_CH3II]*y_cur[IDX_C6H2I] - + k[2306]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] - + k[2618]*y_cur[IDX_H3II]*y_cur[IDX_C6H2I] - + k[2923]*y_cur[IDX_HCOII]*y_cur[IDX_C6H2I] - + k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - + k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - + k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3716]*y_cur[IDX_OI]*y_cur[IDX_C7H3II] + + k[4877]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HI] + + k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] - + k[4891]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2I] + + k[4900]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2I] - + k[4932]*y_cur[IDX_CI]*y_cur[IDX_C6H2I] + + k[4950]*y_cur[IDX_CI]*y_cur[IDX_CH3C4HI] + + k[5022]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] + + k[5050]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + + k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - + k[5107]*y_cur[IDX_CNI]*y_cur[IDX_C6H2I] - k[5750]*y_cur[IDX_C6H2I] + + k[5751]*y_cur[IDX_C6H6I] - k[6036]*y_cur[IDX_C6H2I] - + k[6037]*y_cur[IDX_C6H2I] + + k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + + k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + + k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + + k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] + + k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - + k[7043]*y_cur[IDX_C6H2I] + k[7225]*y_cur[IDX_GC6H2I] + + k[7407]*y_cur[IDX_GC6H2I] + k[7589]*y_cur[IDX_GC6H2I] + + k[8639]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] + + k[8729]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI]; + ydot[yistart + IDX_GCNI] = 0.0 + k[6909]*y_cur[IDX_CNI] - + k[7091]*y_cur[IDX_GCNI] - k[7273]*y_cur[IDX_GCNI] - + k[7455]*y_cur[IDX_GCNI] - k[7649]*y_cur[IDX_GCNI] + + k[7650]*y_cur[IDX_GHNCI] + k[7651]*y_cur[IDX_GHCNI] + + k[7718]*y_cur[IDX_GC2NI] + k[7726]*y_cur[IDX_GCH2CNI] + + k[7735]*y_cur[IDX_GCH3CNI] + k[7739]*y_cur[IDX_GNH2CNI] + + k[7741]*y_cur[IDX_GCNOI] + k[7747]*y_cur[IDX_GOCNI] + + k[7754]*y_cur[IDX_GHONCI] + k[7755]*y_cur[IDX_GHOCNI] + + k[7790]*y_cur[IDX_GC3NI] + k[7797]*y_cur[IDX_GHNC3I] + + k[7798]*y_cur[IDX_GHC3NI] + k[7801]*y_cur[IDX_GNCCNI] + + k[7801]*y_cur[IDX_GNCCNI] + k[7804]*y_cur[IDX_GCH2CHCNI] + + k[7806]*y_cur[IDX_GSiNCI] + k[7809]*y_cur[IDX_GC2H5CNI] + + k[7836]*y_cur[IDX_GC4NI] + k[7854]*y_cur[IDX_GC5NI] + + k[7855]*y_cur[IDX_GHC5NI] + k[7868]*y_cur[IDX_GC7NI] + + k[7870]*y_cur[IDX_GHC7NI] + k[7877]*y_cur[IDX_GC9NI] + + k[7879]*y_cur[IDX_GHC9NI] + k[7885]*y_cur[IDX_GC2H4CNI] - + k[7936]*y_cur[IDX_GCNI] + k[7937]*y_cur[IDX_GHNCI] + + k[7938]*y_cur[IDX_GHCNI] + k[8025]*y_cur[IDX_GC2NI] + + k[8034]*y_cur[IDX_GCH2CNI] + k[8044]*y_cur[IDX_GCH3CNI] + + k[8050]*y_cur[IDX_GNH2CNI] + k[8052]*y_cur[IDX_GCNOI] + + k[8061]*y_cur[IDX_GOCNI] + k[8068]*y_cur[IDX_GHONCI] + + k[8069]*y_cur[IDX_GHOCNI] + k[8114]*y_cur[IDX_GC3NI] + + k[8123]*y_cur[IDX_GHC3NI] + k[8126]*y_cur[IDX_GNCCNI] + + k[8126]*y_cur[IDX_GNCCNI] + k[8128]*y_cur[IDX_GNCCNI] + + k[8128]*y_cur[IDX_GNCCNI] + k[8131]*y_cur[IDX_GCH2CHCNI] + + k[8135]*y_cur[IDX_GSiNCI] + k[8138]*y_cur[IDX_GC2H5CNI] + + k[8160]*y_cur[IDX_GC4NI] + k[8186]*y_cur[IDX_GC5NI] + + k[8187]*y_cur[IDX_GHC5NI] + k[8211]*y_cur[IDX_GC7NI] + + k[8216]*y_cur[IDX_GHC7NI] + k[8217]*y_cur[IDX_GHC7NI] + + k[8246]*y_cur[IDX_GC9NI] + k[8252]*y_cur[IDX_GHC9NI] + + k[8253]*y_cur[IDX_GHC9NI] - k[8292]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] - + k[8376]*y_cur[IDX_GH2I]*y_cur[IDX_GCNI] + + k[8397]*y_cur[IDX_GCI]*y_cur[IDX_GNI] + + k[8398]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] + + k[8400]*y_cur[IDX_GCI]*y_cur[IDX_GNSI] + + k[8401]*y_cur[IDX_GCI]*y_cur[IDX_GOCNI] + + k[8402]*y_cur[IDX_GCI]*y_cur[IDX_GCNOI] - + k[8412]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - + k[8446]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - + k[8488]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - + k[8529]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI] - + k[8540]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI] - + k[8592]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] - + k[8664]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - + k[8692]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - + k[8721]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - + k[8747]*y_cur[IDX_GCH2I]*y_cur[IDX_GCNI] - + k[8749]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI]; + ydot[yistart + IDX_C2H5II] = 0.0 + + k[149]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + + k[511]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - + k[764]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] - + k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] - + k[766]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] - + k[767]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] - + k[768]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[1370]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1538]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] - + k[1539]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] + + k[1562]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + + k[1577]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] + + k[1579]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H4I] + + k[1613]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + + k[1628]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + + k[1684]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[1685]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H5II] + + k[1708]*y_cur[IDX_C2H4I]*y_cur[IDX_HCOII] + + k[1709]*y_cur[IDX_C2H4I]*y_cur[IDX_NCCNHII] - + k[1719]*y_cur[IDX_C2H5II]*y_cur[IDX_CH3CNI] - + k[1720]*y_cur[IDX_C2H5II]*y_cur[IDX_H2COI] - + k[1721]*y_cur[IDX_C2H5II]*y_cur[IDX_H2SI] - + k[1722]*y_cur[IDX_C2H5II]*y_cur[IDX_HC3NI] + + k[1977]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + + k[2062]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + + k[2066]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + + k[2068]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + + k[2074]*y_cur[IDX_CH3II]*y_cur[IDX_CH4I] + + k[2135]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] + + k[2219]*y_cur[IDX_CH5II]*y_cur[IDX_C2H4I] + + k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - + k[2524]*y_cur[IDX_H2OI]*y_cur[IDX_C2H5II] + + k[2590]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + + k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] + + k[2652]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2829]*y_cur[IDX_HI]*y_cur[IDX_C2H5II] + + k[2838]*y_cur[IDX_HI]*y_cur[IDX_C2H6II] - + k[2862]*y_cur[IDX_HCNI]*y_cur[IDX_C2H5II] - + k[3037]*y_cur[IDX_HNCI]*y_cur[IDX_C2H5II] + + k[3085]*y_cur[IDX_HeII]*y_cur[IDX_C2H5OHI] - + k[3558]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5II] + + k[3659]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + + k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] + + k[5703]*y_cur[IDX_C2H5I] + k[5988]*y_cur[IDX_C2H5I] - + k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - + k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - + k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - + k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - + k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C5H2I] = 0.0 + + k[95]*y_cur[IDX_HI]*y_cur[IDX_C5HM] - + k[216]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - + k[344]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] + + k[843]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + + k[845]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + + k[929]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] - + k[1323]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] - + k[1324]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] - + k[1491]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - + k[1492]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - + k[1589]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - + k[1590]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - + k[1591]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - + k[1655]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] - + k[1656]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] - + k[1763]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] - + k[1764]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] - + k[1798]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] - + k[1799]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] - + k[1832]*y_cur[IDX_C4HII]*y_cur[IDX_C5H2I] - + k[1835]*y_cur[IDX_C4H2II]*y_cur[IDX_C5H2I] - + k[1839]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] - + k[1840]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] - + k[2022]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] - + k[2023]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] - + k[2053]*y_cur[IDX_CH3II]*y_cur[IDX_C5H2I] - + k[2304]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] - + k[2614]*y_cur[IDX_H3II]*y_cur[IDX_C5H2I] - + k[2919]*y_cur[IDX_HCOII]*y_cur[IDX_C5H2I] - + k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - + k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - k[3121]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + - k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + - k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + - k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] + - k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + - k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + - k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + - k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] + - k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] + - k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + - k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + - k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + - k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + - k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + - k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + - k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + - k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] + - k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + - k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + - k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + - k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + - k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + - k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + - k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + - k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + - k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + - k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + - k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + - k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + - k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] + - k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + - k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + - k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] + - k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + - k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + - k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + - k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] + - k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + - k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + - k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] + - k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + - k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + - k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] + - k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] + - k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + - k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + - k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] + - k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] + - k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] + - k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] + - k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + - k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + - k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + - k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + - k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] + + k[3711]*y_cur[IDX_OI]*y_cur[IDX_C6H3II] + + k[4889]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2I] - + k[4890]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2I] + + k[4924]*y_cur[IDX_CI]*y_cur[IDX_C4H3I] - + k[4927]*y_cur[IDX_CI]*y_cur[IDX_C5H2I] - + k[5239]*y_cur[IDX_NI]*y_cur[IDX_C5H2I] - k[5740]*y_cur[IDX_C5H2I] - + k[5741]*y_cur[IDX_C5H2I] - k[6025]*y_cur[IDX_C5H2I] - + k[6026]*y_cur[IDX_C5H2I] + + k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + + k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + + k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - + k[7029]*y_cur[IDX_C5H2I] + k[7211]*y_cur[IDX_GC5H2I] + + k[7393]*y_cur[IDX_GC5H2I] + k[7575]*y_cur[IDX_GC5H2I] + + k[8637]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] + + k[8727]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI]; + ydot[yistart + IDX_C5H2II] = 0.0 + + k[216]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + + k[344]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] - + k[841]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] - + k[842]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + + k[1319]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + + k[1485]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] + + k[1488]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] + + k[1516]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] + + k[1544]*y_cur[IDX_C2H2I]*y_cur[IDX_C3HII] + + k[1557]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] + + k[1584]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + + k[1592]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - + k[1637]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] - + k[1638]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + + k[1653]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] + + k[1687]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + + k[1698]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - + k[1701]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] - + k[1702]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + + k[1731]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2II] + + k[1732]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - + k[1738]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2II] + + k[1741]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] + + k[1755]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - + k[1790]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] - + k[1791]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] - + k[1826]*y_cur[IDX_C3HI]*y_cur[IDX_C5H2II] - + k[1845]*y_cur[IDX_C4HI]*y_cur[IDX_C5H2II] + + k[1866]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - + k[1868]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - + k[1869]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - + k[2037]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] - + k[2038]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + + k[2052]*y_cur[IDX_CH3II]*y_cur[IDX_C4HI] - + k[2109]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C5H2II] + + k[2166]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - + k[2180]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] - + k[2181]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + + k[2182]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + + k[2415]*y_cur[IDX_H2I]*y_cur[IDX_C5HII] - + k[2481]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] - + k[2482]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + + k[2615]*y_cur[IDX_H3II]*y_cur[IDX_C5HI] - + k[2852]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] + + k[2920]*y_cur[IDX_HCOII]*y_cur[IDX_C5HI] + + k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - + k[3415]*y_cur[IDX_NI]*y_cur[IDX_C5H2II] - + k[3706]*y_cur[IDX_OI]*y_cur[IDX_C5H2II] - + k[5578]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] - + k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] - + k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2CCH2I] = 0.0 - + k[161]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - + k[669]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - + k[711]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[810]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - + k[1343]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - + k[1344]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - + k[1345]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - + k[1771]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1772]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1773]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1774]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1775]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1808]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - + k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] - + k[1810]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + + k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - + k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] - + k[3656]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - + k[3657]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - + k[3851]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[3852]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[3853]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[3854]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[4894]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] - + k[4895]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] - + k[4946]*y_cur[IDX_CI]*y_cur[IDX_CH2CCH2I] - + k[5022]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - + k[5023]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] + + k[5065]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - + k[5067]*y_cur[IDX_CHI]*y_cur[IDX_CH2CCH2I] + + k[5071]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - + k[5109]*y_cur[IDX_CNI]*y_cur[IDX_CH2CCH2I] - + k[5381]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - + k[5382]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - + k[5383]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - + k[5780]*y_cur[IDX_CH2CCH2I] - k[5781]*y_cur[IDX_CH2CCH2I] + + k[5784]*y_cur[IDX_CH2CHCCHI] - k[6080]*y_cur[IDX_CH2CCH2I] - + k[6081]*y_cur[IDX_CH2CCH2I] - k[6082]*y_cur[IDX_CH2CCH2I] + + k[6085]*y_cur[IDX_CH2CHCCHI] + + k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6951]*y_cur[IDX_CH2CCH2I] + k[7133]*y_cur[IDX_GCH2CCH2I] + + k[7315]*y_cur[IDX_GCH2CCH2I] + k[7497]*y_cur[IDX_GCH2CCH2I] + + k[8614]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + + k[8722]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; + ydot[yistart + IDX_CNII] = 0.0 - + k[208]*y_cur[IDX_C2I]*y_cur[IDX_CNII] - + k[241]*y_cur[IDX_C2HI]*y_cur[IDX_CNII] - + k[245]*y_cur[IDX_CI]*y_cur[IDX_CNII] - + k[260]*y_cur[IDX_CH2I]*y_cur[IDX_CNII] - + k[288]*y_cur[IDX_CHI]*y_cur[IDX_CNII] - + k[298]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - + k[299]*y_cur[IDX_CNII]*y_cur[IDX_COI] - + k[300]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - + k[301]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] - + k[302]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] - + k[303]*y_cur[IDX_CNII]*y_cur[IDX_NOI] - + k[304]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - + k[305]*y_cur[IDX_CNII]*y_cur[IDX_SI] + + k[306]*y_cur[IDX_CNI]*y_cur[IDX_N2II] + + k[444]*y_cur[IDX_H2II]*y_cur[IDX_CNI] - + k[487]*y_cur[IDX_HI]*y_cur[IDX_CNII] + + k[547]*y_cur[IDX_NII]*y_cur[IDX_CNI] - + k[586]*y_cur[IDX_NH2I]*y_cur[IDX_CNII] - + k[616]*y_cur[IDX_NHI]*y_cur[IDX_CNII] - + k[681]*y_cur[IDX_OI]*y_cur[IDX_CNII] - + k[698]*y_cur[IDX_OHI]*y_cur[IDX_CNII] - + k[977]*y_cur[IDX_CNII]*y_cur[IDX_eM] + + k[1420]*y_cur[IDX_CII]*y_cur[IDX_NHI] + + k[1961]*y_cur[IDX_CHII]*y_cur[IDX_NI] + + k[1965]*y_cur[IDX_CHII]*y_cur[IDX_NHI] + + k[2256]*y_cur[IDX_CHI]*y_cur[IDX_NII] - + k[2269]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - + k[2270]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - + k[2271]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - + k[2272]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] - + k[2273]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] - + k[2274]*y_cur[IDX_CNII]*y_cur[IDX_NOI] - + k[2275]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - + k[2276]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - + k[2433]*y_cur[IDX_H2I]*y_cur[IDX_CNII] - + k[2535]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[2536]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[2537]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[2538]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] + k[3192]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] + - k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] + - k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] + - k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] + - k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + - k[3197]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + - k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + - k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + - k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + - k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + k[3205]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + - k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + - k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] + - k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + - k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + - k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + - k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + - k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] + - k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + - k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + - k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + - k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + - k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + - k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + - k[3226]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + - k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + - k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + - k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + - k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + - k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] + - k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + - k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + - k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + - k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + - k[3242]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + - k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] + - k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] + k[3245]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + - k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + - k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] + - k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + - k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + - k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + - k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + - k[3257]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + - k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + - k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] + - k[3260]*y_cur[IDX_HeII]*y_cur[IDX_HFI] + k[3261]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + - k[3265]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] + - k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] + - k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] + - k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] + - k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + - k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + - k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + - k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + - k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] + - k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + - k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + - k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + - k[3277]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + - k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + k[3279]*y_cur[IDX_HeII]*y_cur[IDX_NCCNI] + - k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + - k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + - k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] + - k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + - k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + - k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] + - k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + - k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + - k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + - k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + - k[3290]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + k[3291]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + - k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + - k[3293]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3294]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3295]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3296]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3297]*y_cur[IDX_HeII]*y_cur[IDX_OHI] + - k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] + - k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] + - k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] + - k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] + - k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] + - k[3303]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + - k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + - k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + - k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + - k[3307]*y_cur[IDX_HeII]*y_cur[IDX_SiC2I] + - k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + - k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + - k[3310]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + - k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + - k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] + - k[3313]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + - k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + - k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] + - k[3316]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + - k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + - k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + - k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + - k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + - k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + - k[3322]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + - k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + - k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + - k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + - k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + - k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + - k[3328]*y_cur[IDX_HeII]*y_cur[IDX_SiHI] + - k[3329]*y_cur[IDX_HeII]*y_cur[IDX_SiNI] + - k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] + - k[3331]*y_cur[IDX_HeII]*y_cur[IDX_SiO2I] + - k[3332]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + - k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + - k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + - k[3335]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + - k[3906]*y_cur[IDX_CM]*y_cur[IDX_HeII] + - k[3941]*y_cur[IDX_C10M]*y_cur[IDX_HeII] + - k[3976]*y_cur[IDX_C10HM]*y_cur[IDX_HeII] + - k[4011]*y_cur[IDX_C2M]*y_cur[IDX_HeII] + - k[4046]*y_cur[IDX_C2HM]*y_cur[IDX_HeII] + - k[4081]*y_cur[IDX_C3M]*y_cur[IDX_HeII] + - k[4116]*y_cur[IDX_C3HM]*y_cur[IDX_HeII] + - k[4151]*y_cur[IDX_C3NM]*y_cur[IDX_HeII] + - k[4186]*y_cur[IDX_C4M]*y_cur[IDX_HeII] + - k[4221]*y_cur[IDX_C4HM]*y_cur[IDX_HeII] + - k[4256]*y_cur[IDX_C5M]*y_cur[IDX_HeII] + - k[4291]*y_cur[IDX_C5HM]*y_cur[IDX_HeII] + - k[4326]*y_cur[IDX_C5NM]*y_cur[IDX_HeII] + - k[4361]*y_cur[IDX_C6M]*y_cur[IDX_HeII] + - k[4396]*y_cur[IDX_C6HM]*y_cur[IDX_HeII] + - k[4431]*y_cur[IDX_C7M]*y_cur[IDX_HeII] + - k[4466]*y_cur[IDX_C7HM]*y_cur[IDX_HeII] + - k[4501]*y_cur[IDX_C8M]*y_cur[IDX_HeII] + - k[4536]*y_cur[IDX_C8HM]*y_cur[IDX_HeII] + - k[4571]*y_cur[IDX_C9M]*y_cur[IDX_HeII] + - k[4606]*y_cur[IDX_C9HM]*y_cur[IDX_HeII] + - k[4641]*y_cur[IDX_CHM]*y_cur[IDX_HeII] + - k[4676]*y_cur[IDX_CNM]*y_cur[IDX_HeII] + - k[4712]*y_cur[IDX_HM]*y_cur[IDX_HeII] + - k[4747]*y_cur[IDX_OM]*y_cur[IDX_HeII] + - k[4782]*y_cur[IDX_O2M]*y_cur[IDX_HeII] + - k[4817]*y_cur[IDX_OHM]*y_cur[IDX_HeII] + - k[4852]*y_cur[IDX_SM]*y_cur[IDX_HeII] - - k[5547]*y_cur[IDX_HII]*y_cur[IDX_HeI] + - k[5619]*y_cur[IDX_HeII]*y_cur[IDX_eM] + - k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + - k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + - k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + - k[5638]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + - k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + - k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + - k[5647]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + - k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + - k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + - k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + - k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + - k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + - k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + - k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + - k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + - k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + - k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + - k[5674]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - k[5683]*y_cur[IDX_HeI] - - k[5876]*y_cur[IDX_HeI] - k[6298]*y_cur[IDX_HeI] + - k[6312]*y_cur[IDX_HeII]*y_cur[IDX_GRAINM] + - k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM] - k[6890]*y_cur[IDX_HeI] - + k[7072]*y_cur[IDX_GHeI] + k[7254]*y_cur[IDX_GHeI] + - k[7436]*y_cur[IDX_GHeI]; - ydot[yistart + IDX_HeII] = 0.0 - - k[458]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - - k[491]*y_cur[IDX_HI]*y_cur[IDX_HeII] - - k[506]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[507]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[508]*y_cur[IDX_HeII]*y_cur[IDX_C2I] - - k[509]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - - k[510]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[511]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - - k[512]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] - - k[513]*y_cur[IDX_HeII]*y_cur[IDX_CI] - - k[514]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[515]*y_cur[IDX_HeII]*y_cur[IDX_CHI] - - k[516]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[517]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - - k[518]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - - k[519]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - - k[520]*y_cur[IDX_HeII]*y_cur[IDX_HCNOI] - - k[521]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] - - k[522]*y_cur[IDX_HeII]*y_cur[IDX_HONCI] - + k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] - + k[3456]*y_cur[IDX_NI]*y_cur[IDX_CNII] + + k[5504]*y_cur[IDX_CII]*y_cur[IDX_NI] - + k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2H6I] = 0.0 + + k[237]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H6II] + + k[276]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - + k[441]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - + k[466]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + + k[601]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] - + k[687]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + + k[779]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + + k[812]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - + k[1367]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1368]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1369]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1370]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1511]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - + k[1512]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - + k[1613]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - + k[1614]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - + k[1615]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - + k[1670]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - + k[1671]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] + + k[1682]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[2062]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - + k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - + k[2064]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + + k[2070]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - + k[2112]*y_cur[IDX_C2H6I]*y_cur[IDX_S2II] - + k[2222]*y_cur[IDX_CH5II]*y_cur[IDX_C2H6I] - + k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] - + k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] - + k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - + k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - + k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - + k[2506]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - + k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] + + k[2665]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2864]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - + k[2949]*y_cur[IDX_HCOII]*y_cur[IDX_C2H6I] - + k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - + k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - + k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + + k[3560]*y_cur[IDX_NH3I]*y_cur[IDX_C2H7II] - + k[3771]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[3772]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[3774]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] - + k[5052]*y_cur[IDX_C2H6I]*y_cur[IDX_C4HI] - + k[5069]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - + k[5070]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - + k[5111]*y_cur[IDX_CNI]*y_cur[IDX_C2H6I] + + k[5458]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] - k[5803]*y_cur[IDX_C2H6I] - + k[5804]*y_cur[IDX_C2H6I] - k[6108]*y_cur[IDX_C2H6I] - + k[6109]*y_cur[IDX_C2H6I] + + k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + + k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6923]*y_cur[IDX_C2H6I] + k[7105]*y_cur[IDX_GC2H6I] + + k[7287]*y_cur[IDX_GC2H6I] + k[7469]*y_cur[IDX_GC2H6I] + + k[8591]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] + + k[8748]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I]; + ydot[yistart + IDX_GNI] = 0.0 + k[6894]*y_cur[IDX_NI] - + k[7076]*y_cur[IDX_GNI] - k[7258]*y_cur[IDX_GNI] - + k[7440]*y_cur[IDX_GNI] + k[7623]*y_cur[IDX_GNHI] + + k[7624]*y_cur[IDX_GNHI] + k[7631]*y_cur[IDX_GNH2I] + + k[7649]*y_cur[IDX_GCNI] + k[7666]*y_cur[IDX_GN2I] + + k[7666]*y_cur[IDX_GN2I] + k[7690]*y_cur[IDX_GNOI] + + k[7691]*y_cur[IDX_GNOI] + k[7717]*y_cur[IDX_GC2NI] + + k[7748]*y_cur[IDX_GSiNI] + k[7756]*y_cur[IDX_GN2OI] + + k[7768]*y_cur[IDX_GPNI] + k[7779]*y_cur[IDX_GNSI] + + k[7900]*y_cur[IDX_GNHI] + k[7901]*y_cur[IDX_GNHI] + + k[7908]*y_cur[IDX_GNH2I] + k[7936]*y_cur[IDX_GCNI] + + k[7953]*y_cur[IDX_GN2I] + k[7953]*y_cur[IDX_GN2I] + + k[7980]*y_cur[IDX_GNOI] + k[7981]*y_cur[IDX_GNOI] + + k[8024]*y_cur[IDX_GC2NI] + k[8062]*y_cur[IDX_GSiNI] + + k[8071]*y_cur[IDX_GN2OI] + k[8073]*y_cur[IDX_GN2OI] + + k[8074]*y_cur[IDX_GN2OI] + k[8074]*y_cur[IDX_GN2OI] + + k[8088]*y_cur[IDX_GPNI] + k[8101]*y_cur[IDX_GNSI] + + k[8127]*y_cur[IDX_GNCCNI] + k[8161]*y_cur[IDX_GC4NI] - + k[8279]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - + k[8397]*y_cur[IDX_GCI]*y_cur[IDX_GNI] - + k[8454]*y_cur[IDX_GNI]*y_cur[IDX_GO2HI] - + k[8455]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] - + k[8456]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] - + k[8457]*y_cur[IDX_GNI]*y_cur[IDX_GNI] - + k[8457]*y_cur[IDX_GNI]*y_cur[IDX_GNI] - + k[8458]*y_cur[IDX_GNI]*y_cur[IDX_GNHI] - + k[8459]*y_cur[IDX_GNI]*y_cur[IDX_GNSI] - + k[8460]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] - + k[8461]*y_cur[IDX_GNI]*y_cur[IDX_GOI] - + k[8462]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - + k[8463]*y_cur[IDX_GNI]*y_cur[IDX_GHSI] - + k[8464]*y_cur[IDX_GNI]*y_cur[IDX_GSI] - + k[8465]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - + k[8466]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI] - + k[8467]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - + k[8468]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI] - + k[8469]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - + k[8470]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI] - + k[8471]*y_cur[IDX_GNI]*y_cur[IDX_GC9I] - + k[8472]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI] - + k[8580]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - + k[8657]*y_cur[IDX_GCI]*y_cur[IDX_GNI] - + k[8698]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] - + k[8699]*y_cur[IDX_GNI]*y_cur[IDX_GCH2I] - + k[8700]*y_cur[IDX_GNI]*y_cur[IDX_GNI] - + k[8700]*y_cur[IDX_GNI]*y_cur[IDX_GNI] - + k[8701]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] - + k[8702]*y_cur[IDX_GNI]*y_cur[IDX_GOI] - + k[8703]*y_cur[IDX_GNI]*y_cur[IDX_GC2I] - + k[8704]*y_cur[IDX_GNI]*y_cur[IDX_GSI] - + k[8705]*y_cur[IDX_GNI]*y_cur[IDX_GC3I] - + k[8706]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI] - + k[8707]*y_cur[IDX_GNI]*y_cur[IDX_GC5I] - + k[8708]*y_cur[IDX_GNI]*y_cur[IDX_GC5HI] - + k[8709]*y_cur[IDX_GNI]*y_cur[IDX_GC7I] - + k[8710]*y_cur[IDX_GNI]*y_cur[IDX_GC7HI] - + k[8711]*y_cur[IDX_GNI]*y_cur[IDX_GC9I] - + k[8712]*y_cur[IDX_GNI]*y_cur[IDX_GC9HI]; + ydot[yistart + IDX_C3H2I] = 0.0 - + k[334]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] + + k[798]*y_cur[IDX_C3H3II]*y_cur[IDX_eM] - + k[1310]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] - + k[1311]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] - + k[1485]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] - + k[1486]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] - + k[1580]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - + k[1581]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - + k[1582]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - + k[1649]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] - + k[1650]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] - + k[1759]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] - + k[1760]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] - + k[1786]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] - + k[1787]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] - + k[1788]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H2II] - + k[1789]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H3II] - + k[1790]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] - + k[1791]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] - + k[1792]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] - + k[1793]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] - + k[1794]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] - + k[1795]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] - + k[2050]*y_cur[IDX_CH3II]*y_cur[IDX_C3H2I] + + k[2122]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] - + k[2300]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] - + k[2602]*y_cur[IDX_H3II]*y_cur[IDX_C3H2I] - + k[2772]*y_cur[IDX_H3OII]*y_cur[IDX_C3H2I] - + k[2907]*y_cur[IDX_HCOII]*y_cur[IDX_C3H2I] - + k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] + + k[3565]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - + k[3820]*y_cur[IDX_SII]*y_cur[IDX_C3H2I] - + k[3860]*y_cur[IDX_SiII]*y_cur[IDX_C3H2I] - + k[4889]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2I] + + k[4913]*y_cur[IDX_CI]*y_cur[IDX_C2H3I] - + k[4919]*y_cur[IDX_CI]*y_cur[IDX_C3H2I] + + k[5063]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - + k[5232]*y_cur[IDX_NI]*y_cur[IDX_C3H2I] - k[5719]*y_cur[IDX_C3H2I] + + k[5782]*y_cur[IDX_CH2CCHI] - k[6003]*y_cur[IDX_C3H2I] + + k[6083]*y_cur[IDX_CH2CCHI] + + k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM] - + k[6948]*y_cur[IDX_C3H2I] + k[7130]*y_cur[IDX_GC3H2I] + + k[7312]*y_cur[IDX_GC3H2I] + k[7494]*y_cur[IDX_GC3H2I] + + k[8611]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] + + k[8720]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI]; + ydot[yistart + IDX_C2H5I] = 0.0 - + k[149]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] - + k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] - + k[511]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + + k[772]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] + + k[775]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + + k[776]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + + k[778]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + + k[936]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] - + k[1306]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + + k[1532]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + + k[1683]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] + + k[1817]*y_cur[IDX_C3H6II]*y_cur[IDX_CH3CHCH2I] + + k[2111]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - + k[2298]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + + k[2506]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + + k[2534]*y_cur[IDX_H2OI]*y_cur[IDX_C2H6II] - + k[2591]*y_cur[IDX_H3II]*y_cur[IDX_C2H5I] + + k[2872]*y_cur[IDX_HCNI]*y_cur[IDX_C2H6II] - + k[2902]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5I] - + k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - + k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + + k[3568]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + + k[3826]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + + k[3859]*y_cur[IDX_SiII]*y_cur[IDX_C2H5OHI] + + k[4886]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] + + k[4887]*y_cur[IDX_C2H5CNI]*y_cur[IDX_OHI] - + k[4915]*y_cur[IDX_CI]*y_cur[IDX_C2H5I] + + k[5027]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + + k[5052]*y_cur[IDX_C2H6I]*y_cur[IDX_C4HI] + + k[5056]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] + + k[5111]*y_cur[IDX_CNI]*y_cur[IDX_C2H6I] - + k[5226]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - + k[5227]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - + k[5350]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - + k[5351]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - + k[5457]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] - + k[5458]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] - k[5702]*y_cur[IDX_C2H5I] - + k[5703]*y_cur[IDX_C2H5I] + k[5705]*y_cur[IDX_C2H5CNI] + + k[5706]*y_cur[IDX_C2H5OHI] - k[5987]*y_cur[IDX_C2H5I] - + k[5988]*y_cur[IDX_C2H5I] + k[5990]*y_cur[IDX_C2H5CNI] + + k[5991]*y_cur[IDX_C2H5OHI] + + k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + + k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + + k[6576]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + + k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - + k[6922]*y_cur[IDX_C2H5I] + k[7104]*y_cur[IDX_GC2H5I] + + k[7286]*y_cur[IDX_GC2H5I] + k[7468]*y_cur[IDX_GC2H5I] + + k[8590]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] + + k[8746]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I]; + ydot[yistart + IDX_GOI] = 0.0 + k[6899]*y_cur[IDX_OI] - + k[7081]*y_cur[IDX_GOI] - k[7263]*y_cur[IDX_GOI] - + k[7445]*y_cur[IDX_GOI] + k[7616]*y_cur[IDX_GCOI] + + k[7638]*y_cur[IDX_GOHI] + k[7675]*y_cur[IDX_GCOI] + + k[7690]*y_cur[IDX_GNOI] + k[7691]*y_cur[IDX_GNOI] + + k[7703]*y_cur[IDX_GO2I] + k[7703]*y_cur[IDX_GO2I] + + k[7704]*y_cur[IDX_GO2I] + k[7704]*y_cur[IDX_GO2I] + + k[7727]*y_cur[IDX_GC2OI] + k[7741]*y_cur[IDX_GCNOI] + + k[7744]*y_cur[IDX_GCH2COI] + k[7747]*y_cur[IDX_GOCNI] + + k[7764]*y_cur[IDX_GCO2I] + k[7765]*y_cur[IDX_GSiOI] + + k[7771]*y_cur[IDX_GCH3OCH3I] + k[7778]*y_cur[IDX_GNO2I] + + k[7782]*y_cur[IDX_GPOI] + k[7786]*y_cur[IDX_GSOI] + + k[7787]*y_cur[IDX_GSOI] + k[7796]*y_cur[IDX_GClOI] + + k[7829]*y_cur[IDX_GOCSI] + k[7832]*y_cur[IDX_GSiO2I] + + k[7839]*y_cur[IDX_GSO2I] + k[7881]*y_cur[IDX_GCH3OI] + + k[7919]*y_cur[IDX_GOHI] + k[7920]*y_cur[IDX_GOHI] + + k[7922]*y_cur[IDX_GH2OI] + k[7923]*y_cur[IDX_GH2OI] + + k[7924]*y_cur[IDX_GH2OI] + k[7962]*y_cur[IDX_GCOI] + + k[7980]*y_cur[IDX_GNOI] + k[7981]*y_cur[IDX_GNOI] + + k[7984]*y_cur[IDX_GH2COI] + k[8003]*y_cur[IDX_GO2I] + + k[8003]*y_cur[IDX_GO2I] + k[8004]*y_cur[IDX_GO2I] + + k[8004]*y_cur[IDX_GO2I] + k[8006]*y_cur[IDX_GO2HI] + + k[8035]*y_cur[IDX_GC2OI] + k[8052]*y_cur[IDX_GCNOI] + + k[8055]*y_cur[IDX_GCH2COI] + k[8061]*y_cur[IDX_GOCNI] + + k[8070]*y_cur[IDX_GN2OI] + k[8072]*y_cur[IDX_GN2OI] + + k[8074]*y_cur[IDX_GN2OI] + k[8082]*y_cur[IDX_GCO2I] + + k[8083]*y_cur[IDX_GSiOI] + k[8084]*y_cur[IDX_GSiOI] + + k[8091]*y_cur[IDX_GCH3OCH3I] + k[8099]*y_cur[IDX_GNO2I] + + k[8100]*y_cur[IDX_GNO2I] + k[8106]*y_cur[IDX_GPOI] + + k[8110]*y_cur[IDX_GSOI] + k[8111]*y_cur[IDX_GSOI] + + k[8121]*y_cur[IDX_GClOI] + k[8153]*y_cur[IDX_GOCSI] + + k[8156]*y_cur[IDX_GSiO2I] + k[8164]*y_cur[IDX_GSO2I] + + k[8264]*y_cur[IDX_GCH3OI] - k[8282]*y_cur[IDX_GHI]*y_cur[IDX_GOI] + + k[8398]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - + k[8406]*y_cur[IDX_GCI]*y_cur[IDX_GOI] + + k[8407]*y_cur[IDX_GCI]*y_cur[IDX_GO2I] - + k[8434]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] - + k[8435]*y_cur[IDX_GOI]*y_cur[IDX_GHNOI] - + k[8436]*y_cur[IDX_GOI]*y_cur[IDX_GO2HI] - + k[8437]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - + k[8438]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - + k[8439]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] - + k[8440]*y_cur[IDX_GOI]*y_cur[IDX_GNH2I] - + k[8441]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] - + k[8442]*y_cur[IDX_GOI]*y_cur[IDX_GNSI] - + k[8443]*y_cur[IDX_GOI]*y_cur[IDX_GOI] - + k[8443]*y_cur[IDX_GOI]*y_cur[IDX_GOI] - + k[8444]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - + k[8445]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - + k[8446]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - + k[8447]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] - + k[8448]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] - + k[8449]*y_cur[IDX_GOI]*y_cur[IDX_GHSI] - + k[8450]*y_cur[IDX_GOI]*y_cur[IDX_GSI] - + k[8451]*y_cur[IDX_GOI]*y_cur[IDX_GC3I] - + k[8452]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] - + k[8453]*y_cur[IDX_GOI]*y_cur[IDX_GSOI] - + k[8461]*y_cur[IDX_GNI]*y_cur[IDX_GOI] + + k[8481]*y_cur[IDX_GCHI]*y_cur[IDX_GNOI] + + k[8485]*y_cur[IDX_GCHI]*y_cur[IDX_GO2I] + + k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] + + k[8528]*y_cur[IDX_GCH2I]*y_cur[IDX_GO2I] - + k[8583]*y_cur[IDX_GHI]*y_cur[IDX_GOI] - + k[8661]*y_cur[IDX_GCI]*y_cur[IDX_GOI] - + k[8685]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - + k[8686]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I] - + k[8687]*y_cur[IDX_GOI]*y_cur[IDX_GNHI] - + k[8688]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] - + k[8689]*y_cur[IDX_GOI]*y_cur[IDX_GOI] - + k[8689]*y_cur[IDX_GOI]*y_cur[IDX_GOI] - + k[8690]*y_cur[IDX_GOI]*y_cur[IDX_GOHI] - + k[8691]*y_cur[IDX_GOI]*y_cur[IDX_GC2I] - + k[8692]*y_cur[IDX_GOI]*y_cur[IDX_GCNI] - + k[8693]*y_cur[IDX_GOI]*y_cur[IDX_GCOI] - + k[8694]*y_cur[IDX_GOI]*y_cur[IDX_GSI] - + k[8695]*y_cur[IDX_GOI]*y_cur[IDX_GC3I] - + k[8696]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] - + k[8697]*y_cur[IDX_GOI]*y_cur[IDX_GSOI] - + k[8702]*y_cur[IDX_GNI]*y_cur[IDX_GOI]; + ydot[yistart + IDX_N2II] = 0.0 - + k[210]*y_cur[IDX_C2I]*y_cur[IDX_N2II] - + k[243]*y_cur[IDX_C2HI]*y_cur[IDX_N2II] - + k[247]*y_cur[IDX_CI]*y_cur[IDX_N2II] - + k[264]*y_cur[IDX_CH2I]*y_cur[IDX_N2II] - + k[293]*y_cur[IDX_CHI]*y_cur[IDX_N2II] - + k[306]*y_cur[IDX_CNI]*y_cur[IDX_N2II] - + k[316]*y_cur[IDX_COI]*y_cur[IDX_N2II] - + k[481]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] - + k[498]*y_cur[IDX_HCNI]*y_cur[IDX_N2II] + k[523]*y_cur[IDX_HeII]*y_cur[IDX_N2I] - - k[524]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - - k[525]*y_cur[IDX_HeII]*y_cur[IDX_O2I] - - k[526]*y_cur[IDX_HeII]*y_cur[IDX_PI] - - k[527]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - - k[528]*y_cur[IDX_HeII]*y_cur[IDX_SiI] - - k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - - k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3032]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - - k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - - k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - - k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - - k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] - - k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - - k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - - k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - - k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] - - k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] - - k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - - k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - - k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - - k[3085]*y_cur[IDX_HeII]*y_cur[IDX_C2H5OHI] - - k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - - k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - - k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - - k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] - - k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] - - k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - - k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - - k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - - k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - - k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] - - k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] - - k[3097]*y_cur[IDX_HeII]*y_cur[IDX_C3HI] - - k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] - - k[3099]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] - - k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] - - k[3101]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] - - k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] - - k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] - - k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] - - k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - - k[3106]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - - k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - - k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - - k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - - k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - - k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] - - k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] - - k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - + k[535]*y_cur[IDX_MgI]*y_cur[IDX_N2II] - + k[564]*y_cur[IDX_N2II]*y_cur[IDX_CO2I] - + k[565]*y_cur[IDX_N2II]*y_cur[IDX_FeI] - + k[566]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] - + k[567]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - + k[568]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] - + k[569]*y_cur[IDX_N2II]*y_cur[IDX_NOI] - + k[570]*y_cur[IDX_N2II]*y_cur[IDX_O2I] - + k[571]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - + k[572]*y_cur[IDX_N2II]*y_cur[IDX_SI] - + k[573]*y_cur[IDX_NI]*y_cur[IDX_N2II] - + k[589]*y_cur[IDX_NH2I]*y_cur[IDX_N2II] - + k[610]*y_cur[IDX_NH3I]*y_cur[IDX_N2II] - + k[618]*y_cur[IDX_NHI]*y_cur[IDX_N2II] - + k[640]*y_cur[IDX_NaI]*y_cur[IDX_N2II] - + k[684]*y_cur[IDX_OI]*y_cur[IDX_N2II] - + k[700]*y_cur[IDX_OHI]*y_cur[IDX_N2II] - + k[1150]*y_cur[IDX_N2II]*y_cur[IDX_eM] - + k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - + k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - + k[2460]*y_cur[IDX_H2I]*y_cur[IDX_N2II] - + k[2557]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] + + k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3355]*y_cur[IDX_NII]*y_cur[IDX_NHI] + + k[3356]*y_cur[IDX_NII]*y_cur[IDX_NOI] - + k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] - + k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - + k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - + k[3364]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] - + k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] + + k[3456]*y_cur[IDX_NI]*y_cur[IDX_CNII] + + k[3463]*y_cur[IDX_NI]*y_cur[IDX_NHII] - + k[3744]*y_cur[IDX_OI]*y_cur[IDX_N2II] + + k[5581]*y_cur[IDX_NII]*y_cur[IDX_NI] - + k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4SII] = 0.0 + + k[156]*y_cur[IDX_CII]*y_cur[IDX_C4SI] + + k[342]*y_cur[IDX_HII]*y_cur[IDX_C4SI] - + k[835]*y_cur[IDX_C4SII]*y_cur[IDX_eM] - + k[836]*y_cur[IDX_C4SII]*y_cur[IDX_eM] - + k[837]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + + k[3822]*y_cur[IDX_SII]*y_cur[IDX_C4HI] - + k[3891]*y_cur[IDX_CM]*y_cur[IDX_C4SII] - + k[3926]*y_cur[IDX_C10M]*y_cur[IDX_C4SII] - + k[3961]*y_cur[IDX_C10HM]*y_cur[IDX_C4SII] - + k[3996]*y_cur[IDX_C2M]*y_cur[IDX_C4SII] - + k[4031]*y_cur[IDX_C2HM]*y_cur[IDX_C4SII] - + k[4066]*y_cur[IDX_C3M]*y_cur[IDX_C4SII] - + k[4101]*y_cur[IDX_C3HM]*y_cur[IDX_C4SII] - + k[4136]*y_cur[IDX_C3NM]*y_cur[IDX_C4SII] - + k[4171]*y_cur[IDX_C4M]*y_cur[IDX_C4SII] - + k[4206]*y_cur[IDX_C4HM]*y_cur[IDX_C4SII] - + k[4241]*y_cur[IDX_C5M]*y_cur[IDX_C4SII] - + k[4276]*y_cur[IDX_C5HM]*y_cur[IDX_C4SII] - + k[4311]*y_cur[IDX_C5NM]*y_cur[IDX_C4SII] - + k[4346]*y_cur[IDX_C6M]*y_cur[IDX_C4SII] - + k[4381]*y_cur[IDX_C6HM]*y_cur[IDX_C4SII] - + k[4416]*y_cur[IDX_C7M]*y_cur[IDX_C4SII] - + k[4451]*y_cur[IDX_C7HM]*y_cur[IDX_C4SII] - + k[4486]*y_cur[IDX_C8M]*y_cur[IDX_C4SII] - + k[4521]*y_cur[IDX_C8HM]*y_cur[IDX_C4SII] - + k[4556]*y_cur[IDX_C9M]*y_cur[IDX_C4SII] - + k[4591]*y_cur[IDX_C9HM]*y_cur[IDX_C4SII] - + k[4626]*y_cur[IDX_CHM]*y_cur[IDX_C4SII] - + k[4661]*y_cur[IDX_CNM]*y_cur[IDX_C4SII] - + k[4696]*y_cur[IDX_HM]*y_cur[IDX_C4SII] - + k[4732]*y_cur[IDX_OM]*y_cur[IDX_C4SII] - + k[4767]*y_cur[IDX_O2M]*y_cur[IDX_C4SII] - + k[4802]*y_cur[IDX_OHM]*y_cur[IDX_C4SII] - + k[4837]*y_cur[IDX_SM]*y_cur[IDX_C4SII] - + k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - + k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - + k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HCNII] = 0.0 - + k[230]*y_cur[IDX_C2H2I]*y_cur[IDX_HCNII] + + k[301]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] + + k[388]*y_cur[IDX_HII]*y_cur[IDX_HCNI] + + k[449]*y_cur[IDX_H2II]*y_cur[IDX_HCNI] - + k[480]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] - + k[490]*y_cur[IDX_HI]*y_cur[IDX_HCNII] - + k[494]*y_cur[IDX_HCNII]*y_cur[IDX_NOI] - + k[495]*y_cur[IDX_HCNII]*y_cur[IDX_O2I] - + k[496]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + + k[497]*y_cur[IDX_HCNI]*y_cur[IDX_COII] + + k[498]*y_cur[IDX_HCNI]*y_cur[IDX_N2II] + + k[554]*y_cur[IDX_NII]*y_cur[IDX_HCNI] - + k[608]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - + k[1088]*y_cur[IDX_HCNII]*y_cur[IDX_eM] + + k[1417]*y_cur[IDX_CII]*y_cur[IDX_NH2I] + + k[1419]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - + k[1458]*y_cur[IDX_C2I]*y_cur[IDX_HCNII] - + k[1745]*y_cur[IDX_C2HI]*y_cur[IDX_HCNII] - + k[1903]*y_cur[IDX_CI]*y_cur[IDX_HCNII] + + k[1962]*y_cur[IDX_CHII]*y_cur[IDX_NH2I] - + k[2005]*y_cur[IDX_CH2I]*y_cur[IDX_HCNII] - + k[2199]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] - + k[2200]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] - + k[2250]*y_cur[IDX_CHI]*y_cur[IDX_HCNII] + + k[2273]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + + k[2278]*y_cur[IDX_CNI]*y_cur[IDX_HNOII] + + k[2279]*y_cur[IDX_CNI]*y_cur[IDX_O2HII] + + k[2381]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + + k[2433]*y_cur[IDX_H2I]*y_cur[IDX_CNII] - + k[2450]*y_cur[IDX_H2I]*y_cur[IDX_HCNII] + + k[2536]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[2546]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] + + k[2671]*y_cur[IDX_H3II]*y_cur[IDX_CNI] + + k[2830]*y_cur[IDX_HI]*y_cur[IDX_C2N2II] - + k[2853]*y_cur[IDX_HCNII]*y_cur[IDX_CO2I] - + k[2854]*y_cur[IDX_HCNII]*y_cur[IDX_COI] - + k[2855]*y_cur[IDX_HCNII]*y_cur[IDX_H2COI] - + k[2856]*y_cur[IDX_HCNII]*y_cur[IDX_HCNI] - + k[2857]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] - + k[2858]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] - + k[2859]*y_cur[IDX_HCNII]*y_cur[IDX_HNCI] - + k[2860]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + + k[2865]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] + + k[3017]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + + k[3025]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[3452]*y_cur[IDX_NI]*y_cur[IDX_CH2II] + + k[3479]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + + k[3481]*y_cur[IDX_NHII]*y_cur[IDX_CNI] - + k[3539]*y_cur[IDX_NH2I]*y_cur[IDX_HCNII] - + k[3581]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - + k[3613]*y_cur[IDX_NHI]*y_cur[IDX_HCNII] + + k[3775]*y_cur[IDX_OHII]*y_cur[IDX_CNI] - + k[3800]*y_cur[IDX_OHI]*y_cur[IDX_HCNII] - + k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3CHCH2I] = 0.0 - + k[166]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[670]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[702]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[712]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] + + k[813]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] - + k[1373]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1374]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1375]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1376]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1815]*y_cur[IDX_C3H5II]*y_cur[IDX_CH3CHCH2I] - + k[1817]*y_cur[IDX_C3H6II]*y_cur[IDX_CH3CHCH2I] + + k[1818]*y_cur[IDX_C3H7II]*y_cur[IDX_NH3I] - + k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - + k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - + k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] - + k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] - + k[2790]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHCH2I] - + k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - + k[3370]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - + k[3658]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3659]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3660]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3661]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3823]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[3824]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[3825]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[3826]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - + k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] - + k[4898]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CHCH2I] - + k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] - + k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - + k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - + k[5055]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] - + k[5056]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] + + k[5070]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - + k[5071]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - + k[5072]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - + k[5112]*y_cur[IDX_CNI]*y_cur[IDX_CH3CHCH2I] + + k[5786]*y_cur[IDX_C4H6I] - k[5805]*y_cur[IDX_CH3CHCH2I] + + k[6087]*y_cur[IDX_C4H6I] - k[6110]*y_cur[IDX_CH3CHCH2I] + + k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6959]*y_cur[IDX_CH3CHCH2I] + k[7141]*y_cur[IDX_GCH3CHCH2I] + + k[7323]*y_cur[IDX_GCH3CHCH2I] + k[7505]*y_cur[IDX_GCH3CHCH2I]; + ydot[yistart + IDX_C2II] = 0.0 - + k[205]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] - + k[206]*y_cur[IDX_C2II]*y_cur[IDX_NOI] - + k[207]*y_cur[IDX_C2II]*y_cur[IDX_SI] + + k[208]*y_cur[IDX_C2I]*y_cur[IDX_CNII] + + k[209]*y_cur[IDX_C2I]*y_cur[IDX_COII] + + k[210]*y_cur[IDX_C2I]*y_cur[IDX_N2II] + + k[211]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - + k[244]*y_cur[IDX_CI]*y_cur[IDX_C2II] - + k[259]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] - + k[287]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + + k[323]*y_cur[IDX_HII]*y_cur[IDX_C2I] + + k[436]*y_cur[IDX_H2II]*y_cur[IDX_C2I] + + k[462]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] + + k[508]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + + k[542]*y_cur[IDX_NII]*y_cur[IDX_C2I] - + k[585]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] + + k[646]*y_cur[IDX_OII]*y_cur[IDX_C2I] + + k[685]*y_cur[IDX_OHII]*y_cur[IDX_C2I] - + k[697]*y_cur[IDX_OHI]*y_cur[IDX_C2II] - + k[739]*y_cur[IDX_C2II]*y_cur[IDX_eM] + + k[1385]*y_cur[IDX_CII]*y_cur[IDX_CHI] - + k[1451]*y_cur[IDX_C2II]*y_cur[IDX_C2I] - + k[1452]*y_cur[IDX_C2II]*y_cur[IDX_C2H2I] - + k[1453]*y_cur[IDX_C2II]*y_cur[IDX_HCNI] - + k[1454]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] - + k[1455]*y_cur[IDX_C2II]*y_cur[IDX_O2I] - + k[1456]*y_cur[IDX_C2II]*y_cur[IDX_SI] + + k[1890]*y_cur[IDX_CI]*y_cur[IDX_CHII] + + k[1943]*y_cur[IDX_CHII]*y_cur[IDX_CHI] - + k[1995]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] - + k[2146]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2147]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2149]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2150]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2239]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + + k[2299]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - + k[2401]*y_cur[IDX_H2I]*y_cur[IDX_C2II] - + k[2519]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] - + k[2520]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] + + k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + + k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + + k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + + k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + k[3114]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - - k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] - - k[3116]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] - - k[3117]*y_cur[IDX_HeII]*y_cur[IDX_C5I] - - k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] - - k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - - k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - - k[3121]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - - k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] - - k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] - - k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] - - k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] - - k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] - - k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - - k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - - k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - - k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - - k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - - k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] - - k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] - - k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] - - k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] - - k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - - k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - - k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - - k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] - - k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] - - k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] - - k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] - - k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] - - k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - - k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - - k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - - k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] - - k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] - - k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] - - k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] - - k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - - k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - - k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - - k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] - - k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] - - k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] - - k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] - - k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] - - k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] - - k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] - - k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] - - k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - - k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - - k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - - k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - - k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] - - k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] - - k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] - - k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] - - k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] - - k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] - - k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] - - k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] - - k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - - k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - - k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] - - k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - - k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - - k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] - - k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - - k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - - k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - - k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - - k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] - - k[3192]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - - k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - - k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] - - k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] - - k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] - - k[3197]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] - - k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - - k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] - - k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] - - k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] - - k[3205]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] - - k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] - - k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] - - k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] - - k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] - - k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] - - k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] - - k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] - - k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - - k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - - k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - - k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - - k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - - k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - - k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - - k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - - k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - - k[3226]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - - k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] - - k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] - - k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - - k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - - k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] - - k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - - k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - - k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - - k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - - k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - - k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - - k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - - k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - - k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - - k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] - + k[3383]*y_cur[IDX_NI]*y_cur[IDX_C2II] - + k[3528]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] - + k[3605]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - + k[3606]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - + k[3684]*y_cur[IDX_OI]*y_cur[IDX_C2II] + + k[5503]*y_cur[IDX_CII]*y_cur[IDX_CI] - k[5975]*y_cur[IDX_C2II] + + k[5977]*y_cur[IDX_C2I] + k[5979]*y_cur[IDX_C2HII] - + k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4HII] = 0.0 + + k[340]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - + k[821]*y_cur[IDX_C4HII]*y_cur[IDX_eM] + + k[1311]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] + + k[1346]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + + k[1389]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] + + k[1452]*y_cur[IDX_C2II]*y_cur[IDX_C2H2I] + + k[1470]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1551]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HII] - + k[1632]*y_cur[IDX_C2H3I]*y_cur[IDX_C4HII] - + k[1694]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] - + k[1695]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] - + k[1734]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] - + k[1735]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] - + k[1822]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] - + k[1823]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] - + k[1830]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - + k[1831]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - + k[1832]*y_cur[IDX_C4HII]*y_cur[IDX_C5H2I] - + k[1833]*y_cur[IDX_C4HII]*y_cur[IDX_C5HI] - + k[1834]*y_cur[IDX_C4HII]*y_cur[IDX_C4H2I] + + k[1856]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] + + k[1857]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] - + k[1862]*y_cur[IDX_CI]*y_cur[IDX_C4HII] + + k[1892]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - + k[2032]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4HII] - + k[2105]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HII] + + k[2165]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - + k[2168]*y_cur[IDX_CH4I]*y_cur[IDX_C4HII] + + k[2342]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] + + k[2411]*y_cur[IDX_H2I]*y_cur[IDX_C4II] - + k[2412]*y_cur[IDX_H2I]*y_cur[IDX_C4HII] - + k[2478]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4HII] + + k[2608]*y_cur[IDX_H3II]*y_cur[IDX_C4I] + + k[2778]*y_cur[IDX_H3OII]*y_cur[IDX_C4I] - + k[2869]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] - + k[2870]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + + k[2913]*y_cur[IDX_HCOII]*y_cur[IDX_C4I] + + k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + + k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + k[3242]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] - - k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] - - k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] - - k[3245]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - - k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - - k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - - k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - - k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - - k[3250]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - - k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - - k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] - - k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] - - k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] - - k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] - - k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] - - k[3257]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] - - k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] - - k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] - - k[3260]*y_cur[IDX_HeII]*y_cur[IDX_HFI] - - k[3261]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - - k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - - k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - - k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] - - k[3265]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - - k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - - k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] - - k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] - - k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - - k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - - k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - - k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - - k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] - - k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] - - k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - - k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - - k[3277]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - - k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - - k[3279]*y_cur[IDX_HeII]*y_cur[IDX_NCCNI] - - k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] - - k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] - - k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] - - k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - - k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - - k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] - - k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] - - k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] - - k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - - k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - - k[3290]*y_cur[IDX_HeII]*y_cur[IDX_O2I] - - k[3291]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] - - k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] - + k[3699]*y_cur[IDX_OI]*y_cur[IDX_C4HII] + + k[3830]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + + k[3869]*y_cur[IDX_SiII]*y_cur[IDX_C4H2I] - + k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CNCII] = 0.0 + + k[184]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] - + k[978]*y_cur[IDX_CNCII]*y_cur[IDX_eM] - + k[979]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + + k[1407]*y_cur[IDX_CII]*y_cur[IDX_HCNI] + + k[1945]*y_cur[IDX_CHII]*y_cur[IDX_CNI] - + k[2539]*y_cur[IDX_H2OI]*y_cur[IDX_CNCII] - + k[3572]*y_cur[IDX_NH3I]*y_cur[IDX_CNCII] - + k[3894]*y_cur[IDX_CM]*y_cur[IDX_CNCII] - + k[3929]*y_cur[IDX_C10M]*y_cur[IDX_CNCII] - + k[3964]*y_cur[IDX_C10HM]*y_cur[IDX_CNCII] - + k[3999]*y_cur[IDX_C2M]*y_cur[IDX_CNCII] - + k[4034]*y_cur[IDX_C2HM]*y_cur[IDX_CNCII] - + k[4069]*y_cur[IDX_C3M]*y_cur[IDX_CNCII] - + k[4104]*y_cur[IDX_C3HM]*y_cur[IDX_CNCII] - + k[4139]*y_cur[IDX_C3NM]*y_cur[IDX_CNCII] - + k[4174]*y_cur[IDX_C4M]*y_cur[IDX_CNCII] - + k[4209]*y_cur[IDX_C4HM]*y_cur[IDX_CNCII] - + k[4244]*y_cur[IDX_C5M]*y_cur[IDX_CNCII] - + k[4279]*y_cur[IDX_C5HM]*y_cur[IDX_CNCII] - + k[4314]*y_cur[IDX_C5NM]*y_cur[IDX_CNCII] - + k[4349]*y_cur[IDX_C6M]*y_cur[IDX_CNCII] - + k[4384]*y_cur[IDX_C6HM]*y_cur[IDX_CNCII] - + k[4419]*y_cur[IDX_C7M]*y_cur[IDX_CNCII] - + k[4454]*y_cur[IDX_C7HM]*y_cur[IDX_CNCII] - + k[4489]*y_cur[IDX_C8M]*y_cur[IDX_CNCII] - + k[4524]*y_cur[IDX_C8HM]*y_cur[IDX_CNCII] - + k[4559]*y_cur[IDX_C9M]*y_cur[IDX_CNCII] - + k[4594]*y_cur[IDX_C9HM]*y_cur[IDX_CNCII] - + k[4629]*y_cur[IDX_CHM]*y_cur[IDX_CNCII] - + k[4664]*y_cur[IDX_CNM]*y_cur[IDX_CNCII] - + k[4699]*y_cur[IDX_HM]*y_cur[IDX_CNCII] - + k[4735]*y_cur[IDX_OM]*y_cur[IDX_CNCII] - + k[4770]*y_cur[IDX_O2M]*y_cur[IDX_CNCII] - + k[4805]*y_cur[IDX_OHM]*y_cur[IDX_CNCII] - + k[4840]*y_cur[IDX_SM]*y_cur[IDX_CNCII] - + k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] - + k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HSII] = 0.0 + + k[397]*y_cur[IDX_HII]*y_cur[IDX_HSI] - + k[505]*y_cur[IDX_HSII]*y_cur[IDX_FeI] - + k[534]*y_cur[IDX_MgI]*y_cur[IDX_HSII] - + k[609]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] - + k[627]*y_cur[IDX_NOI]*y_cur[IDX_HSII] - + k[638]*y_cur[IDX_NaI]*y_cur[IDX_HSII] - + k[710]*y_cur[IDX_SI]*y_cur[IDX_HSII] - + k[720]*y_cur[IDX_SiI]*y_cur[IDX_HSII] - + k[1138]*y_cur[IDX_HSII]*y_cur[IDX_eM] - + k[1908]*y_cur[IDX_CI]*y_cur[IDX_HSII] + + k[1974]*y_cur[IDX_CHII]*y_cur[IDX_SI] - + k[2203]*y_cur[IDX_CH4I]*y_cur[IDX_HSII] + + k[2235]*y_cur[IDX_CH5II]*y_cur[IDX_SI] - + k[2255]*y_cur[IDX_CHI]*y_cur[IDX_HSII] + + k[2339]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + + k[2356]*y_cur[IDX_HII]*y_cur[IDX_OCSI] + + k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - + k[2456]*y_cur[IDX_H2I]*y_cur[IDX_HSII] + + k[2470]*y_cur[IDX_H2I]*y_cur[IDX_SII] + + k[2490]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + + k[2516]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - + k[2554]*y_cur[IDX_H2OI]*y_cur[IDX_HSII] + + k[2740]*y_cur[IDX_H3II]*y_cur[IDX_SI] + + k[2842]*y_cur[IDX_HI]*y_cur[IDX_H2SII] - + k[2844]*y_cur[IDX_HI]*y_cur[IDX_HSII] + + k[2860]*y_cur[IDX_HCNII]*y_cur[IDX_SI] - + k[2879]*y_cur[IDX_HCNI]*y_cur[IDX_HSII] + + k[2989]*y_cur[IDX_HCOII]*y_cur[IDX_SI] + + k[3012]*y_cur[IDX_HCOI]*y_cur[IDX_SII] - + k[3043]*y_cur[IDX_HNCI]*y_cur[IDX_HSII] + + k[3050]*y_cur[IDX_HNOII]*y_cur[IDX_SI] - + k[3054]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] - + k[3055]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + + k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + + k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + + k[3347]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + + k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + + k[3376]*y_cur[IDX_N2HII]*y_cur[IDX_SI] - + k[3462]*y_cur[IDX_NI]*y_cur[IDX_HSII] + + k[3505]*y_cur[IDX_NHII]*y_cur[IDX_SI] + + k[3516]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + + k[3527]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - + k[3589]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] + + k[3642]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + + k[3734]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - + k[3742]*y_cur[IDX_OI]*y_cur[IDX_HSII] - + k[3743]*y_cur[IDX_OI]*y_cur[IDX_HSII] + + k[3789]*y_cur[IDX_OHII]*y_cur[IDX_SI] + + k[3840]*y_cur[IDX_SI]*y_cur[IDX_O2HII] - + k[5557]*y_cur[IDX_H2I]*y_cur[IDX_HSII] - k[6205]*y_cur[IDX_HSII] - + k[6206]*y_cur[IDX_HSII] - k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NHII] = 0.0 + + k[402]*y_cur[IDX_HII]*y_cur[IDX_NHI] + + k[453]*y_cur[IDX_H2II]*y_cur[IDX_NHI] + + k[559]*y_cur[IDX_NII]*y_cur[IDX_NHI] - + k[574]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - + k[575]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - + k[576]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] - + k[577]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - + k[578]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - + k[579]*y_cur[IDX_NHII]*y_cur[IDX_SI] + + k[616]*y_cur[IDX_NHI]*y_cur[IDX_CNII] + + k[617]*y_cur[IDX_NHI]*y_cur[IDX_COII] + + k[618]*y_cur[IDX_NHI]*y_cur[IDX_N2II] + + k[619]*y_cur[IDX_NHI]*y_cur[IDX_OII] - + k[1158]*y_cur[IDX_NHII]*y_cur[IDX_eM] - + k[1910]*y_cur[IDX_CI]*y_cur[IDX_NHII] - + k[2011]*y_cur[IDX_CH2I]*y_cur[IDX_NHII] - + k[2258]*y_cur[IDX_CHI]*y_cur[IDX_NHII] + + k[2392]*y_cur[IDX_H2II]*y_cur[IDX_NI] + + k[2459]*y_cur[IDX_H2I]*y_cur[IDX_NII] - + k[2461]*y_cur[IDX_H2I]*y_cur[IDX_NHII] - + k[2462]*y_cur[IDX_H2I]*y_cur[IDX_NHII] + + k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + + k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + + k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + + k[3348]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + + k[3350]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - + k[3463]*y_cur[IDX_NI]*y_cur[IDX_NHII] - + k[3477]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - + k[3478]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - + k[3479]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - + k[3480]*y_cur[IDX_NHII]*y_cur[IDX_C2HI] - + k[3481]*y_cur[IDX_NHII]*y_cur[IDX_CNI] - + k[3482]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - + k[3483]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - + k[3484]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - + k[3485]*y_cur[IDX_NHII]*y_cur[IDX_COI] - + k[3486]*y_cur[IDX_NHII]*y_cur[IDX_COI] - + k[3487]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - + k[3488]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - + k[3489]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - + k[3490]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - + k[3491]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - + k[3492]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - + k[3493]*y_cur[IDX_NHII]*y_cur[IDX_HCNI] - + k[3494]*y_cur[IDX_NHII]*y_cur[IDX_HCOI] - + k[3495]*y_cur[IDX_NHII]*y_cur[IDX_HNCI] - + k[3496]*y_cur[IDX_NHII]*y_cur[IDX_N2I] - + k[3497]*y_cur[IDX_NHII]*y_cur[IDX_NH2I] - + k[3498]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] - + k[3499]*y_cur[IDX_NHII]*y_cur[IDX_NHI] - + k[3500]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - + k[3501]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - + k[3502]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - + k[3503]*y_cur[IDX_NHII]*y_cur[IDX_OI] - + k[3504]*y_cur[IDX_NHII]*y_cur[IDX_OHI] - + k[3505]*y_cur[IDX_NHII]*y_cur[IDX_SI] - + k[3506]*y_cur[IDX_NHII]*y_cur[IDX_SI] + k[5889]*y_cur[IDX_NHI] - + k[6217]*y_cur[IDX_NHII] + k[6225]*y_cur[IDX_NHI] - + k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_O2M] = 0.0 - k[146]*y_cur[IDX_O2M]*y_cur[IDX_O2I] + + k[667]*y_cur[IDX_OM]*y_cur[IDX_O2I] - + k[4762]*y_cur[IDX_O2M]*y_cur[IDX_CII] - + k[4763]*y_cur[IDX_O2M]*y_cur[IDX_C2H2II] - + k[4764]*y_cur[IDX_O2M]*y_cur[IDX_C2H3II] - + k[4765]*y_cur[IDX_O2M]*y_cur[IDX_C4H2II] - + k[4766]*y_cur[IDX_O2M]*y_cur[IDX_C4H3II] - + k[4767]*y_cur[IDX_O2M]*y_cur[IDX_C4SII] - + k[4768]*y_cur[IDX_O2M]*y_cur[IDX_CH2CCHII] - + k[4769]*y_cur[IDX_O2M]*y_cur[IDX_CH3II] - + k[4770]*y_cur[IDX_O2M]*y_cur[IDX_CNCII] - + k[4771]*y_cur[IDX_O2M]*y_cur[IDX_FeII] - + k[4772]*y_cur[IDX_O2M]*y_cur[IDX_HII] - + k[4773]*y_cur[IDX_O2M]*y_cur[IDX_H2COII] - + k[4774]*y_cur[IDX_O2M]*y_cur[IDX_H2SII] - + k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] - + k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] - + k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] - + k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] - + k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] - + k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] - + k[4781]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] - + k[4782]*y_cur[IDX_O2M]*y_cur[IDX_HeII] - + k[4783]*y_cur[IDX_O2M]*y_cur[IDX_MgII] - + k[4784]*y_cur[IDX_O2M]*y_cur[IDX_NII] - + k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] - + k[4786]*y_cur[IDX_O2M]*y_cur[IDX_NH3II] - + k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] - + k[4788]*y_cur[IDX_O2M]*y_cur[IDX_NOII] - + k[4789]*y_cur[IDX_O2M]*y_cur[IDX_NaII] - + k[4790]*y_cur[IDX_O2M]*y_cur[IDX_OII] - + k[4791]*y_cur[IDX_O2M]*y_cur[IDX_SII] - + k[4792]*y_cur[IDX_O2M]*y_cur[IDX_SOII] - + k[4793]*y_cur[IDX_O2M]*y_cur[IDX_SiII] - + k[4794]*y_cur[IDX_O2M]*y_cur[IDX_SiOII] - + k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] - + k[4796]*y_cur[IDX_O2M]*y_cur[IDX_SiSII] - k[5896]*y_cur[IDX_O2M] - + k[6234]*y_cur[IDX_O2M]; + ydot[yistart + IDX_CHM] = 0.0 - k[55]*y_cur[IDX_CI]*y_cur[IDX_CHM] - + k[105]*y_cur[IDX_HI]*y_cur[IDX_CHM] + + k[3687]*y_cur[IDX_OI]*y_cur[IDX_C2HM] - + k[4621]*y_cur[IDX_CHM]*y_cur[IDX_CII] - + k[4622]*y_cur[IDX_CHM]*y_cur[IDX_C2H2II] - + k[4623]*y_cur[IDX_CHM]*y_cur[IDX_C2H3II] - + k[4624]*y_cur[IDX_CHM]*y_cur[IDX_C4H2II] - + k[4625]*y_cur[IDX_CHM]*y_cur[IDX_C4H3II] - + k[4626]*y_cur[IDX_CHM]*y_cur[IDX_C4SII] - + k[4627]*y_cur[IDX_CHM]*y_cur[IDX_CH2CCHII] - + k[4628]*y_cur[IDX_CHM]*y_cur[IDX_CH3II] - + k[4629]*y_cur[IDX_CHM]*y_cur[IDX_CNCII] - + k[4630]*y_cur[IDX_CHM]*y_cur[IDX_FeII] - + k[4631]*y_cur[IDX_CHM]*y_cur[IDX_HII] - + k[4632]*y_cur[IDX_CHM]*y_cur[IDX_H2COII] - + k[4633]*y_cur[IDX_CHM]*y_cur[IDX_H2SII] - + k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] - + k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] - + k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] - + k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] - + k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] - + k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] - + k[4640]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] - + k[4641]*y_cur[IDX_CHM]*y_cur[IDX_HeII] - + k[4642]*y_cur[IDX_CHM]*y_cur[IDX_MgII] - + k[4643]*y_cur[IDX_CHM]*y_cur[IDX_NII] - + k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] - + k[4645]*y_cur[IDX_CHM]*y_cur[IDX_NH3II] - + k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] - + k[4647]*y_cur[IDX_CHM]*y_cur[IDX_NOII] - + k[4648]*y_cur[IDX_CHM]*y_cur[IDX_NaII] - + k[4649]*y_cur[IDX_CHM]*y_cur[IDX_OII] - + k[4650]*y_cur[IDX_CHM]*y_cur[IDX_SII] - + k[4651]*y_cur[IDX_CHM]*y_cur[IDX_SOII] - + k[4652]*y_cur[IDX_CHM]*y_cur[IDX_SiII] - + k[4653]*y_cur[IDX_CHM]*y_cur[IDX_SiOII] - + k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] - + k[4655]*y_cur[IDX_CHM]*y_cur[IDX_SiSII] - k[5777]*y_cur[IDX_CHM] - + k[6074]*y_cur[IDX_CHM]; + ydot[yistart + IDX_H2II] = 0.0 - + k[436]*y_cur[IDX_H2II]*y_cur[IDX_C2I] - + k[437]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] - + k[438]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - + k[439]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] - + k[440]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] - + k[441]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - + k[442]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - + k[443]*y_cur[IDX_H2II]*y_cur[IDX_CHI] - + k[444]*y_cur[IDX_H2II]*y_cur[IDX_CNI] - + k[445]*y_cur[IDX_H2II]*y_cur[IDX_COI] - + k[446]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] - + k[447]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] - + k[448]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - + k[449]*y_cur[IDX_H2II]*y_cur[IDX_HCNI] - + k[450]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] - + k[451]*y_cur[IDX_H2II]*y_cur[IDX_NH2I] - + k[452]*y_cur[IDX_H2II]*y_cur[IDX_NH3I] - + k[453]*y_cur[IDX_H2II]*y_cur[IDX_NHI] - + k[454]*y_cur[IDX_H2II]*y_cur[IDX_NOI] - + k[455]*y_cur[IDX_H2II]*y_cur[IDX_O2I] - + k[456]*y_cur[IDX_H2II]*y_cur[IDX_OHI] + + k[457]*y_cur[IDX_H2I]*y_cur[IDX_FII] + + k[458]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - + k[489]*y_cur[IDX_HI]*y_cur[IDX_H2II] - + k[987]*y_cur[IDX_H2II]*y_cur[IDX_eM] + + k[2345]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - + k[2369]*y_cur[IDX_H2II]*y_cur[IDX_C2I] - + k[2370]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] - + k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - + k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - + k[2373]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] - + k[2374]*y_cur[IDX_H2II]*y_cur[IDX_CI] - + k[2375]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] - + k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - + k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] - + k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - + k[2379]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - + k[2380]*y_cur[IDX_H2II]*y_cur[IDX_CHI] - + k[2381]*y_cur[IDX_H2II]*y_cur[IDX_CNI] - + k[2382]*y_cur[IDX_H2II]*y_cur[IDX_CO2I] - + k[2383]*y_cur[IDX_H2II]*y_cur[IDX_COI] - + k[2384]*y_cur[IDX_H2II]*y_cur[IDX_H2I] - + k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] - + k[2386]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] - + k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - + k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - + k[2389]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] - + k[2390]*y_cur[IDX_H2II]*y_cur[IDX_HeI] - + k[2391]*y_cur[IDX_H2II]*y_cur[IDX_N2I] - + k[2392]*y_cur[IDX_H2II]*y_cur[IDX_NI] - + k[2393]*y_cur[IDX_H2II]*y_cur[IDX_NHI] - + k[2394]*y_cur[IDX_H2II]*y_cur[IDX_NOI] - + k[2395]*y_cur[IDX_H2II]*y_cur[IDX_O2I] - + k[2396]*y_cur[IDX_H2II]*y_cur[IDX_OI] - + k[2397]*y_cur[IDX_H2II]*y_cur[IDX_OHI] + + k[2845]*y_cur[IDX_HI]*y_cur[IDX_HeHII] - + k[4702]*y_cur[IDX_HM]*y_cur[IDX_H2II] + + k[5546]*y_cur[IDX_HII]*y_cur[IDX_HI] + k[5680]*y_cur[IDX_H2I] - + k[6148]*y_cur[IDX_H2II] + k[6168]*y_cur[IDX_H3II] - + k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_OCSI] = 0.0 + k[65]*y_cur[IDX_COI]*y_cur[IDX_SM] + - k[189]*y_cur[IDX_CII]*y_cur[IDX_OCSI] - + k[284]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - + k[314]*y_cur[IDX_CO2II]*y_cur[IDX_OCSI] - + k[407]*y_cur[IDX_HII]*y_cur[IDX_OCSI] - + k[475]*y_cur[IDX_H2OII]*y_cur[IDX_OCSI] + + k[486]*y_cur[IDX_H2SI]*y_cur[IDX_OCSII] - + k[562]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - + k[571]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] + + k[612]*y_cur[IDX_NH3I]*y_cur[IDX_OCSII] - + k[663]*y_cur[IDX_OII]*y_cur[IDX_OCSI] + + k[1129]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] - + k[1425]*y_cur[IDX_CII]*y_cur[IDX_OCSI] - + k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - + k[1757]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - + k[1758]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - + k[1970]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] - + k[1971]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] - + k[1992]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] - + k[1993]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] - + k[2092]*y_cur[IDX_CH3II]*y_cur[IDX_OCSI] - + k[2145]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - + k[2356]*y_cur[IDX_HII]*y_cur[IDX_OCSI] + + k[2552]*y_cur[IDX_H2OI]*y_cur[IDX_HOCSII] - + k[2732]*y_cur[IDX_H3II]*y_cur[IDX_OCSI] - + k[2982]*y_cur[IDX_HCOII]*y_cur[IDX_OCSI] - k[3293]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - k[3294]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - k[3295]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - k[3296]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - - k[3297]*y_cur[IDX_HeII]*y_cur[IDX_OHI] - - k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] - - k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] - - k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] - - k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] - - k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] - - k[3303]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - - k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - - k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] - - k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] - - k[3307]*y_cur[IDX_HeII]*y_cur[IDX_SiC2I] - - k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] - - k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] - - k[3310]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] - - k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] - - k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] - - k[3313]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] - - k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] - - k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] - - k[3316]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] - - k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] - - k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] - - k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] - - k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - - k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - - k[3322]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] - - k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] - - k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - - k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - - k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - - k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - - k[3328]*y_cur[IDX_HeII]*y_cur[IDX_SiHI] - - k[3329]*y_cur[IDX_HeII]*y_cur[IDX_SiNI] - - k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] - - k[3331]*y_cur[IDX_HeII]*y_cur[IDX_SiO2I] - - k[3332]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] - - k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] - - k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] - - k[3335]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] - - k[3906]*y_cur[IDX_CM]*y_cur[IDX_HeII] - - k[3941]*y_cur[IDX_C10M]*y_cur[IDX_HeII] - - k[3976]*y_cur[IDX_C10HM]*y_cur[IDX_HeII] - - k[4011]*y_cur[IDX_C2M]*y_cur[IDX_HeII] - + k[3359]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - + k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - + k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - + k[3649]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - + k[3813]*y_cur[IDX_PII]*y_cur[IDX_OCSI] - + k[3833]*y_cur[IDX_SII]*y_cur[IDX_OCSI] - + k[3858]*y_cur[IDX_SOII]*y_cur[IDX_OCSI] - + k[3871]*y_cur[IDX_SiII]*y_cur[IDX_OCSI] - + k[4875]*y_cur[IDX_C2I]*y_cur[IDX_OCSI] - + k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] - + k[4980]*y_cur[IDX_CI]*y_cur[IDX_OCSI] - + k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] + + k[5103]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - + k[5197]*y_cur[IDX_HI]*y_cur[IDX_OCSI] + + k[5409]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - + k[5430]*y_cur[IDX_OI]*y_cur[IDX_OCSI] - + k[5431]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + + k[5463]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + + k[5486]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - k[5902]*y_cur[IDX_OCSI] - + k[5903]*y_cur[IDX_OCSI] - k[6240]*y_cur[IDX_OCSI] - + k[6241]*y_cur[IDX_OCSI] + + k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] - + k[7022]*y_cur[IDX_OCSI] + k[7204]*y_cur[IDX_GOCSI] + + k[7386]*y_cur[IDX_GOCSI] + k[7570]*y_cur[IDX_GOCSI] + + k[8696]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] + + k[8714]*y_cur[IDX_GSI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_GCH3I] = 0.0 + k[6895]*y_cur[IDX_CH3I] - + k[7077]*y_cur[IDX_GCH3I] - k[7259]*y_cur[IDX_GCH3I] - + k[7441]*y_cur[IDX_GCH3I] - k[7625]*y_cur[IDX_GCH3I] - + k[7626]*y_cur[IDX_GCH3I] - k[7627]*y_cur[IDX_GCH3I] - + k[7628]*y_cur[IDX_GCH3I] - k[7629]*y_cur[IDX_GCH3I] + + k[7663]*y_cur[IDX_GC2H3I] + k[7664]*y_cur[IDX_GC2H3I] + + k[7673]*y_cur[IDX_GC2H4I] + k[7681]*y_cur[IDX_GC2H5I] + + k[7699]*y_cur[IDX_GCH3OHI] + k[7702]*y_cur[IDX_GCH3OHI] + + k[7724]*y_cur[IDX_GCH2CCH2I] + k[7732]*y_cur[IDX_GCH3CCHI] + + k[7735]*y_cur[IDX_GCH3CNI] + k[7761]*y_cur[IDX_GCH3CHOI] + + k[7763]*y_cur[IDX_GCH3CHOI] + k[7771]*y_cur[IDX_GCH3OCH3I] + + k[7771]*y_cur[IDX_GCH3OCH3I] + k[7819]*y_cur[IDX_GCH3COCH3I] + + k[7819]*y_cur[IDX_GCH3COCH3I] + k[7821]*y_cur[IDX_GCH3COCH3I] + + k[7821]*y_cur[IDX_GCH3COCH3I] + k[7826]*y_cur[IDX_GHCOOCH3I] + + k[7841]*y_cur[IDX_GCH3C4HI] + k[7844]*y_cur[IDX_GCH3C3NI] + + k[7864]*y_cur[IDX_GCH3C6HI] + k[7865]*y_cur[IDX_GCH3C5NI] + + k[7874]*y_cur[IDX_GCH3C7NI] + k[7881]*y_cur[IDX_GCH3OI] + + k[7883]*y_cur[IDX_GCH3COI] + k[7891]*y_cur[IDX_GCH3COOHI] - + k[7902]*y_cur[IDX_GCH3I] - k[7903]*y_cur[IDX_GCH3I] - + k[7904]*y_cur[IDX_GCH3I] - k[7905]*y_cur[IDX_GCH3I] - + k[7906]*y_cur[IDX_GCH3I] + k[7911]*y_cur[IDX_GCH4I] + + k[7914]*y_cur[IDX_GCH4I] + k[7950]*y_cur[IDX_GC2H3I] + + k[7951]*y_cur[IDX_GC2H3I] + k[7960]*y_cur[IDX_GC2H4I] + + k[7968]*y_cur[IDX_GC2H5I] + k[7997]*y_cur[IDX_GCH3OHI] + + k[8002]*y_cur[IDX_GCH3OHI] + k[8032]*y_cur[IDX_GCH2CCH2I] + + k[8041]*y_cur[IDX_GCH3CCHI] + k[8044]*y_cur[IDX_GCH3CNI] + + k[8079]*y_cur[IDX_GCH3CHOI] + k[8081]*y_cur[IDX_GCH3CHOI] + + k[8091]*y_cur[IDX_GCH3OCH3I] + k[8091]*y_cur[IDX_GCH3OCH3I] + + k[8146]*y_cur[IDX_GCH3COCH3I] + k[8146]*y_cur[IDX_GCH3COCH3I] + + k[8148]*y_cur[IDX_GCH3COCH3I] + k[8148]*y_cur[IDX_GCH3COCH3I] + + k[8167]*y_cur[IDX_GCH3C4HI] + k[8171]*y_cur[IDX_GCH3C3NI] + + k[8203]*y_cur[IDX_GCH3C6HI] + k[8204]*y_cur[IDX_GCH3C5NI] + + k[8228]*y_cur[IDX_GCH3C7NI] + k[8264]*y_cur[IDX_GCH3OI] + + k[8266]*y_cur[IDX_GCH3COI] + k[8272]*y_cur[IDX_GCH3COOHI] + + k[8276]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] - + k[8277]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] + + k[8278]*y_cur[IDX_GHI]*y_cur[IDX_GCH4I] + + k[8334]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + + k[8370]*y_cur[IDX_GH2I]*y_cur[IDX_GCH2I] - + k[8371]*y_cur[IDX_GH2I]*y_cur[IDX_GCH3I] - + k[8405]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - + k[8441]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] - + k[8460]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] - + k[8474]*y_cur[IDX_GSI]*y_cur[IDX_GCH3I] - + k[8484]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] + + k[8505]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3CHOI] - + k[8513]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] - + k[8532]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] + + k[8533]*y_cur[IDX_GCH2I]*y_cur[IDX_GHNOI] - + k[8539]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] - + k[8540]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI] - + k[8541]*y_cur[IDX_GCH3I]*y_cur[IDX_GHNOI] - + k[8542]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] - + k[8542]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] - + k[8543]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] - + k[8544]*y_cur[IDX_GCH3I]*y_cur[IDX_GH2COI] - + k[8545]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI] - + k[8546]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] - + k[8547]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - + k[8548]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3CHOI] - + k[8549]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI] - + k[8550]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOHI] - + k[8551]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI] - + k[8552]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI] - + k[8553]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI] - + k[8554]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI] - + k[8555]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOOCH3I] - + k[8556]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] - + k[8557]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHCHOI] + + k[8563]*y_cur[IDX_GCH3OI]*y_cur[IDX_GCH3CHOI] + + k[8573]*y_cur[IDX_GCH2OHI]*y_cur[IDX_GCH3CHOI] + + k[8575]*y_cur[IDX_GC2HI]*y_cur[IDX_GCH4I] - + k[8579]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] - + k[8660]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - + k[8688]*y_cur[IDX_GOI]*y_cur[IDX_GCH3I] - + k[8701]*y_cur[IDX_GNI]*y_cur[IDX_GCH3I] - + k[8718]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] - + k[8737]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I] - + k[8746]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH3I] - + k[8748]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] - + k[8748]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3I] - + k[8749]*y_cur[IDX_GCH3I]*y_cur[IDX_GCNI] - + k[8750]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOI] - + k[8751]*y_cur[IDX_GCH3I]*y_cur[IDX_GHCOI] - + k[8752]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3OI] - + k[8753]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH2OHI] - + k[8754]*y_cur[IDX_GCH3I]*y_cur[IDX_GCH3COI] - + k[8755]*y_cur[IDX_GCH3I]*y_cur[IDX_GCOOHI] - + k[8756]*y_cur[IDX_GCH3I]*y_cur[IDX_GC3NI] - + k[8757]*y_cur[IDX_GCH3I]*y_cur[IDX_GC5NI] - + k[8758]*y_cur[IDX_GCH3I]*y_cur[IDX_GC7NI]; + ydot[yistart + IDX_NH2II] = 0.0 - + k[265]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] - + k[294]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] + + k[400]*y_cur[IDX_HII]*y_cur[IDX_NH2I] + + k[451]*y_cur[IDX_H2II]*y_cur[IDX_NH2I] + + k[557]*y_cur[IDX_NII]*y_cur[IDX_NH2I] - + k[580]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[581]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] - + k[582]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] - + k[583]*y_cur[IDX_NH2II]*y_cur[IDX_NOI] - + k[584]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + + k[585]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] + + k[586]*y_cur[IDX_NH2I]*y_cur[IDX_CNII] + + k[587]*y_cur[IDX_NH2I]*y_cur[IDX_COII] + + k[588]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] + + k[589]*y_cur[IDX_NH2I]*y_cur[IDX_N2II] + + k[590]*y_cur[IDX_NH2I]*y_cur[IDX_O2II] + + k[591]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] + + k[660]*y_cur[IDX_OII]*y_cur[IDX_NH2I] - + k[1159]*y_cur[IDX_NH2II]*y_cur[IDX_eM] - + k[1160]*y_cur[IDX_NH2II]*y_cur[IDX_eM] - + k[2012]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] - + k[2259]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] + + k[2317]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] + + k[2348]*y_cur[IDX_HII]*y_cur[IDX_HNCOI] + + k[2393]*y_cur[IDX_H2II]*y_cur[IDX_NHI] + + k[2462]*y_cur[IDX_H2I]*y_cur[IDX_NHII] - + k[2463]*y_cur[IDX_H2I]*y_cur[IDX_NH2II] + + k[2724]*y_cur[IDX_H3II]*y_cur[IDX_NHI] + + k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] + + k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + + k[3354]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - + k[3464]*y_cur[IDX_NI]*y_cur[IDX_NH2II] + + k[3492]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + + k[3499]*y_cur[IDX_NHII]*y_cur[IDX_NHI] - + k[3507]*y_cur[IDX_NH2II]*y_cur[IDX_C2I] - + k[3508]*y_cur[IDX_NH2II]*y_cur[IDX_C2HI] - + k[3509]*y_cur[IDX_NH2II]*y_cur[IDX_CNI] - + k[3510]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - + k[3511]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - + k[3512]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - + k[3513]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - + k[3514]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - + k[3515]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3516]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3517]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3518]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3519]*y_cur[IDX_NH2II]*y_cur[IDX_HCNI] - + k[3520]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] - + k[3521]*y_cur[IDX_NH2II]*y_cur[IDX_HNCI] - + k[3522]*y_cur[IDX_NH2II]*y_cur[IDX_NH2I] - + k[3523]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] - + k[3524]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - + k[3525]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - + k[3526]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - + k[3527]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + + k[3609]*y_cur[IDX_NHI]*y_cur[IDX_CH5II] + + k[3613]*y_cur[IDX_NHI]*y_cur[IDX_HCNII] + + k[3614]*y_cur[IDX_NHI]*y_cur[IDX_HCOII] + + k[3615]*y_cur[IDX_NHI]*y_cur[IDX_HNOII] + + k[3616]*y_cur[IDX_NHI]*y_cur[IDX_N2HII] - + k[3617]*y_cur[IDX_NHI]*y_cur[IDX_NH2II] + + k[3622]*y_cur[IDX_NHI]*y_cur[IDX_O2HII] + + k[3623]*y_cur[IDX_NHI]*y_cur[IDX_OHII] - + k[3746]*y_cur[IDX_OI]*y_cur[IDX_NH2II] + k[5882]*y_cur[IDX_NH2I] + + k[6218]*y_cur[IDX_NH2I] - k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + - k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_PI] = 0.0 - k[190]*y_cur[IDX_CII]*y_cur[IDX_PI] - + k[409]*y_cur[IDX_HII]*y_cur[IDX_PI] - + k[526]*y_cur[IDX_HeII]*y_cur[IDX_PI] + + k[613]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + + k[701]*y_cur[IDX_PII]*y_cur[IDX_H2SI] + + k[723]*y_cur[IDX_SiI]*y_cur[IDX_PII] + + k[903]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + + k[984]*y_cur[IDX_CPII]*y_cur[IDX_eM] + + k[1106]*y_cur[IDX_HCPII]*y_cur[IDX_eM] + + k[1132]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + + k[1135]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + + k[1183]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + + k[1189]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + + k[1201]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + + k[1204]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + + k[1205]*y_cur[IDX_PHII]*y_cur[IDX_eM] + + k[1206]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + + k[1207]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + + k[1211]*y_cur[IDX_PNII]*y_cur[IDX_eM] + + k[1212]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + + k[1215]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + + k[1218]*y_cur[IDX_POII]*y_cur[IDX_eM] + + k[1315]*y_cur[IDX_CII]*y_cur[IDX_C3PI] + + k[1321]*y_cur[IDX_CII]*y_cur[IDX_C4PI] - + k[1526]*y_cur[IDX_C2H2II]*y_cur[IDX_PI] - + k[2094]*y_cur[IDX_CH3II]*y_cur[IDX_PI] + + k[2566]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - + k[2734]*y_cur[IDX_H3II]*y_cur[IDX_PI] - + k[2815]*y_cur[IDX_H3OII]*y_cur[IDX_PI] + + k[2884]*y_cur[IDX_HCNI]*y_cur[IDX_PHII] - + k[2983]*y_cur[IDX_HCOII]*y_cur[IDX_PI] + + k[3101]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + + k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + + k[3596]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - + k[3814]*y_cur[IDX_PI]*y_cur[IDX_C3H2II] - + k[3815]*y_cur[IDX_PI]*y_cur[IDX_C4H2II] + + k[3817]*y_cur[IDX_PHII]*y_cur[IDX_H2SI] + + k[5286]*y_cur[IDX_NI]*y_cur[IDX_PNI] + + k[5287]*y_cur[IDX_NI]*y_cur[IDX_POI] + + k[5391]*y_cur[IDX_OI]*y_cur[IDX_CPI] - + k[5484]*y_cur[IDX_PI]*y_cur[IDX_O2I] - + k[5527]*y_cur[IDX_CI]*y_cur[IDX_PI] + + k[5624]*y_cur[IDX_PII]*y_cur[IDX_eM] + k[5773]*y_cur[IDX_CCPI] + + k[5827]*y_cur[IDX_CPI] - k[5906]*y_cur[IDX_PI] + + k[5908]*y_cur[IDX_PHI] + k[5909]*y_cur[IDX_PNI] + + k[5910]*y_cur[IDX_POI] + k[6070]*y_cur[IDX_CCPI] + + k[6139]*y_cur[IDX_CPI] - k[6246]*y_cur[IDX_PI] + + k[6249]*y_cur[IDX_PHI] + k[6250]*y_cur[IDX_PNI] + + k[6251]*y_cur[IDX_POI] + k[6421]*y_cur[IDX_PII]*y_cur[IDX_GRAINM] + + k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM] + + k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM] + + k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + + k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM] + + k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + + k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + + k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + + k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM] + + k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + + k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + + k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + + k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + + k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - k[6928]*y_cur[IDX_PI] + + k[7110]*y_cur[IDX_GPI] + k[7292]*y_cur[IDX_GPI] + + k[7474]*y_cur[IDX_GPI]; + ydot[yistart + IDX_SM] = 0.0 - k[58]*y_cur[IDX_CI]*y_cur[IDX_SM] - + k[65]*y_cur[IDX_COI]*y_cur[IDX_SM] - + k[109]*y_cur[IDX_HI]*y_cur[IDX_SM] - + k[123]*y_cur[IDX_NI]*y_cur[IDX_SM] - + k[127]*y_cur[IDX_O2I]*y_cur[IDX_SM] - + k[132]*y_cur[IDX_OI]*y_cur[IDX_SM] - + k[4832]*y_cur[IDX_SM]*y_cur[IDX_CII] - + k[4833]*y_cur[IDX_SM]*y_cur[IDX_C2H2II] - + k[4834]*y_cur[IDX_SM]*y_cur[IDX_C2H3II] - + k[4835]*y_cur[IDX_SM]*y_cur[IDX_C4H2II] - + k[4836]*y_cur[IDX_SM]*y_cur[IDX_C4H3II] - + k[4837]*y_cur[IDX_SM]*y_cur[IDX_C4SII] - + k[4838]*y_cur[IDX_SM]*y_cur[IDX_CH2CCHII] - + k[4839]*y_cur[IDX_SM]*y_cur[IDX_CH3II] - + k[4840]*y_cur[IDX_SM]*y_cur[IDX_CNCII] - + k[4841]*y_cur[IDX_SM]*y_cur[IDX_FeII] - + k[4842]*y_cur[IDX_SM]*y_cur[IDX_HII] - + k[4843]*y_cur[IDX_SM]*y_cur[IDX_H2COII] - + k[4844]*y_cur[IDX_SM]*y_cur[IDX_H2SII] - + k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] - + k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] - + k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] - + k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - + k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - + k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] - + k[4851]*y_cur[IDX_SM]*y_cur[IDX_HCOII] - + k[4852]*y_cur[IDX_SM]*y_cur[IDX_HeII] - + k[4853]*y_cur[IDX_SM]*y_cur[IDX_MgII] - + k[4854]*y_cur[IDX_SM]*y_cur[IDX_NII] - + k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] - + k[4856]*y_cur[IDX_SM]*y_cur[IDX_NH3II] - + k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] - + k[4858]*y_cur[IDX_SM]*y_cur[IDX_NOII] - + k[4859]*y_cur[IDX_SM]*y_cur[IDX_NaII] - + k[4860]*y_cur[IDX_SM]*y_cur[IDX_OII] - + k[4861]*y_cur[IDX_SM]*y_cur[IDX_SII] - + k[4862]*y_cur[IDX_SM]*y_cur[IDX_SOII] - + k[4863]*y_cur[IDX_SM]*y_cur[IDX_SiII] - + k[4864]*y_cur[IDX_SM]*y_cur[IDX_SiOII] - + k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] - + k[4866]*y_cur[IDX_SM]*y_cur[IDX_SiSII] + + k[5610]*y_cur[IDX_SI]*y_cur[IDX_eM] - k[5911]*y_cur[IDX_SM] - + k[6252]*y_cur[IDX_SM]; + ydot[yistart + IDX_SiSII] = 0.0 + + k[204]*y_cur[IDX_CII]*y_cur[IDX_SiSI] + + k[435]*y_cur[IDX_HII]*y_cur[IDX_SiSI] + + k[706]*y_cur[IDX_SII]*y_cur[IDX_SiSI] - + k[1269]*y_cur[IDX_SiSII]*y_cur[IDX_eM] - + k[2849]*y_cur[IDX_HI]*y_cur[IDX_SiSII] - + k[3675]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] - + k[3676]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + + k[3871]*y_cur[IDX_SiII]*y_cur[IDX_OCSI] + + k[3885]*y_cur[IDX_SiHI]*y_cur[IDX_SII] - + k[3920]*y_cur[IDX_CM]*y_cur[IDX_SiSII] - + k[3955]*y_cur[IDX_C10M]*y_cur[IDX_SiSII] - + k[3990]*y_cur[IDX_C10HM]*y_cur[IDX_SiSII] - + k[4025]*y_cur[IDX_C2M]*y_cur[IDX_SiSII] - + k[4060]*y_cur[IDX_C2HM]*y_cur[IDX_SiSII] - + k[4095]*y_cur[IDX_C3M]*y_cur[IDX_SiSII] - + k[4130]*y_cur[IDX_C3HM]*y_cur[IDX_SiSII] - + k[4165]*y_cur[IDX_C3NM]*y_cur[IDX_SiSII] - + k[4200]*y_cur[IDX_C4M]*y_cur[IDX_SiSII] - + k[4235]*y_cur[IDX_C4HM]*y_cur[IDX_SiSII] - + k[4270]*y_cur[IDX_C5M]*y_cur[IDX_SiSII] - + k[4305]*y_cur[IDX_C5HM]*y_cur[IDX_SiSII] - + k[4340]*y_cur[IDX_C5NM]*y_cur[IDX_SiSII] - + k[4375]*y_cur[IDX_C6M]*y_cur[IDX_SiSII] - + k[4410]*y_cur[IDX_C6HM]*y_cur[IDX_SiSII] - + k[4445]*y_cur[IDX_C7M]*y_cur[IDX_SiSII] - + k[4480]*y_cur[IDX_C7HM]*y_cur[IDX_SiSII] - + k[4515]*y_cur[IDX_C8M]*y_cur[IDX_SiSII] - + k[4550]*y_cur[IDX_C8HM]*y_cur[IDX_SiSII] - + k[4585]*y_cur[IDX_C9M]*y_cur[IDX_SiSII] - + k[4620]*y_cur[IDX_C9HM]*y_cur[IDX_SiSII] - + k[4655]*y_cur[IDX_CHM]*y_cur[IDX_SiSII] - + k[4690]*y_cur[IDX_CNM]*y_cur[IDX_SiSII] - + k[4726]*y_cur[IDX_HM]*y_cur[IDX_SiSII] - + k[4761]*y_cur[IDX_OM]*y_cur[IDX_SiSII] - + k[4796]*y_cur[IDX_O2M]*y_cur[IDX_SiSII] - + k[4831]*y_cur[IDX_OHM]*y_cur[IDX_SiSII] - + k[4866]*y_cur[IDX_SM]*y_cur[IDX_SiSII] - + k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2HM] = 0.0 - k[39]*y_cur[IDX_CI]*y_cur[IDX_C2HM] + - k[88]*y_cur[IDX_HI]*y_cur[IDX_C2HM] - + k[111]*y_cur[IDX_NI]*y_cur[IDX_C2HM] - + k[129]*y_cur[IDX_OI]*y_cur[IDX_C2HM] + + k[2366]*y_cur[IDX_HM]*y_cur[IDX_C2H2I] + + k[3396]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - + k[3687]*y_cur[IDX_OI]*y_cur[IDX_C2HM] + + k[3694]*y_cur[IDX_OI]*y_cur[IDX_C3HM] - + k[4026]*y_cur[IDX_C2HM]*y_cur[IDX_CII] - + k[4027]*y_cur[IDX_C2HM]*y_cur[IDX_C2H2II] - + k[4028]*y_cur[IDX_C2HM]*y_cur[IDX_C2H3II] - + k[4029]*y_cur[IDX_C2HM]*y_cur[IDX_C4H2II] - + k[4030]*y_cur[IDX_C2HM]*y_cur[IDX_C4H3II] - + k[4031]*y_cur[IDX_C2HM]*y_cur[IDX_C4SII] - + k[4032]*y_cur[IDX_C2HM]*y_cur[IDX_CH2CCHII] - + k[4033]*y_cur[IDX_C2HM]*y_cur[IDX_CH3II] - + k[4034]*y_cur[IDX_C2HM]*y_cur[IDX_CNCII] - + k[4035]*y_cur[IDX_C2HM]*y_cur[IDX_FeII] - + k[4036]*y_cur[IDX_C2HM]*y_cur[IDX_HII] - + k[4037]*y_cur[IDX_C2HM]*y_cur[IDX_H2COII] - + k[4038]*y_cur[IDX_C2HM]*y_cur[IDX_H2SII] - + k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] - + k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] - + k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] - + k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] - + k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] - + k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] - + k[4045]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] - k[4046]*y_cur[IDX_C2HM]*y_cur[IDX_HeII] - - k[4081]*y_cur[IDX_C3M]*y_cur[IDX_HeII] - - k[4116]*y_cur[IDX_C3HM]*y_cur[IDX_HeII] - - k[4151]*y_cur[IDX_C3NM]*y_cur[IDX_HeII] - - k[4186]*y_cur[IDX_C4M]*y_cur[IDX_HeII] - + k[4047]*y_cur[IDX_C2HM]*y_cur[IDX_MgII] - + k[4048]*y_cur[IDX_C2HM]*y_cur[IDX_NII] - + k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] - + k[4050]*y_cur[IDX_C2HM]*y_cur[IDX_NH3II] - + k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] - + k[4052]*y_cur[IDX_C2HM]*y_cur[IDX_NOII] - + k[4053]*y_cur[IDX_C2HM]*y_cur[IDX_NaII] - + k[4054]*y_cur[IDX_C2HM]*y_cur[IDX_OII] - + k[4055]*y_cur[IDX_C2HM]*y_cur[IDX_SII] - + k[4056]*y_cur[IDX_C2HM]*y_cur[IDX_SOII] - + k[4057]*y_cur[IDX_C2HM]*y_cur[IDX_SiII] - + k[4058]*y_cur[IDX_C2HM]*y_cur[IDX_SiOII] - + k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] - + k[4060]*y_cur[IDX_C2HM]*y_cur[IDX_SiSII] + + k[5590]*y_cur[IDX_C2HI]*y_cur[IDX_eM] - k[5695]*y_cur[IDX_C2HM] - + k[5980]*y_cur[IDX_C2HM]; + ydot[yistart + IDX_C4HM] = 0.0 - k[44]*y_cur[IDX_CI]*y_cur[IDX_C4HM] + - k[93]*y_cur[IDX_HI]*y_cur[IDX_C4HM] - + k[115]*y_cur[IDX_NI]*y_cur[IDX_C4HM] - + k[3404]*y_cur[IDX_NI]*y_cur[IDX_C4HM] + + k[3414]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - + k[3700]*y_cur[IDX_OI]*y_cur[IDX_C4HM] + + k[3705]*y_cur[IDX_OI]*y_cur[IDX_C5HM] - + k[4201]*y_cur[IDX_C4HM]*y_cur[IDX_CII] - + k[4202]*y_cur[IDX_C4HM]*y_cur[IDX_C2H2II] - + k[4203]*y_cur[IDX_C4HM]*y_cur[IDX_C2H3II] - + k[4204]*y_cur[IDX_C4HM]*y_cur[IDX_C4H2II] - + k[4205]*y_cur[IDX_C4HM]*y_cur[IDX_C4H3II] - + k[4206]*y_cur[IDX_C4HM]*y_cur[IDX_C4SII] - + k[4207]*y_cur[IDX_C4HM]*y_cur[IDX_CH2CCHII] - + k[4208]*y_cur[IDX_C4HM]*y_cur[IDX_CH3II] - + k[4209]*y_cur[IDX_C4HM]*y_cur[IDX_CNCII] - + k[4210]*y_cur[IDX_C4HM]*y_cur[IDX_FeII] - + k[4211]*y_cur[IDX_C4HM]*y_cur[IDX_HII] - + k[4212]*y_cur[IDX_C4HM]*y_cur[IDX_H2COII] - + k[4213]*y_cur[IDX_C4HM]*y_cur[IDX_H2SII] - + k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] - + k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] - + k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] - + k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] - + k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] - + k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] - + k[4220]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] - k[4221]*y_cur[IDX_C4HM]*y_cur[IDX_HeII] - - k[4256]*y_cur[IDX_C5M]*y_cur[IDX_HeII] - - k[4291]*y_cur[IDX_C5HM]*y_cur[IDX_HeII] - - k[4326]*y_cur[IDX_C5NM]*y_cur[IDX_HeII] - - k[4361]*y_cur[IDX_C6M]*y_cur[IDX_HeII] - - k[4396]*y_cur[IDX_C6HM]*y_cur[IDX_HeII] - - k[4431]*y_cur[IDX_C7M]*y_cur[IDX_HeII] - - k[4466]*y_cur[IDX_C7HM]*y_cur[IDX_HeII] - - k[4501]*y_cur[IDX_C8M]*y_cur[IDX_HeII] - - k[4536]*y_cur[IDX_C8HM]*y_cur[IDX_HeII] - - k[4571]*y_cur[IDX_C9M]*y_cur[IDX_HeII] - - k[4606]*y_cur[IDX_C9HM]*y_cur[IDX_HeII] - - k[4641]*y_cur[IDX_CHM]*y_cur[IDX_HeII] - - k[4676]*y_cur[IDX_CNM]*y_cur[IDX_HeII] - - k[4712]*y_cur[IDX_HM]*y_cur[IDX_HeII] - - k[4747]*y_cur[IDX_OM]*y_cur[IDX_HeII] - - k[4782]*y_cur[IDX_O2M]*y_cur[IDX_HeII] - - k[4817]*y_cur[IDX_OHM]*y_cur[IDX_HeII] - - k[4852]*y_cur[IDX_SM]*y_cur[IDX_HeII] - - k[5619]*y_cur[IDX_HeII]*y_cur[IDX_eM] - - k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] - - k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] - - k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] - - k[5638]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] - - k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] - - k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] - - k[5647]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] - - k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] - - k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] - - k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] - - k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] - - k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] - - k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - - k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - - k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - - k[5674]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + k[5683]*y_cur[IDX_HeI] - + k[5876]*y_cur[IDX_HeI] + k[6298]*y_cur[IDX_HeI] - - k[6312]*y_cur[IDX_HeII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_HeHII] = 0.0 - - k[1149]*y_cur[IDX_HeHII]*y_cur[IDX_eM] + - k[2390]*y_cur[IDX_H2II]*y_cur[IDX_HeI] - - k[2458]*y_cur[IDX_H2I]*y_cur[IDX_HeHII] - - k[2845]*y_cur[IDX_HI]*y_cur[IDX_HeHII] + - k[3250]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + - k[5547]*y_cur[IDX_HII]*y_cur[IDX_HeI] - - k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_MgI] = 0.0 - k[182]*y_cur[IDX_CII]*y_cur[IDX_MgI] - - k[252]*y_cur[IDX_CHII]*y_cur[IDX_MgI] - - k[273]*y_cur[IDX_CH3II]*y_cur[IDX_MgI] - - k[398]*y_cur[IDX_HII]*y_cur[IDX_MgI] - - k[471]*y_cur[IDX_H2OII]*y_cur[IDX_MgI] - - k[529]*y_cur[IDX_MgI]*y_cur[IDX_C2H2II] - - k[530]*y_cur[IDX_MgI]*y_cur[IDX_CSII] - - k[531]*y_cur[IDX_MgI]*y_cur[IDX_H2COII] - - k[532]*y_cur[IDX_MgI]*y_cur[IDX_H2SII] - - k[533]*y_cur[IDX_MgI]*y_cur[IDX_HCOII] - - k[534]*y_cur[IDX_MgI]*y_cur[IDX_HSII] - - k[535]*y_cur[IDX_MgI]*y_cur[IDX_N2II] - - k[536]*y_cur[IDX_MgI]*y_cur[IDX_NOII] - - k[537]*y_cur[IDX_MgI]*y_cur[IDX_O2II] - - k[538]*y_cur[IDX_MgI]*y_cur[IDX_SII] - - k[539]*y_cur[IDX_MgI]*y_cur[IDX_SOII] - - k[540]*y_cur[IDX_MgI]*y_cur[IDX_SiII] - - k[541]*y_cur[IDX_MgI]*y_cur[IDX_SiOII] - - k[556]*y_cur[IDX_NII]*y_cur[IDX_MgI] - - k[594]*y_cur[IDX_NH3II]*y_cur[IDX_MgI] + - k[639]*y_cur[IDX_NaI]*y_cur[IDX_MgII] - + k[4222]*y_cur[IDX_C4HM]*y_cur[IDX_MgII] - + k[4223]*y_cur[IDX_C4HM]*y_cur[IDX_NII] - + k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] - + k[4225]*y_cur[IDX_C4HM]*y_cur[IDX_NH3II] - + k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] - + k[4227]*y_cur[IDX_C4HM]*y_cur[IDX_NOII] - + k[4228]*y_cur[IDX_C4HM]*y_cur[IDX_NaII] - + k[4229]*y_cur[IDX_C4HM]*y_cur[IDX_OII] - + k[4230]*y_cur[IDX_C4HM]*y_cur[IDX_SII] - + k[4231]*y_cur[IDX_C4HM]*y_cur[IDX_SOII] - + k[4232]*y_cur[IDX_C4HM]*y_cur[IDX_SiII] - + k[4233]*y_cur[IDX_C4HM]*y_cur[IDX_SiOII] - + k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] - + k[4235]*y_cur[IDX_C4HM]*y_cur[IDX_SiSII] + + k[5595]*y_cur[IDX_C4HI]*y_cur[IDX_eM] - k[5729]*y_cur[IDX_C4HM] - + k[6013]*y_cur[IDX_C4HM]; + ydot[yistart + IDX_COII] = 0.0 - + k[209]*y_cur[IDX_C2I]*y_cur[IDX_COII] - + k[242]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - + k[246]*y_cur[IDX_CI]*y_cur[IDX_COII] - + k[261]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - + k[285]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - + k[289]*y_cur[IDX_CHI]*y_cur[IDX_COII] + + k[299]*y_cur[IDX_CNII]*y_cur[IDX_COI] - + k[307]*y_cur[IDX_COII]*y_cur[IDX_CO2I] - + k[308]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - + k[309]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - + k[310]*y_cur[IDX_COII]*y_cur[IDX_HCOI] - + k[311]*y_cur[IDX_COII]*y_cur[IDX_NOI] - + k[312]*y_cur[IDX_COII]*y_cur[IDX_O2I] - + k[313]*y_cur[IDX_COII]*y_cur[IDX_SI] + + k[316]*y_cur[IDX_COI]*y_cur[IDX_N2II] + + k[445]*y_cur[IDX_H2II]*y_cur[IDX_COI] - + k[478]*y_cur[IDX_H2OI]*y_cur[IDX_COII] - + k[488]*y_cur[IDX_HI]*y_cur[IDX_COII] - + k[497]*y_cur[IDX_HCNI]*y_cur[IDX_COII] + + k[549]*y_cur[IDX_NII]*y_cur[IDX_COI] - + k[587]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - + k[602]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - + k[617]*y_cur[IDX_NHI]*y_cur[IDX_COII] + + k[653]*y_cur[IDX_OII]*y_cur[IDX_COI] - + k[682]*y_cur[IDX_OI]*y_cur[IDX_COII] - + k[699]*y_cur[IDX_OHI]*y_cur[IDX_COII] - + k[980]*y_cur[IDX_COII]*y_cur[IDX_eM] + + k[1386]*y_cur[IDX_CII]*y_cur[IDX_CNOI] + + k[1387]*y_cur[IDX_CII]*y_cur[IDX_CO2I] + + k[1422]*y_cur[IDX_CII]*y_cur[IDX_O2I] + + k[1424]*y_cur[IDX_CII]*y_cur[IDX_OCNI] + + k[1426]*y_cur[IDX_CII]*y_cur[IDX_OHI] + + k[1430]*y_cur[IDX_CII]*y_cur[IDX_SOI] + + k[1455]*y_cur[IDX_C2II]*y_cur[IDX_O2I] + + k[1462]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - + k[1743]*y_cur[IDX_C2HI]*y_cur[IDX_COII] + + k[1912]*y_cur[IDX_CI]*y_cur[IDX_O2II] + + k[1966]*y_cur[IDX_CHII]*y_cur[IDX_O2I] + + k[1969]*y_cur[IDX_CHII]*y_cur[IDX_OI] + + k[1972]*y_cur[IDX_CHII]*y_cur[IDX_OHI] - + k[2001]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - + k[2189]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - + k[2190]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - + k[2245]*y_cur[IDX_CHI]*y_cur[IDX_COII] + + k[2261]*y_cur[IDX_CHI]*y_cur[IDX_OII] - + k[2280]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - + k[2281]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - + k[2282]*y_cur[IDX_COII]*y_cur[IDX_SO2I] + + k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + + k[2344]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - + k[2434]*y_cur[IDX_H2I]*y_cur[IDX_COII] - + k[2435]*y_cur[IDX_H2I]*y_cur[IDX_COII] - + k[2540]*y_cur[IDX_H2OI]*y_cur[IDX_COII] + + k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + + k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + + k[3296]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3343]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - + k[3534]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - + k[3573]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - + k[3610]*y_cur[IDX_NHI]*y_cur[IDX_COII] + + k[3631]*y_cur[IDX_OII]*y_cur[IDX_C2I] + + k[3634]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + + k[3684]*y_cur[IDX_OI]*y_cur[IDX_C2II] + + k[3732]*y_cur[IDX_OI]*y_cur[IDX_CSII] - + k[3798]*y_cur[IDX_OHI]*y_cur[IDX_COII] + + k[5505]*y_cur[IDX_CII]*y_cur[IDX_OI] + + k[5525]*y_cur[IDX_CI]*y_cur[IDX_OII] + + k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + + k[5647]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + + k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + + k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + k[5676]*y_cur[IDX_COI] + - k[6136]*y_cur[IDX_COII] + k[6183]*y_cur[IDX_HCOII] - + k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3CCHI] = 0.0 - + k[165]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[220]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - + k[365]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] + + k[804]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + + k[806]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + + k[811]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[828]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] - + k[1363]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[1364]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[1365]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[1366]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[1509]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - + k[1510]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - + k[1611]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] - + k[1612]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] - + k[1669]*y_cur[IDX_C2H4II]*y_cur[IDX_CH3CCHI] - + k[1777]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1778]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1779]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1780]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1781]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1811]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - + k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - + k[1813]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + + k[1814]*y_cur[IDX_C3H5II]*y_cur[IDX_C6H6I] + + k[1816]*y_cur[IDX_C3H5II]*y_cur[IDX_HC3NI] - + k[2104]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C3H5II] - + k[2105]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HII] - + k[2106]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] - + k[2107]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] - + k[2108]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H3II] - + k[2109]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C5H2II] - + k[2110]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C6H2II] + + k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] - + k[2325]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] - + k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] - + k[2789]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CCHI] - + k[2948]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CCHI] - + k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3864]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - + k[3865]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - + k[3866]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - + k[4896]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] - + k[4897]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] + + k[4898]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CHCH2I] + + k[4915]*y_cur[IDX_CI]*y_cur[IDX_C2H5I] - + k[4952]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - + k[4953]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - + k[5050]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] - + k[5051]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + + k[5066]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - + k[5068]*y_cur[IDX_CHI]*y_cur[IDX_CH3CCHI] - + k[5110]*y_cur[IDX_CNI]*y_cur[IDX_CH3CCHI] + + k[5785]*y_cur[IDX_CH2CHCCHI] - k[5801]*y_cur[IDX_CH3CCHI] - + k[5802]*y_cur[IDX_CH3CCHI] + k[6086]*y_cur[IDX_CH2CHCCHI] - + k[6105]*y_cur[IDX_CH3CCHI] - k[6106]*y_cur[IDX_CH3CCHI] - + k[6107]*y_cur[IDX_CH3CCHI] + + k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + + k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + + k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - + k[6952]*y_cur[IDX_CH3CCHI] + k[7134]*y_cur[IDX_GCH3CCHI] + + k[7316]*y_cur[IDX_GCH3CCHI] + k[7498]*y_cur[IDX_GCH3CCHI] + + k[8615]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] + + k[8723]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I]; + ydot[yistart + IDX_CH5II] = 0.0 - + k[972]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - + k[973]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - + k[974]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - + k[975]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - + k[976]*y_cur[IDX_CH5II]*y_cur[IDX_eM] - + k[1898]*y_cur[IDX_CI]*y_cur[IDX_CH5II] - + k[2000]*y_cur[IDX_CH2I]*y_cur[IDX_CH5II] + + k[2138]*y_cur[IDX_CH4II]*y_cur[IDX_CH4I] + + k[2201]*y_cur[IDX_CH4I]*y_cur[IDX_HCO2II] + + k[2202]*y_cur[IDX_CH4I]*y_cur[IDX_HNOII] + + k[2206]*y_cur[IDX_CH4I]*y_cur[IDX_N2HII] + + k[2209]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - + k[2217]*y_cur[IDX_CH5II]*y_cur[IDX_C2I] - + k[2218]*y_cur[IDX_CH5II]*y_cur[IDX_C2H2I] - + k[2219]*y_cur[IDX_CH5II]*y_cur[IDX_C2H4I] - + k[2220]*y_cur[IDX_CH5II]*y_cur[IDX_C2HI] - + k[2221]*y_cur[IDX_CH5II]*y_cur[IDX_C6H6I] - + k[2222]*y_cur[IDX_CH5II]*y_cur[IDX_C2H6I] - + k[2223]*y_cur[IDX_CH5II]*y_cur[IDX_CO2I] - + k[2224]*y_cur[IDX_CH5II]*y_cur[IDX_COI] - + k[2225]*y_cur[IDX_CH5II]*y_cur[IDX_H2COI] - + k[2226]*y_cur[IDX_CH5II]*y_cur[IDX_H2OI] - + k[2227]*y_cur[IDX_CH5II]*y_cur[IDX_H2SI] - + k[2228]*y_cur[IDX_CH5II]*y_cur[IDX_HC3NI] - + k[2229]*y_cur[IDX_CH5II]*y_cur[IDX_HCNI] - + k[2230]*y_cur[IDX_CH5II]*y_cur[IDX_HCOI] - + k[2231]*y_cur[IDX_CH5II]*y_cur[IDX_HClI] - + k[2232]*y_cur[IDX_CH5II]*y_cur[IDX_HNCI] - k[2233]*y_cur[IDX_CH5II]*y_cur[IDX_MgI] - - k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] + - k[3907]*y_cur[IDX_CM]*y_cur[IDX_MgII] + - k[3942]*y_cur[IDX_C10M]*y_cur[IDX_MgII] + - k[3977]*y_cur[IDX_C10HM]*y_cur[IDX_MgII] + - k[4012]*y_cur[IDX_C2M]*y_cur[IDX_MgII] + - k[4047]*y_cur[IDX_C2HM]*y_cur[IDX_MgII] + - k[4082]*y_cur[IDX_C3M]*y_cur[IDX_MgII] + - k[4117]*y_cur[IDX_C3HM]*y_cur[IDX_MgII] + - k[4152]*y_cur[IDX_C3NM]*y_cur[IDX_MgII] + - k[4187]*y_cur[IDX_C4M]*y_cur[IDX_MgII] + - k[4222]*y_cur[IDX_C4HM]*y_cur[IDX_MgII] + - k[4257]*y_cur[IDX_C5M]*y_cur[IDX_MgII] + - k[4292]*y_cur[IDX_C5HM]*y_cur[IDX_MgII] + - k[4327]*y_cur[IDX_C5NM]*y_cur[IDX_MgII] + - k[4362]*y_cur[IDX_C6M]*y_cur[IDX_MgII] + - k[4397]*y_cur[IDX_C6HM]*y_cur[IDX_MgII] + - k[4432]*y_cur[IDX_C7M]*y_cur[IDX_MgII] + - k[4467]*y_cur[IDX_C7HM]*y_cur[IDX_MgII] + - k[4502]*y_cur[IDX_C8M]*y_cur[IDX_MgII] + - k[4537]*y_cur[IDX_C8HM]*y_cur[IDX_MgII] + - k[4572]*y_cur[IDX_C9M]*y_cur[IDX_MgII] + - k[4607]*y_cur[IDX_C9HM]*y_cur[IDX_MgII] + - k[4642]*y_cur[IDX_CHM]*y_cur[IDX_MgII] + - k[4677]*y_cur[IDX_CNM]*y_cur[IDX_MgII] + - k[4713]*y_cur[IDX_HM]*y_cur[IDX_MgII] + - k[4748]*y_cur[IDX_OM]*y_cur[IDX_MgII] + - k[4783]*y_cur[IDX_O2M]*y_cur[IDX_MgII] + - k[4818]*y_cur[IDX_OHM]*y_cur[IDX_MgII] + - k[4853]*y_cur[IDX_SM]*y_cur[IDX_MgII] + - k[5620]*y_cur[IDX_MgII]*y_cur[IDX_eM] - k[5877]*y_cur[IDX_MgI] - - k[6210]*y_cur[IDX_MgI] - k[6306]*y_cur[IDX_MgI] + - k[6353]*y_cur[IDX_MgII]*y_cur[IDX_GRAINM] - k[6906]*y_cur[IDX_MgI] + - k[7088]*y_cur[IDX_GMgI] + k[7270]*y_cur[IDX_GMgI] + - k[7452]*y_cur[IDX_GMgI]; - ydot[yistart + IDX_MgII] = 0.0 + - k[182]*y_cur[IDX_CII]*y_cur[IDX_MgI] + - k[252]*y_cur[IDX_CHII]*y_cur[IDX_MgI] + - k[273]*y_cur[IDX_CH3II]*y_cur[IDX_MgI] + - k[398]*y_cur[IDX_HII]*y_cur[IDX_MgI] + - k[471]*y_cur[IDX_H2OII]*y_cur[IDX_MgI] + - k[529]*y_cur[IDX_MgI]*y_cur[IDX_C2H2II] + - k[530]*y_cur[IDX_MgI]*y_cur[IDX_CSII] + - k[531]*y_cur[IDX_MgI]*y_cur[IDX_H2COII] + - k[532]*y_cur[IDX_MgI]*y_cur[IDX_H2SII] + - k[533]*y_cur[IDX_MgI]*y_cur[IDX_HCOII] + - k[534]*y_cur[IDX_MgI]*y_cur[IDX_HSII] + - k[535]*y_cur[IDX_MgI]*y_cur[IDX_N2II] + - k[536]*y_cur[IDX_MgI]*y_cur[IDX_NOII] + - k[537]*y_cur[IDX_MgI]*y_cur[IDX_O2II] + - k[538]*y_cur[IDX_MgI]*y_cur[IDX_SII] + - k[539]*y_cur[IDX_MgI]*y_cur[IDX_SOII] + - k[540]*y_cur[IDX_MgI]*y_cur[IDX_SiII] + - k[541]*y_cur[IDX_MgI]*y_cur[IDX_SiOII] + - k[556]*y_cur[IDX_NII]*y_cur[IDX_MgI] + - k[594]*y_cur[IDX_NH3II]*y_cur[IDX_MgI] - - k[639]*y_cur[IDX_NaI]*y_cur[IDX_MgII] + - k[2233]*y_cur[IDX_CH5II]*y_cur[IDX_MgI] + - k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] - - k[3907]*y_cur[IDX_CM]*y_cur[IDX_MgII] - - k[3942]*y_cur[IDX_C10M]*y_cur[IDX_MgII] - + k[2234]*y_cur[IDX_CH5II]*y_cur[IDX_N2OI] - + k[2235]*y_cur[IDX_CH5II]*y_cur[IDX_SI] - + k[2236]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] - + k[2237]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] - + k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] - + k[2244]*y_cur[IDX_CHI]*y_cur[IDX_CH5II] + + k[2379]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + + k[2432]*y_cur[IDX_H2I]*y_cur[IDX_CH4II] + + k[2656]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2669]*y_cur[IDX_H3II]*y_cur[IDX_CH4I] - + k[2840]*y_cur[IDX_HI]*y_cur[IDX_CH5II] - + k[3533]*y_cur[IDX_NH2I]*y_cur[IDX_CH5II] - + k[3571]*y_cur[IDX_NH3I]*y_cur[IDX_CH5II] - + k[3609]*y_cur[IDX_NHI]*y_cur[IDX_CH5II] - + k[3728]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - + k[3729]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - + k[3797]*y_cur[IDX_OHI]*y_cur[IDX_CH5II] - + k[5545]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + + k[5555]*y_cur[IDX_H2I]*y_cur[IDX_CH3II] - + k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - + k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - + k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - + k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - + k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HC2SII] = 0.0 - + k[1061]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] - + k[1062]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + + k[1528]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] + + k[1573]*y_cur[IDX_C2H2I]*y_cur[IDX_SII] + + k[1625]*y_cur[IDX_C2H3II]*y_cur[IDX_SI] + + k[1645]*y_cur[IDX_C2H3I]*y_cur[IDX_SII] + + k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] - + k[1902]*y_cur[IDX_CI]*y_cur[IDX_HC2SII] + + k[2405]*y_cur[IDX_H2I]*y_cur[IDX_C2SII] + + k[2600]*y_cur[IDX_H3II]*y_cur[IDX_C2SI] + + k[2770]*y_cur[IDX_H3OII]*y_cur[IDX_C2SI] + + k[2905]*y_cur[IDX_HCOII]*y_cur[IDX_C2SI] - + k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] - + k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] - + k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] - + k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] - + k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] - + k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] - + k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] - + k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] - + k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] - + k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] - + k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] - + k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] - + k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] - + k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] - + k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] - + k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] - + k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] - + k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] - + k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] - + k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] - + k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] - + k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] - + k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] - + k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] - + k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] - + k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] - + k[4812]*y_cur[IDX_OHM]*y_cur[IDX_HC2SII] - + k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] - + k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] - + k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_OHM] = 0.0 - k[57]*y_cur[IDX_CI]*y_cur[IDX_OHM] - + k[61]*y_cur[IDX_CH3I]*y_cur[IDX_OHM] - + k[64]*y_cur[IDX_CHI]*y_cur[IDX_OHM] - + k[108]*y_cur[IDX_HI]*y_cur[IDX_OHM] - + k[696]*y_cur[IDX_OHM]*y_cur[IDX_CNI] + + k[2367]*y_cur[IDX_HM]*y_cur[IDX_H2OI] + + k[2467]*y_cur[IDX_H2I]*y_cur[IDX_OM] + + k[3652]*y_cur[IDX_OM]*y_cur[IDX_CH4I] - + k[3795]*y_cur[IDX_OHM]*y_cur[IDX_HCNI] - + k[4797]*y_cur[IDX_OHM]*y_cur[IDX_CII] - + k[4798]*y_cur[IDX_OHM]*y_cur[IDX_C2H2II] - + k[4799]*y_cur[IDX_OHM]*y_cur[IDX_C2H3II] - + k[4800]*y_cur[IDX_OHM]*y_cur[IDX_C4H2II] - + k[4801]*y_cur[IDX_OHM]*y_cur[IDX_C4H3II] - + k[4802]*y_cur[IDX_OHM]*y_cur[IDX_C4SII] - + k[4803]*y_cur[IDX_OHM]*y_cur[IDX_CH2CCHII] - + k[4804]*y_cur[IDX_OHM]*y_cur[IDX_CH3II] - + k[4805]*y_cur[IDX_OHM]*y_cur[IDX_CNCII] - + k[4806]*y_cur[IDX_OHM]*y_cur[IDX_FeII] - + k[4807]*y_cur[IDX_OHM]*y_cur[IDX_HII] - + k[4808]*y_cur[IDX_OHM]*y_cur[IDX_H2COII] - + k[4809]*y_cur[IDX_OHM]*y_cur[IDX_H2SII] - + k[4810]*y_cur[IDX_OHM]*y_cur[IDX_H3II] - + k[4811]*y_cur[IDX_OHM]*y_cur[IDX_H3OII] - + k[4812]*y_cur[IDX_OHM]*y_cur[IDX_HC2SII] - + k[4813]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] - + k[4814]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] - + k[4815]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] - + k[4816]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] - + k[4817]*y_cur[IDX_OHM]*y_cur[IDX_HeII] - + k[4818]*y_cur[IDX_OHM]*y_cur[IDX_MgII] - + k[4819]*y_cur[IDX_OHM]*y_cur[IDX_NII] - + k[4820]*y_cur[IDX_OHM]*y_cur[IDX_N2HII] - + k[4821]*y_cur[IDX_OHM]*y_cur[IDX_NH3II] - + k[4822]*y_cur[IDX_OHM]*y_cur[IDX_NH4II] - + k[4823]*y_cur[IDX_OHM]*y_cur[IDX_NOII] - + k[4824]*y_cur[IDX_OHM]*y_cur[IDX_NaII] - + k[4825]*y_cur[IDX_OHM]*y_cur[IDX_OII] - + k[4826]*y_cur[IDX_OHM]*y_cur[IDX_SII] - + k[4827]*y_cur[IDX_OHM]*y_cur[IDX_SOII] - + k[4828]*y_cur[IDX_OHM]*y_cur[IDX_SiII] - + k[4829]*y_cur[IDX_OHM]*y_cur[IDX_SiOII] - + k[4830]*y_cur[IDX_OHM]*y_cur[IDX_SiOHII] - + k[4831]*y_cur[IDX_OHM]*y_cur[IDX_SiSII] - k[5904]*y_cur[IDX_OHM] - + k[6243]*y_cur[IDX_OHM]; + ydot[yistart + IDX_C10HM] = 0.0 - + k[86]*y_cur[IDX_HI]*y_cur[IDX_C10HM] - + k[1847]*y_cur[IDX_CI]*y_cur[IDX_C10HM] - + k[3381]*y_cur[IDX_NI]*y_cur[IDX_C10HM] - + k[3382]*y_cur[IDX_NI]*y_cur[IDX_C10HM] - + k[3681]*y_cur[IDX_OI]*y_cur[IDX_C10HM] - + k[3956]*y_cur[IDX_C10HM]*y_cur[IDX_CII] - + k[3957]*y_cur[IDX_C10HM]*y_cur[IDX_C2H2II] - + k[3958]*y_cur[IDX_C10HM]*y_cur[IDX_C2H3II] - + k[3959]*y_cur[IDX_C10HM]*y_cur[IDX_C4H2II] - + k[3960]*y_cur[IDX_C10HM]*y_cur[IDX_C4H3II] - + k[3961]*y_cur[IDX_C10HM]*y_cur[IDX_C4SII] - + k[3962]*y_cur[IDX_C10HM]*y_cur[IDX_CH2CCHII] - + k[3963]*y_cur[IDX_C10HM]*y_cur[IDX_CH3II] - + k[3964]*y_cur[IDX_C10HM]*y_cur[IDX_CNCII] - + k[3965]*y_cur[IDX_C10HM]*y_cur[IDX_FeII] - + k[3966]*y_cur[IDX_C10HM]*y_cur[IDX_HII] - + k[3967]*y_cur[IDX_C10HM]*y_cur[IDX_H2COII] - + k[3968]*y_cur[IDX_C10HM]*y_cur[IDX_H2SII] - + k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] - + k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] - + k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] - + k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] - + k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] - + k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] - + k[3975]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] - + k[3976]*y_cur[IDX_C10HM]*y_cur[IDX_HeII] - k[3977]*y_cur[IDX_C10HM]*y_cur[IDX_MgII] - - k[4012]*y_cur[IDX_C2M]*y_cur[IDX_MgII] - - k[4047]*y_cur[IDX_C2HM]*y_cur[IDX_MgII] - - k[4082]*y_cur[IDX_C3M]*y_cur[IDX_MgII] - + k[3978]*y_cur[IDX_C10HM]*y_cur[IDX_NII] - + k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] - + k[3980]*y_cur[IDX_C10HM]*y_cur[IDX_NH3II] - + k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] - + k[3982]*y_cur[IDX_C10HM]*y_cur[IDX_NOII] - + k[3983]*y_cur[IDX_C10HM]*y_cur[IDX_NaII] - + k[3984]*y_cur[IDX_C10HM]*y_cur[IDX_OII] - + k[3985]*y_cur[IDX_C10HM]*y_cur[IDX_SII] - + k[3986]*y_cur[IDX_C10HM]*y_cur[IDX_SOII] - + k[3987]*y_cur[IDX_C10HM]*y_cur[IDX_SiII] - + k[3988]*y_cur[IDX_C10HM]*y_cur[IDX_SiOII] - + k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] - + k[3990]*y_cur[IDX_C10HM]*y_cur[IDX_SiSII] + + k[5588]*y_cur[IDX_C10HI]*y_cur[IDX_eM] - k[5689]*y_cur[IDX_C10HM] - + k[5956]*y_cur[IDX_C10HM]; + ydot[yistart + IDX_C3HM] = 0.0 - k[41]*y_cur[IDX_CI]*y_cur[IDX_C3HM] + - k[90]*y_cur[IDX_HI]*y_cur[IDX_C3HM] - + k[113]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - + k[3395]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - + k[3396]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - + k[3694]*y_cur[IDX_OI]*y_cur[IDX_C3HM] + + k[3700]*y_cur[IDX_OI]*y_cur[IDX_C4HM] - + k[4096]*y_cur[IDX_C3HM]*y_cur[IDX_CII] - + k[4097]*y_cur[IDX_C3HM]*y_cur[IDX_C2H2II] - + k[4098]*y_cur[IDX_C3HM]*y_cur[IDX_C2H3II] - + k[4099]*y_cur[IDX_C3HM]*y_cur[IDX_C4H2II] - + k[4100]*y_cur[IDX_C3HM]*y_cur[IDX_C4H3II] - + k[4101]*y_cur[IDX_C3HM]*y_cur[IDX_C4SII] - + k[4102]*y_cur[IDX_C3HM]*y_cur[IDX_CH2CCHII] - + k[4103]*y_cur[IDX_C3HM]*y_cur[IDX_CH3II] - + k[4104]*y_cur[IDX_C3HM]*y_cur[IDX_CNCII] - + k[4105]*y_cur[IDX_C3HM]*y_cur[IDX_FeII] - + k[4106]*y_cur[IDX_C3HM]*y_cur[IDX_HII] - + k[4107]*y_cur[IDX_C3HM]*y_cur[IDX_H2COII] - + k[4108]*y_cur[IDX_C3HM]*y_cur[IDX_H2SII] - + k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] - + k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] - + k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] - + k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] - + k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] - + k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] - + k[4115]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] - + k[4116]*y_cur[IDX_C3HM]*y_cur[IDX_HeII] - k[4117]*y_cur[IDX_C3HM]*y_cur[IDX_MgII] - - k[4152]*y_cur[IDX_C3NM]*y_cur[IDX_MgII] - - k[4187]*y_cur[IDX_C4M]*y_cur[IDX_MgII] - - k[4222]*y_cur[IDX_C4HM]*y_cur[IDX_MgII] - - k[4257]*y_cur[IDX_C5M]*y_cur[IDX_MgII] - - k[4292]*y_cur[IDX_C5HM]*y_cur[IDX_MgII] - - k[4327]*y_cur[IDX_C5NM]*y_cur[IDX_MgII] - - k[4362]*y_cur[IDX_C6M]*y_cur[IDX_MgII] - + k[4118]*y_cur[IDX_C3HM]*y_cur[IDX_NII] - + k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] - + k[4120]*y_cur[IDX_C3HM]*y_cur[IDX_NH3II] - + k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] - + k[4122]*y_cur[IDX_C3HM]*y_cur[IDX_NOII] - + k[4123]*y_cur[IDX_C3HM]*y_cur[IDX_NaII] - + k[4124]*y_cur[IDX_C3HM]*y_cur[IDX_OII] - + k[4125]*y_cur[IDX_C3HM]*y_cur[IDX_SII] - + k[4126]*y_cur[IDX_C3HM]*y_cur[IDX_SOII] - + k[4127]*y_cur[IDX_C3HM]*y_cur[IDX_SiII] - + k[4128]*y_cur[IDX_C3HM]*y_cur[IDX_SiOII] - + k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] - + k[4130]*y_cur[IDX_C3HM]*y_cur[IDX_SiSII] + + k[5592]*y_cur[IDX_C3HI]*y_cur[IDX_eM] - k[5718]*y_cur[IDX_C3HM] - + k[6002]*y_cur[IDX_C3HM]; + ydot[yistart + IDX_C4SI] = 0.0 - + k[156]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - + k[342]*y_cur[IDX_HII]*y_cur[IDX_C4SI] + + k[1076]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - + k[1322]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - + k[2612]*y_cur[IDX_H3II]*y_cur[IDX_C4SI] - + k[2782]*y_cur[IDX_H3OII]*y_cur[IDX_C4SI] - + k[2917]*y_cur[IDX_HCOII]*y_cur[IDX_C4SI] - + k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] - + k[3116]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + + k[3891]*y_cur[IDX_CM]*y_cur[IDX_C4SII] + + k[3926]*y_cur[IDX_C10M]*y_cur[IDX_C4SII] + + k[3961]*y_cur[IDX_C10HM]*y_cur[IDX_C4SII] + + k[3996]*y_cur[IDX_C2M]*y_cur[IDX_C4SII] + + k[4031]*y_cur[IDX_C2HM]*y_cur[IDX_C4SII] + + k[4066]*y_cur[IDX_C3M]*y_cur[IDX_C4SII] + + k[4101]*y_cur[IDX_C3HM]*y_cur[IDX_C4SII] + + k[4136]*y_cur[IDX_C3NM]*y_cur[IDX_C4SII] + + k[4171]*y_cur[IDX_C4M]*y_cur[IDX_C4SII] + + k[4206]*y_cur[IDX_C4HM]*y_cur[IDX_C4SII] + + k[4241]*y_cur[IDX_C5M]*y_cur[IDX_C4SII] + + k[4276]*y_cur[IDX_C5HM]*y_cur[IDX_C4SII] + + k[4311]*y_cur[IDX_C5NM]*y_cur[IDX_C4SII] + + k[4346]*y_cur[IDX_C6M]*y_cur[IDX_C4SII] + + k[4381]*y_cur[IDX_C6HM]*y_cur[IDX_C4SII] + + k[4416]*y_cur[IDX_C7M]*y_cur[IDX_C4SII] + + k[4451]*y_cur[IDX_C7HM]*y_cur[IDX_C4SII] + + k[4486]*y_cur[IDX_C8M]*y_cur[IDX_C4SII] + + k[4521]*y_cur[IDX_C8HM]*y_cur[IDX_C4SII] + + k[4556]*y_cur[IDX_C9M]*y_cur[IDX_C4SII] + + k[4591]*y_cur[IDX_C9HM]*y_cur[IDX_C4SII] + + k[4626]*y_cur[IDX_CHM]*y_cur[IDX_C4SII] + + k[4661]*y_cur[IDX_CNM]*y_cur[IDX_C4SII] + + k[4696]*y_cur[IDX_HM]*y_cur[IDX_C4SII] + + k[4732]*y_cur[IDX_OM]*y_cur[IDX_C4SII] + + k[4767]*y_cur[IDX_O2M]*y_cur[IDX_C4SII] + + k[4802]*y_cur[IDX_OHM]*y_cur[IDX_C4SII] + + k[4837]*y_cur[IDX_SM]*y_cur[IDX_C4SII] - k[5735]*y_cur[IDX_C4SI] - + k[6021]*y_cur[IDX_C4SI] + + k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - + k[7049]*y_cur[IDX_C4SI] + k[7231]*y_cur[IDX_GC4SI] + + k[7413]*y_cur[IDX_GC4SI] + k[7595]*y_cur[IDX_GC4SI]; + ydot[yistart + IDX_C6HM] = 0.0 - k[48]*y_cur[IDX_CI]*y_cur[IDX_C6HM] + - k[98]*y_cur[IDX_HI]*y_cur[IDX_C6HM] - + k[3421]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - + k[3422]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - + k[3709]*y_cur[IDX_OI]*y_cur[IDX_C6HM] + + k[3714]*y_cur[IDX_OI]*y_cur[IDX_C7HM] - + k[4376]*y_cur[IDX_C6HM]*y_cur[IDX_CII] - + k[4377]*y_cur[IDX_C6HM]*y_cur[IDX_C2H2II] - + k[4378]*y_cur[IDX_C6HM]*y_cur[IDX_C2H3II] - + k[4379]*y_cur[IDX_C6HM]*y_cur[IDX_C4H2II] - + k[4380]*y_cur[IDX_C6HM]*y_cur[IDX_C4H3II] - + k[4381]*y_cur[IDX_C6HM]*y_cur[IDX_C4SII] - + k[4382]*y_cur[IDX_C6HM]*y_cur[IDX_CH2CCHII] - + k[4383]*y_cur[IDX_C6HM]*y_cur[IDX_CH3II] - + k[4384]*y_cur[IDX_C6HM]*y_cur[IDX_CNCII] - + k[4385]*y_cur[IDX_C6HM]*y_cur[IDX_FeII] - + k[4386]*y_cur[IDX_C6HM]*y_cur[IDX_HII] - + k[4387]*y_cur[IDX_C6HM]*y_cur[IDX_H2COII] - + k[4388]*y_cur[IDX_C6HM]*y_cur[IDX_H2SII] - + k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] - + k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] - + k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] - + k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] - + k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] - + k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] - + k[4395]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] - + k[4396]*y_cur[IDX_C6HM]*y_cur[IDX_HeII] - k[4397]*y_cur[IDX_C6HM]*y_cur[IDX_MgII] - - k[4432]*y_cur[IDX_C7M]*y_cur[IDX_MgII] - - k[4467]*y_cur[IDX_C7HM]*y_cur[IDX_MgII] - - k[4502]*y_cur[IDX_C8M]*y_cur[IDX_MgII] - + k[4398]*y_cur[IDX_C6HM]*y_cur[IDX_NII] - + k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] - + k[4400]*y_cur[IDX_C6HM]*y_cur[IDX_NH3II] - + k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] - + k[4402]*y_cur[IDX_C6HM]*y_cur[IDX_NOII] - + k[4403]*y_cur[IDX_C6HM]*y_cur[IDX_NaII] - + k[4404]*y_cur[IDX_C6HM]*y_cur[IDX_OII] - + k[4405]*y_cur[IDX_C6HM]*y_cur[IDX_SII] - + k[4406]*y_cur[IDX_C6HM]*y_cur[IDX_SOII] - + k[4407]*y_cur[IDX_C6HM]*y_cur[IDX_SiII] - + k[4408]*y_cur[IDX_C6HM]*y_cur[IDX_SiOII] - + k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] - + k[4410]*y_cur[IDX_C6HM]*y_cur[IDX_SiSII] + + k[5600]*y_cur[IDX_C6HI]*y_cur[IDX_eM] - k[5749]*y_cur[IDX_C6HM] - + k[6035]*y_cur[IDX_C6HM]; + ydot[yistart + IDX_C8HM] = 0.0 - k[52]*y_cur[IDX_CI]*y_cur[IDX_C8HM] + - k[102]*y_cur[IDX_HI]*y_cur[IDX_C8HM] - + k[3440]*y_cur[IDX_NI]*y_cur[IDX_C8HM] - + k[3441]*y_cur[IDX_NI]*y_cur[IDX_C8HM] - + k[3718]*y_cur[IDX_OI]*y_cur[IDX_C8HM] + + k[3723]*y_cur[IDX_OI]*y_cur[IDX_C9HM] - + k[4516]*y_cur[IDX_C8HM]*y_cur[IDX_CII] - + k[4517]*y_cur[IDX_C8HM]*y_cur[IDX_C2H2II] - + k[4518]*y_cur[IDX_C8HM]*y_cur[IDX_C2H3II] - + k[4519]*y_cur[IDX_C8HM]*y_cur[IDX_C4H2II] - + k[4520]*y_cur[IDX_C8HM]*y_cur[IDX_C4H3II] - + k[4521]*y_cur[IDX_C8HM]*y_cur[IDX_C4SII] - + k[4522]*y_cur[IDX_C8HM]*y_cur[IDX_CH2CCHII] - + k[4523]*y_cur[IDX_C8HM]*y_cur[IDX_CH3II] - + k[4524]*y_cur[IDX_C8HM]*y_cur[IDX_CNCII] - + k[4525]*y_cur[IDX_C8HM]*y_cur[IDX_FeII] - + k[4526]*y_cur[IDX_C8HM]*y_cur[IDX_HII] - + k[4527]*y_cur[IDX_C8HM]*y_cur[IDX_H2COII] - + k[4528]*y_cur[IDX_C8HM]*y_cur[IDX_H2SII] - + k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] - + k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] - + k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] - + k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] - + k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] - + k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] - + k[4535]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] - + k[4536]*y_cur[IDX_C8HM]*y_cur[IDX_HeII] - k[4537]*y_cur[IDX_C8HM]*y_cur[IDX_MgII] - - k[4572]*y_cur[IDX_C9M]*y_cur[IDX_MgII] - - k[4607]*y_cur[IDX_C9HM]*y_cur[IDX_MgII] - - k[4642]*y_cur[IDX_CHM]*y_cur[IDX_MgII] - - k[4677]*y_cur[IDX_CNM]*y_cur[IDX_MgII] - - k[4713]*y_cur[IDX_HM]*y_cur[IDX_MgII] - - k[4748]*y_cur[IDX_OM]*y_cur[IDX_MgII] - - k[4783]*y_cur[IDX_O2M]*y_cur[IDX_MgII] - - k[4818]*y_cur[IDX_OHM]*y_cur[IDX_MgII] - - k[4853]*y_cur[IDX_SM]*y_cur[IDX_MgII] - - k[5620]*y_cur[IDX_MgII]*y_cur[IDX_eM] + k[5877]*y_cur[IDX_MgI] + - k[6210]*y_cur[IDX_MgI] + k[6306]*y_cur[IDX_MgI] - - k[6353]*y_cur[IDX_MgII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NI] = 0.0 - k[5]*y_cur[IDX_CM]*y_cur[IDX_NI] - - k[77]*y_cur[IDX_HM]*y_cur[IDX_NI] - - k[110]*y_cur[IDX_NI]*y_cur[IDX_C2M] - - k[111]*y_cur[IDX_NI]*y_cur[IDX_C2HM] - - k[112]*y_cur[IDX_NI]*y_cur[IDX_C3M] - - k[113]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - - k[114]*y_cur[IDX_NI]*y_cur[IDX_C4M] - - k[115]*y_cur[IDX_NI]*y_cur[IDX_C4HM] - - k[116]*y_cur[IDX_NI]*y_cur[IDX_C5M] - - k[117]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - - k[118]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[4538]*y_cur[IDX_C8HM]*y_cur[IDX_NII] - + k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] - + k[4540]*y_cur[IDX_C8HM]*y_cur[IDX_NH3II] - + k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] - + k[4542]*y_cur[IDX_C8HM]*y_cur[IDX_NOII] - + k[4543]*y_cur[IDX_C8HM]*y_cur[IDX_NaII] - + k[4544]*y_cur[IDX_C8HM]*y_cur[IDX_OII] - + k[4545]*y_cur[IDX_C8HM]*y_cur[IDX_SII] - + k[4546]*y_cur[IDX_C8HM]*y_cur[IDX_SOII] - + k[4547]*y_cur[IDX_C8HM]*y_cur[IDX_SiII] - + k[4548]*y_cur[IDX_C8HM]*y_cur[IDX_SiOII] - + k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] - + k[4550]*y_cur[IDX_C8HM]*y_cur[IDX_SiSII] + + k[5604]*y_cur[IDX_C8HI]*y_cur[IDX_eM] - k[5763]*y_cur[IDX_C8HM] - + k[6054]*y_cur[IDX_C8HM]; + ydot[yistart + IDX_C7HM] = 0.0 - k[50]*y_cur[IDX_CI]*y_cur[IDX_C7HM] + - k[100]*y_cur[IDX_HI]*y_cur[IDX_C7HM] - k[119]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - - k[120]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3430]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - + k[3431]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - + k[3714]*y_cur[IDX_OI]*y_cur[IDX_C7HM] + + k[3718]*y_cur[IDX_OI]*y_cur[IDX_C8HM] - + k[4446]*y_cur[IDX_C7HM]*y_cur[IDX_CII] - + k[4447]*y_cur[IDX_C7HM]*y_cur[IDX_C2H2II] - + k[4448]*y_cur[IDX_C7HM]*y_cur[IDX_C2H3II] - + k[4449]*y_cur[IDX_C7HM]*y_cur[IDX_C4H2II] - + k[4450]*y_cur[IDX_C7HM]*y_cur[IDX_C4H3II] - + k[4451]*y_cur[IDX_C7HM]*y_cur[IDX_C4SII] - + k[4452]*y_cur[IDX_C7HM]*y_cur[IDX_CH2CCHII] - + k[4453]*y_cur[IDX_C7HM]*y_cur[IDX_CH3II] - + k[4454]*y_cur[IDX_C7HM]*y_cur[IDX_CNCII] - + k[4455]*y_cur[IDX_C7HM]*y_cur[IDX_FeII] - + k[4456]*y_cur[IDX_C7HM]*y_cur[IDX_HII] - + k[4457]*y_cur[IDX_C7HM]*y_cur[IDX_H2COII] - + k[4458]*y_cur[IDX_C7HM]*y_cur[IDX_H2SII] - + k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] - + k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] - + k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] - + k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] - + k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] - + k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] - + k[4465]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] - + k[4466]*y_cur[IDX_C7HM]*y_cur[IDX_HeII] - + k[4467]*y_cur[IDX_C7HM]*y_cur[IDX_MgII] - + k[4468]*y_cur[IDX_C7HM]*y_cur[IDX_NII] - + k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] - + k[4470]*y_cur[IDX_C7HM]*y_cur[IDX_NH3II] - + k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] - + k[4472]*y_cur[IDX_C7HM]*y_cur[IDX_NOII] - + k[4473]*y_cur[IDX_C7HM]*y_cur[IDX_NaII] - + k[4474]*y_cur[IDX_C7HM]*y_cur[IDX_OII] - + k[4475]*y_cur[IDX_C7HM]*y_cur[IDX_SII] - + k[4476]*y_cur[IDX_C7HM]*y_cur[IDX_SOII] - + k[4477]*y_cur[IDX_C7HM]*y_cur[IDX_SiII] - + k[4478]*y_cur[IDX_C7HM]*y_cur[IDX_SiOII] - + k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] - + k[4480]*y_cur[IDX_C7HM]*y_cur[IDX_SiSII] + + k[5602]*y_cur[IDX_C7HI]*y_cur[IDX_eM] - k[5757]*y_cur[IDX_C7HM] - + k[6044]*y_cur[IDX_C7HM]; + ydot[yistart + IDX_C9HM] = 0.0 - k[54]*y_cur[IDX_CI]*y_cur[IDX_C9HM] + - k[104]*y_cur[IDX_HI]*y_cur[IDX_C9HM] - k[121]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - - k[122]*y_cur[IDX_NI]*y_cur[IDX_OM] - - k[123]*y_cur[IDX_NI]*y_cur[IDX_SM] + - k[292]*y_cur[IDX_CHI]*y_cur[IDX_NII] + - k[542]*y_cur[IDX_NII]*y_cur[IDX_C2I] + - k[543]*y_cur[IDX_NII]*y_cur[IDX_C2HI] + - k[544]*y_cur[IDX_NII]*y_cur[IDX_CH2I] + - k[545]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[546]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[547]*y_cur[IDX_NII]*y_cur[IDX_CNI] + - k[548]*y_cur[IDX_NII]*y_cur[IDX_CO2I] + - k[549]*y_cur[IDX_NII]*y_cur[IDX_COI] + - k[550]*y_cur[IDX_NII]*y_cur[IDX_FeI] + - k[551]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + - k[552]*y_cur[IDX_NII]*y_cur[IDX_H2OI] + - k[553]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + - k[554]*y_cur[IDX_NII]*y_cur[IDX_HCNI] + - k[555]*y_cur[IDX_NII]*y_cur[IDX_HCOI] + - k[556]*y_cur[IDX_NII]*y_cur[IDX_MgI] + - k[557]*y_cur[IDX_NII]*y_cur[IDX_NH2I] + - k[558]*y_cur[IDX_NII]*y_cur[IDX_NH3I] + - k[559]*y_cur[IDX_NII]*y_cur[IDX_NHI] + - k[560]*y_cur[IDX_NII]*y_cur[IDX_NOI] + - k[561]*y_cur[IDX_NII]*y_cur[IDX_O2I] + - k[562]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + - k[563]*y_cur[IDX_NII]*y_cur[IDX_OHI] - - k[573]*y_cur[IDX_NI]*y_cur[IDX_N2II] + - k[780]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + - k[782]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] + - k[977]*y_cur[IDX_CNII]*y_cur[IDX_eM] + - k[978]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + - k[1133]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + - k[1150]*y_cur[IDX_N2II]*y_cur[IDX_eM] + - k[1150]*y_cur[IDX_N2II]*y_cur[IDX_eM] + - k[1153]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + - k[1154]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + - k[1158]*y_cur[IDX_NHII]*y_cur[IDX_eM] + - k[1159]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + - k[1168]*y_cur[IDX_NOII]*y_cur[IDX_eM] + - k[1171]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + - k[1172]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + - k[1172]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + - k[1173]*y_cur[IDX_NSII]*y_cur[IDX_eM] + - k[1176]*y_cur[IDX_OCNII]*y_cur[IDX_eM] + - k[1211]*y_cur[IDX_PNII]*y_cur[IDX_eM] + - k[1260]*y_cur[IDX_SiNII]*y_cur[IDX_eM] + - k[1421]*y_cur[IDX_CII]*y_cur[IDX_NSI] + - k[1446]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + - k[1910]*y_cur[IDX_CI]*y_cur[IDX_NHII] - - k[1961]*y_cur[IDX_CHII]*y_cur[IDX_NI] + - k[2011]*y_cur[IDX_CH2I]*y_cur[IDX_NHII] + - k[2258]*y_cur[IDX_CHI]*y_cur[IDX_NHII] + - k[2274]*y_cur[IDX_CNII]*y_cur[IDX_NOI] - - k[2392]*y_cur[IDX_H2II]*y_cur[IDX_NI] + - k[2461]*y_cur[IDX_H2I]*y_cur[IDX_NHII] + - k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + - k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + - k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + - k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + - k[3277]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + - k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + - k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + - k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] + - k[3329]*y_cur[IDX_HeII]*y_cur[IDX_SiNI] + - k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + - k[3352]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] + - k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - + k[3447]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - + k[3448]*y_cur[IDX_NI]*y_cur[IDX_C9HM] + + k[3681]*y_cur[IDX_OI]*y_cur[IDX_C10HM] - + k[3723]*y_cur[IDX_OI]*y_cur[IDX_C9HM] - + k[4586]*y_cur[IDX_C9HM]*y_cur[IDX_CII] - + k[4587]*y_cur[IDX_C9HM]*y_cur[IDX_C2H2II] - + k[4588]*y_cur[IDX_C9HM]*y_cur[IDX_C2H3II] - + k[4589]*y_cur[IDX_C9HM]*y_cur[IDX_C4H2II] - + k[4590]*y_cur[IDX_C9HM]*y_cur[IDX_C4H3II] - + k[4591]*y_cur[IDX_C9HM]*y_cur[IDX_C4SII] - + k[4592]*y_cur[IDX_C9HM]*y_cur[IDX_CH2CCHII] - + k[4593]*y_cur[IDX_C9HM]*y_cur[IDX_CH3II] - + k[4594]*y_cur[IDX_C9HM]*y_cur[IDX_CNCII] - + k[4595]*y_cur[IDX_C9HM]*y_cur[IDX_FeII] - + k[4596]*y_cur[IDX_C9HM]*y_cur[IDX_HII] - + k[4597]*y_cur[IDX_C9HM]*y_cur[IDX_H2COII] - + k[4598]*y_cur[IDX_C9HM]*y_cur[IDX_H2SII] - + k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] - + k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] - + k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] - + k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] - + k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] - + k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] - + k[4605]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] - + k[4606]*y_cur[IDX_C9HM]*y_cur[IDX_HeII] - + k[4607]*y_cur[IDX_C9HM]*y_cur[IDX_MgII] - + k[4608]*y_cur[IDX_C9HM]*y_cur[IDX_NII] - + k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] - + k[4610]*y_cur[IDX_C9HM]*y_cur[IDX_NH3II] - + k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] - + k[4612]*y_cur[IDX_C9HM]*y_cur[IDX_NOII] - + k[4613]*y_cur[IDX_C9HM]*y_cur[IDX_NaII] - + k[4614]*y_cur[IDX_C9HM]*y_cur[IDX_OII] - + k[4615]*y_cur[IDX_C9HM]*y_cur[IDX_SII] - + k[4616]*y_cur[IDX_C9HM]*y_cur[IDX_SOII] - + k[4617]*y_cur[IDX_C9HM]*y_cur[IDX_SiII] - + k[4618]*y_cur[IDX_C9HM]*y_cur[IDX_SiOII] - + k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] - + k[4620]*y_cur[IDX_C9HM]*y_cur[IDX_SiSII] + + k[5606]*y_cur[IDX_C9HI]*y_cur[IDX_eM] - k[5768]*y_cur[IDX_C9HM] - + k[6062]*y_cur[IDX_C9HM]; + ydot[yistart + IDX_C10M] = 0.0 - k[37]*y_cur[IDX_CI]*y_cur[IDX_C10M] + - k[85]*y_cur[IDX_HI]*y_cur[IDX_C10M] - k[3377]*y_cur[IDX_NI]*y_cur[IDX_C10M] - k[3378]*y_cur[IDX_NI]*y_cur[IDX_C10M] - k[3379]*y_cur[IDX_NI]*y_cur[IDX_C10M] - k[3380]*y_cur[IDX_NI]*y_cur[IDX_C10M] - - k[3381]*y_cur[IDX_NI]*y_cur[IDX_C10HM] - - k[3382]*y_cur[IDX_NI]*y_cur[IDX_C10HM] - - k[3383]*y_cur[IDX_NI]*y_cur[IDX_C2II] - - k[3384]*y_cur[IDX_NI]*y_cur[IDX_C2M] - - k[3385]*y_cur[IDX_NI]*y_cur[IDX_C2HII] - - k[3386]*y_cur[IDX_NI]*y_cur[IDX_C2HII] - - k[3387]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - - k[3388]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - - k[3389]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - - k[3390]*y_cur[IDX_NI]*y_cur[IDX_C2H3II] - - k[3391]*y_cur[IDX_NI]*y_cur[IDX_C2H4II] - - k[3392]*y_cur[IDX_NI]*y_cur[IDX_C3M] - - k[3393]*y_cur[IDX_NI]*y_cur[IDX_C3M] - - k[3394]*y_cur[IDX_NI]*y_cur[IDX_C3HII] - - k[3395]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - - k[3396]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - - k[3397]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] - - k[3398]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] - - k[3399]*y_cur[IDX_NI]*y_cur[IDX_C3H4II] - - k[3400]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] - - k[3401]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] - - k[3402]*y_cur[IDX_NI]*y_cur[IDX_C4M] - - k[3403]*y_cur[IDX_NI]*y_cur[IDX_C4M] - - k[3404]*y_cur[IDX_NI]*y_cur[IDX_C4HM] - - k[3405]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - - k[3406]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - - k[3407]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - - k[3408]*y_cur[IDX_NI]*y_cur[IDX_C4H5II] - - k[3409]*y_cur[IDX_NI]*y_cur[IDX_C5M] - - k[3410]*y_cur[IDX_NI]*y_cur[IDX_C5M] - - k[3411]*y_cur[IDX_NI]*y_cur[IDX_C5M] - - k[3412]*y_cur[IDX_NI]*y_cur[IDX_C5HII] - + k[3678]*y_cur[IDX_OI]*y_cur[IDX_C10M] - + k[3921]*y_cur[IDX_C10M]*y_cur[IDX_CII] - + k[3922]*y_cur[IDX_C10M]*y_cur[IDX_C2H2II] - + k[3923]*y_cur[IDX_C10M]*y_cur[IDX_C2H3II] - + k[3924]*y_cur[IDX_C10M]*y_cur[IDX_C4H2II] - + k[3925]*y_cur[IDX_C10M]*y_cur[IDX_C4H3II] - + k[3926]*y_cur[IDX_C10M]*y_cur[IDX_C4SII] - + k[3927]*y_cur[IDX_C10M]*y_cur[IDX_CH2CCHII] - + k[3928]*y_cur[IDX_C10M]*y_cur[IDX_CH3II] - + k[3929]*y_cur[IDX_C10M]*y_cur[IDX_CNCII] - + k[3930]*y_cur[IDX_C10M]*y_cur[IDX_FeII] - + k[3931]*y_cur[IDX_C10M]*y_cur[IDX_HII] - + k[3932]*y_cur[IDX_C10M]*y_cur[IDX_H2COII] - + k[3933]*y_cur[IDX_C10M]*y_cur[IDX_H2SII] - + k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] - + k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] - + k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] - + k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] - + k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] - + k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] - + k[3940]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] - + k[3941]*y_cur[IDX_C10M]*y_cur[IDX_HeII] - + k[3942]*y_cur[IDX_C10M]*y_cur[IDX_MgII] - + k[3943]*y_cur[IDX_C10M]*y_cur[IDX_NII] - + k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] - + k[3945]*y_cur[IDX_C10M]*y_cur[IDX_NH3II] - + k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] - + k[3947]*y_cur[IDX_C10M]*y_cur[IDX_NOII] - + k[3948]*y_cur[IDX_C10M]*y_cur[IDX_NaII] - + k[3949]*y_cur[IDX_C10M]*y_cur[IDX_OII] - + k[3950]*y_cur[IDX_C10M]*y_cur[IDX_SII] - + k[3951]*y_cur[IDX_C10M]*y_cur[IDX_SOII] - + k[3952]*y_cur[IDX_C10M]*y_cur[IDX_SiII] - + k[3953]*y_cur[IDX_C10M]*y_cur[IDX_SiOII] - + k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] - + k[3955]*y_cur[IDX_C10M]*y_cur[IDX_SiSII] + + k[5587]*y_cur[IDX_C10I]*y_cur[IDX_eM] - k[5687]*y_cur[IDX_C10M] - + k[5949]*y_cur[IDX_C10M]; + ydot[yistart + IDX_C5HM] = 0.0 - k[46]*y_cur[IDX_CI]*y_cur[IDX_C5HM] + - k[95]*y_cur[IDX_HI]*y_cur[IDX_C5HM] - + k[117]*y_cur[IDX_NI]*y_cur[IDX_C5HM] + + k[1847]*y_cur[IDX_CI]*y_cur[IDX_C10HM] - k[3413]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - k[3414]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - - k[3415]*y_cur[IDX_NI]*y_cur[IDX_C5H2II] - - k[3416]*y_cur[IDX_NI]*y_cur[IDX_C5H3II] - - k[3417]*y_cur[IDX_NI]*y_cur[IDX_C5H5II] - - k[3418]*y_cur[IDX_NI]*y_cur[IDX_C6M] - - k[3419]*y_cur[IDX_NI]*y_cur[IDX_C6M] - - k[3420]*y_cur[IDX_NI]*y_cur[IDX_C6M] - - k[3421]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - - k[3422]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - - k[3423]*y_cur[IDX_NI]*y_cur[IDX_C6H2II] - - k[3424]*y_cur[IDX_NI]*y_cur[IDX_C6H5II] - - k[3425]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3426]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3427]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3428]*y_cur[IDX_NI]*y_cur[IDX_C7M] - - k[3429]*y_cur[IDX_NI]*y_cur[IDX_C7HII] - - k[3430]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - - k[3431]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - - k[3432]*y_cur[IDX_NI]*y_cur[IDX_C7H2II] - - k[3433]*y_cur[IDX_NI]*y_cur[IDX_C7H3II] - - k[3434]*y_cur[IDX_NI]*y_cur[IDX_C7H4II] - - k[3435]*y_cur[IDX_NI]*y_cur[IDX_C7H5II] - - k[3436]*y_cur[IDX_NI]*y_cur[IDX_C8M] - - k[3437]*y_cur[IDX_NI]*y_cur[IDX_C8M] - - k[3438]*y_cur[IDX_NI]*y_cur[IDX_C8M] - - k[3439]*y_cur[IDX_NI]*y_cur[IDX_C8M] - - k[3440]*y_cur[IDX_NI]*y_cur[IDX_C8HM] - - k[3441]*y_cur[IDX_NI]*y_cur[IDX_C8HM] - - k[3442]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3705]*y_cur[IDX_OI]*y_cur[IDX_C5HM] + + k[3709]*y_cur[IDX_OI]*y_cur[IDX_C6HM] - + k[4271]*y_cur[IDX_C5HM]*y_cur[IDX_CII] - + k[4272]*y_cur[IDX_C5HM]*y_cur[IDX_C2H2II] - + k[4273]*y_cur[IDX_C5HM]*y_cur[IDX_C2H3II] - + k[4274]*y_cur[IDX_C5HM]*y_cur[IDX_C4H2II] - + k[4275]*y_cur[IDX_C5HM]*y_cur[IDX_C4H3II] - + k[4276]*y_cur[IDX_C5HM]*y_cur[IDX_C4SII] - + k[4277]*y_cur[IDX_C5HM]*y_cur[IDX_CH2CCHII] - + k[4278]*y_cur[IDX_C5HM]*y_cur[IDX_CH3II] - + k[4279]*y_cur[IDX_C5HM]*y_cur[IDX_CNCII] - + k[4280]*y_cur[IDX_C5HM]*y_cur[IDX_FeII] - + k[4281]*y_cur[IDX_C5HM]*y_cur[IDX_HII] - + k[4282]*y_cur[IDX_C5HM]*y_cur[IDX_H2COII] - + k[4283]*y_cur[IDX_C5HM]*y_cur[IDX_H2SII] - + k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] - + k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] - + k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] - + k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] - + k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] - + k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] - + k[4290]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] - + k[4291]*y_cur[IDX_C5HM]*y_cur[IDX_HeII] - + k[4292]*y_cur[IDX_C5HM]*y_cur[IDX_MgII] - + k[4293]*y_cur[IDX_C5HM]*y_cur[IDX_NII] - + k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] - + k[4295]*y_cur[IDX_C5HM]*y_cur[IDX_NH3II] - + k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] - + k[4297]*y_cur[IDX_C5HM]*y_cur[IDX_NOII] - + k[4298]*y_cur[IDX_C5HM]*y_cur[IDX_NaII] - + k[4299]*y_cur[IDX_C5HM]*y_cur[IDX_OII] - + k[4300]*y_cur[IDX_C5HM]*y_cur[IDX_SII] - + k[4301]*y_cur[IDX_C5HM]*y_cur[IDX_SOII] - + k[4302]*y_cur[IDX_C5HM]*y_cur[IDX_SiII] - + k[4303]*y_cur[IDX_C5HM]*y_cur[IDX_SiOII] - + k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] - + k[4305]*y_cur[IDX_C5HM]*y_cur[IDX_SiSII] + + k[5597]*y_cur[IDX_C5HI]*y_cur[IDX_eM] - k[5739]*y_cur[IDX_C5HM] - + k[6024]*y_cur[IDX_C5HM]; + ydot[yistart + IDX_C5NM] = 0.0 - k[96]*y_cur[IDX_HI]*y_cur[IDX_C5NM] + - k[131]*y_cur[IDX_OI]*y_cur[IDX_C5NM] + + k[3378]*y_cur[IDX_NI]*y_cur[IDX_C10M] + + k[3426]*y_cur[IDX_NI]*y_cur[IDX_C7M] + + k[3437]*y_cur[IDX_NI]*y_cur[IDX_C8M] + k[3443]*y_cur[IDX_NI]*y_cur[IDX_C9M] - - k[3444]*y_cur[IDX_NI]*y_cur[IDX_C9M] - - k[3445]*y_cur[IDX_NI]*y_cur[IDX_C9M] - - k[3446]*y_cur[IDX_NI]*y_cur[IDX_C9HII] - - k[3447]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - - k[3448]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - - k[3449]*y_cur[IDX_NI]*y_cur[IDX_C9H2II] - - k[3450]*y_cur[IDX_NI]*y_cur[IDX_C9H3II] - - k[3451]*y_cur[IDX_NI]*y_cur[IDX_C9H4II] - - k[3452]*y_cur[IDX_NI]*y_cur[IDX_CH2II] - - k[3453]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHII] - - k[3454]*y_cur[IDX_NI]*y_cur[IDX_CH3II] - - k[3455]*y_cur[IDX_NI]*y_cur[IDX_CH3C4HII] - - k[3456]*y_cur[IDX_NI]*y_cur[IDX_CNII] - - k[3457]*y_cur[IDX_NI]*y_cur[IDX_H2OII] - - k[3458]*y_cur[IDX_NI]*y_cur[IDX_H2OII] - - k[3459]*y_cur[IDX_NI]*y_cur[IDX_H2SII] - - k[3460]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - - k[3461]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - - k[3462]*y_cur[IDX_NI]*y_cur[IDX_HSII] - - k[3463]*y_cur[IDX_NI]*y_cur[IDX_NHII] - - k[3464]*y_cur[IDX_NI]*y_cur[IDX_NH2II] - - k[3465]*y_cur[IDX_NI]*y_cur[IDX_O2II] - - k[3466]*y_cur[IDX_NI]*y_cur[IDX_O2HII] - - k[3467]*y_cur[IDX_NI]*y_cur[IDX_OHII] - - k[3468]*y_cur[IDX_NI]*y_cur[IDX_SOII] - - k[3469]*y_cur[IDX_NI]*y_cur[IDX_SiCII] - - k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] - - k[3471]*y_cur[IDX_NI]*y_cur[IDX_SiHII] - - k[3472]*y_cur[IDX_NI]*y_cur[IDX_SiH2II] - - k[3473]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - - k[3474]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - - k[3475]*y_cur[IDX_NI]*y_cur[IDX_SiOII] - - k[3476]*y_cur[IDX_NI]*y_cur[IDX_SiOII] + - k[3477]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + - k[3480]*y_cur[IDX_NHII]*y_cur[IDX_C2HI] + - k[3481]*y_cur[IDX_NHII]*y_cur[IDX_CNI] + - k[3482]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] + - k[3485]*y_cur[IDX_NHII]*y_cur[IDX_COI] + - k[3487]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + - k[3489]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + - k[3493]*y_cur[IDX_NHII]*y_cur[IDX_HCNI] + - k[3494]*y_cur[IDX_NHII]*y_cur[IDX_HCOI] + - k[3495]*y_cur[IDX_NHII]*y_cur[IDX_HNCI] + - k[3496]*y_cur[IDX_NHII]*y_cur[IDX_N2I] + - k[3497]*y_cur[IDX_NHII]*y_cur[IDX_NH2I] + - k[3498]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + - k[3499]*y_cur[IDX_NHII]*y_cur[IDX_NHI] + - k[3502]*y_cur[IDX_NHII]*y_cur[IDX_O2I] + - k[3503]*y_cur[IDX_NHII]*y_cur[IDX_OI] + - k[3504]*y_cur[IDX_NHII]*y_cur[IDX_OHI] + - k[3505]*y_cur[IDX_NHII]*y_cur[IDX_SI] + - k[3509]*y_cur[IDX_NH2II]*y_cur[IDX_CNI] + - k[3605]*y_cur[IDX_NHI]*y_cur[IDX_C2II] + - k[3610]*y_cur[IDX_NHI]*y_cur[IDX_COII] + - k[3611]*y_cur[IDX_NHI]*y_cur[IDX_H2COII] + - k[3612]*y_cur[IDX_NHI]*y_cur[IDX_H2OII] + - k[3617]*y_cur[IDX_NHI]*y_cur[IDX_NH2II] + - k[3618]*y_cur[IDX_NHI]*y_cur[IDX_NH3II] + - k[3644]*y_cur[IDX_OII]*y_cur[IDX_HCNI] + - k[3647]*y_cur[IDX_OII]*y_cur[IDX_N2I] + - k[3744]*y_cur[IDX_OI]*y_cur[IDX_N2II] + - k[3752]*y_cur[IDX_OI]*y_cur[IDX_PNII] + - k[3761]*y_cur[IDX_OI]*y_cur[IDX_SiNII] + - k[3908]*y_cur[IDX_CM]*y_cur[IDX_NII] + - k[3943]*y_cur[IDX_C10M]*y_cur[IDX_NII] + - k[3978]*y_cur[IDX_C10HM]*y_cur[IDX_NII] + - k[4013]*y_cur[IDX_C2M]*y_cur[IDX_NII] + - k[4048]*y_cur[IDX_C2HM]*y_cur[IDX_NII] + - k[4083]*y_cur[IDX_C3M]*y_cur[IDX_NII] + - k[4118]*y_cur[IDX_C3HM]*y_cur[IDX_NII] + - k[4153]*y_cur[IDX_C3NM]*y_cur[IDX_NII] + - k[4188]*y_cur[IDX_C4M]*y_cur[IDX_NII] + - k[4223]*y_cur[IDX_C4HM]*y_cur[IDX_NII] + - k[4258]*y_cur[IDX_C5M]*y_cur[IDX_NII] + - k[4293]*y_cur[IDX_C5HM]*y_cur[IDX_NII] + - k[4328]*y_cur[IDX_C5NM]*y_cur[IDX_NII] + - k[4363]*y_cur[IDX_C6M]*y_cur[IDX_NII] + - k[4398]*y_cur[IDX_C6HM]*y_cur[IDX_NII] + - k[4433]*y_cur[IDX_C7M]*y_cur[IDX_NII] + - k[4468]*y_cur[IDX_C7HM]*y_cur[IDX_NII] + - k[4503]*y_cur[IDX_C8M]*y_cur[IDX_NII] + - k[4538]*y_cur[IDX_C8HM]*y_cur[IDX_NII] + - k[4573]*y_cur[IDX_C9M]*y_cur[IDX_NII] + - k[4608]*y_cur[IDX_C9HM]*y_cur[IDX_NII] + - k[4643]*y_cur[IDX_CHM]*y_cur[IDX_NII] + - k[4678]*y_cur[IDX_CNM]*y_cur[IDX_NII] + - k[4714]*y_cur[IDX_HM]*y_cur[IDX_NII] + - k[4749]*y_cur[IDX_OM]*y_cur[IDX_NII] + - k[4784]*y_cur[IDX_O2M]*y_cur[IDX_NII] + - k[4819]*y_cur[IDX_OHM]*y_cur[IDX_NII] + - k[4854]*y_cur[IDX_SM]*y_cur[IDX_NII] + - k[4956]*y_cur[IDX_CI]*y_cur[IDX_CNI] + - k[4967]*y_cur[IDX_CI]*y_cur[IDX_N2I] + - k[4973]*y_cur[IDX_CI]*y_cur[IDX_NHI] + - k[4975]*y_cur[IDX_CI]*y_cur[IDX_NOI] + - k[4976]*y_cur[IDX_CI]*y_cur[IDX_NSI] + - k[5003]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + - k[5079]*y_cur[IDX_CHI]*y_cur[IDX_N2I] - - k[5080]*y_cur[IDX_CHI]*y_cur[IDX_NI] - - k[5081]*y_cur[IDX_CHI]*y_cur[IDX_NI] + - k[5084]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + - k[5122]*y_cur[IDX_CNI]*y_cur[IDX_NOI] - - k[5141]*y_cur[IDX_H2I]*y_cur[IDX_NI] + - k[5184]*y_cur[IDX_HI]*y_cur[IDX_NHI] + - k[5187]*y_cur[IDX_HI]*y_cur[IDX_NOI] + - k[5188]*y_cur[IDX_HI]*y_cur[IDX_NSI] - - k[5221]*y_cur[IDX_NI]*y_cur[IDX_C10I] - - k[5222]*y_cur[IDX_NI]*y_cur[IDX_C2I] - - k[5223]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - - k[5224]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - - k[5225]*y_cur[IDX_NI]*y_cur[IDX_C2H4I] - - k[5226]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - - k[5227]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - - k[5228]*y_cur[IDX_NI]*y_cur[IDX_C2HI] - - k[5229]*y_cur[IDX_NI]*y_cur[IDX_C2NI] - - k[5230]*y_cur[IDX_NI]*y_cur[IDX_C2OI] - - k[5231]*y_cur[IDX_NI]*y_cur[IDX_C3I] - - k[5232]*y_cur[IDX_NI]*y_cur[IDX_C3H2I] - - k[5233]*y_cur[IDX_NI]*y_cur[IDX_C3HI] - - k[5234]*y_cur[IDX_NI]*y_cur[IDX_C3NI] - - k[5235]*y_cur[IDX_NI]*y_cur[IDX_C4I] - - k[5236]*y_cur[IDX_NI]*y_cur[IDX_C4HI] - - k[5237]*y_cur[IDX_NI]*y_cur[IDX_C4NI] - - k[5238]*y_cur[IDX_NI]*y_cur[IDX_C5I] - - k[5239]*y_cur[IDX_NI]*y_cur[IDX_C5H2I] - - k[5240]*y_cur[IDX_NI]*y_cur[IDX_C5HI] - - k[5241]*y_cur[IDX_NI]*y_cur[IDX_C5NI] - - k[5242]*y_cur[IDX_NI]*y_cur[IDX_C6I] - - k[5243]*y_cur[IDX_NI]*y_cur[IDX_C6HI] - - k[5244]*y_cur[IDX_NI]*y_cur[IDX_C7I] - - k[5245]*y_cur[IDX_NI]*y_cur[IDX_C7H2I] - - k[5246]*y_cur[IDX_NI]*y_cur[IDX_C7HI] - - k[5247]*y_cur[IDX_NI]*y_cur[IDX_C7NI] - - k[5248]*y_cur[IDX_NI]*y_cur[IDX_C8I] - - k[5249]*y_cur[IDX_NI]*y_cur[IDX_C8HI] - - k[5250]*y_cur[IDX_NI]*y_cur[IDX_C9I] - - k[5251]*y_cur[IDX_NI]*y_cur[IDX_C9HI] - - k[5252]*y_cur[IDX_NI]*y_cur[IDX_C9NI] - - k[5253]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - - k[5254]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - - k[5255]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - - k[5256]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHI] - - k[5257]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - - k[5258]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - - k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - - k[5260]*y_cur[IDX_NI]*y_cur[IDX_CNI] - - k[5261]*y_cur[IDX_NI]*y_cur[IDX_CNI] - - k[5262]*y_cur[IDX_NI]*y_cur[IDX_CO2I] - - k[5263]*y_cur[IDX_NI]*y_cur[IDX_CSI] - - k[5264]*y_cur[IDX_NI]*y_cur[IDX_H2CNI] - - k[5265]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - - k[5266]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - - k[5267]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - - k[5268]*y_cur[IDX_NI]*y_cur[IDX_HCSI] - - k[5269]*y_cur[IDX_NI]*y_cur[IDX_HNOI] - - k[5270]*y_cur[IDX_NI]*y_cur[IDX_HNOI] - + k[4306]*y_cur[IDX_C5NM]*y_cur[IDX_CII] - + k[4307]*y_cur[IDX_C5NM]*y_cur[IDX_C2H2II] - + k[4308]*y_cur[IDX_C5NM]*y_cur[IDX_C2H3II] - + k[4309]*y_cur[IDX_C5NM]*y_cur[IDX_C4H2II] - + k[4310]*y_cur[IDX_C5NM]*y_cur[IDX_C4H3II] - + k[4311]*y_cur[IDX_C5NM]*y_cur[IDX_C4SII] - + k[4312]*y_cur[IDX_C5NM]*y_cur[IDX_CH2CCHII] - + k[4313]*y_cur[IDX_C5NM]*y_cur[IDX_CH3II] - + k[4314]*y_cur[IDX_C5NM]*y_cur[IDX_CNCII] - + k[4315]*y_cur[IDX_C5NM]*y_cur[IDX_FeII] - + k[4316]*y_cur[IDX_C5NM]*y_cur[IDX_HII] - + k[4317]*y_cur[IDX_C5NM]*y_cur[IDX_H2COII] - + k[4318]*y_cur[IDX_C5NM]*y_cur[IDX_H2SII] - + k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] - + k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] - + k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] - + k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] - + k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] - + k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] - + k[4325]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] - + k[4326]*y_cur[IDX_C5NM]*y_cur[IDX_HeII] - + k[4327]*y_cur[IDX_C5NM]*y_cur[IDX_MgII] - + k[4328]*y_cur[IDX_C5NM]*y_cur[IDX_NII] - + k[4329]*y_cur[IDX_C5NM]*y_cur[IDX_N2HII] - + k[4330]*y_cur[IDX_C5NM]*y_cur[IDX_NH3II] - + k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] - + k[4332]*y_cur[IDX_C5NM]*y_cur[IDX_NOII] - + k[4333]*y_cur[IDX_C5NM]*y_cur[IDX_NaII] - + k[4334]*y_cur[IDX_C5NM]*y_cur[IDX_OII] - + k[4335]*y_cur[IDX_C5NM]*y_cur[IDX_SII] - + k[4336]*y_cur[IDX_C5NM]*y_cur[IDX_SOII] - + k[4337]*y_cur[IDX_C5NM]*y_cur[IDX_SiII] - + k[4338]*y_cur[IDX_C5NM]*y_cur[IDX_SiOII] - + k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] - + k[4340]*y_cur[IDX_C5NM]*y_cur[IDX_SiSII] + + k[5598]*y_cur[IDX_C5NI]*y_cur[IDX_eM] - k[5745]*y_cur[IDX_C5NM] - + k[6030]*y_cur[IDX_C5NM]; + ydot[yistart + IDX_HSI] = 0.0 + k[109]*y_cur[IDX_HI]*y_cur[IDX_SM] - + k[397]*y_cur[IDX_HII]*y_cur[IDX_HSI] + + k[505]*y_cur[IDX_HSII]*y_cur[IDX_FeI] + + k[534]*y_cur[IDX_MgI]*y_cur[IDX_HSII] + + k[609]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] + + k[627]*y_cur[IDX_NOI]*y_cur[IDX_HSII] + + k[638]*y_cur[IDX_NaI]*y_cur[IDX_HSII] + + k[710]*y_cur[IDX_SI]*y_cur[IDX_HSII] + + k[720]*y_cur[IDX_SiI]*y_cur[IDX_HSII] + + k[1019]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + + k[1022]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + + k[1022]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + + k[1046]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1047]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1139]*y_cur[IDX_HS2II]*y_cur[IDX_eM] + + k[1147]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] - + k[1415]*y_cur[IDX_CII]*y_cur[IDX_HSI] + + k[1519]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + + k[1715]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - + k[2084]*y_cur[IDX_CH3II]*y_cur[IDX_HSI] + + k[2281]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - + k[2353]*y_cur[IDX_HII]*y_cur[IDX_HSI] + + k[2501]*y_cur[IDX_H2COI]*y_cur[IDX_SII] + + k[2511]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + + k[2544]*y_cur[IDX_H2OI]*y_cur[IDX_H2SII] + + k[2574]*y_cur[IDX_H2SII]*y_cur[IDX_H2SI] + + k[2581]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] - + k[2716]*y_cur[IDX_H3II]*y_cur[IDX_HSI] + + k[2849]*y_cur[IDX_HI]*y_cur[IDX_SiSII] - + k[2977]*y_cur[IDX_HCOII]*y_cur[IDX_HSI] + + k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + + k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - + k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] + + k[3348]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + + k[3517]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + + k[3551]*y_cur[IDX_NH3II]*y_cur[IDX_H2SI] + + k[3576]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] + + k[3823]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + + k[3830]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + + k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - + k[4965]*y_cur[IDX_CI]*y_cur[IDX_HSI] - + k[4966]*y_cur[IDX_CI]*y_cur[IDX_HSI] + + k[5032]*y_cur[IDX_CH3I]*y_cur[IDX_H2SI] + + k[5062]*y_cur[IDX_CH4I]*y_cur[IDX_SI] + + k[5101]*y_cur[IDX_CHI]*y_cur[IDX_SI] + + k[5102]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - + k[5140]*y_cur[IDX_H2I]*y_cur[IDX_HSI] + + k[5149]*y_cur[IDX_H2I]*y_cur[IDX_SI] + + k[5169]*y_cur[IDX_HI]*y_cur[IDX_H2SI] - + k[5178]*y_cur[IDX_HI]*y_cur[IDX_HSI] + + k[5188]*y_cur[IDX_HI]*y_cur[IDX_NSI] + + k[5197]*y_cur[IDX_HI]*y_cur[IDX_OCSI] + + k[5199]*y_cur[IDX_HI]*y_cur[IDX_S2I] + + k[5200]*y_cur[IDX_HI]*y_cur[IDX_SOI] - + k[5219]*y_cur[IDX_HSI]*y_cur[IDX_HSI] - + k[5219]*y_cur[IDX_HSI]*y_cur[IDX_HSI] - k[5271]*y_cur[IDX_NI]*y_cur[IDX_HSI] - - k[5272]*y_cur[IDX_NI]*y_cur[IDX_HSI] - - k[5273]*y_cur[IDX_NI]*y_cur[IDX_NCCNI] - - k[5274]*y_cur[IDX_NI]*y_cur[IDX_NHI] - - k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5276]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5277]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5278]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5279]*y_cur[IDX_NI]*y_cur[IDX_NOI] - - k[5280]*y_cur[IDX_NI]*y_cur[IDX_NSI] - - k[5281]*y_cur[IDX_NI]*y_cur[IDX_O2I] - - k[5282]*y_cur[IDX_NI]*y_cur[IDX_O2HI] - - k[5283]*y_cur[IDX_NI]*y_cur[IDX_OHI] - - k[5284]*y_cur[IDX_NI]*y_cur[IDX_OHI] - - k[5285]*y_cur[IDX_NI]*y_cur[IDX_PHI] - - k[5286]*y_cur[IDX_NI]*y_cur[IDX_PNI] - - k[5287]*y_cur[IDX_NI]*y_cur[IDX_POI] - - k[5288]*y_cur[IDX_NI]*y_cur[IDX_POI] - - k[5289]*y_cur[IDX_NI]*y_cur[IDX_S2I] - - k[5290]*y_cur[IDX_NI]*y_cur[IDX_SOI] - - k[5291]*y_cur[IDX_NI]*y_cur[IDX_SOI] - - k[5292]*y_cur[IDX_NI]*y_cur[IDX_SiCI] - - k[5293]*y_cur[IDX_NI]*y_cur[IDX_SiCI] - - k[5294]*y_cur[IDX_NI]*y_cur[IDX_SiH2I] - - k[5295]*y_cur[IDX_NI]*y_cur[IDX_SiH3I] - - k[5296]*y_cur[IDX_NI]*y_cur[IDX_SiHI] + - k[5305]*y_cur[IDX_NHI]*y_cur[IDX_CNI] + - k[5310]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + - k[5320]*y_cur[IDX_NHI]*y_cur[IDX_OI] + - k[5321]*y_cur[IDX_NHI]*y_cur[IDX_OHI] + + k[5272]*y_cur[IDX_NI]*y_cur[IDX_HSI] + k[5324]*y_cur[IDX_NHI]*y_cur[IDX_SI] + - k[5334]*y_cur[IDX_NOI]*y_cur[IDX_SI] + - k[5386]*y_cur[IDX_OI]*y_cur[IDX_CNI] + - k[5387]*y_cur[IDX_OI]*y_cur[IDX_CNI] + - k[5417]*y_cur[IDX_OI]*y_cur[IDX_N2I] + - k[5424]*y_cur[IDX_OI]*y_cur[IDX_NOI] + - k[5426]*y_cur[IDX_OI]*y_cur[IDX_NSI] + - k[5451]*y_cur[IDX_OI]*y_cur[IDX_SiNI] + - k[5493]*y_cur[IDX_SiI]*y_cur[IDX_NOI] - - k[5504]*y_cur[IDX_CII]*y_cur[IDX_NI] - - k[5524]*y_cur[IDX_CI]*y_cur[IDX_NI] - - k[5581]*y_cur[IDX_NII]*y_cur[IDX_NI] + - k[5621]*y_cur[IDX_NII]*y_cur[IDX_eM] - k[5684]*y_cur[IDX_NI] + - k[5710]*y_cur[IDX_C2NI] + k[5823]*y_cur[IDX_CNI] + - k[5878]*y_cur[IDX_N2I] + k[5878]*y_cur[IDX_N2I] + - k[5879]*y_cur[IDX_N2OI] - k[5880]*y_cur[IDX_NI] + - k[5888]*y_cur[IDX_NHI] + k[5892]*y_cur[IDX_NOI] + - k[5893]*y_cur[IDX_NSI] + k[5909]*y_cur[IDX_PNI] + - k[5931]*y_cur[IDX_SiNI] + k[5995]*y_cur[IDX_C2NI] + - k[6019]*y_cur[IDX_C4NI] + k[6134]*y_cur[IDX_CNI] + - k[6211]*y_cur[IDX_N2I] + k[6211]*y_cur[IDX_N2I] + - k[6214]*y_cur[IDX_N2OI] + k[6217]*y_cur[IDX_NHII] + - k[6224]*y_cur[IDX_NHI] + k[6229]*y_cur[IDX_NOI] + - k[6230]*y_cur[IDX_NSI] + k[6250]*y_cur[IDX_PNI] + - k[6281]*y_cur[IDX_SiNI] - k[6300]*y_cur[IDX_NI] + - k[6319]*y_cur[IDX_NII]*y_cur[IDX_GRAINM] + - k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM] + - k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + - k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM] + - k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM] + - k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM] + - k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + - k[6407]*y_cur[IDX_NOII]*y_cur[IDX_GRAINM] + - k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + - k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + - k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM] + - k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM] + - k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + - k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + - k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + - k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM] + - k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + - k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM] + - k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] - k[6894]*y_cur[IDX_NI] - + k[7076]*y_cur[IDX_GNI] + k[7258]*y_cur[IDX_GNI] + - k[7440]*y_cur[IDX_GNI]; - ydot[yistart + IDX_NII] = 0.0 - k[292]*y_cur[IDX_CHI]*y_cur[IDX_NII] - - k[542]*y_cur[IDX_NII]*y_cur[IDX_C2I] - - k[543]*y_cur[IDX_NII]*y_cur[IDX_C2HI] - - k[544]*y_cur[IDX_NII]*y_cur[IDX_CH2I] - + k[5400]*y_cur[IDX_OI]*y_cur[IDX_H2SI] + + k[5408]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - + k[5415]*y_cur[IDX_OI]*y_cur[IDX_HSI] - + k[5416]*y_cur[IDX_OI]*y_cur[IDX_HSI] + + k[5462]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + + k[5468]*y_cur[IDX_OHI]*y_cur[IDX_H2SI] + + k[5487]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - + k[5488]*y_cur[IDX_SI]*y_cur[IDX_HSI] + k[5840]*y_cur[IDX_H2S2I] + + k[5840]*y_cur[IDX_H2S2I] + k[5874]*y_cur[IDX_HS2I] - + k[5875]*y_cur[IDX_HSI] + k[6162]*y_cur[IDX_H2S2I] + + k[6162]*y_cur[IDX_H2S2I] + k[6164]*y_cur[IDX_H2SI] + + k[6208]*y_cur[IDX_HS2I] - k[6209]*y_cur[IDX_HSI] + + k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + + k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + + k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + + k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + + k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] - k[6938]*y_cur[IDX_HSI] + + k[7120]*y_cur[IDX_GHSI] + k[7302]*y_cur[IDX_GHSI] + + k[7484]*y_cur[IDX_GHSI] + k[8607]*y_cur[IDX_GHI]*y_cur[IDX_GSI]; + ydot[yistart + IDX_CM] = 0.0 - k[0]*y_cur[IDX_CM]*y_cur[IDX_CI] - + k[1]*y_cur[IDX_CM]*y_cur[IDX_CH2I] - + k[2]*y_cur[IDX_CM]*y_cur[IDX_CHI] - + k[3]*y_cur[IDX_CM]*y_cur[IDX_CO2I] - + k[4]*y_cur[IDX_CM]*y_cur[IDX_H2OI] - + k[5]*y_cur[IDX_CM]*y_cur[IDX_NI] - k[6]*y_cur[IDX_CM]*y_cur[IDX_NHI] + - k[7]*y_cur[IDX_CM]*y_cur[IDX_O2I] - + k[8]*y_cur[IDX_CM]*y_cur[IDX_OI] - k[9]*y_cur[IDX_CM]*y_cur[IDX_OHI] + - k[82]*y_cur[IDX_H2I]*y_cur[IDX_CM] - + k[84]*y_cur[IDX_HI]*y_cur[IDX_CM] - + k[1449]*y_cur[IDX_CM]*y_cur[IDX_NOI] - + k[1450]*y_cur[IDX_CM]*y_cur[IDX_O2I] + + k[3685]*y_cur[IDX_OI]*y_cur[IDX_C2M] - + k[3886]*y_cur[IDX_CM]*y_cur[IDX_CII] - + k[3887]*y_cur[IDX_CM]*y_cur[IDX_C2H2II] - + k[3888]*y_cur[IDX_CM]*y_cur[IDX_C2H3II] - + k[3889]*y_cur[IDX_CM]*y_cur[IDX_C4H2II] - + k[3890]*y_cur[IDX_CM]*y_cur[IDX_C4H3II] - + k[3891]*y_cur[IDX_CM]*y_cur[IDX_C4SII] - + k[3892]*y_cur[IDX_CM]*y_cur[IDX_CH2CCHII] - + k[3893]*y_cur[IDX_CM]*y_cur[IDX_CH3II] - + k[3894]*y_cur[IDX_CM]*y_cur[IDX_CNCII] - + k[3895]*y_cur[IDX_CM]*y_cur[IDX_FeII] - + k[3896]*y_cur[IDX_CM]*y_cur[IDX_HII] - + k[3897]*y_cur[IDX_CM]*y_cur[IDX_H2COII] - + k[3898]*y_cur[IDX_CM]*y_cur[IDX_H2SII] - + k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] - + k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] - + k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] - + k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] - + k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] - + k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] - + k[3905]*y_cur[IDX_CM]*y_cur[IDX_HCOII] - + k[3906]*y_cur[IDX_CM]*y_cur[IDX_HeII] - + k[3907]*y_cur[IDX_CM]*y_cur[IDX_MgII] - + k[3908]*y_cur[IDX_CM]*y_cur[IDX_NII] - + k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] - + k[3910]*y_cur[IDX_CM]*y_cur[IDX_NH3II] - + k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] - + k[3912]*y_cur[IDX_CM]*y_cur[IDX_NOII] - + k[3913]*y_cur[IDX_CM]*y_cur[IDX_NaII] - + k[3914]*y_cur[IDX_CM]*y_cur[IDX_OII] - + k[3915]*y_cur[IDX_CM]*y_cur[IDX_SII] - + k[3916]*y_cur[IDX_CM]*y_cur[IDX_SOII] - + k[3917]*y_cur[IDX_CM]*y_cur[IDX_SiII] - + k[3918]*y_cur[IDX_CM]*y_cur[IDX_SiOII] - + k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] - + k[3920]*y_cur[IDX_CM]*y_cur[IDX_SiSII] + + k[5607]*y_cur[IDX_CI]*y_cur[IDX_eM] - k[5686]*y_cur[IDX_CM] - + k[5948]*y_cur[IDX_CM]; + ydot[yistart + IDX_CSI] = 0.0 + k[58]*y_cur[IDX_CI]*y_cur[IDX_SM] + + k[317]*y_cur[IDX_CSII]*y_cur[IDX_FeI] - + k[374]*y_cur[IDX_HII]*y_cur[IDX_CSI] + + k[530]*y_cur[IDX_MgI]*y_cur[IDX_CSII] + + k[633]*y_cur[IDX_NaI]*y_cur[IDX_CSII] + + k[717]*y_cur[IDX_SiI]*y_cur[IDX_CSII] + + k[786]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + + k[818]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + + k[837]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + + k[954]*y_cur[IDX_CH3CSII]*y_cur[IDX_eM] + + k[1000]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + + k[1039]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + + k[1062]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + + k[1108]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + + k[1128]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] + + k[1178]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + + k[1392]*y_cur[IDX_CII]*y_cur[IDX_H2CSI] + + k[1757]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + + k[2576]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - + k[2678]*y_cur[IDX_H3II]*y_cur[IDX_CSI] - + k[2797]*y_cur[IDX_H3OII]*y_cur[IDX_CSI] - + k[2956]*y_cur[IDX_HCOII]*y_cur[IDX_CSI] + + k[3013]*y_cur[IDX_HCSII]*y_cur[IDX_C2H5OHI] + + k[3014]*y_cur[IDX_HCSII]*y_cur[IDX_CH3COCH3I] + + k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + + k[3116]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] - + k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] - + k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + + k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + + k[3294]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3587]*y_cur[IDX_NH3I]*y_cur[IDX_HCSII] + + k[3813]*y_cur[IDX_PII]*y_cur[IDX_OCSI] + + k[3831]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + + k[4876]*y_cur[IDX_C2I]*y_cur[IDX_SI] - + k[4899]*y_cur[IDX_C2HI]*y_cur[IDX_CSI] - + k[4958]*y_cur[IDX_CI]*y_cur[IDX_CSI] + + k[4965]*y_cur[IDX_CI]*y_cur[IDX_HSI] + + k[4976]*y_cur[IDX_CI]*y_cur[IDX_NSI] + + k[4980]*y_cur[IDX_CI]*y_cur[IDX_OCSI] + + k[4984]*y_cur[IDX_CI]*y_cur[IDX_S2I] + + k[4986]*y_cur[IDX_CI]*y_cur[IDX_SOI] + + k[5019]*y_cur[IDX_CH2I]*y_cur[IDX_SI] + + k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] + + k[5100]*y_cur[IDX_CHI]*y_cur[IDX_SI] + + k[5173]*y_cur[IDX_HI]*y_cur[IDX_HCSI] - + k[5263]*y_cur[IDX_NI]*y_cur[IDX_CSI] + + k[5355]*y_cur[IDX_OI]*y_cur[IDX_C2SI] - + k[5392]*y_cur[IDX_OI]*y_cur[IDX_CSI] - + k[5393]*y_cur[IDX_OI]*y_cur[IDX_CSI] - + k[5462]*y_cur[IDX_OHI]*y_cur[IDX_CSI] - + k[5463]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + + k[5485]*y_cur[IDX_SI]*y_cur[IDX_C2OI] + + k[5529]*y_cur[IDX_CI]*y_cur[IDX_SI] + k[5714]*y_cur[IDX_C2SI] + + k[5725]*y_cur[IDX_C3SI] + k[5735]*y_cur[IDX_C4SI] - + k[5828]*y_cur[IDX_CSI] - k[5829]*y_cur[IDX_CSI] + + k[5837]*y_cur[IDX_H2CSI] + k[6009]*y_cur[IDX_C3SI] + + k[6021]*y_cur[IDX_C4SI] - k[6141]*y_cur[IDX_CSI] - + k[6142]*y_cur[IDX_CSI] + k[6156]*y_cur[IDX_H2CSI] + + k[6190]*y_cur[IDX_HCSI] + k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + + k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + + k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + + k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + + k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + + k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM] + + k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[6717]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] + + k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + + k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - k[6975]*y_cur[IDX_CSI] + + k[7157]*y_cur[IDX_GCSI] + k[7339]*y_cur[IDX_GCSI] + + k[7521]*y_cur[IDX_GCSI] + k[8666]*y_cur[IDX_GCI]*y_cur[IDX_GSI]; + ydot[yistart + IDX_OM] = 0.0 - k[56]*y_cur[IDX_CI]*y_cur[IDX_OM] - + k[59]*y_cur[IDX_CH2I]*y_cur[IDX_OM] - + k[62]*y_cur[IDX_CHI]*y_cur[IDX_OM] - + k[83]*y_cur[IDX_H2I]*y_cur[IDX_OM] - + k[107]*y_cur[IDX_HI]*y_cur[IDX_OM] - + k[122]*y_cur[IDX_NI]*y_cur[IDX_OM] - + k[124]*y_cur[IDX_OM]*y_cur[IDX_COI] - + k[125]*y_cur[IDX_OM]*y_cur[IDX_NOI] - + k[126]*y_cur[IDX_OM]*y_cur[IDX_OI] - + k[666]*y_cur[IDX_OM]*y_cur[IDX_CNI] - + k[667]*y_cur[IDX_OM]*y_cur[IDX_O2I] + + k[1450]*y_cur[IDX_CM]*y_cur[IDX_O2I] - + k[2467]*y_cur[IDX_H2I]*y_cur[IDX_OM] - + k[3652]*y_cur[IDX_OM]*y_cur[IDX_CH4I] - + k[3653]*y_cur[IDX_OM]*y_cur[IDX_HCNI] - + k[4727]*y_cur[IDX_OM]*y_cur[IDX_CII] - + k[4728]*y_cur[IDX_OM]*y_cur[IDX_C2H2II] - + k[4729]*y_cur[IDX_OM]*y_cur[IDX_C2H3II] - + k[4730]*y_cur[IDX_OM]*y_cur[IDX_C4H2II] - + k[4731]*y_cur[IDX_OM]*y_cur[IDX_C4H3II] - + k[4732]*y_cur[IDX_OM]*y_cur[IDX_C4SII] - + k[4733]*y_cur[IDX_OM]*y_cur[IDX_CH2CCHII] - + k[4734]*y_cur[IDX_OM]*y_cur[IDX_CH3II] - + k[4735]*y_cur[IDX_OM]*y_cur[IDX_CNCII] - + k[4736]*y_cur[IDX_OM]*y_cur[IDX_FeII] - + k[4737]*y_cur[IDX_OM]*y_cur[IDX_HII] - + k[4738]*y_cur[IDX_OM]*y_cur[IDX_H2COII] - + k[4739]*y_cur[IDX_OM]*y_cur[IDX_H2SII] - + k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] - + k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] - + k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] - + k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] - + k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] - + k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] - + k[4746]*y_cur[IDX_OM]*y_cur[IDX_HCOII] - + k[4747]*y_cur[IDX_OM]*y_cur[IDX_HeII] - + k[4748]*y_cur[IDX_OM]*y_cur[IDX_MgII] - + k[4749]*y_cur[IDX_OM]*y_cur[IDX_NII] - + k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] - + k[4751]*y_cur[IDX_OM]*y_cur[IDX_NH3II] - + k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] - + k[4753]*y_cur[IDX_OM]*y_cur[IDX_NOII] - + k[4754]*y_cur[IDX_OM]*y_cur[IDX_NaII] - + k[4755]*y_cur[IDX_OM]*y_cur[IDX_OII] - + k[4756]*y_cur[IDX_OM]*y_cur[IDX_SII] - + k[4757]*y_cur[IDX_OM]*y_cur[IDX_SOII] - + k[4758]*y_cur[IDX_OM]*y_cur[IDX_SiII] - + k[4759]*y_cur[IDX_OM]*y_cur[IDX_SiOII] - + k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] - + k[4761]*y_cur[IDX_OM]*y_cur[IDX_SiSII] + + k[5609]*y_cur[IDX_OI]*y_cur[IDX_eM] - k[5895]*y_cur[IDX_OM] - + k[6232]*y_cur[IDX_OM]; + ydot[yistart + IDX_C9M] = 0.0 - k[53]*y_cur[IDX_CI]*y_cur[IDX_C9M] - + k[103]*y_cur[IDX_HI]*y_cur[IDX_C9M] - + k[120]*y_cur[IDX_NI]*y_cur[IDX_C9M] + + k[3380]*y_cur[IDX_NI]*y_cur[IDX_C10M] - + k[3442]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3443]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3444]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3445]*y_cur[IDX_NI]*y_cur[IDX_C9M] + + k[3678]*y_cur[IDX_OI]*y_cur[IDX_C10M] - + k[3721]*y_cur[IDX_OI]*y_cur[IDX_C9M] - + k[4551]*y_cur[IDX_C9M]*y_cur[IDX_CII] - + k[4552]*y_cur[IDX_C9M]*y_cur[IDX_C2H2II] - + k[4553]*y_cur[IDX_C9M]*y_cur[IDX_C2H3II] - + k[4554]*y_cur[IDX_C9M]*y_cur[IDX_C4H2II] - + k[4555]*y_cur[IDX_C9M]*y_cur[IDX_C4H3II] - + k[4556]*y_cur[IDX_C9M]*y_cur[IDX_C4SII] - + k[4557]*y_cur[IDX_C9M]*y_cur[IDX_CH2CCHII] - + k[4558]*y_cur[IDX_C9M]*y_cur[IDX_CH3II] - + k[4559]*y_cur[IDX_C9M]*y_cur[IDX_CNCII] - + k[4560]*y_cur[IDX_C9M]*y_cur[IDX_FeII] - + k[4561]*y_cur[IDX_C9M]*y_cur[IDX_HII] - + k[4562]*y_cur[IDX_C9M]*y_cur[IDX_H2COII] - + k[4563]*y_cur[IDX_C9M]*y_cur[IDX_H2SII] - + k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] - + k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] - + k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] - + k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] - + k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] - + k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] - + k[4570]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] - + k[4571]*y_cur[IDX_C9M]*y_cur[IDX_HeII] - + k[4572]*y_cur[IDX_C9M]*y_cur[IDX_MgII] - + k[4573]*y_cur[IDX_C9M]*y_cur[IDX_NII] - + k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] - + k[4575]*y_cur[IDX_C9M]*y_cur[IDX_NH3II] - + k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] - + k[4577]*y_cur[IDX_C9M]*y_cur[IDX_NOII] - + k[4578]*y_cur[IDX_C9M]*y_cur[IDX_NaII] - + k[4579]*y_cur[IDX_C9M]*y_cur[IDX_OII] - + k[4580]*y_cur[IDX_C9M]*y_cur[IDX_SII] - + k[4581]*y_cur[IDX_C9M]*y_cur[IDX_SOII] - + k[4582]*y_cur[IDX_C9M]*y_cur[IDX_SiII] - + k[4583]*y_cur[IDX_C9M]*y_cur[IDX_SiOII] - + k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] - + k[4585]*y_cur[IDX_C9M]*y_cur[IDX_SiSII] + + k[5605]*y_cur[IDX_C9I]*y_cur[IDX_eM] - k[5766]*y_cur[IDX_C9M] - + k[6059]*y_cur[IDX_C9M]; + ydot[yistart + IDX_CH3OHI] = 0.0 + + k[61]*y_cur[IDX_CH3I]*y_cur[IDX_OHM] - + k[279]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] - + k[370]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - k[545]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - - k[546]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - - k[547]*y_cur[IDX_NII]*y_cur[IDX_CNI] - - k[548]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - - k[549]*y_cur[IDX_NII]*y_cur[IDX_COI] - - k[550]*y_cur[IDX_NII]*y_cur[IDX_FeI] - - k[551]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - - k[552]*y_cur[IDX_NII]*y_cur[IDX_H2OI] - - k[553]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - - k[554]*y_cur[IDX_NII]*y_cur[IDX_HCNI] - - k[555]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - - k[556]*y_cur[IDX_NII]*y_cur[IDX_MgI] - - k[557]*y_cur[IDX_NII]*y_cur[IDX_NH2I] - - k[558]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - - k[559]*y_cur[IDX_NII]*y_cur[IDX_NHI] - - k[560]*y_cur[IDX_NII]*y_cur[IDX_NOI] - - k[561]*y_cur[IDX_NII]*y_cur[IDX_O2I] - - k[562]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - - k[563]*y_cur[IDX_NII]*y_cur[IDX_OHI] + - k[573]*y_cur[IDX_NI]*y_cur[IDX_N2II] - - k[2256]*y_cur[IDX_CHI]*y_cur[IDX_NII] - - k[2459]*y_cur[IDX_H2I]*y_cur[IDX_NII] + - k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + - k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + - k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + - k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + - k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + - k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] + - k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + - k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - + k[651]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - + k[672]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] + + k[955]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + + k[959]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + + k[966]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[982]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + + k[1053]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] - + k[1381]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - + k[1382]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - + k[1937]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - + k[1938]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - + k[1939]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - + k[2073]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] + + k[2120]*y_cur[IDX_CH3OH2II]*y_cur[IDX_HCOOHI] + + k[2121]*y_cur[IDX_CH3OH2II]*y_cur[IDX_NH3I] - + k[2122]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] - + k[2123]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] - + k[2124]*y_cur[IDX_CH3OHI]*y_cur[IDX_C4H3II] - + k[2125]*y_cur[IDX_CH3OHI]*y_cur[IDX_CH3OH2II] - + k[2126]*y_cur[IDX_CH3OHI]*y_cur[IDX_HC3NHII] - + k[2127]*y_cur[IDX_CH3OHI]*y_cur[IDX_HCOOH2II] - + k[2128]*y_cur[IDX_CH3OHI]*y_cur[IDX_NCCNHII] - + k[2129]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - + k[2130]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - + k[2131]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH3II] - + k[2132]*y_cur[IDX_CH3OHI]*y_cur[IDX_S2II] - + k[2137]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] - + k[2330]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - + k[2331]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - + k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - + k[2487]*y_cur[IDX_H2COII]*y_cur[IDX_CH3OHI] + + k[2653]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - + k[2668]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - + k[2762]*y_cur[IDX_H3COII]*y_cur[IDX_CH3OHI] - + k[2795]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OHI] - + k[2954]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OHI] - + k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] - + k[3197]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] - k[3336]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - k[3337]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - k[3338]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - - k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - - k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - - k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - - k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - - k[3343]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - - k[3344]*y_cur[IDX_NII]*y_cur[IDX_COI] - - k[3345]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - - k[3346]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - - k[3347]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - - k[3348]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - - k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - - k[3350]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - - k[3351]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] - - k[3352]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] - - k[3353]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - - k[3354]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - - k[3355]*y_cur[IDX_NII]*y_cur[IDX_NHI] - - k[3356]*y_cur[IDX_NII]*y_cur[IDX_NOI] - - k[3357]*y_cur[IDX_NII]*y_cur[IDX_O2I] - - k[3358]*y_cur[IDX_NII]*y_cur[IDX_O2I] - - k[3359]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - - k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - - k[3908]*y_cur[IDX_CM]*y_cur[IDX_NII] - - k[3943]*y_cur[IDX_C10M]*y_cur[IDX_NII] - - k[3978]*y_cur[IDX_C10HM]*y_cur[IDX_NII] - + k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3570]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - + k[3636]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - + k[3637]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - + k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - + k[3810]*y_cur[IDX_PII]*y_cur[IDX_CH3OHI] - + k[3816]*y_cur[IDX_PHII]*y_cur[IDX_CH3OHI] - + k[3867]*y_cur[IDX_SiII]*y_cur[IDX_CH3OHI] - + k[5073]*y_cur[IDX_CHI]*y_cur[IDX_CH3OHI] - + k[5534]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - + k[5816]*y_cur[IDX_CH3OHI] - k[5817]*y_cur[IDX_CH3OHI] - + k[5818]*y_cur[IDX_CH3OHI] - k[5819]*y_cur[IDX_CH3OHI] - + k[6120]*y_cur[IDX_CH3OHI] - k[6121]*y_cur[IDX_CH3OHI] - + k[6122]*y_cur[IDX_CH3OHI] - k[6123]*y_cur[IDX_CH3OHI] - + k[6124]*y_cur[IDX_CH3OHI] + + k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + + k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + + k[6699]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + + k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - + k[6936]*y_cur[IDX_CH3OHI] + k[7118]*y_cur[IDX_GCH3OHI] + + k[7300]*y_cur[IDX_GCH3OHI] + k[7482]*y_cur[IDX_GCH3OHI] + + k[8598]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] + + k[8599]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] + + k[8737]*y_cur[IDX_GOHI]*y_cur[IDX_GCH3I]; + ydot[yistart + IDX_HM] = 0.0 - k[66]*y_cur[IDX_HM]*y_cur[IDX_C2I] - + k[67]*y_cur[IDX_HM]*y_cur[IDX_C2HI] - + k[68]*y_cur[IDX_HM]*y_cur[IDX_CI] - + k[69]*y_cur[IDX_HM]*y_cur[IDX_CH2I] - + k[70]*y_cur[IDX_HM]*y_cur[IDX_CH3I] - + k[71]*y_cur[IDX_HM]*y_cur[IDX_CHI] - + k[72]*y_cur[IDX_HM]*y_cur[IDX_CNI] - + k[73]*y_cur[IDX_HM]*y_cur[IDX_COI] - + k[74]*y_cur[IDX_HM]*y_cur[IDX_HI] - + k[75]*y_cur[IDX_HM]*y_cur[IDX_HI] - + k[76]*y_cur[IDX_HM]*y_cur[IDX_HCOI] - + k[77]*y_cur[IDX_HM]*y_cur[IDX_NI] - + k[78]*y_cur[IDX_HM]*y_cur[IDX_NH2I] - + k[79]*y_cur[IDX_HM]*y_cur[IDX_NHI] - + k[80]*y_cur[IDX_HM]*y_cur[IDX_OI] - + k[81]*y_cur[IDX_HM]*y_cur[IDX_OHI] - + k[2366]*y_cur[IDX_HM]*y_cur[IDX_C2H2I] - + k[2367]*y_cur[IDX_HM]*y_cur[IDX_H2OI] - + k[2368]*y_cur[IDX_HM]*y_cur[IDX_HCNI] - + k[4691]*y_cur[IDX_HM]*y_cur[IDX_CII] - + k[4692]*y_cur[IDX_HM]*y_cur[IDX_C2H2II] - + k[4693]*y_cur[IDX_HM]*y_cur[IDX_C2H3II] - + k[4694]*y_cur[IDX_HM]*y_cur[IDX_C4H2II] - + k[4695]*y_cur[IDX_HM]*y_cur[IDX_C4H3II] - + k[4696]*y_cur[IDX_HM]*y_cur[IDX_C4SII] - + k[4697]*y_cur[IDX_HM]*y_cur[IDX_CH2CCHII] - + k[4698]*y_cur[IDX_HM]*y_cur[IDX_CH3II] - + k[4699]*y_cur[IDX_HM]*y_cur[IDX_CNCII] - + k[4700]*y_cur[IDX_HM]*y_cur[IDX_FeII] - + k[4701]*y_cur[IDX_HM]*y_cur[IDX_HII] - + k[4702]*y_cur[IDX_HM]*y_cur[IDX_H2II] - + k[4703]*y_cur[IDX_HM]*y_cur[IDX_H2COII] - + k[4704]*y_cur[IDX_HM]*y_cur[IDX_H2SII] - + k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] - + k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] - + k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] - + k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] - + k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] - + k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] - + k[4711]*y_cur[IDX_HM]*y_cur[IDX_HCOII] - + k[4712]*y_cur[IDX_HM]*y_cur[IDX_HeII] - + k[4713]*y_cur[IDX_HM]*y_cur[IDX_MgII] - + k[4714]*y_cur[IDX_HM]*y_cur[IDX_NII] - + k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] - + k[4716]*y_cur[IDX_HM]*y_cur[IDX_NH3II] - + k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] - + k[4718]*y_cur[IDX_HM]*y_cur[IDX_NOII] - + k[4719]*y_cur[IDX_HM]*y_cur[IDX_NaII] - + k[4720]*y_cur[IDX_HM]*y_cur[IDX_OII] - + k[4721]*y_cur[IDX_HM]*y_cur[IDX_SII] - + k[4722]*y_cur[IDX_HM]*y_cur[IDX_SOII] - + k[4723]*y_cur[IDX_HM]*y_cur[IDX_SiII] - + k[4724]*y_cur[IDX_HM]*y_cur[IDX_SiOII] - + k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] - + k[4726]*y_cur[IDX_HM]*y_cur[IDX_SiSII] + + k[5608]*y_cur[IDX_HI]*y_cur[IDX_eM] + k[5678]*y_cur[IDX_H2I] - + k[5833]*y_cur[IDX_HM] - k[6146]*y_cur[IDX_HM]; + ydot[yistart + IDX_HC3NI] = 0.0 + + k[91]*y_cur[IDX_HI]*y_cur[IDX_C3NM] + + k[113]*y_cur[IDX_NI]*y_cur[IDX_C3HM] + + k[229]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] + + k[239]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] - + k[383]*y_cur[IDX_HII]*y_cur[IDX_HC3NI] + + k[493]*y_cur[IDX_C4H2I]*y_cur[IDX_HC3NII] + + k[607]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NII] + + k[912]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_eM] + + k[926]*y_cur[IDX_CH3C3NII]*y_cur[IDX_eM] + + k[928]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] + + k[988]*y_cur[IDX_H2C4NII]*y_cur[IDX_eM] + + k[1068]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + + k[1080]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - + k[1398]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1399]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1400]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1401]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1470]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1471]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1472]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1473]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1620]*y_cur[IDX_C2H3II]*y_cur[IDX_HC3NI] - + k[1676]*y_cur[IDX_C2H4II]*y_cur[IDX_HC3NI] - + k[1722]*y_cur[IDX_C2H5II]*y_cur[IDX_HC3NI] - + k[1752]*y_cur[IDX_C3II]*y_cur[IDX_HC3NI] - + k[1816]*y_cur[IDX_C3H5II]*y_cur[IDX_HC3NI] - + k[2079]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] + + k[2115]*y_cur[IDX_CH3CNI]*y_cur[IDX_HC3NHII] + + k[2126]*y_cur[IDX_CH3OHI]*y_cur[IDX_HC3NHII] + + k[2172]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2228]*y_cur[IDX_CH5II]*y_cur[IDX_HC3NI] + + k[2320]*y_cur[IDX_HII]*y_cur[IDX_CH3C3NI] + + k[2532]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] - + k[2689]*y_cur[IDX_H3II]*y_cur[IDX_HC3NI] - + k[2804]*y_cur[IDX_H3OII]*y_cur[IDX_HC3NI] - + k[2894]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] - + k[2895]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] - + k[2964]*y_cur[IDX_HCOII]*y_cur[IDX_HC3NI] + + k[3024]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - + k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - + k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - + k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - + k[3374]*y_cur[IDX_N2HII]*y_cur[IDX_HC3NI] + + k[3580]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NHII] + + k[4901]*y_cur[IDX_C2HI]*y_cur[IDX_HCNI] + + k[4902]*y_cur[IDX_C2HI]*y_cur[IDX_HNCI] + + k[4903]*y_cur[IDX_C2HI]*y_cur[IDX_NCCNI] + + k[4948]*y_cur[IDX_CI]*y_cur[IDX_CH2CNI] + + k[5104]*y_cur[IDX_CNI]*y_cur[IDX_C2H2I] + + k[5213]*y_cur[IDX_HNC3I]*y_cur[IDX_HI] + + k[5232]*y_cur[IDX_NI]*y_cur[IDX_C3H2I] + + k[5256]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHI] - + k[5508]*y_cur[IDX_C2H2II]*y_cur[IDX_HC3NI] + + k[5514]*y_cur[IDX_C2HI]*y_cur[IDX_CNI] - + k[5517]*y_cur[IDX_C4H2II]*y_cur[IDX_HC3NI] - + k[5537]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] - k[5846]*y_cur[IDX_HC3NI] + - k[6171]*y_cur[IDX_HC3NI] + + k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM] + + k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM] + + k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM] + + k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + + k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[7001]*y_cur[IDX_HC3NI] + k[7183]*y_cur[IDX_GHC3NI] + + k[7365]*y_cur[IDX_GHC3NI] + k[7547]*y_cur[IDX_GHC3NI] + + k[8633]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] + + k[8706]*y_cur[IDX_GNI]*y_cur[IDX_GC3HI]; + ydot[yistart + IDX_SiSI] = 0.0 - + k[204]*y_cur[IDX_CII]*y_cur[IDX_SiSI] - + k[435]*y_cur[IDX_HII]*y_cur[IDX_SiSI] - + k[706]*y_cur[IDX_SII]*y_cur[IDX_SiSI] + + k[1148]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] - + k[1448]*y_cur[IDX_CII]*y_cur[IDX_SiSI] + + k[2580]*y_cur[IDX_H2SI]*y_cur[IDX_HSiSII] - + k[2761]*y_cur[IDX_H3II]*y_cur[IDX_SiSI] + + k[2880]*y_cur[IDX_HCNI]*y_cur[IDX_HSiSII] - + k[3006]*y_cur[IDX_HCOII]*y_cur[IDX_SiSI] - + k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] - + k[3335]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + + k[3591]*y_cur[IDX_NH3I]*y_cur[IDX_HSiSII] + + k[3920]*y_cur[IDX_CM]*y_cur[IDX_SiSII] + + k[3955]*y_cur[IDX_C10M]*y_cur[IDX_SiSII] + + k[3990]*y_cur[IDX_C10HM]*y_cur[IDX_SiSII] + + k[4025]*y_cur[IDX_C2M]*y_cur[IDX_SiSII] + + k[4060]*y_cur[IDX_C2HM]*y_cur[IDX_SiSII] + + k[4095]*y_cur[IDX_C3M]*y_cur[IDX_SiSII] + + k[4130]*y_cur[IDX_C3HM]*y_cur[IDX_SiSII] + + k[4165]*y_cur[IDX_C3NM]*y_cur[IDX_SiSII] + + k[4200]*y_cur[IDX_C4M]*y_cur[IDX_SiSII] + + k[4235]*y_cur[IDX_C4HM]*y_cur[IDX_SiSII] + + k[4270]*y_cur[IDX_C5M]*y_cur[IDX_SiSII] + + k[4305]*y_cur[IDX_C5HM]*y_cur[IDX_SiSII] + + k[4340]*y_cur[IDX_C5NM]*y_cur[IDX_SiSII] + + k[4375]*y_cur[IDX_C6M]*y_cur[IDX_SiSII] + + k[4410]*y_cur[IDX_C6HM]*y_cur[IDX_SiSII] + + k[4445]*y_cur[IDX_C7M]*y_cur[IDX_SiSII] + + k[4480]*y_cur[IDX_C7HM]*y_cur[IDX_SiSII] + + k[4515]*y_cur[IDX_C8M]*y_cur[IDX_SiSII] + + k[4550]*y_cur[IDX_C8HM]*y_cur[IDX_SiSII] + + k[4585]*y_cur[IDX_C9M]*y_cur[IDX_SiSII] + + k[4620]*y_cur[IDX_C9HM]*y_cur[IDX_SiSII] + + k[4655]*y_cur[IDX_CHM]*y_cur[IDX_SiSII] + + k[4690]*y_cur[IDX_CNM]*y_cur[IDX_SiSII] + + k[4726]*y_cur[IDX_HM]*y_cur[IDX_SiSII] + + k[4761]*y_cur[IDX_OM]*y_cur[IDX_SiSII] + + k[4796]*y_cur[IDX_O2M]*y_cur[IDX_SiSII] + + k[4831]*y_cur[IDX_OHM]*y_cur[IDX_SiSII] + + k[4866]*y_cur[IDX_SM]*y_cur[IDX_SiSII] - k[5935]*y_cur[IDX_SiSI] - + k[6288]*y_cur[IDX_SiSI] + + k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] - + k[7023]*y_cur[IDX_SiSI] + k[7205]*y_cur[IDX_GSiSI] + + k[7387]*y_cur[IDX_GSiSI] + k[7571]*y_cur[IDX_GSiSI]; + ydot[yistart + IDX_C3HII] = 0.0 + + k[335]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - + k[600]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - + k[621]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - + k[789]*y_cur[IDX_C3HII]*y_cur[IDX_eM] - + k[790]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + + k[1300]*y_cur[IDX_CII]*y_cur[IDX_C2H2I] + + k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1400]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + + k[1402]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + + k[1540]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - + k[1544]*y_cur[IDX_C2H2I]*y_cur[IDX_C3HII] - + k[1689]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - + k[1690]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - + k[1753]*y_cur[IDX_C3HII]*y_cur[IDX_CO2I] - + k[1754]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - + k[1755]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - + k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - + k[1757]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - + k[1758]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + + k[1850]*y_cur[IDX_CI]*y_cur[IDX_C2H2II] + + k[1851]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + + k[1995]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] + + k[2041]*y_cur[IDX_CH3II]*y_cur[IDX_C2I] - + k[2122]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] - + k[2123]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] + + k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + + k[2157]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - + k[2160]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] - + k[2161]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] + + k[2241]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] + + k[2300]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] + + k[2335]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] + + k[2406]*y_cur[IDX_H2I]*y_cur[IDX_C3II] - + k[2407]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] + + k[2413]*y_cur[IDX_H2I]*y_cur[IDX_C4NII] - + k[2528]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - + k[2529]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - + k[2530]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - + k[2576]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - + k[2577]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - + k[2578]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + + k[2601]*y_cur[IDX_H3II]*y_cur[IDX_C3I] + + k[2771]*y_cur[IDX_H3OII]*y_cur[IDX_C3I] + + k[2831]*y_cur[IDX_HI]*y_cur[IDX_C3H2II] + + k[2867]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + + k[2906]*y_cur[IDX_HCOII]*y_cur[IDX_C3I] + + k[3021]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] + + k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + + k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + + k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - + k[3394]*y_cur[IDX_NI]*y_cur[IDX_C3HII] + + k[3405]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + + k[3461]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - + k[3562]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - + k[3563]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - + k[3626]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - + k[3669]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - + k[3670]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - + k[3671]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - + k[3872]*y_cur[IDX_SiI]*y_cur[IDX_C3HII] - + k[5550]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - + k[5551]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - + k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] - + k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3H3II] = 0.0 + + k[219]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + + k[227]*y_cur[IDX_C2H2I]*y_cur[IDX_CH2CCHII] + + k[232]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + + k[360]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] - + k[798]*y_cur[IDX_C3H3II]*y_cur[IDX_eM] + + k[1328]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + + k[1344]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + + k[1349]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + + k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1375]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1536]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] + + k[1538]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] - + k[1546]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H3II] + + k[1578]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] + + k[1580]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - + k[1631]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H3II] - + k[1693]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H3II] - + k[1732]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - + k[1733]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - + k[1786]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] - + k[1787]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] - + k[1796]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] - + k[1797]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] - + k[1798]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] - + k[1799]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] - + k[1800]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] - + k[1801]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] - + k[1802]*y_cur[IDX_C3H3II]*y_cur[IDX_C6H2I] - + k[1803]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] - + k[1804]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] - + k[1805]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] - + k[1806]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] - + k[1807]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] - + k[1820]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - + k[1821]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - + k[1857]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] - + k[1858]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] + + k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + + k[2079]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] + + k[2162]*y_cur[IDX_CH4I]*y_cur[IDX_C3H2II] + + k[2408]*y_cur[IDX_H2I]*y_cur[IDX_C3H2II] - + k[2476]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] - + k[2477]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + + k[2602]*y_cur[IDX_H3II]*y_cur[IDX_C3H2I] + + k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] + + k[2772]*y_cur[IDX_H3OII]*y_cur[IDX_C3H2I] + + k[2832]*y_cur[IDX_HI]*y_cur[IDX_C3H4II] + + k[2907]*y_cur[IDX_HCOII]*y_cur[IDX_C3H2I] + + k[3020]*y_cur[IDX_HNC3I]*y_cur[IDX_CH3II] + + k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - + k[3564]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - + k[3565]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] + + k[3656]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - + k[3696]*y_cur[IDX_OI]*y_cur[IDX_C3H3II] - + k[3835]*y_cur[IDX_SI]*y_cur[IDX_C3H3II] - + k[3875]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] - + k[3876]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] - + k[5515]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] + + k[5550]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - + k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C8M] = 0.0 - k[36]*y_cur[IDX_C8M]*y_cur[IDX_C2I] + - k[51]*y_cur[IDX_CI]*y_cur[IDX_C8M] - + k[101]*y_cur[IDX_HI]*y_cur[IDX_C8M] - + k[3436]*y_cur[IDX_NI]*y_cur[IDX_C8M] - + k[3437]*y_cur[IDX_NI]*y_cur[IDX_C8M] - + k[3438]*y_cur[IDX_NI]*y_cur[IDX_C8M] - + k[3439]*y_cur[IDX_NI]*y_cur[IDX_C8M] + + k[3445]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3717]*y_cur[IDX_OI]*y_cur[IDX_C8M] + + k[3721]*y_cur[IDX_OI]*y_cur[IDX_C9M] - + k[4481]*y_cur[IDX_C8M]*y_cur[IDX_CII] - + k[4482]*y_cur[IDX_C8M]*y_cur[IDX_C2H2II] - + k[4483]*y_cur[IDX_C8M]*y_cur[IDX_C2H3II] - + k[4484]*y_cur[IDX_C8M]*y_cur[IDX_C4H2II] - + k[4485]*y_cur[IDX_C8M]*y_cur[IDX_C4H3II] - + k[4486]*y_cur[IDX_C8M]*y_cur[IDX_C4SII] - + k[4487]*y_cur[IDX_C8M]*y_cur[IDX_CH2CCHII] - + k[4488]*y_cur[IDX_C8M]*y_cur[IDX_CH3II] - + k[4489]*y_cur[IDX_C8M]*y_cur[IDX_CNCII] - + k[4490]*y_cur[IDX_C8M]*y_cur[IDX_FeII] - + k[4491]*y_cur[IDX_C8M]*y_cur[IDX_HII] - + k[4492]*y_cur[IDX_C8M]*y_cur[IDX_H2COII] - + k[4493]*y_cur[IDX_C8M]*y_cur[IDX_H2SII] - + k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] - + k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] - + k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] - + k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] - + k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] - + k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] - + k[4500]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] - + k[4501]*y_cur[IDX_C8M]*y_cur[IDX_HeII] - + k[4502]*y_cur[IDX_C8M]*y_cur[IDX_MgII] - + k[4503]*y_cur[IDX_C8M]*y_cur[IDX_NII] - + k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] - + k[4505]*y_cur[IDX_C8M]*y_cur[IDX_NH3II] - + k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] - + k[4507]*y_cur[IDX_C8M]*y_cur[IDX_NOII] - + k[4508]*y_cur[IDX_C8M]*y_cur[IDX_NaII] - + k[4509]*y_cur[IDX_C8M]*y_cur[IDX_OII] - + k[4510]*y_cur[IDX_C8M]*y_cur[IDX_SII] - + k[4511]*y_cur[IDX_C8M]*y_cur[IDX_SOII] - + k[4512]*y_cur[IDX_C8M]*y_cur[IDX_SiII] - + k[4513]*y_cur[IDX_C8M]*y_cur[IDX_SiOII] - + k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] - + k[4515]*y_cur[IDX_C8M]*y_cur[IDX_SiSII] + + k[5603]*y_cur[IDX_C8I]*y_cur[IDX_eM] - k[5761]*y_cur[IDX_C8M] - + k[6051]*y_cur[IDX_C8M]; + ydot[yistart + IDX_C2M] = 0.0 - k[10]*y_cur[IDX_C2M]*y_cur[IDX_C2I] + - k[11]*y_cur[IDX_C2M]*y_cur[IDX_C3I] - + k[12]*y_cur[IDX_C2M]*y_cur[IDX_C4I] - + k[13]*y_cur[IDX_C2M]*y_cur[IDX_C5I] - + k[14]*y_cur[IDX_C2M]*y_cur[IDX_C6I] - + k[15]*y_cur[IDX_C2M]*y_cur[IDX_C7I] - + k[16]*y_cur[IDX_C2M]*y_cur[IDX_C8I] - + k[38]*y_cur[IDX_CI]*y_cur[IDX_C2M] - + k[87]*y_cur[IDX_HI]*y_cur[IDX_C2M] - + k[110]*y_cur[IDX_NI]*y_cur[IDX_C2M] - + k[128]*y_cur[IDX_OI]*y_cur[IDX_C2M] - + k[3384]*y_cur[IDX_NI]*y_cur[IDX_C2M] + + k[3393]*y_cur[IDX_NI]*y_cur[IDX_C3M] - + k[3685]*y_cur[IDX_OI]*y_cur[IDX_C2M] + + k[3693]*y_cur[IDX_OI]*y_cur[IDX_C3M] - + k[3991]*y_cur[IDX_C2M]*y_cur[IDX_CII] - + k[3992]*y_cur[IDX_C2M]*y_cur[IDX_C2H2II] - + k[3993]*y_cur[IDX_C2M]*y_cur[IDX_C2H3II] - + k[3994]*y_cur[IDX_C2M]*y_cur[IDX_C4H2II] - + k[3995]*y_cur[IDX_C2M]*y_cur[IDX_C4H3II] - + k[3996]*y_cur[IDX_C2M]*y_cur[IDX_C4SII] - + k[3997]*y_cur[IDX_C2M]*y_cur[IDX_CH2CCHII] - + k[3998]*y_cur[IDX_C2M]*y_cur[IDX_CH3II] - + k[3999]*y_cur[IDX_C2M]*y_cur[IDX_CNCII] - + k[4000]*y_cur[IDX_C2M]*y_cur[IDX_FeII] - + k[4001]*y_cur[IDX_C2M]*y_cur[IDX_HII] - + k[4002]*y_cur[IDX_C2M]*y_cur[IDX_H2COII] - + k[4003]*y_cur[IDX_C2M]*y_cur[IDX_H2SII] - + k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] - + k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] - + k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] - + k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] - + k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] - + k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] - + k[4010]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] - + k[4011]*y_cur[IDX_C2M]*y_cur[IDX_HeII] - + k[4012]*y_cur[IDX_C2M]*y_cur[IDX_MgII] - k[4013]*y_cur[IDX_C2M]*y_cur[IDX_NII] - - k[4048]*y_cur[IDX_C2HM]*y_cur[IDX_NII] - + k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] - + k[4015]*y_cur[IDX_C2M]*y_cur[IDX_NH3II] - + k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] - + k[4017]*y_cur[IDX_C2M]*y_cur[IDX_NOII] - + k[4018]*y_cur[IDX_C2M]*y_cur[IDX_NaII] - + k[4019]*y_cur[IDX_C2M]*y_cur[IDX_OII] - + k[4020]*y_cur[IDX_C2M]*y_cur[IDX_SII] - + k[4021]*y_cur[IDX_C2M]*y_cur[IDX_SOII] - + k[4022]*y_cur[IDX_C2M]*y_cur[IDX_SiII] - + k[4023]*y_cur[IDX_C2M]*y_cur[IDX_SiOII] - + k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] - + k[4025]*y_cur[IDX_C2M]*y_cur[IDX_SiSII] + + k[5589]*y_cur[IDX_C2I]*y_cur[IDX_eM] - k[5693]*y_cur[IDX_C2M] - + k[5976]*y_cur[IDX_C2M]; + ydot[yistart + IDX_C2SI] = 0.0 - + k[152]*y_cur[IDX_CII]*y_cur[IDX_C2SI] - + k[332]*y_cur[IDX_HII]*y_cur[IDX_C2SI] + + k[816]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + + k[835]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + + k[1061]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + + k[1071]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + + k[1074]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] - + k[1309]*y_cur[IDX_CII]*y_cur[IDX_C2SI] - + k[2600]*y_cur[IDX_H3II]*y_cur[IDX_C2SI] - + k[2770]*y_cur[IDX_H3OII]*y_cur[IDX_C2SI] - + k[2905]*y_cur[IDX_HCOII]*y_cur[IDX_C2SI] - + k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - + k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - + k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - + k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] + + k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] + + k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] + + k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] + + k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] + + k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] + + k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] + + k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] + + k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] + + k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] + + k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] + + k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] + + k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] + + k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] + + k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] + + k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] + + k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] + + k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] + + k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] + + k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] + + k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] + + k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] + + k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] + + k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] + + k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] + + k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] + + k[4812]*y_cur[IDX_OHM]*y_cur[IDX_HC2SII] + + k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] + + k[4875]*y_cur[IDX_C2I]*y_cur[IDX_OCSI] + + k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] + + k[4906]*y_cur[IDX_C2HI]*y_cur[IDX_SI] - + k[5355]*y_cur[IDX_OI]*y_cur[IDX_C2SI] - k[5714]*y_cur[IDX_C2SI] - + k[5715]*y_cur[IDX_C2SI] - k[5999]*y_cur[IDX_C2SI] + + k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + + k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + + k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + + k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + + k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - + k[7015]*y_cur[IDX_C2SI] + k[7197]*y_cur[IDX_GC2SI] + + k[7379]*y_cur[IDX_GC2SI] + k[7563]*y_cur[IDX_GC2SI]; + ydot[yistart + IDX_C3M] = 0.0 - k[17]*y_cur[IDX_C3M]*y_cur[IDX_C3I] + - k[18]*y_cur[IDX_C3M]*y_cur[IDX_C4I] - + k[19]*y_cur[IDX_C3M]*y_cur[IDX_C5I] - + k[20]*y_cur[IDX_C3M]*y_cur[IDX_C6I] - + k[21]*y_cur[IDX_C3M]*y_cur[IDX_C7I] - + k[40]*y_cur[IDX_CI]*y_cur[IDX_C3M] - + k[89]*y_cur[IDX_HI]*y_cur[IDX_C3M] - + k[112]*y_cur[IDX_NI]*y_cur[IDX_C3M] - + k[3392]*y_cur[IDX_NI]*y_cur[IDX_C3M] - + k[3393]*y_cur[IDX_NI]*y_cur[IDX_C3M] + + k[3403]*y_cur[IDX_NI]*y_cur[IDX_C4M] - + k[3693]*y_cur[IDX_OI]*y_cur[IDX_C3M] + + k[3698]*y_cur[IDX_OI]*y_cur[IDX_C4M] - + k[4061]*y_cur[IDX_C3M]*y_cur[IDX_CII] - + k[4062]*y_cur[IDX_C3M]*y_cur[IDX_C2H2II] - + k[4063]*y_cur[IDX_C3M]*y_cur[IDX_C2H3II] - + k[4064]*y_cur[IDX_C3M]*y_cur[IDX_C4H2II] - + k[4065]*y_cur[IDX_C3M]*y_cur[IDX_C4H3II] - + k[4066]*y_cur[IDX_C3M]*y_cur[IDX_C4SII] - + k[4067]*y_cur[IDX_C3M]*y_cur[IDX_CH2CCHII] - + k[4068]*y_cur[IDX_C3M]*y_cur[IDX_CH3II] - + k[4069]*y_cur[IDX_C3M]*y_cur[IDX_CNCII] - + k[4070]*y_cur[IDX_C3M]*y_cur[IDX_FeII] - + k[4071]*y_cur[IDX_C3M]*y_cur[IDX_HII] - + k[4072]*y_cur[IDX_C3M]*y_cur[IDX_H2COII] - + k[4073]*y_cur[IDX_C3M]*y_cur[IDX_H2SII] - + k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] - + k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] - + k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] - + k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] - + k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] - + k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] - + k[4080]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] - + k[4081]*y_cur[IDX_C3M]*y_cur[IDX_HeII] - + k[4082]*y_cur[IDX_C3M]*y_cur[IDX_MgII] - k[4083]*y_cur[IDX_C3M]*y_cur[IDX_NII] - - k[4118]*y_cur[IDX_C3HM]*y_cur[IDX_NII] - - k[4153]*y_cur[IDX_C3NM]*y_cur[IDX_NII] - + k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] - + k[4085]*y_cur[IDX_C3M]*y_cur[IDX_NH3II] - + k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] - + k[4087]*y_cur[IDX_C3M]*y_cur[IDX_NOII] - + k[4088]*y_cur[IDX_C3M]*y_cur[IDX_NaII] - + k[4089]*y_cur[IDX_C3M]*y_cur[IDX_OII] - + k[4090]*y_cur[IDX_C3M]*y_cur[IDX_SII] - + k[4091]*y_cur[IDX_C3M]*y_cur[IDX_SOII] - + k[4092]*y_cur[IDX_C3M]*y_cur[IDX_SiII] - + k[4093]*y_cur[IDX_C3M]*y_cur[IDX_SiOII] - + k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] - + k[4095]*y_cur[IDX_C3M]*y_cur[IDX_SiSII] + + k[5591]*y_cur[IDX_C3I]*y_cur[IDX_eM] - k[5716]*y_cur[IDX_C3M] - + k[6000]*y_cur[IDX_C3M]; + ydot[yistart + IDX_C4M] = 0.0 - k[22]*y_cur[IDX_C4M]*y_cur[IDX_C2I] + - k[23]*y_cur[IDX_C4M]*y_cur[IDX_C3I] - + k[24]*y_cur[IDX_C4M]*y_cur[IDX_C4I] - + k[25]*y_cur[IDX_C4M]*y_cur[IDX_C5I] - + k[26]*y_cur[IDX_C4M]*y_cur[IDX_C6I] - + k[43]*y_cur[IDX_CI]*y_cur[IDX_C4M] - + k[92]*y_cur[IDX_HI]*y_cur[IDX_C4M] - + k[114]*y_cur[IDX_NI]*y_cur[IDX_C4M] - + k[3402]*y_cur[IDX_NI]*y_cur[IDX_C4M] - + k[3403]*y_cur[IDX_NI]*y_cur[IDX_C4M] + + k[3411]*y_cur[IDX_NI]*y_cur[IDX_C5M] - + k[3698]*y_cur[IDX_OI]*y_cur[IDX_C4M] + + k[3703]*y_cur[IDX_OI]*y_cur[IDX_C5M] - + k[4166]*y_cur[IDX_C4M]*y_cur[IDX_CII] - + k[4167]*y_cur[IDX_C4M]*y_cur[IDX_C2H2II] - + k[4168]*y_cur[IDX_C4M]*y_cur[IDX_C2H3II] - + k[4169]*y_cur[IDX_C4M]*y_cur[IDX_C4H2II] - + k[4170]*y_cur[IDX_C4M]*y_cur[IDX_C4H3II] - + k[4171]*y_cur[IDX_C4M]*y_cur[IDX_C4SII] - + k[4172]*y_cur[IDX_C4M]*y_cur[IDX_CH2CCHII] - + k[4173]*y_cur[IDX_C4M]*y_cur[IDX_CH3II] - + k[4174]*y_cur[IDX_C4M]*y_cur[IDX_CNCII] - + k[4175]*y_cur[IDX_C4M]*y_cur[IDX_FeII] - + k[4176]*y_cur[IDX_C4M]*y_cur[IDX_HII] - + k[4177]*y_cur[IDX_C4M]*y_cur[IDX_H2COII] - + k[4178]*y_cur[IDX_C4M]*y_cur[IDX_H2SII] - + k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] - + k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] - + k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] - + k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] - + k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] - + k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] - + k[4185]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] - + k[4186]*y_cur[IDX_C4M]*y_cur[IDX_HeII] - + k[4187]*y_cur[IDX_C4M]*y_cur[IDX_MgII] - k[4188]*y_cur[IDX_C4M]*y_cur[IDX_NII] - - k[4223]*y_cur[IDX_C4HM]*y_cur[IDX_NII] - - k[4258]*y_cur[IDX_C5M]*y_cur[IDX_NII] - - k[4293]*y_cur[IDX_C5HM]*y_cur[IDX_NII] - - k[4328]*y_cur[IDX_C5NM]*y_cur[IDX_NII] - + k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] - + k[4190]*y_cur[IDX_C4M]*y_cur[IDX_NH3II] - + k[4191]*y_cur[IDX_C4M]*y_cur[IDX_NH4II] - + k[4192]*y_cur[IDX_C4M]*y_cur[IDX_NOII] - + k[4193]*y_cur[IDX_C4M]*y_cur[IDX_NaII] - + k[4194]*y_cur[IDX_C4M]*y_cur[IDX_OII] - + k[4195]*y_cur[IDX_C4M]*y_cur[IDX_SII] - + k[4196]*y_cur[IDX_C4M]*y_cur[IDX_SOII] - + k[4197]*y_cur[IDX_C4M]*y_cur[IDX_SiII] - + k[4198]*y_cur[IDX_C4M]*y_cur[IDX_SiOII] - + k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] - + k[4200]*y_cur[IDX_C4M]*y_cur[IDX_SiSII] + + k[5594]*y_cur[IDX_C4I]*y_cur[IDX_eM] - k[5726]*y_cur[IDX_C4M] - + k[6010]*y_cur[IDX_C4M]; + ydot[yistart + IDX_C6M] = 0.0 - k[31]*y_cur[IDX_C6M]*y_cur[IDX_C2I] + - k[32]*y_cur[IDX_C6M]*y_cur[IDX_C3I] - + k[33]*y_cur[IDX_C6M]*y_cur[IDX_C4I] - + k[47]*y_cur[IDX_CI]*y_cur[IDX_C6M] - + k[97]*y_cur[IDX_HI]*y_cur[IDX_C6M] - + k[3418]*y_cur[IDX_NI]*y_cur[IDX_C6M] - + k[3419]*y_cur[IDX_NI]*y_cur[IDX_C6M] - + k[3420]*y_cur[IDX_NI]*y_cur[IDX_C6M] + + k[3428]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3708]*y_cur[IDX_OI]*y_cur[IDX_C6M] + + k[3712]*y_cur[IDX_OI]*y_cur[IDX_C7M] - + k[4341]*y_cur[IDX_C6M]*y_cur[IDX_CII] - + k[4342]*y_cur[IDX_C6M]*y_cur[IDX_C2H2II] - + k[4343]*y_cur[IDX_C6M]*y_cur[IDX_C2H3II] - + k[4344]*y_cur[IDX_C6M]*y_cur[IDX_C4H2II] - + k[4345]*y_cur[IDX_C6M]*y_cur[IDX_C4H3II] - + k[4346]*y_cur[IDX_C6M]*y_cur[IDX_C4SII] - + k[4347]*y_cur[IDX_C6M]*y_cur[IDX_CH2CCHII] - + k[4348]*y_cur[IDX_C6M]*y_cur[IDX_CH3II] - + k[4349]*y_cur[IDX_C6M]*y_cur[IDX_CNCII] - + k[4350]*y_cur[IDX_C6M]*y_cur[IDX_FeII] - + k[4351]*y_cur[IDX_C6M]*y_cur[IDX_HII] - + k[4352]*y_cur[IDX_C6M]*y_cur[IDX_H2COII] - + k[4353]*y_cur[IDX_C6M]*y_cur[IDX_H2SII] - + k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] - + k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] - + k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] - + k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] - + k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] - + k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] - + k[4360]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] - + k[4361]*y_cur[IDX_C6M]*y_cur[IDX_HeII] - + k[4362]*y_cur[IDX_C6M]*y_cur[IDX_MgII] - k[4363]*y_cur[IDX_C6M]*y_cur[IDX_NII] - - k[4398]*y_cur[IDX_C6HM]*y_cur[IDX_NII] - + k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] - + k[4365]*y_cur[IDX_C6M]*y_cur[IDX_NH3II] - + k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] - + k[4367]*y_cur[IDX_C6M]*y_cur[IDX_NOII] - + k[4368]*y_cur[IDX_C6M]*y_cur[IDX_NaII] - + k[4369]*y_cur[IDX_C6M]*y_cur[IDX_OII] - + k[4370]*y_cur[IDX_C6M]*y_cur[IDX_SII] - + k[4371]*y_cur[IDX_C6M]*y_cur[IDX_SOII] - + k[4372]*y_cur[IDX_C6M]*y_cur[IDX_SiII] - + k[4373]*y_cur[IDX_C6M]*y_cur[IDX_SiOII] - + k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] - + k[4375]*y_cur[IDX_C6M]*y_cur[IDX_SiSII] + + k[5599]*y_cur[IDX_C6I]*y_cur[IDX_eM] - k[5747]*y_cur[IDX_C6M] - + k[6032]*y_cur[IDX_C6M]; + ydot[yistart + IDX_H3COII] = 0.0 - + k[1034]*y_cur[IDX_H3COII]*y_cur[IDX_eM] - + k[1035]*y_cur[IDX_H3COII]*y_cur[IDX_eM] - + k[1036]*y_cur[IDX_H3COII]*y_cur[IDX_eM] - + k[1037]*y_cur[IDX_H3COII]*y_cur[IDX_eM] - + k[1038]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1307]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] + + k[1381]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] + + k[1469]*y_cur[IDX_C2HII]*y_cur[IDX_H2COI] + + k[1720]*y_cur[IDX_C2H5II]*y_cur[IDX_H2COI] + + k[1939]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] + + k[1949]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + + k[1982]*y_cur[IDX_CH2II]*y_cur[IDX_H2OI] + + k[2067]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + + k[2073]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] + + k[2089]*y_cur[IDX_CH3II]*y_cur[IDX_O2I] + + k[2122]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] + + k[2141]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] + + k[2194]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + + k[2225]*y_cur[IDX_CH5II]*y_cur[IDX_H2COI] - + k[2248]*y_cur[IDX_CHI]*y_cur[IDX_H3COII] + + k[2331]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + + k[2488]*y_cur[IDX_H2COII]*y_cur[IDX_H2COI] + + k[2496]*y_cur[IDX_H2COI]*y_cur[IDX_H3SII] + + k[2497]*y_cur[IDX_H2COI]*y_cur[IDX_HNOII] + + k[2499]*y_cur[IDX_H2COI]*y_cur[IDX_O2HII] + + k[2508]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] - + k[2545]*y_cur[IDX_H2OI]*y_cur[IDX_H3COII] + + k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2665]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2682]*y_cur[IDX_H3II]*y_cur[IDX_H2COI] - + k[2762]*y_cur[IDX_H3COII]*y_cur[IDX_CH3OHI] - + k[2763]*y_cur[IDX_H3COII]*y_cur[IDX_H2SI] - + k[2764]*y_cur[IDX_H3COII]*y_cur[IDX_C4H2I] - + k[2765]*y_cur[IDX_H3COII]*y_cur[IDX_HCOOHI] + + k[2799]*y_cur[IDX_H3OII]*y_cur[IDX_H2COI] + + k[2855]*y_cur[IDX_HCNII]*y_cur[IDX_H2COI] - + k[2875]*y_cur[IDX_HCNI]*y_cur[IDX_H3COII] + + k[2890]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] + + k[2891]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] + + k[2958]*y_cur[IDX_HCOII]*y_cur[IDX_H2COI] + + k[3007]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] - + k[3039]*y_cur[IDX_HNCI]*y_cur[IDX_H3COII] + + k[3337]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3373]*y_cur[IDX_N2HII]*y_cur[IDX_H2COI] + + k[3487]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + + k[3510]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - + k[3537]*y_cur[IDX_NH2I]*y_cur[IDX_H3COII] - + k[3577]*y_cur[IDX_NH3I]*y_cur[IDX_H3COII] + + k[3611]*y_cur[IDX_NHI]*y_cur[IDX_H2COII] - + k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] + + k[3637]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + + k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] + + k[3728]*y_cur[IDX_OI]*y_cur[IDX_CH5II] + + k[3778]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] + + k[3849]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + + k[5627]*y_cur[IDX_CII]*y_cur[IDX_CH3OI] + + k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + + k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + + k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + + k[6123]*y_cur[IDX_CH3OHI] - + k[6414]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - + k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - + k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - + k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - + k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C5M] = 0.0 - k[27]*y_cur[IDX_C5M]*y_cur[IDX_C2I] + - k[28]*y_cur[IDX_C5M]*y_cur[IDX_C3I] - + k[29]*y_cur[IDX_C5M]*y_cur[IDX_C4I] - + k[30]*y_cur[IDX_C5M]*y_cur[IDX_C5I] - + k[45]*y_cur[IDX_CI]*y_cur[IDX_C5M] - + k[94]*y_cur[IDX_HI]*y_cur[IDX_C5M] - + k[116]*y_cur[IDX_NI]*y_cur[IDX_C5M] - + k[3409]*y_cur[IDX_NI]*y_cur[IDX_C5M] - + k[3410]*y_cur[IDX_NI]*y_cur[IDX_C5M] - + k[3411]*y_cur[IDX_NI]*y_cur[IDX_C5M] + + k[3420]*y_cur[IDX_NI]*y_cur[IDX_C6M] - + k[3703]*y_cur[IDX_OI]*y_cur[IDX_C5M] + + k[3708]*y_cur[IDX_OI]*y_cur[IDX_C6M] - + k[4236]*y_cur[IDX_C5M]*y_cur[IDX_CII] - + k[4237]*y_cur[IDX_C5M]*y_cur[IDX_C2H2II] - + k[4238]*y_cur[IDX_C5M]*y_cur[IDX_C2H3II] - + k[4239]*y_cur[IDX_C5M]*y_cur[IDX_C4H2II] - + k[4240]*y_cur[IDX_C5M]*y_cur[IDX_C4H3II] - + k[4241]*y_cur[IDX_C5M]*y_cur[IDX_C4SII] - + k[4242]*y_cur[IDX_C5M]*y_cur[IDX_CH2CCHII] - + k[4243]*y_cur[IDX_C5M]*y_cur[IDX_CH3II] - + k[4244]*y_cur[IDX_C5M]*y_cur[IDX_CNCII] - + k[4245]*y_cur[IDX_C5M]*y_cur[IDX_FeII] - + k[4246]*y_cur[IDX_C5M]*y_cur[IDX_HII] - + k[4247]*y_cur[IDX_C5M]*y_cur[IDX_H2COII] - + k[4248]*y_cur[IDX_C5M]*y_cur[IDX_H2SII] - + k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] - + k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] - + k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] - + k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] - + k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] - + k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] - + k[4255]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] - + k[4256]*y_cur[IDX_C5M]*y_cur[IDX_HeII] - + k[4257]*y_cur[IDX_C5M]*y_cur[IDX_MgII] - + k[4258]*y_cur[IDX_C5M]*y_cur[IDX_NII] - + k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] - + k[4260]*y_cur[IDX_C5M]*y_cur[IDX_NH3II] - + k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] - + k[4262]*y_cur[IDX_C5M]*y_cur[IDX_NOII] - + k[4263]*y_cur[IDX_C5M]*y_cur[IDX_NaII] - + k[4264]*y_cur[IDX_C5M]*y_cur[IDX_OII] - + k[4265]*y_cur[IDX_C5M]*y_cur[IDX_SII] - + k[4266]*y_cur[IDX_C5M]*y_cur[IDX_SOII] - + k[4267]*y_cur[IDX_C5M]*y_cur[IDX_SiII] - + k[4268]*y_cur[IDX_C5M]*y_cur[IDX_SiOII] - + k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] - + k[4270]*y_cur[IDX_C5M]*y_cur[IDX_SiSII] + + k[5596]*y_cur[IDX_C5I]*y_cur[IDX_eM] - k[5736]*y_cur[IDX_C5M] - + k[6022]*y_cur[IDX_C5M]; + ydot[yistart + IDX_C7M] = 0.0 - k[34]*y_cur[IDX_C7M]*y_cur[IDX_C2I] + - k[35]*y_cur[IDX_C7M]*y_cur[IDX_C3I] - + k[49]*y_cur[IDX_CI]*y_cur[IDX_C7M] - + k[99]*y_cur[IDX_HI]*y_cur[IDX_C7M] - + k[118]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3425]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3426]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3427]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3428]*y_cur[IDX_NI]*y_cur[IDX_C7M] + + k[3439]*y_cur[IDX_NI]*y_cur[IDX_C8M] - + k[3712]*y_cur[IDX_OI]*y_cur[IDX_C7M] + + k[3717]*y_cur[IDX_OI]*y_cur[IDX_C8M] - + k[4411]*y_cur[IDX_C7M]*y_cur[IDX_CII] - + k[4412]*y_cur[IDX_C7M]*y_cur[IDX_C2H2II] - + k[4413]*y_cur[IDX_C7M]*y_cur[IDX_C2H3II] - + k[4414]*y_cur[IDX_C7M]*y_cur[IDX_C4H2II] - + k[4415]*y_cur[IDX_C7M]*y_cur[IDX_C4H3II] - + k[4416]*y_cur[IDX_C7M]*y_cur[IDX_C4SII] - + k[4417]*y_cur[IDX_C7M]*y_cur[IDX_CH2CCHII] - + k[4418]*y_cur[IDX_C7M]*y_cur[IDX_CH3II] - + k[4419]*y_cur[IDX_C7M]*y_cur[IDX_CNCII] - + k[4420]*y_cur[IDX_C7M]*y_cur[IDX_FeII] - + k[4421]*y_cur[IDX_C7M]*y_cur[IDX_HII] - + k[4422]*y_cur[IDX_C7M]*y_cur[IDX_H2COII] - + k[4423]*y_cur[IDX_C7M]*y_cur[IDX_H2SII] - + k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] - + k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] - + k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] - + k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] - + k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] - + k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] - + k[4430]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] - + k[4431]*y_cur[IDX_C7M]*y_cur[IDX_HeII] - + k[4432]*y_cur[IDX_C7M]*y_cur[IDX_MgII] - k[4433]*y_cur[IDX_C7M]*y_cur[IDX_NII] - - k[4468]*y_cur[IDX_C7HM]*y_cur[IDX_NII] - - k[4503]*y_cur[IDX_C8M]*y_cur[IDX_NII] - - k[4538]*y_cur[IDX_C8HM]*y_cur[IDX_NII] - - k[4573]*y_cur[IDX_C9M]*y_cur[IDX_NII] - - k[4608]*y_cur[IDX_C9HM]*y_cur[IDX_NII] - - k[4643]*y_cur[IDX_CHM]*y_cur[IDX_NII] - - k[4678]*y_cur[IDX_CNM]*y_cur[IDX_NII] - - k[4714]*y_cur[IDX_HM]*y_cur[IDX_NII] - - k[4749]*y_cur[IDX_OM]*y_cur[IDX_NII] - - k[4784]*y_cur[IDX_O2M]*y_cur[IDX_NII] - - k[4819]*y_cur[IDX_OHM]*y_cur[IDX_NII] - - k[4854]*y_cur[IDX_SM]*y_cur[IDX_NII] - - k[5581]*y_cur[IDX_NII]*y_cur[IDX_NI] - - k[5621]*y_cur[IDX_NII]*y_cur[IDX_eM] + k[5684]*y_cur[IDX_NI] + - k[5880]*y_cur[IDX_NI] + k[6300]*y_cur[IDX_NI] - - k[6319]*y_cur[IDX_NII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_N2I] = 0.0 + - k[210]*y_cur[IDX_C2I]*y_cur[IDX_N2II] + + k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] - + k[4435]*y_cur[IDX_C7M]*y_cur[IDX_NH3II] - + k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] - + k[4437]*y_cur[IDX_C7M]*y_cur[IDX_NOII] - + k[4438]*y_cur[IDX_C7M]*y_cur[IDX_NaII] - + k[4439]*y_cur[IDX_C7M]*y_cur[IDX_OII] - + k[4440]*y_cur[IDX_C7M]*y_cur[IDX_SII] - + k[4441]*y_cur[IDX_C7M]*y_cur[IDX_SOII] - + k[4442]*y_cur[IDX_C7M]*y_cur[IDX_SiII] - + k[4443]*y_cur[IDX_C7M]*y_cur[IDX_SiOII] - + k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] - + k[4445]*y_cur[IDX_C7M]*y_cur[IDX_SiSII] + + k[5601]*y_cur[IDX_C7I]*y_cur[IDX_eM] - k[5755]*y_cur[IDX_C7M] - + k[6041]*y_cur[IDX_C7M]; + ydot[yistart + IDX_SiOII] = 0.0 + + k[434]*y_cur[IDX_HII]*y_cur[IDX_SiOI] - + k[504]*y_cur[IDX_HCOI]*y_cur[IDX_SiOII] - + k[541]*y_cur[IDX_MgI]*y_cur[IDX_SiOII] - + k[631]*y_cur[IDX_NOI]*y_cur[IDX_SiOII] - + k[726]*y_cur[IDX_SiOII]*y_cur[IDX_FeI] - + k[1266]*y_cur[IDX_SiOII]*y_cur[IDX_eM] - + k[1465]*y_cur[IDX_C2I]*y_cur[IDX_SiOII] - + k[1932]*y_cur[IDX_CI]*y_cur[IDX_SiOII] - + k[2019]*y_cur[IDX_CH2I]*y_cur[IDX_SiOII] - + k[2268]*y_cur[IDX_CHI]*y_cur[IDX_SiOII] - + k[2292]*y_cur[IDX_COI]*y_cur[IDX_SiOII] - + k[2475]*y_cur[IDX_H2I]*y_cur[IDX_SiOII] - + k[3475]*y_cur[IDX_NI]*y_cur[IDX_SiOII] - + k[3476]*y_cur[IDX_NI]*y_cur[IDX_SiOII] + + k[3676]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + + k[3753]*y_cur[IDX_OI]*y_cur[IDX_SiCII] + + k[3756]*y_cur[IDX_OI]*y_cur[IDX_SiHII] + + k[3761]*y_cur[IDX_OI]*y_cur[IDX_SiNII] - + k[3764]*y_cur[IDX_OI]*y_cur[IDX_SiOII] + + k[3809]*y_cur[IDX_OHI]*y_cur[IDX_SiII] - + k[3842]*y_cur[IDX_SI]*y_cur[IDX_SiOII] - + k[3918]*y_cur[IDX_CM]*y_cur[IDX_SiOII] - + k[3953]*y_cur[IDX_C10M]*y_cur[IDX_SiOII] - + k[3988]*y_cur[IDX_C10HM]*y_cur[IDX_SiOII] - + k[4023]*y_cur[IDX_C2M]*y_cur[IDX_SiOII] - + k[4058]*y_cur[IDX_C2HM]*y_cur[IDX_SiOII] - + k[4093]*y_cur[IDX_C3M]*y_cur[IDX_SiOII] - + k[4128]*y_cur[IDX_C3HM]*y_cur[IDX_SiOII] - + k[4163]*y_cur[IDX_C3NM]*y_cur[IDX_SiOII] - + k[4198]*y_cur[IDX_C4M]*y_cur[IDX_SiOII] - + k[4233]*y_cur[IDX_C4HM]*y_cur[IDX_SiOII] - + k[4268]*y_cur[IDX_C5M]*y_cur[IDX_SiOII] - + k[4303]*y_cur[IDX_C5HM]*y_cur[IDX_SiOII] - + k[4338]*y_cur[IDX_C5NM]*y_cur[IDX_SiOII] - + k[4373]*y_cur[IDX_C6M]*y_cur[IDX_SiOII] - + k[4408]*y_cur[IDX_C6HM]*y_cur[IDX_SiOII] - + k[4443]*y_cur[IDX_C7M]*y_cur[IDX_SiOII] - + k[4478]*y_cur[IDX_C7HM]*y_cur[IDX_SiOII] - + k[4513]*y_cur[IDX_C8M]*y_cur[IDX_SiOII] - + k[4548]*y_cur[IDX_C8HM]*y_cur[IDX_SiOII] - + k[4583]*y_cur[IDX_C9M]*y_cur[IDX_SiOII] - + k[4618]*y_cur[IDX_C9HM]*y_cur[IDX_SiOII] - + k[4653]*y_cur[IDX_CHM]*y_cur[IDX_SiOII] - + k[4688]*y_cur[IDX_CNM]*y_cur[IDX_SiOII] - + k[4724]*y_cur[IDX_HM]*y_cur[IDX_SiOII] - + k[4759]*y_cur[IDX_OM]*y_cur[IDX_SiOII] - + k[4794]*y_cur[IDX_O2M]*y_cur[IDX_SiOII] - + k[4829]*y_cur[IDX_OHM]*y_cur[IDX_SiOII] - + k[4864]*y_cur[IDX_SM]*y_cur[IDX_SiOII] + + k[5584]*y_cur[IDX_OI]*y_cur[IDX_SiII] - k[6284]*y_cur[IDX_SiOII] + + k[6287]*y_cur[IDX_SiOI] - + k[6531]*y_cur[IDX_SiOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2NI] = 0.0 + k[110]*y_cur[IDX_NI]*y_cur[IDX_C2M] + + k[111]*y_cur[IDX_NI]*y_cur[IDX_C2HM] + + k[130]*y_cur[IDX_OI]*y_cur[IDX_C3NM] - + k[330]*y_cur[IDX_HII]*y_cur[IDX_C2NI] + + k[782]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] + + k[784]*y_cur[IDX_C2NHII]*y_cur[IDX_eM] + + k[831]*y_cur[IDX_C4NII]*y_cur[IDX_eM] - + k[2598]*y_cur[IDX_H3II]*y_cur[IDX_C2NI] - + k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] + + k[3894]*y_cur[IDX_CM]*y_cur[IDX_CNCII] + + k[3929]*y_cur[IDX_C10M]*y_cur[IDX_CNCII] + + k[3964]*y_cur[IDX_C10HM]*y_cur[IDX_CNCII] + + k[3999]*y_cur[IDX_C2M]*y_cur[IDX_CNCII] + + k[4034]*y_cur[IDX_C2HM]*y_cur[IDX_CNCII] + + k[4069]*y_cur[IDX_C3M]*y_cur[IDX_CNCII] + + k[4104]*y_cur[IDX_C3HM]*y_cur[IDX_CNCII] + + k[4139]*y_cur[IDX_C3NM]*y_cur[IDX_CNCII] + + k[4174]*y_cur[IDX_C4M]*y_cur[IDX_CNCII] + + k[4209]*y_cur[IDX_C4HM]*y_cur[IDX_CNCII] + + k[4244]*y_cur[IDX_C5M]*y_cur[IDX_CNCII] + + k[4279]*y_cur[IDX_C5HM]*y_cur[IDX_CNCII] + + k[4314]*y_cur[IDX_C5NM]*y_cur[IDX_CNCII] + + k[4349]*y_cur[IDX_C6M]*y_cur[IDX_CNCII] + + k[4384]*y_cur[IDX_C6HM]*y_cur[IDX_CNCII] + + k[4419]*y_cur[IDX_C7M]*y_cur[IDX_CNCII] + + k[4454]*y_cur[IDX_C7HM]*y_cur[IDX_CNCII] + + k[4489]*y_cur[IDX_C8M]*y_cur[IDX_CNCII] + + k[4524]*y_cur[IDX_C8HM]*y_cur[IDX_CNCII] + + k[4559]*y_cur[IDX_C9M]*y_cur[IDX_CNCII] + + k[4594]*y_cur[IDX_C9HM]*y_cur[IDX_CNCII] + + k[4629]*y_cur[IDX_CHM]*y_cur[IDX_CNCII] + + k[4664]*y_cur[IDX_CNM]*y_cur[IDX_CNCII] + + k[4699]*y_cur[IDX_HM]*y_cur[IDX_CNCII] + + k[4735]*y_cur[IDX_OM]*y_cur[IDX_CNCII] + + k[4770]*y_cur[IDX_O2M]*y_cur[IDX_CNCII] + + k[4805]*y_cur[IDX_OHM]*y_cur[IDX_CNCII] + + k[4840]*y_cur[IDX_SM]*y_cur[IDX_CNCII] - + k[4917]*y_cur[IDX_CI]*y_cur[IDX_C2NI] + + k[4960]*y_cur[IDX_CI]*y_cur[IDX_H2CNI] + + k[4968]*y_cur[IDX_CI]*y_cur[IDX_NCCNI] + + k[5217]*y_cur[IDX_HONCI]*y_cur[IDX_CI] + + k[5228]*y_cur[IDX_NI]*y_cur[IDX_C2HI] - + k[5229]*y_cur[IDX_NI]*y_cur[IDX_C2NI] + + k[5234]*y_cur[IDX_NI]*y_cur[IDX_C3NI] + + k[5247]*y_cur[IDX_NI]*y_cur[IDX_C7NI] + + k[5252]*y_cur[IDX_NI]*y_cur[IDX_C9NI] + + k[5273]*y_cur[IDX_NI]*y_cur[IDX_NCCNI] - + k[5353]*y_cur[IDX_OI]*y_cur[IDX_C2NI] + + k[5358]*y_cur[IDX_OI]*y_cur[IDX_C3NI] - k[5710]*y_cur[IDX_C2NI] - + k[5711]*y_cur[IDX_C2NI] + k[5940]*y_cur[IDX_HCCNI] - + k[5995]*y_cur[IDX_C2NI] - k[5996]*y_cur[IDX_C2NI] + + k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM] + + k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + + k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] - k[6947]*y_cur[IDX_C2NI] + + k[7129]*y_cur[IDX_GC2NI] + k[7311]*y_cur[IDX_GC2NI] + + k[7493]*y_cur[IDX_GC2NI] + k[8664]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] + + k[8703]*y_cur[IDX_GNI]*y_cur[IDX_GC2I]; + ydot[yistart + IDX_GCHI] = 0.0 + k[6892]*y_cur[IDX_CHI] - + k[7074]*y_cur[IDX_GCHI] - k[7256]*y_cur[IDX_GCHI] - + k[7438]*y_cur[IDX_GCHI] - k[7618]*y_cur[IDX_GCHI] + + k[7619]*y_cur[IDX_GCH2I] + k[7622]*y_cur[IDX_GCH2I] + + k[7626]*y_cur[IDX_GCH3I] + k[7628]*y_cur[IDX_GCH3I] + + k[7629]*y_cur[IDX_GCH3I] + k[7644]*y_cur[IDX_GC2HI] + + k[7648]*y_cur[IDX_GC2H2I] + k[7648]*y_cur[IDX_GC2H2I] + + k[7661]*y_cur[IDX_GC2H3I] + k[7662]*y_cur[IDX_GC2H3I] + + k[7673]*y_cur[IDX_GC2H4I] + k[7700]*y_cur[IDX_GCH3OHI] + + k[7722]*y_cur[IDX_GCH2CCH2I] + k[7730]*y_cur[IDX_GCH3CCHI] + + k[7738]*y_cur[IDX_GHCSiI] + k[7752]*y_cur[IDX_GHCNOI] + + k[7766]*y_cur[IDX_GHCSI] + k[7887]*y_cur[IDX_GHC2OI] - + k[7894]*y_cur[IDX_GCHI] - k[7895]*y_cur[IDX_GCHI] + + k[7896]*y_cur[IDX_GCH2I] + k[7899]*y_cur[IDX_GCH2I] + + k[7903]*y_cur[IDX_GCH3I] + k[7905]*y_cur[IDX_GCH3I] + + k[7906]*y_cur[IDX_GCH3I] + k[7912]*y_cur[IDX_GCH4I] + + k[7931]*y_cur[IDX_GC2HI] + k[7935]*y_cur[IDX_GC2H2I] + + k[7935]*y_cur[IDX_GC2H2I] + k[7948]*y_cur[IDX_GC2H3I] + + k[7949]*y_cur[IDX_GC2H3I] + k[7960]*y_cur[IDX_GC2H4I] + + k[8000]*y_cur[IDX_GCH3OHI] + k[8030]*y_cur[IDX_GCH2CCH2I] + + k[8039]*y_cur[IDX_GCH3CCHI] + k[8048]*y_cur[IDX_GHCSiI] + + k[8066]*y_cur[IDX_GHCNOI] + k[8086]*y_cur[IDX_GHCSI] + + k[8274]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - + k[8275]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - + k[8395]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - + k[8437]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - + k[8455]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] - + k[8473]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - + k[8477]*y_cur[IDX_GCHI]*y_cur[IDX_GHNOI] - + k[8478]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] - + k[8478]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] - + k[8479]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] - + k[8480]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] - + k[8481]*y_cur[IDX_GCHI]*y_cur[IDX_GNOI] - + k[8482]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - + k[8483]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] - + k[8484]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] - + k[8485]*y_cur[IDX_GCHI]*y_cur[IDX_GO2I] - + k[8486]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I] - + k[8487]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI] - + k[8488]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - + k[8489]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - + k[8490]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - + k[8491]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I] - + k[8492]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI] - + k[8493]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I] - + k[8494]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI] - + k[8495]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I] - + k[8496]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI] - + k[8497]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I] - + k[8498]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI] - + k[8499]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I] - + k[8500]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI] - + k[8501]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I] - + k[8502]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI] - + k[8503]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI] - + k[8577]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - + k[8655]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - + k[8685]*y_cur[IDX_GOI]*y_cur[IDX_GCHI] - + k[8698]*y_cur[IDX_GNI]*y_cur[IDX_GCHI] - + k[8713]*y_cur[IDX_GSI]*y_cur[IDX_GCHI] - + k[8715]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] - + k[8715]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI] - + k[8716]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I] - + k[8717]*y_cur[IDX_GCHI]*y_cur[IDX_GNH2I] - + k[8718]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] - + k[8719]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I] - + k[8720]*y_cur[IDX_GCHI]*y_cur[IDX_GC2HI] - + k[8721]*y_cur[IDX_GCHI]*y_cur[IDX_GCNI] - + k[8722]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - + k[8723]*y_cur[IDX_GCHI]*y_cur[IDX_GC2H3I] - + k[8724]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I] - + k[8725]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI] - + k[8726]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I] - + k[8727]*y_cur[IDX_GCHI]*y_cur[IDX_GC4HI] - + k[8728]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I] - + k[8729]*y_cur[IDX_GCHI]*y_cur[IDX_GC5HI] - + k[8730]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I] - + k[8731]*y_cur[IDX_GCHI]*y_cur[IDX_GC6HI] - + k[8732]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I] - + k[8733]*y_cur[IDX_GCHI]*y_cur[IDX_GC7HI] - + k[8734]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I] - + k[8735]*y_cur[IDX_GCHI]*y_cur[IDX_GC8HI] - + k[8736]*y_cur[IDX_GCHI]*y_cur[IDX_GC9HI]; + ydot[yistart + IDX_SiOHII] = 0.0 - + k[1267]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] - + k[1268]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] + + k[2341]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] + + k[2475]*y_cur[IDX_H2I]*y_cur[IDX_SiOII] + + k[2556]*y_cur[IDX_H2OI]*y_cur[IDX_HSiSII] + + k[2569]*y_cur[IDX_H2OI]*y_cur[IDX_SiII] + + k[2760]*y_cur[IDX_H3II]*y_cur[IDX_SiOI] + + k[2826]*y_cur[IDX_H3OII]*y_cur[IDX_SiOI] + + k[3005]*y_cur[IDX_HCOII]*y_cur[IDX_SiOI] + + k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] - + k[3604]*y_cur[IDX_NH3I]*y_cur[IDX_SiOHII] + + k[3757]*y_cur[IDX_OI]*y_cur[IDX_SiH2II] + + k[3759]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] + + k[3794]*y_cur[IDX_OHII]*y_cur[IDX_SiOI] + + k[3859]*y_cur[IDX_SiII]*y_cur[IDX_C2H5OHI] + + k[3867]*y_cur[IDX_SiII]*y_cur[IDX_CH3OHI] + + k[3882]*y_cur[IDX_SiH2II]*y_cur[IDX_O2I] - + k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] - + k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] - + k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] - + k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] - + k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] - + k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] - + k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] - + k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] - + k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] - + k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] - + k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] - + k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] - + k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] - + k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] - + k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] - + k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] - + k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] - + k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] - + k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] - + k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] - + k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] - + k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] - + k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] - + k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] - + k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] - + k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] - + k[4830]*y_cur[IDX_OHM]*y_cur[IDX_SiOHII] - + k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] - + k[6556]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] - + k[6557]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NH2I] = 0.0 - k[78]*y_cur[IDX_HM]*y_cur[IDX_NH2I] + + k[79]*y_cur[IDX_HM]*y_cur[IDX_NHI] + + k[265]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] + + k[294]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] - + k[400]*y_cur[IDX_HII]*y_cur[IDX_NH2I] - + k[451]*y_cur[IDX_H2II]*y_cur[IDX_NH2I] - + k[557]*y_cur[IDX_NII]*y_cur[IDX_NH2I] + + k[580]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + + k[581]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] + + k[582]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] + + k[583]*y_cur[IDX_NH2II]*y_cur[IDX_NOI] + + k[584]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - + k[585]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] - + k[586]*y_cur[IDX_NH2I]*y_cur[IDX_CNII] - + k[587]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - + k[588]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] - + k[589]*y_cur[IDX_NH2I]*y_cur[IDX_N2II] - + k[590]*y_cur[IDX_NH2I]*y_cur[IDX_O2II] - + k[591]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] - + k[660]*y_cur[IDX_OII]*y_cur[IDX_NH2I] + + k[922]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] + + k[1009]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + + k[1161]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] + + k[1163]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + + k[1165]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + + k[1166]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + + k[1212]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + + k[1216]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - + k[1417]*y_cur[IDX_CII]*y_cur[IDX_NH2I] - + k[1962]*y_cur[IDX_CHII]*y_cur[IDX_NH2I] + + k[2013]*y_cur[IDX_CH2I]*y_cur[IDX_NH3II] - + k[2086]*y_cur[IDX_CH3II]*y_cur[IDX_NH2I] + + k[2199]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] + + k[2318]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - + k[2721]*y_cur[IDX_H3II]*y_cur[IDX_NH2I] - + k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] - + k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + + k[3488]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - + k[3497]*y_cur[IDX_NHII]*y_cur[IDX_NH2I] - + k[3522]*y_cur[IDX_NH2II]*y_cur[IDX_NH2I] - + k[3528]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] - + k[3529]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - + k[3530]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - + k[3531]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] - + k[3532]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] - + k[3533]*y_cur[IDX_NH2I]*y_cur[IDX_CH5II] - + k[3534]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - + k[3535]*y_cur[IDX_NH2I]*y_cur[IDX_H2COII] - + k[3536]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] - + k[3537]*y_cur[IDX_NH2I]*y_cur[IDX_H3COII] - + k[3538]*y_cur[IDX_NH2I]*y_cur[IDX_H3OII] - + k[3539]*y_cur[IDX_NH2I]*y_cur[IDX_HCNII] - + k[3540]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] - + k[3541]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] - + k[3542]*y_cur[IDX_NH2I]*y_cur[IDX_HCOII] - + k[3543]*y_cur[IDX_NH2I]*y_cur[IDX_HNOII] - + k[3544]*y_cur[IDX_NH2I]*y_cur[IDX_N2HII] - + k[3545]*y_cur[IDX_NH2I]*y_cur[IDX_NH3II] - + k[3546]*y_cur[IDX_NH2I]*y_cur[IDX_O2HII] - + k[3547]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] + + k[3553]*y_cur[IDX_NH3II]*y_cur[IDX_NH3I] + + k[3573]*y_cur[IDX_NH3I]*y_cur[IDX_COII] + + k[3581]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - + k[4969]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - + k[4970]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - + k[4971]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - + k[5035]*y_cur[IDX_CH3I]*y_cur[IDX_NH2I] + + k[5036]*y_cur[IDX_CH3I]*y_cur[IDX_NH3I] - + k[5142]*y_cur[IDX_H2I]*y_cur[IDX_NH2I] + + k[5143]*y_cur[IDX_H2I]*y_cur[IDX_NHI] + + k[5175]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - + k[5182]*y_cur[IDX_HI]*y_cur[IDX_NH2I] + + k[5183]*y_cur[IDX_HI]*y_cur[IDX_NH3I] - + k[5297]*y_cur[IDX_NH2I]*y_cur[IDX_CH4I] - + k[5298]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] - + k[5299]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] - + k[5300]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] - + k[5301]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] + + k[5302]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] + + k[5304]*y_cur[IDX_NHI]*y_cur[IDX_CH4I] + + k[5306]*y_cur[IDX_NHI]*y_cur[IDX_H2OI] + + k[5307]*y_cur[IDX_NHI]*y_cur[IDX_NH3I] + + k[5307]*y_cur[IDX_NHI]*y_cur[IDX_NH3I] + + k[5310]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + + k[5323]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - + k[5420]*y_cur[IDX_OI]*y_cur[IDX_NH2I] - + k[5421]*y_cur[IDX_OI]*y_cur[IDX_NH2I] + + k[5422]*y_cur[IDX_OI]*y_cur[IDX_NH3I] + + k[5470]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] + + k[5476]*y_cur[IDX_OHI]*y_cur[IDX_NH3I] - k[5882]*y_cur[IDX_NH2I] - + k[5883]*y_cur[IDX_NH2I] + k[5884]*y_cur[IDX_NH2CNI] + + k[5885]*y_cur[IDX_NH3I] - k[6218]*y_cur[IDX_NH2I] - + k[6219]*y_cur[IDX_NH2I] + k[6220]*y_cur[IDX_NH2CNI] + + k[6221]*y_cur[IDX_NH3I] + k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + + k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + + k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + + k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + + k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + + k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - + k[6897]*y_cur[IDX_NH2I] + k[7079]*y_cur[IDX_GNH2I] + + k[7261]*y_cur[IDX_GNH2I] + k[7443]*y_cur[IDX_GNH2I] + + k[8581]*y_cur[IDX_GHI]*y_cur[IDX_GNHI]; + ydot[yistart + IDX_C4H3I] = 0.0 - + k[155]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - + k[339]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] + + k[826]*y_cur[IDX_C4H4II]*y_cur[IDX_eM] - + k[1317]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - + k[1318]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - + k[1319]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + + k[1328]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - + k[2302]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] - + k[2609]*y_cur[IDX_H3II]*y_cur[IDX_C4H3I] - + k[2779]*y_cur[IDX_H3OII]*y_cur[IDX_C4H3I] - + k[2914]*y_cur[IDX_HCOII]*y_cur[IDX_C4H3I] - + k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - + k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - + k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + + k[3890]*y_cur[IDX_CM]*y_cur[IDX_C4H3II] + + k[3925]*y_cur[IDX_C10M]*y_cur[IDX_C4H3II] + + k[3960]*y_cur[IDX_C10HM]*y_cur[IDX_C4H3II] + + k[3995]*y_cur[IDX_C2M]*y_cur[IDX_C4H3II] + + k[4030]*y_cur[IDX_C2HM]*y_cur[IDX_C4H3II] + + k[4065]*y_cur[IDX_C3M]*y_cur[IDX_C4H3II] + + k[4100]*y_cur[IDX_C3HM]*y_cur[IDX_C4H3II] + + k[4135]*y_cur[IDX_C3NM]*y_cur[IDX_C4H3II] + + k[4170]*y_cur[IDX_C4M]*y_cur[IDX_C4H3II] + + k[4205]*y_cur[IDX_C4HM]*y_cur[IDX_C4H3II] + + k[4240]*y_cur[IDX_C5M]*y_cur[IDX_C4H3II] + + k[4275]*y_cur[IDX_C5HM]*y_cur[IDX_C4H3II] + + k[4310]*y_cur[IDX_C5NM]*y_cur[IDX_C4H3II] + + k[4345]*y_cur[IDX_C6M]*y_cur[IDX_C4H3II] + + k[4380]*y_cur[IDX_C6HM]*y_cur[IDX_C4H3II] + + k[4415]*y_cur[IDX_C7M]*y_cur[IDX_C4H3II] + + k[4450]*y_cur[IDX_C7HM]*y_cur[IDX_C4H3II] + + k[4485]*y_cur[IDX_C8M]*y_cur[IDX_C4H3II] + + k[4520]*y_cur[IDX_C8HM]*y_cur[IDX_C4H3II] + + k[4555]*y_cur[IDX_C9M]*y_cur[IDX_C4H3II] + + k[4590]*y_cur[IDX_C9HM]*y_cur[IDX_C4H3II] + + k[4625]*y_cur[IDX_CHM]*y_cur[IDX_C4H3II] + + k[4660]*y_cur[IDX_CNM]*y_cur[IDX_C4H3II] + + k[4695]*y_cur[IDX_HM]*y_cur[IDX_C4H3II] + + k[4731]*y_cur[IDX_OM]*y_cur[IDX_C4H3II] + + k[4766]*y_cur[IDX_O2M]*y_cur[IDX_C4H3II] + + k[4801]*y_cur[IDX_OHM]*y_cur[IDX_C4H3II] + + k[4836]*y_cur[IDX_SM]*y_cur[IDX_C4H3II] + + k[4868]*y_cur[IDX_C2I]*y_cur[IDX_C2H4I] - + k[4924]*y_cur[IDX_CI]*y_cur[IDX_C4H3I] + + k[4946]*y_cur[IDX_CI]*y_cur[IDX_CH2CCH2I] + + k[4952]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] + + k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] - + k[5730]*y_cur[IDX_C4H3I] - k[6014]*y_cur[IDX_C4H3I] - + k[6015]*y_cur[IDX_C4H3I] + + k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM] - + k[7002]*y_cur[IDX_C4H3I] + k[7184]*y_cur[IDX_GC4H3I] + + k[7366]*y_cur[IDX_GC4H3I] + k[7548]*y_cur[IDX_GC4H3I] + + k[8631]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I]; + ydot[yistart + IDX_C2HII] = 0.0 - + k[212]*y_cur[IDX_C2HII]*y_cur[IDX_NOI] - + k[213]*y_cur[IDX_C2HII]*y_cur[IDX_SI] + + k[241]*y_cur[IDX_C2HI]*y_cur[IDX_CNII] + + k[242]*y_cur[IDX_C2HI]*y_cur[IDX_COII] + k[243]*y_cur[IDX_C2HI]*y_cur[IDX_N2II] + - k[247]*y_cur[IDX_CI]*y_cur[IDX_N2II] + - k[264]*y_cur[IDX_CH2I]*y_cur[IDX_N2II] + - k[293]*y_cur[IDX_CHI]*y_cur[IDX_N2II] + - k[306]*y_cur[IDX_CNI]*y_cur[IDX_N2II] + - k[316]*y_cur[IDX_COI]*y_cur[IDX_N2II] + - k[481]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] + - k[498]*y_cur[IDX_HCNI]*y_cur[IDX_N2II] - - k[523]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + - k[535]*y_cur[IDX_MgI]*y_cur[IDX_N2II] + - k[564]*y_cur[IDX_N2II]*y_cur[IDX_CO2I] + - k[565]*y_cur[IDX_N2II]*y_cur[IDX_FeI] + - k[566]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + - k[567]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + - k[568]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + - k[569]*y_cur[IDX_N2II]*y_cur[IDX_NOI] + - k[570]*y_cur[IDX_N2II]*y_cur[IDX_O2I] + - k[571]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] + - k[572]*y_cur[IDX_N2II]*y_cur[IDX_SI] + - k[573]*y_cur[IDX_NI]*y_cur[IDX_N2II] + - k[589]*y_cur[IDX_NH2I]*y_cur[IDX_N2II] + - k[610]*y_cur[IDX_NH3I]*y_cur[IDX_N2II] + - k[618]*y_cur[IDX_NHI]*y_cur[IDX_N2II] + - k[640]*y_cur[IDX_NaI]*y_cur[IDX_N2II] + - k[684]*y_cur[IDX_OI]*y_cur[IDX_N2II] + - k[700]*y_cur[IDX_OHI]*y_cur[IDX_N2II] + - k[1113]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] + - k[1114]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] + - k[1151]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + - k[1152]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + - k[1170]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + + k[329]*y_cur[IDX_HII]*y_cur[IDX_C2HI] + + k[439]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] + + k[465]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] + + k[543]*y_cur[IDX_NII]*y_cur[IDX_C2HI] + + k[649]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + + k[686]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] - + k[740]*y_cur[IDX_C2HII]*y_cur[IDX_eM] - + k[741]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + + k[1342]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + + k[1352]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + + k[1454]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + + k[1457]*y_cur[IDX_C2I]*y_cur[IDX_H2COII] + + k[1458]*y_cur[IDX_C2I]*y_cur[IDX_HCNII] + + k[1459]*y_cur[IDX_C2I]*y_cur[IDX_HCOII] + + k[1460]*y_cur[IDX_C2I]*y_cur[IDX_HNOII] + k[1461]*y_cur[IDX_C2I]*y_cur[IDX_N2HII] + - k[1568]*y_cur[IDX_C2H2I]*y_cur[IDX_N2HII] + - k[1748]*y_cur[IDX_C2HI]*y_cur[IDX_N2HII] + - k[1909]*y_cur[IDX_CI]*y_cur[IDX_N2HII] + - k[2010]*y_cur[IDX_CH2I]*y_cur[IDX_N2HII] + - k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] + - k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + - k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + - k[2206]*y_cur[IDX_CH4I]*y_cur[IDX_N2HII] + - k[2257]*y_cur[IDX_CHI]*y_cur[IDX_N2HII] + - k[2288]*y_cur[IDX_COI]*y_cur[IDX_N2HII] - - k[2391]*y_cur[IDX_H2II]*y_cur[IDX_N2I] + - k[2558]*y_cur[IDX_H2OI]*y_cur[IDX_N2HII] - - k[2718]*y_cur[IDX_H3II]*y_cur[IDX_N2I] + - k[2881]*y_cur[IDX_HCNI]*y_cur[IDX_N2HII] + - k[3009]*y_cur[IDX_HCOI]*y_cur[IDX_N2HII] + - k[3035]*y_cur[IDX_HNC3I]*y_cur[IDX_N2HII] + - k[3044]*y_cur[IDX_HNCI]*y_cur[IDX_N2HII] - - k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + - k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + - k[3351]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] + - k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + - k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + - k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + - k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - - k[3366]*y_cur[IDX_N2I]*y_cur[IDX_HNOII] - - k[3367]*y_cur[IDX_N2I]*y_cur[IDX_O2HII] + - k[3368]*y_cur[IDX_N2HII]*y_cur[IDX_C6H6I] + - k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] + - k[3370]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] + - k[3371]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CNI] + - k[3372]*y_cur[IDX_N2HII]*y_cur[IDX_CO2I] + - k[3373]*y_cur[IDX_N2HII]*y_cur[IDX_H2COI] + - k[3374]*y_cur[IDX_N2HII]*y_cur[IDX_HC3NI] + - k[3375]*y_cur[IDX_N2HII]*y_cur[IDX_NCCNI] + - k[3376]*y_cur[IDX_N2HII]*y_cur[IDX_SI] + - k[3461]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - - k[3496]*y_cur[IDX_NHII]*y_cur[IDX_N2I] + - k[3544]*y_cur[IDX_NH2I]*y_cur[IDX_N2HII] + - k[3592]*y_cur[IDX_NH3I]*y_cur[IDX_N2HII] + - k[3616]*y_cur[IDX_NHI]*y_cur[IDX_N2HII] - - k[3647]*y_cur[IDX_OII]*y_cur[IDX_N2I] + - k[3745]*y_cur[IDX_OI]*y_cur[IDX_N2HII] - - k[3785]*y_cur[IDX_OHII]*y_cur[IDX_N2I] + - k[3804]*y_cur[IDX_OHI]*y_cur[IDX_N2HII] + - k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] + - k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] + - k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] + - k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] + - k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] + - k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] + - k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] + - k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] + - k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] + - k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] + - k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] + - k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] + + k[1463]*y_cur[IDX_C2I]*y_cur[IDX_O2HII] - + k[1466]*y_cur[IDX_C2HII]*y_cur[IDX_C2H2I] - + k[1467]*y_cur[IDX_C2HII]*y_cur[IDX_CNI] - + k[1468]*y_cur[IDX_C2HII]*y_cur[IDX_CO2I] - + k[1469]*y_cur[IDX_C2HII]*y_cur[IDX_H2COI] - + k[1470]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1471]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1472]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1473]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1474]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - + k[1475]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - + k[1476]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - + k[1477]*y_cur[IDX_C2HII]*y_cur[IDX_HCOI] - + k[1478]*y_cur[IDX_C2HII]*y_cur[IDX_HNCI] - + k[1849]*y_cur[IDX_CI]*y_cur[IDX_C2HII] + + k[1891]*y_cur[IDX_CI]*y_cur[IDX_CH2II] + + k[1894]*y_cur[IDX_CI]*y_cur[IDX_CH3II] + + k[1936]*y_cur[IDX_CHII]*y_cur[IDX_CH2I] - + k[1996]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - + k[1997]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] + + k[2146]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2151]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - + k[2152]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - + k[2153]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + + k[2217]*y_cur[IDX_CH5II]*y_cur[IDX_C2I] - + k[2240]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] - + k[2241]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] + + k[2369]*y_cur[IDX_H2II]*y_cur[IDX_C2I] + + k[2401]*y_cur[IDX_H2I]*y_cur[IDX_C2II] - + k[2402]*y_cur[IDX_H2I]*y_cur[IDX_C2HII] + + k[2503]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] + + k[2519]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] - + k[2521]*y_cur[IDX_H2OI]*y_cur[IDX_C2HII] + + k[2586]*y_cur[IDX_H3II]*y_cur[IDX_C2I] + + k[2766]*y_cur[IDX_H3OII]*y_cur[IDX_C2I] + + k[3026]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + + k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + + k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + + k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] - + k[3385]*y_cur[IDX_NI]*y_cur[IDX_C2HII] - + k[3386]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + + k[3477]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + + k[3507]*y_cur[IDX_NH2II]*y_cur[IDX_C2I] - + k[3529]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - + k[3530]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - + k[3554]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] - + k[3555]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] + + k[3605]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - + k[3686]*y_cur[IDX_OI]*y_cur[IDX_C2HII] + + k[3769]*y_cur[IDX_OHII]*y_cur[IDX_C2I] + k[5709]*y_cur[IDX_C2HI] - + k[5979]*y_cur[IDX_C2HII] + k[5994]*y_cur[IDX_C2HI] - + k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] - + k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3H2II] = 0.0 + + k[334]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] - + k[791]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] - + k[792]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] - + k[793]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] - + k[794]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] - + k[795]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[1301]*y_cur[IDX_CII]*y_cur[IDX_C2H3I] + + k[1304]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1317]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + + k[1348]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + + k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1545]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H2II] + + k[1549]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] + + k[1583]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - + k[1629]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] - + k[1630]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + + k[1686]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - + k[1691]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - + k[1692]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - + k[1731]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2II] - + k[1759]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] - + k[1760]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] - + k[1761]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] - + k[1762]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] - + k[1763]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] - + k[1764]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] - + k[1765]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] - + k[1766]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] - + k[1767]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] - + k[1768]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] - + k[1769]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] - + k[1770]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] - + k[1771]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1772]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1773]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1774]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1775]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] - + k[1776]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCHI] - + k[1777]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1778]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1779]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1780]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1781]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1782]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - + k[1783]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] - + k[1784]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] - + k[1785]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] - + k[1819]*y_cur[IDX_C3HI]*y_cur[IDX_C3H2II] + + k[1852]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + + k[1853]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - + k[1855]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] - + k[1856]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] + + k[1934]*y_cur[IDX_CHII]*y_cur[IDX_C2H2I] + + k[1975]*y_cur[IDX_CH2II]*y_cur[IDX_C2HI] + + k[1997]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] + + k[2048]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] + + k[2149]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2162]*y_cur[IDX_CH4I]*y_cur[IDX_C3H2II] + + k[2164]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + + k[2242]*y_cur[IDX_CHI]*y_cur[IDX_C2H2II] + + k[2315]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] + + k[2336]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] + + k[2407]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - + k[2408]*y_cur[IDX_H2I]*y_cur[IDX_C3H2II] + + k[2603]*y_cur[IDX_H3II]*y_cur[IDX_C3HI] + + k[2773]*y_cur[IDX_H3OII]*y_cur[IDX_C3HI] - + k[2831]*y_cur[IDX_HI]*y_cur[IDX_C3H2II] + + k[2908]*y_cur[IDX_HCOII]*y_cur[IDX_C3HI] + + k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + + k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3397]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] - + k[3398]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] - + k[3695]*y_cur[IDX_OI]*y_cur[IDX_C3H2II] + + k[3701]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - + k[3814]*y_cur[IDX_PI]*y_cur[IDX_C3H2II] + + k[3831]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - + k[3834]*y_cur[IDX_SI]*y_cur[IDX_C3H2II] - + k[3873]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - + k[3874]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - + k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - + k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - + k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - + k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - + k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C5NI] = 0.0 + k[116]*y_cur[IDX_NI]*y_cur[IDX_C5M] + + k[876]*y_cur[IDX_C7NII]*y_cur[IDX_eM] + + k[1028]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + + k[1078]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + + k[1079]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - + k[2616]*y_cur[IDX_H3II]*y_cur[IDX_C5NI] - + k[2921]*y_cur[IDX_HCOII]*y_cur[IDX_C5NI] - + k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] + + k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] + + k[4306]*y_cur[IDX_C5NM]*y_cur[IDX_CII] + + k[4307]*y_cur[IDX_C5NM]*y_cur[IDX_C2H2II] + + k[4308]*y_cur[IDX_C5NM]*y_cur[IDX_C2H3II] + + k[4309]*y_cur[IDX_C5NM]*y_cur[IDX_C4H2II] + + k[4310]*y_cur[IDX_C5NM]*y_cur[IDX_C4H3II] + + k[4311]*y_cur[IDX_C5NM]*y_cur[IDX_C4SII] + + k[4312]*y_cur[IDX_C5NM]*y_cur[IDX_CH2CCHII] + + k[4313]*y_cur[IDX_C5NM]*y_cur[IDX_CH3II] + + k[4314]*y_cur[IDX_C5NM]*y_cur[IDX_CNCII] + + k[4315]*y_cur[IDX_C5NM]*y_cur[IDX_FeII] + + k[4316]*y_cur[IDX_C5NM]*y_cur[IDX_HII] + + k[4317]*y_cur[IDX_C5NM]*y_cur[IDX_H2COII] + + k[4318]*y_cur[IDX_C5NM]*y_cur[IDX_H2SII] + + k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] + + k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] + + k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] + + k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + + k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + + k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + + k[4325]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + + k[4326]*y_cur[IDX_C5NM]*y_cur[IDX_HeII] + + k[4327]*y_cur[IDX_C5NM]*y_cur[IDX_MgII] + + k[4328]*y_cur[IDX_C5NM]*y_cur[IDX_NII] + k[4329]*y_cur[IDX_C5NM]*y_cur[IDX_N2HII] + - k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] + - k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] + - k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] + - k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] + - k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] + - k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] + - k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] + - k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] + - k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] + - k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] + - k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] + - k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] + - k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] + - k[4820]*y_cur[IDX_OHM]*y_cur[IDX_N2HII] + - k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] - - k[4967]*y_cur[IDX_CI]*y_cur[IDX_N2I] - - k[5001]*y_cur[IDX_CH2I]*y_cur[IDX_N2I] - - k[5079]*y_cur[IDX_CHI]*y_cur[IDX_N2I] + - k[5113]*y_cur[IDX_CNI]*y_cur[IDX_CNI] + - k[5121]*y_cur[IDX_CNI]*y_cur[IDX_NOI] + - k[5128]*y_cur[IDX_COI]*y_cur[IDX_N2OI] + - k[5179]*y_cur[IDX_HI]*y_cur[IDX_N2OI] - - k[5220]*y_cur[IDX_N2I]*y_cur[IDX_O2I] + - k[5260]*y_cur[IDX_NI]*y_cur[IDX_CNI] + - k[5261]*y_cur[IDX_NI]*y_cur[IDX_CNI] + - k[5273]*y_cur[IDX_NI]*y_cur[IDX_NCCNI] + - k[5274]*y_cur[IDX_NI]*y_cur[IDX_NHI] + - k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + - k[5278]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + - k[5279]*y_cur[IDX_NI]*y_cur[IDX_NOI] + - k[5280]*y_cur[IDX_NI]*y_cur[IDX_NSI] + - k[5286]*y_cur[IDX_NI]*y_cur[IDX_PNI] + - k[5298]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + - k[5299]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + - k[5308]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + - k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + - k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + - k[5314]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + - k[5327]*y_cur[IDX_NOI]*y_cur[IDX_N2OI] + - k[5329]*y_cur[IDX_NOI]*y_cur[IDX_NOI] + - k[5331]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - - k[5417]*y_cur[IDX_OI]*y_cur[IDX_N2I] + - k[5419]*y_cur[IDX_OI]*y_cur[IDX_N2OI] + - k[5474]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - k[5878]*y_cur[IDX_N2I] - - k[6211]*y_cur[IDX_N2I] + k[6212]*y_cur[IDX_N2OI] + - k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + - k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + - k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + - k[6559]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] - k[6916]*y_cur[IDX_N2I] - + k[7098]*y_cur[IDX_GN2I] + k[7280]*y_cur[IDX_GN2I] + - k[7462]*y_cur[IDX_GN2I] + k[8700]*y_cur[IDX_GNI]*y_cur[IDX_GNI]; - ydot[yistart + IDX_N2II] = 0.0 - - k[210]*y_cur[IDX_C2I]*y_cur[IDX_N2II] - - k[243]*y_cur[IDX_C2HI]*y_cur[IDX_N2II] - - k[247]*y_cur[IDX_CI]*y_cur[IDX_N2II] - - k[264]*y_cur[IDX_CH2I]*y_cur[IDX_N2II] - - k[293]*y_cur[IDX_CHI]*y_cur[IDX_N2II] - - k[306]*y_cur[IDX_CNI]*y_cur[IDX_N2II] - - k[316]*y_cur[IDX_COI]*y_cur[IDX_N2II] - - k[481]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] - - k[498]*y_cur[IDX_HCNI]*y_cur[IDX_N2II] + - k[523]*y_cur[IDX_HeII]*y_cur[IDX_N2I] - - k[535]*y_cur[IDX_MgI]*y_cur[IDX_N2II] - - k[564]*y_cur[IDX_N2II]*y_cur[IDX_CO2I] - - k[565]*y_cur[IDX_N2II]*y_cur[IDX_FeI] - - k[566]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] - - k[567]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - - k[568]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] - - k[569]*y_cur[IDX_N2II]*y_cur[IDX_NOI] - - k[570]*y_cur[IDX_N2II]*y_cur[IDX_O2I] - - k[571]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - - k[572]*y_cur[IDX_N2II]*y_cur[IDX_SI] - - k[573]*y_cur[IDX_NI]*y_cur[IDX_N2II] - - k[589]*y_cur[IDX_NH2I]*y_cur[IDX_N2II] - - k[610]*y_cur[IDX_NH3I]*y_cur[IDX_N2II] - - k[618]*y_cur[IDX_NHI]*y_cur[IDX_N2II] - - k[640]*y_cur[IDX_NaI]*y_cur[IDX_N2II] - - k[684]*y_cur[IDX_OI]*y_cur[IDX_N2II] - + k[4330]*y_cur[IDX_C5NM]*y_cur[IDX_NH3II] + + k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] + + k[4332]*y_cur[IDX_C5NM]*y_cur[IDX_NOII] + + k[4333]*y_cur[IDX_C5NM]*y_cur[IDX_NaII] + + k[4334]*y_cur[IDX_C5NM]*y_cur[IDX_OII] + + k[4335]*y_cur[IDX_C5NM]*y_cur[IDX_SII] + + k[4336]*y_cur[IDX_C5NM]*y_cur[IDX_SOII] + + k[4337]*y_cur[IDX_C5NM]*y_cur[IDX_SiII] + + k[4338]*y_cur[IDX_C5NM]*y_cur[IDX_SiOII] + + k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] + + k[4340]*y_cur[IDX_C5NM]*y_cur[IDX_SiSII] - + k[4929]*y_cur[IDX_CI]*y_cur[IDX_C5NI] + + k[5240]*y_cur[IDX_NI]*y_cur[IDX_C5HI] - + k[5241]*y_cur[IDX_NI]*y_cur[IDX_C5NI] + + k[5247]*y_cur[IDX_NI]*y_cur[IDX_C7NI] - + k[5367]*y_cur[IDX_OI]*y_cur[IDX_C5NI] - + k[5598]*y_cur[IDX_C5NI]*y_cur[IDX_eM] + k[5745]*y_cur[IDX_C5NM] - + k[5746]*y_cur[IDX_C5NI] + k[5798]*y_cur[IDX_CH3C5NI] + + k[5851]*y_cur[IDX_HC5NI] + k[6030]*y_cur[IDX_C5NM] - + k[6031]*y_cur[IDX_C5NI] + k[6102]*y_cur[IDX_CH3C5NI] + + k[6176]*y_cur[IDX_HC5NI] + + k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + + k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + + k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM] - k[7044]*y_cur[IDX_C5NI] + + k[7226]*y_cur[IDX_GC5NI] + k[7408]*y_cur[IDX_GC5NI] + + k[7590]*y_cur[IDX_GC5NI] + k[8707]*y_cur[IDX_GNI]*y_cur[IDX_GC5I]; + ydot[yistart + IDX_CH2II] = 0.0 + + k[160]*y_cur[IDX_CII]*y_cur[IDX_CH2I] - + k[258]*y_cur[IDX_CH2II]*y_cur[IDX_NOI] + + k[259]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] + + k[260]*y_cur[IDX_CH2I]*y_cur[IDX_CNII] + + k[261]*y_cur[IDX_CH2I]*y_cur[IDX_COII] + + k[262]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] + + k[263]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] + + k[264]*y_cur[IDX_CH2I]*y_cur[IDX_N2II] + + k[265]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] + + k[266]*y_cur[IDX_CH2I]*y_cur[IDX_OII] + + k[267]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] + + k[268]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] + + k[359]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + + k[440]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] + + k[544]*y_cur[IDX_NII]*y_cur[IDX_CH2I] - + k[907]*y_cur[IDX_CH2II]*y_cur[IDX_eM] - + k[908]*y_cur[IDX_CH2II]*y_cur[IDX_eM] - + k[909]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + + k[1390]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + + k[1392]*y_cur[IDX_CII]*y_cur[IDX_H2CSI] - + k[1891]*y_cur[IDX_CI]*y_cur[IDX_CH2II] + + k[1959]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] - + k[1975]*y_cur[IDX_CH2II]*y_cur[IDX_C2HI] - + k[1976]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] - + k[1977]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] - + k[1978]*y_cur[IDX_CH2II]*y_cur[IDX_CO2I] - + k[1979]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - + k[1980]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - + k[1981]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - + k[1982]*y_cur[IDX_CH2II]*y_cur[IDX_H2OI] - + k[1983]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - + k[1984]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - + k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - + k[1986]*y_cur[IDX_CH2II]*y_cur[IDX_HCNI] - + k[1987]*y_cur[IDX_CH2II]*y_cur[IDX_HCOI] - + k[1988]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] - + k[1989]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] - + k[1990]*y_cur[IDX_CH2II]*y_cur[IDX_O2I] - + k[1991]*y_cur[IDX_CH2II]*y_cur[IDX_OI] - + k[1992]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] - + k[1993]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] - + k[1994]*y_cur[IDX_CH2II]*y_cur[IDX_SI] + + k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + + k[2240]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] + + k[2244]*y_cur[IDX_CHI]*y_cur[IDX_CH5II] + + k[2246]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] + + k[2247]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] + + k[2248]*y_cur[IDX_CHI]*y_cur[IDX_H3COII] + + k[2249]*y_cur[IDX_CHI]*y_cur[IDX_H3OII] + + k[2250]*y_cur[IDX_CHI]*y_cur[IDX_HCNII] + + k[2251]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] + + k[2252]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] + + k[2253]*y_cur[IDX_CHI]*y_cur[IDX_HCOII] + + k[2254]*y_cur[IDX_CHI]*y_cur[IDX_HNOII] + + k[2255]*y_cur[IDX_CHI]*y_cur[IDX_HSII] + + k[2257]*y_cur[IDX_CHI]*y_cur[IDX_N2HII] + + k[2258]*y_cur[IDX_CHI]*y_cur[IDX_NHII] + + k[2259]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] + + k[2263]*y_cur[IDX_CHI]*y_cur[IDX_O2HII] + + k[2264]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + + k[2267]*y_cur[IDX_CHI]*y_cur[IDX_SiHII] + + k[2318]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] + + k[2343]*y_cur[IDX_HII]*y_cur[IDX_HCNOI] + + k[2380]*y_cur[IDX_H2II]*y_cur[IDX_CHI] + + k[2427]*y_cur[IDX_H2I]*y_cur[IDX_CHII] - + k[2428]*y_cur[IDX_H2I]*y_cur[IDX_CH2II] + + k[2670]*y_cur[IDX_H3II]*y_cur[IDX_CHI] - + k[2836]*y_cur[IDX_HI]*y_cur[IDX_CH2II] + + k[2837]*y_cur[IDX_HI]*y_cur[IDX_CH3II] + + k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] + + k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + + k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] + + k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + + k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - + k[3452]*y_cur[IDX_NI]*y_cur[IDX_CH2II] + + k[5548]*y_cur[IDX_H2I]*y_cur[IDX_CII] + + k[5633]*y_cur[IDX_CII]*y_cur[IDX_CH2OHI] + + k[5638]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + k[5778]*y_cur[IDX_CH2I] + - k[6075]*y_cur[IDX_CH2II] - k[6076]*y_cur[IDX_CH2II] - + k[6077]*y_cur[IDX_CH2II] + k[6078]*y_cur[IDX_CH2I] + + k[6096]*y_cur[IDX_CH3II] + k[6125]*y_cur[IDX_CH4II] - + k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - + k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - + k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_OHII] = 0.0 - + k[268]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - + k[297]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + + k[408]*y_cur[IDX_HII]*y_cur[IDX_OHI] + + k[456]*y_cur[IDX_H2II]*y_cur[IDX_OHI] + + k[563]*y_cur[IDX_NII]*y_cur[IDX_OHI] - + k[591]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] + + k[664]*y_cur[IDX_OII]*y_cur[IDX_OHI] - + k[685]*y_cur[IDX_OHII]*y_cur[IDX_C2I] - + k[686]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] - + k[687]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[688]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] - + k[689]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] - + k[690]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] - + k[691]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - + k[692]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] - + k[693]*y_cur[IDX_OHII]*y_cur[IDX_NOI] - + k[694]*y_cur[IDX_OHII]*y_cur[IDX_O2I] - + k[695]*y_cur[IDX_OHII]*y_cur[IDX_SI] + + k[697]*y_cur[IDX_OHI]*y_cur[IDX_C2II] + + k[698]*y_cur[IDX_OHI]*y_cur[IDX_CNII] + + k[699]*y_cur[IDX_OHI]*y_cur[IDX_COII] + k[700]*y_cur[IDX_OHI]*y_cur[IDX_N2II] - - k[1150]*y_cur[IDX_N2II]*y_cur[IDX_eM] - - k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - - k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - - k[2460]*y_cur[IDX_H2I]*y_cur[IDX_N2II] - - k[2557]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] + - k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + - k[3355]*y_cur[IDX_NII]*y_cur[IDX_NHI] + - k[3356]*y_cur[IDX_NII]*y_cur[IDX_NOI] - - k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] - - k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - - k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - - k[3364]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] - - k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] + - k[3456]*y_cur[IDX_NI]*y_cur[IDX_CNII] + - k[3463]*y_cur[IDX_NI]*y_cur[IDX_NHII] - - k[3744]*y_cur[IDX_OI]*y_cur[IDX_N2II] + - k[5581]*y_cur[IDX_NII]*y_cur[IDX_NI] - - k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_N2HII] = 0.0 - - k[1151]*y_cur[IDX_N2HII]*y_cur[IDX_eM] - - k[1152]*y_cur[IDX_N2HII]*y_cur[IDX_eM] - - k[1153]*y_cur[IDX_N2HII]*y_cur[IDX_eM] - - k[1154]*y_cur[IDX_N2HII]*y_cur[IDX_eM] - - k[1461]*y_cur[IDX_C2I]*y_cur[IDX_N2HII] - - k[1568]*y_cur[IDX_C2H2I]*y_cur[IDX_N2HII] - - k[1748]*y_cur[IDX_C2HI]*y_cur[IDX_N2HII] - - k[1909]*y_cur[IDX_CI]*y_cur[IDX_N2HII] - - k[2010]*y_cur[IDX_CH2I]*y_cur[IDX_N2HII] - - k[2206]*y_cur[IDX_CH4I]*y_cur[IDX_N2HII] - - k[2257]*y_cur[IDX_CHI]*y_cur[IDX_N2HII] - - k[2288]*y_cur[IDX_COI]*y_cur[IDX_N2HII] + - k[2354]*y_cur[IDX_HII]*y_cur[IDX_N2OI] + - k[2391]*y_cur[IDX_H2II]*y_cur[IDX_N2I] + - k[2460]*y_cur[IDX_H2I]*y_cur[IDX_N2II] + - k[2557]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] - - k[2558]*y_cur[IDX_H2OI]*y_cur[IDX_N2HII] + - k[2718]*y_cur[IDX_H3II]*y_cur[IDX_N2I] - - k[2881]*y_cur[IDX_HCNI]*y_cur[IDX_N2HII] - - k[3009]*y_cur[IDX_HCOI]*y_cur[IDX_N2HII] - - k[3035]*y_cur[IDX_HNC3I]*y_cur[IDX_N2HII] - - k[3044]*y_cur[IDX_HNCI]*y_cur[IDX_N2HII] + - k[3353]*y_cur[IDX_NII]*y_cur[IDX_NH3I] + - k[3364]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + - k[3366]*y_cur[IDX_N2I]*y_cur[IDX_HNOII] + - k[3367]*y_cur[IDX_N2I]*y_cur[IDX_O2HII] - - k[3368]*y_cur[IDX_N2HII]*y_cur[IDX_C6H6I] - - k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - - k[3370]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - - k[3371]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CNI] - - k[3372]*y_cur[IDX_N2HII]*y_cur[IDX_CO2I] - - k[3373]*y_cur[IDX_N2HII]*y_cur[IDX_H2COI] - - k[3374]*y_cur[IDX_N2HII]*y_cur[IDX_HC3NI] - - k[3375]*y_cur[IDX_N2HII]*y_cur[IDX_NCCNI] - - k[3376]*y_cur[IDX_N2HII]*y_cur[IDX_SI] + - k[3464]*y_cur[IDX_NI]*y_cur[IDX_NH2II] + - k[3496]*y_cur[IDX_NHII]*y_cur[IDX_N2I] + - k[3500]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - - k[3544]*y_cur[IDX_NH2I]*y_cur[IDX_N2HII] - - k[3592]*y_cur[IDX_NH3I]*y_cur[IDX_N2HII] - - k[3616]*y_cur[IDX_NHI]*y_cur[IDX_N2HII] - + k[1180]*y_cur[IDX_OHII]*y_cur[IDX_eM] - + k[1914]*y_cur[IDX_CI]*y_cur[IDX_OHII] - + k[2016]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - + k[2209]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - + k[2210]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - + k[2264]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + + k[2396]*y_cur[IDX_H2II]*y_cur[IDX_OI] + + k[2466]*y_cur[IDX_H2I]*y_cur[IDX_OII] - + k[2469]*y_cur[IDX_H2I]*y_cur[IDX_OHII] + + k[2731]*y_cur[IDX_H3II]*y_cur[IDX_OI] + + k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + + k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - + k[3467]*y_cur[IDX_NI]*y_cur[IDX_OHII] + + k[3503]*y_cur[IDX_NHII]*y_cur[IDX_OI] - + k[3547]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] - + k[3623]*y_cur[IDX_NHI]*y_cur[IDX_OHII] + + k[3646]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + k[3745]*y_cur[IDX_OI]*y_cur[IDX_N2HII] + + k[3749]*y_cur[IDX_OI]*y_cur[IDX_O2HII] - + k[3750]*y_cur[IDX_OI]*y_cur[IDX_OHII] - + k[3769]*y_cur[IDX_OHII]*y_cur[IDX_C2I] - + k[3770]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] - + k[3771]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[3772]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[3774]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - + k[3775]*y_cur[IDX_OHII]*y_cur[IDX_CNI] - + k[3776]*y_cur[IDX_OHII]*y_cur[IDX_CO2I] - + k[3777]*y_cur[IDX_OHII]*y_cur[IDX_COI] - + k[3778]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] - + k[3779]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] - + k[3780]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] - + k[3781]*y_cur[IDX_OHII]*y_cur[IDX_HCNI] - + k[3782]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - + k[3783]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - + k[3784]*y_cur[IDX_OHII]*y_cur[IDX_HNCI] - k[3785]*y_cur[IDX_OHII]*y_cur[IDX_N2I] - - k[3804]*y_cur[IDX_OHI]*y_cur[IDX_N2HII] - - k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] - - k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] - - k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] - - k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] - - k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] - - k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] - - k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] - - k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] - - k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] - - k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] - - k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] - - k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] - - k[4329]*y_cur[IDX_C5NM]*y_cur[IDX_N2HII] - - k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] - - k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] - - k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] - - k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] - - k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] - - k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] - - k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] - - k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] - - k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] - - k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] - - k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] - - k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] - - k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] - - k[4820]*y_cur[IDX_OHM]*y_cur[IDX_N2HII] - - k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] - - k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] - - k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_N2OI] = 0.0 - - k[399]*y_cur[IDX_HII]*y_cur[IDX_N2OI] + + k[3786]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] - + k[3787]*y_cur[IDX_OHII]*y_cur[IDX_NOI] - + k[3788]*y_cur[IDX_OHII]*y_cur[IDX_OHI] - + k[3789]*y_cur[IDX_OHII]*y_cur[IDX_SI] - + k[3790]*y_cur[IDX_OHII]*y_cur[IDX_SI] - + k[3791]*y_cur[IDX_OHII]*y_cur[IDX_SiI] - + k[3792]*y_cur[IDX_OHII]*y_cur[IDX_SiCI] - + k[3793]*y_cur[IDX_OHII]*y_cur[IDX_SiHI] - + k[3794]*y_cur[IDX_OHII]*y_cur[IDX_SiOI] + + k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + + k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + + k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + + k[6157]*y_cur[IDX_H2OII] - k[6242]*y_cur[IDX_OHII] + + k[6245]*y_cur[IDX_OHI] - k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2OII] = 0.0 - + k[263]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] - + k[291]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] + + k[378]*y_cur[IDX_HII]*y_cur[IDX_H2OI] + + k[447]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] - + k[462]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] - + k[463]*y_cur[IDX_H2OII]*y_cur[IDX_C2H2I] - + k[464]*y_cur[IDX_H2OII]*y_cur[IDX_C2H4I] - + k[465]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] - + k[466]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - + k[467]*y_cur[IDX_H2OII]*y_cur[IDX_FeI] - + k[468]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] - + k[469]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - + k[470]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - + k[471]*y_cur[IDX_H2OII]*y_cur[IDX_MgI] - + k[472]*y_cur[IDX_H2OII]*y_cur[IDX_NOI] - + k[473]*y_cur[IDX_H2OII]*y_cur[IDX_NaI] - + k[474]*y_cur[IDX_H2OII]*y_cur[IDX_O2I] - + k[475]*y_cur[IDX_H2OII]*y_cur[IDX_OCSI] - + k[476]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - + k[477]*y_cur[IDX_H2OII]*y_cur[IDX_SiI] + + k[478]*y_cur[IDX_H2OI]*y_cur[IDX_COII] + + k[479]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] + + k[480]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] + + k[481]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] + k[482]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] + - k[485]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] - - k[659]*y_cur[IDX_OII]*y_cur[IDX_N2OI] - - k[1416]*y_cur[IDX_CII]*y_cur[IDX_N2OI] - - k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] - - k[2234]*y_cur[IDX_CH5II]*y_cur[IDX_N2OI] - - k[2354]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - - k[2719]*y_cur[IDX_H3II]*y_cur[IDX_N2OI] - - k[2978]*y_cur[IDX_HCOII]*y_cur[IDX_N2OI] - - k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - - k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - - k[3277]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - - k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - - k[5128]*y_cur[IDX_COI]*y_cur[IDX_N2OI] - - k[5179]*y_cur[IDX_HI]*y_cur[IDX_N2OI] - - k[5180]*y_cur[IDX_HI]*y_cur[IDX_N2OI] + - k[5220]*y_cur[IDX_N2I]*y_cur[IDX_O2I] + - k[5269]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + - k[5276]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + - k[5312]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] + - k[5315]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + - k[5326]*y_cur[IDX_NOI]*y_cur[IDX_HNOI] - - k[5327]*y_cur[IDX_NOI]*y_cur[IDX_N2OI] + - k[5328]*y_cur[IDX_NOI]*y_cur[IDX_NOI] + - k[5332]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - - k[5418]*y_cur[IDX_OI]*y_cur[IDX_N2OI] - - k[5419]*y_cur[IDX_OI]*y_cur[IDX_N2OI] - - k[5473]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - - k[5474]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - k[5879]*y_cur[IDX_N2OI] - - k[6212]*y_cur[IDX_N2OI] - k[6213]*y_cur[IDX_N2OI] - - k[6214]*y_cur[IDX_N2OI] - k[6974]*y_cur[IDX_N2OI] + - k[7156]*y_cur[IDX_GN2OI] + k[7338]*y_cur[IDX_GN2OI] + - k[7520]*y_cur[IDX_GN2OI]; - ydot[yistart + IDX_N2OII] = 0.0 + - k[399]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - - k[482]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] - - k[485]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] + - k[659]*y_cur[IDX_OII]*y_cur[IDX_N2OI] - - k[1170]*y_cur[IDX_N2OII]*y_cur[IDX_eM] - - k[1171]*y_cur[IDX_N2OII]*y_cur[IDX_eM] - - k[1172]*y_cur[IDX_N2OII]*y_cur[IDX_eM] - - k[2559]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] - - k[2581]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] + k[6213]*y_cur[IDX_N2OI] - - k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - - k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - - k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NCCNI] = 0.0 - - k[183]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] - - k[184]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] + - k[234]*y_cur[IDX_C2H4I]*y_cur[IDX_C2N2II] + - k[1155]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_eM] + - k[1157]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] + - k[1542]*y_cur[IDX_C2H2I]*y_cur[IDX_C2N2II] - - k[1624]*y_cur[IDX_C2H3II]*y_cur[IDX_NCCNI] + - k[1709]*y_cur[IDX_C2H4I]*y_cur[IDX_NCCNHII] + - k[2128]*y_cur[IDX_CH3OHI]*y_cur[IDX_NCCNHII] + - k[2560]*y_cur[IDX_H2OI]*y_cur[IDX_NCCNHII] - - k[2720]*y_cur[IDX_H3II]*y_cur[IDX_NCCNI] + - k[2865]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] + - k[2882]*y_cur[IDX_HCNI]*y_cur[IDX_NCCNHII] - - k[2979]*y_cur[IDX_HCOII]*y_cur[IDX_NCCNI] - - k[3279]*y_cur[IDX_HeII]*y_cur[IDX_NCCNI] - - k[3351]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] - - k[3352]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] - - k[3375]*y_cur[IDX_N2HII]*y_cur[IDX_NCCNI] + - k[3593]*y_cur[IDX_NH3I]*y_cur[IDX_NCCNHII] - - k[3870]*y_cur[IDX_SiII]*y_cur[IDX_NCCNI] - - k[4903]*y_cur[IDX_C2HI]*y_cur[IDX_NCCNI] - - k[4908]*y_cur[IDX_C4HI]*y_cur[IDX_NCCNI] - - k[4968]*y_cur[IDX_CI]*y_cur[IDX_NCCNI] + - k[5116]*y_cur[IDX_CNI]*y_cur[IDX_HCNI] + - k[5118]*y_cur[IDX_CNI]*y_cur[IDX_HNCI] - - k[5181]*y_cur[IDX_HI]*y_cur[IDX_NCCNI] - - k[5273]*y_cur[IDX_NI]*y_cur[IDX_NCCNI] - - k[5475]*y_cur[IDX_OHI]*y_cur[IDX_NCCNI] - - k[5541]*y_cur[IDX_CH3II]*y_cur[IDX_NCCNI] - k[5881]*y_cur[IDX_NCCNI] - - k[6215]*y_cur[IDX_NCCNI] - k[6216]*y_cur[IDX_NCCNI] + - k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + - k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM] - - k[7005]*y_cur[IDX_NCCNI] + k[7187]*y_cur[IDX_GNCCNI] + - k[7369]*y_cur[IDX_GNCCNI] + k[7551]*y_cur[IDX_GNCCNI]; - ydot[yistart + IDX_NCCNCH3II] = 0.0 - - k[1155]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_eM] + - k[5541]*y_cur[IDX_CH3II]*y_cur[IDX_NCCNI] - - k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NCCNHII] = 0.0 - - k[1156]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] - - k[1157]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] + - k[1624]*y_cur[IDX_C2H3II]*y_cur[IDX_NCCNI] - - k[1709]*y_cur[IDX_C2H4I]*y_cur[IDX_NCCNHII] - - k[2128]*y_cur[IDX_CH3OHI]*y_cur[IDX_NCCNHII] + - k[2404]*y_cur[IDX_H2I]*y_cur[IDX_C2N2II] + - k[2527]*y_cur[IDX_H2OI]*y_cur[IDX_C2N2II] - - k[2560]*y_cur[IDX_H2OI]*y_cur[IDX_NCCNHII] + - k[2720]*y_cur[IDX_H3II]*y_cur[IDX_NCCNI] + - k[2866]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] - - k[2882]*y_cur[IDX_HCNI]*y_cur[IDX_NCCNHII] + - k[2979]*y_cur[IDX_HCOII]*y_cur[IDX_NCCNI] + - k[3375]*y_cur[IDX_N2HII]*y_cur[IDX_NCCNI] - - k[3593]*y_cur[IDX_NH3I]*y_cur[IDX_NCCNHII] - - k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] - - k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NHI] = 0.0 - k[6]*y_cur[IDX_CM]*y_cur[IDX_NHI] + - k[77]*y_cur[IDX_HM]*y_cur[IDX_NI] - - k[79]*y_cur[IDX_HM]*y_cur[IDX_NHI] - - k[402]*y_cur[IDX_HII]*y_cur[IDX_NHI] - - k[453]*y_cur[IDX_H2II]*y_cur[IDX_NHI] - - k[559]*y_cur[IDX_NII]*y_cur[IDX_NHI] + - k[574]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + - k[575]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + - k[576]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + - k[577]*y_cur[IDX_NHII]*y_cur[IDX_NOI] + - k[578]*y_cur[IDX_NHII]*y_cur[IDX_O2I] + - k[579]*y_cur[IDX_NHII]*y_cur[IDX_SI] - - k[616]*y_cur[IDX_NHI]*y_cur[IDX_CNII] - - k[617]*y_cur[IDX_NHI]*y_cur[IDX_COII] - - k[618]*y_cur[IDX_NHI]*y_cur[IDX_N2II] - - k[619]*y_cur[IDX_NHI]*y_cur[IDX_OII] + - k[1116]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + - k[1120]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + - k[1123]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] + - k[1132]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + - k[1153]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + - k[1154]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + - k[1160]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + - k[1164]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + - k[1213]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] - - k[1420]*y_cur[IDX_CII]*y_cur[IDX_NHI] - - k[1965]*y_cur[IDX_CHII]*y_cur[IDX_NHI] + - k[2012]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] + - k[2259]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] - - k[2393]*y_cur[IDX_H2II]*y_cur[IDX_NHI] + - k[2537]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2724]*y_cur[IDX_H3II]*y_cur[IDX_NHI] + - k[3021]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + - k[3032]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] - - k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] + - k[3336]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3337]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3345]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + - k[3347]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + - k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + - k[3354]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - - k[3355]*y_cur[IDX_NII]*y_cur[IDX_NHI] - - k[3499]*y_cur[IDX_NHII]*y_cur[IDX_NHI] + - k[3507]*y_cur[IDX_NH2II]*y_cur[IDX_C2I] + - k[3508]*y_cur[IDX_NH2II]*y_cur[IDX_C2HI] + - k[3510]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] + - k[3512]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + - k[3515]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + - k[3519]*y_cur[IDX_NH2II]*y_cur[IDX_HCNI] + - k[3520]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] + - k[3521]*y_cur[IDX_NH2II]*y_cur[IDX_HNCI] + - k[3522]*y_cur[IDX_NH2II]*y_cur[IDX_NH2I] + - k[3523]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] + - k[3527]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + - k[3534]*y_cur[IDX_NH2I]*y_cur[IDX_COII] + - k[3545]*y_cur[IDX_NH2I]*y_cur[IDX_NH3II] + - k[3548]*y_cur[IDX_NH3II]*y_cur[IDX_C2I] - - k[3605]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - - k[3606]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - - k[3607]*y_cur[IDX_NHI]*y_cur[IDX_C2H2II] - - k[3608]*y_cur[IDX_NHI]*y_cur[IDX_CH3II] - - k[3609]*y_cur[IDX_NHI]*y_cur[IDX_CH5II] - - k[3610]*y_cur[IDX_NHI]*y_cur[IDX_COII] - - k[3611]*y_cur[IDX_NHI]*y_cur[IDX_H2COII] - - k[3612]*y_cur[IDX_NHI]*y_cur[IDX_H2OII] - - k[3613]*y_cur[IDX_NHI]*y_cur[IDX_HCNII] - - k[3614]*y_cur[IDX_NHI]*y_cur[IDX_HCOII] - - k[3615]*y_cur[IDX_NHI]*y_cur[IDX_HNOII] - - k[3616]*y_cur[IDX_NHI]*y_cur[IDX_N2HII] - - k[3617]*y_cur[IDX_NHI]*y_cur[IDX_NH2II] - - k[3618]*y_cur[IDX_NHI]*y_cur[IDX_NH3II] - - k[3619]*y_cur[IDX_NHI]*y_cur[IDX_OII] - - k[3620]*y_cur[IDX_NHI]*y_cur[IDX_O2II] - - k[3621]*y_cur[IDX_NHI]*y_cur[IDX_O2II] - - k[3622]*y_cur[IDX_NHI]*y_cur[IDX_O2HII] - - k[3623]*y_cur[IDX_NHI]*y_cur[IDX_OHII] - - k[3624]*y_cur[IDX_NHI]*y_cur[IDX_SII] - - k[3625]*y_cur[IDX_NHI]*y_cur[IDX_SiII] + - k[4971]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - - k[4972]*y_cur[IDX_CI]*y_cur[IDX_NHI] - - k[4973]*y_cur[IDX_CI]*y_cur[IDX_NHI] + - k[5001]*y_cur[IDX_CH2I]*y_cur[IDX_N2I] + - k[5035]*y_cur[IDX_CH3I]*y_cur[IDX_NH2I] + - k[5081]*y_cur[IDX_CHI]*y_cur[IDX_NI] + - k[5127]*y_cur[IDX_COI]*y_cur[IDX_HNOI] + - k[5141]*y_cur[IDX_H2I]*y_cur[IDX_NI] - - k[5143]*y_cur[IDX_H2I]*y_cur[IDX_NHI] + - k[5177]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + - k[5180]*y_cur[IDX_HI]*y_cur[IDX_N2OI] + - k[5182]*y_cur[IDX_HI]*y_cur[IDX_NH2I] - - k[5184]*y_cur[IDX_HI]*y_cur[IDX_NHI] + - k[5186]*y_cur[IDX_HI]*y_cur[IDX_NOI] + - k[5189]*y_cur[IDX_HI]*y_cur[IDX_NSI] + - k[5195]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + - k[5223]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] + - k[5226]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] + - k[5255]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + - k[5264]*y_cur[IDX_NI]*y_cur[IDX_H2CNI] + - k[5265]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + - k[5270]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + - k[5272]*y_cur[IDX_NI]*y_cur[IDX_HSI] - - k[5274]*y_cur[IDX_NI]*y_cur[IDX_NHI] + - k[5282]*y_cur[IDX_NI]*y_cur[IDX_O2HI] + - k[5284]*y_cur[IDX_NI]*y_cur[IDX_OHI] + - k[5300]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] - - k[5304]*y_cur[IDX_NHI]*y_cur[IDX_CH4I] - - k[5305]*y_cur[IDX_NHI]*y_cur[IDX_CNI] - - k[5306]*y_cur[IDX_NHI]*y_cur[IDX_H2OI] - - k[5307]*y_cur[IDX_NHI]*y_cur[IDX_NH3I] - - k[5308]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - - k[5308]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - - k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - - k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - - k[5310]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - - k[5310]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - - k[5311]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] - - k[5312]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] - - k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - - k[5314]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - - k[5315]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - - k[5316]*y_cur[IDX_NHI]*y_cur[IDX_O2I] - - k[5317]*y_cur[IDX_NHI]*y_cur[IDX_O2I] - - k[5318]*y_cur[IDX_NHI]*y_cur[IDX_OI] - - k[5319]*y_cur[IDX_NHI]*y_cur[IDX_OI] - - k[5320]*y_cur[IDX_NHI]*y_cur[IDX_OI] - - k[5321]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - - k[5322]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - - k[5323]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - - k[5324]*y_cur[IDX_NHI]*y_cur[IDX_SI] - - k[5325]*y_cur[IDX_NHI]*y_cur[IDX_SI] + - k[5403]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + - k[5413]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + - k[5421]*y_cur[IDX_OI]*y_cur[IDX_NH2I] + k[5791]*y_cur[IDX_CH2NHI] + - k[5868]*y_cur[IDX_HNCOI] + k[5883]*y_cur[IDX_NH2I] + - k[5887]*y_cur[IDX_NH3I] - k[5888]*y_cur[IDX_NHI] - - k[5889]*y_cur[IDX_NHI] + k[6199]*y_cur[IDX_HNCOI] + - k[6219]*y_cur[IDX_NH2I] + k[6223]*y_cur[IDX_NH3I] - - k[6224]*y_cur[IDX_NHI] - k[6225]*y_cur[IDX_NHI] + - k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + - k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + - k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + - k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + - k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + - k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + - k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + - k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - k[6896]*y_cur[IDX_NHI] - + k[7078]*y_cur[IDX_GNHI] + k[7260]*y_cur[IDX_GNHI] + - k[7442]*y_cur[IDX_GNHI] + k[8580]*y_cur[IDX_GHI]*y_cur[IDX_GNI]; - ydot[yistart + IDX_NHII] = 0.0 + - k[402]*y_cur[IDX_HII]*y_cur[IDX_NHI] + - k[453]*y_cur[IDX_H2II]*y_cur[IDX_NHI] + - k[559]*y_cur[IDX_NII]*y_cur[IDX_NHI] - - k[574]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - + k[518]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + + k[552]*y_cur[IDX_NII]*y_cur[IDX_H2OI] + k[575]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[576]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] - - k[577]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - - k[578]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - - k[579]*y_cur[IDX_NHII]*y_cur[IDX_SI] + - k[616]*y_cur[IDX_NHI]*y_cur[IDX_CNII] + - k[617]*y_cur[IDX_NHI]*y_cur[IDX_COII] + - k[618]*y_cur[IDX_NHI]*y_cur[IDX_N2II] + - k[619]*y_cur[IDX_NHI]*y_cur[IDX_OII] - - k[1158]*y_cur[IDX_NHII]*y_cur[IDX_eM] - - k[1910]*y_cur[IDX_CI]*y_cur[IDX_NHII] - - k[2011]*y_cur[IDX_CH2I]*y_cur[IDX_NHII] - - k[2258]*y_cur[IDX_CHI]*y_cur[IDX_NHII] + - k[2392]*y_cur[IDX_H2II]*y_cur[IDX_NI] + - k[2459]*y_cur[IDX_H2I]*y_cur[IDX_NII] - - k[2461]*y_cur[IDX_H2I]*y_cur[IDX_NHII] - - k[2462]*y_cur[IDX_H2I]*y_cur[IDX_NHII] + - k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + - k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + - k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + - k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + - k[3348]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + - k[3350]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - - k[3463]*y_cur[IDX_NI]*y_cur[IDX_NHII] - - k[3477]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - - k[3478]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - - k[3479]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - - k[3480]*y_cur[IDX_NHII]*y_cur[IDX_C2HI] - - k[3481]*y_cur[IDX_NHII]*y_cur[IDX_CNI] - + k[588]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] - + k[605]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] + + k[656]*y_cur[IDX_OII]*y_cur[IDX_H2OI] + + k[689]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] - + k[1012]*y_cur[IDX_H2OII]*y_cur[IDX_eM] - + k[1013]*y_cur[IDX_H2OII]*y_cur[IDX_eM] - + k[1014]*y_cur[IDX_H2OII]*y_cur[IDX_eM] - + k[1899]*y_cur[IDX_CI]*y_cur[IDX_H2OII] - + k[2003]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] - + k[2195]*y_cur[IDX_CH4I]*y_cur[IDX_H2OII] - + k[2247]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] + + k[2351]*y_cur[IDX_HII]*y_cur[IDX_HOCNI] + + k[2352]*y_cur[IDX_HII]*y_cur[IDX_HONCI] + + k[2397]*y_cur[IDX_H2II]*y_cur[IDX_OHI] - + k[2442]*y_cur[IDX_H2I]*y_cur[IDX_H2OII] + + k[2469]*y_cur[IDX_H2I]*y_cur[IDX_OHII] - + k[2503]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] - + k[2504]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] - + k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - + k[2506]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - + k[2507]*y_cur[IDX_H2OII]*y_cur[IDX_COI] - + k[2508]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] - + k[2509]*y_cur[IDX_H2OII]*y_cur[IDX_H2OI] - + k[2510]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - + k[2511]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - + k[2512]*y_cur[IDX_H2OII]*y_cur[IDX_HCNI] - + k[2513]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - + k[2514]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - + k[2515]*y_cur[IDX_H2OII]*y_cur[IDX_HNCI] - + k[2516]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - + k[2517]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - + k[2518]*y_cur[IDX_H2OII]*y_cur[IDX_SO2I] + + k[2730]*y_cur[IDX_H3II]*y_cur[IDX_OI] + + k[2733]*y_cur[IDX_H3II]*y_cur[IDX_OHI] - + k[3457]*y_cur[IDX_NI]*y_cur[IDX_H2OII] - + k[3458]*y_cur[IDX_NI]*y_cur[IDX_H2OII] + + k[3504]*y_cur[IDX_NHII]*y_cur[IDX_OHI] - + k[3536]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] - + k[3575]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] - + k[3612]*y_cur[IDX_NHI]*y_cur[IDX_H2OII] - + k[3733]*y_cur[IDX_OI]*y_cur[IDX_H2OII] + + k[3782]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + + k[3788]*y_cur[IDX_OHII]*y_cur[IDX_OHI] + + k[3797]*y_cur[IDX_OHI]*y_cur[IDX_CH5II] - + k[3799]*y_cur[IDX_OHI]*y_cur[IDX_H2OII] + + k[3800]*y_cur[IDX_OHI]*y_cur[IDX_HCNII] + + k[3801]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + + k[3803]*y_cur[IDX_OHI]*y_cur[IDX_HNOII] + + k[3804]*y_cur[IDX_OHI]*y_cur[IDX_N2HII] + + k[3806]*y_cur[IDX_OHI]*y_cur[IDX_O2HII] - k[6157]*y_cur[IDX_H2OII] + + k[6159]*y_cur[IDX_H2OI] - k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] - + k[6342]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3NM] = 0.0 - k[42]*y_cur[IDX_CI]*y_cur[IDX_C3NM] + - k[91]*y_cur[IDX_HI]*y_cur[IDX_C3NM] - + k[130]*y_cur[IDX_OI]*y_cur[IDX_C3NM] + + k[1115]*y_cur[IDX_HNC3I]*y_cur[IDX_eM] + + k[3377]*y_cur[IDX_NI]*y_cur[IDX_C10M] + + k[3381]*y_cur[IDX_NI]*y_cur[IDX_C10HM] + + k[3409]*y_cur[IDX_NI]*y_cur[IDX_C5M] + + k[3418]*y_cur[IDX_NI]*y_cur[IDX_C6M] + + k[3421]*y_cur[IDX_NI]*y_cur[IDX_C6HM] + + k[3425]*y_cur[IDX_NI]*y_cur[IDX_C7M] + + k[3430]*y_cur[IDX_NI]*y_cur[IDX_C7HM] + + k[3436]*y_cur[IDX_NI]*y_cur[IDX_C8M] + + k[3440]*y_cur[IDX_NI]*y_cur[IDX_C8HM] + + k[3442]*y_cur[IDX_NI]*y_cur[IDX_C9M] + + k[3447]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - + k[4131]*y_cur[IDX_C3NM]*y_cur[IDX_CII] - + k[4132]*y_cur[IDX_C3NM]*y_cur[IDX_C2H2II] - + k[4133]*y_cur[IDX_C3NM]*y_cur[IDX_C2H3II] - + k[4134]*y_cur[IDX_C3NM]*y_cur[IDX_C4H2II] - + k[4135]*y_cur[IDX_C3NM]*y_cur[IDX_C4H3II] - + k[4136]*y_cur[IDX_C3NM]*y_cur[IDX_C4SII] - + k[4137]*y_cur[IDX_C3NM]*y_cur[IDX_CH2CCHII] - + k[4138]*y_cur[IDX_C3NM]*y_cur[IDX_CH3II] - + k[4139]*y_cur[IDX_C3NM]*y_cur[IDX_CNCII] - + k[4140]*y_cur[IDX_C3NM]*y_cur[IDX_FeII] - + k[4141]*y_cur[IDX_C3NM]*y_cur[IDX_HII] - + k[4142]*y_cur[IDX_C3NM]*y_cur[IDX_H2COII] - + k[4143]*y_cur[IDX_C3NM]*y_cur[IDX_H2SII] - + k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] - + k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] - + k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] - + k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] - + k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] - + k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] - + k[4150]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] - + k[4151]*y_cur[IDX_C3NM]*y_cur[IDX_HeII] - + k[4152]*y_cur[IDX_C3NM]*y_cur[IDX_MgII] - + k[4153]*y_cur[IDX_C3NM]*y_cur[IDX_NII] - + k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] - + k[4155]*y_cur[IDX_C3NM]*y_cur[IDX_NH3II] - + k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] - + k[4157]*y_cur[IDX_C3NM]*y_cur[IDX_NOII] - + k[4158]*y_cur[IDX_C3NM]*y_cur[IDX_NaII] - + k[4159]*y_cur[IDX_C3NM]*y_cur[IDX_OII] - + k[4160]*y_cur[IDX_C3NM]*y_cur[IDX_SII] - + k[4161]*y_cur[IDX_C3NM]*y_cur[IDX_SOII] - + k[4162]*y_cur[IDX_C3NM]*y_cur[IDX_SiII] - + k[4163]*y_cur[IDX_C3NM]*y_cur[IDX_SiOII] - + k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] - + k[4165]*y_cur[IDX_C3NM]*y_cur[IDX_SiSII] + + k[5593]*y_cur[IDX_C3NI]*y_cur[IDX_eM] - k[5721]*y_cur[IDX_C3NM] - + k[6005]*y_cur[IDX_C3NM]; + ydot[yistart + IDX_GH2I] = 0.0 + k[6889]*y_cur[IDX_H2I] - + k[7071]*y_cur[IDX_GH2I] - k[7253]*y_cur[IDX_GH2I] - + k[7435]*y_cur[IDX_GH2I] - k[7617]*y_cur[IDX_GH2I] + + k[7620]*y_cur[IDX_GCH2I] + k[7626]*y_cur[IDX_GCH3I] + + k[7628]*y_cur[IDX_GCH3I] + k[7633]*y_cur[IDX_GCH4I] + + k[7635]*y_cur[IDX_GNH3I] + k[7653]*y_cur[IDX_GC2H3I] + + k[7654]*y_cur[IDX_GC2H3I] + k[7657]*y_cur[IDX_GC2H3I] + + k[7658]*y_cur[IDX_GC2H3I] + k[7667]*y_cur[IDX_GC2H4I] + + k[7668]*y_cur[IDX_GC2H4I] + k[7671]*y_cur[IDX_GC2H4I] + + k[7676]*y_cur[IDX_GC2H5I] + k[7677]*y_cur[IDX_GC2H5I] + + k[7687]*y_cur[IDX_GC2H6I] + k[7688]*y_cur[IDX_GC2H6I] + + k[7692]*y_cur[IDX_GH2COI] + k[7695]*y_cur[IDX_GSiH4I] + + k[7709]*y_cur[IDX_GH2SI] + k[7720]*y_cur[IDX_GCH2CCHI] + + k[7746]*y_cur[IDX_GSiCH2I] + k[7775]*y_cur[IDX_GCH2PHI] + + k[7776]*y_cur[IDX_GH2SiOI] + k[7777]*y_cur[IDX_GH2CSI] + + k[7808]*y_cur[IDX_GSiC2H2I] + k[7858]*y_cur[IDX_GC6H6I] - + k[7893]*y_cur[IDX_GH2I] + k[7897]*y_cur[IDX_GCH2I] + + k[7903]*y_cur[IDX_GCH3I] + k[7905]*y_cur[IDX_GCH3I] + + k[7910]*y_cur[IDX_GCH4I] + k[7912]*y_cur[IDX_GCH4I] + + k[7916]*y_cur[IDX_GNH3I] + k[7922]*y_cur[IDX_GH2OI] + + k[7923]*y_cur[IDX_GH2OI] + k[7940]*y_cur[IDX_GC2H3I] + + k[7941]*y_cur[IDX_GC2H3I] + k[7944]*y_cur[IDX_GC2H3I] + + k[7945]*y_cur[IDX_GC2H3I] + k[7954]*y_cur[IDX_GC2H4I] + + k[7955]*y_cur[IDX_GC2H4I] + k[7958]*y_cur[IDX_GC2H4I] + + k[7963]*y_cur[IDX_GC2H5I] + k[7964]*y_cur[IDX_GC2H5I] + + k[7972]*y_cur[IDX_GCH2NHI] + k[7974]*y_cur[IDX_GSiH2I] + + k[7977]*y_cur[IDX_GC2H6I] + k[7978]*y_cur[IDX_GC2H6I] + + k[7982]*y_cur[IDX_GH2COI] + k[7985]*y_cur[IDX_GH2COI] + + k[7989]*y_cur[IDX_GSiH3I] + k[7991]*y_cur[IDX_GSiH3I] + + k[7993]*y_cur[IDX_GSiH4I] + k[7995]*y_cur[IDX_GSiH4I] + + k[8008]*y_cur[IDX_GPH2I] + k[8014]*y_cur[IDX_GH2SI] + + k[8022]*y_cur[IDX_GH2CCCI] + k[8027]*y_cur[IDX_GCH2CCHI] + + k[8029]*y_cur[IDX_GCH2CCH2I] + k[8038]*y_cur[IDX_GCH3CCHI] + + k[8060]*y_cur[IDX_GSiCH2I] + k[8096]*y_cur[IDX_GH2SiOI] + + k[8098]*y_cur[IDX_GH2CSI] + k[8119]*y_cur[IDX_GC4H3I] + + k[8132]*y_cur[IDX_GCH2CHCNI] + k[8184]*y_cur[IDX_GC6H2I] + + k[8201]*y_cur[IDX_GC7H2I] + k[8214]*y_cur[IDX_GC8H2I] + + k[8226]*y_cur[IDX_GC9H2I] + k[8278]*y_cur[IDX_GHI]*y_cur[IDX_GCH4I] + + k[8291]*y_cur[IDX_GHI]*y_cur[IDX_GC2H6I] + + k[8298]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] + + k[8306]*y_cur[IDX_GHI]*y_cur[IDX_GHNOI] + + k[8309]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] + + k[8313]*y_cur[IDX_GHI]*y_cur[IDX_GH2SI] + + k[8332]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] + + k[8337]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] + + k[8347]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] + + k[8367]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - + k[8369]*y_cur[IDX_GH2I]*y_cur[IDX_GCI] - + k[8370]*y_cur[IDX_GH2I]*y_cur[IDX_GCH2I] - + k[8371]*y_cur[IDX_GH2I]*y_cur[IDX_GCH3I] - + k[8372]*y_cur[IDX_GH2I]*y_cur[IDX_GNH2I] - + k[8373]*y_cur[IDX_GH2I]*y_cur[IDX_GOHI] - + k[8374]*y_cur[IDX_GH2I]*y_cur[IDX_GC2I] - + k[8375]*y_cur[IDX_GH2I]*y_cur[IDX_GC2HI] - + k[8376]*y_cur[IDX_GH2I]*y_cur[IDX_GCNI] - + k[8377]*y_cur[IDX_GH2I]*y_cur[IDX_GC3I] - + k[8378]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] - + k[8379]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] - + k[8380]*y_cur[IDX_GH2I]*y_cur[IDX_GC4I] - + k[8381]*y_cur[IDX_GH2I]*y_cur[IDX_GC4HI] - + k[8382]*y_cur[IDX_GH2I]*y_cur[IDX_GC5I] - + k[8383]*y_cur[IDX_GH2I]*y_cur[IDX_GC5HI] - + k[8384]*y_cur[IDX_GH2I]*y_cur[IDX_GC6I] - + k[8385]*y_cur[IDX_GH2I]*y_cur[IDX_GC6HI] - + k[8386]*y_cur[IDX_GH2I]*y_cur[IDX_GC7I] - + k[8387]*y_cur[IDX_GH2I]*y_cur[IDX_GC7HI] - + k[8388]*y_cur[IDX_GH2I]*y_cur[IDX_GC8I] - + k[8389]*y_cur[IDX_GH2I]*y_cur[IDX_GC8HI] - + k[8390]*y_cur[IDX_GH2I]*y_cur[IDX_GC9I] - + k[8391]*y_cur[IDX_GH2I]*y_cur[IDX_GC9HI] - + k[8392]*y_cur[IDX_GH2I]*y_cur[IDX_GC10I] - + k[8393]*y_cur[IDX_GH2I]*y_cur[IDX_GC10HI] + + k[8524]*y_cur[IDX_GNHI]*y_cur[IDX_GNHI] - + k[8653]*y_cur[IDX_GH2I]*y_cur[IDX_GCI]; + ydot[yistart + IDX_C3NI] = 0.0 + k[112]*y_cur[IDX_NI]*y_cur[IDX_C3M] + - k[512]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + + k[832]*y_cur[IDX_C4NII]*y_cur[IDX_eM] + + k[847]*y_cur[IDX_C5NII]*y_cur[IDX_eM] + + k[1063]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + + k[1067]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + + k[1073]*y_cur[IDX_HC4NII]*y_cur[IDX_eM] + + k[1077]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + + k[1354]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - + k[2604]*y_cur[IDX_H3II]*y_cur[IDX_C3NI] - + k[2774]*y_cur[IDX_H3OII]*y_cur[IDX_C3NI] - + k[2909]*y_cur[IDX_HCOII]*y_cur[IDX_C3NI] - + k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + + k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] + + k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + + k[4131]*y_cur[IDX_C3NM]*y_cur[IDX_CII] + + k[4132]*y_cur[IDX_C3NM]*y_cur[IDX_C2H2II] + + k[4133]*y_cur[IDX_C3NM]*y_cur[IDX_C2H3II] + + k[4134]*y_cur[IDX_C3NM]*y_cur[IDX_C4H2II] + + k[4135]*y_cur[IDX_C3NM]*y_cur[IDX_C4H3II] + + k[4136]*y_cur[IDX_C3NM]*y_cur[IDX_C4SII] + + k[4137]*y_cur[IDX_C3NM]*y_cur[IDX_CH2CCHII] + + k[4138]*y_cur[IDX_C3NM]*y_cur[IDX_CH3II] + + k[4139]*y_cur[IDX_C3NM]*y_cur[IDX_CNCII] + + k[4140]*y_cur[IDX_C3NM]*y_cur[IDX_FeII] + + k[4141]*y_cur[IDX_C3NM]*y_cur[IDX_HII] + + k[4142]*y_cur[IDX_C3NM]*y_cur[IDX_H2COII] + + k[4143]*y_cur[IDX_C3NM]*y_cur[IDX_H2SII] + + k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] + + k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] + + k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] + + k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + + k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + + k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + + k[4150]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + + k[4151]*y_cur[IDX_C3NM]*y_cur[IDX_HeII] + + k[4152]*y_cur[IDX_C3NM]*y_cur[IDX_MgII] + + k[4153]*y_cur[IDX_C3NM]*y_cur[IDX_NII] + + k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] + + k[4155]*y_cur[IDX_C3NM]*y_cur[IDX_NH3II] + + k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] + + k[4157]*y_cur[IDX_C3NM]*y_cur[IDX_NOII] + + k[4158]*y_cur[IDX_C3NM]*y_cur[IDX_NaII] + + k[4159]*y_cur[IDX_C3NM]*y_cur[IDX_OII] + + k[4160]*y_cur[IDX_C3NM]*y_cur[IDX_SII] + + k[4161]*y_cur[IDX_C3NM]*y_cur[IDX_SOII] + + k[4162]*y_cur[IDX_C3NM]*y_cur[IDX_SiII] + + k[4163]*y_cur[IDX_C3NM]*y_cur[IDX_SiOII] + + k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] + + k[4165]*y_cur[IDX_C3NM]*y_cur[IDX_SiSII] + + k[4873]*y_cur[IDX_C2I]*y_cur[IDX_HCNI] - + k[4921]*y_cur[IDX_CI]*y_cur[IDX_C3NI] + + k[5233]*y_cur[IDX_NI]*y_cur[IDX_C3HI] - + k[5234]*y_cur[IDX_NI]*y_cur[IDX_C3NI] + + k[5237]*y_cur[IDX_NI]*y_cur[IDX_C4NI] - + k[5358]*y_cur[IDX_OI]*y_cur[IDX_C3NI] + + k[5363]*y_cur[IDX_OI]*y_cur[IDX_C4NI] - + k[5593]*y_cur[IDX_C3NI]*y_cur[IDX_eM] + k[5721]*y_cur[IDX_C3NM] - + k[5722]*y_cur[IDX_C3NI] + k[5796]*y_cur[IDX_CH3C3NI] + + k[6005]*y_cur[IDX_C3NM] - k[6006]*y_cur[IDX_C3NI] + + k[6100]*y_cur[IDX_CH3C3NI] + k[6197]*y_cur[IDX_HNC3I] + + k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + + k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + + k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM] + + k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM] + + k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] - + k[6997]*y_cur[IDX_C3NI] + k[7179]*y_cur[IDX_GC3NI] + + k[7361]*y_cur[IDX_GC3NI] + k[7543]*y_cur[IDX_GC3NI] + + k[8669]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] + + k[8705]*y_cur[IDX_GNI]*y_cur[IDX_GC3I]; + ydot[yistart + IDX_CHII] = 0.0 + + k[170]*y_cur[IDX_CII]*y_cur[IDX_CHI] - + k[250]*y_cur[IDX_CHII]*y_cur[IDX_FeI] - + k[251]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] - + k[252]*y_cur[IDX_CHII]*y_cur[IDX_MgI] - + k[253]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - + k[254]*y_cur[IDX_CHII]*y_cur[IDX_NOI] - + k[255]*y_cur[IDX_CHII]*y_cur[IDX_NaI] - + k[256]*y_cur[IDX_CHII]*y_cur[IDX_SI] - + k[257]*y_cur[IDX_CHII]*y_cur[IDX_SiI] + + k[287]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + + k[288]*y_cur[IDX_CHI]*y_cur[IDX_CNII] + + k[289]*y_cur[IDX_CHI]*y_cur[IDX_COII] + + k[290]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] + + k[291]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] + + k[292]*y_cur[IDX_CHI]*y_cur[IDX_NII] + + k[293]*y_cur[IDX_CHI]*y_cur[IDX_N2II] + + k[294]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] + + k[295]*y_cur[IDX_CHI]*y_cur[IDX_OII] + + k[296]*y_cur[IDX_CHI]*y_cur[IDX_O2II] + + k[297]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + + k[372]*y_cur[IDX_HII]*y_cur[IDX_CHI] + + k[443]*y_cur[IDX_H2II]*y_cur[IDX_CHI] + + k[515]*y_cur[IDX_HeII]*y_cur[IDX_CHI] - + k[906]*y_cur[IDX_CHII]*y_cur[IDX_eM] + + k[1408]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - + k[1890]*y_cur[IDX_CI]*y_cur[IDX_CHII] + + k[1898]*y_cur[IDX_CI]*y_cur[IDX_CH5II] + + k[1899]*y_cur[IDX_CI]*y_cur[IDX_H2OII] + + k[1903]*y_cur[IDX_CI]*y_cur[IDX_HCNII] + + k[1904]*y_cur[IDX_CI]*y_cur[IDX_HCOII] + + k[1905]*y_cur[IDX_CI]*y_cur[IDX_HCO2II] + + k[1907]*y_cur[IDX_CI]*y_cur[IDX_HNOII] + + k[1909]*y_cur[IDX_CI]*y_cur[IDX_N2HII] + + k[1910]*y_cur[IDX_CI]*y_cur[IDX_NHII] + + k[1913]*y_cur[IDX_CI]*y_cur[IDX_O2HII] + + k[1914]*y_cur[IDX_CI]*y_cur[IDX_OHII] - + k[1933]*y_cur[IDX_CHII]*y_cur[IDX_C2I] - + k[1934]*y_cur[IDX_CHII]*y_cur[IDX_C2H2I] - + k[1935]*y_cur[IDX_CHII]*y_cur[IDX_C2HI] - + k[1936]*y_cur[IDX_CHII]*y_cur[IDX_CH2I] - + k[1937]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - + k[1938]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - + k[1939]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - + k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - + k[1941]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - + k[1942]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - + k[1943]*y_cur[IDX_CHII]*y_cur[IDX_CHI] - + k[1944]*y_cur[IDX_CHII]*y_cur[IDX_CNI] - + k[1945]*y_cur[IDX_CHII]*y_cur[IDX_CNI] - + k[1946]*y_cur[IDX_CHII]*y_cur[IDX_CO2I] - + k[1947]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - + k[1948]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - + k[1949]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - + k[1950]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - + k[1951]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - + k[1952]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - + k[1953]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - + k[1954]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] - + k[1955]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] - + k[1956]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - + k[1957]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - + k[1958]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - + k[1959]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] - + k[1960]*y_cur[IDX_CHII]*y_cur[IDX_HNCI] - + k[1961]*y_cur[IDX_CHII]*y_cur[IDX_NI] - + k[1962]*y_cur[IDX_CHII]*y_cur[IDX_NH2I] - + k[1963]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - + k[1964]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - + k[1965]*y_cur[IDX_CHII]*y_cur[IDX_NHI] - + k[1966]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - + k[1967]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - + k[1968]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - + k[1969]*y_cur[IDX_CHII]*y_cur[IDX_OI] - + k[1970]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] - + k[1971]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] - + k[1972]*y_cur[IDX_CHII]*y_cur[IDX_OHI] - + k[1973]*y_cur[IDX_CHII]*y_cur[IDX_SI] - + k[1974]*y_cur[IDX_CHII]*y_cur[IDX_SI] + + k[2314]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + + k[2374]*y_cur[IDX_H2II]*y_cur[IDX_CI] + + k[2398]*y_cur[IDX_H2I]*y_cur[IDX_CII] - + k[2427]*y_cur[IDX_H2I]*y_cur[IDX_CHII] + + k[2632]*y_cur[IDX_H3II]*y_cur[IDX_CI] - + k[2835]*y_cur[IDX_HI]*y_cur[IDX_CHII] + + k[2836]*y_cur[IDX_HI]*y_cur[IDX_CH2II] + + k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + + k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] + + k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + + k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + + k[3386]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + + k[3389]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + + k[5569]*y_cur[IDX_HI]*y_cur[IDX_CII] - k[5776]*y_cur[IDX_CHII] - + k[6073]*y_cur[IDX_CHII] + k[6076]*y_cur[IDX_CH2II] + + k[6095]*y_cur[IDX_CH3II] + k[6132]*y_cur[IDX_CHI] - + k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CO2I] = 0.0 - k[3]*y_cur[IDX_CM]*y_cur[IDX_CO2I] + + k[7]*y_cur[IDX_CM]*y_cur[IDX_O2I] + + k[124]*y_cur[IDX_OM]*y_cur[IDX_COI] + + k[228]*y_cur[IDX_C2H2I]*y_cur[IDX_CO2II] + + k[238]*y_cur[IDX_C2H4I]*y_cur[IDX_CO2II] + + k[286]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - + k[298]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - + k[307]*y_cur[IDX_COII]*y_cur[IDX_CO2I] + + k[314]*y_cur[IDX_CO2II]*y_cur[IDX_OCSI] + + k[315]*y_cur[IDX_CO2II]*y_cur[IDX_SO2I] + + k[479]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] + + k[484]*y_cur[IDX_H2SI]*y_cur[IDX_CO2II] - + k[516]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[548]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - + k[564]*y_cur[IDX_N2II]*y_cur[IDX_CO2I] + + k[603]*y_cur[IDX_NH3I]*y_cur[IDX_CO2II] + + k[623]*y_cur[IDX_NOI]*y_cur[IDX_CO2II] + + k[678]*y_cur[IDX_O2I]*y_cur[IDX_CO2II] + + k[683]*y_cur[IDX_OI]*y_cur[IDX_CO2II] + + k[983]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + + k[1098]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + + k[1101]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + + k[1286]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - + k[1387]*y_cur[IDX_CII]*y_cur[IDX_CO2I] - + k[1468]*y_cur[IDX_C2HII]*y_cur[IDX_CO2I] + + k[1567]*y_cur[IDX_C2H2I]*y_cur[IDX_HCO2II] - + k[1753]*y_cur[IDX_C3HII]*y_cur[IDX_CO2I] + + k[1905]*y_cur[IDX_CI]*y_cur[IDX_HCO2II] - + k[1946]*y_cur[IDX_CHII]*y_cur[IDX_CO2I] - + k[1978]*y_cur[IDX_CH2II]*y_cur[IDX_CO2I] + + k[2116]*y_cur[IDX_CH3CNI]*y_cur[IDX_HCO2II] - + k[2139]*y_cur[IDX_CH4II]*y_cur[IDX_CO2I] + + k[2201]*y_cur[IDX_CH4I]*y_cur[IDX_HCO2II] - + k[2223]*y_cur[IDX_CH5II]*y_cur[IDX_CO2I] - + k[2269]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - + k[2270]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + + k[2282]*y_cur[IDX_COII]*y_cur[IDX_SO2I] + + k[2285]*y_cur[IDX_COI]*y_cur[IDX_HCO2II] + + k[2290]*y_cur[IDX_COI]*y_cur[IDX_SO2II] + + k[2292]*y_cur[IDX_COI]*y_cur[IDX_SiOII] - + k[2334]*y_cur[IDX_HII]*y_cur[IDX_CO2I] - + k[2382]*y_cur[IDX_H2II]*y_cur[IDX_CO2I] + + k[2548]*y_cur[IDX_H2OI]*y_cur[IDX_HCO2II] - + k[2674]*y_cur[IDX_H3II]*y_cur[IDX_CO2I] - + k[2853]*y_cur[IDX_HCNII]*y_cur[IDX_CO2I] - + k[3049]*y_cur[IDX_HNOII]*y_cur[IDX_CO2I] - + k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3343]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - + k[3372]*y_cur[IDX_N2HII]*y_cur[IDX_CO2I] - k[3482]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - k[3483]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - - k[3484]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - - k[3485]*y_cur[IDX_NHII]*y_cur[IDX_COI] - - k[3486]*y_cur[IDX_NHII]*y_cur[IDX_COI] - - k[3487]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - - k[3488]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - - k[3489]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[3490]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[3491]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[3492]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - - k[3493]*y_cur[IDX_NHII]*y_cur[IDX_HCNI] - - k[3494]*y_cur[IDX_NHII]*y_cur[IDX_HCOI] - - k[3495]*y_cur[IDX_NHII]*y_cur[IDX_HNCI] - - k[3496]*y_cur[IDX_NHII]*y_cur[IDX_N2I] - - k[3497]*y_cur[IDX_NHII]*y_cur[IDX_NH2I] - - k[3498]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] - - k[3499]*y_cur[IDX_NHII]*y_cur[IDX_NHI] - - k[3500]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - - k[3501]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - - k[3502]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - - k[3503]*y_cur[IDX_NHII]*y_cur[IDX_OI] - - k[3504]*y_cur[IDX_NHII]*y_cur[IDX_OHI] - - k[3505]*y_cur[IDX_NHII]*y_cur[IDX_SI] - - k[3506]*y_cur[IDX_NHII]*y_cur[IDX_SI] + k[5889]*y_cur[IDX_NHI] - - k[6217]*y_cur[IDX_NHII] + k[6225]*y_cur[IDX_NHI] - - k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NH2I] = 0.0 - k[78]*y_cur[IDX_HM]*y_cur[IDX_NH2I] - + k[79]*y_cur[IDX_HM]*y_cur[IDX_NHI] + - k[265]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] + - k[294]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] - - k[400]*y_cur[IDX_HII]*y_cur[IDX_NH2I] - - k[451]*y_cur[IDX_H2II]*y_cur[IDX_NH2I] - - k[557]*y_cur[IDX_NII]*y_cur[IDX_NH2I] + - k[580]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + - k[581]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] + - k[582]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] + - k[583]*y_cur[IDX_NH2II]*y_cur[IDX_NOI] + - k[584]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - - k[585]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] - - k[586]*y_cur[IDX_NH2I]*y_cur[IDX_CNII] - - k[587]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - - k[588]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] - - k[589]*y_cur[IDX_NH2I]*y_cur[IDX_N2II] - + k[3484]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] + + k[3585]*y_cur[IDX_NH3I]*y_cur[IDX_HCO2II] - + k[3640]*y_cur[IDX_OII]*y_cur[IDX_CO2I] + + k[3649]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - + k[3677]*y_cur[IDX_O2HII]*y_cur[IDX_CO2I] - + k[3776]*y_cur[IDX_OHII]*y_cur[IDX_CO2I] - + k[3811]*y_cur[IDX_PII]*y_cur[IDX_CO2I] + + k[3858]*y_cur[IDX_SOII]*y_cur[IDX_OCSI] + + k[5007]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + + k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5075]*y_cur[IDX_CHI]*y_cur[IDX_CO2I] + + k[5086]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5087]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5127]*y_cur[IDX_COI]*y_cur[IDX_HNOI] + + k[5128]*y_cur[IDX_COI]*y_cur[IDX_N2OI] + + k[5129]*y_cur[IDX_COI]*y_cur[IDX_NO2I] + + k[5130]*y_cur[IDX_COI]*y_cur[IDX_O2I] + + k[5131]*y_cur[IDX_COI]*y_cur[IDX_O2HI] - + k[5162]*y_cur[IDX_HI]*y_cur[IDX_CO2I] + + k[5208]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - + k[5262]*y_cur[IDX_NI]*y_cur[IDX_CO2I] + + k[5331]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] + + k[5335]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] - + k[5390]*y_cur[IDX_OI]*y_cur[IDX_CO2I] + + k[5405]*y_cur[IDX_OI]*y_cur[IDX_HCOI] + + k[5430]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + + k[5461]*y_cur[IDX_OHI]*y_cur[IDX_COI] - + k[5491]*y_cur[IDX_SiI]*y_cur[IDX_CO2I] - k[5825]*y_cur[IDX_CO2I] + + k[5858]*y_cur[IDX_HCOOCH3I] - k[6137]*y_cur[IDX_CO2I] + + k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + + k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + + k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + + k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6978]*y_cur[IDX_CO2I] + k[7160]*y_cur[IDX_GCO2I] + + k[7342]*y_cur[IDX_GCO2I] + k[7524]*y_cur[IDX_GCO2I] + + k[8693]*y_cur[IDX_GOI]*y_cur[IDX_GCOI]; + ydot[yistart + IDX_O2II] = 0.0 - + k[211]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - + k[240]*y_cur[IDX_C2H4I]*y_cur[IDX_O2II] - + k[248]*y_cur[IDX_CI]*y_cur[IDX_O2II] - + k[267]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] + + k[283]*y_cur[IDX_CH4II]*y_cur[IDX_O2I] - + k[296]*y_cur[IDX_CHI]*y_cur[IDX_O2II] + + k[304]*y_cur[IDX_CNII]*y_cur[IDX_O2I] + + k[312]*y_cur[IDX_COII]*y_cur[IDX_O2I] + + k[405]*y_cur[IDX_HII]*y_cur[IDX_O2I] + + k[455]*y_cur[IDX_H2II]*y_cur[IDX_O2I] - + k[461]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + + k[474]*y_cur[IDX_H2OII]*y_cur[IDX_O2I] + + k[495]*y_cur[IDX_HCNII]*y_cur[IDX_O2I] - + k[502]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] + + k[525]*y_cur[IDX_HeII]*y_cur[IDX_O2I] - + k[537]*y_cur[IDX_MgI]*y_cur[IDX_O2II] + + k[561]*y_cur[IDX_NII]*y_cur[IDX_O2I] + + k[570]*y_cur[IDX_N2II]*y_cur[IDX_O2I] + + k[578]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - k[590]*y_cur[IDX_NH2I]*y_cur[IDX_O2II] - - k[591]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] - - k[660]*y_cur[IDX_OII]*y_cur[IDX_NH2I] + - k[922]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] + - k[1009]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + - k[1161]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] + - k[1163]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + - k[1165]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + - k[1166]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + - k[1212]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + - k[1216]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - - k[1417]*y_cur[IDX_CII]*y_cur[IDX_NH2I] - - k[1962]*y_cur[IDX_CHII]*y_cur[IDX_NH2I] + - k[2013]*y_cur[IDX_CH2I]*y_cur[IDX_NH3II] - - k[2086]*y_cur[IDX_CH3II]*y_cur[IDX_NH2I] + - k[2199]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] + - k[2318]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - - k[2721]*y_cur[IDX_H3II]*y_cur[IDX_NH2I] - - k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] - - k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + - k[3488]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - - k[3497]*y_cur[IDX_NHII]*y_cur[IDX_NH2I] - - k[3522]*y_cur[IDX_NH2II]*y_cur[IDX_NH2I] - - k[3528]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] - - k[3529]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - - k[3530]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - - k[3531]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] - - k[3532]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] - - k[3533]*y_cur[IDX_NH2I]*y_cur[IDX_CH5II] - - k[3534]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - - k[3535]*y_cur[IDX_NH2I]*y_cur[IDX_H2COII] - - k[3536]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] - - k[3537]*y_cur[IDX_NH2I]*y_cur[IDX_H3COII] - - k[3538]*y_cur[IDX_NH2I]*y_cur[IDX_H3OII] - - k[3539]*y_cur[IDX_NH2I]*y_cur[IDX_HCNII] - - k[3540]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] - - k[3541]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] - - k[3542]*y_cur[IDX_NH2I]*y_cur[IDX_HCOII] - - k[3543]*y_cur[IDX_NH2I]*y_cur[IDX_HNOII] - - k[3544]*y_cur[IDX_NH2I]*y_cur[IDX_N2HII] - - k[3545]*y_cur[IDX_NH2I]*y_cur[IDX_NH3II] - - k[3546]*y_cur[IDX_NH2I]*y_cur[IDX_O2HII] - - k[3547]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] + - k[3553]*y_cur[IDX_NH3II]*y_cur[IDX_NH3I] + - k[3573]*y_cur[IDX_NH3I]*y_cur[IDX_COII] + - k[3581]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - - k[4969]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - - k[4970]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - - k[4971]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - - k[5035]*y_cur[IDX_CH3I]*y_cur[IDX_NH2I] + - k[5036]*y_cur[IDX_CH3I]*y_cur[IDX_NH3I] - - k[5142]*y_cur[IDX_H2I]*y_cur[IDX_NH2I] + - k[5143]*y_cur[IDX_H2I]*y_cur[IDX_NHI] + - k[5175]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - - k[5182]*y_cur[IDX_HI]*y_cur[IDX_NH2I] + - k[5183]*y_cur[IDX_HI]*y_cur[IDX_NH3I] - - k[5297]*y_cur[IDX_NH2I]*y_cur[IDX_CH4I] - - k[5298]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] - - k[5299]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] - - k[5300]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] - - k[5301]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] + - k[5302]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] + - k[5304]*y_cur[IDX_NHI]*y_cur[IDX_CH4I] + - k[5306]*y_cur[IDX_NHI]*y_cur[IDX_H2OI] + - k[5307]*y_cur[IDX_NHI]*y_cur[IDX_NH3I] + - k[5307]*y_cur[IDX_NHI]*y_cur[IDX_NH3I] + - k[5310]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + - k[5323]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - - k[5420]*y_cur[IDX_OI]*y_cur[IDX_NH2I] - - k[5421]*y_cur[IDX_OI]*y_cur[IDX_NH2I] + - k[5422]*y_cur[IDX_OI]*y_cur[IDX_NH3I] + - k[5470]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] + - k[5476]*y_cur[IDX_OHI]*y_cur[IDX_NH3I] - k[5882]*y_cur[IDX_NH2I] - - k[5883]*y_cur[IDX_NH2I] + k[5884]*y_cur[IDX_NH2CNI] + - k[5885]*y_cur[IDX_NH3I] - k[6218]*y_cur[IDX_NH2I] - - k[6219]*y_cur[IDX_NH2I] + k[6220]*y_cur[IDX_NH2CNI] + - k[6221]*y_cur[IDX_NH3I] + k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] - + k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + - k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + - k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + - k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + - k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + - k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + - k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - - k[6897]*y_cur[IDX_NH2I] + k[7079]*y_cur[IDX_GNH2I] + - k[7261]*y_cur[IDX_GNH2I] + k[7443]*y_cur[IDX_GNH2I] + - k[8581]*y_cur[IDX_GHI]*y_cur[IDX_GNHI]; - ydot[yistart + IDX_NH2II] = 0.0 - - k[265]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] - - k[294]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] + - k[400]*y_cur[IDX_HII]*y_cur[IDX_NH2I] + - k[451]*y_cur[IDX_H2II]*y_cur[IDX_NH2I] + - k[557]*y_cur[IDX_NII]*y_cur[IDX_NH2I] - - k[580]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[581]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] - - k[582]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] - - k[583]*y_cur[IDX_NH2II]*y_cur[IDX_NOI] - - k[584]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + - k[585]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] + - k[586]*y_cur[IDX_NH2I]*y_cur[IDX_CNII] + - k[587]*y_cur[IDX_NH2I]*y_cur[IDX_COII] + - k[588]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] + - k[589]*y_cur[IDX_NH2I]*y_cur[IDX_N2II] + - k[590]*y_cur[IDX_NH2I]*y_cur[IDX_O2II] + - k[591]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] + - k[660]*y_cur[IDX_OII]*y_cur[IDX_NH2I] - - k[1159]*y_cur[IDX_NH2II]*y_cur[IDX_eM] - - k[1160]*y_cur[IDX_NH2II]*y_cur[IDX_eM] - - k[2012]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] - - k[2259]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] + - k[2317]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] + - k[2348]*y_cur[IDX_HII]*y_cur[IDX_HNCOI] + + k[611]*y_cur[IDX_NH3I]*y_cur[IDX_O2II] - + k[628]*y_cur[IDX_NOI]*y_cur[IDX_O2II] - + k[642]*y_cur[IDX_NaI]*y_cur[IDX_O2II] + + k[662]*y_cur[IDX_OII]*y_cur[IDX_O2I] - + k[668]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - + k[669]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - + k[670]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[671]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] - + k[672]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - + k[673]*y_cur[IDX_O2II]*y_cur[IDX_FeI] - + k[674]*y_cur[IDX_O2II]*y_cur[IDX_H2SI] - + k[675]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] - + k[676]*y_cur[IDX_O2II]*y_cur[IDX_NO2I] - + k[677]*y_cur[IDX_O2II]*y_cur[IDX_SI] + + k[678]*y_cur[IDX_O2I]*y_cur[IDX_CO2II] + + k[679]*y_cur[IDX_O2I]*y_cur[IDX_ClII] + + k[680]*y_cur[IDX_O2I]*y_cur[IDX_SO2II] + + k[694]*y_cur[IDX_OHII]*y_cur[IDX_O2I] - + k[722]*y_cur[IDX_SiI]*y_cur[IDX_O2II] - + k[1174]*y_cur[IDX_O2II]*y_cur[IDX_eM] - + k[1462]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - + k[1912]*y_cur[IDX_CI]*y_cur[IDX_O2II] - + k[2014]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] - + k[2208]*y_cur[IDX_CH4I]*y_cur[IDX_O2II] - + k[2262]*y_cur[IDX_CHI]*y_cur[IDX_O2II] - + k[2498]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] - + k[3010]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] + + k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3465]*y_cur[IDX_NI]*y_cur[IDX_O2II] - + k[3620]*y_cur[IDX_NHI]*y_cur[IDX_O2II] - + k[3621]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + + k[3640]*y_cur[IDX_OII]*y_cur[IDX_CO2I] + + k[3650]*y_cur[IDX_OII]*y_cur[IDX_OHI] - + k[3654]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - + k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - + k[3656]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - + k[3657]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - + k[3658]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3659]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3660]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3661]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3664]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] - + k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - + k[3666]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] - + k[3667]*y_cur[IDX_O2II]*y_cur[IDX_SI] + + k[3730]*y_cur[IDX_OI]*y_cur[IDX_CO2II] + + k[3733]*y_cur[IDX_OI]*y_cur[IDX_H2OII] + + k[3750]*y_cur[IDX_OI]*y_cur[IDX_OHII] + k[5897]*y_cur[IDX_O2I] - + k[6233]*y_cur[IDX_O2II] + k[6235]*y_cur[IDX_O2I] - + k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C10HI] = 0.0 + + k[54]*y_cur[IDX_CI]*y_cur[IDX_C9HM] + + k[85]*y_cur[IDX_HI]*y_cur[IDX_C10M] - + k[147]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - + k[322]*y_cur[IDX_HII]*y_cur[IDX_C10HI] - + k[507]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[732]*y_cur[IDX_C10H2II]*y_cur[IDX_eM] - + k[1298]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - + k[1299]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - + k[2585]*y_cur[IDX_H3II]*y_cur[IDX_C10HI] - + k[2901]*y_cur[IDX_HCOII]*y_cur[IDX_C10HI] - + k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3956]*y_cur[IDX_C10HM]*y_cur[IDX_CII] + + k[3957]*y_cur[IDX_C10HM]*y_cur[IDX_C2H2II] + + k[3958]*y_cur[IDX_C10HM]*y_cur[IDX_C2H3II] + + k[3959]*y_cur[IDX_C10HM]*y_cur[IDX_C4H2II] + + k[3960]*y_cur[IDX_C10HM]*y_cur[IDX_C4H3II] + + k[3961]*y_cur[IDX_C10HM]*y_cur[IDX_C4SII] + + k[3962]*y_cur[IDX_C10HM]*y_cur[IDX_CH2CCHII] + + k[3963]*y_cur[IDX_C10HM]*y_cur[IDX_CH3II] + + k[3964]*y_cur[IDX_C10HM]*y_cur[IDX_CNCII] + + k[3965]*y_cur[IDX_C10HM]*y_cur[IDX_FeII] + + k[3966]*y_cur[IDX_C10HM]*y_cur[IDX_HII] + + k[3967]*y_cur[IDX_C10HM]*y_cur[IDX_H2COII] + + k[3968]*y_cur[IDX_C10HM]*y_cur[IDX_H2SII] + + k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] + + k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] + + k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] + + k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + + k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + + k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + + k[3975]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + + k[3976]*y_cur[IDX_C10HM]*y_cur[IDX_HeII] + + k[3977]*y_cur[IDX_C10HM]*y_cur[IDX_MgII] + + k[3978]*y_cur[IDX_C10HM]*y_cur[IDX_NII] + + k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] + + k[3980]*y_cur[IDX_C10HM]*y_cur[IDX_NH3II] + + k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] + + k[3982]*y_cur[IDX_C10HM]*y_cur[IDX_NOII] + + k[3983]*y_cur[IDX_C10HM]*y_cur[IDX_NaII] + + k[3984]*y_cur[IDX_C10HM]*y_cur[IDX_OII] + + k[3985]*y_cur[IDX_C10HM]*y_cur[IDX_SII] + + k[3986]*y_cur[IDX_C10HM]*y_cur[IDX_SOII] + + k[3987]*y_cur[IDX_C10HM]*y_cur[IDX_SiII] + + k[3988]*y_cur[IDX_C10HM]*y_cur[IDX_SiOII] + + k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] + + k[3990]*y_cur[IDX_C10HM]*y_cur[IDX_SiSII] - + k[4910]*y_cur[IDX_CI]*y_cur[IDX_C10HI] + + k[4941]*y_cur[IDX_CI]*y_cur[IDX_C9H2I] - + k[5341]*y_cur[IDX_OI]*y_cur[IDX_C10HI] - + k[5588]*y_cur[IDX_C10HI]*y_cur[IDX_eM] + k[5689]*y_cur[IDX_C10HM] + + k[5690]*y_cur[IDX_C10H2I] - k[5691]*y_cur[IDX_C10HI] + + k[5956]*y_cur[IDX_C10HM] + k[5959]*y_cur[IDX_C10H2I] - + k[5961]*y_cur[IDX_C10HI] - k[5962]*y_cur[IDX_C10HI] - + k[5963]*y_cur[IDX_C10HI] - k[5964]*y_cur[IDX_C10HI] - + k[5965]*y_cur[IDX_C10HI] - k[5966]*y_cur[IDX_C10HI] - + k[5967]*y_cur[IDX_C10HI] - k[5968]*y_cur[IDX_C10HI] + + k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM] - + k[7065]*y_cur[IDX_C10HI] + k[7247]*y_cur[IDX_GC10HI] + + k[7429]*y_cur[IDX_GC10HI] + k[7611]*y_cur[IDX_GC10HI] + + k[8648]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] + + k[8683]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI]; + ydot[yistart + IDX_C9HI] = 0.0 + k[52]*y_cur[IDX_CI]*y_cur[IDX_C8HM] + + k[103]*y_cur[IDX_HI]*y_cur[IDX_C9M] - + k[357]*y_cur[IDX_HII]*y_cur[IDX_C9HI] + + k[894]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] + + k[896]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + + k[898]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + + k[900]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] - + k[1340]*y_cur[IDX_CII]*y_cur[IDX_C9HI] - + k[2313]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - + k[2630]*y_cur[IDX_H3II]*y_cur[IDX_C9HI] - + k[2935]*y_cur[IDX_HCOII]*y_cur[IDX_C9HI] - + k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] - + k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + + k[3382]*y_cur[IDX_NI]*y_cur[IDX_C10HM] + + k[3682]*y_cur[IDX_OI]*y_cur[IDX_C10H2II] + + k[4586]*y_cur[IDX_C9HM]*y_cur[IDX_CII] + + k[4587]*y_cur[IDX_C9HM]*y_cur[IDX_C2H2II] + + k[4588]*y_cur[IDX_C9HM]*y_cur[IDX_C2H3II] + + k[4589]*y_cur[IDX_C9HM]*y_cur[IDX_C4H2II] + + k[4590]*y_cur[IDX_C9HM]*y_cur[IDX_C4H3II] + + k[4591]*y_cur[IDX_C9HM]*y_cur[IDX_C4SII] + + k[4592]*y_cur[IDX_C9HM]*y_cur[IDX_CH2CCHII] + + k[4593]*y_cur[IDX_C9HM]*y_cur[IDX_CH3II] + + k[4594]*y_cur[IDX_C9HM]*y_cur[IDX_CNCII] + + k[4595]*y_cur[IDX_C9HM]*y_cur[IDX_FeII] + + k[4596]*y_cur[IDX_C9HM]*y_cur[IDX_HII] + + k[4597]*y_cur[IDX_C9HM]*y_cur[IDX_H2COII] + + k[4598]*y_cur[IDX_C9HM]*y_cur[IDX_H2SII] + + k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] + + k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] + + k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] + + k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + + k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + + k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + + k[4605]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + + k[4606]*y_cur[IDX_C9HM]*y_cur[IDX_HeII] + + k[4607]*y_cur[IDX_C9HM]*y_cur[IDX_MgII] + + k[4608]*y_cur[IDX_C9HM]*y_cur[IDX_NII] + + k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] + + k[4610]*y_cur[IDX_C9HM]*y_cur[IDX_NH3II] + + k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] + + k[4612]*y_cur[IDX_C9HM]*y_cur[IDX_NOII] + + k[4613]*y_cur[IDX_C9HM]*y_cur[IDX_NaII] + + k[4614]*y_cur[IDX_C9HM]*y_cur[IDX_OII] + + k[4615]*y_cur[IDX_C9HM]*y_cur[IDX_SII] + + k[4616]*y_cur[IDX_C9HM]*y_cur[IDX_SOII] + + k[4617]*y_cur[IDX_C9HM]*y_cur[IDX_SiII] + + k[4618]*y_cur[IDX_C9HM]*y_cur[IDX_SiOII] + + k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] + + k[4620]*y_cur[IDX_C9HM]*y_cur[IDX_SiSII] + + k[4939]*y_cur[IDX_CI]*y_cur[IDX_C8H2I] - + k[4942]*y_cur[IDX_CI]*y_cur[IDX_C9HI] - + k[5251]*y_cur[IDX_NI]*y_cur[IDX_C9HI] + + k[5341]*y_cur[IDX_OI]*y_cur[IDX_C10HI] - + k[5376]*y_cur[IDX_OI]*y_cur[IDX_C9HI] - + k[5606]*y_cur[IDX_C9HI]*y_cur[IDX_eM] + k[5768]*y_cur[IDX_C9HM] + + k[5769]*y_cur[IDX_C9H2I] - k[5770]*y_cur[IDX_C9HI] + + k[6062]*y_cur[IDX_C9HM] + k[6064]*y_cur[IDX_C9H2I] - + k[6065]*y_cur[IDX_C9HI] - k[6066]*y_cur[IDX_C9HI] + + k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + + k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + + k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + + k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] - + k[7061]*y_cur[IDX_C9HI] + k[7243]*y_cur[IDX_GC9HI] + + k[7425]*y_cur[IDX_GC9HI] + k[7607]*y_cur[IDX_GC9HI] + + k[8646]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] + + k[8681]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] + + k[8734]*y_cur[IDX_GCHI]*y_cur[IDX_GC8I]; + ydot[yistart + IDX_SiOI] = 0.0 - + k[434]*y_cur[IDX_HII]*y_cur[IDX_SiOI] + + k[504]*y_cur[IDX_HCOI]*y_cur[IDX_SiOII] + + k[541]*y_cur[IDX_MgI]*y_cur[IDX_SiOII] + + k[631]*y_cur[IDX_NOI]*y_cur[IDX_SiOII] + + k[726]*y_cur[IDX_SiOII]*y_cur[IDX_FeI] + + k[1024]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] + + k[1052]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + + k[1146]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] + + k[1268]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] - + k[1447]*y_cur[IDX_CII]*y_cur[IDX_SiOI] - + k[2760]*y_cur[IDX_H3II]*y_cur[IDX_SiOI] - + k[2826]*y_cur[IDX_H3OII]*y_cur[IDX_SiOI] - + k[3005]*y_cur[IDX_HCOII]*y_cur[IDX_SiOI] - + k[3332]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] - + k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + + k[3604]*y_cur[IDX_NH3I]*y_cur[IDX_SiOHII] + + k[3675]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] - + k[3794]*y_cur[IDX_OHII]*y_cur[IDX_SiOI] + + k[3918]*y_cur[IDX_CM]*y_cur[IDX_SiOII] + + k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] + + k[3953]*y_cur[IDX_C10M]*y_cur[IDX_SiOII] + + k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] + + k[3988]*y_cur[IDX_C10HM]*y_cur[IDX_SiOII] + + k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] + + k[4023]*y_cur[IDX_C2M]*y_cur[IDX_SiOII] + + k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] + + k[4058]*y_cur[IDX_C2HM]*y_cur[IDX_SiOII] + + k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] + + k[4093]*y_cur[IDX_C3M]*y_cur[IDX_SiOII] + + k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] + + k[4128]*y_cur[IDX_C3HM]*y_cur[IDX_SiOII] + + k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] + + k[4163]*y_cur[IDX_C3NM]*y_cur[IDX_SiOII] + + k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] + + k[4198]*y_cur[IDX_C4M]*y_cur[IDX_SiOII] + + k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] + + k[4233]*y_cur[IDX_C4HM]*y_cur[IDX_SiOII] + + k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] + + k[4268]*y_cur[IDX_C5M]*y_cur[IDX_SiOII] + + k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] + + k[4303]*y_cur[IDX_C5HM]*y_cur[IDX_SiOII] + + k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] + + k[4338]*y_cur[IDX_C5NM]*y_cur[IDX_SiOII] + + k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] + + k[4373]*y_cur[IDX_C6M]*y_cur[IDX_SiOII] + + k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] + + k[4408]*y_cur[IDX_C6HM]*y_cur[IDX_SiOII] + + k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] + + k[4443]*y_cur[IDX_C7M]*y_cur[IDX_SiOII] + + k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] + + k[4478]*y_cur[IDX_C7HM]*y_cur[IDX_SiOII] + + k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] + + k[4513]*y_cur[IDX_C8M]*y_cur[IDX_SiOII] + + k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] + + k[4548]*y_cur[IDX_C8HM]*y_cur[IDX_SiOII] + + k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] + + k[4583]*y_cur[IDX_C9M]*y_cur[IDX_SiOII] + + k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] + + k[4618]*y_cur[IDX_C9HM]*y_cur[IDX_SiOII] + + k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] + + k[4653]*y_cur[IDX_CHM]*y_cur[IDX_SiOII] + + k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] + + k[4688]*y_cur[IDX_CNM]*y_cur[IDX_SiOII] + + k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] + + k[4724]*y_cur[IDX_HM]*y_cur[IDX_SiOII] + + k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] + + k[4759]*y_cur[IDX_OM]*y_cur[IDX_SiOII] + + k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] + + k[4794]*y_cur[IDX_O2M]*y_cur[IDX_SiOII] + + k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] + + k[4829]*y_cur[IDX_OHM]*y_cur[IDX_SiOII] + + k[4830]*y_cur[IDX_OHM]*y_cur[IDX_SiOHII] + + k[4864]*y_cur[IDX_SM]*y_cur[IDX_SiOII] + + k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] + + k[5410]*y_cur[IDX_OI]*y_cur[IDX_HCSiI] + + k[5444]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + + k[5445]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] + + k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] + + k[5449]*y_cur[IDX_OI]*y_cur[IDX_SiHI] + + k[5451]*y_cur[IDX_OI]*y_cur[IDX_SiNI] + + k[5482]*y_cur[IDX_OHI]*y_cur[IDX_SiI] - + k[5483]*y_cur[IDX_OHI]*y_cur[IDX_SiOI] + + k[5491]*y_cur[IDX_SiI]*y_cur[IDX_CO2I] + + k[5492]*y_cur[IDX_SiI]*y_cur[IDX_COI] + + k[5493]*y_cur[IDX_SiI]*y_cur[IDX_NOI] + + k[5494]*y_cur[IDX_SiI]*y_cur[IDX_O2I] + + k[5585]*y_cur[IDX_OI]*y_cur[IDX_SiI] + k[5843]*y_cur[IDX_H2SiOI] + + k[5933]*y_cur[IDX_SiO2I] - k[5934]*y_cur[IDX_SiOI] + + k[6166]*y_cur[IDX_H2SiOI] + k[6167]*y_cur[IDX_H2SiOI] + + k[6285]*y_cur[IDX_SiO2I] - k[6286]*y_cur[IDX_SiOI] - + k[6287]*y_cur[IDX_SiOI] + + k[6557]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] + + k[6586]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] + + k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + + k[6724]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - + k[6979]*y_cur[IDX_SiOI] + k[7161]*y_cur[IDX_GSiOI] + + k[7343]*y_cur[IDX_GSiOI] + k[7525]*y_cur[IDX_GSiOI]; + ydot[yistart + IDX_FeII] = 0.0 + + k[173]*y_cur[IDX_CII]*y_cur[IDX_FeI] + + k[221]*y_cur[IDX_C2H2II]*y_cur[IDX_FeI] + + k[250]*y_cur[IDX_CHII]*y_cur[IDX_FeI] + + k[271]*y_cur[IDX_CH3II]*y_cur[IDX_FeI] + + k[317]*y_cur[IDX_CSII]*y_cur[IDX_FeI] + + k[375]*y_cur[IDX_HII]*y_cur[IDX_FeI] + + k[459]*y_cur[IDX_H2COII]*y_cur[IDX_FeI] + + k[467]*y_cur[IDX_H2OII]*y_cur[IDX_FeI] + + k[483]*y_cur[IDX_H2SII]*y_cur[IDX_FeI] + + k[499]*y_cur[IDX_HCOII]*y_cur[IDX_FeI] + + k[505]*y_cur[IDX_HSII]*y_cur[IDX_FeI] + + k[550]*y_cur[IDX_NII]*y_cur[IDX_FeI] + + k[565]*y_cur[IDX_N2II]*y_cur[IDX_FeI] + + k[592]*y_cur[IDX_NH3II]*y_cur[IDX_FeI] + + k[620]*y_cur[IDX_NOII]*y_cur[IDX_FeI] - + k[634]*y_cur[IDX_NaI]*y_cur[IDX_FeII] + + k[654]*y_cur[IDX_OII]*y_cur[IDX_FeI] + + k[673]*y_cur[IDX_O2II]*y_cur[IDX_FeI] + + k[703]*y_cur[IDX_SII]*y_cur[IDX_FeI] + + k[715]*y_cur[IDX_SOII]*y_cur[IDX_FeI] + + k[716]*y_cur[IDX_SiII]*y_cur[IDX_FeI] + + k[726]*y_cur[IDX_SiOII]*y_cur[IDX_FeI] + + k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] - + k[3895]*y_cur[IDX_CM]*y_cur[IDX_FeII] - + k[3930]*y_cur[IDX_C10M]*y_cur[IDX_FeII] - + k[3965]*y_cur[IDX_C10HM]*y_cur[IDX_FeII] - + k[4000]*y_cur[IDX_C2M]*y_cur[IDX_FeII] - + k[4035]*y_cur[IDX_C2HM]*y_cur[IDX_FeII] - + k[4070]*y_cur[IDX_C3M]*y_cur[IDX_FeII] - + k[4105]*y_cur[IDX_C3HM]*y_cur[IDX_FeII] - + k[4140]*y_cur[IDX_C3NM]*y_cur[IDX_FeII] - + k[4175]*y_cur[IDX_C4M]*y_cur[IDX_FeII] - + k[4210]*y_cur[IDX_C4HM]*y_cur[IDX_FeII] - + k[4245]*y_cur[IDX_C5M]*y_cur[IDX_FeII] - + k[4280]*y_cur[IDX_C5HM]*y_cur[IDX_FeII] - + k[4315]*y_cur[IDX_C5NM]*y_cur[IDX_FeII] - + k[4350]*y_cur[IDX_C6M]*y_cur[IDX_FeII] - + k[4385]*y_cur[IDX_C6HM]*y_cur[IDX_FeII] - + k[4420]*y_cur[IDX_C7M]*y_cur[IDX_FeII] - + k[4455]*y_cur[IDX_C7HM]*y_cur[IDX_FeII] - + k[4490]*y_cur[IDX_C8M]*y_cur[IDX_FeII] - + k[4525]*y_cur[IDX_C8HM]*y_cur[IDX_FeII] - + k[4560]*y_cur[IDX_C9M]*y_cur[IDX_FeII] - + k[4595]*y_cur[IDX_C9HM]*y_cur[IDX_FeII] - + k[4630]*y_cur[IDX_CHM]*y_cur[IDX_FeII] - + k[4665]*y_cur[IDX_CNM]*y_cur[IDX_FeII] - + k[4700]*y_cur[IDX_HM]*y_cur[IDX_FeII] - + k[4736]*y_cur[IDX_OM]*y_cur[IDX_FeII] - + k[4771]*y_cur[IDX_O2M]*y_cur[IDX_FeII] - + k[4806]*y_cur[IDX_OHM]*y_cur[IDX_FeII] - + k[4841]*y_cur[IDX_SM]*y_cur[IDX_FeII] - + k[5614]*y_cur[IDX_FeII]*y_cur[IDX_eM] + k[5832]*y_cur[IDX_FeI] + + k[6145]*y_cur[IDX_FeI] + k[6304]*y_cur[IDX_FeI] - + k[6670]*y_cur[IDX_FeII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_FeI] = 0.0 - k[173]*y_cur[IDX_CII]*y_cur[IDX_FeI] + - k[221]*y_cur[IDX_C2H2II]*y_cur[IDX_FeI] - + k[250]*y_cur[IDX_CHII]*y_cur[IDX_FeI] - + k[271]*y_cur[IDX_CH3II]*y_cur[IDX_FeI] - + k[317]*y_cur[IDX_CSII]*y_cur[IDX_FeI] - + k[375]*y_cur[IDX_HII]*y_cur[IDX_FeI] - + k[459]*y_cur[IDX_H2COII]*y_cur[IDX_FeI] - + k[467]*y_cur[IDX_H2OII]*y_cur[IDX_FeI] - + k[483]*y_cur[IDX_H2SII]*y_cur[IDX_FeI] - + k[499]*y_cur[IDX_HCOII]*y_cur[IDX_FeI] - + k[505]*y_cur[IDX_HSII]*y_cur[IDX_FeI] - + k[550]*y_cur[IDX_NII]*y_cur[IDX_FeI] - + k[565]*y_cur[IDX_N2II]*y_cur[IDX_FeI] - + k[592]*y_cur[IDX_NH3II]*y_cur[IDX_FeI] - + k[620]*y_cur[IDX_NOII]*y_cur[IDX_FeI] + + k[634]*y_cur[IDX_NaI]*y_cur[IDX_FeII] - + k[654]*y_cur[IDX_OII]*y_cur[IDX_FeI] - + k[673]*y_cur[IDX_O2II]*y_cur[IDX_FeI] - + k[703]*y_cur[IDX_SII]*y_cur[IDX_FeI] - + k[715]*y_cur[IDX_SOII]*y_cur[IDX_FeI] - + k[716]*y_cur[IDX_SiII]*y_cur[IDX_FeI] - + k[726]*y_cur[IDX_SiOII]*y_cur[IDX_FeI] - + k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] + + k[3895]*y_cur[IDX_CM]*y_cur[IDX_FeII] + + k[3930]*y_cur[IDX_C10M]*y_cur[IDX_FeII] + + k[3965]*y_cur[IDX_C10HM]*y_cur[IDX_FeII] + + k[4000]*y_cur[IDX_C2M]*y_cur[IDX_FeII] + + k[4035]*y_cur[IDX_C2HM]*y_cur[IDX_FeII] + + k[4070]*y_cur[IDX_C3M]*y_cur[IDX_FeII] + + k[4105]*y_cur[IDX_C3HM]*y_cur[IDX_FeII] + + k[4140]*y_cur[IDX_C3NM]*y_cur[IDX_FeII] + + k[4175]*y_cur[IDX_C4M]*y_cur[IDX_FeII] + + k[4210]*y_cur[IDX_C4HM]*y_cur[IDX_FeII] + + k[4245]*y_cur[IDX_C5M]*y_cur[IDX_FeII] + + k[4280]*y_cur[IDX_C5HM]*y_cur[IDX_FeII] + + k[4315]*y_cur[IDX_C5NM]*y_cur[IDX_FeII] + + k[4350]*y_cur[IDX_C6M]*y_cur[IDX_FeII] + + k[4385]*y_cur[IDX_C6HM]*y_cur[IDX_FeII] + + k[4420]*y_cur[IDX_C7M]*y_cur[IDX_FeII] + + k[4455]*y_cur[IDX_C7HM]*y_cur[IDX_FeII] + + k[4490]*y_cur[IDX_C8M]*y_cur[IDX_FeII] + + k[4525]*y_cur[IDX_C8HM]*y_cur[IDX_FeII] + + k[4560]*y_cur[IDX_C9M]*y_cur[IDX_FeII] + + k[4595]*y_cur[IDX_C9HM]*y_cur[IDX_FeII] + + k[4630]*y_cur[IDX_CHM]*y_cur[IDX_FeII] + + k[4665]*y_cur[IDX_CNM]*y_cur[IDX_FeII] + + k[4700]*y_cur[IDX_HM]*y_cur[IDX_FeII] + + k[4736]*y_cur[IDX_OM]*y_cur[IDX_FeII] + + k[4771]*y_cur[IDX_O2M]*y_cur[IDX_FeII] + + k[4806]*y_cur[IDX_OHM]*y_cur[IDX_FeII] + + k[4841]*y_cur[IDX_SM]*y_cur[IDX_FeII] + + k[5614]*y_cur[IDX_FeII]*y_cur[IDX_eM] - k[5832]*y_cur[IDX_FeI] - + k[6145]*y_cur[IDX_FeI] - k[6304]*y_cur[IDX_FeI] + + k[6670]*y_cur[IDX_FeII]*y_cur[IDX_GRAINM] - k[7016]*y_cur[IDX_FeI] + + k[7198]*y_cur[IDX_GFeI] + k[7380]*y_cur[IDX_GFeI] + + k[7564]*y_cur[IDX_GFeI]; + ydot[yistart + IDX_MgII] = 0.0 + + k[182]*y_cur[IDX_CII]*y_cur[IDX_MgI] + + k[252]*y_cur[IDX_CHII]*y_cur[IDX_MgI] + + k[273]*y_cur[IDX_CH3II]*y_cur[IDX_MgI] + + k[398]*y_cur[IDX_HII]*y_cur[IDX_MgI] + + k[471]*y_cur[IDX_H2OII]*y_cur[IDX_MgI] + + k[529]*y_cur[IDX_MgI]*y_cur[IDX_C2H2II] + + k[530]*y_cur[IDX_MgI]*y_cur[IDX_CSII] + + k[531]*y_cur[IDX_MgI]*y_cur[IDX_H2COII] + + k[532]*y_cur[IDX_MgI]*y_cur[IDX_H2SII] + + k[533]*y_cur[IDX_MgI]*y_cur[IDX_HCOII] + + k[534]*y_cur[IDX_MgI]*y_cur[IDX_HSII] + + k[535]*y_cur[IDX_MgI]*y_cur[IDX_N2II] + + k[536]*y_cur[IDX_MgI]*y_cur[IDX_NOII] + + k[537]*y_cur[IDX_MgI]*y_cur[IDX_O2II] + + k[538]*y_cur[IDX_MgI]*y_cur[IDX_SII] + + k[539]*y_cur[IDX_MgI]*y_cur[IDX_SOII] + + k[540]*y_cur[IDX_MgI]*y_cur[IDX_SiII] + + k[541]*y_cur[IDX_MgI]*y_cur[IDX_SiOII] + + k[556]*y_cur[IDX_NII]*y_cur[IDX_MgI] + + k[594]*y_cur[IDX_NH3II]*y_cur[IDX_MgI] - + k[639]*y_cur[IDX_NaI]*y_cur[IDX_MgII] + + k[2233]*y_cur[IDX_CH5II]*y_cur[IDX_MgI] + + k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] - + k[3907]*y_cur[IDX_CM]*y_cur[IDX_MgII] - + k[3942]*y_cur[IDX_C10M]*y_cur[IDX_MgII] - + k[3977]*y_cur[IDX_C10HM]*y_cur[IDX_MgII] - + k[4012]*y_cur[IDX_C2M]*y_cur[IDX_MgII] - + k[4047]*y_cur[IDX_C2HM]*y_cur[IDX_MgII] - + k[4082]*y_cur[IDX_C3M]*y_cur[IDX_MgII] - + k[4117]*y_cur[IDX_C3HM]*y_cur[IDX_MgII] - + k[4152]*y_cur[IDX_C3NM]*y_cur[IDX_MgII] - + k[4187]*y_cur[IDX_C4M]*y_cur[IDX_MgII] - + k[4222]*y_cur[IDX_C4HM]*y_cur[IDX_MgII] - + k[4257]*y_cur[IDX_C5M]*y_cur[IDX_MgII] - + k[4292]*y_cur[IDX_C5HM]*y_cur[IDX_MgII] - + k[4327]*y_cur[IDX_C5NM]*y_cur[IDX_MgII] - + k[4362]*y_cur[IDX_C6M]*y_cur[IDX_MgII] - + k[4397]*y_cur[IDX_C6HM]*y_cur[IDX_MgII] - + k[4432]*y_cur[IDX_C7M]*y_cur[IDX_MgII] - + k[4467]*y_cur[IDX_C7HM]*y_cur[IDX_MgII] - + k[4502]*y_cur[IDX_C8M]*y_cur[IDX_MgII] - + k[4537]*y_cur[IDX_C8HM]*y_cur[IDX_MgII] - + k[4572]*y_cur[IDX_C9M]*y_cur[IDX_MgII] - + k[4607]*y_cur[IDX_C9HM]*y_cur[IDX_MgII] - + k[4642]*y_cur[IDX_CHM]*y_cur[IDX_MgII] - + k[4677]*y_cur[IDX_CNM]*y_cur[IDX_MgII] - + k[4713]*y_cur[IDX_HM]*y_cur[IDX_MgII] - + k[4748]*y_cur[IDX_OM]*y_cur[IDX_MgII] - + k[4783]*y_cur[IDX_O2M]*y_cur[IDX_MgII] - + k[4818]*y_cur[IDX_OHM]*y_cur[IDX_MgII] - + k[4853]*y_cur[IDX_SM]*y_cur[IDX_MgII] - + k[5620]*y_cur[IDX_MgII]*y_cur[IDX_eM] + k[5877]*y_cur[IDX_MgI] + + k[6210]*y_cur[IDX_MgI] + k[6306]*y_cur[IDX_MgI] - + k[6353]*y_cur[IDX_MgII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NaII] = 0.0 + + k[188]*y_cur[IDX_CII]*y_cur[IDX_NaI] + + k[255]*y_cur[IDX_CHII]*y_cur[IDX_NaI] + + k[275]*y_cur[IDX_CH3II]*y_cur[IDX_NaI] + + k[473]*y_cur[IDX_H2OII]*y_cur[IDX_NaI] + + k[596]*y_cur[IDX_NH3II]*y_cur[IDX_NaI] + + k[632]*y_cur[IDX_NaI]*y_cur[IDX_C2H2II] + + k[633]*y_cur[IDX_NaI]*y_cur[IDX_CSII] + + k[634]*y_cur[IDX_NaI]*y_cur[IDX_FeII] + + k[635]*y_cur[IDX_NaI]*y_cur[IDX_H2COII] + + k[636]*y_cur[IDX_NaI]*y_cur[IDX_H2SII] + + k[637]*y_cur[IDX_NaI]*y_cur[IDX_HCOII] + + k[638]*y_cur[IDX_NaI]*y_cur[IDX_HSII] + + k[639]*y_cur[IDX_NaI]*y_cur[IDX_MgII] + + k[640]*y_cur[IDX_NaI]*y_cur[IDX_N2II] + + k[641]*y_cur[IDX_NaI]*y_cur[IDX_NOII] + + k[642]*y_cur[IDX_NaI]*y_cur[IDX_O2II] + + k[643]*y_cur[IDX_NaI]*y_cur[IDX_SII] + + k[644]*y_cur[IDX_NaI]*y_cur[IDX_SOII] + + k[645]*y_cur[IDX_NaI]*y_cur[IDX_SiII] + + k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] + + k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] + + k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] + + k[3629]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] + + k[3630]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] - + k[3913]*y_cur[IDX_CM]*y_cur[IDX_NaII] - + k[3948]*y_cur[IDX_C10M]*y_cur[IDX_NaII] - + k[3983]*y_cur[IDX_C10HM]*y_cur[IDX_NaII] - + k[4018]*y_cur[IDX_C2M]*y_cur[IDX_NaII] - + k[4053]*y_cur[IDX_C2HM]*y_cur[IDX_NaII] - + k[4088]*y_cur[IDX_C3M]*y_cur[IDX_NaII] - + k[4123]*y_cur[IDX_C3HM]*y_cur[IDX_NaII] - + k[4158]*y_cur[IDX_C3NM]*y_cur[IDX_NaII] - + k[4193]*y_cur[IDX_C4M]*y_cur[IDX_NaII] - + k[4228]*y_cur[IDX_C4HM]*y_cur[IDX_NaII] - + k[4263]*y_cur[IDX_C5M]*y_cur[IDX_NaII] - + k[4298]*y_cur[IDX_C5HM]*y_cur[IDX_NaII] - + k[4333]*y_cur[IDX_C5NM]*y_cur[IDX_NaII] - + k[4368]*y_cur[IDX_C6M]*y_cur[IDX_NaII] - + k[4403]*y_cur[IDX_C6HM]*y_cur[IDX_NaII] - + k[4438]*y_cur[IDX_C7M]*y_cur[IDX_NaII] - + k[4473]*y_cur[IDX_C7HM]*y_cur[IDX_NaII] - + k[4508]*y_cur[IDX_C8M]*y_cur[IDX_NaII] - + k[4543]*y_cur[IDX_C8HM]*y_cur[IDX_NaII] - + k[4578]*y_cur[IDX_C9M]*y_cur[IDX_NaII] - + k[4613]*y_cur[IDX_C9HM]*y_cur[IDX_NaII] - + k[4648]*y_cur[IDX_CHM]*y_cur[IDX_NaII] - + k[4683]*y_cur[IDX_CNM]*y_cur[IDX_NaII] - + k[4719]*y_cur[IDX_HM]*y_cur[IDX_NaII] - + k[4754]*y_cur[IDX_OM]*y_cur[IDX_NaII] - + k[4789]*y_cur[IDX_O2M]*y_cur[IDX_NaII] - + k[4824]*y_cur[IDX_OHM]*y_cur[IDX_NaII] - + k[4859]*y_cur[IDX_SM]*y_cur[IDX_NaII] - + k[5622]*y_cur[IDX_NaII]*y_cur[IDX_eM] + k[5894]*y_cur[IDX_NaI] + + k[6231]*y_cur[IDX_NaI] + k[6305]*y_cur[IDX_NaI] - + k[6351]*y_cur[IDX_NaII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_MgI] = 0.0 - k[182]*y_cur[IDX_CII]*y_cur[IDX_MgI] + - k[252]*y_cur[IDX_CHII]*y_cur[IDX_MgI] - + k[273]*y_cur[IDX_CH3II]*y_cur[IDX_MgI] - + k[398]*y_cur[IDX_HII]*y_cur[IDX_MgI] - + k[471]*y_cur[IDX_H2OII]*y_cur[IDX_MgI] - + k[529]*y_cur[IDX_MgI]*y_cur[IDX_C2H2II] - + k[530]*y_cur[IDX_MgI]*y_cur[IDX_CSII] - + k[531]*y_cur[IDX_MgI]*y_cur[IDX_H2COII] - + k[532]*y_cur[IDX_MgI]*y_cur[IDX_H2SII] - + k[533]*y_cur[IDX_MgI]*y_cur[IDX_HCOII] - + k[534]*y_cur[IDX_MgI]*y_cur[IDX_HSII] - + k[535]*y_cur[IDX_MgI]*y_cur[IDX_N2II] - + k[536]*y_cur[IDX_MgI]*y_cur[IDX_NOII] - + k[537]*y_cur[IDX_MgI]*y_cur[IDX_O2II] - + k[538]*y_cur[IDX_MgI]*y_cur[IDX_SII] - + k[539]*y_cur[IDX_MgI]*y_cur[IDX_SOII] - + k[540]*y_cur[IDX_MgI]*y_cur[IDX_SiII] - + k[541]*y_cur[IDX_MgI]*y_cur[IDX_SiOII] - + k[556]*y_cur[IDX_NII]*y_cur[IDX_MgI] - + k[594]*y_cur[IDX_NH3II]*y_cur[IDX_MgI] + + k[639]*y_cur[IDX_NaI]*y_cur[IDX_MgII] - + k[2233]*y_cur[IDX_CH5II]*y_cur[IDX_MgI] - + k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] + + k[3907]*y_cur[IDX_CM]*y_cur[IDX_MgII] + + k[3942]*y_cur[IDX_C10M]*y_cur[IDX_MgII] + + k[3977]*y_cur[IDX_C10HM]*y_cur[IDX_MgII] + + k[4012]*y_cur[IDX_C2M]*y_cur[IDX_MgII] + + k[4047]*y_cur[IDX_C2HM]*y_cur[IDX_MgII] + + k[4082]*y_cur[IDX_C3M]*y_cur[IDX_MgII] + + k[4117]*y_cur[IDX_C3HM]*y_cur[IDX_MgII] + + k[4152]*y_cur[IDX_C3NM]*y_cur[IDX_MgII] + + k[4187]*y_cur[IDX_C4M]*y_cur[IDX_MgII] + + k[4222]*y_cur[IDX_C4HM]*y_cur[IDX_MgII] + + k[4257]*y_cur[IDX_C5M]*y_cur[IDX_MgII] + + k[4292]*y_cur[IDX_C5HM]*y_cur[IDX_MgII] + + k[4327]*y_cur[IDX_C5NM]*y_cur[IDX_MgII] + + k[4362]*y_cur[IDX_C6M]*y_cur[IDX_MgII] + + k[4397]*y_cur[IDX_C6HM]*y_cur[IDX_MgII] + + k[4432]*y_cur[IDX_C7M]*y_cur[IDX_MgII] + + k[4467]*y_cur[IDX_C7HM]*y_cur[IDX_MgII] + + k[4502]*y_cur[IDX_C8M]*y_cur[IDX_MgII] + + k[4537]*y_cur[IDX_C8HM]*y_cur[IDX_MgII] + + k[4572]*y_cur[IDX_C9M]*y_cur[IDX_MgII] + + k[4607]*y_cur[IDX_C9HM]*y_cur[IDX_MgII] + + k[4642]*y_cur[IDX_CHM]*y_cur[IDX_MgII] + + k[4677]*y_cur[IDX_CNM]*y_cur[IDX_MgII] + + k[4713]*y_cur[IDX_HM]*y_cur[IDX_MgII] + + k[4748]*y_cur[IDX_OM]*y_cur[IDX_MgII] + + k[4783]*y_cur[IDX_O2M]*y_cur[IDX_MgII] + + k[4818]*y_cur[IDX_OHM]*y_cur[IDX_MgII] + + k[4853]*y_cur[IDX_SM]*y_cur[IDX_MgII] + + k[5620]*y_cur[IDX_MgII]*y_cur[IDX_eM] - k[5877]*y_cur[IDX_MgI] - + k[6210]*y_cur[IDX_MgI] - k[6306]*y_cur[IDX_MgI] + + k[6353]*y_cur[IDX_MgII]*y_cur[IDX_GRAINM] - k[6906]*y_cur[IDX_MgI] + + k[7088]*y_cur[IDX_GMgI] + k[7270]*y_cur[IDX_GMgI] + + k[7452]*y_cur[IDX_GMgI]; + ydot[yistart + IDX_NaI] = 0.0 - k[188]*y_cur[IDX_CII]*y_cur[IDX_NaI] + - k[255]*y_cur[IDX_CHII]*y_cur[IDX_NaI] - + k[275]*y_cur[IDX_CH3II]*y_cur[IDX_NaI] - + k[473]*y_cur[IDX_H2OII]*y_cur[IDX_NaI] - + k[596]*y_cur[IDX_NH3II]*y_cur[IDX_NaI] - + k[632]*y_cur[IDX_NaI]*y_cur[IDX_C2H2II] - + k[633]*y_cur[IDX_NaI]*y_cur[IDX_CSII] - + k[634]*y_cur[IDX_NaI]*y_cur[IDX_FeII] - + k[635]*y_cur[IDX_NaI]*y_cur[IDX_H2COII] - + k[636]*y_cur[IDX_NaI]*y_cur[IDX_H2SII] - + k[637]*y_cur[IDX_NaI]*y_cur[IDX_HCOII] - + k[638]*y_cur[IDX_NaI]*y_cur[IDX_HSII] - + k[639]*y_cur[IDX_NaI]*y_cur[IDX_MgII] - + k[640]*y_cur[IDX_NaI]*y_cur[IDX_N2II] - + k[641]*y_cur[IDX_NaI]*y_cur[IDX_NOII] - + k[642]*y_cur[IDX_NaI]*y_cur[IDX_O2II] - + k[643]*y_cur[IDX_NaI]*y_cur[IDX_SII] - + k[644]*y_cur[IDX_NaI]*y_cur[IDX_SOII] - + k[645]*y_cur[IDX_NaI]*y_cur[IDX_SiII] - + k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] - + k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] - + k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] - + k[3629]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] - + k[3630]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] + + k[3913]*y_cur[IDX_CM]*y_cur[IDX_NaII] + + k[3948]*y_cur[IDX_C10M]*y_cur[IDX_NaII] + + k[3983]*y_cur[IDX_C10HM]*y_cur[IDX_NaII] + + k[4018]*y_cur[IDX_C2M]*y_cur[IDX_NaII] + + k[4053]*y_cur[IDX_C2HM]*y_cur[IDX_NaII] + + k[4088]*y_cur[IDX_C3M]*y_cur[IDX_NaII] + + k[4123]*y_cur[IDX_C3HM]*y_cur[IDX_NaII] + + k[4158]*y_cur[IDX_C3NM]*y_cur[IDX_NaII] + + k[4193]*y_cur[IDX_C4M]*y_cur[IDX_NaII] + + k[4228]*y_cur[IDX_C4HM]*y_cur[IDX_NaII] + + k[4263]*y_cur[IDX_C5M]*y_cur[IDX_NaII] + + k[4298]*y_cur[IDX_C5HM]*y_cur[IDX_NaII] + + k[4333]*y_cur[IDX_C5NM]*y_cur[IDX_NaII] + + k[4368]*y_cur[IDX_C6M]*y_cur[IDX_NaII] + + k[4403]*y_cur[IDX_C6HM]*y_cur[IDX_NaII] + + k[4438]*y_cur[IDX_C7M]*y_cur[IDX_NaII] + + k[4473]*y_cur[IDX_C7HM]*y_cur[IDX_NaII] + + k[4508]*y_cur[IDX_C8M]*y_cur[IDX_NaII] + + k[4543]*y_cur[IDX_C8HM]*y_cur[IDX_NaII] + + k[4578]*y_cur[IDX_C9M]*y_cur[IDX_NaII] + + k[4613]*y_cur[IDX_C9HM]*y_cur[IDX_NaII] + + k[4648]*y_cur[IDX_CHM]*y_cur[IDX_NaII] + + k[4683]*y_cur[IDX_CNM]*y_cur[IDX_NaII] + + k[4719]*y_cur[IDX_HM]*y_cur[IDX_NaII] + + k[4754]*y_cur[IDX_OM]*y_cur[IDX_NaII] + + k[4789]*y_cur[IDX_O2M]*y_cur[IDX_NaII] + + k[4824]*y_cur[IDX_OHM]*y_cur[IDX_NaII] + + k[4859]*y_cur[IDX_SM]*y_cur[IDX_NaII] + + k[5622]*y_cur[IDX_NaII]*y_cur[IDX_eM] - k[5894]*y_cur[IDX_NaI] - + k[6231]*y_cur[IDX_NaI] - k[6305]*y_cur[IDX_NaI] + + k[6351]*y_cur[IDX_NaII]*y_cur[IDX_GRAINM] - k[6905]*y_cur[IDX_NaI] + + k[7087]*y_cur[IDX_GNaI] + k[7269]*y_cur[IDX_GNaI] + + k[7451]*y_cur[IDX_GNaI]; + ydot[yistart + IDX_C10I] = 0.0 + k[16]*y_cur[IDX_C2M]*y_cur[IDX_C8I] + + k[21]*y_cur[IDX_C3M]*y_cur[IDX_C7I] + + k[26]*y_cur[IDX_C4M]*y_cur[IDX_C6I] + + k[30]*y_cur[IDX_C5M]*y_cur[IDX_C5I] + + k[33]*y_cur[IDX_C6M]*y_cur[IDX_C4I] + + k[35]*y_cur[IDX_C7M]*y_cur[IDX_C3I] + + k[36]*y_cur[IDX_C8M]*y_cur[IDX_C2I] + + k[53]*y_cur[IDX_CI]*y_cur[IDX_C9M] - + k[320]*y_cur[IDX_HII]*y_cur[IDX_C10I] - + k[506]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[729]*y_cur[IDX_C10HII]*y_cur[IDX_eM] - + k[2293]*y_cur[IDX_HII]*y_cur[IDX_C10I] - + k[2583]*y_cur[IDX_H3II]*y_cur[IDX_C10I] - + k[2899]*y_cur[IDX_HCOII]*y_cur[IDX_C10I] - + k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3921]*y_cur[IDX_C10M]*y_cur[IDX_CII] + + k[3922]*y_cur[IDX_C10M]*y_cur[IDX_C2H2II] + + k[3923]*y_cur[IDX_C10M]*y_cur[IDX_C2H3II] + + k[3924]*y_cur[IDX_C10M]*y_cur[IDX_C4H2II] + + k[3925]*y_cur[IDX_C10M]*y_cur[IDX_C4H3II] + + k[3926]*y_cur[IDX_C10M]*y_cur[IDX_C4SII] + + k[3927]*y_cur[IDX_C10M]*y_cur[IDX_CH2CCHII] + + k[3928]*y_cur[IDX_C10M]*y_cur[IDX_CH3II] + + k[3929]*y_cur[IDX_C10M]*y_cur[IDX_CNCII] + + k[3930]*y_cur[IDX_C10M]*y_cur[IDX_FeII] + + k[3931]*y_cur[IDX_C10M]*y_cur[IDX_HII] + + k[3932]*y_cur[IDX_C10M]*y_cur[IDX_H2COII] + + k[3933]*y_cur[IDX_C10M]*y_cur[IDX_H2SII] + + k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] + + k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] + + k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] + + k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + + k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + + k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + + k[3940]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + + k[3941]*y_cur[IDX_C10M]*y_cur[IDX_HeII] + + k[3942]*y_cur[IDX_C10M]*y_cur[IDX_MgII] + + k[3943]*y_cur[IDX_C10M]*y_cur[IDX_NII] + + k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] + + k[3945]*y_cur[IDX_C10M]*y_cur[IDX_NH3II] + + k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] + + k[3947]*y_cur[IDX_C10M]*y_cur[IDX_NOII] + + k[3948]*y_cur[IDX_C10M]*y_cur[IDX_NaII] + + k[3949]*y_cur[IDX_C10M]*y_cur[IDX_OII] + + k[3950]*y_cur[IDX_C10M]*y_cur[IDX_SII] + + k[3951]*y_cur[IDX_C10M]*y_cur[IDX_SOII] + + k[3952]*y_cur[IDX_C10M]*y_cur[IDX_SiII] + + k[3953]*y_cur[IDX_C10M]*y_cur[IDX_SiOII] + + k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] + + k[3955]*y_cur[IDX_C10M]*y_cur[IDX_SiSII] + + k[4942]*y_cur[IDX_CI]*y_cur[IDX_C9HI] - + k[5221]*y_cur[IDX_NI]*y_cur[IDX_C10I] - + k[5340]*y_cur[IDX_OI]*y_cur[IDX_C10I] + + k[5342]*y_cur[IDX_OI]*y_cur[IDX_C11I] - + k[5495]*y_cur[IDX_CII]*y_cur[IDX_C10I] - + k[5587]*y_cur[IDX_C10I]*y_cur[IDX_eM] + k[5687]*y_cur[IDX_C10M] - + k[5688]*y_cur[IDX_C10I] + k[5691]*y_cur[IDX_C10HI] + + k[5692]*y_cur[IDX_C11I] + k[5949]*y_cur[IDX_C10M] - + k[5950]*y_cur[IDX_C10I] - k[5951]*y_cur[IDX_C10I] - + k[5952]*y_cur[IDX_C10I] - k[5953]*y_cur[IDX_C10I] - + k[5954]*y_cur[IDX_C10I] - k[5955]*y_cur[IDX_C10I] + + k[5957]*y_cur[IDX_C10H2I] + k[5961]*y_cur[IDX_C10HI] + + k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - + k[7064]*y_cur[IDX_C10I] + k[7246]*y_cur[IDX_GC10I] + + k[7428]*y_cur[IDX_GC10I] + k[7610]*y_cur[IDX_GC10I] + + k[8682]*y_cur[IDX_GCI]*y_cur[IDX_GC9I]; + ydot[yistart + IDX_C8HI] = 0.0 + k[50]*y_cur[IDX_CI]*y_cur[IDX_C7HM] + + k[101]*y_cur[IDX_HI]*y_cur[IDX_C8M] - + k[354]*y_cur[IDX_HII]*y_cur[IDX_C8HI] + + k[882]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + + k[884]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + + k[886]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + + k[888]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + + k[891]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + + k[1086]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] - + k[1337]*y_cur[IDX_CII]*y_cur[IDX_C8HI] - + k[1505]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - + k[1506]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - + k[2060]*y_cur[IDX_CH3II]*y_cur[IDX_C8HI] - + k[2311]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - + k[2627]*y_cur[IDX_H3II]*y_cur[IDX_C8HI] - + k[2932]*y_cur[IDX_HCOII]*y_cur[IDX_C8HI] - + k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] - + k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + + k[3448]*y_cur[IDX_NI]*y_cur[IDX_C9HM] + + k[3724]*y_cur[IDX_OI]*y_cur[IDX_C9H2II] + + k[4516]*y_cur[IDX_C8HM]*y_cur[IDX_CII] + + k[4517]*y_cur[IDX_C8HM]*y_cur[IDX_C2H2II] + + k[4518]*y_cur[IDX_C8HM]*y_cur[IDX_C2H3II] + + k[4519]*y_cur[IDX_C8HM]*y_cur[IDX_C4H2II] + + k[4520]*y_cur[IDX_C8HM]*y_cur[IDX_C4H3II] + + k[4521]*y_cur[IDX_C8HM]*y_cur[IDX_C4SII] + + k[4522]*y_cur[IDX_C8HM]*y_cur[IDX_CH2CCHII] + + k[4523]*y_cur[IDX_C8HM]*y_cur[IDX_CH3II] + + k[4524]*y_cur[IDX_C8HM]*y_cur[IDX_CNCII] + + k[4525]*y_cur[IDX_C8HM]*y_cur[IDX_FeII] + + k[4526]*y_cur[IDX_C8HM]*y_cur[IDX_HII] + + k[4527]*y_cur[IDX_C8HM]*y_cur[IDX_H2COII] + + k[4528]*y_cur[IDX_C8HM]*y_cur[IDX_H2SII] + + k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] + + k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] + + k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] + + k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + + k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + + k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + + k[4535]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + + k[4536]*y_cur[IDX_C8HM]*y_cur[IDX_HeII] + + k[4537]*y_cur[IDX_C8HM]*y_cur[IDX_MgII] + + k[4538]*y_cur[IDX_C8HM]*y_cur[IDX_NII] + + k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] + + k[4540]*y_cur[IDX_C8HM]*y_cur[IDX_NH3II] + + k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] + + k[4542]*y_cur[IDX_C8HM]*y_cur[IDX_NOII] + + k[4543]*y_cur[IDX_C8HM]*y_cur[IDX_NaII] + + k[4544]*y_cur[IDX_C8HM]*y_cur[IDX_OII] + + k[4545]*y_cur[IDX_C8HM]*y_cur[IDX_SII] + + k[4546]*y_cur[IDX_C8HM]*y_cur[IDX_SOII] + + k[4547]*y_cur[IDX_C8HM]*y_cur[IDX_SiII] + + k[4548]*y_cur[IDX_C8HM]*y_cur[IDX_SiOII] + + k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] + + k[4550]*y_cur[IDX_C8HM]*y_cur[IDX_SiSII] + + k[4935]*y_cur[IDX_CI]*y_cur[IDX_C7H2I] - + k[4940]*y_cur[IDX_CI]*y_cur[IDX_C8HI] - + k[5249]*y_cur[IDX_NI]*y_cur[IDX_C8HI] - + k[5374]*y_cur[IDX_OI]*y_cur[IDX_C8HI] + + k[5376]*y_cur[IDX_OI]*y_cur[IDX_C9HI] - + k[5604]*y_cur[IDX_C8HI]*y_cur[IDX_eM] + k[5763]*y_cur[IDX_C8HM] + + k[5764]*y_cur[IDX_C8H2I] - k[5765]*y_cur[IDX_C8HI] + + k[5853]*y_cur[IDX_HC9NI] + k[6054]*y_cur[IDX_C8HM] + + k[6056]*y_cur[IDX_C8H2I] - k[6057]*y_cur[IDX_C8HI] - + k[6058]*y_cur[IDX_C8HI] + k[6179]*y_cur[IDX_HC9NI] + + k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + + k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + + k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + + k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + + k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + + k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - + k[7056]*y_cur[IDX_C8HI] + k[7238]*y_cur[IDX_GC8HI] + + k[7420]*y_cur[IDX_GC8HI] + k[7602]*y_cur[IDX_GC8HI] + + k[8643]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] + + k[8679]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] + + k[8732]*y_cur[IDX_GCHI]*y_cur[IDX_GC7I]; + ydot[yistart + IDX_C7I] = 0.0 + k[13]*y_cur[IDX_C2M]*y_cur[IDX_C5I] + - k[15]*y_cur[IDX_C2M]*y_cur[IDX_C7I] + + k[18]*y_cur[IDX_C3M]*y_cur[IDX_C4I] - + k[21]*y_cur[IDX_C3M]*y_cur[IDX_C7I] + + k[23]*y_cur[IDX_C4M]*y_cur[IDX_C3I] + + k[27]*y_cur[IDX_C5M]*y_cur[IDX_C2I] + + k[47]*y_cur[IDX_CI]*y_cur[IDX_C6M] - + k[349]*y_cur[IDX_HII]*y_cur[IDX_C7I] + + k[736]*y_cur[IDX_C11II]*y_cur[IDX_eM] + + k[867]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + + k[868]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + + k[878]*y_cur[IDX_C8II]*y_cur[IDX_eM] + + k[889]*y_cur[IDX_C9II]*y_cur[IDX_eM] - + k[2621]*y_cur[IDX_H3II]*y_cur[IDX_C7I] - + k[2926]*y_cur[IDX_HCOII]*y_cur[IDX_C7I] - + k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] - + k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + + k[3377]*y_cur[IDX_NI]*y_cur[IDX_C10M] + + k[3438]*y_cur[IDX_NI]*y_cur[IDX_C8M] + + k[4411]*y_cur[IDX_C7M]*y_cur[IDX_CII] + + k[4412]*y_cur[IDX_C7M]*y_cur[IDX_C2H2II] + + k[4413]*y_cur[IDX_C7M]*y_cur[IDX_C2H3II] + + k[4414]*y_cur[IDX_C7M]*y_cur[IDX_C4H2II] + + k[4415]*y_cur[IDX_C7M]*y_cur[IDX_C4H3II] + + k[4416]*y_cur[IDX_C7M]*y_cur[IDX_C4SII] + + k[4417]*y_cur[IDX_C7M]*y_cur[IDX_CH2CCHII] + + k[4418]*y_cur[IDX_C7M]*y_cur[IDX_CH3II] + + k[4419]*y_cur[IDX_C7M]*y_cur[IDX_CNCII] + + k[4420]*y_cur[IDX_C7M]*y_cur[IDX_FeII] + + k[4421]*y_cur[IDX_C7M]*y_cur[IDX_HII] + + k[4422]*y_cur[IDX_C7M]*y_cur[IDX_H2COII] + + k[4423]*y_cur[IDX_C7M]*y_cur[IDX_H2SII] + + k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] + + k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] + + k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] + + k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + + k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + + k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + + k[4430]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + + k[4431]*y_cur[IDX_C7M]*y_cur[IDX_HeII] + + k[4432]*y_cur[IDX_C7M]*y_cur[IDX_MgII] + + k[4433]*y_cur[IDX_C7M]*y_cur[IDX_NII] + + k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] + + k[4435]*y_cur[IDX_C7M]*y_cur[IDX_NH3II] + + k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] + + k[4437]*y_cur[IDX_C7M]*y_cur[IDX_NOII] + + k[4438]*y_cur[IDX_C7M]*y_cur[IDX_NaII] + + k[4439]*y_cur[IDX_C7M]*y_cur[IDX_OII] + + k[4440]*y_cur[IDX_C7M]*y_cur[IDX_SII] + + k[4441]*y_cur[IDX_C7M]*y_cur[IDX_SOII] + + k[4442]*y_cur[IDX_C7M]*y_cur[IDX_SiII] + + k[4443]*y_cur[IDX_C7M]*y_cur[IDX_SiOII] + + k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] + + k[4445]*y_cur[IDX_C7M]*y_cur[IDX_SiSII] + + k[4933]*y_cur[IDX_CI]*y_cur[IDX_C6HI] - + k[4934]*y_cur[IDX_CI]*y_cur[IDX_C7I] + + k[4937]*y_cur[IDX_CI]*y_cur[IDX_C7NI] + + k[4938]*y_cur[IDX_CI]*y_cur[IDX_C8I] - + k[5244]*y_cur[IDX_NI]*y_cur[IDX_C7I] + + k[5248]*y_cur[IDX_NI]*y_cur[IDX_C8I] - + k[5370]*y_cur[IDX_OI]*y_cur[IDX_C7I] + + k[5373]*y_cur[IDX_OI]*y_cur[IDX_C8I] - + k[5500]*y_cur[IDX_CII]*y_cur[IDX_C7I] - + k[5601]*y_cur[IDX_C7I]*y_cur[IDX_eM] + k[5755]*y_cur[IDX_C7M] - + k[5756]*y_cur[IDX_C7I] + k[5759]*y_cur[IDX_C7HI] + + k[5762]*y_cur[IDX_C8I] + k[5953]*y_cur[IDX_C10I] + + k[5965]*y_cur[IDX_C10HI] + k[5972]*y_cur[IDX_C11I] + + k[6041]*y_cur[IDX_C7M] - k[6042]*y_cur[IDX_C7I] - + k[6043]*y_cur[IDX_C7I] + k[6047]*y_cur[IDX_C7HI] + + k[6052]*y_cur[IDX_C8I] + k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + + k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + + k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + + k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + + k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7050]*y_cur[IDX_C7I] + + k[7232]*y_cur[IDX_GC7I] + k[7414]*y_cur[IDX_GC7I] + + k[7596]*y_cur[IDX_GC7I] + k[8676]*y_cur[IDX_GCI]*y_cur[IDX_GC6I]; + ydot[yistart + IDX_C9I] = 0.0 + k[15]*y_cur[IDX_C2M]*y_cur[IDX_C7I] + + k[20]*y_cur[IDX_C3M]*y_cur[IDX_C6I] + + k[25]*y_cur[IDX_C4M]*y_cur[IDX_C5I] + + k[29]*y_cur[IDX_C5M]*y_cur[IDX_C4I] + + k[32]*y_cur[IDX_C6M]*y_cur[IDX_C3I] + + k[34]*y_cur[IDX_C7M]*y_cur[IDX_C2I] + + k[51]*y_cur[IDX_CI]*y_cur[IDX_C8M] - + k[355]*y_cur[IDX_HII]*y_cur[IDX_C9I] + + k[728]*y_cur[IDX_C10II]*y_cur[IDX_eM] + + k[738]*y_cur[IDX_C11II]*y_cur[IDX_eM] + + k[892]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + + k[893]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] - + k[2628]*y_cur[IDX_H3II]*y_cur[IDX_C9I] - + k[2933]*y_cur[IDX_HCOII]*y_cur[IDX_C9I] - + k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] - + k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + + k[3379]*y_cur[IDX_NI]*y_cur[IDX_C10M] + + k[3679]*y_cur[IDX_OI]*y_cur[IDX_C10HII] + + k[4551]*y_cur[IDX_C9M]*y_cur[IDX_CII] + + k[4552]*y_cur[IDX_C9M]*y_cur[IDX_C2H2II] + + k[4553]*y_cur[IDX_C9M]*y_cur[IDX_C2H3II] + + k[4554]*y_cur[IDX_C9M]*y_cur[IDX_C4H2II] + + k[4555]*y_cur[IDX_C9M]*y_cur[IDX_C4H3II] + + k[4556]*y_cur[IDX_C9M]*y_cur[IDX_C4SII] + + k[4557]*y_cur[IDX_C9M]*y_cur[IDX_CH2CCHII] + + k[4558]*y_cur[IDX_C9M]*y_cur[IDX_CH3II] + + k[4559]*y_cur[IDX_C9M]*y_cur[IDX_CNCII] + + k[4560]*y_cur[IDX_C9M]*y_cur[IDX_FeII] + + k[4561]*y_cur[IDX_C9M]*y_cur[IDX_HII] + + k[4562]*y_cur[IDX_C9M]*y_cur[IDX_H2COII] + + k[4563]*y_cur[IDX_C9M]*y_cur[IDX_H2SII] + + k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] + + k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] + + k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] + + k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + + k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + + k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + + k[4570]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + + k[4571]*y_cur[IDX_C9M]*y_cur[IDX_HeII] + + k[4572]*y_cur[IDX_C9M]*y_cur[IDX_MgII] + + k[4573]*y_cur[IDX_C9M]*y_cur[IDX_NII] + + k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] + + k[4575]*y_cur[IDX_C9M]*y_cur[IDX_NH3II] + + k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] + + k[4577]*y_cur[IDX_C9M]*y_cur[IDX_NOII] + + k[4578]*y_cur[IDX_C9M]*y_cur[IDX_NaII] + + k[4579]*y_cur[IDX_C9M]*y_cur[IDX_OII] + + k[4580]*y_cur[IDX_C9M]*y_cur[IDX_SII] + + k[4581]*y_cur[IDX_C9M]*y_cur[IDX_SOII] + + k[4582]*y_cur[IDX_C9M]*y_cur[IDX_SiII] + + k[4583]*y_cur[IDX_C9M]*y_cur[IDX_SiOII] + + k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] + + k[4585]*y_cur[IDX_C9M]*y_cur[IDX_SiSII] + + k[4940]*y_cur[IDX_CI]*y_cur[IDX_C8HI] + + k[4943]*y_cur[IDX_CI]*y_cur[IDX_C9NI] + + k[5221]*y_cur[IDX_NI]*y_cur[IDX_C10I] - + k[5250]*y_cur[IDX_NI]*y_cur[IDX_C9I] + + k[5340]*y_cur[IDX_OI]*y_cur[IDX_C10I] - + k[5375]*y_cur[IDX_OI]*y_cur[IDX_C9I] - + k[5502]*y_cur[IDX_CII]*y_cur[IDX_C9I] - + k[5605]*y_cur[IDX_C9I]*y_cur[IDX_eM] + k[5688]*y_cur[IDX_C10I] + + k[5766]*y_cur[IDX_C9M] - k[5767]*y_cur[IDX_C9I] + + k[5770]*y_cur[IDX_C9HI] + k[5955]*y_cur[IDX_C10I] + + k[5968]*y_cur[IDX_C10HI] + k[5974]*y_cur[IDX_C11I] + + k[6059]*y_cur[IDX_C9M] - k[6060]*y_cur[IDX_C9I] - + k[6061]*y_cur[IDX_C9I] + k[6065]*y_cur[IDX_C9HI] + + k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + + k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + + k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + + k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7060]*y_cur[IDX_C9I] + + k[7242]*y_cur[IDX_GC9I] + k[7424]*y_cur[IDX_GC9I] + + k[7606]*y_cur[IDX_GC9I] + k[8680]*y_cur[IDX_GCI]*y_cur[IDX_GC8I]; + ydot[yistart + IDX_C8I] = 0.0 + k[14]*y_cur[IDX_C2M]*y_cur[IDX_C6I] + - k[16]*y_cur[IDX_C2M]*y_cur[IDX_C8I] + + k[19]*y_cur[IDX_C3M]*y_cur[IDX_C5I] + + k[24]*y_cur[IDX_C4M]*y_cur[IDX_C4I] + + k[28]*y_cur[IDX_C5M]*y_cur[IDX_C3I] + + k[31]*y_cur[IDX_C6M]*y_cur[IDX_C2I] + + k[49]*y_cur[IDX_CI]*y_cur[IDX_C7M] - + k[352]*y_cur[IDX_HII]*y_cur[IDX_C8I] + + k[727]*y_cur[IDX_C10II]*y_cur[IDX_eM] + + k[737]*y_cur[IDX_C11II]*y_cur[IDX_eM] + + k[880]*y_cur[IDX_C8HII]*y_cur[IDX_eM] + + k[881]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + + k[890]*y_cur[IDX_C9II]*y_cur[IDX_eM] - + k[2625]*y_cur[IDX_H3II]*y_cur[IDX_C8I] - + k[2930]*y_cur[IDX_HCOII]*y_cur[IDX_C8I] - + k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] - + k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + + k[3444]*y_cur[IDX_NI]*y_cur[IDX_C9M] + + k[3722]*y_cur[IDX_OI]*y_cur[IDX_C9HII] + + k[4481]*y_cur[IDX_C8M]*y_cur[IDX_CII] + + k[4482]*y_cur[IDX_C8M]*y_cur[IDX_C2H2II] + + k[4483]*y_cur[IDX_C8M]*y_cur[IDX_C2H3II] + + k[4484]*y_cur[IDX_C8M]*y_cur[IDX_C4H2II] + + k[4485]*y_cur[IDX_C8M]*y_cur[IDX_C4H3II] + + k[4486]*y_cur[IDX_C8M]*y_cur[IDX_C4SII] + + k[4487]*y_cur[IDX_C8M]*y_cur[IDX_CH2CCHII] + + k[4488]*y_cur[IDX_C8M]*y_cur[IDX_CH3II] + + k[4489]*y_cur[IDX_C8M]*y_cur[IDX_CNCII] + + k[4490]*y_cur[IDX_C8M]*y_cur[IDX_FeII] + + k[4491]*y_cur[IDX_C8M]*y_cur[IDX_HII] + + k[4492]*y_cur[IDX_C8M]*y_cur[IDX_H2COII] + + k[4493]*y_cur[IDX_C8M]*y_cur[IDX_H2SII] + + k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] + + k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] + + k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] + + k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + + k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + + k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + + k[4500]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + + k[4501]*y_cur[IDX_C8M]*y_cur[IDX_HeII] + + k[4502]*y_cur[IDX_C8M]*y_cur[IDX_MgII] + + k[4503]*y_cur[IDX_C8M]*y_cur[IDX_NII] + + k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] + + k[4505]*y_cur[IDX_C8M]*y_cur[IDX_NH3II] + + k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] + + k[4507]*y_cur[IDX_C8M]*y_cur[IDX_NOII] + + k[4508]*y_cur[IDX_C8M]*y_cur[IDX_NaII] + + k[4509]*y_cur[IDX_C8M]*y_cur[IDX_OII] + + k[4510]*y_cur[IDX_C8M]*y_cur[IDX_SII] + + k[4511]*y_cur[IDX_C8M]*y_cur[IDX_SOII] + + k[4512]*y_cur[IDX_C8M]*y_cur[IDX_SiII] + + k[4513]*y_cur[IDX_C8M]*y_cur[IDX_SiOII] + + k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] + + k[4515]*y_cur[IDX_C8M]*y_cur[IDX_SiSII] + + k[4936]*y_cur[IDX_CI]*y_cur[IDX_C7HI] - + k[4938]*y_cur[IDX_CI]*y_cur[IDX_C8I] - + k[5248]*y_cur[IDX_NI]*y_cur[IDX_C8I] + + k[5250]*y_cur[IDX_NI]*y_cur[IDX_C9I] - + k[5373]*y_cur[IDX_OI]*y_cur[IDX_C8I] + + k[5375]*y_cur[IDX_OI]*y_cur[IDX_C9I] + + k[5377]*y_cur[IDX_OI]*y_cur[IDX_C9NI] - + k[5501]*y_cur[IDX_CII]*y_cur[IDX_C8I] - + k[5603]*y_cur[IDX_C8I]*y_cur[IDX_eM] + k[5761]*y_cur[IDX_C8M] - + k[5762]*y_cur[IDX_C8I] + k[5765]*y_cur[IDX_C8HI] + + k[5767]*y_cur[IDX_C9I] + k[5771]*y_cur[IDX_C9NI] + + k[5954]*y_cur[IDX_C10I] + k[5967]*y_cur[IDX_C10HI] + + k[5973]*y_cur[IDX_C11I] + k[6051]*y_cur[IDX_C8M] - + k[6052]*y_cur[IDX_C8I] - k[6053]*y_cur[IDX_C8I] + + k[6057]*y_cur[IDX_C8HI] + k[6060]*y_cur[IDX_C9I] + + k[6067]*y_cur[IDX_C9NI] + k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + + k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + + k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + + k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + + k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7055]*y_cur[IDX_C8I] + + k[7237]*y_cur[IDX_GC8I] + k[7419]*y_cur[IDX_GC8I] + + k[7601]*y_cur[IDX_GC8I] + k[8678]*y_cur[IDX_GCI]*y_cur[IDX_GC7I]; + ydot[yistart + IDX_GCI] = 0.0 + k[6891]*y_cur[IDX_CI] - + k[7073]*y_cur[IDX_GCI] - k[7255]*y_cur[IDX_GCI] - + k[7437]*y_cur[IDX_GCI] + k[7616]*y_cur[IDX_GCOI] + + k[7618]*y_cur[IDX_GCHI] + k[7620]*y_cur[IDX_GCH2I] + + k[7621]*y_cur[IDX_GCH2I] + k[7641]*y_cur[IDX_GC2I] + + k[7641]*y_cur[IDX_GC2I] + k[7644]*y_cur[IDX_GC2HI] + + k[7649]*y_cur[IDX_GCNI] + k[7663]*y_cur[IDX_GC2H3I] + + k[7664]*y_cur[IDX_GC2H3I] + k[7674]*y_cur[IDX_GC2H4I] + + k[7675]*y_cur[IDX_GCOI] + k[7712]*y_cur[IDX_GC3I] + + k[7718]*y_cur[IDX_GC2NI] + k[7728]*y_cur[IDX_GC2OI] + + k[7734]*y_cur[IDX_GSiCI] + k[7753]*y_cur[IDX_GCPI] + + k[7757]*y_cur[IDX_GCSI] + k[7758]*y_cur[IDX_GCSI] + + k[7781]*y_cur[IDX_GCClI] + k[7784]*y_cur[IDX_GC4I] + + k[7799]*y_cur[IDX_GCH2CHCCHI] + k[7800]*y_cur[IDX_GCH2CHCCHI] + + k[7802]*y_cur[IDX_GSiC2I] + k[7807]*y_cur[IDX_GC4H6I] + + k[7814]*y_cur[IDX_GCCPI] + k[7815]*y_cur[IDX_GC2SI] + + k[7823]*y_cur[IDX_GC5I] + k[7828]*y_cur[IDX_GOCSI] + + k[7842]*y_cur[IDX_GSiC3I] + k[7847]*y_cur[IDX_GC3PI] + + k[7849]*y_cur[IDX_GC6I] + k[7859]*y_cur[IDX_GC4PI] + + k[7861]*y_cur[IDX_GC7I] + k[7866]*y_cur[IDX_GC8I] + + k[7871]*y_cur[IDX_GC9I] + k[7875]*y_cur[IDX_GC10I] + + k[7880]*y_cur[IDX_GC11I] + k[7894]*y_cur[IDX_GCHI] + + k[7895]*y_cur[IDX_GCHI] + k[7897]*y_cur[IDX_GCH2I] + + k[7898]*y_cur[IDX_GCH2I] + k[7927]*y_cur[IDX_GC2I] + + k[7927]*y_cur[IDX_GC2I] + k[7928]*y_cur[IDX_GC2I] + + k[7928]*y_cur[IDX_GC2I] + k[7931]*y_cur[IDX_GC2HI] + + k[7936]*y_cur[IDX_GCNI] + k[7950]*y_cur[IDX_GC2H3I] + + k[7951]*y_cur[IDX_GC2H3I] + k[7961]*y_cur[IDX_GC2H4I] + + k[7962]*y_cur[IDX_GCOI] + k[8017]*y_cur[IDX_GC3I] + + k[8025]*y_cur[IDX_GC2NI] + k[8036]*y_cur[IDX_GC2OI] + + k[8043]*y_cur[IDX_GSiCI] + k[8067]*y_cur[IDX_GCPI] + + k[8075]*y_cur[IDX_GCSI] + k[8076]*y_cur[IDX_GCSI] + + k[8105]*y_cur[IDX_GCClI] + k[8108]*y_cur[IDX_GC4I] + + k[8124]*y_cur[IDX_GCH2CHCCHI] + k[8125]*y_cur[IDX_GCH2CHCCHI] + + k[8134]*y_cur[IDX_GSiNCI] + k[8136]*y_cur[IDX_GC4H6I] + + k[8143]*y_cur[IDX_GCCPI] + k[8152]*y_cur[IDX_GOCSI] + + k[8169]*y_cur[IDX_GSiC3I] + k[8178]*y_cur[IDX_GC6I] + + k[8180]*y_cur[IDX_GC6I] + k[8193]*y_cur[IDX_GC7I] + + k[8196]*y_cur[IDX_GC7I] + k[8198]*y_cur[IDX_GC7HI] + + k[8205]*y_cur[IDX_GC8I] + k[8207]*y_cur[IDX_GC8I] + + k[8209]*y_cur[IDX_GC8HI] + k[8219]*y_cur[IDX_GC9I] + + k[8221]*y_cur[IDX_GC9I] + k[8223]*y_cur[IDX_GC9HI] + + k[8229]*y_cur[IDX_GC10I] + k[8231]*y_cur[IDX_GC10I] + + k[8233]*y_cur[IDX_GC10I] + k[8235]*y_cur[IDX_GC10I] + + k[8242]*y_cur[IDX_GC10HI] - k[8274]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - + k[8369]*y_cur[IDX_GH2I]*y_cur[IDX_GCI] - + k[8394]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - + k[8394]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - + k[8395]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - + k[8396]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] - + k[8397]*y_cur[IDX_GCI]*y_cur[IDX_GNI] - + k[8398]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - + k[8399]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - + k[8400]*y_cur[IDX_GCI]*y_cur[IDX_GNSI] - + k[8401]*y_cur[IDX_GCI]*y_cur[IDX_GOCNI] - + k[8402]*y_cur[IDX_GCI]*y_cur[IDX_GCNOI] - + k[8403]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] - + k[8404]*y_cur[IDX_GCI]*y_cur[IDX_GNH2I] - + k[8405]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - + k[8406]*y_cur[IDX_GCI]*y_cur[IDX_GOI] - + k[8407]*y_cur[IDX_GCI]*y_cur[IDX_GO2I] - + k[8408]*y_cur[IDX_GCI]*y_cur[IDX_GOHI] - + k[8409]*y_cur[IDX_GCI]*y_cur[IDX_GSOI] - + k[8410]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - + k[8411]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - + k[8412]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - + k[8413]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] - + k[8414]*y_cur[IDX_GCI]*y_cur[IDX_GHSI] - + k[8415]*y_cur[IDX_GCI]*y_cur[IDX_GSI] - + k[8416]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - + k[8417]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - + k[8418]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] - + k[8419]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] - + k[8420]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - + k[8421]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] - + k[8422]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI] - + k[8423]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - + k[8424]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - + k[8425]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - + k[8426]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] - + k[8427]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - + k[8428]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - + k[8429]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - + k[8430]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] - + k[8431]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - + k[8432]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - + k[8433]*y_cur[IDX_GCI]*y_cur[IDX_GC10I] - + k[8576]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - + k[8653]*y_cur[IDX_GH2I]*y_cur[IDX_GCI] - + k[8654]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - + k[8654]*y_cur[IDX_GCI]*y_cur[IDX_GCI] - + k[8655]*y_cur[IDX_GCI]*y_cur[IDX_GCHI] - + k[8656]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] - + k[8657]*y_cur[IDX_GCI]*y_cur[IDX_GNI] - + k[8658]*y_cur[IDX_GCI]*y_cur[IDX_GNOI] - + k[8659]*y_cur[IDX_GCI]*y_cur[IDX_GNHI] - + k[8660]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] - + k[8661]*y_cur[IDX_GCI]*y_cur[IDX_GOI] - + k[8662]*y_cur[IDX_GCI]*y_cur[IDX_GC2I] - + k[8663]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] - + k[8664]*y_cur[IDX_GCI]*y_cur[IDX_GCNI] - + k[8665]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I] - + k[8666]*y_cur[IDX_GCI]*y_cur[IDX_GSI] - + k[8667]*y_cur[IDX_GCI]*y_cur[IDX_GC3I] - + k[8668]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] - + k[8669]*y_cur[IDX_GCI]*y_cur[IDX_GC2NI] - + k[8670]*y_cur[IDX_GCI]*y_cur[IDX_GC2OI] - + k[8671]*y_cur[IDX_GCI]*y_cur[IDX_GC4I] - + k[8672]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] - + k[8673]*y_cur[IDX_GCI]*y_cur[IDX_GC2SI] - + k[8674]*y_cur[IDX_GCI]*y_cur[IDX_GC5I] - + k[8675]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] - + k[8676]*y_cur[IDX_GCI]*y_cur[IDX_GC6I] - + k[8677]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] - + k[8678]*y_cur[IDX_GCI]*y_cur[IDX_GC7I] - + k[8679]*y_cur[IDX_GCI]*y_cur[IDX_GC7HI] - + k[8680]*y_cur[IDX_GCI]*y_cur[IDX_GC8I] - + k[8681]*y_cur[IDX_GCI]*y_cur[IDX_GC8HI] - + k[8682]*y_cur[IDX_GCI]*y_cur[IDX_GC9I] - + k[8683]*y_cur[IDX_GCI]*y_cur[IDX_GC9HI] - + k[8684]*y_cur[IDX_GCI]*y_cur[IDX_GC10I]; + ydot[yistart + IDX_NHI] = 0.0 - k[6]*y_cur[IDX_CM]*y_cur[IDX_NHI] + + k[77]*y_cur[IDX_HM]*y_cur[IDX_NI] - + k[79]*y_cur[IDX_HM]*y_cur[IDX_NHI] - + k[402]*y_cur[IDX_HII]*y_cur[IDX_NHI] - + k[453]*y_cur[IDX_H2II]*y_cur[IDX_NHI] - + k[559]*y_cur[IDX_NII]*y_cur[IDX_NHI] + + k[574]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + + k[575]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + + k[576]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + + k[577]*y_cur[IDX_NHII]*y_cur[IDX_NOI] + + k[578]*y_cur[IDX_NHII]*y_cur[IDX_O2I] + + k[579]*y_cur[IDX_NHII]*y_cur[IDX_SI] - + k[616]*y_cur[IDX_NHI]*y_cur[IDX_CNII] - + k[617]*y_cur[IDX_NHI]*y_cur[IDX_COII] - + k[618]*y_cur[IDX_NHI]*y_cur[IDX_N2II] - + k[619]*y_cur[IDX_NHI]*y_cur[IDX_OII] + + k[1116]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + + k[1120]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + + k[1123]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] + + k[1132]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + + k[1153]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + + k[1154]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + + k[1160]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + + k[1164]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + + k[1213]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] - + k[1420]*y_cur[IDX_CII]*y_cur[IDX_NHI] - + k[1965]*y_cur[IDX_CHII]*y_cur[IDX_NHI] + + k[2012]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] + + k[2259]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] - k[2393]*y_cur[IDX_H2II]*y_cur[IDX_NHI] + - k[2462]*y_cur[IDX_H2I]*y_cur[IDX_NHII] - - k[2463]*y_cur[IDX_H2I]*y_cur[IDX_NH2II] + + k[2537]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - k[2724]*y_cur[IDX_H3II]*y_cur[IDX_NHI] + - k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] + - k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + + k[3021]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3032]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] - + k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] + + k[3336]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3337]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3345]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + + k[3347]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + + k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + k[3354]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - - k[3464]*y_cur[IDX_NI]*y_cur[IDX_NH2II] + - k[3492]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + - k[3499]*y_cur[IDX_NHII]*y_cur[IDX_NHI] - - k[3507]*y_cur[IDX_NH2II]*y_cur[IDX_C2I] - - k[3508]*y_cur[IDX_NH2II]*y_cur[IDX_C2HI] - - k[3509]*y_cur[IDX_NH2II]*y_cur[IDX_CNI] - - k[3510]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - - k[3511]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - - k[3512]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - - k[3513]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - - k[3514]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - - k[3515]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3516]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3517]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3518]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3519]*y_cur[IDX_NH2II]*y_cur[IDX_HCNI] - - k[3520]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] - - k[3521]*y_cur[IDX_NH2II]*y_cur[IDX_HNCI] - - k[3522]*y_cur[IDX_NH2II]*y_cur[IDX_NH2I] - - k[3523]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] - - k[3524]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - - k[3525]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - - k[3526]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - + k[3355]*y_cur[IDX_NII]*y_cur[IDX_NHI] - + k[3499]*y_cur[IDX_NHII]*y_cur[IDX_NHI] + + k[3507]*y_cur[IDX_NH2II]*y_cur[IDX_C2I] + + k[3508]*y_cur[IDX_NH2II]*y_cur[IDX_C2HI] + + k[3510]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] + + k[3512]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + + k[3515]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + + k[3519]*y_cur[IDX_NH2II]*y_cur[IDX_HCNI] + + k[3520]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] + + k[3521]*y_cur[IDX_NH2II]*y_cur[IDX_HNCI] + + k[3522]*y_cur[IDX_NH2II]*y_cur[IDX_NH2I] + + k[3523]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] + k[3527]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + - k[3609]*y_cur[IDX_NHI]*y_cur[IDX_CH5II] + - k[3613]*y_cur[IDX_NHI]*y_cur[IDX_HCNII] + - k[3614]*y_cur[IDX_NHI]*y_cur[IDX_HCOII] + - k[3615]*y_cur[IDX_NHI]*y_cur[IDX_HNOII] + + k[3534]*y_cur[IDX_NH2I]*y_cur[IDX_COII] + + k[3545]*y_cur[IDX_NH2I]*y_cur[IDX_NH3II] + + k[3548]*y_cur[IDX_NH3II]*y_cur[IDX_C2I] - + k[3605]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - + k[3606]*y_cur[IDX_NHI]*y_cur[IDX_C2II] - + k[3607]*y_cur[IDX_NHI]*y_cur[IDX_C2H2II] - + k[3608]*y_cur[IDX_NHI]*y_cur[IDX_CH3II] - + k[3609]*y_cur[IDX_NHI]*y_cur[IDX_CH5II] - + k[3610]*y_cur[IDX_NHI]*y_cur[IDX_COII] - + k[3611]*y_cur[IDX_NHI]*y_cur[IDX_H2COII] - + k[3612]*y_cur[IDX_NHI]*y_cur[IDX_H2OII] - + k[3613]*y_cur[IDX_NHI]*y_cur[IDX_HCNII] - + k[3614]*y_cur[IDX_NHI]*y_cur[IDX_HCOII] - + k[3615]*y_cur[IDX_NHI]*y_cur[IDX_HNOII] - k[3616]*y_cur[IDX_NHI]*y_cur[IDX_N2HII] - - k[3617]*y_cur[IDX_NHI]*y_cur[IDX_NH2II] + - k[3622]*y_cur[IDX_NHI]*y_cur[IDX_O2HII] + + k[3617]*y_cur[IDX_NHI]*y_cur[IDX_NH2II] - + k[3618]*y_cur[IDX_NHI]*y_cur[IDX_NH3II] - + k[3619]*y_cur[IDX_NHI]*y_cur[IDX_OII] - + k[3620]*y_cur[IDX_NHI]*y_cur[IDX_O2II] - + k[3621]*y_cur[IDX_NHI]*y_cur[IDX_O2II] - + k[3622]*y_cur[IDX_NHI]*y_cur[IDX_O2HII] - k[3623]*y_cur[IDX_NHI]*y_cur[IDX_OHII] - - k[3746]*y_cur[IDX_OI]*y_cur[IDX_NH2II] + k[5882]*y_cur[IDX_NH2I] + - k[6218]*y_cur[IDX_NH2I] - k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] - - k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NH2CNI] = 0.0 + - k[1162]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] - - k[2722]*y_cur[IDX_H3II]*y_cur[IDX_NH2CNI] - - k[2980]*y_cur[IDX_HCOII]*y_cur[IDX_NH2CNI] - - k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] + - k[5303]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - k[5884]*y_cur[IDX_NH2CNI] - - k[6220]*y_cur[IDX_NH2CNI] + - k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] - - k[6962]*y_cur[IDX_NH2CNI] + k[7144]*y_cur[IDX_GNH2CNI] + - k[7326]*y_cur[IDX_GNH2CNI] + k[7508]*y_cur[IDX_GNH2CNI]; - ydot[yistart + IDX_NH2CNHII] = 0.0 - - k[1161]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] - - k[1162]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] + - k[2722]*y_cur[IDX_H3II]*y_cur[IDX_NH2CNI] + - k[2980]*y_cur[IDX_HCOII]*y_cur[IDX_NH2CNI] - - k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] - - k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NH3I] = 0.0 + k[78]*y_cur[IDX_HM]*y_cur[IDX_NH2I] - - k[185]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - - k[253]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - - k[282]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] - - k[401]*y_cur[IDX_HII]*y_cur[IDX_NH3I] - - k[452]*y_cur[IDX_H2II]*y_cur[IDX_NH3I] - - k[524]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - - k[558]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - - k[576]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] - - k[582]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] + - k[592]*y_cur[IDX_NH3II]*y_cur[IDX_FeI] + - k[593]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + - k[594]*y_cur[IDX_NH3II]*y_cur[IDX_MgI] + - k[595]*y_cur[IDX_NH3II]*y_cur[IDX_NOI] + - k[596]*y_cur[IDX_NH3II]*y_cur[IDX_NaI] + - k[597]*y_cur[IDX_NH3II]*y_cur[IDX_SiI] - - k[598]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - - k[599]*y_cur[IDX_NH3I]*y_cur[IDX_C2H4II] - - k[600]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - - k[601]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] - - k[602]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - - k[603]*y_cur[IDX_NH3I]*y_cur[IDX_CO2II] - - k[604]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - - k[605]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] - - k[606]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] - - k[607]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NII] - - k[608]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - - k[609]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] - - k[610]*y_cur[IDX_NH3I]*y_cur[IDX_N2II] - - k[611]*y_cur[IDX_NH3I]*y_cur[IDX_O2II] - - k[612]*y_cur[IDX_NH3I]*y_cur[IDX_OCSII] - - k[613]*y_cur[IDX_NH3I]*y_cur[IDX_PII] - - k[614]*y_cur[IDX_NH3I]*y_cur[IDX_SII] - - k[615]*y_cur[IDX_NH3I]*y_cur[IDX_SOII] - - k[661]*y_cur[IDX_OII]*y_cur[IDX_NH3I] - - k[692]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] + - k[1167]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + - k[1215]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - - k[1418]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - - k[1419]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - - k[1818]*y_cur[IDX_C3H7II]*y_cur[IDX_NH3I] - - k[1963]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - - k[1964]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - - k[1988]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] - - k[1989]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] - - k[2087]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - - k[2088]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - - k[2121]*y_cur[IDX_CH3OH2II]*y_cur[IDX_NH3I] - - k[2144]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] - - k[2723]*y_cur[IDX_H3II]*y_cur[IDX_NH3I] - - k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - - k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - - k[3353]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - - k[3354]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - - k[3498]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + - k[3516]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3523]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] - - k[3553]*y_cur[IDX_NH3II]*y_cur[IDX_NH3I] - - k[3554]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] - - k[3555]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] - - k[3556]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - - k[3557]*y_cur[IDX_NH3I]*y_cur[IDX_C2H3II] - - k[3558]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5II] - - k[3559]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5OH2II] - - k[3560]*y_cur[IDX_NH3I]*y_cur[IDX_C2H7II] - - k[3561]*y_cur[IDX_NH3I]*y_cur[IDX_C2NII] - - k[3562]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - - k[3563]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - - k[3564]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - - k[3565]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - - k[3566]*y_cur[IDX_NH3I]*y_cur[IDX_CClII] - - k[3567]*y_cur[IDX_NH3I]*y_cur[IDX_CH2CHCNHII] - - k[3568]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] - - k[3569]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - - k[3570]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - - k[3571]*y_cur[IDX_NH3I]*y_cur[IDX_CH5II] - - k[3572]*y_cur[IDX_NH3I]*y_cur[IDX_CNCII] - - k[3573]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - - k[3574]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - - k[3575]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] - - k[3576]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] - - k[3577]*y_cur[IDX_NH3I]*y_cur[IDX_H3COII] - - k[3578]*y_cur[IDX_NH3I]*y_cur[IDX_H3OII] - - k[3579]*y_cur[IDX_NH3I]*y_cur[IDX_H3SII] - - k[3580]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NHII] - - k[3581]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - - k[3582]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] - - k[3583]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] - - k[3584]*y_cur[IDX_NH3I]*y_cur[IDX_HCOII] - - k[3585]*y_cur[IDX_NH3I]*y_cur[IDX_HCO2II] - - k[3586]*y_cur[IDX_NH3I]*y_cur[IDX_HCOOH2II] - - k[3587]*y_cur[IDX_NH3I]*y_cur[IDX_HCSII] - - k[3588]*y_cur[IDX_NH3I]*y_cur[IDX_HNOII] - - k[3589]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] - - k[3590]*y_cur[IDX_NH3I]*y_cur[IDX_HSO2II] - - k[3591]*y_cur[IDX_NH3I]*y_cur[IDX_HSiSII] - - k[3592]*y_cur[IDX_NH3I]*y_cur[IDX_N2HII] - - k[3593]*y_cur[IDX_NH3I]*y_cur[IDX_NCCNHII] - - k[3594]*y_cur[IDX_NH3I]*y_cur[IDX_O2HII] - - k[3595]*y_cur[IDX_NH3I]*y_cur[IDX_PII] - - k[3596]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - - k[3597]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - - k[3598]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - - k[3599]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - - k[3600]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - - k[3601]*y_cur[IDX_NH3I]*y_cur[IDX_PH3II] - - k[3602]*y_cur[IDX_NH3I]*y_cur[IDX_SiII] - - k[3603]*y_cur[IDX_NH3I]*y_cur[IDX_SiHII] - - k[3604]*y_cur[IDX_NH3I]*y_cur[IDX_SiOHII] - - k[3786]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] + - k[3910]*y_cur[IDX_CM]*y_cur[IDX_NH3II] + - k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] + - k[3945]*y_cur[IDX_C10M]*y_cur[IDX_NH3II] + - k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] + - k[3980]*y_cur[IDX_C10HM]*y_cur[IDX_NH3II] + - k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] + - k[4015]*y_cur[IDX_C2M]*y_cur[IDX_NH3II] + - k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] + - k[4050]*y_cur[IDX_C2HM]*y_cur[IDX_NH3II] + - k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] + - k[4085]*y_cur[IDX_C3M]*y_cur[IDX_NH3II] + - k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] + - k[4120]*y_cur[IDX_C3HM]*y_cur[IDX_NH3II] + - k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] + - k[4155]*y_cur[IDX_C3NM]*y_cur[IDX_NH3II] + - k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] + + k[3624]*y_cur[IDX_NHI]*y_cur[IDX_SII] - + k[3625]*y_cur[IDX_NHI]*y_cur[IDX_SiII] + + k[4971]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - + k[4972]*y_cur[IDX_CI]*y_cur[IDX_NHI] - + k[4973]*y_cur[IDX_CI]*y_cur[IDX_NHI] + + k[5001]*y_cur[IDX_CH2I]*y_cur[IDX_N2I] + + k[5035]*y_cur[IDX_CH3I]*y_cur[IDX_NH2I] + + k[5081]*y_cur[IDX_CHI]*y_cur[IDX_NI] + + k[5127]*y_cur[IDX_COI]*y_cur[IDX_HNOI] + + k[5141]*y_cur[IDX_H2I]*y_cur[IDX_NI] - + k[5143]*y_cur[IDX_H2I]*y_cur[IDX_NHI] + + k[5177]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + + k[5180]*y_cur[IDX_HI]*y_cur[IDX_N2OI] + + k[5182]*y_cur[IDX_HI]*y_cur[IDX_NH2I] - + k[5184]*y_cur[IDX_HI]*y_cur[IDX_NHI] + + k[5186]*y_cur[IDX_HI]*y_cur[IDX_NOI] + + k[5189]*y_cur[IDX_HI]*y_cur[IDX_NSI] + + k[5195]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + + k[5223]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] + + k[5226]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] + + k[5255]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + + k[5264]*y_cur[IDX_NI]*y_cur[IDX_H2CNI] + + k[5265]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + + k[5270]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + + k[5272]*y_cur[IDX_NI]*y_cur[IDX_HSI] - + k[5274]*y_cur[IDX_NI]*y_cur[IDX_NHI] + + k[5282]*y_cur[IDX_NI]*y_cur[IDX_O2HI] + + k[5284]*y_cur[IDX_NI]*y_cur[IDX_OHI] + + k[5300]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] - + k[5304]*y_cur[IDX_NHI]*y_cur[IDX_CH4I] - + k[5305]*y_cur[IDX_NHI]*y_cur[IDX_CNI] - + k[5306]*y_cur[IDX_NHI]*y_cur[IDX_H2OI] - + k[5307]*y_cur[IDX_NHI]*y_cur[IDX_NH3I] - + k[5308]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - + k[5308]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - + k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - + k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - + k[5310]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - + k[5310]*y_cur[IDX_NHI]*y_cur[IDX_NHI] - + k[5311]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] - + k[5312]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] - + k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - + k[5314]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - + k[5315]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - + k[5316]*y_cur[IDX_NHI]*y_cur[IDX_O2I] - + k[5317]*y_cur[IDX_NHI]*y_cur[IDX_O2I] - + k[5318]*y_cur[IDX_NHI]*y_cur[IDX_OI] - + k[5319]*y_cur[IDX_NHI]*y_cur[IDX_OI] - + k[5320]*y_cur[IDX_NHI]*y_cur[IDX_OI] - + k[5321]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - + k[5322]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - + k[5323]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - + k[5324]*y_cur[IDX_NHI]*y_cur[IDX_SI] - + k[5325]*y_cur[IDX_NHI]*y_cur[IDX_SI] + + k[5403]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + + k[5413]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + + k[5421]*y_cur[IDX_OI]*y_cur[IDX_NH2I] + k[5791]*y_cur[IDX_CH2NHI] + + k[5868]*y_cur[IDX_HNCOI] + k[5883]*y_cur[IDX_NH2I] + + k[5887]*y_cur[IDX_NH3I] - k[5888]*y_cur[IDX_NHI] - + k[5889]*y_cur[IDX_NHI] + k[6199]*y_cur[IDX_HNCOI] + + k[6219]*y_cur[IDX_NH2I] + k[6223]*y_cur[IDX_NH3I] - + k[6224]*y_cur[IDX_NHI] - k[6225]*y_cur[IDX_NHI] + + k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + + k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + + k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + + k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + + k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + + k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + + k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + + k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - k[6896]*y_cur[IDX_NHI] + + k[7078]*y_cur[IDX_GNHI] + k[7260]*y_cur[IDX_GNHI] + + k[7442]*y_cur[IDX_GNHI] + k[8580]*y_cur[IDX_GHI]*y_cur[IDX_GNI]; + ydot[yistart + IDX_C5I] = 0.0 + k[11]*y_cur[IDX_C2M]*y_cur[IDX_C3I] + - k[13]*y_cur[IDX_C2M]*y_cur[IDX_C5I] - + k[19]*y_cur[IDX_C3M]*y_cur[IDX_C5I] - + k[25]*y_cur[IDX_C4M]*y_cur[IDX_C5I] - + k[30]*y_cur[IDX_C5M]*y_cur[IDX_C5I] + + k[37]*y_cur[IDX_CI]*y_cur[IDX_C10M] + + k[43]*y_cur[IDX_CI]*y_cur[IDX_C4M] + + k[236]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - + k[343]*y_cur[IDX_HII]*y_cur[IDX_C5I] + + k[730]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + + k[735]*y_cur[IDX_C11II]*y_cur[IDX_eM] + + k[840]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + + k[841]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + + k[849]*y_cur[IDX_C6II]*y_cur[IDX_eM] + + k[864]*y_cur[IDX_C7II]*y_cur[IDX_eM] - + k[2613]*y_cur[IDX_H3II]*y_cur[IDX_C5I] - + k[2918]*y_cur[IDX_HCOII]*y_cur[IDX_C5I] + + k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3117]*y_cur[IDX_HeII]*y_cur[IDX_C5I] - + k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + + k[3378]*y_cur[IDX_NI]*y_cur[IDX_C10M] + + k[3419]*y_cur[IDX_NI]*y_cur[IDX_C6M] + + k[3436]*y_cur[IDX_NI]*y_cur[IDX_C8M] + + k[4236]*y_cur[IDX_C5M]*y_cur[IDX_CII] + + k[4237]*y_cur[IDX_C5M]*y_cur[IDX_C2H2II] + + k[4238]*y_cur[IDX_C5M]*y_cur[IDX_C2H3II] + + k[4239]*y_cur[IDX_C5M]*y_cur[IDX_C4H2II] + + k[4240]*y_cur[IDX_C5M]*y_cur[IDX_C4H3II] + + k[4241]*y_cur[IDX_C5M]*y_cur[IDX_C4SII] + + k[4242]*y_cur[IDX_C5M]*y_cur[IDX_CH2CCHII] + + k[4243]*y_cur[IDX_C5M]*y_cur[IDX_CH3II] + + k[4244]*y_cur[IDX_C5M]*y_cur[IDX_CNCII] + + k[4245]*y_cur[IDX_C5M]*y_cur[IDX_FeII] + + k[4246]*y_cur[IDX_C5M]*y_cur[IDX_HII] + + k[4247]*y_cur[IDX_C5M]*y_cur[IDX_H2COII] + + k[4248]*y_cur[IDX_C5M]*y_cur[IDX_H2SII] + + k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] + + k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] + + k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] + + k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + + k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + + k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + + k[4255]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + + k[4256]*y_cur[IDX_C5M]*y_cur[IDX_HeII] + + k[4257]*y_cur[IDX_C5M]*y_cur[IDX_MgII] + + k[4258]*y_cur[IDX_C5M]*y_cur[IDX_NII] + + k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] + + k[4260]*y_cur[IDX_C5M]*y_cur[IDX_NH3II] + + k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] + + k[4262]*y_cur[IDX_C5M]*y_cur[IDX_NOII] + + k[4263]*y_cur[IDX_C5M]*y_cur[IDX_NaII] + + k[4264]*y_cur[IDX_C5M]*y_cur[IDX_OII] + + k[4265]*y_cur[IDX_C5M]*y_cur[IDX_SII] + + k[4266]*y_cur[IDX_C5M]*y_cur[IDX_SOII] + + k[4267]*y_cur[IDX_C5M]*y_cur[IDX_SiII] + + k[4268]*y_cur[IDX_C5M]*y_cur[IDX_SiOII] + + k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] + + k[4270]*y_cur[IDX_C5M]*y_cur[IDX_SiSII] + + k[4925]*y_cur[IDX_CI]*y_cur[IDX_C4HI] - + k[4926]*y_cur[IDX_CI]*y_cur[IDX_C5I] + + k[4929]*y_cur[IDX_CI]*y_cur[IDX_C5NI] + + k[4930]*y_cur[IDX_CI]*y_cur[IDX_C6I] + + k[4934]*y_cur[IDX_CI]*y_cur[IDX_C7I] - + k[5238]*y_cur[IDX_NI]*y_cur[IDX_C5I] + + k[5242]*y_cur[IDX_NI]*y_cur[IDX_C6I] - + k[5365]*y_cur[IDX_OI]*y_cur[IDX_C5I] + + k[5368]*y_cur[IDX_OI]*y_cur[IDX_C6I] - + k[5498]*y_cur[IDX_CII]*y_cur[IDX_C5I] - + k[5596]*y_cur[IDX_C5I]*y_cur[IDX_eM] + k[5736]*y_cur[IDX_C5M] - + k[5737]*y_cur[IDX_C5I] - k[5738]*y_cur[IDX_C5I] + + k[5744]*y_cur[IDX_C5HI] + k[5748]*y_cur[IDX_C6I] + + k[5963]*y_cur[IDX_C10HI] + k[5963]*y_cur[IDX_C10HI] + + k[5964]*y_cur[IDX_C10HI] + k[5970]*y_cur[IDX_C11I] + + k[5971]*y_cur[IDX_C11I] + k[6022]*y_cur[IDX_C5M] - + k[6023]*y_cur[IDX_C5I] + k[6029]*y_cur[IDX_C5HI] + + k[6033]*y_cur[IDX_C6I] + k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + + k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + + k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + + k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + + k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + + k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7024]*y_cur[IDX_C5I] + + k[7206]*y_cur[IDX_GC5I] + k[7388]*y_cur[IDX_GC5I] + + k[7572]*y_cur[IDX_GC5I] + k[8671]*y_cur[IDX_GCI]*y_cur[IDX_GC4I]; + ydot[yistart + IDX_C6I] = 0.0 + k[12]*y_cur[IDX_C2M]*y_cur[IDX_C4I] + - k[14]*y_cur[IDX_C2M]*y_cur[IDX_C6I] + + k[17]*y_cur[IDX_C3M]*y_cur[IDX_C3I] - + k[20]*y_cur[IDX_C3M]*y_cur[IDX_C6I] + + k[22]*y_cur[IDX_C4M]*y_cur[IDX_C2I] - + k[26]*y_cur[IDX_C4M]*y_cur[IDX_C6I] + + k[37]*y_cur[IDX_CI]*y_cur[IDX_C10M] + + k[45]*y_cur[IDX_CI]*y_cur[IDX_C5M] - + k[346]*y_cur[IDX_HII]*y_cur[IDX_C6I] + + k[735]*y_cur[IDX_C11II]*y_cur[IDX_eM] + + k[851]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + + k[852]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + + k[865]*y_cur[IDX_C7II]*y_cur[IDX_eM] + + k[877]*y_cur[IDX_C8II]*y_cur[IDX_eM] + + k[1847]*y_cur[IDX_CI]*y_cur[IDX_C10HM] - + k[2617]*y_cur[IDX_H3II]*y_cur[IDX_C6I] - + k[2922]*y_cur[IDX_HCOII]*y_cur[IDX_C6I] - + k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] - + k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + + k[3427]*y_cur[IDX_NI]*y_cur[IDX_C7M] + + k[3442]*y_cur[IDX_NI]*y_cur[IDX_C9M] + + k[3713]*y_cur[IDX_OI]*y_cur[IDX_C7HII] + + k[4341]*y_cur[IDX_C6M]*y_cur[IDX_CII] + + k[4342]*y_cur[IDX_C6M]*y_cur[IDX_C2H2II] + + k[4343]*y_cur[IDX_C6M]*y_cur[IDX_C2H3II] + + k[4344]*y_cur[IDX_C6M]*y_cur[IDX_C4H2II] + + k[4345]*y_cur[IDX_C6M]*y_cur[IDX_C4H3II] + + k[4346]*y_cur[IDX_C6M]*y_cur[IDX_C4SII] + + k[4347]*y_cur[IDX_C6M]*y_cur[IDX_CH2CCHII] + + k[4348]*y_cur[IDX_C6M]*y_cur[IDX_CH3II] + + k[4349]*y_cur[IDX_C6M]*y_cur[IDX_CNCII] + + k[4350]*y_cur[IDX_C6M]*y_cur[IDX_FeII] + + k[4351]*y_cur[IDX_C6M]*y_cur[IDX_HII] + + k[4352]*y_cur[IDX_C6M]*y_cur[IDX_H2COII] + + k[4353]*y_cur[IDX_C6M]*y_cur[IDX_H2SII] + + k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] + + k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] + + k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] + + k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + + k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + + k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + + k[4360]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + + k[4361]*y_cur[IDX_C6M]*y_cur[IDX_HeII] + + k[4362]*y_cur[IDX_C6M]*y_cur[IDX_MgII] + + k[4363]*y_cur[IDX_C6M]*y_cur[IDX_NII] + + k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] + + k[4365]*y_cur[IDX_C6M]*y_cur[IDX_NH3II] + + k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] + + k[4367]*y_cur[IDX_C6M]*y_cur[IDX_NOII] + + k[4368]*y_cur[IDX_C6M]*y_cur[IDX_NaII] + + k[4369]*y_cur[IDX_C6M]*y_cur[IDX_OII] + + k[4370]*y_cur[IDX_C6M]*y_cur[IDX_SII] + + k[4371]*y_cur[IDX_C6M]*y_cur[IDX_SOII] + + k[4372]*y_cur[IDX_C6M]*y_cur[IDX_SiII] + + k[4373]*y_cur[IDX_C6M]*y_cur[IDX_SiOII] + + k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] + + k[4375]*y_cur[IDX_C6M]*y_cur[IDX_SiSII] + + k[4928]*y_cur[IDX_CI]*y_cur[IDX_C5HI] - + k[4930]*y_cur[IDX_CI]*y_cur[IDX_C6I] - + k[4931]*y_cur[IDX_CI]*y_cur[IDX_C6I] - + k[5242]*y_cur[IDX_NI]*y_cur[IDX_C6I] + + k[5244]*y_cur[IDX_NI]*y_cur[IDX_C7I] - + k[5368]*y_cur[IDX_OI]*y_cur[IDX_C6I] + + k[5370]*y_cur[IDX_OI]*y_cur[IDX_C7I] + + k[5372]*y_cur[IDX_OI]*y_cur[IDX_C7NI] - + k[5499]*y_cur[IDX_CII]*y_cur[IDX_C6I] - + k[5599]*y_cur[IDX_C6I]*y_cur[IDX_eM] + k[5747]*y_cur[IDX_C6M] - + k[5748]*y_cur[IDX_C6I] + k[5754]*y_cur[IDX_C6HI] + + k[5756]*y_cur[IDX_C7I] + k[5760]*y_cur[IDX_C7NI] + + k[5951]*y_cur[IDX_C10I] + k[5952]*y_cur[IDX_C10I] + + k[5971]*y_cur[IDX_C11I] + k[6032]*y_cur[IDX_C6M] - + k[6033]*y_cur[IDX_C6I] - k[6034]*y_cur[IDX_C6I] + + k[6042]*y_cur[IDX_C7I] + k[6049]*y_cur[IDX_C7NI] + + k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + + k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + + k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + + k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + + k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[7041]*y_cur[IDX_C6I] + + k[7223]*y_cur[IDX_GC6I] + k[7405]*y_cur[IDX_GC6I] + + k[7587]*y_cur[IDX_GC6I] + k[8674]*y_cur[IDX_GCI]*y_cur[IDX_GC5I]; + ydot[yistart + IDX_CNM] = 0.0 - k[60]*y_cur[IDX_CH3I]*y_cur[IDX_CNM] + - k[106]*y_cur[IDX_HI]*y_cur[IDX_CNM] + + k[666]*y_cur[IDX_OM]*y_cur[IDX_CNI] + + k[696]*y_cur[IDX_OHM]*y_cur[IDX_CNI] + + k[1449]*y_cur[IDX_CM]*y_cur[IDX_NOI] + + k[2368]*y_cur[IDX_HM]*y_cur[IDX_HCNI] + + k[3379]*y_cur[IDX_NI]*y_cur[IDX_C10M] + + k[3382]*y_cur[IDX_NI]*y_cur[IDX_C10HM] + + k[3384]*y_cur[IDX_NI]*y_cur[IDX_C2M] + + k[3392]*y_cur[IDX_NI]*y_cur[IDX_C3M] + + k[3395]*y_cur[IDX_NI]*y_cur[IDX_C3HM] + + k[3402]*y_cur[IDX_NI]*y_cur[IDX_C4M] + + k[3404]*y_cur[IDX_NI]*y_cur[IDX_C4HM] + + k[3410]*y_cur[IDX_NI]*y_cur[IDX_C5M] + + k[3413]*y_cur[IDX_NI]*y_cur[IDX_C5HM] + + k[3419]*y_cur[IDX_NI]*y_cur[IDX_C6M] + + k[3422]*y_cur[IDX_NI]*y_cur[IDX_C6HM] + + k[3427]*y_cur[IDX_NI]*y_cur[IDX_C7M] + + k[3431]*y_cur[IDX_NI]*y_cur[IDX_C7HM] + + k[3438]*y_cur[IDX_NI]*y_cur[IDX_C8M] + + k[3441]*y_cur[IDX_NI]*y_cur[IDX_C8HM] + + k[3444]*y_cur[IDX_NI]*y_cur[IDX_C9M] + + k[3448]*y_cur[IDX_NI]*y_cur[IDX_C9HM] + + k[3653]*y_cur[IDX_OM]*y_cur[IDX_HCNI] + + k[3795]*y_cur[IDX_OHM]*y_cur[IDX_HCNI] - + k[4656]*y_cur[IDX_CNM]*y_cur[IDX_CII] - + k[4657]*y_cur[IDX_CNM]*y_cur[IDX_C2H2II] - + k[4658]*y_cur[IDX_CNM]*y_cur[IDX_C2H3II] - + k[4659]*y_cur[IDX_CNM]*y_cur[IDX_C4H2II] - + k[4660]*y_cur[IDX_CNM]*y_cur[IDX_C4H3II] - + k[4661]*y_cur[IDX_CNM]*y_cur[IDX_C4SII] - + k[4662]*y_cur[IDX_CNM]*y_cur[IDX_CH2CCHII] - + k[4663]*y_cur[IDX_CNM]*y_cur[IDX_CH3II] - + k[4664]*y_cur[IDX_CNM]*y_cur[IDX_CNCII] - + k[4665]*y_cur[IDX_CNM]*y_cur[IDX_FeII] - + k[4666]*y_cur[IDX_CNM]*y_cur[IDX_HII] - + k[4667]*y_cur[IDX_CNM]*y_cur[IDX_H2COII] - + k[4668]*y_cur[IDX_CNM]*y_cur[IDX_H2SII] - + k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] - + k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] - + k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] - + k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] - + k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] - + k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] - + k[4675]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] - + k[4676]*y_cur[IDX_CNM]*y_cur[IDX_HeII] - + k[4677]*y_cur[IDX_CNM]*y_cur[IDX_MgII] - + k[4678]*y_cur[IDX_CNM]*y_cur[IDX_NII] - + k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] - + k[4680]*y_cur[IDX_CNM]*y_cur[IDX_NH3II] - + k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] - + k[4682]*y_cur[IDX_CNM]*y_cur[IDX_NOII] - + k[4683]*y_cur[IDX_CNM]*y_cur[IDX_NaII] - + k[4684]*y_cur[IDX_CNM]*y_cur[IDX_OII] - + k[4685]*y_cur[IDX_CNM]*y_cur[IDX_SII] - + k[4686]*y_cur[IDX_CNM]*y_cur[IDX_SOII] - + k[4687]*y_cur[IDX_CNM]*y_cur[IDX_SiII] - + k[4688]*y_cur[IDX_CNM]*y_cur[IDX_SiOII] - + k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] - + k[4690]*y_cur[IDX_CNM]*y_cur[IDX_SiSII] - k[5822]*y_cur[IDX_CNM] - + k[6133]*y_cur[IDX_CNM]; + ydot[yistart + IDX_C4I] = 0.0 + k[10]*y_cur[IDX_C2M]*y_cur[IDX_C2I] + - k[12]*y_cur[IDX_C2M]*y_cur[IDX_C4I] - + k[18]*y_cur[IDX_C3M]*y_cur[IDX_C4I] - + k[24]*y_cur[IDX_C4M]*y_cur[IDX_C4I] - + k[29]*y_cur[IDX_C5M]*y_cur[IDX_C4I] - + k[33]*y_cur[IDX_C6M]*y_cur[IDX_C4I] + + k[40]*y_cur[IDX_CI]*y_cur[IDX_C3M] - + k[338]*y_cur[IDX_HII]*y_cur[IDX_C4I] + + k[736]*y_cur[IDX_C11II]*y_cur[IDX_eM] + + k[821]*y_cur[IDX_C4HII]*y_cur[IDX_eM] + + k[848]*y_cur[IDX_C6II]*y_cur[IDX_eM] + + k[863]*y_cur[IDX_C7II]*y_cur[IDX_eM] + + k[1830]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - + k[2608]*y_cur[IDX_H3II]*y_cur[IDX_C4I] - + k[2778]*y_cur[IDX_H3OII]*y_cur[IDX_C4I] - + k[2913]*y_cur[IDX_HCOII]*y_cur[IDX_C4I] + + k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - + k[3106]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - + k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + + k[3410]*y_cur[IDX_NI]*y_cur[IDX_C5M] + + k[3425]*y_cur[IDX_NI]*y_cur[IDX_C7M] + + k[3443]*y_cur[IDX_NI]*y_cur[IDX_C9M] + + k[3704]*y_cur[IDX_OI]*y_cur[IDX_C5HII] + + k[4166]*y_cur[IDX_C4M]*y_cur[IDX_CII] + + k[4167]*y_cur[IDX_C4M]*y_cur[IDX_C2H2II] + + k[4168]*y_cur[IDX_C4M]*y_cur[IDX_C2H3II] + + k[4169]*y_cur[IDX_C4M]*y_cur[IDX_C4H2II] + + k[4170]*y_cur[IDX_C4M]*y_cur[IDX_C4H3II] + + k[4171]*y_cur[IDX_C4M]*y_cur[IDX_C4SII] + + k[4172]*y_cur[IDX_C4M]*y_cur[IDX_CH2CCHII] + + k[4173]*y_cur[IDX_C4M]*y_cur[IDX_CH3II] + + k[4174]*y_cur[IDX_C4M]*y_cur[IDX_CNCII] + + k[4175]*y_cur[IDX_C4M]*y_cur[IDX_FeII] + + k[4176]*y_cur[IDX_C4M]*y_cur[IDX_HII] + + k[4177]*y_cur[IDX_C4M]*y_cur[IDX_H2COII] + + k[4178]*y_cur[IDX_C4M]*y_cur[IDX_H2SII] + + k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] + + k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] + + k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] + + k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + + k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + + k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + + k[4185]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + + k[4186]*y_cur[IDX_C4M]*y_cur[IDX_HeII] + + k[4187]*y_cur[IDX_C4M]*y_cur[IDX_MgII] + + k[4188]*y_cur[IDX_C4M]*y_cur[IDX_NII] + + k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] + k[4190]*y_cur[IDX_C4M]*y_cur[IDX_NH3II] + k[4191]*y_cur[IDX_C4M]*y_cur[IDX_NH4II] + - k[4225]*y_cur[IDX_C4HM]*y_cur[IDX_NH3II] + - k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] + - k[4260]*y_cur[IDX_C5M]*y_cur[IDX_NH3II] + - k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] + - k[4295]*y_cur[IDX_C5HM]*y_cur[IDX_NH3II] + - k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] + - k[4330]*y_cur[IDX_C5NM]*y_cur[IDX_NH3II] + - k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] + - k[4365]*y_cur[IDX_C6M]*y_cur[IDX_NH3II] + - k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] + - k[4400]*y_cur[IDX_C6HM]*y_cur[IDX_NH3II] + - k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] + - k[4435]*y_cur[IDX_C7M]*y_cur[IDX_NH3II] + - k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] + - k[4470]*y_cur[IDX_C7HM]*y_cur[IDX_NH3II] + - k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] + - k[4505]*y_cur[IDX_C8M]*y_cur[IDX_NH3II] + - k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] + - k[4540]*y_cur[IDX_C8HM]*y_cur[IDX_NH3II] + - k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] + - k[4575]*y_cur[IDX_C9M]*y_cur[IDX_NH3II] + - k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] + - k[4610]*y_cur[IDX_C9HM]*y_cur[IDX_NH3II] + - k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] + - k[4645]*y_cur[IDX_CHM]*y_cur[IDX_NH3II] + - k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] + - k[4680]*y_cur[IDX_CNM]*y_cur[IDX_NH3II] + - k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] + - k[4716]*y_cur[IDX_HM]*y_cur[IDX_NH3II] + - k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] + - k[4751]*y_cur[IDX_OM]*y_cur[IDX_NH3II] + - k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] + - k[4786]*y_cur[IDX_O2M]*y_cur[IDX_NH3II] + - k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] + - k[4821]*y_cur[IDX_OHM]*y_cur[IDX_NH3II] + - k[4822]*y_cur[IDX_OHM]*y_cur[IDX_NH4II] + - k[4856]*y_cur[IDX_SM]*y_cur[IDX_NH3II] + - k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] - - k[5036]*y_cur[IDX_CH3I]*y_cur[IDX_NH3I] - - k[5082]*y_cur[IDX_CHI]*y_cur[IDX_NH3I] + - k[5142]*y_cur[IDX_H2I]*y_cur[IDX_NH2I] - - k[5183]*y_cur[IDX_HI]*y_cur[IDX_NH3I] + - k[5297]*y_cur[IDX_NH2I]*y_cur[IDX_CH4I] + - k[5301]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] - - k[5302]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - - k[5303]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - - k[5307]*y_cur[IDX_NHI]*y_cur[IDX_NH3I] - - k[5422]*y_cur[IDX_OI]*y_cur[IDX_NH3I] - - k[5476]*y_cur[IDX_OHI]*y_cur[IDX_NH3I] - k[5885]*y_cur[IDX_NH3I] - - k[5886]*y_cur[IDX_NH3I] - k[5887]*y_cur[IDX_NH3I] - - k[6221]*y_cur[IDX_NH3I] - k[6222]*y_cur[IDX_NH3I] - - k[6223]*y_cur[IDX_NH3I] + k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - + k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - - k[6900]*y_cur[IDX_NH3I] + k[7082]*y_cur[IDX_GNH3I] + - k[7264]*y_cur[IDX_GNH3I] + k[7446]*y_cur[IDX_GNH3I] + - k[8582]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I]; - ydot[yistart + IDX_NH3II] = 0.0 + - k[185]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + - k[253]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + - k[282]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] + - k[401]*y_cur[IDX_HII]*y_cur[IDX_NH3I] + - k[452]*y_cur[IDX_H2II]*y_cur[IDX_NH3I] + - k[524]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + - k[558]*y_cur[IDX_NII]*y_cur[IDX_NH3I] + - k[576]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + - k[582]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] - - k[592]*y_cur[IDX_NH3II]*y_cur[IDX_FeI] - - k[593]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] - - k[594]*y_cur[IDX_NH3II]*y_cur[IDX_MgI] - - k[595]*y_cur[IDX_NH3II]*y_cur[IDX_NOI] - - k[596]*y_cur[IDX_NH3II]*y_cur[IDX_NaI] - - k[597]*y_cur[IDX_NH3II]*y_cur[IDX_SiI] + - k[598]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] + + k[4192]*y_cur[IDX_C4M]*y_cur[IDX_NOII] + + k[4193]*y_cur[IDX_C4M]*y_cur[IDX_NaII] + + k[4194]*y_cur[IDX_C4M]*y_cur[IDX_OII] + + k[4195]*y_cur[IDX_C4M]*y_cur[IDX_SII] + + k[4196]*y_cur[IDX_C4M]*y_cur[IDX_SOII] + + k[4197]*y_cur[IDX_C4M]*y_cur[IDX_SiII] + + k[4198]*y_cur[IDX_C4M]*y_cur[IDX_SiOII] + + k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] + + k[4200]*y_cur[IDX_C4M]*y_cur[IDX_SiSII] + + k[4920]*y_cur[IDX_CI]*y_cur[IDX_C3HI] - + k[4923]*y_cur[IDX_CI]*y_cur[IDX_C4I] + + k[4931]*y_cur[IDX_CI]*y_cur[IDX_C6I] - + k[5235]*y_cur[IDX_NI]*y_cur[IDX_C4I] + + k[5238]*y_cur[IDX_NI]*y_cur[IDX_C5I] - + k[5361]*y_cur[IDX_OI]*y_cur[IDX_C4I] + + k[5365]*y_cur[IDX_OI]*y_cur[IDX_C5I] - + k[5497]*y_cur[IDX_CII]*y_cur[IDX_C4I] + + k[5522]*y_cur[IDX_CI]*y_cur[IDX_C3I] - + k[5594]*y_cur[IDX_C4I]*y_cur[IDX_eM] + k[5726]*y_cur[IDX_C4M] - + k[5727]*y_cur[IDX_C4I] - k[5728]*y_cur[IDX_C4I] + + k[5732]*y_cur[IDX_C4HI] + k[5738]*y_cur[IDX_C5I] + + k[5746]*y_cur[IDX_C5NI] + k[5753]*y_cur[IDX_C6HI] + + k[5952]*y_cur[IDX_C10I] + k[5972]*y_cur[IDX_C11I] + + k[6010]*y_cur[IDX_C4M] - k[6011]*y_cur[IDX_C4I] - + k[6012]*y_cur[IDX_C4I] + k[6017]*y_cur[IDX_C4HI] + + k[6019]*y_cur[IDX_C4NI] + k[6031]*y_cur[IDX_C5NI] + + k[6040]*y_cur[IDX_C6HI] + k[6266]*y_cur[IDX_SiC4I] + + k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM] + + k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + + k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + + k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[6995]*y_cur[IDX_C4I] + + k[7177]*y_cur[IDX_GC4I] + k[7359]*y_cur[IDX_GC4I] + + k[7541]*y_cur[IDX_GC4I] + k[8667]*y_cur[IDX_GCI]*y_cur[IDX_GC3I]; + ydot[yistart + IDX_SOI] = 0.0 + k[132]*y_cur[IDX_OI]*y_cur[IDX_SM] - + k[193]*y_cur[IDX_CII]*y_cur[IDX_SOI] - + k[417]*y_cur[IDX_HII]*y_cur[IDX_SOI] + + k[539]*y_cur[IDX_MgI]*y_cur[IDX_SOII] + + k[615]*y_cur[IDX_NH3I]*y_cur[IDX_SOII] + + k[644]*y_cur[IDX_NaI]*y_cur[IDX_SOII] + + k[711]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[712]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] + + k[713]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] + + k[714]*y_cur[IDX_SOII]*y_cur[IDX_CH3OCH3I] + + k[715]*y_cur[IDX_SOII]*y_cur[IDX_FeI] + + k[1141]*y_cur[IDX_HSOII]*y_cur[IDX_eM] + + k[1143]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + + k[1144]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + + k[1177]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + + k[1222]*y_cur[IDX_SO2II]*y_cur[IDX_eM] - + k[1428]*y_cur[IDX_CII]*y_cur[IDX_SOI] - + k[1429]*y_cur[IDX_CII]*y_cur[IDX_SOI] - + k[1430]*y_cur[IDX_CII]*y_cur[IDX_SOI] - + k[2096]*y_cur[IDX_CH3II]*y_cur[IDX_SOI] - + k[2742]*y_cur[IDX_H3II]*y_cur[IDX_SOI] - + k[2990]*y_cur[IDX_HCOII]*y_cur[IDX_SOI] - + k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] - + k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + + k[3676]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + + k[3842]*y_cur[IDX_SI]*y_cur[IDX_SiOII] + + k[3916]*y_cur[IDX_CM]*y_cur[IDX_SOII] + + k[3951]*y_cur[IDX_C10M]*y_cur[IDX_SOII] + + k[3986]*y_cur[IDX_C10HM]*y_cur[IDX_SOII] + + k[4021]*y_cur[IDX_C2M]*y_cur[IDX_SOII] + + k[4056]*y_cur[IDX_C2HM]*y_cur[IDX_SOII] + + k[4091]*y_cur[IDX_C3M]*y_cur[IDX_SOII] + + k[4126]*y_cur[IDX_C3HM]*y_cur[IDX_SOII] + + k[4161]*y_cur[IDX_C3NM]*y_cur[IDX_SOII] + + k[4196]*y_cur[IDX_C4M]*y_cur[IDX_SOII] + + k[4231]*y_cur[IDX_C4HM]*y_cur[IDX_SOII] + + k[4266]*y_cur[IDX_C5M]*y_cur[IDX_SOII] + + k[4301]*y_cur[IDX_C5HM]*y_cur[IDX_SOII] + + k[4336]*y_cur[IDX_C5NM]*y_cur[IDX_SOII] + + k[4371]*y_cur[IDX_C6M]*y_cur[IDX_SOII] + + k[4406]*y_cur[IDX_C6HM]*y_cur[IDX_SOII] + + k[4441]*y_cur[IDX_C7M]*y_cur[IDX_SOII] + + k[4476]*y_cur[IDX_C7HM]*y_cur[IDX_SOII] + + k[4511]*y_cur[IDX_C8M]*y_cur[IDX_SOII] + + k[4546]*y_cur[IDX_C8HM]*y_cur[IDX_SOII] + + k[4581]*y_cur[IDX_C9M]*y_cur[IDX_SOII] + + k[4616]*y_cur[IDX_C9HM]*y_cur[IDX_SOII] + + k[4651]*y_cur[IDX_CHM]*y_cur[IDX_SOII] + + k[4686]*y_cur[IDX_CNM]*y_cur[IDX_SOII] + + k[4722]*y_cur[IDX_HM]*y_cur[IDX_SOII] + + k[4757]*y_cur[IDX_OM]*y_cur[IDX_SOII] + + k[4792]*y_cur[IDX_O2M]*y_cur[IDX_SOII] + + k[4827]*y_cur[IDX_OHM]*y_cur[IDX_SOII] + + k[4862]*y_cur[IDX_SM]*y_cur[IDX_SOII] + + k[4985]*y_cur[IDX_CI]*y_cur[IDX_SO2I] - + k[4986]*y_cur[IDX_CI]*y_cur[IDX_SOI] - + k[4987]*y_cur[IDX_CI]*y_cur[IDX_SOI] - + k[5102]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - + k[5103]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - + k[5200]*y_cur[IDX_HI]*y_cur[IDX_SOI] - + k[5201]*y_cur[IDX_HI]*y_cur[IDX_SOI] - + k[5290]*y_cur[IDX_NI]*y_cur[IDX_SOI] - + k[5291]*y_cur[IDX_NI]*y_cur[IDX_SOI] + + k[5334]*y_cur[IDX_NOI]*y_cur[IDX_SI] + + k[5337]*y_cur[IDX_O2I]*y_cur[IDX_SI] - + k[5338]*y_cur[IDX_O2I]*y_cur[IDX_SOI] + + k[5393]*y_cur[IDX_OI]*y_cur[IDX_CSI] + + k[5416]*y_cur[IDX_OI]*y_cur[IDX_HSI] + + k[5426]*y_cur[IDX_OI]*y_cur[IDX_NSI] + + k[5431]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + + k[5437]*y_cur[IDX_OI]*y_cur[IDX_S2I] + + k[5438]*y_cur[IDX_OI]*y_cur[IDX_SO2I] - + k[5439]*y_cur[IDX_OI]*y_cur[IDX_SOI] + + k[5480]*y_cur[IDX_OHI]*y_cur[IDX_SI] - + k[5481]*y_cur[IDX_OHI]*y_cur[IDX_SOI] + + k[5489]*y_cur[IDX_SI]*y_cur[IDX_SO2I] + + k[5489]*y_cur[IDX_SI]*y_cur[IDX_SO2I] - + k[5490]*y_cur[IDX_SI]*y_cur[IDX_SOI] - + k[5583]*y_cur[IDX_OI]*y_cur[IDX_SOI] + k[5914]*y_cur[IDX_SO2I] - + k[5915]*y_cur[IDX_SOI] - k[5916]*y_cur[IDX_SOI] + + k[6256]*y_cur[IDX_SO2I] - k[6257]*y_cur[IDX_SOI] - + k[6258]*y_cur[IDX_SOI] + k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM] + + k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[6751]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + + k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + + k[6757]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - k[6994]*y_cur[IDX_SOI] + + k[7176]*y_cur[IDX_GSOI] + k[7358]*y_cur[IDX_GSOI] + + k[7540]*y_cur[IDX_GSOI] + k[8694]*y_cur[IDX_GOI]*y_cur[IDX_GSI]; + ydot[yistart + IDX_C7HI] = 0.0 + k[48]*y_cur[IDX_CI]*y_cur[IDX_C6HM] + + k[99]*y_cur[IDX_HI]*y_cur[IDX_C7M] - + k[351]*y_cur[IDX_HII]*y_cur[IDX_C7HI] + + k[731]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + + k[869]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + + k[871]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + + k[873]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + + k[879]*y_cur[IDX_C8HII]*y_cur[IDX_eM] - + k[1334]*y_cur[IDX_CII]*y_cur[IDX_C7HI] - + k[1501]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] - + k[1502]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] - + k[1605]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - + k[1606]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - + k[1607]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - + k[1665]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] - + k[1666]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] - + k[2058]*y_cur[IDX_CH3II]*y_cur[IDX_C7HI] - + k[2309]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - + k[2623]*y_cur[IDX_H3II]*y_cur[IDX_C7HI] - + k[2928]*y_cur[IDX_HCOII]*y_cur[IDX_C7HI] - + k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] - + k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + + k[3381]*y_cur[IDX_NI]*y_cur[IDX_C10HM] + + k[3441]*y_cur[IDX_NI]*y_cur[IDX_C8HM] + + k[3719]*y_cur[IDX_OI]*y_cur[IDX_C8H2II] + + k[4446]*y_cur[IDX_C7HM]*y_cur[IDX_CII] + + k[4447]*y_cur[IDX_C7HM]*y_cur[IDX_C2H2II] + + k[4448]*y_cur[IDX_C7HM]*y_cur[IDX_C2H3II] + + k[4449]*y_cur[IDX_C7HM]*y_cur[IDX_C4H2II] + + k[4450]*y_cur[IDX_C7HM]*y_cur[IDX_C4H3II] + + k[4451]*y_cur[IDX_C7HM]*y_cur[IDX_C4SII] + + k[4452]*y_cur[IDX_C7HM]*y_cur[IDX_CH2CCHII] + + k[4453]*y_cur[IDX_C7HM]*y_cur[IDX_CH3II] + + k[4454]*y_cur[IDX_C7HM]*y_cur[IDX_CNCII] + + k[4455]*y_cur[IDX_C7HM]*y_cur[IDX_FeII] + + k[4456]*y_cur[IDX_C7HM]*y_cur[IDX_HII] + + k[4457]*y_cur[IDX_C7HM]*y_cur[IDX_H2COII] + + k[4458]*y_cur[IDX_C7HM]*y_cur[IDX_H2SII] + + k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] + + k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] + + k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] + + k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + + k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + + k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + + k[4465]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + + k[4466]*y_cur[IDX_C7HM]*y_cur[IDX_HeII] + + k[4467]*y_cur[IDX_C7HM]*y_cur[IDX_MgII] + + k[4468]*y_cur[IDX_C7HM]*y_cur[IDX_NII] + + k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] + + k[4470]*y_cur[IDX_C7HM]*y_cur[IDX_NH3II] + + k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] + + k[4472]*y_cur[IDX_C7HM]*y_cur[IDX_NOII] + + k[4473]*y_cur[IDX_C7HM]*y_cur[IDX_NaII] + + k[4474]*y_cur[IDX_C7HM]*y_cur[IDX_OII] + + k[4475]*y_cur[IDX_C7HM]*y_cur[IDX_SII] + + k[4476]*y_cur[IDX_C7HM]*y_cur[IDX_SOII] + + k[4477]*y_cur[IDX_C7HM]*y_cur[IDX_SiII] + + k[4478]*y_cur[IDX_C7HM]*y_cur[IDX_SiOII] + + k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] + + k[4480]*y_cur[IDX_C7HM]*y_cur[IDX_SiSII] + + k[4932]*y_cur[IDX_CI]*y_cur[IDX_C6H2I] - + k[4936]*y_cur[IDX_CI]*y_cur[IDX_C7HI] - + k[5246]*y_cur[IDX_NI]*y_cur[IDX_C7HI] + + k[5249]*y_cur[IDX_NI]*y_cur[IDX_C8HI] - + k[5371]*y_cur[IDX_OI]*y_cur[IDX_C7HI] + + k[5374]*y_cur[IDX_OI]*y_cur[IDX_C8HI] - + k[5602]*y_cur[IDX_C7HI]*y_cur[IDX_eM] + k[5757]*y_cur[IDX_C7HM] + + k[5758]*y_cur[IDX_C7H2I] - k[5759]*y_cur[IDX_C7HI] + + k[5960]*y_cur[IDX_C10H2I] + k[5966]*y_cur[IDX_C10HI] + + k[6044]*y_cur[IDX_C7HM] + k[6046]*y_cur[IDX_C7H2I] - + k[6047]*y_cur[IDX_C7HI] - k[6048]*y_cur[IDX_C7HI] + + k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + + k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + + k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + + k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + + k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - + k[7051]*y_cur[IDX_C7HI] + k[7233]*y_cur[IDX_GC7HI] + + k[7415]*y_cur[IDX_GC7HI] + k[7597]*y_cur[IDX_GC7HI] + + k[8641]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] + + k[8677]*y_cur[IDX_GCI]*y_cur[IDX_GC6HI] + + k[8730]*y_cur[IDX_GCHI]*y_cur[IDX_GC6I]; + ydot[yistart + IDX_C2H4II] = 0.0 + + k[148]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[215]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - + k[231]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] - + k[232]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - + k[233]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + + k[234]*y_cur[IDX_C2H4I]*y_cur[IDX_C2N2II] + + k[235]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + + k[236]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + + k[237]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H6II] + + k[238]*y_cur[IDX_C2H4I]*y_cur[IDX_CO2II] + + k[239]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] + + k[240]*y_cur[IDX_C2H4I]*y_cur[IDX_O2II] + + k[278]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] + + k[326]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + + k[438]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + + k[464]*y_cur[IDX_H2OII]*y_cur[IDX_C2H4I] + + k[510]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - k[599]*y_cur[IDX_NH3I]*y_cur[IDX_C2H4II] + - k[600]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] + - k[601]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + - k[602]*y_cur[IDX_NH3I]*y_cur[IDX_COII] + - k[603]*y_cur[IDX_NH3I]*y_cur[IDX_CO2II] + - k[604]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] + - k[605]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] + - k[606]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] + - k[607]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NII] + - k[608]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] + - k[609]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] + - k[610]*y_cur[IDX_NH3I]*y_cur[IDX_N2II] + - k[611]*y_cur[IDX_NH3I]*y_cur[IDX_O2II] + - k[612]*y_cur[IDX_NH3I]*y_cur[IDX_OCSII] + - k[613]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + - k[614]*y_cur[IDX_NH3I]*y_cur[IDX_SII] + - k[615]*y_cur[IDX_NH3I]*y_cur[IDX_SOII] + - k[661]*y_cur[IDX_OII]*y_cur[IDX_NH3I] + - k[692]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] - - k[1163]*y_cur[IDX_NH3II]*y_cur[IDX_eM] - - k[1164]*y_cur[IDX_NH3II]*y_cur[IDX_eM] - - k[2013]*y_cur[IDX_CH2I]*y_cur[IDX_NH3II] - - k[2207]*y_cur[IDX_CH4I]*y_cur[IDX_NH3II] - - k[2260]*y_cur[IDX_CHI]*y_cur[IDX_NH3II] + - k[2463]*y_cur[IDX_H2I]*y_cur[IDX_NH2II] - - k[2464]*y_cur[IDX_H2I]*y_cur[IDX_NH3II] + - k[2721]*y_cur[IDX_H3II]*y_cur[IDX_NH2I] + - k[3491]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + - k[3497]*y_cur[IDX_NHII]*y_cur[IDX_NH2I] + - k[3511]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] + - k[3513]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + - k[3517]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + - k[3522]*y_cur[IDX_NH2II]*y_cur[IDX_NH2I] + - k[3529]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] + - k[3531]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + - k[3533]*y_cur[IDX_NH2I]*y_cur[IDX_CH5II] + - k[3535]*y_cur[IDX_NH2I]*y_cur[IDX_H2COII] + - k[3536]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] + - k[3537]*y_cur[IDX_NH2I]*y_cur[IDX_H3COII] + - k[3538]*y_cur[IDX_NH2I]*y_cur[IDX_H3OII] + - k[3539]*y_cur[IDX_NH2I]*y_cur[IDX_HCNII] + - k[3540]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + - k[3541]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + - k[3542]*y_cur[IDX_NH2I]*y_cur[IDX_HCOII] + - k[3543]*y_cur[IDX_NH2I]*y_cur[IDX_HNOII] + + k[648]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - + k[757]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - + k[758]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - + k[759]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - + k[760]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - + k[761]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - + k[762]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] - + k[763]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[1369]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1511]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - + k[1536]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] - + k[1537]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] - + k[1628]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + + k[1644]*y_cur[IDX_C2H3I]*y_cur[IDX_HCOII] - + k[1647]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] - + k[1648]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] - + k[1649]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] - + k[1650]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] - + k[1651]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - + k[1652]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - + k[1653]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] - + k[1654]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] - + k[1655]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] - + k[1656]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] - + k[1657]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - + k[1658]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - + k[1659]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] - + k[1660]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] - + k[1661]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] - + k[1662]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] - + k[1663]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] - + k[1664]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] - + k[1665]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] - + k[1666]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] - + k[1667]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - + k[1668]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - + k[1669]*y_cur[IDX_C2H4II]*y_cur[IDX_CH3CCHI] - + k[1670]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - + k[1671]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] - + k[1672]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] - + k[1673]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] - + k[1674]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - + k[1675]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - + k[1676]*y_cur[IDX_C2H4II]*y_cur[IDX_HC3NI] - + k[1677]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] - + k[1678]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] - + k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] - + k[1680]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - + k[1681]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - + k[1682]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[1683]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[1684]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - + k[1729]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - + k[1730]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - + k[1853]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - + k[1854]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] + + k[1942]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + + k[1976]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + + k[2298]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + + k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + + k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + + k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + + k[2588]*y_cur[IDX_H3II]*y_cur[IDX_C2H3I] + + k[2767]*y_cur[IDX_H3OII]*y_cur[IDX_C2H3I] - + k[2828]*y_cur[IDX_HI]*y_cur[IDX_C2H4II] + + k[2829]*y_cur[IDX_HI]*y_cur[IDX_C2H5II] + + k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + + k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - + k[3391]*y_cur[IDX_NI]*y_cur[IDX_C2H4II] + + k[3400]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + + k[3658]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - + k[3691]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] - + k[3692]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] + + k[3771]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + + k[5549]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] + k[5701]*y_cur[IDX_C2H4I] + + k[5986]*y_cur[IDX_C2H4I] - + k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4H3II] = 0.0 + + k[155]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + + k[339]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] - + k[824]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] - + k[825]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + + k[1355]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] + + k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1480]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] + + k[1481]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + + k[1535]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H3II] + + k[1621]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - + k[1635]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] - + k[1636]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + + k[1649]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] + + k[1667]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + + k[1672]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] + + k[1694]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] + + k[1728]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + + k[1729]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - + k[1737]*y_cur[IDX_C2HI]*y_cur[IDX_C4H3II] + + k[1772]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1778]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1789]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H3II] - + k[1825]*y_cur[IDX_C3HI]*y_cur[IDX_C4H3II] - + k[1839]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] - + k[1840]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] - + k[1841]*y_cur[IDX_C4H3II]*y_cur[IDX_C5HI] - + k[1844]*y_cur[IDX_C4HI]*y_cur[IDX_C4H3II] + + k[1860]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] + + k[1861]*y_cur[IDX_CI]*y_cur[IDX_C3H5II] - + k[1865]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - + k[1866]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - + k[2035]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] - + k[2036]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + + k[2050]*y_cur[IDX_CH3II]*y_cur[IDX_C3H2I] + + k[2076]*y_cur[IDX_CH3II]*y_cur[IDX_H2CCCI] - + k[2108]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H3II] - + k[2124]*y_cur[IDX_CH3OHI]*y_cur[IDX_C4H3II] + + k[2159]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + + k[2161]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] - + k[2171]*y_cur[IDX_CH4I]*y_cur[IDX_C4H3II] + + k[2173]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2480]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H3II] + + k[2690]*y_cur[IDX_H3II]*y_cur[IDX_C4H2I] + + k[2764]*y_cur[IDX_H3COII]*y_cur[IDX_C4H2I] + + k[2805]*y_cur[IDX_H3OII]*y_cur[IDX_C4H2I] - + k[2850]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] + + k[2965]*y_cur[IDX_HCOII]*y_cur[IDX_C4H2I] - + k[3837]*y_cur[IDX_SI]*y_cur[IDX_C4H3II] - + k[3890]*y_cur[IDX_CM]*y_cur[IDX_C4H3II] - + k[3925]*y_cur[IDX_C10M]*y_cur[IDX_C4H3II] - + k[3960]*y_cur[IDX_C10HM]*y_cur[IDX_C4H3II] - + k[3995]*y_cur[IDX_C2M]*y_cur[IDX_C4H3II] - + k[4030]*y_cur[IDX_C2HM]*y_cur[IDX_C4H3II] - + k[4065]*y_cur[IDX_C3M]*y_cur[IDX_C4H3II] - + k[4100]*y_cur[IDX_C3HM]*y_cur[IDX_C4H3II] - + k[4135]*y_cur[IDX_C3NM]*y_cur[IDX_C4H3II] - + k[4170]*y_cur[IDX_C4M]*y_cur[IDX_C4H3II] - + k[4205]*y_cur[IDX_C4HM]*y_cur[IDX_C4H3II] - + k[4240]*y_cur[IDX_C5M]*y_cur[IDX_C4H3II] - + k[4275]*y_cur[IDX_C5HM]*y_cur[IDX_C4H3II] - + k[4310]*y_cur[IDX_C5NM]*y_cur[IDX_C4H3II] - + k[4345]*y_cur[IDX_C6M]*y_cur[IDX_C4H3II] - + k[4380]*y_cur[IDX_C6HM]*y_cur[IDX_C4H3II] - + k[4415]*y_cur[IDX_C7M]*y_cur[IDX_C4H3II] - + k[4450]*y_cur[IDX_C7HM]*y_cur[IDX_C4H3II] - + k[4485]*y_cur[IDX_C8M]*y_cur[IDX_C4H3II] - + k[4520]*y_cur[IDX_C8HM]*y_cur[IDX_C4H3II] - + k[4555]*y_cur[IDX_C9M]*y_cur[IDX_C4H3II] - + k[4590]*y_cur[IDX_C9HM]*y_cur[IDX_C4H3II] - + k[4625]*y_cur[IDX_CHM]*y_cur[IDX_C4H3II] - + k[4660]*y_cur[IDX_CNM]*y_cur[IDX_C4H3II] - + k[4695]*y_cur[IDX_HM]*y_cur[IDX_C4H3II] - + k[4731]*y_cur[IDX_OM]*y_cur[IDX_C4H3II] - + k[4766]*y_cur[IDX_O2M]*y_cur[IDX_C4H3II] - + k[4801]*y_cur[IDX_OHM]*y_cur[IDX_C4H3II] - + k[4836]*y_cur[IDX_SM]*y_cur[IDX_C4H3II] - + k[5520]*y_cur[IDX_C4H3II]*y_cur[IDX_C2H2I] + + k[5570]*y_cur[IDX_HI]*y_cur[IDX_C4H2II] - + k[5571]*y_cur[IDX_HI]*y_cur[IDX_C4H3II] - + k[5576]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] - + k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] - + k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_N2HII] = 0.0 - + k[1151]*y_cur[IDX_N2HII]*y_cur[IDX_eM] - + k[1152]*y_cur[IDX_N2HII]*y_cur[IDX_eM] - + k[1153]*y_cur[IDX_N2HII]*y_cur[IDX_eM] - + k[1154]*y_cur[IDX_N2HII]*y_cur[IDX_eM] - + k[1461]*y_cur[IDX_C2I]*y_cur[IDX_N2HII] - + k[1568]*y_cur[IDX_C2H2I]*y_cur[IDX_N2HII] - + k[1748]*y_cur[IDX_C2HI]*y_cur[IDX_N2HII] - + k[1909]*y_cur[IDX_CI]*y_cur[IDX_N2HII] - + k[2010]*y_cur[IDX_CH2I]*y_cur[IDX_N2HII] - + k[2206]*y_cur[IDX_CH4I]*y_cur[IDX_N2HII] - + k[2257]*y_cur[IDX_CHI]*y_cur[IDX_N2HII] - + k[2288]*y_cur[IDX_COI]*y_cur[IDX_N2HII] + + k[2354]*y_cur[IDX_HII]*y_cur[IDX_N2OI] + + k[2391]*y_cur[IDX_H2II]*y_cur[IDX_N2I] + + k[2460]*y_cur[IDX_H2I]*y_cur[IDX_N2II] + + k[2557]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] - + k[2558]*y_cur[IDX_H2OI]*y_cur[IDX_N2HII] + + k[2718]*y_cur[IDX_H3II]*y_cur[IDX_N2I] - + k[2881]*y_cur[IDX_HCNI]*y_cur[IDX_N2HII] - + k[3009]*y_cur[IDX_HCOI]*y_cur[IDX_N2HII] - + k[3035]*y_cur[IDX_HNC3I]*y_cur[IDX_N2HII] - + k[3044]*y_cur[IDX_HNCI]*y_cur[IDX_N2HII] + + k[3353]*y_cur[IDX_NII]*y_cur[IDX_NH3I] + + k[3364]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + + k[3366]*y_cur[IDX_N2I]*y_cur[IDX_HNOII] + + k[3367]*y_cur[IDX_N2I]*y_cur[IDX_O2HII] - + k[3368]*y_cur[IDX_N2HII]*y_cur[IDX_C6H6I] - + k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - + k[3370]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] - + k[3371]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CNI] - + k[3372]*y_cur[IDX_N2HII]*y_cur[IDX_CO2I] - + k[3373]*y_cur[IDX_N2HII]*y_cur[IDX_H2COI] - + k[3374]*y_cur[IDX_N2HII]*y_cur[IDX_HC3NI] - + k[3375]*y_cur[IDX_N2HII]*y_cur[IDX_NCCNI] - + k[3376]*y_cur[IDX_N2HII]*y_cur[IDX_SI] + + k[3464]*y_cur[IDX_NI]*y_cur[IDX_NH2II] + + k[3496]*y_cur[IDX_NHII]*y_cur[IDX_N2I] + + k[3500]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - k[3544]*y_cur[IDX_NH2I]*y_cur[IDX_N2HII] - - k[3545]*y_cur[IDX_NH2I]*y_cur[IDX_NH3II] + - k[3546]*y_cur[IDX_NH2I]*y_cur[IDX_O2HII] + - k[3547]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] - - k[3548]*y_cur[IDX_NH3II]*y_cur[IDX_C2I] - - k[3549]*y_cur[IDX_NH3II]*y_cur[IDX_H2COI] - - k[3550]*y_cur[IDX_NH3II]*y_cur[IDX_H2OI] - - k[3551]*y_cur[IDX_NH3II]*y_cur[IDX_H2SI] - - k[3552]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] - - k[3553]*y_cur[IDX_NH3II]*y_cur[IDX_NH3I] + - k[3617]*y_cur[IDX_NHI]*y_cur[IDX_NH2II] - - k[3618]*y_cur[IDX_NHI]*y_cur[IDX_NH3II] - - k[3747]*y_cur[IDX_OI]*y_cur[IDX_NH3II] - - k[3805]*y_cur[IDX_OHI]*y_cur[IDX_NH3II] - - k[3910]*y_cur[IDX_CM]*y_cur[IDX_NH3II] - - k[3945]*y_cur[IDX_C10M]*y_cur[IDX_NH3II] - - k[3980]*y_cur[IDX_C10HM]*y_cur[IDX_NH3II] - - k[4015]*y_cur[IDX_C2M]*y_cur[IDX_NH3II] - - k[4050]*y_cur[IDX_C2HM]*y_cur[IDX_NH3II] - - k[4085]*y_cur[IDX_C3M]*y_cur[IDX_NH3II] - - k[4120]*y_cur[IDX_C3HM]*y_cur[IDX_NH3II] - - k[4155]*y_cur[IDX_C3NM]*y_cur[IDX_NH3II] - - k[4190]*y_cur[IDX_C4M]*y_cur[IDX_NH3II] - - k[4225]*y_cur[IDX_C4HM]*y_cur[IDX_NH3II] - - k[4260]*y_cur[IDX_C5M]*y_cur[IDX_NH3II] - - k[4295]*y_cur[IDX_C5HM]*y_cur[IDX_NH3II] - - k[4330]*y_cur[IDX_C5NM]*y_cur[IDX_NH3II] - - k[4365]*y_cur[IDX_C6M]*y_cur[IDX_NH3II] - - k[4400]*y_cur[IDX_C6HM]*y_cur[IDX_NH3II] - - k[4435]*y_cur[IDX_C7M]*y_cur[IDX_NH3II] - - k[4470]*y_cur[IDX_C7HM]*y_cur[IDX_NH3II] - - k[4505]*y_cur[IDX_C8M]*y_cur[IDX_NH3II] - - k[4540]*y_cur[IDX_C8HM]*y_cur[IDX_NH3II] - - k[4575]*y_cur[IDX_C9M]*y_cur[IDX_NH3II] - - k[4610]*y_cur[IDX_C9HM]*y_cur[IDX_NH3II] - - k[4645]*y_cur[IDX_CHM]*y_cur[IDX_NH3II] - - k[4680]*y_cur[IDX_CNM]*y_cur[IDX_NH3II] - - k[4716]*y_cur[IDX_HM]*y_cur[IDX_NH3II] - - k[4751]*y_cur[IDX_OM]*y_cur[IDX_NH3II] - - k[4786]*y_cur[IDX_O2M]*y_cur[IDX_NH3II] - - k[4821]*y_cur[IDX_OHM]*y_cur[IDX_NH3II] - - k[4856]*y_cur[IDX_SM]*y_cur[IDX_NH3II] + k[5886]*y_cur[IDX_NH3I] + - k[6222]*y_cur[IDX_NH3I] - k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] - - k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NH4II] = 0.0 - - k[1165]*y_cur[IDX_NH4II]*y_cur[IDX_eM] - - k[1166]*y_cur[IDX_NH4II]*y_cur[IDX_eM] - - k[1167]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + - k[1818]*y_cur[IDX_C3H7II]*y_cur[IDX_NH3I] - - k[1911]*y_cur[IDX_CI]*y_cur[IDX_NH4II] + - k[1964]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + - k[1989]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] + - k[2088]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] + - k[2121]*y_cur[IDX_CH3OH2II]*y_cur[IDX_NH3I] + - k[2144]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] + - k[2207]*y_cur[IDX_CH4I]*y_cur[IDX_NH3II] + - k[2260]*y_cur[IDX_CHI]*y_cur[IDX_NH3II] + - k[2464]*y_cur[IDX_H2I]*y_cur[IDX_NH3II] + - k[2723]*y_cur[IDX_H3II]*y_cur[IDX_NH3I] + - k[3498]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + - k[3514]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + - k[3518]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + - k[3523]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] + - k[3545]*y_cur[IDX_NH2I]*y_cur[IDX_NH3II] + - k[3549]*y_cur[IDX_NH3II]*y_cur[IDX_H2COI] + - k[3550]*y_cur[IDX_NH3II]*y_cur[IDX_H2OI] + - k[3551]*y_cur[IDX_NH3II]*y_cur[IDX_H2SI] + - k[3552]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + - k[3553]*y_cur[IDX_NH3II]*y_cur[IDX_NH3I] + - k[3554]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] + - k[3556]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] + - k[3557]*y_cur[IDX_NH3I]*y_cur[IDX_C2H3II] + - k[3558]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5II] + - k[3559]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5OH2II] + - k[3560]*y_cur[IDX_NH3I]*y_cur[IDX_C2H7II] + - k[3562]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] + - k[3565]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] + - k[3567]*y_cur[IDX_NH3I]*y_cur[IDX_CH2CHCNHII] + - k[3568]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + - k[3569]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] + - k[3571]*y_cur[IDX_NH3I]*y_cur[IDX_CH5II] + - k[3574]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] + - k[3575]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] + - k[3576]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] + - k[3577]*y_cur[IDX_NH3I]*y_cur[IDX_H3COII] + - k[3578]*y_cur[IDX_NH3I]*y_cur[IDX_H3OII] + - k[3579]*y_cur[IDX_NH3I]*y_cur[IDX_H3SII] + - k[3580]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NHII] + - k[3582]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + - k[3583]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + - k[3584]*y_cur[IDX_NH3I]*y_cur[IDX_HCOII] + - k[3585]*y_cur[IDX_NH3I]*y_cur[IDX_HCO2II] + - k[3586]*y_cur[IDX_NH3I]*y_cur[IDX_HCOOH2II] + - k[3587]*y_cur[IDX_NH3I]*y_cur[IDX_HCSII] + - k[3588]*y_cur[IDX_NH3I]*y_cur[IDX_HNOII] + - k[3589]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] + - k[3590]*y_cur[IDX_NH3I]*y_cur[IDX_HSO2II] + - k[3591]*y_cur[IDX_NH3I]*y_cur[IDX_HSiSII] + - k[3592]*y_cur[IDX_NH3I]*y_cur[IDX_N2HII] + - k[3593]*y_cur[IDX_NH3I]*y_cur[IDX_NCCNHII] + - k[3594]*y_cur[IDX_NH3I]*y_cur[IDX_O2HII] + - k[3596]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + - k[3599]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] + - k[3601]*y_cur[IDX_NH3I]*y_cur[IDX_PH3II] + - k[3603]*y_cur[IDX_NH3I]*y_cur[IDX_SiHII] + - k[3604]*y_cur[IDX_NH3I]*y_cur[IDX_SiOHII] + - k[3618]*y_cur[IDX_NHI]*y_cur[IDX_NH3II] + - k[3786]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] + - k[3805]*y_cur[IDX_OHI]*y_cur[IDX_NH3II] - - k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] - - k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] - - k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] - - k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] - - k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] - - k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] - - k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] - - k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] - - k[4191]*y_cur[IDX_C4M]*y_cur[IDX_NH4II] - - k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] - - k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] - - k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] - - k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] - - k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] - - k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] - - k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] - - k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] - - k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] - - k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] - - k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] - - k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] - - k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] - - k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] - - k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] - - k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] - - k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] - - k[4822]*y_cur[IDX_OHM]*y_cur[IDX_NH4II] - - k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] - - k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - - k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - - k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NOI] = 0.0 + k[122]*y_cur[IDX_NI]*y_cur[IDX_OM] - - k[125]*y_cur[IDX_OM]*y_cur[IDX_NOI] - - k[186]*y_cur[IDX_CII]*y_cur[IDX_NOI] - - k[206]*y_cur[IDX_C2II]*y_cur[IDX_NOI] - - k[212]*y_cur[IDX_C2HII]*y_cur[IDX_NOI] - - k[226]*y_cur[IDX_C2H2II]*y_cur[IDX_NOI] - - k[254]*y_cur[IDX_CHII]*y_cur[IDX_NOI] - - k[258]*y_cur[IDX_CH2II]*y_cur[IDX_NOI] - - k[274]*y_cur[IDX_CH3II]*y_cur[IDX_NOI] - - k[303]*y_cur[IDX_CNII]*y_cur[IDX_NOI] - - k[311]*y_cur[IDX_COII]*y_cur[IDX_NOI] - - k[403]*y_cur[IDX_HII]*y_cur[IDX_NOI] - - k[454]*y_cur[IDX_H2II]*y_cur[IDX_NOI] - - k[472]*y_cur[IDX_H2OII]*y_cur[IDX_NOI] - - k[494]*y_cur[IDX_HCNII]*y_cur[IDX_NOI] + - k[536]*y_cur[IDX_MgI]*y_cur[IDX_NOII] - + k[3592]*y_cur[IDX_NH3I]*y_cur[IDX_N2HII] - + k[3616]*y_cur[IDX_NHI]*y_cur[IDX_N2HII] - + k[3745]*y_cur[IDX_OI]*y_cur[IDX_N2HII] + + k[3785]*y_cur[IDX_OHII]*y_cur[IDX_N2I] - + k[3804]*y_cur[IDX_OHI]*y_cur[IDX_N2HII] - + k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] - + k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] - + k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] - + k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] - + k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] - + k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] - + k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] - + k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] - + k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] - + k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] - + k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] - + k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] - + k[4329]*y_cur[IDX_C5NM]*y_cur[IDX_N2HII] - + k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] - + k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] - + k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] - + k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] - + k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] - + k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] - + k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] - + k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] - + k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] - + k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] - + k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] - + k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] - + k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] - + k[4820]*y_cur[IDX_OHM]*y_cur[IDX_N2HII] - + k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] - + k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] - + k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2CCHI] = 0.0 - + k[162]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - + k[219]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - + k[232]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - + k[360]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] + + k[800]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[803]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + + k[805]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] - + k[1346]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - + k[1347]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - + k[1507]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - + k[1508]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - + k[1608]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - + k[1609]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - + k[1610]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - + k[1667]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - + k[1668]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] - + k[1776]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCHI] - + k[1805]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] - + k[1806]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + + k[1811]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] - + k[2029]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] - + k[2030]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] - + k[2032]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4HII] - + k[2033]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] - + k[2034]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] - + k[2035]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] - + k[2036]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] - + k[2037]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] - + k[2038]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] - + k[2039]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] - + k[2040]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] - + k[2061]*y_cur[IDX_CH3II]*y_cur[IDX_CH2CCHI] - + k[2315]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] - + k[2636]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCHI] - + k[2785]*y_cur[IDX_H3OII]*y_cur[IDX_CH2CCHI] - + k[2938]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CCHI] - + k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - + k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - + k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - + k[3863]*y_cur[IDX_SiII]*y_cur[IDX_CH2CCHI] + + k[3892]*y_cur[IDX_CM]*y_cur[IDX_CH2CCHII] + + k[3927]*y_cur[IDX_C10M]*y_cur[IDX_CH2CCHII] + + k[3962]*y_cur[IDX_C10HM]*y_cur[IDX_CH2CCHII] + + k[3997]*y_cur[IDX_C2M]*y_cur[IDX_CH2CCHII] + + k[4032]*y_cur[IDX_C2HM]*y_cur[IDX_CH2CCHII] + + k[4067]*y_cur[IDX_C3M]*y_cur[IDX_CH2CCHII] + + k[4102]*y_cur[IDX_C3HM]*y_cur[IDX_CH2CCHII] + + k[4137]*y_cur[IDX_C3NM]*y_cur[IDX_CH2CCHII] + + k[4172]*y_cur[IDX_C4M]*y_cur[IDX_CH2CCHII] + + k[4207]*y_cur[IDX_C4HM]*y_cur[IDX_CH2CCHII] + + k[4242]*y_cur[IDX_C5M]*y_cur[IDX_CH2CCHII] + + k[4277]*y_cur[IDX_C5HM]*y_cur[IDX_CH2CCHII] + + k[4312]*y_cur[IDX_C5NM]*y_cur[IDX_CH2CCHII] + + k[4347]*y_cur[IDX_C6M]*y_cur[IDX_CH2CCHII] + + k[4382]*y_cur[IDX_C6HM]*y_cur[IDX_CH2CCHII] + + k[4417]*y_cur[IDX_C7M]*y_cur[IDX_CH2CCHII] + + k[4452]*y_cur[IDX_C7HM]*y_cur[IDX_CH2CCHII] + + k[4487]*y_cur[IDX_C8M]*y_cur[IDX_CH2CCHII] + + k[4522]*y_cur[IDX_C8HM]*y_cur[IDX_CH2CCHII] + + k[4557]*y_cur[IDX_C9M]*y_cur[IDX_CH2CCHII] + + k[4592]*y_cur[IDX_C9HM]*y_cur[IDX_CH2CCHII] + + k[4627]*y_cur[IDX_CHM]*y_cur[IDX_CH2CCHII] + + k[4662]*y_cur[IDX_CNM]*y_cur[IDX_CH2CCHII] + + k[4697]*y_cur[IDX_HM]*y_cur[IDX_CH2CCHII] + + k[4733]*y_cur[IDX_OM]*y_cur[IDX_CH2CCHII] + + k[4768]*y_cur[IDX_O2M]*y_cur[IDX_CH2CCHII] + + k[4803]*y_cur[IDX_OHM]*y_cur[IDX_CH2CCHII] + + k[4838]*y_cur[IDX_SM]*y_cur[IDX_CH2CCHII] + + k[4871]*y_cur[IDX_C2I]*y_cur[IDX_CH4I] + + k[4914]*y_cur[IDX_CI]*y_cur[IDX_C2H4I] - + k[4947]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHI] + + k[4991]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2I] - + k[5256]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHI] + + k[5781]*y_cur[IDX_CH2CCH2I] - k[5782]*y_cur[IDX_CH2CCHI] - + k[5783]*y_cur[IDX_CH2CCHI] + k[5802]*y_cur[IDX_CH3CCHI] + + k[6081]*y_cur[IDX_CH2CCH2I] - k[6083]*y_cur[IDX_CH2CCHI] - + k[6084]*y_cur[IDX_CH2CCHI] + k[6106]*y_cur[IDX_CH3CCHI] + + k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + + k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] - + k[6950]*y_cur[IDX_CH2CCHI] + k[7132]*y_cur[IDX_GCH2CCHI] + + k[7314]*y_cur[IDX_GCH2CCHI] + k[7496]*y_cur[IDX_GCH2CCHI] + + k[8612]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] + + k[8613]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] + + k[8665]*y_cur[IDX_GCI]*y_cur[IDX_GC2H3I]; + ydot[yistart + IDX_SOII] = 0.0 + + k[193]*y_cur[IDX_CII]*y_cur[IDX_SOI] + + k[417]*y_cur[IDX_HII]*y_cur[IDX_SOI] - + k[539]*y_cur[IDX_MgI]*y_cur[IDX_SOII] - + k[615]*y_cur[IDX_NH3I]*y_cur[IDX_SOII] - + k[644]*y_cur[IDX_NaI]*y_cur[IDX_SOII] - + k[711]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[712]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - + k[713]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - + k[714]*y_cur[IDX_SOII]*y_cur[IDX_CH3OCH3I] - + k[715]*y_cur[IDX_SOII]*y_cur[IDX_FeI] - + k[1220]*y_cur[IDX_SOII]*y_cur[IDX_eM] + + k[1427]*y_cur[IDX_CII]*y_cur[IDX_SO2I] + + k[2282]*y_cur[IDX_COII]*y_cur[IDX_SO2I] + + k[2290]*y_cur[IDX_COI]*y_cur[IDX_SO2II] - + k[2582]*y_cur[IDX_H2SI]*y_cur[IDX_SOII] + + k[2847]*y_cur[IDX_HI]*y_cur[IDX_SO2II] + + k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - + k[3468]*y_cur[IDX_NI]*y_cur[IDX_SOII] + + k[3651]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + + k[3667]*y_cur[IDX_O2II]*y_cur[IDX_SI] + + k[3674]*y_cur[IDX_O2I]*y_cur[IDX_SII] + + k[3675]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + + k[3735]*y_cur[IDX_OI]*y_cur[IDX_H2SII] + + k[3743]*y_cur[IDX_OI]*y_cur[IDX_HSII] + + k[3790]*y_cur[IDX_OHII]*y_cur[IDX_SI] + + k[3808]*y_cur[IDX_OHI]*y_cur[IDX_SII] - + k[3843]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - + k[3844]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - + k[3845]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - + k[3846]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - + k[3847]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - + k[3848]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - + k[3849]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - + k[3850]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - + k[3851]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[3852]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[3853]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[3854]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - + k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - + k[3857]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - + k[3858]*y_cur[IDX_SOII]*y_cur[IDX_OCSI] - + k[3916]*y_cur[IDX_CM]*y_cur[IDX_SOII] - + k[3951]*y_cur[IDX_C10M]*y_cur[IDX_SOII] - + k[3986]*y_cur[IDX_C10HM]*y_cur[IDX_SOII] - + k[4021]*y_cur[IDX_C2M]*y_cur[IDX_SOII] - + k[4056]*y_cur[IDX_C2HM]*y_cur[IDX_SOII] - + k[4091]*y_cur[IDX_C3M]*y_cur[IDX_SOII] - + k[4126]*y_cur[IDX_C3HM]*y_cur[IDX_SOII] - + k[4161]*y_cur[IDX_C3NM]*y_cur[IDX_SOII] - + k[4196]*y_cur[IDX_C4M]*y_cur[IDX_SOII] - + k[4231]*y_cur[IDX_C4HM]*y_cur[IDX_SOII] - + k[4266]*y_cur[IDX_C5M]*y_cur[IDX_SOII] - + k[4301]*y_cur[IDX_C5HM]*y_cur[IDX_SOII] - + k[4336]*y_cur[IDX_C5NM]*y_cur[IDX_SOII] - + k[4371]*y_cur[IDX_C6M]*y_cur[IDX_SOII] - + k[4406]*y_cur[IDX_C6HM]*y_cur[IDX_SOII] - + k[4441]*y_cur[IDX_C7M]*y_cur[IDX_SOII] - + k[4476]*y_cur[IDX_C7HM]*y_cur[IDX_SOII] - + k[4511]*y_cur[IDX_C8M]*y_cur[IDX_SOII] - + k[4546]*y_cur[IDX_C8HM]*y_cur[IDX_SOII] - + k[4581]*y_cur[IDX_C9M]*y_cur[IDX_SOII] - + k[4616]*y_cur[IDX_C9HM]*y_cur[IDX_SOII] - + k[4651]*y_cur[IDX_CHM]*y_cur[IDX_SOII] - + k[4686]*y_cur[IDX_CNM]*y_cur[IDX_SOII] - + k[4722]*y_cur[IDX_HM]*y_cur[IDX_SOII] - + k[4757]*y_cur[IDX_OM]*y_cur[IDX_SOII] - + k[4792]*y_cur[IDX_O2M]*y_cur[IDX_SOII] - + k[4827]*y_cur[IDX_OHM]*y_cur[IDX_SOII] - + k[4862]*y_cur[IDX_SM]*y_cur[IDX_SOII] + k[5916]*y_cur[IDX_SOI] + + k[6258]*y_cur[IDX_SOI] - k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2CCHII] = 0.0 + + k[162]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - + k[227]*y_cur[IDX_C2H2I]*y_cur[IDX_CH2CCHII] - + k[910]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] - + k[911]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] + + k[1305]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1306]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + + k[1366]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + + k[1482]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + + k[1484]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + + k[1617]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - + k[1643]*y_cur[IDX_C2H3I]*y_cur[IDX_CH2CCHII] + + k[1690]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - + k[1706]*y_cur[IDX_C2H4I]*y_cur[IDX_CH2CCHII] + + k[1730]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - + k[1741]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] - + k[1742]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] - + k[1794]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] - + k[1795]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] - + k[1828]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] - + k[1829]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] + + k[1854]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - + k[1892]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - + k[1893]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] + + k[1998]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2II] - + k[2020]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] - + k[2021]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] - + k[2022]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] - + k[2023]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] - + k[2024]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] - + k[2025]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] - + k[2026]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6H2I] - + k[2027]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] - + k[2028]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] - + k[2029]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] - + k[2030]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] - + k[2031]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] + + k[2042]*y_cur[IDX_CH3II]*y_cur[IDX_C2H2I] + + k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + + k[2049]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] + + k[2081]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + + k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + + k[2150]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + + k[2153]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + + k[2325]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] - + k[2485]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] - + k[2486]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + + k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] + + k[2681]*y_cur[IDX_H3II]*y_cur[IDX_H2CCCI] + + k[2798]*y_cur[IDX_H3OII]*y_cur[IDX_H2CCCI] + + k[2957]*y_cur[IDX_HCOII]*y_cur[IDX_H2CCCI] + + k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3453]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHII] - + k[3726]*y_cur[IDX_OI]*y_cur[IDX_CH2CCHII] - + k[3838]*y_cur[IDX_SI]*y_cur[IDX_CH2CCHII] - + k[3879]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - + k[3880]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - + k[3892]*y_cur[IDX_CM]*y_cur[IDX_CH2CCHII] - + k[3927]*y_cur[IDX_C10M]*y_cur[IDX_CH2CCHII] - + k[3962]*y_cur[IDX_C10HM]*y_cur[IDX_CH2CCHII] - + k[3997]*y_cur[IDX_C2M]*y_cur[IDX_CH2CCHII] - + k[4032]*y_cur[IDX_C2HM]*y_cur[IDX_CH2CCHII] - + k[4067]*y_cur[IDX_C3M]*y_cur[IDX_CH2CCHII] - + k[4102]*y_cur[IDX_C3HM]*y_cur[IDX_CH2CCHII] - + k[4137]*y_cur[IDX_C3NM]*y_cur[IDX_CH2CCHII] - + k[4172]*y_cur[IDX_C4M]*y_cur[IDX_CH2CCHII] - + k[4207]*y_cur[IDX_C4HM]*y_cur[IDX_CH2CCHII] - + k[4242]*y_cur[IDX_C5M]*y_cur[IDX_CH2CCHII] - + k[4277]*y_cur[IDX_C5HM]*y_cur[IDX_CH2CCHII] - + k[4312]*y_cur[IDX_C5NM]*y_cur[IDX_CH2CCHII] - + k[4347]*y_cur[IDX_C6M]*y_cur[IDX_CH2CCHII] - + k[4382]*y_cur[IDX_C6HM]*y_cur[IDX_CH2CCHII] - + k[4417]*y_cur[IDX_C7M]*y_cur[IDX_CH2CCHII] - + k[4452]*y_cur[IDX_C7HM]*y_cur[IDX_CH2CCHII] - + k[4487]*y_cur[IDX_C8M]*y_cur[IDX_CH2CCHII] - + k[4522]*y_cur[IDX_C8HM]*y_cur[IDX_CH2CCHII] - + k[4557]*y_cur[IDX_C9M]*y_cur[IDX_CH2CCHII] - + k[4592]*y_cur[IDX_C9HM]*y_cur[IDX_CH2CCHII] - + k[4627]*y_cur[IDX_CHM]*y_cur[IDX_CH2CCHII] - + k[4662]*y_cur[IDX_CNM]*y_cur[IDX_CH2CCHII] - + k[4697]*y_cur[IDX_HM]*y_cur[IDX_CH2CCHII] - + k[4733]*y_cur[IDX_OM]*y_cur[IDX_CH2CCHII] - + k[4768]*y_cur[IDX_O2M]*y_cur[IDX_CH2CCHII] - + k[4803]*y_cur[IDX_OHM]*y_cur[IDX_CH2CCHII] - + k[4838]*y_cur[IDX_SM]*y_cur[IDX_CH2CCHII] - + k[5530]*y_cur[IDX_CH2CCHII]*y_cur[IDX_H2I] - + k[5531]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] + + k[5551]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - + k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] - + k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C6HI] = 0.0 + k[46]*y_cur[IDX_CI]*y_cur[IDX_C5HM] + + k[97]*y_cur[IDX_HI]*y_cur[IDX_C6M] - + k[348]*y_cur[IDX_HII]*y_cur[IDX_C6HI] + + k[853]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + + k[855]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + + k[857]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + + k[859]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + + k[866]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + + k[1084]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] - + k[1331]*y_cur[IDX_CII]*y_cur[IDX_C6HI] - + k[1497]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] - + k[1498]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] - + k[1599]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - + k[1600]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - + k[1601]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - + k[1661]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] - + k[1662]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] - + k[1769]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] - + k[1770]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] - + k[1803]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] - + k[1804]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] - + k[2027]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] - + k[2028]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] - + k[2056]*y_cur[IDX_CH3II]*y_cur[IDX_C6HI] - + k[2307]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - + k[2620]*y_cur[IDX_H3II]*y_cur[IDX_C6HI] - + k[2925]*y_cur[IDX_HCOII]*y_cur[IDX_C6HI] - + k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] - + k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + + k[3431]*y_cur[IDX_NI]*y_cur[IDX_C7HM] + + k[3447]*y_cur[IDX_NI]*y_cur[IDX_C9HM] + + k[3715]*y_cur[IDX_OI]*y_cur[IDX_C7H2II] + + k[4376]*y_cur[IDX_C6HM]*y_cur[IDX_CII] + + k[4377]*y_cur[IDX_C6HM]*y_cur[IDX_C2H2II] + + k[4378]*y_cur[IDX_C6HM]*y_cur[IDX_C2H3II] + + k[4379]*y_cur[IDX_C6HM]*y_cur[IDX_C4H2II] + + k[4380]*y_cur[IDX_C6HM]*y_cur[IDX_C4H3II] + + k[4381]*y_cur[IDX_C6HM]*y_cur[IDX_C4SII] + + k[4382]*y_cur[IDX_C6HM]*y_cur[IDX_CH2CCHII] + + k[4383]*y_cur[IDX_C6HM]*y_cur[IDX_CH3II] + + k[4384]*y_cur[IDX_C6HM]*y_cur[IDX_CNCII] + + k[4385]*y_cur[IDX_C6HM]*y_cur[IDX_FeII] + + k[4386]*y_cur[IDX_C6HM]*y_cur[IDX_HII] + + k[4387]*y_cur[IDX_C6HM]*y_cur[IDX_H2COII] + + k[4388]*y_cur[IDX_C6HM]*y_cur[IDX_H2SII] + + k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] + + k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] + + k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] + + k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + + k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + + k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + + k[4395]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + + k[4396]*y_cur[IDX_C6HM]*y_cur[IDX_HeII] + + k[4397]*y_cur[IDX_C6HM]*y_cur[IDX_MgII] + + k[4398]*y_cur[IDX_C6HM]*y_cur[IDX_NII] + + k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] + + k[4400]*y_cur[IDX_C6HM]*y_cur[IDX_NH3II] + + k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] + + k[4402]*y_cur[IDX_C6HM]*y_cur[IDX_NOII] + + k[4403]*y_cur[IDX_C6HM]*y_cur[IDX_NaII] + + k[4404]*y_cur[IDX_C6HM]*y_cur[IDX_OII] + + k[4405]*y_cur[IDX_C6HM]*y_cur[IDX_SII] + + k[4406]*y_cur[IDX_C6HM]*y_cur[IDX_SOII] + + k[4407]*y_cur[IDX_C6HM]*y_cur[IDX_SiII] + + k[4408]*y_cur[IDX_C6HM]*y_cur[IDX_SiOII] + + k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] + + k[4410]*y_cur[IDX_C6HM]*y_cur[IDX_SiSII] + + k[4872]*y_cur[IDX_C2I]*y_cur[IDX_C4H2I] + + k[4909]*y_cur[IDX_CI]*y_cur[IDX_C10H2I] + + k[4927]*y_cur[IDX_CI]*y_cur[IDX_C5H2I] - + k[4933]*y_cur[IDX_CI]*y_cur[IDX_C6HI] - + k[5243]*y_cur[IDX_NI]*y_cur[IDX_C6HI] - + k[5369]*y_cur[IDX_OI]*y_cur[IDX_C6HI] + + k[5371]*y_cur[IDX_OI]*y_cur[IDX_C7HI] - + k[5600]*y_cur[IDX_C6HI]*y_cur[IDX_eM] + k[5749]*y_cur[IDX_C6HM] - + k[5752]*y_cur[IDX_C6HI] - k[5753]*y_cur[IDX_C6HI] - + k[5754]*y_cur[IDX_C6HI] + k[5799]*y_cur[IDX_CH3C6HI] + + k[5852]*y_cur[IDX_HC7NI] + k[6035]*y_cur[IDX_C6HM] + + k[6037]*y_cur[IDX_C6H2I] - k[6039]*y_cur[IDX_C6HI] - + k[6040]*y_cur[IDX_C6HI] + k[6103]*y_cur[IDX_CH3C6HI] + + k[6177]*y_cur[IDX_HC7NI] + + k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + + k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + + k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + + k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + + k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + + k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] - + k[7042]*y_cur[IDX_C6HI] + k[7224]*y_cur[IDX_GC6HI] + + k[7406]*y_cur[IDX_GC6HI] + k[7588]*y_cur[IDX_GC6HI] + + k[8638]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] + + k[8675]*y_cur[IDX_GCI]*y_cur[IDX_GC5HI] + + k[8728]*y_cur[IDX_GCHI]*y_cur[IDX_GC5I]; + ydot[yistart + IDX_C5HI] = 0.0 + k[44]*y_cur[IDX_CI]*y_cur[IDX_C4HM] + + k[94]*y_cur[IDX_HI]*y_cur[IDX_C5M] - + k[345]*y_cur[IDX_HII]*y_cur[IDX_C5HI] + + k[730]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + + k[842]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + + k[844]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + + k[850]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + + k[930]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] - + k[1325]*y_cur[IDX_CII]*y_cur[IDX_C5HI] - + k[1493]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - + k[1494]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - + k[1592]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - + k[1593]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - + k[1594]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - + k[1657]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - + k[1658]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] - + k[1765]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] - + k[1766]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] - + k[1800]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] - + k[1801]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] - + k[1833]*y_cur[IDX_C4HII]*y_cur[IDX_C5HI] - + k[1836]*y_cur[IDX_C4H2II]*y_cur[IDX_C5HI] - + k[1841]*y_cur[IDX_C4H3II]*y_cur[IDX_C5HI] - + k[2024]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] - + k[2025]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] - + k[2054]*y_cur[IDX_CH3II]*y_cur[IDX_C5HI] - + k[2305]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - + k[2615]*y_cur[IDX_H3II]*y_cur[IDX_C5HI] - + k[2920]*y_cur[IDX_HCOII]*y_cur[IDX_C5HI] + + k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] - + k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + + k[3422]*y_cur[IDX_NI]*y_cur[IDX_C6HM] + + k[3440]*y_cur[IDX_NI]*y_cur[IDX_C8HM] + + k[3710]*y_cur[IDX_OI]*y_cur[IDX_C6H2II] + + k[4271]*y_cur[IDX_C5HM]*y_cur[IDX_CII] + + k[4272]*y_cur[IDX_C5HM]*y_cur[IDX_C2H2II] + + k[4273]*y_cur[IDX_C5HM]*y_cur[IDX_C2H3II] + + k[4274]*y_cur[IDX_C5HM]*y_cur[IDX_C4H2II] + + k[4275]*y_cur[IDX_C5HM]*y_cur[IDX_C4H3II] + + k[4276]*y_cur[IDX_C5HM]*y_cur[IDX_C4SII] + + k[4277]*y_cur[IDX_C5HM]*y_cur[IDX_CH2CCHII] + + k[4278]*y_cur[IDX_C5HM]*y_cur[IDX_CH3II] + + k[4279]*y_cur[IDX_C5HM]*y_cur[IDX_CNCII] + + k[4280]*y_cur[IDX_C5HM]*y_cur[IDX_FeII] + + k[4281]*y_cur[IDX_C5HM]*y_cur[IDX_HII] + + k[4282]*y_cur[IDX_C5HM]*y_cur[IDX_H2COII] + + k[4283]*y_cur[IDX_C5HM]*y_cur[IDX_H2SII] + + k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] + + k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] + + k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] + + k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + + k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + + k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + + k[4290]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + + k[4291]*y_cur[IDX_C5HM]*y_cur[IDX_HeII] + + k[4292]*y_cur[IDX_C5HM]*y_cur[IDX_MgII] + + k[4293]*y_cur[IDX_C5HM]*y_cur[IDX_NII] + + k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] + + k[4295]*y_cur[IDX_C5HM]*y_cur[IDX_NH3II] + + k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] + + k[4297]*y_cur[IDX_C5HM]*y_cur[IDX_NOII] + + k[4298]*y_cur[IDX_C5HM]*y_cur[IDX_NaII] + + k[4299]*y_cur[IDX_C5HM]*y_cur[IDX_OII] + + k[4300]*y_cur[IDX_C5HM]*y_cur[IDX_SII] + + k[4301]*y_cur[IDX_C5HM]*y_cur[IDX_SOII] + + k[4302]*y_cur[IDX_C5HM]*y_cur[IDX_SiII] + + k[4303]*y_cur[IDX_C5HM]*y_cur[IDX_SiOII] + + k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] + + k[4305]*y_cur[IDX_C5HM]*y_cur[IDX_SiSII] + + k[4909]*y_cur[IDX_CI]*y_cur[IDX_C10H2I] - + k[4928]*y_cur[IDX_CI]*y_cur[IDX_C5HI] + + k[4961]*y_cur[IDX_CI]*y_cur[IDX_C4H2I] - + k[5240]*y_cur[IDX_NI]*y_cur[IDX_C5HI] + + k[5243]*y_cur[IDX_NI]*y_cur[IDX_C6HI] - + k[5366]*y_cur[IDX_OI]*y_cur[IDX_C5HI] + + k[5369]*y_cur[IDX_OI]*y_cur[IDX_C6HI] - + k[5597]*y_cur[IDX_C5HI]*y_cur[IDX_eM] + k[5739]*y_cur[IDX_C5HM] + + k[5741]*y_cur[IDX_C5H2I] - k[5742]*y_cur[IDX_C5HI] - + k[5743]*y_cur[IDX_C5HI] - k[5744]*y_cur[IDX_C5HI] + + k[5964]*y_cur[IDX_C10HI] + k[6024]*y_cur[IDX_C5HM] + + k[6026]*y_cur[IDX_C5H2I] - k[6027]*y_cur[IDX_C5HI] - + k[6028]*y_cur[IDX_C5HI] - k[6029]*y_cur[IDX_C5HI] + + k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + + k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + + k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + + k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + + k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - + k[7028]*y_cur[IDX_C5HI] + k[7210]*y_cur[IDX_GC5HI] + + k[7392]*y_cur[IDX_GC5HI] + k[7574]*y_cur[IDX_GC5HI] + + k[8636]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] + + k[8672]*y_cur[IDX_GCI]*y_cur[IDX_GC4HI] + + k[8726]*y_cur[IDX_GCHI]*y_cur[IDX_GC4I]; + ydot[yistart + IDX_H2SII] = 0.0 + + k[175]*y_cur[IDX_CII]*y_cur[IDX_H2SI] + + k[223]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + + k[233]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + + k[276]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] + + k[281]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] + + k[309]*y_cur[IDX_COII]*y_cur[IDX_H2SI] + + k[380]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + + k[448]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + + k[469]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - + k[483]*y_cur[IDX_H2SII]*y_cur[IDX_FeI] + + k[484]*y_cur[IDX_H2SI]*y_cur[IDX_CO2II] + + k[485]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] + + k[486]*y_cur[IDX_H2SI]*y_cur[IDX_OCSII] - + k[501]*y_cur[IDX_HCOI]*y_cur[IDX_H2SII] + + k[519]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - + k[532]*y_cur[IDX_MgI]*y_cur[IDX_H2SII] + + k[553]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + + k[567]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + + k[580]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[606]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] - + k[625]*y_cur[IDX_NOI]*y_cur[IDX_H2SII] - + k[636]*y_cur[IDX_NaI]*y_cur[IDX_H2SII] + + k[657]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + + k[674]*y_cur[IDX_O2II]*y_cur[IDX_H2SI] + + k[690]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] + + k[701]*y_cur[IDX_PII]*y_cur[IDX_H2SI] - + k[709]*y_cur[IDX_SI]*y_cur[IDX_H2SII] - + k[719]*y_cur[IDX_SiI]*y_cur[IDX_H2SII] - + k[1019]*y_cur[IDX_H2SII]*y_cur[IDX_eM] - + k[1020]*y_cur[IDX_H2SII]*y_cur[IDX_eM] - + k[1900]*y_cur[IDX_CI]*y_cur[IDX_H2SII] - + k[2443]*y_cur[IDX_H2I]*y_cur[IDX_H2SII] + + k[2456]*y_cur[IDX_H2I]*y_cur[IDX_HSII] + + k[2500]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - + k[2544]*y_cur[IDX_H2OI]*y_cur[IDX_H2SII] - + k[2574]*y_cur[IDX_H2SII]*y_cur[IDX_H2SI] + + k[2716]*y_cur[IDX_H3II]*y_cur[IDX_HSI] - + k[2842]*y_cur[IDX_HI]*y_cur[IDX_H2SII] + + k[2843]*y_cur[IDX_HI]*y_cur[IDX_H3SII] + + k[2977]*y_cur[IDX_HCOII]*y_cur[IDX_HSI] - + k[3459]*y_cur[IDX_NI]*y_cur[IDX_H2SII] - + k[3576]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] - + k[3734]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - + k[3735]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - + k[3898]*y_cur[IDX_CM]*y_cur[IDX_H2SII] - + k[3933]*y_cur[IDX_C10M]*y_cur[IDX_H2SII] - + k[3968]*y_cur[IDX_C10HM]*y_cur[IDX_H2SII] - + k[4003]*y_cur[IDX_C2M]*y_cur[IDX_H2SII] - + k[4038]*y_cur[IDX_C2HM]*y_cur[IDX_H2SII] - + k[4073]*y_cur[IDX_C3M]*y_cur[IDX_H2SII] - + k[4108]*y_cur[IDX_C3HM]*y_cur[IDX_H2SII] - + k[4143]*y_cur[IDX_C3NM]*y_cur[IDX_H2SII] - + k[4178]*y_cur[IDX_C4M]*y_cur[IDX_H2SII] - + k[4213]*y_cur[IDX_C4HM]*y_cur[IDX_H2SII] - + k[4248]*y_cur[IDX_C5M]*y_cur[IDX_H2SII] - + k[4283]*y_cur[IDX_C5HM]*y_cur[IDX_H2SII] - + k[4318]*y_cur[IDX_C5NM]*y_cur[IDX_H2SII] - + k[4353]*y_cur[IDX_C6M]*y_cur[IDX_H2SII] - + k[4388]*y_cur[IDX_C6HM]*y_cur[IDX_H2SII] - + k[4423]*y_cur[IDX_C7M]*y_cur[IDX_H2SII] - + k[4458]*y_cur[IDX_C7HM]*y_cur[IDX_H2SII] - + k[4493]*y_cur[IDX_C8M]*y_cur[IDX_H2SII] - + k[4528]*y_cur[IDX_C8HM]*y_cur[IDX_H2SII] - + k[4563]*y_cur[IDX_C9M]*y_cur[IDX_H2SII] - + k[4598]*y_cur[IDX_C9HM]*y_cur[IDX_H2SII] - + k[4633]*y_cur[IDX_CHM]*y_cur[IDX_H2SII] - + k[4668]*y_cur[IDX_CNM]*y_cur[IDX_H2SII] - + k[4704]*y_cur[IDX_HM]*y_cur[IDX_H2SII] - + k[4739]*y_cur[IDX_OM]*y_cur[IDX_H2SII] - + k[4774]*y_cur[IDX_O2M]*y_cur[IDX_H2SII] - + k[4809]*y_cur[IDX_OHM]*y_cur[IDX_H2SII] - + k[4844]*y_cur[IDX_SM]*y_cur[IDX_H2SII] + + k[5561]*y_cur[IDX_H2I]*y_cur[IDX_SII] - + k[5618]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + k[5841]*y_cur[IDX_H2SI] + + k[6163]*y_cur[IDX_H2SI] - k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + - k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NII] = 0.0 - k[292]*y_cur[IDX_CHI]*y_cur[IDX_NII] + - k[542]*y_cur[IDX_NII]*y_cur[IDX_C2I] - + k[543]*y_cur[IDX_NII]*y_cur[IDX_C2HI] - + k[544]*y_cur[IDX_NII]*y_cur[IDX_CH2I] - + k[545]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - + k[546]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - + k[547]*y_cur[IDX_NII]*y_cur[IDX_CNI] - + k[548]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - + k[549]*y_cur[IDX_NII]*y_cur[IDX_COI] - + k[550]*y_cur[IDX_NII]*y_cur[IDX_FeI] - + k[551]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - + k[552]*y_cur[IDX_NII]*y_cur[IDX_H2OI] - + k[553]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - + k[554]*y_cur[IDX_NII]*y_cur[IDX_HCNI] - + k[555]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - + k[556]*y_cur[IDX_NII]*y_cur[IDX_MgI] - + k[557]*y_cur[IDX_NII]*y_cur[IDX_NH2I] - + k[558]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - + k[559]*y_cur[IDX_NII]*y_cur[IDX_NHI] - k[560]*y_cur[IDX_NII]*y_cur[IDX_NOI] - - k[569]*y_cur[IDX_N2II]*y_cur[IDX_NOI] - - k[577]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - - k[583]*y_cur[IDX_NH2II]*y_cur[IDX_NOI] - - k[595]*y_cur[IDX_NH3II]*y_cur[IDX_NOI] + - k[620]*y_cur[IDX_NOII]*y_cur[IDX_FeI] - - k[621]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - - k[622]*y_cur[IDX_NOI]*y_cur[IDX_C4H2II] - - k[623]*y_cur[IDX_NOI]*y_cur[IDX_CO2II] - - k[624]*y_cur[IDX_NOI]*y_cur[IDX_H2COII] - - k[625]*y_cur[IDX_NOI]*y_cur[IDX_H2SII] - - k[626]*y_cur[IDX_NOI]*y_cur[IDX_HNOII] - - k[627]*y_cur[IDX_NOI]*y_cur[IDX_HSII] - - k[628]*y_cur[IDX_NOI]*y_cur[IDX_O2II] - - k[629]*y_cur[IDX_NOI]*y_cur[IDX_SII] - - k[630]*y_cur[IDX_NOI]*y_cur[IDX_S2II] - - k[631]*y_cur[IDX_NOI]*y_cur[IDX_SiOII] + - k[641]*y_cur[IDX_NaI]*y_cur[IDX_NOII] - - k[693]*y_cur[IDX_OHII]*y_cur[IDX_NOI] + - k[721]*y_cur[IDX_SiI]*y_cur[IDX_NOII] + - k[994]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + - k[1011]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] + - k[1092]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + - k[1121]*y_cur[IDX_HNOII]*y_cur[IDX_eM] + - k[1169]*y_cur[IDX_NO2II]*y_cur[IDX_eM] + - k[1171]*y_cur[IDX_N2OII]*y_cur[IDX_eM] - - k[1449]*y_cur[IDX_CM]*y_cur[IDX_NOI] + - k[1460]*y_cur[IDX_C2I]*y_cur[IDX_HNOII] + - k[1747]*y_cur[IDX_C2HI]*y_cur[IDX_HNOII] + - k[1907]*y_cur[IDX_CI]*y_cur[IDX_HNOII] + - k[2009]*y_cur[IDX_CH2I]*y_cur[IDX_HNOII] + - k[2202]*y_cur[IDX_CH4I]*y_cur[IDX_HNOII] + - k[2254]*y_cur[IDX_CHI]*y_cur[IDX_HNOII] + - k[2269]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - - k[2274]*y_cur[IDX_CNII]*y_cur[IDX_NOI] + - k[2278]*y_cur[IDX_CNI]*y_cur[IDX_HNOII] + - k[2286]*y_cur[IDX_COI]*y_cur[IDX_HNOII] + - k[2343]*y_cur[IDX_HII]*y_cur[IDX_HCNOI] - - k[2394]*y_cur[IDX_H2II]*y_cur[IDX_NOI] + - k[2497]*y_cur[IDX_H2COI]*y_cur[IDX_HNOII] + - k[2550]*y_cur[IDX_H2OI]*y_cur[IDX_HNOII] - - k[2726]*y_cur[IDX_H3II]*y_cur[IDX_NOI] + - k[2878]*y_cur[IDX_HCNI]*y_cur[IDX_HNOII] + + k[561]*y_cur[IDX_NII]*y_cur[IDX_O2I] - + k[562]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - + k[563]*y_cur[IDX_NII]*y_cur[IDX_OHI] + + k[573]*y_cur[IDX_NI]*y_cur[IDX_N2II] - + k[2256]*y_cur[IDX_CHI]*y_cur[IDX_NII] - + k[2459]*y_cur[IDX_H2I]*y_cur[IDX_NII] + + k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + + k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + + k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + + k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] + + k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + + k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - + k[3336]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - + k[3337]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - + k[3338]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - + k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] - + k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - + k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - + k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - + k[3343]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - + k[3344]*y_cur[IDX_NII]*y_cur[IDX_COI] - + k[3345]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - + k[3346]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - + k[3347]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - + k[3348]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - + k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - + k[3350]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - + k[3351]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] - + k[3352]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] - + k[3353]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - + k[3354]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - + k[3355]*y_cur[IDX_NII]*y_cur[IDX_NHI] - + k[3356]*y_cur[IDX_NII]*y_cur[IDX_NOI] - + k[3357]*y_cur[IDX_NII]*y_cur[IDX_O2I] - + k[3358]*y_cur[IDX_NII]*y_cur[IDX_O2I] - + k[3359]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - + k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - + k[3908]*y_cur[IDX_CM]*y_cur[IDX_NII] - + k[3943]*y_cur[IDX_C10M]*y_cur[IDX_NII] - + k[3978]*y_cur[IDX_C10HM]*y_cur[IDX_NII] - + k[4013]*y_cur[IDX_C2M]*y_cur[IDX_NII] - + k[4048]*y_cur[IDX_C2HM]*y_cur[IDX_NII] - + k[4083]*y_cur[IDX_C3M]*y_cur[IDX_NII] - + k[4118]*y_cur[IDX_C3HM]*y_cur[IDX_NII] - + k[4153]*y_cur[IDX_C3NM]*y_cur[IDX_NII] - + k[4188]*y_cur[IDX_C4M]*y_cur[IDX_NII] - + k[4223]*y_cur[IDX_C4HM]*y_cur[IDX_NII] - + k[4258]*y_cur[IDX_C5M]*y_cur[IDX_NII] - + k[4293]*y_cur[IDX_C5HM]*y_cur[IDX_NII] - + k[4328]*y_cur[IDX_C5NM]*y_cur[IDX_NII] - + k[4363]*y_cur[IDX_C6M]*y_cur[IDX_NII] - + k[4398]*y_cur[IDX_C6HM]*y_cur[IDX_NII] - + k[4433]*y_cur[IDX_C7M]*y_cur[IDX_NII] - + k[4468]*y_cur[IDX_C7HM]*y_cur[IDX_NII] - + k[4503]*y_cur[IDX_C8M]*y_cur[IDX_NII] - + k[4538]*y_cur[IDX_C8HM]*y_cur[IDX_NII] - + k[4573]*y_cur[IDX_C9M]*y_cur[IDX_NII] - + k[4608]*y_cur[IDX_C9HM]*y_cur[IDX_NII] - + k[4643]*y_cur[IDX_CHM]*y_cur[IDX_NII] - + k[4678]*y_cur[IDX_CNM]*y_cur[IDX_NII] - + k[4714]*y_cur[IDX_HM]*y_cur[IDX_NII] - + k[4749]*y_cur[IDX_OM]*y_cur[IDX_NII] - + k[4784]*y_cur[IDX_O2M]*y_cur[IDX_NII] - + k[4819]*y_cur[IDX_OHM]*y_cur[IDX_NII] - + k[4854]*y_cur[IDX_SM]*y_cur[IDX_NII] - + k[5581]*y_cur[IDX_NII]*y_cur[IDX_NI] - + k[5621]*y_cur[IDX_NII]*y_cur[IDX_eM] + k[5684]*y_cur[IDX_NI] + + k[5880]*y_cur[IDX_NI] + k[6300]*y_cur[IDX_NI] - + k[6319]*y_cur[IDX_NII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3HI] = 0.0 + k[39]*y_cur[IDX_CI]*y_cur[IDX_C2HM] + + k[89]*y_cur[IDX_HI]*y_cur[IDX_C3M] + + k[115]*y_cur[IDX_NI]*y_cur[IDX_C4HM] - + k[335]*y_cur[IDX_HII]*y_cur[IDX_C3HI] + + k[600]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] + + k[621]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] + + k[795]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[1196]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + + k[1234]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] - + k[1312]*y_cur[IDX_CII]*y_cur[IDX_C3HI] - + k[1487]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] - + k[1488]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] - + k[1583]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - + k[1584]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - + k[1585]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - + k[1651]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - + k[1652]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - + k[1819]*y_cur[IDX_C3HI]*y_cur[IDX_C3H2II] - + k[1820]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - + k[1821]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] - + k[1822]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] - + k[1823]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] - + k[1824]*y_cur[IDX_C3HI]*y_cur[IDX_C4H2II] - + k[1825]*y_cur[IDX_C3HI]*y_cur[IDX_C4H3II] - + k[1826]*y_cur[IDX_C3HI]*y_cur[IDX_C5H2II] - + k[1827]*y_cur[IDX_C3HI]*y_cur[IDX_C6H2II] - + k[1828]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] - + k[1829]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] - + k[2051]*y_cur[IDX_CH3II]*y_cur[IDX_C3HI] - + k[2301]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - + k[2603]*y_cur[IDX_H3II]*y_cur[IDX_C3HI] - + k[2773]*y_cur[IDX_H3OII]*y_cur[IDX_C3HI] - + k[2908]*y_cur[IDX_HCOII]*y_cur[IDX_C3HI] + + k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3097]*y_cur[IDX_HeII]*y_cur[IDX_C3HI] + + k[3313]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + + k[3404]*y_cur[IDX_NI]*y_cur[IDX_C4HM] + + k[3421]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - + k[3821]*y_cur[IDX_SII]*y_cur[IDX_C3HI] - + k[3861]*y_cur[IDX_SiII]*y_cur[IDX_C3HI] + + k[4096]*y_cur[IDX_C3HM]*y_cur[IDX_CII] + + k[4097]*y_cur[IDX_C3HM]*y_cur[IDX_C2H2II] + + k[4098]*y_cur[IDX_C3HM]*y_cur[IDX_C2H3II] + + k[4099]*y_cur[IDX_C3HM]*y_cur[IDX_C4H2II] + + k[4100]*y_cur[IDX_C3HM]*y_cur[IDX_C4H3II] + + k[4101]*y_cur[IDX_C3HM]*y_cur[IDX_C4SII] + + k[4102]*y_cur[IDX_C3HM]*y_cur[IDX_CH2CCHII] + + k[4103]*y_cur[IDX_C3HM]*y_cur[IDX_CH3II] + + k[4104]*y_cur[IDX_C3HM]*y_cur[IDX_CNCII] + + k[4105]*y_cur[IDX_C3HM]*y_cur[IDX_FeII] + + k[4106]*y_cur[IDX_C3HM]*y_cur[IDX_HII] + + k[4107]*y_cur[IDX_C3HM]*y_cur[IDX_H2COII] + + k[4108]*y_cur[IDX_C3HM]*y_cur[IDX_H2SII] + + k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] + + k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] + + k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] + + k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + + k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + + k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + + k[4115]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + + k[4116]*y_cur[IDX_C3HM]*y_cur[IDX_HeII] + + k[4117]*y_cur[IDX_C3HM]*y_cur[IDX_MgII] + + k[4118]*y_cur[IDX_C3HM]*y_cur[IDX_NII] + + k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] + + k[4120]*y_cur[IDX_C3HM]*y_cur[IDX_NH3II] + + k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] + + k[4122]*y_cur[IDX_C3HM]*y_cur[IDX_NOII] + + k[4123]*y_cur[IDX_C3HM]*y_cur[IDX_NaII] + + k[4124]*y_cur[IDX_C3HM]*y_cur[IDX_OII] + + k[4125]*y_cur[IDX_C3HM]*y_cur[IDX_SII] + + k[4126]*y_cur[IDX_C3HM]*y_cur[IDX_SOII] + + k[4127]*y_cur[IDX_C3HM]*y_cur[IDX_SiII] + + k[4128]*y_cur[IDX_C3HM]*y_cur[IDX_SiOII] + + k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] + + k[4130]*y_cur[IDX_C3HM]*y_cur[IDX_SiSII] + + k[4912]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] - + k[4920]*y_cur[IDX_CI]*y_cur[IDX_C3HI] - + k[5233]*y_cur[IDX_NI]*y_cur[IDX_C3HI] - + k[5357]*y_cur[IDX_OI]*y_cur[IDX_C3HI] + + k[5362]*y_cur[IDX_OI]*y_cur[IDX_C4HI] - + k[5592]*y_cur[IDX_C3HI]*y_cur[IDX_eM] + k[5718]*y_cur[IDX_C3HM] + + k[5719]*y_cur[IDX_C3H2I] - k[5720]*y_cur[IDX_C3HI] + + k[5740]*y_cur[IDX_C5H2I] + k[5743]*y_cur[IDX_C5HI] + + k[5752]*y_cur[IDX_C6HI] + k[5783]*y_cur[IDX_CH2CCHI] + + k[5834]*y_cur[IDX_H2CCCI] + k[6002]*y_cur[IDX_C3HM] + + k[6003]*y_cur[IDX_C3H2I] - k[6004]*y_cur[IDX_C3HI] + + k[6025]*y_cur[IDX_C5H2I] + k[6028]*y_cur[IDX_C5HI] + + k[6039]*y_cur[IDX_C6HI] + k[6084]*y_cur[IDX_CH2CCHI] + + k[6150]*y_cur[IDX_H2CCCI] + + k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + + k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[6945]*y_cur[IDX_C3HI] + k[7127]*y_cur[IDX_GC3HI] + + k[7309]*y_cur[IDX_GC3HI] + k[7491]*y_cur[IDX_GC3HI] + + k[8610]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] + + k[8663]*y_cur[IDX_GCI]*y_cur[IDX_GC2HI] + + k[8719]*y_cur[IDX_GCHI]*y_cur[IDX_GC2I]; + ydot[yistart + IDX_H2COII] = 0.0 + + k[174]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + + k[222]*y_cur[IDX_C2H2II]*y_cur[IDX_H2COI] - + k[262]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] + + k[280]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] - + k[290]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] + + k[300]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] + + k[308]*y_cur[IDX_COII]*y_cur[IDX_H2COI] + + k[376]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + + k[446]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] - + k[459]*y_cur[IDX_H2COII]*y_cur[IDX_FeI] - + k[460]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + + k[461]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + + k[468]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] - + k[500]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] + + k[517]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - + k[531]*y_cur[IDX_MgI]*y_cur[IDX_H2COII] + + k[551]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + + k[566]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + + k[574]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - + k[604]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - + k[624]*y_cur[IDX_NOI]*y_cur[IDX_H2COII] - + k[635]*y_cur[IDX_NaI]*y_cur[IDX_H2COII] + + k[655]*y_cur[IDX_OII]*y_cur[IDX_H2COI] + + k[688]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] - + k[718]*y_cur[IDX_SiI]*y_cur[IDX_H2COII] - + k[996]*y_cur[IDX_H2COII]*y_cur[IDX_eM] - + k[997]*y_cur[IDX_H2COII]*y_cur[IDX_eM] - + k[998]*y_cur[IDX_H2COII]*y_cur[IDX_eM] - + k[999]*y_cur[IDX_H2COII]*y_cur[IDX_eM] - + k[1457]*y_cur[IDX_C2I]*y_cur[IDX_H2COII] - + k[1744]*y_cur[IDX_C2HI]*y_cur[IDX_H2COII] + + k[1951]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + + k[1978]*y_cur[IDX_CH2II]*y_cur[IDX_CO2I] - + k[2002]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] + + k[2014]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] + + k[2090]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + + k[2093]*y_cur[IDX_CH3II]*y_cur[IDX_OHI] - + k[2193]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] - + k[2194]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + + k[2230]*y_cur[IDX_CH5II]*y_cur[IDX_HCOI] - + k[2246]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - + k[2487]*y_cur[IDX_H2COII]*y_cur[IDX_CH3OHI] - + k[2488]*y_cur[IDX_H2COII]*y_cur[IDX_H2COI] - + k[2489]*y_cur[IDX_H2COII]*y_cur[IDX_O2I] - + k[2490]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + + k[2514]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - + k[2542]*y_cur[IDX_H2OI]*y_cur[IDX_H2COII] + + k[2697]*y_cur[IDX_H3II]*y_cur[IDX_HCOI] + + k[2857]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] - + k[2874]*y_cur[IDX_HCNI]*y_cur[IDX_H2COII] + + k[2969]*y_cur[IDX_HCOII]*y_cur[IDX_HCOI] - + k[3007]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] + k[3008]*y_cur[IDX_HCOI]*y_cur[IDX_HNOII] + - k[3042]*y_cur[IDX_HNCI]*y_cur[IDX_HNOII] + - k[3049]*y_cur[IDX_HNOII]*y_cur[IDX_CO2I] + - k[3050]*y_cur[IDX_HNOII]*y_cur[IDX_SI] + - k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] + - k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - - k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] - - k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + - k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + - k[3343]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - - k[3356]*y_cur[IDX_NII]*y_cur[IDX_NOI] + - k[3358]*y_cur[IDX_NII]*y_cur[IDX_O2I] + - k[3359]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + - k[3366]*y_cur[IDX_N2I]*y_cur[IDX_HNOII] + - k[3476]*y_cur[IDX_NI]*y_cur[IDX_SiOII] - - k[3500]*y_cur[IDX_NHII]*y_cur[IDX_NOI] + - k[3543]*y_cur[IDX_NH2I]*y_cur[IDX_HNOII] + - k[3588]*y_cur[IDX_NH3I]*y_cur[IDX_HNOII] + - k[3615]*y_cur[IDX_NHI]*y_cur[IDX_HNOII] - - k[3626]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - - k[3627]*y_cur[IDX_NOI]*y_cur[IDX_O2HII] + - k[3635]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - - k[3787]*y_cur[IDX_OHII]*y_cur[IDX_NOI] + - k[3803]*y_cur[IDX_OHI]*y_cur[IDX_HNOII] + - k[3912]*y_cur[IDX_CM]*y_cur[IDX_NOII] + - k[3947]*y_cur[IDX_C10M]*y_cur[IDX_NOII] + - k[3982]*y_cur[IDX_C10HM]*y_cur[IDX_NOII] + - k[4017]*y_cur[IDX_C2M]*y_cur[IDX_NOII] + - k[4052]*y_cur[IDX_C2HM]*y_cur[IDX_NOII] + + k[3009]*y_cur[IDX_HCOI]*y_cur[IDX_N2HII] + + k[3011]*y_cur[IDX_HCOI]*y_cur[IDX_O2HII] - + k[3038]*y_cur[IDX_HNCI]*y_cur[IDX_H2COII] + + k[3336]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3494]*y_cur[IDX_NHII]*y_cur[IDX_HCOI] + + k[3520]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] - + k[3535]*y_cur[IDX_NH2I]*y_cur[IDX_H2COII] - + k[3574]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - + k[3611]*y_cur[IDX_NHI]*y_cur[IDX_H2COII] + + k[3636]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + + k[3783]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - + k[3897]*y_cur[IDX_CM]*y_cur[IDX_H2COII] - + k[3932]*y_cur[IDX_C10M]*y_cur[IDX_H2COII] - + k[3967]*y_cur[IDX_C10HM]*y_cur[IDX_H2COII] - + k[4002]*y_cur[IDX_C2M]*y_cur[IDX_H2COII] - + k[4037]*y_cur[IDX_C2HM]*y_cur[IDX_H2COII] - + k[4072]*y_cur[IDX_C3M]*y_cur[IDX_H2COII] - + k[4107]*y_cur[IDX_C3HM]*y_cur[IDX_H2COII] - + k[4142]*y_cur[IDX_C3NM]*y_cur[IDX_H2COII] - + k[4177]*y_cur[IDX_C4M]*y_cur[IDX_H2COII] - + k[4212]*y_cur[IDX_C4HM]*y_cur[IDX_H2COII] - + k[4247]*y_cur[IDX_C5M]*y_cur[IDX_H2COII] - + k[4282]*y_cur[IDX_C5HM]*y_cur[IDX_H2COII] - + k[4317]*y_cur[IDX_C5NM]*y_cur[IDX_H2COII] - + k[4352]*y_cur[IDX_C6M]*y_cur[IDX_H2COII] - + k[4387]*y_cur[IDX_C6HM]*y_cur[IDX_H2COII] - + k[4422]*y_cur[IDX_C7M]*y_cur[IDX_H2COII] - + k[4457]*y_cur[IDX_C7HM]*y_cur[IDX_H2COII] - + k[4492]*y_cur[IDX_C8M]*y_cur[IDX_H2COII] - + k[4527]*y_cur[IDX_C8HM]*y_cur[IDX_H2COII] - + k[4562]*y_cur[IDX_C9M]*y_cur[IDX_H2COII] - + k[4597]*y_cur[IDX_C9HM]*y_cur[IDX_H2COII] - + k[4632]*y_cur[IDX_CHM]*y_cur[IDX_H2COII] - + k[4667]*y_cur[IDX_CNM]*y_cur[IDX_H2COII] - + k[4703]*y_cur[IDX_HM]*y_cur[IDX_H2COII] - + k[4738]*y_cur[IDX_OM]*y_cur[IDX_H2COII] - + k[4773]*y_cur[IDX_O2M]*y_cur[IDX_H2COII] - + k[4808]*y_cur[IDX_OHM]*y_cur[IDX_H2COII] - + k[4843]*y_cur[IDX_SM]*y_cur[IDX_H2COII] - + k[5616]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + k[6154]*y_cur[IDX_H2COI] + - k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - + k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - + k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - + k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C3I] = 0.0 - k[11]*y_cur[IDX_C2M]*y_cur[IDX_C3I] + - k[17]*y_cur[IDX_C3M]*y_cur[IDX_C3I] - + k[23]*y_cur[IDX_C4M]*y_cur[IDX_C3I] - + k[28]*y_cur[IDX_C5M]*y_cur[IDX_C3I] - + k[32]*y_cur[IDX_C6M]*y_cur[IDX_C3I] - + k[35]*y_cur[IDX_C7M]*y_cur[IDX_C3I] + + k[38]*y_cur[IDX_CI]*y_cur[IDX_C2M] + + k[235]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - + k[333]*y_cur[IDX_HII]*y_cur[IDX_C3I] + + k[731]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + + k[737]*y_cur[IDX_C11II]*y_cur[IDX_eM] + + k[790]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + + k[793]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[794]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[817]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + + k[820]*y_cur[IDX_C4II]*y_cur[IDX_eM] + + k[837]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + + k[838]*y_cur[IDX_C5II]*y_cur[IDX_eM] + + k[863]*y_cur[IDX_C7II]*y_cur[IDX_eM] + + k[1549]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] + + k[1557]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] - + k[2601]*y_cur[IDX_H3II]*y_cur[IDX_C3I] - + k[2771]*y_cur[IDX_H3OII]*y_cur[IDX_C3I] - + k[2906]*y_cur[IDX_HCOII]*y_cur[IDX_C3I] + + k[3017]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + + k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] + + k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + + k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + + k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + + k[3402]*y_cur[IDX_NI]*y_cur[IDX_C4M] + + k[3407]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + + k[3418]*y_cur[IDX_NI]*y_cur[IDX_C6M] + + k[3437]*y_cur[IDX_NI]*y_cur[IDX_C8M] + + k[3562]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] + + k[3699]*y_cur[IDX_OI]*y_cur[IDX_C4HII] + + k[4061]*y_cur[IDX_C3M]*y_cur[IDX_CII] + + k[4062]*y_cur[IDX_C3M]*y_cur[IDX_C2H2II] + + k[4063]*y_cur[IDX_C3M]*y_cur[IDX_C2H3II] + + k[4064]*y_cur[IDX_C3M]*y_cur[IDX_C4H2II] + + k[4065]*y_cur[IDX_C3M]*y_cur[IDX_C4H3II] + + k[4066]*y_cur[IDX_C3M]*y_cur[IDX_C4SII] + + k[4067]*y_cur[IDX_C3M]*y_cur[IDX_CH2CCHII] + + k[4068]*y_cur[IDX_C3M]*y_cur[IDX_CH3II] + + k[4069]*y_cur[IDX_C3M]*y_cur[IDX_CNCII] + + k[4070]*y_cur[IDX_C3M]*y_cur[IDX_FeII] + + k[4071]*y_cur[IDX_C3M]*y_cur[IDX_HII] + + k[4072]*y_cur[IDX_C3M]*y_cur[IDX_H2COII] + + k[4073]*y_cur[IDX_C3M]*y_cur[IDX_H2SII] + + k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] + + k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] + + k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] + + k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + + k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + + k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + + k[4080]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + + k[4081]*y_cur[IDX_C3M]*y_cur[IDX_HeII] + + k[4082]*y_cur[IDX_C3M]*y_cur[IDX_MgII] + + k[4083]*y_cur[IDX_C3M]*y_cur[IDX_NII] + + k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] + + k[4085]*y_cur[IDX_C3M]*y_cur[IDX_NH3II] + + k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] + k[4087]*y_cur[IDX_C3M]*y_cur[IDX_NOII] + - k[4122]*y_cur[IDX_C3HM]*y_cur[IDX_NOII] + - k[4157]*y_cur[IDX_C3NM]*y_cur[IDX_NOII] + - k[4192]*y_cur[IDX_C4M]*y_cur[IDX_NOII] + + k[4088]*y_cur[IDX_C3M]*y_cur[IDX_NaII] + + k[4089]*y_cur[IDX_C3M]*y_cur[IDX_OII] + + k[4090]*y_cur[IDX_C3M]*y_cur[IDX_SII] + + k[4091]*y_cur[IDX_C3M]*y_cur[IDX_SOII] + + k[4092]*y_cur[IDX_C3M]*y_cur[IDX_SiII] + + k[4093]*y_cur[IDX_C3M]*y_cur[IDX_SiOII] + + k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] + + k[4095]*y_cur[IDX_C3M]*y_cur[IDX_SiSII] + + k[4911]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] + + k[4916]*y_cur[IDX_CI]*y_cur[IDX_C2HI] + + k[4921]*y_cur[IDX_CI]*y_cur[IDX_C3NI] + + k[4922]*y_cur[IDX_CI]*y_cur[IDX_C3OI] + + k[4923]*y_cur[IDX_CI]*y_cur[IDX_C4I] + + k[4926]*y_cur[IDX_CI]*y_cur[IDX_C5I] + + k[4926]*y_cur[IDX_CI]*y_cur[IDX_C5I] + + k[4931]*y_cur[IDX_CI]*y_cur[IDX_C6I] + + k[4934]*y_cur[IDX_CI]*y_cur[IDX_C7I] + + k[5212]*y_cur[IDX_HNC3I]*y_cur[IDX_CI] - + k[5231]*y_cur[IDX_NI]*y_cur[IDX_C3I] + + k[5235]*y_cur[IDX_NI]*y_cur[IDX_C4I] - + k[5356]*y_cur[IDX_OI]*y_cur[IDX_C3I] + + k[5361]*y_cur[IDX_OI]*y_cur[IDX_C4I] - + k[5496]*y_cur[IDX_CII]*y_cur[IDX_C3I] + + k[5521]*y_cur[IDX_CI]*y_cur[IDX_C2I] - + k[5522]*y_cur[IDX_CI]*y_cur[IDX_C3I] - + k[5591]*y_cur[IDX_C3I]*y_cur[IDX_eM] + k[5716]*y_cur[IDX_C3M] - + k[5717]*y_cur[IDX_C3I] + k[5720]*y_cur[IDX_C3HI] + + k[5728]*y_cur[IDX_C4I] + k[5733]*y_cur[IDX_C4NI] + + k[5735]*y_cur[IDX_C4SI] + k[5737]*y_cur[IDX_C5I] + + k[5742]*y_cur[IDX_C5HI] + k[5752]*y_cur[IDX_C6HI] + + k[5951]*y_cur[IDX_C10I] + k[5960]*y_cur[IDX_C10H2I] + + k[5965]*y_cur[IDX_C10HI] + k[5966]*y_cur[IDX_C10HI] + + k[5970]*y_cur[IDX_C11I] + k[5970]*y_cur[IDX_C11I] + + k[5973]*y_cur[IDX_C11I] + k[6000]*y_cur[IDX_C3M] - + k[6001]*y_cur[IDX_C3I] + k[6004]*y_cur[IDX_C3HI] + + k[6012]*y_cur[IDX_C4I] + k[6018]*y_cur[IDX_C4NI] + + k[6020]*y_cur[IDX_C4PI] + k[6021]*y_cur[IDX_C4SI] + + k[6023]*y_cur[IDX_C5I] + k[6027]*y_cur[IDX_C5HI] + + k[6039]*y_cur[IDX_C6HI] + k[6149]*y_cur[IDX_H2CCCI] + + k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + + k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + + k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM] + + k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + + k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + + k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + + k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + + k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[6943]*y_cur[IDX_C3I] + + k[7125]*y_cur[IDX_GC3I] + k[7307]*y_cur[IDX_GC3I] + + k[7489]*y_cur[IDX_GC3I] + k[8662]*y_cur[IDX_GCI]*y_cur[IDX_GC2I]; + ydot[yistart + IDX_C4HI] = 0.0 + k[41]*y_cur[IDX_CI]*y_cur[IDX_C3HM] + + k[92]*y_cur[IDX_HI]*y_cur[IDX_C4M] - + k[340]*y_cur[IDX_HII]*y_cur[IDX_C4HI] + + k[823]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + + k[824]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + + k[827]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + + k[839]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + + k[1082]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + + k[1083]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] - + k[1320]*y_cur[IDX_CII]*y_cur[IDX_C4HI] - + k[1489]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] - + k[1490]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] - + k[1586]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - + k[1587]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - + k[1588]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - + k[1653]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] - + k[1654]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] - + k[1761]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] - + k[1762]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] - + k[1796]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] - + k[1797]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] - + k[1830]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - + k[1831]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - + k[1843]*y_cur[IDX_C4HI]*y_cur[IDX_C4H2II] - + k[1844]*y_cur[IDX_C4HI]*y_cur[IDX_C4H3II] - + k[1845]*y_cur[IDX_C4HI]*y_cur[IDX_C5H2II] - + k[2020]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] - + k[2021]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] - + k[2052]*y_cur[IDX_CH3II]*y_cur[IDX_C4HI] - + k[2303]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - + k[2610]*y_cur[IDX_H3II]*y_cur[IDX_C4HI] - + k[2780]*y_cur[IDX_H3OII]*y_cur[IDX_C4HI] - + k[2915]*y_cur[IDX_HCOII]*y_cur[IDX_C4HI] - + k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] - + k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + + k[3413]*y_cur[IDX_NI]*y_cur[IDX_C5HM] + + k[3430]*y_cur[IDX_NI]*y_cur[IDX_C7HM] + + k[3706]*y_cur[IDX_OI]*y_cur[IDX_C5H2II] - + k[3822]*y_cur[IDX_SII]*y_cur[IDX_C4HI] - + k[3862]*y_cur[IDX_SiII]*y_cur[IDX_C4HI] + + k[4201]*y_cur[IDX_C4HM]*y_cur[IDX_CII] + + k[4202]*y_cur[IDX_C4HM]*y_cur[IDX_C2H2II] + + k[4203]*y_cur[IDX_C4HM]*y_cur[IDX_C2H3II] + + k[4204]*y_cur[IDX_C4HM]*y_cur[IDX_C4H2II] + + k[4205]*y_cur[IDX_C4HM]*y_cur[IDX_C4H3II] + + k[4206]*y_cur[IDX_C4HM]*y_cur[IDX_C4SII] + + k[4207]*y_cur[IDX_C4HM]*y_cur[IDX_CH2CCHII] + + k[4208]*y_cur[IDX_C4HM]*y_cur[IDX_CH3II] + + k[4209]*y_cur[IDX_C4HM]*y_cur[IDX_CNCII] + + k[4210]*y_cur[IDX_C4HM]*y_cur[IDX_FeII] + + k[4211]*y_cur[IDX_C4HM]*y_cur[IDX_HII] + + k[4212]*y_cur[IDX_C4HM]*y_cur[IDX_H2COII] + + k[4213]*y_cur[IDX_C4HM]*y_cur[IDX_H2SII] + + k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] + + k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] + + k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] + + k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + + k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + + k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + + k[4220]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + + k[4221]*y_cur[IDX_C4HM]*y_cur[IDX_HeII] + + k[4222]*y_cur[IDX_C4HM]*y_cur[IDX_MgII] + + k[4223]*y_cur[IDX_C4HM]*y_cur[IDX_NII] + + k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] + + k[4225]*y_cur[IDX_C4HM]*y_cur[IDX_NH3II] + + k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] + k[4227]*y_cur[IDX_C4HM]*y_cur[IDX_NOII] + - k[4262]*y_cur[IDX_C5M]*y_cur[IDX_NOII] + - k[4297]*y_cur[IDX_C5HM]*y_cur[IDX_NOII] + - k[4332]*y_cur[IDX_C5NM]*y_cur[IDX_NOII] + - k[4367]*y_cur[IDX_C6M]*y_cur[IDX_NOII] + - k[4402]*y_cur[IDX_C6HM]*y_cur[IDX_NOII] + - k[4437]*y_cur[IDX_C7M]*y_cur[IDX_NOII] + - k[4472]*y_cur[IDX_C7HM]*y_cur[IDX_NOII] + - k[4507]*y_cur[IDX_C8M]*y_cur[IDX_NOII] + - k[4542]*y_cur[IDX_C8HM]*y_cur[IDX_NOII] + - k[4577]*y_cur[IDX_C9M]*y_cur[IDX_NOII] + - k[4612]*y_cur[IDX_C9HM]*y_cur[IDX_NOII] + - k[4647]*y_cur[IDX_CHM]*y_cur[IDX_NOII] + - k[4682]*y_cur[IDX_CNM]*y_cur[IDX_NOII] + - k[4718]*y_cur[IDX_HM]*y_cur[IDX_NOII] + - k[4753]*y_cur[IDX_OM]*y_cur[IDX_NOII] + - k[4788]*y_cur[IDX_O2M]*y_cur[IDX_NOII] + - k[4823]*y_cur[IDX_OHM]*y_cur[IDX_NOII] + - k[4858]*y_cur[IDX_SM]*y_cur[IDX_NOII] - - k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] - - k[4974]*y_cur[IDX_CI]*y_cur[IDX_NOI] - - k[4975]*y_cur[IDX_CI]*y_cur[IDX_NOI] + - k[5000]*y_cur[IDX_CH2I]*y_cur[IDX_HNOI] + - k[5002]*y_cur[IDX_CH2I]*y_cur[IDX_NO2I] - - k[5003]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - - k[5004]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - - k[5005]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - - k[5006]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + - k[5034]*y_cur[IDX_CH3I]*y_cur[IDX_HNOI] - - k[5038]*y_cur[IDX_CH3I]*y_cur[IDX_NOI] + - k[5078]*y_cur[IDX_CHI]*y_cur[IDX_HNOI] - - k[5083]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - - k[5084]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - - k[5085]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + - k[5119]*y_cur[IDX_CNI]*y_cur[IDX_HNOI] + - k[5120]*y_cur[IDX_CNI]*y_cur[IDX_NO2I] - - k[5121]*y_cur[IDX_CNI]*y_cur[IDX_NOI] - - k[5122]*y_cur[IDX_CNI]*y_cur[IDX_NOI] + - k[5123]*y_cur[IDX_CNI]*y_cur[IDX_O2I] + - k[5129]*y_cur[IDX_COI]*y_cur[IDX_NO2I] + - k[5176]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + - k[5180]*y_cur[IDX_HI]*y_cur[IDX_N2OI] + - k[5185]*y_cur[IDX_HI]*y_cur[IDX_NO2I] - - k[5186]*y_cur[IDX_HI]*y_cur[IDX_NOI] - - k[5187]*y_cur[IDX_HI]*y_cur[IDX_NOI] + - k[5202]*y_cur[IDX_HCNOI]*y_cur[IDX_CI] + - k[5206]*y_cur[IDX_HCOI]*y_cur[IDX_HNOI] - - k[5207]*y_cur[IDX_HCOI]*y_cur[IDX_NOI] + - k[5262]*y_cur[IDX_NI]*y_cur[IDX_CO2I] + - k[5270]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + - k[5277]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + - k[5277]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5279]*y_cur[IDX_NI]*y_cur[IDX_NOI] + - k[5281]*y_cur[IDX_NI]*y_cur[IDX_O2I] + - k[5283]*y_cur[IDX_NI]*y_cur[IDX_OHI] + - k[5287]*y_cur[IDX_NI]*y_cur[IDX_POI] + - k[5291]*y_cur[IDX_NI]*y_cur[IDX_SOI] - - k[5298]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] - - k[5299]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + - k[5311]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] - - k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - - k[5314]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - - k[5315]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + - k[5317]*y_cur[IDX_NHI]*y_cur[IDX_O2I] + - k[5318]*y_cur[IDX_NHI]*y_cur[IDX_OI] + - k[5319]*y_cur[IDX_NHI]*y_cur[IDX_OI] - - k[5326]*y_cur[IDX_NOI]*y_cur[IDX_HNOI] - - k[5327]*y_cur[IDX_NOI]*y_cur[IDX_N2OI] - - k[5328]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - - k[5328]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - - k[5329]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - - k[5329]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - - k[5330]*y_cur[IDX_NOI]*y_cur[IDX_O2I] - - k[5331]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - - k[5332]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - - k[5333]*y_cur[IDX_NOI]*y_cur[IDX_SI] - - k[5334]*y_cur[IDX_NOI]*y_cur[IDX_SI] + - k[5335]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] + - k[5388]*y_cur[IDX_OI]*y_cur[IDX_CNI] + - k[5389]*y_cur[IDX_OI]*y_cur[IDX_CNOI] + - k[5412]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + - k[5417]*y_cur[IDX_OI]*y_cur[IDX_N2I] + - k[5418]*y_cur[IDX_OI]*y_cur[IDX_N2OI] + - k[5418]*y_cur[IDX_OI]*y_cur[IDX_N2OI] + - k[5423]*y_cur[IDX_OI]*y_cur[IDX_NO2I] - - k[5424]*y_cur[IDX_OI]*y_cur[IDX_NOI] + - k[5425]*y_cur[IDX_OI]*y_cur[IDX_NSI] + - k[5428]*y_cur[IDX_OI]*y_cur[IDX_OCNI] + - k[5450]*y_cur[IDX_OI]*y_cur[IDX_SiNI] + - k[5472]*y_cur[IDX_OHI]*y_cur[IDX_HNOI] + - k[5473]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - - k[5477]*y_cur[IDX_OHI]*y_cur[IDX_NOI] - - k[5493]*y_cur[IDX_SiI]*y_cur[IDX_NOI] + k[5855]*y_cur[IDX_HCNOI] + - k[5869]*y_cur[IDX_HNOI] + k[5879]*y_cur[IDX_N2OI] + - k[5890]*y_cur[IDX_NO2I] - k[5891]*y_cur[IDX_NOI] - - k[5892]*y_cur[IDX_NOI] + k[6182]*y_cur[IDX_HCNOI] + - k[6200]*y_cur[IDX_HNOI] + k[6214]*y_cur[IDX_N2OI] + - k[6227]*y_cur[IDX_NO2I] - k[6228]*y_cur[IDX_NOI] - - k[6229]*y_cur[IDX_NOI] + k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM] - + k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + - k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + - k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + - k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + - k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM] - k[6925]*y_cur[IDX_NOI] - + k[7107]*y_cur[IDX_GNOI] + k[7289]*y_cur[IDX_GNOI] + - k[7471]*y_cur[IDX_GNOI] + k[8702]*y_cur[IDX_GNI]*y_cur[IDX_GOI]; + k[4228]*y_cur[IDX_C4HM]*y_cur[IDX_NaII] + + k[4229]*y_cur[IDX_C4HM]*y_cur[IDX_OII] + + k[4230]*y_cur[IDX_C4HM]*y_cur[IDX_SII] + + k[4231]*y_cur[IDX_C4HM]*y_cur[IDX_SOII] + + k[4232]*y_cur[IDX_C4HM]*y_cur[IDX_SiII] + + k[4233]*y_cur[IDX_C4HM]*y_cur[IDX_SiOII] + + k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] + + k[4235]*y_cur[IDX_C4HM]*y_cur[IDX_SiSII] + + k[4867]*y_cur[IDX_C2I]*y_cur[IDX_C2H2I] - + k[4877]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HI] - + k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] - + k[4907]*y_cur[IDX_C4HI]*y_cur[IDX_HNCI] - + k[4908]*y_cur[IDX_C4HI]*y_cur[IDX_NCCNI] + + k[4919]*y_cur[IDX_CI]*y_cur[IDX_C3H2I] - + k[4925]*y_cur[IDX_CI]*y_cur[IDX_C4HI] + + k[4959]*y_cur[IDX_CI]*y_cur[IDX_H2CCCI] - + k[5022]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - + k[5023]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - + k[5050]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] - + k[5051]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] - + k[5052]*y_cur[IDX_C2H6I]*y_cur[IDX_C4HI] - + k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - + k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - + k[5057]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - + k[5058]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - + k[5236]*y_cur[IDX_NI]*y_cur[IDX_C4HI] - + k[5362]*y_cur[IDX_OI]*y_cur[IDX_C4HI] + + k[5366]*y_cur[IDX_OI]*y_cur[IDX_C5HI] - + k[5595]*y_cur[IDX_C4HI]*y_cur[IDX_eM] + k[5729]*y_cur[IDX_C4HM] + + k[5730]*y_cur[IDX_C4H3I] - k[5731]*y_cur[IDX_C4HI] - + k[5732]*y_cur[IDX_C4HI] + k[5750]*y_cur[IDX_C6H2I] + + k[5797]*y_cur[IDX_CH3C4HI] + k[5849]*y_cur[IDX_C4H2I] + + k[5850]*y_cur[IDX_HC5NI] + k[6013]*y_cur[IDX_C4HM] + + k[6014]*y_cur[IDX_C4H3I] - k[6016]*y_cur[IDX_C4HI] - + k[6017]*y_cur[IDX_C4HI] + k[6101]*y_cur[IDX_CH3C4HI] + + k[6174]*y_cur[IDX_C4H2I] + k[6175]*y_cur[IDX_HC5NI] + + k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + + k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + + k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + + k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6996]*y_cur[IDX_C4HI] + k[7178]*y_cur[IDX_GC4HI] + + k[7360]*y_cur[IDX_GC4HI] + k[7542]*y_cur[IDX_GC4HI] + + k[8629]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] + + k[8668]*y_cur[IDX_GCI]*y_cur[IDX_GC3HI] + + k[8724]*y_cur[IDX_GCHI]*y_cur[IDX_GC3I]; ydot[yistart + IDX_NOII] = 0.0 + k[186]*y_cur[IDX_CII]*y_cur[IDX_NOI] + k[206]*y_cur[IDX_C2II]*y_cur[IDX_NOI] + @@ -26213,1415 +15353,4197 @@ __global__ void FexKernel(realtype *y, realtype *ydot, NaunetData *d_udata, k[4823]*y_cur[IDX_OHM]*y_cur[IDX_NOII] - k[4858]*y_cur[IDX_SM]*y_cur[IDX_NOII] + k[5891]*y_cur[IDX_NOI] + k[6228]*y_cur[IDX_NOI] - k[6407]*y_cur[IDX_NOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NO2I] = 0.0 + k[125]*y_cur[IDX_OM]*y_cur[IDX_NOI] - - k[676]*y_cur[IDX_O2II]*y_cur[IDX_NO2I] - - k[2355]*y_cur[IDX_HII]*y_cur[IDX_NO2I] - - k[2725]*y_cur[IDX_H3II]*y_cur[IDX_NO2I] - + ydot[yistart + IDX_OII] = 0.0 - + k[266]*y_cur[IDX_CH2I]*y_cur[IDX_OII] - + k[295]*y_cur[IDX_CHI]*y_cur[IDX_OII] + + k[406]*y_cur[IDX_HII]*y_cur[IDX_OI] - + k[492]*y_cur[IDX_HI]*y_cur[IDX_OII] - + k[619]*y_cur[IDX_NHI]*y_cur[IDX_OII] - + k[646]*y_cur[IDX_OII]*y_cur[IDX_C2I] - + k[647]*y_cur[IDX_OII]*y_cur[IDX_C2H2I] - + k[648]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - + k[649]*y_cur[IDX_OII]*y_cur[IDX_C2HI] - + k[650]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - + k[651]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - + k[652]*y_cur[IDX_OII]*y_cur[IDX_CH4I] - + k[653]*y_cur[IDX_OII]*y_cur[IDX_COI] - + k[654]*y_cur[IDX_OII]*y_cur[IDX_FeI] - + k[655]*y_cur[IDX_OII]*y_cur[IDX_H2COI] - + k[656]*y_cur[IDX_OII]*y_cur[IDX_H2OI] - + k[657]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - + k[658]*y_cur[IDX_OII]*y_cur[IDX_HCOI] - + k[659]*y_cur[IDX_OII]*y_cur[IDX_N2OI] - + k[660]*y_cur[IDX_OII]*y_cur[IDX_NH2I] - + k[661]*y_cur[IDX_OII]*y_cur[IDX_NH3I] - + k[662]*y_cur[IDX_OII]*y_cur[IDX_O2I] - + k[663]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - + k[664]*y_cur[IDX_OII]*y_cur[IDX_OHI] - + k[665]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + + k[681]*y_cur[IDX_OI]*y_cur[IDX_CNII] + + k[682]*y_cur[IDX_OI]*y_cur[IDX_COII] + + k[683]*y_cur[IDX_OI]*y_cur[IDX_CO2II] + + k[684]*y_cur[IDX_OI]*y_cur[IDX_N2II] + + k[1423]*y_cur[IDX_CII]*y_cur[IDX_O2I] + + k[1968]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - + k[2261]*y_cur[IDX_CHI]*y_cur[IDX_OII] - + k[2466]*y_cur[IDX_H2I]*y_cur[IDX_OII] + + k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + + k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + + k[3290]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + + k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + + k[3294]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3297]*y_cur[IDX_HeII]*y_cur[IDX_OHI] + + k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + + k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + + k[3358]*y_cur[IDX_NII]*y_cur[IDX_O2I] - + k[3619]*y_cur[IDX_NHI]*y_cur[IDX_OII] - + k[3631]*y_cur[IDX_OII]*y_cur[IDX_C2I] - + k[3632]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - + k[3633]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - + k[3634]*y_cur[IDX_OII]*y_cur[IDX_C2HI] - + k[3635]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - + k[3636]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - + k[3637]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - + k[3638]*y_cur[IDX_OII]*y_cur[IDX_CH4I] - + k[3639]*y_cur[IDX_OII]*y_cur[IDX_CNI] - + k[3640]*y_cur[IDX_OII]*y_cur[IDX_CO2I] - + k[3641]*y_cur[IDX_OII]*y_cur[IDX_H2COI] - + k[3642]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - + k[3643]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - + k[3644]*y_cur[IDX_OII]*y_cur[IDX_HCNI] - + k[3645]*y_cur[IDX_OII]*y_cur[IDX_HCNI] - + k[3646]*y_cur[IDX_OII]*y_cur[IDX_HCOI] - + k[3647]*y_cur[IDX_OII]*y_cur[IDX_N2I] - k[3648]*y_cur[IDX_OII]*y_cur[IDX_NO2I] - - k[5002]*y_cur[IDX_CH2I]*y_cur[IDX_NO2I] - - k[5037]*y_cur[IDX_CH3I]*y_cur[IDX_NO2I] - - k[5120]*y_cur[IDX_CNI]*y_cur[IDX_NO2I] - - k[5129]*y_cur[IDX_COI]*y_cur[IDX_NO2I] - - k[5185]*y_cur[IDX_HI]*y_cur[IDX_NO2I] - - k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5276]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5277]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5278]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5311]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] - - k[5312]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] + - k[5327]*y_cur[IDX_NOI]*y_cur[IDX_N2OI] + - k[5330]*y_cur[IDX_NOI]*y_cur[IDX_O2I] + - k[5336]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] + - k[5411]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - - k[5423]*y_cur[IDX_OI]*y_cur[IDX_NO2I] + - k[5477]*y_cur[IDX_OHI]*y_cur[IDX_NOI] - k[5890]*y_cur[IDX_NO2I] - - k[6226]*y_cur[IDX_NO2I] - k[6227]*y_cur[IDX_NO2I] - - k[6985]*y_cur[IDX_NO2I] + k[7167]*y_cur[IDX_GNO2I] + - k[7349]*y_cur[IDX_GNO2I] + k[7531]*y_cur[IDX_GNO2I]; - ydot[yistart + IDX_NO2II] = 0.0 + - k[676]*y_cur[IDX_O2II]*y_cur[IDX_NO2I] - - k[1169]*y_cur[IDX_NO2II]*y_cur[IDX_eM] - - k[2465]*y_cur[IDX_H2I]*y_cur[IDX_NO2II] - - k[2846]*y_cur[IDX_HI]*y_cur[IDX_NO2II] + - k[3466]*y_cur[IDX_NI]*y_cur[IDX_O2HII] + - k[3621]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + - k[3740]*y_cur[IDX_OI]*y_cur[IDX_HNOII] + k[6226]*y_cur[IDX_NO2I] - - k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NSI] = 0.0 + k[123]*y_cur[IDX_NI]*y_cur[IDX_SM] - - k[187]*y_cur[IDX_CII]*y_cur[IDX_NSI] - - k[404]*y_cur[IDX_HII]*y_cur[IDX_NSI] + - k[1122]*y_cur[IDX_HNSII]*y_cur[IDX_eM] - - k[1421]*y_cur[IDX_CII]*y_cur[IDX_NSI] - - k[2727]*y_cur[IDX_H3II]*y_cur[IDX_NSI] - - k[2981]*y_cur[IDX_HCOII]*y_cur[IDX_NSI] - - k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - - k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - - k[4976]*y_cur[IDX_CI]*y_cur[IDX_NSI] - - k[4977]*y_cur[IDX_CI]*y_cur[IDX_NSI] + - k[5125]*y_cur[IDX_CNI]*y_cur[IDX_SI] - - k[5188]*y_cur[IDX_HI]*y_cur[IDX_NSI] - - k[5189]*y_cur[IDX_HI]*y_cur[IDX_NSI] + - k[5271]*y_cur[IDX_NI]*y_cur[IDX_HSI] - - k[5280]*y_cur[IDX_NI]*y_cur[IDX_NSI] + - k[5289]*y_cur[IDX_NI]*y_cur[IDX_S2I] + - k[5290]*y_cur[IDX_NI]*y_cur[IDX_SOI] + - k[5325]*y_cur[IDX_NHI]*y_cur[IDX_SI] + - k[5333]*y_cur[IDX_NOI]*y_cur[IDX_SI] - - k[5425]*y_cur[IDX_OI]*y_cur[IDX_NSI] - - k[5426]*y_cur[IDX_OI]*y_cur[IDX_NSI] - k[5893]*y_cur[IDX_NSI] - - k[6230]*y_cur[IDX_NSI] + k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM] - - k[6990]*y_cur[IDX_NSI] + k[7172]*y_cur[IDX_GNSI] + - k[7354]*y_cur[IDX_GNSI] + k[7536]*y_cur[IDX_GNSI] + - k[8704]*y_cur[IDX_GNI]*y_cur[IDX_GSI]; - ydot[yistart + IDX_NSII] = 0.0 + - k[187]*y_cur[IDX_CII]*y_cur[IDX_NSI] + - k[404]*y_cur[IDX_HII]*y_cur[IDX_NSI] - - k[1173]*y_cur[IDX_NSII]*y_cur[IDX_eM] + - k[3459]*y_cur[IDX_NI]*y_cur[IDX_H2SII] + - k[3462]*y_cur[IDX_NI]*y_cur[IDX_HSII] + - k[3468]*y_cur[IDX_NI]*y_cur[IDX_SOII] + - k[3506]*y_cur[IDX_NHII]*y_cur[IDX_SI] + - k[3624]*y_cur[IDX_NHI]*y_cur[IDX_SII] - - k[3748]*y_cur[IDX_OI]*y_cur[IDX_NSII] - - k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_NaI] = 0.0 - k[188]*y_cur[IDX_CII]*y_cur[IDX_NaI] - - k[255]*y_cur[IDX_CHII]*y_cur[IDX_NaI] - - k[275]*y_cur[IDX_CH3II]*y_cur[IDX_NaI] - - k[473]*y_cur[IDX_H2OII]*y_cur[IDX_NaI] - - k[596]*y_cur[IDX_NH3II]*y_cur[IDX_NaI] - - k[632]*y_cur[IDX_NaI]*y_cur[IDX_C2H2II] - - k[633]*y_cur[IDX_NaI]*y_cur[IDX_CSII] - - k[634]*y_cur[IDX_NaI]*y_cur[IDX_FeII] - - k[635]*y_cur[IDX_NaI]*y_cur[IDX_H2COII] - - k[636]*y_cur[IDX_NaI]*y_cur[IDX_H2SII] - - k[637]*y_cur[IDX_NaI]*y_cur[IDX_HCOII] - - k[638]*y_cur[IDX_NaI]*y_cur[IDX_HSII] - - k[639]*y_cur[IDX_NaI]*y_cur[IDX_MgII] - - k[640]*y_cur[IDX_NaI]*y_cur[IDX_N2II] - - k[641]*y_cur[IDX_NaI]*y_cur[IDX_NOII] - - k[642]*y_cur[IDX_NaI]*y_cur[IDX_O2II] - - k[643]*y_cur[IDX_NaI]*y_cur[IDX_SII] - - k[644]*y_cur[IDX_NaI]*y_cur[IDX_SOII] - - k[645]*y_cur[IDX_NaI]*y_cur[IDX_SiII] - - k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] - - k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] - - k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] - + k[3649]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - + k[3650]*y_cur[IDX_OII]*y_cur[IDX_OHI] - + k[3651]*y_cur[IDX_OII]*y_cur[IDX_SO2I] - + k[3914]*y_cur[IDX_CM]*y_cur[IDX_OII] - + k[3949]*y_cur[IDX_C10M]*y_cur[IDX_OII] - + k[3984]*y_cur[IDX_C10HM]*y_cur[IDX_OII] - + k[4019]*y_cur[IDX_C2M]*y_cur[IDX_OII] - + k[4054]*y_cur[IDX_C2HM]*y_cur[IDX_OII] - + k[4089]*y_cur[IDX_C3M]*y_cur[IDX_OII] - + k[4124]*y_cur[IDX_C3HM]*y_cur[IDX_OII] - + k[4159]*y_cur[IDX_C3NM]*y_cur[IDX_OII] - + k[4194]*y_cur[IDX_C4M]*y_cur[IDX_OII] - + k[4229]*y_cur[IDX_C4HM]*y_cur[IDX_OII] - + k[4264]*y_cur[IDX_C5M]*y_cur[IDX_OII] - + k[4299]*y_cur[IDX_C5HM]*y_cur[IDX_OII] - + k[4334]*y_cur[IDX_C5NM]*y_cur[IDX_OII] - + k[4369]*y_cur[IDX_C6M]*y_cur[IDX_OII] - + k[4404]*y_cur[IDX_C6HM]*y_cur[IDX_OII] - + k[4439]*y_cur[IDX_C7M]*y_cur[IDX_OII] - + k[4474]*y_cur[IDX_C7HM]*y_cur[IDX_OII] - + k[4509]*y_cur[IDX_C8M]*y_cur[IDX_OII] - + k[4544]*y_cur[IDX_C8HM]*y_cur[IDX_OII] - + k[4579]*y_cur[IDX_C9M]*y_cur[IDX_OII] - + k[4614]*y_cur[IDX_C9HM]*y_cur[IDX_OII] - + k[4649]*y_cur[IDX_CHM]*y_cur[IDX_OII] - + k[4684]*y_cur[IDX_CNM]*y_cur[IDX_OII] - + k[4720]*y_cur[IDX_HM]*y_cur[IDX_OII] - + k[4755]*y_cur[IDX_OM]*y_cur[IDX_OII] - + k[4790]*y_cur[IDX_O2M]*y_cur[IDX_OII] - + k[4825]*y_cur[IDX_OHM]*y_cur[IDX_OII] - + k[4860]*y_cur[IDX_SM]*y_cur[IDX_OII] - + k[5525]*y_cur[IDX_CI]*y_cur[IDX_OII] - + k[5623]*y_cur[IDX_OII]*y_cur[IDX_eM] + k[5685]*y_cur[IDX_OI] + + k[5900]*y_cur[IDX_OI] + k[6233]*y_cur[IDX_O2II] + + k[6242]*y_cur[IDX_OHII] + k[6301]*y_cur[IDX_OI] - + k[6326]*y_cur[IDX_OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C4H2I] = 0.0 + + k[93]*y_cur[IDX_HI]*y_cur[IDX_C4HM] - + k[177]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - + k[224]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - + k[384]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] - + k[493]*y_cur[IDX_C4H2I]*y_cur[IDX_HC3NII] + + k[622]*y_cur[IDX_NOI]*y_cur[IDX_C4H2II] - + k[704]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + + k[825]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + + k[829]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + + k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] - + k[1402]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - + k[1403]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - + k[1520]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - + k[1521]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - + k[1621]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - + k[1622]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - + k[1623]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - + k[1677]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] - + k[1678]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] - + k[1754]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - + k[1755]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - + k[1784]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] - + k[1785]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] - + k[1807]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] - + k[1834]*y_cur[IDX_C4HII]*y_cur[IDX_C4H2I] - + k[1837]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - + k[1838]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - + k[2031]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] - + k[2080]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] - + k[2081]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + + k[2124]*y_cur[IDX_CH3OHI]*y_cur[IDX_C4H3II] - + k[2342]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] - + k[2690]*y_cur[IDX_H3II]*y_cur[IDX_C4H2I] - + k[2764]*y_cur[IDX_H3COII]*y_cur[IDX_C4H2I] - + k[2805]*y_cur[IDX_H3OII]*y_cur[IDX_C4H2I] - + k[2850]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] - + k[2851]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H4II] - + k[2852]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] - + k[2965]*y_cur[IDX_HCOII]*y_cur[IDX_C4H2I] - + k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - + k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - + k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + + k[3707]*y_cur[IDX_OI]*y_cur[IDX_C5H3II] - + k[3830]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - + k[3831]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - + k[3832]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - + k[3869]*y_cur[IDX_SiII]*y_cur[IDX_C4H2I] + + k[3889]*y_cur[IDX_CM]*y_cur[IDX_C4H2II] + + k[3924]*y_cur[IDX_C10M]*y_cur[IDX_C4H2II] + + k[3959]*y_cur[IDX_C10HM]*y_cur[IDX_C4H2II] + + k[3994]*y_cur[IDX_C2M]*y_cur[IDX_C4H2II] + + k[4029]*y_cur[IDX_C2HM]*y_cur[IDX_C4H2II] + + k[4064]*y_cur[IDX_C3M]*y_cur[IDX_C4H2II] + + k[4099]*y_cur[IDX_C3HM]*y_cur[IDX_C4H2II] + + k[4134]*y_cur[IDX_C3NM]*y_cur[IDX_C4H2II] + + k[4169]*y_cur[IDX_C4M]*y_cur[IDX_C4H2II] + + k[4204]*y_cur[IDX_C4HM]*y_cur[IDX_C4H2II] + + k[4239]*y_cur[IDX_C5M]*y_cur[IDX_C4H2II] + + k[4274]*y_cur[IDX_C5HM]*y_cur[IDX_C4H2II] + + k[4309]*y_cur[IDX_C5NM]*y_cur[IDX_C4H2II] + + k[4344]*y_cur[IDX_C6M]*y_cur[IDX_C4H2II] + + k[4379]*y_cur[IDX_C6HM]*y_cur[IDX_C4H2II] + + k[4414]*y_cur[IDX_C7M]*y_cur[IDX_C4H2II] + + k[4449]*y_cur[IDX_C7HM]*y_cur[IDX_C4H2II] + + k[4484]*y_cur[IDX_C8M]*y_cur[IDX_C4H2II] + + k[4519]*y_cur[IDX_C8HM]*y_cur[IDX_C4H2II] + + k[4554]*y_cur[IDX_C9M]*y_cur[IDX_C4H2II] + + k[4589]*y_cur[IDX_C9HM]*y_cur[IDX_C4H2II] + + k[4624]*y_cur[IDX_CHM]*y_cur[IDX_C4H2II] + + k[4659]*y_cur[IDX_CNM]*y_cur[IDX_C4H2II] + + k[4694]*y_cur[IDX_HM]*y_cur[IDX_C4H2II] + + k[4730]*y_cur[IDX_OM]*y_cur[IDX_C4H2II] + + k[4765]*y_cur[IDX_O2M]*y_cur[IDX_C4H2II] + + k[4800]*y_cur[IDX_OHM]*y_cur[IDX_C4H2II] + + k[4835]*y_cur[IDX_SM]*y_cur[IDX_C4H2II] - + k[4872]*y_cur[IDX_C2I]*y_cur[IDX_C4H2I] + + k[4888]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2I] - + k[4900]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2I] + + k[4947]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHI] + + k[4953]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - + k[4961]*y_cur[IDX_CI]*y_cur[IDX_C4H2I] + + k[5052]*y_cur[IDX_C2H6I]*y_cur[IDX_C4HI] + + k[5057]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] + + k[5058]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - + k[5115]*y_cur[IDX_CNI]*y_cur[IDX_C4H2I] - + k[5515]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] - + k[5518]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - + k[5531]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] - + k[5576]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] - + k[5577]*y_cur[IDX_C4H2I]*y_cur[IDX_C5HII] - + k[5578]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] - + k[5579]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H3II] - + k[5847]*y_cur[IDX_C4H2I] - k[5848]*y_cur[IDX_C4H2I] - + k[5849]*y_cur[IDX_C4H2I] + k[6015]*y_cur[IDX_C4H3I] - + k[6172]*y_cur[IDX_C4H2I] - k[6173]*y_cur[IDX_C4H2I] - + k[6174]*y_cur[IDX_C4H2I] + + k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + + k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] - + k[6998]*y_cur[IDX_C4H2I] + k[7180]*y_cur[IDX_GC4H2I] + + k[7362]*y_cur[IDX_GC4H2I] + k[7544]*y_cur[IDX_GC4H2I] + + k[8630]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] + + k[8725]*y_cur[IDX_GCHI]*y_cur[IDX_GC3HI]; + ydot[yistart + IDX_C4H2II] = 0.0 + + k[177]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + + k[224]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + + k[384]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] + + k[493]*y_cur[IDX_C4H2I]*y_cur[IDX_HC3NII] - + k[622]*y_cur[IDX_NOI]*y_cur[IDX_C4H2II] + + k[704]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - + k[822]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] - + k[823]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + + k[1345]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + + k[1347]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + + k[1365]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + + k[1466]*y_cur[IDX_C2HII]*y_cur[IDX_C2H2I] + + k[1471]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + + k[1479]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - + k[1552]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] + + k[1565]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] + + k[1586]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - + k[1633]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] - + k[1634]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + + k[1651]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] - + k[1696]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] - + k[1697]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] + + k[1725]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2II] + + k[1727]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - + k[1736]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2II] + + k[1771]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1777]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[1788]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H2II] - + k[1824]*y_cur[IDX_C3HI]*y_cur[IDX_C4H2II] + + k[1830]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] - + k[1835]*y_cur[IDX_C4H2II]*y_cur[IDX_C5H2I] - + k[1836]*y_cur[IDX_C4H2II]*y_cur[IDX_C5HI] - + k[1837]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - + k[1838]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - + k[1843]*y_cur[IDX_C4HI]*y_cur[IDX_C4H2II] + + k[1858]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] + + k[1859]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] - + k[1863]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] - + k[1864]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] + + k[1893]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - + k[2033]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] - + k[2034]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + + k[2051]*y_cur[IDX_CH3II]*y_cur[IDX_C3HI] - + k[2106]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] - + k[2107]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] + + k[2158]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - + k[2169]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] - + k[2170]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + + k[2176]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + + k[2302]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] + + k[2412]*y_cur[IDX_H2I]*y_cur[IDX_C4HII] - + k[2479]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H2II] + + k[2610]*y_cur[IDX_H3II]*y_cur[IDX_C4HI] + + k[2780]*y_cur[IDX_H3OII]*y_cur[IDX_C4HI] + + k[2869]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + + k[2915]*y_cur[IDX_HCOII]*y_cur[IDX_C4HI] + + k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - + k[3405]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - + k[3406]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - + k[3407]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - + k[3701]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - + k[3702]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - + k[3815]*y_cur[IDX_PI]*y_cur[IDX_C4H2II] - + k[3836]*y_cur[IDX_SI]*y_cur[IDX_C4H2II] - + k[3877]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - + k[3878]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - + k[3889]*y_cur[IDX_CM]*y_cur[IDX_C4H2II] - + k[3924]*y_cur[IDX_C10M]*y_cur[IDX_C4H2II] - + k[3959]*y_cur[IDX_C10HM]*y_cur[IDX_C4H2II] - + k[3994]*y_cur[IDX_C2M]*y_cur[IDX_C4H2II] - + k[4029]*y_cur[IDX_C2HM]*y_cur[IDX_C4H2II] - + k[4064]*y_cur[IDX_C3M]*y_cur[IDX_C4H2II] - + k[4099]*y_cur[IDX_C3HM]*y_cur[IDX_C4H2II] - + k[4134]*y_cur[IDX_C3NM]*y_cur[IDX_C4H2II] - + k[4169]*y_cur[IDX_C4M]*y_cur[IDX_C4H2II] - + k[4204]*y_cur[IDX_C4HM]*y_cur[IDX_C4H2II] - + k[4239]*y_cur[IDX_C5M]*y_cur[IDX_C4H2II] - + k[4274]*y_cur[IDX_C5HM]*y_cur[IDX_C4H2II] - + k[4309]*y_cur[IDX_C5NM]*y_cur[IDX_C4H2II] - + k[4344]*y_cur[IDX_C6M]*y_cur[IDX_C4H2II] - + k[4379]*y_cur[IDX_C6HM]*y_cur[IDX_C4H2II] - + k[4414]*y_cur[IDX_C7M]*y_cur[IDX_C4H2II] - + k[4449]*y_cur[IDX_C7HM]*y_cur[IDX_C4H2II] - + k[4484]*y_cur[IDX_C8M]*y_cur[IDX_C4H2II] - + k[4519]*y_cur[IDX_C8HM]*y_cur[IDX_C4H2II] - + k[4554]*y_cur[IDX_C9M]*y_cur[IDX_C4H2II] - + k[4589]*y_cur[IDX_C9HM]*y_cur[IDX_C4H2II] - + k[4624]*y_cur[IDX_CHM]*y_cur[IDX_C4H2II] - + k[4659]*y_cur[IDX_CNM]*y_cur[IDX_C4H2II] - + k[4694]*y_cur[IDX_HM]*y_cur[IDX_C4H2II] - + k[4730]*y_cur[IDX_OM]*y_cur[IDX_C4H2II] - + k[4765]*y_cur[IDX_O2M]*y_cur[IDX_C4H2II] - + k[4800]*y_cur[IDX_OHM]*y_cur[IDX_C4H2II] - + k[4835]*y_cur[IDX_SM]*y_cur[IDX_C4H2II] - + k[5511]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] - + k[5517]*y_cur[IDX_C4H2II]*y_cur[IDX_HC3NI] - + k[5518]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] - + k[5519]*y_cur[IDX_C4H2II]*y_cur[IDX_HC5NI] - + k[5570]*y_cur[IDX_HI]*y_cur[IDX_C4H2II] + k[5848]*y_cur[IDX_C4H2I] + + k[6173]*y_cur[IDX_C4H2I] - + k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] - + k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HCNHII] = 0.0 - + k[1089]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] - + k[1090]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] - + k[1091]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + + k[1476]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + + k[1478]*y_cur[IDX_C2HII]*y_cur[IDX_HNCI] + + k[1523]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + + k[1525]*y_cur[IDX_C2H2II]*y_cur[IDX_HNCI] + + k[1958]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + + k[1960]*y_cur[IDX_CHII]*y_cur[IDX_HNCI] - + k[2006]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] - + k[2007]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] + + k[2069]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + + k[2200]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] + + k[2229]*y_cur[IDX_CH5II]*y_cur[IDX_HCNI] + + k[2232]*y_cur[IDX_CH5II]*y_cur[IDX_HNCI] - + k[2251]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] - + k[2252]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] + + k[2450]*y_cur[IDX_H2I]*y_cur[IDX_HCNII] + + k[2512]*y_cur[IDX_H2OII]*y_cur[IDX_HCNI] + + k[2515]*y_cur[IDX_H2OII]*y_cur[IDX_HNCI] + + k[2694]*y_cur[IDX_H3II]*y_cur[IDX_HCNI] + + k[2706]*y_cur[IDX_H3II]*y_cur[IDX_HNCI] + + k[2806]*y_cur[IDX_H3OII]*y_cur[IDX_HCNI] + + k[2810]*y_cur[IDX_H3OII]*y_cur[IDX_HNCI] + + k[2856]*y_cur[IDX_HCNII]*y_cur[IDX_HCNI] + + k[2858]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] + + k[2859]*y_cur[IDX_HCNII]*y_cur[IDX_HNCI] + + k[2861]*y_cur[IDX_HCNI]*y_cur[IDX_C2H3II] + + k[2862]*y_cur[IDX_HCNI]*y_cur[IDX_C2H5II] + + k[2864]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] + + k[2872]*y_cur[IDX_HCNI]*y_cur[IDX_C2H6II] + + k[2874]*y_cur[IDX_HCNI]*y_cur[IDX_H2COII] + + k[2875]*y_cur[IDX_HCNI]*y_cur[IDX_H3COII] + + k[2876]*y_cur[IDX_HCNI]*y_cur[IDX_H3SII] + + k[2877]*y_cur[IDX_HCNI]*y_cur[IDX_HCOII] + + k[2878]*y_cur[IDX_HCNI]*y_cur[IDX_HNOII] + + k[2879]*y_cur[IDX_HCNI]*y_cur[IDX_HSII] + + k[2880]*y_cur[IDX_HCNI]*y_cur[IDX_HSiSII] + + k[2881]*y_cur[IDX_HCNI]*y_cur[IDX_N2HII] + + k[2882]*y_cur[IDX_HCNI]*y_cur[IDX_NCCNHII] + + k[2883]*y_cur[IDX_HCNI]*y_cur[IDX_O2HII] + + k[2884]*y_cur[IDX_HCNI]*y_cur[IDX_PHII] - + k[2886]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] - + k[2887]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] - + k[2888]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] - + k[2889]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] - + k[2890]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] - + k[2891]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] - + k[2892]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] - + k[2893]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] - + k[2894]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] - + k[2895]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] - + k[2896]*y_cur[IDX_HCNHII]*y_cur[IDX_SiI] + + k[3036]*y_cur[IDX_HNCI]*y_cur[IDX_C2H3II] + + k[3037]*y_cur[IDX_HNCI]*y_cur[IDX_C2H5II] + + k[3038]*y_cur[IDX_HNCI]*y_cur[IDX_H2COII] + + k[3039]*y_cur[IDX_HNCI]*y_cur[IDX_H3COII] + + k[3040]*y_cur[IDX_HNCI]*y_cur[IDX_H3SII] + + k[3041]*y_cur[IDX_HNCI]*y_cur[IDX_HCOII] + + k[3042]*y_cur[IDX_HNCI]*y_cur[IDX_HNOII] + + k[3043]*y_cur[IDX_HNCI]*y_cur[IDX_HSII] + + k[3044]*y_cur[IDX_HNCI]*y_cur[IDX_N2HII] + + k[3045]*y_cur[IDX_HNCI]*y_cur[IDX_O2HII] + + k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[3398]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] + + k[3407]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + + k[3493]*y_cur[IDX_NHII]*y_cur[IDX_HCNI] + + k[3495]*y_cur[IDX_NHII]*y_cur[IDX_HNCI] + + k[3519]*y_cur[IDX_NH2II]*y_cur[IDX_HCNI] + + k[3521]*y_cur[IDX_NH2II]*y_cur[IDX_HNCI] - + k[3540]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] - + k[3541]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + + k[3561]*y_cur[IDX_NH3I]*y_cur[IDX_C2NII] + + k[3564]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] + + k[3566]*y_cur[IDX_NH3I]*y_cur[IDX_CClII] + + k[3572]*y_cur[IDX_NH3I]*y_cur[IDX_CNCII] + + k[3581]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - + k[3582]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] - + k[3583]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + + k[3608]*y_cur[IDX_NHI]*y_cur[IDX_CH3II] - k[3629]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] - k[3630]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] + - k[3913]*y_cur[IDX_CM]*y_cur[IDX_NaII] + - k[3948]*y_cur[IDX_C10M]*y_cur[IDX_NaII] + - k[3983]*y_cur[IDX_C10HM]*y_cur[IDX_NaII] + - k[4018]*y_cur[IDX_C2M]*y_cur[IDX_NaII] + - k[4053]*y_cur[IDX_C2HM]*y_cur[IDX_NaII] + - k[4088]*y_cur[IDX_C3M]*y_cur[IDX_NaII] + - k[4123]*y_cur[IDX_C3HM]*y_cur[IDX_NaII] + - k[4158]*y_cur[IDX_C3NM]*y_cur[IDX_NaII] + - k[4193]*y_cur[IDX_C4M]*y_cur[IDX_NaII] + - k[4228]*y_cur[IDX_C4HM]*y_cur[IDX_NaII] + - k[4263]*y_cur[IDX_C5M]*y_cur[IDX_NaII] + - k[4298]*y_cur[IDX_C5HM]*y_cur[IDX_NaII] + - k[4333]*y_cur[IDX_C5NM]*y_cur[IDX_NaII] + - k[4368]*y_cur[IDX_C6M]*y_cur[IDX_NaII] + - k[4403]*y_cur[IDX_C6HM]*y_cur[IDX_NaII] + - k[4438]*y_cur[IDX_C7M]*y_cur[IDX_NaII] + - k[4473]*y_cur[IDX_C7HM]*y_cur[IDX_NaII] + - k[4508]*y_cur[IDX_C8M]*y_cur[IDX_NaII] + - k[4543]*y_cur[IDX_C8HM]*y_cur[IDX_NaII] + - k[4578]*y_cur[IDX_C9M]*y_cur[IDX_NaII] + - k[4613]*y_cur[IDX_C9HM]*y_cur[IDX_NaII] + - k[4648]*y_cur[IDX_CHM]*y_cur[IDX_NaII] + - k[4683]*y_cur[IDX_CNM]*y_cur[IDX_NaII] + - k[4719]*y_cur[IDX_HM]*y_cur[IDX_NaII] + - k[4754]*y_cur[IDX_OM]*y_cur[IDX_NaII] + - k[4789]*y_cur[IDX_O2M]*y_cur[IDX_NaII] + - k[4824]*y_cur[IDX_OHM]*y_cur[IDX_NaII] + - k[4859]*y_cur[IDX_SM]*y_cur[IDX_NaII] + - k[5622]*y_cur[IDX_NaII]*y_cur[IDX_eM] - k[5894]*y_cur[IDX_NaI] - - k[6231]*y_cur[IDX_NaI] - k[6305]*y_cur[IDX_NaI] + - k[6351]*y_cur[IDX_NaII]*y_cur[IDX_GRAINM] - k[6905]*y_cur[IDX_NaI] + - k[7087]*y_cur[IDX_GNaI] + k[7269]*y_cur[IDX_GNaI] + - k[7451]*y_cur[IDX_GNaI]; - ydot[yistart + IDX_NaII] = 0.0 + - k[188]*y_cur[IDX_CII]*y_cur[IDX_NaI] + - k[255]*y_cur[IDX_CHII]*y_cur[IDX_NaI] + - k[275]*y_cur[IDX_CH3II]*y_cur[IDX_NaI] + - k[473]*y_cur[IDX_H2OII]*y_cur[IDX_NaI] + - k[596]*y_cur[IDX_NH3II]*y_cur[IDX_NaI] + - k[632]*y_cur[IDX_NaI]*y_cur[IDX_C2H2II] + - k[633]*y_cur[IDX_NaI]*y_cur[IDX_CSII] + - k[634]*y_cur[IDX_NaI]*y_cur[IDX_FeII] + - k[635]*y_cur[IDX_NaI]*y_cur[IDX_H2COII] + - k[636]*y_cur[IDX_NaI]*y_cur[IDX_H2SII] + - k[637]*y_cur[IDX_NaI]*y_cur[IDX_HCOII] + - k[638]*y_cur[IDX_NaI]*y_cur[IDX_HSII] + - k[639]*y_cur[IDX_NaI]*y_cur[IDX_MgII] + + k[3781]*y_cur[IDX_OHII]*y_cur[IDX_HCNI] + + k[3784]*y_cur[IDX_OHII]*y_cur[IDX_HNCI] - + k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] - + k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] - + k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] - + k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] - + k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] - + k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] - + k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] - + k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] - + k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] - + k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] - + k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] - + k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] - + k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] - + k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] - + k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] - + k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] - + k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] - + k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] - + k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] - + k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] - + k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] - + k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] - + k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] - + k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] - + k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] - + k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] - + k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] - + k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] - + k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] - + k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] - + k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] - + k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] - + k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] - + k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] - + k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] - + k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] - + k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] - + k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] - + k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] - + k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] - + k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] - + k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] - + k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] - + k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] - + k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] - + k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] - + k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] - + k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] - + k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] - + k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] - + k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] - + k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] - + k[4813]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] - + k[4814]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] - + k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - + k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - + k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - + k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - + k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH2I] = 0.0 - k[1]*y_cur[IDX_CM]*y_cur[IDX_CH2I] + - k[59]*y_cur[IDX_CH2I]*y_cur[IDX_OM] - + k[69]*y_cur[IDX_HM]*y_cur[IDX_CH2I] + + k[71]*y_cur[IDX_HM]*y_cur[IDX_CHI] + + k[82]*y_cur[IDX_H2I]*y_cur[IDX_CM] + + k[105]*y_cur[IDX_HI]*y_cur[IDX_CHM] - + k[160]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + + k[258]*y_cur[IDX_CH2II]*y_cur[IDX_NOI] - + k[259]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] - + k[260]*y_cur[IDX_CH2I]*y_cur[IDX_CNII] - + k[261]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - + k[262]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] - + k[263]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] - + k[264]*y_cur[IDX_CH2I]*y_cur[IDX_N2II] - + k[265]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] - + k[266]*y_cur[IDX_CH2I]*y_cur[IDX_OII] - + k[267]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] - + k[268]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - + k[359]*y_cur[IDX_HII]*y_cur[IDX_CH2I] - + k[440]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] - + k[544]*y_cur[IDX_NII]*y_cur[IDX_CH2I] + + k[753]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[754]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[761]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[761]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[768]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[791]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[809]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[916]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + + k[920]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + + k[922]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] + + k[923]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[926]*y_cur[IDX_CH3C3NII]*y_cur[IDX_eM] + + k[939]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[945]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] + + k[950]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + + k[955]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + + k[963]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[968]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + + k[972]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[994]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + + k[996]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[1034]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1243]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + + k[1272]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + + k[1275]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1285]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] - + k[1342]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + + k[1369]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1482]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + + k[1730]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - + k[1936]*y_cur[IDX_CHII]*y_cur[IDX_CH2I] + + k[1939]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] + + k[1950]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - + k[1995]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] - + k[1996]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - + k[1997]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - + k[1998]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2II] - + k[1999]*y_cur[IDX_CH2I]*y_cur[IDX_CH3II] - + k[2000]*y_cur[IDX_CH2I]*y_cur[IDX_CH5II] - + k[2001]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - + k[2002]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] - + k[2003]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] - + k[2004]*y_cur[IDX_CH2I]*y_cur[IDX_H3OII] - + k[2005]*y_cur[IDX_CH2I]*y_cur[IDX_HCNII] - + k[2006]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] - + k[2007]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] - + k[2008]*y_cur[IDX_CH2I]*y_cur[IDX_HCOII] - + k[2009]*y_cur[IDX_CH2I]*y_cur[IDX_HNOII] - + k[2010]*y_cur[IDX_CH2I]*y_cur[IDX_N2HII] - + k[2011]*y_cur[IDX_CH2I]*y_cur[IDX_NHII] - + k[2012]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] - + k[2013]*y_cur[IDX_CH2I]*y_cur[IDX_NH3II] - + k[2014]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] - + k[2015]*y_cur[IDX_CH2I]*y_cur[IDX_O2HII] - + k[2016]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - + k[2017]*y_cur[IDX_CH2I]*y_cur[IDX_SII] - + k[2018]*y_cur[IDX_CH2I]*y_cur[IDX_SiII] - + k[2019]*y_cur[IDX_CH2I]*y_cur[IDX_SiOII] + + k[2071]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + + k[2088]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] + + k[2147]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + + k[2210]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - + k[2314]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + + k[2317]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - + k[2375]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] - + k[2634]*y_cur[IDX_H3II]*y_cur[IDX_CH2I] + + k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - + k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] - + k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + + k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + + k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + + k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + + k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + + k[3346]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + + k[3729]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - + k[4944]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - + k[4945]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - + k[4991]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2I] - + k[4992]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - + k[4992]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - + k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - + k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - + k[4994]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - + k[4994]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - + k[4995]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - + k[4995]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] - + k[4996]*y_cur[IDX_CH2I]*y_cur[IDX_CH4I] - + k[4997]*y_cur[IDX_CH2I]*y_cur[IDX_CNI] - + k[4998]*y_cur[IDX_CH2I]*y_cur[IDX_H2COI] - + k[4999]*y_cur[IDX_CH2I]*y_cur[IDX_HCOI] - + k[5000]*y_cur[IDX_CH2I]*y_cur[IDX_HNOI] - + k[5001]*y_cur[IDX_CH2I]*y_cur[IDX_N2I] - + k[5002]*y_cur[IDX_CH2I]*y_cur[IDX_NO2I] - + k[5003]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - + k[5004]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - + k[5005]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - + k[5006]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - + k[5007]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5009]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5010]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5011]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5012]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - + k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - + k[5014]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - + k[5015]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - + k[5016]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - + k[5017]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - + k[5018]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - + k[5019]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - + k[5020]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - + k[5021]*y_cur[IDX_CH2I]*y_cur[IDX_SiI] + + k[5028]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + + k[5029]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] + + k[5041]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + + k[5047]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + + k[5076]*y_cur[IDX_CHI]*y_cur[IDX_H2COI] + + k[5077]*y_cur[IDX_CHI]*y_cur[IDX_HCOI] + + k[5078]*y_cur[IDX_CHI]*y_cur[IDX_HNOI] + + k[5095]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - + k[5135]*y_cur[IDX_H2I]*y_cur[IDX_CH2I] + + k[5137]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - + k[5156]*y_cur[IDX_HI]*y_cur[IDX_CH2I] + + k[5158]*y_cur[IDX_HI]*y_cur[IDX_CH3I] + + k[5172]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - + k[5253]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - + k[5254]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - + k[5255]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + + k[5344]*y_cur[IDX_OI]*y_cur[IDX_C2H2I] + + k[5348]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + + k[5381]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + + k[5554]*y_cur[IDX_H2I]*y_cur[IDX_CI] + + k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] - k[5778]*y_cur[IDX_CH2I] + - k[5779]*y_cur[IDX_CH2I] + k[5788]*y_cur[IDX_CH2CNI] + + k[5790]*y_cur[IDX_CH2COI] + k[5791]*y_cur[IDX_CH2NHI] + + k[5793]*y_cur[IDX_CH3I] + k[5805]*y_cur[IDX_CH3CHCH2I] + + k[5820]*y_cur[IDX_CH4I] + k[5937]*y_cur[IDX_CH2OHI] - + k[6078]*y_cur[IDX_CH2I] - k[6079]*y_cur[IDX_CH2I] + + k[6090]*y_cur[IDX_CH2CNI] + k[6092]*y_cur[IDX_CH2COI] + + k[6094]*y_cur[IDX_CH2PHI] + k[6097]*y_cur[IDX_CH3I] + + k[6110]*y_cur[IDX_CH3CHCH2I] + k[6127]*y_cur[IDX_CH4I] + + k[6290]*y_cur[IDX_CH2OHI] + + k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + + k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + + k[6414]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + + k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + + k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + + k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + + k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + + k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + + k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM] - + k[6893]*y_cur[IDX_CH2I] + k[7075]*y_cur[IDX_GCH2I] + + k[7257]*y_cur[IDX_GCH2I] + k[7439]*y_cur[IDX_GCH2I] + + k[8577]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] + + k[8653]*y_cur[IDX_GH2I]*y_cur[IDX_GCI]; + ydot[yistart + IDX_HNCI] = 0.0 - + k[133]*y_cur[IDX_HII]*y_cur[IDX_HNCI] + + k[769]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + + k[914]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + + k[947]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] + + k[1007]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] + + k[1083]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + + k[1091]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + + k[1156]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] - + k[1413]*y_cur[IDX_CII]*y_cur[IDX_HNCI] - + k[1478]*y_cur[IDX_C2HII]*y_cur[IDX_HNCI] - + k[1525]*y_cur[IDX_C2H2II]*y_cur[IDX_HNCI] - + k[1960]*y_cur[IDX_CHII]*y_cur[IDX_HNCI] + + k[2007]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] - + k[2232]*y_cur[IDX_CH5II]*y_cur[IDX_HNCI] + + k[2252]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] - + k[2515]*y_cur[IDX_H2OII]*y_cur[IDX_HNCI] - + k[2706]*y_cur[IDX_H3II]*y_cur[IDX_HNCI] - + k[2810]*y_cur[IDX_H3OII]*y_cur[IDX_HNCI] - + k[2859]*y_cur[IDX_HCNII]*y_cur[IDX_HNCI] + + k[2887]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] + + k[2889]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] + + k[2891]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] + + k[2893]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] + + k[2895]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] + + k[3016]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + + k[3020]*y_cur[IDX_HNC3I]*y_cur[IDX_CH3II] + + k[3026]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3036]*y_cur[IDX_HNCI]*y_cur[IDX_C2H3II] - + k[3037]*y_cur[IDX_HNCI]*y_cur[IDX_C2H5II] - + k[3038]*y_cur[IDX_HNCI]*y_cur[IDX_H2COII] - + k[3039]*y_cur[IDX_HNCI]*y_cur[IDX_H3COII] - + k[3040]*y_cur[IDX_HNCI]*y_cur[IDX_H3SII] - + k[3041]*y_cur[IDX_HNCI]*y_cur[IDX_HCOII] - + k[3042]*y_cur[IDX_HNCI]*y_cur[IDX_HNOII] - + k[3043]*y_cur[IDX_HNCI]*y_cur[IDX_HSII] - + k[3044]*y_cur[IDX_HNCI]*y_cur[IDX_N2HII] - + k[3045]*y_cur[IDX_HNCI]*y_cur[IDX_O2HII] - + k[3046]*y_cur[IDX_HNCI]*y_cur[IDX_SiII] - + k[3261]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - + k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - + k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - + k[3495]*y_cur[IDX_NHII]*y_cur[IDX_HNCI] - + k[3521]*y_cur[IDX_NH2II]*y_cur[IDX_HNCI] + + k[3541]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + + k[3583]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + + k[3630]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] - + k[3784]*y_cur[IDX_OHII]*y_cur[IDX_HNCI] + + k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + + k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + + k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + + k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + + k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + + k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + + k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + + k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + + k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + + k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + + k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + + k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + + k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + + k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + + k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + + k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + + k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + + k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + + k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + + k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + + k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + + k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + + k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + + k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + + k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + + k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + + k[4814]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] + + k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - + k[4902]*y_cur[IDX_C2HI]*y_cur[IDX_HNCI] - + k[4907]*y_cur[IDX_C4HI]*y_cur[IDX_HNCI] + + k[4970]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - + k[5118]*y_cur[IDX_CNI]*y_cur[IDX_HNCI] - + k[5174]*y_cur[IDX_HI]*y_cur[IDX_HNCI] + + k[5212]*y_cur[IDX_HNC3I]*y_cur[IDX_CI] + + k[5214]*y_cur[IDX_HNCOI]*y_cur[IDX_CI] + + k[5254]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - k[5867]*y_cur[IDX_HNCI] + + k[6093]*y_cur[IDX_CH2NHI] - k[6198]*y_cur[IDX_HNCI] + + k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + + k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + + k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + + k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + + k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + + k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6913]*y_cur[IDX_HNCI] + k[7095]*y_cur[IDX_GHNCI] + + k[7277]*y_cur[IDX_GHNCI] + k[7459]*y_cur[IDX_GHNCI] + + k[8659]*y_cur[IDX_GCI]*y_cur[IDX_GNHI]; + ydot[yistart + IDX_NH3II] = 0.0 + + k[185]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + + k[253]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + + k[282]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] + + k[401]*y_cur[IDX_HII]*y_cur[IDX_NH3I] + + k[452]*y_cur[IDX_H2II]*y_cur[IDX_NH3I] + + k[524]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + + k[558]*y_cur[IDX_NII]*y_cur[IDX_NH3I] + + k[576]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + + k[582]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] - + k[592]*y_cur[IDX_NH3II]*y_cur[IDX_FeI] - + k[593]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] - + k[594]*y_cur[IDX_NH3II]*y_cur[IDX_MgI] - + k[595]*y_cur[IDX_NH3II]*y_cur[IDX_NOI] - + k[596]*y_cur[IDX_NH3II]*y_cur[IDX_NaI] - + k[597]*y_cur[IDX_NH3II]*y_cur[IDX_SiI] + + k[598]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] + + k[599]*y_cur[IDX_NH3I]*y_cur[IDX_C2H4II] + + k[600]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] + + k[601]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + + k[602]*y_cur[IDX_NH3I]*y_cur[IDX_COII] + + k[603]*y_cur[IDX_NH3I]*y_cur[IDX_CO2II] + + k[604]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] + + k[605]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] + + k[606]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] + + k[607]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NII] + + k[608]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] + + k[609]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] + + k[610]*y_cur[IDX_NH3I]*y_cur[IDX_N2II] + + k[611]*y_cur[IDX_NH3I]*y_cur[IDX_O2II] + + k[612]*y_cur[IDX_NH3I]*y_cur[IDX_OCSII] + + k[613]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + + k[614]*y_cur[IDX_NH3I]*y_cur[IDX_SII] + + k[615]*y_cur[IDX_NH3I]*y_cur[IDX_SOII] + + k[661]*y_cur[IDX_OII]*y_cur[IDX_NH3I] + + k[692]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] - + k[1163]*y_cur[IDX_NH3II]*y_cur[IDX_eM] - + k[1164]*y_cur[IDX_NH3II]*y_cur[IDX_eM] - + k[2013]*y_cur[IDX_CH2I]*y_cur[IDX_NH3II] - + k[2207]*y_cur[IDX_CH4I]*y_cur[IDX_NH3II] - + k[2260]*y_cur[IDX_CHI]*y_cur[IDX_NH3II] + + k[2463]*y_cur[IDX_H2I]*y_cur[IDX_NH2II] - + k[2464]*y_cur[IDX_H2I]*y_cur[IDX_NH3II] + + k[2721]*y_cur[IDX_H3II]*y_cur[IDX_NH2I] + + k[3491]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + + k[3497]*y_cur[IDX_NHII]*y_cur[IDX_NH2I] + + k[3511]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] + + k[3513]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + + k[3517]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + + k[3522]*y_cur[IDX_NH2II]*y_cur[IDX_NH2I] + + k[3529]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] + + k[3531]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + + k[3533]*y_cur[IDX_NH2I]*y_cur[IDX_CH5II] + + k[3535]*y_cur[IDX_NH2I]*y_cur[IDX_H2COII] + + k[3536]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] + + k[3537]*y_cur[IDX_NH2I]*y_cur[IDX_H3COII] + + k[3538]*y_cur[IDX_NH2I]*y_cur[IDX_H3OII] + + k[3539]*y_cur[IDX_NH2I]*y_cur[IDX_HCNII] + + k[3540]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + + k[3541]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + + k[3542]*y_cur[IDX_NH2I]*y_cur[IDX_HCOII] + + k[3543]*y_cur[IDX_NH2I]*y_cur[IDX_HNOII] + + k[3544]*y_cur[IDX_NH2I]*y_cur[IDX_N2HII] - + k[3545]*y_cur[IDX_NH2I]*y_cur[IDX_NH3II] + + k[3546]*y_cur[IDX_NH2I]*y_cur[IDX_O2HII] + + k[3547]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] - + k[3548]*y_cur[IDX_NH3II]*y_cur[IDX_C2I] - + k[3549]*y_cur[IDX_NH3II]*y_cur[IDX_H2COI] - + k[3550]*y_cur[IDX_NH3II]*y_cur[IDX_H2OI] - + k[3551]*y_cur[IDX_NH3II]*y_cur[IDX_H2SI] - + k[3552]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] - + k[3553]*y_cur[IDX_NH3II]*y_cur[IDX_NH3I] + + k[3617]*y_cur[IDX_NHI]*y_cur[IDX_NH2II] - + k[3618]*y_cur[IDX_NHI]*y_cur[IDX_NH3II] - + k[3747]*y_cur[IDX_OI]*y_cur[IDX_NH3II] - + k[3805]*y_cur[IDX_OHI]*y_cur[IDX_NH3II] - + k[3910]*y_cur[IDX_CM]*y_cur[IDX_NH3II] - + k[3945]*y_cur[IDX_C10M]*y_cur[IDX_NH3II] - + k[3980]*y_cur[IDX_C10HM]*y_cur[IDX_NH3II] - + k[4015]*y_cur[IDX_C2M]*y_cur[IDX_NH3II] - + k[4050]*y_cur[IDX_C2HM]*y_cur[IDX_NH3II] - + k[4085]*y_cur[IDX_C3M]*y_cur[IDX_NH3II] - + k[4120]*y_cur[IDX_C3HM]*y_cur[IDX_NH3II] - + k[4155]*y_cur[IDX_C3NM]*y_cur[IDX_NH3II] - + k[4190]*y_cur[IDX_C4M]*y_cur[IDX_NH3II] - + k[4225]*y_cur[IDX_C4HM]*y_cur[IDX_NH3II] - + k[4260]*y_cur[IDX_C5M]*y_cur[IDX_NH3II] - + k[4295]*y_cur[IDX_C5HM]*y_cur[IDX_NH3II] - + k[4330]*y_cur[IDX_C5NM]*y_cur[IDX_NH3II] - + k[4365]*y_cur[IDX_C6M]*y_cur[IDX_NH3II] - + k[4400]*y_cur[IDX_C6HM]*y_cur[IDX_NH3II] - + k[4435]*y_cur[IDX_C7M]*y_cur[IDX_NH3II] - + k[4470]*y_cur[IDX_C7HM]*y_cur[IDX_NH3II] - + k[4505]*y_cur[IDX_C8M]*y_cur[IDX_NH3II] - + k[4540]*y_cur[IDX_C8HM]*y_cur[IDX_NH3II] - + k[4575]*y_cur[IDX_C9M]*y_cur[IDX_NH3II] - + k[4610]*y_cur[IDX_C9HM]*y_cur[IDX_NH3II] - + k[4645]*y_cur[IDX_CHM]*y_cur[IDX_NH3II] - + k[4680]*y_cur[IDX_CNM]*y_cur[IDX_NH3II] - + k[4716]*y_cur[IDX_HM]*y_cur[IDX_NH3II] - + k[4751]*y_cur[IDX_OM]*y_cur[IDX_NH3II] - + k[4786]*y_cur[IDX_O2M]*y_cur[IDX_NH3II] - + k[4821]*y_cur[IDX_OHM]*y_cur[IDX_NH3II] - + k[4856]*y_cur[IDX_SM]*y_cur[IDX_NH3II] + k[5886]*y_cur[IDX_NH3I] + + k[6222]*y_cur[IDX_NH3I] - k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + - k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2H4I] = 0.0 - + k[148]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - + k[215]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + + k[231]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + + k[232]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + + k[233]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - + k[234]*y_cur[IDX_C2H4I]*y_cur[IDX_C2N2II] - + k[235]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - + k[236]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - + k[237]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H6II] - + k[238]*y_cur[IDX_C2H4I]*y_cur[IDX_CO2II] - + k[239]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] - + k[240]*y_cur[IDX_C2H4I]*y_cur[IDX_O2II] - + k[278]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] - + k[326]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - + k[438]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - + k[464]*y_cur[IDX_H2OII]*y_cur[IDX_C2H4I] - + k[510]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[599]*y_cur[IDX_NH3I]*y_cur[IDX_C2H4II] - + k[648]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + + k[767]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[769]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + + k[774]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + + k[809]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[935]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] + + k[1189]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] - + k[1302]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - + k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - + k[1304]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - + k[1305]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1373]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1483]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - + k[1484]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + + k[1511]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] + + k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + + k[1533]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1579]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H4I] + + k[1613]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - + k[1647]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] - + k[1648]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] - + k[1685]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H5II] - + k[1686]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - + k[1687]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - + k[1688]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] - + k[1689]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - + k[1690]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] - + k[1691]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - + k[1692]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] - + k[1693]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H3II] - + k[1694]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] - + k[1695]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] - + k[1696]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] - + k[1697]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] - + k[1698]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - + k[1699]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - + k[1700]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] - + k[1701]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] - + k[1702]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] - + k[1703]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H2II] - + k[1704]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H5II] - + k[1705]*y_cur[IDX_C2H4I]*y_cur[IDX_C7H2II] - + k[1706]*y_cur[IDX_C2H4I]*y_cur[IDX_CH2CCHII] - + k[1707]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] - + k[1708]*y_cur[IDX_C2H4I]*y_cur[IDX_HCOII] - + k[1709]*y_cur[IDX_C2H4I]*y_cur[IDX_NCCNHII] - + k[1710]*y_cur[IDX_C2H4I]*y_cur[IDX_PII] - + k[1711]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - + k[1712]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - + k[1713]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - + k[1714]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - + k[1715]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - + k[1716]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - + k[1717]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - + k[1718]*y_cur[IDX_C2H4I]*y_cur[IDX_SiII] + + k[1719]*y_cur[IDX_C2H5II]*y_cur[IDX_CH3CNI] + + k[1720]*y_cur[IDX_C2H5II]*y_cur[IDX_H2COI] + + k[1721]*y_cur[IDX_C2H5II]*y_cur[IDX_H2SI] + + k[1722]*y_cur[IDX_C2H5II]*y_cur[IDX_HC3NI] + + k[1771]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1777]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + + k[1808]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + + k[1815]*y_cur[IDX_C3H5II]*y_cur[IDX_CH3CHCH2I] - + k[2045]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - + k[2046]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - + k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + + k[2067]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + + k[2069]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + + k[2112]*y_cur[IDX_C2H6I]*y_cur[IDX_S2II] - + k[2135]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] - + k[2219]*y_cur[IDX_CH5II]*y_cur[IDX_C2H4I] - + k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - + k[2297]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - + k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] - + k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + + k[2524]*y_cur[IDX_H2OI]*y_cur[IDX_C2H5II] - + k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] - + k[2590]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + + k[2657]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2862]*y_cur[IDX_HCNI]*y_cur[IDX_C2H5II] + + k[3037]*y_cur[IDX_HNCI]*y_cur[IDX_C2H5II] - + k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - + k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - + k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - + k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3558]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5II] + + k[3564]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - + k[3632]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - + k[3633]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + + k[3772]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + + k[3825]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[3847]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - + k[3848]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - + k[3849]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - + k[3850]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - + k[4868]*y_cur[IDX_C2I]*y_cur[IDX_C2H4I] - + k[4883]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H3I] - + k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] - + k[4885]*y_cur[IDX_C2H4I]*y_cur[IDX_SiI] - + k[4914]*y_cur[IDX_CI]*y_cur[IDX_C2H4I] + + k[5024]*y_cur[IDX_C4H6I]*y_cur[IDX_HI] + + k[5026]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - + k[5065]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - + k[5066]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] + + k[5069]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] + + k[5074]*y_cur[IDX_CHI]*y_cur[IDX_CH4I] - + k[5105]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - + k[5106]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - + k[5225]*y_cur[IDX_NI]*y_cur[IDX_C2H4I] + + k[5226]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - + k[5346]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - + k[5347]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - + k[5348]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - + k[5349]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + + k[5382]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + + k[5457]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] - + k[5568]*y_cur[IDX_H3OII]*y_cur[IDX_C2H4I] - k[5700]*y_cur[IDX_C2H4I] + - k[5701]*y_cur[IDX_C2H4I] + k[5803]*y_cur[IDX_C2H6I] + + k[5805]*y_cur[IDX_CH3CHCH2I] + k[5941]*y_cur[IDX_C2H4CNI] - + k[5985]*y_cur[IDX_C2H4I] - k[5986]*y_cur[IDX_C2H4I] + + k[6108]*y_cur[IDX_C2H6I] + k[6110]*y_cur[IDX_CH3CHCH2I] + + k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + + k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + + k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - + k[6917]*y_cur[IDX_C2H4I] + k[7099]*y_cur[IDX_GC2H4I] + + k[7281]*y_cur[IDX_GC2H4I] + k[7463]*y_cur[IDX_GC2H4I] + + k[8589]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] + + k[8718]*y_cur[IDX_GCHI]*y_cur[IDX_GCH3I] + + k[8745]*y_cur[IDX_GCH2I]*y_cur[IDX_GCH2I]; + ydot[yistart + IDX_C2H3I] = 0.0 - + k[214]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - + k[231]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] - + k[269]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - + k[325]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + + k[759]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[766]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[799]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[808]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[914]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] - + k[1301]*y_cur[IDX_CII]*y_cur[IDX_C2H3I] + + k[1307]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] + + k[1329]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + + k[1374]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1380]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - + k[1481]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - + k[1482]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + + k[1534]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + + k[1562]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - + k[1577]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - + k[1578]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - + k[1628]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] - + k[1629]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] - + k[1630]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] - + k[1631]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H3II] - + k[1632]*y_cur[IDX_C2H3I]*y_cur[IDX_C4HII] - + k[1633]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] - + k[1634]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] - + k[1635]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] - + k[1636]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] - + k[1637]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] - + k[1638]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] - + k[1639]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] - + k[1640]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] - + k[1641]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] - + k[1642]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] - + k[1643]*y_cur[IDX_C2H3I]*y_cur[IDX_CH2CCHII] - + k[1644]*y_cur[IDX_C2H3I]*y_cur[IDX_HCOII] - + k[1645]*y_cur[IDX_C2H3I]*y_cur[IDX_SII] - + k[1646]*y_cur[IDX_C2H3I]*y_cur[IDX_SiII] + + k[1676]*y_cur[IDX_C2H4II]*y_cur[IDX_HC3NI] + + k[1707]*y_cur[IDX_C2H4I]*y_cur[IDX_HC3NII] + + k[1772]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1778]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] - + k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - + k[2044]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - + k[2295]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] - + k[2588]*y_cur[IDX_H3II]*y_cur[IDX_C2H3I] - + k[2767]*y_cur[IDX_H3OII]*y_cur[IDX_C2H3I] - + k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] - + k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + + k[3697]*y_cur[IDX_OI]*y_cur[IDX_C3H4II] + + k[3888]*y_cur[IDX_CM]*y_cur[IDX_C2H3II] + + k[3923]*y_cur[IDX_C10M]*y_cur[IDX_C2H3II] + + k[3958]*y_cur[IDX_C10HM]*y_cur[IDX_C2H3II] + + k[3993]*y_cur[IDX_C2M]*y_cur[IDX_C2H3II] + + k[4028]*y_cur[IDX_C2HM]*y_cur[IDX_C2H3II] + + k[4063]*y_cur[IDX_C3M]*y_cur[IDX_C2H3II] + + k[4098]*y_cur[IDX_C3HM]*y_cur[IDX_C2H3II] + + k[4133]*y_cur[IDX_C3NM]*y_cur[IDX_C2H3II] + + k[4168]*y_cur[IDX_C4M]*y_cur[IDX_C2H3II] + + k[4203]*y_cur[IDX_C4HM]*y_cur[IDX_C2H3II] + + k[4238]*y_cur[IDX_C5M]*y_cur[IDX_C2H3II] + + k[4273]*y_cur[IDX_C5HM]*y_cur[IDX_C2H3II] + + k[4308]*y_cur[IDX_C5NM]*y_cur[IDX_C2H3II] + + k[4343]*y_cur[IDX_C6M]*y_cur[IDX_C2H3II] + + k[4378]*y_cur[IDX_C6HM]*y_cur[IDX_C2H3II] + + k[4413]*y_cur[IDX_C7M]*y_cur[IDX_C2H3II] + + k[4448]*y_cur[IDX_C7HM]*y_cur[IDX_C2H3II] + + k[4483]*y_cur[IDX_C8M]*y_cur[IDX_C2H3II] + + k[4518]*y_cur[IDX_C8HM]*y_cur[IDX_C2H3II] + + k[4553]*y_cur[IDX_C9M]*y_cur[IDX_C2H3II] + + k[4588]*y_cur[IDX_C9HM]*y_cur[IDX_C2H3II] + + k[4623]*y_cur[IDX_CHM]*y_cur[IDX_C2H3II] + + k[4658]*y_cur[IDX_CNM]*y_cur[IDX_C2H3II] + + k[4693]*y_cur[IDX_HM]*y_cur[IDX_C2H3II] + + k[4729]*y_cur[IDX_OM]*y_cur[IDX_C2H3II] + + k[4764]*y_cur[IDX_O2M]*y_cur[IDX_C2H3II] + + k[4799]*y_cur[IDX_OHM]*y_cur[IDX_C2H3II] + + k[4834]*y_cur[IDX_SM]*y_cur[IDX_C2H3II] - + k[4881]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - + k[4882]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - + k[4883]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H3I] + + k[4898]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CHCH2I] - + k[4913]*y_cur[IDX_CI]*y_cur[IDX_C2H3I] + + k[4994]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + + k[5024]*y_cur[IDX_C4H6I]*y_cur[IDX_HI] - + k[5025]*y_cur[IDX_CH3I]*y_cur[IDX_C2H3I] + + k[5105]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - + k[5155]*y_cur[IDX_HI]*y_cur[IDX_C2H3I] - + k[5223]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - + k[5224]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - + k[5345]*y_cur[IDX_OI]*y_cur[IDX_C2H3I] + + k[5346]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + + k[5383]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - + k[5456]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] - + k[5586]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] - k[5698]*y_cur[IDX_C2H3I] - + k[5699]*y_cur[IDX_C2H3I] + k[5702]*y_cur[IDX_C2H5I] + + k[5787]*y_cur[IDX_CH2CHCNI] - k[5983]*y_cur[IDX_C2H3I] - + k[5984]*y_cur[IDX_C2H3I] + k[5987]*y_cur[IDX_C2H5I] + + k[6088]*y_cur[IDX_CH2CHCNI] + + k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - + k[6912]*y_cur[IDX_C2H3I] + k[7094]*y_cur[IDX_GC2H3I] + + k[7276]*y_cur[IDX_GC2H3I] + k[7458]*y_cur[IDX_GC2H3I] + + k[8588]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] + + k[8660]*y_cur[IDX_GCI]*y_cur[IDX_GCH3I] + + k[8716]*y_cur[IDX_GCHI]*y_cur[IDX_GCH2I]; + ydot[yistart + IDX_NH4II] = 0.0 - + k[1165]*y_cur[IDX_NH4II]*y_cur[IDX_eM] - + k[1166]*y_cur[IDX_NH4II]*y_cur[IDX_eM] - + k[1167]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + + k[1818]*y_cur[IDX_C3H7II]*y_cur[IDX_NH3I] - + k[1911]*y_cur[IDX_CI]*y_cur[IDX_NH4II] + + k[1964]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + + k[1989]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] + + k[2088]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] + + k[2121]*y_cur[IDX_CH3OH2II]*y_cur[IDX_NH3I] + + k[2144]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] + + k[2207]*y_cur[IDX_CH4I]*y_cur[IDX_NH3II] + + k[2260]*y_cur[IDX_CHI]*y_cur[IDX_NH3II] + + k[2464]*y_cur[IDX_H2I]*y_cur[IDX_NH3II] + + k[2723]*y_cur[IDX_H3II]*y_cur[IDX_NH3I] + + k[3498]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + + k[3514]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + + k[3518]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + + k[3523]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] + + k[3545]*y_cur[IDX_NH2I]*y_cur[IDX_NH3II] + + k[3549]*y_cur[IDX_NH3II]*y_cur[IDX_H2COI] + + k[3550]*y_cur[IDX_NH3II]*y_cur[IDX_H2OI] + + k[3551]*y_cur[IDX_NH3II]*y_cur[IDX_H2SI] + + k[3552]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + + k[3553]*y_cur[IDX_NH3II]*y_cur[IDX_NH3I] + + k[3554]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] + + k[3556]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] + + k[3557]*y_cur[IDX_NH3I]*y_cur[IDX_C2H3II] + + k[3558]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5II] + + k[3559]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5OH2II] + + k[3560]*y_cur[IDX_NH3I]*y_cur[IDX_C2H7II] + + k[3562]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] + + k[3565]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] + + k[3567]*y_cur[IDX_NH3I]*y_cur[IDX_CH2CHCNHII] + + k[3568]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] + + k[3569]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] + + k[3571]*y_cur[IDX_NH3I]*y_cur[IDX_CH5II] + + k[3574]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] + + k[3575]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] + + k[3576]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] + + k[3577]*y_cur[IDX_NH3I]*y_cur[IDX_H3COII] + + k[3578]*y_cur[IDX_NH3I]*y_cur[IDX_H3OII] + + k[3579]*y_cur[IDX_NH3I]*y_cur[IDX_H3SII] + + k[3580]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NHII] + + k[3582]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + + k[3583]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + + k[3584]*y_cur[IDX_NH3I]*y_cur[IDX_HCOII] + + k[3585]*y_cur[IDX_NH3I]*y_cur[IDX_HCO2II] + + k[3586]*y_cur[IDX_NH3I]*y_cur[IDX_HCOOH2II] + + k[3587]*y_cur[IDX_NH3I]*y_cur[IDX_HCSII] + + k[3588]*y_cur[IDX_NH3I]*y_cur[IDX_HNOII] + + k[3589]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] + + k[3590]*y_cur[IDX_NH3I]*y_cur[IDX_HSO2II] + + k[3591]*y_cur[IDX_NH3I]*y_cur[IDX_HSiSII] + + k[3592]*y_cur[IDX_NH3I]*y_cur[IDX_N2HII] + + k[3593]*y_cur[IDX_NH3I]*y_cur[IDX_NCCNHII] + + k[3594]*y_cur[IDX_NH3I]*y_cur[IDX_O2HII] + + k[3596]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + + k[3599]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] + + k[3601]*y_cur[IDX_NH3I]*y_cur[IDX_PH3II] + + k[3603]*y_cur[IDX_NH3I]*y_cur[IDX_SiHII] + + k[3604]*y_cur[IDX_NH3I]*y_cur[IDX_SiOHII] + + k[3618]*y_cur[IDX_NHI]*y_cur[IDX_NH3II] + + k[3786]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] + + k[3805]*y_cur[IDX_OHI]*y_cur[IDX_NH3II] - + k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] - + k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] - + k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] - + k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] - + k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] - + k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] - + k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] - + k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] - + k[4191]*y_cur[IDX_C4M]*y_cur[IDX_NH4II] - + k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] - + k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] - + k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] - + k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] - + k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] - + k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] - + k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] - + k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] - + k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] - + k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] - + k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] - + k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] - + k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] - + k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] - + k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] - + k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] - + k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] - + k[4822]*y_cur[IDX_OHM]*y_cur[IDX_NH4II] - + k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] - + k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - + k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - + k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_N2I] = 0.0 + + k[210]*y_cur[IDX_C2I]*y_cur[IDX_N2II] + + k[243]*y_cur[IDX_C2HI]*y_cur[IDX_N2II] + + k[247]*y_cur[IDX_CI]*y_cur[IDX_N2II] + + k[264]*y_cur[IDX_CH2I]*y_cur[IDX_N2II] + + k[293]*y_cur[IDX_CHI]*y_cur[IDX_N2II] + + k[306]*y_cur[IDX_CNI]*y_cur[IDX_N2II] + + k[316]*y_cur[IDX_COI]*y_cur[IDX_N2II] + + k[481]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] + + k[498]*y_cur[IDX_HCNI]*y_cur[IDX_N2II] - + k[523]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + + k[535]*y_cur[IDX_MgI]*y_cur[IDX_N2II] + + k[564]*y_cur[IDX_N2II]*y_cur[IDX_CO2I] + + k[565]*y_cur[IDX_N2II]*y_cur[IDX_FeI] + + k[566]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + + k[567]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + + k[568]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + + k[569]*y_cur[IDX_N2II]*y_cur[IDX_NOI] + + k[570]*y_cur[IDX_N2II]*y_cur[IDX_O2I] + + k[571]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] + + k[572]*y_cur[IDX_N2II]*y_cur[IDX_SI] + + k[573]*y_cur[IDX_NI]*y_cur[IDX_N2II] + + k[589]*y_cur[IDX_NH2I]*y_cur[IDX_N2II] + + k[610]*y_cur[IDX_NH3I]*y_cur[IDX_N2II] + + k[618]*y_cur[IDX_NHI]*y_cur[IDX_N2II] + k[640]*y_cur[IDX_NaI]*y_cur[IDX_N2II] + - k[641]*y_cur[IDX_NaI]*y_cur[IDX_NOII] + - k[642]*y_cur[IDX_NaI]*y_cur[IDX_O2II] + - k[643]*y_cur[IDX_NaI]*y_cur[IDX_SII] + - k[644]*y_cur[IDX_NaI]*y_cur[IDX_SOII] + - k[645]*y_cur[IDX_NaI]*y_cur[IDX_SiII] + - k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] + - k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] + - k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] + - k[3629]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] + - k[3630]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] - - k[3913]*y_cur[IDX_CM]*y_cur[IDX_NaII] - - k[3948]*y_cur[IDX_C10M]*y_cur[IDX_NaII] - - k[3983]*y_cur[IDX_C10HM]*y_cur[IDX_NaII] - - k[4018]*y_cur[IDX_C2M]*y_cur[IDX_NaII] - - k[4053]*y_cur[IDX_C2HM]*y_cur[IDX_NaII] - - k[4088]*y_cur[IDX_C3M]*y_cur[IDX_NaII] - - k[4123]*y_cur[IDX_C3HM]*y_cur[IDX_NaII] - - k[4158]*y_cur[IDX_C3NM]*y_cur[IDX_NaII] - - k[4193]*y_cur[IDX_C4M]*y_cur[IDX_NaII] - - k[4228]*y_cur[IDX_C4HM]*y_cur[IDX_NaII] - - k[4263]*y_cur[IDX_C5M]*y_cur[IDX_NaII] - - k[4298]*y_cur[IDX_C5HM]*y_cur[IDX_NaII] - - k[4333]*y_cur[IDX_C5NM]*y_cur[IDX_NaII] - - k[4368]*y_cur[IDX_C6M]*y_cur[IDX_NaII] - - k[4403]*y_cur[IDX_C6HM]*y_cur[IDX_NaII] - - k[4438]*y_cur[IDX_C7M]*y_cur[IDX_NaII] - - k[4473]*y_cur[IDX_C7HM]*y_cur[IDX_NaII] - - k[4508]*y_cur[IDX_C8M]*y_cur[IDX_NaII] - - k[4543]*y_cur[IDX_C8HM]*y_cur[IDX_NaII] - - k[4578]*y_cur[IDX_C9M]*y_cur[IDX_NaII] - - k[4613]*y_cur[IDX_C9HM]*y_cur[IDX_NaII] - - k[4648]*y_cur[IDX_CHM]*y_cur[IDX_NaII] - - k[4683]*y_cur[IDX_CNM]*y_cur[IDX_NaII] - - k[4719]*y_cur[IDX_HM]*y_cur[IDX_NaII] - - k[4754]*y_cur[IDX_OM]*y_cur[IDX_NaII] - - k[4789]*y_cur[IDX_O2M]*y_cur[IDX_NaII] - - k[4824]*y_cur[IDX_OHM]*y_cur[IDX_NaII] - - k[4859]*y_cur[IDX_SM]*y_cur[IDX_NaII] - - k[5622]*y_cur[IDX_NaII]*y_cur[IDX_eM] + k[5894]*y_cur[IDX_NaI] + - k[6231]*y_cur[IDX_NaI] + k[6305]*y_cur[IDX_NaI] - - k[6351]*y_cur[IDX_NaII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_OI] = 0.0 - k[8]*y_cur[IDX_CM]*y_cur[IDX_OI] - - k[63]*y_cur[IDX_CHI]*y_cur[IDX_OI] - - k[80]*y_cur[IDX_HM]*y_cur[IDX_OI] - - k[126]*y_cur[IDX_OM]*y_cur[IDX_OI] - - k[128]*y_cur[IDX_OI]*y_cur[IDX_C2M] - - k[129]*y_cur[IDX_OI]*y_cur[IDX_C2HM] - - k[130]*y_cur[IDX_OI]*y_cur[IDX_C3NM] - - k[131]*y_cur[IDX_OI]*y_cur[IDX_C5NM] - - k[132]*y_cur[IDX_OI]*y_cur[IDX_SM] + - k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] + - k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] + - k[139]*y_cur[IDX_H2I]*y_cur[IDX_OHI] + - k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] + - k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] + - k[145]*y_cur[IDX_HI]*y_cur[IDX_OHI] + - k[266]*y_cur[IDX_CH2I]*y_cur[IDX_OII] + - k[295]*y_cur[IDX_CHI]*y_cur[IDX_OII] - - k[406]*y_cur[IDX_HII]*y_cur[IDX_OI] + - k[492]*y_cur[IDX_HI]*y_cur[IDX_OII] + - k[619]*y_cur[IDX_NHI]*y_cur[IDX_OII] + - k[646]*y_cur[IDX_OII]*y_cur[IDX_C2I] + - k[647]*y_cur[IDX_OII]*y_cur[IDX_C2H2I] + - k[648]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + - k[649]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + - k[650]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] + - k[651]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + - k[652]*y_cur[IDX_OII]*y_cur[IDX_CH4I] + - k[653]*y_cur[IDX_OII]*y_cur[IDX_COI] + - k[654]*y_cur[IDX_OII]*y_cur[IDX_FeI] + - k[655]*y_cur[IDX_OII]*y_cur[IDX_H2COI] + - k[656]*y_cur[IDX_OII]*y_cur[IDX_H2OI] + - k[657]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + - k[658]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + - k[659]*y_cur[IDX_OII]*y_cur[IDX_N2OI] + - k[660]*y_cur[IDX_OII]*y_cur[IDX_NH2I] + - k[661]*y_cur[IDX_OII]*y_cur[IDX_NH3I] + - k[662]*y_cur[IDX_OII]*y_cur[IDX_O2I] + - k[663]*y_cur[IDX_OII]*y_cur[IDX_OCSI] + - k[664]*y_cur[IDX_OII]*y_cur[IDX_OHI] + - k[665]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + - k[666]*y_cur[IDX_OM]*y_cur[IDX_CNI] + - k[667]*y_cur[IDX_OM]*y_cur[IDX_O2I] - - k[681]*y_cur[IDX_OI]*y_cur[IDX_CNII] - - k[682]*y_cur[IDX_OI]*y_cur[IDX_COII] - - k[683]*y_cur[IDX_OI]*y_cur[IDX_CO2II] - k[684]*y_cur[IDX_OI]*y_cur[IDX_N2II] + - k[919]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + - k[956]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + - k[957]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + - k[980]*y_cur[IDX_COII]*y_cur[IDX_eM] + - k[981]*y_cur[IDX_CO2II]*y_cur[IDX_eM] + - k[986]*y_cur[IDX_ClOII]*y_cur[IDX_eM] + - k[996]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + - k[1012]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + - k[1013]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + - k[1042]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + - k[1055]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + - k[1099]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + + k[700]*y_cur[IDX_OHI]*y_cur[IDX_N2II] + k[1113]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] + - k[1135]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + - k[1136]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + - k[1143]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + - k[1168]*y_cur[IDX_NOII]*y_cur[IDX_eM] + - k[1169]*y_cur[IDX_NO2II]*y_cur[IDX_eM] + + k[1114]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] + + k[1151]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + + k[1152]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + k[1170]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + - k[1172]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + - k[1174]*y_cur[IDX_O2II]*y_cur[IDX_eM] + - k[1174]*y_cur[IDX_O2II]*y_cur[IDX_eM] + - k[1178]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + - k[1180]*y_cur[IDX_OHII]*y_cur[IDX_eM] + - k[1218]*y_cur[IDX_POII]*y_cur[IDX_eM] + - k[1220]*y_cur[IDX_SOII]*y_cur[IDX_eM] + - k[1221]*y_cur[IDX_SO2II]*y_cur[IDX_eM] + - k[1221]*y_cur[IDX_SO2II]*y_cur[IDX_eM] + - k[1222]*y_cur[IDX_SO2II]*y_cur[IDX_eM] + - k[1266]*y_cur[IDX_SiOII]*y_cur[IDX_eM] + - k[1314]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + - k[1422]*y_cur[IDX_CII]*y_cur[IDX_O2I] + - k[1428]*y_cur[IDX_CII]*y_cur[IDX_SOI] + - k[1449]*y_cur[IDX_CM]*y_cur[IDX_NOI] + - k[1912]*y_cur[IDX_CI]*y_cur[IDX_O2II] + - k[1914]*y_cur[IDX_CI]*y_cur[IDX_OHII] + + k[1461]*y_cur[IDX_C2I]*y_cur[IDX_N2HII] + + k[1568]*y_cur[IDX_C2H2I]*y_cur[IDX_N2HII] + + k[1748]*y_cur[IDX_C2HI]*y_cur[IDX_N2HII] + + k[1909]*y_cur[IDX_CI]*y_cur[IDX_N2HII] + + k[2010]*y_cur[IDX_CH2I]*y_cur[IDX_N2HII] + + k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] + + k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + + k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + + k[2206]*y_cur[IDX_CH4I]*y_cur[IDX_N2HII] + + k[2257]*y_cur[IDX_CHI]*y_cur[IDX_N2HII] + + k[2288]*y_cur[IDX_COI]*y_cur[IDX_N2HII] - + k[2391]*y_cur[IDX_H2II]*y_cur[IDX_N2I] + + k[2558]*y_cur[IDX_H2OI]*y_cur[IDX_N2HII] - + k[2718]*y_cur[IDX_H3II]*y_cur[IDX_N2I] + + k[2881]*y_cur[IDX_HCNI]*y_cur[IDX_N2HII] + + k[3009]*y_cur[IDX_HCOI]*y_cur[IDX_N2HII] + + k[3035]*y_cur[IDX_HNC3I]*y_cur[IDX_N2HII] + + k[3044]*y_cur[IDX_HNCI]*y_cur[IDX_N2HII] - + k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + + k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3351]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] + + k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + + k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + + k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + + k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - + k[3366]*y_cur[IDX_N2I]*y_cur[IDX_HNOII] - + k[3367]*y_cur[IDX_N2I]*y_cur[IDX_O2HII] + + k[3368]*y_cur[IDX_N2HII]*y_cur[IDX_C6H6I] + + k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] + + k[3370]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] + + k[3371]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CNI] + + k[3372]*y_cur[IDX_N2HII]*y_cur[IDX_CO2I] + + k[3373]*y_cur[IDX_N2HII]*y_cur[IDX_H2COI] + + k[3374]*y_cur[IDX_N2HII]*y_cur[IDX_HC3NI] + + k[3375]*y_cur[IDX_N2HII]*y_cur[IDX_NCCNI] + + k[3376]*y_cur[IDX_N2HII]*y_cur[IDX_SI] + + k[3461]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - + k[3496]*y_cur[IDX_NHII]*y_cur[IDX_N2I] + + k[3544]*y_cur[IDX_NH2I]*y_cur[IDX_N2HII] + + k[3592]*y_cur[IDX_NH3I]*y_cur[IDX_N2HII] + + k[3616]*y_cur[IDX_NHI]*y_cur[IDX_N2HII] - + k[3647]*y_cur[IDX_OII]*y_cur[IDX_N2I] + + k[3745]*y_cur[IDX_OI]*y_cur[IDX_N2HII] - + k[3785]*y_cur[IDX_OHII]*y_cur[IDX_N2I] + + k[3804]*y_cur[IDX_OHI]*y_cur[IDX_N2HII] + + k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] + + k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] + + k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] + + k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] + + k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] + + k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] + + k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] + + k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] + + k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] + + k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] + + k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] + + k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] + + k[4329]*y_cur[IDX_C5NM]*y_cur[IDX_N2HII] + + k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] + + k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] + + k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] + + k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] + + k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] + + k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] + + k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] + + k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] + + k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] + + k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] + + k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] + + k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] + + k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] + + k[4820]*y_cur[IDX_OHM]*y_cur[IDX_N2HII] + + k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] - + k[4967]*y_cur[IDX_CI]*y_cur[IDX_N2I] - + k[5001]*y_cur[IDX_CH2I]*y_cur[IDX_N2I] - + k[5079]*y_cur[IDX_CHI]*y_cur[IDX_N2I] + + k[5113]*y_cur[IDX_CNI]*y_cur[IDX_CNI] + + k[5121]*y_cur[IDX_CNI]*y_cur[IDX_NOI] + + k[5128]*y_cur[IDX_COI]*y_cur[IDX_N2OI] + + k[5179]*y_cur[IDX_HI]*y_cur[IDX_N2OI] - + k[5220]*y_cur[IDX_N2I]*y_cur[IDX_O2I] + + k[5260]*y_cur[IDX_NI]*y_cur[IDX_CNI] + + k[5261]*y_cur[IDX_NI]*y_cur[IDX_CNI] + + k[5273]*y_cur[IDX_NI]*y_cur[IDX_NCCNI] + + k[5274]*y_cur[IDX_NI]*y_cur[IDX_NHI] + + k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + + k[5278]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + + k[5279]*y_cur[IDX_NI]*y_cur[IDX_NOI] + + k[5280]*y_cur[IDX_NI]*y_cur[IDX_NSI] + + k[5286]*y_cur[IDX_NI]*y_cur[IDX_PNI] + + k[5298]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + + k[5299]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + + k[5308]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + + k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + + k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + + k[5314]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + + k[5327]*y_cur[IDX_NOI]*y_cur[IDX_N2OI] + + k[5329]*y_cur[IDX_NOI]*y_cur[IDX_NOI] + + k[5331]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - + k[5417]*y_cur[IDX_OI]*y_cur[IDX_N2I] + + k[5419]*y_cur[IDX_OI]*y_cur[IDX_N2OI] + + k[5474]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - k[5878]*y_cur[IDX_N2I] - + k[6211]*y_cur[IDX_N2I] + k[6212]*y_cur[IDX_N2OI] + + k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + + k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + + k[6559]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] - k[6916]*y_cur[IDX_N2I] + + k[7098]*y_cur[IDX_GN2I] + k[7280]*y_cur[IDX_GN2I] + + k[7462]*y_cur[IDX_GN2I] + k[8700]*y_cur[IDX_GNI]*y_cur[IDX_GNI]; + ydot[yistart + IDX_O2I] = 0.0 - k[7]*y_cur[IDX_CM]*y_cur[IDX_O2I] + + k[126]*y_cur[IDX_OM]*y_cur[IDX_OI] - + k[127]*y_cur[IDX_O2I]*y_cur[IDX_SM] - + k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - + k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] - + k[146]*y_cur[IDX_O2M]*y_cur[IDX_O2I] + + k[146]*y_cur[IDX_O2M]*y_cur[IDX_O2I] + + k[146]*y_cur[IDX_O2M]*y_cur[IDX_O2I] + + k[211]*y_cur[IDX_C2I]*y_cur[IDX_O2II] + + k[240]*y_cur[IDX_C2H4I]*y_cur[IDX_O2II] + + k[248]*y_cur[IDX_CI]*y_cur[IDX_O2II] + + k[267]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] - + k[283]*y_cur[IDX_CH4II]*y_cur[IDX_O2I] + + k[296]*y_cur[IDX_CHI]*y_cur[IDX_O2II] - + k[304]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - + k[312]*y_cur[IDX_COII]*y_cur[IDX_O2I] - + k[405]*y_cur[IDX_HII]*y_cur[IDX_O2I] - + k[455]*y_cur[IDX_H2II]*y_cur[IDX_O2I] + + k[461]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] - + k[474]*y_cur[IDX_H2OII]*y_cur[IDX_O2I] - + k[495]*y_cur[IDX_HCNII]*y_cur[IDX_O2I] + + k[502]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] - + k[525]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + + k[537]*y_cur[IDX_MgI]*y_cur[IDX_O2II] - + k[561]*y_cur[IDX_NII]*y_cur[IDX_O2I] - + k[570]*y_cur[IDX_N2II]*y_cur[IDX_O2I] - + k[578]*y_cur[IDX_NHII]*y_cur[IDX_O2I] + + k[590]*y_cur[IDX_NH2I]*y_cur[IDX_O2II] + + k[611]*y_cur[IDX_NH3I]*y_cur[IDX_O2II] + + k[628]*y_cur[IDX_NOI]*y_cur[IDX_O2II] + + k[642]*y_cur[IDX_NaI]*y_cur[IDX_O2II] - + k[662]*y_cur[IDX_OII]*y_cur[IDX_O2I] - + k[667]*y_cur[IDX_OM]*y_cur[IDX_O2I] + + k[668]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + + k[669]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + + k[670]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[671]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] + + k[672]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] + + k[673]*y_cur[IDX_O2II]*y_cur[IDX_FeI] + + k[674]*y_cur[IDX_O2II]*y_cur[IDX_H2SI] + + k[675]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + + k[676]*y_cur[IDX_O2II]*y_cur[IDX_NO2I] + + k[677]*y_cur[IDX_O2II]*y_cur[IDX_SI] - + k[678]*y_cur[IDX_O2I]*y_cur[IDX_CO2II] - + k[679]*y_cur[IDX_O2I]*y_cur[IDX_ClII] - + k[680]*y_cur[IDX_O2I]*y_cur[IDX_SO2II] - + k[694]*y_cur[IDX_OHII]*y_cur[IDX_O2I] + + k[722]*y_cur[IDX_SiI]*y_cur[IDX_O2II] + + k[1175]*y_cur[IDX_O2HII]*y_cur[IDX_eM] - + k[1422]*y_cur[IDX_CII]*y_cur[IDX_O2I] - + k[1423]*y_cur[IDX_CII]*y_cur[IDX_O2I] - + k[1450]*y_cur[IDX_CM]*y_cur[IDX_O2I] - + k[1455]*y_cur[IDX_C2II]*y_cur[IDX_O2I] + + k[1463]*y_cur[IDX_C2I]*y_cur[IDX_O2HII] + + k[1749]*y_cur[IDX_C2HI]*y_cur[IDX_O2HII] + + k[1913]*y_cur[IDX_CI]*y_cur[IDX_O2HII] - + k[1966]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - k[1967]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - - k[1969]*y_cur[IDX_CHII]*y_cur[IDX_OI] - - k[1991]*y_cur[IDX_CH2II]*y_cur[IDX_OI] + - k[2014]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] + - k[2016]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] + - k[2089]*y_cur[IDX_CH3II]*y_cur[IDX_O2I] - - k[2090]*y_cur[IDX_CH3II]*y_cur[IDX_OI] - - k[2091]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + - k[2209]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] + - k[2262]*y_cur[IDX_CHI]*y_cur[IDX_O2II] + - k[2264]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + + k[1968]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - + k[1990]*y_cur[IDX_CH2II]*y_cur[IDX_O2I] + + k[2015]*y_cur[IDX_CH2I]*y_cur[IDX_O2HII] - + k[2089]*y_cur[IDX_CH3II]*y_cur[IDX_O2I] + + k[2263]*y_cur[IDX_CHI]*y_cur[IDX_O2HII] - + k[2275]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - k[2276]*y_cur[IDX_CNII]*y_cur[IDX_O2I] + - k[2334]*y_cur[IDX_HII]*y_cur[IDX_CO2I] + - k[2354]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - - k[2396]*y_cur[IDX_H2II]*y_cur[IDX_OI] + - k[2535]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - - k[2730]*y_cur[IDX_H3II]*y_cur[IDX_OI] - - k[2731]*y_cur[IDX_H3II]*y_cur[IDX_OI] + - k[2841]*y_cur[IDX_HI]*y_cur[IDX_CO2II] + - k[3099]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + - k[3205]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + - k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] + - k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] + - k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + - k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + - k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + - k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + - k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + + k[2279]*y_cur[IDX_CNI]*y_cur[IDX_O2HII] + + k[2289]*y_cur[IDX_COI]*y_cur[IDX_O2HII] - + k[2395]*y_cur[IDX_H2II]*y_cur[IDX_O2I] + + k[2468]*y_cur[IDX_H2I]*y_cur[IDX_O2HII] - + k[2489]*y_cur[IDX_H2COII]*y_cur[IDX_O2I] + + k[2498]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + + k[2499]*y_cur[IDX_H2COI]*y_cur[IDX_O2HII] + + k[2561]*y_cur[IDX_H2OI]*y_cur[IDX_O2HII] - + k[2729]*y_cur[IDX_H3II]*y_cur[IDX_O2I] + + k[2883]*y_cur[IDX_HCNI]*y_cur[IDX_O2HII] + + k[3011]*y_cur[IDX_HCOI]*y_cur[IDX_O2HII] + + k[3045]*y_cur[IDX_HNCI]*y_cur[IDX_O2HII] + + k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - k[3290]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + - k[3291]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + - k[3293]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] + - k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + - k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + - k[3332]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + - k[3356]*y_cur[IDX_NII]*y_cur[IDX_NOI] + - k[3357]*y_cur[IDX_NII]*y_cur[IDX_O2I] + - k[3465]*y_cur[IDX_NI]*y_cur[IDX_O2II] + - k[3468]*y_cur[IDX_NI]*y_cur[IDX_SOII] + - k[3491]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + - k[3500]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - - k[3503]*y_cur[IDX_NHII]*y_cur[IDX_OI] + - k[3514]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + - k[3524]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] + - k[3547]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] + - k[3620]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + - k[3623]*y_cur[IDX_NHI]*y_cur[IDX_OHII] + - k[3654]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + - k[3667]*y_cur[IDX_O2II]*y_cur[IDX_SI] + - k[3668]*y_cur[IDX_O2I]*y_cur[IDX_C3II] + - k[3671]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + - k[3672]*y_cur[IDX_O2I]*y_cur[IDX_CSII] + - k[3674]*y_cur[IDX_O2I]*y_cur[IDX_SII] - - k[3678]*y_cur[IDX_OI]*y_cur[IDX_C10M] - - k[3679]*y_cur[IDX_OI]*y_cur[IDX_C10HII] - - k[3680]*y_cur[IDX_OI]*y_cur[IDX_C10HII] - - k[3681]*y_cur[IDX_OI]*y_cur[IDX_C10HM] - - k[3682]*y_cur[IDX_OI]*y_cur[IDX_C10H2II] - - k[3683]*y_cur[IDX_OI]*y_cur[IDX_C10H3II] - - k[3684]*y_cur[IDX_OI]*y_cur[IDX_C2II] - - k[3685]*y_cur[IDX_OI]*y_cur[IDX_C2M] - - k[3686]*y_cur[IDX_OI]*y_cur[IDX_C2HII] - - k[3687]*y_cur[IDX_OI]*y_cur[IDX_C2HM] - - k[3688]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] - - k[3689]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] - - k[3690]*y_cur[IDX_OI]*y_cur[IDX_C2H3II] - - k[3691]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] - - k[3692]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] - - k[3693]*y_cur[IDX_OI]*y_cur[IDX_C3M] - - k[3694]*y_cur[IDX_OI]*y_cur[IDX_C3HM] - - k[3695]*y_cur[IDX_OI]*y_cur[IDX_C3H2II] - - k[3696]*y_cur[IDX_OI]*y_cur[IDX_C3H3II] - - k[3697]*y_cur[IDX_OI]*y_cur[IDX_C3H4II] - - k[3698]*y_cur[IDX_OI]*y_cur[IDX_C4M] - - k[3699]*y_cur[IDX_OI]*y_cur[IDX_C4HII] - - k[3700]*y_cur[IDX_OI]*y_cur[IDX_C4HM] - - k[3701]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - - k[3702]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - - k[3703]*y_cur[IDX_OI]*y_cur[IDX_C5M] - - k[3704]*y_cur[IDX_OI]*y_cur[IDX_C5HII] - - k[3705]*y_cur[IDX_OI]*y_cur[IDX_C5HM] - - k[3706]*y_cur[IDX_OI]*y_cur[IDX_C5H2II] - - k[3707]*y_cur[IDX_OI]*y_cur[IDX_C5H3II] - - k[3708]*y_cur[IDX_OI]*y_cur[IDX_C6M] - - k[3709]*y_cur[IDX_OI]*y_cur[IDX_C6HM] - - k[3710]*y_cur[IDX_OI]*y_cur[IDX_C6H2II] - - k[3711]*y_cur[IDX_OI]*y_cur[IDX_C6H3II] - - k[3712]*y_cur[IDX_OI]*y_cur[IDX_C7M] - - k[3713]*y_cur[IDX_OI]*y_cur[IDX_C7HII] - - k[3714]*y_cur[IDX_OI]*y_cur[IDX_C7HM] - - k[3715]*y_cur[IDX_OI]*y_cur[IDX_C7H2II] - - k[3716]*y_cur[IDX_OI]*y_cur[IDX_C7H3II] - - k[3717]*y_cur[IDX_OI]*y_cur[IDX_C8M] - - k[3718]*y_cur[IDX_OI]*y_cur[IDX_C8HM] - - k[3719]*y_cur[IDX_OI]*y_cur[IDX_C8H2II] - - k[3720]*y_cur[IDX_OI]*y_cur[IDX_C8H3II] - - k[3721]*y_cur[IDX_OI]*y_cur[IDX_C9M] - - k[3722]*y_cur[IDX_OI]*y_cur[IDX_C9HII] - - k[3723]*y_cur[IDX_OI]*y_cur[IDX_C9HM] - - k[3724]*y_cur[IDX_OI]*y_cur[IDX_C9H2II] - - k[3725]*y_cur[IDX_OI]*y_cur[IDX_C9H3II] - - k[3726]*y_cur[IDX_OI]*y_cur[IDX_CH2CCHII] - - k[3727]*y_cur[IDX_OI]*y_cur[IDX_CH4II] - - k[3728]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - - k[3729]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - - k[3730]*y_cur[IDX_OI]*y_cur[IDX_CO2II] - - k[3731]*y_cur[IDX_OI]*y_cur[IDX_CPII] - - k[3732]*y_cur[IDX_OI]*y_cur[IDX_CSII] - - k[3733]*y_cur[IDX_OI]*y_cur[IDX_H2OII] - - k[3734]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - - k[3735]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - - k[3736]*y_cur[IDX_OI]*y_cur[IDX_HCO2II] - - k[3737]*y_cur[IDX_OI]*y_cur[IDX_HCPII] - - k[3738]*y_cur[IDX_OI]*y_cur[IDX_HCSII] - - k[3739]*y_cur[IDX_OI]*y_cur[IDX_HCSII] - - k[3740]*y_cur[IDX_OI]*y_cur[IDX_HNOII] - - k[3741]*y_cur[IDX_OI]*y_cur[IDX_HPOII] - - k[3742]*y_cur[IDX_OI]*y_cur[IDX_HSII] - - k[3743]*y_cur[IDX_OI]*y_cur[IDX_HSII] - - k[3744]*y_cur[IDX_OI]*y_cur[IDX_N2II] - - k[3745]*y_cur[IDX_OI]*y_cur[IDX_N2HII] - - k[3746]*y_cur[IDX_OI]*y_cur[IDX_NH2II] - - k[3747]*y_cur[IDX_OI]*y_cur[IDX_NH3II] - - k[3748]*y_cur[IDX_OI]*y_cur[IDX_NSII] - - k[3749]*y_cur[IDX_OI]*y_cur[IDX_O2HII] - - k[3750]*y_cur[IDX_OI]*y_cur[IDX_OHII] - - k[3751]*y_cur[IDX_OI]*y_cur[IDX_PHII] - - k[3752]*y_cur[IDX_OI]*y_cur[IDX_PNII] - - k[3753]*y_cur[IDX_OI]*y_cur[IDX_SiCII] - - k[3754]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - - k[3755]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - - k[3756]*y_cur[IDX_OI]*y_cur[IDX_SiHII] - - k[3757]*y_cur[IDX_OI]*y_cur[IDX_SiH2II] - - k[3758]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - - k[3759]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - - k[3760]*y_cur[IDX_OI]*y_cur[IDX_SiH5II] - - k[3761]*y_cur[IDX_OI]*y_cur[IDX_SiNII] - - k[3762]*y_cur[IDX_OI]*y_cur[IDX_SiNCII] - - k[3763]*y_cur[IDX_OI]*y_cur[IDX_SiNCHII] - - k[3764]*y_cur[IDX_OI]*y_cur[IDX_SiOII] + - k[3769]*y_cur[IDX_OHII]*y_cur[IDX_C2I] + - k[3770]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] + - k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + - k[3774]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + - k[3775]*y_cur[IDX_OHII]*y_cur[IDX_CNI] + - k[3776]*y_cur[IDX_OHII]*y_cur[IDX_CO2I] + - k[3777]*y_cur[IDX_OHII]*y_cur[IDX_COI] + - k[3778]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] + - k[3779]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] + - k[3780]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] + - k[3781]*y_cur[IDX_OHII]*y_cur[IDX_HCNI] + - k[3783]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + - k[3784]*y_cur[IDX_OHII]*y_cur[IDX_HNCI] + - k[3785]*y_cur[IDX_OHII]*y_cur[IDX_N2I] + - k[3786]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] + - k[3787]*y_cur[IDX_OHII]*y_cur[IDX_NOI] + - k[3788]*y_cur[IDX_OHII]*y_cur[IDX_OHI] + - k[3789]*y_cur[IDX_OHII]*y_cur[IDX_SI] + - k[3791]*y_cur[IDX_OHII]*y_cur[IDX_SiI] + - k[3792]*y_cur[IDX_OHII]*y_cur[IDX_SiCI] + - k[3793]*y_cur[IDX_OHII]*y_cur[IDX_SiHI] + - k[3794]*y_cur[IDX_OHII]*y_cur[IDX_SiOI] + - k[3798]*y_cur[IDX_OHI]*y_cur[IDX_COII] + - k[3799]*y_cur[IDX_OHI]*y_cur[IDX_H2OII] + - k[3805]*y_cur[IDX_OHI]*y_cur[IDX_NH3II] + - k[3812]*y_cur[IDX_PII]*y_cur[IDX_O2I] + + k[3303]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + + k[3331]*y_cur[IDX_HeII]*y_cur[IDX_SiO2I] - + k[3357]*y_cur[IDX_NII]*y_cur[IDX_O2I] - + k[3358]*y_cur[IDX_NII]*y_cur[IDX_O2I] + + k[3367]*y_cur[IDX_N2I]*y_cur[IDX_O2HII] - + k[3501]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - + k[3502]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - + k[3524]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - + k[3525]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] + + k[3546]*y_cur[IDX_NH2I]*y_cur[IDX_O2HII] + + k[3594]*y_cur[IDX_NH3I]*y_cur[IDX_O2HII] + + k[3622]*y_cur[IDX_NHI]*y_cur[IDX_O2HII] + + k[3627]*y_cur[IDX_NOI]*y_cur[IDX_O2HII] + + k[3648]*y_cur[IDX_OII]*y_cur[IDX_NO2I] + + k[3651]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + + k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - + k[3668]*y_cur[IDX_O2I]*y_cur[IDX_C3II] - + k[3669]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - + k[3670]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - + k[3671]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - + k[3672]*y_cur[IDX_O2I]*y_cur[IDX_CSII] - + k[3673]*y_cur[IDX_O2I]*y_cur[IDX_PH2II] - + k[3674]*y_cur[IDX_O2I]*y_cur[IDX_SII] - + k[3675]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] - + k[3676]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + + k[3677]*y_cur[IDX_O2HII]*y_cur[IDX_CO2I] + + k[3736]*y_cur[IDX_OI]*y_cur[IDX_HCO2II] + + k[3741]*y_cur[IDX_OI]*y_cur[IDX_HPOII] + + k[3749]*y_cur[IDX_OI]*y_cur[IDX_O2HII] + + k[3764]*y_cur[IDX_OI]*y_cur[IDX_SiOII] + + k[3806]*y_cur[IDX_OHI]*y_cur[IDX_O2HII] - + k[3812]*y_cur[IDX_PII]*y_cur[IDX_O2I] - + k[3818]*y_cur[IDX_PHII]*y_cur[IDX_O2I] + + k[3840]*y_cur[IDX_SI]*y_cur[IDX_O2HII] - + k[3882]*y_cur[IDX_SiH2II]*y_cur[IDX_O2I] - k[3884]*y_cur[IDX_SiH3II]*y_cur[IDX_O2I] + - k[3914]*y_cur[IDX_CM]*y_cur[IDX_OII] + - k[3949]*y_cur[IDX_C10M]*y_cur[IDX_OII] + - k[3984]*y_cur[IDX_C10HM]*y_cur[IDX_OII] + - k[4019]*y_cur[IDX_C2M]*y_cur[IDX_OII] + - k[4054]*y_cur[IDX_C2HM]*y_cur[IDX_OII] + - k[4089]*y_cur[IDX_C3M]*y_cur[IDX_OII] + - k[4124]*y_cur[IDX_C3HM]*y_cur[IDX_OII] + - k[4159]*y_cur[IDX_C3NM]*y_cur[IDX_OII] + - k[4194]*y_cur[IDX_C4M]*y_cur[IDX_OII] + - k[4229]*y_cur[IDX_C4HM]*y_cur[IDX_OII] + - k[4264]*y_cur[IDX_C5M]*y_cur[IDX_OII] + - k[4299]*y_cur[IDX_C5HM]*y_cur[IDX_OII] + - k[4334]*y_cur[IDX_C5NM]*y_cur[IDX_OII] + - k[4369]*y_cur[IDX_C6M]*y_cur[IDX_OII] + - k[4404]*y_cur[IDX_C6HM]*y_cur[IDX_OII] + - k[4439]*y_cur[IDX_C7M]*y_cur[IDX_OII] + - k[4474]*y_cur[IDX_C7HM]*y_cur[IDX_OII] + - k[4509]*y_cur[IDX_C8M]*y_cur[IDX_OII] + - k[4544]*y_cur[IDX_C8HM]*y_cur[IDX_OII] + - k[4579]*y_cur[IDX_C9M]*y_cur[IDX_OII] + - k[4614]*y_cur[IDX_C9HM]*y_cur[IDX_OII] + - k[4649]*y_cur[IDX_CHM]*y_cur[IDX_OII] + - k[4684]*y_cur[IDX_CNM]*y_cur[IDX_OII] + - k[4720]*y_cur[IDX_HM]*y_cur[IDX_OII] + - k[4727]*y_cur[IDX_OM]*y_cur[IDX_CII] + - k[4728]*y_cur[IDX_OM]*y_cur[IDX_C2H2II] + - k[4729]*y_cur[IDX_OM]*y_cur[IDX_C2H3II] + - k[4730]*y_cur[IDX_OM]*y_cur[IDX_C4H2II] + - k[4731]*y_cur[IDX_OM]*y_cur[IDX_C4H3II] + - k[4732]*y_cur[IDX_OM]*y_cur[IDX_C4SII] + - k[4733]*y_cur[IDX_OM]*y_cur[IDX_CH2CCHII] + - k[4734]*y_cur[IDX_OM]*y_cur[IDX_CH3II] + - k[4735]*y_cur[IDX_OM]*y_cur[IDX_CNCII] + - k[4736]*y_cur[IDX_OM]*y_cur[IDX_FeII] + - k[4737]*y_cur[IDX_OM]*y_cur[IDX_HII] + - k[4738]*y_cur[IDX_OM]*y_cur[IDX_H2COII] + - k[4739]*y_cur[IDX_OM]*y_cur[IDX_H2SII] + - k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] + - k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] + - k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] + - k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + - k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + - k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + - k[4746]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + - k[4747]*y_cur[IDX_OM]*y_cur[IDX_HeII] + - k[4748]*y_cur[IDX_OM]*y_cur[IDX_MgII] + - k[4749]*y_cur[IDX_OM]*y_cur[IDX_NII] + - k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] + - k[4751]*y_cur[IDX_OM]*y_cur[IDX_NH3II] + - k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] + - k[4753]*y_cur[IDX_OM]*y_cur[IDX_NOII] + - k[4754]*y_cur[IDX_OM]*y_cur[IDX_NaII] + - k[4755]*y_cur[IDX_OM]*y_cur[IDX_OII] + - k[4755]*y_cur[IDX_OM]*y_cur[IDX_OII] + - k[4756]*y_cur[IDX_OM]*y_cur[IDX_SII] + - k[4757]*y_cur[IDX_OM]*y_cur[IDX_SOII] + - k[4758]*y_cur[IDX_OM]*y_cur[IDX_SiII] + - k[4759]*y_cur[IDX_OM]*y_cur[IDX_SiOII] + - k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] + - k[4761]*y_cur[IDX_OM]*y_cur[IDX_SiSII] + + k[4762]*y_cur[IDX_O2M]*y_cur[IDX_CII] + + k[4763]*y_cur[IDX_O2M]*y_cur[IDX_C2H2II] + + k[4764]*y_cur[IDX_O2M]*y_cur[IDX_C2H3II] + + k[4765]*y_cur[IDX_O2M]*y_cur[IDX_C4H2II] + + k[4766]*y_cur[IDX_O2M]*y_cur[IDX_C4H3II] + + k[4767]*y_cur[IDX_O2M]*y_cur[IDX_C4SII] + + k[4768]*y_cur[IDX_O2M]*y_cur[IDX_CH2CCHII] + + k[4769]*y_cur[IDX_O2M]*y_cur[IDX_CH3II] + + k[4770]*y_cur[IDX_O2M]*y_cur[IDX_CNCII] + + k[4771]*y_cur[IDX_O2M]*y_cur[IDX_FeII] + + k[4772]*y_cur[IDX_O2M]*y_cur[IDX_HII] + + k[4773]*y_cur[IDX_O2M]*y_cur[IDX_H2COII] + + k[4774]*y_cur[IDX_O2M]*y_cur[IDX_H2SII] + + k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] + + k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] + + k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] + + k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + + k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + + k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] + + k[4781]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] + + k[4782]*y_cur[IDX_O2M]*y_cur[IDX_HeII] + + k[4783]*y_cur[IDX_O2M]*y_cur[IDX_MgII] + + k[4784]*y_cur[IDX_O2M]*y_cur[IDX_NII] + + k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] + + k[4786]*y_cur[IDX_O2M]*y_cur[IDX_NH3II] + + k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] + + k[4788]*y_cur[IDX_O2M]*y_cur[IDX_NOII] + + k[4789]*y_cur[IDX_O2M]*y_cur[IDX_NaII] + k[4790]*y_cur[IDX_O2M]*y_cur[IDX_OII] + - k[4825]*y_cur[IDX_OHM]*y_cur[IDX_OII] + - k[4860]*y_cur[IDX_SM]*y_cur[IDX_OII] + - k[4957]*y_cur[IDX_CI]*y_cur[IDX_COI] + - k[4974]*y_cur[IDX_CI]*y_cur[IDX_NOI] + - k[4978]*y_cur[IDX_CI]*y_cur[IDX_O2I] + - k[4982]*y_cur[IDX_CI]*y_cur[IDX_OHI] + - k[4986]*y_cur[IDX_CI]*y_cur[IDX_SOI] + + k[4791]*y_cur[IDX_O2M]*y_cur[IDX_SII] + + k[4792]*y_cur[IDX_O2M]*y_cur[IDX_SOII] + + k[4793]*y_cur[IDX_O2M]*y_cur[IDX_SiII] + + k[4794]*y_cur[IDX_O2M]*y_cur[IDX_SiOII] + + k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] + + k[4796]*y_cur[IDX_O2M]*y_cur[IDX_SiSII] - + k[4874]*y_cur[IDX_C2I]*y_cur[IDX_O2I] - + k[4881]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - + k[4882]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - + k[4904]*y_cur[IDX_C2HI]*y_cur[IDX_O2I] - + k[4978]*y_cur[IDX_CI]*y_cur[IDX_O2I] - + k[5007]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5009]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - k[5010]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5012]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - - k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - - k[5014]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - - k[5015]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + - k[5018]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - - k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] - - k[5044]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + - k[5045]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + - k[5083]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + - k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5092]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5093]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5096]*y_cur[IDX_CHI]*y_cur[IDX_OI] - - k[5097]*y_cur[IDX_CHI]*y_cur[IDX_OI] + - k[5124]*y_cur[IDX_CNI]*y_cur[IDX_O2I] + + k[5011]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5039]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - + k[5040]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - + k[5041]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + + k[5042]*y_cur[IDX_CH3I]*y_cur[IDX_O2HI] - + k[5060]*y_cur[IDX_CH4I]*y_cur[IDX_O2I] - + k[5086]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5087]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5090]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5091]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5092]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5093]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5095]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - + k[5123]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - + k[5124]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - k[5130]*y_cur[IDX_COI]*y_cur[IDX_O2I] - - k[5147]*y_cur[IDX_H2I]*y_cur[IDX_OI] + - k[5172]*y_cur[IDX_HI]*y_cur[IDX_HCOI] + - k[5175]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + - k[5186]*y_cur[IDX_HI]*y_cur[IDX_NOI] + + k[5144]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - + k[5145]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - k[5190]*y_cur[IDX_HI]*y_cur[IDX_O2I] + - k[5191]*y_cur[IDX_HI]*y_cur[IDX_O2HI] + - k[5194]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + - k[5198]*y_cur[IDX_HI]*y_cur[IDX_OHI] + - k[5200]*y_cur[IDX_HI]*y_cur[IDX_SOI] - - k[5203]*y_cur[IDX_HCNOI]*y_cur[IDX_OI] - - k[5216]*y_cur[IDX_HOCNI]*y_cur[IDX_OI] - - k[5218]*y_cur[IDX_HONCI]*y_cur[IDX_OI] + - k[5220]*y_cur[IDX_N2I]*y_cur[IDX_O2I] + - k[5266]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + - k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + - k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + - k[5276]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + - k[5279]*y_cur[IDX_NI]*y_cur[IDX_NOI] + - k[5281]*y_cur[IDX_NI]*y_cur[IDX_O2I] + - k[5284]*y_cur[IDX_NI]*y_cur[IDX_OHI] + - k[5288]*y_cur[IDX_NI]*y_cur[IDX_POI] + - k[5290]*y_cur[IDX_NI]*y_cur[IDX_SOI] + - k[5301]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] + - k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + - k[5316]*y_cur[IDX_NHI]*y_cur[IDX_O2I] - - k[5318]*y_cur[IDX_NHI]*y_cur[IDX_OI] - - k[5319]*y_cur[IDX_NHI]*y_cur[IDX_OI] - - k[5320]*y_cur[IDX_NHI]*y_cur[IDX_OI] + - k[5323]*y_cur[IDX_NHI]*y_cur[IDX_OHI] + - k[5328]*y_cur[IDX_NOI]*y_cur[IDX_NOI] + - k[5330]*y_cur[IDX_NOI]*y_cur[IDX_O2I] + - k[5333]*y_cur[IDX_NOI]*y_cur[IDX_SI] + - k[5337]*y_cur[IDX_O2I]*y_cur[IDX_SI] + - k[5338]*y_cur[IDX_O2I]*y_cur[IDX_SOI] - - k[5340]*y_cur[IDX_OI]*y_cur[IDX_C10I] - - k[5341]*y_cur[IDX_OI]*y_cur[IDX_C10HI] - - k[5342]*y_cur[IDX_OI]*y_cur[IDX_C11I] - - k[5343]*y_cur[IDX_OI]*y_cur[IDX_C2I] - - k[5344]*y_cur[IDX_OI]*y_cur[IDX_C2H2I] - - k[5345]*y_cur[IDX_OI]*y_cur[IDX_C2H3I] - - k[5346]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - - k[5347]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - - k[5348]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - - k[5349]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - - k[5350]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - - k[5351]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - - k[5352]*y_cur[IDX_OI]*y_cur[IDX_C2HI] - - k[5353]*y_cur[IDX_OI]*y_cur[IDX_C2NI] - - k[5354]*y_cur[IDX_OI]*y_cur[IDX_C2OI] - - k[5355]*y_cur[IDX_OI]*y_cur[IDX_C2SI] - - k[5356]*y_cur[IDX_OI]*y_cur[IDX_C3I] - - k[5357]*y_cur[IDX_OI]*y_cur[IDX_C3HI] - - k[5358]*y_cur[IDX_OI]*y_cur[IDX_C3NI] - - k[5359]*y_cur[IDX_OI]*y_cur[IDX_C3OI] - - k[5360]*y_cur[IDX_OI]*y_cur[IDX_C3PI] - - k[5361]*y_cur[IDX_OI]*y_cur[IDX_C4I] - - k[5362]*y_cur[IDX_OI]*y_cur[IDX_C4HI] - - k[5363]*y_cur[IDX_OI]*y_cur[IDX_C4NI] - - k[5364]*y_cur[IDX_OI]*y_cur[IDX_C4PI] - - k[5365]*y_cur[IDX_OI]*y_cur[IDX_C5I] - - k[5366]*y_cur[IDX_OI]*y_cur[IDX_C5HI] - - k[5367]*y_cur[IDX_OI]*y_cur[IDX_C5NI] - - k[5368]*y_cur[IDX_OI]*y_cur[IDX_C6I] - - k[5369]*y_cur[IDX_OI]*y_cur[IDX_C6HI] - - k[5370]*y_cur[IDX_OI]*y_cur[IDX_C7I] - - k[5371]*y_cur[IDX_OI]*y_cur[IDX_C7HI] - - k[5372]*y_cur[IDX_OI]*y_cur[IDX_C7NI] - - k[5373]*y_cur[IDX_OI]*y_cur[IDX_C8I] - - k[5374]*y_cur[IDX_OI]*y_cur[IDX_C8HI] - - k[5375]*y_cur[IDX_OI]*y_cur[IDX_C9I] - - k[5376]*y_cur[IDX_OI]*y_cur[IDX_C9HI] - - k[5377]*y_cur[IDX_OI]*y_cur[IDX_C9NI] - - k[5378]*y_cur[IDX_OI]*y_cur[IDX_CCPI] - - k[5379]*y_cur[IDX_OI]*y_cur[IDX_CClI] - - k[5380]*y_cur[IDX_OI]*y_cur[IDX_CClI] - - k[5381]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - - k[5382]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - - k[5383]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - - k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] - - k[5385]*y_cur[IDX_OI]*y_cur[IDX_CH4I] - - k[5386]*y_cur[IDX_OI]*y_cur[IDX_CNI] - - k[5387]*y_cur[IDX_OI]*y_cur[IDX_CNI] - - k[5388]*y_cur[IDX_OI]*y_cur[IDX_CNI] - - k[5389]*y_cur[IDX_OI]*y_cur[IDX_CNOI] - - k[5390]*y_cur[IDX_OI]*y_cur[IDX_CO2I] - - k[5391]*y_cur[IDX_OI]*y_cur[IDX_CPI] - - k[5392]*y_cur[IDX_OI]*y_cur[IDX_CSI] - - k[5393]*y_cur[IDX_OI]*y_cur[IDX_CSI] - - k[5394]*y_cur[IDX_OI]*y_cur[IDX_ClOI] - - k[5395]*y_cur[IDX_OI]*y_cur[IDX_H2CCCI] - - k[5396]*y_cur[IDX_OI]*y_cur[IDX_H2CNI] - - k[5397]*y_cur[IDX_OI]*y_cur[IDX_H2COI] - - k[5398]*y_cur[IDX_OI]*y_cur[IDX_H2O2I] - - k[5399]*y_cur[IDX_OI]*y_cur[IDX_H2OI] - + k[5192]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - + k[5208]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - + k[5209]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] + + k[5210]*y_cur[IDX_HCOI]*y_cur[IDX_O2HI] - + k[5220]*y_cur[IDX_N2I]*y_cur[IDX_O2I] + + k[5278]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5281]*y_cur[IDX_NI]*y_cur[IDX_O2I] + + k[5282]*y_cur[IDX_NI]*y_cur[IDX_O2HI] - + k[5316]*y_cur[IDX_NHI]*y_cur[IDX_O2I] - + k[5317]*y_cur[IDX_NHI]*y_cur[IDX_O2I] + + k[5329]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - + k[5330]*y_cur[IDX_NOI]*y_cur[IDX_O2I] - + k[5335]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] - + k[5336]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] - + k[5337]*y_cur[IDX_O2I]*y_cur[IDX_SI] - + k[5338]*y_cur[IDX_O2I]*y_cur[IDX_SOI] + + k[5339]*y_cur[IDX_O2HI]*y_cur[IDX_O2HI] + + k[5390]*y_cur[IDX_OI]*y_cur[IDX_CO2I] + + k[5394]*y_cur[IDX_OI]*y_cur[IDX_ClOI] + + k[5413]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + + k[5419]*y_cur[IDX_OI]*y_cur[IDX_N2OI] + + k[5423]*y_cur[IDX_OI]*y_cur[IDX_NO2I] + + k[5424]*y_cur[IDX_OI]*y_cur[IDX_NOI] + + k[5427]*y_cur[IDX_OI]*y_cur[IDX_O2HI] + + k[5429]*y_cur[IDX_OI]*y_cur[IDX_OCNI] + + k[5432]*y_cur[IDX_OI]*y_cur[IDX_OHI] + + k[5438]*y_cur[IDX_OI]*y_cur[IDX_SO2I] + + k[5439]*y_cur[IDX_OI]*y_cur[IDX_SOI] + + k[5478]*y_cur[IDX_OHI]*y_cur[IDX_O2HI] - + k[5484]*y_cur[IDX_PI]*y_cur[IDX_O2I] - + k[5494]*y_cur[IDX_SiI]*y_cur[IDX_O2I] + + k[5582]*y_cur[IDX_OI]*y_cur[IDX_OI] + k[5896]*y_cur[IDX_O2M] - + k[5897]*y_cur[IDX_O2I] - k[5898]*y_cur[IDX_O2I] + + k[5899]*y_cur[IDX_O2HI] + k[6234]*y_cur[IDX_O2M] - + k[6235]*y_cur[IDX_O2I] - k[6236]*y_cur[IDX_O2I] + + k[6237]*y_cur[IDX_O2HI] + k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM] + - k[6934]*y_cur[IDX_O2I] + k[7116]*y_cur[IDX_GO2I] + + k[7298]*y_cur[IDX_GO2I] + k[7480]*y_cur[IDX_GO2I] + + k[8689]*y_cur[IDX_GOI]*y_cur[IDX_GOI]; + ydot[yistart + IDX_SiII] = 0.0 + + k[194]*y_cur[IDX_CII]*y_cur[IDX_SiI] + + k[257]*y_cur[IDX_CHII]*y_cur[IDX_SiI] + + k[418]*y_cur[IDX_HII]*y_cur[IDX_SiI] + + k[477]*y_cur[IDX_H2OII]*y_cur[IDX_SiI] + + k[528]*y_cur[IDX_HeII]*y_cur[IDX_SiI] - + k[540]*y_cur[IDX_MgI]*y_cur[IDX_SiII] + + k[597]*y_cur[IDX_NH3II]*y_cur[IDX_SiI] - + k[645]*y_cur[IDX_NaI]*y_cur[IDX_SiII] - + k[716]*y_cur[IDX_SiII]*y_cur[IDX_FeI] + + k[717]*y_cur[IDX_SiI]*y_cur[IDX_CSII] + + k[718]*y_cur[IDX_SiI]*y_cur[IDX_H2COII] + + k[719]*y_cur[IDX_SiI]*y_cur[IDX_H2SII] + + k[720]*y_cur[IDX_SiI]*y_cur[IDX_HSII] + + k[721]*y_cur[IDX_SiI]*y_cur[IDX_NOII] + + k[722]*y_cur[IDX_SiI]*y_cur[IDX_O2II] + + k[723]*y_cur[IDX_SiI]*y_cur[IDX_PII] + + k[724]*y_cur[IDX_SiI]*y_cur[IDX_SII] + + k[1434]*y_cur[IDX_CII]*y_cur[IDX_SiCI] + + k[1447]*y_cur[IDX_CII]*y_cur[IDX_SiOI] + + k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1574]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - + k[1646]*y_cur[IDX_C2H3I]*y_cur[IDX_SiII] - + k[1718]*y_cur[IDX_C2H4I]*y_cur[IDX_SiII] - + k[1751]*y_cur[IDX_C2HI]*y_cur[IDX_SiII] + + k[1920]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + + k[1932]*y_cur[IDX_CI]*y_cur[IDX_SiOII] - + k[2018]*y_cur[IDX_CH2I]*y_cur[IDX_SiII] + + k[2019]*y_cur[IDX_CH2I]*y_cur[IDX_SiOII] - + k[2102]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] - + k[2103]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] - + k[2266]*y_cur[IDX_CHI]*y_cur[IDX_SiII] + + k[2292]*y_cur[IDX_COI]*y_cur[IDX_SiOII] + + k[2365]*y_cur[IDX_HII]*y_cur[IDX_SiHI] - + k[2569]*y_cur[IDX_H2OI]*y_cur[IDX_SiII] + + k[2848]*y_cur[IDX_HI]*y_cur[IDX_SiHII] + + k[2849]*y_cur[IDX_HI]*y_cur[IDX_SiSII] - + k[2885]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] - + k[3015]*y_cur[IDX_HFI]*y_cur[IDX_SiII] - + k[3046]*y_cur[IDX_HNCI]*y_cur[IDX_SiII] + + k[3257]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + + k[3307]*y_cur[IDX_HeII]*y_cur[IDX_SiC2I] + + k[3310]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + + k[3313]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + + k[3316]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + + k[3322]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + + k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + + k[3328]*y_cur[IDX_HeII]*y_cur[IDX_SiHI] + + k[3329]*y_cur[IDX_HeII]*y_cur[IDX_SiNI] + + k[3331]*y_cur[IDX_HeII]*y_cur[IDX_SiO2I] + + k[3332]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + + k[3335]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + + k[3469]*y_cur[IDX_NI]*y_cur[IDX_SiCII] + + k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] + + k[3476]*y_cur[IDX_NI]*y_cur[IDX_SiOII] - + k[3602]*y_cur[IDX_NH3I]*y_cur[IDX_SiII] - + k[3625]*y_cur[IDX_NHI]*y_cur[IDX_SiII] + + k[3754]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] + + k[3764]*y_cur[IDX_OI]*y_cur[IDX_SiOII] - + k[3809]*y_cur[IDX_OHI]*y_cur[IDX_SiII] + + k[3841]*y_cur[IDX_SI]*y_cur[IDX_SiCH2II] + + k[3842]*y_cur[IDX_SI]*y_cur[IDX_SiOII] - + k[3859]*y_cur[IDX_SiII]*y_cur[IDX_C2H5OHI] - + k[3860]*y_cur[IDX_SiII]*y_cur[IDX_C3H2I] - + k[3861]*y_cur[IDX_SiII]*y_cur[IDX_C3HI] - + k[3862]*y_cur[IDX_SiII]*y_cur[IDX_C4HI] - + k[3863]*y_cur[IDX_SiII]*y_cur[IDX_CH2CCHI] - + k[3864]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - + k[3865]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - + k[3866]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - + k[3867]*y_cur[IDX_SiII]*y_cur[IDX_CH3OHI] - + k[3868]*y_cur[IDX_SiII]*y_cur[IDX_H2CCCI] - + k[3869]*y_cur[IDX_SiII]*y_cur[IDX_C4H2I] - + k[3870]*y_cur[IDX_SiII]*y_cur[IDX_NCCNI] - + k[3871]*y_cur[IDX_SiII]*y_cur[IDX_OCSI] - + k[3917]*y_cur[IDX_CM]*y_cur[IDX_SiII] - + k[3952]*y_cur[IDX_C10M]*y_cur[IDX_SiII] - + k[3987]*y_cur[IDX_C10HM]*y_cur[IDX_SiII] - + k[4022]*y_cur[IDX_C2M]*y_cur[IDX_SiII] - + k[4057]*y_cur[IDX_C2HM]*y_cur[IDX_SiII] - + k[4092]*y_cur[IDX_C3M]*y_cur[IDX_SiII] - + k[4127]*y_cur[IDX_C3HM]*y_cur[IDX_SiII] - + k[4162]*y_cur[IDX_C3NM]*y_cur[IDX_SiII] - + k[4197]*y_cur[IDX_C4M]*y_cur[IDX_SiII] - + k[4232]*y_cur[IDX_C4HM]*y_cur[IDX_SiII] - + k[4267]*y_cur[IDX_C5M]*y_cur[IDX_SiII] - + k[4302]*y_cur[IDX_C5HM]*y_cur[IDX_SiII] - + k[4337]*y_cur[IDX_C5NM]*y_cur[IDX_SiII] - + k[4372]*y_cur[IDX_C6M]*y_cur[IDX_SiII] - + k[4407]*y_cur[IDX_C6HM]*y_cur[IDX_SiII] - + k[4442]*y_cur[IDX_C7M]*y_cur[IDX_SiII] - + k[4477]*y_cur[IDX_C7HM]*y_cur[IDX_SiII] - + k[4512]*y_cur[IDX_C8M]*y_cur[IDX_SiII] - + k[4547]*y_cur[IDX_C8HM]*y_cur[IDX_SiII] - + k[4582]*y_cur[IDX_C9M]*y_cur[IDX_SiII] - + k[4617]*y_cur[IDX_C9HM]*y_cur[IDX_SiII] - + k[4652]*y_cur[IDX_CHM]*y_cur[IDX_SiII] - + k[4687]*y_cur[IDX_CNM]*y_cur[IDX_SiII] - + k[4723]*y_cur[IDX_HM]*y_cur[IDX_SiII] - + k[4758]*y_cur[IDX_OM]*y_cur[IDX_SiII] - + k[4793]*y_cur[IDX_O2M]*y_cur[IDX_SiII] - + k[4828]*y_cur[IDX_OHM]*y_cur[IDX_SiII] - + k[4863]*y_cur[IDX_SM]*y_cur[IDX_SiII] - + k[5512]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - + k[5544]*y_cur[IDX_CH4I]*y_cur[IDX_SiII] - + k[5562]*y_cur[IDX_H2I]*y_cur[IDX_SiII] - + k[5575]*y_cur[IDX_HI]*y_cur[IDX_SiII] - + k[5580]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] - + k[5584]*y_cur[IDX_OI]*y_cur[IDX_SiII] - + k[5626]*y_cur[IDX_SiII]*y_cur[IDX_eM] + k[5917]*y_cur[IDX_SiI] + + k[6259]*y_cur[IDX_SiI] + k[6271]*y_cur[IDX_SiHII] + + k[6284]*y_cur[IDX_SiOII] + k[6302]*y_cur[IDX_SiI] - + k[6374]*y_cur[IDX_SiII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2SI] = 0.0 - + k[175]*y_cur[IDX_CII]*y_cur[IDX_H2SI] - + k[223]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - + k[233]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - + k[276]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - + k[281]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] - + k[309]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - + k[380]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - + k[448]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - + k[469]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + + k[483]*y_cur[IDX_H2SII]*y_cur[IDX_FeI] - + k[484]*y_cur[IDX_H2SI]*y_cur[IDX_CO2II] - + k[485]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] - + k[486]*y_cur[IDX_H2SI]*y_cur[IDX_OCSII] + + k[501]*y_cur[IDX_HCOI]*y_cur[IDX_H2SII] - + k[519]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + + k[532]*y_cur[IDX_MgI]*y_cur[IDX_H2SII] - + k[553]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - + k[567]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - + k[580]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] + + k[606]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] + + k[625]*y_cur[IDX_NOI]*y_cur[IDX_H2SII] + + k[636]*y_cur[IDX_NaI]*y_cur[IDX_H2SII] - + k[657]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - + k[674]*y_cur[IDX_O2II]*y_cur[IDX_H2SI] - + k[690]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] - + k[701]*y_cur[IDX_PII]*y_cur[IDX_H2SI] + + k[709]*y_cur[IDX_SI]*y_cur[IDX_H2SII] + + k[719]*y_cur[IDX_SiI]*y_cur[IDX_H2SII] + + k[1045]*y_cur[IDX_H3SII]*y_cur[IDX_eM] - + k[1395]*y_cur[IDX_CII]*y_cur[IDX_H2SI] - + k[1518]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - + k[1519]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - + k[1619]*y_cur[IDX_C2H3II]*y_cur[IDX_H2SI] - + k[1674]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - + k[1675]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] - + k[1721]*y_cur[IDX_C2H5II]*y_cur[IDX_H2SI] - + k[1954]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] - + k[1955]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] - + k[1983]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - + k[1984]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - + k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] - + k[2078]*y_cur[IDX_CH3II]*y_cur[IDX_H2SI] - + k[2111]*y_cur[IDX_C2H6II]*y_cur[IDX_H2SI] - + k[2143]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] - + k[2227]*y_cur[IDX_CH5II]*y_cur[IDX_H2SI] - + k[2281]*y_cur[IDX_COII]*y_cur[IDX_H2SI] - + k[2339]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - + k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - + k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - + k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + + k[2496]*y_cur[IDX_H2COI]*y_cur[IDX_H3SII] - + k[2510]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] - + k[2511]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + + k[2556]*y_cur[IDX_H2OI]*y_cur[IDX_HSiSII] - + k[2574]*y_cur[IDX_H2SII]*y_cur[IDX_H2SI] - + k[2575]*y_cur[IDX_H2SI]*y_cur[IDX_C2NII] - + k[2576]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - + k[2577]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - + k[2578]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - + k[2579]*y_cur[IDX_H2SI]*y_cur[IDX_HS2II] - + k[2580]*y_cur[IDX_H2SI]*y_cur[IDX_HSiSII] - + k[2581]*y_cur[IDX_H2SI]*y_cur[IDX_N2OII] - + k[2582]*y_cur[IDX_H2SI]*y_cur[IDX_SOII] - + k[2686]*y_cur[IDX_H3II]*y_cur[IDX_H2SI] - + k[2763]*y_cur[IDX_H3COII]*y_cur[IDX_H2SI] - + k[2801]*y_cur[IDX_H3OII]*y_cur[IDX_H2SI] + + k[2876]*y_cur[IDX_HCNI]*y_cur[IDX_H3SII] - + k[2892]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] - + k[2893]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] - + k[2961]*y_cur[IDX_HCOII]*y_cur[IDX_H2SI] + + k[3040]*y_cur[IDX_HNCI]*y_cur[IDX_H3SII] - + k[3054]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] - + k[3055]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] - + k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - + k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - + k[3347]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - + k[3348]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - + k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] - + k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - + k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] - + k[3515]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3516]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3517]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3518]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3551]*y_cur[IDX_NH3II]*y_cur[IDX_H2SI] + + k[3579]*y_cur[IDX_NH3I]*y_cur[IDX_H3SII] - + k[3642]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - + k[3643]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - + k[3780]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] - + k[3817]*y_cur[IDX_PHII]*y_cur[IDX_H2SI] - + k[3819]*y_cur[IDX_PH3II]*y_cur[IDX_H2SI] - + k[3828]*y_cur[IDX_SII]*y_cur[IDX_H2SI] - + k[3829]*y_cur[IDX_SII]*y_cur[IDX_H2SI] + + k[3898]*y_cur[IDX_CM]*y_cur[IDX_H2SII] + + k[3933]*y_cur[IDX_C10M]*y_cur[IDX_H2SII] + + k[3968]*y_cur[IDX_C10HM]*y_cur[IDX_H2SII] + + k[4003]*y_cur[IDX_C2M]*y_cur[IDX_H2SII] + + k[4038]*y_cur[IDX_C2HM]*y_cur[IDX_H2SII] + + k[4073]*y_cur[IDX_C3M]*y_cur[IDX_H2SII] + + k[4108]*y_cur[IDX_C3HM]*y_cur[IDX_H2SII] + + k[4143]*y_cur[IDX_C3NM]*y_cur[IDX_H2SII] + + k[4178]*y_cur[IDX_C4M]*y_cur[IDX_H2SII] + + k[4213]*y_cur[IDX_C4HM]*y_cur[IDX_H2SII] + + k[4248]*y_cur[IDX_C5M]*y_cur[IDX_H2SII] + + k[4283]*y_cur[IDX_C5HM]*y_cur[IDX_H2SII] + + k[4318]*y_cur[IDX_C5NM]*y_cur[IDX_H2SII] + + k[4353]*y_cur[IDX_C6M]*y_cur[IDX_H2SII] + + k[4388]*y_cur[IDX_C6HM]*y_cur[IDX_H2SII] + + k[4423]*y_cur[IDX_C7M]*y_cur[IDX_H2SII] + + k[4458]*y_cur[IDX_C7HM]*y_cur[IDX_H2SII] + + k[4493]*y_cur[IDX_C8M]*y_cur[IDX_H2SII] + + k[4528]*y_cur[IDX_C8HM]*y_cur[IDX_H2SII] + + k[4563]*y_cur[IDX_C9M]*y_cur[IDX_H2SII] + + k[4598]*y_cur[IDX_C9HM]*y_cur[IDX_H2SII] + + k[4633]*y_cur[IDX_CHM]*y_cur[IDX_H2SII] + + k[4668]*y_cur[IDX_CNM]*y_cur[IDX_H2SII] + + k[4704]*y_cur[IDX_HM]*y_cur[IDX_H2SII] + + k[4739]*y_cur[IDX_OM]*y_cur[IDX_H2SII] + + k[4774]*y_cur[IDX_O2M]*y_cur[IDX_H2SII] + + k[4809]*y_cur[IDX_OHM]*y_cur[IDX_H2SII] + + k[4844]*y_cur[IDX_SM]*y_cur[IDX_H2SII] - + k[5032]*y_cur[IDX_CH3I]*y_cur[IDX_H2SI] + + k[5140]*y_cur[IDX_H2I]*y_cur[IDX_HSI] - + k[5169]*y_cur[IDX_HI]*y_cur[IDX_H2SI] + + k[5219]*y_cur[IDX_HSI]*y_cur[IDX_HSI] - k[5400]*y_cur[IDX_OI]*y_cur[IDX_H2SI] - - k[5401]*y_cur[IDX_OI]*y_cur[IDX_HC2PI] - - k[5402]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - - k[5403]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - - k[5404]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - - k[5405]*y_cur[IDX_OI]*y_cur[IDX_HCOI] - - k[5406]*y_cur[IDX_OI]*y_cur[IDX_HCOI] - - k[5407]*y_cur[IDX_OI]*y_cur[IDX_HCPI] - - k[5408]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - - k[5409]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - - k[5410]*y_cur[IDX_OI]*y_cur[IDX_HCSiI] - - k[5411]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - - k[5412]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - - k[5413]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - - k[5414]*y_cur[IDX_OI]*y_cur[IDX_HPOI] - - k[5415]*y_cur[IDX_OI]*y_cur[IDX_HSI] - - k[5416]*y_cur[IDX_OI]*y_cur[IDX_HSI] - - k[5417]*y_cur[IDX_OI]*y_cur[IDX_N2I] - - k[5418]*y_cur[IDX_OI]*y_cur[IDX_N2OI] - - k[5419]*y_cur[IDX_OI]*y_cur[IDX_N2OI] - - k[5420]*y_cur[IDX_OI]*y_cur[IDX_NH2I] - - k[5421]*y_cur[IDX_OI]*y_cur[IDX_NH2I] - - k[5422]*y_cur[IDX_OI]*y_cur[IDX_NH3I] - - k[5423]*y_cur[IDX_OI]*y_cur[IDX_NO2I] - - k[5424]*y_cur[IDX_OI]*y_cur[IDX_NOI] - - k[5425]*y_cur[IDX_OI]*y_cur[IDX_NSI] - - k[5426]*y_cur[IDX_OI]*y_cur[IDX_NSI] - - k[5427]*y_cur[IDX_OI]*y_cur[IDX_O2HI] - - k[5428]*y_cur[IDX_OI]*y_cur[IDX_OCNI] - - k[5429]*y_cur[IDX_OI]*y_cur[IDX_OCNI] - - k[5430]*y_cur[IDX_OI]*y_cur[IDX_OCSI] - - k[5431]*y_cur[IDX_OI]*y_cur[IDX_OCSI] - - k[5432]*y_cur[IDX_OI]*y_cur[IDX_OHI] - - k[5433]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - - k[5434]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - - k[5435]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - - k[5436]*y_cur[IDX_OI]*y_cur[IDX_PHI] - - k[5437]*y_cur[IDX_OI]*y_cur[IDX_S2I] - - k[5438]*y_cur[IDX_OI]*y_cur[IDX_SO2I] - - k[5439]*y_cur[IDX_OI]*y_cur[IDX_SOI] - - k[5440]*y_cur[IDX_OI]*y_cur[IDX_SiC2I] - - k[5441]*y_cur[IDX_OI]*y_cur[IDX_SiC3I] - - k[5442]*y_cur[IDX_OI]*y_cur[IDX_SiC4I] - - k[5443]*y_cur[IDX_OI]*y_cur[IDX_SiCI] - - k[5444]*y_cur[IDX_OI]*y_cur[IDX_SiCI] - - k[5445]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - - k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - - k[5447]*y_cur[IDX_OI]*y_cur[IDX_SiH3I] - - k[5448]*y_cur[IDX_OI]*y_cur[IDX_SiH4I] - - k[5449]*y_cur[IDX_OI]*y_cur[IDX_SiHI] - + k[5468]*y_cur[IDX_OHI]*y_cur[IDX_H2SI] + + k[5618]*y_cur[IDX_H2SII]*y_cur[IDX_eM] - k[5841]*y_cur[IDX_H2SI] - + k[5842]*y_cur[IDX_H2SI] - k[6163]*y_cur[IDX_H2SI] - + k[6164]*y_cur[IDX_H2SI] - k[6165]*y_cur[IDX_H2SI] + + k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - k[6941]*y_cur[IDX_H2SI] + + k[7123]*y_cur[IDX_GH2SI] + k[7305]*y_cur[IDX_GH2SI] + + k[7487]*y_cur[IDX_GH2SI] + k[8608]*y_cur[IDX_GHI]*y_cur[IDX_GHSI]; + ydot[yistart + IDX_SII] = 0.0 + k[207]*y_cur[IDX_C2II]*y_cur[IDX_SI] + + k[213]*y_cur[IDX_C2HII]*y_cur[IDX_SI] + + k[256]*y_cur[IDX_CHII]*y_cur[IDX_SI] + + k[305]*y_cur[IDX_CNII]*y_cur[IDX_SI] + + k[313]*y_cur[IDX_COII]*y_cur[IDX_SI] + + k[415]*y_cur[IDX_HII]*y_cur[IDX_SI] + + k[460]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + + k[476]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + + k[496]*y_cur[IDX_HCNII]*y_cur[IDX_SI] - + k[503]*y_cur[IDX_HCOI]*y_cur[IDX_SII] - + k[538]*y_cur[IDX_MgI]*y_cur[IDX_SII] + + k[572]*y_cur[IDX_N2II]*y_cur[IDX_SI] + + k[579]*y_cur[IDX_NHII]*y_cur[IDX_SI] + + k[584]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - + k[614]*y_cur[IDX_NH3I]*y_cur[IDX_SII] - + k[629]*y_cur[IDX_NOI]*y_cur[IDX_SII] - + k[643]*y_cur[IDX_NaI]*y_cur[IDX_SII] + + k[677]*y_cur[IDX_O2II]*y_cur[IDX_SI] + + k[695]*y_cur[IDX_OHII]*y_cur[IDX_SI] - + k[702]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[703]*y_cur[IDX_SII]*y_cur[IDX_FeI] - + k[704]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - + k[705]*y_cur[IDX_SII]*y_cur[IDX_SiCI] - + k[706]*y_cur[IDX_SII]*y_cur[IDX_SiSI] + + k[707]*y_cur[IDX_SI]*y_cur[IDX_CII] + + k[708]*y_cur[IDX_SI]*y_cur[IDX_CII] + + k[709]*y_cur[IDX_SI]*y_cur[IDX_H2SII] + + k[710]*y_cur[IDX_SI]*y_cur[IDX_HSII] - + k[724]*y_cur[IDX_SiI]*y_cur[IDX_SII] - + k[725]*y_cur[IDX_SiHI]*y_cur[IDX_SII] + + k[1429]*y_cur[IDX_CII]*y_cur[IDX_SOI] - + k[1464]*y_cur[IDX_C2I]*y_cur[IDX_SII] - + k[1573]*y_cur[IDX_C2H2I]*y_cur[IDX_SII] - + k[1645]*y_cur[IDX_C2H3I]*y_cur[IDX_SII] - + k[1715]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - + k[1716]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - + k[1717]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - + k[1750]*y_cur[IDX_C2HI]*y_cur[IDX_SII] - + k[2017]*y_cur[IDX_CH2I]*y_cur[IDX_SII] - + k[2101]*y_cur[IDX_CH3I]*y_cur[IDX_SII] - + k[2215]*y_cur[IDX_CH4I]*y_cur[IDX_SII] - + k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] - + k[2265]*y_cur[IDX_CHI]*y_cur[IDX_SII] + + k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + + k[2353]*y_cur[IDX_HII]*y_cur[IDX_HSI] + + k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - + k[2470]*y_cur[IDX_H2I]*y_cur[IDX_SII] - + k[2500]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - + k[2501]*y_cur[IDX_H2COI]*y_cur[IDX_SII] + + k[2844]*y_cur[IDX_HI]*y_cur[IDX_HSII] - + k[3012]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + + k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + + k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + + k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + + k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + + k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] + + k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + + k[3295]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] + + k[3303]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + + k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + + k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + + k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + + k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + + k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + + k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - + k[3624]*y_cur[IDX_NHI]*y_cur[IDX_SII] + + k[3643]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + + k[3649]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - + k[3674]*y_cur[IDX_O2I]*y_cur[IDX_SII] + + k[3742]*y_cur[IDX_OI]*y_cur[IDX_HSII] - + k[3808]*y_cur[IDX_OHI]*y_cur[IDX_SII] - + k[3820]*y_cur[IDX_SII]*y_cur[IDX_C3H2I] - + k[3821]*y_cur[IDX_SII]*y_cur[IDX_C3HI] - + k[3822]*y_cur[IDX_SII]*y_cur[IDX_C4HI] - + k[3823]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[3824]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[3825]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[3826]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - + k[3827]*y_cur[IDX_SII]*y_cur[IDX_H2CCCI] - + k[3828]*y_cur[IDX_SII]*y_cur[IDX_H2SI] - + k[3829]*y_cur[IDX_SII]*y_cur[IDX_H2SI] - + k[3830]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - + k[3831]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - + k[3832]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - + k[3833]*y_cur[IDX_SII]*y_cur[IDX_OCSI] - + k[3885]*y_cur[IDX_SiHI]*y_cur[IDX_SII] - + k[3915]*y_cur[IDX_CM]*y_cur[IDX_SII] - + k[3950]*y_cur[IDX_C10M]*y_cur[IDX_SII] - + k[3985]*y_cur[IDX_C10HM]*y_cur[IDX_SII] - + k[4020]*y_cur[IDX_C2M]*y_cur[IDX_SII] - + k[4055]*y_cur[IDX_C2HM]*y_cur[IDX_SII] - + k[4090]*y_cur[IDX_C3M]*y_cur[IDX_SII] - + k[4125]*y_cur[IDX_C3HM]*y_cur[IDX_SII] - + k[4160]*y_cur[IDX_C3NM]*y_cur[IDX_SII] - + k[4195]*y_cur[IDX_C4M]*y_cur[IDX_SII] - + k[4230]*y_cur[IDX_C4HM]*y_cur[IDX_SII] - + k[4265]*y_cur[IDX_C5M]*y_cur[IDX_SII] - + k[4300]*y_cur[IDX_C5HM]*y_cur[IDX_SII] - + k[4335]*y_cur[IDX_C5NM]*y_cur[IDX_SII] - + k[4370]*y_cur[IDX_C6M]*y_cur[IDX_SII] - + k[4405]*y_cur[IDX_C6HM]*y_cur[IDX_SII] - + k[4440]*y_cur[IDX_C7M]*y_cur[IDX_SII] - + k[4475]*y_cur[IDX_C7HM]*y_cur[IDX_SII] - + k[4510]*y_cur[IDX_C8M]*y_cur[IDX_SII] - + k[4545]*y_cur[IDX_C8HM]*y_cur[IDX_SII] - + k[4580]*y_cur[IDX_C9M]*y_cur[IDX_SII] - + k[4615]*y_cur[IDX_C9HM]*y_cur[IDX_SII] - + k[4650]*y_cur[IDX_CHM]*y_cur[IDX_SII] - + k[4685]*y_cur[IDX_CNM]*y_cur[IDX_SII] - + k[4721]*y_cur[IDX_HM]*y_cur[IDX_SII] - + k[4756]*y_cur[IDX_OM]*y_cur[IDX_SII] - + k[4791]*y_cur[IDX_O2M]*y_cur[IDX_SII] - + k[4826]*y_cur[IDX_OHM]*y_cur[IDX_SII] - + k[4861]*y_cur[IDX_SM]*y_cur[IDX_SII] - + k[5528]*y_cur[IDX_CI]*y_cur[IDX_SII] - + k[5561]*y_cur[IDX_H2I]*y_cur[IDX_SII] - + k[5625]*y_cur[IDX_SII]*y_cur[IDX_eM] + k[5913]*y_cur[IDX_SI] + + k[6140]*y_cur[IDX_CSII] + k[6205]*y_cur[IDX_HSII] + + k[6255]*y_cur[IDX_SI] + k[6303]*y_cur[IDX_SI] - + k[6424]*y_cur[IDX_SII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_SiI] = 0.0 - k[194]*y_cur[IDX_CII]*y_cur[IDX_SiI] + - k[257]*y_cur[IDX_CHII]*y_cur[IDX_SiI] - + k[418]*y_cur[IDX_HII]*y_cur[IDX_SiI] - + k[477]*y_cur[IDX_H2OII]*y_cur[IDX_SiI] - + k[528]*y_cur[IDX_HeII]*y_cur[IDX_SiI] + + k[540]*y_cur[IDX_MgI]*y_cur[IDX_SiII] - + k[597]*y_cur[IDX_NH3II]*y_cur[IDX_SiI] + + k[645]*y_cur[IDX_NaI]*y_cur[IDX_SiII] + + k[716]*y_cur[IDX_SiII]*y_cur[IDX_FeI] - + k[717]*y_cur[IDX_SiI]*y_cur[IDX_CSII] - + k[718]*y_cur[IDX_SiI]*y_cur[IDX_H2COII] - + k[719]*y_cur[IDX_SiI]*y_cur[IDX_H2SII] - + k[720]*y_cur[IDX_SiI]*y_cur[IDX_HSII] - + k[721]*y_cur[IDX_SiI]*y_cur[IDX_NOII] - + k[722]*y_cur[IDX_SiI]*y_cur[IDX_O2II] - + k[723]*y_cur[IDX_SiI]*y_cur[IDX_PII] - + k[724]*y_cur[IDX_SiI]*y_cur[IDX_SII] + + k[1109]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + + k[1123]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] + + k[1147]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] + + k[1223]*y_cur[IDX_SiCII]*y_cur[IDX_eM] + + k[1224]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] + + k[1226]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] + + k[1234]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] + + k[1243]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + + k[1249]*y_cur[IDX_SiFII]*y_cur[IDX_eM] + + k[1250]*y_cur[IDX_SiHII]*y_cur[IDX_eM] + + k[1251]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + + k[1252]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + + k[1260]*y_cur[IDX_SiNII]*y_cur[IDX_eM] + + k[1261]*y_cur[IDX_SiNCII]*y_cur[IDX_eM] + + k[1266]*y_cur[IDX_SiOII]*y_cur[IDX_eM] + + k[1267]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] + + k[1269]*y_cur[IDX_SiSII]*y_cur[IDX_eM] - + k[1529]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - + k[1530]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - + k[1626]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] - + k[1627]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] - + k[1680]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - + k[1681]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - + k[2097]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] - + k[2098]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] - + k[2236]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] - + k[2237]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] + + k[2267]*y_cur[IDX_CHI]*y_cur[IDX_SiHII] + + k[2268]*y_cur[IDX_CHI]*y_cur[IDX_SiOII] - + k[2502]*y_cur[IDX_H2NCII]*y_cur[IDX_SiI] + + k[2571]*y_cur[IDX_H2OI]*y_cur[IDX_SiHII] - + k[2743]*y_cur[IDX_H3II]*y_cur[IDX_SiI] - + k[2818]*y_cur[IDX_H3OII]*y_cur[IDX_SiI] - + k[2896]*y_cur[IDX_HCNHII]*y_cur[IDX_SiI] + + k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + + k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] + + k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + + k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + + k[3475]*y_cur[IDX_NI]*y_cur[IDX_SiOII] + + k[3603]*y_cur[IDX_NH3I]*y_cur[IDX_SiHII] - + k[3791]*y_cur[IDX_OHII]*y_cur[IDX_SiI] - + k[3872]*y_cur[IDX_SiI]*y_cur[IDX_C3HII] - + k[3873]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - + k[3874]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - + k[3875]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] - + k[3876]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] - + k[3877]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - + k[3878]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - + k[3879]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - + k[3880]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - + k[3881]*y_cur[IDX_SiI]*y_cur[IDX_HCOII] + + k[3917]*y_cur[IDX_CM]*y_cur[IDX_SiII] + + k[3952]*y_cur[IDX_C10M]*y_cur[IDX_SiII] + + k[3987]*y_cur[IDX_C10HM]*y_cur[IDX_SiII] + + k[4022]*y_cur[IDX_C2M]*y_cur[IDX_SiII] + + k[4057]*y_cur[IDX_C2HM]*y_cur[IDX_SiII] + + k[4092]*y_cur[IDX_C3M]*y_cur[IDX_SiII] + + k[4127]*y_cur[IDX_C3HM]*y_cur[IDX_SiII] + + k[4162]*y_cur[IDX_C3NM]*y_cur[IDX_SiII] + + k[4197]*y_cur[IDX_C4M]*y_cur[IDX_SiII] + + k[4232]*y_cur[IDX_C4HM]*y_cur[IDX_SiII] + + k[4267]*y_cur[IDX_C5M]*y_cur[IDX_SiII] + + k[4302]*y_cur[IDX_C5HM]*y_cur[IDX_SiII] + + k[4337]*y_cur[IDX_C5NM]*y_cur[IDX_SiII] + + k[4372]*y_cur[IDX_C6M]*y_cur[IDX_SiII] + + k[4407]*y_cur[IDX_C6HM]*y_cur[IDX_SiII] + + k[4442]*y_cur[IDX_C7M]*y_cur[IDX_SiII] + + k[4477]*y_cur[IDX_C7HM]*y_cur[IDX_SiII] + + k[4512]*y_cur[IDX_C8M]*y_cur[IDX_SiII] + + k[4547]*y_cur[IDX_C8HM]*y_cur[IDX_SiII] + + k[4582]*y_cur[IDX_C9M]*y_cur[IDX_SiII] + + k[4617]*y_cur[IDX_C9HM]*y_cur[IDX_SiII] + + k[4652]*y_cur[IDX_CHM]*y_cur[IDX_SiII] + + k[4687]*y_cur[IDX_CNM]*y_cur[IDX_SiII] + + k[4723]*y_cur[IDX_HM]*y_cur[IDX_SiII] + + k[4758]*y_cur[IDX_OM]*y_cur[IDX_SiII] + + k[4793]*y_cur[IDX_O2M]*y_cur[IDX_SiII] + + k[4828]*y_cur[IDX_OHM]*y_cur[IDX_SiII] + + k[4863]*y_cur[IDX_SM]*y_cur[IDX_SiII] - + k[4879]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - + k[4880]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - + k[4885]*y_cur[IDX_C2H4I]*y_cur[IDX_SiI] - + k[5021]*y_cur[IDX_CH2I]*y_cur[IDX_SiI] - + k[5049]*y_cur[IDX_CH3I]*y_cur[IDX_SiI] + + k[5292]*y_cur[IDX_NI]*y_cur[IDX_SiCI] + + k[5443]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + k[5450]*y_cur[IDX_OI]*y_cur[IDX_SiNI] - - k[5451]*y_cur[IDX_OI]*y_cur[IDX_SiNI] - - k[5452]*y_cur[IDX_OI]*y_cur[IDX_SiNCI] + - k[5458]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] + - k[5459]*y_cur[IDX_OHI]*y_cur[IDX_CNI] + - k[5464]*y_cur[IDX_OHI]*y_cur[IDX_FI] + - k[5479]*y_cur[IDX_OHI]*y_cur[IDX_OHI] + - k[5484]*y_cur[IDX_PI]*y_cur[IDX_O2I] + - k[5490]*y_cur[IDX_SI]*y_cur[IDX_SOI] + + k[5482]*y_cur[IDX_OHI]*y_cur[IDX_SiI] - + k[5491]*y_cur[IDX_SiI]*y_cur[IDX_CO2I] - + k[5492]*y_cur[IDX_SiI]*y_cur[IDX_COI] - + k[5493]*y_cur[IDX_SiI]*y_cur[IDX_NOI] - k[5494]*y_cur[IDX_SiI]*y_cur[IDX_O2I] - - k[5505]*y_cur[IDX_CII]*y_cur[IDX_OI] - - k[5526]*y_cur[IDX_CI]*y_cur[IDX_OI] - - k[5573]*y_cur[IDX_HI]*y_cur[IDX_OI] - - k[5582]*y_cur[IDX_OI]*y_cur[IDX_OI] - - k[5582]*y_cur[IDX_OI]*y_cur[IDX_OI] - - k[5583]*y_cur[IDX_OI]*y_cur[IDX_SOI] - - k[5584]*y_cur[IDX_OI]*y_cur[IDX_SiII] - - k[5585]*y_cur[IDX_OI]*y_cur[IDX_SiI] - - k[5609]*y_cur[IDX_OI]*y_cur[IDX_eM] + - k[5623]*y_cur[IDX_OII]*y_cur[IDX_eM] - k[5685]*y_cur[IDX_OI] + - k[5712]*y_cur[IDX_C2OI] + k[5824]*y_cur[IDX_CNOI] + - k[5825]*y_cur[IDX_CO2I] + k[5826]*y_cur[IDX_COI] + - k[5831]*y_cur[IDX_ClOI] + k[5890]*y_cur[IDX_NO2I] + - k[5892]*y_cur[IDX_NOI] + k[5895]*y_cur[IDX_OM] + - k[5898]*y_cur[IDX_O2I] + k[5898]*y_cur[IDX_O2I] - - k[5900]*y_cur[IDX_OI] + k[5901]*y_cur[IDX_OCNI] + - k[5905]*y_cur[IDX_OHI] + k[5910]*y_cur[IDX_POI] + - k[5914]*y_cur[IDX_SO2I] + k[5915]*y_cur[IDX_SOI] + - k[5933]*y_cur[IDX_SiO2I] + k[5934]*y_cur[IDX_SiOI] + - k[5936]*y_cur[IDX_CH3OI] + k[5997]*y_cur[IDX_C2OI] + - k[6135]*y_cur[IDX_CNOI] + k[6136]*y_cur[IDX_COII] + - k[6137]*y_cur[IDX_CO2I] + k[6138]*y_cur[IDX_COI] + - k[6144]*y_cur[IDX_ClOI] + k[6161]*y_cur[IDX_H2OI] + - k[6212]*y_cur[IDX_N2OI] + k[6227]*y_cur[IDX_NO2I] + - k[6229]*y_cur[IDX_NOI] + k[6232]*y_cur[IDX_OM] + - k[6233]*y_cur[IDX_O2II] + k[6236]*y_cur[IDX_O2I] + - k[6236]*y_cur[IDX_O2I] + k[6238]*y_cur[IDX_O2HI] + - k[6239]*y_cur[IDX_OCNI] + k[6244]*y_cur[IDX_OHI] + - k[6251]*y_cur[IDX_POI] + k[6256]*y_cur[IDX_SO2I] + - k[6257]*y_cur[IDX_SOI] + k[6284]*y_cur[IDX_SiOII] + - k[6285]*y_cur[IDX_SiO2I] + k[6286]*y_cur[IDX_SiOI] + - k[6289]*y_cur[IDX_CH3OI] - k[6301]*y_cur[IDX_OI] + - k[6326]*y_cur[IDX_OII]*y_cur[IDX_GRAINM] + - k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM] + - k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + - k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + - k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM] + - k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + - k[6407]*y_cur[IDX_NOII]*y_cur[IDX_GRAINM] + - k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM] + - k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM] + - k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + - k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + - k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + - k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[5585]*y_cur[IDX_OI]*y_cur[IDX_SiI] + + k[5626]*y_cur[IDX_SiII]*y_cur[IDX_eM] + k[5863]*y_cur[IDX_HCSiI] - + k[5917]*y_cur[IDX_SiI] + k[5924]*y_cur[IDX_SiCI] + + k[5930]*y_cur[IDX_SiHI] + k[5931]*y_cur[IDX_SiNI] + + k[5932]*y_cur[IDX_SiNCI] + k[5934]*y_cur[IDX_SiOI] + + k[5935]*y_cur[IDX_SiSI] - k[6259]*y_cur[IDX_SiI] + + k[6260]*y_cur[IDX_SiC2I] + k[6266]*y_cur[IDX_SiC4I] + + k[6267]*y_cur[IDX_SiCI] + k[6280]*y_cur[IDX_SiHI] + + k[6281]*y_cur[IDX_SiNI] + k[6283]*y_cur[IDX_SiNCI] + + k[6286]*y_cur[IDX_SiOI] + k[6288]*y_cur[IDX_SiSI] - + k[6302]*y_cur[IDX_SiI] + k[6374]*y_cur[IDX_SiII]*y_cur[IDX_GRAINM] + + k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM] + + k[6402]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM] + + k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + + k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM] + + k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + k[6531]*y_cur[IDX_SiOII]*y_cur[IDX_GRAINM] + - k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM] + - k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + - k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + - k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM] + - k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + - k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM] + - k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + - k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM] + - k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM] + - k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + - k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + - k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + - k[6751]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + - k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - k[6899]*y_cur[IDX_OI] - + k[7081]*y_cur[IDX_GOI] + k[7263]*y_cur[IDX_GOI] + - k[7445]*y_cur[IDX_GOI]; - ydot[yistart + IDX_OII] = 0.0 - - k[266]*y_cur[IDX_CH2I]*y_cur[IDX_OII] - - k[295]*y_cur[IDX_CHI]*y_cur[IDX_OII] + - k[406]*y_cur[IDX_HII]*y_cur[IDX_OI] - - k[492]*y_cur[IDX_HI]*y_cur[IDX_OII] - - k[619]*y_cur[IDX_NHI]*y_cur[IDX_OII] - - k[646]*y_cur[IDX_OII]*y_cur[IDX_C2I] - - k[647]*y_cur[IDX_OII]*y_cur[IDX_C2H2I] - - k[648]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - - k[649]*y_cur[IDX_OII]*y_cur[IDX_C2HI] - - k[650]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - - k[651]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - - k[652]*y_cur[IDX_OII]*y_cur[IDX_CH4I] - - k[653]*y_cur[IDX_OII]*y_cur[IDX_COI] - - k[654]*y_cur[IDX_OII]*y_cur[IDX_FeI] - - k[655]*y_cur[IDX_OII]*y_cur[IDX_H2COI] - - k[656]*y_cur[IDX_OII]*y_cur[IDX_H2OI] - - k[657]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - - k[658]*y_cur[IDX_OII]*y_cur[IDX_HCOI] - - k[659]*y_cur[IDX_OII]*y_cur[IDX_N2OI] - - k[660]*y_cur[IDX_OII]*y_cur[IDX_NH2I] - - k[661]*y_cur[IDX_OII]*y_cur[IDX_NH3I] - - k[662]*y_cur[IDX_OII]*y_cur[IDX_O2I] - - k[663]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - - k[664]*y_cur[IDX_OII]*y_cur[IDX_OHI] - - k[665]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + - k[681]*y_cur[IDX_OI]*y_cur[IDX_CNII] + - k[682]*y_cur[IDX_OI]*y_cur[IDX_COII] + - k[683]*y_cur[IDX_OI]*y_cur[IDX_CO2II] + - k[684]*y_cur[IDX_OI]*y_cur[IDX_N2II] + - k[1423]*y_cur[IDX_CII]*y_cur[IDX_O2I] + - k[1968]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - - k[2261]*y_cur[IDX_CHI]*y_cur[IDX_OII] - - k[2466]*y_cur[IDX_H2I]*y_cur[IDX_OII] + - k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + - k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + - k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + - k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + - k[3290]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + - k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + - k[3294]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3297]*y_cur[IDX_HeII]*y_cur[IDX_OHI] + - k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + - k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + - k[3358]*y_cur[IDX_NII]*y_cur[IDX_O2I] - - k[3619]*y_cur[IDX_NHI]*y_cur[IDX_OII] - - k[3631]*y_cur[IDX_OII]*y_cur[IDX_C2I] - - k[3632]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - - k[3633]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - - k[3634]*y_cur[IDX_OII]*y_cur[IDX_C2HI] - + k[6556]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] + + k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM] + + k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + + k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + + k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM] + + k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM] + + k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + + k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] - + k[6915]*y_cur[IDX_SiI] + k[7097]*y_cur[IDX_GSiI] + + k[7279]*y_cur[IDX_GSiI] + k[7461]*y_cur[IDX_GSiI]; + ydot[yistart + IDX_C2H3II] = 0.0 + + k[214]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + + k[231]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + + k[269]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + + k[325]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + + k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] - + k[745]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[746]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[747]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[748]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[749]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[750]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[751]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[752]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[753]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[754]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[755]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] - + k[756]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[1302]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1354]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] + + k[1364]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + + k[1368]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1374]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1379]*y_cur[IDX_CII]*y_cur[IDX_CH3CNI] + + k[1384]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + + k[1519]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + + k[1524]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] - + k[1535]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H3II] + + k[1566]*y_cur[IDX_C2H2I]*y_cur[IDX_HCOII] + + k[1567]*y_cur[IDX_C2H2I]*y_cur[IDX_HCO2II] + + k[1568]*y_cur[IDX_C2H2I]*y_cur[IDX_N2HII] - + k[1577]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - + k[1578]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - + k[1579]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H4I] - + k[1580]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - + k[1581]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - + k[1582]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] - + k[1583]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - + k[1584]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - + k[1585]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] - + k[1586]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - + k[1587]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - + k[1588]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] - + k[1589]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - + k[1590]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - + k[1591]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] - + k[1592]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - + k[1593]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - + k[1594]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] - + k[1595]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - + k[1596]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - + k[1597]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] - + k[1598]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H6I] - + k[1599]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - + k[1600]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - + k[1601]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] - + k[1602]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - + k[1603]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - + k[1604]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] - + k[1605]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - + k[1606]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - + k[1607]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] - + k[1608]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - + k[1609]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - + k[1610]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] - + k[1611]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] - + k[1612]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] - + k[1613]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - + k[1614]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - + k[1615]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] - + k[1616]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - + k[1617]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - + k[1618]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] - + k[1619]*y_cur[IDX_C2H3II]*y_cur[IDX_H2SI] - + k[1620]*y_cur[IDX_C2H3II]*y_cur[IDX_HC3NI] - + k[1621]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - + k[1622]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - + k[1623]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] - + k[1624]*y_cur[IDX_C2H3II]*y_cur[IDX_NCCNI] - + k[1625]*y_cur[IDX_C2H3II]*y_cur[IDX_SI] - + k[1626]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] - + k[1627]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] + + k[1715]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - + k[1726]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - + k[1727]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - + k[1728]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - + k[1851]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] - + k[1852]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + + k[1941]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + + k[1999]*y_cur[IDX_CH2I]*y_cur[IDX_CH3II] + + k[2045]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + + k[2133]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - + k[2156]*y_cur[IDX_CH4I]*y_cur[IDX_C2H3II] + + k[2160]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] + + k[2172]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + + k[2199]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] + + k[2218]*y_cur[IDX_CH5II]*y_cur[IDX_C2H2I] + + k[2297]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + + k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + + k[2370]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + + k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + + k[2403]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] - + k[2523]*y_cur[IDX_H2OI]*y_cur[IDX_C2H3II] + + k[2528]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + + k[2576]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + + k[2587]*y_cur[IDX_H3II]*y_cur[IDX_C2H2I] + + k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + + k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + + k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2827]*y_cur[IDX_HI]*y_cur[IDX_C2H3II] + + k[2828]*y_cur[IDX_HI]*y_cur[IDX_C2H4II] - + k[2861]*y_cur[IDX_HCNI]*y_cur[IDX_C2H3II] - + k[3036]*y_cur[IDX_HNCI]*y_cur[IDX_C2H3II] + + k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + + k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - + k[3390]*y_cur[IDX_NI]*y_cur[IDX_C2H3II] - + k[3557]*y_cur[IDX_NH3I]*y_cur[IDX_C2H3II] + + k[3633]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + k[3635]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - - k[3636]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - - k[3637]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] - - k[3638]*y_cur[IDX_OII]*y_cur[IDX_CH4I] - - k[3639]*y_cur[IDX_OII]*y_cur[IDX_CNI] - - k[3640]*y_cur[IDX_OII]*y_cur[IDX_CO2I] - - k[3641]*y_cur[IDX_OII]*y_cur[IDX_H2COI] - - k[3642]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - - k[3643]*y_cur[IDX_OII]*y_cur[IDX_H2SI] - - k[3644]*y_cur[IDX_OII]*y_cur[IDX_HCNI] - - k[3645]*y_cur[IDX_OII]*y_cur[IDX_HCNI] - - k[3646]*y_cur[IDX_OII]*y_cur[IDX_HCOI] - - k[3647]*y_cur[IDX_OII]*y_cur[IDX_N2I] - - k[3648]*y_cur[IDX_OII]*y_cur[IDX_NO2I] - - k[3649]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - - k[3650]*y_cur[IDX_OII]*y_cur[IDX_OHI] - - k[3651]*y_cur[IDX_OII]*y_cur[IDX_SO2I] - - k[3914]*y_cur[IDX_CM]*y_cur[IDX_OII] - - k[3949]*y_cur[IDX_C10M]*y_cur[IDX_OII] - - k[3984]*y_cur[IDX_C10HM]*y_cur[IDX_OII] - - k[4019]*y_cur[IDX_C2M]*y_cur[IDX_OII] - - k[4054]*y_cur[IDX_C2HM]*y_cur[IDX_OII] - - k[4089]*y_cur[IDX_C3M]*y_cur[IDX_OII] - - k[4124]*y_cur[IDX_C3HM]*y_cur[IDX_OII] - - k[4159]*y_cur[IDX_C3NM]*y_cur[IDX_OII] - - k[4194]*y_cur[IDX_C4M]*y_cur[IDX_OII] - - k[4229]*y_cur[IDX_C4HM]*y_cur[IDX_OII] - - k[4264]*y_cur[IDX_C5M]*y_cur[IDX_OII] - - k[4299]*y_cur[IDX_C5HM]*y_cur[IDX_OII] - - k[4334]*y_cur[IDX_C5NM]*y_cur[IDX_OII] - - k[4369]*y_cur[IDX_C6M]*y_cur[IDX_OII] - - k[4404]*y_cur[IDX_C6HM]*y_cur[IDX_OII] - - k[4439]*y_cur[IDX_C7M]*y_cur[IDX_OII] - - k[4474]*y_cur[IDX_C7HM]*y_cur[IDX_OII] - - k[4509]*y_cur[IDX_C8M]*y_cur[IDX_OII] - - k[4544]*y_cur[IDX_C8HM]*y_cur[IDX_OII] - - k[4579]*y_cur[IDX_C9M]*y_cur[IDX_OII] - - k[4614]*y_cur[IDX_C9HM]*y_cur[IDX_OII] - - k[4649]*y_cur[IDX_CHM]*y_cur[IDX_OII] - - k[4684]*y_cur[IDX_CNM]*y_cur[IDX_OII] - - k[4720]*y_cur[IDX_HM]*y_cur[IDX_OII] - - k[4755]*y_cur[IDX_OM]*y_cur[IDX_OII] - - k[4790]*y_cur[IDX_O2M]*y_cur[IDX_OII] - - k[4825]*y_cur[IDX_OHM]*y_cur[IDX_OII] - - k[4860]*y_cur[IDX_SM]*y_cur[IDX_OII] - - k[5525]*y_cur[IDX_CI]*y_cur[IDX_OII] - - k[5623]*y_cur[IDX_OII]*y_cur[IDX_eM] + k[5685]*y_cur[IDX_OI] + - k[5900]*y_cur[IDX_OI] + k[6233]*y_cur[IDX_O2II] + - k[6242]*y_cur[IDX_OHII] + k[6301]*y_cur[IDX_OI] - - k[6326]*y_cur[IDX_OII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_OM] = 0.0 - k[56]*y_cur[IDX_CI]*y_cur[IDX_OM] - - k[59]*y_cur[IDX_CH2I]*y_cur[IDX_OM] - - k[62]*y_cur[IDX_CHI]*y_cur[IDX_OM] - - k[83]*y_cur[IDX_H2I]*y_cur[IDX_OM] - - k[107]*y_cur[IDX_HI]*y_cur[IDX_OM] - - k[122]*y_cur[IDX_NI]*y_cur[IDX_OM] - - k[124]*y_cur[IDX_OM]*y_cur[IDX_COI] - - k[125]*y_cur[IDX_OM]*y_cur[IDX_NOI] - - k[126]*y_cur[IDX_OM]*y_cur[IDX_OI] - - k[666]*y_cur[IDX_OM]*y_cur[IDX_CNI] - - k[667]*y_cur[IDX_OM]*y_cur[IDX_O2I] + - k[1450]*y_cur[IDX_CM]*y_cur[IDX_O2I] - - k[2467]*y_cur[IDX_H2I]*y_cur[IDX_OM] - - k[3652]*y_cur[IDX_OM]*y_cur[IDX_CH4I] - - k[3653]*y_cur[IDX_OM]*y_cur[IDX_HCNI] - - k[4727]*y_cur[IDX_OM]*y_cur[IDX_CII] - - k[4728]*y_cur[IDX_OM]*y_cur[IDX_C2H2II] - - k[4729]*y_cur[IDX_OM]*y_cur[IDX_C2H3II] - - k[4730]*y_cur[IDX_OM]*y_cur[IDX_C4H2II] - - k[4731]*y_cur[IDX_OM]*y_cur[IDX_C4H3II] - - k[4732]*y_cur[IDX_OM]*y_cur[IDX_C4SII] - - k[4733]*y_cur[IDX_OM]*y_cur[IDX_CH2CCHII] - - k[4734]*y_cur[IDX_OM]*y_cur[IDX_CH3II] - - k[4735]*y_cur[IDX_OM]*y_cur[IDX_CNCII] - - k[4736]*y_cur[IDX_OM]*y_cur[IDX_FeII] - - k[4737]*y_cur[IDX_OM]*y_cur[IDX_HII] - - k[4738]*y_cur[IDX_OM]*y_cur[IDX_H2COII] - - k[4739]*y_cur[IDX_OM]*y_cur[IDX_H2SII] - - k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] - - k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] - - k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] - - k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] - - k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] - - k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] - - k[4746]*y_cur[IDX_OM]*y_cur[IDX_HCOII] - - k[4747]*y_cur[IDX_OM]*y_cur[IDX_HeII] - - k[4748]*y_cur[IDX_OM]*y_cur[IDX_MgII] - - k[4749]*y_cur[IDX_OM]*y_cur[IDX_NII] - - k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] - - k[4751]*y_cur[IDX_OM]*y_cur[IDX_NH3II] - - k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] - - k[4753]*y_cur[IDX_OM]*y_cur[IDX_NOII] - - k[4754]*y_cur[IDX_OM]*y_cur[IDX_NaII] - - k[4755]*y_cur[IDX_OM]*y_cur[IDX_OII] - - k[4756]*y_cur[IDX_OM]*y_cur[IDX_SII] - - k[4757]*y_cur[IDX_OM]*y_cur[IDX_SOII] - - k[4758]*y_cur[IDX_OM]*y_cur[IDX_SiII] - - k[4759]*y_cur[IDX_OM]*y_cur[IDX_SiOII] - - k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] - - k[4761]*y_cur[IDX_OM]*y_cur[IDX_SiSII] + - k[5609]*y_cur[IDX_OI]*y_cur[IDX_eM] - k[5895]*y_cur[IDX_OM] - - k[6232]*y_cur[IDX_OM]; - ydot[yistart + IDX_O2I] = 0.0 - k[7]*y_cur[IDX_CM]*y_cur[IDX_O2I] + - k[126]*y_cur[IDX_OM]*y_cur[IDX_OI] - - k[127]*y_cur[IDX_O2I]*y_cur[IDX_SM] - - k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - - k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] - - k[146]*y_cur[IDX_O2M]*y_cur[IDX_O2I] + - k[146]*y_cur[IDX_O2M]*y_cur[IDX_O2I] + - k[146]*y_cur[IDX_O2M]*y_cur[IDX_O2I] + - k[211]*y_cur[IDX_C2I]*y_cur[IDX_O2II] + - k[240]*y_cur[IDX_C2H4I]*y_cur[IDX_O2II] + - k[248]*y_cur[IDX_CI]*y_cur[IDX_O2II] + - k[267]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] - - k[283]*y_cur[IDX_CH4II]*y_cur[IDX_O2I] + - k[296]*y_cur[IDX_CHI]*y_cur[IDX_O2II] - - k[304]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - - k[312]*y_cur[IDX_COII]*y_cur[IDX_O2I] - - k[405]*y_cur[IDX_HII]*y_cur[IDX_O2I] - - k[455]*y_cur[IDX_H2II]*y_cur[IDX_O2I] + - k[461]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] - - k[474]*y_cur[IDX_H2OII]*y_cur[IDX_O2I] - - k[495]*y_cur[IDX_HCNII]*y_cur[IDX_O2I] + - k[502]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] - - k[525]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + - k[537]*y_cur[IDX_MgI]*y_cur[IDX_O2II] - - k[561]*y_cur[IDX_NII]*y_cur[IDX_O2I] - - k[570]*y_cur[IDX_N2II]*y_cur[IDX_O2I] - - k[578]*y_cur[IDX_NHII]*y_cur[IDX_O2I] + - k[590]*y_cur[IDX_NH2I]*y_cur[IDX_O2II] + - k[611]*y_cur[IDX_NH3I]*y_cur[IDX_O2II] + - k[628]*y_cur[IDX_NOI]*y_cur[IDX_O2II] + - k[642]*y_cur[IDX_NaI]*y_cur[IDX_O2II] - - k[662]*y_cur[IDX_OII]*y_cur[IDX_O2I] - - k[667]*y_cur[IDX_OM]*y_cur[IDX_O2I] + - k[668]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + - k[669]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + - k[670]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[671]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] + - k[672]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] + - k[673]*y_cur[IDX_O2II]*y_cur[IDX_FeI] + - k[674]*y_cur[IDX_O2II]*y_cur[IDX_H2SI] + - k[675]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + - k[676]*y_cur[IDX_O2II]*y_cur[IDX_NO2I] + - k[677]*y_cur[IDX_O2II]*y_cur[IDX_SI] - - k[678]*y_cur[IDX_O2I]*y_cur[IDX_CO2II] - - k[679]*y_cur[IDX_O2I]*y_cur[IDX_ClII] - - k[680]*y_cur[IDX_O2I]*y_cur[IDX_SO2II] - - k[694]*y_cur[IDX_OHII]*y_cur[IDX_O2I] + - k[722]*y_cur[IDX_SiI]*y_cur[IDX_O2II] + - k[1175]*y_cur[IDX_O2HII]*y_cur[IDX_eM] - - k[1422]*y_cur[IDX_CII]*y_cur[IDX_O2I] - - k[1423]*y_cur[IDX_CII]*y_cur[IDX_O2I] - - k[1450]*y_cur[IDX_CM]*y_cur[IDX_O2I] - - k[1455]*y_cur[IDX_C2II]*y_cur[IDX_O2I] + - k[1463]*y_cur[IDX_C2I]*y_cur[IDX_O2HII] + - k[1749]*y_cur[IDX_C2HI]*y_cur[IDX_O2HII] + - k[1913]*y_cur[IDX_CI]*y_cur[IDX_O2HII] - - k[1966]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - - k[1967]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - - k[1968]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - - k[1990]*y_cur[IDX_CH2II]*y_cur[IDX_O2I] + - k[2015]*y_cur[IDX_CH2I]*y_cur[IDX_O2HII] - - k[2089]*y_cur[IDX_CH3II]*y_cur[IDX_O2I] + - k[2263]*y_cur[IDX_CHI]*y_cur[IDX_O2HII] - - k[2275]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - - k[2276]*y_cur[IDX_CNII]*y_cur[IDX_O2I] + - k[2279]*y_cur[IDX_CNI]*y_cur[IDX_O2HII] + - k[2289]*y_cur[IDX_COI]*y_cur[IDX_O2HII] - - k[2395]*y_cur[IDX_H2II]*y_cur[IDX_O2I] + - k[2468]*y_cur[IDX_H2I]*y_cur[IDX_O2HII] - - k[2489]*y_cur[IDX_H2COII]*y_cur[IDX_O2I] + - k[2498]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + - k[2499]*y_cur[IDX_H2COI]*y_cur[IDX_O2HII] + - k[2561]*y_cur[IDX_H2OI]*y_cur[IDX_O2HII] - - k[2729]*y_cur[IDX_H3II]*y_cur[IDX_O2I] + - k[2883]*y_cur[IDX_HCNI]*y_cur[IDX_O2HII] + - k[3011]*y_cur[IDX_HCOI]*y_cur[IDX_O2HII] + - k[3045]*y_cur[IDX_HNCI]*y_cur[IDX_O2HII] + - k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3290]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + - k[3303]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + - k[3331]*y_cur[IDX_HeII]*y_cur[IDX_SiO2I] - - k[3357]*y_cur[IDX_NII]*y_cur[IDX_O2I] - + k[3690]*y_cur[IDX_OI]*y_cur[IDX_C2H3II] - + k[3888]*y_cur[IDX_CM]*y_cur[IDX_C2H3II] - + k[3923]*y_cur[IDX_C10M]*y_cur[IDX_C2H3II] - + k[3958]*y_cur[IDX_C10HM]*y_cur[IDX_C2H3II] - + k[3993]*y_cur[IDX_C2M]*y_cur[IDX_C2H3II] - + k[4028]*y_cur[IDX_C2HM]*y_cur[IDX_C2H3II] - + k[4063]*y_cur[IDX_C3M]*y_cur[IDX_C2H3II] - + k[4098]*y_cur[IDX_C3HM]*y_cur[IDX_C2H3II] - + k[4133]*y_cur[IDX_C3NM]*y_cur[IDX_C2H3II] - + k[4168]*y_cur[IDX_C4M]*y_cur[IDX_C2H3II] - + k[4203]*y_cur[IDX_C4HM]*y_cur[IDX_C2H3II] - + k[4238]*y_cur[IDX_C5M]*y_cur[IDX_C2H3II] - + k[4273]*y_cur[IDX_C5HM]*y_cur[IDX_C2H3II] - + k[4308]*y_cur[IDX_C5NM]*y_cur[IDX_C2H3II] - + k[4343]*y_cur[IDX_C6M]*y_cur[IDX_C2H3II] - + k[4378]*y_cur[IDX_C6HM]*y_cur[IDX_C2H3II] - + k[4413]*y_cur[IDX_C7M]*y_cur[IDX_C2H3II] - + k[4448]*y_cur[IDX_C7HM]*y_cur[IDX_C2H3II] - + k[4483]*y_cur[IDX_C8M]*y_cur[IDX_C2H3II] - + k[4518]*y_cur[IDX_C8HM]*y_cur[IDX_C2H3II] - + k[4553]*y_cur[IDX_C9M]*y_cur[IDX_C2H3II] - + k[4588]*y_cur[IDX_C9HM]*y_cur[IDX_C2H3II] - + k[4623]*y_cur[IDX_CHM]*y_cur[IDX_C2H3II] - + k[4658]*y_cur[IDX_CNM]*y_cur[IDX_C2H3II] - + k[4693]*y_cur[IDX_HM]*y_cur[IDX_C2H3II] - + k[4729]*y_cur[IDX_OM]*y_cur[IDX_C2H3II] - + k[4764]*y_cur[IDX_O2M]*y_cur[IDX_C2H3II] - + k[4799]*y_cur[IDX_OHM]*y_cur[IDX_C2H3II] - + k[4834]*y_cur[IDX_SM]*y_cur[IDX_C2H3II] - + k[5513]*y_cur[IDX_C2H3II]*y_cur[IDX_COI] + k[5699]*y_cur[IDX_C2H3I] + + k[5984]*y_cur[IDX_C2H3I] - + k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_NOI] = 0.0 + k[122]*y_cur[IDX_NI]*y_cur[IDX_OM] - + k[125]*y_cur[IDX_OM]*y_cur[IDX_NOI] - + k[186]*y_cur[IDX_CII]*y_cur[IDX_NOI] - + k[206]*y_cur[IDX_C2II]*y_cur[IDX_NOI] - + k[212]*y_cur[IDX_C2HII]*y_cur[IDX_NOI] - + k[226]*y_cur[IDX_C2H2II]*y_cur[IDX_NOI] - + k[254]*y_cur[IDX_CHII]*y_cur[IDX_NOI] - + k[258]*y_cur[IDX_CH2II]*y_cur[IDX_NOI] - + k[274]*y_cur[IDX_CH3II]*y_cur[IDX_NOI] - + k[303]*y_cur[IDX_CNII]*y_cur[IDX_NOI] - + k[311]*y_cur[IDX_COII]*y_cur[IDX_NOI] - + k[403]*y_cur[IDX_HII]*y_cur[IDX_NOI] - + k[454]*y_cur[IDX_H2II]*y_cur[IDX_NOI] - + k[472]*y_cur[IDX_H2OII]*y_cur[IDX_NOI] - + k[494]*y_cur[IDX_HCNII]*y_cur[IDX_NOI] + + k[536]*y_cur[IDX_MgI]*y_cur[IDX_NOII] - + k[560]*y_cur[IDX_NII]*y_cur[IDX_NOI] - + k[569]*y_cur[IDX_N2II]*y_cur[IDX_NOI] - + k[577]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - + k[583]*y_cur[IDX_NH2II]*y_cur[IDX_NOI] - + k[595]*y_cur[IDX_NH3II]*y_cur[IDX_NOI] + + k[620]*y_cur[IDX_NOII]*y_cur[IDX_FeI] - + k[621]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - + k[622]*y_cur[IDX_NOI]*y_cur[IDX_C4H2II] - + k[623]*y_cur[IDX_NOI]*y_cur[IDX_CO2II] - + k[624]*y_cur[IDX_NOI]*y_cur[IDX_H2COII] - + k[625]*y_cur[IDX_NOI]*y_cur[IDX_H2SII] - + k[626]*y_cur[IDX_NOI]*y_cur[IDX_HNOII] - + k[627]*y_cur[IDX_NOI]*y_cur[IDX_HSII] - + k[628]*y_cur[IDX_NOI]*y_cur[IDX_O2II] - + k[629]*y_cur[IDX_NOI]*y_cur[IDX_SII] - + k[630]*y_cur[IDX_NOI]*y_cur[IDX_S2II] - + k[631]*y_cur[IDX_NOI]*y_cur[IDX_SiOII] + + k[641]*y_cur[IDX_NaI]*y_cur[IDX_NOII] - + k[693]*y_cur[IDX_OHII]*y_cur[IDX_NOI] + + k[721]*y_cur[IDX_SiI]*y_cur[IDX_NOII] + + k[994]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + + k[1011]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] + + k[1092]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + + k[1121]*y_cur[IDX_HNOII]*y_cur[IDX_eM] + + k[1169]*y_cur[IDX_NO2II]*y_cur[IDX_eM] + + k[1171]*y_cur[IDX_N2OII]*y_cur[IDX_eM] - + k[1449]*y_cur[IDX_CM]*y_cur[IDX_NOI] + + k[1460]*y_cur[IDX_C2I]*y_cur[IDX_HNOII] + + k[1747]*y_cur[IDX_C2HI]*y_cur[IDX_HNOII] + + k[1907]*y_cur[IDX_CI]*y_cur[IDX_HNOII] + + k[2009]*y_cur[IDX_CH2I]*y_cur[IDX_HNOII] + + k[2202]*y_cur[IDX_CH4I]*y_cur[IDX_HNOII] + + k[2254]*y_cur[IDX_CHI]*y_cur[IDX_HNOII] + + k[2269]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] - + k[2274]*y_cur[IDX_CNII]*y_cur[IDX_NOI] + + k[2278]*y_cur[IDX_CNI]*y_cur[IDX_HNOII] + + k[2286]*y_cur[IDX_COI]*y_cur[IDX_HNOII] + + k[2343]*y_cur[IDX_HII]*y_cur[IDX_HCNOI] - + k[2394]*y_cur[IDX_H2II]*y_cur[IDX_NOI] + + k[2497]*y_cur[IDX_H2COI]*y_cur[IDX_HNOII] + + k[2550]*y_cur[IDX_H2OI]*y_cur[IDX_HNOII] - + k[2726]*y_cur[IDX_H3II]*y_cur[IDX_NOI] + + k[2878]*y_cur[IDX_HCNI]*y_cur[IDX_HNOII] + + k[3008]*y_cur[IDX_HCOI]*y_cur[IDX_HNOII] + + k[3042]*y_cur[IDX_HNCI]*y_cur[IDX_HNOII] + + k[3049]*y_cur[IDX_HNOII]*y_cur[IDX_CO2I] + + k[3050]*y_cur[IDX_HNOII]*y_cur[IDX_SI] + + k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] + + k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - + k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] - + k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + + k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3343]*y_cur[IDX_NII]*y_cur[IDX_CO2I] - + k[3356]*y_cur[IDX_NII]*y_cur[IDX_NOI] + k[3358]*y_cur[IDX_NII]*y_cur[IDX_O2I] + - k[3367]*y_cur[IDX_N2I]*y_cur[IDX_O2HII] - - k[3501]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - - k[3502]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - - k[3524]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] - - k[3525]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] + - k[3546]*y_cur[IDX_NH2I]*y_cur[IDX_O2HII] + - k[3594]*y_cur[IDX_NH3I]*y_cur[IDX_O2HII] + - k[3622]*y_cur[IDX_NHI]*y_cur[IDX_O2HII] + + k[3359]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + + k[3366]*y_cur[IDX_N2I]*y_cur[IDX_HNOII] + + k[3476]*y_cur[IDX_NI]*y_cur[IDX_SiOII] - + k[3500]*y_cur[IDX_NHII]*y_cur[IDX_NOI] + + k[3543]*y_cur[IDX_NH2I]*y_cur[IDX_HNOII] + + k[3588]*y_cur[IDX_NH3I]*y_cur[IDX_HNOII] + + k[3615]*y_cur[IDX_NHI]*y_cur[IDX_HNOII] - + k[3626]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] - k[3627]*y_cur[IDX_NOI]*y_cur[IDX_O2HII] + - k[3648]*y_cur[IDX_OII]*y_cur[IDX_NO2I] + - k[3651]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + - k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - - k[3668]*y_cur[IDX_O2I]*y_cur[IDX_C3II] - - k[3669]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - - k[3670]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - - k[3671]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] - - k[3672]*y_cur[IDX_O2I]*y_cur[IDX_CSII] - - k[3673]*y_cur[IDX_O2I]*y_cur[IDX_PH2II] - - k[3674]*y_cur[IDX_O2I]*y_cur[IDX_SII] - - k[3675]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] - - k[3676]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + - k[3677]*y_cur[IDX_O2HII]*y_cur[IDX_CO2I] + - k[3736]*y_cur[IDX_OI]*y_cur[IDX_HCO2II] + - k[3741]*y_cur[IDX_OI]*y_cur[IDX_HPOII] + - k[3749]*y_cur[IDX_OI]*y_cur[IDX_O2HII] + - k[3764]*y_cur[IDX_OI]*y_cur[IDX_SiOII] + - k[3806]*y_cur[IDX_OHI]*y_cur[IDX_O2HII] - - k[3812]*y_cur[IDX_PII]*y_cur[IDX_O2I] - - k[3818]*y_cur[IDX_PHII]*y_cur[IDX_O2I] + - k[3840]*y_cur[IDX_SI]*y_cur[IDX_O2HII] - - k[3882]*y_cur[IDX_SiH2II]*y_cur[IDX_O2I] - - k[3884]*y_cur[IDX_SiH3II]*y_cur[IDX_O2I] + - k[4762]*y_cur[IDX_O2M]*y_cur[IDX_CII] + - k[4763]*y_cur[IDX_O2M]*y_cur[IDX_C2H2II] + - k[4764]*y_cur[IDX_O2M]*y_cur[IDX_C2H3II] + - k[4765]*y_cur[IDX_O2M]*y_cur[IDX_C4H2II] + - k[4766]*y_cur[IDX_O2M]*y_cur[IDX_C4H3II] + - k[4767]*y_cur[IDX_O2M]*y_cur[IDX_C4SII] + - k[4768]*y_cur[IDX_O2M]*y_cur[IDX_CH2CCHII] + - k[4769]*y_cur[IDX_O2M]*y_cur[IDX_CH3II] + - k[4770]*y_cur[IDX_O2M]*y_cur[IDX_CNCII] + - k[4771]*y_cur[IDX_O2M]*y_cur[IDX_FeII] + - k[4772]*y_cur[IDX_O2M]*y_cur[IDX_HII] + - k[4773]*y_cur[IDX_O2M]*y_cur[IDX_H2COII] + - k[4774]*y_cur[IDX_O2M]*y_cur[IDX_H2SII] + - k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] + - k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] + - k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] + - k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + - k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + - k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] + + k[3635]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] - + k[3787]*y_cur[IDX_OHII]*y_cur[IDX_NOI] + + k[3803]*y_cur[IDX_OHI]*y_cur[IDX_HNOII] + + k[3912]*y_cur[IDX_CM]*y_cur[IDX_NOII] + + k[3947]*y_cur[IDX_C10M]*y_cur[IDX_NOII] + + k[3982]*y_cur[IDX_C10HM]*y_cur[IDX_NOII] + + k[4017]*y_cur[IDX_C2M]*y_cur[IDX_NOII] + + k[4052]*y_cur[IDX_C2HM]*y_cur[IDX_NOII] + + k[4087]*y_cur[IDX_C3M]*y_cur[IDX_NOII] + + k[4122]*y_cur[IDX_C3HM]*y_cur[IDX_NOII] + + k[4157]*y_cur[IDX_C3NM]*y_cur[IDX_NOII] + + k[4192]*y_cur[IDX_C4M]*y_cur[IDX_NOII] + + k[4227]*y_cur[IDX_C4HM]*y_cur[IDX_NOII] + + k[4262]*y_cur[IDX_C5M]*y_cur[IDX_NOII] + + k[4297]*y_cur[IDX_C5HM]*y_cur[IDX_NOII] + + k[4332]*y_cur[IDX_C5NM]*y_cur[IDX_NOII] + + k[4367]*y_cur[IDX_C6M]*y_cur[IDX_NOII] + + k[4402]*y_cur[IDX_C6HM]*y_cur[IDX_NOII] + + k[4437]*y_cur[IDX_C7M]*y_cur[IDX_NOII] + + k[4472]*y_cur[IDX_C7HM]*y_cur[IDX_NOII] + + k[4507]*y_cur[IDX_C8M]*y_cur[IDX_NOII] + + k[4542]*y_cur[IDX_C8HM]*y_cur[IDX_NOII] + + k[4577]*y_cur[IDX_C9M]*y_cur[IDX_NOII] + + k[4612]*y_cur[IDX_C9HM]*y_cur[IDX_NOII] + + k[4647]*y_cur[IDX_CHM]*y_cur[IDX_NOII] + + k[4682]*y_cur[IDX_CNM]*y_cur[IDX_NOII] + + k[4718]*y_cur[IDX_HM]*y_cur[IDX_NOII] + + k[4753]*y_cur[IDX_OM]*y_cur[IDX_NOII] + + k[4788]*y_cur[IDX_O2M]*y_cur[IDX_NOII] + + k[4823]*y_cur[IDX_OHM]*y_cur[IDX_NOII] + + k[4858]*y_cur[IDX_SM]*y_cur[IDX_NOII] - + k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] - + k[4974]*y_cur[IDX_CI]*y_cur[IDX_NOI] - + k[4975]*y_cur[IDX_CI]*y_cur[IDX_NOI] + + k[5000]*y_cur[IDX_CH2I]*y_cur[IDX_HNOI] + + k[5002]*y_cur[IDX_CH2I]*y_cur[IDX_NO2I] - + k[5003]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - + k[5004]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - + k[5005]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] - + k[5006]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + + k[5034]*y_cur[IDX_CH3I]*y_cur[IDX_HNOI] - + k[5038]*y_cur[IDX_CH3I]*y_cur[IDX_NOI] + + k[5078]*y_cur[IDX_CHI]*y_cur[IDX_HNOI] - + k[5083]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - + k[5084]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - + k[5085]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + + k[5119]*y_cur[IDX_CNI]*y_cur[IDX_HNOI] + + k[5120]*y_cur[IDX_CNI]*y_cur[IDX_NO2I] - + k[5121]*y_cur[IDX_CNI]*y_cur[IDX_NOI] - + k[5122]*y_cur[IDX_CNI]*y_cur[IDX_NOI] + + k[5123]*y_cur[IDX_CNI]*y_cur[IDX_O2I] + + k[5129]*y_cur[IDX_COI]*y_cur[IDX_NO2I] + + k[5176]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + + k[5180]*y_cur[IDX_HI]*y_cur[IDX_N2OI] + + k[5185]*y_cur[IDX_HI]*y_cur[IDX_NO2I] - + k[5186]*y_cur[IDX_HI]*y_cur[IDX_NOI] - + k[5187]*y_cur[IDX_HI]*y_cur[IDX_NOI] + + k[5202]*y_cur[IDX_HCNOI]*y_cur[IDX_CI] + + k[5206]*y_cur[IDX_HCOI]*y_cur[IDX_HNOI] - + k[5207]*y_cur[IDX_HCOI]*y_cur[IDX_NOI] + + k[5262]*y_cur[IDX_NI]*y_cur[IDX_CO2I] + + k[5270]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + + k[5277]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + + k[5277]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5279]*y_cur[IDX_NI]*y_cur[IDX_NOI] + + k[5281]*y_cur[IDX_NI]*y_cur[IDX_O2I] + + k[5283]*y_cur[IDX_NI]*y_cur[IDX_OHI] + + k[5287]*y_cur[IDX_NI]*y_cur[IDX_POI] + + k[5291]*y_cur[IDX_NI]*y_cur[IDX_SOI] - + k[5298]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] - + k[5299]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + + k[5311]*y_cur[IDX_NHI]*y_cur[IDX_NO2I] - + k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - + k[5314]*y_cur[IDX_NHI]*y_cur[IDX_NOI] - + k[5315]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + + k[5317]*y_cur[IDX_NHI]*y_cur[IDX_O2I] + + k[5318]*y_cur[IDX_NHI]*y_cur[IDX_OI] + + k[5319]*y_cur[IDX_NHI]*y_cur[IDX_OI] - + k[5326]*y_cur[IDX_NOI]*y_cur[IDX_HNOI] - + k[5327]*y_cur[IDX_NOI]*y_cur[IDX_N2OI] - + k[5328]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - + k[5328]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - + k[5329]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - + k[5329]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - + k[5330]*y_cur[IDX_NOI]*y_cur[IDX_O2I] - + k[5331]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - + k[5332]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - + k[5333]*y_cur[IDX_NOI]*y_cur[IDX_SI] - + k[5334]*y_cur[IDX_NOI]*y_cur[IDX_SI] + + k[5335]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] + + k[5388]*y_cur[IDX_OI]*y_cur[IDX_CNI] + + k[5389]*y_cur[IDX_OI]*y_cur[IDX_CNOI] + + k[5412]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + + k[5417]*y_cur[IDX_OI]*y_cur[IDX_N2I] + + k[5418]*y_cur[IDX_OI]*y_cur[IDX_N2OI] + + k[5418]*y_cur[IDX_OI]*y_cur[IDX_N2OI] + + k[5423]*y_cur[IDX_OI]*y_cur[IDX_NO2I] - + k[5424]*y_cur[IDX_OI]*y_cur[IDX_NOI] + + k[5425]*y_cur[IDX_OI]*y_cur[IDX_NSI] + + k[5428]*y_cur[IDX_OI]*y_cur[IDX_OCNI] + + k[5450]*y_cur[IDX_OI]*y_cur[IDX_SiNI] + + k[5472]*y_cur[IDX_OHI]*y_cur[IDX_HNOI] + + k[5473]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - + k[5477]*y_cur[IDX_OHI]*y_cur[IDX_NOI] - + k[5493]*y_cur[IDX_SiI]*y_cur[IDX_NOI] + k[5855]*y_cur[IDX_HCNOI] + + k[5869]*y_cur[IDX_HNOI] + k[5879]*y_cur[IDX_N2OI] + + k[5890]*y_cur[IDX_NO2I] - k[5891]*y_cur[IDX_NOI] - + k[5892]*y_cur[IDX_NOI] + k[6182]*y_cur[IDX_HCNOI] + + k[6200]*y_cur[IDX_HNOI] + k[6214]*y_cur[IDX_N2OI] + + k[6227]*y_cur[IDX_NO2I] - k[6228]*y_cur[IDX_NOI] - + k[6229]*y_cur[IDX_NOI] + k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM] + + k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + + k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + + k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + + k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM] - k[6925]*y_cur[IDX_NOI] + + k[7107]*y_cur[IDX_GNOI] + k[7289]*y_cur[IDX_GNOI] + + k[7471]*y_cur[IDX_GNOI] + k[8702]*y_cur[IDX_GNI]*y_cur[IDX_GOI]; + ydot[yistart + IDX_HCOI] = 0.0 + k[9]*y_cur[IDX_CM]*y_cur[IDX_OHI] + + k[57]*y_cur[IDX_CI]*y_cur[IDX_OHM] + + k[62]*y_cur[IDX_CHI]*y_cur[IDX_OM] + + k[73]*y_cur[IDX_HM]*y_cur[IDX_COI] - + k[76]*y_cur[IDX_HM]*y_cur[IDX_HCOI] - + k[178]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - + k[205]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] - + k[225]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] - + k[251]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] - + k[272]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - + k[302]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] - + k[310]*y_cur[IDX_COII]*y_cur[IDX_HCOI] - + k[389]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - + k[450]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] - + k[470]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + + k[499]*y_cur[IDX_HCOII]*y_cur[IDX_FeI] - + k[500]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] - + k[501]*y_cur[IDX_HCOI]*y_cur[IDX_H2SII] - + k[502]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] - + k[503]*y_cur[IDX_HCOI]*y_cur[IDX_SII] - + k[504]*y_cur[IDX_HCOI]*y_cur[IDX_SiOII] + + k[533]*y_cur[IDX_MgI]*y_cur[IDX_HCOII] - + k[555]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - + k[568]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] - + k[581]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] - + k[593]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + + k[637]*y_cur[IDX_NaI]*y_cur[IDX_HCOII] - + k[658]*y_cur[IDX_OII]*y_cur[IDX_HCOI] - + k[691]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + + k[938]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + + k[940]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[999]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[1038]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1053]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] + + k[1102]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + + k[1103]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] + + k[1120]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + + k[1275]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1277]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1278]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1280]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + + k[1382]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - + k[1408]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - + k[1454]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + + k[1457]*y_cur[IDX_C2I]*y_cur[IDX_H2COII] - + k[1477]*y_cur[IDX_C2HII]*y_cur[IDX_HCOI] - + k[1524]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] + + k[1744]*y_cur[IDX_C2HI]*y_cur[IDX_H2COII] - + k[1959]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] + + k[1968]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - + k[1987]*y_cur[IDX_CH2II]*y_cur[IDX_HCOI] + + k[1993]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] + + k[2002]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] - + k[2082]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - + k[2230]*y_cur[IDX_CH5II]*y_cur[IDX_HCOI] + + k[2246]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - + k[2273]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + + k[2280]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - + k[2344]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - + k[2345]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - + k[2389]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + + k[2487]*y_cur[IDX_H2COII]*y_cur[IDX_CH3OHI] + + k[2488]*y_cur[IDX_H2COII]*y_cur[IDX_H2COI] + + k[2490]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + + k[2493]*y_cur[IDX_H2COI]*y_cur[IDX_CH3COCH3II] - + k[2513]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - + k[2514]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + + k[2542]*y_cur[IDX_H2OI]*y_cur[IDX_H2COII] - + k[2697]*y_cur[IDX_H3II]*y_cur[IDX_HCOI] - + k[2857]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] - + k[2858]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] + + k[2874]*y_cur[IDX_HCNI]*y_cur[IDX_H2COII] - + k[2969]*y_cur[IDX_HCOII]*y_cur[IDX_HCOI] - + k[3007]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] - + k[3008]*y_cur[IDX_HCOI]*y_cur[IDX_HNOII] - + k[3009]*y_cur[IDX_HCOI]*y_cur[IDX_N2HII] - + k[3010]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] - + k[3011]*y_cur[IDX_HCOI]*y_cur[IDX_O2HII] - + k[3012]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + + k[3038]*y_cur[IDX_HNCI]*y_cur[IDX_H2COII] + + k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] - + k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - + k[3250]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - + k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - + k[3350]*y_cur[IDX_NII]*y_cur[IDX_HCOI] - + k[3364]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + + k[3484]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - + k[3494]*y_cur[IDX_NHII]*y_cur[IDX_HCOI] + + k[3511]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - + k[3520]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] + + k[3535]*y_cur[IDX_NH2I]*y_cur[IDX_H2COII] + + k[3549]*y_cur[IDX_NH3II]*y_cur[IDX_H2COI] - + k[3552]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + + k[3574]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - + k[3646]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + + k[3691]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] - + k[3782]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - + k[3783]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + + k[3846]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + + k[3850]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + + k[3853]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[3905]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + + k[3940]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + + k[3975]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + + k[4010]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + + k[4045]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + + k[4080]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + + k[4115]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + + k[4150]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + + k[4185]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + + k[4220]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + + k[4255]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + + k[4290]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + + k[4325]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + + k[4360]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + + k[4395]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + + k[4430]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + + k[4465]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + + k[4500]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + + k[4535]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + + k[4570]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + + k[4605]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + + k[4640]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + + k[4675]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + + k[4711]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + + k[4746]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + k[4781]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] + - k[4782]*y_cur[IDX_O2M]*y_cur[IDX_HeII] + - k[4783]*y_cur[IDX_O2M]*y_cur[IDX_MgII] + - k[4784]*y_cur[IDX_O2M]*y_cur[IDX_NII] + - k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] + - k[4786]*y_cur[IDX_O2M]*y_cur[IDX_NH3II] + - k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] + - k[4788]*y_cur[IDX_O2M]*y_cur[IDX_NOII] + - k[4789]*y_cur[IDX_O2M]*y_cur[IDX_NaII] + - k[4790]*y_cur[IDX_O2M]*y_cur[IDX_OII] + - k[4791]*y_cur[IDX_O2M]*y_cur[IDX_SII] + - k[4792]*y_cur[IDX_O2M]*y_cur[IDX_SOII] + - k[4793]*y_cur[IDX_O2M]*y_cur[IDX_SiII] + - k[4794]*y_cur[IDX_O2M]*y_cur[IDX_SiOII] + - k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] + - k[4796]*y_cur[IDX_O2M]*y_cur[IDX_SiSII] - - k[4874]*y_cur[IDX_C2I]*y_cur[IDX_O2I] - - k[4881]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - - k[4882]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - + k[4816]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] + + k[4851]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + + k[4881]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] + + k[4904]*y_cur[IDX_C2HI]*y_cur[IDX_O2I] - + k[4962]*y_cur[IDX_CI]*y_cur[IDX_HCOI] - + k[4963]*y_cur[IDX_CI]*y_cur[IDX_HCOI] + + k[4998]*y_cur[IDX_CH2I]*y_cur[IDX_H2COI] - + k[4999]*y_cur[IDX_CH2I]*y_cur[IDX_HCOI] + + k[5011]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + + k[5014]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + + k[5030]*y_cur[IDX_CH3I]*y_cur[IDX_H2COI] - + k[5033]*y_cur[IDX_CH3I]*y_cur[IDX_HCOI] + + k[5040]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + + k[5075]*y_cur[IDX_CHI]*y_cur[IDX_CO2I] + + k[5076]*y_cur[IDX_CHI]*y_cur[IDX_H2COI] - + k[5077]*y_cur[IDX_CHI]*y_cur[IDX_HCOI] + + k[5084]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + + k[5092]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5093]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5094]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] + + k[5099]*y_cur[IDX_CHI]*y_cur[IDX_OHI] + + k[5114]*y_cur[IDX_CNI]*y_cur[IDX_H2COI] - + k[5117]*y_cur[IDX_CNI]*y_cur[IDX_HCOI] + + k[5150]*y_cur[IDX_H2COI]*y_cur[IDX_O2HI] + + k[5165]*y_cur[IDX_HI]*y_cur[IDX_H2COI] - + k[5171]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - + k[5172]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - + k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] - + k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] - + k[5205]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] - + k[5205]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] - + k[5206]*y_cur[IDX_HCOI]*y_cur[IDX_HNOI] - + k[5207]*y_cur[IDX_HCOI]*y_cur[IDX_NOI] - + k[5208]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - + k[5209]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - + k[5210]*y_cur[IDX_HCOI]*y_cur[IDX_O2HI] - + k[5265]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - + k[5266]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - + k[5267]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + + k[5349]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + + k[5383]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + + k[5397]*y_cur[IDX_OI]*y_cur[IDX_H2COI] - + k[5405]*y_cur[IDX_OI]*y_cur[IDX_HCOI] - + k[5406]*y_cur[IDX_OI]*y_cur[IDX_HCOI] + + k[5465]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] - + k[5471]*y_cur[IDX_OHI]*y_cur[IDX_HCOI] - + k[5486]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - + k[5487]*y_cur[IDX_SI]*y_cur[IDX_HCOI] + + k[5633]*y_cur[IDX_CII]*y_cur[IDX_CH2OHI] + + k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + + k[5808]*y_cur[IDX_CH3CHOI] - k[5856]*y_cur[IDX_HCOI] - + k[5857]*y_cur[IDX_HCOI] + k[5860]*y_cur[IDX_HCOOHI] + + k[5945]*y_cur[IDX_CH2OHCHOI] + k[6113]*y_cur[IDX_CH3CHOI] - + k[6184]*y_cur[IDX_HCOI] - k[6185]*y_cur[IDX_HCOI] + + k[6187]*y_cur[IDX_HCOOHI] + k[6295]*y_cur[IDX_CH2OHCHOI] + + k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + + k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + + k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6575]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + + k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + + k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] + + k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6919]*y_cur[IDX_HCOI] + k[7101]*y_cur[IDX_GHCOI] + + k[7283]*y_cur[IDX_GHCOI] + k[7465]*y_cur[IDX_GHCOI] + + k[8594]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] + + k[8685]*y_cur[IDX_GOI]*y_cur[IDX_GCHI]; + ydot[yistart + IDX_CH4I] = 0.0 + k[70]*y_cur[IDX_HM]*y_cur[IDX_CH3I] + + k[277]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + + k[278]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] + + k[279]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] + + k[280]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] + + k[281]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] + + k[282]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] + + k[283]*y_cur[IDX_CH4II]*y_cur[IDX_O2I] + + k[284]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - + k[285]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - + k[286]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - + k[371]*y_cur[IDX_HII]*y_cur[IDX_CH4I] - + k[442]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - + k[514]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[546]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - + k[652]*y_cur[IDX_OII]*y_cur[IDX_CH4I] + + k[763]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[773]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] + + k[942]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[957]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + + k[975]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[1204]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + + k[1367]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1383]*y_cur[IDX_CII]*y_cur[IDX_CH4I] - + k[1384]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + + k[1538]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] + + k[1614]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + + k[1667]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + + k[1670]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] + + k[1674]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + + k[1685]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H5II] + + k[1714]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] + + k[1898]*y_cur[IDX_CI]*y_cur[IDX_CH5II] - + k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - + k[1941]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - + k[1942]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - + k[1976]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] - + k[1977]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + + k[2000]*y_cur[IDX_CH2I]*y_cur[IDX_CH5II] + + k[2045]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + + k[2062]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + + k[2065]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] + + k[2072]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OCH3I] + + k[2073]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - + k[2074]*y_cur[IDX_CH3II]*y_cur[IDX_CH4I] + + k[2077]*y_cur[IDX_CH3II]*y_cur[IDX_H2COI] + + k[2099]*y_cur[IDX_CH3II]*y_cur[IDX_SiH4I] + + k[2123]*y_cur[IDX_CH3OHI]*y_cur[IDX_C3HII] + + k[2129]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - + k[2138]*y_cur[IDX_CH4II]*y_cur[IDX_CH4I] - + k[2146]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2147]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2149]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2150]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] - + k[2151]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - + k[2152]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - + k[2153]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - + k[2154]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] - + k[2155]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] - + k[2156]*y_cur[IDX_CH4I]*y_cur[IDX_C2H3II] - + k[2157]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - + k[2158]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - + k[2159]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] - + k[2160]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] - + k[2161]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] - + k[2162]*y_cur[IDX_CH4I]*y_cur[IDX_C3H2II] - + k[2163]*y_cur[IDX_CH4I]*y_cur[IDX_C3OII] - + k[2164]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - + k[2165]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - + k[2166]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - + k[2167]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] - + k[2168]*y_cur[IDX_CH4I]*y_cur[IDX_C4HII] - + k[2169]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] - + k[2170]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] - + k[2171]*y_cur[IDX_CH4I]*y_cur[IDX_C4H3II] - + k[2172]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2173]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2174]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2175]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] - + k[2176]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - + k[2177]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - + k[2178]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - + k[2179]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] - + k[2180]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] - + k[2181]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] - + k[2182]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - + k[2183]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - + k[2184]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - + k[2185]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] - + k[2186]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] - + k[2187]*y_cur[IDX_CH4I]*y_cur[IDX_C7H2II] - + k[2188]*y_cur[IDX_CH4I]*y_cur[IDX_C8H2II] - + k[2189]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - + k[2190]*y_cur[IDX_CH4I]*y_cur[IDX_COII] - + k[2191]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] - + k[2192]*y_cur[IDX_CH4I]*y_cur[IDX_CSII] - + k[2193]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] - + k[2194]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] - + k[2195]*y_cur[IDX_CH4I]*y_cur[IDX_H2OII] - + k[2196]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - + k[2197]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - + k[2198]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - + k[2199]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] - + k[2200]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] - + k[2201]*y_cur[IDX_CH4I]*y_cur[IDX_HCO2II] - + k[2202]*y_cur[IDX_CH4I]*y_cur[IDX_HNOII] - + k[2203]*y_cur[IDX_CH4I]*y_cur[IDX_HSII] - + k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - + k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - + k[2206]*y_cur[IDX_CH4I]*y_cur[IDX_N2HII] - + k[2207]*y_cur[IDX_CH4I]*y_cur[IDX_NH3II] - + k[2208]*y_cur[IDX_CH4I]*y_cur[IDX_O2II] - + k[2209]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - + k[2210]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - + k[2211]*y_cur[IDX_CH4I]*y_cur[IDX_PII] - + k[2212]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] - + k[2213]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] - + k[2214]*y_cur[IDX_CH4I]*y_cur[IDX_PH2II] - + k[2215]*y_cur[IDX_CH4I]*y_cur[IDX_SII] - + k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + + k[2217]*y_cur[IDX_CH5II]*y_cur[IDX_C2I] + + k[2218]*y_cur[IDX_CH5II]*y_cur[IDX_C2H2I] + + k[2219]*y_cur[IDX_CH5II]*y_cur[IDX_C2H4I] + + k[2220]*y_cur[IDX_CH5II]*y_cur[IDX_C2HI] + + k[2221]*y_cur[IDX_CH5II]*y_cur[IDX_C6H6I] + + k[2222]*y_cur[IDX_CH5II]*y_cur[IDX_C2H6I] + + k[2223]*y_cur[IDX_CH5II]*y_cur[IDX_CO2I] + + k[2224]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + + k[2225]*y_cur[IDX_CH5II]*y_cur[IDX_H2COI] + + k[2226]*y_cur[IDX_CH5II]*y_cur[IDX_H2OI] + + k[2227]*y_cur[IDX_CH5II]*y_cur[IDX_H2SI] + + k[2228]*y_cur[IDX_CH5II]*y_cur[IDX_HC3NI] + + k[2229]*y_cur[IDX_CH5II]*y_cur[IDX_HCNI] + + k[2230]*y_cur[IDX_CH5II]*y_cur[IDX_HCOI] + + k[2231]*y_cur[IDX_CH5II]*y_cur[IDX_HClI] + + k[2232]*y_cur[IDX_CH5II]*y_cur[IDX_HNCI] + + k[2233]*y_cur[IDX_CH5II]*y_cur[IDX_MgI] + + k[2234]*y_cur[IDX_CH5II]*y_cur[IDX_N2OI] + + k[2235]*y_cur[IDX_CH5II]*y_cur[IDX_SI] + + k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] + + k[2244]*y_cur[IDX_CHI]*y_cur[IDX_CH5II] - + k[2333]*y_cur[IDX_HII]*y_cur[IDX_CH4I] - + k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - + k[2379]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + + k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + + k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2669]*y_cur[IDX_H3II]*y_cur[IDX_CH4I] + + k[2863]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - + k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - + k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - + k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[3533]*y_cur[IDX_NH2I]*y_cur[IDX_CH5II] + + k[3571]*y_cur[IDX_NH3I]*y_cur[IDX_CH5II] + + k[3609]*y_cur[IDX_NHI]*y_cur[IDX_CH5II] - + k[3638]*y_cur[IDX_OII]*y_cur[IDX_CH4I] - + k[3652]*y_cur[IDX_OM]*y_cur[IDX_CH4I] + + k[3797]*y_cur[IDX_OHI]*y_cur[IDX_CH5II] - + k[4871]*y_cur[IDX_C2I]*y_cur[IDX_CH4I] - + k[4996]*y_cur[IDX_CH2I]*y_cur[IDX_CH4I] + + k[5025]*y_cur[IDX_CH3I]*y_cur[IDX_C2H3I] + + k[5028]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + + k[5030]*y_cur[IDX_CH3I]*y_cur[IDX_H2COI] + + k[5031]*y_cur[IDX_CH3I]*y_cur[IDX_H2OI] + + k[5032]*y_cur[IDX_CH3I]*y_cur[IDX_H2SI] + + k[5033]*y_cur[IDX_CH3I]*y_cur[IDX_HCOI] + + k[5034]*y_cur[IDX_CH3I]*y_cur[IDX_HNOI] + + k[5035]*y_cur[IDX_CH3I]*y_cur[IDX_NH2I] + + k[5036]*y_cur[IDX_CH3I]*y_cur[IDX_NH3I] + + k[5042]*y_cur[IDX_CH3I]*y_cur[IDX_O2HI] + + k[5045]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] - + k[5057]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - + k[5058]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] - + k[5059]*y_cur[IDX_CH4I]*y_cur[IDX_CNI] - + k[5060]*y_cur[IDX_CH4I]*y_cur[IDX_O2I] - + k[5061]*y_cur[IDX_CH4I]*y_cur[IDX_OHI] - + k[5062]*y_cur[IDX_CH4I]*y_cur[IDX_SI] - + k[5074]*y_cur[IDX_CHI]*y_cur[IDX_CH4I] + + k[5136]*y_cur[IDX_H2I]*y_cur[IDX_CH3I] - + k[5159]*y_cur[IDX_HI]*y_cur[IDX_CH4I] - + k[5297]*y_cur[IDX_NH2I]*y_cur[IDX_CH4I] - + k[5304]*y_cur[IDX_NHI]*y_cur[IDX_CH4I] - + k[5385]*y_cur[IDX_OI]*y_cur[IDX_CH4I] - + k[5543]*y_cur[IDX_CH4I]*y_cur[IDX_HCOII] - + k[5544]*y_cur[IDX_CH4I]*y_cur[IDX_SiII] + k[5807]*y_cur[IDX_CH3CHOI] + + k[5811]*y_cur[IDX_CH3COCH3I] + k[5815]*y_cur[IDX_CH3OCH3I] - + k[5820]*y_cur[IDX_CH4I] + k[5858]*y_cur[IDX_HCOOCH3I] + + k[6112]*y_cur[IDX_CH3CHOI] + k[6119]*y_cur[IDX_CH3OCH3I] - + k[6127]*y_cur[IDX_CH4I] - k[6128]*y_cur[IDX_CH4I] - + k[6129]*y_cur[IDX_CH4I] - k[6130]*y_cur[IDX_CH4I] + + k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + + k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + + k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - + k[6898]*y_cur[IDX_CH4I] + k[7080]*y_cur[IDX_GCH4I] + + k[7262]*y_cur[IDX_GCH4I] + k[7444]*y_cur[IDX_GCH4I] + + k[8579]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I]; + ydot[yistart + IDX_C2HI] = 0.0 + k[2]*y_cur[IDX_CM]*y_cur[IDX_CHI] + + k[55]*y_cur[IDX_CI]*y_cur[IDX_CHM] + + k[66]*y_cur[IDX_HM]*y_cur[IDX_C2I] - + k[67]*y_cur[IDX_HM]*y_cur[IDX_C2HI] + + k[87]*y_cur[IDX_HI]*y_cur[IDX_C2M] + + k[212]*y_cur[IDX_C2HII]*y_cur[IDX_NOI] + + k[213]*y_cur[IDX_C2HII]*y_cur[IDX_SI] - + k[241]*y_cur[IDX_C2HI]*y_cur[IDX_CNII] - + k[242]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - + k[243]*y_cur[IDX_C2HI]*y_cur[IDX_N2II] - + k[329]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - + k[439]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] - + k[465]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] - + k[543]*y_cur[IDX_NII]*y_cur[IDX_C2HI] - + k[649]*y_cur[IDX_OII]*y_cur[IDX_C2HI] - + k[686]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] + + k[743]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + + k[749]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[750]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[751]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[752]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[760]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[789]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + + k[801]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[822]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + + k[822]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + + k[1055]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + + k[1064]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + + k[1074]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] + + k[1077]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + + k[1080]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + + k[1195]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + + k[1226]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] - + k[1308]*y_cur[IDX_CII]*y_cur[IDX_C2HI] + + k[1317]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + + k[1364]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + + k[1397]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] + + k[1398]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + + k[1402]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + + k[1515]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] + + k[1518]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + + k[1523]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + + k[1525]*y_cur[IDX_C2H2II]*y_cur[IDX_HNCI] + + k[1577]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] - + k[1725]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2II] - + k[1726]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - + k[1727]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - + k[1728]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] - + k[1729]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - + k[1730]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] - + k[1731]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2II] - + k[1732]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - + k[1733]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] - + k[1734]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] - + k[1735]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] - + k[1736]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2II] - + k[1737]*y_cur[IDX_C2HI]*y_cur[IDX_C4H3II] - + k[1738]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2II] - + k[1739]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2II] - + k[1740]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2II] - + k[1741]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] - + k[1742]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] - + k[1743]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - + k[1744]*y_cur[IDX_C2HI]*y_cur[IDX_H2COII] - + k[1745]*y_cur[IDX_C2HI]*y_cur[IDX_HCNII] - + k[1746]*y_cur[IDX_C2HI]*y_cur[IDX_HCOII] - + k[1747]*y_cur[IDX_C2HI]*y_cur[IDX_HNOII] - + k[1748]*y_cur[IDX_C2HI]*y_cur[IDX_N2HII] - + k[1749]*y_cur[IDX_C2HI]*y_cur[IDX_O2HII] - + k[1750]*y_cur[IDX_C2HI]*y_cur[IDX_SII] - + k[1751]*y_cur[IDX_C2HI]*y_cur[IDX_SiII] + + k[1755]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] - + k[1935]*y_cur[IDX_CHII]*y_cur[IDX_C2HI] - + k[1975]*y_cur[IDX_CH2II]*y_cur[IDX_C2HI] - + k[2048]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] - + k[2049]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] - + k[2220]*y_cur[IDX_CH5II]*y_cur[IDX_C2HI] - + k[2299]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - + k[2373]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] - + k[2504]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] + + k[2522]*y_cur[IDX_H2OI]*y_cur[IDX_C2H2II] - + k[2597]*y_cur[IDX_H3II]*y_cur[IDX_C2HI] + + k[2852]*y_cur[IDX_C4H2I]*y_cur[IDX_C5H2II] + + k[3025]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - + k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - + k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + + k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + + k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + + k[3310]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + + k[3395]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - + k[3480]*y_cur[IDX_NHII]*y_cur[IDX_C2HI] - + k[3508]*y_cur[IDX_NH2II]*y_cur[IDX_C2HI] + + k[3531]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + + k[3556]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - + k[3634]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + + k[3695]*y_cur[IDX_OI]*y_cur[IDX_C3H2II] - + k[3770]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] + + k[4026]*y_cur[IDX_C2HM]*y_cur[IDX_CII] + + k[4027]*y_cur[IDX_C2HM]*y_cur[IDX_C2H2II] + + k[4028]*y_cur[IDX_C2HM]*y_cur[IDX_C2H3II] + + k[4029]*y_cur[IDX_C2HM]*y_cur[IDX_C4H2II] + + k[4030]*y_cur[IDX_C2HM]*y_cur[IDX_C4H3II] + + k[4031]*y_cur[IDX_C2HM]*y_cur[IDX_C4SII] + + k[4032]*y_cur[IDX_C2HM]*y_cur[IDX_CH2CCHII] + + k[4033]*y_cur[IDX_C2HM]*y_cur[IDX_CH3II] + + k[4034]*y_cur[IDX_C2HM]*y_cur[IDX_CNCII] + + k[4035]*y_cur[IDX_C2HM]*y_cur[IDX_FeII] + + k[4036]*y_cur[IDX_C2HM]*y_cur[IDX_HII] + + k[4037]*y_cur[IDX_C2HM]*y_cur[IDX_H2COII] + + k[4038]*y_cur[IDX_C2HM]*y_cur[IDX_H2SII] + + k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] + + k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] + + k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] + + k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + + k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + + k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + + k[4045]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + + k[4046]*y_cur[IDX_C2HM]*y_cur[IDX_HeII] + + k[4047]*y_cur[IDX_C2HM]*y_cur[IDX_MgII] + + k[4048]*y_cur[IDX_C2HM]*y_cur[IDX_NII] + + k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] + + k[4050]*y_cur[IDX_C2HM]*y_cur[IDX_NH3II] + + k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] + + k[4052]*y_cur[IDX_C2HM]*y_cur[IDX_NOII] + + k[4053]*y_cur[IDX_C2HM]*y_cur[IDX_NaII] + + k[4054]*y_cur[IDX_C2HM]*y_cur[IDX_OII] + + k[4055]*y_cur[IDX_C2HM]*y_cur[IDX_SII] + + k[4056]*y_cur[IDX_C2HM]*y_cur[IDX_SOII] + + k[4057]*y_cur[IDX_C2HM]*y_cur[IDX_SiII] + + k[4058]*y_cur[IDX_C2HM]*y_cur[IDX_SiOII] + + k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] + + k[4060]*y_cur[IDX_C2HM]*y_cur[IDX_SiSII] - + k[4888]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2I] - + k[4889]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2I] - + k[4890]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2I] - + k[4891]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2I] - + k[4892]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2I] - + k[4893]*y_cur[IDX_C2HI]*y_cur[IDX_C8H2I] - + k[4894]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] - + k[4895]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] - + k[4896]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] - + k[4897]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] - + k[4898]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CHCH2I] - + k[4899]*y_cur[IDX_C2HI]*y_cur[IDX_CSI] - + k[4900]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2I] - + k[4901]*y_cur[IDX_C2HI]*y_cur[IDX_HCNI] - + k[4902]*y_cur[IDX_C2HI]*y_cur[IDX_HNCI] - + k[4903]*y_cur[IDX_C2HI]*y_cur[IDX_NCCNI] - k[4904]*y_cur[IDX_C2HI]*y_cur[IDX_O2I] - - k[4978]*y_cur[IDX_CI]*y_cur[IDX_O2I] - - k[5007]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5009]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5010]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5011]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - - k[5039]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - - k[5040]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - - k[5041]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + - k[5042]*y_cur[IDX_CH3I]*y_cur[IDX_O2HI] - - k[5060]*y_cur[IDX_CH4I]*y_cur[IDX_O2I] - - k[5086]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5087]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5090]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5091]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5092]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - - k[5093]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + - k[5095]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - - k[5123]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - - k[5124]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - - k[5130]*y_cur[IDX_COI]*y_cur[IDX_O2I] - - k[5144]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - - k[5145]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - - k[5190]*y_cur[IDX_HI]*y_cur[IDX_O2I] + - k[5192]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - - k[5208]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - - k[5209]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] + - k[5210]*y_cur[IDX_HCOI]*y_cur[IDX_O2HI] - - k[5220]*y_cur[IDX_N2I]*y_cur[IDX_O2I] + - k[5278]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - - k[5281]*y_cur[IDX_NI]*y_cur[IDX_O2I] + - k[5282]*y_cur[IDX_NI]*y_cur[IDX_O2HI] - - k[5316]*y_cur[IDX_NHI]*y_cur[IDX_O2I] - - k[5317]*y_cur[IDX_NHI]*y_cur[IDX_O2I] + - k[5329]*y_cur[IDX_NOI]*y_cur[IDX_NOI] - - k[5330]*y_cur[IDX_NOI]*y_cur[IDX_O2I] - - k[5335]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] - - k[5336]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] - - k[5337]*y_cur[IDX_O2I]*y_cur[IDX_SI] - - k[5338]*y_cur[IDX_O2I]*y_cur[IDX_SOI] + - k[5339]*y_cur[IDX_O2HI]*y_cur[IDX_O2HI] + - k[5390]*y_cur[IDX_OI]*y_cur[IDX_CO2I] + - k[5394]*y_cur[IDX_OI]*y_cur[IDX_ClOI] + - k[5413]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + - k[5419]*y_cur[IDX_OI]*y_cur[IDX_N2OI] + - k[5423]*y_cur[IDX_OI]*y_cur[IDX_NO2I] + - k[5424]*y_cur[IDX_OI]*y_cur[IDX_NOI] + - k[5427]*y_cur[IDX_OI]*y_cur[IDX_O2HI] + - k[5429]*y_cur[IDX_OI]*y_cur[IDX_OCNI] + - k[5432]*y_cur[IDX_OI]*y_cur[IDX_OHI] + - k[5438]*y_cur[IDX_OI]*y_cur[IDX_SO2I] + - k[5439]*y_cur[IDX_OI]*y_cur[IDX_SOI] + - k[5478]*y_cur[IDX_OHI]*y_cur[IDX_O2HI] - - k[5484]*y_cur[IDX_PI]*y_cur[IDX_O2I] - - k[5494]*y_cur[IDX_SiI]*y_cur[IDX_O2I] + - k[5582]*y_cur[IDX_OI]*y_cur[IDX_OI] + k[5896]*y_cur[IDX_O2M] - - k[5897]*y_cur[IDX_O2I] - k[5898]*y_cur[IDX_O2I] + - k[5899]*y_cur[IDX_O2HI] + k[6234]*y_cur[IDX_O2M] - - k[6235]*y_cur[IDX_O2I] - k[6236]*y_cur[IDX_O2I] + - k[6237]*y_cur[IDX_O2HI] + k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM] - - k[6934]*y_cur[IDX_O2I] + k[7116]*y_cur[IDX_GO2I] + - k[7298]*y_cur[IDX_GO2I] + k[7480]*y_cur[IDX_GO2I] + - k[8689]*y_cur[IDX_GOI]*y_cur[IDX_GOI]; - ydot[yistart + IDX_O2II] = 0.0 - - k[211]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - - k[240]*y_cur[IDX_C2H4I]*y_cur[IDX_O2II] - - k[248]*y_cur[IDX_CI]*y_cur[IDX_O2II] - - k[267]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] + - k[283]*y_cur[IDX_CH4II]*y_cur[IDX_O2I] - - k[296]*y_cur[IDX_CHI]*y_cur[IDX_O2II] + - k[304]*y_cur[IDX_CNII]*y_cur[IDX_O2I] + - k[312]*y_cur[IDX_COII]*y_cur[IDX_O2I] + - k[405]*y_cur[IDX_HII]*y_cur[IDX_O2I] + - k[455]*y_cur[IDX_H2II]*y_cur[IDX_O2I] - - k[461]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + - k[474]*y_cur[IDX_H2OII]*y_cur[IDX_O2I] + - k[495]*y_cur[IDX_HCNII]*y_cur[IDX_O2I] - - k[502]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] + - k[525]*y_cur[IDX_HeII]*y_cur[IDX_O2I] - - k[537]*y_cur[IDX_MgI]*y_cur[IDX_O2II] + - k[561]*y_cur[IDX_NII]*y_cur[IDX_O2I] + - k[570]*y_cur[IDX_N2II]*y_cur[IDX_O2I] + - k[578]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - - k[590]*y_cur[IDX_NH2I]*y_cur[IDX_O2II] - - k[611]*y_cur[IDX_NH3I]*y_cur[IDX_O2II] - - k[628]*y_cur[IDX_NOI]*y_cur[IDX_O2II] - - k[642]*y_cur[IDX_NaI]*y_cur[IDX_O2II] + - k[662]*y_cur[IDX_OII]*y_cur[IDX_O2I] - - k[668]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - - k[669]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - - k[670]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[671]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] - - k[672]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - - k[673]*y_cur[IDX_O2II]*y_cur[IDX_FeI] - - k[674]*y_cur[IDX_O2II]*y_cur[IDX_H2SI] - - k[675]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] - - k[676]*y_cur[IDX_O2II]*y_cur[IDX_NO2I] - - k[677]*y_cur[IDX_O2II]*y_cur[IDX_SI] + - k[678]*y_cur[IDX_O2I]*y_cur[IDX_CO2II] + - k[679]*y_cur[IDX_O2I]*y_cur[IDX_ClII] + - k[680]*y_cur[IDX_O2I]*y_cur[IDX_SO2II] + - k[694]*y_cur[IDX_OHII]*y_cur[IDX_O2I] - - k[722]*y_cur[IDX_SiI]*y_cur[IDX_O2II] - - k[1174]*y_cur[IDX_O2II]*y_cur[IDX_eM] - - k[1462]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - - k[1912]*y_cur[IDX_CI]*y_cur[IDX_O2II] - - k[2014]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] - - k[2208]*y_cur[IDX_CH4I]*y_cur[IDX_O2II] - - k[2262]*y_cur[IDX_CHI]*y_cur[IDX_O2II] - + k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] - + k[4906]*y_cur[IDX_C2HI]*y_cur[IDX_SI] - + k[4916]*y_cur[IDX_CI]*y_cur[IDX_C2HI] + + k[4944]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - + k[5133]*y_cur[IDX_H2I]*y_cur[IDX_C2HI] + + k[5154]*y_cur[IDX_HI]*y_cur[IDX_C2H2I] + + k[5202]*y_cur[IDX_HCNOI]*y_cur[IDX_CI] - + k[5228]*y_cur[IDX_NI]*y_cur[IDX_C2HI] - + k[5352]*y_cur[IDX_OI]*y_cur[IDX_C2HI] + + k[5357]*y_cur[IDX_OI]*y_cur[IDX_C3HI] + + k[5453]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - + k[5514]*y_cur[IDX_C2HI]*y_cur[IDX_CNI] - + k[5590]*y_cur[IDX_C2HI]*y_cur[IDX_eM] + k[5695]*y_cur[IDX_C2HM] + + k[5697]*y_cur[IDX_C2H2I] - k[5708]*y_cur[IDX_C2HI] - + k[5709]*y_cur[IDX_C2HI] + k[5731]*y_cur[IDX_C4HI] + + k[5740]*y_cur[IDX_C5H2I] + k[5742]*y_cur[IDX_C5HI] + + k[5750]*y_cur[IDX_C6H2I] + k[5753]*y_cur[IDX_C6HI] + + k[5846]*y_cur[IDX_HC3NI] + k[5847]*y_cur[IDX_C4H2I] + + k[5847]*y_cur[IDX_C4H2I] + k[5866]*y_cur[IDX_HNC3I] + + k[5980]*y_cur[IDX_C2HM] + k[5982]*y_cur[IDX_C2H2I] - + k[5993]*y_cur[IDX_C2HI] - k[5994]*y_cur[IDX_C2HI] + + k[6016]*y_cur[IDX_C4HI] + k[6025]*y_cur[IDX_C5H2I] + + k[6027]*y_cur[IDX_C5HI] + k[6040]*y_cur[IDX_C6HI] + + k[6171]*y_cur[IDX_HC3NI] + k[6172]*y_cur[IDX_C4H2I] + + k[6172]*y_cur[IDX_C4H2I] + + k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + + k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + + k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + + k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + + k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + + k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + + k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + + k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - + k[6908]*y_cur[IDX_C2HI] + k[7090]*y_cur[IDX_GC2HI] + + k[7272]*y_cur[IDX_GC2HI] + k[7454]*y_cur[IDX_GC2HI] + + k[8586]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] + + k[8655]*y_cur[IDX_GCI]*y_cur[IDX_GCHI]; + ydot[yistart + IDX_H2COI] = 0.0 + k[4]*y_cur[IDX_CM]*y_cur[IDX_H2OI] + + k[59]*y_cur[IDX_CH2I]*y_cur[IDX_OM] + + k[64]*y_cur[IDX_CHI]*y_cur[IDX_OHM] + + k[76]*y_cur[IDX_HM]*y_cur[IDX_HCOI] - + k[174]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - + k[222]*y_cur[IDX_C2H2II]*y_cur[IDX_H2COI] + + k[262]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] - + k[280]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] + + k[290]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - + k[300]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - + k[308]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - + k[376]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - + k[446]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + + k[459]*y_cur[IDX_H2COII]*y_cur[IDX_FeI] + + k[460]*y_cur[IDX_H2COII]*y_cur[IDX_SI] - + k[461]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] - + k[468]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] + + k[500]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] - + k[517]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[531]*y_cur[IDX_MgI]*y_cur[IDX_H2COII] - + k[551]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - + k[566]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] - + k[574]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + + k[604]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] + + k[624]*y_cur[IDX_NOI]*y_cur[IDX_H2COII] + + k[635]*y_cur[IDX_NaI]*y_cur[IDX_H2COII] - + k[655]*y_cur[IDX_OII]*y_cur[IDX_H2COI] - + k[688]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] + + k[718]*y_cur[IDX_SiI]*y_cur[IDX_H2COII] + + k[773]*y_cur[IDX_C2H5OHII]*y_cur[IDX_eM] + + k[939]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[943]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[961]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + + k[967]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[1037]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1270]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + + k[1273]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + + k[1277]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1281]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + + k[1281]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + + k[1282]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] - + k[1390]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - + k[1391]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - + k[1469]*y_cur[IDX_C2HII]*y_cur[IDX_H2COI] - + k[1720]*y_cur[IDX_C2H5II]*y_cur[IDX_H2COI] + + k[1938]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] - + k[1947]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - + k[1948]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - + k[1949]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - + k[1950]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] - + k[1979]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - + k[1980]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - + k[1981]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + + k[2019]*y_cur[IDX_CH2I]*y_cur[IDX_SiOII] + + k[2066]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - + k[2077]*y_cur[IDX_CH3II]*y_cur[IDX_H2COI] + + k[2132]*y_cur[IDX_CH3OHI]*y_cur[IDX_S2II] - + k[2141]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] - + k[2225]*y_cur[IDX_CH5II]*y_cur[IDX_H2COI] + + k[2248]*y_cur[IDX_CHI]*y_cur[IDX_H3COII] - + k[2271]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - + k[2280]*y_cur[IDX_COII]*y_cur[IDX_H2COI] - + k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - + k[2338]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - + k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] - + k[2488]*y_cur[IDX_H2COII]*y_cur[IDX_H2COI] - + k[2491]*y_cur[IDX_H2COI]*y_cur[IDX_C2H5OH2II] - + k[2492]*y_cur[IDX_H2COI]*y_cur[IDX_CClII] - + k[2493]*y_cur[IDX_H2COI]*y_cur[IDX_CH3COCH3II] - + k[2494]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] - + k[2495]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] - + k[2496]*y_cur[IDX_H2COI]*y_cur[IDX_H3SII] - + k[2497]*y_cur[IDX_H2COI]*y_cur[IDX_HNOII] - k[2498]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] - - k[3010]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] + - k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - - k[3465]*y_cur[IDX_NI]*y_cur[IDX_O2II] - - k[3620]*y_cur[IDX_NHI]*y_cur[IDX_O2II] - - k[3621]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + - k[3640]*y_cur[IDX_OII]*y_cur[IDX_CO2I] + - k[3650]*y_cur[IDX_OII]*y_cur[IDX_OHI] - - k[3654]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - - k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - - k[3656]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - - k[3657]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] - - k[3658]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3659]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3660]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3661]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] - - k[3664]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] - - k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] - - k[3666]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] - - k[3667]*y_cur[IDX_O2II]*y_cur[IDX_SI] + - k[3730]*y_cur[IDX_OI]*y_cur[IDX_CO2II] + - k[3733]*y_cur[IDX_OI]*y_cur[IDX_H2OII] + - k[3750]*y_cur[IDX_OI]*y_cur[IDX_OHII] + k[5897]*y_cur[IDX_O2I] - - k[6233]*y_cur[IDX_O2II] + k[6235]*y_cur[IDX_O2I] - - k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_O2M] = 0.0 - k[146]*y_cur[IDX_O2M]*y_cur[IDX_O2I] - + k[667]*y_cur[IDX_OM]*y_cur[IDX_O2I] - - k[4762]*y_cur[IDX_O2M]*y_cur[IDX_CII] - - k[4763]*y_cur[IDX_O2M]*y_cur[IDX_C2H2II] - - k[4764]*y_cur[IDX_O2M]*y_cur[IDX_C2H3II] - - k[4765]*y_cur[IDX_O2M]*y_cur[IDX_C4H2II] - - k[4766]*y_cur[IDX_O2M]*y_cur[IDX_C4H3II] - - k[4767]*y_cur[IDX_O2M]*y_cur[IDX_C4SII] - - k[4768]*y_cur[IDX_O2M]*y_cur[IDX_CH2CCHII] - - k[4769]*y_cur[IDX_O2M]*y_cur[IDX_CH3II] - - k[4770]*y_cur[IDX_O2M]*y_cur[IDX_CNCII] - - k[4771]*y_cur[IDX_O2M]*y_cur[IDX_FeII] - - k[4772]*y_cur[IDX_O2M]*y_cur[IDX_HII] - - k[4773]*y_cur[IDX_O2M]*y_cur[IDX_H2COII] - - k[4774]*y_cur[IDX_O2M]*y_cur[IDX_H2SII] - - k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] - - k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] - - k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] - - k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] - - k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] - - k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] - - k[4781]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] - - k[4782]*y_cur[IDX_O2M]*y_cur[IDX_HeII] - - k[4783]*y_cur[IDX_O2M]*y_cur[IDX_MgII] - - k[4784]*y_cur[IDX_O2M]*y_cur[IDX_NII] - - k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] - - k[4786]*y_cur[IDX_O2M]*y_cur[IDX_NH3II] - - k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] - - k[4788]*y_cur[IDX_O2M]*y_cur[IDX_NOII] - - k[4789]*y_cur[IDX_O2M]*y_cur[IDX_NaII] - - k[4790]*y_cur[IDX_O2M]*y_cur[IDX_OII] - - k[4791]*y_cur[IDX_O2M]*y_cur[IDX_SII] - - k[4792]*y_cur[IDX_O2M]*y_cur[IDX_SOII] - - k[4793]*y_cur[IDX_O2M]*y_cur[IDX_SiII] - - k[4794]*y_cur[IDX_O2M]*y_cur[IDX_SiOII] - - k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] - - k[4796]*y_cur[IDX_O2M]*y_cur[IDX_SiSII] - k[5896]*y_cur[IDX_O2M] - - k[6234]*y_cur[IDX_O2M]; - ydot[yistart + IDX_O2HI] = 0.0 + - k[2489]*y_cur[IDX_H2COII]*y_cur[IDX_O2I] + - k[3656]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + - k[3660]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + - k[3664]*y_cur[IDX_O2II]*y_cur[IDX_CH3OCH3I] + - k[3666]*y_cur[IDX_O2II]*y_cur[IDX_HCOOHI] + - k[4882]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] + - k[5041]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - - k[5042]*y_cur[IDX_CH3I]*y_cur[IDX_O2HI] + - k[5060]*y_cur[IDX_CH4I]*y_cur[IDX_O2I] - + k[2499]*y_cur[IDX_H2COI]*y_cur[IDX_O2HII] - + k[2500]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - + k[2501]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - + k[2508]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] + + k[2545]*y_cur[IDX_H2OI]*y_cur[IDX_H3COII] + + k[2656]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2682]*y_cur[IDX_H3II]*y_cur[IDX_H2COI] + + k[2762]*y_cur[IDX_H3COII]*y_cur[IDX_CH3OHI] + + k[2763]*y_cur[IDX_H3COII]*y_cur[IDX_H2SI] + + k[2764]*y_cur[IDX_H3COII]*y_cur[IDX_C4H2I] + + k[2765]*y_cur[IDX_H3COII]*y_cur[IDX_HCOOHI] - + k[2799]*y_cur[IDX_H3OII]*y_cur[IDX_H2COI] - + k[2855]*y_cur[IDX_HCNII]*y_cur[IDX_H2COI] + + k[2875]*y_cur[IDX_HCNI]*y_cur[IDX_H3COII] - + k[2890]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] - + k[2891]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] - + k[2958]*y_cur[IDX_HCOII]*y_cur[IDX_H2COI] + + k[3039]*y_cur[IDX_HNCI]*y_cur[IDX_H3COII] + + k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] - + k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - + k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - + k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - + k[3345]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - + k[3346]*y_cur[IDX_NII]*y_cur[IDX_H2COI] - + k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] - + k[3373]*y_cur[IDX_N2HII]*y_cur[IDX_H2COI] - + k[3487]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - + k[3488]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] - + k[3510]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] - + k[3511]*y_cur[IDX_NH2II]*y_cur[IDX_H2COI] + + k[3537]*y_cur[IDX_NH2I]*y_cur[IDX_H3COII] - + k[3549]*y_cur[IDX_NH3II]*y_cur[IDX_H2COI] + + k[3577]*y_cur[IDX_NH3I]*y_cur[IDX_H3COII] + + k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] - + k[3641]*y_cur[IDX_OII]*y_cur[IDX_H2COI] + + k[3657]*y_cur[IDX_O2II]*y_cur[IDX_CH2CCH2I] + + k[3661]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3754]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - + k[3778]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] + + k[3848]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] + + k[3897]*y_cur[IDX_CM]*y_cur[IDX_H2COII] + + k[3932]*y_cur[IDX_C10M]*y_cur[IDX_H2COII] + + k[3967]*y_cur[IDX_C10HM]*y_cur[IDX_H2COII] + + k[4002]*y_cur[IDX_C2M]*y_cur[IDX_H2COII] + + k[4037]*y_cur[IDX_C2HM]*y_cur[IDX_H2COII] + + k[4072]*y_cur[IDX_C3M]*y_cur[IDX_H2COII] + + k[4107]*y_cur[IDX_C3HM]*y_cur[IDX_H2COII] + + k[4142]*y_cur[IDX_C3NM]*y_cur[IDX_H2COII] + + k[4177]*y_cur[IDX_C4M]*y_cur[IDX_H2COII] + + k[4212]*y_cur[IDX_C4HM]*y_cur[IDX_H2COII] + + k[4247]*y_cur[IDX_C5M]*y_cur[IDX_H2COII] + + k[4282]*y_cur[IDX_C5HM]*y_cur[IDX_H2COII] + + k[4317]*y_cur[IDX_C5NM]*y_cur[IDX_H2COII] + + k[4352]*y_cur[IDX_C6M]*y_cur[IDX_H2COII] + + k[4387]*y_cur[IDX_C6HM]*y_cur[IDX_H2COII] + + k[4422]*y_cur[IDX_C7M]*y_cur[IDX_H2COII] + + k[4457]*y_cur[IDX_C7HM]*y_cur[IDX_H2COII] + + k[4492]*y_cur[IDX_C8M]*y_cur[IDX_H2COII] + + k[4527]*y_cur[IDX_C8HM]*y_cur[IDX_H2COII] + + k[4562]*y_cur[IDX_C9M]*y_cur[IDX_H2COII] + + k[4597]*y_cur[IDX_C9HM]*y_cur[IDX_H2COII] + + k[4632]*y_cur[IDX_CHM]*y_cur[IDX_H2COII] + + k[4667]*y_cur[IDX_CNM]*y_cur[IDX_H2COII] + + k[4703]*y_cur[IDX_HM]*y_cur[IDX_H2COII] + + k[4738]*y_cur[IDX_OM]*y_cur[IDX_H2COII] + + k[4773]*y_cur[IDX_O2M]*y_cur[IDX_H2COII] + + k[4808]*y_cur[IDX_OHM]*y_cur[IDX_H2COII] + + k[4843]*y_cur[IDX_SM]*y_cur[IDX_H2COII] + + k[4881]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - + k[4998]*y_cur[IDX_CH2I]*y_cur[IDX_H2COI] + + k[5002]*y_cur[IDX_CH2I]*y_cur[IDX_NO2I] + + k[5003]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + + k[5010]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + + k[5016]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - + k[5030]*y_cur[IDX_CH3I]*y_cur[IDX_H2COI] + + k[5037]*y_cur[IDX_CH3I]*y_cur[IDX_NO2I] + + k[5039]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + + k[5044]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + + k[5046]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + + k[5056]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] - + k[5076]*y_cur[IDX_CHI]*y_cur[IDX_H2COI] - + k[5114]*y_cur[IDX_CNI]*y_cur[IDX_H2COI] - + k[5150]*y_cur[IDX_H2COI]*y_cur[IDX_O2HI] - + k[5165]*y_cur[IDX_HI]*y_cur[IDX_H2COI] + + k[5205]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + + k[5206]*y_cur[IDX_HCOI]*y_cur[IDX_HNOI] + + k[5210]*y_cur[IDX_HCOI]*y_cur[IDX_O2HI] + + k[5348]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + + k[5351]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - + k[5397]*y_cur[IDX_OI]*y_cur[IDX_H2COI] - + k[5465]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] - + k[5466]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] + + k[5616]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + + k[5815]*y_cur[IDX_CH3OCH3I] - k[5836]*y_cur[IDX_H2COI] + + k[6119]*y_cur[IDX_CH3OCH3I] - k[6152]*y_cur[IDX_H2COI] - + k[6153]*y_cur[IDX_H2COI] - k[6154]*y_cur[IDX_H2COI] - + k[6155]*y_cur[IDX_H2COI] + k[6186]*y_cur[IDX_HCOOCH3I] + + k[6186]*y_cur[IDX_HCOOCH3I] + + k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + + k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + + k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6926]*y_cur[IDX_H2COI] + k[7108]*y_cur[IDX_GH2COI] + + k[7290]*y_cur[IDX_GH2COI] + k[7472]*y_cur[IDX_GH2COI] + + k[8595]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] + + k[8686]*y_cur[IDX_GOI]*y_cur[IDX_GCH2I]; + ydot[yistart + IDX_HCNI] = 0.0 + k[6]*y_cur[IDX_CM]*y_cur[IDX_NHI] + + k[72]*y_cur[IDX_HM]*y_cur[IDX_CNI] + + k[106]*y_cur[IDX_HI]*y_cur[IDX_CNM] + + k[133]*y_cur[IDX_HII]*y_cur[IDX_HNCI] + + k[230]*y_cur[IDX_C2H2I]*y_cur[IDX_HCNII] - + k[301]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] - + k[388]*y_cur[IDX_HII]*y_cur[IDX_HCNI] - + k[449]*y_cur[IDX_H2II]*y_cur[IDX_HCNI] + + k[480]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] + + k[490]*y_cur[IDX_HI]*y_cur[IDX_HCNII] + + k[494]*y_cur[IDX_HCNII]*y_cur[IDX_NOI] + + k[495]*y_cur[IDX_HCNII]*y_cur[IDX_O2I] + + k[496]*y_cur[IDX_HCNII]*y_cur[IDX_SI] - + k[497]*y_cur[IDX_HCNI]*y_cur[IDX_COII] - + k[498]*y_cur[IDX_HCNI]*y_cur[IDX_N2II] - + k[554]*y_cur[IDX_NII]*y_cur[IDX_HCNI] + + k[608]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] + + k[913]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + + k[917]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + + k[945]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] + + k[971]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + + k[1065]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + + k[1082]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + + k[1090]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + + k[1094]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] + + k[1161]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] + + k[1348]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + + k[1399]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1407]*y_cur[IDX_CII]*y_cur[IDX_HCNI] - + k[1453]*y_cur[IDX_C2II]*y_cur[IDX_HCNI] + + k[1470]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] - + k[1474]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - + k[1475]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] - + k[1476]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + + k[1513]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - + k[1522]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] - + k[1523]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + + k[1540]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] + + k[1555]*y_cur[IDX_C2H2I]*y_cur[IDX_C4NII] + + k[1565]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - + k[1956]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - + k[1957]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - + k[1958]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] - + k[1986]*y_cur[IDX_CH2II]*y_cur[IDX_HCNI] + + k[2006]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] + + k[2068]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] + + k[2079]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] + + k[2173]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + + k[2196]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] - + k[2229]*y_cur[IDX_CH5II]*y_cur[IDX_HCNI] + + k[2251]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] + + k[2271]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] - + k[2272]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] + + k[2329]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - + k[2368]*y_cur[IDX_HM]*y_cur[IDX_HCNI] + + k[2413]*y_cur[IDX_H2I]*y_cur[IDX_C4NII] + + k[2445]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] - + k[2512]*y_cur[IDX_H2OII]*y_cur[IDX_HCNI] + + k[2526]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] + + k[2539]*y_cur[IDX_H2OI]*y_cur[IDX_CNCII] + + k[2575]*y_cur[IDX_H2SI]*y_cur[IDX_C2NII] - + k[2694]*y_cur[IDX_H3II]*y_cur[IDX_HCNI] - + k[2806]*y_cur[IDX_H3OII]*y_cur[IDX_HCNI] - + k[2856]*y_cur[IDX_HCNII]*y_cur[IDX_HCNI] - + k[2861]*y_cur[IDX_HCNI]*y_cur[IDX_C2H3II] - + k[2862]*y_cur[IDX_HCNI]*y_cur[IDX_C2H5II] - + k[2863]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - + k[2864]*y_cur[IDX_HCNI]*y_cur[IDX_C2H7II] - + k[2865]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] - + k[2866]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] - + k[2867]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] - + k[2868]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] - + k[2869]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] - + k[2870]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] - + k[2871]*y_cur[IDX_HCNI]*y_cur[IDX_C5II] - + k[2872]*y_cur[IDX_HCNI]*y_cur[IDX_C2H6II] - + k[2873]*y_cur[IDX_HCNI]*y_cur[IDX_CH3OH2II] - + k[2874]*y_cur[IDX_HCNI]*y_cur[IDX_H2COII] - + k[2875]*y_cur[IDX_HCNI]*y_cur[IDX_H3COII] - + k[2876]*y_cur[IDX_HCNI]*y_cur[IDX_H3SII] - + k[2877]*y_cur[IDX_HCNI]*y_cur[IDX_HCOII] - + k[2878]*y_cur[IDX_HCNI]*y_cur[IDX_HNOII] - + k[2879]*y_cur[IDX_HCNI]*y_cur[IDX_HSII] - + k[2880]*y_cur[IDX_HCNI]*y_cur[IDX_HSiSII] - + k[2881]*y_cur[IDX_HCNI]*y_cur[IDX_N2HII] - + k[2882]*y_cur[IDX_HCNI]*y_cur[IDX_NCCNHII] - + k[2883]*y_cur[IDX_HCNI]*y_cur[IDX_O2HII] - + k[2884]*y_cur[IDX_HCNI]*y_cur[IDX_PHII] - + k[2885]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] + + k[2886]*y_cur[IDX_HCNHII]*y_cur[IDX_CH2CHCNI] + + k[2888]*y_cur[IDX_HCNHII]*y_cur[IDX_CH3CNI] + + k[2890]*y_cur[IDX_HCNHII]*y_cur[IDX_H2COI] + + k[2892]*y_cur[IDX_HCNHII]*y_cur[IDX_H2SI] + + k[2894]*y_cur[IDX_HCNHII]*y_cur[IDX_HC3NI] + + k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3245]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - + k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - + k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - + k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3389]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + + k[3400]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + + k[3405]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + + k[3423]*y_cur[IDX_NI]*y_cur[IDX_C6H2II] + + k[3424]*y_cur[IDX_NI]*y_cur[IDX_C6H5II] + + k[3460]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] + + k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] - + k[3493]*y_cur[IDX_NHII]*y_cur[IDX_HCNI] - + k[3519]*y_cur[IDX_NH2II]*y_cur[IDX_HCNI] + + k[3540]*y_cur[IDX_NH2I]*y_cur[IDX_HCNHII] + + k[3561]*y_cur[IDX_NH3I]*y_cur[IDX_C2NII] + + k[3572]*y_cur[IDX_NH3I]*y_cur[IDX_CNCII] + + k[3582]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] + + k[3629]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] - + k[3644]*y_cur[IDX_OII]*y_cur[IDX_HCNI] - + k[3645]*y_cur[IDX_OII]*y_cur[IDX_HCNI] - + k[3653]*y_cur[IDX_OM]*y_cur[IDX_HCNI] - + k[3781]*y_cur[IDX_OHII]*y_cur[IDX_HCNI] - + k[3795]*y_cur[IDX_OHM]*y_cur[IDX_HCNI] + + k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + + k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + + k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + + k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + + k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + + k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + + k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + + k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + + k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + + k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + + k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + + k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + + k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + + k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + + k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + + k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + + k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + + k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + + k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + + k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + + k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + + k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + + k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + + k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + + k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + + k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + + k[4813]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] + + k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - + k[4873]*y_cur[IDX_C2I]*y_cur[IDX_HCNI] + + k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] - + k[4901]*y_cur[IDX_C2HI]*y_cur[IDX_HCNI] + + k[4969]*y_cur[IDX_CI]*y_cur[IDX_NH2I] + + k[4997]*y_cur[IDX_CH2I]*y_cur[IDX_CNI] + + k[5001]*y_cur[IDX_CH2I]*y_cur[IDX_N2I] + + k[5004]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + + k[5029]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] + + k[5038]*y_cur[IDX_CH3I]*y_cur[IDX_NOI] + + k[5059]*y_cur[IDX_CH4I]*y_cur[IDX_CNI] + + k[5079]*y_cur[IDX_CHI]*y_cur[IDX_N2I] + + k[5083]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + + k[5105]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] + + k[5111]*y_cur[IDX_CNI]*y_cur[IDX_C2H6I] + + k[5114]*y_cur[IDX_CNI]*y_cur[IDX_H2COI] - + k[5116]*y_cur[IDX_CNI]*y_cur[IDX_HCNI] + + k[5117]*y_cur[IDX_CNI]*y_cur[IDX_HCOI] + + k[5119]*y_cur[IDX_CNI]*y_cur[IDX_HNOI] + + k[5126]*y_cur[IDX_CNI]*y_cur[IDX_SiH4I] + + k[5138]*y_cur[IDX_H2I]*y_cur[IDX_CNI] + + k[5164]*y_cur[IDX_HI]*y_cur[IDX_H2CNI] - + k[5170]*y_cur[IDX_HI]*y_cur[IDX_HCNI] + + k[5174]*y_cur[IDX_HI]*y_cur[IDX_HNCI] + + k[5181]*y_cur[IDX_HI]*y_cur[IDX_NCCNI] + + k[5194]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + + k[5215]*y_cur[IDX_HOCNI]*y_cur[IDX_CI] + + k[5225]*y_cur[IDX_NI]*y_cur[IDX_C2H4I] + + k[5253]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + + k[5258]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + + k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + + k[5264]*y_cur[IDX_NI]*y_cur[IDX_H2CNI] + + k[5266]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + + k[5268]*y_cur[IDX_NI]*y_cur[IDX_HCSI] + + k[5302]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] + + k[5305]*y_cur[IDX_NHI]*y_cur[IDX_CNI] - + k[5402]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - + k[5403]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - + k[5404]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + + k[5459]*y_cur[IDX_OHI]*y_cur[IDX_CNI] - + k[5469]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] - + k[5470]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] + + k[5475]*y_cur[IDX_OHI]*y_cur[IDX_NCCNI] - + k[5540]*y_cur[IDX_CH3II]*y_cur[IDX_HCNI] - + k[5580]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] + k[5835]*y_cur[IDX_H2CNI] - + k[5854]*y_cur[IDX_HCNI] + k[6151]*y_cur[IDX_H2CNI] - + k[6181]*y_cur[IDX_HCNI] + + k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + + k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + + k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + + k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + + k[6532]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + + k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + + k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + + k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6911]*y_cur[IDX_HCNI] + k[7093]*y_cur[IDX_GHCNI] + + k[7275]*y_cur[IDX_GHCNI] + k[7457]*y_cur[IDX_GHCNI] + + k[8592]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] + + k[8698]*y_cur[IDX_GNI]*y_cur[IDX_GCHI]; + ydot[yistart + IDX_CHI] = 0.0 - k[2]*y_cur[IDX_CM]*y_cur[IDX_CHI] - + k[62]*y_cur[IDX_CHI]*y_cur[IDX_OM] - + k[63]*y_cur[IDX_CHI]*y_cur[IDX_OI] - + k[64]*y_cur[IDX_CHI]*y_cur[IDX_OHM] + + k[68]*y_cur[IDX_HM]*y_cur[IDX_CI] - + k[71]*y_cur[IDX_HM]*y_cur[IDX_CHI] + + k[84]*y_cur[IDX_HI]*y_cur[IDX_CM] - + k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - + k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] - + k[170]*y_cur[IDX_CII]*y_cur[IDX_CHI] + + k[250]*y_cur[IDX_CHII]*y_cur[IDX_FeI] + + k[251]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] + + k[252]*y_cur[IDX_CHII]*y_cur[IDX_MgI] + + k[253]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + + k[254]*y_cur[IDX_CHII]*y_cur[IDX_NOI] + + k[255]*y_cur[IDX_CHII]*y_cur[IDX_NaI] + + k[256]*y_cur[IDX_CHII]*y_cur[IDX_SI] + + k[257]*y_cur[IDX_CHII]*y_cur[IDX_SiI] - + k[287]*y_cur[IDX_CHI]*y_cur[IDX_C2II] - + k[288]*y_cur[IDX_CHI]*y_cur[IDX_CNII] - + k[289]*y_cur[IDX_CHI]*y_cur[IDX_COII] - + k[290]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - + k[291]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] - + k[292]*y_cur[IDX_CHI]*y_cur[IDX_NII] - + k[293]*y_cur[IDX_CHI]*y_cur[IDX_N2II] - + k[294]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] - + k[295]*y_cur[IDX_CHI]*y_cur[IDX_OII] - + k[296]*y_cur[IDX_CHI]*y_cur[IDX_O2II] - + k[297]*y_cur[IDX_CHI]*y_cur[IDX_OHII] - + k[372]*y_cur[IDX_HII]*y_cur[IDX_CHI] - + k[443]*y_cur[IDX_H2II]*y_cur[IDX_CHI] - + k[515]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + + k[741]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + + k[744]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + + k[744]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + + k[753]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[754]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[762]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[799]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[812]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[828]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + + k[909]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + + k[910]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] + + k[917]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + + k[924]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[925]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[960]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + + k[976]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[988]*y_cur[IDX_H2C4NII]*y_cur[IDX_eM] + + k[1035]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1058]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + + k[1060]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + + k[1062]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + + k[1071]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + + k[1073]*y_cur[IDX_HC4NII]*y_cur[IDX_eM] + + k[1075]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] + + k[1092]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + + k[1106]*y_cur[IDX_HCPII]*y_cur[IDX_eM] + + k[1107]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + + k[1109]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + + k[1191]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + + k[1193]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + + k[1240]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] + + k[1262]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] + + k[1302]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1344]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + + k[1356]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + + k[1360]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] + + k[1366]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + + k[1370]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1376]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1378]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] + + k[1381]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - + k[1385]*y_cur[IDX_CII]*y_cur[IDX_CHI] + + k[1391]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + + k[1396]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - + k[1943]*y_cur[IDX_CHII]*y_cur[IDX_CHI] + + k[1984]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + + k[1989]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] + + k[2001]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - + k[2239]*y_cur[IDX_CHI]*y_cur[IDX_C2II] - + k[2240]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] - + k[2241]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] - + k[2242]*y_cur[IDX_CHI]*y_cur[IDX_C2H2II] - + k[2243]*y_cur[IDX_CHI]*y_cur[IDX_CH3II] - + k[2244]*y_cur[IDX_CHI]*y_cur[IDX_CH5II] - + k[2245]*y_cur[IDX_CHI]*y_cur[IDX_COII] - + k[2246]*y_cur[IDX_CHI]*y_cur[IDX_H2COII] - + k[2247]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] - + k[2248]*y_cur[IDX_CHI]*y_cur[IDX_H3COII] - + k[2249]*y_cur[IDX_CHI]*y_cur[IDX_H3OII] - + k[2250]*y_cur[IDX_CHI]*y_cur[IDX_HCNII] - + k[2251]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] - + k[2252]*y_cur[IDX_CHI]*y_cur[IDX_HCNHII] - + k[2253]*y_cur[IDX_CHI]*y_cur[IDX_HCOII] - + k[2254]*y_cur[IDX_CHI]*y_cur[IDX_HNOII] - + k[2255]*y_cur[IDX_CHI]*y_cur[IDX_HSII] - + k[2256]*y_cur[IDX_CHI]*y_cur[IDX_NII] - + k[2257]*y_cur[IDX_CHI]*y_cur[IDX_N2HII] - + k[2258]*y_cur[IDX_CHI]*y_cur[IDX_NHII] - + k[2259]*y_cur[IDX_CHI]*y_cur[IDX_NH2II] - + k[2260]*y_cur[IDX_CHI]*y_cur[IDX_NH3II] - + k[2261]*y_cur[IDX_CHI]*y_cur[IDX_OII] - + k[2262]*y_cur[IDX_CHI]*y_cur[IDX_O2II] - + k[2263]*y_cur[IDX_CHI]*y_cur[IDX_O2HII] - + k[2264]*y_cur[IDX_CHI]*y_cur[IDX_OHII] - + k[2265]*y_cur[IDX_CHI]*y_cur[IDX_SII] - + k[2266]*y_cur[IDX_CHI]*y_cur[IDX_SiII] - + k[2267]*y_cur[IDX_CHI]*y_cur[IDX_SiHII] - + k[2268]*y_cur[IDX_CHI]*y_cur[IDX_SiOII] - + k[2380]*y_cur[IDX_H2II]*y_cur[IDX_CHI] - + k[2670]*y_cur[IDX_H3II]*y_cur[IDX_CHI] + + k[3018]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + + k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + + k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - + k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + + k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + + k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + + k[3257]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + + k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + + k[3634]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + + k[3645]*y_cur[IDX_OII]*y_cur[IDX_HCNI] + + k[3689]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + + k[3702]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] + + k[3865]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + + k[4621]*y_cur[IDX_CHM]*y_cur[IDX_CII] + + k[4622]*y_cur[IDX_CHM]*y_cur[IDX_C2H2II] + + k[4623]*y_cur[IDX_CHM]*y_cur[IDX_C2H3II] + + k[4624]*y_cur[IDX_CHM]*y_cur[IDX_C4H2II] + + k[4625]*y_cur[IDX_CHM]*y_cur[IDX_C4H3II] + + k[4626]*y_cur[IDX_CHM]*y_cur[IDX_C4SII] + + k[4627]*y_cur[IDX_CHM]*y_cur[IDX_CH2CCHII] + + k[4628]*y_cur[IDX_CHM]*y_cur[IDX_CH3II] + + k[4629]*y_cur[IDX_CHM]*y_cur[IDX_CNCII] + + k[4630]*y_cur[IDX_CHM]*y_cur[IDX_FeII] + + k[4631]*y_cur[IDX_CHM]*y_cur[IDX_HII] + + k[4632]*y_cur[IDX_CHM]*y_cur[IDX_H2COII] + + k[4633]*y_cur[IDX_CHM]*y_cur[IDX_H2SII] + + k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] + + k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] + + k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] + + k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + + k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + + k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + + k[4640]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + + k[4641]*y_cur[IDX_CHM]*y_cur[IDX_HeII] + + k[4642]*y_cur[IDX_CHM]*y_cur[IDX_MgII] + + k[4643]*y_cur[IDX_CHM]*y_cur[IDX_NII] + + k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] + + k[4645]*y_cur[IDX_CHM]*y_cur[IDX_NH3II] + + k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] + + k[4647]*y_cur[IDX_CHM]*y_cur[IDX_NOII] + + k[4648]*y_cur[IDX_CHM]*y_cur[IDX_NaII] + + k[4649]*y_cur[IDX_CHM]*y_cur[IDX_OII] + + k[4650]*y_cur[IDX_CHM]*y_cur[IDX_SII] + + k[4651]*y_cur[IDX_CHM]*y_cur[IDX_SOII] + + k[4652]*y_cur[IDX_CHM]*y_cur[IDX_SiII] + + k[4653]*y_cur[IDX_CHM]*y_cur[IDX_SiOII] + + k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] + + k[4655]*y_cur[IDX_CHM]*y_cur[IDX_SiSII] + + k[4945]*y_cur[IDX_CI]*y_cur[IDX_CH2I] + + k[4945]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - + k[4955]*y_cur[IDX_CI]*y_cur[IDX_CHI] + + k[4963]*y_cur[IDX_CI]*y_cur[IDX_HCOI] + + k[4966]*y_cur[IDX_CI]*y_cur[IDX_HSI] + + k[4971]*y_cur[IDX_CI]*y_cur[IDX_NH2I] + + k[4973]*y_cur[IDX_CI]*y_cur[IDX_NHI] + + k[4982]*y_cur[IDX_CI]*y_cur[IDX_OHI] + + k[4995]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + + k[4997]*y_cur[IDX_CH2I]*y_cur[IDX_CNI] + + k[5015]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + + k[5017]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - + k[5063]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - + k[5064]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - + k[5065]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - + k[5066]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] - + k[5067]*y_cur[IDX_CHI]*y_cur[IDX_CH2CCH2I] - + k[5068]*y_cur[IDX_CHI]*y_cur[IDX_CH3CCHI] - + k[5069]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - + k[5070]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] - + k[5071]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - + k[5072]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] - + k[5073]*y_cur[IDX_CHI]*y_cur[IDX_CH3OHI] - + k[5074]*y_cur[IDX_CHI]*y_cur[IDX_CH4I] - + k[5075]*y_cur[IDX_CHI]*y_cur[IDX_CO2I] - + k[5076]*y_cur[IDX_CHI]*y_cur[IDX_H2COI] - + k[5077]*y_cur[IDX_CHI]*y_cur[IDX_HCOI] - + k[5078]*y_cur[IDX_CHI]*y_cur[IDX_HNOI] - + k[5079]*y_cur[IDX_CHI]*y_cur[IDX_N2I] - + k[5080]*y_cur[IDX_CHI]*y_cur[IDX_NI] - + k[5081]*y_cur[IDX_CHI]*y_cur[IDX_NI] - + k[5082]*y_cur[IDX_CHI]*y_cur[IDX_NH3I] - + k[5083]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - + k[5084]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - + k[5085]*y_cur[IDX_CHI]*y_cur[IDX_NOI] - + k[5086]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5087]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5090]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5091]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5092]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5093]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - k[5094]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - k[5095]*y_cur[IDX_CHI]*y_cur[IDX_O2HI] - - k[5131]*y_cur[IDX_COI]*y_cur[IDX_O2HI] + - k[5144]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - - k[5146]*y_cur[IDX_H2I]*y_cur[IDX_O2HI] - - k[5150]*y_cur[IDX_H2COI]*y_cur[IDX_O2HI] - - k[5152]*y_cur[IDX_H2OI]*y_cur[IDX_O2HI] + - k[5167]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - - k[5191]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - - k[5192]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - - k[5193]*y_cur[IDX_HI]*y_cur[IDX_O2HI] + - k[5209]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] - - k[5210]*y_cur[IDX_HCOI]*y_cur[IDX_O2HI] - - k[5282]*y_cur[IDX_NI]*y_cur[IDX_O2HI] - - k[5339]*y_cur[IDX_O2HI]*y_cur[IDX_O2HI] - - k[5339]*y_cur[IDX_O2HI]*y_cur[IDX_O2HI] + - k[5398]*y_cur[IDX_OI]*y_cur[IDX_H2O2I] - - k[5427]*y_cur[IDX_OI]*y_cur[IDX_O2HI] + - k[5467]*y_cur[IDX_OHI]*y_cur[IDX_H2O2I] + - k[5474]*y_cur[IDX_OHI]*y_cur[IDX_N2OI] - - k[5478]*y_cur[IDX_OHI]*y_cur[IDX_O2HI] - k[5899]*y_cur[IDX_O2HI] - - k[6237]*y_cur[IDX_O2HI] - k[6238]*y_cur[IDX_O2HI] - - k[6937]*y_cur[IDX_O2HI] + k[7119]*y_cur[IDX_GO2HI] + - k[7301]*y_cur[IDX_GO2HI] + k[7483]*y_cur[IDX_GO2HI] + - k[8605]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] + - k[8690]*y_cur[IDX_GOI]*y_cur[IDX_GOHI]; - ydot[yistart + IDX_O2HII] = 0.0 - - k[1175]*y_cur[IDX_O2HII]*y_cur[IDX_eM] - + k[5096]*y_cur[IDX_CHI]*y_cur[IDX_OI] - + k[5097]*y_cur[IDX_CHI]*y_cur[IDX_OI] - + k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] - + k[5099]*y_cur[IDX_CHI]*y_cur[IDX_OHI] - + k[5100]*y_cur[IDX_CHI]*y_cur[IDX_SI] - + k[5101]*y_cur[IDX_CHI]*y_cur[IDX_SI] - + k[5102]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - + k[5103]*y_cur[IDX_CHI]*y_cur[IDX_SOI] + + k[5134]*y_cur[IDX_H2I]*y_cur[IDX_CI] - + k[5137]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + + k[5153]*y_cur[IDX_HI]*y_cur[IDX_C2I] + + k[5156]*y_cur[IDX_HI]*y_cur[IDX_CH2I] - + k[5160]*y_cur[IDX_HI]*y_cur[IDX_CHI] + + k[5255]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + + k[5352]*y_cur[IDX_OI]*y_cur[IDX_C2HI] + + k[5410]*y_cur[IDX_OI]*y_cur[IDX_HCSiI] - + k[5556]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + + k[5572]*y_cur[IDX_HI]*y_cur[IDX_CI] + k[5777]*y_cur[IDX_CHM] + + k[5779]*y_cur[IDX_CH2I] + k[5795]*y_cur[IDX_CH3I] - + k[5821]*y_cur[IDX_CHI] + k[5855]*y_cur[IDX_HCNOI] + + k[5863]*y_cur[IDX_HCSiI] + k[5942]*y_cur[IDX_HC2OI] + + k[6074]*y_cur[IDX_CHM] + k[6077]*y_cur[IDX_CH2II] + + k[6079]*y_cur[IDX_CH2I] + k[6099]*y_cur[IDX_CH3I] + + k[6130]*y_cur[IDX_CH4I] - k[6131]*y_cur[IDX_CHI] - + k[6132]*y_cur[IDX_CHI] + k[6182]*y_cur[IDX_HCNOI] + + k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + + k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + + k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + + k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + + k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + + k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + + k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + + k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] + + k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + + k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + + k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM] + + k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM] + + k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + + k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + + k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] + + k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + + k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - k[6892]*y_cur[IDX_CHI] + + k[7074]*y_cur[IDX_GCHI] + k[7256]*y_cur[IDX_GCHI] + + k[7438]*y_cur[IDX_GCHI] + k[8576]*y_cur[IDX_GHI]*y_cur[IDX_GCI]; + ydot[yistart + IDX_SI] = 0.0 - k[207]*y_cur[IDX_C2II]*y_cur[IDX_SI] + - k[213]*y_cur[IDX_C2HII]*y_cur[IDX_SI] - + k[256]*y_cur[IDX_CHII]*y_cur[IDX_SI] - + k[305]*y_cur[IDX_CNII]*y_cur[IDX_SI] - + k[313]*y_cur[IDX_COII]*y_cur[IDX_SI] - + k[415]*y_cur[IDX_HII]*y_cur[IDX_SI] - + k[460]*y_cur[IDX_H2COII]*y_cur[IDX_SI] - + k[476]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - + k[496]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + + k[503]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + + k[538]*y_cur[IDX_MgI]*y_cur[IDX_SII] - + k[572]*y_cur[IDX_N2II]*y_cur[IDX_SI] - + k[579]*y_cur[IDX_NHII]*y_cur[IDX_SI] - + k[584]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + + k[614]*y_cur[IDX_NH3I]*y_cur[IDX_SII] + + k[629]*y_cur[IDX_NOI]*y_cur[IDX_SII] + + k[643]*y_cur[IDX_NaI]*y_cur[IDX_SII] - + k[677]*y_cur[IDX_O2II]*y_cur[IDX_SI] - + k[695]*y_cur[IDX_OHII]*y_cur[IDX_SI] + + k[702]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + + k[703]*y_cur[IDX_SII]*y_cur[IDX_FeI] + + k[704]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + + k[705]*y_cur[IDX_SII]*y_cur[IDX_SiCI] + + k[706]*y_cur[IDX_SII]*y_cur[IDX_SiSI] - + k[707]*y_cur[IDX_SI]*y_cur[IDX_CII] - + k[708]*y_cur[IDX_SI]*y_cur[IDX_CII] - + k[709]*y_cur[IDX_SI]*y_cur[IDX_H2SII] - + k[710]*y_cur[IDX_SI]*y_cur[IDX_HSII] + + k[724]*y_cur[IDX_SiI]*y_cur[IDX_SII] + + k[725]*y_cur[IDX_SiHI]*y_cur[IDX_SII] + + k[787]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + + k[817]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + + k[985]*y_cur[IDX_CSII]*y_cur[IDX_eM] + + k[1020]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + + k[1048]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1107]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + + k[1138]*y_cur[IDX_HSII]*y_cur[IDX_eM] + + k[1139]*y_cur[IDX_HS2II]*y_cur[IDX_eM] + + k[1173]*y_cur[IDX_NSII]*y_cur[IDX_eM] + + k[1179]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + + k[1219]*y_cur[IDX_S2II]*y_cur[IDX_eM] + + k[1219]*y_cur[IDX_S2II]*y_cur[IDX_eM] + + k[1220]*y_cur[IDX_SOII]*y_cur[IDX_eM] + + k[1221]*y_cur[IDX_SO2II]*y_cur[IDX_eM] + + k[1269]*y_cur[IDX_SiSII]*y_cur[IDX_eM] + + k[1309]*y_cur[IDX_CII]*y_cur[IDX_C2SI] + + k[1316]*y_cur[IDX_CII]*y_cur[IDX_C3SI] + + k[1322]*y_cur[IDX_CII]*y_cur[IDX_C4SI] + + k[1430]*y_cur[IDX_CII]*y_cur[IDX_SOI] + + k[1448]*y_cur[IDX_CII]*y_cur[IDX_SiSI] - + k[1456]*y_cur[IDX_C2II]*y_cur[IDX_SI] - + k[1527]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] - + k[1528]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] - + k[1625]*y_cur[IDX_C2H3II]*y_cur[IDX_SI] - + k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] - + k[1973]*y_cur[IDX_CHII]*y_cur[IDX_SI] - + k[1974]*y_cur[IDX_CHII]*y_cur[IDX_SI] - + k[1994]*y_cur[IDX_CH2II]*y_cur[IDX_SI] - + k[2095]*y_cur[IDX_CH3II]*y_cur[IDX_SI] - + k[2235]*y_cur[IDX_CH5II]*y_cur[IDX_SI] + + k[2255]*y_cur[IDX_CHI]*y_cur[IDX_HSII] - + k[2490]*y_cur[IDX_H2COII]*y_cur[IDX_SI] - + k[2516]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - + k[2517]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + + k[2554]*y_cur[IDX_H2OI]*y_cur[IDX_HSII] - + k[2740]*y_cur[IDX_H3II]*y_cur[IDX_SI] - + k[2860]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + + k[2879]*y_cur[IDX_HCNI]*y_cur[IDX_HSII] - + k[2989]*y_cur[IDX_HCOII]*y_cur[IDX_SI] + + k[3043]*y_cur[IDX_HNCI]*y_cur[IDX_HSII] - + k[3050]*y_cur[IDX_HNOII]*y_cur[IDX_SI] + + k[3054]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + + k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + + k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + + k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + + k[3296]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] + + k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + + k[3335]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] - + k[3376]*y_cur[IDX_N2HII]*y_cur[IDX_SI] - + k[3505]*y_cur[IDX_NHII]*y_cur[IDX_SI] - + k[3506]*y_cur[IDX_NHII]*y_cur[IDX_SI] + + k[3518]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3526]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - + k[3527]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + + k[3589]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] - + k[3667]*y_cur[IDX_O2II]*y_cur[IDX_SI] + + k[3732]*y_cur[IDX_OI]*y_cur[IDX_CSII] + + k[3739]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + + k[3748]*y_cur[IDX_OI]*y_cur[IDX_NSII] - + k[3789]*y_cur[IDX_OHII]*y_cur[IDX_SI] - + k[3790]*y_cur[IDX_OHII]*y_cur[IDX_SI] - + k[3834]*y_cur[IDX_SI]*y_cur[IDX_C3H2II] - + k[3835]*y_cur[IDX_SI]*y_cur[IDX_C3H3II] - + k[3836]*y_cur[IDX_SI]*y_cur[IDX_C4H2II] - + k[3837]*y_cur[IDX_SI]*y_cur[IDX_C4H3II] - + k[3838]*y_cur[IDX_SI]*y_cur[IDX_CH2CCHII] - + k[3839]*y_cur[IDX_SI]*y_cur[IDX_H3SII] - + k[3840]*y_cur[IDX_SI]*y_cur[IDX_O2HII] - + k[3841]*y_cur[IDX_SI]*y_cur[IDX_SiCH2II] - + k[3842]*y_cur[IDX_SI]*y_cur[IDX_SiOII] + + k[3843]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - + k[3883]*y_cur[IDX_SiH2II]*y_cur[IDX_SI] + + k[3915]*y_cur[IDX_CM]*y_cur[IDX_SII] + + k[3950]*y_cur[IDX_C10M]*y_cur[IDX_SII] + + k[3985]*y_cur[IDX_C10HM]*y_cur[IDX_SII] + + k[4020]*y_cur[IDX_C2M]*y_cur[IDX_SII] + + k[4055]*y_cur[IDX_C2HM]*y_cur[IDX_SII] + + k[4090]*y_cur[IDX_C3M]*y_cur[IDX_SII] + + k[4125]*y_cur[IDX_C3HM]*y_cur[IDX_SII] + + k[4160]*y_cur[IDX_C3NM]*y_cur[IDX_SII] + + k[4195]*y_cur[IDX_C4M]*y_cur[IDX_SII] + + k[4230]*y_cur[IDX_C4HM]*y_cur[IDX_SII] + + k[4265]*y_cur[IDX_C5M]*y_cur[IDX_SII] + + k[4300]*y_cur[IDX_C5HM]*y_cur[IDX_SII] + + k[4335]*y_cur[IDX_C5NM]*y_cur[IDX_SII] + + k[4370]*y_cur[IDX_C6M]*y_cur[IDX_SII] + + k[4405]*y_cur[IDX_C6HM]*y_cur[IDX_SII] + + k[4440]*y_cur[IDX_C7M]*y_cur[IDX_SII] + + k[4475]*y_cur[IDX_C7HM]*y_cur[IDX_SII] + + k[4510]*y_cur[IDX_C8M]*y_cur[IDX_SII] + + k[4545]*y_cur[IDX_C8HM]*y_cur[IDX_SII] + + k[4580]*y_cur[IDX_C9M]*y_cur[IDX_SII] + + k[4615]*y_cur[IDX_C9HM]*y_cur[IDX_SII] + + k[4650]*y_cur[IDX_CHM]*y_cur[IDX_SII] + + k[4685]*y_cur[IDX_CNM]*y_cur[IDX_SII] + + k[4721]*y_cur[IDX_HM]*y_cur[IDX_SII] + + k[4756]*y_cur[IDX_OM]*y_cur[IDX_SII] + + k[4791]*y_cur[IDX_O2M]*y_cur[IDX_SII] + + k[4826]*y_cur[IDX_OHM]*y_cur[IDX_SII] + + k[4832]*y_cur[IDX_SM]*y_cur[IDX_CII] + + k[4833]*y_cur[IDX_SM]*y_cur[IDX_C2H2II] + + k[4834]*y_cur[IDX_SM]*y_cur[IDX_C2H3II] + + k[4835]*y_cur[IDX_SM]*y_cur[IDX_C4H2II] + + k[4836]*y_cur[IDX_SM]*y_cur[IDX_C4H3II] + + k[4837]*y_cur[IDX_SM]*y_cur[IDX_C4SII] + + k[4838]*y_cur[IDX_SM]*y_cur[IDX_CH2CCHII] + + k[4839]*y_cur[IDX_SM]*y_cur[IDX_CH3II] + + k[4840]*y_cur[IDX_SM]*y_cur[IDX_CNCII] + + k[4841]*y_cur[IDX_SM]*y_cur[IDX_FeII] + + k[4842]*y_cur[IDX_SM]*y_cur[IDX_HII] + + k[4843]*y_cur[IDX_SM]*y_cur[IDX_H2COII] + + k[4844]*y_cur[IDX_SM]*y_cur[IDX_H2SII] + + k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] + + k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] + + k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] + + k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] + + k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] + + k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + + k[4851]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + + k[4852]*y_cur[IDX_SM]*y_cur[IDX_HeII] + + k[4853]*y_cur[IDX_SM]*y_cur[IDX_MgII] + + k[4854]*y_cur[IDX_SM]*y_cur[IDX_NII] + + k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] + + k[4856]*y_cur[IDX_SM]*y_cur[IDX_NH3II] + + k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] + + k[4858]*y_cur[IDX_SM]*y_cur[IDX_NOII] + + k[4859]*y_cur[IDX_SM]*y_cur[IDX_NaII] + + k[4860]*y_cur[IDX_SM]*y_cur[IDX_OII] + + k[4861]*y_cur[IDX_SM]*y_cur[IDX_SII] + + k[4861]*y_cur[IDX_SM]*y_cur[IDX_SII] + + k[4862]*y_cur[IDX_SM]*y_cur[IDX_SOII] + + k[4863]*y_cur[IDX_SM]*y_cur[IDX_SiII] + + k[4864]*y_cur[IDX_SM]*y_cur[IDX_SiOII] + + k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] + + k[4866]*y_cur[IDX_SM]*y_cur[IDX_SiSII] - + k[4876]*y_cur[IDX_C2I]*y_cur[IDX_SI] - + k[4906]*y_cur[IDX_C2HI]*y_cur[IDX_SI] + + k[4958]*y_cur[IDX_CI]*y_cur[IDX_CSI] + + k[4966]*y_cur[IDX_CI]*y_cur[IDX_HSI] + + k[4977]*y_cur[IDX_CI]*y_cur[IDX_NSI] + + k[4984]*y_cur[IDX_CI]*y_cur[IDX_S2I] + + k[4987]*y_cur[IDX_CI]*y_cur[IDX_SOI] - + k[5019]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - + k[5020]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - + k[5048]*y_cur[IDX_CH3I]*y_cur[IDX_SI] - + k[5062]*y_cur[IDX_CH4I]*y_cur[IDX_SI] - + k[5100]*y_cur[IDX_CHI]*y_cur[IDX_SI] - + k[5101]*y_cur[IDX_CHI]*y_cur[IDX_SI] - + k[5125]*y_cur[IDX_CNI]*y_cur[IDX_SI] - + k[5149]*y_cur[IDX_H2I]*y_cur[IDX_SI] + + k[5178]*y_cur[IDX_HI]*y_cur[IDX_HSI] + + k[5189]*y_cur[IDX_HI]*y_cur[IDX_NSI] + + k[5199]*y_cur[IDX_HI]*y_cur[IDX_S2I] + + k[5201]*y_cur[IDX_HI]*y_cur[IDX_SOI] + + k[5219]*y_cur[IDX_HSI]*y_cur[IDX_HSI] + + k[5263]*y_cur[IDX_NI]*y_cur[IDX_CSI] + + k[5268]*y_cur[IDX_NI]*y_cur[IDX_HCSI] + + k[5272]*y_cur[IDX_NI]*y_cur[IDX_HSI] + + k[5280]*y_cur[IDX_NI]*y_cur[IDX_NSI] + + k[5289]*y_cur[IDX_NI]*y_cur[IDX_S2I] + + k[5291]*y_cur[IDX_NI]*y_cur[IDX_SOI] - + k[5324]*y_cur[IDX_NHI]*y_cur[IDX_SI] - + k[5325]*y_cur[IDX_NHI]*y_cur[IDX_SI] - + k[5333]*y_cur[IDX_NOI]*y_cur[IDX_SI] - + k[5334]*y_cur[IDX_NOI]*y_cur[IDX_SI] - + k[5337]*y_cur[IDX_O2I]*y_cur[IDX_SI] + + k[5392]*y_cur[IDX_OI]*y_cur[IDX_CSI] + + k[5415]*y_cur[IDX_OI]*y_cur[IDX_HSI] + + k[5425]*y_cur[IDX_OI]*y_cur[IDX_NSI] + + k[5430]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + + k[5437]*y_cur[IDX_OI]*y_cur[IDX_S2I] + + k[5439]*y_cur[IDX_OI]*y_cur[IDX_SOI] - + k[5480]*y_cur[IDX_OHI]*y_cur[IDX_SI] - + k[5485]*y_cur[IDX_SI]*y_cur[IDX_C2OI] - + k[5486]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - + k[5487]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - + k[5488]*y_cur[IDX_SI]*y_cur[IDX_HSI] - + k[5489]*y_cur[IDX_SI]*y_cur[IDX_SO2I] - + k[5490]*y_cur[IDX_SI]*y_cur[IDX_SOI] - + k[5506]*y_cur[IDX_CII]*y_cur[IDX_SI] - + k[5529]*y_cur[IDX_CI]*y_cur[IDX_SI] - + k[5610]*y_cur[IDX_SI]*y_cur[IDX_eM] + + k[5625]*y_cur[IDX_SII]*y_cur[IDX_eM] + k[5715]*y_cur[IDX_C2SI] + + k[5829]*y_cur[IDX_CSI] + k[5842]*y_cur[IDX_H2SI] + + k[5874]*y_cur[IDX_HS2I] + k[5875]*y_cur[IDX_HSI] + + k[5893]*y_cur[IDX_NSI] + k[5903]*y_cur[IDX_OCSI] + + k[5911]*y_cur[IDX_SM] + k[5912]*y_cur[IDX_S2I] + + k[5912]*y_cur[IDX_S2I] - k[5913]*y_cur[IDX_SI] + + k[5915]*y_cur[IDX_SOI] + k[5935]*y_cur[IDX_SiSI] + + k[5999]*y_cur[IDX_C2SI] + k[6142]*y_cur[IDX_CSI] + + k[6165]*y_cur[IDX_H2SI] + k[6206]*y_cur[IDX_HSII] + + k[6208]*y_cur[IDX_HS2I] + k[6209]*y_cur[IDX_HSI] + + k[6230]*y_cur[IDX_NSI] + k[6241]*y_cur[IDX_OCSI] + + k[6252]*y_cur[IDX_SM] + k[6254]*y_cur[IDX_S2I] + + k[6254]*y_cur[IDX_S2I] - k[6255]*y_cur[IDX_SI] + + k[6257]*y_cur[IDX_SOI] + k[6288]*y_cur[IDX_SiSI] - + k[6303]*y_cur[IDX_SI] + k[6424]*y_cur[IDX_SII]*y_cur[IDX_GRAINM] + + k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM] + + k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + + k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM] + + k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + + k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM] + + k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM] + + k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + + k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM] + + k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + + k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM] + + k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM] + + k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + + k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - k[6932]*y_cur[IDX_SI] + + k[7114]*y_cur[IDX_GSI] + k[7296]*y_cur[IDX_GSI] + + k[7478]*y_cur[IDX_GSI]; + ydot[yistart + IDX_C2I] = 0.0 + k[0]*y_cur[IDX_CM]*y_cur[IDX_CI] - + k[10]*y_cur[IDX_C2M]*y_cur[IDX_C2I] - + k[22]*y_cur[IDX_C4M]*y_cur[IDX_C2I] - + k[27]*y_cur[IDX_C5M]*y_cur[IDX_C2I] - + k[31]*y_cur[IDX_C6M]*y_cur[IDX_C2I] - + k[34]*y_cur[IDX_C7M]*y_cur[IDX_C2I] - + k[36]*y_cur[IDX_C8M]*y_cur[IDX_C2I] - + k[66]*y_cur[IDX_HM]*y_cur[IDX_C2I] + + k[205]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + + k[206]*y_cur[IDX_C2II]*y_cur[IDX_NOI] + + k[207]*y_cur[IDX_C2II]*y_cur[IDX_SI] - + k[208]*y_cur[IDX_C2I]*y_cur[IDX_CNII] - + k[209]*y_cur[IDX_C2I]*y_cur[IDX_COII] - + k[210]*y_cur[IDX_C2I]*y_cur[IDX_N2II] - + k[211]*y_cur[IDX_C2I]*y_cur[IDX_O2II] + + k[244]*y_cur[IDX_CI]*y_cur[IDX_C2II] + + k[259]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] + + k[287]*y_cur[IDX_CHI]*y_cur[IDX_C2II] - + k[323]*y_cur[IDX_HII]*y_cur[IDX_C2I] - + k[436]*y_cur[IDX_H2II]*y_cur[IDX_C2I] - + k[462]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] - + k[508]*y_cur[IDX_HeII]*y_cur[IDX_C2I] - + k[542]*y_cur[IDX_NII]*y_cur[IDX_C2I] + + k[585]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] - + k[646]*y_cur[IDX_OII]*y_cur[IDX_C2I] - + k[685]*y_cur[IDX_OHII]*y_cur[IDX_C2I] + + k[697]*y_cur[IDX_OHI]*y_cur[IDX_C2II] + + k[727]*y_cur[IDX_C10II]*y_cur[IDX_eM] + + k[738]*y_cur[IDX_C11II]*y_cur[IDX_eM] + + k[740]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + + k[742]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + + k[745]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[746]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[780]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + + k[787]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + + k[788]*y_cur[IDX_C3II]*y_cur[IDX_eM] + + k[791]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[814]*y_cur[IDX_C3NII]*y_cur[IDX_eM] + + k[815]*y_cur[IDX_C3OII]*y_cur[IDX_eM] + + k[818]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + + k[819]*y_cur[IDX_C4II]*y_cur[IDX_eM] + + k[819]*y_cur[IDX_C4II]*y_cur[IDX_eM] + + k[831]*y_cur[IDX_C4NII]*y_cur[IDX_eM] + + k[834]*y_cur[IDX_C4PII]*y_cur[IDX_eM] + + k[835]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + + k[838]*y_cur[IDX_C5II]*y_cur[IDX_eM] + + k[847]*y_cur[IDX_C5NII]*y_cur[IDX_eM] + + k[848]*y_cur[IDX_C6II]*y_cur[IDX_eM] + + k[864]*y_cur[IDX_C7II]*y_cur[IDX_eM] + + k[876]*y_cur[IDX_C7NII]*y_cur[IDX_eM] + + k[877]*y_cur[IDX_C8II]*y_cur[IDX_eM] + + k[889]*y_cur[IDX_C9II]*y_cur[IDX_eM] + + k[901]*y_cur[IDX_C9NII]*y_cur[IDX_eM] + + k[903]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + + k[918]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + + k[978]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + + k[1065]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + + k[1224]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] + + k[1233]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + + k[1238]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] + + k[1299]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + + k[1341]*y_cur[IDX_CII]*y_cur[IDX_CCPI] + + k[1434]*y_cur[IDX_CII]*y_cur[IDX_SiCI] - + k[1451]*y_cur[IDX_C2II]*y_cur[IDX_C2I] - + k[1457]*y_cur[IDX_C2I]*y_cur[IDX_H2COII] - + k[1458]*y_cur[IDX_C2I]*y_cur[IDX_HCNII] - + k[1459]*y_cur[IDX_C2I]*y_cur[IDX_HCOII] - + k[1460]*y_cur[IDX_C2I]*y_cur[IDX_HNOII] - + k[1461]*y_cur[IDX_C2I]*y_cur[IDX_N2HII] - + k[1462]*y_cur[IDX_C2I]*y_cur[IDX_O2II] - k[1463]*y_cur[IDX_C2I]*y_cur[IDX_O2HII] - - k[1749]*y_cur[IDX_C2HI]*y_cur[IDX_O2HII] - - k[1913]*y_cur[IDX_CI]*y_cur[IDX_O2HII] - - k[2015]*y_cur[IDX_CH2I]*y_cur[IDX_O2HII] - - k[2263]*y_cur[IDX_CHI]*y_cur[IDX_O2HII] - - k[2279]*y_cur[IDX_CNI]*y_cur[IDX_O2HII] - - k[2289]*y_cur[IDX_COI]*y_cur[IDX_O2HII] + - k[2395]*y_cur[IDX_H2II]*y_cur[IDX_O2I] - - k[2468]*y_cur[IDX_H2I]*y_cur[IDX_O2HII] - - k[2499]*y_cur[IDX_H2COI]*y_cur[IDX_O2HII] - - k[2561]*y_cur[IDX_H2OI]*y_cur[IDX_O2HII] + - k[2729]*y_cur[IDX_H3II]*y_cur[IDX_O2I] - - k[2883]*y_cur[IDX_HCNI]*y_cur[IDX_O2HII] + - k[3010]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] - - k[3011]*y_cur[IDX_HCOI]*y_cur[IDX_O2HII] - - k[3045]*y_cur[IDX_HNCI]*y_cur[IDX_O2HII] - - k[3367]*y_cur[IDX_N2I]*y_cur[IDX_O2HII] - - k[3466]*y_cur[IDX_NI]*y_cur[IDX_O2HII] + - k[3502]*y_cur[IDX_NHII]*y_cur[IDX_O2I] - - k[3546]*y_cur[IDX_NH2I]*y_cur[IDX_O2HII] - - k[3594]*y_cur[IDX_NH3I]*y_cur[IDX_O2HII] - - k[3622]*y_cur[IDX_NHI]*y_cur[IDX_O2HII] - - k[3627]*y_cur[IDX_NOI]*y_cur[IDX_O2HII] - - k[3677]*y_cur[IDX_O2HII]*y_cur[IDX_CO2I] - - k[3749]*y_cur[IDX_OI]*y_cur[IDX_O2HII] - - k[3806]*y_cur[IDX_OHI]*y_cur[IDX_O2HII] - - k[3840]*y_cur[IDX_SI]*y_cur[IDX_O2HII] - - k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_OCNI] = 0.0 + - k[1117]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + - k[1126]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] - - k[1424]*y_cur[IDX_CII]*y_cur[IDX_OCNI] - - k[3291]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] - - k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] - - k[3767]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - - k[3768]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - - k[4979]*y_cur[IDX_CI]*y_cur[IDX_OCNI] + - k[5085]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + - k[5120]*y_cur[IDX_CNI]*y_cur[IDX_NO2I] + - k[5122]*y_cur[IDX_CNI]*y_cur[IDX_NOI] + - k[5124]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - - k[5194]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - - k[5195]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - - k[5196]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + - k[5216]*y_cur[IDX_HOCNI]*y_cur[IDX_OI] + - k[5267]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - - k[5331]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - - k[5332]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] - - k[5335]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] - - k[5336]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] + - k[5372]*y_cur[IDX_OI]*y_cur[IDX_C7NI] + - k[5377]*y_cur[IDX_OI]*y_cur[IDX_C9NI] + - k[5396]*y_cur[IDX_OI]*y_cur[IDX_H2CNI] + - k[5404]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - - k[5428]*y_cur[IDX_OI]*y_cur[IDX_OCNI] - - k[5429]*y_cur[IDX_OI]*y_cur[IDX_OCNI] + - k[5460]*y_cur[IDX_OHI]*y_cur[IDX_CNI] + - k[5475]*y_cur[IDX_OHI]*y_cur[IDX_NCCNI] - k[5901]*y_cur[IDX_OCNI] - - k[6239]*y_cur[IDX_OCNI] + - k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + - k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] - - k[6964]*y_cur[IDX_OCNI] + k[7146]*y_cur[IDX_GOCNI] + - k[7328]*y_cur[IDX_GOCNI] + k[7510]*y_cur[IDX_GOCNI] + - k[8692]*y_cur[IDX_GOI]*y_cur[IDX_GCNI]; - ydot[yistart + IDX_OCNII] = 0.0 - - k[1176]*y_cur[IDX_OCNII]*y_cur[IDX_eM] + - k[2270]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + - k[2274]*y_cur[IDX_CNII]*y_cur[IDX_NOI] + - k[2276]*y_cur[IDX_CNII]*y_cur[IDX_O2I] + - k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + - k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] + - k[3486]*y_cur[IDX_NHII]*y_cur[IDX_COI] - - k[3765]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] - - k[3766]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] - - k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_OCSI] = 0.0 + k[65]*y_cur[IDX_COI]*y_cur[IDX_SM] - - k[189]*y_cur[IDX_CII]*y_cur[IDX_OCSI] - - k[284]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - - k[314]*y_cur[IDX_CO2II]*y_cur[IDX_OCSI] - - k[407]*y_cur[IDX_HII]*y_cur[IDX_OCSI] - - k[475]*y_cur[IDX_H2OII]*y_cur[IDX_OCSI] + - k[486]*y_cur[IDX_H2SI]*y_cur[IDX_OCSII] - - k[562]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - - k[571]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] + - k[612]*y_cur[IDX_NH3I]*y_cur[IDX_OCSII] - - k[663]*y_cur[IDX_OII]*y_cur[IDX_OCSI] + - k[1129]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] - - k[1425]*y_cur[IDX_CII]*y_cur[IDX_OCSI] - - k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - - k[1757]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - - k[1758]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] - - k[1970]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] - - k[1971]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] - - k[1992]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] - - k[1993]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] - - k[2092]*y_cur[IDX_CH3II]*y_cur[IDX_OCSI] - - k[2145]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] - - k[2356]*y_cur[IDX_HII]*y_cur[IDX_OCSI] + - k[2552]*y_cur[IDX_H2OI]*y_cur[IDX_HOCSII] - - k[2732]*y_cur[IDX_H3II]*y_cur[IDX_OCSI] - - k[2982]*y_cur[IDX_HCOII]*y_cur[IDX_OCSI] - - k[3293]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - - k[3294]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - - k[3295]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - - k[3296]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - - k[3359]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - - k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - - k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - - k[3649]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - - k[3813]*y_cur[IDX_PII]*y_cur[IDX_OCSI] - - k[3833]*y_cur[IDX_SII]*y_cur[IDX_OCSI] - - k[3858]*y_cur[IDX_SOII]*y_cur[IDX_OCSI] - - k[3871]*y_cur[IDX_SiII]*y_cur[IDX_OCSI] - - k[4875]*y_cur[IDX_C2I]*y_cur[IDX_OCSI] - - k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] - - k[4980]*y_cur[IDX_CI]*y_cur[IDX_OCSI] - - k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] + - k[5103]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - - k[5197]*y_cur[IDX_HI]*y_cur[IDX_OCSI] + - k[5409]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - - k[5430]*y_cur[IDX_OI]*y_cur[IDX_OCSI] - - k[5431]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + - k[5463]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + - k[5486]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - k[5902]*y_cur[IDX_OCSI] - - k[5903]*y_cur[IDX_OCSI] - k[6240]*y_cur[IDX_OCSI] - - k[6241]*y_cur[IDX_OCSI] + - k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] - - k[7022]*y_cur[IDX_OCSI] + k[7204]*y_cur[IDX_GOCSI] + - k[7386]*y_cur[IDX_GOCSI] + k[7570]*y_cur[IDX_GOCSI] + - k[8696]*y_cur[IDX_GOI]*y_cur[IDX_GCSI] + - k[8714]*y_cur[IDX_GSI]*y_cur[IDX_GCOI]; - ydot[yistart + IDX_OCSII] = 0.0 + - k[189]*y_cur[IDX_CII]*y_cur[IDX_OCSI] + - k[284]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] + - k[314]*y_cur[IDX_CO2II]*y_cur[IDX_OCSI] + - k[407]*y_cur[IDX_HII]*y_cur[IDX_OCSI] + - k[475]*y_cur[IDX_H2OII]*y_cur[IDX_OCSI] - - k[486]*y_cur[IDX_H2SI]*y_cur[IDX_OCSII] + - k[562]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + - k[571]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - - k[612]*y_cur[IDX_NH3I]*y_cur[IDX_OCSII] + - k[663]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - - k[1177]*y_cur[IDX_OCSII]*y_cur[IDX_eM] - - k[1178]*y_cur[IDX_OCSII]*y_cur[IDX_eM] - - k[1179]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + - k[3672]*y_cur[IDX_O2I]*y_cur[IDX_CSII] + - k[3738]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + k[5902]*y_cur[IDX_OCSI] + - k[6240]*y_cur[IDX_OCSI] - k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] - - k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] - - k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM]; + k[1464]*y_cur[IDX_C2I]*y_cur[IDX_SII] - + k[1465]*y_cur[IDX_C2I]*y_cur[IDX_SiOII] + + k[1469]*y_cur[IDX_C2HII]*y_cur[IDX_H2COI] + + k[1472]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + + k[1476]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + + k[1478]*y_cur[IDX_C2HII]*y_cur[IDX_HNCI] + + k[1743]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - + k[1933]*y_cur[IDX_CHII]*y_cur[IDX_C2I] + + k[1996]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - + k[2041]*y_cur[IDX_CH3II]*y_cur[IDX_C2I] - + k[2217]*y_cur[IDX_CH5II]*y_cur[IDX_C2I] + + k[2240]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] - + k[2369]*y_cur[IDX_H2II]*y_cur[IDX_C2I] - + k[2503]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] - + k[2586]*y_cur[IDX_H3II]*y_cur[IDX_C2I] - + k[2766]*y_cur[IDX_H3OII]*y_cur[IDX_C2I] + + k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + + k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] + + k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + + k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + + k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + + k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] + + k[3117]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + + k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + + k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + + k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + + k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + + k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + + k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + + k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + + k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + + k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + + k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + + k[3307]*y_cur[IDX_HeII]*y_cur[IDX_SiC2I] + + k[3392]*y_cur[IDX_NI]*y_cur[IDX_C3M] + + k[3398]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] + + k[3409]*y_cur[IDX_NI]*y_cur[IDX_C5M] + + k[3426]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3477]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - + k[3478]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - + k[3479]*y_cur[IDX_NHII]*y_cur[IDX_C2I] - + k[3507]*y_cur[IDX_NH2II]*y_cur[IDX_C2I] + + k[3529]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] - + k[3548]*y_cur[IDX_NH3II]*y_cur[IDX_C2I] + + k[3554]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] - + k[3631]*y_cur[IDX_OII]*y_cur[IDX_C2I] - + k[3769]*y_cur[IDX_OHII]*y_cur[IDX_C2I] + + k[3991]*y_cur[IDX_C2M]*y_cur[IDX_CII] + + k[3992]*y_cur[IDX_C2M]*y_cur[IDX_C2H2II] + + k[3993]*y_cur[IDX_C2M]*y_cur[IDX_C2H3II] + + k[3994]*y_cur[IDX_C2M]*y_cur[IDX_C4H2II] + + k[3995]*y_cur[IDX_C2M]*y_cur[IDX_C4H3II] + + k[3996]*y_cur[IDX_C2M]*y_cur[IDX_C4SII] + + k[3997]*y_cur[IDX_C2M]*y_cur[IDX_CH2CCHII] + + k[3998]*y_cur[IDX_C2M]*y_cur[IDX_CH3II] + + k[3999]*y_cur[IDX_C2M]*y_cur[IDX_CNCII] + + k[4000]*y_cur[IDX_C2M]*y_cur[IDX_FeII] + + k[4001]*y_cur[IDX_C2M]*y_cur[IDX_HII] + + k[4002]*y_cur[IDX_C2M]*y_cur[IDX_H2COII] + + k[4003]*y_cur[IDX_C2M]*y_cur[IDX_H2SII] + + k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] + + k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] + + k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] + + k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + + k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + + k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + + k[4010]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + + k[4011]*y_cur[IDX_C2M]*y_cur[IDX_HeII] + + k[4012]*y_cur[IDX_C2M]*y_cur[IDX_MgII] + + k[4013]*y_cur[IDX_C2M]*y_cur[IDX_NII] + + k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] + + k[4015]*y_cur[IDX_C2M]*y_cur[IDX_NH3II] + + k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] + + k[4017]*y_cur[IDX_C2M]*y_cur[IDX_NOII] + + k[4018]*y_cur[IDX_C2M]*y_cur[IDX_NaII] + + k[4019]*y_cur[IDX_C2M]*y_cur[IDX_OII] + + k[4020]*y_cur[IDX_C2M]*y_cur[IDX_SII] + + k[4021]*y_cur[IDX_C2M]*y_cur[IDX_SOII] + + k[4022]*y_cur[IDX_C2M]*y_cur[IDX_SiII] + + k[4023]*y_cur[IDX_C2M]*y_cur[IDX_SiOII] + + k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] + + k[4025]*y_cur[IDX_C2M]*y_cur[IDX_SiSII] - + k[4867]*y_cur[IDX_C2I]*y_cur[IDX_C2H2I] - + k[4868]*y_cur[IDX_C2I]*y_cur[IDX_C2H4I] - + k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] - + k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] - + k[4871]*y_cur[IDX_C2I]*y_cur[IDX_CH4I] - + k[4872]*y_cur[IDX_C2I]*y_cur[IDX_C4H2I] - + k[4873]*y_cur[IDX_C2I]*y_cur[IDX_HCNI] - + k[4874]*y_cur[IDX_C2I]*y_cur[IDX_O2I] - + k[4875]*y_cur[IDX_C2I]*y_cur[IDX_OCSI] - + k[4876]*y_cur[IDX_C2I]*y_cur[IDX_SI] + + k[4917]*y_cur[IDX_CI]*y_cur[IDX_C2NI] + + k[4918]*y_cur[IDX_CI]*y_cur[IDX_C2OI] + + k[4923]*y_cur[IDX_CI]*y_cur[IDX_C4I] + + k[4930]*y_cur[IDX_CI]*y_cur[IDX_C6I] + + k[4938]*y_cur[IDX_CI]*y_cur[IDX_C8I] + + k[4955]*y_cur[IDX_CI]*y_cur[IDX_CHI] + + k[4956]*y_cur[IDX_CI]*y_cur[IDX_CNI] + + k[4957]*y_cur[IDX_CI]*y_cur[IDX_COI] + + k[4958]*y_cur[IDX_CI]*y_cur[IDX_CSI] + + k[5113]*y_cur[IDX_CNI]*y_cur[IDX_CNI] - + k[5153]*y_cur[IDX_HI]*y_cur[IDX_C2I] - + k[5222]*y_cur[IDX_NI]*y_cur[IDX_C2I] + + k[5231]*y_cur[IDX_NI]*y_cur[IDX_C3I] - + k[5343]*y_cur[IDX_OI]*y_cur[IDX_C2I] + + k[5356]*y_cur[IDX_OI]*y_cur[IDX_C3I] - + k[5521]*y_cur[IDX_CI]*y_cur[IDX_C2I] + + k[5523]*y_cur[IDX_CI]*y_cur[IDX_CI] - + k[5589]*y_cur[IDX_C2I]*y_cur[IDX_eM] + k[5693]*y_cur[IDX_C2M] - + k[5694]*y_cur[IDX_C2I] + k[5708]*y_cur[IDX_C2HI] + + k[5710]*y_cur[IDX_C2NI] + k[5712]*y_cur[IDX_C2OI] + + k[5715]*y_cur[IDX_C2SI] + k[5717]*y_cur[IDX_C3I] + + k[5722]*y_cur[IDX_C3NI] + k[5723]*y_cur[IDX_C3OI] + + k[5725]*y_cur[IDX_C3SI] + k[5727]*y_cur[IDX_C4I] + + k[5727]*y_cur[IDX_C4I] + k[5731]*y_cur[IDX_C4HI] + + k[5737]*y_cur[IDX_C5I] + k[5743]*y_cur[IDX_C5HI] + + k[5773]*y_cur[IDX_CCPI] + k[5923]*y_cur[IDX_SiC4I] + + k[5953]*y_cur[IDX_C10I] + k[5954]*y_cur[IDX_C10I] + + k[5967]*y_cur[IDX_C10HI] + k[5974]*y_cur[IDX_C11I] + + k[5976]*y_cur[IDX_C2M] - k[5977]*y_cur[IDX_C2I] - + k[5978]*y_cur[IDX_C2I] + k[5993]*y_cur[IDX_C2HI] + + k[5995]*y_cur[IDX_C2NI] + k[5997]*y_cur[IDX_C2OI] + + k[5999]*y_cur[IDX_C2SI] + k[6001]*y_cur[IDX_C3I] + + k[6006]*y_cur[IDX_C3NI] + k[6007]*y_cur[IDX_C3OI] + + k[6008]*y_cur[IDX_C3PI] + k[6009]*y_cur[IDX_C3SI] + + k[6011]*y_cur[IDX_C4I] + k[6011]*y_cur[IDX_C4I] + + k[6016]*y_cur[IDX_C4HI] + k[6023]*y_cur[IDX_C5I] + + k[6028]*y_cur[IDX_C5HI] + k[6070]*y_cur[IDX_CCPI] + + k[6260]*y_cur[IDX_SiC2I] + k[6263]*y_cur[IDX_SiC3I] + + k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + + k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM] + + k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + + k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + + k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + + k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + + k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + + k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM] + + k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + + k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + + k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM] + + k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + + k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + + k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM] + + k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + + k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] + + k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + + k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + + k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM] + + k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + + k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + + k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + + k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + + k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + + k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM] + + k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + + k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + + k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM] + + k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - k[6907]*y_cur[IDX_C2I] + + k[7089]*y_cur[IDX_GC2I] + k[7271]*y_cur[IDX_GC2I] + + k[7453]*y_cur[IDX_GC2I] + k[8654]*y_cur[IDX_GCI]*y_cur[IDX_GCI]; ydot[yistart + IDX_OHI] = 0.0 - k[9]*y_cur[IDX_CM]*y_cur[IDX_OHI] + k[80]*y_cur[IDX_HM]*y_cur[IDX_OI] - k[81]*y_cur[IDX_HM]*y_cur[IDX_OHI] + @@ -27955,2350 +19877,8333 @@ __global__ void FexKernel(realtype *y, realtype *ydot, NaunetData *d_udata, k[6757]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - k[6901]*y_cur[IDX_OHI] + k[7083]*y_cur[IDX_GOHI] + k[7265]*y_cur[IDX_GOHI] + k[7447]*y_cur[IDX_GOHI] + k[8583]*y_cur[IDX_GHI]*y_cur[IDX_GOI]; - ydot[yistart + IDX_OHII] = 0.0 - - k[268]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - - k[297]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + - k[408]*y_cur[IDX_HII]*y_cur[IDX_OHI] + - k[456]*y_cur[IDX_H2II]*y_cur[IDX_OHI] + - k[563]*y_cur[IDX_NII]*y_cur[IDX_OHI] - - k[591]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] + - k[664]*y_cur[IDX_OII]*y_cur[IDX_OHI] - - k[685]*y_cur[IDX_OHII]*y_cur[IDX_C2I] - - k[686]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] - - k[687]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[688]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] - - k[689]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] - - k[690]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] - - k[691]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - - k[692]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] - - k[693]*y_cur[IDX_OHII]*y_cur[IDX_NOI] - - k[694]*y_cur[IDX_OHII]*y_cur[IDX_O2I] - - k[695]*y_cur[IDX_OHII]*y_cur[IDX_SI] + - k[697]*y_cur[IDX_OHI]*y_cur[IDX_C2II] + - k[698]*y_cur[IDX_OHI]*y_cur[IDX_CNII] + - k[699]*y_cur[IDX_OHI]*y_cur[IDX_COII] + - k[700]*y_cur[IDX_OHI]*y_cur[IDX_N2II] - - k[1180]*y_cur[IDX_OHII]*y_cur[IDX_eM] - - k[1914]*y_cur[IDX_CI]*y_cur[IDX_OHII] - - k[2016]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - - k[2209]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - - k[2210]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] - - k[2264]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + - k[2396]*y_cur[IDX_H2II]*y_cur[IDX_OI] + - k[2466]*y_cur[IDX_H2I]*y_cur[IDX_OII] - - k[2469]*y_cur[IDX_H2I]*y_cur[IDX_OHII] + - k[2731]*y_cur[IDX_H3II]*y_cur[IDX_OI] + - k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + - k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - - k[3467]*y_cur[IDX_NI]*y_cur[IDX_OHII] + - k[3503]*y_cur[IDX_NHII]*y_cur[IDX_OI] - - k[3547]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] - - k[3623]*y_cur[IDX_NHI]*y_cur[IDX_OHII] + - k[3646]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + - k[3745]*y_cur[IDX_OI]*y_cur[IDX_N2HII] + - k[3749]*y_cur[IDX_OI]*y_cur[IDX_O2HII] - - k[3750]*y_cur[IDX_OI]*y_cur[IDX_OHII] - - k[3769]*y_cur[IDX_OHII]*y_cur[IDX_C2I] - - k[3770]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] - - k[3771]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[3772]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[3774]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] - - k[3775]*y_cur[IDX_OHII]*y_cur[IDX_CNI] - - k[3776]*y_cur[IDX_OHII]*y_cur[IDX_CO2I] - - k[3777]*y_cur[IDX_OHII]*y_cur[IDX_COI] - - k[3778]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] - - k[3779]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] - - k[3780]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] - - k[3781]*y_cur[IDX_OHII]*y_cur[IDX_HCNI] - - k[3782]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - - k[3783]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - - k[3784]*y_cur[IDX_OHII]*y_cur[IDX_HNCI] - - k[3785]*y_cur[IDX_OHII]*y_cur[IDX_N2I] - - k[3786]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] - - k[3787]*y_cur[IDX_OHII]*y_cur[IDX_NOI] - - k[3788]*y_cur[IDX_OHII]*y_cur[IDX_OHI] - - k[3789]*y_cur[IDX_OHII]*y_cur[IDX_SI] - - k[3790]*y_cur[IDX_OHII]*y_cur[IDX_SI] - - k[3791]*y_cur[IDX_OHII]*y_cur[IDX_SiI] - - k[3792]*y_cur[IDX_OHII]*y_cur[IDX_SiCI] - - k[3793]*y_cur[IDX_OHII]*y_cur[IDX_SiHI] - - k[3794]*y_cur[IDX_OHII]*y_cur[IDX_SiOI] + - k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + - k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + - k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + - k[6157]*y_cur[IDX_H2OII] - k[6242]*y_cur[IDX_OHII] + - k[6245]*y_cur[IDX_OHI] - k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_OHM] = 0.0 - k[57]*y_cur[IDX_CI]*y_cur[IDX_OHM] - - k[61]*y_cur[IDX_CH3I]*y_cur[IDX_OHM] - - k[64]*y_cur[IDX_CHI]*y_cur[IDX_OHM] - - k[108]*y_cur[IDX_HI]*y_cur[IDX_OHM] - - k[696]*y_cur[IDX_OHM]*y_cur[IDX_CNI] + - k[2367]*y_cur[IDX_HM]*y_cur[IDX_H2OI] + - k[2467]*y_cur[IDX_H2I]*y_cur[IDX_OM] + - k[3652]*y_cur[IDX_OM]*y_cur[IDX_CH4I] - - k[3795]*y_cur[IDX_OHM]*y_cur[IDX_HCNI] - - k[4797]*y_cur[IDX_OHM]*y_cur[IDX_CII] - - k[4798]*y_cur[IDX_OHM]*y_cur[IDX_C2H2II] - - k[4799]*y_cur[IDX_OHM]*y_cur[IDX_C2H3II] - - k[4800]*y_cur[IDX_OHM]*y_cur[IDX_C4H2II] - - k[4801]*y_cur[IDX_OHM]*y_cur[IDX_C4H3II] - - k[4802]*y_cur[IDX_OHM]*y_cur[IDX_C4SII] - - k[4803]*y_cur[IDX_OHM]*y_cur[IDX_CH2CCHII] - - k[4804]*y_cur[IDX_OHM]*y_cur[IDX_CH3II] - - k[4805]*y_cur[IDX_OHM]*y_cur[IDX_CNCII] - - k[4806]*y_cur[IDX_OHM]*y_cur[IDX_FeII] - - k[4807]*y_cur[IDX_OHM]*y_cur[IDX_HII] - - k[4808]*y_cur[IDX_OHM]*y_cur[IDX_H2COII] - - k[4809]*y_cur[IDX_OHM]*y_cur[IDX_H2SII] - - k[4810]*y_cur[IDX_OHM]*y_cur[IDX_H3II] - - k[4811]*y_cur[IDX_OHM]*y_cur[IDX_H3OII] - - k[4812]*y_cur[IDX_OHM]*y_cur[IDX_HC2SII] - - k[4813]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] - - k[4814]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] - - k[4815]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] - - k[4816]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] - - k[4817]*y_cur[IDX_OHM]*y_cur[IDX_HeII] - - k[4818]*y_cur[IDX_OHM]*y_cur[IDX_MgII] - - k[4819]*y_cur[IDX_OHM]*y_cur[IDX_NII] - - k[4820]*y_cur[IDX_OHM]*y_cur[IDX_N2HII] - - k[4821]*y_cur[IDX_OHM]*y_cur[IDX_NH3II] - - k[4822]*y_cur[IDX_OHM]*y_cur[IDX_NH4II] - - k[4823]*y_cur[IDX_OHM]*y_cur[IDX_NOII] - - k[4824]*y_cur[IDX_OHM]*y_cur[IDX_NaII] - - k[4825]*y_cur[IDX_OHM]*y_cur[IDX_OII] - - k[4826]*y_cur[IDX_OHM]*y_cur[IDX_SII] - - k[4827]*y_cur[IDX_OHM]*y_cur[IDX_SOII] - - k[4828]*y_cur[IDX_OHM]*y_cur[IDX_SiII] - - k[4829]*y_cur[IDX_OHM]*y_cur[IDX_SiOII] - - k[4830]*y_cur[IDX_OHM]*y_cur[IDX_SiOHII] - - k[4831]*y_cur[IDX_OHM]*y_cur[IDX_SiSII] - k[5904]*y_cur[IDX_OHM] - - k[6243]*y_cur[IDX_OHM]; - ydot[yistart + IDX_PI] = 0.0 - k[190]*y_cur[IDX_CII]*y_cur[IDX_PI] - - k[409]*y_cur[IDX_HII]*y_cur[IDX_PI] - - k[526]*y_cur[IDX_HeII]*y_cur[IDX_PI] + - k[613]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + - k[701]*y_cur[IDX_PII]*y_cur[IDX_H2SI] + - k[723]*y_cur[IDX_SiI]*y_cur[IDX_PII] + - k[903]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + - k[984]*y_cur[IDX_CPII]*y_cur[IDX_eM] + - k[1106]*y_cur[IDX_HCPII]*y_cur[IDX_eM] + - k[1132]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + - k[1135]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + - k[1183]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + - k[1189]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + - k[1201]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + - k[1204]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + - k[1205]*y_cur[IDX_PHII]*y_cur[IDX_eM] + - k[1206]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + - k[1207]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + - k[1211]*y_cur[IDX_PNII]*y_cur[IDX_eM] + - k[1212]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + - k[1215]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + - k[1218]*y_cur[IDX_POII]*y_cur[IDX_eM] + - k[1315]*y_cur[IDX_CII]*y_cur[IDX_C3PI] + - k[1321]*y_cur[IDX_CII]*y_cur[IDX_C4PI] - + ydot[yistart + IDX_NH3I] = 0.0 + k[78]*y_cur[IDX_HM]*y_cur[IDX_NH2I] + - k[185]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - + k[253]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - + k[282]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] - + k[401]*y_cur[IDX_HII]*y_cur[IDX_NH3I] - + k[452]*y_cur[IDX_H2II]*y_cur[IDX_NH3I] - + k[524]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - + k[558]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - + k[576]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] - + k[582]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] + + k[592]*y_cur[IDX_NH3II]*y_cur[IDX_FeI] + + k[593]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + + k[594]*y_cur[IDX_NH3II]*y_cur[IDX_MgI] + + k[595]*y_cur[IDX_NH3II]*y_cur[IDX_NOI] + + k[596]*y_cur[IDX_NH3II]*y_cur[IDX_NaI] + + k[597]*y_cur[IDX_NH3II]*y_cur[IDX_SiI] - + k[598]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - + k[599]*y_cur[IDX_NH3I]*y_cur[IDX_C2H4II] - + k[600]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - + k[601]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] - + k[602]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - + k[603]*y_cur[IDX_NH3I]*y_cur[IDX_CO2II] - + k[604]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - + k[605]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] - + k[606]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] - + k[607]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NII] - + k[608]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - + k[609]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] - + k[610]*y_cur[IDX_NH3I]*y_cur[IDX_N2II] - + k[611]*y_cur[IDX_NH3I]*y_cur[IDX_O2II] - + k[612]*y_cur[IDX_NH3I]*y_cur[IDX_OCSII] - + k[613]*y_cur[IDX_NH3I]*y_cur[IDX_PII] - + k[614]*y_cur[IDX_NH3I]*y_cur[IDX_SII] - + k[615]*y_cur[IDX_NH3I]*y_cur[IDX_SOII] - + k[661]*y_cur[IDX_OII]*y_cur[IDX_NH3I] - + k[692]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] + + k[1167]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + + k[1215]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - + k[1418]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - + k[1419]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - + k[1818]*y_cur[IDX_C3H7II]*y_cur[IDX_NH3I] - + k[1963]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - + k[1964]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] - + k[1988]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] - + k[1989]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] - + k[2087]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - + k[2088]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - + k[2121]*y_cur[IDX_CH3OH2II]*y_cur[IDX_NH3I] - + k[2144]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] - + k[2723]*y_cur[IDX_H3II]*y_cur[IDX_NH3I] - + k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - + k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - + k[3353]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - + k[3354]*y_cur[IDX_NII]*y_cur[IDX_NH3I] - + k[3498]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + + k[3516]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - + k[3523]*y_cur[IDX_NH2II]*y_cur[IDX_NH3I] - + k[3553]*y_cur[IDX_NH3II]*y_cur[IDX_NH3I] - + k[3554]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] - + k[3555]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] - + k[3556]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - + k[3557]*y_cur[IDX_NH3I]*y_cur[IDX_C2H3II] - + k[3558]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5II] - + k[3559]*y_cur[IDX_NH3I]*y_cur[IDX_C2H5OH2II] - + k[3560]*y_cur[IDX_NH3I]*y_cur[IDX_C2H7II] - + k[3561]*y_cur[IDX_NH3I]*y_cur[IDX_C2NII] - + k[3562]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - + k[3563]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - + k[3564]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - + k[3565]*y_cur[IDX_NH3I]*y_cur[IDX_C3H3II] - + k[3566]*y_cur[IDX_NH3I]*y_cur[IDX_CClII] - + k[3567]*y_cur[IDX_NH3I]*y_cur[IDX_CH2CHCNHII] - + k[3568]*y_cur[IDX_NH3I]*y_cur[IDX_C2H6II] - + k[3569]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - + k[3570]*y_cur[IDX_NH3I]*y_cur[IDX_CH3CHOHII] - + k[3571]*y_cur[IDX_NH3I]*y_cur[IDX_CH5II] - + k[3572]*y_cur[IDX_NH3I]*y_cur[IDX_CNCII] - + k[3573]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - + k[3574]*y_cur[IDX_NH3I]*y_cur[IDX_H2COII] - + k[3575]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] - + k[3576]*y_cur[IDX_NH3I]*y_cur[IDX_H2SII] - + k[3577]*y_cur[IDX_NH3I]*y_cur[IDX_H3COII] - + k[3578]*y_cur[IDX_NH3I]*y_cur[IDX_H3OII] - + k[3579]*y_cur[IDX_NH3I]*y_cur[IDX_H3SII] - + k[3580]*y_cur[IDX_NH3I]*y_cur[IDX_HC3NHII] - + k[3581]*y_cur[IDX_NH3I]*y_cur[IDX_HCNII] - + k[3582]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] - + k[3583]*y_cur[IDX_NH3I]*y_cur[IDX_HCNHII] - + k[3584]*y_cur[IDX_NH3I]*y_cur[IDX_HCOII] - + k[3585]*y_cur[IDX_NH3I]*y_cur[IDX_HCO2II] - + k[3586]*y_cur[IDX_NH3I]*y_cur[IDX_HCOOH2II] - + k[3587]*y_cur[IDX_NH3I]*y_cur[IDX_HCSII] - + k[3588]*y_cur[IDX_NH3I]*y_cur[IDX_HNOII] - + k[3589]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] - + k[3590]*y_cur[IDX_NH3I]*y_cur[IDX_HSO2II] - + k[3591]*y_cur[IDX_NH3I]*y_cur[IDX_HSiSII] - + k[3592]*y_cur[IDX_NH3I]*y_cur[IDX_N2HII] - + k[3593]*y_cur[IDX_NH3I]*y_cur[IDX_NCCNHII] - + k[3594]*y_cur[IDX_NH3I]*y_cur[IDX_O2HII] - + k[3595]*y_cur[IDX_NH3I]*y_cur[IDX_PII] - + k[3596]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - + k[3597]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - + k[3598]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - + k[3599]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - + k[3600]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - + k[3601]*y_cur[IDX_NH3I]*y_cur[IDX_PH3II] - + k[3602]*y_cur[IDX_NH3I]*y_cur[IDX_SiII] - + k[3603]*y_cur[IDX_NH3I]*y_cur[IDX_SiHII] - + k[3604]*y_cur[IDX_NH3I]*y_cur[IDX_SiOHII] - + k[3786]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] + + k[3910]*y_cur[IDX_CM]*y_cur[IDX_NH3II] + + k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] + + k[3945]*y_cur[IDX_C10M]*y_cur[IDX_NH3II] + + k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] + + k[3980]*y_cur[IDX_C10HM]*y_cur[IDX_NH3II] + + k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] + + k[4015]*y_cur[IDX_C2M]*y_cur[IDX_NH3II] + + k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] + + k[4050]*y_cur[IDX_C2HM]*y_cur[IDX_NH3II] + + k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] + + k[4085]*y_cur[IDX_C3M]*y_cur[IDX_NH3II] + + k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] + + k[4120]*y_cur[IDX_C3HM]*y_cur[IDX_NH3II] + + k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] + + k[4155]*y_cur[IDX_C3NM]*y_cur[IDX_NH3II] + + k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] + + k[4190]*y_cur[IDX_C4M]*y_cur[IDX_NH3II] + + k[4191]*y_cur[IDX_C4M]*y_cur[IDX_NH4II] + + k[4225]*y_cur[IDX_C4HM]*y_cur[IDX_NH3II] + + k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] + + k[4260]*y_cur[IDX_C5M]*y_cur[IDX_NH3II] + + k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] + + k[4295]*y_cur[IDX_C5HM]*y_cur[IDX_NH3II] + + k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] + + k[4330]*y_cur[IDX_C5NM]*y_cur[IDX_NH3II] + + k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] + + k[4365]*y_cur[IDX_C6M]*y_cur[IDX_NH3II] + + k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] + + k[4400]*y_cur[IDX_C6HM]*y_cur[IDX_NH3II] + + k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] + + k[4435]*y_cur[IDX_C7M]*y_cur[IDX_NH3II] + + k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] + + k[4470]*y_cur[IDX_C7HM]*y_cur[IDX_NH3II] + + k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] + + k[4505]*y_cur[IDX_C8M]*y_cur[IDX_NH3II] + + k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] + + k[4540]*y_cur[IDX_C8HM]*y_cur[IDX_NH3II] + + k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] + + k[4575]*y_cur[IDX_C9M]*y_cur[IDX_NH3II] + + k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] + + k[4610]*y_cur[IDX_C9HM]*y_cur[IDX_NH3II] + + k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] + + k[4645]*y_cur[IDX_CHM]*y_cur[IDX_NH3II] + + k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] + + k[4680]*y_cur[IDX_CNM]*y_cur[IDX_NH3II] + + k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] + + k[4716]*y_cur[IDX_HM]*y_cur[IDX_NH3II] + + k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] + + k[4751]*y_cur[IDX_OM]*y_cur[IDX_NH3II] + + k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] + + k[4786]*y_cur[IDX_O2M]*y_cur[IDX_NH3II] + + k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] + + k[4821]*y_cur[IDX_OHM]*y_cur[IDX_NH3II] + + k[4822]*y_cur[IDX_OHM]*y_cur[IDX_NH4II] + + k[4856]*y_cur[IDX_SM]*y_cur[IDX_NH3II] + + k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] - + k[5036]*y_cur[IDX_CH3I]*y_cur[IDX_NH3I] - + k[5082]*y_cur[IDX_CHI]*y_cur[IDX_NH3I] + + k[5142]*y_cur[IDX_H2I]*y_cur[IDX_NH2I] - + k[5183]*y_cur[IDX_HI]*y_cur[IDX_NH3I] + + k[5297]*y_cur[IDX_NH2I]*y_cur[IDX_CH4I] + + k[5301]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] - + k[5302]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - + k[5303]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - + k[5307]*y_cur[IDX_NHI]*y_cur[IDX_NH3I] - + k[5422]*y_cur[IDX_OI]*y_cur[IDX_NH3I] - + k[5476]*y_cur[IDX_OHI]*y_cur[IDX_NH3I] - k[5885]*y_cur[IDX_NH3I] - + k[5886]*y_cur[IDX_NH3I] - k[5887]*y_cur[IDX_NH3I] - + k[6221]*y_cur[IDX_NH3I] - k[6222]*y_cur[IDX_NH3I] - + k[6223]*y_cur[IDX_NH3I] + k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - + k[6900]*y_cur[IDX_NH3I] + k[7082]*y_cur[IDX_GNH3I] + + k[7264]*y_cur[IDX_GNH3I] + k[7446]*y_cur[IDX_GNH3I] + + k[8582]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I]; + ydot[yistart + IDX_C2H2II] = 0.0 - + k[214]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - + k[215]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - + k[216]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - + k[217]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - + k[218]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - + k[219]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - + k[220]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - + k[221]*y_cur[IDX_C2H2II]*y_cur[IDX_FeI] - + k[222]*y_cur[IDX_C2H2II]*y_cur[IDX_H2COI] - + k[223]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - + k[224]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - + k[225]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] - + k[226]*y_cur[IDX_C2H2II]*y_cur[IDX_NOI] + + k[228]*y_cur[IDX_C2H2I]*y_cur[IDX_CO2II] + + k[229]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] + + k[230]*y_cur[IDX_C2H2I]*y_cur[IDX_HCNII] + + k[277]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + + k[324]*y_cur[IDX_HII]*y_cur[IDX_C2H2I] + + k[437]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + + k[463]*y_cur[IDX_H2OII]*y_cur[IDX_C2H2I] + + k[509]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - + k[529]*y_cur[IDX_MgI]*y_cur[IDX_C2H2II] - + k[598]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - + k[632]*y_cur[IDX_NaI]*y_cur[IDX_C2H2II] + + k[647]*y_cur[IDX_OII]*y_cur[IDX_C2H2I] + + k[668]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - + k[742]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] - + k[743]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] - + k[744]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + + k[1343]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + + k[1353]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + + k[1363]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + + k[1367]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1373]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1383]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + + k[1474]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + + k[1477]*y_cur[IDX_C2HII]*y_cur[IDX_HCOI] - + k[1479]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - + k[1480]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - + k[1481]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - + k[1482]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] - + k[1483]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - + k[1484]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] - + k[1485]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] - + k[1486]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] - + k[1487]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] - + k[1488]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] - + k[1489]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] - + k[1490]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] - + k[1491]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - + k[1492]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] - + k[1493]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - + k[1494]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] - + k[1495]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - + k[1496]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] - + k[1497]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] - + k[1498]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] - + k[1499]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - + k[1500]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] - + k[1501]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] - + k[1502]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] - + k[1503]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] - + k[1504]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] - + k[1505]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - + k[1506]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] - + k[1507]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - + k[1508]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] - + k[1509]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - + k[1510]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] - + k[1511]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - + k[1512]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] - + k[1513]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - + k[1514]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - + k[1515]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] - + k[1516]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] - + k[1517]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] - + k[1518]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - + k[1519]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] - + k[1520]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - + k[1521]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] - + k[1522]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] - + k[1523]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] - + k[1524]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] - + k[1525]*y_cur[IDX_C2H2II]*y_cur[IDX_HNCI] - k[1526]*y_cur[IDX_C2H2II]*y_cur[IDX_PI] - - k[2094]*y_cur[IDX_CH3II]*y_cur[IDX_PI] + - k[2566]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - - k[2734]*y_cur[IDX_H3II]*y_cur[IDX_PI] - - k[2815]*y_cur[IDX_H3OII]*y_cur[IDX_PI] + - k[2884]*y_cur[IDX_HCNI]*y_cur[IDX_PHII] - - k[2983]*y_cur[IDX_HCOII]*y_cur[IDX_PI] + - k[3101]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + - k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + - k[3596]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - - k[3814]*y_cur[IDX_PI]*y_cur[IDX_C3H2II] - - k[3815]*y_cur[IDX_PI]*y_cur[IDX_C4H2II] + - k[3817]*y_cur[IDX_PHII]*y_cur[IDX_H2SI] + - k[5286]*y_cur[IDX_NI]*y_cur[IDX_PNI] + - k[5287]*y_cur[IDX_NI]*y_cur[IDX_POI] + - k[5391]*y_cur[IDX_OI]*y_cur[IDX_CPI] - - k[5484]*y_cur[IDX_PI]*y_cur[IDX_O2I] - - k[5527]*y_cur[IDX_CI]*y_cur[IDX_PI] + - k[5624]*y_cur[IDX_PII]*y_cur[IDX_eM] + k[5773]*y_cur[IDX_CCPI] + - k[5827]*y_cur[IDX_CPI] - k[5906]*y_cur[IDX_PI] + - k[5908]*y_cur[IDX_PHI] + k[5909]*y_cur[IDX_PNI] + - k[5910]*y_cur[IDX_POI] + k[6070]*y_cur[IDX_CCPI] + - k[6139]*y_cur[IDX_CPI] - k[6246]*y_cur[IDX_PI] + - k[6249]*y_cur[IDX_PHI] + k[6250]*y_cur[IDX_PNI] + - k[6251]*y_cur[IDX_POI] + k[6421]*y_cur[IDX_PII]*y_cur[IDX_GRAINM] + - k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM] + - k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM] + - k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + - k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM] + - k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + - k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + - k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + - k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + - k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM] + - k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + - k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + - k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + - k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - k[6928]*y_cur[IDX_PI] - + k[7110]*y_cur[IDX_GPI] + k[7292]*y_cur[IDX_GPI] + - k[7474]*y_cur[IDX_GPI]; - ydot[yistart + IDX_PII] = 0.0 + k[190]*y_cur[IDX_CII]*y_cur[IDX_PI] - + k[409]*y_cur[IDX_HII]*y_cur[IDX_PI] + - k[526]*y_cur[IDX_HeII]*y_cur[IDX_PI] - - k[613]*y_cur[IDX_NH3I]*y_cur[IDX_PII] - - k[701]*y_cur[IDX_PII]*y_cur[IDX_H2SI] - - k[723]*y_cur[IDX_SiI]*y_cur[IDX_PII] - - k[1569]*y_cur[IDX_C2H2I]*y_cur[IDX_PII] - - k[1710]*y_cur[IDX_C2H4I]*y_cur[IDX_PII] - - k[2211]*y_cur[IDX_CH4I]*y_cur[IDX_PII] - - k[2562]*y_cur[IDX_H2OI]*y_cur[IDX_PII] - - k[2563]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + - k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + - k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + - k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + - k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + - k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] + - k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] + - k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] + - k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] - - k[3595]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + - k[3731]*y_cur[IDX_OI]*y_cur[IDX_CPII] - - k[3807]*y_cur[IDX_OHI]*y_cur[IDX_PII] - - k[3810]*y_cur[IDX_PII]*y_cur[IDX_CH3OHI] - - k[3811]*y_cur[IDX_PII]*y_cur[IDX_CO2I] - - k[3812]*y_cur[IDX_PII]*y_cur[IDX_O2I] - - k[3813]*y_cur[IDX_PII]*y_cur[IDX_OCSI] - - k[5559]*y_cur[IDX_H2I]*y_cur[IDX_PII] - - k[5624]*y_cur[IDX_PII]*y_cur[IDX_eM] + k[5906]*y_cur[IDX_PI] + - k[6246]*y_cur[IDX_PI] - k[6421]*y_cur[IDX_PII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PC2H2II] = 0.0 - - k[1181]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] - - k[1182]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] - - k[1183]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + - k[1570]*y_cur[IDX_C2H2I]*y_cur[IDX_PHII] + - k[1571]*y_cur[IDX_C2H2I]*y_cur[IDX_PH2II] + - k[1710]*y_cur[IDX_C2H4I]*y_cur[IDX_PII] + - k[2688]*y_cur[IDX_H3II]*y_cur[IDX_HC2PI] + - k[2803]*y_cur[IDX_H3OII]*y_cur[IDX_HC2PI] + - k[2963]*y_cur[IDX_HCOII]*y_cur[IDX_HC2PI] - - k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - - k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - - k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PC2H3II] = 0.0 - - k[1184]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] - - k[1185]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] - - k[1186]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + - k[1572]*y_cur[IDX_C2H2I]*y_cur[IDX_PH3II] + - k[1711]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - - k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - - k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - - k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PC2H4II] = 0.0 - - k[1187]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] - - k[1188]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] - - k[1189]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + - k[1713]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - - k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - - k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - - k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PC3HII] = 0.0 - - k[1190]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] - - k[1191]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] - - k[1192]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + - k[2606]*y_cur[IDX_H3II]*y_cur[IDX_C3PI] + - k[2776]*y_cur[IDX_H3OII]*y_cur[IDX_C3PI] + - k[2911]*y_cur[IDX_HCOII]*y_cur[IDX_C3PI] + - k[3814]*y_cur[IDX_PI]*y_cur[IDX_C3H2II] - - k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - - k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - - k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PC4HII] = 0.0 - - k[1193]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - - k[1194]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - - k[1195]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] - - k[1196]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + - k[2611]*y_cur[IDX_H3II]*y_cur[IDX_C4PI] + - k[2781]*y_cur[IDX_H3OII]*y_cur[IDX_C4PI] + - k[2916]*y_cur[IDX_HCOII]*y_cur[IDX_C4PI] + - k[3815]*y_cur[IDX_PI]*y_cur[IDX_C4H2II] - - k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - - k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PCH2II] = 0.0 - - k[1197]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] - - k[1198]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + - k[1712]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] + - k[1714]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] + - k[2094]*y_cur[IDX_CH3II]*y_cur[IDX_PI] + - k[2211]*y_cur[IDX_CH4I]*y_cur[IDX_PII] + - k[2451]*y_cur[IDX_H2I]*y_cur[IDX_HCPII] + - k[2701]*y_cur[IDX_H3II]*y_cur[IDX_HCPI] + - k[2808]*y_cur[IDX_H3OII]*y_cur[IDX_HCPI] + - k[2972]*y_cur[IDX_HCOII]*y_cur[IDX_HCPI] - - k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] - - k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PCH3II] = 0.0 - - k[1199]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] - - k[1200]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] - - k[1201]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + - k[2212]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] + - k[2319]*y_cur[IDX_HII]*y_cur[IDX_CH2PHI] - - k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - - k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - - k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PCH4II] = 0.0 - - k[1202]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] - - k[1203]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] - - k[1204]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + - k[2130]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] + - k[2213]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] + - k[2214]*y_cur[IDX_CH4I]*y_cur[IDX_PH2II] + - k[2640]*y_cur[IDX_H3II]*y_cur[IDX_CH2PHI] + - k[2788]*y_cur[IDX_H3OII]*y_cur[IDX_CH2PHI] + - k[2942]*y_cur[IDX_HCOII]*y_cur[IDX_CH2PHI] - - k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - - k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - - k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PHI] = 0.0 - k[191]*y_cur[IDX_CII]*y_cur[IDX_PHI] - - k[411]*y_cur[IDX_HII]*y_cur[IDX_PHI] + - k[1018]*y_cur[IDX_H2POII]*y_cur[IDX_eM] + - k[1133]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + - k[1136]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + - k[1186]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + - k[1208]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + - k[1210]*y_cur[IDX_PH3II]*y_cur[IDX_eM] + - k[1213]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + - k[1216]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + - k[2568]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] - - k[2736]*y_cur[IDX_H3II]*y_cur[IDX_PHI] - - k[2985]*y_cur[IDX_HCOII]*y_cur[IDX_PHI] + - k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + - k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] - - k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] + - k[3599]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] + - k[4964]*y_cur[IDX_CI]*y_cur[IDX_HPOI] - - k[4983]*y_cur[IDX_CI]*y_cur[IDX_PHI] - - k[5285]*y_cur[IDX_NI]*y_cur[IDX_PHI] + - k[5407]*y_cur[IDX_OI]*y_cur[IDX_HCPI] + - k[5434]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - - k[5436]*y_cur[IDX_OI]*y_cur[IDX_PHI] + k[5907]*y_cur[IDX_PH2I] - - k[5908]*y_cur[IDX_PHI] + k[6094]*y_cur[IDX_CH2PHI] + - k[6248]*y_cur[IDX_PH2I] - k[6249]*y_cur[IDX_PHI] + - k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + - k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + - k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + - k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + - k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + - k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + - k[6623]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] + - k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - - k[6933]*y_cur[IDX_PHI] + k[7115]*y_cur[IDX_GPHI] + - k[7297]*y_cur[IDX_GPHI] + k[7479]*y_cur[IDX_GPHI]; - ydot[yistart + IDX_PHII] = 0.0 + - k[191]*y_cur[IDX_CII]*y_cur[IDX_PHI] + - k[411]*y_cur[IDX_HII]*y_cur[IDX_PHI] - - k[1205]*y_cur[IDX_PHII]*y_cur[IDX_eM] - + k[1527]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] - + k[1528]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] - + k[1529]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - + k[1530]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - + k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1532]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1533]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - + k[1534]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + + k[1542]*y_cur[IDX_C2H2I]*y_cur[IDX_C2N2II] - + k[1725]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2II] + + k[1726]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + + k[1744]*y_cur[IDX_C2HI]*y_cur[IDX_H2COII] + + k[1745]*y_cur[IDX_C2HI]*y_cur[IDX_HCNII] + + k[1746]*y_cur[IDX_C2HI]*y_cur[IDX_HCOII] + + k[1747]*y_cur[IDX_C2HI]*y_cur[IDX_HNOII] + + k[1748]*y_cur[IDX_C2HI]*y_cur[IDX_N2HII] + + k[1749]*y_cur[IDX_C2HI]*y_cur[IDX_O2HII] - + k[1850]*y_cur[IDX_CI]*y_cur[IDX_C2H2II] + + k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] - + k[1998]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2II] + + k[2147]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + + k[2151]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] - + k[2154]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] - + k[2155]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + + k[2220]*y_cur[IDX_CH5II]*y_cur[IDX_C2HI] - + k[2242]*y_cur[IDX_CHI]*y_cur[IDX_C2H2II] + + k[2243]*y_cur[IDX_CHI]*y_cur[IDX_CH3II] - + k[2277]*y_cur[IDX_CNI]*y_cur[IDX_C2H2II] + + k[2295]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + + k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + + k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + + k[2373]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] + + k[2402]*y_cur[IDX_H2I]*y_cur[IDX_C2HII] - + k[2403]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] + + k[2445]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] + + k[2504]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] - + k[2522]*y_cur[IDX_H2OI]*y_cur[IDX_C2H2II] + + k[2597]*y_cur[IDX_H3II]*y_cur[IDX_C2HI] + + k[2827]*y_cur[IDX_HI]*y_cur[IDX_C2H3II] + + k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + + k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - + k[3387]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - + k[3388]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - + k[3389]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + + k[3397]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] + + k[3480]*y_cur[IDX_NHII]*y_cur[IDX_C2HI] + + k[3508]*y_cur[IDX_NH2II]*y_cur[IDX_C2HI] - + k[3531]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] - + k[3532]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + + k[3548]*y_cur[IDX_NH3II]*y_cur[IDX_C2I] - + k[3556]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] - + k[3607]*y_cur[IDX_NHI]*y_cur[IDX_C2H2II] + + k[3632]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] - + k[3688]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] - + k[3689]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + + k[3770]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] - + k[3796]*y_cur[IDX_OHI]*y_cur[IDX_C2H2II] - + k[3887]*y_cur[IDX_CM]*y_cur[IDX_C2H2II] - + k[3922]*y_cur[IDX_C10M]*y_cur[IDX_C2H2II] - + k[3957]*y_cur[IDX_C10HM]*y_cur[IDX_C2H2II] - + k[3992]*y_cur[IDX_C2M]*y_cur[IDX_C2H2II] - + k[4027]*y_cur[IDX_C2HM]*y_cur[IDX_C2H2II] - + k[4062]*y_cur[IDX_C3M]*y_cur[IDX_C2H2II] - + k[4097]*y_cur[IDX_C3HM]*y_cur[IDX_C2H2II] - + k[4132]*y_cur[IDX_C3NM]*y_cur[IDX_C2H2II] - + k[4167]*y_cur[IDX_C4M]*y_cur[IDX_C2H2II] - + k[4202]*y_cur[IDX_C4HM]*y_cur[IDX_C2H2II] - + k[4237]*y_cur[IDX_C5M]*y_cur[IDX_C2H2II] - + k[4272]*y_cur[IDX_C5HM]*y_cur[IDX_C2H2II] - + k[4307]*y_cur[IDX_C5NM]*y_cur[IDX_C2H2II] - + k[4342]*y_cur[IDX_C6M]*y_cur[IDX_C2H2II] - + k[4377]*y_cur[IDX_C6HM]*y_cur[IDX_C2H2II] - + k[4412]*y_cur[IDX_C7M]*y_cur[IDX_C2H2II] - + k[4447]*y_cur[IDX_C7HM]*y_cur[IDX_C2H2II] - + k[4482]*y_cur[IDX_C8M]*y_cur[IDX_C2H2II] - + k[4517]*y_cur[IDX_C8HM]*y_cur[IDX_C2H2II] - + k[4552]*y_cur[IDX_C9M]*y_cur[IDX_C2H2II] - + k[4587]*y_cur[IDX_C9HM]*y_cur[IDX_C2H2II] - + k[4622]*y_cur[IDX_CHM]*y_cur[IDX_C2H2II] - + k[4657]*y_cur[IDX_CNM]*y_cur[IDX_C2H2II] - + k[4692]*y_cur[IDX_HM]*y_cur[IDX_C2H2II] - + k[4728]*y_cur[IDX_OM]*y_cur[IDX_C2H2II] - + k[4763]*y_cur[IDX_O2M]*y_cur[IDX_C2H2II] - + k[4798]*y_cur[IDX_OHM]*y_cur[IDX_C2H2II] - + k[4833]*y_cur[IDX_SM]*y_cur[IDX_C2H2II] - + k[5507]*y_cur[IDX_C2H2II]*y_cur[IDX_COI] - + k[5508]*y_cur[IDX_C2H2II]*y_cur[IDX_HC3NI] - + k[5509]*y_cur[IDX_C2H2II]*y_cur[IDX_HC5NI] - + k[5510]*y_cur[IDX_C2H2II]*y_cur[IDX_HC7NI] - + k[5549]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] + k[5696]*y_cur[IDX_C2H2I] + + k[5981]*y_cur[IDX_C2H2I] - + k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - + k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - + k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CH3II] = 0.0 - + k[269]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - + k[270]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - + k[271]*y_cur[IDX_CH3II]*y_cur[IDX_FeI] - + k[272]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - + k[273]*y_cur[IDX_CH3II]*y_cur[IDX_MgI] - + k[274]*y_cur[IDX_CH3II]*y_cur[IDX_NOI] - + k[275]*y_cur[IDX_CH3II]*y_cur[IDX_NaI] + + k[362]*y_cur[IDX_HII]*y_cur[IDX_CH3I] - + k[923]*y_cur[IDX_CH3II]*y_cur[IDX_eM] - + k[924]*y_cur[IDX_CH3II]*y_cur[IDX_eM] - + k[925]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[1382]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - + k[1894]*y_cur[IDX_CI]*y_cur[IDX_CH3II] + + k[1938]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] + + k[1948]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + + k[1987]*y_cur[IDX_CH2II]*y_cur[IDX_HCOI] + + k[1996]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] - + k[1999]*y_cur[IDX_CH2I]*y_cur[IDX_CH3II] + + k[2000]*y_cur[IDX_CH2I]*y_cur[IDX_CH5II] + + k[2002]*y_cur[IDX_CH2I]*y_cur[IDX_H2COII] + + k[2003]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] + + k[2004]*y_cur[IDX_CH2I]*y_cur[IDX_H3OII] + + k[2005]*y_cur[IDX_CH2I]*y_cur[IDX_HCNII] + + k[2006]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] + + k[2007]*y_cur[IDX_CH2I]*y_cur[IDX_HCNHII] + + k[2008]*y_cur[IDX_CH2I]*y_cur[IDX_HCOII] + + k[2009]*y_cur[IDX_CH2I]*y_cur[IDX_HNOII] + + k[2010]*y_cur[IDX_CH2I]*y_cur[IDX_N2HII] + + k[2011]*y_cur[IDX_CH2I]*y_cur[IDX_NHII] + + k[2012]*y_cur[IDX_CH2I]*y_cur[IDX_NH2II] + + k[2013]*y_cur[IDX_CH2I]*y_cur[IDX_NH3II] + + k[2015]*y_cur[IDX_CH2I]*y_cur[IDX_O2HII] + + k[2016]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] - + k[2041]*y_cur[IDX_CH3II]*y_cur[IDX_C2I] - + k[2042]*y_cur[IDX_CH3II]*y_cur[IDX_C2H2I] - + k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - + k[2044]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] - + k[2045]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - + k[2046]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - + k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] - + k[2048]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] - + k[2049]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] - + k[2050]*y_cur[IDX_CH3II]*y_cur[IDX_C3H2I] - + k[2051]*y_cur[IDX_CH3II]*y_cur[IDX_C3HI] - + k[2052]*y_cur[IDX_CH3II]*y_cur[IDX_C4HI] - + k[2053]*y_cur[IDX_CH3II]*y_cur[IDX_C5H2I] - + k[2054]*y_cur[IDX_CH3II]*y_cur[IDX_C5HI] - + k[2055]*y_cur[IDX_CH3II]*y_cur[IDX_C6H2I] - + k[2056]*y_cur[IDX_CH3II]*y_cur[IDX_C6HI] - + k[2057]*y_cur[IDX_CH3II]*y_cur[IDX_C7H2I] - + k[2058]*y_cur[IDX_CH3II]*y_cur[IDX_C7HI] - + k[2059]*y_cur[IDX_CH3II]*y_cur[IDX_C8H2I] - + k[2060]*y_cur[IDX_CH3II]*y_cur[IDX_C8HI] - + k[2061]*y_cur[IDX_CH3II]*y_cur[IDX_CH2CCHI] - + k[2062]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - + k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - + k[2064]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] - + k[2065]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - + k[2066]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - + k[2067]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - + k[2068]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - + k[2069]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - + k[2070]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - + k[2071]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] - + k[2072]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OCH3I] - + k[2073]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - + k[2074]*y_cur[IDX_CH3II]*y_cur[IDX_CH4I] - + k[2075]*y_cur[IDX_CH3II]*y_cur[IDX_CNI] - + k[2076]*y_cur[IDX_CH3II]*y_cur[IDX_H2CCCI] - + k[2077]*y_cur[IDX_CH3II]*y_cur[IDX_H2COI] - + k[2078]*y_cur[IDX_CH3II]*y_cur[IDX_H2SI] - + k[2079]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] - + k[2080]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] - + k[2081]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] - + k[2082]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] - + k[2083]*y_cur[IDX_CH3II]*y_cur[IDX_HClI] - + k[2084]*y_cur[IDX_CH3II]*y_cur[IDX_HSI] - + k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] - + k[2086]*y_cur[IDX_CH3II]*y_cur[IDX_NH2I] - + k[2087]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - + k[2088]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] - + k[2089]*y_cur[IDX_CH3II]*y_cur[IDX_O2I] - + k[2090]*y_cur[IDX_CH3II]*y_cur[IDX_OI] - + k[2091]*y_cur[IDX_CH3II]*y_cur[IDX_OI] - + k[2092]*y_cur[IDX_CH3II]*y_cur[IDX_OCSI] - + k[2093]*y_cur[IDX_CH3II]*y_cur[IDX_OHI] - + k[2094]*y_cur[IDX_CH3II]*y_cur[IDX_PI] - + k[2095]*y_cur[IDX_CH3II]*y_cur[IDX_SI] - + k[2096]*y_cur[IDX_CH3II]*y_cur[IDX_SOI] - + k[2097]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] - + k[2098]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] - + k[2099]*y_cur[IDX_CH3II]*y_cur[IDX_SiH4I] - + k[2100]*y_cur[IDX_CH3II]*y_cur[IDX_SiHI] + + k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] - + k[2243]*y_cur[IDX_CHI]*y_cur[IDX_CH3II] + + k[2320]*y_cur[IDX_HII]*y_cur[IDX_CH3C3NI] + + k[2322]*y_cur[IDX_HII]*y_cur[IDX_CH3C5NI] + + k[2324]*y_cur[IDX_HII]*y_cur[IDX_CH3C7NI] + + k[2329]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + + k[2330]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + + k[2333]*y_cur[IDX_HII]*y_cur[IDX_CH4I] + + k[2375]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] + + k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + + k[2428]*y_cur[IDX_H2I]*y_cur[IDX_CH2II] + + k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2634]*y_cur[IDX_H3II]*y_cur[IDX_CH2I] + + k[2653]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2661]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - + k[2837]*y_cur[IDX_HI]*y_cur[IDX_CH3II] + + k[2839]*y_cur[IDX_HI]*y_cur[IDX_CH4II] - + k[3020]*y_cur[IDX_HNC3I]*y_cur[IDX_CH3II] + + k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] + + k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] + + k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] + + k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] + + k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] + + k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] + + k[3197]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + + k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] - + k[3454]*y_cur[IDX_NI]*y_cur[IDX_CH3II] - + k[3608]*y_cur[IDX_NHI]*y_cur[IDX_CH3II] + + k[3638]*y_cur[IDX_OII]*y_cur[IDX_CH4I] + + k[3691]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] + + k[3727]*y_cur[IDX_OI]*y_cur[IDX_CH4II] - + k[3893]*y_cur[IDX_CM]*y_cur[IDX_CH3II] - + k[3928]*y_cur[IDX_C10M]*y_cur[IDX_CH3II] - + k[3963]*y_cur[IDX_C10HM]*y_cur[IDX_CH3II] - + k[3998]*y_cur[IDX_C2M]*y_cur[IDX_CH3II] - + k[4033]*y_cur[IDX_C2HM]*y_cur[IDX_CH3II] - + k[4068]*y_cur[IDX_C3M]*y_cur[IDX_CH3II] - + k[4103]*y_cur[IDX_C3HM]*y_cur[IDX_CH3II] - + k[4138]*y_cur[IDX_C3NM]*y_cur[IDX_CH3II] - + k[4173]*y_cur[IDX_C4M]*y_cur[IDX_CH3II] - + k[4208]*y_cur[IDX_C4HM]*y_cur[IDX_CH3II] - + k[4243]*y_cur[IDX_C5M]*y_cur[IDX_CH3II] - + k[4278]*y_cur[IDX_C5HM]*y_cur[IDX_CH3II] - + k[4313]*y_cur[IDX_C5NM]*y_cur[IDX_CH3II] - + k[4348]*y_cur[IDX_C6M]*y_cur[IDX_CH3II] - + k[4383]*y_cur[IDX_C6HM]*y_cur[IDX_CH3II] - + k[4418]*y_cur[IDX_C7M]*y_cur[IDX_CH3II] - + k[4453]*y_cur[IDX_C7HM]*y_cur[IDX_CH3II] - + k[4488]*y_cur[IDX_C8M]*y_cur[IDX_CH3II] - + k[4523]*y_cur[IDX_C8HM]*y_cur[IDX_CH3II] - + k[4558]*y_cur[IDX_C9M]*y_cur[IDX_CH3II] - + k[4593]*y_cur[IDX_C9HM]*y_cur[IDX_CH3II] - + k[4628]*y_cur[IDX_CHM]*y_cur[IDX_CH3II] - + k[4663]*y_cur[IDX_CNM]*y_cur[IDX_CH3II] - + k[4698]*y_cur[IDX_HM]*y_cur[IDX_CH3II] - + k[4734]*y_cur[IDX_OM]*y_cur[IDX_CH3II] - + k[4769]*y_cur[IDX_O2M]*y_cur[IDX_CH3II] - + k[4804]*y_cur[IDX_OHM]*y_cur[IDX_CH3II] - + k[4839]*y_cur[IDX_SM]*y_cur[IDX_CH3II] - + k[5532]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CHOI] - + k[5533]*y_cur[IDX_CH3II]*y_cur[IDX_CH3CNI] - + k[5534]*y_cur[IDX_CH3II]*y_cur[IDX_CH3OHI] - + k[5535]*y_cur[IDX_CH3II]*y_cur[IDX_COI] - + k[5536]*y_cur[IDX_CH3II]*y_cur[IDX_H2OI] - + k[5537]*y_cur[IDX_CH3II]*y_cur[IDX_HC3NI] - + k[5538]*y_cur[IDX_CH3II]*y_cur[IDX_HC5NI] - + k[5539]*y_cur[IDX_CH3II]*y_cur[IDX_HC7NI] - + k[5540]*y_cur[IDX_CH3II]*y_cur[IDX_HCNI] - + k[5541]*y_cur[IDX_CH3II]*y_cur[IDX_NCCNI] - + k[5555]*y_cur[IDX_H2I]*y_cur[IDX_CH3II] - + k[5612]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + + k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + + k[5794]*y_cur[IDX_CH3I] - k[6095]*y_cur[IDX_CH3II] - + k[6096]*y_cur[IDX_CH3II] + k[6098]*y_cur[IDX_CH3I] + + k[6126]*y_cur[IDX_CH4II] - + k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - + k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - + k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_C2H2I] = 0.0 + k[1]*y_cur[IDX_CM]*y_cur[IDX_CH2I] + + k[67]*y_cur[IDX_HM]*y_cur[IDX_C2HI] + + k[88]*y_cur[IDX_HI]*y_cur[IDX_C2HM] + + k[214]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + + k[215]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + + k[216]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + + k[217]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + + k[218]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + + k[219]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + + k[220]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + + k[221]*y_cur[IDX_C2H2II]*y_cur[IDX_FeI] + + k[222]*y_cur[IDX_C2H2II]*y_cur[IDX_H2COI] + + k[223]*y_cur[IDX_C2H2II]*y_cur[IDX_H2SI] + + k[224]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + + k[225]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] + + k[226]*y_cur[IDX_C2H2II]*y_cur[IDX_NOI] - + k[227]*y_cur[IDX_C2H2I]*y_cur[IDX_CH2CCHII] + + k[227]*y_cur[IDX_C2H2I]*y_cur[IDX_CH2CCHII] - + k[228]*y_cur[IDX_C2H2I]*y_cur[IDX_CO2II] - + k[229]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - + k[230]*y_cur[IDX_C2H2I]*y_cur[IDX_HCNII] - + k[277]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - + k[324]*y_cur[IDX_HII]*y_cur[IDX_C2H2I] - + k[437]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] - + k[463]*y_cur[IDX_H2OII]*y_cur[IDX_C2H2I] - + k[509]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[529]*y_cur[IDX_MgI]*y_cur[IDX_C2H2II] + + k[598]*y_cur[IDX_NH3I]*y_cur[IDX_C2H2II] + + k[632]*y_cur[IDX_NaI]*y_cur[IDX_C2H2II] - + k[647]*y_cur[IDX_OII]*y_cur[IDX_C2H2I] - + k[668]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + + k[747]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[748]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[757]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[758]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[764]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[792]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[797]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + + k[807]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[910]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] + + k[913]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + + k[919]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + + k[1066]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + + k[1183]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + + k[1186]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] - + k[1300]*y_cur[IDX_CII]*y_cur[IDX_C2H2I] + + k[1343]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + + k[1363]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[1452]*y_cur[IDX_C2II]*y_cur[IDX_C2H2I] - + k[1466]*y_cur[IDX_C2HII]*y_cur[IDX_C2H2I] - + k[1479]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - + k[1480]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] - + k[1535]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H3II] - + k[1536]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] - + k[1537]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] - + k[1538]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] - + k[1539]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] - + k[1540]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - + k[1541]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] - + k[1542]*y_cur[IDX_C2H2I]*y_cur[IDX_C2N2II] - + k[1543]*y_cur[IDX_C2H2I]*y_cur[IDX_C3II] - + k[1544]*y_cur[IDX_C2H2I]*y_cur[IDX_C3HII] - + k[1545]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H2II] - + k[1546]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H3II] - + k[1547]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H4II] - + k[1548]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H5II] - + k[1549]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] - + k[1550]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] - + k[1551]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HII] - + k[1552]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] - + k[1553]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] - + k[1554]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] - + k[1555]*y_cur[IDX_C2H2I]*y_cur[IDX_C4NII] - + k[1556]*y_cur[IDX_C2H2I]*y_cur[IDX_C5II] - + k[1557]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] - + k[1558]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] - + k[1559]*y_cur[IDX_C2H2I]*y_cur[IDX_C6HII] - + k[1560]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] - + k[1561]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] - + k[1562]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - + k[1563]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - + k[1564]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] - + k[1565]*y_cur[IDX_C2H2I]*y_cur[IDX_HC3NII] - + k[1566]*y_cur[IDX_C2H2I]*y_cur[IDX_HCOII] - + k[1567]*y_cur[IDX_C2H2I]*y_cur[IDX_HCO2II] - + k[1568]*y_cur[IDX_C2H2I]*y_cur[IDX_N2HII] - + k[1569]*y_cur[IDX_C2H2I]*y_cur[IDX_PII] - k[1570]*y_cur[IDX_C2H2I]*y_cur[IDX_PHII] - - k[1711]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - - k[1712]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] - - k[2212]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] - - k[2213]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] - - k[2564]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - - k[2565]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - - k[2566]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + - k[2734]*y_cur[IDX_H3II]*y_cur[IDX_PI] - - k[2884]*y_cur[IDX_HCNI]*y_cur[IDX_PHII] + - k[2983]*y_cur[IDX_HCOII]*y_cur[IDX_PI] + - k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + - k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - - k[3596]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - - k[3597]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - - k[3598]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + - k[3737]*y_cur[IDX_OI]*y_cur[IDX_HCPII] + - k[3741]*y_cur[IDX_OI]*y_cur[IDX_HPOII] - - k[3751]*y_cur[IDX_OI]*y_cur[IDX_PHII] - - k[3816]*y_cur[IDX_PHII]*y_cur[IDX_CH3OHI] - - k[3817]*y_cur[IDX_PHII]*y_cur[IDX_H2SI] - - k[3818]*y_cur[IDX_PHII]*y_cur[IDX_O2I] - - k[5560]*y_cur[IDX_H2I]*y_cur[IDX_PHII] - - k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PH2I] = 0.0 - - k[410]*y_cur[IDX_HII]*y_cur[IDX_PH2I] + - k[1209]*y_cur[IDX_PH3II]*y_cur[IDX_eM] + - k[2131]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH3II] - - k[2735]*y_cur[IDX_H3II]*y_cur[IDX_PH2I] - - k[2984]*y_cur[IDX_HCOII]*y_cur[IDX_PH2I] - - k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] + - k[3601]*y_cur[IDX_NH3I]*y_cur[IDX_PH3II] + - k[3819]*y_cur[IDX_PH3II]*y_cur[IDX_H2SI] + - k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] - - k[5433]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - - k[5434]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - - k[5435]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - k[5907]*y_cur[IDX_PH2I] - - k[6247]*y_cur[IDX_PH2I] - k[6248]*y_cur[IDX_PH2I] + - k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] - k[6939]*y_cur[IDX_PH2I] - + k[7121]*y_cur[IDX_GPH2I] + k[7303]*y_cur[IDX_GPH2I] + - k[7485]*y_cur[IDX_GPH2I]; - ydot[yistart + IDX_PH2II] = 0.0 + - k[410]*y_cur[IDX_HII]*y_cur[IDX_PH2I] - - k[1206]*y_cur[IDX_PH2II]*y_cur[IDX_eM] - - k[1207]*y_cur[IDX_PH2II]*y_cur[IDX_eM] - - k[1208]*y_cur[IDX_PH2II]*y_cur[IDX_eM] - k[1571]*y_cur[IDX_C2H2I]*y_cur[IDX_PH2II] - - k[1713]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - - k[1714]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] - - k[2129]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - - k[2130]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - - k[2214]*y_cur[IDX_CH4I]*y_cur[IDX_PH2II] - - k[2567]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] - - k[2568]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] + - k[2736]*y_cur[IDX_H3II]*y_cur[IDX_PHI] + - k[2985]*y_cur[IDX_HCOII]*y_cur[IDX_PHI] - - k[3599]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - - k[3600]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - - k[3673]*y_cur[IDX_O2I]*y_cur[IDX_PH2II] + - k[5559]*y_cur[IDX_H2I]*y_cur[IDX_PII] + k[6247]*y_cur[IDX_PH2I] - - k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - - k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - - k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PH3II] = 0.0 - - k[1209]*y_cur[IDX_PH3II]*y_cur[IDX_eM] - - k[1210]*y_cur[IDX_PH3II]*y_cur[IDX_eM] - k[1572]*y_cur[IDX_C2H2I]*y_cur[IDX_PH3II] - - k[2131]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH3II] + - k[2735]*y_cur[IDX_H3II]*y_cur[IDX_PH2I] + - k[2984]*y_cur[IDX_HCOII]*y_cur[IDX_PH2I] - - k[3601]*y_cur[IDX_NH3I]*y_cur[IDX_PH3II] - - k[3819]*y_cur[IDX_PH3II]*y_cur[IDX_H2SI] + - k[5560]*y_cur[IDX_H2I]*y_cur[IDX_PHII] - - k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] - - k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PNI] = 0.0 + k[249]*y_cur[IDX_CI]*y_cur[IDX_PNII] - - k[412]*y_cur[IDX_HII]*y_cur[IDX_PNI] + - k[1134]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + - k[1214]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + - k[1217]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - - k[2737]*y_cur[IDX_H3II]*y_cur[IDX_PNI] - - k[2816]*y_cur[IDX_H3OII]*y_cur[IDX_PNI] - - k[2986]*y_cur[IDX_HCOII]*y_cur[IDX_PNI] - - k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] + - k[5285]*y_cur[IDX_NI]*y_cur[IDX_PHI] - - k[5286]*y_cur[IDX_NI]*y_cur[IDX_PNI] + - k[5288]*y_cur[IDX_NI]*y_cur[IDX_POI] - k[5909]*y_cur[IDX_PNI] - - k[6250]*y_cur[IDX_PNI] + k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - + k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + - k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - k[6982]*y_cur[IDX_PNI] - + k[7164]*y_cur[IDX_GPNI] + k[7346]*y_cur[IDX_GPNI] + - k[7528]*y_cur[IDX_GPNI]; - ydot[yistart + IDX_PNII] = 0.0 - - k[249]*y_cur[IDX_CI]*y_cur[IDX_PNII] + - k[412]*y_cur[IDX_HII]*y_cur[IDX_PNI] - - k[1211]*y_cur[IDX_PNII]*y_cur[IDX_eM] - - k[3752]*y_cur[IDX_OI]*y_cur[IDX_PNII] - - k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PNH2II] = 0.0 - - k[1212]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] - - k[1213]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] - - k[1214]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + - k[3595]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + - k[3597]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] - - k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - - k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - - k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_PNH3II] = 0.0 - - k[1215]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - - k[1216]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] - - k[1217]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + - k[3598]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + - k[3600]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] - - k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - - k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - - k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_POI] = 0.0 - k[192]*y_cur[IDX_CII]*y_cur[IDX_POI] - - k[413]*y_cur[IDX_HII]*y_cur[IDX_POI] + - k[1137]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + - k[2553]*y_cur[IDX_H2OI]*y_cur[IDX_HPOII] - - k[2738]*y_cur[IDX_H3II]*y_cur[IDX_POI] - - k[2987]*y_cur[IDX_HCOII]*y_cur[IDX_POI] - - k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] - - k[5287]*y_cur[IDX_NI]*y_cur[IDX_POI] - - k[5288]*y_cur[IDX_NI]*y_cur[IDX_POI] + - k[5414]*y_cur[IDX_OI]*y_cur[IDX_HPOI] + - k[5435]*y_cur[IDX_OI]*y_cur[IDX_PH2I] + - k[5436]*y_cur[IDX_OI]*y_cur[IDX_PHI] + - k[5484]*y_cur[IDX_PI]*y_cur[IDX_O2I] + k[5873]*y_cur[IDX_HPOI] - - k[5910]*y_cur[IDX_POI] + k[6204]*y_cur[IDX_HPOI] - - k[6251]*y_cur[IDX_POI] + k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - - k[6992]*y_cur[IDX_POI] + k[7174]*y_cur[IDX_GPOI] + - k[7356]*y_cur[IDX_GPOI] + k[7538]*y_cur[IDX_GPOI]; - ydot[yistart + IDX_POII] = 0.0 + - k[192]*y_cur[IDX_CII]*y_cur[IDX_POI] + - k[413]*y_cur[IDX_HII]*y_cur[IDX_POI] - - k[1218]*y_cur[IDX_POII]*y_cur[IDX_eM] + - k[2563]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + - k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + - k[3673]*y_cur[IDX_O2I]*y_cur[IDX_PH2II] + - k[3751]*y_cur[IDX_OI]*y_cur[IDX_PHII] + - k[3752]*y_cur[IDX_OI]*y_cur[IDX_PNII] + - k[3807]*y_cur[IDX_OHI]*y_cur[IDX_PII] + - k[3811]*y_cur[IDX_PII]*y_cur[IDX_CO2I] + - k[3812]*y_cur[IDX_PII]*y_cur[IDX_O2I] + - k[3813]*y_cur[IDX_PII]*y_cur[IDX_OCSI] + - k[3818]*y_cur[IDX_PHII]*y_cur[IDX_O2I] - - k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SI] = 0.0 - k[207]*y_cur[IDX_C2II]*y_cur[IDX_SI] - - k[213]*y_cur[IDX_C2HII]*y_cur[IDX_SI] - - k[256]*y_cur[IDX_CHII]*y_cur[IDX_SI] - + k[1573]*y_cur[IDX_C2H2I]*y_cur[IDX_SII] - + k[1574]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - + k[1575]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2II] - + k[1576]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2HII] + + k[1579]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H4I] + + k[1580]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + + k[1583]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + + k[1586]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + + k[1589]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + + k[1592]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + + k[1595]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + + k[1598]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H6I] + + k[1599]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + + k[1602]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + + k[1605]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + + k[1608]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + + k[1611]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] + + k[1617]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + + k[1619]*y_cur[IDX_C2H3II]*y_cur[IDX_H2SI] + + k[1620]*y_cur[IDX_C2H3II]*y_cur[IDX_HC3NI] + + k[1621]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + + k[1624]*y_cur[IDX_C2H3II]*y_cur[IDX_NCCNI] + + k[1628]*y_cur[IDX_C2H3I]*y_cur[IDX_C2H4II] + + k[1686]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + + k[1690]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] + + k[1691]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] + + k[1694]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] + + k[1698]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + + k[1704]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H5II] + + k[1726]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + + k[1754]*y_cur[IDX_C3HII]*y_cur[IDX_C4H2I] + + k[1773]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1779]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + + k[1807]*y_cur[IDX_C3H3II]*y_cur[IDX_C4H2I] + + k[1837]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] + + k[1920]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - + k[1934]*y_cur[IDX_CHII]*y_cur[IDX_C2H2I] + + k[2031]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4H2I] - + k[2042]*y_cur[IDX_CH3II]*y_cur[IDX_C2H2I] + + k[2081]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + + k[2107]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] - + k[2133]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] - + k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + + k[2160]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] + + k[2164]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + + k[2174]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + + k[2176]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + + k[2182]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] - + k[2218]*y_cur[IDX_CH5II]*y_cur[IDX_C2H2I] - + k[2366]*y_cur[IDX_HM]*y_cur[IDX_C2H2I] - + k[2370]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + + k[2523]*y_cur[IDX_H2OI]*y_cur[IDX_C2H3II] + + k[2530]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + + k[2578]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] - + k[2587]*y_cur[IDX_H3II]*y_cur[IDX_C2H2I] + + k[2850]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H3II] + + k[2851]*y_cur[IDX_C4H2I]*y_cur[IDX_C4H4II] + + k[2861]*y_cur[IDX_HCNI]*y_cur[IDX_C2H3II] + + k[3036]*y_cur[IDX_HNCI]*y_cur[IDX_C2H3II] - + k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - + k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - + k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3557]*y_cur[IDX_NH3I]*y_cur[IDX_C2H3II] + + k[3563]*y_cur[IDX_NH3I]*y_cur[IDX_C3HII] - + k[3654]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] - + k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + + k[3696]*y_cur[IDX_OI]*y_cur[IDX_C3H3II] + + k[3726]*y_cur[IDX_OI]*y_cur[IDX_CH2CCHII] - + k[3843]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - + k[3844]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - + k[3845]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - + k[3846]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + + k[3866]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + + k[3887]*y_cur[IDX_CM]*y_cur[IDX_C2H2II] + + k[3922]*y_cur[IDX_C10M]*y_cur[IDX_C2H2II] + + k[3957]*y_cur[IDX_C10HM]*y_cur[IDX_C2H2II] + + k[3992]*y_cur[IDX_C2M]*y_cur[IDX_C2H2II] + + k[4027]*y_cur[IDX_C2HM]*y_cur[IDX_C2H2II] + + k[4062]*y_cur[IDX_C3M]*y_cur[IDX_C2H2II] + + k[4097]*y_cur[IDX_C3HM]*y_cur[IDX_C2H2II] + + k[4132]*y_cur[IDX_C3NM]*y_cur[IDX_C2H2II] + + k[4167]*y_cur[IDX_C4M]*y_cur[IDX_C2H2II] + + k[4202]*y_cur[IDX_C4HM]*y_cur[IDX_C2H2II] + + k[4237]*y_cur[IDX_C5M]*y_cur[IDX_C2H2II] + + k[4272]*y_cur[IDX_C5HM]*y_cur[IDX_C2H2II] + + k[4307]*y_cur[IDX_C5NM]*y_cur[IDX_C2H2II] + + k[4342]*y_cur[IDX_C6M]*y_cur[IDX_C2H2II] + + k[4377]*y_cur[IDX_C6HM]*y_cur[IDX_C2H2II] + + k[4412]*y_cur[IDX_C7M]*y_cur[IDX_C2H2II] + + k[4447]*y_cur[IDX_C7HM]*y_cur[IDX_C2H2II] + + k[4482]*y_cur[IDX_C8M]*y_cur[IDX_C2H2II] + + k[4517]*y_cur[IDX_C8HM]*y_cur[IDX_C2H2II] + + k[4552]*y_cur[IDX_C9M]*y_cur[IDX_C2H2II] + + k[4587]*y_cur[IDX_C9HM]*y_cur[IDX_C2H2II] + + k[4622]*y_cur[IDX_CHM]*y_cur[IDX_C2H2II] + + k[4657]*y_cur[IDX_CNM]*y_cur[IDX_C2H2II] + + k[4692]*y_cur[IDX_HM]*y_cur[IDX_C2H2II] + + k[4728]*y_cur[IDX_OM]*y_cur[IDX_C2H2II] + + k[4763]*y_cur[IDX_O2M]*y_cur[IDX_C2H2II] + + k[4798]*y_cur[IDX_OHM]*y_cur[IDX_C2H2II] + + k[4833]*y_cur[IDX_SM]*y_cur[IDX_C2H2II] - + k[4867]*y_cur[IDX_C2I]*y_cur[IDX_C2H2I] - + k[4877]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HI] - + k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] - + k[4879]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - + k[4880]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] + + k[4882]*y_cur[IDX_C2H3I]*y_cur[IDX_O2I] - + k[4888]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2I] - + k[4911]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] - + k[4912]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] + + k[4949]*y_cur[IDX_CI]*y_cur[IDX_CH3I] - + k[4991]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2I] + + k[4992]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + + k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + + k[5025]*y_cur[IDX_CH3I]*y_cur[IDX_C2H3I] - + k[5063]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - + k[5064]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] - + k[5104]*y_cur[IDX_CNI]*y_cur[IDX_C2H2I] + + k[5133]*y_cur[IDX_H2I]*y_cur[IDX_C2HI] - + k[5154]*y_cur[IDX_HI]*y_cur[IDX_C2H2I] + + k[5155]*y_cur[IDX_HI]*y_cur[IDX_C2H3I] + + k[5223]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - + k[5344]*y_cur[IDX_OI]*y_cur[IDX_C2H2I] + + k[5395]*y_cur[IDX_OI]*y_cur[IDX_H2CCCI] - + k[5453]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - + k[5454]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - + k[5455]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] + + k[5456]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] - + k[5511]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] - + k[5512]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - + k[5520]*y_cur[IDX_C4H3II]*y_cur[IDX_C2H2I] - + k[5567]*y_cur[IDX_H3OII]*y_cur[IDX_C2H2I] - k[5696]*y_cur[IDX_C2H2I] + - k[5697]*y_cur[IDX_C2H2I] + k[5698]*y_cur[IDX_C2H3I] + + k[5700]*y_cur[IDX_C2H4I] - k[5981]*y_cur[IDX_C2H2I] - + k[5982]*y_cur[IDX_C2H2I] + k[5983]*y_cur[IDX_C2H3I] + + k[5985]*y_cur[IDX_C2H4I] + k[6038]*y_cur[IDX_C6H6I] + + k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + + k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + + k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + + k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + + k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + + k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - + k[6910]*y_cur[IDX_C2H2I] + k[7092]*y_cur[IDX_GC2H2I] + + k[7274]*y_cur[IDX_GC2H2I] + k[7456]*y_cur[IDX_GC2H2I] + + k[8587]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] + + k[8656]*y_cur[IDX_GCI]*y_cur[IDX_GCH2I] + + k[8715]*y_cur[IDX_GCHI]*y_cur[IDX_GCHI]; + ydot[yistart + IDX_CNI] = 0.0 + k[5]*y_cur[IDX_CM]*y_cur[IDX_NI] - + k[72]*y_cur[IDX_HM]*y_cur[IDX_CNI] + + k[115]*y_cur[IDX_NI]*y_cur[IDX_C4HM] + + k[183]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] + + k[184]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] + + k[208]*y_cur[IDX_C2I]*y_cur[IDX_CNII] + + k[241]*y_cur[IDX_C2HI]*y_cur[IDX_CNII] + + k[245]*y_cur[IDX_CI]*y_cur[IDX_CNII] + + k[260]*y_cur[IDX_CH2I]*y_cur[IDX_CNII] + + k[288]*y_cur[IDX_CHI]*y_cur[IDX_CNII] + + k[298]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + + k[299]*y_cur[IDX_CNII]*y_cur[IDX_COI] + + k[300]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] + + k[301]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] + + k[302]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + + k[303]*y_cur[IDX_CNII]*y_cur[IDX_NOI] + + k[304]*y_cur[IDX_CNII]*y_cur[IDX_O2I] + k[305]*y_cur[IDX_CNII]*y_cur[IDX_SI] - - k[313]*y_cur[IDX_COII]*y_cur[IDX_SI] - - k[415]*y_cur[IDX_HII]*y_cur[IDX_SI] - - k[460]*y_cur[IDX_H2COII]*y_cur[IDX_SI] - - k[476]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - - k[496]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + - k[503]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + - k[538]*y_cur[IDX_MgI]*y_cur[IDX_SII] - - k[572]*y_cur[IDX_N2II]*y_cur[IDX_SI] - - k[579]*y_cur[IDX_NHII]*y_cur[IDX_SI] - - k[584]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + - k[614]*y_cur[IDX_NH3I]*y_cur[IDX_SII] + - k[629]*y_cur[IDX_NOI]*y_cur[IDX_SII] + - k[643]*y_cur[IDX_NaI]*y_cur[IDX_SII] - - k[677]*y_cur[IDX_O2II]*y_cur[IDX_SI] - - k[695]*y_cur[IDX_OHII]*y_cur[IDX_SI] + - k[702]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + - k[703]*y_cur[IDX_SII]*y_cur[IDX_FeI] + - k[704]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + - k[705]*y_cur[IDX_SII]*y_cur[IDX_SiCI] + - k[706]*y_cur[IDX_SII]*y_cur[IDX_SiSI] - - k[707]*y_cur[IDX_SI]*y_cur[IDX_CII] - - k[708]*y_cur[IDX_SI]*y_cur[IDX_CII] - - k[709]*y_cur[IDX_SI]*y_cur[IDX_H2SII] - - k[710]*y_cur[IDX_SI]*y_cur[IDX_HSII] + - k[724]*y_cur[IDX_SiI]*y_cur[IDX_SII] + - k[725]*y_cur[IDX_SiHI]*y_cur[IDX_SII] + - k[787]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + - k[817]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + - k[985]*y_cur[IDX_CSII]*y_cur[IDX_eM] + - k[1020]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + - k[1048]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + - k[1107]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + - k[1138]*y_cur[IDX_HSII]*y_cur[IDX_eM] + - k[1139]*y_cur[IDX_HS2II]*y_cur[IDX_eM] + + k[306]*y_cur[IDX_CNI]*y_cur[IDX_N2II] - + k[444]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + + k[487]*y_cur[IDX_HI]*y_cur[IDX_CNII] - + k[547]*y_cur[IDX_NII]*y_cur[IDX_CNI] + + k[586]*y_cur[IDX_NH2I]*y_cur[IDX_CNII] + + k[616]*y_cur[IDX_NHI]*y_cur[IDX_CNII] - + k[666]*y_cur[IDX_OM]*y_cur[IDX_CNI] + + k[681]*y_cur[IDX_OI]*y_cur[IDX_CNII] - + k[696]*y_cur[IDX_OHM]*y_cur[IDX_CNI] + + k[698]*y_cur[IDX_OHI]*y_cur[IDX_CNII] + + k[781]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + + k[783]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] + + k[783]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] + + k[814]*y_cur[IDX_C3NII]*y_cur[IDX_eM] + + k[916]*y_cur[IDX_CH2CNII]*y_cur[IDX_eM] + + k[970]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + + k[979]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + + k[1006]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] + + k[1015]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + + k[1064]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + + k[1066]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + + k[1084]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] + + k[1086]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] + + k[1088]*y_cur[IDX_HCNII]*y_cur[IDX_eM] + + k[1089]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + + k[1127]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] + + k[1131]*y_cur[IDX_HONCII]*y_cur[IDX_eM] + + k[1156]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] + + k[1261]*y_cur[IDX_SiNCII]*y_cur[IDX_eM] + + k[1349]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + + k[1355]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] + + k[1359]*y_cur[IDX_CII]*y_cur[IDX_CH3C5NI] + + k[1362]*y_cur[IDX_CII]*y_cur[IDX_CH3C7NI] + + k[1379]*y_cur[IDX_CII]*y_cur[IDX_CH3CNI] + + k[1386]*y_cur[IDX_CII]*y_cur[IDX_CNOI] + + k[1400]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + + k[1404]*y_cur[IDX_CII]*y_cur[IDX_HC5NI] + + k[1405]*y_cur[IDX_CII]*y_cur[IDX_HC7NI] + + k[1406]*y_cur[IDX_CII]*y_cur[IDX_HC9NI] + + k[1416]*y_cur[IDX_CII]*y_cur[IDX_N2OI] + + k[1424]*y_cur[IDX_CII]*y_cur[IDX_OCNI] + + k[1458]*y_cur[IDX_C2I]*y_cur[IDX_HCNII] - + k[1467]*y_cur[IDX_C2HII]*y_cur[IDX_CNI] + + k[1471]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + + k[1474]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + + k[1514]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CNI] + + k[1745]*y_cur[IDX_C2HI]*y_cur[IDX_HCNII] + + k[1752]*y_cur[IDX_C3II]*y_cur[IDX_HC3NI] + + k[1903]*y_cur[IDX_CI]*y_cur[IDX_HCNII] - + k[1944]*y_cur[IDX_CHII]*y_cur[IDX_CNI] - + k[1945]*y_cur[IDX_CHII]*y_cur[IDX_CNI] + + k[2005]*y_cur[IDX_CH2I]*y_cur[IDX_HCNII] - + k[2075]*y_cur[IDX_CH3II]*y_cur[IDX_CNI] + + k[2197]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + + k[2250]*y_cur[IDX_CHI]*y_cur[IDX_HCNII] - + k[2277]*y_cur[IDX_CNI]*y_cur[IDX_C2H2II] - + k[2278]*y_cur[IDX_CNI]*y_cur[IDX_HNOII] - + k[2279]*y_cur[IDX_CNI]*y_cur[IDX_O2HII] + + k[2351]*y_cur[IDX_HII]*y_cur[IDX_HOCNI] + + k[2352]*y_cur[IDX_HII]*y_cur[IDX_HONCI] - + k[2381]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + + k[2546]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] - + k[2671]*y_cur[IDX_H3II]*y_cur[IDX_CNI] + + k[2830]*y_cur[IDX_HI]*y_cur[IDX_C2N2II] + + k[2853]*y_cur[IDX_HCNII]*y_cur[IDX_CO2I] + + k[2854]*y_cur[IDX_HCNII]*y_cur[IDX_COI] + + k[2855]*y_cur[IDX_HCNII]*y_cur[IDX_H2COI] + + k[2856]*y_cur[IDX_HCNII]*y_cur[IDX_HCNI] + + k[2857]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] + + k[2859]*y_cur[IDX_HCNII]*y_cur[IDX_HNCI] + + k[2860]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + + k[2866]*y_cur[IDX_HCNI]*y_cur[IDX_C2N2II] + + k[2867]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + + k[2869]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + + k[2871]*y_cur[IDX_HCNI]*y_cur[IDX_C5II] + + k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] + + k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + + k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] + + k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] + + k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] + + k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] + + k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - + k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] - + k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + + k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + + k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3242]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + + k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] + + k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] + + k[3279]*y_cur[IDX_HeII]*y_cur[IDX_NCCNI] + + k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] + + k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + + k[3380]*y_cur[IDX_NI]*y_cur[IDX_C10M] + + k[3383]*y_cur[IDX_NI]*y_cur[IDX_C2II] + + k[3386]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + + k[3393]*y_cur[IDX_NI]*y_cur[IDX_C3M] + + k[3396]*y_cur[IDX_NI]*y_cur[IDX_C3HM] + + k[3397]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] + + k[3403]*y_cur[IDX_NI]*y_cur[IDX_C4M] + + k[3411]*y_cur[IDX_NI]*y_cur[IDX_C5M] + + k[3414]*y_cur[IDX_NI]*y_cur[IDX_C5HM] + + k[3420]*y_cur[IDX_NI]*y_cur[IDX_C6M] + + k[3428]*y_cur[IDX_NI]*y_cur[IDX_C7M] + + k[3439]*y_cur[IDX_NI]*y_cur[IDX_C8M] + + k[3445]*y_cur[IDX_NI]*y_cur[IDX_C9M] + + k[3469]*y_cur[IDX_NI]*y_cur[IDX_SiCII] - + k[3481]*y_cur[IDX_NHII]*y_cur[IDX_CNI] - + k[3509]*y_cur[IDX_NH2II]*y_cur[IDX_CNI] + + k[3539]*y_cur[IDX_NH2I]*y_cur[IDX_HCNII] + + k[3613]*y_cur[IDX_NHI]*y_cur[IDX_HCNII] - + k[3639]*y_cur[IDX_OII]*y_cur[IDX_CNI] - + k[3775]*y_cur[IDX_OHII]*y_cur[IDX_CNI] + + k[3800]*y_cur[IDX_OHI]*y_cur[IDX_HCNII] + + k[3870]*y_cur[IDX_SiII]*y_cur[IDX_NCCNI] + + k[4656]*y_cur[IDX_CNM]*y_cur[IDX_CII] + + k[4657]*y_cur[IDX_CNM]*y_cur[IDX_C2H2II] + + k[4658]*y_cur[IDX_CNM]*y_cur[IDX_C2H3II] + + k[4659]*y_cur[IDX_CNM]*y_cur[IDX_C4H2II] + + k[4660]*y_cur[IDX_CNM]*y_cur[IDX_C4H3II] + + k[4661]*y_cur[IDX_CNM]*y_cur[IDX_C4SII] + + k[4662]*y_cur[IDX_CNM]*y_cur[IDX_CH2CCHII] + + k[4663]*y_cur[IDX_CNM]*y_cur[IDX_CH3II] + + k[4664]*y_cur[IDX_CNM]*y_cur[IDX_CNCII] + + k[4665]*y_cur[IDX_CNM]*y_cur[IDX_FeII] + + k[4666]*y_cur[IDX_CNM]*y_cur[IDX_HII] + + k[4667]*y_cur[IDX_CNM]*y_cur[IDX_H2COII] + + k[4668]*y_cur[IDX_CNM]*y_cur[IDX_H2SII] + + k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] + + k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] + + k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] + + k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + + k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + + k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + + k[4675]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + + k[4676]*y_cur[IDX_CNM]*y_cur[IDX_HeII] + + k[4677]*y_cur[IDX_CNM]*y_cur[IDX_MgII] + + k[4678]*y_cur[IDX_CNM]*y_cur[IDX_NII] + + k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] + + k[4680]*y_cur[IDX_CNM]*y_cur[IDX_NH3II] + + k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] + + k[4682]*y_cur[IDX_CNM]*y_cur[IDX_NOII] + + k[4683]*y_cur[IDX_CNM]*y_cur[IDX_NaII] + + k[4684]*y_cur[IDX_CNM]*y_cur[IDX_OII] + + k[4685]*y_cur[IDX_CNM]*y_cur[IDX_SII] + + k[4686]*y_cur[IDX_CNM]*y_cur[IDX_SOII] + + k[4687]*y_cur[IDX_CNM]*y_cur[IDX_SiII] + + k[4688]*y_cur[IDX_CNM]*y_cur[IDX_SiOII] + + k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] + + k[4690]*y_cur[IDX_CNM]*y_cur[IDX_SiSII] + + k[4903]*y_cur[IDX_C2HI]*y_cur[IDX_NCCNI] + + k[4908]*y_cur[IDX_C4HI]*y_cur[IDX_NCCNI] + + k[4917]*y_cur[IDX_CI]*y_cur[IDX_C2NI] + + k[4921]*y_cur[IDX_CI]*y_cur[IDX_C3NI] + + k[4929]*y_cur[IDX_CI]*y_cur[IDX_C5NI] + + k[4937]*y_cur[IDX_CI]*y_cur[IDX_C7NI] + + k[4943]*y_cur[IDX_CI]*y_cur[IDX_C9NI] - + k[4956]*y_cur[IDX_CI]*y_cur[IDX_CNI] + + k[4967]*y_cur[IDX_CI]*y_cur[IDX_N2I] + + k[4968]*y_cur[IDX_CI]*y_cur[IDX_NCCNI] + + k[4972]*y_cur[IDX_CI]*y_cur[IDX_NHI] + + k[4974]*y_cur[IDX_CI]*y_cur[IDX_NOI] + + k[4977]*y_cur[IDX_CI]*y_cur[IDX_NSI] + + k[4979]*y_cur[IDX_CI]*y_cur[IDX_OCNI] - + k[4997]*y_cur[IDX_CH2I]*y_cur[IDX_CNI] - + k[5029]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] - + k[5059]*y_cur[IDX_CH4I]*y_cur[IDX_CNI] + + k[5080]*y_cur[IDX_CHI]*y_cur[IDX_NI] - + k[5104]*y_cur[IDX_CNI]*y_cur[IDX_C2H2I] - + k[5105]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - + k[5106]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] - + k[5107]*y_cur[IDX_CNI]*y_cur[IDX_C6H2I] - + k[5108]*y_cur[IDX_CNI]*y_cur[IDX_C8H2I] - + k[5109]*y_cur[IDX_CNI]*y_cur[IDX_CH2CCH2I] - + k[5110]*y_cur[IDX_CNI]*y_cur[IDX_CH3CCHI] - + k[5111]*y_cur[IDX_CNI]*y_cur[IDX_C2H6I] - + k[5112]*y_cur[IDX_CNI]*y_cur[IDX_CH3CHCH2I] - + k[5113]*y_cur[IDX_CNI]*y_cur[IDX_CNI] - + k[5113]*y_cur[IDX_CNI]*y_cur[IDX_CNI] - + k[5114]*y_cur[IDX_CNI]*y_cur[IDX_H2COI] - + k[5115]*y_cur[IDX_CNI]*y_cur[IDX_C4H2I] - + k[5116]*y_cur[IDX_CNI]*y_cur[IDX_HCNI] - + k[5117]*y_cur[IDX_CNI]*y_cur[IDX_HCOI] - + k[5118]*y_cur[IDX_CNI]*y_cur[IDX_HNCI] - + k[5119]*y_cur[IDX_CNI]*y_cur[IDX_HNOI] - + k[5120]*y_cur[IDX_CNI]*y_cur[IDX_NO2I] - + k[5121]*y_cur[IDX_CNI]*y_cur[IDX_NOI] - + k[5122]*y_cur[IDX_CNI]*y_cur[IDX_NOI] - + k[5123]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - + k[5124]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - + k[5125]*y_cur[IDX_CNI]*y_cur[IDX_SI] - + k[5126]*y_cur[IDX_CNI]*y_cur[IDX_SiH4I] - + k[5138]*y_cur[IDX_H2I]*y_cur[IDX_CNI] + + k[5161]*y_cur[IDX_HI]*y_cur[IDX_CNOI] + + k[5170]*y_cur[IDX_HI]*y_cur[IDX_HCNI] + + k[5181]*y_cur[IDX_HI]*y_cur[IDX_NCCNI] + + k[5196]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + + k[5221]*y_cur[IDX_NI]*y_cur[IDX_C10I] + + k[5222]*y_cur[IDX_NI]*y_cur[IDX_C2I] + + k[5229]*y_cur[IDX_NI]*y_cur[IDX_C2NI] + + k[5229]*y_cur[IDX_NI]*y_cur[IDX_C2NI] + + k[5230]*y_cur[IDX_NI]*y_cur[IDX_C2OI] + + k[5231]*y_cur[IDX_NI]*y_cur[IDX_C3I] + + k[5234]*y_cur[IDX_NI]*y_cur[IDX_C3NI] + + k[5235]*y_cur[IDX_NI]*y_cur[IDX_C4I] + + k[5237]*y_cur[IDX_NI]*y_cur[IDX_C4NI] + + k[5238]*y_cur[IDX_NI]*y_cur[IDX_C5I] + + k[5241]*y_cur[IDX_NI]*y_cur[IDX_C5NI] + + k[5242]*y_cur[IDX_NI]*y_cur[IDX_C6I] + + k[5243]*y_cur[IDX_NI]*y_cur[IDX_C6HI] + + k[5244]*y_cur[IDX_NI]*y_cur[IDX_C7I] + + k[5248]*y_cur[IDX_NI]*y_cur[IDX_C8I] + + k[5249]*y_cur[IDX_NI]*y_cur[IDX_C8HI] + + k[5250]*y_cur[IDX_NI]*y_cur[IDX_C9I] - + k[5260]*y_cur[IDX_NI]*y_cur[IDX_CNI] - + k[5261]*y_cur[IDX_NI]*y_cur[IDX_CNI] + + k[5263]*y_cur[IDX_NI]*y_cur[IDX_CSI] + + k[5292]*y_cur[IDX_NI]*y_cur[IDX_SiCI] - + k[5302]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - + k[5303]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] - + k[5305]*y_cur[IDX_NHI]*y_cur[IDX_CNI] + + k[5353]*y_cur[IDX_OI]*y_cur[IDX_C2NI] - + k[5386]*y_cur[IDX_OI]*y_cur[IDX_CNI] - + k[5387]*y_cur[IDX_OI]*y_cur[IDX_CNI] - + k[5388]*y_cur[IDX_OI]*y_cur[IDX_CNI] + + k[5402]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + + k[5429]*y_cur[IDX_OI]*y_cur[IDX_OCNI] - + k[5459]*y_cur[IDX_OHI]*y_cur[IDX_CNI] - + k[5460]*y_cur[IDX_OHI]*y_cur[IDX_CNI] + + k[5469]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] - + k[5514]*y_cur[IDX_C2HI]*y_cur[IDX_CNI] + + k[5524]*y_cur[IDX_CI]*y_cur[IDX_NI] - + k[5542]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] + k[5705]*y_cur[IDX_C2H5CNI] + + k[5711]*y_cur[IDX_C2NI] + k[5722]*y_cur[IDX_C3NI] + + k[5733]*y_cur[IDX_C4NI] + k[5746]*y_cur[IDX_C5NI] + + k[5760]*y_cur[IDX_C7NI] + k[5771]*y_cur[IDX_C9NI] + + k[5787]*y_cur[IDX_CH2CHCNI] + k[5788]*y_cur[IDX_CH2CNI] + + k[5810]*y_cur[IDX_CH3CNI] + k[5822]*y_cur[IDX_CNM] - + k[5823]*y_cur[IDX_CNI] + k[5824]*y_cur[IDX_CNOI] + + k[5846]*y_cur[IDX_HC3NI] + k[5850]*y_cur[IDX_HC5NI] + + k[5852]*y_cur[IDX_HC7NI] + k[5853]*y_cur[IDX_HC9NI] + + k[5854]*y_cur[IDX_HCNI] + k[5866]*y_cur[IDX_HNC3I] + + k[5867]*y_cur[IDX_HNCI] + k[5871]*y_cur[IDX_HOCNI] + + k[5872]*y_cur[IDX_HONCI] + k[5881]*y_cur[IDX_NCCNI] + + k[5881]*y_cur[IDX_NCCNI] + k[5884]*y_cur[IDX_NH2CNI] + + k[5901]*y_cur[IDX_OCNI] + k[5932]*y_cur[IDX_SiNCI] + + k[5941]*y_cur[IDX_C2H4CNI] + k[5990]*y_cur[IDX_C2H5CNI] + + k[5996]*y_cur[IDX_C2NI] + k[6006]*y_cur[IDX_C3NI] + + k[6018]*y_cur[IDX_C4NI] + k[6031]*y_cur[IDX_C5NI] + + k[6049]*y_cur[IDX_C7NI] + k[6067]*y_cur[IDX_C9NI] + + k[6088]*y_cur[IDX_CH2CHCNI] + k[6090]*y_cur[IDX_CH2CNI] + + k[6115]*y_cur[IDX_CH3CNI] + k[6133]*y_cur[IDX_CNM] - + k[6134]*y_cur[IDX_CNI] + k[6135]*y_cur[IDX_CNOI] + + k[6171]*y_cur[IDX_HC3NI] + k[6175]*y_cur[IDX_HC5NI] + + k[6177]*y_cur[IDX_HC7NI] + k[6179]*y_cur[IDX_HC9NI] + + k[6181]*y_cur[IDX_HCNI] + k[6198]*y_cur[IDX_HNCI] + + k[6202]*y_cur[IDX_HOCNI] + k[6203]*y_cur[IDX_HONCI] + + k[6216]*y_cur[IDX_NCCNI] + k[6216]*y_cur[IDX_NCCNI] + + k[6220]*y_cur[IDX_NH2CNI] + k[6239]*y_cur[IDX_OCNI] + + k[6283]*y_cur[IDX_SiNCI] + + k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM] + + k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + + k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + + k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + + k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + + k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + + k[6521]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] + + k[6525]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] + + k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + + k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM] + + k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + + k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + + k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + + k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + + k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM] + + k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + + k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - k[6909]*y_cur[IDX_CNI] + + k[7091]*y_cur[IDX_GCNI] + k[7273]*y_cur[IDX_GCNI] + + k[7455]*y_cur[IDX_GCNI] + k[8657]*y_cur[IDX_GCI]*y_cur[IDX_GNI]; + ydot[yistart + IDX_GHI] = 0.0 + k[6888]*y_cur[IDX_HI] - + k[7070]*y_cur[IDX_GHI] - k[7252]*y_cur[IDX_GHI] - + k[7434]*y_cur[IDX_GHI] + k[7617]*y_cur[IDX_GH2I] + + k[7617]*y_cur[IDX_GH2I] + k[7618]*y_cur[IDX_GCHI] + + k[7619]*y_cur[IDX_GCH2I] + k[7621]*y_cur[IDX_GCH2I] + + k[7621]*y_cur[IDX_GCH2I] + k[7622]*y_cur[IDX_GCH2I] + + k[7623]*y_cur[IDX_GNHI] + k[7624]*y_cur[IDX_GNHI] + + k[7625]*y_cur[IDX_GCH3I] + k[7627]*y_cur[IDX_GCH3I] + + k[7629]*y_cur[IDX_GCH3I] + k[7629]*y_cur[IDX_GCH3I] + + k[7630]*y_cur[IDX_GNH2I] + k[7631]*y_cur[IDX_GNH2I] + + k[7631]*y_cur[IDX_GNH2I] + k[7632]*y_cur[IDX_GNH2I] + + k[7634]*y_cur[IDX_GNH3I] + k[7636]*y_cur[IDX_GNH3I] + + k[7637]*y_cur[IDX_GNH3I] + k[7637]*y_cur[IDX_GNH3I] + + k[7638]*y_cur[IDX_GOHI] + k[7639]*y_cur[IDX_GH2OI] + + k[7640]*y_cur[IDX_GHFI] + k[7642]*y_cur[IDX_GC2HI] + + k[7643]*y_cur[IDX_GC2HI] + k[7645]*y_cur[IDX_GC2H2I] + + k[7646]*y_cur[IDX_GC2H2I] + k[7646]*y_cur[IDX_GC2H2I] + + k[7647]*y_cur[IDX_GC2H2I] + k[7650]*y_cur[IDX_GHNCI] + + k[7651]*y_cur[IDX_GHCNI] + k[7652]*y_cur[IDX_GC2H3I] + + k[7653]*y_cur[IDX_GC2H3I] + k[7654]*y_cur[IDX_GC2H3I] + + k[7655]*y_cur[IDX_GC2H3I] + k[7656]*y_cur[IDX_GC2H3I] + + k[7659]*y_cur[IDX_GC2H3I] + k[7659]*y_cur[IDX_GC2H3I] + + k[7660]*y_cur[IDX_GC2H3I] + k[7660]*y_cur[IDX_GC2H3I] + + k[7665]*y_cur[IDX_GH2CNI] + k[7669]*y_cur[IDX_GC2H4I] + + k[7669]*y_cur[IDX_GC2H4I] + k[7670]*y_cur[IDX_GC2H4I] + + k[7671]*y_cur[IDX_GC2H4I] + k[7677]*y_cur[IDX_GC2H5I] + + k[7678]*y_cur[IDX_GC2H5I] + k[7678]*y_cur[IDX_GC2H5I] + + k[7678]*y_cur[IDX_GC2H5I] + k[7679]*y_cur[IDX_GC2H5I] + + k[7679]*y_cur[IDX_GC2H5I] + k[7680]*y_cur[IDX_GC2H5I] + + k[7682]*y_cur[IDX_GHCOI] + k[7683]*y_cur[IDX_GHCOI] + + k[7684]*y_cur[IDX_GSiHI] + k[7686]*y_cur[IDX_GSiH2I] + + k[7689]*y_cur[IDX_GC2H6I] + k[7693]*y_cur[IDX_GSiH3I] + + k[7694]*y_cur[IDX_GHNOI] + k[7696]*y_cur[IDX_GPHI] + + k[7697]*y_cur[IDX_GCH3OHI] + k[7698]*y_cur[IDX_GCH3OHI] + + k[7700]*y_cur[IDX_GCH3OHI] + k[7701]*y_cur[IDX_GCH3OHI] + + k[7701]*y_cur[IDX_GCH3OHI] + k[7705]*y_cur[IDX_GO2HI] + + k[7706]*y_cur[IDX_GPH2I] + k[7707]*y_cur[IDX_GHSI] + + k[7710]*y_cur[IDX_GH2SI] + k[7711]*y_cur[IDX_GH2SI] + + k[7711]*y_cur[IDX_GH2SI] + k[7713]*y_cur[IDX_GHClI] + + k[7714]*y_cur[IDX_GC3HI] + k[7715]*y_cur[IDX_GC3H2I] + + k[7716]*y_cur[IDX_GH2CCCI] + k[7719]*y_cur[IDX_GCH2CCHI] + + k[7721]*y_cur[IDX_GCH2CCH2I] + k[7723]*y_cur[IDX_GCH2CCH2I] + + k[7725]*y_cur[IDX_GCH2CCH2I] + k[7725]*y_cur[IDX_GCH2CCH2I] + + k[7729]*y_cur[IDX_GCH3CCHI] + k[7731]*y_cur[IDX_GCH3CCHI] + + k[7733]*y_cur[IDX_GCH3CCHI] + k[7733]*y_cur[IDX_GCH3CCHI] + + k[7736]*y_cur[IDX_GCH3CNI] + k[7749]*y_cur[IDX_GSiCH3I] + + k[7750]*y_cur[IDX_GHNSiI] + k[7759]*y_cur[IDX_GHCPI] + + k[7762]*y_cur[IDX_GCH3CHOI] + k[7762]*y_cur[IDX_GCH3CHOI] + + k[7767]*y_cur[IDX_GHCSI] + k[7785]*y_cur[IDX_GHPOI] + + k[7789]*y_cur[IDX_GC4HI] + k[7792]*y_cur[IDX_GC4H2I] + + k[7794]*y_cur[IDX_GC4H2I] + k[7795]*y_cur[IDX_GC4H3I] + + k[7795]*y_cur[IDX_GC4H3I] + k[7805]*y_cur[IDX_GSiC2HI] + + k[7810]*y_cur[IDX_GC2H5CNI] + k[7810]*y_cur[IDX_GC2H5CNI] + + k[7811]*y_cur[IDX_GC2H5CNI] + k[7812]*y_cur[IDX_GC2H5CNI] + + k[7812]*y_cur[IDX_GC2H5CNI] + k[7817]*y_cur[IDX_GHC2PI] + + k[7826]*y_cur[IDX_GHCOOCH3I] + k[7835]*y_cur[IDX_GC5HI] + + k[7838]*y_cur[IDX_GC5H2I] + k[7843]*y_cur[IDX_GSiC3HI] + + k[7852]*y_cur[IDX_GC6HI] + k[7856]*y_cur[IDX_GHC5NI] + + k[7858]*y_cur[IDX_GC6H6I] + k[7858]*y_cur[IDX_GC6H6I] + + k[7862]*y_cur[IDX_GC7HI] + k[7863]*y_cur[IDX_GC7H2I] + + k[7867]*y_cur[IDX_GC8HI] + k[7869]*y_cur[IDX_GC8H2I] + + k[7872]*y_cur[IDX_GC9HI] + k[7873]*y_cur[IDX_GC9H2I] + + k[7876]*y_cur[IDX_GC10HI] + k[7878]*y_cur[IDX_GC10H2I] + + k[7886]*y_cur[IDX_GHCCNI] + k[7893]*y_cur[IDX_GH2I] + + k[7893]*y_cur[IDX_GH2I] + k[7894]*y_cur[IDX_GCHI] + + k[7895]*y_cur[IDX_GCHI] + k[7896]*y_cur[IDX_GCH2I] + + k[7898]*y_cur[IDX_GCH2I] + k[7898]*y_cur[IDX_GCH2I] + + k[7899]*y_cur[IDX_GCH2I] + k[7900]*y_cur[IDX_GNHI] + + k[7901]*y_cur[IDX_GNHI] + k[7902]*y_cur[IDX_GCH3I] + + k[7904]*y_cur[IDX_GCH3I] + k[7906]*y_cur[IDX_GCH3I] + + k[7906]*y_cur[IDX_GCH3I] + k[7907]*y_cur[IDX_GNH2I] + + k[7908]*y_cur[IDX_GNH2I] + k[7908]*y_cur[IDX_GNH2I] + + k[7909]*y_cur[IDX_GNH2I] + k[7911]*y_cur[IDX_GCH4I] + + k[7912]*y_cur[IDX_GCH4I] + k[7913]*y_cur[IDX_GCH4I] + + k[7913]*y_cur[IDX_GCH4I] + k[7914]*y_cur[IDX_GCH4I] + + k[7915]*y_cur[IDX_GNH3I] + k[7917]*y_cur[IDX_GNH3I] + + k[7918]*y_cur[IDX_GNH3I] + k[7918]*y_cur[IDX_GNH3I] + + k[7919]*y_cur[IDX_GOHI] + k[7920]*y_cur[IDX_GOHI] + + k[7921]*y_cur[IDX_GH2OI] + k[7924]*y_cur[IDX_GH2OI] + + k[7924]*y_cur[IDX_GH2OI] + k[7925]*y_cur[IDX_GH2OI] + + k[7926]*y_cur[IDX_GHFI] + k[7929]*y_cur[IDX_GC2HI] + + k[7930]*y_cur[IDX_GC2HI] + k[7932]*y_cur[IDX_GC2H2I] + + k[7933]*y_cur[IDX_GC2H2I] + k[7933]*y_cur[IDX_GC2H2I] + + k[7934]*y_cur[IDX_GC2H2I] + k[7937]*y_cur[IDX_GHNCI] + + k[7938]*y_cur[IDX_GHCNI] + k[7939]*y_cur[IDX_GC2H3I] + + k[7940]*y_cur[IDX_GC2H3I] + k[7941]*y_cur[IDX_GC2H3I] + + k[7942]*y_cur[IDX_GC2H3I] + k[7943]*y_cur[IDX_GC2H3I] + + k[7946]*y_cur[IDX_GC2H3I] + k[7946]*y_cur[IDX_GC2H3I] + + k[7947]*y_cur[IDX_GC2H3I] + k[7947]*y_cur[IDX_GC2H3I] + + k[7952]*y_cur[IDX_GH2CNI] + k[7956]*y_cur[IDX_GC2H4I] + + k[7956]*y_cur[IDX_GC2H4I] + k[7957]*y_cur[IDX_GC2H4I] + + k[7958]*y_cur[IDX_GC2H4I] + k[7964]*y_cur[IDX_GC2H5I] + + k[7965]*y_cur[IDX_GC2H5I] + k[7965]*y_cur[IDX_GC2H5I] + + k[7965]*y_cur[IDX_GC2H5I] + k[7966]*y_cur[IDX_GC2H5I] + + k[7966]*y_cur[IDX_GC2H5I] + k[7967]*y_cur[IDX_GC2H5I] + + k[7969]*y_cur[IDX_GHCOI] + k[7970]*y_cur[IDX_GHCOI] + + k[7971]*y_cur[IDX_GSiHI] + k[7973]*y_cur[IDX_GSiH2I] + + k[7975]*y_cur[IDX_GSiH2I] + k[7975]*y_cur[IDX_GSiH2I] + + k[7976]*y_cur[IDX_GSiH2I] + k[7979]*y_cur[IDX_GC2H6I] + + k[7983]*y_cur[IDX_GH2COI] + k[7983]*y_cur[IDX_GH2COI] + + k[7986]*y_cur[IDX_GH2COI] + k[7986]*y_cur[IDX_GH2COI] + + k[7987]*y_cur[IDX_GH2COI] + k[7988]*y_cur[IDX_GSiH3I] + + k[7990]*y_cur[IDX_GSiH3I] + k[7992]*y_cur[IDX_GHNOI] + + k[7994]*y_cur[IDX_GSiH4I] + k[7995]*y_cur[IDX_GSiH4I] + + k[7996]*y_cur[IDX_GPHI] + k[7998]*y_cur[IDX_GCH3OHI] + + k[7999]*y_cur[IDX_GCH3OHI] + k[8000]*y_cur[IDX_GCH3OHI] + + k[8001]*y_cur[IDX_GCH3OHI] + k[8001]*y_cur[IDX_GCH3OHI] + + k[8005]*y_cur[IDX_GO2HI] + k[8007]*y_cur[IDX_GPH2I] + + k[8009]*y_cur[IDX_GPH2I] + k[8009]*y_cur[IDX_GPH2I] + + k[8010]*y_cur[IDX_GPH2I] + k[8011]*y_cur[IDX_GHSI] + + k[8013]*y_cur[IDX_GH2SI] + k[8015]*y_cur[IDX_GH2SI] + + k[8016]*y_cur[IDX_GH2SI] + k[8016]*y_cur[IDX_GH2SI] + + k[8018]*y_cur[IDX_GHClI] + k[8019]*y_cur[IDX_GHClI] + + k[8020]*y_cur[IDX_GC3HI] + k[8021]*y_cur[IDX_GC3H2I] + + k[8023]*y_cur[IDX_GH2CCCI] + k[8026]*y_cur[IDX_GCH2CCHI] + + k[8028]*y_cur[IDX_GCH2CCH2I] + k[8031]*y_cur[IDX_GCH2CCH2I] + + k[8033]*y_cur[IDX_GCH2CCH2I] + k[8033]*y_cur[IDX_GCH2CCH2I] + + k[8037]*y_cur[IDX_GCH3CCHI] + k[8040]*y_cur[IDX_GCH3CCHI] + + k[8042]*y_cur[IDX_GCH3CCHI] + k[8042]*y_cur[IDX_GCH3CCHI] + + k[8045]*y_cur[IDX_GCH3CNI] + k[8047]*y_cur[IDX_GHCSiI] + + k[8049]*y_cur[IDX_GHCSiI] + k[8057]*y_cur[IDX_GSiCH2I] + + k[8058]*y_cur[IDX_GSiCH2I] + k[8063]*y_cur[IDX_GSiCH3I] + + k[8064]*y_cur[IDX_GHNSiI] + k[8077]*y_cur[IDX_GHCPI] + + k[8080]*y_cur[IDX_GCH3CHOI] + k[8080]*y_cur[IDX_GCH3CHOI] + + k[8085]*y_cur[IDX_GHCSI] + k[8087]*y_cur[IDX_GHCSI] + + k[8097]*y_cur[IDX_GH2SiOI] + k[8097]*y_cur[IDX_GH2SiOI] + + k[8103]*y_cur[IDX_GHCOOHI] + k[8103]*y_cur[IDX_GHCOOHI] + + k[8109]*y_cur[IDX_GHPOI] + k[8113]*y_cur[IDX_GC4HI] + + k[8116]*y_cur[IDX_GC4H2I] + k[8118]*y_cur[IDX_GC4H2I] + + k[8120]*y_cur[IDX_GC4H3I] + k[8122]*y_cur[IDX_GHNC3I] + + k[8133]*y_cur[IDX_GSiC2HI] + k[8137]*y_cur[IDX_GSiC2H2I] + + k[8139]*y_cur[IDX_GC2H5CNI] + k[8139]*y_cur[IDX_GC2H5CNI] + + k[8140]*y_cur[IDX_GC2H5CNI] + k[8141]*y_cur[IDX_GC2H5CNI] + + k[8141]*y_cur[IDX_GC2H5CNI] + k[8145]*y_cur[IDX_GHC2PI] + + k[8159]*y_cur[IDX_GC5HI] + k[8163]*y_cur[IDX_GC5H2I] + + k[8170]*y_cur[IDX_GSiC3HI] + k[8174]*y_cur[IDX_GHS2I] + + k[8183]*y_cur[IDX_GC6H2I] + k[8185]*y_cur[IDX_GC6H2I] + + k[8188]*y_cur[IDX_GHC5NI] + k[8197]*y_cur[IDX_GC7HI] + + k[8199]*y_cur[IDX_GC7HI] + k[8200]*y_cur[IDX_GC7H2I] + + k[8202]*y_cur[IDX_GC7H2I] + k[8208]*y_cur[IDX_GC8HI] + + k[8210]*y_cur[IDX_GC8HI] + k[8213]*y_cur[IDX_GC8H2I] + + k[8215]*y_cur[IDX_GC8H2I] + k[8218]*y_cur[IDX_GHC7NI] + + k[8222]*y_cur[IDX_GC9HI] + k[8224]*y_cur[IDX_GC9HI] + + k[8225]*y_cur[IDX_GC9H2I] + k[8227]*y_cur[IDX_GC9H2I] + + k[8236]*y_cur[IDX_GC10HI] + k[8237]*y_cur[IDX_GC10HI] + + k[8239]*y_cur[IDX_GC10HI] + k[8241]*y_cur[IDX_GC10HI] + + k[8242]*y_cur[IDX_GC10HI] + k[8243]*y_cur[IDX_GC10HI] + + k[8248]*y_cur[IDX_GC10H2I] + k[8248]*y_cur[IDX_GC10H2I] + + k[8249]*y_cur[IDX_GC10H2I] + k[8250]*y_cur[IDX_GC10H2I] + + k[8251]*y_cur[IDX_GC10H2I] + k[8254]*y_cur[IDX_GHC9NI] - + k[8273]*y_cur[IDX_GHI]*y_cur[IDX_GHI] - + k[8273]*y_cur[IDX_GHI]*y_cur[IDX_GHI] - + k[8274]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - + k[8275]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - + k[8276]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] - + k[8277]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] - + k[8278]*y_cur[IDX_GHI]*y_cur[IDX_GCH4I] - + k[8279]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - + k[8280]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] - + k[8281]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] - + k[8282]*y_cur[IDX_GHI]*y_cur[IDX_GOI] - + k[8283]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] - + k[8284]*y_cur[IDX_GHI]*y_cur[IDX_GFI] - + k[8285]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - + k[8286]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] - + k[8287]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] - + k[8288]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] - + k[8289]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] - + k[8290]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] - + k[8291]*y_cur[IDX_GHI]*y_cur[IDX_GC2H6I] - + k[8292]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] - + k[8293]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] - + k[8294]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] - + k[8295]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] - + k[8296]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8297]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8298]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8299]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] - + k[8300]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] - + k[8301]*y_cur[IDX_GHI]*y_cur[IDX_GSiI] - + k[8302]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI] - + k[8303]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I] - + k[8304]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I] - + k[8305]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] - + k[8306]*y_cur[IDX_GHI]*y_cur[IDX_GHNOI] - + k[8307]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] - + k[8308]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] - + k[8309]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - + k[8310]*y_cur[IDX_GHI]*y_cur[IDX_GH2O2I] - + k[8311]*y_cur[IDX_GHI]*y_cur[IDX_GSI] - + k[8312]*y_cur[IDX_GHI]*y_cur[IDX_GHSI] - + k[8313]*y_cur[IDX_GHI]*y_cur[IDX_GH2SI] - + k[8314]*y_cur[IDX_GHI]*y_cur[IDX_GClI] - + k[8315]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - + k[8316]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] - + k[8317]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] - + k[8318]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] - + k[8319]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - + k[8320]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - + k[8321]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] - + k[8322]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] - + k[8323]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] - + k[8324]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - + k[8325]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI] - + k[8326]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - + k[8327]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - + k[8328]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - + k[8329]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - + k[8330]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] - + k[8331]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] - + k[8332]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - + k[8333]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - + k[8334]*y_cur[IDX_GHI]*y_cur[IDX_GCH3CHOI] - + k[8335]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI] - + k[8336]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] - + k[8337]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] - + k[8338]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOHI] - + k[8339]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - + k[8340]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] - + k[8341]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I] - + k[8342]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I] - + k[8343]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] - + k[8344]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI] - + k[8345]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI] - + k[8346]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] - + k[8347]*y_cur[IDX_GHI]*y_cur[IDX_GHCOOCH3I] - + k[8348]*y_cur[IDX_GHI]*y_cur[IDX_GOCSI] - + k[8349]*y_cur[IDX_GHI]*y_cur[IDX_GSO2I] - + k[8350]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - + k[8351]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] - + k[8352]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - + k[8353]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] - + k[8354]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] - + k[8355]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - + k[8356]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] - + k[8357]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - + k[8358]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] - + k[8359]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] - + k[8360]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - + k[8361]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] - + k[8362]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] - + k[8363]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] - + k[8364]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] - + k[8365]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] - + k[8366]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI] - + k[8367]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] - + k[8368]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCHOI] + + k[8370]*y_cur[IDX_GH2I]*y_cur[IDX_GCH2I] + + k[8371]*y_cur[IDX_GH2I]*y_cur[IDX_GCH3I] + + k[8372]*y_cur[IDX_GH2I]*y_cur[IDX_GNH2I] + + k[8373]*y_cur[IDX_GH2I]*y_cur[IDX_GOHI] + + k[8374]*y_cur[IDX_GH2I]*y_cur[IDX_GC2I] + + k[8375]*y_cur[IDX_GH2I]*y_cur[IDX_GC2HI] + + k[8376]*y_cur[IDX_GH2I]*y_cur[IDX_GCNI] + + k[8377]*y_cur[IDX_GH2I]*y_cur[IDX_GC3I] + + k[8378]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] + + k[8379]*y_cur[IDX_GH2I]*y_cur[IDX_GC3HI] + + k[8380]*y_cur[IDX_GH2I]*y_cur[IDX_GC4I] + + k[8381]*y_cur[IDX_GH2I]*y_cur[IDX_GC4HI] + + k[8382]*y_cur[IDX_GH2I]*y_cur[IDX_GC5I] + + k[8383]*y_cur[IDX_GH2I]*y_cur[IDX_GC5HI] + + k[8384]*y_cur[IDX_GH2I]*y_cur[IDX_GC6I] + + k[8385]*y_cur[IDX_GH2I]*y_cur[IDX_GC6HI] + + k[8386]*y_cur[IDX_GH2I]*y_cur[IDX_GC7I] + + k[8387]*y_cur[IDX_GH2I]*y_cur[IDX_GC7HI] + + k[8388]*y_cur[IDX_GH2I]*y_cur[IDX_GC8I] + + k[8389]*y_cur[IDX_GH2I]*y_cur[IDX_GC8HI] + + k[8390]*y_cur[IDX_GH2I]*y_cur[IDX_GC9I] + + k[8391]*y_cur[IDX_GH2I]*y_cur[IDX_GC9HI] + + k[8392]*y_cur[IDX_GH2I]*y_cur[IDX_GC10I] + + k[8393]*y_cur[IDX_GH2I]*y_cur[IDX_GC10HI] + + k[8404]*y_cur[IDX_GCI]*y_cur[IDX_GNH2I] + + k[8408]*y_cur[IDX_GCI]*y_cur[IDX_GOHI] + + k[8414]*y_cur[IDX_GCI]*y_cur[IDX_GHSI] + + k[8440]*y_cur[IDX_GOI]*y_cur[IDX_GNH2I] + + k[8448]*y_cur[IDX_GOI]*y_cur[IDX_GHCOI] + + k[8449]*y_cur[IDX_GOI]*y_cur[IDX_GHSI] + + k[8458]*y_cur[IDX_GNI]*y_cur[IDX_GNHI] + + k[8463]*y_cur[IDX_GNI]*y_cur[IDX_GHSI] + + k[8474]*y_cur[IDX_GSI]*y_cur[IDX_GCH3I] + + k[8475]*y_cur[IDX_GSI]*y_cur[IDX_GNHI] + + k[8479]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] + + k[8480]*y_cur[IDX_GCHI]*y_cur[IDX_GNHI] + + k[8509]*y_cur[IDX_GOHI]*y_cur[IDX_GH2COI] + + k[8515]*y_cur[IDX_GOHI]*y_cur[IDX_GCOI] + + k[8525]*y_cur[IDX_GNHI]*y_cur[IDX_GNOI] + + k[8561]*y_cur[IDX_GCH3OI]*y_cur[IDX_GH2COI] - + k[8576]*y_cur[IDX_GHI]*y_cur[IDX_GCI] - + k[8577]*y_cur[IDX_GHI]*y_cur[IDX_GCHI] - + k[8578]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I] - + k[8579]*y_cur[IDX_GHI]*y_cur[IDX_GCH3I] - + k[8580]*y_cur[IDX_GHI]*y_cur[IDX_GNI] - + k[8581]*y_cur[IDX_GHI]*y_cur[IDX_GNHI] - + k[8582]*y_cur[IDX_GHI]*y_cur[IDX_GNH2I] - + k[8583]*y_cur[IDX_GHI]*y_cur[IDX_GOI] - + k[8584]*y_cur[IDX_GHI]*y_cur[IDX_GOHI] - + k[8585]*y_cur[IDX_GHI]*y_cur[IDX_GFI] - + k[8586]*y_cur[IDX_GHI]*y_cur[IDX_GC2I] - + k[8587]*y_cur[IDX_GHI]*y_cur[IDX_GC2HI] - + k[8588]*y_cur[IDX_GHI]*y_cur[IDX_GC2H2I] - + k[8589]*y_cur[IDX_GHI]*y_cur[IDX_GC2H3I] - + k[8590]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4I] - + k[8591]*y_cur[IDX_GHI]*y_cur[IDX_GC2H5I] - + k[8592]*y_cur[IDX_GHI]*y_cur[IDX_GCNI] - + k[8593]*y_cur[IDX_GHI]*y_cur[IDX_GH2CNI] - + k[8594]*y_cur[IDX_GHI]*y_cur[IDX_GCOI] - + k[8595]*y_cur[IDX_GHI]*y_cur[IDX_GHCOI] - + k[8596]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8597]*y_cur[IDX_GHI]*y_cur[IDX_GH2COI] - + k[8598]*y_cur[IDX_GHI]*y_cur[IDX_GCH3OI] - + k[8599]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHI] - + k[8600]*y_cur[IDX_GHI]*y_cur[IDX_GSiI] - + k[8601]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI] - + k[8602]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I] - + k[8603]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I] - + k[8604]*y_cur[IDX_GHI]*y_cur[IDX_GNOI] - + k[8605]*y_cur[IDX_GHI]*y_cur[IDX_GO2I] - + k[8606]*y_cur[IDX_GHI]*y_cur[IDX_GO2HI] - + k[8607]*y_cur[IDX_GHI]*y_cur[IDX_GSI] - + k[8608]*y_cur[IDX_GHI]*y_cur[IDX_GHSI] - + k[8609]*y_cur[IDX_GHI]*y_cur[IDX_GClI] - + k[8610]*y_cur[IDX_GHI]*y_cur[IDX_GC3I] - + k[8611]*y_cur[IDX_GHI]*y_cur[IDX_GC3HI] - + k[8612]*y_cur[IDX_GHI]*y_cur[IDX_GC3H2I] - + k[8613]*y_cur[IDX_GHI]*y_cur[IDX_GH2CCCI] - + k[8614]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - + k[8615]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CCHI] - + k[8616]*y_cur[IDX_GHI]*y_cur[IDX_GC2NI] - + k[8617]*y_cur[IDX_GHI]*y_cur[IDX_GHCCNI] - + k[8618]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CNI] - + k[8619]*y_cur[IDX_GHI]*y_cur[IDX_GC2OI] - + k[8620]*y_cur[IDX_GHI]*y_cur[IDX_GHC2OI] - + k[8621]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - + k[8622]*y_cur[IDX_GHI]*y_cur[IDX_GCNOI] - + k[8623]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - + k[8624]*y_cur[IDX_GHI]*y_cur[IDX_GOCNI] - + k[8625]*y_cur[IDX_GHI]*y_cur[IDX_GCSI] - + k[8626]*y_cur[IDX_GHI]*y_cur[IDX_GCH3COI] - + k[8627]*y_cur[IDX_GHI]*y_cur[IDX_GHCSI] - + k[8628]*y_cur[IDX_GHI]*y_cur[IDX_GCOOHI] - + k[8629]*y_cur[IDX_GHI]*y_cur[IDX_GC4I] - + k[8630]*y_cur[IDX_GHI]*y_cur[IDX_GC4HI] - + k[8631]*y_cur[IDX_GHI]*y_cur[IDX_GC4H2I] - + k[8632]*y_cur[IDX_GHI]*y_cur[IDX_GC4H3I] - + k[8633]*y_cur[IDX_GHI]*y_cur[IDX_GC3NI] - + k[8634]*y_cur[IDX_GHI]*y_cur[IDX_GCH2CHCNI] - + k[8635]*y_cur[IDX_GHI]*y_cur[IDX_GC2H4CNI] - + k[8636]*y_cur[IDX_GHI]*y_cur[IDX_GC5I] - + k[8637]*y_cur[IDX_GHI]*y_cur[IDX_GC5HI] - + k[8638]*y_cur[IDX_GHI]*y_cur[IDX_GC6I] - + k[8639]*y_cur[IDX_GHI]*y_cur[IDX_GC6HI] - + k[8640]*y_cur[IDX_GHI]*y_cur[IDX_GC5NI] - + k[8641]*y_cur[IDX_GHI]*y_cur[IDX_GC7I] - + k[8642]*y_cur[IDX_GHI]*y_cur[IDX_GC7HI] - + k[8643]*y_cur[IDX_GHI]*y_cur[IDX_GC8I] - + k[8644]*y_cur[IDX_GHI]*y_cur[IDX_GC8HI] - + k[8645]*y_cur[IDX_GHI]*y_cur[IDX_GC7NI] - + k[8646]*y_cur[IDX_GHI]*y_cur[IDX_GC9I] - + k[8647]*y_cur[IDX_GHI]*y_cur[IDX_GC9HI] - + k[8648]*y_cur[IDX_GHI]*y_cur[IDX_GC10I] - + k[8649]*y_cur[IDX_GHI]*y_cur[IDX_GC10HI] - + k[8650]*y_cur[IDX_GHI]*y_cur[IDX_GC9NI] - + k[8651]*y_cur[IDX_GHI]*y_cur[IDX_GCOOCH3I] - + k[8652]*y_cur[IDX_GHI]*y_cur[IDX_GCH2OHCOI]; + ydot[yistart + IDX_CH3I] = 0.0 - + k[60]*y_cur[IDX_CH3I]*y_cur[IDX_CNM] - + k[61]*y_cur[IDX_CH3I]*y_cur[IDX_OHM] + + k[69]*y_cur[IDX_HM]*y_cur[IDX_CH2I] - + k[70]*y_cur[IDX_HM]*y_cur[IDX_CH3I] + + k[269]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + + k[270]*y_cur[IDX_CH3II]*y_cur[IDX_CH3COCH3I] + + k[271]*y_cur[IDX_CH3II]*y_cur[IDX_FeI] + + k[272]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] + + k[273]*y_cur[IDX_CH3II]*y_cur[IDX_MgI] + + k[274]*y_cur[IDX_CH3II]*y_cur[IDX_NOI] + + k[275]*y_cur[IDX_CH3II]*y_cur[IDX_NaI] - + k[362]*y_cur[IDX_HII]*y_cur[IDX_CH3I] + + k[755]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[756]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[762]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[768]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[771]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + + k[801]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[807]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[808]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[928]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] + + k[932]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] + + k[934]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] + + k[938]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + + k[940]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[943]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[947]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] + + k[949]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + + k[951]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + + k[951]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + + k[952]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] + + k[954]*y_cur[IDX_CH3CSII]*y_cur[IDX_eM] + + k[956]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + + k[956]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + + k[957]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + + k[959]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + + k[962]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + + k[964]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[965]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[969]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + + k[973]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[974]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[983]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + + k[1155]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_eM] + + k[1201]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + + k[1284]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1286]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1288]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1290]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1291]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1294]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[1352]*y_cur[IDX_CII]*y_cur[IDX_CH3I] - + k[1353]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + + k[1368]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1375]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1484]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + + k[1512]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H6I] + + k[1536]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] + + k[1563]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + + k[1578]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H3I] + + k[1647]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] + + k[1649]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] + + k[1651]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] + + k[1653]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] + + k[1655]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] + + k[1657]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] + + k[1659]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] + + k[1661]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] + + k[1663]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] + + k[1665]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] + + k[1669]*y_cur[IDX_C2H4II]*y_cur[IDX_CH3CCHI] + + k[1671]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H6I] + + k[1672]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] + + k[1675]*y_cur[IDX_C2H4II]*y_cur[IDX_H2SI] + + k[1677]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] + + k[1712]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] + + k[1717]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] + + k[1774]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1780]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + + k[1981]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] - + k[2101]*y_cur[IDX_CH3I]*y_cur[IDX_SII] - + k[2102]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] - + k[2103]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + + k[2133]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + + k[2135]*y_cur[IDX_CH4II]*y_cur[IDX_C2H4I] + + k[2136]*y_cur[IDX_CH4II]*y_cur[IDX_C2H5CNI] + + k[2137]*y_cur[IDX_CH4II]*y_cur[IDX_CH3OHI] + + k[2138]*y_cur[IDX_CH4II]*y_cur[IDX_CH4I] + + k[2139]*y_cur[IDX_CH4II]*y_cur[IDX_CO2I] + + k[2140]*y_cur[IDX_CH4II]*y_cur[IDX_COI] + + k[2141]*y_cur[IDX_CH4II]*y_cur[IDX_H2COI] + + k[2142]*y_cur[IDX_CH4II]*y_cur[IDX_H2OI] + + k[2143]*y_cur[IDX_CH4II]*y_cur[IDX_H2SI] + + k[2144]*y_cur[IDX_CH4II]*y_cur[IDX_NH3I] + + k[2145]*y_cur[IDX_CH4II]*y_cur[IDX_OCSI] + + k[2146]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + + k[2151]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + + k[2157]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + + k[2162]*y_cur[IDX_CH4I]*y_cur[IDX_C3H2II] + + k[2163]*y_cur[IDX_CH4I]*y_cur[IDX_C3OII] + + k[2165]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + + k[2177]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + + k[2190]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + + k[2191]*y_cur[IDX_CH4I]*y_cur[IDX_CO2II] + + k[2192]*y_cur[IDX_CH4I]*y_cur[IDX_CSII] + + k[2194]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + + k[2195]*y_cur[IDX_CH4I]*y_cur[IDX_H2OII] + + k[2198]*y_cur[IDX_CH4I]*y_cur[IDX_HC3NII] + + k[2200]*y_cur[IDX_CH4I]*y_cur[IDX_HCNII] + + k[2207]*y_cur[IDX_CH4I]*y_cur[IDX_NH3II] - + k[2641]*y_cur[IDX_H3II]*y_cur[IDX_CH3I] - + k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] + + k[3192]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] + + k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] + + k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + + k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] + + k[3338]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3652]*y_cur[IDX_OM]*y_cur[IDX_CH4I] + + k[3692]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] + + k[3810]*y_cur[IDX_PII]*y_cur[IDX_CH3OHI] + + k[3816]*y_cur[IDX_PHII]*y_cur[IDX_CH3OHI] + + k[3824]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] + + k[3864]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + + k[3867]*y_cur[IDX_SiII]*y_cur[IDX_CH3OHI] + + k[3893]*y_cur[IDX_CM]*y_cur[IDX_CH3II] + + k[3928]*y_cur[IDX_C10M]*y_cur[IDX_CH3II] + + k[3963]*y_cur[IDX_C10HM]*y_cur[IDX_CH3II] + + k[3998]*y_cur[IDX_C2M]*y_cur[IDX_CH3II] + + k[4033]*y_cur[IDX_C2HM]*y_cur[IDX_CH3II] + + k[4068]*y_cur[IDX_C3M]*y_cur[IDX_CH3II] + + k[4103]*y_cur[IDX_C3HM]*y_cur[IDX_CH3II] + + k[4138]*y_cur[IDX_C3NM]*y_cur[IDX_CH3II] + + k[4173]*y_cur[IDX_C4M]*y_cur[IDX_CH3II] + + k[4208]*y_cur[IDX_C4HM]*y_cur[IDX_CH3II] + + k[4243]*y_cur[IDX_C5M]*y_cur[IDX_CH3II] + + k[4278]*y_cur[IDX_C5HM]*y_cur[IDX_CH3II] + + k[4313]*y_cur[IDX_C5NM]*y_cur[IDX_CH3II] + + k[4348]*y_cur[IDX_C6M]*y_cur[IDX_CH3II] + + k[4383]*y_cur[IDX_C6HM]*y_cur[IDX_CH3II] + + k[4418]*y_cur[IDX_C7M]*y_cur[IDX_CH3II] + + k[4453]*y_cur[IDX_C7HM]*y_cur[IDX_CH3II] + + k[4488]*y_cur[IDX_C8M]*y_cur[IDX_CH3II] + + k[4523]*y_cur[IDX_C8HM]*y_cur[IDX_CH3II] + + k[4558]*y_cur[IDX_C9M]*y_cur[IDX_CH3II] + + k[4593]*y_cur[IDX_C9HM]*y_cur[IDX_CH3II] + + k[4628]*y_cur[IDX_CHM]*y_cur[IDX_CH3II] + + k[4663]*y_cur[IDX_CNM]*y_cur[IDX_CH3II] + + k[4698]*y_cur[IDX_HM]*y_cur[IDX_CH3II] + + k[4734]*y_cur[IDX_OM]*y_cur[IDX_CH3II] + + k[4769]*y_cur[IDX_O2M]*y_cur[IDX_CH3II] + + k[4804]*y_cur[IDX_OHM]*y_cur[IDX_CH3II] + + k[4839]*y_cur[IDX_SM]*y_cur[IDX_CH3II] - + k[4949]*y_cur[IDX_CI]*y_cur[IDX_CH3I] + + k[4995]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + + k[4996]*y_cur[IDX_CH2I]*y_cur[IDX_CH4I] + + k[4996]*y_cur[IDX_CH2I]*y_cur[IDX_CH4I] + + k[4998]*y_cur[IDX_CH2I]*y_cur[IDX_H2COI] + + k[4999]*y_cur[IDX_CH2I]*y_cur[IDX_HCOI] + + k[5000]*y_cur[IDX_CH2I]*y_cur[IDX_HNOI] + + k[5018]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] + + k[5022]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - + k[5025]*y_cur[IDX_CH3I]*y_cur[IDX_C2H3I] - + k[5026]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - + k[5026]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - + k[5027]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - + k[5027]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - + k[5028]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - + k[5028]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] - + k[5029]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] - + k[5030]*y_cur[IDX_CH3I]*y_cur[IDX_H2COI] - + k[5031]*y_cur[IDX_CH3I]*y_cur[IDX_H2OI] - + k[5032]*y_cur[IDX_CH3I]*y_cur[IDX_H2SI] - + k[5033]*y_cur[IDX_CH3I]*y_cur[IDX_HCOI] - + k[5034]*y_cur[IDX_CH3I]*y_cur[IDX_HNOI] - + k[5035]*y_cur[IDX_CH3I]*y_cur[IDX_NH2I] - + k[5036]*y_cur[IDX_CH3I]*y_cur[IDX_NH3I] - + k[5037]*y_cur[IDX_CH3I]*y_cur[IDX_NO2I] - + k[5038]*y_cur[IDX_CH3I]*y_cur[IDX_NOI] - + k[5039]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - + k[5040]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - + k[5041]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] - + k[5042]*y_cur[IDX_CH3I]*y_cur[IDX_O2HI] - + k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] - + k[5044]*y_cur[IDX_CH3I]*y_cur[IDX_OI] - + k[5045]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] - + k[5046]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] - + k[5047]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] - + k[5048]*y_cur[IDX_CH3I]*y_cur[IDX_SI] - + k[5049]*y_cur[IDX_CH3I]*y_cur[IDX_SiI] + + k[5050]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + + k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] + + k[5055]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_OHI] + + k[5057]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] + + k[5058]*y_cur[IDX_CH4I]*y_cur[IDX_C4HI] + + k[5059]*y_cur[IDX_CH4I]*y_cur[IDX_CNI] + + k[5060]*y_cur[IDX_CH4I]*y_cur[IDX_O2I] + + k[5061]*y_cur[IDX_CH4I]*y_cur[IDX_OHI] + + k[5062]*y_cur[IDX_CH4I]*y_cur[IDX_SI] + + k[5069]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] + + k[5071]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] + + k[5112]*y_cur[IDX_CNI]*y_cur[IDX_CH3CHCH2I] + + k[5135]*y_cur[IDX_H2I]*y_cur[IDX_CH2I] - + k[5136]*y_cur[IDX_H2I]*y_cur[IDX_CH3I] + + k[5157]*y_cur[IDX_HI]*y_cur[IDX_CH2COI] - + k[5158]*y_cur[IDX_HI]*y_cur[IDX_CH3I] + + k[5159]*y_cur[IDX_HI]*y_cur[IDX_CH4I] + + k[5225]*y_cur[IDX_NI]*y_cur[IDX_C2H4I] + + k[5227]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - + k[5257]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - + k[5258]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - + k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + + k[5297]*y_cur[IDX_NH2I]*y_cur[IDX_CH4I] + + k[5304]*y_cur[IDX_NHI]*y_cur[IDX_CH4I] + + k[5349]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + + k[5351]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] + + k[5385]*y_cur[IDX_OI]*y_cur[IDX_CH4I] + + k[5455]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - + k[5542]*y_cur[IDX_CH3I]*y_cur[IDX_CNI] + + k[5556]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + + k[5612]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + + k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5793]*y_cur[IDX_CH3I] - k[5794]*y_cur[IDX_CH3I] - + k[5795]*y_cur[IDX_CH3I] + k[5796]*y_cur[IDX_CH3C3NI] + + k[5797]*y_cur[IDX_CH3C4HI] + k[5798]*y_cur[IDX_CH3C5NI] + + k[5799]*y_cur[IDX_CH3C6HI] + k[5800]*y_cur[IDX_CH3C7NI] + + k[5808]*y_cur[IDX_CH3CHOI] + k[5810]*y_cur[IDX_CH3CNI] + + k[5813]*y_cur[IDX_CH3COCH3I] + k[5813]*y_cur[IDX_CH3COCH3I] + + k[5819]*y_cur[IDX_CH3OHI] + k[5936]*y_cur[IDX_CH3OI] + + k[5938]*y_cur[IDX_CH3COI] + k[5946]*y_cur[IDX_CH3COOHI] - + k[6097]*y_cur[IDX_CH3I] - k[6098]*y_cur[IDX_CH3I] - + k[6099]*y_cur[IDX_CH3I] + k[6100]*y_cur[IDX_CH3C3NI] + + k[6101]*y_cur[IDX_CH3C4HI] + k[6102]*y_cur[IDX_CH3C5NI] + + k[6103]*y_cur[IDX_CH3C6HI] + k[6104]*y_cur[IDX_CH3C7NI] + + k[6113]*y_cur[IDX_CH3CHOI] + k[6115]*y_cur[IDX_CH3CNI] + + k[6117]*y_cur[IDX_CH3COCH3I] + k[6117]*y_cur[IDX_CH3COCH3I] + + k[6124]*y_cur[IDX_CH3OHI] + k[6128]*y_cur[IDX_CH4I] + + k[6289]*y_cur[IDX_CH3OI] + k[6291]*y_cur[IDX_CH3COI] + + k[6297]*y_cur[IDX_CH3COOHI] + + k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + + k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6430]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + + k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + + k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + + k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + + k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + + k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + + k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + + k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + + k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + + k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + + k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM] + + k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] + + k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + + k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + + k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM] + + k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] + + k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - + k[6895]*y_cur[IDX_CH3I] + k[7077]*y_cur[IDX_GCH3I] + + k[7259]*y_cur[IDX_GCH3I] + k[7441]*y_cur[IDX_GCH3I] + + k[8578]*y_cur[IDX_GHI]*y_cur[IDX_GCH2I]; + ydot[yistart + IDX_NI] = 0.0 - k[5]*y_cur[IDX_CM]*y_cur[IDX_NI] - + k[77]*y_cur[IDX_HM]*y_cur[IDX_NI] - + k[110]*y_cur[IDX_NI]*y_cur[IDX_C2M] - + k[111]*y_cur[IDX_NI]*y_cur[IDX_C2HM] - + k[112]*y_cur[IDX_NI]*y_cur[IDX_C3M] - + k[113]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - + k[114]*y_cur[IDX_NI]*y_cur[IDX_C4M] - + k[115]*y_cur[IDX_NI]*y_cur[IDX_C4HM] - + k[116]*y_cur[IDX_NI]*y_cur[IDX_C5M] - + k[117]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - + k[118]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[119]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - + k[120]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[121]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - + k[122]*y_cur[IDX_NI]*y_cur[IDX_OM] - + k[123]*y_cur[IDX_NI]*y_cur[IDX_SM] + + k[292]*y_cur[IDX_CHI]*y_cur[IDX_NII] + + k[542]*y_cur[IDX_NII]*y_cur[IDX_C2I] + + k[543]*y_cur[IDX_NII]*y_cur[IDX_C2HI] + + k[544]*y_cur[IDX_NII]*y_cur[IDX_CH2I] + + k[545]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[546]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[547]*y_cur[IDX_NII]*y_cur[IDX_CNI] + + k[548]*y_cur[IDX_NII]*y_cur[IDX_CO2I] + + k[549]*y_cur[IDX_NII]*y_cur[IDX_COI] + + k[550]*y_cur[IDX_NII]*y_cur[IDX_FeI] + + k[551]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + + k[552]*y_cur[IDX_NII]*y_cur[IDX_H2OI] + + k[553]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + + k[554]*y_cur[IDX_NII]*y_cur[IDX_HCNI] + + k[555]*y_cur[IDX_NII]*y_cur[IDX_HCOI] + + k[556]*y_cur[IDX_NII]*y_cur[IDX_MgI] + + k[557]*y_cur[IDX_NII]*y_cur[IDX_NH2I] + + k[558]*y_cur[IDX_NII]*y_cur[IDX_NH3I] + + k[559]*y_cur[IDX_NII]*y_cur[IDX_NHI] + + k[560]*y_cur[IDX_NII]*y_cur[IDX_NOI] + + k[561]*y_cur[IDX_NII]*y_cur[IDX_O2I] + + k[562]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + + k[563]*y_cur[IDX_NII]*y_cur[IDX_OHI] - + k[573]*y_cur[IDX_NI]*y_cur[IDX_N2II] + + k[780]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + + k[782]*y_cur[IDX_C2N2II]*y_cur[IDX_eM] + + k[977]*y_cur[IDX_CNII]*y_cur[IDX_eM] + + k[978]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + + k[1133]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + + k[1150]*y_cur[IDX_N2II]*y_cur[IDX_eM] + + k[1150]*y_cur[IDX_N2II]*y_cur[IDX_eM] + + k[1153]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + + k[1154]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + + k[1158]*y_cur[IDX_NHII]*y_cur[IDX_eM] + + k[1159]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + + k[1168]*y_cur[IDX_NOII]*y_cur[IDX_eM] + + k[1171]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + + k[1172]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + + k[1172]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + k[1173]*y_cur[IDX_NSII]*y_cur[IDX_eM] + - k[1179]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + - k[1219]*y_cur[IDX_S2II]*y_cur[IDX_eM] + - k[1219]*y_cur[IDX_S2II]*y_cur[IDX_eM] + - k[1220]*y_cur[IDX_SOII]*y_cur[IDX_eM] + - k[1221]*y_cur[IDX_SO2II]*y_cur[IDX_eM] + - k[1269]*y_cur[IDX_SiSII]*y_cur[IDX_eM] + - k[1309]*y_cur[IDX_CII]*y_cur[IDX_C2SI] + - k[1316]*y_cur[IDX_CII]*y_cur[IDX_C3SI] + - k[1322]*y_cur[IDX_CII]*y_cur[IDX_C4SI] + - k[1430]*y_cur[IDX_CII]*y_cur[IDX_SOI] + - k[1448]*y_cur[IDX_CII]*y_cur[IDX_SiSI] - - k[1456]*y_cur[IDX_C2II]*y_cur[IDX_SI] - - k[1527]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] - - k[1528]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] - - k[1625]*y_cur[IDX_C2H3II]*y_cur[IDX_SI] - - k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] - - k[1973]*y_cur[IDX_CHII]*y_cur[IDX_SI] - - k[1974]*y_cur[IDX_CHII]*y_cur[IDX_SI] - - k[1994]*y_cur[IDX_CH2II]*y_cur[IDX_SI] - - k[2095]*y_cur[IDX_CH3II]*y_cur[IDX_SI] - - k[2235]*y_cur[IDX_CH5II]*y_cur[IDX_SI] + - k[2255]*y_cur[IDX_CHI]*y_cur[IDX_HSII] - - k[2490]*y_cur[IDX_H2COII]*y_cur[IDX_SI] - - k[2516]*y_cur[IDX_H2OII]*y_cur[IDX_SI] - - k[2517]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + - k[2554]*y_cur[IDX_H2OI]*y_cur[IDX_HSII] - - k[2740]*y_cur[IDX_H3II]*y_cur[IDX_SI] - - k[2860]*y_cur[IDX_HCNII]*y_cur[IDX_SI] + - k[2879]*y_cur[IDX_HCNI]*y_cur[IDX_HSII] - - k[2989]*y_cur[IDX_HCOII]*y_cur[IDX_SI] + - k[3043]*y_cur[IDX_HNCI]*y_cur[IDX_HSII] - - k[3050]*y_cur[IDX_HNOII]*y_cur[IDX_SI] + - k[3054]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + - k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + - k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + - k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + - k[3296]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] + - k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + - k[3335]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] - - k[3376]*y_cur[IDX_N2HII]*y_cur[IDX_SI] - - k[3505]*y_cur[IDX_NHII]*y_cur[IDX_SI] - - k[3506]*y_cur[IDX_NHII]*y_cur[IDX_SI] + - k[3518]*y_cur[IDX_NH2II]*y_cur[IDX_H2SI] - - k[3526]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - - k[3527]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + - k[3589]*y_cur[IDX_NH3I]*y_cur[IDX_HSII] - - k[3667]*y_cur[IDX_O2II]*y_cur[IDX_SI] + - k[3732]*y_cur[IDX_OI]*y_cur[IDX_CSII] + - k[3739]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + - k[3748]*y_cur[IDX_OI]*y_cur[IDX_NSII] - - k[3789]*y_cur[IDX_OHII]*y_cur[IDX_SI] - - k[3790]*y_cur[IDX_OHII]*y_cur[IDX_SI] - - k[3834]*y_cur[IDX_SI]*y_cur[IDX_C3H2II] - - k[3835]*y_cur[IDX_SI]*y_cur[IDX_C3H3II] - - k[3836]*y_cur[IDX_SI]*y_cur[IDX_C4H2II] - - k[3837]*y_cur[IDX_SI]*y_cur[IDX_C4H3II] - - k[3838]*y_cur[IDX_SI]*y_cur[IDX_CH2CCHII] - - k[3839]*y_cur[IDX_SI]*y_cur[IDX_H3SII] - - k[3840]*y_cur[IDX_SI]*y_cur[IDX_O2HII] - - k[3841]*y_cur[IDX_SI]*y_cur[IDX_SiCH2II] - - k[3842]*y_cur[IDX_SI]*y_cur[IDX_SiOII] + - k[3843]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - - k[3883]*y_cur[IDX_SiH2II]*y_cur[IDX_SI] + - k[3915]*y_cur[IDX_CM]*y_cur[IDX_SII] + - k[3950]*y_cur[IDX_C10M]*y_cur[IDX_SII] + - k[3985]*y_cur[IDX_C10HM]*y_cur[IDX_SII] + - k[4020]*y_cur[IDX_C2M]*y_cur[IDX_SII] + - k[4055]*y_cur[IDX_C2HM]*y_cur[IDX_SII] + - k[4090]*y_cur[IDX_C3M]*y_cur[IDX_SII] + - k[4125]*y_cur[IDX_C3HM]*y_cur[IDX_SII] + - k[4160]*y_cur[IDX_C3NM]*y_cur[IDX_SII] + - k[4195]*y_cur[IDX_C4M]*y_cur[IDX_SII] + - k[4230]*y_cur[IDX_C4HM]*y_cur[IDX_SII] + - k[4265]*y_cur[IDX_C5M]*y_cur[IDX_SII] + - k[4300]*y_cur[IDX_C5HM]*y_cur[IDX_SII] + - k[4335]*y_cur[IDX_C5NM]*y_cur[IDX_SII] + - k[4370]*y_cur[IDX_C6M]*y_cur[IDX_SII] + - k[4405]*y_cur[IDX_C6HM]*y_cur[IDX_SII] + - k[4440]*y_cur[IDX_C7M]*y_cur[IDX_SII] + - k[4475]*y_cur[IDX_C7HM]*y_cur[IDX_SII] + - k[4510]*y_cur[IDX_C8M]*y_cur[IDX_SII] + - k[4545]*y_cur[IDX_C8HM]*y_cur[IDX_SII] + - k[4580]*y_cur[IDX_C9M]*y_cur[IDX_SII] + - k[4615]*y_cur[IDX_C9HM]*y_cur[IDX_SII] + - k[4650]*y_cur[IDX_CHM]*y_cur[IDX_SII] + - k[4685]*y_cur[IDX_CNM]*y_cur[IDX_SII] + - k[4721]*y_cur[IDX_HM]*y_cur[IDX_SII] + - k[4756]*y_cur[IDX_OM]*y_cur[IDX_SII] + - k[4791]*y_cur[IDX_O2M]*y_cur[IDX_SII] + - k[4826]*y_cur[IDX_OHM]*y_cur[IDX_SII] + - k[4832]*y_cur[IDX_SM]*y_cur[IDX_CII] + - k[4833]*y_cur[IDX_SM]*y_cur[IDX_C2H2II] + - k[4834]*y_cur[IDX_SM]*y_cur[IDX_C2H3II] + - k[4835]*y_cur[IDX_SM]*y_cur[IDX_C4H2II] + - k[4836]*y_cur[IDX_SM]*y_cur[IDX_C4H3II] + - k[4837]*y_cur[IDX_SM]*y_cur[IDX_C4SII] + - k[4838]*y_cur[IDX_SM]*y_cur[IDX_CH2CCHII] + - k[4839]*y_cur[IDX_SM]*y_cur[IDX_CH3II] + - k[4840]*y_cur[IDX_SM]*y_cur[IDX_CNCII] + - k[4841]*y_cur[IDX_SM]*y_cur[IDX_FeII] + - k[4842]*y_cur[IDX_SM]*y_cur[IDX_HII] + - k[4843]*y_cur[IDX_SM]*y_cur[IDX_H2COII] + - k[4844]*y_cur[IDX_SM]*y_cur[IDX_H2SII] + - k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] + - k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] + - k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] + - k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] + - k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] + - k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + - k[4851]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + - k[4852]*y_cur[IDX_SM]*y_cur[IDX_HeII] + - k[4853]*y_cur[IDX_SM]*y_cur[IDX_MgII] + + k[1176]*y_cur[IDX_OCNII]*y_cur[IDX_eM] + + k[1211]*y_cur[IDX_PNII]*y_cur[IDX_eM] + + k[1260]*y_cur[IDX_SiNII]*y_cur[IDX_eM] + + k[1421]*y_cur[IDX_CII]*y_cur[IDX_NSI] + + k[1446]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + + k[1910]*y_cur[IDX_CI]*y_cur[IDX_NHII] - + k[1961]*y_cur[IDX_CHII]*y_cur[IDX_NI] + + k[2011]*y_cur[IDX_CH2I]*y_cur[IDX_NHII] + + k[2258]*y_cur[IDX_CHI]*y_cur[IDX_NHII] + + k[2274]*y_cur[IDX_CNII]*y_cur[IDX_NOI] - + k[2392]*y_cur[IDX_H2II]*y_cur[IDX_NI] + + k[2461]*y_cur[IDX_H2I]*y_cur[IDX_NHII] + + k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + + k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + + k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + + k[3277]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + + k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + + k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] + + k[3329]*y_cur[IDX_HeII]*y_cur[IDX_SiNI] + + k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[3352]*y_cur[IDX_NII]*y_cur[IDX_NCCNI] + + k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] - + k[3377]*y_cur[IDX_NI]*y_cur[IDX_C10M] - + k[3378]*y_cur[IDX_NI]*y_cur[IDX_C10M] - + k[3379]*y_cur[IDX_NI]*y_cur[IDX_C10M] - + k[3380]*y_cur[IDX_NI]*y_cur[IDX_C10M] - + k[3381]*y_cur[IDX_NI]*y_cur[IDX_C10HM] - + k[3382]*y_cur[IDX_NI]*y_cur[IDX_C10HM] - + k[3383]*y_cur[IDX_NI]*y_cur[IDX_C2II] - + k[3384]*y_cur[IDX_NI]*y_cur[IDX_C2M] - + k[3385]*y_cur[IDX_NI]*y_cur[IDX_C2HII] - + k[3386]*y_cur[IDX_NI]*y_cur[IDX_C2HII] - + k[3387]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - + k[3388]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - + k[3389]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] - + k[3390]*y_cur[IDX_NI]*y_cur[IDX_C2H3II] - + k[3391]*y_cur[IDX_NI]*y_cur[IDX_C2H4II] - + k[3392]*y_cur[IDX_NI]*y_cur[IDX_C3M] - + k[3393]*y_cur[IDX_NI]*y_cur[IDX_C3M] - + k[3394]*y_cur[IDX_NI]*y_cur[IDX_C3HII] - + k[3395]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - + k[3396]*y_cur[IDX_NI]*y_cur[IDX_C3HM] - + k[3397]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] - + k[3398]*y_cur[IDX_NI]*y_cur[IDX_C3H2II] - + k[3399]*y_cur[IDX_NI]*y_cur[IDX_C3H4II] - + k[3400]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] - + k[3401]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] - + k[3402]*y_cur[IDX_NI]*y_cur[IDX_C4M] - + k[3403]*y_cur[IDX_NI]*y_cur[IDX_C4M] - + k[3404]*y_cur[IDX_NI]*y_cur[IDX_C4HM] - + k[3405]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - + k[3406]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - + k[3407]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] - + k[3408]*y_cur[IDX_NI]*y_cur[IDX_C4H5II] - + k[3409]*y_cur[IDX_NI]*y_cur[IDX_C5M] - + k[3410]*y_cur[IDX_NI]*y_cur[IDX_C5M] - + k[3411]*y_cur[IDX_NI]*y_cur[IDX_C5M] - + k[3412]*y_cur[IDX_NI]*y_cur[IDX_C5HII] - + k[3413]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - + k[3414]*y_cur[IDX_NI]*y_cur[IDX_C5HM] - + k[3415]*y_cur[IDX_NI]*y_cur[IDX_C5H2II] - + k[3416]*y_cur[IDX_NI]*y_cur[IDX_C5H3II] - + k[3417]*y_cur[IDX_NI]*y_cur[IDX_C5H5II] - + k[3418]*y_cur[IDX_NI]*y_cur[IDX_C6M] - + k[3419]*y_cur[IDX_NI]*y_cur[IDX_C6M] - + k[3420]*y_cur[IDX_NI]*y_cur[IDX_C6M] - + k[3421]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - + k[3422]*y_cur[IDX_NI]*y_cur[IDX_C6HM] - + k[3423]*y_cur[IDX_NI]*y_cur[IDX_C6H2II] - + k[3424]*y_cur[IDX_NI]*y_cur[IDX_C6H5II] - + k[3425]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3426]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3427]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3428]*y_cur[IDX_NI]*y_cur[IDX_C7M] - + k[3429]*y_cur[IDX_NI]*y_cur[IDX_C7HII] - + k[3430]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - + k[3431]*y_cur[IDX_NI]*y_cur[IDX_C7HM] - + k[3432]*y_cur[IDX_NI]*y_cur[IDX_C7H2II] - + k[3433]*y_cur[IDX_NI]*y_cur[IDX_C7H3II] - + k[3434]*y_cur[IDX_NI]*y_cur[IDX_C7H4II] - + k[3435]*y_cur[IDX_NI]*y_cur[IDX_C7H5II] - + k[3436]*y_cur[IDX_NI]*y_cur[IDX_C8M] - + k[3437]*y_cur[IDX_NI]*y_cur[IDX_C8M] - + k[3438]*y_cur[IDX_NI]*y_cur[IDX_C8M] - + k[3439]*y_cur[IDX_NI]*y_cur[IDX_C8M] - + k[3440]*y_cur[IDX_NI]*y_cur[IDX_C8HM] - + k[3441]*y_cur[IDX_NI]*y_cur[IDX_C8HM] - + k[3442]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3443]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3444]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3445]*y_cur[IDX_NI]*y_cur[IDX_C9M] - + k[3446]*y_cur[IDX_NI]*y_cur[IDX_C9HII] - + k[3447]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - + k[3448]*y_cur[IDX_NI]*y_cur[IDX_C9HM] - + k[3449]*y_cur[IDX_NI]*y_cur[IDX_C9H2II] - + k[3450]*y_cur[IDX_NI]*y_cur[IDX_C9H3II] - + k[3451]*y_cur[IDX_NI]*y_cur[IDX_C9H4II] - + k[3452]*y_cur[IDX_NI]*y_cur[IDX_CH2II] - + k[3453]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHII] - + k[3454]*y_cur[IDX_NI]*y_cur[IDX_CH3II] - + k[3455]*y_cur[IDX_NI]*y_cur[IDX_CH3C4HII] - + k[3456]*y_cur[IDX_NI]*y_cur[IDX_CNII] - + k[3457]*y_cur[IDX_NI]*y_cur[IDX_H2OII] - + k[3458]*y_cur[IDX_NI]*y_cur[IDX_H2OII] - + k[3459]*y_cur[IDX_NI]*y_cur[IDX_H2SII] - + k[3460]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - + k[3461]*y_cur[IDX_NI]*y_cur[IDX_HC3NII] - + k[3462]*y_cur[IDX_NI]*y_cur[IDX_HSII] - + k[3463]*y_cur[IDX_NI]*y_cur[IDX_NHII] - + k[3464]*y_cur[IDX_NI]*y_cur[IDX_NH2II] - + k[3465]*y_cur[IDX_NI]*y_cur[IDX_O2II] - + k[3466]*y_cur[IDX_NI]*y_cur[IDX_O2HII] - + k[3467]*y_cur[IDX_NI]*y_cur[IDX_OHII] - + k[3468]*y_cur[IDX_NI]*y_cur[IDX_SOII] - + k[3469]*y_cur[IDX_NI]*y_cur[IDX_SiCII] - + k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] - + k[3471]*y_cur[IDX_NI]*y_cur[IDX_SiHII] - + k[3472]*y_cur[IDX_NI]*y_cur[IDX_SiH2II] - + k[3473]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - + k[3474]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - + k[3475]*y_cur[IDX_NI]*y_cur[IDX_SiOII] - + k[3476]*y_cur[IDX_NI]*y_cur[IDX_SiOII] + + k[3477]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + + k[3480]*y_cur[IDX_NHII]*y_cur[IDX_C2HI] + + k[3481]*y_cur[IDX_NHII]*y_cur[IDX_CNI] + + k[3482]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] + + k[3485]*y_cur[IDX_NHII]*y_cur[IDX_COI] + + k[3487]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + + k[3489]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + + k[3493]*y_cur[IDX_NHII]*y_cur[IDX_HCNI] + + k[3494]*y_cur[IDX_NHII]*y_cur[IDX_HCOI] + + k[3495]*y_cur[IDX_NHII]*y_cur[IDX_HNCI] + + k[3496]*y_cur[IDX_NHII]*y_cur[IDX_N2I] + + k[3497]*y_cur[IDX_NHII]*y_cur[IDX_NH2I] + + k[3498]*y_cur[IDX_NHII]*y_cur[IDX_NH3I] + + k[3499]*y_cur[IDX_NHII]*y_cur[IDX_NHI] + + k[3502]*y_cur[IDX_NHII]*y_cur[IDX_O2I] + + k[3503]*y_cur[IDX_NHII]*y_cur[IDX_OI] + + k[3504]*y_cur[IDX_NHII]*y_cur[IDX_OHI] + + k[3505]*y_cur[IDX_NHII]*y_cur[IDX_SI] + + k[3509]*y_cur[IDX_NH2II]*y_cur[IDX_CNI] + + k[3605]*y_cur[IDX_NHI]*y_cur[IDX_C2II] + + k[3610]*y_cur[IDX_NHI]*y_cur[IDX_COII] + + k[3611]*y_cur[IDX_NHI]*y_cur[IDX_H2COII] + + k[3612]*y_cur[IDX_NHI]*y_cur[IDX_H2OII] + + k[3617]*y_cur[IDX_NHI]*y_cur[IDX_NH2II] + + k[3618]*y_cur[IDX_NHI]*y_cur[IDX_NH3II] + + k[3644]*y_cur[IDX_OII]*y_cur[IDX_HCNI] + + k[3647]*y_cur[IDX_OII]*y_cur[IDX_N2I] + + k[3744]*y_cur[IDX_OI]*y_cur[IDX_N2II] + + k[3752]*y_cur[IDX_OI]*y_cur[IDX_PNII] + + k[3761]*y_cur[IDX_OI]*y_cur[IDX_SiNII] + + k[3908]*y_cur[IDX_CM]*y_cur[IDX_NII] + + k[3943]*y_cur[IDX_C10M]*y_cur[IDX_NII] + + k[3978]*y_cur[IDX_C10HM]*y_cur[IDX_NII] + + k[4013]*y_cur[IDX_C2M]*y_cur[IDX_NII] + + k[4048]*y_cur[IDX_C2HM]*y_cur[IDX_NII] + + k[4083]*y_cur[IDX_C3M]*y_cur[IDX_NII] + + k[4118]*y_cur[IDX_C3HM]*y_cur[IDX_NII] + + k[4153]*y_cur[IDX_C3NM]*y_cur[IDX_NII] + + k[4188]*y_cur[IDX_C4M]*y_cur[IDX_NII] + + k[4223]*y_cur[IDX_C4HM]*y_cur[IDX_NII] + + k[4258]*y_cur[IDX_C5M]*y_cur[IDX_NII] + + k[4293]*y_cur[IDX_C5HM]*y_cur[IDX_NII] + + k[4328]*y_cur[IDX_C5NM]*y_cur[IDX_NII] + + k[4363]*y_cur[IDX_C6M]*y_cur[IDX_NII] + + k[4398]*y_cur[IDX_C6HM]*y_cur[IDX_NII] + + k[4433]*y_cur[IDX_C7M]*y_cur[IDX_NII] + + k[4468]*y_cur[IDX_C7HM]*y_cur[IDX_NII] + + k[4503]*y_cur[IDX_C8M]*y_cur[IDX_NII] + + k[4538]*y_cur[IDX_C8HM]*y_cur[IDX_NII] + + k[4573]*y_cur[IDX_C9M]*y_cur[IDX_NII] + + k[4608]*y_cur[IDX_C9HM]*y_cur[IDX_NII] + + k[4643]*y_cur[IDX_CHM]*y_cur[IDX_NII] + + k[4678]*y_cur[IDX_CNM]*y_cur[IDX_NII] + + k[4714]*y_cur[IDX_HM]*y_cur[IDX_NII] + + k[4749]*y_cur[IDX_OM]*y_cur[IDX_NII] + + k[4784]*y_cur[IDX_O2M]*y_cur[IDX_NII] + + k[4819]*y_cur[IDX_OHM]*y_cur[IDX_NII] + k[4854]*y_cur[IDX_SM]*y_cur[IDX_NII] + - k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] + - k[4856]*y_cur[IDX_SM]*y_cur[IDX_NH3II] + - k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] + - k[4858]*y_cur[IDX_SM]*y_cur[IDX_NOII] + - k[4859]*y_cur[IDX_SM]*y_cur[IDX_NaII] + - k[4860]*y_cur[IDX_SM]*y_cur[IDX_OII] + - k[4861]*y_cur[IDX_SM]*y_cur[IDX_SII] + - k[4861]*y_cur[IDX_SM]*y_cur[IDX_SII] + - k[4862]*y_cur[IDX_SM]*y_cur[IDX_SOII] + - k[4863]*y_cur[IDX_SM]*y_cur[IDX_SiII] + - k[4864]*y_cur[IDX_SM]*y_cur[IDX_SiOII] + - k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] + - k[4866]*y_cur[IDX_SM]*y_cur[IDX_SiSII] - - k[4876]*y_cur[IDX_C2I]*y_cur[IDX_SI] - - k[4906]*y_cur[IDX_C2HI]*y_cur[IDX_SI] + - k[4958]*y_cur[IDX_CI]*y_cur[IDX_CSI] + - k[4966]*y_cur[IDX_CI]*y_cur[IDX_HSI] + - k[4977]*y_cur[IDX_CI]*y_cur[IDX_NSI] + - k[4984]*y_cur[IDX_CI]*y_cur[IDX_S2I] + - k[4987]*y_cur[IDX_CI]*y_cur[IDX_SOI] - - k[5019]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - - k[5020]*y_cur[IDX_CH2I]*y_cur[IDX_SI] - - k[5048]*y_cur[IDX_CH3I]*y_cur[IDX_SI] - - k[5062]*y_cur[IDX_CH4I]*y_cur[IDX_SI] - - k[5100]*y_cur[IDX_CHI]*y_cur[IDX_SI] - - k[5101]*y_cur[IDX_CHI]*y_cur[IDX_SI] - - k[5125]*y_cur[IDX_CNI]*y_cur[IDX_SI] - - k[5149]*y_cur[IDX_H2I]*y_cur[IDX_SI] + - k[5178]*y_cur[IDX_HI]*y_cur[IDX_HSI] + - k[5189]*y_cur[IDX_HI]*y_cur[IDX_NSI] + - k[5199]*y_cur[IDX_HI]*y_cur[IDX_S2I] + - k[5201]*y_cur[IDX_HI]*y_cur[IDX_SOI] + - k[5219]*y_cur[IDX_HSI]*y_cur[IDX_HSI] + - k[5263]*y_cur[IDX_NI]*y_cur[IDX_CSI] + - k[5268]*y_cur[IDX_NI]*y_cur[IDX_HCSI] + - k[5272]*y_cur[IDX_NI]*y_cur[IDX_HSI] + - k[5280]*y_cur[IDX_NI]*y_cur[IDX_NSI] + - k[5289]*y_cur[IDX_NI]*y_cur[IDX_S2I] + + k[4956]*y_cur[IDX_CI]*y_cur[IDX_CNI] + + k[4967]*y_cur[IDX_CI]*y_cur[IDX_N2I] + + k[4973]*y_cur[IDX_CI]*y_cur[IDX_NHI] + + k[4975]*y_cur[IDX_CI]*y_cur[IDX_NOI] + + k[4976]*y_cur[IDX_CI]*y_cur[IDX_NSI] + + k[5003]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + + k[5079]*y_cur[IDX_CHI]*y_cur[IDX_N2I] - + k[5080]*y_cur[IDX_CHI]*y_cur[IDX_NI] - + k[5081]*y_cur[IDX_CHI]*y_cur[IDX_NI] + + k[5084]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + + k[5122]*y_cur[IDX_CNI]*y_cur[IDX_NOI] - + k[5141]*y_cur[IDX_H2I]*y_cur[IDX_NI] + + k[5184]*y_cur[IDX_HI]*y_cur[IDX_NHI] + + k[5187]*y_cur[IDX_HI]*y_cur[IDX_NOI] + + k[5188]*y_cur[IDX_HI]*y_cur[IDX_NSI] - + k[5221]*y_cur[IDX_NI]*y_cur[IDX_C10I] - + k[5222]*y_cur[IDX_NI]*y_cur[IDX_C2I] - + k[5223]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - + k[5224]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] - + k[5225]*y_cur[IDX_NI]*y_cur[IDX_C2H4I] - + k[5226]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - + k[5227]*y_cur[IDX_NI]*y_cur[IDX_C2H5I] - + k[5228]*y_cur[IDX_NI]*y_cur[IDX_C2HI] - + k[5229]*y_cur[IDX_NI]*y_cur[IDX_C2NI] - + k[5230]*y_cur[IDX_NI]*y_cur[IDX_C2OI] - + k[5231]*y_cur[IDX_NI]*y_cur[IDX_C3I] - + k[5232]*y_cur[IDX_NI]*y_cur[IDX_C3H2I] - + k[5233]*y_cur[IDX_NI]*y_cur[IDX_C3HI] - + k[5234]*y_cur[IDX_NI]*y_cur[IDX_C3NI] - + k[5235]*y_cur[IDX_NI]*y_cur[IDX_C4I] - + k[5236]*y_cur[IDX_NI]*y_cur[IDX_C4HI] - + k[5237]*y_cur[IDX_NI]*y_cur[IDX_C4NI] - + k[5238]*y_cur[IDX_NI]*y_cur[IDX_C5I] - + k[5239]*y_cur[IDX_NI]*y_cur[IDX_C5H2I] - + k[5240]*y_cur[IDX_NI]*y_cur[IDX_C5HI] - + k[5241]*y_cur[IDX_NI]*y_cur[IDX_C5NI] - + k[5242]*y_cur[IDX_NI]*y_cur[IDX_C6I] - + k[5243]*y_cur[IDX_NI]*y_cur[IDX_C6HI] - + k[5244]*y_cur[IDX_NI]*y_cur[IDX_C7I] - + k[5245]*y_cur[IDX_NI]*y_cur[IDX_C7H2I] - + k[5246]*y_cur[IDX_NI]*y_cur[IDX_C7HI] - + k[5247]*y_cur[IDX_NI]*y_cur[IDX_C7NI] - + k[5248]*y_cur[IDX_NI]*y_cur[IDX_C8I] - + k[5249]*y_cur[IDX_NI]*y_cur[IDX_C8HI] - + k[5250]*y_cur[IDX_NI]*y_cur[IDX_C9I] - + k[5251]*y_cur[IDX_NI]*y_cur[IDX_C9HI] - + k[5252]*y_cur[IDX_NI]*y_cur[IDX_C9NI] - + k[5253]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - + k[5254]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - + k[5255]*y_cur[IDX_NI]*y_cur[IDX_CH2I] - + k[5256]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHI] - + k[5257]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - + k[5258]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - + k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] - + k[5260]*y_cur[IDX_NI]*y_cur[IDX_CNI] - + k[5261]*y_cur[IDX_NI]*y_cur[IDX_CNI] - + k[5262]*y_cur[IDX_NI]*y_cur[IDX_CO2I] - + k[5263]*y_cur[IDX_NI]*y_cur[IDX_CSI] - + k[5264]*y_cur[IDX_NI]*y_cur[IDX_H2CNI] - + k[5265]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - + k[5266]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - + k[5267]*y_cur[IDX_NI]*y_cur[IDX_HCOI] - + k[5268]*y_cur[IDX_NI]*y_cur[IDX_HCSI] - + k[5269]*y_cur[IDX_NI]*y_cur[IDX_HNOI] - + k[5270]*y_cur[IDX_NI]*y_cur[IDX_HNOI] - + k[5271]*y_cur[IDX_NI]*y_cur[IDX_HSI] - + k[5272]*y_cur[IDX_NI]*y_cur[IDX_HSI] - + k[5273]*y_cur[IDX_NI]*y_cur[IDX_NCCNI] - + k[5274]*y_cur[IDX_NI]*y_cur[IDX_NHI] - + k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5276]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5277]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5278]*y_cur[IDX_NI]*y_cur[IDX_NO2I] - + k[5279]*y_cur[IDX_NI]*y_cur[IDX_NOI] - + k[5280]*y_cur[IDX_NI]*y_cur[IDX_NSI] - + k[5281]*y_cur[IDX_NI]*y_cur[IDX_O2I] - + k[5282]*y_cur[IDX_NI]*y_cur[IDX_O2HI] - + k[5283]*y_cur[IDX_NI]*y_cur[IDX_OHI] - + k[5284]*y_cur[IDX_NI]*y_cur[IDX_OHI] - + k[5285]*y_cur[IDX_NI]*y_cur[IDX_PHI] - + k[5286]*y_cur[IDX_NI]*y_cur[IDX_PNI] - + k[5287]*y_cur[IDX_NI]*y_cur[IDX_POI] - + k[5288]*y_cur[IDX_NI]*y_cur[IDX_POI] - + k[5289]*y_cur[IDX_NI]*y_cur[IDX_S2I] - + k[5290]*y_cur[IDX_NI]*y_cur[IDX_SOI] - k[5291]*y_cur[IDX_NI]*y_cur[IDX_SOI] - - k[5324]*y_cur[IDX_NHI]*y_cur[IDX_SI] - - k[5325]*y_cur[IDX_NHI]*y_cur[IDX_SI] - - k[5333]*y_cur[IDX_NOI]*y_cur[IDX_SI] - - k[5334]*y_cur[IDX_NOI]*y_cur[IDX_SI] - - k[5337]*y_cur[IDX_O2I]*y_cur[IDX_SI] + - k[5392]*y_cur[IDX_OI]*y_cur[IDX_CSI] + - k[5415]*y_cur[IDX_OI]*y_cur[IDX_HSI] + - k[5425]*y_cur[IDX_OI]*y_cur[IDX_NSI] + - k[5430]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + - k[5437]*y_cur[IDX_OI]*y_cur[IDX_S2I] + - k[5439]*y_cur[IDX_OI]*y_cur[IDX_SOI] - - k[5480]*y_cur[IDX_OHI]*y_cur[IDX_SI] - - k[5485]*y_cur[IDX_SI]*y_cur[IDX_C2OI] - - k[5486]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - - k[5487]*y_cur[IDX_SI]*y_cur[IDX_HCOI] - - k[5488]*y_cur[IDX_SI]*y_cur[IDX_HSI] - - k[5489]*y_cur[IDX_SI]*y_cur[IDX_SO2I] - - k[5490]*y_cur[IDX_SI]*y_cur[IDX_SOI] - - k[5506]*y_cur[IDX_CII]*y_cur[IDX_SI] - - k[5529]*y_cur[IDX_CI]*y_cur[IDX_SI] - - k[5610]*y_cur[IDX_SI]*y_cur[IDX_eM] + - k[5625]*y_cur[IDX_SII]*y_cur[IDX_eM] + k[5715]*y_cur[IDX_C2SI] + - k[5829]*y_cur[IDX_CSI] + k[5842]*y_cur[IDX_H2SI] + - k[5874]*y_cur[IDX_HS2I] + k[5875]*y_cur[IDX_HSI] + - k[5893]*y_cur[IDX_NSI] + k[5903]*y_cur[IDX_OCSI] + - k[5911]*y_cur[IDX_SM] + k[5912]*y_cur[IDX_S2I] + - k[5912]*y_cur[IDX_S2I] - k[5913]*y_cur[IDX_SI] + - k[5915]*y_cur[IDX_SOI] + k[5935]*y_cur[IDX_SiSI] + - k[5999]*y_cur[IDX_C2SI] + k[6142]*y_cur[IDX_CSI] + - k[6165]*y_cur[IDX_H2SI] + k[6206]*y_cur[IDX_HSII] + - k[6208]*y_cur[IDX_HS2I] + k[6209]*y_cur[IDX_HSI] + - k[6230]*y_cur[IDX_NSI] + k[6241]*y_cur[IDX_OCSI] + - k[6252]*y_cur[IDX_SM] + k[6254]*y_cur[IDX_S2I] + - k[6254]*y_cur[IDX_S2I] - k[6255]*y_cur[IDX_SI] + - k[6257]*y_cur[IDX_SOI] + k[6288]*y_cur[IDX_SiSI] - - k[6303]*y_cur[IDX_SI] + k[6424]*y_cur[IDX_SII]*y_cur[IDX_GRAINM] + - k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM] + - k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + - k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + - k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM] + - k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + - k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM] + - k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM] + - k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + - k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + - k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM] + - k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + - k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM] + - k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM] + - k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + - k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - k[6932]*y_cur[IDX_SI] + - k[7114]*y_cur[IDX_GSI] + k[7296]*y_cur[IDX_GSI] + - k[7478]*y_cur[IDX_GSI]; - ydot[yistart + IDX_SII] = 0.0 + k[207]*y_cur[IDX_C2II]*y_cur[IDX_SI] - + k[213]*y_cur[IDX_C2HII]*y_cur[IDX_SI] + - k[256]*y_cur[IDX_CHII]*y_cur[IDX_SI] + - k[305]*y_cur[IDX_CNII]*y_cur[IDX_SI] + - k[313]*y_cur[IDX_COII]*y_cur[IDX_SI] + - k[415]*y_cur[IDX_HII]*y_cur[IDX_SI] + - k[460]*y_cur[IDX_H2COII]*y_cur[IDX_SI] + - k[476]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + - k[496]*y_cur[IDX_HCNII]*y_cur[IDX_SI] - - k[503]*y_cur[IDX_HCOI]*y_cur[IDX_SII] - - k[538]*y_cur[IDX_MgI]*y_cur[IDX_SII] + - k[572]*y_cur[IDX_N2II]*y_cur[IDX_SI] + - k[579]*y_cur[IDX_NHII]*y_cur[IDX_SI] + - k[584]*y_cur[IDX_NH2II]*y_cur[IDX_SI] - - k[614]*y_cur[IDX_NH3I]*y_cur[IDX_SII] - - k[629]*y_cur[IDX_NOI]*y_cur[IDX_SII] - - k[643]*y_cur[IDX_NaI]*y_cur[IDX_SII] + - k[677]*y_cur[IDX_O2II]*y_cur[IDX_SI] + - k[695]*y_cur[IDX_OHII]*y_cur[IDX_SI] - - k[702]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[703]*y_cur[IDX_SII]*y_cur[IDX_FeI] - - k[704]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - - k[705]*y_cur[IDX_SII]*y_cur[IDX_SiCI] - - k[706]*y_cur[IDX_SII]*y_cur[IDX_SiSI] + - k[707]*y_cur[IDX_SI]*y_cur[IDX_CII] + - k[708]*y_cur[IDX_SI]*y_cur[IDX_CII] + - k[709]*y_cur[IDX_SI]*y_cur[IDX_H2SII] + - k[710]*y_cur[IDX_SI]*y_cur[IDX_HSII] - - k[724]*y_cur[IDX_SiI]*y_cur[IDX_SII] - - k[725]*y_cur[IDX_SiHI]*y_cur[IDX_SII] + - k[1429]*y_cur[IDX_CII]*y_cur[IDX_SOI] - - k[1464]*y_cur[IDX_C2I]*y_cur[IDX_SII] - - k[1573]*y_cur[IDX_C2H2I]*y_cur[IDX_SII] - - k[1645]*y_cur[IDX_C2H3I]*y_cur[IDX_SII] - - k[1715]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - - k[1716]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - - k[1717]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] - - k[1750]*y_cur[IDX_C2HI]*y_cur[IDX_SII] - - k[2017]*y_cur[IDX_CH2I]*y_cur[IDX_SII] - - k[2101]*y_cur[IDX_CH3I]*y_cur[IDX_SII] - - k[2215]*y_cur[IDX_CH4I]*y_cur[IDX_SII] - - k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] - - k[2265]*y_cur[IDX_CHI]*y_cur[IDX_SII] + - k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + - k[2353]*y_cur[IDX_HII]*y_cur[IDX_HSI] + - k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - - k[2470]*y_cur[IDX_H2I]*y_cur[IDX_SII] - - k[2500]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - - k[2501]*y_cur[IDX_H2COI]*y_cur[IDX_SII] + - k[2844]*y_cur[IDX_HI]*y_cur[IDX_HSII] - - k[3012]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + - k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + - k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + - k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + - k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + - k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + - k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] + - k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + - k[3295]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + - k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] + - k[3303]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + - k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + - k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + - k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + - k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + - k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + - k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] - - k[3624]*y_cur[IDX_NHI]*y_cur[IDX_SII] + - k[3643]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + - k[3649]*y_cur[IDX_OII]*y_cur[IDX_OCSI] - - k[3674]*y_cur[IDX_O2I]*y_cur[IDX_SII] + - k[3742]*y_cur[IDX_OI]*y_cur[IDX_HSII] - - k[3808]*y_cur[IDX_OHI]*y_cur[IDX_SII] - - k[3820]*y_cur[IDX_SII]*y_cur[IDX_C3H2I] - - k[3821]*y_cur[IDX_SII]*y_cur[IDX_C3HI] - - k[3822]*y_cur[IDX_SII]*y_cur[IDX_C4HI] - - k[3823]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[3824]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[3825]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[3826]*y_cur[IDX_SII]*y_cur[IDX_CH3CHCH2I] - - k[3827]*y_cur[IDX_SII]*y_cur[IDX_H2CCCI] - - k[3828]*y_cur[IDX_SII]*y_cur[IDX_H2SI] - - k[3829]*y_cur[IDX_SII]*y_cur[IDX_H2SI] - - k[3830]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - - k[3831]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - - k[3832]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] - - k[3833]*y_cur[IDX_SII]*y_cur[IDX_OCSI] - - k[3885]*y_cur[IDX_SiHI]*y_cur[IDX_SII] - - k[3915]*y_cur[IDX_CM]*y_cur[IDX_SII] - - k[3950]*y_cur[IDX_C10M]*y_cur[IDX_SII] - - k[3985]*y_cur[IDX_C10HM]*y_cur[IDX_SII] - - k[4020]*y_cur[IDX_C2M]*y_cur[IDX_SII] - - k[4055]*y_cur[IDX_C2HM]*y_cur[IDX_SII] - - k[4090]*y_cur[IDX_C3M]*y_cur[IDX_SII] - - k[4125]*y_cur[IDX_C3HM]*y_cur[IDX_SII] - - k[4160]*y_cur[IDX_C3NM]*y_cur[IDX_SII] - - k[4195]*y_cur[IDX_C4M]*y_cur[IDX_SII] - - k[4230]*y_cur[IDX_C4HM]*y_cur[IDX_SII] - - k[4265]*y_cur[IDX_C5M]*y_cur[IDX_SII] - - k[4300]*y_cur[IDX_C5HM]*y_cur[IDX_SII] - - k[4335]*y_cur[IDX_C5NM]*y_cur[IDX_SII] - - k[4370]*y_cur[IDX_C6M]*y_cur[IDX_SII] - - k[4405]*y_cur[IDX_C6HM]*y_cur[IDX_SII] - - k[4440]*y_cur[IDX_C7M]*y_cur[IDX_SII] - - k[4475]*y_cur[IDX_C7HM]*y_cur[IDX_SII] - - k[4510]*y_cur[IDX_C8M]*y_cur[IDX_SII] - - k[4545]*y_cur[IDX_C8HM]*y_cur[IDX_SII] - - k[4580]*y_cur[IDX_C9M]*y_cur[IDX_SII] - - k[4615]*y_cur[IDX_C9HM]*y_cur[IDX_SII] - - k[4650]*y_cur[IDX_CHM]*y_cur[IDX_SII] - - k[4685]*y_cur[IDX_CNM]*y_cur[IDX_SII] - - k[4721]*y_cur[IDX_HM]*y_cur[IDX_SII] - - k[4756]*y_cur[IDX_OM]*y_cur[IDX_SII] - - k[4791]*y_cur[IDX_O2M]*y_cur[IDX_SII] - - k[4826]*y_cur[IDX_OHM]*y_cur[IDX_SII] - - k[4861]*y_cur[IDX_SM]*y_cur[IDX_SII] - - k[5528]*y_cur[IDX_CI]*y_cur[IDX_SII] - - k[5561]*y_cur[IDX_H2I]*y_cur[IDX_SII] - - k[5625]*y_cur[IDX_SII]*y_cur[IDX_eM] + k[5913]*y_cur[IDX_SI] + - k[6140]*y_cur[IDX_CSII] + k[6205]*y_cur[IDX_HSII] + - k[6255]*y_cur[IDX_SI] + k[6303]*y_cur[IDX_SI] - - k[6424]*y_cur[IDX_SII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SM] = 0.0 - k[58]*y_cur[IDX_CI]*y_cur[IDX_SM] - - k[65]*y_cur[IDX_COI]*y_cur[IDX_SM] - - k[109]*y_cur[IDX_HI]*y_cur[IDX_SM] - - k[123]*y_cur[IDX_NI]*y_cur[IDX_SM] - - k[127]*y_cur[IDX_O2I]*y_cur[IDX_SM] - - k[132]*y_cur[IDX_OI]*y_cur[IDX_SM] - - k[4832]*y_cur[IDX_SM]*y_cur[IDX_CII] - - k[4833]*y_cur[IDX_SM]*y_cur[IDX_C2H2II] - - k[4834]*y_cur[IDX_SM]*y_cur[IDX_C2H3II] - - k[4835]*y_cur[IDX_SM]*y_cur[IDX_C4H2II] - - k[4836]*y_cur[IDX_SM]*y_cur[IDX_C4H3II] - - k[4837]*y_cur[IDX_SM]*y_cur[IDX_C4SII] - - k[4838]*y_cur[IDX_SM]*y_cur[IDX_CH2CCHII] - - k[4839]*y_cur[IDX_SM]*y_cur[IDX_CH3II] - - k[4840]*y_cur[IDX_SM]*y_cur[IDX_CNCII] - - k[4841]*y_cur[IDX_SM]*y_cur[IDX_FeII] - - k[4842]*y_cur[IDX_SM]*y_cur[IDX_HII] - - k[4843]*y_cur[IDX_SM]*y_cur[IDX_H2COII] - - k[4844]*y_cur[IDX_SM]*y_cur[IDX_H2SII] - - k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] - - k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] - - k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] - - k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - - k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] - - k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] - - k[4851]*y_cur[IDX_SM]*y_cur[IDX_HCOII] - - k[4852]*y_cur[IDX_SM]*y_cur[IDX_HeII] - - k[4853]*y_cur[IDX_SM]*y_cur[IDX_MgII] - - k[4854]*y_cur[IDX_SM]*y_cur[IDX_NII] - - k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] - - k[4856]*y_cur[IDX_SM]*y_cur[IDX_NH3II] - - k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] - - k[4858]*y_cur[IDX_SM]*y_cur[IDX_NOII] - - k[4859]*y_cur[IDX_SM]*y_cur[IDX_NaII] - - k[4860]*y_cur[IDX_SM]*y_cur[IDX_OII] - - k[4861]*y_cur[IDX_SM]*y_cur[IDX_SII] - - k[4862]*y_cur[IDX_SM]*y_cur[IDX_SOII] - - k[4863]*y_cur[IDX_SM]*y_cur[IDX_SiII] - - k[4864]*y_cur[IDX_SM]*y_cur[IDX_SiOII] - - k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] - - k[4866]*y_cur[IDX_SM]*y_cur[IDX_SiSII] + - k[5610]*y_cur[IDX_SI]*y_cur[IDX_eM] - k[5911]*y_cur[IDX_SM] - - k[6252]*y_cur[IDX_SM]; - ydot[yistart + IDX_S2I] = 0.0 - k[414]*y_cur[IDX_HII]*y_cur[IDX_S2I] - + k[630]*y_cur[IDX_NOI]*y_cur[IDX_S2II] + - k[1140]*y_cur[IDX_HS2II]*y_cur[IDX_eM] + - k[2579]*y_cur[IDX_H2SI]*y_cur[IDX_HS2II] - - k[2739]*y_cur[IDX_H3II]*y_cur[IDX_S2I] - + k[5292]*y_cur[IDX_NI]*y_cur[IDX_SiCI] - + k[5293]*y_cur[IDX_NI]*y_cur[IDX_SiCI] - + k[5294]*y_cur[IDX_NI]*y_cur[IDX_SiH2I] - + k[5295]*y_cur[IDX_NI]*y_cur[IDX_SiH3I] - + k[5296]*y_cur[IDX_NI]*y_cur[IDX_SiHI] + + k[5305]*y_cur[IDX_NHI]*y_cur[IDX_CNI] + + k[5310]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + + k[5320]*y_cur[IDX_NHI]*y_cur[IDX_OI] + + k[5321]*y_cur[IDX_NHI]*y_cur[IDX_OHI] + + k[5324]*y_cur[IDX_NHI]*y_cur[IDX_SI] + + k[5334]*y_cur[IDX_NOI]*y_cur[IDX_SI] + + k[5386]*y_cur[IDX_OI]*y_cur[IDX_CNI] + + k[5387]*y_cur[IDX_OI]*y_cur[IDX_CNI] + + k[5417]*y_cur[IDX_OI]*y_cur[IDX_N2I] + + k[5424]*y_cur[IDX_OI]*y_cur[IDX_NOI] + + k[5426]*y_cur[IDX_OI]*y_cur[IDX_NSI] + + k[5451]*y_cur[IDX_OI]*y_cur[IDX_SiNI] + + k[5493]*y_cur[IDX_SiI]*y_cur[IDX_NOI] - + k[5504]*y_cur[IDX_CII]*y_cur[IDX_NI] - + k[5524]*y_cur[IDX_CI]*y_cur[IDX_NI] - + k[5581]*y_cur[IDX_NII]*y_cur[IDX_NI] + + k[5621]*y_cur[IDX_NII]*y_cur[IDX_eM] - k[5684]*y_cur[IDX_NI] + + k[5710]*y_cur[IDX_C2NI] + k[5823]*y_cur[IDX_CNI] + + k[5878]*y_cur[IDX_N2I] + k[5878]*y_cur[IDX_N2I] + + k[5879]*y_cur[IDX_N2OI] - k[5880]*y_cur[IDX_NI] + + k[5888]*y_cur[IDX_NHI] + k[5892]*y_cur[IDX_NOI] + + k[5893]*y_cur[IDX_NSI] + k[5909]*y_cur[IDX_PNI] + + k[5931]*y_cur[IDX_SiNI] + k[5995]*y_cur[IDX_C2NI] + + k[6019]*y_cur[IDX_C4NI] + k[6134]*y_cur[IDX_CNI] + + k[6211]*y_cur[IDX_N2I] + k[6211]*y_cur[IDX_N2I] + + k[6214]*y_cur[IDX_N2OI] + k[6217]*y_cur[IDX_NHII] + + k[6224]*y_cur[IDX_NHI] + k[6229]*y_cur[IDX_NOI] + + k[6230]*y_cur[IDX_NSI] + k[6250]*y_cur[IDX_PNI] + + k[6281]*y_cur[IDX_SiNI] - k[6300]*y_cur[IDX_NI] + + k[6319]*y_cur[IDX_NII]*y_cur[IDX_GRAINM] + + k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM] + + k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + + k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM] + + k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM] + + k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM] + + k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + + k[6407]*y_cur[IDX_NOII]*y_cur[IDX_GRAINM] + + k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + + k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + + k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM] + + k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM] + + k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM] + + k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + + k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM] + + k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] - k[6894]*y_cur[IDX_NI] + + k[7076]*y_cur[IDX_GNI] + k[7258]*y_cur[IDX_GNI] + + k[7440]*y_cur[IDX_GNI]; + ydot[yistart + IDX_H3OII] = 0.0 - + k[1041]*y_cur[IDX_H3OII]*y_cur[IDX_eM] - + k[1042]*y_cur[IDX_H3OII]*y_cur[IDX_eM] - + k[1043]*y_cur[IDX_H3OII]*y_cur[IDX_eM] - + k[1044]*y_cur[IDX_H3OII]*y_cur[IDX_eM] - + k[1901]*y_cur[IDX_CI]*y_cur[IDX_H3OII] + + k[1952]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - + k[2004]*y_cur[IDX_CH2I]*y_cur[IDX_H3OII] + + k[2142]*y_cur[IDX_CH4II]*y_cur[IDX_H2OI] + + k[2195]*y_cur[IDX_CH4I]*y_cur[IDX_H2OII] + + k[2210]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] + + k[2226]*y_cur[IDX_CH5II]*y_cur[IDX_H2OI] - + k[2249]*y_cur[IDX_CHI]*y_cur[IDX_H3OII] + + k[2386]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + + k[2442]*y_cur[IDX_H2I]*y_cur[IDX_H2OII] + + k[2506]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + + k[2509]*y_cur[IDX_H2OII]*y_cur[IDX_H2OI] + + k[2511]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + + k[2513]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + + k[2522]*y_cur[IDX_H2OI]*y_cur[IDX_C2H2II] + + k[2523]*y_cur[IDX_H2OI]*y_cur[IDX_C2H3II] + + k[2524]*y_cur[IDX_H2OI]*y_cur[IDX_C2H5II] + + k[2534]*y_cur[IDX_H2OI]*y_cur[IDX_C2H6II] + + k[2542]*y_cur[IDX_H2OI]*y_cur[IDX_H2COII] + + k[2543]*y_cur[IDX_H2OI]*y_cur[IDX_H2ClII] + + k[2544]*y_cur[IDX_H2OI]*y_cur[IDX_H2SII] + + k[2545]*y_cur[IDX_H2OI]*y_cur[IDX_H3COII] + + k[2546]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] + + k[2547]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] + + k[2548]*y_cur[IDX_H2OI]*y_cur[IDX_HCO2II] + + k[2549]*y_cur[IDX_H2OI]*y_cur[IDX_HCOOH2II] + + k[2550]*y_cur[IDX_H2OI]*y_cur[IDX_HNOII] + + k[2551]*y_cur[IDX_H2OI]*y_cur[IDX_HNSiII] + + k[2552]*y_cur[IDX_H2OI]*y_cur[IDX_HOCSII] + + k[2553]*y_cur[IDX_H2OI]*y_cur[IDX_HPOII] + + k[2554]*y_cur[IDX_H2OI]*y_cur[IDX_HSII] + + k[2555]*y_cur[IDX_H2OI]*y_cur[IDX_HSO2II] + + k[2558]*y_cur[IDX_H2OI]*y_cur[IDX_N2HII] + + k[2560]*y_cur[IDX_H2OI]*y_cur[IDX_NCCNHII] + + k[2561]*y_cur[IDX_H2OI]*y_cur[IDX_O2HII] + + k[2566]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + + k[2568]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] + + k[2570]*y_cur[IDX_H2OI]*y_cur[IDX_SiCH3II] + + k[2571]*y_cur[IDX_H2OI]*y_cur[IDX_SiHII] + + k[2572]*y_cur[IDX_H2OI]*y_cur[IDX_SiH4II] + + k[2573]*y_cur[IDX_H2OI]*y_cur[IDX_SiH5II] + + k[2657]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2684]*y_cur[IDX_H3II]*y_cur[IDX_H2OI] + + k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - + k[2766]*y_cur[IDX_H3OII]*y_cur[IDX_C2I] - + k[2767]*y_cur[IDX_H3OII]*y_cur[IDX_C2H3I] - + k[2768]*y_cur[IDX_H3OII]*y_cur[IDX_C2H5OHI] - + k[2769]*y_cur[IDX_H3OII]*y_cur[IDX_C2OI] - + k[2770]*y_cur[IDX_H3OII]*y_cur[IDX_C2SI] - + k[2771]*y_cur[IDX_H3OII]*y_cur[IDX_C3I] - + k[2772]*y_cur[IDX_H3OII]*y_cur[IDX_C3H2I] - + k[2773]*y_cur[IDX_H3OII]*y_cur[IDX_C3HI] - + k[2774]*y_cur[IDX_H3OII]*y_cur[IDX_C3NI] - + k[2775]*y_cur[IDX_H3OII]*y_cur[IDX_C3OI] - + k[2776]*y_cur[IDX_H3OII]*y_cur[IDX_C3PI] - + k[2777]*y_cur[IDX_H3OII]*y_cur[IDX_C3SI] - + k[2778]*y_cur[IDX_H3OII]*y_cur[IDX_C4I] - + k[2779]*y_cur[IDX_H3OII]*y_cur[IDX_C4H3I] - + k[2780]*y_cur[IDX_H3OII]*y_cur[IDX_C4HI] - + k[2781]*y_cur[IDX_H3OII]*y_cur[IDX_C4PI] - + k[2782]*y_cur[IDX_H3OII]*y_cur[IDX_C4SI] - + k[2783]*y_cur[IDX_H3OII]*y_cur[IDX_C6H6I] - + k[2784]*y_cur[IDX_H3OII]*y_cur[IDX_CCPI] - + k[2785]*y_cur[IDX_H3OII]*y_cur[IDX_CH2CCHI] - + k[2786]*y_cur[IDX_H3OII]*y_cur[IDX_CH2COI] - + k[2787]*y_cur[IDX_H3OII]*y_cur[IDX_CH2NHI] - + k[2788]*y_cur[IDX_H3OII]*y_cur[IDX_CH2PHI] - + k[2789]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CCHI] - + k[2790]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHCH2I] - + k[2791]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHOI] - + k[2792]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CNI] - + k[2793]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COCH3I] - + k[2794]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OCH3I] - + k[2795]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OHI] - + k[2796]*y_cur[IDX_H3OII]*y_cur[IDX_CPI] - + k[2797]*y_cur[IDX_H3OII]*y_cur[IDX_CSI] - + k[2798]*y_cur[IDX_H3OII]*y_cur[IDX_H2CCCI] - + k[2799]*y_cur[IDX_H3OII]*y_cur[IDX_H2COI] - + k[2800]*y_cur[IDX_H3OII]*y_cur[IDX_H2S2I] - + k[2801]*y_cur[IDX_H3OII]*y_cur[IDX_H2SI] - + k[2802]*y_cur[IDX_H3OII]*y_cur[IDX_H2SiOI] - + k[2803]*y_cur[IDX_H3OII]*y_cur[IDX_HC2PI] - + k[2804]*y_cur[IDX_H3OII]*y_cur[IDX_HC3NI] - + k[2805]*y_cur[IDX_H3OII]*y_cur[IDX_C4H2I] - + k[2806]*y_cur[IDX_H3OII]*y_cur[IDX_HCNI] - + k[2807]*y_cur[IDX_H3OII]*y_cur[IDX_HCOOCH3I] - + k[2808]*y_cur[IDX_H3OII]*y_cur[IDX_HCPI] - + k[2809]*y_cur[IDX_H3OII]*y_cur[IDX_HCSiI] - + k[2810]*y_cur[IDX_H3OII]*y_cur[IDX_HNCI] - + k[2811]*y_cur[IDX_H3OII]*y_cur[IDX_HNSiI] - + k[2812]*y_cur[IDX_H3OII]*y_cur[IDX_HPOI] - + k[2813]*y_cur[IDX_H3OII]*y_cur[IDX_HS2I] - + k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] - + k[2815]*y_cur[IDX_H3OII]*y_cur[IDX_PI] - + k[2816]*y_cur[IDX_H3OII]*y_cur[IDX_PNI] - k[2817]*y_cur[IDX_H3OII]*y_cur[IDX_S2I] - - k[2988]*y_cur[IDX_HCOII]*y_cur[IDX_S2I] - - k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] - - k[4984]*y_cur[IDX_CI]*y_cur[IDX_S2I] - - k[5199]*y_cur[IDX_HI]*y_cur[IDX_S2I] - - k[5289]*y_cur[IDX_NI]*y_cur[IDX_S2I] - - k[5437]*y_cur[IDX_OI]*y_cur[IDX_S2I] + - k[5488]*y_cur[IDX_SI]*y_cur[IDX_HSI] + - k[5490]*y_cur[IDX_SI]*y_cur[IDX_SOI] - k[5912]*y_cur[IDX_S2I] - - k[6253]*y_cur[IDX_S2I] - k[6254]*y_cur[IDX_S2I] + - k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] - k[7033]*y_cur[IDX_S2I] - + k[7215]*y_cur[IDX_GS2I] + k[7397]*y_cur[IDX_GS2I] + - k[7579]*y_cur[IDX_GS2I]; - ydot[yistart + IDX_S2II] = 0.0 + - k[414]*y_cur[IDX_HII]*y_cur[IDX_S2I] - - k[630]*y_cur[IDX_NOI]*y_cur[IDX_S2II] - - k[1219]*y_cur[IDX_S2II]*y_cur[IDX_eM] - - k[1724]*y_cur[IDX_C2H5OHI]*y_cur[IDX_S2II] - - k[2112]*y_cur[IDX_C2H6I]*y_cur[IDX_S2II] - - k[2114]*y_cur[IDX_CH3CHOI]*y_cur[IDX_S2II] - - k[2132]*y_cur[IDX_CH3OHI]*y_cur[IDX_S2II] + - k[2582]*y_cur[IDX_H2SI]*y_cur[IDX_SOII] + - k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + - k[3829]*y_cur[IDX_SII]*y_cur[IDX_H2SI] + - k[3833]*y_cur[IDX_SII]*y_cur[IDX_OCSI] + - k[3858]*y_cur[IDX_SOII]*y_cur[IDX_OCSI] + k[6253]*y_cur[IDX_S2I] - - k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SOI] = 0.0 + k[132]*y_cur[IDX_OI]*y_cur[IDX_SM] - - k[193]*y_cur[IDX_CII]*y_cur[IDX_SOI] - - k[417]*y_cur[IDX_HII]*y_cur[IDX_SOI] + - k[539]*y_cur[IDX_MgI]*y_cur[IDX_SOII] + - k[615]*y_cur[IDX_NH3I]*y_cur[IDX_SOII] + - k[644]*y_cur[IDX_NaI]*y_cur[IDX_SOII] + - k[711]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + - k[712]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] + - k[713]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] + - k[714]*y_cur[IDX_SOII]*y_cur[IDX_CH3OCH3I] + - k[715]*y_cur[IDX_SOII]*y_cur[IDX_FeI] + - k[1141]*y_cur[IDX_HSOII]*y_cur[IDX_eM] + + k[2818]*y_cur[IDX_H3OII]*y_cur[IDX_SiI] - + k[2819]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2I] - + k[2820]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2HI] - + k[2821]*y_cur[IDX_H3OII]*y_cur[IDX_SiCI] - + k[2822]*y_cur[IDX_H3OII]*y_cur[IDX_SiCH3I] - + k[2823]*y_cur[IDX_H3OII]*y_cur[IDX_SiH2I] - + k[2824]*y_cur[IDX_H3OII]*y_cur[IDX_SiHI] - + k[2825]*y_cur[IDX_H3OII]*y_cur[IDX_SiNCI] - + k[2826]*y_cur[IDX_H3OII]*y_cur[IDX_SiOI] - + k[3028]*y_cur[IDX_HNC3I]*y_cur[IDX_H3OII] + + k[3489]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + + k[3512]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - + k[3538]*y_cur[IDX_NH2I]*y_cur[IDX_H3OII] - + k[3578]*y_cur[IDX_NH3I]*y_cur[IDX_H3OII] + + k[3612]*y_cur[IDX_NHI]*y_cur[IDX_H2OII] + + k[3729]*y_cur[IDX_OI]*y_cur[IDX_CH5II] + + k[3772]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + + k[3779]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] + + k[3799]*y_cur[IDX_OHI]*y_cur[IDX_H2OII] - + k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] - + k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] - + k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] - + k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] - + k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] - + k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] - + k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] - + k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] - + k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] - + k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] - + k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] - + k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] - + k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] - + k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] - + k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] - + k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] - + k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] - + k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] - + k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] - + k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] - + k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] - + k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] - + k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] - + k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] - + k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] - + k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] - + k[4811]*y_cur[IDX_OHM]*y_cur[IDX_H3OII] - + k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] - + k[5567]*y_cur[IDX_H3OII]*y_cur[IDX_C2H2I] - + k[5568]*y_cur[IDX_H3OII]*y_cur[IDX_C2H4I] - + k[5629]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OI] - + k[5635]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHI] - + k[5651]*y_cur[IDX_H3OII]*y_cur[IDX_COOCH3I] - + k[5657]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCOI] - + k[5663]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCHOI] - + k[5669]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COOHI] - + k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - + k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - + k[6345]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - + k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_OI] = 0.0 - k[8]*y_cur[IDX_CM]*y_cur[IDX_OI] - + k[63]*y_cur[IDX_CHI]*y_cur[IDX_OI] - + k[80]*y_cur[IDX_HM]*y_cur[IDX_OI] - + k[126]*y_cur[IDX_OM]*y_cur[IDX_OI] - + k[128]*y_cur[IDX_OI]*y_cur[IDX_C2M] - + k[129]*y_cur[IDX_OI]*y_cur[IDX_C2HM] - + k[130]*y_cur[IDX_OI]*y_cur[IDX_C3NM] - + k[131]*y_cur[IDX_OI]*y_cur[IDX_C5NM] - + k[132]*y_cur[IDX_OI]*y_cur[IDX_SM] + + k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] + + k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] + + k[139]*y_cur[IDX_H2I]*y_cur[IDX_OHI] + + k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] + + k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] + + k[145]*y_cur[IDX_HI]*y_cur[IDX_OHI] + + k[266]*y_cur[IDX_CH2I]*y_cur[IDX_OII] + + k[295]*y_cur[IDX_CHI]*y_cur[IDX_OII] - + k[406]*y_cur[IDX_HII]*y_cur[IDX_OI] + + k[492]*y_cur[IDX_HI]*y_cur[IDX_OII] + + k[619]*y_cur[IDX_NHI]*y_cur[IDX_OII] + + k[646]*y_cur[IDX_OII]*y_cur[IDX_C2I] + + k[647]*y_cur[IDX_OII]*y_cur[IDX_C2H2I] + + k[648]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + + k[649]*y_cur[IDX_OII]*y_cur[IDX_C2HI] + + k[650]*y_cur[IDX_OII]*y_cur[IDX_CH3CNI] + + k[651]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + + k[652]*y_cur[IDX_OII]*y_cur[IDX_CH4I] + + k[653]*y_cur[IDX_OII]*y_cur[IDX_COI] + + k[654]*y_cur[IDX_OII]*y_cur[IDX_FeI] + + k[655]*y_cur[IDX_OII]*y_cur[IDX_H2COI] + + k[656]*y_cur[IDX_OII]*y_cur[IDX_H2OI] + + k[657]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + + k[658]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + + k[659]*y_cur[IDX_OII]*y_cur[IDX_N2OI] + + k[660]*y_cur[IDX_OII]*y_cur[IDX_NH2I] + + k[661]*y_cur[IDX_OII]*y_cur[IDX_NH3I] + + k[662]*y_cur[IDX_OII]*y_cur[IDX_O2I] + + k[663]*y_cur[IDX_OII]*y_cur[IDX_OCSI] + + k[664]*y_cur[IDX_OII]*y_cur[IDX_OHI] + + k[665]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + + k[666]*y_cur[IDX_OM]*y_cur[IDX_CNI] + + k[667]*y_cur[IDX_OM]*y_cur[IDX_O2I] - + k[681]*y_cur[IDX_OI]*y_cur[IDX_CNII] - + k[682]*y_cur[IDX_OI]*y_cur[IDX_COII] - + k[683]*y_cur[IDX_OI]*y_cur[IDX_CO2II] - + k[684]*y_cur[IDX_OI]*y_cur[IDX_N2II] + + k[919]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + + k[956]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_eM] + + k[957]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + + k[980]*y_cur[IDX_COII]*y_cur[IDX_eM] + + k[981]*y_cur[IDX_CO2II]*y_cur[IDX_eM] + + k[986]*y_cur[IDX_ClOII]*y_cur[IDX_eM] + + k[996]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[1012]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + + k[1013]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + + k[1042]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + + k[1055]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + + k[1099]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + + k[1113]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] + + k[1135]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + + k[1136]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + k[1143]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + - k[1144]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + - k[1177]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + - k[1222]*y_cur[IDX_SO2II]*y_cur[IDX_eM] - - k[1428]*y_cur[IDX_CII]*y_cur[IDX_SOI] - - k[1429]*y_cur[IDX_CII]*y_cur[IDX_SOI] - - k[1430]*y_cur[IDX_CII]*y_cur[IDX_SOI] - - k[2096]*y_cur[IDX_CH3II]*y_cur[IDX_SOI] - - k[2742]*y_cur[IDX_H3II]*y_cur[IDX_SOI] - - k[2990]*y_cur[IDX_HCOII]*y_cur[IDX_SOI] - - k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] - - k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + - k[3676]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + - k[3842]*y_cur[IDX_SI]*y_cur[IDX_SiOII] + - k[3916]*y_cur[IDX_CM]*y_cur[IDX_SOII] + - k[3951]*y_cur[IDX_C10M]*y_cur[IDX_SOII] + - k[3986]*y_cur[IDX_C10HM]*y_cur[IDX_SOII] + - k[4021]*y_cur[IDX_C2M]*y_cur[IDX_SOII] + - k[4056]*y_cur[IDX_C2HM]*y_cur[IDX_SOII] + - k[4091]*y_cur[IDX_C3M]*y_cur[IDX_SOII] + - k[4126]*y_cur[IDX_C3HM]*y_cur[IDX_SOII] + - k[4161]*y_cur[IDX_C3NM]*y_cur[IDX_SOII] + - k[4196]*y_cur[IDX_C4M]*y_cur[IDX_SOII] + - k[4231]*y_cur[IDX_C4HM]*y_cur[IDX_SOII] + - k[4266]*y_cur[IDX_C5M]*y_cur[IDX_SOII] + - k[4301]*y_cur[IDX_C5HM]*y_cur[IDX_SOII] + - k[4336]*y_cur[IDX_C5NM]*y_cur[IDX_SOII] + - k[4371]*y_cur[IDX_C6M]*y_cur[IDX_SOII] + - k[4406]*y_cur[IDX_C6HM]*y_cur[IDX_SOII] + - k[4441]*y_cur[IDX_C7M]*y_cur[IDX_SOII] + - k[4476]*y_cur[IDX_C7HM]*y_cur[IDX_SOII] + - k[4511]*y_cur[IDX_C8M]*y_cur[IDX_SOII] + - k[4546]*y_cur[IDX_C8HM]*y_cur[IDX_SOII] + - k[4581]*y_cur[IDX_C9M]*y_cur[IDX_SOII] + - k[4616]*y_cur[IDX_C9HM]*y_cur[IDX_SOII] + - k[4651]*y_cur[IDX_CHM]*y_cur[IDX_SOII] + - k[4686]*y_cur[IDX_CNM]*y_cur[IDX_SOII] + - k[4722]*y_cur[IDX_HM]*y_cur[IDX_SOII] + + k[1168]*y_cur[IDX_NOII]*y_cur[IDX_eM] + + k[1169]*y_cur[IDX_NO2II]*y_cur[IDX_eM] + + k[1170]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + + k[1172]*y_cur[IDX_N2OII]*y_cur[IDX_eM] + + k[1174]*y_cur[IDX_O2II]*y_cur[IDX_eM] + + k[1174]*y_cur[IDX_O2II]*y_cur[IDX_eM] + + k[1178]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + + k[1180]*y_cur[IDX_OHII]*y_cur[IDX_eM] + + k[1218]*y_cur[IDX_POII]*y_cur[IDX_eM] + + k[1220]*y_cur[IDX_SOII]*y_cur[IDX_eM] + + k[1221]*y_cur[IDX_SO2II]*y_cur[IDX_eM] + + k[1221]*y_cur[IDX_SO2II]*y_cur[IDX_eM] + + k[1222]*y_cur[IDX_SO2II]*y_cur[IDX_eM] + + k[1266]*y_cur[IDX_SiOII]*y_cur[IDX_eM] + + k[1314]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + + k[1422]*y_cur[IDX_CII]*y_cur[IDX_O2I] + + k[1428]*y_cur[IDX_CII]*y_cur[IDX_SOI] + + k[1449]*y_cur[IDX_CM]*y_cur[IDX_NOI] + + k[1912]*y_cur[IDX_CI]*y_cur[IDX_O2II] + + k[1914]*y_cur[IDX_CI]*y_cur[IDX_OHII] + + k[1967]*y_cur[IDX_CHII]*y_cur[IDX_O2I] - + k[1969]*y_cur[IDX_CHII]*y_cur[IDX_OI] - + k[1991]*y_cur[IDX_CH2II]*y_cur[IDX_OI] + + k[2014]*y_cur[IDX_CH2I]*y_cur[IDX_O2II] + + k[2016]*y_cur[IDX_CH2I]*y_cur[IDX_OHII] + + k[2089]*y_cur[IDX_CH3II]*y_cur[IDX_O2I] - + k[2090]*y_cur[IDX_CH3II]*y_cur[IDX_OI] - + k[2091]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + + k[2209]*y_cur[IDX_CH4I]*y_cur[IDX_OHII] + + k[2262]*y_cur[IDX_CHI]*y_cur[IDX_O2II] + + k[2264]*y_cur[IDX_CHI]*y_cur[IDX_OHII] + + k[2276]*y_cur[IDX_CNII]*y_cur[IDX_O2I] + + k[2334]*y_cur[IDX_HII]*y_cur[IDX_CO2I] + + k[2354]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - + k[2396]*y_cur[IDX_H2II]*y_cur[IDX_OI] + + k[2535]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[2730]*y_cur[IDX_H3II]*y_cur[IDX_OI] - + k[2731]*y_cur[IDX_H3II]*y_cur[IDX_OI] + + k[2841]*y_cur[IDX_HI]*y_cur[IDX_CO2II] + + k[3099]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + + k[3205]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + + k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] + + k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] + + k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + + k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + + k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + + k[3290]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + + k[3291]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + + k[3293]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] + + k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + + k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + + k[3332]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + + k[3356]*y_cur[IDX_NII]*y_cur[IDX_NOI] + + k[3357]*y_cur[IDX_NII]*y_cur[IDX_O2I] + + k[3465]*y_cur[IDX_NI]*y_cur[IDX_O2II] + + k[3468]*y_cur[IDX_NI]*y_cur[IDX_SOII] + + k[3491]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + + k[3500]*y_cur[IDX_NHII]*y_cur[IDX_NOI] - + k[3503]*y_cur[IDX_NHII]*y_cur[IDX_OI] + + k[3514]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + + k[3524]*y_cur[IDX_NH2II]*y_cur[IDX_O2I] + + k[3547]*y_cur[IDX_NH2I]*y_cur[IDX_OHII] + + k[3620]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + + k[3623]*y_cur[IDX_NHI]*y_cur[IDX_OHII] + + k[3654]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + + k[3667]*y_cur[IDX_O2II]*y_cur[IDX_SI] + + k[3668]*y_cur[IDX_O2I]*y_cur[IDX_C3II] + + k[3671]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + + k[3672]*y_cur[IDX_O2I]*y_cur[IDX_CSII] + + k[3674]*y_cur[IDX_O2I]*y_cur[IDX_SII] - + k[3678]*y_cur[IDX_OI]*y_cur[IDX_C10M] - + k[3679]*y_cur[IDX_OI]*y_cur[IDX_C10HII] - + k[3680]*y_cur[IDX_OI]*y_cur[IDX_C10HII] - + k[3681]*y_cur[IDX_OI]*y_cur[IDX_C10HM] - + k[3682]*y_cur[IDX_OI]*y_cur[IDX_C10H2II] - + k[3683]*y_cur[IDX_OI]*y_cur[IDX_C10H3II] - + k[3684]*y_cur[IDX_OI]*y_cur[IDX_C2II] - + k[3685]*y_cur[IDX_OI]*y_cur[IDX_C2M] - + k[3686]*y_cur[IDX_OI]*y_cur[IDX_C2HII] - + k[3687]*y_cur[IDX_OI]*y_cur[IDX_C2HM] - + k[3688]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] - + k[3689]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] - + k[3690]*y_cur[IDX_OI]*y_cur[IDX_C2H3II] - + k[3691]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] - + k[3692]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] - + k[3693]*y_cur[IDX_OI]*y_cur[IDX_C3M] - + k[3694]*y_cur[IDX_OI]*y_cur[IDX_C3HM] - + k[3695]*y_cur[IDX_OI]*y_cur[IDX_C3H2II] - + k[3696]*y_cur[IDX_OI]*y_cur[IDX_C3H3II] - + k[3697]*y_cur[IDX_OI]*y_cur[IDX_C3H4II] - + k[3698]*y_cur[IDX_OI]*y_cur[IDX_C4M] - + k[3699]*y_cur[IDX_OI]*y_cur[IDX_C4HII] - + k[3700]*y_cur[IDX_OI]*y_cur[IDX_C4HM] - + k[3701]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - + k[3702]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] - + k[3703]*y_cur[IDX_OI]*y_cur[IDX_C5M] - + k[3704]*y_cur[IDX_OI]*y_cur[IDX_C5HII] - + k[3705]*y_cur[IDX_OI]*y_cur[IDX_C5HM] - + k[3706]*y_cur[IDX_OI]*y_cur[IDX_C5H2II] - + k[3707]*y_cur[IDX_OI]*y_cur[IDX_C5H3II] - + k[3708]*y_cur[IDX_OI]*y_cur[IDX_C6M] - + k[3709]*y_cur[IDX_OI]*y_cur[IDX_C6HM] - + k[3710]*y_cur[IDX_OI]*y_cur[IDX_C6H2II] - + k[3711]*y_cur[IDX_OI]*y_cur[IDX_C6H3II] - + k[3712]*y_cur[IDX_OI]*y_cur[IDX_C7M] - + k[3713]*y_cur[IDX_OI]*y_cur[IDX_C7HII] - + k[3714]*y_cur[IDX_OI]*y_cur[IDX_C7HM] - + k[3715]*y_cur[IDX_OI]*y_cur[IDX_C7H2II] - + k[3716]*y_cur[IDX_OI]*y_cur[IDX_C7H3II] - + k[3717]*y_cur[IDX_OI]*y_cur[IDX_C8M] - + k[3718]*y_cur[IDX_OI]*y_cur[IDX_C8HM] - + k[3719]*y_cur[IDX_OI]*y_cur[IDX_C8H2II] - + k[3720]*y_cur[IDX_OI]*y_cur[IDX_C8H3II] - + k[3721]*y_cur[IDX_OI]*y_cur[IDX_C9M] - + k[3722]*y_cur[IDX_OI]*y_cur[IDX_C9HII] - + k[3723]*y_cur[IDX_OI]*y_cur[IDX_C9HM] - + k[3724]*y_cur[IDX_OI]*y_cur[IDX_C9H2II] - + k[3725]*y_cur[IDX_OI]*y_cur[IDX_C9H3II] - + k[3726]*y_cur[IDX_OI]*y_cur[IDX_CH2CCHII] - + k[3727]*y_cur[IDX_OI]*y_cur[IDX_CH4II] - + k[3728]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - + k[3729]*y_cur[IDX_OI]*y_cur[IDX_CH5II] - + k[3730]*y_cur[IDX_OI]*y_cur[IDX_CO2II] - + k[3731]*y_cur[IDX_OI]*y_cur[IDX_CPII] - + k[3732]*y_cur[IDX_OI]*y_cur[IDX_CSII] - + k[3733]*y_cur[IDX_OI]*y_cur[IDX_H2OII] - + k[3734]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - + k[3735]*y_cur[IDX_OI]*y_cur[IDX_H2SII] - + k[3736]*y_cur[IDX_OI]*y_cur[IDX_HCO2II] - + k[3737]*y_cur[IDX_OI]*y_cur[IDX_HCPII] - + k[3738]*y_cur[IDX_OI]*y_cur[IDX_HCSII] - + k[3739]*y_cur[IDX_OI]*y_cur[IDX_HCSII] - + k[3740]*y_cur[IDX_OI]*y_cur[IDX_HNOII] - + k[3741]*y_cur[IDX_OI]*y_cur[IDX_HPOII] - + k[3742]*y_cur[IDX_OI]*y_cur[IDX_HSII] - + k[3743]*y_cur[IDX_OI]*y_cur[IDX_HSII] - + k[3744]*y_cur[IDX_OI]*y_cur[IDX_N2II] - + k[3745]*y_cur[IDX_OI]*y_cur[IDX_N2HII] - + k[3746]*y_cur[IDX_OI]*y_cur[IDX_NH2II] - + k[3747]*y_cur[IDX_OI]*y_cur[IDX_NH3II] - + k[3748]*y_cur[IDX_OI]*y_cur[IDX_NSII] - + k[3749]*y_cur[IDX_OI]*y_cur[IDX_O2HII] - + k[3750]*y_cur[IDX_OI]*y_cur[IDX_OHII] - + k[3751]*y_cur[IDX_OI]*y_cur[IDX_PHII] - + k[3752]*y_cur[IDX_OI]*y_cur[IDX_PNII] - + k[3753]*y_cur[IDX_OI]*y_cur[IDX_SiCII] - + k[3754]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - + k[3755]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - + k[3756]*y_cur[IDX_OI]*y_cur[IDX_SiHII] - + k[3757]*y_cur[IDX_OI]*y_cur[IDX_SiH2II] - + k[3758]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - + k[3759]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - + k[3760]*y_cur[IDX_OI]*y_cur[IDX_SiH5II] - + k[3761]*y_cur[IDX_OI]*y_cur[IDX_SiNII] - + k[3762]*y_cur[IDX_OI]*y_cur[IDX_SiNCII] - + k[3763]*y_cur[IDX_OI]*y_cur[IDX_SiNCHII] - + k[3764]*y_cur[IDX_OI]*y_cur[IDX_SiOII] + + k[3769]*y_cur[IDX_OHII]*y_cur[IDX_C2I] + + k[3770]*y_cur[IDX_OHII]*y_cur[IDX_C2HI] + + k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + + k[3774]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + + k[3775]*y_cur[IDX_OHII]*y_cur[IDX_CNI] + + k[3776]*y_cur[IDX_OHII]*y_cur[IDX_CO2I] + + k[3777]*y_cur[IDX_OHII]*y_cur[IDX_COI] + + k[3778]*y_cur[IDX_OHII]*y_cur[IDX_H2COI] + + k[3779]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] + + k[3780]*y_cur[IDX_OHII]*y_cur[IDX_H2SI] + + k[3781]*y_cur[IDX_OHII]*y_cur[IDX_HCNI] + + k[3783]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + + k[3784]*y_cur[IDX_OHII]*y_cur[IDX_HNCI] + + k[3785]*y_cur[IDX_OHII]*y_cur[IDX_N2I] + + k[3786]*y_cur[IDX_OHII]*y_cur[IDX_NH3I] + + k[3787]*y_cur[IDX_OHII]*y_cur[IDX_NOI] + + k[3788]*y_cur[IDX_OHII]*y_cur[IDX_OHI] + + k[3789]*y_cur[IDX_OHII]*y_cur[IDX_SI] + + k[3791]*y_cur[IDX_OHII]*y_cur[IDX_SiI] + + k[3792]*y_cur[IDX_OHII]*y_cur[IDX_SiCI] + + k[3793]*y_cur[IDX_OHII]*y_cur[IDX_SiHI] + + k[3794]*y_cur[IDX_OHII]*y_cur[IDX_SiOI] + + k[3798]*y_cur[IDX_OHI]*y_cur[IDX_COII] + + k[3799]*y_cur[IDX_OHI]*y_cur[IDX_H2OII] + + k[3805]*y_cur[IDX_OHI]*y_cur[IDX_NH3II] + + k[3812]*y_cur[IDX_PII]*y_cur[IDX_O2I] + + k[3884]*y_cur[IDX_SiH3II]*y_cur[IDX_O2I] + + k[3914]*y_cur[IDX_CM]*y_cur[IDX_OII] + + k[3949]*y_cur[IDX_C10M]*y_cur[IDX_OII] + + k[3984]*y_cur[IDX_C10HM]*y_cur[IDX_OII] + + k[4019]*y_cur[IDX_C2M]*y_cur[IDX_OII] + + k[4054]*y_cur[IDX_C2HM]*y_cur[IDX_OII] + + k[4089]*y_cur[IDX_C3M]*y_cur[IDX_OII] + + k[4124]*y_cur[IDX_C3HM]*y_cur[IDX_OII] + + k[4159]*y_cur[IDX_C3NM]*y_cur[IDX_OII] + + k[4194]*y_cur[IDX_C4M]*y_cur[IDX_OII] + + k[4229]*y_cur[IDX_C4HM]*y_cur[IDX_OII] + + k[4264]*y_cur[IDX_C5M]*y_cur[IDX_OII] + + k[4299]*y_cur[IDX_C5HM]*y_cur[IDX_OII] + + k[4334]*y_cur[IDX_C5NM]*y_cur[IDX_OII] + + k[4369]*y_cur[IDX_C6M]*y_cur[IDX_OII] + + k[4404]*y_cur[IDX_C6HM]*y_cur[IDX_OII] + + k[4439]*y_cur[IDX_C7M]*y_cur[IDX_OII] + + k[4474]*y_cur[IDX_C7HM]*y_cur[IDX_OII] + + k[4509]*y_cur[IDX_C8M]*y_cur[IDX_OII] + + k[4544]*y_cur[IDX_C8HM]*y_cur[IDX_OII] + + k[4579]*y_cur[IDX_C9M]*y_cur[IDX_OII] + + k[4614]*y_cur[IDX_C9HM]*y_cur[IDX_OII] + + k[4649]*y_cur[IDX_CHM]*y_cur[IDX_OII] + + k[4684]*y_cur[IDX_CNM]*y_cur[IDX_OII] + + k[4720]*y_cur[IDX_HM]*y_cur[IDX_OII] + + k[4727]*y_cur[IDX_OM]*y_cur[IDX_CII] + + k[4728]*y_cur[IDX_OM]*y_cur[IDX_C2H2II] + + k[4729]*y_cur[IDX_OM]*y_cur[IDX_C2H3II] + + k[4730]*y_cur[IDX_OM]*y_cur[IDX_C4H2II] + + k[4731]*y_cur[IDX_OM]*y_cur[IDX_C4H3II] + + k[4732]*y_cur[IDX_OM]*y_cur[IDX_C4SII] + + k[4733]*y_cur[IDX_OM]*y_cur[IDX_CH2CCHII] + + k[4734]*y_cur[IDX_OM]*y_cur[IDX_CH3II] + + k[4735]*y_cur[IDX_OM]*y_cur[IDX_CNCII] + + k[4736]*y_cur[IDX_OM]*y_cur[IDX_FeII] + + k[4737]*y_cur[IDX_OM]*y_cur[IDX_HII] + + k[4738]*y_cur[IDX_OM]*y_cur[IDX_H2COII] + + k[4739]*y_cur[IDX_OM]*y_cur[IDX_H2SII] + + k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] + + k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] + + k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] + + k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + + k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + + k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + + k[4746]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + + k[4747]*y_cur[IDX_OM]*y_cur[IDX_HeII] + + k[4748]*y_cur[IDX_OM]*y_cur[IDX_MgII] + + k[4749]*y_cur[IDX_OM]*y_cur[IDX_NII] + + k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] + + k[4751]*y_cur[IDX_OM]*y_cur[IDX_NH3II] + + k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] + + k[4753]*y_cur[IDX_OM]*y_cur[IDX_NOII] + + k[4754]*y_cur[IDX_OM]*y_cur[IDX_NaII] + + k[4755]*y_cur[IDX_OM]*y_cur[IDX_OII] + + k[4755]*y_cur[IDX_OM]*y_cur[IDX_OII] + + k[4756]*y_cur[IDX_OM]*y_cur[IDX_SII] + k[4757]*y_cur[IDX_OM]*y_cur[IDX_SOII] + - k[4792]*y_cur[IDX_O2M]*y_cur[IDX_SOII] + - k[4827]*y_cur[IDX_OHM]*y_cur[IDX_SOII] + - k[4862]*y_cur[IDX_SM]*y_cur[IDX_SOII] + - k[4985]*y_cur[IDX_CI]*y_cur[IDX_SO2I] - - k[4986]*y_cur[IDX_CI]*y_cur[IDX_SOI] - - k[4987]*y_cur[IDX_CI]*y_cur[IDX_SOI] - - k[5102]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - - k[5103]*y_cur[IDX_CHI]*y_cur[IDX_SOI] - + k[4758]*y_cur[IDX_OM]*y_cur[IDX_SiII] + + k[4759]*y_cur[IDX_OM]*y_cur[IDX_SiOII] + + k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] + + k[4761]*y_cur[IDX_OM]*y_cur[IDX_SiSII] + + k[4790]*y_cur[IDX_O2M]*y_cur[IDX_OII] + + k[4825]*y_cur[IDX_OHM]*y_cur[IDX_OII] + + k[4860]*y_cur[IDX_SM]*y_cur[IDX_OII] + + k[4957]*y_cur[IDX_CI]*y_cur[IDX_COI] + + k[4974]*y_cur[IDX_CI]*y_cur[IDX_NOI] + + k[4978]*y_cur[IDX_CI]*y_cur[IDX_O2I] + + k[4982]*y_cur[IDX_CI]*y_cur[IDX_OHI] + + k[4986]*y_cur[IDX_CI]*y_cur[IDX_SOI] + + k[5010]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] - + k[5012]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - + k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - + k[5014]*y_cur[IDX_CH2I]*y_cur[IDX_OI] - + k[5015]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + + k[5018]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - + k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] - + k[5044]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + + k[5045]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + + k[5083]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + + k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5092]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5093]*y_cur[IDX_CHI]*y_cur[IDX_O2I] - + k[5096]*y_cur[IDX_CHI]*y_cur[IDX_OI] - + k[5097]*y_cur[IDX_CHI]*y_cur[IDX_OI] + + k[5124]*y_cur[IDX_CNI]*y_cur[IDX_O2I] + + k[5130]*y_cur[IDX_COI]*y_cur[IDX_O2I] - + k[5147]*y_cur[IDX_H2I]*y_cur[IDX_OI] + + k[5172]*y_cur[IDX_HI]*y_cur[IDX_HCOI] + + k[5175]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + + k[5186]*y_cur[IDX_HI]*y_cur[IDX_NOI] + + k[5190]*y_cur[IDX_HI]*y_cur[IDX_O2I] + + k[5191]*y_cur[IDX_HI]*y_cur[IDX_O2HI] + + k[5194]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + + k[5198]*y_cur[IDX_HI]*y_cur[IDX_OHI] + k[5200]*y_cur[IDX_HI]*y_cur[IDX_SOI] - - k[5201]*y_cur[IDX_HI]*y_cur[IDX_SOI] - - k[5290]*y_cur[IDX_NI]*y_cur[IDX_SOI] - - k[5291]*y_cur[IDX_NI]*y_cur[IDX_SOI] + - k[5334]*y_cur[IDX_NOI]*y_cur[IDX_SI] + - k[5337]*y_cur[IDX_O2I]*y_cur[IDX_SI] - - k[5338]*y_cur[IDX_O2I]*y_cur[IDX_SOI] + - k[5393]*y_cur[IDX_OI]*y_cur[IDX_CSI] + - k[5416]*y_cur[IDX_OI]*y_cur[IDX_HSI] + - k[5426]*y_cur[IDX_OI]*y_cur[IDX_NSI] + - k[5431]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + - k[5437]*y_cur[IDX_OI]*y_cur[IDX_S2I] + - k[5438]*y_cur[IDX_OI]*y_cur[IDX_SO2I] - - k[5439]*y_cur[IDX_OI]*y_cur[IDX_SOI] + - k[5480]*y_cur[IDX_OHI]*y_cur[IDX_SI] - - k[5481]*y_cur[IDX_OHI]*y_cur[IDX_SOI] + - k[5489]*y_cur[IDX_SI]*y_cur[IDX_SO2I] + - k[5489]*y_cur[IDX_SI]*y_cur[IDX_SO2I] - - k[5490]*y_cur[IDX_SI]*y_cur[IDX_SOI] - - k[5583]*y_cur[IDX_OI]*y_cur[IDX_SOI] + k[5914]*y_cur[IDX_SO2I] - - k[5915]*y_cur[IDX_SOI] - k[5916]*y_cur[IDX_SOI] + - k[6256]*y_cur[IDX_SO2I] - k[6257]*y_cur[IDX_SOI] - - k[6258]*y_cur[IDX_SOI] + k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM] - + k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[5203]*y_cur[IDX_HCNOI]*y_cur[IDX_OI] - + k[5216]*y_cur[IDX_HOCNI]*y_cur[IDX_OI] - + k[5218]*y_cur[IDX_HONCI]*y_cur[IDX_OI] + + k[5220]*y_cur[IDX_N2I]*y_cur[IDX_O2I] + + k[5266]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + + k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + + k[5275]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + + k[5276]*y_cur[IDX_NI]*y_cur[IDX_NO2I] + + k[5279]*y_cur[IDX_NI]*y_cur[IDX_NOI] + + k[5281]*y_cur[IDX_NI]*y_cur[IDX_O2I] + + k[5284]*y_cur[IDX_NI]*y_cur[IDX_OHI] + + k[5288]*y_cur[IDX_NI]*y_cur[IDX_POI] + + k[5290]*y_cur[IDX_NI]*y_cur[IDX_SOI] + + k[5301]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] + + k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + + k[5316]*y_cur[IDX_NHI]*y_cur[IDX_O2I] - + k[5318]*y_cur[IDX_NHI]*y_cur[IDX_OI] - + k[5319]*y_cur[IDX_NHI]*y_cur[IDX_OI] - + k[5320]*y_cur[IDX_NHI]*y_cur[IDX_OI] + + k[5323]*y_cur[IDX_NHI]*y_cur[IDX_OHI] + + k[5328]*y_cur[IDX_NOI]*y_cur[IDX_NOI] + + k[5330]*y_cur[IDX_NOI]*y_cur[IDX_O2I] + + k[5333]*y_cur[IDX_NOI]*y_cur[IDX_SI] + + k[5337]*y_cur[IDX_O2I]*y_cur[IDX_SI] + + k[5338]*y_cur[IDX_O2I]*y_cur[IDX_SOI] - + k[5340]*y_cur[IDX_OI]*y_cur[IDX_C10I] - + k[5341]*y_cur[IDX_OI]*y_cur[IDX_C10HI] - + k[5342]*y_cur[IDX_OI]*y_cur[IDX_C11I] - + k[5343]*y_cur[IDX_OI]*y_cur[IDX_C2I] - + k[5344]*y_cur[IDX_OI]*y_cur[IDX_C2H2I] - + k[5345]*y_cur[IDX_OI]*y_cur[IDX_C2H3I] - + k[5346]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - + k[5347]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - + k[5348]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - + k[5349]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] - + k[5350]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - + k[5351]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] - + k[5352]*y_cur[IDX_OI]*y_cur[IDX_C2HI] - + k[5353]*y_cur[IDX_OI]*y_cur[IDX_C2NI] - + k[5354]*y_cur[IDX_OI]*y_cur[IDX_C2OI] - + k[5355]*y_cur[IDX_OI]*y_cur[IDX_C2SI] - + k[5356]*y_cur[IDX_OI]*y_cur[IDX_C3I] - + k[5357]*y_cur[IDX_OI]*y_cur[IDX_C3HI] - + k[5358]*y_cur[IDX_OI]*y_cur[IDX_C3NI] - + k[5359]*y_cur[IDX_OI]*y_cur[IDX_C3OI] - + k[5360]*y_cur[IDX_OI]*y_cur[IDX_C3PI] - + k[5361]*y_cur[IDX_OI]*y_cur[IDX_C4I] - + k[5362]*y_cur[IDX_OI]*y_cur[IDX_C4HI] - + k[5363]*y_cur[IDX_OI]*y_cur[IDX_C4NI] - + k[5364]*y_cur[IDX_OI]*y_cur[IDX_C4PI] - + k[5365]*y_cur[IDX_OI]*y_cur[IDX_C5I] - + k[5366]*y_cur[IDX_OI]*y_cur[IDX_C5HI] - + k[5367]*y_cur[IDX_OI]*y_cur[IDX_C5NI] - + k[5368]*y_cur[IDX_OI]*y_cur[IDX_C6I] - + k[5369]*y_cur[IDX_OI]*y_cur[IDX_C6HI] - + k[5370]*y_cur[IDX_OI]*y_cur[IDX_C7I] - + k[5371]*y_cur[IDX_OI]*y_cur[IDX_C7HI] - + k[5372]*y_cur[IDX_OI]*y_cur[IDX_C7NI] - + k[5373]*y_cur[IDX_OI]*y_cur[IDX_C8I] - + k[5374]*y_cur[IDX_OI]*y_cur[IDX_C8HI] - + k[5375]*y_cur[IDX_OI]*y_cur[IDX_C9I] - + k[5376]*y_cur[IDX_OI]*y_cur[IDX_C9HI] - + k[5377]*y_cur[IDX_OI]*y_cur[IDX_C9NI] - + k[5378]*y_cur[IDX_OI]*y_cur[IDX_CCPI] - + k[5379]*y_cur[IDX_OI]*y_cur[IDX_CClI] - + k[5380]*y_cur[IDX_OI]*y_cur[IDX_CClI] - + k[5381]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - + k[5382]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - + k[5383]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] - + k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] - + k[5385]*y_cur[IDX_OI]*y_cur[IDX_CH4I] - + k[5386]*y_cur[IDX_OI]*y_cur[IDX_CNI] - + k[5387]*y_cur[IDX_OI]*y_cur[IDX_CNI] - + k[5388]*y_cur[IDX_OI]*y_cur[IDX_CNI] - + k[5389]*y_cur[IDX_OI]*y_cur[IDX_CNOI] - + k[5390]*y_cur[IDX_OI]*y_cur[IDX_CO2I] - + k[5391]*y_cur[IDX_OI]*y_cur[IDX_CPI] - + k[5392]*y_cur[IDX_OI]*y_cur[IDX_CSI] - + k[5393]*y_cur[IDX_OI]*y_cur[IDX_CSI] - + k[5394]*y_cur[IDX_OI]*y_cur[IDX_ClOI] - + k[5395]*y_cur[IDX_OI]*y_cur[IDX_H2CCCI] - + k[5396]*y_cur[IDX_OI]*y_cur[IDX_H2CNI] - + k[5397]*y_cur[IDX_OI]*y_cur[IDX_H2COI] - + k[5398]*y_cur[IDX_OI]*y_cur[IDX_H2O2I] - + k[5399]*y_cur[IDX_OI]*y_cur[IDX_H2OI] - + k[5400]*y_cur[IDX_OI]*y_cur[IDX_H2SI] - + k[5401]*y_cur[IDX_OI]*y_cur[IDX_HC2PI] - + k[5402]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - + k[5403]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - + k[5404]*y_cur[IDX_OI]*y_cur[IDX_HCNI] - + k[5405]*y_cur[IDX_OI]*y_cur[IDX_HCOI] - + k[5406]*y_cur[IDX_OI]*y_cur[IDX_HCOI] - + k[5407]*y_cur[IDX_OI]*y_cur[IDX_HCPI] - + k[5408]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - + k[5409]*y_cur[IDX_OI]*y_cur[IDX_HCSI] - + k[5410]*y_cur[IDX_OI]*y_cur[IDX_HCSiI] - + k[5411]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - + k[5412]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - + k[5413]*y_cur[IDX_OI]*y_cur[IDX_HNOI] - + k[5414]*y_cur[IDX_OI]*y_cur[IDX_HPOI] - + k[5415]*y_cur[IDX_OI]*y_cur[IDX_HSI] - + k[5416]*y_cur[IDX_OI]*y_cur[IDX_HSI] - + k[5417]*y_cur[IDX_OI]*y_cur[IDX_N2I] - + k[5418]*y_cur[IDX_OI]*y_cur[IDX_N2OI] - + k[5419]*y_cur[IDX_OI]*y_cur[IDX_N2OI] - + k[5420]*y_cur[IDX_OI]*y_cur[IDX_NH2I] - + k[5421]*y_cur[IDX_OI]*y_cur[IDX_NH2I] - + k[5422]*y_cur[IDX_OI]*y_cur[IDX_NH3I] - + k[5423]*y_cur[IDX_OI]*y_cur[IDX_NO2I] - + k[5424]*y_cur[IDX_OI]*y_cur[IDX_NOI] - + k[5425]*y_cur[IDX_OI]*y_cur[IDX_NSI] - + k[5426]*y_cur[IDX_OI]*y_cur[IDX_NSI] - + k[5427]*y_cur[IDX_OI]*y_cur[IDX_O2HI] - + k[5428]*y_cur[IDX_OI]*y_cur[IDX_OCNI] - + k[5429]*y_cur[IDX_OI]*y_cur[IDX_OCNI] - + k[5430]*y_cur[IDX_OI]*y_cur[IDX_OCSI] - + k[5431]*y_cur[IDX_OI]*y_cur[IDX_OCSI] - + k[5432]*y_cur[IDX_OI]*y_cur[IDX_OHI] - + k[5433]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - + k[5434]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - + k[5435]*y_cur[IDX_OI]*y_cur[IDX_PH2I] - + k[5436]*y_cur[IDX_OI]*y_cur[IDX_PHI] - + k[5437]*y_cur[IDX_OI]*y_cur[IDX_S2I] - + k[5438]*y_cur[IDX_OI]*y_cur[IDX_SO2I] - + k[5439]*y_cur[IDX_OI]*y_cur[IDX_SOI] - + k[5440]*y_cur[IDX_OI]*y_cur[IDX_SiC2I] - + k[5441]*y_cur[IDX_OI]*y_cur[IDX_SiC3I] - + k[5442]*y_cur[IDX_OI]*y_cur[IDX_SiC4I] - + k[5443]*y_cur[IDX_OI]*y_cur[IDX_SiCI] - + k[5444]*y_cur[IDX_OI]*y_cur[IDX_SiCI] - + k[5445]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - + k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - + k[5447]*y_cur[IDX_OI]*y_cur[IDX_SiH3I] - + k[5448]*y_cur[IDX_OI]*y_cur[IDX_SiH4I] - + k[5449]*y_cur[IDX_OI]*y_cur[IDX_SiHI] - + k[5450]*y_cur[IDX_OI]*y_cur[IDX_SiNI] - + k[5451]*y_cur[IDX_OI]*y_cur[IDX_SiNI] - + k[5452]*y_cur[IDX_OI]*y_cur[IDX_SiNCI] + + k[5458]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] + + k[5459]*y_cur[IDX_OHI]*y_cur[IDX_CNI] + + k[5464]*y_cur[IDX_OHI]*y_cur[IDX_FI] + + k[5479]*y_cur[IDX_OHI]*y_cur[IDX_OHI] + + k[5484]*y_cur[IDX_PI]*y_cur[IDX_O2I] + + k[5490]*y_cur[IDX_SI]*y_cur[IDX_SOI] + + k[5494]*y_cur[IDX_SiI]*y_cur[IDX_O2I] - + k[5505]*y_cur[IDX_CII]*y_cur[IDX_OI] - + k[5526]*y_cur[IDX_CI]*y_cur[IDX_OI] - + k[5573]*y_cur[IDX_HI]*y_cur[IDX_OI] - + k[5582]*y_cur[IDX_OI]*y_cur[IDX_OI] - + k[5582]*y_cur[IDX_OI]*y_cur[IDX_OI] - + k[5583]*y_cur[IDX_OI]*y_cur[IDX_SOI] - + k[5584]*y_cur[IDX_OI]*y_cur[IDX_SiII] - + k[5585]*y_cur[IDX_OI]*y_cur[IDX_SiI] - + k[5609]*y_cur[IDX_OI]*y_cur[IDX_eM] + + k[5623]*y_cur[IDX_OII]*y_cur[IDX_eM] - k[5685]*y_cur[IDX_OI] + + k[5712]*y_cur[IDX_C2OI] + k[5824]*y_cur[IDX_CNOI] + + k[5825]*y_cur[IDX_CO2I] + k[5826]*y_cur[IDX_COI] + + k[5831]*y_cur[IDX_ClOI] + k[5890]*y_cur[IDX_NO2I] + + k[5892]*y_cur[IDX_NOI] + k[5895]*y_cur[IDX_OM] + + k[5898]*y_cur[IDX_O2I] + k[5898]*y_cur[IDX_O2I] - + k[5900]*y_cur[IDX_OI] + k[5901]*y_cur[IDX_OCNI] + + k[5905]*y_cur[IDX_OHI] + k[5910]*y_cur[IDX_POI] + + k[5914]*y_cur[IDX_SO2I] + k[5915]*y_cur[IDX_SOI] + + k[5933]*y_cur[IDX_SiO2I] + k[5934]*y_cur[IDX_SiOI] + + k[5936]*y_cur[IDX_CH3OI] + k[5997]*y_cur[IDX_C2OI] + + k[6135]*y_cur[IDX_CNOI] + k[6136]*y_cur[IDX_COII] + + k[6137]*y_cur[IDX_CO2I] + k[6138]*y_cur[IDX_COI] + + k[6144]*y_cur[IDX_ClOI] + k[6161]*y_cur[IDX_H2OI] + + k[6212]*y_cur[IDX_N2OI] + k[6227]*y_cur[IDX_NO2I] + + k[6229]*y_cur[IDX_NOI] + k[6232]*y_cur[IDX_OM] + + k[6233]*y_cur[IDX_O2II] + k[6236]*y_cur[IDX_O2I] + + k[6236]*y_cur[IDX_O2I] + k[6238]*y_cur[IDX_O2HI] + + k[6239]*y_cur[IDX_OCNI] + k[6244]*y_cur[IDX_OHI] + + k[6251]*y_cur[IDX_POI] + k[6256]*y_cur[IDX_SO2I] + + k[6257]*y_cur[IDX_SOI] + k[6284]*y_cur[IDX_SiOII] + + k[6285]*y_cur[IDX_SiO2I] + k[6286]*y_cur[IDX_SiOI] + + k[6289]*y_cur[IDX_CH3OI] - k[6301]*y_cur[IDX_OI] + + k[6326]*y_cur[IDX_OII]*y_cur[IDX_GRAINM] + + k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM] + + k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + + k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + + k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM] + + k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6407]*y_cur[IDX_NOII]*y_cur[IDX_GRAINM] + + k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM] + + k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM] + + k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + + k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6531]*y_cur[IDX_SiOII]*y_cur[IDX_GRAINM] + + k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM] + + k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + + k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + + k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM] + + k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + + k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM] + + k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + + k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + + k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + + k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM] + + k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM] + + k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + + k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + k[6751]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + - k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + - k[6757]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - k[6994]*y_cur[IDX_SOI] - + k[7176]*y_cur[IDX_GSOI] + k[7358]*y_cur[IDX_GSOI] + - k[7540]*y_cur[IDX_GSOI] + k[8694]*y_cur[IDX_GOI]*y_cur[IDX_GSI]; - ydot[yistart + IDX_SOII] = 0.0 + - k[193]*y_cur[IDX_CII]*y_cur[IDX_SOI] + - k[417]*y_cur[IDX_HII]*y_cur[IDX_SOI] - - k[539]*y_cur[IDX_MgI]*y_cur[IDX_SOII] - - k[615]*y_cur[IDX_NH3I]*y_cur[IDX_SOII] - - k[644]*y_cur[IDX_NaI]*y_cur[IDX_SOII] - - k[711]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[712]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - - k[713]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - - k[714]*y_cur[IDX_SOII]*y_cur[IDX_CH3OCH3I] - - k[715]*y_cur[IDX_SOII]*y_cur[IDX_FeI] - - k[1220]*y_cur[IDX_SOII]*y_cur[IDX_eM] + - k[1427]*y_cur[IDX_CII]*y_cur[IDX_SO2I] + - k[2282]*y_cur[IDX_COII]*y_cur[IDX_SO2I] + - k[2290]*y_cur[IDX_COI]*y_cur[IDX_SO2II] - - k[2582]*y_cur[IDX_H2SI]*y_cur[IDX_SOII] + - k[2847]*y_cur[IDX_HI]*y_cur[IDX_SO2II] + - k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - - k[3468]*y_cur[IDX_NI]*y_cur[IDX_SOII] + - k[3651]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + - k[3667]*y_cur[IDX_O2II]*y_cur[IDX_SI] + - k[3674]*y_cur[IDX_O2I]*y_cur[IDX_SII] + - k[3675]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + - k[3735]*y_cur[IDX_OI]*y_cur[IDX_H2SII] + - k[3743]*y_cur[IDX_OI]*y_cur[IDX_HSII] + - k[3790]*y_cur[IDX_OHII]*y_cur[IDX_SI] + - k[3808]*y_cur[IDX_OHI]*y_cur[IDX_SII] - - k[3843]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - - k[3844]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - - k[3845]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - - k[3846]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - - k[3847]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - - k[3848]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - - k[3849]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - - k[3850]*y_cur[IDX_SOII]*y_cur[IDX_C2H4I] - - k[3851]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[3852]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[3853]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[3854]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] - - k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] - - k[3857]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - - k[3858]*y_cur[IDX_SOII]*y_cur[IDX_OCSI] - - k[3916]*y_cur[IDX_CM]*y_cur[IDX_SOII] - - k[3951]*y_cur[IDX_C10M]*y_cur[IDX_SOII] - - k[3986]*y_cur[IDX_C10HM]*y_cur[IDX_SOII] - - k[4021]*y_cur[IDX_C2M]*y_cur[IDX_SOII] - - k[4056]*y_cur[IDX_C2HM]*y_cur[IDX_SOII] - - k[4091]*y_cur[IDX_C3M]*y_cur[IDX_SOII] - - k[4126]*y_cur[IDX_C3HM]*y_cur[IDX_SOII] - - k[4161]*y_cur[IDX_C3NM]*y_cur[IDX_SOII] - - k[4196]*y_cur[IDX_C4M]*y_cur[IDX_SOII] - - k[4231]*y_cur[IDX_C4HM]*y_cur[IDX_SOII] - - k[4266]*y_cur[IDX_C5M]*y_cur[IDX_SOII] - - k[4301]*y_cur[IDX_C5HM]*y_cur[IDX_SOII] - - k[4336]*y_cur[IDX_C5NM]*y_cur[IDX_SOII] - - k[4371]*y_cur[IDX_C6M]*y_cur[IDX_SOII] - - k[4406]*y_cur[IDX_C6HM]*y_cur[IDX_SOII] - - k[4441]*y_cur[IDX_C7M]*y_cur[IDX_SOII] - - k[4476]*y_cur[IDX_C7HM]*y_cur[IDX_SOII] - - k[4511]*y_cur[IDX_C8M]*y_cur[IDX_SOII] - - k[4546]*y_cur[IDX_C8HM]*y_cur[IDX_SOII] - - k[4581]*y_cur[IDX_C9M]*y_cur[IDX_SOII] - - k[4616]*y_cur[IDX_C9HM]*y_cur[IDX_SOII] - - k[4651]*y_cur[IDX_CHM]*y_cur[IDX_SOII] - - k[4686]*y_cur[IDX_CNM]*y_cur[IDX_SOII] - - k[4722]*y_cur[IDX_HM]*y_cur[IDX_SOII] - - k[4757]*y_cur[IDX_OM]*y_cur[IDX_SOII] - - k[4792]*y_cur[IDX_O2M]*y_cur[IDX_SOII] - - k[4827]*y_cur[IDX_OHM]*y_cur[IDX_SOII] - - k[4862]*y_cur[IDX_SM]*y_cur[IDX_SOII] + k[5916]*y_cur[IDX_SOI] + - k[6258]*y_cur[IDX_SOI] - k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SO2I] = 0.0 + k[127]*y_cur[IDX_O2I]*y_cur[IDX_SM] - - k[315]*y_cur[IDX_CO2II]*y_cur[IDX_SO2I] - - k[416]*y_cur[IDX_HII]*y_cur[IDX_SO2I] - + k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - k[6899]*y_cur[IDX_OI] + + k[7081]*y_cur[IDX_GOI] + k[7263]*y_cur[IDX_GOI] + + k[7445]*y_cur[IDX_GOI]; + ydot[yistart + IDX_HeII] = 0.0 - + k[458]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - + k[491]*y_cur[IDX_HI]*y_cur[IDX_HeII] - + k[506]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[507]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[508]*y_cur[IDX_HeII]*y_cur[IDX_C2I] - + k[509]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - + k[510]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - + k[511]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - + k[512]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] - + k[513]*y_cur[IDX_HeII]*y_cur[IDX_CI] - + k[514]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[515]*y_cur[IDX_HeII]*y_cur[IDX_CHI] - + k[516]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[517]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - + k[518]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - + k[519]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - + k[520]*y_cur[IDX_HeII]*y_cur[IDX_HCNOI] - + k[521]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] - + k[522]*y_cur[IDX_HeII]*y_cur[IDX_HONCI] - + k[523]*y_cur[IDX_HeII]*y_cur[IDX_N2I] - + k[524]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - + k[525]*y_cur[IDX_HeII]*y_cur[IDX_O2I] - + k[526]*y_cur[IDX_HeII]*y_cur[IDX_PI] - k[527]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - - k[665]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + - k[680]*y_cur[IDX_O2I]*y_cur[IDX_SO2II] + - k[1142]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] - - k[1427]*y_cur[IDX_CII]*y_cur[IDX_SO2I] - - k[2282]*y_cur[IDX_COII]*y_cur[IDX_SO2I] - - k[2518]*y_cur[IDX_H2OII]*y_cur[IDX_SO2I] + - k[2555]*y_cur[IDX_H2OI]*y_cur[IDX_HSO2II] - - k[2741]*y_cur[IDX_H3II]*y_cur[IDX_SO2I] - + k[528]*y_cur[IDX_HeII]*y_cur[IDX_SiI] - + k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - + k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3032]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] - + k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] - + k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] - + k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] - + k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] - + k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - + k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - + k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] - + k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] - + k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] - + k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - + k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - + k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - + k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] - + k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - + k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] - + k[3085]*y_cur[IDX_HeII]*y_cur[IDX_C2H5OHI] - + k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - + k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - + k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] - + k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] - + k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] - + k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - + k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - + k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - + k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] - + k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] - + k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] - + k[3097]*y_cur[IDX_HeII]*y_cur[IDX_C3HI] - + k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] - + k[3099]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] - + k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] - + k[3101]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] - + k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] - + k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] - + k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] - + k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - + k[3106]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - + k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] - + k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - + k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - + k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] - + k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] - + k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] - + k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - + k[3114]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] - + k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] - + k[3116]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] - + k[3117]*y_cur[IDX_HeII]*y_cur[IDX_C5I] - + k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] - + k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - + k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - + k[3121]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] - + k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] - + k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] - + k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] - + k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] - + k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] - + k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - + k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - + k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] - + k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - + k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] - + k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] - + k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] - + k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] - + k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] - + k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - + k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - + k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] - + k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] - + k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] - + k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] - + k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] - + k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] - + k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - + k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - + k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] - + k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] - + k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] - + k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] - + k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] - + k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - + k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - + k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] - + k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] - + k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] - + k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] - + k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] - + k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] - + k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] - + k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] - + k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] - + k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - + k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - + k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] - + k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] - + k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] - + k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] - + k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] - + k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] - + k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] - + k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] - + k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] - + k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] - + k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - + k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] - + k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] - + k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - + k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] - + k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] - + k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] - + k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - + k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - + k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] - + k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] - + k[3192]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - + k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] - + k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] - + k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] - + k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] - + k[3197]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] - + k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] - + k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] - + k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] - + k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] - + k[3205]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] - + k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] - + k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] - + k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] - + k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] - + k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] - + k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] - + k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] - + k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - + k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] - + k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - + k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - + k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] - + k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - + k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - + k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] - + k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - + k[3226]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - + k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] - + k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] - + k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - + k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] - + k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] - + k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - + k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] - + k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - + k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - + k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - + k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] - + k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - + k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - + k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] - + k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] - + k[3242]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] - + k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] - + k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] - + k[3245]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - + k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - + k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - + k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] - + k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - + k[3250]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - + k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] - + k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] - + k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] - + k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] - + k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] - + k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] - + k[3257]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] - + k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] - + k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] - + k[3260]*y_cur[IDX_HeII]*y_cur[IDX_HFI] - + k[3261]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - + k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - + k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] - + k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] - + k[3265]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - + k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - + k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] - + k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] - + k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - + k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] - + k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - + k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] - + k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] - + k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] - + k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - + k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - + k[3277]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - + k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] - + k[3279]*y_cur[IDX_HeII]*y_cur[IDX_NCCNI] - + k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] - + k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] - + k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] - + k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - + k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] - + k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] - + k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] - + k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] - + k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - + k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] - + k[3290]*y_cur[IDX_HeII]*y_cur[IDX_O2I] - + k[3291]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] - + k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] - + k[3293]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - + k[3294]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - + k[3295]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - + k[3296]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - + k[3297]*y_cur[IDX_HeII]*y_cur[IDX_OHI] - + k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] - + k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] - + k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] - + k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] - + k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] - k[3303]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - - k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + - k[3590]*y_cur[IDX_NH3I]*y_cur[IDX_HSO2II] - - k[3651]*y_cur[IDX_OII]*y_cur[IDX_SO2I] + - k[3857]*y_cur[IDX_SOII]*y_cur[IDX_CH3COCH3I] - - k[4985]*y_cur[IDX_CI]*y_cur[IDX_SO2I] + - k[5338]*y_cur[IDX_O2I]*y_cur[IDX_SOI] - - k[5438]*y_cur[IDX_OI]*y_cur[IDX_SO2I] + - k[5481]*y_cur[IDX_OHI]*y_cur[IDX_SOI] - - k[5489]*y_cur[IDX_SI]*y_cur[IDX_SO2I] + - k[5583]*y_cur[IDX_OI]*y_cur[IDX_SOI] - k[5914]*y_cur[IDX_SO2I] - - k[6256]*y_cur[IDX_SO2I] + - k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - - k[7032]*y_cur[IDX_SO2I] + k[7214]*y_cur[IDX_GSO2I] + - k[7396]*y_cur[IDX_GSO2I] + k[7578]*y_cur[IDX_GSO2I] + - k[8697]*y_cur[IDX_GOI]*y_cur[IDX_GSOI]; - ydot[yistart + IDX_SO2II] = 0.0 + - k[315]*y_cur[IDX_CO2II]*y_cur[IDX_SO2I] + - k[416]*y_cur[IDX_HII]*y_cur[IDX_SO2I] + + k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] - + k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] - + k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] - + k[3307]*y_cur[IDX_HeII]*y_cur[IDX_SiC2I] - + k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] - + k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] - + k[3310]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] - + k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] - + k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] - + k[3313]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] - + k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] - + k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] - + k[3316]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] - + k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] - + k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] - + k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] - + k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - + k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - + k[3322]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] - + k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] - + k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - + k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - + k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - + k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - + k[3328]*y_cur[IDX_HeII]*y_cur[IDX_SiHI] - + k[3329]*y_cur[IDX_HeII]*y_cur[IDX_SiNI] - + k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] - + k[3331]*y_cur[IDX_HeII]*y_cur[IDX_SiO2I] - + k[3332]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] - + k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] - + k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] - + k[3335]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] - + k[3906]*y_cur[IDX_CM]*y_cur[IDX_HeII] - + k[3941]*y_cur[IDX_C10M]*y_cur[IDX_HeII] - + k[3976]*y_cur[IDX_C10HM]*y_cur[IDX_HeII] - + k[4011]*y_cur[IDX_C2M]*y_cur[IDX_HeII] - + k[4046]*y_cur[IDX_C2HM]*y_cur[IDX_HeII] - + k[4081]*y_cur[IDX_C3M]*y_cur[IDX_HeII] - + k[4116]*y_cur[IDX_C3HM]*y_cur[IDX_HeII] - + k[4151]*y_cur[IDX_C3NM]*y_cur[IDX_HeII] - + k[4186]*y_cur[IDX_C4M]*y_cur[IDX_HeII] - + k[4221]*y_cur[IDX_C4HM]*y_cur[IDX_HeII] - + k[4256]*y_cur[IDX_C5M]*y_cur[IDX_HeII] - + k[4291]*y_cur[IDX_C5HM]*y_cur[IDX_HeII] - + k[4326]*y_cur[IDX_C5NM]*y_cur[IDX_HeII] - + k[4361]*y_cur[IDX_C6M]*y_cur[IDX_HeII] - + k[4396]*y_cur[IDX_C6HM]*y_cur[IDX_HeII] - + k[4431]*y_cur[IDX_C7M]*y_cur[IDX_HeII] - + k[4466]*y_cur[IDX_C7HM]*y_cur[IDX_HeII] - + k[4501]*y_cur[IDX_C8M]*y_cur[IDX_HeII] - + k[4536]*y_cur[IDX_C8HM]*y_cur[IDX_HeII] - + k[4571]*y_cur[IDX_C9M]*y_cur[IDX_HeII] - + k[4606]*y_cur[IDX_C9HM]*y_cur[IDX_HeII] - + k[4641]*y_cur[IDX_CHM]*y_cur[IDX_HeII] - + k[4676]*y_cur[IDX_CNM]*y_cur[IDX_HeII] - + k[4712]*y_cur[IDX_HM]*y_cur[IDX_HeII] - + k[4747]*y_cur[IDX_OM]*y_cur[IDX_HeII] - + k[4782]*y_cur[IDX_O2M]*y_cur[IDX_HeII] - + k[4817]*y_cur[IDX_OHM]*y_cur[IDX_HeII] - + k[4852]*y_cur[IDX_SM]*y_cur[IDX_HeII] - + k[5619]*y_cur[IDX_HeII]*y_cur[IDX_eM] - + k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] - + k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] - + k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] - + k[5638]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] - + k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] - + k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] - + k[5647]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] - + k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] - + k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] - + k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] - + k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] - + k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] - + k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - + k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - + k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - + k[5674]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + k[5683]*y_cur[IDX_HeI] + + k[5876]*y_cur[IDX_HeI] + k[6298]*y_cur[IDX_HeI] - + k[6312]*y_cur[IDX_HeII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_HeI] = 0.0 + + k[458]*y_cur[IDX_H2I]*y_cur[IDX_HeII] + + k[491]*y_cur[IDX_HI]*y_cur[IDX_HeII] + + k[506]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[507]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[508]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + + k[509]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[510]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[511]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + + k[512]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + + k[513]*y_cur[IDX_HeII]*y_cur[IDX_CI] + + k[514]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[515]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + + k[516]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[517]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[518]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + + k[519]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + + k[520]*y_cur[IDX_HeII]*y_cur[IDX_HCNOI] + + k[521]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + + k[522]*y_cur[IDX_HeII]*y_cur[IDX_HONCI] + + k[523]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + + k[524]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + + k[525]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + + k[526]*y_cur[IDX_HeII]*y_cur[IDX_PI] + k[527]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + - k[665]*y_cur[IDX_OII]*y_cur[IDX_SO2I] - - k[680]*y_cur[IDX_O2I]*y_cur[IDX_SO2II] - - k[1221]*y_cur[IDX_SO2II]*y_cur[IDX_eM] - - k[1222]*y_cur[IDX_SO2II]*y_cur[IDX_eM] - - k[2290]*y_cur[IDX_COI]*y_cur[IDX_SO2II] - - k[2471]*y_cur[IDX_H2I]*y_cur[IDX_SO2II] - - k[2847]*y_cur[IDX_HI]*y_cur[IDX_SO2II] - - k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] - - k[6751]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiI] = 0.0 - k[194]*y_cur[IDX_CII]*y_cur[IDX_SiI] - - k[257]*y_cur[IDX_CHII]*y_cur[IDX_SiI] - - k[418]*y_cur[IDX_HII]*y_cur[IDX_SiI] - - k[477]*y_cur[IDX_H2OII]*y_cur[IDX_SiI] - k[528]*y_cur[IDX_HeII]*y_cur[IDX_SiI] + - k[540]*y_cur[IDX_MgI]*y_cur[IDX_SiII] - - k[597]*y_cur[IDX_NH3II]*y_cur[IDX_SiI] + - k[645]*y_cur[IDX_NaI]*y_cur[IDX_SiII] + - k[716]*y_cur[IDX_SiII]*y_cur[IDX_FeI] - - k[717]*y_cur[IDX_SiI]*y_cur[IDX_CSII] - - k[718]*y_cur[IDX_SiI]*y_cur[IDX_H2COII] - - k[719]*y_cur[IDX_SiI]*y_cur[IDX_H2SII] - - k[720]*y_cur[IDX_SiI]*y_cur[IDX_HSII] - - k[721]*y_cur[IDX_SiI]*y_cur[IDX_NOII] - - k[722]*y_cur[IDX_SiI]*y_cur[IDX_O2II] - - k[723]*y_cur[IDX_SiI]*y_cur[IDX_PII] - - k[724]*y_cur[IDX_SiI]*y_cur[IDX_SII] + - k[1109]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + - k[1123]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] + - k[1147]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] + - k[1223]*y_cur[IDX_SiCII]*y_cur[IDX_eM] + - k[1224]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] + - k[1226]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] + - k[1234]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] + - k[1243]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + - k[1249]*y_cur[IDX_SiFII]*y_cur[IDX_eM] + - k[1250]*y_cur[IDX_SiHII]*y_cur[IDX_eM] + - k[1251]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + - k[1252]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + - k[1260]*y_cur[IDX_SiNII]*y_cur[IDX_eM] + - k[1261]*y_cur[IDX_SiNCII]*y_cur[IDX_eM] + - k[1266]*y_cur[IDX_SiOII]*y_cur[IDX_eM] + - k[1267]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] + - k[1269]*y_cur[IDX_SiSII]*y_cur[IDX_eM] - - k[1529]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - - k[1530]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - - k[1626]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] - - k[1627]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] - - k[1680]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - - k[1681]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - - k[2097]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] - - k[2098]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] - - k[2236]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] - - k[2237]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] + - k[2267]*y_cur[IDX_CHI]*y_cur[IDX_SiHII] + - k[2268]*y_cur[IDX_CHI]*y_cur[IDX_SiOII] - - k[2502]*y_cur[IDX_H2NCII]*y_cur[IDX_SiI] + - k[2571]*y_cur[IDX_H2OI]*y_cur[IDX_SiHII] - - k[2743]*y_cur[IDX_H3II]*y_cur[IDX_SiI] - - k[2818]*y_cur[IDX_H3OII]*y_cur[IDX_SiI] - - k[2896]*y_cur[IDX_HCNHII]*y_cur[IDX_SiI] + - k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + - k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] + - k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + - k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + - k[3475]*y_cur[IDX_NI]*y_cur[IDX_SiOII] + - k[3603]*y_cur[IDX_NH3I]*y_cur[IDX_SiHII] - - k[3791]*y_cur[IDX_OHII]*y_cur[IDX_SiI] - - k[3872]*y_cur[IDX_SiI]*y_cur[IDX_C3HII] - - k[3873]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - - k[3874]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - - k[3875]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] - - k[3876]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] - - k[3877]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - - k[3878]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - - k[3879]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - - k[3880]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - - k[3881]*y_cur[IDX_SiI]*y_cur[IDX_HCOII] + - k[3917]*y_cur[IDX_CM]*y_cur[IDX_SiII] + - k[3952]*y_cur[IDX_C10M]*y_cur[IDX_SiII] + - k[3987]*y_cur[IDX_C10HM]*y_cur[IDX_SiII] + - k[4022]*y_cur[IDX_C2M]*y_cur[IDX_SiII] + - k[4057]*y_cur[IDX_C2HM]*y_cur[IDX_SiII] + - k[4092]*y_cur[IDX_C3M]*y_cur[IDX_SiII] + - k[4127]*y_cur[IDX_C3HM]*y_cur[IDX_SiII] + - k[4162]*y_cur[IDX_C3NM]*y_cur[IDX_SiII] + - k[4197]*y_cur[IDX_C4M]*y_cur[IDX_SiII] + - k[4232]*y_cur[IDX_C4HM]*y_cur[IDX_SiII] + - k[4267]*y_cur[IDX_C5M]*y_cur[IDX_SiII] + - k[4302]*y_cur[IDX_C5HM]*y_cur[IDX_SiII] + - k[4337]*y_cur[IDX_C5NM]*y_cur[IDX_SiII] + - k[4372]*y_cur[IDX_C6M]*y_cur[IDX_SiII] + - k[4407]*y_cur[IDX_C6HM]*y_cur[IDX_SiII] + - k[4442]*y_cur[IDX_C7M]*y_cur[IDX_SiII] + - k[4477]*y_cur[IDX_C7HM]*y_cur[IDX_SiII] + - k[4512]*y_cur[IDX_C8M]*y_cur[IDX_SiII] + - k[4547]*y_cur[IDX_C8HM]*y_cur[IDX_SiII] + - k[4582]*y_cur[IDX_C9M]*y_cur[IDX_SiII] + - k[4617]*y_cur[IDX_C9HM]*y_cur[IDX_SiII] + - k[4652]*y_cur[IDX_CHM]*y_cur[IDX_SiII] + - k[4687]*y_cur[IDX_CNM]*y_cur[IDX_SiII] + - k[4723]*y_cur[IDX_HM]*y_cur[IDX_SiII] + - k[4758]*y_cur[IDX_OM]*y_cur[IDX_SiII] + - k[4793]*y_cur[IDX_O2M]*y_cur[IDX_SiII] + - k[4828]*y_cur[IDX_OHM]*y_cur[IDX_SiII] + - k[4863]*y_cur[IDX_SM]*y_cur[IDX_SiII] - - k[4879]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - - k[4880]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - - k[4885]*y_cur[IDX_C2H4I]*y_cur[IDX_SiI] - - k[5021]*y_cur[IDX_CH2I]*y_cur[IDX_SiI] - - k[5049]*y_cur[IDX_CH3I]*y_cur[IDX_SiI] + - k[5292]*y_cur[IDX_NI]*y_cur[IDX_SiCI] + - k[5443]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + - k[5450]*y_cur[IDX_OI]*y_cur[IDX_SiNI] - - k[5482]*y_cur[IDX_OHI]*y_cur[IDX_SiI] - - k[5491]*y_cur[IDX_SiI]*y_cur[IDX_CO2I] - - k[5492]*y_cur[IDX_SiI]*y_cur[IDX_COI] - - k[5493]*y_cur[IDX_SiI]*y_cur[IDX_NOI] - - k[5494]*y_cur[IDX_SiI]*y_cur[IDX_O2I] - - k[5585]*y_cur[IDX_OI]*y_cur[IDX_SiI] + - k[5626]*y_cur[IDX_SiII]*y_cur[IDX_eM] + k[5863]*y_cur[IDX_HCSiI] - - k[5917]*y_cur[IDX_SiI] + k[5924]*y_cur[IDX_SiCI] + - k[5930]*y_cur[IDX_SiHI] + k[5931]*y_cur[IDX_SiNI] + - k[5932]*y_cur[IDX_SiNCI] + k[5934]*y_cur[IDX_SiOI] + - k[5935]*y_cur[IDX_SiSI] - k[6259]*y_cur[IDX_SiI] + - k[6260]*y_cur[IDX_SiC2I] + k[6266]*y_cur[IDX_SiC4I] + - k[6267]*y_cur[IDX_SiCI] + k[6280]*y_cur[IDX_SiHI] + - k[6281]*y_cur[IDX_SiNI] + k[6283]*y_cur[IDX_SiNCI] + - k[6286]*y_cur[IDX_SiOI] + k[6288]*y_cur[IDX_SiSI] - - k[6302]*y_cur[IDX_SiI] + k[6374]*y_cur[IDX_SiII]*y_cur[IDX_GRAINM] + - k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM] + - k[6402]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM] + - k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + - k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + - k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM] + - k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + - k[6531]*y_cur[IDX_SiOII]*y_cur[IDX_GRAINM] + - k[6556]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] + - k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM] + - k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + - k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + - k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM] + - k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM] + - k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + - k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] - - k[6915]*y_cur[IDX_SiI] + k[7097]*y_cur[IDX_GSiI] + - k[7279]*y_cur[IDX_GSiI] + k[7461]*y_cur[IDX_GSiI]; - ydot[yistart + IDX_SiII] = 0.0 + - k[194]*y_cur[IDX_CII]*y_cur[IDX_SiI] + - k[257]*y_cur[IDX_CHII]*y_cur[IDX_SiI] + - k[418]*y_cur[IDX_HII]*y_cur[IDX_SiI] + - k[477]*y_cur[IDX_H2OII]*y_cur[IDX_SiI] + - k[528]*y_cur[IDX_HeII]*y_cur[IDX_SiI] - - k[540]*y_cur[IDX_MgI]*y_cur[IDX_SiII] + - k[597]*y_cur[IDX_NH3II]*y_cur[IDX_SiI] - - k[645]*y_cur[IDX_NaI]*y_cur[IDX_SiII] - - k[716]*y_cur[IDX_SiII]*y_cur[IDX_FeI] + - k[717]*y_cur[IDX_SiI]*y_cur[IDX_CSII] + - k[718]*y_cur[IDX_SiI]*y_cur[IDX_H2COII] + - k[719]*y_cur[IDX_SiI]*y_cur[IDX_H2SII] + - k[720]*y_cur[IDX_SiI]*y_cur[IDX_HSII] + - k[721]*y_cur[IDX_SiI]*y_cur[IDX_NOII] + - k[722]*y_cur[IDX_SiI]*y_cur[IDX_O2II] + - k[723]*y_cur[IDX_SiI]*y_cur[IDX_PII] + - k[724]*y_cur[IDX_SiI]*y_cur[IDX_SII] + - k[1434]*y_cur[IDX_CII]*y_cur[IDX_SiCI] + - k[1447]*y_cur[IDX_CII]*y_cur[IDX_SiOI] + - k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1574]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - - k[1646]*y_cur[IDX_C2H3I]*y_cur[IDX_SiII] - - k[1718]*y_cur[IDX_C2H4I]*y_cur[IDX_SiII] - - k[1751]*y_cur[IDX_C2HI]*y_cur[IDX_SiII] + - k[1920]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + - k[1932]*y_cur[IDX_CI]*y_cur[IDX_SiOII] - - k[2018]*y_cur[IDX_CH2I]*y_cur[IDX_SiII] + - k[2019]*y_cur[IDX_CH2I]*y_cur[IDX_SiOII] - - k[2102]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] - - k[2103]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] - - k[2266]*y_cur[IDX_CHI]*y_cur[IDX_SiII] + - k[2292]*y_cur[IDX_COI]*y_cur[IDX_SiOII] + - k[2365]*y_cur[IDX_HII]*y_cur[IDX_SiHI] - - k[2569]*y_cur[IDX_H2OI]*y_cur[IDX_SiII] + - k[2848]*y_cur[IDX_HI]*y_cur[IDX_SiHII] + - k[2849]*y_cur[IDX_HI]*y_cur[IDX_SiSII] - - k[2885]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] - - k[3015]*y_cur[IDX_HFI]*y_cur[IDX_SiII] - - k[3046]*y_cur[IDX_HNCI]*y_cur[IDX_SiII] + + k[1149]*y_cur[IDX_HeHII]*y_cur[IDX_eM] - + k[2390]*y_cur[IDX_H2II]*y_cur[IDX_HeI] + + k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] + + k[2458]*y_cur[IDX_H2I]*y_cur[IDX_HeHII] + + k[2845]*y_cur[IDX_HI]*y_cur[IDX_HeHII] + + k[3030]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3032]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3033]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3056]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3058]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3059]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3060]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3063]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3065]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3067]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3068]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3071]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + + k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3076]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + + k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + + k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3082]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + + k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + + k[3085]*y_cur[IDX_HeII]*y_cur[IDX_C2H5OHI] + + k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] + + k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] + + k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3093]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3094]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] + + k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] + + k[3097]*y_cur[IDX_HeII]*y_cur[IDX_C3HI] + + k[3098]*y_cur[IDX_HeII]*y_cur[IDX_C3NI] + + k[3099]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + + k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + + k[3101]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + + k[3102]*y_cur[IDX_HeII]*y_cur[IDX_C3PI] + + k[3103]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + + k[3104]*y_cur[IDX_HeII]*y_cur[IDX_C3SI] + + k[3105]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + + k[3106]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + + k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + + k[3108]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + + k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + + k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + + k[3111]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + + k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + + k[3113]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] + + k[3114]*y_cur[IDX_HeII]*y_cur[IDX_C4PI] + + k[3115]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + + k[3116]*y_cur[IDX_HeII]*y_cur[IDX_C4SI] + + k[3117]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + + k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + + k[3119]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3121]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3122]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + + k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + + k[3124]*y_cur[IDX_HeII]*y_cur[IDX_C5NI] + + k[3125]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + + k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + + k[3127]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3130]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] + + k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] + + k[3132]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + + k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + + k[3134]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + + k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + + k[3136]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3139]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + + k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + + k[3141]*y_cur[IDX_HeII]*y_cur[IDX_C7NI] + + k[3142]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + + k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + + k[3144]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3147]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + + k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + + k[3149]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + + k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + + k[3151]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + + k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + + k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + + k[3154]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + + k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + + k[3156]*y_cur[IDX_HeII]*y_cur[IDX_C9NI] + + k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + + k[3158]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + + k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] + + k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + + k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + + k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3165]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3166]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3169]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3170]*y_cur[IDX_HeII]*y_cur[IDX_CH2CNI] + + k[3171]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + + k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + + k[3173]*y_cur[IDX_HeII]*y_cur[IDX_CH2NHI] + + k[3174]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + + k[3175]*y_cur[IDX_HeII]*y_cur[IDX_CH2PHI] + + k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] + + k[3177]*y_cur[IDX_HeII]*y_cur[IDX_CH3C3NI] + + k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + + k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + + k[3180]*y_cur[IDX_HeII]*y_cur[IDX_CH3C5NI] + + k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] + + k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] + + k[3183]*y_cur[IDX_HeII]*y_cur[IDX_CH3C7NI] + + k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + + k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + + k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + + k[3191]*y_cur[IDX_HeII]*y_cur[IDX_CH3CHOI] + + k[3192]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] + + k[3193]*y_cur[IDX_HeII]*y_cur[IDX_CH3CNI] + + k[3194]*y_cur[IDX_HeII]*y_cur[IDX_CH3COCH3I] + + k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] + + k[3196]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + + k[3197]*y_cur[IDX_HeII]*y_cur[IDX_CH3OHI] + + k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + + k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + + k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + + k[3205]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + + k[3206]*y_cur[IDX_HeII]*y_cur[IDX_CNOI] + + k[3207]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] + + k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + + k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + + k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + + k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + + k[3216]*y_cur[IDX_HeII]*y_cur[IDX_ClOI] + + k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + + k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + + k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[3221]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + + k[3223]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + + k[3224]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + + k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + + k[3226]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + + k[3227]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + + k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + + k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + + k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + + k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] + + k[3232]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + + k[3233]*y_cur[IDX_HeII]*y_cur[IDX_HC2PI] + + k[3234]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3235]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3237]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3238]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + + k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + + k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + + k[3241]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + + k[3242]*y_cur[IDX_HeII]*y_cur[IDX_HC5NI] + + k[3243]*y_cur[IDX_HeII]*y_cur[IDX_HC7NI] + + k[3244]*y_cur[IDX_HeII]*y_cur[IDX_HC9NI] + + k[3245]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3246]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3248]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + + k[3251]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + + k[3252]*y_cur[IDX_HeII]*y_cur[IDX_HCOOCH3I] + + k[3253]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + + k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + + k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + + k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + k[3257]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + + k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + + k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] + + k[3260]*y_cur[IDX_HeII]*y_cur[IDX_HFI] + + k[3261]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + + k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + + k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + + k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + + k[3265]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] + + k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] + + k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] + + k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] + + k[3269]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + + k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + + k[3271]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + + k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + + k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] + + k[3274]*y_cur[IDX_HeII]*y_cur[IDX_N2I] + + k[3275]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3276]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3277]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3278]*y_cur[IDX_HeII]*y_cur[IDX_N2OI] + + k[3279]*y_cur[IDX_HeII]*y_cur[IDX_NCCNI] + + k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + + k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + + k[3282]*y_cur[IDX_HeII]*y_cur[IDX_NH2CNI] + + k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + + k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + + k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] + + k[3286]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + + k[3287]*y_cur[IDX_HeII]*y_cur[IDX_NOI] + + k[3288]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + + k[3289]*y_cur[IDX_HeII]*y_cur[IDX_NSI] + + k[3290]*y_cur[IDX_HeII]*y_cur[IDX_O2I] + + k[3291]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + + k[3292]*y_cur[IDX_HeII]*y_cur[IDX_OCNI] + + k[3293]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3294]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3295]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3296]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] + + k[3297]*y_cur[IDX_HeII]*y_cur[IDX_OHI] + + k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] + + k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] + + k[3300]*y_cur[IDX_HeII]*y_cur[IDX_PNI] + + k[3301]*y_cur[IDX_HeII]*y_cur[IDX_POI] + + k[3302]*y_cur[IDX_HeII]*y_cur[IDX_S2I] + + k[3303]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + + k[3304]*y_cur[IDX_HeII]*y_cur[IDX_SO2I] + + k[3305]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + + k[3306]*y_cur[IDX_HeII]*y_cur[IDX_SOI] + k[3307]*y_cur[IDX_HeII]*y_cur[IDX_SiC2I] + + k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + + k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + k[3310]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + + k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + + k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] + k[3313]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + + k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + + k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] + k[3316]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + + k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + + k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + + k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + + k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + + k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + k[3322]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + + k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + + k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + + k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + + k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + k[3328]*y_cur[IDX_HeII]*y_cur[IDX_SiHI] + k[3329]*y_cur[IDX_HeII]*y_cur[IDX_SiNI] + + k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] + k[3331]*y_cur[IDX_HeII]*y_cur[IDX_SiO2I] + k[3332]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + + k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + + k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + k[3335]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + - k[3469]*y_cur[IDX_NI]*y_cur[IDX_SiCII] + - k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] + - k[3476]*y_cur[IDX_NI]*y_cur[IDX_SiOII] - - k[3602]*y_cur[IDX_NH3I]*y_cur[IDX_SiII] - - k[3625]*y_cur[IDX_NHI]*y_cur[IDX_SiII] + - k[3754]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] + - k[3764]*y_cur[IDX_OI]*y_cur[IDX_SiOII] - - k[3809]*y_cur[IDX_OHI]*y_cur[IDX_SiII] + - k[3841]*y_cur[IDX_SI]*y_cur[IDX_SiCH2II] + - k[3842]*y_cur[IDX_SI]*y_cur[IDX_SiOII] - - k[3859]*y_cur[IDX_SiII]*y_cur[IDX_C2H5OHI] - - k[3860]*y_cur[IDX_SiII]*y_cur[IDX_C3H2I] - - k[3861]*y_cur[IDX_SiII]*y_cur[IDX_C3HI] - - k[3862]*y_cur[IDX_SiII]*y_cur[IDX_C4HI] - - k[3863]*y_cur[IDX_SiII]*y_cur[IDX_CH2CCHI] - - k[3864]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - - k[3865]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - - k[3866]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - - k[3867]*y_cur[IDX_SiII]*y_cur[IDX_CH3OHI] - - k[3868]*y_cur[IDX_SiII]*y_cur[IDX_H2CCCI] - - k[3869]*y_cur[IDX_SiII]*y_cur[IDX_C4H2I] - - k[3870]*y_cur[IDX_SiII]*y_cur[IDX_NCCNI] - - k[3871]*y_cur[IDX_SiII]*y_cur[IDX_OCSI] - - k[3917]*y_cur[IDX_CM]*y_cur[IDX_SiII] - - k[3952]*y_cur[IDX_C10M]*y_cur[IDX_SiII] - - k[3987]*y_cur[IDX_C10HM]*y_cur[IDX_SiII] - - k[4022]*y_cur[IDX_C2M]*y_cur[IDX_SiII] - - k[4057]*y_cur[IDX_C2HM]*y_cur[IDX_SiII] - - k[4092]*y_cur[IDX_C3M]*y_cur[IDX_SiII] - - k[4127]*y_cur[IDX_C3HM]*y_cur[IDX_SiII] - - k[4162]*y_cur[IDX_C3NM]*y_cur[IDX_SiII] - - k[4197]*y_cur[IDX_C4M]*y_cur[IDX_SiII] - - k[4232]*y_cur[IDX_C4HM]*y_cur[IDX_SiII] - - k[4267]*y_cur[IDX_C5M]*y_cur[IDX_SiII] - - k[4302]*y_cur[IDX_C5HM]*y_cur[IDX_SiII] - - k[4337]*y_cur[IDX_C5NM]*y_cur[IDX_SiII] - - k[4372]*y_cur[IDX_C6M]*y_cur[IDX_SiII] - - k[4407]*y_cur[IDX_C6HM]*y_cur[IDX_SiII] - - k[4442]*y_cur[IDX_C7M]*y_cur[IDX_SiII] - - k[4477]*y_cur[IDX_C7HM]*y_cur[IDX_SiII] - - k[4512]*y_cur[IDX_C8M]*y_cur[IDX_SiII] - - k[4547]*y_cur[IDX_C8HM]*y_cur[IDX_SiII] - - k[4582]*y_cur[IDX_C9M]*y_cur[IDX_SiII] - - k[4617]*y_cur[IDX_C9HM]*y_cur[IDX_SiII] - - k[4652]*y_cur[IDX_CHM]*y_cur[IDX_SiII] - - k[4687]*y_cur[IDX_CNM]*y_cur[IDX_SiII] - - k[4723]*y_cur[IDX_HM]*y_cur[IDX_SiII] - - k[4758]*y_cur[IDX_OM]*y_cur[IDX_SiII] - - k[4793]*y_cur[IDX_O2M]*y_cur[IDX_SiII] - - k[4828]*y_cur[IDX_OHM]*y_cur[IDX_SiII] - - k[4863]*y_cur[IDX_SM]*y_cur[IDX_SiII] - - k[5512]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - - k[5544]*y_cur[IDX_CH4I]*y_cur[IDX_SiII] - - k[5562]*y_cur[IDX_H2I]*y_cur[IDX_SiII] - - k[5575]*y_cur[IDX_HI]*y_cur[IDX_SiII] - - k[5580]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] - - k[5584]*y_cur[IDX_OI]*y_cur[IDX_SiII] - - k[5626]*y_cur[IDX_SiII]*y_cur[IDX_eM] + k[5917]*y_cur[IDX_SiI] + - k[6259]*y_cur[IDX_SiI] + k[6271]*y_cur[IDX_SiHII] + - k[6284]*y_cur[IDX_SiOII] + k[6302]*y_cur[IDX_SiI] - - k[6374]*y_cur[IDX_SiII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiCI] = 0.0 - + k[3906]*y_cur[IDX_CM]*y_cur[IDX_HeII] + + k[3941]*y_cur[IDX_C10M]*y_cur[IDX_HeII] + + k[3976]*y_cur[IDX_C10HM]*y_cur[IDX_HeII] + + k[4011]*y_cur[IDX_C2M]*y_cur[IDX_HeII] + + k[4046]*y_cur[IDX_C2HM]*y_cur[IDX_HeII] + + k[4081]*y_cur[IDX_C3M]*y_cur[IDX_HeII] + + k[4116]*y_cur[IDX_C3HM]*y_cur[IDX_HeII] + + k[4151]*y_cur[IDX_C3NM]*y_cur[IDX_HeII] + + k[4186]*y_cur[IDX_C4M]*y_cur[IDX_HeII] + + k[4221]*y_cur[IDX_C4HM]*y_cur[IDX_HeII] + + k[4256]*y_cur[IDX_C5M]*y_cur[IDX_HeII] + + k[4291]*y_cur[IDX_C5HM]*y_cur[IDX_HeII] + + k[4326]*y_cur[IDX_C5NM]*y_cur[IDX_HeII] + + k[4361]*y_cur[IDX_C6M]*y_cur[IDX_HeII] + + k[4396]*y_cur[IDX_C6HM]*y_cur[IDX_HeII] + + k[4431]*y_cur[IDX_C7M]*y_cur[IDX_HeII] + + k[4466]*y_cur[IDX_C7HM]*y_cur[IDX_HeII] + + k[4501]*y_cur[IDX_C8M]*y_cur[IDX_HeII] + + k[4536]*y_cur[IDX_C8HM]*y_cur[IDX_HeII] + + k[4571]*y_cur[IDX_C9M]*y_cur[IDX_HeII] + + k[4606]*y_cur[IDX_C9HM]*y_cur[IDX_HeII] + + k[4641]*y_cur[IDX_CHM]*y_cur[IDX_HeII] + + k[4676]*y_cur[IDX_CNM]*y_cur[IDX_HeII] + + k[4712]*y_cur[IDX_HM]*y_cur[IDX_HeII] + + k[4747]*y_cur[IDX_OM]*y_cur[IDX_HeII] + + k[4782]*y_cur[IDX_O2M]*y_cur[IDX_HeII] + + k[4817]*y_cur[IDX_OHM]*y_cur[IDX_HeII] + + k[4852]*y_cur[IDX_SM]*y_cur[IDX_HeII] - + k[5547]*y_cur[IDX_HII]*y_cur[IDX_HeI] + + k[5619]*y_cur[IDX_HeII]*y_cur[IDX_eM] + + k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + + k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + + k[5637]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + + k[5638]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHI] + + k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + + k[5643]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + + k[5647]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + + k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + + k[5653]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + + k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + + k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + + k[5660]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + + k[5665]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + + k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] + + k[5671]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + + k[5672]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + + k[5673]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] + + k[5674]*y_cur[IDX_HeII]*y_cur[IDX_CH3COOHI] - k[5683]*y_cur[IDX_HeI] + - k[5876]*y_cur[IDX_HeI] - k[6298]*y_cur[IDX_HeI] + + k[6312]*y_cur[IDX_HeII]*y_cur[IDX_GRAINM] + + k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM] - k[6890]*y_cur[IDX_HeI] + + k[7072]*y_cur[IDX_GHeI] + k[7254]*y_cur[IDX_GHeI] + + k[7436]*y_cur[IDX_GHeI]; + ydot[yistart + IDX_CII] = 0.0 - + k[147]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - + k[148]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - + k[149]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] - + k[150]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] - + k[151]*y_cur[IDX_CII]*y_cur[IDX_C2OI] - + k[152]*y_cur[IDX_CII]*y_cur[IDX_C2SI] - + k[153]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - + k[154]*y_cur[IDX_CII]*y_cur[IDX_C3SI] - + k[155]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - + k[156]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - + k[157]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - + k[158]*y_cur[IDX_CII]*y_cur[IDX_CCPI] - + k[159]*y_cur[IDX_CII]*y_cur[IDX_CClI] - + k[160]*y_cur[IDX_CII]*y_cur[IDX_CH2I] - + k[161]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - + k[162]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - + k[163]*y_cur[IDX_CII]*y_cur[IDX_CH2CNI] - + k[164]*y_cur[IDX_CII]*y_cur[IDX_CH2COI] - + k[165]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[166]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[167]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] - + k[168]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - + k[169]*y_cur[IDX_CII]*y_cur[IDX_CH3OCH3I] - + k[170]*y_cur[IDX_CII]*y_cur[IDX_CHI] - + k[171]*y_cur[IDX_CII]*y_cur[IDX_CPI] - + k[172]*y_cur[IDX_CII]*y_cur[IDX_ClOI] - + k[173]*y_cur[IDX_CII]*y_cur[IDX_FeI] - + k[174]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - + k[175]*y_cur[IDX_CII]*y_cur[IDX_H2SI] - + k[176]*y_cur[IDX_CII]*y_cur[IDX_H2SiOI] - + k[177]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - + k[178]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - + k[179]*y_cur[IDX_CII]*y_cur[IDX_HCOOCH3I] - + k[180]*y_cur[IDX_CII]*y_cur[IDX_HCPI] - + k[181]*y_cur[IDX_CII]*y_cur[IDX_HPOI] - + k[182]*y_cur[IDX_CII]*y_cur[IDX_MgI] - + k[183]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] - + k[184]*y_cur[IDX_CII]*y_cur[IDX_NCCNI] - + k[185]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - + k[186]*y_cur[IDX_CII]*y_cur[IDX_NOI] - + k[187]*y_cur[IDX_CII]*y_cur[IDX_NSI] - + k[188]*y_cur[IDX_CII]*y_cur[IDX_NaI] - + k[189]*y_cur[IDX_CII]*y_cur[IDX_OCSI] - + k[190]*y_cur[IDX_CII]*y_cur[IDX_PI] - + k[191]*y_cur[IDX_CII]*y_cur[IDX_PHI] - + k[192]*y_cur[IDX_CII]*y_cur[IDX_POI] - + k[193]*y_cur[IDX_CII]*y_cur[IDX_SOI] - + k[194]*y_cur[IDX_CII]*y_cur[IDX_SiI] - + k[195]*y_cur[IDX_CII]*y_cur[IDX_SiC2I] - + k[196]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] - + k[197]*y_cur[IDX_CII]*y_cur[IDX_SiC3I] - k[198]*y_cur[IDX_CII]*y_cur[IDX_SiCI] - + k[199]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - + k[200]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - + k[201]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - + k[202]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - + k[203]*y_cur[IDX_CII]*y_cur[IDX_SiNI] - + k[204]*y_cur[IDX_CII]*y_cur[IDX_SiSI] + + k[244]*y_cur[IDX_CI]*y_cur[IDX_C2II] + + k[245]*y_cur[IDX_CI]*y_cur[IDX_CNII] + + k[246]*y_cur[IDX_CI]*y_cur[IDX_COII] + + k[247]*y_cur[IDX_CI]*y_cur[IDX_N2II] + + k[248]*y_cur[IDX_CI]*y_cur[IDX_O2II] + + k[249]*y_cur[IDX_CI]*y_cur[IDX_PNII] + + k[513]*y_cur[IDX_HeII]*y_cur[IDX_CI] - + k[707]*y_cur[IDX_SI]*y_cur[IDX_CII] - + k[708]*y_cur[IDX_SI]*y_cur[IDX_CII] - + k[1297]*y_cur[IDX_CII]*y_cur[IDX_C10H2I] - + k[1298]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - + k[1299]*y_cur[IDX_CII]*y_cur[IDX_C10HI] - + k[1300]*y_cur[IDX_CII]*y_cur[IDX_C2H2I] - + k[1301]*y_cur[IDX_CII]*y_cur[IDX_C2H3I] - + k[1302]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - + k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - + k[1304]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - + k[1305]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] - + k[1306]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] - + k[1307]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] - + k[1308]*y_cur[IDX_CII]*y_cur[IDX_C2HI] - + k[1309]*y_cur[IDX_CII]*y_cur[IDX_C2SI] - + k[1310]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] - + k[1311]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] - + k[1312]*y_cur[IDX_CII]*y_cur[IDX_C3HI] - + k[1313]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - + k[1314]*y_cur[IDX_CII]*y_cur[IDX_C3OI] - + k[1315]*y_cur[IDX_CII]*y_cur[IDX_C3PI] - + k[1316]*y_cur[IDX_CII]*y_cur[IDX_C3SI] - + k[1317]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - + k[1318]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - + k[1319]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] - + k[1320]*y_cur[IDX_CII]*y_cur[IDX_C4HI] - + k[1321]*y_cur[IDX_CII]*y_cur[IDX_C4PI] - + k[1322]*y_cur[IDX_CII]*y_cur[IDX_C4SI] - + k[1323]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] - + k[1324]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] - + k[1325]*y_cur[IDX_CII]*y_cur[IDX_C5HI] - + k[1326]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] - + k[1327]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] - + k[1328]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - + k[1329]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - + k[1330]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] - + k[1331]*y_cur[IDX_CII]*y_cur[IDX_C6HI] - + k[1332]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] - + k[1333]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] - + k[1334]*y_cur[IDX_CII]*y_cur[IDX_C7HI] - + k[1335]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] - + k[1336]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] - + k[1337]*y_cur[IDX_CII]*y_cur[IDX_C8HI] - + k[1338]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] - + k[1339]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] - + k[1340]*y_cur[IDX_CII]*y_cur[IDX_C9HI] - + k[1341]*y_cur[IDX_CII]*y_cur[IDX_CCPI] - + k[1342]*y_cur[IDX_CII]*y_cur[IDX_CH2I] - + k[1343]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - + k[1344]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - + k[1345]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] - + k[1346]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - + k[1347]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] - + k[1348]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - + k[1349]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - + k[1350]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] - + k[1351]*y_cur[IDX_CII]*y_cur[IDX_CH2PHI] - + k[1352]*y_cur[IDX_CII]*y_cur[IDX_CH3I] - + k[1353]*y_cur[IDX_CII]*y_cur[IDX_CH3I] - + k[1354]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - + k[1355]*y_cur[IDX_CII]*y_cur[IDX_CH3C3NI] - + k[1356]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - + k[1357]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - + k[1358]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] - + k[1359]*y_cur[IDX_CII]*y_cur[IDX_CH3C5NI] - + k[1360]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] - + k[1361]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] - + k[1362]*y_cur[IDX_CII]*y_cur[IDX_CH3C7NI] - + k[1363]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[1364]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[1365]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[1366]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] - + k[1367]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1368]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1369]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1370]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] - + k[1373]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1374]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1375]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1376]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] - + k[1378]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] - + k[1379]*y_cur[IDX_CII]*y_cur[IDX_CH3CNI] - + k[1380]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] - + k[1381]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - + k[1382]*y_cur[IDX_CII]*y_cur[IDX_CH3OHI] - + k[1383]*y_cur[IDX_CII]*y_cur[IDX_CH4I] - + k[1384]*y_cur[IDX_CII]*y_cur[IDX_CH4I] - + k[1385]*y_cur[IDX_CII]*y_cur[IDX_CHI] - + k[1386]*y_cur[IDX_CII]*y_cur[IDX_CNOI] - + k[1387]*y_cur[IDX_CII]*y_cur[IDX_CO2I] - + k[1388]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - + k[1389]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] - + k[1390]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - + k[1391]*y_cur[IDX_CII]*y_cur[IDX_H2COI] - + k[1392]*y_cur[IDX_CII]*y_cur[IDX_H2CSI] - + k[1393]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - + k[1394]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - + k[1395]*y_cur[IDX_CII]*y_cur[IDX_H2SI] - + k[1396]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - + k[1397]*y_cur[IDX_CII]*y_cur[IDX_HC2PI] - + k[1398]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1399]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1400]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1401]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] - + k[1402]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - + k[1403]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] - + k[1404]*y_cur[IDX_CII]*y_cur[IDX_HC5NI] - + k[1405]*y_cur[IDX_CII]*y_cur[IDX_HC7NI] - + k[1406]*y_cur[IDX_CII]*y_cur[IDX_HC9NI] - + k[1407]*y_cur[IDX_CII]*y_cur[IDX_HCNI] - + k[1408]*y_cur[IDX_CII]*y_cur[IDX_HCOI] - + k[1409]*y_cur[IDX_CII]*y_cur[IDX_HCPI] - + k[1410]*y_cur[IDX_CII]*y_cur[IDX_HCSiI] - + k[1411]*y_cur[IDX_CII]*y_cur[IDX_HClI] - + k[1412]*y_cur[IDX_CII]*y_cur[IDX_HFI] - + k[1413]*y_cur[IDX_CII]*y_cur[IDX_HNCI] - + k[1414]*y_cur[IDX_CII]*y_cur[IDX_HNSiI] - + k[1415]*y_cur[IDX_CII]*y_cur[IDX_HSI] - + k[1416]*y_cur[IDX_CII]*y_cur[IDX_N2OI] - + k[1417]*y_cur[IDX_CII]*y_cur[IDX_NH2I] - + k[1418]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - + k[1419]*y_cur[IDX_CII]*y_cur[IDX_NH3I] - + k[1420]*y_cur[IDX_CII]*y_cur[IDX_NHI] - + k[1421]*y_cur[IDX_CII]*y_cur[IDX_NSI] - + k[1422]*y_cur[IDX_CII]*y_cur[IDX_O2I] - + k[1423]*y_cur[IDX_CII]*y_cur[IDX_O2I] - + k[1424]*y_cur[IDX_CII]*y_cur[IDX_OCNI] - + k[1425]*y_cur[IDX_CII]*y_cur[IDX_OCSI] - + k[1426]*y_cur[IDX_CII]*y_cur[IDX_OHI] - + k[1427]*y_cur[IDX_CII]*y_cur[IDX_SO2I] - + k[1428]*y_cur[IDX_CII]*y_cur[IDX_SOI] - + k[1429]*y_cur[IDX_CII]*y_cur[IDX_SOI] - + k[1430]*y_cur[IDX_CII]*y_cur[IDX_SOI] - + k[1431]*y_cur[IDX_CII]*y_cur[IDX_SiC2H2I] - + k[1432]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] - + k[1433]*y_cur[IDX_CII]*y_cur[IDX_SiC3HI] - + k[1434]*y_cur[IDX_CII]*y_cur[IDX_SiCI] - + k[1435]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - + k[1436]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - + k[1437]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - + k[1438]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - + k[1439]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - + k[1440]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - + k[1441]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - + k[1442]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - + k[1443]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - + k[1444]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - + k[1445]*y_cur[IDX_CII]*y_cur[IDX_SiHI] - + k[1446]*y_cur[IDX_CII]*y_cur[IDX_SiNI] - + k[1447]*y_cur[IDX_CII]*y_cur[IDX_SiOI] - + k[1448]*y_cur[IDX_CII]*y_cur[IDX_SiSI] - + k[2398]*y_cur[IDX_H2I]*y_cur[IDX_CII] + + k[2835]*y_cur[IDX_HI]*y_cur[IDX_CHII] - + k[3016]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - + k[3017]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - + k[3018]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] - + k[3019]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + + k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + + k[3088]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3089]*y_cur[IDX_HeII]*y_cur[IDX_C2NI] + + k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] + + k[3092]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3095]*y_cur[IDX_HeII]*y_cur[IDX_C3I] + + k[3107]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + + k[3157]*y_cur[IDX_HeII]*y_cur[IDX_CCPI] + + k[3159]*y_cur[IDX_HeII]*y_cur[IDX_CClI] + + k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + + k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + + k[3204]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + + k[3210]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] + + k[3213]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + + k[3215]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + + k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3254]*y_cur[IDX_HeII]*y_cur[IDX_HCPI] + + k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + + k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + + k[3383]*y_cur[IDX_NI]*y_cur[IDX_C2II] - + k[3886]*y_cur[IDX_CM]*y_cur[IDX_CII] - + k[3921]*y_cur[IDX_C10M]*y_cur[IDX_CII] - + k[3956]*y_cur[IDX_C10HM]*y_cur[IDX_CII] - + k[3991]*y_cur[IDX_C2M]*y_cur[IDX_CII] - + k[4026]*y_cur[IDX_C2HM]*y_cur[IDX_CII] - + k[4061]*y_cur[IDX_C3M]*y_cur[IDX_CII] - + k[4096]*y_cur[IDX_C3HM]*y_cur[IDX_CII] - + k[4131]*y_cur[IDX_C3NM]*y_cur[IDX_CII] - + k[4166]*y_cur[IDX_C4M]*y_cur[IDX_CII] - + k[4201]*y_cur[IDX_C4HM]*y_cur[IDX_CII] - + k[4236]*y_cur[IDX_C5M]*y_cur[IDX_CII] - + k[4271]*y_cur[IDX_C5HM]*y_cur[IDX_CII] - + k[4306]*y_cur[IDX_C5NM]*y_cur[IDX_CII] - + k[4341]*y_cur[IDX_C6M]*y_cur[IDX_CII] - + k[4376]*y_cur[IDX_C6HM]*y_cur[IDX_CII] - + k[4411]*y_cur[IDX_C7M]*y_cur[IDX_CII] - + k[4446]*y_cur[IDX_C7HM]*y_cur[IDX_CII] - + k[4481]*y_cur[IDX_C8M]*y_cur[IDX_CII] - + k[4516]*y_cur[IDX_C8HM]*y_cur[IDX_CII] - + k[4551]*y_cur[IDX_C9M]*y_cur[IDX_CII] - + k[4586]*y_cur[IDX_C9HM]*y_cur[IDX_CII] - + k[4621]*y_cur[IDX_CHM]*y_cur[IDX_CII] - + k[4656]*y_cur[IDX_CNM]*y_cur[IDX_CII] - + k[4691]*y_cur[IDX_HM]*y_cur[IDX_CII] - + k[4727]*y_cur[IDX_OM]*y_cur[IDX_CII] - + k[4762]*y_cur[IDX_O2M]*y_cur[IDX_CII] - + k[4797]*y_cur[IDX_OHM]*y_cur[IDX_CII] - + k[4832]*y_cur[IDX_SM]*y_cur[IDX_CII] - + k[5495]*y_cur[IDX_CII]*y_cur[IDX_C10I] - + k[5496]*y_cur[IDX_CII]*y_cur[IDX_C3I] - + k[5497]*y_cur[IDX_CII]*y_cur[IDX_C4I] - + k[5498]*y_cur[IDX_CII]*y_cur[IDX_C5I] - + k[5499]*y_cur[IDX_CII]*y_cur[IDX_C6I] - + k[5500]*y_cur[IDX_CII]*y_cur[IDX_C7I] - + k[5501]*y_cur[IDX_CII]*y_cur[IDX_C8I] - + k[5502]*y_cur[IDX_CII]*y_cur[IDX_C9I] - + k[5503]*y_cur[IDX_CII]*y_cur[IDX_CI] - + k[5504]*y_cur[IDX_CII]*y_cur[IDX_NI] - + k[5505]*y_cur[IDX_CII]*y_cur[IDX_OI] - + k[5506]*y_cur[IDX_CII]*y_cur[IDX_SI] - + k[5548]*y_cur[IDX_H2I]*y_cur[IDX_CII] - + k[5569]*y_cur[IDX_HI]*y_cur[IDX_CII] - + k[5611]*y_cur[IDX_CII]*y_cur[IDX_eM] - + k[5627]*y_cur[IDX_CII]*y_cur[IDX_CH3OI] - + k[5633]*y_cur[IDX_CII]*y_cur[IDX_CH2OHI] - + k[5639]*y_cur[IDX_CII]*y_cur[IDX_CH3COI] - + k[5644]*y_cur[IDX_CII]*y_cur[IDX_COOHI] - + k[5649]*y_cur[IDX_CII]*y_cur[IDX_COOCH3I] - + k[5655]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCOI] - + k[5661]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCHOI] - + k[5667]*y_cur[IDX_CII]*y_cur[IDX_CH3COOHI] + k[5675]*y_cur[IDX_CI] + + k[5772]*y_cur[IDX_CI] + k[5776]*y_cur[IDX_CHII] + + k[5975]*y_cur[IDX_C2II] + k[6069]*y_cur[IDX_CI] + + k[6075]*y_cur[IDX_CH2II] + k[6136]*y_cur[IDX_COII] + + k[6299]*y_cur[IDX_CI] - k[6314]*y_cur[IDX_CII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H2OI] = 0.0 - k[4]*y_cur[IDX_CM]*y_cur[IDX_H2OI] + + k[81]*y_cur[IDX_HM]*y_cur[IDX_OHI] + + k[83]*y_cur[IDX_H2I]*y_cur[IDX_OM] + + k[108]*y_cur[IDX_HI]*y_cur[IDX_OHM] - + k[136]*y_cur[IDX_H2I]*y_cur[IDX_H2OI] - + k[143]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + + k[263]*y_cur[IDX_CH2I]*y_cur[IDX_H2OII] + + k[291]*y_cur[IDX_CHI]*y_cur[IDX_H2OII] - + k[378]*y_cur[IDX_HII]*y_cur[IDX_H2OI] - + k[447]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + + k[462]*y_cur[IDX_H2OII]*y_cur[IDX_C2I] + + k[463]*y_cur[IDX_H2OII]*y_cur[IDX_C2H2I] + + k[464]*y_cur[IDX_H2OII]*y_cur[IDX_C2H4I] + + k[465]*y_cur[IDX_H2OII]*y_cur[IDX_C2HI] + + k[466]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + + k[467]*y_cur[IDX_H2OII]*y_cur[IDX_FeI] + + k[468]*y_cur[IDX_H2OII]*y_cur[IDX_H2COI] + + k[469]*y_cur[IDX_H2OII]*y_cur[IDX_H2SI] + + k[470]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + + k[471]*y_cur[IDX_H2OII]*y_cur[IDX_MgI] + + k[472]*y_cur[IDX_H2OII]*y_cur[IDX_NOI] + + k[473]*y_cur[IDX_H2OII]*y_cur[IDX_NaI] + + k[474]*y_cur[IDX_H2OII]*y_cur[IDX_O2I] + + k[475]*y_cur[IDX_H2OII]*y_cur[IDX_OCSI] + + k[476]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + + k[477]*y_cur[IDX_H2OII]*y_cur[IDX_SiI] - + k[478]*y_cur[IDX_H2OI]*y_cur[IDX_COII] - + k[479]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - + k[480]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] - + k[481]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] - + k[482]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] - + k[518]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - + k[552]*y_cur[IDX_NII]*y_cur[IDX_H2OI] - + k[575]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + + k[588]*y_cur[IDX_NH2I]*y_cur[IDX_H2OII] + + k[605]*y_cur[IDX_NH3I]*y_cur[IDX_H2OII] - + k[656]*y_cur[IDX_OII]*y_cur[IDX_H2OI] - + k[689]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] + + k[774]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + + k[775]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + + k[918]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + + k[960]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + + k[963]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[964]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[1015]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + + k[1035]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1041]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + + k[1291]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1293]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1295]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] - + k[1393]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - + k[1394]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - + k[1951]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - + k[1952]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - + k[1953]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] - + k[1982]*y_cur[IDX_CH2II]*y_cur[IDX_H2OI] + + k[2004]*y_cur[IDX_CH2I]*y_cur[IDX_H3OII] + + k[2125]*y_cur[IDX_CH3OHI]*y_cur[IDX_CH3OH2II] + + k[2130]*y_cur[IDX_CH3OHI]*y_cur[IDX_PH2II] - + k[2142]*y_cur[IDX_CH4II]*y_cur[IDX_H2OI] - + k[2226]*y_cur[IDX_CH5II]*y_cur[IDX_H2OI] + + k[2249]*y_cur[IDX_CHI]*y_cur[IDX_H3OII] + + k[2330]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - + k[2367]*y_cur[IDX_HM]*y_cur[IDX_H2OI] - + k[2386]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + + k[2465]*y_cur[IDX_H2I]*y_cur[IDX_NO2II] + + k[2491]*y_cur[IDX_H2COI]*y_cur[IDX_C2H5OH2II] + + k[2494]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + + k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] - + k[2509]*y_cur[IDX_H2OII]*y_cur[IDX_H2OI] - + k[2519]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] - + k[2520]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] - + k[2521]*y_cur[IDX_H2OI]*y_cur[IDX_C2HII] - + k[2522]*y_cur[IDX_H2OI]*y_cur[IDX_C2H2II] - + k[2523]*y_cur[IDX_H2OI]*y_cur[IDX_C2H3II] - + k[2524]*y_cur[IDX_H2OI]*y_cur[IDX_C2H5II] - + k[2525]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] - + k[2526]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] - + k[2527]*y_cur[IDX_H2OI]*y_cur[IDX_C2N2II] - + k[2528]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - + k[2529]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - + k[2530]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] - + k[2531]*y_cur[IDX_H2OI]*y_cur[IDX_C3OII] - + k[2532]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] - + k[2533]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] - + k[2534]*y_cur[IDX_H2OI]*y_cur[IDX_C2H6II] - + k[2535]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[2536]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[2537]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[2538]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] - + k[2539]*y_cur[IDX_H2OI]*y_cur[IDX_CNCII] - + k[2540]*y_cur[IDX_H2OI]*y_cur[IDX_COII] - + k[2541]*y_cur[IDX_H2OI]*y_cur[IDX_CO2II] - + k[2542]*y_cur[IDX_H2OI]*y_cur[IDX_H2COII] - + k[2543]*y_cur[IDX_H2OI]*y_cur[IDX_H2ClII] - + k[2544]*y_cur[IDX_H2OI]*y_cur[IDX_H2SII] - + k[2545]*y_cur[IDX_H2OI]*y_cur[IDX_H3COII] - + k[2546]*y_cur[IDX_H2OI]*y_cur[IDX_HCNII] - + k[2547]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] - + k[2548]*y_cur[IDX_H2OI]*y_cur[IDX_HCO2II] - + k[2549]*y_cur[IDX_H2OI]*y_cur[IDX_HCOOH2II] - + k[2550]*y_cur[IDX_H2OI]*y_cur[IDX_HNOII] - + k[2551]*y_cur[IDX_H2OI]*y_cur[IDX_HNSiII] - + k[2552]*y_cur[IDX_H2OI]*y_cur[IDX_HOCSII] - + k[2553]*y_cur[IDX_H2OI]*y_cur[IDX_HPOII] - + k[2554]*y_cur[IDX_H2OI]*y_cur[IDX_HSII] - + k[2555]*y_cur[IDX_H2OI]*y_cur[IDX_HSO2II] - + k[2556]*y_cur[IDX_H2OI]*y_cur[IDX_HSiSII] - + k[2557]*y_cur[IDX_H2OI]*y_cur[IDX_N2II] - + k[2558]*y_cur[IDX_H2OI]*y_cur[IDX_N2HII] - + k[2559]*y_cur[IDX_H2OI]*y_cur[IDX_N2OII] - + k[2560]*y_cur[IDX_H2OI]*y_cur[IDX_NCCNHII] - + k[2561]*y_cur[IDX_H2OI]*y_cur[IDX_O2HII] - + k[2562]*y_cur[IDX_H2OI]*y_cur[IDX_PII] - + k[2563]*y_cur[IDX_H2OI]*y_cur[IDX_PII] - + k[2564]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - + k[2565]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - + k[2566]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] - + k[2567]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] - + k[2568]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] - + k[2569]*y_cur[IDX_H2OI]*y_cur[IDX_SiII] - + k[2570]*y_cur[IDX_H2OI]*y_cur[IDX_SiCH3II] - + k[2571]*y_cur[IDX_H2OI]*y_cur[IDX_SiHII] - + k[2572]*y_cur[IDX_H2OI]*y_cur[IDX_SiH4II] - + k[2573]*y_cur[IDX_H2OI]*y_cur[IDX_SiH5II] + + k[2582]*y_cur[IDX_H2SI]*y_cur[IDX_SOII] + + k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2652]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - + k[2684]*y_cur[IDX_H3II]*y_cur[IDX_H2OI] + + k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] + + k[2766]*y_cur[IDX_H3OII]*y_cur[IDX_C2I] + + k[2767]*y_cur[IDX_H3OII]*y_cur[IDX_C2H3I] + + k[2768]*y_cur[IDX_H3OII]*y_cur[IDX_C2H5OHI] + + k[2769]*y_cur[IDX_H3OII]*y_cur[IDX_C2OI] + + k[2770]*y_cur[IDX_H3OII]*y_cur[IDX_C2SI] + + k[2771]*y_cur[IDX_H3OII]*y_cur[IDX_C3I] + + k[2772]*y_cur[IDX_H3OII]*y_cur[IDX_C3H2I] + + k[2773]*y_cur[IDX_H3OII]*y_cur[IDX_C3HI] + + k[2774]*y_cur[IDX_H3OII]*y_cur[IDX_C3NI] + + k[2775]*y_cur[IDX_H3OII]*y_cur[IDX_C3OI] + + k[2776]*y_cur[IDX_H3OII]*y_cur[IDX_C3PI] + + k[2777]*y_cur[IDX_H3OII]*y_cur[IDX_C3SI] + + k[2778]*y_cur[IDX_H3OII]*y_cur[IDX_C4I] + + k[2779]*y_cur[IDX_H3OII]*y_cur[IDX_C4H3I] + + k[2780]*y_cur[IDX_H3OII]*y_cur[IDX_C4HI] + + k[2781]*y_cur[IDX_H3OII]*y_cur[IDX_C4PI] + + k[2782]*y_cur[IDX_H3OII]*y_cur[IDX_C4SI] + + k[2783]*y_cur[IDX_H3OII]*y_cur[IDX_C6H6I] + + k[2784]*y_cur[IDX_H3OII]*y_cur[IDX_CCPI] + + k[2785]*y_cur[IDX_H3OII]*y_cur[IDX_CH2CCHI] + + k[2786]*y_cur[IDX_H3OII]*y_cur[IDX_CH2COI] + + k[2787]*y_cur[IDX_H3OII]*y_cur[IDX_CH2NHI] + + k[2788]*y_cur[IDX_H3OII]*y_cur[IDX_CH2PHI] + + k[2789]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CCHI] + + k[2790]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHCH2I] + + k[2791]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CHOI] + + k[2792]*y_cur[IDX_H3OII]*y_cur[IDX_CH3CNI] + + k[2793]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COCH3I] + + k[2794]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OCH3I] + + k[2795]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OHI] + + k[2796]*y_cur[IDX_H3OII]*y_cur[IDX_CPI] + + k[2797]*y_cur[IDX_H3OII]*y_cur[IDX_CSI] + + k[2798]*y_cur[IDX_H3OII]*y_cur[IDX_H2CCCI] + + k[2799]*y_cur[IDX_H3OII]*y_cur[IDX_H2COI] + + k[2800]*y_cur[IDX_H3OII]*y_cur[IDX_H2S2I] + + k[2801]*y_cur[IDX_H3OII]*y_cur[IDX_H2SI] + + k[2802]*y_cur[IDX_H3OII]*y_cur[IDX_H2SiOI] + + k[2803]*y_cur[IDX_H3OII]*y_cur[IDX_HC2PI] + + k[2804]*y_cur[IDX_H3OII]*y_cur[IDX_HC3NI] + + k[2805]*y_cur[IDX_H3OII]*y_cur[IDX_C4H2I] + + k[2806]*y_cur[IDX_H3OII]*y_cur[IDX_HCNI] + + k[2807]*y_cur[IDX_H3OII]*y_cur[IDX_HCOOCH3I] + + k[2808]*y_cur[IDX_H3OII]*y_cur[IDX_HCPI] + + k[2809]*y_cur[IDX_H3OII]*y_cur[IDX_HCSiI] + + k[2810]*y_cur[IDX_H3OII]*y_cur[IDX_HNCI] + + k[2811]*y_cur[IDX_H3OII]*y_cur[IDX_HNSiI] + + k[2812]*y_cur[IDX_H3OII]*y_cur[IDX_HPOI] + + k[2813]*y_cur[IDX_H3OII]*y_cur[IDX_HS2I] + + k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] + + k[2816]*y_cur[IDX_H3OII]*y_cur[IDX_PNI] + + k[2817]*y_cur[IDX_H3OII]*y_cur[IDX_S2I] + + k[2818]*y_cur[IDX_H3OII]*y_cur[IDX_SiI] + + k[2819]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2I] + + k[2820]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2HI] + + k[2821]*y_cur[IDX_H3OII]*y_cur[IDX_SiCI] + + k[2822]*y_cur[IDX_H3OII]*y_cur[IDX_SiCH3I] + + k[2823]*y_cur[IDX_H3OII]*y_cur[IDX_SiH2I] + + k[2824]*y_cur[IDX_H3OII]*y_cur[IDX_SiHI] + + k[2825]*y_cur[IDX_H3OII]*y_cur[IDX_SiNCI] + + k[2826]*y_cur[IDX_H3OII]*y_cur[IDX_SiOI] + + k[2873]*y_cur[IDX_HCNI]*y_cur[IDX_CH3OH2II] + + k[3028]*y_cur[IDX_HNC3I]*y_cur[IDX_H3OII] - + k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - + k[3226]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] - + k[3489]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - + k[3490]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - + k[3491]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - + k[3492]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] - + k[3512]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - + k[3513]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] - + k[3514]*y_cur[IDX_NH2II]*y_cur[IDX_H2OI] + + k[3538]*y_cur[IDX_NH2I]*y_cur[IDX_H3OII] - + k[3550]*y_cur[IDX_NH3II]*y_cur[IDX_H2OI] + + k[3578]*y_cur[IDX_NH3I]*y_cur[IDX_H3OII] + + k[3632]*y_cur[IDX_OII]*y_cur[IDX_C2H4I] + + k[3636]*y_cur[IDX_OII]*y_cur[IDX_CH3OHI] + + k[3643]*y_cur[IDX_OII]*y_cur[IDX_H2SI] + + k[3673]*y_cur[IDX_O2I]*y_cur[IDX_PH2II] - + k[3779]*y_cur[IDX_OHII]*y_cur[IDX_H2OI] + + k[3795]*y_cur[IDX_OHM]*y_cur[IDX_HCNI] + + k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] + + k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] + + k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] + + k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] + + k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] + + k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] + + k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] + + k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] + + k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] + + k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] + + k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] + + k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] + + k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] + + k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] + + k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] + + k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] + + k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] + + k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] + + k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] + + k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] + + k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] + + k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] + + k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] + + k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] + + k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] + + k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] + + k[4811]*y_cur[IDX_OHM]*y_cur[IDX_H3OII] + + k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] + + k[5009]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + + k[5017]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] - + k[5031]*y_cur[IDX_CH3I]*y_cur[IDX_H2OI] + + k[5038]*y_cur[IDX_CH3I]*y_cur[IDX_NOI] + + k[5040]*y_cur[IDX_CH3I]*y_cur[IDX_O2I] + + k[5047]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + + k[5061]*y_cur[IDX_CH4I]*y_cur[IDX_OHI] + + k[5148]*y_cur[IDX_H2I]*y_cur[IDX_OHI] - + k[5151]*y_cur[IDX_H2OI]*y_cur[IDX_FI] - + k[5152]*y_cur[IDX_H2OI]*y_cur[IDX_O2HI] + + k[5166]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - + k[5168]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + + k[5191]*y_cur[IDX_HI]*y_cur[IDX_O2HI] + + k[5298]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + + k[5300]*y_cur[IDX_NH2I]*y_cur[IDX_OHI] - + k[5306]*y_cur[IDX_NHI]*y_cur[IDX_H2OI] + + k[5321]*y_cur[IDX_NHI]*y_cur[IDX_OHI] - + k[5399]*y_cur[IDX_OI]*y_cur[IDX_H2OI] + + k[5453]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] + + k[5456]*y_cur[IDX_OHI]*y_cur[IDX_C2H3I] + + k[5457]*y_cur[IDX_OHI]*y_cur[IDX_C2H5I] + + k[5465]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] + + k[5467]*y_cur[IDX_OHI]*y_cur[IDX_H2O2I] + + k[5468]*y_cur[IDX_OHI]*y_cur[IDX_H2SI] + + k[5469]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] + + k[5471]*y_cur[IDX_OHI]*y_cur[IDX_HCOI] + + k[5472]*y_cur[IDX_OHI]*y_cur[IDX_HNOI] + + k[5476]*y_cur[IDX_OHI]*y_cur[IDX_NH3I] + + k[5478]*y_cur[IDX_OHI]*y_cur[IDX_O2HI] + + k[5479]*y_cur[IDX_OHI]*y_cur[IDX_OHI] - + k[5536]*y_cur[IDX_CH3II]*y_cur[IDX_H2OI] - + k[5566]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] + + k[5574]*y_cur[IDX_HI]*y_cur[IDX_OHI] + + k[5629]*y_cur[IDX_H3OII]*y_cur[IDX_CH3OI] + + k[5635]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHI] + + k[5651]*y_cur[IDX_H3OII]*y_cur[IDX_COOCH3I] + + k[5657]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCOI] + + k[5663]*y_cur[IDX_H3OII]*y_cur[IDX_CH2OHCHOI] + + k[5669]*y_cur[IDX_H3OII]*y_cur[IDX_CH3COOHI] - + k[5839]*y_cur[IDX_H2OI] - k[6159]*y_cur[IDX_H2OI] - + k[6160]*y_cur[IDX_H2OI] - k[6161]*y_cur[IDX_H2OI] + + k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + + k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + + k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6902]*y_cur[IDX_H2OI] + k[7084]*y_cur[IDX_GH2OI] + + k[7266]*y_cur[IDX_GH2OI] + k[7448]*y_cur[IDX_GH2OI] + + k[8584]*y_cur[IDX_GHI]*y_cur[IDX_GOHI]; + ydot[yistart + IDX_HII] = 0.0 - + k[133]*y_cur[IDX_HII]*y_cur[IDX_HNCI] + + k[133]*y_cur[IDX_HII]*y_cur[IDX_HNCI] + + k[318]*y_cur[IDX_ClII]*y_cur[IDX_HI] - + k[319]*y_cur[IDX_ClI]*y_cur[IDX_HII] - + k[320]*y_cur[IDX_HII]*y_cur[IDX_C10I] - + k[321]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] - + k[322]*y_cur[IDX_HII]*y_cur[IDX_C10HI] - + k[323]*y_cur[IDX_HII]*y_cur[IDX_C2I] - + k[324]*y_cur[IDX_HII]*y_cur[IDX_C2H2I] - + k[325]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] - + k[326]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - + k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] - + k[328]*y_cur[IDX_HII]*y_cur[IDX_C2H5OHI] - + k[329]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - + k[330]*y_cur[IDX_HII]*y_cur[IDX_C2NI] - + k[331]*y_cur[IDX_HII]*y_cur[IDX_C2OI] - + k[332]*y_cur[IDX_HII]*y_cur[IDX_C2SI] - + k[333]*y_cur[IDX_HII]*y_cur[IDX_C3I] - + k[334]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] - + k[335]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - + k[336]*y_cur[IDX_HII]*y_cur[IDX_C3OI] - + k[337]*y_cur[IDX_HII]*y_cur[IDX_C3SI] - + k[338]*y_cur[IDX_HII]*y_cur[IDX_C4I] - + k[339]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] - + k[340]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - + k[341]*y_cur[IDX_HII]*y_cur[IDX_C4PI] - + k[342]*y_cur[IDX_HII]*y_cur[IDX_C4SI] - + k[343]*y_cur[IDX_HII]*y_cur[IDX_C5I] - + k[344]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] - + k[345]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - + k[346]*y_cur[IDX_HII]*y_cur[IDX_C6I] - + k[347]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] - + k[348]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - + k[349]*y_cur[IDX_HII]*y_cur[IDX_C7I] - + k[350]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] - + k[351]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - + k[352]*y_cur[IDX_HII]*y_cur[IDX_C8I] - + k[353]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] - + k[354]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - + k[355]*y_cur[IDX_HII]*y_cur[IDX_C9I] - + k[356]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] - + k[357]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - + k[358]*y_cur[IDX_HII]*y_cur[IDX_CCPI] - + k[359]*y_cur[IDX_HII]*y_cur[IDX_CH2I] - + k[360]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] - + k[361]*y_cur[IDX_HII]*y_cur[IDX_CH2CNI] - + k[362]*y_cur[IDX_HII]*y_cur[IDX_CH3I] - + k[363]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] - + k[364]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] - + k[365]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] - + k[366]*y_cur[IDX_HII]*y_cur[IDX_CH3CHOI] - + k[367]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - + k[368]*y_cur[IDX_HII]*y_cur[IDX_CH3COCH3I] - + k[369]*y_cur[IDX_HII]*y_cur[IDX_CH3OCH3I] - + k[370]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - + k[371]*y_cur[IDX_HII]*y_cur[IDX_CH4I] - + k[372]*y_cur[IDX_HII]*y_cur[IDX_CHI] - + k[373]*y_cur[IDX_HII]*y_cur[IDX_CPI] - + k[374]*y_cur[IDX_HII]*y_cur[IDX_CSI] - + k[375]*y_cur[IDX_HII]*y_cur[IDX_FeI] - + k[376]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - + k[377]*y_cur[IDX_HII]*y_cur[IDX_H2CSI] - + k[378]*y_cur[IDX_HII]*y_cur[IDX_H2OI] - + k[379]*y_cur[IDX_HII]*y_cur[IDX_H2S2I] - + k[380]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - + k[381]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] - + k[382]*y_cur[IDX_HII]*y_cur[IDX_HC2PI] - + k[383]*y_cur[IDX_HII]*y_cur[IDX_HC3NI] - + k[384]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] - + k[385]*y_cur[IDX_HII]*y_cur[IDX_HC5NI] - + k[386]*y_cur[IDX_HII]*y_cur[IDX_HC7NI] - + k[387]*y_cur[IDX_HII]*y_cur[IDX_HC9NI] - + k[388]*y_cur[IDX_HII]*y_cur[IDX_HCNI] - + k[389]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - + k[390]*y_cur[IDX_HII]*y_cur[IDX_HCOOCH3I] - + k[391]*y_cur[IDX_HII]*y_cur[IDX_HCPI] - + k[392]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - + k[393]*y_cur[IDX_HII]*y_cur[IDX_HClI] - + k[394]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] - + k[395]*y_cur[IDX_HII]*y_cur[IDX_HPOI] - + k[396]*y_cur[IDX_HII]*y_cur[IDX_HS2I] - + k[397]*y_cur[IDX_HII]*y_cur[IDX_HSI] - + k[398]*y_cur[IDX_HII]*y_cur[IDX_MgI] - + k[399]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - + k[400]*y_cur[IDX_HII]*y_cur[IDX_NH2I] - + k[401]*y_cur[IDX_HII]*y_cur[IDX_NH3I] - + k[402]*y_cur[IDX_HII]*y_cur[IDX_NHI] - + k[403]*y_cur[IDX_HII]*y_cur[IDX_NOI] - + k[404]*y_cur[IDX_HII]*y_cur[IDX_NSI] - + k[405]*y_cur[IDX_HII]*y_cur[IDX_O2I] - + k[406]*y_cur[IDX_HII]*y_cur[IDX_OI] - + k[407]*y_cur[IDX_HII]*y_cur[IDX_OCSI] - + k[408]*y_cur[IDX_HII]*y_cur[IDX_OHI] - + k[409]*y_cur[IDX_HII]*y_cur[IDX_PI] - + k[410]*y_cur[IDX_HII]*y_cur[IDX_PH2I] - + k[411]*y_cur[IDX_HII]*y_cur[IDX_PHI] - + k[412]*y_cur[IDX_HII]*y_cur[IDX_PNI] - + k[413]*y_cur[IDX_HII]*y_cur[IDX_POI] - + k[414]*y_cur[IDX_HII]*y_cur[IDX_S2I] - + k[415]*y_cur[IDX_HII]*y_cur[IDX_SI] - + k[416]*y_cur[IDX_HII]*y_cur[IDX_SO2I] - + k[417]*y_cur[IDX_HII]*y_cur[IDX_SOI] - + k[418]*y_cur[IDX_HII]*y_cur[IDX_SiI] - + k[419]*y_cur[IDX_HII]*y_cur[IDX_SiC2I] - + k[420]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] - + k[421]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - + k[422]*y_cur[IDX_HII]*y_cur[IDX_SiC3I] - + k[423]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] - + k[424]*y_cur[IDX_HII]*y_cur[IDX_SiC4I] - k[425]*y_cur[IDX_HII]*y_cur[IDX_SiCI] - - k[705]*y_cur[IDX_SII]*y_cur[IDX_SiCI] + - k[1110]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + + k[426]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] - + k[427]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] - + k[428]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - + k[429]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] - + k[430]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] - + k[431]*y_cur[IDX_HII]*y_cur[IDX_SiHI] - + k[432]*y_cur[IDX_HII]*y_cur[IDX_SiNI] - + k[433]*y_cur[IDX_HII]*y_cur[IDX_SiNCI] - + k[434]*y_cur[IDX_HII]*y_cur[IDX_SiOI] - + k[435]*y_cur[IDX_HII]*y_cur[IDX_SiSI] + + k[487]*y_cur[IDX_HI]*y_cur[IDX_CNII] + + k[488]*y_cur[IDX_HI]*y_cur[IDX_COII] + + k[489]*y_cur[IDX_HI]*y_cur[IDX_H2II] + + k[490]*y_cur[IDX_HI]*y_cur[IDX_HCNII] + + k[491]*y_cur[IDX_HI]*y_cur[IDX_HeII] + + k[492]*y_cur[IDX_HI]*y_cur[IDX_OII] - + k[2293]*y_cur[IDX_HII]*y_cur[IDX_C10I] - + k[2294]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] - + k[2295]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] - + k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - + k[2297]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] - + k[2298]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] - + k[2299]*y_cur[IDX_HII]*y_cur[IDX_C2HI] - + k[2300]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] - + k[2301]*y_cur[IDX_HII]*y_cur[IDX_C3HI] - + k[2302]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] - + k[2303]*y_cur[IDX_HII]*y_cur[IDX_C4HI] - + k[2304]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] - + k[2305]*y_cur[IDX_HII]*y_cur[IDX_C5HI] - + k[2306]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] - + k[2307]*y_cur[IDX_HII]*y_cur[IDX_C6HI] - + k[2308]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] - + k[2309]*y_cur[IDX_HII]*y_cur[IDX_C7HI] - + k[2310]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] - + k[2311]*y_cur[IDX_HII]*y_cur[IDX_C8HI] - + k[2312]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] - + k[2313]*y_cur[IDX_HII]*y_cur[IDX_C9HI] - + k[2314]*y_cur[IDX_HII]*y_cur[IDX_CH2I] - + k[2315]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] - + k[2316]*y_cur[IDX_HII]*y_cur[IDX_CH2CHCNI] - + k[2317]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - + k[2318]*y_cur[IDX_HII]*y_cur[IDX_CH2NHI] - + k[2319]*y_cur[IDX_HII]*y_cur[IDX_CH2PHI] - + k[2320]*y_cur[IDX_HII]*y_cur[IDX_CH3C3NI] - + k[2321]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] - + k[2322]*y_cur[IDX_HII]*y_cur[IDX_CH3C5NI] - + k[2323]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] - + k[2324]*y_cur[IDX_HII]*y_cur[IDX_CH3C7NI] - + k[2325]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] - + k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] - + k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] - + k[2328]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - + k[2329]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] - + k[2330]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - + k[2331]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - + k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] - + k[2333]*y_cur[IDX_HII]*y_cur[IDX_CH4I] - + k[2334]*y_cur[IDX_HII]*y_cur[IDX_CO2I] - + k[2335]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] - + k[2336]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] - + k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - + k[2338]*y_cur[IDX_HII]*y_cur[IDX_H2COI] - + k[2339]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - + k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] - + k[2341]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] - + k[2342]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] - + k[2343]*y_cur[IDX_HII]*y_cur[IDX_HCNOI] - + k[2344]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - + k[2345]*y_cur[IDX_HII]*y_cur[IDX_HCOI] - + k[2346]*y_cur[IDX_HII]*y_cur[IDX_HCSI] - + k[2347]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - + k[2348]*y_cur[IDX_HII]*y_cur[IDX_HNCOI] - + k[2349]*y_cur[IDX_HII]*y_cur[IDX_HNOI] - + k[2350]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] - + k[2351]*y_cur[IDX_HII]*y_cur[IDX_HOCNI] - + k[2352]*y_cur[IDX_HII]*y_cur[IDX_HONCI] - + k[2353]*y_cur[IDX_HII]*y_cur[IDX_HSI] - + k[2354]*y_cur[IDX_HII]*y_cur[IDX_N2OI] - + k[2355]*y_cur[IDX_HII]*y_cur[IDX_NO2I] - + k[2356]*y_cur[IDX_HII]*y_cur[IDX_OCSI] - + k[2357]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] - + k[2358]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - + k[2359]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] - + k[2360]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] - + k[2361]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] - + k[2362]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - + k[2363]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] - + k[2364]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] - + k[2365]*y_cur[IDX_HII]*y_cur[IDX_SiHI] + + k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - + k[3021]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3022]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3023]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3024]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3024]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3025]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] - + k[3026]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3201]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3226]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + + k[3256]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + + k[3266]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] - + k[3896]*y_cur[IDX_CM]*y_cur[IDX_HII] - + k[3931]*y_cur[IDX_C10M]*y_cur[IDX_HII] - + k[3966]*y_cur[IDX_C10HM]*y_cur[IDX_HII] - + k[4001]*y_cur[IDX_C2M]*y_cur[IDX_HII] - + k[4036]*y_cur[IDX_C2HM]*y_cur[IDX_HII] - + k[4071]*y_cur[IDX_C3M]*y_cur[IDX_HII] - + k[4106]*y_cur[IDX_C3HM]*y_cur[IDX_HII] - + k[4141]*y_cur[IDX_C3NM]*y_cur[IDX_HII] - + k[4176]*y_cur[IDX_C4M]*y_cur[IDX_HII] - + k[4211]*y_cur[IDX_C4HM]*y_cur[IDX_HII] - + k[4246]*y_cur[IDX_C5M]*y_cur[IDX_HII] - + k[4281]*y_cur[IDX_C5HM]*y_cur[IDX_HII] - + k[4316]*y_cur[IDX_C5NM]*y_cur[IDX_HII] - + k[4351]*y_cur[IDX_C6M]*y_cur[IDX_HII] - + k[4386]*y_cur[IDX_C6HM]*y_cur[IDX_HII] - + k[4421]*y_cur[IDX_C7M]*y_cur[IDX_HII] - + k[4456]*y_cur[IDX_C7HM]*y_cur[IDX_HII] - + k[4491]*y_cur[IDX_C8M]*y_cur[IDX_HII] - + k[4526]*y_cur[IDX_C8HM]*y_cur[IDX_HII] - + k[4561]*y_cur[IDX_C9M]*y_cur[IDX_HII] - + k[4596]*y_cur[IDX_C9HM]*y_cur[IDX_HII] - + k[4631]*y_cur[IDX_CHM]*y_cur[IDX_HII] - + k[4666]*y_cur[IDX_CNM]*y_cur[IDX_HII] - + k[4701]*y_cur[IDX_HM]*y_cur[IDX_HII] - + k[4737]*y_cur[IDX_OM]*y_cur[IDX_HII] - + k[4772]*y_cur[IDX_O2M]*y_cur[IDX_HII] - + k[4807]*y_cur[IDX_OHM]*y_cur[IDX_HII] - + k[4842]*y_cur[IDX_SM]*y_cur[IDX_HII] - + k[5546]*y_cur[IDX_HII]*y_cur[IDX_HI] - + k[5547]*y_cur[IDX_HII]*y_cur[IDX_HeI] - + k[5615]*y_cur[IDX_HII]*y_cur[IDX_eM] + + k[5631]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + k[5678]*y_cur[IDX_H2I] + + k[5679]*y_cur[IDX_H2I] + k[5682]*y_cur[IDX_HI] + + k[5844]*y_cur[IDX_HI] + k[6073]*y_cur[IDX_CHII] + + k[6077]*y_cur[IDX_CH2II] + k[6148]*y_cur[IDX_H2II] + + k[6169]*y_cur[IDX_H3II] + k[6206]*y_cur[IDX_HSII] + + k[6217]*y_cur[IDX_NHII] - k[6308]*y_cur[IDX_HII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_CI] = 0.0 - k[0]*y_cur[IDX_CM]*y_cur[IDX_CI] - + k[37]*y_cur[IDX_CI]*y_cur[IDX_C10M] - + k[38]*y_cur[IDX_CI]*y_cur[IDX_C2M] - + k[39]*y_cur[IDX_CI]*y_cur[IDX_C2HM] - + k[40]*y_cur[IDX_CI]*y_cur[IDX_C3M] - + k[41]*y_cur[IDX_CI]*y_cur[IDX_C3HM] - + k[42]*y_cur[IDX_CI]*y_cur[IDX_C3NM] - + k[43]*y_cur[IDX_CI]*y_cur[IDX_C4M] - + k[44]*y_cur[IDX_CI]*y_cur[IDX_C4HM] - + k[45]*y_cur[IDX_CI]*y_cur[IDX_C5M] - + k[46]*y_cur[IDX_CI]*y_cur[IDX_C5HM] - + k[47]*y_cur[IDX_CI]*y_cur[IDX_C6M] - + k[48]*y_cur[IDX_CI]*y_cur[IDX_C6HM] - + k[49]*y_cur[IDX_CI]*y_cur[IDX_C7M] - + k[50]*y_cur[IDX_CI]*y_cur[IDX_C7HM] - + k[51]*y_cur[IDX_CI]*y_cur[IDX_C8M] - + k[52]*y_cur[IDX_CI]*y_cur[IDX_C8HM] - + k[53]*y_cur[IDX_CI]*y_cur[IDX_C9M] - + k[54]*y_cur[IDX_CI]*y_cur[IDX_C9HM] - + k[55]*y_cur[IDX_CI]*y_cur[IDX_CHM] - + k[56]*y_cur[IDX_CI]*y_cur[IDX_OM] - + k[57]*y_cur[IDX_CI]*y_cur[IDX_OHM] - + k[58]*y_cur[IDX_CI]*y_cur[IDX_SM] - + k[68]*y_cur[IDX_HM]*y_cur[IDX_CI] + + k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + + k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] + + k[147]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + + k[148]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[149]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + + k[150]*y_cur[IDX_CII]*y_cur[IDX_C2H5OHI] + + k[151]*y_cur[IDX_CII]*y_cur[IDX_C2OI] + + k[152]*y_cur[IDX_CII]*y_cur[IDX_C2SI] + + k[153]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + + k[154]*y_cur[IDX_CII]*y_cur[IDX_C3SI] + + k[155]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + + k[156]*y_cur[IDX_CII]*y_cur[IDX_C4SI] + + k[157]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + + k[158]*y_cur[IDX_CII]*y_cur[IDX_CCPI] + + k[159]*y_cur[IDX_CII]*y_cur[IDX_CClI] + + k[160]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + + k[161]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + + k[162]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + + k[163]*y_cur[IDX_CII]*y_cur[IDX_CH2CNI] + + k[164]*y_cur[IDX_CII]*y_cur[IDX_CH2COI] + + k[165]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + + k[166]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[167]*y_cur[IDX_CII]*y_cur[IDX_CH3CHOI] + + k[168]*y_cur[IDX_CII]*y_cur[IDX_CH3COCH3I] + + k[169]*y_cur[IDX_CII]*y_cur[IDX_CH3OCH3I] + + k[170]*y_cur[IDX_CII]*y_cur[IDX_CHI] + + k[171]*y_cur[IDX_CII]*y_cur[IDX_CPI] + + k[172]*y_cur[IDX_CII]*y_cur[IDX_ClOI] + + k[173]*y_cur[IDX_CII]*y_cur[IDX_FeI] + + k[174]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + + k[175]*y_cur[IDX_CII]*y_cur[IDX_H2SI] + + k[176]*y_cur[IDX_CII]*y_cur[IDX_H2SiOI] + + k[177]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + + k[178]*y_cur[IDX_CII]*y_cur[IDX_HCOI] + + k[179]*y_cur[IDX_CII]*y_cur[IDX_HCOOCH3I] + + k[180]*y_cur[IDX_CII]*y_cur[IDX_HCPI] + + k[181]*y_cur[IDX_CII]*y_cur[IDX_HPOI] + + k[182]*y_cur[IDX_CII]*y_cur[IDX_MgI] + + k[185]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + + k[186]*y_cur[IDX_CII]*y_cur[IDX_NOI] + + k[187]*y_cur[IDX_CII]*y_cur[IDX_NSI] + + k[188]*y_cur[IDX_CII]*y_cur[IDX_NaI] + + k[189]*y_cur[IDX_CII]*y_cur[IDX_OCSI] + + k[190]*y_cur[IDX_CII]*y_cur[IDX_PI] + + k[191]*y_cur[IDX_CII]*y_cur[IDX_PHI] + + k[192]*y_cur[IDX_CII]*y_cur[IDX_POI] + + k[193]*y_cur[IDX_CII]*y_cur[IDX_SOI] + + k[194]*y_cur[IDX_CII]*y_cur[IDX_SiI] + + k[195]*y_cur[IDX_CII]*y_cur[IDX_SiC2I] + + k[196]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] + + k[197]*y_cur[IDX_CII]*y_cur[IDX_SiC3I] + + k[198]*y_cur[IDX_CII]*y_cur[IDX_SiCI] + + k[199]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + + k[200]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + + k[201]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + + k[202]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + + k[203]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + + k[204]*y_cur[IDX_CII]*y_cur[IDX_SiSI] - + k[244]*y_cur[IDX_CI]*y_cur[IDX_C2II] - + k[245]*y_cur[IDX_CI]*y_cur[IDX_CNII] - + k[246]*y_cur[IDX_CI]*y_cur[IDX_COII] - + k[247]*y_cur[IDX_CI]*y_cur[IDX_N2II] - + k[248]*y_cur[IDX_CI]*y_cur[IDX_O2II] - + k[249]*y_cur[IDX_CI]*y_cur[IDX_PNII] - + k[513]*y_cur[IDX_HeII]*y_cur[IDX_CI] + + k[707]*y_cur[IDX_SI]*y_cur[IDX_CII] + + k[708]*y_cur[IDX_SI]*y_cur[IDX_CII] + + k[728]*y_cur[IDX_C10II]*y_cur[IDX_eM] + + k[734]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + + k[739]*y_cur[IDX_C2II]*y_cur[IDX_eM] + + k[739]*y_cur[IDX_C2II]*y_cur[IDX_eM] + + k[741]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + + k[755]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[756]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[763]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[781]*y_cur[IDX_C2NII]*y_cur[IDX_eM] + + k[785]*y_cur[IDX_C2OII]*y_cur[IDX_eM] + + k[786]*y_cur[IDX_C2SII]*y_cur[IDX_eM] + + k[788]*y_cur[IDX_C3II]*y_cur[IDX_eM] + + k[789]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + + k[792]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[816]*y_cur[IDX_C3SII]*y_cur[IDX_eM] + + k[820]*y_cur[IDX_C4II]*y_cur[IDX_eM] + + k[832]*y_cur[IDX_C4NII]*y_cur[IDX_eM] + + k[833]*y_cur[IDX_C4PII]*y_cur[IDX_eM] + + k[836]*y_cur[IDX_C4SII]*y_cur[IDX_eM] + + k[839]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + + k[849]*y_cur[IDX_C6II]*y_cur[IDX_eM] + + k[850]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + + k[865]*y_cur[IDX_C7II]*y_cur[IDX_eM] + + k[866]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + + k[878]*y_cur[IDX_C8II]*y_cur[IDX_eM] + + k[879]*y_cur[IDX_C8HII]*y_cur[IDX_eM] + + k[890]*y_cur[IDX_C9II]*y_cur[IDX_eM] + + k[891]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + + k[902]*y_cur[IDX_CCPII]*y_cur[IDX_eM] + + k[904]*y_cur[IDX_CClII]*y_cur[IDX_eM] + + k[905]*y_cur[IDX_CFII]*y_cur[IDX_eM] + + k[906]*y_cur[IDX_CHII]*y_cur[IDX_eM] + + k[907]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + + k[908]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + + k[977]*y_cur[IDX_CNII]*y_cur[IDX_eM] + + k[979]*y_cur[IDX_CNCII]*y_cur[IDX_eM] + + k[980]*y_cur[IDX_COII]*y_cur[IDX_eM] + + k[984]*y_cur[IDX_CPII]*y_cur[IDX_eM] + + k[985]*y_cur[IDX_CSII]*y_cur[IDX_eM] + + k[1057]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + + k[1177]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + + k[1192]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + + k[1223]*y_cur[IDX_SiCII]*y_cur[IDX_eM] + k[1225]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] + - k[1233]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + - k[1244]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] - - k[1434]*y_cur[IDX_CII]*y_cur[IDX_SiCI] - - k[2750]*y_cur[IDX_H3II]*y_cur[IDX_SiCI] - - k[2821]*y_cur[IDX_H3OII]*y_cur[IDX_SiCI] - - k[2997]*y_cur[IDX_HCOII]*y_cur[IDX_SiCI] - - k[3316]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] - - k[3317]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] - - k[3792]*y_cur[IDX_OHII]*y_cur[IDX_SiCI] + - k[4990]*y_cur[IDX_CI]*y_cur[IDX_SiHI] - - k[5292]*y_cur[IDX_NI]*y_cur[IDX_SiCI] - + k[1232]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + + k[1239]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] + + k[1451]*y_cur[IDX_C2II]*y_cur[IDX_C2I] + + k[1456]*y_cur[IDX_C2II]*y_cur[IDX_SI] + + k[1464]*y_cur[IDX_C2I]*y_cur[IDX_SII] - + k[1846]*y_cur[IDX_CI]*y_cur[IDX_C10HII] - + k[1847]*y_cur[IDX_CI]*y_cur[IDX_C10HM] - + k[1848]*y_cur[IDX_CI]*y_cur[IDX_C10H2II] - + k[1849]*y_cur[IDX_CI]*y_cur[IDX_C2HII] - + k[1850]*y_cur[IDX_CI]*y_cur[IDX_C2H2II] - + k[1851]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] - + k[1852]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] - + k[1853]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - + k[1854]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] - + k[1855]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] - + k[1856]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] - + k[1857]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] - + k[1858]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] - + k[1859]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] - + k[1860]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] - + k[1861]*y_cur[IDX_CI]*y_cur[IDX_C3H5II] - + k[1862]*y_cur[IDX_CI]*y_cur[IDX_C4HII] - + k[1863]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] - + k[1864]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] - + k[1865]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - + k[1866]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] - + k[1867]*y_cur[IDX_CI]*y_cur[IDX_C5HII] - + k[1868]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - + k[1869]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] - + k[1870]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] - + k[1871]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] - + k[1872]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] - + k[1873]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] - + k[1874]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - + k[1875]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] - + k[1876]*y_cur[IDX_CI]*y_cur[IDX_C7HII] - + k[1877]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] - + k[1878]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] - + k[1879]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] - + k[1880]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] - + k[1881]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] - + k[1882]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] - + k[1883]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - + k[1884]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] - + k[1885]*y_cur[IDX_CI]*y_cur[IDX_C9HII] - + k[1886]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] - + k[1887]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] - + k[1888]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] - + k[1889]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] - + k[1890]*y_cur[IDX_CI]*y_cur[IDX_CHII] - + k[1891]*y_cur[IDX_CI]*y_cur[IDX_CH2II] - + k[1892]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - + k[1893]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] - + k[1894]*y_cur[IDX_CI]*y_cur[IDX_CH3II] - + k[1895]*y_cur[IDX_CI]*y_cur[IDX_CH3C3NHII] - + k[1896]*y_cur[IDX_CI]*y_cur[IDX_CH3C5NHII] - + k[1897]*y_cur[IDX_CI]*y_cur[IDX_CH3C7NHII] - + k[1898]*y_cur[IDX_CI]*y_cur[IDX_CH5II] - + k[1899]*y_cur[IDX_CI]*y_cur[IDX_H2OII] - + k[1900]*y_cur[IDX_CI]*y_cur[IDX_H2SII] - + k[1901]*y_cur[IDX_CI]*y_cur[IDX_H3OII] - + k[1902]*y_cur[IDX_CI]*y_cur[IDX_HC2SII] - + k[1903]*y_cur[IDX_CI]*y_cur[IDX_HCNII] - + k[1904]*y_cur[IDX_CI]*y_cur[IDX_HCOII] - + k[1905]*y_cur[IDX_CI]*y_cur[IDX_HCO2II] - + k[1906]*y_cur[IDX_CI]*y_cur[IDX_HCPII] - + k[1907]*y_cur[IDX_CI]*y_cur[IDX_HNOII] - + k[1908]*y_cur[IDX_CI]*y_cur[IDX_HSII] - + k[1909]*y_cur[IDX_CI]*y_cur[IDX_N2HII] - + k[1910]*y_cur[IDX_CI]*y_cur[IDX_NHII] - + k[1911]*y_cur[IDX_CI]*y_cur[IDX_NH4II] - + k[1912]*y_cur[IDX_CI]*y_cur[IDX_O2II] - + k[1913]*y_cur[IDX_CI]*y_cur[IDX_O2HII] - + k[1914]*y_cur[IDX_CI]*y_cur[IDX_OHII] - + k[1915]*y_cur[IDX_CI]*y_cur[IDX_SiC2HII] - + k[1916]*y_cur[IDX_CI]*y_cur[IDX_SiC2H2II] - + k[1917]*y_cur[IDX_CI]*y_cur[IDX_SiC2H3II] - + k[1918]*y_cur[IDX_CI]*y_cur[IDX_SiC3HII] - + k[1919]*y_cur[IDX_CI]*y_cur[IDX_SiC3H2II] - + k[1920]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - + k[1921]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - + k[1922]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - + k[1923]*y_cur[IDX_CI]*y_cur[IDX_SiCH3II] - + k[1924]*y_cur[IDX_CI]*y_cur[IDX_SiCH4II] - + k[1925]*y_cur[IDX_CI]*y_cur[IDX_SiHII] - + k[1926]*y_cur[IDX_CI]*y_cur[IDX_SiH2II] - + k[1927]*y_cur[IDX_CI]*y_cur[IDX_SiH3II] - + k[1928]*y_cur[IDX_CI]*y_cur[IDX_SiH4II] - + k[1929]*y_cur[IDX_CI]*y_cur[IDX_SiH5II] - + k[1930]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] - + k[1931]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] - + k[1932]*y_cur[IDX_CI]*y_cur[IDX_SiOII] + + k[1937]*y_cur[IDX_CHII]*y_cur[IDX_CH3OHI] + + k[1949]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + + k[1952]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + + k[1954]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] + + k[1958]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + + k[1960]*y_cur[IDX_CHII]*y_cur[IDX_HNCI] + + k[1964]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + + k[1971]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] + + k[1974]*y_cur[IDX_CHII]*y_cur[IDX_SI] + + k[2245]*y_cur[IDX_CHI]*y_cur[IDX_COII] + + k[2260]*y_cur[IDX_CHI]*y_cur[IDX_NH3II] + + k[2293]*y_cur[IDX_HII]*y_cur[IDX_C10I] - + k[2374]*y_cur[IDX_H2II]*y_cur[IDX_CI] - + k[2632]*y_cur[IDX_H3II]*y_cur[IDX_CI] + + k[3031]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3057]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3061]*y_cur[IDX_HeII]*y_cur[IDX_C10I] + + k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3070]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3073]*y_cur[IDX_HeII]*y_cur[IDX_C2I] + + k[3087]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3091]*y_cur[IDX_HeII]*y_cur[IDX_C2SI] + + k[3106]*y_cur[IDX_HeII]*y_cur[IDX_C4I] + + k[3109]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + + k[3118]*y_cur[IDX_HeII]*y_cur[IDX_C5I] + + k[3126]*y_cur[IDX_HeII]*y_cur[IDX_C6I] + + k[3135]*y_cur[IDX_HeII]*y_cur[IDX_C7I] + + k[3143]*y_cur[IDX_HeII]*y_cur[IDX_C8I] + + k[3150]*y_cur[IDX_HeII]*y_cur[IDX_C9I] + + k[3203]*y_cur[IDX_HeII]*y_cur[IDX_CNI] + + k[3209]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] + + k[3212]*y_cur[IDX_HeII]*y_cur[IDX_CPI] + + k[3214]*y_cur[IDX_HeII]*y_cur[IDX_CSI] + + k[3263]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + + k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] + + k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] + + k[3316]*y_cur[IDX_HeII]*y_cur[IDX_SiCI] + + k[3344]*y_cur[IDX_NII]*y_cur[IDX_COI] + + k[3384]*y_cur[IDX_NI]*y_cur[IDX_C2M] + + k[3456]*y_cur[IDX_NI]*y_cur[IDX_CNII] + + k[3479]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + + k[3631]*y_cur[IDX_OII]*y_cur[IDX_C2I] + + k[3639]*y_cur[IDX_OII]*y_cur[IDX_CNI] + + k[3684]*y_cur[IDX_OI]*y_cur[IDX_C2II] + + k[3686]*y_cur[IDX_OI]*y_cur[IDX_C2HII] + + k[3753]*y_cur[IDX_OI]*y_cur[IDX_SiCII] + + k[3886]*y_cur[IDX_CM]*y_cur[IDX_CII] + + k[3886]*y_cur[IDX_CM]*y_cur[IDX_CII] + + k[3887]*y_cur[IDX_CM]*y_cur[IDX_C2H2II] + + k[3888]*y_cur[IDX_CM]*y_cur[IDX_C2H3II] + + k[3889]*y_cur[IDX_CM]*y_cur[IDX_C4H2II] + + k[3890]*y_cur[IDX_CM]*y_cur[IDX_C4H3II] + + k[3891]*y_cur[IDX_CM]*y_cur[IDX_C4SII] + + k[3892]*y_cur[IDX_CM]*y_cur[IDX_CH2CCHII] + + k[3893]*y_cur[IDX_CM]*y_cur[IDX_CH3II] + + k[3894]*y_cur[IDX_CM]*y_cur[IDX_CNCII] + + k[3895]*y_cur[IDX_CM]*y_cur[IDX_FeII] + + k[3896]*y_cur[IDX_CM]*y_cur[IDX_HII] + + k[3897]*y_cur[IDX_CM]*y_cur[IDX_H2COII] + + k[3898]*y_cur[IDX_CM]*y_cur[IDX_H2SII] + + k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] + + k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] + + k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] + + k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + + k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + + k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + + k[3905]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + + k[3906]*y_cur[IDX_CM]*y_cur[IDX_HeII] + + k[3907]*y_cur[IDX_CM]*y_cur[IDX_MgII] + + k[3908]*y_cur[IDX_CM]*y_cur[IDX_NII] + + k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] + + k[3910]*y_cur[IDX_CM]*y_cur[IDX_NH3II] + + k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] + + k[3912]*y_cur[IDX_CM]*y_cur[IDX_NOII] + + k[3913]*y_cur[IDX_CM]*y_cur[IDX_NaII] + + k[3914]*y_cur[IDX_CM]*y_cur[IDX_OII] + + k[3915]*y_cur[IDX_CM]*y_cur[IDX_SII] + + k[3916]*y_cur[IDX_CM]*y_cur[IDX_SOII] + + k[3917]*y_cur[IDX_CM]*y_cur[IDX_SiII] + + k[3918]*y_cur[IDX_CM]*y_cur[IDX_SiOII] + + k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] + + k[3920]*y_cur[IDX_CM]*y_cur[IDX_SiSII] + + k[3921]*y_cur[IDX_C10M]*y_cur[IDX_CII] + + k[3956]*y_cur[IDX_C10HM]*y_cur[IDX_CII] + + k[3991]*y_cur[IDX_C2M]*y_cur[IDX_CII] + + k[4026]*y_cur[IDX_C2HM]*y_cur[IDX_CII] + + k[4061]*y_cur[IDX_C3M]*y_cur[IDX_CII] + + k[4096]*y_cur[IDX_C3HM]*y_cur[IDX_CII] + + k[4131]*y_cur[IDX_C3NM]*y_cur[IDX_CII] + + k[4166]*y_cur[IDX_C4M]*y_cur[IDX_CII] + + k[4201]*y_cur[IDX_C4HM]*y_cur[IDX_CII] + + k[4236]*y_cur[IDX_C5M]*y_cur[IDX_CII] + + k[4271]*y_cur[IDX_C5HM]*y_cur[IDX_CII] + + k[4306]*y_cur[IDX_C5NM]*y_cur[IDX_CII] + + k[4341]*y_cur[IDX_C6M]*y_cur[IDX_CII] + + k[4376]*y_cur[IDX_C6HM]*y_cur[IDX_CII] + + k[4411]*y_cur[IDX_C7M]*y_cur[IDX_CII] + + k[4446]*y_cur[IDX_C7HM]*y_cur[IDX_CII] + + k[4481]*y_cur[IDX_C8M]*y_cur[IDX_CII] + + k[4516]*y_cur[IDX_C8HM]*y_cur[IDX_CII] + + k[4551]*y_cur[IDX_C9M]*y_cur[IDX_CII] + + k[4586]*y_cur[IDX_C9HM]*y_cur[IDX_CII] + + k[4621]*y_cur[IDX_CHM]*y_cur[IDX_CII] + + k[4656]*y_cur[IDX_CNM]*y_cur[IDX_CII] + + k[4691]*y_cur[IDX_HM]*y_cur[IDX_CII] + + k[4727]*y_cur[IDX_OM]*y_cur[IDX_CII] + + k[4762]*y_cur[IDX_O2M]*y_cur[IDX_CII] + + k[4797]*y_cur[IDX_OHM]*y_cur[IDX_CII] + + k[4832]*y_cur[IDX_SM]*y_cur[IDX_CII] + + k[4876]*y_cur[IDX_C2I]*y_cur[IDX_SI] - + k[4909]*y_cur[IDX_CI]*y_cur[IDX_C10H2I] - + k[4910]*y_cur[IDX_CI]*y_cur[IDX_C10HI] - + k[4911]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] - + k[4912]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] - + k[4913]*y_cur[IDX_CI]*y_cur[IDX_C2H3I] - + k[4914]*y_cur[IDX_CI]*y_cur[IDX_C2H4I] - + k[4915]*y_cur[IDX_CI]*y_cur[IDX_C2H5I] - + k[4916]*y_cur[IDX_CI]*y_cur[IDX_C2HI] - + k[4917]*y_cur[IDX_CI]*y_cur[IDX_C2NI] - + k[4918]*y_cur[IDX_CI]*y_cur[IDX_C2OI] - + k[4919]*y_cur[IDX_CI]*y_cur[IDX_C3H2I] - + k[4920]*y_cur[IDX_CI]*y_cur[IDX_C3HI] - + k[4921]*y_cur[IDX_CI]*y_cur[IDX_C3NI] - + k[4922]*y_cur[IDX_CI]*y_cur[IDX_C3OI] - + k[4923]*y_cur[IDX_CI]*y_cur[IDX_C4I] - + k[4924]*y_cur[IDX_CI]*y_cur[IDX_C4H3I] - + k[4925]*y_cur[IDX_CI]*y_cur[IDX_C4HI] - + k[4926]*y_cur[IDX_CI]*y_cur[IDX_C5I] - + k[4927]*y_cur[IDX_CI]*y_cur[IDX_C5H2I] - + k[4928]*y_cur[IDX_CI]*y_cur[IDX_C5HI] - + k[4929]*y_cur[IDX_CI]*y_cur[IDX_C5NI] - + k[4930]*y_cur[IDX_CI]*y_cur[IDX_C6I] - + k[4931]*y_cur[IDX_CI]*y_cur[IDX_C6I] - + k[4932]*y_cur[IDX_CI]*y_cur[IDX_C6H2I] - + k[4933]*y_cur[IDX_CI]*y_cur[IDX_C6HI] - + k[4934]*y_cur[IDX_CI]*y_cur[IDX_C7I] - + k[4935]*y_cur[IDX_CI]*y_cur[IDX_C7H2I] - + k[4936]*y_cur[IDX_CI]*y_cur[IDX_C7HI] - + k[4937]*y_cur[IDX_CI]*y_cur[IDX_C7NI] - + k[4938]*y_cur[IDX_CI]*y_cur[IDX_C8I] - + k[4939]*y_cur[IDX_CI]*y_cur[IDX_C8H2I] - + k[4940]*y_cur[IDX_CI]*y_cur[IDX_C8HI] - + k[4941]*y_cur[IDX_CI]*y_cur[IDX_C9H2I] - + k[4942]*y_cur[IDX_CI]*y_cur[IDX_C9HI] - + k[4943]*y_cur[IDX_CI]*y_cur[IDX_C9NI] - + k[4944]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - + k[4945]*y_cur[IDX_CI]*y_cur[IDX_CH2I] - + k[4946]*y_cur[IDX_CI]*y_cur[IDX_CH2CCH2I] - + k[4947]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHI] - + k[4948]*y_cur[IDX_CI]*y_cur[IDX_CH2CNI] - + k[4949]*y_cur[IDX_CI]*y_cur[IDX_CH3I] - + k[4950]*y_cur[IDX_CI]*y_cur[IDX_CH3C4HI] - + k[4951]*y_cur[IDX_CI]*y_cur[IDX_CH3C6HI] - + k[4952]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - + k[4953]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] - + k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] - + k[4955]*y_cur[IDX_CI]*y_cur[IDX_CHI] - + k[4956]*y_cur[IDX_CI]*y_cur[IDX_CNI] - + k[4957]*y_cur[IDX_CI]*y_cur[IDX_COI] - + k[4958]*y_cur[IDX_CI]*y_cur[IDX_CSI] - + k[4959]*y_cur[IDX_CI]*y_cur[IDX_H2CCCI] - + k[4960]*y_cur[IDX_CI]*y_cur[IDX_H2CNI] - + k[4961]*y_cur[IDX_CI]*y_cur[IDX_C4H2I] - + k[4962]*y_cur[IDX_CI]*y_cur[IDX_HCOI] - + k[4963]*y_cur[IDX_CI]*y_cur[IDX_HCOI] - + k[4964]*y_cur[IDX_CI]*y_cur[IDX_HPOI] - + k[4965]*y_cur[IDX_CI]*y_cur[IDX_HSI] - + k[4966]*y_cur[IDX_CI]*y_cur[IDX_HSI] - + k[4967]*y_cur[IDX_CI]*y_cur[IDX_N2I] - + k[4968]*y_cur[IDX_CI]*y_cur[IDX_NCCNI] - + k[4969]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - + k[4970]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - + k[4971]*y_cur[IDX_CI]*y_cur[IDX_NH2I] - + k[4972]*y_cur[IDX_CI]*y_cur[IDX_NHI] - + k[4973]*y_cur[IDX_CI]*y_cur[IDX_NHI] - + k[4974]*y_cur[IDX_CI]*y_cur[IDX_NOI] - + k[4975]*y_cur[IDX_CI]*y_cur[IDX_NOI] - + k[4976]*y_cur[IDX_CI]*y_cur[IDX_NSI] - + k[4977]*y_cur[IDX_CI]*y_cur[IDX_NSI] - + k[4978]*y_cur[IDX_CI]*y_cur[IDX_O2I] - + k[4979]*y_cur[IDX_CI]*y_cur[IDX_OCNI] - + k[4980]*y_cur[IDX_CI]*y_cur[IDX_OCSI] - + k[4981]*y_cur[IDX_CI]*y_cur[IDX_OHI] - + k[4982]*y_cur[IDX_CI]*y_cur[IDX_OHI] - + k[4983]*y_cur[IDX_CI]*y_cur[IDX_PHI] - + k[4984]*y_cur[IDX_CI]*y_cur[IDX_S2I] - + k[4985]*y_cur[IDX_CI]*y_cur[IDX_SO2I] - + k[4986]*y_cur[IDX_CI]*y_cur[IDX_SOI] - + k[4987]*y_cur[IDX_CI]*y_cur[IDX_SOI] - + k[4988]*y_cur[IDX_CI]*y_cur[IDX_SiH2I] - + k[4989]*y_cur[IDX_CI]*y_cur[IDX_SiH3I] - + k[4990]*y_cur[IDX_CI]*y_cur[IDX_SiHI] + + k[5081]*y_cur[IDX_CHI]*y_cur[IDX_NI] + + k[5097]*y_cur[IDX_CHI]*y_cur[IDX_OI] + + k[5101]*y_cur[IDX_CHI]*y_cur[IDX_SI] + + k[5125]*y_cur[IDX_CNI]*y_cur[IDX_SI] - + k[5134]*y_cur[IDX_H2I]*y_cur[IDX_CI] + + k[5153]*y_cur[IDX_HI]*y_cur[IDX_C2I] + + k[5160]*y_cur[IDX_HI]*y_cur[IDX_CHI] + + k[5163]*y_cur[IDX_HI]*y_cur[IDX_COI] - + k[5202]*y_cur[IDX_HCNOI]*y_cur[IDX_CI] - + k[5212]*y_cur[IDX_HNC3I]*y_cur[IDX_CI] - + k[5214]*y_cur[IDX_HNCOI]*y_cur[IDX_CI] - + k[5215]*y_cur[IDX_HOCNI]*y_cur[IDX_CI] - + k[5217]*y_cur[IDX_HONCI]*y_cur[IDX_CI] + + k[5222]*y_cur[IDX_NI]*y_cur[IDX_C2I] + + k[5260]*y_cur[IDX_NI]*y_cur[IDX_CNI] + + k[5261]*y_cur[IDX_NI]*y_cur[IDX_CNI] + k[5293]*y_cur[IDX_NI]*y_cur[IDX_SiCI] + - k[5440]*y_cur[IDX_OI]*y_cur[IDX_SiC2I] - - k[5443]*y_cur[IDX_OI]*y_cur[IDX_SiCI] - - k[5444]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + k[5918]*y_cur[IDX_SiC2I] - - k[5924]*y_cur[IDX_SiCI] + k[5925]*y_cur[IDX_SiCH2I] + - k[6193]*y_cur[IDX_HCSiI] + k[6263]*y_cur[IDX_SiC3I] - - k[6267]*y_cur[IDX_SiCI] + - k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + - k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + - k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + - k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] - - k[6955]*y_cur[IDX_SiCI] + k[7137]*y_cur[IDX_GSiCI] + - k[7319]*y_cur[IDX_GSiCI] + k[7501]*y_cur[IDX_GSiCI]; - ydot[yistart + IDX_SiCII] = 0.0 + - k[198]*y_cur[IDX_CII]*y_cur[IDX_SiCI] + - k[425]*y_cur[IDX_HII]*y_cur[IDX_SiCI] + - k[705]*y_cur[IDX_SII]*y_cur[IDX_SiCI] - - k[1223]*y_cur[IDX_SiCII]*y_cur[IDX_eM] + - k[1440]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + - k[1445]*y_cur[IDX_CII]*y_cur[IDX_SiHI] + - k[1446]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + - k[1448]*y_cur[IDX_CII]*y_cur[IDX_SiSI] + - k[1465]*y_cur[IDX_C2I]*y_cur[IDX_SiOII] + - k[1925]*y_cur[IDX_CI]*y_cur[IDX_SiHII] + - k[2266]*y_cur[IDX_CHI]*y_cur[IDX_SiII] + - k[2347]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] - - k[2472]*y_cur[IDX_H2I]*y_cur[IDX_SiCII] + - k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] - - k[3469]*y_cur[IDX_NI]*y_cur[IDX_SiCII] - - k[3753]*y_cur[IDX_OI]*y_cur[IDX_SiCII] - - k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiC2I] = 0.0 - - k[195]*y_cur[IDX_CII]*y_cur[IDX_SiC2I] - - k[419]*y_cur[IDX_HII]*y_cur[IDX_SiC2I] + - k[1227]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] + - k[1228]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + - k[1232]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + - k[1238]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] - - k[2744]*y_cur[IDX_H3II]*y_cur[IDX_SiC2I] - - k[2819]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2I] - - k[2991]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2I] - - k[3307]*y_cur[IDX_HeII]*y_cur[IDX_SiC2I] + - k[4879]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - - k[5440]*y_cur[IDX_OI]*y_cur[IDX_SiC2I] + - k[5441]*y_cur[IDX_OI]*y_cur[IDX_SiC3I] - k[5918]*y_cur[IDX_SiC2I] + - k[5919]*y_cur[IDX_SiC2H2I] + k[5920]*y_cur[IDX_SiC2HI] + - k[5921]*y_cur[IDX_SiC3I] + k[5923]*y_cur[IDX_SiC4I] - - k[6260]*y_cur[IDX_SiC2I] + k[6262]*y_cur[IDX_SiC2HI] + - k[6264]*y_cur[IDX_SiC3I] + - k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + - k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + + k[5343]*y_cur[IDX_OI]*y_cur[IDX_C2I] + + k[5380]*y_cur[IDX_OI]*y_cur[IDX_CClI] + + k[5388]*y_cur[IDX_OI]*y_cur[IDX_CNI] + + k[5393]*y_cur[IDX_OI]*y_cur[IDX_CSI] + + k[5444]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + + k[5492]*y_cur[IDX_SiI]*y_cur[IDX_COI] - + k[5503]*y_cur[IDX_CII]*y_cur[IDX_CI] - + k[5521]*y_cur[IDX_CI]*y_cur[IDX_C2I] - + k[5522]*y_cur[IDX_CI]*y_cur[IDX_C3I] - + k[5523]*y_cur[IDX_CI]*y_cur[IDX_CI] - + k[5523]*y_cur[IDX_CI]*y_cur[IDX_CI] - + k[5524]*y_cur[IDX_CI]*y_cur[IDX_NI] - + k[5525]*y_cur[IDX_CI]*y_cur[IDX_OII] - + k[5526]*y_cur[IDX_CI]*y_cur[IDX_OI] - + k[5527]*y_cur[IDX_CI]*y_cur[IDX_PI] - + k[5528]*y_cur[IDX_CI]*y_cur[IDX_SII] - + k[5529]*y_cur[IDX_CI]*y_cur[IDX_SI] - + k[5554]*y_cur[IDX_H2I]*y_cur[IDX_CI] - + k[5572]*y_cur[IDX_HI]*y_cur[IDX_CI] - + k[5607]*y_cur[IDX_CI]*y_cur[IDX_eM] + + k[5611]*y_cur[IDX_CII]*y_cur[IDX_eM] + + k[5627]*y_cur[IDX_CII]*y_cur[IDX_CH3OI] + + k[5639]*y_cur[IDX_CII]*y_cur[IDX_CH3COI] + + k[5644]*y_cur[IDX_CII]*y_cur[IDX_COOHI] + + k[5649]*y_cur[IDX_CII]*y_cur[IDX_COOCH3I] + + k[5655]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCOI] + + k[5661]*y_cur[IDX_CII]*y_cur[IDX_CH2OHCHOI] + + k[5667]*y_cur[IDX_CII]*y_cur[IDX_CH3COOHI] - k[5675]*y_cur[IDX_CI] + + k[5686]*y_cur[IDX_CM] + k[5688]*y_cur[IDX_C10I] + + k[5692]*y_cur[IDX_C11I] + k[5694]*y_cur[IDX_C2I] + + k[5694]*y_cur[IDX_C2I] + k[5711]*y_cur[IDX_C2NI] + + k[5713]*y_cur[IDX_C2OI] + k[5714]*y_cur[IDX_C2SI] + + k[5717]*y_cur[IDX_C3I] + k[5724]*y_cur[IDX_C3PI] + + k[5728]*y_cur[IDX_C4I] + k[5734]*y_cur[IDX_C4PI] + + k[5738]*y_cur[IDX_C5I] + k[5748]*y_cur[IDX_C6I] + + k[5756]*y_cur[IDX_C7I] + k[5762]*y_cur[IDX_C8I] + + k[5767]*y_cur[IDX_C9I] - k[5772]*y_cur[IDX_CI] + + k[5774]*y_cur[IDX_CCPI] + k[5775]*y_cur[IDX_CClI] + + k[5784]*y_cur[IDX_CH2CHCCHI] + k[5785]*y_cur[IDX_CH2CHCCHI] + + k[5786]*y_cur[IDX_C4H6I] + k[5821]*y_cur[IDX_CHI] + + k[5823]*y_cur[IDX_CNI] + k[5826]*y_cur[IDX_COI] + + k[5827]*y_cur[IDX_CPI] + k[5829]*y_cur[IDX_CSI] + + k[5918]*y_cur[IDX_SiC2I] + k[5921]*y_cur[IDX_SiC3I] + + k[5924]*y_cur[IDX_SiCI] + k[5948]*y_cur[IDX_CM] + + k[5951]*y_cur[IDX_C10I] + k[5953]*y_cur[IDX_C10I] + + k[5955]*y_cur[IDX_C10I] + k[5968]*y_cur[IDX_C10HI] + + k[5975]*y_cur[IDX_C2II] + k[5978]*y_cur[IDX_C2I] + + k[5978]*y_cur[IDX_C2I] + k[5996]*y_cur[IDX_C2NI] + + k[5998]*y_cur[IDX_C2OI] + k[6001]*y_cur[IDX_C3I] + + k[6012]*y_cur[IDX_C4I] + k[6033]*y_cur[IDX_C6I] + + k[6042]*y_cur[IDX_C7I] + k[6052]*y_cur[IDX_C8I] + + k[6060]*y_cur[IDX_C9I] - k[6069]*y_cur[IDX_CI] + + k[6071]*y_cur[IDX_CCPI] + k[6072]*y_cur[IDX_CClI] + + k[6073]*y_cur[IDX_CHII] + k[6085]*y_cur[IDX_CH2CHCCHI] + + k[6086]*y_cur[IDX_CH2CHCCHI] + k[6087]*y_cur[IDX_C4H6I] + + k[6131]*y_cur[IDX_CHI] + k[6134]*y_cur[IDX_CNI] + + k[6138]*y_cur[IDX_COI] + k[6139]*y_cur[IDX_CPI] + + k[6140]*y_cur[IDX_CSII] + k[6142]*y_cur[IDX_CSI] + + k[6264]*y_cur[IDX_SiC3I] + k[6267]*y_cur[IDX_SiCI] + + k[6282]*y_cur[IDX_SiNCI] - k[6299]*y_cur[IDX_CI] + + k[6314]*y_cur[IDX_CII]*y_cur[IDX_GRAINM] + + k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM] + + k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM] + + k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM] + + k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + + k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM] + + k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM] + + k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM] + + k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM] + + k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + + k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + + k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + + k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM] + + k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM] + + k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM] + + k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM] + + k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM] + + k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + + k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + + k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + + k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + + k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + + k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + k[6746]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] + - k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] - - k[7003]*y_cur[IDX_SiC2I] + k[7185]*y_cur[IDX_GSiC2I] + - k[7367]*y_cur[IDX_GSiC2I] + k[7549]*y_cur[IDX_GSiC2I]; - ydot[yistart + IDX_SiC2II] = 0.0 + - k[195]*y_cur[IDX_CII]*y_cur[IDX_SiC2I] + - k[419]*y_cur[IDX_HII]*y_cur[IDX_SiC2I] - - k[1224]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] - - k[1225]*y_cur[IDX_SiC2II]*y_cur[IDX_eM] + - k[1410]*y_cur[IDX_CII]*y_cur[IDX_HCSiI] + - k[1435]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + - k[1529]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] - - k[1575]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2II] + - k[1751]*y_cur[IDX_C2HI]*y_cur[IDX_SiII] + - k[1921]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + - k[2358]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - - k[2473]*y_cur[IDX_H2I]*y_cur[IDX_SiC2II] + - k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + - k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] - - k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] - - k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiC2HI] = 0.0 - - k[196]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] - - k[421]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] + - k[1229]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + - k[1231]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] - - k[1432]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] - - k[2358]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - - k[2746]*y_cur[IDX_H3II]*y_cur[IDX_SiC2HI] - - k[2820]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2HI] - - k[2993]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2HI] - - k[3310]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] - - k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + - k[4880]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] - k[5920]*y_cur[IDX_SiC2HI] - + k[6261]*y_cur[IDX_SiC2H2I] - k[6262]*y_cur[IDX_SiC2HI] + - k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + - k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - - k[7008]*y_cur[IDX_SiC2HI] + k[7190]*y_cur[IDX_GSiC2HI] + - k[7372]*y_cur[IDX_GSiC2HI] + k[7554]*y_cur[IDX_GSiC2HI]; - ydot[yistart + IDX_SiC2HII] = 0.0 + - k[196]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] + - k[421]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] - - k[1226]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] - - k[1227]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] + - k[1436]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + - k[1437]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + - k[1530]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] + - k[1574]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - - k[1576]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2HII] + - k[1626]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] - - k[1915]*y_cur[IDX_CI]*y_cur[IDX_SiC2HII] + - k[1922]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + - k[2357]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] + - k[2473]*y_cur[IDX_H2I]*y_cur[IDX_SiC2II] + - k[2744]*y_cur[IDX_H3II]*y_cur[IDX_SiC2I] + - k[2819]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2I] + - k[2991]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2I] + - k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + - k[3864]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] - - k[5563]*y_cur[IDX_H2I]*y_cur[IDX_SiC2HII] - - k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] - - k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiC2H2I] = 0.0 - - k[420]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] + - k[1230]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] - - k[1431]*y_cur[IDX_CII]*y_cur[IDX_SiC2H2I] - - k[2357]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] - - k[2745]*y_cur[IDX_H3II]*y_cur[IDX_SiC2H2I] - + k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + + k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + + k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + + k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + + k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + + k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + + k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + + k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + + k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + + k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + + k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + + k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + + k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + + k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + + k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - k[6891]*y_cur[IDX_CI] + + k[7073]*y_cur[IDX_GCI] + k[7255]*y_cur[IDX_GCI] + + k[7437]*y_cur[IDX_GCI]; + ydot[yistart + IDX_HCOII] = 0.0 + k[63]*y_cur[IDX_CHI]*y_cur[IDX_OI] + + k[137]*y_cur[IDX_H2I]*y_cur[IDX_HOCII] + + k[178]*y_cur[IDX_CII]*y_cur[IDX_HCOI] + + k[205]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + + k[225]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] + + k[251]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] + + k[272]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] + + k[302]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + + k[310]*y_cur[IDX_COII]*y_cur[IDX_HCOI] + + k[389]*y_cur[IDX_HII]*y_cur[IDX_HCOI] + + k[450]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + + k[470]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] - + k[499]*y_cur[IDX_HCOII]*y_cur[IDX_FeI] + + k[500]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] + + k[501]*y_cur[IDX_HCOI]*y_cur[IDX_H2SII] + + k[502]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] + + k[503]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + + k[504]*y_cur[IDX_HCOI]*y_cur[IDX_SiOII] - + k[533]*y_cur[IDX_MgI]*y_cur[IDX_HCOII] + + k[555]*y_cur[IDX_NII]*y_cur[IDX_HCOI] + + k[568]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + + k[581]*y_cur[IDX_NH2II]*y_cur[IDX_HCOI] + + k[593]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] - + k[637]*y_cur[IDX_NaI]*y_cur[IDX_HCOII] + + k[658]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + + k[691]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] - + k[1097]*y_cur[IDX_HCOII]*y_cur[IDX_eM] + + k[1391]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + + k[1393]*y_cur[IDX_CII]*y_cur[IDX_H2OI] - + k[1459]*y_cur[IDX_C2I]*y_cur[IDX_HCOII] - + k[1566]*y_cur[IDX_C2H2I]*y_cur[IDX_HCOII] - + k[1644]*y_cur[IDX_C2H3I]*y_cur[IDX_HCOII] - + k[1708]*y_cur[IDX_C2H4I]*y_cur[IDX_HCOII] + + k[1743]*y_cur[IDX_C2HI]*y_cur[IDX_COII] - + k[1746]*y_cur[IDX_C2HI]*y_cur[IDX_HCOII] + + k[1901]*y_cur[IDX_CI]*y_cur[IDX_H3OII] - + k[1904]*y_cur[IDX_CI]*y_cur[IDX_HCOII] + + k[1946]*y_cur[IDX_CHII]*y_cur[IDX_CO2I] + + k[1950]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + + k[1953]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + + k[1967]*y_cur[IDX_CHII]*y_cur[IDX_O2I] + + k[1981]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + + k[1990]*y_cur[IDX_CH2II]*y_cur[IDX_O2I] + + k[1991]*y_cur[IDX_CH2II]*y_cur[IDX_OI] + + k[2001]*y_cur[IDX_CH2I]*y_cur[IDX_COII] - + k[2008]*y_cur[IDX_CH2I]*y_cur[IDX_HCOII] + + k[2077]*y_cur[IDX_CH3II]*y_cur[IDX_H2COI] + + k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] + + k[2091]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + + k[2140]*y_cur[IDX_CH4II]*y_cur[IDX_COI] + + k[2190]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + + k[2224]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + + k[2245]*y_cur[IDX_CHI]*y_cur[IDX_COII] - + k[2253]*y_cur[IDX_CHI]*y_cur[IDX_HCOII] + + k[2262]*y_cur[IDX_CHI]*y_cur[IDX_O2II] + + k[2268]*y_cur[IDX_CHI]*y_cur[IDX_SiOII] + + k[2271]*y_cur[IDX_CNII]*y_cur[IDX_H2COI] + + k[2280]*y_cur[IDX_COII]*y_cur[IDX_H2COI] + + k[2281]*y_cur[IDX_COII]*y_cur[IDX_H2SI] + + k[2283]*y_cur[IDX_COI]*y_cur[IDX_CH3CNII] + + k[2284]*y_cur[IDX_COI]*y_cur[IDX_H2ClII] + + k[2285]*y_cur[IDX_COI]*y_cur[IDX_HCO2II] + + k[2286]*y_cur[IDX_COI]*y_cur[IDX_HNOII] + + k[2287]*y_cur[IDX_COI]*y_cur[IDX_HNSiII] + + k[2288]*y_cur[IDX_COI]*y_cur[IDX_N2HII] + + k[2289]*y_cur[IDX_COI]*y_cur[IDX_O2HII] + + k[2291]*y_cur[IDX_COI]*y_cur[IDX_SiH4II] + + k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + + k[2334]*y_cur[IDX_HII]*y_cur[IDX_CO2I] + + k[2338]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + + k[2383]*y_cur[IDX_H2II]*y_cur[IDX_COI] + + k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + + k[2434]*y_cur[IDX_H2I]*y_cur[IDX_COII] + + k[2489]*y_cur[IDX_H2COII]*y_cur[IDX_O2I] + + k[2498]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + + k[2501]*y_cur[IDX_H2COI]*y_cur[IDX_SII] + + k[2507]*y_cur[IDX_H2OII]*y_cur[IDX_COI] + + k[2526]*y_cur[IDX_H2OI]*y_cur[IDX_C2NII] + + k[2530]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + + k[2532]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] + + k[2537]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] + + k[2539]*y_cur[IDX_H2OI]*y_cur[IDX_CNCII] + + k[2540]*y_cur[IDX_H2OI]*y_cur[IDX_COII] - + k[2547]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] + + k[2675]*y_cur[IDX_H3II]*y_cur[IDX_COI] + + k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] + + k[2841]*y_cur[IDX_HI]*y_cur[IDX_CO2II] + + k[2854]*y_cur[IDX_HCNII]*y_cur[IDX_COI] - + k[2877]*y_cur[IDX_HCNI]*y_cur[IDX_HCOII] - + k[2899]*y_cur[IDX_HCOII]*y_cur[IDX_C10I] - + k[2900]*y_cur[IDX_HCOII]*y_cur[IDX_C10H2I] - + k[2901]*y_cur[IDX_HCOII]*y_cur[IDX_C10HI] - + k[2902]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5I] - + k[2903]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5OHI] - + k[2904]*y_cur[IDX_HCOII]*y_cur[IDX_C2OI] - + k[2905]*y_cur[IDX_HCOII]*y_cur[IDX_C2SI] - + k[2906]*y_cur[IDX_HCOII]*y_cur[IDX_C3I] - + k[2907]*y_cur[IDX_HCOII]*y_cur[IDX_C3H2I] - + k[2908]*y_cur[IDX_HCOII]*y_cur[IDX_C3HI] - + k[2909]*y_cur[IDX_HCOII]*y_cur[IDX_C3NI] - + k[2910]*y_cur[IDX_HCOII]*y_cur[IDX_C3OI] - + k[2911]*y_cur[IDX_HCOII]*y_cur[IDX_C3PI] - + k[2912]*y_cur[IDX_HCOII]*y_cur[IDX_C3SI] - + k[2913]*y_cur[IDX_HCOII]*y_cur[IDX_C4I] - + k[2914]*y_cur[IDX_HCOII]*y_cur[IDX_C4H3I] - + k[2915]*y_cur[IDX_HCOII]*y_cur[IDX_C4HI] - + k[2916]*y_cur[IDX_HCOII]*y_cur[IDX_C4PI] - + k[2917]*y_cur[IDX_HCOII]*y_cur[IDX_C4SI] - + k[2918]*y_cur[IDX_HCOII]*y_cur[IDX_C5I] - + k[2919]*y_cur[IDX_HCOII]*y_cur[IDX_C5H2I] - + k[2920]*y_cur[IDX_HCOII]*y_cur[IDX_C5HI] - + k[2921]*y_cur[IDX_HCOII]*y_cur[IDX_C5NI] - + k[2922]*y_cur[IDX_HCOII]*y_cur[IDX_C6I] - + k[2923]*y_cur[IDX_HCOII]*y_cur[IDX_C6H2I] - + k[2924]*y_cur[IDX_HCOII]*y_cur[IDX_C6H6I] - + k[2925]*y_cur[IDX_HCOII]*y_cur[IDX_C6HI] - + k[2926]*y_cur[IDX_HCOII]*y_cur[IDX_C7I] - + k[2927]*y_cur[IDX_HCOII]*y_cur[IDX_C7H2I] - + k[2928]*y_cur[IDX_HCOII]*y_cur[IDX_C7HI] - + k[2929]*y_cur[IDX_HCOII]*y_cur[IDX_C7NI] - + k[2930]*y_cur[IDX_HCOII]*y_cur[IDX_C8I] - + k[2931]*y_cur[IDX_HCOII]*y_cur[IDX_C8H2I] - + k[2932]*y_cur[IDX_HCOII]*y_cur[IDX_C8HI] - + k[2933]*y_cur[IDX_HCOII]*y_cur[IDX_C9I] - + k[2934]*y_cur[IDX_HCOII]*y_cur[IDX_C9H2I] - + k[2935]*y_cur[IDX_HCOII]*y_cur[IDX_C9HI] - + k[2936]*y_cur[IDX_HCOII]*y_cur[IDX_C9NI] - + k[2937]*y_cur[IDX_HCOII]*y_cur[IDX_CCPI] - + k[2938]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CCHI] - + k[2939]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CHCNI] - + k[2940]*y_cur[IDX_HCOII]*y_cur[IDX_CH2COI] - + k[2941]*y_cur[IDX_HCOII]*y_cur[IDX_CH2NHI] - + k[2942]*y_cur[IDX_HCOII]*y_cur[IDX_CH2PHI] - + k[2943]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C3NI] - + k[2944]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C4HI] - + k[2945]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C5NI] - + k[2946]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C6HI] - + k[2947]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C7NI] - + k[2948]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CCHI] - + k[2949]*y_cur[IDX_HCOII]*y_cur[IDX_C2H6I] - + k[2950]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CHOI] - + k[2951]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CNI] - + k[2952]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COCH3I] - + k[2953]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OCH3I] - + k[2954]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OHI] - + k[2955]*y_cur[IDX_HCOII]*y_cur[IDX_CPI] - + k[2956]*y_cur[IDX_HCOII]*y_cur[IDX_CSI] - + k[2957]*y_cur[IDX_HCOII]*y_cur[IDX_H2CCCI] - + k[2958]*y_cur[IDX_HCOII]*y_cur[IDX_H2COI] - + k[2959]*y_cur[IDX_HCOII]*y_cur[IDX_H2CSI] - + k[2960]*y_cur[IDX_HCOII]*y_cur[IDX_H2S2I] - + k[2961]*y_cur[IDX_HCOII]*y_cur[IDX_H2SI] - + k[2962]*y_cur[IDX_HCOII]*y_cur[IDX_H2SiOI] - + k[2963]*y_cur[IDX_HCOII]*y_cur[IDX_HC2PI] - + k[2964]*y_cur[IDX_HCOII]*y_cur[IDX_HC3NI] - + k[2965]*y_cur[IDX_HCOII]*y_cur[IDX_C4H2I] - + k[2966]*y_cur[IDX_HCOII]*y_cur[IDX_HC5NI] - + k[2967]*y_cur[IDX_HCOII]*y_cur[IDX_HC7NI] - + k[2968]*y_cur[IDX_HCOII]*y_cur[IDX_HC9NI] - + k[2969]*y_cur[IDX_HCOII]*y_cur[IDX_HCOI] - + k[2970]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOCH3I] - + k[2971]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOHI] - + k[2972]*y_cur[IDX_HCOII]*y_cur[IDX_HCPI] - + k[2973]*y_cur[IDX_HCOII]*y_cur[IDX_HCSiI] - + k[2974]*y_cur[IDX_HCOII]*y_cur[IDX_HNSiI] - + k[2975]*y_cur[IDX_HCOII]*y_cur[IDX_HPOI] - + k[2976]*y_cur[IDX_HCOII]*y_cur[IDX_HS2I] - + k[2977]*y_cur[IDX_HCOII]*y_cur[IDX_HSI] - + k[2978]*y_cur[IDX_HCOII]*y_cur[IDX_N2OI] - + k[2979]*y_cur[IDX_HCOII]*y_cur[IDX_NCCNI] - + k[2980]*y_cur[IDX_HCOII]*y_cur[IDX_NH2CNI] - + k[2981]*y_cur[IDX_HCOII]*y_cur[IDX_NSI] - + k[2982]*y_cur[IDX_HCOII]*y_cur[IDX_OCSI] - + k[2983]*y_cur[IDX_HCOII]*y_cur[IDX_PI] - + k[2984]*y_cur[IDX_HCOII]*y_cur[IDX_PH2I] - + k[2985]*y_cur[IDX_HCOII]*y_cur[IDX_PHI] - + k[2986]*y_cur[IDX_HCOII]*y_cur[IDX_PNI] - + k[2987]*y_cur[IDX_HCOII]*y_cur[IDX_POI] - + k[2988]*y_cur[IDX_HCOII]*y_cur[IDX_S2I] - + k[2989]*y_cur[IDX_HCOII]*y_cur[IDX_SI] - + k[2990]*y_cur[IDX_HCOII]*y_cur[IDX_SOI] - + k[2991]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2I] - k[2992]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2H2I] - - k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] - - k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + - k[4885]*y_cur[IDX_C2H4I]*y_cur[IDX_SiI] - k[5919]*y_cur[IDX_SiC2H2I] - - k[6261]*y_cur[IDX_SiC2H2I] + - k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - - k[7010]*y_cur[IDX_SiC2H2I] + k[7192]*y_cur[IDX_GSiC2H2I] + - k[7374]*y_cur[IDX_GSiC2H2I] + k[7556]*y_cur[IDX_GSiC2H2I]; - ydot[yistart + IDX_SiC2H2II] = 0.0 + - k[420]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] - - k[1228]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] - - k[1229]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + - k[1438]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + - k[1627]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] + - k[1646]*y_cur[IDX_C2H3I]*y_cur[IDX_SiII] + - k[1680]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] - - k[1916]*y_cur[IDX_CI]*y_cur[IDX_SiC2H2II] + - k[1923]*y_cur[IDX_CI]*y_cur[IDX_SiCH3II] + - k[2746]*y_cur[IDX_H3II]*y_cur[IDX_SiC2HI] + - k[2820]*y_cur[IDX_H3OII]*y_cur[IDX_SiC2HI] + - k[2993]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2HI] + - k[5512]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] - - k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] - - k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiC2H3II] = 0.0 - - k[1230]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] - - k[1231]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] + - k[1681]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] + - k[1718]*y_cur[IDX_C2H4I]*y_cur[IDX_SiII] - - k[1917]*y_cur[IDX_CI]*y_cur[IDX_SiC2H3II] + - k[1924]*y_cur[IDX_CI]*y_cur[IDX_SiCH4II] + - k[2745]*y_cur[IDX_H3II]*y_cur[IDX_SiC2H2I] + - k[2992]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2H2I] + - k[3865]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + - k[5563]*y_cur[IDX_H2I]*y_cur[IDX_SiC2HII] - - k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - - k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiC3I] = 0.0 - - k[197]*y_cur[IDX_CII]*y_cur[IDX_SiC3I] - - k[422]*y_cur[IDX_HII]*y_cur[IDX_SiC3I] + - k[1235]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] + - k[1236]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] + - k[1239]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] + - k[1240]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] - - k[2747]*y_cur[IDX_H3II]*y_cur[IDX_SiC3I] - + k[2993]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2HI] - k[2994]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3I] - - k[3312]*y_cur[IDX_HeII]*y_cur[IDX_SiC3I] - - k[5441]*y_cur[IDX_OI]*y_cur[IDX_SiC3I] + - k[5442]*y_cur[IDX_OI]*y_cur[IDX_SiC4I] - k[5921]*y_cur[IDX_SiC3I] + - k[5922]*y_cur[IDX_SiC3HI] - k[6263]*y_cur[IDX_SiC3I] - - k[6264]*y_cur[IDX_SiC3I] + k[6265]*y_cur[IDX_SiC3HI] + - k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + - k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + - k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + - k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - - k[7031]*y_cur[IDX_SiC3I] + k[7213]*y_cur[IDX_GSiC3I] + - k[7395]*y_cur[IDX_GSiC3I] + k[7577]*y_cur[IDX_GSiC3I]; - ydot[yistart + IDX_SiC3II] = 0.0 + - k[197]*y_cur[IDX_CII]*y_cur[IDX_SiC3I] + - k[422]*y_cur[IDX_HII]*y_cur[IDX_SiC3I] - - k[1232]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] - - k[1233]*y_cur[IDX_SiC3II]*y_cur[IDX_eM] + - k[1432]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] + - k[1915]*y_cur[IDX_CI]*y_cur[IDX_SiC2HII] + - k[2359]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] + - k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + - k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] + - k[3861]*y_cur[IDX_SiII]*y_cur[IDX_C3HI] + - k[3872]*y_cur[IDX_SiI]*y_cur[IDX_C3HII] + - k[3873]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] - - k[6746]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] - - k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiC3HI] = 0.0 - - k[423]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] + - k[1237]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] - - k[1433]*y_cur[IDX_CII]*y_cur[IDX_SiC3HI] - - k[2359]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] - - k[2748]*y_cur[IDX_H3II]*y_cur[IDX_SiC3HI] - k[2995]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3HI] - - k[3313]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] - - k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] - - k[5922]*y_cur[IDX_SiC3HI] - k[6265]*y_cur[IDX_SiC3HI] + - k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] - - k[7035]*y_cur[IDX_SiC3HI] + k[7217]*y_cur[IDX_GSiC3HI] + - k[7399]*y_cur[IDX_GSiC3HI] + k[7581]*y_cur[IDX_GSiC3HI]; - ydot[yistart + IDX_SiC3HII] = 0.0 + - k[423]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] - - k[1234]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] - - k[1235]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] + - k[1431]*y_cur[IDX_CII]*y_cur[IDX_SiC2H2I] + - k[1916]*y_cur[IDX_CI]*y_cur[IDX_SiC2H2II] - - k[1918]*y_cur[IDX_CI]*y_cur[IDX_SiC3HII] + - k[2747]*y_cur[IDX_H3II]*y_cur[IDX_SiC3I] + - k[2994]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3I] + - k[3860]*y_cur[IDX_SiII]*y_cur[IDX_C3H2I] + - k[3868]*y_cur[IDX_SiII]*y_cur[IDX_H2CCCI] + - k[3874]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] + - k[3875]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] + - k[3879]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - - k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] - - k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiC3H2II] = 0.0 - - k[1236]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] - - k[1237]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] + - k[1917]*y_cur[IDX_CI]*y_cur[IDX_SiC2H3II] - - k[1919]*y_cur[IDX_CI]*y_cur[IDX_SiC3H2II] + - k[2748]*y_cur[IDX_H3II]*y_cur[IDX_SiC3HI] + - k[2995]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3HI] + - k[3863]*y_cur[IDX_SiII]*y_cur[IDX_CH2CCHI] + - k[3876]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] + - k[3880]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] - - k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] - - k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiC4I] = 0.0 - - k[424]*y_cur[IDX_HII]*y_cur[IDX_SiC4I] + - k[1241]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] - - k[2749]*y_cur[IDX_H3II]*y_cur[IDX_SiC4I] - k[2996]*y_cur[IDX_HCOII]*y_cur[IDX_SiC4I] - - k[3315]*y_cur[IDX_HeII]*y_cur[IDX_SiC4I] - - k[5442]*y_cur[IDX_OI]*y_cur[IDX_SiC4I] - k[5923]*y_cur[IDX_SiC4I] - - k[6266]*y_cur[IDX_SiC4I] + - k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - - k[7046]*y_cur[IDX_SiC4I] + k[7228]*y_cur[IDX_GSiC4I] + - k[7410]*y_cur[IDX_GSiC4I] + k[7592]*y_cur[IDX_GSiC4I]; - ydot[yistart + IDX_SiC4II] = 0.0 + - k[424]*y_cur[IDX_HII]*y_cur[IDX_SiC4I] - - k[1238]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] - - k[1239]*y_cur[IDX_SiC4II]*y_cur[IDX_eM] + - k[1433]*y_cur[IDX_CII]*y_cur[IDX_SiC3HI] + - k[1918]*y_cur[IDX_CI]*y_cur[IDX_SiC3HII] + - k[3862]*y_cur[IDX_SiII]*y_cur[IDX_C4HI] + - k[3877]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - - k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] - - k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiC4HII] = 0.0 - - k[1240]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] - - k[1241]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] + - k[1575]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2II] + - k[1576]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2HII] + - k[1919]*y_cur[IDX_CI]*y_cur[IDX_SiC3H2II] + - k[2749]*y_cur[IDX_H3II]*y_cur[IDX_SiC4I] + - k[2996]*y_cur[IDX_HCOII]*y_cur[IDX_SiC4I] + - k[3878]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] - - k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - - k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiCH2I] = 0.0 - - k[199]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - - k[426]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] + - k[1246]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] + - k[1247]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] - - k[1435]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - - k[1436]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] - - k[2360]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] + - k[2570]*y_cur[IDX_H2OI]*y_cur[IDX_SiCH3II] - - k[2751]*y_cur[IDX_H3II]*y_cur[IDX_SiCH2I] - + k[2997]*y_cur[IDX_HCOII]*y_cur[IDX_SiCI] - k[2998]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH2I] - - k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] - - k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + - k[4989]*y_cur[IDX_CI]*y_cur[IDX_SiH3I] + - k[5049]*y_cur[IDX_CH3I]*y_cur[IDX_SiI] - k[5925]*y_cur[IDX_SiCH2I] + - k[5926]*y_cur[IDX_SiCH3I] - k[6268]*y_cur[IDX_SiCH2I] - - k[6269]*y_cur[IDX_SiCH2I] + k[6270]*y_cur[IDX_SiCH3I] + - k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + - k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - - k[6963]*y_cur[IDX_SiCH2I] + k[7145]*y_cur[IDX_GSiCH2I] + - k[7327]*y_cur[IDX_GSiCH2I] + k[7509]*y_cur[IDX_GSiCH2I]; - ydot[yistart + IDX_SiCH2II] = 0.0 + - k[199]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + - k[426]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] - - k[1242]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] - - k[1243]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] - - k[1244]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + - k[1442]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + - k[1443]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - - k[1920]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - - k[1921]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] - - k[1922]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + - k[1927]*y_cur[IDX_CI]*y_cur[IDX_SiH3II] + - k[1928]*y_cur[IDX_CI]*y_cur[IDX_SiH4II] + - k[2098]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] + - k[2100]*y_cur[IDX_CH3II]*y_cur[IDX_SiHI] + - k[2103]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + - k[2361]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] + - k[2452]*y_cur[IDX_H2I]*y_cur[IDX_HCSiII] + - k[2703]*y_cur[IDX_H3II]*y_cur[IDX_HCSiI] + - k[2809]*y_cur[IDX_H3OII]*y_cur[IDX_HCSiI] + + k[2999]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH3I] - + k[3000]*y_cur[IDX_HCOII]*y_cur[IDX_SiH2I] - + k[3001]*y_cur[IDX_HCOII]*y_cur[IDX_SiH4I] - + k[3002]*y_cur[IDX_HCOII]*y_cur[IDX_SiHI] - + k[3003]*y_cur[IDX_HCOII]*y_cur[IDX_SiNCI] - + k[3004]*y_cur[IDX_HCOII]*y_cur[IDX_SiO2I] - + k[3005]*y_cur[IDX_HCOII]*y_cur[IDX_SiOI] - + k[3006]*y_cur[IDX_HCOII]*y_cur[IDX_SiSI] - + k[3029]*y_cur[IDX_HNC3I]*y_cur[IDX_HCOII] - + k[3041]*y_cur[IDX_HNCI]*y_cur[IDX_HCOII] + + k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[3345]*y_cur[IDX_NII]*y_cur[IDX_H2COI] + + k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + + k[3485]*y_cur[IDX_NHII]*y_cur[IDX_COI] + + k[3488]*y_cur[IDX_NHII]*y_cur[IDX_H2COI] + + k[3534]*y_cur[IDX_NH2I]*y_cur[IDX_COII] - + k[3542]*y_cur[IDX_NH2I]*y_cur[IDX_HCOII] + + k[3573]*y_cur[IDX_NH3I]*y_cur[IDX_COII] - + k[3584]*y_cur[IDX_NH3I]*y_cur[IDX_HCOII] + + k[3610]*y_cur[IDX_NHI]*y_cur[IDX_COII] - + k[3614]*y_cur[IDX_NHI]*y_cur[IDX_HCOII] + + k[3641]*y_cur[IDX_OII]*y_cur[IDX_H2COI] + + k[3644]*y_cur[IDX_OII]*y_cur[IDX_HCNI] + + k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + + k[3669]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + + k[3679]*y_cur[IDX_OI]*y_cur[IDX_C10HII] + + k[3682]*y_cur[IDX_OI]*y_cur[IDX_C10H2II] + + k[3683]*y_cur[IDX_OI]*y_cur[IDX_C10H3II] + + k[3686]*y_cur[IDX_OI]*y_cur[IDX_C2HII] + + k[3689]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + + k[3692]*y_cur[IDX_OI]*y_cur[IDX_C2H4II] + + k[3695]*y_cur[IDX_OI]*y_cur[IDX_C3H2II] + + k[3696]*y_cur[IDX_OI]*y_cur[IDX_C3H3II] + + k[3697]*y_cur[IDX_OI]*y_cur[IDX_C3H4II] + + k[3699]*y_cur[IDX_OI]*y_cur[IDX_C4HII] + + k[3704]*y_cur[IDX_OI]*y_cur[IDX_C5HII] + + k[3706]*y_cur[IDX_OI]*y_cur[IDX_C5H2II] + + k[3707]*y_cur[IDX_OI]*y_cur[IDX_C5H3II] + + k[3710]*y_cur[IDX_OI]*y_cur[IDX_C6H2II] + + k[3711]*y_cur[IDX_OI]*y_cur[IDX_C6H3II] + + k[3713]*y_cur[IDX_OI]*y_cur[IDX_C7HII] + + k[3715]*y_cur[IDX_OI]*y_cur[IDX_C7H2II] + + k[3716]*y_cur[IDX_OI]*y_cur[IDX_C7H3II] + + k[3719]*y_cur[IDX_OI]*y_cur[IDX_C8H2II] + + k[3720]*y_cur[IDX_OI]*y_cur[IDX_C8H3II] + + k[3722]*y_cur[IDX_OI]*y_cur[IDX_C9HII] + + k[3724]*y_cur[IDX_OI]*y_cur[IDX_C9H2II] + + k[3725]*y_cur[IDX_OI]*y_cur[IDX_C9H3II] + + k[3726]*y_cur[IDX_OI]*y_cur[IDX_CH2CCHII] + + k[3736]*y_cur[IDX_OI]*y_cur[IDX_HCO2II] + + k[3739]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + + k[3755]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] + + k[3763]*y_cur[IDX_OI]*y_cur[IDX_SiNCHII] + + k[3777]*y_cur[IDX_OHII]*y_cur[IDX_COI] + + k[3798]*y_cur[IDX_OHI]*y_cur[IDX_COII] - + k[3801]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] - + k[3802]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + + k[3845]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] - + k[3881]*y_cur[IDX_SiI]*y_cur[IDX_HCOII] - + k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] - + k[3905]*y_cur[IDX_CM]*y_cur[IDX_HCOII] - + k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] - + k[3940]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] - + k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] - + k[3975]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] - + k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] - + k[4010]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] - + k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] - + k[4045]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] - + k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] - + k[4080]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] - + k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] - + k[4115]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] - + k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] - + k[4150]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] - + k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] - + k[4185]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] - + k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] - + k[4220]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] - + k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] - + k[4255]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] - + k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] - + k[4290]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] - + k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] - + k[4325]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] - + k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] - + k[4360]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] - + k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] - + k[4395]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] - + k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] - + k[4430]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] - + k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] - + k[4465]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] - + k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] - + k[4500]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] - + k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] - + k[4535]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] - + k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] - + k[4570]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] - + k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] - + k[4605]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] - + k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] - + k[4640]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] - + k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] - + k[4675]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] - + k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] - + k[4711]*y_cur[IDX_HM]*y_cur[IDX_HCOII] - + k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] - + k[4746]*y_cur[IDX_OM]*y_cur[IDX_HCOII] - + k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] - + k[4781]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] - + k[4815]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] - + k[4816]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] - + k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] - + k[4851]*y_cur[IDX_SM]*y_cur[IDX_HCOII] - + k[5543]*y_cur[IDX_CH4I]*y_cur[IDX_HCOII] - + k[5566]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] - + k[5630]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OI] - + k[5636]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHI] - + k[5641]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COI] - + k[5646]*y_cur[IDX_HCOII]*y_cur[IDX_COOHI] - + k[5652]*y_cur[IDX_HCOII]*y_cur[IDX_COOCH3I] - + k[5658]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCOI] - + k[5664]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCHOI] + + k[5666]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCHOI] - + k[5670]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COOHI] + + k[5857]*y_cur[IDX_HCOI] + k[6155]*y_cur[IDX_H2COI] - + k[6183]*y_cur[IDX_HCOII] + k[6185]*y_cur[IDX_HCOI] - + k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_H3II] = 0.0 - + k[1025]*y_cur[IDX_H3II]*y_cur[IDX_eM] - + k[1026]*y_cur[IDX_H3II]*y_cur[IDX_eM] + + k[2384]*y_cur[IDX_H2II]*y_cur[IDX_H2I] + + k[2389]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + + k[2458]*y_cur[IDX_H2I]*y_cur[IDX_HeHII] + + k[2461]*y_cur[IDX_H2I]*y_cur[IDX_NHII] + + k[2468]*y_cur[IDX_H2I]*y_cur[IDX_O2HII] - + k[2583]*y_cur[IDX_H3II]*y_cur[IDX_C10I] - + k[2584]*y_cur[IDX_H3II]*y_cur[IDX_C10H2I] - + k[2585]*y_cur[IDX_H3II]*y_cur[IDX_C10HI] - + k[2586]*y_cur[IDX_H3II]*y_cur[IDX_C2I] - + k[2587]*y_cur[IDX_H3II]*y_cur[IDX_C2H2I] - + k[2588]*y_cur[IDX_H3II]*y_cur[IDX_C2H3I] - + k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] - + k[2590]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] - + k[2591]*y_cur[IDX_H3II]*y_cur[IDX_C2H5I] - + k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - + k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - + k[2594]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - + k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - + k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] - + k[2597]*y_cur[IDX_H3II]*y_cur[IDX_C2HI] - + k[2598]*y_cur[IDX_H3II]*y_cur[IDX_C2NI] - + k[2599]*y_cur[IDX_H3II]*y_cur[IDX_C2OI] - + k[2600]*y_cur[IDX_H3II]*y_cur[IDX_C2SI] - + k[2601]*y_cur[IDX_H3II]*y_cur[IDX_C3I] - + k[2602]*y_cur[IDX_H3II]*y_cur[IDX_C3H2I] - + k[2603]*y_cur[IDX_H3II]*y_cur[IDX_C3HI] - + k[2604]*y_cur[IDX_H3II]*y_cur[IDX_C3NI] - + k[2605]*y_cur[IDX_H3II]*y_cur[IDX_C3OI] - + k[2606]*y_cur[IDX_H3II]*y_cur[IDX_C3PI] - + k[2607]*y_cur[IDX_H3II]*y_cur[IDX_C3SI] - + k[2608]*y_cur[IDX_H3II]*y_cur[IDX_C4I] - + k[2609]*y_cur[IDX_H3II]*y_cur[IDX_C4H3I] - + k[2610]*y_cur[IDX_H3II]*y_cur[IDX_C4HI] - + k[2611]*y_cur[IDX_H3II]*y_cur[IDX_C4PI] - + k[2612]*y_cur[IDX_H3II]*y_cur[IDX_C4SI] - + k[2613]*y_cur[IDX_H3II]*y_cur[IDX_C5I] - + k[2614]*y_cur[IDX_H3II]*y_cur[IDX_C5H2I] - + k[2615]*y_cur[IDX_H3II]*y_cur[IDX_C5HI] - + k[2616]*y_cur[IDX_H3II]*y_cur[IDX_C5NI] - + k[2617]*y_cur[IDX_H3II]*y_cur[IDX_C6I] - + k[2618]*y_cur[IDX_H3II]*y_cur[IDX_C6H2I] - + k[2619]*y_cur[IDX_H3II]*y_cur[IDX_C6H6I] - + k[2620]*y_cur[IDX_H3II]*y_cur[IDX_C6HI] - + k[2621]*y_cur[IDX_H3II]*y_cur[IDX_C7I] - + k[2622]*y_cur[IDX_H3II]*y_cur[IDX_C7H2I] - + k[2623]*y_cur[IDX_H3II]*y_cur[IDX_C7HI] - + k[2624]*y_cur[IDX_H3II]*y_cur[IDX_C7NI] - + k[2625]*y_cur[IDX_H3II]*y_cur[IDX_C8I] - + k[2626]*y_cur[IDX_H3II]*y_cur[IDX_C8H2I] - + k[2627]*y_cur[IDX_H3II]*y_cur[IDX_C8HI] - + k[2628]*y_cur[IDX_H3II]*y_cur[IDX_C9I] - + k[2629]*y_cur[IDX_H3II]*y_cur[IDX_C9H2I] - + k[2630]*y_cur[IDX_H3II]*y_cur[IDX_C9HI] - + k[2631]*y_cur[IDX_H3II]*y_cur[IDX_C9NI] - + k[2632]*y_cur[IDX_H3II]*y_cur[IDX_CI] - + k[2633]*y_cur[IDX_H3II]*y_cur[IDX_CCPI] - + k[2634]*y_cur[IDX_H3II]*y_cur[IDX_CH2I] - + k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] - + k[2636]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCHI] - + k[2637]*y_cur[IDX_H3II]*y_cur[IDX_CH2CHCNI] - + k[2638]*y_cur[IDX_H3II]*y_cur[IDX_CH2CNI] - + k[2639]*y_cur[IDX_H3II]*y_cur[IDX_CH2COI] - + k[2640]*y_cur[IDX_H3II]*y_cur[IDX_CH2PHI] - + k[2641]*y_cur[IDX_H3II]*y_cur[IDX_CH3I] - + k[2642]*y_cur[IDX_H3II]*y_cur[IDX_CH3C3NI] - + k[2643]*y_cur[IDX_H3II]*y_cur[IDX_CH3C4HI] - + k[2644]*y_cur[IDX_H3II]*y_cur[IDX_CH3C5NI] - + k[2645]*y_cur[IDX_H3II]*y_cur[IDX_CH3C6HI] - + k[2646]*y_cur[IDX_H3II]*y_cur[IDX_CH3C7NI] - + k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] - + k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] - + k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] - + k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] - + k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2652]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2653]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2654]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2656]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2657]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] - + k[2658]*y_cur[IDX_H3II]*y_cur[IDX_CH3CNI] - + k[2659]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2661]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2663]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2665]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2666]*y_cur[IDX_H3II]*y_cur[IDX_CH3OCH3I] - + k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - + k[2668]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] - + k[2669]*y_cur[IDX_H3II]*y_cur[IDX_CH4I] - + k[2670]*y_cur[IDX_H3II]*y_cur[IDX_CHI] - + k[2671]*y_cur[IDX_H3II]*y_cur[IDX_CNI] - + k[2672]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - + k[2673]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] - + k[2674]*y_cur[IDX_H3II]*y_cur[IDX_CO2I] - + k[2675]*y_cur[IDX_H3II]*y_cur[IDX_COI] - + k[2676]*y_cur[IDX_H3II]*y_cur[IDX_COI] - + k[2677]*y_cur[IDX_H3II]*y_cur[IDX_CPI] - + k[2678]*y_cur[IDX_H3II]*y_cur[IDX_CSI] - + k[2679]*y_cur[IDX_H3II]*y_cur[IDX_ClI] - + k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] - + k[2681]*y_cur[IDX_H3II]*y_cur[IDX_H2CCCI] - + k[2682]*y_cur[IDX_H3II]*y_cur[IDX_H2COI] - + k[2683]*y_cur[IDX_H3II]*y_cur[IDX_H2CSI] - + k[2684]*y_cur[IDX_H3II]*y_cur[IDX_H2OI] - + k[2685]*y_cur[IDX_H3II]*y_cur[IDX_H2S2I] - + k[2686]*y_cur[IDX_H3II]*y_cur[IDX_H2SI] - + k[2687]*y_cur[IDX_H3II]*y_cur[IDX_H2SiOI] - + k[2688]*y_cur[IDX_H3II]*y_cur[IDX_HC2PI] - + k[2689]*y_cur[IDX_H3II]*y_cur[IDX_HC3NI] - + k[2690]*y_cur[IDX_H3II]*y_cur[IDX_C4H2I] - + k[2691]*y_cur[IDX_H3II]*y_cur[IDX_HC5NI] - + k[2692]*y_cur[IDX_H3II]*y_cur[IDX_HC7NI] - + k[2693]*y_cur[IDX_H3II]*y_cur[IDX_HC9NI] - + k[2694]*y_cur[IDX_H3II]*y_cur[IDX_HCNI] - + k[2695]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] - + k[2696]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] - + k[2697]*y_cur[IDX_H3II]*y_cur[IDX_HCOI] - + k[2698]*y_cur[IDX_H3II]*y_cur[IDX_HCOOCH3I] - + k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - + k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - + k[2701]*y_cur[IDX_H3II]*y_cur[IDX_HCPI] - + k[2702]*y_cur[IDX_H3II]*y_cur[IDX_HCSI] - + k[2703]*y_cur[IDX_H3II]*y_cur[IDX_HCSiI] - + k[2704]*y_cur[IDX_H3II]*y_cur[IDX_HClI] - + k[2705]*y_cur[IDX_H3II]*y_cur[IDX_HFI] - + k[2706]*y_cur[IDX_H3II]*y_cur[IDX_HNCI] - + k[2707]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] - + k[2708]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] - + k[2709]*y_cur[IDX_H3II]*y_cur[IDX_HNOI] - + k[2710]*y_cur[IDX_H3II]*y_cur[IDX_HNSiI] - + k[2711]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] - + k[2712]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] - + k[2713]*y_cur[IDX_H3II]*y_cur[IDX_HONCI] - + k[2714]*y_cur[IDX_H3II]*y_cur[IDX_HPOI] - + k[2715]*y_cur[IDX_H3II]*y_cur[IDX_HS2I] - + k[2716]*y_cur[IDX_H3II]*y_cur[IDX_HSI] - + k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] - + k[2718]*y_cur[IDX_H3II]*y_cur[IDX_N2I] - + k[2719]*y_cur[IDX_H3II]*y_cur[IDX_N2OI] - + k[2720]*y_cur[IDX_H3II]*y_cur[IDX_NCCNI] - + k[2721]*y_cur[IDX_H3II]*y_cur[IDX_NH2I] - + k[2722]*y_cur[IDX_H3II]*y_cur[IDX_NH2CNI] - + k[2723]*y_cur[IDX_H3II]*y_cur[IDX_NH3I] - + k[2724]*y_cur[IDX_H3II]*y_cur[IDX_NHI] - + k[2725]*y_cur[IDX_H3II]*y_cur[IDX_NO2I] - + k[2726]*y_cur[IDX_H3II]*y_cur[IDX_NOI] - + k[2727]*y_cur[IDX_H3II]*y_cur[IDX_NSI] - + k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] - + k[2729]*y_cur[IDX_H3II]*y_cur[IDX_O2I] - + k[2730]*y_cur[IDX_H3II]*y_cur[IDX_OI] - + k[2731]*y_cur[IDX_H3II]*y_cur[IDX_OI] - + k[2732]*y_cur[IDX_H3II]*y_cur[IDX_OCSI] - + k[2733]*y_cur[IDX_H3II]*y_cur[IDX_OHI] - + k[2734]*y_cur[IDX_H3II]*y_cur[IDX_PI] - + k[2735]*y_cur[IDX_H3II]*y_cur[IDX_PH2I] - + k[2736]*y_cur[IDX_H3II]*y_cur[IDX_PHI] - + k[2737]*y_cur[IDX_H3II]*y_cur[IDX_PNI] - + k[2738]*y_cur[IDX_H3II]*y_cur[IDX_POI] - + k[2739]*y_cur[IDX_H3II]*y_cur[IDX_S2I] - + k[2740]*y_cur[IDX_H3II]*y_cur[IDX_SI] - + k[2741]*y_cur[IDX_H3II]*y_cur[IDX_SO2I] - + k[2742]*y_cur[IDX_H3II]*y_cur[IDX_SOI] - + k[2743]*y_cur[IDX_H3II]*y_cur[IDX_SiI] - + k[2744]*y_cur[IDX_H3II]*y_cur[IDX_SiC2I] - + k[2745]*y_cur[IDX_H3II]*y_cur[IDX_SiC2H2I] - + k[2746]*y_cur[IDX_H3II]*y_cur[IDX_SiC2HI] - + k[2747]*y_cur[IDX_H3II]*y_cur[IDX_SiC3I] - + k[2748]*y_cur[IDX_H3II]*y_cur[IDX_SiC3HI] - + k[2749]*y_cur[IDX_H3II]*y_cur[IDX_SiC4I] - + k[2750]*y_cur[IDX_H3II]*y_cur[IDX_SiCI] - + k[2751]*y_cur[IDX_H3II]*y_cur[IDX_SiCH2I] - + k[2752]*y_cur[IDX_H3II]*y_cur[IDX_SiCH3I] - + k[2753]*y_cur[IDX_H3II]*y_cur[IDX_SiH2I] - + k[2754]*y_cur[IDX_H3II]*y_cur[IDX_SiH3I] - + k[2755]*y_cur[IDX_H3II]*y_cur[IDX_SiH4I] - + k[2756]*y_cur[IDX_H3II]*y_cur[IDX_SiHI] - + k[2757]*y_cur[IDX_H3II]*y_cur[IDX_SiNI] - + k[2758]*y_cur[IDX_H3II]*y_cur[IDX_SiNCI] - + k[2759]*y_cur[IDX_H3II]*y_cur[IDX_SiO2I] - + k[2760]*y_cur[IDX_H3II]*y_cur[IDX_SiOI] - + k[2761]*y_cur[IDX_H3II]*y_cur[IDX_SiSI] - + k[3027]*y_cur[IDX_HNC3I]*y_cur[IDX_H3II] - + k[3767]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - + k[3768]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] - + k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] - + k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] - + k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] - + k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] - + k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] - + k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] - + k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] - + k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] - + k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] - + k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] - + k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] - + k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] - + k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] - + k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] - + k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] - + k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] - + k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] - + k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] - + k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] - + k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] - + k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] - + k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] - + k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] - + k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] - + k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] - + k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] - + k[4810]*y_cur[IDX_OHM]*y_cur[IDX_H3II] - + k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] - + k[5628]*y_cur[IDX_H3II]*y_cur[IDX_CH3OI] - + k[5634]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHI] - + k[5640]*y_cur[IDX_H3II]*y_cur[IDX_CH3COI] - + k[5645]*y_cur[IDX_H3II]*y_cur[IDX_COOHI] - + k[5650]*y_cur[IDX_H3II]*y_cur[IDX_COOCH3I] - + k[5656]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCOI] - + k[5662]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCHOI] - + k[5668]*y_cur[IDX_H3II]*y_cur[IDX_CH3COOHI] - + k[6168]*y_cur[IDX_H3II] - k[6169]*y_cur[IDX_H3II] - + k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] - + k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM]; + ydot[yistart + IDX_COI] = 0.0 + k[3]*y_cur[IDX_CM]*y_cur[IDX_CO2I] + + k[3]*y_cur[IDX_CM]*y_cur[IDX_CO2I] + + k[8]*y_cur[IDX_CM]*y_cur[IDX_OI] + k[56]*y_cur[IDX_CI]*y_cur[IDX_OM] + - k[65]*y_cur[IDX_COI]*y_cur[IDX_SM] - + k[73]*y_cur[IDX_HM]*y_cur[IDX_COI] - + k[124]*y_cur[IDX_OM]*y_cur[IDX_COI] + + k[130]*y_cur[IDX_OI]*y_cur[IDX_C3NM] + + k[131]*y_cur[IDX_OI]*y_cur[IDX_C5NM] + + k[209]*y_cur[IDX_C2I]*y_cur[IDX_COII] + + k[242]*y_cur[IDX_C2HI]*y_cur[IDX_COII] + + k[246]*y_cur[IDX_CI]*y_cur[IDX_COII] + + k[261]*y_cur[IDX_CH2I]*y_cur[IDX_COII] + + k[285]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + + k[289]*y_cur[IDX_CHI]*y_cur[IDX_COII] - + k[299]*y_cur[IDX_CNII]*y_cur[IDX_COI] + + k[307]*y_cur[IDX_COII]*y_cur[IDX_CO2I] + + k[308]*y_cur[IDX_COII]*y_cur[IDX_H2COI] + + k[309]*y_cur[IDX_COII]*y_cur[IDX_H2SI] + + k[310]*y_cur[IDX_COII]*y_cur[IDX_HCOI] + + k[311]*y_cur[IDX_COII]*y_cur[IDX_NOI] + + k[312]*y_cur[IDX_COII]*y_cur[IDX_O2I] + + k[313]*y_cur[IDX_COII]*y_cur[IDX_SI] - + k[316]*y_cur[IDX_COI]*y_cur[IDX_N2II] - + k[445]*y_cur[IDX_H2II]*y_cur[IDX_COI] + + k[478]*y_cur[IDX_H2OI]*y_cur[IDX_COII] + + k[488]*y_cur[IDX_HI]*y_cur[IDX_COII] + + k[497]*y_cur[IDX_HCNI]*y_cur[IDX_COII] - + k[549]*y_cur[IDX_NII]*y_cur[IDX_COI] + + k[587]*y_cur[IDX_NH2I]*y_cur[IDX_COII] + + k[602]*y_cur[IDX_NH3I]*y_cur[IDX_COII] + + k[617]*y_cur[IDX_NHI]*y_cur[IDX_COII] - + k[653]*y_cur[IDX_OII]*y_cur[IDX_COI] + + k[682]*y_cur[IDX_OI]*y_cur[IDX_COII] + + k[699]*y_cur[IDX_OHI]*y_cur[IDX_COII] + + k[785]*y_cur[IDX_C2OII]*y_cur[IDX_eM] + + k[797]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + + k[815]*y_cur[IDX_C3OII]*y_cur[IDX_eM] + + k[920]*y_cur[IDX_CH2COII]*y_cur[IDX_eM] + + k[942]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[949]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + + k[951]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_eM] + + k[981]*y_cur[IDX_CO2II]*y_cur[IDX_eM] + + k[982]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + + k[997]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[998]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[1009]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + + k[1036]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1057]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + + k[1058]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + + k[1097]*y_cur[IDX_HCOII]*y_cur[IDX_eM] + + k[1099]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + + k[1100]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + + k[1116]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + + k[1125]*y_cur[IDX_HOCII]*y_cur[IDX_eM] + + k[1176]*y_cur[IDX_OCNII]*y_cur[IDX_eM] + + k[1179]*y_cur[IDX_OCSII]*y_cur[IDX_eM] + + k[1270]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + + k[1271]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + + k[1272]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + + k[1273]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + + k[1274]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + + k[1276]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1284]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1290]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1291]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1313]*y_cur[IDX_CII]*y_cur[IDX_C3OI] + + k[1387]*y_cur[IDX_CII]*y_cur[IDX_CO2I] + + k[1390]*y_cur[IDX_CII]*y_cur[IDX_H2COI] + + k[1408]*y_cur[IDX_CII]*y_cur[IDX_HCOI] + + k[1423]*y_cur[IDX_CII]*y_cur[IDX_O2I] + + k[1425]*y_cur[IDX_CII]*y_cur[IDX_OCSI] + + k[1427]*y_cur[IDX_CII]*y_cur[IDX_SO2I] + + k[1429]*y_cur[IDX_CII]*y_cur[IDX_SOI] + + k[1447]*y_cur[IDX_CII]*y_cur[IDX_SiOI] + + k[1450]*y_cur[IDX_CM]*y_cur[IDX_O2I] + + k[1454]*y_cur[IDX_C2II]*y_cur[IDX_HCOI] + + k[1455]*y_cur[IDX_C2II]*y_cur[IDX_O2I] + + k[1459]*y_cur[IDX_C2I]*y_cur[IDX_HCOII] + + k[1462]*y_cur[IDX_C2I]*y_cur[IDX_O2II] + + k[1465]*y_cur[IDX_C2I]*y_cur[IDX_SiOII] + + k[1468]*y_cur[IDX_C2HII]*y_cur[IDX_CO2I] + + k[1477]*y_cur[IDX_C2HII]*y_cur[IDX_HCOI] + + k[1524]*y_cur[IDX_C2H2II]*y_cur[IDX_HCOI] + + k[1566]*y_cur[IDX_C2H2I]*y_cur[IDX_HCOII] + + k[1644]*y_cur[IDX_C2H3I]*y_cur[IDX_HCOII] + + k[1708]*y_cur[IDX_C2H4I]*y_cur[IDX_HCOII] + + k[1746]*y_cur[IDX_C2HI]*y_cur[IDX_HCOII] + + k[1753]*y_cur[IDX_C3HII]*y_cur[IDX_CO2I] + + k[1758]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + + k[1904]*y_cur[IDX_CI]*y_cur[IDX_HCOII] + + k[1932]*y_cur[IDX_CI]*y_cur[IDX_SiOII] + + k[1946]*y_cur[IDX_CHII]*y_cur[IDX_CO2I] + + k[1948]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + + k[1959]*y_cur[IDX_CHII]*y_cur[IDX_HCOI] + + k[1970]*y_cur[IDX_CHII]*y_cur[IDX_OCSI] + + k[1978]*y_cur[IDX_CH2II]*y_cur[IDX_CO2I] + + k[1987]*y_cur[IDX_CH2II]*y_cur[IDX_HCOI] + + k[1992]*y_cur[IDX_CH2II]*y_cur[IDX_OCSI] + + k[2008]*y_cur[IDX_CH2I]*y_cur[IDX_HCOII] + + k[2082]*y_cur[IDX_CH3II]*y_cur[IDX_HCOI] + + k[2092]*y_cur[IDX_CH3II]*y_cur[IDX_OCSI] - + k[2140]*y_cur[IDX_CH4II]*y_cur[IDX_COI] - + k[2224]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + + k[2253]*y_cur[IDX_CHI]*y_cur[IDX_HCOII] + + k[2270]*y_cur[IDX_CNII]*y_cur[IDX_CO2I] + + k[2273]*y_cur[IDX_CNII]*y_cur[IDX_HCOI] + + k[2275]*y_cur[IDX_CNII]*y_cur[IDX_O2I] - + k[2283]*y_cur[IDX_COI]*y_cur[IDX_CH3CNII] - + k[2284]*y_cur[IDX_COI]*y_cur[IDX_H2ClII] - + k[2285]*y_cur[IDX_COI]*y_cur[IDX_HCO2II] - + k[2286]*y_cur[IDX_COI]*y_cur[IDX_HNOII] - + k[2287]*y_cur[IDX_COI]*y_cur[IDX_HNSiII] - + k[2288]*y_cur[IDX_COI]*y_cur[IDX_N2HII] - + k[2289]*y_cur[IDX_COI]*y_cur[IDX_O2HII] - + k[2290]*y_cur[IDX_COI]*y_cur[IDX_SO2II] - + k[2291]*y_cur[IDX_COI]*y_cur[IDX_SiH4II] - + k[2292]*y_cur[IDX_COI]*y_cur[IDX_SiOII] + + k[2345]*y_cur[IDX_HII]*y_cur[IDX_HCOI] + + k[2348]*y_cur[IDX_HII]*y_cur[IDX_HNCOI] + + k[2356]*y_cur[IDX_HII]*y_cur[IDX_OCSI] - + k[2383]*y_cur[IDX_H2II]*y_cur[IDX_COI] + + k[2389]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + + k[2492]*y_cur[IDX_H2COI]*y_cur[IDX_CClII] + + k[2500]*y_cur[IDX_H2COI]*y_cur[IDX_SII] - + k[2507]*y_cur[IDX_H2OII]*y_cur[IDX_COI] + + k[2513]*y_cur[IDX_H2OII]*y_cur[IDX_HCOI] + + k[2528]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + + k[2533]*y_cur[IDX_H2OI]*y_cur[IDX_C4NII] + + k[2547]*y_cur[IDX_H2OI]*y_cur[IDX_HCOII] + + k[2664]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] - + k[2675]*y_cur[IDX_H3II]*y_cur[IDX_COI] - + k[2676]*y_cur[IDX_H3II]*y_cur[IDX_COI] + + k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] - + k[2854]*y_cur[IDX_HCNII]*y_cur[IDX_COI] + + k[2858]*y_cur[IDX_HCNII]*y_cur[IDX_HCOI] + + k[2877]*y_cur[IDX_HCNI]*y_cur[IDX_HCOII] + + k[2899]*y_cur[IDX_HCOII]*y_cur[IDX_C10I] + + k[2900]*y_cur[IDX_HCOII]*y_cur[IDX_C10H2I] + + k[2901]*y_cur[IDX_HCOII]*y_cur[IDX_C10HI] + + k[2902]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5I] + + k[2903]*y_cur[IDX_HCOII]*y_cur[IDX_C2H5OHI] + + k[2904]*y_cur[IDX_HCOII]*y_cur[IDX_C2OI] + + k[2905]*y_cur[IDX_HCOII]*y_cur[IDX_C2SI] + + k[2906]*y_cur[IDX_HCOII]*y_cur[IDX_C3I] + + k[2907]*y_cur[IDX_HCOII]*y_cur[IDX_C3H2I] + + k[2908]*y_cur[IDX_HCOII]*y_cur[IDX_C3HI] + + k[2909]*y_cur[IDX_HCOII]*y_cur[IDX_C3NI] + + k[2910]*y_cur[IDX_HCOII]*y_cur[IDX_C3OI] + + k[2911]*y_cur[IDX_HCOII]*y_cur[IDX_C3PI] + + k[2912]*y_cur[IDX_HCOII]*y_cur[IDX_C3SI] + + k[2913]*y_cur[IDX_HCOII]*y_cur[IDX_C4I] + + k[2914]*y_cur[IDX_HCOII]*y_cur[IDX_C4H3I] + + k[2915]*y_cur[IDX_HCOII]*y_cur[IDX_C4HI] + + k[2916]*y_cur[IDX_HCOII]*y_cur[IDX_C4PI] + + k[2917]*y_cur[IDX_HCOII]*y_cur[IDX_C4SI] + + k[2918]*y_cur[IDX_HCOII]*y_cur[IDX_C5I] + + k[2919]*y_cur[IDX_HCOII]*y_cur[IDX_C5H2I] + + k[2920]*y_cur[IDX_HCOII]*y_cur[IDX_C5HI] + + k[2921]*y_cur[IDX_HCOII]*y_cur[IDX_C5NI] + + k[2922]*y_cur[IDX_HCOII]*y_cur[IDX_C6I] + + k[2923]*y_cur[IDX_HCOII]*y_cur[IDX_C6H2I] + + k[2924]*y_cur[IDX_HCOII]*y_cur[IDX_C6H6I] + + k[2925]*y_cur[IDX_HCOII]*y_cur[IDX_C6HI] + + k[2926]*y_cur[IDX_HCOII]*y_cur[IDX_C7I] + + k[2927]*y_cur[IDX_HCOII]*y_cur[IDX_C7H2I] + + k[2928]*y_cur[IDX_HCOII]*y_cur[IDX_C7HI] + + k[2929]*y_cur[IDX_HCOII]*y_cur[IDX_C7NI] + + k[2930]*y_cur[IDX_HCOII]*y_cur[IDX_C8I] + + k[2931]*y_cur[IDX_HCOII]*y_cur[IDX_C8H2I] + + k[2932]*y_cur[IDX_HCOII]*y_cur[IDX_C8HI] + + k[2933]*y_cur[IDX_HCOII]*y_cur[IDX_C9I] + + k[2934]*y_cur[IDX_HCOII]*y_cur[IDX_C9H2I] + + k[2935]*y_cur[IDX_HCOII]*y_cur[IDX_C9HI] + + k[2936]*y_cur[IDX_HCOII]*y_cur[IDX_C9NI] + + k[2937]*y_cur[IDX_HCOII]*y_cur[IDX_CCPI] + + k[2938]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CCHI] + + k[2939]*y_cur[IDX_HCOII]*y_cur[IDX_CH2CHCNI] + + k[2940]*y_cur[IDX_HCOII]*y_cur[IDX_CH2COI] + + k[2941]*y_cur[IDX_HCOII]*y_cur[IDX_CH2NHI] + + k[2942]*y_cur[IDX_HCOII]*y_cur[IDX_CH2PHI] + + k[2943]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C3NI] + + k[2944]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C4HI] + + k[2945]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C5NI] + + k[2946]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C6HI] + + k[2947]*y_cur[IDX_HCOII]*y_cur[IDX_CH3C7NI] + + k[2948]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CCHI] + + k[2949]*y_cur[IDX_HCOII]*y_cur[IDX_C2H6I] + + k[2950]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CHOI] + + k[2951]*y_cur[IDX_HCOII]*y_cur[IDX_CH3CNI] + + k[2952]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COCH3I] + + k[2953]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OCH3I] + + k[2954]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OHI] + + k[2955]*y_cur[IDX_HCOII]*y_cur[IDX_CPI] + + k[2956]*y_cur[IDX_HCOII]*y_cur[IDX_CSI] + + k[2957]*y_cur[IDX_HCOII]*y_cur[IDX_H2CCCI] + + k[2958]*y_cur[IDX_HCOII]*y_cur[IDX_H2COI] + + k[2959]*y_cur[IDX_HCOII]*y_cur[IDX_H2CSI] + + k[2960]*y_cur[IDX_HCOII]*y_cur[IDX_H2S2I] + + k[2961]*y_cur[IDX_HCOII]*y_cur[IDX_H2SI] + + k[2962]*y_cur[IDX_HCOII]*y_cur[IDX_H2SiOI] + + k[2963]*y_cur[IDX_HCOII]*y_cur[IDX_HC2PI] + + k[2964]*y_cur[IDX_HCOII]*y_cur[IDX_HC3NI] + + k[2965]*y_cur[IDX_HCOII]*y_cur[IDX_C4H2I] + + k[2966]*y_cur[IDX_HCOII]*y_cur[IDX_HC5NI] + + k[2967]*y_cur[IDX_HCOII]*y_cur[IDX_HC7NI] + + k[2968]*y_cur[IDX_HCOII]*y_cur[IDX_HC9NI] + + k[2969]*y_cur[IDX_HCOII]*y_cur[IDX_HCOI] + + k[2970]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOCH3I] + + k[2971]*y_cur[IDX_HCOII]*y_cur[IDX_HCOOHI] + + k[2972]*y_cur[IDX_HCOII]*y_cur[IDX_HCPI] + k[2973]*y_cur[IDX_HCOII]*y_cur[IDX_HCSiI] + - k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - - k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] - - k[3754]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - - k[3755]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - - k[3841]*y_cur[IDX_SI]*y_cur[IDX_SiCH2II] + - k[3866]*y_cur[IDX_SiII]*y_cur[IDX_CH3CCHI] + - k[6269]*y_cur[IDX_SiCH2I] - - k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - - k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - - k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiCH3I] = 0.0 - - k[200]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - - k[427]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] + - k[1248]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] - - k[1437]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - - k[1438]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] - - k[2361]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] - - k[2752]*y_cur[IDX_H3II]*y_cur[IDX_SiCH3I] - - k[2822]*y_cur[IDX_H3OII]*y_cur[IDX_SiCH3I] - - k[2999]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH3I] - - k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - - k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] - - k[5926]*y_cur[IDX_SiCH3I] - k[6270]*y_cur[IDX_SiCH3I] + - k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - - k[6970]*y_cur[IDX_SiCH3I] + k[7152]*y_cur[IDX_GSiCH3I] + - k[7334]*y_cur[IDX_GSiCH3I] + k[7516]*y_cur[IDX_GSiCH3I]; - ydot[yistart + IDX_SiCH3II] = 0.0 + - k[200]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + - k[427]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] - - k[1245]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] - - k[1246]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] + - k[1444]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - - k[1923]*y_cur[IDX_CI]*y_cur[IDX_SiCH3II] + - k[2236]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] - - k[2570]*y_cur[IDX_H2OI]*y_cur[IDX_SiCH3II] + - k[2751]*y_cur[IDX_H3II]*y_cur[IDX_SiCH2I] + - k[2998]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH2I] - - k[6516]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] - - k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiCH4II] = 0.0 - - k[1247]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] - - k[1248]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] - - k[1924]*y_cur[IDX_CI]*y_cur[IDX_SiCH4II] + - k[1929]*y_cur[IDX_CI]*y_cur[IDX_SiH5II] + - k[2237]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] + - k[2752]*y_cur[IDX_H3II]*y_cur[IDX_SiCH3I] + - k[2822]*y_cur[IDX_H3OII]*y_cur[IDX_SiCH3I] + + k[2974]*y_cur[IDX_HCOII]*y_cur[IDX_HNSiI] + + k[2975]*y_cur[IDX_HCOII]*y_cur[IDX_HPOI] + + k[2976]*y_cur[IDX_HCOII]*y_cur[IDX_HS2I] + + k[2977]*y_cur[IDX_HCOII]*y_cur[IDX_HSI] + + k[2978]*y_cur[IDX_HCOII]*y_cur[IDX_N2OI] + + k[2979]*y_cur[IDX_HCOII]*y_cur[IDX_NCCNI] + + k[2980]*y_cur[IDX_HCOII]*y_cur[IDX_NH2CNI] + + k[2981]*y_cur[IDX_HCOII]*y_cur[IDX_NSI] + + k[2982]*y_cur[IDX_HCOII]*y_cur[IDX_OCSI] + + k[2983]*y_cur[IDX_HCOII]*y_cur[IDX_PI] + + k[2984]*y_cur[IDX_HCOII]*y_cur[IDX_PH2I] + + k[2985]*y_cur[IDX_HCOII]*y_cur[IDX_PHI] + + k[2986]*y_cur[IDX_HCOII]*y_cur[IDX_PNI] + + k[2987]*y_cur[IDX_HCOII]*y_cur[IDX_POI] + + k[2988]*y_cur[IDX_HCOII]*y_cur[IDX_S2I] + + k[2989]*y_cur[IDX_HCOII]*y_cur[IDX_SI] + + k[2990]*y_cur[IDX_HCOII]*y_cur[IDX_SOI] + + k[2991]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2I] + + k[2992]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2H2I] + + k[2993]*y_cur[IDX_HCOII]*y_cur[IDX_SiC2HI] + + k[2994]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3I] + + k[2995]*y_cur[IDX_HCOII]*y_cur[IDX_SiC3HI] + + k[2996]*y_cur[IDX_HCOII]*y_cur[IDX_SiC4I] + + k[2997]*y_cur[IDX_HCOII]*y_cur[IDX_SiCI] + + k[2998]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH2I] + k[2999]*y_cur[IDX_HCOII]*y_cur[IDX_SiCH3I] + - k[5544]*y_cur[IDX_CH4I]*y_cur[IDX_SiII] - - k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - - k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiFII] = 0.0 - - k[1249]*y_cur[IDX_SiFII]*y_cur[IDX_eM] + - k[3015]*y_cur[IDX_HFI]*y_cur[IDX_SiII] - - k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiHI] = 0.0 - - k[431]*y_cur[IDX_HII]*y_cur[IDX_SiHI] - - k[725]*y_cur[IDX_SiHI]*y_cur[IDX_SII] + - k[1023]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] + - k[1253]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + - k[1255]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] - - k[1445]*y_cur[IDX_CII]*y_cur[IDX_SiHI] - - k[2100]*y_cur[IDX_CH3II]*y_cur[IDX_SiHI] - - k[2365]*y_cur[IDX_HII]*y_cur[IDX_SiHI] - - k[2756]*y_cur[IDX_H3II]*y_cur[IDX_SiHI] - - k[2824]*y_cur[IDX_H3OII]*y_cur[IDX_SiHI] - - k[3002]*y_cur[IDX_HCOII]*y_cur[IDX_SiHI] - - k[3328]*y_cur[IDX_HeII]*y_cur[IDX_SiHI] + - k[3755]*y_cur[IDX_OI]*y_cur[IDX_SiCH2II] - - k[3793]*y_cur[IDX_OHII]*y_cur[IDX_SiHI] + - k[3869]*y_cur[IDX_SiII]*y_cur[IDX_C4H2I] - - k[3885]*y_cur[IDX_SiHI]*y_cur[IDX_SII] - - k[4990]*y_cur[IDX_CI]*y_cur[IDX_SiHI] - - k[5296]*y_cur[IDX_NI]*y_cur[IDX_SiHI] - - k[5449]*y_cur[IDX_OI]*y_cur[IDX_SiHI] + k[5927]*y_cur[IDX_SiH2I] - - k[5930]*y_cur[IDX_SiHI] + k[6273]*y_cur[IDX_SiH2I] + - k[6276]*y_cur[IDX_SiH3I] + k[6279]*y_cur[IDX_SiH4I] - - k[6280]*y_cur[IDX_SiHI] + - k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + - k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + - k[6585]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] - - k[6920]*y_cur[IDX_SiHI] + k[7102]*y_cur[IDX_GSiHI] + - k[7284]*y_cur[IDX_GSiHI] + k[7466]*y_cur[IDX_GSiHI] + - k[8600]*y_cur[IDX_GHI]*y_cur[IDX_GSiI]; - ydot[yistart + IDX_SiHII] = 0.0 + - k[431]*y_cur[IDX_HII]*y_cur[IDX_SiHI] + - k[725]*y_cur[IDX_SiHI]*y_cur[IDX_SII] - - k[1250]*y_cur[IDX_SiHII]*y_cur[IDX_eM] + - k[1532]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1925]*y_cur[IDX_CI]*y_cur[IDX_SiHII] - - k[2267]*y_cur[IDX_CHI]*y_cur[IDX_SiHII] + - k[2362]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - - k[2571]*y_cur[IDX_H2OI]*y_cur[IDX_SiHII] + - k[2743]*y_cur[IDX_H3II]*y_cur[IDX_SiI] + - k[2818]*y_cur[IDX_H3OII]*y_cur[IDX_SiI] - - k[2848]*y_cur[IDX_HI]*y_cur[IDX_SiHII] + - k[3309]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + - k[3319]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + - k[3321]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + - k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + - k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + - k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - - k[3471]*y_cur[IDX_NI]*y_cur[IDX_SiHII] - - k[3603]*y_cur[IDX_NH3I]*y_cur[IDX_SiHII] - - k[3756]*y_cur[IDX_OI]*y_cur[IDX_SiHII] + - k[3791]*y_cur[IDX_OHII]*y_cur[IDX_SiI] + - k[3881]*y_cur[IDX_SiI]*y_cur[IDX_HCOII] - - k[5564]*y_cur[IDX_H2I]*y_cur[IDX_SiHII] + - k[5575]*y_cur[IDX_HI]*y_cur[IDX_SiII] - k[6271]*y_cur[IDX_SiHII] - - k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiH2I] = 0.0 - - k[201]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - - k[428]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] + - k[1254]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] + - k[1256]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] - - k[1439]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - - k[1440]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] - - k[2362]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - - k[2753]*y_cur[IDX_H3II]*y_cur[IDX_SiH2I] - - k[2823]*y_cur[IDX_H3OII]*y_cur[IDX_SiH2I] - - k[3000]*y_cur[IDX_HCOII]*y_cur[IDX_SiH2I] - - k[3322]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] - - k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] - - k[4988]*y_cur[IDX_CI]*y_cur[IDX_SiH2I] - - k[5294]*y_cur[IDX_NI]*y_cur[IDX_SiH2I] - - k[5445]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - - k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - k[5927]*y_cur[IDX_SiH2I] + - k[5928]*y_cur[IDX_SiH3I] + k[5929]*y_cur[IDX_SiH4I] - - k[6272]*y_cur[IDX_SiH2I] - k[6273]*y_cur[IDX_SiH2I] + - k[6274]*y_cur[IDX_SiH3I] + k[6277]*y_cur[IDX_SiH4I] + - k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + - k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] - - k[6924]*y_cur[IDX_SiH2I] + k[7106]*y_cur[IDX_GSiH2I] + - k[7288]*y_cur[IDX_GSiH2I] + k[7470]*y_cur[IDX_GSiH2I] + - k[8601]*y_cur[IDX_GHI]*y_cur[IDX_GSiHI]; - ydot[yistart + IDX_SiH2II] = 0.0 + - k[201]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + - k[428]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] - - k[1251]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] - - k[1252]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] - - k[1253]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + - k[1533]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + - k[1682]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[1926]*y_cur[IDX_CI]*y_cur[IDX_SiH2II] + - k[2363]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + - k[2756]*y_cur[IDX_H3II]*y_cur[IDX_SiHI] + - k[2824]*y_cur[IDX_H3OII]*y_cur[IDX_SiHI] + + k[3000]*y_cur[IDX_HCOII]*y_cur[IDX_SiH2I] + + k[3001]*y_cur[IDX_HCOII]*y_cur[IDX_SiH4I] + k[3002]*y_cur[IDX_HCOII]*y_cur[IDX_SiHI] + - k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - - k[3472]*y_cur[IDX_NI]*y_cur[IDX_SiH2II] - - k[3757]*y_cur[IDX_OI]*y_cur[IDX_SiH2II] + - k[3793]*y_cur[IDX_OHII]*y_cur[IDX_SiHI] - - k[3882]*y_cur[IDX_SiH2II]*y_cur[IDX_O2I] - - k[3883]*y_cur[IDX_SiH2II]*y_cur[IDX_SI] + - k[5562]*y_cur[IDX_H2I]*y_cur[IDX_SiII] + k[6272]*y_cur[IDX_SiH2I] - + k[3003]*y_cur[IDX_HCOII]*y_cur[IDX_SiNCI] + + k[3004]*y_cur[IDX_HCOII]*y_cur[IDX_SiO2I] + + k[3005]*y_cur[IDX_HCOII]*y_cur[IDX_SiOI] + + k[3006]*y_cur[IDX_HCOII]*y_cur[IDX_SiSI] + + k[3007]*y_cur[IDX_HCOI]*y_cur[IDX_H2COII] + + k[3010]*y_cur[IDX_HCOI]*y_cur[IDX_O2II] + + k[3012]*y_cur[IDX_HCOI]*y_cur[IDX_SII] + + k[3029]*y_cur[IDX_HNC3I]*y_cur[IDX_HCOII] + + k[3041]*y_cur[IDX_HNCI]*y_cur[IDX_HCOII] + + k[3090]*y_cur[IDX_HeII]*y_cur[IDX_C2OI] + + k[3100]*y_cur[IDX_HeII]*y_cur[IDX_C3OI] + + k[3172]*y_cur[IDX_HeII]*y_cur[IDX_CH2COI] + + k[3208]*y_cur[IDX_HeII]*y_cur[IDX_CO2I] - + k[3211]*y_cur[IDX_HeII]*y_cur[IDX_COI] + + k[3250]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + + k[3295]*y_cur[IDX_HeII]*y_cur[IDX_OCSI] - + k[3344]*y_cur[IDX_NII]*y_cur[IDX_COI] + + k[3350]*y_cur[IDX_NII]*y_cur[IDX_HCOI] + + k[3360]*y_cur[IDX_NII]*y_cur[IDX_OCSI] + + k[3364]*y_cur[IDX_N2II]*y_cur[IDX_HCOI] + + k[3365]*y_cur[IDX_N2II]*y_cur[IDX_OCSI] + + k[3483]*y_cur[IDX_NHII]*y_cur[IDX_CO2I] - + k[3485]*y_cur[IDX_NHII]*y_cur[IDX_COI] - + k[3486]*y_cur[IDX_NHII]*y_cur[IDX_COI] + + k[3542]*y_cur[IDX_NH2I]*y_cur[IDX_HCOII] + + k[3552]*y_cur[IDX_NH3II]*y_cur[IDX_HCOI] + + k[3584]*y_cur[IDX_NH3I]*y_cur[IDX_HCOII] + + k[3614]*y_cur[IDX_NHI]*y_cur[IDX_HCOII] + + k[3626]*y_cur[IDX_NOI]*y_cur[IDX_C3HII] + + k[3640]*y_cur[IDX_OII]*y_cur[IDX_CO2I] + + k[3646]*y_cur[IDX_OII]*y_cur[IDX_HCOI] + + k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + + k[3659]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3670]*y_cur[IDX_O2I]*y_cur[IDX_C3HII] + + k[3678]*y_cur[IDX_OI]*y_cur[IDX_C10M] + + k[3680]*y_cur[IDX_OI]*y_cur[IDX_C10HII] + + k[3681]*y_cur[IDX_OI]*y_cur[IDX_C10HM] + + k[3685]*y_cur[IDX_OI]*y_cur[IDX_C2M] + + k[3687]*y_cur[IDX_OI]*y_cur[IDX_C2HM] + + k[3693]*y_cur[IDX_OI]*y_cur[IDX_C3M] + + k[3694]*y_cur[IDX_OI]*y_cur[IDX_C3HM] + + k[3698]*y_cur[IDX_OI]*y_cur[IDX_C4M] + + k[3700]*y_cur[IDX_OI]*y_cur[IDX_C4HM] + + k[3701]*y_cur[IDX_OI]*y_cur[IDX_C4H2II] + + k[3703]*y_cur[IDX_OI]*y_cur[IDX_C5M] + + k[3705]*y_cur[IDX_OI]*y_cur[IDX_C5HM] + + k[3708]*y_cur[IDX_OI]*y_cur[IDX_C6M] + + k[3709]*y_cur[IDX_OI]*y_cur[IDX_C6HM] + + k[3712]*y_cur[IDX_OI]*y_cur[IDX_C7M] + + k[3714]*y_cur[IDX_OI]*y_cur[IDX_C7HM] + + k[3717]*y_cur[IDX_OI]*y_cur[IDX_C8M] + + k[3718]*y_cur[IDX_OI]*y_cur[IDX_C8HM] + + k[3721]*y_cur[IDX_OI]*y_cur[IDX_C9M] + + k[3723]*y_cur[IDX_OI]*y_cur[IDX_C9HM] + + k[3730]*y_cur[IDX_OI]*y_cur[IDX_CO2II] + + k[3731]*y_cur[IDX_OI]*y_cur[IDX_CPII] + + k[3737]*y_cur[IDX_OI]*y_cur[IDX_HCPII] + + k[3762]*y_cur[IDX_OI]*y_cur[IDX_SiNCII] - + k[3777]*y_cur[IDX_OHII]*y_cur[IDX_COI] + + k[3782]*y_cur[IDX_OHII]*y_cur[IDX_HCOI] + + k[3801]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + + k[3811]*y_cur[IDX_PII]*y_cur[IDX_CO2I] + + k[3833]*y_cur[IDX_SII]*y_cur[IDX_OCSI] + + k[3844]*y_cur[IDX_SOII]*y_cur[IDX_C2H2I] + + k[3856]*y_cur[IDX_SOII]*y_cur[IDX_CH3CHCH2I] + + k[3871]*y_cur[IDX_SiII]*y_cur[IDX_OCSI] + + k[3881]*y_cur[IDX_SiI]*y_cur[IDX_HCOII] + + k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + + k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + + k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + + k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + + k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + + k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + + k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + + k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + + k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + + k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + + k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + + k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + + k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + + k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + + k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + + k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + + k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + + k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + + k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + + k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + + k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + + k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + + k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + + k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + + k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + + k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] + + k[4815]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] + + k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + + k[4874]*y_cur[IDX_C2I]*y_cur[IDX_O2I] + + k[4874]*y_cur[IDX_C2I]*y_cur[IDX_O2I] + + k[4875]*y_cur[IDX_C2I]*y_cur[IDX_OCSI] + + k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] + + k[4904]*y_cur[IDX_C2HI]*y_cur[IDX_O2I] + + k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] + + k[4918]*y_cur[IDX_CI]*y_cur[IDX_C2OI] + + k[4922]*y_cur[IDX_CI]*y_cur[IDX_C3OI] - + k[4957]*y_cur[IDX_CI]*y_cur[IDX_COI] + + k[4963]*y_cur[IDX_CI]*y_cur[IDX_HCOI] + + k[4964]*y_cur[IDX_CI]*y_cur[IDX_HPOI] + + k[4975]*y_cur[IDX_CI]*y_cur[IDX_NOI] + + k[4978]*y_cur[IDX_CI]*y_cur[IDX_O2I] + + k[4979]*y_cur[IDX_CI]*y_cur[IDX_OCNI] + + k[4980]*y_cur[IDX_CI]*y_cur[IDX_OCSI] + + k[4981]*y_cur[IDX_CI]*y_cur[IDX_OHI] + + k[4985]*y_cur[IDX_CI]*y_cur[IDX_SO2I] + + k[4987]*y_cur[IDX_CI]*y_cur[IDX_SOI] + + k[4999]*y_cur[IDX_CH2I]*y_cur[IDX_HCOI] + + k[5009]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + + k[5012]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + + k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + + k[5033]*y_cur[IDX_CH3I]*y_cur[IDX_HCOI] + + k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + + k[5075]*y_cur[IDX_CHI]*y_cur[IDX_CO2I] + + k[5077]*y_cur[IDX_CHI]*y_cur[IDX_HCOI] + + k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5090]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5091]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5096]*y_cur[IDX_CHI]*y_cur[IDX_OI] + + k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] + + k[5102]*y_cur[IDX_CHI]*y_cur[IDX_SOI] + + k[5117]*y_cur[IDX_CNI]*y_cur[IDX_HCOI] + + k[5121]*y_cur[IDX_CNI]*y_cur[IDX_NOI] + + k[5123]*y_cur[IDX_CNI]*y_cur[IDX_O2I] - + k[5127]*y_cur[IDX_COI]*y_cur[IDX_HNOI] - + k[5128]*y_cur[IDX_COI]*y_cur[IDX_N2OI] - + k[5129]*y_cur[IDX_COI]*y_cur[IDX_NO2I] - + k[5130]*y_cur[IDX_COI]*y_cur[IDX_O2I] - + k[5131]*y_cur[IDX_COI]*y_cur[IDX_O2HI] + + k[5157]*y_cur[IDX_HI]*y_cur[IDX_CH2COI] + + k[5162]*y_cur[IDX_HI]*y_cur[IDX_CO2I] - + k[5163]*y_cur[IDX_HI]*y_cur[IDX_COI] + + k[5171]*y_cur[IDX_HI]*y_cur[IDX_HCOI] + + k[5195]*y_cur[IDX_HI]*y_cur[IDX_OCNI] + + k[5197]*y_cur[IDX_HI]*y_cur[IDX_OCSI] + + k[5203]*y_cur[IDX_HCNOI]*y_cur[IDX_OI] + + k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + + k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + + k[5205]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + + k[5207]*y_cur[IDX_HCOI]*y_cur[IDX_NOI] + + k[5209]*y_cur[IDX_HCOI]*y_cur[IDX_O2I] + + k[5214]*y_cur[IDX_HNCOI]*y_cur[IDX_CI] + + k[5215]*y_cur[IDX_HOCNI]*y_cur[IDX_CI] + + k[5230]*y_cur[IDX_NI]*y_cur[IDX_C2OI] + + k[5262]*y_cur[IDX_NI]*y_cur[IDX_CO2I] + + k[5265]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + + k[5332]*y_cur[IDX_NOI]*y_cur[IDX_OCNI] + + k[5336]*y_cur[IDX_O2I]*y_cur[IDX_OCNI] + + k[5340]*y_cur[IDX_OI]*y_cur[IDX_C10I] + + k[5341]*y_cur[IDX_OI]*y_cur[IDX_C10HI] + + k[5342]*y_cur[IDX_OI]*y_cur[IDX_C11I] + + k[5343]*y_cur[IDX_OI]*y_cur[IDX_C2I] + + k[5344]*y_cur[IDX_OI]*y_cur[IDX_C2H2I] + + k[5352]*y_cur[IDX_OI]*y_cur[IDX_C2HI] + + k[5353]*y_cur[IDX_OI]*y_cur[IDX_C2NI] + + k[5354]*y_cur[IDX_OI]*y_cur[IDX_C2OI] + + k[5354]*y_cur[IDX_OI]*y_cur[IDX_C2OI] + + k[5355]*y_cur[IDX_OI]*y_cur[IDX_C2SI] + + k[5356]*y_cur[IDX_OI]*y_cur[IDX_C3I] + + k[5357]*y_cur[IDX_OI]*y_cur[IDX_C3HI] + + k[5358]*y_cur[IDX_OI]*y_cur[IDX_C3NI] + + k[5359]*y_cur[IDX_OI]*y_cur[IDX_C3OI] + + k[5360]*y_cur[IDX_OI]*y_cur[IDX_C3PI] + + k[5361]*y_cur[IDX_OI]*y_cur[IDX_C4I] + + k[5362]*y_cur[IDX_OI]*y_cur[IDX_C4HI] + + k[5363]*y_cur[IDX_OI]*y_cur[IDX_C4NI] + + k[5364]*y_cur[IDX_OI]*y_cur[IDX_C4PI] + + k[5365]*y_cur[IDX_OI]*y_cur[IDX_C5I] + + k[5366]*y_cur[IDX_OI]*y_cur[IDX_C5HI] + + k[5367]*y_cur[IDX_OI]*y_cur[IDX_C5NI] + + k[5368]*y_cur[IDX_OI]*y_cur[IDX_C6I] + + k[5369]*y_cur[IDX_OI]*y_cur[IDX_C6HI] + + k[5370]*y_cur[IDX_OI]*y_cur[IDX_C7I] + + k[5371]*y_cur[IDX_OI]*y_cur[IDX_C7HI] + + k[5373]*y_cur[IDX_OI]*y_cur[IDX_C8I] + + k[5374]*y_cur[IDX_OI]*y_cur[IDX_C8HI] + + k[5375]*y_cur[IDX_OI]*y_cur[IDX_C9I] + + k[5376]*y_cur[IDX_OI]*y_cur[IDX_C9HI] + + k[5378]*y_cur[IDX_OI]*y_cur[IDX_CCPI] + + k[5379]*y_cur[IDX_OI]*y_cur[IDX_CClI] + + k[5382]*y_cur[IDX_OI]*y_cur[IDX_CH2CCH2I] + + k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] + + k[5386]*y_cur[IDX_OI]*y_cur[IDX_CNI] + + k[5387]*y_cur[IDX_OI]*y_cur[IDX_CNI] + + k[5389]*y_cur[IDX_OI]*y_cur[IDX_CNOI] + + k[5390]*y_cur[IDX_OI]*y_cur[IDX_CO2I] + + k[5391]*y_cur[IDX_OI]*y_cur[IDX_CPI] + + k[5392]*y_cur[IDX_OI]*y_cur[IDX_CSI] + + k[5395]*y_cur[IDX_OI]*y_cur[IDX_H2CCCI] + + k[5401]*y_cur[IDX_OI]*y_cur[IDX_HC2PI] + + k[5403]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + + k[5406]*y_cur[IDX_OI]*y_cur[IDX_HCOI] + + k[5407]*y_cur[IDX_OI]*y_cur[IDX_HCPI] + + k[5408]*y_cur[IDX_OI]*y_cur[IDX_HCSI] + + k[5428]*y_cur[IDX_OI]*y_cur[IDX_OCNI] + + k[5431]*y_cur[IDX_OI]*y_cur[IDX_OCSI] + + k[5440]*y_cur[IDX_OI]*y_cur[IDX_SiC2I] + + k[5441]*y_cur[IDX_OI]*y_cur[IDX_SiC3I] + + k[5442]*y_cur[IDX_OI]*y_cur[IDX_SiC4I] + + k[5443]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + + k[5452]*y_cur[IDX_OI]*y_cur[IDX_SiNCI] + + k[5455]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] - + k[5461]*y_cur[IDX_OHI]*y_cur[IDX_COI] + + k[5462]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + + k[5470]*y_cur[IDX_OHI]*y_cur[IDX_HCNI] + + k[5471]*y_cur[IDX_OHI]*y_cur[IDX_HCOI] + + k[5485]*y_cur[IDX_SI]*y_cur[IDX_C2OI] + + k[5487]*y_cur[IDX_SI]*y_cur[IDX_HCOI] + + k[5491]*y_cur[IDX_SiI]*y_cur[IDX_CO2I] - + k[5492]*y_cur[IDX_SiI]*y_cur[IDX_COI] - + k[5507]*y_cur[IDX_C2H2II]*y_cur[IDX_COI] - + k[5513]*y_cur[IDX_C2H3II]*y_cur[IDX_COI] + + k[5526]*y_cur[IDX_CI]*y_cur[IDX_OI] - + k[5535]*y_cur[IDX_CH3II]*y_cur[IDX_COI] - + k[5545]*y_cur[IDX_CH5II]*y_cur[IDX_COI] + + k[5630]*y_cur[IDX_HCOII]*y_cur[IDX_CH3OI] + + k[5636]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHI] + + k[5641]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COI] + + k[5642]*y_cur[IDX_HeII]*y_cur[IDX_CH3COI] + + k[5646]*y_cur[IDX_HCOII]*y_cur[IDX_COOHI] + + k[5648]*y_cur[IDX_HeII]*y_cur[IDX_COOHI] + + k[5652]*y_cur[IDX_HCOII]*y_cur[IDX_COOCH3I] + + k[5654]*y_cur[IDX_HeII]*y_cur[IDX_COOCH3I] + + k[5658]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCOI] + + k[5659]*y_cur[IDX_HeII]*y_cur[IDX_CH2OHCOI] + + k[5664]*y_cur[IDX_HCOII]*y_cur[IDX_CH2OHCHOI] + + k[5670]*y_cur[IDX_HCOII]*y_cur[IDX_CH3COOHI] - + k[5676]*y_cur[IDX_COI] + k[5713]*y_cur[IDX_C2OI] + + k[5723]*y_cur[IDX_C3OI] + k[5790]*y_cur[IDX_CH2COI] + + k[5807]*y_cur[IDX_CH3CHOI] + k[5813]*y_cur[IDX_CH3COCH3I] + + k[5825]*y_cur[IDX_CO2I] - k[5826]*y_cur[IDX_COI] + + k[5836]*y_cur[IDX_H2COI] + k[5856]*y_cur[IDX_HCOI] + + k[5868]*y_cur[IDX_HNCOI] + k[5903]*y_cur[IDX_OCSI] + + k[5938]*y_cur[IDX_CH3COI] + k[5939]*y_cur[IDX_COOHI] + + k[5942]*y_cur[IDX_HC2OI] + k[5943]*y_cur[IDX_COOCH3I] + + k[5944]*y_cur[IDX_CH2OHCOI] + k[5998]*y_cur[IDX_C2OI] + + k[6007]*y_cur[IDX_C3OI] + k[6092]*y_cur[IDX_CH2COI] + + k[6112]*y_cur[IDX_CH3CHOI] + k[6117]*y_cur[IDX_CH3COCH3I] + + k[6137]*y_cur[IDX_CO2I] - k[6138]*y_cur[IDX_COI] + + k[6152]*y_cur[IDX_H2COI] + k[6153]*y_cur[IDX_H2COI] + + k[6184]*y_cur[IDX_HCOI] + k[6199]*y_cur[IDX_HNCOI] + + k[6241]*y_cur[IDX_OCSI] + k[6291]*y_cur[IDX_CH3COI] + + k[6292]*y_cur[IDX_COOHI] + k[6293]*y_cur[IDX_COOCH3I] + + k[6294]*y_cur[IDX_CH2OHCOI] + + k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM] + + k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM] + + k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM] + + k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + + k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM] + + k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + + k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + + k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + + k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM] + + k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + + k[6568]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + + k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM] + + k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + + k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + + k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + + k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + + k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6699]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + + k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6918]*y_cur[IDX_COI] + k[7100]*y_cur[IDX_GCOI] + + k[7282]*y_cur[IDX_GCOI] + k[7464]*y_cur[IDX_GCOI] + + k[8661]*y_cur[IDX_GCI]*y_cur[IDX_GOI]; + ydot[yistart + IDX_GRAINM] = 0.0 - + k[6308]*y_cur[IDX_HII]*y_cur[IDX_GRAINM] - + k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM] - + k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] - + k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] - + k[6312]*y_cur[IDX_HeII]*y_cur[IDX_GRAINM] - + k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM] - + k[6314]*y_cur[IDX_CII]*y_cur[IDX_GRAINM] - + k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM] - + k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - + k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - + k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] - + k[6319]*y_cur[IDX_NII]*y_cur[IDX_GRAINM] - + k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM] - + k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - + k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - + k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] - + k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] - + k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] - + k[6326]*y_cur[IDX_OII]*y_cur[IDX_GRAINM] - + k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] - + k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] - + k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM] - + k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] - + k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] - + k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - + k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - + k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - + k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - + k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] - + k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - + k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - + k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] - + k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] - + k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] - + k[6342]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] - + k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - + k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - + k[6345]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - + k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] - + k[6347]*y_cur[IDX_FII]*y_cur[IDX_GRAINM] - + k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM] - + k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] - + k[6350]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] - + k[6351]*y_cur[IDX_NaII]*y_cur[IDX_GRAINM] - + k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM] - + k[6353]*y_cur[IDX_MgII]*y_cur[IDX_GRAINM] - + k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] - + k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] - + k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - + k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - + k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] - + k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM] - + k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] - + k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM] - + k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM] - + k[6374]*y_cur[IDX_SiII]*y_cur[IDX_GRAINM] - + k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM] - + k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] - + k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] - + k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - + k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - + k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] - + k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] - + k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM] - + k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM] - + k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM] - + k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - + k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - + k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - + k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - + k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] - + k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] - + k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] - + k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - + k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - + k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - + k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] - k[6402]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] - - k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] - - k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiH3I] = 0.0 - - k[202]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - - k[429]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + - k[1257]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] + - k[1258]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] - - k[1441]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] - - k[1442]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + - k[1684]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] + - k[2291]*y_cur[IDX_COI]*y_cur[IDX_SiH4II] - - k[2363]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + - k[2572]*y_cur[IDX_H2OI]*y_cur[IDX_SiH4II] - - k[2754]*y_cur[IDX_H3II]*y_cur[IDX_SiH3I] - - k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - - k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] - - k[4989]*y_cur[IDX_CI]*y_cur[IDX_SiH3I] + - k[5126]*y_cur[IDX_CNI]*y_cur[IDX_SiH4I] - - k[5295]*y_cur[IDX_NI]*y_cur[IDX_SiH3I] - - k[5447]*y_cur[IDX_OI]*y_cur[IDX_SiH3I] + - k[5448]*y_cur[IDX_OI]*y_cur[IDX_SiH4I] - k[5928]*y_cur[IDX_SiH3I] - - k[6274]*y_cur[IDX_SiH3I] - k[6275]*y_cur[IDX_SiH3I] - - k[6276]*y_cur[IDX_SiH3I] + k[6278]*y_cur[IDX_SiH4I] + - k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + - k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - - k[6927]*y_cur[IDX_SiH3I] + k[7109]*y_cur[IDX_GSiH3I] + - k[7291]*y_cur[IDX_GSiH3I] + k[7473]*y_cur[IDX_GSiH3I] + - k[8602]*y_cur[IDX_GHI]*y_cur[IDX_GSiH2I]; - ydot[yistart + IDX_SiH3II] = 0.0 + - k[202]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + - k[429]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] - - k[1254]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] - - k[1255]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] + - k[1534]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + - k[1683]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[1927]*y_cur[IDX_CI]*y_cur[IDX_SiH3II] + - k[2099]*y_cur[IDX_CH3II]*y_cur[IDX_SiH4I] + - k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] + - k[2364]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + - k[2753]*y_cur[IDX_H3II]*y_cur[IDX_SiH2I] + - k[2823]*y_cur[IDX_H3OII]*y_cur[IDX_SiH2I] + - k[3000]*y_cur[IDX_HCOII]*y_cur[IDX_SiH2I] - - k[3473]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - - k[3474]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] - - k[3758]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - - k[3759]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] - - k[3884]*y_cur[IDX_SiH3II]*y_cur[IDX_O2I] + - k[5564]*y_cur[IDX_H2I]*y_cur[IDX_SiHII] - - k[5565]*y_cur[IDX_H2I]*y_cur[IDX_SiH3II] + k[6275]*y_cur[IDX_SiH3I] - - k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] - - k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiH4I] = 0.0 - - k[430]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + - k[1259]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] - - k[1443]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - - k[1444]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] - - k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1532]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1533]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1534]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] - - k[1682]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[1683]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[1684]*y_cur[IDX_C2H4II]*y_cur[IDX_SiH4I] - - k[2099]*y_cur[IDX_CH3II]*y_cur[IDX_SiH4I] - - k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] - - k[2364]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + - k[2573]*y_cur[IDX_H2OI]*y_cur[IDX_SiH5II] - - k[2755]*y_cur[IDX_H3II]*y_cur[IDX_SiH4I] - - k[3001]*y_cur[IDX_HCOII]*y_cur[IDX_SiH4I] - - k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - - k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] - - k[5126]*y_cur[IDX_CNI]*y_cur[IDX_SiH4I] - - k[5448]*y_cur[IDX_OI]*y_cur[IDX_SiH4I] - k[5929]*y_cur[IDX_SiH4I] - - k[6277]*y_cur[IDX_SiH4I] - k[6278]*y_cur[IDX_SiH4I] - - k[6279]*y_cur[IDX_SiH4I] + - k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - - k[6935]*y_cur[IDX_SiH4I] + k[7117]*y_cur[IDX_GSiH4I] + - k[7299]*y_cur[IDX_GSiH4I] + k[7481]*y_cur[IDX_GSiH4I] + - k[8603]*y_cur[IDX_GHI]*y_cur[IDX_GSiH3I]; - ydot[yistart + IDX_SiH4II] = 0.0 + - k[430]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] - - k[1256]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] - - k[1257]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] - - k[1928]*y_cur[IDX_CI]*y_cur[IDX_SiH4II] - - k[2291]*y_cur[IDX_COI]*y_cur[IDX_SiH4II] - - k[2474]*y_cur[IDX_H2I]*y_cur[IDX_SiH4II] - - k[2572]*y_cur[IDX_H2OI]*y_cur[IDX_SiH4II] + - k[2754]*y_cur[IDX_H3II]*y_cur[IDX_SiH3I] - - k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] - - k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiH5II] = 0.0 - - k[1258]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] - - k[1259]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] - - k[1929]*y_cur[IDX_CI]*y_cur[IDX_SiH5II] + - k[2474]*y_cur[IDX_H2I]*y_cur[IDX_SiH4II] - - k[2573]*y_cur[IDX_H2OI]*y_cur[IDX_SiH5II] + - k[2755]*y_cur[IDX_H3II]*y_cur[IDX_SiH4I] + - k[3001]*y_cur[IDX_HCOII]*y_cur[IDX_SiH4I] - - k[3760]*y_cur[IDX_OI]*y_cur[IDX_SiH5II] + - k[5565]*y_cur[IDX_H2I]*y_cur[IDX_SiH3II] - - k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - - k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiNI] = 0.0 - - k[203]*y_cur[IDX_CII]*y_cur[IDX_SiNI] - - k[432]*y_cur[IDX_HII]*y_cur[IDX_SiNI] + - k[1124]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] + - k[1262]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] + - k[1265]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] - - k[1446]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + - k[2287]*y_cur[IDX_COI]*y_cur[IDX_HNSiII] + - k[2551]*y_cur[IDX_H2OI]*y_cur[IDX_HNSiII] - - k[2757]*y_cur[IDX_H3II]*y_cur[IDX_SiNI] - - k[3329]*y_cur[IDX_HeII]*y_cur[IDX_SiNI] + - k[3763]*y_cur[IDX_OI]*y_cur[IDX_SiNCHII] + - k[5293]*y_cur[IDX_NI]*y_cur[IDX_SiCI] + - k[5296]*y_cur[IDX_NI]*y_cur[IDX_SiHI] - - k[5450]*y_cur[IDX_OI]*y_cur[IDX_SiNI] - - k[5451]*y_cur[IDX_OI]*y_cur[IDX_SiNI] + - k[5452]*y_cur[IDX_OI]*y_cur[IDX_SiNCI] + k[5870]*y_cur[IDX_HNSiI] - - k[5931]*y_cur[IDX_SiNI] + k[6201]*y_cur[IDX_HNSiI] - - k[6281]*y_cur[IDX_SiNI] + k[6282]*y_cur[IDX_SiNCI] + - k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + - k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + - k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - - k[6965]*y_cur[IDX_SiNI] + k[7147]*y_cur[IDX_GSiNI] + - k[7329]*y_cur[IDX_GSiNI] + k[7511]*y_cur[IDX_GSiNI]; - ydot[yistart + IDX_SiNII] = 0.0 + - k[203]*y_cur[IDX_CII]*y_cur[IDX_SiNI] + - k[432]*y_cur[IDX_HII]*y_cur[IDX_SiNI] - - k[1260]*y_cur[IDX_SiNII]*y_cur[IDX_eM] + - k[2350]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] + - k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] + - k[3471]*y_cur[IDX_NI]*y_cur[IDX_SiHII] + - k[3625]*y_cur[IDX_NHI]*y_cur[IDX_SiII] - - k[3761]*y_cur[IDX_OI]*y_cur[IDX_SiNII] + - k[3762]*y_cur[IDX_OI]*y_cur[IDX_SiNCII] - - k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiNCI] = 0.0 - - k[433]*y_cur[IDX_HII]*y_cur[IDX_SiNCI] + - k[1263]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] - - k[2758]*y_cur[IDX_H3II]*y_cur[IDX_SiNCI] - - k[2825]*y_cur[IDX_H3OII]*y_cur[IDX_SiNCI] - - k[3003]*y_cur[IDX_HCOII]*y_cur[IDX_SiNCI] - - k[3330]*y_cur[IDX_HeII]*y_cur[IDX_SiNCI] - - k[5452]*y_cur[IDX_OI]*y_cur[IDX_SiNCI] - k[5932]*y_cur[IDX_SiNCI] - - k[6282]*y_cur[IDX_SiNCI] - k[6283]*y_cur[IDX_SiNCI] + - k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - - k[7012]*y_cur[IDX_SiNCI] + k[7194]*y_cur[IDX_GSiNCI] + - k[7376]*y_cur[IDX_GSiNCI] + k[7560]*y_cur[IDX_GSiNCI]; - ydot[yistart + IDX_SiNCII] = 0.0 + - k[433]*y_cur[IDX_HII]*y_cur[IDX_SiNCI] - - k[1261]*y_cur[IDX_SiNCII]*y_cur[IDX_eM] + - k[1414]*y_cur[IDX_CII]*y_cur[IDX_HNSiI] + - k[1930]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + - k[2502]*y_cur[IDX_H2NCII]*y_cur[IDX_SiI] + - k[2885]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] + - k[2896]*y_cur[IDX_HCNHII]*y_cur[IDX_SiI] + - k[3046]*y_cur[IDX_HNCI]*y_cur[IDX_SiII] - - k[3762]*y_cur[IDX_OI]*y_cur[IDX_SiNCII] + - k[3870]*y_cur[IDX_SiII]*y_cur[IDX_NCCNI] - - k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiNCHII] = 0.0 - - k[1262]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] - - k[1263]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] + - k[1931]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + - k[2758]*y_cur[IDX_H3II]*y_cur[IDX_SiNCI] + - k[2825]*y_cur[IDX_H3OII]*y_cur[IDX_SiNCI] + - k[3003]*y_cur[IDX_HCOII]*y_cur[IDX_SiNCI] - - k[3763]*y_cur[IDX_OI]*y_cur[IDX_SiNCHII] + - k[5580]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] - - k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - - k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiNH2II] = 0.0 - - k[1264]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] - - k[1265]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] - - k[1930]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] - - k[1931]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + - k[2455]*y_cur[IDX_H2I]*y_cur[IDX_HNSiII] + - k[2710]*y_cur[IDX_H3II]*y_cur[IDX_HNSiI] + - k[2811]*y_cur[IDX_H3OII]*y_cur[IDX_HNSiI] + - k[2974]*y_cur[IDX_HCOII]*y_cur[IDX_HNSiI] + - k[3474]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] + - k[3602]*y_cur[IDX_NH3I]*y_cur[IDX_SiII] - + k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] - + k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] - + k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] - + k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] - + k[6407]*y_cur[IDX_NOII]*y_cur[IDX_GRAINM] - + k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] - + k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] - + k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] - + k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] - + k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] - + k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] - + k[6414]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - + k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - + k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - + k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - + k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] - + k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] - + k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] - + k[6421]*y_cur[IDX_PII]*y_cur[IDX_GRAINM] - + k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM] - + k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM] - + k[6424]*y_cur[IDX_SII]*y_cur[IDX_GRAINM] - + k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM] - + k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] - + k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] - + k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - + k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - + k[6430]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] - + k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] - + k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] - + k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM] - + k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - + k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - + k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] - + k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM] - + k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - + k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] - + k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - + k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - + k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - + k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - + k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] - + k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM] - + k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] - + k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] - + k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] - + k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] - + k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - + k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - + k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - + k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] - + k[6454]*y_cur[IDX_ClII]*y_cur[IDX_GRAINM] - + k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM] - + k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM] - + k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] - + k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] - + k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] - + k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] - + k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - + k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - + k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - + k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - + k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] - + k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] - + k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] - + k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] - + k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] - + k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] - + k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] - + k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM] - + k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM] - + k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM] - + k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] - + k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] - + k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - + k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - + k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - + k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] - + k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM] - + k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] - + k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] - + k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] - + k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] - + k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - + k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - + k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - + k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] - + k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] - + k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] - + k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - + k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - + k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] - + k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM] - + k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - + k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - + k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] - + k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] - + k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] - + k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM] - + k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] - + k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] - + k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] - + k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM] - + k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] - + k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] - + k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] - + k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] - + k[6516]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] - + k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] - + k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] - + k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] - + k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] - + k[6521]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] - + k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] - + k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] - + k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] - + k[6525]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] - + k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] - + k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] - + k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - + k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - + k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] - + k[6531]*y_cur[IDX_SiOII]*y_cur[IDX_GRAINM] - + k[6532]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - + k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - + k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] - + k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM] - + k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] - + k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] - + k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] - + k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] - + k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM] - + k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - + k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] - + k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] - + k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] - + k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] - + k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] - + k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] - + k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] - + k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - + k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - + k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] - k[6552]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] - - k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiOI] = 0.0 - - k[434]*y_cur[IDX_HII]*y_cur[IDX_SiOI] + - k[504]*y_cur[IDX_HCOI]*y_cur[IDX_SiOII] + - k[541]*y_cur[IDX_MgI]*y_cur[IDX_SiOII] + - k[631]*y_cur[IDX_NOI]*y_cur[IDX_SiOII] + - k[726]*y_cur[IDX_SiOII]*y_cur[IDX_FeI] + - k[1024]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] + - k[1052]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + - k[1146]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] + - k[1268]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] - - k[1447]*y_cur[IDX_CII]*y_cur[IDX_SiOI] - - k[2760]*y_cur[IDX_H3II]*y_cur[IDX_SiOI] - - k[2826]*y_cur[IDX_H3OII]*y_cur[IDX_SiOI] - - k[3005]*y_cur[IDX_HCOII]*y_cur[IDX_SiOI] - - k[3332]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] - - k[3333]*y_cur[IDX_HeII]*y_cur[IDX_SiOI] + - k[3604]*y_cur[IDX_NH3I]*y_cur[IDX_SiOHII] + - k[3675]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] - - k[3794]*y_cur[IDX_OHII]*y_cur[IDX_SiOI] + - k[3918]*y_cur[IDX_CM]*y_cur[IDX_SiOII] + - k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] + - k[3953]*y_cur[IDX_C10M]*y_cur[IDX_SiOII] + - k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] + - k[3988]*y_cur[IDX_C10HM]*y_cur[IDX_SiOII] + - k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] + - k[4023]*y_cur[IDX_C2M]*y_cur[IDX_SiOII] + - k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] + - k[4058]*y_cur[IDX_C2HM]*y_cur[IDX_SiOII] + - k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] + - k[4093]*y_cur[IDX_C3M]*y_cur[IDX_SiOII] + - k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] + - k[4128]*y_cur[IDX_C3HM]*y_cur[IDX_SiOII] + - k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] + - k[4163]*y_cur[IDX_C3NM]*y_cur[IDX_SiOII] + - k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] + - k[4198]*y_cur[IDX_C4M]*y_cur[IDX_SiOII] + - k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] + - k[4233]*y_cur[IDX_C4HM]*y_cur[IDX_SiOII] + - k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] + - k[4268]*y_cur[IDX_C5M]*y_cur[IDX_SiOII] + - k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] + - k[4303]*y_cur[IDX_C5HM]*y_cur[IDX_SiOII] + - k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] + - k[4338]*y_cur[IDX_C5NM]*y_cur[IDX_SiOII] + - k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] + - k[4373]*y_cur[IDX_C6M]*y_cur[IDX_SiOII] + - k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] + - k[4408]*y_cur[IDX_C6HM]*y_cur[IDX_SiOII] + - k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] + - k[4443]*y_cur[IDX_C7M]*y_cur[IDX_SiOII] + - k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] + - k[4478]*y_cur[IDX_C7HM]*y_cur[IDX_SiOII] + - k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] + - k[4513]*y_cur[IDX_C8M]*y_cur[IDX_SiOII] + - k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] + - k[4548]*y_cur[IDX_C8HM]*y_cur[IDX_SiOII] + - k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] + - k[4583]*y_cur[IDX_C9M]*y_cur[IDX_SiOII] + - k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] + - k[4618]*y_cur[IDX_C9HM]*y_cur[IDX_SiOII] + - k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] + - k[4653]*y_cur[IDX_CHM]*y_cur[IDX_SiOII] + - k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] + - k[4688]*y_cur[IDX_CNM]*y_cur[IDX_SiOII] + - k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] + - k[4724]*y_cur[IDX_HM]*y_cur[IDX_SiOII] + - k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] + - k[4759]*y_cur[IDX_OM]*y_cur[IDX_SiOII] + - k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] + - k[4794]*y_cur[IDX_O2M]*y_cur[IDX_SiOII] + - k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] + - k[4829]*y_cur[IDX_OHM]*y_cur[IDX_SiOII] + - k[4830]*y_cur[IDX_OHM]*y_cur[IDX_SiOHII] + - k[4864]*y_cur[IDX_SM]*y_cur[IDX_SiOII] + - k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] + - k[5410]*y_cur[IDX_OI]*y_cur[IDX_HCSiI] + - k[5444]*y_cur[IDX_OI]*y_cur[IDX_SiCI] + - k[5445]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] + - k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] + - k[5449]*y_cur[IDX_OI]*y_cur[IDX_SiHI] + - k[5451]*y_cur[IDX_OI]*y_cur[IDX_SiNI] + - k[5482]*y_cur[IDX_OHI]*y_cur[IDX_SiI] - - k[5483]*y_cur[IDX_OHI]*y_cur[IDX_SiOI] + - k[5491]*y_cur[IDX_SiI]*y_cur[IDX_CO2I] + - k[5492]*y_cur[IDX_SiI]*y_cur[IDX_COI] + - k[5493]*y_cur[IDX_SiI]*y_cur[IDX_NOI] + - k[5494]*y_cur[IDX_SiI]*y_cur[IDX_O2I] + - k[5585]*y_cur[IDX_OI]*y_cur[IDX_SiI] + k[5843]*y_cur[IDX_H2SiOI] + - k[5933]*y_cur[IDX_SiO2I] - k[5934]*y_cur[IDX_SiOI] + - k[6166]*y_cur[IDX_H2SiOI] + k[6167]*y_cur[IDX_H2SiOI] + - k[6285]*y_cur[IDX_SiO2I] - k[6286]*y_cur[IDX_SiOI] - - k[6287]*y_cur[IDX_SiOI] + + k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] - + k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] - + k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] - + k[6556]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] - + k[6557]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] - + k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] - + k[6559]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] - + k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM] - + k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - + k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - + k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - + k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - + k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] - + k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - + k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - + k[6568]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] - + k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] - + k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] - + k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - + k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - + k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] - + k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] - + k[6575]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] - + k[6576]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] - + k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] - + k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - + k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - + k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] - + k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM] - + k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] - + k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] - + k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM] - + k[6585]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] - + k[6586]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] - + k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] - + k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] - + k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM] - + k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] - + k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] - + k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM] - + k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - + k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - + k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] - + k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - + k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - + k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] - + k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM] - + k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM] - + k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] - + k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] - + k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - + k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - + k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] - + k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - + k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - + k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - + k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] - + k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] - + k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] - + k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - + k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - + k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] - + k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] - + k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] - + k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - + k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - + k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] - + k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM] - + k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM] - + k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] - + k[6623]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] - + k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] - + k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM] - + k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM] - + k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] - + k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] - + k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - + k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - + k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] - + k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM] - + k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] - + k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] - + k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] - + k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] - + k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - + k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - + k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - + k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] - + k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM] - + k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] - + k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] - + k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM] - + k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - + k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - + k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] - + k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM] - + k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] - + k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] - + k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM] - + k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] - + k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] - + k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM] - + k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] - + k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] - + k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - + k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - + k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] - + k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] - + k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] - + k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] - + k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] - + k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - + k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] - + k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] - + k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] - + k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - + k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] - + k[6670]*y_cur[IDX_FeII]*y_cur[IDX_GRAINM] - + k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - + k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - + k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] - + k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] - + k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] - + k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] - + k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] - + k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] - + k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] - + k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - + k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - + k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] - + k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] - + k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] - + k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - + k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - + k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] - + k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM] - + k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - + k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - + k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] - + k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - + k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] - + k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] - + k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] - + k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - + k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - + k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] - + k[6699]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] - + k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] - + k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] - + k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] - + k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] - + k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] - + k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM] - + k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM] - + k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6716]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] - + k[6717]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] - + k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] - + k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] - + k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] - + k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] - + k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] - + k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - + k[6724]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - + k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - + k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] - + k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] - + k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] - + k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] - + k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] - + k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] - + k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] - + k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] - + k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] - + k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM] - + k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM] - + k[6746]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] - + k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] - + k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] - + k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] - + k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] - + k[6751]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] - + k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM] - + k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - + k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] - + k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - + k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - + k[6757]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] - + k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] - + k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] - + k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM] - + k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] - + k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] - + k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] - + k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] - + k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] - + k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] - + k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] - + k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] - + k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM] - + k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - + k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] - + k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - + k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - + k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] - + k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - + k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - + k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] - + k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] - + k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] - + k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] - + k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] - + k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] - + k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] - + k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM] - + k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] - + k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] - + k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] - + k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] - + k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] - + k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] - + k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] - + k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] - + k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] - + k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] - + k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] - + k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - + k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] - + k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] - + k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] - + k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] - + k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] - + k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] - + k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - + k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] - + k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] - + k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] - + k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] - + k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - + k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - + k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] - + k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - + k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - + k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] - + k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - + k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - + k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] - + k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] - + k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] - + k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] - + k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] - + k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] - + k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] - + k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] - + k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] - + k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - + k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] - + k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - + k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] - + k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] - + k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] - + k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] - + k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] - + k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM] - + k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] - + k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] - + k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] - + k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] - + k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] - + k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] - + k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] - + k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] - + k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] - + k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] - + k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] - + k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] - + k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] - + k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] - + k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] - + k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] - + k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] - + k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] - + k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] - + k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] - + k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] - + k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] - + k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] - + k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] - + k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] - + k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] - + k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - + k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] - + k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] - + k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] - + k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - + k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - + k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] - + k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM] - + k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM] - + k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - + k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] - + k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - + k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] - + k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] - + k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] - + k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - + k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - + k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - + k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - + k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - + k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] + + k[8763]*y_cur[IDX_GRAIN0I]*y_cur[IDX_eM]; + ydot[yistart + IDX_GRAIN0I] = 0.0 + + k[6308]*y_cur[IDX_HII]*y_cur[IDX_GRAINM] + + k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM] + + k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + + k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + + k[6312]*y_cur[IDX_HeII]*y_cur[IDX_GRAINM] + + k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM] + + k[6314]*y_cur[IDX_CII]*y_cur[IDX_GRAINM] + + k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM] + + k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6319]*y_cur[IDX_NII]*y_cur[IDX_GRAINM] + + k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM] + + k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + + k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + + k[6326]*y_cur[IDX_OII]*y_cur[IDX_GRAINM] + + k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + + k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + + k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM] + + k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + + k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + + k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + + k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + + k[6342]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + + k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6345]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6347]*y_cur[IDX_FII]*y_cur[IDX_GRAINM] + + k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM] + + k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + + k[6350]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + + k[6351]*y_cur[IDX_NaII]*y_cur[IDX_GRAINM] + + k[6352]*y_cur[IDX_C2II]*y_cur[IDX_GRAINM] + + k[6353]*y_cur[IDX_MgII]*y_cur[IDX_GRAINM] + + k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + + k[6355]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + + k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6358]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6359]*y_cur[IDX_CNII]*y_cur[IDX_GRAINM] + + k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6368]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6369]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6370]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6371]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM] + + k[6373]*y_cur[IDX_COII]*y_cur[IDX_GRAINM] + + k[6374]*y_cur[IDX_SiII]*y_cur[IDX_GRAINM] + + k[6375]*y_cur[IDX_N2II]*y_cur[IDX_GRAINM] + + k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + + k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + + k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6385]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6386]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6387]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM] + + k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM] + + k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM] + + k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6395]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + + k[6397]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + + k[6398]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6402]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + + k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + + k[6407]*y_cur[IDX_NOII]*y_cur[IDX_GRAINM] + + k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + + k[6409]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + + k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + + k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + + k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + + k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + + k[6414]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6415]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + + k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + + k[6421]*y_cur[IDX_PII]*y_cur[IDX_GRAINM] + + k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM] + + k[6423]*y_cur[IDX_CFII]*y_cur[IDX_GRAINM] + + k[6424]*y_cur[IDX_SII]*y_cur[IDX_GRAINM] + + k[6425]*y_cur[IDX_O2II]*y_cur[IDX_GRAINM] + + k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + + k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + + k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6430]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + + k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + + k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM] + + k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM] + + k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] + + k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] + + k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6441]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM] + + k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + + k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + + k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + + k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + + k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6454]*y_cur[IDX_ClII]*y_cur[IDX_GRAINM] + + k[6455]*y_cur[IDX_C3II]*y_cur[IDX_GRAINM] + + k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM] + + k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + + k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + + k[6459]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + + k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + + k[6461]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6462]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6466]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + + k[6467]*y_cur[IDX_C2NII]*y_cur[IDX_GRAINM] + + k[6468]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + + k[6469]*y_cur[IDX_CNCII]*y_cur[IDX_GRAINM] + + k[6470]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + + k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + + k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM] + + k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM] + + k[6474]*y_cur[IDX_C2OII]*y_cur[IDX_GRAINM] + + k[6475]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + + k[6476]*y_cur[IDX_CH2CNII]*y_cur[IDX_GRAINM] + + k[6477]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6479]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6481]*y_cur[IDX_SiCII]*y_cur[IDX_GRAINM] + + k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + + k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + + k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + + k[6485]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + + k[6486]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6489]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6490]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + + k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + + k[6492]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + + k[6493]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + + k[6494]*y_cur[IDX_CH2COII]*y_cur[IDX_GRAINM] + + k[6495]*y_cur[IDX_OCNII]*y_cur[IDX_GRAINM] + + k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[6497]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + + k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + + k[6501]*y_cur[IDX_SiNII]*y_cur[IDX_GRAINM] + + k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + + k[6503]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + + k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6509]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6511]*y_cur[IDX_CPII]*y_cur[IDX_GRAINM] + + k[6512]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + + k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + + k[6514]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + + k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + + k[6516]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + + k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + + k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + + k[6519]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + + k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] + + k[6521]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] + + k[6522]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + + k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + + k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] + + k[6525]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] + + k[6526]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + + k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + + k[6528]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6529]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6530]*y_cur[IDX_N2OII]*y_cur[IDX_GRAINM] + + k[6531]*y_cur[IDX_SiOII]*y_cur[IDX_GRAINM] + + k[6532]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + + k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + + k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + + k[6535]*y_cur[IDX_CSII]*y_cur[IDX_GRAINM] + + k[6536]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + + k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + + k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + + k[6539]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + + k[6540]*y_cur[IDX_CO2II]*y_cur[IDX_GRAINM] + + k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] + + k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] + + k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + + k[6544]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + + k[6545]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + + k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + + k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + + k[6548]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + + k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + + k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + + k[6551]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + + k[6552]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + + k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + + k[6554]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + + k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + + k[6556]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] + k[6557]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] + + k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + + k[6559]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + + k[6560]*y_cur[IDX_PNII]*y_cur[IDX_GRAINM] + + k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6565]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + + k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + + k[6568]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + + k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + + k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + + k[6571]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + + k[6572]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + + k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + + k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + + k[6575]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + + k[6576]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + + k[6577]*y_cur[IDX_C2H5OHII]*y_cur[IDX_GRAINM] + + k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6580]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6581]*y_cur[IDX_NSII]*y_cur[IDX_GRAINM] + + k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + + k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + + k[6584]*y_cur[IDX_NO2II]*y_cur[IDX_GRAINM] + + k[6585]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] + k[6586]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] + + k[6587]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + + k[6588]*y_cur[IDX_CH3OCH3II]*y_cur[IDX_GRAINM] + + k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM] + + k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + - k[6724]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - - k[6979]*y_cur[IDX_SiOI] + k[7161]*y_cur[IDX_GSiOI] + - k[7343]*y_cur[IDX_GSiOI] + k[7525]*y_cur[IDX_GSiOI]; - ydot[yistart + IDX_SiOII] = 0.0 + - k[434]*y_cur[IDX_HII]*y_cur[IDX_SiOI] - - k[504]*y_cur[IDX_HCOI]*y_cur[IDX_SiOII] - - k[541]*y_cur[IDX_MgI]*y_cur[IDX_SiOII] - - k[631]*y_cur[IDX_NOI]*y_cur[IDX_SiOII] - - k[726]*y_cur[IDX_SiOII]*y_cur[IDX_FeI] - - k[1266]*y_cur[IDX_SiOII]*y_cur[IDX_eM] - - k[1465]*y_cur[IDX_C2I]*y_cur[IDX_SiOII] - - k[1932]*y_cur[IDX_CI]*y_cur[IDX_SiOII] - - k[2019]*y_cur[IDX_CH2I]*y_cur[IDX_SiOII] - - k[2268]*y_cur[IDX_CHI]*y_cur[IDX_SiOII] - - k[2292]*y_cur[IDX_COI]*y_cur[IDX_SiOII] - - k[2475]*y_cur[IDX_H2I]*y_cur[IDX_SiOII] - - k[3475]*y_cur[IDX_NI]*y_cur[IDX_SiOII] - - k[3476]*y_cur[IDX_NI]*y_cur[IDX_SiOII] + - k[3676]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + - k[3753]*y_cur[IDX_OI]*y_cur[IDX_SiCII] + - k[3756]*y_cur[IDX_OI]*y_cur[IDX_SiHII] + - k[3761]*y_cur[IDX_OI]*y_cur[IDX_SiNII] - - k[3764]*y_cur[IDX_OI]*y_cur[IDX_SiOII] + - k[3809]*y_cur[IDX_OHI]*y_cur[IDX_SiII] - - k[3842]*y_cur[IDX_SI]*y_cur[IDX_SiOII] - - k[3918]*y_cur[IDX_CM]*y_cur[IDX_SiOII] - - k[3953]*y_cur[IDX_C10M]*y_cur[IDX_SiOII] - - k[3988]*y_cur[IDX_C10HM]*y_cur[IDX_SiOII] - - k[4023]*y_cur[IDX_C2M]*y_cur[IDX_SiOII] - - k[4058]*y_cur[IDX_C2HM]*y_cur[IDX_SiOII] - - k[4093]*y_cur[IDX_C3M]*y_cur[IDX_SiOII] - - k[4128]*y_cur[IDX_C3HM]*y_cur[IDX_SiOII] - - k[4163]*y_cur[IDX_C3NM]*y_cur[IDX_SiOII] - - k[4198]*y_cur[IDX_C4M]*y_cur[IDX_SiOII] - - k[4233]*y_cur[IDX_C4HM]*y_cur[IDX_SiOII] - - k[4268]*y_cur[IDX_C5M]*y_cur[IDX_SiOII] - - k[4303]*y_cur[IDX_C5HM]*y_cur[IDX_SiOII] - - k[4338]*y_cur[IDX_C5NM]*y_cur[IDX_SiOII] - - k[4373]*y_cur[IDX_C6M]*y_cur[IDX_SiOII] - - k[4408]*y_cur[IDX_C6HM]*y_cur[IDX_SiOII] - - k[4443]*y_cur[IDX_C7M]*y_cur[IDX_SiOII] - - k[4478]*y_cur[IDX_C7HM]*y_cur[IDX_SiOII] - - k[4513]*y_cur[IDX_C8M]*y_cur[IDX_SiOII] - - k[4548]*y_cur[IDX_C8HM]*y_cur[IDX_SiOII] - - k[4583]*y_cur[IDX_C9M]*y_cur[IDX_SiOII] - - k[4618]*y_cur[IDX_C9HM]*y_cur[IDX_SiOII] - - k[4653]*y_cur[IDX_CHM]*y_cur[IDX_SiOII] - - k[4688]*y_cur[IDX_CNM]*y_cur[IDX_SiOII] - - k[4724]*y_cur[IDX_HM]*y_cur[IDX_SiOII] - - k[4759]*y_cur[IDX_OM]*y_cur[IDX_SiOII] - - k[4794]*y_cur[IDX_O2M]*y_cur[IDX_SiOII] - - k[4829]*y_cur[IDX_OHM]*y_cur[IDX_SiOII] - - k[4864]*y_cur[IDX_SM]*y_cur[IDX_SiOII] + - k[5584]*y_cur[IDX_OI]*y_cur[IDX_SiII] - k[6284]*y_cur[IDX_SiOII] + - k[6287]*y_cur[IDX_SiOI] - - k[6531]*y_cur[IDX_SiOII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiO2I] = 0.0 + - k[1145]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] - - k[2759]*y_cur[IDX_H3II]*y_cur[IDX_SiO2I] - - k[3004]*y_cur[IDX_HCOII]*y_cur[IDX_SiO2I] - - k[3331]*y_cur[IDX_HeII]*y_cur[IDX_SiO2I] + - k[5483]*y_cur[IDX_OHI]*y_cur[IDX_SiOI] - k[5933]*y_cur[IDX_SiO2I] - - k[6285]*y_cur[IDX_SiO2I] + - k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] - - k[7025]*y_cur[IDX_SiO2I] + k[7207]*y_cur[IDX_GSiO2I] + - k[7389]*y_cur[IDX_GSiO2I] + k[7573]*y_cur[IDX_GSiO2I]; - ydot[yistart + IDX_SiOHII] = 0.0 - - k[1267]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] - - k[1268]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] + + k[6592]*y_cur[IDX_SiFII]*y_cur[IDX_GRAINM] + + k[6593]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + + k[6594]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + + k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + + k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + + k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + + k[6598]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + + k[6599]*y_cur[IDX_CClII]*y_cur[IDX_GRAINM] + + k[6600]*y_cur[IDX_POII]*y_cur[IDX_GRAINM] + + k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + + k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + + k[6603]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + + k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + + k[6605]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + + k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6607]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + + k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + + k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + + k[6613]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + + k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + + k[6615]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + + k[6616]*y_cur[IDX_C4II]*y_cur[IDX_GRAINM] + + k[6617]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + + k[6618]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + + k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + + k[6620]*y_cur[IDX_SOII]*y_cur[IDX_GRAINM] + + k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM] + + k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] + + k[6623]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] + + k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] + + k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM] + + k[6626]*y_cur[IDX_C3NII]*y_cur[IDX_GRAINM] + + k[6627]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + + k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + + k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + + k[6630]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + + k[6631]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + + k[6632]*y_cur[IDX_ClOII]*y_cur[IDX_GRAINM] + + k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + + k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + + k[6635]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + + k[6636]*y_cur[IDX_C2N2II]*y_cur[IDX_GRAINM] + + k[6637]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM] + + k[6642]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + + k[6643]*y_cur[IDX_SiC2II]*y_cur[IDX_GRAINM] + + k[6644]*y_cur[IDX_C3OII]*y_cur[IDX_GRAINM] + + k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6646]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM] + + k[6649]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + + k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + + k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM] + + k[6652]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + + k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + + k[6654]*y_cur[IDX_SiNCII]*y_cur[IDX_GRAINM] + + k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + + k[6656]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + + k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + + k[6658]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + + k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + + k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + + k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + + k[6662]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + + k[6663]*y_cur[IDX_CCPII]*y_cur[IDX_GRAINM] + + k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] + + k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] + + k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] + + k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] + + k[6668]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] + + k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] + + k[6670]*y_cur[IDX_FeII]*y_cur[IDX_GRAINM] + + k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + + k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + + k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + + k[6674]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + + k[6675]*y_cur[IDX_C2SII]*y_cur[IDX_GRAINM] + + k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + + k[6677]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + + k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + + k[6679]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + + k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + + k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + + k[6682]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + + k[6683]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + + k[6684]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_GRAINM] + + k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + + k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + + k[6687]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + + k[6688]*y_cur[IDX_CH3CSII]*y_cur[IDX_GRAINM] + + k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + + k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + + k[6691]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + + k[6692]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] + + k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] + + k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + + k[6695]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + + k[6696]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6698]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6699]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + + k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + + k[6701]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6704]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6706]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[6707]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[6708]*y_cur[IDX_OCSII]*y_cur[IDX_GRAINM] + + k[6709]*y_cur[IDX_C5II]*y_cur[IDX_GRAINM] + + k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM] + + k[6711]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6715]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6716]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6717]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] + + k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] + + k[6719]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + + k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + + k[6721]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + + k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + + k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] + + k[6724]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] + + k[6725]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] + + k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] + + k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6729]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6732]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6736]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + + k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + + k[6740]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + + k[6741]*y_cur[IDX_C4NII]*y_cur[IDX_GRAINM] + + k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + + k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + + k[6744]*y_cur[IDX_HC4NII]*y_cur[IDX_GRAINM] + + k[6745]*y_cur[IDX_H2C4NII]*y_cur[IDX_GRAINM] + + k[6746]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] + + k[6747]*y_cur[IDX_SiC3II]*y_cur[IDX_GRAINM] + + k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + + k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + + k[6750]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + + k[6751]*y_cur[IDX_SO2II]*y_cur[IDX_GRAINM] + + k[6752]*y_cur[IDX_S2II]*y_cur[IDX_GRAINM] + + k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + + k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + + k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + + k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + + k[6757]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + + k[6758]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + + k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + + k[6760]*y_cur[IDX_CH3C3NII]*y_cur[IDX_GRAINM] + + k[6761]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + + k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + + k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + + k[6764]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + + k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + + k[6766]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + + k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + + k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + + k[6769]*y_cur[IDX_NCCNCH3II]*y_cur[IDX_GRAINM] + + k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] + + k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] + + k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + + k[6773]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + + k[6774]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + + k[6775]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + + k[6776]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + + k[6777]*y_cur[IDX_C3SII]*y_cur[IDX_GRAINM] + + k[6778]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + + k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + + k[6780]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + + k[6781]*y_cur[IDX_C6II]*y_cur[IDX_GRAINM] + + k[6782]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + + k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + + k[6784]*y_cur[IDX_C5NII]*y_cur[IDX_GRAINM] + + k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + + k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + + k[6787]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + + k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + + k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + + k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + + k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6792]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6794]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6795]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + + k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + + k[6798]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + + k[6799]*y_cur[IDX_SiC4II]*y_cur[IDX_GRAINM] + + k[6800]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] + + k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] + + k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + + k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + + k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + + k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + + k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] + + k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + + k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + + k[6809]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + + k[6810]*y_cur[IDX_C4PII]*y_cur[IDX_GRAINM] + + k[6811]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + + k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + + k[6813]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + + k[6814]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + + k[6815]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + + k[6816]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + + k[6817]*y_cur[IDX_C4SII]*y_cur[IDX_GRAINM] + + k[6818]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] + + k[6819]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] + + k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] + + k[6821]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + + k[6822]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + + k[6823]*y_cur[IDX_C7II]*y_cur[IDX_GRAINM] + + k[6824]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + + k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + + k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + + k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + + k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + + k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + + k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + + k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + + k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + + k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + + k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] + + k[6835]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] + + k[6836]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + + k[6837]*y_cur[IDX_C8II]*y_cur[IDX_GRAINM] + + k[6838]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + + k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + + k[6840]*y_cur[IDX_C7NII]*y_cur[IDX_GRAINM] + + k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + + k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + + k[6843]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + + k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + + k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + + k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + + k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + + k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + + k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + + k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + + k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + + k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + + k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + + k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + + k[6855]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + + k[6856]*y_cur[IDX_C9II]*y_cur[IDX_GRAINM] + + k[6857]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + + k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + + k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + + k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + + k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + + k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + + k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + + k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + + k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + + k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + + k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] + + k[6868]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] + + k[6869]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + + k[6870]*y_cur[IDX_C10II]*y_cur[IDX_GRAINM] + + k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + + k[6872]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + + k[6873]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + + k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM] + + k[6875]*y_cur[IDX_C9NII]*y_cur[IDX_GRAINM] + + k[6876]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] + + k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] + + k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] + + k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] + + k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + + k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + + k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] + + k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] + + k[6884]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] + + k[6885]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] + + k[6886]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] + + k[6887]*y_cur[IDX_C11II]*y_cur[IDX_GRAINM] - + k[8763]*y_cur[IDX_GRAIN0I]*y_cur[IDX_eM]; + ydot[yistart + IDX_H2I] = 0.0 + k[74]*y_cur[IDX_HM]*y_cur[IDX_HI] + + k[75]*y_cur[IDX_HM]*y_cur[IDX_HI] - + k[82]*y_cur[IDX_H2I]*y_cur[IDX_CM] - + k[83]*y_cur[IDX_H2I]*y_cur[IDX_OM] - + k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + + k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - + k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] - + k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] + + k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] - + k[136]*y_cur[IDX_H2I]*y_cur[IDX_H2OI] + + k[136]*y_cur[IDX_H2I]*y_cur[IDX_H2OI] - + k[137]*y_cur[IDX_H2I]*y_cur[IDX_HOCII] + + k[137]*y_cur[IDX_H2I]*y_cur[IDX_HOCII] - + k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] + + k[138]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - + k[139]*y_cur[IDX_H2I]*y_cur[IDX_OHI] + + k[139]*y_cur[IDX_H2I]*y_cur[IDX_OHI] - + k[140]*y_cur[IDX_H2I]*y_cur[IDX_eM] - + k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] + + k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + + k[436]*y_cur[IDX_H2II]*y_cur[IDX_C2I] + + k[437]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + + k[438]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + + k[439]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] + + k[440]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] + + k[441]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + + k[442]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + + k[443]*y_cur[IDX_H2II]*y_cur[IDX_CHI] + + k[444]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + + k[445]*y_cur[IDX_H2II]*y_cur[IDX_COI] + + k[446]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + + k[447]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + + k[448]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + + k[449]*y_cur[IDX_H2II]*y_cur[IDX_HCNI] + + k[450]*y_cur[IDX_H2II]*y_cur[IDX_HCOI] + + k[451]*y_cur[IDX_H2II]*y_cur[IDX_NH2I] + + k[452]*y_cur[IDX_H2II]*y_cur[IDX_NH3I] + + k[453]*y_cur[IDX_H2II]*y_cur[IDX_NHI] + + k[454]*y_cur[IDX_H2II]*y_cur[IDX_NOI] + + k[455]*y_cur[IDX_H2II]*y_cur[IDX_O2I] + + k[456]*y_cur[IDX_H2II]*y_cur[IDX_OHI] - + k[457]*y_cur[IDX_H2I]*y_cur[IDX_FII] - + k[458]*y_cur[IDX_H2I]*y_cur[IDX_HeII] + + k[489]*y_cur[IDX_HI]*y_cur[IDX_H2II] + + k[745]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[746]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[749]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[750]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[757]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[760]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[764]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[778]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + + k[793]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[803]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + + k[805]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + + k[806]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + + k[807]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[810]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[811]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[824]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + + k[827]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + + k[827]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + + k[829]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + + k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] + + k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] + + k[841]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + + k[844]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + + k[845]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + + k[852]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + + k[855]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + + k[856]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + + k[857]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + + k[858]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + + k[859]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + + k[859]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + + k[860]*y_cur[IDX_C6H6II]*y_cur[IDX_eM] + + k[860]*y_cur[IDX_C6H6II]*y_cur[IDX_eM] + + k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + + k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + + k[868]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + + k[871]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + + k[872]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + + k[873]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + + k[874]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] + + k[881]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + + k[884]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + + k[885]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + + k[886]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + + k[887]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + + k[888]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + + k[888]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + + k[893]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] + + k[896]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + + k[897]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + + k[898]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + + k[899]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + + k[900]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + + k[900]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + + k[907]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + + k[912]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_eM] + + k[924]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[929]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] + + k[930]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] + + k[935]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] + + k[967]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[970]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + + k[970]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + + k[971]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + + k[972]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[973]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[976]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[976]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[989]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + + k[991]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + + k[997]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[1004]*y_cur[IDX_H2FII]*y_cur[IDX_eM] + + k[1006]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] + + k[1011]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] + + k[1012]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + + k[1024]*y_cur[IDX_H2SiOII]*y_cur[IDX_eM] + + k[1025]*y_cur[IDX_H3II]*y_cur[IDX_eM] + + k[1027]*y_cur[IDX_H3C3OII]*y_cur[IDX_eM] + + k[1028]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + + k[1029]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + + k[1030]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + + k[1031]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + + k[1032]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + + k[1033]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + + k[1036]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1039]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + + k[1042]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + + k[1043]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + + k[1046]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1048]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1050]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] + + k[1052]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + + k[1067]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + + k[1079]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + + k[1165]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + + k[1181]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + + k[1184]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + + k[1185]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + + k[1187]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + + k[1187]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + + k[1188]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + + k[1197]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + + k[1199]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + + k[1200]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + + k[1203]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + + k[1206]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + + k[1210]*y_cur[IDX_PH3II]*y_cur[IDX_eM] + + k[1214]*y_cur[IDX_PNH2II]*y_cur[IDX_eM] + + k[1217]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + + k[1228]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + + k[1231]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] + + k[1236]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] + + k[1244]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + + k[1245]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] + + k[1247]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] + + k[1251]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + + k[1255]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] + + k[1256]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] + + k[1258]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] + + k[1265]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] + + k[1297]*y_cur[IDX_CII]*y_cur[IDX_C10H2I] + + k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1304]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1306]*y_cur[IDX_CII]*y_cur[IDX_C2H5I] + + k[1310]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] + + k[1318]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + + k[1323]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] + + k[1326]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] + + k[1332]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] + + k[1335]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] + + k[1338]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] + + k[1345]*y_cur[IDX_CII]*y_cur[IDX_CH2CCH2I] + + k[1346]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + + k[1351]*y_cur[IDX_CII]*y_cur[IDX_CH2PHI] + + k[1352]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + + k[1357]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + + k[1361]*y_cur[IDX_CII]*y_cur[IDX_CH3C6HI] + + k[1365]*y_cur[IDX_CII]*y_cur[IDX_CH3CCHI] + + k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1371]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1383]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + + k[1388]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] + + k[1419]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + + k[1435]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + + k[1437]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + + k[1440]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + + k[1441]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + + k[1443]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] + + k[1479]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] + + k[1481]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H3I] + + k[1485]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] + + k[1487]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] + + k[1489]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] + + k[1491]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + + k[1493]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] + + k[1495]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + + k[1497]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] + + k[1499]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + + k[1501]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] + + k[1503]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] + + k[1505]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] + + k[1507]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + + k[1510]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + + k[1516]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] + + k[1520]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + + k[1527]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] + + k[1529]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] + + k[1531]*y_cur[IDX_C2H2II]*y_cur[IDX_SiH4I] + + k[1535]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H3II] + + k[1539]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H5II] + + k[1546]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H3II] + + k[1548]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H5II] + + k[1553]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + + k[1560]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + + k[1571]*y_cur[IDX_C2H2I]*y_cur[IDX_PH2II] + + k[1572]*y_cur[IDX_C2H2I]*y_cur[IDX_PH3II] + + k[1576]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2HII] + + k[1581]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + + k[1584]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + + k[1587]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + + k[1590]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + + k[1593]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + + k[1596]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + + k[1600]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + + k[1603]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + + k[1606]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + + k[1610]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + + k[1612]*y_cur[IDX_C2H3II]*y_cur[IDX_CH3CCHI] + + k[1615]*y_cur[IDX_C2H3II]*y_cur[IDX_C2H6I] + + k[1616]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + + k[1622]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + + k[1625]*y_cur[IDX_C2H3II]*y_cur[IDX_SI] + + k[1626]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] + + k[1629]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + + k[1631]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H3II] + + k[1633]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + + k[1635]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + + k[1637]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + + k[1639]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + + k[1641]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + + k[1643]*y_cur[IDX_C2H3I]*y_cur[IDX_CH2CCHII] + + k[1645]*y_cur[IDX_C2H3I]*y_cur[IDX_SII] + + k[1660]*y_cur[IDX_C2H4II]*y_cur[IDX_C6H2I] + + k[1664]*y_cur[IDX_C2H4II]*y_cur[IDX_C7H2I] + + k[1668]*y_cur[IDX_C2H4II]*y_cur[IDX_CH2CCHI] + + k[1678]*y_cur[IDX_C2H4II]*y_cur[IDX_C4H2I] + + k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] + + k[1680]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] + + k[1687]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + + k[1689]*y_cur[IDX_C2H4I]*y_cur[IDX_C3HII] + + k[1693]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H3II] + + k[1696]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] + + k[1699]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + + k[1701]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + + k[1703]*y_cur[IDX_C2H4I]*y_cur[IDX_C6H2II] + + k[1705]*y_cur[IDX_C2H4I]*y_cur[IDX_C7H2II] + + k[1706]*y_cur[IDX_C2H4I]*y_cur[IDX_CH2CCHII] + + k[1710]*y_cur[IDX_C2H4I]*y_cur[IDX_PII] + + k[1711]*y_cur[IDX_C2H4I]*y_cur[IDX_PHII] + + k[1713]*y_cur[IDX_C2H4I]*y_cur[IDX_PH2II] + + k[1727]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + + k[1729]*y_cur[IDX_C2HI]*y_cur[IDX_C2H4II] + + k[1732]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] + + k[1734]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] + + k[1741]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] + + k[1759]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] + + k[1761]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] + + k[1763]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] + + k[1765]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] + + k[1767]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] + + k[1769]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] + + k[1782]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] + + k[1784]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] + + k[1786]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] + + k[1790]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] + + k[1792]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + + k[1794]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] + + k[1796]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] + + k[1798]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] + + k[1800]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] + + k[1802]*y_cur[IDX_C3H3II]*y_cur[IDX_C6H2I] + + k[1803]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] + + k[1805]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + + k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + + k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + + k[1820]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] + + k[1822]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] + + k[1828]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] + + k[1839]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] + + k[1848]*y_cur[IDX_CI]*y_cur[IDX_C10H2II] + + k[1851]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + + k[1853]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] + + k[1855]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] + + k[1857]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] + + k[1859]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] + + k[1861]*y_cur[IDX_CI]*y_cur[IDX_C3H5II] + + k[1863]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] + + k[1865]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] + + k[1868]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] + + k[1870]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] + + k[1872]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] + + k[1874]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] + + k[1877]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + + k[1879]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] + + k[1881]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + + k[1883]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] + + k[1886]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] + + k[1888]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + + k[1892]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] + + k[1894]*y_cur[IDX_CI]*y_cur[IDX_CH3II] + + k[1901]*y_cur[IDX_CI]*y_cur[IDX_H3OII] + + k[1911]*y_cur[IDX_CI]*y_cur[IDX_NH4II] + + k[1921]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + + k[1928]*y_cur[IDX_CI]*y_cur[IDX_SiH4II] + + k[1930]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + + k[1935]*y_cur[IDX_CHII]*y_cur[IDX_C2HI] + + k[1936]*y_cur[IDX_CHII]*y_cur[IDX_CH2I] + + k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + + k[1941]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + + k[1943]*y_cur[IDX_CHII]*y_cur[IDX_CHI] + + k[1953]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + + k[1955]*y_cur[IDX_CHII]*y_cur[IDX_H2SI] + + k[1956]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + + k[1962]*y_cur[IDX_CHII]*y_cur[IDX_NH2I] + + k[1963]*y_cur[IDX_CHII]*y_cur[IDX_NH3I] + + k[1965]*y_cur[IDX_CHII]*y_cur[IDX_NHI] + + k[1972]*y_cur[IDX_CHII]*y_cur[IDX_OHI] + + k[1976]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + + k[1979]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + + k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + + k[1999]*y_cur[IDX_CH2I]*y_cur[IDX_CH3II] + + k[2020]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] + + k[2022]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] + + k[2024]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] + + k[2026]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6H2I] + + k[2027]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] + + k[2029]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] + + k[2033]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + + k[2035]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + + k[2037]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + + k[2039]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + + k[2041]*y_cur[IDX_CH3II]*y_cur[IDX_C2I] + + k[2042]*y_cur[IDX_CH3II]*y_cur[IDX_C2H2I] + + k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + + k[2044]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + + k[2046]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + + k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + + k[2047]*y_cur[IDX_CH3II]*y_cur[IDX_C2H4I] + + k[2048]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] + + k[2050]*y_cur[IDX_CH3II]*y_cur[IDX_C3H2I] + + k[2051]*y_cur[IDX_CH3II]*y_cur[IDX_C3HI] + + k[2052]*y_cur[IDX_CH3II]*y_cur[IDX_C4HI] + + k[2053]*y_cur[IDX_CH3II]*y_cur[IDX_C5H2I] + + k[2054]*y_cur[IDX_CH3II]*y_cur[IDX_C5HI] + + k[2055]*y_cur[IDX_CH3II]*y_cur[IDX_C6H2I] + + k[2056]*y_cur[IDX_CH3II]*y_cur[IDX_C6HI] + + k[2057]*y_cur[IDX_CH3II]*y_cur[IDX_C7H2I] + + k[2058]*y_cur[IDX_CH3II]*y_cur[IDX_C7HI] + + k[2059]*y_cur[IDX_CH3II]*y_cur[IDX_C8H2I] + + k[2060]*y_cur[IDX_CH3II]*y_cur[IDX_C8HI] + + k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + + k[2063]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + + k[2064]*y_cur[IDX_CH3II]*y_cur[IDX_C2H6I] + + k[2074]*y_cur[IDX_CH3II]*y_cur[IDX_CH4I] + + k[2076]*y_cur[IDX_CH3II]*y_cur[IDX_H2CCCI] + + k[2078]*y_cur[IDX_CH3II]*y_cur[IDX_H2SI] + + k[2080]*y_cur[IDX_CH3II]*y_cur[IDX_C4H2I] + + k[2083]*y_cur[IDX_CH3II]*y_cur[IDX_HClI] + + k[2084]*y_cur[IDX_CH3II]*y_cur[IDX_HSI] + + k[2085]*y_cur[IDX_CH3II]*y_cur[IDX_N2OI] + + k[2087]*y_cur[IDX_CH3II]*y_cur[IDX_NH3I] + + k[2091]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + + k[2093]*y_cur[IDX_CH3II]*y_cur[IDX_OHI] + + k[2095]*y_cur[IDX_CH3II]*y_cur[IDX_SI] + + k[2096]*y_cur[IDX_CH3II]*y_cur[IDX_SOI] + + k[2097]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] + + k[2100]*y_cur[IDX_CH3II]*y_cur[IDX_SiHI] + + k[2102]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + + k[2104]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C3H5II] + + k[2108]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H3II] + + k[2109]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C5H2II] + + k[2110]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C6H2II] + + k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + + k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + + k[2149]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + + k[2153]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + + k[2154]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + + k[2156]*y_cur[IDX_CH4I]*y_cur[IDX_C2H3II] + + k[2158]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + + k[2161]*y_cur[IDX_CH4I]*y_cur[IDX_C3HII] + + k[2166]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + + k[2168]*y_cur[IDX_CH4I]*y_cur[IDX_C4HII] + + k[2170]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + + k[2171]*y_cur[IDX_CH4I]*y_cur[IDX_C4H3II] + + k[2175]*y_cur[IDX_CH4I]*y_cur[IDX_C4NII] + + k[2178]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + + k[2180]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + + k[2183]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + + k[2185]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + + k[2187]*y_cur[IDX_CH4I]*y_cur[IDX_C7H2II] + + k[2188]*y_cur[IDX_CH4I]*y_cur[IDX_C8H2II] + + k[2203]*y_cur[IDX_CH4I]*y_cur[IDX_HSII] + + k[2204]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + + k[2211]*y_cur[IDX_CH4I]*y_cur[IDX_PII] + + k[2212]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] + + k[2214]*y_cur[IDX_CH4I]*y_cur[IDX_PH2II] + + k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + + k[2236]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] + + k[2238]*y_cur[IDX_CH5II]*y_cur[IDX_SiH4I] + + k[2243]*y_cur[IDX_CHI]*y_cur[IDX_CH3II] + + k[2294]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] + + k[2295]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + + k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + + k[2297]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + + k[2298]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + + k[2299]*y_cur[IDX_HII]*y_cur[IDX_C2HI] + + k[2300]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] + + k[2301]*y_cur[IDX_HII]*y_cur[IDX_C3HI] + + k[2302]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] + + k[2303]*y_cur[IDX_HII]*y_cur[IDX_C4HI] + + k[2304]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] + + k[2305]*y_cur[IDX_HII]*y_cur[IDX_C5HI] + + k[2306]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] + + k[2307]*y_cur[IDX_HII]*y_cur[IDX_C6HI] + + k[2308]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] + + k[2309]*y_cur[IDX_HII]*y_cur[IDX_C7HI] + + k[2310]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] + + k[2311]*y_cur[IDX_HII]*y_cur[IDX_C8HI] + + k[2312]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] + + k[2313]*y_cur[IDX_HII]*y_cur[IDX_C9HI] + + k[2314]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + + k[2315]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] + + k[2316]*y_cur[IDX_HII]*y_cur[IDX_CH2CHCNI] + + k[2321]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] + + k[2323]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] + + k[2325]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] + + k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + + k[2326]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + + k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + + k[2328]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + + k[2331]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + + k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + + k[2332]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + + k[2333]*y_cur[IDX_HII]*y_cur[IDX_CH4I] + + k[2335]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] + + k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + + k[2338]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + + k[2339]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + + k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + k[2341]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] + + k[2342]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] + + k[2344]*y_cur[IDX_HII]*y_cur[IDX_HCOI] + + k[2346]*y_cur[IDX_HII]*y_cur[IDX_HCSI] + + k[2347]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] + + k[2349]*y_cur[IDX_HII]*y_cur[IDX_HNOI] + + k[2350]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] + + k[2353]*y_cur[IDX_HII]*y_cur[IDX_HSI] + + k[2357]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] + + k[2358]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] + + k[2359]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] + + k[2360]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] + + k[2361]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] + + k[2362]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] + + k[2363]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + + k[2364]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + + k[2365]*y_cur[IDX_HII]*y_cur[IDX_SiHI] + + k[2366]*y_cur[IDX_HM]*y_cur[IDX_C2H2I] + + k[2367]*y_cur[IDX_HM]*y_cur[IDX_H2OI] + + k[2368]*y_cur[IDX_HM]*y_cur[IDX_HCNI] + + k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + + k[2371]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + + k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + + k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + + k[2376]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + + k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + + k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] - + k[2384]*y_cur[IDX_H2II]*y_cur[IDX_H2I] + + k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + + k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + + k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + + k[2388]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] - + k[2398]*y_cur[IDX_H2I]*y_cur[IDX_CII] - + k[2399]*y_cur[IDX_H2I]*y_cur[IDX_C10II] - + k[2400]*y_cur[IDX_H2I]*y_cur[IDX_C10HII] - + k[2401]*y_cur[IDX_H2I]*y_cur[IDX_C2II] - + k[2402]*y_cur[IDX_H2I]*y_cur[IDX_C2HII] - + k[2403]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] - + k[2404]*y_cur[IDX_H2I]*y_cur[IDX_C2N2II] - + k[2405]*y_cur[IDX_H2I]*y_cur[IDX_C2SII] - + k[2406]*y_cur[IDX_H2I]*y_cur[IDX_C3II] - + k[2407]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - + k[2408]*y_cur[IDX_H2I]*y_cur[IDX_C3H2II] - + k[2409]*y_cur[IDX_H2I]*y_cur[IDX_C3NII] - + k[2410]*y_cur[IDX_H2I]*y_cur[IDX_C3OII] - + k[2411]*y_cur[IDX_H2I]*y_cur[IDX_C4II] - + k[2412]*y_cur[IDX_H2I]*y_cur[IDX_C4HII] - + k[2413]*y_cur[IDX_H2I]*y_cur[IDX_C4NII] - + k[2414]*y_cur[IDX_H2I]*y_cur[IDX_C5II] - + k[2415]*y_cur[IDX_H2I]*y_cur[IDX_C5HII] - + k[2416]*y_cur[IDX_H2I]*y_cur[IDX_C5NII] - + k[2417]*y_cur[IDX_H2I]*y_cur[IDX_C6II] - + k[2418]*y_cur[IDX_H2I]*y_cur[IDX_C6HII] - + k[2419]*y_cur[IDX_H2I]*y_cur[IDX_C7II] - + k[2420]*y_cur[IDX_H2I]*y_cur[IDX_C7HII] - + k[2421]*y_cur[IDX_H2I]*y_cur[IDX_C7NII] - + k[2422]*y_cur[IDX_H2I]*y_cur[IDX_C8II] - + k[2423]*y_cur[IDX_H2I]*y_cur[IDX_C8HII] - + k[2424]*y_cur[IDX_H2I]*y_cur[IDX_C9II] - + k[2425]*y_cur[IDX_H2I]*y_cur[IDX_C9HII] - + k[2426]*y_cur[IDX_H2I]*y_cur[IDX_C9NII] - + k[2427]*y_cur[IDX_H2I]*y_cur[IDX_CHII] - + k[2428]*y_cur[IDX_H2I]*y_cur[IDX_CH2II] - + k[2429]*y_cur[IDX_H2I]*y_cur[IDX_CH2CHCNII] - + k[2430]*y_cur[IDX_H2I]*y_cur[IDX_CH3C3NII] - + k[2431]*y_cur[IDX_H2I]*y_cur[IDX_CH3CNII] - + k[2432]*y_cur[IDX_H2I]*y_cur[IDX_CH4II] - + k[2433]*y_cur[IDX_H2I]*y_cur[IDX_CNII] - + k[2434]*y_cur[IDX_H2I]*y_cur[IDX_COII] - + k[2435]*y_cur[IDX_H2I]*y_cur[IDX_COII] - + k[2436]*y_cur[IDX_H2I]*y_cur[IDX_CO2II] - + k[2437]*y_cur[IDX_H2I]*y_cur[IDX_CPII] - + k[2438]*y_cur[IDX_H2I]*y_cur[IDX_CSII] - + k[2439]*y_cur[IDX_H2I]*y_cur[IDX_ClII] - + k[2440]*y_cur[IDX_H2I]*y_cur[IDX_FII] - + k[2441]*y_cur[IDX_H2I]*y_cur[IDX_H2C4NII] - + k[2442]*y_cur[IDX_H2I]*y_cur[IDX_H2OII] - + k[2443]*y_cur[IDX_H2I]*y_cur[IDX_H2SII] - + k[2444]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] - + k[2445]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] - + k[2446]*y_cur[IDX_H2I]*y_cur[IDX_HC4NII] - + k[2447]*y_cur[IDX_H2I]*y_cur[IDX_HC5NII] - + k[2448]*y_cur[IDX_H2I]*y_cur[IDX_HC7NII] - + k[2449]*y_cur[IDX_H2I]*y_cur[IDX_HC9NII] - + k[2450]*y_cur[IDX_H2I]*y_cur[IDX_HCNII] - + k[2451]*y_cur[IDX_H2I]*y_cur[IDX_HCPII] - + k[2452]*y_cur[IDX_H2I]*y_cur[IDX_HCSiII] - + k[2453]*y_cur[IDX_H2I]*y_cur[IDX_HClII] - + k[2454]*y_cur[IDX_H2I]*y_cur[IDX_HFII] - + k[2455]*y_cur[IDX_H2I]*y_cur[IDX_HNSiII] - + k[2456]*y_cur[IDX_H2I]*y_cur[IDX_HSII] - + k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] - + k[2458]*y_cur[IDX_H2I]*y_cur[IDX_HeHII] - + k[2459]*y_cur[IDX_H2I]*y_cur[IDX_NII] - + k[2460]*y_cur[IDX_H2I]*y_cur[IDX_N2II] - + k[2461]*y_cur[IDX_H2I]*y_cur[IDX_NHII] - + k[2462]*y_cur[IDX_H2I]*y_cur[IDX_NHII] - + k[2463]*y_cur[IDX_H2I]*y_cur[IDX_NH2II] - + k[2464]*y_cur[IDX_H2I]*y_cur[IDX_NH3II] - + k[2465]*y_cur[IDX_H2I]*y_cur[IDX_NO2II] - + k[2466]*y_cur[IDX_H2I]*y_cur[IDX_OII] - + k[2467]*y_cur[IDX_H2I]*y_cur[IDX_OM] - + k[2468]*y_cur[IDX_H2I]*y_cur[IDX_O2HII] - + k[2469]*y_cur[IDX_H2I]*y_cur[IDX_OHII] - + k[2470]*y_cur[IDX_H2I]*y_cur[IDX_SII] - + k[2471]*y_cur[IDX_H2I]*y_cur[IDX_SO2II] - + k[2472]*y_cur[IDX_H2I]*y_cur[IDX_SiCII] - + k[2473]*y_cur[IDX_H2I]*y_cur[IDX_SiC2II] - + k[2474]*y_cur[IDX_H2I]*y_cur[IDX_SiH4II] - k[2475]*y_cur[IDX_H2I]*y_cur[IDX_SiOII] + - k[2556]*y_cur[IDX_H2OI]*y_cur[IDX_HSiSII] + - k[2569]*y_cur[IDX_H2OI]*y_cur[IDX_SiII] + + k[2476]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + + k[2481]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + + k[2483]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + + k[2485]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + + k[2495]*y_cur[IDX_H2COI]*y_cur[IDX_CH3OH2II] + + k[2502]*y_cur[IDX_H2NCII]*y_cur[IDX_SiI] + + k[2505]*y_cur[IDX_H2OII]*y_cur[IDX_C2H6I] + + k[2529]*y_cur[IDX_H2OI]*y_cur[IDX_C3HII] + + k[2563]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + + k[2565]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + + k[2567]*y_cur[IDX_H2OI]*y_cur[IDX_PH2II] + + k[2577]*y_cur[IDX_H2SI]*y_cur[IDX_C3HII] + + k[2583]*y_cur[IDX_H3II]*y_cur[IDX_C10I] + + k[2584]*y_cur[IDX_H3II]*y_cur[IDX_C10H2I] + + k[2585]*y_cur[IDX_H3II]*y_cur[IDX_C10HI] + + k[2586]*y_cur[IDX_H3II]*y_cur[IDX_C2I] + + k[2587]*y_cur[IDX_H3II]*y_cur[IDX_C2H2I] + + k[2588]*y_cur[IDX_H3II]*y_cur[IDX_C2H3I] + + k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + + k[2589]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + + k[2590]*y_cur[IDX_H3II]*y_cur[IDX_C2H4I] + + k[2591]*y_cur[IDX_H3II]*y_cur[IDX_C2H5I] + + k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2592]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2593]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2595]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2596]*y_cur[IDX_H3II]*y_cur[IDX_C2H5OHI] + + k[2597]*y_cur[IDX_H3II]*y_cur[IDX_C2HI] + + k[2598]*y_cur[IDX_H3II]*y_cur[IDX_C2NI] + + k[2599]*y_cur[IDX_H3II]*y_cur[IDX_C2OI] + + k[2600]*y_cur[IDX_H3II]*y_cur[IDX_C2SI] + + k[2601]*y_cur[IDX_H3II]*y_cur[IDX_C3I] + + k[2602]*y_cur[IDX_H3II]*y_cur[IDX_C3H2I] + + k[2603]*y_cur[IDX_H3II]*y_cur[IDX_C3HI] + + k[2604]*y_cur[IDX_H3II]*y_cur[IDX_C3NI] + + k[2605]*y_cur[IDX_H3II]*y_cur[IDX_C3OI] + + k[2606]*y_cur[IDX_H3II]*y_cur[IDX_C3PI] + + k[2607]*y_cur[IDX_H3II]*y_cur[IDX_C3SI] + + k[2608]*y_cur[IDX_H3II]*y_cur[IDX_C4I] + + k[2609]*y_cur[IDX_H3II]*y_cur[IDX_C4H3I] + + k[2610]*y_cur[IDX_H3II]*y_cur[IDX_C4HI] + + k[2611]*y_cur[IDX_H3II]*y_cur[IDX_C4PI] + + k[2612]*y_cur[IDX_H3II]*y_cur[IDX_C4SI] + + k[2613]*y_cur[IDX_H3II]*y_cur[IDX_C5I] + + k[2614]*y_cur[IDX_H3II]*y_cur[IDX_C5H2I] + + k[2615]*y_cur[IDX_H3II]*y_cur[IDX_C5HI] + + k[2616]*y_cur[IDX_H3II]*y_cur[IDX_C5NI] + + k[2617]*y_cur[IDX_H3II]*y_cur[IDX_C6I] + + k[2618]*y_cur[IDX_H3II]*y_cur[IDX_C6H2I] + + k[2619]*y_cur[IDX_H3II]*y_cur[IDX_C6H6I] + + k[2620]*y_cur[IDX_H3II]*y_cur[IDX_C6HI] + + k[2621]*y_cur[IDX_H3II]*y_cur[IDX_C7I] + + k[2622]*y_cur[IDX_H3II]*y_cur[IDX_C7H2I] + + k[2623]*y_cur[IDX_H3II]*y_cur[IDX_C7HI] + + k[2624]*y_cur[IDX_H3II]*y_cur[IDX_C7NI] + + k[2625]*y_cur[IDX_H3II]*y_cur[IDX_C8I] + + k[2626]*y_cur[IDX_H3II]*y_cur[IDX_C8H2I] + + k[2627]*y_cur[IDX_H3II]*y_cur[IDX_C8HI] + + k[2628]*y_cur[IDX_H3II]*y_cur[IDX_C9I] + + k[2629]*y_cur[IDX_H3II]*y_cur[IDX_C9H2I] + + k[2630]*y_cur[IDX_H3II]*y_cur[IDX_C9HI] + + k[2631]*y_cur[IDX_H3II]*y_cur[IDX_C9NI] + + k[2632]*y_cur[IDX_H3II]*y_cur[IDX_CI] + + k[2633]*y_cur[IDX_H3II]*y_cur[IDX_CCPI] + + k[2634]*y_cur[IDX_H3II]*y_cur[IDX_CH2I] + + k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] + + k[2635]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCH2I] + + k[2636]*y_cur[IDX_H3II]*y_cur[IDX_CH2CCHI] + + k[2637]*y_cur[IDX_H3II]*y_cur[IDX_CH2CHCNI] + + k[2638]*y_cur[IDX_H3II]*y_cur[IDX_CH2CNI] + + k[2639]*y_cur[IDX_H3II]*y_cur[IDX_CH2COI] + + k[2640]*y_cur[IDX_H3II]*y_cur[IDX_CH2PHI] + + k[2641]*y_cur[IDX_H3II]*y_cur[IDX_CH3I] + + k[2642]*y_cur[IDX_H3II]*y_cur[IDX_CH3C3NI] + + k[2643]*y_cur[IDX_H3II]*y_cur[IDX_CH3C4HI] + + k[2644]*y_cur[IDX_H3II]*y_cur[IDX_CH3C5NI] + + k[2645]*y_cur[IDX_H3II]*y_cur[IDX_CH3C6HI] + + k[2646]*y_cur[IDX_H3II]*y_cur[IDX_CH3C7NI] + + k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] + + k[2647]*y_cur[IDX_H3II]*y_cur[IDX_CH3CCHI] + + k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] + + k[2648]*y_cur[IDX_H3II]*y_cur[IDX_C2H6I] + + k[2649]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + + k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + + k[2650]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHCH2I] + + k[2651]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2654]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2655]*y_cur[IDX_H3II]*y_cur[IDX_CH3CHOI] + + k[2658]*y_cur[IDX_H3II]*y_cur[IDX_CH3CNI] + + k[2660]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2662]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2663]*y_cur[IDX_H3II]*y_cur[IDX_CH3COCH3I] + + k[2666]*y_cur[IDX_H3II]*y_cur[IDX_CH3OCH3I] + + k[2667]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] + + k[2668]*y_cur[IDX_H3II]*y_cur[IDX_CH3OHI] + + k[2669]*y_cur[IDX_H3II]*y_cur[IDX_CH4I] + + k[2670]*y_cur[IDX_H3II]*y_cur[IDX_CHI] + + k[2671]*y_cur[IDX_H3II]*y_cur[IDX_CNI] + + k[2672]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] + + k[2673]*y_cur[IDX_H3II]*y_cur[IDX_CNOI] + + k[2674]*y_cur[IDX_H3II]*y_cur[IDX_CO2I] + + k[2675]*y_cur[IDX_H3II]*y_cur[IDX_COI] + + k[2676]*y_cur[IDX_H3II]*y_cur[IDX_COI] + + k[2677]*y_cur[IDX_H3II]*y_cur[IDX_CPI] + + k[2678]*y_cur[IDX_H3II]*y_cur[IDX_CSI] + + k[2679]*y_cur[IDX_H3II]*y_cur[IDX_ClI] + + k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] + + k[2681]*y_cur[IDX_H3II]*y_cur[IDX_H2CCCI] + + k[2682]*y_cur[IDX_H3II]*y_cur[IDX_H2COI] + + k[2683]*y_cur[IDX_H3II]*y_cur[IDX_H2CSI] + + k[2684]*y_cur[IDX_H3II]*y_cur[IDX_H2OI] + + k[2685]*y_cur[IDX_H3II]*y_cur[IDX_H2S2I] + + k[2686]*y_cur[IDX_H3II]*y_cur[IDX_H2SI] + + k[2687]*y_cur[IDX_H3II]*y_cur[IDX_H2SiOI] + + k[2688]*y_cur[IDX_H3II]*y_cur[IDX_HC2PI] + + k[2689]*y_cur[IDX_H3II]*y_cur[IDX_HC3NI] + + k[2690]*y_cur[IDX_H3II]*y_cur[IDX_C4H2I] + + k[2691]*y_cur[IDX_H3II]*y_cur[IDX_HC5NI] + + k[2692]*y_cur[IDX_H3II]*y_cur[IDX_HC7NI] + + k[2693]*y_cur[IDX_H3II]*y_cur[IDX_HC9NI] + + k[2694]*y_cur[IDX_H3II]*y_cur[IDX_HCNI] + + k[2695]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + + k[2696]*y_cur[IDX_H3II]*y_cur[IDX_HCNOI] + + k[2697]*y_cur[IDX_H3II]*y_cur[IDX_HCOI] + + k[2698]*y_cur[IDX_H3II]*y_cur[IDX_HCOOCH3I] + + k[2699]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] + + k[2700]*y_cur[IDX_H3II]*y_cur[IDX_HCOOHI] + + k[2701]*y_cur[IDX_H3II]*y_cur[IDX_HCPI] + + k[2702]*y_cur[IDX_H3II]*y_cur[IDX_HCSI] + + k[2703]*y_cur[IDX_H3II]*y_cur[IDX_HCSiI] + + k[2704]*y_cur[IDX_H3II]*y_cur[IDX_HClI] + + k[2705]*y_cur[IDX_H3II]*y_cur[IDX_HFI] + + k[2706]*y_cur[IDX_H3II]*y_cur[IDX_HNCI] + + k[2707]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] + + k[2708]*y_cur[IDX_H3II]*y_cur[IDX_HNCOI] + + k[2709]*y_cur[IDX_H3II]*y_cur[IDX_HNOI] + + k[2710]*y_cur[IDX_H3II]*y_cur[IDX_HNSiI] + + k[2711]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] + + k[2712]*y_cur[IDX_H3II]*y_cur[IDX_HOCNI] + + k[2713]*y_cur[IDX_H3II]*y_cur[IDX_HONCI] + + k[2714]*y_cur[IDX_H3II]*y_cur[IDX_HPOI] + + k[2715]*y_cur[IDX_H3II]*y_cur[IDX_HS2I] + + k[2716]*y_cur[IDX_H3II]*y_cur[IDX_HSI] + + k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] + + k[2718]*y_cur[IDX_H3II]*y_cur[IDX_N2I] + + k[2719]*y_cur[IDX_H3II]*y_cur[IDX_N2OI] + + k[2720]*y_cur[IDX_H3II]*y_cur[IDX_NCCNI] + + k[2721]*y_cur[IDX_H3II]*y_cur[IDX_NH2I] + + k[2722]*y_cur[IDX_H3II]*y_cur[IDX_NH2CNI] + + k[2723]*y_cur[IDX_H3II]*y_cur[IDX_NH3I] + + k[2724]*y_cur[IDX_H3II]*y_cur[IDX_NHI] + + k[2725]*y_cur[IDX_H3II]*y_cur[IDX_NO2I] + + k[2726]*y_cur[IDX_H3II]*y_cur[IDX_NOI] + + k[2727]*y_cur[IDX_H3II]*y_cur[IDX_NSI] + + k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] + + k[2729]*y_cur[IDX_H3II]*y_cur[IDX_O2I] + + k[2731]*y_cur[IDX_H3II]*y_cur[IDX_OI] + + k[2732]*y_cur[IDX_H3II]*y_cur[IDX_OCSI] + + k[2733]*y_cur[IDX_H3II]*y_cur[IDX_OHI] + + k[2734]*y_cur[IDX_H3II]*y_cur[IDX_PI] + + k[2735]*y_cur[IDX_H3II]*y_cur[IDX_PH2I] + + k[2736]*y_cur[IDX_H3II]*y_cur[IDX_PHI] + + k[2737]*y_cur[IDX_H3II]*y_cur[IDX_PNI] + + k[2738]*y_cur[IDX_H3II]*y_cur[IDX_POI] + + k[2739]*y_cur[IDX_H3II]*y_cur[IDX_S2I] + + k[2740]*y_cur[IDX_H3II]*y_cur[IDX_SI] + + k[2741]*y_cur[IDX_H3II]*y_cur[IDX_SO2I] + + k[2742]*y_cur[IDX_H3II]*y_cur[IDX_SOI] + + k[2743]*y_cur[IDX_H3II]*y_cur[IDX_SiI] + + k[2744]*y_cur[IDX_H3II]*y_cur[IDX_SiC2I] + + k[2745]*y_cur[IDX_H3II]*y_cur[IDX_SiC2H2I] + + k[2746]*y_cur[IDX_H3II]*y_cur[IDX_SiC2HI] + + k[2747]*y_cur[IDX_H3II]*y_cur[IDX_SiC3I] + + k[2748]*y_cur[IDX_H3II]*y_cur[IDX_SiC3HI] + + k[2749]*y_cur[IDX_H3II]*y_cur[IDX_SiC4I] + + k[2750]*y_cur[IDX_H3II]*y_cur[IDX_SiCI] + + k[2751]*y_cur[IDX_H3II]*y_cur[IDX_SiCH2I] + + k[2752]*y_cur[IDX_H3II]*y_cur[IDX_SiCH3I] + + k[2753]*y_cur[IDX_H3II]*y_cur[IDX_SiH2I] + + k[2754]*y_cur[IDX_H3II]*y_cur[IDX_SiH3I] + + k[2755]*y_cur[IDX_H3II]*y_cur[IDX_SiH4I] + + k[2756]*y_cur[IDX_H3II]*y_cur[IDX_SiHI] + + k[2757]*y_cur[IDX_H3II]*y_cur[IDX_SiNI] + + k[2758]*y_cur[IDX_H3II]*y_cur[IDX_SiNCI] + + k[2759]*y_cur[IDX_H3II]*y_cur[IDX_SiO2I] + k[2760]*y_cur[IDX_H3II]*y_cur[IDX_SiOI] + - k[2826]*y_cur[IDX_H3OII]*y_cur[IDX_SiOI] + - k[3005]*y_cur[IDX_HCOII]*y_cur[IDX_SiOI] + - k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] - - k[3604]*y_cur[IDX_NH3I]*y_cur[IDX_SiOHII] + - k[3757]*y_cur[IDX_OI]*y_cur[IDX_SiH2II] + + k[2761]*y_cur[IDX_H3II]*y_cur[IDX_SiSI] + + k[2815]*y_cur[IDX_H3OII]*y_cur[IDX_PI] + + k[2827]*y_cur[IDX_HI]*y_cur[IDX_C2H3II] + + k[2828]*y_cur[IDX_HI]*y_cur[IDX_C2H4II] + + k[2829]*y_cur[IDX_HI]*y_cur[IDX_C2H5II] + + k[2831]*y_cur[IDX_HI]*y_cur[IDX_C3H2II] + + k[2832]*y_cur[IDX_HI]*y_cur[IDX_C3H4II] + + k[2833]*y_cur[IDX_HI]*y_cur[IDX_C3H7II] + + k[2834]*y_cur[IDX_HI]*y_cur[IDX_C6H6II] + + k[2835]*y_cur[IDX_HI]*y_cur[IDX_CHII] + + k[2836]*y_cur[IDX_HI]*y_cur[IDX_CH2II] + + k[2837]*y_cur[IDX_HI]*y_cur[IDX_CH3II] + + k[2838]*y_cur[IDX_HI]*y_cur[IDX_C2H6II] + + k[2839]*y_cur[IDX_HI]*y_cur[IDX_CH4II] + + k[2840]*y_cur[IDX_HI]*y_cur[IDX_CH5II] + + k[2842]*y_cur[IDX_HI]*y_cur[IDX_H2SII] + + k[2843]*y_cur[IDX_HI]*y_cur[IDX_H3SII] + + k[2844]*y_cur[IDX_HI]*y_cur[IDX_HSII] + + k[2848]*y_cur[IDX_HI]*y_cur[IDX_SiHII] + + k[2896]*y_cur[IDX_HCNHII]*y_cur[IDX_SiI] - + k[2897]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] - + k[2898]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] + + k[3022]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3027]*y_cur[IDX_HNC3I]*y_cur[IDX_H3II] - + k[3047]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] - + k[3048]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] - + k[3051]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - + k[3052]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] - + k[3053]*y_cur[IDX_HONCII]*y_cur[IDX_H2I] + + k[3055]*y_cur[IDX_HSII]*y_cur[IDX_H2SI] + + k[3074]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3077]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + + k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3080]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3083]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + + k[3120]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3128]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3137]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3145]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3152]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + + k[3160]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + + k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3163]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3167]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3176]*y_cur[IDX_HeII]*y_cur[IDX_CH3I] + + k[3178]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + + k[3181]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] + + k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3184]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3186]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + + k[3188]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + + k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + + k[3190]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + + k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3199]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3217]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + + k[3219]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[3222]*y_cur[IDX_HeII]*y_cur[IDX_H2CSI] + + k[3230]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + + k[3239]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + + k[3280]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + + k[3283]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + + k[3298]*y_cur[IDX_HeII]*y_cur[IDX_PH2I] + + k[3322]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + + k[3324]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + + k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + + k[3326]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + + k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + + k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[3353]*y_cur[IDX_NII]*y_cur[IDX_NH3I] + + k[3363]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + + k[3369]*y_cur[IDX_N2HII]*y_cur[IDX_CH3CHCH2I] + + k[3387]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + + k[3390]*y_cur[IDX_NI]*y_cur[IDX_C2H3II] + + k[3399]*y_cur[IDX_NI]*y_cur[IDX_C3H4II] + + k[3401]*y_cur[IDX_NI]*y_cur[IDX_C3H5II] + + k[3417]*y_cur[IDX_NI]*y_cur[IDX_C5H5II] + + k[3435]*y_cur[IDX_NI]*y_cur[IDX_C7H5II] + + k[3458]*y_cur[IDX_NI]*y_cur[IDX_H2OII] + + k[3459]*y_cur[IDX_NI]*y_cur[IDX_H2SII] + + k[3473]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] + + k[3490]*y_cur[IDX_NHII]*y_cur[IDX_H2OI] + + k[3555]*y_cur[IDX_NH3I]*y_cur[IDX_C2HII] + + k[3597]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + + k[3600]*y_cur[IDX_NH3I]*y_cur[IDX_PH2II] + + k[3608]*y_cur[IDX_NHI]*y_cur[IDX_CH3II] + + k[3690]*y_cur[IDX_OI]*y_cur[IDX_C2H3II] + + k[3728]*y_cur[IDX_OI]*y_cur[IDX_CH5II] + + k[3733]*y_cur[IDX_OI]*y_cur[IDX_H2OII] + + k[3735]*y_cur[IDX_OI]*y_cur[IDX_H2SII] + + k[3747]*y_cur[IDX_OI]*y_cur[IDX_NH3II] + k[3759]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] + - k[3794]*y_cur[IDX_OHII]*y_cur[IDX_SiOI] + - k[3859]*y_cur[IDX_SiII]*y_cur[IDX_C2H5OHI] + - k[3867]*y_cur[IDX_SiII]*y_cur[IDX_CH3OHI] + - k[3882]*y_cur[IDX_SiH2II]*y_cur[IDX_O2I] - - k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] - - k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] - - k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] - - k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] - - k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] - - k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] - - k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] - - k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] - - k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] - - k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] - - k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] - - k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] - - k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] - - k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] - - k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] - - k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] - - k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] - - k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] - - k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] - - k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] - - k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] - - k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] - - k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] - - k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] - - k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] - - k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] - - k[4830]*y_cur[IDX_OHM]*y_cur[IDX_SiOHII] - - k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] - - k[6556]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] - - k[6557]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM]; - ydot[yistart + IDX_SiSI] = 0.0 - - k[204]*y_cur[IDX_CII]*y_cur[IDX_SiSI] - - k[435]*y_cur[IDX_HII]*y_cur[IDX_SiSI] - - k[706]*y_cur[IDX_SII]*y_cur[IDX_SiSI] + - k[1148]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] - - k[1448]*y_cur[IDX_CII]*y_cur[IDX_SiSI] + - k[2580]*y_cur[IDX_H2SI]*y_cur[IDX_HSiSII] - - k[2761]*y_cur[IDX_H3II]*y_cur[IDX_SiSI] + - k[2880]*y_cur[IDX_HCNI]*y_cur[IDX_HSiSII] - - k[3006]*y_cur[IDX_HCOII]*y_cur[IDX_SiSI] - - k[3334]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] - - k[3335]*y_cur[IDX_HeII]*y_cur[IDX_SiSI] + - k[3591]*y_cur[IDX_NH3I]*y_cur[IDX_HSiSII] + - k[3920]*y_cur[IDX_CM]*y_cur[IDX_SiSII] + - k[3955]*y_cur[IDX_C10M]*y_cur[IDX_SiSII] + - k[3990]*y_cur[IDX_C10HM]*y_cur[IDX_SiSII] + - k[4025]*y_cur[IDX_C2M]*y_cur[IDX_SiSII] + - k[4060]*y_cur[IDX_C2HM]*y_cur[IDX_SiSII] + - k[4095]*y_cur[IDX_C3M]*y_cur[IDX_SiSII] + - k[4130]*y_cur[IDX_C3HM]*y_cur[IDX_SiSII] + - k[4165]*y_cur[IDX_C3NM]*y_cur[IDX_SiSII] + - k[4200]*y_cur[IDX_C4M]*y_cur[IDX_SiSII] + - k[4235]*y_cur[IDX_C4HM]*y_cur[IDX_SiSII] + - k[4270]*y_cur[IDX_C5M]*y_cur[IDX_SiSII] + - k[4305]*y_cur[IDX_C5HM]*y_cur[IDX_SiSII] + - k[4340]*y_cur[IDX_C5NM]*y_cur[IDX_SiSII] + - k[4375]*y_cur[IDX_C6M]*y_cur[IDX_SiSII] + - k[4410]*y_cur[IDX_C6HM]*y_cur[IDX_SiSII] + - k[4445]*y_cur[IDX_C7M]*y_cur[IDX_SiSII] + - k[4480]*y_cur[IDX_C7HM]*y_cur[IDX_SiSII] + - k[4515]*y_cur[IDX_C8M]*y_cur[IDX_SiSII] + - k[4550]*y_cur[IDX_C8HM]*y_cur[IDX_SiSII] + - k[4585]*y_cur[IDX_C9M]*y_cur[IDX_SiSII] + - k[4620]*y_cur[IDX_C9HM]*y_cur[IDX_SiSII] + - k[4655]*y_cur[IDX_CHM]*y_cur[IDX_SiSII] + - k[4690]*y_cur[IDX_CNM]*y_cur[IDX_SiSII] + - k[4726]*y_cur[IDX_HM]*y_cur[IDX_SiSII] + - k[4761]*y_cur[IDX_OM]*y_cur[IDX_SiSII] + - k[4796]*y_cur[IDX_O2M]*y_cur[IDX_SiSII] + - k[4831]*y_cur[IDX_OHM]*y_cur[IDX_SiSII] + - k[4866]*y_cur[IDX_SM]*y_cur[IDX_SiSII] - k[5935]*y_cur[IDX_SiSI] - - k[6288]*y_cur[IDX_SiSI] + - k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] - - k[7023]*y_cur[IDX_SiSI] + k[7205]*y_cur[IDX_GSiSI] + - k[7387]*y_cur[IDX_GSiSI] + k[7571]*y_cur[IDX_GSiSI]; - ydot[yistart + IDX_SiSII] = 0.0 + - k[204]*y_cur[IDX_CII]*y_cur[IDX_SiSI] + - k[435]*y_cur[IDX_HII]*y_cur[IDX_SiSI] + - k[706]*y_cur[IDX_SII]*y_cur[IDX_SiSI] - - k[1269]*y_cur[IDX_SiSII]*y_cur[IDX_eM] - - k[2849]*y_cur[IDX_HI]*y_cur[IDX_SiSII] - - k[3675]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] - - k[3676]*y_cur[IDX_O2I]*y_cur[IDX_SiSII] + - k[3871]*y_cur[IDX_SiII]*y_cur[IDX_OCSI] + - k[3885]*y_cur[IDX_SiHI]*y_cur[IDX_SII] - - k[3920]*y_cur[IDX_CM]*y_cur[IDX_SiSII] - - k[3955]*y_cur[IDX_C10M]*y_cur[IDX_SiSII] - - k[3990]*y_cur[IDX_C10HM]*y_cur[IDX_SiSII] - - k[4025]*y_cur[IDX_C2M]*y_cur[IDX_SiSII] - - k[4060]*y_cur[IDX_C2HM]*y_cur[IDX_SiSII] - - k[4095]*y_cur[IDX_C3M]*y_cur[IDX_SiSII] - - k[4130]*y_cur[IDX_C3HM]*y_cur[IDX_SiSII] - - k[4165]*y_cur[IDX_C3NM]*y_cur[IDX_SiSII] - - k[4200]*y_cur[IDX_C4M]*y_cur[IDX_SiSII] - - k[4235]*y_cur[IDX_C4HM]*y_cur[IDX_SiSII] - - k[4270]*y_cur[IDX_C5M]*y_cur[IDX_SiSII] - - k[4305]*y_cur[IDX_C5HM]*y_cur[IDX_SiSII] - - k[4340]*y_cur[IDX_C5NM]*y_cur[IDX_SiSII] - - k[4375]*y_cur[IDX_C6M]*y_cur[IDX_SiSII] - - k[4410]*y_cur[IDX_C6HM]*y_cur[IDX_SiSII] - - k[4445]*y_cur[IDX_C7M]*y_cur[IDX_SiSII] - - k[4480]*y_cur[IDX_C7HM]*y_cur[IDX_SiSII] - - k[4515]*y_cur[IDX_C8M]*y_cur[IDX_SiSII] - - k[4550]*y_cur[IDX_C8HM]*y_cur[IDX_SiSII] - - k[4585]*y_cur[IDX_C9M]*y_cur[IDX_SiSII] - - k[4620]*y_cur[IDX_C9HM]*y_cur[IDX_SiSII] - - k[4655]*y_cur[IDX_CHM]*y_cur[IDX_SiSII] - - k[4690]*y_cur[IDX_CNM]*y_cur[IDX_SiSII] - - k[4726]*y_cur[IDX_HM]*y_cur[IDX_SiSII] - - k[4761]*y_cur[IDX_OM]*y_cur[IDX_SiSII] - - k[4796]*y_cur[IDX_O2M]*y_cur[IDX_SiSII] - - k[4831]*y_cur[IDX_OHM]*y_cur[IDX_SiSII] - - k[4866]*y_cur[IDX_SM]*y_cur[IDX_SiSII] - - k[6710]*y_cur[IDX_SiSII]*y_cur[IDX_GRAINM]; + k[3760]*y_cur[IDX_OI]*y_cur[IDX_SiH5II] - + k[3765]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] - + k[3766]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + + k[3767]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] + + k[3768]*y_cur[IDX_OCNI]*y_cur[IDX_H3II] + + k[3771]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + + k[3773]*y_cur[IDX_OHII]*y_cur[IDX_C2H6I] + + k[3829]*y_cur[IDX_SII]*y_cur[IDX_H2SI] + + k[3835]*y_cur[IDX_SI]*y_cur[IDX_C3H3II] + + k[3837]*y_cur[IDX_SI]*y_cur[IDX_C4H3II] + + k[3838]*y_cur[IDX_SI]*y_cur[IDX_CH2CCHII] + + k[3873]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] + + k[3875]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] + + k[3877]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] + + k[3879]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] + + k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] + + k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] + + k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] + + k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] + + k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] + + k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] + + k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] + + k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] + + k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] + + k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] + + k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] + + k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] + + k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] + + k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] + + k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] + + k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] + + k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] + + k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] + + k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] + + k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] + + k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] + + k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] + + k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] + + k[4702]*y_cur[IDX_HM]*y_cur[IDX_H2II] + + k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] + + k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] + + k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] + + k[4810]*y_cur[IDX_OHM]*y_cur[IDX_H3II] + + k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] + + k[4879]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] + + k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] + + k[4885]*y_cur[IDX_C2H4I]*y_cur[IDX_SiI] + + k[4911]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] + + k[4950]*y_cur[IDX_CI]*y_cur[IDX_CH3C4HI] + + k[4951]*y_cur[IDX_CI]*y_cur[IDX_CH3C6HI] + + k[4953]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] + + k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] + + k[4960]*y_cur[IDX_CI]*y_cur[IDX_H2CNI] + + k[4992]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + + k[5007]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + + k[5012]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + + k[5019]*y_cur[IDX_CH2I]*y_cur[IDX_SI] + + k[5026]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + + k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + + k[5046]*y_cur[IDX_CH3I]*y_cur[IDX_OHI] + + k[5053]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] + + k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] - + k[5132]*y_cur[IDX_ClI]*y_cur[IDX_H2I] - + k[5133]*y_cur[IDX_H2I]*y_cur[IDX_C2HI] - + k[5134]*y_cur[IDX_H2I]*y_cur[IDX_CI] - + k[5135]*y_cur[IDX_H2I]*y_cur[IDX_CH2I] - + k[5136]*y_cur[IDX_H2I]*y_cur[IDX_CH3I] - + k[5137]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - + k[5138]*y_cur[IDX_H2I]*y_cur[IDX_CNI] - + k[5139]*y_cur[IDX_H2I]*y_cur[IDX_FI] - + k[5140]*y_cur[IDX_H2I]*y_cur[IDX_HSI] - + k[5141]*y_cur[IDX_H2I]*y_cur[IDX_NI] - + k[5142]*y_cur[IDX_H2I]*y_cur[IDX_NH2I] - + k[5143]*y_cur[IDX_H2I]*y_cur[IDX_NHI] - + k[5144]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - + k[5145]*y_cur[IDX_H2I]*y_cur[IDX_O2I] - + k[5146]*y_cur[IDX_H2I]*y_cur[IDX_O2HI] - + k[5147]*y_cur[IDX_H2I]*y_cur[IDX_OI] - + k[5148]*y_cur[IDX_H2I]*y_cur[IDX_OHI] - + k[5149]*y_cur[IDX_H2I]*y_cur[IDX_SI] + + k[5154]*y_cur[IDX_HI]*y_cur[IDX_C2H2I] + + k[5155]*y_cur[IDX_HI]*y_cur[IDX_C2H3I] + + k[5156]*y_cur[IDX_HI]*y_cur[IDX_CH2I] + + k[5158]*y_cur[IDX_HI]*y_cur[IDX_CH3I] + + k[5159]*y_cur[IDX_HI]*y_cur[IDX_CH4I] + + k[5160]*y_cur[IDX_HI]*y_cur[IDX_CHI] + + k[5164]*y_cur[IDX_HI]*y_cur[IDX_H2CNI] + + k[5165]*y_cur[IDX_HI]*y_cur[IDX_H2COI] + + k[5167]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] + + k[5168]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + + k[5169]*y_cur[IDX_HI]*y_cur[IDX_H2SI] + + k[5170]*y_cur[IDX_HI]*y_cur[IDX_HCNI] + + k[5171]*y_cur[IDX_HI]*y_cur[IDX_HCOI] + + k[5173]*y_cur[IDX_HI]*y_cur[IDX_HCSI] + + k[5176]*y_cur[IDX_HI]*y_cur[IDX_HNOI] + + k[5178]*y_cur[IDX_HI]*y_cur[IDX_HSI] + + k[5182]*y_cur[IDX_HI]*y_cur[IDX_NH2I] + + k[5183]*y_cur[IDX_HI]*y_cur[IDX_NH3I] + + k[5184]*y_cur[IDX_HI]*y_cur[IDX_NHI] + + k[5192]*y_cur[IDX_HI]*y_cur[IDX_O2HI] + + k[5198]*y_cur[IDX_HI]*y_cur[IDX_OHI] + + k[5204]*y_cur[IDX_HCOI]*y_cur[IDX_HCOI] + + k[5211]*y_cur[IDX_HClI]*y_cur[IDX_HI] + + k[5256]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHI] + + k[5258]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + + k[5295]*y_cur[IDX_NI]*y_cur[IDX_SiH3I] + + k[5308]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + + k[5347]*y_cur[IDX_OI]*y_cur[IDX_C2H4I] + + k[5396]*y_cur[IDX_OI]*y_cur[IDX_H2CNI] + + k[5435]*y_cur[IDX_OI]*y_cur[IDX_PH2I] + + k[5445]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] - + k[5516]*y_cur[IDX_C3H5II]*y_cur[IDX_H2I] - + k[5530]*y_cur[IDX_CH2CCHII]*y_cur[IDX_H2I] - + k[5548]*y_cur[IDX_H2I]*y_cur[IDX_CII] - + k[5549]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] - + k[5550]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - + k[5551]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] - + k[5552]*y_cur[IDX_H2I]*y_cur[IDX_C6II] - + k[5553]*y_cur[IDX_H2I]*y_cur[IDX_C6H5II] - + k[5554]*y_cur[IDX_H2I]*y_cur[IDX_CI] - + k[5555]*y_cur[IDX_H2I]*y_cur[IDX_CH3II] - + k[5556]*y_cur[IDX_H2I]*y_cur[IDX_CHI] - + k[5557]*y_cur[IDX_H2I]*y_cur[IDX_HSII] - + k[5558]*y_cur[IDX_H2I]*y_cur[IDX_HS2II] - + k[5559]*y_cur[IDX_H2I]*y_cur[IDX_PII] - + k[5560]*y_cur[IDX_H2I]*y_cur[IDX_PHII] - + k[5561]*y_cur[IDX_H2I]*y_cur[IDX_SII] - + k[5562]*y_cur[IDX_H2I]*y_cur[IDX_SiII] - + k[5563]*y_cur[IDX_H2I]*y_cur[IDX_SiC2HII] - + k[5564]*y_cur[IDX_H2I]*y_cur[IDX_SiHII] - + k[5565]*y_cur[IDX_H2I]*y_cur[IDX_SiH3II] + + k[5628]*y_cur[IDX_H3II]*y_cur[IDX_CH3OI] + + k[5634]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHI] + + k[5640]*y_cur[IDX_H3II]*y_cur[IDX_CH3COI] + + k[5645]*y_cur[IDX_H3II]*y_cur[IDX_COOHI] + + k[5650]*y_cur[IDX_H3II]*y_cur[IDX_COOCH3I] + + k[5656]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCOI] + + k[5662]*y_cur[IDX_H3II]*y_cur[IDX_CH2OHCHOI] + + k[5668]*y_cur[IDX_H3II]*y_cur[IDX_CH3COOHI] - k[5678]*y_cur[IDX_H2I] + - k[5679]*y_cur[IDX_H2I] - k[5680]*y_cur[IDX_H2I] - + k[5681]*y_cur[IDX_H2I] + k[5700]*y_cur[IDX_C2H4I] + + k[5702]*y_cur[IDX_C2H5I] + k[5751]*y_cur[IDX_C6H6I] + + k[5783]*y_cur[IDX_CH2CCHI] + k[5792]*y_cur[IDX_CH2PHI] + + k[5795]*y_cur[IDX_CH3I] + k[5803]*y_cur[IDX_C2H6I] + + k[5820]*y_cur[IDX_CH4I] + k[5836]*y_cur[IDX_H2COI] + + k[5837]*y_cur[IDX_H2CSI] + k[5842]*y_cur[IDX_H2SI] + + k[5843]*y_cur[IDX_H2SiOI] + k[5887]*y_cur[IDX_NH3I] + + k[5919]*y_cur[IDX_SiC2H2I] + k[5925]*y_cur[IDX_SiCH2I] + + k[5929]*y_cur[IDX_SiH4I] + k[5985]*y_cur[IDX_C2H4I] + + k[5987]*y_cur[IDX_C2H5I] + k[6014]*y_cur[IDX_C4H3I] + + k[6075]*y_cur[IDX_CH2II] + k[6082]*y_cur[IDX_CH2CCH2I] + + k[6084]*y_cur[IDX_CH2CCHI] + k[6093]*y_cur[IDX_CH2NHI] + + k[6095]*y_cur[IDX_CH3II] + k[6099]*y_cur[IDX_CH3I] + + k[6107]*y_cur[IDX_CH3CCHI] + k[6108]*y_cur[IDX_C2H6I] + + k[6125]*y_cur[IDX_CH4II] + k[6127]*y_cur[IDX_CH4I] + + k[6130]*y_cur[IDX_CH4I] - k[6147]*y_cur[IDX_H2I] + + k[6149]*y_cur[IDX_H2CCCI] + k[6152]*y_cur[IDX_H2COI] + + k[6156]*y_cur[IDX_H2CSI] + k[6161]*y_cur[IDX_H2OI] + + k[6165]*y_cur[IDX_H2SI] + k[6166]*y_cur[IDX_H2SiOI] + + k[6169]*y_cur[IDX_H3II] + k[6223]*y_cur[IDX_NH3I] + + k[6276]*y_cur[IDX_SiH3I] + k[6277]*y_cur[IDX_SiH4I] + + k[6279]*y_cur[IDX_SiH4I] + k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + + k[6316]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6322]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6333]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6336]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6337]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6340]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + + k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6345]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6349]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + + k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6364]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6365]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6376]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + + k[6381]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6399]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6402]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + + k[6405]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + + k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + + k[6410]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + + k[6413]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + + k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6419]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + + k[6426]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + + k[6432]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + + k[6434]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6438]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] + + k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6449]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + + k[6451]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6463]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6482]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + + k[6498]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + + k[6500]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + + k[6504]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6516]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + + k[6541]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] + + k[6553]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + + k[6569]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + + k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6579]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6586]*y_cur[IDX_H2SiOII]*y_cur[IDX_GRAINM] + + k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + + k[6595]*y_cur[IDX_PNH2II]*y_cur[IDX_GRAINM] + + k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + + k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + + k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + + k[6633]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + + k[6638]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6645]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6651]*y_cur[IDX_CH2CHCNII]*y_cur[IDX_GRAINM] + + k[6660]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + + k[6665]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] + + k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] + + k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] + + k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] + + k[6680]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + + k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + + k[6686]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + + k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + + k[6689]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + + k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + + k[6738]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + + k[6743]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + + k[6748]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + + k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + + k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + + k[6767]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + + k[6771]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] + + k[6785]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + + k[6790]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + + k[6791]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6796]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + + k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + + k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + + k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + + k[6803]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + + k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + + k[6805]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + + k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] + + k[6806]*y_cur[IDX_C6H6II]*y_cur[IDX_GRAINM] + + k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + + k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + + k[6826]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + + k[6829]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + + k[6830]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + + k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + + k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + + k[6841]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + + k[6846]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + + k[6847]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + + k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + + k[6849]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + + k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + + k[6852]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + + k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + + k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + + k[6854]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + + k[6859]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + + k[6862]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + + k[6863]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + + k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + + k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + + k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + + k[6866]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + + k[6880]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + + k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] + + k[6883]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - + k[6889]*y_cur[IDX_H2I] + k[7071]*y_cur[IDX_GH2I] + + k[7253]*y_cur[IDX_GH2I] + k[7435]*y_cur[IDX_GH2I] + + k[8273]*y_cur[IDX_GHI]*y_cur[IDX_GHI] + (0.5 * hloss) * + y_cur[IDX_HI]; ydot[yistart + IDX_eM] = 0.0 + k[0]*y_cur[IDX_CM]*y_cur[IDX_CI] + k[1]*y_cur[IDX_CM]*y_cur[IDX_CH2I] + k[2]*y_cur[IDX_CM]*y_cur[IDX_CHI] + @@ -31142,14 +29047,2139 @@ __global__ void FexKernel(realtype *y, realtype *ydot, NaunetData *d_udata, k[6304]*y_cur[IDX_FeI] + k[6305]*y_cur[IDX_NaI] + k[6306]*y_cur[IDX_MgI] + k[6307]*y_cur[IDX_ClI] - k[8763]*y_cur[IDX_GRAIN0I]*y_cur[IDX_eM]; + ydot[yistart + IDX_HI] = 0.0 - k[74]*y_cur[IDX_HM]*y_cur[IDX_HI] - + k[75]*y_cur[IDX_HM]*y_cur[IDX_HI] - + k[84]*y_cur[IDX_HI]*y_cur[IDX_CM] - + k[85]*y_cur[IDX_HI]*y_cur[IDX_C10M] - + k[86]*y_cur[IDX_HI]*y_cur[IDX_C10HM] - + k[87]*y_cur[IDX_HI]*y_cur[IDX_C2M] - + k[88]*y_cur[IDX_HI]*y_cur[IDX_C2HM] - + k[89]*y_cur[IDX_HI]*y_cur[IDX_C3M] - + k[90]*y_cur[IDX_HI]*y_cur[IDX_C3HM] - + k[91]*y_cur[IDX_HI]*y_cur[IDX_C3NM] - + k[92]*y_cur[IDX_HI]*y_cur[IDX_C4M] - + k[93]*y_cur[IDX_HI]*y_cur[IDX_C4HM] - + k[94]*y_cur[IDX_HI]*y_cur[IDX_C5M] - + k[95]*y_cur[IDX_HI]*y_cur[IDX_C5HM] - + k[96]*y_cur[IDX_HI]*y_cur[IDX_C5NM] - + k[97]*y_cur[IDX_HI]*y_cur[IDX_C6M] - + k[98]*y_cur[IDX_HI]*y_cur[IDX_C6HM] - + k[99]*y_cur[IDX_HI]*y_cur[IDX_C7M] - + k[100]*y_cur[IDX_HI]*y_cur[IDX_C7HM] - + k[101]*y_cur[IDX_HI]*y_cur[IDX_C8M] - + k[102]*y_cur[IDX_HI]*y_cur[IDX_C8HM] - + k[103]*y_cur[IDX_HI]*y_cur[IDX_C9M] - + k[104]*y_cur[IDX_HI]*y_cur[IDX_C9HM] - + k[105]*y_cur[IDX_HI]*y_cur[IDX_CHM] - + k[106]*y_cur[IDX_HI]*y_cur[IDX_CNM] - + k[107]*y_cur[IDX_HI]*y_cur[IDX_OM] - + k[108]*y_cur[IDX_HI]*y_cur[IDX_OHM] - + k[109]*y_cur[IDX_HI]*y_cur[IDX_SM] + + k[111]*y_cur[IDX_NI]*y_cur[IDX_C2HM] + + k[129]*y_cur[IDX_OI]*y_cur[IDX_C2HM] + + k[134]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + + k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] + + k[135]*y_cur[IDX_H2I]*y_cur[IDX_H2I] + + k[136]*y_cur[IDX_H2I]*y_cur[IDX_H2OI] + + k[139]*y_cur[IDX_H2I]*y_cur[IDX_OHI] + + k[140]*y_cur[IDX_H2I]*y_cur[IDX_eM] + + k[140]*y_cur[IDX_H2I]*y_cur[IDX_eM] - + k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] + + k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] + + k[141]*y_cur[IDX_HI]*y_cur[IDX_CHI] - + k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] + + k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] + + k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] + + k[142]*y_cur[IDX_HI]*y_cur[IDX_H2I] - + k[143]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + + k[143]*y_cur[IDX_HI]*y_cur[IDX_H2OI] + + k[143]*y_cur[IDX_HI]*y_cur[IDX_H2OI] - + k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] + + k[144]*y_cur[IDX_HI]*y_cur[IDX_O2I] - + k[145]*y_cur[IDX_HI]*y_cur[IDX_OHI] + + k[145]*y_cur[IDX_HI]*y_cur[IDX_OHI] + + k[145]*y_cur[IDX_HI]*y_cur[IDX_OHI] - + k[318]*y_cur[IDX_ClII]*y_cur[IDX_HI] + + k[319]*y_cur[IDX_ClI]*y_cur[IDX_HII] + + k[320]*y_cur[IDX_HII]*y_cur[IDX_C10I] + + k[321]*y_cur[IDX_HII]*y_cur[IDX_C10H2I] + + k[322]*y_cur[IDX_HII]*y_cur[IDX_C10HI] + + k[323]*y_cur[IDX_HII]*y_cur[IDX_C2I] + + k[324]*y_cur[IDX_HII]*y_cur[IDX_C2H2I] + + k[325]*y_cur[IDX_HII]*y_cur[IDX_C2H3I] + + k[326]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + + k[327]*y_cur[IDX_HII]*y_cur[IDX_C2H5I] + + k[328]*y_cur[IDX_HII]*y_cur[IDX_C2H5OHI] + + k[329]*y_cur[IDX_HII]*y_cur[IDX_C2HI] + + k[330]*y_cur[IDX_HII]*y_cur[IDX_C2NI] + + k[331]*y_cur[IDX_HII]*y_cur[IDX_C2OI] + + k[332]*y_cur[IDX_HII]*y_cur[IDX_C2SI] + + k[333]*y_cur[IDX_HII]*y_cur[IDX_C3I] + + k[334]*y_cur[IDX_HII]*y_cur[IDX_C3H2I] + + k[335]*y_cur[IDX_HII]*y_cur[IDX_C3HI] + + k[336]*y_cur[IDX_HII]*y_cur[IDX_C3OI] + + k[337]*y_cur[IDX_HII]*y_cur[IDX_C3SI] + + k[338]*y_cur[IDX_HII]*y_cur[IDX_C4I] + + k[339]*y_cur[IDX_HII]*y_cur[IDX_C4H3I] + + k[340]*y_cur[IDX_HII]*y_cur[IDX_C4HI] + + k[341]*y_cur[IDX_HII]*y_cur[IDX_C4PI] + + k[342]*y_cur[IDX_HII]*y_cur[IDX_C4SI] + + k[343]*y_cur[IDX_HII]*y_cur[IDX_C5I] + + k[344]*y_cur[IDX_HII]*y_cur[IDX_C5H2I] + + k[345]*y_cur[IDX_HII]*y_cur[IDX_C5HI] + + k[346]*y_cur[IDX_HII]*y_cur[IDX_C6I] + + k[347]*y_cur[IDX_HII]*y_cur[IDX_C6H2I] + + k[348]*y_cur[IDX_HII]*y_cur[IDX_C6HI] + + k[349]*y_cur[IDX_HII]*y_cur[IDX_C7I] + + k[350]*y_cur[IDX_HII]*y_cur[IDX_C7H2I] + + k[351]*y_cur[IDX_HII]*y_cur[IDX_C7HI] + + k[352]*y_cur[IDX_HII]*y_cur[IDX_C8I] + + k[353]*y_cur[IDX_HII]*y_cur[IDX_C8H2I] + + k[354]*y_cur[IDX_HII]*y_cur[IDX_C8HI] + + k[355]*y_cur[IDX_HII]*y_cur[IDX_C9I] + + k[356]*y_cur[IDX_HII]*y_cur[IDX_C9H2I] + + k[357]*y_cur[IDX_HII]*y_cur[IDX_C9HI] + + k[358]*y_cur[IDX_HII]*y_cur[IDX_CCPI] + + k[359]*y_cur[IDX_HII]*y_cur[IDX_CH2I] + + k[360]*y_cur[IDX_HII]*y_cur[IDX_CH2CCHI] + + k[361]*y_cur[IDX_HII]*y_cur[IDX_CH2CNI] + + k[362]*y_cur[IDX_HII]*y_cur[IDX_CH3I] + + k[363]*y_cur[IDX_HII]*y_cur[IDX_CH3C4HI] + + k[364]*y_cur[IDX_HII]*y_cur[IDX_CH3C6HI] + + k[365]*y_cur[IDX_HII]*y_cur[IDX_CH3CCHI] + + k[366]*y_cur[IDX_HII]*y_cur[IDX_CH3CHOI] + + k[367]*y_cur[IDX_HII]*y_cur[IDX_CH3CNI] + + k[368]*y_cur[IDX_HII]*y_cur[IDX_CH3COCH3I] + + k[369]*y_cur[IDX_HII]*y_cur[IDX_CH3OCH3I] + + k[370]*y_cur[IDX_HII]*y_cur[IDX_CH3OHI] + + k[371]*y_cur[IDX_HII]*y_cur[IDX_CH4I] + + k[372]*y_cur[IDX_HII]*y_cur[IDX_CHI] + + k[373]*y_cur[IDX_HII]*y_cur[IDX_CPI] + + k[374]*y_cur[IDX_HII]*y_cur[IDX_CSI] + + k[375]*y_cur[IDX_HII]*y_cur[IDX_FeI] + + k[376]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + + k[377]*y_cur[IDX_HII]*y_cur[IDX_H2CSI] + + k[378]*y_cur[IDX_HII]*y_cur[IDX_H2OI] + + k[379]*y_cur[IDX_HII]*y_cur[IDX_H2S2I] + + k[380]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + + k[381]*y_cur[IDX_HII]*y_cur[IDX_H2SiOI] + + k[382]*y_cur[IDX_HII]*y_cur[IDX_HC2PI] + + k[383]*y_cur[IDX_HII]*y_cur[IDX_HC3NI] + + k[384]*y_cur[IDX_HII]*y_cur[IDX_C4H2I] + + k[385]*y_cur[IDX_HII]*y_cur[IDX_HC5NI] + + k[386]*y_cur[IDX_HII]*y_cur[IDX_HC7NI] + + k[387]*y_cur[IDX_HII]*y_cur[IDX_HC9NI] + + k[388]*y_cur[IDX_HII]*y_cur[IDX_HCNI] + + k[389]*y_cur[IDX_HII]*y_cur[IDX_HCOI] + + k[390]*y_cur[IDX_HII]*y_cur[IDX_HCOOCH3I] + + k[391]*y_cur[IDX_HII]*y_cur[IDX_HCPI] + + k[392]*y_cur[IDX_HII]*y_cur[IDX_HCSiI] + + k[393]*y_cur[IDX_HII]*y_cur[IDX_HClI] + + k[394]*y_cur[IDX_HII]*y_cur[IDX_HNSiI] + + k[395]*y_cur[IDX_HII]*y_cur[IDX_HPOI] + + k[396]*y_cur[IDX_HII]*y_cur[IDX_HS2I] + + k[397]*y_cur[IDX_HII]*y_cur[IDX_HSI] + + k[398]*y_cur[IDX_HII]*y_cur[IDX_MgI] + + k[399]*y_cur[IDX_HII]*y_cur[IDX_N2OI] + + k[400]*y_cur[IDX_HII]*y_cur[IDX_NH2I] + + k[401]*y_cur[IDX_HII]*y_cur[IDX_NH3I] + + k[402]*y_cur[IDX_HII]*y_cur[IDX_NHI] + + k[403]*y_cur[IDX_HII]*y_cur[IDX_NOI] + + k[404]*y_cur[IDX_HII]*y_cur[IDX_NSI] + + k[405]*y_cur[IDX_HII]*y_cur[IDX_O2I] + + k[406]*y_cur[IDX_HII]*y_cur[IDX_OI] + + k[407]*y_cur[IDX_HII]*y_cur[IDX_OCSI] + + k[408]*y_cur[IDX_HII]*y_cur[IDX_OHI] + + k[409]*y_cur[IDX_HII]*y_cur[IDX_PI] + + k[410]*y_cur[IDX_HII]*y_cur[IDX_PH2I] + + k[411]*y_cur[IDX_HII]*y_cur[IDX_PHI] + + k[412]*y_cur[IDX_HII]*y_cur[IDX_PNI] + + k[413]*y_cur[IDX_HII]*y_cur[IDX_POI] + + k[414]*y_cur[IDX_HII]*y_cur[IDX_S2I] + + k[415]*y_cur[IDX_HII]*y_cur[IDX_SI] + + k[416]*y_cur[IDX_HII]*y_cur[IDX_SO2I] + + k[417]*y_cur[IDX_HII]*y_cur[IDX_SOI] + + k[418]*y_cur[IDX_HII]*y_cur[IDX_SiI] + + k[419]*y_cur[IDX_HII]*y_cur[IDX_SiC2I] + + k[420]*y_cur[IDX_HII]*y_cur[IDX_SiC2H2I] + + k[421]*y_cur[IDX_HII]*y_cur[IDX_SiC2HI] + + k[422]*y_cur[IDX_HII]*y_cur[IDX_SiC3I] + + k[423]*y_cur[IDX_HII]*y_cur[IDX_SiC3HI] + + k[424]*y_cur[IDX_HII]*y_cur[IDX_SiC4I] + + k[425]*y_cur[IDX_HII]*y_cur[IDX_SiCI] + + k[426]*y_cur[IDX_HII]*y_cur[IDX_SiCH2I] + + k[427]*y_cur[IDX_HII]*y_cur[IDX_SiCH3I] + + k[428]*y_cur[IDX_HII]*y_cur[IDX_SiH2I] + + k[429]*y_cur[IDX_HII]*y_cur[IDX_SiH3I] + + k[430]*y_cur[IDX_HII]*y_cur[IDX_SiH4I] + + k[431]*y_cur[IDX_HII]*y_cur[IDX_SiHI] + + k[432]*y_cur[IDX_HII]*y_cur[IDX_SiNI] + + k[433]*y_cur[IDX_HII]*y_cur[IDX_SiNCI] + + k[434]*y_cur[IDX_HII]*y_cur[IDX_SiOI] + + k[435]*y_cur[IDX_HII]*y_cur[IDX_SiSI] - + k[487]*y_cur[IDX_HI]*y_cur[IDX_CNII] - + k[488]*y_cur[IDX_HI]*y_cur[IDX_COII] - + k[489]*y_cur[IDX_HI]*y_cur[IDX_H2II] - + k[490]*y_cur[IDX_HI]*y_cur[IDX_HCNII] - + k[491]*y_cur[IDX_HI]*y_cur[IDX_HeII] - + k[492]*y_cur[IDX_HI]*y_cur[IDX_OII] + + k[729]*y_cur[IDX_C10HII]*y_cur[IDX_eM] + + k[732]*y_cur[IDX_C10H2II]*y_cur[IDX_eM] + + k[733]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + + k[734]*y_cur[IDX_C10H3II]*y_cur[IDX_eM] + + k[740]*y_cur[IDX_C2HII]*y_cur[IDX_eM] + + k[742]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + + k[742]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + + k[743]*y_cur[IDX_C2H2II]*y_cur[IDX_eM] + + k[745]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[746]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[747]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[748]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[751]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[751]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[752]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[752]*y_cur[IDX_C2H3II]*y_cur[IDX_eM] + + k[758]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[758]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[759]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[760]*y_cur[IDX_C2H4II]*y_cur[IDX_eM] + + k[764]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[765]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[766]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[766]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[767]*y_cur[IDX_C2H5II]*y_cur[IDX_eM] + + k[769]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + + k[770]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + + k[771]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_eM] + + k[774]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + + k[776]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + + k[777]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_eM] + + k[779]*y_cur[IDX_C2H7II]*y_cur[IDX_eM] + + k[784]*y_cur[IDX_C2NHII]*y_cur[IDX_eM] + + k[790]*y_cur[IDX_C3HII]*y_cur[IDX_eM] + + k[794]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[794]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[795]*y_cur[IDX_C3H2II]*y_cur[IDX_eM] + + k[796]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + + k[796]*y_cur[IDX_C3H2OII]*y_cur[IDX_eM] + + k[798]*y_cur[IDX_C3H3II]*y_cur[IDX_eM] + + k[800]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[802]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[802]*y_cur[IDX_C3H4II]*y_cur[IDX_eM] + + k[804]*y_cur[IDX_C3H5II]*y_cur[IDX_eM] + + k[805]*y_cur[IDX_C3H6II]*y_cur[IDX_eM] + + k[808]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[809]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[810]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[811]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[813]*y_cur[IDX_C3H7II]*y_cur[IDX_eM] + + k[821]*y_cur[IDX_C4HII]*y_cur[IDX_eM] + + k[823]*y_cur[IDX_C4H2II]*y_cur[IDX_eM] + + k[825]*y_cur[IDX_C4H3II]*y_cur[IDX_eM] + + k[826]*y_cur[IDX_C4H4II]*y_cur[IDX_eM] + + k[829]*y_cur[IDX_C4H5II]*y_cur[IDX_eM] + + k[830]*y_cur[IDX_C4H7II]*y_cur[IDX_eM] + + k[840]*y_cur[IDX_C5HII]*y_cur[IDX_eM] + + k[842]*y_cur[IDX_C5H2II]*y_cur[IDX_eM] + + k[843]*y_cur[IDX_C5H3II]*y_cur[IDX_eM] + + k[845]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + + k[846]*y_cur[IDX_C5H5II]*y_cur[IDX_eM] + + k[851]*y_cur[IDX_C6HII]*y_cur[IDX_eM] + + k[853]*y_cur[IDX_C6H2II]*y_cur[IDX_eM] + + k[854]*y_cur[IDX_C6H3II]*y_cur[IDX_eM] + + k[857]*y_cur[IDX_C6H4II]*y_cur[IDX_eM] + + k[858]*y_cur[IDX_C6H5II]*y_cur[IDX_eM] + + k[861]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + + k[862]*y_cur[IDX_C6H7II]*y_cur[IDX_eM] + + k[867]*y_cur[IDX_C7HII]*y_cur[IDX_eM] + + k[869]*y_cur[IDX_C7H2II]*y_cur[IDX_eM] + + k[870]*y_cur[IDX_C7H3II]*y_cur[IDX_eM] + + k[873]*y_cur[IDX_C7H4II]*y_cur[IDX_eM] + + k[874]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] + + k[875]*y_cur[IDX_C7H5II]*y_cur[IDX_eM] + + k[880]*y_cur[IDX_C8HII]*y_cur[IDX_eM] + + k[882]*y_cur[IDX_C8H2II]*y_cur[IDX_eM] + + k[883]*y_cur[IDX_C8H3II]*y_cur[IDX_eM] + + k[886]*y_cur[IDX_C8H4II]*y_cur[IDX_eM] + + k[887]*y_cur[IDX_C8H5II]*y_cur[IDX_eM] + + k[892]*y_cur[IDX_C9HII]*y_cur[IDX_eM] + + k[894]*y_cur[IDX_C9H2II]*y_cur[IDX_eM] + + k[895]*y_cur[IDX_C9H3II]*y_cur[IDX_eM] + + k[898]*y_cur[IDX_C9H4II]*y_cur[IDX_eM] + + k[899]*y_cur[IDX_C9H5II]*y_cur[IDX_eM] + + k[906]*y_cur[IDX_CHII]*y_cur[IDX_eM] + + k[908]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + + k[908]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + + k[909]*y_cur[IDX_CH2II]*y_cur[IDX_eM] + + k[911]*y_cur[IDX_CH2CCHII]*y_cur[IDX_eM] + + k[913]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + + k[915]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_eM] + + k[921]*y_cur[IDX_CH2NH2II]*y_cur[IDX_eM] + + k[923]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[925]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[925]*y_cur[IDX_CH3II]*y_cur[IDX_eM] + + k[927]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_eM] + + k[930]*y_cur[IDX_CH3C4HII]*y_cur[IDX_eM] + + k[931]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_eM] + + k[933]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_eM] + + k[936]*y_cur[IDX_C2H6II]*y_cur[IDX_eM] + + k[937]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + + k[937]*y_cur[IDX_CH3CHOII]*y_cur[IDX_eM] + + k[939]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[940]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[941]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[942]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_eM] + + k[944]*y_cur[IDX_CH3CNII]*y_cur[IDX_eM] + + k[946]*y_cur[IDX_CH3CNHII]*y_cur[IDX_eM] + + k[948]*y_cur[IDX_CH3COII]*y_cur[IDX_eM] + + k[953]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_eM] + + k[958]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_eM] + + k[960]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + + k[961]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + + k[961]*y_cur[IDX_CH3OHII]*y_cur[IDX_eM] + + k[963]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[965]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[966]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[967]*y_cur[IDX_CH3OH2II]*y_cur[IDX_eM] + + k[968]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + + k[968]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + + k[969]*y_cur[IDX_CH4II]*y_cur[IDX_eM] + + k[971]*y_cur[IDX_CH3NHII]*y_cur[IDX_eM] + + k[972]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[974]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[974]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[975]*y_cur[IDX_CH5II]*y_cur[IDX_eM] + + k[983]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_eM] + + k[987]*y_cur[IDX_H2II]*y_cur[IDX_eM] + + k[987]*y_cur[IDX_H2II]*y_cur[IDX_eM] + + k[990]*y_cur[IDX_H2C7NII]*y_cur[IDX_eM] + + k[992]*y_cur[IDX_H2C9NII]*y_cur[IDX_eM] + + k[993]*y_cur[IDX_H2CClII]*y_cur[IDX_eM] + + k[993]*y_cur[IDX_H2CClII]*y_cur[IDX_eM] + + k[995]*y_cur[IDX_H2CNOII]*y_cur[IDX_eM] + + k[998]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[998]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[999]*y_cur[IDX_H2COII]*y_cur[IDX_eM] + + k[1000]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + + k[1000]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + + k[1001]*y_cur[IDX_H2CSII]*y_cur[IDX_eM] + + k[1002]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + + k[1002]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + + k[1003]*y_cur[IDX_H2ClII]*y_cur[IDX_eM] + + k[1005]*y_cur[IDX_H2FII]*y_cur[IDX_eM] + + k[1007]*y_cur[IDX_H2NCII]*y_cur[IDX_eM] + + k[1008]*y_cur[IDX_H2NCOII]*y_cur[IDX_eM] + + k[1010]*y_cur[IDX_H2NOII]*y_cur[IDX_eM] + + k[1013]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + + k[1013]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + + k[1014]*y_cur[IDX_H2OII]*y_cur[IDX_eM] + + k[1016]*y_cur[IDX_H2OCNII]*y_cur[IDX_eM] + + k[1017]*y_cur[IDX_H2POII]*y_cur[IDX_eM] + + k[1019]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + + k[1020]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + + k[1020]*y_cur[IDX_H2SII]*y_cur[IDX_eM] + + k[1021]*y_cur[IDX_H2S2II]*y_cur[IDX_eM] + + k[1025]*y_cur[IDX_H3II]*y_cur[IDX_eM] + + k[1026]*y_cur[IDX_H3II]*y_cur[IDX_eM] + + k[1026]*y_cur[IDX_H3II]*y_cur[IDX_eM] + + k[1026]*y_cur[IDX_H3II]*y_cur[IDX_eM] + + k[1027]*y_cur[IDX_H3C3OII]*y_cur[IDX_eM] + + k[1028]*y_cur[IDX_H3C5NII]*y_cur[IDX_eM] + + k[1030]*y_cur[IDX_H3C7NII]*y_cur[IDX_eM] + + k[1032]*y_cur[IDX_H3C9NII]*y_cur[IDX_eM] + + k[1036]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1037]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1038]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1038]*y_cur[IDX_H3COII]*y_cur[IDX_eM] + + k[1039]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + + k[1040]*y_cur[IDX_H3CSII]*y_cur[IDX_eM] + + k[1041]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + + k[1042]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + + k[1044]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + + k[1044]*y_cur[IDX_H3OII]*y_cur[IDX_eM] + + k[1045]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1047]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1047]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1048]*y_cur[IDX_H3SII]*y_cur[IDX_eM] + + k[1049]*y_cur[IDX_H3S2II]*y_cur[IDX_eM] + + k[1051]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + + k[1052]*y_cur[IDX_H3SiOII]*y_cur[IDX_eM] + + k[1054]*y_cur[IDX_H5C2O2II]*y_cur[IDX_eM] + + k[1056]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + + k[1057]*y_cur[IDX_HC2OII]*y_cur[IDX_eM] + + k[1059]*y_cur[IDX_HC2PII]*y_cur[IDX_eM] + + k[1061]*y_cur[IDX_HC2SII]*y_cur[IDX_eM] + + k[1063]*y_cur[IDX_HC3NII]*y_cur[IDX_eM] + + k[1068]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + + k[1069]*y_cur[IDX_HC3NHII]*y_cur[IDX_eM] + + k[1070]*y_cur[IDX_HC3OII]*y_cur[IDX_eM] + + k[1072]*y_cur[IDX_HC3SII]*y_cur[IDX_eM] + + k[1076]*y_cur[IDX_HC4SII]*y_cur[IDX_eM] + + k[1078]*y_cur[IDX_HC5NII]*y_cur[IDX_eM] + + k[1081]*y_cur[IDX_HC5NHII]*y_cur[IDX_eM] + + k[1085]*y_cur[IDX_HC7NII]*y_cur[IDX_eM] + + k[1087]*y_cur[IDX_HC9NII]*y_cur[IDX_eM] + + k[1088]*y_cur[IDX_HCNII]*y_cur[IDX_eM] + + k[1089]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + + k[1089]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + + k[1090]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + + k[1091]*y_cur[IDX_HCNHII]*y_cur[IDX_eM] + + k[1093]*y_cur[IDX_HCNOII]*y_cur[IDX_eM] + + k[1095]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] + + k[1096]*y_cur[IDX_HCNOHII]*y_cur[IDX_eM] + + k[1097]*y_cur[IDX_HCOII]*y_cur[IDX_eM] + + k[1098]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + + k[1099]*y_cur[IDX_HCO2II]*y_cur[IDX_eM] + + k[1101]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + + k[1101]*y_cur[IDX_HCOOHII]*y_cur[IDX_eM] + + k[1103]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] + + k[1104]*y_cur[IDX_HCOOH2II]*y_cur[IDX_eM] + + k[1105]*y_cur[IDX_HCPII]*y_cur[IDX_eM] + + k[1108]*y_cur[IDX_HCSII]*y_cur[IDX_eM] + + k[1110]*y_cur[IDX_HCSiII]*y_cur[IDX_eM] + + k[1111]*y_cur[IDX_HClII]*y_cur[IDX_eM] + + k[1112]*y_cur[IDX_HFII]*y_cur[IDX_eM] + + k[1113]*y_cur[IDX_HN2OII]*y_cur[IDX_eM] + + k[1115]*y_cur[IDX_HNC3I]*y_cur[IDX_eM] + + k[1117]*y_cur[IDX_HNCOII]*y_cur[IDX_eM] + + k[1118]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + + k[1119]*y_cur[IDX_HNCOHII]*y_cur[IDX_eM] + + k[1121]*y_cur[IDX_HNOII]*y_cur[IDX_eM] + + k[1122]*y_cur[IDX_HNSII]*y_cur[IDX_eM] + + k[1124]*y_cur[IDX_HNSiII]*y_cur[IDX_eM] + + k[1125]*y_cur[IDX_HOCII]*y_cur[IDX_eM] + + k[1126]*y_cur[IDX_HOCNII]*y_cur[IDX_eM] + + k[1129]*y_cur[IDX_HOCSII]*y_cur[IDX_eM] + + k[1130]*y_cur[IDX_HONCII]*y_cur[IDX_eM] + + k[1134]*y_cur[IDX_HPNII]*y_cur[IDX_eM] + + k[1135]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + + k[1137]*y_cur[IDX_HPOII]*y_cur[IDX_eM] + + k[1138]*y_cur[IDX_HSII]*y_cur[IDX_eM] + + k[1140]*y_cur[IDX_HS2II]*y_cur[IDX_eM] + + k[1141]*y_cur[IDX_HSOII]*y_cur[IDX_eM] + + k[1142]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + + k[1143]*y_cur[IDX_HSO2II]*y_cur[IDX_eM] + + k[1145]*y_cur[IDX_HSiO2II]*y_cur[IDX_eM] + + k[1148]*y_cur[IDX_HSiSII]*y_cur[IDX_eM] + + k[1149]*y_cur[IDX_HeHII]*y_cur[IDX_eM] + + k[1151]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + + k[1152]*y_cur[IDX_N2HII]*y_cur[IDX_eM] + + k[1157]*y_cur[IDX_NCCNHII]*y_cur[IDX_eM] + + k[1158]*y_cur[IDX_NHII]*y_cur[IDX_eM] + + k[1159]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + + k[1159]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + + k[1160]*y_cur[IDX_NH2II]*y_cur[IDX_eM] + + k[1162]*y_cur[IDX_NH2CNHII]*y_cur[IDX_eM] + + k[1163]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + + k[1164]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + + k[1164]*y_cur[IDX_NH3II]*y_cur[IDX_eM] + + k[1166]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + + k[1166]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + + k[1167]*y_cur[IDX_NH4II]*y_cur[IDX_eM] + + k[1175]*y_cur[IDX_O2HII]*y_cur[IDX_eM] + + k[1180]*y_cur[IDX_OHII]*y_cur[IDX_eM] + + k[1182]*y_cur[IDX_PC2H2II]*y_cur[IDX_eM] + + k[1184]*y_cur[IDX_PC2H3II]*y_cur[IDX_eM] + + k[1188]*y_cur[IDX_PC2H4II]*y_cur[IDX_eM] + + k[1190]*y_cur[IDX_PC3HII]*y_cur[IDX_eM] + + k[1194]*y_cur[IDX_PC4HII]*y_cur[IDX_eM] + + k[1198]*y_cur[IDX_PCH2II]*y_cur[IDX_eM] + + k[1199]*y_cur[IDX_PCH3II]*y_cur[IDX_eM] + + k[1202]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + + k[1203]*y_cur[IDX_PCH4II]*y_cur[IDX_eM] + + k[1205]*y_cur[IDX_PHII]*y_cur[IDX_eM] + + k[1207]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + + k[1207]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + + k[1208]*y_cur[IDX_PH2II]*y_cur[IDX_eM] + + k[1209]*y_cur[IDX_PH3II]*y_cur[IDX_eM] + + k[1217]*y_cur[IDX_PNH3II]*y_cur[IDX_eM] + + k[1227]*y_cur[IDX_SiC2HII]*y_cur[IDX_eM] + + k[1229]*y_cur[IDX_SiC2H2II]*y_cur[IDX_eM] + + k[1230]*y_cur[IDX_SiC2H3II]*y_cur[IDX_eM] + + k[1235]*y_cur[IDX_SiC3HII]*y_cur[IDX_eM] + + k[1237]*y_cur[IDX_SiC3H2II]*y_cur[IDX_eM] + + k[1241]*y_cur[IDX_SiC4HII]*y_cur[IDX_eM] + + k[1242]*y_cur[IDX_SiCH2II]*y_cur[IDX_eM] + + k[1246]*y_cur[IDX_SiCH3II]*y_cur[IDX_eM] + + k[1248]*y_cur[IDX_SiCH4II]*y_cur[IDX_eM] + + k[1250]*y_cur[IDX_SiHII]*y_cur[IDX_eM] + + k[1252]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + + k[1252]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + + k[1253]*y_cur[IDX_SiH2II]*y_cur[IDX_eM] + + k[1254]*y_cur[IDX_SiH3II]*y_cur[IDX_eM] + + k[1257]*y_cur[IDX_SiH4II]*y_cur[IDX_eM] + + k[1259]*y_cur[IDX_SiH5II]*y_cur[IDX_eM] + + k[1263]*y_cur[IDX_SiNCHII]*y_cur[IDX_eM] + + k[1264]*y_cur[IDX_SiNH2II]*y_cur[IDX_eM] + + k[1268]*y_cur[IDX_SiOHII]*y_cur[IDX_eM] + + k[1270]*y_cur[IDX_COOCH3II]*y_cur[IDX_eM] + + k[1273]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_eM] + + k[1276]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1277]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1279]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_eM] + + k[1280]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + + k[1281]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + + k[1283]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_eM] + + k[1285]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1286]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1287]*y_cur[IDX_CH3COOHII]*y_cur[IDX_eM] + + k[1290]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1292]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1293]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1294]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1296]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_eM] + + k[1298]*y_cur[IDX_CII]*y_cur[IDX_C10HI] + + k[1300]*y_cur[IDX_CII]*y_cur[IDX_C2H2I] + + k[1301]*y_cur[IDX_CII]*y_cur[IDX_C2H3I] + + k[1303]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1305]*y_cur[IDX_CII]*y_cur[IDX_C2H4I] + + k[1308]*y_cur[IDX_CII]*y_cur[IDX_C2HI] + + k[1311]*y_cur[IDX_CII]*y_cur[IDX_C3H2I] + + k[1312]*y_cur[IDX_CII]*y_cur[IDX_C3HI] + + k[1319]*y_cur[IDX_CII]*y_cur[IDX_C4H3I] + + k[1320]*y_cur[IDX_CII]*y_cur[IDX_C4HI] + + k[1324]*y_cur[IDX_CII]*y_cur[IDX_C5H2I] + + k[1325]*y_cur[IDX_CII]*y_cur[IDX_C5HI] + + k[1327]*y_cur[IDX_CII]*y_cur[IDX_C6H2I] + + k[1330]*y_cur[IDX_CII]*y_cur[IDX_C6H6I] + + k[1331]*y_cur[IDX_CII]*y_cur[IDX_C6HI] + + k[1333]*y_cur[IDX_CII]*y_cur[IDX_C7H2I] + + k[1334]*y_cur[IDX_CII]*y_cur[IDX_C7HI] + + k[1336]*y_cur[IDX_CII]*y_cur[IDX_C8H2I] + + k[1337]*y_cur[IDX_CII]*y_cur[IDX_C8HI] + + k[1339]*y_cur[IDX_CII]*y_cur[IDX_C9H2I] + + k[1340]*y_cur[IDX_CII]*y_cur[IDX_C9HI] + + k[1342]*y_cur[IDX_CII]*y_cur[IDX_CH2I] + + k[1347]*y_cur[IDX_CII]*y_cur[IDX_CH2CCHI] + + k[1350]*y_cur[IDX_CII]*y_cur[IDX_CH2CHCNI] + + k[1353]*y_cur[IDX_CII]*y_cur[IDX_CH3I] + + k[1358]*y_cur[IDX_CII]*y_cur[IDX_CH3C4HI] + + k[1372]*y_cur[IDX_CII]*y_cur[IDX_C2H6I] + + k[1377]*y_cur[IDX_CII]*y_cur[IDX_CH3CHCH2I] + + k[1384]*y_cur[IDX_CII]*y_cur[IDX_CH4I] + + k[1385]*y_cur[IDX_CII]*y_cur[IDX_CHI] + + k[1389]*y_cur[IDX_CII]*y_cur[IDX_H2CCCI] + + k[1393]*y_cur[IDX_CII]*y_cur[IDX_H2OI] + + k[1394]*y_cur[IDX_CII]*y_cur[IDX_H2OI] + + k[1395]*y_cur[IDX_CII]*y_cur[IDX_H2SI] + + k[1401]*y_cur[IDX_CII]*y_cur[IDX_HC3NI] + + k[1403]*y_cur[IDX_CII]*y_cur[IDX_C4H2I] + + k[1407]*y_cur[IDX_CII]*y_cur[IDX_HCNI] + + k[1409]*y_cur[IDX_CII]*y_cur[IDX_HCPI] + + k[1410]*y_cur[IDX_CII]*y_cur[IDX_HCSiI] + + k[1411]*y_cur[IDX_CII]*y_cur[IDX_HClI] + + k[1412]*y_cur[IDX_CII]*y_cur[IDX_HFI] + + k[1413]*y_cur[IDX_CII]*y_cur[IDX_HNCI] + + k[1414]*y_cur[IDX_CII]*y_cur[IDX_HNSiI] + + k[1415]*y_cur[IDX_CII]*y_cur[IDX_HSI] + + k[1417]*y_cur[IDX_CII]*y_cur[IDX_NH2I] + + k[1418]*y_cur[IDX_CII]*y_cur[IDX_NH3I] + + k[1420]*y_cur[IDX_CII]*y_cur[IDX_NHI] + + k[1426]*y_cur[IDX_CII]*y_cur[IDX_OHI] + + k[1431]*y_cur[IDX_CII]*y_cur[IDX_SiC2H2I] + + k[1432]*y_cur[IDX_CII]*y_cur[IDX_SiC2HI] + + k[1433]*y_cur[IDX_CII]*y_cur[IDX_SiC3HI] + + k[1436]*y_cur[IDX_CII]*y_cur[IDX_SiCH2I] + + k[1438]*y_cur[IDX_CII]*y_cur[IDX_SiCH3I] + + k[1439]*y_cur[IDX_CII]*y_cur[IDX_SiH2I] + + k[1442]*y_cur[IDX_CII]*y_cur[IDX_SiH3I] + + k[1444]*y_cur[IDX_CII]*y_cur[IDX_SiH4I] + + k[1445]*y_cur[IDX_CII]*y_cur[IDX_SiHI] + + k[1452]*y_cur[IDX_C2II]*y_cur[IDX_C2H2I] + + k[1453]*y_cur[IDX_C2II]*y_cur[IDX_HCNI] + + k[1466]*y_cur[IDX_C2HII]*y_cur[IDX_C2H2I] + + k[1467]*y_cur[IDX_C2HII]*y_cur[IDX_CNI] + + k[1473]*y_cur[IDX_C2HII]*y_cur[IDX_HC3NI] + + k[1475]*y_cur[IDX_C2HII]*y_cur[IDX_HCNI] + + k[1480]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H2I] + + k[1483]*y_cur[IDX_C2H2II]*y_cur[IDX_C2H4I] + + k[1486]*y_cur[IDX_C2H2II]*y_cur[IDX_C3H2I] + + k[1488]*y_cur[IDX_C2H2II]*y_cur[IDX_C3HI] + + k[1490]*y_cur[IDX_C2H2II]*y_cur[IDX_C4HI] + + k[1492]*y_cur[IDX_C2H2II]*y_cur[IDX_C5H2I] + + k[1494]*y_cur[IDX_C2H2II]*y_cur[IDX_C5HI] + + k[1496]*y_cur[IDX_C2H2II]*y_cur[IDX_C6H2I] + + k[1498]*y_cur[IDX_C2H2II]*y_cur[IDX_C6HI] + + k[1500]*y_cur[IDX_C2H2II]*y_cur[IDX_C7H2I] + + k[1502]*y_cur[IDX_C2H2II]*y_cur[IDX_C7HI] + + k[1504]*y_cur[IDX_C2H2II]*y_cur[IDX_C8H2I] + + k[1506]*y_cur[IDX_C2H2II]*y_cur[IDX_C8HI] + + k[1508]*y_cur[IDX_C2H2II]*y_cur[IDX_CH2CCHI] + + k[1509]*y_cur[IDX_C2H2II]*y_cur[IDX_CH3CCHI] + + k[1517]*y_cur[IDX_C2H2II]*y_cur[IDX_H2CCCI] + + k[1521]*y_cur[IDX_C2H2II]*y_cur[IDX_C4H2I] + + k[1522]*y_cur[IDX_C2H2II]*y_cur[IDX_HCNI] + + k[1526]*y_cur[IDX_C2H2II]*y_cur[IDX_PI] + + k[1528]*y_cur[IDX_C2H2II]*y_cur[IDX_SI] + + k[1530]*y_cur[IDX_C2H2II]*y_cur[IDX_SiI] + + k[1537]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H4II] + + k[1541]*y_cur[IDX_C2H2I]*y_cur[IDX_C2NII] + + k[1543]*y_cur[IDX_C2H2I]*y_cur[IDX_C3II] + + k[1544]*y_cur[IDX_C2H2I]*y_cur[IDX_C3HII] + + k[1545]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H2II] + + k[1547]*y_cur[IDX_C2H2I]*y_cur[IDX_C3H4II] + + k[1550]*y_cur[IDX_C2H2I]*y_cur[IDX_C4II] + + k[1551]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HII] + + k[1552]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H2II] + + k[1554]*y_cur[IDX_C2H2I]*y_cur[IDX_C4H4II] + + k[1556]*y_cur[IDX_C2H2I]*y_cur[IDX_C5II] + + k[1558]*y_cur[IDX_C2H2I]*y_cur[IDX_C6II] + + k[1559]*y_cur[IDX_C2H2I]*y_cur[IDX_C6HII] + + k[1561]*y_cur[IDX_C2H2I]*y_cur[IDX_C7H2II] + + k[1564]*y_cur[IDX_C2H2I]*y_cur[IDX_C2H6II] + + k[1569]*y_cur[IDX_C2H2I]*y_cur[IDX_PII] + + k[1570]*y_cur[IDX_C2H2I]*y_cur[IDX_PHII] + + k[1573]*y_cur[IDX_C2H2I]*y_cur[IDX_SII] + + k[1574]*y_cur[IDX_C2H2I]*y_cur[IDX_SiII] + + k[1575]*y_cur[IDX_C2H2I]*y_cur[IDX_SiC2II] + + k[1582]*y_cur[IDX_C2H3II]*y_cur[IDX_C3H2I] + + k[1585]*y_cur[IDX_C2H3II]*y_cur[IDX_C3HI] + + k[1588]*y_cur[IDX_C2H3II]*y_cur[IDX_C4HI] + + k[1591]*y_cur[IDX_C2H3II]*y_cur[IDX_C5H2I] + + k[1594]*y_cur[IDX_C2H3II]*y_cur[IDX_C5HI] + + k[1597]*y_cur[IDX_C2H3II]*y_cur[IDX_C6H2I] + + k[1601]*y_cur[IDX_C2H3II]*y_cur[IDX_C6HI] + + k[1604]*y_cur[IDX_C2H3II]*y_cur[IDX_C7H2I] + + k[1607]*y_cur[IDX_C2H3II]*y_cur[IDX_C7HI] + + k[1609]*y_cur[IDX_C2H3II]*y_cur[IDX_CH2CCHI] + + k[1618]*y_cur[IDX_C2H3II]*y_cur[IDX_H2CCCI] + + k[1623]*y_cur[IDX_C2H3II]*y_cur[IDX_C4H2I] + + k[1627]*y_cur[IDX_C2H3II]*y_cur[IDX_SiI] + + k[1630]*y_cur[IDX_C2H3I]*y_cur[IDX_C3H2II] + + k[1632]*y_cur[IDX_C2H3I]*y_cur[IDX_C4HII] + + k[1634]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H2II] + + k[1636]*y_cur[IDX_C2H3I]*y_cur[IDX_C4H3II] + + k[1638]*y_cur[IDX_C2H3I]*y_cur[IDX_C5H2II] + + k[1640]*y_cur[IDX_C2H3I]*y_cur[IDX_C6H2II] + + k[1642]*y_cur[IDX_C2H3I]*y_cur[IDX_C7H2II] + + k[1646]*y_cur[IDX_C2H3I]*y_cur[IDX_SiII] + + k[1648]*y_cur[IDX_C2H4II]*y_cur[IDX_C2H4I] + + k[1650]*y_cur[IDX_C2H4II]*y_cur[IDX_C3H2I] + + k[1652]*y_cur[IDX_C2H4II]*y_cur[IDX_C3HI] + + k[1654]*y_cur[IDX_C2H4II]*y_cur[IDX_C4HI] + + k[1656]*y_cur[IDX_C2H4II]*y_cur[IDX_C5H2I] + + k[1658]*y_cur[IDX_C2H4II]*y_cur[IDX_C5HI] + + k[1662]*y_cur[IDX_C2H4II]*y_cur[IDX_C6HI] + + k[1666]*y_cur[IDX_C2H4II]*y_cur[IDX_C7HI] + + k[1673]*y_cur[IDX_C2H4II]*y_cur[IDX_H2CCCI] + + k[1679]*y_cur[IDX_C2H4II]*y_cur[IDX_SI] + + k[1681]*y_cur[IDX_C2H4II]*y_cur[IDX_SiI] + + k[1688]*y_cur[IDX_C2H4I]*y_cur[IDX_C3II] + + k[1692]*y_cur[IDX_C2H4I]*y_cur[IDX_C3H2II] + + k[1695]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HII] + + k[1697]*y_cur[IDX_C2H4I]*y_cur[IDX_C4H2II] + + k[1700]*y_cur[IDX_C2H4I]*y_cur[IDX_C5II] + + k[1702]*y_cur[IDX_C2H4I]*y_cur[IDX_C5H2II] + + k[1716]*y_cur[IDX_C2H4I]*y_cur[IDX_SII] + + k[1718]*y_cur[IDX_C2H4I]*y_cur[IDX_SiII] + + k[1725]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2II] + + k[1728]*y_cur[IDX_C2HI]*y_cur[IDX_C2H3II] + + k[1731]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2II] + + k[1733]*y_cur[IDX_C2HI]*y_cur[IDX_C3H3II] + + k[1735]*y_cur[IDX_C2HI]*y_cur[IDX_C4HII] + + k[1736]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2II] + + k[1737]*y_cur[IDX_C2HI]*y_cur[IDX_C4H3II] + + k[1738]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2II] + + k[1739]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2II] + + k[1740]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2II] + + k[1742]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCHII] + + k[1750]*y_cur[IDX_C2HI]*y_cur[IDX_SII] + + k[1751]*y_cur[IDX_C2HI]*y_cur[IDX_SiII] + + k[1756]*y_cur[IDX_C3HII]*y_cur[IDX_OCSI] + + k[1760]*y_cur[IDX_C3H2II]*y_cur[IDX_C3H2I] + + k[1762]*y_cur[IDX_C3H2II]*y_cur[IDX_C4HI] + + k[1764]*y_cur[IDX_C3H2II]*y_cur[IDX_C5H2I] + + k[1766]*y_cur[IDX_C3H2II]*y_cur[IDX_C5HI] + + k[1768]*y_cur[IDX_C3H2II]*y_cur[IDX_C6H2I] + + k[1770]*y_cur[IDX_C3H2II]*y_cur[IDX_C6HI] + + k[1775]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCH2I] + + k[1776]*y_cur[IDX_C3H2II]*y_cur[IDX_CH2CCHI] + + k[1781]*y_cur[IDX_C3H2II]*y_cur[IDX_CH3CCHI] + + k[1783]*y_cur[IDX_C3H2II]*y_cur[IDX_H2CCCI] + + k[1785]*y_cur[IDX_C3H2II]*y_cur[IDX_C4H2I] + + k[1787]*y_cur[IDX_C3H2I]*y_cur[IDX_C3H3II] + + k[1788]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H2II] + + k[1789]*y_cur[IDX_C3H2I]*y_cur[IDX_C4H3II] + + k[1791]*y_cur[IDX_C3H2I]*y_cur[IDX_C5H2II] + + k[1793]*y_cur[IDX_C3H2I]*y_cur[IDX_C6H2II] + + k[1795]*y_cur[IDX_C3H2I]*y_cur[IDX_CH2CCHII] + + k[1797]*y_cur[IDX_C3H3II]*y_cur[IDX_C4HI] + + k[1799]*y_cur[IDX_C3H3II]*y_cur[IDX_C5H2I] + + k[1801]*y_cur[IDX_C3H3II]*y_cur[IDX_C5HI] + + k[1804]*y_cur[IDX_C3H3II]*y_cur[IDX_C6HI] + + k[1806]*y_cur[IDX_C3H3II]*y_cur[IDX_CH2CCHI] + + k[1809]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + + k[1810]*y_cur[IDX_C3H4II]*y_cur[IDX_CH2CCH2I] + + k[1812]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + + k[1813]*y_cur[IDX_C3H4II]*y_cur[IDX_CH3CCHI] + + k[1819]*y_cur[IDX_C3HI]*y_cur[IDX_C3H2II] + + k[1821]*y_cur[IDX_C3HI]*y_cur[IDX_C3H3II] + + k[1823]*y_cur[IDX_C3HI]*y_cur[IDX_C4HII] + + k[1824]*y_cur[IDX_C3HI]*y_cur[IDX_C4H2II] + + k[1825]*y_cur[IDX_C3HI]*y_cur[IDX_C4H3II] + + k[1826]*y_cur[IDX_C3HI]*y_cur[IDX_C5H2II] + + k[1827]*y_cur[IDX_C3HI]*y_cur[IDX_C6H2II] + + k[1829]*y_cur[IDX_C3HI]*y_cur[IDX_CH2CCHII] + + k[1831]*y_cur[IDX_C4HII]*y_cur[IDX_C4HI] + + k[1832]*y_cur[IDX_C4HII]*y_cur[IDX_C5H2I] + + k[1833]*y_cur[IDX_C4HII]*y_cur[IDX_C5HI] + + k[1834]*y_cur[IDX_C4HII]*y_cur[IDX_C4H2I] + + k[1835]*y_cur[IDX_C4H2II]*y_cur[IDX_C5H2I] + + k[1836]*y_cur[IDX_C4H2II]*y_cur[IDX_C5HI] + + k[1838]*y_cur[IDX_C4H2II]*y_cur[IDX_C4H2I] + + k[1840]*y_cur[IDX_C4H3II]*y_cur[IDX_C5H2I] + + k[1841]*y_cur[IDX_C4H3II]*y_cur[IDX_C5HI] + + k[1843]*y_cur[IDX_C4HI]*y_cur[IDX_C4H2II] + + k[1844]*y_cur[IDX_C4HI]*y_cur[IDX_C4H3II] + + k[1845]*y_cur[IDX_C4HI]*y_cur[IDX_C5H2II] + + k[1846]*y_cur[IDX_CI]*y_cur[IDX_C10HII] + + k[1849]*y_cur[IDX_CI]*y_cur[IDX_C2HII] + + k[1850]*y_cur[IDX_CI]*y_cur[IDX_C2H2II] + + k[1852]*y_cur[IDX_CI]*y_cur[IDX_C2H3II] + + k[1854]*y_cur[IDX_CI]*y_cur[IDX_C2H4II] + + k[1856]*y_cur[IDX_CI]*y_cur[IDX_C3H2II] + + k[1858]*y_cur[IDX_CI]*y_cur[IDX_C3H3II] + + k[1860]*y_cur[IDX_CI]*y_cur[IDX_C3H4II] + + k[1862]*y_cur[IDX_CI]*y_cur[IDX_C4HII] + + k[1864]*y_cur[IDX_CI]*y_cur[IDX_C4H2II] + + k[1866]*y_cur[IDX_CI]*y_cur[IDX_C4H3II] + + k[1867]*y_cur[IDX_CI]*y_cur[IDX_C5HII] + + k[1869]*y_cur[IDX_CI]*y_cur[IDX_C5H2II] + + k[1871]*y_cur[IDX_CI]*y_cur[IDX_C5H3II] + + k[1873]*y_cur[IDX_CI]*y_cur[IDX_C6H2II] + + k[1875]*y_cur[IDX_CI]*y_cur[IDX_C6H3II] + + k[1876]*y_cur[IDX_CI]*y_cur[IDX_C7HII] + + k[1878]*y_cur[IDX_CI]*y_cur[IDX_C7H2II] + + k[1880]*y_cur[IDX_CI]*y_cur[IDX_C7H3II] + + k[1882]*y_cur[IDX_CI]*y_cur[IDX_C8H2II] + + k[1884]*y_cur[IDX_CI]*y_cur[IDX_C8H3II] + + k[1885]*y_cur[IDX_CI]*y_cur[IDX_C9HII] + + k[1887]*y_cur[IDX_CI]*y_cur[IDX_C9H2II] + + k[1889]*y_cur[IDX_CI]*y_cur[IDX_C9H3II] + + k[1890]*y_cur[IDX_CI]*y_cur[IDX_CHII] + + k[1891]*y_cur[IDX_CI]*y_cur[IDX_CH2II] + + k[1893]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHII] + + k[1895]*y_cur[IDX_CI]*y_cur[IDX_CH3C3NHII] + + k[1896]*y_cur[IDX_CI]*y_cur[IDX_CH3C5NHII] + + k[1897]*y_cur[IDX_CI]*y_cur[IDX_CH3C7NHII] + + k[1900]*y_cur[IDX_CI]*y_cur[IDX_H2SII] + + k[1902]*y_cur[IDX_CI]*y_cur[IDX_HC2SII] + + k[1906]*y_cur[IDX_CI]*y_cur[IDX_HCPII] + + k[1908]*y_cur[IDX_CI]*y_cur[IDX_HSII] + + k[1915]*y_cur[IDX_CI]*y_cur[IDX_SiC2HII] + + k[1916]*y_cur[IDX_CI]*y_cur[IDX_SiC2H2II] + + k[1917]*y_cur[IDX_CI]*y_cur[IDX_SiC2H3II] + + k[1918]*y_cur[IDX_CI]*y_cur[IDX_SiC3HII] + + k[1919]*y_cur[IDX_CI]*y_cur[IDX_SiC3H2II] + + k[1922]*y_cur[IDX_CI]*y_cur[IDX_SiCH2II] + + k[1923]*y_cur[IDX_CI]*y_cur[IDX_SiCH3II] + + k[1924]*y_cur[IDX_CI]*y_cur[IDX_SiCH4II] + + k[1925]*y_cur[IDX_CI]*y_cur[IDX_SiHII] + + k[1926]*y_cur[IDX_CI]*y_cur[IDX_SiH2II] + + k[1927]*y_cur[IDX_CI]*y_cur[IDX_SiH3II] + + k[1929]*y_cur[IDX_CI]*y_cur[IDX_SiH5II] + + k[1931]*y_cur[IDX_CI]*y_cur[IDX_SiNH2II] + + k[1933]*y_cur[IDX_CHII]*y_cur[IDX_C2I] + + k[1934]*y_cur[IDX_CHII]*y_cur[IDX_C2H2I] + + k[1940]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + + k[1942]*y_cur[IDX_CHII]*y_cur[IDX_CH4I] + + k[1944]*y_cur[IDX_CHII]*y_cur[IDX_CNI] + + k[1945]*y_cur[IDX_CHII]*y_cur[IDX_CNI] + + k[1947]*y_cur[IDX_CHII]*y_cur[IDX_H2COI] + + k[1951]*y_cur[IDX_CHII]*y_cur[IDX_H2OI] + + k[1957]*y_cur[IDX_CHII]*y_cur[IDX_HCNI] + + k[1961]*y_cur[IDX_CHII]*y_cur[IDX_NI] + + k[1969]*y_cur[IDX_CHII]*y_cur[IDX_OI] + + k[1973]*y_cur[IDX_CHII]*y_cur[IDX_SI] + + k[1975]*y_cur[IDX_CH2II]*y_cur[IDX_C2HI] + + k[1977]*y_cur[IDX_CH2II]*y_cur[IDX_CH4I] + + k[1980]*y_cur[IDX_CH2II]*y_cur[IDX_H2COI] + + k[1982]*y_cur[IDX_CH2II]*y_cur[IDX_H2OI] + + k[1983]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + + k[1985]*y_cur[IDX_CH2II]*y_cur[IDX_H2SI] + + k[1986]*y_cur[IDX_CH2II]*y_cur[IDX_HCNI] + + k[1988]*y_cur[IDX_CH2II]*y_cur[IDX_NH3I] + + k[1991]*y_cur[IDX_CH2II]*y_cur[IDX_OI] + + k[1994]*y_cur[IDX_CH2II]*y_cur[IDX_SI] + + k[1995]*y_cur[IDX_CH2I]*y_cur[IDX_C2II] + + k[1997]*y_cur[IDX_CH2I]*y_cur[IDX_C2HII] + + k[1998]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2II] + + k[2017]*y_cur[IDX_CH2I]*y_cur[IDX_SII] + + k[2018]*y_cur[IDX_CH2I]*y_cur[IDX_SiII] + + k[2021]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C4HI] + + k[2023]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5H2I] + + k[2025]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C5HI] + + k[2028]*y_cur[IDX_CH2CCHII]*y_cur[IDX_C6HI] + + k[2030]*y_cur[IDX_CH2CCHII]*y_cur[IDX_CH2CCHI] + + k[2032]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4HII] + + k[2034]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H2II] + + k[2036]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C4H3II] + + k[2038]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C5H2II] + + k[2040]*y_cur[IDX_CH2CCHI]*y_cur[IDX_C6H2II] + + k[2043]*y_cur[IDX_CH3II]*y_cur[IDX_C2H3I] + + k[2049]*y_cur[IDX_CH3II]*y_cur[IDX_C2HI] + + k[2061]*y_cur[IDX_CH3II]*y_cur[IDX_CH2CCHI] + + k[2075]*y_cur[IDX_CH3II]*y_cur[IDX_CNI] + + k[2086]*y_cur[IDX_CH3II]*y_cur[IDX_NH2I] + + k[2090]*y_cur[IDX_CH3II]*y_cur[IDX_OI] + + k[2094]*y_cur[IDX_CH3II]*y_cur[IDX_PI] + + k[2098]*y_cur[IDX_CH3II]*y_cur[IDX_SiI] + + k[2101]*y_cur[IDX_CH3I]*y_cur[IDX_SII] + + k[2103]*y_cur[IDX_CH3I]*y_cur[IDX_SiII] + + k[2105]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HII] + + k[2106]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4H2II] + + k[2118]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] + + k[2119]*y_cur[IDX_CH3COCH3II]*y_cur[IDX_CH3CHCH2I] + + k[2134]*y_cur[IDX_CH4II]*y_cur[IDX_C2H2I] + + k[2148]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + + k[2150]*y_cur[IDX_CH4I]*y_cur[IDX_C2II] + + k[2152]*y_cur[IDX_CH4I]*y_cur[IDX_C2HII] + + k[2155]*y_cur[IDX_CH4I]*y_cur[IDX_C2H2II] + + k[2159]*y_cur[IDX_CH4I]*y_cur[IDX_C3II] + + k[2167]*y_cur[IDX_CH4I]*y_cur[IDX_C4II] + + k[2169]*y_cur[IDX_CH4I]*y_cur[IDX_C4H2II] + + k[2179]*y_cur[IDX_CH4I]*y_cur[IDX_C5II] + + k[2181]*y_cur[IDX_CH4I]*y_cur[IDX_C5H2II] + + k[2184]*y_cur[IDX_CH4I]*y_cur[IDX_C6II] + + k[2186]*y_cur[IDX_CH4I]*y_cur[IDX_C6H2II] + + k[2189]*y_cur[IDX_CH4I]*y_cur[IDX_COII] + + k[2193]*y_cur[IDX_CH4I]*y_cur[IDX_H2COII] + + k[2205]*y_cur[IDX_CH4I]*y_cur[IDX_N2II] + + k[2208]*y_cur[IDX_CH4I]*y_cur[IDX_O2II] + + k[2213]*y_cur[IDX_CH4I]*y_cur[IDX_PHII] + + k[2215]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + + k[2216]*y_cur[IDX_CH4I]*y_cur[IDX_SII] + + k[2233]*y_cur[IDX_CH5II]*y_cur[IDX_MgI] + + k[2237]*y_cur[IDX_CH5II]*y_cur[IDX_SiI] + + k[2239]*y_cur[IDX_CHI]*y_cur[IDX_C2II] + + k[2241]*y_cur[IDX_CHI]*y_cur[IDX_C2HII] + + k[2242]*y_cur[IDX_CHI]*y_cur[IDX_C2H2II] + + k[2256]*y_cur[IDX_CHI]*y_cur[IDX_NII] + + k[2261]*y_cur[IDX_CHI]*y_cur[IDX_OII] + + k[2265]*y_cur[IDX_CHI]*y_cur[IDX_SII] + + k[2266]*y_cur[IDX_CHI]*y_cur[IDX_SiII] + + k[2272]*y_cur[IDX_CNII]*y_cur[IDX_HCNI] + + k[2277]*y_cur[IDX_CNI]*y_cur[IDX_C2H2II] + + k[2296]*y_cur[IDX_HII]*y_cur[IDX_C2H4I] + + k[2319]*y_cur[IDX_HII]*y_cur[IDX_CH2PHI] + + k[2327]*y_cur[IDX_HII]*y_cur[IDX_C2H6I] + + k[2336]*y_cur[IDX_HII]*y_cur[IDX_H2CCCI] + + k[2337]*y_cur[IDX_HII]*y_cur[IDX_H2COI] + + k[2340]*y_cur[IDX_HII]*y_cur[IDX_H2SI] + + k[2369]*y_cur[IDX_H2II]*y_cur[IDX_C2I] + + k[2370]*y_cur[IDX_H2II]*y_cur[IDX_C2H2I] + + k[2372]*y_cur[IDX_H2II]*y_cur[IDX_C2H4I] + + k[2373]*y_cur[IDX_H2II]*y_cur[IDX_C2HI] + + k[2374]*y_cur[IDX_H2II]*y_cur[IDX_CI] + + k[2375]*y_cur[IDX_H2II]*y_cur[IDX_CH2I] + + k[2377]*y_cur[IDX_H2II]*y_cur[IDX_C2H6I] + + k[2378]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + + k[2379]*y_cur[IDX_H2II]*y_cur[IDX_CH4I] + + k[2380]*y_cur[IDX_H2II]*y_cur[IDX_CHI] + + k[2381]*y_cur[IDX_H2II]*y_cur[IDX_CNI] + + k[2382]*y_cur[IDX_H2II]*y_cur[IDX_CO2I] + + k[2383]*y_cur[IDX_H2II]*y_cur[IDX_COI] + + k[2384]*y_cur[IDX_H2II]*y_cur[IDX_H2I] + + k[2385]*y_cur[IDX_H2II]*y_cur[IDX_H2COI] + + k[2386]*y_cur[IDX_H2II]*y_cur[IDX_H2OI] + + k[2387]*y_cur[IDX_H2II]*y_cur[IDX_H2SI] + + k[2390]*y_cur[IDX_H2II]*y_cur[IDX_HeI] + + k[2391]*y_cur[IDX_H2II]*y_cur[IDX_N2I] + + k[2392]*y_cur[IDX_H2II]*y_cur[IDX_NI] + + k[2393]*y_cur[IDX_H2II]*y_cur[IDX_NHI] + + k[2394]*y_cur[IDX_H2II]*y_cur[IDX_NOI] + + k[2395]*y_cur[IDX_H2II]*y_cur[IDX_O2I] + + k[2396]*y_cur[IDX_H2II]*y_cur[IDX_OI] + + k[2397]*y_cur[IDX_H2II]*y_cur[IDX_OHI] + + k[2398]*y_cur[IDX_H2I]*y_cur[IDX_CII] + + k[2399]*y_cur[IDX_H2I]*y_cur[IDX_C10II] + + k[2400]*y_cur[IDX_H2I]*y_cur[IDX_C10HII] + + k[2401]*y_cur[IDX_H2I]*y_cur[IDX_C2II] + + k[2402]*y_cur[IDX_H2I]*y_cur[IDX_C2HII] + + k[2403]*y_cur[IDX_H2I]*y_cur[IDX_C2H2II] + + k[2404]*y_cur[IDX_H2I]*y_cur[IDX_C2N2II] + + k[2405]*y_cur[IDX_H2I]*y_cur[IDX_C2SII] + + k[2406]*y_cur[IDX_H2I]*y_cur[IDX_C3II] + + k[2407]*y_cur[IDX_H2I]*y_cur[IDX_C3HII] + + k[2408]*y_cur[IDX_H2I]*y_cur[IDX_C3H2II] + + k[2409]*y_cur[IDX_H2I]*y_cur[IDX_C3NII] + + k[2410]*y_cur[IDX_H2I]*y_cur[IDX_C3OII] + + k[2411]*y_cur[IDX_H2I]*y_cur[IDX_C4II] + + k[2412]*y_cur[IDX_H2I]*y_cur[IDX_C4HII] + + k[2414]*y_cur[IDX_H2I]*y_cur[IDX_C5II] + + k[2415]*y_cur[IDX_H2I]*y_cur[IDX_C5HII] + + k[2416]*y_cur[IDX_H2I]*y_cur[IDX_C5NII] + + k[2417]*y_cur[IDX_H2I]*y_cur[IDX_C6II] + + k[2418]*y_cur[IDX_H2I]*y_cur[IDX_C6HII] + + k[2419]*y_cur[IDX_H2I]*y_cur[IDX_C7II] + + k[2420]*y_cur[IDX_H2I]*y_cur[IDX_C7HII] + + k[2421]*y_cur[IDX_H2I]*y_cur[IDX_C7NII] + + k[2422]*y_cur[IDX_H2I]*y_cur[IDX_C8II] + + k[2423]*y_cur[IDX_H2I]*y_cur[IDX_C8HII] + + k[2424]*y_cur[IDX_H2I]*y_cur[IDX_C9II] + + k[2425]*y_cur[IDX_H2I]*y_cur[IDX_C9HII] + + k[2426]*y_cur[IDX_H2I]*y_cur[IDX_C9NII] + + k[2427]*y_cur[IDX_H2I]*y_cur[IDX_CHII] + + k[2428]*y_cur[IDX_H2I]*y_cur[IDX_CH2II] + + k[2429]*y_cur[IDX_H2I]*y_cur[IDX_CH2CHCNII] + + k[2430]*y_cur[IDX_H2I]*y_cur[IDX_CH3C3NII] + + k[2431]*y_cur[IDX_H2I]*y_cur[IDX_CH3CNII] + + k[2432]*y_cur[IDX_H2I]*y_cur[IDX_CH4II] + + k[2433]*y_cur[IDX_H2I]*y_cur[IDX_CNII] + + k[2434]*y_cur[IDX_H2I]*y_cur[IDX_COII] + + k[2435]*y_cur[IDX_H2I]*y_cur[IDX_COII] + + k[2436]*y_cur[IDX_H2I]*y_cur[IDX_CO2II] + + k[2437]*y_cur[IDX_H2I]*y_cur[IDX_CPII] + + k[2438]*y_cur[IDX_H2I]*y_cur[IDX_CSII] + + k[2439]*y_cur[IDX_H2I]*y_cur[IDX_ClII] + + k[2440]*y_cur[IDX_H2I]*y_cur[IDX_FII] + + k[2441]*y_cur[IDX_H2I]*y_cur[IDX_H2C4NII] + + k[2442]*y_cur[IDX_H2I]*y_cur[IDX_H2OII] + + k[2443]*y_cur[IDX_H2I]*y_cur[IDX_H2SII] + + k[2444]*y_cur[IDX_H2I]*y_cur[IDX_HC3NII] + + k[2446]*y_cur[IDX_H2I]*y_cur[IDX_HC4NII] + + k[2447]*y_cur[IDX_H2I]*y_cur[IDX_HC5NII] + + k[2448]*y_cur[IDX_H2I]*y_cur[IDX_HC7NII] + + k[2449]*y_cur[IDX_H2I]*y_cur[IDX_HC9NII] + + k[2450]*y_cur[IDX_H2I]*y_cur[IDX_HCNII] + + k[2451]*y_cur[IDX_H2I]*y_cur[IDX_HCPII] + + k[2452]*y_cur[IDX_H2I]*y_cur[IDX_HCSiII] + + k[2453]*y_cur[IDX_H2I]*y_cur[IDX_HClII] + + k[2454]*y_cur[IDX_H2I]*y_cur[IDX_HFII] + + k[2455]*y_cur[IDX_H2I]*y_cur[IDX_HNSiII] + + k[2456]*y_cur[IDX_H2I]*y_cur[IDX_HSII] + + k[2457]*y_cur[IDX_H2I]*y_cur[IDX_HeII] + + k[2459]*y_cur[IDX_H2I]*y_cur[IDX_NII] + + k[2460]*y_cur[IDX_H2I]*y_cur[IDX_N2II] + + k[2462]*y_cur[IDX_H2I]*y_cur[IDX_NHII] + + k[2463]*y_cur[IDX_H2I]*y_cur[IDX_NH2II] + + k[2464]*y_cur[IDX_H2I]*y_cur[IDX_NH3II] + + k[2466]*y_cur[IDX_H2I]*y_cur[IDX_OII] + + k[2467]*y_cur[IDX_H2I]*y_cur[IDX_OM] + + k[2469]*y_cur[IDX_H2I]*y_cur[IDX_OHII] + + k[2470]*y_cur[IDX_H2I]*y_cur[IDX_SII] + + k[2471]*y_cur[IDX_H2I]*y_cur[IDX_SO2II] + + k[2472]*y_cur[IDX_H2I]*y_cur[IDX_SiCII] + + k[2473]*y_cur[IDX_H2I]*y_cur[IDX_SiC2II] + + k[2474]*y_cur[IDX_H2I]*y_cur[IDX_SiH4II] + + k[2475]*y_cur[IDX_H2I]*y_cur[IDX_SiOII] + + k[2477]*y_cur[IDX_H2CCCI]*y_cur[IDX_C3H3II] + + k[2478]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4HII] + + k[2479]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H2II] + + k[2480]*y_cur[IDX_H2CCCI]*y_cur[IDX_C4H3II] + + k[2482]*y_cur[IDX_H2CCCI]*y_cur[IDX_C5H2II] + + k[2484]*y_cur[IDX_H2CCCI]*y_cur[IDX_C6H2II] + + k[2486]*y_cur[IDX_H2CCCI]*y_cur[IDX_CH2CCHII] + + k[2498]*y_cur[IDX_H2COI]*y_cur[IDX_O2II] + + k[2517]*y_cur[IDX_H2OII]*y_cur[IDX_SI] + + k[2520]*y_cur[IDX_H2OI]*y_cur[IDX_C2II] + + k[2521]*y_cur[IDX_H2OI]*y_cur[IDX_C2HII] + + k[2538]*y_cur[IDX_H2OI]*y_cur[IDX_CNII] + + k[2562]*y_cur[IDX_H2OI]*y_cur[IDX_PII] + + k[2564]*y_cur[IDX_H2OI]*y_cur[IDX_PHII] + + k[2569]*y_cur[IDX_H2OI]*y_cur[IDX_SiII] + + k[2680]*y_cur[IDX_H3II]*y_cur[IDX_FeI] + + k[2717]*y_cur[IDX_H3II]*y_cur[IDX_MgI] + + k[2728]*y_cur[IDX_H3II]*y_cur[IDX_NaI] + + k[2730]*y_cur[IDX_H3II]*y_cur[IDX_OI] + + k[2814]*y_cur[IDX_H3OII]*y_cur[IDX_NaI] - + k[2827]*y_cur[IDX_HI]*y_cur[IDX_C2H3II] - + k[2828]*y_cur[IDX_HI]*y_cur[IDX_C2H4II] - + k[2829]*y_cur[IDX_HI]*y_cur[IDX_C2H5II] - + k[2830]*y_cur[IDX_HI]*y_cur[IDX_C2N2II] - + k[2831]*y_cur[IDX_HI]*y_cur[IDX_C3H2II] - + k[2832]*y_cur[IDX_HI]*y_cur[IDX_C3H4II] - + k[2833]*y_cur[IDX_HI]*y_cur[IDX_C3H7II] - + k[2834]*y_cur[IDX_HI]*y_cur[IDX_C6H6II] - + k[2835]*y_cur[IDX_HI]*y_cur[IDX_CHII] - + k[2836]*y_cur[IDX_HI]*y_cur[IDX_CH2II] - + k[2837]*y_cur[IDX_HI]*y_cur[IDX_CH3II] - + k[2838]*y_cur[IDX_HI]*y_cur[IDX_C2H6II] - + k[2839]*y_cur[IDX_HI]*y_cur[IDX_CH4II] - + k[2840]*y_cur[IDX_HI]*y_cur[IDX_CH5II] - + k[2841]*y_cur[IDX_HI]*y_cur[IDX_CO2II] - + k[2842]*y_cur[IDX_HI]*y_cur[IDX_H2SII] - + k[2843]*y_cur[IDX_HI]*y_cur[IDX_H3SII] - + k[2844]*y_cur[IDX_HI]*y_cur[IDX_HSII] - + k[2845]*y_cur[IDX_HI]*y_cur[IDX_HeHII] - + k[2846]*y_cur[IDX_HI]*y_cur[IDX_NO2II] - + k[2847]*y_cur[IDX_HI]*y_cur[IDX_SO2II] - + k[2848]*y_cur[IDX_HI]*y_cur[IDX_SiHII] - + k[2849]*y_cur[IDX_HI]*y_cur[IDX_SiSII] + + k[2868]*y_cur[IDX_HCNI]*y_cur[IDX_C3II] + + k[2870]*y_cur[IDX_HCNI]*y_cur[IDX_C4HII] + + k[2885]*y_cur[IDX_HCNI]*y_cur[IDX_SiII] + + k[2897]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] + + k[2898]*y_cur[IDX_HCNOII]*y_cur[IDX_H2I] + + k[3015]*y_cur[IDX_HFI]*y_cur[IDX_SiII] + + k[3019]*y_cur[IDX_HNC3I]*y_cur[IDX_CII] + + k[3023]*y_cur[IDX_HNC3I]*y_cur[IDX_HII] + + k[3034]*y_cur[IDX_HNC3I]*y_cur[IDX_HeII] + + k[3046]*y_cur[IDX_HNCI]*y_cur[IDX_SiII] + + k[3047]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] + + k[3048]*y_cur[IDX_HNCOII]*y_cur[IDX_H2I] + + k[3051]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] + + k[3052]*y_cur[IDX_HOCNII]*y_cur[IDX_H2I] + + k[3053]*y_cur[IDX_HONCII]*y_cur[IDX_H2I] + + k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3062]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3064]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3066]*y_cur[IDX_HeII]*y_cur[IDX_C10H2I] + + k[3069]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3072]*y_cur[IDX_HeII]*y_cur[IDX_C10HI] + + k[3075]*y_cur[IDX_HeII]*y_cur[IDX_C2H2I] + + k[3078]*y_cur[IDX_HeII]*y_cur[IDX_C2H3I] + + k[3079]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3081]*y_cur[IDX_HeII]*y_cur[IDX_C2H4I] + + k[3084]*y_cur[IDX_HeII]*y_cur[IDX_C2H5I] + + k[3086]*y_cur[IDX_HeII]*y_cur[IDX_C2HI] + + k[3096]*y_cur[IDX_HeII]*y_cur[IDX_C3H2I] + + k[3097]*y_cur[IDX_HeII]*y_cur[IDX_C3HI] + + k[3110]*y_cur[IDX_HeII]*y_cur[IDX_C4H3I] + + k[3112]*y_cur[IDX_HeII]*y_cur[IDX_C4HI] + + k[3121]*y_cur[IDX_HeII]*y_cur[IDX_C5H2I] + + k[3123]*y_cur[IDX_HeII]*y_cur[IDX_C5HI] + + k[3129]*y_cur[IDX_HeII]*y_cur[IDX_C6H2I] + + k[3131]*y_cur[IDX_HeII]*y_cur[IDX_C6H6I] + + k[3133]*y_cur[IDX_HeII]*y_cur[IDX_C6HI] + + k[3138]*y_cur[IDX_HeII]*y_cur[IDX_C7H2I] + + k[3140]*y_cur[IDX_HeII]*y_cur[IDX_C7HI] + + k[3146]*y_cur[IDX_HeII]*y_cur[IDX_C8H2I] + + k[3148]*y_cur[IDX_HeII]*y_cur[IDX_C8HI] + + k[3153]*y_cur[IDX_HeII]*y_cur[IDX_C9H2I] + + k[3155]*y_cur[IDX_HeII]*y_cur[IDX_C9HI] + + k[3161]*y_cur[IDX_HeII]*y_cur[IDX_CH2I] + + k[3162]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3164]*y_cur[IDX_HeII]*y_cur[IDX_CH2CCHI] + + k[3168]*y_cur[IDX_HeII]*y_cur[IDX_CH2CHCNI] + + k[3179]*y_cur[IDX_HeII]*y_cur[IDX_CH3C4HI] + + k[3182]*y_cur[IDX_HeII]*y_cur[IDX_CH3C6HI] + + k[3185]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3187]*y_cur[IDX_HeII]*y_cur[IDX_CH3CCHI] + + k[3189]*y_cur[IDX_HeII]*y_cur[IDX_C2H6I] + + k[3195]*y_cur[IDX_HeII]*y_cur[IDX_CH3OCH3I] + + k[3198]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3200]*y_cur[IDX_HeII]*y_cur[IDX_CH4I] + + k[3202]*y_cur[IDX_HeII]*y_cur[IDX_CHI] + + k[3218]*y_cur[IDX_HeII]*y_cur[IDX_H2CCCI] + + k[3220]*y_cur[IDX_HeII]*y_cur[IDX_H2COI] + + k[3225]*y_cur[IDX_HeII]*y_cur[IDX_H2OI] + + k[3228]*y_cur[IDX_HeII]*y_cur[IDX_H2S2I] + + k[3229]*y_cur[IDX_HeII]*y_cur[IDX_H2SI] + + k[3231]*y_cur[IDX_HeII]*y_cur[IDX_H2SiOI] + + k[3236]*y_cur[IDX_HeII]*y_cur[IDX_HC3NI] + + k[3240]*y_cur[IDX_HeII]*y_cur[IDX_C4H2I] + + k[3245]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3247]*y_cur[IDX_HeII]*y_cur[IDX_HCNI] + + k[3249]*y_cur[IDX_HeII]*y_cur[IDX_HCOI] + + k[3255]*y_cur[IDX_HeII]*y_cur[IDX_HCSI] + + k[3258]*y_cur[IDX_HeII]*y_cur[IDX_HCSiI] + + k[3259]*y_cur[IDX_HeII]*y_cur[IDX_HClI] + + k[3260]*y_cur[IDX_HeII]*y_cur[IDX_HFI] + + k[3261]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + + k[3262]*y_cur[IDX_HeII]*y_cur[IDX_HNCI] + + k[3264]*y_cur[IDX_HeII]*y_cur[IDX_HNCOI] + + k[3265]*y_cur[IDX_HeII]*y_cur[IDX_HNOI] + + k[3267]*y_cur[IDX_HeII]*y_cur[IDX_HNSiI] + + k[3268]*y_cur[IDX_HeII]*y_cur[IDX_HOCNI] + + k[3270]*y_cur[IDX_HeII]*y_cur[IDX_HPOI] + + k[3272]*y_cur[IDX_HeII]*y_cur[IDX_HS2I] + + k[3273]*y_cur[IDX_HeII]*y_cur[IDX_HSI] + + k[3281]*y_cur[IDX_HeII]*y_cur[IDX_NH2I] + + k[3284]*y_cur[IDX_HeII]*y_cur[IDX_NH3I] + + k[3285]*y_cur[IDX_HeII]*y_cur[IDX_NHI] + + k[3297]*y_cur[IDX_HeII]*y_cur[IDX_OHI] + + k[3299]*y_cur[IDX_HeII]*y_cur[IDX_PHI] + + k[3308]*y_cur[IDX_HeII]*y_cur[IDX_SiC2H2I] + + k[3311]*y_cur[IDX_HeII]*y_cur[IDX_SiC2HI] + + k[3314]*y_cur[IDX_HeII]*y_cur[IDX_SiC3HI] + + k[3318]*y_cur[IDX_HeII]*y_cur[IDX_SiCH2I] + + k[3320]*y_cur[IDX_HeII]*y_cur[IDX_SiCH3I] + + k[3323]*y_cur[IDX_HeII]*y_cur[IDX_SiH2I] + + k[3325]*y_cur[IDX_HeII]*y_cur[IDX_SiH3I] + + k[3327]*y_cur[IDX_HeII]*y_cur[IDX_SiH4I] + + k[3328]*y_cur[IDX_HeII]*y_cur[IDX_SiHI] + + k[3336]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3338]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3339]*y_cur[IDX_NII]*y_cur[IDX_CH3OHI] + + k[3340]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[3341]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[3342]*y_cur[IDX_NII]*y_cur[IDX_CH4I] + + k[3349]*y_cur[IDX_NII]*y_cur[IDX_H2SI] + + k[3355]*y_cur[IDX_NII]*y_cur[IDX_NHI] + + k[3361]*y_cur[IDX_N2II]*y_cur[IDX_H2COI] + + k[3362]*y_cur[IDX_N2II]*y_cur[IDX_H2SI] + + k[3385]*y_cur[IDX_NI]*y_cur[IDX_C2HII] + + k[3388]*y_cur[IDX_NI]*y_cur[IDX_C2H2II] + + k[3391]*y_cur[IDX_NI]*y_cur[IDX_C2H4II] + + k[3394]*y_cur[IDX_NI]*y_cur[IDX_C3HII] + + k[3406]*y_cur[IDX_NI]*y_cur[IDX_C4H2II] + + k[3408]*y_cur[IDX_NI]*y_cur[IDX_C4H5II] + + k[3412]*y_cur[IDX_NI]*y_cur[IDX_C5HII] + + k[3415]*y_cur[IDX_NI]*y_cur[IDX_C5H2II] + + k[3416]*y_cur[IDX_NI]*y_cur[IDX_C5H3II] + + k[3429]*y_cur[IDX_NI]*y_cur[IDX_C7HII] + + k[3432]*y_cur[IDX_NI]*y_cur[IDX_C7H2II] + + k[3433]*y_cur[IDX_NI]*y_cur[IDX_C7H3II] + + k[3434]*y_cur[IDX_NI]*y_cur[IDX_C7H4II] + + k[3446]*y_cur[IDX_NI]*y_cur[IDX_C9HII] + + k[3449]*y_cur[IDX_NI]*y_cur[IDX_C9H2II] + + k[3450]*y_cur[IDX_NI]*y_cur[IDX_C9H3II] + + k[3451]*y_cur[IDX_NI]*y_cur[IDX_C9H4II] + + k[3452]*y_cur[IDX_NI]*y_cur[IDX_CH2II] + + k[3453]*y_cur[IDX_NI]*y_cur[IDX_CH2CCHII] + + k[3454]*y_cur[IDX_NI]*y_cur[IDX_CH3II] + + k[3455]*y_cur[IDX_NI]*y_cur[IDX_CH3C4HII] + + k[3457]*y_cur[IDX_NI]*y_cur[IDX_H2OII] + + k[3462]*y_cur[IDX_NI]*y_cur[IDX_HSII] + + k[3463]*y_cur[IDX_NI]*y_cur[IDX_NHII] + + k[3464]*y_cur[IDX_NI]*y_cur[IDX_NH2II] + + k[3466]*y_cur[IDX_NI]*y_cur[IDX_O2HII] + + k[3467]*y_cur[IDX_NI]*y_cur[IDX_OHII] + + k[3470]*y_cur[IDX_NI]*y_cur[IDX_SiCH2II] + + k[3471]*y_cur[IDX_NI]*y_cur[IDX_SiHII] + + k[3472]*y_cur[IDX_NI]*y_cur[IDX_SiH2II] + + k[3474]*y_cur[IDX_NI]*y_cur[IDX_SiH3II] + + k[3478]*y_cur[IDX_NHII]*y_cur[IDX_C2I] + + k[3486]*y_cur[IDX_NHII]*y_cur[IDX_COI] + + k[3506]*y_cur[IDX_NHII]*y_cur[IDX_SI] + + k[3526]*y_cur[IDX_NH2II]*y_cur[IDX_SI] + + k[3528]*y_cur[IDX_NH2I]*y_cur[IDX_C2II] + + k[3530]*y_cur[IDX_NH2I]*y_cur[IDX_C2HII] + + k[3532]*y_cur[IDX_NH2I]*y_cur[IDX_C2H2II] + + k[3595]*y_cur[IDX_NH3I]*y_cur[IDX_PII] + + k[3598]*y_cur[IDX_NH3I]*y_cur[IDX_PHII] + + k[3602]*y_cur[IDX_NH3I]*y_cur[IDX_SiII] + + k[3606]*y_cur[IDX_NHI]*y_cur[IDX_C2II] + + k[3607]*y_cur[IDX_NHI]*y_cur[IDX_C2H2II] + + k[3619]*y_cur[IDX_NHI]*y_cur[IDX_OII] + + k[3621]*y_cur[IDX_NHI]*y_cur[IDX_O2II] + + k[3624]*y_cur[IDX_NHI]*y_cur[IDX_SII] + + k[3625]*y_cur[IDX_NHI]*y_cur[IDX_SiII] + + k[3628]*y_cur[IDX_NaI]*y_cur[IDX_H3COII] + + k[3629]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] + + k[3630]*y_cur[IDX_NaI]*y_cur[IDX_HCNHII] + + k[3650]*y_cur[IDX_OII]*y_cur[IDX_OHI] + + k[3655]*y_cur[IDX_O2II]*y_cur[IDX_C2H2I] + + k[3662]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3663]*y_cur[IDX_O2II]*y_cur[IDX_CH3CHCH2I] + + k[3665]*y_cur[IDX_O2II]*y_cur[IDX_CH3OHI] + + k[3688]*y_cur[IDX_OI]*y_cur[IDX_C2H2II] + + k[3738]*y_cur[IDX_OI]*y_cur[IDX_HCSII] + + k[3740]*y_cur[IDX_OI]*y_cur[IDX_HNOII] + + k[3743]*y_cur[IDX_OI]*y_cur[IDX_HSII] + + k[3746]*y_cur[IDX_OI]*y_cur[IDX_NH2II] + + k[3750]*y_cur[IDX_OI]*y_cur[IDX_OHII] + + k[3751]*y_cur[IDX_OI]*y_cur[IDX_PHII] + + k[3756]*y_cur[IDX_OI]*y_cur[IDX_SiHII] + + k[3757]*y_cur[IDX_OI]*y_cur[IDX_SiH2II] + + k[3758]*y_cur[IDX_OI]*y_cur[IDX_SiH3II] + + k[3765]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + + k[3766]*y_cur[IDX_OCNII]*y_cur[IDX_H2I] + + k[3790]*y_cur[IDX_OHII]*y_cur[IDX_SI] + + k[3796]*y_cur[IDX_OHI]*y_cur[IDX_C2H2II] + + k[3802]*y_cur[IDX_OHI]*y_cur[IDX_HCOII] + + k[3807]*y_cur[IDX_OHI]*y_cur[IDX_PII] + + k[3808]*y_cur[IDX_OHI]*y_cur[IDX_SII] + + k[3809]*y_cur[IDX_OHI]*y_cur[IDX_SiII] + + k[3814]*y_cur[IDX_PI]*y_cur[IDX_C3H2II] + + k[3815]*y_cur[IDX_PI]*y_cur[IDX_C4H2II] + + k[3820]*y_cur[IDX_SII]*y_cur[IDX_C3H2I] + + k[3821]*y_cur[IDX_SII]*y_cur[IDX_C3HI] + + k[3822]*y_cur[IDX_SII]*y_cur[IDX_C4HI] + + k[3827]*y_cur[IDX_SII]*y_cur[IDX_H2CCCI] + + k[3828]*y_cur[IDX_SII]*y_cur[IDX_H2SI] + + k[3832]*y_cur[IDX_SII]*y_cur[IDX_C4H2I] + + k[3834]*y_cur[IDX_SI]*y_cur[IDX_C3H2II] + + k[3836]*y_cur[IDX_SI]*y_cur[IDX_C4H2II] + + k[3839]*y_cur[IDX_SI]*y_cur[IDX_H3SII] + + k[3855]*y_cur[IDX_SOII]*y_cur[IDX_CH2CCH2I] + + k[3860]*y_cur[IDX_SiII]*y_cur[IDX_C3H2I] + + k[3861]*y_cur[IDX_SiII]*y_cur[IDX_C3HI] + + k[3862]*y_cur[IDX_SiII]*y_cur[IDX_C4HI] + + k[3863]*y_cur[IDX_SiII]*y_cur[IDX_CH2CCHI] + + k[3868]*y_cur[IDX_SiII]*y_cur[IDX_H2CCCI] + + k[3872]*y_cur[IDX_SiI]*y_cur[IDX_C3HII] + + k[3874]*y_cur[IDX_SiI]*y_cur[IDX_C3H2II] + + k[3876]*y_cur[IDX_SiI]*y_cur[IDX_C3H3II] + + k[3878]*y_cur[IDX_SiI]*y_cur[IDX_C4H2II] + + k[3880]*y_cur[IDX_SiI]*y_cur[IDX_CH2CCHII] + + k[3883]*y_cur[IDX_SiH2II]*y_cur[IDX_SI] + + k[3885]*y_cur[IDX_SiHI]*y_cur[IDX_SII] + + k[3896]*y_cur[IDX_CM]*y_cur[IDX_HII] + + k[3899]*y_cur[IDX_CM]*y_cur[IDX_H3II] + + k[3900]*y_cur[IDX_CM]*y_cur[IDX_H3OII] + + k[3901]*y_cur[IDX_CM]*y_cur[IDX_HC2SII] + + k[3902]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + + k[3903]*y_cur[IDX_CM]*y_cur[IDX_HCNHII] + + k[3904]*y_cur[IDX_CM]*y_cur[IDX_HCOII] + + k[3909]*y_cur[IDX_CM]*y_cur[IDX_N2HII] + + k[3911]*y_cur[IDX_CM]*y_cur[IDX_NH4II] + + k[3919]*y_cur[IDX_CM]*y_cur[IDX_SiOHII] + + k[3931]*y_cur[IDX_C10M]*y_cur[IDX_HII] + + k[3934]*y_cur[IDX_C10M]*y_cur[IDX_H3II] + + k[3935]*y_cur[IDX_C10M]*y_cur[IDX_H3OII] + + k[3936]*y_cur[IDX_C10M]*y_cur[IDX_HC2SII] + + k[3937]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + + k[3938]*y_cur[IDX_C10M]*y_cur[IDX_HCNHII] + + k[3939]*y_cur[IDX_C10M]*y_cur[IDX_HCOII] + + k[3944]*y_cur[IDX_C10M]*y_cur[IDX_N2HII] + + k[3946]*y_cur[IDX_C10M]*y_cur[IDX_NH4II] + + k[3954]*y_cur[IDX_C10M]*y_cur[IDX_SiOHII] + + k[3966]*y_cur[IDX_C10HM]*y_cur[IDX_HII] + + k[3969]*y_cur[IDX_C10HM]*y_cur[IDX_H3II] + + k[3970]*y_cur[IDX_C10HM]*y_cur[IDX_H3OII] + + k[3971]*y_cur[IDX_C10HM]*y_cur[IDX_HC2SII] + + k[3972]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + + k[3973]*y_cur[IDX_C10HM]*y_cur[IDX_HCNHII] + + k[3974]*y_cur[IDX_C10HM]*y_cur[IDX_HCOII] + + k[3979]*y_cur[IDX_C10HM]*y_cur[IDX_N2HII] + + k[3981]*y_cur[IDX_C10HM]*y_cur[IDX_NH4II] + + k[3989]*y_cur[IDX_C10HM]*y_cur[IDX_SiOHII] + + k[4001]*y_cur[IDX_C2M]*y_cur[IDX_HII] + + k[4004]*y_cur[IDX_C2M]*y_cur[IDX_H3II] + + k[4005]*y_cur[IDX_C2M]*y_cur[IDX_H3OII] + + k[4006]*y_cur[IDX_C2M]*y_cur[IDX_HC2SII] + + k[4007]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + + k[4008]*y_cur[IDX_C2M]*y_cur[IDX_HCNHII] + + k[4009]*y_cur[IDX_C2M]*y_cur[IDX_HCOII] + + k[4014]*y_cur[IDX_C2M]*y_cur[IDX_N2HII] + + k[4016]*y_cur[IDX_C2M]*y_cur[IDX_NH4II] + + k[4024]*y_cur[IDX_C2M]*y_cur[IDX_SiOHII] + + k[4036]*y_cur[IDX_C2HM]*y_cur[IDX_HII] + + k[4039]*y_cur[IDX_C2HM]*y_cur[IDX_H3II] + + k[4040]*y_cur[IDX_C2HM]*y_cur[IDX_H3OII] + + k[4041]*y_cur[IDX_C2HM]*y_cur[IDX_HC2SII] + + k[4042]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + + k[4043]*y_cur[IDX_C2HM]*y_cur[IDX_HCNHII] + + k[4044]*y_cur[IDX_C2HM]*y_cur[IDX_HCOII] + + k[4049]*y_cur[IDX_C2HM]*y_cur[IDX_N2HII] + + k[4051]*y_cur[IDX_C2HM]*y_cur[IDX_NH4II] + + k[4059]*y_cur[IDX_C2HM]*y_cur[IDX_SiOHII] + + k[4071]*y_cur[IDX_C3M]*y_cur[IDX_HII] + + k[4074]*y_cur[IDX_C3M]*y_cur[IDX_H3II] + + k[4075]*y_cur[IDX_C3M]*y_cur[IDX_H3OII] + + k[4076]*y_cur[IDX_C3M]*y_cur[IDX_HC2SII] + + k[4077]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + + k[4078]*y_cur[IDX_C3M]*y_cur[IDX_HCNHII] + + k[4079]*y_cur[IDX_C3M]*y_cur[IDX_HCOII] + + k[4084]*y_cur[IDX_C3M]*y_cur[IDX_N2HII] + + k[4086]*y_cur[IDX_C3M]*y_cur[IDX_NH4II] + + k[4094]*y_cur[IDX_C3M]*y_cur[IDX_SiOHII] + + k[4106]*y_cur[IDX_C3HM]*y_cur[IDX_HII] + + k[4109]*y_cur[IDX_C3HM]*y_cur[IDX_H3II] + + k[4110]*y_cur[IDX_C3HM]*y_cur[IDX_H3OII] + + k[4111]*y_cur[IDX_C3HM]*y_cur[IDX_HC2SII] + + k[4112]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + + k[4113]*y_cur[IDX_C3HM]*y_cur[IDX_HCNHII] + + k[4114]*y_cur[IDX_C3HM]*y_cur[IDX_HCOII] + + k[4119]*y_cur[IDX_C3HM]*y_cur[IDX_N2HII] + + k[4121]*y_cur[IDX_C3HM]*y_cur[IDX_NH4II] + + k[4129]*y_cur[IDX_C3HM]*y_cur[IDX_SiOHII] + + k[4141]*y_cur[IDX_C3NM]*y_cur[IDX_HII] + + k[4144]*y_cur[IDX_C3NM]*y_cur[IDX_H3II] + + k[4145]*y_cur[IDX_C3NM]*y_cur[IDX_H3OII] + + k[4146]*y_cur[IDX_C3NM]*y_cur[IDX_HC2SII] + + k[4147]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + + k[4148]*y_cur[IDX_C3NM]*y_cur[IDX_HCNHII] + + k[4149]*y_cur[IDX_C3NM]*y_cur[IDX_HCOII] + + k[4154]*y_cur[IDX_C3NM]*y_cur[IDX_N2HII] + + k[4156]*y_cur[IDX_C3NM]*y_cur[IDX_NH4II] + + k[4164]*y_cur[IDX_C3NM]*y_cur[IDX_SiOHII] + + k[4176]*y_cur[IDX_C4M]*y_cur[IDX_HII] + + k[4179]*y_cur[IDX_C4M]*y_cur[IDX_H3II] + + k[4180]*y_cur[IDX_C4M]*y_cur[IDX_H3OII] + + k[4181]*y_cur[IDX_C4M]*y_cur[IDX_HC2SII] + + k[4182]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + + k[4183]*y_cur[IDX_C4M]*y_cur[IDX_HCNHII] + + k[4184]*y_cur[IDX_C4M]*y_cur[IDX_HCOII] + + k[4189]*y_cur[IDX_C4M]*y_cur[IDX_N2HII] + + k[4191]*y_cur[IDX_C4M]*y_cur[IDX_NH4II] + + k[4199]*y_cur[IDX_C4M]*y_cur[IDX_SiOHII] + + k[4211]*y_cur[IDX_C4HM]*y_cur[IDX_HII] + + k[4214]*y_cur[IDX_C4HM]*y_cur[IDX_H3II] + + k[4215]*y_cur[IDX_C4HM]*y_cur[IDX_H3OII] + + k[4216]*y_cur[IDX_C4HM]*y_cur[IDX_HC2SII] + + k[4217]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + + k[4218]*y_cur[IDX_C4HM]*y_cur[IDX_HCNHII] + + k[4219]*y_cur[IDX_C4HM]*y_cur[IDX_HCOII] + + k[4224]*y_cur[IDX_C4HM]*y_cur[IDX_N2HII] + + k[4226]*y_cur[IDX_C4HM]*y_cur[IDX_NH4II] + + k[4234]*y_cur[IDX_C4HM]*y_cur[IDX_SiOHII] + + k[4246]*y_cur[IDX_C5M]*y_cur[IDX_HII] + + k[4249]*y_cur[IDX_C5M]*y_cur[IDX_H3II] + + k[4250]*y_cur[IDX_C5M]*y_cur[IDX_H3OII] + + k[4251]*y_cur[IDX_C5M]*y_cur[IDX_HC2SII] + + k[4252]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + + k[4253]*y_cur[IDX_C5M]*y_cur[IDX_HCNHII] + + k[4254]*y_cur[IDX_C5M]*y_cur[IDX_HCOII] + + k[4259]*y_cur[IDX_C5M]*y_cur[IDX_N2HII] + + k[4261]*y_cur[IDX_C5M]*y_cur[IDX_NH4II] + + k[4269]*y_cur[IDX_C5M]*y_cur[IDX_SiOHII] + + k[4281]*y_cur[IDX_C5HM]*y_cur[IDX_HII] + + k[4284]*y_cur[IDX_C5HM]*y_cur[IDX_H3II] + + k[4285]*y_cur[IDX_C5HM]*y_cur[IDX_H3OII] + + k[4286]*y_cur[IDX_C5HM]*y_cur[IDX_HC2SII] + + k[4287]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + + k[4288]*y_cur[IDX_C5HM]*y_cur[IDX_HCNHII] + + k[4289]*y_cur[IDX_C5HM]*y_cur[IDX_HCOII] + + k[4294]*y_cur[IDX_C5HM]*y_cur[IDX_N2HII] + + k[4296]*y_cur[IDX_C5HM]*y_cur[IDX_NH4II] + + k[4304]*y_cur[IDX_C5HM]*y_cur[IDX_SiOHII] + + k[4316]*y_cur[IDX_C5NM]*y_cur[IDX_HII] + + k[4319]*y_cur[IDX_C5NM]*y_cur[IDX_H3II] + + k[4320]*y_cur[IDX_C5NM]*y_cur[IDX_H3OII] + + k[4321]*y_cur[IDX_C5NM]*y_cur[IDX_HC2SII] + + k[4322]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + + k[4323]*y_cur[IDX_C5NM]*y_cur[IDX_HCNHII] + + k[4324]*y_cur[IDX_C5NM]*y_cur[IDX_HCOII] + + k[4329]*y_cur[IDX_C5NM]*y_cur[IDX_N2HII] + + k[4331]*y_cur[IDX_C5NM]*y_cur[IDX_NH4II] + + k[4339]*y_cur[IDX_C5NM]*y_cur[IDX_SiOHII] + + k[4351]*y_cur[IDX_C6M]*y_cur[IDX_HII] + + k[4354]*y_cur[IDX_C6M]*y_cur[IDX_H3II] + + k[4355]*y_cur[IDX_C6M]*y_cur[IDX_H3OII] + + k[4356]*y_cur[IDX_C6M]*y_cur[IDX_HC2SII] + + k[4357]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + + k[4358]*y_cur[IDX_C6M]*y_cur[IDX_HCNHII] + + k[4359]*y_cur[IDX_C6M]*y_cur[IDX_HCOII] + + k[4364]*y_cur[IDX_C6M]*y_cur[IDX_N2HII] + + k[4366]*y_cur[IDX_C6M]*y_cur[IDX_NH4II] + + k[4374]*y_cur[IDX_C6M]*y_cur[IDX_SiOHII] + + k[4386]*y_cur[IDX_C6HM]*y_cur[IDX_HII] + + k[4389]*y_cur[IDX_C6HM]*y_cur[IDX_H3II] + + k[4390]*y_cur[IDX_C6HM]*y_cur[IDX_H3OII] + + k[4391]*y_cur[IDX_C6HM]*y_cur[IDX_HC2SII] + + k[4392]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + + k[4393]*y_cur[IDX_C6HM]*y_cur[IDX_HCNHII] + + k[4394]*y_cur[IDX_C6HM]*y_cur[IDX_HCOII] + + k[4399]*y_cur[IDX_C6HM]*y_cur[IDX_N2HII] + + k[4401]*y_cur[IDX_C6HM]*y_cur[IDX_NH4II] + + k[4409]*y_cur[IDX_C6HM]*y_cur[IDX_SiOHII] + + k[4421]*y_cur[IDX_C7M]*y_cur[IDX_HII] + + k[4424]*y_cur[IDX_C7M]*y_cur[IDX_H3II] + + k[4425]*y_cur[IDX_C7M]*y_cur[IDX_H3OII] + + k[4426]*y_cur[IDX_C7M]*y_cur[IDX_HC2SII] + + k[4427]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + + k[4428]*y_cur[IDX_C7M]*y_cur[IDX_HCNHII] + + k[4429]*y_cur[IDX_C7M]*y_cur[IDX_HCOII] + + k[4434]*y_cur[IDX_C7M]*y_cur[IDX_N2HII] + + k[4436]*y_cur[IDX_C7M]*y_cur[IDX_NH4II] + + k[4444]*y_cur[IDX_C7M]*y_cur[IDX_SiOHII] + + k[4456]*y_cur[IDX_C7HM]*y_cur[IDX_HII] + + k[4459]*y_cur[IDX_C7HM]*y_cur[IDX_H3II] + + k[4460]*y_cur[IDX_C7HM]*y_cur[IDX_H3OII] + + k[4461]*y_cur[IDX_C7HM]*y_cur[IDX_HC2SII] + + k[4462]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + + k[4463]*y_cur[IDX_C7HM]*y_cur[IDX_HCNHII] + + k[4464]*y_cur[IDX_C7HM]*y_cur[IDX_HCOII] + + k[4469]*y_cur[IDX_C7HM]*y_cur[IDX_N2HII] + + k[4471]*y_cur[IDX_C7HM]*y_cur[IDX_NH4II] + + k[4479]*y_cur[IDX_C7HM]*y_cur[IDX_SiOHII] + + k[4491]*y_cur[IDX_C8M]*y_cur[IDX_HII] + + k[4494]*y_cur[IDX_C8M]*y_cur[IDX_H3II] + + k[4495]*y_cur[IDX_C8M]*y_cur[IDX_H3OII] + + k[4496]*y_cur[IDX_C8M]*y_cur[IDX_HC2SII] + + k[4497]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + + k[4498]*y_cur[IDX_C8M]*y_cur[IDX_HCNHII] + + k[4499]*y_cur[IDX_C8M]*y_cur[IDX_HCOII] + + k[4504]*y_cur[IDX_C8M]*y_cur[IDX_N2HII] + + k[4506]*y_cur[IDX_C8M]*y_cur[IDX_NH4II] + + k[4514]*y_cur[IDX_C8M]*y_cur[IDX_SiOHII] + + k[4526]*y_cur[IDX_C8HM]*y_cur[IDX_HII] + + k[4529]*y_cur[IDX_C8HM]*y_cur[IDX_H3II] + + k[4530]*y_cur[IDX_C8HM]*y_cur[IDX_H3OII] + + k[4531]*y_cur[IDX_C8HM]*y_cur[IDX_HC2SII] + + k[4532]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + + k[4533]*y_cur[IDX_C8HM]*y_cur[IDX_HCNHII] + + k[4534]*y_cur[IDX_C8HM]*y_cur[IDX_HCOII] + + k[4539]*y_cur[IDX_C8HM]*y_cur[IDX_N2HII] + + k[4541]*y_cur[IDX_C8HM]*y_cur[IDX_NH4II] + + k[4549]*y_cur[IDX_C8HM]*y_cur[IDX_SiOHII] + + k[4561]*y_cur[IDX_C9M]*y_cur[IDX_HII] + + k[4564]*y_cur[IDX_C9M]*y_cur[IDX_H3II] + + k[4565]*y_cur[IDX_C9M]*y_cur[IDX_H3OII] + + k[4566]*y_cur[IDX_C9M]*y_cur[IDX_HC2SII] + + k[4567]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + + k[4568]*y_cur[IDX_C9M]*y_cur[IDX_HCNHII] + + k[4569]*y_cur[IDX_C9M]*y_cur[IDX_HCOII] + + k[4574]*y_cur[IDX_C9M]*y_cur[IDX_N2HII] + + k[4576]*y_cur[IDX_C9M]*y_cur[IDX_NH4II] + + k[4584]*y_cur[IDX_C9M]*y_cur[IDX_SiOHII] + + k[4596]*y_cur[IDX_C9HM]*y_cur[IDX_HII] + + k[4599]*y_cur[IDX_C9HM]*y_cur[IDX_H3II] + + k[4600]*y_cur[IDX_C9HM]*y_cur[IDX_H3OII] + + k[4601]*y_cur[IDX_C9HM]*y_cur[IDX_HC2SII] + + k[4602]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + + k[4603]*y_cur[IDX_C9HM]*y_cur[IDX_HCNHII] + + k[4604]*y_cur[IDX_C9HM]*y_cur[IDX_HCOII] + + k[4609]*y_cur[IDX_C9HM]*y_cur[IDX_N2HII] + + k[4611]*y_cur[IDX_C9HM]*y_cur[IDX_NH4II] + + k[4619]*y_cur[IDX_C9HM]*y_cur[IDX_SiOHII] + + k[4631]*y_cur[IDX_CHM]*y_cur[IDX_HII] + + k[4634]*y_cur[IDX_CHM]*y_cur[IDX_H3II] + + k[4635]*y_cur[IDX_CHM]*y_cur[IDX_H3OII] + + k[4636]*y_cur[IDX_CHM]*y_cur[IDX_HC2SII] + + k[4637]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + + k[4638]*y_cur[IDX_CHM]*y_cur[IDX_HCNHII] + + k[4639]*y_cur[IDX_CHM]*y_cur[IDX_HCOII] + + k[4644]*y_cur[IDX_CHM]*y_cur[IDX_N2HII] + + k[4646]*y_cur[IDX_CHM]*y_cur[IDX_NH4II] + + k[4654]*y_cur[IDX_CHM]*y_cur[IDX_SiOHII] + + k[4666]*y_cur[IDX_CNM]*y_cur[IDX_HII] + + k[4669]*y_cur[IDX_CNM]*y_cur[IDX_H3II] + + k[4670]*y_cur[IDX_CNM]*y_cur[IDX_H3OII] + + k[4671]*y_cur[IDX_CNM]*y_cur[IDX_HC2SII] + + k[4672]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + + k[4673]*y_cur[IDX_CNM]*y_cur[IDX_HCNHII] + + k[4674]*y_cur[IDX_CNM]*y_cur[IDX_HCOII] + + k[4679]*y_cur[IDX_CNM]*y_cur[IDX_N2HII] + + k[4681]*y_cur[IDX_CNM]*y_cur[IDX_NH4II] + + k[4689]*y_cur[IDX_CNM]*y_cur[IDX_SiOHII] + + k[4691]*y_cur[IDX_HM]*y_cur[IDX_CII] + + k[4692]*y_cur[IDX_HM]*y_cur[IDX_C2H2II] + + k[4693]*y_cur[IDX_HM]*y_cur[IDX_C2H3II] + + k[4694]*y_cur[IDX_HM]*y_cur[IDX_C4H2II] + + k[4695]*y_cur[IDX_HM]*y_cur[IDX_C4H3II] + + k[4696]*y_cur[IDX_HM]*y_cur[IDX_C4SII] + + k[4697]*y_cur[IDX_HM]*y_cur[IDX_CH2CCHII] + + k[4698]*y_cur[IDX_HM]*y_cur[IDX_CH3II] + + k[4699]*y_cur[IDX_HM]*y_cur[IDX_CNCII] + + k[4700]*y_cur[IDX_HM]*y_cur[IDX_FeII] + + k[4701]*y_cur[IDX_HM]*y_cur[IDX_HII] + + k[4701]*y_cur[IDX_HM]*y_cur[IDX_HII] + + k[4702]*y_cur[IDX_HM]*y_cur[IDX_H2II] + + k[4703]*y_cur[IDX_HM]*y_cur[IDX_H2COII] + + k[4704]*y_cur[IDX_HM]*y_cur[IDX_H2SII] + + k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] + + k[4705]*y_cur[IDX_HM]*y_cur[IDX_H3II] + + k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] + + k[4706]*y_cur[IDX_HM]*y_cur[IDX_H3OII] + + k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] + + k[4707]*y_cur[IDX_HM]*y_cur[IDX_HC2SII] + + k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + + k[4708]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + + k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + + k[4709]*y_cur[IDX_HM]*y_cur[IDX_HCNHII] + + k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + + k[4710]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + + k[4711]*y_cur[IDX_HM]*y_cur[IDX_HCOII] + + k[4712]*y_cur[IDX_HM]*y_cur[IDX_HeII] + + k[4713]*y_cur[IDX_HM]*y_cur[IDX_MgII] + + k[4714]*y_cur[IDX_HM]*y_cur[IDX_NII] + + k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] + + k[4715]*y_cur[IDX_HM]*y_cur[IDX_N2HII] + + k[4716]*y_cur[IDX_HM]*y_cur[IDX_NH3II] + + k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] + + k[4717]*y_cur[IDX_HM]*y_cur[IDX_NH4II] + + k[4718]*y_cur[IDX_HM]*y_cur[IDX_NOII] + + k[4719]*y_cur[IDX_HM]*y_cur[IDX_NaII] + + k[4720]*y_cur[IDX_HM]*y_cur[IDX_OII] + + k[4721]*y_cur[IDX_HM]*y_cur[IDX_SII] + + k[4722]*y_cur[IDX_HM]*y_cur[IDX_SOII] + + k[4723]*y_cur[IDX_HM]*y_cur[IDX_SiII] + + k[4724]*y_cur[IDX_HM]*y_cur[IDX_SiOII] + + k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] + + k[4725]*y_cur[IDX_HM]*y_cur[IDX_SiOHII] + + k[4726]*y_cur[IDX_HM]*y_cur[IDX_SiSII] + + k[4737]*y_cur[IDX_OM]*y_cur[IDX_HII] + + k[4740]*y_cur[IDX_OM]*y_cur[IDX_H3II] + + k[4741]*y_cur[IDX_OM]*y_cur[IDX_H3OII] + + k[4742]*y_cur[IDX_OM]*y_cur[IDX_HC2SII] + + k[4743]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + + k[4744]*y_cur[IDX_OM]*y_cur[IDX_HCNHII] + + k[4745]*y_cur[IDX_OM]*y_cur[IDX_HCOII] + + k[4750]*y_cur[IDX_OM]*y_cur[IDX_N2HII] + + k[4752]*y_cur[IDX_OM]*y_cur[IDX_NH4II] + + k[4760]*y_cur[IDX_OM]*y_cur[IDX_SiOHII] + + k[4772]*y_cur[IDX_O2M]*y_cur[IDX_HII] + + k[4775]*y_cur[IDX_O2M]*y_cur[IDX_H3II] + + k[4776]*y_cur[IDX_O2M]*y_cur[IDX_H3OII] + + k[4777]*y_cur[IDX_O2M]*y_cur[IDX_HC2SII] + + k[4778]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + + k[4779]*y_cur[IDX_O2M]*y_cur[IDX_HCNHII] + + k[4780]*y_cur[IDX_O2M]*y_cur[IDX_HCOII] + + k[4785]*y_cur[IDX_O2M]*y_cur[IDX_N2HII] + + k[4787]*y_cur[IDX_O2M]*y_cur[IDX_NH4II] + + k[4795]*y_cur[IDX_O2M]*y_cur[IDX_SiOHII] + + k[4807]*y_cur[IDX_OHM]*y_cur[IDX_HII] + + k[4810]*y_cur[IDX_OHM]*y_cur[IDX_H3II] + + k[4811]*y_cur[IDX_OHM]*y_cur[IDX_H3OII] + + k[4812]*y_cur[IDX_OHM]*y_cur[IDX_HC2SII] + + k[4813]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] + + k[4814]*y_cur[IDX_OHM]*y_cur[IDX_HCNHII] + + k[4815]*y_cur[IDX_OHM]*y_cur[IDX_HCOII] + + k[4820]*y_cur[IDX_OHM]*y_cur[IDX_N2HII] + + k[4822]*y_cur[IDX_OHM]*y_cur[IDX_NH4II] + + k[4830]*y_cur[IDX_OHM]*y_cur[IDX_SiOHII] + + k[4842]*y_cur[IDX_SM]*y_cur[IDX_HII] + + k[4845]*y_cur[IDX_SM]*y_cur[IDX_H3II] + + k[4846]*y_cur[IDX_SM]*y_cur[IDX_H3OII] + + k[4847]*y_cur[IDX_SM]*y_cur[IDX_HC2SII] + + k[4848]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] + + k[4849]*y_cur[IDX_SM]*y_cur[IDX_HCNHII] + + k[4850]*y_cur[IDX_SM]*y_cur[IDX_HCOII] + + k[4855]*y_cur[IDX_SM]*y_cur[IDX_N2HII] + + k[4857]*y_cur[IDX_SM]*y_cur[IDX_NH4II] + + k[4865]*y_cur[IDX_SM]*y_cur[IDX_SiOHII] + + k[4867]*y_cur[IDX_C2I]*y_cur[IDX_C2H2I] + + k[4868]*y_cur[IDX_C2I]*y_cur[IDX_C2H4I] + + k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] + + k[4869]*y_cur[IDX_C2I]*y_cur[IDX_C2H6I] + + k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] + + k[4870]*y_cur[IDX_C2I]*y_cur[IDX_CH3CHCH2I] + + k[4871]*y_cur[IDX_C2I]*y_cur[IDX_CH4I] + + k[4872]*y_cur[IDX_C2I]*y_cur[IDX_C4H2I] + + k[4873]*y_cur[IDX_C2I]*y_cur[IDX_HCNI] + + k[4877]*y_cur[IDX_C2H2I]*y_cur[IDX_C4HI] + + k[4878]*y_cur[IDX_C2H2I]*y_cur[IDX_NOI] + + k[4880]*y_cur[IDX_C2H2I]*y_cur[IDX_SiI] + + k[4883]*y_cur[IDX_C2H4I]*y_cur[IDX_C2H3I] + + k[4884]*y_cur[IDX_C2H4I]*y_cur[IDX_C4HI] + + k[4888]*y_cur[IDX_C2HI]*y_cur[IDX_C2H2I] + + k[4889]*y_cur[IDX_C2HI]*y_cur[IDX_C3H2I] + + k[4890]*y_cur[IDX_C2HI]*y_cur[IDX_C5H2I] + + k[4891]*y_cur[IDX_C2HI]*y_cur[IDX_C6H2I] + + k[4892]*y_cur[IDX_C2HI]*y_cur[IDX_C7H2I] + + k[4893]*y_cur[IDX_C2HI]*y_cur[IDX_C8H2I] + + k[4894]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] + + k[4895]*y_cur[IDX_C2HI]*y_cur[IDX_CH2CCH2I] + + k[4896]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] + + k[4897]*y_cur[IDX_C2HI]*y_cur[IDX_CH3CCHI] + + k[4899]*y_cur[IDX_C2HI]*y_cur[IDX_CSI] + + k[4900]*y_cur[IDX_C2HI]*y_cur[IDX_C4H2I] + + k[4901]*y_cur[IDX_C2HI]*y_cur[IDX_HCNI] + + k[4902]*y_cur[IDX_C2HI]*y_cur[IDX_HNCI] + + k[4905]*y_cur[IDX_C2HI]*y_cur[IDX_OCSI] + + k[4906]*y_cur[IDX_C2HI]*y_cur[IDX_SI] + + k[4907]*y_cur[IDX_C4HI]*y_cur[IDX_HNCI] + + k[4910]*y_cur[IDX_CI]*y_cur[IDX_C10HI] + + k[4912]*y_cur[IDX_CI]*y_cur[IDX_C2H2I] + + k[4913]*y_cur[IDX_CI]*y_cur[IDX_C2H3I] + + k[4914]*y_cur[IDX_CI]*y_cur[IDX_C2H4I] + + k[4915]*y_cur[IDX_CI]*y_cur[IDX_C2H5I] + + k[4916]*y_cur[IDX_CI]*y_cur[IDX_C2HI] + + k[4919]*y_cur[IDX_CI]*y_cur[IDX_C3H2I] + + k[4920]*y_cur[IDX_CI]*y_cur[IDX_C3HI] + + k[4924]*y_cur[IDX_CI]*y_cur[IDX_C4H3I] + + k[4925]*y_cur[IDX_CI]*y_cur[IDX_C4HI] + + k[4927]*y_cur[IDX_CI]*y_cur[IDX_C5H2I] + + k[4928]*y_cur[IDX_CI]*y_cur[IDX_C5HI] + + k[4932]*y_cur[IDX_CI]*y_cur[IDX_C6H2I] + + k[4933]*y_cur[IDX_CI]*y_cur[IDX_C6HI] + + k[4935]*y_cur[IDX_CI]*y_cur[IDX_C7H2I] + + k[4936]*y_cur[IDX_CI]*y_cur[IDX_C7HI] + + k[4939]*y_cur[IDX_CI]*y_cur[IDX_C8H2I] + + k[4940]*y_cur[IDX_CI]*y_cur[IDX_C8HI] + + k[4941]*y_cur[IDX_CI]*y_cur[IDX_C9H2I] + + k[4942]*y_cur[IDX_CI]*y_cur[IDX_C9HI] + + k[4944]*y_cur[IDX_CI]*y_cur[IDX_CH2I] + + k[4946]*y_cur[IDX_CI]*y_cur[IDX_CH2CCH2I] + + k[4947]*y_cur[IDX_CI]*y_cur[IDX_CH2CCHI] + + k[4948]*y_cur[IDX_CI]*y_cur[IDX_CH2CNI] + + k[4949]*y_cur[IDX_CI]*y_cur[IDX_CH3I] + + k[4952]*y_cur[IDX_CI]*y_cur[IDX_CH3CCHI] + + k[4954]*y_cur[IDX_CI]*y_cur[IDX_CH3CHCH2I] + + k[4955]*y_cur[IDX_CI]*y_cur[IDX_CHI] + + k[4959]*y_cur[IDX_CI]*y_cur[IDX_H2CCCI] + + k[4961]*y_cur[IDX_CI]*y_cur[IDX_C4H2I] + + k[4962]*y_cur[IDX_CI]*y_cur[IDX_HCOI] + + k[4965]*y_cur[IDX_CI]*y_cur[IDX_HSI] + + k[4969]*y_cur[IDX_CI]*y_cur[IDX_NH2I] + + k[4970]*y_cur[IDX_CI]*y_cur[IDX_NH2I] + + k[4972]*y_cur[IDX_CI]*y_cur[IDX_NHI] + + k[4981]*y_cur[IDX_CI]*y_cur[IDX_OHI] + + k[4983]*y_cur[IDX_CI]*y_cur[IDX_PHI] + + k[4988]*y_cur[IDX_CI]*y_cur[IDX_SiH2I] + + k[4989]*y_cur[IDX_CI]*y_cur[IDX_SiH3I] + + k[4990]*y_cur[IDX_CI]*y_cur[IDX_SiHI] + + k[4991]*y_cur[IDX_CH2I]*y_cur[IDX_C2H2I] + + k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + + k[4993]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + + k[4994]*y_cur[IDX_CH2I]*y_cur[IDX_CH2I] + + k[5005]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + + k[5006]*y_cur[IDX_CH2I]*y_cur[IDX_NOI] + + k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + + k[5008]*y_cur[IDX_CH2I]*y_cur[IDX_O2I] + + k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + + k[5013]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + + k[5014]*y_cur[IDX_CH2I]*y_cur[IDX_OI] + + k[5016]*y_cur[IDX_CH2I]*y_cur[IDX_OHI] + + k[5020]*y_cur[IDX_CH2I]*y_cur[IDX_SI] + + k[5021]*y_cur[IDX_CH2I]*y_cur[IDX_SiI] + + k[5023]*y_cur[IDX_CH2CCH2I]*y_cur[IDX_C4HI] - + k[5024]*y_cur[IDX_C4H6I]*y_cur[IDX_HI] + + k[5027]*y_cur[IDX_CH3I]*y_cur[IDX_CH3I] + + k[5043]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + + k[5044]*y_cur[IDX_CH3I]*y_cur[IDX_OI] + + k[5048]*y_cur[IDX_CH3I]*y_cur[IDX_SI] + + k[5049]*y_cur[IDX_CH3I]*y_cur[IDX_SiI] + + k[5051]*y_cur[IDX_CH3CCHI]*y_cur[IDX_C4HI] + + k[5054]*y_cur[IDX_CH3CHCH2I]*y_cur[IDX_C4HI] + + k[5063]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] + + k[5064]*y_cur[IDX_CHI]*y_cur[IDX_C2H2I] + + k[5065]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] + + k[5066]*y_cur[IDX_CHI]*y_cur[IDX_C2H4I] + + k[5067]*y_cur[IDX_CHI]*y_cur[IDX_CH2CCH2I] + + k[5068]*y_cur[IDX_CHI]*y_cur[IDX_CH3CCHI] + + k[5070]*y_cur[IDX_CHI]*y_cur[IDX_C2H6I] + + k[5072]*y_cur[IDX_CHI]*y_cur[IDX_CH3CHCH2I] + + k[5073]*y_cur[IDX_CHI]*y_cur[IDX_CH3OHI] + + k[5074]*y_cur[IDX_CHI]*y_cur[IDX_CH4I] + + k[5080]*y_cur[IDX_CHI]*y_cur[IDX_NI] + + k[5082]*y_cur[IDX_CHI]*y_cur[IDX_NH3I] + + k[5085]*y_cur[IDX_CHI]*y_cur[IDX_NOI] + + k[5086]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5087]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5088]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5089]*y_cur[IDX_CHI]*y_cur[IDX_O2I] + + k[5096]*y_cur[IDX_CHI]*y_cur[IDX_OI] + + k[5098]*y_cur[IDX_CHI]*y_cur[IDX_OCSI] + + k[5099]*y_cur[IDX_CHI]*y_cur[IDX_OHI] + + k[5100]*y_cur[IDX_CHI]*y_cur[IDX_SI] + + k[5103]*y_cur[IDX_CHI]*y_cur[IDX_SOI] + + k[5104]*y_cur[IDX_CNI]*y_cur[IDX_C2H2I] + + k[5106]*y_cur[IDX_CNI]*y_cur[IDX_C2H4I] + + k[5107]*y_cur[IDX_CNI]*y_cur[IDX_C6H2I] + + k[5108]*y_cur[IDX_CNI]*y_cur[IDX_C8H2I] + + k[5109]*y_cur[IDX_CNI]*y_cur[IDX_CH2CCH2I] + + k[5110]*y_cur[IDX_CNI]*y_cur[IDX_CH3CCHI] + + k[5115]*y_cur[IDX_CNI]*y_cur[IDX_C4H2I] + + k[5116]*y_cur[IDX_CNI]*y_cur[IDX_HCNI] + + k[5118]*y_cur[IDX_CNI]*y_cur[IDX_HNCI] + + k[5132]*y_cur[IDX_ClI]*y_cur[IDX_H2I] + + k[5133]*y_cur[IDX_H2I]*y_cur[IDX_C2HI] + + k[5134]*y_cur[IDX_H2I]*y_cur[IDX_CI] + + k[5135]*y_cur[IDX_H2I]*y_cur[IDX_CH2I] + + k[5136]*y_cur[IDX_H2I]*y_cur[IDX_CH3I] + + k[5137]*y_cur[IDX_H2I]*y_cur[IDX_CHI] + + k[5138]*y_cur[IDX_H2I]*y_cur[IDX_CNI] + + k[5139]*y_cur[IDX_H2I]*y_cur[IDX_FI] + + k[5140]*y_cur[IDX_H2I]*y_cur[IDX_HSI] + + k[5141]*y_cur[IDX_H2I]*y_cur[IDX_NI] + + k[5142]*y_cur[IDX_H2I]*y_cur[IDX_NH2I] + + k[5143]*y_cur[IDX_H2I]*y_cur[IDX_NHI] + + k[5144]*y_cur[IDX_H2I]*y_cur[IDX_O2I] + + k[5146]*y_cur[IDX_H2I]*y_cur[IDX_O2HI] + + k[5147]*y_cur[IDX_H2I]*y_cur[IDX_OI] + + k[5148]*y_cur[IDX_H2I]*y_cur[IDX_OHI] + + k[5149]*y_cur[IDX_H2I]*y_cur[IDX_SI] - + k[5153]*y_cur[IDX_HI]*y_cur[IDX_C2I] - + k[5154]*y_cur[IDX_HI]*y_cur[IDX_C2H2I] - + k[5155]*y_cur[IDX_HI]*y_cur[IDX_C2H3I] - + k[5156]*y_cur[IDX_HI]*y_cur[IDX_CH2I] - + k[5157]*y_cur[IDX_HI]*y_cur[IDX_CH2COI] - + k[5158]*y_cur[IDX_HI]*y_cur[IDX_CH3I] - + k[5159]*y_cur[IDX_HI]*y_cur[IDX_CH4I] - + k[5160]*y_cur[IDX_HI]*y_cur[IDX_CHI] - + k[5161]*y_cur[IDX_HI]*y_cur[IDX_CNOI] - + k[5162]*y_cur[IDX_HI]*y_cur[IDX_CO2I] - + k[5163]*y_cur[IDX_HI]*y_cur[IDX_COI] - + k[5164]*y_cur[IDX_HI]*y_cur[IDX_H2CNI] - + k[5165]*y_cur[IDX_HI]*y_cur[IDX_H2COI] - + k[5166]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - + k[5167]*y_cur[IDX_HI]*y_cur[IDX_H2O2I] - + k[5168]*y_cur[IDX_HI]*y_cur[IDX_H2OI] - + k[5169]*y_cur[IDX_HI]*y_cur[IDX_H2SI] - + k[5170]*y_cur[IDX_HI]*y_cur[IDX_HCNI] - + k[5171]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - + k[5172]*y_cur[IDX_HI]*y_cur[IDX_HCOI] - + k[5173]*y_cur[IDX_HI]*y_cur[IDX_HCSI] - + k[5174]*y_cur[IDX_HI]*y_cur[IDX_HNCI] + + k[5174]*y_cur[IDX_HI]*y_cur[IDX_HNCI] - + k[5175]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - + k[5176]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - + k[5177]*y_cur[IDX_HI]*y_cur[IDX_HNOI] - + k[5178]*y_cur[IDX_HI]*y_cur[IDX_HSI] - + k[5179]*y_cur[IDX_HI]*y_cur[IDX_N2OI] - + k[5180]*y_cur[IDX_HI]*y_cur[IDX_N2OI] - + k[5181]*y_cur[IDX_HI]*y_cur[IDX_NCCNI] - + k[5182]*y_cur[IDX_HI]*y_cur[IDX_NH2I] - + k[5183]*y_cur[IDX_HI]*y_cur[IDX_NH3I] - + k[5184]*y_cur[IDX_HI]*y_cur[IDX_NHI] - + k[5185]*y_cur[IDX_HI]*y_cur[IDX_NO2I] - + k[5186]*y_cur[IDX_HI]*y_cur[IDX_NOI] - + k[5187]*y_cur[IDX_HI]*y_cur[IDX_NOI] - + k[5188]*y_cur[IDX_HI]*y_cur[IDX_NSI] - + k[5189]*y_cur[IDX_HI]*y_cur[IDX_NSI] - + k[5190]*y_cur[IDX_HI]*y_cur[IDX_O2I] - + k[5191]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - + k[5192]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - + k[5193]*y_cur[IDX_HI]*y_cur[IDX_O2HI] - + k[5194]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - + k[5195]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - + k[5196]*y_cur[IDX_HI]*y_cur[IDX_OCNI] - + k[5197]*y_cur[IDX_HI]*y_cur[IDX_OCSI] - + k[5198]*y_cur[IDX_HI]*y_cur[IDX_OHI] - + k[5199]*y_cur[IDX_HI]*y_cur[IDX_S2I] - + k[5200]*y_cur[IDX_HI]*y_cur[IDX_SOI] - + k[5201]*y_cur[IDX_HI]*y_cur[IDX_SOI] - + k[5211]*y_cur[IDX_HClI]*y_cur[IDX_HI] - + k[5213]*y_cur[IDX_HNC3I]*y_cur[IDX_HI] + + k[5213]*y_cur[IDX_HNC3I]*y_cur[IDX_HI] + + k[5224]*y_cur[IDX_NI]*y_cur[IDX_C2H3I] + + k[5228]*y_cur[IDX_NI]*y_cur[IDX_C2HI] + + k[5232]*y_cur[IDX_NI]*y_cur[IDX_C3H2I] + + k[5233]*y_cur[IDX_NI]*y_cur[IDX_C3HI] + + k[5236]*y_cur[IDX_NI]*y_cur[IDX_C4HI] + + k[5239]*y_cur[IDX_NI]*y_cur[IDX_C5H2I] + + k[5240]*y_cur[IDX_NI]*y_cur[IDX_C5HI] + + k[5245]*y_cur[IDX_NI]*y_cur[IDX_C7H2I] + + k[5246]*y_cur[IDX_NI]*y_cur[IDX_C7HI] + + k[5251]*y_cur[IDX_NI]*y_cur[IDX_C9HI] + + k[5253]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + + k[5254]*y_cur[IDX_NI]*y_cur[IDX_CH2I] + + k[5257]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + + k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + + k[5259]*y_cur[IDX_NI]*y_cur[IDX_CH3I] + + k[5267]*y_cur[IDX_NI]*y_cur[IDX_HCOI] + + k[5269]*y_cur[IDX_NI]*y_cur[IDX_HNOI] + + k[5271]*y_cur[IDX_NI]*y_cur[IDX_HSI] + + k[5274]*y_cur[IDX_NI]*y_cur[IDX_NHI] + + k[5283]*y_cur[IDX_NI]*y_cur[IDX_OHI] + + k[5285]*y_cur[IDX_NI]*y_cur[IDX_PHI] + + k[5294]*y_cur[IDX_NI]*y_cur[IDX_SiH2I] + + k[5296]*y_cur[IDX_NI]*y_cur[IDX_SiHI] + + k[5299]*y_cur[IDX_NH2I]*y_cur[IDX_NOI] + + k[5303]*y_cur[IDX_NH3I]*y_cur[IDX_CNI] + + k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + + k[5309]*y_cur[IDX_NHI]*y_cur[IDX_NHI] + + k[5313]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + + k[5315]*y_cur[IDX_NHI]*y_cur[IDX_NOI] + + k[5318]*y_cur[IDX_NHI]*y_cur[IDX_OI] + + k[5319]*y_cur[IDX_NHI]*y_cur[IDX_OI] + + k[5322]*y_cur[IDX_NHI]*y_cur[IDX_OHI] + + k[5325]*y_cur[IDX_NHI]*y_cur[IDX_SI] + + k[5345]*y_cur[IDX_OI]*y_cur[IDX_C2H3I] + + k[5350]*y_cur[IDX_OI]*y_cur[IDX_C2H5I] + + k[5384]*y_cur[IDX_OI]*y_cur[IDX_CH2PHI] + + k[5404]*y_cur[IDX_OI]*y_cur[IDX_HCNI] + + k[5405]*y_cur[IDX_OI]*y_cur[IDX_HCOI] + + k[5409]*y_cur[IDX_OI]*y_cur[IDX_HCSI] + + k[5411]*y_cur[IDX_OI]*y_cur[IDX_HNOI] + + k[5416]*y_cur[IDX_OI]*y_cur[IDX_HSI] + + k[5420]*y_cur[IDX_OI]*y_cur[IDX_NH2I] + + k[5432]*y_cur[IDX_OI]*y_cur[IDX_OHI] + + k[5433]*y_cur[IDX_OI]*y_cur[IDX_PH2I] + + k[5436]*y_cur[IDX_OI]*y_cur[IDX_PHI] + + k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] + + k[5446]*y_cur[IDX_OI]*y_cur[IDX_SiH2I] + + k[5447]*y_cur[IDX_OI]*y_cur[IDX_SiH3I] + + k[5449]*y_cur[IDX_OI]*y_cur[IDX_SiHI] + + k[5454]*y_cur[IDX_OHI]*y_cur[IDX_C2H2I] + + k[5460]*y_cur[IDX_OHI]*y_cur[IDX_CNI] + + k[5461]*y_cur[IDX_OHI]*y_cur[IDX_COI] + + k[5463]*y_cur[IDX_OHI]*y_cur[IDX_CSI] + + k[5466]*y_cur[IDX_OHI]*y_cur[IDX_H2COI] + + k[5477]*y_cur[IDX_OHI]*y_cur[IDX_NOI] + + k[5480]*y_cur[IDX_OHI]*y_cur[IDX_SI] + + k[5481]*y_cur[IDX_OHI]*y_cur[IDX_SOI] + + k[5482]*y_cur[IDX_OHI]*y_cur[IDX_SiI] + + k[5483]*y_cur[IDX_OHI]*y_cur[IDX_SiOI] + + k[5486]*y_cur[IDX_SI]*y_cur[IDX_HCOI] + + k[5488]*y_cur[IDX_SI]*y_cur[IDX_HSI] - + k[5546]*y_cur[IDX_HII]*y_cur[IDX_HI] - + k[5569]*y_cur[IDX_HI]*y_cur[IDX_CII] - + k[5570]*y_cur[IDX_HI]*y_cur[IDX_C4H2II] - + k[5571]*y_cur[IDX_HI]*y_cur[IDX_C4H3II] - + k[5572]*y_cur[IDX_HI]*y_cur[IDX_CI] - + k[5573]*y_cur[IDX_HI]*y_cur[IDX_OI] - + k[5574]*y_cur[IDX_HI]*y_cur[IDX_OHI] - + k[5575]*y_cur[IDX_HI]*y_cur[IDX_SiII] - + k[5608]*y_cur[IDX_HI]*y_cur[IDX_eM] + + k[5615]*y_cur[IDX_HII]*y_cur[IDX_eM] + + k[5632]*y_cur[IDX_HeII]*y_cur[IDX_CH3OI] + k[5679]*y_cur[IDX_H2I] + + k[5681]*y_cur[IDX_H2I] + k[5681]*y_cur[IDX_H2I] - + k[5682]*y_cur[IDX_HI] + k[5690]*y_cur[IDX_C10H2I] + + k[5691]*y_cur[IDX_C10HI] + k[5697]*y_cur[IDX_C2H2I] + + k[5698]*y_cur[IDX_C2H3I] + k[5704]*y_cur[IDX_C2H5CNI] + + k[5708]*y_cur[IDX_C2HI] + k[5719]*y_cur[IDX_C3H2I] + + k[5720]*y_cur[IDX_C3HI] + k[5730]*y_cur[IDX_C4H3I] + + k[5730]*y_cur[IDX_C4H3I] + k[5732]*y_cur[IDX_C4HI] + + k[5741]*y_cur[IDX_C5H2I] + k[5744]*y_cur[IDX_C5HI] + + k[5751]*y_cur[IDX_C6H6I] + k[5751]*y_cur[IDX_C6H6I] + + k[5754]*y_cur[IDX_C6HI] + k[5758]*y_cur[IDX_C7H2I] + + k[5759]*y_cur[IDX_C7HI] + k[5764]*y_cur[IDX_C8H2I] + + k[5765]*y_cur[IDX_C8HI] + k[5769]*y_cur[IDX_C9H2I] + + k[5770]*y_cur[IDX_C9HI] + k[5776]*y_cur[IDX_CHII] + + k[5779]*y_cur[IDX_CH2I] + k[5781]*y_cur[IDX_CH2CCH2I] + + k[5782]*y_cur[IDX_CH2CCHI] + k[5793]*y_cur[IDX_CH3I] + + k[5802]*y_cur[IDX_CH3CCHI] + k[5817]*y_cur[IDX_CH3OHI] + + k[5818]*y_cur[IDX_CH3OHI] + k[5821]*y_cur[IDX_CHI] + + k[5833]*y_cur[IDX_HM] + k[5834]*y_cur[IDX_H2CCCI] + + k[5835]*y_cur[IDX_H2CNI] + k[5839]*y_cur[IDX_H2OI] - + k[5844]*y_cur[IDX_HI] + k[5845]*y_cur[IDX_HC2PI] + + k[5849]*y_cur[IDX_C4H2I] + k[5851]*y_cur[IDX_HC5NI] + + k[5854]*y_cur[IDX_HCNI] + k[5856]*y_cur[IDX_HCOI] + + k[5861]*y_cur[IDX_HCPI] + k[5864]*y_cur[IDX_HClI] + + k[5865]*y_cur[IDX_HFI] + k[5867]*y_cur[IDX_HNCI] + + k[5869]*y_cur[IDX_HNOI] + k[5870]*y_cur[IDX_HNSiI] + + k[5873]*y_cur[IDX_HPOI] + k[5875]*y_cur[IDX_HSI] + + k[5883]*y_cur[IDX_NH2I] + k[5885]*y_cur[IDX_NH3I] + + k[5888]*y_cur[IDX_NHI] + k[5899]*y_cur[IDX_O2HI] + + k[5905]*y_cur[IDX_OHI] + k[5907]*y_cur[IDX_PH2I] + + k[5908]*y_cur[IDX_PHI] + k[5920]*y_cur[IDX_SiC2HI] + + k[5922]*y_cur[IDX_SiC3HI] + k[5926]*y_cur[IDX_SiCH3I] + + k[5927]*y_cur[IDX_SiH2I] + k[5928]*y_cur[IDX_SiH3I] + + k[5930]*y_cur[IDX_SiHI] + k[5940]*y_cur[IDX_HCCNI] + + k[5957]*y_cur[IDX_C10H2I] + k[5957]*y_cur[IDX_C10H2I] + + k[5959]*y_cur[IDX_C10H2I] + k[5960]*y_cur[IDX_C10H2I] + + k[5961]*y_cur[IDX_C10HI] + k[5963]*y_cur[IDX_C10HI] + + k[5965]*y_cur[IDX_C10HI] + k[5967]*y_cur[IDX_C10HI] + + k[5968]*y_cur[IDX_C10HI] + k[5979]*y_cur[IDX_C2HII] + + k[5982]*y_cur[IDX_C2H2I] + k[5983]*y_cur[IDX_C2H3I] + + k[5989]*y_cur[IDX_C2H5CNI] + k[5993]*y_cur[IDX_C2HI] + + k[6003]*y_cur[IDX_C3H2I] + k[6004]*y_cur[IDX_C3HI] + + k[6015]*y_cur[IDX_C4H3I] + k[6017]*y_cur[IDX_C4HI] + + k[6026]*y_cur[IDX_C5H2I] + k[6029]*y_cur[IDX_C5HI] + + k[6037]*y_cur[IDX_C6H2I] + k[6046]*y_cur[IDX_C7H2I] + + k[6047]*y_cur[IDX_C7HI] + k[6056]*y_cur[IDX_C8H2I] + + k[6057]*y_cur[IDX_C8HI] + k[6064]*y_cur[IDX_C9H2I] + + k[6065]*y_cur[IDX_C9HI] + k[6076]*y_cur[IDX_CH2II] + + k[6079]*y_cur[IDX_CH2I] + k[6081]*y_cur[IDX_CH2CCH2I] + + k[6083]*y_cur[IDX_CH2CCHI] + k[6096]*y_cur[IDX_CH3II] + + k[6097]*y_cur[IDX_CH3I] + k[6106]*y_cur[IDX_CH3CCHI] + + k[6121]*y_cur[IDX_CH3OHI] + k[6122]*y_cur[IDX_CH3OHI] + + k[6123]*y_cur[IDX_CH3OHI] + k[6126]*y_cur[IDX_CH4II] + + k[6128]*y_cur[IDX_CH4I] + k[6130]*y_cur[IDX_CH4I] + + k[6131]*y_cur[IDX_CHI] + k[6146]*y_cur[IDX_HM] + + k[6147]*y_cur[IDX_H2I] + k[6147]*y_cur[IDX_H2I] + + k[6148]*y_cur[IDX_H2II] + k[6150]*y_cur[IDX_H2CCCI] + + k[6151]*y_cur[IDX_H2CNI] + k[6153]*y_cur[IDX_H2COI] + + k[6153]*y_cur[IDX_H2COI] + k[6155]*y_cur[IDX_H2COI] + + k[6157]*y_cur[IDX_H2OII] + k[6160]*y_cur[IDX_H2OI] + + k[6164]*y_cur[IDX_H2SI] + k[6167]*y_cur[IDX_H2SiOI] + + k[6167]*y_cur[IDX_H2SiOI] + k[6168]*y_cur[IDX_H3II] + + k[6170]*y_cur[IDX_HC2PI] + k[6174]*y_cur[IDX_C4H2I] + + k[6176]*y_cur[IDX_HC5NI] + k[6181]*y_cur[IDX_HCNI] + + k[6183]*y_cur[IDX_HCOII] + k[6184]*y_cur[IDX_HCOI] + + k[6189]*y_cur[IDX_HCPI] + k[6190]*y_cur[IDX_HCSI] + + k[6193]*y_cur[IDX_HCSiI] + k[6194]*y_cur[IDX_HClI] + + k[6196]*y_cur[IDX_HFI] + k[6197]*y_cur[IDX_HNC3I] + + k[6198]*y_cur[IDX_HNCI] + k[6200]*y_cur[IDX_HNOI] + + k[6201]*y_cur[IDX_HNSiI] + k[6204]*y_cur[IDX_HPOI] + + k[6205]*y_cur[IDX_HSII] + k[6209]*y_cur[IDX_HSI] + + k[6219]*y_cur[IDX_NH2I] + k[6221]*y_cur[IDX_NH3I] + + k[6224]*y_cur[IDX_NHI] + k[6237]*y_cur[IDX_O2HI] + + k[6242]*y_cur[IDX_OHII] + k[6244]*y_cur[IDX_OHI] + + k[6248]*y_cur[IDX_PH2I] + k[6249]*y_cur[IDX_PHI] + + k[6261]*y_cur[IDX_SiC2H2I] + k[6262]*y_cur[IDX_SiC2HI] + + k[6265]*y_cur[IDX_SiC3HI] + k[6268]*y_cur[IDX_SiCH2I] + + k[6270]*y_cur[IDX_SiCH3I] + k[6271]*y_cur[IDX_SiHII] + + k[6273]*y_cur[IDX_SiH2I] + k[6274]*y_cur[IDX_SiH3I] + + k[6278]*y_cur[IDX_SiH4I] + k[6279]*y_cur[IDX_SiH4I] + + k[6280]*y_cur[IDX_SiHI] + k[6308]*y_cur[IDX_HII]*y_cur[IDX_GRAINM] + + k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM] + + k[6309]*y_cur[IDX_H2II]*y_cur[IDX_GRAINM] + + k[6310]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + + k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + + k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + + k[6311]*y_cur[IDX_H3II]*y_cur[IDX_GRAINM] + + k[6313]*y_cur[IDX_HeHII]*y_cur[IDX_GRAINM] + + k[6315]*y_cur[IDX_CHII]*y_cur[IDX_GRAINM] + + k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6317]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6318]*y_cur[IDX_CH2II]*y_cur[IDX_GRAINM] + + k[6320]*y_cur[IDX_NHII]*y_cur[IDX_GRAINM] + + k[6321]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6323]*y_cur[IDX_CH3II]*y_cur[IDX_GRAINM] + + k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + + k[6324]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + + k[6325]*y_cur[IDX_NH2II]*y_cur[IDX_GRAINM] + + k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + + k[6327]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + + k[6328]*y_cur[IDX_CH4II]*y_cur[IDX_GRAINM] + + k[6329]*y_cur[IDX_OHII]*y_cur[IDX_GRAINM] + + k[6330]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + + k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + + k[6331]*y_cur[IDX_NH3II]*y_cur[IDX_GRAINM] + + k[6332]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6334]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6335]*y_cur[IDX_CH5II]*y_cur[IDX_GRAINM] + + k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6338]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6339]*y_cur[IDX_NH4II]*y_cur[IDX_GRAINM] + + k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + + k[6341]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + + k[6342]*y_cur[IDX_H2OII]*y_cur[IDX_GRAINM] + + k[6343]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6344]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6346]*y_cur[IDX_H3OII]*y_cur[IDX_GRAINM] + + k[6348]*y_cur[IDX_HFII]*y_cur[IDX_GRAINM] + + k[6350]*y_cur[IDX_H2FII]*y_cur[IDX_GRAINM] + + k[6354]*y_cur[IDX_C2HII]*y_cur[IDX_GRAINM] + + k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6356]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6357]*y_cur[IDX_C2H2II]*y_cur[IDX_GRAINM] + + k[6360]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6361]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6362]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6363]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6366]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6367]*y_cur[IDX_C2H3II]*y_cur[IDX_GRAINM] + + k[6372]*y_cur[IDX_HCNII]*y_cur[IDX_GRAINM] + + k[6377]*y_cur[IDX_H2NCII]*y_cur[IDX_GRAINM] + + k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6378]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6379]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6380]*y_cur[IDX_HCNHII]*y_cur[IDX_GRAINM] + + k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6382]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6383]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6384]*y_cur[IDX_C2H4II]*y_cur[IDX_GRAINM] + + k[6388]*y_cur[IDX_SiHII]*y_cur[IDX_GRAINM] + + k[6389]*y_cur[IDX_HCOII]*y_cur[IDX_GRAINM] + + k[6390]*y_cur[IDX_HOCII]*y_cur[IDX_GRAINM] + + k[6391]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6392]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6393]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6394]*y_cur[IDX_C2H5II]*y_cur[IDX_GRAINM] + + k[6396]*y_cur[IDX_N2HII]*y_cur[IDX_GRAINM] + + k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6400]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6401]*y_cur[IDX_H2COII]*y_cur[IDX_GRAINM] + + k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6403]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6404]*y_cur[IDX_SiH2II]*y_cur[IDX_GRAINM] + + k[6406]*y_cur[IDX_CH3NHII]*y_cur[IDX_GRAINM] + + k[6408]*y_cur[IDX_CH2NH2II]*y_cur[IDX_GRAINM] + + k[6411]*y_cur[IDX_C2H6II]*y_cur[IDX_GRAINM] + + k[6412]*y_cur[IDX_SiH3II]*y_cur[IDX_GRAINM] + + k[6416]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6417]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6418]*y_cur[IDX_H3COII]*y_cur[IDX_GRAINM] + + k[6420]*y_cur[IDX_C2H7II]*y_cur[IDX_GRAINM] + + k[6422]*y_cur[IDX_HNOII]*y_cur[IDX_GRAINM] + + k[6427]*y_cur[IDX_SiH4II]*y_cur[IDX_GRAINM] + + k[6428]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6429]*y_cur[IDX_CH3OHII]*y_cur[IDX_GRAINM] + + k[6431]*y_cur[IDX_H2NOII]*y_cur[IDX_GRAINM] + + k[6433]*y_cur[IDX_PHII]*y_cur[IDX_GRAINM] + + k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6435]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6436]*y_cur[IDX_PH2II]*y_cur[IDX_GRAINM] + + k[6437]*y_cur[IDX_O2HII]*y_cur[IDX_GRAINM] + + k[6439]*y_cur[IDX_SiH5II]*y_cur[IDX_GRAINM] + + k[6440]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6442]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6443]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6444]*y_cur[IDX_CH3OH2II]*y_cur[IDX_GRAINM] + + k[6445]*y_cur[IDX_HSII]*y_cur[IDX_GRAINM] + + k[6446]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + + k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + + k[6447]*y_cur[IDX_H2SII]*y_cur[IDX_GRAINM] + + k[6448]*y_cur[IDX_PH3II]*y_cur[IDX_GRAINM] + + k[6450]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6452]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6453]*y_cur[IDX_H3SII]*y_cur[IDX_GRAINM] + + k[6456]*y_cur[IDX_HClII]*y_cur[IDX_GRAINM] + + k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + + k[6457]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + + k[6458]*y_cur[IDX_H2ClII]*y_cur[IDX_GRAINM] + + k[6460]*y_cur[IDX_C3HII]*y_cur[IDX_GRAINM] + + k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6464]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6465]*y_cur[IDX_C3H2II]*y_cur[IDX_GRAINM] + + k[6471]*y_cur[IDX_CH2CCHII]*y_cur[IDX_GRAINM] + + k[6472]*y_cur[IDX_C2NHII]*y_cur[IDX_GRAINM] + + k[6473]*y_cur[IDX_C3H3II]*y_cur[IDX_GRAINM] + + k[6478]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6480]*y_cur[IDX_C3H4II]*y_cur[IDX_GRAINM] + + k[6483]*y_cur[IDX_C3H5II]*y_cur[IDX_GRAINM] + + k[6484]*y_cur[IDX_CH3CNII]*y_cur[IDX_GRAINM] + + k[6487]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6488]*y_cur[IDX_HC2OII]*y_cur[IDX_GRAINM] + + k[6491]*y_cur[IDX_HCSiII]*y_cur[IDX_GRAINM] + + k[6496]*y_cur[IDX_SiCH2II]*y_cur[IDX_GRAINM] + + k[6499]*y_cur[IDX_C3H6II]*y_cur[IDX_GRAINM] + + k[6502]*y_cur[IDX_CH3CNHII]*y_cur[IDX_GRAINM] + + k[6505]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6506]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6507]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6508]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6510]*y_cur[IDX_C3H7II]*y_cur[IDX_GRAINM] + + k[6513]*y_cur[IDX_HNSiII]*y_cur[IDX_GRAINM] + + k[6515]*y_cur[IDX_HCNOII]*y_cur[IDX_GRAINM] + + k[6517]*y_cur[IDX_SiCH3II]*y_cur[IDX_GRAINM] + + k[6518]*y_cur[IDX_CH3COII]*y_cur[IDX_GRAINM] + + k[6520]*y_cur[IDX_HONCII]*y_cur[IDX_GRAINM] + + k[6523]*y_cur[IDX_HNCOII]*y_cur[IDX_GRAINM] + + k[6524]*y_cur[IDX_HOCNII]*y_cur[IDX_GRAINM] + + k[6527]*y_cur[IDX_NH2CNHII]*y_cur[IDX_GRAINM] + + k[6533]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + + k[6534]*y_cur[IDX_HCNOHII]*y_cur[IDX_GRAINM] + + k[6537]*y_cur[IDX_H2CNOII]*y_cur[IDX_GRAINM] + + k[6538]*y_cur[IDX_H2NCOII]*y_cur[IDX_GRAINM] + + k[6542]*y_cur[IDX_SiCH4II]*y_cur[IDX_GRAINM] + + k[6543]*y_cur[IDX_HCPII]*y_cur[IDX_GRAINM] + + k[6546]*y_cur[IDX_H2OCNII]*y_cur[IDX_GRAINM] + + k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + + k[6547]*y_cur[IDX_CH3CHOII]*y_cur[IDX_GRAINM] + + k[6549]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + + k[6550]*y_cur[IDX_HNCOHII]*y_cur[IDX_GRAINM] + + k[6552]*y_cur[IDX_SiNH2II]*y_cur[IDX_GRAINM] + + k[6555]*y_cur[IDX_HCSII]*y_cur[IDX_GRAINM] + + k[6557]*y_cur[IDX_SiOHII]*y_cur[IDX_GRAINM] + + k[6558]*y_cur[IDX_HN2OII]*y_cur[IDX_GRAINM] + + k[6561]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6562]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6563]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6564]*y_cur[IDX_CH3CHOHII]*y_cur[IDX_GRAINM] + + k[6566]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + + k[6567]*y_cur[IDX_HCO2II]*y_cur[IDX_GRAINM] + + k[6570]*y_cur[IDX_PCH2II]*y_cur[IDX_GRAINM] + + k[6573]*y_cur[IDX_HPNII]*y_cur[IDX_GRAINM] + + k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + + k[6574]*y_cur[IDX_HCOOHII]*y_cur[IDX_GRAINM] + + k[6578]*y_cur[IDX_PCH3II]*y_cur[IDX_GRAINM] + + k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + + k[6582]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + + k[6583]*y_cur[IDX_H2CSII]*y_cur[IDX_GRAINM] + + k[6589]*y_cur[IDX_HNSII]*y_cur[IDX_GRAINM] + + k[6590]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + + k[6591]*y_cur[IDX_H3SiOII]*y_cur[IDX_GRAINM] + + k[6596]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + + k[6597]*y_cur[IDX_PCH4II]*y_cur[IDX_GRAINM] + + k[6601]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + + k[6602]*y_cur[IDX_H3CSII]*y_cur[IDX_GRAINM] + + k[6604]*y_cur[IDX_CH3OCH4II]*y_cur[IDX_GRAINM] + + k[6606]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6608]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6609]*y_cur[IDX_C2H5OH2II]*y_cur[IDX_GRAINM] + + k[6610]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + + k[6611]*y_cur[IDX_HCOOH2II]*y_cur[IDX_GRAINM] + + k[6612]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + + k[6614]*y_cur[IDX_HPOII]*y_cur[IDX_GRAINM] + + k[6619]*y_cur[IDX_PNH3II]*y_cur[IDX_GRAINM] + + k[6621]*y_cur[IDX_C4HII]*y_cur[IDX_GRAINM] + + k[6622]*y_cur[IDX_H2POII]*y_cur[IDX_GRAINM] + + k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] + + k[6624]*y_cur[IDX_H2CClII]*y_cur[IDX_GRAINM] + + k[6625]*y_cur[IDX_HSOII]*y_cur[IDX_GRAINM] + + k[6628]*y_cur[IDX_C4H2II]*y_cur[IDX_GRAINM] + + k[6629]*y_cur[IDX_HC3NII]*y_cur[IDX_GRAINM] + + k[6634]*y_cur[IDX_C4H3II]*y_cur[IDX_GRAINM] + + k[6639]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6640]*y_cur[IDX_HC3NHII]*y_cur[IDX_GRAINM] + + k[6641]*y_cur[IDX_C4H4II]*y_cur[IDX_GRAINM] + + k[6647]*y_cur[IDX_C4H5II]*y_cur[IDX_GRAINM] + + k[6648]*y_cur[IDX_HC3OII]*y_cur[IDX_GRAINM] + + k[6650]*y_cur[IDX_SiC2HII]*y_cur[IDX_GRAINM] + + k[6653]*y_cur[IDX_NCCNHII]*y_cur[IDX_GRAINM] + + k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + + k[6655]*y_cur[IDX_C3H2OII]*y_cur[IDX_GRAINM] + + k[6657]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + + k[6659]*y_cur[IDX_CH2CHCNHII]*y_cur[IDX_GRAINM] + + k[6661]*y_cur[IDX_SiC2H2II]*y_cur[IDX_GRAINM] + + k[6664]*y_cur[IDX_SiC2H3II]*y_cur[IDX_GRAINM] + + k[6666]*y_cur[IDX_H3C3OII]*y_cur[IDX_GRAINM] + + k[6667]*y_cur[IDX_C4H7II]*y_cur[IDX_GRAINM] + + k[6669]*y_cur[IDX_SiNCHII]*y_cur[IDX_GRAINM] + + k[6671]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + + k[6672]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + + k[6673]*y_cur[IDX_C2H5CNHII]*y_cur[IDX_GRAINM] + + k[6676]*y_cur[IDX_HC2PII]*y_cur[IDX_GRAINM] + + k[6678]*y_cur[IDX_HC2SII]*y_cur[IDX_GRAINM] + + k[6681]*y_cur[IDX_PC2H2II]*y_cur[IDX_GRAINM] + + k[6685]*y_cur[IDX_PC2H3II]*y_cur[IDX_GRAINM] + + k[6690]*y_cur[IDX_PC2H4II]*y_cur[IDX_GRAINM] + + k[6693]*y_cur[IDX_CH3COCH4II]*y_cur[IDX_GRAINM] + + k[6694]*y_cur[IDX_COOCH3II]*y_cur[IDX_GRAINM] + + k[6697]*y_cur[IDX_CH2OHCOII]*y_cur[IDX_GRAINM] + + k[6700]*y_cur[IDX_HCOOCH3II]*y_cur[IDX_GRAINM] + + k[6702]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6703]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6705]*y_cur[IDX_CH2OHCHOII]*y_cur[IDX_GRAINM] + + k[6712]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6713]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6714]*y_cur[IDX_CH3COOHII]*y_cur[IDX_GRAINM] + + k[6718]*y_cur[IDX_HOCSII]*y_cur[IDX_GRAINM] + + k[6720]*y_cur[IDX_HSiSII]*y_cur[IDX_GRAINM] + + k[6722]*y_cur[IDX_C5HII]*y_cur[IDX_GRAINM] + + k[6723]*y_cur[IDX_HSiO2II]*y_cur[IDX_GRAINM] + + k[6726]*y_cur[IDX_H5C2O2II]*y_cur[IDX_GRAINM] + + k[6727]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6728]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6730]*y_cur[IDX_CH2OHCH2OII]*y_cur[IDX_GRAINM] + + k[6731]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6733]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6734]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6735]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6737]*y_cur[IDX_CH3COOH2II]*y_cur[IDX_GRAINM] + + k[6739]*y_cur[IDX_C5H2II]*y_cur[IDX_GRAINM] + + k[6742]*y_cur[IDX_C5H3II]*y_cur[IDX_GRAINM] + + k[6749]*y_cur[IDX_CH3C4HII]*y_cur[IDX_GRAINM] + + k[6753]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + + k[6754]*y_cur[IDX_C5H5II]*y_cur[IDX_GRAINM] + + k[6755]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + + k[6756]*y_cur[IDX_HSO2II]*y_cur[IDX_GRAINM] + + k[6759]*y_cur[IDX_HS2II]*y_cur[IDX_GRAINM] + + k[6762]*y_cur[IDX_SiC3HII]*y_cur[IDX_GRAINM] + + k[6763]*y_cur[IDX_H2S2II]*y_cur[IDX_GRAINM] + + k[6765]*y_cur[IDX_CH3C3NHII]*y_cur[IDX_GRAINM] + + k[6768]*y_cur[IDX_SiC3H2II]*y_cur[IDX_GRAINM] + + k[6770]*y_cur[IDX_H3S2II]*y_cur[IDX_GRAINM] + + k[6772]*y_cur[IDX_PC3HII]*y_cur[IDX_GRAINM] + + k[6779]*y_cur[IDX_HC3SII]*y_cur[IDX_GRAINM] + + k[6783]*y_cur[IDX_C6HII]*y_cur[IDX_GRAINM] + + k[6786]*y_cur[IDX_C6H2II]*y_cur[IDX_GRAINM] + + k[6788]*y_cur[IDX_HC5NII]*y_cur[IDX_GRAINM] + + k[6789]*y_cur[IDX_C6H3II]*y_cur[IDX_GRAINM] + + k[6793]*y_cur[IDX_HC5NHII]*y_cur[IDX_GRAINM] + + k[6797]*y_cur[IDX_C6H4II]*y_cur[IDX_GRAINM] + + k[6801]*y_cur[IDX_SiC4HII]*y_cur[IDX_GRAINM] + + k[6802]*y_cur[IDX_C6H5II]*y_cur[IDX_GRAINM] + + k[6804]*y_cur[IDX_H3C5NII]*y_cur[IDX_GRAINM] + + k[6807]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + + k[6808]*y_cur[IDX_C6H7II]*y_cur[IDX_GRAINM] + + k[6812]*y_cur[IDX_PC4HII]*y_cur[IDX_GRAINM] + + k[6820]*y_cur[IDX_HC4SII]*y_cur[IDX_GRAINM] + + k[6825]*y_cur[IDX_C7HII]*y_cur[IDX_GRAINM] + + k[6827]*y_cur[IDX_C7H2II]*y_cur[IDX_GRAINM] + + k[6828]*y_cur[IDX_C7H3II]*y_cur[IDX_GRAINM] + + k[6831]*y_cur[IDX_C7H4II]*y_cur[IDX_GRAINM] + + k[6832]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + + k[6833]*y_cur[IDX_C7H5II]*y_cur[IDX_GRAINM] + + k[6834]*y_cur[IDX_CH3C5NHII]*y_cur[IDX_GRAINM] + + k[6839]*y_cur[IDX_C8HII]*y_cur[IDX_GRAINM] + + k[6842]*y_cur[IDX_C8H2II]*y_cur[IDX_GRAINM] + + k[6844]*y_cur[IDX_HC7NII]*y_cur[IDX_GRAINM] + + k[6845]*y_cur[IDX_C8H3II]*y_cur[IDX_GRAINM] + + k[6848]*y_cur[IDX_C8H4II]*y_cur[IDX_GRAINM] + + k[6850]*y_cur[IDX_H2C7NII]*y_cur[IDX_GRAINM] + + k[6851]*y_cur[IDX_H3C7NII]*y_cur[IDX_GRAINM] + + k[6853]*y_cur[IDX_C8H5II]*y_cur[IDX_GRAINM] + + k[6858]*y_cur[IDX_C9HII]*y_cur[IDX_GRAINM] + + k[6860]*y_cur[IDX_C9H2II]*y_cur[IDX_GRAINM] + + k[6861]*y_cur[IDX_C9H3II]*y_cur[IDX_GRAINM] + + k[6864]*y_cur[IDX_C9H4II]*y_cur[IDX_GRAINM] + + k[6865]*y_cur[IDX_C9H5II]*y_cur[IDX_GRAINM] + + k[6867]*y_cur[IDX_CH3C7NHII]*y_cur[IDX_GRAINM] + + k[6871]*y_cur[IDX_C10HII]*y_cur[IDX_GRAINM] + + k[6874]*y_cur[IDX_C10H2II]*y_cur[IDX_GRAINM] + + k[6877]*y_cur[IDX_HC9NII]*y_cur[IDX_GRAINM] + + k[6878]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] + + k[6879]*y_cur[IDX_C10H3II]*y_cur[IDX_GRAINM] + + k[6881]*y_cur[IDX_H2C9NII]*y_cur[IDX_GRAINM] + + k[6882]*y_cur[IDX_H3C9NII]*y_cur[IDX_GRAINM] - k[6888]*y_cur[IDX_HI] + + k[7070]*y_cur[IDX_GHI] + k[7252]*y_cur[IDX_GHI] + + k[7434]*y_cur[IDX_GHI] + (-hloss) * y_cur[IDX_HI]; - double garea = (4*pi*rG*rG) * (y_cur[IDX_GRAIN0I]+y_cur[IDX_GRAINM]); - double stick1 = (1.0 / (1.0 + 4.2e-2*sqrt(Tgas+Tdust) + 2.3e-3*Tgas - 1.3e-7*Tgas*Tgas)); - double stick2 = exp(-1741.0/Tgas) / (1.0 + 5e-2*sqrt(Tgas+Tdust) + 1e-14*pow(Tgas, 4.0)); - double stick = stick1 + stick2; - double hloss = stick * garea/4.0 * sqrt(8.0*kerg*Tgas/(pi*amu)); - ydot[yistart + IDX_H2I] += 0.5*hloss*y_cur[IDX_HI]; - ydot[yistart + IDX_HI] -= hloss*y_cur[IDX_HI]; // clang-format on } } @@ -31174,12 +31204,13 @@ int Fex(realtype t, N_Vector u, N_Vector udot, void *user_data) { // copy the user data for each system/cell cudaMalloc((void **)&d_udata, sizeof(NaunetData) * nsystem); cudaMemcpyAsync(d_udata, h_udata, sizeof(NaunetData) * nsystem, - cudaMemcpyHostToDevice, stream); + cudaMemcpyHostToDevice, stream); // cudaDeviceSynchronize(); // unsigned block_size = min(BLOCKSIZE, nsystem); // unsigned grid_size = - // max(1, min(MAX_NSYSTEMS_PER_STREAM / BLOCKSIZE, nsystem / BLOCKSIZE)); + // max(1, min(MAX_NSYSTEMS_PER_STREAM / BLOCKSIZE, nsystem / + // BLOCKSIZE)); size_t block_size = NVEC_CUDA_BLOCKSIZE(u); size_t grid_size = NVEC_CUDA_GRIDSIZE(u, nsystem); FexKernel<<>>(y, ydot, d_udata, nsystem); diff --git a/src/naunet_jac.cu b/src/naunet_jac.cu index ff78755..eba3e2f 100644 --- a/src/naunet_jac.cu +++ b/src/naunet_jac.cu @@ -3,18 +3,19 @@ #include #include /* */ -/* */ -#include "naunet_ode.h" -/* */ #include "naunet_constants.h" #include "naunet_macros.h" +#include "naunet_ode.h" #include "naunet_physics.h" -#define IJth(A, i, j) SM_ELEMENT_D(A, i, j) -#define NVEC_CUDA_CONTENT(x) ((N_VectorContent_Cuda)(x->content)) -#define NVEC_CUDA_STREAM(x) (NVEC_CUDA_CONTENT(x)->stream_exec_policy->stream()) -#define NVEC_CUDA_BLOCKSIZE(x) (NVEC_CUDA_CONTENT(x)->stream_exec_policy->blockSize()) -#define NVEC_CUDA_GRIDSIZE(x, n) (NVEC_CUDA_CONTENT(x)->stream_exec_policy->gridSize(n)) +#ifdef USE_CUDA +#define NVEC_CUDA_CONTENT(x) ((N_VectorContent_Cuda)(x->content)) +#define NVEC_CUDA_STREAM(x) (NVEC_CUDA_CONTENT(x)->stream_exec_policy->stream()) +#define NVEC_CUDA_BLOCKSIZE(x) \ + (NVEC_CUDA_CONTENT(x)->stream_exec_policy->blockSize()) +#define NVEC_CUDA_GRIDSIZE(x, n) \ + (NVEC_CUDA_CONTENT(x)->stream_exec_policy->gridSize(n)) +#endif /* */ int InitJac(SUNMatrix jmatrix) { @@ -24,1469 +25,1543 @@ int InitJac(SUNMatrix jmatrix) { // clang-format off // number of non-zero elements in each row int rowptrs[NEQUATIONS + 1] = { - 0, 287, 472, 521, 584, 599, 639, 689, 709, 749, 768, 784, 793, 800, 811, - 957, 1000, 1047, 1171, 1230, 1273, 1418, 1535, 1623, 1718, 1806, 1864, - 1868, 1907, 1945, 1955, 1963, 1981, 1987, 1997, 2033, 2050, 2059, 2113, - 2139, 2151, 2169, 2192, 2200, 2248, 2259, 2343, 2375, 2420, 2493, 2544, - 2585, 2622, 2674, 2679, 2728, 2756, 2788, 2801, 2814, 2873, 2889, 2941, - 2962, 2973, 2987, 3004, 3014, 3080, 3104, 3149, 3227, 3267, 3308, 3386, - 3465, 3514, 3585, 3600, 3612, 3621, 3634, 3644, 3656, 3668, 3673, 3713, - 3749, 3815, 3839, 3883, 3950, 3985, 4027, 4062, 4104, 4141, 4167, 4219, - 4225, 4268, 4334, 4358, 4402, 4472, 4498, 4539, 4580, 4620, 4652, 4674, - 4698, 4712, 4718, 4735, 4801, 4822, 4865, 4929, 4961, 5002, 5030, 5070, - 5108, 5130, 5152, 5172, 5179, 5247, 5266, 5308, 5370, 5396, 5437, 5464, - 5504, 5536, 5556, 5561, 5629, 5646, 5687, 5746, 5776, 5817, 5840, 5878, - 5911, 5931, 5936, 5953, 5960, 5981, 5993, 6001, 6009, 6014, 6151, 6216, - 6254, 6358, 6421, 6489, 6559, 6584, 6594, 6609, 6616, 6627, 6645, 6661, - 6687, 6703, 6722, 6730, 6749, 6756, 6770, 6779, 6791, 6796, 6808, 6961, - 7090, 7105, 7110, 7123, 7139, 7160, 7172, 7181, 7196, 7208, 7217, 7258, - 7283, 7311, 7322, 7344, 7372, 7386, 7407, 7420, 7442, 7459, 7469, 7484, - 7498, 7503, 7510, 7518, 7525, 7541, 7557, 7565, 7575, 7621, 7635, 7657, - 7770, 7801, 7846, 8013, 8050, 8111, 8149, 8163, 8426, 8475, 8541, 8563, - 8572, 8577, 8590, 8615, 8626, 8683, 8717, 8736, 8747, 8753, 8758, 8771, - 8776, 8832, 8887, 8946, 8955, 8963, 8970, 8974, 9011, 9032, 9047, 9061, - 9072, 9076, 9085, 9089, 9095, 9101, 9110, 9116, 9119, 9142, 9158, 9166, - 9176, 9182, 9185, 9189, 9206, 9220, 9228, 9232, 9234, 9236, 9238, 9240, - 9253, 9265, 9272, 9281, 9295, 9308, 9316, 9318, 9333, 9347, 9354, 9363, - 9377, 9389, 9396, 9408, 9419, 9426, 9432, 9436, 9438, 9479, 9508, 9517, - 9524, 9529, 9533, 9540, 9546, 9556, 9570, 9582, 9593, 9595, 9639, 9643, - 9645, 9649, 9651, 9655, 9662, 9665, 9677, 9683, 9695, 9699, 9705, 9720, - 9724, 9737, 9753, 9790, 9795, 9826, 9834, 9843, 9853, 9859, 9872, 9878, - 9880, 9884, 9886, 10010, 10074, 10081, 10086, 10104, 10110, 10125, - 10130, 10134, 10136, 10138, 10142, 10144, 10151, 10157, 10163, 10169, - 10175, 10187, 10191, 10209, 10221, 10234, 10237, 10243, 10246, 10250, - 10254, 10262, 10264, 10270, 10280, 10282, 10286, 10290, 10292, 10304, - 10306, 10308, 10310, 10342, 10350, 10352, 10354, 10373, 10389, 10391, - 10401, 10417, 10419, 10427, 10429, 10471, 10481, 10489, 10495, 10502, - 10529, 10537, 10541, 10543, 10545, 10548, 10825, 11102, 11123, 11126, - 11134, 11139, 11153, 11159, 11165, 11168, 11170, 11173, 11175, 11177, - 11180, 11182, 11189, 11195, 11200, 11204, 11208, 11210, 11214, 11216, - 11218, 11649, 11831, 11886, 12263, 12301, 12308, 12318, 12328, 12361, - 12368, 12378, 12385, 12507, 12589, 12607, 12627, 12637, 12644, 12660, - 12667, 12674, 12872, 12927, 12939, 12946, 12957, 13052, 13125, 13135, - 13149, 13162, 13170, 13369, 13374, 13384, 13396, 13407, 13465, 13481, - 13632, 13665, 13674, 13685, 13694, 13698, 13714, 13729, 13744, 13789, - 13846, 13870, 13903, 13921, 13938, 13946, 13958, 13988, 14004, 14016, - 14040, 14052, 14071, 14083, 14089, 14225, 14269, 14352, 14367, 14375, - 14384, 14501, 14745, 14778, 14793, 14803, 14825, 14833, 14847, 14863, - 14877, 14898, 14931, 14949, 14973, 14993, 15002, 15017, 15022, 15032, - 15118, 15133, 15151, 15162, 15171, 15201, 15237, 15245, 15259, 15272, - 15281, 15296, 15303, 15314, 15326, 15334, 15341, 15355, 15371, 15432, - 15478, 15492, 15507, 15515, 15525, 15531, 15543, 15737, 15927, 15937, - 15993, 16048, 16231, 16293, 16382, 16419, 16491, 16516, 16524, 16554, - 16559, 16574, 16656, 16693, 16759, 16805, 16815, 16821, 16942, 17031, - 17121, 17238, 17325, 17346, 17358, 17382, 17397, 17453, 17508, 17758, - 17837, 17886, 18005, 18054, 18090, 18118, 18149, 18177, 18190, 18236, - 18254, 18405, 18457, 18502, 18548, 18578, 18590, 18597, 18602, 18611, - 18620, 18636, 18643, 18654, 18680, 18705, 18719, 18736, 18748, 18765, - 18772, 18778, 18784, 18802, 18820, 18963, 19061, 19103, 19123, 19139, - 19209, 19273, 19300, 19312, 19417, 19517, 19541, 19563, 19584, 19603, - 19618, 19642, 19654, 19673, 19688, 19704, 19721, 19731, 19750, 19763, - 19773, 19786, 19799, 19816, 19844, 19855, 19869, 19882, 19887, 19914, - 19942, 19961, 19984, 20004, 20025, 20044, 20055, 20067, 20086, 20100, - 20111, 20128, 20140, 20154, 20217, 20270, 20280, 20331, 20374, 20414, - 20813 + 0, 2, 4, 6, 8, 10, 12, 14, 16, 20, 22, 26, 28, 32, 34, 36, 40, 44, 46, + 48, 50, 52, 54, 56, 58, 60, 62, 66, 68, 70, 73, 76, 80, 84, 86, 88, 90, + 93, 99, 103, 107, 110, 112, 118, 122, 126, 128, 130, 132, 135, 137, 139, + 141, 145, 148, 150, 155, 158, 162, 167, 171, 176, 180, 183, 189, 193, + 200, 207, 214, 221, 227, 232, 238, 242, 248, 254, 260, 266, 272, 275, + 280, 284, 288, 294, 299, 304, 309, 315, 323, 330, 334, 339, 343, 347, + 353, 356, 363, 369, 374, 379, 384, 389, 394, 399, 406, 414, 418, 425, + 432, 439, 446, 455, 460, 466, 472, 479, 484, 489, 493, 499, 505, 513, + 519, 527, 533, 541, 547, 555, 561, 568, 575, 582, 587, 594, 601, 608, + 614, 618, 627, 634, 644, 651, 656, 664, 672, 678, 685, 692, 699, 708, + 716, 725, 733, 739, 745, 751, 759, 769, 774, 783, 789, 799, 807, 815, + 824, 833, 840, 850, 857, 864, 870, 878, 887, 895, 905, 915, 927, 936, + 944, 951, 957, 966, 974, 982, 990, 997, 1006, 1015, 1024, 1034, 1043, + 1052, 1064, 1074, 1082, 1092, 1100, 1108, 1113, 1124, 1134, 1144, 1155, + 1164, 1172, 1179, 1190, 1200, 1210, 1217, 1225, 1234, 1242, 1254, 1265, + 1275, 1285, 1297, 1308, 1318, 1328, 1341, 1351, 1362, 1374, 1385, 1398, + 1410, 1422, 1433, 1445, 1454, 1465, 1476, 1486, 1496, 1506, 1515, 1527, + 1538, 1547, 1560, 1572, 1583, 1593, 1603, 1611, 1623, 1636, 1649, 1662, + 1674, 1686, 1693, 1704, 1716, 1729, 1738, 1749, 1761, 1774, 1784, 1797, + 1808, 1823, 1836, 1845, 1857, 1870, 1885, 1901, 1913, 1927, 1942, 1955, + 1969, 1981, 1993, 2005, 2017, 2032, 2042, 2056, 2070, 2081, 2097, 2112, + 2128, 2138, 2149, 2163, 2177, 2191, 2204, 2218, 2233, 2249, 2264, 2276, + 2288, 2304, 2316, 2330, 2347, 2359, 2371, 2383, 2399, 2413, 2425, 2438, + 2454, 2467, 2483, 2499, 2513, 2523, 2534, 2551, 2565, 2579, 2594, 2609, + 2626, 2640, 2654, 2670, 2685, 2697, 2714, 2732, 2745, 2762, 2782, 2796, + 2815, 2830, 2844, 2862, 2877, 2896, 2907, 2920, 2932, 2951, 2971, 2987, + 2999, 3014, 3031, 3043, 3061, 3076, 3090, 3104, 3123, 3142, 3164, 3177, + 3192, 3206, 3219, 3235, 3253, 3275, 3297, 3312, 3332, 3351, 3366, 3381, + 3402, 3416, 3433, 3448, 3464, 3476, 3497, 3515, 3536, 3552, 3568, 3588, + 3606, 3620, 3637, 3653, 3667, 3683, 3704, 3720, 3738, 3755, 3773, 3793, + 3809, 3831, 3848, 3872, 3891, 3907, 3925, 3940, 3958, 3975, 3995, 4019, + 4037, 4058, 4075, 4098, 4124, 4143, 4162, 4188, 4207, 4228, 4249, 4273, + 4297, 4316, 4337, 4363, 4386, 4401, 4423, 4444, 4466, 4490, 4514, 4528, + 4548, 4570, 4593, 4614, 4633, 4657, 4678, 4703, 4726, 4754, 4781, 4805, + 4823, 4853, 4878, 4898, 4920, 4946, 4970, 5002, 5034, 5064, 5097, 5123, + 5138, 5166, 5194, 5222, 5239, 5263, 5290, 5312, 5339, 5369, 5396, 5415, + 5447, 5485, 5511, 5539, 5570, 5603, 5628, 5656, 5696, 5725, 5758, 5795, + 5828, 5863, 5891, 5925, 5957, 5995, 6025, 6053, 6083, 6123, 6160, 6192, + 6225, 6256, 6296, 6327, 6363, 6396, 6437, 6474, 6512, 6547, 6589, 6614, + 6651, 6687, 6719, 6756, 6795, 6837, 6874, 6910, 6954, 6979, 7022, 7062, + 7100, 7146, 7183, 7219, 7257, 7295, 7341, 7385, 7431, 7477, 7519, 7559, + 7602, 7643, 7692, 7733, 7778, 7823, 7868, 7908, 7949, 7989, 8030, 8071, + 8112, 8153, 8193, 8235, 8278, 8339, 8388, 8445, 8494, 8535, 8581, 8636, + 8693, 8736, 8787, 8836, 8878, 8925, 8973, 9018, 9063, 9107, 9165, 9209, + 9252, 9305, 9359, 9400, 9451, 9517, 9566, 9625, 9677, 9729, 9792, 9844, + 9899, 9951, 10015, 10074, 10139, 10205, 10254, 10304, 10363, 10426, + 10481, 10537, 10592, 10647, 10703, 10759, 10822, 10884, 10950, 11018, + 11086, 11145, 11227, 11293, 11359, 11420, 11486, 11556, 11620, 11678, + 11749, 11821, 11889, 11953, 12023, 12093, 12160, 12233, 12295, 12368, + 12450, 12534, 12612, 12699, 12778, 12856, 12935, 13018, 13122, 13208, + 13297, 13385, 13473, 13563, 13652, 13771, 13871, 13966, 14064, 14169, + 14264, 14381, 14498, 14611, 14735, 14857, 14993, 15130, 15273, 15419, + 15570, 15691, 15808, 15937, 16082, 16249, 16373, 16526, 16709, 16860, + 17110, 17300, 17494, 17679, 17877, 18059, 18346, 18590, 18789, 19052, + 19329, 19606, 19983, 20382, 20813 }; // the column index of non-zero elements int colvals[NNZ] = { - 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 14, 15, 16, 17, 18, 19, 20, - 21, 22, 23, 24, 25, 27, 31, 37, 38, 41, 42, 43, 44, 45, 46, 47, 48, 49, - 50, 51, 52, 54, 55, 56, 59, 61, 62, 64, 65, 66, 67, 68, 69, 70, 71, 72, - 73, 74, 75, 76, 79, 82, 83, 84, 85, 86, 87, 89, 90, 91, 92, 93, 94, 95, - 97, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 111, 114, 115, 116, - 117, 118, 119, 120, 121, 122, 125, 127, 128, 129, 130, 131, 132, 133, - 134, 135, 138, 139, 140, 141, 142, 143, 144, 145, 146, 149, 151, 152, - 153, 154, 155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 168, 170, - 176, 178, 181, 182, 185, 186, 189, 190, 192, 193, 194, 195, 201, 203, - 206, 211, 212, 215, 220, 221, 222, 223, 224, 226, 227, 228, 230, 232, - 233, 234, 235, 236, 239, 243, 244, 245, 404, 429, 430, 431, 432, 433, - 437, 439, 441, 442, 450, 451, 455, 456, 459, 461, 468, 474, 477, 493, - 494, 495, 496, 499, 500, 501, 502, 507, 508, 518, 519, 520, 524, 529, - 532, 535, 537, 538, 546, 548, 549, 550, 551, 552, 553, 554, 557, 560, - 561, 562, 566, 567, 568, 569, 570, 573, 575, 576, 577, 578, 579, 580, - 581, 582, 584, 585, 587, 588, 589, 590, 591, 592, 597, 602, 608, 611, - 613, 614, 615, 616, 618, 619, 620, 622, 623, 624, 625, 626, 627, 628, - 629, 631, 632, 633, 634, 636, 637, 638, 639, 641, 642, 643, 644, 645, - 647, 648, 649, 650, 651, 652, 654, 655, 656, 658, 661, 663, 665, 666, - 667, 668, 0, 1, 2, 3, 5, 6, 8, 9, 14, 15, 16, 17, 19, 20, 22, 24, 27, - 31, 34, 37, 41, 43, 45, 47, 48, 50, 51, 61, 62, 64, 65, 67, 69, 70, 72, - 73, 75, 83, 85, 87, 89, 90, 92, 93, 99, 100, 102, 103, 105, 106, 111, - 114, 116, 117, 119, 120, 127, 129, 130, 132, 133, 138, 140, 141, 143, - 144, 151, 153, 156, 157, 158, 159, 160, 161, 163, 165, 168, 170, 174, - 176, 178, 180, 181, 183, 186, 188, 190, 191, 193, 194, 195, 198, 201, - 203, 206, 211, 212, 215, 218, 221, 222, 223, 225, 226, 227, 228, 230, - 232, 233, 235, 239, 243, 404, 429, 431, 432, 437, 441, 443, 450, 455, - 459, 475, 478, 485, 488, 490, 493, 499, 502, 507, 511, 513, 515, 518, - 519, 526, 535, 537, 546, 548, 550, 553, 555, 557, 560, 562, 566, 569, - 573, 575, 577, 579, 580, 581, 582, 585, 587, 589, 591, 592, 602, 608, - 611, 613, 615, 618, 620, 622, 624, 626, 628, 630, 633, 635, 641, 643, - 647, 649, 651, 653, 656, 662, 666, 668, 0, 1, 2, 16, 21, 23, 74, 76, 86, - 156, 159, 162, 182, 224, 228, 244, 429, 430, 432, 442, 450, 456, 461, - 468, 477, 495, 500, 546, 549, 550, 551, 554, 560, 567, 568, 569, 570, - 576, 577, 578, 580, 589, 614, 619, 623, 663, 665, 667, 668, 0, 1, 3, 5, - 6, 7, 9, 12, 14, 16, 21, 23, 45, 47, 67, 69, 74, 76, 86, 87, 89, 100, - 102, 114, 116, 127, 129, 140, 141, 162, 182, 224, 244, 245, 246, 293, - 404, 430, 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, - 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, - 3, 4, 9, 138, 141, 142, 144, 145, 404, 430, 432, 546, 668, 0, 1, 3, 5, - 21, 23, 74, 76, 86, 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, - 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, - 614, 619, 623, 663, 665, 667, 668, 0, 1, 5, 6, 8, 9, 10, 21, 23, 74, 76, - 86, 143, 144, 162, 182, 224, 244, 245, 246, 247, 294, 341, 404, 429, - 430, 442, 456, 461, 468, 477, 495, 500, 546, 549, 551, 554, 567, 568, - 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, 3, 4, 6, 7, - 9, 21, 130, 144, 145, 146, 404, 430, 432, 461, 500, 546, 577, 668, 0, 1, - 6, 8, 21, 23, 74, 76, 86, 162, 182, 224, 244, 429, 430, 442, 456, 461, - 468, 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, - 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, 8, 9, 11, 17, 133, 247, - 248, 294, 299, 341, 404, 429, 430, 461, 500, 546, 668, 0, 6, 7, 9, 10, - 21, 130, 133, 146, 404, 430, 432, 461, 500, 577, 668, 9, 11, 21, 133, - 404, 461, 500, 577, 668, 0, 6, 12, 245, 246, 249, 577, 0, 1, 3, 6, 7, 9, - 10, 12, 13, 404, 668, 0, 1, 2, 3, 4, 6, 12, 13, 14, 15, 16, 17, 18, 20, - 21, 23, 24, 34, 37, 38, 41, 43, 44, 45, 46, 47, 52, 59, 60, 62, 63, 64, - 65, 66, 67, 68, 69, 70, 73, 74, 76, 82, 83, 84, 86, 87, 88, 89, 90, 98, - 100, 101, 102, 103, 114, 115, 116, 117, 126, 127, 128, 129, 130, 138, - 139, 141, 150, 151, 152, 156, 157, 159, 162, 171, 182, 194, 218, 220, - 221, 222, 224, 226, 227, 235, 244, 245, 250, 404, 429, 430, 431, 433, - 441, 442, 451, 456, 461, 468, 477, 478, 479, 493, 494, 495, 499, 500, - 518, 524, 546, 549, 550, 551, 553, 554, 561, 562, 563, 566, 567, 568, - 569, 570, 576, 577, 578, 580, 581, 584, 587, 589, 590, 613, 614, 619, - 623, 624, 626, 627, 633, 634, 638, 639, 663, 665, 667, 668, 0, 1, 14, - 15, 17, 18, 20, 43, 59, 62, 65, 67, 83, 156, 157, 159, 218, 222, 227, - 404, 430, 432, 433, 450, 451, 493, 499, 519, 546, 550, 551, 553, 560, - 562, 569, 577, 578, 580, 581, 589, 590, 613, 668, 0, 1, 14, 16, 21, 23, - 45, 47, 67, 74, 76, 86, 87, 100, 114, 127, 162, 182, 224, 244, 429, 430, - 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, - 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, 2, 14, 16, - 17, 18, 19, 20, 21, 22, 23, 25, 48, 49, 50, 51, 52, 54, 55, 70, 71, 73, - 74, 75, 76, 86, 90, 93, 94, 103, 106, 107, 120, 121, 133, 144, 156, 157, - 158, 159, 160, 162, 163, 182, 193, 194, 198, 220, 221, 222, 224, 227, - 235, 244, 245, 250, 251, 299, 341, 404, 429, 430, 431, 432, 433, 442, - 450, 451, 455, 456, 461, 468, 474, 475, 477, 478, 479, 484, 486, 487, - 493, 494, 495, 496, 500, 518, 519, 524, 546, 549, 550, 551, 553, 554, - 557, 561, 562, 563, 566, 567, 568, 569, 570, 576, 577, 578, 580, 584, - 587, 589, 590, 598, 613, 614, 619, 623, 628, 629, 630, 663, 665, 667, - 668, 0, 1, 14, 15, 17, 18, 20, 22, 24, 70, 73, 156, 157, 159, 160, 181, - 182, 218, 220, 221, 222, 227, 228, 404, 430, 432, 433, 441, 442, 450, - 451, 461, 468, 478, 485, 493, 494, 499, 500, 518, 519, 524, 546, 550, - 551, 553, 554, 560, 561, 562, 563, 566, 569, 577, 578, 584, 590, 613, - 668, 0, 1, 17, 19, 20, 21, 23, 50, 74, 76, 86, 162, 182, 224, 244, 429, - 430, 431, 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, - 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, - 2, 5, 8, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 28, 35, 38, 39, - 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 58, 61, 68, 69, 70, 71, 72, - 73, 74, 76, 77, 82, 88, 89, 90, 92, 93, 99, 101, 102, 103, 104, 105, - 106, 110, 111, 116, 117, 119, 120, 121, 129, 132, 140, 143, 156, 157, - 158, 159, 161, 162, 163, 167, 171, 181, 182, 193, 218, 219, 220, 221, - 223, 229, 243, 245, 251, 252, 299, 300, 341, 404, 429, 430, 431, 432, - 433, 437, 441, 450, 451, 455, 461, 468, 478, 479, 480, 493, 494, 499, - 500, 501, 518, 546, 548, 550, 554, 557, 566, 569, 575, 577, 578, 579, - 580, 581, 582, 589, 591, 593, 594, 595, 603, 605, 606, 614, 615, 619, - 622, 623, 627, 629, 642, 668, 0, 1, 2, 5, 8, 14, 15, 16, 17, 18, 19, 20, - 21, 22, 23, 24, 34, 39, 47, 48, 50, 51, 52, 61, 69, 70, 72, 73, 89, 90, - 92, 93, 99, 102, 103, 105, 106, 116, 117, 119, 120, 129, 130, 132, 133, - 140, 143, 156, 157, 158, 159, 161, 163, 165, 181, 182, 193, 194, 198, - 218, 219, 220, 221, 223, 226, 229, 243, 404, 429, 430, 431, 432, 433, - 437, 441, 442, 450, 451, 455, 461, 478, 479, 485, 488, 493, 494, 499, - 500, 518, 524, 546, 548, 550, 554, 560, 561, 562, 563, 566, 567, 569, - 575, 577, 578, 579, 581, 582, 584, 589, 590, 591, 592, 613, 615, 622, - 653, 668, 0, 1, 2, 5, 8, 16, 17, 19, 20, 21, 22, 23, 24, 25, 27, 28, 31, - 35, 47, 50, 52, 54, 55, 58, 61, 69, 71, 72, 74, 76, 79, 89, 92, 94, 99, - 102, 105, 107, 111, 116, 119, 121, 129, 132, 140, 143, 158, 159, 162, - 163, 165, 167, 181, 182, 193, 194, 203, 221, 223, 245, 252, 253, 299, - 300, 312, 341, 404, 429, 430, 431, 461, 468, 478, 479, 500, 546, 550, - 577, 579, 580, 582, 589, 591, 614, 615, 623, 653, 668, 0, 1, 2, 5, 8, - 16, 17, 19, 20, 21, 22, 23, 24, 25, 27, 31, 34, 47, 48, 49, 50, 51, 61, - 69, 70, 72, 73, 82, 89, 90, 92, 93, 99, 102, 103, 105, 106, 111, 116, - 117, 119, 120, 129, 132, 140, 143, 157, 158, 159, 161, 165, 182, 183, - 193, 194, 195, 198, 203, 218, 219, 220, 223, 226, 404, 429, 430, 431, - 432, 433, 437, 450, 455, 461, 478, 493, 494, 499, 500, 501, 518, 546, - 550, 554, 557, 566, 577, 578, 579, 582, 591, 613, 614, 615, 622, 668, 0, - 1, 14, 21, 22, 23, 24, 25, 26, 27, 28, 30, 33, 34, 35, 39, 46, 49, 52, - 54, 55, 56, 58, 70, 71, 74, 79, 88, 94, 107, 110, 121, 156, 161, 162, - 163, 181, 182, 193, 194, 195, 198, 218, 219, 220, 221, 229, 253, 254, - 299, 300, 312, 341, 404, 429, 430, 433, 441, 450, 451, 455, 461, 468, - 478, 479, 493, 500, 518, 546, 550, 559, 566, 577, 578, 581, 589, 590, - 593, 596, 603, 605, 614, 617, 619, 622, 623, 653, 668, 0, 1, 17, 20, 21, - 22, 24, 25, 27, 28, 34, 35, 39, 46, 48, 51, 56, 70, 73, 88, 90, 93, 103, - 106, 117, 120, 157, 160, 161, 193, 194, 218, 219, 229, 404, 429, 430, - 432, 433, 437, 451, 455, 461, 468, 478, 479, 500, 546, 550, 566, 577, - 578, 581, 590, 613, 622, 653, 668, 26, 255, 304, 341, 0, 1, 21, 25, 27, - 29, 31, 32, 33, 34, 35, 36, 57, 70, 181, 194, 221, 254, 256, 300, 312, - 341, 404, 430, 450, 451, 455, 461, 493, 500, 546, 550, 566, 577, 589, - 614, 623, 653, 668, 1, 20, 22, 23, 24, 25, 27, 28, 31, 34, 35, 160, 182, - 194, 195, 198, 218, 219, 220, 404, 429, 433, 441, 450, 455, 461, 478, - 493, 500, 518, 546, 559, 566, 581, 590, 619, 653, 668, 29, 30, 203, 219, - 255, 257, 341, 404, 589, 668, 29, 30, 182, 198, 203, 219, 404, 668, 1, - 31, 33, 203, 258, 308, 312, 404, 430, 461, 468, 500, 510, 546, 566, 617, - 623, 668, 1, 31, 32, 404, 430, 668, 24, 31, 33, 404, 441, 468, 500, 510, - 566, 668, 1, 14, 21, 23, 24, 25, 27, 34, 35, 36, 58, 70, 156, 182, 203, - 220, 221, 256, 259, 312, 341, 404, 430, 433, 451, 455, 461, 493, 500, - 546, 566, 589, 590, 617, 653, 668, 20, 24, 27, 34, 35, 404, 429, 433, - 450, 451, 455, 461, 493, 500, 566, 590, 668, 34, 36, 220, 404, 493, 500, - 566, 590, 668, 0, 2, 5, 8, 16, 17, 19, 37, 39, 40, 47, 50, 59, 61, 69, - 72, 82, 89, 92, 99, 102, 105, 116, 119, 125, 129, 132, 140, 143, 149, - 158, 223, 224, 245, 250, 260, 329, 381, 404, 430, 431, 439, 461, 492, - 532, 546, 550, 557, 577, 579, 582, 591, 615, 668, 1, 14, 15, 18, 20, 21, - 37, 38, 157, 221, 404, 430, 450, 455, 478, 479, 493, 518, 546, 550, 551, - 557, 560, 561, 566, 668, 20, 24, 39, 222, 404, 429, 432, 450, 493, 551, - 557, 668, 15, 21, 23, 37, 38, 40, 49, 157, 404, 450, 461, 493, 519, 546, - 550, 562, 569, 668, 0, 1, 16, 19, 41, 49, 62, 250, 261, 393, 404, 430, - 461, 468, 474, 499, 500, 546, 550, 577, 580, 613, 668, 1, 41, 42, 222, - 228, 404, 430, 668, 1, 2, 5, 8, 14, 16, 17, 19, 43, 47, 50, 61, 66, 69, - 72, 86, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 158, 223, - 262, 404, 430, 431, 461, 468, 477, 482, 484, 500, 546, 577, 579, 582, - 587, 591, 613, 615, 668, 1, 17, 21, 43, 44, 404, 430, 432, 613, 614, - 668, 0, 1, 3, 6, 7, 9, 12, 13, 14, 16, 17, 20, 21, 23, 24, 45, 46, 47, - 48, 49, 52, 59, 62, 64, 66, 67, 68, 69, 71, 74, 76, 81, 83, 85, 86, 87, - 88, 89, 90, 100, 101, 102, 103, 114, 115, 116, 129, 162, 182, 224, 244, - 245, 250, 263, 404, 430, 437, 442, 456, 461, 468, 477, 495, 500, 519, - 546, 549, 550, 551, 554, 566, 567, 568, 570, 576, 577, 578, 614, 619, - 623, 663, 665, 667, 668, 0, 1, 14, 15, 17, 18, 20, 24, 43, 45, 46, 48, - 62, 64, 67, 85, 87, 156, 157, 161, 193, 218, 404, 430, 432, 437, 478, - 493, 519, 546, 580, 668, 0, 1, 21, 23, 45, 47, 67, 69, 74, 76, 86, 87, - 100, 114, 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, 477, 495, - 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, - 623, 663, 665, 667, 668, 0, 1, 9, 19, 20, 21, 23, 25, 47, 48, 49, 50, - 51, 52, 54, 70, 71, 72, 74, 76, 86, 90, 93, 94, 103, 105, 107, 161, 162, - 182, 224, 244, 245, 250, 251, 263, 264, 299, 341, 404, 429, 430, 437, - 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, 566, 567, - 568, 569, 570, 576, 577, 578, 598, 614, 619, 623, 635, 636, 663, 665, - 667, 668, 0, 1, 14, 15, 18, 20, 21, 23, 24, 38, 45, 46, 48, 49, 51, 52, - 73, 74, 82, 90, 93, 156, 159, 161, 182, 193, 215, 218, 228, 404, 429, - 430, 432, 437, 450, 455, 461, 468, 478, 479, 493, 500, 519, 546, 550, - 566, 569, 580, 587, 622, 668, 0, 1, 21, 23, 48, 50, 72, 74, 76, 86, 162, - 182, 224, 244, 429, 430, 442, 456, 461, 468, 477, 495, 500, 546, 549, - 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, 665, - 667, 668, 0, 1, 17, 20, 21, 22, 23, 25, 49, 51, 52, 54, 74, 76, 94, 107, - 156, 161, 162, 182, 215, 251, 264, 265, 299, 341, 404, 430, 461, 468, - 500, 546, 550, 566, 614, 623, 668, 0, 1, 15, 17, 18, 20, 21, 22, 23, 24, - 25, 34, 46, 48, 49, 51, 52, 68, 70, 73, 74, 75, 90, 93, 103, 106, 156, - 157, 159, 160, 161, 163, 165, 182, 193, 218, 404, 429, 430, 432, 437, - 461, 468, 500, 546, 550, 577, 592, 613, 614, 622, 668, 21, 53, 226, 404, - 668, 0, 1, 17, 20, 21, 22, 23, 24, 25, 28, 34, 48, 49, 51, 52, 54, 55, - 70, 73, 75, 90, 93, 103, 106, 111, 161, 162, 163, 165, 182, 194, 218, - 404, 429, 430, 432, 437, 461, 468, 478, 500, 519, 546, 566, 577, 581, - 613, 622, 668, 0, 1, 18, 20, 21, 22, 23, 24, 52, 55, 161, 163, 182, 193, - 198, 218, 404, 429, 430, 461, 468, 479, 500, 550, 577, 581, 619, 668, 0, - 1, 20, 21, 23, 24, 25, 28, 34, 35, 55, 56, 111, 162, 182, 193, 194, 198, - 203, 218, 404, 432, 461, 468, 478, 479, 500, 550, 554, 581, 614, 668, 1, - 25, 34, 57, 58, 194, 203, 404, 429, 581, 614, 619, 668, 25, 34, 56, 58, - 182, 194, 404, 429, 432, 468, 554, 566, 668, 0, 1, 14, 21, 23, 47, 48, - 59, 61, 74, 76, 81, 82, 86, 98, 162, 182, 183, 224, 244, 245, 260, 263, - 266, 381, 404, 430, 442, 456, 461, 468, 477, 479, 480, 483, 485, 486, - 493, 495, 500, 519, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, - 578, 614, 619, 623, 663, 665, 667, 668, 1, 15, 18, 49, 59, 60, 221, 404, - 430, 432, 478, 493, 519, 546, 550, 668, 0, 1, 5, 8, 21, 23, 59, 61, 74, - 76, 86, 89, 102, 105, 116, 119, 129, 132, 140, 143, 162, 182, 224, 244, - 429, 430, 442, 456, 461, 468, 477, 495, 500, 519, 546, 549, 550, 551, - 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, - 1, 49, 53, 62, 245, 261, 263, 267, 393, 404, 430, 461, 462, 468, 481, - 500, 546, 577, 587, 668, 1, 46, 62, 63, 218, 404, 430, 432, 450, 580, - 668, 1, 64, 83, 84, 268, 404, 461, 468, 500, 546, 577, 597, 598, 668, 1, - 17, 65, 86, 235, 245, 262, 269, 404, 430, 461, 468, 482, 484, 500, 546, - 668, 0, 1, 48, 65, 66, 404, 430, 477, 614, 668, 0, 1, 3, 12, 13, 14, 16, - 21, 23, 45, 47, 48, 67, 69, 70, 71, 74, 76, 81, 86, 87, 89, 91, 97, 100, - 101, 102, 103, 115, 116, 140, 162, 182, 224, 244, 245, 263, 270, 404, - 430, 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, 567, - 568, 570, 576, 577, 578, 614, 619, 623, 638, 663, 665, 667, 668, 0, 1, - 20, 45, 48, 51, 52, 62, 64, 65, 67, 68, 70, 73, 87, 97, 100, 218, 404, - 430, 432, 437, 546, 668, 0, 1, 14, 21, 23, 45, 67, 69, 74, 76, 86, 87, - 89, 100, 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, 477, 495, - 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, - 623, 663, 665, 667, 668, 0, 1, 14, 20, 21, 23, 24, 25, 34, 50, 51, 52, - 54, 69, 70, 71, 72, 73, 74, 75, 76, 78, 86, 90, 91, 92, 94, 106, 119, - 162, 163, 182, 186, 193, 194, 218, 224, 244, 245, 263, 264, 270, 271, - 299, 341, 404, 429, 430, 437, 442, 456, 461, 468, 477, 485, 487, 495, - 500, 518, 546, 549, 550, 551, 554, 557, 567, 568, 570, 576, 577, 578, - 614, 619, 623, 663, 665, 667, 668, 0, 1, 15, 17, 18, 20, 22, 24, 48, 51, - 52, 54, 67, 68, 70, 71, 73, 90, 93, 103, 106, 161, 162, 193, 218, 404, - 430, 432, 437, 461, 468, 478, 485, 493, 500, 546, 577, 614, 623, 668, 0, - 1, 21, 23, 70, 72, 74, 76, 86, 92, 162, 182, 224, 244, 429, 430, 442, - 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, - 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, 2, 5, 8, 14, 16, - 17, 19, 20, 21, 23, 25, 34, 47, 49, 50, 52, 54, 61, 69, 70, 71, 72, 73, - 74, 75, 76, 77, 78, 80, 89, 91, 92, 94, 95, 99, 102, 105, 116, 119, 129, - 132, 140, 143, 158, 161, 162, 182, 193, 215, 218, 221, 223, 264, 271, - 272, 299, 341, 404, 429, 430, 431, 461, 466, 468, 479, 500, 546, 569, - 577, 579, 582, 591, 614, 615, 623, 668, 0, 1, 2, 5, 8, 16, 17, 18, 19, - 20, 21, 22, 23, 24, 25, 46, 47, 48, 50, 51, 52, 54, 55, 61, 69, 70, 71, - 72, 73, 74, 75, 88, 89, 90, 92, 93, 99, 102, 105, 116, 119, 129, 132, - 140, 143, 158, 161, 162, 163, 182, 193, 218, 223, 404, 429, 430, 431, - 432, 437, 461, 468, 478, 479, 485, 493, 500, 546, 550, 569, 577, 579, - 582, 591, 592, 613, 614, 615, 622, 668, 0, 1, 2, 5, 8, 14, 16, 19, 24, - 47, 50, 61, 69, 72, 75, 76, 77, 89, 92, 99, 102, 105, 111, 116, 119, - 129, 132, 140, 143, 158, 163, 193, 194, 223, 272, 273, 341, 404, 430, - 431, 461, 468, 500, 546, 579, 582, 591, 615, 668, 0, 1, 2, 5, 8, 16, 17, - 19, 20, 21, 22, 23, 24, 25, 46, 47, 48, 49, 50, 51, 52, 55, 56, 61, 69, - 70, 71, 72, 73, 74, 75, 76, 82, 89, 90, 92, 93, 99, 102, 105, 116, 119, - 129, 132, 140, 143, 158, 161, 163, 182, 183, 193, 194, 215, 218, 223, - 404, 429, 430, 431, 437, 461, 466, 468, 500, 579, 582, 591, 613, 615, - 668, 20, 52, 55, 73, 75, 76, 77, 163, 193, 404, 429, 461, 468, 500, 668, - 20, 21, 24, 25, 28, 78, 161, 182, 193, 404, 550, 668, 22, 24, 79, 80, - 156, 194, 198, 274, 429, 20, 23, 24, 25, 34, 35, 56, 57, 80, 194, 198, - 404, 668, 0, 61, 69, 70, 81, 97, 99, 275, 550, 577, 1, 20, 46, 82, 218, - 404, 432, 450, 478, 493, 519, 668, 1, 83, 276, 404, 430, 461, 468, 500, - 546, 577, 598, 668, 83, 84, 404, 430, 668, 1, 2, 5, 8, 16, 19, 47, 50, - 61, 69, 72, 85, 86, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, - 158, 223, 277, 404, 430, 431, 461, 468, 484, 500, 546, 579, 582, 591, - 615, 668, 1, 2, 5, 8, 16, 19, 47, 50, 61, 69, 70, 72, 85, 86, 89, 92, - 99, 102, 105, 116, 119, 129, 132, 140, 143, 158, 223, 404, 430, 431, - 579, 582, 591, 614, 615, 668, 0, 1, 3, 5, 6, 7, 12, 13, 16, 21, 23, 24, - 45, 47, 69, 70, 74, 76, 86, 87, 88, 89, 90, 91, 94, 97, 100, 101, 102, - 114, 115, 129, 162, 182, 224, 244, 245, 270, 278, 404, 430, 442, 456, - 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, - 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, 3, 20, 24, 67, 70, - 71, 74, 83, 85, 87, 88, 90, 93, 100, 114, 218, 404, 430, 432, 493, 546, - 668, 0, 1, 14, 21, 23, 45, 67, 74, 76, 86, 87, 89, 102, 162, 182, 224, - 244, 429, 430, 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, - 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, - 1, 6, 7, 9, 21, 23, 25, 52, 54, 71, 72, 73, 74, 76, 86, 89, 90, 92, 93, - 94, 95, 103, 104, 105, 107, 132, 162, 182, 187, 224, 244, 245, 270, 271, - 278, 279, 299, 341, 404, 429, 430, 442, 456, 461, 468, 477, 495, 500, - 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, - 663, 665, 667, 668, 0, 1, 6, 9, 20, 21, 46, 48, 49, 73, 74, 75, 76, 82, - 87, 88, 90, 91, 93, 107, 117, 120, 218, 404, 430, 432, 461, 478, 485, - 493, 500, 546, 550, 577, 668, 0, 1, 8, 21, 23, 74, 76, 86, 90, 92, 105, - 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, 477, 495, 500, 546, - 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, - 665, 667, 668, 0, 1, 17, 21, 23, 25, 51, 52, 54, 71, 74, 75, 76, 92, 93, - 95, 96, 108, 162, 182, 187, 271, 279, 280, 299, 341, 404, 429, 430, 461, - 500, 546, 550, 577, 668, 0, 1, 17, 20, 21, 22, 23, 24, 25, 46, 48, 49, - 51, 52, 54, 68, 70, 73, 75, 76, 88, 90, 91, 93, 94, 101, 161, 162, 182, - 186, 193, 218, 404, 430, 432, 437, 461, 500, 546, 550, 577, 668, 0, 1, - 17, 20, 21, 22, 23, 24, 25, 46, 48, 49, 51, 52, 54, 68, 71, 73, 93, 95, - 111, 161, 162, 163, 182, 186, 193, 218, 404, 430, 437, 461, 500, 546, - 550, 577, 668, 20, 21, 23, 24, 25, 51, 52, 54, 55, 56, 74, 76, 96, 111, - 161, 162, 186, 193, 218, 404, 437, 461, 500, 546, 550, 668, 0, 1, 21, - 23, 74, 76, 86, 89, 90, 97, 99, 125, 126, 162, 182, 188, 224, 244, 278, - 281, 381, 404, 430, 442, 456, 461, 463, 468, 477, 485, 486, 487, 495, - 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, - 623, 663, 665, 667, 668, 91, 98, 404, 432, 550, 668, 1, 5, 21, 23, 74, - 76, 86, 97, 99, 116, 129, 140, 162, 182, 224, 244, 429, 430, 442, 456, - 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, - 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, 3, 5, 8, 12, 13, 14, - 16, 21, 23, 45, 47, 67, 69, 74, 76, 86, 89, 90, 100, 102, 103, 104, 107, - 114, 115, 116, 118, 125, 128, 140, 162, 182, 224, 244, 245, 278, 282, - 404, 430, 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, - 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, - 3, 17, 20, 71, 87, 90, 91, 93, 94, 100, 101, 103, 106, 114, 125, 127, - 218, 404, 430, 432, 546, 668, 0, 1, 14, 21, 23, 45, 67, 74, 76, 86, 100, - 102, 116, 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, 477, 495, - 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, - 623, 663, 665, 667, 668, 0, 1, 9, 14, 21, 23, 25, 52, 54, 73, 74, 76, - 86, 92, 93, 102, 103, 105, 106, 107, 108, 109, 110, 117, 118, 119, 121, - 143, 162, 182, 190, 224, 244, 245, 278, 279, 282, 283, 299, 341, 404, - 429, 430, 442, 456, 461, 468, 477, 488, 489, 495, 500, 546, 549, 550, - 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, - 668, 0, 1, 17, 20, 21, 68, 70, 71, 93, 94, 95, 100, 101, 103, 104, 106, - 130, 133, 404, 430, 432, 461, 488, 500, 546, 668, 0, 1, 21, 23, 74, 76, - 86, 103, 105, 119, 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, - 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, - 614, 619, 623, 663, 665, 667, 668, 0, 1, 17, 20, 21, 23, 24, 25, 52, 54, - 70, 73, 105, 106, 108, 109, 110, 111, 112, 113, 122, 162, 163, 182, 186, - 193, 194, 221, 279, 283, 284, 299, 341, 404, 429, 430, 461, 500, 546, - 577, 668, 0, 1, 17, 20, 21, 22, 23, 24, 25, 48, 51, 52, 54, 70, 71, 73, - 74, 88, 90, 95, 101, 103, 104, 106, 107, 161, 162, 182, 186, 193, 218, - 404, 430, 432, 437, 461, 500, 550, 577, 668, 0, 1, 17, 20, 21, 22, 23, - 25, 48, 51, 52, 54, 70, 71, 73, 74, 76, 88, 93, 106, 108, 162, 182, 186, - 188, 218, 404, 437, 461, 500, 577, 668, 20, 22, 23, 24, 25, 51, 52, 54, - 70, 71, 73, 74, 76, 77, 94, 109, 161, 162, 218, 404, 437, 668, 20, 22, - 24, 52, 54, 55, 74, 76, 77, 94, 110, 111, 112, 161, 162, 163, 193, 218, - 404, 429, 432, 546, 550, 668, 1, 23, 56, 111, 113, 220, 285, 404, 461, - 468, 500, 546, 554, 668, 1, 111, 112, 404, 429, 668, 23, 24, 55, 56, - 110, 111, 113, 163, 193, 220, 404, 432, 461, 468, 500, 554, 668, 0, 1, - 3, 5, 6, 12, 13, 14, 16, 21, 23, 45, 47, 67, 69, 74, 76, 86, 87, 89, - 102, 103, 114, 116, 117, 118, 121, 125, 127, 128, 129, 139, 162, 182, - 224, 244, 245, 282, 286, 404, 430, 442, 456, 461, 468, 477, 495, 500, - 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, - 663, 665, 667, 668, 0, 1, 3, 6, 48, 71, 100, 103, 106, 107, 114, 115, - 117, 120, 127, 138, 404, 430, 432, 546, 668, 0, 1, 14, 21, 23, 45, 74, - 76, 86, 114, 116, 129, 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, - 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, - 614, 619, 623, 663, 665, 667, 668, 0, 1, 6, 7, 8, 9, 21, 23, 25, 74, 76, - 86, 105, 106, 116, 117, 119, 120, 121, 122, 123, 130, 131, 132, 134, - 162, 182, 224, 244, 245, 282, 283, 286, 287, 299, 341, 404, 429, 430, - 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, - 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, 6, 9, 20, - 21, 48, 52, 70, 71, 88, 90, 106, 107, 108, 114, 115, 117, 118, 120, 141, - 144, 404, 430, 432, 461, 488, 500, 546, 550, 577, 668, 0, 1, 21, 23, 74, - 76, 86, 117, 119, 132, 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, - 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, - 614, 619, 623, 663, 665, 667, 668, 0, 1, 17, 21, 23, 25, 93, 119, 120, - 122, 123, 124, 135, 182, 283, 287, 288, 299, 341, 404, 429, 430, 461, - 500, 546, 550, 577, 668, 0, 17, 20, 21, 22, 23, 24, 25, 48, 52, 54, 70, - 71, 73, 74, 88, 90, 93, 94, 101, 103, 108, 117, 118, 120, 121, 162, 182, - 190, 218, 404, 430, 432, 437, 461, 500, 546, 550, 577, 668, 0, 1, 21, - 22, 23, 24, 25, 48, 51, 52, 54, 70, 71, 73, 74, 76, 88, 90, 93, 94, 101, - 106, 120, 122, 161, 162, 182, 190, 218, 404, 430, 437, 461, 500, 546, - 550, 577, 668, 22, 23, 24, 25, 51, 71, 74, 76, 90, 93, 94, 107, 123, - 161, 190, 193, 218, 404, 430, 437, 550, 668, 1, 24, 25, 54, 73, 74, 76, - 93, 94, 107, 111, 124, 161, 162, 190, 193, 218, 404, 461, 500, 550, 668, - 0, 116, 117, 125, 149, 150, 191, 286, 289, 381, 404, 435, 461, 464, 489, - 500, 546, 550, 577, 668, 118, 125, 126, 404, 432, 550, 668, 0, 1, 3, 4, - 6, 12, 13, 14, 16, 21, 23, 45, 47, 67, 69, 74, 76, 86, 87, 89, 100, 102, - 116, 117, 127, 129, 130, 131, 134, 138, 139, 140, 142, 149, 162, 182, - 224, 244, 245, 286, 290, 404, 430, 442, 456, 461, 468, 477, 495, 500, - 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, - 663, 665, 667, 668, 0, 1, 3, 114, 117, 118, 120, 121, 127, 128, 130, - 133, 138, 149, 404, 430, 432, 546, 668, 0, 1, 14, 21, 23, 74, 76, 86, - 127, 129, 140, 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, 477, - 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, - 619, 623, 663, 665, 667, 668, 0, 1, 21, 23, 74, 76, 86, 119, 120, 129, - 130, 132, 133, 134, 135, 136, 137, 141, 142, 143, 145, 162, 182, 224, - 244, 245, 286, 287, 290, 291, 299, 341, 404, 429, 430, 442, 456, 461, - 468, 477, 490, 491, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, - 576, 577, 578, 614, 619, 623, 663, 665, 667, 668, 0, 1, 20, 21, 52, 70, - 71, 90, 101, 103, 120, 121, 122, 127, 128, 130, 131, 133, 404, 430, 432, - 461, 490, 500, 546, 668, 0, 1, 21, 23, 74, 76, 86, 130, 132, 143, 162, - 182, 224, 244, 429, 430, 442, 456, 461, 468, 477, 495, 500, 546, 549, - 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, 665, - 667, 668, 0, 1, 17, 21, 106, 132, 133, 135, 136, 137, 146, 182, 190, - 221, 287, 291, 292, 299, 341, 404, 429, 430, 461, 500, 546, 577, 668, 0, - 1, 17, 20, 21, 23, 25, 48, 51, 52, 54, 70, 71, 73, 74, 90, 93, 94, 103, - 104, 106, 107, 117, 122, 130, 131, 133, 134, 162, 182, 190, 218, 404, - 430, 432, 437, 461, 500, 577, 668, 0, 1, 21, 22, 23, 25, 51, 52, 54, 70, - 73, 74, 76, 90, 93, 94, 103, 106, 107, 120, 133, 135, 161, 162, 182, - 191, 404, 437, 461, 500, 577, 668, 22, 23, 24, 25, 54, 73, 74, 93, 94, - 103, 106, 107, 121, 136, 161, 162, 193, 218, 404, 668, 73, 76, 137, 404, - 668, 0, 1, 3, 4, 5, 6, 7, 12, 13, 14, 16, 21, 23, 45, 47, 67, 69, 74, - 76, 86, 87, 89, 100, 102, 114, 116, 129, 130, 138, 140, 141, 142, 145, - 149, 162, 182, 224, 244, 245, 290, 293, 404, 430, 442, 456, 461, 468, - 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, - 614, 619, 623, 663, 665, 667, 668, 0, 1, 3, 6, 127, 130, 133, 134, 138, - 139, 141, 144, 404, 430, 432, 546, 668, 0, 1, 5, 21, 23, 74, 76, 86, - 138, 140, 162, 182, 224, 244, 429, 430, 442, 456, 461, 468, 477, 495, - 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, - 623, 663, 665, 667, 668, 0, 1, 6, 8, 10, 21, 23, 74, 76, 86, 132, 133, - 140, 141, 143, 144, 145, 146, 147, 148, 162, 182, 224, 244, 245, 290, - 291, 293, 294, 299, 341, 404, 429, 430, 442, 456, 461, 468, 477, 495, - 500, 546, 549, 550, 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, - 623, 663, 665, 667, 668, 0, 1, 3, 6, 7, 9, 21, 52, 71, 90, 103, 117, - 133, 134, 135, 138, 139, 141, 142, 144, 404, 430, 432, 461, 490, 500, - 546, 550, 577, 668, 0, 1, 8, 21, 23, 74, 76, 86, 141, 143, 162, 182, - 224, 244, 429, 430, 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, - 551, 554, 567, 568, 570, 576, 577, 578, 614, 619, 623, 663, 665, 667, - 668, 0, 1, 11, 17, 120, 143, 144, 146, 147, 148, 291, 294, 295, 299, - 341, 404, 429, 430, 461, 500, 546, 577, 668, 0, 17, 20, 21, 23, 48, 51, - 52, 54, 70, 71, 74, 90, 93, 94, 103, 106, 107, 117, 120, 121, 130, 135, - 141, 142, 144, 145, 162, 182, 404, 430, 432, 437, 461, 500, 550, 577, - 668, 0, 20, 21, 22, 23, 51, 52, 54, 73, 74, 76, 90, 91, 93, 103, 106, - 107, 117, 120, 121, 133, 144, 146, 161, 162, 182, 404, 437, 461, 500, - 550, 577, 668, 22, 23, 24, 25, 73, 76, 93, 94, 107, 117, 120, 121, 134, - 147, 161, 193, 218, 404, 550, 668, 73, 95, 148, 404, 668, 0, 140, 141, - 149, 293, 296, 381, 404, 436, 461, 465, 491, 500, 546, 550, 577, 668, - 142, 149, 150, 404, 432, 550, 668, 1, 64, 83, 84, 151, 297, 404, 430, - 461, 468, 475, 476, 500, 546, 577, 594, 595, 596, 597, 598, 668, 0, 1, - 83, 151, 152, 404, 430, 475, 507, 508, 546, 668, 1, 153, 298, 404, 438, - 546, 577, 668, 1, 153, 154, 404, 441, 513, 566, 668, 1, 155, 404, 515, - 668, 0, 1, 2, 14, 15, 17, 18, 20, 21, 23, 24, 25, 34, 55, 58, 74, 75, - 76, 78, 86, 111, 156, 157, 158, 159, 160, 162, 163, 169, 181, 182, 186, - 190, 193, 194, 195, 215, 216, 218, 220, 221, 222, 224, 227, 228, 243, - 244, 245, 299, 341, 404, 429, 430, 431, 432, 433, 434, 441, 442, 451, - 455, 456, 461, 466, 468, 473, 474, 475, 476, 477, 478, 482, 483, 484, - 493, 494, 495, 496, 497, 499, 500, 507, 508, 510, 511, 512, 519, 523, - 524, 537, 538, 546, 548, 549, 550, 551, 552, 553, 554, 560, 561, 562, - 563, 566, 567, 568, 569, 570, 575, 576, 577, 578, 579, 580, 581, 583, - 584, 587, 589, 590, 591, 597, 598, 613, 614, 618, 619, 622, 623, 640, - 641, 648, 660, 663, 665, 667, 668, 0, 1, 14, 15, 17, 18, 20, 21, 156, - 157, 159, 160, 181, 182, 215, 218, 220, 221, 222, 227, 228, 243, 404, - 429, 430, 432, 433, 441, 442, 450, 451, 455, 461, 475, 493, 494, 499, - 500, 501, 518, 524, 546, 548, 550, 551, 553, 554, 560, 561, 562, 563, - 566, 569, 575, 577, 578, 580, 581, 584, 587, 589, 590, 613, 622, 668, 0, - 1, 19, 21, 23, 74, 76, 86, 158, 162, 182, 224, 244, 429, 430, 442, 456, - 461, 468, 477, 495, 500, 546, 549, 551, 554, 567, 568, 570, 576, 577, - 578, 614, 619, 623, 663, 665, 667, 0, 1, 2, 15, 17, 18, 20, 21, 22, 23, - 24, 25, 28, 34, 52, 58, 156, 157, 158, 159, 160, 163, 168, 169, 170, - 171, 172, 173, 174, 177, 179, 180, 181, 182, 184, 194, 197, 199, 203, - 204, 207, 213, 215, 217, 218, 219, 220, 221, 222, 227, 245, 299, 300, - 341, 342, 404, 429, 430, 431, 432, 433, 440, 441, 442, 443, 451, 461, - 466, 468, 494, 495, 499, 500, 523, 524, 546, 550, 551, 552, 553, 554, - 561, 563, 566, 567, 569, 571, 577, 578, 579, 580, 581, 583, 584, 589, - 590, 613, 614, 622, 623, 642, 643, 663, 668, 0, 1, 15, 17, 18, 24, 156, - 157, 159, 160, 168, 170, 172, 174, 180, 182, 218, 219, 220, 222, 227, - 228, 404, 429, 430, 432, 433, 441, 442, 443, 450, 451, 455, 461, 466, - 468, 493, 494, 495, 496, 499, 500, 524, 538, 546, 550, 551, 553, 554, - 561, 563, 566, 569, 577, 578, 580, 581, 584, 587, 590, 613, 648, 668, 0, - 1, 2, 5, 8, 14, 16, 19, 20, 21, 23, 24, 25, 47, 50, 52, 54, 55, 56, 57, - 61, 69, 71, 72, 74, 76, 89, 92, 94, 99, 102, 105, 107, 116, 119, 129, - 132, 140, 143, 158, 159, 161, 162, 163, 182, 193, 218, 223, 245, 253, - 265, 301, 341, 343, 404, 430, 431, 461, 468, 500, 546, 550, 579, 582, - 591, 615, 623, 668, 0, 1, 2, 5, 8, 15, 16, 17, 18, 19, 20, 21, 22, 23, - 24, 25, 27, 47, 48, 49, 50, 51, 61, 69, 70, 72, 73, 89, 90, 92, 93, 99, - 102, 103, 105, 106, 116, 119, 129, 132, 140, 143, 158, 159, 161, 162, - 165, 182, 193, 218, 219, 223, 404, 430, 431, 432, 437, 461, 468, 500, - 546, 550, 577, 579, 582, 591, 613, 615, 622, 668, 0, 1, 17, 24, 52, 55, - 58, 70, 156, 163, 164, 194, 204, 221, 253, 299, 301, 302, 341, 404, 461, - 577, 581, 619, 668, 14, 34, 111, 156, 163, 164, 193, 273, 303, 341, 1, - 24, 165, 167, 194, 221, 304, 404, 430, 461, 495, 500, 546, 566, 668, 56, - 165, 166, 404, 432, 550, 668, 29, 165, 166, 167, 404, 432, 461, 495, - 500, 566, 668, 0, 1, 22, 30, 168, 199, 226, 300, 305, 329, 341, 358, - 404, 430, 461, 546, 550, 668, 1, 18, 21, 160, 168, 169, 182, 198, 221, - 404, 430, 493, 560, 562, 566, 668, 1, 20, 22, 24, 163, 170, 194, 196, - 202, 203, 207, 208, 306, 341, 352, 404, 429, 461, 468, 500, 546, 577, - 581, 589, 619, 668, 1, 18, 20, 21, 157, 160, 163, 170, 171, 404, 441, - 450, 581, 589, 619, 668, 156, 172, 173, 299, 300, 307, 312, 341, 344, - 381, 385, 386, 404, 430, 468, 500, 546, 566, 668, 172, 173, 197, 404, - 468, 500, 566, 668, 1, 174, 175, 176, 177, 178, 179, 215, 300, 308, 341, - 345, 398, 404, 461, 468, 500, 546, 668, 175, 176, 404, 461, 468, 500, - 668, 1, 175, 176, 308, 309, 310, 341, 361, 404, 461, 468, 500, 546, 668, - 1, 176, 177, 178, 404, 461, 468, 500, 668, 1, 177, 178, 308, 310, 331, - 404, 461, 468, 500, 546, 668, 1, 178, 179, 404, 668, 1, 180, 311, 404, - 430, 461, 468, 500, 546, 577, 601, 668, 0, 1, 2, 5, 8, 15, 16, 18, 19, - 20, 21, 22, 23, 24, 25, 27, 28, 29, 30, 34, 35, 46, 47, 48, 50, 51, 52, - 55, 58, 61, 63, 68, 69, 70, 72, 73, 88, 89, 90, 92, 93, 99, 102, 103, - 105, 106, 116, 117, 119, 120, 129, 132, 140, 143, 156, 158, 159, 160, - 163, 170, 181, 182, 183, 185, 186, 188, 189, 190, 191, 192, 193, 194, - 195, 196, 197, 198, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, - 211, 213, 214, 215, 216, 217, 218, 219, 220, 221, 223, 226, 227, 228, - 229, 236, 243, 300, 312, 341, 404, 429, 430, 431, 432, 437, 441, 442, - 450, 451, 455, 461, 479, 494, 499, 502, 503, 523, 546, 548, 550, 551, - 558, 560, 562, 566, 567, 569, 571, 575, 577, 579, 580, 582, 583, 587, - 589, 591, 593, 600, 603, 613, 614, 615, 622, 623, 668, 0, 1, 2, 5, 8, - 14, 16, 17, 18, 19, 20, 22, 24, 25, 31, 34, 47, 48, 50, 51, 61, 69, 70, - 72, 73, 89, 90, 92, 93, 99, 102, 103, 105, 106, 116, 117, 119, 120, 129, - 130, 132, 133, 140, 143, 156, 157, 158, 159, 160, 161, 181, 182, 183, - 188, 191, 195, 198, 201, 203, 206, 212, 215, 218, 219, 220, 221, 223, - 226, 243, 404, 429, 430, 431, 432, 433, 437, 441, 442, 450, 451, 455, - 461, 468, 478, 485, 488, 493, 494, 495, 499, 500, 513, 519, 524, 537, - 546, 548, 550, 551, 553, 554, 555, 557, 560, 561, 562, 563, 566, 567, - 569, 575, 577, 578, 579, 580, 582, 584, 587, 589, 590, 591, 592, 613, - 615, 618, 622, 647, 653, 668, 1, 163, 183, 185, 193, 221, 266, 312, 313, - 404, 430, 461, 500, 546, 668, 184, 404, 432, 434, 668, 0, 78, 182, 183, - 184, 185, 404, 432, 461, 478, 500, 550, 668, 0, 1, 14, 17, 96, 163, 186, - 193, 194, 314, 404, 430, 461, 500, 546, 668, 21, 22, 23, 25, 48, 51, 52, - 54, 74, 110, 161, 162, 186, 187, 193, 218, 404, 430, 437, 550, 668, 1, - 188, 189, 281, 312, 315, 404, 430, 461, 500, 546, 668, 0, 182, 188, 189, - 404, 461, 485, 500, 668, 0, 1, 70, 124, 163, 190, 193, 194, 316, 404, - 430, 461, 500, 546, 668, 1, 191, 192, 289, 312, 317, 404, 430, 461, 500, - 546, 668, 0, 182, 191, 192, 404, 461, 488, 500, 668, 0, 1, 17, 21, 23, - 24, 25, 27, 52, 55, 56, 57, 58, 70, 71, 74, 76, 78, 94, 107, 111, 156, - 164, 193, 194, 204, 221, 253, 299, 301, 318, 341, 404, 430, 461, 468, - 478, 500, 546, 623, 668, 0, 1, 14, 17, 34, 56, 57, 58, 70, 79, 156, 194, - 204, 221, 319, 404, 461, 468, 554, 566, 581, 589, 614, 619, 668, 1, 22, - 27, 156, 182, 194, 195, 197, 204, 205, 215, 312, 320, 322, 341, 361, - 404, 430, 461, 468, 500, 506, 546, 566, 577, 589, 617, 668, 1, 194, 195, - 196, 201, 404, 430, 461, 500, 581, 668, 20, 31, 182, 194, 195, 197, 212, - 217, 218, 220, 226, 404, 441, 442, 461, 468, 500, 506, 566, 581, 617, - 668, 1, 21, 28, 80, 181, 182, 198, 200, 221, 223, 305, 312, 321, 329, - 341, 404, 430, 461, 468, 480, 495, 500, 501, 506, 546, 554, 578, 668, - 21, 25, 168, 198, 199, 226, 404, 430, 432, 461, 550, 562, 578, 668, 21, - 28, 36, 80, 182, 198, 199, 200, 217, 404, 432, 461, 468, 480, 493, 495, - 500, 501, 506, 554, 668, 1, 201, 206, 207, 208, 312, 322, 331, 404, 461, - 500, 546, 668, 1, 160, 163, 170, 182, 195, 201, 202, 203, 206, 218, 226, - 227, 404, 441, 461, 468, 500, 546, 617, 619, 668, 1, 30, 182, 203, 205, - 312, 322, 323, 404, 430, 461, 468, 500, 510, 546, 619, 668, 1, 182, 194, - 203, 204, 404, 430, 441, 619, 668, 30, 33, 182, 194, 195, 203, 204, 205, - 404, 441, 461, 468, 500, 510, 668, 1, 206, 208, 312, 322, 324, 334, 398, - 404, 461, 468, 500, 546, 668, 1, 206, 207, 404, 668, 206, 208, 404, 461, - 468, 500, 668, 24, 163, 194, 209, 404, 614, 619, 668, 160, 182, 210, - 404, 562, 566, 668, 1, 211, 215, 230, 231, 312, 325, 341, 345, 393, 404, - 461, 468, 500, 546, 668, 1, 182, 212, 214, 312, 325, 326, 404, 430, 461, - 468, 500, 546, 581, 619, 668, 1, 212, 213, 404, 430, 581, 619, 668, 182, - 212, 214, 215, 217, 404, 461, 468, 500, 668, 1, 49, 76, 156, 157, 181, - 182, 195, 197, 213, 214, 215, 217, 219, 308, 312, 325, 327, 341, 398, - 404, 430, 442, 461, 466, 468, 472, 480, 500, 503, 504, 506, 546, 551, - 559, 566, 578, 581, 591, 593, 603, 605, 606, 617, 623, 668, 174, 211, - 215, 216, 219, 404, 430, 461, 468, 500, 551, 578, 581, 668, 76, 157, - 182, 215, 217, 219, 404, 441, 442, 450, 461, 466, 468, 480, 493, 500, - 504, 506, 559, 566, 606, 668, 0, 1, 14, 15, 17, 18, 20, 21, 22, 23, 24, - 25, 28, 31, 32, 34, 36, 46, 49, 52, 63, 68, 70, 71, 74, 76, 82, 88, 94, - 101, 107, 111, 121, 134, 156, 157, 159, 160, 161, 181, 182, 194, 195, - 197, 203, 212, 214, 215, 218, 219, 220, 221, 226, 227, 228, 229, 236, - 312, 328, 341, 404, 429, 430, 431, 432, 433, 441, 442, 450, 451, 455, - 461, 478, 479, 493, 494, 499, 500, 501, 502, 513, 518, 523, 524, 538, - 546, 548, 551, 553, 554, 555, 560, 562, 566, 567, 577, 578, 579, 580, - 581, 583, 587, 589, 590, 593, 601, 603, 605, 613, 614, 623, 653, 668, - 20, 24, 29, 181, 182, 215, 218, 219, 220, 226, 227, 228, 229, 404, 429, - 430, 432, 433, 441, 450, 455, 461, 499, 546, 551, 566, 577, 578, 580, - 587, 668, 0, 14, 17, 20, 24, 34, 111, 156, 159, 182, 195, 203, 218, 219, - 220, 226, 228, 404, 429, 432, 433, 441, 450, 455, 461, 478, 493, 499, - 501, 513, 518, 524, 548, 554, 555, 560, 562, 566, 577, 589, 590, 613, - 622, 653, 668, 0, 1, 2, 3, 5, 14, 15, 17, 18, 20, 21, 23, 24, 26, 29, - 34, 37, 38, 39, 41, 45, 46, 47, 50, 52, 59, 60, 67, 69, 70, 71, 72, 73, - 74, 76, 81, 86, 87, 88, 89, 92, 97, 100, 102, 103, 106, 114, 116, 125, - 127, 129, 130, 133, 138, 140, 149, 156, 157, 159, 162, 163, 165, 168, - 169, 181, 182, 183, 188, 191, 193, 194, 198, 210, 218, 221, 222, 223, - 224, 225, 226, 228, 235, 244, 245, 329, 381, 404, 429, 430, 431, 432, - 433, 441, 442, 447, 450, 453, 456, 461, 468, 477, 478, 479, 480, 485, - 488, 489, 490, 491, 493, 494, 495, 499, 500, 518, 519, 523, 524, 529, - 530, 532, 533, 546, 549, 550, 551, 552, 553, 554, 555, 557, 559, 560, - 561, 562, 563, 564, 566, 567, 568, 569, 570, 571, 573, 576, 577, 578, - 579, 580, 584, 585, 589, 590, 591, 613, 614, 619, 623, 624, 625, 653, - 658, 659, 663, 665, 667, 668, 0, 1, 14, 17, 156, 157, 159, 198, 221, - 222, 225, 226, 228, 404, 429, 432, 433, 441, 450, 493, 499, 518, 546, - 550, 551, 553, 557, 560, 562, 569, 577, 580, 585, 589, 613, 658, 668, 1, - 2, 5, 8, 16, 21, 23, 47, 50, 69, 72, 74, 76, 86, 89, 92, 102, 105, 116, - 119, 129, 132, 140, 143, 162, 181, 182, 221, 223, 224, 244, 429, 430, - 431, 442, 456, 461, 468, 477, 493, 495, 500, 546, 549, 550, 551, 554, - 567, 568, 569, 570, 576, 578, 579, 591, 614, 619, 623, 663, 665, 667, 1, - 2, 5, 8, 16, 19, 47, 50, 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, - 129, 132, 140, 143, 157, 158, 221, 223, 224, 404, 431, 450, 493, 557, - 566, 579, 582, 591, 615, 668, 1, 225, 245, 330, 389, 404, 429, 461, 497, - 532, 533, 546, 577, 668, 0, 1, 2, 3, 5, 6, 7, 8, 9, 12, 14, 15, 16, 17, - 18, 19, 20, 21, 22, 23, 24, 27, 31, 34, 37, 41, 42, 43, 45, 47, 48, 49, - 50, 51, 53, 59, 61, 62, 63, 64, 65, 67, 69, 70, 72, 73, 74, 75, 81, 82, - 83, 85, 87, 89, 90, 92, 93, 97, 99, 100, 102, 103, 105, 106, 111, 114, - 116, 117, 119, 120, 125, 127, 129, 130, 132, 133, 138, 140, 141, 143, - 144, 149, 151, 153, 154, 156, 157, 158, 159, 160, 161, 163, 165, 170, - 171, 172, 174, 176, 177, 178, 179, 180, 181, 182, 183, 186, 188, 190, - 191, 193, 194, 195, 197, 198, 199, 201, 202, 203, 204, 206, 207, 208, - 211, 212, 215, 218, 219, 220, 221, 222, 223, 225, 226, 227, 228, 229, - 230, 231, 232, 233, 234, 235, 245, 331, 393, 404, 429, 430, 431, 433, - 437, 441, 442, 443, 445, 448, 450, 451, 455, 457, 459, 461, 466, 473, - 474, 475, 478, 485, 488, 490, 493, 494, 496, 499, 500, 501, 502, 503, - 504, 507, 508, 509, 511, 518, 519, 520, 521, 523, 524, 526, 527, 528, - 529, 535, 537, 539, 546, 550, 551, 553, 554, 555, 557, 560, 561, 562, - 564, 566, 567, 569, 571, 573, 577, 578, 579, 580, 581, 582, 583, 584, - 585, 586, 587, 588, 589, 590, 591, 592, 593, 602, 604, 607, 611, 613, - 614, 615, 616, 618, 619, 620, 621, 622, 623, 624, 626, 628, 630, 633, - 635, 638, 641, 643, 647, 649, 653, 654, 658, 659, 662, 663, 664, 666, - 668, 0, 1, 14, 15, 17, 156, 157, 159, 170, 178, 201, 218, 222, 225, 226, - 227, 228, 230, 232, 236, 404, 429, 430, 432, 433, 441, 450, 455, 493, - 499, 500, 546, 551, 553, 560, 562, 566, 569, 577, 578, 580, 581, 585, - 587, 589, 613, 618, 620, 668, 0, 1, 2, 18, 20, 24, 49, 156, 157, 159, - 160, 198, 207, 218, 219, 220, 222, 226, 227, 228, 229, 331, 332, 393, - 404, 429, 430, 433, 450, 455, 461, 494, 499, 501, 502, 503, 505, 523, - 524, 546, 550, 551, 553, 554, 555, 561, 566, 569, 571, 577, 578, 579, - 580, 583, 584, 585, 587, 589, 590, 593, 619, 620, 621, 622, 663, 668, - 20, 24, 218, 222, 227, 228, 229, 404, 429, 432, 450, 455, 546, 551, 553, - 566, 569, 577, 580, 587, 620, 668, 1, 230, 325, 331, 333, 461, 468, 500, - 546, 1, 230, 231, 404, 668, 1, 206, 207, 208, 232, 331, 334, 398, 404, - 461, 500, 546, 668, 0, 1, 64, 83, 151, 152, 233, 335, 404, 430, 461, - 468, 475, 476, 500, 507, 508, 546, 577, 592, 598, 599, 600, 602, 668, 1, - 151, 233, 234, 404, 430, 432, 475, 546, 577, 668, 0, 1, 14, 17, 31, 41, - 43, 44, 49, 65, 66, 73, 85, 86, 156, 159, 203, 209, 235, 236, 243, 245, - 336, 404, 406, 429, 430, 443, 444, 455, 461, 467, 468, 477, 500, 509, - 510, 531, 537, 546, 548, 550, 566, 573, 575, 577, 587, 588, 589, 593, - 613, 614, 615, 616, 618, 622, 668, 0, 1, 14, 15, 43, 49, 65, 85, 156, - 157, 218, 235, 236, 243, 404, 430, 432, 443, 509, 537, 538, 546, 548, - 551, 573, 575, 577, 580, 587, 613, 614, 618, 622, 668, 153, 154, 237, - 238, 239, 240, 337, 404, 429, 430, 432, 445, 461, 513, 514, 546, 577, - 580, 668, 237, 238, 239, 404, 429, 430, 432, 513, 546, 580, 668, 1, 153, - 239, 338, 546, 577, 1, 239, 240, 404, 668, 155, 241, 242, 339, 404, 432, - 446, 450, 515, 516, 589, 646, 668, 242, 404, 432, 515, 546, 1, 2, 5, 8, - 16, 19, 21, 47, 50, 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, 129, - 132, 140, 143, 157, 158, 182, 223, 236, 243, 244, 340, 404, 430, 431, - 442, 451, 456, 461, 500, 538, 551, 553, 567, 570, 575, 578, 579, 581, - 582, 591, 614, 615, 619, 623, 663, 668, 1, 2, 5, 8, 16, 19, 21, 47, 50, - 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 157, - 158, 182, 223, 236, 243, 244, 404, 430, 431, 442, 451, 456, 461, 500, - 538, 551, 553, 567, 570, 575, 578, 579, 581, 582, 591, 614, 615, 619, - 623, 663, 668, 0, 245, 246, 247, 249, 250, 251, 253, 254, 260, 261, 262, - 263, 264, 268, 270, 271, 274, 276, 278, 279, 282, 283, 286, 287, 290, - 291, 293, 294, 297, 298, 299, 300, 303, 312, 329, 330, 331, 335, 336, - 341, 342, 377, 381, 385, 386, 389, 391, 393, 394, 396, 397, 398, 406, - 408, 411, 412, 415, 425, 3, 245, 246, 247, 248, 249, 293, 341, 342, 6, - 245, 246, 247, 248, 294, 341, 342, 9, 247, 248, 294, 299, 341, 342, 12, - 245, 246, 249, 14, 245, 246, 247, 249, 250, 251, 252, 253, 260, 261, - 262, 263, 266, 267, 268, 269, 270, 271, 278, 279, 282, 286, 289, 290, - 293, 296, 297, 299, 306, 341, 342, 381, 393, 412, 415, 417, 17, 245, - 250, 251, 252, 253, 254, 271, 272, 279, 280, 283, 284, 299, 302, 318, - 328, 341, 342, 354, 370, 20, 245, 251, 252, 253, 254, 256, 257, 285, - 299, 300, 306, 328, 341, 342, 22, 245, 252, 253, 254, 256, 257, 299, - 300, 302, 304, 312, 318, 341, 24, 253, 254, 255, 256, 259, 299, 300, - 312, 319, 341, 26, 255, 304, 341, 27, 254, 256, 257, 258, 259, 300, 312, - 341, 29, 255, 257, 341, 31, 258, 308, 309, 312, 320, 34, 256, 259, 312, - 320, 341, 37, 245, 250, 260, 329, 341, 358, 381, 384, 41, 245, 250, 261, - 341, 393, 43, 245, 262, 45, 245, 246, 247, 248, 249, 250, 263, 264, 270, - 275, 276, 277, 278, 279, 283, 286, 299, 341, 342, 343, 381, 393, 48, - 245, 250, 251, 263, 264, 265, 279, 280, 283, 299, 301, 341, 342, 343, - 381, 51, 251, 264, 265, 299, 301, 341, 342, 59, 245, 260, 263, 266, 312, - 313, 341, 370, 381, 62, 245, 261, 263, 267, 393, 64, 268, 276, 65, 245, - 262, 269, 67, 245, 246, 249, 263, 270, 271, 275, 278, 281, 282, 283, - 286, 299, 341, 342, 417, 70, 245, 263, 264, 270, 271, 272, 273, 284, - 299, 314, 341, 342, 355, 73, 264, 271, 272, 273, 299, 341, 342, 75, 272, - 273, 341, 79, 274, 81, 275, 83, 276, 85, 277, 87, 245, 247, 249, 270, - 278, 279, 282, 286, 299, 341, 342, 381, 90, 245, 247, 270, 271, 278, - 279, 280, 299, 341, 342, 381, 93, 271, 279, 280, 299, 341, 342, 97, 278, - 281, 289, 312, 315, 341, 355, 381, 100, 245, 246, 249, 278, 282, 283, - 284, 286, 289, 290, 299, 341, 342, 103, 245, 278, 279, 282, 283, 284, - 287, 299, 316, 341, 342, 356, 106, 279, 283, 284, 285, 299, 341, 342, - 111, 285, 114, 245, 246, 247, 249, 282, 286, 287, 288, 290, 293, 299, - 341, 342, 381, 117, 245, 247, 248, 282, 283, 286, 287, 288, 291, 299, - 341, 342, 381, 120, 283, 287, 288, 299, 341, 342, 125, 286, 289, 296, - 312, 317, 341, 356, 381, 127, 245, 246, 247, 249, 286, 290, 291, 292, - 293, 296, 299, 341, 342, 130, 245, 286, 287, 290, 291, 292, 294, 299, - 341, 342, 357, 133, 287, 291, 292, 299, 341, 342, 138, 245, 246, 247, - 249, 290, 293, 294, 295, 341, 342, 381, 141, 245, 290, 291, 293, 294, - 295, 299, 341, 342, 381, 144, 291, 294, 295, 299, 341, 342, 149, 293, - 296, 341, 357, 381, 151, 268, 297, 353, 153, 298, 156, 245, 250, 251, - 252, 253, 254, 263, 264, 270, 271, 278, 279, 282, 283, 286, 287, 290, - 291, 294, 299, 300, 302, 312, 318, 327, 328, 329, 341, 352, 360, 365, - 366, 372, 381, 385, 386, 389, 393, 394, 406, 159, 245, 253, 254, 256, - 299, 300, 305, 306, 307, 308, 311, 312, 319, 321, 323, 326, 328, 329, - 341, 342, 345, 372, 381, 385, 393, 394, 398, 418, 161, 245, 253, 265, - 301, 302, 318, 341, 343, 163, 253, 299, 301, 302, 303, 341, 164, 273, - 285, 303, 341, 165, 257, 304, 341, 168, 300, 305, 321, 329, 341, 358, - 170, 306, 320, 323, 341, 352, 172, 299, 300, 307, 312, 341, 344, 381, - 385, 386, 174, 300, 308, 309, 310, 312, 320, 325, 327, 331, 341, 345, - 361, 398, 176, 308, 309, 310, 312, 320, 325, 341, 361, 385, 386, 398, - 178, 308, 309, 310, 312, 325, 331, 341, 385, 386, 398, 180, 311, 181, - 245, 251, 253, 254, 256, 266, 281, 289, 299, 300, 302, 308, 309, 312, - 313, 314, 315, 316, 317, 318, 320, 321, 322, 323, 324, 325, 326, 327, - 328, 329, 331, 334, 341, 342, 345, 361, 362, 363, 372, 381, 393, 398, - 406, 183, 266, 312, 313, 186, 314, 188, 281, 312, 315, 190, 316, 191, - 289, 312, 317, 193, 253, 299, 301, 303, 318, 341, 194, 274, 319, 195, - 308, 312, 320, 322, 323, 325, 341, 361, 385, 386, 398, 198, 305, 312, - 321, 329, 341, 201, 308, 312, 320, 322, 324, 325, 331, 341, 385, 386, - 398, 203, 312, 322, 323, 206, 312, 322, 324, 334, 398, 211, 309, 312, - 320, 325, 327, 331, 333, 341, 345, 361, 362, 363, 393, 398, 212, 312, - 325, 326, 215, 308, 309, 312, 320, 325, 326, 327, 341, 345, 362, 363, - 398, 218, 251, 254, 258, 309, 312, 320, 323, 326, 328, 341, 342, 345, - 362, 363, 372, 221, 245, 255, 257, 260, 266, 275, 281, 289, 296, 299, - 300, 304, 305, 312, 321, 329, 330, 341, 342, 354, 355, 356, 357, 359, - 369, 370, 374, 375, 381, 384, 387, 389, 391, 393, 396, 425, 225, 245, - 330, 341, 389, 226, 245, 261, 267, 306, 308, 310, 312, 320, 322, 323, - 325, 330, 331, 332, 333, 334, 341, 345, 352, 361, 362, 371, 385, 393, - 394, 396, 397, 398, 406, 408, 228, 331, 332, 361, 362, 363, 393, 398, - 230, 312, 325, 331, 333, 341, 362, 386, 398, 232, 312, 324, 325, 331, - 334, 341, 363, 386, 398, 233, 268, 276, 297, 335, 364, 235, 245, 262, - 269, 277, 336, 341, 346, 365, 377, 393, 397, 406, 237, 298, 337, 338, - 341, 367, 239, 338, 241, 339, 341, 368, 243, 340, 245, 246, 247, 248, - 250, 251, 252, 253, 254, 255, 256, 257, 259, 260, 261, 263, 264, 265, - 266, 270, 271, 272, 273, 278, 279, 280, 281, 282, 283, 284, 285, 286, - 287, 288, 289, 290, 291, 292, 293, 294, 295, 296, 299, 300, 301, 302, - 304, 305, 308, 309, 310, 312, 318, 320, 321, 322, 325, 327, 328, 329, - 330, 331, 333, 334, 336, 337, 339, 341, 342, 343, 344, 345, 347, 348, - 349, 351, 352, 353, 355, 356, 357, 358, 359, 361, 362, 363, 364, 365, - 366, 367, 368, 369, 370, 372, 373, 376, 377, 378, 381, 385, 386, 388, - 389, 393, 394, 395, 396, 397, 398, 400, 401, 406, 409, 410, 413, 414, - 416, 418, 419, 420, 421, 422, 423, 429, 245, 246, 247, 250, 251, 253, - 254, 256, 259, 263, 264, 270, 271, 273, 278, 279, 282, 283, 284, 285, - 286, 287, 288, 290, 291, 292, 293, 294, 295, 300, 301, 302, 304, 307, - 309, 311, 312, 318, 320, 328, 329, 341, 342, 343, 345, 346, 347, 348, - 349, 351, 362, 363, 372, 385, 386, 388, 398, 401, 414, 418, 421, 422, - 423, 432, 264, 302, 318, 341, 342, 343, 437, 300, 341, 344, 381, 439, - 258, 300, 308, 312, 320, 325, 326, 327, 341, 345, 361, 362, 385, 386, - 393, 394, 398, 441, 312, 341, 346, 365, 406, 443, 306, 309, 320, 327, - 341, 342, 345, 347, 348, 362, 363, 386, 389, 398, 450, 341, 348, 395, - 398, 452, 341, 349, 377, 455, 350, 457, 351, 459, 261, 341, 352, 473, - 353, 475, 264, 266, 304, 341, 354, 381, 478, 279, 281, 341, 355, 381, - 485, 287, 289, 341, 356, 381, 488, 294, 296, 341, 357, 381, 490, 260, - 299, 329, 341, 358, 492, 257, 299, 321, 329, 341, 342, 344, 359, 381, - 385, 389, 493, 330, 341, 360, 496, 299, 308, 309, 312, 320, 325, 331, - 341, 345, 361, 362, 363, 385, 386, 393, 394, 398, 499, 309, 312, 320, - 325, 333, 341, 345, 361, 362, 386, 398, 502, 309, 312, 320, 325, 334, - 341, 345, 361, 362, 363, 386, 398, 504, 311, 364, 507, 299, 336, 341, - 365, 406, 509, 366, 418, 511, 337, 341, 367, 513, 339, 341, 368, 515, - 245, 257, 299, 307, 369, 385, 386, 518, 370, 519, 331, 341, 371, 385, - 396, 520, 299, 300, 312, 341, 372, 385, 386, 389, 393, 523, 373, 526, - 341, 374, 396, 529, 330, 341, 375, 532, 376, 535, 245, 341, 349, 350, - 377, 378, 381, 393, 397, 406, 409, 537, 378, 539, 379, 545, 380, 548, - 245, 250, 260, 263, 264, 275, 278, 279, 286, 287, 293, 294, 299, 300, - 312, 329, 341, 377, 381, 382, 383, 384, 385, 386, 389, 391, 393, 395, - 402, 406, 424, 550, 381, 382, 383, 385, 386, 389, 391, 552, 383, 555, - 384, 557, 245, 299, 300, 307, 309, 320, 331, 341, 345, 371, 381, 385, - 386, 388, 389, 393, 395, 406, 560, 245, 299, 309, 320, 341, 342, 345, - 362, 363, 385, 386, 387, 388, 389, 393, 562, 387, 564, 309, 320, 341, - 342, 345, 362, 363, 386, 388, 566, 245, 299, 300, 312, 341, 360, 372, - 381, 383, 385, 386, 389, 390, 391, 393, 569, 390, 571, 245, 377, 381, - 385, 391, 393, 406, 573, 392, 575, 245, 250, 261, 263, 299, 300, 306, - 312, 325, 326, 329, 330, 331, 332, 336, 338, 341, 345, 347, 361, 372, - 377, 381, 383, 385, 386, 389, 390, 391, 393, 394, 395, 396, 397, 398, - 403, 406, 408, 409, 426, 427, 577, 245, 299, 300, 341, 381, 393, 394, - 395, 409, 580, 341, 348, 381, 393, 394, 395, 398, 583, 245, 329, 341, - 393, 396, 585, 331, 336, 341, 393, 397, 406, 587, 245, 258, 300, 308, - 309, 312, 320, 322, 324, 327, 331, 334, 341, 342, 345, 347, 348, 361, - 362, 363, 372, 374, 375, 393, 395, 398, 589, 297, 335, 399, 400, 401, - 402, 403, 592, 311, 400, 401, 602, 401, 604, 402, 607, 376, 403, 611, 1, - 4, 7, 10, 11, 13, 15, 18, 21, 23, 25, 28, 30, 32, 33, 35, 36, 38, 39, - 40, 42, 44, 46, 49, 52, 53, 54, 55, 56, 57, 58, 60, 63, 66, 68, 71, 74, - 76, 77, 78, 80, 82, 84, 86, 88, 91, 94, 95, 96, 98, 101, 104, 107, 108, - 109, 110, 112, 113, 115, 118, 121, 122, 123, 124, 126, 128, 131, 134, - 135, 136, 137, 139, 142, 145, 146, 147, 148, 150, 152, 154, 155, 157, - 160, 162, 166, 167, 169, 171, 173, 175, 177, 179, 182, 184, 185, 187, - 189, 192, 196, 197, 199, 200, 202, 204, 205, 207, 208, 209, 210, 213, - 214, 216, 217, 219, 220, 222, 224, 227, 229, 231, 234, 236, 238, 240, - 242, 244, 404, 405, 430, 433, 434, 435, 436, 438, 440, 442, 444, 445, - 446, 447, 448, 449, 451, 453, 454, 456, 458, 460, 461, 462, 463, 464, - 465, 466, 467, 468, 469, 470, 471, 472, 474, 476, 477, 479, 480, 481, - 482, 483, 484, 486, 487, 489, 491, 494, 495, 497, 498, 500, 501, 503, - 505, 506, 508, 510, 512, 514, 516, 517, 521, 522, 524, 525, 527, 528, - 530, 531, 533, 534, 536, 538, 540, 541, 542, 543, 544, 546, 547, 549, - 551, 553, 554, 556, 558, 559, 561, 563, 565, 567, 568, 570, 572, 574, - 576, 578, 581, 584, 586, 588, 590, 593, 594, 595, 596, 597, 598, 599, - 600, 601, 603, 605, 606, 608, 609, 610, 612, 614, 617, 619, 621, 623, - 625, 627, 629, 631, 632, 634, 636, 637, 639, 640, 642, 644, 645, 646, - 648, 650, 652, 654, 655, 657, 659, 660, 661, 663, 665, 667, 668, 1, 4, - 7, 10, 11, 13, 15, 18, 21, 23, 25, 28, 30, 32, 33, 35, 36, 38, 39, 40, - 42, 44, 46, 49, 52, 53, 54, 55, 56, 57, 58, 60, 63, 66, 68, 71, 74, 76, - 77, 78, 80, 82, 84, 86, 88, 91, 94, 95, 96, 98, 101, 104, 107, 108, 109, - 110, 112, 113, 115, 118, 121, 122, 123, 124, 126, 128, 131, 134, 135, - 136, 137, 139, 142, 145, 146, 147, 148, 150, 152, 154, 155, 157, 160, - 162, 166, 167, 169, 171, 173, 175, 177, 179, 182, 184, 185, 187, 189, - 192, 196, 197, 199, 200, 202, 204, 205, 207, 208, 209, 210, 213, 214, - 216, 217, 219, 220, 222, 224, 227, 229, 231, 234, 236, 238, 240, 242, - 244, 404, 405, 430, 433, 434, 435, 436, 438, 440, 442, 444, 445, 446, - 447, 448, 449, 451, 453, 454, 456, 458, 460, 461, 462, 463, 464, 465, - 466, 467, 468, 469, 470, 471, 472, 474, 476, 477, 479, 480, 481, 482, - 483, 484, 486, 487, 489, 491, 494, 495, 497, 498, 500, 501, 503, 505, - 506, 508, 510, 512, 514, 516, 517, 521, 522, 524, 525, 527, 528, 530, - 531, 533, 534, 536, 538, 540, 541, 542, 543, 544, 546, 547, 549, 551, - 553, 554, 556, 558, 559, 561, 563, 565, 567, 568, 570, 572, 574, 576, - 578, 581, 584, 586, 588, 590, 593, 594, 595, 596, 597, 598, 599, 600, - 601, 603, 605, 606, 608, 609, 610, 612, 614, 617, 619, 621, 623, 625, - 627, 629, 631, 632, 634, 636, 637, 639, 640, 642, 644, 645, 646, 648, - 650, 652, 654, 655, 657, 659, 660, 661, 663, 665, 667, 668, 245, 262, - 299, 312, 331, 336, 341, 349, 365, 377, 378, 381, 385, 391, 393, 397, - 406, 407, 408, 428, 613, 378, 407, 616, 245, 377, 393, 397, 406, 408, - 409, 618, 341, 393, 408, 409, 620, 341, 366, 410, 411, 412, 417, 418, - 420, 421, 424, 425, 426, 428, 622, 366, 411, 412, 415, 418, 624, 412, - 413, 414, 415, 417, 626, 413, 414, 628, 414, 630, 415, 416, 633, 416, - 635, 417, 638, 418, 419, 641, 419, 643, 341, 410, 420, 421, 422, 423, - 647, 341, 420, 421, 422, 423, 649, 341, 421, 422, 423, 651, 341, 422, - 423, 653, 373, 424, 425, 656, 425, 658, 351, 426, 427, 662, 427, 664, - 428, 666, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 14, 15, 16, 17, 18, 19, - 20, 21, 22, 23, 24, 25, 27, 28, 29, 30, 31, 33, 34, 35, 36, 37, 38, 39, - 40, 41, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, - 60, 61, 62, 63, 65, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, - 80, 83, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 98, 99, 100, - 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, - 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 126, 127, 128, 129, - 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, - 144, 145, 146, 147, 148, 150, 151, 156, 157, 158, 159, 160, 161, 162, - 163, 165, 166, 167, 168, 170, 173, 175, 177, 179, 180, 181, 182, 184, - 185, 186, 187, 189, 190, 192, 193, 194, 195, 196, 197, 198, 199, 200, - 202, 203, 204, 205, 207, 208, 210, 211, 212, 214, 215, 216, 217, 218, - 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 231, 233, 234, - 235, 236, 237, 238, 241, 242, 243, 244, 341, 404, 429, 430, 431, 432, - 433, 434, 435, 436, 437, 438, 439, 440, 441, 442, 443, 444, 445, 446, - 447, 448, 449, 450, 451, 452, 453, 454, 455, 456, 457, 458, 459, 461, - 462, 463, 464, 465, 466, 467, 468, 469, 470, 471, 472, 474, 475, 476, - 477, 478, 479, 480, 481, 482, 483, 484, 485, 486, 487, 488, 489, 490, - 491, 492, 493, 494, 495, 497, 498, 499, 500, 501, 502, 503, 505, 506, - 507, 508, 509, 510, 511, 512, 513, 514, 515, 516, 517, 518, 519, 520, - 521, 522, 523, 524, 525, 526, 527, 528, 529, 530, 531, 533, 534, 535, + 0, 585, 1, 656, 2, 588, 3, 589, 4, 260, 5, 110, 6, 535, 7, 196, 8, 188, + 347, 521, 9, 385, 10, 171, 304, 521, 11, 365, 12, 189, 305, 521, 13, + 135, 14, 401, 15, 93, 381, 650, 16, 26, 296, 650, 17, 324, 18, 352, 19, + 219, 20, 370, 21, 372, 22, 280, 23, 340, 24, 233, 25, 551, 16, 26, 240, + 650, 27, 311, 28, 486, 29, 45, 393, 30, 49, 373, 31, 61, 105, 650, 32, + 62, 396, 595, 33, 207, 34, 375, 35, 346, 5, 36, 511, 37, 214, 275, 386, + 462, 521, 38, 241, 631, 650, 39, 141, 338, 650, 35, 40, 380, 41, 454, + 42, 125, 382, 414, 470, 650, 43, 125, 351, 650, 44, 141, 297, 650, 45, + 353, 46, 444, 47, 371, 18, 48, 392, 49, 327, 50, 315, 51, 316, 52, 72, + 119, 650, 34, 53, 383, 54, 429, 55, 124, 175, 462, 650, 56, 94, 402, 35, + 47, 57, 468, 58, 126, 440, 507, 650, 59, 79, 465, 650, 60, 486, 647, + 664, 667, 31, 61, 105, 650, 62, 556, 595, 63, 119, 420, 438, 507, 595, + 64, 104, 568, 650, 65, 274, 309, 469, 565, 576, 650, 66, 212, 274, 460, + 565, 576, 650, 67, 212, 224, 422, 565, 576, 650, 68, 69, 76, 377, 475, + 497, 650, 68, 69, 485, 497, 521, 650, 70, 192, 475, 504, 650, 71, 77, + 390, 415, 521, 650, 52, 72, 119, 650, 73, 171, 308, 463, 504, 650, 74, + 189, 274, 427, 504, 650, 75, 121, 224, 367, 504, 650, 76, 82, 137, 497, + 565, 650, 77, 225, 415, 416, 565, 650, 22, 78, 374, 59, 79, 96, 445, + 650, 17, 51, 80, 412, 24, 27, 81, 583, 76, 82, 137, 497, 565, 650, 83, + 646, 663, 664, 667, 84, 296, 657, 664, 667, 85, 135, 657, 664, 667, 86, + 187, 349, 503, 521, 650, 87, 158, 306, 388, 505, 565, 576, 650, 88, 307, + 308, 499, 565, 576, 650, 14, 53, 89, 436, 54, 64, 90, 156, 650, 91, 275, + 458, 521, 92, 320, 387, 521, 7, 13, 15, 93, 334, 650, 23, 94, 403, 59, + 79, 95, 96, 336, 464, 650, 59, 79, 95, 96, 419, 650, 97, 634, 663, 664, + 667, 98, 116, 664, 666, 667, 99, 296, 630, 664, 667, 100, 604, 619, 664, + 667, 101, 477, 619, 664, 667, 102, 145, 664, 666, 667, 103, 211, 224, + 434, 565, 576, 650, 64, 104, 306, 307, 565, 576, 619, 650, 105, 117, + 423, 650, 106, 138, 140, 306, 495, 576, 650, 105, 107, 188, 306, 504, + 550, 650, 108, 225, 415, 470, 507, 520, 650, 98, 109, 296, 662, 664, + 666, 667, 5, 110, 255, 485, 511, 625, 626, 641, 668, 111, 375, 659, 664, + 667, 112, 479, 652, 664, 666, 667, 113, 429, 657, 664, 667, 668, 114, + 423, 482, 652, 664, 666, 667, 115, 239, 657, 664, 667, 116, 296, 655, + 664, 666, 61, 117, 234, 650, 118, 258, 291, 349, 442, 521, 119, 409, + 488, 507, 595, 650, 54, 120, 308, 309, 496, 565, 576, 650, 75, 121, 223, + 384, 504, 650, 122, 259, 276, 400, 462, 470, 507, 579, 34, 40, 53, 89, + 123, 437, 55, 124, 215, 439, 462, 504, 507, 650, 125, 455, 497, 507, + 595, 650, 58, 108, 126, 241, 415, 507, 595, 601, 56, 78, 94, 127, 144, + 441, 128, 195, 338, 662, 664, 666, 667, 129, 228, 382, 662, 664, 666, + 667, 130, 165, 351, 662, 664, 666, 667, 131, 391, 625, 664, 667, 132, + 430, 466, 652, 664, 666, 667, 133, 384, 451, 652, 664, 666, 667, 134, + 567, 572, 645, 647, 664, 667, 13, 135, 196, 654, 655, 657, 136, 210, + 252, 595, 28, 76, 137, 488, 497, 504, 564, 595, 650, 90, 138, 158, 319, + 501, 565, 650, 70, 139, 389, 398, 414, 475, 504, 521, 565, 650, 90, 140, + 158, 319, 529, 565, 650, 141, 318, 361, 595, 650, 117, 139, 142, 389, + 414, 565, 595, 623, 143, 241, 414, 415, 417, 504, 507, 595, 30, 49, 50, + 78, 144, 407, 145, 162, 423, 657, 664, 666, 667, 146, 182, 381, 639, + 647, 664, 667, 147, 443, 522, 629, 662, 664, 667, 148, 198, 334, 381, + 659, 662, 664, 666, 667, 149, 417, 522, 642, 661, 662, 664, 667, 150, + 528, 657, 658, 662, 663, 664, 666, 667, 151, 574, 601, 642, 661, 662, + 664, 667, 152, 233, 661, 662, 664, 667, 153, 219, 661, 662, 664, 667, + 154, 442, 657, 659, 664, 667, 155, 409, 502, 579, 657, 659, 664, 667, + 64, 90, 156, 429, 501, 503, 529, 641, 643, 650, 157, 303, 657, 664, 667, + 87, 106, 138, 140, 158, 319, 595, 606, 650, 72, 91, 159, 349, 453, 650, + 160, 361, 389, 414, 443, 475, 507, 521, 565, 650, 46, 143, 161, 361, + 389, 414, 504, 628, 162, 447, 620, 648, 652, 664, 666, 667, 163, 177, + 195, 297, 338, 662, 664, 666, 667, 164, 165, 228, 351, 382, 662, 664, + 666, 667, 165, 264, 455, 662, 664, 666, 667, 166, 519, 636, 655, 656, + 659, 664, 666, 667, 668, 167, 266, 472, 625, 648, 664, 667, 168, 372, + 654, 659, 660, 664, 667, 169, 391, 472, 645, 664, 667, 170, 501, 511, + 607, 625, 632, 664, 667, 10, 73, 171, 189, 273, 504, 521, 571, 650, 21, + 47, 48, 57, 89, 123, 172, 523, 173, 226, 427, 483, 652, 661, 662, 664, + 666, 667, 174, 227, 367, 452, 652, 661, 662, 664, 666, 667, 55, 124, + 175, 439, 462, 639, 644, 650, 654, 658, 666, 668, 176, 260, 326, 653, + 661, 662, 664, 666, 667, 177, 297, 318, 655, 662, 664, 666, 667, 178, + 346, 472, 637, 659, 664, 667, 179, 472, 484, 645, 664, 667, 180, 434, + 460, 646, 654, 661, 662, 664, 667, 181, 234, 458, 485, 493, 647, 664, + 667, 182, 196, 381, 639, 645, 657, 664, 667, 183, 398, 424, 645, 653, + 661, 664, 667, 184, 333, 653, 661, 662, 664, 667, 185, 304, 463, 647, + 660, 661, 662, 664, 667, 186, 305, 427, 647, 660, 661, 662, 664, 667, + 86, 117, 118, 187, 222, 475, 506, 521, 650, 8, 41, 137, 188, 438, 504, + 521, 577, 595, 650, 12, 74, 121, 189, 335, 430, 504, 521, 650, 190, 239, + 276, 320, 389, 462, 470, 521, 650, 69, 70, 117, 191, 361, 414, 497, 504, + 565, 576, 640, 650, 70, 192, 475, 504, 506, 651, 652, 654, 660, 668, + 193, 311, 433, 654, 657, 659, 664, 667, 194, 220, 378, 413, 550, 646, + 652, 660, 664, 667, 195, 318, 338, 655, 662, 664, 666, 667, 7, 146, 196, + 654, 655, 657, 664, 667, 197, 386, 657, 664, 667, 135, 198, 334, 381, + 629, 655, 659, 664, 666, 667, 668, 199, 258, 259, 276, 349, 350, 389, + 576, 645, 650, 148, 200, 381, 530, 658, 662, 663, 664, 666, 667, 186, + 201, 344, 427, 463, 620, 646, 652, 660, 664, 667, 202, 368, 446, 639, + 653, 661, 662, 664, 667, 203, 360, 431, 580, 661, 662, 664, 667, 204, + 372, 653, 661, 662, 664, 667, 205, 556, 632, 638, 642, 646, 657, 659, + 664, 666, 667, 206, 396, 531, 613, 632, 657, 659, 660, 664, 667, 33, + 207, 542, 558, 571, 575, 616, 652, 654, 660, 208, 386, 653, 661, 662, + 664, 667, 209, 387, 580, 607, 657, 659, 664, 667, 103, 136, 210, 211, + 223, 576, 590, 595, 650, 103, 210, 211, 224, 576, 581, 595, 650, 66, 75, + 212, 224, 274, 290, 335, 565, 576, 591, 595, 650, 213, 258, 291, 303, + 320, 389, 414, 462, 470, 521, 650, 37, 214, 259, 320, 360, 389, 462, + 470, 521, 650, 58, 124, 215, 475, 504, 507, 565, 595, 629, 650, 185, + 216, 363, 364, 463, 550, 620, 646, 652, 660, 664, 667, 217, 250, 311, + 433, 629, 653, 654, 661, 662, 664, 667, 218, 300, 440, 574, 645, 658, + 662, 664, 666, 667, 19, 153, 219, 645, 649, 655, 661, 662, 664, 667, + 102, 220, 254, 347, 550, 647, 652, 660, 661, 662, 664, 666, 667, 221, + 387, 446, 548, 647, 653, 661, 662, 664, 667, 36, 61, 86, 187, 222, 319, + 475, 521, 565, 625, 650, 67, 136, 210, 211, 223, 224, 290, 504, 576, + 593, 595, 650, 67, 212, 223, 224, 290, 504, 565, 576, 582, 595, 650, 6, + 32, 62, 71, 77, 108, 225, 241, 415, 507, 545, 595, 650, 132, 226, 427, + 430, 487, 652, 659, 661, 662, 664, 666, 667, 133, 227, 367, 384, 467, + 652, 659, 661, 662, 664, 666, 667, 228, 264, 382, 455, 502, 655, 658, + 662, 664, 666, 667, 229, 370, 491, 494, 580, 596, 652, 654, 664, 666, + 667, 668, 230, 383, 523, 570, 653, 661, 662, 664, 667, 231, 346, 391, + 472, 548, 637, 653, 661, 662, 664, 667, 232, 445, 465, 658, 659, 660, + 662, 663, 664, 666, 667, 24, 152, 233, 583, 644, 655, 661, 662, 664, + 667, 61, 117, 181, 234, 458, 493, 644, 650, 664, 667, 235, 442, 471, + 625, 639, 645, 653, 661, 664, 667, 236, 503, 530, 573, 640, 645, 661, + 664, 667, 237, 314, 375, 380, 401, 436, 655, 657, 659, 660, 664, 667, + 114, 234, 238, 423, 621, 645, 661, 662, 664, 666, 667, 190, 239, 320, + 470, 653, 655, 657, 661, 662, 26, 84, 98, 99, 109, 116, 240, 296, 644, + 658, 664, 666, 667, 4, 38, 45, 58, 108, 241, 415, 504, 507, 543, 595, + 650, 242, 352, 391, 472, 548, 653, 658, 661, 662, 664, 667, 239, 243, + 368, 653, 657, 659, 661, 662, 664, 667, 244, 245, 444, 530, 631, 658, + 661, 662, 664, 667, 245, 444, 618, 631, 658, 659, 664, 667, 246, 391, + 401, 472, 484, 625, 648, 653, 661, 662, 664, 667, 247, 279, 280, 553, + 606, 608, 630, 633, 660, 661, 662, 664, 667, 248, 280, 315, 339, 616, + 620, 630, 633, 657, 659, 660, 664, 667, 247, 249, 315, 354, 418, 620, + 633, 648, 660, 661, 662, 664, 667, 232, 250, 433, 465, 654, 658, 660, + 661, 662, 664, 666, 667, 251, 282, 316, 630, 640, 653, 654, 660, 661, + 662, 664, 667, 136, 210, 252, 581, 595, 654, 660, 253, 420, 489, 629, + 637, 657, 658, 659, 664, 666, 667, 254, 498, 529, 603, 606, 625, 646, + 647, 648, 652, 664, 667, 255, 330, 408, 482, 485, 503, 511, 603, 625, + 634, 648, 664, 667, 256, 303, 333, 653, 657, 661, 662, 664, 667, 257, + 357, 480, 511, 580, 657, 659, 661, 662, 664, 667, 213, 258, 291, 320, + 333, 349, 389, 400, 414, 462, 521, 650, 214, 258, 259, 276, 320, 349, + 350, 389, 400, 431, 462, 521, 650, 4, 176, 260, 653, 655, 659, 661, 662, + 664, 667, 261, 324, 412, 432, 433, 652, 658, 659, 662, 663, 664, 666, + 667, 262, 493, 520, 578, 601, 647, 658, 661, 662, 664, 667, 263, 417, + 515, 516, 596, 607, 611, 632, 642, 652, 654, 657, 659, 664, 667, 264, + 351, 382, 502, 516, 579, 629, 635, 655, 663, 664, 666, 667, 265, 375, + 523, 620, 653, 661, 662, 664, 667, 266, 371, 472, 548, 631, 645, 648, + 661, 662, 664, 666, 667, 250, 267, 340, 530, 630, 633, 637, 653, 660, + 661, 662, 664, 667, 268, 422, 434, 451, 467, 582, 590, 593, 655, 657, + 659, 660, 664, 666, 667, 269, 404, 434, 452, 460, 581, 591, 646, 654, + 659, 660, 661, 662, 664, 666, 667, 270, 486, 502, 612, 625, 640, 648, + 658, 664, 666, 667, 668, 271, 377, 485, 567, 603, 618, 646, 652, 659, + 662, 663, 664, 666, 667, 54, 117, 159, 187, 222, 272, 319, 379, 388, + 475, 565, 576, 595, 648, 650, 136, 211, 273, 289, 308, 335, 348, 504, + 565, 576, 595, 597, 650, 65, 103, 211, 212, 274, 289, 309, 335, 504, + 565, 576, 595, 602, 650, 37, 275, 291, 320, 349, 357, 389, 414, 462, + 470, 521, 650, 190, 258, 276, 320, 349, 350, 368, 389, 400, 462, 521, + 650, 277, 535, 604, 619, 620, 632, 642, 653, 661, 662, 664, 667, 278, + 295, 342, 463, 477, 637, 652, 661, 662, 664, 666, 667, 267, 279, 327, + 418, 529, 603, 625, 630, 633, 660, 661, 662, 664, 666, 667, 22, 247, + 280, 655, 657, 659, 661, 662, 664, 667, 281, 340, 403, 465, 530, 633, + 657, 658, 659, 660, 661, 662, 664, 667, 261, 282, 324, 433, 630, 645, + 652, 653, 660, 661, 662, 664, 666, 667, 252, 269, 283, 404, 434, 581, + 590, 657, 660, 664, 667, 284, 454, 512, 550, 552, 569, 577, 640, 649, + 652, 655, 657, 659, 664, 666, 667, 285, 473, 501, 529, 568, 570, 604, + 619, 648, 653, 661, 662, 664, 667, 668, 286, 377, 485, 567, 569, 572, + 596, 640, 645, 646, 647, 649, 657, 659, 664, 667, 287, 458, 511, 607, + 639, 647, 657, 659, 664, 667, 288, 401, 436, 437, 654, 655, 657, 659, + 664, 666, 667, 120, 136, 189, 210, 273, 289, 290, 309, 335, 565, 576, + 595, 598, 650, 66, 121, 136, 210, 211, 212, 223, 290, 335, 565, 576, + 594, 595, 650, 213, 258, 291, 292, 320, 349, 350, 400, 411, 462, 470, + 475, 521, 650, 92, 258, 259, 276, 291, 292, 320, 349, 350, 462, 521, + 548, 650, 260, 293, 353, 394, 490, 503, 548, 642, 653, 659, 661, 662, + 664, 667, 294, 346, 401, 436, 484, 523, 646, 648, 653, 657, 659, 661, + 662, 664, 667, 112, 295, 463, 500, 513, 550, 569, 571, 640, 652, 659, + 661, 662, 664, 666, 667, 16, 26, 109, 240, 296, 630, 644, 650, 655, 657, + 658, 662, 664, 666, 667, 44, 141, 163, 297, 650, 654, 655, 659, 660, + 662, 664, 667, 298, 432, 551, 631, 640, 642, 645, 658, 661, 662, 664, + 667, 299, 314, 380, 391, 472, 484, 523, 625, 637, 647, 653, 661, 662, + 664, 666, 667, 300, 440, 461, 618, 629, 655, 659, 663, 664, 666, 667, + 668, 301, 317, 324, 412, 457, 596, 630, 652, 654, 655, 657, 659, 664, + 667, 302, 422, 460, 474, 581, 582, 590, 591, 593, 594, 655, 657, 659, + 660, 664, 666, 667, 213, 256, 291, 303, 470, 653, 655, 657, 661, 662, + 664, 667, 10, 171, 185, 304, 521, 655, 657, 659, 661, 662, 664, 667, 12, + 186, 189, 305, 521, 655, 657, 659, 661, 662, 664, 667, 87, 88, 106, 158, + 306, 308, 309, 388, 438, 488, 504, 565, 576, 595, 613, 650, 9, 64, 73, + 104, 120, 306, 307, 348, 438, 565, 576, 595, 616, 650, 88, 211, 273, + 307, 308, 348, 504, 565, 576, 595, 610, 650, 11, 74, 120, 273, 274, 289, + 308, 309, 565, 576, 595, 609, 650, 310, 502, 522, 552, 578, 627, 633, + 645, 647, 649, 652, 657, 658, 660, 664, 667, 27, 217, 311, 445, 653, + 654, 655, 657, 659, 661, 662, 664, 667, 312, 390, 515, 520, 572, 603, + 607, 625, 631, 632, 637, 647, 661, 662, 664, 667, 313, 409, 512, 552, + 569, 579, 629, 634, 646, 653, 654, 658, 661, 662, 664, 667, 288, 314, + 380, 437, 653, 654, 657, 659, 660, 661, 662, 664, 666, 667, 50, 249, + 315, 654, 655, 659, 661, 662, 664, 667, 51, 251, 316, 653, 654, 655, + 659, 661, 662, 664, 667, 282, 310, 316, 317, 324, 486, 621, 623, 630, + 633, 640, 654, 657, 659, 660, 664, 667, 141, 177, 195, 297, 318, 361, + 595, 654, 655, 657, 662, 664, 667, 668, 105, 117, 138, 140, 187, 222, + 272, 319, 475, 521, 565, 595, 626, 650, 190, 258, 259, 276, 292, 320, + 349, 350, 399, 400, 462, 470, 507, 521, 650, 55, 159, 258, 259, 276, + 292, 321, 349, 350, 361, 389, 462, 576, 650, 658, 322, 396, 495, 505, + 520, 552, 553, 570, 608, 631, 632, 642, 653, 661, 662, 664, 667, 323, + 431, 446, 480, 485, 548, 560, 580, 637, 645, 658, 661, 664, 667, 17, + 282, 324, 419, 445, 652, 653, 655, 657, 659, 661, 662, 664, 667, 325, + 352, 392, 472, 484, 523, 548, 653, 654, 657, 658, 659, 661, 662, 664, + 667, 260, 326, 353, 393, 515, 631, 632, 653, 655, 659, 661, 662, 664, + 666, 667, 49, 279, 327, 625, 633, 655, 657, 659, 661, 662, 664, 667, + 280, 315, 328, 373, 374, 418, 552, 570, 613, 630, 633, 655, 657, 659, + 660, 664, 667, 329, 447, 454, 512, 552, 564, 567, 578, 634, 635, 640, + 646, 652, 655, 658, 662, 664, 667, 330, 341, 458, 503, 511, 580, 603, + 607, 632, 657, 664, 667, 668, 331, 397, 429, 473, 482, 501, 529, 530, + 605, 625, 634, 653, 661, 662, 664, 666, 667, 332, 487, 492, 496, 499, + 500, 529, 553, 603, 606, 608, 609, 619, 620, 625, 626, 634, 637, 664, + 667, 184, 213, 258, 291, 333, 400, 650, 653, 655, 657, 661, 662, 664, + 667, 85, 93, 135, 148, 182, 196, 198, 200, 334, 381, 629, 654, 655, 659, + 662, 664, 666, 667, 668, 65, 136, 210, 211, 223, 274, 289, 290, 335, + 504, 565, 576, 592, 595, 650, 25, 50, 51, 56, 80, 81, 94, 95, 96, 127, + 144, 336, 633, 650, 253, 337, 420, 520, 548, 552, 579, 620, 629, 637, + 653, 654, 658, 661, 662, 664, 666, 667, 39, 128, 141, 163, 338, 622, + 635, 650, 654, 655, 659, 660, 662, 664, 667, 280, 327, 339, 355, 374, + 495, 505, 553, 570, 608, 630, 633, 657, 659, 660, 661, 662, 664, 667, + 23, 267, 340, 653, 655, 657, 659, 661, 662, 664, 667, 341, 482, 503, + 511, 603, 605, 645, 647, 653, 664, 666, 667, 668, 342, 454, 489, 550, + 637, 640, 648, 657, 658, 664, 666, 667, 343, 384, 460, 466, 469, 487, + 590, 591, 592, 593, 594, 602, 655, 657, 659, 660, 664, 666, 667, 344, + 469, 474, 487, 492, 499, 500, 529, 602, 603, 604, 606, 619, 625, 626, + 634, 637, 652, 664, 667, 345, 453, 501, 569, 572, 578, 580, 607, 639, + 644, 646, 648, 657, 658, 664, 667, 35, 231, 346, 653, 654, 655, 657, + 659, 661, 662, 664, 667, 8, 188, 220, 347, 501, 521, 529, 649, 655, 657, + 659, 661, 662, 664, 667, 33, 50, 136, 171, 210, 273, 289, 307, 309, 335, + 348, 438, 565, 576, 595, 600, 650, 91, 275, 291, 320, 349, 389, 400, + 414, 462, 480, 521, 650, 92, 118, 215, 276, 291, 292, 320, 349, 350, + 389, 400, 414, 462, 475, 507, 521, 639, 650, 43, 125, 130, 164, 234, + 351, 644, 650, 654, 655, 659, 660, 662, 664, 667, 18, 242, 352, 371, + 653, 654, 655, 657, 659, 660, 661, 662, 664, 667, 45, 176, 293, 353, + 394, 442, 480, 653, 655, 659, 661, 662, 664, 667, 354, 373, 374, 402, + 403, 407, 456, 630, 633, 638, 646, 648, 655, 657, 659, 660, 664, 666, + 667, 281, 327, 340, 355, 373, 603, 626, 630, 633, 634, 648, 653, 657, + 659, 660, 661, 662, 664, 667, 285, 356, 495, 500, 505, 513, 553, 570, + 603, 604, 606, 608, 616, 619, 620, 625, 626, 634, 637, 648, 664, 667, + 197, 208, 275, 357, 386, 470, 521, 655, 657, 661, 662, 664, 667, 181, + 235, 287, 358, 458, 471, 480, 511, 639, 647, 653, 661, 662, 664, 667, + 359, 399, 411, 493, 548, 580, 612, 618, 653, 659, 661, 662, 664, 667, + 197, 208, 214, 360, 386, 462, 470, 655, 657, 661, 662, 664, 667, 20, 39, + 46, 143, 160, 361, 389, 414, 475, 504, 507, 521, 565, 595, 635, 650, + 168, 352, 362, 391, 392, 472, 484, 520, 579, 629, 644, 654, 655, 657, + 658, 659, 664, 667, 363, 365, 492, 495, 499, 500, 505, 513, 529, 603, + 604, 606, 610, 620, 625, 626, 634, 637, 652, 659, 664, 667, 364, 365, + 429, 492, 499, 500, 529, 553, 603, 604, 606, 608, 619, 620, 625, 637, + 652, 657, 661, 662, 664, 667, 11, 364, 365, 501, 511, 529, 616, 655, + 657, 659, 660, 661, 662, 664, 667, 366, 390, 416, 501, 511, 520, 543, + 572, 603, 607, 625, 631, 632, 647, 648, 651, 659, 662, 664, 667, 75, + 121, 174, 201, 224, 367, 460, 504, 539, 649, 650, 652, 655, 657, 659, + 661, 662, 664, 667, 190, 202, 276, 320, 368, 400, 650, 653, 655, 657, + 659, 661, 662, 664, 667, 270, 369, 486, 548, 605, 625, 634, 640, 645, + 658, 661, 662, 664, 666, 667, 20, 370, 443, 444, 455, 546, 580, 596, + 618, 622, 629, 635, 644, 649, 651, 652, 654, 659, 662, 663, 668, 47, + 266, 346, 371, 548, 631, 645, 654, 655, 659, 661, 662, 664, 667, 21, + 168, 169, 179, 204, 372, 392, 468, 652, 653, 655, 659, 660, 661, 662, + 664, 667, 30, 279, 327, 355, 373, 633, 648, 653, 655, 657, 659, 661, + 662, 664, 667, 78, 247, 248, 249, 280, 315, 339, 374, 654, 655, 657, + 659, 661, 662, 664, 667, 34, 265, 375, 653, 654, 655, 657, 659, 661, + 662, 664, 667, 376, 469, 492, 496, 513, 581, 590, 592, 593, 594, 598, + 602, 609, 613, 655, 657, 659, 660, 664, 666, 667, 68, 76, 181, 271, 377, + 475, 497, 626, 650, 652, 655, 657, 659, 660, 662, 663, 664, 667, 378, + 385, 397, 495, 505, 529, 553, 570, 603, 606, 608, 613, 620, 626, 634, + 637, 646, 652, 659, 664, 667, 91, 92, 118, 160, 222, 258, 259, 276, 349, + 350, 379, 388, 521, 576, 637, 650, 40, 178, 231, 299, 346, 380, 401, + 653, 654, 655, 657, 659, 661, 662, 664, 667, 15, 93, 182, 200, 334, 381, + 530, 645, 647, 650, 655, 657, 658, 659, 662, 663, 664, 666, 667, 668, + 42, 125, 129, 164, 234, 382, 414, 470, 622, 635, 644, 650, 655, 659, + 660, 662, 664, 667, 53, 111, 230, 265, 375, 383, 653, 654, 655, 657, + 661, 662, 664, 667, 121, 174, 201, 223, 227, 384, 504, 547, 582, 652, + 654, 655, 660, 661, 662, 664, 667, 9, 385, 413, 501, 511, 529, 638, 643, + 655, 657, 659, 660, 661, 662, 664, 667, 37, 208, 214, 275, 386, 462, + 521, 653, 655, 657, 661, 662, 664, 667, 92, 221, 320, 387, 521, 580, + 607, 647, 653, 655, 657, 659, 661, 662, 664, 667, 41, 88, 104, 107, 120, + 138, 140, 222, 272, 307, 308, 309, 319, 379, 388, 488, 565, 576, 595, + 638, 650, 19, 199, 258, 259, 276, 349, 350, 361, 389, 414, 507, 565, + 567, 576, 595, 650, 71, 77, 312, 366, 390, 456, 501, 607, 642, 650, 651, + 655, 657, 659, 661, 662, 664, 667, 371, 391, 468, 484, 548, 625, 629, + 637, 645, 648, 658, 659, 661, 662, 664, 666, 667, 48, 325, 352, 371, + 392, 468, 523, 629, 652, 654, 655, 657, 658, 659, 661, 662, 664, 667, + 29, 326, 393, 394, 543, 601, 631, 635, 642, 652, 653, 654, 655, 659, + 660, 661, 662, 664, 667, 668, 353, 393, 394, 442, 480, 503, 520, 548, + 607, 631, 632, 635, 655, 659, 664, 667, 395, 402, 412, 419, 441, 457, + 464, 551, 563, 630, 632, 641, 643, 652, 654, 655, 657, 659, 660, 664, + 666, 667, 32, 62, 277, 322, 396, 509, 545, 595, 638, 653, 655, 657, 659, + 661, 662, 664, 667, 113, 285, 397, 429, 473, 500, 501, 529, 553, 570, + 604, 606, 608, 620, 625, 626, 637, 648, 652, 655, 664, 666, 667, 668, + 70, 139, 183, 389, 398, 414, 475, 504, 521, 565, 641, 645, 650, 653, + 655, 659, 661, 664, 667, 115, 239, 320, 350, 399, 507, 521, 548, 650, + 653, 655, 657, 661, 662, 664, 667, 215, 258, 259, 276, 291, 320, 349, + 350, 389, 400, 414, 462, 470, 507, 521, 565, 636, 650, 14, 131, 167, + 230, 246, 401, 653, 654, 655, 657, 659, 661, 662, 664, 667, 56, 281, + 402, 403, 419, 456, 622, 633, 653, 654, 655, 657, 659, 660, 661, 662, + 664, 667, 94, 267, 281, 340, 403, 445, 633, 651, 655, 657, 658, 659, + 660, 661, 662, 664, 667, 268, 404, 422, 434, 452, 467, 581, 590, 591, + 646, 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, 395, 402, 403, + 405, 419, 432, 441, 445, 573, 622, 630, 633, 647, 651, 653, 655, 657, + 659, 660, 661, 662, 664, 666, 667, 406, 461, 471, 481, 493, 508, 520, + 574, 612, 618, 629, 631, 645, 654, 657, 659, 664, 667, 144, 248, 315, + 327, 328, 355, 373, 374, 407, 418, 633, 648, 653, 654, 655, 657, 659, + 661, 662, 664, 667, 408, 503, 506, 519, 573, 574, 625, 631, 640, 645, + 648, 658, 661, 662, 664, 667, 668, 119, 313, 409, 420, 488, 507, 526, + 552, 555, 629, 636, 642, 652, 653, 654, 655, 657, 659, 660, 661, 662, + 664, 667, 343, 367, 410, 428, 460, 469, 483, 487, 513, 570, 591, 594, + 609, 610, 616, 646, 648, 655, 657, 659, 660, 661, 662, 664, 666, 667, + 157, 184, 256, 291, 303, 333, 350, 411, 462, 475, 548, 650, 653, 655, + 657, 661, 662, 664, 667, 80, 251, 261, 282, 316, 324, 412, 441, 464, + 652, 654, 655, 657, 658, 659, 662, 663, 664, 667, 385, 413, 429, 473, + 482, 495, 505, 529, 553, 570, 603, 604, 606, 608, 620, 625, 634, 637, + 646, 648, 652, 655, 661, 662, 664, 667, 42, 124, 139, 199, 258, 349, + 350, 361, 389, 414, 415, 470, 475, 504, 507, 565, 595, 596, 650, 25, 29, + 38, 45, 62, 77, 108, 126, 143, 225, 241, 414, 415, 470, 504, 507, 521, + 565, 595, 642, 650, 77, 225, 366, 415, 416, 501, 565, 607, 622, 625, + 642, 648, 650, 652, 654, 655, 659, 662, 664, 667, 668, 143, 149, 393, + 415, 417, 504, 524, 543, 596, 601, 635, 642, 649, 652, 654, 655, 657, + 659, 660, 661, 662, 664, 667, 668, 327, 340, 354, 373, 403, 407, 418, + 456, 529, 630, 633, 634, 646, 648, 653, 655, 657, 659, 660, 661, 662, + 664, 666, 667, 95, 96, 232, 419, 433, 445, 465, 650, 652, 653, 654, 655, + 657, 659, 660, 661, 662, 664, 667, 63, 83, 97, 119, 337, 420, 438, 507, + 520, 552, 595, 653, 654, 655, 657, 659, 660, 661, 662, 664, 667, 421, + 427, 428, 435, 460, 477, 496, 499, 500, 513, 591, 598, 609, 616, 638, + 646, 648, 655, 657, 659, 660, 661, 662, 664, 666, 667, 67, 101, 180, + 212, 224, 344, 422, 452, 469, 539, 565, 638, 650, 654, 655, 657, 659, + 660, 661, 662, 664, 667, 668, 105, 238, 423, 511, 621, 625, 645, 649, + 655, 657, 659, 661, 662, 664, 667, 323, 387, 394, 424, 442, 446, 480, + 511, 530, 580, 614, 637, 639, 645, 647, 648, 653, 661, 662, 663, 664, + 667, 236, 255, 271, 323, 425, 446, 476, 478, 485, 498, 605, 621, 640, + 646, 647, 653, 661, 662, 664, 666, 667, 357, 386, 394, 426, 453, 458, + 480, 501, 528, 572, 607, 637, 639, 647, 653, 655, 657, 661, 662, 663, + 664, 667, 74, 173, 186, 189, 216, 274, 305, 427, 469, 496, 504, 538, + 646, 647, 649, 650, 652, 655, 657, 659, 661, 662, 664, 667, 428, 430, + 479, 496, 499, 500, 513, 590, 592, 594, 597, 598, 609, 610, 637, 638, + 648, 655, 657, 659, 660, 664, 666, 667, 54, 331, 429, 482, 530, 605, + 634, 653, 655, 657, 661, 662, 664, 667, 133, 173, 189, 216, 226, 305, + 335, 384, 430, 504, 562, 602, 652, 654, 655, 660, 661, 662, 664, 667, + 214, 259, 323, 400, 431, 446, 462, 480, 485, 511, 548, 560, 580, 639, + 644, 645, 650, 658, 661, 662, 664, 667, 419, 432, 445, 464, 465, 573, + 603, 629, 630, 642, 646, 652, 653, 654, 655, 657, 659, 660, 661, 662, + 664, 666, 667, 419, 433, 445, 457, 465, 530, 603, 629, 646, 647, 652, + 653, 654, 657, 659, 660, 661, 662, 664, 666, 667, 103, 180, 211, 224, + 434, 460, 533, 565, 638, 650, 655, 657, 659, 660, 661, 662, 664, 667, + 668, 383, 396, 420, 435, 495, 505, 570, 571, 597, 598, 600, 613, 615, + 616, 619, 637, 648, 655, 657, 659, 660, 664, 666, 667, 89, 111, 131, + 167, 230, 246, 265, 294, 375, 383, 401, 436, 653, 654, 655, 657, 659, + 661, 662, 664, 667, 123, 178, 237, 265, 294, 299, 314, 375, 380, 383, + 401, 436, 437, 468, 523, 653, 654, 655, 657, 659, 660, 661, 662, 664, + 667, 6, 33, 34, 103, 106, 136, 210, 211, 273, 306, 308, 309, 335, 348, + 438, 488, 504, 507, 565, 576, 595, 615, 650, 124, 175, 215, 387, 431, + 439, 444, 462, 501, 507, 511, 580, 614, 626, 629, 636, 637, 639, 641, + 644, 650, 651, 652, 654, 658, 663, 666, 668, 58, 126, 218, 300, 440, + 458, 461, 507, 524, 528, 574, 601, 607, 618, 629, 642, 644, 645, 654, + 655, 657, 658, 659, 660, 662, 664, 667, 127, 328, 354, 374, 402, 403, + 405, 407, 441, 456, 464, 573, 632, 652, 653, 654, 655, 657, 659, 660, + 661, 662, 664, 667, 118, 235, 291, 394, 442, 458, 471, 521, 630, 645, + 653, 655, 657, 659, 661, 662, 664, 667, 147, 160, 338, 361, 370, 414, + 443, 444, 494, 507, 567, 596, 622, 629, 635, 636, 641, 644, 649, 650, + 651, 652, 654, 655, 659, 662, 663, 664, 667, 668, 46, 245, 370, 443, + 444, 455, 530, 596, 618, 628, 629, 631, 635, 644, 647, 652, 654, 655, + 657, 658, 659, 661, 662, 663, 668, 79, 96, 232, 250, 445, 465, 603, 649, + 650, 652, 654, 655, 657, 658, 659, 660, 662, 663, 664, 667, 266, 323, + 369, 431, 446, 478, 493, 548, 560, 578, 604, 614, 639, 640, 645, 647, + 653, 658, 661, 662, 664, 667, 447, 459, 486, 512, 516, 550, 564, 569, + 578, 596, 612, 623, 631, 640, 643, 645, 646, 648, 649, 652, 655, 657, + 658, 659, 664, 667, 375, 448, 499, 513, 535, 590, 592, 597, 598, 600, + 610, 616, 620, 625, 637, 640, 648, 655, 657, 659, 660, 664, 666, 667, + 304, 385, 448, 449, 495, 496, 499, 505, 513, 553, 570, 603, 604, 608, + 613, 616, 619, 620, 626, 634, 637, 638, 646, 647, 648, 654, 657, 660, + 661, 662, 664, 667, 305, 450, 460, 469, 492, 495, 496, 499, 500, 505, + 553, 570, 603, 604, 606, 608, 609, 610, 616, 619, 620, 626, 634, 646, + 647, 654, 657, 660, 661, 662, 664, 667, 302, 367, 404, 422, 434, 450, + 451, 460, 474, 513, 570, 581, 582, 590, 593, 602, 609, 610, 646, 652, + 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, 422, 452, 460, 469, + 479, 487, 492, 495, 496, 499, 505, 553, 570, 602, 604, 606, 608, 609, + 610, 619, 620, 626, 634, 646, 647, 648, 652, 654, 660, 661, 662, 664, + 667, 72, 159, 197, 208, 257, 426, 453, 458, 501, 511, 580, 607, 625, + 626, 644, 648, 650, 653, 654, 655, 657, 661, 662, 664, 667, 668, 41, + 454, 478, 605, 647, 653, 655, 657, 659, 660, 661, 662, 664, 667, 668, + 125, 165, 192, 228, 351, 370, 384, 430, 455, 486, 497, 507, 629, 635, + 636, 640, 641, 644, 649, 652, 654, 655, 657, 660, 662, 664, 667, 668, + 232, 340, 402, 403, 405, 433, 445, 456, 464, 465, 529, 630, 633, 642, + 647, 651, 652, 653, 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, + 327, 340, 403, 419, 445, 457, 464, 465, 573, 630, 632, 633, 641, 645, + 646, 652, 653, 654, 655, 658, 659, 660, 661, 662, 664, 666, 667, 668, + 91, 181, 275, 358, 458, 471, 521, 607, 647, 653, 655, 657, 659, 661, + 662, 664, 667, 284, 423, 454, 459, 550, 569, 577, 619, 625, 637, 640, + 645, 646, 648, 649, 652, 653, 655, 659, 661, 662, 664, 666, 667, 66, + 100, 212, 274, 332, 365, 450, 452, 460, 496, 537, 565, 638, 646, 647, + 649, 650, 654, 655, 657, 659, 660, 661, 662, 664, 667, 668, 440, 461, + 502, 508, 520, 528, 579, 612, 625, 629, 631, 635, 637, 645, 648, 654, + 655, 658, 664, 666, 667, 668, 37, 43, 44, 55, 118, 124, 160, 214, 258, + 259, 275, 276, 291, 292, 321, 349, 350, 400, 462, 470, 475, 507, 521, + 576, 595, 644, 650, 73, 171, 185, 194, 278, 304, 308, 463, 486, 499, + 504, 541, 542, 616, 619, 620, 623, 646, 647, 649, 650, 652, 655, 657, + 659, 661, 662, 664, 667, 668, 95, 193, 336, 419, 432, 433, 445, 456, + 464, 465, 573, 619, 630, 632, 647, 650, 652, 653, 654, 655, 657, 659, + 660, 661, 662, 664, 667, 59, 79, 250, 465, 530, 603, 646, 647, 649, 650, + 654, 655, 657, 658, 659, 661, 662, 664, 667, 376, 422, 427, 434, 448, + 449, 466, 469, 492, 496, 513, 570, 581, 582, 592, 602, 610, 613, 616, + 646, 648, 652, 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, 422, + 450, 451, 467, 469, 487, 492, 495, 496, 499, 500, 505, 513, 553, 570, + 582, 591, 602, 608, 609, 610, 613, 616, 620, 634, 638, 646, 647, 648, + 652, 654, 659, 660, 661, 662, 664, 666, 667, 57, 167, 169, 179, 204, + 242, 266, 325, 346, 352, 371, 380, 391, 468, 645, 652, 654, 655, 657, + 658, 659, 660, 661, 662, 664, 667, 65, 274, 309, 363, 364, 450, 469, + 483, 499, 538, 565, 603, 634, 638, 646, 647, 650, 652, 654, 655, 657, + 659, 660, 661, 662, 664, 667, 668, 42, 63, 72, 91, 108, 119, 122, 125, + 126, 141, 159, 190, 213, 214, 215, 275, 276, 291, 320, 349, 350, 400, + 414, 415, 462, 470, 507, 521, 595, 650, 663, 416, 442, 447, 458, 471, + 481, 501, 511, 520, 545, 552, 572, 578, 607, 611, 622, 625, 631, 632, + 637, 642, 645, 647, 648, 653, 654, 657, 660, 661, 662, 664, 666, 667, + 314, 325, 346, 352, 468, 472, 523, 548, 625, 629, 631, 637, 640, 645, + 648, 654, 655, 657, 658, 659, 661, 662, 664, 666, 667, 459, 473, 485, + 501, 529, 569, 570, 580, 606, 607, 625, 626, 634, 637, 646, 647, 648, + 652, 653, 654, 657, 659, 660, 661, 662, 664, 667, 668, 365, 410, 421, + 460, 474, 483, 492, 495, 496, 499, 500, 505, 513, 553, 570, 591, 602, + 603, 608, 609, 610, 613, 616, 619, 620, 634, 637, 638, 646, 647, 648, + 654, 657, 659, 660, 661, 662, 664, 666, 667, 35, 36, 68, 69, 91, 92, 94, + 139, 159, 160, 187, 215, 222, 291, 319, 350, 379, 414, 462, 475, 497, + 504, 507, 521, 565, 576, 595, 622, 650, 360, 368, 386, 431, 461, 476, + 485, 491, 493, 494, 510, 516, 519, 530, 573, 579, 580, 605, 637, 644, + 645, 648, 654, 655, 657, 658, 660, 661, 662, 663, 664, 666, 667, 385, + 429, 435, 477, 489, 495, 499, 501, 505, 513, 529, 552, 553, 570, 603, + 606, 608, 613, 619, 625, 626, 634, 637, 638, 646, 647, 648, 652, 654, + 655, 657, 659, 660, 661, 662, 664, 667, 342, 423, 454, 459, 473, 478, + 482, 485, 498, 530, 548, 550, 569, 603, 605, 608, 621, 625, 634, 637, + 640, 645, 646, 652, 653, 655, 658, 659, 661, 662, 664, 666, 667, 342, + 434, 448, 463, 469, 479, 489, 492, 499, 550, 552, 568, 581, 597, 602, + 604, 610, 613, 619, 620, 637, 640, 646, 648, 652, 654, 655, 657, 659, + 660, 661, 662, 664, 666, 667, 275, 287, 323, 349, 358, 394, 400, 424, + 480, 506, 511, 521, 548, 626, 641, 644, 645, 647, 650, 653, 654, 655, + 657, 659, 661, 662, 664, 667, 390, 396, 416, 417, 481, 512, 515, 520, + 535, 543, 545, 552, 556, 578, 585, 588, 589, 601, 612, 629, 632, 633, + 637, 641, 642, 643, 654, 655, 657, 659, 660, 664, 666, 667, 408, 429, + 458, 459, 473, 482, 485, 498, 503, 511, 529, 550, 580, 603, 605, 608, + 625, 632, 634, 637, 646, 647, 648, 652, 653, 657, 660, 661, 662, 664, + 666, 667, 365, 428, 448, 469, 483, 495, 496, 499, 500, 505, 513, 553, + 570, 603, 604, 606, 608, 610, 613, 616, 619, 620, 625, 626, 634, 637, + 646, 647, 652, 654, 655, 657, 659, 660, 661, 662, 664, 667, 288, 371, + 372, 380, 383, 392, 436, 437, 468, 484, 520, 523, 548, 579, 625, 629, + 631, 633, 637, 644, 645, 648, 654, 655, 657, 658, 659, 664, 666, 667, + 68, 69, 255, 323, 425, 476, 478, 485, 497, 498, 521, 599, 605, 618, 621, + 646, 647, 649, 650, 651, 653, 655, 657, 659, 661, 662, 664, 667, 28, 60, + 270, 369, 486, 548, 605, 612, 616, 623, 625, 630, 634, 638, 640, 644, + 645, 647, 648, 649, 652, 655, 657, 658, 660, 661, 662, 664, 667, 668, + 365, 428, 448, 449, 466, 469, 487, 495, 499, 500, 513, 553, 570, 602, + 603, 608, 609, 610, 613, 616, 619, 620, 625, 626, 634, 637, 638, 646, + 647, 648, 652, 654, 655, 659, 660, 661, 662, 664, 666, 667, 32, 50, 53, + 62, 63, 78, 89, 119, 121, 136, 137, 144, 159, 188, 189, 210, 211, 223, + 272, 273, 289, 290, 307, 308, 319, 335, 348, 388, 438, 488, 504, 507, + 565, 576, 595, 643, 650, 383, 420, 454, 489, 495, 512, 529, 535, 550, + 556, 569, 578, 597, 600, 606, 613, 615, 625, 629, 637, 638, 640, 641, + 643, 648, 655, 657, 659, 660, 664, 666, 667, 266, 298, 326, 408, 472, + 490, 493, 498, 515, 522, 530, 560, 572, 573, 574, 578, 611, 621, 623, + 631, 634, 639, 640, 642, 645, 646, 653, 661, 662, 664, 666, 667, 668, + 491, 516, 519, 567, 579, 580, 596, 622, 623, 628, 629, 635, 636, 638, + 639, 640, 641, 642, 643, 644, 645, 649, 652, 654, 658, 660, 662, 663, + 664, 666, 667, 385, 421, 428, 448, 477, 492, 495, 496, 505, 513, 529, + 553, 570, 603, 606, 608, 609, 610, 613, 616, 619, 620, 625, 626, 634, + 637, 638, 646, 647, 648, 652, 654, 657, 659, 660, 661, 662, 664, 666, + 667, 234, 461, 493, 519, 520, 528, 530, 548, 579, 612, 618, 625, 629, + 631, 636, 637, 639, 645, 647, 648, 651, 654, 655, 658, 659, 662, 663, + 664, 666, 667, 668, 491, 494, 516, 519, 522, 567, 573, 574, 579, 580, + 596, 622, 623, 624, 628, 629, 635, 636, 637, 638, 639, 640, 641, 642, + 643, 644, 645, 649, 652, 654, 658, 660, 662, 663, 664, 667, 106, 473, + 492, 495, 500, 501, 513, 529, 534, 553, 570, 603, 604, 608, 620, 630, + 632, 634, 641, 646, 647, 648, 653, 654, 655, 657, 659, 660, 661, 662, + 664, 667, 668, 113, 120, 308, 309, 331, 356, 385, 397, 429, 449, 483, + 496, 501, 511, 529, 536, 553, 565, 570, 603, 608, 616, 619, 625, 634, + 638, 646, 647, 648, 649, 650, 654, 655, 657, 659, 660, 661, 662, 664, + 667, 668, 19, 28, 33, 41, 43, 44, 51, 61, 68, 69, 73, 74, 75, 105, 107, + 117, 121, 125, 137, 141, 142, 143, 171, 188, 189, 191, 361, 475, 497, + 504, 507, 521, 565, 576, 595, 649, 650, 369, 408, 442, 465, 480, 485, + 493, 498, 503, 506, 511, 519, 530, 550, 572, 573, 580, 603, 607, 623, + 625, 626, 631, 634, 637, 639, 640, 645, 647, 648, 655, 657, 658, 661, + 662, 664, 667, 668, 88, 307, 308, 378, 413, 449, 477, 499, 505, 513, + 541, 553, 565, 568, 570, 603, 604, 608, 620, 634, 638, 646, 647, 650, + 652, 654, 655, 657, 659, 660, 661, 662, 664, 667, 668, 385, 428, 435, + 448, 479, 489, 495, 499, 500, 505, 529, 552, 553, 568, 570, 603, 604, + 606, 608, 610, 613, 616, 619, 625, 626, 634, 637, 638, 646, 647, 648, + 652, 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, 138, 156, 158, + 287, 319, 341, 473, 501, 511, 565, 570, 580, 607, 616, 625, 638, 641, + 649, 650, 654, 657, 660, 662, 664, 667, 316, 318, 455, 485, 486, 502, + 508, 519, 567, 578, 579, 596, 612, 622, 623, 629, 635, 636, 638, 639, + 640, 641, 642, 643, 644, 649, 652, 654, 655, 657, 658, 660, 663, 664, + 666, 667, 668, 86, 187, 236, 341, 394, 408, 458, 465, 503, 506, 519, + 521, 530, 573, 574, 603, 616, 625, 631, 634, 640, 641, 643, 644, 645, + 646, 647, 649, 650, 655, 657, 659, 661, 662, 664, 667, 21, 28, 33, 46, + 80, 124, 137, 143, 161, 223, 224, 241, 273, 274, 306, 308, 335, 361, + 389, 414, 415, 438, 475, 488, 497, 504, 507, 521, 565, 595, 650, 652, + 87, 306, 388, 492, 500, 505, 548, 552, 553, 565, 570, 603, 604, 606, + 608, 620, 626, 630, 632, 634, 638, 641, 645, 646, 647, 648, 650, 652, + 653, 655, 657, 659, 660, 661, 662, 664, 667, 154, 187, 222, 234, 235, + 236, 330, 408, 442, 465, 475, 503, 506, 511, 521, 574, 603, 616, 630, + 631, 632, 640, 644, 645, 646, 649, 650, 651, 652, 654, 655, 657, 658, + 659, 660, 661, 662, 664, 667, 13, 20, 24, 46, 48, 58, 81, 92, 108, 119, + 122, 124, 125, 126, 141, 143, 159, 160, 215, 225, 241, 320, 321, 350, + 361, 389, 400, 414, 415, 438, 462, 470, 475, 488, 497, 504, 507, 521, + 565, 595, 650, 654, 444, 502, 508, 516, 520, 567, 579, 585, 588, 589, + 596, 612, 622, 628, 629, 631, 635, 636, 637, 638, 639, 640, 641, 642, + 643, 644, 645, 649, 652, 654, 655, 658, 660, 663, 664, 666, 667, 509, + 517, 518, 524, 526, 527, 532, 533, 534, 535, 536, 537, 538, 539, 540, + 541, 542, 544, 546, 547, 549, 554, 555, 557, 558, 559, 561, 562, 575, + 599, 616, 632, 657, 659, 664, 667, 270, 454, 491, 494, 502, 508, 510, + 516, 519, 528, 567, 572, 573, 578, 579, 596, 612, 622, 623, 629, 635, + 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 648, 649, 652, 657, + 658, 659, 660, 662, 663, 664, 666, 667, 668, 36, 110, 287, 330, 341, + 482, 503, 511, 580, 605, 607, 616, 632, 638, 641, 643, 644, 645, 649, + 653, 657, 660, 662, 664, 667, 375, 396, 420, 454, 502, 508, 512, 519, + 528, 556, 567, 569, 573, 574, 577, 578, 580, 596, 600, 612, 618, 622, + 629, 635, 636, 637, 638, 640, 641, 642, 643, 644, 648, 652, 654, 655, + 657, 658, 659, 660, 664, 666, 667, 435, 463, 495, 496, 499, 505, 512, + 513, 529, 550, 553, 569, 570, 600, 606, 608, 609, 610, 613, 616, 619, + 625, 626, 630, 632, 637, 638, 640, 648, 653, 654, 655, 657, 659, 660, + 661, 662, 664, 666, 667, 486, 514, 517, 518, 524, 526, 527, 532, 533, + 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, 549, 554, 555, + 557, 558, 559, 561, 562, 575, 578, 599, 640, 645, 649, 657, 658, 664, + 667, 260, 491, 494, 508, 510, 515, 516, 519, 520, 522, 530, 543, 573, + 574, 578, 585, 588, 589, 605, 611, 612, 614, 618, 623, 631, 632, 633, + 635, 636, 637, 640, 641, 642, 645, 652, 654, 655, 658, 659, 660, 661, + 662, 664, 666, 667, 668, 454, 502, 508, 516, 519, 528, 567, 579, 596, + 612, 618, 622, 623, 628, 629, 631, 635, 636, 638, 639, 640, 641, 642, + 643, 644, 645, 649, 652, 654, 655, 658, 659, 660, 663, 664, 666, 667, + 509, 514, 517, 525, 531, 546, 563, 566, 584, 586, 587, 604, 605, 607, + 608, 611, 612, 614, 617, 618, 620, 621, 624, 627, 629, 630, 632, 634, + 646, 647, 653, 655, 657, 659, 661, 662, 509, 514, 518, 525, 526, 531, + 563, 566, 584, 586, 587, 604, 605, 607, 608, 611, 612, 614, 617, 618, + 620, 621, 624, 627, 630, 632, 634, 646, 647, 653, 654, 655, 657, 659, + 660, 661, 662, 668, 116, 166, 503, 519, 549, 567, 579, 596, 622, 625, + 628, 629, 631, 635, 636, 637, 638, 639, 640, 641, 643, 644, 645, 648, + 649, 652, 654, 655, 656, 658, 659, 660, 662, 663, 664, 666, 667, 668, + 108, 225, 262, 406, 415, 416, 461, 470, 484, 493, 507, 508, 520, 524, + 545, 552, 572, 574, 578, 601, 607, 612, 618, 630, 631, 632, 636, 638, + 641, 642, 643, 644, 645, 647, 654, 655, 657, 658, 659, 660, 661, 662, + 663, 664, 667, 668, 8, 9, 10, 11, 12, 37, 69, 91, 92, 138, 140, 160, + 171, 187, 188, 189, 214, 222, 258, 259, 275, 276, 291, 292, 319, 320, + 349, 350, 379, 388, 400, 415, 462, 470, 475, 497, 504, 507, 521, 565, + 576, 595, 650, 651, 219, 382, 398, 491, 494, 502, 508, 510, 512, 516, + 519, 522, 528, 530, 567, 573, 574, 580, 596, 605, 612, 618, 622, 623, + 629, 631, 635, 636, 638, 639, 640, 641, 642, 643, 645, 649, 652, 654, + 655, 658, 659, 661, 662, 664, 666, 667, 131, 168, 169, 172, 178, 179, + 204, 231, 237, 246, 288, 314, 325, 362, 372, 375, 383, 391, 392, 436, + 437, 468, 472, 484, 523, 570, 620, 629, 631, 633, 640, 645, 646, 647, + 652, 653, 654, 655, 657, 658, 659, 660, 661, 662, 664, 667, 509, 514, + 524, 525, 531, 563, 566, 584, 586, 587, 604, 605, 607, 608, 611, 612, + 614, 617, 618, 620, 621, 624, 627, 629, 630, 632, 634, 642, 646, 647, + 652, 653, 654, 655, 657, 659, 660, 661, 662, 663, 667, 668, 464, 517, + 518, 520, 524, 525, 526, 527, 532, 533, 534, 536, 537, 538, 539, 540, + 541, 542, 544, 546, 547, 549, 551, 554, 555, 557, 558, 559, 561, 562, + 575, 599, 629, 630, 632, 657, 659, 664, 667, 668, 509, 514, 525, 526, + 531, 534, 549, 563, 566, 584, 586, 587, 604, 605, 607, 608, 611, 612, + 614, 617, 618, 620, 621, 624, 627, 630, 632, 634, 638, 646, 647, 648, + 652, 653, 654, 655, 657, 659, 660, 661, 662, 667, 668, 509, 514, 525, + 527, 531, 541, 563, 566, 584, 586, 587, 604, 605, 607, 608, 611, 612, + 614, 616, 617, 618, 620, 621, 624, 627, 630, 632, 634, 646, 647, 652, + 653, 654, 655, 657, 659, 660, 661, 662, 667, 668, 239, 303, 318, 357, + 360, 440, 453, 455, 481, 502, 508, 512, 519, 520, 528, 567, 578, 579, + 580, 596, 601, 612, 618, 622, 629, 631, 635, 636, 637, 638, 639, 640, + 641, 642, 643, 644, 645, 654, 655, 657, 658, 659, 660, 661, 663, 664, + 666, 667, 668, 140, 156, 158, 254, 287, 319, 330, 341, 429, 473, 482, + 492, 500, 506, 511, 513, 529, 550, 565, 570, 603, 604, 616, 620, 625, + 630, 634, 638, 641, 646, 649, 650, 653, 655, 657, 659, 660, 661, 662, + 664, 667, 381, 429, 444, 458, 465, 476, 480, 493, 494, 503, 519, 530, + 550, 567, 573, 579, 588, 596, 605, 622, 623, 625, 631, 633, 636, 637, + 638, 639, 640, 641, 642, 643, 644, 645, 647, 648, 654, 658, 660, 662, + 663, 664, 666, 667, 668, 205, 517, 518, 524, 526, 527, 531, 532, 533, + 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, 549, 554, 555, + 556, 557, 558, 559, 561, 562, 575, 599, 603, 626, 632, 634, 642, 646, + 648, 653, 660, 661, 662, 664, 666, 667, 509, 514, 525, 531, 532, 546, + 549, 563, 566, 584, 586, 587, 604, 605, 607, 608, 611, 612, 614, 617, + 618, 620, 621, 624, 627, 630, 632, 634, 637, 640, 641, 646, 647, 649, + 651, 653, 655, 657, 658, 659, 660, 661, 662, 666, 668, 509, 514, 525, + 531, 533, 563, 566, 581, 584, 586, 587, 604, 605, 607, 608, 611, 612, + 614, 617, 618, 620, 621, 624, 627, 630, 632, 634, 646, 647, 652, 653, + 654, 655, 657, 659, 660, 661, 662, 667, 668, 509, 514, 525, 527, 531, + 534, 563, 566, 584, 586, 587, 604, 605, 607, 608, 611, 612, 613, 614, + 617, 618, 620, 621, 624, 627, 630, 632, 634, 646, 647, 652, 653, 654, + 655, 657, 659, 660, 661, 662, 667, 668, 6, 277, 509, 517, 518, 524, 526, + 527, 532, 533, 534, 535, 536, 537, 538, 539, 540, 541, 542, 544, 546, + 547, 549, 554, 555, 557, 558, 559, 561, 562, 575, 599, 653, 655, 657, + 659, 661, 662, 664, 667, 509, 514, 525, 531, 536, 538, 563, 566, 584, + 586, 587, 604, 605, 607, 608, 609, 611, 612, 614, 617, 618, 620, 621, + 624, 627, 630, 632, 634, 646, 647, 652, 653, 654, 655, 657, 659, 660, + 661, 662, 667, 668, 509, 514, 525, 531, 537, 539, 563, 566, 584, 586, + 587, 591, 604, 605, 607, 608, 611, 612, 614, 617, 618, 620, 621, 624, + 627, 630, 632, 634, 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, + 662, 667, 668, 509, 514, 525, 531, 537, 538, 563, 566, 584, 586, 587, + 602, 604, 605, 607, 608, 611, 612, 614, 617, 618, 620, 621, 624, 627, + 630, 632, 634, 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, + 667, 668, 509, 514, 525, 531, 533, 539, 563, 566, 582, 584, 586, 587, + 604, 605, 607, 608, 611, 612, 614, 617, 618, 620, 621, 624, 627, 630, + 632, 634, 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, 667, + 668, 509, 514, 525, 531, 540, 563, 566, 584, 586, 587, 590, 604, 605, + 607, 608, 611, 612, 614, 617, 618, 620, 621, 624, 627, 630, 632, 634, + 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, 667, 668, 509, + 514, 525, 531, 533, 536, 541, 563, 566, 584, 586, 587, 604, 605, 607, + 608, 610, 611, 612, 614, 617, 618, 620, 621, 624, 627, 630, 632, 634, + 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, 667, 668, 509, + 514, 525, 531, 540, 542, 547, 554, 562, 563, 566, 571, 584, 586, 587, + 604, 605, 607, 608, 611, 612, 614, 617, 618, 620, 621, 624, 627, 630, + 632, 634, 646, 647, 652, 653, 654, 655, 657, 659, 661, 662, 667, 668, + 241, 245, 260, 293, 298, 326, 353, 393, 415, 416, 417, 490, 511, 515, + 520, 522, 524, 525, 528, 543, 545, 574, 585, 588, 589, 596, 601, 607, + 611, 612, 619, 624, 625, 631, 632, 633, 635, 636, 637, 639, 641, 642, + 644, 645, 646, 647, 650, 651, 652, 654, 655, 657, 658, 659, 660, 661, + 662, 664, 666, 667, 668, 509, 514, 525, 531, 544, 555, 563, 566, 579, + 584, 586, 587, 596, 604, 605, 607, 608, 611, 612, 614, 617, 618, 620, + 621, 622, 624, 627, 629, 630, 632, 634, 635, 641, 644, 646, 647, 652, + 653, 654, 655, 657, 658, 659, 660, 661, 662, 666, 667, 668, 170, 205, + 206, 225, 262, 312, 366, 390, 393, 396, 406, 409, 415, 416, 417, 442, + 458, 471, 481, 484, 509, 520, 524, 531, 535, 543, 545, 552, 556, 585, + 588, 589, 595, 601, 619, 622, 631, 632, 633, 638, 641, 642, 643, 644, + 645, 652, 653, 654, 655, 657, 659, 660, 661, 662, 664, 667, 668, 509, + 514, 525, 531, 544, 546, 563, 566, 584, 586, 587, 604, 605, 607, 608, + 611, 612, 614, 617, 618, 620, 621, 622, 624, 627, 629, 630, 632, 634, + 635, 637, 640, 641, 646, 647, 649, 652, 653, 654, 655, 657, 659, 660, + 661, 662, 663, 666, 667, 668, 509, 514, 525, 531, 540, 547, 563, 566, + 584, 586, 587, 593, 604, 605, 607, 608, 611, 612, 614, 617, 618, 620, + 621, 624, 627, 630, 632, 634, 646, 647, 652, 653, 654, 655, 657, 659, + 660, 661, 662, 667, 668, 202, 209, 221, 243, 266, 291, 292, 320, 323, + 369, 391, 394, 424, 431, 446, 462, 472, 478, 480, 484, 493, 521, 532, + 548, 552, 560, 578, 580, 604, 612, 614, 618, 630, 641, 645, 647, 650, + 651, 653, 655, 657, 659, 661, 662, 664, 667, 509, 514, 519, 525, 531, + 549, 563, 566, 567, 584, 586, 587, 596, 604, 605, 607, 608, 611, 612, + 614, 617, 618, 620, 621, 622, 624, 627, 630, 632, 634, 636, 638, 640, + 641, 643, 644, 646, 647, 648, 649, 651, 652, 653, 654, 655, 657, 658, + 659, 660, 661, 662, 663, 666, 667, 668, 102, 107, 114, 145, 188, 220, + 278, 306, 342, 347, 377, 454, 459, 478, 482, 485, 486, 489, 498, 504, + 505, 530, 534, 548, 550, 569, 575, 603, 605, 606, 619, 620, 621, 623, + 625, 634, 637, 638, 640, 645, 646, 647, 648, 649, 650, 652, 653, 655, + 657, 658, 659, 660, 661, 662, 664, 667, 668, 25, 298, 517, 518, 524, + 525, 526, 527, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, + 546, 547, 549, 551, 554, 555, 557, 558, 559, 561, 562, 575, 599, 631, + 632, 640, 645, 655, 657, 659, 661, 662, 664, 667, 342, 447, 454, 459, + 489, 495, 499, 505, 512, 520, 529, 548, 550, 552, 569, 570, 579, 606, + 610, 613, 615, 619, 620, 622, 625, 629, 631, 633, 634, 635, 637, 640, + 641, 643, 645, 646, 647, 648, 652, 653, 655, 657, 658, 659, 660, 661, + 662, 664, 666, 667, 668, 423, 429, 454, 473, 495, 496, 498, 499, 501, + 503, 505, 511, 550, 552, 553, 568, 570, 580, 603, 606, 608, 609, 610, + 613, 616, 619, 625, 626, 633, 634, 637, 638, 642, 645, 646, 647, 648, + 653, 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, 668, 509, 514, + 525, 531, 547, 554, 563, 566, 584, 586, 587, 594, 604, 605, 607, 608, + 611, 612, 614, 617, 618, 620, 621, 624, 627, 630, 632, 634, 643, 646, + 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, 667, 668, 509, 514, + 525, 531, 555, 557, 563, 566, 584, 586, 587, 592, 594, 597, 598, 600, + 604, 605, 607, 608, 611, 612, 614, 615, 617, 618, 620, 621, 624, 627, + 630, 632, 634, 643, 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, + 662, 667, 668, 62, 206, 277, 322, 509, 517, 518, 520, 524, 526, 527, + 531, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, + 549, 554, 555, 556, 557, 558, 559, 561, 562, 575, 599, 638, 642, 643, + 653, 654, 655, 657, 659, 661, 662, 664, 667, 509, 514, 525, 531, 557, + 558, 563, 566, 584, 586, 587, 592, 597, 598, 600, 604, 605, 607, 608, + 611, 612, 614, 615, 617, 618, 620, 621, 624, 627, 630, 632, 634, 646, + 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, 667, 668, 509, 514, + 525, 531, 558, 561, 563, 566, 584, 586, 587, 597, 598, 600, 604, 605, + 607, 608, 611, 612, 614, 615, 617, 618, 620, 621, 624, 627, 630, 632, + 634, 643, 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, 667, + 668, 509, 514, 525, 531, 559, 562, 563, 566, 584, 586, 587, 598, 600, + 604, 605, 607, 608, 611, 612, 614, 615, 617, 618, 620, 621, 624, 627, + 630, 632, 634, 643, 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, + 662, 667, 668, 239, 303, 333, 399, 431, 442, 458, 480, 490, 491, 493, + 494, 498, 510, 511, 516, 522, 530, 548, 552, 560, 567, 569, 572, 573, + 574, 578, 580, 589, 596, 605, 607, 612, 614, 618, 619, 621, 623, 625, + 629, 631, 636, 637, 639, 640, 641, 645, 647, 653, 654, 655, 657, 658, + 659, 661, 662, 664, 667, 509, 514, 525, 531, 559, 561, 563, 566, 584, + 586, 587, 597, 600, 604, 605, 607, 608, 611, 612, 614, 615, 617, 618, + 620, 621, 624, 627, 630, 632, 634, 643, 646, 647, 652, 653, 654, 655, + 657, 659, 660, 661, 662, 667, 668, 509, 514, 525, 531, 554, 562, 563, + 566, 584, 586, 587, 592, 604, 605, 607, 608, 611, 612, 614, 615, 617, + 618, 620, 621, 624, 627, 630, 632, 634, 643, 646, 647, 652, 653, 654, + 655, 657, 659, 660, 661, 662, 667, 668, 301, 395, 457, 517, 518, 524, + 525, 526, 527, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, + 546, 547, 549, 554, 555, 557, 558, 559, 561, 562, 563, 575, 583, 585, + 588, 599, 622, 629, 630, 635, 636, 641, 642, 643, 644, 652, 654, 659, + 660, 663, 664, 666, 667, 82, 137, 192, 270, 297, 329, 342, 384, 430, + 486, 488, 497, 504, 514, 517, 518, 524, 526, 527, 532, 533, 534, 536, + 537, 538, 539, 540, 541, 542, 544, 546, 547, 549, 554, 555, 557, 558, + 559, 561, 562, 564, 575, 577, 595, 599, 638, 652, 654, 655, 659, 660, + 662, 664, 667, 39, 56, 72, 77, 138, 140, 160, 212, 215, 222, 224, 272, + 273, 274, 289, 290, 292, 306, 307, 308, 309, 319, 335, 348, 361, 379, + 388, 389, 414, 415, 438, 475, 488, 497, 504, 507, 521, 565, 595, 641, + 650, 298, 311, 432, 433, 442, 517, 518, 524, 526, 527, 532, 533, 534, + 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, 548, 549, 554, 555, + 557, 558, 559, 561, 562, 563, 566, 573, 575, 583, 599, 629, 630, 645, + 653, 654, 655, 658, 659, 661, 662, 664, 666, 667, 129, 153, 169, 179, + 183, 219, 389, 398, 414, 443, 491, 494, 502, 508, 510, 512, 516, 519, + 522, 528, 530, 549, 560, 567, 569, 573, 574, 578, 580, 596, 605, 612, + 614, 618, 621, 622, 624, 627, 631, 635, 636, 637, 639, 640, 641, 642, + 644, 645, 646, 647, 649, 650, 651, 653, 654, 655, 657, 658, 659, 660, + 661, 662, 664, 666, 667, 668, 64, 104, 285, 429, 501, 511, 517, 518, + 524, 526, 527, 529, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, + 544, 546, 547, 549, 554, 555, 557, 558, 559, 561, 562, 568, 575, 599, + 604, 625, 643, 650, 653, 655, 657, 659, 660, 661, 662, 664, 667, 454, + 463, 491, 494, 502, 508, 510, 512, 516, 519, 522, 528, 530, 550, 567, + 569, 572, 573, 574, 578, 579, 596, 605, 612, 614, 616, 618, 619, 622, + 623, 625, 626, 635, 636, 637, 638, 639, 640, 641, 642, 643, 645, 647, + 648, 649, 651, 652, 653, 654, 655, 657, 658, 659, 660, 661, 662, 664, + 666, 667, 423, 435, 489, 495, 496, 499, 501, 503, 505, 512, 523, 529, + 552, 568, 569, 570, 572, 578, 603, 606, 609, 610, 613, 616, 619, 620, + 622, 625, 626, 632, 633, 634, 637, 638, 641, 642, 646, 647, 648, 652, + 653, 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, 668, 132, 171, + 194, 273, 278, 295, 304, 430, 463, 504, 509, 514, 525, 531, 542, 561, + 563, 566, 571, 584, 586, 587, 604, 605, 607, 608, 610, 611, 612, 614, + 617, 618, 620, 621, 624, 627, 630, 632, 634, 646, 647, 652, 653, 654, + 655, 657, 659, 660, 661, 662, 664, 667, 338, 346, 377, 390, 398, 411, + 453, 457, 491, 493, 494, 502, 508, 510, 512, 515, 516, 519, 520, 522, + 528, 530, 560, 569, 572, 573, 574, 578, 579, 580, 605, 612, 614, 618, + 621, 622, 625, 629, 631, 635, 636, 637, 638, 639, 640, 641, 642, 645, + 647, 652, 653, 654, 655, 657, 658, 659, 660, 661, 662, 664, 666, 667, + 668, 360, 386, 411, 441, 464, 491, 502, 503, 508, 512, 516, 519, 528, + 548, 567, 573, 574, 579, 583, 596, 605, 612, 618, 622, 623, 628, 629, + 631, 633, 635, 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 649, + 652, 654, 655, 658, 659, 660, 662, 663, 664, 666, 667, 245, 297, 351, + 440, 461, 491, 494, 503, 508, 510, 516, 519, 520, 528, 530, 567, 573, + 574, 585, 588, 589, 596, 605, 612, 618, 622, 623, 625, 629, 631, 633, + 635, 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 648, 652, 654, + 655, 658, 659, 660, 661, 662, 663, 664, 666, 667, 454, 509, 514, 525, + 531, 533, 536, 537, 538, 539, 540, 547, 554, 559, 561, 562, 563, 566, + 575, 577, 584, 586, 587, 604, 605, 607, 608, 611, 612, 614, 617, 618, + 620, 621, 624, 627, 630, 632, 634, 646, 647, 652, 653, 654, 655, 657, + 659, 660, 661, 662, 667, 668, 27, 35, 38, 47, 49, 54, 55, 59, 64, 65, + 66, 67, 71, 79, 86, 94, 96, 105, 106, 120, 138, 139, 140, 158, 160, 187, + 199, 210, 211, 212, 222, 223, 224, 258, 259, 273, 274, 276, 289, 290, + 306, 307, 308, 309, 319, 321, 335, 348, 349, 350, 379, 388, 389, 414, + 438, 462, 475, 488, 497, 521, 576, 595, 650, 666, 112, 137, 162, 188, + 207, 295, 342, 347, 438, 454, 459, 463, 478, 504, 509, 514, 525, 531, + 557, 563, 566, 575, 577, 584, 586, 587, 595, 604, 605, 607, 608, 611, + 612, 613, 614, 617, 618, 620, 621, 624, 627, 630, 632, 634, 640, 643, + 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, 664, 667, 401, + 476, 491, 494, 502, 508, 510, 512, 516, 519, 520, 522, 528, 530, 548, + 567, 569, 572, 573, 574, 578, 579, 580, 585, 588, 589, 596, 605, 612, + 614, 618, 622, 623, 629, 631, 633, 635, 636, 637, 638, 639, 640, 641, + 642, 643, 644, 645, 646, 647, 648, 649, 651, 652, 654, 655, 657, 658, + 659, 660, 661, 662, 664, 666, 667, 668, 122, 197, 203, 243, 300, 368, + 370, 439, 440, 443, 444, 455, 461, 470, 476, 484, 485, 491, 493, 494, + 502, 507, 508, 510, 516, 519, 520, 528, 530, 544, 546, 552, 563, 569, + 572, 573, 578, 579, 605, 607, 612, 618, 622, 625, 629, 631, 633, 635, + 636, 637, 641, 644, 645, 648, 652, 654, 655, 657, 658, 659, 660, 662, + 663, 664, 667, 668, 198, 300, 370, 387, 431, 461, 493, 501, 502, 508, + 510, 511, 516, 519, 528, 548, 567, 573, 574, 579, 580, 585, 588, 589, + 596, 612, 618, 622, 625, 629, 631, 633, 635, 636, 637, 639, 641, 642, + 643, 644, 645, 648, 652, 654, 655, 659, 660, 664, 667, 210, 211, 224, + 269, 422, 434, 509, 514, 525, 531, 533, 539, 540, 563, 566, 581, 584, + 586, 587, 595, 604, 605, 607, 608, 611, 612, 614, 617, 618, 620, 621, + 624, 627, 630, 632, 634, 646, 647, 650, 653, 654, 655, 657, 659, 660, + 661, 662, 664, 667, 668, 101, 212, 223, 224, 269, 290, 344, 422, 452, + 460, 467, 509, 514, 525, 531, 533, 537, 539, 547, 563, 565, 566, 581, + 582, 584, 586, 587, 595, 604, 605, 607, 608, 611, 612, 614, 617, 618, + 620, 621, 624, 627, 630, 632, 634, 646, 647, 650, 652, 653, 654, 655, + 657, 659, 660, 661, 662, 664, 667, 668, 81, 152, 193, 217, 233, 311, + 402, 412, 419, 441, 464, 517, 518, 524, 525, 526, 527, 532, 533, 534, + 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, 549, 554, 555, 557, + 558, 559, 561, 562, 563, 566, 573, 575, 579, 583, 585, 588, 599, 629, + 633, 635, 636, 644, 645, 653, 654, 655, 657, 659, 661, 662, 663, 664, + 667, 481, 508, 515, 517, 518, 524, 526, 527, 532, 533, 534, 536, 537, + 538, 539, 540, 541, 542, 544, 546, 547, 549, 554, 555, 557, 558, 559, + 561, 562, 563, 574, 575, 578, 580, 584, 585, 589, 599, 607, 611, 612, + 614, 617, 618, 624, 630, 632, 646, 647, 657, 659, 661, 662, 664, 667, 0, + 481, 508, 515, 517, 518, 524, 526, 527, 532, 533, 534, 536, 537, 538, + 539, 540, 541, 542, 544, 546, 547, 549, 554, 555, 557, 558, 559, 561, + 562, 563, 574, 575, 578, 580, 584, 585, 589, 599, 607, 611, 612, 614, + 617, 618, 624, 630, 632, 646, 647, 657, 659, 661, 662, 664, 667, 481, + 508, 515, 517, 518, 524, 526, 527, 530, 532, 533, 534, 536, 537, 538, + 539, 540, 541, 542, 544, 546, 547, 549, 554, 555, 557, 558, 559, 561, + 562, 563, 574, 575, 578, 580, 586, 588, 589, 599, 607, 611, 612, 614, + 617, 624, 630, 632, 646, 647, 657, 659, 661, 662, 664, 667, 481, 508, + 515, 517, 518, 524, 526, 527, 532, 533, 534, 536, 537, 538, 539, 540, + 541, 542, 544, 546, 547, 549, 554, 555, 557, 558, 559, 560, 561, 562, + 574, 575, 578, 580, 584, 586, 587, 589, 599, 607, 611, 614, 617, 621, + 624, 630, 632, 646, 647, 653, 657, 661, 662, 664, 667, 2, 481, 508, 515, + 517, 518, 524, 526, 527, 530, 532, 533, 534, 536, 537, 538, 539, 540, + 541, 542, 544, 546, 547, 549, 554, 555, 557, 558, 559, 561, 562, 563, + 574, 575, 578, 580, 586, 588, 589, 599, 607, 611, 612, 614, 617, 624, + 630, 632, 646, 647, 657, 659, 661, 662, 664, 667, 3, 481, 508, 515, 517, + 518, 524, 526, 527, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, + 544, 546, 547, 549, 554, 555, 557, 558, 559, 560, 561, 562, 574, 575, + 578, 580, 584, 586, 587, 589, 599, 607, 611, 614, 617, 621, 624, 630, + 632, 646, 647, 653, 657, 661, 662, 664, 667, 210, 223, 252, 404, 434, + 509, 514, 525, 531, 540, 547, 554, 555, 557, 558, 559, 561, 562, 563, + 566, 581, 582, 584, 586, 587, 590, 592, 594, 595, 597, 598, 600, 604, + 605, 607, 608, 611, 612, 614, 615, 617, 618, 620, 621, 624, 627, 630, + 632, 634, 643, 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, + 664, 667, 100, 212, 227, 274, 290, 332, 335, 367, 450, 451, 460, 467, + 469, 474, 509, 514, 525, 531, 537, 538, 539, 554, 563, 565, 566, 582, + 584, 586, 587, 591, 595, 604, 605, 607, 608, 611, 612, 614, 617, 618, + 620, 621, 624, 627, 630, 632, 634, 646, 647, 650, 652, 653, 654, 655, + 657, 659, 660, 661, 662, 664, 667, 668, 252, 283, 289, 302, 335, 343, + 430, 466, 487, 509, 514, 525, 531, 540, 554, 555, 557, 558, 559, 561, + 562, 563, 566, 581, 584, 586, 587, 590, 592, 594, 595, 597, 600, 602, + 604, 605, 607, 608, 609, 611, 612, 614, 615, 617, 618, 620, 621, 624, + 627, 630, 632, 634, 643, 646, 647, 652, 653, 654, 655, 657, 659, 660, + 661, 662, 664, 667, 223, 252, 268, 283, 290, 384, 404, 451, 467, 509, + 514, 525, 531, 540, 547, 554, 555, 557, 558, 559, 561, 562, 563, 566, + 581, 582, 584, 586, 587, 590, 591, 592, 593, 595, 597, 598, 600, 604, + 605, 607, 608, 611, 612, 614, 615, 617, 618, 620, 621, 624, 627, 630, + 632, 634, 643, 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, + 664, 667, 252, 268, 283, 290, 302, 335, 384, 410, 451, 474, 509, 514, + 525, 531, 547, 554, 555, 557, 558, 559, 561, 562, 563, 566, 581, 584, + 586, 587, 590, 591, 593, 594, 595, 597, 598, 600, 602, 604, 605, 607, + 608, 611, 612, 614, 615, 617, 618, 620, 621, 624, 627, 630, 632, 634, + 643, 646, 647, 652, 653, 654, 655, 657, 659, 660, 661, 662, 664, 667, 5, + 7, 34, 51, 53, 62, 78, 89, 90, 108, 119, 123, 125, 126, 127, 136, 137, + 141, 143, 144, 210, 211, 212, 215, 222, 223, 224, 225, 241, 273, 274, + 289, 290, 306, 307, 308, 309, 319, 335, 348, 361, 388, 389, 414, 415, + 438, 462, 470, 475, 488, 497, 504, 507, 521, 565, 576, 595, 650, 660, + 164, 179, 192, 204, 228, 261, 370, 382, 398, 414, 417, 439, 443, 444, + 454, 455, 491, 494, 502, 504, 506, 508, 510, 512, 516, 519, 522, 528, + 530, 543, 544, 548, 549, 567, 573, 574, 578, 580, 596, 605, 612, 614, + 618, 622, 623, 624, 626, 628, 629, 630, 631, 632, 635, 636, 637, 638, + 639, 640, 641, 642, 643, 644, 645, 646, 647, 649, 650, 651, 652, 654, + 655, 657, 658, 659, 660, 661, 662, 663, 664, 666, 667, 668, 252, 273, + 283, 348, 376, 404, 428, 448, 479, 500, 509, 514, 525, 531, 540, 554, + 555, 557, 558, 559, 561, 563, 566, 571, 581, 584, 586, 587, 590, 592, + 595, 597, 598, 604, 605, 607, 608, 610, 611, 612, 614, 615, 616, 617, + 618, 620, 621, 624, 625, 627, 630, 632, 634, 646, 647, 652, 653, 654, + 655, 657, 659, 660, 661, 662, 664, 667, 252, 273, 283, 289, 343, 376, + 421, 430, 466, 492, 509, 514, 525, 531, 533, 540, 547, 555, 557, 558, + 559, 561, 562, 563, 566, 584, 586, 587, 590, 592, 595, 598, 600, 604, + 605, 607, 608, 609, 610, 611, 612, 614, 615, 617, 618, 620, 621, 624, + 627, 630, 632, 634, 643, 646, 647, 652, 653, 654, 655, 657, 659, 660, + 661, 662, 664, 667, 509, 514, 525, 527, 531, 532, 533, 534, 536, 537, + 538, 539, 540, 541, 544, 546, 547, 549, 554, 555, 557, 558, 559, 561, + 562, 563, 566, 584, 586, 587, 599, 604, 605, 607, 608, 611, 612, 614, + 617, 618, 620, 621, 624, 627, 630, 632, 634, 635, 640, 646, 647, 649, + 651, 652, 653, 655, 657, 659, 661, 662, 668, 207, 252, 283, 315, 348, + 376, 428, 438, 479, 509, 513, 514, 525, 531, 547, 555, 557, 558, 559, + 561, 562, 563, 566, 571, 584, 586, 587, 590, 595, 597, 598, 600, 604, + 605, 607, 608, 609, 611, 612, 613, 614, 615, 616, 617, 618, 620, 621, + 624, 627, 630, 632, 634, 643, 646, 647, 652, 653, 654, 655, 657, 659, + 660, 661, 662, 664, 667, 126, 151, 218, 300, 387, 393, 406, 415, 417, + 440, 458, 501, 507, 511, 517, 518, 520, 524, 525, 526, 527, 532, 533, + 534, 536, 537, 538, 539, 540, 541, 542, 543, 544, 545, 546, 547, 549, + 554, 555, 557, 558, 559, 561, 562, 563, 575, 585, 588, 589, 599, 601, + 607, 629, 635, 641, 642, 644, 645, 647, 652, 654, 655, 657, 659, 660, + 661, 662, 664, 667, 668, 274, 289, 309, 335, 363, 404, 410, 434, 469, + 474, 483, 487, 496, 509, 514, 525, 531, 533, 536, 537, 538, 562, 563, + 565, 566, 581, 584, 586, 587, 591, 595, 602, 603, 604, 605, 607, 608, + 611, 612, 614, 617, 618, 620, 621, 624, 627, 630, 632, 634, 646, 647, + 650, 652, 653, 654, 655, 657, 659, 660, 661, 662, 664, 667, 668, 270, + 408, 448, 459, 461, 465, 469, 482, 489, 493, 495, 496, 498, 499, 503, + 505, 506, 511, 519, 529, 550, 572, 573, 574, 578, 580, 602, 603, 606, + 609, 610, 613, 616, 618, 619, 625, 626, 631, 633, 637, 638, 642, 645, + 646, 648, 652, 653, 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, + 668, 342, 347, 473, 482, 489, 495, 499, 501, 505, 511, 513, 517, 518, + 524, 526, 527, 529, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, + 544, 546, 547, 548, 549, 552, 554, 555, 557, 558, 559, 560, 561, 562, + 568, 570, 575, 599, 603, 604, 606, 610, 613, 616, 619, 620, 625, 626, + 634, 637, 638, 642, 646, 647, 648, 653, 657, 659, 660, 661, 662, 664, + 667, 668, 429, 444, 454, 485, 486, 491, 494, 508, 511, 516, 517, 518, + 519, 522, 524, 526, 527, 532, 533, 534, 536, 537, 538, 539, 540, 541, + 542, 544, 546, 547, 549, 550, 554, 555, 557, 558, 559, 561, 562, 567, + 573, 575, 579, 596, 599, 605, 612, 622, 623, 628, 635, 636, 637, 638, + 639, 640, 641, 642, 643, 644, 645, 648, 652, 654, 658, 659, 660, 662, + 663, 664, 666, 667, 87, 106, 158, 319, 330, 473, 482, 492, 500, 501, + 513, 517, 518, 524, 526, 527, 529, 532, 533, 534, 536, 537, 538, 539, + 540, 541, 542, 544, 546, 547, 549, 553, 554, 555, 557, 558, 559, 561, + 562, 570, 575, 595, 599, 603, 604, 606, 608, 620, 622, 625, 630, 634, + 637, 643, 646, 647, 648, 650, 652, 653, 655, 657, 659, 660, 661, 662, + 664, 667, 300, 387, 440, 458, 501, 511, 515, 517, 518, 520, 524, 525, + 526, 527, 528, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, + 546, 547, 549, 554, 555, 557, 558, 559, 561, 562, 573, 575, 580, 585, + 588, 589, 599, 601, 607, 611, 618, 625, 629, 631, 632, 642, 644, 645, + 648, 652, 654, 655, 657, 659, 663, 664, 667, 668, 423, 493, 495, 496, + 499, 505, 506, 512, 517, 518, 524, 526, 527, 529, 532, 533, 534, 536, + 537, 538, 539, 540, 541, 542, 544, 546, 547, 549, 552, 554, 555, 557, + 558, 559, 561, 562, 569, 575, 599, 603, 606, 608, 609, 610, 613, 616, + 619, 622, 625, 626, 633, 634, 637, 638, 642, 646, 647, 648, 652, 653, + 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, 226, 273, 289, 308, + 309, 356, 365, 397, 427, 434, 449, 466, 487, 492, 496, 499, 509, 514, + 525, 531, 536, 538, 539, 541, 553, 559, 563, 565, 566, 570, 584, 586, + 587, 595, 602, 603, 604, 605, 607, 608, 609, 611, 612, 614, 617, 618, + 619, 620, 621, 624, 627, 630, 632, 634, 643, 646, 647, 650, 652, 653, + 654, 655, 657, 659, 660, 661, 662, 664, 667, 668, 273, 307, 308, 348, + 378, 404, 421, 434, 477, 492, 499, 500, 509, 513, 514, 525, 527, 531, + 536, 537, 541, 553, 561, 563, 565, 566, 570, 581, 584, 586, 587, 595, + 603, 604, 605, 607, 608, 609, 610, 611, 612, 614, 617, 618, 619, 620, + 621, 624, 627, 630, 632, 634, 646, 647, 650, 652, 653, 654, 655, 657, + 659, 660, 661, 662, 664, 667, 668, 245, 406, 408, 461, 484, 490, 493, + 508, 515, 517, 518, 519, 522, 524, 526, 527, 528, 532, 533, 534, 536, + 537, 538, 539, 540, 541, 542, 543, 544, 546, 547, 549, 554, 555, 557, + 558, 559, 561, 562, 573, 574, 575, 580, 585, 588, 589, 599, 603, 611, + 612, 618, 631, 632, 633, 635, 636, 639, 642, 645, 646, 652, 654, 655, + 657, 658, 659, 660, 661, 662, 664, 666, 667, 668, 417, 444, 486, 508, + 517, 518, 520, 524, 526, 527, 532, 533, 534, 536, 537, 538, 539, 540, + 541, 542, 544, 546, 547, 548, 549, 554, 555, 557, 558, 559, 561, 562, + 567, 575, 579, 585, 588, 596, 599, 612, 622, 628, 629, 631, 635, 636, + 637, 638, 639, 640, 641, 643, 644, 645, 649, 652, 655, 658, 663, 664, + 666, 667, 265, 280, 306, 339, 388, 434, 438, 488, 492, 495, 499, 500, + 505, 509, 513, 514, 525, 526, 527, 531, 534, 536, 552, 553, 557, 563, + 565, 566, 570, 584, 586, 587, 595, 603, 604, 605, 606, 607, 608, 609, + 610, 611, 612, 613, 614, 616, 617, 618, 620, 621, 624, 627, 630, 632, + 634, 635, 645, 646, 647, 648, 650, 652, 653, 654, 655, 657, 659, 660, + 661, 662, 664, 667, 668, 399, 491, 493, 494, 502, 508, 510, 516, 517, + 518, 519, 522, 524, 526, 527, 528, 530, 532, 533, 534, 536, 537, 538, + 539, 540, 541, 542, 544, 546, 547, 548, 549, 554, 555, 557, 558, 559, + 561, 562, 567, 572, 573, 574, 575, 578, 579, 580, 585, 588, 589, 596, + 599, 605, 612, 614, 618, 622, 623, 629, 633, 635, 636, 637, 638, 639, + 640, 641, 642, 643, 644, 645, 646, 647, 654, 655, 657, 658, 659, 661, + 662, 664, 667, 206, 207, 252, 283, 375, 376, 383, 404, 420, 428, 434, + 435, 438, 448, 454, 488, 489, 495, 509, 513, 514, 525, 531, 535, 552, + 554, 555, 557, 558, 559, 561, 562, 563, 566, 570, 577, 581, 584, 586, + 587, 590, 592, 595, 597, 598, 600, 604, 605, 607, 608, 609, 610, 611, + 612, 613, 614, 615, 617, 618, 620, 621, 624, 625, 627, 630, 632, 634, + 638, 643, 645, 646, 647, 648, 652, 653, 654, 655, 657, 659, 660, 661, + 662, 664, 667, 254, 278, 306, 307, 348, 385, 438, 463, 479, 486, 495, + 496, 500, 501, 503, 505, 509, 511, 513, 514, 525, 527, 529, 531, 534, + 538, 541, 553, 558, 563, 565, 566, 568, 570, 584, 586, 587, 595, 603, + 604, 605, 607, 608, 610, 611, 612, 614, 616, 617, 618, 619, 620, 621, + 623, 624, 625, 627, 630, 632, 634, 637, 643, 646, 647, 648, 650, 652, + 653, 654, 655, 657, 659, 660, 661, 662, 664, 667, 668, 229, 263, 370, + 394, 443, 444, 461, 494, 502, 508, 510, 512, 515, 516, 517, 518, 519, + 522, 524, 526, 527, 528, 532, 533, 534, 536, 537, 538, 539, 540, 541, + 542, 544, 546, 547, 548, 549, 552, 554, 555, 557, 558, 559, 561, 562, + 563, 569, 572, 573, 574, 575, 578, 579, 580, 585, 588, 589, 596, 599, + 611, 612, 614, 617, 618, 620, 624, 628, 629, 632, 633, 635, 639, 640, + 646, 647, 649, 652, 654, 655, 657, 659, 662, 663, 664, 666, 667, 668, + 318, 370, 440, 444, 455, 461, 485, 502, 508, 517, 518, 520, 524, 526, + 527, 528, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, + 547, 548, 549, 554, 555, 557, 558, 559, 561, 562, 567, 573, 575, 578, + 579, 580, 583, 585, 596, 599, 601, 612, 618, 622, 625, 628, 629, 631, + 635, 636, 637, 638, 639, 640, 641, 643, 644, 645, 648, 649, 654, 655, + 657, 658, 659, 660, 663, 664, 666, 667, 668, 104, 254, 255, 285, 306, + 307, 459, 477, 479, 500, 503, 513, 517, 518, 524, 526, 527, 529, 532, + 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, 548, 549, + 552, 553, 554, 555, 557, 558, 559, 560, 561, 562, 565, 568, 570, 575, + 599, 603, 604, 606, 608, 616, 619, 620, 630, 632, 634, 635, 637, 638, + 643, 646, 647, 648, 649, 650, 653, 654, 655, 657, 659, 660, 661, 662, + 664, 667, 668, 448, 459, 463, 473, 489, 495, 499, 501, 505, 513, 517, + 518, 523, 524, 526, 527, 529, 532, 533, 534, 536, 537, 538, 539, 540, + 541, 542, 544, 546, 547, 549, 550, 553, 554, 555, 557, 558, 559, 561, + 562, 568, 569, 570, 575, 599, 603, 606, 608, 610, 613, 616, 619, 620, + 625, 626, 632, 633, 634, 635, 637, 638, 640, 642, 646, 647, 648, 652, + 653, 654, 655, 657, 659, 660, 661, 662, 664, 666, 667, 668, 182, 236, + 298, 369, 408, 423, 447, 472, 485, 490, 491, 494, 498, 510, 514, 515, + 516, 517, 518, 522, 524, 526, 527, 530, 532, 533, 534, 536, 537, 538, + 539, 540, 541, 542, 544, 546, 547, 549, 550, 553, 554, 555, 557, 558, + 559, 560, 561, 562, 567, 569, 570, 573, 574, 575, 578, 589, 596, 599, + 605, 612, 614, 620, 621, 622, 623, 631, 633, 634, 636, 637, 639, 640, + 641, 645, 646, 647, 652, 653, 661, 662, 664, 666, 667, 102, 128, 157, + 183, 197, 209, 256, 271, 286, 287, 340, 341, 345, 346, 370, 377, 390, + 398, 411, 424, 439, 443, 446, 453, 456, 458, 475, 491, 493, 494, 498, + 501, 502, 503, 508, 510, 511, 512, 516, 518, 519, 522, 528, 530, 544, + 546, 548, 549, 560, 563, 565, 569, 570, 572, 573, 574, 576, 578, 580, + 595, 603, 605, 612, 614, 618, 621, 622, 624, 625, 626, 628, 629, 630, + 632, 633, 634, 635, 636, 637, 638, 639, 641, 642, 644, 645, 646, 647, + 648, 649, 650, 651, 652, 653, 654, 655, 657, 659, 660, 661, 662, 664, + 666, 667, 668, 142, 181, 238, 278, 310, 369, 382, 398, 414, 423, 425, + 454, 485, 490, 491, 494, 498, 510, 515, 516, 517, 518, 522, 524, 526, + 527, 530, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, + 547, 549, 550, 554, 555, 557, 558, 559, 560, 561, 562, 567, 569, 573, + 574, 575, 578, 589, 595, 599, 605, 614, 616, 621, 622, 623, 630, 631, + 634, 638, 639, 641, 645, 646, 647, 649, 652, 653, 655, 657, 659, 660, + 661, 662, 664, 667, 668, 406, 408, 459, 461, 484, 491, 493, 494, 508, + 510, 515, 516, 517, 518, 519, 522, 524, 526, 527, 528, 530, 532, 533, + 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, 549, 552, 554, + 555, 557, 558, 559, 560, 561, 562, 567, 569, 573, 574, 575, 578, 580, + 585, 588, 589, 596, 599, 603, 605, 607, 611, 612, 614, 618, 621, 622, + 624, 631, 632, 633, 635, 636, 637, 639, 641, 643, 644, 645, 646, 653, + 654, 655, 657, 658, 659, 661, 662, 664, 666, 667, 31, 110, 131, 181, + 222, 235, 270, 319, 341, 369, 391, 394, 397, 408, 448, 459, 461, 465, + 472, 473, 475, 480, 482, 484, 485, 487, 489, 492, 493, 498, 500, 501, + 503, 506, 511, 513, 519, 521, 529, 530, 550, 552, 553, 565, 570, 573, + 574, 580, 603, 606, 607, 608, 616, 618, 620, 623, 625, 626, 630, 631, + 632, 633, 634, 637, 639, 640, 641, 643, 644, 645, 646, 647, 649, 650, + 651, 652, 653, 654, 655, 657, 658, 659, 660, 661, 662, 664, 667, 668, + 110, 238, 272, 319, 341, 408, 423, 429, 442, 458, 459, 465, 473, 475, + 487, 492, 498, 500, 501, 506, 511, 513, 517, 518, 521, 524, 526, 527, + 529, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, + 549, 550, 553, 554, 555, 557, 558, 559, 561, 562, 565, 570, 575, 595, + 599, 603, 604, 608, 620, 622, 625, 626, 629, 630, 632, 634, 638, 644, + 646, 647, 648, 649, 650, 651, 652, 653, 654, 655, 657, 659, 660, 661, + 662, 664, 667, 668, 218, 235, 236, 238, 266, 298, 323, 341, 369, 391, + 408, 424, 446, 457, 471, 472, 476, 478, 490, 491, 493, 494, 498, 515, + 516, 517, 518, 522, 524, 526, 527, 530, 532, 533, 534, 536, 537, 538, + 539, 540, 541, 542, 544, 546, 547, 549, 552, 553, 554, 555, 557, 558, + 559, 560, 561, 562, 566, 567, 569, 572, 573, 574, 575, 578, 596, 599, + 605, 611, 614, 621, 624, 627, 631, 634, 636, 637, 639, 641, 644, 645, + 646, 647, 653, 658, 660, 661, 662, 664, 666, 667, 161, 244, 245, 370, + 372, 417, 429, 444, 454, 455, 459, 485, 486, 491, 494, 504, 508, 511, + 516, 517, 518, 519, 520, 524, 526, 527, 532, 533, 534, 536, 537, 538, + 539, 540, 541, 542, 544, 546, 547, 549, 550, 554, 555, 557, 558, 559, + 561, 562, 567, 573, 575, 579, 585, 588, 589, 596, 599, 605, 612, 618, + 622, 623, 628, 629, 631, 635, 636, 637, 638, 639, 640, 641, 642, 643, + 644, 645, 647, 648, 649, 652, 654, 655, 658, 660, 662, 663, 664, 667, + 668, 135, 198, 215, 233, 300, 325, 370, 387, 391, 431, 432, 433, 439, + 440, 443, 444, 455, 461, 472, 476, 481, 484, 489, 491, 493, 501, 502, + 507, 508, 509, 510, 511, 512, 514, 516, 517, 519, 522, 523, 524, 525, + 528, 531, 544, 546, 548, 552, 563, 566, 567, 572, 573, 574, 578, 579, + 580, 584, 585, 586, 587, 588, 589, 596, 601, 604, 605, 607, 608, 611, + 612, 614, 617, 618, 620, 621, 622, 623, 624, 625, 626, 627, 628, 629, + 630, 631, 632, 633, 634, 635, 636, 637, 638, 639, 640, 641, 642, 643, + 644, 645, 646, 647, 648, 649, 651, 652, 653, 654, 655, 657, 658, 659, + 660, 661, 662, 663, 664, 666, 667, 668, 233, 280, 296, 373, 395, 402, + 407, 412, 419, 441, 442, 456, 457, 464, 465, 481, 484, 486, 495, 505, + 515, 517, 518, 520, 524, 525, 526, 527, 529, 532, 533, 534, 536, 537, + 538, 539, 540, 541, 542, 544, 546, 547, 548, 549, 551, 554, 555, 557, + 558, 559, 561, 562, 563, 574, 575, 578, 580, 583, 585, 588, 589, 596, + 599, 606, 611, 613, 614, 616, 617, 619, 622, 623, 624, 625, 626, 630, + 632, 633, 637, 638, 640, 641, 642, 644, 645, 646, 648, 651, 652, 654, + 655, 657, 658, 659, 660, 663, 664, 666, 667, 668, 38, 241, 245, 266, + 298, 326, 406, 408, 447, 461, 472, 484, 490, 493, 498, 508, 515, 517, + 518, 519, 522, 524, 526, 527, 528, 530, 532, 533, 534, 536, 537, 538, + 539, 540, 541, 542, 543, 544, 546, 547, 549, 552, 554, 555, 557, 558, + 559, 560, 561, 562, 572, 573, 574, 575, 578, 580, 585, 588, 589, 599, + 603, 607, 611, 612, 618, 621, 623, 624, 631, 632, 633, 634, 635, 636, + 639, 640, 642, 644, 645, 646, 647, 650, 651, 653, 654, 655, 657, 658, + 659, 661, 662, 664, 666, 667, 668, 353, 390, 393, 417, 440, 441, 464, + 481, 495, 502, 505, 508, 510, 511, 512, 515, 516, 517, 518, 519, 520, + 522, 524, 526, 527, 528, 532, 533, 534, 536, 537, 538, 539, 540, 541, + 542, 543, 544, 545, 546, 547, 549, 551, 554, 555, 556, 557, 558, 559, + 561, 562, 569, 573, 574, 575, 578, 580, 585, 588, 589, 596, 599, 601, + 611, 612, 613, 614, 616, 618, 619, 622, 625, 626, 629, 631, 632, 633, + 635, 636, 637, 638, 639, 641, 642, 643, 644, 645, 648, 651, 654, 655, + 657, 659, 660, 664, 666, 667, 668, 99, 261, 298, 301, 310, 315, 316, + 317, 336, 339, 354, 395, 402, 405, 407, 412, 418, 432, 441, 456, 457, + 464, 481, 484, 515, 517, 518, 524, 525, 526, 527, 530, 532, 533, 534, + 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, 549, 551, 552, 553, + 554, 555, 557, 558, 559, 561, 562, 563, 566, 570, 573, 574, 575, 578, + 579, 580, 583, 585, 588, 589, 599, 603, 608, 611, 614, 617, 620, 621, + 622, 624, 625, 629, 630, 632, 633, 634, 635, 641, 644, 645, 646, 647, + 648, 651, 652, 653, 654, 655, 657, 658, 659, 661, 662, 663, 664, 667, + 342, 347, 423, 429, 442, 458, 469, 476, 480, 485, 486, 493, 495, 496, + 499, 503, 505, 506, 510, 511, 517, 518, 519, 524, 526, 527, 529, 530, + 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, 549, + 550, 552, 554, 555, 557, 558, 559, 561, 562, 575, 578, 599, 602, 603, + 605, 606, 609, 610, 613, 616, 618, 619, 622, 623, 625, 626, 631, 632, + 633, 634, 636, 637, 638, 640, 642, 645, 646, 647, 648, 652, 654, 655, + 657, 658, 659, 660, 661, 662, 663, 664, 666, 667, 668, 128, 147, 195, + 229, 245, 318, 338, 361, 370, 392, 394, 412, 417, 443, 444, 455, 461, + 485, 491, 494, 502, 504, 507, 508, 510, 512, 515, 516, 517, 518, 519, + 520, 522, 524, 526, 527, 528, 532, 533, 534, 536, 537, 538, 539, 540, + 541, 542, 544, 546, 547, 548, 549, 552, 554, 555, 557, 558, 559, 561, + 562, 563, 567, 569, 572, 573, 574, 575, 578, 579, 580, 585, 588, 589, + 596, 599, 601, 611, 612, 614, 617, 618, 620, 622, 623, 624, 628, 629, + 632, 633, 635, 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 646, + 647, 648, 649, 651, 652, 654, 655, 657, 658, 659, 660, 662, 663, 664, + 667, 668, 164, 184, 202, 203, 256, 257, 287, 323, 333, 400, 411, 424, + 431, 439, 443, 470, 480, 491, 494, 501, 502, 507, 508, 510, 512, 516, + 517, 518, 519, 520, 522, 524, 526, 527, 528, 530, 532, 533, 534, 536, + 537, 538, 539, 540, 541, 542, 544, 546, 547, 548, 549, 554, 555, 557, + 558, 559, 560, 561, 562, 563, 565, 567, 569, 572, 573, 574, 575, 578, + 579, 580, 585, 588, 589, 599, 603, 605, 607, 611, 612, 614, 618, 622, + 623, 624, 625, 626, 629, 632, 635, 636, 638, 639, 640, 641, 642, 643, + 644, 645, 646, 647, 648, 649, 650, 651, 652, 654, 655, 657, 658, 659, + 660, 661, 662, 663, 664, 667, 668, 154, 221, 231, 236, 253, 342, 368, + 379, 381, 387, 391, 424, 428, 429, 435, 439, 442, 443, 444, 448, 458, + 459, 461, 465, 472, 474, 476, 480, 481, 484, 487, 489, 492, 493, 494, + 498, 500, 503, 508, 510, 511, 512, 513, 515, 519, 520, 521, 528, 530, + 546, 548, 549, 550, 552, 567, 569, 570, 572, 573, 574, 578, 579, 580, + 588, 596, 603, 604, 605, 606, 612, 614, 616, 618, 620, 622, 623, 624, + 625, 626, 629, 630, 631, 632, 634, 636, 637, 638, 639, 640, 641, 642, + 643, 644, 645, 646, 647, 648, 649, 650, 651, 654, 655, 657, 658, 659, + 660, 661, 662, 663, 664, 666, 667, 668, 265, 277, 278, 295, 313, 327, + 338, 373, 388, 401, 418, 422, 454, 459, 460, 469, 473, 485, 486, 487, + 488, 491, 492, 494, 496, 499, 500, 501, 502, 505, 508, 509, 510, 511, + 513, 514, 516, 518, 519, 520, 522, 525, 526, 528, 529, 530, 531, 534, + 544, 545, 549, 550, 552, 553, 555, 563, 565, 566, 567, 568, 569, 570, + 572, 573, 574, 578, 584, 586, 587, 595, 603, 604, 605, 607, 608, 609, + 610, 611, 612, 613, 614, 616, 617, 618, 619, 620, 621, 622, 623, 624, + 626, 627, 629, 630, 631, 632, 634, 635, 638, 640, 641, 642, 643, 644, + 645, 646, 647, 648, 649, 650, 652, 653, 654, 655, 657, 658, 659, 660, + 661, 662, 664, 666, 667, 668, 115, 154, 157, 182, 184, 235, 256, 287, + 350, 359, 368, 370, 387, 394, 399, 400, 424, 431, 439, 443, 446, 456, + 475, 480, 490, 491, 493, 494, 498, 501, 502, 506, 507, 508, 510, 511, + 516, 517, 518, 519, 522, 524, 526, 527, 528, 530, 532, 533, 534, 536, + 537, 538, 539, 540, 541, 542, 544, 546, 547, 548, 549, 554, 555, 557, + 558, 559, 560, 561, 562, 563, 567, 569, 572, 573, 574, 575, 578, 580, + 585, 588, 589, 599, 605, 607, 612, 614, 618, 619, 621, 622, 623, 624, + 625, 626, 629, 631, 632, 633, 635, 636, 639, 640, 641, 642, 644, 645, + 646, 647, 649, 650, 651, 653, 654, 655, 657, 658, 659, 661, 662, 664, + 667, 668, 134, 153, 163, 191, 192, 236, 238, 270, 271, 278, 286, 298, + 342, 351, 369, 397, 408, 416, 423, 443, 446, 447, 448, 455, 456, 459, + 465, 472, 482, 485, 486, 489, 490, 491, 492, 494, 497, 498, 502, 503, + 504, 508, 510, 512, 513, 514, 515, 516, 517, 518, 519, 522, 524, 526, + 527, 528, 530, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, + 546, 547, 549, 550, 554, 555, 557, 558, 559, 560, 561, 562, 565, 567, + 569, 572, 573, 574, 575, 578, 589, 596, 599, 605, 612, 614, 618, 620, + 621, 622, 623, 625, 628, 629, 630, 631, 634, 635, 636, 637, 638, 639, + 640, 641, 642, 643, 644, 645, 646, 647, 648, 649, 650, 651, 652, 653, + 654, 655, 657, 658, 659, 660, 661, 662, 664, 666, 667, 668, 52, 145, + 162, 195, 230, 249, 251, 254, 265, 277, 286, 294, 313, 314, 322, 338, + 341, 359, 365, 380, 385, 401, 402, 403, 405, 429, 439, 443, 454, 457, + 471, 473, 480, 491, 494, 501, 502, 503, 508, 509, 510, 511, 512, 514, + 515, 516, 518, 519, 520, 522, 525, 528, 529, 530, 531, 532, 543, 544, + 546, 548, 549, 550, 560, 563, 565, 566, 567, 568, 569, 572, 573, 574, + 578, 579, 580, 584, 585, 586, 587, 588, 589, 595, 596, 601, 603, 604, + 605, 607, 608, 611, 612, 614, 617, 618, 620, 621, 622, 624, 625, 627, + 628, 629, 630, 631, 632, 633, 634, 635, 636, 637, 638, 639, 640, 641, + 642, 643, 644, 645, 646, 647, 648, 649, 650, 651, 652, 653, 654, 655, + 657, 659, 660, 661, 662, 664, 666, 667, 668, 205, 206, 263, 300, 326, + 353, 390, 393, 394, 396, 406, 409, 415, 416, 417, 432, 440, 441, 456, + 464, 471, 481, 490, 491, 494, 502, 508, 509, 510, 511, 512, 514, 515, + 516, 517, 518, 520, 522, 524, 525, 526, 527, 528, 530, 531, 532, 533, + 534, 535, 536, 537, 538, 539, 540, 541, 542, 543, 544, 545, 546, 547, + 549, 551, 553, 554, 555, 556, 557, 558, 559, 561, 562, 563, 566, 569, + 570, 572, 573, 574, 575, 578, 580, 584, 585, 586, 587, 588, 589, 596, + 599, 601, 603, 604, 605, 607, 608, 611, 612, 614, 617, 618, 619, 620, + 621, 622, 623, 624, 627, 629, 630, 631, 632, 633, 634, 635, 636, 637, + 638, 640, 641, 642, 643, 644, 645, 646, 647, 648, 649, 651, 652, 653, + 654, 655, 657, 658, 659, 660, 661, 662, 664, 666, 667, 668, 111, 112, + 132, 133, 205, 206, 237, 248, 252, 253, 268, 283, 284, 302, 315, 328, + 342, 343, 345, 354, 374, 375, 376, 383, 396, 407, 409, 420, 428, 435, + 436, 441, 447, 448, 459, 488, 489, 491, 494, 502, 503, 508, 509, 510, + 511, 512, 514, 516, 519, 520, 522, 525, 528, 530, 531, 544, 545, 549, + 550, 554, 555, 556, 557, 558, 559, 561, 562, 563, 564, 566, 567, 569, + 570, 573, 574, 577, 578, 580, 581, 582, 584, 586, 587, 590, 591, 592, + 593, 594, 595, 597, 598, 600, 602, 604, 605, 607, 608, 609, 610, 611, + 612, 614, 615, 616, 617, 618, 619, 620, 621, 622, 623, 624, 625, 627, + 629, 630, 632, 634, 635, 636, 637, 638, 639, 640, 641, 642, 643, 644, + 645, 646, 647, 648, 649, 652, 653, 654, 655, 657, 659, 660, 661, 662, + 663, 664, 667, 668, 152, 154, 157, 163, 165, 175, 177, 193, 197, 203, + 208, 218, 229, 234, 235, 240, 242, 244, 245, 253, 256, 262, 270, 297, + 300, 318, 323, 351, 352, 359, 360, 370, 371, 386, 411, 431, 432, 439, + 440, 442, 443, 444, 446, 447, 455, 461, 462, 465, 472, 476, 484, 486, + 491, 493, 494, 502, 503, 506, 507, 508, 509, 510, 511, 512, 514, 515, + 516, 519, 522, 525, 528, 530, 531, 532, 543, 544, 545, 546, 548, 549, + 560, 563, 566, 567, 572, 573, 574, 578, 579, 580, 583, 584, 586, 587, + 596, 601, 604, 605, 607, 608, 611, 612, 614, 617, 618, 620, 621, 622, + 623, 624, 625, 626, 627, 629, 630, 631, 632, 633, 634, 635, 636, 637, + 638, 639, 640, 641, 642, 643, 644, 645, 646, 647, 648, 649, 650, 651, + 652, 653, 654, 655, 657, 658, 659, 660, 661, 662, 663, 664, 666, 667, + 668, 169, 182, 199, 218, 235, 236, 238, 266, 298, 323, 341, 369, 389, + 391, 406, 408, 424, 446, 447, 457, 459, 461, 471, 472, 476, 478, 484, + 490, 491, 493, 494, 498, 508, 510, 514, 515, 516, 517, 518, 519, 522, + 524, 526, 527, 528, 530, 532, 533, 534, 536, 537, 538, 539, 540, 541, + 542, 544, 546, 547, 549, 552, 553, 554, 555, 557, 558, 559, 560, 561, + 562, 566, 567, 569, 572, 573, 574, 575, 578, 580, 585, 588, 589, 596, + 599, 603, 605, 607, 611, 612, 614, 618, 621, 624, 627, 630, 631, 632, + 633, 634, 635, 636, 637, 641, 644, 645, 646, 647, 649, 650, 651, 653, + 654, 655, 657, 659, 661, 662, 664, 666, 667, 668, 270, 423, 427, 459, + 460, 461, 463, 465, 469, 485, 491, 493, 494, 495, 496, 499, 501, 503, + 505, 510, 511, 512, 516, 517, 518, 519, 522, 523, 524, 526, 527, 529, + 530, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, + 549, 550, 554, 555, 557, 558, 559, 561, 562, 567, 569, 570, 573, 574, + 575, 578, 580, 585, 588, 589, 591, 596, 599, 602, 605, 606, 609, 610, + 613, 614, 616, 618, 619, 622, 623, 624, 625, 626, 631, 633, 634, 635, + 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 646, 647, 648, 649, + 651, 652, 654, 655, 657, 658, 659, 660, 661, 662, 663, 664, 666, 667, + 668, 304, 305, 347, 357, 381, 386, 387, 427, 442, 444, 454, 458, 460, + 463, 464, 465, 469, 480, 485, 486, 491, 493, 494, 495, 496, 499, 503, + 505, 508, 510, 516, 517, 518, 519, 520, 522, 523, 524, 526, 527, 530, + 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 543, 544, 546, 547, + 548, 549, 550, 554, 555, 557, 558, 559, 561, 562, 567, 569, 572, 573, + 574, 575, 578, 585, 588, 589, 591, 596, 599, 601, 602, 603, 605, 606, + 609, 610, 612, 613, 614, 616, 618, 619, 621, 622, 624, 625, 626, 629, + 631, 633, 635, 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 647, + 648, 649, 651, 652, 653, 654, 655, 657, 658, 659, 660, 661, 662, 663, + 664, 666, 667, 668, 83, 167, 238, 246, 266, 270, 272, 285, 341, 342, + 345, 354, 388, 391, 397, 408, 418, 421, 428, 429, 435, 447, 448, 456, + 459, 461, 469, 472, 473, 475, 476, 478, 482, 484, 486, 487, 489, 493, + 495, 496, 498, 499, 501, 505, 510, 512, 513, 517, 518, 519, 524, 526, + 527, 529, 530, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, + 546, 547, 549, 550, 552, 553, 554, 555, 557, 558, 559, 561, 562, 565, + 569, 570, 574, 575, 578, 580, 585, 588, 589, 595, 599, 602, 603, 604, + 605, 606, 607, 608, 609, 610, 613, 616, 618, 619, 620, 622, 623, 625, + 626, 629, 630, 631, 632, 633, 634, 635, 636, 637, 638, 639, 640, 641, + 643, 644, 645, 646, 647, 648, 649, 650, 651, 652, 653, 654, 655, 657, + 658, 659, 660, 661, 662, 664, 666, 667, 668, 31, 130, 134, 165, 177, + 207, 219, 226, 227, 234, 270, 284, 286, 297, 304, 305, 310, 316, 317, + 318, 347, 351, 367, 369, 370, 377, 384, 395, 409, 417, 423, 427, 430, + 441, 443, 444, 447, 448, 454, 455, 459, 460, 463, 465, 478, 485, 486, + 489, 491, 494, 496, 497, 501, 502, 503, 504, 508, 509, 510, 511, 512, + 513, 514, 516, 519, 522, 525, 527, 529, 531, 532, 534, 540, 541, 544, + 545, 546, 547, 549, 550, 554, 557, 558, 559, 561, 562, 563, 564, 566, + 567, 569, 570, 571, 573, 577, 578, 579, 584, 586, 587, 590, 591, 592, + 593, 594, 595, 596, 597, 598, 599, 600, 604, 605, 607, 608, 609, 611, + 612, 614, 615, 616, 617, 618, 619, 620, 621, 622, 623, 624, 625, 627, + 628, 629, 630, 632, 634, 635, 636, 637, 638, 639, 640, 641, 642, 643, + 644, 645, 646, 647, 648, 649, 651, 652, 653, 654, 655, 657, 658, 659, + 660, 661, 662, 663, 664, 666, 667, 668, 14, 15, 16, 17, 18, 22, 23, 26, + 27, 30, 38, 40, 41, 45, 47, 49, 54, 55, 56, 57, 58, 59, 61, 64, 65, 66, + 67, 68, 69, 70, 72, 73, 74, 75, 76, 77, 79, 86, 87, 88, 93, 94, 95, 96, + 103, 104, 105, 106, 108, 117, 119, 120, 121, 124, 125, 137, 138, 140, + 141, 142, 158, 160, 171, 187, 188, 189, 190, 191, 199, 210, 211, 212, + 213, 214, 215, 222, 223, 224, 225, 241, 258, 259, 272, 273, 274, 275, + 276, 289, 290, 291, 292, 306, 307, 308, 309, 319, 320, 321, 335, 336, + 348, 349, 350, 361, 379, 388, 389, 400, 414, 415, 438, 462, 470, 475, + 488, 497, 504, 507, 521, 565, 576, 595, 650, 668, 60, 170, 178, 181, + 185, 186, 197, 208, 209, 220, 221, 234, 243, 253, 257, 287, 304, 305, + 341, 347, 357, 358, 359, 365, 368, 370, 385, 386, 399, 408, 424, 425, + 426, 435, 439, 443, 446, 448, 453, 458, 459, 461, 469, 472, 473, 475, + 480, 481, 484, 485, 489, 493, 495, 496, 498, 499, 501, 503, 505, 506, + 510, 511, 512, 517, 518, 520, 521, 524, 526, 527, 528, 529, 530, 532, + 533, 534, 536, 537, 538, 539, 540, 541, 542, 544, 546, 547, 548, 549, + 554, 555, 557, 558, 559, 561, 562, 567, 569, 570, 572, 574, 575, 579, + 585, 588, 589, 596, 599, 602, 603, 609, 610, 612, 613, 614, 616, 619, + 622, 624, 625, 626, 629, 630, 631, 632, 633, 634, 635, 636, 637, 639, + 641, 642, 644, 645, 646, 647, 648, 649, 650, 651, 652, 654, 655, 657, + 658, 659, 660, 662, 663, 664, 666, 667, 668, 168, 192, 204, 207, 245, + 254, 263, 264, 270, 301, 344, 363, 364, 370, 372, 378, 384, 392, 393, + 395, 397, 409, 412, 413, 416, 417, 419, 423, 430, 432, 433, 439, 441, + 443, 444, 445, 447, 451, 452, 456, 457, 459, 464, 466, 467, 468, 469, + 473, 477, 479, 482, 483, 486, 487, 491, 492, 499, 500, 502, 504, 505, + 506, 508, 512, 514, 515, 516, 517, 518, 519, 520, 522, 524, 526, 527, + 528, 532, 533, 534, 536, 537, 538, 539, 540, 541, 542, 543, 544, 545, + 546, 547, 548, 549, 550, 552, 554, 555, 557, 558, 559, 561, 562, 563, + 564, 567, 569, 570, 571, 572, 573, 574, 575, 577, 578, 579, 580, 582, + 585, 588, 590, 591, 592, 593, 594, 596, 597, 598, 599, 600, 601, 602, + 603, 605, 606, 607, 608, 609, 610, 611, 612, 613, 614, 615, 616, 617, + 618, 620, 622, 623, 624, 625, 626, 628, 629, 631, 633, 634, 635, 636, + 637, 638, 639, 640, 641, 642, 643, 644, 645, 646, 647, 649, 651, 652, + 654, 655, 657, 658, 660, 663, 664, 666, 667, 668, 200, 218, 232, 239, + 250, 260, 261, 262, 281, 303, 311, 316, 323, 324, 325, 333, 340, 346, + 352, 353, 368, 369, 372, 373, 375, 380, 383, 386, 387, 391, 393, 396, + 398, 399, 401, 402, 407, 408, 409, 411, 419, 420, 429, 431, 436, 437, + 441, 442, 453, 454, 457, 458, 464, 472, 476, 480, 485, 491, 493, 494, + 495, 498, 503, 505, 510, 511, 515, 516, 517, 518, 519, 522, 523, 524, + 526, 527, 529, 530, 532, 533, 534, 535, 536, 537, 538, 539, 540, 541, + 542, 544, 545, 546, 547, 548, 549, 550, 554, 555, 556, 557, 558, 559, + 560, 561, 562, 567, 568, 573, 574, 575, 577, 578, 583, 589, 596, 599, + 600, 605, 606, 611, 613, 614, 615, 616, 619, 622, 623, 625, 626, 631, + 633, 634, 636, 637, 639, 640, 641, 643, 644, 645, 646, 648, 653, 654, + 658, 660, 661, 662, 664, 666, 667, 85, 135, 168, 175, 180, 192, 196, + 207, 209, 218, 221, 229, 233, 240, 244, 245, 250, 251, 252, 263, 269, + 288, 297, 300, 301, 313, 314, 315, 316, 317, 318, 325, 338, 345, 346, + 351, 352, 362, 370, 371, 374, 375, 380, 383, 384, 392, 393, 395, 399, + 401, 402, 404, 406, 407, 409, 412, 416, 417, 419, 420, 430, 432, 433, + 436, 437, 439, 440, 441, 443, 444, 445, 449, 450, 451, 452, 455, 456, + 457, 461, 464, 465, 466, 467, 468, 471, 472, 473, 474, 476, 477, 479, + 481, 483, 484, 485, 487, 489, 491, 492, 493, 494, 495, 500, 501, 502, + 503, 506, 507, 508, 509, 512, 513, 514, 515, 516, 517, 518, 519, 520, + 522, 523, 524, 525, 526, 527, 528, 530, 531, 532, 533, 534, 536, 537, + 538, 539, 540, 541, 542, 543, 544, 545, 546, 547, 548, 549, 552, 553, + 554, 555, 556, 557, 558, 559, 561, 562, 563, 564, 566, 567, 569, 570, + 571, 572, 573, 574, 575, 577, 578, 579, 580, 581, 582, 583, 584, 585, + 586, 587, 590, 591, 592, 593, 594, 596, 597, 598, 599, 600, 601, 602, + 603, 604, 605, 607, 608, 609, 610, 611, 612, 613, 614, 615, 616, 617, + 618, 620, 621, 622, 623, 624, 625, 626, 627, 628, 629, 630, 631, 632, + 633, 634, 635, 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 646, + 647, 648, 649, 651, 652, 653, 654, 655, 657, 658, 659, 660, 661, 662, + 663, 664, 666, 667, 668, 135, 196, 219, 233, 239, 260, 280, 296, 297, + 303, 304, 305, 311, 315, 316, 318, 324, 327, 333, 338, 340, 346, 347, + 351, 352, 353, 357, 360, 365, 367, 368, 371, 372, 373, 374, 375, 377, + 380, 381, 382, 383, 384, 385, 386, 387, 390, 392, 393, 396, 398, 399, + 401, 402, 403, 407, 409, 411, 412, 416, 417, 419, 420, 422, 423, 427, + 429, 430, 434, 436, 437, 440, 441, 442, 443, 444, 445, 453, 454, 455, + 458, 460, 463, 464, 465, 468, 469, 480, 485, 486, 495, 496, 499, 503, + 505, 506, 517, 518, 520, 523, 524, 526, 527, 529, 532, 533, 534, 535, 536, 537, 538, 539, 540, 541, 542, 543, 544, 545, 546, 547, 548, 549, - 550, 551, 552, 553, 554, 555, 557, 559, 560, 561, 562, 563, 565, 566, - 567, 568, 569, 570, 571, 572, 573, 575, 576, 577, 578, 579, 580, 581, - 582, 583, 584, 585, 586, 587, 589, 590, 591, 592, 593, 594, 595, 596, - 597, 598, 599, 600, 601, 602, 603, 604, 605, 606, 607, 610, 611, 613, - 614, 615, 616, 618, 619, 620, 621, 622, 623, 624, 625, 626, 627, 628, - 629, 630, 631, 632, 633, 635, 636, 637, 638, 640, 641, 642, 643, 644, - 645, 647, 648, 649, 650, 651, 652, 653, 654, 655, 656, 658, 660, 661, - 662, 663, 665, 666, 667, 668, 2, 3, 5, 6, 8, 9, 14, 16, 17, 19, 20, 22, - 24, 27, 31, 34, 37, 41, 43, 45, 47, 48, 50, 51, 61, 62, 65, 67, 69, 70, - 72, 73, 75, 83, 85, 87, 89, 90, 92, 93, 99, 100, 102, 103, 105, 106, - 114, 116, 117, 119, 120, 127, 129, 130, 132, 133, 138, 140, 141, 143, - 144, 151, 156, 157, 158, 159, 160, 161, 165, 168, 172, 180, 181, 183, - 186, 188, 190, 191, 193, 195, 198, 203, 211, 212, 215, 218, 222, 223, - 227, 228, 233, 235, 237, 238, 243, 404, 429, 430, 431, 432, 433, 437, - 441, 443, 450, 455, 457, 459, 461, 475, 478, 485, 488, 490, 493, 494, - 496, 499, 502, 507, 509, 511, 513, 518, 519, 520, 523, 526, 529, 532, - 535, 537, 538, 539, 545, 546, 548, 555, 560, 561, 562, 566, 569, 571, - 573, 577, 578, 579, 580, 582, 587, 589, 591, 592, 602, 604, 607, 611, - 613, 615, 616, 618, 620, 622, 624, 626, 628, 630, 633, 635, 638, 641, - 643, 647, 649, 651, 653, 656, 658, 662, 666, 668, 0, 1, 14, 17, 20, 21, - 23, 74, 76, 86, 156, 159, 162, 181, 182, 221, 224, 226, 244, 429, 430, - 431, 432, 433, 442, 450, 456, 461, 468, 477, 493, 495, 499, 500, 546, - 549, 550, 551, 554, 560, 562, 567, 568, 570, 576, 577, 578, 589, 614, - 619, 623, 663, 665, 667, 668, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 14, 15, - 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 27, 28, 31, 34, 35, 36, 37, 39, - 41, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 54, 55, 56, 57, 58, 59, 60, - 61, 62, 63, 64, 65, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 80, - 82, 83, 85, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, - 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, - 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, - 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, - 143, 144, 145, 146, 147, 148, 149, 150, 151, 156, 157, 158, 159, 160, - 161, 162, 163, 165, 166, 168, 170, 172, 174, 176, 178, 180, 181, 182, - 183, 184, 186, 187, 188, 190, 191, 193, 194, 195, 198, 199, 201, 203, - 206, 210, 211, 212, 215, 217, 218, 219, 220, 221, 222, 223, 225, 226, - 227, 228, 229, 230, 232, 233, 234, 235, 236, 237, 238, 241, 242, 243, - 341, 342, 404, 429, 430, 431, 432, 433, 434, 435, 436, 437, 439, 441, - 442, 443, 446, 447, 449, 450, 451, 452, 455, 456, 457, 459, 460, 461, - 462, 463, 464, 465, 466, 467, 468, 469, 470, 471, 475, 478, 479, 480, - 483, 485, 486, 487, 488, 489, 490, 491, 493, 494, 495, 496, 497, 499, - 502, 504, 507, 508, 509, 511, 512, 513, 514, 515, 516, 518, 519, 520, - 521, 523, 526, 527, 528, 529, 530, 532, 533, 535, 537, 538, 539, 540, - 546, 547, 548, 550, 551, 552, 553, 554, 555, 557, 560, 561, 562, 563, - 564, 566, 567, 568, 569, 571, 572, 573, 575, 577, 578, 579, 580, 582, - 583, 584, 585, 586, 587, 589, 590, 591, 592, 593, 594, 595, 596, 599, - 600, 601, 602, 603, 604, 605, 606, 607, 609, 610, 611, 613, 614, 615, - 616, 618, 620, 621, 622, 623, 624, 625, 626, 627, 628, 629, 630, 631, - 632, 633, 635, 637, 638, 641, 642, 643, 644, 645, 647, 648, 649, 650, - 651, 652, 653, 654, 655, 656, 658, 661, 662, 663, 664, 666, 668, 0, 14, - 17, 20, 24, 34, 156, 159, 218, 221, 226, 228, 242, 404, 429, 430, 431, - 432, 433, 441, 450, 455, 461, 493, 499, 545, 546, 547, 550, 552, 560, - 562, 566, 569, 577, 580, 589, 668, 1, 165, 404, 432, 434, 483, 668, 122, - 404, 432, 435, 461, 488, 489, 500, 550, 668, 146, 404, 432, 436, 461, - 490, 491, 500, 550, 668, 0, 1, 20, 21, 23, 25, 50, 52, 54, 55, 71, 74, - 76, 94, 107, 156, 162, 163, 182, 193, 343, 404, 429, 430, 437, 461, 468, - 500, 546, 577, 614, 623, 668, 154, 182, 404, 438, 441, 513, 668, 0, 27, - 181, 300, 344, 381, 429, 439, 550, 577, 404, 432, 440, 461, 496, 497, - 668, 1, 2, 5, 8, 16, 18, 19, 21, 22, 24, 27, 28, 32, 33, 47, 50, 61, 69, - 72, 73, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 154, 156, - 157, 158, 159, 160, 163, 175, 177, 179, 181, 182, 194, 195, 197, 204, - 211, 212, 215, 216, 217, 219, 220, 221, 222, 223, 227, 231, 243, 300, - 341, 345, 361, 393, 404, 429, 430, 431, 433, 441, 442, 450, 451, 455, - 461, 466, 468, 469, 493, 494, 495, 499, 500, 502, 504, 518, 523, 524, - 546, 548, 551, 553, 554, 561, 562, 563, 566, 567, 569, 571, 575, 577, - 578, 579, 580, 581, 582, 583, 584, 589, 590, 591, 613, 614, 615, 617, - 619, 622, 642, 663, 668, 1, 2, 5, 8, 14, 16, 17, 19, 21, 47, 50, 61, 69, - 72, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 156, 157, 158, - 159, 160, 182, 211, 215, 218, 219, 220, 222, 223, 227, 228, 243, 404, - 430, 431, 433, 441, 442, 450, 451, 461, 493, 494, 499, 500, 518, 524, - 546, 548, 551, 553, 554, 560, 561, 562, 563, 566, 569, 575, 577, 578, - 579, 580, 581, 582, 584, 589, 590, 591, 613, 615, 622, 668, 1, 163, 181, - 341, 346, 365, 404, 430, 443, 444, 461, 467, 500, 546, 613, 619, 642, - 668, 20, 24, 25, 160, 163, 181, 182, 194, 404, 430, 443, 444, 455, 461, - 509, 537, 587, 614, 619, 668, 220, 226, 404, 432, 445, 450, 461, 513, - 514, 668, 404, 432, 446, 461, 515, 516, 668, 0, 1, 49, 157, 182, 221, - 222, 404, 447, 450, 550, 563, 566, 568, 622, 668, 404, 432, 448, 461, - 520, 521, 668, 404, 449, 461, 523, 563, 580, 668, 1, 2, 5, 8, 14, 15, - 16, 17, 18, 19, 20, 21, 22, 23, 24, 27, 28, 31, 33, 34, 35, 38, 39, 41, - 43, 45, 47, 48, 49, 50, 51, 59, 61, 62, 63, 64, 65, 67, 69, 70, 72, 73, - 75, 82, 83, 85, 89, 92, 99, 102, 105, 111, 116, 119, 129, 132, 140, 143, - 151, 156, 157, 158, 159, 160, 161, 170, 171, 172, 174, 176, 178, 180, - 181, 182, 193, 194, 195, 198, 203, 206, 208, 211, 212, 215, 216, 217, - 218, 219, 220, 222, 223, 224, 227, 229, 230, 233, 235, 241, 243, 341, - 347, 398, 404, 429, 430, 431, 432, 433, 437, 441, 442, 445, 450, 451, - 452, 453, 455, 456, 457, 459, 461, 466, 468, 475, 478, 493, 494, 499, - 500, 501, 502, 504, 506, 507, 511, 518, 519, 523, 524, 526, 527, 531, - 535, 536, 538, 539, 542, 544, 546, 548, 551, 553, 554, 556, 559, 560, - 561, 562, 563, 566, 567, 569, 572, 575, 577, 578, 579, 580, 582, 583, - 584, 587, 589, 590, 591, 593, 603, 605, 607, 613, 615, 616, 619, 622, - 623, 624, 626, 628, 643, 644, 647, 648, 649, 654, 655, 658, 662, 668, 0, - 14, 17, 20, 24, 34, 156, 159, 218, 220, 226, 227, 229, 243, 404, 430, - 432, 433, 441, 450, 451, 455, 461, 493, 494, 499, 500, 518, 524, 529, - 532, 546, 548, 550, 551, 553, 554, 556, 560, 561, 562, 566, 569, 575, - 577, 578, 580, 584, 587, 589, 590, 613, 620, 622, 668, 341, 348, 395, - 398, 429, 432, 441, 450, 452, 577, 583, 589, 404, 432, 453, 461, 529, - 530, 668, 215, 404, 450, 454, 461, 468, 500, 535, 603, 605, 668, 1, 2, - 5, 8, 16, 19, 21, 23, 25, 28, 35, 38, 47, 49, 50, 61, 69, 72, 89, 92, - 99, 102, 105, 116, 119, 129, 132, 140, 143, 157, 158, 160, 181, 182, - 219, 220, 223, 227, 229, 243, 341, 349, 377, 404, 429, 430, 431, 432, - 433, 441, 450, 451, 455, 456, 461, 466, 468, 469, 493, 495, 499, 500, - 518, 537, 538, 540, 544, 546, 548, 551, 553, 556, 563, 566, 567, 569, - 575, 577, 578, 579, 581, 582, 588, 589, 590, 591, 593, 603, 606, 613, - 614, 615, 619, 622, 668, 0, 1, 2, 5, 8, 16, 19, 21, 25, 35, 47, 50, 61, - 69, 72, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 158, 219, - 223, 227, 229, 243, 404, 429, 430, 431, 432, 433, 441, 450, 451, 455, - 456, 461, 469, 499, 500, 537, 538, 546, 548, 550, 551, 553, 556, 563, - 566, 569, 575, 577, 578, 579, 581, 582, 588, 590, 591, 593, 613, 614, - 615, 622, 668, 350, 404, 430, 457, 461, 468, 470, 500, 546, 668, 34, - 215, 404, 430, 457, 458, 461, 468, 469, 500, 539, 613, 617, 668, 1, 351, - 404, 430, 459, 461, 468, 471, 500, 546, 577, 651, 668, 1, 404, 430, 459, - 460, 577, 652, 668, 0, 2, 3, 5, 6, 8, 9, 14, 16, 17, 19, 20, 22, 24, 27, - 31, 34, 37, 41, 43, 45, 47, 48, 50, 51, 59, 61, 62, 64, 65, 67, 69, 70, - 72, 73, 75, 83, 85, 87, 89, 90, 92, 93, 97, 99, 100, 102, 103, 105, 106, - 111, 114, 116, 117, 119, 120, 125, 127, 129, 130, 132, 133, 138, 140, - 141, 143, 144, 149, 151, 156, 158, 159, 161, 163, 165, 168, 170, 174, - 176, 178, 180, 181, 183, 186, 188, 190, 191, 193, 194, 195, 198, 201, - 203, 206, 211, 212, 215, 218, 221, 223, 225, 226, 228, 230, 232, 233, - 235, 237, 243, 404, 431, 432, 433, 437, 441, 443, 450, 455, 457, 459, - 461, 475, 478, 485, 488, 490, 493, 496, 499, 502, 504, 507, 509, 511, - 513, 515, 518, 519, 520, 523, 526, 529, 532, 535, 537, 539, 547, 548, - 552, 555, 557, 560, 561, 562, 564, 566, 569, 571, 573, 575, 577, 579, - 580, 582, 584, 585, 587, 589, 591, 592, 602, 604, 607, 611, 613, 615, - 616, 618, 620, 622, 624, 626, 628, 630, 633, 635, 638, 641, 643, 647, - 649, 651, 653, 656, 658, 662, 664, 666, 668, 23, 226, 404, 462, 668, 0, - 21, 96, 185, 187, 404, 463, 478, 550, 668, 0, 21, 74, 123, 124, 189, - 404, 464, 478, 485, 550, 668, 0, 21, 74, 147, 192, 404, 465, 485, 488, - 550, 668, 1, 18, 24, 28, 31, 49, 73, 156, 157, 160, 176, 178, 182, 194, - 195, 203, 211, 215, 218, 219, 220, 230, 404, 430, 441, 442, 450, 451, - 455, 461, 466, 468, 469, 493, 494, 495, 499, 500, 504, 518, 524, 546, - 551, 554, 560, 561, 562, 563, 566, 575, 577, 578, 580, 581, 584, 590, - 619, 668, 24, 25, 160, 182, 218, 404, 443, 455, 461, 467, 500, 538, 587, - 614, 619, 668, 0, 2, 5, 8, 14, 16, 19, 20, 21, 22, 23, 24, 28, 31, 34, - 35, 41, 43, 45, 47, 48, 50, 51, 59, 61, 62, 64, 65, 67, 69, 70, 72, 73, - 75, 83, 85, 89, 92, 99, 102, 105, 111, 116, 119, 129, 132, 140, 143, - 151, 156, 157, 158, 159, 161, 170, 172, 174, 176, 178, 180, 193, 194, - 195, 198, 203, 206, 211, 212, 215, 218, 219, 220, 223, 230, 233, 235, - 404, 431, 432, 433, 437, 441, 442, 445, 450, 451, 455, 456, 457, 459, - 461, 466, 468, 475, 478, 493, 494, 499, 500, 501, 502, 504, 506, 507, - 511, 518, 519, 524, 526, 527, 531, 535, 536, 538, 539, 542, 554, 559, - 560, 561, 562, 563, 566, 575, 577, 579, 582, 584, 589, 590, 591, 592, - 603, 605, 607, 615, 616, 622, 624, 626, 628, 643, 644, 647, 648, 649, - 654, 655, 658, 662, 668, 21, 23, 28, 35, 157, 160, 219, 220, 404, 429, - 432, 441, 451, 455, 456, 461, 466, 468, 469, 493, 495, 500, 518, 538, - 540, 544, 563, 566, 590, 603, 606, 613, 668, 404, 432, 457, 461, 468, - 470, 500, 540, 668, 404, 459, 461, 468, 471, 500, 577, 580, 652, 655, - 668, 217, 404, 441, 461, 468, 472, 500, 502, 668, 261, 341, 352, 473, - 15, 18, 21, 23, 41, 49, 228, 404, 450, 461, 468, 474, 500, 577, 580, - 668, 1, 353, 404, 430, 461, 468, 475, 500, 546, 577, 594, 595, 596, 597, - 668, 1, 20, 21, 151, 180, 404, 430, 461, 468, 475, 476, 500, 592, 593, - 668, 0, 2, 5, 8, 16, 19, 20, 21, 22, 23, 25, 43, 44, 47, 50, 61, 69, 72, - 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 158, 223, 404, 431, - 432, 461, 468, 477, 500, 579, 582, 591, 613, 614, 615, 668, 0, 1, 17, - 18, 20, 21, 23, 24, 25, 28, 46, 50, 51, 56, 61, 73, 74, 82, 161, 166, - 168, 182, 183, 184, 185, 198, 215, 218, 220, 221, 264, 266, 341, 354, - 381, 404, 429, 430, 434, 450, 461, 468, 478, 479, 480, 487, 493, 495, - 500, 518, 519, 546, 550, 554, 557, 566, 668, 18, 20, 21, 24, 59, 60, 73, - 165, 218, 221, 404, 430, 432, 461, 468, 478, 479, 493, 500, 519, 546, - 550, 566, 668, 18, 21, 23, 24, 25, 28, 55, 56, 82, 162, 165, 198, 215, - 218, 220, 404, 430, 432, 450, 461, 468, 478, 479, 480, 493, 495, 500, - 519, 546, 550, 554, 566, 668, 49, 62, 63, 74, 215, 218, 228, 404, 432, - 450, 461, 468, 481, 500, 577, 580, 587, 668, 49, 51, 52, 54, 65, 162, - 404, 437, 455, 461, 468, 482, 500, 587, 613, 614, 668, 20, 38, 74, 404, - 432, 483, 550, 668, 73, 74, 76, 85, 404, 461, 468, 484, 500, 613, 614, - 668, 1, 21, 70, 73, 74, 92, 93, 99, 182, 188, 189, 221, 279, 281, 341, - 355, 381, 404, 429, 430, 461, 463, 485, 487, 500, 518, 546, 550, 557, - 668, 18, 71, 94, 97, 98, 404, 430, 432, 461, 478, 485, 486, 493, 500, - 550, 668, 82, 95, 218, 404, 432, 461, 485, 486, 487, 500, 550, 668, 1, - 21, 106, 119, 120, 182, 191, 192, 221, 287, 289, 341, 356, 381, 404, - 430, 435, 461, 464, 488, 500, 546, 550, 668, 121, 125, 126, 404, 430, - 432, 461, 488, 489, 500, 550, 668, 1, 133, 143, 221, 294, 296, 341, 357, - 381, 404, 430, 436, 461, 465, 490, 500, 546, 550, 668, 145, 149, 150, - 404, 430, 432, 461, 490, 491, 500, 550, 668, 260, 299, 329, 341, 358, - 492, 0, 1, 2, 5, 8, 14, 15, 16, 17, 18, 19, 20, 21, 23, 24, 28, 34, 35, - 36, 38, 39, 46, 47, 50, 56, 61, 69, 71, 72, 74, 82, 88, 89, 92, 99, 102, - 105, 107, 110, 116, 119, 129, 132, 140, 143, 156, 157, 158, 159, 160, - 165, 167, 169, 181, 182, 198, 199, 210, 217, 218, 220, 221, 222, 223, - 224, 227, 299, 329, 341, 359, 381, 404, 429, 430, 431, 432, 433, 439, - 441, 442, 450, 451, 455, 461, 466, 468, 469, 478, 479, 487, 493, 494, - 495, 498, 499, 500, 509, 518, 523, 524, 529, 538, 544, 546, 550, 551, - 552, 553, 554, 557, 559, 560, 561, 562, 563, 565, 566, 569, 575, 577, - 578, 579, 580, 582, 584, 585, 589, 590, 591, 603, 613, 615, 623, 642, - 653, 668, 0, 1, 14, 17, 20, 39, 156, 157, 159, 160, 218, 221, 222, 226, - 227, 228, 404, 429, 430, 432, 433, 441, 450, 461, 493, 494, 499, 518, - 519, 524, 550, 551, 553, 560, 561, 562, 566, 569, 580, 584, 589, 590, - 613, 668, 2, 5, 8, 16, 18, 19, 21, 23, 28, 35, 36, 38, 47, 50, 52, 54, - 61, 69, 72, 74, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 154, - 156, 157, 158, 159, 165, 182, 198, 218, 220, 223, 224, 404, 431, 432, - 441, 442, 451, 455, 461, 466, 468, 469, 478, 493, 494, 495, 499, 500, - 518, 524, 538, 544, 550, 551, 554, 559, 560, 561, 562, 563, 566, 575, - 579, 582, 584, 590, 591, 603, 615, 622, 668, 0, 159, 330, 341, 360, 404, - 430, 440, 461, 496, 498, 546, 569, 577, 668, 225, 404, 432, 461, 496, - 497, 546, 668, 404, 432, 461, 496, 497, 498, 532, 533, 668, 0, 1, 2, 5, - 8, 14, 15, 16, 17, 18, 19, 20, 21, 22, 24, 25, 47, 50, 61, 69, 72, 89, - 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 156, 157, 158, 159, 160, - 163, 174, 175, 176, 177, 181, 182, 195, 196, 197, 204, 215, 220, 221, - 222, 223, 226, 227, 228, 243, 299, 331, 341, 361, 393, 404, 429, 430, - 431, 433, 441, 442, 450, 451, 456, 461, 466, 472, 493, 494, 499, 500, - 504, 505, 506, 518, 522, 523, 524, 546, 548, 550, 551, 553, 554, 561, - 562, 563, 566, 567, 569, 575, 577, 578, 579, 580, 581, 582, 583, 584, - 587, 589, 590, 591, 613, 614, 615, 619, 663, 668, 0, 1, 2, 3, 5, 6, 7, - 8, 9, 10, 11, 14, 15, 16, 17, 18, 19, 20, 21, 22, 24, 25, 27, 31, 34, - 38, 41, 43, 45, 47, 48, 49, 50, 51, 52, 54, 55, 59, 61, 62, 64, 65, 67, - 69, 70, 71, 72, 73, 75, 82, 83, 85, 87, 89, 90, 91, 92, 93, 94, 95, 97, - 99, 100, 102, 103, 105, 106, 107, 108, 111, 114, 116, 117, 118, 119, - 120, 121, 122, 125, 127, 129, 130, 132, 133, 134, 135, 138, 140, 141, - 142, 143, 144, 145, 146, 149, 151, 156, 157, 158, 159, 160, 161, 162, - 165, 170, 172, 174, 176, 178, 180, 182, 183, 186, 188, 190, 191, 193, - 195, 198, 199, 201, 203, 206, 211, 212, 215, 218, 219, 220, 222, 223, - 224, 226, 227, 228, 229, 230, 232, 233, 235, 243, 404, 429, 430, 431, - 432, 433, 437, 441, 442, 443, 445, 450, 451, 455, 456, 457, 459, 461, - 468, 475, 478, 485, 488, 490, 493, 494, 499, 500, 501, 502, 504, 507, - 510, 511, 518, 519, 524, 526, 527, 528, 535, 537, 539, 546, 548, 551, - 553, 554, 555, 557, 560, 561, 562, 563, 564, 566, 567, 573, 575, 577, - 578, 579, 580, 581, 582, 584, 587, 589, 590, 591, 592, 602, 604, 607, - 611, 613, 614, 615, 616, 618, 619, 622, 624, 626, 628, 630, 633, 635, - 638, 641, 642, 643, 647, 649, 653, 654, 658, 660, 662, 663, 664, 666, - 668, 0, 1, 20, 198, 206, 218, 219, 220, 226, 228, 229, 232, 404, 432, - 433, 450, 461, 494, 500, 501, 502, 504, 524, 546, 554, 561, 566, 577, - 581, 584, 589, 590, 668, 1, 325, 333, 341, 361, 362, 404, 430, 461, 468, - 472, 500, 502, 546, 668, 1, 230, 404, 430, 461, 468, 500, 502, 503, 668, - 194, 195, 198, 215, 217, 334, 341, 361, 363, 398, 404, 441, 450, 461, - 466, 500, 504, 506, 566, 581, 589, 668, 232, 404, 461, 500, 504, 505, - 581, 668, 195, 198, 215, 217, 218, 404, 450, 466, 500, 504, 506, 566, - 581, 668, 1, 180, 364, 404, 430, 461, 468, 475, 500, 507, 546, 577, 599, - 600, 601, 668, 0, 1, 233, 234, 404, 430, 432, 461, 468, 500, 507, 508, - 577, 668, 20, 24, 159, 163, 299, 336, 341, 365, 404, 406, 429, 430, 444, - 461, 509, 546, 550, 577, 613, 619, 668, 0, 1, 20, 24, 31, 38, 49, 157, - 159, 160, 163, 182, 194, 203, 218, 235, 236, 404, 432, 455, 456, 461, - 468, 500, 509, 510, 566, 577, 587, 613, 614, 619, 668, 0, 1, 159, 366, - 404, 430, 461, 468, 500, 511, 546, 577, 622, 641, 642, 644, 649, 668, 0, - 1, 159, 181, 182, 404, 430, 432, 461, 468, 500, 511, 512, 546, 590, 622, - 623, 624, 625, 641, 649, 650, 651, 668, 1, 154, 182, 220, 226, 237, 337, - 341, 367, 404, 429, 430, 432, 445, 450, 461, 513, 546, 566, 668, 237, - 238, 404, 430, 432, 461, 513, 514, 668, 1, 241, 339, 341, 368, 404, 432, - 446, 450, 461, 515, 546, 589, 623, 668, 242, 404, 432, 516, 668, 220, - 404, 450, 455, 461, 500, 517, 555, 556, 668, 0, 1, 2, 5, 8, 16, 17, 18, - 19, 21, 23, 28, 30, 47, 50, 61, 69, 70, 72, 89, 92, 99, 102, 105, 116, - 119, 129, 132, 140, 143, 156, 157, 158, 159, 165, 167, 172, 182, 198, - 200, 220, 221, 223, 245, 369, 385, 404, 429, 430, 431, 441, 442, 447, - 451, 455, 461, 466, 468, 469, 478, 487, 494, 495, 500, 518, 519, 520, - 524, 538, 546, 550, 554, 559, 561, 562, 563, 566, 575, 579, 582, 584, - 590, 591, 615, 623, 668, 0, 1, 182, 370, 404, 429, 430, 461, 468, 480, - 500, 519, 546, 554, 668, 0, 29, 159, 331, 341, 371, 385, 396, 404, 430, - 448, 461, 520, 522, 546, 569, 589, 668, 222, 404, 432, 450, 461, 520, - 521, 546, 585, 586, 668, 404, 432, 461, 520, 521, 522, 529, 530, 668, - 156, 159, 181, 221, 226, 341, 372, 385, 389, 393, 404, 429, 430, 449, - 461, 496, 499, 523, 524, 546, 550, 555, 560, 562, 569, 571, 577, 580, - 589, 668, 0, 14, 17, 156, 159, 218, 221, 226, 228, 404, 433, 441, 450, - 451, 461, 493, 499, 518, 524, 550, 552, 560, 561, 562, 563, 566, 567, - 569, 577, 580, 581, 584, 589, 590, 613, 668, 404, 461, 500, 525, 563, - 573, 613, 668, 1, 373, 404, 430, 461, 468, 500, 526, 546, 550, 649, 651, - 661, 668, 226, 404, 430, 432, 450, 461, 526, 527, 550, 650, 652, 656, - 668, 1, 226, 227, 404, 432, 450, 461, 528, 668, 0, 29, 341, 374, 396, - 404, 430, 453, 461, 522, 529, 546, 577, 589, 668, 404, 432, 461, 530, - 585, 586, 668, 157, 182, 219, 404, 450, 461, 500, 531, 587, 618, 668, 0, - 330, 341, 375, 404, 430, 461, 498, 532, 546, 577, 668, 225, 404, 432, - 461, 532, 533, 546, 668, 404, 461, 468, 500, 534, 607, 668, 0, 1, 376, - 404, 430, 454, 461, 468, 500, 535, 546, 577, 604, 668, 1, 215, 404, 430, - 450, 461, 468, 500, 535, 536, 577, 592, 593, 603, 611, 668, 0, 1, 21, - 24, 73, 156, 181, 182, 194, 218, 227, 235, 243, 341, 377, 404, 406, 429, - 430, 432, 441, 450, 451, 455, 456, 457, 458, 461, 469, 499, 500, 509, - 537, 538, 539, 540, 544, 546, 548, 550, 551, 556, 560, 563, 566, 567, - 569, 573, 575, 577, 587, 589, 613, 614, 615, 616, 618, 619, 622, 667, - 668, 0, 156, 157, 218, 220, 243, 404, 429, 430, 432, 433, 442, 450, 451, - 455, 456, 457, 461, 493, 494, 499, 500, 518, 524, 537, 538, 546, 548, - 550, 551, 553, 554, 561, 563, 566, 569, 575, 577, 578, 584, 587, 590, - 613, 614, 622, 668, 31, 195, 378, 404, 430, 458, 461, 468, 470, 500, - 539, 546, 617, 668, 404, 430, 432, 455, 457, 461, 468, 500, 538, 539, - 540, 546, 614, 616, 668, 404, 451, 461, 500, 541, 613, 618, 668, 404, - 432, 450, 451, 461, 542, 566, 620, 621, 668, 404, 461, 500, 543, 664, - 668, 404, 450, 455, 461, 493, 500, 544, 566, 613, 650, 666, 668, 0, 2, - 3, 5, 6, 8, 9, 14, 16, 17, 19, 20, 22, 24, 27, 31, 34, 37, 41, 43, 45, - 47, 48, 50, 51, 59, 61, 62, 64, 65, 67, 69, 70, 72, 73, 75, 83, 85, 87, - 89, 90, 92, 93, 97, 99, 100, 102, 103, 105, 106, 111, 114, 116, 117, - 119, 120, 125, 127, 129, 130, 132, 133, 138, 140, 141, 143, 144, 149, - 151, 153, 156, 158, 159, 161, 165, 168, 170, 172, 174, 176, 178, 180, - 181, 183, 186, 188, 190, 191, 193, 195, 198, 201, 203, 206, 211, 212, - 215, 218, 221, 223, 225, 226, 228, 230, 232, 233, 235, 239, 379, 404, - 429, 430, 431, 432, 433, 437, 441, 443, 450, 455, 457, 459, 475, 478, - 485, 488, 490, 493, 496, 499, 502, 507, 509, 511, 513, 515, 518, 519, - 520, 523, 526, 529, 532, 535, 537, 539, 545, 546, 547, 552, 555, 557, - 560, 562, 564, 566, 569, 573, 579, 580, 582, 585, 587, 589, 591, 592, - 602, 604, 607, 611, 615, 616, 618, 620, 622, 624, 626, 628, 630, 633, - 635, 638, 641, 643, 647, 649, 651, 653, 656, 658, 662, 664, 666, 668, 0, - 2, 3, 5, 6, 8, 9, 14, 16, 17, 19, 20, 22, 24, 27, 31, 34, 37, 41, 43, - 45, 47, 48, 50, 51, 59, 61, 62, 64, 65, 67, 69, 70, 72, 73, 75, 83, 85, - 87, 89, 90, 92, 93, 97, 99, 100, 102, 103, 105, 106, 111, 114, 116, 117, - 119, 120, 125, 127, 129, 130, 132, 133, 138, 140, 141, 143, 144, 149, - 151, 153, 156, 158, 159, 161, 165, 168, 170, 172, 174, 176, 178, 180, - 181, 183, 186, 188, 190, 191, 193, 195, 198, 201, 203, 206, 211, 212, - 215, 218, 221, 223, 225, 226, 228, 230, 232, 233, 235, 239, 404, 429, - 431, 432, 437, 441, 443, 450, 455, 457, 459, 475, 478, 485, 488, 490, - 493, 496, 499, 502, 507, 509, 511, 513, 515, 518, 519, 520, 523, 526, - 529, 532, 535, 537, 539, 545, 546, 552, 555, 557, 560, 562, 564, 566, - 569, 573, 579, 580, 582, 585, 587, 589, 591, 592, 602, 604, 607, 611, - 615, 616, 618, 620, 622, 624, 626, 628, 630, 633, 635, 638, 641, 643, - 647, 649, 651, 653, 656, 658, 662, 664, 666, 668, 404, 429, 430, 432, - 433, 499, 545, 546, 547, 668, 1, 2, 5, 8, 16, 19, 21, 47, 50, 61, 69, - 72, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 157, 158, 182, - 220, 223, 236, 380, 404, 430, 431, 442, 451, 456, 461, 500, 538, 548, - 549, 551, 553, 567, 570, 575, 579, 581, 582, 591, 614, 615, 619, 623, - 663, 668, 1, 2, 5, 8, 16, 19, 21, 47, 50, 61, 69, 72, 89, 92, 99, 102, - 105, 116, 119, 129, 132, 140, 143, 157, 158, 182, 220, 223, 236, 404, - 430, 431, 442, 451, 456, 461, 500, 538, 548, 549, 551, 553, 567, 570, - 575, 579, 581, 582, 591, 614, 615, 619, 623, 663, 668, 0, 1, 2, 3, 5, 8, - 14, 15, 16, 17, 18, 19, 21, 22, 23, 24, 25, 27, 37, 38, 39, 41, 45, 47, - 48, 49, 50, 51, 52, 55, 56, 59, 61, 67, 69, 70, 72, 74, 78, 81, 87, 89, - 90, 91, 92, 93, 94, 95, 96, 97, 99, 100, 102, 103, 105, 107, 110, 114, - 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 127, 129, 130, 132, - 138, 140, 141, 142, 143, 145, 146, 147, 149, 156, 157, 158, 159, 160, - 161, 162, 165, 181, 182, 187, 215, 218, 221, 222, 223, 224, 226, 227, - 228, 235, 243, 381, 404, 429, 431, 432, 433, 439, 441, 442, 450, 451, - 455, 456, 478, 479, 493, 499, 509, 518, 523, 534, 537, 538, 546, 548, - 550, 551, 552, 553, 554, 555, 556, 557, 560, 561, 562, 563, 566, 567, - 569, 570, 571, 573, 574, 577, 578, 579, 580, 581, 582, 583, 584, 586, - 587, 589, 590, 591, 602, 607, 608, 611, 613, 615, 616, 618, 619, 622, - 624, 625, 642, 647, 648, 649, 650, 651, 652, 656, 657, 663, 668, 2, 5, - 8, 14, 16, 17, 19, 47, 50, 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, - 129, 132, 140, 143, 156, 158, 159, 215, 218, 221, 223, 226, 228, 243, - 404, 431, 432, 441, 450, 455, 493, 499, 546, 548, 550, 551, 552, 553, - 555, 557, 560, 562, 566, 569, 573, 579, 580, 582, 587, 589, 591, 615, - 668, 0, 2, 5, 8, 14, 16, 17, 19, 20, 47, 50, 61, 69, 72, 89, 92, 99, - 102, 105, 111, 116, 119, 129, 132, 140, 143, 156, 158, 159, 182, 194, - 198, 218, 221, 223, 226, 228, 243, 381, 382, 404, 429, 431, 433, 441, - 450, 455, 461, 478, 479, 493, 499, 517, 518, 519, 524, 546, 548, 550, - 551, 552, 553, 554, 555, 556, 557, 560, 561, 562, 566, 569, 571, 573, - 575, 577, 578, 579, 580, 582, 584, 585, 587, 589, 590, 591, 607, 613, - 615, 668, 0, 14, 17, 156, 159, 218, 221, 222, 226, 228, 243, 404, 432, - 441, 450, 455, 493, 499, 546, 548, 550, 551, 552, 553, 555, 560, 561, - 562, 566, 569, 575, 577, 580, 587, 589, 613, 668, 0, 2, 5, 8, 14, 16, - 17, 19, 20, 47, 50, 61, 69, 72, 89, 92, 99, 102, 105, 111, 116, 119, - 129, 132, 140, 143, 156, 158, 159, 194, 198, 218, 223, 226, 228, 404, - 430, 431, 432, 433, 441, 450, 461, 478, 493, 499, 518, 519, 524, 550, - 551, 552, 553, 554, 555, 557, 560, 561, 562, 563, 566, 569, 577, 579, - 582, 584, 589, 590, 591, 613, 615, 668, 1, 182, 220, 226, 383, 429, 430, - 450, 455, 461, 500, 523, 546, 550, 552, 555, 556, 560, 569, 571, 577, - 578, 580, 585, 589, 404, 430, 450, 455, 555, 556, 578, 668, 0, 1, 17, - 20, 23, 24, 39, 70, 182, 215, 221, 384, 404, 429, 450, 461, 493, 500, - 518, 546, 550, 551, 554, 557, 558, 559, 566, 589, 623, 668, 182, 404, - 557, 558, 668, 23, 24, 39, 215, 404, 432, 450, 461, 493, 500, 554, 557, - 559, 566, 668, 0, 1, 2, 14, 15, 17, 21, 22, 27, 156, 157, 159, 172, 181, - 182, 215, 218, 220, 221, 222, 226, 227, 341, 381, 385, 404, 429, 430, - 431, 432, 433, 439, 441, 442, 450, 451, 455, 461, 493, 494, 499, 500, - 518, 519, 520, 521, 522, 523, 524, 527, 534, 537, 546, 550, 551, 552, - 553, 554, 555, 560, 561, 562, 563, 566, 567, 569, 571, 573, 577, 578, - 580, 581, 583, 584, 585, 589, 590, 609, 613, 614, 623, 668, 0, 14, 17, - 156, 159, 221, 222, 226, 227, 228, 404, 430, 432, 433, 441, 450, 455, - 493, 499, 518, 519, 546, 550, 551, 552, 553, 560, 561, 562, 566, 569, - 577, 578, 580, 589, 613, 668, 0, 1, 15, 18, 21, 156, 157, 159, 172, 173, - 181, 182, 218, 220, 221, 222, 227, 341, 385, 386, 404, 429, 430, 431, - 432, 433, 441, 442, 448, 450, 451, 455, 461, 466, 468, 493, 494, 495, - 499, 500, 523, 524, 546, 551, 553, 554, 560, 561, 562, 563, 564, 565, - 566, 567, 568, 569, 577, 578, 581, 584, 589, 590, 609, 610, 613, 668, - 14, 15, 17, 156, 159, 172, 220, 221, 222, 227, 404, 430, 432, 433, 441, - 450, 451, 455, 461, 493, 494, 499, 500, 518, 520, 524, 546, 550, 551, - 553, 554, 560, 561, 562, 563, 564, 566, 569, 577, 578, 580, 581, 584, - 590, 613, 668, 221, 387, 404, 461, 500, 546, 564, 565, 566, 668, 404, - 461, 500, 564, 565, 668, 1, 2, 5, 8, 16, 18, 19, 21, 23, 25, 28, 33, 35, - 36, 38, 47, 49, 50, 54, 58, 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, - 129, 132, 140, 143, 154, 156, 157, 158, 160, 167, 181, 182, 197, 217, - 218, 219, 220, 221, 223, 224, 227, 229, 243, 341, 386, 388, 404, 429, - 430, 431, 432, 433, 442, 451, 455, 456, 461, 466, 468, 469, 479, 480, - 494, 495, 499, 500, 501, 506, 510, 524, 538, 542, 544, 546, 548, 551, - 553, 554, 559, 560, 561, 562, 563, 566, 567, 568, 569, 575, 577, 578, - 579, 581, 582, 584, 588, 589, 590, 591, 593, 603, 605, 606, 610, 614, - 615, 619, 622, 623, 648, 665, 668, 1, 2, 5, 8, 14, 16, 18, 19, 21, 25, - 35, 47, 49, 50, 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, 129, 132, - 140, 143, 156, 157, 158, 159, 218, 219, 220, 223, 227, 229, 243, 404, - 430, 431, 432, 433, 441, 442, 450, 451, 455, 456, 461, 466, 468, 479, - 494, 495, 499, 500, 524, 538, 546, 548, 551, 553, 554, 560, 561, 562, - 563, 566, 567, 569, 575, 577, 578, 579, 581, 582, 584, 588, 589, 590, - 591, 593, 614, 615, 619, 622, 668, 0, 2, 5, 8, 16, 18, 19, 21, 23, 28, - 33, 35, 36, 47, 49, 50, 54, 58, 61, 69, 72, 89, 92, 99, 102, 105, 116, - 119, 129, 132, 140, 143, 156, 157, 158, 160, 167, 182, 197, 217, 218, - 219, 220, 223, 404, 431, 432, 441, 442, 450, 451, 455, 456, 461, 466, - 468, 469, 480, 495, 499, 500, 501, 506, 510, 524, 538, 542, 544, 554, - 559, 560, 561, 562, 563, 566, 567, 568, 579, 582, 584, 589, 590, 591, - 603, 605, 606, 615, 648, 665, 668, 0, 1, 2, 5, 8, 14, 15, 16, 17, 18, - 19, 20, 21, 47, 49, 50, 61, 69, 72, 74, 89, 92, 99, 102, 105, 116, 119, - 129, 132, 140, 143, 156, 157, 158, 159, 160, 181, 182, 198, 215, 218, - 221, 222, 223, 225, 226, 227, 228, 229, 243, 381, 389, 393, 404, 429, - 430, 431, 433, 440, 441, 442, 449, 450, 451, 456, 461, 493, 494, 496, - 497, 499, 518, 523, 524, 538, 546, 548, 550, 551, 552, 553, 555, 556, - 560, 561, 562, 563, 566, 567, 569, 570, 571, 572, 573, 575, 577, 578, - 579, 580, 581, 582, 584, 585, 587, 589, 590, 591, 611, 613, 614, 615, - 617, 618, 622, 656, 663, 668, 1, 2, 5, 8, 15, 16, 18, 19, 21, 47, 49, - 50, 61, 69, 72, 74, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, - 157, 158, 160, 182, 215, 221, 222, 223, 226, 227, 228, 229, 243, 404, - 429, 430, 431, 432, 433, 441, 442, 451, 456, 461, 493, 494, 523, 524, - 538, 546, 548, 550, 551, 552, 553, 555, 560, 561, 563, 567, 569, 570, - 571, 572, 574, 575, 577, 578, 579, 580, 581, 582, 590, 591, 614, 615, - 617, 622, 663, 668, 159, 181, 221, 226, 390, 429, 430, 461, 523, 550, - 555, 560, 569, 571, 577, 578, 579, 580, 581, 585, 589, 404, 429, 432, - 524, 550, 560, 571, 572, 577, 581, 584, 668, 0, 1, 221, 381, 391, 404, - 406, 429, 430, 461, 500, 525, 537, 546, 550, 560, 569, 573, 577, 613, - 615, 616, 618, 668, 1, 404, 430, 456, 538, 550, 560, 561, 573, 574, 577, - 613, 614, 619, 668, 1, 2, 5, 8, 16, 19, 21, 47, 50, 61, 69, 72, 89, 92, - 99, 102, 105, 116, 119, 129, 132, 140, 143, 157, 158, 182, 223, 236, - 244, 392, 404, 431, 442, 451, 456, 461, 466, 468, 495, 500, 538, 549, - 553, 567, 570, 575, 576, 579, 581, 582, 591, 614, 615, 619, 623, 668, 1, - 2, 5, 8, 16, 19, 21, 47, 50, 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, - 129, 132, 140, 143, 157, 158, 182, 223, 236, 244, 404, 431, 442, 451, - 456, 461, 466, 468, 495, 500, 538, 549, 553, 567, 570, 575, 576, 579, - 581, 582, 591, 614, 615, 619, 623, 668, 0, 1, 2, 3, 5, 6, 7, 8, 10, 11, - 12, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 27, 34, 37, 41, 43, - 45, 46, 47, 48, 49, 50, 52, 54, 55, 59, 61, 62, 64, 67, 69, 70, 71, 72, - 74, 76, 81, 83, 86, 87, 89, 90, 91, 92, 94, 95, 97, 99, 100, 102, 103, - 105, 107, 108, 114, 116, 117, 118, 119, 121, 122, 125, 127, 129, 130, - 132, 134, 135, 138, 140, 141, 142, 143, 145, 146, 149, 151, 153, 156, - 157, 158, 159, 160, 162, 163, 171, 180, 181, 182, 198, 211, 213, 214, - 215, 218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 233, - 234, 235, 236, 239, 240, 241, 243, 244, 393, 404, 429, 430, 431, 432, - 433, 437, 439, 441, 442, 450, 451, 452, 455, 456, 461, 468, 474, 475, - 477, 493, 495, 496, 499, 500, 501, 507, 508, 509, 510, 511, 517, 518, - 523, 524, 529, 532, 535, 536, 537, 538, 542, 546, 549, 550, 551, 552, - 553, 554, 555, 556, 560, 561, 562, 563, 566, 567, 568, 569, 570, 571, - 572, 573, 574, 576, 577, 578, 579, 580, 581, 582, 583, 584, 585, 587, - 588, 589, 590, 591, 592, 593, 602, 603, 604, 608, 611, 612, 613, 614, - 615, 616, 618, 619, 620, 621, 622, 623, 624, 625, 626, 633, 638, 642, - 647, 648, 649, 650, 651, 652, 653, 655, 656, 657, 658, 659, 660, 662, - 663, 664, 665, 667, 668, 0, 1, 2, 5, 8, 14, 16, 17, 19, 20, 24, 47, 50, - 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 156, - 157, 158, 159, 198, 215, 218, 221, 222, 223, 225, 226, 227, 228, 229, - 243, 404, 429, 430, 431, 432, 441, 450, 455, 493, 499, 546, 551, 552, - 553, 555, 560, 562, 566, 569, 571, 577, 578, 579, 580, 581, 582, 585, - 587, 589, 590, 591, 615, 618, 620, 662, 668, 0, 1, 2, 21, 23, 74, 76, - 86, 156, 159, 162, 182, 218, 221, 224, 226, 244, 429, 430, 432, 442, - 456, 461, 468, 477, 493, 495, 500, 546, 549, 550, 551, 554, 567, 568, - 569, 570, 576, 577, 578, 579, 580, 614, 619, 623, 663, 665, 667, 668, 0, - 1, 2, 14, 15, 17, 20, 21, 22, 23, 24, 46, 49, 74, 76, 86, 156, 157, 159, - 160, 162, 163, 181, 182, 194, 212, 215, 218, 219, 221, 222, 224, 226, - 227, 228, 229, 236, 238, 239, 243, 244, 393, 394, 404, 429, 430, 432, - 433, 441, 442, 450, 451, 455, 456, 461, 468, 477, 493, 494, 495, 499, - 500, 501, 504, 518, 523, 536, 546, 548, 549, 550, 551, 552, 553, 554, - 555, 560, 561, 562, 563, 566, 567, 568, 569, 570, 571, 575, 576, 577, - 578, 579, 580, 581, 582, 583, 584, 585, 589, 590, 592, 593, 603, 605, - 613, 614, 615, 618, 619, 620, 621, 622, 623, 650, 652, 663, 664, 665, - 667, 668, 0, 14, 20, 24, 156, 159, 163, 194, 212, 215, 218, 219, 222, - 227, 228, 229, 238, 243, 404, 430, 433, 441, 451, 455, 494, 499, 504, - 546, 548, 550, 551, 553, 560, 561, 562, 566, 569, 571, 575, 577, 578, - 580, 581, 589, 590, 613, 621, 622, 668, 1, 21, 23, 74, 76, 86, 162, 182, - 224, 244, 430, 442, 456, 461, 468, 477, 495, 500, 546, 549, 551, 554, - 567, 568, 570, 576, 578, 579, 580, 582, 614, 619, 623, 663, 665, 667, - 22, 156, 163, 181, 194, 212, 218, 226, 341, 393, 394, 395, 398, 429, - 432, 441, 442, 450, 452, 499, 504, 550, 555, 577, 580, 581, 583, 589, 0, - 14, 17, 156, 159, 221, 226, 228, 404, 432, 433, 441, 450, 461, 493, 499, - 518, 550, 552, 560, 561, 562, 566, 569, 577, 580, 581, 584, 589, 613, - 668, 0, 1, 125, 149, 156, 221, 329, 393, 396, 404, 429, 439, 461, 493, - 499, 521, 529, 530, 546, 550, 557, 569, 571, 577, 580, 585, 589, 668, - 222, 226, 228, 404, 432, 520, 529, 546, 561, 569, 580, 586, 668, 0, 1, - 14, 17, 49, 156, 157, 160, 182, 219, 226, 229, 235, 331, 336, 393, 397, - 404, 406, 429, 430, 450, 451, 455, 461, 499, 500, 509, 531, 546, 551, - 553, 566, 577, 578, 587, 588, 589, 593, 613, 614, 615, 618, 619, 623, - 668, 1, 219, 229, 236, 404, 430, 451, 455, 510, 551, 553, 566, 577, 578, - 580, 587, 588, 668, 0, 1, 2, 14, 15, 17, 20, 21, 22, 23, 24, 27, 29, 31, - 32, 33, 34, 38, 39, 63, 74, 76, 86, 156, 157, 159, 160, 162, 174, 177, - 179, 181, 182, 194, 206, 207, 208, 215, 216, 217, 218, 219, 220, 221, - 222, 224, 225, 226, 227, 228, 229, 232, 235, 241, 244, 341, 393, 398, - 404, 429, 430, 431, 432, 433, 441, 442, 450, 451, 452, 454, 455, 456, - 460, 461, 466, 468, 477, 493, 494, 495, 498, 499, 500, 501, 504, 505, - 506, 517, 518, 523, 524, 529, 530, 531, 532, 533, 535, 537, 538, 542, - 543, 546, 549, 550, 551, 553, 554, 555, 556, 557, 560, 561, 562, 563, - 566, 567, 568, 569, 570, 571, 572, 576, 577, 578, 579, 580, 581, 583, - 584, 585, 589, 590, 591, 593, 603, 604, 613, 614, 618, 619, 620, 621, - 622, 623, 650, 653, 662, 663, 665, 667, 668, 0, 14, 15, 17, 34, 156, - 159, 174, 206, 215, 218, 221, 222, 226, 227, 228, 232, 404, 430, 432, - 433, 441, 450, 451, 455, 461, 493, 499, 518, 546, 550, 551, 552, 553, - 554, 560, 561, 562, 566, 569, 577, 578, 580, 584, 589, 590, 613, 622, - 624, 647, 662, 668, 0, 1, 21, 23, 74, 76, 86, 156, 162, 181, 182, 218, - 221, 224, 244, 429, 430, 431, 432, 442, 450, 456, 461, 468, 477, 493, - 495, 500, 546, 549, 551, 554, 567, 568, 570, 576, 578, 579, 591, 614, - 619, 623, 663, 665, 667, 0, 1, 21, 52, 64, 74, 83, 151, 152, 182, 233, - 234, 399, 404, 430, 450, 455, 461, 468, 493, 500, 508, 534, 536, 546, - 550, 566, 577, 580, 592, 593, 594, 596, 600, 601, 602, 603, 605, 607, - 608, 609, 610, 611, 612, 622, 668, 1, 20, 24, 64, 151, 215, 218, 228, - 233, 234, 404, 430, 432, 450, 455, 507, 546, 566, 577, 580, 587, 589, - 592, 593, 602, 604, 607, 611, 622, 668, 20, 24, 404, 461, 468, 475, 500, - 593, 594, 603, 605, 668, 20, 24, 404, 595, 603, 606, 668, 24, 404, 596, - 605, 668, 52, 64, 404, 461, 468, 500, 592, 597, 668, 74, 83, 404, 461, - 468, 500, 592, 598, 668, 24, 182, 218, 404, 432, 461, 468, 500, 507, - 508, 592, 593, 599, 603, 605, 668, 180, 218, 404, 430, 600, 603, 668, - 180, 215, 218, 404, 461, 468, 500, 601, 603, 605, 668, 0, 1, 180, 400, - 404, 430, 450, 454, 461, 500, 507, 534, 535, 536, 546, 550, 566, 577, - 595, 602, 604, 605, 606, 609, 610, 668, 1, 20, 24, 180, 215, 218, 404, - 430, 432, 450, 455, 461, 493, 500, 508, 535, 536, 546, 566, 577, 580, - 592, 602, 603, 668, 180, 215, 401, 404, 430, 455, 461, 500, 546, 566, - 577, 604, 606, 668, 20, 24, 215, 218, 404, 430, 432, 450, 461, 500, 566, - 580, 593, 602, 604, 605, 668, 20, 215, 404, 432, 455, 461, 500, 566, - 603, 604, 606, 668, 0, 402, 404, 430, 461, 468, 500, 534, 546, 550, 602, - 607, 608, 609, 610, 611, 668, 0, 404, 430, 577, 607, 608, 668, 404, 566, - 593, 603, 609, 668, 404, 566, 603, 605, 610, 668, 1, 403, 404, 430, 450, - 461, 500, 535, 536, 546, 550, 577, 580, 592, 602, 604, 611, 668, 1, 228, - 404, 430, 450, 535, 546, 577, 580, 587, 589, 593, 603, 605, 608, 611, - 612, 668, 0, 1, 2, 5, 8, 14, 15, 16, 17, 18, 19, 20, 21, 23, 25, 41, 43, - 44, 47, 50, 52, 54, 61, 65, 66, 69, 72, 73, 74, 76, 85, 86, 89, 92, 99, - 102, 105, 116, 119, 129, 132, 140, 143, 156, 157, 158, 159, 160, 162, - 181, 182, 194, 218, 220, 221, 222, 223, 224, 227, 235, 236, 243, 244, - 404, 406, 429, 430, 431, 432, 442, 443, 450, 451, 455, 456, 461, 468, - 469, 477, 493, 494, 495, 499, 500, 509, 510, 518, 524, 537, 538, 539, - 540, 546, 548, 549, 550, 551, 553, 554, 560, 561, 563, 566, 567, 568, - 569, 570, 573, 574, 575, 576, 577, 578, 579, 580, 581, 582, 584, 587, - 588, 589, 590, 591, 613, 614, 615, 616, 617, 618, 619, 620, 621, 622, - 623, 624, 642, 647, 650, 663, 665, 666, 667, 668, 0, 1, 2, 5, 8, 14, 15, - 16, 17, 18, 19, 20, 22, 24, 43, 47, 48, 50, 51, 61, 69, 70, 72, 73, 89, - 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 156, 157, 158, 159, 181, - 194, 218, 222, 223, 227, 235, 236, 243, 404, 429, 430, 431, 432, 433, - 437, 441, 442, 443, 451, 455, 456, 494, 499, 537, 538, 539, 546, 548, - 551, 553, 560, 561, 563, 566, 569, 573, 575, 577, 578, 579, 580, 581, - 582, 587, 589, 590, 591, 613, 614, 615, 616, 618, 620, 622, 624, 647, - 666, 668, 0, 1, 21, 23, 74, 76, 86, 162, 182, 224, 226, 244, 429, 430, - 442, 456, 461, 468, 477, 495, 500, 546, 549, 550, 551, 554, 567, 568, - 570, 576, 577, 578, 580, 613, 614, 615, 619, 623, 663, 665, 667, 668, 0, - 404, 407, 429, 430, 455, 461, 468, 500, 537, 540, 546, 550, 569, 577, - 613, 616, 617, 618, 668, 31, 34, 195, 215, 404, 430, 455, 539, 546, 569, - 587, 614, 616, 617, 619, 668, 0, 1, 2, 5, 8, 16, 19, 47, 50, 61, 69, 72, - 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 156, 158, 163, 182, - 194, 203, 212, 223, 235, 243, 393, 404, 406, 408, 429, 430, 431, 461, - 500, 537, 541, 542, 546, 548, 550, 566, 569, 573, 575, 577, 579, 580, - 582, 587, 588, 589, 591, 613, 615, 616, 618, 619, 620, 621, 663, 667, - 668, 1, 2, 5, 8, 16, 19, 20, 24, 47, 50, 61, 69, 72, 89, 92, 99, 102, - 105, 116, 119, 129, 132, 140, 143, 158, 163, 194, 203, 212, 223, 226, - 227, 243, 404, 429, 430, 431, 455, 456, 538, 546, 548, 550, 566, 575, - 577, 578, 579, 580, 581, 582, 587, 589, 590, 591, 613, 614, 615, 618, - 619, 620, 621, 667, 668, 0, 1, 203, 227, 229, 393, 404, 408, 409, 430, - 450, 451, 461, 542, 546, 566, 577, 578, 580, 589, 613, 615, 618, 619, - 620, 621, 668, 226, 229, 404, 429, 430, 432, 546, 578, 580, 620, 621, - 668, 1, 2, 5, 8, 16, 19, 20, 21, 23, 24, 25, 47, 49, 50, 52, 54, 61, 69, - 72, 74, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 156, 157, - 158, 159, 162, 181, 182, 220, 223, 226, 228, 236, 243, 404, 410, 430, - 431, 442, 447, 450, 451, 456, 461, 468, 495, 500, 511, 512, 527, 538, - 544, 546, 548, 550, 566, 567, 569, 570, 575, 577, 579, 580, 581, 582, - 589, 590, 591, 593, 614, 615, 622, 623, 624, 625, 626, 627, 629, 636, - 638, 642, 646, 647, 648, 650, 656, 657, 658, 659, 662, 663, 665, 666, - 667, 668, 0, 1, 2, 5, 8, 16, 17, 19, 20, 21, 22, 24, 31, 47, 48, 50, 51, - 61, 69, 70, 72, 73, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, - 156, 157, 158, 159, 161, 181, 193, 215, 218, 223, 226, 236, 243, 404, - 429, 430, 431, 432, 437, 442, 450, 451, 456, 493, 511, 515, 518, 538, - 546, 548, 550, 557, 560, 566, 567, 570, 575, 577, 579, 581, 582, 587, - 589, 591, 593, 613, 614, 615, 622, 623, 624, 625, 626, 628, 635, 642, - 647, 648, 649, 653, 656, 662, 663, 664, 666, 667, 668, 0, 1, 404, 411, - 430, 461, 468, 500, 511, 512, 546, 550, 577, 590, 614, 624, 626, 627, - 633, 634, 641, 642, 647, 668, 0, 1, 14, 156, 404, 430, 432, 511, 546, - 550, 577, 614, 623, 624, 625, 647, 648, 649, 656, 663, 666, 668, 1, 20, - 404, 412, 430, 461, 468, 500, 546, 577, 622, 626, 628, 629, 630, 631, - 633, 634, 638, 639, 668, 0, 1, 17, 20, 21, 404, 430, 432, 511, 546, 622, - 623, 626, 627, 628, 633, 641, 642, 668, 1, 20, 404, 413, 430, 461, 468, - 500, 546, 622, 628, 630, 631, 632, 668, 0, 1, 20, 21, 23, 193, 404, 430, - 432, 461, 468, 500, 546, 622, 623, 626, 627, 628, 629, 630, 641, 642, - 643, 668, 1, 24, 404, 414, 430, 461, 500, 546, 622, 630, 632, 668, 0, 1, - 20, 22, 23, 25, 404, 430, 461, 468, 500, 622, 623, 628, 630, 631, 643, - 644, 668, 0, 24, 25, 193, 404, 432, 461, 500, 622, 623, 629, 630, 632, - 645, 668, 1, 404, 415, 430, 461, 500, 546, 577, 633, 635, 636, 637, 638, - 639, 640, 668, 0, 1, 48, 49, 52, 404, 430, 546, 622, 623, 628, 629, 633, - 634, 635, 638, 668, 1, 404, 416, 430, 461, 500, 546, 635, 637, 668, 0, - 1, 51, 52, 54, 162, 404, 430, 437, 461, 500, 622, 623, 630, 631, 633, - 635, 636, 668, 0, 54, 161, 162, 404, 461, 500, 622, 623, 632, 635, 637, - 668, 404, 417, 430, 461, 500, 546, 577, 638, 640, 668, 0, 1, 70, 74, - 404, 430, 622, 623, 635, 636, 638, 639, 668, 0, 20, 74, 404, 461, 500, - 622, 627, 629, 637, 638, 640, 668, 0, 1, 181, 404, 418, 430, 450, 461, - 500, 546, 622, 641, 643, 644, 645, 651, 668, 0, 1, 181, 182, 193, 404, - 430, 432, 461, 468, 500, 511, 512, 546, 550, 577, 613, 622, 623, 641, - 642, 643, 647, 651, 652, 653, 654, 668, 1, 404, 419, 430, 461, 468, 500, - 546, 643, 645, 668, 0, 1, 220, 404, 430, 450, 461, 500, 622, 641, 643, - 644, 653, 668, 0, 218, 220, 404, 461, 468, 500, 622, 623, 643, 645, 655, - 668, 404, 515, 623, 646, 668, 0, 1, 73, 182, 341, 404, 410, 420, 430, - 460, 461, 468, 500, 546, 550, 577, 590, 614, 623, 642, 647, 649, 650, - 651, 652, 653, 668, 0, 21, 156, 404, 429, 430, 432, 450, 461, 468, 500, - 546, 550, 566, 577, 590, 614, 622, 623, 630, 641, 643, 647, 648, 649, - 651, 653, 668, 0, 1, 341, 404, 420, 421, 430, 461, 468, 500, 546, 550, - 577, 649, 651, 652, 653, 654, 668, 0, 1, 21, 25, 404, 430, 432, 461, - 468, 500, 546, 550, 577, 580, 590, 613, 623, 647, 649, 650, 651, 653, - 668, 0, 1, 25, 221, 226, 341, 404, 421, 422, 430, 450, 461, 546, 550, - 577, 651, 653, 654, 655, 668, 0, 1, 21, 25, 182, 220, 404, 430, 432, - 461, 468, 500, 550, 577, 580, 648, 649, 651, 652, 653, 668, 1, 21, 25, - 182, 220, 221, 341, 404, 422, 423, 430, 450, 461, 500, 546, 577, 653, - 655, 668, 0, 226, 404, 430, 432, 450, 461, 651, 653, 654, 668, 0, 404, - 432, 450, 461, 500, 577, 652, 653, 654, 655, 668, 1, 226, 404, 424, 430, - 450, 461, 526, 527, 546, 550, 577, 624, 647, 656, 658, 660, 661, 668, 1, - 404, 430, 526, 546, 550, 560, 577, 623, 648, 656, 657, 659, 668, 404, - 425, 430, 461, 468, 500, 546, 577, 658, 660, 668, 0, 1, 404, 430, 447, - 493, 495, 518, 526, 557, 577, 622, 623, 658, 659, 661, 668, 0, 404, 461, - 468, 493, 500, 577, 623, 658, 660, 661, 668, 0, 404, 432, 461, 468, 500, - 526, 527, 550, 566, 623, 652, 661, 668, 1, 2, 5, 8, 16, 19, 47, 50, 61, - 69, 72, 89, 92, 99, 102, 105, 116, 119, 129, 132, 140, 143, 158, 223, - 226, 228, 243, 404, 426, 430, 431, 459, 460, 461, 468, 471, 499, 500, - 511, 543, 546, 548, 566, 569, 577, 579, 580, 582, 589, 590, 591, 615, - 622, 624, 647, 649, 656, 662, 663, 664, 665, 667, 668, 0, 2, 5, 8, 14, - 16, 19, 47, 50, 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, 129, 132, - 140, 143, 156, 158, 159, 223, 226, 243, 404, 430, 431, 432, 499, 548, - 550, 569, 577, 579, 580, 582, 589, 591, 613, 615, 623, 625, 648, 657, - 662, 663, 667, 668, 404, 427, 461, 500, 543, 546, 589, 662, 664, 668, 2, - 5, 8, 16, 19, 31, 47, 50, 61, 69, 72, 89, 92, 99, 102, 105, 116, 119, - 129, 132, 140, 143, 158, 215, 223, 404, 430, 431, 432, 450, 459, 461, - 468, 500, 544, 546, 566, 577, 579, 580, 582, 590, 591, 615, 623, 650, - 652, 662, 663, 665, 668, 1, 2, 5, 8, 16, 19, 47, 50, 61, 69, 72, 89, 92, - 99, 102, 105, 116, 119, 129, 132, 140, 143, 158, 223, 404, 428, 430, - 431, 455, 461, 493, 500, 544, 546, 566, 579, 582, 591, 614, 615, 666, - 667, 668, 1, 2, 5, 8, 16, 19, 47, 50, 61, 69, 72, 89, 92, 99, 102, 105, - 116, 119, 129, 132, 140, 143, 158, 223, 404, 429, 430, 431, 579, 580, - 582, 587, 591, 614, 615, 623, 647, 666, 667, 668, 0, 1, 2, 3, 4, 5, 6, - 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, - 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 38, 39, 40, 42, 44, 45, 46, 47, - 48, 49, 50, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 63, 66, 67, 68, 69, - 70, 71, 72, 73, 74, 76, 77, 78, 80, 82, 84, 86, 87, 88, 89, 90, 91, 92, - 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, - 109, 110, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, - 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, - 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 152, - 154, 155, 156, 157, 158, 159, 160, 162, 163, 165, 166, 167, 169, 170, - 171, 173, 175, 177, 179, 181, 182, 184, 185, 187, 189, 192, 193, 195, - 196, 197, 198, 199, 200, 202, 203, 204, 205, 207, 208, 209, 210, 212, - 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 226, 227, - 228, 229, 231, 234, 235, 236, 237, 238, 240, 243, 244, 405, 429, 430, - 431, 432, 433, 434, 435, 436, 438, 440, 441, 442, 444, 445, 446, 447, - 448, 449, 450, 451, 453, 454, 455, 456, 458, 460, 461, 462, 463, 464, - 465, 466, 467, 468, 469, 470, 471, 472, 474, 476, 477, 479, 480, 481, - 482, 483, 484, 486, 487, 488, 489, 490, 491, 494, 495, 497, 498, 499, - 500, 501, 502, 503, 504, 505, 506, 508, 509, 510, 511, 512, 513, 514, - 516, 517, 519, 521, 522, 524, 525, 527, 528, 530, 531, 533, 534, 536, - 538, 539, 540, 541, 542, 543, 544, 545, 546, 547, 548, 549, 550, 551, - 553, 554, 555, 556, 557, 558, 559, 560, 561, 562, 563, 565, 566, 567, - 568, 569, 570, 571, 572, 574, 575, 576, 577, 578, 579, 580, 581, 582, - 584, 586, 587, 588, 589, 590, 591, 592, 593, 594, 595, 596, 597, 598, - 599, 600, 601, 603, 604, 605, 606, 608, 609, 610, 612, 613, 614, 615, - 616, 617, 618, 619, 621, 622, 623, 625, 627, 629, 631, 632, 634, 636, - 637, 639, 640, 641, 642, 644, 645, 646, 648, 649, 650, 651, 652, 654, - 655, 657, 659, 660, 661, 662, 663, 665, 667, 668 + 550, 551, 554, 555, 556, 557, 558, 559, 561, 562, 564, 567, 568, 571, + 575, 577, 579, 581, 582, 583, 590, 591, 592, 593, 594, 596, 597, 598, + 599, 600, 601, 602, 606, 609, 610, 613, 615, 616, 619, 622, 623, 625, + 626, 628, 629, 631, 633, 635, 636, 637, 638, 639, 640, 641, 643, 644, + 645, 648, 649, 651, 655, 656, 658, 660, 663, 664, 666, 667, 668, 1, 135, + 166, 196, 219, 233, 239, 260, 280, 296, 297, 303, 304, 305, 311, 315, + 316, 318, 324, 327, 333, 338, 340, 346, 347, 351, 352, 353, 357, 360, + 365, 367, 368, 371, 372, 373, 374, 375, 377, 380, 381, 382, 383, 384, + 385, 386, 387, 390, 392, 393, 396, 398, 399, 401, 402, 403, 407, 409, + 411, 412, 416, 417, 419, 420, 422, 423, 427, 429, 430, 434, 436, 437, + 440, 441, 442, 443, 444, 445, 453, 454, 455, 458, 460, 463, 464, 465, + 468, 469, 480, 485, 486, 495, 496, 499, 503, 505, 506, 517, 518, 519, + 520, 523, 524, 526, 527, 529, 532, 533, 534, 535, 536, 537, 538, 539, + 540, 541, 542, 543, 544, 545, 546, 547, 548, 549, 550, 551, 554, 555, + 556, 557, 558, 559, 561, 562, 564, 567, 568, 571, 575, 577, 579, 581, + 582, 583, 590, 591, 592, 593, 594, 596, 597, 598, 599, 600, 601, 602, + 606, 609, 610, 613, 615, 616, 619, 622, 623, 625, 626, 628, 629, 631, + 633, 635, 636, 637, 638, 639, 640, 641, 643, 644, 645, 648, 649, 651, + 655, 656, 658, 659, 660, 663, 664, 666, 667, 668, 135, 168, 196, 239, + 280, 296, 303, 304, 305, 311, 318, 324, 327, 333, 340, 346, 347, 352, + 357, 360, 365, 367, 368, 373, 374, 375, 377, 380, 381, 383, 385, 386, + 387, 390, 392, 396, 399, 401, 402, 403, 407, 409, 411, 412, 417, 419, + 420, 422, 423, 427, 429, 434, 436, 437, 440, 441, 442, 444, 445, 453, + 454, 455, 458, 460, 463, 464, 465, 468, 469, 480, 485, 486, 495, 496, + 499, 501, 502, 503, 505, 506, 508, 511, 512, 517, 518, 520, 523, 524, + 526, 527, 528, 529, 532, 533, 534, 535, 536, 537, 538, 539, 540, 541, + 542, 543, 544, 545, 546, 547, 548, 549, 550, 551, 554, 555, 556, 557, + 558, 559, 561, 562, 564, 567, 568, 572, 575, 578, 579, 580, 581, 582, + 583, 585, 588, 589, 590, 591, 592, 593, 594, 596, 597, 598, 599, 600, + 601, 602, 606, 609, 610, 613, 615, 616, 619, 622, 623, 625, 626, 629, + 631, 633, 635, 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 648, + 649, 651, 652, 654, 655, 657, 658, 660, 663, 664, 666, 667, 668, 130, + 175, 200, 208, 218, 229, 232, 235, 239, 240, 245, 250, 253, 260, 261, + 262, 270, 281, 298, 303, 311, 316, 321, 323, 324, 325, 333, 340, 342, + 345, 346, 352, 353, 359, 368, 369, 372, 373, 375, 380, 383, 386, 387, + 391, 393, 396, 398, 399, 401, 402, 407, 408, 409, 411, 419, 420, 429, + 431, 436, 437, 439, 441, 442, 443, 446, 447, 453, 454, 457, 458, 461, + 462, 464, 472, 476, 480, 484, 485, 491, 493, 494, 495, 498, 502, 503, + 505, 506, 508, 510, 511, 512, 514, 515, 516, 517, 518, 519, 520, 522, + 524, 526, 527, 528, 529, 530, 532, 533, 534, 535, 536, 537, 538, 539, + 540, 541, 542, 544, 545, 546, 547, 548, 549, 550, 552, 554, 555, 556, + 557, 558, 559, 560, 561, 562, 567, 568, 569, 572, 573, 574, 575, 577, + 578, 583, 585, 588, 589, 596, 599, 600, 605, 606, 607, 611, 612, 613, + 614, 615, 616, 618, 619, 622, 623, 624, 625, 626, 629, 630, 631, 633, + 634, 635, 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 646, 647, + 648, 650, 651, 653, 654, 655, 657, 658, 659, 661, 662, 664, 666, 667, + 668, 198, 260, 280, 297, 304, 305, 311, 315, 316, 324, 327, 334, 338, + 340, 346, 347, 351, 352, 353, 365, 367, 368, 370, 371, 372, 373, 374, + 375, 377, 380, 381, 382, 385, 387, 390, 392, 393, 396, 398, 399, 401, + 402, 403, 407, 409, 412, 416, 417, 419, 420, 422, 423, 427, 434, 436, + 437, 440, 441, 442, 443, 444, 445, 454, 458, 460, 463, 464, 465, 468, + 469, 480, 485, 495, 496, 499, 502, 503, 505, 506, 510, 515, 516, 517, + 518, 519, 520, 523, 524, 526, 527, 528, 529, 532, 533, 534, 535, 536, + 537, 538, 539, 540, 541, 542, 543, 544, 545, 546, 547, 548, 549, 550, + 551, 554, 555, 556, 557, 558, 559, 561, 562, 564, 567, 568, 572, 575, + 578, 579, 581, 582, 583, 585, 588, 590, 591, 592, 593, 594, 596, 597, + 598, 599, 600, 601, 602, 606, 609, 610, 613, 615, 616, 618, 619, 622, + 623, 625, 626, 629, 631, 633, 635, 636, 637, 638, 639, 640, 641, 642, + 643, 644, 645, 648, 651, 654, 655, 656, 658, 659, 662, 664, 666, 667, + 668, 84, 110, 111, 135, 155, 156, 168, 180, 182, 185, 186, 192, 196, + 205, 206, 220, 230, 232, 237, 239, 247, 248, 250, 252, 267, 268, 269, + 279, 281, 282, 288, 297, 302, 303, 311, 313, 314, 315, 316, 328, 333, + 338, 339, 340, 342, 343, 351, 352, 354, 355, 357, 360, 365, 368, 373, + 374, 375, 376, 377, 380, 382, 383, 384, 385, 386, 387, 392, 393, 395, + 396, 399, 403, 404, 406, 407, 409, 410, 412, 417, 418, 419, 420, 421, + 422, 428, 429, 430, 432, 433, 434, 435, 436, 437, 440, 441, 442, 445, + 447, 449, 450, 451, 452, 453, 454, 455, 456, 457, 458, 460, 464, 466, + 467, 468, 469, 473, 474, 476, 477, 479, 480, 481, 482, 483, 486, 487, + 489, 491, 492, 494, 495, 496, 499, 500, 501, 502, 505, 506, 508, 509, + 510, 511, 512, 513, 514, 515, 516, 517, 518, 519, 520, 523, 524, 525, + 526, 527, 528, 529, 530, 531, 532, 533, 534, 535, 536, 537, 538, 539, + 540, 541, 542, 543, 544, 545, 546, 547, 548, 549, 551, 552, 553, 554, + 555, 556, 557, 558, 559, 561, 562, 563, 564, 566, 567, 568, 569, 570, + 571, 572, 573, 574, 575, 577, 578, 579, 580, 581, 582, 584, 585, 586, + 587, 588, 589, 590, 591, 592, 593, 594, 595, 596, 597, 598, 599, 600, + 601, 602, 603, 604, 605, 606, 607, 608, 609, 610, 611, 612, 613, 614, + 615, 616, 617, 618, 619, 620, 621, 622, 623, 624, 625, 626, 627, 628, + 629, 630, 631, 632, 633, 634, 635, 636, 638, 639, 640, 641, 642, 643, + 644, 645, 646, 647, 648, 649, 651, 652, 653, 654, 655, 657, 658, 659, + 660, 661, 662, 663, 664, 666, 667, 668, 150, 180, 200, 219, 232, 233, + 239, 251, 260, 261, 269, 271, 280, 303, 304, 305, 311, 315, 316, 324, + 327, 333, 340, 342, 346, 347, 352, 353, 357, 360, 365, 367, 368, 371, + 372, 373, 374, 375, 380, 383, 384, 385, 386, 387, 390, 392, 393, 396, + 398, 399, 401, 402, 403, 404, 407, 409, 411, 417, 419, 420, 422, 423, + 427, 429, 430, 431, 434, 436, 437, 441, 442, 444, 447, 449, 450, 451, + 452, 453, 454, 456, 458, 460, 461, 463, 464, 465, 466, 467, 468, 469, + 471, 473, 474, 476, 477, 479, 480, 483, 485, 486, 487, 491, 492, 493, + 494, 495, 496, 499, 500, 502, 503, 505, 506, 508, 510, 512, 513, 514, + 516, 517, 518, 519, 520, 522, 523, 524, 526, 527, 528, 529, 530, 532, + 533, 534, 535, 536, 537, 538, 539, 540, 541, 542, 543, 544, 545, 546, + 547, 548, 549, 550, 551, 552, 553, 554, 555, 556, 557, 558, 559, 561, + 562, 563, 567, 568, 569, 570, 571, 572, 573, 574, 575, 577, 578, 579, + 580, 581, 582, 583, 585, 588, 589, 590, 591, 592, 593, 594, 596, 597, + 598, 599, 600, 601, 602, 603, 605, 606, 607, 608, 609, 610, 611, 612, + 613, 614, 615, 616, 618, 619, 622, 623, 624, 625, 626, 629, 631, 632, + 633, 636, 637, 638, 639, 640, 641, 642, 643, 644, 645, 646, 647, 648, + 653, 654, 655, 657, 658, 659, 660, 661, 662, 663, 664, 666, 667, 668, + 166, 219, 233, 239, 260, 280, 296, 297, 303, 304, 305, 311, 315, 316, + 318, 324, 327, 333, 334, 338, 340, 346, 347, 351, 352, 353, 357, 360, + 365, 367, 368, 370, 371, 372, 373, 374, 375, 377, 380, 381, 382, 383, + 384, 385, 386, 387, 390, 392, 393, 396, 399, 401, 402, 403, 407, 409, + 411, 412, 416, 417, 419, 420, 422, 423, 427, 429, 430, 431, 434, 436, + 437, 440, 441, 442, 443, 444, 445, 453, 454, 455, 458, 460, 463, 464, + 465, 468, 469, 480, 485, 486, 491, 495, 496, 499, 501, 503, 505, 506, + 511, 516, 517, 518, 519, 520, 523, 524, 526, 527, 529, 532, 533, 534, + 535, 536, 537, 538, 539, 540, 541, 542, 543, 544, 545, 546, 547, 548, + 549, 550, 551, 554, 555, 556, 557, 558, 559, 561, 562, 564, 567, 568, + 571, 575, 577, 579, 581, 582, 583, 585, 588, 589, 590, 591, 592, 593, + 594, 596, 597, 598, 599, 600, 601, 602, 606, 609, 610, 613, 615, 616, + 619, 622, 623, 625, 626, 628, 629, 631, 633, 635, 636, 637, 638, 639, + 640, 641, 642, 643, 644, 645, 648, 649, 651, 654, 658, 660, 662, 663, + 664, 666, 667, 52, 83, 115, 129, 150, 155, 157, 182, 196, 197, 200, 207, + 208, 219, 228, 232, 233, 239, 243, 252, 253, 256, 260, 261, 264, 271, + 280, 287, 288, 300, 303, 304, 305, 311, 313, 314, 315, 316, 317, 318, + 324, 327, 333, 338, 340, 342, 345, 346, 347, 351, 352, 353, 357, 360, + 365, 367, 368, 370, 371, 372, 373, 374, 375, 380, 382, 383, 384, 385, + 386, 387, 390, 392, 393, 396, 398, 399, 401, 402, 403, 404, 406, 407, + 409, 411, 416, 417, 419, 420, 422, 423, 424, 426, 427, 429, 430, 431, + 434, 436, 437, 439, 440, 441, 442, 443, 444, 453, 454, 455, 458, 460, + 461, 463, 464, 465, 468, 469, 470, 476, 480, 484, 485, 486, 491, 493, + 494, 495, 496, 499, 501, 502, 503, 505, 506, 507, 508, 510, 511, 512, + 516, 517, 518, 519, 520, 523, 524, 526, 527, 528, 529, 530, 532, 533, + 534, 535, 536, 537, 538, 539, 540, 541, 542, 543, 544, 545, 546, 547, + 548, 549, 550, 551, 552, 554, 555, 556, 557, 558, 559, 560, 561, 562, + 563, 564, 567, 568, 569, 571, 572, 573, 574, 575, 577, 578, 579, 580, + 581, 582, 583, 590, 591, 592, 593, 594, 595, 596, 597, 598, 599, 600, + 601, 602, 605, 606, 607, 609, 610, 612, 613, 614, 615, 616, 618, 619, + 620, 622, 623, 624, 625, 626, 629, 630, 631, 632, 633, 634, 635, 636, + 637, 638, 639, 640, 641, 642, 643, 644, 645, 646, 647, 648, 649, 651, + 652, 654, 655, 657, 658, 659, 660, 661, 662, 663, 664, 667, 668, 60, 83, + 84, 85, 97, 98, 99, 100, 101, 102, 109, 111, 112, 113, 114, 115, 116, + 128, 129, 130, 131, 132, 133, 134, 145, 146, 147, 148, 149, 150, 151, + 152, 153, 154, 155, 157, 162, 163, 164, 165, 166, 167, 168, 169, 170, + 173, 174, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 193, + 194, 195, 197, 198, 200, 201, 202, 203, 204, 205, 206, 208, 209, 216, + 217, 218, 220, 221, 226, 227, 228, 229, 230, 231, 232, 235, 236, 237, + 238, 242, 243, 244, 245, 246, 247, 248, 249, 250, 251, 253, 254, 255, + 256, 257, 261, 262, 263, 264, 265, 266, 267, 268, 269, 270, 271, 277, + 278, 279, 281, 282, 283, 284, 285, 286, 287, 288, 293, 294, 295, 298, + 299, 300, 301, 302, 310, 312, 313, 314, 317, 322, 323, 325, 326, 328, + 329, 330, 331, 332, 337, 339, 341, 342, 343, 344, 345, 354, 355, 356, + 358, 359, 362, 363, 364, 366, 369, 376, 378, 391, 394, 395, 397, 404, + 405, 406, 408, 410, 413, 418, 421, 424, 425, 426, 428, 432, 433, 435, + 446, 447, 448, 449, 450, 451, 452, 456, 457, 459, 461, 466, 467, 471, + 472, 473, 474, 476, 477, 478, 479, 481, 482, 483, 484, 487, 489, 490, + 491, 492, 493, 494, 498, 500, 502, 508, 509, 510, 512, 513, 514, 515, + 516, 519, 522, 525, 528, 530, 531, 552, 553, 560, 563, 566, 569, 570, + 572, 573, 574, 578, 580, 584, 586, 587, 603, 604, 605, 607, 608, 611, + 612, 614, 617, 618, 620, 621, 624, 627, 630, 632, 634, 646, 647, 653, + 655, 657, 659, 661, 662, 664, 665, 667, 60, 83, 84, 85, 97, 98, 99, 100, + 101, 102, 109, 111, 112, 113, 114, 115, 116, 128, 129, 130, 131, 132, + 133, 134, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 157, + 162, 163, 164, 165, 166, 167, 168, 169, 170, 173, 174, 176, 177, 178, + 179, 180, 181, 182, 183, 184, 185, 186, 193, 194, 195, 197, 198, 200, + 201, 202, 203, 204, 205, 206, 208, 209, 216, 217, 218, 220, 221, 226, + 227, 228, 229, 230, 231, 232, 235, 236, 237, 238, 242, 243, 244, 245, + 246, 247, 248, 249, 250, 251, 253, 254, 255, 256, 257, 261, 262, 263, + 264, 265, 266, 267, 268, 269, 270, 271, 277, 278, 279, 281, 282, 283, + 284, 285, 286, 287, 288, 293, 294, 295, 298, 299, 300, 301, 302, 310, + 312, 313, 314, 317, 322, 323, 325, 326, 328, 329, 330, 331, 332, 337, + 339, 341, 342, 343, 344, 345, 354, 355, 356, 358, 359, 362, 363, 364, + 366, 369, 376, 378, 391, 394, 395, 397, 404, 405, 406, 408, 410, 413, + 418, 421, 424, 425, 426, 428, 432, 433, 435, 446, 447, 448, 449, 450, + 451, 452, 456, 457, 459, 461, 466, 467, 471, 472, 473, 474, 476, 477, + 478, 479, 481, 482, 483, 484, 487, 489, 490, 491, 492, 493, 494, 498, + 500, 502, 508, 509, 510, 512, 513, 514, 515, 516, 519, 522, 525, 528, + 530, 531, 552, 553, 560, 563, 566, 569, 570, 572, 573, 574, 578, 580, + 584, 586, 587, 603, 604, 605, 607, 608, 611, 612, 614, 617, 618, 620, + 621, 624, 627, 630, 632, 634, 646, 647, 653, 655, 657, 659, 661, 662, + 664, 665, 667, 97, 98, 100, 101, 102, 109, 112, 113, 114, 116, 131, 132, + 133, 134, 145, 147, 148, 150, 162, 165, 166, 167, 169, 173, 174, 175, + 176, 177, 178, 179, 192, 193, 194, 195, 198, 201, 205, 216, 217, 219, + 226, 227, 228, 229, 231, 232, 233, 236, 239, 240, 246, 247, 250, 253, + 254, 255, 260, 261, 264, 266, 267, 268, 269, 270, 271, 278, 279, 280, + 281, 282, 284, 285, 288, 295, 296, 297, 299, 300, 302, 303, 304, 305, + 310, 311, 312, 314, 315, 316, 318, 324, 326, 327, 330, 331, 332, 333, + 334, 338, 340, 341, 342, 343, 344, 346, 347, 351, 352, 353, 354, 355, + 356, 357, 360, 363, 364, 365, 367, 368, 370, 371, 372, 373, 374, 375, + 376, 377, 378, 380, 381, 382, 383, 384, 385, 386, 387, 390, 391, 392, + 393, 395, 396, 397, 398, 399, 401, 402, 403, 404, 405, 407, 408, 409, + 410, 411, 412, 413, 416, 417, 418, 419, 420, 421, 422, 423, 427, 428, + 429, 430, 431, 432, 433, 434, 435, 436, 437, 439, 440, 441, 442, 443, + 444, 445, 446, 448, 449, 450, 451, 452, 453, 454, 455, 456, 457, 458, + 459, 460, 461, 463, 464, 465, 466, 467, 468, 469, 472, 473, 474, 477, + 478, 479, 480, 481, 482, 483, 484, 485, 486, 487, 489, 490, 491, 492, + 493, 495, 496, 498, 499, 500, 501, 502, 503, 505, 506, 508, 510, 511, + 512, 513, 515, 516, 517, 518, 519, 520, 522, 523, 524, 526, 527, 528, + 529, 530, 532, 533, 534, 535, 536, 537, 538, 539, 540, 541, 542, 543, + 544, 545, 546, 547, 548, 549, 550, 551, 552, 553, 554, 555, 556, 557, + 558, 559, 560, 561, 562, 563, 564, 567, 568, 569, 570, 571, 572, 573, + 574, 575, 576, 577, 578, 579, 581, 582, 583, 585, 588, 589, 590, 591, + 592, 593, 594, 596, 597, 598, 599, 600, 601, 602, 603, 604, 605, 606, + 608, 609, 610, 611, 612, 613, 614, 615, 616, 618, 619, 620, 621, 622, + 623, 624, 625, 626, 627, 628, 629, 630, 631, 632, 633, 634, 635, 636, + 637, 638, 639, 640, 641, 642, 643, 644, 645, 646, 647, 648, 649, 650, + 651, 652, 653, 654, 655, 657, 658, 659, 660, 662, 663, 664, 666, 667, + 668, 60, 83, 84, 85, 97, 98, 99, 100, 101, 102, 109, 111, 112, 113, 114, + 115, 128, 129, 130, 131, 132, 133, 134, 145, 146, 147, 148, 149, 150, + 151, 152, 153, 154, 155, 157, 162, 163, 164, 165, 166, 167, 168, 169, + 170, 173, 174, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, + 193, 194, 195, 197, 198, 200, 201, 202, 203, 204, 205, 206, 208, 209, + 216, 217, 218, 220, 221, 226, 227, 228, 229, 230, 231, 232, 234, 235, + 236, 237, 238, 242, 243, 244, 245, 246, 247, 248, 249, 250, 251, 252, + 253, 254, 255, 256, 257, 261, 262, 263, 264, 265, 266, 267, 268, 269, + 270, 271, 277, 278, 279, 281, 282, 283, 284, 285, 286, 287, 288, 293, + 294, 295, 298, 299, 300, 301, 302, 310, 312, 313, 314, 317, 322, 323, + 325, 326, 328, 329, 330, 331, 332, 334, 337, 339, 341, 342, 343, 344, + 345, 353, 354, 355, 356, 358, 359, 362, 363, 364, 366, 367, 368, 369, + 370, 371, 376, 378, 381, 384, 387, 391, 393, 394, 395, 397, 402, 403, + 404, 405, 406, 408, 410, 413, 416, 418, 419, 421, 422, 423, 424, 425, + 426, 427, 428, 430, 431, 432, 433, 434, 435, 442, 444, 445, 446, 447, + 448, 449, 450, 451, 452, 453, 454, 456, 457, 458, 459, 460, 461, 466, + 467, 469, 471, 472, 473, 474, 476, 477, 478, 479, 480, 481, 482, 483, + 484, 485, 486, 487, 489, 490, 491, 492, 493, 494, 496, 498, 500, 501, + 502, 503, 506, 508, 509, 510, 512, 513, 514, 515, 516, 517, 518, 519, + 520, 522, 523, 524, 525, 526, 527, 528, 529, 530, 531, 532, 533, 534, + 536, 537, 538, 539, 540, 541, 542, 544, 545, 546, 547, 548, 549, 552, + 553, 554, 555, 557, 558, 559, 560, 561, 562, 563, 566, 567, 569, 570, + 571, 572, 573, 574, 575, 577, 578, 579, 580, 581, 582, 583, 584, 585, + 586, 587, 588, 589, 590, 591, 592, 593, 594, 596, 597, 598, 599, 600, + 601, 602, 603, 604, 605, 607, 608, 609, 610, 611, 612, 613, 614, 615, + 616, 617, 618, 619, 620, 621, 622, 624, 625, 626, 627, 629, 630, 631, + 632, 633, 634, 635, 636, 637, 638, 639, 641, 642, 643, 644, 645, 646, + 647, 648, 649, 651, 652, 653, 654, 655, 656, 657, 658, 659, 660, 661, + 662, 663, 665, 666, 667, 668, 82, 83, 97, 98, 100, 101, 102, 109, 110, + 112, 113, 114, 115, 116, 128, 129, 130, 131, 132, 133, 134, 145, 146, + 147, 148, 149, 150, 151, 152, 153, 157, 162, 163, 164, 165, 166, 167, + 169, 173, 174, 175, 176, 177, 178, 180, 181, 183, 184, 185, 186, 192, + 194, 195, 197, 198, 200, 201, 202, 203, 204, 205, 208, 216, 217, 218, + 220, 221, 226, 227, 228, 229, 230, 231, 232, 234, 235, 236, 238, 240, + 242, 243, 244, 246, 247, 249, 250, 251, 253, 254, 255, 256, 257, 260, + 261, 262, 264, 265, 266, 267, 268, 269, 270, 271, 277, 278, 279, 280, + 281, 282, 284, 285, 287, 288, 293, 294, 295, 296, 298, 299, 300, 302, + 310, 311, 312, 313, 314, 315, 316, 318, 322, 323, 324, 325, 326, 327, + 329, 330, 331, 332, 334, 337, 339, 340, 341, 343, 344, 346, 351, 352, + 353, 354, 355, 356, 358, 359, 363, 364, 365, 366, 367, 368, 369, 370, + 371, 372, 373, 374, 375, 376, 377, 378, 380, 381, 382, 385, 387, 390, + 391, 392, 393, 395, 396, 397, 399, 401, 402, 403, 404, 405, 407, 408, + 409, 410, 412, 413, 416, 417, 418, 419, 420, 421, 422, 423, 424, 425, + 426, 427, 428, 429, 432, 433, 434, 435, 436, 437, 439, 440, 441, 442, + 443, 444, 445, 446, 447, 448, 449, 450, 451, 452, 453, 454, 455, 456, + 457, 458, 459, 460, 461, 463, 464, 465, 466, 467, 468, 469, 471, 472, + 473, 474, 476, 477, 478, 479, 480, 481, 482, 483, 484, 485, 486, 487, + 489, 490, 491, 492, 493, 494, 495, 496, 498, 499, 500, 501, 502, 503, + 505, 506, 508, 509, 510, 511, 512, 513, 514, 515, 516, 517, 518, 519, + 520, 522, 523, 524, 525, 526, 527, 528, 529, 530, 531, 532, 533, 534, + 535, 536, 537, 538, 539, 540, 541, 542, 543, 544, 545, 546, 547, 548, + 549, 550, 551, 552, 553, 554, 555, 556, 557, 558, 559, 560, 561, 562, + 563, 564, 566, 567, 568, 569, 570, 572, 573, 574, 575, 578, 579, 580, + 581, 582, 583, 584, 585, 586, 587, 588, 589, 590, 591, 592, 593, 594, + 596, 597, 598, 599, 600, 601, 602, 603, 604, 605, 606, 607, 608, 609, + 610, 611, 612, 613, 614, 615, 616, 617, 618, 619, 620, 621, 622, 623, + 624, 625, 626, 627, 628, 629, 630, 631, 632, 633, 634, 635, 636, 637, + 638, 639, 640, 641, 642, 643, 644, 645, 646, 647, 648, 649, 650, 651, + 652, 653, 654, 655, 656, 657, 658, 659, 660, 661, 662, 663, 664, 666, + 667, 668 }; // clang-format on @@ -1511,5560 +1586,7474 @@ __global__ void JacKernel(realtype *y, realtype *data, NaunetData *d_udata, NaunetData *udata = &d_udata[cur]; // clang-format off + realtype nH = udata->nH; + realtype Tgas = udata->Tgas; + realtype Tdust = udata->Tdust; + realtype zeta_cr = udata->zeta_cr; + realtype Av = udata->Av; + realtype omega = udata->omega; + realtype zeta_xr = udata->zeta_xr; + realtype G0 = udata->G0; + realtype rG = udata->rG; + realtype sites = udata->sites; + realtype barr = udata->barr; + realtype hop = udata->hop; + realtype nMono = udata->nMono; + realtype opt_frz = udata->opt_frz; + realtype opt_thd = udata->opt_thd; + realtype opt_crd = udata->opt_crd; + realtype duty = udata->duty; + realtype Tcr = udata->Tcr; + realtype opt_uvd = udata->opt_uvd; + realtype opt_rcd = udata->opt_rcd; + realtype branch = udata->branch; + + realtype h2col = 0.5*1.59e21*Av; + realtype cocol = 1e-5 * h2col; + realtype n2col = 1e-5 * h2col; + realtype stick1 = (1.0 / (1.0 + 4.2e-2*sqrt(Tgas+Tdust) + 2.3e-3*Tgas - 1.3e-7*Tgas*Tgas)); + realtype stick2 = exp(-1741.0/Tgas) / (1.0 + 5e-2*sqrt(Tgas+Tdust) + 1e-14*pow(Tgas, 4.0)); + realtype stick = stick1 + stick2; + realtype gdens = y[IDX_GRAINM] + y[IDX_GRAIN0I]; + realtype mant = GetMantleDens(y); + realtype garea = (4.0*pi*rG*rG) * gdens; + realtype unisites = sites * (4*pi*rG*rG); + realtype densites = garea * sites; + realtype freq = sqrt((2.0*sites*kerg)/((pi*pi)*amu)); + realtype quan = -2.0*(barr/hbar) * sqrt(2.0*amu*kerg); + realtype layers = mant/(nMono*densites); + realtype cov = (mant == 0.0) ? 0.0 : fmin(layers/mant, 1.0/mant); + realtype hloss = stick * garea/4.0 * sqrt(8.0*kerg*Tgas/(pi*amu)); +#if (NHEATPROCS || NCOOLPROCS) + if (mu < 0) mu = GetMu(y_cur); + if (gamma < 0) gamma = GetGamma(y_cur); +#endif + // clang-format on EvalRates(k, y_cur, udata); +#if NHEATPROCS + realtype kh[NHEATPROCS] = {0.0}; + EvalHeatingRates(kh, y_cur, udata); +#endif + +#if NCOOLPROCS + realtype kc[NCOOLPROCS] = {0.0}; + EvalCoolingRates(kc, y_cur, udata); +#endif + // clang-format off - data[jistart + 0] = 0.0 - k[0]*y_cur[IDX_CM] - k[37]*y_cur[IDX_C10M] - - k[38]*y_cur[IDX_C2M] - k[39]*y_cur[IDX_C2HM] - - k[40]*y_cur[IDX_C3M] - k[41]*y_cur[IDX_C3HM] - k[42]*y_cur[IDX_C3NM] - - k[43]*y_cur[IDX_C4M] - k[44]*y_cur[IDX_C4HM] - - k[45]*y_cur[IDX_C5M] - k[46]*y_cur[IDX_C5HM] - k[47]*y_cur[IDX_C6M] - - k[48]*y_cur[IDX_C6HM] - k[49]*y_cur[IDX_C7M] - - k[50]*y_cur[IDX_C7HM] - k[51]*y_cur[IDX_C8M] - k[52]*y_cur[IDX_C8HM] - - k[53]*y_cur[IDX_C9M] - k[54]*y_cur[IDX_C9HM] - - k[55]*y_cur[IDX_CHM] - k[56]*y_cur[IDX_OM] - k[57]*y_cur[IDX_OHM] - - k[58]*y_cur[IDX_SM] - k[68]*y_cur[IDX_HM] - k[244]*y_cur[IDX_C2II] - - k[245]*y_cur[IDX_CNII] - k[246]*y_cur[IDX_COII] - - k[247]*y_cur[IDX_N2II] - k[248]*y_cur[IDX_O2II] - - k[249]*y_cur[IDX_PNII] - k[513]*y_cur[IDX_HeII] - - k[1846]*y_cur[IDX_C10HII] - k[1847]*y_cur[IDX_C10HM] - - k[1848]*y_cur[IDX_C10H2II] - k[1849]*y_cur[IDX_C2HII] - - k[1850]*y_cur[IDX_C2H2II] - k[1851]*y_cur[IDX_C2H3II] - - k[1852]*y_cur[IDX_C2H3II] - k[1853]*y_cur[IDX_C2H4II] - - k[1854]*y_cur[IDX_C2H4II] - k[1855]*y_cur[IDX_C3H2II] - - k[1856]*y_cur[IDX_C3H2II] - k[1857]*y_cur[IDX_C3H3II] - - k[1858]*y_cur[IDX_C3H3II] - k[1859]*y_cur[IDX_C3H4II] - - k[1860]*y_cur[IDX_C3H4II] - k[1861]*y_cur[IDX_C3H5II] - - k[1862]*y_cur[IDX_C4HII] - k[1863]*y_cur[IDX_C4H2II] - - k[1864]*y_cur[IDX_C4H2II] - k[1865]*y_cur[IDX_C4H3II] - - k[1866]*y_cur[IDX_C4H3II] - k[1867]*y_cur[IDX_C5HII] - - k[1868]*y_cur[IDX_C5H2II] - k[1869]*y_cur[IDX_C5H2II] - - k[1870]*y_cur[IDX_C5H3II] - k[1871]*y_cur[IDX_C5H3II] - - k[1872]*y_cur[IDX_C6H2II] - k[1873]*y_cur[IDX_C6H2II] - - k[1874]*y_cur[IDX_C6H3II] - k[1875]*y_cur[IDX_C6H3II] - - k[1876]*y_cur[IDX_C7HII] - k[1877]*y_cur[IDX_C7H2II] - - k[1878]*y_cur[IDX_C7H2II] - k[1879]*y_cur[IDX_C7H3II] - - k[1880]*y_cur[IDX_C7H3II] - k[1881]*y_cur[IDX_C8H2II] - - k[1882]*y_cur[IDX_C8H2II] - k[1883]*y_cur[IDX_C8H3II] - - k[1884]*y_cur[IDX_C8H3II] - k[1885]*y_cur[IDX_C9HII] - - k[1886]*y_cur[IDX_C9H2II] - k[1887]*y_cur[IDX_C9H2II] - - k[1888]*y_cur[IDX_C9H3II] - k[1889]*y_cur[IDX_C9H3II] - - k[1890]*y_cur[IDX_CHII] - k[1891]*y_cur[IDX_CH2II] - - k[1892]*y_cur[IDX_CH2CCHII] - k[1893]*y_cur[IDX_CH2CCHII] - - k[1894]*y_cur[IDX_CH3II] - k[1895]*y_cur[IDX_CH3C3NHII] - - k[1896]*y_cur[IDX_CH3C5NHII] - k[1897]*y_cur[IDX_CH3C7NHII] - - k[1898]*y_cur[IDX_CH5II] - k[1899]*y_cur[IDX_H2OII] - - k[1900]*y_cur[IDX_H2SII] - k[1901]*y_cur[IDX_H3OII] - - k[1902]*y_cur[IDX_HC2SII] - k[1903]*y_cur[IDX_HCNII] - - k[1904]*y_cur[IDX_HCOII] - k[1905]*y_cur[IDX_HCO2II] - - k[1906]*y_cur[IDX_HCPII] - k[1907]*y_cur[IDX_HNOII] - - k[1908]*y_cur[IDX_HSII] - k[1909]*y_cur[IDX_N2HII] - - k[1910]*y_cur[IDX_NHII] - k[1911]*y_cur[IDX_NH4II] - - k[1912]*y_cur[IDX_O2II] - k[1913]*y_cur[IDX_O2HII] - - k[1914]*y_cur[IDX_OHII] - k[1915]*y_cur[IDX_SiC2HII] - - k[1916]*y_cur[IDX_SiC2H2II] - k[1917]*y_cur[IDX_SiC2H3II] - - k[1918]*y_cur[IDX_SiC3HII] - k[1919]*y_cur[IDX_SiC3H2II] - - k[1920]*y_cur[IDX_SiCH2II] - k[1921]*y_cur[IDX_SiCH2II] - - k[1922]*y_cur[IDX_SiCH2II] - k[1923]*y_cur[IDX_SiCH3II] - - k[1924]*y_cur[IDX_SiCH4II] - k[1925]*y_cur[IDX_SiHII] - - k[1926]*y_cur[IDX_SiH2II] - k[1927]*y_cur[IDX_SiH3II] - - k[1928]*y_cur[IDX_SiH4II] - k[1929]*y_cur[IDX_SiH5II] - - k[1930]*y_cur[IDX_SiNH2II] - k[1931]*y_cur[IDX_SiNH2II] - - k[1932]*y_cur[IDX_SiOII] - k[2374]*y_cur[IDX_H2II] - - k[2632]*y_cur[IDX_H3II] - k[4909]*y_cur[IDX_C10H2I] - - k[4910]*y_cur[IDX_C10HI] - k[4911]*y_cur[IDX_C2H2I] - - k[4912]*y_cur[IDX_C2H2I] - k[4913]*y_cur[IDX_C2H3I] - - k[4914]*y_cur[IDX_C2H4I] - k[4915]*y_cur[IDX_C2H5I] - - k[4916]*y_cur[IDX_C2HI] - k[4917]*y_cur[IDX_C2NI] - - k[4918]*y_cur[IDX_C2OI] - k[4919]*y_cur[IDX_C3H2I] - - k[4920]*y_cur[IDX_C3HI] - k[4921]*y_cur[IDX_C3NI] - - k[4922]*y_cur[IDX_C3OI] - k[4923]*y_cur[IDX_C4I] - - k[4924]*y_cur[IDX_C4H3I] - k[4925]*y_cur[IDX_C4HI] - - k[4926]*y_cur[IDX_C5I] - k[4927]*y_cur[IDX_C5H2I] - - k[4928]*y_cur[IDX_C5HI] - k[4929]*y_cur[IDX_C5NI] - - k[4930]*y_cur[IDX_C6I] - k[4931]*y_cur[IDX_C6I] - - k[4932]*y_cur[IDX_C6H2I] - k[4933]*y_cur[IDX_C6HI] - - k[4934]*y_cur[IDX_C7I] - k[4935]*y_cur[IDX_C7H2I] - - k[4936]*y_cur[IDX_C7HI] - k[4937]*y_cur[IDX_C7NI] - - k[4938]*y_cur[IDX_C8I] - k[4939]*y_cur[IDX_C8H2I] - - k[4940]*y_cur[IDX_C8HI] - k[4941]*y_cur[IDX_C9H2I] - - k[4942]*y_cur[IDX_C9HI] - k[4943]*y_cur[IDX_C9NI] - - k[4944]*y_cur[IDX_CH2I] - k[4945]*y_cur[IDX_CH2I] - - k[4946]*y_cur[IDX_CH2CCH2I] - k[4947]*y_cur[IDX_CH2CCHI] - - k[4948]*y_cur[IDX_CH2CNI] - k[4949]*y_cur[IDX_CH3I] - - k[4950]*y_cur[IDX_CH3C4HI] - k[4951]*y_cur[IDX_CH3C6HI] - - k[4952]*y_cur[IDX_CH3CCHI] - k[4953]*y_cur[IDX_CH3CCHI] - - k[4954]*y_cur[IDX_CH3CHCH2I] - k[4955]*y_cur[IDX_CHI] - - k[4956]*y_cur[IDX_CNI] - k[4957]*y_cur[IDX_COI] - - k[4958]*y_cur[IDX_CSI] - k[4959]*y_cur[IDX_H2CCCI] - - k[4960]*y_cur[IDX_H2CNI] - k[4961]*y_cur[IDX_C4H2I] - - k[4962]*y_cur[IDX_HCOI] - k[4963]*y_cur[IDX_HCOI] - - k[4964]*y_cur[IDX_HPOI] - k[4965]*y_cur[IDX_HSI] - - k[4966]*y_cur[IDX_HSI] - k[4967]*y_cur[IDX_N2I] - - k[4968]*y_cur[IDX_NCCNI] - k[4969]*y_cur[IDX_NH2I] - - k[4970]*y_cur[IDX_NH2I] - k[4971]*y_cur[IDX_NH2I] - - k[4972]*y_cur[IDX_NHI] - k[4973]*y_cur[IDX_NHI] - - k[4974]*y_cur[IDX_NOI] - k[4975]*y_cur[IDX_NOI] - - k[4976]*y_cur[IDX_NSI] - k[4977]*y_cur[IDX_NSI] - - k[4978]*y_cur[IDX_O2I] - k[4979]*y_cur[IDX_OCNI] - - k[4980]*y_cur[IDX_OCSI] - k[4981]*y_cur[IDX_OHI] - - k[4982]*y_cur[IDX_OHI] - k[4983]*y_cur[IDX_PHI] - - k[4984]*y_cur[IDX_S2I] - k[4985]*y_cur[IDX_SO2I] - - k[4986]*y_cur[IDX_SOI] - k[4987]*y_cur[IDX_SOI] - - k[4988]*y_cur[IDX_SiH2I] - k[4989]*y_cur[IDX_SiH3I] - - k[4990]*y_cur[IDX_SiHI] - k[5134]*y_cur[IDX_H2I] - - k[5202]*y_cur[IDX_HCNOI] - k[5212]*y_cur[IDX_HNC3I] - - k[5214]*y_cur[IDX_HNCOI] - k[5215]*y_cur[IDX_HOCNI] - - k[5217]*y_cur[IDX_HONCI] - k[5503]*y_cur[IDX_CII] - - k[5521]*y_cur[IDX_C2I] - k[5522]*y_cur[IDX_C3I] - - k[5523]*y_cur[IDX_CI] - k[5523]*y_cur[IDX_CI] - - k[5523]*y_cur[IDX_CI] - k[5523]*y_cur[IDX_CI] - - k[5524]*y_cur[IDX_NI] - k[5525]*y_cur[IDX_OII] - - k[5526]*y_cur[IDX_OI] - k[5527]*y_cur[IDX_PI] - - k[5528]*y_cur[IDX_SII] - k[5529]*y_cur[IDX_SI] - - k[5554]*y_cur[IDX_H2I] - k[5572]*y_cur[IDX_HI] - - k[5607]*y_cur[IDX_eM] - k[5675] - k[5772] - k[6069] - k[6299] - - k[6891]; - data[jistart + 1] = 0.0 + k[147]*y_cur[IDX_C10HI] + - k[148]*y_cur[IDX_C2H4I] + k[149]*y_cur[IDX_C2H5I] + - k[150]*y_cur[IDX_C2H5OHI] + k[151]*y_cur[IDX_C2OI] + - k[152]*y_cur[IDX_C2SI] + k[153]*y_cur[IDX_C3OI] + - k[154]*y_cur[IDX_C3SI] + k[155]*y_cur[IDX_C4H3I] + - k[156]*y_cur[IDX_C4SI] + k[157]*y_cur[IDX_C6H6I] + - k[158]*y_cur[IDX_CCPI] + k[159]*y_cur[IDX_CClI] + - k[160]*y_cur[IDX_CH2I] + k[161]*y_cur[IDX_CH2CCH2I] + - k[162]*y_cur[IDX_CH2CCHI] + k[163]*y_cur[IDX_CH2CNI] + - k[164]*y_cur[IDX_CH2COI] + k[165]*y_cur[IDX_CH3CCHI] + - k[166]*y_cur[IDX_CH3CHCH2I] + k[167]*y_cur[IDX_CH3CHOI] + - k[168]*y_cur[IDX_CH3COCH3I] + k[169]*y_cur[IDX_CH3OCH3I] + - k[170]*y_cur[IDX_CHI] + k[171]*y_cur[IDX_CPI] + - k[172]*y_cur[IDX_ClOI] + k[173]*y_cur[IDX_FeI] + - k[174]*y_cur[IDX_H2COI] + k[175]*y_cur[IDX_H2SI] + - k[176]*y_cur[IDX_H2SiOI] + k[177]*y_cur[IDX_C4H2I] + - k[178]*y_cur[IDX_HCOI] + k[179]*y_cur[IDX_HCOOCH3I] + - k[180]*y_cur[IDX_HCPI] + k[181]*y_cur[IDX_HPOI] + - k[182]*y_cur[IDX_MgI] + k[185]*y_cur[IDX_NH3I] + - k[186]*y_cur[IDX_NOI] + k[187]*y_cur[IDX_NSI] + - k[188]*y_cur[IDX_NaI] + k[189]*y_cur[IDX_OCSI] + - k[190]*y_cur[IDX_PI] + k[191]*y_cur[IDX_PHI] + k[192]*y_cur[IDX_POI] - + k[193]*y_cur[IDX_SOI] + k[194]*y_cur[IDX_SiI] + - k[195]*y_cur[IDX_SiC2I] + k[196]*y_cur[IDX_SiC2HI] + - k[197]*y_cur[IDX_SiC3I] + k[198]*y_cur[IDX_SiCI] + - k[199]*y_cur[IDX_SiCH2I] + k[200]*y_cur[IDX_SiCH3I] + - k[201]*y_cur[IDX_SiH2I] + k[202]*y_cur[IDX_SiH3I] + - k[203]*y_cur[IDX_SiNI] + k[204]*y_cur[IDX_SiSI] + - k[707]*y_cur[IDX_SI] + k[708]*y_cur[IDX_SI] + k[3886]*y_cur[IDX_CM] - + k[3886]*y_cur[IDX_CM] + k[3921]*y_cur[IDX_C10M] + - k[3956]*y_cur[IDX_C10HM] + k[3991]*y_cur[IDX_C2M] + - k[4026]*y_cur[IDX_C2HM] + k[4061]*y_cur[IDX_C3M] + - k[4096]*y_cur[IDX_C3HM] + k[4131]*y_cur[IDX_C3NM] + - k[4166]*y_cur[IDX_C4M] + k[4201]*y_cur[IDX_C4HM] + - k[4236]*y_cur[IDX_C5M] + k[4271]*y_cur[IDX_C5HM] + - k[4306]*y_cur[IDX_C5NM] + k[4341]*y_cur[IDX_C6M] + - k[4376]*y_cur[IDX_C6HM] + k[4411]*y_cur[IDX_C7M] + - k[4446]*y_cur[IDX_C7HM] + k[4481]*y_cur[IDX_C8M] + - k[4516]*y_cur[IDX_C8HM] + k[4551]*y_cur[IDX_C9M] + - k[4586]*y_cur[IDX_C9HM] + k[4621]*y_cur[IDX_CHM] + - k[4656]*y_cur[IDX_CNM] + k[4691]*y_cur[IDX_HM] + - k[4727]*y_cur[IDX_OM] + k[4762]*y_cur[IDX_O2M] + - k[4797]*y_cur[IDX_OHM] + k[4832]*y_cur[IDX_SM] - - k[5503]*y_cur[IDX_CI] + k[5611]*y_cur[IDX_eM] + - k[5627]*y_cur[IDX_CH3OI] + k[5639]*y_cur[IDX_CH3COI] + - k[5644]*y_cur[IDX_COOHI] + k[5649]*y_cur[IDX_COOCH3I] + - k[5655]*y_cur[IDX_CH2OHCOI] + k[5661]*y_cur[IDX_CH2OHCHOI] + - k[5667]*y_cur[IDX_CH3COOHI] + k[6314]*y_cur[IDX_GRAINM]; - data[jistart + 2] = 0.0 - k[0]*y_cur[IDX_CI] + - k[3886]*y_cur[IDX_CII] + k[3886]*y_cur[IDX_CII] + - k[3887]*y_cur[IDX_C2H2II] + k[3888]*y_cur[IDX_C2H3II] + - k[3889]*y_cur[IDX_C4H2II] + k[3890]*y_cur[IDX_C4H3II] + - k[3891]*y_cur[IDX_C4SII] + k[3892]*y_cur[IDX_CH2CCHII] + - k[3893]*y_cur[IDX_CH3II] + k[3894]*y_cur[IDX_CNCII] + - k[3895]*y_cur[IDX_FeII] + k[3896]*y_cur[IDX_HII] + - k[3897]*y_cur[IDX_H2COII] + k[3898]*y_cur[IDX_H2SII] + - k[3899]*y_cur[IDX_H3II] + k[3900]*y_cur[IDX_H3OII] + - k[3901]*y_cur[IDX_HC2SII] + k[3902]*y_cur[IDX_HCNHII] + - k[3903]*y_cur[IDX_HCNHII] + k[3904]*y_cur[IDX_HCOII] + - k[3905]*y_cur[IDX_HCOII] + k[3906]*y_cur[IDX_HeII] + - k[3907]*y_cur[IDX_MgII] + k[3908]*y_cur[IDX_NII] + - k[3909]*y_cur[IDX_N2HII] + k[3910]*y_cur[IDX_NH3II] + - k[3911]*y_cur[IDX_NH4II] + k[3912]*y_cur[IDX_NOII] + - k[3913]*y_cur[IDX_NaII] + k[3914]*y_cur[IDX_OII] + - k[3915]*y_cur[IDX_SII] + k[3916]*y_cur[IDX_SOII] + - k[3917]*y_cur[IDX_SiII] + k[3918]*y_cur[IDX_SiOII] + - k[3919]*y_cur[IDX_SiOHII] + k[3920]*y_cur[IDX_SiSII] + k[5686] + - k[5948]; - data[jistart + 3] = 0.0 + k[2293]*y_cur[IDX_HII] + - k[3057]*y_cur[IDX_HeII] + k[3061]*y_cur[IDX_HeII] + k[5688] + - k[5951] + k[5953] + k[5955]; - data[jistart + 4] = 0.0 + k[728]*y_cur[IDX_eM] + - k[6870]*y_cur[IDX_GRAINM]; - data[jistart + 5] = 0.0 - k[37]*y_cur[IDX_CI] + - k[3921]*y_cur[IDX_CII]; - data[jistart + 6] = 0.0 + k[147]*y_cur[IDX_CII] + - k[3070]*y_cur[IDX_HeII] + k[3072]*y_cur[IDX_HeII] - - k[4910]*y_cur[IDX_CI] + k[5968]; - data[jistart + 7] = 0.0 - k[1846]*y_cur[IDX_CI]; - data[jistart + 8] = 0.0 - k[1847]*y_cur[IDX_CI] + - k[3956]*y_cur[IDX_CII]; - data[jistart + 9] = 0.0 + k[3066]*y_cur[IDX_HeII] - - k[4909]*y_cur[IDX_CI]; - data[jistart + 10] = 0.0 - k[1848]*y_cur[IDX_CI]; - data[jistart + 11] = 0.0 + k[734]*y_cur[IDX_eM] + + data[jistart + 0] = 0.0 - k[7198] - k[7380] - k[7564]; + data[jistart + 1] = 0.0 + k[7016]; + data[jistart + 2] = 0.0 - k[7072] - k[7254] - k[7436]; + data[jistart + 3] = 0.0 + k[6890]; + data[jistart + 4] = 0.0 - k[7088] - k[7270] - k[7452]; + data[jistart + 5] = 0.0 + k[6906]; + data[jistart + 6] = 0.0 - k[7087] - k[7269] - k[7451]; + data[jistart + 7] = 0.0 + k[6905]; + data[jistart + 8] = 0.0 - k[7220] - k[7402] - k[7584] - k[7846] - k[8175]; + data[jistart + 9] = 0.0 + k[7038]; + data[jistart + 10] = 0.0 - k[7191] - k[7373] - k[7555] - k[7807] - k[8136]; + data[jistart + 11] = 0.0 + k[7009]; + data[jistart + 12] = 0.0 - k[7231] - k[7413] - k[7595] - k[7860] - k[8192]; + data[jistart + 13] = 0.0 + k[7049]; + data[jistart + 14] = 0.0 - k[7173] - k[7355] - k[7537] - k[7781] - k[8105]; + data[jistart + 15] = 0.0 + k[6991]; + data[jistart + 16] = 0.0 - k[7218] - k[7400] - k[7582] - k[7844] - k[8171]; + data[jistart + 17] = 0.0 + k[8552]*y_cur[IDX_GCH3I]; + data[jistart + 18] = 0.0 + k[7036]; + data[jistart + 19] = 0.0 + k[8552]*y_cur[IDX_GC3NI]; + data[jistart + 20] = 0.0 - k[7216] - k[7398] - k[7580] - k[7841] - k[8167]; + data[jistart + 21] = 0.0 + k[7034]; + data[jistart + 22] = 0.0 - k[7236] - k[7418] - k[7600] - k[7865] - k[8204]; + data[jistart + 23] = 0.0 + k[8553]*y_cur[IDX_GCH3I]; + data[jistart + 24] = 0.0 + k[7054]; + data[jistart + 25] = 0.0 + k[8553]*y_cur[IDX_GC5NI]; + data[jistart + 26] = 0.0 - k[7235] - k[7417] - k[7599] - k[7864] - k[8203]; + data[jistart + 27] = 0.0 + k[7053]; + data[jistart + 28] = 0.0 - k[7245] - k[7427] - k[7609] - k[7874] - k[8228]; + data[jistart + 29] = 0.0 + k[8554]*y_cur[IDX_GCH3I]; + data[jistart + 30] = 0.0 + k[7063]; + data[jistart + 31] = 0.0 + k[8554]*y_cur[IDX_GC7NI]; + data[jistart + 32] = 0.0 - k[7181] - k[7363] - k[7545] - k[7796] - k[8121]; + data[jistart + 33] = 0.0 + k[6999]; + data[jistart + 34] = 0.0 - k[7199] - k[7381] - k[7567] - k[7817] - k[8145]; + data[jistart + 35] = 0.0 + k[7017]; + data[jistart + 36] = 0.0 - k[7126] - k[7308] - k[7490] - k[7713] - k[8018] - k[8019]; + data[jistart + 37] = 0.0 + k[8314]*y_cur[IDX_GHI]; + data[jistart + 38] = 0.0 + k[6944]; + data[jistart + 39] = 0.0 + k[8314]*y_cur[IDX_GClI]; + data[jistart + 40] = 0.0 - k[7086] - k[7268] - k[7450] - k[7640] - k[7926]; + data[jistart + 41] = 0.0 + k[8284]*y_cur[IDX_GHI]; + data[jistart + 42] = 0.0 + k[6904]; + data[jistart + 43] = 0.0 + k[8284]*y_cur[IDX_GFI]; + data[jistart + 44] = 0.0 - k[7149] - k[7331] - k[7513] - k[7750] - k[8064]; + data[jistart + 45] = 0.0 + k[6967]; + data[jistart + 46] = 0.0 - k[7175] - k[7357] - k[7539] - k[7785] - k[8109]; + data[jistart + 47] = 0.0 + k[6993]; + data[jistart + 48] = 0.0 - k[7144] - k[7326] - k[7508] - k[7739] - k[8050]; + data[jistart + 49] = 0.0 + k[6962]; + data[jistart + 50] = 0.0 - k[7167] - k[7349] - k[7531] - k[7778] - k[8099] - k[8100]; + data[jistart + 51] = 0.0 + k[6985]; + data[jistart + 52] = 0.0 - k[7164] - k[7346] - k[7528] - k[7768] - k[8088]; + data[jistart + 53] = 0.0 + k[6982]; + data[jistart + 54] = 0.0 - k[7217] - k[7399] - k[7581] - k[7843] - k[8170]; + data[jistart + 55] = 0.0 + k[7035]; + data[jistart + 56] = 0.0 - k[7152] - k[7334] - k[7516] - k[7749] - k[8063]; + data[jistart + 57] = 0.0 + k[6970]; + data[jistart + 58] = 0.0 - k[7207] - k[7389] - k[7573] - k[7832] - k[8156]; + data[jistart + 59] = 0.0 + k[7025]; + data[jistart + 60] = 0.0 - k[7205] - k[7387] - k[7571] - k[7831] - k[8155]; + data[jistart + 61] = 0.0 + k[7023]; + data[jistart + 62] = 0.0 + k[7640] + k[7926]; + data[jistart + 63] = 0.0 - k[7085] - k[7267] - k[7449] - k[8284]*y_cur[IDX_GHI] - + k[8585]*y_cur[IDX_GHI]; + data[jistart + 64] = 0.0 + k[6903]; + data[jistart + 65] = 0.0 - k[8284]*y_cur[IDX_GFI] - k[8585]*y_cur[IDX_GFI]; + data[jistart + 66] = 0.0 - k[7170] - k[7352] - k[7534] - k[7776] - k[8096] - k[8097]; + data[jistart + 67] = 0.0 + k[6988]; + data[jistart + 68] = 0.0 - k[7187] - k[7369] - k[7551] - k[7801] - k[8126] - k[8127] - + k[8128]; + data[jistart + 69] = 0.0 + k[7005]; + data[jistart + 70] = 0.0 - k[7215] - k[7397] - k[7579] - k[7840] - k[8165] - k[8166]; + data[jistart + 71] = 0.0 + k[8174]; + data[jistart + 72] = 0.0 + k[7033]; + data[jistart + 73] = 0.0 - k[7190] - k[7372] - k[7554] - k[7805] - k[8133]; + data[jistart + 74] = 0.0 + k[8137]; + data[jistart + 75] = 0.0 + k[7008]; + data[jistart + 76] = 0.0 - k[5941] - k[7011]; + data[jistart + 77] = 0.0 + k[7193] + k[7375] + k[7557]; + data[jistart + 78] = 0.0 + k[8634]*y_cur[IDX_GHI]; + data[jistart + 79] = 0.0 + k[8634]*y_cur[IDX_GCH2CHCNI]; + data[jistart + 80] = 0.0 - k[7222] - k[7404] - k[7586] - k[7848] - k[8177]; + data[jistart + 81] = 0.0 + k[8422]*y_cur[IDX_GCI]; + data[jistart + 82] = 0.0 + k[7040]; + data[jistart + 83] = 0.0 + k[8422]*y_cur[IDX_GC2SI]; + data[jistart + 84] = 0.0 - k[7212] - k[7394] - k[7576] - k[7836] - k[8160] - k[8161]; + data[jistart + 85] = 0.0 + k[7030]; + data[jistart + 86] = 0.0 - k[7230] - k[7412] - k[7594] - k[7859] - k[8191]; + data[jistart + 87] = 0.0 + k[7048]; + data[jistart + 88] = 0.0 - k[7166] - k[7348] - k[7530] - k[7775] - k[8095]; + data[jistart + 89] = 0.0 + k[6984]; + data[jistart + 90] = 0.0 + k[7807] + k[8136]; + data[jistart + 91] = 0.0 - k[7141] - k[7323] - k[7505] - k[7740] - k[8051]; + data[jistart + 92] = 0.0 + k[6959]; + data[jistart + 93] = 0.0 - k[7209] - k[7391] - k[7566] - k[7891] - k[7892] - k[8271] - + k[8272]; + data[jistart + 94] = 0.0 + k[8549]*y_cur[IDX_GCH3I]; + data[jistart + 95] = 0.0 + k[8504]*y_cur[IDX_GOHI]; + data[jistart + 96] = 0.0 + k[7027]; + data[jistart + 97] = 0.0 + k[8504]*y_cur[IDX_GCH3COI]; + data[jistart + 98] = 0.0 + k[8549]*y_cur[IDX_GCOOHI]; + data[jistart + 99] = 0.0 - k[7123] - k[7305] - k[7487] - k[7709] - k[7710] - k[7711] - + k[8013] - k[8014] - k[8015] - k[8016] - k[8313]*y_cur[IDX_GHI]; + data[jistart + 100] = 0.0 + k[8312]*y_cur[IDX_GHI]; + data[jistart + 101] = 0.0 + k[6941]; + data[jistart + 102] = 0.0 + k[8312]*y_cur[IDX_GHSI] - k[8313]*y_cur[IDX_GH2SI]; + data[jistart + 103] = 0.0 - k[7153] - k[7335] - k[7517] - k[7752] - k[8066]; + data[jistart + 104] = 0.0 + k[8326]*y_cur[IDX_GHI]; + data[jistart + 105] = 0.0 + k[6971]; + data[jistart + 106] = 0.0 + k[8326]*y_cur[IDX_GCNOI]; + data[jistart + 107] = 0.0 + k[7775]; + data[jistart + 108] = 0.0 - k[7158] - k[7340] - k[7522] - k[7759] - k[8077]; + data[jistart + 109] = 0.0 + k[6976]; + data[jistart + 110] = 0.0 - k[7182] - k[7364] - k[7546] - k[7797] - k[8122]; + data[jistart + 111] = 0.0 + k[7000]; + data[jistart + 112] = 0.0 - k[7150] - k[7332] - k[7514] - k[7751] - k[8065]; + data[jistart + 113] = 0.0 + k[8329]*y_cur[IDX_GHI]; + data[jistart + 114] = 0.0 + k[6968]; + data[jistart + 115] = 0.0 + k[8526]*y_cur[IDX_GCOI]; + data[jistart + 116] = 0.0 + k[8526]*y_cur[IDX_GNHI]; + data[jistart + 117] = 0.0 + k[8329]*y_cur[IDX_GOCNI]; + data[jistart + 118] = 0.0 - k[7151] - k[7333] - k[7515] - k[7755] - k[8069]; + data[jistart + 119] = 0.0 + k[8328]*y_cur[IDX_GHI]; + data[jistart + 120] = 0.0 + k[6969]; + data[jistart + 121] = 0.0 + k[8328]*y_cur[IDX_GOCNI]; + data[jistart + 122] = 0.0 - k[7155] - k[7337] - k[7519] - k[7754] - k[8068]; + data[jistart + 123] = 0.0 + k[8327]*y_cur[IDX_GHI]; + data[jistart + 124] = 0.0 + k[6973]; + data[jistart + 125] = 0.0 + k[8327]*y_cur[IDX_GCNOI]; + data[jistart + 126] = 0.0 - k[7219] - k[7401] - k[7583] - k[7845] - k[8172] - k[8173] - + k[8174]; + data[jistart + 127] = 0.0 + k[7037]; + data[jistart + 128] = 0.0 - k[7156] - k[7338] - k[7520] - k[7756] - k[8070] - k[8071] - + k[8072] - k[8073] - k[8074]; + data[jistart + 129] = 0.0 + k[6974]; + data[jistart + 130] = 0.0 - k[7121] - k[7303] - k[7485] - k[7706] - k[8007] - k[8008] - + k[8009] - k[8010]; + data[jistart + 131] = 0.0 + k[6939]; + data[jistart + 132] = 0.0 + k[7785] + k[8109]; + data[jistart + 133] = 0.0 - k[7174] - k[7356] - k[7538] - k[7782] - k[8106]; + data[jistart + 134] = 0.0 + k[6992]; + data[jistart + 135] = 0.0 - k[7192] - k[7374] - k[7556] - k[7808] - k[8137]; + data[jistart + 136] = 0.0 + k[7010]; + data[jistart + 137] = 0.0 - k[7228] - k[7410] - k[7592] - k[7857] - k[8189]; + data[jistart + 138] = 0.0 + k[7046]; + data[jistart + 139] = 0.0 - k[7194] - k[7376] - k[7560] - k[7806] - k[8134] - k[8135]; + data[jistart + 140] = 0.0 + k[7012]; + data[jistart + 141] = 0.0 - k[5942] - k[6958]; + data[jistart + 142] = 0.0 + k[7140] + k[7322] + k[7504]; + data[jistart + 143] = 0.0 + k[8619]*y_cur[IDX_GHI]; + data[jistart + 144] = 0.0 + k[8619]*y_cur[IDX_GC2OI]; + data[jistart + 145] = 0.0 + k[7859]; + data[jistart + 146] = 0.0 - k[7221] - k[7403] - k[7585] - k[7847] - k[8176]; + data[jistart + 147] = 0.0 + k[7039]; + data[jistart + 148] = 0.0 - k[7229] - k[7411] - k[7593] - k[7858] - k[8190]; + data[jistart + 149] = 0.0 + k[7047]; + data[jistart + 150] = 0.0 - k[7122] - k[7304] - k[7486] - k[7708] - k[8012] - + k[8309]*y_cur[IDX_GHI] - k[8310]*y_cur[IDX_GHI]; + data[jistart + 151] = 0.0 + k[8308]*y_cur[IDX_GHI]; + data[jistart + 152] = 0.0 + k[6940]; + data[jistart + 153] = 0.0 + k[8514]*y_cur[IDX_GOHI] + k[8514]*y_cur[IDX_GOHI]; + data[jistart + 154] = 0.0 + k[8308]*y_cur[IDX_GO2HI] - k[8309]*y_cur[IDX_GH2O2I] - + k[8310]*y_cur[IDX_GH2O2I]; + data[jistart + 155] = 0.0 - k[7138] - k[7320] - k[7502] - k[7738] - k[8047] - k[8048] - + k[8049]; + data[jistart + 156] = 0.0 + k[8057] + k[8058]; + data[jistart + 157] = 0.0 + k[6956]; + data[jistart + 158] = 0.0 + k[8095]; + data[jistart + 159] = 0.0 + k[7706] + k[8007] + k[8010]; + data[jistart + 160] = 0.0 - k[7115] - k[7297] - k[7479] - k[7696] - k[7996]; + data[jistart + 161] = 0.0 + k[6933]; + data[jistart + 162] = 0.0 - k[7214] - k[7396] - k[7578] - k[7839] - k[8164] - + k[8349]*y_cur[IDX_GHI]; + data[jistart + 163] = 0.0 + k[8453]*y_cur[IDX_GOI]; + data[jistart + 164] = 0.0 + k[7032]; + data[jistart + 165] = 0.0 + k[8453]*y_cur[IDX_GSOI]; + data[jistart + 166] = 0.0 - k[8349]*y_cur[IDX_GSO2I]; + data[jistart + 167] = 0.0 - k[7117] - k[7299] - k[7481] - k[7695] - k[7993] - k[7994] - + k[7995]; + data[jistart + 168] = 0.0 + k[8304]*y_cur[IDX_GHI]; + data[jistart + 169] = 0.0 + k[6935]; + data[jistart + 170] = 0.0 + k[8304]*y_cur[IDX_GSiH3I]; + data[jistart + 171] = 0.0 - k[1155]*y_cur[IDX_eM] - k[6769]*y_cur[IDX_GRAINM]; + data[jistart + 172] = 0.0 + k[5541]*y_cur[IDX_CH3II]; + data[jistart + 173] = 0.0 + k[5541]*y_cur[IDX_NCCNI]; + data[jistart + 174] = 0.0 - k[6769]*y_cur[IDX_NCCNCH3II]; + data[jistart + 175] = 0.0 - k[1155]*y_cur[IDX_NCCNCH3II]; + data[jistart + 176] = 0.0 + k[7011]; + data[jistart + 177] = 0.0 - k[7193] - k[7375] - k[7557] - k[7885] - k[8345]*y_cur[IDX_GHI] + - k[8635]*y_cur[IDX_GHI]; + data[jistart + 178] = 0.0 + k[8344]*y_cur[IDX_GHI]; + data[jistart + 179] = 0.0 + k[8344]*y_cur[IDX_GCH2CHCNI] - k[8345]*y_cur[IDX_GC2H4CNI] - + k[8635]*y_cur[IDX_GC2H4CNI]; + data[jistart + 180] = 0.0 - k[7197] - k[7379] - k[7563] - k[7815] - k[7816] - k[8144] - + k[8422]*y_cur[IDX_GCI] - k[8673]*y_cur[IDX_GCI]; + data[jistart + 181] = 0.0 + k[7015]; + data[jistart + 182] = 0.0 - k[8422]*y_cur[IDX_GC2SI] - k[8673]*y_cur[IDX_GC2SI]; + data[jistart + 183] = 0.0 - k[7188] - k[7370] - k[7552] - k[7803] - k[8130]; + data[jistart + 184] = 0.0 + k[8419]*y_cur[IDX_GCI]; + data[jistart + 185] = 0.0 + k[7006]; + data[jistart + 186] = 0.0 + k[8451]*y_cur[IDX_GOI]; + data[jistart + 187] = 0.0 + k[8451]*y_cur[IDX_GC3I]; + data[jistart + 188] = 0.0 + k[8419]*y_cur[IDX_GC2OI]; + data[jistart + 189] = 0.0 - k[7184] - k[7366] - k[7548] - k[7795] - k[8119] - k[8120] - + k[8342]*y_cur[IDX_GHI] - k[8632]*y_cur[IDX_GHI]; + data[jistart + 190] = 0.0 + k[8341]*y_cur[IDX_GHI]; + data[jistart + 191] = 0.0 + k[7002]; + data[jistart + 192] = 0.0 + k[8341]*y_cur[IDX_GC4H2I] - k[8342]*y_cur[IDX_GC4H3I] - + k[8632]*y_cur[IDX_GC4H3I]; + data[jistart + 193] = 0.0 - k[7234] - k[7416] - k[7598] - k[7863] - k[8200] - k[8201] - + k[8202]; + data[jistart + 194] = 0.0 + k[8356]*y_cur[IDX_GHI] + k[8387]*y_cur[IDX_GH2I]; + data[jistart + 195] = 0.0 + k[8498]*y_cur[IDX_GCHI]; + data[jistart + 196] = 0.0 + k[7052]; + data[jistart + 197] = 0.0 + k[8498]*y_cur[IDX_GC6HI]; + data[jistart + 198] = 0.0 + k[8387]*y_cur[IDX_GC7HI]; + data[jistart + 199] = 0.0 + k[8356]*y_cur[IDX_GC7HI]; + data[jistart + 200] = 0.0 - k[7240] - k[7422] - k[7604] - k[7869] - k[8213] - k[8214] - + k[8215]; + data[jistart + 201] = 0.0 + k[8358]*y_cur[IDX_GHI] + k[8389]*y_cur[IDX_GH2I]; + data[jistart + 202] = 0.0 + k[8500]*y_cur[IDX_GCHI]; + data[jistart + 203] = 0.0 + k[7058]; + data[jistart + 204] = 0.0 + k[8500]*y_cur[IDX_GC7HI]; + data[jistart + 205] = 0.0 + k[8389]*y_cur[IDX_GC8HI]; + data[jistart + 206] = 0.0 + k[8358]*y_cur[IDX_GC8HI]; + data[jistart + 207] = 0.0 - k[7244] - k[7426] - k[7608] - k[7873] - k[8225] - k[8226] - + k[8227]; + data[jistart + 208] = 0.0 + k[8502]*y_cur[IDX_GCHI]; + data[jistart + 209] = 0.0 + k[8361]*y_cur[IDX_GHI] + k[8391]*y_cur[IDX_GH2I]; + data[jistart + 210] = 0.0 + k[7062]; + data[jistart + 211] = 0.0 + k[8502]*y_cur[IDX_GC8HI]; + data[jistart + 212] = 0.0 + k[8391]*y_cur[IDX_GC9HI]; + data[jistart + 213] = 0.0 + k[8361]*y_cur[IDX_GC9HI]; + data[jistart + 214] = 0.0 - k[7135] - k[7317] - k[7499] - k[7726] - k[8034] - + k[8323]*y_cur[IDX_GHI] - k[8618]*y_cur[IDX_GHI]; + data[jistart + 215] = 0.0 + k[7736] + k[8045]; + data[jistart + 216] = 0.0 + k[8322]*y_cur[IDX_GHI]; + data[jistart + 217] = 0.0 + k[6953]; + data[jistart + 218] = 0.0 + k[8529]*y_cur[IDX_GCNI]; + data[jistart + 219] = 0.0 + k[8529]*y_cur[IDX_GCH2I]; + data[jistart + 220] = 0.0 + k[8322]*y_cur[IDX_GHCCNI] - k[8323]*y_cur[IDX_GCH2CNI] - + k[8618]*y_cur[IDX_GCH2CNI]; + data[jistart + 221] = 0.0 + k[8323]*y_cur[IDX_GHI]; + data[jistart + 222] = 0.0 - k[7139] - k[7321] - k[7503] - k[7735] - k[7736] - k[7737] - + k[8044] - k[8045] - k[8046]; + data[jistart + 223] = 0.0 + k[6957]; + data[jistart + 224] = 0.0 + k[8540]*y_cur[IDX_GCH3I]; + data[jistart + 225] = 0.0 + k[8540]*y_cur[IDX_GCNI]; + data[jistart + 226] = 0.0 + k[8323]*y_cur[IDX_GCH2CNI]; + data[jistart + 227] = 0.0 - k[7096] - k[7278] - k[7460] - k[7665] - k[7952] - + k[8293]*y_cur[IDX_GHI] - k[8593]*y_cur[IDX_GHI]; + data[jistart + 228] = 0.0 + k[6914]; + data[jistart + 229] = 0.0 + k[8456]*y_cur[IDX_GNI]; + data[jistart + 230] = 0.0 + k[8456]*y_cur[IDX_GCH2I]; + data[jistart + 231] = 0.0 - k[8293]*y_cur[IDX_GH2CNI] - k[8593]*y_cur[IDX_GH2CNI]; + data[jistart + 232] = 0.0 - k[7171] - k[7353] - k[7535] - k[7777] - k[8098]; + data[jistart + 233] = 0.0 + k[8335]*y_cur[IDX_GHI]; + data[jistart + 234] = 0.0 + k[6989]; + data[jistart + 235] = 0.0 + k[8474]*y_cur[IDX_GCH3I]; + data[jistart + 236] = 0.0 + k[8474]*y_cur[IDX_GSI]; + data[jistart + 237] = 0.0 + k[8335]*y_cur[IDX_GHCSI]; + data[jistart + 238] = 0.0 + k[6958]; + data[jistart + 239] = 0.0 - k[7140] - k[7322] - k[7504] - k[7887] - k[8325]*y_cur[IDX_GHI] + - k[8620]*y_cur[IDX_GHI]; + data[jistart + 240] = 0.0 + k[8324]*y_cur[IDX_GHI]; + data[jistart + 241] = 0.0 + k[8324]*y_cur[IDX_GC2OI] - k[8325]*y_cur[IDX_GHC2OI] - + k[8620]*y_cur[IDX_GHC2OI]; + data[jistart + 242] = 0.0 - k[7227] - k[7409] - k[7591] - k[7855] - k[7856] - k[8187] - + k[8188]; + data[jistart + 243] = 0.0 + k[8354]*y_cur[IDX_GHI]; + data[jistart + 244] = 0.0 + k[8468]*y_cur[IDX_GNI]; + data[jistart + 245] = 0.0 + k[7045]; + data[jistart + 246] = 0.0 + k[8468]*y_cur[IDX_GC5HI]; + data[jistart + 247] = 0.0 + k[8354]*y_cur[IDX_GC5NI]; + data[jistart + 248] = 0.0 - k[7241] - k[7423] - k[7605] - k[7870] - k[8216] - k[8217] - + k[8218]; + data[jistart + 249] = 0.0 + k[8359]*y_cur[IDX_GHI]; + data[jistart + 250] = 0.0 + k[8470]*y_cur[IDX_GNI]; + data[jistart + 251] = 0.0 + k[7059]; + data[jistart + 252] = 0.0 + k[8470]*y_cur[IDX_GC7HI]; + data[jistart + 253] = 0.0 + k[8359]*y_cur[IDX_GC7NI]; + data[jistart + 254] = 0.0 - k[7250] - k[7432] - k[7614] - k[7879] - k[8252] - k[8253] - + k[8254]; + data[jistart + 255] = 0.0 + k[8364]*y_cur[IDX_GHI]; + data[jistart + 256] = 0.0 + k[8472]*y_cur[IDX_GNI]; + data[jistart + 257] = 0.0 + k[7068]; + data[jistart + 258] = 0.0 + k[8472]*y_cur[IDX_GC9HI]; + data[jistart + 259] = 0.0 + k[8364]*y_cur[IDX_GC9NI]; + data[jistart + 260] = 0.0 - k[7131] - k[7313] - k[7495] - k[7886] - k[8322]*y_cur[IDX_GHI] + - k[8617]*y_cur[IDX_GHI]; + data[jistart + 261] = 0.0 + k[6949]; + data[jistart + 262] = 0.0 + k[8321]*y_cur[IDX_GHI]; + data[jistart + 263] = 0.0 + k[8488]*y_cur[IDX_GCHI]; + data[jistart + 264] = 0.0 + k[8488]*y_cur[IDX_GCNI]; + data[jistart + 265] = 0.0 + k[8321]*y_cur[IDX_GC2NI] - k[8322]*y_cur[IDX_GHCCNI] - + k[8617]*y_cur[IDX_GHCCNI]; + data[jistart + 266] = 0.0 - k[7162] - k[7344] - k[7526] - k[7766] - k[7767] - k[8085] - + k[8086] - k[8087] - k[8335]*y_cur[IDX_GHI] - k[8627]*y_cur[IDX_GHI]; + data[jistart + 267] = 0.0 + k[8330]*y_cur[IDX_GHI]; + data[jistart + 268] = 0.0 + k[8473]*y_cur[IDX_GCHI]; + data[jistart + 269] = 0.0 + k[6980]; + data[jistart + 270] = 0.0 + k[8473]*y_cur[IDX_GSI]; + data[jistart + 271] = 0.0 + k[8330]*y_cur[IDX_GCSI] - k[8335]*y_cur[IDX_GHCSI] - + k[8627]*y_cur[IDX_GHCSI]; + data[jistart + 272] = 0.0 + k[7843] + k[8170]; + data[jistart + 273] = 0.0 - k[7213] - k[7395] - k[7577] - k[7842] - k[8168] - k[8169]; + data[jistart + 274] = 0.0 + k[7031]; + data[jistart + 275] = 0.0 + k[7994]; + data[jistart + 276] = 0.0 - k[7109] - k[7291] - k[7473] - k[7693] - k[7988] - k[7989] - + k[7990] - k[7991] - k[8304]*y_cur[IDX_GHI] - k[8603]*y_cur[IDX_GHI]; + data[jistart + 277] = 0.0 + k[8303]*y_cur[IDX_GHI]; + data[jistart + 278] = 0.0 + k[6927]; + data[jistart + 279] = 0.0 + k[8303]*y_cur[IDX_GSiH2I] - k[8304]*y_cur[IDX_GSiH3I] - + k[8603]*y_cur[IDX_GSiH3I]; + data[jistart + 280] = 0.0 + k[7750] + k[8064]; + data[jistart + 281] = 0.0 + k[8134]; + data[jistart + 282] = 0.0 - k[7147] - k[7329] - k[7511] - k[7748] - k[8062]; + data[jistart + 283] = 0.0 + k[6965]; + data[jistart + 284] = 0.0 + k[7832] + k[8156]; + data[jistart + 285] = 0.0 + k[7776] + k[8096] + k[8097]; + data[jistart + 286] = 0.0 - k[7161] - k[7343] - k[7525] - k[7765] - k[8083] - k[8084]; + data[jistart + 287] = 0.0 + k[6979]; + data[jistart + 288] = 0.0 + k[7131] + k[7313] + k[7495]; + data[jistart + 289] = 0.0 - k[5940] - k[6949]; + data[jistart + 290] = 0.0 + k[8616]*y_cur[IDX_GHI]; + data[jistart + 291] = 0.0 + k[8721]*y_cur[IDX_GCHI]; + data[jistart + 292] = 0.0 + k[8721]*y_cur[IDX_GCNI]; + data[jistart + 293] = 0.0 + k[8616]*y_cur[IDX_GC2NI]; + data[jistart + 294] = 0.0 - k[796]*y_cur[IDX_eM] - k[797]*y_cur[IDX_eM] - + k[6655]*y_cur[IDX_GRAINM] - k[6656]*y_cur[IDX_GRAINM]; + data[jistart + 295] = 0.0 + k[5507]*y_cur[IDX_COI]; + data[jistart + 296] = 0.0 + k[5507]*y_cur[IDX_C2H2II]; + data[jistart + 297] = 0.0 - k[6655]*y_cur[IDX_C3H2OII] - k[6656]*y_cur[IDX_C3H2OII]; + data[jistart + 298] = 0.0 - k[796]*y_cur[IDX_C3H2OII] - k[797]*y_cur[IDX_C3H2OII]; + data[jistart + 299] = 0.0 - k[905]*y_cur[IDX_eM] - k[6423]*y_cur[IDX_GRAINM]; + data[jistart + 300] = 0.0 + k[1412]*y_cur[IDX_CII]; + data[jistart + 301] = 0.0 + k[1412]*y_cur[IDX_HFI]; + data[jistart + 302] = 0.0 - k[6423]*y_cur[IDX_CFII]; + data[jistart + 303] = 0.0 - k[905]*y_cur[IDX_CFII]; + data[jistart + 304] = 0.0 - k[986]*y_cur[IDX_eM] - k[6632]*y_cur[IDX_GRAINM]; + data[jistart + 305] = 0.0 + k[172]*y_cur[IDX_CII]; + data[jistart + 306] = 0.0 + k[172]*y_cur[IDX_ClOI]; + data[jistart + 307] = 0.0 - k[6632]*y_cur[IDX_ClOII]; + data[jistart + 308] = 0.0 - k[986]*y_cur[IDX_ClOII]; + data[jistart + 309] = 0.0 - k[7105] - k[7287] - k[7469] - k[7687] - k[7688] - k[7689] - + k[7977] - k[7978] - k[7979] - k[8291]*y_cur[IDX_GHI]; + data[jistart + 310] = 0.0 + k[8290]*y_cur[IDX_GHI]; + data[jistart + 311] = 0.0 + k[8548]*y_cur[IDX_GCH3I]; + data[jistart + 312] = 0.0 + k[6923]; + data[jistart + 313] = 0.0 + k[8542]*y_cur[IDX_GCH3I] + k[8542]*y_cur[IDX_GCH3I] + + k[8548]*y_cur[IDX_GCH3CHOI]; + data[jistart + 314] = 0.0 + k[8290]*y_cur[IDX_GC2H5I] - k[8291]*y_cur[IDX_GC2H6I]; + data[jistart + 315] = 0.0 - k[7130] - k[7312] - k[7494] - k[7715] - k[8021] - + k[8317]*y_cur[IDX_GHI] - k[8612]*y_cur[IDX_GHI]; + data[jistart + 316] = 0.0 + k[7719] + k[8026]; + data[jistart + 317] = 0.0 + k[8316]*y_cur[IDX_GHI] + k[8379]*y_cur[IDX_GH2I]; + data[jistart + 318] = 0.0 + k[8487]*y_cur[IDX_GCHI]; + data[jistart + 319] = 0.0 + k[6948]; + data[jistart + 320] = 0.0 + k[8487]*y_cur[IDX_GC2HI]; + data[jistart + 321] = 0.0 + k[8379]*y_cur[IDX_GC3HI]; + data[jistart + 322] = 0.0 + k[8316]*y_cur[IDX_GC3HI] - k[8317]*y_cur[IDX_GC3H2I] - + k[8612]*y_cur[IDX_GC3H2I]; + data[jistart + 323] = 0.0 - k[7211] - k[7393] - k[7575] - k[7837] - k[7838] - k[8162] - + k[8163]; + data[jistart + 324] = 0.0 + k[8494]*y_cur[IDX_GCHI]; + data[jistart + 325] = 0.0 + k[8351]*y_cur[IDX_GHI] + k[8383]*y_cur[IDX_GH2I]; + data[jistart + 326] = 0.0 + k[7029]; + data[jistart + 327] = 0.0 + k[8494]*y_cur[IDX_GC4HI]; + data[jistart + 328] = 0.0 + k[8383]*y_cur[IDX_GC5HI]; + data[jistart + 329] = 0.0 + k[8351]*y_cur[IDX_GC5HI]; + data[jistart + 330] = 0.0 + k[7817] + k[8145]; + data[jistart + 331] = 0.0 + k[7847]; + data[jistart + 332] = 0.0 - k[7196] - k[7378] - k[7562] - k[7813] - k[7814] - k[8142] - + k[8143]; + data[jistart + 333] = 0.0 + k[7014]; + data[jistart + 334] = 0.0 + k[8190]; + data[jistart + 335] = 0.0 + k[8342]*y_cur[IDX_GHI]; + data[jistart + 336] = 0.0 - k[7186] - k[7368] - k[7550] - k[7799] - k[7800] - k[8124] - + k[8125]; + data[jistart + 337] = 0.0 + k[7004]; + data[jistart + 338] = 0.0 + k[8342]*y_cur[IDX_GC4H3I]; + data[jistart + 339] = 0.0 - k[7200] - k[7382] - k[7568] - k[7818] - k[7819] - k[7820] - + k[7821] - k[8146] - k[8147] - k[8148]; + data[jistart + 340] = 0.0 + k[8551]*y_cur[IDX_GCH3I]; + data[jistart + 341] = 0.0 + k[7018]; + data[jistart + 342] = 0.0 + k[8551]*y_cur[IDX_GCH3COI]; + data[jistart + 343] = 0.0 - k[7165] - k[7347] - k[7529] - k[7769] - k[7770] - k[7771] - + k[8089] - k[8090] - k[8091]; + data[jistart + 344] = 0.0 + k[8545]*y_cur[IDX_GCH3I]; + data[jistart + 345] = 0.0 + k[6983]; + data[jistart + 346] = 0.0 + k[8545]*y_cur[IDX_GCH3OI]; + data[jistart + 347] = 0.0 + k[7781] + k[8105]; + data[jistart + 348] = 0.0 + k[7796] + k[8121]; + data[jistart + 349] = 0.0 + k[7713] + k[8018] + k[8019]; + data[jistart + 350] = 0.0 - k[7124] - k[7306] - k[7488] - k[8314]*y_cur[IDX_GHI] - + k[8609]*y_cur[IDX_GHI]; + data[jistart + 351] = 0.0 + k[6942]; + data[jistart + 352] = 0.0 - k[8314]*y_cur[IDX_GClI] - k[8609]*y_cur[IDX_GClI]; + data[jistart + 353] = 0.0 + k[7749] + k[8063]; + data[jistart + 354] = 0.0 - k[7145] - k[7327] - k[7509] - k[7746] - k[8057] - k[8058] - + k[8059] - k[8060]; + data[jistart + 355] = 0.0 + k[6963]; + data[jistart + 356] = 0.0 + k[7995]; + data[jistart + 357] = 0.0 + k[7989] + k[7991]; + data[jistart + 358] = 0.0 - k[7102] - k[7284] - k[7466] - k[7684] - k[7971] - + k[8302]*y_cur[IDX_GHI] - k[8601]*y_cur[IDX_GHI]; + data[jistart + 359] = 0.0 + k[7686] + k[7973] + k[7976]; + data[jistart + 360] = 0.0 + k[8301]*y_cur[IDX_GHI]; + data[jistart + 361] = 0.0 + k[6920]; + data[jistart + 362] = 0.0 + k[8301]*y_cur[IDX_GSiI] - k[8302]*y_cur[IDX_GSiHI] - + k[8601]*y_cur[IDX_GSiHI]; + data[jistart + 363] = 0.0 + k[7695] + k[7993]; + data[jistart + 364] = 0.0 + k[7693] + k[7988] + k[7990]; + data[jistart + 365] = 0.0 + k[8302]*y_cur[IDX_GHI]; + data[jistart + 366] = 0.0 - k[7106] - k[7288] - k[7470] - k[7686] - k[7973] - k[7974] - + k[7975] - k[7976] - k[8303]*y_cur[IDX_GHI] - k[8602]*y_cur[IDX_GHI]; + data[jistart + 367] = 0.0 + k[6924]; + data[jistart + 368] = 0.0 + k[8302]*y_cur[IDX_GSiHI] - k[8303]*y_cur[IDX_GSiH2I] - + k[8602]*y_cur[IDX_GSiH2I]; + data[jistart + 369] = 0.0 - k[1027]*y_cur[IDX_eM] - k[6666]*y_cur[IDX_GRAINM]; + data[jistart + 370] = 0.0 + k[5513]*y_cur[IDX_COI]; + data[jistart + 371] = 0.0 + k[5513]*y_cur[IDX_C2H3II]; + data[jistart + 372] = 0.0 - k[6666]*y_cur[IDX_H3C3OII]; + data[jistart + 373] = 0.0 - k[1027]*y_cur[IDX_H3C3OII]; + data[jistart + 374] = 0.0 - k[1112]*y_cur[IDX_eM] - k[2454]*y_cur[IDX_H2I] - + k[6348]*y_cur[IDX_GRAINM]; + data[jistart + 375] = 0.0 + k[2440]*y_cur[IDX_H2I]; + data[jistart + 376] = 0.0 - k[6348]*y_cur[IDX_HFII]; + data[jistart + 377] = 0.0 + k[2440]*y_cur[IDX_FII] - k[2454]*y_cur[IDX_HFII]; + data[jistart + 378] = 0.0 - k[1112]*y_cur[IDX_HFII]; + data[jistart + 379] = 0.0 - k[1249]*y_cur[IDX_eM] - k[6592]*y_cur[IDX_GRAINM]; + data[jistart + 380] = 0.0 + k[3015]*y_cur[IDX_SiII]; + data[jistart + 381] = 0.0 + k[3015]*y_cur[IDX_HFI]; + data[jistart + 382] = 0.0 - k[6592]*y_cur[IDX_SiFII]; + data[jistart + 383] = 0.0 - k[1249]*y_cur[IDX_SiFII]; + data[jistart + 384] = 0.0 - k[887]*y_cur[IDX_eM] - k[888]*y_cur[IDX_eM] - + k[6853]*y_cur[IDX_GRAINM] - k[6854]*y_cur[IDX_GRAINM]; + data[jistart + 385] = 0.0 + k[5576]*y_cur[IDX_C4H2I]; + data[jistart + 386] = 0.0 + k[5576]*y_cur[IDX_C4H3II]; + data[jistart + 387] = 0.0 - k[6853]*y_cur[IDX_C8H5II] - k[6854]*y_cur[IDX_C8H5II]; + data[jistart + 388] = 0.0 - k[887]*y_cur[IDX_C8H5II] - k[888]*y_cur[IDX_C8H5II]; + data[jistart + 389] = 0.0 - k[899]*y_cur[IDX_eM] - k[900]*y_cur[IDX_eM] - + k[6865]*y_cur[IDX_GRAINM] - k[6866]*y_cur[IDX_GRAINM]; + data[jistart + 390] = 0.0 + k[5579]*y_cur[IDX_C4H2I]; + data[jistart + 391] = 0.0 + k[5579]*y_cur[IDX_C5H3II]; + data[jistart + 392] = 0.0 - k[6865]*y_cur[IDX_C9H5II] - k[6866]*y_cur[IDX_C9H5II]; + data[jistart + 393] = 0.0 - k[899]*y_cur[IDX_C9H5II] - k[900]*y_cur[IDX_C9H5II]; + data[jistart + 394] = 0.0 - k[926]*y_cur[IDX_eM] - k[2430]*y_cur[IDX_H2I] - + k[6760]*y_cur[IDX_GRAINM]; + data[jistart + 395] = 0.0 + k[2441]*y_cur[IDX_H2I]; + data[jistart + 396] = 0.0 - k[6760]*y_cur[IDX_CH3C3NII]; + data[jistart + 397] = 0.0 - k[2430]*y_cur[IDX_CH3C3NII] + k[2441]*y_cur[IDX_H2C4NII]; + data[jistart + 398] = 0.0 - k[926]*y_cur[IDX_CH3C3NII]; + data[jistart + 399] = 0.0 - k[7249] - k[7431] - k[7613] - k[7878] - k[8248] - k[8249] - + k[8250] - k[8251]; + data[jistart + 400] = 0.0 + k[8363]*y_cur[IDX_GHI] + k[8393]*y_cur[IDX_GH2I]; + data[jistart + 401] = 0.0 + k[8503]*y_cur[IDX_GCHI]; + data[jistart + 402] = 0.0 + k[7067]; + data[jistart + 403] = 0.0 + k[8503]*y_cur[IDX_GC9HI]; + data[jistart + 404] = 0.0 + k[8393]*y_cur[IDX_GC10HI]; + data[jistart + 405] = 0.0 + k[8363]*y_cur[IDX_GC10HI]; + data[jistart + 406] = 0.0 + k[8120]; + data[jistart + 407] = 0.0 - k[7180] - k[7362] - k[7544] - k[7791] - k[7792] - k[7793] - + k[7794] - k[8115] - k[8116] - k[8117] - k[8118] - + k[8341]*y_cur[IDX_GHI] - k[8631]*y_cur[IDX_GHI]; + data[jistart + 408] = 0.0 + k[8492]*y_cur[IDX_GCHI]; + data[jistart + 409] = 0.0 + k[8340]*y_cur[IDX_GHI] + k[8381]*y_cur[IDX_GH2I]; + data[jistart + 410] = 0.0 + k[8492]*y_cur[IDX_GC3HI]; + data[jistart + 411] = 0.0 + k[8381]*y_cur[IDX_GC4HI]; + data[jistart + 412] = 0.0 + k[6998]; + data[jistart + 413] = 0.0 + k[8340]*y_cur[IDX_GC4HI] - k[8341]*y_cur[IDX_GC4H2I] - + k[8631]*y_cur[IDX_GC4H2I]; + data[jistart + 414] = 0.0 - k[7189] - k[7371] - k[7553] - k[7804] - k[8131] - k[8132] - + k[8344]*y_cur[IDX_GHI] - k[8634]*y_cur[IDX_GHI]; + data[jistart + 415] = 0.0 + k[7812] + k[8141]; + data[jistart + 416] = 0.0 + k[7007]; + data[jistart + 417] = 0.0 - k[8344]*y_cur[IDX_GCH2CHCNI] - k[8634]*y_cur[IDX_GCH2CHCNI]; + data[jistart + 418] = 0.0 - k[7128] - k[7310] - k[7492] - k[7716] - k[8022] - k[8023] - + k[8318]*y_cur[IDX_GHI] - k[8613]*y_cur[IDX_GHI]; + data[jistart + 419] = 0.0 + k[7725] + k[8029] + k[8033]; + data[jistart + 420] = 0.0 + k[7733] + k[8038] + k[8042]; + data[jistart + 421] = 0.0 + k[8378]*y_cur[IDX_GH2I]; + data[jistart + 422] = 0.0 + k[6946]; + data[jistart + 423] = 0.0 + k[8378]*y_cur[IDX_GC3HI]; + data[jistart + 424] = 0.0 - k[8318]*y_cur[IDX_GH2CCCI] - k[8613]*y_cur[IDX_GH2CCCI]; + data[jistart + 425] = 0.0 + k[8132]; + data[jistart + 426] = 0.0 - k[7183] - k[7365] - k[7547] - k[7798] - k[8123]; + data[jistart + 427] = 0.0 + k[8343]*y_cur[IDX_GHI]; + data[jistart + 428] = 0.0 + k[8466]*y_cur[IDX_GNI]; + data[jistart + 429] = 0.0 + k[8466]*y_cur[IDX_GC3HI]; + data[jistart + 430] = 0.0 + k[7001]; + data[jistart + 431] = 0.0 + k[8343]*y_cur[IDX_GC3NI]; + data[jistart + 432] = 0.0 - k[7204] - k[7386] - k[7570] - k[7827] - k[7828] - k[7829] - + k[7830] - k[8151] - k[8152] - k[8153] - k[8154] - + k[8348]*y_cur[IDX_GHI]; + data[jistart + 433] = 0.0 + k[8452]*y_cur[IDX_GOI]; + data[jistart + 434] = 0.0 + k[8476]*y_cur[IDX_GCOI]; + data[jistart + 435] = 0.0 + k[8476]*y_cur[IDX_GSI]; + data[jistart + 436] = 0.0 + k[8452]*y_cur[IDX_GCSI]; + data[jistart + 437] = 0.0 + k[7022]; + data[jistart + 438] = 0.0 - k[8348]*y_cur[IDX_GOCSI]; + data[jistart + 439] = 0.0 + k[2454]*y_cur[IDX_H2I]; + data[jistart + 440] = 0.0 - k[1004]*y_cur[IDX_eM] - k[1005]*y_cur[IDX_eM] - + k[6349]*y_cur[IDX_GRAINM] - k[6350]*y_cur[IDX_GRAINM]; + data[jistart + 441] = 0.0 + k[2705]*y_cur[IDX_H3II]; + data[jistart + 442] = 0.0 + k[2705]*y_cur[IDX_HFI]; + data[jistart + 443] = 0.0 - k[6349]*y_cur[IDX_H2FII] - k[6350]*y_cur[IDX_H2FII]; + data[jistart + 444] = 0.0 + k[2454]*y_cur[IDX_HFII]; + data[jistart + 445] = 0.0 - k[1004]*y_cur[IDX_H2FII] - k[1005]*y_cur[IDX_H2FII]; + data[jistart + 446] = 0.0 + k[7191] + k[7373] + k[7555]; + data[jistart + 447] = 0.0 - k[5024]*y_cur[IDX_HI] - k[5786] - k[6087] - k[7009]; + data[jistart + 448] = 0.0 + k[1842]*y_cur[IDX_CH3CNI]; + data[jistart + 449] = 0.0 + k[1842]*y_cur[IDX_C4H7II]; + data[jistart + 450] = 0.0 + k[5072]*y_cur[IDX_CHI]; + data[jistart + 451] = 0.0 + k[4883]*y_cur[IDX_C2H3I]; + data[jistart + 452] = 0.0 + k[4883]*y_cur[IDX_C2H4I]; + data[jistart + 453] = 0.0 + k[5072]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 454] = 0.0 - k[5024]*y_cur[IDX_C4H6I]; + data[jistart + 455] = 0.0 - k[833]*y_cur[IDX_eM] - k[834]*y_cur[IDX_eM] - + k[6809]*y_cur[IDX_GRAINM] - k[6810]*y_cur[IDX_GRAINM]; + data[jistart + 456] = 0.0 + k[341]*y_cur[IDX_HII]; + data[jistart + 457] = 0.0 + k[341]*y_cur[IDX_C4PI]; + data[jistart + 458] = 0.0 - k[6809]*y_cur[IDX_C4PII] - k[6810]*y_cur[IDX_C4PII]; + data[jistart + 459] = 0.0 - k[833]*y_cur[IDX_C4PII] - k[834]*y_cur[IDX_C4PII]; + data[jistart + 460] = 0.0 - k[847]*y_cur[IDX_eM] - k[2416]*y_cur[IDX_H2I] - + k[6784]*y_cur[IDX_GRAINM]; + data[jistart + 461] = 0.0 + k[3412]*y_cur[IDX_NI]; + data[jistart + 462] = 0.0 + k[3412]*y_cur[IDX_C5HII]; + data[jistart + 463] = 0.0 - k[6784]*y_cur[IDX_C5NII]; + data[jistart + 464] = 0.0 - k[2416]*y_cur[IDX_C5NII]; + data[jistart + 465] = 0.0 - k[847]*y_cur[IDX_C5NII]; + data[jistart + 466] = 0.0 - k[860]*y_cur[IDX_eM] - k[2834]*y_cur[IDX_HI] - + k[6806]*y_cur[IDX_GRAINM]; + data[jistart + 467] = 0.0 + k[157]*y_cur[IDX_CII]; + data[jistart + 468] = 0.0 + k[157]*y_cur[IDX_C6H6I]; + data[jistart + 469] = 0.0 - k[6806]*y_cur[IDX_C6H6II]; + data[jistart + 470] = 0.0 - k[860]*y_cur[IDX_C6H6II]; + data[jistart + 471] = 0.0 - k[2834]*y_cur[IDX_C6H6II]; + data[jistart + 472] = 0.0 - k[912]*y_cur[IDX_eM] - k[2429]*y_cur[IDX_H2I] - + k[6651]*y_cur[IDX_GRAINM]; + data[jistart + 473] = 0.0 + k[6089]; + data[jistart + 474] = 0.0 + k[3401]*y_cur[IDX_NI]; + data[jistart + 475] = 0.0 + k[3401]*y_cur[IDX_C3H5II]; + data[jistart + 476] = 0.0 - k[6651]*y_cur[IDX_CH2CHCNII]; + data[jistart + 477] = 0.0 - k[2429]*y_cur[IDX_CH2CHCNII]; + data[jistart + 478] = 0.0 - k[912]*y_cur[IDX_CH2CHCNII]; + data[jistart + 479] = 0.0 - k[1270]*y_cur[IDX_eM] - k[1271]*y_cur[IDX_eM] - + k[6694]*y_cur[IDX_GRAINM] - k[6695]*y_cur[IDX_GRAINM]; + data[jistart + 480] = 0.0 + k[5649]*y_cur[IDX_CII]; + data[jistart + 481] = 0.0 + k[5649]*y_cur[IDX_COOCH3I]; + data[jistart + 482] = 0.0 - k[6694]*y_cur[IDX_COOCH3II] - k[6695]*y_cur[IDX_COOCH3II]; + data[jistart + 483] = 0.0 - k[1270]*y_cur[IDX_COOCH3II] - k[1271]*y_cur[IDX_COOCH3II]; + data[jistart + 484] = 0.0 - k[457]*y_cur[IDX_H2I] - k[2440]*y_cur[IDX_H2I] - + k[6347]*y_cur[IDX_GRAINM]; + data[jistart + 485] = 0.0 + k[3260]*y_cur[IDX_HeII]; + data[jistart + 486] = 0.0 + k[3260]*y_cur[IDX_HFI]; + data[jistart + 487] = 0.0 - k[6347]*y_cur[IDX_FII]; + data[jistart + 488] = 0.0 - k[457]*y_cur[IDX_FII] - k[2440]*y_cur[IDX_FII]; + data[jistart + 489] = 0.0 + k[8345]*y_cur[IDX_GHI]; + data[jistart + 490] = 0.0 - k[7195] - k[7377] - k[7561] - k[7809] - k[7810] - k[7811] - + k[7812] - k[8138] - k[8139] - k[8140] - k[8141]; + data[jistart + 491] = 0.0 + k[7013]; + data[jistart + 492] = 0.0 + k[8345]*y_cur[IDX_GC2H4CNI]; + data[jistart + 493] = 0.0 - k[7169] - k[7351] - k[7533] - k[7772] - k[7773] - k[7774] - + k[8092] - k[8093] - k[8094]; + data[jistart + 494] = 0.0 + k[8557]*y_cur[IDX_GCH3I]; + data[jistart + 495] = 0.0 + k[8546]*y_cur[IDX_GCH3I] + k[8571]*y_cur[IDX_GCH3CHOI]; + data[jistart + 496] = 0.0 + k[8571]*y_cur[IDX_GCH2OHI]; + data[jistart + 497] = 0.0 + k[6987]; + data[jistart + 498] = 0.0 + k[8546]*y_cur[IDX_GCH2OHI] + k[8557]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 499] = 0.0 - k[7136] - k[7318] - k[7500] - k[7727] - k[7728] - k[8035] - + k[8036] - k[8324]*y_cur[IDX_GHI] - k[8419]*y_cur[IDX_GCI] - + k[8619]*y_cur[IDX_GHI] - k[8670]*y_cur[IDX_GCI]; + data[jistart + 500] = 0.0 + k[6954]; + data[jistart + 501] = 0.0 + k[8445]*y_cur[IDX_GOI]; + data[jistart + 502] = 0.0 + k[8445]*y_cur[IDX_GC2I]; + data[jistart + 503] = 0.0 - k[8419]*y_cur[IDX_GC2OI] - k[8670]*y_cur[IDX_GC2OI]; + data[jistart + 504] = 0.0 - k[8324]*y_cur[IDX_GC2OI] - k[8619]*y_cur[IDX_GC2OI]; + data[jistart + 505] = 0.0 + k[7858]; + data[jistart + 506] = 0.0 - k[7225] - k[7407] - k[7589] - k[7853] - k[8183] - k[8184] - + k[8185]; + data[jistart + 507] = 0.0 + k[8496]*y_cur[IDX_GCHI]; + data[jistart + 508] = 0.0 + k[8353]*y_cur[IDX_GHI] + k[8385]*y_cur[IDX_GH2I]; + data[jistart + 509] = 0.0 + k[7043]; + data[jistart + 510] = 0.0 + k[8496]*y_cur[IDX_GC5HI]; + data[jistart + 511] = 0.0 + k[8385]*y_cur[IDX_GC6HI]; + data[jistart + 512] = 0.0 + k[8353]*y_cur[IDX_GC6HI]; + data[jistart + 513] = 0.0 + k[8254]; + data[jistart + 514] = 0.0 - k[7248] - k[7430] - k[7612] - k[7877] - k[8246] - k[8247] - + k[8364]*y_cur[IDX_GHI] - k[8650]*y_cur[IDX_GHI]; + data[jistart + 515] = 0.0 + k[8471]*y_cur[IDX_GNI]; + data[jistart + 516] = 0.0 + k[7066]; + data[jistart + 517] = 0.0 + k[8471]*y_cur[IDX_GC9I]; + data[jistart + 518] = 0.0 - k[8364]*y_cur[IDX_GC9NI] - k[8650]*y_cur[IDX_GC9NI]; + data[jistart + 519] = 0.0 - k[7160] - k[7342] - k[7524] - k[7764] - k[8082]; + data[jistart + 520] = 0.0 + k[8103]; + data[jistart + 521] = 0.0 + k[7824] + k[7826]; + data[jistart + 522] = 0.0 + k[8448]*y_cur[IDX_GOI]; + data[jistart + 523] = 0.0 + k[8515]*y_cur[IDX_GCOI]; + data[jistart + 524] = 0.0 + k[8447]*y_cur[IDX_GOI] + k[8515]*y_cur[IDX_GOHI]; + data[jistart + 525] = 0.0 + k[8447]*y_cur[IDX_GCOI] + k[8448]*y_cur[IDX_GHCOI]; + data[jistart + 526] = 0.0 + k[6978]; + data[jistart + 527] = 0.0 + k[8191]; + data[jistart + 528] = 0.0 + k[7759] + k[8077]; + data[jistart + 529] = 0.0 + k[8176]; + data[jistart + 530] = 0.0 + k[7814] + k[8143]; + data[jistart + 531] = 0.0 - k[7154] - k[7336] - k[7518] - k[7753] - k[8067]; + data[jistart + 532] = 0.0 + k[6972]; + data[jistart + 533] = 0.0 + k[8309]*y_cur[IDX_GHI]; + data[jistart + 534] = 0.0 - k[7119] - k[7301] - k[7483] - k[7705] - k[8005] - k[8006] - + k[8308]*y_cur[IDX_GHI] - k[8436]*y_cur[IDX_GOI] - + k[8454]*y_cur[IDX_GNI] - k[8606]*y_cur[IDX_GHI]; + data[jistart + 535] = 0.0 + k[8307]*y_cur[IDX_GHI]; + data[jistart + 536] = 0.0 + k[6937]; + data[jistart + 537] = 0.0 + k[8444]*y_cur[IDX_GOI]; + data[jistart + 538] = 0.0 - k[8454]*y_cur[IDX_GO2HI]; + data[jistart + 539] = 0.0 - k[8436]*y_cur[IDX_GO2HI] + k[8444]*y_cur[IDX_GOHI]; + data[jistart + 540] = 0.0 + k[8307]*y_cur[IDX_GO2I] - k[8308]*y_cur[IDX_GO2HI] + + k[8309]*y_cur[IDX_GH2O2I] - k[8606]*y_cur[IDX_GO2HI]; + data[jistart + 541] = 0.0 - k[7146] - k[7328] - k[7510] - k[7747] - k[8061] - + k[8328]*y_cur[IDX_GHI] - k[8329]*y_cur[IDX_GHI] - + k[8401]*y_cur[IDX_GCI] - k[8623]*y_cur[IDX_GHI] - + k[8624]*y_cur[IDX_GHI]; + data[jistart + 542] = 0.0 + k[6964]; + data[jistart + 543] = 0.0 + k[8446]*y_cur[IDX_GOI]; + data[jistart + 544] = 0.0 + k[8446]*y_cur[IDX_GCNI]; + data[jistart + 545] = 0.0 - k[8401]*y_cur[IDX_GOCNI]; + data[jistart + 546] = 0.0 - k[8328]*y_cur[IDX_GOCNI] - k[8329]*y_cur[IDX_GOCNI] - + k[8623]*y_cur[IDX_GOCNI] - k[8624]*y_cur[IDX_GOCNI]; + data[jistart + 547] = 0.0 + k[7839] + k[8164]; + data[jistart + 548] = 0.0 + k[7828] + k[8152]; + data[jistart + 549] = 0.0 - k[7176] - k[7358] - k[7540] - k[7786] - k[7787] - k[8110] - + k[8111] - k[8409]*y_cur[IDX_GCI] - k[8453]*y_cur[IDX_GOI] - + k[8697]*y_cur[IDX_GOI]; + data[jistart + 550] = 0.0 + k[8449]*y_cur[IDX_GOI]; + data[jistart + 551] = 0.0 + k[8450]*y_cur[IDX_GOI]; + data[jistart + 552] = 0.0 + k[8449]*y_cur[IDX_GHSI] + k[8450]*y_cur[IDX_GSI] - + k[8453]*y_cur[IDX_GSOI] - k[8697]*y_cur[IDX_GSOI]; + data[jistart + 553] = 0.0 - k[8409]*y_cur[IDX_GSOI]; + data[jistart + 554] = 0.0 + k[6994]; + data[jistart + 555] = 0.0 + k[8047] + k[8049]; + data[jistart + 556] = 0.0 + k[8168]; + data[jistart + 557] = 0.0 + k[7746] + k[8060]; + data[jistart + 558] = 0.0 - k[7137] - k[7319] - k[7501] - k[7734] - k[8043]; + data[jistart + 559] = 0.0 + k[7802]; + data[jistart + 560] = 0.0 + k[6955]; + data[jistart + 561] = 0.0 - k[994]*y_cur[IDX_eM] - k[995]*y_cur[IDX_eM] - + k[6536]*y_cur[IDX_GRAINM] - k[6537]*y_cur[IDX_GRAINM]; + data[jistart + 562] = 0.0 + k[2897]*y_cur[IDX_H2I]; + data[jistart + 563] = 0.0 + k[2695]*y_cur[IDX_H3II]; + data[jistart + 564] = 0.0 + k[2695]*y_cur[IDX_HCNOI]; + data[jistart + 565] = 0.0 - k[6536]*y_cur[IDX_H2CNOII] - k[6537]*y_cur[IDX_H2CNOII]; + data[jistart + 566] = 0.0 + k[2897]*y_cur[IDX_HCNOII]; + data[jistart + 567] = 0.0 - k[994]*y_cur[IDX_H2CNOII] - k[995]*y_cur[IDX_H2CNOII]; + data[jistart + 568] = 0.0 - k[1008]*y_cur[IDX_eM] - k[1009]*y_cur[IDX_eM] - + k[6538]*y_cur[IDX_GRAINM] - k[6539]*y_cur[IDX_GRAINM]; + data[jistart + 569] = 0.0 + k[3047]*y_cur[IDX_H2I]; + data[jistart + 570] = 0.0 + k[2707]*y_cur[IDX_H3II]; + data[jistart + 571] = 0.0 + k[2707]*y_cur[IDX_HNCOI]; + data[jistart + 572] = 0.0 - k[6538]*y_cur[IDX_H2NCOII] - k[6539]*y_cur[IDX_H2NCOII]; + data[jistart + 573] = 0.0 + k[3047]*y_cur[IDX_HNCOII]; + data[jistart + 574] = 0.0 - k[1008]*y_cur[IDX_H2NCOII] - k[1009]*y_cur[IDX_H2NCOII]; + data[jistart + 575] = 0.0 - k[1015]*y_cur[IDX_eM] - k[1016]*y_cur[IDX_eM] - + k[6545]*y_cur[IDX_GRAINM] - k[6546]*y_cur[IDX_GRAINM]; + data[jistart + 576] = 0.0 + k[3051]*y_cur[IDX_H2I]; + data[jistart + 577] = 0.0 + k[2711]*y_cur[IDX_H3II]; + data[jistart + 578] = 0.0 + k[2711]*y_cur[IDX_HOCNI]; + data[jistart + 579] = 0.0 - k[6545]*y_cur[IDX_H2OCNII] - k[6546]*y_cur[IDX_H2OCNII]; + data[jistart + 580] = 0.0 + k[3051]*y_cur[IDX_HOCNII]; + data[jistart + 581] = 0.0 - k[1015]*y_cur[IDX_H2OCNII] - k[1016]*y_cur[IDX_H2OCNII]; + data[jistart + 582] = 0.0 - k[1187]*y_cur[IDX_eM] - k[1188]*y_cur[IDX_eM] - + k[1189]*y_cur[IDX_eM] - k[6689]*y_cur[IDX_GRAINM] - + k[6690]*y_cur[IDX_GRAINM] - k[6691]*y_cur[IDX_GRAINM]; + data[jistart + 583] = 0.0 + k[1713]*y_cur[IDX_C2H4I]; + data[jistart + 584] = 0.0 + k[1713]*y_cur[IDX_PH2II]; + data[jistart + 585] = 0.0 - k[6689]*y_cur[IDX_PC2H4II] - k[6690]*y_cur[IDX_PC2H4II] - + k[6691]*y_cur[IDX_PC2H4II]; + data[jistart + 586] = 0.0 - k[1187]*y_cur[IDX_PC2H4II] - k[1188]*y_cur[IDX_PC2H4II] - + k[1189]*y_cur[IDX_PC2H4II]; + data[jistart + 587] = 0.0 - k[876]*y_cur[IDX_eM] - k[2421]*y_cur[IDX_H2I] - + k[6840]*y_cur[IDX_GRAINM]; + data[jistart + 588] = 0.0 + k[6050]; + data[jistart + 589] = 0.0 + k[3429]*y_cur[IDX_NI]; + data[jistart + 590] = 0.0 + k[3429]*y_cur[IDX_C7HII]; + data[jistart + 591] = 0.0 - k[6840]*y_cur[IDX_C7NII]; + data[jistart + 592] = 0.0 - k[2421]*y_cur[IDX_C7NII]; + data[jistart + 593] = 0.0 - k[876]*y_cur[IDX_C7NII]; + data[jistart + 594] = 0.0 - k[901]*y_cur[IDX_eM] - k[2426]*y_cur[IDX_H2I] - + k[6875]*y_cur[IDX_GRAINM]; + data[jistart + 595] = 0.0 + k[6068]; + data[jistart + 596] = 0.0 + k[3446]*y_cur[IDX_NI]; + data[jistart + 597] = 0.0 + k[3446]*y_cur[IDX_C9HII]; + data[jistart + 598] = 0.0 - k[6875]*y_cur[IDX_C9NII]; + data[jistart + 599] = 0.0 - k[2426]*y_cur[IDX_C9NII]; + data[jistart + 600] = 0.0 - k[901]*y_cur[IDX_C9NII]; + data[jistart + 601] = 0.0 - k[970]*y_cur[IDX_eM] - k[971]*y_cur[IDX_eM] - + k[6405]*y_cur[IDX_GRAINM] - k[6406]*y_cur[IDX_GRAINM]; + data[jistart + 602] = 0.0 + k[2086]*y_cur[IDX_CH3II]; + data[jistart + 603] = 0.0 + k[1988]*y_cur[IDX_NH3I]; + data[jistart + 604] = 0.0 + k[1988]*y_cur[IDX_CH2II] + k[2087]*y_cur[IDX_CH3II]; + data[jistart + 605] = 0.0 + k[2086]*y_cur[IDX_NH2I] + k[2087]*y_cur[IDX_NH3I]; + data[jistart + 606] = 0.0 - k[6405]*y_cur[IDX_CH3NHII] - k[6406]*y_cur[IDX_CH3NHII]; + data[jistart + 607] = 0.0 - k[970]*y_cur[IDX_CH3NHII] - k[971]*y_cur[IDX_CH3NHII]; + data[jistart + 608] = 0.0 + k[7181] + k[7363] + k[7545]; + data[jistart + 609] = 0.0 - k[172]*y_cur[IDX_CII] - k[3216]*y_cur[IDX_HeII] - + k[5394]*y_cur[IDX_OI] - k[5831] - k[6144] - k[6999]; + data[jistart + 610] = 0.0 + k[5380]*y_cur[IDX_OI]; + data[jistart + 611] = 0.0 + k[5380]*y_cur[IDX_CClI] - k[5394]*y_cur[IDX_ClOI]; + data[jistart + 612] = 0.0 - k[3216]*y_cur[IDX_ClOI]; + data[jistart + 613] = 0.0 - k[172]*y_cur[IDX_ClOI]; + data[jistart + 614] = 0.0 - k[7251] - k[7433] - k[7615] - k[7880] - k[8255] - k[8256] - + k[8257] - k[8258] - k[8259] - k[8260] - k[8261] - k[8262] - k[8263]; + data[jistart + 615] = 0.0 + k[8433]*y_cur[IDX_GCI]; + data[jistart + 616] = 0.0 + k[7069]; + data[jistart + 617] = 0.0 + k[8433]*y_cur[IDX_GC10I]; + data[jistart + 618] = 0.0 + k[8127]; + data[jistart + 619] = 0.0 + k[7886]; + data[jistart + 620] = 0.0 - k[7129] - k[7311] - k[7493] - k[7717] - k[7718] - k[8024] - + k[8025] - k[8321]*y_cur[IDX_GHI] - k[8418]*y_cur[IDX_GCI] - + k[8616]*y_cur[IDX_GHI] - k[8669]*y_cur[IDX_GCI]; + data[jistart + 621] = 0.0 + k[8462]*y_cur[IDX_GNI]; + data[jistart + 622] = 0.0 + k[8412]*y_cur[IDX_GCI]; + data[jistart + 623] = 0.0 + k[8462]*y_cur[IDX_GC2I]; + data[jistart + 624] = 0.0 + k[6947]; + data[jistart + 625] = 0.0 + k[8412]*y_cur[IDX_GCNI] - k[8418]*y_cur[IDX_GC2NI] - + k[8669]*y_cur[IDX_GC2NI]; + data[jistart + 626] = 0.0 - k[8321]*y_cur[IDX_GC2NI] - k[8616]*y_cur[IDX_GC2NI]; + data[jistart + 627] = 0.0 + k[7799] + k[8124]; + data[jistart + 628] = 0.0 - k[7133] - k[7315] - k[7497] - k[7721] - k[7722] - k[7723] - + k[7724] - k[7725] - k[8028] - k[8029] - k[8030] - k[8031] - k[8032] + - k[8033]; + data[jistart + 629] = 0.0 + k[8319]*y_cur[IDX_GHI]; + data[jistart + 630] = 0.0 + k[8489]*y_cur[IDX_GCHI]; + data[jistart + 631] = 0.0 + k[6951]; + data[jistart + 632] = 0.0 + k[8489]*y_cur[IDX_GC2H3I]; + data[jistart + 633] = 0.0 + k[8319]*y_cur[IDX_GCH2CCHI]; + data[jistart + 634] = 0.0 + k[8293]*y_cur[IDX_GHI]; + data[jistart + 635] = 0.0 - k[7103] - k[7285] - k[7467] - k[7685] - k[7972]; + data[jistart + 636] = 0.0 + k[8483]*y_cur[IDX_GCHI]; + data[jistart + 637] = 0.0 + k[6921]; + data[jistart + 638] = 0.0 + k[8523]*y_cur[IDX_GCH2I]; + data[jistart + 639] = 0.0 + k[8523]*y_cur[IDX_GNHI]; + data[jistart + 640] = 0.0 + k[8460]*y_cur[IDX_GCH3I]; + data[jistart + 641] = 0.0 + k[8460]*y_cur[IDX_GNI]; + data[jistart + 642] = 0.0 + k[8483]*y_cur[IDX_GNH2I]; + data[jistart + 643] = 0.0 + k[8293]*y_cur[IDX_GH2CNI]; + data[jistart + 644] = 0.0 + k[7800] + k[8125]; + data[jistart + 645] = 0.0 - k[7134] - k[7316] - k[7498] - k[7729] - k[7730] - k[7731] - + k[7732] - k[7733] - k[8037] - k[8038] - k[8039] - k[8040] - k[8041] + - k[8042]; + data[jistart + 646] = 0.0 + k[8320]*y_cur[IDX_GHI]; + data[jistart + 647] = 0.0 + k[8490]*y_cur[IDX_GCHI]; + data[jistart + 648] = 0.0 + k[6952]; + data[jistart + 649] = 0.0 + k[8490]*y_cur[IDX_GC2H3I]; + data[jistart + 650] = 0.0 + k[8320]*y_cur[IDX_GCH2CCHI]; + data[jistart + 651] = 0.0 - k[7142] - k[7324] - k[7506] - k[7741] - k[8052] - + k[8326]*y_cur[IDX_GHI] - k[8327]*y_cur[IDX_GHI] - + k[8402]*y_cur[IDX_GCI] - k[8621]*y_cur[IDX_GHI] - + k[8622]*y_cur[IDX_GHI]; + data[jistart + 652] = 0.0 + k[6960]; + data[jistart + 653] = 0.0 + k[8399]*y_cur[IDX_GCI]; + data[jistart + 654] = 0.0 + k[8399]*y_cur[IDX_GNOI] - k[8402]*y_cur[IDX_GCNOI]; + data[jistart + 655] = 0.0 - k[8326]*y_cur[IDX_GCNOI] - k[8327]*y_cur[IDX_GCNOI] - + k[8621]*y_cur[IDX_GCNOI] - k[8622]*y_cur[IDX_GCNOI]; + data[jistart + 656] = 0.0 + k[7811] + k[8140]; + data[jistart + 657] = 0.0 + k[7972]; + data[jistart + 658] = 0.0 - k[7095] - k[7277] - k[7459] - k[7650] - k[7937]; + data[jistart + 659] = 0.0 + k[8404]*y_cur[IDX_GCI]; + data[jistart + 660] = 0.0 + k[8403]*y_cur[IDX_GCI] + k[8479]*y_cur[IDX_GCHI]; + data[jistart + 661] = 0.0 + k[8479]*y_cur[IDX_GNHI]; + data[jistart + 662] = 0.0 + k[8403]*y_cur[IDX_GNHI] + k[8404]*y_cur[IDX_GNH2I]; + data[jistart + 663] = 0.0 + k[6913]; + data[jistart + 664] = 0.0 - k[7172] - k[7354] - k[7536] - k[7779] - k[8101] - + k[8400]*y_cur[IDX_GCI] - k[8442]*y_cur[IDX_GOI] - + k[8459]*y_cur[IDX_GNI]; + data[jistart + 665] = 0.0 + k[8463]*y_cur[IDX_GNI]; + data[jistart + 666] = 0.0 + k[8475]*y_cur[IDX_GSI]; + data[jistart + 667] = 0.0 + k[8464]*y_cur[IDX_GNI] + k[8475]*y_cur[IDX_GNHI]; + data[jistart + 668] = 0.0 + k[6990]; + data[jistart + 669] = 0.0 - k[8459]*y_cur[IDX_GNSI] + k[8463]*y_cur[IDX_GHSI] + + k[8464]*y_cur[IDX_GSI]; + data[jistart + 670] = 0.0 - k[8442]*y_cur[IDX_GNSI]; + data[jistart + 671] = 0.0 - k[8400]*y_cur[IDX_GNSI]; + data[jistart + 672] = 0.0 + k[7805] + k[8133]; + data[jistart + 673] = 0.0 + k[7808]; + data[jistart + 674] = 0.0 + k[7857]; + data[jistart + 675] = 0.0 + k[7842] + k[8169]; + data[jistart + 676] = 0.0 - k[7185] - k[7367] - k[7549] - k[7802] - k[8129]; + data[jistart + 677] = 0.0 + k[7003]; + data[jistart + 678] = 0.0 - k[988]*y_cur[IDX_eM] - k[2441]*y_cur[IDX_H2I] - + k[6745]*y_cur[IDX_GRAINM]; + data[jistart + 679] = 0.0 + k[2446]*y_cur[IDX_H2I]; + data[jistart + 680] = 0.0 + k[1350]*y_cur[IDX_CII]; + data[jistart + 681] = 0.0 + k[1350]*y_cur[IDX_CH2CHCNI]; + data[jistart + 682] = 0.0 - k[6745]*y_cur[IDX_H2C4NII]; + data[jistart + 683] = 0.0 - k[2441]*y_cur[IDX_H2C4NII] + k[2446]*y_cur[IDX_HC4NII]; + data[jistart + 684] = 0.0 - k[988]*y_cur[IDX_H2C4NII]; + data[jistart + 685] = 0.0 - k[993]*y_cur[IDX_eM] - k[6624]*y_cur[IDX_GRAINM]; + data[jistart + 686] = 0.0 + k[2492]*y_cur[IDX_H2COI]; + data[jistart + 687] = 0.0 + k[2083]*y_cur[IDX_CH3II]; + data[jistart + 688] = 0.0 + k[2492]*y_cur[IDX_CClII]; + data[jistart + 689] = 0.0 + k[2083]*y_cur[IDX_HClI]; + data[jistart + 690] = 0.0 - k[6624]*y_cur[IDX_H2CClII]; + data[jistart + 691] = 0.0 - k[993]*y_cur[IDX_H2CClII]; + data[jistart + 692] = 0.0 - k[1010]*y_cur[IDX_eM] - k[1011]*y_cur[IDX_eM] - + k[6431]*y_cur[IDX_GRAINM] - k[6432]*y_cur[IDX_GRAINM]; + data[jistart + 693] = 0.0 + k[2709]*y_cur[IDX_H3II]; + data[jistart + 694] = 0.0 + k[3524]*y_cur[IDX_O2I]; + data[jistart + 695] = 0.0 + k[3524]*y_cur[IDX_NH2II]; + data[jistart + 696] = 0.0 + k[2709]*y_cur[IDX_HNOI]; + data[jistart + 697] = 0.0 - k[6431]*y_cur[IDX_H2NOII] - k[6432]*y_cur[IDX_H2NOII]; + data[jistart + 698] = 0.0 - k[1010]*y_cur[IDX_H2NOII] - k[1011]*y_cur[IDX_H2NOII]; + data[jistart + 699] = 0.0 - k[1111]*y_cur[IDX_eM] - k[2453]*y_cur[IDX_H2I] - + k[6456]*y_cur[IDX_GRAINM]; + data[jistart + 700] = 0.0 + k[2439]*y_cur[IDX_H2I]; + data[jistart + 701] = 0.0 + k[2679]*y_cur[IDX_H3II]; + data[jistart + 702] = 0.0 + k[393]*y_cur[IDX_HII] + k[6195]; + data[jistart + 703] = 0.0 + k[393]*y_cur[IDX_HClI]; + data[jistart + 704] = 0.0 + k[2679]*y_cur[IDX_ClI]; + data[jistart + 705] = 0.0 - k[6456]*y_cur[IDX_HClII]; + data[jistart + 706] = 0.0 + k[2439]*y_cur[IDX_ClII] - k[2453]*y_cur[IDX_HClII]; + data[jistart + 707] = 0.0 - k[1111]*y_cur[IDX_HClII]; + data[jistart + 708] = 0.0 - k[1122]*y_cur[IDX_eM] - k[6589]*y_cur[IDX_GRAINM]; + data[jistart + 709] = 0.0 + k[2727]*y_cur[IDX_H3II] + k[2981]*y_cur[IDX_HCOII]; + data[jistart + 710] = 0.0 + k[3526]*y_cur[IDX_SI]; + data[jistart + 711] = 0.0 + k[3526]*y_cur[IDX_NH2II]; + data[jistart + 712] = 0.0 + k[2981]*y_cur[IDX_NSI]; + data[jistart + 713] = 0.0 + k[2727]*y_cur[IDX_NSI]; + data[jistart + 714] = 0.0 - k[6589]*y_cur[IDX_HNSII]; + data[jistart + 715] = 0.0 - k[1122]*y_cur[IDX_HNSII]; + data[jistart + 716] = 0.0 - k[137]*y_cur[IDX_H2I] - k[1125]*y_cur[IDX_eM] - + k[6390]*y_cur[IDX_GRAINM]; + data[jistart + 717] = 0.0 + k[2435]*y_cur[IDX_H2I]; + data[jistart + 718] = 0.0 + k[1394]*y_cur[IDX_H2OI]; + data[jistart + 719] = 0.0 + k[1394]*y_cur[IDX_CII]; + data[jistart + 720] = 0.0 + k[2676]*y_cur[IDX_COI]; + data[jistart + 721] = 0.0 + k[2676]*y_cur[IDX_H3II]; + data[jistart + 722] = 0.0 - k[6390]*y_cur[IDX_HOCII]; + data[jistart + 723] = 0.0 - k[137]*y_cur[IDX_HOCII] + k[2435]*y_cur[IDX_COII]; + data[jistart + 724] = 0.0 - k[1125]*y_cur[IDX_HOCII]; + data[jistart + 725] = 0.0 - k[1141]*y_cur[IDX_eM] - k[6625]*y_cur[IDX_GRAINM]; + data[jistart + 726] = 0.0 + k[2517]*y_cur[IDX_SI]; + data[jistart + 727] = 0.0 + k[2742]*y_cur[IDX_H3II] + k[2990]*y_cur[IDX_HCOII]; + data[jistart + 728] = 0.0 + k[2517]*y_cur[IDX_H2OII]; + data[jistart + 729] = 0.0 + k[2990]*y_cur[IDX_SOI]; + data[jistart + 730] = 0.0 + k[2742]*y_cur[IDX_SOI]; + data[jistart + 731] = 0.0 - k[6625]*y_cur[IDX_HSOII]; + data[jistart + 732] = 0.0 - k[1141]*y_cur[IDX_HSOII]; + data[jistart + 733] = 0.0 - k[1145]*y_cur[IDX_eM] - k[1146]*y_cur[IDX_eM] - + k[6723]*y_cur[IDX_GRAINM] - k[6724]*y_cur[IDX_GRAINM]; + data[jistart + 734] = 0.0 + k[2759]*y_cur[IDX_H3II] + k[3004]*y_cur[IDX_HCOII]; + data[jistart + 735] = 0.0 + k[3004]*y_cur[IDX_SiO2I]; + data[jistart + 736] = 0.0 + k[2759]*y_cur[IDX_SiO2I]; + data[jistart + 737] = 0.0 - k[6723]*y_cur[IDX_HSiO2II] - k[6724]*y_cur[IDX_HSiO2II]; + data[jistart + 738] = 0.0 - k[1145]*y_cur[IDX_HSiO2II] - k[1146]*y_cur[IDX_HSiO2II]; + data[jistart + 739] = 0.0 - k[1161]*y_cur[IDX_eM] - k[1162]*y_cur[IDX_eM] - + k[6526]*y_cur[IDX_GRAINM] - k[6527]*y_cur[IDX_GRAINM]; + data[jistart + 740] = 0.0 + k[2722]*y_cur[IDX_H3II] + k[2980]*y_cur[IDX_HCOII]; + data[jistart + 741] = 0.0 + k[2980]*y_cur[IDX_NH2CNI]; + data[jistart + 742] = 0.0 + k[2722]*y_cur[IDX_NH2CNI]; + data[jistart + 743] = 0.0 - k[6526]*y_cur[IDX_NH2CNHII] - k[6527]*y_cur[IDX_NH2CNHII]; + data[jistart + 744] = 0.0 - k[1161]*y_cur[IDX_NH2CNHII] - k[1162]*y_cur[IDX_NH2CNHII]; + data[jistart + 745] = 0.0 - k[772]*y_cur[IDX_eM] - k[773]*y_cur[IDX_eM] - + k[6576]*y_cur[IDX_GRAINM] - k[6577]*y_cur[IDX_GRAINM]; + data[jistart + 746] = 0.0 + k[150]*y_cur[IDX_CII] + k[328]*y_cur[IDX_HII] + k[5707] + + k[5992]; + data[jistart + 747] = 0.0 + k[150]*y_cur[IDX_C2H5OHI]; + data[jistart + 748] = 0.0 + k[328]*y_cur[IDX_C2H5OHI]; + data[jistart + 749] = 0.0 - k[6576]*y_cur[IDX_C2H5OHII] - k[6577]*y_cur[IDX_C2H5OHII]; + data[jistart + 750] = 0.0 - k[772]*y_cur[IDX_C2H5OHII] - k[773]*y_cur[IDX_C2H5OHII]; + data[jistart + 751] = 0.0 - k[785]*y_cur[IDX_eM] - k[6474]*y_cur[IDX_GRAINM]; + data[jistart + 752] = 0.0 + k[151]*y_cur[IDX_CII] + k[331]*y_cur[IDX_HII]; + data[jistart + 753] = 0.0 + k[2269]*y_cur[IDX_CO2I]; + data[jistart + 754] = 0.0 + k[2269]*y_cur[IDX_CNII]; + data[jistart + 755] = 0.0 + k[151]*y_cur[IDX_C2OI]; + data[jistart + 756] = 0.0 + k[331]*y_cur[IDX_C2OI]; + data[jistart + 757] = 0.0 - k[6474]*y_cur[IDX_C2OII]; + data[jistart + 758] = 0.0 - k[785]*y_cur[IDX_C2OII]; + data[jistart + 759] = 0.0 + k[8632]*y_cur[IDX_GHI]; + data[jistart + 760] = 0.0 + k[7186] + k[7368] + k[7550]; + data[jistart + 761] = 0.0 - k[5784] - k[5785] - k[6085] - k[6086] - k[7004]; + data[jistart + 762] = 0.0 + k[6038]; + data[jistart + 763] = 0.0 + k[5067]*y_cur[IDX_CHI]; + data[jistart + 764] = 0.0 + k[4869]*y_cur[IDX_C2I]; + data[jistart + 765] = 0.0 + k[5068]*y_cur[IDX_CHI]; + data[jistart + 766] = 0.0 + k[5067]*y_cur[IDX_CH2CCH2I] + k[5068]*y_cur[IDX_CH3CCHI]; + data[jistart + 767] = 0.0 + k[4869]*y_cur[IDX_C2H6I]; + data[jistart + 768] = 0.0 + k[8632]*y_cur[IDX_GC4H3I]; + data[jistart + 769] = 0.0 - k[1272]*y_cur[IDX_eM] - k[1273]*y_cur[IDX_eM] - + k[1274]*y_cur[IDX_eM] - k[6696]*y_cur[IDX_GRAINM] - + k[6697]*y_cur[IDX_GRAINM] - k[6698]*y_cur[IDX_GRAINM]; + data[jistart + 770] = 0.0 + k[5655]*y_cur[IDX_CII]; + data[jistart + 771] = 0.0 + k[5655]*y_cur[IDX_CH2OHCOI]; + data[jistart + 772] = 0.0 - k[6696]*y_cur[IDX_CH2OHCOII] - k[6697]*y_cur[IDX_CH2OHCOII] - + k[6698]*y_cur[IDX_CH2OHCOII]; + data[jistart + 773] = 0.0 - k[1272]*y_cur[IDX_CH2OHCOII] - k[1273]*y_cur[IDX_CH2OHCOII] - + k[1274]*y_cur[IDX_CH2OHCOII]; + data[jistart + 774] = 0.0 + k[8317]*y_cur[IDX_GHI]; + data[jistart + 775] = 0.0 + k[8318]*y_cur[IDX_GHI]; + data[jistart + 776] = 0.0 + k[7721] + k[7723] + k[8028] + k[8031]; + data[jistart + 777] = 0.0 + k[7729] + k[7731] + k[8037] + k[8040]; + data[jistart + 778] = 0.0 - k[7132] - k[7314] - k[7496] - k[7719] - k[7720] - k[8026] - + k[8027] - k[8319]*y_cur[IDX_GHI] - k[8320]*y_cur[IDX_GHI] - + k[8614]*y_cur[IDX_GHI] - k[8615]*y_cur[IDX_GHI]; + data[jistart + 779] = 0.0 + k[8413]*y_cur[IDX_GCI]; + data[jistart + 780] = 0.0 + k[8413]*y_cur[IDX_GC2H3I]; + data[jistart + 781] = 0.0 + k[6950]; + data[jistart + 782] = 0.0 + k[8317]*y_cur[IDX_GC3H2I] + k[8318]*y_cur[IDX_GH2CCCI] - + k[8319]*y_cur[IDX_GCH2CCHI] - k[8320]*y_cur[IDX_GCH2CCHI] - + k[8614]*y_cur[IDX_GCH2CCHI] - k[8615]*y_cur[IDX_GCH2CCHI]; + data[jistart + 783] = 0.0 + k[8325]*y_cur[IDX_GHI]; + data[jistart + 784] = 0.0 + k[7818]; + data[jistart + 785] = 0.0 - k[7143] - k[7325] - k[7507] - k[7742] - k[7743] - k[7744] - + k[7745] - k[8053] - k[8054] - k[8055] - k[8056]; + data[jistart + 786] = 0.0 + k[7762] + k[8080]; + data[jistart + 787] = 0.0 + k[6961]; + data[jistart + 788] = 0.0 + k[8325]*y_cur[IDX_GHC2OI]; + data[jistart + 789] = 0.0 - k[7112] - k[7294] - k[7476] - k[7694] - k[7992] - + k[8306]*y_cur[IDX_GHI] - k[8435]*y_cur[IDX_GOI] - + k[8477]*y_cur[IDX_GCHI] - k[8533]*y_cur[IDX_GCH2I] - + k[8541]*y_cur[IDX_GCH3I]; + data[jistart + 790] = 0.0 + k[8305]*y_cur[IDX_GHI]; + data[jistart + 791] = 0.0 + k[8440]*y_cur[IDX_GOI]; + data[jistart + 792] = 0.0 + k[8439]*y_cur[IDX_GOI]; + data[jistart + 793] = 0.0 + k[6930]; + data[jistart + 794] = 0.0 - k[8533]*y_cur[IDX_GHNOI]; + data[jistart + 795] = 0.0 - k[8435]*y_cur[IDX_GHNOI] + k[8439]*y_cur[IDX_GNHI] + + k[8440]*y_cur[IDX_GNH2I]; + data[jistart + 796] = 0.0 - k[8541]*y_cur[IDX_GHNOI]; + data[jistart + 797] = 0.0 - k[8477]*y_cur[IDX_GHNOI]; + data[jistart + 798] = 0.0 + k[8305]*y_cur[IDX_GNOI] - k[8306]*y_cur[IDX_GHNOI]; + data[jistart + 799] = 0.0 + k[8070] + k[8072]; + data[jistart + 800] = 0.0 + k[8459]*y_cur[IDX_GNI]; + data[jistart + 801] = 0.0 - k[7098] - k[7280] - k[7462] - k[7666] - k[7953]; + data[jistart + 802] = 0.0 + k[8525]*y_cur[IDX_GNHI] + k[8530]*y_cur[IDX_GNH2I]; + data[jistart + 803] = 0.0 + k[8530]*y_cur[IDX_GNOI]; + data[jistart + 804] = 0.0 + k[8458]*y_cur[IDX_GNI] + k[8524]*y_cur[IDX_GNHI] + + k[8524]*y_cur[IDX_GNHI] + k[8525]*y_cur[IDX_GNOI]; + data[jistart + 805] = 0.0 + k[8457]*y_cur[IDX_GNI] + k[8457]*y_cur[IDX_GNI] + + k[8458]*y_cur[IDX_GNHI] + k[8459]*y_cur[IDX_GNSI]; + data[jistart + 806] = 0.0 + k[6916]; + data[jistart + 807] = 0.0 - k[1073]*y_cur[IDX_eM] - k[2446]*y_cur[IDX_H2I] - + k[6744]*y_cur[IDX_GRAINM]; + data[jistart + 808] = 0.0 + k[1541]*y_cur[IDX_C2H2I]; + data[jistart + 809] = 0.0 + k[3406]*y_cur[IDX_NI]; + data[jistart + 810] = 0.0 + k[1541]*y_cur[IDX_C2NII]; + data[jistart + 811] = 0.0 + k[3406]*y_cur[IDX_C4H2II]; + data[jistart + 812] = 0.0 - k[6744]*y_cur[IDX_HC4NII]; + data[jistart + 813] = 0.0 - k[2446]*y_cur[IDX_HC4NII]; + data[jistart + 814] = 0.0 - k[1073]*y_cur[IDX_HC4NII]; + data[jistart + 815] = 0.0 - k[1094]*y_cur[IDX_eM] - k[1095]*y_cur[IDX_eM] - + k[1096]*y_cur[IDX_eM] - k[6532]*y_cur[IDX_GRAINM] - + k[6533]*y_cur[IDX_GRAINM] - k[6534]*y_cur[IDX_GRAINM]; + data[jistart + 816] = 0.0 + k[3053]*y_cur[IDX_H2I]; + data[jistart + 817] = 0.0 + k[2898]*y_cur[IDX_H2I]; + data[jistart + 818] = 0.0 + k[2713]*y_cur[IDX_H3II]; + data[jistart + 819] = 0.0 + k[2696]*y_cur[IDX_H3II]; + data[jistart + 820] = 0.0 + k[2696]*y_cur[IDX_HCNOI] + k[2713]*y_cur[IDX_HONCI]; + data[jistart + 821] = 0.0 - k[6532]*y_cur[IDX_HCNOHII] - k[6533]*y_cur[IDX_HCNOHII] - + k[6534]*y_cur[IDX_HCNOHII]; + data[jistart + 822] = 0.0 + k[2898]*y_cur[IDX_HCNOII] + k[3053]*y_cur[IDX_HONCII]; + data[jistart + 823] = 0.0 - k[1094]*y_cur[IDX_HCNOHII] - k[1095]*y_cur[IDX_HCNOHII] - + k[1096]*y_cur[IDX_HCNOHII]; + data[jistart + 824] = 0.0 - k[1118]*y_cur[IDX_eM] - k[1119]*y_cur[IDX_eM] - + k[1120]*y_cur[IDX_eM] - k[6549]*y_cur[IDX_GRAINM] - + k[6550]*y_cur[IDX_GRAINM] - k[6551]*y_cur[IDX_GRAINM]; + data[jistart + 825] = 0.0 + k[3052]*y_cur[IDX_H2I]; + data[jistart + 826] = 0.0 + k[3048]*y_cur[IDX_H2I]; + data[jistart + 827] = 0.0 + k[2712]*y_cur[IDX_H3II]; + data[jistart + 828] = 0.0 + k[2708]*y_cur[IDX_H3II]; + data[jistart + 829] = 0.0 + k[2708]*y_cur[IDX_HNCOI] + k[2712]*y_cur[IDX_HOCNI]; + data[jistart + 830] = 0.0 - k[6549]*y_cur[IDX_HNCOHII] - k[6550]*y_cur[IDX_HNCOHII] - + k[6551]*y_cur[IDX_HNCOHII]; + data[jistart + 831] = 0.0 + k[3048]*y_cur[IDX_HNCOII] + k[3052]*y_cur[IDX_HOCNII]; + data[jistart + 832] = 0.0 - k[1118]*y_cur[IDX_HNCOHII] - k[1119]*y_cur[IDX_HNCOHII] - + k[1120]*y_cur[IDX_HNCOHII]; + data[jistart + 833] = 0.0 - k[1126]*y_cur[IDX_eM] - k[1127]*y_cur[IDX_eM] - + k[3051]*y_cur[IDX_H2I] - k[3052]*y_cur[IDX_H2I] - + k[6524]*y_cur[IDX_GRAINM] - k[6525]*y_cur[IDX_GRAINM]; + data[jistart + 834] = 0.0 + k[3766]*y_cur[IDX_H2I]; + data[jistart + 835] = 0.0 + k[3768]*y_cur[IDX_H3II]; + data[jistart + 836] = 0.0 + k[3768]*y_cur[IDX_OCNI]; + data[jistart + 837] = 0.0 - k[6524]*y_cur[IDX_HOCNII] - k[6525]*y_cur[IDX_HOCNII]; + data[jistart + 838] = 0.0 - k[3051]*y_cur[IDX_HOCNII] - k[3052]*y_cur[IDX_HOCNII] + + k[3766]*y_cur[IDX_OCNII]; + data[jistart + 839] = 0.0 - k[1126]*y_cur[IDX_HOCNII] - k[1127]*y_cur[IDX_HOCNII]; + data[jistart + 840] = 0.0 - k[1149]*y_cur[IDX_eM] - k[2458]*y_cur[IDX_H2I] - + k[2845]*y_cur[IDX_HI] - k[6313]*y_cur[IDX_GRAINM]; + data[jistart + 841] = 0.0 + k[2390]*y_cur[IDX_HeI]; + data[jistart + 842] = 0.0 + k[3250]*y_cur[IDX_HeII]; + data[jistart + 843] = 0.0 + k[3250]*y_cur[IDX_HCOI]; + data[jistart + 844] = 0.0 + k[2390]*y_cur[IDX_H2II] + k[5547]*y_cur[IDX_HII]; + data[jistart + 845] = 0.0 + k[5547]*y_cur[IDX_HeI]; + data[jistart + 846] = 0.0 - k[6313]*y_cur[IDX_HeHII]; + data[jistart + 847] = 0.0 - k[2458]*y_cur[IDX_HeHII]; + data[jistart + 848] = 0.0 - k[1149]*y_cur[IDX_HeHII]; + data[jistart + 849] = 0.0 - k[2845]*y_cur[IDX_HeHII]; + data[jistart + 850] = 0.0 - k[1184]*y_cur[IDX_eM] - k[1185]*y_cur[IDX_eM] - + k[1186]*y_cur[IDX_eM] - k[6685]*y_cur[IDX_GRAINM] - + k[6686]*y_cur[IDX_GRAINM] - k[6687]*y_cur[IDX_GRAINM]; + data[jistart + 851] = 0.0 + k[1572]*y_cur[IDX_C2H2I]; + data[jistart + 852] = 0.0 + k[1711]*y_cur[IDX_C2H4I]; + data[jistart + 853] = 0.0 + k[1711]*y_cur[IDX_PHII]; + data[jistart + 854] = 0.0 + k[1572]*y_cur[IDX_PH3II]; + data[jistart + 855] = 0.0 - k[6685]*y_cur[IDX_PC2H3II] - k[6686]*y_cur[IDX_PC2H3II] - + k[6687]*y_cur[IDX_PC2H3II]; + data[jistart + 856] = 0.0 - k[1184]*y_cur[IDX_PC2H3II] - k[1185]*y_cur[IDX_PC2H3II] - + k[1186]*y_cur[IDX_PC2H3II]; + data[jistart + 857] = 0.0 - k[249]*y_cur[IDX_CI] - k[1211]*y_cur[IDX_eM] - + k[3752]*y_cur[IDX_OI] - k[6560]*y_cur[IDX_GRAINM]; + data[jistart + 858] = 0.0 + k[412]*y_cur[IDX_HII]; + data[jistart + 859] = 0.0 - k[3752]*y_cur[IDX_PNII]; + data[jistart + 860] = 0.0 + k[412]*y_cur[IDX_PNI]; + data[jistart + 861] = 0.0 - k[249]*y_cur[IDX_PNII]; + data[jistart + 862] = 0.0 - k[6560]*y_cur[IDX_PNII]; + data[jistart + 863] = 0.0 - k[1211]*y_cur[IDX_PNII]; + data[jistart + 864] = 0.0 - k[1215]*y_cur[IDX_eM] - k[1216]*y_cur[IDX_eM] - + k[1217]*y_cur[IDX_eM] - k[6617]*y_cur[IDX_GRAINM] - + k[6618]*y_cur[IDX_GRAINM] - k[6619]*y_cur[IDX_GRAINM]; + data[jistart + 865] = 0.0 + k[3600]*y_cur[IDX_NH3I]; + data[jistart + 866] = 0.0 + k[3598]*y_cur[IDX_NH3I]; + data[jistart + 867] = 0.0 + k[3598]*y_cur[IDX_PHII] + k[3600]*y_cur[IDX_PH2II]; + data[jistart + 868] = 0.0 - k[6617]*y_cur[IDX_PNH3II] - k[6618]*y_cur[IDX_PNH3II] - + k[6619]*y_cur[IDX_PNH3II]; + data[jistart + 869] = 0.0 - k[1215]*y_cur[IDX_PNH3II] - k[1216]*y_cur[IDX_PNH3II] - + k[1217]*y_cur[IDX_PNH3II]; + data[jistart + 870] = 0.0 - k[954]*y_cur[IDX_eM] - k[6688]*y_cur[IDX_GRAINM]; + data[jistart + 871] = 0.0 + k[3853]*y_cur[IDX_SOII]; + data[jistart + 872] = 0.0 + k[3824]*y_cur[IDX_SII]; + data[jistart + 873] = 0.0 + k[3847]*y_cur[IDX_C2H4I] + k[3853]*y_cur[IDX_CH2CCH2I]; + data[jistart + 874] = 0.0 + k[1716]*y_cur[IDX_SII] + k[3847]*y_cur[IDX_SOII]; + data[jistart + 875] = 0.0 + k[1716]*y_cur[IDX_C2H4I] + k[3824]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 876] = 0.0 - k[6688]*y_cur[IDX_CH3CSII]; + data[jistart + 877] = 0.0 - k[954]*y_cur[IDX_CH3CSII]; + data[jistart + 878] = 0.0 + k[7865] + k[8204]; + data[jistart + 879] = 0.0 + k[7856] + k[8188]; + data[jistart + 880] = 0.0 - k[7226] - k[7408] - k[7590] - k[7854] - k[8186] - + k[8354]*y_cur[IDX_GHI] - k[8553]*y_cur[IDX_GCH3I] - + k[8640]*y_cur[IDX_GHI] - k[8757]*y_cur[IDX_GCH3I]; + data[jistart + 881] = 0.0 + k[8212]; + data[jistart + 882] = 0.0 + k[8467]*y_cur[IDX_GNI]; + data[jistart + 883] = 0.0 + k[8467]*y_cur[IDX_GC5I]; + data[jistart + 884] = 0.0 - k[8553]*y_cur[IDX_GC5NI] - k[8757]*y_cur[IDX_GC5NI]; + data[jistart + 885] = 0.0 + k[7044]; + data[jistart + 886] = 0.0 - k[8354]*y_cur[IDX_GC5NI] - k[8640]*y_cur[IDX_GC5NI]; + data[jistart + 887] = 0.0 + k[7768] + k[8088]; + data[jistart + 888] = 0.0 + k[8008] + k[8009]; + data[jistart + 889] = 0.0 + k[7782] + k[8106]; + data[jistart + 890] = 0.0 + k[7696] + k[7996]; + data[jistart + 891] = 0.0 + k[7813] + k[8142]; + data[jistart + 892] = 0.0 + k[7753] + k[8067]; + data[jistart + 893] = 0.0 - k[7110] - k[7292] - k[7474]; + data[jistart + 894] = 0.0 + k[6928]; + data[jistart + 895] = 0.0 - k[989]*y_cur[IDX_eM] - k[990]*y_cur[IDX_eM] - + k[6849]*y_cur[IDX_GRAINM] - k[6850]*y_cur[IDX_GRAINM]; + data[jistart + 896] = 0.0 + k[2448]*y_cur[IDX_H2I]; + data[jistart + 897] = 0.0 + k[2692]*y_cur[IDX_H3II] + k[2967]*y_cur[IDX_HCOII]; + data[jistart + 898] = 0.0 + k[3433]*y_cur[IDX_NI]; + data[jistart + 899] = 0.0 + k[3433]*y_cur[IDX_C7H3II]; + data[jistart + 900] = 0.0 + k[2967]*y_cur[IDX_HC7NI]; + data[jistart + 901] = 0.0 + k[2692]*y_cur[IDX_HC7NI]; + data[jistart + 902] = 0.0 - k[6849]*y_cur[IDX_H2C7NII] - k[6850]*y_cur[IDX_H2C7NII]; + data[jistart + 903] = 0.0 + k[2448]*y_cur[IDX_HC7NII]; + data[jistart + 904] = 0.0 - k[989]*y_cur[IDX_H2C7NII] - k[990]*y_cur[IDX_H2C7NII]; + data[jistart + 905] = 0.0 - k[991]*y_cur[IDX_eM] - k[992]*y_cur[IDX_eM] - + k[6880]*y_cur[IDX_GRAINM] - k[6881]*y_cur[IDX_GRAINM]; + data[jistart + 906] = 0.0 + k[2449]*y_cur[IDX_H2I]; + data[jistart + 907] = 0.0 + k[2693]*y_cur[IDX_H3II] + k[2968]*y_cur[IDX_HCOII]; + data[jistart + 908] = 0.0 + k[3450]*y_cur[IDX_NI]; + data[jistart + 909] = 0.0 + k[3450]*y_cur[IDX_C9H3II]; + data[jistart + 910] = 0.0 + k[2968]*y_cur[IDX_HC9NI]; + data[jistart + 911] = 0.0 + k[2693]*y_cur[IDX_HC9NI]; + data[jistart + 912] = 0.0 - k[6880]*y_cur[IDX_H2C9NII] - k[6881]*y_cur[IDX_H2C9NII]; + data[jistart + 913] = 0.0 + k[2449]*y_cur[IDX_HC9NII]; + data[jistart + 914] = 0.0 - k[991]*y_cur[IDX_H2C9NII] - k[992]*y_cur[IDX_H2C9NII]; + data[jistart + 915] = 0.0 + k[7122] + k[7304] + k[7486]; + data[jistart + 916] = 0.0 + k[8606]*y_cur[IDX_GHI]; + data[jistart + 917] = 0.0 - k[5166]*y_cur[IDX_HI] - k[5167]*y_cur[IDX_HI] - + k[5398]*y_cur[IDX_OI] - k[5467]*y_cur[IDX_OHI] - k[5838] - k[6158] - + k[6940]; + data[jistart + 918] = 0.0 + k[5146]*y_cur[IDX_H2I] + k[5150]*y_cur[IDX_H2COI] + + k[5152]*y_cur[IDX_H2OI] + k[5339]*y_cur[IDX_O2HI] + + k[5339]*y_cur[IDX_O2HI]; + data[jistart + 919] = 0.0 + k[8738]*y_cur[IDX_GOHI] + k[8738]*y_cur[IDX_GOHI]; + data[jistart + 920] = 0.0 + k[5150]*y_cur[IDX_O2HI]; + data[jistart + 921] = 0.0 - k[5467]*y_cur[IDX_H2O2I]; + data[jistart + 922] = 0.0 + k[8606]*y_cur[IDX_GO2HI]; + data[jistart + 923] = 0.0 - k[5398]*y_cur[IDX_H2O2I]; + data[jistart + 924] = 0.0 + k[5152]*y_cur[IDX_O2HI]; + data[jistart + 925] = 0.0 + k[5146]*y_cur[IDX_O2HI]; + data[jistart + 926] = 0.0 - k[5166]*y_cur[IDX_H2O2I] - k[5167]*y_cur[IDX_H2O2I]; + data[jistart + 927] = 0.0 - k[1049]*y_cur[IDX_eM] - k[1050]*y_cur[IDX_eM] - + k[6770]*y_cur[IDX_GRAINM] - k[6771]*y_cur[IDX_GRAINM]; + data[jistart + 928] = 0.0 + k[2685]*y_cur[IDX_H3II] + k[2800]*y_cur[IDX_H3OII] + + k[2960]*y_cur[IDX_HCOII]; + data[jistart + 929] = 0.0 + k[5558]*y_cur[IDX_H2I]; + data[jistart + 930] = 0.0 + k[2800]*y_cur[IDX_H2S2I]; + data[jistart + 931] = 0.0 + k[2960]*y_cur[IDX_H2S2I]; + data[jistart + 932] = 0.0 + k[2685]*y_cur[IDX_H2S2I]; + data[jistart + 933] = 0.0 - k[6770]*y_cur[IDX_H3S2II] - k[6771]*y_cur[IDX_H3S2II]; + data[jistart + 934] = 0.0 + k[5558]*y_cur[IDX_HS2II]; + data[jistart + 935] = 0.0 - k[1049]*y_cur[IDX_H3S2II] - k[1050]*y_cur[IDX_H3S2II]; + data[jistart + 936] = 0.0 - k[1130]*y_cur[IDX_eM] - k[1131]*y_cur[IDX_eM] - + k[3053]*y_cur[IDX_H2I] - k[6520]*y_cur[IDX_GRAINM] - + k[6521]*y_cur[IDX_GRAINM]; + data[jistart + 937] = 0.0 + k[522]*y_cur[IDX_HeII]; + data[jistart + 938] = 0.0 + k[2673]*y_cur[IDX_H3II]; + data[jistart + 939] = 0.0 + k[522]*y_cur[IDX_HONCI]; + data[jistart + 940] = 0.0 + k[2673]*y_cur[IDX_CNOI]; + data[jistart + 941] = 0.0 - k[6520]*y_cur[IDX_HONCII] - k[6521]*y_cur[IDX_HONCII]; + data[jistart + 942] = 0.0 - k[3053]*y_cur[IDX_HONCII]; + data[jistart + 943] = 0.0 - k[1130]*y_cur[IDX_HONCII] - k[1131]*y_cur[IDX_HONCII]; + data[jistart + 944] = 0.0 - k[1199]*y_cur[IDX_eM] - k[1200]*y_cur[IDX_eM] - + k[1201]*y_cur[IDX_eM] - k[6578]*y_cur[IDX_GRAINM] - + k[6579]*y_cur[IDX_GRAINM] - k[6580]*y_cur[IDX_GRAINM]; + data[jistart + 945] = 0.0 + k[2319]*y_cur[IDX_HII]; + data[jistart + 946] = 0.0 + k[2212]*y_cur[IDX_CH4I]; + data[jistart + 947] = 0.0 + k[2212]*y_cur[IDX_PHII]; + data[jistart + 948] = 0.0 + k[2319]*y_cur[IDX_CH2PHI]; + data[jistart + 949] = 0.0 - k[6578]*y_cur[IDX_PCH3II] - k[6579]*y_cur[IDX_PCH3II] - + k[6580]*y_cur[IDX_PCH3II]; + data[jistart + 950] = 0.0 - k[1199]*y_cur[IDX_PCH3II] - k[1200]*y_cur[IDX_PCH3II] - + k[1201]*y_cur[IDX_PCH3II]; + data[jistart + 951] = 0.0 - k[1212]*y_cur[IDX_eM] - k[1213]*y_cur[IDX_eM] - + k[1214]*y_cur[IDX_eM] - k[6593]*y_cur[IDX_GRAINM] - + k[6594]*y_cur[IDX_GRAINM] - k[6595]*y_cur[IDX_GRAINM]; + data[jistart + 952] = 0.0 + k[3597]*y_cur[IDX_NH3I]; + data[jistart + 953] = 0.0 + k[3595]*y_cur[IDX_NH3I]; + data[jistart + 954] = 0.0 + k[3595]*y_cur[IDX_PII] + k[3597]*y_cur[IDX_PHII]; + data[jistart + 955] = 0.0 - k[6593]*y_cur[IDX_PNH2II] - k[6594]*y_cur[IDX_PNH2II] - + k[6595]*y_cur[IDX_PNH2II]; + data[jistart + 956] = 0.0 - k[1212]*y_cur[IDX_PNH2II] - k[1213]*y_cur[IDX_PNH2II] - + k[1214]*y_cur[IDX_PNH2II]; + data[jistart + 957] = 0.0 - k[733]*y_cur[IDX_eM] - k[734]*y_cur[IDX_eM] - + k[3683]*y_cur[IDX_OI] - k[6878]*y_cur[IDX_GRAINM] - k[6879]*y_cur[IDX_GRAINM]; - data[jistart + 12] = 0.0 + k[5692]; - data[jistart + 13] = 0.0 + k[1451]*y_cur[IDX_C2II] + - k[1464]*y_cur[IDX_SII] + k[3073]*y_cur[IDX_HeII] + - k[3479]*y_cur[IDX_NHII] + k[3631]*y_cur[IDX_OII] + - k[4876]*y_cur[IDX_SI] + k[5153]*y_cur[IDX_HI] + - k[5222]*y_cur[IDX_NI] + k[5343]*y_cur[IDX_OI] - - k[5521]*y_cur[IDX_CI] + k[5694] + k[5694] + k[5978] + k[5978]; - data[jistart + 14] = 0.0 - k[244]*y_cur[IDX_CI] + - k[739]*y_cur[IDX_eM] + k[739]*y_cur[IDX_eM] + k[1451]*y_cur[IDX_C2I] - + k[1456]*y_cur[IDX_SI] + k[3684]*y_cur[IDX_OI] + k[5975] + - k[6352]*y_cur[IDX_GRAINM] + k[6352]*y_cur[IDX_GRAINM]; - data[jistart + 15] = 0.0 - k[38]*y_cur[IDX_CI] + - k[3384]*y_cur[IDX_NI] + k[3991]*y_cur[IDX_CII]; - data[jistart + 16] = 0.0 + k[3087]*y_cur[IDX_HeII] - - k[4916]*y_cur[IDX_CI]; - data[jistart + 17] = 0.0 + k[741]*y_cur[IDX_eM] - - k[1849]*y_cur[IDX_CI] + k[3686]*y_cur[IDX_OI] + - k[6355]*y_cur[IDX_GRAINM]; - data[jistart + 18] = 0.0 - k[39]*y_cur[IDX_CI] + - k[4026]*y_cur[IDX_CII]; - data[jistart + 19] = 0.0 - k[4911]*y_cur[IDX_CI] - - k[4912]*y_cur[IDX_CI]; - data[jistart + 20] = 0.0 - k[1850]*y_cur[IDX_CI] + - k[3887]*y_cur[IDX_CM]; - data[jistart + 21] = 0.0 - k[4913]*y_cur[IDX_CI]; - data[jistart + 22] = 0.0 + k[755]*y_cur[IDX_eM] + - k[756]*y_cur[IDX_eM] - k[1851]*y_cur[IDX_CI] - k[1852]*y_cur[IDX_CI] - + k[3888]*y_cur[IDX_CM] + k[6370]*y_cur[IDX_GRAINM] + - k[6371]*y_cur[IDX_GRAINM]; - data[jistart + 23] = 0.0 + k[148]*y_cur[IDX_CII] - - k[4914]*y_cur[IDX_CI]; - data[jistart + 24] = 0.0 + k[763]*y_cur[IDX_eM] - - k[1853]*y_cur[IDX_CI] - k[1854]*y_cur[IDX_CI] + - k[6387]*y_cur[IDX_GRAINM]; - data[jistart + 25] = 0.0 + k[149]*y_cur[IDX_CII] - - k[4915]*y_cur[IDX_CI]; - data[jistart + 26] = 0.0 + k[150]*y_cur[IDX_CII]; - data[jistart + 27] = 0.0 - k[4917]*y_cur[IDX_CI] + k[5711] + - k[5996]; - data[jistart + 28] = 0.0 + k[781]*y_cur[IDX_eM] + - k[6467]*y_cur[IDX_GRAINM]; - data[jistart + 29] = 0.0 + k[151]*y_cur[IDX_CII] - - k[4918]*y_cur[IDX_CI] + k[5713] + k[5998]; - data[jistart + 30] = 0.0 + k[785]*y_cur[IDX_eM] + - k[6474]*y_cur[IDX_GRAINM]; - data[jistart + 31] = 0.0 + k[152]*y_cur[IDX_CII] + - k[3091]*y_cur[IDX_HeII] + k[5714]; - data[jistart + 32] = 0.0 + k[786]*y_cur[IDX_eM] + - k[6674]*y_cur[IDX_GRAINM]; - data[jistart + 33] = 0.0 - k[5522]*y_cur[IDX_CI] + k[5717] + - k[6001]; - data[jistart + 34] = 0.0 + k[788]*y_cur[IDX_eM] + - k[6455]*y_cur[IDX_GRAINM]; - data[jistart + 35] = 0.0 - k[40]*y_cur[IDX_CI] + - k[4061]*y_cur[IDX_CII]; - data[jistart + 36] = 0.0 - k[4920]*y_cur[IDX_CI]; - data[jistart + 37] = 0.0 + k[789]*y_cur[IDX_eM] + - k[6459]*y_cur[IDX_GRAINM]; - data[jistart + 38] = 0.0 - k[41]*y_cur[IDX_CI] + - k[4096]*y_cur[IDX_CII]; - data[jistart + 39] = 0.0 - k[4919]*y_cur[IDX_CI]; - data[jistart + 40] = 0.0 + k[792]*y_cur[IDX_eM] - - k[1855]*y_cur[IDX_CI] - k[1856]*y_cur[IDX_CI] + - k[6462]*y_cur[IDX_GRAINM]; - data[jistart + 41] = 0.0 - k[1857]*y_cur[IDX_CI] - - k[1858]*y_cur[IDX_CI]; - data[jistart + 42] = 0.0 - k[1859]*y_cur[IDX_CI] - - k[1860]*y_cur[IDX_CI]; - data[jistart + 43] = 0.0 - k[1861]*y_cur[IDX_CI]; - data[jistart + 44] = 0.0 - k[4921]*y_cur[IDX_CI]; - data[jistart + 45] = 0.0 - k[42]*y_cur[IDX_CI] + - k[4131]*y_cur[IDX_CII]; - data[jistart + 46] = 0.0 + k[153]*y_cur[IDX_CII] - - k[4922]*y_cur[IDX_CI]; - data[jistart + 47] = 0.0 + k[5724]; - data[jistart + 48] = 0.0 + k[154]*y_cur[IDX_CII]; - data[jistart + 49] = 0.0 + k[816]*y_cur[IDX_eM] + - k[6775]*y_cur[IDX_GRAINM]; - data[jistart + 50] = 0.0 + k[3106]*y_cur[IDX_HeII] - - k[4923]*y_cur[IDX_CI] + k[5728] + k[6012]; - data[jistart + 51] = 0.0 + k[820]*y_cur[IDX_eM] + - k[6616]*y_cur[IDX_GRAINM]; - data[jistart + 52] = 0.0 - k[43]*y_cur[IDX_CI] + - k[4166]*y_cur[IDX_CII]; - data[jistart + 53] = 0.0 - k[4925]*y_cur[IDX_CI]; - data[jistart + 54] = 0.0 - k[1862]*y_cur[IDX_CI]; - data[jistart + 55] = 0.0 - k[44]*y_cur[IDX_CI] + - k[4201]*y_cur[IDX_CII]; - data[jistart + 56] = 0.0 + k[177]*y_cur[IDX_CII] - - k[4961]*y_cur[IDX_CI]; - data[jistart + 57] = 0.0 - k[1863]*y_cur[IDX_CI] - - k[1864]*y_cur[IDX_CI] + k[3889]*y_cur[IDX_CM]; - data[jistart + 58] = 0.0 + k[155]*y_cur[IDX_CII] + - k[3109]*y_cur[IDX_HeII] - k[4924]*y_cur[IDX_CI]; - data[jistart + 59] = 0.0 - k[1865]*y_cur[IDX_CI] - - k[1866]*y_cur[IDX_CI] + k[3890]*y_cur[IDX_CM]; - data[jistart + 60] = 0.0 + k[5786] + k[6087]; - data[jistart + 61] = 0.0 + k[832]*y_cur[IDX_eM] + - k[6741]*y_cur[IDX_GRAINM]; - data[jistart + 62] = 0.0 + k[5734]; - data[jistart + 63] = 0.0 + k[833]*y_cur[IDX_eM] + - k[6809]*y_cur[IDX_GRAINM]; - data[jistart + 64] = 0.0 + k[156]*y_cur[IDX_CII]; - data[jistart + 65] = 0.0 + k[836]*y_cur[IDX_eM] + - k[3891]*y_cur[IDX_CM] + k[6816]*y_cur[IDX_GRAINM]; - data[jistart + 66] = 0.0 + k[3118]*y_cur[IDX_HeII] - - k[4926]*y_cur[IDX_CI] + k[5738]; - data[jistart + 67] = 0.0 - k[45]*y_cur[IDX_CI] + - k[4236]*y_cur[IDX_CII]; - data[jistart + 68] = 0.0 - k[4928]*y_cur[IDX_CI]; - data[jistart + 69] = 0.0 + k[839]*y_cur[IDX_eM] - - k[1867]*y_cur[IDX_CI] + k[6721]*y_cur[IDX_GRAINM]; - data[jistart + 70] = 0.0 - k[46]*y_cur[IDX_CI] + - k[4271]*y_cur[IDX_CII]; - data[jistart + 71] = 0.0 - k[4927]*y_cur[IDX_CI]; - data[jistart + 72] = 0.0 - k[1868]*y_cur[IDX_CI] - - k[1869]*y_cur[IDX_CI]; - data[jistart + 73] = 0.0 - k[1870]*y_cur[IDX_CI] - - k[1871]*y_cur[IDX_CI]; - data[jistart + 74] = 0.0 - k[4929]*y_cur[IDX_CI]; - data[jistart + 75] = 0.0 + k[4306]*y_cur[IDX_CII]; - data[jistart + 76] = 0.0 + k[3126]*y_cur[IDX_HeII] - - k[4930]*y_cur[IDX_CI] - k[4931]*y_cur[IDX_CI] + k[5748] + k[6033]; - data[jistart + 77] = 0.0 + k[849]*y_cur[IDX_eM] + - k[6781]*y_cur[IDX_GRAINM]; - data[jistart + 78] = 0.0 - k[47]*y_cur[IDX_CI] + - k[4341]*y_cur[IDX_CII]; - data[jistart + 79] = 0.0 - k[4933]*y_cur[IDX_CI]; - data[jistart + 80] = 0.0 + k[850]*y_cur[IDX_eM] + - k[6782]*y_cur[IDX_GRAINM]; - data[jistart + 81] = 0.0 - k[48]*y_cur[IDX_CI] + - k[4376]*y_cur[IDX_CII]; - data[jistart + 82] = 0.0 - k[4932]*y_cur[IDX_CI]; - data[jistart + 83] = 0.0 - k[1872]*y_cur[IDX_CI] - - k[1873]*y_cur[IDX_CI]; - data[jistart + 84] = 0.0 - k[1874]*y_cur[IDX_CI] - - k[1875]*y_cur[IDX_CI]; - data[jistart + 85] = 0.0 + k[157]*y_cur[IDX_CII]; - data[jistart + 86] = 0.0 + k[3135]*y_cur[IDX_HeII] - - k[4934]*y_cur[IDX_CI] + k[5756] + k[6042]; - data[jistart + 87] = 0.0 + k[865]*y_cur[IDX_eM] + - k[6823]*y_cur[IDX_GRAINM]; - data[jistart + 88] = 0.0 - k[49]*y_cur[IDX_CI] + - k[4411]*y_cur[IDX_CII]; - data[jistart + 89] = 0.0 - k[4936]*y_cur[IDX_CI]; - data[jistart + 90] = 0.0 + k[866]*y_cur[IDX_eM] - - k[1876]*y_cur[IDX_CI] + k[6824]*y_cur[IDX_GRAINM]; - data[jistart + 91] = 0.0 - k[50]*y_cur[IDX_CI] + - k[4446]*y_cur[IDX_CII]; - data[jistart + 92] = 0.0 - k[4935]*y_cur[IDX_CI]; - data[jistart + 93] = 0.0 - k[1877]*y_cur[IDX_CI] - - k[1878]*y_cur[IDX_CI]; - data[jistart + 94] = 0.0 - k[1879]*y_cur[IDX_CI] - - k[1880]*y_cur[IDX_CI]; - data[jistart + 95] = 0.0 - k[4937]*y_cur[IDX_CI]; - data[jistart + 96] = 0.0 + k[3143]*y_cur[IDX_HeII] - - k[4938]*y_cur[IDX_CI] + k[5762] + k[6052]; - data[jistart + 97] = 0.0 + k[878]*y_cur[IDX_eM] + - k[6837]*y_cur[IDX_GRAINM]; - data[jistart + 98] = 0.0 - k[51]*y_cur[IDX_CI] + - k[4481]*y_cur[IDX_CII]; - data[jistart + 99] = 0.0 - k[4940]*y_cur[IDX_CI]; - data[jistart + 100] = 0.0 + k[879]*y_cur[IDX_eM] + - k[6838]*y_cur[IDX_GRAINM]; - data[jistart + 101] = 0.0 - k[52]*y_cur[IDX_CI] + - k[4516]*y_cur[IDX_CII]; - data[jistart + 102] = 0.0 - k[4939]*y_cur[IDX_CI]; - data[jistart + 103] = 0.0 - k[1881]*y_cur[IDX_CI] - - k[1882]*y_cur[IDX_CI]; - data[jistart + 104] = 0.0 - k[1883]*y_cur[IDX_CI] - - k[1884]*y_cur[IDX_CI]; - data[jistart + 105] = 0.0 + k[3150]*y_cur[IDX_HeII] + k[5767] + - k[6060]; - data[jistart + 106] = 0.0 + k[890]*y_cur[IDX_eM] + - k[6856]*y_cur[IDX_GRAINM]; - data[jistart + 107] = 0.0 - k[53]*y_cur[IDX_CI] + - k[4551]*y_cur[IDX_CII]; - data[jistart + 108] = 0.0 - k[4942]*y_cur[IDX_CI]; - data[jistart + 109] = 0.0 + k[891]*y_cur[IDX_eM] - - k[1885]*y_cur[IDX_CI] + k[6857]*y_cur[IDX_GRAINM]; - data[jistart + 110] = 0.0 - k[54]*y_cur[IDX_CI] + - k[4586]*y_cur[IDX_CII]; - data[jistart + 111] = 0.0 - k[4941]*y_cur[IDX_CI]; - data[jistart + 112] = 0.0 - k[1886]*y_cur[IDX_CI] - - k[1887]*y_cur[IDX_CI]; - data[jistart + 113] = 0.0 - k[1888]*y_cur[IDX_CI] - - k[1889]*y_cur[IDX_CI]; - data[jistart + 114] = 0.0 - k[4943]*y_cur[IDX_CI]; - data[jistart + 115] = 0.0 + k[158]*y_cur[IDX_CII] + k[5774] + - k[6071]; - data[jistart + 116] = 0.0 + k[902]*y_cur[IDX_eM] + - k[6662]*y_cur[IDX_GRAINM]; - data[jistart + 117] = 0.0 + k[159]*y_cur[IDX_CII] + - k[5380]*y_cur[IDX_OI] + k[5775] + k[6072]; - data[jistart + 118] = 0.0 + k[904]*y_cur[IDX_eM] + - k[6599]*y_cur[IDX_GRAINM]; - data[jistart + 119] = 0.0 + k[905]*y_cur[IDX_eM] + - k[6423]*y_cur[IDX_GRAINM]; - data[jistart + 120] = 0.0 + k[134]*y_cur[IDX_H2I] + - k[141]*y_cur[IDX_HI] + k[170]*y_cur[IDX_CII] + - k[2245]*y_cur[IDX_COII] + k[2260]*y_cur[IDX_NH3II] - - k[4955]*y_cur[IDX_CI] + k[5081]*y_cur[IDX_NI] + - k[5097]*y_cur[IDX_OI] + k[5101]*y_cur[IDX_SI] + - k[5160]*y_cur[IDX_HI] + k[5821] + k[6131]; - data[jistart + 121] = 0.0 + k[906]*y_cur[IDX_eM] - - k[1890]*y_cur[IDX_CI] + k[1937]*y_cur[IDX_CH3OHI] + - k[1949]*y_cur[IDX_H2COI] + k[1952]*y_cur[IDX_H2OI] + - k[1954]*y_cur[IDX_H2SI] + k[1958]*y_cur[IDX_HCNI] + - k[1960]*y_cur[IDX_HNCI] + k[1964]*y_cur[IDX_NH3I] + - k[1971]*y_cur[IDX_OCSI] + k[1974]*y_cur[IDX_SI] + k[6073] + - k[6315]*y_cur[IDX_GRAINM]; - data[jistart + 122] = 0.0 - k[55]*y_cur[IDX_CI] + - k[4621]*y_cur[IDX_CII]; - data[jistart + 123] = 0.0 + k[160]*y_cur[IDX_CII] - - k[4944]*y_cur[IDX_CI] - k[4945]*y_cur[IDX_CI]; - data[jistart + 124] = 0.0 + k[907]*y_cur[IDX_eM] + - k[908]*y_cur[IDX_eM] - k[1891]*y_cur[IDX_CI] + - k[6316]*y_cur[IDX_GRAINM] + k[6317]*y_cur[IDX_GRAINM]; - data[jistart + 125] = 0.0 + k[162]*y_cur[IDX_CII] - - k[4947]*y_cur[IDX_CI]; - data[jistart + 126] = 0.0 - k[1892]*y_cur[IDX_CI] - - k[1893]*y_cur[IDX_CI] + k[3892]*y_cur[IDX_CM]; - data[jistart + 127] = 0.0 + k[161]*y_cur[IDX_CII] - - k[4946]*y_cur[IDX_CI]; - data[jistart + 128] = 0.0 + k[5784] + k[5785] + k[6085] + k[6086]; - data[jistart + 129] = 0.0 + k[163]*y_cur[IDX_CII] - - k[4948]*y_cur[IDX_CI]; - data[jistart + 130] = 0.0 + k[164]*y_cur[IDX_CII]; - data[jistart + 131] = 0.0 + k[5661]*y_cur[IDX_CII]; - data[jistart + 132] = 0.0 + k[5655]*y_cur[IDX_CII]; - data[jistart + 133] = 0.0 - k[4949]*y_cur[IDX_CI]; - data[jistart + 134] = 0.0 - k[1894]*y_cur[IDX_CI] + - k[3893]*y_cur[IDX_CM]; - data[jistart + 135] = 0.0 - k[1895]*y_cur[IDX_CI]; - data[jistart + 136] = 0.0 - k[4950]*y_cur[IDX_CI]; - data[jistart + 137] = 0.0 - k[1896]*y_cur[IDX_CI]; - data[jistart + 138] = 0.0 - k[4951]*y_cur[IDX_CI]; - data[jistart + 139] = 0.0 - k[1897]*y_cur[IDX_CI]; - data[jistart + 140] = 0.0 + k[165]*y_cur[IDX_CII] - - k[4952]*y_cur[IDX_CI] - k[4953]*y_cur[IDX_CI]; - data[jistart + 141] = 0.0 + k[166]*y_cur[IDX_CII] - - k[4954]*y_cur[IDX_CI]; - data[jistart + 142] = 0.0 + k[167]*y_cur[IDX_CII]; - data[jistart + 143] = 0.0 + k[5639]*y_cur[IDX_CII]; - data[jistart + 144] = 0.0 + k[168]*y_cur[IDX_CII]; - data[jistart + 145] = 0.0 + k[5667]*y_cur[IDX_CII]; - data[jistart + 146] = 0.0 + k[5627]*y_cur[IDX_CII]; - data[jistart + 147] = 0.0 + k[169]*y_cur[IDX_CII]; - data[jistart + 148] = 0.0 + k[1937]*y_cur[IDX_CHII]; - data[jistart + 149] = 0.0 - k[1898]*y_cur[IDX_CI]; - data[jistart + 150] = 0.0 + k[3203]*y_cur[IDX_HeII] + - k[3639]*y_cur[IDX_OII] - k[4956]*y_cur[IDX_CI] + - k[5125]*y_cur[IDX_SI] + k[5260]*y_cur[IDX_NI] + - k[5261]*y_cur[IDX_NI] + k[5388]*y_cur[IDX_OI] + k[5823] + k[6134]; - data[jistart + 151] = 0.0 - k[245]*y_cur[IDX_CI] + - k[977]*y_cur[IDX_eM] + k[3456]*y_cur[IDX_NI] + - k[6359]*y_cur[IDX_GRAINM]; - data[jistart + 152] = 0.0 + k[4656]*y_cur[IDX_CII]; - data[jistart + 153] = 0.0 + k[979]*y_cur[IDX_eM] + - k[3894]*y_cur[IDX_CM] + k[6469]*y_cur[IDX_GRAINM]; - data[jistart + 154] = 0.0 + k[3344]*y_cur[IDX_NII] - - k[4957]*y_cur[IDX_CI] + k[5163]*y_cur[IDX_HI] + - k[5492]*y_cur[IDX_SiI] + k[5826] + k[6138]; - data[jistart + 155] = 0.0 - k[246]*y_cur[IDX_CI] + - k[980]*y_cur[IDX_eM] + k[2245]*y_cur[IDX_CHI] + - k[6373]*y_cur[IDX_GRAINM]; - data[jistart + 156] = 0.0 + k[3209]*y_cur[IDX_HeII]; - data[jistart + 157] = 0.0 + k[5649]*y_cur[IDX_CII]; - data[jistart + 158] = 0.0 + k[5644]*y_cur[IDX_CII]; - data[jistart + 159] = 0.0 + k[171]*y_cur[IDX_CII] + - k[3212]*y_cur[IDX_HeII] + k[5827] + k[6139]; - data[jistart + 160] = 0.0 + k[984]*y_cur[IDX_eM] + - k[6511]*y_cur[IDX_GRAINM]; - data[jistart + 161] = 0.0 + k[3214]*y_cur[IDX_HeII] - - k[4958]*y_cur[IDX_CI] + k[5393]*y_cur[IDX_OI] + k[5829] + k[6142]; - data[jistart + 162] = 0.0 + k[985]*y_cur[IDX_eM] + k[6140] + - k[6535]*y_cur[IDX_GRAINM]; - data[jistart + 163] = 0.0 + k[172]*y_cur[IDX_CII]; - data[jistart + 164] = 0.0 + k[173]*y_cur[IDX_CII]; - data[jistart + 165] = 0.0 + k[3895]*y_cur[IDX_CM]; - data[jistart + 166] = 0.0 + k[7073] + k[7255] + k[7437]; - data[jistart + 167] = 0.0 + k[6314]*y_cur[IDX_CII] + - k[6315]*y_cur[IDX_CHII] + k[6316]*y_cur[IDX_CH2II] + - k[6317]*y_cur[IDX_CH2II] + k[6352]*y_cur[IDX_C2II] + - k[6352]*y_cur[IDX_C2II] + k[6355]*y_cur[IDX_C2HII] + - k[6359]*y_cur[IDX_CNII] + k[6370]*y_cur[IDX_C2H3II] + - k[6371]*y_cur[IDX_C2H3II] + k[6373]*y_cur[IDX_COII] + - k[6387]*y_cur[IDX_C2H4II] + k[6423]*y_cur[IDX_CFII] + - k[6455]*y_cur[IDX_C3II] + k[6459]*y_cur[IDX_C3HII] + - k[6462]*y_cur[IDX_C3H2II] + k[6467]*y_cur[IDX_C2NII] + - k[6469]*y_cur[IDX_CNCII] + k[6474]*y_cur[IDX_C2OII] + - k[6481]*y_cur[IDX_SiCII] + k[6488]*y_cur[IDX_HC2OII] + - k[6511]*y_cur[IDX_CPII] + k[6535]*y_cur[IDX_CSII] + - k[6599]*y_cur[IDX_CClII] + k[6616]*y_cur[IDX_C4II] + - k[6643]*y_cur[IDX_SiC2II] + k[6662]*y_cur[IDX_CCPII] + - k[6674]*y_cur[IDX_C2SII] + k[6706]*y_cur[IDX_OCSII] + - k[6721]*y_cur[IDX_C5HII] + k[6741]*y_cur[IDX_C4NII] + - k[6746]*y_cur[IDX_SiC3II] + k[6774]*y_cur[IDX_PC3HII] + - k[6775]*y_cur[IDX_C3SII] + k[6781]*y_cur[IDX_C6II] + - k[6782]*y_cur[IDX_C6HII] + k[6799]*y_cur[IDX_SiC4II] + - k[6809]*y_cur[IDX_C4PII] + k[6816]*y_cur[IDX_C4SII] + - k[6823]*y_cur[IDX_C7II] + k[6824]*y_cur[IDX_C7HII] + - k[6837]*y_cur[IDX_C8II] + k[6838]*y_cur[IDX_C8HII] + - k[6856]*y_cur[IDX_C9II] + k[6857]*y_cur[IDX_C9HII] + - k[6870]*y_cur[IDX_C10II] + k[6879]*y_cur[IDX_C10H3II]; - data[jistart + 168] = 0.0 + k[141]*y_cur[IDX_CHI] + - k[5153]*y_cur[IDX_C2I] + k[5160]*y_cur[IDX_CHI] + - k[5163]*y_cur[IDX_COI] - k[5572]*y_cur[IDX_CI]; - data[jistart + 169] = 0.0 + k[2293]*y_cur[IDX_C10I] + - k[3896]*y_cur[IDX_CM]; - data[jistart + 170] = 0.0 - k[68]*y_cur[IDX_CI] + - k[4691]*y_cur[IDX_CII]; - data[jistart + 171] = 0.0 + k[134]*y_cur[IDX_CHI] - - k[5134]*y_cur[IDX_CI] - k[5554]*y_cur[IDX_CI]; - data[jistart + 172] = 0.0 - k[2374]*y_cur[IDX_CI]; - data[jistart + 173] = 0.0 - k[4959]*y_cur[IDX_CI]; - data[jistart + 174] = 0.0 - k[4960]*y_cur[IDX_CI]; - data[jistart + 175] = 0.0 + k[174]*y_cur[IDX_CII] + - k[1949]*y_cur[IDX_CHII]; - data[jistart + 176] = 0.0 + k[3897]*y_cur[IDX_CM]; - data[jistart + 177] = 0.0 + k[1952]*y_cur[IDX_CHII]; - data[jistart + 178] = 0.0 - k[1899]*y_cur[IDX_CI]; - data[jistart + 179] = 0.0 + k[175]*y_cur[IDX_CII] + - k[1954]*y_cur[IDX_CHII]; - data[jistart + 180] = 0.0 - k[1900]*y_cur[IDX_CI] + - k[3898]*y_cur[IDX_CM]; - data[jistart + 181] = 0.0 + k[176]*y_cur[IDX_CII]; - data[jistart + 182] = 0.0 - k[2632]*y_cur[IDX_CI] + - k[3899]*y_cur[IDX_CM]; - data[jistart + 183] = 0.0 - k[1901]*y_cur[IDX_CI] + - k[3900]*y_cur[IDX_CM]; - data[jistart + 184] = 0.0 + k[1057]*y_cur[IDX_eM] + - k[6488]*y_cur[IDX_GRAINM]; - data[jistart + 185] = 0.0 - k[1902]*y_cur[IDX_CI] + - k[3901]*y_cur[IDX_CM]; - data[jistart + 186] = 0.0 + k[1958]*y_cur[IDX_CHII]; - data[jistart + 187] = 0.0 - k[1903]*y_cur[IDX_CI]; - data[jistart + 188] = 0.0 + k[3902]*y_cur[IDX_CM] + - k[3903]*y_cur[IDX_CM]; - data[jistart + 189] = 0.0 - k[5202]*y_cur[IDX_CI]; - data[jistart + 190] = 0.0 + k[178]*y_cur[IDX_CII] - - k[4962]*y_cur[IDX_CI] - k[4963]*y_cur[IDX_CI]; - data[jistart + 191] = 0.0 - k[1904]*y_cur[IDX_CI] + - k[3904]*y_cur[IDX_CM] + k[3905]*y_cur[IDX_CM]; - data[jistart + 192] = 0.0 - k[1905]*y_cur[IDX_CI]; - data[jistart + 193] = 0.0 + k[179]*y_cur[IDX_CII]; - data[jistart + 194] = 0.0 + k[180]*y_cur[IDX_CII]; - data[jistart + 195] = 0.0 - k[1906]*y_cur[IDX_CI]; - data[jistart + 196] = 0.0 + k[1960]*y_cur[IDX_CHII] + - k[3263]*y_cur[IDX_HeII]; - data[jistart + 197] = 0.0 + k[3031]*y_cur[IDX_HeII] - - k[5212]*y_cur[IDX_CI]; - data[jistart + 198] = 0.0 - k[5214]*y_cur[IDX_CI]; - data[jistart + 199] = 0.0 - k[1907]*y_cur[IDX_CI]; - data[jistart + 200] = 0.0 - k[5215]*y_cur[IDX_CI]; - data[jistart + 201] = 0.0 - k[5217]*y_cur[IDX_CI]; - data[jistart + 202] = 0.0 + k[181]*y_cur[IDX_CII] - - k[4964]*y_cur[IDX_CI]; - data[jistart + 203] = 0.0 - k[4965]*y_cur[IDX_CI] - - k[4966]*y_cur[IDX_CI]; - data[jistart + 204] = 0.0 - k[1908]*y_cur[IDX_CI]; - data[jistart + 205] = 0.0 - k[513]*y_cur[IDX_CI] + - k[3031]*y_cur[IDX_HNC3I] + k[3057]*y_cur[IDX_C10I] + - k[3061]*y_cur[IDX_C10I] + k[3066]*y_cur[IDX_C10H2I] + - k[3070]*y_cur[IDX_C10HI] + k[3072]*y_cur[IDX_C10HI] + - k[3073]*y_cur[IDX_C2I] + k[3087]*y_cur[IDX_C2HI] + - k[3091]*y_cur[IDX_C2SI] + k[3106]*y_cur[IDX_C4I] + - k[3109]*y_cur[IDX_C4H3I] + k[3118]*y_cur[IDX_C5I] + - k[3126]*y_cur[IDX_C6I] + k[3135]*y_cur[IDX_C7I] + - k[3143]*y_cur[IDX_C8I] + k[3150]*y_cur[IDX_C9I] + - k[3203]*y_cur[IDX_CNI] + k[3209]*y_cur[IDX_CO2I] + - k[3212]*y_cur[IDX_CPI] + k[3214]*y_cur[IDX_CSI] + - k[3263]*y_cur[IDX_HNCI] + k[3312]*y_cur[IDX_SiC3I] + - k[3315]*y_cur[IDX_SiC4I] + k[3316]*y_cur[IDX_SiCI] + - k[3906]*y_cur[IDX_CM]; - data[jistart + 206] = 0.0 + k[182]*y_cur[IDX_CII]; - data[jistart + 207] = 0.0 + k[3907]*y_cur[IDX_CM]; - data[jistart + 208] = 0.0 + k[3384]*y_cur[IDX_C2M] + - k[3456]*y_cur[IDX_CNII] + k[5081]*y_cur[IDX_CHI] + - k[5222]*y_cur[IDX_C2I] + k[5260]*y_cur[IDX_CNI] + - k[5261]*y_cur[IDX_CNI] + k[5293]*y_cur[IDX_SiCI] - - k[5524]*y_cur[IDX_CI]; - data[jistart + 209] = 0.0 + k[3344]*y_cur[IDX_COI] + - k[3908]*y_cur[IDX_CM]; - data[jistart + 210] = 0.0 - k[4967]*y_cur[IDX_CI]; - data[jistart + 211] = 0.0 - k[247]*y_cur[IDX_CI]; - data[jistart + 212] = 0.0 - k[1909]*y_cur[IDX_CI] + - k[3909]*y_cur[IDX_CM]; - data[jistart + 213] = 0.0 - k[4968]*y_cur[IDX_CI]; - data[jistart + 214] = 0.0 - k[4972]*y_cur[IDX_CI] - - k[4973]*y_cur[IDX_CI]; - data[jistart + 215] = 0.0 - k[1910]*y_cur[IDX_CI] + - k[3479]*y_cur[IDX_C2I]; - data[jistart + 216] = 0.0 - k[4969]*y_cur[IDX_CI] - - k[4970]*y_cur[IDX_CI] - k[4971]*y_cur[IDX_CI]; - data[jistart + 217] = 0.0 + k[185]*y_cur[IDX_CII] + - k[1964]*y_cur[IDX_CHII]; - data[jistart + 218] = 0.0 + k[2260]*y_cur[IDX_CHI] + - k[3910]*y_cur[IDX_CM]; - data[jistart + 219] = 0.0 - k[1911]*y_cur[IDX_CI] + - k[3911]*y_cur[IDX_CM]; - data[jistart + 220] = 0.0 + k[186]*y_cur[IDX_CII] - - k[4974]*y_cur[IDX_CI] - k[4975]*y_cur[IDX_CI]; - data[jistart + 221] = 0.0 + k[3912]*y_cur[IDX_CM]; - data[jistart + 222] = 0.0 + k[187]*y_cur[IDX_CII] - - k[4976]*y_cur[IDX_CI] - k[4977]*y_cur[IDX_CI]; - data[jistart + 223] = 0.0 + k[188]*y_cur[IDX_CII]; - data[jistart + 224] = 0.0 + k[3913]*y_cur[IDX_CM]; - data[jistart + 225] = 0.0 + k[3684]*y_cur[IDX_C2II] + - k[3686]*y_cur[IDX_C2HII] + k[3753]*y_cur[IDX_SiCII] + - k[5097]*y_cur[IDX_CHI] + k[5343]*y_cur[IDX_C2I] + - k[5380]*y_cur[IDX_CClI] + k[5388]*y_cur[IDX_CNI] + - k[5393]*y_cur[IDX_CSI] + k[5444]*y_cur[IDX_SiCI] - - k[5526]*y_cur[IDX_CI]; - data[jistart + 226] = 0.0 + k[3631]*y_cur[IDX_C2I] + - k[3639]*y_cur[IDX_CNI] + k[3914]*y_cur[IDX_CM] - - k[5525]*y_cur[IDX_CI]; - data[jistart + 227] = 0.0 - k[56]*y_cur[IDX_CI] + - k[4727]*y_cur[IDX_CII]; - data[jistart + 228] = 0.0 - k[4978]*y_cur[IDX_CI]; - data[jistart + 229] = 0.0 - k[248]*y_cur[IDX_CI] - - k[1912]*y_cur[IDX_CI]; - data[jistart + 230] = 0.0 + k[4762]*y_cur[IDX_CII]; - data[jistart + 231] = 0.0 - k[1913]*y_cur[IDX_CI]; - data[jistart + 232] = 0.0 - k[4979]*y_cur[IDX_CI]; - data[jistart + 233] = 0.0 + k[189]*y_cur[IDX_CII] + - k[1971]*y_cur[IDX_CHII] - k[4980]*y_cur[IDX_CI]; - data[jistart + 234] = 0.0 + k[1177]*y_cur[IDX_eM] + - k[6706]*y_cur[IDX_GRAINM]; - data[jistart + 235] = 0.0 - k[4981]*y_cur[IDX_CI] - - k[4982]*y_cur[IDX_CI]; - data[jistart + 236] = 0.0 - k[1914]*y_cur[IDX_CI]; - data[jistart + 237] = 0.0 - k[57]*y_cur[IDX_CI] + - k[4797]*y_cur[IDX_CII]; - data[jistart + 238] = 0.0 + k[190]*y_cur[IDX_CII] - - k[5527]*y_cur[IDX_CI]; - data[jistart + 239] = 0.0 + k[1192]*y_cur[IDX_eM] + - k[6774]*y_cur[IDX_GRAINM]; - data[jistart + 240] = 0.0 + k[191]*y_cur[IDX_CII] - - k[4983]*y_cur[IDX_CI]; - data[jistart + 241] = 0.0 - k[249]*y_cur[IDX_CI]; - data[jistart + 242] = 0.0 + k[192]*y_cur[IDX_CII]; - data[jistart + 243] = 0.0 + k[707]*y_cur[IDX_CII] + - k[708]*y_cur[IDX_CII] + k[1456]*y_cur[IDX_C2II] + - k[1974]*y_cur[IDX_CHII] + k[4876]*y_cur[IDX_C2I] + - k[5101]*y_cur[IDX_CHI] + k[5125]*y_cur[IDX_CNI] - - k[5529]*y_cur[IDX_CI]; - data[jistart + 244] = 0.0 + k[1464]*y_cur[IDX_C2I] + - k[3915]*y_cur[IDX_CM] - k[5528]*y_cur[IDX_CI]; - data[jistart + 245] = 0.0 - k[58]*y_cur[IDX_CI] + - k[4832]*y_cur[IDX_CII]; - data[jistart + 246] = 0.0 - k[4984]*y_cur[IDX_CI]; - data[jistart + 247] = 0.0 + k[193]*y_cur[IDX_CII] - - k[4986]*y_cur[IDX_CI] - k[4987]*y_cur[IDX_CI]; - data[jistart + 248] = 0.0 + k[3916]*y_cur[IDX_CM]; - data[jistart + 249] = 0.0 - k[4985]*y_cur[IDX_CI]; - data[jistart + 250] = 0.0 + k[194]*y_cur[IDX_CII] + - k[5492]*y_cur[IDX_COI]; - data[jistart + 251] = 0.0 + k[3917]*y_cur[IDX_CM]; - data[jistart + 252] = 0.0 + k[198]*y_cur[IDX_CII] + - k[3316]*y_cur[IDX_HeII] + k[5293]*y_cur[IDX_NI] + - k[5444]*y_cur[IDX_OI] + k[5924] + k[6267]; - data[jistart + 253] = 0.0 + k[1223]*y_cur[IDX_eM] + - k[3753]*y_cur[IDX_OI] + k[6481]*y_cur[IDX_GRAINM]; - data[jistart + 254] = 0.0 + k[195]*y_cur[IDX_CII] + k[5918]; - data[jistart + 255] = 0.0 + k[1225]*y_cur[IDX_eM] + - k[6643]*y_cur[IDX_GRAINM]; - data[jistart + 256] = 0.0 + k[196]*y_cur[IDX_CII]; - data[jistart + 257] = 0.0 - k[1915]*y_cur[IDX_CI]; - data[jistart + 258] = 0.0 - k[1916]*y_cur[IDX_CI]; - data[jistart + 259] = 0.0 - k[1917]*y_cur[IDX_CI]; - data[jistart + 260] = 0.0 + k[197]*y_cur[IDX_CII] + - k[3312]*y_cur[IDX_HeII] + k[5921] + k[6264]; - data[jistart + 261] = 0.0 + k[1232]*y_cur[IDX_eM] + - k[6746]*y_cur[IDX_GRAINM]; - data[jistart + 262] = 0.0 - k[1918]*y_cur[IDX_CI]; - data[jistart + 263] = 0.0 - k[1919]*y_cur[IDX_CI]; - data[jistart + 264] = 0.0 + k[3315]*y_cur[IDX_HeII]; - data[jistart + 265] = 0.0 + k[1239]*y_cur[IDX_eM] + - k[6799]*y_cur[IDX_GRAINM]; - data[jistart + 266] = 0.0 + k[199]*y_cur[IDX_CII]; - data[jistart + 267] = 0.0 - k[1920]*y_cur[IDX_CI] - - k[1921]*y_cur[IDX_CI] - k[1922]*y_cur[IDX_CI]; - data[jistart + 268] = 0.0 + k[200]*y_cur[IDX_CII]; - data[jistart + 269] = 0.0 - k[1923]*y_cur[IDX_CI]; - data[jistart + 270] = 0.0 - k[1924]*y_cur[IDX_CI]; - data[jistart + 271] = 0.0 - k[4990]*y_cur[IDX_CI]; - data[jistart + 272] = 0.0 - k[1925]*y_cur[IDX_CI]; - data[jistart + 273] = 0.0 + k[201]*y_cur[IDX_CII] - - k[4988]*y_cur[IDX_CI]; - data[jistart + 274] = 0.0 - k[1926]*y_cur[IDX_CI]; - data[jistart + 275] = 0.0 + k[202]*y_cur[IDX_CII] - - k[4989]*y_cur[IDX_CI]; - data[jistart + 276] = 0.0 - k[1927]*y_cur[IDX_CI]; - data[jistart + 277] = 0.0 - k[1928]*y_cur[IDX_CI]; - data[jistart + 278] = 0.0 - k[1929]*y_cur[IDX_CI]; - data[jistart + 279] = 0.0 + k[203]*y_cur[IDX_CII]; - data[jistart + 280] = 0.0 + k[6282]; - data[jistart + 281] = 0.0 - k[1930]*y_cur[IDX_CI] - - k[1931]*y_cur[IDX_CI]; - data[jistart + 282] = 0.0 - k[1932]*y_cur[IDX_CI] + - k[3918]*y_cur[IDX_CM]; - data[jistart + 283] = 0.0 + k[3919]*y_cur[IDX_CM]; - data[jistart + 284] = 0.0 + k[204]*y_cur[IDX_CII]; - data[jistart + 285] = 0.0 + k[3920]*y_cur[IDX_CM]; - data[jistart + 286] = 0.0 + k[728]*y_cur[IDX_C10II] + - k[734]*y_cur[IDX_C10H3II] + k[739]*y_cur[IDX_C2II] + - k[739]*y_cur[IDX_C2II] + k[741]*y_cur[IDX_C2HII] + - k[755]*y_cur[IDX_C2H3II] + k[756]*y_cur[IDX_C2H3II] + - k[763]*y_cur[IDX_C2H4II] + k[781]*y_cur[IDX_C2NII] + - k[785]*y_cur[IDX_C2OII] + k[786]*y_cur[IDX_C2SII] + - k[788]*y_cur[IDX_C3II] + k[789]*y_cur[IDX_C3HII] + - k[792]*y_cur[IDX_C3H2II] + k[816]*y_cur[IDX_C3SII] + - k[820]*y_cur[IDX_C4II] + k[832]*y_cur[IDX_C4NII] + - k[833]*y_cur[IDX_C4PII] + k[836]*y_cur[IDX_C4SII] + - k[839]*y_cur[IDX_C5HII] + k[849]*y_cur[IDX_C6II] + - k[850]*y_cur[IDX_C6HII] + k[865]*y_cur[IDX_C7II] + - k[866]*y_cur[IDX_C7HII] + k[878]*y_cur[IDX_C8II] + - k[879]*y_cur[IDX_C8HII] + k[890]*y_cur[IDX_C9II] + - k[891]*y_cur[IDX_C9HII] + k[902]*y_cur[IDX_CCPII] + - k[904]*y_cur[IDX_CClII] + k[905]*y_cur[IDX_CFII] + - k[906]*y_cur[IDX_CHII] + k[907]*y_cur[IDX_CH2II] + - k[908]*y_cur[IDX_CH2II] + k[977]*y_cur[IDX_CNII] + - k[979]*y_cur[IDX_CNCII] + k[980]*y_cur[IDX_COII] + - k[984]*y_cur[IDX_CPII] + k[985]*y_cur[IDX_CSII] + - k[1057]*y_cur[IDX_HC2OII] + k[1177]*y_cur[IDX_OCSII] + - k[1192]*y_cur[IDX_PC3HII] + k[1223]*y_cur[IDX_SiCII] + - k[1225]*y_cur[IDX_SiC2II] + k[1232]*y_cur[IDX_SiC3II] + - k[1239]*y_cur[IDX_SiC4II] - k[5607]*y_cur[IDX_CI] + - k[5611]*y_cur[IDX_CII]; - data[jistart + 287] = 0.0 + k[244]*y_cur[IDX_C2II] + - k[245]*y_cur[IDX_CNII] + k[246]*y_cur[IDX_COII] + - k[247]*y_cur[IDX_N2II] + k[248]*y_cur[IDX_O2II] + - k[249]*y_cur[IDX_PNII] + k[513]*y_cur[IDX_HeII] - - k[5503]*y_cur[IDX_CII] + k[5675] + k[5772] + k[6069] + k[6299]; - data[jistart + 288] = 0.0 - k[147]*y_cur[IDX_C10HI] - - k[148]*y_cur[IDX_C2H4I] - k[149]*y_cur[IDX_C2H5I] - - k[150]*y_cur[IDX_C2H5OHI] - k[151]*y_cur[IDX_C2OI] - - k[152]*y_cur[IDX_C2SI] - k[153]*y_cur[IDX_C3OI] - - k[154]*y_cur[IDX_C3SI] - k[155]*y_cur[IDX_C4H3I] - - k[156]*y_cur[IDX_C4SI] - k[157]*y_cur[IDX_C6H6I] - - k[158]*y_cur[IDX_CCPI] - k[159]*y_cur[IDX_CClI] - - k[160]*y_cur[IDX_CH2I] - k[161]*y_cur[IDX_CH2CCH2I] - - k[162]*y_cur[IDX_CH2CCHI] - k[163]*y_cur[IDX_CH2CNI] - - k[164]*y_cur[IDX_CH2COI] - k[165]*y_cur[IDX_CH3CCHI] - - k[166]*y_cur[IDX_CH3CHCH2I] - k[167]*y_cur[IDX_CH3CHOI] - - k[168]*y_cur[IDX_CH3COCH3I] - k[169]*y_cur[IDX_CH3OCH3I] - - k[170]*y_cur[IDX_CHI] - k[171]*y_cur[IDX_CPI] - - k[172]*y_cur[IDX_ClOI] - k[173]*y_cur[IDX_FeI] - - k[174]*y_cur[IDX_H2COI] - k[175]*y_cur[IDX_H2SI] - - k[176]*y_cur[IDX_H2SiOI] - k[177]*y_cur[IDX_C4H2I] - - k[178]*y_cur[IDX_HCOI] - k[179]*y_cur[IDX_HCOOCH3I] - - k[180]*y_cur[IDX_HCPI] - k[181]*y_cur[IDX_HPOI] - - k[182]*y_cur[IDX_MgI] - k[183]*y_cur[IDX_NCCNI] - - k[184]*y_cur[IDX_NCCNI] - k[185]*y_cur[IDX_NH3I] - - k[186]*y_cur[IDX_NOI] - k[187]*y_cur[IDX_NSI] - - k[188]*y_cur[IDX_NaI] - k[189]*y_cur[IDX_OCSI] - - k[190]*y_cur[IDX_PI] - k[191]*y_cur[IDX_PHI] - k[192]*y_cur[IDX_POI] - - k[193]*y_cur[IDX_SOI] - k[194]*y_cur[IDX_SiI] - - k[195]*y_cur[IDX_SiC2I] - k[196]*y_cur[IDX_SiC2HI] - - k[197]*y_cur[IDX_SiC3I] - k[198]*y_cur[IDX_SiCI] - - k[199]*y_cur[IDX_SiCH2I] - k[200]*y_cur[IDX_SiCH3I] - - k[201]*y_cur[IDX_SiH2I] - k[202]*y_cur[IDX_SiH3I] - - k[203]*y_cur[IDX_SiNI] - k[204]*y_cur[IDX_SiSI] - - k[707]*y_cur[IDX_SI] - k[708]*y_cur[IDX_SI] - - k[1297]*y_cur[IDX_C10H2I] - k[1298]*y_cur[IDX_C10HI] - - k[1299]*y_cur[IDX_C10HI] - k[1300]*y_cur[IDX_C2H2I] - - k[1301]*y_cur[IDX_C2H3I] - k[1302]*y_cur[IDX_C2H4I] - - k[1303]*y_cur[IDX_C2H4I] - k[1304]*y_cur[IDX_C2H4I] - - k[1305]*y_cur[IDX_C2H4I] - k[1306]*y_cur[IDX_C2H5I] - - k[1307]*y_cur[IDX_C2H5OHI] - k[1308]*y_cur[IDX_C2HI] - - k[1309]*y_cur[IDX_C2SI] - k[1310]*y_cur[IDX_C3H2I] - - k[1311]*y_cur[IDX_C3H2I] - k[1312]*y_cur[IDX_C3HI] - - k[1313]*y_cur[IDX_C3OI] - k[1314]*y_cur[IDX_C3OI] - - k[1315]*y_cur[IDX_C3PI] - k[1316]*y_cur[IDX_C3SI] - - k[1317]*y_cur[IDX_C4H3I] - k[1318]*y_cur[IDX_C4H3I] - - k[1319]*y_cur[IDX_C4H3I] - k[1320]*y_cur[IDX_C4HI] - - k[1321]*y_cur[IDX_C4PI] - k[1322]*y_cur[IDX_C4SI] - - k[1323]*y_cur[IDX_C5H2I] - k[1324]*y_cur[IDX_C5H2I] - - k[1325]*y_cur[IDX_C5HI] - k[1326]*y_cur[IDX_C6H2I] - - k[1327]*y_cur[IDX_C6H2I] - k[1328]*y_cur[IDX_C6H6I] - - k[1329]*y_cur[IDX_C6H6I] - k[1330]*y_cur[IDX_C6H6I] - - k[1331]*y_cur[IDX_C6HI] - k[1332]*y_cur[IDX_C7H2I] - - k[1333]*y_cur[IDX_C7H2I] - k[1334]*y_cur[IDX_C7HI] - - k[1335]*y_cur[IDX_C8H2I] - k[1336]*y_cur[IDX_C8H2I] - - k[1337]*y_cur[IDX_C8HI] - k[1338]*y_cur[IDX_C9H2I] - - k[1339]*y_cur[IDX_C9H2I] - k[1340]*y_cur[IDX_C9HI] - - k[1341]*y_cur[IDX_CCPI] - k[1342]*y_cur[IDX_CH2I] - - k[1343]*y_cur[IDX_CH2CCH2I] - k[1344]*y_cur[IDX_CH2CCH2I] - - k[1345]*y_cur[IDX_CH2CCH2I] - k[1346]*y_cur[IDX_CH2CCHI] - - k[1347]*y_cur[IDX_CH2CCHI] - k[1348]*y_cur[IDX_CH2CHCNI] - - k[1349]*y_cur[IDX_CH2CHCNI] - k[1350]*y_cur[IDX_CH2CHCNI] - - k[1351]*y_cur[IDX_CH2PHI] - k[1352]*y_cur[IDX_CH3I] - - k[1353]*y_cur[IDX_CH3I] - k[1354]*y_cur[IDX_CH3C3NI] - - k[1355]*y_cur[IDX_CH3C3NI] - k[1356]*y_cur[IDX_CH3C4HI] - - k[1357]*y_cur[IDX_CH3C4HI] - k[1358]*y_cur[IDX_CH3C4HI] - - k[1359]*y_cur[IDX_CH3C5NI] - k[1360]*y_cur[IDX_CH3C6HI] - - k[1361]*y_cur[IDX_CH3C6HI] - k[1362]*y_cur[IDX_CH3C7NI] - - k[1363]*y_cur[IDX_CH3CCHI] - k[1364]*y_cur[IDX_CH3CCHI] - - k[1365]*y_cur[IDX_CH3CCHI] - k[1366]*y_cur[IDX_CH3CCHI] - - k[1367]*y_cur[IDX_C2H6I] - k[1368]*y_cur[IDX_C2H6I] - - k[1369]*y_cur[IDX_C2H6I] - k[1370]*y_cur[IDX_C2H6I] - - k[1371]*y_cur[IDX_C2H6I] - k[1372]*y_cur[IDX_C2H6I] - - k[1373]*y_cur[IDX_CH3CHCH2I] - k[1374]*y_cur[IDX_CH3CHCH2I] - - k[1375]*y_cur[IDX_CH3CHCH2I] - k[1376]*y_cur[IDX_CH3CHCH2I] - - k[1377]*y_cur[IDX_CH3CHCH2I] - k[1378]*y_cur[IDX_CH3CHOI] - - k[1379]*y_cur[IDX_CH3CNI] - k[1380]*y_cur[IDX_CH3COCH3I] - - k[1381]*y_cur[IDX_CH3OHI] - k[1382]*y_cur[IDX_CH3OHI] - - k[1383]*y_cur[IDX_CH4I] - k[1384]*y_cur[IDX_CH4I] - - k[1385]*y_cur[IDX_CHI] - k[1386]*y_cur[IDX_CNOI] - - k[1387]*y_cur[IDX_CO2I] - k[1388]*y_cur[IDX_H2CCCI] - - k[1389]*y_cur[IDX_H2CCCI] - k[1390]*y_cur[IDX_H2COI] - - k[1391]*y_cur[IDX_H2COI] - k[1392]*y_cur[IDX_H2CSI] - - k[1393]*y_cur[IDX_H2OI] - k[1394]*y_cur[IDX_H2OI] - - k[1395]*y_cur[IDX_H2SI] - k[1396]*y_cur[IDX_HC2PI] - - k[1397]*y_cur[IDX_HC2PI] - k[1398]*y_cur[IDX_HC3NI] - - k[1399]*y_cur[IDX_HC3NI] - k[1400]*y_cur[IDX_HC3NI] - - k[1401]*y_cur[IDX_HC3NI] - k[1402]*y_cur[IDX_C4H2I] - - k[1403]*y_cur[IDX_C4H2I] - k[1404]*y_cur[IDX_HC5NI] - - k[1405]*y_cur[IDX_HC7NI] - k[1406]*y_cur[IDX_HC9NI] - - k[1407]*y_cur[IDX_HCNI] - k[1408]*y_cur[IDX_HCOI] - - k[1409]*y_cur[IDX_HCPI] - k[1410]*y_cur[IDX_HCSiI] - - k[1411]*y_cur[IDX_HClI] - k[1412]*y_cur[IDX_HFI] - - k[1413]*y_cur[IDX_HNCI] - k[1414]*y_cur[IDX_HNSiI] - - k[1415]*y_cur[IDX_HSI] - k[1416]*y_cur[IDX_N2OI] - - k[1417]*y_cur[IDX_NH2I] - k[1418]*y_cur[IDX_NH3I] - - k[1419]*y_cur[IDX_NH3I] - k[1420]*y_cur[IDX_NHI] - - k[1421]*y_cur[IDX_NSI] - k[1422]*y_cur[IDX_O2I] - - k[1423]*y_cur[IDX_O2I] - k[1424]*y_cur[IDX_OCNI] - - k[1425]*y_cur[IDX_OCSI] - k[1426]*y_cur[IDX_OHI] - - k[1427]*y_cur[IDX_SO2I] - k[1428]*y_cur[IDX_SOI] - - k[1429]*y_cur[IDX_SOI] - k[1430]*y_cur[IDX_SOI] - - k[1431]*y_cur[IDX_SiC2H2I] - k[1432]*y_cur[IDX_SiC2HI] - - k[1433]*y_cur[IDX_SiC3HI] - k[1434]*y_cur[IDX_SiCI] - - k[1435]*y_cur[IDX_SiCH2I] - k[1436]*y_cur[IDX_SiCH2I] - - k[1437]*y_cur[IDX_SiCH3I] - k[1438]*y_cur[IDX_SiCH3I] - - k[1439]*y_cur[IDX_SiH2I] - k[1440]*y_cur[IDX_SiH2I] - - k[1441]*y_cur[IDX_SiH3I] - k[1442]*y_cur[IDX_SiH3I] - - k[1443]*y_cur[IDX_SiH4I] - k[1444]*y_cur[IDX_SiH4I] - - k[1445]*y_cur[IDX_SiHI] - k[1446]*y_cur[IDX_SiNI] - - k[1447]*y_cur[IDX_SiOI] - k[1448]*y_cur[IDX_SiSI] - - k[2398]*y_cur[IDX_H2I] - k[3016]*y_cur[IDX_HNC3I] - - k[3017]*y_cur[IDX_HNC3I] - k[3018]*y_cur[IDX_HNC3I] - - k[3019]*y_cur[IDX_HNC3I] - k[3886]*y_cur[IDX_CM] - - k[3921]*y_cur[IDX_C10M] - k[3956]*y_cur[IDX_C10HM] - - k[3991]*y_cur[IDX_C2M] - k[4026]*y_cur[IDX_C2HM] - - k[4061]*y_cur[IDX_C3M] - k[4096]*y_cur[IDX_C3HM] - - k[4131]*y_cur[IDX_C3NM] - k[4166]*y_cur[IDX_C4M] - - k[4201]*y_cur[IDX_C4HM] - k[4236]*y_cur[IDX_C5M] - - k[4271]*y_cur[IDX_C5HM] - k[4306]*y_cur[IDX_C5NM] - - k[4341]*y_cur[IDX_C6M] - k[4376]*y_cur[IDX_C6HM] - - k[4411]*y_cur[IDX_C7M] - k[4446]*y_cur[IDX_C7HM] - - k[4481]*y_cur[IDX_C8M] - k[4516]*y_cur[IDX_C8HM] - - k[4551]*y_cur[IDX_C9M] - k[4586]*y_cur[IDX_C9HM] - - k[4621]*y_cur[IDX_CHM] - k[4656]*y_cur[IDX_CNM] - - k[4691]*y_cur[IDX_HM] - k[4727]*y_cur[IDX_OM] - - k[4762]*y_cur[IDX_O2M] - k[4797]*y_cur[IDX_OHM] - - k[4832]*y_cur[IDX_SM] - k[5495]*y_cur[IDX_C10I] - - k[5496]*y_cur[IDX_C3I] - k[5497]*y_cur[IDX_C4I] - - k[5498]*y_cur[IDX_C5I] - k[5499]*y_cur[IDX_C6I] - - k[5500]*y_cur[IDX_C7I] - k[5501]*y_cur[IDX_C8I] - - k[5502]*y_cur[IDX_C9I] - k[5503]*y_cur[IDX_CI] - - k[5504]*y_cur[IDX_NI] - k[5505]*y_cur[IDX_OI] - - k[5506]*y_cur[IDX_SI] - k[5548]*y_cur[IDX_H2I] - - k[5569]*y_cur[IDX_HI] - k[5611]*y_cur[IDX_eM] - - k[5627]*y_cur[IDX_CH3OI] - k[5633]*y_cur[IDX_CH2OHI] - - k[5639]*y_cur[IDX_CH3COI] - k[5644]*y_cur[IDX_COOHI] - - k[5649]*y_cur[IDX_COOCH3I] - k[5655]*y_cur[IDX_CH2OHCOI] - - k[5661]*y_cur[IDX_CH2OHCHOI] - k[5667]*y_cur[IDX_CH3COOHI] - - k[6314]*y_cur[IDX_GRAINM]; - data[jistart + 289] = 0.0 - k[3886]*y_cur[IDX_CII]; - data[jistart + 290] = 0.0 - k[5495]*y_cur[IDX_CII]; - data[jistart + 291] = 0.0 - k[3921]*y_cur[IDX_CII]; - data[jistart + 292] = 0.0 - k[147]*y_cur[IDX_CII] - - k[1298]*y_cur[IDX_CII] - k[1299]*y_cur[IDX_CII]; - data[jistart + 293] = 0.0 - k[3956]*y_cur[IDX_CII]; - data[jistart + 294] = 0.0 - k[1297]*y_cur[IDX_CII]; - data[jistart + 295] = 0.0 + k[3073]*y_cur[IDX_HeII]; - data[jistart + 296] = 0.0 + k[244]*y_cur[IDX_CI] + - k[3383]*y_cur[IDX_NI] + k[5975]; - data[jistart + 297] = 0.0 - k[3991]*y_cur[IDX_CII]; - data[jistart + 298] = 0.0 - k[1308]*y_cur[IDX_CII] + - k[3088]*y_cur[IDX_HeII]; - data[jistart + 299] = 0.0 - k[4026]*y_cur[IDX_CII]; - data[jistart + 300] = 0.0 - k[1300]*y_cur[IDX_CII]; - data[jistart + 301] = 0.0 - k[1301]*y_cur[IDX_CII]; - data[jistart + 302] = 0.0 - k[148]*y_cur[IDX_CII] - - k[1302]*y_cur[IDX_CII] - k[1303]*y_cur[IDX_CII] - - k[1304]*y_cur[IDX_CII] - k[1305]*y_cur[IDX_CII]; - data[jistart + 303] = 0.0 - k[149]*y_cur[IDX_CII] - - k[1306]*y_cur[IDX_CII]; - data[jistart + 304] = 0.0 - k[150]*y_cur[IDX_CII] - - k[1307]*y_cur[IDX_CII]; - data[jistart + 305] = 0.0 - k[1367]*y_cur[IDX_CII] - - k[1368]*y_cur[IDX_CII] - k[1369]*y_cur[IDX_CII] - - k[1370]*y_cur[IDX_CII] - k[1371]*y_cur[IDX_CII] - - k[1372]*y_cur[IDX_CII]; - data[jistart + 306] = 0.0 + k[3089]*y_cur[IDX_HeII]; - data[jistart + 307] = 0.0 - k[151]*y_cur[IDX_CII] + - k[3090]*y_cur[IDX_HeII]; - data[jistart + 308] = 0.0 - k[152]*y_cur[IDX_CII] - - k[1309]*y_cur[IDX_CII] + k[3092]*y_cur[IDX_HeII]; - data[jistart + 309] = 0.0 + k[3095]*y_cur[IDX_HeII] - - k[5496]*y_cur[IDX_CII]; - data[jistart + 310] = 0.0 - k[4061]*y_cur[IDX_CII]; - data[jistart + 311] = 0.0 - k[1312]*y_cur[IDX_CII]; - data[jistart + 312] = 0.0 - k[4096]*y_cur[IDX_CII]; - data[jistart + 313] = 0.0 - k[1310]*y_cur[IDX_CII] - - k[1311]*y_cur[IDX_CII]; - data[jistart + 314] = 0.0 - k[4131]*y_cur[IDX_CII]; - data[jistart + 315] = 0.0 - k[153]*y_cur[IDX_CII] - - k[1313]*y_cur[IDX_CII] - k[1314]*y_cur[IDX_CII]; - data[jistart + 316] = 0.0 - k[1315]*y_cur[IDX_CII]; - data[jistart + 317] = 0.0 - k[154]*y_cur[IDX_CII] - - k[1316]*y_cur[IDX_CII]; - data[jistart + 318] = 0.0 + k[3107]*y_cur[IDX_HeII] - - k[5497]*y_cur[IDX_CII]; - data[jistart + 319] = 0.0 - k[4166]*y_cur[IDX_CII]; - data[jistart + 320] = 0.0 - k[1320]*y_cur[IDX_CII]; - data[jistart + 321] = 0.0 - k[4201]*y_cur[IDX_CII]; - data[jistart + 322] = 0.0 - k[177]*y_cur[IDX_CII] - - k[1402]*y_cur[IDX_CII] - k[1403]*y_cur[IDX_CII]; - data[jistart + 323] = 0.0 - k[155]*y_cur[IDX_CII] - - k[1317]*y_cur[IDX_CII] - k[1318]*y_cur[IDX_CII] - - k[1319]*y_cur[IDX_CII]; - data[jistart + 324] = 0.0 - k[1321]*y_cur[IDX_CII]; - data[jistart + 325] = 0.0 - k[156]*y_cur[IDX_CII] - - k[1322]*y_cur[IDX_CII]; - data[jistart + 326] = 0.0 - k[5498]*y_cur[IDX_CII]; - data[jistart + 327] = 0.0 - k[4236]*y_cur[IDX_CII]; - data[jistart + 328] = 0.0 - k[1325]*y_cur[IDX_CII]; - data[jistart + 329] = 0.0 - k[4271]*y_cur[IDX_CII]; - data[jistart + 330] = 0.0 - k[1323]*y_cur[IDX_CII] - - k[1324]*y_cur[IDX_CII]; - data[jistart + 331] = 0.0 - k[4306]*y_cur[IDX_CII]; - data[jistart + 332] = 0.0 - k[5499]*y_cur[IDX_CII]; - data[jistart + 333] = 0.0 - k[4341]*y_cur[IDX_CII]; - data[jistart + 334] = 0.0 - k[1331]*y_cur[IDX_CII]; - data[jistart + 335] = 0.0 - k[4376]*y_cur[IDX_CII]; - data[jistart + 336] = 0.0 - k[1326]*y_cur[IDX_CII] - - k[1327]*y_cur[IDX_CII]; - data[jistart + 337] = 0.0 - k[157]*y_cur[IDX_CII] - - k[1328]*y_cur[IDX_CII] - k[1329]*y_cur[IDX_CII] - - k[1330]*y_cur[IDX_CII]; - data[jistart + 338] = 0.0 - k[5500]*y_cur[IDX_CII]; - data[jistart + 339] = 0.0 - k[4411]*y_cur[IDX_CII]; - data[jistart + 340] = 0.0 - k[1334]*y_cur[IDX_CII]; - data[jistart + 341] = 0.0 - k[4446]*y_cur[IDX_CII]; - data[jistart + 342] = 0.0 - k[1332]*y_cur[IDX_CII] - - k[1333]*y_cur[IDX_CII]; - data[jistart + 343] = 0.0 - k[5501]*y_cur[IDX_CII]; - data[jistart + 344] = 0.0 - k[4481]*y_cur[IDX_CII]; - data[jistart + 345] = 0.0 - k[1337]*y_cur[IDX_CII]; - data[jistart + 346] = 0.0 - k[4516]*y_cur[IDX_CII]; - data[jistart + 347] = 0.0 - k[1335]*y_cur[IDX_CII] - - k[1336]*y_cur[IDX_CII]; - data[jistart + 348] = 0.0 - k[5502]*y_cur[IDX_CII]; - data[jistart + 349] = 0.0 - k[4551]*y_cur[IDX_CII]; - data[jistart + 350] = 0.0 - k[1340]*y_cur[IDX_CII]; - data[jistart + 351] = 0.0 - k[4586]*y_cur[IDX_CII]; - data[jistart + 352] = 0.0 - k[1338]*y_cur[IDX_CII] - - k[1339]*y_cur[IDX_CII]; - data[jistart + 353] = 0.0 - k[158]*y_cur[IDX_CII] - - k[1341]*y_cur[IDX_CII] + k[3157]*y_cur[IDX_HeII]; - data[jistart + 354] = 0.0 - k[159]*y_cur[IDX_CII] + - k[3159]*y_cur[IDX_HeII]; - data[jistart + 355] = 0.0 - k[170]*y_cur[IDX_CII] - - k[1385]*y_cur[IDX_CII] + k[3202]*y_cur[IDX_HeII]; - data[jistart + 356] = 0.0 + k[2835]*y_cur[IDX_HI] + k[5776]; - data[jistart + 357] = 0.0 - k[4621]*y_cur[IDX_CII]; - data[jistart + 358] = 0.0 - k[160]*y_cur[IDX_CII] - - k[1342]*y_cur[IDX_CII] + k[3160]*y_cur[IDX_HeII]; - data[jistart + 359] = 0.0 + k[6075]; - data[jistart + 360] = 0.0 - k[162]*y_cur[IDX_CII] - - k[1346]*y_cur[IDX_CII] - k[1347]*y_cur[IDX_CII]; - data[jistart + 361] = 0.0 - k[161]*y_cur[IDX_CII] - - k[1343]*y_cur[IDX_CII] - k[1344]*y_cur[IDX_CII] - - k[1345]*y_cur[IDX_CII]; - data[jistart + 362] = 0.0 - k[1348]*y_cur[IDX_CII] - - k[1349]*y_cur[IDX_CII] - k[1350]*y_cur[IDX_CII]; - data[jistart + 363] = 0.0 - k[163]*y_cur[IDX_CII]; - data[jistart + 364] = 0.0 - k[164]*y_cur[IDX_CII]; - data[jistart + 365] = 0.0 - k[5633]*y_cur[IDX_CII]; - data[jistart + 366] = 0.0 - k[5661]*y_cur[IDX_CII]; - data[jistart + 367] = 0.0 - k[5655]*y_cur[IDX_CII]; - data[jistart + 368] = 0.0 - k[1351]*y_cur[IDX_CII]; - data[jistart + 369] = 0.0 - k[1352]*y_cur[IDX_CII] - - k[1353]*y_cur[IDX_CII]; - data[jistart + 370] = 0.0 - k[1354]*y_cur[IDX_CII] - - k[1355]*y_cur[IDX_CII]; - data[jistart + 371] = 0.0 - k[1356]*y_cur[IDX_CII] - - k[1357]*y_cur[IDX_CII] - k[1358]*y_cur[IDX_CII]; - data[jistart + 372] = 0.0 - k[1359]*y_cur[IDX_CII]; - data[jistart + 373] = 0.0 - k[1360]*y_cur[IDX_CII] - - k[1361]*y_cur[IDX_CII]; - data[jistart + 374] = 0.0 - k[1362]*y_cur[IDX_CII]; - data[jistart + 375] = 0.0 - k[165]*y_cur[IDX_CII] - - k[1363]*y_cur[IDX_CII] - k[1364]*y_cur[IDX_CII] - - k[1365]*y_cur[IDX_CII] - k[1366]*y_cur[IDX_CII]; - data[jistart + 376] = 0.0 - k[166]*y_cur[IDX_CII] - - k[1373]*y_cur[IDX_CII] - k[1374]*y_cur[IDX_CII] - - k[1375]*y_cur[IDX_CII] - k[1376]*y_cur[IDX_CII] - - k[1377]*y_cur[IDX_CII]; - data[jistart + 377] = 0.0 - k[167]*y_cur[IDX_CII] - - k[1378]*y_cur[IDX_CII]; - data[jistart + 378] = 0.0 - k[1379]*y_cur[IDX_CII]; - data[jistart + 379] = 0.0 - k[5639]*y_cur[IDX_CII]; - data[jistart + 380] = 0.0 - k[168]*y_cur[IDX_CII] - - k[1380]*y_cur[IDX_CII]; - data[jistart + 381] = 0.0 - k[5667]*y_cur[IDX_CII]; - data[jistart + 382] = 0.0 - k[5627]*y_cur[IDX_CII]; - data[jistart + 383] = 0.0 - k[169]*y_cur[IDX_CII]; - data[jistart + 384] = 0.0 - k[1381]*y_cur[IDX_CII] - - k[1382]*y_cur[IDX_CII]; - data[jistart + 385] = 0.0 - k[1383]*y_cur[IDX_CII] - - k[1384]*y_cur[IDX_CII]; - data[jistart + 386] = 0.0 + k[3204]*y_cur[IDX_HeII]; - data[jistart + 387] = 0.0 + k[245]*y_cur[IDX_CI]; - data[jistart + 388] = 0.0 - k[4656]*y_cur[IDX_CII]; - data[jistart + 389] = 0.0 - k[1386]*y_cur[IDX_CII]; - data[jistart + 390] = 0.0 + k[3211]*y_cur[IDX_HeII]; - data[jistart + 391] = 0.0 + k[246]*y_cur[IDX_CI] + k[6136]; - data[jistart + 392] = 0.0 - k[1387]*y_cur[IDX_CII] + - k[3210]*y_cur[IDX_HeII]; - data[jistart + 393] = 0.0 - k[5649]*y_cur[IDX_CII]; - data[jistart + 394] = 0.0 - k[5644]*y_cur[IDX_CII]; - data[jistart + 395] = 0.0 - k[171]*y_cur[IDX_CII] + - k[3213]*y_cur[IDX_HeII]; - data[jistart + 396] = 0.0 + k[3215]*y_cur[IDX_HeII]; - data[jistart + 397] = 0.0 - k[172]*y_cur[IDX_CII]; - data[jistart + 398] = 0.0 - k[173]*y_cur[IDX_CII]; - data[jistart + 399] = 0.0 - k[6314]*y_cur[IDX_CII]; - data[jistart + 400] = 0.0 + k[2835]*y_cur[IDX_CHII] - - k[5569]*y_cur[IDX_CII]; - data[jistart + 401] = 0.0 - k[4691]*y_cur[IDX_CII]; - data[jistart + 402] = 0.0 - k[2398]*y_cur[IDX_CII] - - k[5548]*y_cur[IDX_CII]; - data[jistart + 403] = 0.0 - k[1388]*y_cur[IDX_CII] - - k[1389]*y_cur[IDX_CII]; - data[jistart + 404] = 0.0 - k[174]*y_cur[IDX_CII] - - k[1390]*y_cur[IDX_CII] - k[1391]*y_cur[IDX_CII]; - data[jistart + 405] = 0.0 - k[1392]*y_cur[IDX_CII]; - data[jistart + 406] = 0.0 - k[1393]*y_cur[IDX_CII] - - k[1394]*y_cur[IDX_CII]; - data[jistart + 407] = 0.0 - k[175]*y_cur[IDX_CII] - - k[1395]*y_cur[IDX_CII]; - data[jistart + 408] = 0.0 - k[176]*y_cur[IDX_CII]; - data[jistart + 409] = 0.0 - k[1396]*y_cur[IDX_CII] - - k[1397]*y_cur[IDX_CII]; - data[jistart + 410] = 0.0 - k[1398]*y_cur[IDX_CII] - - k[1399]*y_cur[IDX_CII] - k[1400]*y_cur[IDX_CII] - - k[1401]*y_cur[IDX_CII]; - data[jistart + 411] = 0.0 - k[1404]*y_cur[IDX_CII]; - data[jistart + 412] = 0.0 - k[1405]*y_cur[IDX_CII]; - data[jistart + 413] = 0.0 - k[1406]*y_cur[IDX_CII]; - data[jistart + 414] = 0.0 - k[1407]*y_cur[IDX_CII] + - k[3247]*y_cur[IDX_HeII]; - data[jistart + 415] = 0.0 - k[178]*y_cur[IDX_CII] - - k[1408]*y_cur[IDX_CII]; - data[jistart + 416] = 0.0 - k[179]*y_cur[IDX_CII]; - data[jistart + 417] = 0.0 - k[180]*y_cur[IDX_CII] - - k[1409]*y_cur[IDX_CII] + k[3254]*y_cur[IDX_HeII]; - data[jistart + 418] = 0.0 - k[1410]*y_cur[IDX_CII]; - data[jistart + 419] = 0.0 - k[1411]*y_cur[IDX_CII]; - data[jistart + 420] = 0.0 - k[1412]*y_cur[IDX_CII]; - data[jistart + 421] = 0.0 - k[1413]*y_cur[IDX_CII] + - k[3262]*y_cur[IDX_HeII]; - data[jistart + 422] = 0.0 - k[3016]*y_cur[IDX_CII] - - k[3017]*y_cur[IDX_CII] - k[3018]*y_cur[IDX_CII] - - k[3019]*y_cur[IDX_CII]; - data[jistart + 423] = 0.0 - k[1414]*y_cur[IDX_CII]; - data[jistart + 424] = 0.0 - k[181]*y_cur[IDX_CII]; - data[jistart + 425] = 0.0 - k[1415]*y_cur[IDX_CII]; - data[jistart + 426] = 0.0 + k[513]*y_cur[IDX_CI] + - k[3073]*y_cur[IDX_C2I] + k[3088]*y_cur[IDX_C2HI] + - k[3089]*y_cur[IDX_C2NI] + k[3090]*y_cur[IDX_C2OI] + - k[3092]*y_cur[IDX_C2SI] + k[3095]*y_cur[IDX_C3I] + - k[3107]*y_cur[IDX_C4I] + k[3157]*y_cur[IDX_CCPI] + - k[3159]*y_cur[IDX_CClI] + k[3160]*y_cur[IDX_CH2I] + - k[3202]*y_cur[IDX_CHI] + k[3204]*y_cur[IDX_CNI] + - k[3210]*y_cur[IDX_CO2I] + k[3211]*y_cur[IDX_COI] + - k[3213]*y_cur[IDX_CPI] + k[3215]*y_cur[IDX_CSI] + - k[3247]*y_cur[IDX_HCNI] + k[3254]*y_cur[IDX_HCPI] + - k[3262]*y_cur[IDX_HNCI] + k[3317]*y_cur[IDX_SiCI]; - data[jistart + 427] = 0.0 - k[182]*y_cur[IDX_CII]; - data[jistart + 428] = 0.0 + k[3383]*y_cur[IDX_C2II] - - k[5504]*y_cur[IDX_CII]; - data[jistart + 429] = 0.0 + k[247]*y_cur[IDX_CI]; - data[jistart + 430] = 0.0 - k[1416]*y_cur[IDX_CII]; - data[jistart + 431] = 0.0 - k[183]*y_cur[IDX_CII] - - k[184]*y_cur[IDX_CII]; - data[jistart + 432] = 0.0 - k[1420]*y_cur[IDX_CII]; - data[jistart + 433] = 0.0 - k[1417]*y_cur[IDX_CII]; - data[jistart + 434] = 0.0 - k[185]*y_cur[IDX_CII] - - k[1418]*y_cur[IDX_CII] - k[1419]*y_cur[IDX_CII]; - data[jistart + 435] = 0.0 - k[186]*y_cur[IDX_CII]; - data[jistart + 436] = 0.0 - k[187]*y_cur[IDX_CII] - - k[1421]*y_cur[IDX_CII]; - data[jistart + 437] = 0.0 - k[188]*y_cur[IDX_CII]; - data[jistart + 438] = 0.0 - k[5505]*y_cur[IDX_CII]; - data[jistart + 439] = 0.0 - k[4727]*y_cur[IDX_CII]; - data[jistart + 440] = 0.0 - k[1422]*y_cur[IDX_CII] - - k[1423]*y_cur[IDX_CII]; - data[jistart + 441] = 0.0 + k[248]*y_cur[IDX_CI]; - data[jistart + 442] = 0.0 - k[4762]*y_cur[IDX_CII]; - data[jistart + 443] = 0.0 - k[1424]*y_cur[IDX_CII]; - data[jistart + 444] = 0.0 - k[189]*y_cur[IDX_CII] - - k[1425]*y_cur[IDX_CII]; - data[jistart + 445] = 0.0 - k[1426]*y_cur[IDX_CII]; - data[jistart + 446] = 0.0 - k[4797]*y_cur[IDX_CII]; - data[jistart + 447] = 0.0 - k[190]*y_cur[IDX_CII]; - data[jistart + 448] = 0.0 - k[191]*y_cur[IDX_CII]; - data[jistart + 449] = 0.0 + k[249]*y_cur[IDX_CI]; - data[jistart + 450] = 0.0 - k[192]*y_cur[IDX_CII]; - data[jistart + 451] = 0.0 - k[707]*y_cur[IDX_CII] - - k[708]*y_cur[IDX_CII] - k[5506]*y_cur[IDX_CII]; - data[jistart + 452] = 0.0 - k[4832]*y_cur[IDX_CII]; - data[jistart + 453] = 0.0 - k[193]*y_cur[IDX_CII] - - k[1428]*y_cur[IDX_CII] - k[1429]*y_cur[IDX_CII] - - k[1430]*y_cur[IDX_CII]; - data[jistart + 454] = 0.0 - k[1427]*y_cur[IDX_CII]; - data[jistart + 455] = 0.0 - k[194]*y_cur[IDX_CII]; - data[jistart + 456] = 0.0 - k[198]*y_cur[IDX_CII] - - k[1434]*y_cur[IDX_CII] + k[3317]*y_cur[IDX_HeII]; - data[jistart + 457] = 0.0 - k[195]*y_cur[IDX_CII]; - data[jistart + 458] = 0.0 - k[196]*y_cur[IDX_CII] - - k[1432]*y_cur[IDX_CII]; - data[jistart + 459] = 0.0 - k[1431]*y_cur[IDX_CII]; - data[jistart + 460] = 0.0 - k[197]*y_cur[IDX_CII]; - data[jistart + 461] = 0.0 - k[1433]*y_cur[IDX_CII]; - data[jistart + 462] = 0.0 - k[199]*y_cur[IDX_CII] - - k[1435]*y_cur[IDX_CII] - k[1436]*y_cur[IDX_CII]; - data[jistart + 463] = 0.0 - k[200]*y_cur[IDX_CII] - - k[1437]*y_cur[IDX_CII] - k[1438]*y_cur[IDX_CII]; - data[jistart + 464] = 0.0 - k[1445]*y_cur[IDX_CII]; - data[jistart + 465] = 0.0 - k[201]*y_cur[IDX_CII] - - k[1439]*y_cur[IDX_CII] - k[1440]*y_cur[IDX_CII]; - data[jistart + 466] = 0.0 - k[202]*y_cur[IDX_CII] - - k[1441]*y_cur[IDX_CII] - k[1442]*y_cur[IDX_CII]; - data[jistart + 467] = 0.0 - k[1443]*y_cur[IDX_CII] - - k[1444]*y_cur[IDX_CII]; - data[jistart + 468] = 0.0 - k[203]*y_cur[IDX_CII] - - k[1446]*y_cur[IDX_CII]; - data[jistart + 469] = 0.0 - k[1447]*y_cur[IDX_CII]; - data[jistart + 470] = 0.0 - k[204]*y_cur[IDX_CII] - - k[1448]*y_cur[IDX_CII]; - data[jistart + 471] = 0.0 - k[5611]*y_cur[IDX_CII]; - data[jistart + 472] = 0.0 - k[0]*y_cur[IDX_CM] + - k[5607]*y_cur[IDX_eM]; - data[jistart + 473] = 0.0 - k[3886]*y_cur[IDX_CM]; - data[jistart + 474] = 0.0 - k[0]*y_cur[IDX_CI] - - k[1]*y_cur[IDX_CH2I] - k[2]*y_cur[IDX_CHI] - k[3]*y_cur[IDX_CO2I] - - k[4]*y_cur[IDX_H2OI] - k[5]*y_cur[IDX_NI] - k[6]*y_cur[IDX_NHI] - - k[7]*y_cur[IDX_O2I] - k[8]*y_cur[IDX_OI] - k[9]*y_cur[IDX_OHI] - - k[82]*y_cur[IDX_H2I] - k[84]*y_cur[IDX_HI] - k[1449]*y_cur[IDX_NOI] - - k[1450]*y_cur[IDX_O2I] - k[3886]*y_cur[IDX_CII] - - k[3887]*y_cur[IDX_C2H2II] - k[3888]*y_cur[IDX_C2H3II] - - k[3889]*y_cur[IDX_C4H2II] - k[3890]*y_cur[IDX_C4H3II] - - k[3891]*y_cur[IDX_C4SII] - k[3892]*y_cur[IDX_CH2CCHII] - - k[3893]*y_cur[IDX_CH3II] - k[3894]*y_cur[IDX_CNCII] - - k[3895]*y_cur[IDX_FeII] - k[3896]*y_cur[IDX_HII] - - k[3897]*y_cur[IDX_H2COII] - k[3898]*y_cur[IDX_H2SII] - - k[3899]*y_cur[IDX_H3II] - k[3900]*y_cur[IDX_H3OII] - - k[3901]*y_cur[IDX_HC2SII] - k[3902]*y_cur[IDX_HCNHII] - - k[3903]*y_cur[IDX_HCNHII] - k[3904]*y_cur[IDX_HCOII] - - k[3905]*y_cur[IDX_HCOII] - k[3906]*y_cur[IDX_HeII] - - k[3907]*y_cur[IDX_MgII] - k[3908]*y_cur[IDX_NII] - - k[3909]*y_cur[IDX_N2HII] - k[3910]*y_cur[IDX_NH3II] - - k[3911]*y_cur[IDX_NH4II] - k[3912]*y_cur[IDX_NOII] - - k[3913]*y_cur[IDX_NaII] - k[3914]*y_cur[IDX_OII] - - k[3915]*y_cur[IDX_SII] - k[3916]*y_cur[IDX_SOII] - - k[3917]*y_cur[IDX_SiII] - k[3918]*y_cur[IDX_SiOII] - - k[3919]*y_cur[IDX_SiOHII] - k[3920]*y_cur[IDX_SiSII] - k[5686] - - k[5948]; - data[jistart + 475] = 0.0 + k[3685]*y_cur[IDX_OI]; - data[jistart + 476] = 0.0 - k[3887]*y_cur[IDX_CM]; - data[jistart + 477] = 0.0 - k[3888]*y_cur[IDX_CM]; - data[jistart + 478] = 0.0 - k[3889]*y_cur[IDX_CM]; - data[jistart + 479] = 0.0 - k[3890]*y_cur[IDX_CM]; - data[jistart + 480] = 0.0 - k[3891]*y_cur[IDX_CM]; - data[jistart + 481] = 0.0 - k[2]*y_cur[IDX_CM]; - data[jistart + 482] = 0.0 - k[1]*y_cur[IDX_CM]; - data[jistart + 483] = 0.0 - k[3892]*y_cur[IDX_CM]; - data[jistart + 484] = 0.0 - k[3893]*y_cur[IDX_CM]; - data[jistart + 485] = 0.0 - k[3894]*y_cur[IDX_CM]; - data[jistart + 486] = 0.0 - k[3]*y_cur[IDX_CM]; - data[jistart + 487] = 0.0 - k[3895]*y_cur[IDX_CM]; - data[jistart + 488] = 0.0 - k[84]*y_cur[IDX_CM]; - data[jistart + 489] = 0.0 - k[3896]*y_cur[IDX_CM]; - data[jistart + 490] = 0.0 - k[82]*y_cur[IDX_CM]; - data[jistart + 491] = 0.0 - k[3897]*y_cur[IDX_CM]; - data[jistart + 492] = 0.0 - k[4]*y_cur[IDX_CM]; - data[jistart + 493] = 0.0 - k[3898]*y_cur[IDX_CM]; - data[jistart + 494] = 0.0 - k[3899]*y_cur[IDX_CM]; - data[jistart + 495] = 0.0 - k[3900]*y_cur[IDX_CM]; - data[jistart + 496] = 0.0 - k[3901]*y_cur[IDX_CM]; - data[jistart + 497] = 0.0 - k[3902]*y_cur[IDX_CM] - - k[3903]*y_cur[IDX_CM]; - data[jistart + 498] = 0.0 - k[3904]*y_cur[IDX_CM] - - k[3905]*y_cur[IDX_CM]; - data[jistart + 499] = 0.0 - k[3906]*y_cur[IDX_CM]; - data[jistart + 500] = 0.0 - k[3907]*y_cur[IDX_CM]; - data[jistart + 501] = 0.0 - k[5]*y_cur[IDX_CM]; - data[jistart + 502] = 0.0 - k[3908]*y_cur[IDX_CM]; - data[jistart + 503] = 0.0 - k[3909]*y_cur[IDX_CM]; - data[jistart + 504] = 0.0 - k[6]*y_cur[IDX_CM]; - data[jistart + 505] = 0.0 - k[3910]*y_cur[IDX_CM]; - data[jistart + 506] = 0.0 - k[3911]*y_cur[IDX_CM]; - data[jistart + 507] = 0.0 - k[1449]*y_cur[IDX_CM]; - data[jistart + 508] = 0.0 - k[3912]*y_cur[IDX_CM]; - data[jistart + 509] = 0.0 - k[3913]*y_cur[IDX_CM]; - data[jistart + 510] = 0.0 - k[8]*y_cur[IDX_CM] + - k[3685]*y_cur[IDX_C2M]; - data[jistart + 511] = 0.0 - k[3914]*y_cur[IDX_CM]; - data[jistart + 512] = 0.0 - k[7]*y_cur[IDX_CM] - - k[1450]*y_cur[IDX_CM]; - data[jistart + 513] = 0.0 - k[9]*y_cur[IDX_CM]; - data[jistart + 514] = 0.0 - k[3915]*y_cur[IDX_CM]; - data[jistart + 515] = 0.0 - k[3916]*y_cur[IDX_CM]; - data[jistart + 516] = 0.0 - k[3917]*y_cur[IDX_CM]; - data[jistart + 517] = 0.0 - k[3918]*y_cur[IDX_CM]; - data[jistart + 518] = 0.0 - k[3919]*y_cur[IDX_CM]; - data[jistart + 519] = 0.0 - k[3920]*y_cur[IDX_CM]; - data[jistart + 520] = 0.0 + k[5607]*y_cur[IDX_CI]; - data[jistart + 521] = 0.0 + k[53]*y_cur[IDX_C9M] + - k[4942]*y_cur[IDX_C9HI]; - data[jistart + 522] = 0.0 + k[3921]*y_cur[IDX_C10M] - - k[5495]*y_cur[IDX_C10I]; - data[jistart + 523] = 0.0 - k[320]*y_cur[IDX_HII] - - k[506]*y_cur[IDX_HeII] - k[2293]*y_cur[IDX_HII] - - k[2583]*y_cur[IDX_H3II] - k[2899]*y_cur[IDX_HCOII] - - k[3056]*y_cur[IDX_HeII] - k[3057]*y_cur[IDX_HeII] - - k[3058]*y_cur[IDX_HeII] - k[3059]*y_cur[IDX_HeII] - - k[3060]*y_cur[IDX_HeII] - k[3061]*y_cur[IDX_HeII] - - k[5221]*y_cur[IDX_NI] - k[5340]*y_cur[IDX_OI] - - k[5495]*y_cur[IDX_CII] - k[5587]*y_cur[IDX_eM] - k[5688] - k[5950] - - k[5951] - k[5952] - k[5953] - k[5954] - k[5955] - k[7064]; - data[jistart + 524] = 0.0 + k[3921]*y_cur[IDX_CII] + - k[3922]*y_cur[IDX_C2H2II] + k[3923]*y_cur[IDX_C2H3II] + - k[3924]*y_cur[IDX_C4H2II] + k[3925]*y_cur[IDX_C4H3II] + - k[3926]*y_cur[IDX_C4SII] + k[3927]*y_cur[IDX_CH2CCHII] + - k[3928]*y_cur[IDX_CH3II] + k[3929]*y_cur[IDX_CNCII] + - k[3930]*y_cur[IDX_FeII] + k[3931]*y_cur[IDX_HII] + - k[3932]*y_cur[IDX_H2COII] + k[3933]*y_cur[IDX_H2SII] + - k[3934]*y_cur[IDX_H3II] + k[3935]*y_cur[IDX_H3OII] + - k[3936]*y_cur[IDX_HC2SII] + k[3937]*y_cur[IDX_HCNHII] + - k[3938]*y_cur[IDX_HCNHII] + k[3939]*y_cur[IDX_HCOII] + - k[3940]*y_cur[IDX_HCOII] + k[3941]*y_cur[IDX_HeII] + - k[3942]*y_cur[IDX_MgII] + k[3943]*y_cur[IDX_NII] + - k[3944]*y_cur[IDX_N2HII] + k[3945]*y_cur[IDX_NH3II] + - k[3946]*y_cur[IDX_NH4II] + k[3947]*y_cur[IDX_NOII] + - k[3948]*y_cur[IDX_NaII] + k[3949]*y_cur[IDX_OII] + - k[3950]*y_cur[IDX_SII] + k[3951]*y_cur[IDX_SOII] + - k[3952]*y_cur[IDX_SiII] + k[3953]*y_cur[IDX_SiOII] + - k[3954]*y_cur[IDX_SiOHII] + k[3955]*y_cur[IDX_SiSII] + k[5687] + - k[5949]; - data[jistart + 525] = 0.0 + k[5691] + k[5961]; - data[jistart + 526] = 0.0 + k[729]*y_cur[IDX_eM] + - k[6871]*y_cur[IDX_GRAINM]; - data[jistart + 527] = 0.0 + k[5957]; - data[jistart + 528] = 0.0 + k[5342]*y_cur[IDX_OI] + k[5692]; - data[jistart + 529] = 0.0 + k[36]*y_cur[IDX_C8M]; - data[jistart + 530] = 0.0 + k[16]*y_cur[IDX_C8I]; - data[jistart + 531] = 0.0 + k[3922]*y_cur[IDX_C10M]; - data[jistart + 532] = 0.0 + k[3923]*y_cur[IDX_C10M]; - data[jistart + 533] = 0.0 + k[35]*y_cur[IDX_C7M]; - data[jistart + 534] = 0.0 + k[21]*y_cur[IDX_C7I]; - data[jistart + 535] = 0.0 + k[33]*y_cur[IDX_C6M]; - data[jistart + 536] = 0.0 + k[26]*y_cur[IDX_C6I]; - data[jistart + 537] = 0.0 + k[3924]*y_cur[IDX_C10M]; - data[jistart + 538] = 0.0 + k[3925]*y_cur[IDX_C10M]; - data[jistart + 539] = 0.0 + k[3926]*y_cur[IDX_C10M]; - data[jistart + 540] = 0.0 + k[30]*y_cur[IDX_C5M]; - data[jistart + 541] = 0.0 + k[30]*y_cur[IDX_C5I]; - data[jistart + 542] = 0.0 + k[26]*y_cur[IDX_C4M]; - data[jistart + 543] = 0.0 + k[33]*y_cur[IDX_C4I]; - data[jistart + 544] = 0.0 + k[21]*y_cur[IDX_C3M]; - data[jistart + 545] = 0.0 + k[35]*y_cur[IDX_C3I]; - data[jistart + 546] = 0.0 + k[16]*y_cur[IDX_C2M]; - data[jistart + 547] = 0.0 + k[36]*y_cur[IDX_C2I]; - data[jistart + 548] = 0.0 + k[53]*y_cur[IDX_CI]; - data[jistart + 549] = 0.0 + k[4942]*y_cur[IDX_CI]; - data[jistart + 550] = 0.0 + k[3927]*y_cur[IDX_C10M]; - data[jistart + 551] = 0.0 + k[3928]*y_cur[IDX_C10M]; - data[jistart + 552] = 0.0 + k[3929]*y_cur[IDX_C10M]; - data[jistart + 553] = 0.0 + k[3930]*y_cur[IDX_C10M]; - data[jistart + 554] = 0.0 + k[8682]*y_cur[IDX_GC9I]; - data[jistart + 555] = 0.0 + k[7246] + k[7428] + k[7610]; - data[jistart + 556] = 0.0 + k[8682]*y_cur[IDX_GCI]; - data[jistart + 557] = 0.0 + k[6871]*y_cur[IDX_C10HII]; - data[jistart + 558] = 0.0 - k[320]*y_cur[IDX_C10I] - - k[2293]*y_cur[IDX_C10I] + k[3931]*y_cur[IDX_C10M]; - data[jistart + 559] = 0.0 + k[3932]*y_cur[IDX_C10M]; - data[jistart + 560] = 0.0 + k[3933]*y_cur[IDX_C10M]; - data[jistart + 561] = 0.0 - k[2583]*y_cur[IDX_C10I] + - k[3934]*y_cur[IDX_C10M]; - data[jistart + 562] = 0.0 + k[3935]*y_cur[IDX_C10M]; - data[jistart + 563] = 0.0 + k[3936]*y_cur[IDX_C10M]; - data[jistart + 564] = 0.0 + k[3937]*y_cur[IDX_C10M] + - k[3938]*y_cur[IDX_C10M]; - data[jistart + 565] = 0.0 - k[2899]*y_cur[IDX_C10I] + - k[3939]*y_cur[IDX_C10M] + k[3940]*y_cur[IDX_C10M]; - data[jistart + 566] = 0.0 - k[506]*y_cur[IDX_C10I] - - k[3056]*y_cur[IDX_C10I] - k[3057]*y_cur[IDX_C10I] - - k[3058]*y_cur[IDX_C10I] - k[3059]*y_cur[IDX_C10I] - - k[3060]*y_cur[IDX_C10I] - k[3061]*y_cur[IDX_C10I] + - k[3941]*y_cur[IDX_C10M]; - data[jistart + 567] = 0.0 + k[3942]*y_cur[IDX_C10M]; - data[jistart + 568] = 0.0 - k[5221]*y_cur[IDX_C10I]; - data[jistart + 569] = 0.0 + k[3943]*y_cur[IDX_C10M]; - data[jistart + 570] = 0.0 + k[3944]*y_cur[IDX_C10M]; - data[jistart + 571] = 0.0 + k[3945]*y_cur[IDX_C10M]; - data[jistart + 572] = 0.0 + k[3946]*y_cur[IDX_C10M]; - data[jistart + 573] = 0.0 + k[3947]*y_cur[IDX_C10M]; - data[jistart + 574] = 0.0 + k[3948]*y_cur[IDX_C10M]; - data[jistart + 575] = 0.0 - k[5340]*y_cur[IDX_C10I] + - k[5342]*y_cur[IDX_C11I]; - data[jistart + 576] = 0.0 + k[3949]*y_cur[IDX_C10M]; - data[jistart + 577] = 0.0 + k[3950]*y_cur[IDX_C10M]; - data[jistart + 578] = 0.0 + k[3951]*y_cur[IDX_C10M]; - data[jistart + 579] = 0.0 + k[3952]*y_cur[IDX_C10M]; - data[jistart + 580] = 0.0 + k[3953]*y_cur[IDX_C10M]; - data[jistart + 581] = 0.0 + k[3954]*y_cur[IDX_C10M]; - data[jistart + 582] = 0.0 + k[3955]*y_cur[IDX_C10M]; - data[jistart + 583] = 0.0 + k[729]*y_cur[IDX_C10HII] - - k[5587]*y_cur[IDX_C10I]; - data[jistart + 584] = 0.0 + k[1885]*y_cur[IDX_C9HII] + - k[1886]*y_cur[IDX_C9H2II]; - data[jistart + 585] = 0.0 + k[1338]*y_cur[IDX_C9H2I] + - k[1340]*y_cur[IDX_C9HI] + k[5502]*y_cur[IDX_C9I]; - data[jistart + 586] = 0.0 + k[320]*y_cur[IDX_HII] + - k[506]*y_cur[IDX_HeII] + k[5950]; - data[jistart + 587] = 0.0 - k[727]*y_cur[IDX_eM] - - k[728]*y_cur[IDX_eM] - k[2399]*y_cur[IDX_H2I] - - k[6869]*y_cur[IDX_GRAINM] - k[6870]*y_cur[IDX_GRAINM]; - data[jistart + 588] = 0.0 + k[3062]*y_cur[IDX_HeII]; - data[jistart + 589] = 0.0 + k[5502]*y_cur[IDX_CII]; - data[jistart + 590] = 0.0 + k[1340]*y_cur[IDX_CII]; - data[jistart + 591] = 0.0 + k[1885]*y_cur[IDX_CI]; - data[jistart + 592] = 0.0 + k[1338]*y_cur[IDX_CII]; - data[jistart + 593] = 0.0 + k[1886]*y_cur[IDX_CI]; - data[jistart + 594] = 0.0 - k[6869]*y_cur[IDX_C10II] - - k[6870]*y_cur[IDX_C10II]; - data[jistart + 595] = 0.0 + k[320]*y_cur[IDX_C10I]; - data[jistart + 596] = 0.0 - k[2399]*y_cur[IDX_C10II]; - data[jistart + 597] = 0.0 + k[506]*y_cur[IDX_C10I] + - k[3062]*y_cur[IDX_C10H2I]; - data[jistart + 598] = 0.0 - k[727]*y_cur[IDX_C10II] - - k[728]*y_cur[IDX_C10II]; - data[jistart + 599] = 0.0 - k[37]*y_cur[IDX_C10M]; - data[jistart + 600] = 0.0 - k[3921]*y_cur[IDX_C10M]; - data[jistart + 601] = 0.0 + k[5587]*y_cur[IDX_eM]; - data[jistart + 602] = 0.0 - k[37]*y_cur[IDX_CI] - - k[85]*y_cur[IDX_HI] - k[3377]*y_cur[IDX_NI] - k[3378]*y_cur[IDX_NI] - - k[3379]*y_cur[IDX_NI] - k[3380]*y_cur[IDX_NI] - - k[3678]*y_cur[IDX_OI] - k[3921]*y_cur[IDX_CII] - - k[3922]*y_cur[IDX_C2H2II] - k[3923]*y_cur[IDX_C2H3II] - - k[3924]*y_cur[IDX_C4H2II] - k[3925]*y_cur[IDX_C4H3II] - - k[3926]*y_cur[IDX_C4SII] - k[3927]*y_cur[IDX_CH2CCHII] - - k[3928]*y_cur[IDX_CH3II] - k[3929]*y_cur[IDX_CNCII] - - k[3930]*y_cur[IDX_FeII] - k[3931]*y_cur[IDX_HII] - - k[3932]*y_cur[IDX_H2COII] - k[3933]*y_cur[IDX_H2SII] - - k[3934]*y_cur[IDX_H3II] - k[3935]*y_cur[IDX_H3OII] - - k[3936]*y_cur[IDX_HC2SII] - k[3937]*y_cur[IDX_HCNHII] - - k[3938]*y_cur[IDX_HCNHII] - k[3939]*y_cur[IDX_HCOII] - - k[3940]*y_cur[IDX_HCOII] - k[3941]*y_cur[IDX_HeII] - - k[3942]*y_cur[IDX_MgII] - k[3943]*y_cur[IDX_NII] - - k[3944]*y_cur[IDX_N2HII] - k[3945]*y_cur[IDX_NH3II] - - k[3946]*y_cur[IDX_NH4II] - k[3947]*y_cur[IDX_NOII] - - k[3948]*y_cur[IDX_NaII] - k[3949]*y_cur[IDX_OII] - - k[3950]*y_cur[IDX_SII] - k[3951]*y_cur[IDX_SOII] - - k[3952]*y_cur[IDX_SiII] - k[3953]*y_cur[IDX_SiOII] - - k[3954]*y_cur[IDX_SiOHII] - k[3955]*y_cur[IDX_SiSII] - k[5687] - - k[5949]; - data[jistart + 603] = 0.0 - k[3922]*y_cur[IDX_C10M]; - data[jistart + 604] = 0.0 - k[3923]*y_cur[IDX_C10M]; - data[jistart + 605] = 0.0 - k[3924]*y_cur[IDX_C10M]; - data[jistart + 606] = 0.0 - k[3925]*y_cur[IDX_C10M]; - data[jistart + 607] = 0.0 - k[3926]*y_cur[IDX_C10M]; - data[jistart + 608] = 0.0 - k[3927]*y_cur[IDX_C10M]; - data[jistart + 609] = 0.0 - k[3928]*y_cur[IDX_C10M]; - data[jistart + 610] = 0.0 - k[3929]*y_cur[IDX_C10M]; - data[jistart + 611] = 0.0 - k[3930]*y_cur[IDX_C10M]; - data[jistart + 612] = 0.0 - k[85]*y_cur[IDX_C10M]; - data[jistart + 613] = 0.0 - k[3931]*y_cur[IDX_C10M]; - data[jistart + 614] = 0.0 - k[3932]*y_cur[IDX_C10M]; - data[jistart + 615] = 0.0 - k[3933]*y_cur[IDX_C10M]; - data[jistart + 616] = 0.0 - k[3934]*y_cur[IDX_C10M]; - data[jistart + 617] = 0.0 - k[3935]*y_cur[IDX_C10M]; - data[jistart + 618] = 0.0 - k[3936]*y_cur[IDX_C10M]; - data[jistart + 619] = 0.0 - k[3937]*y_cur[IDX_C10M] - - k[3938]*y_cur[IDX_C10M]; - data[jistart + 620] = 0.0 - k[3939]*y_cur[IDX_C10M] - - k[3940]*y_cur[IDX_C10M]; - data[jistart + 621] = 0.0 - k[3941]*y_cur[IDX_C10M]; - data[jistart + 622] = 0.0 - k[3942]*y_cur[IDX_C10M]; - data[jistart + 623] = 0.0 - k[3377]*y_cur[IDX_C10M] - - k[3378]*y_cur[IDX_C10M] - k[3379]*y_cur[IDX_C10M] - - k[3380]*y_cur[IDX_C10M]; - data[jistart + 624] = 0.0 - k[3943]*y_cur[IDX_C10M]; - data[jistart + 625] = 0.0 - k[3944]*y_cur[IDX_C10M]; - data[jistart + 626] = 0.0 - k[3945]*y_cur[IDX_C10M]; - data[jistart + 627] = 0.0 - k[3946]*y_cur[IDX_C10M]; - data[jistart + 628] = 0.0 - k[3947]*y_cur[IDX_C10M]; - data[jistart + 629] = 0.0 - k[3948]*y_cur[IDX_C10M]; - data[jistart + 630] = 0.0 - k[3678]*y_cur[IDX_C10M]; - data[jistart + 631] = 0.0 - k[3949]*y_cur[IDX_C10M]; - data[jistart + 632] = 0.0 - k[3950]*y_cur[IDX_C10M]; - data[jistart + 633] = 0.0 - k[3951]*y_cur[IDX_C10M]; - data[jistart + 634] = 0.0 - k[3952]*y_cur[IDX_C10M]; - data[jistart + 635] = 0.0 - k[3953]*y_cur[IDX_C10M]; - data[jistart + 636] = 0.0 - k[3954]*y_cur[IDX_C10M]; - data[jistart + 637] = 0.0 - k[3955]*y_cur[IDX_C10M]; - data[jistart + 638] = 0.0 + k[5587]*y_cur[IDX_C10I]; - data[jistart + 639] = 0.0 + k[54]*y_cur[IDX_C9HM] - - k[4910]*y_cur[IDX_C10HI] + k[4941]*y_cur[IDX_C9H2I]; - data[jistart + 640] = 0.0 - k[147]*y_cur[IDX_C10HI] - - k[1298]*y_cur[IDX_C10HI] - k[1299]*y_cur[IDX_C10HI] + - k[3956]*y_cur[IDX_C10HM]; - data[jistart + 641] = 0.0 + k[85]*y_cur[IDX_HI]; - data[jistart + 642] = 0.0 - k[147]*y_cur[IDX_CII] - - k[322]*y_cur[IDX_HII] - k[507]*y_cur[IDX_HeII] - - k[1298]*y_cur[IDX_CII] - k[1299]*y_cur[IDX_CII] - - k[2585]*y_cur[IDX_H3II] - k[2901]*y_cur[IDX_HCOII] - - k[3067]*y_cur[IDX_HeII] - k[3068]*y_cur[IDX_HeII] - - k[3069]*y_cur[IDX_HeII] - k[3070]*y_cur[IDX_HeII] - - k[3071]*y_cur[IDX_HeII] - k[3072]*y_cur[IDX_HeII] - - k[4910]*y_cur[IDX_CI] - k[5341]*y_cur[IDX_OI] - - k[5588]*y_cur[IDX_eM] - k[5691] - k[5961] - k[5962] - k[5963] - - k[5964] - k[5965] - k[5966] - k[5967] - k[5968] - k[7065]; - data[jistart + 643] = 0.0 + k[3956]*y_cur[IDX_CII] + - k[3957]*y_cur[IDX_C2H2II] + k[3958]*y_cur[IDX_C2H3II] + - k[3959]*y_cur[IDX_C4H2II] + k[3960]*y_cur[IDX_C4H3II] + - k[3961]*y_cur[IDX_C4SII] + k[3962]*y_cur[IDX_CH2CCHII] + - k[3963]*y_cur[IDX_CH3II] + k[3964]*y_cur[IDX_CNCII] + - k[3965]*y_cur[IDX_FeII] + k[3966]*y_cur[IDX_HII] + - k[3967]*y_cur[IDX_H2COII] + k[3968]*y_cur[IDX_H2SII] + - k[3969]*y_cur[IDX_H3II] + k[3970]*y_cur[IDX_H3OII] + - k[3971]*y_cur[IDX_HC2SII] + k[3972]*y_cur[IDX_HCNHII] + - k[3973]*y_cur[IDX_HCNHII] + k[3974]*y_cur[IDX_HCOII] + - k[3975]*y_cur[IDX_HCOII] + k[3976]*y_cur[IDX_HeII] + - k[3977]*y_cur[IDX_MgII] + k[3978]*y_cur[IDX_NII] + - k[3979]*y_cur[IDX_N2HII] + k[3980]*y_cur[IDX_NH3II] + - k[3981]*y_cur[IDX_NH4II] + k[3982]*y_cur[IDX_NOII] + - k[3983]*y_cur[IDX_NaII] + k[3984]*y_cur[IDX_OII] + - k[3985]*y_cur[IDX_SII] + k[3986]*y_cur[IDX_SOII] + - k[3987]*y_cur[IDX_SiII] + k[3988]*y_cur[IDX_SiOII] + - k[3989]*y_cur[IDX_SiOHII] + k[3990]*y_cur[IDX_SiSII] + k[5689] + - k[5956]; - data[jistart + 644] = 0.0 + k[5690] + k[5959]; - data[jistart + 645] = 0.0 + k[732]*y_cur[IDX_eM] + - k[6874]*y_cur[IDX_GRAINM]; - data[jistart + 646] = 0.0 + k[3957]*y_cur[IDX_C10HM]; - data[jistart + 647] = 0.0 + k[3958]*y_cur[IDX_C10HM]; - data[jistart + 648] = 0.0 + k[3959]*y_cur[IDX_C10HM]; - data[jistart + 649] = 0.0 + k[3960]*y_cur[IDX_C10HM]; - data[jistart + 650] = 0.0 + k[3961]*y_cur[IDX_C10HM]; - data[jistart + 651] = 0.0 + k[54]*y_cur[IDX_CI]; - data[jistart + 652] = 0.0 + k[4941]*y_cur[IDX_CI]; - data[jistart + 653] = 0.0 + k[3962]*y_cur[IDX_C10HM]; - data[jistart + 654] = 0.0 + k[3963]*y_cur[IDX_C10HM]; - data[jistart + 655] = 0.0 + k[3964]*y_cur[IDX_C10HM]; - data[jistart + 656] = 0.0 + k[3965]*y_cur[IDX_C10HM]; - data[jistart + 657] = 0.0 + k[8683]*y_cur[IDX_GC9HI]; - data[jistart + 658] = 0.0 + k[8648]*y_cur[IDX_GHI]; - data[jistart + 659] = 0.0 + k[7247] + k[7429] + k[7611]; - data[jistart + 660] = 0.0 + k[8683]*y_cur[IDX_GCI]; - data[jistart + 661] = 0.0 + k[8648]*y_cur[IDX_GC10I]; - data[jistart + 662] = 0.0 + k[6874]*y_cur[IDX_C10H2II]; - data[jistart + 663] = 0.0 + k[85]*y_cur[IDX_C10M]; - data[jistart + 664] = 0.0 - k[322]*y_cur[IDX_C10HI] + - k[3966]*y_cur[IDX_C10HM]; - data[jistart + 665] = 0.0 + k[3967]*y_cur[IDX_C10HM]; - data[jistart + 666] = 0.0 + k[3968]*y_cur[IDX_C10HM]; - data[jistart + 667] = 0.0 - k[2585]*y_cur[IDX_C10HI] + - k[3969]*y_cur[IDX_C10HM]; - data[jistart + 668] = 0.0 + k[3970]*y_cur[IDX_C10HM]; - data[jistart + 669] = 0.0 + k[3971]*y_cur[IDX_C10HM]; - data[jistart + 670] = 0.0 + k[3972]*y_cur[IDX_C10HM] + - k[3973]*y_cur[IDX_C10HM]; - data[jistart + 671] = 0.0 - k[2901]*y_cur[IDX_C10HI] + - k[3974]*y_cur[IDX_C10HM] + k[3975]*y_cur[IDX_C10HM]; - data[jistart + 672] = 0.0 - k[507]*y_cur[IDX_C10HI] - - k[3067]*y_cur[IDX_C10HI] - k[3068]*y_cur[IDX_C10HI] - - k[3069]*y_cur[IDX_C10HI] - k[3070]*y_cur[IDX_C10HI] - - k[3071]*y_cur[IDX_C10HI] - k[3072]*y_cur[IDX_C10HI] + - k[3976]*y_cur[IDX_C10HM]; - data[jistart + 673] = 0.0 + k[3977]*y_cur[IDX_C10HM]; - data[jistart + 674] = 0.0 + k[3978]*y_cur[IDX_C10HM]; - data[jistart + 675] = 0.0 + k[3979]*y_cur[IDX_C10HM]; - data[jistart + 676] = 0.0 + k[3980]*y_cur[IDX_C10HM]; - data[jistart + 677] = 0.0 + k[3981]*y_cur[IDX_C10HM]; - data[jistart + 678] = 0.0 + k[3982]*y_cur[IDX_C10HM]; - data[jistart + 679] = 0.0 + k[3983]*y_cur[IDX_C10HM]; - data[jistart + 680] = 0.0 - k[5341]*y_cur[IDX_C10HI]; - data[jistart + 681] = 0.0 + k[3984]*y_cur[IDX_C10HM]; - data[jistart + 682] = 0.0 + k[3985]*y_cur[IDX_C10HM]; - data[jistart + 683] = 0.0 + k[3986]*y_cur[IDX_C10HM]; - data[jistart + 684] = 0.0 + k[3987]*y_cur[IDX_C10HM]; - data[jistart + 685] = 0.0 + k[3988]*y_cur[IDX_C10HM]; - data[jistart + 686] = 0.0 + k[3989]*y_cur[IDX_C10HM]; - data[jistart + 687] = 0.0 + k[3990]*y_cur[IDX_C10HM]; - data[jistart + 688] = 0.0 + k[732]*y_cur[IDX_C10H2II] - - k[5588]*y_cur[IDX_C10HI]; - data[jistart + 689] = 0.0 - k[1846]*y_cur[IDX_C10HII] + - k[1887]*y_cur[IDX_C9H2II] + k[1888]*y_cur[IDX_C9H3II]; - data[jistart + 690] = 0.0 + k[147]*y_cur[IDX_C10HI] + - k[1339]*y_cur[IDX_C9H2I]; - data[jistart + 691] = 0.0 + k[2583]*y_cur[IDX_H3II] + - k[2899]*y_cur[IDX_HCOII]; - data[jistart + 692] = 0.0 + k[2399]*y_cur[IDX_H2I]; - data[jistart + 693] = 0.0 + k[147]*y_cur[IDX_CII] + - k[322]*y_cur[IDX_HII] + k[507]*y_cur[IDX_HeII] + k[5962]; - data[jistart + 694] = 0.0 - k[729]*y_cur[IDX_eM] - - k[730]*y_cur[IDX_eM] - k[731]*y_cur[IDX_eM] - k[1846]*y_cur[IDX_CI] - - k[2400]*y_cur[IDX_H2I] - k[3679]*y_cur[IDX_OI] - - k[3680]*y_cur[IDX_OI] - k[6871]*y_cur[IDX_GRAINM] - - k[6872]*y_cur[IDX_GRAINM] - k[6873]*y_cur[IDX_GRAINM]; - data[jistart + 695] = 0.0 + k[2294]*y_cur[IDX_HII]; - data[jistart + 696] = 0.0 + k[1505]*y_cur[IDX_C8HI]; - data[jistart + 697] = 0.0 + k[1505]*y_cur[IDX_C2H2II]; - data[jistart + 698] = 0.0 + k[1339]*y_cur[IDX_CII]; - data[jistart + 699] = 0.0 + k[1887]*y_cur[IDX_CI]; - data[jistart + 700] = 0.0 + k[1888]*y_cur[IDX_CI]; - data[jistart + 701] = 0.0 - k[6871]*y_cur[IDX_C10HII] - - k[6872]*y_cur[IDX_C10HII] - k[6873]*y_cur[IDX_C10HII]; - data[jistart + 702] = 0.0 + k[322]*y_cur[IDX_C10HI] + - k[2294]*y_cur[IDX_C10H2I]; - data[jistart + 703] = 0.0 + k[2399]*y_cur[IDX_C10II] - - k[2400]*y_cur[IDX_C10HII]; - data[jistart + 704] = 0.0 + k[2583]*y_cur[IDX_C10I]; - data[jistart + 705] = 0.0 + k[2899]*y_cur[IDX_C10I]; - data[jistart + 706] = 0.0 + k[507]*y_cur[IDX_C10HI]; - data[jistart + 707] = 0.0 - k[3679]*y_cur[IDX_C10HII] - - k[3680]*y_cur[IDX_C10HII]; - data[jistart + 708] = 0.0 - k[729]*y_cur[IDX_C10HII] - - k[730]*y_cur[IDX_C10HII] - k[731]*y_cur[IDX_C10HII]; - data[jistart + 709] = 0.0 - k[1847]*y_cur[IDX_C10HM]; - data[jistart + 710] = 0.0 - k[3956]*y_cur[IDX_C10HM]; - data[jistart + 711] = 0.0 + k[5588]*y_cur[IDX_eM]; - data[jistart + 712] = 0.0 - k[86]*y_cur[IDX_HI] - - k[1847]*y_cur[IDX_CI] - k[3381]*y_cur[IDX_NI] - - k[3382]*y_cur[IDX_NI] - k[3681]*y_cur[IDX_OI] - - k[3956]*y_cur[IDX_CII] - k[3957]*y_cur[IDX_C2H2II] - - k[3958]*y_cur[IDX_C2H3II] - k[3959]*y_cur[IDX_C4H2II] - - k[3960]*y_cur[IDX_C4H3II] - k[3961]*y_cur[IDX_C4SII] - - k[3962]*y_cur[IDX_CH2CCHII] - k[3963]*y_cur[IDX_CH3II] - - k[3964]*y_cur[IDX_CNCII] - k[3965]*y_cur[IDX_FeII] - - k[3966]*y_cur[IDX_HII] - k[3967]*y_cur[IDX_H2COII] - - k[3968]*y_cur[IDX_H2SII] - k[3969]*y_cur[IDX_H3II] - - k[3970]*y_cur[IDX_H3OII] - k[3971]*y_cur[IDX_HC2SII] - - k[3972]*y_cur[IDX_HCNHII] - k[3973]*y_cur[IDX_HCNHII] - - k[3974]*y_cur[IDX_HCOII] - k[3975]*y_cur[IDX_HCOII] - - k[3976]*y_cur[IDX_HeII] - k[3977]*y_cur[IDX_MgII] - - k[3978]*y_cur[IDX_NII] - k[3979]*y_cur[IDX_N2HII] - - k[3980]*y_cur[IDX_NH3II] - k[3981]*y_cur[IDX_NH4II] - - k[3982]*y_cur[IDX_NOII] - k[3983]*y_cur[IDX_NaII] - - k[3984]*y_cur[IDX_OII] - k[3985]*y_cur[IDX_SII] - - k[3986]*y_cur[IDX_SOII] - k[3987]*y_cur[IDX_SiII] - - k[3988]*y_cur[IDX_SiOII] - k[3989]*y_cur[IDX_SiOHII] - - k[3990]*y_cur[IDX_SiSII] - k[5689] - k[5956]; - data[jistart + 713] = 0.0 - k[3957]*y_cur[IDX_C10HM]; - data[jistart + 714] = 0.0 - k[3958]*y_cur[IDX_C10HM]; - data[jistart + 715] = 0.0 - k[3959]*y_cur[IDX_C10HM]; - data[jistart + 716] = 0.0 - k[3960]*y_cur[IDX_C10HM]; - data[jistart + 717] = 0.0 - k[3961]*y_cur[IDX_C10HM]; - data[jistart + 718] = 0.0 - k[3962]*y_cur[IDX_C10HM]; - data[jistart + 719] = 0.0 - k[3963]*y_cur[IDX_C10HM]; - data[jistart + 720] = 0.0 - k[3964]*y_cur[IDX_C10HM]; - data[jistart + 721] = 0.0 - k[3965]*y_cur[IDX_C10HM]; - data[jistart + 722] = 0.0 - k[86]*y_cur[IDX_C10HM]; - data[jistart + 723] = 0.0 - k[3966]*y_cur[IDX_C10HM]; - data[jistart + 724] = 0.0 - k[3967]*y_cur[IDX_C10HM]; - data[jistart + 725] = 0.0 - k[3968]*y_cur[IDX_C10HM]; - data[jistart + 726] = 0.0 - k[3969]*y_cur[IDX_C10HM]; - data[jistart + 727] = 0.0 - k[3970]*y_cur[IDX_C10HM]; - data[jistart + 728] = 0.0 - k[3971]*y_cur[IDX_C10HM]; - data[jistart + 729] = 0.0 - k[3972]*y_cur[IDX_C10HM] - - k[3973]*y_cur[IDX_C10HM]; - data[jistart + 730] = 0.0 - k[3974]*y_cur[IDX_C10HM] - - k[3975]*y_cur[IDX_C10HM]; - data[jistart + 731] = 0.0 - k[3976]*y_cur[IDX_C10HM]; - data[jistart + 732] = 0.0 - k[3977]*y_cur[IDX_C10HM]; - data[jistart + 733] = 0.0 - k[3381]*y_cur[IDX_C10HM] - - k[3382]*y_cur[IDX_C10HM]; - data[jistart + 734] = 0.0 - k[3978]*y_cur[IDX_C10HM]; - data[jistart + 735] = 0.0 - k[3979]*y_cur[IDX_C10HM]; - data[jistart + 736] = 0.0 - k[3980]*y_cur[IDX_C10HM]; - data[jistart + 737] = 0.0 - k[3981]*y_cur[IDX_C10HM]; - data[jistart + 738] = 0.0 - k[3982]*y_cur[IDX_C10HM]; - data[jistart + 739] = 0.0 - k[3983]*y_cur[IDX_C10HM]; - data[jistart + 740] = 0.0 - k[3681]*y_cur[IDX_C10HM]; - data[jistart + 741] = 0.0 - k[3984]*y_cur[IDX_C10HM]; - data[jistart + 742] = 0.0 - k[3985]*y_cur[IDX_C10HM]; - data[jistart + 743] = 0.0 - k[3986]*y_cur[IDX_C10HM]; - data[jistart + 744] = 0.0 - k[3987]*y_cur[IDX_C10HM]; - data[jistart + 745] = 0.0 - k[3988]*y_cur[IDX_C10HM]; - data[jistart + 746] = 0.0 - k[3989]*y_cur[IDX_C10HM]; - data[jistart + 747] = 0.0 - k[3990]*y_cur[IDX_C10HM]; - data[jistart + 748] = 0.0 + k[5588]*y_cur[IDX_C10HI]; - data[jistart + 749] = 0.0 - k[4909]*y_cur[IDX_C10H2I]; - data[jistart + 750] = 0.0 - k[1297]*y_cur[IDX_C10H2I]; - data[jistart + 751] = 0.0 + k[86]*y_cur[IDX_HI]; - data[jistart + 752] = 0.0 - k[321]*y_cur[IDX_HII] - - k[1297]*y_cur[IDX_CII] - k[2294]*y_cur[IDX_HII] - - k[2584]*y_cur[IDX_H3II] - k[2900]*y_cur[IDX_HCOII] - - k[3062]*y_cur[IDX_HeII] - k[3063]*y_cur[IDX_HeII] - - k[3064]*y_cur[IDX_HeII] - k[3065]*y_cur[IDX_HeII] - - k[3066]*y_cur[IDX_HeII] - k[4909]*y_cur[IDX_CI] - k[5690] - k[5957] - - k[5958] - k[5959] - k[5960] - k[7067]; - data[jistart + 753] = 0.0 + k[733]*y_cur[IDX_eM] + - k[6878]*y_cur[IDX_GRAINM]; - data[jistart + 754] = 0.0 + k[4893]*y_cur[IDX_C8H2I]; - data[jistart + 755] = 0.0 + k[4893]*y_cur[IDX_C2HI]; - data[jistart + 756] = 0.0 + k[8649]*y_cur[IDX_GHI]; - data[jistart + 757] = 0.0 + k[7249] + k[7431] + k[7613]; - data[jistart + 758] = 0.0 + k[8736]*y_cur[IDX_GCHI]; - data[jistart + 759] = 0.0 + k[8736]*y_cur[IDX_GC9HI]; - data[jistart + 760] = 0.0 + k[8649]*y_cur[IDX_GC10HI]; - data[jistart + 761] = 0.0 + k[6878]*y_cur[IDX_C10H3II]; - data[jistart + 762] = 0.0 + k[86]*y_cur[IDX_C10HM]; - data[jistart + 763] = 0.0 - k[321]*y_cur[IDX_C10H2I] - - k[2294]*y_cur[IDX_C10H2I]; - data[jistart + 764] = 0.0 - k[2584]*y_cur[IDX_C10H2I]; - data[jistart + 765] = 0.0 - k[2900]*y_cur[IDX_C10H2I]; - data[jistart + 766] = 0.0 - k[3062]*y_cur[IDX_C10H2I] - - k[3063]*y_cur[IDX_C10H2I] - k[3064]*y_cur[IDX_C10H2I] - - k[3065]*y_cur[IDX_C10H2I] - k[3066]*y_cur[IDX_C10H2I]; - data[jistart + 767] = 0.0 + k[733]*y_cur[IDX_C10H3II]; - data[jistart + 768] = 0.0 - k[1848]*y_cur[IDX_C10H2II] + - k[1889]*y_cur[IDX_C9H3II]; - data[jistart + 769] = 0.0 + k[2585]*y_cur[IDX_H3II] + - k[2901]*y_cur[IDX_HCOII]; - data[jistart + 770] = 0.0 + k[2400]*y_cur[IDX_H2I]; - data[jistart + 771] = 0.0 + k[321]*y_cur[IDX_HII] + k[5958]; - data[jistart + 772] = 0.0 - k[732]*y_cur[IDX_eM] - - k[1848]*y_cur[IDX_CI] - k[3682]*y_cur[IDX_OI] - - k[6874]*y_cur[IDX_GRAINM]; - data[jistart + 773] = 0.0 + k[1503]*y_cur[IDX_C8H2I] + - k[1506]*y_cur[IDX_C8HI]; - data[jistart + 774] = 0.0 + k[1506]*y_cur[IDX_C2H2II]; - data[jistart + 775] = 0.0 + k[1503]*y_cur[IDX_C2H2II]; - data[jistart + 776] = 0.0 + k[1889]*y_cur[IDX_CI]; - data[jistart + 777] = 0.0 - k[6874]*y_cur[IDX_C10H2II]; - data[jistart + 778] = 0.0 + k[321]*y_cur[IDX_C10H2I]; - data[jistart + 779] = 0.0 + k[2400]*y_cur[IDX_C10HII]; - data[jistart + 780] = 0.0 + k[2585]*y_cur[IDX_C10HI]; - data[jistart + 781] = 0.0 + k[2901]*y_cur[IDX_C10HI]; - data[jistart + 782] = 0.0 - k[3682]*y_cur[IDX_C10H2II]; - data[jistart + 783] = 0.0 - k[732]*y_cur[IDX_C10H2II]; - data[jistart + 784] = 0.0 + k[2584]*y_cur[IDX_H3II] + - k[2900]*y_cur[IDX_HCOII]; - data[jistart + 785] = 0.0 - k[733]*y_cur[IDX_eM] - - k[734]*y_cur[IDX_eM] - k[3683]*y_cur[IDX_OI] - - k[6878]*y_cur[IDX_GRAINM] - k[6879]*y_cur[IDX_GRAINM]; - data[jistart + 786] = 0.0 + k[1504]*y_cur[IDX_C8H2I]; - data[jistart + 787] = 0.0 + k[1504]*y_cur[IDX_C2H2II]; - data[jistart + 788] = 0.0 - k[6878]*y_cur[IDX_C10H3II] - - k[6879]*y_cur[IDX_C10H3II]; - data[jistart + 789] = 0.0 + k[2584]*y_cur[IDX_C10H2I]; - data[jistart + 790] = 0.0 + k[2900]*y_cur[IDX_C10H2I]; - data[jistart + 791] = 0.0 - k[3683]*y_cur[IDX_C10H3II]; - data[jistart + 792] = 0.0 - k[733]*y_cur[IDX_C10H3II] - - k[734]*y_cur[IDX_C10H3II]; - data[jistart + 793] = 0.0 + k[4910]*y_cur[IDX_C10HI]; - data[jistart + 794] = 0.0 + k[4910]*y_cur[IDX_CI]; - data[jistart + 795] = 0.0 - k[5342]*y_cur[IDX_OI] - k[5692] - - k[5969] - k[5970] - k[5971] - k[5972] - k[5973] - k[5974] - k[7069]; - data[jistart + 796] = 0.0 + k[8684]*y_cur[IDX_GC10I]; - data[jistart + 797] = 0.0 + k[8684]*y_cur[IDX_GCI]; - data[jistart + 798] = 0.0 + k[7251] + k[7433] + k[7615]; - data[jistart + 799] = 0.0 - k[5342]*y_cur[IDX_C11I]; - data[jistart + 800] = 0.0 + k[1846]*y_cur[IDX_C10HII] + - k[1848]*y_cur[IDX_C10H2II]; - data[jistart + 801] = 0.0 + k[1297]*y_cur[IDX_C10H2I] + - k[1298]*y_cur[IDX_C10HI] + k[5495]*y_cur[IDX_C10I]; - data[jistart + 802] = 0.0 + k[5495]*y_cur[IDX_CII]; - data[jistart + 803] = 0.0 + k[1298]*y_cur[IDX_CII]; - data[jistart + 804] = 0.0 + k[1846]*y_cur[IDX_CI]; - data[jistart + 805] = 0.0 + k[1297]*y_cur[IDX_CII]; - data[jistart + 806] = 0.0 + k[1848]*y_cur[IDX_CI]; - data[jistart + 807] = 0.0 + k[5969]; - data[jistart + 808] = 0.0 - k[735]*y_cur[IDX_eM] - - k[736]*y_cur[IDX_eM] - k[737]*y_cur[IDX_eM] - k[738]*y_cur[IDX_eM] - + data[jistart + 958] = 0.0 + k[2584]*y_cur[IDX_H3II] + k[2900]*y_cur[IDX_HCOII]; + data[jistart + 959] = 0.0 + k[1504]*y_cur[IDX_C2H2II]; + data[jistart + 960] = 0.0 + k[1504]*y_cur[IDX_C8H2I]; + data[jistart + 961] = 0.0 - k[3683]*y_cur[IDX_C10H3II]; + data[jistart + 962] = 0.0 + k[2900]*y_cur[IDX_C10H2I]; + data[jistart + 963] = 0.0 + k[2584]*y_cur[IDX_C10H2I]; + data[jistart + 964] = 0.0 - k[6878]*y_cur[IDX_C10H3II] - k[6879]*y_cur[IDX_C10H3II]; + data[jistart + 965] = 0.0 - k[733]*y_cur[IDX_C10H3II] - k[734]*y_cur[IDX_C10H3II]; + data[jistart + 966] = 0.0 - k[769]*y_cur[IDX_eM] - k[770]*y_cur[IDX_eM] - + k[771]*y_cur[IDX_eM] - k[1723]*y_cur[IDX_CH3COCH3I] - + k[6671]*y_cur[IDX_GRAINM] - k[6672]*y_cur[IDX_GRAINM] - + k[6673]*y_cur[IDX_GRAINM]; + data[jistart + 967] = 0.0 + k[2136]*y_cur[IDX_CH4II]; + data[jistart + 968] = 0.0 - k[1723]*y_cur[IDX_C2H5CNHII]; + data[jistart + 969] = 0.0 + k[5533]*y_cur[IDX_CH3II]; + data[jistart + 970] = 0.0 + k[2136]*y_cur[IDX_C2H5CNI]; + data[jistart + 971] = 0.0 + k[5533]*y_cur[IDX_CH3CNI]; + data[jistart + 972] = 0.0 - k[6671]*y_cur[IDX_C2H5CNHII] - k[6672]*y_cur[IDX_C2H5CNHII] - + k[6673]*y_cur[IDX_C2H5CNHII]; + data[jistart + 973] = 0.0 - k[769]*y_cur[IDX_C2H5CNHII] - k[770]*y_cur[IDX_C2H5CNHII] - + k[771]*y_cur[IDX_C2H5CNHII]; + data[jistart + 974] = 0.0 - k[904]*y_cur[IDX_eM] - k[2492]*y_cur[IDX_H2COI] - + k[3566]*y_cur[IDX_NH3I] - k[6599]*y_cur[IDX_GRAINM]; + data[jistart + 975] = 0.0 + k[159]*y_cur[IDX_CII]; + data[jistart + 976] = 0.0 + k[1411]*y_cur[IDX_CII]; + data[jistart + 977] = 0.0 - k[2492]*y_cur[IDX_CClII]; + data[jistart + 978] = 0.0 - k[3566]*y_cur[IDX_CClII]; + data[jistart + 979] = 0.0 + k[159]*y_cur[IDX_CClI] + k[1411]*y_cur[IDX_HClI]; + data[jistart + 980] = 0.0 - k[6599]*y_cur[IDX_CClII]; + data[jistart + 981] = 0.0 - k[904]*y_cur[IDX_CClII]; + data[jistart + 982] = 0.0 - k[921]*y_cur[IDX_eM] - k[922]*y_cur[IDX_eM] - + k[6408]*y_cur[IDX_GRAINM] - k[6409]*y_cur[IDX_GRAINM]; + data[jistart + 983] = 0.0 + k[2787]*y_cur[IDX_H3OII] + k[2941]*y_cur[IDX_HCOII]; + data[jistart + 984] = 0.0 + k[3570]*y_cur[IDX_NH3I]; + data[jistart + 985] = 0.0 + k[3570]*y_cur[IDX_CH3CHOHII]; + data[jistart + 986] = 0.0 + k[2787]*y_cur[IDX_CH2NHI]; + data[jistart + 987] = 0.0 + k[2941]*y_cur[IDX_CH2NHI]; + data[jistart + 988] = 0.0 - k[6408]*y_cur[IDX_CH2NH2II] - k[6409]*y_cur[IDX_CH2NH2II]; + data[jistart + 989] = 0.0 - k[921]*y_cur[IDX_CH2NH2II] - k[922]*y_cur[IDX_CH2NH2II]; + data[jistart + 990] = 0.0 - k[1280]*y_cur[IDX_eM] - k[1281]*y_cur[IDX_eM] - + k[1282]*y_cur[IDX_eM] - k[1283]*y_cur[IDX_eM] - + k[6727]*y_cur[IDX_GRAINM] - k[6728]*y_cur[IDX_GRAINM] - + k[6729]*y_cur[IDX_GRAINM] - k[6730]*y_cur[IDX_GRAINM]; + data[jistart + 991] = 0.0 + k[5662]*y_cur[IDX_H3II] + k[5663]*y_cur[IDX_H3OII] + + k[5664]*y_cur[IDX_HCOII]; + data[jistart + 992] = 0.0 + k[5663]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 993] = 0.0 + k[5664]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 994] = 0.0 + k[5662]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 995] = 0.0 - k[6727]*y_cur[IDX_CH2OHCH2OII] - + k[6728]*y_cur[IDX_CH2OHCH2OII] - k[6729]*y_cur[IDX_CH2OHCH2OII] - + k[6730]*y_cur[IDX_CH2OHCH2OII]; + data[jistart + 996] = 0.0 - k[1280]*y_cur[IDX_CH2OHCH2OII] - + k[1281]*y_cur[IDX_CH2OHCH2OII] - k[1282]*y_cur[IDX_CH2OHCH2OII] - + k[1283]*y_cur[IDX_CH2OHCH2OII]; + data[jistart + 997] = 0.0 - k[931]*y_cur[IDX_eM] - k[932]*y_cur[IDX_eM] - + k[1896]*y_cur[IDX_CI] - k[6834]*y_cur[IDX_GRAINM] - + k[6835]*y_cur[IDX_GRAINM]; + data[jistart + 998] = 0.0 + k[2644]*y_cur[IDX_H3II] + k[2945]*y_cur[IDX_HCOII]; + data[jistart + 999] = 0.0 + k[5538]*y_cur[IDX_CH3II]; + data[jistart + 1000] = 0.0 + k[5538]*y_cur[IDX_HC5NI]; + data[jistart + 1001] = 0.0 - k[1896]*y_cur[IDX_CH3C5NHII]; + data[jistart + 1002] = 0.0 + k[2945]*y_cur[IDX_CH3C5NI]; + data[jistart + 1003] = 0.0 + k[2644]*y_cur[IDX_CH3C5NI]; + data[jistart + 1004] = 0.0 - k[6834]*y_cur[IDX_CH3C5NHII] - k[6835]*y_cur[IDX_CH3C5NHII]; + data[jistart + 1005] = 0.0 - k[931]*y_cur[IDX_CH3C5NHII] - k[932]*y_cur[IDX_CH3C5NHII]; + data[jistart + 1006] = 0.0 - k[933]*y_cur[IDX_eM] - k[934]*y_cur[IDX_eM] - + k[1897]*y_cur[IDX_CI] - k[6867]*y_cur[IDX_GRAINM] - + k[6868]*y_cur[IDX_GRAINM]; + data[jistart + 1007] = 0.0 + k[2646]*y_cur[IDX_H3II] + k[2947]*y_cur[IDX_HCOII]; + data[jistart + 1008] = 0.0 + k[5539]*y_cur[IDX_CH3II]; + data[jistart + 1009] = 0.0 + k[5539]*y_cur[IDX_HC7NI]; + data[jistart + 1010] = 0.0 - k[1897]*y_cur[IDX_CH3C7NHII]; + data[jistart + 1011] = 0.0 + k[2947]*y_cur[IDX_CH3C7NI]; + data[jistart + 1012] = 0.0 + k[2646]*y_cur[IDX_CH3C7NI]; + data[jistart + 1013] = 0.0 - k[6867]*y_cur[IDX_CH3C7NHII] - k[6868]*y_cur[IDX_CH3C7NHII]; + data[jistart + 1014] = 0.0 - k[933]*y_cur[IDX_CH3C7NHII] - k[934]*y_cur[IDX_CH3C7NHII]; + data[jistart + 1015] = 0.0 + k[7689] + k[7979] + k[8291]*y_cur[IDX_GHI]; + data[jistart + 1016] = 0.0 + k[7809] + k[8138]; + data[jistart + 1017] = 0.0 + k[7772] + k[7773] + k[8092] + k[8093]; + data[jistart + 1018] = 0.0 - k[7104] - k[7286] - k[7468] - k[7676] - k[7677] - k[7678] - + k[7679] - k[7680] - k[7681] - k[7963] - k[7964] - k[7965] - k[7966] + - k[7967] - k[7968] - k[8290]*y_cur[IDX_GHI] - + k[8591]*y_cur[IDX_GHI]; + data[jistart + 1019] = 0.0 + k[8289]*y_cur[IDX_GHI]; + data[jistart + 1020] = 0.0 + k[8532]*y_cur[IDX_GCH3I]; + data[jistart + 1021] = 0.0 + k[6922]; + data[jistart + 1022] = 0.0 + k[8532]*y_cur[IDX_GCH2I]; + data[jistart + 1023] = 0.0 + k[8289]*y_cur[IDX_GC2H4I] - k[8290]*y_cur[IDX_GC2H5I] + + k[8291]*y_cur[IDX_GC2H6I] - k[8591]*y_cur[IDX_GC2H5I]; + data[jistart + 1024] = 0.0 + k[7844] + k[8171]; + data[jistart + 1025] = 0.0 + k[8122]; + data[jistart + 1026] = 0.0 + k[8418]*y_cur[IDX_GCI]; + data[jistart + 1027] = 0.0 - k[7179] - k[7361] - k[7543] - k[7790] - k[8114] - + k[8343]*y_cur[IDX_GHI] - k[8552]*y_cur[IDX_GCH3I] - + k[8633]*y_cur[IDX_GHI] - k[8756]*y_cur[IDX_GCH3I]; + data[jistart + 1028] = 0.0 + k[8465]*y_cur[IDX_GNI]; + data[jistart + 1029] = 0.0 + k[8465]*y_cur[IDX_GC3I]; + data[jistart + 1030] = 0.0 - k[8552]*y_cur[IDX_GC3NI] - k[8756]*y_cur[IDX_GC3NI]; + data[jistart + 1031] = 0.0 + k[6997]; + data[jistart + 1032] = 0.0 + k[8418]*y_cur[IDX_GC2NI]; + data[jistart + 1033] = 0.0 - k[8343]*y_cur[IDX_GC3NI] - k[8633]*y_cur[IDX_GC3NI]; + data[jistart + 1034] = 0.0 + k[7874] + k[8228]; + data[jistart + 1035] = 0.0 + k[8218]; + data[jistart + 1036] = 0.0 + k[8247]; + data[jistart + 1037] = 0.0 - k[7239] - k[7421] - k[7603] - k[7868] - k[8211] - k[8212] - + k[8359]*y_cur[IDX_GHI] - k[8554]*y_cur[IDX_GCH3I] - + k[8645]*y_cur[IDX_GHI] - k[8758]*y_cur[IDX_GCH3I]; + data[jistart + 1038] = 0.0 + k[8469]*y_cur[IDX_GNI]; + data[jistart + 1039] = 0.0 + k[7057]; + data[jistart + 1040] = 0.0 + k[8469]*y_cur[IDX_GC7I]; + data[jistart + 1041] = 0.0 - k[8554]*y_cur[IDX_GC7NI] - k[8758]*y_cur[IDX_GC7NI]; + data[jistart + 1042] = 0.0 - k[8359]*y_cur[IDX_GC7NI] - k[8645]*y_cur[IDX_GC7NI]; + data[jistart + 1043] = 0.0 - k[7201] - k[7383] - k[7558] - k[7888] - k[8268] - + k[8365]*y_cur[IDX_GHI] - k[8651]*y_cur[IDX_GHI]; + data[jistart + 1044] = 0.0 + k[7019]; + data[jistart + 1045] = 0.0 + k[8347]*y_cur[IDX_GHI] + k[8512]*y_cur[IDX_GOHI] + + k[8537]*y_cur[IDX_GNH2I] + k[8555]*y_cur[IDX_GCH3I] + + k[8565]*y_cur[IDX_GCH3OI]; + data[jistart + 1046] = 0.0 + k[8558]*y_cur[IDX_GCOI] + k[8565]*y_cur[IDX_GHCOOCH3I]; + data[jistart + 1047] = 0.0 + k[8537]*y_cur[IDX_GHCOOCH3I]; + data[jistart + 1048] = 0.0 + k[8512]*y_cur[IDX_GHCOOCH3I]; + data[jistart + 1049] = 0.0 + k[8558]*y_cur[IDX_GCH3OI]; + data[jistart + 1050] = 0.0 + k[8555]*y_cur[IDX_GHCOOCH3I]; + data[jistart + 1051] = 0.0 + k[8347]*y_cur[IDX_GHCOOCH3I] - k[8365]*y_cur[IDX_GCOOCH3I] - + k[8651]*y_cur[IDX_GCOOCH3I]; + data[jistart + 1052] = 0.0 + k[7737] + k[8046]; + data[jistart + 1053] = 0.0 + k[7665] + k[7952]; + data[jistart + 1054] = 0.0 + k[7810] + k[8139]; + data[jistart + 1055] = 0.0 - k[7093] - k[7275] - k[7457] - k[7651] - k[7938]; + data[jistart + 1056] = 0.0 + k[8481]*y_cur[IDX_GCHI]; + data[jistart + 1057] = 0.0 + k[8480]*y_cur[IDX_GCHI]; + data[jistart + 1058] = 0.0 + k[8292]*y_cur[IDX_GHI] + k[8376]*y_cur[IDX_GH2I]; + data[jistart + 1059] = 0.0 + k[8455]*y_cur[IDX_GCHI]; + data[jistart + 1060] = 0.0 + k[8455]*y_cur[IDX_GNI] + k[8480]*y_cur[IDX_GNHI] + + k[8481]*y_cur[IDX_GNOI]; + data[jistart + 1061] = 0.0 + k[8376]*y_cur[IDX_GCNI]; + data[jistart + 1062] = 0.0 + k[6911]; + data[jistart + 1063] = 0.0 + k[8292]*y_cur[IDX_GCNI]; + data[jistart + 1064] = 0.0 + k[7096] + k[7278] + k[7460]; + data[jistart + 1065] = 0.0 - k[4960]*y_cur[IDX_CI] - k[5164]*y_cur[IDX_HI] - + k[5264]*y_cur[IDX_NI] - k[5396]*y_cur[IDX_OI] - k[5835] - k[6151] - + k[6914]; + data[jistart + 1066] = 0.0 + k[8699]*y_cur[IDX_GNI]; + data[jistart + 1067] = 0.0 + k[8699]*y_cur[IDX_GCH2I]; + data[jistart + 1068] = 0.0 + k[5227]*y_cur[IDX_NI]; + data[jistart + 1069] = 0.0 + k[5257]*y_cur[IDX_NI]; + data[jistart + 1070] = 0.0 + k[5227]*y_cur[IDX_C2H5I] + k[5257]*y_cur[IDX_CH3I] - + k[5264]*y_cur[IDX_H2CNI]; + data[jistart + 1071] = 0.0 - k[5396]*y_cur[IDX_H2CNI]; + data[jistart + 1072] = 0.0 - k[4960]*y_cur[IDX_H2CNI]; + data[jistart + 1073] = 0.0 - k[5164]*y_cur[IDX_H2CNI]; + data[jistart + 1074] = 0.0 - k[1023]*y_cur[IDX_eM] - k[1024]*y_cur[IDX_eM] - + k[6585]*y_cur[IDX_GRAINM] - k[6586]*y_cur[IDX_GRAINM]; + data[jistart + 1075] = 0.0 + k[176]*y_cur[IDX_CII] + k[381]*y_cur[IDX_HII]; + data[jistart + 1076] = 0.0 + k[3758]*y_cur[IDX_OI]; + data[jistart + 1077] = 0.0 + k[3758]*y_cur[IDX_SiH3II]; + data[jistart + 1078] = 0.0 + k[176]*y_cur[IDX_H2SiOI]; + data[jistart + 1079] = 0.0 + k[381]*y_cur[IDX_H2SiOI]; + data[jistart + 1080] = 0.0 - k[6585]*y_cur[IDX_H2SiOII] - k[6586]*y_cur[IDX_H2SiOII]; + data[jistart + 1081] = 0.0 - k[1023]*y_cur[IDX_H2SiOII] - k[1024]*y_cur[IDX_H2SiOII]; + data[jistart + 1082] = 0.0 - k[1028]*y_cur[IDX_eM] - k[1029]*y_cur[IDX_eM] - + k[6804]*y_cur[IDX_GRAINM] - k[6805]*y_cur[IDX_GRAINM]; + data[jistart + 1083] = 0.0 + k[1895]*y_cur[IDX_CI]; + data[jistart + 1084] = 0.0 + k[3455]*y_cur[IDX_NI]; + data[jistart + 1085] = 0.0 + k[3417]*y_cur[IDX_NI]; + data[jistart + 1086] = 0.0 + k[5508]*y_cur[IDX_C2H2II]; + data[jistart + 1087] = 0.0 + k[5508]*y_cur[IDX_HC3NI]; + data[jistart + 1088] = 0.0 + k[3417]*y_cur[IDX_C5H5II] + k[3455]*y_cur[IDX_CH3C4HII]; + data[jistart + 1089] = 0.0 + k[1895]*y_cur[IDX_CH3C3NHII]; + data[jistart + 1090] = 0.0 - k[6804]*y_cur[IDX_H3C5NII] - k[6805]*y_cur[IDX_H3C5NII]; + data[jistart + 1091] = 0.0 - k[1028]*y_cur[IDX_H3C5NII] - k[1029]*y_cur[IDX_H3C5NII]; + data[jistart + 1092] = 0.0 - k[1092]*y_cur[IDX_eM] - k[1093]*y_cur[IDX_eM] - + k[2897]*y_cur[IDX_H2I] - k[2898]*y_cur[IDX_H2I] - + k[6514]*y_cur[IDX_GRAINM] - k[6515]*y_cur[IDX_GRAINM]; + data[jistart + 1093] = 0.0 + k[2672]*y_cur[IDX_H3II]; + data[jistart + 1094] = 0.0 + k[520]*y_cur[IDX_HeII]; + data[jistart + 1095] = 0.0 + k[520]*y_cur[IDX_HCNOI]; + data[jistart + 1096] = 0.0 + k[2672]*y_cur[IDX_CNOI]; + data[jistart + 1097] = 0.0 - k[6514]*y_cur[IDX_HCNOII] - k[6515]*y_cur[IDX_HCNOII]; + data[jistart + 1098] = 0.0 - k[2897]*y_cur[IDX_HCNOII] - k[2898]*y_cur[IDX_HCNOII]; + data[jistart + 1099] = 0.0 - k[1092]*y_cur[IDX_HCNOII] - k[1093]*y_cur[IDX_HCNOII]; + data[jistart + 1100] = 0.0 + k[7173] + k[7355] + k[7537]; + data[jistart + 1101] = 0.0 + k[993]*y_cur[IDX_eM] + k[6624]*y_cur[IDX_GRAINM]; + data[jistart + 1102] = 0.0 - k[159]*y_cur[IDX_CII] - k[3159]*y_cur[IDX_HeII] - + k[5379]*y_cur[IDX_OI] - k[5380]*y_cur[IDX_OI] - k[5775] - k[6072] - + k[6991]; + data[jistart + 1103] = 0.0 - k[5379]*y_cur[IDX_CClI] - k[5380]*y_cur[IDX_CClI]; + data[jistart + 1104] = 0.0 - k[3159]*y_cur[IDX_CClI]; + data[jistart + 1105] = 0.0 - k[159]*y_cur[IDX_CClI]; + data[jistart + 1106] = 0.0 + k[6624]*y_cur[IDX_H2CClII]; + data[jistart + 1107] = 0.0 + k[993]*y_cur[IDX_H2CClII]; + data[jistart + 1108] = 0.0 - k[1284]*y_cur[IDX_eM] - k[1285]*y_cur[IDX_eM] - + k[1286]*y_cur[IDX_eM] - k[1287]*y_cur[IDX_eM] - + k[1288]*y_cur[IDX_eM] - k[1289]*y_cur[IDX_eM] - + k[6711]*y_cur[IDX_GRAINM] - k[6712]*y_cur[IDX_GRAINM] - + k[6713]*y_cur[IDX_GRAINM] - k[6714]*y_cur[IDX_GRAINM] - + k[6715]*y_cur[IDX_GRAINM] - k[6716]*y_cur[IDX_GRAINM]; + data[jistart + 1109] = 0.0 + k[5667]*y_cur[IDX_CII]; + data[jistart + 1110] = 0.0 + k[5667]*y_cur[IDX_CH3COOHI]; + data[jistart + 1111] = 0.0 - k[6711]*y_cur[IDX_CH3COOHII] - k[6712]*y_cur[IDX_CH3COOHII] - + k[6713]*y_cur[IDX_CH3COOHII] - k[6714]*y_cur[IDX_CH3COOHII] - + k[6715]*y_cur[IDX_CH3COOHII] - k[6716]*y_cur[IDX_CH3COOHII]; + data[jistart + 1112] = 0.0 - k[1284]*y_cur[IDX_CH3COOHII] - k[1285]*y_cur[IDX_CH3COOHII] - + k[1286]*y_cur[IDX_CH3COOHII] - k[1287]*y_cur[IDX_CH3COOHII] - + k[1288]*y_cur[IDX_CH3COOHII] - k[1289]*y_cur[IDX_CH3COOHII]; + data[jistart + 1113] = 0.0 + k[3216]*y_cur[IDX_HeII]; + data[jistart + 1114] = 0.0 - k[318]*y_cur[IDX_HI] - k[679]*y_cur[IDX_O2I] - + k[2439]*y_cur[IDX_H2I] - k[5613]*y_cur[IDX_eM] - + k[6454]*y_cur[IDX_GRAINM]; + data[jistart + 1115] = 0.0 + k[319]*y_cur[IDX_HII] + k[5677] + k[5830] + k[6143] + k[6307]; + data[jistart + 1116] = 0.0 + k[3259]*y_cur[IDX_HeII]; + data[jistart + 1117] = 0.0 - k[679]*y_cur[IDX_ClII]; + data[jistart + 1118] = 0.0 + k[3216]*y_cur[IDX_ClOI] + k[3259]*y_cur[IDX_HClI]; + data[jistart + 1119] = 0.0 + k[319]*y_cur[IDX_ClI]; + data[jistart + 1120] = 0.0 - k[6454]*y_cur[IDX_ClII]; + data[jistart + 1121] = 0.0 - k[2439]*y_cur[IDX_ClII]; + data[jistart + 1122] = 0.0 - k[5613]*y_cur[IDX_ClII]; + data[jistart + 1123] = 0.0 - k[318]*y_cur[IDX_ClII]; + data[jistart + 1124] = 0.0 - k[7082] - k[7264] - k[7446] - k[7634] - k[7635] - k[7636] - + k[7637] - k[7915] - k[7916] - k[7917] - k[7918]; + data[jistart + 1125] = 0.0 + k[8538]*y_cur[IDX_GNH2I]; + data[jistart + 1126] = 0.0 + k[8536]*y_cur[IDX_GNH2I]; + data[jistart + 1127] = 0.0 + k[8537]*y_cur[IDX_GNH2I]; + data[jistart + 1128] = 0.0 + k[8535]*y_cur[IDX_GNH2I]; + data[jistart + 1129] = 0.0 + k[8534]*y_cur[IDX_GNH2I]; + data[jistart + 1130] = 0.0 + k[8281]*y_cur[IDX_GHI] + k[8372]*y_cur[IDX_GH2I] + + k[8534]*y_cur[IDX_GH2COI] + k[8535]*y_cur[IDX_GCH3CHOI] + + k[8536]*y_cur[IDX_GHCOOHI] + k[8537]*y_cur[IDX_GHCOOCH3I] + + k[8538]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1131] = 0.0 + k[8372]*y_cur[IDX_GNH2I]; + data[jistart + 1132] = 0.0 + k[6900]; + data[jistart + 1133] = 0.0 + k[8281]*y_cur[IDX_GNH2I]; + data[jistart + 1134] = 0.0 + k[2453]*y_cur[IDX_H2I]; + data[jistart + 1135] = 0.0 - k[1002]*y_cur[IDX_eM] - k[1003]*y_cur[IDX_eM] - + k[2284]*y_cur[IDX_COI] - k[2543]*y_cur[IDX_H2OI] - + k[6457]*y_cur[IDX_GRAINM] - k[6458]*y_cur[IDX_GRAINM]; + data[jistart + 1136] = 0.0 + k[2231]*y_cur[IDX_CH5II] + k[2704]*y_cur[IDX_H3II]; + data[jistart + 1137] = 0.0 + k[2231]*y_cur[IDX_HClI]; + data[jistart + 1138] = 0.0 - k[2543]*y_cur[IDX_H2ClII]; + data[jistart + 1139] = 0.0 + k[2704]*y_cur[IDX_HClI]; + data[jistart + 1140] = 0.0 - k[2284]*y_cur[IDX_H2ClII]; + data[jistart + 1141] = 0.0 - k[6457]*y_cur[IDX_H2ClII] - k[6458]*y_cur[IDX_H2ClII]; + data[jistart + 1142] = 0.0 + k[2453]*y_cur[IDX_HClII]; + data[jistart + 1143] = 0.0 - k[1002]*y_cur[IDX_H2ClII] - k[1003]*y_cur[IDX_H2ClII]; + data[jistart + 1144] = 0.0 + k[1897]*y_cur[IDX_CI]; + data[jistart + 1145] = 0.0 - k[1032]*y_cur[IDX_eM] - k[1033]*y_cur[IDX_eM] - + k[6882]*y_cur[IDX_GRAINM] - k[6883]*y_cur[IDX_GRAINM]; + data[jistart + 1146] = 0.0 + k[3451]*y_cur[IDX_NI]; + data[jistart + 1147] = 0.0 + k[5510]*y_cur[IDX_C2H2II]; + data[jistart + 1148] = 0.0 + k[5519]*y_cur[IDX_C4H2II]; + data[jistart + 1149] = 0.0 + k[5519]*y_cur[IDX_HC5NI]; + data[jistart + 1150] = 0.0 + k[5510]*y_cur[IDX_HC7NI]; + data[jistart + 1151] = 0.0 + k[3451]*y_cur[IDX_C9H4II]; + data[jistart + 1152] = 0.0 + k[1897]*y_cur[IDX_CH3C7NHII]; + data[jistart + 1153] = 0.0 - k[6882]*y_cur[IDX_H3C9NII] - k[6883]*y_cur[IDX_H3C9NII]; + data[jistart + 1154] = 0.0 - k[1032]*y_cur[IDX_H3C9NII] - k[1033]*y_cur[IDX_H3C9NII]; + data[jistart + 1155] = 0.0 - k[1053]*y_cur[IDX_eM] - k[1054]*y_cur[IDX_eM] - + k[6725]*y_cur[IDX_GRAINM] - k[6726]*y_cur[IDX_GRAINM]; + data[jistart + 1156] = 0.0 + k[2698]*y_cur[IDX_H3II] + k[2807]*y_cur[IDX_H3OII] + + k[2970]*y_cur[IDX_HCOII]; + data[jistart + 1157] = 0.0 + k[2495]*y_cur[IDX_H2COI]; + data[jistart + 1158] = 0.0 + k[2495]*y_cur[IDX_CH3OH2II]; + data[jistart + 1159] = 0.0 + k[2807]*y_cur[IDX_HCOOCH3I]; + data[jistart + 1160] = 0.0 + k[2970]*y_cur[IDX_HCOOCH3I]; + data[jistart + 1161] = 0.0 + k[2698]*y_cur[IDX_HCOOCH3I]; + data[jistart + 1162] = 0.0 - k[6725]*y_cur[IDX_H5C2O2II] - k[6726]*y_cur[IDX_H5C2O2II]; + data[jistart + 1163] = 0.0 - k[1053]*y_cur[IDX_H5C2O2II] - k[1054]*y_cur[IDX_H5C2O2II]; + data[jistart + 1164] = 0.0 - k[1101]*y_cur[IDX_eM] - k[1102]*y_cur[IDX_eM] - + k[6574]*y_cur[IDX_GRAINM] - k[6575]*y_cur[IDX_GRAINM]; + data[jistart + 1165] = 0.0 + k[5645]*y_cur[IDX_H3II] + k[5646]*y_cur[IDX_HCOII]; + data[jistart + 1166] = 0.0 + k[675]*y_cur[IDX_O2II] + k[6188]; + data[jistart + 1167] = 0.0 + k[675]*y_cur[IDX_HCOOHI]; + data[jistart + 1168] = 0.0 + k[5646]*y_cur[IDX_COOHI]; + data[jistart + 1169] = 0.0 + k[5645]*y_cur[IDX_COOHI]; + data[jistart + 1170] = 0.0 - k[6574]*y_cur[IDX_HCOOHII] - k[6575]*y_cur[IDX_HCOOHII]; + data[jistart + 1171] = 0.0 - k[1101]*y_cur[IDX_HCOOHII] - k[1102]*y_cur[IDX_HCOOHII]; + data[jistart + 1172] = 0.0 - k[1132]*y_cur[IDX_eM] - k[1133]*y_cur[IDX_eM] - + k[1134]*y_cur[IDX_eM] - k[6571]*y_cur[IDX_GRAINM] - + k[6572]*y_cur[IDX_GRAINM] - k[6573]*y_cur[IDX_GRAINM]; + data[jistart + 1173] = 0.0 + k[2737]*y_cur[IDX_H3II] + k[2816]*y_cur[IDX_H3OII] + + k[2986]*y_cur[IDX_HCOII]; + data[jistart + 1174] = 0.0 + k[2816]*y_cur[IDX_PNI]; + data[jistart + 1175] = 0.0 + k[2986]*y_cur[IDX_PNI]; + data[jistart + 1176] = 0.0 + k[2737]*y_cur[IDX_PNI]; + data[jistart + 1177] = 0.0 - k[6571]*y_cur[IDX_HPNII] - k[6572]*y_cur[IDX_HPNII] - + k[6573]*y_cur[IDX_HPNII]; + data[jistart + 1178] = 0.0 - k[1132]*y_cur[IDX_HPNII] - k[1133]*y_cur[IDX_HPNII] - + k[1134]*y_cur[IDX_HPNII]; + data[jistart + 1179] = 0.0 - k[786]*y_cur[IDX_eM] - k[787]*y_cur[IDX_eM] - + k[2405]*y_cur[IDX_H2I] - k[6674]*y_cur[IDX_GRAINM] - + k[6675]*y_cur[IDX_GRAINM]; + data[jistart + 1180] = 0.0 + k[152]*y_cur[IDX_CII] + k[332]*y_cur[IDX_HII]; + data[jistart + 1181] = 0.0 + k[1750]*y_cur[IDX_C2HI]; + data[jistart + 1182] = 0.0 + k[1750]*y_cur[IDX_SII]; + data[jistart + 1183] = 0.0 + k[1527]*y_cur[IDX_C2H2II]; + data[jistart + 1184] = 0.0 + k[1527]*y_cur[IDX_SI]; + data[jistart + 1185] = 0.0 + k[152]*y_cur[IDX_C2SI]; + data[jistart + 1186] = 0.0 + k[332]*y_cur[IDX_C2SI]; + data[jistart + 1187] = 0.0 - k[6674]*y_cur[IDX_C2SII] - k[6675]*y_cur[IDX_C2SII]; + data[jistart + 1188] = 0.0 - k[2405]*y_cur[IDX_C2SII]; + data[jistart + 1189] = 0.0 - k[786]*y_cur[IDX_C2SII] - k[787]*y_cur[IDX_C2SII]; + data[jistart + 1190] = 0.0 - k[816]*y_cur[IDX_eM] - k[817]*y_cur[IDX_eM] - + k[818]*y_cur[IDX_eM] - k[6775]*y_cur[IDX_GRAINM] - + k[6776]*y_cur[IDX_GRAINM] - k[6777]*y_cur[IDX_GRAINM]; + data[jistart + 1191] = 0.0 + k[154]*y_cur[IDX_CII] + k[337]*y_cur[IDX_HII]; + data[jistart + 1192] = 0.0 + k[1902]*y_cur[IDX_CI]; + data[jistart + 1193] = 0.0 + k[3821]*y_cur[IDX_SII]; + data[jistart + 1194] = 0.0 + k[3821]*y_cur[IDX_C3HI]; + data[jistart + 1195] = 0.0 + k[154]*y_cur[IDX_C3SI]; + data[jistart + 1196] = 0.0 + k[337]*y_cur[IDX_C3SI]; + data[jistart + 1197] = 0.0 + k[1902]*y_cur[IDX_HC2SII]; + data[jistart + 1198] = 0.0 - k[6775]*y_cur[IDX_C3SII] - k[6776]*y_cur[IDX_C3SII] - + k[6777]*y_cur[IDX_C3SII]; + data[jistart + 1199] = 0.0 - k[816]*y_cur[IDX_C3SII] - k[817]*y_cur[IDX_C3SII] - + k[818]*y_cur[IDX_C3SII]; + data[jistart + 1200] = 0.0 + k[7212] + k[7394] + k[7576]; + data[jistart + 1201] = 0.0 - k[5237]*y_cur[IDX_NI] - k[5363]*y_cur[IDX_OI] - k[5733] - + k[6018] - k[6019] - k[7030]; + data[jistart + 1202] = 0.0 + k[131]*y_cur[IDX_OI]; + data[jistart + 1203] = 0.0 + k[114]*y_cur[IDX_NI]; + data[jistart + 1204] = 0.0 + k[5241]*y_cur[IDX_NI] + k[5367]*y_cur[IDX_OI]; + data[jistart + 1205] = 0.0 + k[42]*y_cur[IDX_CI]; + data[jistart + 1206] = 0.0 + k[5236]*y_cur[IDX_NI]; + data[jistart + 1207] = 0.0 + k[114]*y_cur[IDX_C4M] + k[5236]*y_cur[IDX_C4HI] - + k[5237]*y_cur[IDX_C4NI] + k[5241]*y_cur[IDX_C5NI]; + data[jistart + 1208] = 0.0 + k[131]*y_cur[IDX_C5NM] - k[5363]*y_cur[IDX_C4NI] + + k[5367]*y_cur[IDX_C5NI]; + data[jistart + 1209] = 0.0 + k[42]*y_cur[IDX_C3NM]; + data[jistart + 1210] = 0.0 - k[1290]*y_cur[IDX_eM] - k[1291]*y_cur[IDX_eM] - + k[1292]*y_cur[IDX_eM] - k[1293]*y_cur[IDX_eM] - + k[1294]*y_cur[IDX_eM] - k[1295]*y_cur[IDX_eM] - + k[1296]*y_cur[IDX_eM] - k[6731]*y_cur[IDX_GRAINM] - + k[6732]*y_cur[IDX_GRAINM] - k[6733]*y_cur[IDX_GRAINM] - + k[6734]*y_cur[IDX_GRAINM] - k[6735]*y_cur[IDX_GRAINM] - + k[6736]*y_cur[IDX_GRAINM] - k[6737]*y_cur[IDX_GRAINM]; + data[jistart + 1211] = 0.0 + k[5668]*y_cur[IDX_H3II] + k[5669]*y_cur[IDX_H3OII] + + k[5670]*y_cur[IDX_HCOII]; + data[jistart + 1212] = 0.0 + k[5669]*y_cur[IDX_CH3COOHI]; + data[jistart + 1213] = 0.0 + k[5670]*y_cur[IDX_CH3COOHI]; + data[jistart + 1214] = 0.0 + k[5668]*y_cur[IDX_CH3COOHI]; + data[jistart + 1215] = 0.0 - k[6731]*y_cur[IDX_CH3COOH2II] - k[6732]*y_cur[IDX_CH3COOH2II] + - k[6733]*y_cur[IDX_CH3COOH2II] - k[6734]*y_cur[IDX_CH3COOH2II] - + k[6735]*y_cur[IDX_CH3COOH2II] - k[6736]*y_cur[IDX_CH3COOH2II] - + k[6737]*y_cur[IDX_CH3COOH2II]; + data[jistart + 1216] = 0.0 - k[1290]*y_cur[IDX_CH3COOH2II] - k[1291]*y_cur[IDX_CH3COOH2II] + - k[1292]*y_cur[IDX_CH3COOH2II] - k[1293]*y_cur[IDX_CH3COOH2II] - + k[1294]*y_cur[IDX_CH3COOH2II] - k[1295]*y_cur[IDX_CH3COOH2II] - + k[1296]*y_cur[IDX_CH3COOH2II]; + data[jistart + 1217] = 0.0 - k[955]*y_cur[IDX_eM] - k[956]*y_cur[IDX_eM] - + k[6587]*y_cur[IDX_GRAINM] - k[6588]*y_cur[IDX_GRAINM]; + data[jistart + 1218] = 0.0 + k[169]*y_cur[IDX_CII] + k[369]*y_cur[IDX_HII] + + k[671]*y_cur[IDX_O2II] + k[714]*y_cur[IDX_SOII] + k[5814] + k[6118]; + data[jistart + 1219] = 0.0 + k[671]*y_cur[IDX_CH3OCH3I]; + data[jistart + 1220] = 0.0 + k[714]*y_cur[IDX_CH3OCH3I]; + data[jistart + 1221] = 0.0 + k[169]*y_cur[IDX_CH3OCH3I]; + data[jistart + 1222] = 0.0 + k[369]*y_cur[IDX_CH3OCH3I]; + data[jistart + 1223] = 0.0 - k[6587]*y_cur[IDX_CH3OCH3II] - k[6588]*y_cur[IDX_CH3OCH3II]; + data[jistart + 1224] = 0.0 - k[955]*y_cur[IDX_CH3OCH3II] - k[956]*y_cur[IDX_CH3OCH3II]; + data[jistart + 1225] = 0.0 + k[8248]; + data[jistart + 1226] = 0.0 + k[7880]; + data[jistart + 1227] = 0.0 - k[7246] - k[7428] - k[7610] - k[7875] - k[8229] - k[8230] - + k[8231] - k[8232] - k[8233] - k[8234] - k[8235] - + k[8362]*y_cur[IDX_GHI] - k[8392]*y_cur[IDX_GH2I] - + k[8433]*y_cur[IDX_GCI] - k[8648]*y_cur[IDX_GHI] - + k[8684]*y_cur[IDX_GCI]; + data[jistart + 1228] = 0.0 + k[7876] + k[8236] + k[8243]; + data[jistart + 1229] = 0.0 + k[8431]*y_cur[IDX_GCI]; + data[jistart + 1230] = 0.0 - k[8392]*y_cur[IDX_GC10I]; + data[jistart + 1231] = 0.0 + k[7064]; + data[jistart + 1232] = 0.0 + k[8431]*y_cur[IDX_GC9I] - k[8433]*y_cur[IDX_GC10I] - + k[8684]*y_cur[IDX_GC10I]; + data[jistart + 1233] = 0.0 - k[8362]*y_cur[IDX_GC10I] - k[8648]*y_cur[IDX_GC10I]; + data[jistart + 1234] = 0.0 + k[7878] + k[8249] + k[8251]; + data[jistart + 1235] = 0.0 + k[8362]*y_cur[IDX_GHI] + k[8392]*y_cur[IDX_GH2I]; + data[jistart + 1236] = 0.0 - k[7247] - k[7429] - k[7611] - k[7876] - k[8236] - k[8237] - + k[8238] - k[8239] - k[8240] - k[8241] - k[8242] - k[8243] - k[8244] + - k[8245] - k[8363]*y_cur[IDX_GHI] - k[8393]*y_cur[IDX_GH2I] - + k[8649]*y_cur[IDX_GHI]; + data[jistart + 1237] = 0.0 + k[8432]*y_cur[IDX_GCI]; + data[jistart + 1238] = 0.0 + k[8392]*y_cur[IDX_GC10I] - k[8393]*y_cur[IDX_GC10HI]; + data[jistart + 1239] = 0.0 + k[7065]; + data[jistart + 1240] = 0.0 + k[8432]*y_cur[IDX_GC9HI]; + data[jistart + 1241] = 0.0 + k[8362]*y_cur[IDX_GC10I] - k[8363]*y_cur[IDX_GC10HI] - + k[8649]*y_cur[IDX_GC10HI]; + data[jistart + 1242] = 0.0 + k[7869] + k[8213] + k[8215]; + data[jistart + 1243] = 0.0 + k[7879] + k[8252] + k[8253]; + data[jistart + 1244] = 0.0 - k[7238] - k[7420] - k[7602] - k[7867] - k[8208] - k[8209] - + k[8210] - k[8358]*y_cur[IDX_GHI] - k[8389]*y_cur[IDX_GH2I] - + k[8430]*y_cur[IDX_GCI] - k[8502]*y_cur[IDX_GCHI] - + k[8644]*y_cur[IDX_GHI] - k[8681]*y_cur[IDX_GCI] - + k[8735]*y_cur[IDX_GCHI]; + data[jistart + 1245] = 0.0 + k[8223]; + data[jistart + 1246] = 0.0 + k[8428]*y_cur[IDX_GCI]; + data[jistart + 1247] = 0.0 + k[8357]*y_cur[IDX_GHI] + k[8388]*y_cur[IDX_GH2I]; + data[jistart + 1248] = 0.0 + k[8499]*y_cur[IDX_GCHI]; + data[jistart + 1249] = 0.0 + k[8499]*y_cur[IDX_GC7I] - k[8502]*y_cur[IDX_GC8HI] - + k[8735]*y_cur[IDX_GC8HI]; + data[jistart + 1250] = 0.0 + k[8388]*y_cur[IDX_GC8I] - k[8389]*y_cur[IDX_GC8HI]; + data[jistart + 1251] = 0.0 + k[7056]; + data[jistart + 1252] = 0.0 + k[8428]*y_cur[IDX_GC7HI] - k[8430]*y_cur[IDX_GC8HI] - + k[8681]*y_cur[IDX_GC8HI]; + data[jistart + 1253] = 0.0 + k[8357]*y_cur[IDX_GC8I] - k[8358]*y_cur[IDX_GC8HI] - + k[8644]*y_cur[IDX_GC8HI]; + data[jistart + 1254] = 0.0 - k[7202] - k[7384] - k[7559] - k[7889] - k[8269] - + k[8366]*y_cur[IDX_GHI] - k[8652]*y_cur[IDX_GHI]; + data[jistart + 1255] = 0.0 + k[8367]*y_cur[IDX_GHI] + k[8519]*y_cur[IDX_GOHI] + + k[8527]*y_cur[IDX_GNHI] + k[8538]*y_cur[IDX_GNH2I] + + k[8556]*y_cur[IDX_GCH3I] + k[8567]*y_cur[IDX_GCH3OI] + + k[8574]*y_cur[IDX_GCH2OHI]; + data[jistart + 1256] = 0.0 + k[8568]*y_cur[IDX_GCOI] + k[8574]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1257] = 0.0 + k[7020]; + data[jistart + 1258] = 0.0 + k[8567]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1259] = 0.0 + k[8538]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1260] = 0.0 + k[8527]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1261] = 0.0 + k[8519]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1262] = 0.0 + k[8568]*y_cur[IDX_GCH2OHI]; + data[jistart + 1263] = 0.0 + k[8556]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1264] = 0.0 - k[8366]*y_cur[IDX_GCH2OHCOI] + k[8367]*y_cur[IDX_GCH2OHCHOI] - + k[8652]*y_cur[IDX_GCH2OHCOI]; + data[jistart + 1265] = 0.0 + k[7891] + k[8272]; + data[jistart + 1266] = 0.0 - k[7163] - k[7345] - k[7527] - k[7884] - k[8267] - + k[8336]*y_cur[IDX_GHI] - k[8549]*y_cur[IDX_GCH3I] - + k[8628]*y_cur[IDX_GHI] - k[8755]*y_cur[IDX_GCH3I]; + data[jistart + 1267] = 0.0 + k[8337]*y_cur[IDX_GHI] + k[8510]*y_cur[IDX_GOHI] + + k[8536]*y_cur[IDX_GNH2I] + k[8550]*y_cur[IDX_GCH3I] + + k[8564]*y_cur[IDX_GCH3OI]; + data[jistart + 1268] = 0.0 + k[8564]*y_cur[IDX_GHCOOHI]; + data[jistart + 1269] = 0.0 + k[6981]; + data[jistart + 1270] = 0.0 + k[8536]*y_cur[IDX_GHCOOHI]; + data[jistart + 1271] = 0.0 + k[8510]*y_cur[IDX_GHCOOHI] + k[8516]*y_cur[IDX_GCOI]; + data[jistart + 1272] = 0.0 + k[8516]*y_cur[IDX_GOHI]; + data[jistart + 1273] = 0.0 - k[8549]*y_cur[IDX_GCOOHI] + k[8550]*y_cur[IDX_GHCOOHI] - + k[8755]*y_cur[IDX_GCOOHI]; + data[jistart + 1274] = 0.0 - k[8336]*y_cur[IDX_GCOOHI] + k[8337]*y_cur[IDX_GHCOOHI] - + k[8628]*y_cur[IDX_GCOOHI]; + data[jistart + 1275] = 0.0 + k[8349]*y_cur[IDX_GHI]; + data[jistart + 1276] = 0.0 + k[7705] + k[8005] + k[8436]*y_cur[IDX_GOI] + + k[8454]*y_cur[IDX_GNI]; + data[jistart + 1277] = 0.0 - k[7116] - k[7298] - k[7480] - k[7703] - k[7704] - k[8003] - + k[8004] - k[8307]*y_cur[IDX_GHI] - k[8407]*y_cur[IDX_GCI] - + k[8485]*y_cur[IDX_GCHI] - k[8528]*y_cur[IDX_GCH2I] - + k[8605]*y_cur[IDX_GHI]; + data[jistart + 1278] = 0.0 - k[8528]*y_cur[IDX_GO2I]; + data[jistart + 1279] = 0.0 + k[8454]*y_cur[IDX_GO2HI]; + data[jistart + 1280] = 0.0 + k[8436]*y_cur[IDX_GO2HI] + k[8443]*y_cur[IDX_GOI] + + k[8443]*y_cur[IDX_GOI]; + data[jistart + 1281] = 0.0 - k[8485]*y_cur[IDX_GO2I]; + data[jistart + 1282] = 0.0 - k[8407]*y_cur[IDX_GO2I]; + data[jistart + 1283] = 0.0 + k[6934]; + data[jistart + 1284] = 0.0 - k[8307]*y_cur[IDX_GO2I] + k[8349]*y_cur[IDX_GSO2I] - + k[8605]*y_cur[IDX_GO2I]; + data[jistart + 1285] = 0.0 + k[1896]*y_cur[IDX_CI]; + data[jistart + 1286] = 0.0 - k[1030]*y_cur[IDX_eM] - k[1031]*y_cur[IDX_eM] - + k[6851]*y_cur[IDX_GRAINM] - k[6852]*y_cur[IDX_GRAINM]; + data[jistart + 1287] = 0.0 + k[3434]*y_cur[IDX_NI]; + data[jistart + 1288] = 0.0 + k[3435]*y_cur[IDX_NI]; + data[jistart + 1289] = 0.0 + k[5509]*y_cur[IDX_C2H2II]; + data[jistart + 1290] = 0.0 + k[5517]*y_cur[IDX_C4H2II]; + data[jistart + 1291] = 0.0 + k[5517]*y_cur[IDX_HC3NI]; + data[jistart + 1292] = 0.0 + k[5509]*y_cur[IDX_HC5NI]; + data[jistart + 1293] = 0.0 + k[3434]*y_cur[IDX_C7H4II] + k[3435]*y_cur[IDX_C7H5II]; + data[jistart + 1294] = 0.0 + k[1896]*y_cur[IDX_CH3C5NHII]; + data[jistart + 1295] = 0.0 - k[6851]*y_cur[IDX_H3C7NII] - k[6852]*y_cur[IDX_H3C7NII]; + data[jistart + 1296] = 0.0 - k[1030]*y_cur[IDX_H3C7NII] - k[1031]*y_cur[IDX_H3C7NII]; + data[jistart + 1297] = 0.0 - k[1051]*y_cur[IDX_eM] - k[1052]*y_cur[IDX_eM] - + k[6590]*y_cur[IDX_GRAINM] - k[6591]*y_cur[IDX_GRAINM]; + data[jistart + 1298] = 0.0 + k[3760]*y_cur[IDX_OI]; + data[jistart + 1299] = 0.0 + k[2687]*y_cur[IDX_H3II] + k[2802]*y_cur[IDX_H3OII] + + k[2962]*y_cur[IDX_HCOII]; + data[jistart + 1300] = 0.0 + k[3884]*y_cur[IDX_O2I]; + data[jistart + 1301] = 0.0 + k[3884]*y_cur[IDX_SiH3II]; + data[jistart + 1302] = 0.0 + k[2802]*y_cur[IDX_H2SiOI]; + data[jistart + 1303] = 0.0 + k[3760]*y_cur[IDX_SiH5II]; + data[jistart + 1304] = 0.0 + k[2962]*y_cur[IDX_H2SiOI]; + data[jistart + 1305] = 0.0 + k[2687]*y_cur[IDX_H2SiOI]; + data[jistart + 1306] = 0.0 - k[6590]*y_cur[IDX_H3SiOII] - k[6591]*y_cur[IDX_H3SiOII]; + data[jistart + 1307] = 0.0 - k[1051]*y_cur[IDX_H3SiOII] - k[1052]*y_cur[IDX_H3SiOII]; + data[jistart + 1308] = 0.0 - k[1142]*y_cur[IDX_eM] - k[1143]*y_cur[IDX_eM] - + k[1144]*y_cur[IDX_eM] - k[2555]*y_cur[IDX_H2OI] - + k[3590]*y_cur[IDX_NH3I] - k[6755]*y_cur[IDX_GRAINM] - + k[6756]*y_cur[IDX_GRAINM] - k[6757]*y_cur[IDX_GRAINM]; + data[jistart + 1309] = 0.0 + k[2471]*y_cur[IDX_H2I]; + data[jistart + 1310] = 0.0 + k[2518]*y_cur[IDX_H2OII] + k[2741]*y_cur[IDX_H3II]; + data[jistart + 1311] = 0.0 + k[2518]*y_cur[IDX_SO2I]; + data[jistart + 1312] = 0.0 - k[3590]*y_cur[IDX_HSO2II]; + data[jistart + 1313] = 0.0 - k[2555]*y_cur[IDX_HSO2II]; + data[jistart + 1314] = 0.0 + k[2741]*y_cur[IDX_SO2I]; + data[jistart + 1315] = 0.0 - k[6755]*y_cur[IDX_HSO2II] - k[6756]*y_cur[IDX_HSO2II] - + k[6757]*y_cur[IDX_HSO2II]; + data[jistart + 1316] = 0.0 + k[2471]*y_cur[IDX_SO2II]; + data[jistart + 1317] = 0.0 - k[1142]*y_cur[IDX_HSO2II] - k[1143]*y_cur[IDX_HSO2II] - + k[1144]*y_cur[IDX_HSO2II]; + data[jistart + 1318] = 0.0 + k[7144] + k[7326] + k[7508]; + data[jistart + 1319] = 0.0 + k[1162]*y_cur[IDX_eM] + k[6527]*y_cur[IDX_GRAINM]; + data[jistart + 1320] = 0.0 - k[2722]*y_cur[IDX_H3II] - k[2980]*y_cur[IDX_HCOII] - + k[3282]*y_cur[IDX_HeII] - k[5884] - k[6220] - k[6962]; + data[jistart + 1321] = 0.0 + k[5303]*y_cur[IDX_CNI]; + data[jistart + 1322] = 0.0 + k[5303]*y_cur[IDX_NH3I]; + data[jistart + 1323] = 0.0 - k[3282]*y_cur[IDX_NH2CNI]; + data[jistart + 1324] = 0.0 - k[2980]*y_cur[IDX_NH2CNI]; + data[jistart + 1325] = 0.0 - k[2722]*y_cur[IDX_NH2CNI]; + data[jistart + 1326] = 0.0 + k[6527]*y_cur[IDX_NH2CNHII]; + data[jistart + 1327] = 0.0 + k[1162]*y_cur[IDX_NH2CNHII]; + data[jistart + 1328] = 0.0 + k[2430]*y_cur[IDX_H2I]; + data[jistart + 1329] = 0.0 - k[927]*y_cur[IDX_eM] - k[928]*y_cur[IDX_eM] - + k[1895]*y_cur[IDX_CI] - k[6765]*y_cur[IDX_GRAINM] - + k[6766]*y_cur[IDX_GRAINM]; + data[jistart + 1330] = 0.0 + k[3408]*y_cur[IDX_NI]; + data[jistart + 1331] = 0.0 + k[2642]*y_cur[IDX_H3II] + k[2943]*y_cur[IDX_HCOII]; + data[jistart + 1332] = 0.0 + k[5537]*y_cur[IDX_CH3II]; + data[jistart + 1333] = 0.0 + k[5537]*y_cur[IDX_HC3NI]; + data[jistart + 1334] = 0.0 + k[3408]*y_cur[IDX_C4H5II]; + data[jistart + 1335] = 0.0 - k[1895]*y_cur[IDX_CH3C3NHII]; + data[jistart + 1336] = 0.0 + k[2943]*y_cur[IDX_CH3C3NI]; + data[jistart + 1337] = 0.0 + k[2642]*y_cur[IDX_CH3C3NI]; + data[jistart + 1338] = 0.0 - k[6765]*y_cur[IDX_CH3C3NHII] - k[6766]*y_cur[IDX_CH3C3NHII]; + data[jistart + 1339] = 0.0 + k[2430]*y_cur[IDX_CH3C3NII]; + data[jistart + 1340] = 0.0 - k[927]*y_cur[IDX_CH3C3NHII] - k[928]*y_cur[IDX_CH3C3NHII]; + data[jistart + 1341] = 0.0 - k[957]*y_cur[IDX_eM] - k[958]*y_cur[IDX_eM] - + k[959]*y_cur[IDX_eM] - k[6603]*y_cur[IDX_GRAINM] - + k[6604]*y_cur[IDX_GRAINM] - k[6605]*y_cur[IDX_GRAINM]; + data[jistart + 1342] = 0.0 + k[2666]*y_cur[IDX_H3II] + k[2794]*y_cur[IDX_H3OII] + + k[2953]*y_cur[IDX_HCOII]; + data[jistart + 1343] = 0.0 + k[2125]*y_cur[IDX_CH3OHI]; + data[jistart + 1344] = 0.0 + k[2125]*y_cur[IDX_CH3OH2II] + k[5534]*y_cur[IDX_CH3II]; + data[jistart + 1345] = 0.0 + k[5534]*y_cur[IDX_CH3OHI]; + data[jistart + 1346] = 0.0 + k[2794]*y_cur[IDX_CH3OCH3I]; + data[jistart + 1347] = 0.0 + k[2953]*y_cur[IDX_CH3OCH3I]; + data[jistart + 1348] = 0.0 + k[2666]*y_cur[IDX_CH3OCH3I]; + data[jistart + 1349] = 0.0 - k[6603]*y_cur[IDX_CH3OCH4II] - k[6604]*y_cur[IDX_CH3OCH4II] - + k[6605]*y_cur[IDX_CH3OCH4II]; + data[jistart + 1350] = 0.0 - k[957]*y_cur[IDX_CH3OCH4II] - k[958]*y_cur[IDX_CH3OCH4II] - + k[959]*y_cur[IDX_CH3OCH4II]; + data[jistart + 1351] = 0.0 + k[7740] + k[8051]; + data[jistart + 1352] = 0.0 + k[7885]; + data[jistart + 1353] = 0.0 + k[7687] + k[7688] + k[7977] + k[7978]; + data[jistart + 1354] = 0.0 + k[7680] + k[7967]; + data[jistart + 1355] = 0.0 - k[7099] - k[7281] - k[7463] - k[7667] - k[7668] - k[7669] - + k[7670] - k[7671] - k[7672] - k[7673] - k[7674] - k[7954] - k[7955] + - k[7956] - k[7957] - k[7958] - k[7959] - k[7960] - k[7961] - + k[8289]*y_cur[IDX_GHI] - k[8590]*y_cur[IDX_GHI]; + data[jistart + 1356] = 0.0 + k[8288]*y_cur[IDX_GHI]; + data[jistart + 1357] = 0.0 + k[8531]*y_cur[IDX_GCH2I] + k[8531]*y_cur[IDX_GCH2I]; + data[jistart + 1358] = 0.0 + k[8484]*y_cur[IDX_GCHI]; + data[jistart + 1359] = 0.0 + k[8484]*y_cur[IDX_GCH3I]; + data[jistart + 1360] = 0.0 + k[6917]; + data[jistart + 1361] = 0.0 + k[8288]*y_cur[IDX_GC2H3I] - k[8289]*y_cur[IDX_GC2H4I] - + k[8590]*y_cur[IDX_GC2H4I]; + data[jistart + 1362] = 0.0 + k[8226]; + data[jistart + 1363] = 0.0 + k[8259] + k[8263]; + data[jistart + 1364] = 0.0 + k[7875] + k[8233] + k[8235]; + data[jistart + 1365] = 0.0 + k[8242]; + data[jistart + 1366] = 0.0 - k[7242] - k[7424] - k[7606] - k[7871] - k[8219] - k[8220] - + k[8221] - k[8360]*y_cur[IDX_GHI] - k[8390]*y_cur[IDX_GH2I] - + k[8431]*y_cur[IDX_GCI] - k[8471]*y_cur[IDX_GNI] - + k[8646]*y_cur[IDX_GHI] - k[8682]*y_cur[IDX_GCI] - + k[8711]*y_cur[IDX_GNI]; + data[jistart + 1367] = 0.0 + k[7872] + k[8222] + k[8224]; + data[jistart + 1368] = 0.0 + k[8429]*y_cur[IDX_GCI]; + data[jistart + 1369] = 0.0 - k[8471]*y_cur[IDX_GC9I] - k[8711]*y_cur[IDX_GC9I]; + data[jistart + 1370] = 0.0 - k[8390]*y_cur[IDX_GC9I]; + data[jistart + 1371] = 0.0 + k[7060]; + data[jistart + 1372] = 0.0 + k[8429]*y_cur[IDX_GC8I] - k[8431]*y_cur[IDX_GC9I] - + k[8682]*y_cur[IDX_GC9I]; + data[jistart + 1373] = 0.0 - k[8360]*y_cur[IDX_GC9I] - k[8646]*y_cur[IDX_GC9I]; + data[jistart + 1374] = 0.0 + k[7873] + k[8225] + k[8227]; + data[jistart + 1375] = 0.0 + k[8430]*y_cur[IDX_GCI]; + data[jistart + 1376] = 0.0 + k[8360]*y_cur[IDX_GHI] + k[8390]*y_cur[IDX_GH2I]; + data[jistart + 1377] = 0.0 - k[7243] - k[7425] - k[7607] - k[7872] - k[8222] - k[8223] - + k[8224] - k[8361]*y_cur[IDX_GHI] - k[8391]*y_cur[IDX_GH2I] - + k[8432]*y_cur[IDX_GCI] - k[8472]*y_cur[IDX_GNI] - + k[8503]*y_cur[IDX_GCHI] - k[8647]*y_cur[IDX_GHI] - + k[8683]*y_cur[IDX_GCI] - k[8712]*y_cur[IDX_GNI] - + k[8736]*y_cur[IDX_GCHI]; + data[jistart + 1378] = 0.0 + k[8501]*y_cur[IDX_GCHI]; + data[jistart + 1379] = 0.0 - k[8472]*y_cur[IDX_GC9HI] - k[8712]*y_cur[IDX_GC9HI]; + data[jistart + 1380] = 0.0 + k[8501]*y_cur[IDX_GC8I] - k[8503]*y_cur[IDX_GC9HI] - + k[8736]*y_cur[IDX_GC9HI]; + data[jistart + 1381] = 0.0 + k[8390]*y_cur[IDX_GC9I] - k[8391]*y_cur[IDX_GC9HI]; + data[jistart + 1382] = 0.0 + k[7061]; + data[jistart + 1383] = 0.0 + k[8430]*y_cur[IDX_GC8HI] - k[8432]*y_cur[IDX_GC9HI] - + k[8683]*y_cur[IDX_GC9HI]; + data[jistart + 1384] = 0.0 + k[8360]*y_cur[IDX_GC9I] - k[8361]*y_cur[IDX_GC9HI] - + k[8647]*y_cur[IDX_GC9HI]; + data[jistart + 1385] = 0.0 + k[7860] + k[8192]; + data[jistart + 1386] = 0.0 + k[7848] + k[8177]; + data[jistart + 1387] = 0.0 + k[7815]; + data[jistart + 1388] = 0.0 + k[7777] + k[8098]; + data[jistart + 1389] = 0.0 + k[7767] + k[8085] + k[8087]; + data[jistart + 1390] = 0.0 + k[7829] + k[8153]; + data[jistart + 1391] = 0.0 - k[7157] - k[7339] - k[7521] - k[7757] - k[7758] - k[8075] - + k[8076] - k[8330]*y_cur[IDX_GHI] - k[8452]*y_cur[IDX_GOI] - + k[8625]*y_cur[IDX_GHI] - k[8696]*y_cur[IDX_GOI]; + data[jistart + 1392] = 0.0 + k[8414]*y_cur[IDX_GCI]; + data[jistart + 1393] = 0.0 + k[8415]*y_cur[IDX_GCI]; + data[jistart + 1394] = 0.0 - k[8452]*y_cur[IDX_GCSI] - k[8696]*y_cur[IDX_GCSI]; + data[jistart + 1395] = 0.0 + k[6975]; + data[jistart + 1396] = 0.0 + k[8414]*y_cur[IDX_GHSI] + k[8415]*y_cur[IDX_GSI]; + data[jistart + 1397] = 0.0 - k[8330]*y_cur[IDX_GCSI] - k[8625]*y_cur[IDX_GCSI]; + data[jistart + 1398] = 0.0 + k[2421]*y_cur[IDX_H2I]; + data[jistart + 1399] = 0.0 - k[1084]*y_cur[IDX_eM] - k[1085]*y_cur[IDX_eM] - + k[2448]*y_cur[IDX_H2I] - k[6843]*y_cur[IDX_GRAINM] - + k[6844]*y_cur[IDX_GRAINM]; + data[jistart + 1400] = 0.0 + k[386]*y_cur[IDX_HII] + k[6178]; + data[jistart + 1401] = 0.0 + k[2624]*y_cur[IDX_H3II] + k[2929]*y_cur[IDX_HCOII]; + data[jistart + 1402] = 0.0 + k[3432]*y_cur[IDX_NI]; + data[jistart + 1403] = 0.0 + k[3432]*y_cur[IDX_C7H2II]; + data[jistart + 1404] = 0.0 + k[386]*y_cur[IDX_HC7NI]; + data[jistart + 1405] = 0.0 + k[2929]*y_cur[IDX_C7NI]; + data[jistart + 1406] = 0.0 + k[2624]*y_cur[IDX_C7NI]; + data[jistart + 1407] = 0.0 - k[6843]*y_cur[IDX_HC7NII] - k[6844]*y_cur[IDX_HC7NII]; + data[jistart + 1408] = 0.0 + k[2421]*y_cur[IDX_C7NII] - k[2448]*y_cur[IDX_HC7NII]; + data[jistart + 1409] = 0.0 - k[1084]*y_cur[IDX_HC7NII] - k[1085]*y_cur[IDX_HC7NII]; + data[jistart + 1410] = 0.0 + k[2426]*y_cur[IDX_H2I]; + data[jistart + 1411] = 0.0 - k[1086]*y_cur[IDX_eM] - k[1087]*y_cur[IDX_eM] - + k[2449]*y_cur[IDX_H2I] - k[6876]*y_cur[IDX_GRAINM] - + k[6877]*y_cur[IDX_GRAINM]; + data[jistart + 1412] = 0.0 + k[387]*y_cur[IDX_HII] + k[6180]; + data[jistart + 1413] = 0.0 + k[2631]*y_cur[IDX_H3II] + k[2936]*y_cur[IDX_HCOII]; + data[jistart + 1414] = 0.0 + k[3449]*y_cur[IDX_NI]; + data[jistart + 1415] = 0.0 + k[3449]*y_cur[IDX_C9H2II]; + data[jistart + 1416] = 0.0 + k[387]*y_cur[IDX_HC9NI]; + data[jistart + 1417] = 0.0 + k[2936]*y_cur[IDX_C9NI]; + data[jistart + 1418] = 0.0 + k[2631]*y_cur[IDX_C9NI]; + data[jistart + 1419] = 0.0 - k[6876]*y_cur[IDX_HC9NII] - k[6877]*y_cur[IDX_HC9NII]; + data[jistart + 1420] = 0.0 + k[2426]*y_cur[IDX_C9NII] - k[2449]*y_cur[IDX_HC9NII]; + data[jistart + 1421] = 0.0 - k[1086]*y_cur[IDX_HC9NII] - k[1087]*y_cur[IDX_HC9NII]; + data[jistart + 1422] = 0.0 - k[1116]*y_cur[IDX_eM] - k[1117]*y_cur[IDX_eM] - + k[3047]*y_cur[IDX_H2I] - k[3048]*y_cur[IDX_H2I] - + k[6522]*y_cur[IDX_GRAINM] - k[6523]*y_cur[IDX_GRAINM]; + data[jistart + 1423] = 0.0 + k[3765]*y_cur[IDX_H2I]; + data[jistart + 1424] = 0.0 + k[521]*y_cur[IDX_HeII]; + data[jistart + 1425] = 0.0 + k[3767]*y_cur[IDX_H3II]; + data[jistart + 1426] = 0.0 + k[2538]*y_cur[IDX_H2OI]; + data[jistart + 1427] = 0.0 + k[521]*y_cur[IDX_HNCOI]; + data[jistart + 1428] = 0.0 + k[2538]*y_cur[IDX_CNII]; + data[jistart + 1429] = 0.0 + k[3767]*y_cur[IDX_OCNI]; + data[jistart + 1430] = 0.0 - k[6522]*y_cur[IDX_HNCOII] - k[6523]*y_cur[IDX_HNCOII]; + data[jistart + 1431] = 0.0 - k[3047]*y_cur[IDX_HNCOII] - k[3048]*y_cur[IDX_HNCOII] + + k[3765]*y_cur[IDX_OCNII]; + data[jistart + 1432] = 0.0 - k[1116]*y_cur[IDX_HNCOII] - k[1117]*y_cur[IDX_HNCOII]; + data[jistart + 1433] = 0.0 - k[1169]*y_cur[IDX_eM] - k[2465]*y_cur[IDX_H2I] - + k[2846]*y_cur[IDX_HI] - k[6584]*y_cur[IDX_GRAINM]; + data[jistart + 1434] = 0.0 + k[676]*y_cur[IDX_O2II] + k[6226]; + data[jistart + 1435] = 0.0 + k[3466]*y_cur[IDX_NI]; + data[jistart + 1436] = 0.0 + k[3740]*y_cur[IDX_OI]; + data[jistart + 1437] = 0.0 + k[676]*y_cur[IDX_NO2I] + k[3621]*y_cur[IDX_NHI]; + data[jistart + 1438] = 0.0 + k[3621]*y_cur[IDX_O2II]; + data[jistart + 1439] = 0.0 + k[3466]*y_cur[IDX_O2HII]; + data[jistart + 1440] = 0.0 + k[3740]*y_cur[IDX_HNOII]; + data[jistart + 1441] = 0.0 - k[6584]*y_cur[IDX_NO2II]; + data[jistart + 1442] = 0.0 - k[2465]*y_cur[IDX_NO2II]; + data[jistart + 1443] = 0.0 - k[1169]*y_cur[IDX_NO2II]; + data[jistart + 1444] = 0.0 - k[2846]*y_cur[IDX_NO2II]; + data[jistart + 1445] = 0.0 - k[1190]*y_cur[IDX_eM] - k[1191]*y_cur[IDX_eM] - + k[1192]*y_cur[IDX_eM] - k[6772]*y_cur[IDX_GRAINM] - + k[6773]*y_cur[IDX_GRAINM] - k[6774]*y_cur[IDX_GRAINM]; + data[jistart + 1446] = 0.0 + k[2606]*y_cur[IDX_H3II] + k[2776]*y_cur[IDX_H3OII] + + k[2911]*y_cur[IDX_HCOII]; + data[jistart + 1447] = 0.0 + k[3814]*y_cur[IDX_C3H2II]; + data[jistart + 1448] = 0.0 + k[3814]*y_cur[IDX_PI]; + data[jistart + 1449] = 0.0 + k[2776]*y_cur[IDX_C3PI]; + data[jistart + 1450] = 0.0 + k[2911]*y_cur[IDX_C3PI]; + data[jistart + 1451] = 0.0 + k[2606]*y_cur[IDX_C3PI]; + data[jistart + 1452] = 0.0 - k[6772]*y_cur[IDX_PC3HII] - k[6773]*y_cur[IDX_PC3HII] - + k[6774]*y_cur[IDX_PC3HII]; + data[jistart + 1453] = 0.0 - k[1190]*y_cur[IDX_PC3HII] - k[1191]*y_cur[IDX_PC3HII] - + k[1192]*y_cur[IDX_PC3HII]; + data[jistart + 1454] = 0.0 - k[1202]*y_cur[IDX_eM] - k[1203]*y_cur[IDX_eM] - + k[1204]*y_cur[IDX_eM] - k[6596]*y_cur[IDX_GRAINM] - + k[6597]*y_cur[IDX_GRAINM] - k[6598]*y_cur[IDX_GRAINM]; + data[jistart + 1455] = 0.0 + k[2640]*y_cur[IDX_H3II] + k[2788]*y_cur[IDX_H3OII] + + k[2942]*y_cur[IDX_HCOII]; + data[jistart + 1456] = 0.0 + k[2130]*y_cur[IDX_CH3OHI] + k[2214]*y_cur[IDX_CH4I]; + data[jistart + 1457] = 0.0 + k[2213]*y_cur[IDX_CH4I]; + data[jistart + 1458] = 0.0 + k[2130]*y_cur[IDX_PH2II]; + data[jistart + 1459] = 0.0 + k[2213]*y_cur[IDX_PHII] + k[2214]*y_cur[IDX_PH2II]; + data[jistart + 1460] = 0.0 + k[2788]*y_cur[IDX_CH2PHI]; + data[jistart + 1461] = 0.0 + k[2942]*y_cur[IDX_CH2PHI]; + data[jistart + 1462] = 0.0 + k[2640]*y_cur[IDX_CH2PHI]; + data[jistart + 1463] = 0.0 - k[6596]*y_cur[IDX_PCH4II] - k[6597]*y_cur[IDX_PCH4II] - + k[6598]*y_cur[IDX_PCH4II]; + data[jistart + 1464] = 0.0 - k[1202]*y_cur[IDX_PCH4II] - k[1203]*y_cur[IDX_PCH4II] - + k[1204]*y_cur[IDX_PCH4II]; + data[jistart + 1465] = 0.0 - k[1256]*y_cur[IDX_eM] - k[1257]*y_cur[IDX_eM] - + k[1928]*y_cur[IDX_CI] - k[2291]*y_cur[IDX_COI] - + k[2474]*y_cur[IDX_H2I] - k[2572]*y_cur[IDX_H2OI] - + k[6426]*y_cur[IDX_GRAINM] - k[6427]*y_cur[IDX_GRAINM]; + data[jistart + 1466] = 0.0 + k[2754]*y_cur[IDX_H3II]; + data[jistart + 1467] = 0.0 + k[430]*y_cur[IDX_HII]; + data[jistart + 1468] = 0.0 - k[2572]*y_cur[IDX_SiH4II]; + data[jistart + 1469] = 0.0 + k[430]*y_cur[IDX_SiH4I]; + data[jistart + 1470] = 0.0 - k[1928]*y_cur[IDX_SiH4II]; + data[jistart + 1471] = 0.0 + k[2754]*y_cur[IDX_SiH3I]; + data[jistart + 1472] = 0.0 - k[2291]*y_cur[IDX_SiH4II]; + data[jistart + 1473] = 0.0 - k[6426]*y_cur[IDX_SiH4II] - k[6427]*y_cur[IDX_SiH4II]; + data[jistart + 1474] = 0.0 - k[2474]*y_cur[IDX_SiH4II]; + data[jistart + 1475] = 0.0 - k[1256]*y_cur[IDX_SiH4II] - k[1257]*y_cur[IDX_SiH4II]; + data[jistart + 1476] = 0.0 + k[7207] + k[7389] + k[7573]; + data[jistart + 1477] = 0.0 + k[1145]*y_cur[IDX_eM] + k[6723]*y_cur[IDX_GRAINM]; + data[jistart + 1478] = 0.0 - k[2759]*y_cur[IDX_H3II] - k[3004]*y_cur[IDX_HCOII] - + k[3331]*y_cur[IDX_HeII] - k[5933] - k[6285] - k[7025]; + data[jistart + 1479] = 0.0 + k[5483]*y_cur[IDX_OHI]; + data[jistart + 1480] = 0.0 + k[5483]*y_cur[IDX_SiOI]; + data[jistart + 1481] = 0.0 - k[3331]*y_cur[IDX_SiO2I]; + data[jistart + 1482] = 0.0 - k[3004]*y_cur[IDX_SiO2I]; + data[jistart + 1483] = 0.0 - k[2759]*y_cur[IDX_SiO2I]; + data[jistart + 1484] = 0.0 + k[6723]*y_cur[IDX_HSiO2II]; + data[jistart + 1485] = 0.0 + k[1145]*y_cur[IDX_HSiO2II]; + data[jistart + 1486] = 0.0 + k[8635]*y_cur[IDX_GHI]; + data[jistart + 1487] = 0.0 + k[7195] + k[7377] + k[7561]; + data[jistart + 1488] = 0.0 + k[770]*y_cur[IDX_eM] + k[1723]*y_cur[IDX_CH3COCH3I] + + k[6672]*y_cur[IDX_GRAINM]; + data[jistart + 1489] = 0.0 - k[2136]*y_cur[IDX_CH4II] - k[4886]*y_cur[IDX_OHI] - + k[4887]*y_cur[IDX_OHI] - k[5704] - k[5705] - k[5989] - k[5990] - + k[7013]; + data[jistart + 1490] = 0.0 + k[1723]*y_cur[IDX_C2H5CNHII]; + data[jistart + 1491] = 0.0 - k[2136]*y_cur[IDX_C2H5CNI]; + data[jistart + 1492] = 0.0 - k[4886]*y_cur[IDX_C2H5CNI] - k[4887]*y_cur[IDX_C2H5CNI]; + data[jistart + 1493] = 0.0 + k[8635]*y_cur[IDX_GC2H4CNI]; + data[jistart + 1494] = 0.0 + k[6672]*y_cur[IDX_C2H5CNHII]; + data[jistart + 1495] = 0.0 + k[770]*y_cur[IDX_C2H5CNHII]; + data[jistart + 1496] = 0.0 - k[774]*y_cur[IDX_eM] - k[775]*y_cur[IDX_eM] - + k[776]*y_cur[IDX_eM] - k[777]*y_cur[IDX_eM] - + k[2491]*y_cur[IDX_H2COI] - k[3559]*y_cur[IDX_NH3I] - + k[6606]*y_cur[IDX_GRAINM] - k[6607]*y_cur[IDX_GRAINM] - + k[6608]*y_cur[IDX_GRAINM] - k[6609]*y_cur[IDX_GRAINM]; + data[jistart + 1497] = 0.0 + k[2768]*y_cur[IDX_H3OII] + k[2903]*y_cur[IDX_HCOII] + + k[3013]*y_cur[IDX_HCSII]; + data[jistart + 1498] = 0.0 + k[3013]*y_cur[IDX_C2H5OHI]; + data[jistart + 1499] = 0.0 + k[5568]*y_cur[IDX_H3OII]; + data[jistart + 1500] = 0.0 - k[2491]*y_cur[IDX_C2H5OH2II]; + data[jistart + 1501] = 0.0 - k[3559]*y_cur[IDX_C2H5OH2II]; + data[jistart + 1502] = 0.0 + k[2768]*y_cur[IDX_C2H5OHI] + k[5568]*y_cur[IDX_C2H4I]; + data[jistart + 1503] = 0.0 + k[2903]*y_cur[IDX_C2H5OHI]; + data[jistart + 1504] = 0.0 - k[6606]*y_cur[IDX_C2H5OH2II] - k[6607]*y_cur[IDX_C2H5OH2II] - + k[6608]*y_cur[IDX_C2H5OH2II] - k[6609]*y_cur[IDX_C2H5OH2II]; + data[jistart + 1505] = 0.0 - k[774]*y_cur[IDX_C2H5OH2II] - k[775]*y_cur[IDX_C2H5OH2II] - + k[776]*y_cur[IDX_C2H5OH2II] - k[777]*y_cur[IDX_C2H5OH2II]; + data[jistart + 1506] = 0.0 - k[778]*y_cur[IDX_eM] - k[779]*y_cur[IDX_eM] - + k[2863]*y_cur[IDX_HCNI] - k[2864]*y_cur[IDX_HCNI] - + k[3560]*y_cur[IDX_NH3I] - k[6419]*y_cur[IDX_GRAINM] - + k[6420]*y_cur[IDX_GRAINM]; + data[jistart + 1507] = 0.0 + k[2222]*y_cur[IDX_CH5II] + k[2949]*y_cur[IDX_HCOII] + + k[3774]*y_cur[IDX_OHII]; + data[jistart + 1508] = 0.0 + k[2222]*y_cur[IDX_C2H6I]; + data[jistart + 1509] = 0.0 + k[3774]*y_cur[IDX_C2H6I]; + data[jistart + 1510] = 0.0 - k[2863]*y_cur[IDX_C2H7II] - k[2864]*y_cur[IDX_C2H7II]; + data[jistart + 1511] = 0.0 - k[3560]*y_cur[IDX_C2H7II]; + data[jistart + 1512] = 0.0 + k[2949]*y_cur[IDX_C2H6I]; + data[jistart + 1513] = 0.0 - k[6419]*y_cur[IDX_C2H7II] - k[6420]*y_cur[IDX_C2H7II]; + data[jistart + 1514] = 0.0 - k[778]*y_cur[IDX_C2H7II] - k[779]*y_cur[IDX_C2H7II]; + data[jistart + 1515] = 0.0 - k[902]*y_cur[IDX_eM] - k[903]*y_cur[IDX_eM] - + k[6662]*y_cur[IDX_GRAINM] - k[6663]*y_cur[IDX_GRAINM]; + data[jistart + 1516] = 0.0 + k[1906]*y_cur[IDX_CI]; + data[jistart + 1517] = 0.0 + k[3113]*y_cur[IDX_HeII]; + data[jistart + 1518] = 0.0 + k[1409]*y_cur[IDX_CII]; + data[jistart + 1519] = 0.0 + k[1396]*y_cur[IDX_CII]; + data[jistart + 1520] = 0.0 + k[158]*y_cur[IDX_CII] + k[358]*y_cur[IDX_HII]; + data[jistart + 1521] = 0.0 + k[3113]*y_cur[IDX_C4PI]; + data[jistart + 1522] = 0.0 + k[158]*y_cur[IDX_CCPI] + k[1396]*y_cur[IDX_HC2PI] + + k[1409]*y_cur[IDX_HCPI]; + data[jistart + 1523] = 0.0 + k[358]*y_cur[IDX_CCPI]; + data[jistart + 1524] = 0.0 + k[1906]*y_cur[IDX_HCPII]; + data[jistart + 1525] = 0.0 - k[6662]*y_cur[IDX_CCPII] - k[6663]*y_cur[IDX_CCPII]; + data[jistart + 1526] = 0.0 - k[902]*y_cur[IDX_CCPII] - k[903]*y_cur[IDX_CCPII]; + data[jistart + 1527] = 0.0 + k[2429]*y_cur[IDX_H2I]; + data[jistart + 1528] = 0.0 + k[5704] + k[5989]; + data[jistart + 1529] = 0.0 - k[913]*y_cur[IDX_eM] - k[914]*y_cur[IDX_eM] - + k[915]*y_cur[IDX_eM] - k[3567]*y_cur[IDX_NH3I] - + k[6657]*y_cur[IDX_GRAINM] - k[6658]*y_cur[IDX_GRAINM] - + k[6659]*y_cur[IDX_GRAINM]; + data[jistart + 1530] = 0.0 + k[2637]*y_cur[IDX_H3II] + k[2886]*y_cur[IDX_HCNHII] + + k[2887]*y_cur[IDX_HCNHII] + k[2939]*y_cur[IDX_HCOII]; + data[jistart + 1531] = 0.0 + k[2886]*y_cur[IDX_CH2CHCNI] + k[2887]*y_cur[IDX_CH2CHCNI]; + data[jistart + 1532] = 0.0 - k[3567]*y_cur[IDX_CH2CHCNHII]; + data[jistart + 1533] = 0.0 + k[2939]*y_cur[IDX_CH2CHCNI]; + data[jistart + 1534] = 0.0 + k[2637]*y_cur[IDX_CH2CHCNI]; + data[jistart + 1535] = 0.0 - k[6657]*y_cur[IDX_CH2CHCNHII] - k[6658]*y_cur[IDX_CH2CHCNHII] + - k[6659]*y_cur[IDX_CH2CHCNHII]; + data[jistart + 1536] = 0.0 + k[2429]*y_cur[IDX_CH2CHCNII]; + data[jistart + 1537] = 0.0 - k[913]*y_cur[IDX_CH2CHCNHII] - k[914]*y_cur[IDX_CH2CHCNHII] - + k[915]*y_cur[IDX_CH2CHCNHII]; + data[jistart + 1538] = 0.0 + k[7201] + k[7383] + k[7558]; + data[jistart + 1539] = 0.0 - k[5649]*y_cur[IDX_CII] - k[5650]*y_cur[IDX_H3II] - + k[5651]*y_cur[IDX_H3OII] - k[5652]*y_cur[IDX_HCOII] - + k[5653]*y_cur[IDX_HeII] - k[5654]*y_cur[IDX_HeII] - k[5943] - + k[6293] - k[7019]; + data[jistart + 1540] = 0.0 + k[8760]*y_cur[IDX_GCOI]; + data[jistart + 1541] = 0.0 + k[8760]*y_cur[IDX_GCH3OI]; + data[jistart + 1542] = 0.0 - k[5651]*y_cur[IDX_COOCH3I]; + data[jistart + 1543] = 0.0 - k[5653]*y_cur[IDX_COOCH3I] - k[5654]*y_cur[IDX_COOCH3I]; + data[jistart + 1544] = 0.0 - k[5649]*y_cur[IDX_COOCH3I]; + data[jistart + 1545] = 0.0 - k[5652]*y_cur[IDX_COOCH3I]; + data[jistart + 1546] = 0.0 - k[5650]*y_cur[IDX_COOCH3I]; + data[jistart + 1547] = 0.0 + k[7085] + k[7267] + k[7449]; + data[jistart + 1548] = 0.0 + k[905]*y_cur[IDX_eM] + k[6423]*y_cur[IDX_GRAINM]; + data[jistart + 1549] = 0.0 + k[1112]*y_cur[IDX_eM] + k[6348]*y_cur[IDX_GRAINM]; + data[jistart + 1550] = 0.0 + k[1249]*y_cur[IDX_eM] + k[6592]*y_cur[IDX_GRAINM]; + data[jistart + 1551] = 0.0 + k[1004]*y_cur[IDX_eM] + k[6349]*y_cur[IDX_GRAINM]; + data[jistart + 1552] = 0.0 + k[457]*y_cur[IDX_H2I] + k[6347]*y_cur[IDX_GRAINM]; + data[jistart + 1553] = 0.0 - k[5139]*y_cur[IDX_H2I] - k[5151]*y_cur[IDX_H2OI] - + k[5464]*y_cur[IDX_OHI] - k[6903]; + data[jistart + 1554] = 0.0 + k[5865] + k[6196]; + data[jistart + 1555] = 0.0 - k[5464]*y_cur[IDX_FI]; + data[jistart + 1556] = 0.0 - k[5151]*y_cur[IDX_FI]; + data[jistart + 1557] = 0.0 + k[6347]*y_cur[IDX_FII] + k[6348]*y_cur[IDX_HFII] + + k[6349]*y_cur[IDX_H2FII] + k[6423]*y_cur[IDX_CFII] + + k[6592]*y_cur[IDX_SiFII]; + data[jistart + 1558] = 0.0 + k[457]*y_cur[IDX_FII] - k[5139]*y_cur[IDX_FI]; + data[jistart + 1559] = 0.0 + k[905]*y_cur[IDX_CFII] + k[1004]*y_cur[IDX_H2FII] + + k[1112]*y_cur[IDX_HFII] + k[1249]*y_cur[IDX_SiFII]; + data[jistart + 1560] = 0.0 + k[7846] + k[7846] + k[8175] + k[8175]; + data[jistart + 1561] = 0.0 + k[7710] + k[8013] + k[8015] + k[8313]*y_cur[IDX_GHI]; + data[jistart + 1562] = 0.0 + k[7845] + k[8172] + k[8173]; + data[jistart + 1563] = 0.0 + k[8349]*y_cur[IDX_GHI]; + data[jistart + 1564] = 0.0 + k[8348]*y_cur[IDX_GHI]; + data[jistart + 1565] = 0.0 - k[7120] - k[7302] - k[7484] - k[7707] - k[8011] - + k[8312]*y_cur[IDX_GHI] - k[8414]*y_cur[IDX_GCI] - + k[8449]*y_cur[IDX_GOI] - k[8463]*y_cur[IDX_GNI] - + k[8608]*y_cur[IDX_GHI]; + data[jistart + 1566] = 0.0 + k[8311]*y_cur[IDX_GHI]; + data[jistart + 1567] = 0.0 - k[8463]*y_cur[IDX_GHSI]; + data[jistart + 1568] = 0.0 - k[8449]*y_cur[IDX_GHSI]; + data[jistart + 1569] = 0.0 + k[6938]; + data[jistart + 1570] = 0.0 - k[8414]*y_cur[IDX_GHSI]; + data[jistart + 1571] = 0.0 + k[8311]*y_cur[IDX_GSI] - k[8312]*y_cur[IDX_GHSI] + + k[8313]*y_cur[IDX_GH2SI] + k[8348]*y_cur[IDX_GOCSI] + + k[8349]*y_cur[IDX_GSO2I] - k[8608]*y_cur[IDX_GHSI]; + data[jistart + 1572] = 0.0 - k[1017]*y_cur[IDX_eM] - k[1018]*y_cur[IDX_eM] - + k[6622]*y_cur[IDX_GRAINM] - k[6623]*y_cur[IDX_GRAINM]; + data[jistart + 1573] = 0.0 + k[2714]*y_cur[IDX_H3II] + k[2812]*y_cur[IDX_H3OII] + + k[2975]*y_cur[IDX_HCOII]; + data[jistart + 1574] = 0.0 + k[2129]*y_cur[IDX_CH3OHI] + k[2567]*y_cur[IDX_H2OI]; + data[jistart + 1575] = 0.0 + k[2564]*y_cur[IDX_H2OI] + k[3816]*y_cur[IDX_CH3OHI]; + data[jistart + 1576] = 0.0 + k[2129]*y_cur[IDX_PH2II] + k[3816]*y_cur[IDX_PHII]; + data[jistart + 1577] = 0.0 + k[2812]*y_cur[IDX_HPOI]; + data[jistart + 1578] = 0.0 + k[2564]*y_cur[IDX_PHII] + k[2567]*y_cur[IDX_PH2II]; + data[jistart + 1579] = 0.0 + k[2975]*y_cur[IDX_HPOI]; + data[jistart + 1580] = 0.0 + k[2714]*y_cur[IDX_HPOI]; + data[jistart + 1581] = 0.0 - k[6622]*y_cur[IDX_H2POII] - k[6623]*y_cur[IDX_H2POII]; + data[jistart + 1582] = 0.0 - k[1017]*y_cur[IDX_H2POII] - k[1018]*y_cur[IDX_H2POII]; + data[jistart + 1583] = 0.0 + k[5650]*y_cur[IDX_H3II] + k[5651]*y_cur[IDX_H3OII] + + k[5652]*y_cur[IDX_HCOII]; + data[jistart + 1584] = 0.0 - k[982]*y_cur[IDX_eM] - k[983]*y_cur[IDX_eM] - + k[6699]*y_cur[IDX_GRAINM] - k[6700]*y_cur[IDX_GRAINM]; + data[jistart + 1585] = 0.0 + k[179]*y_cur[IDX_CII] + k[390]*y_cur[IDX_HII] + k[5859]; + data[jistart + 1586] = 0.0 + k[5651]*y_cur[IDX_COOCH3I]; + data[jistart + 1587] = 0.0 + k[179]*y_cur[IDX_HCOOCH3I]; + data[jistart + 1588] = 0.0 + k[390]*y_cur[IDX_HCOOCH3I]; + data[jistart + 1589] = 0.0 + k[5652]*y_cur[IDX_COOCH3I]; + data[jistart + 1590] = 0.0 + k[5650]*y_cur[IDX_COOCH3I]; + data[jistart + 1591] = 0.0 - k[6699]*y_cur[IDX_HCOOCH3II] - k[6700]*y_cur[IDX_HCOOCH3II]; + data[jistart + 1592] = 0.0 - k[982]*y_cur[IDX_HCOOCH3II] - k[983]*y_cur[IDX_HCOOCH3II]; + data[jistart + 1593] = 0.0 - k[1113]*y_cur[IDX_eM] - k[1114]*y_cur[IDX_eM] - + k[6558]*y_cur[IDX_GRAINM] - k[6559]*y_cur[IDX_GRAINM]; + data[jistart + 1594] = 0.0 + k[2559]*y_cur[IDX_H2OI] + k[2581]*y_cur[IDX_H2SI]; + data[jistart + 1595] = 0.0 + k[2234]*y_cur[IDX_CH5II] + k[2719]*y_cur[IDX_H3II] + + k[2978]*y_cur[IDX_HCOII]; + data[jistart + 1596] = 0.0 + k[2234]*y_cur[IDX_N2OI]; + data[jistart + 1597] = 0.0 + k[2581]*y_cur[IDX_N2OII]; + data[jistart + 1598] = 0.0 + k[2559]*y_cur[IDX_N2OII]; + data[jistart + 1599] = 0.0 + k[2978]*y_cur[IDX_N2OI]; + data[jistart + 1600] = 0.0 + k[2719]*y_cur[IDX_N2OI]; + data[jistart + 1601] = 0.0 - k[6558]*y_cur[IDX_HN2OII] - k[6559]*y_cur[IDX_HN2OII]; + data[jistart + 1602] = 0.0 - k[1113]*y_cur[IDX_HN2OII] - k[1114]*y_cur[IDX_HN2OII]; + data[jistart + 1603] = 0.0 - k[482]*y_cur[IDX_H2OI] - k[485]*y_cur[IDX_H2SI] - + k[1170]*y_cur[IDX_eM] - k[1171]*y_cur[IDX_eM] - + k[1172]*y_cur[IDX_eM] - k[2559]*y_cur[IDX_H2OI] - + k[2581]*y_cur[IDX_H2SI] - k[6528]*y_cur[IDX_GRAINM] - + k[6529]*y_cur[IDX_GRAINM] - k[6530]*y_cur[IDX_GRAINM]; + data[jistart + 1604] = 0.0 + k[399]*y_cur[IDX_HII] + k[659]*y_cur[IDX_OII] + k[6213]; + data[jistart + 1605] = 0.0 + k[659]*y_cur[IDX_N2OI]; + data[jistart + 1606] = 0.0 - k[485]*y_cur[IDX_N2OII] - k[2581]*y_cur[IDX_N2OII]; + data[jistart + 1607] = 0.0 - k[482]*y_cur[IDX_N2OII] - k[2559]*y_cur[IDX_N2OII]; + data[jistart + 1608] = 0.0 + k[399]*y_cur[IDX_N2OI]; + data[jistart + 1609] = 0.0 - k[6528]*y_cur[IDX_N2OII] - k[6529]*y_cur[IDX_N2OII] - + k[6530]*y_cur[IDX_N2OII]; + data[jistart + 1610] = 0.0 - k[1170]*y_cur[IDX_N2OII] - k[1171]*y_cur[IDX_N2OII] - + k[1172]*y_cur[IDX_N2OII]; + data[jistart + 1611] = 0.0 - k[1181]*y_cur[IDX_eM] - k[1182]*y_cur[IDX_eM] - + k[1183]*y_cur[IDX_eM] - k[6680]*y_cur[IDX_GRAINM] - + k[6681]*y_cur[IDX_GRAINM] - k[6682]*y_cur[IDX_GRAINM]; + data[jistart + 1612] = 0.0 + k[1571]*y_cur[IDX_C2H2I]; + data[jistart + 1613] = 0.0 + k[2688]*y_cur[IDX_H3II] + k[2803]*y_cur[IDX_H3OII] + + k[2963]*y_cur[IDX_HCOII]; + data[jistart + 1614] = 0.0 + k[1570]*y_cur[IDX_C2H2I]; + data[jistart + 1615] = 0.0 + k[1710]*y_cur[IDX_C2H4I]; + data[jistart + 1616] = 0.0 + k[1710]*y_cur[IDX_PII]; + data[jistart + 1617] = 0.0 + k[1570]*y_cur[IDX_PHII] + k[1571]*y_cur[IDX_PH2II]; + data[jistart + 1618] = 0.0 + k[2803]*y_cur[IDX_HC2PI]; + data[jistart + 1619] = 0.0 + k[2963]*y_cur[IDX_HC2PI]; + data[jistart + 1620] = 0.0 + k[2688]*y_cur[IDX_HC2PI]; + data[jistart + 1621] = 0.0 - k[6680]*y_cur[IDX_PC2H2II] - k[6681]*y_cur[IDX_PC2H2II] - + k[6682]*y_cur[IDX_PC2H2II]; + data[jistart + 1622] = 0.0 - k[1181]*y_cur[IDX_PC2H2II] - k[1182]*y_cur[IDX_PC2H2II] - + k[1183]*y_cur[IDX_PC2H2II]; + data[jistart + 1623] = 0.0 - k[1236]*y_cur[IDX_eM] - k[1237]*y_cur[IDX_eM] - + k[1919]*y_cur[IDX_CI] - k[6767]*y_cur[IDX_GRAINM] - + k[6768]*y_cur[IDX_GRAINM]; + data[jistart + 1624] = 0.0 + k[1917]*y_cur[IDX_CI]; + data[jistart + 1625] = 0.0 + k[2748]*y_cur[IDX_H3II] + k[2995]*y_cur[IDX_HCOII]; + data[jistart + 1626] = 0.0 + k[3876]*y_cur[IDX_SiI]; + data[jistart + 1627] = 0.0 + k[3863]*y_cur[IDX_SiII]; + data[jistart + 1628] = 0.0 + k[3880]*y_cur[IDX_SiI]; + data[jistart + 1629] = 0.0 + k[3863]*y_cur[IDX_CH2CCHI]; + data[jistart + 1630] = 0.0 + k[3876]*y_cur[IDX_C3H3II] + k[3880]*y_cur[IDX_CH2CCHII]; + data[jistart + 1631] = 0.0 + k[1917]*y_cur[IDX_SiC2H3II] - k[1919]*y_cur[IDX_SiC3H2II]; + data[jistart + 1632] = 0.0 + k[2995]*y_cur[IDX_SiC3HI]; + data[jistart + 1633] = 0.0 + k[2748]*y_cur[IDX_SiC3HI]; + data[jistart + 1634] = 0.0 - k[6767]*y_cur[IDX_SiC3H2II] - k[6768]*y_cur[IDX_SiC3H2II]; + data[jistart + 1635] = 0.0 - k[1236]*y_cur[IDX_SiC3H2II] - k[1237]*y_cur[IDX_SiC3H2II]; + data[jistart + 1636] = 0.0 - k[1238]*y_cur[IDX_eM] - k[1239]*y_cur[IDX_eM] - + k[6798]*y_cur[IDX_GRAINM] - k[6799]*y_cur[IDX_GRAINM]; + data[jistart + 1637] = 0.0 + k[1433]*y_cur[IDX_CII]; + data[jistart + 1638] = 0.0 + k[424]*y_cur[IDX_HII]; + data[jistart + 1639] = 0.0 + k[1918]*y_cur[IDX_CI]; + data[jistart + 1640] = 0.0 + k[3862]*y_cur[IDX_SiII]; + data[jistart + 1641] = 0.0 + k[3877]*y_cur[IDX_SiI]; + data[jistart + 1642] = 0.0 + k[3862]*y_cur[IDX_C4HI]; + data[jistart + 1643] = 0.0 + k[3877]*y_cur[IDX_C4H2II]; + data[jistart + 1644] = 0.0 + k[1433]*y_cur[IDX_SiC3HI]; + data[jistart + 1645] = 0.0 + k[424]*y_cur[IDX_SiC4I]; + data[jistart + 1646] = 0.0 + k[1918]*y_cur[IDX_SiC3HII]; + data[jistart + 1647] = 0.0 - k[6798]*y_cur[IDX_SiC4II] - k[6799]*y_cur[IDX_SiC4II]; + data[jistart + 1648] = 0.0 - k[1238]*y_cur[IDX_SiC4II] - k[1239]*y_cur[IDX_SiC4II]; + data[jistart + 1649] = 0.0 + k[1919]*y_cur[IDX_CI]; + data[jistart + 1650] = 0.0 - k[1240]*y_cur[IDX_eM] - k[1241]*y_cur[IDX_eM] - + k[6800]*y_cur[IDX_GRAINM] - k[6801]*y_cur[IDX_GRAINM]; + data[jistart + 1651] = 0.0 + k[2749]*y_cur[IDX_H3II] + k[2996]*y_cur[IDX_HCOII]; + data[jistart + 1652] = 0.0 + k[1575]*y_cur[IDX_C2H2I]; + data[jistart + 1653] = 0.0 + k[1576]*y_cur[IDX_C2H2I]; + data[jistart + 1654] = 0.0 + k[3878]*y_cur[IDX_SiI]; + data[jistart + 1655] = 0.0 + k[3878]*y_cur[IDX_C4H2II]; + data[jistart + 1656] = 0.0 + k[1575]*y_cur[IDX_SiC2II] + k[1576]*y_cur[IDX_SiC2HII]; + data[jistart + 1657] = 0.0 + k[1919]*y_cur[IDX_SiC3H2II]; + data[jistart + 1658] = 0.0 + k[2996]*y_cur[IDX_SiC4I]; + data[jistart + 1659] = 0.0 + k[2749]*y_cur[IDX_SiC4I]; + data[jistart + 1660] = 0.0 - k[6800]*y_cur[IDX_SiC4HII] - k[6801]*y_cur[IDX_SiC4HII]; + data[jistart + 1661] = 0.0 - k[1240]*y_cur[IDX_SiC4HII] - k[1241]*y_cur[IDX_SiC4HII]; + data[jistart + 1662] = 0.0 + k[2474]*y_cur[IDX_H2I]; + data[jistart + 1663] = 0.0 - k[1258]*y_cur[IDX_eM] - k[1259]*y_cur[IDX_eM] - + k[1929]*y_cur[IDX_CI] - k[2573]*y_cur[IDX_H2OI] - + k[3760]*y_cur[IDX_OI] - k[6438]*y_cur[IDX_GRAINM] - + k[6439]*y_cur[IDX_GRAINM]; + data[jistart + 1664] = 0.0 + k[5565]*y_cur[IDX_H2I]; + data[jistart + 1665] = 0.0 + k[2755]*y_cur[IDX_H3II] + k[3001]*y_cur[IDX_HCOII]; + data[jistart + 1666] = 0.0 - k[3760]*y_cur[IDX_SiH5II]; + data[jistart + 1667] = 0.0 - k[2573]*y_cur[IDX_SiH5II]; + data[jistart + 1668] = 0.0 - k[1929]*y_cur[IDX_SiH5II]; + data[jistart + 1669] = 0.0 + k[3001]*y_cur[IDX_SiH4I]; + data[jistart + 1670] = 0.0 + k[2755]*y_cur[IDX_SiH4I]; + data[jistart + 1671] = 0.0 - k[6438]*y_cur[IDX_SiH5II] - k[6439]*y_cur[IDX_SiH5II]; + data[jistart + 1672] = 0.0 + k[2474]*y_cur[IDX_SiH4II] + k[5565]*y_cur[IDX_SiH3II]; + data[jistart + 1673] = 0.0 - k[1258]*y_cur[IDX_SiH5II] - k[1259]*y_cur[IDX_SiH5II]; + data[jistart + 1674] = 0.0 - k[1262]*y_cur[IDX_eM] - k[1263]*y_cur[IDX_eM] - + k[3763]*y_cur[IDX_OI] - k[6668]*y_cur[IDX_GRAINM] - + k[6669]*y_cur[IDX_GRAINM]; + data[jistart + 1675] = 0.0 + k[1931]*y_cur[IDX_CI]; + data[jistart + 1676] = 0.0 + k[2758]*y_cur[IDX_H3II] + k[2825]*y_cur[IDX_H3OII] + + k[3003]*y_cur[IDX_HCOII]; + data[jistart + 1677] = 0.0 + k[5580]*y_cur[IDX_HCNI]; + data[jistart + 1678] = 0.0 + k[5580]*y_cur[IDX_SiII]; + data[jistart + 1679] = 0.0 + k[2825]*y_cur[IDX_SiNCI]; + data[jistart + 1680] = 0.0 - k[3763]*y_cur[IDX_SiNCHII]; + data[jistart + 1681] = 0.0 + k[1931]*y_cur[IDX_SiNH2II]; + data[jistart + 1682] = 0.0 + k[3003]*y_cur[IDX_SiNCI]; + data[jistart + 1683] = 0.0 + k[2758]*y_cur[IDX_SiNCI]; + data[jistart + 1684] = 0.0 - k[6668]*y_cur[IDX_SiNCHII] - k[6669]*y_cur[IDX_SiNCHII]; + data[jistart + 1685] = 0.0 - k[1262]*y_cur[IDX_SiNCHII] - k[1263]*y_cur[IDX_SiNCHII]; + data[jistart + 1686] = 0.0 + k[7251] + k[7433] + k[7615]; + data[jistart + 1687] = 0.0 + k[8684]*y_cur[IDX_GCI]; + data[jistart + 1688] = 0.0 - k[5342]*y_cur[IDX_OI] - k[5692] - k[5969] - k[5970] - k[5971] + - k[5972] - k[5973] - k[5974] - k[7069]; + data[jistart + 1689] = 0.0 + k[4910]*y_cur[IDX_CI]; + data[jistart + 1690] = 0.0 + k[8684]*y_cur[IDX_GC10I]; + data[jistart + 1691] = 0.0 - k[5342]*y_cur[IDX_C11I]; + data[jistart + 1692] = 0.0 + k[4910]*y_cur[IDX_C10HI]; + data[jistart + 1693] = 0.0 - k[815]*y_cur[IDX_eM] - k[2163]*y_cur[IDX_CH4I] - + k[2410]*y_cur[IDX_H2I] - k[2531]*y_cur[IDX_H2OI] - + k[6644]*y_cur[IDX_GRAINM]; + data[jistart + 1694] = 0.0 + k[153]*y_cur[IDX_CII] + k[336]*y_cur[IDX_HII]; + data[jistart + 1695] = 0.0 + k[3668]*y_cur[IDX_O2I]; + data[jistart + 1696] = 0.0 + k[3668]*y_cur[IDX_C3II]; + data[jistart + 1697] = 0.0 - k[2163]*y_cur[IDX_C3OII]; + data[jistart + 1698] = 0.0 + k[153]*y_cur[IDX_C3OI]; + data[jistart + 1699] = 0.0 - k[2531]*y_cur[IDX_C3OII]; + data[jistart + 1700] = 0.0 + k[336]*y_cur[IDX_C3OI]; + data[jistart + 1701] = 0.0 - k[6644]*y_cur[IDX_C3OII]; + data[jistart + 1702] = 0.0 - k[2410]*y_cur[IDX_C3OII]; + data[jistart + 1703] = 0.0 - k[815]*y_cur[IDX_C3OII]; + data[jistart + 1704] = 0.0 - k[827]*y_cur[IDX_eM] - k[828]*y_cur[IDX_eM] - + k[829]*y_cur[IDX_eM] - k[3408]*y_cur[IDX_NI] - + k[6645]*y_cur[IDX_GRAINM] - k[6646]*y_cur[IDX_GRAINM] - + k[6647]*y_cur[IDX_GRAINM]; + data[jistart + 1705] = 0.0 + k[1539]*y_cur[IDX_C2H2I]; + data[jistart + 1706] = 0.0 + k[1669]*y_cur[IDX_C2H4II]; + data[jistart + 1707] = 0.0 + k[1537]*y_cur[IDX_C2H2I] + k[1669]*y_cur[IDX_CH3CCHI]; + data[jistart + 1708] = 0.0 + k[2061]*y_cur[IDX_CH3II]; + data[jistart + 1709] = 0.0 + k[1483]*y_cur[IDX_C2H2II]; + data[jistart + 1710] = 0.0 + k[1483]*y_cur[IDX_C2H4I]; + data[jistart + 1711] = 0.0 + k[2061]*y_cur[IDX_CH2CCHI]; + data[jistart + 1712] = 0.0 + k[1537]*y_cur[IDX_C2H4II] + k[1539]*y_cur[IDX_C2H5II]; + data[jistart + 1713] = 0.0 - k[3408]*y_cur[IDX_C4H5II]; + data[jistart + 1714] = 0.0 - k[6645]*y_cur[IDX_C4H5II] - k[6646]*y_cur[IDX_C4H5II] - + k[6647]*y_cur[IDX_C4H5II]; + data[jistart + 1715] = 0.0 - k[827]*y_cur[IDX_C4H5II] - k[828]*y_cur[IDX_C4H5II] - + k[829]*y_cur[IDX_C4H5II]; + data[jistart + 1716] = 0.0 - k[830]*y_cur[IDX_eM] - k[1842]*y_cur[IDX_CH3CNI] - + k[6667]*y_cur[IDX_GRAINM]; + data[jistart + 1717] = 0.0 + k[1817]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 1718] = 0.0 + k[1564]*y_cur[IDX_C2H2I]; + data[jistart + 1719] = 0.0 + k[1815]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 1720] = 0.0 - k[1842]*y_cur[IDX_C4H7II]; + data[jistart + 1721] = 0.0 + k[1615]*y_cur[IDX_C2H3II]; + data[jistart + 1722] = 0.0 + k[1815]*y_cur[IDX_C3H5II] + k[1817]*y_cur[IDX_C3H6II]; + data[jistart + 1723] = 0.0 + k[1648]*y_cur[IDX_C2H4I]; + data[jistart + 1724] = 0.0 + k[1648]*y_cur[IDX_C2H4II]; + data[jistart + 1725] = 0.0 + k[1615]*y_cur[IDX_C2H6I]; + data[jistart + 1726] = 0.0 + k[1564]*y_cur[IDX_C2H6II]; + data[jistart + 1727] = 0.0 - k[6667]*y_cur[IDX_C4H7II]; + data[jistart + 1728] = 0.0 - k[830]*y_cur[IDX_C4H7II]; + data[jistart + 1729] = 0.0 - k[1275]*y_cur[IDX_eM] - k[1276]*y_cur[IDX_eM] - + k[1277]*y_cur[IDX_eM] - k[1278]*y_cur[IDX_eM] - + k[1279]*y_cur[IDX_eM] - k[6701]*y_cur[IDX_GRAINM] - + k[6702]*y_cur[IDX_GRAINM] - k[6703]*y_cur[IDX_GRAINM] - + k[6704]*y_cur[IDX_GRAINM] - k[6705]*y_cur[IDX_GRAINM]; + data[jistart + 1730] = 0.0 + k[5656]*y_cur[IDX_H3II] + k[5657]*y_cur[IDX_H3OII] + + k[5658]*y_cur[IDX_HCOII]; + data[jistart + 1731] = 0.0 + k[5661]*y_cur[IDX_CII]; + data[jistart + 1732] = 0.0 + k[5657]*y_cur[IDX_CH2OHCOI]; + data[jistart + 1733] = 0.0 + k[5661]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 1734] = 0.0 + k[5658]*y_cur[IDX_CH2OHCOI]; + data[jistart + 1735] = 0.0 + k[5656]*y_cur[IDX_CH2OHCOI]; + data[jistart + 1736] = 0.0 - k[6701]*y_cur[IDX_CH2OHCHOII] - k[6702]*y_cur[IDX_CH2OHCHOII] + - k[6703]*y_cur[IDX_CH2OHCHOII] - k[6704]*y_cur[IDX_CH2OHCHOII] - + k[6705]*y_cur[IDX_CH2OHCHOII]; + data[jistart + 1737] = 0.0 - k[1275]*y_cur[IDX_CH2OHCHOII] - k[1276]*y_cur[IDX_CH2OHCHOII] + - k[1277]*y_cur[IDX_CH2OHCHOII] - k[1278]*y_cur[IDX_CH2OHCHOII] - + k[1279]*y_cur[IDX_CH2OHCHOII]; + data[jistart + 1738] = 0.0 - k[937]*y_cur[IDX_eM] - k[938]*y_cur[IDX_eM] - + k[6547]*y_cur[IDX_GRAINM] - k[6548]*y_cur[IDX_GRAINM]; + data[jistart + 1739] = 0.0 + k[5640]*y_cur[IDX_H3II] + k[5641]*y_cur[IDX_HCOII]; + data[jistart + 1740] = 0.0 + k[167]*y_cur[IDX_CII] + k[366]*y_cur[IDX_HII] + k[5806] + + k[6111]; + data[jistart + 1741] = 0.0 + k[3661]*y_cur[IDX_O2II]; + data[jistart + 1742] = 0.0 + k[3661]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 1743] = 0.0 + k[167]*y_cur[IDX_CH3CHOI]; + data[jistart + 1744] = 0.0 + k[366]*y_cur[IDX_CH3CHOI]; + data[jistart + 1745] = 0.0 + k[5641]*y_cur[IDX_CH3COI]; + data[jistart + 1746] = 0.0 + k[5640]*y_cur[IDX_CH3COI]; + data[jistart + 1747] = 0.0 - k[6547]*y_cur[IDX_CH3CHOII] - k[6548]*y_cur[IDX_CH3CHOII]; + data[jistart + 1748] = 0.0 - k[937]*y_cur[IDX_CH3CHOII] - k[938]*y_cur[IDX_CH3CHOII]; + data[jistart + 1749] = 0.0 + k[8366]*y_cur[IDX_GHI]; + data[jistart + 1750] = 0.0 - k[7208] - k[7390] - k[7565] - k[7890] - k[8270] - + k[8367]*y_cur[IDX_GHI] - k[8368]*y_cur[IDX_GHI] - + k[8519]*y_cur[IDX_GOHI] - k[8520]*y_cur[IDX_GOHI] - + k[8527]*y_cur[IDX_GNHI] - k[8538]*y_cur[IDX_GNH2I] - + k[8556]*y_cur[IDX_GCH3I] - k[8557]*y_cur[IDX_GCH3I] - + k[8566]*y_cur[IDX_GCH3OI] - k[8567]*y_cur[IDX_GCH3OI] - + k[8574]*y_cur[IDX_GCH2OHI]; + data[jistart + 1751] = 0.0 + k[8569]*y_cur[IDX_GHCOI] + k[8573]*y_cur[IDX_GCH3CHOI] - + k[8574]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1752] = 0.0 - k[8566]*y_cur[IDX_GCH2OHCHOI] - k[8567]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1753] = 0.0 + k[7026]; + data[jistart + 1754] = 0.0 + k[8573]*y_cur[IDX_GCH2OHI]; + data[jistart + 1755] = 0.0 - k[8538]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1756] = 0.0 + k[8569]*y_cur[IDX_GCH2OHI]; + data[jistart + 1757] = 0.0 - k[8527]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1758] = 0.0 - k[8519]*y_cur[IDX_GCH2OHCHOI] - k[8520]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1759] = 0.0 - k[8556]*y_cur[IDX_GCH2OHCHOI] - k[8557]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1760] = 0.0 + k[8366]*y_cur[IDX_GCH2OHCOI] - k[8367]*y_cur[IDX_GCH2OHCHOI] - + k[8368]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1761] = 0.0 + k[8336]*y_cur[IDX_GHI]; + data[jistart + 1762] = 0.0 + k[8520]*y_cur[IDX_GOHI]; + data[jistart + 1763] = 0.0 - k[7168] - k[7350] - k[7532] - k[7780] - k[8102] - k[8103] - + k[8104] - k[8337]*y_cur[IDX_GHI] - k[8338]*y_cur[IDX_GHI] - + k[8510]*y_cur[IDX_GOHI] - k[8536]*y_cur[IDX_GNH2I] - + k[8550]*y_cur[IDX_GCH3I] - k[8564]*y_cur[IDX_GCH3OI]; + data[jistart + 1764] = 0.0 + k[8511]*y_cur[IDX_GOHI]; + data[jistart + 1765] = 0.0 - k[8564]*y_cur[IDX_GHCOOHI]; + data[jistart + 1766] = 0.0 + k[8505]*y_cur[IDX_GOHI]; + data[jistart + 1767] = 0.0 + k[8509]*y_cur[IDX_GOHI]; + data[jistart + 1768] = 0.0 - k[8536]*y_cur[IDX_GHCOOHI]; + data[jistart + 1769] = 0.0 + k[8517]*y_cur[IDX_GOHI]; + data[jistart + 1770] = 0.0 + k[6986]; + data[jistart + 1771] = 0.0 + k[8505]*y_cur[IDX_GCH3CHOI] + k[8509]*y_cur[IDX_GH2COI] - + k[8510]*y_cur[IDX_GHCOOHI] + k[8511]*y_cur[IDX_GHCOOCH3I] + + k[8517]*y_cur[IDX_GHCOI] + k[8520]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1772] = 0.0 - k[8550]*y_cur[IDX_GHCOOHI]; + data[jistart + 1773] = 0.0 + k[8336]*y_cur[IDX_GCOOHI] - k[8337]*y_cur[IDX_GHCOOHI] - + k[8338]*y_cur[IDX_GHCOOHI]; + data[jistart + 1774] = 0.0 + k[7220] + k[7402] + k[7584]; + data[jistart + 1775] = 0.0 + k[1049]*y_cur[IDX_eM] + k[6770]*y_cur[IDX_GRAINM]; + data[jistart + 1776] = 0.0 - k[379]*y_cur[IDX_HII] - k[2685]*y_cur[IDX_H3II] - + k[2800]*y_cur[IDX_H3OII] - k[2960]*y_cur[IDX_HCOII] - + k[3227]*y_cur[IDX_HeII] - k[3228]*y_cur[IDX_HeII] - k[5840] - + k[6162] - k[7038]; + data[jistart + 1777] = 0.0 - k[2800]*y_cur[IDX_H2S2I]; + data[jistart + 1778] = 0.0 - k[3227]*y_cur[IDX_H2S2I] - k[3228]*y_cur[IDX_H2S2I]; + data[jistart + 1779] = 0.0 - k[379]*y_cur[IDX_H2S2I]; + data[jistart + 1780] = 0.0 - k[2960]*y_cur[IDX_H2S2I]; + data[jistart + 1781] = 0.0 - k[2685]*y_cur[IDX_H2S2I]; + data[jistart + 1782] = 0.0 + k[6770]*y_cur[IDX_H3S2II]; + data[jistart + 1783] = 0.0 + k[1049]*y_cur[IDX_H3S2II]; + data[jistart + 1784] = 0.0 - k[1123]*y_cur[IDX_eM] - k[1124]*y_cur[IDX_eM] - + k[2287]*y_cur[IDX_COI] - k[2455]*y_cur[IDX_H2I] - + k[2551]*y_cur[IDX_H2OI] - k[6512]*y_cur[IDX_GRAINM] - + k[6513]*y_cur[IDX_GRAINM]; + data[jistart + 1785] = 0.0 + k[394]*y_cur[IDX_HII]; + data[jistart + 1786] = 0.0 + k[2757]*y_cur[IDX_H3II]; + data[jistart + 1787] = 0.0 + k[3472]*y_cur[IDX_NI]; + data[jistart + 1788] = 0.0 + k[3473]*y_cur[IDX_NI]; + data[jistart + 1789] = 0.0 + k[3472]*y_cur[IDX_SiH2II] + k[3473]*y_cur[IDX_SiH3II]; + data[jistart + 1790] = 0.0 - k[2551]*y_cur[IDX_HNSiII]; + data[jistart + 1791] = 0.0 + k[394]*y_cur[IDX_HNSiI]; + data[jistart + 1792] = 0.0 + k[2757]*y_cur[IDX_SiNI]; + data[jistart + 1793] = 0.0 - k[2287]*y_cur[IDX_HNSiII]; + data[jistart + 1794] = 0.0 - k[6512]*y_cur[IDX_HNSiII] - k[6513]*y_cur[IDX_HNSiII]; + data[jistart + 1795] = 0.0 - k[2455]*y_cur[IDX_HNSiII]; + data[jistart + 1796] = 0.0 - k[1123]*y_cur[IDX_HNSiII] - k[1124]*y_cur[IDX_HNSiII]; + data[jistart + 1797] = 0.0 - k[1128]*y_cur[IDX_eM] - k[1129]*y_cur[IDX_eM] - + k[2552]*y_cur[IDX_H2OI] - k[6717]*y_cur[IDX_GRAINM] - + k[6718]*y_cur[IDX_GRAINM]; + data[jistart + 1798] = 0.0 + k[2145]*y_cur[IDX_OCSI]; + data[jistart + 1799] = 0.0 + k[1971]*y_cur[IDX_CHII] + k[2145]*y_cur[IDX_CH4II] + + k[2732]*y_cur[IDX_H3II] + k[2982]*y_cur[IDX_HCOII]; + data[jistart + 1800] = 0.0 + k[1971]*y_cur[IDX_OCSI]; + data[jistart + 1801] = 0.0 + k[2096]*y_cur[IDX_CH3II]; + data[jistart + 1802] = 0.0 + k[2096]*y_cur[IDX_SOI]; + data[jistart + 1803] = 0.0 - k[2552]*y_cur[IDX_HOCSII]; + data[jistart + 1804] = 0.0 + k[2982]*y_cur[IDX_OCSI]; + data[jistart + 1805] = 0.0 + k[2732]*y_cur[IDX_OCSI]; + data[jistart + 1806] = 0.0 - k[6717]*y_cur[IDX_HOCSII] - k[6718]*y_cur[IDX_HOCSII]; + data[jistart + 1807] = 0.0 - k[1128]*y_cur[IDX_HOCSII] - k[1129]*y_cur[IDX_HOCSII]; + data[jistart + 1808] = 0.0 - k[1173]*y_cur[IDX_eM] - k[3748]*y_cur[IDX_OI] - + k[6581]*y_cur[IDX_GRAINM]; + data[jistart + 1809] = 0.0 + k[187]*y_cur[IDX_CII] + k[404]*y_cur[IDX_HII]; + data[jistart + 1810] = 0.0 + k[3462]*y_cur[IDX_NI]; + data[jistart + 1811] = 0.0 + k[3506]*y_cur[IDX_SI]; + data[jistart + 1812] = 0.0 + k[3624]*y_cur[IDX_SII]; + data[jistart + 1813] = 0.0 + k[3468]*y_cur[IDX_NI]; + data[jistart + 1814] = 0.0 + k[3459]*y_cur[IDX_NI]; + data[jistart + 1815] = 0.0 + k[3624]*y_cur[IDX_NHI]; + data[jistart + 1816] = 0.0 + k[3506]*y_cur[IDX_NHII]; + data[jistart + 1817] = 0.0 + k[3459]*y_cur[IDX_H2SII] + k[3462]*y_cur[IDX_HSII] + + k[3468]*y_cur[IDX_SOII]; + data[jistart + 1818] = 0.0 - k[3748]*y_cur[IDX_NSII]; + data[jistart + 1819] = 0.0 + k[187]*y_cur[IDX_NSI]; + data[jistart + 1820] = 0.0 + k[404]*y_cur[IDX_NSI]; + data[jistart + 1821] = 0.0 - k[6581]*y_cur[IDX_NSII]; + data[jistart + 1822] = 0.0 - k[1173]*y_cur[IDX_NSII]; + data[jistart + 1823] = 0.0 - k[1176]*y_cur[IDX_eM] - k[3765]*y_cur[IDX_H2I] - + k[3766]*y_cur[IDX_H2I] - k[6495]*y_cur[IDX_GRAINM]; + data[jistart + 1824] = 0.0 + k[3268]*y_cur[IDX_HeII]; + data[jistart + 1825] = 0.0 + k[3264]*y_cur[IDX_HeII]; + data[jistart + 1826] = 0.0 + k[2270]*y_cur[IDX_CO2I] + k[2274]*y_cur[IDX_NOI] + + k[2276]*y_cur[IDX_O2I]; + data[jistart + 1827] = 0.0 + k[3486]*y_cur[IDX_COI]; + data[jistart + 1828] = 0.0 + k[2270]*y_cur[IDX_CNII]; + data[jistart + 1829] = 0.0 + k[2276]*y_cur[IDX_CNII]; + data[jistart + 1830] = 0.0 + k[2274]*y_cur[IDX_CNII]; + data[jistart + 1831] = 0.0 + k[3264]*y_cur[IDX_HNCOI] + k[3268]*y_cur[IDX_HOCNI]; + data[jistart + 1832] = 0.0 + k[3486]*y_cur[IDX_NHII]; + data[jistart + 1833] = 0.0 - k[6495]*y_cur[IDX_OCNII]; + data[jistart + 1834] = 0.0 - k[3765]*y_cur[IDX_OCNII] - k[3766]*y_cur[IDX_OCNII]; + data[jistart + 1835] = 0.0 - k[1176]*y_cur[IDX_OCNII]; + data[jistart + 1836] = 0.0 - k[1193]*y_cur[IDX_eM] - k[1194]*y_cur[IDX_eM] - + k[1195]*y_cur[IDX_eM] - k[1196]*y_cur[IDX_eM] - + k[6811]*y_cur[IDX_GRAINM] - k[6812]*y_cur[IDX_GRAINM] - + k[6813]*y_cur[IDX_GRAINM] - k[6814]*y_cur[IDX_GRAINM]; + data[jistart + 1837] = 0.0 + k[2611]*y_cur[IDX_H3II] + k[2781]*y_cur[IDX_H3OII] + + k[2916]*y_cur[IDX_HCOII]; + data[jistart + 1838] = 0.0 + k[3815]*y_cur[IDX_C4H2II]; + data[jistart + 1839] = 0.0 + k[3815]*y_cur[IDX_PI]; + data[jistart + 1840] = 0.0 + k[2781]*y_cur[IDX_C4PI]; + data[jistart + 1841] = 0.0 + k[2916]*y_cur[IDX_C4PI]; + data[jistart + 1842] = 0.0 + k[2611]*y_cur[IDX_C4PI]; + data[jistart + 1843] = 0.0 - k[6811]*y_cur[IDX_PC4HII] - k[6812]*y_cur[IDX_PC4HII] - + k[6813]*y_cur[IDX_PC4HII] - k[6814]*y_cur[IDX_PC4HII]; + data[jistart + 1844] = 0.0 - k[1193]*y_cur[IDX_PC4HII] - k[1194]*y_cur[IDX_PC4HII] - + k[1195]*y_cur[IDX_PC4HII] - k[1196]*y_cur[IDX_PC4HII]; + data[jistart + 1845] = 0.0 - k[1209]*y_cur[IDX_eM] - k[1210]*y_cur[IDX_eM] - + k[1572]*y_cur[IDX_C2H2I] - k[2131]*y_cur[IDX_CH3OHI] - + k[3601]*y_cur[IDX_NH3I] - k[3819]*y_cur[IDX_H2SI] - + k[6448]*y_cur[IDX_GRAINM] - k[6449]*y_cur[IDX_GRAINM]; + data[jistart + 1846] = 0.0 + k[2735]*y_cur[IDX_H3II] + k[2984]*y_cur[IDX_HCOII]; + data[jistart + 1847] = 0.0 + k[5560]*y_cur[IDX_H2I]; + data[jistart + 1848] = 0.0 - k[2131]*y_cur[IDX_PH3II]; + data[jistart + 1849] = 0.0 - k[3819]*y_cur[IDX_PH3II]; + data[jistart + 1850] = 0.0 - k[3601]*y_cur[IDX_PH3II]; + data[jistart + 1851] = 0.0 - k[1572]*y_cur[IDX_PH3II]; + data[jistart + 1852] = 0.0 + k[2984]*y_cur[IDX_PH2I]; + data[jistart + 1853] = 0.0 + k[2735]*y_cur[IDX_PH2I]; + data[jistart + 1854] = 0.0 - k[6448]*y_cur[IDX_PH3II] - k[6449]*y_cur[IDX_PH3II]; + data[jistart + 1855] = 0.0 + k[5560]*y_cur[IDX_PHII]; + data[jistart + 1856] = 0.0 - k[1209]*y_cur[IDX_PH3II] - k[1210]*y_cur[IDX_PH3II]; + data[jistart + 1857] = 0.0 + k[1929]*y_cur[IDX_CI]; + data[jistart + 1858] = 0.0 - k[1247]*y_cur[IDX_eM] - k[1248]*y_cur[IDX_eM] - + k[1924]*y_cur[IDX_CI] - k[6541]*y_cur[IDX_GRAINM] - + k[6542]*y_cur[IDX_GRAINM]; + data[jistart + 1859] = 0.0 + k[2752]*y_cur[IDX_H3II] + k[2822]*y_cur[IDX_H3OII] + + k[2999]*y_cur[IDX_HCOII]; + data[jistart + 1860] = 0.0 + k[2237]*y_cur[IDX_SiI]; + data[jistart + 1861] = 0.0 + k[5544]*y_cur[IDX_CH4I]; + data[jistart + 1862] = 0.0 + k[2237]*y_cur[IDX_CH5II]; + data[jistart + 1863] = 0.0 + k[5544]*y_cur[IDX_SiII]; + data[jistart + 1864] = 0.0 + k[2822]*y_cur[IDX_SiCH3I]; + data[jistart + 1865] = 0.0 - k[1924]*y_cur[IDX_SiCH4II] + k[1929]*y_cur[IDX_SiH5II]; + data[jistart + 1866] = 0.0 + k[2999]*y_cur[IDX_SiCH3I]; + data[jistart + 1867] = 0.0 + k[2752]*y_cur[IDX_SiCH3I]; + data[jistart + 1868] = 0.0 - k[6541]*y_cur[IDX_SiCH4II] - k[6542]*y_cur[IDX_SiCH4II]; + data[jistart + 1869] = 0.0 - k[1247]*y_cur[IDX_SiCH4II] - k[1248]*y_cur[IDX_SiCH4II]; + data[jistart + 1870] = 0.0 - k[727]*y_cur[IDX_eM] - k[728]*y_cur[IDX_eM] - + k[2399]*y_cur[IDX_H2I] - k[6869]*y_cur[IDX_GRAINM] - + k[6870]*y_cur[IDX_GRAINM]; + data[jistart + 1871] = 0.0 + k[1338]*y_cur[IDX_CII]; + data[jistart + 1872] = 0.0 + k[3062]*y_cur[IDX_HeII]; + data[jistart + 1873] = 0.0 + k[1885]*y_cur[IDX_CI]; + data[jistart + 1874] = 0.0 + k[1886]*y_cur[IDX_CI]; + data[jistart + 1875] = 0.0 + k[1340]*y_cur[IDX_CII]; + data[jistart + 1876] = 0.0 + k[320]*y_cur[IDX_HII] + k[506]*y_cur[IDX_HeII] + k[5950]; + data[jistart + 1877] = 0.0 + k[5502]*y_cur[IDX_CII]; + data[jistart + 1878] = 0.0 + k[506]*y_cur[IDX_C10I] + k[3062]*y_cur[IDX_C10H2I]; + data[jistart + 1879] = 0.0 + k[1338]*y_cur[IDX_C9H2I] + k[1340]*y_cur[IDX_C9HI] + + k[5502]*y_cur[IDX_C9I]; + data[jistart + 1880] = 0.0 + k[320]*y_cur[IDX_C10I]; + data[jistart + 1881] = 0.0 + k[1885]*y_cur[IDX_C9HII] + k[1886]*y_cur[IDX_C9H2II]; + data[jistart + 1882] = 0.0 - k[6869]*y_cur[IDX_C10II] - k[6870]*y_cur[IDX_C10II]; + data[jistart + 1883] = 0.0 - k[2399]*y_cur[IDX_C10II]; + data[jistart + 1884] = 0.0 - k[727]*y_cur[IDX_C10II] - k[728]*y_cur[IDX_C10II]; + data[jistart + 1885] = 0.0 - k[732]*y_cur[IDX_eM] - k[1848]*y_cur[IDX_CI] - + k[3682]*y_cur[IDX_OI] - k[6874]*y_cur[IDX_GRAINM]; + data[jistart + 1886] = 0.0 + k[2400]*y_cur[IDX_H2I]; + data[jistart + 1887] = 0.0 + k[321]*y_cur[IDX_HII] + k[5958]; + data[jistart + 1888] = 0.0 + k[1889]*y_cur[IDX_CI]; + data[jistart + 1889] = 0.0 + k[1503]*y_cur[IDX_C2H2II]; + data[jistart + 1890] = 0.0 + k[2585]*y_cur[IDX_H3II] + k[2901]*y_cur[IDX_HCOII]; + data[jistart + 1891] = 0.0 + k[1506]*y_cur[IDX_C2H2II]; + data[jistart + 1892] = 0.0 + k[1503]*y_cur[IDX_C8H2I] + k[1506]*y_cur[IDX_C8HI]; + data[jistart + 1893] = 0.0 - k[3682]*y_cur[IDX_C10H2II]; + data[jistart + 1894] = 0.0 + k[321]*y_cur[IDX_C10H2I]; + data[jistart + 1895] = 0.0 - k[1848]*y_cur[IDX_C10H2II] + k[1889]*y_cur[IDX_C9H3II]; + data[jistart + 1896] = 0.0 + k[2901]*y_cur[IDX_C10HI]; + data[jistart + 1897] = 0.0 + k[2585]*y_cur[IDX_C10HI]; + data[jistart + 1898] = 0.0 - k[6874]*y_cur[IDX_C10H2II]; + data[jistart + 1899] = 0.0 + k[2400]*y_cur[IDX_C10HII]; + data[jistart + 1900] = 0.0 - k[732]*y_cur[IDX_C10H2II]; + data[jistart + 1901] = 0.0 - k[234]*y_cur[IDX_C2H4I] - k[782]*y_cur[IDX_eM] - + k[783]*y_cur[IDX_eM] - k[1542]*y_cur[IDX_C2H2I] - + k[2404]*y_cur[IDX_H2I] - k[2527]*y_cur[IDX_H2OI] - + k[2830]*y_cur[IDX_HI] - k[2865]*y_cur[IDX_HCNI] - + k[2866]*y_cur[IDX_HCNI] - k[6635]*y_cur[IDX_GRAINM] - + k[6636]*y_cur[IDX_GRAINM]; + data[jistart + 1902] = 0.0 + k[3352]*y_cur[IDX_NII] + k[6215]; + data[jistart + 1903] = 0.0 + k[2272]*y_cur[IDX_HCNI]; + data[jistart + 1904] = 0.0 + k[3352]*y_cur[IDX_NCCNI]; + data[jistart + 1905] = 0.0 - k[234]*y_cur[IDX_C2N2II]; + data[jistart + 1906] = 0.0 + k[2272]*y_cur[IDX_CNII] - k[2865]*y_cur[IDX_C2N2II] - + k[2866]*y_cur[IDX_C2N2II]; + data[jistart + 1907] = 0.0 - k[1542]*y_cur[IDX_C2N2II]; + data[jistart + 1908] = 0.0 - k[2527]*y_cur[IDX_C2N2II]; + data[jistart + 1909] = 0.0 - k[6635]*y_cur[IDX_C2N2II] - k[6636]*y_cur[IDX_C2N2II]; + data[jistart + 1910] = 0.0 - k[2404]*y_cur[IDX_C2N2II]; + data[jistart + 1911] = 0.0 - k[782]*y_cur[IDX_C2N2II] - k[783]*y_cur[IDX_C2N2II]; + data[jistart + 1912] = 0.0 - k[2830]*y_cur[IDX_C2N2II]; + data[jistart + 1913] = 0.0 - k[944]*y_cur[IDX_eM] - k[945]*y_cur[IDX_eM] - + k[2283]*y_cur[IDX_COI] - k[2431]*y_cur[IDX_H2I] - + k[6484]*y_cur[IDX_GRAINM] - k[6485]*y_cur[IDX_GRAINM]; + data[jistart + 1914] = 0.0 + k[2638]*y_cur[IDX_H3II]; + data[jistart + 1915] = 0.0 + k[367]*y_cur[IDX_HII] + k[650]*y_cur[IDX_OII] + k[5809] + + k[6114]; + data[jistart + 1916] = 0.0 + k[3532]*y_cur[IDX_C2H2II]; + data[jistart + 1917] = 0.0 + k[3391]*y_cur[IDX_NI]; + data[jistart + 1918] = 0.0 + k[650]*y_cur[IDX_CH3CNI]; + data[jistart + 1919] = 0.0 + k[3532]*y_cur[IDX_NH2I]; + data[jistart + 1920] = 0.0 + k[3391]*y_cur[IDX_C2H4II]; + data[jistart + 1921] = 0.0 + k[367]*y_cur[IDX_CH3CNI]; + data[jistart + 1922] = 0.0 + k[2638]*y_cur[IDX_CH2CNI]; + data[jistart + 1923] = 0.0 - k[2283]*y_cur[IDX_CH3CNII]; + data[jistart + 1924] = 0.0 - k[6484]*y_cur[IDX_CH3CNII] - k[6485]*y_cur[IDX_CH3CNII]; + data[jistart + 1925] = 0.0 - k[2431]*y_cur[IDX_CH3CNII]; + data[jistart + 1926] = 0.0 - k[944]*y_cur[IDX_CH3CNII] - k[945]*y_cur[IDX_CH3CNII]; + data[jistart + 1927] = 0.0 + k[8190]; + data[jistart + 1928] = 0.0 + k[7810] + k[8139]; + data[jistart + 1929] = 0.0 + k[7744] + k[8055]; + data[jistart + 1930] = 0.0 + k[7677] + k[7678] + k[7964] + k[7965]; + data[jistart + 1931] = 0.0 + k[7667] + k[7668] + k[7669] + k[7954] + k[7955] + k[7956]; + data[jistart + 1932] = 0.0 - k[7092] - k[7274] - k[7456] - k[7645] - k[7646] - k[7647] - + k[7648] - k[7932] - k[7933] - k[7934] - k[7935] - + k[8287]*y_cur[IDX_GHI] - k[8588]*y_cur[IDX_GHI]; + data[jistart + 1933] = 0.0 + k[7652] + k[7655] + k[7656] + k[7939] + k[7942] + k[7943]; + data[jistart + 1934] = 0.0 + k[8575]*y_cur[IDX_GC2HI]; + data[jistart + 1935] = 0.0 + k[8286]*y_cur[IDX_GHI] + k[8375]*y_cur[IDX_GH2I] + + k[8575]*y_cur[IDX_GCH4I]; + data[jistart + 1936] = 0.0 + k[8396]*y_cur[IDX_GCI]; + data[jistart + 1937] = 0.0 + k[8478]*y_cur[IDX_GCHI] + k[8478]*y_cur[IDX_GCHI]; + data[jistart + 1938] = 0.0 + k[8375]*y_cur[IDX_GC2HI]; + data[jistart + 1939] = 0.0 + k[8396]*y_cur[IDX_GCH2I]; + data[jistart + 1940] = 0.0 + k[6910]; + data[jistart + 1941] = 0.0 + k[8286]*y_cur[IDX_GC2HI] - k[8287]*y_cur[IDX_GC2H2I] - + k[8588]*y_cur[IDX_GC2H2I]; + data[jistart + 1942] = 0.0 + k[8255] + k[8256] + k[8260]; + data[jistart + 1943] = 0.0 + k[8237] + k[8237] + k[8238] + k[8244]; + data[jistart + 1944] = 0.0 - k[7206] - k[7388] - k[7572] - k[7822] - k[7823] - k[8149] - + k[8350]*y_cur[IDX_GHI] - k[8382]*y_cur[IDX_GH2I] - + k[8423]*y_cur[IDX_GCI] - k[8467]*y_cur[IDX_GNI] - + k[8495]*y_cur[IDX_GCHI] - k[8636]*y_cur[IDX_GHI] - + k[8674]*y_cur[IDX_GCI] - k[8707]*y_cur[IDX_GNI] - + k[8728]*y_cur[IDX_GCHI]; + data[jistart + 1945] = 0.0 + k[7849] + k[8178] + k[8180]; + data[jistart + 1946] = 0.0 + k[7835] + k[8159]; + data[jistart + 1947] = 0.0 + k[8195]; + data[jistart + 1948] = 0.0 + k[8420]*y_cur[IDX_GCI]; + data[jistart + 1949] = 0.0 - k[8467]*y_cur[IDX_GC5I] - k[8707]*y_cur[IDX_GC5I]; + data[jistart + 1950] = 0.0 - k[8495]*y_cur[IDX_GC5I] - k[8728]*y_cur[IDX_GC5I]; + data[jistart + 1951] = 0.0 - k[8382]*y_cur[IDX_GC5I]; + data[jistart + 1952] = 0.0 + k[8420]*y_cur[IDX_GC4I] - k[8423]*y_cur[IDX_GC5I] - + k[8674]*y_cur[IDX_GC5I]; + data[jistart + 1953] = 0.0 + k[7024]; + data[jistart + 1954] = 0.0 - k[8350]*y_cur[IDX_GC5I] - k[8636]*y_cur[IDX_GC5I]; + data[jistart + 1955] = 0.0 + k[7863] + k[8200] + k[8202]; + data[jistart + 1956] = 0.0 + k[8250]; + data[jistart + 1957] = 0.0 + k[8240] + k[8245]; + data[jistart + 1958] = 0.0 + k[8209]; + data[jistart + 1959] = 0.0 - k[7233] - k[7415] - k[7597] - k[7862] - k[8197] - k[8198] - + k[8199] - k[8356]*y_cur[IDX_GHI] - k[8387]*y_cur[IDX_GH2I] - + k[8428]*y_cur[IDX_GCI] - k[8470]*y_cur[IDX_GNI] - + k[8500]*y_cur[IDX_GCHI] - k[8642]*y_cur[IDX_GHI] - + k[8679]*y_cur[IDX_GCI] - k[8710]*y_cur[IDX_GNI] - + k[8733]*y_cur[IDX_GCHI]; + data[jistart + 1960] = 0.0 + k[8497]*y_cur[IDX_GCHI]; + data[jistart + 1961] = 0.0 + k[8426]*y_cur[IDX_GCI]; + data[jistart + 1962] = 0.0 + k[8355]*y_cur[IDX_GHI] + k[8386]*y_cur[IDX_GH2I]; + data[jistart + 1963] = 0.0 - k[8470]*y_cur[IDX_GC7HI] - k[8710]*y_cur[IDX_GC7HI]; + data[jistart + 1964] = 0.0 + k[8497]*y_cur[IDX_GC6I] - k[8500]*y_cur[IDX_GC7HI] - + k[8733]*y_cur[IDX_GC7HI]; + data[jistart + 1965] = 0.0 + k[8386]*y_cur[IDX_GC7I] - k[8387]*y_cur[IDX_GC7HI]; + data[jistart + 1966] = 0.0 + k[8426]*y_cur[IDX_GC6HI] - k[8428]*y_cur[IDX_GC7HI] - + k[8679]*y_cur[IDX_GC7HI]; + data[jistart + 1967] = 0.0 + k[7051]; + data[jistart + 1968] = 0.0 + k[8355]*y_cur[IDX_GC7I] - k[8356]*y_cur[IDX_GC7HI] - + k[8642]*y_cur[IDX_GC7HI]; + data[jistart + 1969] = 0.0 + k[7892] + k[8271]; + data[jistart + 1970] = 0.0 - k[7148] - k[7330] - k[7512] - k[7883] - k[8266] - + k[8331]*y_cur[IDX_GHI] - k[8504]*y_cur[IDX_GOHI] - + k[8551]*y_cur[IDX_GCH3I] - k[8626]*y_cur[IDX_GHI] - + k[8742]*y_cur[IDX_GOHI] - k[8754]*y_cur[IDX_GCH3I]; + data[jistart + 1971] = 0.0 + k[8572]*y_cur[IDX_GCH3CHOI]; + data[jistart + 1972] = 0.0 + k[8562]*y_cur[IDX_GCH3CHOI]; + data[jistart + 1973] = 0.0 + k[8332]*y_cur[IDX_GHI] + k[8506]*y_cur[IDX_GOHI] + + k[8521]*y_cur[IDX_GNHI] + k[8535]*y_cur[IDX_GNH2I] + + k[8547]*y_cur[IDX_GCH3I] + k[8562]*y_cur[IDX_GCH3OI] + + k[8572]*y_cur[IDX_GCH2OHI]; + data[jistart + 1974] = 0.0 + k[6966]; + data[jistart + 1975] = 0.0 + k[8535]*y_cur[IDX_GCH3CHOI]; + data[jistart + 1976] = 0.0 + k[8521]*y_cur[IDX_GCH3CHOI]; + data[jistart + 1977] = 0.0 - k[8504]*y_cur[IDX_GCH3COI] + k[8506]*y_cur[IDX_GCH3CHOI] - + k[8742]*y_cur[IDX_GCH3COI]; + data[jistart + 1978] = 0.0 + k[8539]*y_cur[IDX_GCH3I]; + data[jistart + 1979] = 0.0 + k[8539]*y_cur[IDX_GCOI] + k[8547]*y_cur[IDX_GCH3CHOI] - + k[8551]*y_cur[IDX_GCH3COI] - k[8754]*y_cur[IDX_GCH3COI]; + data[jistart + 1980] = 0.0 - k[8331]*y_cur[IDX_GCH3COI] + k[8332]*y_cur[IDX_GCH3CHOI] - + k[8626]*y_cur[IDX_GCH3COI]; + data[jistart + 1981] = 0.0 + k[8365]*y_cur[IDX_GHI]; + data[jistart + 1982] = 0.0 + k[8566]*y_cur[IDX_GCH3OI]; + data[jistart + 1983] = 0.0 - k[7203] - k[7385] - k[7569] - k[7824] - k[7825] - k[7826] - + k[8150] - k[8346]*y_cur[IDX_GHI] - k[8347]*y_cur[IDX_GHI] - + k[8511]*y_cur[IDX_GOHI] - k[8512]*y_cur[IDX_GOHI] - + k[8537]*y_cur[IDX_GNH2I] - k[8555]*y_cur[IDX_GCH3I] - + k[8565]*y_cur[IDX_GCH3OI]; + data[jistart + 1984] = 0.0 + k[8559]*y_cur[IDX_GHCOI] + k[8561]*y_cur[IDX_GH2COI] + + k[8563]*y_cur[IDX_GCH3CHOI] - k[8565]*y_cur[IDX_GHCOOCH3I] + + k[8566]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 1985] = 0.0 + k[8563]*y_cur[IDX_GCH3OI]; + data[jistart + 1986] = 0.0 + k[8561]*y_cur[IDX_GCH3OI]; + data[jistart + 1987] = 0.0 + k[7021]; + data[jistart + 1988] = 0.0 - k[8537]*y_cur[IDX_GHCOOCH3I]; + data[jistart + 1989] = 0.0 + k[8559]*y_cur[IDX_GCH3OI]; + data[jistart + 1990] = 0.0 - k[8511]*y_cur[IDX_GHCOOCH3I] - k[8512]*y_cur[IDX_GHCOOCH3I]; + data[jistart + 1991] = 0.0 - k[8555]*y_cur[IDX_GHCOOCH3I]; + data[jistart + 1992] = 0.0 - k[8346]*y_cur[IDX_GHCOOCH3I] - k[8347]*y_cur[IDX_GHCOOCH3I] + + k[8365]*y_cur[IDX_GCOOCH3I]; + data[jistart + 1993] = 0.0 - k[1074]*y_cur[IDX_eM] - k[1075]*y_cur[IDX_eM] - + k[1076]*y_cur[IDX_eM] - k[6818]*y_cur[IDX_GRAINM] - + k[6819]*y_cur[IDX_GRAINM] - k[6820]*y_cur[IDX_GRAINM]; + data[jistart + 1994] = 0.0 + k[2612]*y_cur[IDX_H3II] + k[2782]*y_cur[IDX_H3OII] + + k[2917]*y_cur[IDX_HCOII]; + data[jistart + 1995] = 0.0 + k[3837]*y_cur[IDX_SI]; + data[jistart + 1996] = 0.0 + k[3832]*y_cur[IDX_SII]; + data[jistart + 1997] = 0.0 + k[3836]*y_cur[IDX_SI]; + data[jistart + 1998] = 0.0 + k[3832]*y_cur[IDX_C4H2I]; + data[jistart + 1999] = 0.0 + k[3836]*y_cur[IDX_C4H2II] + k[3837]*y_cur[IDX_C4H3II]; + data[jistart + 2000] = 0.0 + k[2782]*y_cur[IDX_C4SI]; + data[jistart + 2001] = 0.0 + k[2917]*y_cur[IDX_C4SI]; + data[jistart + 2002] = 0.0 + k[2612]*y_cur[IDX_C4SI]; + data[jistart + 2003] = 0.0 - k[6818]*y_cur[IDX_HC4SII] - k[6819]*y_cur[IDX_HC4SII] - + k[6820]*y_cur[IDX_HC4SII]; + data[jistart + 2004] = 0.0 - k[1074]*y_cur[IDX_HC4SII] - k[1075]*y_cur[IDX_HC4SII] - + k[1076]*y_cur[IDX_HC4SII]; + data[jistart + 2005] = 0.0 - k[1079]*y_cur[IDX_eM] - k[1080]*y_cur[IDX_eM] - + k[1081]*y_cur[IDX_eM] - k[1082]*y_cur[IDX_eM] - + k[1083]*y_cur[IDX_eM] - k[6791]*y_cur[IDX_GRAINM] - + k[6792]*y_cur[IDX_GRAINM] - k[6793]*y_cur[IDX_GRAINM] - + k[6794]*y_cur[IDX_GRAINM] - k[6795]*y_cur[IDX_GRAINM]; + data[jistart + 2006] = 0.0 + k[2447]*y_cur[IDX_H2I]; + data[jistart + 2007] = 0.0 + k[2175]*y_cur[IDX_CH4I]; + data[jistart + 2008] = 0.0 + k[2691]*y_cur[IDX_H3II] + k[2966]*y_cur[IDX_HCOII]; + data[jistart + 2009] = 0.0 + k[3416]*y_cur[IDX_NI]; + data[jistart + 2010] = 0.0 + k[2175]*y_cur[IDX_C4NII]; + data[jistart + 2011] = 0.0 + k[3416]*y_cur[IDX_C5H3II]; + data[jistart + 2012] = 0.0 + k[2966]*y_cur[IDX_HC5NI]; + data[jistart + 2013] = 0.0 + k[2691]*y_cur[IDX_HC5NI]; + data[jistart + 2014] = 0.0 - k[6791]*y_cur[IDX_HC5NHII] - k[6792]*y_cur[IDX_HC5NHII] - + k[6793]*y_cur[IDX_HC5NHII] - k[6794]*y_cur[IDX_HC5NHII] - + k[6795]*y_cur[IDX_HC5NHII]; + data[jistart + 2015] = 0.0 + k[2447]*y_cur[IDX_HC5NII]; + data[jistart + 2016] = 0.0 - k[1079]*y_cur[IDX_HC5NHII] - k[1080]*y_cur[IDX_HC5NHII] - + k[1081]*y_cur[IDX_HC5NHII] - k[1082]*y_cur[IDX_HC5NHII] - + k[1083]*y_cur[IDX_HC5NHII]; + data[jistart + 2017] = 0.0 + k[1924]*y_cur[IDX_CI]; + data[jistart + 2018] = 0.0 - k[1230]*y_cur[IDX_eM] - k[1231]*y_cur[IDX_eM] - + k[1917]*y_cur[IDX_CI] - k[6664]*y_cur[IDX_GRAINM] - + k[6665]*y_cur[IDX_GRAINM]; + data[jistart + 2019] = 0.0 + k[2745]*y_cur[IDX_H3II] + k[2992]*y_cur[IDX_HCOII]; + data[jistart + 2020] = 0.0 + k[5563]*y_cur[IDX_H2I]; + data[jistart + 2021] = 0.0 + k[3865]*y_cur[IDX_SiII]; + data[jistart + 2022] = 0.0 + k[1681]*y_cur[IDX_SiI]; + data[jistart + 2023] = 0.0 + k[1718]*y_cur[IDX_SiII]; + data[jistart + 2024] = 0.0 + k[1718]*y_cur[IDX_C2H4I] + k[3865]*y_cur[IDX_CH3CCHI]; + data[jistart + 2025] = 0.0 + k[1681]*y_cur[IDX_C2H4II]; + data[jistart + 2026] = 0.0 - k[1917]*y_cur[IDX_SiC2H3II] + k[1924]*y_cur[IDX_SiCH4II]; + data[jistart + 2027] = 0.0 + k[2992]*y_cur[IDX_SiC2H2I]; + data[jistart + 2028] = 0.0 + k[2745]*y_cur[IDX_SiC2H2I]; + data[jistart + 2029] = 0.0 - k[6664]*y_cur[IDX_SiC2H3II] - k[6665]*y_cur[IDX_SiC2H3II]; + data[jistart + 2030] = 0.0 + k[5563]*y_cur[IDX_SiC2HII]; + data[jistart + 2031] = 0.0 - k[1230]*y_cur[IDX_SiC2H3II] - k[1231]*y_cur[IDX_SiC2H3II]; + data[jistart + 2032] = 0.0 + k[7217] + k[7399] + k[7581]; + data[jistart + 2033] = 0.0 + k[1237]*y_cur[IDX_eM] + k[6768]*y_cur[IDX_GRAINM]; + data[jistart + 2034] = 0.0 - k[423]*y_cur[IDX_HII] - k[1433]*y_cur[IDX_CII] - + k[2359]*y_cur[IDX_HII] - k[2748]*y_cur[IDX_H3II] - + k[2995]*y_cur[IDX_HCOII] - k[3313]*y_cur[IDX_HeII] - + k[3314]*y_cur[IDX_HeII] - k[5922] - k[6265] - k[7035]; + data[jistart + 2035] = 0.0 - k[3313]*y_cur[IDX_SiC3HI] - k[3314]*y_cur[IDX_SiC3HI]; + data[jistart + 2036] = 0.0 - k[1433]*y_cur[IDX_SiC3HI]; + data[jistart + 2037] = 0.0 - k[423]*y_cur[IDX_SiC3HI] - k[2359]*y_cur[IDX_SiC3HI]; + data[jistart + 2038] = 0.0 - k[2995]*y_cur[IDX_SiC3HI]; + data[jistart + 2039] = 0.0 - k[2748]*y_cur[IDX_SiC3HI]; + data[jistart + 2040] = 0.0 + k[6768]*y_cur[IDX_SiC3H2II]; + data[jistart + 2041] = 0.0 + k[1237]*y_cur[IDX_SiC3H2II]; + data[jistart + 2042] = 0.0 - k[1245]*y_cur[IDX_eM] - k[1246]*y_cur[IDX_eM] - + k[1923]*y_cur[IDX_CI] - k[2570]*y_cur[IDX_H2OI] - + k[6516]*y_cur[IDX_GRAINM] - k[6517]*y_cur[IDX_GRAINM]; + data[jistart + 2043] = 0.0 + k[200]*y_cur[IDX_CII] + k[427]*y_cur[IDX_HII]; + data[jistart + 2044] = 0.0 + k[2751]*y_cur[IDX_H3II] + k[2998]*y_cur[IDX_HCOII]; + data[jistart + 2045] = 0.0 + k[1444]*y_cur[IDX_CII]; + data[jistart + 2046] = 0.0 + k[2236]*y_cur[IDX_SiI]; + data[jistart + 2047] = 0.0 + k[2236]*y_cur[IDX_CH5II]; + data[jistart + 2048] = 0.0 + k[200]*y_cur[IDX_SiCH3I] + k[1444]*y_cur[IDX_SiH4I]; + data[jistart + 2049] = 0.0 - k[2570]*y_cur[IDX_SiCH3II]; + data[jistart + 2050] = 0.0 + k[427]*y_cur[IDX_SiCH3I]; + data[jistart + 2051] = 0.0 - k[1923]*y_cur[IDX_SiCH3II]; + data[jistart + 2052] = 0.0 + k[2998]*y_cur[IDX_SiCH2I]; + data[jistart + 2053] = 0.0 + k[2751]*y_cur[IDX_SiCH2I]; + data[jistart + 2054] = 0.0 - k[6516]*y_cur[IDX_SiCH3II] - k[6517]*y_cur[IDX_SiCH3II]; + data[jistart + 2055] = 0.0 - k[1245]*y_cur[IDX_SiCH3II] - k[1246]*y_cur[IDX_SiCH3II]; + data[jistart + 2056] = 0.0 + k[2455]*y_cur[IDX_H2I]; + data[jistart + 2057] = 0.0 - k[1264]*y_cur[IDX_eM] - k[1265]*y_cur[IDX_eM] - + k[1930]*y_cur[IDX_CI] - k[1931]*y_cur[IDX_CI] - + k[6552]*y_cur[IDX_GRAINM] - k[6553]*y_cur[IDX_GRAINM]; + data[jistart + 2058] = 0.0 + k[2710]*y_cur[IDX_H3II] + k[2811]*y_cur[IDX_H3OII] + + k[2974]*y_cur[IDX_HCOII]; + data[jistart + 2059] = 0.0 + k[3474]*y_cur[IDX_NI]; + data[jistart + 2060] = 0.0 + k[3602]*y_cur[IDX_NH3I]; + data[jistart + 2061] = 0.0 + k[3602]*y_cur[IDX_SiII]; + data[jistart + 2062] = 0.0 + k[3474]*y_cur[IDX_SiH3II]; + data[jistart + 2063] = 0.0 + k[2811]*y_cur[IDX_HNSiI]; + data[jistart + 2064] = 0.0 - k[1930]*y_cur[IDX_SiNH2II] - k[1931]*y_cur[IDX_SiNH2II]; + data[jistart + 2065] = 0.0 + k[2974]*y_cur[IDX_HNSiI]; + data[jistart + 2066] = 0.0 + k[2710]*y_cur[IDX_HNSiI]; + data[jistart + 2067] = 0.0 - k[6552]*y_cur[IDX_SiNH2II] - k[6553]*y_cur[IDX_SiNH2II]; + data[jistart + 2068] = 0.0 + k[2455]*y_cur[IDX_HNSiII]; + data[jistart + 2069] = 0.0 - k[1264]*y_cur[IDX_SiNH2II] - k[1265]*y_cur[IDX_SiNH2II]; + data[jistart + 2070] = 0.0 + k[5969]; + data[jistart + 2071] = 0.0 + k[1848]*y_cur[IDX_CI]; + data[jistart + 2072] = 0.0 - k[735]*y_cur[IDX_eM] - k[736]*y_cur[IDX_eM] - + k[737]*y_cur[IDX_eM] - k[738]*y_cur[IDX_eM] - k[6884]*y_cur[IDX_GRAINM] - k[6885]*y_cur[IDX_GRAINM] - k[6886]*y_cur[IDX_GRAINM] - k[6887]*y_cur[IDX_GRAINM]; - data[jistart + 809] = 0.0 - k[6884]*y_cur[IDX_C11II] - - k[6885]*y_cur[IDX_C11II] - k[6886]*y_cur[IDX_C11II] - - k[6887]*y_cur[IDX_C11II]; - data[jistart + 810] = 0.0 - k[735]*y_cur[IDX_C11II] - - k[736]*y_cur[IDX_C11II] - k[737]*y_cur[IDX_C11II] - - k[738]*y_cur[IDX_C11II]; - data[jistart + 811] = 0.0 + k[0]*y_cur[IDX_CM] + - k[244]*y_cur[IDX_C2II] + k[4917]*y_cur[IDX_C2NI] + - k[4918]*y_cur[IDX_C2OI] + k[4923]*y_cur[IDX_C4I] + - k[4930]*y_cur[IDX_C6I] + k[4938]*y_cur[IDX_C8I] + - k[4955]*y_cur[IDX_CHI] + k[4956]*y_cur[IDX_CNI] + - k[4957]*y_cur[IDX_COI] + k[4958]*y_cur[IDX_CSI] - - k[5521]*y_cur[IDX_C2I] + k[5523]*y_cur[IDX_CI] + - k[5523]*y_cur[IDX_CI]; - data[jistart + 812] = 0.0 + k[1299]*y_cur[IDX_C10HI] + - k[1341]*y_cur[IDX_CCPI] + k[1434]*y_cur[IDX_SiCI] + - k[3991]*y_cur[IDX_C2M]; - data[jistart + 813] = 0.0 + k[0]*y_cur[IDX_CI]; - data[jistart + 814] = 0.0 + k[3060]*y_cur[IDX_HeII] + k[5953] + - k[5954]; - data[jistart + 815] = 0.0 + k[727]*y_cur[IDX_eM] + - k[6869]*y_cur[IDX_GRAINM]; - data[jistart + 816] = 0.0 + k[1299]*y_cur[IDX_CII] + - k[3067]*y_cur[IDX_HeII] + k[3070]*y_cur[IDX_HeII] + k[5967]; - data[jistart + 817] = 0.0 + k[5974]; - data[jistart + 818] = 0.0 + k[738]*y_cur[IDX_eM] + - k[6887]*y_cur[IDX_GRAINM]; - data[jistart + 819] = 0.0 - k[10]*y_cur[IDX_C2M] - - k[22]*y_cur[IDX_C4M] - k[27]*y_cur[IDX_C5M] - k[31]*y_cur[IDX_C6M] - - k[34]*y_cur[IDX_C7M] - k[36]*y_cur[IDX_C8M] - k[66]*y_cur[IDX_HM] - - k[208]*y_cur[IDX_CNII] - k[209]*y_cur[IDX_COII] - - k[210]*y_cur[IDX_N2II] - k[211]*y_cur[IDX_O2II] - - k[323]*y_cur[IDX_HII] - k[436]*y_cur[IDX_H2II] - - k[462]*y_cur[IDX_H2OII] - k[508]*y_cur[IDX_HeII] - - k[542]*y_cur[IDX_NII] - k[646]*y_cur[IDX_OII] - - k[685]*y_cur[IDX_OHII] - k[1451]*y_cur[IDX_C2II] - - k[1457]*y_cur[IDX_H2COII] - k[1458]*y_cur[IDX_HCNII] - - k[1459]*y_cur[IDX_HCOII] - k[1460]*y_cur[IDX_HNOII] - - k[1461]*y_cur[IDX_N2HII] - k[1462]*y_cur[IDX_O2II] - - k[1463]*y_cur[IDX_O2HII] - k[1464]*y_cur[IDX_SII] - - k[1465]*y_cur[IDX_SiOII] - k[1933]*y_cur[IDX_CHII] - - k[2041]*y_cur[IDX_CH3II] - k[2217]*y_cur[IDX_CH5II] - - k[2369]*y_cur[IDX_H2II] - k[2503]*y_cur[IDX_H2OII] - - k[2586]*y_cur[IDX_H3II] - k[2766]*y_cur[IDX_H3OII] - - k[3073]*y_cur[IDX_HeII] - k[3477]*y_cur[IDX_NHII] - - k[3478]*y_cur[IDX_NHII] - k[3479]*y_cur[IDX_NHII] - - k[3507]*y_cur[IDX_NH2II] - k[3548]*y_cur[IDX_NH3II] - - k[3631]*y_cur[IDX_OII] - k[3769]*y_cur[IDX_OHII] - - k[4867]*y_cur[IDX_C2H2I] - k[4868]*y_cur[IDX_C2H4I] - - k[4869]*y_cur[IDX_C2H6I] - k[4870]*y_cur[IDX_CH3CHCH2I] - - k[4871]*y_cur[IDX_CH4I] - k[4872]*y_cur[IDX_C4H2I] - - k[4873]*y_cur[IDX_HCNI] - k[4874]*y_cur[IDX_O2I] - - k[4875]*y_cur[IDX_OCSI] - k[4876]*y_cur[IDX_SI] - - k[5153]*y_cur[IDX_HI] - k[5222]*y_cur[IDX_NI] - - k[5343]*y_cur[IDX_OI] - k[5521]*y_cur[IDX_CI] - - k[5589]*y_cur[IDX_eM] - k[5694] - k[5977] - k[5978] - k[6907]; - data[jistart + 820] = 0.0 + k[205]*y_cur[IDX_HCOI] + - k[206]*y_cur[IDX_NOI] + k[207]*y_cur[IDX_SI] + k[244]*y_cur[IDX_CI] - + k[259]*y_cur[IDX_CH2I] + k[287]*y_cur[IDX_CHI] + - k[585]*y_cur[IDX_NH2I] + k[697]*y_cur[IDX_OHI] - - k[1451]*y_cur[IDX_C2I]; - data[jistart + 821] = 0.0 - k[10]*y_cur[IDX_C2I] + - k[3991]*y_cur[IDX_CII] + k[3992]*y_cur[IDX_C2H2II] + - k[3993]*y_cur[IDX_C2H3II] + k[3994]*y_cur[IDX_C4H2II] + - k[3995]*y_cur[IDX_C4H3II] + k[3996]*y_cur[IDX_C4SII] + - k[3997]*y_cur[IDX_CH2CCHII] + k[3998]*y_cur[IDX_CH3II] + - k[3999]*y_cur[IDX_CNCII] + k[4000]*y_cur[IDX_FeII] + - k[4001]*y_cur[IDX_HII] + k[4002]*y_cur[IDX_H2COII] + - k[4003]*y_cur[IDX_H2SII] + k[4004]*y_cur[IDX_H3II] + - k[4005]*y_cur[IDX_H3OII] + k[4006]*y_cur[IDX_HC2SII] + - k[4007]*y_cur[IDX_HCNHII] + k[4008]*y_cur[IDX_HCNHII] + - k[4009]*y_cur[IDX_HCOII] + k[4010]*y_cur[IDX_HCOII] + - k[4011]*y_cur[IDX_HeII] + k[4012]*y_cur[IDX_MgII] + - k[4013]*y_cur[IDX_NII] + k[4014]*y_cur[IDX_N2HII] + - k[4015]*y_cur[IDX_NH3II] + k[4016]*y_cur[IDX_NH4II] + - k[4017]*y_cur[IDX_NOII] + k[4018]*y_cur[IDX_NaII] + - k[4019]*y_cur[IDX_OII] + k[4020]*y_cur[IDX_SII] + - k[4021]*y_cur[IDX_SOII] + k[4022]*y_cur[IDX_SiII] + - k[4023]*y_cur[IDX_SiOII] + k[4024]*y_cur[IDX_SiOHII] + - k[4025]*y_cur[IDX_SiSII] + k[5693] + k[5976]; - data[jistart + 822] = 0.0 + k[1743]*y_cur[IDX_COII] + k[5708] + - k[5993]; - data[jistart + 823] = 0.0 + k[740]*y_cur[IDX_eM] + - k[1469]*y_cur[IDX_H2COI] + k[1472]*y_cur[IDX_HC3NI] + - k[1476]*y_cur[IDX_HCNI] + k[1478]*y_cur[IDX_HNCI] + - k[1996]*y_cur[IDX_CH2I] + k[2240]*y_cur[IDX_CHI] + - k[3529]*y_cur[IDX_NH2I] + k[3554]*y_cur[IDX_NH3I] + - k[6354]*y_cur[IDX_GRAINM]; - data[jistart + 824] = 0.0 - k[4867]*y_cur[IDX_C2I]; - data[jistart + 825] = 0.0 + k[742]*y_cur[IDX_eM] + - k[3992]*y_cur[IDX_C2M] + k[6356]*y_cur[IDX_GRAINM]; - data[jistart + 826] = 0.0 + k[745]*y_cur[IDX_eM] + - k[746]*y_cur[IDX_eM] + k[3993]*y_cur[IDX_C2M] + - k[6360]*y_cur[IDX_GRAINM] + k[6361]*y_cur[IDX_GRAINM]; - data[jistart + 827] = 0.0 - k[4868]*y_cur[IDX_C2I]; - data[jistart + 828] = 0.0 - k[4869]*y_cur[IDX_C2I]; - data[jistart + 829] = 0.0 + k[4917]*y_cur[IDX_CI] + k[5710] + - k[5995]; - data[jistart + 830] = 0.0 + k[780]*y_cur[IDX_eM] + - k[6466]*y_cur[IDX_GRAINM]; - data[jistart + 831] = 0.0 + k[4918]*y_cur[IDX_CI] + k[5712] + - k[5997]; - data[jistart + 832] = 0.0 + k[3093]*y_cur[IDX_HeII] + k[5715] + - k[5999]; - data[jistart + 833] = 0.0 + k[787]*y_cur[IDX_eM] + - k[6675]*y_cur[IDX_GRAINM]; - data[jistart + 834] = 0.0 + k[3095]*y_cur[IDX_HeII] + - k[5231]*y_cur[IDX_NI] + k[5356]*y_cur[IDX_OI] + k[5717] + k[6001]; - data[jistart + 835] = 0.0 + k[788]*y_cur[IDX_eM] + - k[6455]*y_cur[IDX_GRAINM]; - data[jistart + 836] = 0.0 + k[3392]*y_cur[IDX_NI]; - data[jistart + 837] = 0.0 + k[791]*y_cur[IDX_eM] + - k[3398]*y_cur[IDX_NI] + k[6461]*y_cur[IDX_GRAINM]; - data[jistart + 838] = 0.0 + k[5722] + k[6006]; - data[jistart + 839] = 0.0 + k[814]*y_cur[IDX_eM] + + data[jistart + 2073] = 0.0 + k[1846]*y_cur[IDX_CI]; + data[jistart + 2074] = 0.0 + k[1297]*y_cur[IDX_CII]; + data[jistart + 2075] = 0.0 + k[1298]*y_cur[IDX_CII]; + data[jistart + 2076] = 0.0 + k[5495]*y_cur[IDX_CII]; + data[jistart + 2077] = 0.0 + k[1297]*y_cur[IDX_C10H2I] + k[1298]*y_cur[IDX_C10HI] + + k[5495]*y_cur[IDX_C10I]; + data[jistart + 2078] = 0.0 + k[1846]*y_cur[IDX_C10HII] + k[1848]*y_cur[IDX_C10H2II]; + data[jistart + 2079] = 0.0 - k[6884]*y_cur[IDX_C11II] - k[6885]*y_cur[IDX_C11II] - + k[6886]*y_cur[IDX_C11II] - k[6887]*y_cur[IDX_C11II]; + data[jistart + 2080] = 0.0 - k[735]*y_cur[IDX_C11II] - k[736]*y_cur[IDX_C11II] - + k[737]*y_cur[IDX_C11II] - k[738]*y_cur[IDX_C11II]; + data[jistart + 2081] = 0.0 - k[814]*y_cur[IDX_eM] - k[2409]*y_cur[IDX_H2I] - k[6626]*y_cur[IDX_GRAINM]; - data[jistart + 840] = 0.0 + k[5723] + k[6007]; - data[jistart + 841] = 0.0 + k[815]*y_cur[IDX_eM] + - k[6644]*y_cur[IDX_GRAINM]; - data[jistart + 842] = 0.0 + k[6008]; - data[jistart + 843] = 0.0 + k[3103]*y_cur[IDX_HeII] + k[5725] + - k[6009]; - data[jistart + 844] = 0.0 + k[818]*y_cur[IDX_eM] + - k[6777]*y_cur[IDX_GRAINM]; - data[jistart + 845] = 0.0 + k[3105]*y_cur[IDX_HeII] + - k[4923]*y_cur[IDX_CI] + k[5727] + k[5727] + k[6011] + k[6011]; - data[jistart + 846] = 0.0 + k[819]*y_cur[IDX_eM] + - k[819]*y_cur[IDX_eM] + k[6615]*y_cur[IDX_GRAINM] + - k[6615]*y_cur[IDX_GRAINM]; - data[jistart + 847] = 0.0 - k[22]*y_cur[IDX_C2I]; - data[jistart + 848] = 0.0 + k[3111]*y_cur[IDX_HeII] + k[5731] + - k[6016]; - data[jistart + 849] = 0.0 - k[4872]*y_cur[IDX_C2I]; - data[jistart + 850] = 0.0 + k[3994]*y_cur[IDX_C2M]; - data[jistart + 851] = 0.0 + k[3995]*y_cur[IDX_C2M]; - data[jistart + 852] = 0.0 + k[831]*y_cur[IDX_eM] + - k[6740]*y_cur[IDX_GRAINM]; - data[jistart + 853] = 0.0 + k[3113]*y_cur[IDX_HeII]; - data[jistart + 854] = 0.0 + k[834]*y_cur[IDX_eM] + - k[6810]*y_cur[IDX_GRAINM]; - data[jistart + 855] = 0.0 + k[835]*y_cur[IDX_eM] + - k[3996]*y_cur[IDX_C2M] + k[6815]*y_cur[IDX_GRAINM]; - data[jistart + 856] = 0.0 + k[3117]*y_cur[IDX_HeII] + k[5737] + - k[6023]; - data[jistart + 857] = 0.0 + k[838]*y_cur[IDX_eM] + - k[6709]*y_cur[IDX_GRAINM]; - data[jistart + 858] = 0.0 - k[27]*y_cur[IDX_C2I] + - k[3409]*y_cur[IDX_NI]; - data[jistart + 859] = 0.0 + k[3122]*y_cur[IDX_HeII] + k[5743] + - k[6028]; - data[jistart + 860] = 0.0 + k[847]*y_cur[IDX_eM] + - k[6784]*y_cur[IDX_GRAINM]; - data[jistart + 861] = 0.0 + k[3125]*y_cur[IDX_HeII] + - k[4930]*y_cur[IDX_CI]; - data[jistart + 862] = 0.0 + k[848]*y_cur[IDX_eM] + - k[6780]*y_cur[IDX_GRAINM]; - data[jistart + 863] = 0.0 - k[31]*y_cur[IDX_C2I]; - data[jistart + 864] = 0.0 + k[3132]*y_cur[IDX_HeII]; - data[jistart + 865] = 0.0 + k[3134]*y_cur[IDX_HeII]; - data[jistart + 866] = 0.0 + k[864]*y_cur[IDX_eM] + - k[6822]*y_cur[IDX_GRAINM]; - data[jistart + 867] = 0.0 - k[34]*y_cur[IDX_C2I] + - k[3426]*y_cur[IDX_NI]; - data[jistart + 868] = 0.0 + k[3139]*y_cur[IDX_HeII]; - data[jistart + 869] = 0.0 + k[876]*y_cur[IDX_eM] + - k[6840]*y_cur[IDX_GRAINM]; - data[jistart + 870] = 0.0 + k[3142]*y_cur[IDX_HeII] + - k[4938]*y_cur[IDX_CI]; - data[jistart + 871] = 0.0 + k[877]*y_cur[IDX_eM] + - k[6836]*y_cur[IDX_GRAINM]; - data[jistart + 872] = 0.0 - k[36]*y_cur[IDX_C2I]; - data[jistart + 873] = 0.0 + k[3147]*y_cur[IDX_HeII]; - data[jistart + 874] = 0.0 + k[3149]*y_cur[IDX_HeII]; - data[jistart + 875] = 0.0 + k[889]*y_cur[IDX_eM] + - k[6855]*y_cur[IDX_GRAINM]; - data[jistart + 876] = 0.0 + k[3154]*y_cur[IDX_HeII]; - data[jistart + 877] = 0.0 + k[901]*y_cur[IDX_eM] + - k[6875]*y_cur[IDX_GRAINM]; - data[jistart + 878] = 0.0 + k[1341]*y_cur[IDX_CII] + - k[3158]*y_cur[IDX_HeII] + k[5773] + k[6070]; - data[jistart + 879] = 0.0 + k[903]*y_cur[IDX_eM] + - k[6663]*y_cur[IDX_GRAINM]; - data[jistart + 880] = 0.0 + k[287]*y_cur[IDX_C2II] + - k[2240]*y_cur[IDX_C2HII] + k[4955]*y_cur[IDX_CI]; - data[jistart + 881] = 0.0 - k[1933]*y_cur[IDX_C2I]; - data[jistart + 882] = 0.0 + k[259]*y_cur[IDX_C2II] + - k[1996]*y_cur[IDX_C2HII]; - data[jistart + 883] = 0.0 + k[3997]*y_cur[IDX_C2M]; - data[jistart + 884] = 0.0 + k[918]*y_cur[IDX_eM] + - k[6492]*y_cur[IDX_GRAINM]; - data[jistart + 885] = 0.0 - k[2041]*y_cur[IDX_C2I] + - k[3998]*y_cur[IDX_C2M]; - data[jistart + 886] = 0.0 - k[4870]*y_cur[IDX_C2I]; - data[jistart + 887] = 0.0 - k[4871]*y_cur[IDX_C2I]; - data[jistart + 888] = 0.0 - k[2217]*y_cur[IDX_C2I]; - data[jistart + 889] = 0.0 + k[4956]*y_cur[IDX_CI] + - k[5113]*y_cur[IDX_CNI] + k[5113]*y_cur[IDX_CNI]; - data[jistart + 890] = 0.0 - k[208]*y_cur[IDX_C2I]; - data[jistart + 891] = 0.0 + k[978]*y_cur[IDX_eM] + - k[3999]*y_cur[IDX_C2M] + k[6468]*y_cur[IDX_GRAINM]; - data[jistart + 892] = 0.0 + k[4957]*y_cur[IDX_CI]; - data[jistart + 893] = 0.0 - k[209]*y_cur[IDX_C2I] + - k[1743]*y_cur[IDX_C2HI]; - data[jistart + 894] = 0.0 + k[4958]*y_cur[IDX_CI]; - data[jistart + 895] = 0.0 + k[4000]*y_cur[IDX_C2M]; - data[jistart + 896] = 0.0 + k[8654]*y_cur[IDX_GCI] + - k[8654]*y_cur[IDX_GCI]; - data[jistart + 897] = 0.0 + k[7089] + k[7271] + k[7453]; - data[jistart + 898] = 0.0 + k[6354]*y_cur[IDX_C2HII] + - k[6356]*y_cur[IDX_C2H2II] + k[6360]*y_cur[IDX_C2H3II] + - k[6361]*y_cur[IDX_C2H3II] + k[6455]*y_cur[IDX_C3II] + - k[6461]*y_cur[IDX_C3H2II] + k[6466]*y_cur[IDX_C2NII] + - k[6468]*y_cur[IDX_CNCII] + k[6492]*y_cur[IDX_CH2COII] + - k[6615]*y_cur[IDX_C4II] + k[6615]*y_cur[IDX_C4II] + - k[6626]*y_cur[IDX_C3NII] + k[6631]*y_cur[IDX_HC3NII] + - k[6642]*y_cur[IDX_SiC2II] + k[6644]*y_cur[IDX_C3OII] + - k[6663]*y_cur[IDX_CCPII] + k[6675]*y_cur[IDX_C2SII] + - k[6709]*y_cur[IDX_C5II] + k[6740]*y_cur[IDX_C4NII] + - k[6747]*y_cur[IDX_SiC3II] + k[6777]*y_cur[IDX_C3SII] + - k[6780]*y_cur[IDX_C6II] + k[6784]*y_cur[IDX_C5NII] + - k[6798]*y_cur[IDX_SiC4II] + k[6810]*y_cur[IDX_C4PII] + - k[6815]*y_cur[IDX_C4SII] + k[6822]*y_cur[IDX_C7II] + - k[6836]*y_cur[IDX_C8II] + k[6840]*y_cur[IDX_C7NII] + - k[6855]*y_cur[IDX_C9II] + k[6869]*y_cur[IDX_C10II] + - k[6875]*y_cur[IDX_C9NII] + k[6887]*y_cur[IDX_C11II]; - data[jistart + 899] = 0.0 - k[5153]*y_cur[IDX_C2I]; - data[jistart + 900] = 0.0 - k[323]*y_cur[IDX_C2I] + - k[4001]*y_cur[IDX_C2M]; - data[jistart + 901] = 0.0 - k[66]*y_cur[IDX_C2I]; - data[jistart + 902] = 0.0 - k[436]*y_cur[IDX_C2I] - - k[2369]*y_cur[IDX_C2I]; - data[jistart + 903] = 0.0 + k[1469]*y_cur[IDX_C2HII]; - data[jistart + 904] = 0.0 - k[1457]*y_cur[IDX_C2I] + - k[4002]*y_cur[IDX_C2M]; - data[jistart + 905] = 0.0 - k[462]*y_cur[IDX_C2I] - - k[2503]*y_cur[IDX_C2I]; - data[jistart + 906] = 0.0 + k[4003]*y_cur[IDX_C2M]; - data[jistart + 907] = 0.0 - k[2586]*y_cur[IDX_C2I] + - k[4004]*y_cur[IDX_C2M]; - data[jistart + 908] = 0.0 - k[2766]*y_cur[IDX_C2I] + - k[4005]*y_cur[IDX_C2M]; - data[jistart + 909] = 0.0 + k[4006]*y_cur[IDX_C2M]; - data[jistart + 910] = 0.0 + k[1472]*y_cur[IDX_C2HII]; - data[jistart + 911] = 0.0 + k[1065]*y_cur[IDX_eM] + - k[6631]*y_cur[IDX_GRAINM]; - data[jistart + 912] = 0.0 + k[1476]*y_cur[IDX_C2HII] - - k[4873]*y_cur[IDX_C2I]; - data[jistart + 913] = 0.0 - k[1458]*y_cur[IDX_C2I]; - data[jistart + 914] = 0.0 + k[4007]*y_cur[IDX_C2M] + - k[4008]*y_cur[IDX_C2M]; - data[jistart + 915] = 0.0 + k[205]*y_cur[IDX_C2II]; - data[jistart + 916] = 0.0 - k[1459]*y_cur[IDX_C2I] + - k[4009]*y_cur[IDX_C2M] + k[4010]*y_cur[IDX_C2M]; - data[jistart + 917] = 0.0 + k[1478]*y_cur[IDX_C2HII]; - data[jistart + 918] = 0.0 - k[1460]*y_cur[IDX_C2I]; - data[jistart + 919] = 0.0 - k[508]*y_cur[IDX_C2I] + - k[3060]*y_cur[IDX_C10I] + k[3067]*y_cur[IDX_C10HI] + - k[3070]*y_cur[IDX_C10HI] - k[3073]*y_cur[IDX_C2I] + - k[3093]*y_cur[IDX_C2SI] + k[3095]*y_cur[IDX_C3I] + - k[3103]*y_cur[IDX_C3SI] + k[3105]*y_cur[IDX_C4I] + - k[3111]*y_cur[IDX_C4HI] + k[3113]*y_cur[IDX_C4PI] + - k[3117]*y_cur[IDX_C5I] + k[3122]*y_cur[IDX_C5HI] + - k[3125]*y_cur[IDX_C6I] + k[3132]*y_cur[IDX_C6HI] + - k[3134]*y_cur[IDX_C7I] + k[3139]*y_cur[IDX_C7HI] + - k[3142]*y_cur[IDX_C8I] + k[3147]*y_cur[IDX_C8HI] + - k[3149]*y_cur[IDX_C9I] + k[3154]*y_cur[IDX_C9HI] + - k[3158]*y_cur[IDX_CCPI] + k[3307]*y_cur[IDX_SiC2I] + - k[4011]*y_cur[IDX_C2M]; - data[jistart + 920] = 0.0 + k[4012]*y_cur[IDX_C2M]; - data[jistart + 921] = 0.0 + k[3392]*y_cur[IDX_C3M] + - k[3398]*y_cur[IDX_C3H2II] + k[3409]*y_cur[IDX_C5M] + - k[3426]*y_cur[IDX_C7M] - k[5222]*y_cur[IDX_C2I] + - k[5231]*y_cur[IDX_C3I]; - data[jistart + 922] = 0.0 - k[542]*y_cur[IDX_C2I] + - k[4013]*y_cur[IDX_C2M]; - data[jistart + 923] = 0.0 - k[210]*y_cur[IDX_C2I]; - data[jistart + 924] = 0.0 - k[1461]*y_cur[IDX_C2I] + - k[4014]*y_cur[IDX_C2M]; - data[jistart + 925] = 0.0 - k[3477]*y_cur[IDX_C2I] - - k[3478]*y_cur[IDX_C2I] - k[3479]*y_cur[IDX_C2I]; - data[jistart + 926] = 0.0 + k[585]*y_cur[IDX_C2II] + - k[3529]*y_cur[IDX_C2HII]; - data[jistart + 927] = 0.0 - k[3507]*y_cur[IDX_C2I]; - data[jistart + 928] = 0.0 + k[3554]*y_cur[IDX_C2HII]; - data[jistart + 929] = 0.0 - k[3548]*y_cur[IDX_C2I] + - k[4015]*y_cur[IDX_C2M]; - data[jistart + 930] = 0.0 + k[4016]*y_cur[IDX_C2M]; - data[jistart + 931] = 0.0 + k[206]*y_cur[IDX_C2II]; - data[jistart + 932] = 0.0 + k[4017]*y_cur[IDX_C2M]; - data[jistart + 933] = 0.0 + k[4018]*y_cur[IDX_C2M]; - data[jistart + 934] = 0.0 - k[5343]*y_cur[IDX_C2I] + - k[5356]*y_cur[IDX_C3I]; - data[jistart + 935] = 0.0 - k[646]*y_cur[IDX_C2I] - - k[3631]*y_cur[IDX_C2I] + k[4019]*y_cur[IDX_C2M]; - data[jistart + 936] = 0.0 - k[4874]*y_cur[IDX_C2I]; - data[jistart + 937] = 0.0 - k[211]*y_cur[IDX_C2I] - - k[1462]*y_cur[IDX_C2I]; - data[jistart + 938] = 0.0 - k[1463]*y_cur[IDX_C2I]; - data[jistart + 939] = 0.0 - k[4875]*y_cur[IDX_C2I]; - data[jistart + 940] = 0.0 + k[697]*y_cur[IDX_C2II]; - data[jistart + 941] = 0.0 - k[685]*y_cur[IDX_C2I] - - k[3769]*y_cur[IDX_C2I]; - data[jistart + 942] = 0.0 + k[207]*y_cur[IDX_C2II] - - k[4876]*y_cur[IDX_C2I]; - data[jistart + 943] = 0.0 - k[1464]*y_cur[IDX_C2I] + - k[4020]*y_cur[IDX_C2M]; - data[jistart + 944] = 0.0 + k[4021]*y_cur[IDX_C2M]; - data[jistart + 945] = 0.0 + k[4022]*y_cur[IDX_C2M]; - data[jistart + 946] = 0.0 + k[1434]*y_cur[IDX_CII]; - data[jistart + 947] = 0.0 + k[3307]*y_cur[IDX_HeII] + k[6260]; - data[jistart + 948] = 0.0 + k[1224]*y_cur[IDX_eM] + - k[6642]*y_cur[IDX_GRAINM]; - data[jistart + 949] = 0.0 + k[6263]; - data[jistart + 950] = 0.0 + k[1233]*y_cur[IDX_eM] + - k[6747]*y_cur[IDX_GRAINM]; - data[jistart + 951] = 0.0 + k[5923]; - data[jistart + 952] = 0.0 + k[1238]*y_cur[IDX_eM] + - k[6798]*y_cur[IDX_GRAINM]; - data[jistart + 953] = 0.0 - k[1465]*y_cur[IDX_C2I] + - k[4023]*y_cur[IDX_C2M]; - data[jistart + 954] = 0.0 + k[4024]*y_cur[IDX_C2M]; - data[jistart + 955] = 0.0 + k[4025]*y_cur[IDX_C2M]; - data[jistart + 956] = 0.0 + k[727]*y_cur[IDX_C10II] + - k[738]*y_cur[IDX_C11II] + k[740]*y_cur[IDX_C2HII] + - k[742]*y_cur[IDX_C2H2II] + k[745]*y_cur[IDX_C2H3II] + - k[746]*y_cur[IDX_C2H3II] + k[780]*y_cur[IDX_C2NII] + - k[787]*y_cur[IDX_C2SII] + k[788]*y_cur[IDX_C3II] + - k[791]*y_cur[IDX_C3H2II] + k[814]*y_cur[IDX_C3NII] + - k[815]*y_cur[IDX_C3OII] + k[818]*y_cur[IDX_C3SII] + - k[819]*y_cur[IDX_C4II] + k[819]*y_cur[IDX_C4II] + - k[831]*y_cur[IDX_C4NII] + k[834]*y_cur[IDX_C4PII] + - k[835]*y_cur[IDX_C4SII] + k[838]*y_cur[IDX_C5II] + - k[847]*y_cur[IDX_C5NII] + k[848]*y_cur[IDX_C6II] + - k[864]*y_cur[IDX_C7II] + k[876]*y_cur[IDX_C7NII] + - k[877]*y_cur[IDX_C8II] + k[889]*y_cur[IDX_C9II] + - k[901]*y_cur[IDX_C9NII] + k[903]*y_cur[IDX_CCPII] + - k[918]*y_cur[IDX_CH2COII] + k[978]*y_cur[IDX_CNCII] + - k[1065]*y_cur[IDX_HC3NII] + k[1224]*y_cur[IDX_SiC2II] + - k[1233]*y_cur[IDX_SiC3II] + k[1238]*y_cur[IDX_SiC4II] - - k[5589]*y_cur[IDX_C2I]; - data[jistart + 957] = 0.0 - k[244]*y_cur[IDX_C2II] + - k[1890]*y_cur[IDX_CHII] + k[5503]*y_cur[IDX_CII]; - data[jistart + 958] = 0.0 + k[1385]*y_cur[IDX_CHI] + - k[5503]*y_cur[IDX_CI]; - data[jistart + 959] = 0.0 + k[208]*y_cur[IDX_CNII] + - k[209]*y_cur[IDX_COII] + k[210]*y_cur[IDX_N2II] + - k[211]*y_cur[IDX_O2II] + k[323]*y_cur[IDX_HII] + - k[436]*y_cur[IDX_H2II] + k[462]*y_cur[IDX_H2OII] + - k[508]*y_cur[IDX_HeII] + k[542]*y_cur[IDX_NII] + - k[646]*y_cur[IDX_OII] + k[685]*y_cur[IDX_OHII] - - k[1451]*y_cur[IDX_C2II] + k[5977]; - data[jistart + 960] = 0.0 - k[205]*y_cur[IDX_HCOI] - - k[206]*y_cur[IDX_NOI] - k[207]*y_cur[IDX_SI] - k[244]*y_cur[IDX_CI] - - k[259]*y_cur[IDX_CH2I] - k[287]*y_cur[IDX_CHI] - - k[585]*y_cur[IDX_NH2I] - k[697]*y_cur[IDX_OHI] - - k[739]*y_cur[IDX_eM] - k[1451]*y_cur[IDX_C2I] - - k[1452]*y_cur[IDX_C2H2I] - k[1453]*y_cur[IDX_HCNI] - - k[1454]*y_cur[IDX_HCOI] - k[1455]*y_cur[IDX_O2I] - - k[1456]*y_cur[IDX_SI] - k[1995]*y_cur[IDX_CH2I] - - k[2146]*y_cur[IDX_CH4I] - k[2147]*y_cur[IDX_CH4I] - - k[2148]*y_cur[IDX_CH4I] - k[2149]*y_cur[IDX_CH4I] - - k[2150]*y_cur[IDX_CH4I] - k[2239]*y_cur[IDX_CHI] - - k[2401]*y_cur[IDX_H2I] - k[2519]*y_cur[IDX_H2OI] - - k[2520]*y_cur[IDX_H2OI] - k[3383]*y_cur[IDX_NI] - - k[3528]*y_cur[IDX_NH2I] - k[3605]*y_cur[IDX_NHI] - - k[3606]*y_cur[IDX_NHI] - k[3684]*y_cur[IDX_OI] - k[5975] - - k[6352]*y_cur[IDX_GRAINM]; - data[jistart + 961] = 0.0 + k[2299]*y_cur[IDX_HII] + - k[3086]*y_cur[IDX_HeII]; - data[jistart + 962] = 0.0 + k[5979]; - data[jistart + 963] = 0.0 - k[1452]*y_cur[IDX_C2II] + - k[3074]*y_cur[IDX_HeII]; - data[jistart + 964] = 0.0 + k[3094]*y_cur[IDX_HeII]; - data[jistart + 965] = 0.0 + k[3098]*y_cur[IDX_HeII]; - data[jistart + 966] = 0.0 + k[3100]*y_cur[IDX_HeII]; - data[jistart + 967] = 0.0 + k[3104]*y_cur[IDX_HeII]; - data[jistart + 968] = 0.0 + k[3105]*y_cur[IDX_HeII]; - data[jistart + 969] = 0.0 + k[3114]*y_cur[IDX_HeII]; - data[jistart + 970] = 0.0 - k[287]*y_cur[IDX_C2II] + - k[1385]*y_cur[IDX_CII] + k[1943]*y_cur[IDX_CHII] - - k[2239]*y_cur[IDX_C2II]; - data[jistart + 971] = 0.0 + k[1890]*y_cur[IDX_CI] + - k[1943]*y_cur[IDX_CHI]; - data[jistart + 972] = 0.0 - k[259]*y_cur[IDX_C2II] - - k[1995]*y_cur[IDX_C2II]; - data[jistart + 973] = 0.0 - k[2146]*y_cur[IDX_C2II] - - k[2147]*y_cur[IDX_C2II] - k[2148]*y_cur[IDX_C2II] - - k[2149]*y_cur[IDX_C2II] - k[2150]*y_cur[IDX_C2II]; - data[jistart + 974] = 0.0 + k[208]*y_cur[IDX_C2I]; - data[jistart + 975] = 0.0 + k[209]*y_cur[IDX_C2I]; - data[jistart + 976] = 0.0 - k[6352]*y_cur[IDX_C2II]; - data[jistart + 977] = 0.0 + k[323]*y_cur[IDX_C2I] + - k[2299]*y_cur[IDX_C2HI]; - data[jistart + 978] = 0.0 - k[2401]*y_cur[IDX_C2II]; - data[jistart + 979] = 0.0 + k[436]*y_cur[IDX_C2I]; - data[jistart + 980] = 0.0 - k[2519]*y_cur[IDX_C2II] - - k[2520]*y_cur[IDX_C2II]; - data[jistart + 981] = 0.0 + k[462]*y_cur[IDX_C2I]; - data[jistart + 982] = 0.0 - k[1453]*y_cur[IDX_C2II]; - data[jistart + 983] = 0.0 - k[205]*y_cur[IDX_C2II] - - k[1454]*y_cur[IDX_C2II]; - data[jistart + 984] = 0.0 + k[3030]*y_cur[IDX_HeII]; - data[jistart + 985] = 0.0 + k[508]*y_cur[IDX_C2I] + - k[3030]*y_cur[IDX_HNC3I] + k[3074]*y_cur[IDX_C2H2I] + - k[3086]*y_cur[IDX_C2HI] + k[3094]*y_cur[IDX_C2SI] + - k[3098]*y_cur[IDX_C3NI] + k[3100]*y_cur[IDX_C3OI] + - k[3104]*y_cur[IDX_C3SI] + k[3105]*y_cur[IDX_C4I] + - k[3114]*y_cur[IDX_C4PI]; - data[jistart + 986] = 0.0 - k[3383]*y_cur[IDX_C2II]; - data[jistart + 987] = 0.0 + k[542]*y_cur[IDX_C2I]; - data[jistart + 988] = 0.0 + k[210]*y_cur[IDX_C2I]; - data[jistart + 989] = 0.0 - k[3605]*y_cur[IDX_C2II] - - k[3606]*y_cur[IDX_C2II]; - data[jistart + 990] = 0.0 - k[585]*y_cur[IDX_C2II] - - k[3528]*y_cur[IDX_C2II]; - data[jistart + 991] = 0.0 - k[206]*y_cur[IDX_C2II]; - data[jistart + 992] = 0.0 - k[3684]*y_cur[IDX_C2II]; - data[jistart + 993] = 0.0 + k[646]*y_cur[IDX_C2I]; - data[jistart + 994] = 0.0 - k[1455]*y_cur[IDX_C2II]; - data[jistart + 995] = 0.0 + k[211]*y_cur[IDX_C2I]; - data[jistart + 996] = 0.0 - k[697]*y_cur[IDX_C2II]; - data[jistart + 997] = 0.0 + k[685]*y_cur[IDX_C2I]; - data[jistart + 998] = 0.0 - k[207]*y_cur[IDX_C2II] - - k[1456]*y_cur[IDX_C2II]; - data[jistart + 999] = 0.0 - k[739]*y_cur[IDX_C2II]; - data[jistart + 1000] = 0.0 - k[38]*y_cur[IDX_C2M]; - data[jistart + 1001] = 0.0 - k[3991]*y_cur[IDX_C2M]; - data[jistart + 1002] = 0.0 - k[10]*y_cur[IDX_C2M] + - k[5589]*y_cur[IDX_eM]; - data[jistart + 1003] = 0.0 - k[10]*y_cur[IDX_C2I] - - k[11]*y_cur[IDX_C3I] - k[12]*y_cur[IDX_C4I] - k[13]*y_cur[IDX_C5I] - - k[14]*y_cur[IDX_C6I] - k[15]*y_cur[IDX_C7I] - k[16]*y_cur[IDX_C8I] - - k[38]*y_cur[IDX_CI] - k[87]*y_cur[IDX_HI] - k[110]*y_cur[IDX_NI] - - k[128]*y_cur[IDX_OI] - k[3384]*y_cur[IDX_NI] - k[3685]*y_cur[IDX_OI] - - k[3991]*y_cur[IDX_CII] - k[3992]*y_cur[IDX_C2H2II] - - k[3993]*y_cur[IDX_C2H3II] - k[3994]*y_cur[IDX_C4H2II] - - k[3995]*y_cur[IDX_C4H3II] - k[3996]*y_cur[IDX_C4SII] - - k[3997]*y_cur[IDX_CH2CCHII] - k[3998]*y_cur[IDX_CH3II] - - k[3999]*y_cur[IDX_CNCII] - k[4000]*y_cur[IDX_FeII] - - k[4001]*y_cur[IDX_HII] - k[4002]*y_cur[IDX_H2COII] - - k[4003]*y_cur[IDX_H2SII] - k[4004]*y_cur[IDX_H3II] - - k[4005]*y_cur[IDX_H3OII] - k[4006]*y_cur[IDX_HC2SII] - - k[4007]*y_cur[IDX_HCNHII] - k[4008]*y_cur[IDX_HCNHII] - - k[4009]*y_cur[IDX_HCOII] - k[4010]*y_cur[IDX_HCOII] - - k[4011]*y_cur[IDX_HeII] - k[4012]*y_cur[IDX_MgII] - - k[4013]*y_cur[IDX_NII] - k[4014]*y_cur[IDX_N2HII] - - k[4015]*y_cur[IDX_NH3II] - k[4016]*y_cur[IDX_NH4II] - - k[4017]*y_cur[IDX_NOII] - k[4018]*y_cur[IDX_NaII] - - k[4019]*y_cur[IDX_OII] - k[4020]*y_cur[IDX_SII] - - k[4021]*y_cur[IDX_SOII] - k[4022]*y_cur[IDX_SiII] - - k[4023]*y_cur[IDX_SiOII] - k[4024]*y_cur[IDX_SiOHII] - - k[4025]*y_cur[IDX_SiSII] - k[5693] - k[5976]; - data[jistart + 1004] = 0.0 - k[3992]*y_cur[IDX_C2M]; - data[jistart + 1005] = 0.0 - k[3993]*y_cur[IDX_C2M]; - data[jistart + 1006] = 0.0 - k[11]*y_cur[IDX_C2M]; - data[jistart + 1007] = 0.0 + k[3393]*y_cur[IDX_NI] + - k[3693]*y_cur[IDX_OI]; - data[jistart + 1008] = 0.0 - k[12]*y_cur[IDX_C2M]; - data[jistart + 1009] = 0.0 - k[3994]*y_cur[IDX_C2M]; - data[jistart + 1010] = 0.0 - k[3995]*y_cur[IDX_C2M]; - data[jistart + 1011] = 0.0 - k[3996]*y_cur[IDX_C2M]; - data[jistart + 1012] = 0.0 - k[13]*y_cur[IDX_C2M]; - data[jistart + 1013] = 0.0 - k[14]*y_cur[IDX_C2M]; - data[jistart + 1014] = 0.0 - k[15]*y_cur[IDX_C2M]; - data[jistart + 1015] = 0.0 - k[16]*y_cur[IDX_C2M]; - data[jistart + 1016] = 0.0 - k[3997]*y_cur[IDX_C2M]; - data[jistart + 1017] = 0.0 - k[3998]*y_cur[IDX_C2M]; - data[jistart + 1018] = 0.0 - k[3999]*y_cur[IDX_C2M]; - data[jistart + 1019] = 0.0 - k[4000]*y_cur[IDX_C2M]; - data[jistart + 1020] = 0.0 - k[87]*y_cur[IDX_C2M]; - data[jistart + 1021] = 0.0 - k[4001]*y_cur[IDX_C2M]; - data[jistart + 1022] = 0.0 - k[4002]*y_cur[IDX_C2M]; - data[jistart + 1023] = 0.0 - k[4003]*y_cur[IDX_C2M]; - data[jistart + 1024] = 0.0 - k[4004]*y_cur[IDX_C2M]; - data[jistart + 1025] = 0.0 - k[4005]*y_cur[IDX_C2M]; - data[jistart + 1026] = 0.0 - k[4006]*y_cur[IDX_C2M]; - data[jistart + 1027] = 0.0 - k[4007]*y_cur[IDX_C2M] - - k[4008]*y_cur[IDX_C2M]; - data[jistart + 1028] = 0.0 - k[4009]*y_cur[IDX_C2M] - - k[4010]*y_cur[IDX_C2M]; - data[jistart + 1029] = 0.0 - k[4011]*y_cur[IDX_C2M]; - data[jistart + 1030] = 0.0 - k[4012]*y_cur[IDX_C2M]; - data[jistart + 1031] = 0.0 - k[110]*y_cur[IDX_C2M] - - k[3384]*y_cur[IDX_C2M] + k[3393]*y_cur[IDX_C3M]; - data[jistart + 1032] = 0.0 - k[4013]*y_cur[IDX_C2M]; - data[jistart + 1033] = 0.0 - k[4014]*y_cur[IDX_C2M]; - data[jistart + 1034] = 0.0 - k[4015]*y_cur[IDX_C2M]; - data[jistart + 1035] = 0.0 - k[4016]*y_cur[IDX_C2M]; - data[jistart + 1036] = 0.0 - k[4017]*y_cur[IDX_C2M]; - data[jistart + 1037] = 0.0 - k[4018]*y_cur[IDX_C2M]; - data[jistart + 1038] = 0.0 - k[128]*y_cur[IDX_C2M] - - k[3685]*y_cur[IDX_C2M] + k[3693]*y_cur[IDX_C3M]; - data[jistart + 1039] = 0.0 - k[4019]*y_cur[IDX_C2M]; - data[jistart + 1040] = 0.0 - k[4020]*y_cur[IDX_C2M]; - data[jistart + 1041] = 0.0 - k[4021]*y_cur[IDX_C2M]; - data[jistart + 1042] = 0.0 - k[4022]*y_cur[IDX_C2M]; - data[jistart + 1043] = 0.0 - k[4023]*y_cur[IDX_C2M]; - data[jistart + 1044] = 0.0 - k[4024]*y_cur[IDX_C2M]; - data[jistart + 1045] = 0.0 - k[4025]*y_cur[IDX_C2M]; - data[jistart + 1046] = 0.0 + k[5589]*y_cur[IDX_C2I]; - data[jistart + 1047] = 0.0 + k[55]*y_cur[IDX_CHM] - - k[4916]*y_cur[IDX_C2HI] + k[4944]*y_cur[IDX_CH2I] + - k[5202]*y_cur[IDX_HCNOI]; - data[jistart + 1048] = 0.0 - k[1308]*y_cur[IDX_C2HI] + - k[1317]*y_cur[IDX_C4H3I] + k[1364]*y_cur[IDX_CH3CCHI] + - k[1397]*y_cur[IDX_HC2PI] + k[1398]*y_cur[IDX_HC3NI] + - k[1402]*y_cur[IDX_C4H2I] + k[4026]*y_cur[IDX_C2HM]; - data[jistart + 1049] = 0.0 + k[2]*y_cur[IDX_CHI]; - data[jistart + 1050] = 0.0 + k[66]*y_cur[IDX_HM]; - data[jistart + 1051] = 0.0 + k[87]*y_cur[IDX_HI]; - data[jistart + 1052] = 0.0 - k[67]*y_cur[IDX_HM] - - k[241]*y_cur[IDX_CNII] - k[242]*y_cur[IDX_COII] - - k[243]*y_cur[IDX_N2II] - k[329]*y_cur[IDX_HII] - - k[439]*y_cur[IDX_H2II] - k[465]*y_cur[IDX_H2OII] - - k[543]*y_cur[IDX_NII] - k[649]*y_cur[IDX_OII] - - k[686]*y_cur[IDX_OHII] - k[1308]*y_cur[IDX_CII] - - k[1725]*y_cur[IDX_C2H2II] - k[1726]*y_cur[IDX_C2H3II] - - k[1727]*y_cur[IDX_C2H3II] - k[1728]*y_cur[IDX_C2H3II] - - k[1729]*y_cur[IDX_C2H4II] - k[1730]*y_cur[IDX_C2H4II] - - k[1731]*y_cur[IDX_C3H2II] - k[1732]*y_cur[IDX_C3H3II] - - k[1733]*y_cur[IDX_C3H3II] - k[1734]*y_cur[IDX_C4HII] - - k[1735]*y_cur[IDX_C4HII] - k[1736]*y_cur[IDX_C4H2II] - - k[1737]*y_cur[IDX_C4H3II] - k[1738]*y_cur[IDX_C5H2II] - - k[1739]*y_cur[IDX_C6H2II] - k[1740]*y_cur[IDX_C7H2II] - - k[1741]*y_cur[IDX_CH2CCHII] - k[1742]*y_cur[IDX_CH2CCHII] - - k[1743]*y_cur[IDX_COII] - k[1744]*y_cur[IDX_H2COII] - - k[1745]*y_cur[IDX_HCNII] - k[1746]*y_cur[IDX_HCOII] - - k[1747]*y_cur[IDX_HNOII] - k[1748]*y_cur[IDX_N2HII] - - k[1749]*y_cur[IDX_O2HII] - k[1750]*y_cur[IDX_SII] - - k[1751]*y_cur[IDX_SiII] - k[1935]*y_cur[IDX_CHII] - - k[1975]*y_cur[IDX_CH2II] - k[2048]*y_cur[IDX_CH3II] - - k[2049]*y_cur[IDX_CH3II] - k[2220]*y_cur[IDX_CH5II] - - k[2299]*y_cur[IDX_HII] - k[2373]*y_cur[IDX_H2II] - - k[2504]*y_cur[IDX_H2OII] - k[2597]*y_cur[IDX_H3II] - - k[3086]*y_cur[IDX_HeII] - k[3087]*y_cur[IDX_HeII] - - k[3088]*y_cur[IDX_HeII] - k[3480]*y_cur[IDX_NHII] - - k[3508]*y_cur[IDX_NH2II] - k[3634]*y_cur[IDX_OII] - - k[3770]*y_cur[IDX_OHII] - k[4888]*y_cur[IDX_C2H2I] - - k[4889]*y_cur[IDX_C3H2I] - k[4890]*y_cur[IDX_C5H2I] - - k[4891]*y_cur[IDX_C6H2I] - k[4892]*y_cur[IDX_C7H2I] - - k[4893]*y_cur[IDX_C8H2I] - k[4894]*y_cur[IDX_CH2CCH2I] - - k[4895]*y_cur[IDX_CH2CCH2I] - k[4896]*y_cur[IDX_CH3CCHI] - - k[4897]*y_cur[IDX_CH3CCHI] - k[4898]*y_cur[IDX_CH3CHCH2I] - - k[4899]*y_cur[IDX_CSI] - k[4900]*y_cur[IDX_C4H2I] - - k[4901]*y_cur[IDX_HCNI] - k[4902]*y_cur[IDX_HNCI] - - k[4903]*y_cur[IDX_NCCNI] - k[4904]*y_cur[IDX_O2I] - - k[4905]*y_cur[IDX_OCSI] - k[4906]*y_cur[IDX_SI] - - k[4916]*y_cur[IDX_CI] - k[5133]*y_cur[IDX_H2I] - - k[5228]*y_cur[IDX_NI] - k[5352]*y_cur[IDX_OI] - - k[5514]*y_cur[IDX_CNI] - k[5590]*y_cur[IDX_eM] - k[5708] - k[5709] - - k[5993] - k[5994] - k[6908]; - data[jistart + 1053] = 0.0 + k[212]*y_cur[IDX_NOI] + - k[213]*y_cur[IDX_SI]; - data[jistart + 1054] = 0.0 + k[4026]*y_cur[IDX_CII] + - k[4027]*y_cur[IDX_C2H2II] + k[4028]*y_cur[IDX_C2H3II] + - k[4029]*y_cur[IDX_C4H2II] + k[4030]*y_cur[IDX_C4H3II] + - k[4031]*y_cur[IDX_C4SII] + k[4032]*y_cur[IDX_CH2CCHII] + - k[4033]*y_cur[IDX_CH3II] + k[4034]*y_cur[IDX_CNCII] + - k[4035]*y_cur[IDX_FeII] + k[4036]*y_cur[IDX_HII] + - k[4037]*y_cur[IDX_H2COII] + k[4038]*y_cur[IDX_H2SII] + - k[4039]*y_cur[IDX_H3II] + k[4040]*y_cur[IDX_H3OII] + - k[4041]*y_cur[IDX_HC2SII] + k[4042]*y_cur[IDX_HCNHII] + - k[4043]*y_cur[IDX_HCNHII] + k[4044]*y_cur[IDX_HCOII] + - k[4045]*y_cur[IDX_HCOII] + k[4046]*y_cur[IDX_HeII] + - k[4047]*y_cur[IDX_MgII] + k[4048]*y_cur[IDX_NII] + - k[4049]*y_cur[IDX_N2HII] + k[4050]*y_cur[IDX_NH3II] + - k[4051]*y_cur[IDX_NH4II] + k[4052]*y_cur[IDX_NOII] + - k[4053]*y_cur[IDX_NaII] + k[4054]*y_cur[IDX_OII] + - k[4055]*y_cur[IDX_SII] + k[4056]*y_cur[IDX_SOII] + - k[4057]*y_cur[IDX_SiII] + k[4058]*y_cur[IDX_SiOII] + - k[4059]*y_cur[IDX_SiOHII] + k[4060]*y_cur[IDX_SiSII] + k[5695] + - k[5980]; - data[jistart + 1055] = 0.0 - k[4888]*y_cur[IDX_C2HI] + - k[5154]*y_cur[IDX_HI] + k[5453]*y_cur[IDX_OHI] + k[5697] + k[5982]; - data[jistart + 1056] = 0.0 + k[743]*y_cur[IDX_eM] + - k[1515]*y_cur[IDX_CH3CNI] + k[1518]*y_cur[IDX_H2SI] + - k[1523]*y_cur[IDX_HCNI] + k[1525]*y_cur[IDX_HNCI] - - k[1725]*y_cur[IDX_C2HI] + k[2522]*y_cur[IDX_H2OI] + - k[3531]*y_cur[IDX_NH2I] + k[3556]*y_cur[IDX_NH3I] + - k[4027]*y_cur[IDX_C2HM] + k[6357]*y_cur[IDX_GRAINM]; - data[jistart + 1057] = 0.0 + k[1577]*y_cur[IDX_C2H3II]; - data[jistart + 1058] = 0.0 + k[749]*y_cur[IDX_eM] + - k[750]*y_cur[IDX_eM] + k[751]*y_cur[IDX_eM] + k[752]*y_cur[IDX_eM] + - k[1577]*y_cur[IDX_C2H3I] - k[1726]*y_cur[IDX_C2HI] - - k[1727]*y_cur[IDX_C2HI] - k[1728]*y_cur[IDX_C2HI] + - k[4028]*y_cur[IDX_C2HM] + k[6364]*y_cur[IDX_GRAINM] + - k[6365]*y_cur[IDX_GRAINM] + k[6366]*y_cur[IDX_GRAINM] + - k[6367]*y_cur[IDX_GRAINM]; - data[jistart + 1059] = 0.0 + k[760]*y_cur[IDX_eM] - - k[1729]*y_cur[IDX_C2HI] - k[1730]*y_cur[IDX_C2HI] + - k[6384]*y_cur[IDX_GRAINM]; - data[jistart + 1060] = 0.0 + k[5357]*y_cur[IDX_OI]; - data[jistart + 1061] = 0.0 + k[789]*y_cur[IDX_eM] + - k[1755]*y_cur[IDX_C4H2I] + k[6459]*y_cur[IDX_GRAINM]; - data[jistart + 1062] = 0.0 + k[3395]*y_cur[IDX_NI]; - data[jistart + 1063] = 0.0 - k[4889]*y_cur[IDX_C2HI]; - data[jistart + 1064] = 0.0 - k[1731]*y_cur[IDX_C2HI] + - k[3695]*y_cur[IDX_OI]; - data[jistart + 1065] = 0.0 - k[1732]*y_cur[IDX_C2HI] - - k[1733]*y_cur[IDX_C2HI]; - data[jistart + 1066] = 0.0 + k[801]*y_cur[IDX_eM] + - k[6479]*y_cur[IDX_GRAINM]; - data[jistart + 1067] = 0.0 + k[5731] + k[6016]; - data[jistart + 1068] = 0.0 - k[1734]*y_cur[IDX_C2HI] - - k[1735]*y_cur[IDX_C2HI]; - data[jistart + 1069] = 0.0 + k[1402]*y_cur[IDX_CII] + - k[1755]*y_cur[IDX_C3HII] + k[2852]*y_cur[IDX_C5H2II] + - k[3238]*y_cur[IDX_HeII] - k[4900]*y_cur[IDX_C2HI] + k[5847] + - k[5847] + k[6172] + k[6172]; - data[jistart + 1070] = 0.0 + k[822]*y_cur[IDX_eM] + - k[822]*y_cur[IDX_eM] - k[1736]*y_cur[IDX_C2HI] + - k[4029]*y_cur[IDX_C2HM] + k[6627]*y_cur[IDX_GRAINM] + - k[6627]*y_cur[IDX_GRAINM]; - data[jistart + 1071] = 0.0 + k[1317]*y_cur[IDX_CII]; - data[jistart + 1072] = 0.0 - k[1737]*y_cur[IDX_C2HI] + - k[4030]*y_cur[IDX_C2HM]; - data[jistart + 1073] = 0.0 + k[4031]*y_cur[IDX_C2HM]; - data[jistart + 1074] = 0.0 + k[5742] + k[6027]; - data[jistart + 1075] = 0.0 + k[3119]*y_cur[IDX_HeII] - - k[4890]*y_cur[IDX_C2HI] + k[5740] + k[6025]; - data[jistart + 1076] = 0.0 - k[1738]*y_cur[IDX_C2HI] + - k[2852]*y_cur[IDX_C4H2I]; - data[jistart + 1077] = 0.0 + k[5753] + k[6040]; - data[jistart + 1078] = 0.0 + k[3127]*y_cur[IDX_HeII] - - k[4891]*y_cur[IDX_C2HI] + k[5750]; - data[jistart + 1079] = 0.0 - k[1739]*y_cur[IDX_C2HI]; - data[jistart + 1080] = 0.0 + k[3136]*y_cur[IDX_HeII] - - k[4892]*y_cur[IDX_C2HI]; - data[jistart + 1081] = 0.0 - k[1740]*y_cur[IDX_C2HI]; - data[jistart + 1082] = 0.0 + k[3144]*y_cur[IDX_HeII] - - k[4893]*y_cur[IDX_C2HI]; - data[jistart + 1083] = 0.0 + k[3151]*y_cur[IDX_HeII]; - data[jistart + 1084] = 0.0 + k[2]*y_cur[IDX_CM]; - data[jistart + 1085] = 0.0 - k[1935]*y_cur[IDX_C2HI]; - data[jistart + 1086] = 0.0 + k[55]*y_cur[IDX_CI]; - data[jistart + 1087] = 0.0 + k[4944]*y_cur[IDX_CI]; - data[jistart + 1088] = 0.0 - k[1975]*y_cur[IDX_C2HI]; - data[jistart + 1089] = 0.0 - k[1741]*y_cur[IDX_C2HI] - - k[1742]*y_cur[IDX_C2HI] + k[4032]*y_cur[IDX_C2HM]; - data[jistart + 1090] = 0.0 - k[4894]*y_cur[IDX_C2HI] - - k[4895]*y_cur[IDX_C2HI]; - data[jistart + 1091] = 0.0 - k[2048]*y_cur[IDX_C2HI] - - k[2049]*y_cur[IDX_C2HI] + k[4033]*y_cur[IDX_C2HM]; - data[jistart + 1092] = 0.0 + k[1364]*y_cur[IDX_CII] - - k[4896]*y_cur[IDX_C2HI] - k[4897]*y_cur[IDX_C2HI]; - data[jistart + 1093] = 0.0 - k[4898]*y_cur[IDX_C2HI]; - data[jistart + 1094] = 0.0 + k[1515]*y_cur[IDX_C2H2II]; - data[jistart + 1095] = 0.0 - k[2220]*y_cur[IDX_C2HI]; - data[jistart + 1096] = 0.0 - k[5514]*y_cur[IDX_C2HI]; - data[jistart + 1097] = 0.0 - k[241]*y_cur[IDX_C2HI]; - data[jistart + 1098] = 0.0 + k[4034]*y_cur[IDX_C2HM]; - data[jistart + 1099] = 0.0 - k[242]*y_cur[IDX_C2HI] - - k[1743]*y_cur[IDX_C2HI]; - data[jistart + 1100] = 0.0 - k[4899]*y_cur[IDX_C2HI]; - data[jistart + 1101] = 0.0 + k[4035]*y_cur[IDX_C2HM]; - data[jistart + 1102] = 0.0 + k[8655]*y_cur[IDX_GCHI]; - data[jistart + 1103] = 0.0 + k[8586]*y_cur[IDX_GHI]; - data[jistart + 1104] = 0.0 + k[7090] + k[7272] + k[7454]; - data[jistart + 1105] = 0.0 + k[8655]*y_cur[IDX_GCI]; - data[jistart + 1106] = 0.0 + k[8586]*y_cur[IDX_GC2I]; - data[jistart + 1107] = 0.0 + k[6357]*y_cur[IDX_C2H2II] + - k[6364]*y_cur[IDX_C2H3II] + k[6365]*y_cur[IDX_C2H3II] + - k[6366]*y_cur[IDX_C2H3II] + k[6367]*y_cur[IDX_C2H3II] + - k[6384]*y_cur[IDX_C2H4II] + k[6459]*y_cur[IDX_C3HII] + - k[6479]*y_cur[IDX_C3H4II] + k[6486]*y_cur[IDX_HC2OII] + - k[6627]*y_cur[IDX_C4H2II] + k[6627]*y_cur[IDX_C4H2II] + - k[6630]*y_cur[IDX_HC3NII] + k[6649]*y_cur[IDX_SiC2HII] + - k[6787]*y_cur[IDX_HC5NII] + k[6792]*y_cur[IDX_HC5NHII] + - k[6813]*y_cur[IDX_PC4HII] + k[6818]*y_cur[IDX_HC4SII]; - data[jistart + 1108] = 0.0 + k[87]*y_cur[IDX_C2M] + - k[5154]*y_cur[IDX_C2H2I]; - data[jistart + 1109] = 0.0 - k[329]*y_cur[IDX_C2HI] - - k[2299]*y_cur[IDX_C2HI] + k[3025]*y_cur[IDX_HNC3I] + - k[4036]*y_cur[IDX_C2HM]; - data[jistart + 1110] = 0.0 + k[66]*y_cur[IDX_C2I] - - k[67]*y_cur[IDX_C2HI]; - data[jistart + 1111] = 0.0 - k[5133]*y_cur[IDX_C2HI]; - data[jistart + 1112] = 0.0 - k[439]*y_cur[IDX_C2HI] - - k[2373]*y_cur[IDX_C2HI]; - data[jistart + 1113] = 0.0 - k[1744]*y_cur[IDX_C2HI] + - k[4037]*y_cur[IDX_C2HM]; - data[jistart + 1114] = 0.0 + k[2522]*y_cur[IDX_C2H2II]; - data[jistart + 1115] = 0.0 - k[465]*y_cur[IDX_C2HI] - - k[2504]*y_cur[IDX_C2HI]; - data[jistart + 1116] = 0.0 + k[1518]*y_cur[IDX_C2H2II]; - data[jistart + 1117] = 0.0 + k[4038]*y_cur[IDX_C2HM]; - data[jistart + 1118] = 0.0 - k[2597]*y_cur[IDX_C2HI] + - k[4039]*y_cur[IDX_C2HM]; - data[jistart + 1119] = 0.0 + k[4040]*y_cur[IDX_C2HM]; - data[jistart + 1120] = 0.0 + k[1055]*y_cur[IDX_eM] + - k[6486]*y_cur[IDX_GRAINM]; - data[jistart + 1121] = 0.0 + k[1397]*y_cur[IDX_CII]; - data[jistart + 1122] = 0.0 + k[4041]*y_cur[IDX_C2HM]; - data[jistart + 1123] = 0.0 + k[1398]*y_cur[IDX_CII] + k[5846] + - k[6171]; - data[jistart + 1124] = 0.0 + k[1064]*y_cur[IDX_eM] + - k[6630]*y_cur[IDX_GRAINM]; - data[jistart + 1125] = 0.0 + k[1074]*y_cur[IDX_eM] + - k[6818]*y_cur[IDX_GRAINM]; - data[jistart + 1126] = 0.0 + k[1077]*y_cur[IDX_eM] + - k[6787]*y_cur[IDX_GRAINM]; - data[jistart + 1127] = 0.0 + k[1080]*y_cur[IDX_eM] + - k[6792]*y_cur[IDX_GRAINM]; - data[jistart + 1128] = 0.0 + k[1523]*y_cur[IDX_C2H2II] - - k[4901]*y_cur[IDX_C2HI]; - data[jistart + 1129] = 0.0 - k[1745]*y_cur[IDX_C2HI]; - data[jistart + 1130] = 0.0 + k[4042]*y_cur[IDX_C2HM] + - k[4043]*y_cur[IDX_C2HM]; - data[jistart + 1131] = 0.0 + k[5202]*y_cur[IDX_CI]; - data[jistart + 1132] = 0.0 - k[1746]*y_cur[IDX_C2HI] + - k[4044]*y_cur[IDX_C2HM] + k[4045]*y_cur[IDX_C2HM]; - data[jistart + 1133] = 0.0 + k[1525]*y_cur[IDX_C2H2II] - - k[4902]*y_cur[IDX_C2HI]; - data[jistart + 1134] = 0.0 + k[3025]*y_cur[IDX_HII] + k[5866]; - data[jistart + 1135] = 0.0 - k[1747]*y_cur[IDX_C2HI]; - data[jistart + 1136] = 0.0 - k[3086]*y_cur[IDX_C2HI] - - k[3087]*y_cur[IDX_C2HI] - k[3088]*y_cur[IDX_C2HI] + - k[3119]*y_cur[IDX_C5H2I] + k[3127]*y_cur[IDX_C6H2I] + - k[3136]*y_cur[IDX_C7H2I] + k[3144]*y_cur[IDX_C8H2I] + - k[3151]*y_cur[IDX_C9H2I] + k[3238]*y_cur[IDX_C4H2I] + - k[3309]*y_cur[IDX_SiC2H2I] + k[3310]*y_cur[IDX_SiC2HI] + - k[4046]*y_cur[IDX_C2HM]; - data[jistart + 1137] = 0.0 + k[4047]*y_cur[IDX_C2HM]; - data[jistart + 1138] = 0.0 + k[3395]*y_cur[IDX_C3HM] - - k[5228]*y_cur[IDX_C2HI]; - data[jistart + 1139] = 0.0 - k[543]*y_cur[IDX_C2HI] + - k[4048]*y_cur[IDX_C2HM]; - data[jistart + 1140] = 0.0 - k[243]*y_cur[IDX_C2HI]; - data[jistart + 1141] = 0.0 - k[1748]*y_cur[IDX_C2HI] + - k[4049]*y_cur[IDX_C2HM]; - data[jistart + 1142] = 0.0 - k[4903]*y_cur[IDX_C2HI]; - data[jistart + 1143] = 0.0 - k[3480]*y_cur[IDX_C2HI]; - data[jistart + 1144] = 0.0 + k[3531]*y_cur[IDX_C2H2II]; - data[jistart + 1145] = 0.0 - k[3508]*y_cur[IDX_C2HI]; - data[jistart + 1146] = 0.0 + k[3556]*y_cur[IDX_C2H2II]; - data[jistart + 1147] = 0.0 + k[4050]*y_cur[IDX_C2HM]; - data[jistart + 1148] = 0.0 + k[4051]*y_cur[IDX_C2HM]; - data[jistart + 1149] = 0.0 + k[212]*y_cur[IDX_C2HII]; - data[jistart + 1150] = 0.0 + k[4052]*y_cur[IDX_C2HM]; - data[jistart + 1151] = 0.0 + k[4053]*y_cur[IDX_C2HM]; - data[jistart + 1152] = 0.0 + k[3695]*y_cur[IDX_C3H2II] - - k[5352]*y_cur[IDX_C2HI] + k[5357]*y_cur[IDX_C3HI]; - data[jistart + 1153] = 0.0 - k[649]*y_cur[IDX_C2HI] - - k[3634]*y_cur[IDX_C2HI] + k[4054]*y_cur[IDX_C2HM]; - data[jistart + 1154] = 0.0 - k[4904]*y_cur[IDX_C2HI]; - data[jistart + 1155] = 0.0 - k[1749]*y_cur[IDX_C2HI]; - data[jistart + 1156] = 0.0 - k[4905]*y_cur[IDX_C2HI]; - data[jistart + 1157] = 0.0 + k[5453]*y_cur[IDX_C2H2I]; - data[jistart + 1158] = 0.0 - k[686]*y_cur[IDX_C2HI] - - k[3770]*y_cur[IDX_C2HI]; - data[jistart + 1159] = 0.0 + k[1195]*y_cur[IDX_eM] + - k[6813]*y_cur[IDX_GRAINM]; - data[jistart + 1160] = 0.0 + k[213]*y_cur[IDX_C2HII] - - k[4906]*y_cur[IDX_C2HI]; - data[jistart + 1161] = 0.0 - k[1750]*y_cur[IDX_C2HI] + - k[4055]*y_cur[IDX_C2HM]; - data[jistart + 1162] = 0.0 + k[4056]*y_cur[IDX_C2HM]; - data[jistart + 1163] = 0.0 - k[1751]*y_cur[IDX_C2HI] + - k[4057]*y_cur[IDX_C2HM]; - data[jistart + 1164] = 0.0 + k[3310]*y_cur[IDX_HeII]; - data[jistart + 1165] = 0.0 + k[1226]*y_cur[IDX_eM] + - k[6649]*y_cur[IDX_GRAINM]; - data[jistart + 1166] = 0.0 + k[3309]*y_cur[IDX_HeII]; - data[jistart + 1167] = 0.0 + k[4058]*y_cur[IDX_C2HM]; - data[jistart + 1168] = 0.0 + k[4059]*y_cur[IDX_C2HM]; - data[jistart + 1169] = 0.0 + k[4060]*y_cur[IDX_C2HM]; - data[jistart + 1170] = 0.0 + k[743]*y_cur[IDX_C2H2II] + - k[749]*y_cur[IDX_C2H3II] + k[750]*y_cur[IDX_C2H3II] + - k[751]*y_cur[IDX_C2H3II] + k[752]*y_cur[IDX_C2H3II] + - k[760]*y_cur[IDX_C2H4II] + k[789]*y_cur[IDX_C3HII] + - k[801]*y_cur[IDX_C3H4II] + k[822]*y_cur[IDX_C4H2II] + - k[822]*y_cur[IDX_C4H2II] + k[1055]*y_cur[IDX_HC2OII] + - k[1064]*y_cur[IDX_HC3NII] + k[1074]*y_cur[IDX_HC4SII] + - k[1077]*y_cur[IDX_HC5NII] + k[1080]*y_cur[IDX_HC5NHII] + - k[1195]*y_cur[IDX_PC4HII] + k[1226]*y_cur[IDX_SiC2HII] - - k[5590]*y_cur[IDX_C2HI]; - data[jistart + 1171] = 0.0 - k[1849]*y_cur[IDX_C2HII] + - k[1891]*y_cur[IDX_CH2II] + k[1894]*y_cur[IDX_CH3II]; - data[jistart + 1172] = 0.0 + k[1342]*y_cur[IDX_CH2I] + - k[1352]*y_cur[IDX_CH3I]; - data[jistart + 1173] = 0.0 + k[1457]*y_cur[IDX_H2COII] + - k[1458]*y_cur[IDX_HCNII] + k[1459]*y_cur[IDX_HCOII] + - k[1460]*y_cur[IDX_HNOII] + k[1461]*y_cur[IDX_N2HII] + - k[1463]*y_cur[IDX_O2HII] + k[2217]*y_cur[IDX_CH5II] + - k[2369]*y_cur[IDX_H2II] + k[2503]*y_cur[IDX_H2OII] + - k[2586]*y_cur[IDX_H3II] + k[2766]*y_cur[IDX_H3OII] + - k[3477]*y_cur[IDX_NHII] + k[3507]*y_cur[IDX_NH2II] + - k[3769]*y_cur[IDX_OHII]; - data[jistart + 1174] = 0.0 + k[1454]*y_cur[IDX_HCOI] + - k[2146]*y_cur[IDX_CH4I] + k[2401]*y_cur[IDX_H2I] + - k[2519]*y_cur[IDX_H2OI] + k[3605]*y_cur[IDX_NHI]; - data[jistart + 1175] = 0.0 + k[241]*y_cur[IDX_CNII] + - k[242]*y_cur[IDX_COII] + k[243]*y_cur[IDX_N2II] + - k[329]*y_cur[IDX_HII] + k[439]*y_cur[IDX_H2II] + - k[465]*y_cur[IDX_H2OII] + k[543]*y_cur[IDX_NII] + - k[649]*y_cur[IDX_OII] + k[686]*y_cur[IDX_OHII] + k[5709] + k[5994]; - data[jistart + 1176] = 0.0 - k[212]*y_cur[IDX_NOI] - - k[213]*y_cur[IDX_SI] - k[740]*y_cur[IDX_eM] - k[741]*y_cur[IDX_eM] - - k[1466]*y_cur[IDX_C2H2I] - k[1467]*y_cur[IDX_CNI] - - k[1468]*y_cur[IDX_CO2I] - k[1469]*y_cur[IDX_H2COI] - - k[1470]*y_cur[IDX_HC3NI] - k[1471]*y_cur[IDX_HC3NI] - - k[1472]*y_cur[IDX_HC3NI] - k[1473]*y_cur[IDX_HC3NI] - - k[1474]*y_cur[IDX_HCNI] - k[1475]*y_cur[IDX_HCNI] - - k[1476]*y_cur[IDX_HCNI] - k[1477]*y_cur[IDX_HCOI] - - k[1478]*y_cur[IDX_HNCI] - k[1849]*y_cur[IDX_CI] - - k[1996]*y_cur[IDX_CH2I] - k[1997]*y_cur[IDX_CH2I] - - k[2151]*y_cur[IDX_CH4I] - k[2152]*y_cur[IDX_CH4I] - - k[2153]*y_cur[IDX_CH4I] - k[2240]*y_cur[IDX_CHI] - - k[2241]*y_cur[IDX_CHI] - k[2402]*y_cur[IDX_H2I] - - k[2521]*y_cur[IDX_H2OI] - k[3385]*y_cur[IDX_NI] - - k[3386]*y_cur[IDX_NI] - k[3529]*y_cur[IDX_NH2I] - - k[3530]*y_cur[IDX_NH2I] - k[3554]*y_cur[IDX_NH3I] - - k[3555]*y_cur[IDX_NH3I] - k[3686]*y_cur[IDX_OI] - k[5979] - - k[6354]*y_cur[IDX_GRAINM] - k[6355]*y_cur[IDX_GRAINM]; - data[jistart + 1177] = 0.0 - k[1466]*y_cur[IDX_C2HII] + - k[3075]*y_cur[IDX_HeII]; - data[jistart + 1178] = 0.0 + k[3077]*y_cur[IDX_HeII]; - data[jistart + 1179] = 0.0 + k[3079]*y_cur[IDX_HeII]; - data[jistart + 1180] = 0.0 + k[3111]*y_cur[IDX_HeII]; - data[jistart + 1181] = 0.0 + k[3238]*y_cur[IDX_HeII]; - data[jistart + 1182] = 0.0 - k[2240]*y_cur[IDX_C2HII] - - k[2241]*y_cur[IDX_C2HII]; - data[jistart + 1183] = 0.0 + k[1936]*y_cur[IDX_CH2I]; - data[jistart + 1184] = 0.0 + k[1342]*y_cur[IDX_CII] + - k[1936]*y_cur[IDX_CHII] - k[1996]*y_cur[IDX_C2HII] - - k[1997]*y_cur[IDX_C2HII]; - data[jistart + 1185] = 0.0 + k[1891]*y_cur[IDX_CI]; - data[jistart + 1186] = 0.0 + k[1352]*y_cur[IDX_CII]; - data[jistart + 1187] = 0.0 + k[1894]*y_cur[IDX_CI]; - data[jistart + 1188] = 0.0 + k[2146]*y_cur[IDX_C2II] - - k[2151]*y_cur[IDX_C2HII] - k[2152]*y_cur[IDX_C2HII] - - k[2153]*y_cur[IDX_C2HII]; - data[jistart + 1189] = 0.0 + k[2217]*y_cur[IDX_C2I]; - data[jistart + 1190] = 0.0 - k[1467]*y_cur[IDX_C2HII]; - data[jistart + 1191] = 0.0 + k[241]*y_cur[IDX_C2HI]; - data[jistart + 1192] = 0.0 + k[242]*y_cur[IDX_C2HI]; - data[jistart + 1193] = 0.0 - k[1468]*y_cur[IDX_C2HII]; - data[jistart + 1194] = 0.0 - k[6354]*y_cur[IDX_C2HII] - - k[6355]*y_cur[IDX_C2HII]; - data[jistart + 1195] = 0.0 + k[329]*y_cur[IDX_C2HI] + - k[3026]*y_cur[IDX_HNC3I]; - data[jistart + 1196] = 0.0 + k[2401]*y_cur[IDX_C2II] - - k[2402]*y_cur[IDX_C2HII]; - data[jistart + 1197] = 0.0 + k[439]*y_cur[IDX_C2HI] + - k[2369]*y_cur[IDX_C2I]; - data[jistart + 1198] = 0.0 - k[1469]*y_cur[IDX_C2HII]; - data[jistart + 1199] = 0.0 + k[1457]*y_cur[IDX_C2I]; - data[jistart + 1200] = 0.0 + k[2519]*y_cur[IDX_C2II] - - k[2521]*y_cur[IDX_C2HII]; - data[jistart + 1201] = 0.0 + k[465]*y_cur[IDX_C2HI] + - k[2503]*y_cur[IDX_C2I]; - data[jistart + 1202] = 0.0 + k[2586]*y_cur[IDX_C2I]; - data[jistart + 1203] = 0.0 + k[2766]*y_cur[IDX_C2I]; - data[jistart + 1204] = 0.0 - k[1470]*y_cur[IDX_C2HII] - - k[1471]*y_cur[IDX_C2HII] - k[1472]*y_cur[IDX_C2HII] - - k[1473]*y_cur[IDX_C2HII] + k[3237]*y_cur[IDX_HeII]; - data[jistart + 1205] = 0.0 + k[3241]*y_cur[IDX_HeII]; - data[jistart + 1206] = 0.0 - k[1474]*y_cur[IDX_C2HII] - - k[1475]*y_cur[IDX_C2HII] - k[1476]*y_cur[IDX_C2HII]; - data[jistart + 1207] = 0.0 + k[1458]*y_cur[IDX_C2I]; - data[jistart + 1208] = 0.0 + k[1454]*y_cur[IDX_C2II] - - k[1477]*y_cur[IDX_C2HII]; - data[jistart + 1209] = 0.0 + k[1459]*y_cur[IDX_C2I]; - data[jistart + 1210] = 0.0 - k[1478]*y_cur[IDX_C2HII]; - data[jistart + 1211] = 0.0 + k[3026]*y_cur[IDX_HII]; - data[jistart + 1212] = 0.0 + k[1460]*y_cur[IDX_C2I]; - data[jistart + 1213] = 0.0 + k[3075]*y_cur[IDX_C2H2I] + - k[3077]*y_cur[IDX_C2H3I] + k[3079]*y_cur[IDX_C2H4I] + - k[3111]*y_cur[IDX_C4HI] + k[3237]*y_cur[IDX_HC3NI] + - k[3238]*y_cur[IDX_C4H2I] + k[3241]*y_cur[IDX_HC5NI]; - data[jistart + 1214] = 0.0 - k[3385]*y_cur[IDX_C2HII] - - k[3386]*y_cur[IDX_C2HII]; - data[jistart + 1215] = 0.0 + k[543]*y_cur[IDX_C2HI]; - data[jistart + 1216] = 0.0 + k[243]*y_cur[IDX_C2HI]; - data[jistart + 1217] = 0.0 + k[1461]*y_cur[IDX_C2I]; - data[jistart + 1218] = 0.0 + k[3605]*y_cur[IDX_C2II]; - data[jistart + 1219] = 0.0 + k[3477]*y_cur[IDX_C2I]; - data[jistart + 1220] = 0.0 - k[3529]*y_cur[IDX_C2HII] - - k[3530]*y_cur[IDX_C2HII]; - data[jistart + 1221] = 0.0 + k[3507]*y_cur[IDX_C2I]; - data[jistart + 1222] = 0.0 - k[3554]*y_cur[IDX_C2HII] - - k[3555]*y_cur[IDX_C2HII]; - data[jistart + 1223] = 0.0 - k[212]*y_cur[IDX_C2HII]; - data[jistart + 1224] = 0.0 - k[3686]*y_cur[IDX_C2HII]; - data[jistart + 1225] = 0.0 + k[649]*y_cur[IDX_C2HI]; - data[jistart + 1226] = 0.0 + k[1463]*y_cur[IDX_C2I]; - data[jistart + 1227] = 0.0 + k[686]*y_cur[IDX_C2HI] + - k[3769]*y_cur[IDX_C2I]; - data[jistart + 1228] = 0.0 - k[213]*y_cur[IDX_C2HII]; - data[jistart + 1229] = 0.0 - k[740]*y_cur[IDX_C2HII] - - k[741]*y_cur[IDX_C2HII]; - data[jistart + 1230] = 0.0 - k[39]*y_cur[IDX_C2HM]; - data[jistart + 1231] = 0.0 - k[4026]*y_cur[IDX_C2HM]; - data[jistart + 1232] = 0.0 + k[5590]*y_cur[IDX_eM]; - data[jistart + 1233] = 0.0 - k[39]*y_cur[IDX_CI] - - k[88]*y_cur[IDX_HI] - k[111]*y_cur[IDX_NI] - k[129]*y_cur[IDX_OI] - - k[3687]*y_cur[IDX_OI] - k[4026]*y_cur[IDX_CII] - - k[4027]*y_cur[IDX_C2H2II] - k[4028]*y_cur[IDX_C2H3II] - - k[4029]*y_cur[IDX_C4H2II] - k[4030]*y_cur[IDX_C4H3II] - - k[4031]*y_cur[IDX_C4SII] - k[4032]*y_cur[IDX_CH2CCHII] - - k[4033]*y_cur[IDX_CH3II] - k[4034]*y_cur[IDX_CNCII] - - k[4035]*y_cur[IDX_FeII] - k[4036]*y_cur[IDX_HII] - - k[4037]*y_cur[IDX_H2COII] - k[4038]*y_cur[IDX_H2SII] - - k[4039]*y_cur[IDX_H3II] - k[4040]*y_cur[IDX_H3OII] - - k[4041]*y_cur[IDX_HC2SII] - k[4042]*y_cur[IDX_HCNHII] - - k[4043]*y_cur[IDX_HCNHII] - k[4044]*y_cur[IDX_HCOII] - - k[4045]*y_cur[IDX_HCOII] - k[4046]*y_cur[IDX_HeII] - - k[4047]*y_cur[IDX_MgII] - k[4048]*y_cur[IDX_NII] - - k[4049]*y_cur[IDX_N2HII] - k[4050]*y_cur[IDX_NH3II] - - k[4051]*y_cur[IDX_NH4II] - k[4052]*y_cur[IDX_NOII] - - k[4053]*y_cur[IDX_NaII] - k[4054]*y_cur[IDX_OII] - - k[4055]*y_cur[IDX_SII] - k[4056]*y_cur[IDX_SOII] - - k[4057]*y_cur[IDX_SiII] - k[4058]*y_cur[IDX_SiOII] - - k[4059]*y_cur[IDX_SiOHII] - k[4060]*y_cur[IDX_SiSII] - k[5695] - - k[5980]; - data[jistart + 1234] = 0.0 + k[2366]*y_cur[IDX_HM]; - data[jistart + 1235] = 0.0 - k[4027]*y_cur[IDX_C2HM]; - data[jistart + 1236] = 0.0 - k[4028]*y_cur[IDX_C2HM]; - data[jistart + 1237] = 0.0 + k[3396]*y_cur[IDX_NI] + - k[3694]*y_cur[IDX_OI]; - data[jistart + 1238] = 0.0 - k[4029]*y_cur[IDX_C2HM]; - data[jistart + 1239] = 0.0 - k[4030]*y_cur[IDX_C2HM]; - data[jistart + 1240] = 0.0 - k[4031]*y_cur[IDX_C2HM]; - data[jistart + 1241] = 0.0 - k[4032]*y_cur[IDX_C2HM]; - data[jistart + 1242] = 0.0 - k[4033]*y_cur[IDX_C2HM]; - data[jistart + 1243] = 0.0 - k[4034]*y_cur[IDX_C2HM]; - data[jistart + 1244] = 0.0 - k[4035]*y_cur[IDX_C2HM]; - data[jistart + 1245] = 0.0 - k[88]*y_cur[IDX_C2HM]; - data[jistart + 1246] = 0.0 - k[4036]*y_cur[IDX_C2HM]; - data[jistart + 1247] = 0.0 + k[2366]*y_cur[IDX_C2H2I]; - data[jistart + 1248] = 0.0 - k[4037]*y_cur[IDX_C2HM]; - data[jistart + 1249] = 0.0 - k[4038]*y_cur[IDX_C2HM]; - data[jistart + 1250] = 0.0 - k[4039]*y_cur[IDX_C2HM]; - data[jistart + 1251] = 0.0 - k[4040]*y_cur[IDX_C2HM]; - data[jistart + 1252] = 0.0 - k[4041]*y_cur[IDX_C2HM]; - data[jistart + 1253] = 0.0 - k[4042]*y_cur[IDX_C2HM] - - k[4043]*y_cur[IDX_C2HM]; - data[jistart + 1254] = 0.0 - k[4044]*y_cur[IDX_C2HM] - - k[4045]*y_cur[IDX_C2HM]; - data[jistart + 1255] = 0.0 - k[4046]*y_cur[IDX_C2HM]; - data[jistart + 1256] = 0.0 - k[4047]*y_cur[IDX_C2HM]; - data[jistart + 1257] = 0.0 - k[111]*y_cur[IDX_C2HM] + - k[3396]*y_cur[IDX_C3HM]; - data[jistart + 1258] = 0.0 - k[4048]*y_cur[IDX_C2HM]; - data[jistart + 1259] = 0.0 - k[4049]*y_cur[IDX_C2HM]; - data[jistart + 1260] = 0.0 - k[4050]*y_cur[IDX_C2HM]; - data[jistart + 1261] = 0.0 - k[4051]*y_cur[IDX_C2HM]; - data[jistart + 1262] = 0.0 - k[4052]*y_cur[IDX_C2HM]; - data[jistart + 1263] = 0.0 - k[4053]*y_cur[IDX_C2HM]; - data[jistart + 1264] = 0.0 - k[129]*y_cur[IDX_C2HM] - - k[3687]*y_cur[IDX_C2HM] + k[3694]*y_cur[IDX_C3HM]; - data[jistart + 1265] = 0.0 - k[4054]*y_cur[IDX_C2HM]; - data[jistart + 1266] = 0.0 - k[4055]*y_cur[IDX_C2HM]; - data[jistart + 1267] = 0.0 - k[4056]*y_cur[IDX_C2HM]; - data[jistart + 1268] = 0.0 - k[4057]*y_cur[IDX_C2HM]; - data[jistart + 1269] = 0.0 - k[4058]*y_cur[IDX_C2HM]; - data[jistart + 1270] = 0.0 - k[4059]*y_cur[IDX_C2HM]; - data[jistart + 1271] = 0.0 - k[4060]*y_cur[IDX_C2HM]; - data[jistart + 1272] = 0.0 + k[5590]*y_cur[IDX_C2HI]; - data[jistart + 1273] = 0.0 + k[1920]*y_cur[IDX_SiCH2II] - - k[4911]*y_cur[IDX_C2H2I] - k[4912]*y_cur[IDX_C2H2I] + - k[4949]*y_cur[IDX_CH3I]; - data[jistart + 1274] = 0.0 - k[1300]*y_cur[IDX_C2H2I] + - k[1343]*y_cur[IDX_CH2CCH2I] + k[1363]*y_cur[IDX_CH3CCHI]; - data[jistart + 1275] = 0.0 + k[1]*y_cur[IDX_CH2I] + - k[3887]*y_cur[IDX_C2H2II]; - data[jistart + 1276] = 0.0 + k[3922]*y_cur[IDX_C2H2II]; - data[jistart + 1277] = 0.0 + k[3957]*y_cur[IDX_C2H2II]; - data[jistart + 1278] = 0.0 - k[4867]*y_cur[IDX_C2H2I]; - data[jistart + 1279] = 0.0 - k[1452]*y_cur[IDX_C2H2I]; - data[jistart + 1280] = 0.0 + k[3992]*y_cur[IDX_C2H2II]; - data[jistart + 1281] = 0.0 + k[67]*y_cur[IDX_HM] + - k[1726]*y_cur[IDX_C2H3II] - k[4888]*y_cur[IDX_C2H2I] + - k[5133]*y_cur[IDX_H2I]; - data[jistart + 1282] = 0.0 - k[1466]*y_cur[IDX_C2H2I]; - data[jistart + 1283] = 0.0 + k[88]*y_cur[IDX_HI] + - k[4027]*y_cur[IDX_C2H2II]; - data[jistart + 1284] = 0.0 - k[227]*y_cur[IDX_CH2CCHII] + - k[227]*y_cur[IDX_CH2CCHII] - k[228]*y_cur[IDX_CO2II] - - k[229]*y_cur[IDX_HC3NII] - k[230]*y_cur[IDX_HCNII] - - k[277]*y_cur[IDX_CH4II] - k[324]*y_cur[IDX_HII] - - k[437]*y_cur[IDX_H2II] - k[463]*y_cur[IDX_H2OII] - - k[509]*y_cur[IDX_HeII] - k[647]*y_cur[IDX_OII] - - k[668]*y_cur[IDX_O2II] - k[1300]*y_cur[IDX_CII] - - k[1452]*y_cur[IDX_C2II] - k[1466]*y_cur[IDX_C2HII] - - k[1479]*y_cur[IDX_C2H2II] - k[1480]*y_cur[IDX_C2H2II] - - k[1535]*y_cur[IDX_C2H3II] - k[1536]*y_cur[IDX_C2H4II] - - k[1537]*y_cur[IDX_C2H4II] - k[1538]*y_cur[IDX_C2H5II] - - k[1539]*y_cur[IDX_C2H5II] - k[1540]*y_cur[IDX_C2NII] - - k[1541]*y_cur[IDX_C2NII] - k[1542]*y_cur[IDX_C2N2II] - - k[1543]*y_cur[IDX_C3II] - k[1544]*y_cur[IDX_C3HII] - - k[1545]*y_cur[IDX_C3H2II] - k[1546]*y_cur[IDX_C3H3II] - - k[1547]*y_cur[IDX_C3H4II] - k[1548]*y_cur[IDX_C3H5II] - - k[1549]*y_cur[IDX_C4II] - k[1550]*y_cur[IDX_C4II] - - k[1551]*y_cur[IDX_C4HII] - k[1552]*y_cur[IDX_C4H2II] - - k[1553]*y_cur[IDX_C4H4II] - k[1554]*y_cur[IDX_C4H4II] - - k[1555]*y_cur[IDX_C4NII] - k[1556]*y_cur[IDX_C5II] - - k[1557]*y_cur[IDX_C6II] - k[1558]*y_cur[IDX_C6II] - - k[1559]*y_cur[IDX_C6HII] - k[1560]*y_cur[IDX_C7H2II] - - k[1561]*y_cur[IDX_C7H2II] - k[1562]*y_cur[IDX_C2H6II] - - k[1563]*y_cur[IDX_C2H6II] - k[1564]*y_cur[IDX_C2H6II] - - k[1565]*y_cur[IDX_HC3NII] - k[1566]*y_cur[IDX_HCOII] - - k[1567]*y_cur[IDX_HCO2II] - k[1568]*y_cur[IDX_N2HII] - - k[1569]*y_cur[IDX_PII] - k[1570]*y_cur[IDX_PHII] - - k[1571]*y_cur[IDX_PH2II] - k[1572]*y_cur[IDX_PH3II] - - k[1573]*y_cur[IDX_SII] - k[1574]*y_cur[IDX_SiII] - - k[1575]*y_cur[IDX_SiC2II] - k[1576]*y_cur[IDX_SiC2HII] - - k[1934]*y_cur[IDX_CHII] - k[2042]*y_cur[IDX_CH3II] - - k[2133]*y_cur[IDX_CH4II] - k[2134]*y_cur[IDX_CH4II] - - k[2218]*y_cur[IDX_CH5II] - k[2366]*y_cur[IDX_HM] - - k[2370]*y_cur[IDX_H2II] - k[2587]*y_cur[IDX_H3II] - - k[3074]*y_cur[IDX_HeII] - k[3075]*y_cur[IDX_HeII] - - k[3076]*y_cur[IDX_HeII] - k[3654]*y_cur[IDX_O2II] - - k[3655]*y_cur[IDX_O2II] - k[3843]*y_cur[IDX_SOII] - - k[3844]*y_cur[IDX_SOII] - k[3845]*y_cur[IDX_SOII] - - k[3846]*y_cur[IDX_SOII] - k[4867]*y_cur[IDX_C2I] - - k[4877]*y_cur[IDX_C4HI] - k[4878]*y_cur[IDX_NOI] - - k[4879]*y_cur[IDX_SiI] - k[4880]*y_cur[IDX_SiI] - - k[4888]*y_cur[IDX_C2HI] - k[4911]*y_cur[IDX_CI] - - k[4912]*y_cur[IDX_CI] - k[4991]*y_cur[IDX_CH2I] - - k[5063]*y_cur[IDX_CHI] - k[5064]*y_cur[IDX_CHI] - - k[5104]*y_cur[IDX_CNI] - k[5154]*y_cur[IDX_HI] - - k[5344]*y_cur[IDX_OI] - k[5453]*y_cur[IDX_OHI] - - k[5454]*y_cur[IDX_OHI] - k[5455]*y_cur[IDX_OHI] - - k[5511]*y_cur[IDX_C4H2II] - k[5512]*y_cur[IDX_SiII] - - k[5520]*y_cur[IDX_C4H3II] - k[5567]*y_cur[IDX_H3OII] - k[5696] - - k[5697] - k[5981] - k[5982] - k[6910]; - data[jistart + 1285] = 0.0 + k[214]*y_cur[IDX_C2H3I] + - k[215]*y_cur[IDX_C2H4I] + k[216]*y_cur[IDX_C5H2I] + - k[217]*y_cur[IDX_C6H2I] + k[218]*y_cur[IDX_C7H2I] + - k[219]*y_cur[IDX_CH2CCHI] + k[220]*y_cur[IDX_CH3CCHI] + - k[221]*y_cur[IDX_FeI] + k[222]*y_cur[IDX_H2COI] + - k[223]*y_cur[IDX_H2SI] + k[224]*y_cur[IDX_C4H2I] + - k[225]*y_cur[IDX_HCOI] + k[226]*y_cur[IDX_NOI] + - k[529]*y_cur[IDX_MgI] + k[598]*y_cur[IDX_NH3I] + - k[632]*y_cur[IDX_NaI] - k[1479]*y_cur[IDX_C2H2I] - - k[1480]*y_cur[IDX_C2H2I] + k[3887]*y_cur[IDX_CM] + - k[3922]*y_cur[IDX_C10M] + k[3957]*y_cur[IDX_C10HM] + - k[3992]*y_cur[IDX_C2M] + k[4027]*y_cur[IDX_C2HM] + - k[4062]*y_cur[IDX_C3M] + k[4097]*y_cur[IDX_C3HM] + - k[4132]*y_cur[IDX_C3NM] + k[4167]*y_cur[IDX_C4M] + - k[4202]*y_cur[IDX_C4HM] + k[4237]*y_cur[IDX_C5M] + - k[4272]*y_cur[IDX_C5HM] + k[4307]*y_cur[IDX_C5NM] + - k[4342]*y_cur[IDX_C6M] + k[4377]*y_cur[IDX_C6HM] + - k[4412]*y_cur[IDX_C7M] + k[4447]*y_cur[IDX_C7HM] + - k[4482]*y_cur[IDX_C8M] + k[4517]*y_cur[IDX_C8HM] + - k[4552]*y_cur[IDX_C9M] + k[4587]*y_cur[IDX_C9HM] + - k[4622]*y_cur[IDX_CHM] + k[4657]*y_cur[IDX_CNM] + - k[4692]*y_cur[IDX_HM] + k[4728]*y_cur[IDX_OM] + - k[4763]*y_cur[IDX_O2M] + k[4798]*y_cur[IDX_OHM] + - k[4833]*y_cur[IDX_SM]; - data[jistart + 1286] = 0.0 + k[214]*y_cur[IDX_C2H2II] + - k[1628]*y_cur[IDX_C2H4II] + k[4882]*y_cur[IDX_O2I] + - k[5025]*y_cur[IDX_CH3I] + k[5155]*y_cur[IDX_HI] + - k[5223]*y_cur[IDX_NI] + k[5456]*y_cur[IDX_OHI] + k[5698] + k[5983]; - data[jistart + 1287] = 0.0 + k[747]*y_cur[IDX_eM] + - k[748]*y_cur[IDX_eM] - k[1535]*y_cur[IDX_C2H2I] + - k[1579]*y_cur[IDX_C2H4I] + k[1580]*y_cur[IDX_C3H2I] + - k[1583]*y_cur[IDX_C3HI] + k[1586]*y_cur[IDX_C4HI] + - k[1589]*y_cur[IDX_C5H2I] + k[1592]*y_cur[IDX_C5HI] + - k[1595]*y_cur[IDX_C6H2I] + k[1598]*y_cur[IDX_C6H6I] + - k[1599]*y_cur[IDX_C6HI] + k[1602]*y_cur[IDX_C7H2I] + - k[1605]*y_cur[IDX_C7HI] + k[1608]*y_cur[IDX_CH2CCHI] + - k[1611]*y_cur[IDX_CH3CCHI] + k[1617]*y_cur[IDX_H2CCCI] + - k[1619]*y_cur[IDX_H2SI] + k[1620]*y_cur[IDX_HC3NI] + - k[1621]*y_cur[IDX_C4H2I] + k[1624]*y_cur[IDX_NCCNI] + - k[1726]*y_cur[IDX_C2HI] + k[2523]*y_cur[IDX_H2OI] + - k[2861]*y_cur[IDX_HCNI] + k[3036]*y_cur[IDX_HNCI] + - k[3557]*y_cur[IDX_NH3I] + k[6362]*y_cur[IDX_GRAINM] + - k[6363]*y_cur[IDX_GRAINM]; - data[jistart + 1288] = 0.0 + k[215]*y_cur[IDX_C2H2II] + - k[1579]*y_cur[IDX_C2H3II] + k[1686]*y_cur[IDX_C3II] + - k[1690]*y_cur[IDX_C3HII] + k[1691]*y_cur[IDX_C3H2II] + - k[1694]*y_cur[IDX_C4HII] + k[1698]*y_cur[IDX_C5II] + - k[1704]*y_cur[IDX_C6H5II] + k[5700] + k[5985]; - data[jistart + 1289] = 0.0 + k[757]*y_cur[IDX_eM] + - k[758]*y_cur[IDX_eM] - k[1536]*y_cur[IDX_C2H2I] - - k[1537]*y_cur[IDX_C2H2I] + k[1628]*y_cur[IDX_C2H3I] + - k[6381]*y_cur[IDX_GRAINM] + k[6382]*y_cur[IDX_GRAINM]; - data[jistart + 1290] = 0.0 + k[764]*y_cur[IDX_eM] + - k[765]*y_cur[IDX_eM] - k[1538]*y_cur[IDX_C2H2I] - - k[1539]*y_cur[IDX_C2H2I] + k[6391]*y_cur[IDX_GRAINM] + - k[6392]*y_cur[IDX_GRAINM]; - data[jistart + 1291] = 0.0 - k[1562]*y_cur[IDX_C2H2I] - - k[1563]*y_cur[IDX_C2H2I] - k[1564]*y_cur[IDX_C2H2I]; - data[jistart + 1292] = 0.0 - k[1540]*y_cur[IDX_C2H2I] - - k[1541]*y_cur[IDX_C2H2I]; - data[jistart + 1293] = 0.0 - k[1542]*y_cur[IDX_C2H2I]; - data[jistart + 1294] = 0.0 - k[1543]*y_cur[IDX_C2H2I] + - k[1686]*y_cur[IDX_C2H4I]; - data[jistart + 1295] = 0.0 + k[4062]*y_cur[IDX_C2H2II]; - data[jistart + 1296] = 0.0 + k[1583]*y_cur[IDX_C2H3II]; - data[jistart + 1297] = 0.0 - k[1544]*y_cur[IDX_C2H2I] + - k[1690]*y_cur[IDX_C2H4I] + k[1754]*y_cur[IDX_C4H2I] + - k[2160]*y_cur[IDX_CH4I] + k[2530]*y_cur[IDX_H2OI] + - k[2578]*y_cur[IDX_H2SI] + k[3563]*y_cur[IDX_NH3I]; - data[jistart + 1298] = 0.0 + k[4097]*y_cur[IDX_C2H2II]; - data[jistart + 1299] = 0.0 + k[1580]*y_cur[IDX_C2H3II]; - data[jistart + 1300] = 0.0 + k[792]*y_cur[IDX_eM] - - k[1545]*y_cur[IDX_C2H2I] + k[1691]*y_cur[IDX_C2H4I] + - k[1773]*y_cur[IDX_CH2CCH2I] + k[1779]*y_cur[IDX_CH3CCHI] + - k[6462]*y_cur[IDX_GRAINM]; - data[jistart + 1301] = 0.0 + k[797]*y_cur[IDX_eM] + - k[6656]*y_cur[IDX_GRAINM]; - data[jistart + 1302] = 0.0 - k[1546]*y_cur[IDX_C2H2I] + - k[1807]*y_cur[IDX_C4H2I] + k[3696]*y_cur[IDX_OI]; - data[jistart + 1303] = 0.0 - k[1547]*y_cur[IDX_C2H2I]; - data[jistart + 1304] = 0.0 - k[1548]*y_cur[IDX_C2H2I]; - data[jistart + 1305] = 0.0 + k[807]*y_cur[IDX_eM] + - k[6504]*y_cur[IDX_GRAINM]; - data[jistart + 1306] = 0.0 + k[4132]*y_cur[IDX_C2H2II]; - data[jistart + 1307] = 0.0 - k[1549]*y_cur[IDX_C2H2I] - - k[1550]*y_cur[IDX_C2H2I] + k[2164]*y_cur[IDX_CH4I]; - data[jistart + 1308] = 0.0 + k[4167]*y_cur[IDX_C2H2II]; - data[jistart + 1309] = 0.0 + k[1586]*y_cur[IDX_C2H3II] - - k[4877]*y_cur[IDX_C2H2I]; - data[jistart + 1310] = 0.0 - k[1551]*y_cur[IDX_C2H2I] + - k[1694]*y_cur[IDX_C2H4I]; - data[jistart + 1311] = 0.0 + k[4202]*y_cur[IDX_C2H2II]; - data[jistart + 1312] = 0.0 + k[224]*y_cur[IDX_C2H2II] + - k[1621]*y_cur[IDX_C2H3II] + k[1754]*y_cur[IDX_C3HII] + - k[1807]*y_cur[IDX_C3H3II] + k[1837]*y_cur[IDX_C4H2II] + - k[2031]*y_cur[IDX_CH2CCHII] + k[2081]*y_cur[IDX_CH3II] + - k[2850]*y_cur[IDX_C4H3II] + k[2851]*y_cur[IDX_C4H4II]; - data[jistart + 1313] = 0.0 - k[1552]*y_cur[IDX_C2H2I] + - k[1837]*y_cur[IDX_C4H2I] + k[2107]*y_cur[IDX_CH3CCHI] - + data[jistart + 2082] = 0.0 + k[3018]*y_cur[IDX_CII] + k[3022]*y_cur[IDX_HII] + + k[3034]*y_cur[IDX_HeII]; + data[jistart + 2083] = 0.0 + k[1453]*y_cur[IDX_HCNI]; + data[jistart + 2084] = 0.0 + k[3236]*y_cur[IDX_HeII]; + data[jistart + 2085] = 0.0 + k[3394]*y_cur[IDX_NI]; + data[jistart + 2086] = 0.0 + k[1467]*y_cur[IDX_CNI]; + data[jistart + 2087] = 0.0 + k[512]*y_cur[IDX_HeII]; + data[jistart + 2088] = 0.0 + k[1453]*y_cur[IDX_C2II]; + data[jistart + 2089] = 0.0 + k[1467]*y_cur[IDX_C2HII]; + data[jistart + 2090] = 0.0 + k[3394]*y_cur[IDX_C3HII]; + data[jistart + 2091] = 0.0 + k[512]*y_cur[IDX_C3NI] + k[3034]*y_cur[IDX_HNC3I] + + k[3236]*y_cur[IDX_HC3NI]; + data[jistart + 2092] = 0.0 + k[3018]*y_cur[IDX_HNC3I]; + data[jistart + 2093] = 0.0 + k[3022]*y_cur[IDX_HNC3I]; + data[jistart + 2094] = 0.0 - k[6626]*y_cur[IDX_C3NII]; + data[jistart + 2095] = 0.0 - k[2409]*y_cur[IDX_C3NII]; + data[jistart + 2096] = 0.0 - k[814]*y_cur[IDX_C3NII]; + data[jistart + 2097] = 0.0 - k[826]*y_cur[IDX_eM] - k[1553]*y_cur[IDX_C2H2I] - + k[1554]*y_cur[IDX_C2H2I] - k[2851]*y_cur[IDX_C4H2I] - + k[6641]*y_cur[IDX_GRAINM]; + data[jistart + 2098] = 0.0 + k[1808]*y_cur[IDX_CH2CCH2I]; + data[jistart + 2099] = 0.0 + k[1773]*y_cur[IDX_C3H2II] + k[1808]*y_cur[IDX_C3H4II]; + data[jistart + 2100] = 0.0 + k[1779]*y_cur[IDX_C3H2II]; + data[jistart + 2101] = 0.0 + k[2609]*y_cur[IDX_H3II] + k[2779]*y_cur[IDX_H3OII] + + k[2914]*y_cur[IDX_HCOII]; + data[jistart + 2102] = 0.0 + k[1773]*y_cur[IDX_CH2CCH2I] + k[1779]*y_cur[IDX_CH3CCHI]; + data[jistart + 2103] = 0.0 + k[5571]*y_cur[IDX_HI]; + data[jistart + 2104] = 0.0 - k[2851]*y_cur[IDX_C4H4II]; + data[jistart + 2105] = 0.0 - k[1553]*y_cur[IDX_C4H4II] - k[1554]*y_cur[IDX_C4H4II]; + data[jistart + 2106] = 0.0 + k[2779]*y_cur[IDX_C4H3I]; + data[jistart + 2107] = 0.0 + k[2914]*y_cur[IDX_C4H3I]; + data[jistart + 2108] = 0.0 + k[2609]*y_cur[IDX_C4H3I]; + data[jistart + 2109] = 0.0 - k[6641]*y_cur[IDX_C4H4II]; + data[jistart + 2110] = 0.0 - k[826]*y_cur[IDX_C4H4II]; + data[jistart + 2111] = 0.0 + k[5571]*y_cur[IDX_C4H3II]; + data[jistart + 2112] = 0.0 - k[916]*y_cur[IDX_eM] - k[917]*y_cur[IDX_eM] - + k[6475]*y_cur[IDX_GRAINM] - k[6476]*y_cur[IDX_GRAINM]; + data[jistart + 2113] = 0.0 + k[163]*y_cur[IDX_CII] + k[361]*y_cur[IDX_HII]; + data[jistart + 2114] = 0.0 + k[2328]*y_cur[IDX_HII]; + data[jistart + 2115] = 0.0 + k[3530]*y_cur[IDX_C2HII]; + data[jistart + 2116] = 0.0 + k[3530]*y_cur[IDX_NH2I] + k[3555]*y_cur[IDX_NH3I]; + data[jistart + 2117] = 0.0 + k[1986]*y_cur[IDX_HCNI]; + data[jistart + 2118] = 0.0 + k[3607]*y_cur[IDX_C2H2II]; + data[jistart + 2119] = 0.0 + k[1986]*y_cur[IDX_CH2II]; + data[jistart + 2120] = 0.0 + k[3555]*y_cur[IDX_C2HII]; + data[jistart + 2121] = 0.0 + k[3607]*y_cur[IDX_NHI]; + data[jistart + 2122] = 0.0 + k[2075]*y_cur[IDX_CNI]; + data[jistart + 2123] = 0.0 + k[2075]*y_cur[IDX_CH3II]; + data[jistart + 2124] = 0.0 + k[163]*y_cur[IDX_CH2CNI]; + data[jistart + 2125] = 0.0 + k[361]*y_cur[IDX_CH2CNI] + k[2328]*y_cur[IDX_CH3CNI]; + data[jistart + 2126] = 0.0 - k[6475]*y_cur[IDX_CH2CNII] - k[6476]*y_cur[IDX_CH2CNII]; + data[jistart + 2127] = 0.0 - k[916]*y_cur[IDX_CH2CNII] - k[917]*y_cur[IDX_CH2CNII]; + data[jistart + 2128] = 0.0 - k[950]*y_cur[IDX_eM] - k[951]*y_cur[IDX_eM] - + k[2118]*y_cur[IDX_CH3CHCH2I] - k[2119]*y_cur[IDX_CH3CHCH2I] - + k[2493]*y_cur[IDX_H2COI] - k[6683]*y_cur[IDX_GRAINM] - + k[6684]*y_cur[IDX_GRAINM]; + data[jistart + 2129] = 0.0 + k[168]*y_cur[IDX_CII] + k[270]*y_cur[IDX_CH3II] + + k[368]*y_cur[IDX_HII] + k[713]*y_cur[IDX_SOII] + k[5812] + k[6116]; + data[jistart + 2130] = 0.0 - k[2118]*y_cur[IDX_CH3COCH3II] - k[2119]*y_cur[IDX_CH3COCH3II]; + data[jistart + 2131] = 0.0 + k[713]*y_cur[IDX_CH3COCH3I]; + data[jistart + 2132] = 0.0 - k[2493]*y_cur[IDX_CH3COCH3II]; + data[jistart + 2133] = 0.0 + k[270]*y_cur[IDX_CH3COCH3I]; + data[jistart + 2134] = 0.0 + k[168]*y_cur[IDX_CH3COCH3I]; + data[jistart + 2135] = 0.0 + k[368]*y_cur[IDX_CH3COCH3I]; + data[jistart + 2136] = 0.0 - k[6683]*y_cur[IDX_CH3COCH3II] - k[6684]*y_cur[IDX_CH3COCH3II]; + data[jistart + 2137] = 0.0 - k[950]*y_cur[IDX_CH3COCH3II] - k[951]*y_cur[IDX_CH3COCH3II]; + data[jistart + 2138] = 0.0 - k[984]*y_cur[IDX_eM] - k[2437]*y_cur[IDX_H2I] - + k[3731]*y_cur[IDX_OI] - k[6511]*y_cur[IDX_GRAINM]; + data[jistart + 2139] = 0.0 + k[1397]*y_cur[IDX_CII] + k[3232]*y_cur[IDX_HeII]; + data[jistart + 2140] = 0.0 + k[1341]*y_cur[IDX_CII]; + data[jistart + 2141] = 0.0 + k[171]*y_cur[IDX_CII] + k[373]*y_cur[IDX_HII]; + data[jistart + 2142] = 0.0 - k[3731]*y_cur[IDX_CPII]; + data[jistart + 2143] = 0.0 + k[3232]*y_cur[IDX_HC2PI]; + data[jistart + 2144] = 0.0 + k[171]*y_cur[IDX_CPI] + k[1341]*y_cur[IDX_CCPI] + + k[1397]*y_cur[IDX_HC2PI]; + data[jistart + 2145] = 0.0 + k[373]*y_cur[IDX_CPI]; + data[jistart + 2146] = 0.0 - k[6511]*y_cur[IDX_CPII]; + data[jistart + 2147] = 0.0 - k[2437]*y_cur[IDX_CPII]; + data[jistart + 2148] = 0.0 - k[984]*y_cur[IDX_CPII]; + data[jistart + 2149] = 0.0 + k[8184]; + data[jistart + 2150] = 0.0 + k[8256] + k[8260]; + data[jistart + 2151] = 0.0 + k[7868] + k[8211]; + data[jistart + 2152] = 0.0 + k[8229] + k[8230]; + data[jistart + 2153] = 0.0 + k[8423]*y_cur[IDX_GCI]; + data[jistart + 2154] = 0.0 - k[7223] - k[7405] - k[7587] - k[7849] - k[8178] - k[8179] - + k[8180] - k[8352]*y_cur[IDX_GHI] - k[8384]*y_cur[IDX_GH2I] - + k[8425]*y_cur[IDX_GCI] - k[8497]*y_cur[IDX_GCHI] - + k[8638]*y_cur[IDX_GHI] - k[8676]*y_cur[IDX_GCI] - + k[8730]*y_cur[IDX_GCHI]; + data[jistart + 2155] = 0.0 + k[8206]; + data[jistart + 2156] = 0.0 + k[7852]; + data[jistart + 2157] = 0.0 + k[7861] + k[8193] + k[8196]; + data[jistart + 2158] = 0.0 - k[8497]*y_cur[IDX_GC6I] - k[8730]*y_cur[IDX_GC6I]; + data[jistart + 2159] = 0.0 - k[8384]*y_cur[IDX_GC6I]; + data[jistart + 2160] = 0.0 + k[8423]*y_cur[IDX_GC5I] - k[8425]*y_cur[IDX_GC6I] - + k[8676]*y_cur[IDX_GC6I]; + data[jistart + 2161] = 0.0 + k[7041]; + data[jistart + 2162] = 0.0 - k[8352]*y_cur[IDX_GC6I] - k[8638]*y_cur[IDX_GC6I]; + data[jistart + 2163] = 0.0 + k[8214]; + data[jistart + 2164] = 0.0 + k[7877] + k[8246]; + data[jistart + 2165] = 0.0 + k[8258] + k[8262]; + data[jistart + 2166] = 0.0 + k[8232] + k[8234]; + data[jistart + 2167] = 0.0 + k[8241]; + data[jistart + 2168] = 0.0 + k[7867] + k[8208] + k[8210]; + data[jistart + 2169] = 0.0 + k[7871] + k[8219] + k[8221]; + data[jistart + 2170] = 0.0 - k[7237] - k[7419] - k[7601] - k[7866] - k[8205] - k[8206] - + k[8207] - k[8357]*y_cur[IDX_GHI] - k[8388]*y_cur[IDX_GH2I] - + k[8429]*y_cur[IDX_GCI] - k[8501]*y_cur[IDX_GCHI] - + k[8643]*y_cur[IDX_GHI] - k[8680]*y_cur[IDX_GCI] - + k[8734]*y_cur[IDX_GCHI]; + data[jistart + 2171] = 0.0 + k[8427]*y_cur[IDX_GCI]; + data[jistart + 2172] = 0.0 - k[8501]*y_cur[IDX_GC8I] - k[8734]*y_cur[IDX_GC8I]; + data[jistart + 2173] = 0.0 - k[8388]*y_cur[IDX_GC8I]; + data[jistart + 2174] = 0.0 + k[7055]; + data[jistart + 2175] = 0.0 + k[8427]*y_cur[IDX_GC7I] - k[8429]*y_cur[IDX_GC8I] - + k[8680]*y_cur[IDX_GC8I]; + data[jistart + 2176] = 0.0 - k[8357]*y_cur[IDX_GC8I] - k[8643]*y_cur[IDX_GC8I]; + data[jistart + 2177] = 0.0 + k[7889] + k[8269]; + data[jistart + 2178] = 0.0 + k[7890] + k[8270] + k[8520]*y_cur[IDX_GOHI] + + k[8566]*y_cur[IDX_GCH3OI] - k[8574]*y_cur[IDX_GCH2OHI]; + data[jistart + 2179] = 0.0 - k[7111] - k[7293] - k[7475] - k[7882] - k[8265] - + k[8300]*y_cur[IDX_GHI] - k[8546]*y_cur[IDX_GCH3I] - + k[8568]*y_cur[IDX_GCOI] - k[8569]*y_cur[IDX_GHCOI] - + k[8570]*y_cur[IDX_GH2COI] - k[8571]*y_cur[IDX_GCH3CHOI] - + k[8572]*y_cur[IDX_GCH3CHOI] - k[8573]*y_cur[IDX_GCH3CHOI] - + k[8574]*y_cur[IDX_GCH2OHCHOI] - k[8599]*y_cur[IDX_GHI] - + k[8753]*y_cur[IDX_GCH3I] - k[8761]*y_cur[IDX_GCOI] - + k[8762]*y_cur[IDX_GHCOI]; + data[jistart + 2180] = 0.0 + k[7697] + k[7998]; + data[jistart + 2181] = 0.0 + k[8566]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 2182] = 0.0 - k[8571]*y_cur[IDX_GCH2OHI] - k[8572]*y_cur[IDX_GCH2OHI] - + k[8573]*y_cur[IDX_GCH2OHI]; + data[jistart + 2183] = 0.0 + k[8297]*y_cur[IDX_GHI] - k[8570]*y_cur[IDX_GCH2OHI]; + data[jistart + 2184] = 0.0 - k[8569]*y_cur[IDX_GCH2OHI] - k[8762]*y_cur[IDX_GCH2OHI]; + data[jistart + 2185] = 0.0 + k[6929]; + data[jistart + 2186] = 0.0 + k[8518]*y_cur[IDX_GCH2I] + k[8520]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 2187] = 0.0 - k[8568]*y_cur[IDX_GCH2OHI] - k[8761]*y_cur[IDX_GCH2OHI]; + data[jistart + 2188] = 0.0 + k[8518]*y_cur[IDX_GOHI]; + data[jistart + 2189] = 0.0 - k[8546]*y_cur[IDX_GCH2OHI] - k[8753]*y_cur[IDX_GCH2OHI]; + data[jistart + 2190] = 0.0 + k[8297]*y_cur[IDX_GH2COI] - k[8300]*y_cur[IDX_GCH2OHI] - + k[8599]*y_cur[IDX_GCH2OHI]; + data[jistart + 2191] = 0.0 + k[7770] + k[8090]; + data[jistart + 2192] = 0.0 + k[8368]*y_cur[IDX_GHI] + k[8567]*y_cur[IDX_GCH3OI] + + k[8574]*y_cur[IDX_GCH2OHI]; + data[jistart + 2193] = 0.0 + k[8564]*y_cur[IDX_GCH3OI]; + data[jistart + 2194] = 0.0 + k[7825] + k[8346]*y_cur[IDX_GHI] + k[8565]*y_cur[IDX_GCH3OI]; + data[jistart + 2195] = 0.0 + k[8300]*y_cur[IDX_GHI] + k[8570]*y_cur[IDX_GH2COI] + + k[8572]*y_cur[IDX_GCH3CHOI] + k[8574]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 2196] = 0.0 - k[7118] - k[7300] - k[7482] - k[7697] - k[7698] - k[7699] - + k[7700] - k[7701] - k[7702] - k[7997] - k[7998] - k[7999] - k[8000] + - k[8001] - k[8002]; + data[jistart + 2197] = 0.0 + k[8299]*y_cur[IDX_GHI] + k[8560]*y_cur[IDX_GH2COI] + + k[8562]*y_cur[IDX_GCH3CHOI] + k[8564]*y_cur[IDX_GHCOOHI] + + k[8565]*y_cur[IDX_GHCOOCH3I] + k[8567]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 2198] = 0.0 + k[8507]*y_cur[IDX_GOHI] + k[8562]*y_cur[IDX_GCH3OI] + + k[8572]*y_cur[IDX_GCH2OHI]; + data[jistart + 2199] = 0.0 + k[8560]*y_cur[IDX_GCH3OI] + k[8570]*y_cur[IDX_GCH2OHI]; + data[jistart + 2200] = 0.0 + k[8507]*y_cur[IDX_GCH3CHOI] + k[8513]*y_cur[IDX_GCH3I]; + data[jistart + 2201] = 0.0 + k[8513]*y_cur[IDX_GOHI]; + data[jistart + 2202] = 0.0 + k[6936]; + data[jistart + 2203] = 0.0 + k[8299]*y_cur[IDX_GCH3OI] + k[8300]*y_cur[IDX_GCH2OHI] + + k[8346]*y_cur[IDX_GHCOOCH3I] + k[8368]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 2204] = 0.0 + k[379]*y_cur[IDX_HII]; + data[jistart + 2205] = 0.0 - k[1021]*y_cur[IDX_eM] - k[1022]*y_cur[IDX_eM] - + k[6763]*y_cur[IDX_GRAINM] - k[6764]*y_cur[IDX_GRAINM]; + data[jistart + 2206] = 0.0 + k[2715]*y_cur[IDX_H3II] + k[2813]*y_cur[IDX_H3OII] + + k[2976]*y_cur[IDX_HCOII]; + data[jistart + 2207] = 0.0 + k[2112]*y_cur[IDX_C2H6I] + k[2132]*y_cur[IDX_CH3OHI]; + data[jistart + 2208] = 0.0 + k[3839]*y_cur[IDX_SI]; + data[jistart + 2209] = 0.0 + k[2112]*y_cur[IDX_S2II]; + data[jistart + 2210] = 0.0 + k[2132]*y_cur[IDX_S2II]; + data[jistart + 2211] = 0.0 + k[3839]*y_cur[IDX_H3SII]; + data[jistart + 2212] = 0.0 + k[2813]*y_cur[IDX_HS2I]; + data[jistart + 2213] = 0.0 + k[379]*y_cur[IDX_H2S2I]; + data[jistart + 2214] = 0.0 + k[2976]*y_cur[IDX_HS2I]; + data[jistart + 2215] = 0.0 + k[2715]*y_cur[IDX_HS2I]; + data[jistart + 2216] = 0.0 - k[6763]*y_cur[IDX_H2S2II] - k[6764]*y_cur[IDX_H2S2II]; + data[jistart + 2217] = 0.0 - k[1021]*y_cur[IDX_H2S2II] - k[1022]*y_cur[IDX_H2S2II]; + data[jistart + 2218] = 0.0 - k[1059]*y_cur[IDX_eM] - k[1060]*y_cur[IDX_eM] - + k[6676]*y_cur[IDX_GRAINM] - k[6677]*y_cur[IDX_GRAINM]; + data[jistart + 2219] = 0.0 + k[1351]*y_cur[IDX_CII]; + data[jistart + 2220] = 0.0 + k[382]*y_cur[IDX_HII]; + data[jistart + 2221] = 0.0 + k[2633]*y_cur[IDX_H3II] + k[2784]*y_cur[IDX_H3OII] + + k[2937]*y_cur[IDX_HCOII]; + data[jistart + 2222] = 0.0 + k[1569]*y_cur[IDX_C2H2I]; + data[jistart + 2223] = 0.0 + k[1526]*y_cur[IDX_C2H2II]; + data[jistart + 2224] = 0.0 + k[1526]*y_cur[IDX_PI]; + data[jistart + 2225] = 0.0 + k[1569]*y_cur[IDX_PII]; + data[jistart + 2226] = 0.0 + k[2784]*y_cur[IDX_CCPI]; + data[jistart + 2227] = 0.0 + k[1351]*y_cur[IDX_CH2PHI]; + data[jistart + 2228] = 0.0 + k[382]*y_cur[IDX_HC2PI]; + data[jistart + 2229] = 0.0 + k[2937]*y_cur[IDX_CCPI]; + data[jistart + 2230] = 0.0 + k[2633]*y_cur[IDX_CCPI]; + data[jistart + 2231] = 0.0 - k[6676]*y_cur[IDX_HC2PII] - k[6677]*y_cur[IDX_HC2PII]; + data[jistart + 2232] = 0.0 - k[1059]*y_cur[IDX_HC2PII] - k[1060]*y_cur[IDX_HC2PII]; + data[jistart + 2233] = 0.0 + k[2416]*y_cur[IDX_H2I]; + data[jistart + 2234] = 0.0 - k[1077]*y_cur[IDX_eM] - k[1078]*y_cur[IDX_eM] - + k[2447]*y_cur[IDX_H2I] - k[6787]*y_cur[IDX_GRAINM] - + k[6788]*y_cur[IDX_GRAINM]; + data[jistart + 2235] = 0.0 + k[385]*y_cur[IDX_HII]; + data[jistart + 2236] = 0.0 + k[3415]*y_cur[IDX_NI]; + data[jistart + 2237] = 0.0 + k[2870]*y_cur[IDX_HCNI]; + data[jistart + 2238] = 0.0 + k[1473]*y_cur[IDX_C2HII]; + data[jistart + 2239] = 0.0 + k[1473]*y_cur[IDX_HC3NI]; + data[jistart + 2240] = 0.0 + k[2616]*y_cur[IDX_H3II] + k[2921]*y_cur[IDX_HCOII]; + data[jistart + 2241] = 0.0 + k[2870]*y_cur[IDX_C4HII]; + data[jistart + 2242] = 0.0 + k[3415]*y_cur[IDX_C5H2II]; + data[jistart + 2243] = 0.0 + k[385]*y_cur[IDX_HC5NI]; + data[jistart + 2244] = 0.0 + k[2921]*y_cur[IDX_C5NI]; + data[jistart + 2245] = 0.0 + k[2616]*y_cur[IDX_C5NI]; + data[jistart + 2246] = 0.0 - k[6787]*y_cur[IDX_HC5NII] - k[6788]*y_cur[IDX_HC5NII]; + data[jistart + 2247] = 0.0 + k[2416]*y_cur[IDX_C5NII] - k[2447]*y_cur[IDX_HC5NII]; + data[jistart + 2248] = 0.0 - k[1077]*y_cur[IDX_HC5NII] - k[1078]*y_cur[IDX_HC5NII]; + data[jistart + 2249] = 0.0 + k[7086] + k[7268] + k[7450]; + data[jistart + 2250] = 0.0 + k[8585]*y_cur[IDX_GHI]; + data[jistart + 2251] = 0.0 + k[1005]*y_cur[IDX_eM] + k[6350]*y_cur[IDX_GRAINM]; + data[jistart + 2252] = 0.0 + k[5139]*y_cur[IDX_H2I] + k[5151]*y_cur[IDX_H2OI] + + k[5464]*y_cur[IDX_OHI]; + data[jistart + 2253] = 0.0 - k[1412]*y_cur[IDX_CII] - k[2705]*y_cur[IDX_H3II] - + k[3015]*y_cur[IDX_SiII] - k[3260]*y_cur[IDX_HeII] - k[5865] - + k[6196] - k[6904]; + data[jistart + 2254] = 0.0 - k[3015]*y_cur[IDX_HFI]; + data[jistart + 2255] = 0.0 + k[5464]*y_cur[IDX_FI]; + data[jistart + 2256] = 0.0 + k[8585]*y_cur[IDX_GFI]; + data[jistart + 2257] = 0.0 - k[3260]*y_cur[IDX_HFI]; + data[jistart + 2258] = 0.0 - k[1412]*y_cur[IDX_HFI]; + data[jistart + 2259] = 0.0 + k[5151]*y_cur[IDX_FI]; + data[jistart + 2260] = 0.0 - k[2705]*y_cur[IDX_HFI]; + data[jistart + 2261] = 0.0 + k[6350]*y_cur[IDX_H2FII]; + data[jistart + 2262] = 0.0 + k[5139]*y_cur[IDX_FI]; + data[jistart + 2263] = 0.0 + k[1005]*y_cur[IDX_H2FII]; + data[jistart + 2264] = 0.0 + k[7155] + k[7337] + k[7519]; + data[jistart + 2265] = 0.0 + k[8622]*y_cur[IDX_GHI]; + data[jistart + 2266] = 0.0 + k[1096]*y_cur[IDX_eM] + k[6534]*y_cur[IDX_GRAINM]; + data[jistart + 2267] = 0.0 - k[522]*y_cur[IDX_HeII] - k[2352]*y_cur[IDX_HII] - + k[2713]*y_cur[IDX_H3II] - k[5217]*y_cur[IDX_CI] - + k[5218]*y_cur[IDX_OI] - k[5872] - k[6203] - k[6973]; + data[jistart + 2268] = 0.0 + k[8622]*y_cur[IDX_GCNOI]; + data[jistart + 2269] = 0.0 - k[5218]*y_cur[IDX_HONCI]; + data[jistart + 2270] = 0.0 - k[522]*y_cur[IDX_HONCI]; + data[jistart + 2271] = 0.0 - k[2352]*y_cur[IDX_HONCI]; + data[jistart + 2272] = 0.0 - k[5217]*y_cur[IDX_HONCI]; + data[jistart + 2273] = 0.0 - k[2713]*y_cur[IDX_HONCI]; + data[jistart + 2274] = 0.0 + k[6534]*y_cur[IDX_HCNOHII]; + data[jistart + 2275] = 0.0 + k[1096]*y_cur[IDX_HCNOHII]; + data[jistart + 2276] = 0.0 - k[1147]*y_cur[IDX_eM] - k[1148]*y_cur[IDX_eM] - + k[2556]*y_cur[IDX_H2OI] - k[2580]*y_cur[IDX_H2SI] - + k[2880]*y_cur[IDX_HCNI] - k[3591]*y_cur[IDX_NH3I] - + k[6719]*y_cur[IDX_GRAINM] - k[6720]*y_cur[IDX_GRAINM]; + data[jistart + 2277] = 0.0 + k[3883]*y_cur[IDX_SI]; + data[jistart + 2278] = 0.0 + k[2761]*y_cur[IDX_H3II] + k[3006]*y_cur[IDX_HCOII]; + data[jistart + 2279] = 0.0 - k[2580]*y_cur[IDX_HSiSII]; + data[jistart + 2280] = 0.0 - k[2880]*y_cur[IDX_HSiSII]; + data[jistart + 2281] = 0.0 + k[3883]*y_cur[IDX_SiH2II]; + data[jistart + 2282] = 0.0 - k[3591]*y_cur[IDX_HSiSII]; + data[jistart + 2283] = 0.0 - k[2556]*y_cur[IDX_HSiSII]; + data[jistart + 2284] = 0.0 + k[3006]*y_cur[IDX_SiSI]; + data[jistart + 2285] = 0.0 + k[2761]*y_cur[IDX_SiSI]; + data[jistart + 2286] = 0.0 - k[6719]*y_cur[IDX_HSiSII] - k[6720]*y_cur[IDX_HSiSII]; + data[jistart + 2287] = 0.0 - k[1147]*y_cur[IDX_HSiSII] - k[1148]*y_cur[IDX_HSiSII]; + data[jistart + 2288] = 0.0 - k[1197]*y_cur[IDX_eM] - k[1198]*y_cur[IDX_eM] - + k[6569]*y_cur[IDX_GRAINM] - k[6570]*y_cur[IDX_GRAINM]; + data[jistart + 2289] = 0.0 + k[2451]*y_cur[IDX_H2I]; + data[jistart + 2290] = 0.0 + k[2701]*y_cur[IDX_H3II] + k[2808]*y_cur[IDX_H3OII] + + k[2972]*y_cur[IDX_HCOII]; + data[jistart + 2291] = 0.0 + k[1714]*y_cur[IDX_C2H4I]; + data[jistart + 2292] = 0.0 + k[1712]*y_cur[IDX_C2H4I]; + data[jistart + 2293] = 0.0 + k[2211]*y_cur[IDX_CH4I]; + data[jistart + 2294] = 0.0 + k[2094]*y_cur[IDX_CH3II]; + data[jistart + 2295] = 0.0 + k[1712]*y_cur[IDX_PHII] + k[1714]*y_cur[IDX_PH2II]; + data[jistart + 2296] = 0.0 + k[2211]*y_cur[IDX_PII]; + data[jistart + 2297] = 0.0 + k[2094]*y_cur[IDX_PI]; + data[jistart + 2298] = 0.0 + k[2808]*y_cur[IDX_HCPI]; + data[jistart + 2299] = 0.0 + k[2972]*y_cur[IDX_HCPI]; + data[jistart + 2300] = 0.0 + k[2701]*y_cur[IDX_HCPI]; + data[jistart + 2301] = 0.0 - k[6569]*y_cur[IDX_PCH2II] - k[6570]*y_cur[IDX_PCH2II]; + data[jistart + 2302] = 0.0 + k[2451]*y_cur[IDX_HCPII]; + data[jistart + 2303] = 0.0 - k[1197]*y_cur[IDX_PCH2II] - k[1198]*y_cur[IDX_PCH2II]; + data[jistart + 2304] = 0.0 - k[680]*y_cur[IDX_O2I] - k[1221]*y_cur[IDX_eM] - + k[1222]*y_cur[IDX_eM] - k[2290]*y_cur[IDX_COI] - + k[2471]*y_cur[IDX_H2I] - k[2847]*y_cur[IDX_HI] - + k[6750]*y_cur[IDX_GRAINM] - k[6751]*y_cur[IDX_GRAINM]; + data[jistart + 2305] = 0.0 + k[315]*y_cur[IDX_CO2II] + k[416]*y_cur[IDX_HII] + + k[527]*y_cur[IDX_HeII] + k[665]*y_cur[IDX_OII]; + data[jistart + 2306] = 0.0 + k[315]*y_cur[IDX_SO2I]; + data[jistart + 2307] = 0.0 + k[665]*y_cur[IDX_SO2I]; + data[jistart + 2308] = 0.0 - k[680]*y_cur[IDX_SO2II]; + data[jistart + 2309] = 0.0 + k[527]*y_cur[IDX_SO2I]; + data[jistart + 2310] = 0.0 + k[416]*y_cur[IDX_SO2I]; + data[jistart + 2311] = 0.0 - k[2290]*y_cur[IDX_SO2II]; + data[jistart + 2312] = 0.0 - k[6750]*y_cur[IDX_SO2II] - k[6751]*y_cur[IDX_SO2II]; + data[jistart + 2313] = 0.0 - k[2471]*y_cur[IDX_SO2II]; + data[jistart + 2314] = 0.0 - k[1221]*y_cur[IDX_SO2II] - k[1222]*y_cur[IDX_SO2II]; + data[jistart + 2315] = 0.0 - k[2847]*y_cur[IDX_SO2II]; + data[jistart + 2316] = 0.0 - k[1260]*y_cur[IDX_eM] - k[3761]*y_cur[IDX_OI] - + k[6501]*y_cur[IDX_GRAINM]; + data[jistart + 2317] = 0.0 + k[3762]*y_cur[IDX_OI]; + data[jistart + 2318] = 0.0 + k[2350]*y_cur[IDX_HII] + k[3267]*y_cur[IDX_HeII]; + data[jistart + 2319] = 0.0 + k[203]*y_cur[IDX_CII] + k[432]*y_cur[IDX_HII]; + data[jistart + 2320] = 0.0 + k[3471]*y_cur[IDX_NI]; + data[jistart + 2321] = 0.0 + k[3625]*y_cur[IDX_SiII]; + data[jistart + 2322] = 0.0 + k[3625]*y_cur[IDX_NHI]; + data[jistart + 2323] = 0.0 + k[3471]*y_cur[IDX_SiHII]; + data[jistart + 2324] = 0.0 - k[3761]*y_cur[IDX_SiNII] + k[3762]*y_cur[IDX_SiNCII]; + data[jistart + 2325] = 0.0 + k[3267]*y_cur[IDX_HNSiI]; + data[jistart + 2326] = 0.0 + k[203]*y_cur[IDX_SiNI]; + data[jistart + 2327] = 0.0 + k[432]*y_cur[IDX_SiNI] + k[2350]*y_cur[IDX_HNSiI]; + data[jistart + 2328] = 0.0 - k[6501]*y_cur[IDX_SiNII]; + data[jistart + 2329] = 0.0 - k[1260]*y_cur[IDX_SiNII]; + data[jistart + 2330] = 0.0 - k[889]*y_cur[IDX_eM] - k[890]*y_cur[IDX_eM] - + k[2424]*y_cur[IDX_H2I] - k[6855]*y_cur[IDX_GRAINM] - + k[6856]*y_cur[IDX_GRAINM]; + data[jistart + 2331] = 0.0 + k[3152]*y_cur[IDX_HeII]; + data[jistart + 2332] = 0.0 + k[1335]*y_cur[IDX_CII]; + data[jistart + 2333] = 0.0 + k[1881]*y_cur[IDX_CI]; + data[jistart + 2334] = 0.0 + k[3072]*y_cur[IDX_HeII]; + data[jistart + 2335] = 0.0 + k[2313]*y_cur[IDX_HII] + k[3155]*y_cur[IDX_HeII]; + data[jistart + 2336] = 0.0 + k[3061]*y_cur[IDX_HeII]; + data[jistart + 2337] = 0.0 + k[1337]*y_cur[IDX_CII]; + data[jistart + 2338] = 0.0 + k[355]*y_cur[IDX_HII] + k[6061]; + data[jistart + 2339] = 0.0 + k[5501]*y_cur[IDX_CII]; + data[jistart + 2340] = 0.0 + k[3061]*y_cur[IDX_C10I] + k[3072]*y_cur[IDX_C10HI] + + k[3152]*y_cur[IDX_C9H2I] + k[3155]*y_cur[IDX_C9HI]; + data[jistart + 2341] = 0.0 + k[1335]*y_cur[IDX_C8H2I] + k[1337]*y_cur[IDX_C8HI] + + k[5501]*y_cur[IDX_C8I]; + data[jistart + 2342] = 0.0 + k[355]*y_cur[IDX_C9I] + k[2313]*y_cur[IDX_C9HI]; + data[jistart + 2343] = 0.0 + k[1881]*y_cur[IDX_C8H2II]; + data[jistart + 2344] = 0.0 - k[6855]*y_cur[IDX_C9II] - k[6856]*y_cur[IDX_C9II]; + data[jistart + 2345] = 0.0 - k[2424]*y_cur[IDX_C9II]; + data[jistart + 2346] = 0.0 - k[889]*y_cur[IDX_C9II] - k[890]*y_cur[IDX_C9II]; + data[jistart + 2347] = 0.0 + k[7202] + k[7384] + k[7559]; + data[jistart + 2348] = 0.0 + k[1279]*y_cur[IDX_eM] + k[6705]*y_cur[IDX_GRAINM]; + data[jistart + 2349] = 0.0 + k[8761]*y_cur[IDX_GCOI]; + data[jistart + 2350] = 0.0 - k[5655]*y_cur[IDX_CII] - k[5656]*y_cur[IDX_H3II] - + k[5657]*y_cur[IDX_H3OII] - k[5658]*y_cur[IDX_HCOII] - + k[5659]*y_cur[IDX_HeII] - k[5660]*y_cur[IDX_HeII] - k[5944] - + k[6294] - k[7020]; + data[jistart + 2351] = 0.0 + k[8761]*y_cur[IDX_GCH2OHI]; + data[jistart + 2352] = 0.0 - k[5657]*y_cur[IDX_CH2OHCOI]; + data[jistart + 2353] = 0.0 - k[5659]*y_cur[IDX_CH2OHCOI] - k[5660]*y_cur[IDX_CH2OHCOI]; + data[jistart + 2354] = 0.0 - k[5655]*y_cur[IDX_CH2OHCOI]; + data[jistart + 2355] = 0.0 - k[5658]*y_cur[IDX_CH2OHCOI]; + data[jistart + 2356] = 0.0 - k[5656]*y_cur[IDX_CH2OHCOI]; + data[jistart + 2357] = 0.0 + k[6705]*y_cur[IDX_CH2OHCHOII]; + data[jistart + 2358] = 0.0 + k[1279]*y_cur[IDX_CH2OHCHOII]; + data[jistart + 2359] = 0.0 + k[7236] + k[7418] + k[7600]; + data[jistart + 2360] = 0.0 + k[8757]*y_cur[IDX_GCH3I]; + data[jistart + 2361] = 0.0 + k[931]*y_cur[IDX_eM] + k[6834]*y_cur[IDX_GRAINM]; + data[jistart + 2362] = 0.0 - k[1359]*y_cur[IDX_CII] - k[2322]*y_cur[IDX_HII] - + k[2644]*y_cur[IDX_H3II] - k[2945]*y_cur[IDX_HCOII] - + k[3180]*y_cur[IDX_HeII] - k[5798] - k[6102] - k[7054]; + data[jistart + 2363] = 0.0 + k[8757]*y_cur[IDX_GC5NI]; + data[jistart + 2364] = 0.0 - k[3180]*y_cur[IDX_CH3C5NI]; + data[jistart + 2365] = 0.0 - k[1359]*y_cur[IDX_CH3C5NI]; + data[jistart + 2366] = 0.0 - k[2322]*y_cur[IDX_CH3C5NI]; + data[jistart + 2367] = 0.0 - k[2945]*y_cur[IDX_CH3C5NI]; + data[jistart + 2368] = 0.0 - k[2644]*y_cur[IDX_CH3C5NI]; + data[jistart + 2369] = 0.0 + k[6834]*y_cur[IDX_CH3C5NHII]; + data[jistart + 2370] = 0.0 + k[931]*y_cur[IDX_CH3C5NHII]; + data[jistart + 2371] = 0.0 + k[7245] + k[7427] + k[7609]; + data[jistart + 2372] = 0.0 + k[933]*y_cur[IDX_eM] + k[6867]*y_cur[IDX_GRAINM]; + data[jistart + 2373] = 0.0 + k[8758]*y_cur[IDX_GCH3I]; + data[jistart + 2374] = 0.0 - k[1362]*y_cur[IDX_CII] - k[2324]*y_cur[IDX_HII] - + k[2646]*y_cur[IDX_H3II] - k[2947]*y_cur[IDX_HCOII] - + k[3183]*y_cur[IDX_HeII] - k[5800] - k[6104] - k[7063]; + data[jistart + 2375] = 0.0 + k[8758]*y_cur[IDX_GC7NI]; + data[jistart + 2376] = 0.0 - k[3183]*y_cur[IDX_CH3C7NI]; + data[jistart + 2377] = 0.0 - k[1362]*y_cur[IDX_CH3C7NI]; + data[jistart + 2378] = 0.0 - k[2324]*y_cur[IDX_CH3C7NI]; + data[jistart + 2379] = 0.0 - k[2947]*y_cur[IDX_CH3C7NI]; + data[jistart + 2380] = 0.0 - k[2646]*y_cur[IDX_CH3C7NI]; + data[jistart + 2381] = 0.0 + k[6867]*y_cur[IDX_CH3C7NHII]; + data[jistart + 2382] = 0.0 + k[933]*y_cur[IDX_CH3C7NHII]; + data[jistart + 2383] = 0.0 + k[7715] + k[8021]; + data[jistart + 2384] = 0.0 + k[7837] + k[8162]; + data[jistart + 2385] = 0.0 + k[7716] + k[8023]; + data[jistart + 2386] = 0.0 + k[7720] + k[8027]; + data[jistart + 2387] = 0.0 - k[7127] - k[7309] - k[7491] - k[7714] - k[8020] - + k[8316]*y_cur[IDX_GHI] - k[8378]*y_cur[IDX_GH2I] - + k[8379]*y_cur[IDX_GH2I] - k[8417]*y_cur[IDX_GCI] - + k[8466]*y_cur[IDX_GNI] - k[8492]*y_cur[IDX_GCHI] - + k[8611]*y_cur[IDX_GHI] - k[8668]*y_cur[IDX_GCI] - + k[8706]*y_cur[IDX_GNI] - k[8725]*y_cur[IDX_GCHI]; + data[jistart + 2388] = 0.0 + k[7834] + k[8158]; + data[jistart + 2389] = 0.0 + k[7850] + k[8181]; + data[jistart + 2390] = 0.0 + k[8411]*y_cur[IDX_GCI]; + data[jistart + 2391] = 0.0 + k[8315]*y_cur[IDX_GHI] + k[8377]*y_cur[IDX_GH2I]; + data[jistart + 2392] = 0.0 + k[8486]*y_cur[IDX_GCHI]; + data[jistart + 2393] = 0.0 - k[8466]*y_cur[IDX_GC3HI] - k[8706]*y_cur[IDX_GC3HI]; + data[jistart + 2394] = 0.0 + k[8486]*y_cur[IDX_GC2I] - k[8492]*y_cur[IDX_GC3HI] - + k[8725]*y_cur[IDX_GC3HI]; + data[jistart + 2395] = 0.0 + k[8377]*y_cur[IDX_GC3I] - k[8378]*y_cur[IDX_GC3HI] - + k[8379]*y_cur[IDX_GC3HI]; + data[jistart + 2396] = 0.0 + k[8411]*y_cur[IDX_GC2HI] - k[8417]*y_cur[IDX_GC3HI] - + k[8668]*y_cur[IDX_GC3HI]; + data[jistart + 2397] = 0.0 + k[6945]; + data[jistart + 2398] = 0.0 + k[8315]*y_cur[IDX_GC3I] - k[8316]*y_cur[IDX_GC3HI] - + k[8611]*y_cur[IDX_GC3HI]; + data[jistart + 2399] = 0.0 + k[7841] + k[8167]; + data[jistart + 2400] = 0.0 + k[7795] + k[8119]; + data[jistart + 2401] = 0.0 + k[7855] + k[8187]; + data[jistart + 2402] = 0.0 + k[7792] + k[7794] + k[8116] + k[8118]; + data[jistart + 2403] = 0.0 + k[7853]; + data[jistart + 2404] = 0.0 + k[8417]*y_cur[IDX_GCI]; + data[jistart + 2405] = 0.0 - k[7178] - k[7360] - k[7542] - k[7788] - k[7789] - k[8112] - + k[8113] - k[8340]*y_cur[IDX_GHI] - k[8381]*y_cur[IDX_GH2I] - + k[8421]*y_cur[IDX_GCI] - k[8494]*y_cur[IDX_GCHI] - + k[8630]*y_cur[IDX_GHI] - k[8672]*y_cur[IDX_GCI] - + k[8727]*y_cur[IDX_GCHI]; + data[jistart + 2406] = 0.0 + k[8339]*y_cur[IDX_GHI] + k[8380]*y_cur[IDX_GH2I]; + data[jistart + 2407] = 0.0 + k[8491]*y_cur[IDX_GCHI]; + data[jistart + 2408] = 0.0 + k[8491]*y_cur[IDX_GC3I] - k[8494]*y_cur[IDX_GC4HI] - + k[8727]*y_cur[IDX_GC4HI]; + data[jistart + 2409] = 0.0 + k[8380]*y_cur[IDX_GC4I] - k[8381]*y_cur[IDX_GC4HI]; + data[jistart + 2410] = 0.0 + k[8417]*y_cur[IDX_GC3HI] - k[8421]*y_cur[IDX_GC4HI] - + k[8672]*y_cur[IDX_GC4HI]; + data[jistart + 2411] = 0.0 + k[6996]; + data[jistart + 2412] = 0.0 + k[8339]*y_cur[IDX_GC4I] - k[8340]*y_cur[IDX_GC4HI] - + k[8630]*y_cur[IDX_GC4HI]; + data[jistart + 2413] = 0.0 + k[7838] + k[8163]; + data[jistart + 2414] = 0.0 + k[8238] + k[8244]; + data[jistart + 2415] = 0.0 + k[8350]*y_cur[IDX_GHI] + k[8382]*y_cur[IDX_GH2I]; + data[jistart + 2416] = 0.0 + k[8421]*y_cur[IDX_GCI]; + data[jistart + 2417] = 0.0 - k[7210] - k[7392] - k[7574] - k[7833] - k[7834] - k[7835] - + k[8157] - k[8158] - k[8159] - k[8351]*y_cur[IDX_GHI] - + k[8383]*y_cur[IDX_GH2I] - k[8424]*y_cur[IDX_GCI] - + k[8468]*y_cur[IDX_GNI] - k[8496]*y_cur[IDX_GCHI] - + k[8637]*y_cur[IDX_GHI] - k[8675]*y_cur[IDX_GCI] - + k[8708]*y_cur[IDX_GNI] - k[8729]*y_cur[IDX_GCHI]; + data[jistart + 2418] = 0.0 + k[8493]*y_cur[IDX_GCHI]; + data[jistart + 2419] = 0.0 - k[8468]*y_cur[IDX_GC5HI] - k[8708]*y_cur[IDX_GC5HI]; + data[jistart + 2420] = 0.0 + k[8493]*y_cur[IDX_GC4I] - k[8496]*y_cur[IDX_GC5HI] - + k[8729]*y_cur[IDX_GC5HI]; + data[jistart + 2421] = 0.0 + k[8382]*y_cur[IDX_GC5I] - k[8383]*y_cur[IDX_GC5HI]; + data[jistart + 2422] = 0.0 + k[8421]*y_cur[IDX_GC4HI] - k[8424]*y_cur[IDX_GC5HI] - + k[8675]*y_cur[IDX_GC5HI]; + data[jistart + 2423] = 0.0 + k[7028]; + data[jistart + 2424] = 0.0 + k[8350]*y_cur[IDX_GC5I] - k[8351]*y_cur[IDX_GC5HI] - + k[8637]*y_cur[IDX_GC5HI]; + data[jistart + 2425] = 0.0 + k[7864] + k[8203]; + data[jistart + 2426] = 0.0 + k[7870] + k[8216] + k[8217]; + data[jistart + 2427] = 0.0 + k[8183] + k[8185]; + data[jistart + 2428] = 0.0 + k[8495]*y_cur[IDX_GCHI]; + data[jistart + 2429] = 0.0 + k[8198]; + data[jistart + 2430] = 0.0 + k[8352]*y_cur[IDX_GHI] + k[8384]*y_cur[IDX_GH2I]; + data[jistart + 2431] = 0.0 + k[8424]*y_cur[IDX_GCI]; + data[jistart + 2432] = 0.0 - k[7224] - k[7406] - k[7588] - k[7850] - k[7851] - k[7852] - + k[8181] - k[8182] - k[8353]*y_cur[IDX_GHI] - k[8385]*y_cur[IDX_GH2I] + - k[8426]*y_cur[IDX_GCI] - k[8498]*y_cur[IDX_GCHI] - + k[8639]*y_cur[IDX_GHI] - k[8677]*y_cur[IDX_GCI] - + k[8731]*y_cur[IDX_GCHI]; + data[jistart + 2433] = 0.0 + k[8495]*y_cur[IDX_GC5I] - k[8498]*y_cur[IDX_GC6HI] - + k[8731]*y_cur[IDX_GC6HI]; + data[jistart + 2434] = 0.0 + k[8384]*y_cur[IDX_GC6I] - k[8385]*y_cur[IDX_GC6HI]; + data[jistart + 2435] = 0.0 + k[8424]*y_cur[IDX_GC5HI] - k[8426]*y_cur[IDX_GC6HI] - + k[8677]*y_cur[IDX_GC6HI]; + data[jistart + 2436] = 0.0 + k[7042]; + data[jistart + 2437] = 0.0 + k[8352]*y_cur[IDX_GC6I] - k[8353]*y_cur[IDX_GC6HI] - + k[8639]*y_cur[IDX_GC6HI]; + data[jistart + 2438] = 0.0 - k[1006]*y_cur[IDX_eM] - k[1007]*y_cur[IDX_eM] - + k[2502]*y_cur[IDX_SiI] - k[6376]*y_cur[IDX_GRAINM] - + k[6377]*y_cur[IDX_GRAINM]; + data[jistart + 2439] = 0.0 + k[2535]*y_cur[IDX_H2OI]; + data[jistart + 2440] = 0.0 + k[3509]*y_cur[IDX_CNI]; + data[jistart + 2441] = 0.0 + k[3563]*y_cur[IDX_NH3I]; + data[jistart + 2442] = 0.0 + k[1963]*y_cur[IDX_NH3I]; + data[jistart + 2443] = 0.0 + k[1911]*y_cur[IDX_CI]; + data[jistart + 2444] = 0.0 - k[2502]*y_cur[IDX_H2NCII]; + data[jistart + 2445] = 0.0 + k[1418]*y_cur[IDX_CII] + k[1963]*y_cur[IDX_CHII] + + k[3563]*y_cur[IDX_C3HII]; + data[jistart + 2446] = 0.0 + k[3454]*y_cur[IDX_NI]; + data[jistart + 2447] = 0.0 + k[3509]*y_cur[IDX_NH2II]; + data[jistart + 2448] = 0.0 + k[3454]*y_cur[IDX_CH3II]; + data[jistart + 2449] = 0.0 + k[1418]*y_cur[IDX_NH3I]; + data[jistart + 2450] = 0.0 + k[2535]*y_cur[IDX_CNII]; + data[jistart + 2451] = 0.0 + k[1911]*y_cur[IDX_NH4II]; + data[jistart + 2452] = 0.0 - k[6376]*y_cur[IDX_H2NCII] - k[6377]*y_cur[IDX_H2NCII]; + data[jistart + 2453] = 0.0 - k[1006]*y_cur[IDX_H2NCII] - k[1007]*y_cur[IDX_H2NCII]; + data[jistart + 2454] = 0.0 + k[7170] + k[7352] + k[7534]; + data[jistart + 2455] = 0.0 + k[1051]*y_cur[IDX_eM] + k[6590]*y_cur[IDX_GRAINM]; + data[jistart + 2456] = 0.0 - k[176]*y_cur[IDX_CII] - k[381]*y_cur[IDX_HII] - + k[2341]*y_cur[IDX_HII] - k[2687]*y_cur[IDX_H3II] - + k[2802]*y_cur[IDX_H3OII] - k[2962]*y_cur[IDX_HCOII] - + k[3231]*y_cur[IDX_HeII] - k[5843] - k[6166] - k[6167] - k[6988]; + data[jistart + 2457] = 0.0 + k[5447]*y_cur[IDX_OI]; + data[jistart + 2458] = 0.0 - k[2802]*y_cur[IDX_H2SiOI]; + data[jistart + 2459] = 0.0 + k[5447]*y_cur[IDX_SiH3I]; + data[jistart + 2460] = 0.0 - k[3231]*y_cur[IDX_H2SiOI]; + data[jistart + 2461] = 0.0 - k[176]*y_cur[IDX_H2SiOI]; + data[jistart + 2462] = 0.0 - k[381]*y_cur[IDX_H2SiOI] - k[2341]*y_cur[IDX_H2SiOI]; + data[jistart + 2463] = 0.0 - k[2962]*y_cur[IDX_H2SiOI]; + data[jistart + 2464] = 0.0 - k[2687]*y_cur[IDX_H2SiOI]; + data[jistart + 2465] = 0.0 + k[6590]*y_cur[IDX_H3SiOII]; + data[jistart + 2466] = 0.0 + k[1051]*y_cur[IDX_H3SiOII]; + data[jistart + 2467] = 0.0 - k[1039]*y_cur[IDX_eM] - k[1040]*y_cur[IDX_eM] - + k[6601]*y_cur[IDX_GRAINM] - k[6602]*y_cur[IDX_GRAINM]; + data[jistart + 2468] = 0.0 + k[2683]*y_cur[IDX_H3II] + k[2959]*y_cur[IDX_HCOII]; + data[jistart + 2469] = 0.0 + k[2203]*y_cur[IDX_CH4I]; + data[jistart + 2470] = 0.0 + k[2092]*y_cur[IDX_CH3II]; + data[jistart + 2471] = 0.0 + k[1983]*y_cur[IDX_H2SI]; + data[jistart + 2472] = 0.0 + k[1675]*y_cur[IDX_H2SI]; + data[jistart + 2473] = 0.0 + k[3850]*y_cur[IDX_C2H4I]; + data[jistart + 2474] = 0.0 + k[3850]*y_cur[IDX_SOII]; + data[jistart + 2475] = 0.0 + k[1675]*y_cur[IDX_C2H4II] + k[1983]*y_cur[IDX_CH2II] + + k[2078]*y_cur[IDX_CH3II]; + data[jistart + 2476] = 0.0 + k[2215]*y_cur[IDX_CH4I]; + data[jistart + 2477] = 0.0 + k[2203]*y_cur[IDX_HSII] + k[2215]*y_cur[IDX_SII]; + data[jistart + 2478] = 0.0 + k[2078]*y_cur[IDX_H2SI] + k[2092]*y_cur[IDX_OCSI]; + data[jistart + 2479] = 0.0 + k[2959]*y_cur[IDX_H2CSI]; + data[jistart + 2480] = 0.0 + k[2683]*y_cur[IDX_H2CSI]; + data[jistart + 2481] = 0.0 - k[6601]*y_cur[IDX_H3CSII] - k[6602]*y_cur[IDX_H3CSII]; + data[jistart + 2482] = 0.0 - k[1039]*y_cur[IDX_H3CSII] - k[1040]*y_cur[IDX_H3CSII]; + data[jistart + 2483] = 0.0 - k[1055]*y_cur[IDX_eM] - k[1056]*y_cur[IDX_eM] - + k[1057]*y_cur[IDX_eM] - k[1058]*y_cur[IDX_eM] - + k[6486]*y_cur[IDX_GRAINM] - k[6487]*y_cur[IDX_GRAINM] - + k[6488]*y_cur[IDX_GRAINM] - k[6489]*y_cur[IDX_GRAINM]; + data[jistart + 2484] = 0.0 + k[2599]*y_cur[IDX_H3II] + k[2769]*y_cur[IDX_H3OII] + + k[2904]*y_cur[IDX_HCOII]; + data[jistart + 2485] = 0.0 + k[2520]*y_cur[IDX_H2OI]; + data[jistart + 2486] = 0.0 + k[3670]*y_cur[IDX_O2I]; + data[jistart + 2487] = 0.0 + k[1468]*y_cur[IDX_CO2I]; + data[jistart + 2488] = 0.0 + k[1468]*y_cur[IDX_C2HII]; + data[jistart + 2489] = 0.0 + k[3670]*y_cur[IDX_C3HII]; + data[jistart + 2490] = 0.0 + k[3690]*y_cur[IDX_OI]; + data[jistart + 2491] = 0.0 + k[3688]*y_cur[IDX_OI]; + data[jistart + 2492] = 0.0 + k[2769]*y_cur[IDX_C2OI]; + data[jistart + 2493] = 0.0 + k[3688]*y_cur[IDX_C2H2II] + k[3690]*y_cur[IDX_C2H3II]; + data[jistart + 2494] = 0.0 + k[2520]*y_cur[IDX_C2II]; + data[jistart + 2495] = 0.0 + k[2904]*y_cur[IDX_C2OI]; + data[jistart + 2496] = 0.0 + k[2599]*y_cur[IDX_C2OI]; + data[jistart + 2497] = 0.0 - k[6486]*y_cur[IDX_HC2OII] - k[6487]*y_cur[IDX_HC2OII] - + k[6488]*y_cur[IDX_HC2OII] - k[6489]*y_cur[IDX_HC2OII]; + data[jistart + 2498] = 0.0 - k[1055]*y_cur[IDX_HC2OII] - k[1056]*y_cur[IDX_HC2OII] - + k[1057]*y_cur[IDX_HC2OII] - k[1058]*y_cur[IDX_HC2OII]; + data[jistart + 2499] = 0.0 + k[2437]*y_cur[IDX_H2I]; + data[jistart + 2500] = 0.0 - k[1105]*y_cur[IDX_eM] - k[1106]*y_cur[IDX_eM] - + k[1906]*y_cur[IDX_CI] - k[2451]*y_cur[IDX_H2I] - + k[3737]*y_cur[IDX_OI] - k[6543]*y_cur[IDX_GRAINM] - + k[6544]*y_cur[IDX_GRAINM]; + data[jistart + 2501] = 0.0 + k[180]*y_cur[IDX_CII] + k[391]*y_cur[IDX_HII]; + data[jistart + 2502] = 0.0 + k[2677]*y_cur[IDX_H3II] + k[2796]*y_cur[IDX_H3OII] + + k[2955]*y_cur[IDX_HCOII]; + data[jistart + 2503] = 0.0 + k[2796]*y_cur[IDX_CPI]; + data[jistart + 2504] = 0.0 - k[3737]*y_cur[IDX_HCPII]; + data[jistart + 2505] = 0.0 + k[180]*y_cur[IDX_HCPI]; + data[jistart + 2506] = 0.0 + k[391]*y_cur[IDX_HCPI]; + data[jistart + 2507] = 0.0 - k[1906]*y_cur[IDX_HCPII]; + data[jistart + 2508] = 0.0 + k[2955]*y_cur[IDX_CPI]; + data[jistart + 2509] = 0.0 + k[2677]*y_cur[IDX_CPI]; + data[jistart + 2510] = 0.0 - k[6543]*y_cur[IDX_HCPII] - k[6544]*y_cur[IDX_HCPII]; + data[jistart + 2511] = 0.0 + k[2437]*y_cur[IDX_CPII] - k[2451]*y_cur[IDX_HCPII]; + data[jistart + 2512] = 0.0 - k[1105]*y_cur[IDX_HCPII] - k[1106]*y_cur[IDX_HCPII]; + data[jistart + 2513] = 0.0 + k[7228] + k[7410] + k[7592]; + data[jistart + 2514] = 0.0 + k[1241]*y_cur[IDX_eM] + k[6801]*y_cur[IDX_GRAINM]; + data[jistart + 2515] = 0.0 - k[424]*y_cur[IDX_HII] - k[2749]*y_cur[IDX_H3II] - + k[2996]*y_cur[IDX_HCOII] - k[3315]*y_cur[IDX_HeII] - + k[5442]*y_cur[IDX_OI] - k[5923] - k[6266] - k[7046]; + data[jistart + 2516] = 0.0 - k[5442]*y_cur[IDX_SiC4I]; + data[jistart + 2517] = 0.0 - k[3315]*y_cur[IDX_SiC4I]; + data[jistart + 2518] = 0.0 - k[424]*y_cur[IDX_SiC4I]; + data[jistart + 2519] = 0.0 - k[2996]*y_cur[IDX_SiC4I]; + data[jistart + 2520] = 0.0 - k[2749]*y_cur[IDX_SiC4I]; + data[jistart + 2521] = 0.0 + k[6801]*y_cur[IDX_SiC4HII]; + data[jistart + 2522] = 0.0 + k[1241]*y_cur[IDX_SiC4HII]; + data[jistart + 2523] = 0.0 + k[7194] + k[7376] + k[7560]; + data[jistart + 2524] = 0.0 + k[1263]*y_cur[IDX_eM] + k[6669]*y_cur[IDX_GRAINM]; + data[jistart + 2525] = 0.0 - k[433]*y_cur[IDX_HII] - k[2758]*y_cur[IDX_H3II] - + k[2825]*y_cur[IDX_H3OII] - k[3003]*y_cur[IDX_HCOII] - + k[3330]*y_cur[IDX_HeII] - k[5452]*y_cur[IDX_OI] - k[5932] - k[6282] + - k[6283] - k[7012]; + data[jistart + 2526] = 0.0 - k[2825]*y_cur[IDX_SiNCI]; + data[jistart + 2527] = 0.0 - k[5452]*y_cur[IDX_SiNCI]; + data[jistart + 2528] = 0.0 - k[3330]*y_cur[IDX_SiNCI]; + data[jistart + 2529] = 0.0 - k[433]*y_cur[IDX_SiNCI]; + data[jistart + 2530] = 0.0 - k[3003]*y_cur[IDX_SiNCI]; + data[jistart + 2531] = 0.0 - k[2758]*y_cur[IDX_SiNCI]; + data[jistart + 2532] = 0.0 + k[6669]*y_cur[IDX_SiNCHII]; + data[jistart + 2533] = 0.0 + k[1263]*y_cur[IDX_SiNCHII]; + data[jistart + 2534] = 0.0 + k[1930]*y_cur[IDX_CI]; + data[jistart + 2535] = 0.0 + k[2502]*y_cur[IDX_SiI]; + data[jistart + 2536] = 0.0 + k[433]*y_cur[IDX_HII]; + data[jistart + 2537] = 0.0 - k[1261]*y_cur[IDX_eM] - k[3762]*y_cur[IDX_OI] - + k[6654]*y_cur[IDX_GRAINM]; + data[jistart + 2538] = 0.0 + k[1414]*y_cur[IDX_CII]; + data[jistart + 2539] = 0.0 + k[3870]*y_cur[IDX_SiII]; + data[jistart + 2540] = 0.0 + k[2896]*y_cur[IDX_SiI]; + data[jistart + 2541] = 0.0 + k[3046]*y_cur[IDX_SiII]; + data[jistart + 2542] = 0.0 + k[2885]*y_cur[IDX_HCNI] + k[3046]*y_cur[IDX_HNCI] + + k[3870]*y_cur[IDX_NCCNI]; + data[jistart + 2543] = 0.0 + k[2502]*y_cur[IDX_H2NCII] + k[2896]*y_cur[IDX_HCNHII]; + data[jistart + 2544] = 0.0 + k[2885]*y_cur[IDX_SiII]; + data[jistart + 2545] = 0.0 - k[3762]*y_cur[IDX_SiNCII]; + data[jistart + 2546] = 0.0 + k[1414]*y_cur[IDX_HNSiI]; + data[jistart + 2547] = 0.0 + k[433]*y_cur[IDX_SiNCI]; + data[jistart + 2548] = 0.0 + k[1930]*y_cur[IDX_SiNH2II]; + data[jistart + 2549] = 0.0 - k[6654]*y_cur[IDX_SiNCII]; + data[jistart + 2550] = 0.0 - k[1261]*y_cur[IDX_SiNCII]; + data[jistart + 2551] = 0.0 + k[7142] + k[7324] + k[7506]; + data[jistart + 2552] = 0.0 + k[1130]*y_cur[IDX_eM] + k[6520]*y_cur[IDX_GRAINM]; + data[jistart + 2553] = 0.0 + k[1093]*y_cur[IDX_eM] + k[6515]*y_cur[IDX_GRAINM]; + data[jistart + 2554] = 0.0 + k[5218]*y_cur[IDX_OI]; + data[jistart + 2555] = 0.0 - k[1386]*y_cur[IDX_CII] - k[2672]*y_cur[IDX_H3II] - + k[2673]*y_cur[IDX_H3II] - k[3205]*y_cur[IDX_HeII] - + k[3206]*y_cur[IDX_HeII] - k[5161]*y_cur[IDX_HI] - + k[5389]*y_cur[IDX_OI] - k[5824] - k[6135] - k[6960]; + data[jistart + 2556] = 0.0 + k[8658]*y_cur[IDX_GCI]; + data[jistart + 2557] = 0.0 + k[8658]*y_cur[IDX_GNOI]; + data[jistart + 2558] = 0.0 + k[5218]*y_cur[IDX_HONCI] - k[5389]*y_cur[IDX_CNOI]; + data[jistart + 2559] = 0.0 - k[3205]*y_cur[IDX_CNOI] - k[3206]*y_cur[IDX_CNOI]; + data[jistart + 2560] = 0.0 - k[1386]*y_cur[IDX_CNOI]; + data[jistart + 2561] = 0.0 - k[2672]*y_cur[IDX_CNOI] - k[2673]*y_cur[IDX_CNOI]; + data[jistart + 2562] = 0.0 + k[6515]*y_cur[IDX_HCNOII] + k[6520]*y_cur[IDX_HONCII]; + data[jistart + 2563] = 0.0 + k[1093]*y_cur[IDX_HCNOII] + k[1130]*y_cur[IDX_HONCII]; + data[jistart + 2564] = 0.0 - k[5161]*y_cur[IDX_CNOI]; + data[jistart + 2565] = 0.0 + k[7804] + k[8131]; + data[jistart + 2566] = 0.0 + k[7811] + k[8140]; + data[jistart + 2567] = 0.0 + k[7722] + k[8030]; + data[jistart + 2568] = 0.0 + k[7730] + k[8039]; + data[jistart + 2569] = 0.0 + k[7676] + k[7679] + k[7963] + k[7966]; + data[jistart + 2570] = 0.0 + k[7670] + k[7957]; + data[jistart + 2571] = 0.0 + k[8287]*y_cur[IDX_GHI]; + data[jistart + 2572] = 0.0 - k[7094] - k[7276] - k[7458] - k[7652] - k[7653] - k[7654] - + k[7655] - k[7656] - k[7657] - k[7658] - k[7659] - k[7660] - k[7661] + - k[7662] - k[7663] - k[7664] - k[7939] - k[7940] - k[7941] - + k[7942] - k[7943] - k[7944] - k[7945] - k[7946] - k[7947] - k[7948] + - k[7949] - k[7950] - k[7951] - k[8288]*y_cur[IDX_GHI] - + k[8413]*y_cur[IDX_GCI] - k[8489]*y_cur[IDX_GCHI] - + k[8490]*y_cur[IDX_GCHI] - k[8589]*y_cur[IDX_GHI] - + k[8665]*y_cur[IDX_GCI] - k[8722]*y_cur[IDX_GCHI] - + k[8723]*y_cur[IDX_GCHI]; + data[jistart + 2573] = 0.0 + k[8482]*y_cur[IDX_GCHI]; + data[jistart + 2574] = 0.0 + k[8405]*y_cur[IDX_GCI]; + data[jistart + 2575] = 0.0 + k[8482]*y_cur[IDX_GCH2I] - k[8489]*y_cur[IDX_GC2H3I] - + k[8490]*y_cur[IDX_GC2H3I] - k[8722]*y_cur[IDX_GC2H3I] - + k[8723]*y_cur[IDX_GC2H3I]; + data[jistart + 2576] = 0.0 + k[8405]*y_cur[IDX_GCH3I] - k[8413]*y_cur[IDX_GC2H3I] - + k[8665]*y_cur[IDX_GC2H3I]; + data[jistart + 2577] = 0.0 + k[6912]; + data[jistart + 2578] = 0.0 + k[8287]*y_cur[IDX_GC2H2I] - k[8288]*y_cur[IDX_GC2H3I] - + k[8589]*y_cur[IDX_GC2H3I]; + data[jistart + 2579] = 0.0 + k[7888] + k[8268]; + data[jistart + 2580] = 0.0 - k[8566]*y_cur[IDX_GCH3OI] - k[8567]*y_cur[IDX_GCH3OI]; + data[jistart + 2581] = 0.0 - k[8564]*y_cur[IDX_GCH3OI]; + data[jistart + 2582] = 0.0 + k[8511]*y_cur[IDX_GOHI] - k[8565]*y_cur[IDX_GCH3OI]; + data[jistart + 2583] = 0.0 + k[7698] + k[7999]; + data[jistart + 2584] = 0.0 - k[7113] - k[7295] - k[7477] - k[7881] - k[8264] - + k[8299]*y_cur[IDX_GHI] - k[8545]*y_cur[IDX_GCH3I] - + k[8558]*y_cur[IDX_GCOI] - k[8559]*y_cur[IDX_GHCOI] - + k[8560]*y_cur[IDX_GH2COI] - k[8561]*y_cur[IDX_GH2COI] - + k[8562]*y_cur[IDX_GCH3CHOI] - k[8563]*y_cur[IDX_GCH3CHOI] - + k[8564]*y_cur[IDX_GHCOOHI] - k[8565]*y_cur[IDX_GHCOOCH3I] - + k[8566]*y_cur[IDX_GCH2OHCHOI] - k[8567]*y_cur[IDX_GCH2OHCHOI] - + k[8598]*y_cur[IDX_GHI] - k[8752]*y_cur[IDX_GCH3I] - + k[8759]*y_cur[IDX_GHCOI] - k[8760]*y_cur[IDX_GCOI]; + data[jistart + 2585] = 0.0 - k[8562]*y_cur[IDX_GCH3OI] - k[8563]*y_cur[IDX_GCH3OI]; + data[jistart + 2586] = 0.0 + k[8296]*y_cur[IDX_GHI] - k[8560]*y_cur[IDX_GCH3OI] - + k[8561]*y_cur[IDX_GCH3OI]; + data[jistart + 2587] = 0.0 + k[6931]; + data[jistart + 2588] = 0.0 - k[8559]*y_cur[IDX_GCH3OI] - k[8759]*y_cur[IDX_GCH3OI]; + data[jistart + 2589] = 0.0 + k[8511]*y_cur[IDX_GHCOOCH3I]; + data[jistart + 2590] = 0.0 - k[8558]*y_cur[IDX_GCH3OI] - k[8760]*y_cur[IDX_GCH3OI]; + data[jistart + 2591] = 0.0 + k[8441]*y_cur[IDX_GCH3I]; + data[jistart + 2592] = 0.0 + k[8441]*y_cur[IDX_GOI] - k[8545]*y_cur[IDX_GCH3OI] - + k[8752]*y_cur[IDX_GCH3OI]; + data[jistart + 2593] = 0.0 + k[8296]*y_cur[IDX_GH2COI] - k[8299]*y_cur[IDX_GCH3OI] - + k[8598]*y_cur[IDX_GCH3OI]; + data[jistart + 2594] = 0.0 + k[8310]*y_cur[IDX_GHI]; + data[jistart + 2595] = 0.0 + k[7743] + k[8054]; + data[jistart + 2596] = 0.0 + k[8519]*y_cur[IDX_GOHI]; + data[jistart + 2597] = 0.0 + k[8338]*y_cur[IDX_GHI] + k[8510]*y_cur[IDX_GOHI]; + data[jistart + 2598] = 0.0 + k[8512]*y_cur[IDX_GOHI]; + data[jistart + 2599] = 0.0 + k[7700] + k[8000]; + data[jistart + 2600] = 0.0 - k[7084] - k[7266] - k[7448] - k[7639] - k[7921] - k[7922] - + k[7923] - k[7924] - k[7925]; + data[jistart + 2601] = 0.0 + k[8506]*y_cur[IDX_GOHI]; + data[jistart + 2602] = 0.0 + k[8508]*y_cur[IDX_GOHI]; + data[jistart + 2603] = 0.0 + k[8530]*y_cur[IDX_GNH2I]; + data[jistart + 2604] = 0.0 + k[8530]*y_cur[IDX_GNOI]; + data[jistart + 2605] = 0.0 + k[8283]*y_cur[IDX_GHI] + k[8373]*y_cur[IDX_GH2I] + + k[8506]*y_cur[IDX_GCH3CHOI] + k[8508]*y_cur[IDX_GH2COI] + + k[8510]*y_cur[IDX_GHCOOHI] + k[8512]*y_cur[IDX_GHCOOCH3I] + + k[8519]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 2606] = 0.0 + k[8373]*y_cur[IDX_GOHI]; + data[jistart + 2607] = 0.0 + k[8283]*y_cur[IDX_GOHI] + k[8310]*y_cur[IDX_GH2O2I] + + k[8338]*y_cur[IDX_GHCOOHI]; + data[jistart + 2608] = 0.0 + k[6902]; + data[jistart + 2609] = 0.0 - k[1071]*y_cur[IDX_eM] - k[1072]*y_cur[IDX_eM] - + k[6778]*y_cur[IDX_GRAINM] - k[6779]*y_cur[IDX_GRAINM]; + data[jistart + 2610] = 0.0 + k[2607]*y_cur[IDX_H3II] + k[2777]*y_cur[IDX_H3OII] + + k[2912]*y_cur[IDX_HCOII]; + data[jistart + 2611] = 0.0 + k[3827]*y_cur[IDX_SII]; + data[jistart + 2612] = 0.0 + k[3820]*y_cur[IDX_SII]; + data[jistart + 2613] = 0.0 + k[1758]*y_cur[IDX_C3HII]; + data[jistart + 2614] = 0.0 + k[1758]*y_cur[IDX_OCSI] + k[2577]*y_cur[IDX_H2SI]; + data[jistart + 2615] = 0.0 + k[3835]*y_cur[IDX_SI]; + data[jistart + 2616] = 0.0 + k[3834]*y_cur[IDX_SI]; + data[jistart + 2617] = 0.0 + k[3838]*y_cur[IDX_SI]; + data[jistart + 2618] = 0.0 + k[2577]*y_cur[IDX_C3HII]; + data[jistart + 2619] = 0.0 + k[3820]*y_cur[IDX_C3H2I] + k[3827]*y_cur[IDX_H2CCCI]; + data[jistart + 2620] = 0.0 + k[3834]*y_cur[IDX_C3H2II] + k[3835]*y_cur[IDX_C3H3II] + + k[3838]*y_cur[IDX_CH2CCHII]; + data[jistart + 2621] = 0.0 + k[2777]*y_cur[IDX_C3SI]; + data[jistart + 2622] = 0.0 + k[2912]*y_cur[IDX_C3SI]; + data[jistart + 2623] = 0.0 + k[2607]*y_cur[IDX_C3SI]; + data[jistart + 2624] = 0.0 - k[6778]*y_cur[IDX_HC3SII] - k[6779]*y_cur[IDX_HC3SII]; + data[jistart + 2625] = 0.0 - k[1071]*y_cur[IDX_HC3SII] - k[1072]*y_cur[IDX_HC3SII]; + data[jistart + 2626] = 0.0 - k[1103]*y_cur[IDX_eM] - k[1104]*y_cur[IDX_eM] - + k[2113]*y_cur[IDX_CH3CHOI] - k[2117]*y_cur[IDX_CH3CNI] - + k[2127]*y_cur[IDX_CH3OHI] - k[2549]*y_cur[IDX_H2OI] - + k[3586]*y_cur[IDX_NH3I] - k[6610]*y_cur[IDX_GRAINM] - + k[6611]*y_cur[IDX_GRAINM]; + data[jistart + 2627] = 0.0 + k[2120]*y_cur[IDX_CH3OH2II] + k[2765]*y_cur[IDX_H3COII] + + k[2971]*y_cur[IDX_HCOII]; + data[jistart + 2628] = 0.0 + k[2120]*y_cur[IDX_HCOOHI]; + data[jistart + 2629] = 0.0 - k[2113]*y_cur[IDX_HCOOH2II]; + data[jistart + 2630] = 0.0 - k[2117]*y_cur[IDX_HCOOH2II]; + data[jistart + 2631] = 0.0 - k[2127]*y_cur[IDX_HCOOH2II]; + data[jistart + 2632] = 0.0 + k[2765]*y_cur[IDX_HCOOHI]; + data[jistart + 2633] = 0.0 + k[2208]*y_cur[IDX_CH4I]; + data[jistart + 2634] = 0.0 + k[2208]*y_cur[IDX_O2II]; + data[jistart + 2635] = 0.0 - k[3586]*y_cur[IDX_HCOOH2II]; + data[jistart + 2636] = 0.0 - k[2549]*y_cur[IDX_HCOOH2II] + k[5566]*y_cur[IDX_HCOII]; + data[jistart + 2637] = 0.0 + k[2971]*y_cur[IDX_HCOOHI] + k[5566]*y_cur[IDX_H2OI]; + data[jistart + 2638] = 0.0 - k[6610]*y_cur[IDX_HCOOH2II] - k[6611]*y_cur[IDX_HCOOH2II]; + data[jistart + 2639] = 0.0 - k[1103]*y_cur[IDX_HCOOH2II] - k[1104]*y_cur[IDX_HCOOH2II]; + data[jistart + 2640] = 0.0 + k[7149] + k[7331] + k[7513]; + data[jistart + 2641] = 0.0 + k[1264]*y_cur[IDX_eM] + k[6552]*y_cur[IDX_GRAINM]; + data[jistart + 2642] = 0.0 - k[394]*y_cur[IDX_HII] - k[1414]*y_cur[IDX_CII] - + k[2350]*y_cur[IDX_HII] - k[2710]*y_cur[IDX_H3II] - + k[2811]*y_cur[IDX_H3OII] - k[2974]*y_cur[IDX_HCOII] - + k[3267]*y_cur[IDX_HeII] - k[5870] - k[6201] - k[6967]; + data[jistart + 2643] = 0.0 + k[5294]*y_cur[IDX_NI]; + data[jistart + 2644] = 0.0 + k[5295]*y_cur[IDX_NI]; + data[jistart + 2645] = 0.0 + k[5294]*y_cur[IDX_SiH2I] + k[5295]*y_cur[IDX_SiH3I]; + data[jistart + 2646] = 0.0 - k[2811]*y_cur[IDX_HNSiI]; + data[jistart + 2647] = 0.0 - k[3267]*y_cur[IDX_HNSiI]; + data[jistart + 2648] = 0.0 - k[1414]*y_cur[IDX_HNSiI]; + data[jistart + 2649] = 0.0 - k[394]*y_cur[IDX_HNSiI] - k[2350]*y_cur[IDX_HNSiI]; + data[jistart + 2650] = 0.0 - k[2974]*y_cur[IDX_HNSiI]; + data[jistart + 2651] = 0.0 - k[2710]*y_cur[IDX_HNSiI]; + data[jistart + 2652] = 0.0 + k[6552]*y_cur[IDX_SiNH2II]; + data[jistart + 2653] = 0.0 + k[1264]*y_cur[IDX_SiNH2II]; + data[jistart + 2654] = 0.0 - k[1135]*y_cur[IDX_eM] - k[1136]*y_cur[IDX_eM] - + k[1137]*y_cur[IDX_eM] - k[2553]*y_cur[IDX_H2OI] - + k[3741]*y_cur[IDX_OI] - k[6612]*y_cur[IDX_GRAINM] - + k[6613]*y_cur[IDX_GRAINM] - k[6614]*y_cur[IDX_GRAINM]; + data[jistart + 2655] = 0.0 + k[181]*y_cur[IDX_CII] + k[395]*y_cur[IDX_HII]; + data[jistart + 2656] = 0.0 + k[2738]*y_cur[IDX_H3II] + k[2987]*y_cur[IDX_HCOII]; + data[jistart + 2657] = 0.0 + k[2565]*y_cur[IDX_H2OI]; + data[jistart + 2658] = 0.0 + k[2562]*y_cur[IDX_H2OI] + k[3810]*y_cur[IDX_CH3OHI]; + data[jistart + 2659] = 0.0 + k[2815]*y_cur[IDX_H3OII]; + data[jistart + 2660] = 0.0 + k[3810]*y_cur[IDX_PII]; + data[jistart + 2661] = 0.0 + k[2815]*y_cur[IDX_PI]; + data[jistart + 2662] = 0.0 - k[3741]*y_cur[IDX_HPOII]; + data[jistart + 2663] = 0.0 + k[181]*y_cur[IDX_HPOI]; + data[jistart + 2664] = 0.0 - k[2553]*y_cur[IDX_HPOII] + k[2562]*y_cur[IDX_PII] + + k[2565]*y_cur[IDX_PHII]; + data[jistart + 2665] = 0.0 + k[395]*y_cur[IDX_HPOI]; + data[jistart + 2666] = 0.0 + k[2987]*y_cur[IDX_POI]; + data[jistart + 2667] = 0.0 + k[2738]*y_cur[IDX_POI]; + data[jistart + 2668] = 0.0 - k[6612]*y_cur[IDX_HPOII] - k[6613]*y_cur[IDX_HPOII] - + k[6614]*y_cur[IDX_HPOII]; + data[jistart + 2669] = 0.0 - k[1135]*y_cur[IDX_HPOII] - k[1136]*y_cur[IDX_HPOII] - + k[1137]*y_cur[IDX_HPOII]; + data[jistart + 2670] = 0.0 + k[3228]*y_cur[IDX_HeII]; + data[jistart + 2671] = 0.0 - k[1139]*y_cur[IDX_eM] - k[1140]*y_cur[IDX_eM] - + k[2579]*y_cur[IDX_H2SI] - k[5558]*y_cur[IDX_H2I] - + k[6758]*y_cur[IDX_GRAINM] - k[6759]*y_cur[IDX_GRAINM]; + data[jistart + 2672] = 0.0 + k[396]*y_cur[IDX_HII] + k[6207]; + data[jistart + 2673] = 0.0 + k[2739]*y_cur[IDX_H3II] + k[2817]*y_cur[IDX_H3OII] + + k[2988]*y_cur[IDX_HCOII]; + data[jistart + 2674] = 0.0 + k[3055]*y_cur[IDX_H2SI]; + data[jistart + 2675] = 0.0 - k[2579]*y_cur[IDX_HS2II] + k[3055]*y_cur[IDX_HSII] + + k[3828]*y_cur[IDX_SII]; + data[jistart + 2676] = 0.0 + k[3828]*y_cur[IDX_H2SI]; + data[jistart + 2677] = 0.0 + k[2817]*y_cur[IDX_S2I]; + data[jistart + 2678] = 0.0 + k[3228]*y_cur[IDX_H2S2I]; + data[jistart + 2679] = 0.0 + k[396]*y_cur[IDX_HS2I]; + data[jistart + 2680] = 0.0 + k[2988]*y_cur[IDX_S2I]; + data[jistart + 2681] = 0.0 + k[2739]*y_cur[IDX_S2I]; + data[jistart + 2682] = 0.0 - k[6758]*y_cur[IDX_HS2II] - k[6759]*y_cur[IDX_HS2II]; + data[jistart + 2683] = 0.0 - k[5558]*y_cur[IDX_HS2II]; + data[jistart + 2684] = 0.0 - k[1139]*y_cur[IDX_HS2II] - k[1140]*y_cur[IDX_HS2II]; + data[jistart + 2685] = 0.0 + k[7192] + k[7374] + k[7556]; + data[jistart + 2686] = 0.0 + k[1230]*y_cur[IDX_eM] + k[6664]*y_cur[IDX_GRAINM]; + data[jistart + 2687] = 0.0 - k[420]*y_cur[IDX_HII] - k[1431]*y_cur[IDX_CII] - + k[2357]*y_cur[IDX_HII] - k[2745]*y_cur[IDX_H3II] - + k[2992]*y_cur[IDX_HCOII] - k[3308]*y_cur[IDX_HeII] - + k[3309]*y_cur[IDX_HeII] - k[5919] - k[6261] - k[7010]; + data[jistart + 2688] = 0.0 + k[4885]*y_cur[IDX_SiI]; + data[jistart + 2689] = 0.0 + k[4885]*y_cur[IDX_C2H4I]; + data[jistart + 2690] = 0.0 - k[3308]*y_cur[IDX_SiC2H2I] - k[3309]*y_cur[IDX_SiC2H2I]; + data[jistart + 2691] = 0.0 - k[1431]*y_cur[IDX_SiC2H2I]; + data[jistart + 2692] = 0.0 - k[420]*y_cur[IDX_SiC2H2I] - k[2357]*y_cur[IDX_SiC2H2I]; + data[jistart + 2693] = 0.0 - k[2992]*y_cur[IDX_SiC2H2I]; + data[jistart + 2694] = 0.0 - k[2745]*y_cur[IDX_SiC2H2I]; + data[jistart + 2695] = 0.0 + k[6664]*y_cur[IDX_SiC2H3II]; + data[jistart + 2696] = 0.0 + k[1230]*y_cur[IDX_SiC2H3II]; + data[jistart + 2697] = 0.0 + k[2359]*y_cur[IDX_HII] + k[3314]*y_cur[IDX_HeII]; + data[jistart + 2698] = 0.0 + k[3315]*y_cur[IDX_HeII]; + data[jistart + 2699] = 0.0 - k[1232]*y_cur[IDX_eM] - k[1233]*y_cur[IDX_eM] - + k[6746]*y_cur[IDX_GRAINM] - k[6747]*y_cur[IDX_GRAINM]; + data[jistart + 2700] = 0.0 + k[1432]*y_cur[IDX_CII]; + data[jistart + 2701] = 0.0 + k[197]*y_cur[IDX_CII] + k[422]*y_cur[IDX_HII]; + data[jistart + 2702] = 0.0 + k[1915]*y_cur[IDX_CI]; + data[jistart + 2703] = 0.0 + k[3872]*y_cur[IDX_SiI]; + data[jistart + 2704] = 0.0 + k[3873]*y_cur[IDX_SiI]; + data[jistart + 2705] = 0.0 + k[3861]*y_cur[IDX_SiII]; + data[jistart + 2706] = 0.0 + k[3861]*y_cur[IDX_C3HI]; + data[jistart + 2707] = 0.0 + k[3872]*y_cur[IDX_C3HII] + k[3873]*y_cur[IDX_C3H2II]; + data[jistart + 2708] = 0.0 + k[3314]*y_cur[IDX_SiC3HI] + k[3315]*y_cur[IDX_SiC4I]; + data[jistart + 2709] = 0.0 + k[197]*y_cur[IDX_SiC3I] + k[1432]*y_cur[IDX_SiC2HI]; + data[jistart + 2710] = 0.0 + k[422]*y_cur[IDX_SiC3I] + k[2359]*y_cur[IDX_SiC3HI]; + data[jistart + 2711] = 0.0 + k[1915]*y_cur[IDX_SiC2HII]; + data[jistart + 2712] = 0.0 - k[6746]*y_cur[IDX_SiC3II] - k[6747]*y_cur[IDX_SiC3II]; + data[jistart + 2713] = 0.0 - k[1232]*y_cur[IDX_SiC3II] - k[1233]*y_cur[IDX_SiC3II]; + data[jistart + 2714] = 0.0 - k[784]*y_cur[IDX_eM] - k[6472]*y_cur[IDX_GRAINM]; + data[jistart + 2715] = 0.0 + k[2525]*y_cur[IDX_H2OI]; + data[jistart + 2716] = 0.0 + k[3031]*y_cur[IDX_HeII]; + data[jistart + 2717] = 0.0 + k[3528]*y_cur[IDX_NH2I]; + data[jistart + 2718] = 0.0 + k[3626]*y_cur[IDX_NOI]; + data[jistart + 2719] = 0.0 + k[2598]*y_cur[IDX_H3II]; + data[jistart + 2720] = 0.0 + k[3528]*y_cur[IDX_C2II]; + data[jistart + 2721] = 0.0 + k[1957]*y_cur[IDX_HCNI]; + data[jistart + 2722] = 0.0 + k[3390]*y_cur[IDX_NI]; + data[jistart + 2723] = 0.0 + k[3626]*y_cur[IDX_C3HII]; + data[jistart + 2724] = 0.0 + k[1957]*y_cur[IDX_CHII]; + data[jistart + 2725] = 0.0 + k[3388]*y_cur[IDX_NI]; + data[jistart + 2726] = 0.0 + k[3388]*y_cur[IDX_C2H2II] + k[3390]*y_cur[IDX_C2H3II]; + data[jistart + 2727] = 0.0 + k[3031]*y_cur[IDX_HNC3I]; + data[jistart + 2728] = 0.0 + k[2525]*y_cur[IDX_C2NII]; + data[jistart + 2729] = 0.0 + k[2598]*y_cur[IDX_C2NI]; + data[jistart + 2730] = 0.0 - k[6472]*y_cur[IDX_C2NHII]; + data[jistart + 2731] = 0.0 - k[784]*y_cur[IDX_C2NHII]; + data[jistart + 2732] = 0.0 - k[805]*y_cur[IDX_eM] - k[806]*y_cur[IDX_eM] - + k[1817]*y_cur[IDX_CH3CHCH2I] - k[6499]*y_cur[IDX_GRAINM] - + k[6500]*y_cur[IDX_GRAINM]; + data[jistart + 2733] = 0.0 + k[2833]*y_cur[IDX_HI]; + data[jistart + 2734] = 0.0 + k[3857]*y_cur[IDX_SOII]; + data[jistart + 2735] = 0.0 + k[1670]*y_cur[IDX_C2H4II]; + data[jistart + 2736] = 0.0 + k[166]*y_cur[IDX_CII] + k[670]*y_cur[IDX_O2II] + + k[702]*y_cur[IDX_SII] + k[712]*y_cur[IDX_SOII] - + k[1817]*y_cur[IDX_C3H6II]; + data[jistart + 2737] = 0.0 + k[670]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 2738] = 0.0 + k[1670]*y_cur[IDX_C2H6I]; + data[jistart + 2739] = 0.0 + k[712]*y_cur[IDX_CH3CHCH2I] + k[3857]*y_cur[IDX_CH3COCH3I]; + data[jistart + 2740] = 0.0 + k[702]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 2741] = 0.0 + k[166]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 2742] = 0.0 - k[6499]*y_cur[IDX_C3H6II] - k[6500]*y_cur[IDX_C3H6II]; + data[jistart + 2743] = 0.0 - k[805]*y_cur[IDX_C3H6II] - k[806]*y_cur[IDX_C3H6II]; + data[jistart + 2744] = 0.0 + k[2833]*y_cur[IDX_C3H7II]; + data[jistart + 2745] = 0.0 - k[861]*y_cur[IDX_eM] - k[862]*y_cur[IDX_eM] - + k[6807]*y_cur[IDX_GRAINM] - k[6808]*y_cur[IDX_GRAINM]; + data[jistart + 2746] = 0.0 + k[1704]*y_cur[IDX_C2H4I] + k[5553]*y_cur[IDX_H2I]; + data[jistart + 2747] = 0.0 + k[1598]*y_cur[IDX_C2H3II] + k[1814]*y_cur[IDX_C3H5II] + + k[2221]*y_cur[IDX_CH5II] + k[2619]*y_cur[IDX_H3II] + + k[2783]*y_cur[IDX_H3OII] + k[2924]*y_cur[IDX_HCOII] + + k[3368]*y_cur[IDX_N2HII]; + data[jistart + 2748] = 0.0 + k[1810]*y_cur[IDX_CH2CCH2I] + k[1813]*y_cur[IDX_CH3CCHI]; + data[jistart + 2749] = 0.0 + k[1814]*y_cur[IDX_C6H6I] + k[2104]*y_cur[IDX_CH3CCHI]; + data[jistart + 2750] = 0.0 + k[1810]*y_cur[IDX_C3H4II]; + data[jistart + 2751] = 0.0 + k[1813]*y_cur[IDX_C3H4II] + k[2104]*y_cur[IDX_C3H5II]; + data[jistart + 2752] = 0.0 + k[2221]*y_cur[IDX_C6H6I]; + data[jistart + 2753] = 0.0 + k[3368]*y_cur[IDX_C6H6I]; + data[jistart + 2754] = 0.0 + k[1704]*y_cur[IDX_C6H5II]; + data[jistart + 2755] = 0.0 + k[1598]*y_cur[IDX_C6H6I]; + data[jistart + 2756] = 0.0 + k[2783]*y_cur[IDX_C6H6I]; + data[jistart + 2757] = 0.0 + k[2924]*y_cur[IDX_C6H6I]; + data[jistart + 2758] = 0.0 + k[2619]*y_cur[IDX_C6H6I]; + data[jistart + 2759] = 0.0 - k[6807]*y_cur[IDX_C6H7II] - k[6808]*y_cur[IDX_C6H7II]; + data[jistart + 2760] = 0.0 + k[5553]*y_cur[IDX_C6H5II]; + data[jistart + 2761] = 0.0 - k[861]*y_cur[IDX_C6H7II] - k[862]*y_cur[IDX_C6H7II]; + data[jistart + 2762] = 0.0 - k[885]*y_cur[IDX_eM] - k[886]*y_cur[IDX_eM] - + k[6847]*y_cur[IDX_GRAINM] - k[6848]*y_cur[IDX_GRAINM]; + data[jistart + 2763] = 0.0 + k[2187]*y_cur[IDX_CH4I]; + data[jistart + 2764] = 0.0 + k[1640]*y_cur[IDX_C2H3I] + k[1703]*y_cur[IDX_C2H4I]; + data[jistart + 2765] = 0.0 + k[1597]*y_cur[IDX_C2H3II] + k[1660]*y_cur[IDX_C2H4II]; + data[jistart + 2766] = 0.0 + k[1799]*y_cur[IDX_C3H3II] + k[2023]*y_cur[IDX_CH2CCHII]; + data[jistart + 2767] = 0.0 + k[2038]*y_cur[IDX_CH2CCHI] + k[2109]*y_cur[IDX_CH3CCHI]; + data[jistart + 2768] = 0.0 + k[2109]*y_cur[IDX_C5H2II]; + data[jistart + 2769] = 0.0 + k[1799]*y_cur[IDX_C5H2I]; + data[jistart + 2770] = 0.0 + k[1660]*y_cur[IDX_C6H2I] + k[1662]*y_cur[IDX_C6HI]; + data[jistart + 2771] = 0.0 + k[2038]*y_cur[IDX_C5H2II]; + data[jistart + 2772] = 0.0 + k[2023]*y_cur[IDX_C5H2I]; + data[jistart + 2773] = 0.0 + k[1662]*y_cur[IDX_C2H4II]; + data[jistart + 2774] = 0.0 + k[5518]*y_cur[IDX_C4H2II]; + data[jistart + 2775] = 0.0 + k[5518]*y_cur[IDX_C4H2I]; + data[jistart + 2776] = 0.0 + k[1703]*y_cur[IDX_C6H2II]; + data[jistart + 2777] = 0.0 + k[1640]*y_cur[IDX_C6H2II]; + data[jistart + 2778] = 0.0 + k[1597]*y_cur[IDX_C6H2I]; + data[jistart + 2779] = 0.0 + k[2187]*y_cur[IDX_C7H2II]; + data[jistart + 2780] = 0.0 - k[6847]*y_cur[IDX_C8H4II] - k[6848]*y_cur[IDX_C8H4II]; + data[jistart + 2781] = 0.0 - k[885]*y_cur[IDX_C8H4II] - k[886]*y_cur[IDX_C8H4II]; + data[jistart + 2782] = 0.0 + k[1283]*y_cur[IDX_eM] + k[6730]*y_cur[IDX_GRAINM]; + data[jistart + 2783] = 0.0 + k[8652]*y_cur[IDX_GHI]; + data[jistart + 2784] = 0.0 + k[7208] + k[7390] + k[7565]; + data[jistart + 2785] = 0.0 + k[8762]*y_cur[IDX_GHCOI]; + data[jistart + 2786] = 0.0 - k[5661]*y_cur[IDX_CII] - k[5662]*y_cur[IDX_H3II] - + k[5663]*y_cur[IDX_H3OII] - k[5664]*y_cur[IDX_HCOII] - + k[5665]*y_cur[IDX_HeII] - k[5666]*y_cur[IDX_HeII] - k[5945] - + k[6295] - k[7026]; + data[jistart + 2787] = 0.0 + k[8762]*y_cur[IDX_GCH2OHI]; + data[jistart + 2788] = 0.0 + k[8652]*y_cur[IDX_GCH2OHCOI]; + data[jistart + 2789] = 0.0 - k[5663]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 2790] = 0.0 - k[5665]*y_cur[IDX_CH2OHCHOI] - k[5666]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 2791] = 0.0 - k[5661]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 2792] = 0.0 - k[5664]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 2793] = 0.0 - k[5662]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 2794] = 0.0 + k[6730]*y_cur[IDX_CH2OHCH2OII]; + data[jistart + 2795] = 0.0 + k[1283]*y_cur[IDX_CH2OHCH2OII]; + data[jistart + 2796] = 0.0 + k[986]*y_cur[IDX_eM] + k[6632]*y_cur[IDX_GRAINM]; + data[jistart + 2797] = 0.0 + k[7124] + k[7306] + k[7488]; + data[jistart + 2798] = 0.0 + k[5394]*y_cur[IDX_OI] + k[5831] + k[6144]; + data[jistart + 2799] = 0.0 + k[1111]*y_cur[IDX_eM] + k[6456]*y_cur[IDX_GRAINM]; + data[jistart + 2800] = 0.0 + k[904]*y_cur[IDX_eM] + k[6599]*y_cur[IDX_GRAINM]; + data[jistart + 2801] = 0.0 + k[3159]*y_cur[IDX_HeII] + k[5379]*y_cur[IDX_OI] + k[5775] + + k[6072]; + data[jistart + 2802] = 0.0 + k[318]*y_cur[IDX_HI] + k[679]*y_cur[IDX_O2I] + + k[5613]*y_cur[IDX_eM] + k[6454]*y_cur[IDX_GRAINM]; + data[jistart + 2803] = 0.0 + k[1002]*y_cur[IDX_eM] + k[6457]*y_cur[IDX_GRAINM]; + data[jistart + 2804] = 0.0 - k[319]*y_cur[IDX_HII] - k[2679]*y_cur[IDX_H3II] - + k[5132]*y_cur[IDX_H2I] - k[5677] - k[5830] - k[6143] - k[6307] - + k[6942]; + data[jistart + 2805] = 0.0 + k[5211]*y_cur[IDX_HI] + k[5864] + k[6194]; + data[jistart + 2806] = 0.0 + k[679]*y_cur[IDX_ClII]; + data[jistart + 2807] = 0.0 + k[5379]*y_cur[IDX_CClI] + k[5394]*y_cur[IDX_ClOI]; + data[jistart + 2808] = 0.0 + k[3159]*y_cur[IDX_CClI]; + data[jistart + 2809] = 0.0 - k[319]*y_cur[IDX_ClI]; + data[jistart + 2810] = 0.0 - k[2679]*y_cur[IDX_ClI]; + data[jistart + 2811] = 0.0 + k[6454]*y_cur[IDX_ClII] + k[6456]*y_cur[IDX_HClII] + + k[6457]*y_cur[IDX_H2ClII] + k[6599]*y_cur[IDX_CClII] + + k[6632]*y_cur[IDX_ClOII]; + data[jistart + 2812] = 0.0 - k[5132]*y_cur[IDX_ClI]; + data[jistart + 2813] = 0.0 + k[904]*y_cur[IDX_CClII] + k[986]*y_cur[IDX_ClOII] + + k[1002]*y_cur[IDX_H2ClII] + k[1111]*y_cur[IDX_HClII] + + k[5613]*y_cur[IDX_ClII]; + data[jistart + 2814] = 0.0 + k[318]*y_cur[IDX_ClII] + k[5211]*y_cur[IDX_HClI]; + data[jistart + 2815] = 0.0 + k[8201]; + data[jistart + 2816] = 0.0 + k[8257] + k[8261]; + data[jistart + 2817] = 0.0 + k[8231]; + data[jistart + 2818] = 0.0 + k[8239]; + data[jistart + 2819] = 0.0 + k[8220]; + data[jistart + 2820] = 0.0 + k[7862] + k[8197] + k[8199]; + data[jistart + 2821] = 0.0 + k[8425]*y_cur[IDX_GCI]; + data[jistart + 2822] = 0.0 + k[7866] + k[8205] + k[8207]; + data[jistart + 2823] = 0.0 - k[7232] - k[7414] - k[7596] - k[7861] - k[8193] - k[8194] - + k[8195] - k[8196] - k[8355]*y_cur[IDX_GHI] - k[8386]*y_cur[IDX_GH2I] + - k[8427]*y_cur[IDX_GCI] - k[8469]*y_cur[IDX_GNI] - + k[8499]*y_cur[IDX_GCHI] - k[8641]*y_cur[IDX_GHI] - + k[8678]*y_cur[IDX_GCI] - k[8709]*y_cur[IDX_GNI] - + k[8732]*y_cur[IDX_GCHI]; + data[jistart + 2824] = 0.0 - k[8469]*y_cur[IDX_GC7I] - k[8709]*y_cur[IDX_GC7I]; + data[jistart + 2825] = 0.0 - k[8499]*y_cur[IDX_GC7I] - k[8732]*y_cur[IDX_GC7I]; + data[jistart + 2826] = 0.0 - k[8386]*y_cur[IDX_GC7I]; + data[jistart + 2827] = 0.0 + k[7050]; + data[jistart + 2828] = 0.0 + k[8425]*y_cur[IDX_GC6I] - k[8427]*y_cur[IDX_GC7I] - + k[8678]*y_cur[IDX_GC7I]; + data[jistart + 2829] = 0.0 - k[8355]*y_cur[IDX_GC7I] - k[8641]*y_cur[IDX_GC7I]; + data[jistart + 2830] = 0.0 + k[7831] + k[8155]; + data[jistart + 2831] = 0.0 + k[8189]; + data[jistart + 2832] = 0.0 + k[7806] + k[8135]; + data[jistart + 2833] = 0.0 + k[7738] + k[8048]; + data[jistart + 2834] = 0.0 + k[7748] + k[8062]; + data[jistart + 2835] = 0.0 + k[7765] + k[8083] + k[8084]; + data[jistart + 2836] = 0.0 + k[8059]; + data[jistart + 2837] = 0.0 + k[7684] + k[7971]; + data[jistart + 2838] = 0.0 + k[7974] + k[7975]; + data[jistart + 2839] = 0.0 + k[7734] + k[8043]; + data[jistart + 2840] = 0.0 + k[8129]; + data[jistart + 2841] = 0.0 - k[7097] - k[7279] - k[7461] - k[8301]*y_cur[IDX_GHI] - + k[8600]*y_cur[IDX_GHI]; + data[jistart + 2842] = 0.0 + k[6915]; + data[jistart + 2843] = 0.0 - k[8301]*y_cur[IDX_GSiI] - k[8600]*y_cur[IDX_GSiI]; + data[jistart + 2844] = 0.0 + k[2163]*y_cur[IDX_CH4I] + k[2410]*y_cur[IDX_H2I] + + k[2531]*y_cur[IDX_H2OI]; + data[jistart + 2845] = 0.0 - k[1070]*y_cur[IDX_eM] - k[6648]*y_cur[IDX_GRAINM]; + data[jistart + 2846] = 0.0 + k[2605]*y_cur[IDX_H3II] + k[2775]*y_cur[IDX_H3OII] + + k[2910]*y_cur[IDX_HCOII]; + data[jistart + 2847] = 0.0 + k[1757]*y_cur[IDX_C3HII]; + data[jistart + 2848] = 0.0 + k[2123]*y_cur[IDX_C3HII]; + data[jistart + 2849] = 0.0 + k[1753]*y_cur[IDX_CO2I] + k[1757]*y_cur[IDX_OCSI] + + k[2123]*y_cur[IDX_CH3OHI] + k[2529]*y_cur[IDX_H2OI] + + k[3671]*y_cur[IDX_O2I]; + data[jistart + 2850] = 0.0 + k[1753]*y_cur[IDX_C3HII]; + data[jistart + 2851] = 0.0 + k[3702]*y_cur[IDX_OI]; + data[jistart + 2852] = 0.0 + k[3671]*y_cur[IDX_C3HII]; + data[jistart + 2853] = 0.0 + k[2163]*y_cur[IDX_C3OII]; + data[jistart + 2854] = 0.0 + k[2775]*y_cur[IDX_C3OI]; + data[jistart + 2855] = 0.0 + k[3702]*y_cur[IDX_C4H2II]; + data[jistart + 2856] = 0.0 + k[2529]*y_cur[IDX_C3HII] + k[2531]*y_cur[IDX_C3OII]; + data[jistart + 2857] = 0.0 + k[2910]*y_cur[IDX_C3OI]; + data[jistart + 2858] = 0.0 + k[2605]*y_cur[IDX_C3OI]; + data[jistart + 2859] = 0.0 - k[6648]*y_cur[IDX_HC3OII]; + data[jistart + 2860] = 0.0 + k[2410]*y_cur[IDX_C3OII]; + data[jistart + 2861] = 0.0 - k[1070]*y_cur[IDX_HC3OII]; + data[jistart + 2862] = 0.0 + k[7153] + k[7335] + k[7517]; + data[jistart + 2863] = 0.0 + k[995]*y_cur[IDX_eM] + k[6537]*y_cur[IDX_GRAINM]; + data[jistart + 2864] = 0.0 + k[8621]*y_cur[IDX_GHI]; + data[jistart + 2865] = 0.0 + k[1095]*y_cur[IDX_eM] + k[6533]*y_cur[IDX_GRAINM]; + data[jistart + 2866] = 0.0 - k[520]*y_cur[IDX_HeII] - k[2343]*y_cur[IDX_HII] - + k[2695]*y_cur[IDX_H3II] - k[2696]*y_cur[IDX_H3II] - + k[5202]*y_cur[IDX_CI] - k[5203]*y_cur[IDX_OI] - k[5855] - k[6182] - + k[6971]; + data[jistart + 2867] = 0.0 + k[5005]*y_cur[IDX_NOI]; + data[jistart + 2868] = 0.0 + k[5005]*y_cur[IDX_CH2I]; + data[jistart + 2869] = 0.0 + k[8621]*y_cur[IDX_GCNOI]; + data[jistart + 2870] = 0.0 - k[5203]*y_cur[IDX_HCNOI]; + data[jistart + 2871] = 0.0 - k[520]*y_cur[IDX_HCNOI]; + data[jistart + 2872] = 0.0 - k[2343]*y_cur[IDX_HCNOI]; + data[jistart + 2873] = 0.0 - k[5202]*y_cur[IDX_HCNOI]; + data[jistart + 2874] = 0.0 - k[2695]*y_cur[IDX_HCNOI] - k[2696]*y_cur[IDX_HCNOI]; + data[jistart + 2875] = 0.0 + k[6533]*y_cur[IDX_HCNOHII] + k[6537]*y_cur[IDX_H2CNOII]; + data[jistart + 2876] = 0.0 + k[995]*y_cur[IDX_H2CNOII] + k[1095]*y_cur[IDX_HCNOHII]; + data[jistart + 2877] = 0.0 + k[423]*y_cur[IDX_HII]; + data[jistart + 2878] = 0.0 + k[1431]*y_cur[IDX_CII]; + data[jistart + 2879] = 0.0 - k[1234]*y_cur[IDX_eM] - k[1235]*y_cur[IDX_eM] - + k[1918]*y_cur[IDX_CI] - k[6761]*y_cur[IDX_GRAINM] - + k[6762]*y_cur[IDX_GRAINM]; + data[jistart + 2880] = 0.0 + k[1916]*y_cur[IDX_CI]; + data[jistart + 2881] = 0.0 + k[2747]*y_cur[IDX_H3II] + k[2994]*y_cur[IDX_HCOII]; + data[jistart + 2882] = 0.0 + k[3868]*y_cur[IDX_SiII]; + data[jistart + 2883] = 0.0 + k[3860]*y_cur[IDX_SiII]; + data[jistart + 2884] = 0.0 + k[3875]*y_cur[IDX_SiI]; + data[jistart + 2885] = 0.0 + k[3874]*y_cur[IDX_SiI]; + data[jistart + 2886] = 0.0 + k[3879]*y_cur[IDX_SiI]; + data[jistart + 2887] = 0.0 + k[3860]*y_cur[IDX_C3H2I] + k[3868]*y_cur[IDX_H2CCCI]; + data[jistart + 2888] = 0.0 + k[3874]*y_cur[IDX_C3H2II] + k[3875]*y_cur[IDX_C3H3II] + + k[3879]*y_cur[IDX_CH2CCHII]; + data[jistart + 2889] = 0.0 + k[1431]*y_cur[IDX_SiC2H2I]; + data[jistart + 2890] = 0.0 + k[423]*y_cur[IDX_SiC3HI]; + data[jistart + 2891] = 0.0 + k[1916]*y_cur[IDX_SiC2H2II] - k[1918]*y_cur[IDX_SiC3HII]; + data[jistart + 2892] = 0.0 + k[2994]*y_cur[IDX_SiC3I]; + data[jistart + 2893] = 0.0 + k[2747]*y_cur[IDX_SiC3I]; + data[jistart + 2894] = 0.0 - k[6761]*y_cur[IDX_SiC3HII] - k[6762]*y_cur[IDX_SiC3HII]; + data[jistart + 2895] = 0.0 - k[1234]*y_cur[IDX_SiC3HII] - k[1235]*y_cur[IDX_SiC3HII]; + data[jistart + 2896] = 0.0 + k[7152] + k[7334] + k[7516]; + data[jistart + 2897] = 0.0 + k[1248]*y_cur[IDX_eM] + k[6542]*y_cur[IDX_GRAINM]; + data[jistart + 2898] = 0.0 - k[200]*y_cur[IDX_CII] - k[427]*y_cur[IDX_HII] - + k[1437]*y_cur[IDX_CII] - k[1438]*y_cur[IDX_CII] - + k[2361]*y_cur[IDX_HII] - k[2752]*y_cur[IDX_H3II] - + k[2822]*y_cur[IDX_H3OII] - k[2999]*y_cur[IDX_HCOII] - + k[3320]*y_cur[IDX_HeII] - k[3321]*y_cur[IDX_HeII] - k[5926] - + k[6270] - k[6970]; + data[jistart + 2899] = 0.0 - k[2822]*y_cur[IDX_SiCH3I]; + data[jistart + 2900] = 0.0 - k[3320]*y_cur[IDX_SiCH3I] - k[3321]*y_cur[IDX_SiCH3I]; + data[jistart + 2901] = 0.0 - k[200]*y_cur[IDX_SiCH3I] - k[1437]*y_cur[IDX_SiCH3I] - + k[1438]*y_cur[IDX_SiCH3I]; + data[jistart + 2902] = 0.0 - k[427]*y_cur[IDX_SiCH3I] - k[2361]*y_cur[IDX_SiCH3I]; + data[jistart + 2903] = 0.0 - k[2999]*y_cur[IDX_SiCH3I]; + data[jistart + 2904] = 0.0 - k[2752]*y_cur[IDX_SiCH3I]; + data[jistart + 2905] = 0.0 + k[6542]*y_cur[IDX_SiCH4II]; + data[jistart + 2906] = 0.0 + k[1248]*y_cur[IDX_SiCH4II]; + data[jistart + 2907] = 0.0 - k[807]*y_cur[IDX_eM] - k[808]*y_cur[IDX_eM] - + k[809]*y_cur[IDX_eM] - k[810]*y_cur[IDX_eM] - k[811]*y_cur[IDX_eM] - + k[812]*y_cur[IDX_eM] - k[813]*y_cur[IDX_eM] - + k[1818]*y_cur[IDX_NH3I] - k[2833]*y_cur[IDX_HI] - + k[6504]*y_cur[IDX_GRAINM] - k[6505]*y_cur[IDX_GRAINM] - + k[6506]*y_cur[IDX_GRAINM] - k[6507]*y_cur[IDX_GRAINM] - + k[6508]*y_cur[IDX_GRAINM] - k[6509]*y_cur[IDX_GRAINM] - + k[6510]*y_cur[IDX_GRAINM]; + data[jistart + 2908] = 0.0 + k[5516]*y_cur[IDX_H2I]; + data[jistart + 2909] = 0.0 + k[1671]*y_cur[IDX_C2H4II] + k[2064]*y_cur[IDX_CH3II]; + data[jistart + 2910] = 0.0 + k[2790]*y_cur[IDX_H3OII] + k[3370]*y_cur[IDX_N2HII]; + data[jistart + 2911] = 0.0 + k[1671]*y_cur[IDX_C2H6I]; + data[jistart + 2912] = 0.0 + k[3370]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 2913] = 0.0 - k[1818]*y_cur[IDX_C3H7II]; + data[jistart + 2914] = 0.0 + k[2064]*y_cur[IDX_C2H6I]; + data[jistart + 2915] = 0.0 + k[2790]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 2916] = 0.0 - k[6504]*y_cur[IDX_C3H7II] - k[6505]*y_cur[IDX_C3H7II] - + k[6506]*y_cur[IDX_C3H7II] - k[6507]*y_cur[IDX_C3H7II] - + k[6508]*y_cur[IDX_C3H7II] - k[6509]*y_cur[IDX_C3H7II] - + k[6510]*y_cur[IDX_C3H7II]; + data[jistart + 2917] = 0.0 + k[5516]*y_cur[IDX_C3H5II]; + data[jistart + 2918] = 0.0 - k[807]*y_cur[IDX_C3H7II] - k[808]*y_cur[IDX_C3H7II] - + k[809]*y_cur[IDX_C3H7II] - k[810]*y_cur[IDX_C3H7II] - + k[811]*y_cur[IDX_C3H7II] - k[812]*y_cur[IDX_C3H7II] - + k[813]*y_cur[IDX_C3H7II]; + data[jistart + 2919] = 0.0 - k[2833]*y_cur[IDX_C3H7II]; + data[jistart + 2920] = 0.0 - k[831]*y_cur[IDX_eM] - k[832]*y_cur[IDX_eM] - + k[1555]*y_cur[IDX_C2H2I] - k[2172]*y_cur[IDX_CH4I] - + k[2173]*y_cur[IDX_CH4I] - k[2174]*y_cur[IDX_CH4I] - + k[2175]*y_cur[IDX_CH4I] - k[2413]*y_cur[IDX_H2I] - + k[2532]*y_cur[IDX_H2OI] - k[2533]*y_cur[IDX_H2OI] - + k[6740]*y_cur[IDX_GRAINM] - k[6741]*y_cur[IDX_GRAINM]; + data[jistart + 2921] = 0.0 + k[3019]*y_cur[IDX_CII]; + data[jistart + 2922] = 0.0 + k[2868]*y_cur[IDX_HCNI]; + data[jistart + 2923] = 0.0 + k[1401]*y_cur[IDX_CII]; + data[jistart + 2924] = 0.0 - k[2172]*y_cur[IDX_C4NII] - k[2173]*y_cur[IDX_C4NII] - + k[2174]*y_cur[IDX_C4NII] - k[2175]*y_cur[IDX_C4NII]; + data[jistart + 2925] = 0.0 + k[2868]*y_cur[IDX_C3II]; + data[jistart + 2926] = 0.0 - k[1555]*y_cur[IDX_C4NII]; + data[jistart + 2927] = 0.0 + k[1401]*y_cur[IDX_HC3NI] + k[3019]*y_cur[IDX_HNC3I]; + data[jistart + 2928] = 0.0 - k[2532]*y_cur[IDX_C4NII] - k[2533]*y_cur[IDX_C4NII]; + data[jistart + 2929] = 0.0 - k[6740]*y_cur[IDX_C4NII] - k[6741]*y_cur[IDX_C4NII]; + data[jistart + 2930] = 0.0 - k[2413]*y_cur[IDX_C4NII]; + data[jistart + 2931] = 0.0 - k[831]*y_cur[IDX_C4NII] - k[832]*y_cur[IDX_C4NII]; + data[jistart + 2932] = 0.0 - k[877]*y_cur[IDX_eM] - k[878]*y_cur[IDX_eM] - + k[2422]*y_cur[IDX_H2I] - k[6836]*y_cur[IDX_GRAINM] - + k[6837]*y_cur[IDX_GRAINM]; + data[jistart + 2933] = 0.0 + k[3156]*y_cur[IDX_HeII]; + data[jistart + 2934] = 0.0 + k[3145]*y_cur[IDX_HeII]; + data[jistart + 2935] = 0.0 + k[1876]*y_cur[IDX_CI]; + data[jistart + 2936] = 0.0 + k[1332]*y_cur[IDX_CII]; + data[jistart + 2937] = 0.0 + k[1877]*y_cur[IDX_CI]; + data[jistart + 2938] = 0.0 + k[3060]*y_cur[IDX_HeII]; + data[jistart + 2939] = 0.0 + k[2311]*y_cur[IDX_HII] + k[3148]*y_cur[IDX_HeII]; + data[jistart + 2940] = 0.0 + k[5500]*y_cur[IDX_CII]; + data[jistart + 2941] = 0.0 + k[3150]*y_cur[IDX_HeII]; + data[jistart + 2942] = 0.0 + k[352]*y_cur[IDX_HII] + k[6053]; + data[jistart + 2943] = 0.0 + k[1334]*y_cur[IDX_CII]; + data[jistart + 2944] = 0.0 + k[3060]*y_cur[IDX_C10I] + k[3145]*y_cur[IDX_C8H2I] + + k[3148]*y_cur[IDX_C8HI] + k[3150]*y_cur[IDX_C9I] + + k[3156]*y_cur[IDX_C9NI]; + data[jistart + 2945] = 0.0 + k[1332]*y_cur[IDX_C7H2I] + k[1334]*y_cur[IDX_C7HI] + + k[5500]*y_cur[IDX_C7I]; + data[jistart + 2946] = 0.0 + k[352]*y_cur[IDX_C8I] + k[2311]*y_cur[IDX_C8HI]; + data[jistart + 2947] = 0.0 + k[1876]*y_cur[IDX_C7HII] + k[1877]*y_cur[IDX_C7H2II]; + data[jistart + 2948] = 0.0 - k[6836]*y_cur[IDX_C8II] - k[6837]*y_cur[IDX_C8II]; + data[jistart + 2949] = 0.0 - k[2422]*y_cur[IDX_C8II]; + data[jistart + 2950] = 0.0 - k[877]*y_cur[IDX_C8II] - k[878]*y_cur[IDX_C8II]; + data[jistart + 2951] = 0.0 - k[897]*y_cur[IDX_eM] - k[898]*y_cur[IDX_eM] - + k[3451]*y_cur[IDX_NI] - k[6863]*y_cur[IDX_GRAINM] - + k[6864]*y_cur[IDX_GRAINM]; + data[jistart + 2952] = 0.0 + k[1604]*y_cur[IDX_C2H3II] + k[1664]*y_cur[IDX_C2H4II]; + data[jistart + 2953] = 0.0 + k[2188]*y_cur[IDX_CH4I]; + data[jistart + 2954] = 0.0 + k[1642]*y_cur[IDX_C2H3I] + k[1705]*y_cur[IDX_C2H4I]; + data[jistart + 2955] = 0.0 + k[2040]*y_cur[IDX_CH2CCHI] + k[2110]*y_cur[IDX_CH3CCHI]; + data[jistart + 2956] = 0.0 + k[1840]*y_cur[IDX_C4H3II]; + data[jistart + 2957] = 0.0 + k[5578]*y_cur[IDX_C4H2I]; + data[jistart + 2958] = 0.0 + k[2110]*y_cur[IDX_C6H2II]; + data[jistart + 2959] = 0.0 + k[1666]*y_cur[IDX_C2H4II]; + data[jistart + 2960] = 0.0 + k[1664]*y_cur[IDX_C7H2I] + k[1666]*y_cur[IDX_C7HI]; + data[jistart + 2961] = 0.0 + k[1840]*y_cur[IDX_C5H2I]; + data[jistart + 2962] = 0.0 + k[2040]*y_cur[IDX_C6H2II]; + data[jistart + 2963] = 0.0 + k[5578]*y_cur[IDX_C5H2II]; + data[jistart + 2964] = 0.0 + k[1705]*y_cur[IDX_C7H2II]; + data[jistart + 2965] = 0.0 + k[1642]*y_cur[IDX_C7H2II]; + data[jistart + 2966] = 0.0 + k[1604]*y_cur[IDX_C7H2I]; + data[jistart + 2967] = 0.0 + k[2188]*y_cur[IDX_C8H2II]; + data[jistart + 2968] = 0.0 - k[3451]*y_cur[IDX_C9H4II]; + data[jistart + 2969] = 0.0 - k[6863]*y_cur[IDX_C9H4II] - k[6864]*y_cur[IDX_C9H4II]; + data[jistart + 2970] = 0.0 - k[897]*y_cur[IDX_C9H4II] - k[898]*y_cur[IDX_C9H4II]; + data[jistart + 2971] = 0.0 - k[918]*y_cur[IDX_eM] - k[919]*y_cur[IDX_eM] - + k[920]*y_cur[IDX_eM] - k[6492]*y_cur[IDX_GRAINM] - + k[6493]*y_cur[IDX_GRAINM] - k[6494]*y_cur[IDX_GRAINM]; + data[jistart + 2972] = 0.0 + k[164]*y_cur[IDX_CII] + k[5789] + k[6091]; + data[jistart + 2973] = 0.0 + k[3657]*y_cur[IDX_O2II] + k[3851]*y_cur[IDX_SOII]; + data[jistart + 2974] = 0.0 + k[2521]*y_cur[IDX_H2OI]; + data[jistart + 2975] = 0.0 + k[1979]*y_cur[IDX_H2COI]; + data[jistart + 2976] = 0.0 + k[1947]*y_cur[IDX_H2COI]; + data[jistart + 2977] = 0.0 + k[3654]*y_cur[IDX_C2H2I] + k[3657]*y_cur[IDX_CH2CCH2I]; + data[jistart + 2978] = 0.0 + k[3843]*y_cur[IDX_C2H2I] + k[3851]*y_cur[IDX_CH2CCH2I]; + data[jistart + 2979] = 0.0 + k[1947]*y_cur[IDX_CHII] + k[1979]*y_cur[IDX_CH2II]; + data[jistart + 2980] = 0.0 + k[3796]*y_cur[IDX_C2H2II]; + data[jistart + 2981] = 0.0 + k[3796]*y_cur[IDX_OHI]; + data[jistart + 2982] = 0.0 + k[3654]*y_cur[IDX_O2II] + k[3843]*y_cur[IDX_SOII]; + data[jistart + 2983] = 0.0 + k[164]*y_cur[IDX_CH2COI]; + data[jistart + 2984] = 0.0 + k[2521]*y_cur[IDX_C2HII]; + data[jistart + 2985] = 0.0 - k[6492]*y_cur[IDX_CH2COII] - k[6493]*y_cur[IDX_CH2COII] - + k[6494]*y_cur[IDX_CH2COII]; + data[jistart + 2986] = 0.0 - k[918]*y_cur[IDX_CH2COII] - k[919]*y_cur[IDX_CH2COII] - + k[920]*y_cur[IDX_CH2COII]; + data[jistart + 2987] = 0.0 + k[7166] + k[7348] + k[7530]; + data[jistart + 2988] = 0.0 + k[1202]*y_cur[IDX_eM] + k[6596]*y_cur[IDX_GRAINM]; + data[jistart + 2989] = 0.0 - k[1351]*y_cur[IDX_CII] - k[2319]*y_cur[IDX_HII] - + k[2640]*y_cur[IDX_H3II] - k[2788]*y_cur[IDX_H3OII] - + k[2942]*y_cur[IDX_HCOII] - k[3174]*y_cur[IDX_HeII] - + k[3175]*y_cur[IDX_HeII] - k[5384]*y_cur[IDX_OI] - k[5792] - k[6094] + - k[6984]; + data[jistart + 2990] = 0.0 - k[2788]*y_cur[IDX_CH2PHI]; + data[jistart + 2991] = 0.0 - k[5384]*y_cur[IDX_CH2PHI]; + data[jistart + 2992] = 0.0 - k[3174]*y_cur[IDX_CH2PHI] - k[3175]*y_cur[IDX_CH2PHI]; + data[jistart + 2993] = 0.0 - k[1351]*y_cur[IDX_CH2PHI]; + data[jistart + 2994] = 0.0 - k[2319]*y_cur[IDX_CH2PHI]; + data[jistart + 2995] = 0.0 - k[2942]*y_cur[IDX_CH2PHI]; + data[jistart + 2996] = 0.0 - k[2640]*y_cur[IDX_CH2PHI]; + data[jistart + 2997] = 0.0 + k[6596]*y_cur[IDX_PCH4II]; + data[jistart + 2998] = 0.0 + k[1202]*y_cur[IDX_PCH4II]; + data[jistart + 2999] = 0.0 + k[7218] + k[7400] + k[7582]; + data[jistart + 3000] = 0.0 + k[8756]*y_cur[IDX_GCH3I]; + data[jistart + 3001] = 0.0 + k[927]*y_cur[IDX_eM] + k[6765]*y_cur[IDX_GRAINM]; + data[jistart + 3002] = 0.0 - k[1354]*y_cur[IDX_CII] - k[1355]*y_cur[IDX_CII] - + k[2320]*y_cur[IDX_HII] - k[2642]*y_cur[IDX_H3II] - + k[2943]*y_cur[IDX_HCOII] - k[3177]*y_cur[IDX_HeII] - k[5796] - + k[6100] - k[7036]; + data[jistart + 3003] = 0.0 + k[5109]*y_cur[IDX_CNI]; + data[jistart + 3004] = 0.0 + k[8756]*y_cur[IDX_GC3NI]; + data[jistart + 3005] = 0.0 + k[5110]*y_cur[IDX_CNI]; + data[jistart + 3006] = 0.0 + k[5109]*y_cur[IDX_CH2CCH2I] + k[5110]*y_cur[IDX_CH3CCHI]; + data[jistart + 3007] = 0.0 - k[3177]*y_cur[IDX_CH3C3NI]; + data[jistart + 3008] = 0.0 - k[1354]*y_cur[IDX_CH3C3NI] - k[1355]*y_cur[IDX_CH3C3NI]; + data[jistart + 3009] = 0.0 - k[2320]*y_cur[IDX_CH3C3NI]; + data[jistart + 3010] = 0.0 - k[2943]*y_cur[IDX_CH3C3NI]; + data[jistart + 3011] = 0.0 - k[2642]*y_cur[IDX_CH3C3NI]; + data[jistart + 3012] = 0.0 + k[6765]*y_cur[IDX_CH3C3NHII]; + data[jistart + 3013] = 0.0 + k[927]*y_cur[IDX_CH3C3NHII]; + data[jistart + 3014] = 0.0 + k[8161]; + data[jistart + 3015] = 0.0 + k[8189]; + data[jistart + 3016] = 0.0 + k[8257] + k[8261]; + data[jistart + 3017] = 0.0 + k[7854] + k[8186]; + data[jistart + 3018] = 0.0 + k[8230]; + data[jistart + 3019] = 0.0 + k[7823]; + data[jistart + 3020] = 0.0 + k[8179]; + data[jistart + 3021] = 0.0 + k[7789] + k[8113]; + data[jistart + 3022] = 0.0 + k[7851] + k[8182]; + data[jistart + 3023] = 0.0 + k[8194]; + data[jistart + 3024] = 0.0 - k[7177] - k[7359] - k[7541] - k[7783] - k[7784] - k[8107] - + k[8108] - k[8339]*y_cur[IDX_GHI] - k[8380]*y_cur[IDX_GH2I] - + k[8420]*y_cur[IDX_GCI] - k[8493]*y_cur[IDX_GCHI] - + k[8629]*y_cur[IDX_GHI] - k[8671]*y_cur[IDX_GCI] - + k[8726]*y_cur[IDX_GCHI]; + data[jistart + 3025] = 0.0 + k[8416]*y_cur[IDX_GCI]; + data[jistart + 3026] = 0.0 - k[8493]*y_cur[IDX_GC4I] - k[8726]*y_cur[IDX_GC4I]; + data[jistart + 3027] = 0.0 - k[8380]*y_cur[IDX_GC4I]; + data[jistart + 3028] = 0.0 + k[8416]*y_cur[IDX_GC3I] - k[8420]*y_cur[IDX_GC4I] - + k[8671]*y_cur[IDX_GC4I]; + data[jistart + 3029] = 0.0 + k[6995]; + data[jistart + 3030] = 0.0 - k[8339]*y_cur[IDX_GC4I] - k[8629]*y_cur[IDX_GC4I]; + data[jistart + 3031] = 0.0 + k[7820] + k[8147]; + data[jistart + 3032] = 0.0 + k[8331]*y_cur[IDX_GHI]; + data[jistart + 3033] = 0.0 - k[8571]*y_cur[IDX_GCH3CHOI] - k[8572]*y_cur[IDX_GCH3CHOI] - + k[8573]*y_cur[IDX_GCH3CHOI]; + data[jistart + 3034] = 0.0 - k[8562]*y_cur[IDX_GCH3CHOI] - k[8563]*y_cur[IDX_GCH3CHOI]; + data[jistart + 3035] = 0.0 - k[7159] - k[7341] - k[7523] - k[7760] - k[7761] - k[7762] - + k[7763] - k[8078] - k[8079] - k[8080] - k[8081] - + k[8332]*y_cur[IDX_GHI] - k[8333]*y_cur[IDX_GHI] - + k[8334]*y_cur[IDX_GHI] - k[8505]*y_cur[IDX_GOHI] - + k[8506]*y_cur[IDX_GOHI] - k[8507]*y_cur[IDX_GOHI] - + k[8521]*y_cur[IDX_GNHI] - k[8535]*y_cur[IDX_GNH2I] - + k[8547]*y_cur[IDX_GCH3I] - k[8548]*y_cur[IDX_GCH3I] - + k[8562]*y_cur[IDX_GCH3OI] - k[8563]*y_cur[IDX_GCH3OI] - + k[8571]*y_cur[IDX_GCH2OHI] - k[8572]*y_cur[IDX_GCH2OHI] - + k[8573]*y_cur[IDX_GCH2OHI]; + data[jistart + 3036] = 0.0 - k[8535]*y_cur[IDX_GCH3CHOI]; + data[jistart + 3037] = 0.0 + k[8543]*y_cur[IDX_GCH3I]; + data[jistart + 3038] = 0.0 - k[8521]*y_cur[IDX_GCH3CHOI]; + data[jistart + 3039] = 0.0 - k[8505]*y_cur[IDX_GCH3CHOI] - k[8506]*y_cur[IDX_GCH3CHOI] - + k[8507]*y_cur[IDX_GCH3CHOI]; + data[jistart + 3040] = 0.0 + k[6977]; + data[jistart + 3041] = 0.0 + k[8543]*y_cur[IDX_GHCOI] - k[8547]*y_cur[IDX_GCH3CHOI] - + k[8548]*y_cur[IDX_GCH3CHOI]; + data[jistart + 3042] = 0.0 + k[8331]*y_cur[IDX_GCH3COI] - k[8332]*y_cur[IDX_GCH3CHOI] - + k[8333]*y_cur[IDX_GCH3CHOI] - k[8334]*y_cur[IDX_GCH3CHOI]; + data[jistart + 3043] = 0.0 + k[7769] + k[8089]; + data[jistart + 3044] = 0.0 + k[7774] + k[8094]; + data[jistart + 3045] = 0.0 + k[8528]*y_cur[IDX_GCH2I]; + data[jistart + 3046] = 0.0 + k[8150] + k[8150]; + data[jistart + 3047] = 0.0 - k[8570]*y_cur[IDX_GH2COI]; + data[jistart + 3048] = 0.0 + k[7701] + k[8001]; + data[jistart + 3049] = 0.0 - k[8560]*y_cur[IDX_GH2COI] - k[8561]*y_cur[IDX_GH2COI]; + data[jistart + 3050] = 0.0 + k[8334]*y_cur[IDX_GHI]; + data[jistart + 3051] = 0.0 - k[7108] - k[7290] - k[7472] - k[7692] - k[7982] - k[7983] - + k[7984] - k[7985] - k[7986] - k[7987] - k[8296]*y_cur[IDX_GHI] - + k[8297]*y_cur[IDX_GHI] - k[8298]*y_cur[IDX_GHI] - + k[8508]*y_cur[IDX_GOHI] - k[8509]*y_cur[IDX_GOHI] - + k[8522]*y_cur[IDX_GNHI] - k[8534]*y_cur[IDX_GNH2I] - + k[8544]*y_cur[IDX_GCH3I] - k[8560]*y_cur[IDX_GCH3OI] - + k[8561]*y_cur[IDX_GCH3OI] - k[8570]*y_cur[IDX_GCH2OHI] - + k[8596]*y_cur[IDX_GHI] - k[8597]*y_cur[IDX_GHI]; + data[jistart + 3052] = 0.0 - k[8534]*y_cur[IDX_GH2COI]; + data[jistart + 3053] = 0.0 + k[8295]*y_cur[IDX_GHI]; + data[jistart + 3054] = 0.0 - k[8522]*y_cur[IDX_GH2COI]; + data[jistart + 3055] = 0.0 - k[8508]*y_cur[IDX_GH2COI] - k[8509]*y_cur[IDX_GH2COI]; + data[jistart + 3056] = 0.0 + k[8438]*y_cur[IDX_GOI] + k[8528]*y_cur[IDX_GO2I]; + data[jistart + 3057] = 0.0 + k[8438]*y_cur[IDX_GCH2I]; + data[jistart + 3058] = 0.0 - k[8544]*y_cur[IDX_GH2COI]; + data[jistart + 3059] = 0.0 + k[6926]; + data[jistart + 3060] = 0.0 + k[8295]*y_cur[IDX_GHCOI] - k[8296]*y_cur[IDX_GH2COI] - + k[8297]*y_cur[IDX_GH2COI] - k[8298]*y_cur[IDX_GH2COI] + + k[8334]*y_cur[IDX_GCH3CHOI] - k[8596]*y_cur[IDX_GH2COI] - + k[8597]*y_cur[IDX_GH2COI]; + data[jistart + 3061] = 0.0 + k[7151] + k[7333] + k[7515]; + data[jistart + 3062] = 0.0 + k[8623]*y_cur[IDX_GHI]; + data[jistart + 3063] = 0.0 + k[1016]*y_cur[IDX_eM] + k[6546]*y_cur[IDX_GRAINM]; + data[jistart + 3064] = 0.0 + k[1119]*y_cur[IDX_eM] + k[6550]*y_cur[IDX_GRAINM]; + data[jistart + 3065] = 0.0 + k[4887]*y_cur[IDX_OHI]; + data[jistart + 3066] = 0.0 - k[2351]*y_cur[IDX_HII] - k[2711]*y_cur[IDX_H3II] - + k[2712]*y_cur[IDX_H3II] - k[3268]*y_cur[IDX_HeII] - + k[5215]*y_cur[IDX_CI] - k[5216]*y_cur[IDX_OI] - k[5871] - k[6202] - + k[6969]; + data[jistart + 3067] = 0.0 + k[4887]*y_cur[IDX_C2H5CNI]; + data[jistart + 3068] = 0.0 + k[8623]*y_cur[IDX_GOCNI]; + data[jistart + 3069] = 0.0 - k[5216]*y_cur[IDX_HOCNI]; + data[jistart + 3070] = 0.0 - k[3268]*y_cur[IDX_HOCNI]; + data[jistart + 3071] = 0.0 - k[2351]*y_cur[IDX_HOCNI]; + data[jistart + 3072] = 0.0 - k[5215]*y_cur[IDX_HOCNI]; + data[jistart + 3073] = 0.0 - k[2711]*y_cur[IDX_HOCNI] - k[2712]*y_cur[IDX_HOCNI]; + data[jistart + 3074] = 0.0 + k[6546]*y_cur[IDX_H2OCNII] + k[6550]*y_cur[IDX_HNCOHII]; + data[jistart + 3075] = 0.0 + k[1016]*y_cur[IDX_H2OCNII] + k[1119]*y_cur[IDX_HNCOHII]; + data[jistart + 3076] = 0.0 + k[7175] + k[7357] + k[7539]; + data[jistart + 3077] = 0.0 + k[1017]*y_cur[IDX_eM] + k[6622]*y_cur[IDX_GRAINM]; + data[jistart + 3078] = 0.0 - k[181]*y_cur[IDX_CII] - k[395]*y_cur[IDX_HII] - + k[2714]*y_cur[IDX_H3II] - k[2812]*y_cur[IDX_H3OII] - + k[2975]*y_cur[IDX_HCOII] - k[3269]*y_cur[IDX_HeII] - + k[3270]*y_cur[IDX_HeII] - k[4964]*y_cur[IDX_CI] - + k[5414]*y_cur[IDX_OI] - k[5873] - k[6204] - k[6993]; + data[jistart + 3079] = 0.0 + k[5433]*y_cur[IDX_OI]; + data[jistart + 3080] = 0.0 - k[2812]*y_cur[IDX_HPOI]; + data[jistart + 3081] = 0.0 - k[5414]*y_cur[IDX_HPOI] + k[5433]*y_cur[IDX_PH2I]; + data[jistart + 3082] = 0.0 - k[3269]*y_cur[IDX_HPOI] - k[3270]*y_cur[IDX_HPOI]; + data[jistart + 3083] = 0.0 - k[181]*y_cur[IDX_HPOI]; + data[jistart + 3084] = 0.0 - k[395]*y_cur[IDX_HPOI]; + data[jistart + 3085] = 0.0 - k[4964]*y_cur[IDX_HPOI]; + data[jistart + 3086] = 0.0 - k[2975]*y_cur[IDX_HPOI]; + data[jistart + 3087] = 0.0 - k[2714]*y_cur[IDX_HPOI]; + data[jistart + 3088] = 0.0 + k[6622]*y_cur[IDX_H2POII]; + data[jistart + 3089] = 0.0 + k[1017]*y_cur[IDX_H2POII]; + data[jistart + 3090] = 0.0 + k[7219] + k[7401] + k[7583]; + data[jistart + 3091] = 0.0 + k[1050]*y_cur[IDX_eM] + k[6771]*y_cur[IDX_GRAINM]; + data[jistart + 3092] = 0.0 + k[1021]*y_cur[IDX_eM] + k[6763]*y_cur[IDX_GRAINM]; + data[jistart + 3093] = 0.0 - k[396]*y_cur[IDX_HII] - k[2715]*y_cur[IDX_H3II] - + k[2813]*y_cur[IDX_H3OII] - k[2976]*y_cur[IDX_HCOII] - + k[3271]*y_cur[IDX_HeII] - k[3272]*y_cur[IDX_HeII] - k[5874] - + k[6207] - k[6208] - k[7037]; + data[jistart + 3094] = 0.0 + k[1724]*y_cur[IDX_C2H5OHI] + k[2114]*y_cur[IDX_CH3CHOI]; + data[jistart + 3095] = 0.0 + k[1724]*y_cur[IDX_S2II]; + data[jistart + 3096] = 0.0 + k[2114]*y_cur[IDX_S2II]; + data[jistart + 3097] = 0.0 - k[2813]*y_cur[IDX_HS2I]; + data[jistart + 3098] = 0.0 - k[3271]*y_cur[IDX_HS2I] - k[3272]*y_cur[IDX_HS2I]; + data[jistart + 3099] = 0.0 - k[396]*y_cur[IDX_HS2I]; + data[jistart + 3100] = 0.0 - k[2976]*y_cur[IDX_HS2I]; + data[jistart + 3101] = 0.0 - k[2715]*y_cur[IDX_HS2I]; + data[jistart + 3102] = 0.0 + k[6763]*y_cur[IDX_H2S2II] + k[6771]*y_cur[IDX_H3S2II]; + data[jistart + 3103] = 0.0 + k[1021]*y_cur[IDX_H2S2II] + k[1050]*y_cur[IDX_H3S2II]; + data[jistart + 3104] = 0.0 - k[1224]*y_cur[IDX_eM] - k[1225]*y_cur[IDX_eM] - + k[1575]*y_cur[IDX_C2H2I] - k[2473]*y_cur[IDX_H2I] - + k[6642]*y_cur[IDX_GRAINM] - k[6643]*y_cur[IDX_GRAINM]; + data[jistart + 3105] = 0.0 + k[2358]*y_cur[IDX_HII] + k[3311]*y_cur[IDX_HeII]; + data[jistart + 3106] = 0.0 + k[3312]*y_cur[IDX_HeII]; + data[jistart + 3107] = 0.0 + k[1410]*y_cur[IDX_CII]; + data[jistart + 3108] = 0.0 + k[1435]*y_cur[IDX_CII]; + data[jistart + 3109] = 0.0 + k[195]*y_cur[IDX_CII] + k[419]*y_cur[IDX_HII]; + data[jistart + 3110] = 0.0 + k[1921]*y_cur[IDX_CI]; + data[jistart + 3111] = 0.0 + k[1751]*y_cur[IDX_C2HI]; + data[jistart + 3112] = 0.0 + k[1529]*y_cur[IDX_C2H2II]; + data[jistart + 3113] = 0.0 + k[1751]*y_cur[IDX_SiII]; + data[jistart + 3114] = 0.0 + k[1529]*y_cur[IDX_SiI]; + data[jistart + 3115] = 0.0 - k[1575]*y_cur[IDX_SiC2II]; + data[jistart + 3116] = 0.0 + k[3311]*y_cur[IDX_SiC2HI] + k[3312]*y_cur[IDX_SiC3I]; + data[jistart + 3117] = 0.0 + k[195]*y_cur[IDX_SiC2I] + k[1410]*y_cur[IDX_HCSiI] + + k[1435]*y_cur[IDX_SiCH2I]; + data[jistart + 3118] = 0.0 + k[419]*y_cur[IDX_SiC2I] + k[2358]*y_cur[IDX_SiC2HI]; + data[jistart + 3119] = 0.0 + k[1921]*y_cur[IDX_SiCH2II]; + data[jistart + 3120] = 0.0 - k[6642]*y_cur[IDX_SiC2II] - k[6643]*y_cur[IDX_SiC2II]; + data[jistart + 3121] = 0.0 - k[2473]*y_cur[IDX_SiC2II]; + data[jistart + 3122] = 0.0 - k[1224]*y_cur[IDX_SiC2II] - k[1225]*y_cur[IDX_SiC2II]; + data[jistart + 3123] = 0.0 + k[1923]*y_cur[IDX_CI]; + data[jistart + 3124] = 0.0 + k[420]*y_cur[IDX_HII]; + data[jistart + 3125] = 0.0 + k[1438]*y_cur[IDX_CII]; + data[jistart + 3126] = 0.0 - k[1228]*y_cur[IDX_eM] - k[1229]*y_cur[IDX_eM] - + k[1916]*y_cur[IDX_CI] - k[6660]*y_cur[IDX_GRAINM] - + k[6661]*y_cur[IDX_GRAINM]; + data[jistart + 3127] = 0.0 + k[2746]*y_cur[IDX_H3II] + k[2820]*y_cur[IDX_H3OII] + + k[2993]*y_cur[IDX_HCOII]; + data[jistart + 3128] = 0.0 + k[1680]*y_cur[IDX_SiI]; + data[jistart + 3129] = 0.0 + k[1646]*y_cur[IDX_SiII]; + data[jistart + 3130] = 0.0 + k[1646]*y_cur[IDX_C2H3I] + k[5512]*y_cur[IDX_C2H2I]; + data[jistart + 3131] = 0.0 + k[1627]*y_cur[IDX_C2H3II] + k[1680]*y_cur[IDX_C2H4II]; + data[jistart + 3132] = 0.0 + k[1627]*y_cur[IDX_SiI]; + data[jistart + 3133] = 0.0 + k[5512]*y_cur[IDX_SiII]; + data[jistart + 3134] = 0.0 + k[2820]*y_cur[IDX_SiC2HI]; + data[jistart + 3135] = 0.0 + k[1438]*y_cur[IDX_SiCH3I]; + data[jistart + 3136] = 0.0 + k[420]*y_cur[IDX_SiC2H2I]; + data[jistart + 3137] = 0.0 - k[1916]*y_cur[IDX_SiC2H2II] + k[1923]*y_cur[IDX_SiCH3II]; + data[jistart + 3138] = 0.0 + k[2993]*y_cur[IDX_SiC2HI]; + data[jistart + 3139] = 0.0 + k[2746]*y_cur[IDX_SiC2HI]; + data[jistart + 3140] = 0.0 - k[6660]*y_cur[IDX_SiC2H2II] - k[6661]*y_cur[IDX_SiC2H2II]; + data[jistart + 3141] = 0.0 - k[1228]*y_cur[IDX_SiC2H2II] - k[1229]*y_cur[IDX_SiC2H2II]; + data[jistart + 3142] = 0.0 + k[1553]*y_cur[IDX_C2H2I] + k[2851]*y_cur[IDX_C4H2I]; + data[jistart + 3143] = 0.0 - k[856]*y_cur[IDX_eM] - k[857]*y_cur[IDX_eM] - + k[6796]*y_cur[IDX_GRAINM] - k[6797]*y_cur[IDX_GRAINM]; + data[jistart + 3144] = 0.0 + k[2477]*y_cur[IDX_C3H3II] + k[2486]*y_cur[IDX_CH2CCHII]; + data[jistart + 3145] = 0.0 + k[2180]*y_cur[IDX_CH4I]; + data[jistart + 3146] = 0.0 + k[1787]*y_cur[IDX_C3H3II] + k[1795]*y_cur[IDX_CH2CCHII]; + data[jistart + 3147] = 0.0 + k[1695]*y_cur[IDX_C2H4I]; + data[jistart + 3148] = 0.0 + k[1787]*y_cur[IDX_C3H2I] + k[1805]*y_cur[IDX_CH2CCHI] + + k[2477]*y_cur[IDX_H2CCCI]; + data[jistart + 3149] = 0.0 + k[1776]*y_cur[IDX_CH2CCHI]; + data[jistart + 3150] = 0.0 + k[1654]*y_cur[IDX_C4HI] + k[1678]*y_cur[IDX_C4H2I]; + data[jistart + 3151] = 0.0 + k[1635]*y_cur[IDX_C2H3I]; + data[jistart + 3152] = 0.0 + k[1776]*y_cur[IDX_C3H2II] + k[1805]*y_cur[IDX_C3H3II] + + k[2029]*y_cur[IDX_CH2CCHII]; + data[jistart + 3153] = 0.0 + k[1795]*y_cur[IDX_C3H2I] + k[2029]*y_cur[IDX_CH2CCHI] + + k[2486]*y_cur[IDX_H2CCCI]; + data[jistart + 3154] = 0.0 + k[1654]*y_cur[IDX_C2H4II]; + data[jistart + 3155] = 0.0 + k[1623]*y_cur[IDX_C2H3II] + k[1678]*y_cur[IDX_C2H4II] + + k[2851]*y_cur[IDX_C4H4II]; + data[jistart + 3156] = 0.0 + k[1634]*y_cur[IDX_C2H3I] + k[1696]*y_cur[IDX_C2H4I] + k[5511]*y_cur[IDX_C2H2I]; - data[jistart + 1314] = 0.0 + k[2850]*y_cur[IDX_C4H2I] - - k[5520]*y_cur[IDX_C2H2I]; - data[jistart + 1315] = 0.0 - k[1553]*y_cur[IDX_C2H2I] - - k[1554]*y_cur[IDX_C2H2I] + k[2851]*y_cur[IDX_C4H2I]; - data[jistart + 1316] = 0.0 - k[1555]*y_cur[IDX_C2H2I] + - k[2174]*y_cur[IDX_CH4I]; - data[jistart + 1317] = 0.0 - k[1556]*y_cur[IDX_C2H2I] + - k[1698]*y_cur[IDX_C2H4I] + k[2176]*y_cur[IDX_CH4I]; - data[jistart + 1318] = 0.0 + k[4237]*y_cur[IDX_C2H2II]; - data[jistart + 1319] = 0.0 + k[1592]*y_cur[IDX_C2H3II]; - data[jistart + 1320] = 0.0 + k[4272]*y_cur[IDX_C2H2II]; - data[jistart + 1321] = 0.0 + k[216]*y_cur[IDX_C2H2II] + - k[1589]*y_cur[IDX_C2H3II]; - data[jistart + 1322] = 0.0 + k[4307]*y_cur[IDX_C2H2II]; - data[jistart + 1323] = 0.0 - k[1557]*y_cur[IDX_C2H2I] - - k[1558]*y_cur[IDX_C2H2I] + k[2182]*y_cur[IDX_CH4I]; - data[jistart + 1324] = 0.0 + k[4342]*y_cur[IDX_C2H2II]; - data[jistart + 1325] = 0.0 + k[1599]*y_cur[IDX_C2H3II]; - data[jistart + 1326] = 0.0 - k[1559]*y_cur[IDX_C2H2I]; - data[jistart + 1327] = 0.0 + k[4377]*y_cur[IDX_C2H2II]; - data[jistart + 1328] = 0.0 + k[217]*y_cur[IDX_C2H2II] + - k[1595]*y_cur[IDX_C2H3II]; - data[jistart + 1329] = 0.0 + k[1704]*y_cur[IDX_C2H4I]; - data[jistart + 1330] = 0.0 + k[1598]*y_cur[IDX_C2H3II] + k[6038]; - data[jistart + 1331] = 0.0 + k[4412]*y_cur[IDX_C2H2II]; - data[jistart + 1332] = 0.0 + k[1605]*y_cur[IDX_C2H3II]; - data[jistart + 1333] = 0.0 + k[4447]*y_cur[IDX_C2H2II]; - data[jistart + 1334] = 0.0 + k[218]*y_cur[IDX_C2H2II] + - k[1602]*y_cur[IDX_C2H3II]; - data[jistart + 1335] = 0.0 - k[1560]*y_cur[IDX_C2H2I] - - k[1561]*y_cur[IDX_C2H2I]; - data[jistart + 1336] = 0.0 + k[4482]*y_cur[IDX_C2H2II]; - data[jistart + 1337] = 0.0 + k[4517]*y_cur[IDX_C2H2II]; - data[jistart + 1338] = 0.0 + k[4552]*y_cur[IDX_C2H2II]; - data[jistart + 1339] = 0.0 + k[4587]*y_cur[IDX_C2H2II]; - data[jistart + 1340] = 0.0 - k[5063]*y_cur[IDX_C2H2I] - - k[5064]*y_cur[IDX_C2H2I]; - data[jistart + 1341] = 0.0 - k[1934]*y_cur[IDX_C2H2I]; - data[jistart + 1342] = 0.0 + k[4622]*y_cur[IDX_C2H2II]; - data[jistart + 1343] = 0.0 + k[1]*y_cur[IDX_CM] - - k[4991]*y_cur[IDX_C2H2I] + k[4992]*y_cur[IDX_CH2I] + - k[4992]*y_cur[IDX_CH2I] + k[4993]*y_cur[IDX_CH2I] + - k[4993]*y_cur[IDX_CH2I]; - data[jistart + 1344] = 0.0 + k[219]*y_cur[IDX_C2H2II] + - k[1608]*y_cur[IDX_C2H3II]; - data[jistart + 1345] = 0.0 - k[227]*y_cur[IDX_C2H2I] + - k[227]*y_cur[IDX_C2H2I] + k[910]*y_cur[IDX_eM] + - k[2031]*y_cur[IDX_C4H2I] + k[3726]*y_cur[IDX_OI] + - k[6470]*y_cur[IDX_GRAINM]; - data[jistart + 1346] = 0.0 + k[1343]*y_cur[IDX_CII] + - k[1773]*y_cur[IDX_C3H2II]; - data[jistart + 1347] = 0.0 + k[913]*y_cur[IDX_eM] + - k[6657]*y_cur[IDX_GRAINM]; - data[jistart + 1348] = 0.0 + k[919]*y_cur[IDX_eM] + - k[6493]*y_cur[IDX_GRAINM]; - data[jistart + 1349] = 0.0 + k[4949]*y_cur[IDX_CI] + - k[5025]*y_cur[IDX_C2H3I]; - data[jistart + 1350] = 0.0 - k[2042]*y_cur[IDX_C2H2I] + - k[2081]*y_cur[IDX_C4H2I]; - data[jistart + 1351] = 0.0 + k[220]*y_cur[IDX_C2H2II] + - k[1363]*y_cur[IDX_CII] + k[1611]*y_cur[IDX_C2H3II] + - k[1779]*y_cur[IDX_C3H2II] + k[2107]*y_cur[IDX_C4H2II] + - k[3866]*y_cur[IDX_SiII]; - data[jistart + 1352] = 0.0 + k[2160]*y_cur[IDX_C3HII] + - k[2164]*y_cur[IDX_C4II] + k[2174]*y_cur[IDX_C4NII] + - k[2176]*y_cur[IDX_C5II] + k[2182]*y_cur[IDX_C6II]; - data[jistart + 1353] = 0.0 - k[277]*y_cur[IDX_C2H2I] - - k[2133]*y_cur[IDX_C2H2I] - k[2134]*y_cur[IDX_C2H2I]; - data[jistart + 1354] = 0.0 - k[2218]*y_cur[IDX_C2H2I]; - data[jistart + 1355] = 0.0 - k[5104]*y_cur[IDX_C2H2I]; - data[jistart + 1356] = 0.0 + k[4657]*y_cur[IDX_C2H2II]; - data[jistart + 1357] = 0.0 - k[228]*y_cur[IDX_C2H2I]; - data[jistart + 1358] = 0.0 + k[221]*y_cur[IDX_C2H2II]; - data[jistart + 1359] = 0.0 + k[8656]*y_cur[IDX_GCH2I]; - data[jistart + 1360] = 0.0 + k[8587]*y_cur[IDX_GHI]; - data[jistart + 1361] = 0.0 + k[7092] + k[7274] + k[7456]; - data[jistart + 1362] = 0.0 + k[8715]*y_cur[IDX_GCHI] + - k[8715]*y_cur[IDX_GCHI]; - data[jistart + 1363] = 0.0 + k[8656]*y_cur[IDX_GCI]; - data[jistart + 1364] = 0.0 + k[8587]*y_cur[IDX_GC2HI]; - data[jistart + 1365] = 0.0 + k[6362]*y_cur[IDX_C2H3II] + - k[6363]*y_cur[IDX_C2H3II] + k[6381]*y_cur[IDX_C2H4II] + - k[6382]*y_cur[IDX_C2H4II] + k[6391]*y_cur[IDX_C2H5II] + - k[6392]*y_cur[IDX_C2H5II] + k[6462]*y_cur[IDX_C3H2II] + - k[6470]*y_cur[IDX_CH2CCHII] + k[6493]*y_cur[IDX_CH2COII] + - k[6504]*y_cur[IDX_C3H7II] + k[6637]*y_cur[IDX_HC3NHII] + - k[6656]*y_cur[IDX_C3H2OII] + k[6657]*y_cur[IDX_CH2CHCNHII] + - k[6682]*y_cur[IDX_PC2H2II] + k[6687]*y_cur[IDX_PC2H3II]; - data[jistart + 1366] = 0.0 + k[88]*y_cur[IDX_C2HM] - - k[5154]*y_cur[IDX_C2H2I] + k[5155]*y_cur[IDX_C2H3I]; - data[jistart + 1367] = 0.0 - k[324]*y_cur[IDX_C2H2I]; - data[jistart + 1368] = 0.0 + k[67]*y_cur[IDX_C2HI] - - k[2366]*y_cur[IDX_C2H2I] + k[4692]*y_cur[IDX_C2H2II]; - data[jistart + 1369] = 0.0 + k[5133]*y_cur[IDX_C2HI]; - data[jistart + 1370] = 0.0 - k[437]*y_cur[IDX_C2H2I] - - k[2370]*y_cur[IDX_C2H2I]; - data[jistart + 1371] = 0.0 + k[1617]*y_cur[IDX_C2H3II] + - k[5395]*y_cur[IDX_OI]; - data[jistart + 1372] = 0.0 + k[222]*y_cur[IDX_C2H2II]; - data[jistart + 1373] = 0.0 + k[2523]*y_cur[IDX_C2H3II] + - k[2530]*y_cur[IDX_C3HII]; - data[jistart + 1374] = 0.0 - k[463]*y_cur[IDX_C2H2I]; - data[jistart + 1375] = 0.0 + k[223]*y_cur[IDX_C2H2II] + - k[1619]*y_cur[IDX_C2H3II] + k[2578]*y_cur[IDX_C3HII]; - data[jistart + 1376] = 0.0 - k[2587]*y_cur[IDX_C2H2I]; - data[jistart + 1377] = 0.0 - k[5567]*y_cur[IDX_C2H2I]; - data[jistart + 1378] = 0.0 + k[1620]*y_cur[IDX_C2H3II]; - data[jistart + 1379] = 0.0 - k[229]*y_cur[IDX_C2H2I] - - k[1565]*y_cur[IDX_C2H2I]; - data[jistart + 1380] = 0.0 + k[1066]*y_cur[IDX_eM] + - k[6637]*y_cur[IDX_GRAINM]; - data[jistart + 1381] = 0.0 + k[2861]*y_cur[IDX_C2H3II]; - data[jistart + 1382] = 0.0 - k[230]*y_cur[IDX_C2H2I]; - data[jistart + 1383] = 0.0 + k[225]*y_cur[IDX_C2H2II]; - data[jistart + 1384] = 0.0 - k[1566]*y_cur[IDX_C2H2I]; - data[jistart + 1385] = 0.0 - k[1567]*y_cur[IDX_C2H2I]; - data[jistart + 1386] = 0.0 + k[3036]*y_cur[IDX_C2H3II]; - data[jistart + 1387] = 0.0 - k[509]*y_cur[IDX_C2H2I] - - k[3074]*y_cur[IDX_C2H2I] - k[3075]*y_cur[IDX_C2H2I] - - k[3076]*y_cur[IDX_C2H2I]; - data[jistart + 1388] = 0.0 + k[529]*y_cur[IDX_C2H2II]; - data[jistart + 1389] = 0.0 + k[5223]*y_cur[IDX_C2H3I]; - data[jistart + 1390] = 0.0 - k[1568]*y_cur[IDX_C2H2I]; - data[jistart + 1391] = 0.0 + k[1624]*y_cur[IDX_C2H3II]; - data[jistart + 1392] = 0.0 + k[598]*y_cur[IDX_C2H2II] + - k[3557]*y_cur[IDX_C2H3II] + k[3563]*y_cur[IDX_C3HII]; - data[jistart + 1393] = 0.0 + k[226]*y_cur[IDX_C2H2II] - - k[4878]*y_cur[IDX_C2H2I]; - data[jistart + 1394] = 0.0 + k[632]*y_cur[IDX_C2H2II]; - data[jistart + 1395] = 0.0 + k[3696]*y_cur[IDX_C3H3II] + - k[3726]*y_cur[IDX_CH2CCHII] - k[5344]*y_cur[IDX_C2H2I] + - k[5395]*y_cur[IDX_H2CCCI]; - data[jistart + 1396] = 0.0 - k[647]*y_cur[IDX_C2H2I]; - data[jistart + 1397] = 0.0 + k[4728]*y_cur[IDX_C2H2II]; - data[jistart + 1398] = 0.0 + k[4882]*y_cur[IDX_C2H3I]; - data[jistart + 1399] = 0.0 - k[668]*y_cur[IDX_C2H2I] - - k[3654]*y_cur[IDX_C2H2I] - k[3655]*y_cur[IDX_C2H2I]; - data[jistart + 1400] = 0.0 + k[4763]*y_cur[IDX_C2H2II]; - data[jistart + 1401] = 0.0 - k[5453]*y_cur[IDX_C2H2I] - - k[5454]*y_cur[IDX_C2H2I] - k[5455]*y_cur[IDX_C2H2I] + - k[5456]*y_cur[IDX_C2H3I]; - data[jistart + 1402] = 0.0 + k[4798]*y_cur[IDX_C2H2II]; - data[jistart + 1403] = 0.0 - k[1569]*y_cur[IDX_C2H2I]; - data[jistart + 1404] = 0.0 + k[1183]*y_cur[IDX_eM] + - k[6682]*y_cur[IDX_GRAINM]; - data[jistart + 1405] = 0.0 + k[1186]*y_cur[IDX_eM] + - k[6687]*y_cur[IDX_GRAINM]; - data[jistart + 1406] = 0.0 - k[1570]*y_cur[IDX_C2H2I]; - data[jistart + 1407] = 0.0 - k[1571]*y_cur[IDX_C2H2I]; - data[jistart + 1408] = 0.0 - k[1572]*y_cur[IDX_C2H2I]; - data[jistart + 1409] = 0.0 - k[1573]*y_cur[IDX_C2H2I]; - data[jistart + 1410] = 0.0 + k[4833]*y_cur[IDX_C2H2II]; - data[jistart + 1411] = 0.0 - k[3843]*y_cur[IDX_C2H2I] - - k[3844]*y_cur[IDX_C2H2I] - k[3845]*y_cur[IDX_C2H2I] - - k[3846]*y_cur[IDX_C2H2I]; - data[jistart + 1412] = 0.0 - k[4879]*y_cur[IDX_C2H2I] - - k[4880]*y_cur[IDX_C2H2I]; - data[jistart + 1413] = 0.0 - k[1574]*y_cur[IDX_C2H2I] + - k[3866]*y_cur[IDX_CH3CCHI] - k[5512]*y_cur[IDX_C2H2I]; - data[jistart + 1414] = 0.0 - k[1575]*y_cur[IDX_C2H2I]; - data[jistart + 1415] = 0.0 - k[1576]*y_cur[IDX_C2H2I]; - data[jistart + 1416] = 0.0 + k[1920]*y_cur[IDX_CI]; - data[jistart + 1417] = 0.0 + k[747]*y_cur[IDX_C2H3II] + - k[748]*y_cur[IDX_C2H3II] + k[757]*y_cur[IDX_C2H4II] + - k[758]*y_cur[IDX_C2H4II] + k[764]*y_cur[IDX_C2H5II] + - k[765]*y_cur[IDX_C2H5II] + k[792]*y_cur[IDX_C3H2II] + - k[797]*y_cur[IDX_C3H2OII] + k[807]*y_cur[IDX_C3H7II] + - k[910]*y_cur[IDX_CH2CCHII] + k[913]*y_cur[IDX_CH2CHCNHII] + - k[919]*y_cur[IDX_CH2COII] + k[1066]*y_cur[IDX_HC3NHII] + - k[1183]*y_cur[IDX_PC2H2II] + k[1186]*y_cur[IDX_PC2H3II]; - data[jistart + 1418] = 0.0 - k[1850]*y_cur[IDX_C2H2II]; - data[jistart + 1419] = 0.0 + k[1343]*y_cur[IDX_CH2CCH2I] + - k[1353]*y_cur[IDX_CH3I] + k[1363]*y_cur[IDX_CH3CCHI] + - k[1367]*y_cur[IDX_C2H6I] + k[1373]*y_cur[IDX_CH3CHCH2I] + - k[1383]*y_cur[IDX_CH4I]; - data[jistart + 1420] = 0.0 - k[3887]*y_cur[IDX_C2H2II]; - data[jistart + 1421] = 0.0 - k[3922]*y_cur[IDX_C2H2II]; - data[jistart + 1422] = 0.0 - k[3957]*y_cur[IDX_C2H2II]; - data[jistart + 1423] = 0.0 + k[3548]*y_cur[IDX_NH3II]; - data[jistart + 1424] = 0.0 + k[2147]*y_cur[IDX_CH4I]; - data[jistart + 1425] = 0.0 - k[3992]*y_cur[IDX_C2H2II]; - data[jistart + 1426] = 0.0 - k[1725]*y_cur[IDX_C2H2II] + - k[1726]*y_cur[IDX_C2H3II] + k[1744]*y_cur[IDX_H2COII] + - k[1745]*y_cur[IDX_HCNII] + k[1746]*y_cur[IDX_HCOII] + - k[1747]*y_cur[IDX_HNOII] + k[1748]*y_cur[IDX_N2HII] + - k[1749]*y_cur[IDX_O2HII] + k[2220]*y_cur[IDX_CH5II] + - k[2373]*y_cur[IDX_H2II] + k[2504]*y_cur[IDX_H2OII] + - k[2597]*y_cur[IDX_H3II] + k[3480]*y_cur[IDX_NHII] + - k[3508]*y_cur[IDX_NH2II] + k[3770]*y_cur[IDX_OHII]; - data[jistart + 1427] = 0.0 + k[1474]*y_cur[IDX_HCNI] + - k[1477]*y_cur[IDX_HCOI] + k[2151]*y_cur[IDX_CH4I] + - k[2402]*y_cur[IDX_H2I]; - data[jistart + 1428] = 0.0 - k[4027]*y_cur[IDX_C2H2II]; - data[jistart + 1429] = 0.0 + k[228]*y_cur[IDX_CO2II] + - k[229]*y_cur[IDX_HC3NII] + k[230]*y_cur[IDX_HCNII] + - k[277]*y_cur[IDX_CH4II] + k[324]*y_cur[IDX_HII] + - k[437]*y_cur[IDX_H2II] + k[463]*y_cur[IDX_H2OII] + - k[509]*y_cur[IDX_HeII] + k[647]*y_cur[IDX_OII] + - k[668]*y_cur[IDX_O2II] - k[1479]*y_cur[IDX_C2H2II] - - k[1480]*y_cur[IDX_C2H2II] + k[1542]*y_cur[IDX_C2N2II] + k[5696] + - k[5981]; - data[jistart + 1430] = 0.0 - k[214]*y_cur[IDX_C2H3I] - - k[215]*y_cur[IDX_C2H4I] - k[216]*y_cur[IDX_C5H2I] - - k[217]*y_cur[IDX_C6H2I] - k[218]*y_cur[IDX_C7H2I] - - k[219]*y_cur[IDX_CH2CCHI] - k[220]*y_cur[IDX_CH3CCHI] - - k[221]*y_cur[IDX_FeI] - k[222]*y_cur[IDX_H2COI] - - k[223]*y_cur[IDX_H2SI] - k[224]*y_cur[IDX_C4H2I] - - k[225]*y_cur[IDX_HCOI] - k[226]*y_cur[IDX_NOI] - - k[529]*y_cur[IDX_MgI] - k[598]*y_cur[IDX_NH3I] - - k[632]*y_cur[IDX_NaI] - k[742]*y_cur[IDX_eM] - k[743]*y_cur[IDX_eM] - - k[744]*y_cur[IDX_eM] - k[1479]*y_cur[IDX_C2H2I] - - k[1480]*y_cur[IDX_C2H2I] - k[1481]*y_cur[IDX_C2H3I] - - k[1482]*y_cur[IDX_C2H3I] - k[1483]*y_cur[IDX_C2H4I] - - k[1484]*y_cur[IDX_C2H4I] - k[1485]*y_cur[IDX_C3H2I] - - k[1486]*y_cur[IDX_C3H2I] - k[1487]*y_cur[IDX_C3HI] - - k[1488]*y_cur[IDX_C3HI] - k[1489]*y_cur[IDX_C4HI] - - k[1490]*y_cur[IDX_C4HI] - k[1491]*y_cur[IDX_C5H2I] - - k[1492]*y_cur[IDX_C5H2I] - k[1493]*y_cur[IDX_C5HI] - - k[1494]*y_cur[IDX_C5HI] - k[1495]*y_cur[IDX_C6H2I] - - k[1496]*y_cur[IDX_C6H2I] - k[1497]*y_cur[IDX_C6HI] - - k[1498]*y_cur[IDX_C6HI] - k[1499]*y_cur[IDX_C7H2I] - - k[1500]*y_cur[IDX_C7H2I] - k[1501]*y_cur[IDX_C7HI] - - k[1502]*y_cur[IDX_C7HI] - k[1503]*y_cur[IDX_C8H2I] - - k[1504]*y_cur[IDX_C8H2I] - k[1505]*y_cur[IDX_C8HI] - - k[1506]*y_cur[IDX_C8HI] - k[1507]*y_cur[IDX_CH2CCHI] - - k[1508]*y_cur[IDX_CH2CCHI] - k[1509]*y_cur[IDX_CH3CCHI] - - k[1510]*y_cur[IDX_CH3CCHI] - k[1511]*y_cur[IDX_C2H6I] - - k[1512]*y_cur[IDX_C2H6I] - k[1513]*y_cur[IDX_CH3CNI] - - k[1514]*y_cur[IDX_CH3CNI] - k[1515]*y_cur[IDX_CH3CNI] - - k[1516]*y_cur[IDX_H2CCCI] - k[1517]*y_cur[IDX_H2CCCI] - - k[1518]*y_cur[IDX_H2SI] - k[1519]*y_cur[IDX_H2SI] - - k[1520]*y_cur[IDX_C4H2I] - k[1521]*y_cur[IDX_C4H2I] - - k[1522]*y_cur[IDX_HCNI] - k[1523]*y_cur[IDX_HCNI] - - k[1524]*y_cur[IDX_HCOI] - k[1525]*y_cur[IDX_HNCI] - - k[1526]*y_cur[IDX_PI] - k[1527]*y_cur[IDX_SI] - - k[1528]*y_cur[IDX_SI] - k[1529]*y_cur[IDX_SiI] - - k[1530]*y_cur[IDX_SiI] - k[1531]*y_cur[IDX_SiH4I] - - k[1532]*y_cur[IDX_SiH4I] - k[1533]*y_cur[IDX_SiH4I] - - k[1534]*y_cur[IDX_SiH4I] - k[1725]*y_cur[IDX_C2HI] - - k[1850]*y_cur[IDX_CI] - k[1998]*y_cur[IDX_CH2I] - - k[2154]*y_cur[IDX_CH4I] - k[2155]*y_cur[IDX_CH4I] - - k[2242]*y_cur[IDX_CHI] - k[2277]*y_cur[IDX_CNI] - - k[2403]*y_cur[IDX_H2I] - k[2522]*y_cur[IDX_H2OI] - - k[3387]*y_cur[IDX_NI] - k[3388]*y_cur[IDX_NI] - - k[3389]*y_cur[IDX_NI] - k[3531]*y_cur[IDX_NH2I] - - k[3532]*y_cur[IDX_NH2I] - k[3556]*y_cur[IDX_NH3I] - - k[3607]*y_cur[IDX_NHI] - k[3688]*y_cur[IDX_OI] - - k[3689]*y_cur[IDX_OI] - k[3796]*y_cur[IDX_OHI] - - k[3887]*y_cur[IDX_CM] - k[3922]*y_cur[IDX_C10M] - - k[3957]*y_cur[IDX_C10HM] - k[3992]*y_cur[IDX_C2M] - - k[4027]*y_cur[IDX_C2HM] - k[4062]*y_cur[IDX_C3M] - - k[4097]*y_cur[IDX_C3HM] - k[4132]*y_cur[IDX_C3NM] - - k[4167]*y_cur[IDX_C4M] - k[4202]*y_cur[IDX_C4HM] - - k[4237]*y_cur[IDX_C5M] - k[4272]*y_cur[IDX_C5HM] - - k[4307]*y_cur[IDX_C5NM] - k[4342]*y_cur[IDX_C6M] - - k[4377]*y_cur[IDX_C6HM] - k[4412]*y_cur[IDX_C7M] - - k[4447]*y_cur[IDX_C7HM] - k[4482]*y_cur[IDX_C8M] - - k[4517]*y_cur[IDX_C8HM] - k[4552]*y_cur[IDX_C9M] - - k[4587]*y_cur[IDX_C9HM] - k[4622]*y_cur[IDX_CHM] - - k[4657]*y_cur[IDX_CNM] - k[4692]*y_cur[IDX_HM] - - k[4728]*y_cur[IDX_OM] - k[4763]*y_cur[IDX_O2M] - - k[4798]*y_cur[IDX_OHM] - k[4833]*y_cur[IDX_SM] - - k[5507]*y_cur[IDX_COI] - k[5508]*y_cur[IDX_HC3NI] - - k[5509]*y_cur[IDX_HC5NI] - k[5510]*y_cur[IDX_HC7NI] - - k[5549]*y_cur[IDX_H2I] - k[6356]*y_cur[IDX_GRAINM] - - k[6357]*y_cur[IDX_GRAINM] - k[6358]*y_cur[IDX_GRAINM]; - data[jistart + 1431] = 0.0 - k[214]*y_cur[IDX_C2H2II] - - k[1481]*y_cur[IDX_C2H2II] - k[1482]*y_cur[IDX_C2H2II] + - k[2295]*y_cur[IDX_HII] + k[3078]*y_cur[IDX_HeII]; - data[jistart + 1432] = 0.0 + k[1726]*y_cur[IDX_C2HI] + - k[2827]*y_cur[IDX_HI]; - data[jistart + 1433] = 0.0 - k[215]*y_cur[IDX_C2H2II] - - k[1483]*y_cur[IDX_C2H2II] - k[1484]*y_cur[IDX_C2H2II] + - k[2296]*y_cur[IDX_HII] + k[2371]*y_cur[IDX_H2II] + - k[3080]*y_cur[IDX_HeII] + k[3632]*y_cur[IDX_OII]; - data[jistart + 1434] = 0.0 + k[1367]*y_cur[IDX_CII] - - k[1511]*y_cur[IDX_C2H2II] - k[1512]*y_cur[IDX_C2H2II] + - k[3188]*y_cur[IDX_HeII]; - data[jistart + 1435] = 0.0 + k[1542]*y_cur[IDX_C2H2I]; - data[jistart + 1436] = 0.0 - k[4062]*y_cur[IDX_C2H2II]; - data[jistart + 1437] = 0.0 - k[1487]*y_cur[IDX_C2H2II] - - k[1488]*y_cur[IDX_C2H2II]; - data[jistart + 1438] = 0.0 - k[4097]*y_cur[IDX_C2H2II]; - data[jistart + 1439] = 0.0 - k[1485]*y_cur[IDX_C2H2II] - - k[1486]*y_cur[IDX_C2H2II]; - data[jistart + 1440] = 0.0 + k[3397]*y_cur[IDX_NI]; - data[jistart + 1441] = 0.0 - k[4132]*y_cur[IDX_C2H2II]; - data[jistart + 1442] = 0.0 - k[4167]*y_cur[IDX_C2H2II]; - data[jistart + 1443] = 0.0 - k[1489]*y_cur[IDX_C2H2II] - - k[1490]*y_cur[IDX_C2H2II]; - data[jistart + 1444] = 0.0 - k[4202]*y_cur[IDX_C2H2II]; - data[jistart + 1445] = 0.0 - k[224]*y_cur[IDX_C2H2II] - - k[1520]*y_cur[IDX_C2H2II] - k[1521]*y_cur[IDX_C2H2II]; - data[jistart + 1446] = 0.0 - k[4237]*y_cur[IDX_C2H2II]; - data[jistart + 1447] = 0.0 - k[1493]*y_cur[IDX_C2H2II] - - k[1494]*y_cur[IDX_C2H2II]; - data[jistart + 1448] = 0.0 - k[4272]*y_cur[IDX_C2H2II]; - data[jistart + 1449] = 0.0 - k[216]*y_cur[IDX_C2H2II] - - k[1491]*y_cur[IDX_C2H2II] - k[1492]*y_cur[IDX_C2H2II]; - data[jistart + 1450] = 0.0 - k[4307]*y_cur[IDX_C2H2II]; - data[jistart + 1451] = 0.0 - k[4342]*y_cur[IDX_C2H2II]; - data[jistart + 1452] = 0.0 - k[1497]*y_cur[IDX_C2H2II] - - k[1498]*y_cur[IDX_C2H2II]; - data[jistart + 1453] = 0.0 - k[4377]*y_cur[IDX_C2H2II]; - data[jistart + 1454] = 0.0 - k[217]*y_cur[IDX_C2H2II] - - k[1495]*y_cur[IDX_C2H2II] - k[1496]*y_cur[IDX_C2H2II]; - data[jistart + 1455] = 0.0 - k[4412]*y_cur[IDX_C2H2II]; - data[jistart + 1456] = 0.0 - k[1501]*y_cur[IDX_C2H2II] - - k[1502]*y_cur[IDX_C2H2II]; - data[jistart + 1457] = 0.0 - k[4447]*y_cur[IDX_C2H2II]; - data[jistart + 1458] = 0.0 - k[218]*y_cur[IDX_C2H2II] - - k[1499]*y_cur[IDX_C2H2II] - k[1500]*y_cur[IDX_C2H2II]; - data[jistart + 1459] = 0.0 - k[4482]*y_cur[IDX_C2H2II]; - data[jistart + 1460] = 0.0 - k[1505]*y_cur[IDX_C2H2II] - - k[1506]*y_cur[IDX_C2H2II]; - data[jistart + 1461] = 0.0 - k[4517]*y_cur[IDX_C2H2II]; - data[jistart + 1462] = 0.0 - k[1503]*y_cur[IDX_C2H2II] - - k[1504]*y_cur[IDX_C2H2II]; - data[jistart + 1463] = 0.0 - k[4552]*y_cur[IDX_C2H2II]; - data[jistart + 1464] = 0.0 - k[4587]*y_cur[IDX_C2H2II]; - data[jistart + 1465] = 0.0 - k[2242]*y_cur[IDX_C2H2II] + - k[2243]*y_cur[IDX_CH3II]; - data[jistart + 1466] = 0.0 + k[1940]*y_cur[IDX_CH4I]; - data[jistart + 1467] = 0.0 - k[4622]*y_cur[IDX_C2H2II]; - data[jistart + 1468] = 0.0 - k[1998]*y_cur[IDX_C2H2II]; - data[jistart + 1469] = 0.0 - k[219]*y_cur[IDX_C2H2II] - - k[1507]*y_cur[IDX_C2H2II] - k[1508]*y_cur[IDX_C2H2II]; - data[jistart + 1470] = 0.0 + k[1343]*y_cur[IDX_CII]; - data[jistart + 1471] = 0.0 + k[3169]*y_cur[IDX_HeII]; - data[jistart + 1472] = 0.0 + k[1353]*y_cur[IDX_CII]; - data[jistart + 1473] = 0.0 + k[2243]*y_cur[IDX_CHI]; - data[jistart + 1474] = 0.0 - k[220]*y_cur[IDX_C2H2II] + - k[1363]*y_cur[IDX_CII] - k[1509]*y_cur[IDX_C2H2II] - - k[1510]*y_cur[IDX_C2H2II]; - data[jistart + 1475] = 0.0 + k[1373]*y_cur[IDX_CII]; - data[jistart + 1476] = 0.0 - k[1513]*y_cur[IDX_C2H2II] - - k[1514]*y_cur[IDX_C2H2II] - k[1515]*y_cur[IDX_C2H2II]; - data[jistart + 1477] = 0.0 + k[1383]*y_cur[IDX_CII] + - k[1940]*y_cur[IDX_CHII] + k[2147]*y_cur[IDX_C2II] + - k[2151]*y_cur[IDX_C2HII] - k[2154]*y_cur[IDX_C2H2II] - - k[2155]*y_cur[IDX_C2H2II]; - data[jistart + 1478] = 0.0 + k[277]*y_cur[IDX_C2H2I]; - data[jistart + 1479] = 0.0 + k[2220]*y_cur[IDX_C2HI]; - data[jistart + 1480] = 0.0 - k[2277]*y_cur[IDX_C2H2II]; - data[jistart + 1481] = 0.0 - k[4657]*y_cur[IDX_C2H2II]; - data[jistart + 1482] = 0.0 - k[5507]*y_cur[IDX_C2H2II]; - data[jistart + 1483] = 0.0 + k[228]*y_cur[IDX_C2H2I]; - data[jistart + 1484] = 0.0 - k[221]*y_cur[IDX_C2H2II]; - data[jistart + 1485] = 0.0 - k[6356]*y_cur[IDX_C2H2II] - - k[6357]*y_cur[IDX_C2H2II] - k[6358]*y_cur[IDX_C2H2II]; - data[jistart + 1486] = 0.0 + k[2827]*y_cur[IDX_C2H3II]; - data[jistart + 1487] = 0.0 + k[324]*y_cur[IDX_C2H2I] + - k[2295]*y_cur[IDX_C2H3I] + k[2296]*y_cur[IDX_C2H4I]; - data[jistart + 1488] = 0.0 - k[4692]*y_cur[IDX_C2H2II]; - data[jistart + 1489] = 0.0 + k[2402]*y_cur[IDX_C2HII] - - k[2403]*y_cur[IDX_C2H2II] + k[2445]*y_cur[IDX_HC3NII] - - k[5549]*y_cur[IDX_C2H2II]; - data[jistart + 1490] = 0.0 + k[437]*y_cur[IDX_C2H2I] + - k[2371]*y_cur[IDX_C2H4I] + k[2373]*y_cur[IDX_C2HI]; - data[jistart + 1491] = 0.0 - k[1516]*y_cur[IDX_C2H2II] - - k[1517]*y_cur[IDX_C2H2II]; - data[jistart + 1492] = 0.0 - k[222]*y_cur[IDX_C2H2II]; - data[jistart + 1493] = 0.0 + k[1744]*y_cur[IDX_C2HI]; - data[jistart + 1494] = 0.0 - k[2522]*y_cur[IDX_C2H2II]; - data[jistart + 1495] = 0.0 + k[463]*y_cur[IDX_C2H2I] + - k[2504]*y_cur[IDX_C2HI]; - data[jistart + 1496] = 0.0 - k[223]*y_cur[IDX_C2H2II] - - k[1518]*y_cur[IDX_C2H2II] - k[1519]*y_cur[IDX_C2H2II]; - data[jistart + 1497] = 0.0 + k[2597]*y_cur[IDX_C2HI]; - data[jistart + 1498] = 0.0 - k[5508]*y_cur[IDX_C2H2II]; - data[jistart + 1499] = 0.0 + k[229]*y_cur[IDX_C2H2I] + - k[2445]*y_cur[IDX_H2I]; - data[jistart + 1500] = 0.0 - k[5509]*y_cur[IDX_C2H2II]; - data[jistart + 1501] = 0.0 - k[5510]*y_cur[IDX_C2H2II]; - data[jistart + 1502] = 0.0 + k[1474]*y_cur[IDX_C2HII] - - k[1522]*y_cur[IDX_C2H2II] - k[1523]*y_cur[IDX_C2H2II]; - data[jistart + 1503] = 0.0 + k[230]*y_cur[IDX_C2H2I] + - k[1745]*y_cur[IDX_C2HI]; - data[jistart + 1504] = 0.0 - k[225]*y_cur[IDX_C2H2II] + - k[1477]*y_cur[IDX_C2HII] - k[1524]*y_cur[IDX_C2H2II]; - data[jistart + 1505] = 0.0 + k[1746]*y_cur[IDX_C2HI]; - data[jistart + 1506] = 0.0 - k[1525]*y_cur[IDX_C2H2II]; - data[jistart + 1507] = 0.0 + k[1747]*y_cur[IDX_C2HI]; - data[jistart + 1508] = 0.0 + k[509]*y_cur[IDX_C2H2I] + - k[3078]*y_cur[IDX_C2H3I] + k[3080]*y_cur[IDX_C2H4I] + - k[3169]*y_cur[IDX_CH2CHCNI] + k[3188]*y_cur[IDX_C2H6I]; - data[jistart + 1509] = 0.0 - k[529]*y_cur[IDX_C2H2II]; - data[jistart + 1510] = 0.0 - k[3387]*y_cur[IDX_C2H2II] - - k[3388]*y_cur[IDX_C2H2II] - k[3389]*y_cur[IDX_C2H2II] + - k[3397]*y_cur[IDX_C3H2II]; - data[jistart + 1511] = 0.0 + k[1748]*y_cur[IDX_C2HI]; - data[jistart + 1512] = 0.0 - k[3607]*y_cur[IDX_C2H2II]; - data[jistart + 1513] = 0.0 + k[3480]*y_cur[IDX_C2HI]; - data[jistart + 1514] = 0.0 - k[3531]*y_cur[IDX_C2H2II] - - k[3532]*y_cur[IDX_C2H2II]; - data[jistart + 1515] = 0.0 + k[3508]*y_cur[IDX_C2HI]; - data[jistart + 1516] = 0.0 - k[598]*y_cur[IDX_C2H2II] - - k[3556]*y_cur[IDX_C2H2II]; - data[jistart + 1517] = 0.0 + k[3548]*y_cur[IDX_C2I]; - data[jistart + 1518] = 0.0 - k[226]*y_cur[IDX_C2H2II]; - data[jistart + 1519] = 0.0 - k[632]*y_cur[IDX_C2H2II]; - data[jistart + 1520] = 0.0 - k[3688]*y_cur[IDX_C2H2II] - - k[3689]*y_cur[IDX_C2H2II]; - data[jistart + 1521] = 0.0 + k[647]*y_cur[IDX_C2H2I] + - k[3632]*y_cur[IDX_C2H4I]; - data[jistart + 1522] = 0.0 - k[4728]*y_cur[IDX_C2H2II]; - data[jistart + 1523] = 0.0 + k[668]*y_cur[IDX_C2H2I]; - data[jistart + 1524] = 0.0 - k[4763]*y_cur[IDX_C2H2II]; - data[jistart + 1525] = 0.0 + k[1749]*y_cur[IDX_C2HI]; - data[jistart + 1526] = 0.0 - k[3796]*y_cur[IDX_C2H2II]; - data[jistart + 1527] = 0.0 + k[3770]*y_cur[IDX_C2HI]; - data[jistart + 1528] = 0.0 - k[4798]*y_cur[IDX_C2H2II]; - data[jistart + 1529] = 0.0 - k[1526]*y_cur[IDX_C2H2II]; - data[jistart + 1530] = 0.0 - k[1527]*y_cur[IDX_C2H2II] - - k[1528]*y_cur[IDX_C2H2II]; - data[jistart + 1531] = 0.0 - k[4833]*y_cur[IDX_C2H2II]; - data[jistart + 1532] = 0.0 - k[1529]*y_cur[IDX_C2H2II] - - k[1530]*y_cur[IDX_C2H2II]; - data[jistart + 1533] = 0.0 - k[1531]*y_cur[IDX_C2H2II] - - k[1532]*y_cur[IDX_C2H2II] - k[1533]*y_cur[IDX_C2H2II] - - k[1534]*y_cur[IDX_C2H2II]; - data[jistart + 1534] = 0.0 - k[742]*y_cur[IDX_C2H2II] - - k[743]*y_cur[IDX_C2H2II] - k[744]*y_cur[IDX_C2H2II]; - data[jistart + 1535] = 0.0 - k[4913]*y_cur[IDX_C2H3I]; - data[jistart + 1536] = 0.0 - k[1301]*y_cur[IDX_C2H3I] + - k[1307]*y_cur[IDX_C2H5OHI] + k[1329]*y_cur[IDX_C6H6I] + - k[1374]*y_cur[IDX_CH3CHCH2I] + k[1380]*y_cur[IDX_CH3COCH3I]; - data[jistart + 1537] = 0.0 + k[3888]*y_cur[IDX_C2H3II]; - data[jistart + 1538] = 0.0 + k[3923]*y_cur[IDX_C2H3II]; - data[jistart + 1539] = 0.0 + k[3958]*y_cur[IDX_C2H3II]; - data[jistart + 1540] = 0.0 + k[3993]*y_cur[IDX_C2H3II]; - data[jistart + 1541] = 0.0 + k[4898]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 1542] = 0.0 + k[4028]*y_cur[IDX_C2H3II]; - data[jistart + 1543] = 0.0 + k[1562]*y_cur[IDX_C2H6II]; - data[jistart + 1544] = 0.0 - k[214]*y_cur[IDX_C2H3I] - - k[1481]*y_cur[IDX_C2H3I] - k[1482]*y_cur[IDX_C2H3I] + - k[1534]*y_cur[IDX_SiH4I]; - data[jistart + 1545] = 0.0 - k[214]*y_cur[IDX_C2H2II] - - k[231]*y_cur[IDX_C2H4II] - k[269]*y_cur[IDX_CH3II] - - k[325]*y_cur[IDX_HII] - k[1301]*y_cur[IDX_CII] - - k[1481]*y_cur[IDX_C2H2II] - k[1482]*y_cur[IDX_C2H2II] - - k[1577]*y_cur[IDX_C2H3II] - k[1578]*y_cur[IDX_C2H3II] - - k[1628]*y_cur[IDX_C2H4II] - k[1629]*y_cur[IDX_C3H2II] - - k[1630]*y_cur[IDX_C3H2II] - k[1631]*y_cur[IDX_C3H3II] - - k[1632]*y_cur[IDX_C4HII] - k[1633]*y_cur[IDX_C4H2II] - - k[1634]*y_cur[IDX_C4H2II] - k[1635]*y_cur[IDX_C4H3II] - - k[1636]*y_cur[IDX_C4H3II] - k[1637]*y_cur[IDX_C5H2II] - - k[1638]*y_cur[IDX_C5H2II] - k[1639]*y_cur[IDX_C6H2II] - - k[1640]*y_cur[IDX_C6H2II] - k[1641]*y_cur[IDX_C7H2II] - - k[1642]*y_cur[IDX_C7H2II] - k[1643]*y_cur[IDX_CH2CCHII] - - k[1644]*y_cur[IDX_HCOII] - k[1645]*y_cur[IDX_SII] - - k[1646]*y_cur[IDX_SiII] - k[2043]*y_cur[IDX_CH3II] - - k[2044]*y_cur[IDX_CH3II] - k[2295]*y_cur[IDX_HII] - - k[2588]*y_cur[IDX_H3II] - k[2767]*y_cur[IDX_H3OII] - - k[3077]*y_cur[IDX_HeII] - k[3078]*y_cur[IDX_HeII] - - k[4881]*y_cur[IDX_O2I] - k[4882]*y_cur[IDX_O2I] - - k[4883]*y_cur[IDX_C2H4I] - k[4913]*y_cur[IDX_CI] - - k[5025]*y_cur[IDX_CH3I] - k[5155]*y_cur[IDX_HI] - - k[5223]*y_cur[IDX_NI] - k[5224]*y_cur[IDX_NI] - - k[5345]*y_cur[IDX_OI] - k[5456]*y_cur[IDX_OHI] - - k[5586]*y_cur[IDX_OHI] - k[5698] - k[5699] - k[5983] - k[5984] - - k[6912]; - data[jistart + 1546] = 0.0 - k[1577]*y_cur[IDX_C2H3I] - - k[1578]*y_cur[IDX_C2H3I] + k[3888]*y_cur[IDX_CM] + - k[3923]*y_cur[IDX_C10M] + k[3958]*y_cur[IDX_C10HM] + - k[3993]*y_cur[IDX_C2M] + k[4028]*y_cur[IDX_C2HM] + - k[4063]*y_cur[IDX_C3M] + k[4098]*y_cur[IDX_C3HM] + - k[4133]*y_cur[IDX_C3NM] + k[4168]*y_cur[IDX_C4M] + - k[4203]*y_cur[IDX_C4HM] + k[4238]*y_cur[IDX_C5M] + - k[4273]*y_cur[IDX_C5HM] + k[4308]*y_cur[IDX_C5NM] + - k[4343]*y_cur[IDX_C6M] + k[4378]*y_cur[IDX_C6HM] + - k[4413]*y_cur[IDX_C7M] + k[4448]*y_cur[IDX_C7HM] + - k[4483]*y_cur[IDX_C8M] + k[4518]*y_cur[IDX_C8HM] + - k[4553]*y_cur[IDX_C9M] + k[4588]*y_cur[IDX_C9HM] + - k[4623]*y_cur[IDX_CHM] + k[4658]*y_cur[IDX_CNM] + - k[4693]*y_cur[IDX_HM] + k[4729]*y_cur[IDX_OM] + - k[4764]*y_cur[IDX_O2M] + k[4799]*y_cur[IDX_OHM] + - k[4834]*y_cur[IDX_SM]; - data[jistart + 1547] = 0.0 + k[1707]*y_cur[IDX_HC3NII] - - k[4883]*y_cur[IDX_C2H3I] + k[5105]*y_cur[IDX_CNI] + - k[5346]*y_cur[IDX_OI]; - data[jistart + 1548] = 0.0 - k[231]*y_cur[IDX_C2H3I] + - k[759]*y_cur[IDX_eM] - k[1628]*y_cur[IDX_C2H3I] + - k[1676]*y_cur[IDX_HC3NI] + k[6383]*y_cur[IDX_GRAINM]; - data[jistart + 1549] = 0.0 + k[5702] + k[5987]; - data[jistart + 1550] = 0.0 + k[766]*y_cur[IDX_eM] + - k[6393]*y_cur[IDX_GRAINM]; - data[jistart + 1551] = 0.0 + k[1307]*y_cur[IDX_CII]; - data[jistart + 1552] = 0.0 + k[1562]*y_cur[IDX_C2H2I]; - data[jistart + 1553] = 0.0 + k[4063]*y_cur[IDX_C2H3II]; - data[jistart + 1554] = 0.0 + k[4098]*y_cur[IDX_C2H3II]; - data[jistart + 1555] = 0.0 - k[1629]*y_cur[IDX_C2H3I] - - k[1630]*y_cur[IDX_C2H3I] + k[1772]*y_cur[IDX_CH2CCH2I] + - k[1778]*y_cur[IDX_CH3CCHI]; - data[jistart + 1556] = 0.0 - k[1631]*y_cur[IDX_C2H3I]; - data[jistart + 1557] = 0.0 + k[799]*y_cur[IDX_eM] + - k[3697]*y_cur[IDX_OI] + k[6477]*y_cur[IDX_GRAINM]; - data[jistart + 1558] = 0.0 + k[808]*y_cur[IDX_eM] + - k[6505]*y_cur[IDX_GRAINM]; - data[jistart + 1559] = 0.0 + k[4133]*y_cur[IDX_C2H3II]; - data[jistart + 1560] = 0.0 + k[4168]*y_cur[IDX_C2H3II]; - data[jistart + 1561] = 0.0 - k[1632]*y_cur[IDX_C2H3I]; - data[jistart + 1562] = 0.0 + k[4203]*y_cur[IDX_C2H3II]; - data[jistart + 1563] = 0.0 - k[1633]*y_cur[IDX_C2H3I] - - k[1634]*y_cur[IDX_C2H3I]; - data[jistart + 1564] = 0.0 - k[1635]*y_cur[IDX_C2H3I] - - k[1636]*y_cur[IDX_C2H3I]; - data[jistart + 1565] = 0.0 + k[5024]*y_cur[IDX_HI]; - data[jistart + 1566] = 0.0 + k[4238]*y_cur[IDX_C2H3II]; - data[jistart + 1567] = 0.0 + k[4273]*y_cur[IDX_C2H3II]; - data[jistart + 1568] = 0.0 - k[1637]*y_cur[IDX_C2H3I] - - k[1638]*y_cur[IDX_C2H3I]; - data[jistart + 1569] = 0.0 + k[4308]*y_cur[IDX_C2H3II]; - data[jistart + 1570] = 0.0 + k[4343]*y_cur[IDX_C2H3II]; - data[jistart + 1571] = 0.0 + k[4378]*y_cur[IDX_C2H3II]; - data[jistart + 1572] = 0.0 - k[1639]*y_cur[IDX_C2H3I] - - k[1640]*y_cur[IDX_C2H3I]; - data[jistart + 1573] = 0.0 + k[1329]*y_cur[IDX_CII]; - data[jistart + 1574] = 0.0 + k[4413]*y_cur[IDX_C2H3II]; - data[jistart + 1575] = 0.0 + k[4448]*y_cur[IDX_C2H3II]; - data[jistart + 1576] = 0.0 - k[1641]*y_cur[IDX_C2H3I] - - k[1642]*y_cur[IDX_C2H3I]; - data[jistart + 1577] = 0.0 + k[4483]*y_cur[IDX_C2H3II]; - data[jistart + 1578] = 0.0 + k[4518]*y_cur[IDX_C2H3II]; - data[jistart + 1579] = 0.0 + k[4553]*y_cur[IDX_C2H3II]; - data[jistart + 1580] = 0.0 + k[4588]*y_cur[IDX_C2H3II]; - data[jistart + 1581] = 0.0 + k[4623]*y_cur[IDX_C2H3II]; - data[jistart + 1582] = 0.0 + k[4994]*y_cur[IDX_CH2I] + - k[4994]*y_cur[IDX_CH2I]; - data[jistart + 1583] = 0.0 - k[1643]*y_cur[IDX_C2H3I]; - data[jistart + 1584] = 0.0 + k[1772]*y_cur[IDX_C3H2II] + - k[5383]*y_cur[IDX_OI]; - data[jistart + 1585] = 0.0 + k[5787] + k[6088]; - data[jistart + 1586] = 0.0 + k[914]*y_cur[IDX_eM] + - k[6658]*y_cur[IDX_GRAINM]; - data[jistart + 1587] = 0.0 - k[5025]*y_cur[IDX_C2H3I]; - data[jistart + 1588] = 0.0 - k[269]*y_cur[IDX_C2H3I] - - k[2043]*y_cur[IDX_C2H3I] - k[2044]*y_cur[IDX_C2H3I]; - data[jistart + 1589] = 0.0 + k[1778]*y_cur[IDX_C3H2II]; - data[jistart + 1590] = 0.0 + k[1374]*y_cur[IDX_CII] + - k[4898]*y_cur[IDX_C2HI]; - data[jistart + 1591] = 0.0 + k[1380]*y_cur[IDX_CII]; - data[jistart + 1592] = 0.0 + k[5105]*y_cur[IDX_C2H4I]; - data[jistart + 1593] = 0.0 + k[4658]*y_cur[IDX_C2H3II]; - data[jistart + 1594] = 0.0 + k[8660]*y_cur[IDX_GCH3I]; - data[jistart + 1595] = 0.0 + k[8588]*y_cur[IDX_GHI]; - data[jistart + 1596] = 0.0 + k[7094] + k[7276] + k[7458]; - data[jistart + 1597] = 0.0 + k[8716]*y_cur[IDX_GCH2I]; - data[jistart + 1598] = 0.0 + k[8716]*y_cur[IDX_GCHI]; - data[jistart + 1599] = 0.0 + k[8660]*y_cur[IDX_GCI]; - data[jistart + 1600] = 0.0 + k[8588]*y_cur[IDX_GC2H2I]; - data[jistart + 1601] = 0.0 + k[6383]*y_cur[IDX_C2H4II] + - k[6393]*y_cur[IDX_C2H5II] + k[6477]*y_cur[IDX_C3H4II] + - k[6505]*y_cur[IDX_C3H7II] + k[6658]*y_cur[IDX_CH2CHCNHII]; - data[jistart + 1602] = 0.0 + k[5024]*y_cur[IDX_C4H6I] - - k[5155]*y_cur[IDX_C2H3I]; - data[jistart + 1603] = 0.0 - k[325]*y_cur[IDX_C2H3I] - - k[2295]*y_cur[IDX_C2H3I]; - data[jistart + 1604] = 0.0 + k[4693]*y_cur[IDX_C2H3II]; - data[jistart + 1605] = 0.0 - k[2588]*y_cur[IDX_C2H3I]; - data[jistart + 1606] = 0.0 - k[2767]*y_cur[IDX_C2H3I]; - data[jistart + 1607] = 0.0 + k[1676]*y_cur[IDX_C2H4II]; - data[jistart + 1608] = 0.0 + k[1707]*y_cur[IDX_C2H4I]; - data[jistart + 1609] = 0.0 - k[1644]*y_cur[IDX_C2H3I]; - data[jistart + 1610] = 0.0 - k[3077]*y_cur[IDX_C2H3I] - - k[3078]*y_cur[IDX_C2H3I]; - data[jistart + 1611] = 0.0 - k[5223]*y_cur[IDX_C2H3I] - - k[5224]*y_cur[IDX_C2H3I]; - data[jistart + 1612] = 0.0 + k[3697]*y_cur[IDX_C3H4II] - - k[5345]*y_cur[IDX_C2H3I] + k[5346]*y_cur[IDX_C2H4I] + - k[5383]*y_cur[IDX_CH2CCH2I]; - data[jistart + 1613] = 0.0 + k[4729]*y_cur[IDX_C2H3II]; - data[jistart + 1614] = 0.0 - k[4881]*y_cur[IDX_C2H3I] - - k[4882]*y_cur[IDX_C2H3I]; - data[jistart + 1615] = 0.0 + k[4764]*y_cur[IDX_C2H3II]; - data[jistart + 1616] = 0.0 - k[5456]*y_cur[IDX_C2H3I] - - k[5586]*y_cur[IDX_C2H3I]; - data[jistart + 1617] = 0.0 + k[4799]*y_cur[IDX_C2H3II]; - data[jistart + 1618] = 0.0 - k[1645]*y_cur[IDX_C2H3I]; - data[jistart + 1619] = 0.0 + k[4834]*y_cur[IDX_C2H3II]; - data[jistart + 1620] = 0.0 - k[1646]*y_cur[IDX_C2H3I]; - data[jistart + 1621] = 0.0 + k[1534]*y_cur[IDX_C2H2II]; - data[jistart + 1622] = 0.0 + k[759]*y_cur[IDX_C2H4II] + - k[766]*y_cur[IDX_C2H5II] + k[799]*y_cur[IDX_C3H4II] + - k[808]*y_cur[IDX_C3H7II] + k[914]*y_cur[IDX_CH2CHCNHII]; - data[jistart + 1623] = 0.0 - k[1851]*y_cur[IDX_C2H3II] - - k[1852]*y_cur[IDX_C2H3II]; - data[jistart + 1624] = 0.0 + k[1302]*y_cur[IDX_C2H4I] + - k[1354]*y_cur[IDX_CH3C3NI] + k[1364]*y_cur[IDX_CH3CCHI] + - k[1368]*y_cur[IDX_C2H6I] + k[1374]*y_cur[IDX_CH3CHCH2I] + - k[1379]*y_cur[IDX_CH3CNI] + k[1384]*y_cur[IDX_CH4I]; - data[jistart + 1625] = 0.0 - k[3888]*y_cur[IDX_C2H3II]; - data[jistart + 1626] = 0.0 - k[3923]*y_cur[IDX_C2H3II]; - data[jistart + 1627] = 0.0 - k[3958]*y_cur[IDX_C2H3II]; - data[jistart + 1628] = 0.0 - k[3993]*y_cur[IDX_C2H3II]; - data[jistart + 1629] = 0.0 - k[1726]*y_cur[IDX_C2H3II] - - k[1727]*y_cur[IDX_C2H3II] - k[1728]*y_cur[IDX_C2H3II]; - data[jistart + 1630] = 0.0 - k[4028]*y_cur[IDX_C2H3II]; - data[jistart + 1631] = 0.0 - k[1535]*y_cur[IDX_C2H3II] + - k[1566]*y_cur[IDX_HCOII] + k[1567]*y_cur[IDX_HCO2II] + - k[1568]*y_cur[IDX_N2HII] + k[2133]*y_cur[IDX_CH4II] + - k[2218]*y_cur[IDX_CH5II] + k[2370]*y_cur[IDX_H2II] + - k[2587]*y_cur[IDX_H3II]; - data[jistart + 1632] = 0.0 + k[214]*y_cur[IDX_C2H3I] + - k[1519]*y_cur[IDX_H2SI] + k[1524]*y_cur[IDX_HCOI] + - k[2403]*y_cur[IDX_H2I]; - data[jistart + 1633] = 0.0 + k[214]*y_cur[IDX_C2H2II] + - k[231]*y_cur[IDX_C2H4II] + k[269]*y_cur[IDX_CH3II] + - k[325]*y_cur[IDX_HII] - k[1577]*y_cur[IDX_C2H3II] - - k[1578]*y_cur[IDX_C2H3II] + k[5699] + k[5984]; - data[jistart + 1634] = 0.0 - k[745]*y_cur[IDX_eM] - - k[746]*y_cur[IDX_eM] - k[747]*y_cur[IDX_eM] - k[748]*y_cur[IDX_eM] - - k[749]*y_cur[IDX_eM] - k[750]*y_cur[IDX_eM] - k[751]*y_cur[IDX_eM] - - k[752]*y_cur[IDX_eM] - k[753]*y_cur[IDX_eM] - k[754]*y_cur[IDX_eM] - - k[755]*y_cur[IDX_eM] - k[756]*y_cur[IDX_eM] - - k[1535]*y_cur[IDX_C2H2I] - k[1577]*y_cur[IDX_C2H3I] - - k[1578]*y_cur[IDX_C2H3I] - k[1579]*y_cur[IDX_C2H4I] - - k[1580]*y_cur[IDX_C3H2I] - k[1581]*y_cur[IDX_C3H2I] - - k[1582]*y_cur[IDX_C3H2I] - k[1583]*y_cur[IDX_C3HI] - - k[1584]*y_cur[IDX_C3HI] - k[1585]*y_cur[IDX_C3HI] - - k[1586]*y_cur[IDX_C4HI] - k[1587]*y_cur[IDX_C4HI] - - k[1588]*y_cur[IDX_C4HI] - k[1589]*y_cur[IDX_C5H2I] - - k[1590]*y_cur[IDX_C5H2I] - k[1591]*y_cur[IDX_C5H2I] - - k[1592]*y_cur[IDX_C5HI] - k[1593]*y_cur[IDX_C5HI] - - k[1594]*y_cur[IDX_C5HI] - k[1595]*y_cur[IDX_C6H2I] - - k[1596]*y_cur[IDX_C6H2I] - k[1597]*y_cur[IDX_C6H2I] - - k[1598]*y_cur[IDX_C6H6I] - k[1599]*y_cur[IDX_C6HI] - - k[1600]*y_cur[IDX_C6HI] - k[1601]*y_cur[IDX_C6HI] - - k[1602]*y_cur[IDX_C7H2I] - k[1603]*y_cur[IDX_C7H2I] - - k[1604]*y_cur[IDX_C7H2I] - k[1605]*y_cur[IDX_C7HI] - - k[1606]*y_cur[IDX_C7HI] - k[1607]*y_cur[IDX_C7HI] - - k[1608]*y_cur[IDX_CH2CCHI] - k[1609]*y_cur[IDX_CH2CCHI] - - k[1610]*y_cur[IDX_CH2CCHI] - k[1611]*y_cur[IDX_CH3CCHI] - - k[1612]*y_cur[IDX_CH3CCHI] - k[1613]*y_cur[IDX_C2H6I] - - k[1614]*y_cur[IDX_C2H6I] - k[1615]*y_cur[IDX_C2H6I] - - k[1616]*y_cur[IDX_H2CCCI] - k[1617]*y_cur[IDX_H2CCCI] - - k[1618]*y_cur[IDX_H2CCCI] - k[1619]*y_cur[IDX_H2SI] - - k[1620]*y_cur[IDX_HC3NI] - k[1621]*y_cur[IDX_C4H2I] - - k[1622]*y_cur[IDX_C4H2I] - k[1623]*y_cur[IDX_C4H2I] - - k[1624]*y_cur[IDX_NCCNI] - k[1625]*y_cur[IDX_SI] - - k[1626]*y_cur[IDX_SiI] - k[1627]*y_cur[IDX_SiI] - - k[1726]*y_cur[IDX_C2HI] - k[1727]*y_cur[IDX_C2HI] - - k[1728]*y_cur[IDX_C2HI] - k[1851]*y_cur[IDX_CI] - - k[1852]*y_cur[IDX_CI] - k[2156]*y_cur[IDX_CH4I] - - k[2523]*y_cur[IDX_H2OI] - k[2827]*y_cur[IDX_HI] - - k[2861]*y_cur[IDX_HCNI] - k[3036]*y_cur[IDX_HNCI] - - k[3390]*y_cur[IDX_NI] - k[3557]*y_cur[IDX_NH3I] - - k[3690]*y_cur[IDX_OI] - k[3888]*y_cur[IDX_CM] - - k[3923]*y_cur[IDX_C10M] - k[3958]*y_cur[IDX_C10HM] - - k[3993]*y_cur[IDX_C2M] - k[4028]*y_cur[IDX_C2HM] - - k[4063]*y_cur[IDX_C3M] - k[4098]*y_cur[IDX_C3HM] - - k[4133]*y_cur[IDX_C3NM] - k[4168]*y_cur[IDX_C4M] - - k[4203]*y_cur[IDX_C4HM] - k[4238]*y_cur[IDX_C5M] - - k[4273]*y_cur[IDX_C5HM] - k[4308]*y_cur[IDX_C5NM] - - k[4343]*y_cur[IDX_C6M] - k[4378]*y_cur[IDX_C6HM] - - k[4413]*y_cur[IDX_C7M] - k[4448]*y_cur[IDX_C7HM] - - k[4483]*y_cur[IDX_C8M] - k[4518]*y_cur[IDX_C8HM] - - k[4553]*y_cur[IDX_C9M] - k[4588]*y_cur[IDX_C9HM] - - k[4623]*y_cur[IDX_CHM] - k[4658]*y_cur[IDX_CNM] - - k[4693]*y_cur[IDX_HM] - k[4729]*y_cur[IDX_OM] - - k[4764]*y_cur[IDX_O2M] - k[4799]*y_cur[IDX_OHM] - - k[4834]*y_cur[IDX_SM] - k[5513]*y_cur[IDX_COI] - - k[6360]*y_cur[IDX_GRAINM] - k[6361]*y_cur[IDX_GRAINM] - - k[6362]*y_cur[IDX_GRAINM] - k[6363]*y_cur[IDX_GRAINM] - - k[6364]*y_cur[IDX_GRAINM] - k[6365]*y_cur[IDX_GRAINM] - - k[6366]*y_cur[IDX_GRAINM] - k[6367]*y_cur[IDX_GRAINM] - - k[6368]*y_cur[IDX_GRAINM] - k[6369]*y_cur[IDX_GRAINM] - - k[6370]*y_cur[IDX_GRAINM] - k[6371]*y_cur[IDX_GRAINM]; - data[jistart + 1635] = 0.0 + k[1302]*y_cur[IDX_CII] - - k[1579]*y_cur[IDX_C2H3II] + k[1715]*y_cur[IDX_SII] + - k[2045]*y_cur[IDX_CH3II] + k[2297]*y_cur[IDX_HII] + - k[2372]*y_cur[IDX_H2II] + k[2589]*y_cur[IDX_H3II] + - k[3081]*y_cur[IDX_HeII] + k[3633]*y_cur[IDX_OII]; - data[jistart + 1636] = 0.0 + k[231]*y_cur[IDX_C2H3I] + - k[2828]*y_cur[IDX_HI]; - data[jistart + 1637] = 0.0 + k[327]*y_cur[IDX_HII] + - k[3083]*y_cur[IDX_HeII]; - data[jistart + 1638] = 0.0 + k[2592]*y_cur[IDX_H3II]; - data[jistart + 1639] = 0.0 + k[1368]*y_cur[IDX_CII] - - k[1613]*y_cur[IDX_C2H3II] - k[1614]*y_cur[IDX_C2H3II] - - k[1615]*y_cur[IDX_C2H3II] + k[2326]*y_cur[IDX_HII] + - k[3189]*y_cur[IDX_HeII]; - data[jistart + 1640] = 0.0 - k[4063]*y_cur[IDX_C2H3II]; - data[jistart + 1641] = 0.0 - k[1583]*y_cur[IDX_C2H3II] - - k[1584]*y_cur[IDX_C2H3II] - k[1585]*y_cur[IDX_C2H3II]; - data[jistart + 1642] = 0.0 + k[2160]*y_cur[IDX_CH4I] + - k[2528]*y_cur[IDX_H2OI] + k[2576]*y_cur[IDX_H2SI]; - data[jistart + 1643] = 0.0 - k[4098]*y_cur[IDX_C2H3II]; - data[jistart + 1644] = 0.0 - k[1580]*y_cur[IDX_C2H3II] - - k[1581]*y_cur[IDX_C2H3II] - k[1582]*y_cur[IDX_C2H3II]; - data[jistart + 1645] = 0.0 - k[4133]*y_cur[IDX_C2H3II]; - data[jistart + 1646] = 0.0 - k[4168]*y_cur[IDX_C2H3II]; - data[jistart + 1647] = 0.0 - k[1586]*y_cur[IDX_C2H3II] - - k[1587]*y_cur[IDX_C2H3II] - k[1588]*y_cur[IDX_C2H3II]; - data[jistart + 1648] = 0.0 - k[4203]*y_cur[IDX_C2H3II]; - data[jistart + 1649] = 0.0 - k[1621]*y_cur[IDX_C2H3II] - - k[1622]*y_cur[IDX_C2H3II] - k[1623]*y_cur[IDX_C2H3II]; - data[jistart + 1650] = 0.0 + k[2172]*y_cur[IDX_CH4I]; - data[jistart + 1651] = 0.0 - k[4238]*y_cur[IDX_C2H3II]; - data[jistart + 1652] = 0.0 - k[1592]*y_cur[IDX_C2H3II] - - k[1593]*y_cur[IDX_C2H3II] - k[1594]*y_cur[IDX_C2H3II]; - data[jistart + 1653] = 0.0 - k[4273]*y_cur[IDX_C2H3II]; - data[jistart + 1654] = 0.0 - k[1589]*y_cur[IDX_C2H3II] - - k[1590]*y_cur[IDX_C2H3II] - k[1591]*y_cur[IDX_C2H3II]; - data[jistart + 1655] = 0.0 - k[4308]*y_cur[IDX_C2H3II]; - data[jistart + 1656] = 0.0 - k[4343]*y_cur[IDX_C2H3II]; - data[jistart + 1657] = 0.0 - k[1599]*y_cur[IDX_C2H3II] - - k[1600]*y_cur[IDX_C2H3II] - k[1601]*y_cur[IDX_C2H3II]; - data[jistart + 1658] = 0.0 - k[4378]*y_cur[IDX_C2H3II]; - data[jistart + 1659] = 0.0 - k[1595]*y_cur[IDX_C2H3II] - - k[1596]*y_cur[IDX_C2H3II] - k[1597]*y_cur[IDX_C2H3II]; - data[jistart + 1660] = 0.0 - k[1598]*y_cur[IDX_C2H3II]; - data[jistart + 1661] = 0.0 - k[4413]*y_cur[IDX_C2H3II]; - data[jistart + 1662] = 0.0 - k[1605]*y_cur[IDX_C2H3II] - - k[1606]*y_cur[IDX_C2H3II] - k[1607]*y_cur[IDX_C2H3II]; - data[jistart + 1663] = 0.0 - k[4448]*y_cur[IDX_C2H3II]; - data[jistart + 1664] = 0.0 - k[1602]*y_cur[IDX_C2H3II] - - k[1603]*y_cur[IDX_C2H3II] - k[1604]*y_cur[IDX_C2H3II]; - data[jistart + 1665] = 0.0 - k[4483]*y_cur[IDX_C2H3II]; - data[jistart + 1666] = 0.0 - k[4518]*y_cur[IDX_C2H3II]; - data[jistart + 1667] = 0.0 - k[4553]*y_cur[IDX_C2H3II]; - data[jistart + 1668] = 0.0 - k[4588]*y_cur[IDX_C2H3II]; - data[jistart + 1669] = 0.0 + k[1941]*y_cur[IDX_CH4I]; - data[jistart + 1670] = 0.0 - k[4623]*y_cur[IDX_C2H3II]; - data[jistart + 1671] = 0.0 + k[1999]*y_cur[IDX_CH3II]; - data[jistart + 1672] = 0.0 - k[1608]*y_cur[IDX_C2H3II] - - k[1609]*y_cur[IDX_C2H3II] - k[1610]*y_cur[IDX_C2H3II]; - data[jistart + 1673] = 0.0 + k[3165]*y_cur[IDX_HeII]; - data[jistart + 1674] = 0.0 + k[269]*y_cur[IDX_C2H3I] + - k[1999]*y_cur[IDX_CH2I] + k[2045]*y_cur[IDX_C2H4I]; - data[jistart + 1675] = 0.0 + k[1354]*y_cur[IDX_CII]; - data[jistart + 1676] = 0.0 + k[1364]*y_cur[IDX_CII] - - k[1611]*y_cur[IDX_C2H3II] - k[1612]*y_cur[IDX_C2H3II]; - data[jistart + 1677] = 0.0 + k[1374]*y_cur[IDX_CII] + - k[2649]*y_cur[IDX_H3II]; - data[jistart + 1678] = 0.0 + k[2651]*y_cur[IDX_H3II]; - data[jistart + 1679] = 0.0 + k[1379]*y_cur[IDX_CII] + - k[3635]*y_cur[IDX_OII]; - data[jistart + 1680] = 0.0 + k[2659]*y_cur[IDX_H3II]; - data[jistart + 1681] = 0.0 + k[1384]*y_cur[IDX_CII] + - k[1941]*y_cur[IDX_CHII] - k[2156]*y_cur[IDX_C2H3II] + - k[2160]*y_cur[IDX_C3HII] + k[2172]*y_cur[IDX_C4NII] + - k[2199]*y_cur[IDX_HCNII]; - data[jistart + 1682] = 0.0 + k[2133]*y_cur[IDX_C2H2I]; - data[jistart + 1683] = 0.0 + k[2218]*y_cur[IDX_C2H2I]; - data[jistart + 1684] = 0.0 - k[4658]*y_cur[IDX_C2H3II]; - data[jistart + 1685] = 0.0 - k[5513]*y_cur[IDX_C2H3II]; - data[jistart + 1686] = 0.0 - k[6360]*y_cur[IDX_C2H3II] - - k[6361]*y_cur[IDX_C2H3II] - k[6362]*y_cur[IDX_C2H3II] - - k[6363]*y_cur[IDX_C2H3II] - k[6364]*y_cur[IDX_C2H3II] - - k[6365]*y_cur[IDX_C2H3II] - k[6366]*y_cur[IDX_C2H3II] - - k[6367]*y_cur[IDX_C2H3II] - k[6368]*y_cur[IDX_C2H3II] - - k[6369]*y_cur[IDX_C2H3II] - k[6370]*y_cur[IDX_C2H3II] - - k[6371]*y_cur[IDX_C2H3II]; - data[jistart + 1687] = 0.0 - k[2827]*y_cur[IDX_C2H3II] + - k[2828]*y_cur[IDX_C2H4II]; - data[jistart + 1688] = 0.0 + k[325]*y_cur[IDX_C2H3I] + - k[327]*y_cur[IDX_C2H5I] + k[2297]*y_cur[IDX_C2H4I] + - k[2326]*y_cur[IDX_C2H6I]; - data[jistart + 1689] = 0.0 - k[4693]*y_cur[IDX_C2H3II]; - data[jistart + 1690] = 0.0 + k[2403]*y_cur[IDX_C2H2II]; - data[jistart + 1691] = 0.0 + k[2370]*y_cur[IDX_C2H2I] + - k[2372]*y_cur[IDX_C2H4I]; - data[jistart + 1692] = 0.0 - k[1616]*y_cur[IDX_C2H3II] - - k[1617]*y_cur[IDX_C2H3II] - k[1618]*y_cur[IDX_C2H3II]; - data[jistart + 1693] = 0.0 - k[2523]*y_cur[IDX_C2H3II] + - k[2528]*y_cur[IDX_C3HII]; - data[jistart + 1694] = 0.0 + k[1519]*y_cur[IDX_C2H2II] - - k[1619]*y_cur[IDX_C2H3II] + k[2576]*y_cur[IDX_C3HII]; - data[jistart + 1695] = 0.0 + k[2587]*y_cur[IDX_C2H2I] + - k[2589]*y_cur[IDX_C2H4I] + k[2592]*y_cur[IDX_C2H5OHI] + - k[2649]*y_cur[IDX_CH3CHCH2I] + k[2651]*y_cur[IDX_CH3CHOI] + - k[2659]*y_cur[IDX_CH3COCH3I]; - data[jistart + 1696] = 0.0 - k[1620]*y_cur[IDX_C2H3II]; - data[jistart + 1697] = 0.0 - k[2861]*y_cur[IDX_C2H3II]; - data[jistart + 1698] = 0.0 + k[2199]*y_cur[IDX_CH4I]; - data[jistart + 1699] = 0.0 + k[1524]*y_cur[IDX_C2H2II]; - data[jistart + 1700] = 0.0 + k[1566]*y_cur[IDX_C2H2I]; - data[jistart + 1701] = 0.0 + k[1567]*y_cur[IDX_C2H2I]; - data[jistart + 1702] = 0.0 - k[3036]*y_cur[IDX_C2H3II]; - data[jistart + 1703] = 0.0 + k[3081]*y_cur[IDX_C2H4I] + - k[3083]*y_cur[IDX_C2H5I] + k[3165]*y_cur[IDX_CH2CHCNI] + - k[3189]*y_cur[IDX_C2H6I]; - data[jistart + 1704] = 0.0 - k[3390]*y_cur[IDX_C2H3II]; - data[jistart + 1705] = 0.0 + k[1568]*y_cur[IDX_C2H2I]; - data[jistart + 1706] = 0.0 - k[1624]*y_cur[IDX_C2H3II]; - data[jistart + 1707] = 0.0 - k[3557]*y_cur[IDX_C2H3II]; - data[jistart + 1708] = 0.0 - k[3690]*y_cur[IDX_C2H3II]; - data[jistart + 1709] = 0.0 + k[3633]*y_cur[IDX_C2H4I] + - k[3635]*y_cur[IDX_CH3CNI]; - data[jistart + 1710] = 0.0 - k[4729]*y_cur[IDX_C2H3II]; - data[jistart + 1711] = 0.0 - k[4764]*y_cur[IDX_C2H3II]; - data[jistart + 1712] = 0.0 - k[4799]*y_cur[IDX_C2H3II]; - data[jistart + 1713] = 0.0 - k[1625]*y_cur[IDX_C2H3II]; - data[jistart + 1714] = 0.0 + k[1715]*y_cur[IDX_C2H4I]; - data[jistart + 1715] = 0.0 - k[4834]*y_cur[IDX_C2H3II]; - data[jistart + 1716] = 0.0 - k[1626]*y_cur[IDX_C2H3II] - - k[1627]*y_cur[IDX_C2H3II]; - data[jistart + 1717] = 0.0 - k[745]*y_cur[IDX_C2H3II] - - k[746]*y_cur[IDX_C2H3II] - k[747]*y_cur[IDX_C2H3II] - - k[748]*y_cur[IDX_C2H3II] - k[749]*y_cur[IDX_C2H3II] - - k[750]*y_cur[IDX_C2H3II] - k[751]*y_cur[IDX_C2H3II] - - k[752]*y_cur[IDX_C2H3II] - k[753]*y_cur[IDX_C2H3II] - - k[754]*y_cur[IDX_C2H3II] - k[755]*y_cur[IDX_C2H3II] - - k[756]*y_cur[IDX_C2H3II]; - data[jistart + 1718] = 0.0 - k[4914]*y_cur[IDX_C2H4I]; - data[jistart + 1719] = 0.0 - k[148]*y_cur[IDX_C2H4I] - - k[1302]*y_cur[IDX_C2H4I] - k[1303]*y_cur[IDX_C2H4I] - - k[1304]*y_cur[IDX_C2H4I] - k[1305]*y_cur[IDX_C2H4I] + - k[1373]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 1720] = 0.0 - k[4868]*y_cur[IDX_C2H4I]; - data[jistart + 1721] = 0.0 - k[215]*y_cur[IDX_C2H4I] - - k[1483]*y_cur[IDX_C2H4I] - k[1484]*y_cur[IDX_C2H4I] + - k[1511]*y_cur[IDX_C2H6I] + k[1531]*y_cur[IDX_SiH4I] + - k[1533]*y_cur[IDX_SiH4I]; - data[jistart + 1722] = 0.0 + k[231]*y_cur[IDX_C2H4II] - - k[4883]*y_cur[IDX_C2H4I]; - data[jistart + 1723] = 0.0 - k[1579]*y_cur[IDX_C2H4I] + - k[1613]*y_cur[IDX_C2H6I]; - data[jistart + 1724] = 0.0 - k[148]*y_cur[IDX_CII] - - k[215]*y_cur[IDX_C2H2II] - k[234]*y_cur[IDX_C2N2II] - - k[235]*y_cur[IDX_C3II] - k[236]*y_cur[IDX_C5II] - - k[237]*y_cur[IDX_C2H6II] - k[238]*y_cur[IDX_CO2II] - - k[239]*y_cur[IDX_HC3NII] - k[240]*y_cur[IDX_O2II] - - k[278]*y_cur[IDX_CH4II] - k[326]*y_cur[IDX_HII] - - k[438]*y_cur[IDX_H2II] - k[464]*y_cur[IDX_H2OII] - - k[510]*y_cur[IDX_HeII] - k[648]*y_cur[IDX_OII] - - k[1302]*y_cur[IDX_CII] - k[1303]*y_cur[IDX_CII] - - k[1304]*y_cur[IDX_CII] - k[1305]*y_cur[IDX_CII] - - k[1483]*y_cur[IDX_C2H2II] - k[1484]*y_cur[IDX_C2H2II] - - k[1579]*y_cur[IDX_C2H3II] - k[1647]*y_cur[IDX_C2H4II] - - k[1648]*y_cur[IDX_C2H4II] - k[1685]*y_cur[IDX_C2H5II] - - k[1686]*y_cur[IDX_C3II] - k[1687]*y_cur[IDX_C3II] - - k[1688]*y_cur[IDX_C3II] - k[1689]*y_cur[IDX_C3HII] - - k[1690]*y_cur[IDX_C3HII] - k[1691]*y_cur[IDX_C3H2II] - - k[1692]*y_cur[IDX_C3H2II] - k[1693]*y_cur[IDX_C3H3II] - - k[1694]*y_cur[IDX_C4HII] - k[1695]*y_cur[IDX_C4HII] - - k[1696]*y_cur[IDX_C4H2II] - k[1697]*y_cur[IDX_C4H2II] - - k[1698]*y_cur[IDX_C5II] - k[1699]*y_cur[IDX_C5II] - - k[1700]*y_cur[IDX_C5II] - k[1701]*y_cur[IDX_C5H2II] - - k[1702]*y_cur[IDX_C5H2II] - k[1703]*y_cur[IDX_C6H2II] - - k[1704]*y_cur[IDX_C6H5II] - k[1705]*y_cur[IDX_C7H2II] - - k[1706]*y_cur[IDX_CH2CCHII] - k[1707]*y_cur[IDX_HC3NII] - - k[1708]*y_cur[IDX_HCOII] - k[1709]*y_cur[IDX_NCCNHII] - - k[1710]*y_cur[IDX_PII] - k[1711]*y_cur[IDX_PHII] - - k[1712]*y_cur[IDX_PHII] - k[1713]*y_cur[IDX_PH2II] - - k[1714]*y_cur[IDX_PH2II] - k[1715]*y_cur[IDX_SII] - - k[1716]*y_cur[IDX_SII] - k[1717]*y_cur[IDX_SII] - - k[1718]*y_cur[IDX_SiII] - k[2045]*y_cur[IDX_CH3II] - - k[2046]*y_cur[IDX_CH3II] - k[2047]*y_cur[IDX_CH3II] - - k[2135]*y_cur[IDX_CH4II] - k[2219]*y_cur[IDX_CH5II] - - k[2296]*y_cur[IDX_HII] - k[2297]*y_cur[IDX_HII] - - k[2371]*y_cur[IDX_H2II] - k[2372]*y_cur[IDX_H2II] - - k[2589]*y_cur[IDX_H3II] - k[2590]*y_cur[IDX_H3II] - - k[3079]*y_cur[IDX_HeII] - k[3080]*y_cur[IDX_HeII] - - k[3081]*y_cur[IDX_HeII] - k[3082]*y_cur[IDX_HeII] - - k[3632]*y_cur[IDX_OII] - k[3633]*y_cur[IDX_OII] - - k[3847]*y_cur[IDX_SOII] - k[3848]*y_cur[IDX_SOII] - - k[3849]*y_cur[IDX_SOII] - k[3850]*y_cur[IDX_SOII] - - k[4868]*y_cur[IDX_C2I] - k[4883]*y_cur[IDX_C2H3I] - - k[4884]*y_cur[IDX_C4HI] - k[4885]*y_cur[IDX_SiI] - - k[4914]*y_cur[IDX_CI] - k[5065]*y_cur[IDX_CHI] - - k[5066]*y_cur[IDX_CHI] - k[5105]*y_cur[IDX_CNI] - - k[5106]*y_cur[IDX_CNI] - k[5225]*y_cur[IDX_NI] - - k[5346]*y_cur[IDX_OI] - k[5347]*y_cur[IDX_OI] - - k[5348]*y_cur[IDX_OI] - k[5349]*y_cur[IDX_OI] - - k[5568]*y_cur[IDX_H3OII] - k[5700] - k[5701] - k[5985] - k[5986] - - k[6917]; - data[jistart + 1725] = 0.0 + k[231]*y_cur[IDX_C2H3I] + - k[232]*y_cur[IDX_CH2CCHI] + k[233]*y_cur[IDX_H2SI] + - k[599]*y_cur[IDX_NH3I] - k[1647]*y_cur[IDX_C2H4I] - - k[1648]*y_cur[IDX_C2H4I]; - data[jistart + 1726] = 0.0 + k[5941]; - data[jistart + 1727] = 0.0 + k[5226]*y_cur[IDX_NI] + - k[5457]*y_cur[IDX_OHI]; - data[jistart + 1728] = 0.0 + k[767]*y_cur[IDX_eM] - - k[1685]*y_cur[IDX_C2H4I] + k[1719]*y_cur[IDX_CH3CNI] + - k[1720]*y_cur[IDX_H2COI] + k[1721]*y_cur[IDX_H2SI] + - k[1722]*y_cur[IDX_HC3NI] + k[2524]*y_cur[IDX_H2OI] + - k[2862]*y_cur[IDX_HCNI] + k[3037]*y_cur[IDX_HNCI] + - k[3558]*y_cur[IDX_NH3I] + k[6394]*y_cur[IDX_GRAINM]; - data[jistart + 1729] = 0.0 + k[769]*y_cur[IDX_eM] + - k[6671]*y_cur[IDX_GRAINM]; - data[jistart + 1730] = 0.0 + k[774]*y_cur[IDX_eM] + - k[6606]*y_cur[IDX_GRAINM]; - data[jistart + 1731] = 0.0 + k[1511]*y_cur[IDX_C2H2II] + - k[1613]*y_cur[IDX_C2H3II] + k[2112]*y_cur[IDX_S2II] + - k[3772]*y_cur[IDX_OHII] + k[5069]*y_cur[IDX_CHI] + k[5803] + - k[6108]; - data[jistart + 1732] = 0.0 - k[237]*y_cur[IDX_C2H4I] + - k[935]*y_cur[IDX_eM] + k[6410]*y_cur[IDX_GRAINM]; - data[jistart + 1733] = 0.0 - k[234]*y_cur[IDX_C2H4I]; - data[jistart + 1734] = 0.0 - k[235]*y_cur[IDX_C2H4I] - - k[1686]*y_cur[IDX_C2H4I] - k[1687]*y_cur[IDX_C2H4I] - - k[1688]*y_cur[IDX_C2H4I]; - data[jistart + 1735] = 0.0 - k[1689]*y_cur[IDX_C2H4I] - - k[1690]*y_cur[IDX_C2H4I]; - data[jistart + 1736] = 0.0 - k[1691]*y_cur[IDX_C2H4I] - - k[1692]*y_cur[IDX_C2H4I] + k[1771]*y_cur[IDX_CH2CCH2I] + - k[1777]*y_cur[IDX_CH3CCHI]; - data[jistart + 1737] = 0.0 - k[1693]*y_cur[IDX_C2H4I] + - k[3564]*y_cur[IDX_NH3I]; - data[jistart + 1738] = 0.0 + k[1808]*y_cur[IDX_CH2CCH2I]; - data[jistart + 1739] = 0.0 + k[1815]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 1740] = 0.0 + k[809]*y_cur[IDX_eM] + - k[6506]*y_cur[IDX_GRAINM]; - data[jistart + 1741] = 0.0 - k[4884]*y_cur[IDX_C2H4I]; - data[jistart + 1742] = 0.0 - k[1694]*y_cur[IDX_C2H4I] - - k[1695]*y_cur[IDX_C2H4I]; - data[jistart + 1743] = 0.0 - k[1696]*y_cur[IDX_C2H4I] - - k[1697]*y_cur[IDX_C2H4I]; - data[jistart + 1744] = 0.0 + k[5024]*y_cur[IDX_HI]; - data[jistart + 1745] = 0.0 - k[236]*y_cur[IDX_C2H4I] - - k[1698]*y_cur[IDX_C2H4I] - k[1699]*y_cur[IDX_C2H4I] - - k[1700]*y_cur[IDX_C2H4I]; - data[jistart + 1746] = 0.0 - k[1701]*y_cur[IDX_C2H4I] - - k[1702]*y_cur[IDX_C2H4I]; - data[jistart + 1747] = 0.0 - k[1703]*y_cur[IDX_C2H4I]; - data[jistart + 1748] = 0.0 - k[1704]*y_cur[IDX_C2H4I]; - data[jistart + 1749] = 0.0 - k[1705]*y_cur[IDX_C2H4I]; - data[jistart + 1750] = 0.0 - k[5065]*y_cur[IDX_C2H4I] - - k[5066]*y_cur[IDX_C2H4I] + k[5069]*y_cur[IDX_C2H6I] + - k[5074]*y_cur[IDX_CH4I]; - data[jistart + 1751] = 0.0 + k[232]*y_cur[IDX_C2H4II]; - data[jistart + 1752] = 0.0 - k[1706]*y_cur[IDX_C2H4I]; - data[jistart + 1753] = 0.0 + k[1771]*y_cur[IDX_C3H2II] + - k[1808]*y_cur[IDX_C3H4II] + k[5382]*y_cur[IDX_OI]; - data[jistart + 1754] = 0.0 + k[5026]*y_cur[IDX_CH3I] + - k[5026]*y_cur[IDX_CH3I]; - data[jistart + 1755] = 0.0 - k[2045]*y_cur[IDX_C2H4I] - - k[2046]*y_cur[IDX_C2H4I] - k[2047]*y_cur[IDX_C2H4I] + - k[2067]*y_cur[IDX_CH3CHOI] + k[2069]*y_cur[IDX_CH3CNI]; - data[jistart + 1756] = 0.0 + k[1777]*y_cur[IDX_C3H2II]; - data[jistart + 1757] = 0.0 + k[1373]*y_cur[IDX_CII] + - k[1815]*y_cur[IDX_C3H5II] + k[3825]*y_cur[IDX_SII] + k[5805] + - k[6110]; - data[jistart + 1758] = 0.0 + k[2067]*y_cur[IDX_CH3II] + - k[2657]*y_cur[IDX_H3II]; - data[jistart + 1759] = 0.0 + k[1719]*y_cur[IDX_C2H5II] + - k[2069]*y_cur[IDX_CH3II]; - data[jistart + 1760] = 0.0 + k[5074]*y_cur[IDX_CHI]; - data[jistart + 1761] = 0.0 - k[278]*y_cur[IDX_C2H4I] - - k[2135]*y_cur[IDX_C2H4I]; - data[jistart + 1762] = 0.0 - k[2219]*y_cur[IDX_C2H4I]; - data[jistart + 1763] = 0.0 - k[5105]*y_cur[IDX_C2H4I] - - k[5106]*y_cur[IDX_C2H4I]; - data[jistart + 1764] = 0.0 - k[238]*y_cur[IDX_C2H4I]; - data[jistart + 1765] = 0.0 + k[8589]*y_cur[IDX_GHI]; - data[jistart + 1766] = 0.0 + k[7099] + k[7281] + k[7463]; - data[jistart + 1767] = 0.0 + k[8718]*y_cur[IDX_GCH3I]; - data[jistart + 1768] = 0.0 + k[8745]*y_cur[IDX_GCH2I] + - k[8745]*y_cur[IDX_GCH2I]; - data[jistart + 1769] = 0.0 + k[8718]*y_cur[IDX_GCHI]; - data[jistart + 1770] = 0.0 + k[8589]*y_cur[IDX_GC2H3I]; - data[jistart + 1771] = 0.0 + k[6394]*y_cur[IDX_C2H5II] + - k[6410]*y_cur[IDX_C2H6II] + k[6506]*y_cur[IDX_C3H7II] + - k[6606]*y_cur[IDX_C2H5OH2II] + k[6671]*y_cur[IDX_C2H5CNHII] + - k[6691]*y_cur[IDX_PC2H4II]; - data[jistart + 1772] = 0.0 + k[5024]*y_cur[IDX_C4H6I]; - data[jistart + 1773] = 0.0 - k[326]*y_cur[IDX_C2H4I] - - k[2296]*y_cur[IDX_C2H4I] - k[2297]*y_cur[IDX_C2H4I]; - data[jistart + 1774] = 0.0 - k[438]*y_cur[IDX_C2H4I] - - k[2371]*y_cur[IDX_C2H4I] - k[2372]*y_cur[IDX_C2H4I]; - data[jistart + 1775] = 0.0 + k[1720]*y_cur[IDX_C2H5II]; - data[jistart + 1776] = 0.0 + k[2524]*y_cur[IDX_C2H5II]; - data[jistart + 1777] = 0.0 - k[464]*y_cur[IDX_C2H4I]; - data[jistart + 1778] = 0.0 + k[233]*y_cur[IDX_C2H4II] + - k[1721]*y_cur[IDX_C2H5II]; - data[jistart + 1779] = 0.0 - k[2589]*y_cur[IDX_C2H4I] - - k[2590]*y_cur[IDX_C2H4I] + k[2657]*y_cur[IDX_CH3CHOI]; - data[jistart + 1780] = 0.0 - k[5568]*y_cur[IDX_C2H4I]; - data[jistart + 1781] = 0.0 + k[1722]*y_cur[IDX_C2H5II]; - data[jistart + 1782] = 0.0 - k[239]*y_cur[IDX_C2H4I] - - k[1707]*y_cur[IDX_C2H4I]; - data[jistart + 1783] = 0.0 + k[2862]*y_cur[IDX_C2H5II]; - data[jistart + 1784] = 0.0 - k[1708]*y_cur[IDX_C2H4I]; - data[jistart + 1785] = 0.0 + k[3037]*y_cur[IDX_C2H5II]; - data[jistart + 1786] = 0.0 - k[510]*y_cur[IDX_C2H4I] - - k[3079]*y_cur[IDX_C2H4I] - k[3080]*y_cur[IDX_C2H4I] - - k[3081]*y_cur[IDX_C2H4I] - k[3082]*y_cur[IDX_C2H4I]; - data[jistart + 1787] = 0.0 - k[5225]*y_cur[IDX_C2H4I] + - k[5226]*y_cur[IDX_C2H5I]; - data[jistart + 1788] = 0.0 - k[1709]*y_cur[IDX_C2H4I]; - data[jistart + 1789] = 0.0 + k[599]*y_cur[IDX_C2H4II] + - k[3558]*y_cur[IDX_C2H5II] + k[3564]*y_cur[IDX_C3H3II]; - data[jistart + 1790] = 0.0 - k[5346]*y_cur[IDX_C2H4I] - - k[5347]*y_cur[IDX_C2H4I] - k[5348]*y_cur[IDX_C2H4I] - - k[5349]*y_cur[IDX_C2H4I] + k[5382]*y_cur[IDX_CH2CCH2I]; - data[jistart + 1791] = 0.0 - k[648]*y_cur[IDX_C2H4I] - - k[3632]*y_cur[IDX_C2H4I] - k[3633]*y_cur[IDX_C2H4I]; - data[jistart + 1792] = 0.0 - k[240]*y_cur[IDX_C2H4I]; - data[jistart + 1793] = 0.0 + k[5457]*y_cur[IDX_C2H5I]; - data[jistart + 1794] = 0.0 + k[3772]*y_cur[IDX_C2H6I]; - data[jistart + 1795] = 0.0 - k[1710]*y_cur[IDX_C2H4I]; - data[jistart + 1796] = 0.0 + k[1189]*y_cur[IDX_eM] + - k[6691]*y_cur[IDX_GRAINM]; - data[jistart + 1797] = 0.0 - k[1711]*y_cur[IDX_C2H4I] - - k[1712]*y_cur[IDX_C2H4I]; - data[jistart + 1798] = 0.0 - k[1713]*y_cur[IDX_C2H4I] - - k[1714]*y_cur[IDX_C2H4I]; - data[jistart + 1799] = 0.0 - k[1715]*y_cur[IDX_C2H4I] - - k[1716]*y_cur[IDX_C2H4I] - k[1717]*y_cur[IDX_C2H4I] + - k[3825]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 1800] = 0.0 + k[2112]*y_cur[IDX_C2H6I]; - data[jistart + 1801] = 0.0 - k[3847]*y_cur[IDX_C2H4I] - - k[3848]*y_cur[IDX_C2H4I] - k[3849]*y_cur[IDX_C2H4I] - - k[3850]*y_cur[IDX_C2H4I]; - data[jistart + 1802] = 0.0 - k[4885]*y_cur[IDX_C2H4I]; - data[jistart + 1803] = 0.0 - k[1718]*y_cur[IDX_C2H4I]; - data[jistart + 1804] = 0.0 + k[1531]*y_cur[IDX_C2H2II] + - k[1533]*y_cur[IDX_C2H2II]; - data[jistart + 1805] = 0.0 + k[767]*y_cur[IDX_C2H5II] + - k[769]*y_cur[IDX_C2H5CNHII] + k[774]*y_cur[IDX_C2H5OH2II] + - k[809]*y_cur[IDX_C3H7II] + k[935]*y_cur[IDX_C2H6II] + - k[1189]*y_cur[IDX_PC2H4II]; - data[jistart + 1806] = 0.0 - k[1853]*y_cur[IDX_C2H4II] - - k[1854]*y_cur[IDX_C2H4II]; - data[jistart + 1807] = 0.0 + k[148]*y_cur[IDX_C2H4I] + - k[1369]*y_cur[IDX_C2H6I]; - data[jistart + 1808] = 0.0 - k[1729]*y_cur[IDX_C2H4II] - - k[1730]*y_cur[IDX_C2H4II]; - data[jistart + 1809] = 0.0 - k[1536]*y_cur[IDX_C2H4II] - - k[1537]*y_cur[IDX_C2H4II]; - data[jistart + 1810] = 0.0 + k[215]*y_cur[IDX_C2H4I] + - k[1511]*y_cur[IDX_C2H6I] + k[5549]*y_cur[IDX_H2I]; - data[jistart + 1811] = 0.0 - k[231]*y_cur[IDX_C2H4II] - - k[1628]*y_cur[IDX_C2H4II] + k[1644]*y_cur[IDX_HCOII] + - k[2588]*y_cur[IDX_H3II] + k[2767]*y_cur[IDX_H3OII]; - data[jistart + 1812] = 0.0 + k[148]*y_cur[IDX_CII] + - k[215]*y_cur[IDX_C2H2II] + k[234]*y_cur[IDX_C2N2II] + - k[235]*y_cur[IDX_C3II] + k[236]*y_cur[IDX_C5II] + - k[237]*y_cur[IDX_C2H6II] + k[238]*y_cur[IDX_CO2II] + - k[239]*y_cur[IDX_HC3NII] + k[240]*y_cur[IDX_O2II] + - k[278]*y_cur[IDX_CH4II] + k[326]*y_cur[IDX_HII] + - k[438]*y_cur[IDX_H2II] + k[464]*y_cur[IDX_H2OII] + - k[510]*y_cur[IDX_HeII] + k[648]*y_cur[IDX_OII] - - k[1647]*y_cur[IDX_C2H4II] - k[1648]*y_cur[IDX_C2H4II] + k[5701] + - k[5986]; - data[jistart + 1813] = 0.0 - k[231]*y_cur[IDX_C2H3I] - - k[232]*y_cur[IDX_CH2CCHI] - k[233]*y_cur[IDX_H2SI] - - k[599]*y_cur[IDX_NH3I] - k[757]*y_cur[IDX_eM] - k[758]*y_cur[IDX_eM] - - k[759]*y_cur[IDX_eM] - k[760]*y_cur[IDX_eM] - k[761]*y_cur[IDX_eM] - - k[762]*y_cur[IDX_eM] - k[763]*y_cur[IDX_eM] - - k[1536]*y_cur[IDX_C2H2I] - k[1537]*y_cur[IDX_C2H2I] - - k[1628]*y_cur[IDX_C2H3I] - k[1647]*y_cur[IDX_C2H4I] - - k[1648]*y_cur[IDX_C2H4I] - k[1649]*y_cur[IDX_C3H2I] - - k[1650]*y_cur[IDX_C3H2I] - k[1651]*y_cur[IDX_C3HI] - - k[1652]*y_cur[IDX_C3HI] - k[1653]*y_cur[IDX_C4HI] - - k[1654]*y_cur[IDX_C4HI] - k[1655]*y_cur[IDX_C5H2I] - - k[1656]*y_cur[IDX_C5H2I] - k[1657]*y_cur[IDX_C5HI] - - k[1658]*y_cur[IDX_C5HI] - k[1659]*y_cur[IDX_C6H2I] - - k[1660]*y_cur[IDX_C6H2I] - k[1661]*y_cur[IDX_C6HI] - - k[1662]*y_cur[IDX_C6HI] - k[1663]*y_cur[IDX_C7H2I] - - k[1664]*y_cur[IDX_C7H2I] - k[1665]*y_cur[IDX_C7HI] - - k[1666]*y_cur[IDX_C7HI] - k[1667]*y_cur[IDX_CH2CCHI] - - k[1668]*y_cur[IDX_CH2CCHI] - k[1669]*y_cur[IDX_CH3CCHI] - - k[1670]*y_cur[IDX_C2H6I] - k[1671]*y_cur[IDX_C2H6I] - - k[1672]*y_cur[IDX_H2CCCI] - k[1673]*y_cur[IDX_H2CCCI] - - k[1674]*y_cur[IDX_H2SI] - k[1675]*y_cur[IDX_H2SI] - - k[1676]*y_cur[IDX_HC3NI] - k[1677]*y_cur[IDX_C4H2I] - - k[1678]*y_cur[IDX_C4H2I] - k[1679]*y_cur[IDX_SI] - - k[1680]*y_cur[IDX_SiI] - k[1681]*y_cur[IDX_SiI] - - k[1682]*y_cur[IDX_SiH4I] - k[1683]*y_cur[IDX_SiH4I] - - k[1684]*y_cur[IDX_SiH4I] - k[1729]*y_cur[IDX_C2HI] - - k[1730]*y_cur[IDX_C2HI] - k[1853]*y_cur[IDX_CI] - - k[1854]*y_cur[IDX_CI] - k[2828]*y_cur[IDX_HI] - - k[3391]*y_cur[IDX_NI] - k[3691]*y_cur[IDX_OI] - - k[3692]*y_cur[IDX_OI] - k[6381]*y_cur[IDX_GRAINM] - - k[6382]*y_cur[IDX_GRAINM] - k[6383]*y_cur[IDX_GRAINM] - - k[6384]*y_cur[IDX_GRAINM] - k[6385]*y_cur[IDX_GRAINM] - - k[6386]*y_cur[IDX_GRAINM] - k[6387]*y_cur[IDX_GRAINM]; - data[jistart + 1814] = 0.0 + k[2298]*y_cur[IDX_HII] + - k[3084]*y_cur[IDX_HeII]; - data[jistart + 1815] = 0.0 + k[2829]*y_cur[IDX_HI]; - data[jistart + 1816] = 0.0 + k[1369]*y_cur[IDX_CII] + - k[1511]*y_cur[IDX_C2H2II] - k[1670]*y_cur[IDX_C2H4II] - - k[1671]*y_cur[IDX_C2H4II] + k[2327]*y_cur[IDX_HII] + - k[2376]*y_cur[IDX_H2II] + k[2505]*y_cur[IDX_H2OII] + - k[3190]*y_cur[IDX_HeII] + k[3771]*y_cur[IDX_OHII]; - data[jistart + 1817] = 0.0 + k[237]*y_cur[IDX_C2H4I]; - data[jistart + 1818] = 0.0 + k[234]*y_cur[IDX_C2H4I]; - data[jistart + 1819] = 0.0 + k[235]*y_cur[IDX_C2H4I]; - data[jistart + 1820] = 0.0 - k[1651]*y_cur[IDX_C2H4II] - - k[1652]*y_cur[IDX_C2H4II]; - data[jistart + 1821] = 0.0 - k[1649]*y_cur[IDX_C2H4II] - - k[1650]*y_cur[IDX_C2H4II]; - data[jistart + 1822] = 0.0 + k[3400]*y_cur[IDX_NI]; - data[jistart + 1823] = 0.0 - k[1653]*y_cur[IDX_C2H4II] - - k[1654]*y_cur[IDX_C2H4II]; - data[jistart + 1824] = 0.0 - k[1677]*y_cur[IDX_C2H4II] - - k[1678]*y_cur[IDX_C2H4II]; - data[jistart + 1825] = 0.0 + k[236]*y_cur[IDX_C2H4I]; - data[jistart + 1826] = 0.0 - k[1657]*y_cur[IDX_C2H4II] - - k[1658]*y_cur[IDX_C2H4II]; - data[jistart + 1827] = 0.0 - k[1655]*y_cur[IDX_C2H4II] - - k[1656]*y_cur[IDX_C2H4II]; - data[jistart + 1828] = 0.0 - k[1661]*y_cur[IDX_C2H4II] - - k[1662]*y_cur[IDX_C2H4II]; - data[jistart + 1829] = 0.0 - k[1659]*y_cur[IDX_C2H4II] - - k[1660]*y_cur[IDX_C2H4II]; - data[jistart + 1830] = 0.0 - k[1665]*y_cur[IDX_C2H4II] - - k[1666]*y_cur[IDX_C2H4II]; - data[jistart + 1831] = 0.0 - k[1663]*y_cur[IDX_C2H4II] - - k[1664]*y_cur[IDX_C2H4II]; - data[jistart + 1832] = 0.0 + k[1942]*y_cur[IDX_CH4I]; - data[jistart + 1833] = 0.0 + k[1976]*y_cur[IDX_CH4I]; - data[jistart + 1834] = 0.0 - k[232]*y_cur[IDX_C2H4II] - - k[1667]*y_cur[IDX_C2H4II] - k[1668]*y_cur[IDX_C2H4II]; - data[jistart + 1835] = 0.0 - k[1669]*y_cur[IDX_C2H4II]; - data[jistart + 1836] = 0.0 + k[3658]*y_cur[IDX_O2II]; - data[jistart + 1837] = 0.0 + k[1942]*y_cur[IDX_CHII] + - k[1976]*y_cur[IDX_CH2II]; - data[jistart + 1838] = 0.0 + k[278]*y_cur[IDX_C2H4I]; - data[jistart + 1839] = 0.0 + k[238]*y_cur[IDX_C2H4I]; - data[jistart + 1840] = 0.0 - k[6381]*y_cur[IDX_C2H4II] - - k[6382]*y_cur[IDX_C2H4II] - k[6383]*y_cur[IDX_C2H4II] - - k[6384]*y_cur[IDX_C2H4II] - k[6385]*y_cur[IDX_C2H4II] - - k[6386]*y_cur[IDX_C2H4II] - k[6387]*y_cur[IDX_C2H4II]; - data[jistart + 1841] = 0.0 - k[2828]*y_cur[IDX_C2H4II] + - k[2829]*y_cur[IDX_C2H5II]; - data[jistart + 1842] = 0.0 + k[326]*y_cur[IDX_C2H4I] + - k[2298]*y_cur[IDX_C2H5I] + k[2327]*y_cur[IDX_C2H6I]; - data[jistart + 1843] = 0.0 + k[5549]*y_cur[IDX_C2H2II]; - data[jistart + 1844] = 0.0 + k[438]*y_cur[IDX_C2H4I] + - k[2376]*y_cur[IDX_C2H6I]; - data[jistart + 1845] = 0.0 - k[1672]*y_cur[IDX_C2H4II] - - k[1673]*y_cur[IDX_C2H4II]; - data[jistart + 1846] = 0.0 + k[464]*y_cur[IDX_C2H4I] + - k[2505]*y_cur[IDX_C2H6I]; - data[jistart + 1847] = 0.0 - k[233]*y_cur[IDX_C2H4II] - - k[1674]*y_cur[IDX_C2H4II] - k[1675]*y_cur[IDX_C2H4II]; - data[jistart + 1848] = 0.0 + k[2588]*y_cur[IDX_C2H3I]; - data[jistart + 1849] = 0.0 + k[2767]*y_cur[IDX_C2H3I]; - data[jistart + 1850] = 0.0 - k[1676]*y_cur[IDX_C2H4II]; - data[jistart + 1851] = 0.0 + k[239]*y_cur[IDX_C2H4I]; - data[jistart + 1852] = 0.0 + k[1644]*y_cur[IDX_C2H3I]; - data[jistart + 1853] = 0.0 + k[510]*y_cur[IDX_C2H4I] + - k[3084]*y_cur[IDX_C2H5I] + k[3190]*y_cur[IDX_C2H6I]; - data[jistart + 1854] = 0.0 - k[3391]*y_cur[IDX_C2H4II] + - k[3400]*y_cur[IDX_C3H5II]; - data[jistart + 1855] = 0.0 - k[599]*y_cur[IDX_C2H4II]; - data[jistart + 1856] = 0.0 - k[3691]*y_cur[IDX_C2H4II] - - k[3692]*y_cur[IDX_C2H4II]; - data[jistart + 1857] = 0.0 + k[648]*y_cur[IDX_C2H4I]; - data[jistart + 1858] = 0.0 + k[240]*y_cur[IDX_C2H4I] + - k[3658]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 1859] = 0.0 + k[3771]*y_cur[IDX_C2H6I]; - data[jistart + 1860] = 0.0 - k[1679]*y_cur[IDX_C2H4II]; - data[jistart + 1861] = 0.0 - k[1680]*y_cur[IDX_C2H4II] - - k[1681]*y_cur[IDX_C2H4II]; - data[jistart + 1862] = 0.0 - k[1682]*y_cur[IDX_C2H4II] - - k[1683]*y_cur[IDX_C2H4II] - k[1684]*y_cur[IDX_C2H4II]; - data[jistart + 1863] = 0.0 - k[757]*y_cur[IDX_C2H4II] - - k[758]*y_cur[IDX_C2H4II] - k[759]*y_cur[IDX_C2H4II] - - k[760]*y_cur[IDX_C2H4II] - k[761]*y_cur[IDX_C2H4II] - - k[762]*y_cur[IDX_C2H4II] - k[763]*y_cur[IDX_C2H4II]; - data[jistart + 1864] = 0.0 - k[5941] - k[7011]; - data[jistart + 1865] = 0.0 + k[7193] + k[7375] + k[7557]; - data[jistart + 1866] = 0.0 + k[8634]*y_cur[IDX_GHI]; - data[jistart + 1867] = 0.0 + k[8634]*y_cur[IDX_GCH2CHCNI]; - data[jistart + 1868] = 0.0 - k[4915]*y_cur[IDX_C2H5I]; - data[jistart + 1869] = 0.0 - k[149]*y_cur[IDX_C2H5I] - - k[1306]*y_cur[IDX_C2H5I]; - data[jistart + 1870] = 0.0 + k[1532]*y_cur[IDX_SiH4I]; - data[jistart + 1871] = 0.0 + k[1683]*y_cur[IDX_SiH4I]; - data[jistart + 1872] = 0.0 - k[149]*y_cur[IDX_CII] - - k[327]*y_cur[IDX_HII] - k[511]*y_cur[IDX_HeII] - - k[1306]*y_cur[IDX_CII] - k[2298]*y_cur[IDX_HII] - - k[2591]*y_cur[IDX_H3II] - k[2902]*y_cur[IDX_HCOII] - - k[3083]*y_cur[IDX_HeII] - k[3084]*y_cur[IDX_HeII] - - k[4915]*y_cur[IDX_CI] - k[5226]*y_cur[IDX_NI] - - k[5227]*y_cur[IDX_NI] - k[5350]*y_cur[IDX_OI] - - k[5351]*y_cur[IDX_OI] - k[5457]*y_cur[IDX_OHI] - - k[5458]*y_cur[IDX_OHI] - k[5702] - k[5703] - k[5987] - k[5988] - - k[6922]; - data[jistart + 1873] = 0.0 + k[4886]*y_cur[IDX_OHI] + - k[4887]*y_cur[IDX_OHI] + k[5705] + k[5990]; - data[jistart + 1874] = 0.0 + k[3859]*y_cur[IDX_SiII] + k[5706] + - k[5991]; - data[jistart + 1875] = 0.0 + k[772]*y_cur[IDX_eM] + - k[6576]*y_cur[IDX_GRAINM]; - data[jistart + 1876] = 0.0 + k[775]*y_cur[IDX_eM] + - k[776]*y_cur[IDX_eM] + k[6607]*y_cur[IDX_GRAINM] + - k[6608]*y_cur[IDX_GRAINM]; - data[jistart + 1877] = 0.0 + k[2506]*y_cur[IDX_H2OII] + - k[5052]*y_cur[IDX_C4HI] + k[5111]*y_cur[IDX_CNI]; - data[jistart + 1878] = 0.0 + k[936]*y_cur[IDX_eM] + - k[2111]*y_cur[IDX_H2SI] + k[2534]*y_cur[IDX_H2OI] + - k[2872]*y_cur[IDX_HCNI] + k[3568]*y_cur[IDX_NH3I] + - k[6411]*y_cur[IDX_GRAINM]; - data[jistart + 1879] = 0.0 + k[778]*y_cur[IDX_eM] + - k[6419]*y_cur[IDX_GRAINM]; - data[jistart + 1880] = 0.0 + k[1817]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 1881] = 0.0 + k[5052]*y_cur[IDX_C2H6I]; - data[jistart + 1882] = 0.0 + k[5027]*y_cur[IDX_CH3I] + - k[5027]*y_cur[IDX_CH3I]; - data[jistart + 1883] = 0.0 + k[1817]*y_cur[IDX_C3H6II] + - k[3826]*y_cur[IDX_SII] + k[5056]*y_cur[IDX_OHI]; - data[jistart + 1884] = 0.0 + k[5111]*y_cur[IDX_C2H6I]; - data[jistart + 1885] = 0.0 + k[8590]*y_cur[IDX_GHI]; - data[jistart + 1886] = 0.0 + k[7104] + k[7286] + k[7468]; - data[jistart + 1887] = 0.0 + k[8746]*y_cur[IDX_GCH3I]; - data[jistart + 1888] = 0.0 + k[8746]*y_cur[IDX_GCH2I]; - data[jistart + 1889] = 0.0 + k[8590]*y_cur[IDX_GC2H4I]; - data[jistart + 1890] = 0.0 + k[6411]*y_cur[IDX_C2H6II] + - k[6419]*y_cur[IDX_C2H7II] + k[6576]*y_cur[IDX_C2H5OHII] + - k[6607]*y_cur[IDX_C2H5OH2II] + k[6608]*y_cur[IDX_C2H5OH2II]; - data[jistart + 1891] = 0.0 - k[327]*y_cur[IDX_C2H5I] - - k[2298]*y_cur[IDX_C2H5I]; - data[jistart + 1892] = 0.0 + k[2534]*y_cur[IDX_C2H6II]; - data[jistart + 1893] = 0.0 + k[2506]*y_cur[IDX_C2H6I]; - data[jistart + 1894] = 0.0 + k[2111]*y_cur[IDX_C2H6II]; - data[jistart + 1895] = 0.0 - k[2591]*y_cur[IDX_C2H5I]; - data[jistart + 1896] = 0.0 + k[2872]*y_cur[IDX_C2H6II]; - data[jistart + 1897] = 0.0 - k[2902]*y_cur[IDX_C2H5I]; - data[jistart + 1898] = 0.0 - k[511]*y_cur[IDX_C2H5I] - - k[3083]*y_cur[IDX_C2H5I] - k[3084]*y_cur[IDX_C2H5I]; - data[jistart + 1899] = 0.0 - k[5226]*y_cur[IDX_C2H5I] - - k[5227]*y_cur[IDX_C2H5I]; - data[jistart + 1900] = 0.0 + k[3568]*y_cur[IDX_C2H6II]; - data[jistart + 1901] = 0.0 - k[5350]*y_cur[IDX_C2H5I] - - k[5351]*y_cur[IDX_C2H5I]; - data[jistart + 1902] = 0.0 + k[4886]*y_cur[IDX_C2H5CNI] + - k[4887]*y_cur[IDX_C2H5CNI] + k[5056]*y_cur[IDX_CH3CHCH2I] - - k[5457]*y_cur[IDX_C2H5I] - k[5458]*y_cur[IDX_C2H5I]; - data[jistart + 1903] = 0.0 + k[3826]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 1904] = 0.0 + k[3859]*y_cur[IDX_C2H5OHI]; - data[jistart + 1905] = 0.0 + k[1532]*y_cur[IDX_C2H2II] + - k[1683]*y_cur[IDX_C2H4II]; - data[jistart + 1906] = 0.0 + k[772]*y_cur[IDX_C2H5OHII] + - k[775]*y_cur[IDX_C2H5OH2II] + k[776]*y_cur[IDX_C2H5OH2II] + - k[778]*y_cur[IDX_C2H7II] + k[936]*y_cur[IDX_C2H6II]; - data[jistart + 1907] = 0.0 + k[149]*y_cur[IDX_C2H5I] + - k[1370]*y_cur[IDX_C2H6I]; - data[jistart + 1908] = 0.0 - k[1538]*y_cur[IDX_C2H5II] - - k[1539]*y_cur[IDX_C2H5II] + k[1562]*y_cur[IDX_C2H6II]; - data[jistart + 1909] = 0.0 + k[1577]*y_cur[IDX_C2H3II] + - k[1628]*y_cur[IDX_C2H4II]; - data[jistart + 1910] = 0.0 + k[1577]*y_cur[IDX_C2H3I] + - k[1579]*y_cur[IDX_C2H4I] + k[1613]*y_cur[IDX_C2H6I]; - data[jistart + 1911] = 0.0 + k[1579]*y_cur[IDX_C2H3II] - - k[1685]*y_cur[IDX_C2H5II] + k[1708]*y_cur[IDX_HCOII] + - k[1709]*y_cur[IDX_NCCNHII] + k[2135]*y_cur[IDX_CH4II] + - k[2219]*y_cur[IDX_CH5II] + k[2590]*y_cur[IDX_H3II]; - data[jistart + 1912] = 0.0 + k[1628]*y_cur[IDX_C2H3I] + - k[1684]*y_cur[IDX_SiH4I]; - data[jistart + 1913] = 0.0 + k[149]*y_cur[IDX_CII] + - k[511]*y_cur[IDX_HeII] + k[5703] + k[5988]; - data[jistart + 1914] = 0.0 - k[764]*y_cur[IDX_eM] - - k[765]*y_cur[IDX_eM] - k[766]*y_cur[IDX_eM] - k[767]*y_cur[IDX_eM] - - k[768]*y_cur[IDX_eM] - k[1538]*y_cur[IDX_C2H2I] - - k[1539]*y_cur[IDX_C2H2I] - k[1685]*y_cur[IDX_C2H4I] - - k[1719]*y_cur[IDX_CH3CNI] - k[1720]*y_cur[IDX_H2COI] - - k[1721]*y_cur[IDX_H2SI] - k[1722]*y_cur[IDX_HC3NI] - - k[2524]*y_cur[IDX_H2OI] - k[2829]*y_cur[IDX_HI] - - k[2862]*y_cur[IDX_HCNI] - k[3037]*y_cur[IDX_HNCI] - - k[3558]*y_cur[IDX_NH3I] - k[6391]*y_cur[IDX_GRAINM] - - k[6392]*y_cur[IDX_GRAINM] - k[6393]*y_cur[IDX_GRAINM] - - k[6394]*y_cur[IDX_GRAINM] - k[6395]*y_cur[IDX_GRAINM]; - data[jistart + 1915] = 0.0 + k[2593]*y_cur[IDX_H3II] + - k[3085]*y_cur[IDX_HeII]; - data[jistart + 1916] = 0.0 + k[1370]*y_cur[IDX_CII] + - k[1613]*y_cur[IDX_C2H3II] + k[2062]*y_cur[IDX_CH3II] + - k[2377]*y_cur[IDX_H2II] + k[2648]*y_cur[IDX_H3II] + - k[3773]*y_cur[IDX_OHII]; - data[jistart + 1917] = 0.0 + k[1562]*y_cur[IDX_C2H2I] + - k[2838]*y_cur[IDX_HI]; - data[jistart + 1918] = 0.0 + k[1977]*y_cur[IDX_CH4I]; - data[jistart + 1919] = 0.0 + k[2062]*y_cur[IDX_C2H6I] + - k[2066]*y_cur[IDX_CH3CHOI] + k[2068]*y_cur[IDX_CH3CNI] + - k[2074]*y_cur[IDX_CH4I]; - data[jistart + 1920] = 0.0 + k[3659]*y_cur[IDX_O2II] + - k[3856]*y_cur[IDX_SOII]; - data[jistart + 1921] = 0.0 + k[2066]*y_cur[IDX_CH3II] + - k[2652]*y_cur[IDX_H3II]; - data[jistart + 1922] = 0.0 - k[1719]*y_cur[IDX_C2H5II] + - k[2068]*y_cur[IDX_CH3II]; - data[jistart + 1923] = 0.0 + k[1977]*y_cur[IDX_CH2II] + - k[2074]*y_cur[IDX_CH3II]; - data[jistart + 1924] = 0.0 + k[2135]*y_cur[IDX_C2H4I]; - data[jistart + 1925] = 0.0 + k[2219]*y_cur[IDX_C2H4I]; - data[jistart + 1926] = 0.0 - k[6391]*y_cur[IDX_C2H5II] - - k[6392]*y_cur[IDX_C2H5II] - k[6393]*y_cur[IDX_C2H5II] - - k[6394]*y_cur[IDX_C2H5II] - k[6395]*y_cur[IDX_C2H5II]; - data[jistart + 1927] = 0.0 - k[2829]*y_cur[IDX_C2H5II] + - k[2838]*y_cur[IDX_C2H6II]; - data[jistart + 1928] = 0.0 + k[2377]*y_cur[IDX_C2H6I]; - data[jistart + 1929] = 0.0 - k[1720]*y_cur[IDX_C2H5II]; - data[jistart + 1930] = 0.0 - k[2524]*y_cur[IDX_C2H5II]; - data[jistart + 1931] = 0.0 - k[1721]*y_cur[IDX_C2H5II]; - data[jistart + 1932] = 0.0 + k[2590]*y_cur[IDX_C2H4I] + - k[2593]*y_cur[IDX_C2H5OHI] + k[2648]*y_cur[IDX_C2H6I] + - k[2652]*y_cur[IDX_CH3CHOI]; - data[jistart + 1933] = 0.0 - k[1722]*y_cur[IDX_C2H5II]; - data[jistart + 1934] = 0.0 - k[2862]*y_cur[IDX_C2H5II]; - data[jistart + 1935] = 0.0 + k[1708]*y_cur[IDX_C2H4I]; - data[jistart + 1936] = 0.0 - k[3037]*y_cur[IDX_C2H5II]; - data[jistart + 1937] = 0.0 + k[511]*y_cur[IDX_C2H5I] + - k[3085]*y_cur[IDX_C2H5OHI]; - data[jistart + 1938] = 0.0 + k[1709]*y_cur[IDX_C2H4I]; - data[jistart + 1939] = 0.0 - k[3558]*y_cur[IDX_C2H5II]; - data[jistart + 1940] = 0.0 + k[3659]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 1941] = 0.0 + k[3773]*y_cur[IDX_C2H6I]; - data[jistart + 1942] = 0.0 + k[3856]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 1943] = 0.0 + k[1684]*y_cur[IDX_C2H4II]; - data[jistart + 1944] = 0.0 - k[764]*y_cur[IDX_C2H5II] - - k[765]*y_cur[IDX_C2H5II] - k[766]*y_cur[IDX_C2H5II] - - k[767]*y_cur[IDX_C2H5II] - k[768]*y_cur[IDX_C2H5II]; - data[jistart + 1945] = 0.0 - k[2136]*y_cur[IDX_CH4II] - - k[4886]*y_cur[IDX_OHI] - k[4887]*y_cur[IDX_OHI] - k[5704] - k[5705] - - k[5989] - k[5990] - k[7013]; - data[jistart + 1946] = 0.0 + k[770]*y_cur[IDX_eM] + - k[1723]*y_cur[IDX_CH3COCH3I] + k[6672]*y_cur[IDX_GRAINM]; - data[jistart + 1947] = 0.0 + k[1723]*y_cur[IDX_C2H5CNHII]; - data[jistart + 1948] = 0.0 - k[2136]*y_cur[IDX_C2H5CNI]; - data[jistart + 1949] = 0.0 + k[8635]*y_cur[IDX_GHI]; - data[jistart + 1950] = 0.0 + k[7195] + k[7377] + k[7561]; - data[jistart + 1951] = 0.0 + k[8635]*y_cur[IDX_GC2H4CNI]; - data[jistart + 1952] = 0.0 + k[6672]*y_cur[IDX_C2H5CNHII]; - data[jistart + 1953] = 0.0 - k[4886]*y_cur[IDX_C2H5CNI] - - k[4887]*y_cur[IDX_C2H5CNI]; - data[jistart + 1954] = 0.0 + k[770]*y_cur[IDX_C2H5CNHII]; - data[jistart + 1955] = 0.0 + k[2136]*y_cur[IDX_CH4II]; - data[jistart + 1956] = 0.0 - k[769]*y_cur[IDX_eM] - - k[770]*y_cur[IDX_eM] - k[771]*y_cur[IDX_eM] - - k[1723]*y_cur[IDX_CH3COCH3I] - k[6671]*y_cur[IDX_GRAINM] - - k[6672]*y_cur[IDX_GRAINM] - k[6673]*y_cur[IDX_GRAINM]; - data[jistart + 1957] = 0.0 + k[5533]*y_cur[IDX_CH3CNI]; - data[jistart + 1958] = 0.0 + k[5533]*y_cur[IDX_CH3II]; - data[jistart + 1959] = 0.0 - k[1723]*y_cur[IDX_C2H5CNHII]; - data[jistart + 1960] = 0.0 + k[2136]*y_cur[IDX_C2H5CNI]; - data[jistart + 1961] = 0.0 - k[6671]*y_cur[IDX_C2H5CNHII] - - k[6672]*y_cur[IDX_C2H5CNHII] - k[6673]*y_cur[IDX_C2H5CNHII]; - data[jistart + 1962] = 0.0 - k[769]*y_cur[IDX_C2H5CNHII] - - k[770]*y_cur[IDX_C2H5CNHII] - k[771]*y_cur[IDX_C2H5CNHII]; - data[jistart + 1963] = 0.0 - k[150]*y_cur[IDX_C2H5OHI] - - k[1307]*y_cur[IDX_C2H5OHI]; - data[jistart + 1964] = 0.0 - k[150]*y_cur[IDX_CII] - - k[328]*y_cur[IDX_HII] - k[1307]*y_cur[IDX_CII] - - k[1724]*y_cur[IDX_S2II] - k[2592]*y_cur[IDX_H3II] - - k[2593]*y_cur[IDX_H3II] - k[2594]*y_cur[IDX_H3II] - - k[2595]*y_cur[IDX_H3II] - k[2596]*y_cur[IDX_H3II] - - k[2768]*y_cur[IDX_H3OII] - k[2903]*y_cur[IDX_HCOII] - - k[3013]*y_cur[IDX_HCSII] - k[3085]*y_cur[IDX_HeII] - - k[3859]*y_cur[IDX_SiII] - k[5706] - k[5707] - k[5991] - k[5992] - - k[6987]; - data[jistart + 1965] = 0.0 + k[777]*y_cur[IDX_eM] + - k[3559]*y_cur[IDX_NH3I] + k[6609]*y_cur[IDX_GRAINM]; - data[jistart + 1966] = 0.0 + k[2661]*y_cur[IDX_H3II]; - data[jistart + 1967] = 0.0 + k[7169] + k[7351] + k[7533]; - data[jistart + 1968] = 0.0 + k[8753]*y_cur[IDX_GCH3I]; - data[jistart + 1969] = 0.0 + k[8753]*y_cur[IDX_GCH2OHI]; - data[jistart + 1970] = 0.0 + k[6609]*y_cur[IDX_C2H5OH2II]; - data[jistart + 1971] = 0.0 - k[328]*y_cur[IDX_C2H5OHI]; - data[jistart + 1972] = 0.0 - k[2592]*y_cur[IDX_C2H5OHI] - - k[2593]*y_cur[IDX_C2H5OHI] - k[2594]*y_cur[IDX_C2H5OHI] - - k[2595]*y_cur[IDX_C2H5OHI] - k[2596]*y_cur[IDX_C2H5OHI] + - k[2661]*y_cur[IDX_CH3COCH3I]; - data[jistart + 1973] = 0.0 - k[2768]*y_cur[IDX_C2H5OHI]; - data[jistart + 1974] = 0.0 - k[2903]*y_cur[IDX_C2H5OHI]; - data[jistart + 1975] = 0.0 - k[3013]*y_cur[IDX_C2H5OHI]; - data[jistart + 1976] = 0.0 - k[3085]*y_cur[IDX_C2H5OHI]; - data[jistart + 1977] = 0.0 + k[3559]*y_cur[IDX_C2H5OH2II]; - data[jistart + 1978] = 0.0 - k[1724]*y_cur[IDX_C2H5OHI]; - data[jistart + 1979] = 0.0 - k[3859]*y_cur[IDX_C2H5OHI]; - data[jistart + 1980] = 0.0 + k[777]*y_cur[IDX_C2H5OH2II]; - data[jistart + 1981] = 0.0 + k[150]*y_cur[IDX_C2H5OHI]; - data[jistart + 1982] = 0.0 + k[150]*y_cur[IDX_CII] + - k[328]*y_cur[IDX_HII] + k[5707] + k[5992]; - data[jistart + 1983] = 0.0 - k[772]*y_cur[IDX_eM] - - k[773]*y_cur[IDX_eM] - k[6576]*y_cur[IDX_GRAINM] - - k[6577]*y_cur[IDX_GRAINM]; - data[jistart + 1984] = 0.0 - k[6576]*y_cur[IDX_C2H5OHII] - - k[6577]*y_cur[IDX_C2H5OHII]; - data[jistart + 1985] = 0.0 + k[328]*y_cur[IDX_C2H5OHI]; - data[jistart + 1986] = 0.0 - k[772]*y_cur[IDX_C2H5OHII] - - k[773]*y_cur[IDX_C2H5OHII]; - data[jistart + 1987] = 0.0 + k[5568]*y_cur[IDX_H3OII]; - data[jistart + 1988] = 0.0 + k[2768]*y_cur[IDX_H3OII] + - k[2903]*y_cur[IDX_HCOII] + k[3013]*y_cur[IDX_HCSII]; - data[jistart + 1989] = 0.0 - k[774]*y_cur[IDX_eM] - - k[775]*y_cur[IDX_eM] - k[776]*y_cur[IDX_eM] - k[777]*y_cur[IDX_eM] - - k[2491]*y_cur[IDX_H2COI] - k[3559]*y_cur[IDX_NH3I] - - k[6606]*y_cur[IDX_GRAINM] - k[6607]*y_cur[IDX_GRAINM] - - k[6608]*y_cur[IDX_GRAINM] - k[6609]*y_cur[IDX_GRAINM]; - data[jistart + 1990] = 0.0 - k[6606]*y_cur[IDX_C2H5OH2II] - - k[6607]*y_cur[IDX_C2H5OH2II] - k[6608]*y_cur[IDX_C2H5OH2II] - - k[6609]*y_cur[IDX_C2H5OH2II]; - data[jistart + 1991] = 0.0 - k[2491]*y_cur[IDX_C2H5OH2II]; - data[jistart + 1992] = 0.0 + k[2768]*y_cur[IDX_C2H5OHI] + - k[5568]*y_cur[IDX_C2H4I]; - data[jistart + 1993] = 0.0 + k[2903]*y_cur[IDX_C2H5OHI]; - data[jistart + 1994] = 0.0 + k[3013]*y_cur[IDX_C2H5OHI]; - data[jistart + 1995] = 0.0 - k[3559]*y_cur[IDX_C2H5OH2II]; - data[jistart + 1996] = 0.0 - k[774]*y_cur[IDX_C2H5OH2II] - - k[775]*y_cur[IDX_C2H5OH2II] - k[776]*y_cur[IDX_C2H5OH2II] - - k[777]*y_cur[IDX_C2H5OH2II]; - data[jistart + 1997] = 0.0 - k[1367]*y_cur[IDX_C2H6I] - - k[1368]*y_cur[IDX_C2H6I] - k[1369]*y_cur[IDX_C2H6I] - - k[1370]*y_cur[IDX_C2H6I] - k[1371]*y_cur[IDX_C2H6I] - - k[1372]*y_cur[IDX_C2H6I]; - data[jistart + 1998] = 0.0 - k[4869]*y_cur[IDX_C2H6I]; - data[jistart + 1999] = 0.0 - k[1511]*y_cur[IDX_C2H6I] - - k[1512]*y_cur[IDX_C2H6I]; - data[jistart + 2000] = 0.0 - k[1613]*y_cur[IDX_C2H6I] - - k[1614]*y_cur[IDX_C2H6I] - k[1615]*y_cur[IDX_C2H6I]; - data[jistart + 2001] = 0.0 + k[237]*y_cur[IDX_C2H6II]; - data[jistart + 2002] = 0.0 - k[1670]*y_cur[IDX_C2H6I] - - k[1671]*y_cur[IDX_C2H6I] + k[1682]*y_cur[IDX_SiH4I]; - data[jistart + 2003] = 0.0 + k[5458]*y_cur[IDX_OHI]; - data[jistart + 2004] = 0.0 - k[441]*y_cur[IDX_H2II] - - k[466]*y_cur[IDX_H2OII] - k[687]*y_cur[IDX_OHII] - - k[1367]*y_cur[IDX_CII] - k[1368]*y_cur[IDX_CII] - - k[1369]*y_cur[IDX_CII] - k[1370]*y_cur[IDX_CII] - - k[1371]*y_cur[IDX_CII] - k[1372]*y_cur[IDX_CII] - - k[1511]*y_cur[IDX_C2H2II] - k[1512]*y_cur[IDX_C2H2II] - - k[1613]*y_cur[IDX_C2H3II] - k[1614]*y_cur[IDX_C2H3II] - - k[1615]*y_cur[IDX_C2H3II] - k[1670]*y_cur[IDX_C2H4II] - - k[1671]*y_cur[IDX_C2H4II] - k[2062]*y_cur[IDX_CH3II] - - k[2063]*y_cur[IDX_CH3II] - k[2064]*y_cur[IDX_CH3II] - - k[2112]*y_cur[IDX_S2II] - k[2222]*y_cur[IDX_CH5II] - - k[2326]*y_cur[IDX_HII] - k[2327]*y_cur[IDX_HII] - - k[2376]*y_cur[IDX_H2II] - k[2377]*y_cur[IDX_H2II] - - k[2505]*y_cur[IDX_H2OII] - k[2506]*y_cur[IDX_H2OII] - - k[2648]*y_cur[IDX_H3II] - k[2949]*y_cur[IDX_HCOII] - - k[3188]*y_cur[IDX_HeII] - k[3189]*y_cur[IDX_HeII] - - k[3190]*y_cur[IDX_HeII] - k[3771]*y_cur[IDX_OHII] - - k[3772]*y_cur[IDX_OHII] - k[3773]*y_cur[IDX_OHII] - - k[3774]*y_cur[IDX_OHII] - k[4869]*y_cur[IDX_C2I] - - k[5052]*y_cur[IDX_C4HI] - k[5069]*y_cur[IDX_CHI] - - k[5070]*y_cur[IDX_CHI] - k[5111]*y_cur[IDX_CNI] - k[5803] - k[5804] - - k[6108] - k[6109] - k[6923]; - data[jistart + 2005] = 0.0 + k[237]*y_cur[IDX_C2H4I] + - k[276]*y_cur[IDX_H2SI] + k[601]*y_cur[IDX_NH3I]; - data[jistart + 2006] = 0.0 + k[779]*y_cur[IDX_eM] + - k[2864]*y_cur[IDX_HCNI] + k[3560]*y_cur[IDX_NH3I] + - k[6420]*y_cur[IDX_GRAINM]; - data[jistart + 2007] = 0.0 + k[812]*y_cur[IDX_eM] + - k[6509]*y_cur[IDX_GRAINM]; - data[jistart + 2008] = 0.0 - k[5052]*y_cur[IDX_C2H6I]; - data[jistart + 2009] = 0.0 - k[5069]*y_cur[IDX_C2H6I] - - k[5070]*y_cur[IDX_C2H6I]; - data[jistart + 2010] = 0.0 - k[2062]*y_cur[IDX_C2H6I] - - k[2063]*y_cur[IDX_C2H6I] - k[2064]*y_cur[IDX_C2H6I] + - k[2070]*y_cur[IDX_CH3COCH3I]; - data[jistart + 2011] = 0.0 + k[2070]*y_cur[IDX_CH3II] + - k[2665]*y_cur[IDX_H3II]; - data[jistart + 2012] = 0.0 - k[2222]*y_cur[IDX_C2H6I]; - data[jistart + 2013] = 0.0 - k[5111]*y_cur[IDX_C2H6I]; - data[jistart + 2014] = 0.0 + k[8591]*y_cur[IDX_GHI]; - data[jistart + 2015] = 0.0 + k[7105] + k[7287] + k[7469]; - data[jistart + 2016] = 0.0 + k[8748]*y_cur[IDX_GCH3I] + - k[8748]*y_cur[IDX_GCH3I]; - data[jistart + 2017] = 0.0 + k[8591]*y_cur[IDX_GC2H5I]; - data[jistart + 2018] = 0.0 + k[6420]*y_cur[IDX_C2H7II] + - k[6509]*y_cur[IDX_C3H7II]; - data[jistart + 2019] = 0.0 - k[2326]*y_cur[IDX_C2H6I] - - k[2327]*y_cur[IDX_C2H6I]; - data[jistart + 2020] = 0.0 - k[441]*y_cur[IDX_C2H6I] - - k[2376]*y_cur[IDX_C2H6I] - k[2377]*y_cur[IDX_C2H6I]; - data[jistart + 2021] = 0.0 - k[466]*y_cur[IDX_C2H6I] - - k[2505]*y_cur[IDX_C2H6I] - k[2506]*y_cur[IDX_C2H6I]; - data[jistart + 2022] = 0.0 + k[276]*y_cur[IDX_C2H6II]; - data[jistart + 2023] = 0.0 - k[2648]*y_cur[IDX_C2H6I] + - k[2665]*y_cur[IDX_CH3COCH3I]; - data[jistart + 2024] = 0.0 + k[2864]*y_cur[IDX_C2H7II]; - data[jistart + 2025] = 0.0 - k[2949]*y_cur[IDX_C2H6I]; - data[jistart + 2026] = 0.0 - k[3188]*y_cur[IDX_C2H6I] - - k[3189]*y_cur[IDX_C2H6I] - k[3190]*y_cur[IDX_C2H6I]; - data[jistart + 2027] = 0.0 + k[601]*y_cur[IDX_C2H6II] + - k[3560]*y_cur[IDX_C2H7II]; - data[jistart + 2028] = 0.0 + k[5458]*y_cur[IDX_C2H5I]; - data[jistart + 2029] = 0.0 - k[687]*y_cur[IDX_C2H6I] - - k[3771]*y_cur[IDX_C2H6I] - k[3772]*y_cur[IDX_C2H6I] - - k[3773]*y_cur[IDX_C2H6I] - k[3774]*y_cur[IDX_C2H6I]; - data[jistart + 2030] = 0.0 - k[2112]*y_cur[IDX_C2H6I]; - data[jistart + 2031] = 0.0 + k[1682]*y_cur[IDX_C2H4II]; - data[jistart + 2032] = 0.0 + k[779]*y_cur[IDX_C2H7II] + - k[812]*y_cur[IDX_C3H7II]; - data[jistart + 2033] = 0.0 - k[1562]*y_cur[IDX_C2H6II] - - k[1563]*y_cur[IDX_C2H6II] - k[1564]*y_cur[IDX_C2H6II]; - data[jistart + 2034] = 0.0 - k[237]*y_cur[IDX_C2H6II]; - data[jistart + 2035] = 0.0 + k[2591]*y_cur[IDX_H3II] + - k[2902]*y_cur[IDX_HCOII]; - data[jistart + 2036] = 0.0 + k[441]*y_cur[IDX_H2II] + - k[466]*y_cur[IDX_H2OII] + k[687]*y_cur[IDX_OHII] + k[5804] + - k[6109]; - data[jistart + 2037] = 0.0 - k[237]*y_cur[IDX_C2H4I] - - k[276]*y_cur[IDX_H2SI] - k[601]*y_cur[IDX_NH3I] - - k[935]*y_cur[IDX_eM] - k[936]*y_cur[IDX_eM] - - k[1562]*y_cur[IDX_C2H2I] - k[1563]*y_cur[IDX_C2H2I] - + data[jistart + 3157] = 0.0 + k[1695]*y_cur[IDX_C4HII] + k[1696]*y_cur[IDX_C4H2II]; + data[jistart + 3158] = 0.0 + k[1634]*y_cur[IDX_C4H2II] + k[1635]*y_cur[IDX_C4H3II]; + data[jistart + 3159] = 0.0 + k[1623]*y_cur[IDX_C4H2I]; + data[jistart + 3160] = 0.0 + k[2180]*y_cur[IDX_C5H2II]; + data[jistart + 3161] = 0.0 + k[1553]*y_cur[IDX_C4H4II] + k[5511]*y_cur[IDX_C4H2II]; + data[jistart + 3162] = 0.0 - k[6796]*y_cur[IDX_C6H4II] - k[6797]*y_cur[IDX_C6H4II]; + data[jistart + 3163] = 0.0 - k[856]*y_cur[IDX_C6H4II] - k[857]*y_cur[IDX_C6H4II]; + data[jistart + 3164] = 0.0 + k[1289]*y_cur[IDX_eM] + k[6716]*y_cur[IDX_GRAINM]; + data[jistart + 3165] = 0.0 + k[1292]*y_cur[IDX_eM] + k[1295]*y_cur[IDX_eM] + + k[6733]*y_cur[IDX_GRAINM] + k[6736]*y_cur[IDX_GRAINM]; + data[jistart + 3166] = 0.0 + k[7148] + k[7330] + k[7512]; + data[jistart + 3167] = 0.0 - k[5639]*y_cur[IDX_CII] - k[5640]*y_cur[IDX_H3II] - + k[5641]*y_cur[IDX_HCOII] - k[5642]*y_cur[IDX_HeII] - + k[5643]*y_cur[IDX_HeII] - k[5938] - k[6291] - k[6966]; + data[jistart + 3168] = 0.0 + k[5671]*y_cur[IDX_HeII] + k[5947] + k[6296]; + data[jistart + 3169] = 0.0 + k[8750]*y_cur[IDX_GCH3I]; + data[jistart + 3170] = 0.0 + k[8750]*y_cur[IDX_GCOI]; + data[jistart + 3171] = 0.0 - k[5642]*y_cur[IDX_CH3COI] - k[5643]*y_cur[IDX_CH3COI] + + k[5671]*y_cur[IDX_CH3COOHI]; + data[jistart + 3172] = 0.0 - k[5639]*y_cur[IDX_CH3COI]; + data[jistart + 3173] = 0.0 - k[5641]*y_cur[IDX_CH3COI]; + data[jistart + 3174] = 0.0 - k[5640]*y_cur[IDX_CH3COI]; + data[jistart + 3175] = 0.0 + k[6716]*y_cur[IDX_CH3COOHII] + k[6733]*y_cur[IDX_CH3COOH2II] + + k[6736]*y_cur[IDX_CH3COOH2II]; + data[jistart + 3176] = 0.0 + k[1289]*y_cur[IDX_CH3COOHII] + k[1292]*y_cur[IDX_CH3COOH2II] + + k[1295]*y_cur[IDX_CH3COOH2II]; + data[jistart + 3177] = 0.0 + k[1723]*y_cur[IDX_CH3COCH3I]; + data[jistart + 3178] = 0.0 + k[2491]*y_cur[IDX_H2COI]; + data[jistart + 3179] = 0.0 + k[2118]*y_cur[IDX_CH3CHCH2I] + k[2119]*y_cur[IDX_CH3CHCH2I] + + k[2493]*y_cur[IDX_H2COI]; + data[jistart + 3180] = 0.0 - k[952]*y_cur[IDX_eM] - k[953]*y_cur[IDX_eM] - + k[6692]*y_cur[IDX_GRAINM] - k[6693]*y_cur[IDX_GRAINM]; + data[jistart + 3181] = 0.0 + k[1723]*y_cur[IDX_C2H5CNHII] + k[2071]*y_cur[IDX_CH3II] + + k[2663]*y_cur[IDX_H3II] + k[2793]*y_cur[IDX_H3OII] + + k[2952]*y_cur[IDX_HCOII] + k[3014]*y_cur[IDX_HCSII]; + data[jistart + 3182] = 0.0 + k[3014]*y_cur[IDX_CH3COCH3I]; + data[jistart + 3183] = 0.0 + k[5532]*y_cur[IDX_CH3II]; + data[jistart + 3184] = 0.0 + k[2118]*y_cur[IDX_CH3COCH3II] + k[2119]*y_cur[IDX_CH3COCH3II]; + data[jistart + 3185] = 0.0 + k[2491]*y_cur[IDX_C2H5OH2II] + k[2493]*y_cur[IDX_CH3COCH3II]; + data[jistart + 3186] = 0.0 + k[2071]*y_cur[IDX_CH3COCH3I] + k[5532]*y_cur[IDX_CH3CHOI]; + data[jistart + 3187] = 0.0 + k[2793]*y_cur[IDX_CH3COCH3I]; + data[jistart + 3188] = 0.0 + k[2952]*y_cur[IDX_CH3COCH3I]; + data[jistart + 3189] = 0.0 + k[2663]*y_cur[IDX_CH3COCH3I]; + data[jistart + 3190] = 0.0 - k[6692]*y_cur[IDX_CH3COCH4II] - k[6693]*y_cur[IDX_CH3COCH4II]; + data[jistart + 3191] = 0.0 - k[952]*y_cur[IDX_CH3COCH4II] - k[953]*y_cur[IDX_CH3COCH4II]; + data[jistart + 3192] = 0.0 - k[960]*y_cur[IDX_eM] - k[961]*y_cur[IDX_eM] - + k[962]*y_cur[IDX_eM] - k[6428]*y_cur[IDX_GRAINM] - + k[6429]*y_cur[IDX_GRAINM] - k[6430]*y_cur[IDX_GRAINM]; + data[jistart + 3193] = 0.0 + k[5628]*y_cur[IDX_H3II] + k[5629]*y_cur[IDX_H3OII] + + k[5630]*y_cur[IDX_HCOII]; + data[jistart + 3194] = 0.0 + k[5634]*y_cur[IDX_H3II] + k[5635]*y_cur[IDX_H3OII] + + k[5636]*y_cur[IDX_HCOII]; + data[jistart + 3195] = 0.0 + k[279]*y_cur[IDX_CH3OHI]; + data[jistart + 3196] = 0.0 + k[279]*y_cur[IDX_CH4II] + k[370]*y_cur[IDX_HII] + + k[545]*y_cur[IDX_NII] + k[651]*y_cur[IDX_OII] + + k[672]*y_cur[IDX_O2II] + k[5816] + k[6120]; + data[jistart + 3197] = 0.0 + k[672]*y_cur[IDX_CH3OHI]; + data[jistart + 3198] = 0.0 + k[545]*y_cur[IDX_CH3OHI]; + data[jistart + 3199] = 0.0 + k[651]*y_cur[IDX_CH3OHI]; + data[jistart + 3200] = 0.0 + k[5629]*y_cur[IDX_CH3OI] + k[5635]*y_cur[IDX_CH2OHI]; + data[jistart + 3201] = 0.0 + k[370]*y_cur[IDX_CH3OHI]; + data[jistart + 3202] = 0.0 + k[5630]*y_cur[IDX_CH3OI] + k[5636]*y_cur[IDX_CH2OHI]; + data[jistart + 3203] = 0.0 + k[5628]*y_cur[IDX_CH3OI] + k[5634]*y_cur[IDX_CH2OHI]; + data[jistart + 3204] = 0.0 - k[6428]*y_cur[IDX_CH3OHII] - k[6429]*y_cur[IDX_CH3OHII] - + k[6430]*y_cur[IDX_CH3OHII]; + data[jistart + 3205] = 0.0 - k[960]*y_cur[IDX_CH3OHII] - k[961]*y_cur[IDX_CH3OHII] - + k[962]*y_cur[IDX_CH3OHII]; + data[jistart + 3206] = 0.0 + k[1285]*y_cur[IDX_eM] + k[1288]*y_cur[IDX_eM] + + k[6712]*y_cur[IDX_GRAINM] + k[6715]*y_cur[IDX_GRAINM]; + data[jistart + 3207] = 0.0 + k[1294]*y_cur[IDX_eM] + k[6735]*y_cur[IDX_GRAINM]; + data[jistart + 3208] = 0.0 + k[7163] + k[7345] + k[7527]; + data[jistart + 3209] = 0.0 - k[5644]*y_cur[IDX_CII] - k[5645]*y_cur[IDX_H3II] - + k[5646]*y_cur[IDX_HCOII] - k[5647]*y_cur[IDX_HeII] - + k[5648]*y_cur[IDX_HeII] - k[5939] - k[6292] - k[6981]; + data[jistart + 3210] = 0.0 + k[5672]*y_cur[IDX_HeII] + k[5946] + k[6297]; + data[jistart + 3211] = 0.0 + k[8739]*y_cur[IDX_GCOI]; + data[jistart + 3212] = 0.0 + k[8739]*y_cur[IDX_GOHI]; + data[jistart + 3213] = 0.0 - k[5647]*y_cur[IDX_COOHI] - k[5648]*y_cur[IDX_COOHI] + + k[5672]*y_cur[IDX_CH3COOHI]; + data[jistart + 3214] = 0.0 - k[5644]*y_cur[IDX_COOHI]; + data[jistart + 3215] = 0.0 - k[5646]*y_cur[IDX_COOHI]; + data[jistart + 3216] = 0.0 - k[5645]*y_cur[IDX_COOHI]; + data[jistart + 3217] = 0.0 + k[6712]*y_cur[IDX_CH3COOHII] + k[6715]*y_cur[IDX_CH3COOHII] + + k[6735]*y_cur[IDX_CH3COOH2II]; + data[jistart + 3218] = 0.0 + k[1285]*y_cur[IDX_CH3COOHII] + k[1288]*y_cur[IDX_CH3COOHII] + + k[1294]*y_cur[IDX_CH3COOH2II]; + data[jistart + 3219] = 0.0 + k[7778] + k[8099] + k[8100]; + data[jistart + 3220] = 0.0 + k[7752] + k[8066]; + data[jistart + 3221] = 0.0 + k[7756] + k[8071] + k[8073]; + data[jistart + 3222] = 0.0 + k[8442]*y_cur[IDX_GOI]; + data[jistart + 3223] = 0.0 + k[7694] + k[7992] + k[8306]*y_cur[IDX_GHI] + + k[8435]*y_cur[IDX_GOI] + k[8477]*y_cur[IDX_GCHI] + + k[8533]*y_cur[IDX_GCH2I] + k[8541]*y_cur[IDX_GCH3I]; + data[jistart + 3224] = 0.0 - k[7107] - k[7289] - k[7471] - k[7690] - k[7691] - k[7980] - + k[7981] - k[8305]*y_cur[IDX_GHI] - k[8398]*y_cur[IDX_GCI] - + k[8399]*y_cur[IDX_GCI] - k[8481]*y_cur[IDX_GCHI] - + k[8525]*y_cur[IDX_GNHI] - k[8530]*y_cur[IDX_GNH2I] - + k[8604]*y_cur[IDX_GHI] - k[8658]*y_cur[IDX_GCI]; + data[jistart + 3225] = 0.0 - k[8530]*y_cur[IDX_GNOI]; + data[jistart + 3226] = 0.0 - k[8525]*y_cur[IDX_GNOI]; + data[jistart + 3227] = 0.0 + k[8533]*y_cur[IDX_GHNOI]; + data[jistart + 3228] = 0.0 + k[8461]*y_cur[IDX_GOI]; + data[jistart + 3229] = 0.0 + k[8435]*y_cur[IDX_GHNOI] + k[8442]*y_cur[IDX_GNSI] + + k[8461]*y_cur[IDX_GNI]; + data[jistart + 3230] = 0.0 + k[8541]*y_cur[IDX_GHNOI]; + data[jistart + 3231] = 0.0 + k[8477]*y_cur[IDX_GHNOI] - k[8481]*y_cur[IDX_GNOI]; + data[jistart + 3232] = 0.0 - k[8398]*y_cur[IDX_GNOI] - k[8399]*y_cur[IDX_GNOI] - + k[8658]*y_cur[IDX_GNOI]; + data[jistart + 3233] = 0.0 + k[6925]; + data[jistart + 3234] = 0.0 - k[8305]*y_cur[IDX_GNOI] + k[8306]*y_cur[IDX_GHNOI] - + k[8604]*y_cur[IDX_GNOI]; + data[jistart + 3235] = 0.0 + k[3752]*y_cur[IDX_OI]; + data[jistart + 3236] = 0.0 + k[3270]*y_cur[IDX_HeII]; + data[jistart + 3237] = 0.0 - k[1218]*y_cur[IDX_eM] - k[6600]*y_cur[IDX_GRAINM]; + data[jistart + 3238] = 0.0 + k[3673]*y_cur[IDX_O2I]; + data[jistart + 3239] = 0.0 + k[192]*y_cur[IDX_CII] + k[413]*y_cur[IDX_HII]; + data[jistart + 3240] = 0.0 + k[3751]*y_cur[IDX_OI] + k[3818]*y_cur[IDX_O2I]; + data[jistart + 3241] = 0.0 + k[2563]*y_cur[IDX_H2OI] + k[3807]*y_cur[IDX_OHI] + + k[3811]*y_cur[IDX_CO2I] + k[3812]*y_cur[IDX_O2I] + + k[3813]*y_cur[IDX_OCSI]; + data[jistart + 3242] = 0.0 + k[3813]*y_cur[IDX_PII]; + data[jistart + 3243] = 0.0 + k[3811]*y_cur[IDX_PII]; + data[jistart + 3244] = 0.0 + k[3673]*y_cur[IDX_PH2II] + k[3812]*y_cur[IDX_PII] + + k[3818]*y_cur[IDX_PHII]; + data[jistart + 3245] = 0.0 + k[3807]*y_cur[IDX_PII]; + data[jistart + 3246] = 0.0 + k[3751]*y_cur[IDX_PHII] + k[3752]*y_cur[IDX_PNII]; + data[jistart + 3247] = 0.0 + k[3270]*y_cur[IDX_HPOI]; + data[jistart + 3248] = 0.0 + k[192]*y_cur[IDX_POI]; + data[jistart + 3249] = 0.0 + k[2563]*y_cur[IDX_PII]; + data[jistart + 3250] = 0.0 + k[413]*y_cur[IDX_POI]; + data[jistart + 3251] = 0.0 - k[6600]*y_cur[IDX_POII]; + data[jistart + 3252] = 0.0 - k[1218]*y_cur[IDX_POII]; + data[jistart + 3253] = 0.0 - k[872]*y_cur[IDX_eM] - k[873]*y_cur[IDX_eM] - + k[3434]*y_cur[IDX_NI] - k[6830]*y_cur[IDX_GRAINM] - + k[6831]*y_cur[IDX_GRAINM]; + data[jistart + 3254] = 0.0 + k[364]*y_cur[IDX_HII]; + data[jistart + 3255] = 0.0 + k[2185]*y_cur[IDX_CH4I]; + data[jistart + 3256] = 0.0 + k[2480]*y_cur[IDX_C4H3II]; + data[jistart + 3257] = 0.0 + k[1591]*y_cur[IDX_C2H3II]; + data[jistart + 3258] = 0.0 + k[1638]*y_cur[IDX_C2H3I] + k[1701]*y_cur[IDX_C2H4I]; + data[jistart + 3259] = 0.0 + k[1789]*y_cur[IDX_C4H3II]; + data[jistart + 3260] = 0.0 + k[2105]*y_cur[IDX_CH3CCHI]; + data[jistart + 3261] = 0.0 + k[2105]*y_cur[IDX_C4HII]; + data[jistart + 3262] = 0.0 + k[1658]*y_cur[IDX_C5HI]; + data[jistart + 3263] = 0.0 + k[1789]*y_cur[IDX_C3H2I] + k[2035]*y_cur[IDX_CH2CCHI] + + k[2480]*y_cur[IDX_H2CCCI]; + data[jistart + 3264] = 0.0 + k[2034]*y_cur[IDX_C4H2II] + k[2035]*y_cur[IDX_C4H3II]; + data[jistart + 3265] = 0.0 + k[1658]*y_cur[IDX_C2H4II]; + data[jistart + 3266] = 0.0 + k[2034]*y_cur[IDX_CH2CCHI]; + data[jistart + 3267] = 0.0 + k[1701]*y_cur[IDX_C5H2II]; + data[jistart + 3268] = 0.0 + k[1638]*y_cur[IDX_C5H2II]; + data[jistart + 3269] = 0.0 + k[1591]*y_cur[IDX_C5H2I]; + data[jistart + 3270] = 0.0 + k[2185]*y_cur[IDX_C6H2II]; + data[jistart + 3271] = 0.0 - k[3434]*y_cur[IDX_C7H4II]; + data[jistart + 3272] = 0.0 + k[364]*y_cur[IDX_CH3C6HI]; + data[jistart + 3273] = 0.0 - k[6830]*y_cur[IDX_C7H4II] - k[6831]*y_cur[IDX_C7H4II]; + data[jistart + 3274] = 0.0 - k[872]*y_cur[IDX_C7H4II] - k[873]*y_cur[IDX_C7H4II]; + data[jistart + 3275] = 0.0 - k[874]*y_cur[IDX_eM] - k[875]*y_cur[IDX_eM] - + k[3435]*y_cur[IDX_NI] - k[6832]*y_cur[IDX_GRAINM] - + k[6833]*y_cur[IDX_GRAINM]; + data[jistart + 3276] = 0.0 + k[2645]*y_cur[IDX_H3II] + k[2946]*y_cur[IDX_HCOII]; + data[jistart + 3277] = 0.0 + k[1330]*y_cur[IDX_CII]; + data[jistart + 3278] = 0.0 + k[2186]*y_cur[IDX_CH4I]; + data[jistart + 3279] = 0.0 + k[1656]*y_cur[IDX_C2H4II]; + data[jistart + 3280] = 0.0 + k[1702]*y_cur[IDX_C2H4I]; + data[jistart + 3281] = 0.0 + k[2106]*y_cur[IDX_C4H2II] + k[2108]*y_cur[IDX_C4H3II]; + data[jistart + 3282] = 0.0 + k[5515]*y_cur[IDX_C4H2I]; + data[jistart + 3283] = 0.0 + k[1656]*y_cur[IDX_C5H2I]; + data[jistart + 3284] = 0.0 + k[2036]*y_cur[IDX_CH2CCHI] + k[2108]*y_cur[IDX_CH3CCHI]; + data[jistart + 3285] = 0.0 + k[2036]*y_cur[IDX_C4H3II]; + data[jistart + 3286] = 0.0 + k[5531]*y_cur[IDX_C4H2I]; + data[jistart + 3287] = 0.0 + k[5515]*y_cur[IDX_C3H3II] + k[5531]*y_cur[IDX_CH2CCHII]; + data[jistart + 3288] = 0.0 + k[2106]*y_cur[IDX_CH3CCHI]; + data[jistart + 3289] = 0.0 + k[1702]*y_cur[IDX_C5H2II]; + data[jistart + 3290] = 0.0 + k[2186]*y_cur[IDX_C6H2II]; + data[jistart + 3291] = 0.0 - k[3435]*y_cur[IDX_C7H5II]; + data[jistart + 3292] = 0.0 + k[1330]*y_cur[IDX_C6H6I]; + data[jistart + 3293] = 0.0 + k[2946]*y_cur[IDX_CH3C6HI]; + data[jistart + 3294] = 0.0 + k[2645]*y_cur[IDX_CH3C6HI]; + data[jistart + 3295] = 0.0 - k[6832]*y_cur[IDX_C7H5II] - k[6833]*y_cur[IDX_C7H5II]; + data[jistart + 3296] = 0.0 - k[874]*y_cur[IDX_C7H5II] - k[875]*y_cur[IDX_C7H5II]; + data[jistart + 3297] = 0.0 + k[7235] + k[7417] + k[7599]; + data[jistart + 3298] = 0.0 + k[875]*y_cur[IDX_eM] + k[6833]*y_cur[IDX_GRAINM]; + data[jistart + 3299] = 0.0 - k[364]*y_cur[IDX_HII] - k[1360]*y_cur[IDX_CII] - + k[1361]*y_cur[IDX_CII] - k[2323]*y_cur[IDX_HII] - + k[2645]*y_cur[IDX_H3II] - k[2946]*y_cur[IDX_HCOII] - + k[3181]*y_cur[IDX_HeII] - k[3182]*y_cur[IDX_HeII] - + k[4951]*y_cur[IDX_CI] - k[5799] - k[6103] - k[7053]; + data[jistart + 3300] = 0.0 + k[5023]*y_cur[IDX_C4HI]; + data[jistart + 3301] = 0.0 + k[5054]*y_cur[IDX_C4HI]; + data[jistart + 3302] = 0.0 + k[5051]*y_cur[IDX_C4HI]; + data[jistart + 3303] = 0.0 + k[5023]*y_cur[IDX_CH2CCH2I] + k[5051]*y_cur[IDX_CH3CCHI] + + k[5054]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 3304] = 0.0 - k[3181]*y_cur[IDX_CH3C6HI] - k[3182]*y_cur[IDX_CH3C6HI]; + data[jistart + 3305] = 0.0 - k[1360]*y_cur[IDX_CH3C6HI] - k[1361]*y_cur[IDX_CH3C6HI]; + data[jistart + 3306] = 0.0 - k[364]*y_cur[IDX_CH3C6HI] - k[2323]*y_cur[IDX_CH3C6HI]; + data[jistart + 3307] = 0.0 - k[4951]*y_cur[IDX_CH3C6HI]; + data[jistart + 3308] = 0.0 - k[2946]*y_cur[IDX_CH3C6HI]; + data[jistart + 3309] = 0.0 - k[2645]*y_cur[IDX_CH3C6HI]; + data[jistart + 3310] = 0.0 + k[6833]*y_cur[IDX_C7H5II]; + data[jistart + 3311] = 0.0 + k[875]*y_cur[IDX_C7H5II]; + data[jistart + 3312] = 0.0 - k[1000]*y_cur[IDX_eM] - k[1001]*y_cur[IDX_eM] - + k[5617]*y_cur[IDX_eM] - k[6582]*y_cur[IDX_GRAINM] - + k[6583]*y_cur[IDX_GRAINM]; + data[jistart + 3313] = 0.0 + k[377]*y_cur[IDX_HII]; + data[jistart + 3314] = 0.0 + k[2702]*y_cur[IDX_H3II]; + data[jistart + 3315] = 0.0 + k[3854]*y_cur[IDX_SOII]; + data[jistart + 3316] = 0.0 + k[3825]*y_cur[IDX_SII]; + data[jistart + 3317] = 0.0 + k[1992]*y_cur[IDX_CH2II]; + data[jistart + 3318] = 0.0 + k[2084]*y_cur[IDX_CH3II]; + data[jistart + 3319] = 0.0 + k[1992]*y_cur[IDX_OCSI]; + data[jistart + 3320] = 0.0 + k[1674]*y_cur[IDX_H2SI]; + data[jistart + 3321] = 0.0 + k[3844]*y_cur[IDX_C2H2I] + k[3848]*y_cur[IDX_C2H4I] + + k[3854]*y_cur[IDX_CH2CCH2I]; + data[jistart + 3322] = 0.0 + k[3848]*y_cur[IDX_SOII]; + data[jistart + 3323] = 0.0 + k[1674]*y_cur[IDX_C2H4II]; + data[jistart + 3324] = 0.0 + k[2101]*y_cur[IDX_CH3I] + k[3825]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 3325] = 0.0 + k[2084]*y_cur[IDX_HSI]; + data[jistart + 3326] = 0.0 + k[3844]*y_cur[IDX_SOII]; + data[jistart + 3327] = 0.0 + k[2101]*y_cur[IDX_SII]; + data[jistart + 3328] = 0.0 + k[377]*y_cur[IDX_H2CSI]; + data[jistart + 3329] = 0.0 + k[2702]*y_cur[IDX_HCSI]; + data[jistart + 3330] = 0.0 - k[6582]*y_cur[IDX_H2CSII] - k[6583]*y_cur[IDX_H2CSII]; + data[jistart + 3331] = 0.0 - k[1000]*y_cur[IDX_H2CSII] - k[1001]*y_cur[IDX_H2CSII] - + k[5617]*y_cur[IDX_H2CSII]; + data[jistart + 3332] = 0.0 + k[7250] + k[7432] + k[7614]; + data[jistart + 3333] = 0.0 + k[8650]*y_cur[IDX_GHI]; + data[jistart + 3334] = 0.0 + k[992]*y_cur[IDX_eM] + k[6881]*y_cur[IDX_GRAINM]; + data[jistart + 3335] = 0.0 + k[1033]*y_cur[IDX_eM] + k[6883]*y_cur[IDX_GRAINM]; + data[jistart + 3336] = 0.0 + k[8712]*y_cur[IDX_GNI]; + data[jistart + 3337] = 0.0 - k[387]*y_cur[IDX_HII] - k[1406]*y_cur[IDX_CII] - + k[2693]*y_cur[IDX_H3II] - k[2968]*y_cur[IDX_HCOII] - + k[3244]*y_cur[IDX_HeII] - k[5853] - k[6179] - k[6180] - k[7068]; + data[jistart + 3338] = 0.0 + k[5108]*y_cur[IDX_CNI]; + data[jistart + 3339] = 0.0 + k[8712]*y_cur[IDX_GC9HI]; + data[jistart + 3340] = 0.0 + k[121]*y_cur[IDX_NI]; + data[jistart + 3341] = 0.0 + k[5108]*y_cur[IDX_C8H2I]; + data[jistart + 3342] = 0.0 + k[8650]*y_cur[IDX_GC9NI]; + data[jistart + 3343] = 0.0 + k[121]*y_cur[IDX_C9HM]; + data[jistart + 3344] = 0.0 - k[3244]*y_cur[IDX_HC9NI]; + data[jistart + 3345] = 0.0 - k[1406]*y_cur[IDX_HC9NI]; + data[jistart + 3346] = 0.0 - k[387]*y_cur[IDX_HC9NI]; + data[jistart + 3347] = 0.0 - k[2968]*y_cur[IDX_HC9NI]; + data[jistart + 3348] = 0.0 - k[2693]*y_cur[IDX_HC9NI]; + data[jistart + 3349] = 0.0 + k[6881]*y_cur[IDX_H2C9NII] + k[6883]*y_cur[IDX_H3C9NII]; + data[jistart + 3350] = 0.0 + k[992]*y_cur[IDX_H2C9NII] + k[1033]*y_cur[IDX_H3C9NII]; + data[jistart + 3351] = 0.0 + k[8651]*y_cur[IDX_GHI]; + data[jistart + 3352] = 0.0 + k[1054]*y_cur[IDX_eM] + k[6726]*y_cur[IDX_GRAINM]; + data[jistart + 3353] = 0.0 + k[7203] + k[7385] + k[7569]; + data[jistart + 3354] = 0.0 + k[8759]*y_cur[IDX_GHCOI]; + data[jistart + 3355] = 0.0 - k[179]*y_cur[IDX_CII] - k[390]*y_cur[IDX_HII] - + k[2698]*y_cur[IDX_H3II] - k[2807]*y_cur[IDX_H3OII] - + k[2970]*y_cur[IDX_HCOII] - k[3252]*y_cur[IDX_HeII] - k[5858] - + k[5859] - k[6186] - k[7021]; + data[jistart + 3356] = 0.0 + k[8759]*y_cur[IDX_GCH3OI]; + data[jistart + 3357] = 0.0 + k[8651]*y_cur[IDX_GCOOCH3I]; + data[jistart + 3358] = 0.0 - k[2807]*y_cur[IDX_HCOOCH3I]; + data[jistart + 3359] = 0.0 - k[3252]*y_cur[IDX_HCOOCH3I]; + data[jistart + 3360] = 0.0 - k[179]*y_cur[IDX_HCOOCH3I]; + data[jistart + 3361] = 0.0 - k[390]*y_cur[IDX_HCOOCH3I]; + data[jistart + 3362] = 0.0 - k[2970]*y_cur[IDX_HCOOCH3I]; + data[jistart + 3363] = 0.0 - k[2698]*y_cur[IDX_HCOOCH3I]; + data[jistart + 3364] = 0.0 + k[6726]*y_cur[IDX_H5C2O2II]; + data[jistart + 3365] = 0.0 + k[1054]*y_cur[IDX_H5C2O2II]; + data[jistart + 3366] = 0.0 + k[2404]*y_cur[IDX_H2I] + k[2527]*y_cur[IDX_H2OI] + + k[2866]*y_cur[IDX_HCNI]; + data[jistart + 3367] = 0.0 - k[1156]*y_cur[IDX_eM] - k[1157]*y_cur[IDX_eM] - + k[1709]*y_cur[IDX_C2H4I] - k[2128]*y_cur[IDX_CH3OHI] - + k[2560]*y_cur[IDX_H2OI] - k[2882]*y_cur[IDX_HCNI] - + k[3593]*y_cur[IDX_NH3I] - k[6652]*y_cur[IDX_GRAINM] - + k[6653]*y_cur[IDX_GRAINM]; + data[jistart + 3368] = 0.0 + k[1624]*y_cur[IDX_C2H3II] + k[2720]*y_cur[IDX_H3II] + + k[2979]*y_cur[IDX_HCOII] + k[3375]*y_cur[IDX_N2HII]; + data[jistart + 3369] = 0.0 - k[2128]*y_cur[IDX_NCCNHII]; + data[jistart + 3370] = 0.0 + k[3375]*y_cur[IDX_NCCNI]; + data[jistart + 3371] = 0.0 - k[1709]*y_cur[IDX_NCCNHII]; + data[jistart + 3372] = 0.0 + k[1624]*y_cur[IDX_NCCNI]; + data[jistart + 3373] = 0.0 + k[2866]*y_cur[IDX_C2N2II] - k[2882]*y_cur[IDX_NCCNHII]; + data[jistart + 3374] = 0.0 - k[3593]*y_cur[IDX_NCCNHII]; + data[jistart + 3375] = 0.0 + k[2527]*y_cur[IDX_C2N2II] - k[2560]*y_cur[IDX_NCCNHII]; + data[jistart + 3376] = 0.0 + k[2979]*y_cur[IDX_NCCNI]; + data[jistart + 3377] = 0.0 + k[2720]*y_cur[IDX_NCCNI]; + data[jistart + 3378] = 0.0 - k[6652]*y_cur[IDX_NCCNHII] - k[6653]*y_cur[IDX_NCCNHII]; + data[jistart + 3379] = 0.0 + k[2404]*y_cur[IDX_C2N2II]; + data[jistart + 3380] = 0.0 - k[1156]*y_cur[IDX_NCCNHII] - k[1157]*y_cur[IDX_NCCNHII]; + data[jistart + 3381] = 0.0 + k[7167] + k[7349] + k[7531]; + data[jistart + 3382] = 0.0 - k[676]*y_cur[IDX_O2II] - k[2355]*y_cur[IDX_HII] - + k[2725]*y_cur[IDX_H3II] - k[3648]*y_cur[IDX_OII] - + k[5002]*y_cur[IDX_CH2I] - k[5037]*y_cur[IDX_CH3I] - + k[5120]*y_cur[IDX_CNI] - k[5129]*y_cur[IDX_COI] - + k[5185]*y_cur[IDX_HI] - k[5275]*y_cur[IDX_NI] - + k[5276]*y_cur[IDX_NI] - k[5277]*y_cur[IDX_NI] - + k[5278]*y_cur[IDX_NI] - k[5311]*y_cur[IDX_NHI] - + k[5312]*y_cur[IDX_NHI] - k[5423]*y_cur[IDX_OI] - k[5890] - k[6226] - + k[6227] - k[6985]; + data[jistart + 3383] = 0.0 + k[5411]*y_cur[IDX_OI]; + data[jistart + 3384] = 0.0 + k[5327]*y_cur[IDX_NOI]; + data[jistart + 3385] = 0.0 + k[5336]*y_cur[IDX_O2I]; + data[jistart + 3386] = 0.0 + k[125]*y_cur[IDX_NOI]; + data[jistart + 3387] = 0.0 - k[676]*y_cur[IDX_NO2I]; + data[jistart + 3388] = 0.0 - k[5311]*y_cur[IDX_NO2I] - k[5312]*y_cur[IDX_NO2I]; + data[jistart + 3389] = 0.0 - k[3648]*y_cur[IDX_NO2I]; + data[jistart + 3390] = 0.0 - k[5002]*y_cur[IDX_NO2I]; + data[jistart + 3391] = 0.0 + k[5330]*y_cur[IDX_NOI] + k[5336]*y_cur[IDX_OCNI]; + data[jistart + 3392] = 0.0 + k[125]*y_cur[IDX_OM] + k[5327]*y_cur[IDX_N2OI] + + k[5330]*y_cur[IDX_O2I] + k[5477]*y_cur[IDX_OHI]; + data[jistart + 3393] = 0.0 + k[5477]*y_cur[IDX_NOI]; + data[jistart + 3394] = 0.0 - k[5120]*y_cur[IDX_NO2I]; + data[jistart + 3395] = 0.0 - k[5037]*y_cur[IDX_NO2I]; + data[jistart + 3396] = 0.0 - k[5275]*y_cur[IDX_NO2I] - k[5276]*y_cur[IDX_NO2I] - + k[5277]*y_cur[IDX_NO2I] - k[5278]*y_cur[IDX_NO2I]; + data[jistart + 3397] = 0.0 + k[5411]*y_cur[IDX_HNOI] - k[5423]*y_cur[IDX_NO2I]; + data[jistart + 3398] = 0.0 - k[2355]*y_cur[IDX_NO2I]; + data[jistart + 3399] = 0.0 - k[2725]*y_cur[IDX_NO2I]; + data[jistart + 3400] = 0.0 - k[5129]*y_cur[IDX_NO2I]; + data[jistart + 3401] = 0.0 - k[5185]*y_cur[IDX_NO2I]; + data[jistart + 3402] = 0.0 + k[7121] + k[7303] + k[7485]; + data[jistart + 3403] = 0.0 + k[1209]*y_cur[IDX_eM] + k[2131]*y_cur[IDX_CH3OHI] + + k[3601]*y_cur[IDX_NH3I] + k[3819]*y_cur[IDX_H2SI] + + k[6448]*y_cur[IDX_GRAINM]; + data[jistart + 3404] = 0.0 + k[5384]*y_cur[IDX_OI]; + data[jistart + 3405] = 0.0 - k[410]*y_cur[IDX_HII] - k[2735]*y_cur[IDX_H3II] - + k[2984]*y_cur[IDX_HCOII] - k[3298]*y_cur[IDX_HeII] - + k[5433]*y_cur[IDX_OI] - k[5434]*y_cur[IDX_OI] - + k[5435]*y_cur[IDX_OI] - k[5907] - k[6247] - k[6248] - k[6939]; + data[jistart + 3406] = 0.0 + k[2131]*y_cur[IDX_PH3II]; + data[jistart + 3407] = 0.0 + k[3819]*y_cur[IDX_PH3II]; + data[jistart + 3408] = 0.0 + k[3601]*y_cur[IDX_PH3II]; + data[jistart + 3409] = 0.0 + k[5384]*y_cur[IDX_CH2PHI] - k[5433]*y_cur[IDX_PH2I] - + k[5434]*y_cur[IDX_PH2I] - k[5435]*y_cur[IDX_PH2I]; + data[jistart + 3410] = 0.0 - k[3298]*y_cur[IDX_PH2I]; + data[jistart + 3411] = 0.0 - k[410]*y_cur[IDX_PH2I]; + data[jistart + 3412] = 0.0 - k[2984]*y_cur[IDX_PH2I]; + data[jistart + 3413] = 0.0 - k[2735]*y_cur[IDX_PH2I]; + data[jistart + 3414] = 0.0 + k[6448]*y_cur[IDX_PH3II]; + data[jistart + 3415] = 0.0 + k[1209]*y_cur[IDX_PH3II]; + data[jistart + 3416] = 0.0 + k[7164] + k[7346] + k[7528]; + data[jistart + 3417] = 0.0 + k[249]*y_cur[IDX_CI]; + data[jistart + 3418] = 0.0 + k[1217]*y_cur[IDX_eM] + k[6619]*y_cur[IDX_GRAINM]; + data[jistart + 3419] = 0.0 + k[1214]*y_cur[IDX_eM] + k[6595]*y_cur[IDX_GRAINM]; + data[jistart + 3420] = 0.0 + k[1134]*y_cur[IDX_eM] + k[6573]*y_cur[IDX_GRAINM]; + data[jistart + 3421] = 0.0 - k[412]*y_cur[IDX_HII] - k[2737]*y_cur[IDX_H3II] - + k[2816]*y_cur[IDX_H3OII] - k[2986]*y_cur[IDX_HCOII] - + k[3300]*y_cur[IDX_HeII] - k[5286]*y_cur[IDX_NI] - k[5909] - k[6250] + - k[6982]; + data[jistart + 3422] = 0.0 + k[5288]*y_cur[IDX_NI]; + data[jistart + 3423] = 0.0 + k[5285]*y_cur[IDX_NI]; + data[jistart + 3424] = 0.0 + k[5285]*y_cur[IDX_PHI] - k[5286]*y_cur[IDX_PNI] + + k[5288]*y_cur[IDX_POI]; + data[jistart + 3425] = 0.0 - k[2816]*y_cur[IDX_PNI]; + data[jistart + 3426] = 0.0 - k[3300]*y_cur[IDX_PNI]; + data[jistart + 3427] = 0.0 - k[412]*y_cur[IDX_PNI]; + data[jistart + 3428] = 0.0 + k[249]*y_cur[IDX_PNII]; + data[jistart + 3429] = 0.0 - k[2986]*y_cur[IDX_PNI]; + data[jistart + 3430] = 0.0 - k[2737]*y_cur[IDX_PNI]; + data[jistart + 3431] = 0.0 + k[6573]*y_cur[IDX_HPNII] + k[6595]*y_cur[IDX_PNH2II] + + k[6619]*y_cur[IDX_PNH3II]; + data[jistart + 3432] = 0.0 + k[1134]*y_cur[IDX_HPNII] + k[1214]*y_cur[IDX_PNH2II] + + k[1217]*y_cur[IDX_PNH3II]; + data[jistart + 3433] = 0.0 + k[7190] + k[7372] + k[7554]; + data[jistart + 3434] = 0.0 + k[1231]*y_cur[IDX_eM] + k[6665]*y_cur[IDX_GRAINM]; + data[jistart + 3435] = 0.0 + k[6261]; + data[jistart + 3436] = 0.0 + k[1229]*y_cur[IDX_eM] + k[6661]*y_cur[IDX_GRAINM]; + data[jistart + 3437] = 0.0 - k[196]*y_cur[IDX_CII] - k[421]*y_cur[IDX_HII] - + k[1432]*y_cur[IDX_CII] - k[2358]*y_cur[IDX_HII] - + k[2746]*y_cur[IDX_H3II] - k[2820]*y_cur[IDX_H3OII] - + k[2993]*y_cur[IDX_HCOII] - k[3310]*y_cur[IDX_HeII] - + k[3311]*y_cur[IDX_HeII] - k[5920] - k[6262] - k[7008]; + data[jistart + 3438] = 0.0 + k[4880]*y_cur[IDX_C2H2I]; + data[jistart + 3439] = 0.0 + k[4880]*y_cur[IDX_SiI]; + data[jistart + 3440] = 0.0 - k[2820]*y_cur[IDX_SiC2HI]; + data[jistart + 3441] = 0.0 - k[3310]*y_cur[IDX_SiC2HI] - k[3311]*y_cur[IDX_SiC2HI]; + data[jistart + 3442] = 0.0 - k[196]*y_cur[IDX_SiC2HI] - k[1432]*y_cur[IDX_SiC2HI]; + data[jistart + 3443] = 0.0 - k[421]*y_cur[IDX_SiC2HI] - k[2358]*y_cur[IDX_SiC2HI]; + data[jistart + 3444] = 0.0 - k[2993]*y_cur[IDX_SiC2HI]; + data[jistart + 3445] = 0.0 - k[2746]*y_cur[IDX_SiC2HI]; + data[jistart + 3446] = 0.0 + k[6661]*y_cur[IDX_SiC2H2II] + k[6665]*y_cur[IDX_SiC2H3II]; + data[jistart + 3447] = 0.0 + k[1229]*y_cur[IDX_SiC2H2II] + k[1231]*y_cur[IDX_SiC2H3II]; + data[jistart + 3448] = 0.0 + k[7213] + k[7395] + k[7577]; + data[jistart + 3449] = 0.0 + k[1236]*y_cur[IDX_eM] + k[6767]*y_cur[IDX_GRAINM]; + data[jistart + 3450] = 0.0 + k[1239]*y_cur[IDX_eM] + k[6799]*y_cur[IDX_GRAINM]; + data[jistart + 3451] = 0.0 + k[1240]*y_cur[IDX_eM] + k[6800]*y_cur[IDX_GRAINM]; + data[jistart + 3452] = 0.0 + k[5922] + k[6265]; + data[jistart + 3453] = 0.0 + k[5442]*y_cur[IDX_OI]; + data[jistart + 3454] = 0.0 + k[1235]*y_cur[IDX_eM] + k[6762]*y_cur[IDX_GRAINM]; + data[jistart + 3455] = 0.0 - k[197]*y_cur[IDX_CII] - k[422]*y_cur[IDX_HII] - + k[2747]*y_cur[IDX_H3II] - k[2994]*y_cur[IDX_HCOII] - + k[3312]*y_cur[IDX_HeII] - k[5441]*y_cur[IDX_OI] - k[5921] - k[6263] + - k[6264] - k[7031]; + data[jistart + 3456] = 0.0 - k[5441]*y_cur[IDX_SiC3I] + k[5442]*y_cur[IDX_SiC4I]; + data[jistart + 3457] = 0.0 - k[3312]*y_cur[IDX_SiC3I]; + data[jistart + 3458] = 0.0 - k[197]*y_cur[IDX_SiC3I]; + data[jistart + 3459] = 0.0 - k[422]*y_cur[IDX_SiC3I]; + data[jistart + 3460] = 0.0 - k[2994]*y_cur[IDX_SiC3I]; + data[jistart + 3461] = 0.0 - k[2747]*y_cur[IDX_SiC3I]; + data[jistart + 3462] = 0.0 + k[6762]*y_cur[IDX_SiC3HII] + k[6767]*y_cur[IDX_SiC3H2II] + + k[6799]*y_cur[IDX_SiC4II] + k[6800]*y_cur[IDX_SiC4HII]; + data[jistart + 3463] = 0.0 + k[1235]*y_cur[IDX_SiC3HII] + k[1236]*y_cur[IDX_SiC3H2II] + + k[1239]*y_cur[IDX_SiC4II] + k[1240]*y_cur[IDX_SiC4HII]; + data[jistart + 3464] = 0.0 + k[7230] + k[7412] + k[7594]; + data[jistart + 3465] = 0.0 + k[1194]*y_cur[IDX_eM] + k[6812]*y_cur[IDX_GRAINM]; + data[jistart + 3466] = 0.0 - k[341]*y_cur[IDX_HII] - k[1321]*y_cur[IDX_CII] - + k[2611]*y_cur[IDX_H3II] - k[2781]*y_cur[IDX_H3OII] - + k[2916]*y_cur[IDX_HCOII] - k[3113]*y_cur[IDX_HeII] - + k[3114]*y_cur[IDX_HeII] - k[5364]*y_cur[IDX_OI] - k[5734] - k[6020] + - k[7048]; + data[jistart + 3467] = 0.0 - k[2781]*y_cur[IDX_C4PI]; + data[jistart + 3468] = 0.0 - k[5364]*y_cur[IDX_C4PI]; + data[jistart + 3469] = 0.0 - k[3113]*y_cur[IDX_C4PI] - k[3114]*y_cur[IDX_C4PI]; + data[jistart + 3470] = 0.0 - k[1321]*y_cur[IDX_C4PI]; + data[jistart + 3471] = 0.0 - k[341]*y_cur[IDX_C4PI]; + data[jistart + 3472] = 0.0 - k[2916]*y_cur[IDX_C4PI]; + data[jistart + 3473] = 0.0 - k[2611]*y_cur[IDX_C4PI]; + data[jistart + 3474] = 0.0 + k[6812]*y_cur[IDX_PC4HII]; + data[jistart + 3475] = 0.0 + k[1194]*y_cur[IDX_PC4HII]; + data[jistart + 3476] = 0.0 - k[863]*y_cur[IDX_eM] - k[864]*y_cur[IDX_eM] - + k[865]*y_cur[IDX_eM] - k[2419]*y_cur[IDX_H2I] - + k[6821]*y_cur[IDX_GRAINM] - k[6822]*y_cur[IDX_GRAINM] - + k[6823]*y_cur[IDX_GRAINM]; + data[jistart + 3477] = 0.0 + k[3137]*y_cur[IDX_HeII]; + data[jistart + 3478] = 0.0 + k[1872]*y_cur[IDX_CI]; + data[jistart + 3479] = 0.0 + k[1326]*y_cur[IDX_CII]; + data[jistart + 3480] = 0.0 + k[1822]*y_cur[IDX_C3HI]; + data[jistart + 3481] = 0.0 + k[3069]*y_cur[IDX_HeII]; + data[jistart + 3482] = 0.0 + k[3059]*y_cur[IDX_HeII]; + data[jistart + 3483] = 0.0 + k[349]*y_cur[IDX_HII] + k[6043]; + data[jistart + 3484] = 0.0 + k[3149]*y_cur[IDX_HeII]; + data[jistart + 3485] = 0.0 + k[3143]*y_cur[IDX_HeII]; + data[jistart + 3486] = 0.0 + k[5499]*y_cur[IDX_CII]; + data[jistart + 3487] = 0.0 + k[2309]*y_cur[IDX_HII] + k[3140]*y_cur[IDX_HeII]; + data[jistart + 3488] = 0.0 + k[1331]*y_cur[IDX_CII]; + data[jistart + 3489] = 0.0 + k[1822]*y_cur[IDX_C4HII]; + data[jistart + 3490] = 0.0 + k[3059]*y_cur[IDX_C10I] + k[3069]*y_cur[IDX_C10HI] + + k[3137]*y_cur[IDX_C7H2I] + k[3140]*y_cur[IDX_C7HI] + + k[3143]*y_cur[IDX_C8I] + k[3149]*y_cur[IDX_C9I]; + data[jistart + 3491] = 0.0 + k[1326]*y_cur[IDX_C6H2I] + k[1331]*y_cur[IDX_C6HI] + + k[5499]*y_cur[IDX_C6I]; + data[jistart + 3492] = 0.0 + k[349]*y_cur[IDX_C7I] + k[2309]*y_cur[IDX_C7HI]; + data[jistart + 3493] = 0.0 + k[1872]*y_cur[IDX_C6H2II]; + data[jistart + 3494] = 0.0 - k[6821]*y_cur[IDX_C7II] - k[6822]*y_cur[IDX_C7II] - + k[6823]*y_cur[IDX_C7II]; + data[jistart + 3495] = 0.0 - k[2419]*y_cur[IDX_C7II]; + data[jistart + 3496] = 0.0 - k[863]*y_cur[IDX_C7II] - k[864]*y_cur[IDX_C7II] - + k[865]*y_cur[IDX_C7II]; + data[jistart + 3497] = 0.0 + k[7135] + k[7317] + k[7499]; + data[jistart + 3498] = 0.0 + k[8617]*y_cur[IDX_GHI]; + data[jistart + 3499] = 0.0 + k[771]*y_cur[IDX_eM] + k[6673]*y_cur[IDX_GRAINM]; + data[jistart + 3500] = 0.0 + k[944]*y_cur[IDX_eM] + k[2283]*y_cur[IDX_COI] + + k[6484]*y_cur[IDX_GRAINM]; + data[jistart + 3501] = 0.0 - k[163]*y_cur[IDX_CII] - k[361]*y_cur[IDX_HII] - + k[2638]*y_cur[IDX_H3II] - k[3170]*y_cur[IDX_HeII] - + k[4948]*y_cur[IDX_CI] - k[5788] - k[6090] - k[6953]; + data[jistart + 3502] = 0.0 + k[8747]*y_cur[IDX_GCNI]; + data[jistart + 3503] = 0.0 + k[8747]*y_cur[IDX_GCH2I]; + data[jistart + 3504] = 0.0 + k[5224]*y_cur[IDX_NI]; + data[jistart + 3505] = 0.0 + k[8617]*y_cur[IDX_GHCCNI]; + data[jistart + 3506] = 0.0 + k[5224]*y_cur[IDX_C2H3I]; + data[jistart + 3507] = 0.0 - k[3170]*y_cur[IDX_CH2CNI]; + data[jistart + 3508] = 0.0 - k[163]*y_cur[IDX_CH2CNI]; + data[jistart + 3509] = 0.0 - k[361]*y_cur[IDX_CH2CNI]; + data[jistart + 3510] = 0.0 - k[4948]*y_cur[IDX_CH2CNI]; + data[jistart + 3511] = 0.0 - k[2638]*y_cur[IDX_CH2CNI]; + data[jistart + 3512] = 0.0 + k[2283]*y_cur[IDX_CH3CNII]; + data[jistart + 3513] = 0.0 + k[6484]*y_cur[IDX_CH3CNII] + k[6673]*y_cur[IDX_C2H5CNHII]; + data[jistart + 3514] = 0.0 + k[771]*y_cur[IDX_C2H5CNHII] + k[944]*y_cur[IDX_CH3CNII]; + data[jistart + 3515] = 0.0 - k[929]*y_cur[IDX_eM] - k[930]*y_cur[IDX_eM] - + k[3455]*y_cur[IDX_NI] - k[6748]*y_cur[IDX_GRAINM] - + k[6749]*y_cur[IDX_GRAINM]; + data[jistart + 3516] = 0.0 + k[363]*y_cur[IDX_HII]; + data[jistart + 3517] = 0.0 + k[3424]*y_cur[IDX_NI]; + data[jistart + 3518] = 0.0 + k[1618]*y_cur[IDX_C2H3II]; + data[jistart + 3519] = 0.0 + k[1582]*y_cur[IDX_C2H3II]; + data[jistart + 3520] = 0.0 + k[1510]*y_cur[IDX_C2H2II] + k[2107]*y_cur[IDX_C4H2II]; + data[jistart + 3521] = 0.0 + k[1631]*y_cur[IDX_C2H3I]; + data[jistart + 3522] = 0.0 + k[1630]*y_cur[IDX_C2H3I]; + data[jistart + 3523] = 0.0 + k[1652]*y_cur[IDX_C3HI]; + data[jistart + 3524] = 0.0 + k[1508]*y_cur[IDX_C2H2II] + k[1610]*y_cur[IDX_C2H3II]; + data[jistart + 3525] = 0.0 + k[1643]*y_cur[IDX_C2H3I]; + data[jistart + 3526] = 0.0 + k[1652]*y_cur[IDX_C2H4II]; + data[jistart + 3527] = 0.0 + k[2107]*y_cur[IDX_CH3CCHI] + k[2170]*y_cur[IDX_CH4I]; + data[jistart + 3528] = 0.0 + k[1630]*y_cur[IDX_C3H2II] + k[1631]*y_cur[IDX_C3H3II] + + k[1643]*y_cur[IDX_CH2CCHII]; + data[jistart + 3529] = 0.0 + k[1582]*y_cur[IDX_C3H2I] + k[1610]*y_cur[IDX_CH2CCHI] + + k[1618]*y_cur[IDX_H2CCCI]; + data[jistart + 3530] = 0.0 + k[2170]*y_cur[IDX_C4H2II]; + data[jistart + 3531] = 0.0 + k[1508]*y_cur[IDX_CH2CCHI] + k[1510]*y_cur[IDX_CH3CCHI]; + data[jistart + 3532] = 0.0 + k[3424]*y_cur[IDX_C6H5II] - k[3455]*y_cur[IDX_CH3C4HII]; + data[jistart + 3533] = 0.0 + k[363]*y_cur[IDX_CH3C4HI]; + data[jistart + 3534] = 0.0 - k[6748]*y_cur[IDX_CH3C4HII] - k[6749]*y_cur[IDX_CH3C4HII]; + data[jistart + 3535] = 0.0 - k[929]*y_cur[IDX_CH3C4HII] - k[930]*y_cur[IDX_CH3C4HII]; + data[jistart + 3536] = 0.0 + k[7818]; + data[jistart + 3537] = 0.0 + k[7769] + k[8089]; + data[jistart + 3538] = 0.0 + k[7774] + k[8094]; + data[jistart + 3539] = 0.0 + k[8541]*y_cur[IDX_GCH3I]; + data[jistart + 3540] = 0.0 + k[7674] + k[7961]; + data[jistart + 3541] = 0.0 + k[8556]*y_cur[IDX_GCH3I]; + data[jistart + 3542] = 0.0 + k[8550]*y_cur[IDX_GCH3I]; + data[jistart + 3543] = 0.0 + k[7824] + k[8555]*y_cur[IDX_GCH3I]; + data[jistart + 3544] = 0.0 + k[7760] + k[8078] + k[8333]*y_cur[IDX_GHI] + + k[8547]*y_cur[IDX_GCH3I]; + data[jistart + 3545] = 0.0 + k[8544]*y_cur[IDX_GCH3I]; + data[jistart + 3546] = 0.0 - k[7080] - k[7262] - k[7444] - k[7633] - k[7910] - k[7911] - + k[7912] - k[7913] - k[7914] - k[8278]*y_cur[IDX_GHI] - + k[8575]*y_cur[IDX_GC2HI]; + data[jistart + 3547] = 0.0 - k[8575]*y_cur[IDX_GCH4I]; + data[jistart + 3548] = 0.0 + k[8277]*y_cur[IDX_GHI] + k[8371]*y_cur[IDX_GH2I] + + k[8541]*y_cur[IDX_GHNOI] + k[8544]*y_cur[IDX_GH2COI] + + k[8547]*y_cur[IDX_GCH3CHOI] + k[8550]*y_cur[IDX_GHCOOHI] + + k[8555]*y_cur[IDX_GHCOOCH3I] + k[8556]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 3549] = 0.0 + k[8371]*y_cur[IDX_GCH3I]; + data[jistart + 3550] = 0.0 + k[6898]; + data[jistart + 3551] = 0.0 + k[8277]*y_cur[IDX_GCH3I] - k[8278]*y_cur[IDX_GCH4I] + + k[8333]*y_cur[IDX_GCH3CHOI]; + data[jistart + 3552] = 0.0 + k[7158] + k[7340] + k[7522]; + data[jistart + 3553] = 0.0 + k[1200]*y_cur[IDX_eM] + k[6579]*y_cur[IDX_GRAINM]; + data[jistart + 3554] = 0.0 + k[1203]*y_cur[IDX_eM] + k[6597]*y_cur[IDX_GRAINM]; + data[jistart + 3555] = 0.0 + k[1198]*y_cur[IDX_eM] + k[6570]*y_cur[IDX_GRAINM]; + data[jistart + 3556] = 0.0 + k[5792]; + data[jistart + 3557] = 0.0 - k[180]*y_cur[IDX_CII] - k[391]*y_cur[IDX_HII] - + k[1409]*y_cur[IDX_CII] - k[2701]*y_cur[IDX_H3II] - + k[2808]*y_cur[IDX_H3OII] - k[2972]*y_cur[IDX_HCOII] - + k[3253]*y_cur[IDX_HeII] - k[3254]*y_cur[IDX_HeII] - + k[5407]*y_cur[IDX_OI] - k[5861] - k[6189] - k[6976]; + data[jistart + 3558] = 0.0 + k[5401]*y_cur[IDX_OI]; + data[jistart + 3559] = 0.0 - k[2808]*y_cur[IDX_HCPI]; + data[jistart + 3560] = 0.0 + k[5401]*y_cur[IDX_HC2PI] - k[5407]*y_cur[IDX_HCPI]; + data[jistart + 3561] = 0.0 - k[3253]*y_cur[IDX_HCPI] - k[3254]*y_cur[IDX_HCPI]; + data[jistart + 3562] = 0.0 - k[180]*y_cur[IDX_HCPI] - k[1409]*y_cur[IDX_HCPI]; + data[jistart + 3563] = 0.0 - k[391]*y_cur[IDX_HCPI]; + data[jistart + 3564] = 0.0 - k[2972]*y_cur[IDX_HCPI]; + data[jistart + 3565] = 0.0 - k[2701]*y_cur[IDX_HCPI]; + data[jistart + 3566] = 0.0 + k[6570]*y_cur[IDX_PCH2II] + k[6579]*y_cur[IDX_PCH3II] + + k[6597]*y_cur[IDX_PCH4II]; + data[jistart + 3567] = 0.0 + k[1198]*y_cur[IDX_PCH2II] + k[1200]*y_cur[IDX_PCH3II] + + k[1203]*y_cur[IDX_PCH4II]; + data[jistart + 3568] = 0.0 + k[7126] + k[7308] + k[7490]; + data[jistart + 3569] = 0.0 + k[8609]*y_cur[IDX_GHI]; + data[jistart + 3570] = 0.0 + k[3566]*y_cur[IDX_NH3I]; + data[jistart + 3571] = 0.0 + k[1003]*y_cur[IDX_eM] + k[2284]*y_cur[IDX_COI] + + k[2543]*y_cur[IDX_H2OI] + k[6458]*y_cur[IDX_GRAINM]; + data[jistart + 3572] = 0.0 + k[5132]*y_cur[IDX_H2I]; + data[jistart + 3573] = 0.0 - k[393]*y_cur[IDX_HII] - k[1411]*y_cur[IDX_CII] - + k[2083]*y_cur[IDX_CH3II] - k[2231]*y_cur[IDX_CH5II] - + k[2704]*y_cur[IDX_H3II] - k[3259]*y_cur[IDX_HeII] - + k[5211]*y_cur[IDX_HI] - k[5864] - k[6194] - k[6195] - k[6944]; + data[jistart + 3574] = 0.0 - k[2231]*y_cur[IDX_HClI]; + data[jistart + 3575] = 0.0 + k[3566]*y_cur[IDX_CClII]; + data[jistart + 3576] = 0.0 - k[2083]*y_cur[IDX_HClI]; + data[jistart + 3577] = 0.0 + k[8609]*y_cur[IDX_GClI]; + data[jistart + 3578] = 0.0 - k[3259]*y_cur[IDX_HClI]; + data[jistart + 3579] = 0.0 - k[1411]*y_cur[IDX_HClI]; + data[jistart + 3580] = 0.0 + k[2543]*y_cur[IDX_H2ClII]; + data[jistart + 3581] = 0.0 - k[393]*y_cur[IDX_HClI]; + data[jistart + 3582] = 0.0 - k[2704]*y_cur[IDX_HClI]; + data[jistart + 3583] = 0.0 + k[2284]*y_cur[IDX_H2ClII]; + data[jistart + 3584] = 0.0 + k[6458]*y_cur[IDX_H2ClII]; + data[jistart + 3585] = 0.0 + k[5132]*y_cur[IDX_ClI]; + data[jistart + 3586] = 0.0 + k[1003]*y_cur[IDX_H2ClII]; + data[jistart + 3587] = 0.0 - k[5211]*y_cur[IDX_HClI]; + data[jistart + 3588] = 0.0 + k[7150] + k[7332] + k[7514]; + data[jistart + 3589] = 0.0 + k[8624]*y_cur[IDX_GHI]; + data[jistart + 3590] = 0.0 + k[1008]*y_cur[IDX_eM] + k[6538]*y_cur[IDX_GRAINM]; + data[jistart + 3591] = 0.0 + k[1118]*y_cur[IDX_eM] + k[6549]*y_cur[IDX_GRAINM]; + data[jistart + 3592] = 0.0 + k[4886]*y_cur[IDX_OHI]; + data[jistart + 3593] = 0.0 - k[521]*y_cur[IDX_HeII] - k[2348]*y_cur[IDX_HII] - + k[2707]*y_cur[IDX_H3II] - k[2708]*y_cur[IDX_H3II] - + k[3264]*y_cur[IDX_HeII] - k[5214]*y_cur[IDX_CI] - k[5868] - k[6199] + - k[6968]; + data[jistart + 3594] = 0.0 + k[8744]*y_cur[IDX_GCOI]; + data[jistart + 3595] = 0.0 + k[8744]*y_cur[IDX_GNHI]; + data[jistart + 3596] = 0.0 + k[5006]*y_cur[IDX_NOI]; + data[jistart + 3597] = 0.0 + k[5006]*y_cur[IDX_CH2I]; + data[jistart + 3598] = 0.0 + k[4886]*y_cur[IDX_C2H5CNI]; + data[jistart + 3599] = 0.0 + k[8624]*y_cur[IDX_GOCNI]; + data[jistart + 3600] = 0.0 - k[521]*y_cur[IDX_HNCOI] - k[3264]*y_cur[IDX_HNCOI]; + data[jistart + 3601] = 0.0 - k[2348]*y_cur[IDX_HNCOI]; + data[jistart + 3602] = 0.0 - k[5214]*y_cur[IDX_HNCOI]; + data[jistart + 3603] = 0.0 - k[2707]*y_cur[IDX_HNCOI] - k[2708]*y_cur[IDX_HNCOI]; + data[jistart + 3604] = 0.0 + k[6538]*y_cur[IDX_H2NCOII] + k[6549]*y_cur[IDX_HNCOHII]; + data[jistart + 3605] = 0.0 + k[1008]*y_cur[IDX_H2NCOII] + k[1118]*y_cur[IDX_HNCOHII]; + data[jistart + 3606] = 0.0 + k[7221] + k[7403] + k[7585]; + data[jistart + 3607] = 0.0 + k[833]*y_cur[IDX_eM] + k[6809]*y_cur[IDX_GRAINM]; + data[jistart + 3608] = 0.0 + k[1190]*y_cur[IDX_eM] + k[6772]*y_cur[IDX_GRAINM]; + data[jistart + 3609] = 0.0 + k[1193]*y_cur[IDX_eM] + k[6811]*y_cur[IDX_GRAINM]; + data[jistart + 3610] = 0.0 + k[5364]*y_cur[IDX_OI] + k[5734]; + data[jistart + 3611] = 0.0 - k[1315]*y_cur[IDX_CII] - k[2606]*y_cur[IDX_H3II] - + k[2776]*y_cur[IDX_H3OII] - k[2911]*y_cur[IDX_HCOII] - + k[3101]*y_cur[IDX_HeII] - k[3102]*y_cur[IDX_HeII] - + k[5360]*y_cur[IDX_OI] - k[5724] - k[6008] - k[7039]; + data[jistart + 3612] = 0.0 - k[2776]*y_cur[IDX_C3PI]; + data[jistart + 3613] = 0.0 - k[5360]*y_cur[IDX_C3PI] + k[5364]*y_cur[IDX_C4PI]; + data[jistart + 3614] = 0.0 - k[3101]*y_cur[IDX_C3PI] - k[3102]*y_cur[IDX_C3PI]; + data[jistart + 3615] = 0.0 - k[1315]*y_cur[IDX_C3PI]; + data[jistart + 3616] = 0.0 - k[2911]*y_cur[IDX_C3PI]; + data[jistart + 3617] = 0.0 - k[2606]*y_cur[IDX_C3PI]; + data[jistart + 3618] = 0.0 + k[6772]*y_cur[IDX_PC3HII] + k[6809]*y_cur[IDX_C4PII] + + k[6811]*y_cur[IDX_PC4HII]; + data[jistart + 3619] = 0.0 + k[833]*y_cur[IDX_C4PII] + k[1190]*y_cur[IDX_PC3HII] + + k[1193]*y_cur[IDX_PC4HII]; + data[jistart + 3620] = 0.0 + k[7248] + k[7430] + k[7612]; + data[jistart + 3621] = 0.0 + k[991]*y_cur[IDX_eM] + k[6880]*y_cur[IDX_GRAINM]; + data[jistart + 3622] = 0.0 + k[1032]*y_cur[IDX_eM] + k[6882]*y_cur[IDX_GRAINM]; + data[jistart + 3623] = 0.0 + k[8711]*y_cur[IDX_GNI]; + data[jistart + 3624] = 0.0 + k[1087]*y_cur[IDX_eM] + k[6877]*y_cur[IDX_GRAINM]; + data[jistart + 3625] = 0.0 - k[2631]*y_cur[IDX_H3II] - k[2936]*y_cur[IDX_HCOII] - + k[3156]*y_cur[IDX_HeII] - k[4943]*y_cur[IDX_CI] - + k[5252]*y_cur[IDX_NI] - k[5377]*y_cur[IDX_OI] - k[5771] - k[6067] - + k[6068] - k[7066]; + data[jistart + 3626] = 0.0 + k[8711]*y_cur[IDX_GC9I]; + data[jistart + 3627] = 0.0 + k[120]*y_cur[IDX_NI]; + data[jistart + 3628] = 0.0 + k[5251]*y_cur[IDX_NI]; + data[jistart + 3629] = 0.0 + k[120]*y_cur[IDX_C9M] + k[5251]*y_cur[IDX_C9HI] - + k[5252]*y_cur[IDX_C9NI]; + data[jistart + 3630] = 0.0 - k[5377]*y_cur[IDX_C9NI]; + data[jistart + 3631] = 0.0 - k[3156]*y_cur[IDX_C9NI]; + data[jistart + 3632] = 0.0 - k[4943]*y_cur[IDX_C9NI]; + data[jistart + 3633] = 0.0 - k[2936]*y_cur[IDX_C9NI]; + data[jistart + 3634] = 0.0 - k[2631]*y_cur[IDX_C9NI]; + data[jistart + 3635] = 0.0 + k[6877]*y_cur[IDX_HC9NII] + k[6880]*y_cur[IDX_H2C9NII] + + k[6882]*y_cur[IDX_H3C9NII]; + data[jistart + 3636] = 0.0 + k[991]*y_cur[IDX_H2C9NII] + k[1032]*y_cur[IDX_H3C9NII] + + k[1087]*y_cur[IDX_HC9NII]; + data[jistart + 3637] = 0.0 + k[7216] + k[7398] + k[7580]; + data[jistart + 3638] = 0.0 - k[363]*y_cur[IDX_HII] - k[1356]*y_cur[IDX_CII] - + k[1357]*y_cur[IDX_CII] - k[1358]*y_cur[IDX_CII] - + k[2321]*y_cur[IDX_HII] - k[2643]*y_cur[IDX_H3II] - + k[2944]*y_cur[IDX_HCOII] - k[3178]*y_cur[IDX_HeII] - + k[3179]*y_cur[IDX_HeII] - k[4950]*y_cur[IDX_CI] - k[5797] - k[6101] + - k[7034]; + data[jistart + 3639] = 0.0 + k[846]*y_cur[IDX_eM] + k[6754]*y_cur[IDX_GRAINM]; + data[jistart + 3640] = 0.0 + k[4894]*y_cur[IDX_C2HI] + k[4895]*y_cur[IDX_C2HI]; + data[jistart + 3641] = 0.0 + k[4870]*y_cur[IDX_C2I]; + data[jistart + 3642] = 0.0 + k[4896]*y_cur[IDX_C2HI] + k[4897]*y_cur[IDX_C2HI]; + data[jistart + 3643] = 0.0 + k[4894]*y_cur[IDX_CH2CCH2I] + k[4895]*y_cur[IDX_CH2CCH2I] + + k[4896]*y_cur[IDX_CH3CCHI] + k[4897]*y_cur[IDX_CH3CCHI]; + data[jistart + 3644] = 0.0 + k[4870]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 3645] = 0.0 - k[3178]*y_cur[IDX_CH3C4HI] - k[3179]*y_cur[IDX_CH3C4HI]; + data[jistart + 3646] = 0.0 - k[1356]*y_cur[IDX_CH3C4HI] - k[1357]*y_cur[IDX_CH3C4HI] - + k[1358]*y_cur[IDX_CH3C4HI]; + data[jistart + 3647] = 0.0 - k[363]*y_cur[IDX_CH3C4HI] - k[2321]*y_cur[IDX_CH3C4HI]; + data[jistart + 3648] = 0.0 - k[4950]*y_cur[IDX_CH3C4HI]; + data[jistart + 3649] = 0.0 - k[2944]*y_cur[IDX_CH3C4HI]; + data[jistart + 3650] = 0.0 - k[2643]*y_cur[IDX_CH3C4HI]; + data[jistart + 3651] = 0.0 + k[6754]*y_cur[IDX_C5H5II]; + data[jistart + 3652] = 0.0 + k[846]*y_cur[IDX_C5H5II]; + data[jistart + 3653] = 0.0 + k[7209] + k[7391] + k[7566]; + data[jistart + 3654] = 0.0 + k[1296]*y_cur[IDX_eM] + k[6737]*y_cur[IDX_GRAINM]; + data[jistart + 3655] = 0.0 + k[8755]*y_cur[IDX_GCH3I]; + data[jistart + 3656] = 0.0 + k[8742]*y_cur[IDX_GOHI]; + data[jistart + 3657] = 0.0 - k[5667]*y_cur[IDX_CII] - k[5668]*y_cur[IDX_H3II] - + k[5669]*y_cur[IDX_H3OII] - k[5670]*y_cur[IDX_HCOII] - + k[5671]*y_cur[IDX_HeII] - k[5672]*y_cur[IDX_HeII] - + k[5673]*y_cur[IDX_HeII] - k[5674]*y_cur[IDX_HeII] - k[5946] - + k[5947] - k[6296] - k[6297] - k[7027]; + data[jistart + 3658] = 0.0 + k[8742]*y_cur[IDX_GCH3COI]; + data[jistart + 3659] = 0.0 + k[8755]*y_cur[IDX_GCOOHI]; + data[jistart + 3660] = 0.0 - k[5669]*y_cur[IDX_CH3COOHI]; + data[jistart + 3661] = 0.0 - k[5671]*y_cur[IDX_CH3COOHI] - k[5672]*y_cur[IDX_CH3COOHI] - + k[5673]*y_cur[IDX_CH3COOHI] - k[5674]*y_cur[IDX_CH3COOHI]; + data[jistart + 3662] = 0.0 - k[5667]*y_cur[IDX_CH3COOHI]; + data[jistart + 3663] = 0.0 - k[5670]*y_cur[IDX_CH3COOHI]; + data[jistart + 3664] = 0.0 - k[5668]*y_cur[IDX_CH3COOHI]; + data[jistart + 3665] = 0.0 + k[6737]*y_cur[IDX_CH3COOH2II]; + data[jistart + 3666] = 0.0 + k[1296]*y_cur[IDX_CH3COOH2II]; + data[jistart + 3667] = 0.0 + k[7165] + k[7347] + k[7529]; + data[jistart + 3668] = 0.0 + k[958]*y_cur[IDX_eM] + k[6604]*y_cur[IDX_GRAINM]; + data[jistart + 3669] = 0.0 + k[8752]*y_cur[IDX_GCH3I]; + data[jistart + 3670] = 0.0 - k[169]*y_cur[IDX_CII] - k[369]*y_cur[IDX_HII] - + k[671]*y_cur[IDX_O2II] - k[714]*y_cur[IDX_SOII] - + k[2072]*y_cur[IDX_CH3II] - k[2666]*y_cur[IDX_H3II] - + k[2794]*y_cur[IDX_H3OII] - k[2953]*y_cur[IDX_HCOII] - + k[3195]*y_cur[IDX_HeII] - k[3664]*y_cur[IDX_O2II] - k[5814] - + k[5815] - k[6118] - k[6119] - k[6983]; + data[jistart + 3671] = 0.0 + k[8752]*y_cur[IDX_GCH3OI]; + data[jistart + 3672] = 0.0 - k[671]*y_cur[IDX_CH3OCH3I] - k[3664]*y_cur[IDX_CH3OCH3I]; + data[jistart + 3673] = 0.0 - k[714]*y_cur[IDX_CH3OCH3I]; + data[jistart + 3674] = 0.0 - k[2072]*y_cur[IDX_CH3OCH3I]; + data[jistart + 3675] = 0.0 - k[2794]*y_cur[IDX_CH3OCH3I]; + data[jistart + 3676] = 0.0 - k[3195]*y_cur[IDX_CH3OCH3I]; + data[jistart + 3677] = 0.0 - k[169]*y_cur[IDX_CH3OCH3I]; + data[jistart + 3678] = 0.0 - k[369]*y_cur[IDX_CH3OCH3I]; + data[jistart + 3679] = 0.0 - k[2953]*y_cur[IDX_CH3OCH3I]; + data[jistart + 3680] = 0.0 - k[2666]*y_cur[IDX_CH3OCH3I]; + data[jistart + 3681] = 0.0 + k[6604]*y_cur[IDX_CH3OCH4II]; + data[jistart + 3682] = 0.0 + k[958]*y_cur[IDX_CH3OCH4II]; + data[jistart + 3683] = 0.0 + k[7797]; + data[jistart + 3684] = 0.0 + k[7837] + k[8162]; + data[jistart + 3685] = 0.0 + k[7791] + k[7791] + k[7793] + k[7793] + k[8115] + k[8115] + + k[8117] + k[8117]; + data[jistart + 3686] = 0.0 + k[7798] + k[8123]; + data[jistart + 3687] = 0.0 + k[7853]; + data[jistart + 3688] = 0.0 + k[7724] + k[8032]; + data[jistart + 3689] = 0.0 + k[7732] + k[8041]; + data[jistart + 3690] = 0.0 + k[7671] + k[7958]; + data[jistart + 3691] = 0.0 + k[7645] + k[7647] + k[7932] + k[7934]; + data[jistart + 3692] = 0.0 + k[7788] + k[8112]; + data[jistart + 3693] = 0.0 + k[7833] + k[8157]; + data[jistart + 3694] = 0.0 + k[7851] + k[8182]; + data[jistart + 3695] = 0.0 + k[7657] + k[7658] + k[7659] + k[7660] + k[7944] + k[7945] + + k[7946] + k[7947]; + data[jistart + 3696] = 0.0 - k[8575]*y_cur[IDX_GC2HI]; + data[jistart + 3697] = 0.0 - k[7090] - k[7272] - k[7454] - k[7642] - k[7643] - k[7644] - + k[7929] - k[7930] - k[7931] - k[8286]*y_cur[IDX_GHI] - + k[8375]*y_cur[IDX_GH2I] - k[8411]*y_cur[IDX_GCI] - + k[8487]*y_cur[IDX_GCHI] - k[8575]*y_cur[IDX_GCH4I] - + k[8587]*y_cur[IDX_GHI] - k[8663]*y_cur[IDX_GCI] - + k[8720]*y_cur[IDX_GCHI]; + data[jistart + 3698] = 0.0 + k[8285]*y_cur[IDX_GHI] + k[8374]*y_cur[IDX_GH2I]; + data[jistart + 3699] = 0.0 + k[8395]*y_cur[IDX_GCI] - k[8487]*y_cur[IDX_GC2HI] - + k[8720]*y_cur[IDX_GC2HI]; + data[jistart + 3700] = 0.0 + k[8374]*y_cur[IDX_GC2I] - k[8375]*y_cur[IDX_GC2HI]; + data[jistart + 3701] = 0.0 + k[8395]*y_cur[IDX_GCHI] - k[8411]*y_cur[IDX_GC2HI] - + k[8663]*y_cur[IDX_GC2HI]; + data[jistart + 3702] = 0.0 + k[6908]; + data[jistart + 3703] = 0.0 + k[8285]*y_cur[IDX_GC2I] - k[8286]*y_cur[IDX_GC2HI] - + k[8587]*y_cur[IDX_GC2HI]; + data[jistart + 3704] = 0.0 + k[7739] + k[8050]; + data[jistart + 3705] = 0.0 + k[7634] + k[7636] + k[7915] + k[7917]; + data[jistart + 3706] = 0.0 + k[8527]*y_cur[IDX_GNHI] - k[8538]*y_cur[IDX_GNH2I]; + data[jistart + 3707] = 0.0 - k[8536]*y_cur[IDX_GNH2I]; + data[jistart + 3708] = 0.0 - k[8537]*y_cur[IDX_GNH2I]; + data[jistart + 3709] = 0.0 + k[8521]*y_cur[IDX_GNHI] - k[8535]*y_cur[IDX_GNH2I]; + data[jistart + 3710] = 0.0 + k[8522]*y_cur[IDX_GNHI] - k[8534]*y_cur[IDX_GNH2I]; + data[jistart + 3711] = 0.0 - k[8530]*y_cur[IDX_GNH2I]; + data[jistart + 3712] = 0.0 - k[7079] - k[7261] - k[7443] - k[7630] - k[7631] - k[7632] - + k[7907] - k[7908] - k[7909] - k[8281]*y_cur[IDX_GHI] - + k[8372]*y_cur[IDX_GH2I] - k[8404]*y_cur[IDX_GCI] - + k[8440]*y_cur[IDX_GOI] - k[8483]*y_cur[IDX_GCHI] - + k[8530]*y_cur[IDX_GNOI] - k[8534]*y_cur[IDX_GH2COI] - + k[8535]*y_cur[IDX_GCH3CHOI] - k[8536]*y_cur[IDX_GHCOOHI] - + k[8537]*y_cur[IDX_GHCOOCH3I] - k[8538]*y_cur[IDX_GCH2OHCHOI] - + k[8582]*y_cur[IDX_GHI] - k[8717]*y_cur[IDX_GCHI]; + data[jistart + 3713] = 0.0 + k[8280]*y_cur[IDX_GHI] + k[8521]*y_cur[IDX_GCH3CHOI] + + k[8522]*y_cur[IDX_GH2COI] + k[8527]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 3714] = 0.0 - k[8440]*y_cur[IDX_GNH2I]; + data[jistart + 3715] = 0.0 - k[8483]*y_cur[IDX_GNH2I] - k[8717]*y_cur[IDX_GNH2I]; + data[jistart + 3716] = 0.0 + k[6897]; + data[jistart + 3717] = 0.0 - k[8372]*y_cur[IDX_GNH2I]; + data[jistart + 3718] = 0.0 - k[8404]*y_cur[IDX_GNH2I]; + data[jistart + 3719] = 0.0 + k[8280]*y_cur[IDX_GNHI] - k[8281]*y_cur[IDX_GNH2I] - + k[8582]*y_cur[IDX_GNH2I]; + data[jistart + 3720] = 0.0 + k[7171] + k[7353] + k[7535]; + data[jistart + 3721] = 0.0 + k[8627]*y_cur[IDX_GHI]; + data[jistart + 3722] = 0.0 + k[1040]*y_cur[IDX_eM] + k[6602]*y_cur[IDX_GRAINM]; + data[jistart + 3723] = 0.0 + k[5617]*y_cur[IDX_eM]; + data[jistart + 3724] = 0.0 - k[377]*y_cur[IDX_HII] - k[1392]*y_cur[IDX_CII] - + k[2683]*y_cur[IDX_H3II] - k[2959]*y_cur[IDX_HCOII] - + k[3222]*y_cur[IDX_HeII] - k[3223]*y_cur[IDX_HeII] - + k[3224]*y_cur[IDX_HeII] - k[5837] - k[6156] - k[6989]; + data[jistart + 3725] = 0.0 + k[3841]*y_cur[IDX_SI]; + data[jistart + 3726] = 0.0 + k[3851]*y_cur[IDX_SOII]; + data[jistart + 3727] = 0.0 + k[3851]*y_cur[IDX_CH2CCH2I]; + data[jistart + 3728] = 0.0 + k[3841]*y_cur[IDX_SiCH2II] + k[5048]*y_cur[IDX_CH3I]; + data[jistart + 3729] = 0.0 + k[8627]*y_cur[IDX_GHCSI]; + data[jistart + 3730] = 0.0 + k[5048]*y_cur[IDX_SI]; + data[jistart + 3731] = 0.0 - k[3222]*y_cur[IDX_H2CSI] - k[3223]*y_cur[IDX_H2CSI] - + k[3224]*y_cur[IDX_H2CSI]; + data[jistart + 3732] = 0.0 - k[1392]*y_cur[IDX_H2CSI]; + data[jistart + 3733] = 0.0 - k[377]*y_cur[IDX_H2CSI]; + data[jistart + 3734] = 0.0 - k[2959]*y_cur[IDX_H2CSI]; + data[jistart + 3735] = 0.0 - k[2683]*y_cur[IDX_H2CSI]; + data[jistart + 3736] = 0.0 + k[6602]*y_cur[IDX_H3CSII]; + data[jistart + 3737] = 0.0 + k[1040]*y_cur[IDX_H3CSII] + k[5617]*y_cur[IDX_H2CSII]; + data[jistart + 3738] = 0.0 + k[410]*y_cur[IDX_HII] + k[6247]; + data[jistart + 3739] = 0.0 - k[1206]*y_cur[IDX_eM] - k[1207]*y_cur[IDX_eM] - + k[1208]*y_cur[IDX_eM] - k[1571]*y_cur[IDX_C2H2I] - + k[1713]*y_cur[IDX_C2H4I] - k[1714]*y_cur[IDX_C2H4I] - + k[2129]*y_cur[IDX_CH3OHI] - k[2130]*y_cur[IDX_CH3OHI] - + k[2214]*y_cur[IDX_CH4I] - k[2567]*y_cur[IDX_H2OI] - + k[2568]*y_cur[IDX_H2OI] - k[3599]*y_cur[IDX_NH3I] - + k[3600]*y_cur[IDX_NH3I] - k[3673]*y_cur[IDX_O2I] - + k[6434]*y_cur[IDX_GRAINM] - k[6435]*y_cur[IDX_GRAINM] - + k[6436]*y_cur[IDX_GRAINM]; + data[jistart + 3740] = 0.0 + k[2736]*y_cur[IDX_H3II] + k[2985]*y_cur[IDX_HCOII]; + data[jistart + 3741] = 0.0 + k[5559]*y_cur[IDX_H2I]; + data[jistart + 3742] = 0.0 - k[2129]*y_cur[IDX_PH2II] - k[2130]*y_cur[IDX_PH2II]; + data[jistart + 3743] = 0.0 - k[1713]*y_cur[IDX_PH2II] - k[1714]*y_cur[IDX_PH2II]; + data[jistart + 3744] = 0.0 - k[3673]*y_cur[IDX_PH2II]; + data[jistart + 3745] = 0.0 - k[2214]*y_cur[IDX_PH2II]; + data[jistart + 3746] = 0.0 - k[3599]*y_cur[IDX_PH2II] - k[3600]*y_cur[IDX_PH2II]; + data[jistart + 3747] = 0.0 - k[1571]*y_cur[IDX_PH2II]; + data[jistart + 3748] = 0.0 - k[2567]*y_cur[IDX_PH2II] - k[2568]*y_cur[IDX_PH2II]; + data[jistart + 3749] = 0.0 + k[410]*y_cur[IDX_PH2I]; + data[jistart + 3750] = 0.0 + k[2985]*y_cur[IDX_PHI]; + data[jistart + 3751] = 0.0 + k[2736]*y_cur[IDX_PHI]; + data[jistart + 3752] = 0.0 - k[6434]*y_cur[IDX_PH2II] - k[6435]*y_cur[IDX_PH2II] - + k[6436]*y_cur[IDX_PH2II]; + data[jistart + 3753] = 0.0 + k[5559]*y_cur[IDX_PII]; + data[jistart + 3754] = 0.0 - k[1206]*y_cur[IDX_PH2II] - k[1207]*y_cur[IDX_PH2II] - + k[1208]*y_cur[IDX_PH2II]; + data[jistart + 3755] = 0.0 + k[7174] + k[7356] + k[7538]; + data[jistart + 3756] = 0.0 + k[1137]*y_cur[IDX_eM] + k[2553]*y_cur[IDX_H2OI] + + k[6614]*y_cur[IDX_GRAINM]; + data[jistart + 3757] = 0.0 + k[5414]*y_cur[IDX_OI] + k[5873] + k[6204]; + data[jistart + 3758] = 0.0 + k[5435]*y_cur[IDX_OI]; + data[jistart + 3759] = 0.0 - k[192]*y_cur[IDX_CII] - k[413]*y_cur[IDX_HII] - + k[2738]*y_cur[IDX_H3II] - k[2987]*y_cur[IDX_HCOII] - + k[3301]*y_cur[IDX_HeII] - k[5287]*y_cur[IDX_NI] - + k[5288]*y_cur[IDX_NI] - k[5910] - k[6251] - k[6992]; + data[jistart + 3760] = 0.0 + k[5436]*y_cur[IDX_OI]; + data[jistart + 3761] = 0.0 + k[5484]*y_cur[IDX_O2I]; + data[jistart + 3762] = 0.0 + k[5484]*y_cur[IDX_PI]; + data[jistart + 3763] = 0.0 - k[5287]*y_cur[IDX_POI] - k[5288]*y_cur[IDX_POI]; + data[jistart + 3764] = 0.0 + k[5414]*y_cur[IDX_HPOI] + k[5435]*y_cur[IDX_PH2I] + + k[5436]*y_cur[IDX_PHI]; + data[jistart + 3765] = 0.0 - k[3301]*y_cur[IDX_POI]; + data[jistart + 3766] = 0.0 - k[192]*y_cur[IDX_POI]; + data[jistart + 3767] = 0.0 + k[2553]*y_cur[IDX_HPOII]; + data[jistart + 3768] = 0.0 - k[413]*y_cur[IDX_POI]; + data[jistart + 3769] = 0.0 - k[2987]*y_cur[IDX_POI]; + data[jistart + 3770] = 0.0 - k[2738]*y_cur[IDX_POI]; + data[jistart + 3771] = 0.0 + k[6614]*y_cur[IDX_HPOII]; + data[jistart + 3772] = 0.0 + k[1137]*y_cur[IDX_HPOII]; + data[jistart + 3773] = 0.0 + k[7215] + k[7397] + k[7579]; + data[jistart + 3774] = 0.0 + k[1140]*y_cur[IDX_eM] + k[2579]*y_cur[IDX_H2SI] + + k[6759]*y_cur[IDX_GRAINM]; + data[jistart + 3775] = 0.0 - k[414]*y_cur[IDX_HII] - k[2739]*y_cur[IDX_H3II] - + k[2817]*y_cur[IDX_H3OII] - k[2988]*y_cur[IDX_HCOII] - + k[3302]*y_cur[IDX_HeII] - k[4984]*y_cur[IDX_CI] - + k[5199]*y_cur[IDX_HI] - k[5289]*y_cur[IDX_NI] - + k[5437]*y_cur[IDX_OI] - k[5912] - k[6253] - k[6254] - k[7033]; + data[jistart + 3776] = 0.0 + k[630]*y_cur[IDX_NOI]; + data[jistart + 3777] = 0.0 + k[5488]*y_cur[IDX_SI]; + data[jistart + 3778] = 0.0 + k[5490]*y_cur[IDX_SI]; + data[jistart + 3779] = 0.0 + k[2579]*y_cur[IDX_HS2II]; + data[jistart + 3780] = 0.0 + k[630]*y_cur[IDX_S2II]; + data[jistart + 3781] = 0.0 + k[5488]*y_cur[IDX_HSI] + k[5490]*y_cur[IDX_SOI]; + data[jistart + 3782] = 0.0 - k[5289]*y_cur[IDX_S2I]; + data[jistart + 3783] = 0.0 - k[2817]*y_cur[IDX_S2I]; + data[jistart + 3784] = 0.0 - k[5437]*y_cur[IDX_S2I]; + data[jistart + 3785] = 0.0 - k[3302]*y_cur[IDX_S2I]; + data[jistart + 3786] = 0.0 - k[414]*y_cur[IDX_S2I]; + data[jistart + 3787] = 0.0 - k[4984]*y_cur[IDX_S2I]; + data[jistart + 3788] = 0.0 - k[2988]*y_cur[IDX_S2I]; + data[jistart + 3789] = 0.0 - k[2739]*y_cur[IDX_S2I]; + data[jistart + 3790] = 0.0 + k[6759]*y_cur[IDX_HS2II]; + data[jistart + 3791] = 0.0 + k[1140]*y_cur[IDX_HS2II]; + data[jistart + 3792] = 0.0 - k[5199]*y_cur[IDX_S2I]; + data[jistart + 3793] = 0.0 + k[3272]*y_cur[IDX_HeII]; + data[jistart + 3794] = 0.0 + k[414]*y_cur[IDX_HII] + k[6253]; + data[jistart + 3795] = 0.0 - k[630]*y_cur[IDX_NOI] - k[1219]*y_cur[IDX_eM] - + k[1724]*y_cur[IDX_C2H5OHI] - k[2112]*y_cur[IDX_C2H6I] - + k[2114]*y_cur[IDX_CH3CHOI] - k[2132]*y_cur[IDX_CH3OHI] - + k[6752]*y_cur[IDX_GRAINM]; + data[jistart + 3796] = 0.0 - k[1724]*y_cur[IDX_S2II]; + data[jistart + 3797] = 0.0 - k[2114]*y_cur[IDX_S2II]; + data[jistart + 3798] = 0.0 - k[2112]*y_cur[IDX_S2II]; + data[jistart + 3799] = 0.0 + k[3833]*y_cur[IDX_SII] + k[3858]*y_cur[IDX_SOII]; + data[jistart + 3800] = 0.0 - k[2132]*y_cur[IDX_S2II]; + data[jistart + 3801] = 0.0 + k[2582]*y_cur[IDX_H2SI] + k[3858]*y_cur[IDX_OCSI]; + data[jistart + 3802] = 0.0 + k[2582]*y_cur[IDX_SOII] + k[3829]*y_cur[IDX_SII]; + data[jistart + 3803] = 0.0 + k[3829]*y_cur[IDX_H2SI] + k[3833]*y_cur[IDX_OCSI]; + data[jistart + 3804] = 0.0 - k[630]*y_cur[IDX_S2II]; + data[jistart + 3805] = 0.0 + k[3272]*y_cur[IDX_HS2I]; + data[jistart + 3806] = 0.0 + k[414]*y_cur[IDX_S2I]; + data[jistart + 3807] = 0.0 - k[6752]*y_cur[IDX_S2II]; + data[jistart + 3808] = 0.0 - k[1219]*y_cur[IDX_S2II]; + data[jistart + 3809] = 0.0 - k[1223]*y_cur[IDX_eM] - k[2472]*y_cur[IDX_H2I] - + k[3469]*y_cur[IDX_NI] - k[3753]*y_cur[IDX_OI] - + k[6481]*y_cur[IDX_GRAINM]; + data[jistart + 3810] = 0.0 + k[2347]*y_cur[IDX_HII] + k[3258]*y_cur[IDX_HeII]; + data[jistart + 3811] = 0.0 + k[1446]*y_cur[IDX_CII]; + data[jistart + 3812] = 0.0 + k[1440]*y_cur[IDX_CII]; + data[jistart + 3813] = 0.0 + k[198]*y_cur[IDX_CII] + k[425]*y_cur[IDX_HII] + + k[705]*y_cur[IDX_SII]; + data[jistart + 3814] = 0.0 + k[1925]*y_cur[IDX_CI]; + data[jistart + 3815] = 0.0 + k[1445]*y_cur[IDX_CII]; + data[jistart + 3816] = 0.0 + k[1448]*y_cur[IDX_CII]; + data[jistart + 3817] = 0.0 + k[1465]*y_cur[IDX_C2I]; + data[jistart + 3818] = 0.0 + k[2266]*y_cur[IDX_CHI]; + data[jistart + 3819] = 0.0 + k[705]*y_cur[IDX_SiCI]; + data[jistart + 3820] = 0.0 + k[2266]*y_cur[IDX_SiII]; + data[jistart + 3821] = 0.0 + k[1465]*y_cur[IDX_SiOII]; + data[jistart + 3822] = 0.0 - k[3469]*y_cur[IDX_SiCII]; + data[jistart + 3823] = 0.0 - k[3753]*y_cur[IDX_SiCII]; + data[jistart + 3824] = 0.0 + k[3258]*y_cur[IDX_HCSiI]; + data[jistart + 3825] = 0.0 + k[198]*y_cur[IDX_SiCI] + k[1440]*y_cur[IDX_SiH2I] + + k[1445]*y_cur[IDX_SiHI] + k[1446]*y_cur[IDX_SiNI] + + k[1448]*y_cur[IDX_SiSI]; + data[jistart + 3826] = 0.0 + k[425]*y_cur[IDX_SiCI] + k[2347]*y_cur[IDX_HCSiI]; + data[jistart + 3827] = 0.0 + k[1925]*y_cur[IDX_SiHII]; + data[jistart + 3828] = 0.0 - k[6481]*y_cur[IDX_SiCII]; + data[jistart + 3829] = 0.0 - k[2472]*y_cur[IDX_SiCII]; + data[jistart + 3830] = 0.0 - k[1223]*y_cur[IDX_SiCII]; + data[jistart + 3831] = 0.0 + k[7222] + k[7404] + k[7586]; + data[jistart + 3832] = 0.0 + k[8673]*y_cur[IDX_GCI]; + data[jistart + 3833] = 0.0 + k[1075]*y_cur[IDX_eM] + k[6819]*y_cur[IDX_GRAINM]; + data[jistart + 3834] = 0.0 + k[1072]*y_cur[IDX_eM] + k[6779]*y_cur[IDX_GRAINM]; + data[jistart + 3835] = 0.0 - k[154]*y_cur[IDX_CII] - k[337]*y_cur[IDX_HII] - + k[1316]*y_cur[IDX_CII] - k[2607]*y_cur[IDX_H3II] - + k[2777]*y_cur[IDX_H3OII] - k[2912]*y_cur[IDX_HCOII] - + k[3103]*y_cur[IDX_HeII] - k[3104]*y_cur[IDX_HeII] - k[5725] - + k[6009] - k[7040]; + data[jistart + 3836] = 0.0 + k[836]*y_cur[IDX_eM] + k[6816]*y_cur[IDX_GRAINM]; + data[jistart + 3837] = 0.0 + k[4899]*y_cur[IDX_C2HI]; + data[jistart + 3838] = 0.0 + k[8673]*y_cur[IDX_GC2SI]; + data[jistart + 3839] = 0.0 + k[4899]*y_cur[IDX_CSI]; + data[jistart + 3840] = 0.0 - k[2777]*y_cur[IDX_C3SI]; + data[jistart + 3841] = 0.0 - k[3103]*y_cur[IDX_C3SI] - k[3104]*y_cur[IDX_C3SI]; + data[jistart + 3842] = 0.0 - k[154]*y_cur[IDX_C3SI] - k[1316]*y_cur[IDX_C3SI]; + data[jistart + 3843] = 0.0 - k[337]*y_cur[IDX_C3SI]; + data[jistart + 3844] = 0.0 - k[2912]*y_cur[IDX_C3SI]; + data[jistart + 3845] = 0.0 - k[2607]*y_cur[IDX_C3SI]; + data[jistart + 3846] = 0.0 + k[6779]*y_cur[IDX_HC3SII] + k[6816]*y_cur[IDX_C4SII] + + k[6819]*y_cur[IDX_HC4SII]; + data[jistart + 3847] = 0.0 + k[836]*y_cur[IDX_C4SII] + k[1072]*y_cur[IDX_HC3SII] + + k[1075]*y_cur[IDX_HC4SII]; + data[jistart + 3848] = 0.0 + k[2834]*y_cur[IDX_HI]; + data[jistart + 3849] = 0.0 + k[1554]*y_cur[IDX_C2H2I]; + data[jistart + 3850] = 0.0 - k[858]*y_cur[IDX_eM] - k[859]*y_cur[IDX_eM] - + k[1704]*y_cur[IDX_C2H4I] - k[3424]*y_cur[IDX_NI] - + k[5553]*y_cur[IDX_H2I] - k[6802]*y_cur[IDX_GRAINM] - + k[6803]*y_cur[IDX_GRAINM]; + data[jistart + 3851] = 0.0 + k[3131]*y_cur[IDX_HeII]; + data[jistart + 3852] = 0.0 + k[1809]*y_cur[IDX_CH2CCH2I] + k[1812]*y_cur[IDX_CH3CCHI]; + data[jistart + 3853] = 0.0 + k[2181]*y_cur[IDX_CH4I]; + data[jistart + 3854] = 0.0 + k[1775]*y_cur[IDX_C3H2II] + k[1809]*y_cur[IDX_C3H4II]; + data[jistart + 3855] = 0.0 + k[1781]*y_cur[IDX_C3H2II] + k[1812]*y_cur[IDX_C3H4II]; + data[jistart + 3856] = 0.0 + k[1806]*y_cur[IDX_CH2CCHI]; + data[jistart + 3857] = 0.0 + k[1775]*y_cur[IDX_CH2CCH2I] + k[1781]*y_cur[IDX_CH3CCHI]; + data[jistart + 3858] = 0.0 + k[1636]*y_cur[IDX_C2H3I] + k[5520]*y_cur[IDX_C2H2I]; + data[jistart + 3859] = 0.0 + k[1806]*y_cur[IDX_C3H3II] + k[2030]*y_cur[IDX_CH2CCHII]; + data[jistart + 3860] = 0.0 + k[2030]*y_cur[IDX_CH2CCHI]; + data[jistart + 3861] = 0.0 + k[1697]*y_cur[IDX_C2H4I]; + data[jistart + 3862] = 0.0 + k[1697]*y_cur[IDX_C4H2II] - k[1704]*y_cur[IDX_C6H5II]; + data[jistart + 3863] = 0.0 + k[1636]*y_cur[IDX_C4H3II]; + data[jistart + 3864] = 0.0 + k[2181]*y_cur[IDX_C5H2II]; + data[jistart + 3865] = 0.0 + k[1554]*y_cur[IDX_C4H4II] + k[5520]*y_cur[IDX_C4H3II]; + data[jistart + 3866] = 0.0 - k[3424]*y_cur[IDX_C6H5II]; + data[jistart + 3867] = 0.0 + k[3131]*y_cur[IDX_C6H6I]; + data[jistart + 3868] = 0.0 - k[6802]*y_cur[IDX_C6H5II] - k[6803]*y_cur[IDX_C6H5II]; + data[jistart + 3869] = 0.0 - k[5553]*y_cur[IDX_C6H5II]; + data[jistart + 3870] = 0.0 - k[858]*y_cur[IDX_C6H5II] - k[859]*y_cur[IDX_C6H5II]; + data[jistart + 3871] = 0.0 + k[2834]*y_cur[IDX_C6H6II]; + data[jistart + 3872] = 0.0 + k[8593]*y_cur[IDX_GHI]; + data[jistart + 3873] = 0.0 + k[7103] + k[7285] + k[7467]; + data[jistart + 3874] = 0.0 + k[921]*y_cur[IDX_eM] + k[6408]*y_cur[IDX_GRAINM]; + data[jistart + 3875] = 0.0 + k[8717]*y_cur[IDX_GCHI]; + data[jistart + 3876] = 0.0 - k[2317]*y_cur[IDX_HII] - k[2318]*y_cur[IDX_HII] - + k[2787]*y_cur[IDX_H3OII] - k[2941]*y_cur[IDX_HCOII] - + k[3173]*y_cur[IDX_HeII] - k[5791] - k[6093] - k[6921]; + data[jistart + 3877] = 0.0 + k[8743]*y_cur[IDX_GCH2I]; + data[jistart + 3878] = 0.0 + k[8743]*y_cur[IDX_GNHI]; + data[jistart + 3879] = 0.0 + k[8701]*y_cur[IDX_GCH3I]; + data[jistart + 3880] = 0.0 + k[8701]*y_cur[IDX_GNI]; + data[jistart + 3881] = 0.0 + k[8717]*y_cur[IDX_GNH2I]; + data[jistart + 3882] = 0.0 + k[5082]*y_cur[IDX_NH3I]; + data[jistart + 3883] = 0.0 + k[5082]*y_cur[IDX_CHI]; + data[jistart + 3884] = 0.0 + k[8593]*y_cur[IDX_GH2CNI]; + data[jistart + 3885] = 0.0 - k[2787]*y_cur[IDX_CH2NHI]; + data[jistart + 3886] = 0.0 - k[3173]*y_cur[IDX_CH2NHI]; + data[jistart + 3887] = 0.0 - k[2317]*y_cur[IDX_CH2NHI] - k[2318]*y_cur[IDX_CH2NHI]; + data[jistart + 3888] = 0.0 - k[2941]*y_cur[IDX_CH2NHI]; + data[jistart + 3889] = 0.0 + k[6408]*y_cur[IDX_CH2NH2II]; + data[jistart + 3890] = 0.0 + k[921]*y_cur[IDX_CH2NH2II]; + data[jistart + 3891] = 0.0 + k[1271]*y_cur[IDX_eM] + k[6695]*y_cur[IDX_GRAINM]; + data[jistart + 3892] = 0.0 + k[5653]*y_cur[IDX_HeII] + k[5943] + k[6293]; + data[jistart + 3893] = 0.0 + k[7113] + k[7295] + k[7477]; + data[jistart + 3894] = 0.0 + k[8596]*y_cur[IDX_GHI]; + data[jistart + 3895] = 0.0 - k[5627]*y_cur[IDX_CII] - k[5628]*y_cur[IDX_H3II] - + k[5629]*y_cur[IDX_H3OII] - k[5630]*y_cur[IDX_HCOII] - + k[5631]*y_cur[IDX_HeII] - k[5632]*y_cur[IDX_HeII] - k[5936] - + k[6289] - k[6931]; + data[jistart + 3896] = 0.0 + k[8688]*y_cur[IDX_GCH3I]; + data[jistart + 3897] = 0.0 + k[8688]*y_cur[IDX_GOI]; + data[jistart + 3898] = 0.0 + k[5817] + k[6121]; + data[jistart + 3899] = 0.0 + k[8596]*y_cur[IDX_GH2COI]; + data[jistart + 3900] = 0.0 - k[5629]*y_cur[IDX_CH3OI]; + data[jistart + 3901] = 0.0 - k[5631]*y_cur[IDX_CH3OI] - k[5632]*y_cur[IDX_CH3OI] + + k[5653]*y_cur[IDX_COOCH3I]; + data[jistart + 3902] = 0.0 - k[5627]*y_cur[IDX_CH3OI]; + data[jistart + 3903] = 0.0 - k[5630]*y_cur[IDX_CH3OI]; + data[jistart + 3904] = 0.0 - k[5628]*y_cur[IDX_CH3OI]; + data[jistart + 3905] = 0.0 + k[6695]*y_cur[IDX_COOCH3II]; + data[jistart + 3906] = 0.0 + k[1271]*y_cur[IDX_COOCH3II]; + data[jistart + 3907] = 0.0 + k[8485]*y_cur[IDX_GCHI]; + data[jistart + 3908] = 0.0 + k[7890] + k[8270] + k[8368]*y_cur[IDX_GHI] + + k[8557]*y_cur[IDX_GCH3I]; + data[jistart + 3909] = 0.0 + k[7780] + k[8102] + k[8104] + k[8338]*y_cur[IDX_GHI]; + data[jistart + 3910] = 0.0 + k[8346]*y_cur[IDX_GHI]; + data[jistart + 3911] = 0.0 - k[8569]*y_cur[IDX_GHCOI] + k[8570]*y_cur[IDX_GH2COI] + + k[8571]*y_cur[IDX_GCH3CHOI] - k[8762]*y_cur[IDX_GHCOI]; + data[jistart + 3912] = 0.0 - k[8559]*y_cur[IDX_GHCOI] + k[8560]*y_cur[IDX_GH2COI] - + k[8759]*y_cur[IDX_GHCOI]; + data[jistart + 3913] = 0.0 + k[7761] + k[7763] + k[8079] + k[8081] + k[8333]*y_cur[IDX_GHI] + + k[8507]*y_cur[IDX_GOHI] + k[8548]*y_cur[IDX_GCH3I] + + k[8571]*y_cur[IDX_GCH2OHI]; + data[jistart + 3914] = 0.0 + k[7987] + k[8298]*y_cur[IDX_GHI] + k[8508]*y_cur[IDX_GOHI] + + k[8522]*y_cur[IDX_GNHI] + k[8534]*y_cur[IDX_GNH2I] + + k[8544]*y_cur[IDX_GCH3I] + k[8560]*y_cur[IDX_GCH3OI] + + k[8570]*y_cur[IDX_GCH2OHI]; + data[jistart + 3915] = 0.0 + k[8534]*y_cur[IDX_GH2COI]; + data[jistart + 3916] = 0.0 - k[7101] - k[7283] - k[7465] - k[7682] - k[7683] - k[7969] - + k[7970] - k[8295]*y_cur[IDX_GHI] - k[8434]*y_cur[IDX_GOI] - + k[8448]*y_cur[IDX_GOI] - k[8517]*y_cur[IDX_GOHI] - + k[8543]*y_cur[IDX_GCH3I] - k[8559]*y_cur[IDX_GCH3OI] - + k[8569]*y_cur[IDX_GCH2OHI] - k[8595]*y_cur[IDX_GHI] - + k[8740]*y_cur[IDX_GOHI] - k[8751]*y_cur[IDX_GCH3I] - + k[8759]*y_cur[IDX_GCH3OI] - k[8762]*y_cur[IDX_GCH2OHI]; + data[jistart + 3917] = 0.0 + k[8522]*y_cur[IDX_GH2COI]; + data[jistart + 3918] = 0.0 + k[8507]*y_cur[IDX_GCH3CHOI] + k[8508]*y_cur[IDX_GH2COI] - + k[8517]*y_cur[IDX_GHCOI] - k[8740]*y_cur[IDX_GHCOI]; + data[jistart + 3919] = 0.0 + k[8294]*y_cur[IDX_GHI]; + data[jistart + 3920] = 0.0 - k[8434]*y_cur[IDX_GHCOI] + k[8437]*y_cur[IDX_GCHI] - + k[8448]*y_cur[IDX_GHCOI]; + data[jistart + 3921] = 0.0 - k[8543]*y_cur[IDX_GHCOI] + k[8544]*y_cur[IDX_GH2COI] + + k[8548]*y_cur[IDX_GCH3CHOI] + k[8557]*y_cur[IDX_GCH2OHCHOI] - + k[8751]*y_cur[IDX_GHCOI]; + data[jistart + 3922] = 0.0 + k[8437]*y_cur[IDX_GOI] + k[8485]*y_cur[IDX_GO2I]; + data[jistart + 3923] = 0.0 + k[6919]; + data[jistart + 3924] = 0.0 + k[8294]*y_cur[IDX_GCOI] - k[8295]*y_cur[IDX_GHCOI] + + k[8298]*y_cur[IDX_GH2COI] + k[8333]*y_cur[IDX_GCH3CHOI] + + k[8338]*y_cur[IDX_GHCOOHI] + k[8346]*y_cur[IDX_GHCOOCH3I] + + k[8368]*y_cur[IDX_GCH2OHCHOI] - k[8595]*y_cur[IDX_GHCOI]; + data[jistart + 3925] = 0.0 + k[7199] + k[7381] + k[7567]; + data[jistart + 3926] = 0.0 + k[1188]*y_cur[IDX_eM] + k[6690]*y_cur[IDX_GRAINM]; + data[jistart + 3927] = 0.0 + k[1185]*y_cur[IDX_eM] + k[6686]*y_cur[IDX_GRAINM]; + data[jistart + 3928] = 0.0 + k[1192]*y_cur[IDX_eM] + k[6774]*y_cur[IDX_GRAINM]; + data[jistart + 3929] = 0.0 + k[1182]*y_cur[IDX_eM] + k[6681]*y_cur[IDX_GRAINM]; + data[jistart + 3930] = 0.0 - k[382]*y_cur[IDX_HII] - k[1396]*y_cur[IDX_CII] - + k[1397]*y_cur[IDX_CII] - k[2688]*y_cur[IDX_H3II] - + k[2803]*y_cur[IDX_H3OII] - k[2963]*y_cur[IDX_HCOII] - + k[3232]*y_cur[IDX_HeII] - k[3233]*y_cur[IDX_HeII] - + k[5401]*y_cur[IDX_OI] - k[5845] - k[6170] - k[7017]; + data[jistart + 3931] = 0.0 - k[2803]*y_cur[IDX_HC2PI]; + data[jistart + 3932] = 0.0 - k[5401]*y_cur[IDX_HC2PI]; + data[jistart + 3933] = 0.0 - k[3232]*y_cur[IDX_HC2PI] - k[3233]*y_cur[IDX_HC2PI]; + data[jistart + 3934] = 0.0 - k[1396]*y_cur[IDX_HC2PI] - k[1397]*y_cur[IDX_HC2PI]; + data[jistart + 3935] = 0.0 - k[382]*y_cur[IDX_HC2PI]; + data[jistart + 3936] = 0.0 - k[2963]*y_cur[IDX_HC2PI]; + data[jistart + 3937] = 0.0 - k[2688]*y_cur[IDX_HC2PI]; + data[jistart + 3938] = 0.0 + k[6681]*y_cur[IDX_PC2H2II] + k[6686]*y_cur[IDX_PC2H3II] + + k[6690]*y_cur[IDX_PC2H4II] + k[6774]*y_cur[IDX_PC3HII]; + data[jistart + 3939] = 0.0 + k[1182]*y_cur[IDX_PC2H2II] + k[1185]*y_cur[IDX_PC2H3II] + + k[1188]*y_cur[IDX_PC2H4II] + k[1192]*y_cur[IDX_PC3HII]; + data[jistart + 3940] = 0.0 + k[7138] + k[7320] + k[7502]; + data[jistart + 3941] = 0.0 + k[1245]*y_cur[IDX_eM] + k[6516]*y_cur[IDX_GRAINM]; + data[jistart + 3942] = 0.0 - k[392]*y_cur[IDX_HII] - k[1410]*y_cur[IDX_CII] - + k[2347]*y_cur[IDX_HII] - k[2703]*y_cur[IDX_H3II] - + k[2809]*y_cur[IDX_H3OII] - k[2973]*y_cur[IDX_HCOII] - + k[3257]*y_cur[IDX_HeII] - k[3258]*y_cur[IDX_HeII] - + k[5410]*y_cur[IDX_OI] - k[5863] - k[6192] - k[6193] - k[6956]; + data[jistart + 3943] = 0.0 + k[6268]; + data[jistart + 3944] = 0.0 + k[4988]*y_cur[IDX_CI]; + data[jistart + 3945] = 0.0 + k[1242]*y_cur[IDX_eM] + k[6496]*y_cur[IDX_GRAINM]; + data[jistart + 3946] = 0.0 + k[5021]*y_cur[IDX_SiI]; + data[jistart + 3947] = 0.0 + k[5021]*y_cur[IDX_CH2I]; + data[jistart + 3948] = 0.0 - k[2809]*y_cur[IDX_HCSiI]; + data[jistart + 3949] = 0.0 - k[5410]*y_cur[IDX_HCSiI]; + data[jistart + 3950] = 0.0 - k[3257]*y_cur[IDX_HCSiI] - k[3258]*y_cur[IDX_HCSiI]; + data[jistart + 3951] = 0.0 - k[1410]*y_cur[IDX_HCSiI]; + data[jistart + 3952] = 0.0 - k[392]*y_cur[IDX_HCSiI] - k[2347]*y_cur[IDX_HCSiI]; + data[jistart + 3953] = 0.0 + k[4988]*y_cur[IDX_SiH2I]; + data[jistart + 3954] = 0.0 - k[2973]*y_cur[IDX_HCSiI]; + data[jistart + 3955] = 0.0 - k[2703]*y_cur[IDX_HCSiI]; + data[jistart + 3956] = 0.0 + k[6496]*y_cur[IDX_SiCH2II] + k[6516]*y_cur[IDX_SiCH3II]; + data[jistart + 3957] = 0.0 + k[1242]*y_cur[IDX_SiCH2II] + k[1245]*y_cur[IDX_SiCH3II]; + data[jistart + 3958] = 0.0 + k[7145] + k[7327] + k[7509]; + data[jistart + 3959] = 0.0 + k[1247]*y_cur[IDX_eM] + k[6541]*y_cur[IDX_GRAINM]; + data[jistart + 3960] = 0.0 + k[1246]*y_cur[IDX_eM] + k[2570]*y_cur[IDX_H2OI] + + k[6517]*y_cur[IDX_GRAINM]; + data[jistart + 3961] = 0.0 + k[5926] + k[6270]; + data[jistart + 3962] = 0.0 - k[199]*y_cur[IDX_CII] - k[426]*y_cur[IDX_HII] - + k[1435]*y_cur[IDX_CII] - k[1436]*y_cur[IDX_CII] - + k[2360]*y_cur[IDX_HII] - k[2751]*y_cur[IDX_H3II] - + k[2998]*y_cur[IDX_HCOII] - k[3318]*y_cur[IDX_HeII] - + k[3319]*y_cur[IDX_HeII] - k[5925] - k[6268] - k[6269] - k[6963]; + data[jistart + 3963] = 0.0 + k[4989]*y_cur[IDX_CI]; + data[jistart + 3964] = 0.0 + k[5049]*y_cur[IDX_CH3I]; + data[jistart + 3965] = 0.0 + k[5049]*y_cur[IDX_SiI]; + data[jistart + 3966] = 0.0 - k[3318]*y_cur[IDX_SiCH2I] - k[3319]*y_cur[IDX_SiCH2I]; + data[jistart + 3967] = 0.0 - k[199]*y_cur[IDX_SiCH2I] - k[1435]*y_cur[IDX_SiCH2I] - + k[1436]*y_cur[IDX_SiCH2I]; + data[jistart + 3968] = 0.0 + k[2570]*y_cur[IDX_SiCH3II]; + data[jistart + 3969] = 0.0 - k[426]*y_cur[IDX_SiCH2I] - k[2360]*y_cur[IDX_SiCH2I]; + data[jistart + 3970] = 0.0 + k[4989]*y_cur[IDX_SiH3I]; + data[jistart + 3971] = 0.0 - k[2998]*y_cur[IDX_SiCH2I]; + data[jistart + 3972] = 0.0 - k[2751]*y_cur[IDX_SiCH2I]; + data[jistart + 3973] = 0.0 + k[6517]*y_cur[IDX_SiCH3II] + k[6541]*y_cur[IDX_SiCH4II]; + data[jistart + 3974] = 0.0 + k[1246]*y_cur[IDX_SiCH3II] + k[1247]*y_cur[IDX_SiCH4II]; + data[jistart + 3975] = 0.0 + k[2399]*y_cur[IDX_H2I]; + data[jistart + 3976] = 0.0 - k[729]*y_cur[IDX_eM] - k[730]*y_cur[IDX_eM] - + k[731]*y_cur[IDX_eM] - k[1846]*y_cur[IDX_CI] - + k[2400]*y_cur[IDX_H2I] - k[3679]*y_cur[IDX_OI] - + k[3680]*y_cur[IDX_OI] - k[6871]*y_cur[IDX_GRAINM] - + k[6872]*y_cur[IDX_GRAINM] - k[6873]*y_cur[IDX_GRAINM]; + data[jistart + 3977] = 0.0 + k[1339]*y_cur[IDX_CII]; + data[jistart + 3978] = 0.0 + k[2294]*y_cur[IDX_HII]; + data[jistart + 3979] = 0.0 + k[1888]*y_cur[IDX_CI]; + data[jistart + 3980] = 0.0 + k[1887]*y_cur[IDX_CI]; + data[jistart + 3981] = 0.0 + k[147]*y_cur[IDX_CII] + k[322]*y_cur[IDX_HII] + + k[507]*y_cur[IDX_HeII] + k[5962]; + data[jistart + 3982] = 0.0 + k[2583]*y_cur[IDX_H3II] + k[2899]*y_cur[IDX_HCOII]; + data[jistart + 3983] = 0.0 + k[1505]*y_cur[IDX_C2H2II]; + data[jistart + 3984] = 0.0 + k[1505]*y_cur[IDX_C8HI]; + data[jistart + 3985] = 0.0 - k[3679]*y_cur[IDX_C10HII] - k[3680]*y_cur[IDX_C10HII]; + data[jistart + 3986] = 0.0 + k[507]*y_cur[IDX_C10HI]; + data[jistart + 3987] = 0.0 + k[147]*y_cur[IDX_C10HI] + k[1339]*y_cur[IDX_C9H2I]; + data[jistart + 3988] = 0.0 + k[322]*y_cur[IDX_C10HI] + k[2294]*y_cur[IDX_C10H2I]; + data[jistart + 3989] = 0.0 - k[1846]*y_cur[IDX_C10HII] + k[1887]*y_cur[IDX_C9H2II] + + k[1888]*y_cur[IDX_C9H3II]; + data[jistart + 3990] = 0.0 + k[2899]*y_cur[IDX_C10I]; + data[jistart + 3991] = 0.0 + k[2583]*y_cur[IDX_C10I]; + data[jistart + 3992] = 0.0 - k[6871]*y_cur[IDX_C10HII] - k[6872]*y_cur[IDX_C10HII] - + k[6873]*y_cur[IDX_C10HII]; + data[jistart + 3993] = 0.0 + k[2399]*y_cur[IDX_C10II] - k[2400]*y_cur[IDX_C10HII]; + data[jistart + 3994] = 0.0 - k[729]*y_cur[IDX_C10HII] - k[730]*y_cur[IDX_C10HII] - + k[731]*y_cur[IDX_C10HII]; + data[jistart + 3995] = 0.0 + k[2472]*y_cur[IDX_H2I]; + data[jistart + 3996] = 0.0 + k[392]*y_cur[IDX_HII] + k[6192]; + data[jistart + 3997] = 0.0 + k[2360]*y_cur[IDX_HII] + k[3318]*y_cur[IDX_HeII]; + data[jistart + 3998] = 0.0 - k[1109]*y_cur[IDX_eM] - k[1110]*y_cur[IDX_eM] - + k[2452]*y_cur[IDX_H2I] - k[6490]*y_cur[IDX_GRAINM] - + k[6491]*y_cur[IDX_GRAINM]; + data[jistart + 3999] = 0.0 + k[1439]*y_cur[IDX_CII]; + data[jistart + 4000] = 0.0 + k[1926]*y_cur[IDX_CI]; + data[jistart + 4001] = 0.0 + k[2750]*y_cur[IDX_H3II] + k[2821]*y_cur[IDX_H3OII] + + k[2997]*y_cur[IDX_HCOII] + k[3792]*y_cur[IDX_OHII]; + data[jistart + 4002] = 0.0 + k[1441]*y_cur[IDX_CII]; + data[jistart + 4003] = 0.0 + k[3792]*y_cur[IDX_SiCI]; + data[jistart + 4004] = 0.0 + k[2018]*y_cur[IDX_SiII]; + data[jistart + 4005] = 0.0 + k[2018]*y_cur[IDX_CH2I] + k[2102]*y_cur[IDX_CH3I]; + data[jistart + 4006] = 0.0 + k[2097]*y_cur[IDX_CH3II]; + data[jistart + 4007] = 0.0 + k[2097]*y_cur[IDX_SiI]; + data[jistart + 4008] = 0.0 + k[2102]*y_cur[IDX_SiII]; + data[jistart + 4009] = 0.0 + k[2821]*y_cur[IDX_SiCI]; + data[jistart + 4010] = 0.0 + k[3318]*y_cur[IDX_SiCH2I]; + data[jistart + 4011] = 0.0 + k[1439]*y_cur[IDX_SiH2I] + k[1441]*y_cur[IDX_SiH3I]; + data[jistart + 4012] = 0.0 + k[392]*y_cur[IDX_HCSiI] + k[2360]*y_cur[IDX_SiCH2I]; + data[jistart + 4013] = 0.0 + k[1926]*y_cur[IDX_SiH2II]; + data[jistart + 4014] = 0.0 + k[2997]*y_cur[IDX_SiCI]; + data[jistart + 4015] = 0.0 + k[2750]*y_cur[IDX_SiCI]; + data[jistart + 4016] = 0.0 - k[6490]*y_cur[IDX_HCSiII] - k[6491]*y_cur[IDX_HCSiII]; + data[jistart + 4017] = 0.0 - k[2452]*y_cur[IDX_HCSiII] + k[2472]*y_cur[IDX_SiCII]; + data[jistart + 4018] = 0.0 - k[1109]*y_cur[IDX_HCSiII] - k[1110]*y_cur[IDX_HCSiII]; + data[jistart + 4019] = 0.0 - k[486]*y_cur[IDX_H2SI] - k[612]*y_cur[IDX_NH3I] - + k[1177]*y_cur[IDX_eM] - k[1178]*y_cur[IDX_eM] - + k[1179]*y_cur[IDX_eM] - k[6706]*y_cur[IDX_GRAINM] - + k[6707]*y_cur[IDX_GRAINM] - k[6708]*y_cur[IDX_GRAINM]; + data[jistart + 4020] = 0.0 + k[314]*y_cur[IDX_OCSI]; + data[jistart + 4021] = 0.0 + k[3738]*y_cur[IDX_OI]; + data[jistart + 4022] = 0.0 + k[3672]*y_cur[IDX_O2I]; + data[jistart + 4023] = 0.0 + k[284]*y_cur[IDX_OCSI]; + data[jistart + 4024] = 0.0 + k[571]*y_cur[IDX_OCSI]; + data[jistart + 4025] = 0.0 + k[189]*y_cur[IDX_CII] + k[284]*y_cur[IDX_CH4II] + + k[314]*y_cur[IDX_CO2II] + k[407]*y_cur[IDX_HII] + + k[475]*y_cur[IDX_H2OII] + k[562]*y_cur[IDX_NII] + + k[571]*y_cur[IDX_N2II] + k[663]*y_cur[IDX_OII] + k[5902] + k[6240]; + data[jistart + 4026] = 0.0 + k[475]*y_cur[IDX_OCSI]; + data[jistart + 4027] = 0.0 + k[562]*y_cur[IDX_OCSI]; + data[jistart + 4028] = 0.0 + k[663]*y_cur[IDX_OCSI]; + data[jistart + 4029] = 0.0 + k[3672]*y_cur[IDX_CSII]; + data[jistart + 4030] = 0.0 - k[486]*y_cur[IDX_OCSII]; + data[jistart + 4031] = 0.0 - k[612]*y_cur[IDX_OCSII]; + data[jistart + 4032] = 0.0 + k[3738]*y_cur[IDX_HCSII]; + data[jistart + 4033] = 0.0 + k[189]*y_cur[IDX_OCSI]; + data[jistart + 4034] = 0.0 + k[407]*y_cur[IDX_OCSI]; + data[jistart + 4035] = 0.0 - k[6706]*y_cur[IDX_OCSII] - k[6707]*y_cur[IDX_OCSII] - + k[6708]*y_cur[IDX_OCSII]; + data[jistart + 4036] = 0.0 - k[1177]*y_cur[IDX_OCSII] - k[1178]*y_cur[IDX_OCSII] - + k[1179]*y_cur[IDX_OCSII]; + data[jistart + 4037] = 0.0 + k[7185] + k[7367] + k[7549]; + data[jistart + 4038] = 0.0 + k[1238]*y_cur[IDX_eM] + k[6798]*y_cur[IDX_GRAINM]; + data[jistart + 4039] = 0.0 + k[5923]; + data[jistart + 4040] = 0.0 + k[5919]; + data[jistart + 4041] = 0.0 + k[1232]*y_cur[IDX_eM] + k[6746]*y_cur[IDX_GRAINM]; + data[jistart + 4042] = 0.0 + k[1228]*y_cur[IDX_eM] + k[6660]*y_cur[IDX_GRAINM]; + data[jistart + 4043] = 0.0 + k[5920] + k[6262]; + data[jistart + 4044] = 0.0 + k[5441]*y_cur[IDX_OI] + k[5921] + k[6264]; + data[jistart + 4045] = 0.0 - k[195]*y_cur[IDX_CII] - k[419]*y_cur[IDX_HII] - + k[2744]*y_cur[IDX_H3II] - k[2819]*y_cur[IDX_H3OII] - + k[2991]*y_cur[IDX_HCOII] - k[3307]*y_cur[IDX_HeII] - + k[5440]*y_cur[IDX_OI] - k[5918] - k[6260] - k[7003]; + data[jistart + 4046] = 0.0 + k[1227]*y_cur[IDX_eM] + k[6650]*y_cur[IDX_GRAINM]; + data[jistart + 4047] = 0.0 + k[4879]*y_cur[IDX_C2H2I]; + data[jistart + 4048] = 0.0 + k[4879]*y_cur[IDX_SiI]; + data[jistart + 4049] = 0.0 - k[2819]*y_cur[IDX_SiC2I]; + data[jistart + 4050] = 0.0 - k[5440]*y_cur[IDX_SiC2I] + k[5441]*y_cur[IDX_SiC3I]; + data[jistart + 4051] = 0.0 - k[3307]*y_cur[IDX_SiC2I]; + data[jistart + 4052] = 0.0 - k[195]*y_cur[IDX_SiC2I]; + data[jistart + 4053] = 0.0 - k[419]*y_cur[IDX_SiC2I]; + data[jistart + 4054] = 0.0 - k[2991]*y_cur[IDX_SiC2I]; + data[jistart + 4055] = 0.0 - k[2744]*y_cur[IDX_SiC2I]; + data[jistart + 4056] = 0.0 + k[6650]*y_cur[IDX_SiC2HII] + k[6660]*y_cur[IDX_SiC2H2II] + + k[6746]*y_cur[IDX_SiC3II] + k[6798]*y_cur[IDX_SiC4II]; + data[jistart + 4057] = 0.0 + k[1227]*y_cur[IDX_SiC2HII] + k[1228]*y_cur[IDX_SiC2H2II] + + k[1232]*y_cur[IDX_SiC3II] + k[1238]*y_cur[IDX_SiC4II]; + data[jistart + 4058] = 0.0 - k[237]*y_cur[IDX_C2H4I] - k[276]*y_cur[IDX_H2SI] - + k[601]*y_cur[IDX_NH3I] - k[935]*y_cur[IDX_eM] - k[936]*y_cur[IDX_eM] + - k[1562]*y_cur[IDX_C2H2I] - k[1563]*y_cur[IDX_C2H2I] - k[1564]*y_cur[IDX_C2H2I] - k[2111]*y_cur[IDX_H2SI] - k[2534]*y_cur[IDX_H2OI] - k[2838]*y_cur[IDX_HI] - k[2872]*y_cur[IDX_HCNI] - k[3568]*y_cur[IDX_NH3I] - k[6410]*y_cur[IDX_GRAINM] - k[6411]*y_cur[IDX_GRAINM]; - data[jistart + 2038] = 0.0 - k[6410]*y_cur[IDX_C2H6II] - - k[6411]*y_cur[IDX_C2H6II]; - data[jistart + 2039] = 0.0 - k[2838]*y_cur[IDX_C2H6II]; - data[jistart + 2040] = 0.0 + k[441]*y_cur[IDX_C2H6I]; - data[jistart + 2041] = 0.0 - k[2534]*y_cur[IDX_C2H6II]; - data[jistart + 2042] = 0.0 + k[466]*y_cur[IDX_C2H6I]; - data[jistart + 2043] = 0.0 - k[276]*y_cur[IDX_C2H6II] - - k[2111]*y_cur[IDX_C2H6II]; - data[jistart + 2044] = 0.0 + k[2591]*y_cur[IDX_C2H5I]; - data[jistart + 2045] = 0.0 - k[2872]*y_cur[IDX_C2H6II]; - data[jistart + 2046] = 0.0 + k[2902]*y_cur[IDX_C2H5I]; - data[jistart + 2047] = 0.0 - k[601]*y_cur[IDX_C2H6II] - - k[3568]*y_cur[IDX_C2H6II]; - data[jistart + 2048] = 0.0 + k[687]*y_cur[IDX_C2H6I]; - data[jistart + 2049] = 0.0 - k[935]*y_cur[IDX_C2H6II] - - k[936]*y_cur[IDX_C2H6II]; - data[jistart + 2050] = 0.0 + k[2222]*y_cur[IDX_CH5II] + - k[2949]*y_cur[IDX_HCOII] + k[3774]*y_cur[IDX_OHII]; - data[jistart + 2051] = 0.0 - k[778]*y_cur[IDX_eM] - - k[779]*y_cur[IDX_eM] - k[2863]*y_cur[IDX_HCNI] - - k[2864]*y_cur[IDX_HCNI] - k[3560]*y_cur[IDX_NH3I] - - k[6419]*y_cur[IDX_GRAINM] - k[6420]*y_cur[IDX_GRAINM]; - data[jistart + 2052] = 0.0 + k[2222]*y_cur[IDX_C2H6I]; - data[jistart + 2053] = 0.0 - k[6419]*y_cur[IDX_C2H7II] - - k[6420]*y_cur[IDX_C2H7II]; - data[jistart + 2054] = 0.0 - k[2863]*y_cur[IDX_C2H7II] - - k[2864]*y_cur[IDX_C2H7II]; - data[jistart + 2055] = 0.0 + k[2949]*y_cur[IDX_C2H6I]; - data[jistart + 2056] = 0.0 - k[3560]*y_cur[IDX_C2H7II]; - data[jistart + 2057] = 0.0 + k[3774]*y_cur[IDX_C2H6I]; - data[jistart + 2058] = 0.0 - k[778]*y_cur[IDX_C2H7II] - - k[779]*y_cur[IDX_C2H7II]; - data[jistart + 2059] = 0.0 - k[4917]*y_cur[IDX_C2NI] + - k[4960]*y_cur[IDX_H2CNI] + k[4968]*y_cur[IDX_NCCNI] + - k[5217]*y_cur[IDX_HONCI]; - data[jistart + 2060] = 0.0 + k[3894]*y_cur[IDX_CNCII]; - data[jistart + 2061] = 0.0 + k[3929]*y_cur[IDX_CNCII]; - data[jistart + 2062] = 0.0 + k[3964]*y_cur[IDX_CNCII]; - data[jistart + 2063] = 0.0 + k[110]*y_cur[IDX_NI] + - k[3999]*y_cur[IDX_CNCII]; - data[jistart + 2064] = 0.0 + k[5228]*y_cur[IDX_NI]; - data[jistart + 2065] = 0.0 + k[111]*y_cur[IDX_NI] + - k[4034]*y_cur[IDX_CNCII]; - data[jistart + 2066] = 0.0 - k[330]*y_cur[IDX_HII] - - k[2598]*y_cur[IDX_H3II] - k[3089]*y_cur[IDX_HeII] - - k[4917]*y_cur[IDX_CI] - k[5229]*y_cur[IDX_NI] - - k[5353]*y_cur[IDX_OI] - k[5710] - k[5711] - k[5995] - k[5996] - - k[6947]; - data[jistart + 2067] = 0.0 + k[782]*y_cur[IDX_eM] + - k[6635]*y_cur[IDX_GRAINM]; - data[jistart + 2068] = 0.0 + k[784]*y_cur[IDX_eM] + - k[6472]*y_cur[IDX_GRAINM]; - data[jistart + 2069] = 0.0 + k[4069]*y_cur[IDX_CNCII]; - data[jistart + 2070] = 0.0 + k[4104]*y_cur[IDX_CNCII]; - data[jistart + 2071] = 0.0 + k[5234]*y_cur[IDX_NI] + - k[5358]*y_cur[IDX_OI]; - data[jistart + 2072] = 0.0 + k[130]*y_cur[IDX_OI] + - k[4139]*y_cur[IDX_CNCII]; - data[jistart + 2073] = 0.0 + k[4174]*y_cur[IDX_CNCII]; - data[jistart + 2074] = 0.0 + k[4209]*y_cur[IDX_CNCII]; - data[jistart + 2075] = 0.0 + k[831]*y_cur[IDX_eM] + - k[6740]*y_cur[IDX_GRAINM]; - data[jistart + 2076] = 0.0 + k[4244]*y_cur[IDX_CNCII]; - data[jistart + 2077] = 0.0 + k[4279]*y_cur[IDX_CNCII]; - data[jistart + 2078] = 0.0 + k[4314]*y_cur[IDX_CNCII]; - data[jistart + 2079] = 0.0 + k[4349]*y_cur[IDX_CNCII]; - data[jistart + 2080] = 0.0 + k[4384]*y_cur[IDX_CNCII]; - data[jistart + 2081] = 0.0 + k[4419]*y_cur[IDX_CNCII]; - data[jistart + 2082] = 0.0 + k[4454]*y_cur[IDX_CNCII]; - data[jistart + 2083] = 0.0 + k[5247]*y_cur[IDX_NI]; - data[jistart + 2084] = 0.0 + k[4489]*y_cur[IDX_CNCII]; - data[jistart + 2085] = 0.0 + k[4524]*y_cur[IDX_CNCII]; - data[jistart + 2086] = 0.0 + k[4559]*y_cur[IDX_CNCII]; - data[jistart + 2087] = 0.0 + k[4594]*y_cur[IDX_CNCII]; - data[jistart + 2088] = 0.0 + k[5252]*y_cur[IDX_NI]; - data[jistart + 2089] = 0.0 + k[4629]*y_cur[IDX_CNCII]; - data[jistart + 2090] = 0.0 + k[4664]*y_cur[IDX_CNCII]; - data[jistart + 2091] = 0.0 + k[3894]*y_cur[IDX_CM] + - k[3929]*y_cur[IDX_C10M] + k[3964]*y_cur[IDX_C10HM] + - k[3999]*y_cur[IDX_C2M] + k[4034]*y_cur[IDX_C2HM] + - k[4069]*y_cur[IDX_C3M] + k[4104]*y_cur[IDX_C3HM] + - k[4139]*y_cur[IDX_C3NM] + k[4174]*y_cur[IDX_C4M] + - k[4209]*y_cur[IDX_C4HM] + k[4244]*y_cur[IDX_C5M] + - k[4279]*y_cur[IDX_C5HM] + k[4314]*y_cur[IDX_C5NM] + - k[4349]*y_cur[IDX_C6M] + k[4384]*y_cur[IDX_C6HM] + - k[4419]*y_cur[IDX_C7M] + k[4454]*y_cur[IDX_C7HM] + - k[4489]*y_cur[IDX_C8M] + k[4524]*y_cur[IDX_C8HM] + - k[4559]*y_cur[IDX_C9M] + k[4594]*y_cur[IDX_C9HM] + - k[4629]*y_cur[IDX_CHM] + k[4664]*y_cur[IDX_CNM] + - k[4699]*y_cur[IDX_HM] + k[4735]*y_cur[IDX_OM] + - k[4770]*y_cur[IDX_O2M] + k[4805]*y_cur[IDX_OHM] + - k[4840]*y_cur[IDX_SM]; - data[jistart + 2092] = 0.0 + k[8664]*y_cur[IDX_GCNI]; - data[jistart + 2093] = 0.0 + k[8703]*y_cur[IDX_GNI]; - data[jistart + 2094] = 0.0 + k[7129] + k[7311] + k[7493]; - data[jistart + 2095] = 0.0 + k[8664]*y_cur[IDX_GCI]; - data[jistart + 2096] = 0.0 + k[8703]*y_cur[IDX_GC2I]; - data[jistart + 2097] = 0.0 + k[6472]*y_cur[IDX_C2NHII] + - k[6635]*y_cur[IDX_C2N2II] + k[6740]*y_cur[IDX_C4NII]; - data[jistart + 2098] = 0.0 - k[330]*y_cur[IDX_C2NI]; - data[jistart + 2099] = 0.0 + k[4699]*y_cur[IDX_CNCII]; - data[jistart + 2100] = 0.0 + k[4960]*y_cur[IDX_CI]; - data[jistart + 2101] = 0.0 - k[2598]*y_cur[IDX_C2NI]; - data[jistart + 2102] = 0.0 + k[5940]; - data[jistart + 2103] = 0.0 + k[5217]*y_cur[IDX_CI]; - data[jistart + 2104] = 0.0 - k[3089]*y_cur[IDX_C2NI]; - data[jistart + 2105] = 0.0 + k[110]*y_cur[IDX_C2M] + - k[111]*y_cur[IDX_C2HM] + k[5228]*y_cur[IDX_C2HI] - - k[5229]*y_cur[IDX_C2NI] + k[5234]*y_cur[IDX_C3NI] + - k[5247]*y_cur[IDX_C7NI] + k[5252]*y_cur[IDX_C9NI] + - k[5273]*y_cur[IDX_NCCNI]; - data[jistart + 2106] = 0.0 + k[4968]*y_cur[IDX_CI] + - k[5273]*y_cur[IDX_NI]; - data[jistart + 2107] = 0.0 + k[130]*y_cur[IDX_C3NM] - - k[5353]*y_cur[IDX_C2NI] + k[5358]*y_cur[IDX_C3NI]; - data[jistart + 2108] = 0.0 + k[4735]*y_cur[IDX_CNCII]; - data[jistart + 2109] = 0.0 + k[4770]*y_cur[IDX_CNCII]; - data[jistart + 2110] = 0.0 + k[4805]*y_cur[IDX_CNCII]; - data[jistart + 2111] = 0.0 + k[4840]*y_cur[IDX_CNCII]; - data[jistart + 2112] = 0.0 + k[782]*y_cur[IDX_C2N2II] + - k[784]*y_cur[IDX_C2NHII] + k[831]*y_cur[IDX_C4NII]; - data[jistart + 2113] = 0.0 + k[183]*y_cur[IDX_NCCNI] + - k[1398]*y_cur[IDX_HC3NI] + k[1413]*y_cur[IDX_HNCI]; - data[jistart + 2114] = 0.0 + k[3478]*y_cur[IDX_NHII]; - data[jistart + 2115] = 0.0 + k[3606]*y_cur[IDX_NHI]; - data[jistart + 2116] = 0.0 + k[3385]*y_cur[IDX_NI]; - data[jistart + 2117] = 0.0 - k[1540]*y_cur[IDX_C2NII] - - k[1541]*y_cur[IDX_C2NII]; - data[jistart + 2118] = 0.0 + k[3387]*y_cur[IDX_NI]; - data[jistart + 2119] = 0.0 + k[330]*y_cur[IDX_HII]; - data[jistart + 2120] = 0.0 - k[780]*y_cur[IDX_eM] - - k[781]*y_cur[IDX_eM] - k[1540]*y_cur[IDX_C2H2I] - - k[1541]*y_cur[IDX_C2H2I] - k[2525]*y_cur[IDX_H2OI] - - k[2526]*y_cur[IDX_H2OI] - k[2575]*y_cur[IDX_H2SI] - - k[3561]*y_cur[IDX_NH3I] - k[6466]*y_cur[IDX_GRAINM] - - k[6467]*y_cur[IDX_GRAINM]; - data[jistart + 2121] = 0.0 + k[1944]*y_cur[IDX_CNI] + - k[1956]*y_cur[IDX_HCNI]; - data[jistart + 2122] = 0.0 + k[1944]*y_cur[IDX_CHII]; - data[jistart + 2123] = 0.0 - k[6466]*y_cur[IDX_C2NII] - - k[6467]*y_cur[IDX_C2NII]; - data[jistart + 2124] = 0.0 + k[330]*y_cur[IDX_C2NI]; - data[jistart + 2125] = 0.0 - k[2525]*y_cur[IDX_C2NII] - - k[2526]*y_cur[IDX_C2NII]; - data[jistart + 2126] = 0.0 - k[2575]*y_cur[IDX_C2NII]; - data[jistart + 2127] = 0.0 + k[1398]*y_cur[IDX_CII] + - k[3234]*y_cur[IDX_HeII]; - data[jistart + 2128] = 0.0 + k[3460]*y_cur[IDX_NI]; - data[jistart + 2129] = 0.0 + k[1956]*y_cur[IDX_CHII]; - data[jistart + 2130] = 0.0 + k[1413]*y_cur[IDX_CII]; - data[jistart + 2131] = 0.0 + k[3234]*y_cur[IDX_HC3NI]; - data[jistart + 2132] = 0.0 + k[3385]*y_cur[IDX_C2HII] + - k[3387]*y_cur[IDX_C2H2II] + k[3460]*y_cur[IDX_HC3NII]; - data[jistart + 2133] = 0.0 + k[3351]*y_cur[IDX_NCCNI]; - data[jistart + 2134] = 0.0 + k[183]*y_cur[IDX_CII] + - k[3351]*y_cur[IDX_NII]; - data[jistart + 2135] = 0.0 + k[3606]*y_cur[IDX_C2II]; - data[jistart + 2136] = 0.0 + k[3478]*y_cur[IDX_C2I]; - data[jistart + 2137] = 0.0 - k[3561]*y_cur[IDX_C2NII]; - data[jistart + 2138] = 0.0 - k[780]*y_cur[IDX_C2NII] - - k[781]*y_cur[IDX_C2NII]; - data[jistart + 2139] = 0.0 - k[1542]*y_cur[IDX_C2N2II]; - data[jistart + 2140] = 0.0 - k[234]*y_cur[IDX_C2N2II]; - data[jistart + 2141] = 0.0 - k[234]*y_cur[IDX_C2H4I] - - k[782]*y_cur[IDX_eM] - k[783]*y_cur[IDX_eM] - - k[1542]*y_cur[IDX_C2H2I] - k[2404]*y_cur[IDX_H2I] - - k[2527]*y_cur[IDX_H2OI] - k[2830]*y_cur[IDX_HI] - - k[2865]*y_cur[IDX_HCNI] - k[2866]*y_cur[IDX_HCNI] - - k[6635]*y_cur[IDX_GRAINM] - k[6636]*y_cur[IDX_GRAINM]; - data[jistart + 2142] = 0.0 + k[2272]*y_cur[IDX_HCNI]; - data[jistart + 2143] = 0.0 - k[6635]*y_cur[IDX_C2N2II] - - k[6636]*y_cur[IDX_C2N2II]; - data[jistart + 2144] = 0.0 - k[2830]*y_cur[IDX_C2N2II]; - data[jistart + 2145] = 0.0 - k[2404]*y_cur[IDX_C2N2II]; - data[jistart + 2146] = 0.0 - k[2527]*y_cur[IDX_C2N2II]; - data[jistart + 2147] = 0.0 + k[2272]*y_cur[IDX_CNII] - - k[2865]*y_cur[IDX_C2N2II] - k[2866]*y_cur[IDX_C2N2II]; - data[jistart + 2148] = 0.0 + k[3352]*y_cur[IDX_NCCNI]; - data[jistart + 2149] = 0.0 + k[3352]*y_cur[IDX_NII] + k[6215]; - data[jistart + 2150] = 0.0 - k[782]*y_cur[IDX_C2N2II] - - k[783]*y_cur[IDX_C2N2II]; - data[jistart + 2151] = 0.0 + k[3528]*y_cur[IDX_NH2I]; - data[jistart + 2152] = 0.0 + k[3388]*y_cur[IDX_NI]; - data[jistart + 2153] = 0.0 + k[3390]*y_cur[IDX_NI]; - data[jistart + 2154] = 0.0 + k[2598]*y_cur[IDX_H3II]; - data[jistart + 2155] = 0.0 + k[2525]*y_cur[IDX_H2OI]; - data[jistart + 2156] = 0.0 - k[784]*y_cur[IDX_eM] - - k[6472]*y_cur[IDX_GRAINM]; - data[jistart + 2157] = 0.0 + k[3626]*y_cur[IDX_NOI]; - data[jistart + 2158] = 0.0 + k[1957]*y_cur[IDX_HCNI]; - data[jistart + 2159] = 0.0 - k[6472]*y_cur[IDX_C2NHII]; - data[jistart + 2160] = 0.0 + k[2525]*y_cur[IDX_C2NII]; - data[jistart + 2161] = 0.0 + k[2598]*y_cur[IDX_C2NI]; - data[jistart + 2162] = 0.0 + k[1957]*y_cur[IDX_CHII]; - data[jistart + 2163] = 0.0 + k[3031]*y_cur[IDX_HeII]; - data[jistart + 2164] = 0.0 + k[3031]*y_cur[IDX_HNC3I]; - data[jistart + 2165] = 0.0 + k[3388]*y_cur[IDX_C2H2II] + - k[3390]*y_cur[IDX_C2H3II]; - data[jistart + 2166] = 0.0 + k[3528]*y_cur[IDX_C2II]; - data[jistart + 2167] = 0.0 + k[3626]*y_cur[IDX_C3HII]; - data[jistart + 2168] = 0.0 - k[784]*y_cur[IDX_C2NHII]; - data[jistart + 2169] = 0.0 - k[4918]*y_cur[IDX_C2OI] + - k[4962]*y_cur[IDX_HCOI]; - data[jistart + 2170] = 0.0 - k[151]*y_cur[IDX_C2OI]; - data[jistart + 2171] = 0.0 + k[128]*y_cur[IDX_OI]; - data[jistart + 2172] = 0.0 + k[129]*y_cur[IDX_OI]; - data[jistart + 2173] = 0.0 - k[151]*y_cur[IDX_CII] - - k[331]*y_cur[IDX_HII] - k[2599]*y_cur[IDX_H3II] - - k[2769]*y_cur[IDX_H3OII] - k[2904]*y_cur[IDX_HCOII] - - k[3090]*y_cur[IDX_HeII] - k[4918]*y_cur[IDX_CI] - - k[5230]*y_cur[IDX_NI] - k[5354]*y_cur[IDX_OI] - - k[5485]*y_cur[IDX_SI] - k[5712] - k[5713] - k[5997] - k[5998] - - k[6954]; - data[jistart + 2174] = 0.0 + k[3669]*y_cur[IDX_O2I]; - data[jistart + 2175] = 0.0 + k[5359]*y_cur[IDX_OI]; - data[jistart + 2176] = 0.0 + k[8691]*y_cur[IDX_GOI]; - data[jistart + 2177] = 0.0 + k[7136] + k[7318] + k[7500]; - data[jistart + 2178] = 0.0 + k[8691]*y_cur[IDX_GC2I]; - data[jistart + 2179] = 0.0 + k[6487]*y_cur[IDX_HC2OII]; - data[jistart + 2180] = 0.0 - k[331]*y_cur[IDX_C2OI]; - data[jistart + 2181] = 0.0 - k[2599]*y_cur[IDX_C2OI]; - data[jistart + 2182] = 0.0 - k[2769]*y_cur[IDX_C2OI]; - data[jistart + 2183] = 0.0 + k[1056]*y_cur[IDX_eM] + - k[6487]*y_cur[IDX_GRAINM]; - data[jistart + 2184] = 0.0 + k[4962]*y_cur[IDX_CI]; - data[jistart + 2185] = 0.0 - k[2904]*y_cur[IDX_C2OI]; - data[jistart + 2186] = 0.0 - k[3090]*y_cur[IDX_C2OI]; - data[jistart + 2187] = 0.0 - k[5230]*y_cur[IDX_C2OI]; - data[jistart + 2188] = 0.0 + k[128]*y_cur[IDX_C2M] + - k[129]*y_cur[IDX_C2HM] - k[5354]*y_cur[IDX_C2OI] + - k[5359]*y_cur[IDX_C3OI]; - data[jistart + 2189] = 0.0 + k[3669]*y_cur[IDX_C3HII]; - data[jistart + 2190] = 0.0 - k[5485]*y_cur[IDX_C2OI]; - data[jistart + 2191] = 0.0 + k[1056]*y_cur[IDX_HC2OII]; - data[jistart + 2192] = 0.0 + k[151]*y_cur[IDX_C2OI]; - data[jistart + 2193] = 0.0 + k[151]*y_cur[IDX_CII] + - k[331]*y_cur[IDX_HII]; - data[jistart + 2194] = 0.0 - k[785]*y_cur[IDX_eM] - - k[6474]*y_cur[IDX_GRAINM]; - data[jistart + 2195] = 0.0 + k[2269]*y_cur[IDX_CO2I]; - data[jistart + 2196] = 0.0 + k[2269]*y_cur[IDX_CNII]; - data[jistart + 2197] = 0.0 - k[6474]*y_cur[IDX_C2OII]; - data[jistart + 2198] = 0.0 + k[331]*y_cur[IDX_C2OI]; - data[jistart + 2199] = 0.0 - k[785]*y_cur[IDX_C2OII]; - data[jistart + 2200] = 0.0 - k[152]*y_cur[IDX_C2SI] - - k[1309]*y_cur[IDX_C2SI]; - data[jistart + 2201] = 0.0 + k[3901]*y_cur[IDX_HC2SII]; - data[jistart + 2202] = 0.0 + k[3936]*y_cur[IDX_HC2SII]; - data[jistart + 2203] = 0.0 + k[3971]*y_cur[IDX_HC2SII]; - data[jistart + 2204] = 0.0 + k[4875]*y_cur[IDX_OCSI]; - data[jistart + 2205] = 0.0 + k[4006]*y_cur[IDX_HC2SII]; - data[jistart + 2206] = 0.0 + k[4905]*y_cur[IDX_OCSI] + - k[4906]*y_cur[IDX_SI]; - data[jistart + 2207] = 0.0 + k[4041]*y_cur[IDX_HC2SII]; - data[jistart + 2208] = 0.0 - k[152]*y_cur[IDX_CII] - - k[332]*y_cur[IDX_HII] - k[1309]*y_cur[IDX_CII] - - k[2600]*y_cur[IDX_H3II] - k[2770]*y_cur[IDX_H3OII] - - k[2905]*y_cur[IDX_HCOII] - k[3091]*y_cur[IDX_HeII] - - k[3092]*y_cur[IDX_HeII] - k[3093]*y_cur[IDX_HeII] - - k[3094]*y_cur[IDX_HeII] - k[5355]*y_cur[IDX_OI] - k[5714] - k[5715] - - k[5999] - k[7015]; - data[jistart + 2209] = 0.0 + k[4076]*y_cur[IDX_HC2SII]; - data[jistart + 2210] = 0.0 + k[4111]*y_cur[IDX_HC2SII]; - data[jistart + 2211] = 0.0 + k[4146]*y_cur[IDX_HC2SII]; - data[jistart + 2212] = 0.0 + k[816]*y_cur[IDX_eM] + - k[6775]*y_cur[IDX_GRAINM]; - data[jistart + 2213] = 0.0 + k[4181]*y_cur[IDX_HC2SII]; - data[jistart + 2214] = 0.0 + k[4216]*y_cur[IDX_HC2SII]; - data[jistart + 2215] = 0.0 + k[835]*y_cur[IDX_eM] + - k[6815]*y_cur[IDX_GRAINM]; - data[jistart + 2216] = 0.0 + k[4251]*y_cur[IDX_HC2SII]; - data[jistart + 2217] = 0.0 + k[4286]*y_cur[IDX_HC2SII]; - data[jistart + 2218] = 0.0 + k[4321]*y_cur[IDX_HC2SII]; - data[jistart + 2219] = 0.0 + k[4356]*y_cur[IDX_HC2SII]; - data[jistart + 2220] = 0.0 + k[4391]*y_cur[IDX_HC2SII]; - data[jistart + 2221] = 0.0 + k[4426]*y_cur[IDX_HC2SII]; - data[jistart + 2222] = 0.0 + k[4461]*y_cur[IDX_HC2SII]; - data[jistart + 2223] = 0.0 + k[4496]*y_cur[IDX_HC2SII]; - data[jistart + 2224] = 0.0 + k[4531]*y_cur[IDX_HC2SII]; - data[jistart + 2225] = 0.0 + k[4566]*y_cur[IDX_HC2SII]; - data[jistart + 2226] = 0.0 + k[4601]*y_cur[IDX_HC2SII]; - data[jistart + 2227] = 0.0 + k[4636]*y_cur[IDX_HC2SII]; - data[jistart + 2228] = 0.0 + k[4671]*y_cur[IDX_HC2SII]; - data[jistart + 2229] = 0.0 + k[7197] + k[7379] + k[7563]; - data[jistart + 2230] = 0.0 + k[6678]*y_cur[IDX_HC2SII] + - k[6775]*y_cur[IDX_C3SII] + k[6778]*y_cur[IDX_HC3SII] + - k[6815]*y_cur[IDX_C4SII] + k[6818]*y_cur[IDX_HC4SII]; - data[jistart + 2231] = 0.0 - k[332]*y_cur[IDX_C2SI]; - data[jistart + 2232] = 0.0 + k[4707]*y_cur[IDX_HC2SII]; - data[jistart + 2233] = 0.0 - k[2600]*y_cur[IDX_C2SI]; - data[jistart + 2234] = 0.0 - k[2770]*y_cur[IDX_C2SI]; - data[jistart + 2235] = 0.0 + k[1061]*y_cur[IDX_eM] + - k[3901]*y_cur[IDX_CM] + k[3936]*y_cur[IDX_C10M] + - k[3971]*y_cur[IDX_C10HM] + k[4006]*y_cur[IDX_C2M] + - k[4041]*y_cur[IDX_C2HM] + k[4076]*y_cur[IDX_C3M] + - k[4111]*y_cur[IDX_C3HM] + k[4146]*y_cur[IDX_C3NM] + - k[4181]*y_cur[IDX_C4M] + k[4216]*y_cur[IDX_C4HM] + - k[4251]*y_cur[IDX_C5M] + k[4286]*y_cur[IDX_C5HM] + - k[4321]*y_cur[IDX_C5NM] + k[4356]*y_cur[IDX_C6M] + - k[4391]*y_cur[IDX_C6HM] + k[4426]*y_cur[IDX_C7M] + - k[4461]*y_cur[IDX_C7HM] + k[4496]*y_cur[IDX_C8M] + - k[4531]*y_cur[IDX_C8HM] + k[4566]*y_cur[IDX_C9M] + - k[4601]*y_cur[IDX_C9HM] + k[4636]*y_cur[IDX_CHM] + - k[4671]*y_cur[IDX_CNM] + k[4707]*y_cur[IDX_HM] + - k[4742]*y_cur[IDX_OM] + k[4777]*y_cur[IDX_O2M] + - k[4812]*y_cur[IDX_OHM] + k[4847]*y_cur[IDX_SM] + - k[6678]*y_cur[IDX_GRAINM]; - data[jistart + 2236] = 0.0 + k[1071]*y_cur[IDX_eM] + - k[6778]*y_cur[IDX_GRAINM]; - data[jistart + 2237] = 0.0 + k[1074]*y_cur[IDX_eM] + - k[6818]*y_cur[IDX_GRAINM]; - data[jistart + 2238] = 0.0 - k[2905]*y_cur[IDX_C2SI]; - data[jistart + 2239] = 0.0 - k[3091]*y_cur[IDX_C2SI] - - k[3092]*y_cur[IDX_C2SI] - k[3093]*y_cur[IDX_C2SI] - - k[3094]*y_cur[IDX_C2SI]; - data[jistart + 2240] = 0.0 - k[5355]*y_cur[IDX_C2SI]; - data[jistart + 2241] = 0.0 + k[4742]*y_cur[IDX_HC2SII]; - data[jistart + 2242] = 0.0 + k[4777]*y_cur[IDX_HC2SII]; - data[jistart + 2243] = 0.0 + k[4875]*y_cur[IDX_C2I] + - k[4905]*y_cur[IDX_C2HI]; - data[jistart + 2244] = 0.0 + k[4812]*y_cur[IDX_HC2SII]; - data[jistart + 2245] = 0.0 + k[4906]*y_cur[IDX_C2HI]; - data[jistart + 2246] = 0.0 + k[4847]*y_cur[IDX_HC2SII]; - data[jistart + 2247] = 0.0 + k[816]*y_cur[IDX_C3SII] + - k[835]*y_cur[IDX_C4SII] + k[1061]*y_cur[IDX_HC2SII] + - k[1071]*y_cur[IDX_HC3SII] + k[1074]*y_cur[IDX_HC4SII]; - data[jistart + 2248] = 0.0 + k[152]*y_cur[IDX_C2SI]; - data[jistart + 2249] = 0.0 + k[1750]*y_cur[IDX_SII]; - data[jistart + 2250] = 0.0 + k[1527]*y_cur[IDX_SI]; - data[jistart + 2251] = 0.0 + k[152]*y_cur[IDX_CII] + - k[332]*y_cur[IDX_HII]; - data[jistart + 2252] = 0.0 - k[786]*y_cur[IDX_eM] - - k[787]*y_cur[IDX_eM] - k[2405]*y_cur[IDX_H2I] - - k[6674]*y_cur[IDX_GRAINM] - k[6675]*y_cur[IDX_GRAINM]; - data[jistart + 2253] = 0.0 - k[6674]*y_cur[IDX_C2SII] - - k[6675]*y_cur[IDX_C2SII]; - data[jistart + 2254] = 0.0 + k[332]*y_cur[IDX_C2SI]; - data[jistart + 2255] = 0.0 - k[2405]*y_cur[IDX_C2SII]; - data[jistart + 2256] = 0.0 + k[1527]*y_cur[IDX_C2H2II]; - data[jistart + 2257] = 0.0 + k[1750]*y_cur[IDX_C2HI]; - data[jistart + 2258] = 0.0 - k[786]*y_cur[IDX_C2SII] - - k[787]*y_cur[IDX_C2SII]; - data[jistart + 2259] = 0.0 + k[38]*y_cur[IDX_C2M] + - k[4911]*y_cur[IDX_C2H2I] + k[4916]*y_cur[IDX_C2HI] + - k[4921]*y_cur[IDX_C3NI] + k[4922]*y_cur[IDX_C3OI] + - k[4923]*y_cur[IDX_C4I] + k[4926]*y_cur[IDX_C5I] + - k[4926]*y_cur[IDX_C5I] + k[4931]*y_cur[IDX_C6I] + - k[4934]*y_cur[IDX_C7I] + k[5212]*y_cur[IDX_HNC3I] + - k[5521]*y_cur[IDX_C2I] - k[5522]*y_cur[IDX_C3I]; - data[jistart + 2260] = 0.0 + k[3017]*y_cur[IDX_HNC3I] + - k[4061]*y_cur[IDX_C3M] - k[5496]*y_cur[IDX_C3I]; - data[jistart + 2261] = 0.0 + k[3057]*y_cur[IDX_HeII] + - k[3059]*y_cur[IDX_HeII] + k[5951]; - data[jistart + 2262] = 0.0 + k[3067]*y_cur[IDX_HeII] + - k[3069]*y_cur[IDX_HeII] + k[3071]*y_cur[IDX_HeII] + k[5965] + - k[5966]; - data[jistart + 2263] = 0.0 + k[731]*y_cur[IDX_eM] + - k[6873]*y_cur[IDX_GRAINM]; - data[jistart + 2264] = 0.0 + k[3064]*y_cur[IDX_HeII] + k[5960]; - data[jistart + 2265] = 0.0 + k[5970] + k[5970] + k[5973]; - data[jistart + 2266] = 0.0 + k[737]*y_cur[IDX_eM] + - k[6886]*y_cur[IDX_GRAINM]; - data[jistart + 2267] = 0.0 + k[5521]*y_cur[IDX_CI]; - data[jistart + 2268] = 0.0 - k[11]*y_cur[IDX_C3I] + - k[38]*y_cur[IDX_CI]; - data[jistart + 2269] = 0.0 + k[4916]*y_cur[IDX_CI]; - data[jistart + 2270] = 0.0 + k[1549]*y_cur[IDX_C4II] + - k[1557]*y_cur[IDX_C6II] + k[4911]*y_cur[IDX_CI]; - data[jistart + 2271] = 0.0 + k[4062]*y_cur[IDX_C3M]; - data[jistart + 2272] = 0.0 + k[4063]*y_cur[IDX_C3M]; - data[jistart + 2273] = 0.0 + k[235]*y_cur[IDX_C3II]; - data[jistart + 2274] = 0.0 - k[11]*y_cur[IDX_C2M] - - k[17]*y_cur[IDX_C3M] - k[23]*y_cur[IDX_C4M] - k[28]*y_cur[IDX_C5M] - - k[32]*y_cur[IDX_C6M] - k[35]*y_cur[IDX_C7M] - k[333]*y_cur[IDX_HII] - - k[2601]*y_cur[IDX_H3II] - k[2771]*y_cur[IDX_H3OII] - - k[2906]*y_cur[IDX_HCOII] - k[3095]*y_cur[IDX_HeII] - - k[5231]*y_cur[IDX_NI] - k[5356]*y_cur[IDX_OI] - - k[5496]*y_cur[IDX_CII] - k[5522]*y_cur[IDX_CI] - - k[5591]*y_cur[IDX_eM] - k[5717] - k[6001] - k[6943]; - data[jistart + 2275] = 0.0 + k[235]*y_cur[IDX_C2H4I]; - data[jistart + 2276] = 0.0 - k[17]*y_cur[IDX_C3I] + - k[4061]*y_cur[IDX_CII] + k[4062]*y_cur[IDX_C2H2II] + - k[4063]*y_cur[IDX_C2H3II] + k[4064]*y_cur[IDX_C4H2II] + - k[4065]*y_cur[IDX_C4H3II] + k[4066]*y_cur[IDX_C4SII] + - k[4067]*y_cur[IDX_CH2CCHII] + k[4068]*y_cur[IDX_CH3II] + - k[4069]*y_cur[IDX_CNCII] + k[4070]*y_cur[IDX_FeII] + - k[4071]*y_cur[IDX_HII] + k[4072]*y_cur[IDX_H2COII] + - k[4073]*y_cur[IDX_H2SII] + k[4074]*y_cur[IDX_H3II] + - k[4075]*y_cur[IDX_H3OII] + k[4076]*y_cur[IDX_HC2SII] + - k[4077]*y_cur[IDX_HCNHII] + k[4078]*y_cur[IDX_HCNHII] + - k[4079]*y_cur[IDX_HCOII] + k[4080]*y_cur[IDX_HCOII] + - k[4081]*y_cur[IDX_HeII] + k[4082]*y_cur[IDX_MgII] + - k[4083]*y_cur[IDX_NII] + k[4084]*y_cur[IDX_N2HII] + - k[4085]*y_cur[IDX_NH3II] + k[4086]*y_cur[IDX_NH4II] + - k[4087]*y_cur[IDX_NOII] + k[4088]*y_cur[IDX_NaII] + - k[4089]*y_cur[IDX_OII] + k[4090]*y_cur[IDX_SII] + - k[4091]*y_cur[IDX_SOII] + k[4092]*y_cur[IDX_SiII] + - k[4093]*y_cur[IDX_SiOII] + k[4094]*y_cur[IDX_SiOHII] + - k[4095]*y_cur[IDX_SiSII] + k[5716] + k[6000]; - data[jistart + 2277] = 0.0 + k[5720] + k[6004]; - data[jistart + 2278] = 0.0 + k[790]*y_cur[IDX_eM] + - k[3562]*y_cur[IDX_NH3I] + k[6460]*y_cur[IDX_GRAINM]; - data[jistart + 2279] = 0.0 + k[793]*y_cur[IDX_eM] + - k[794]*y_cur[IDX_eM] + k[6463]*y_cur[IDX_GRAINM] + - k[6464]*y_cur[IDX_GRAINM]; - data[jistart + 2280] = 0.0 + k[4921]*y_cur[IDX_CI]; - data[jistart + 2281] = 0.0 + k[4922]*y_cur[IDX_CI]; - data[jistart + 2282] = 0.0 + k[3102]*y_cur[IDX_HeII]; - data[jistart + 2283] = 0.0 + k[817]*y_cur[IDX_eM] + - k[6776]*y_cur[IDX_GRAINM]; - data[jistart + 2284] = 0.0 + k[3107]*y_cur[IDX_HeII] + - k[4923]*y_cur[IDX_CI] + k[5235]*y_cur[IDX_NI] + - k[5361]*y_cur[IDX_OI] + k[5728] + k[6012]; - data[jistart + 2285] = 0.0 + k[820]*y_cur[IDX_eM] + - k[1549]*y_cur[IDX_C2H2I] + k[6616]*y_cur[IDX_GRAINM]; - data[jistart + 2286] = 0.0 - k[23]*y_cur[IDX_C3I] + - k[3402]*y_cur[IDX_NI]; - data[jistart + 2287] = 0.0 + k[3699]*y_cur[IDX_OI]; - data[jistart + 2288] = 0.0 + k[3407]*y_cur[IDX_NI] + - k[4064]*y_cur[IDX_C3M]; - data[jistart + 2289] = 0.0 + k[4065]*y_cur[IDX_C3M]; - data[jistart + 2290] = 0.0 + k[5733] + k[6018]; - data[jistart + 2291] = 0.0 + k[6020]; - data[jistart + 2292] = 0.0 + k[3115]*y_cur[IDX_HeII] + k[5735] + - k[6021]; - data[jistart + 2293] = 0.0 + k[837]*y_cur[IDX_eM] + - k[4066]*y_cur[IDX_C3M] + k[6817]*y_cur[IDX_GRAINM]; - data[jistart + 2294] = 0.0 + k[4926]*y_cur[IDX_CI] + - k[4926]*y_cur[IDX_CI] + k[5737] + k[6023]; - data[jistart + 2295] = 0.0 + k[838]*y_cur[IDX_eM] + + data[jistart + 4059] = 0.0 + k[441]*y_cur[IDX_H2II] + k[466]*y_cur[IDX_H2OII] + + k[687]*y_cur[IDX_OHII] + k[5804] + k[6109]; + data[jistart + 4060] = 0.0 + k[2591]*y_cur[IDX_H3II] + k[2902]*y_cur[IDX_HCOII]; + data[jistart + 4061] = 0.0 + k[441]*y_cur[IDX_C2H6I]; + data[jistart + 4062] = 0.0 + k[687]*y_cur[IDX_C2H6I]; + data[jistart + 4063] = 0.0 + k[466]*y_cur[IDX_C2H6I]; + data[jistart + 4064] = 0.0 - k[237]*y_cur[IDX_C2H6II]; + data[jistart + 4065] = 0.0 - k[276]*y_cur[IDX_C2H6II] - k[2111]*y_cur[IDX_C2H6II]; + data[jistart + 4066] = 0.0 - k[2872]*y_cur[IDX_C2H6II]; + data[jistart + 4067] = 0.0 - k[601]*y_cur[IDX_C2H6II] - k[3568]*y_cur[IDX_C2H6II]; + data[jistart + 4068] = 0.0 - k[1562]*y_cur[IDX_C2H6II] - k[1563]*y_cur[IDX_C2H6II] - + k[1564]*y_cur[IDX_C2H6II]; + data[jistart + 4069] = 0.0 - k[2534]*y_cur[IDX_C2H6II]; + data[jistart + 4070] = 0.0 + k[2902]*y_cur[IDX_C2H5I]; + data[jistart + 4071] = 0.0 + k[2591]*y_cur[IDX_C2H5I]; + data[jistart + 4072] = 0.0 - k[6410]*y_cur[IDX_C2H6II] - k[6411]*y_cur[IDX_C2H6II]; + data[jistart + 4073] = 0.0 - k[935]*y_cur[IDX_C2H6II] - k[936]*y_cur[IDX_C2H6II]; + data[jistart + 4074] = 0.0 - k[2838]*y_cur[IDX_C2H6II]; + data[jistart + 4075] = 0.0 + k[7136] + k[7318] + k[7500]; + data[jistart + 4076] = 0.0 + k[1056]*y_cur[IDX_eM] + k[6487]*y_cur[IDX_GRAINM]; + data[jistart + 4077] = 0.0 - k[151]*y_cur[IDX_CII] - k[331]*y_cur[IDX_HII] - + k[2599]*y_cur[IDX_H3II] - k[2769]*y_cur[IDX_H3OII] - + k[2904]*y_cur[IDX_HCOII] - k[3090]*y_cur[IDX_HeII] - + k[4918]*y_cur[IDX_CI] - k[5230]*y_cur[IDX_NI] - + k[5354]*y_cur[IDX_OI] - k[5485]*y_cur[IDX_SI] - k[5712] - k[5713] - + k[5997] - k[5998] - k[6954]; + data[jistart + 4078] = 0.0 + k[5359]*y_cur[IDX_OI]; + data[jistart + 4079] = 0.0 + k[8691]*y_cur[IDX_GOI]; + data[jistart + 4080] = 0.0 + k[8691]*y_cur[IDX_GC2I]; + data[jistart + 4081] = 0.0 + k[129]*y_cur[IDX_OI]; + data[jistart + 4082] = 0.0 + k[3669]*y_cur[IDX_O2I]; + data[jistart + 4083] = 0.0 + k[128]*y_cur[IDX_OI]; + data[jistart + 4084] = 0.0 + k[3669]*y_cur[IDX_C3HII]; + data[jistart + 4085] = 0.0 + k[4962]*y_cur[IDX_CI]; + data[jistart + 4086] = 0.0 - k[5485]*y_cur[IDX_C2OI]; + data[jistart + 4087] = 0.0 - k[5230]*y_cur[IDX_C2OI]; + data[jistart + 4088] = 0.0 - k[2769]*y_cur[IDX_C2OI]; + data[jistart + 4089] = 0.0 + k[128]*y_cur[IDX_C2M] + k[129]*y_cur[IDX_C2HM] - + k[5354]*y_cur[IDX_C2OI] + k[5359]*y_cur[IDX_C3OI]; + data[jistart + 4090] = 0.0 - k[3090]*y_cur[IDX_C2OI]; + data[jistart + 4091] = 0.0 - k[151]*y_cur[IDX_C2OI]; + data[jistart + 4092] = 0.0 - k[331]*y_cur[IDX_C2OI]; + data[jistart + 4093] = 0.0 - k[4918]*y_cur[IDX_C2OI] + k[4962]*y_cur[IDX_HCOI]; + data[jistart + 4094] = 0.0 - k[2904]*y_cur[IDX_C2OI]; + data[jistart + 4095] = 0.0 - k[2599]*y_cur[IDX_C2OI]; + data[jistart + 4096] = 0.0 + k[6487]*y_cur[IDX_HC2OII]; + data[jistart + 4097] = 0.0 + k[1056]*y_cur[IDX_HC2OII]; + data[jistart + 4098] = 0.0 + k[2422]*y_cur[IDX_H2I]; + data[jistart + 4099] = 0.0 + k[3244]*y_cur[IDX_HeII]; + data[jistart + 4100] = 0.0 - k[879]*y_cur[IDX_eM] - k[880]*y_cur[IDX_eM] - + k[2423]*y_cur[IDX_H2I] - k[6838]*y_cur[IDX_GRAINM] - + k[6839]*y_cur[IDX_GRAINM]; + data[jistart + 4101] = 0.0 + k[1558]*y_cur[IDX_C2H2I]; + data[jistart + 4102] = 0.0 + k[2310]*y_cur[IDX_HII] + k[3146]*y_cur[IDX_HeII]; + data[jistart + 4103] = 0.0 + k[1333]*y_cur[IDX_CII]; + data[jistart + 4104] = 0.0 + k[1879]*y_cur[IDX_CI]; + data[jistart + 4105] = 0.0 + k[1878]*y_cur[IDX_CI]; + data[jistart + 4106] = 0.0 + k[1831]*y_cur[IDX_C4HI]; + data[jistart + 4107] = 0.0 + k[1765]*y_cur[IDX_C5HI]; + data[jistart + 4108] = 0.0 + k[354]*y_cur[IDX_HII] + k[6058]; + data[jistart + 4109] = 0.0 + k[2625]*y_cur[IDX_H3II] + k[2930]*y_cur[IDX_HCOII]; + data[jistart + 4110] = 0.0 + k[1497]*y_cur[IDX_C2H2II]; + data[jistart + 4111] = 0.0 + k[1765]*y_cur[IDX_C3H2II]; + data[jistart + 4112] = 0.0 + k[1831]*y_cur[IDX_C4HII]; + data[jistart + 4113] = 0.0 + k[1497]*y_cur[IDX_C6HI]; + data[jistart + 4114] = 0.0 + k[1558]*y_cur[IDX_C6II]; + data[jistart + 4115] = 0.0 + k[3146]*y_cur[IDX_C8H2I] + k[3244]*y_cur[IDX_HC9NI]; + data[jistart + 4116] = 0.0 + k[1333]*y_cur[IDX_C7H2I]; + data[jistart + 4117] = 0.0 + k[354]*y_cur[IDX_C8HI] + k[2310]*y_cur[IDX_C8H2I]; + data[jistart + 4118] = 0.0 + k[1878]*y_cur[IDX_C7H2II] + k[1879]*y_cur[IDX_C7H3II]; + data[jistart + 4119] = 0.0 + k[2930]*y_cur[IDX_C8I]; + data[jistart + 4120] = 0.0 + k[2625]*y_cur[IDX_C8I]; + data[jistart + 4121] = 0.0 - k[6838]*y_cur[IDX_C8HII] - k[6839]*y_cur[IDX_C8HII]; + data[jistart + 4122] = 0.0 + k[2422]*y_cur[IDX_C8II] - k[2423]*y_cur[IDX_C8HII]; + data[jistart + 4123] = 0.0 - k[879]*y_cur[IDX_C8HII] - k[880]*y_cur[IDX_C8HII]; + data[jistart + 4124] = 0.0 + k[1274]*y_cur[IDX_eM] + k[6698]*y_cur[IDX_GRAINM]; + data[jistart + 4125] = 0.0 + k[1280]*y_cur[IDX_eM] + k[1282]*y_cur[IDX_eM] + + k[6727]*y_cur[IDX_GRAINM] + k[6729]*y_cur[IDX_GRAINM]; + data[jistart + 4126] = 0.0 + k[1276]*y_cur[IDX_eM] + k[1278]*y_cur[IDX_eM] + + k[6702]*y_cur[IDX_GRAINM] + k[6704]*y_cur[IDX_GRAINM]; + data[jistart + 4127] = 0.0 + k[7111] + k[7293] + k[7475]; + data[jistart + 4128] = 0.0 + k[5660]*y_cur[IDX_HeII] + k[5944] + k[6294]; + data[jistart + 4129] = 0.0 + k[5666]*y_cur[IDX_HeII] + k[5945] + k[6295]; + data[jistart + 4130] = 0.0 + k[8597]*y_cur[IDX_GHI]; + data[jistart + 4131] = 0.0 - k[5633]*y_cur[IDX_CII] - k[5634]*y_cur[IDX_H3II] - + k[5635]*y_cur[IDX_H3OII] - k[5636]*y_cur[IDX_HCOII] - + k[5637]*y_cur[IDX_HeII] - k[5638]*y_cur[IDX_HeII] - k[5937] - + k[6290] - k[6929]; + data[jistart + 4132] = 0.0 + k[8741]*y_cur[IDX_GCH2I]; + data[jistart + 4133] = 0.0 + k[8741]*y_cur[IDX_GOHI]; + data[jistart + 4134] = 0.0 + k[5818] + k[6122]; + data[jistart + 4135] = 0.0 + k[8597]*y_cur[IDX_GH2COI]; + data[jistart + 4136] = 0.0 - k[5635]*y_cur[IDX_CH2OHI]; + data[jistart + 4137] = 0.0 - k[5637]*y_cur[IDX_CH2OHI] - k[5638]*y_cur[IDX_CH2OHI] + + k[5660]*y_cur[IDX_CH2OHCOI] + k[5666]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 4138] = 0.0 - k[5633]*y_cur[IDX_CH2OHI]; + data[jistart + 4139] = 0.0 - k[5636]*y_cur[IDX_CH2OHI]; + data[jistart + 4140] = 0.0 - k[5634]*y_cur[IDX_CH2OHI]; + data[jistart + 4141] = 0.0 + k[6698]*y_cur[IDX_CH2OHCOII] + k[6702]*y_cur[IDX_CH2OHCHOII] + + k[6704]*y_cur[IDX_CH2OHCHOII] + k[6727]*y_cur[IDX_CH2OHCH2OII] + + k[6729]*y_cur[IDX_CH2OHCH2OII]; + data[jistart + 4142] = 0.0 + k[1274]*y_cur[IDX_CH2OHCOII] + k[1276]*y_cur[IDX_CH2OHCHOII] + + k[1278]*y_cur[IDX_CH2OHCHOII] + k[1280]*y_cur[IDX_CH2OHCH2OII] + + k[1282]*y_cur[IDX_CH2OHCH2OII]; + data[jistart + 4143] = 0.0 + k[7147] + k[7329] + k[7511]; + data[jistart + 4144] = 0.0 + k[1262]*y_cur[IDX_eM] + k[3763]*y_cur[IDX_OI] + + k[6668]*y_cur[IDX_GRAINM]; + data[jistart + 4145] = 0.0 + k[1124]*y_cur[IDX_eM] + k[2287]*y_cur[IDX_COI] + + k[2551]*y_cur[IDX_H2OI] + k[6513]*y_cur[IDX_GRAINM]; + data[jistart + 4146] = 0.0 + k[1265]*y_cur[IDX_eM] + k[6553]*y_cur[IDX_GRAINM]; + data[jistart + 4147] = 0.0 + k[5452]*y_cur[IDX_OI] + k[6282]; + data[jistart + 4148] = 0.0 + k[5870] + k[6201]; + data[jistart + 4149] = 0.0 - k[203]*y_cur[IDX_CII] - k[432]*y_cur[IDX_HII] - + k[1446]*y_cur[IDX_CII] - k[2757]*y_cur[IDX_H3II] - + k[3329]*y_cur[IDX_HeII] - k[5450]*y_cur[IDX_OI] - + k[5451]*y_cur[IDX_OI] - k[5931] - k[6281] - k[6965]; + data[jistart + 4150] = 0.0 + k[5293]*y_cur[IDX_NI]; + data[jistart + 4151] = 0.0 + k[5296]*y_cur[IDX_NI]; + data[jistart + 4152] = 0.0 + k[5293]*y_cur[IDX_SiCI] + k[5296]*y_cur[IDX_SiHI]; + data[jistart + 4153] = 0.0 + k[3763]*y_cur[IDX_SiNCHII] - k[5450]*y_cur[IDX_SiNI] - + k[5451]*y_cur[IDX_SiNI] + k[5452]*y_cur[IDX_SiNCI]; + data[jistart + 4154] = 0.0 - k[3329]*y_cur[IDX_SiNI]; + data[jistart + 4155] = 0.0 - k[203]*y_cur[IDX_SiNI] - k[1446]*y_cur[IDX_SiNI]; + data[jistart + 4156] = 0.0 + k[2551]*y_cur[IDX_HNSiII]; + data[jistart + 4157] = 0.0 - k[432]*y_cur[IDX_SiNI]; + data[jistart + 4158] = 0.0 - k[2757]*y_cur[IDX_SiNI]; + data[jistart + 4159] = 0.0 + k[2287]*y_cur[IDX_HNSiII]; + data[jistart + 4160] = 0.0 + k[6513]*y_cur[IDX_HNSiII] + k[6553]*y_cur[IDX_SiNH2II] + + k[6668]*y_cur[IDX_SiNCHII]; + data[jistart + 4161] = 0.0 + k[1124]*y_cur[IDX_HNSiII] + k[1262]*y_cur[IDX_SiNCHII] + + k[1265]*y_cur[IDX_SiNH2II]; + data[jistart + 4162] = 0.0 + k[2643]*y_cur[IDX_H3II] + k[2944]*y_cur[IDX_HCOII]; + data[jistart + 4163] = 0.0 - k[845]*y_cur[IDX_eM] - k[846]*y_cur[IDX_eM] - + k[3417]*y_cur[IDX_NI] - k[6753]*y_cur[IDX_GRAINM] - + k[6754]*y_cur[IDX_GRAINM]; + data[jistart + 4164] = 0.0 + k[3130]*y_cur[IDX_HeII]; + data[jistart + 4165] = 0.0 + k[1547]*y_cur[IDX_C2H2I]; + data[jistart + 4166] = 0.0 + k[1548]*y_cur[IDX_C2H2I]; + data[jistart + 4167] = 0.0 + k[1673]*y_cur[IDX_C2H4II]; + data[jistart + 4168] = 0.0 + k[1650]*y_cur[IDX_C2H4II]; + data[jistart + 4169] = 0.0 + k[1509]*y_cur[IDX_C2H2II] + k[1612]*y_cur[IDX_C2H3II]; + data[jistart + 4170] = 0.0 + k[1693]*y_cur[IDX_C2H4I]; + data[jistart + 4171] = 0.0 + k[1692]*y_cur[IDX_C2H4I]; + data[jistart + 4172] = 0.0 + k[1650]*y_cur[IDX_C3H2I] + k[1668]*y_cur[IDX_CH2CCHI] + + k[1673]*y_cur[IDX_H2CCCI]; + data[jistart + 4173] = 0.0 + k[2171]*y_cur[IDX_CH4I]; + data[jistart + 4174] = 0.0 + k[1609]*y_cur[IDX_C2H3II] + k[1668]*y_cur[IDX_C2H4II]; + data[jistart + 4175] = 0.0 + k[1706]*y_cur[IDX_C2H4I]; + data[jistart + 4176] = 0.0 + k[2169]*y_cur[IDX_CH4I]; + data[jistart + 4177] = 0.0 + k[1692]*y_cur[IDX_C3H2II] + k[1693]*y_cur[IDX_C3H3II] + + k[1706]*y_cur[IDX_CH2CCHII]; + data[jistart + 4178] = 0.0 + k[1609]*y_cur[IDX_CH2CCHI] + k[1612]*y_cur[IDX_CH3CCHI]; + data[jistart + 4179] = 0.0 + k[2169]*y_cur[IDX_C4H2II] + k[2171]*y_cur[IDX_C4H3II]; + data[jistart + 4180] = 0.0 + k[1509]*y_cur[IDX_CH3CCHI]; + data[jistart + 4181] = 0.0 + k[1547]*y_cur[IDX_C3H4II] + k[1548]*y_cur[IDX_C3H5II]; + data[jistart + 4182] = 0.0 - k[3417]*y_cur[IDX_C5H5II]; + data[jistart + 4183] = 0.0 + k[3130]*y_cur[IDX_C6H6I]; + data[jistart + 4184] = 0.0 + k[2944]*y_cur[IDX_CH3C4HI]; + data[jistart + 4185] = 0.0 + k[2643]*y_cur[IDX_CH3C4HI]; + data[jistart + 4186] = 0.0 - k[6753]*y_cur[IDX_C5H5II] - k[6754]*y_cur[IDX_C5H5II]; + data[jistart + 4187] = 0.0 - k[845]*y_cur[IDX_C5H5II] - k[846]*y_cur[IDX_C5H5II]; + data[jistart + 4188] = 0.0 + k[7751] + k[8065]; + data[jistart + 4189] = 0.0 + k[8454]*y_cur[IDX_GNI]; + data[jistart + 4190] = 0.0 + k[7685]; + data[jistart + 4191] = 0.0 + k[7635] + k[7637] + k[7916] + k[7918]; + data[jistart + 4192] = 0.0 - k[8527]*y_cur[IDX_GNHI]; + data[jistart + 4193] = 0.0 - k[8521]*y_cur[IDX_GNHI]; + data[jistart + 4194] = 0.0 - k[8522]*y_cur[IDX_GNHI]; + data[jistart + 4195] = 0.0 - k[8525]*y_cur[IDX_GNHI]; + data[jistart + 4196] = 0.0 + k[7630] + k[7632] + k[7907] + k[7909]; + data[jistart + 4197] = 0.0 - k[7078] - k[7260] - k[7442] - k[7623] - k[7624] - k[7900] - + k[7901] - k[8280]*y_cur[IDX_GHI] - k[8403]*y_cur[IDX_GCI] - + k[8439]*y_cur[IDX_GOI] - k[8458]*y_cur[IDX_GNI] - + k[8475]*y_cur[IDX_GSI] - k[8479]*y_cur[IDX_GCHI] - + k[8480]*y_cur[IDX_GCHI] - k[8521]*y_cur[IDX_GCH3CHOI] - + k[8522]*y_cur[IDX_GH2COI] - k[8523]*y_cur[IDX_GCH2I] - + k[8524]*y_cur[IDX_GNHI] - k[8524]*y_cur[IDX_GNHI] - + k[8524]*y_cur[IDX_GNHI] - k[8524]*y_cur[IDX_GNHI] - + k[8525]*y_cur[IDX_GNOI] - k[8526]*y_cur[IDX_GCOI] - + k[8527]*y_cur[IDX_GCH2OHCHOI] - k[8581]*y_cur[IDX_GHI] - + k[8659]*y_cur[IDX_GCI] - k[8687]*y_cur[IDX_GOI] - + k[8743]*y_cur[IDX_GCH2I] - k[8744]*y_cur[IDX_GCOI]; + data[jistart + 4198] = 0.0 - k[8475]*y_cur[IDX_GNHI]; + data[jistart + 4199] = 0.0 - k[8526]*y_cur[IDX_GNHI] - k[8744]*y_cur[IDX_GNHI]; + data[jistart + 4200] = 0.0 - k[8523]*y_cur[IDX_GNHI] - k[8743]*y_cur[IDX_GNHI]; + data[jistart + 4201] = 0.0 + k[8279]*y_cur[IDX_GHI] + k[8454]*y_cur[IDX_GO2HI] - + k[8458]*y_cur[IDX_GNHI]; + data[jistart + 4202] = 0.0 - k[8439]*y_cur[IDX_GNHI] - k[8687]*y_cur[IDX_GNHI]; + data[jistart + 4203] = 0.0 - k[8479]*y_cur[IDX_GNHI] - k[8480]*y_cur[IDX_GNHI]; + data[jistart + 4204] = 0.0 - k[8403]*y_cur[IDX_GNHI] - k[8659]*y_cur[IDX_GNHI]; + data[jistart + 4205] = 0.0 + k[6896]; + data[jistart + 4206] = 0.0 + k[8279]*y_cur[IDX_GNI] - k[8280]*y_cur[IDX_GNHI] - + k[8581]*y_cur[IDX_GNHI]; + data[jistart + 4207] = 0.0 + k[7831] + k[8155]; + data[jistart + 4208] = 0.0 + k[7840] + k[7840] + k[8165] + k[8165] + k[8166] + k[8166]; + data[jistart + 4209] = 0.0 + k[7709] + k[7711] + k[8014] + k[8016]; + data[jistart + 4210] = 0.0 + k[7845] + k[8172] + k[8173]; + data[jistart + 4211] = 0.0 + k[7816] + k[8144]; + data[jistart + 4212] = 0.0 + k[7766] + k[8086]; + data[jistart + 4213] = 0.0 + k[7827] + k[7830] + k[8151] + k[8154]; + data[jistart + 4214] = 0.0 + k[7786] + k[7787] + k[8110] + k[8111] + k[8409]*y_cur[IDX_GCI]; + data[jistart + 4215] = 0.0 + k[7779] + k[8101] + k[8400]*y_cur[IDX_GCI] + + k[8442]*y_cur[IDX_GOI] + k[8459]*y_cur[IDX_GNI]; + data[jistart + 4216] = 0.0 + k[7757] + k[7758] + k[8075] + k[8076]; + data[jistart + 4217] = 0.0 + k[7707] + k[8011]; + data[jistart + 4218] = 0.0 - k[8475]*y_cur[IDX_GSI]; + data[jistart + 4219] = 0.0 - k[7114] - k[7296] - k[7478] - k[8311]*y_cur[IDX_GHI] - + k[8415]*y_cur[IDX_GCI] - k[8450]*y_cur[IDX_GOI] - + k[8464]*y_cur[IDX_GNI] - k[8473]*y_cur[IDX_GCHI] - + k[8474]*y_cur[IDX_GCH3I] - k[8475]*y_cur[IDX_GNHI] - + k[8476]*y_cur[IDX_GCOI] - k[8607]*y_cur[IDX_GHI] - + k[8666]*y_cur[IDX_GCI] - k[8694]*y_cur[IDX_GOI] - + k[8704]*y_cur[IDX_GNI] - k[8713]*y_cur[IDX_GCHI] - + k[8714]*y_cur[IDX_GCOI]; + data[jistart + 4220] = 0.0 - k[8476]*y_cur[IDX_GSI] - k[8714]*y_cur[IDX_GSI]; + data[jistart + 4221] = 0.0 + k[8459]*y_cur[IDX_GNSI] - k[8464]*y_cur[IDX_GSI] - + k[8704]*y_cur[IDX_GSI]; + data[jistart + 4222] = 0.0 + k[8442]*y_cur[IDX_GNSI] - k[8450]*y_cur[IDX_GSI] - + k[8694]*y_cur[IDX_GSI]; + data[jistart + 4223] = 0.0 - k[8474]*y_cur[IDX_GSI]; + data[jistart + 4224] = 0.0 - k[8473]*y_cur[IDX_GSI] - k[8713]*y_cur[IDX_GSI]; + data[jistart + 4225] = 0.0 + k[8400]*y_cur[IDX_GNSI] + k[8409]*y_cur[IDX_GSOI] - + k[8415]*y_cur[IDX_GSI] - k[8666]*y_cur[IDX_GSI]; + data[jistart + 4226] = 0.0 + k[6932]; + data[jistart + 4227] = 0.0 - k[8311]*y_cur[IDX_GSI] - k[8607]*y_cur[IDX_GSI]; + data[jistart + 4228] = 0.0 + k[7162] + k[7344] + k[7526]; + data[jistart + 4229] = 0.0 + k[8625]*y_cur[IDX_GHI]; + data[jistart + 4230] = 0.0 + k[1001]*y_cur[IDX_eM] + k[6583]*y_cur[IDX_GRAINM]; + data[jistart + 4231] = 0.0 + k[8713]*y_cur[IDX_GCHI]; + data[jistart + 4232] = 0.0 - k[2346]*y_cur[IDX_HII] - k[2702]*y_cur[IDX_H3II] - + k[3255]*y_cur[IDX_HeII] - k[3256]*y_cur[IDX_HeII] - + k[5173]*y_cur[IDX_HI] - k[5268]*y_cur[IDX_NI] - + k[5408]*y_cur[IDX_OI] - k[5409]*y_cur[IDX_OI] - k[5862] - k[6190] - + k[6191] - k[6980]; + data[jistart + 4233] = 0.0 + k[3852]*y_cur[IDX_SOII]; + data[jistart + 4234] = 0.0 + k[8713]*y_cur[IDX_GSI]; + data[jistart + 4235] = 0.0 + k[3845]*y_cur[IDX_C2H2I] + k[3849]*y_cur[IDX_C2H4I] + + k[3852]*y_cur[IDX_CH2CCH2I]; + data[jistart + 4236] = 0.0 + k[5020]*y_cur[IDX_SI]; + data[jistart + 4237] = 0.0 + k[3849]*y_cur[IDX_SOII]; + data[jistart + 4238] = 0.0 + k[5020]*y_cur[IDX_CH2I]; + data[jistart + 4239] = 0.0 + k[3845]*y_cur[IDX_SOII]; + data[jistart + 4240] = 0.0 + k[8625]*y_cur[IDX_GCSI]; + data[jistart + 4241] = 0.0 - k[5268]*y_cur[IDX_HCSI]; + data[jistart + 4242] = 0.0 - k[5408]*y_cur[IDX_HCSI] - k[5409]*y_cur[IDX_HCSI]; + data[jistart + 4243] = 0.0 - k[3255]*y_cur[IDX_HCSI] - k[3256]*y_cur[IDX_HCSI]; + data[jistart + 4244] = 0.0 - k[2346]*y_cur[IDX_HCSI]; + data[jistart + 4245] = 0.0 - k[2702]*y_cur[IDX_HCSI]; + data[jistart + 4246] = 0.0 + k[6583]*y_cur[IDX_H2CSII]; + data[jistart + 4247] = 0.0 + k[1001]*y_cur[IDX_H2CSII]; + data[jistart + 4248] = 0.0 - k[5173]*y_cur[IDX_HCSI]; + data[jistart + 4249] = 0.0 + k[7172] + k[7354] + k[7536]; + data[jistart + 4250] = 0.0 + k[1122]*y_cur[IDX_eM] + k[6589]*y_cur[IDX_GRAINM]; + data[jistart + 4251] = 0.0 + k[5289]*y_cur[IDX_NI]; + data[jistart + 4252] = 0.0 + k[8704]*y_cur[IDX_GNI]; + data[jistart + 4253] = 0.0 - k[187]*y_cur[IDX_CII] - k[404]*y_cur[IDX_HII] - + k[1421]*y_cur[IDX_CII] - k[2727]*y_cur[IDX_H3II] - + k[2981]*y_cur[IDX_HCOII] - k[3288]*y_cur[IDX_HeII] - + k[3289]*y_cur[IDX_HeII] - k[4976]*y_cur[IDX_CI] - + k[4977]*y_cur[IDX_CI] - k[5188]*y_cur[IDX_HI] - + k[5189]*y_cur[IDX_HI] - k[5280]*y_cur[IDX_NI] - + k[5425]*y_cur[IDX_OI] - k[5426]*y_cur[IDX_OI] - k[5893] - k[6230] - + k[6990]; + data[jistart + 4254] = 0.0 + k[8704]*y_cur[IDX_GSI]; + data[jistart + 4255] = 0.0 + k[123]*y_cur[IDX_NI]; + data[jistart + 4256] = 0.0 + k[5271]*y_cur[IDX_NI]; + data[jistart + 4257] = 0.0 + k[5325]*y_cur[IDX_SI]; + data[jistart + 4258] = 0.0 + k[5290]*y_cur[IDX_NI]; + data[jistart + 4259] = 0.0 + k[5333]*y_cur[IDX_SI]; + data[jistart + 4260] = 0.0 + k[5125]*y_cur[IDX_CNI] + k[5325]*y_cur[IDX_NHI] + + k[5333]*y_cur[IDX_NOI]; + data[jistart + 4261] = 0.0 + k[5125]*y_cur[IDX_SI]; + data[jistart + 4262] = 0.0 + k[123]*y_cur[IDX_SM] + k[5271]*y_cur[IDX_HSI] - + k[5280]*y_cur[IDX_NSI] + k[5289]*y_cur[IDX_S2I] + + k[5290]*y_cur[IDX_SOI]; + data[jistart + 4263] = 0.0 - k[5425]*y_cur[IDX_NSI] - k[5426]*y_cur[IDX_NSI]; + data[jistart + 4264] = 0.0 - k[3288]*y_cur[IDX_NSI] - k[3289]*y_cur[IDX_NSI]; + data[jistart + 4265] = 0.0 - k[187]*y_cur[IDX_NSI] - k[1421]*y_cur[IDX_NSI]; + data[jistart + 4266] = 0.0 - k[404]*y_cur[IDX_NSI]; + data[jistart + 4267] = 0.0 - k[4976]*y_cur[IDX_NSI] - k[4977]*y_cur[IDX_NSI]; + data[jistart + 4268] = 0.0 - k[2981]*y_cur[IDX_NSI]; + data[jistart + 4269] = 0.0 - k[2727]*y_cur[IDX_NSI]; + data[jistart + 4270] = 0.0 + k[6589]*y_cur[IDX_HNSII]; + data[jistart + 4271] = 0.0 + k[1122]*y_cur[IDX_HNSII]; + data[jistart + 4272] = 0.0 - k[5188]*y_cur[IDX_NSI] - k[5189]*y_cur[IDX_NSI]; + data[jistart + 4273] = 0.0 + k[2357]*y_cur[IDX_HII] + k[3308]*y_cur[IDX_HeII]; + data[jistart + 4274] = 0.0 + k[1437]*y_cur[IDX_CII]; + data[jistart + 4275] = 0.0 + k[2473]*y_cur[IDX_H2I]; + data[jistart + 4276] = 0.0 + k[196]*y_cur[IDX_CII] + k[421]*y_cur[IDX_HII]; + data[jistart + 4277] = 0.0 + k[1436]*y_cur[IDX_CII]; + data[jistart + 4278] = 0.0 + k[2744]*y_cur[IDX_H3II] + k[2819]*y_cur[IDX_H3OII] + + k[2991]*y_cur[IDX_HCOII]; + data[jistart + 4279] = 0.0 - k[1226]*y_cur[IDX_eM] - k[1227]*y_cur[IDX_eM] - + k[1576]*y_cur[IDX_C2H2I] - k[1915]*y_cur[IDX_CI] - + k[5563]*y_cur[IDX_H2I] - k[6649]*y_cur[IDX_GRAINM] - + k[6650]*y_cur[IDX_GRAINM]; + data[jistart + 4280] = 0.0 + k[1922]*y_cur[IDX_CI]; + data[jistart + 4281] = 0.0 + k[3864]*y_cur[IDX_SiII]; + data[jistart + 4282] = 0.0 + k[1574]*y_cur[IDX_C2H2I] + k[3864]*y_cur[IDX_CH3CCHI]; + data[jistart + 4283] = 0.0 + k[1530]*y_cur[IDX_C2H2II] + k[1626]*y_cur[IDX_C2H3II]; + data[jistart + 4284] = 0.0 + k[1626]*y_cur[IDX_SiI]; + data[jistart + 4285] = 0.0 + k[1530]*y_cur[IDX_SiI]; + data[jistart + 4286] = 0.0 + k[1574]*y_cur[IDX_SiII] - k[1576]*y_cur[IDX_SiC2HII]; + data[jistart + 4287] = 0.0 + k[2819]*y_cur[IDX_SiC2I]; + data[jistart + 4288] = 0.0 + k[3308]*y_cur[IDX_SiC2H2I]; + data[jistart + 4289] = 0.0 + k[196]*y_cur[IDX_SiC2HI] + k[1436]*y_cur[IDX_SiCH2I] + + k[1437]*y_cur[IDX_SiCH3I]; + data[jistart + 4290] = 0.0 + k[421]*y_cur[IDX_SiC2HI] + k[2357]*y_cur[IDX_SiC2H2I]; + data[jistart + 4291] = 0.0 - k[1915]*y_cur[IDX_SiC2HII] + k[1922]*y_cur[IDX_SiCH2II]; + data[jistart + 4292] = 0.0 + k[2991]*y_cur[IDX_SiC2I]; + data[jistart + 4293] = 0.0 + k[2744]*y_cur[IDX_SiC2I]; + data[jistart + 4294] = 0.0 - k[6649]*y_cur[IDX_SiC2HII] - k[6650]*y_cur[IDX_SiC2HII]; + data[jistart + 4295] = 0.0 + k[2473]*y_cur[IDX_SiC2II] - k[5563]*y_cur[IDX_SiC2HII]; + data[jistart + 4296] = 0.0 - k[1226]*y_cur[IDX_SiC2HII] - k[1227]*y_cur[IDX_SiC2HII]; + data[jistart + 4297] = 0.0 + k[8601]*y_cur[IDX_GHI]; + data[jistart + 4298] = 0.0 + k[7106] + k[7288] + k[7470]; + data[jistart + 4299] = 0.0 + k[1256]*y_cur[IDX_eM] + k[6426]*y_cur[IDX_GRAINM]; + data[jistart + 4300] = 0.0 - k[201]*y_cur[IDX_CII] - k[428]*y_cur[IDX_HII] - + k[1439]*y_cur[IDX_CII] - k[1440]*y_cur[IDX_CII] - + k[2362]*y_cur[IDX_HII] - k[2753]*y_cur[IDX_H3II] - + k[2823]*y_cur[IDX_H3OII] - k[3000]*y_cur[IDX_HCOII] - + k[3322]*y_cur[IDX_HeII] - k[3323]*y_cur[IDX_HeII] - + k[4988]*y_cur[IDX_CI] - k[5294]*y_cur[IDX_NI] - + k[5445]*y_cur[IDX_OI] - k[5446]*y_cur[IDX_OI] - k[5927] - k[6272] - + k[6273] - k[6924]; + data[jistart + 4301] = 0.0 + k[1254]*y_cur[IDX_eM] + k[6412]*y_cur[IDX_GRAINM]; + data[jistart + 4302] = 0.0 + k[5928] + k[6274]; + data[jistart + 4303] = 0.0 + k[5929] + k[6277]; + data[jistart + 4304] = 0.0 + k[8601]*y_cur[IDX_GSiHI]; + data[jistart + 4305] = 0.0 - k[5294]*y_cur[IDX_SiH2I]; + data[jistart + 4306] = 0.0 - k[2823]*y_cur[IDX_SiH2I]; + data[jistart + 4307] = 0.0 - k[5445]*y_cur[IDX_SiH2I] - k[5446]*y_cur[IDX_SiH2I]; + data[jistart + 4308] = 0.0 - k[3322]*y_cur[IDX_SiH2I] - k[3323]*y_cur[IDX_SiH2I]; + data[jistart + 4309] = 0.0 - k[201]*y_cur[IDX_SiH2I] - k[1439]*y_cur[IDX_SiH2I] - + k[1440]*y_cur[IDX_SiH2I]; + data[jistart + 4310] = 0.0 - k[428]*y_cur[IDX_SiH2I] - k[2362]*y_cur[IDX_SiH2I]; + data[jistart + 4311] = 0.0 - k[4988]*y_cur[IDX_SiH2I]; + data[jistart + 4312] = 0.0 - k[3000]*y_cur[IDX_SiH2I]; + data[jistart + 4313] = 0.0 - k[2753]*y_cur[IDX_SiH2I]; + data[jistart + 4314] = 0.0 + k[6412]*y_cur[IDX_SiH3II] + k[6426]*y_cur[IDX_SiH4II]; + data[jistart + 4315] = 0.0 + k[1254]*y_cur[IDX_SiH3II] + k[1256]*y_cur[IDX_SiH4II]; + data[jistart + 4316] = 0.0 + k[7188] + k[7370] + k[7552]; + data[jistart + 4317] = 0.0 + k[796]*y_cur[IDX_eM] + k[6655]*y_cur[IDX_GRAINM]; + data[jistart + 4318] = 0.0 + k[1027]*y_cur[IDX_eM] + k[6666]*y_cur[IDX_GRAINM]; + data[jistart + 4319] = 0.0 + k[8670]*y_cur[IDX_GCI]; + data[jistart + 4320] = 0.0 + k[1070]*y_cur[IDX_eM] + k[6648]*y_cur[IDX_GRAINM]; + data[jistart + 4321] = 0.0 - k[153]*y_cur[IDX_CII] - k[336]*y_cur[IDX_HII] - + k[1313]*y_cur[IDX_CII] - k[1314]*y_cur[IDX_CII] - + k[2605]*y_cur[IDX_H3II] - k[2775]*y_cur[IDX_H3OII] - + k[2910]*y_cur[IDX_HCOII] - k[3099]*y_cur[IDX_HeII] - + k[3100]*y_cur[IDX_HeII] - k[4922]*y_cur[IDX_CI] - + k[5359]*y_cur[IDX_OI] - k[5723] - k[6007] - k[7006]; + data[jistart + 4322] = 0.0 + k[8695]*y_cur[IDX_GOI]; + data[jistart + 4323] = 0.0 + k[8695]*y_cur[IDX_GC3I]; + data[jistart + 4324] = 0.0 + k[1756]*y_cur[IDX_C3HII]; + data[jistart + 4325] = 0.0 + k[1756]*y_cur[IDX_OCSI]; + data[jistart + 4326] = 0.0 + k[8670]*y_cur[IDX_GC2OI]; + data[jistart + 4327] = 0.0 - k[2775]*y_cur[IDX_C3OI]; + data[jistart + 4328] = 0.0 - k[5359]*y_cur[IDX_C3OI]; + data[jistart + 4329] = 0.0 - k[3099]*y_cur[IDX_C3OI] - k[3100]*y_cur[IDX_C3OI]; + data[jistart + 4330] = 0.0 - k[153]*y_cur[IDX_C3OI] - k[1313]*y_cur[IDX_C3OI] - + k[1314]*y_cur[IDX_C3OI]; + data[jistart + 4331] = 0.0 - k[336]*y_cur[IDX_C3OI]; + data[jistart + 4332] = 0.0 - k[4922]*y_cur[IDX_C3OI]; + data[jistart + 4333] = 0.0 - k[2910]*y_cur[IDX_C3OI]; + data[jistart + 4334] = 0.0 - k[2605]*y_cur[IDX_C3OI]; + data[jistart + 4335] = 0.0 + k[6648]*y_cur[IDX_HC3OII] + k[6655]*y_cur[IDX_C3H2OII] + + k[6666]*y_cur[IDX_H3C3OII]; + data[jistart + 4336] = 0.0 + k[796]*y_cur[IDX_C3H2OII] + k[1027]*y_cur[IDX_H3C3OII] + + k[1070]*y_cur[IDX_HC3OII]; + data[jistart + 4337] = 0.0 - k[850]*y_cur[IDX_eM] - k[851]*y_cur[IDX_eM] - + k[1559]*y_cur[IDX_C2H2I] - k[2418]*y_cur[IDX_H2I] - + k[6782]*y_cur[IDX_GRAINM] - k[6783]*y_cur[IDX_GRAINM]; + data[jistart + 4338] = 0.0 + k[3243]*y_cur[IDX_HeII]; + data[jistart + 4339] = 0.0 + k[2417]*y_cur[IDX_H2I]; + data[jistart + 4340] = 0.0 + k[1550]*y_cur[IDX_C2H2I]; + data[jistart + 4341] = 0.0 + k[3144]*y_cur[IDX_HeII]; + data[jistart + 4342] = 0.0 + k[1870]*y_cur[IDX_CI]; + data[jistart + 4343] = 0.0 + k[2306]*y_cur[IDX_HII] + k[3129]*y_cur[IDX_HeII]; + data[jistart + 4344] = 0.0 + k[1324]*y_cur[IDX_CII]; + data[jistart + 4345] = 0.0 + k[1869]*y_cur[IDX_CI]; + data[jistart + 4346] = 0.0 + k[1735]*y_cur[IDX_C2HI]; + data[jistart + 4347] = 0.0 + k[3147]*y_cur[IDX_HeII]; + data[jistart + 4348] = 0.0 + k[2617]*y_cur[IDX_H3II] + k[2922]*y_cur[IDX_HCOII]; + data[jistart + 4349] = 0.0 + k[348]*y_cur[IDX_HII]; + data[jistart + 4350] = 0.0 + k[1489]*y_cur[IDX_C2H2II]; + data[jistart + 4351] = 0.0 + k[1735]*y_cur[IDX_C4HII]; + data[jistart + 4352] = 0.0 + k[1489]*y_cur[IDX_C4HI]; + data[jistart + 4353] = 0.0 + k[1550]*y_cur[IDX_C4II] - k[1559]*y_cur[IDX_C6HII]; + data[jistart + 4354] = 0.0 + k[3129]*y_cur[IDX_C6H2I] + k[3144]*y_cur[IDX_C8H2I] + + k[3147]*y_cur[IDX_C8HI] + k[3243]*y_cur[IDX_HC7NI]; + data[jistart + 4355] = 0.0 + k[1324]*y_cur[IDX_C5H2I]; + data[jistart + 4356] = 0.0 + k[348]*y_cur[IDX_C6HI] + k[2306]*y_cur[IDX_C6H2I]; + data[jistart + 4357] = 0.0 + k[1869]*y_cur[IDX_C5H2II] + k[1870]*y_cur[IDX_C5H3II]; + data[jistart + 4358] = 0.0 + k[2922]*y_cur[IDX_C6I]; + data[jistart + 4359] = 0.0 + k[2617]*y_cur[IDX_C6I]; + data[jistart + 4360] = 0.0 - k[6782]*y_cur[IDX_C6HII] - k[6783]*y_cur[IDX_C6HII]; + data[jistart + 4361] = 0.0 + k[2417]*y_cur[IDX_C6II] - k[2418]*y_cur[IDX_C6HII]; + data[jistart + 4362] = 0.0 - k[850]*y_cur[IDX_C6HII] - k[851]*y_cur[IDX_C6HII]; + data[jistart + 4363] = 0.0 + k[7244] + k[7426] + k[7608]; + data[jistart + 4364] = 0.0 + k[899]*y_cur[IDX_eM] + k[6865]*y_cur[IDX_GRAINM]; + data[jistart + 4365] = 0.0 + k[734]*y_cur[IDX_eM] + k[3683]*y_cur[IDX_OI] + + k[6879]*y_cur[IDX_GRAINM]; + data[jistart + 4366] = 0.0 + k[8735]*y_cur[IDX_GCHI]; + data[jistart + 4367] = 0.0 + k[8647]*y_cur[IDX_GHI]; + data[jistart + 4368] = 0.0 + k[897]*y_cur[IDX_eM] + k[6863]*y_cur[IDX_GRAINM]; + data[jistart + 4369] = 0.0 - k[356]*y_cur[IDX_HII] - k[1338]*y_cur[IDX_CII] - + k[1339]*y_cur[IDX_CII] - k[2312]*y_cur[IDX_HII] - + k[2629]*y_cur[IDX_H3II] - k[2934]*y_cur[IDX_HCOII] - + k[3151]*y_cur[IDX_HeII] - k[3152]*y_cur[IDX_HeII] - + k[3153]*y_cur[IDX_HeII] - k[4941]*y_cur[IDX_CI] - k[5769] - k[6063] + - k[6064] - k[7062]; + data[jistart + 4370] = 0.0 + k[895]*y_cur[IDX_eM] + k[6861]*y_cur[IDX_GRAINM]; + data[jistart + 4371] = 0.0 + k[4892]*y_cur[IDX_C2HI]; + data[jistart + 4372] = 0.0 + k[104]*y_cur[IDX_HI]; + data[jistart + 4373] = 0.0 + k[8735]*y_cur[IDX_GC8HI]; + data[jistart + 4374] = 0.0 + k[4892]*y_cur[IDX_C7H2I]; + data[jistart + 4375] = 0.0 + k[8647]*y_cur[IDX_GC9HI]; + data[jistart + 4376] = 0.0 + k[3683]*y_cur[IDX_C10H3II]; + data[jistart + 4377] = 0.0 - k[3151]*y_cur[IDX_C9H2I] - k[3152]*y_cur[IDX_C9H2I] - + k[3153]*y_cur[IDX_C9H2I]; + data[jistart + 4378] = 0.0 - k[1338]*y_cur[IDX_C9H2I] - k[1339]*y_cur[IDX_C9H2I]; + data[jistart + 4379] = 0.0 - k[356]*y_cur[IDX_C9H2I] - k[2312]*y_cur[IDX_C9H2I]; + data[jistart + 4380] = 0.0 - k[4941]*y_cur[IDX_C9H2I]; + data[jistart + 4381] = 0.0 - k[2934]*y_cur[IDX_C9H2I]; + data[jistart + 4382] = 0.0 - k[2629]*y_cur[IDX_C9H2I]; + data[jistart + 4383] = 0.0 + k[6861]*y_cur[IDX_C9H3II] + k[6863]*y_cur[IDX_C9H4II] + + k[6865]*y_cur[IDX_C9H5II] + k[6879]*y_cur[IDX_C10H3II]; + data[jistart + 4384] = 0.0 + k[734]*y_cur[IDX_C10H3II] + k[895]*y_cur[IDX_C9H3II] + + k[897]*y_cur[IDX_C9H4II] + k[899]*y_cur[IDX_C9H5II]; + data[jistart + 4385] = 0.0 + k[104]*y_cur[IDX_C9HM]; + data[jistart + 4386] = 0.0 + k[7189] + k[7371] + k[7553]; + data[jistart + 4387] = 0.0 + k[915]*y_cur[IDX_eM] + k[3567]*y_cur[IDX_NH3I] + + k[6659]*y_cur[IDX_GRAINM]; + data[jistart + 4388] = 0.0 - k[1348]*y_cur[IDX_CII] - k[1349]*y_cur[IDX_CII] - + k[1350]*y_cur[IDX_CII] - k[2316]*y_cur[IDX_HII] - + k[2637]*y_cur[IDX_H3II] - k[2886]*y_cur[IDX_HCNHII] - + k[2887]*y_cur[IDX_HCNHII] - k[2939]*y_cur[IDX_HCOII] - + k[3165]*y_cur[IDX_HeII] - k[3166]*y_cur[IDX_HeII] - + k[3167]*y_cur[IDX_HeII] - k[3168]*y_cur[IDX_HeII] - + k[3169]*y_cur[IDX_HeII] - k[5787] - k[6088] - k[6089] - k[7007]; + data[jistart + 4389] = 0.0 + k[5112]*y_cur[IDX_CNI]; + data[jistart + 4390] = 0.0 - k[2886]*y_cur[IDX_CH2CHCNI] - k[2887]*y_cur[IDX_CH2CHCNI]; + data[jistart + 4391] = 0.0 + k[5106]*y_cur[IDX_CNI]; + data[jistart + 4392] = 0.0 + k[3567]*y_cur[IDX_CH2CHCNHII]; + data[jistart + 4393] = 0.0 + k[5106]*y_cur[IDX_C2H4I] + k[5112]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 4394] = 0.0 - k[3165]*y_cur[IDX_CH2CHCNI] - k[3166]*y_cur[IDX_CH2CHCNI] - + k[3167]*y_cur[IDX_CH2CHCNI] - k[3168]*y_cur[IDX_CH2CHCNI] - + k[3169]*y_cur[IDX_CH2CHCNI]; + data[jistart + 4395] = 0.0 - k[1348]*y_cur[IDX_CH2CHCNI] - k[1349]*y_cur[IDX_CH2CHCNI] - + k[1350]*y_cur[IDX_CH2CHCNI]; + data[jistart + 4396] = 0.0 - k[2316]*y_cur[IDX_CH2CHCNI]; + data[jistart + 4397] = 0.0 - k[2939]*y_cur[IDX_CH2CHCNI]; + data[jistart + 4398] = 0.0 - k[2637]*y_cur[IDX_CH2CHCNI]; + data[jistart + 4399] = 0.0 + k[6659]*y_cur[IDX_CH2CHCNHII]; + data[jistart + 4400] = 0.0 + k[915]*y_cur[IDX_CH2CHCNHII]; + data[jistart + 4401] = 0.0 + k[2113]*y_cur[IDX_CH3CHOI]; + data[jistart + 4402] = 0.0 + k[2072]*y_cur[IDX_CH3II] + k[3664]*y_cur[IDX_O2II]; + data[jistart + 4403] = 0.0 + k[1724]*y_cur[IDX_C2H5OHI]; + data[jistart + 4404] = 0.0 - k[939]*y_cur[IDX_eM] - k[940]*y_cur[IDX_eM] - + k[941]*y_cur[IDX_eM] - k[942]*y_cur[IDX_eM] - k[943]*y_cur[IDX_eM] - + k[3569]*y_cur[IDX_NH3I] - k[3570]*y_cur[IDX_NH3I] - + k[6561]*y_cur[IDX_GRAINM] - k[6562]*y_cur[IDX_GRAINM] - + k[6563]*y_cur[IDX_GRAINM] - k[6564]*y_cur[IDX_GRAINM] - + k[6565]*y_cur[IDX_GRAINM]; + data[jistart + 4405] = 0.0 + k[1724]*y_cur[IDX_S2II] + k[2595]*y_cur[IDX_H3II]; + data[jistart + 4406] = 0.0 + k[2494]*y_cur[IDX_H2COI]; + data[jistart + 4407] = 0.0 + k[2113]*y_cur[IDX_HCOOH2II] + k[2654]*y_cur[IDX_H3II] + + k[2791]*y_cur[IDX_H3OII] + k[2950]*y_cur[IDX_HCOII]; + data[jistart + 4408] = 0.0 + k[3662]*y_cur[IDX_O2II]; + data[jistart + 4409] = 0.0 + k[5545]*y_cur[IDX_COI]; + data[jistart + 4410] = 0.0 + k[3662]*y_cur[IDX_CH3CHCH2I] + k[3664]*y_cur[IDX_CH3OCH3I]; + data[jistart + 4411] = 0.0 + k[2193]*y_cur[IDX_CH4I]; + data[jistart + 4412] = 0.0 + k[2193]*y_cur[IDX_H2COII] + k[5543]*y_cur[IDX_HCOII]; + data[jistart + 4413] = 0.0 + k[2494]*y_cur[IDX_CH3OH2II]; + data[jistart + 4414] = 0.0 - k[3569]*y_cur[IDX_CH3CHOHII] - k[3570]*y_cur[IDX_CH3CHOHII]; + data[jistart + 4415] = 0.0 + k[2072]*y_cur[IDX_CH3OCH3I]; + data[jistart + 4416] = 0.0 + k[5567]*y_cur[IDX_H3OII]; + data[jistart + 4417] = 0.0 + k[2791]*y_cur[IDX_CH3CHOI] + k[5567]*y_cur[IDX_C2H2I]; + data[jistart + 4418] = 0.0 + k[2950]*y_cur[IDX_CH3CHOI] + k[5543]*y_cur[IDX_CH4I]; + data[jistart + 4419] = 0.0 + k[2595]*y_cur[IDX_C2H5OHI] + k[2654]*y_cur[IDX_CH3CHOI]; + data[jistart + 4420] = 0.0 + k[5545]*y_cur[IDX_CH5II]; + data[jistart + 4421] = 0.0 - k[6561]*y_cur[IDX_CH3CHOHII] - k[6562]*y_cur[IDX_CH3CHOHII] - + k[6563]*y_cur[IDX_CH3CHOHII] - k[6564]*y_cur[IDX_CH3CHOHII] - + k[6565]*y_cur[IDX_CH3CHOHII]; + data[jistart + 4422] = 0.0 - k[939]*y_cur[IDX_CH3CHOHII] - k[940]*y_cur[IDX_CH3CHOHII] - + k[941]*y_cur[IDX_CH3CHOHII] - k[942]*y_cur[IDX_CH3CHOHII] - + k[943]*y_cur[IDX_CH3CHOHII]; + data[jistart + 4423] = 0.0 + k[2863]*y_cur[IDX_HCNI]; + data[jistart + 4424] = 0.0 + k[1842]*y_cur[IDX_CH3CNI]; + data[jistart + 4425] = 0.0 + k[2431]*y_cur[IDX_H2I]; + data[jistart + 4426] = 0.0 + k[2117]*y_cur[IDX_CH3CNI]; + data[jistart + 4427] = 0.0 - k[946]*y_cur[IDX_eM] - k[947]*y_cur[IDX_eM] - + k[6502]*y_cur[IDX_GRAINM] - k[6503]*y_cur[IDX_GRAINM]; + data[jistart + 4428] = 0.0 + k[2873]*y_cur[IDX_HCNI]; + data[jistart + 4429] = 0.0 + k[2116]*y_cur[IDX_CH3CNI]; + data[jistart + 4430] = 0.0 + k[2115]*y_cur[IDX_CH3CNI]; + data[jistart + 4431] = 0.0 + k[1515]*y_cur[IDX_C2H2II] + k[1719]*y_cur[IDX_C2H5II] + + k[1842]*y_cur[IDX_C4H7II] + k[2115]*y_cur[IDX_HC3NHII] + + k[2116]*y_cur[IDX_HCO2II] + k[2117]*y_cur[IDX_HCOOH2II] + + k[2658]*y_cur[IDX_H3II] + k[2792]*y_cur[IDX_H3OII] + + k[2888]*y_cur[IDX_HCNHII] + k[2889]*y_cur[IDX_HCNHII] + + k[2951]*y_cur[IDX_HCOII] + k[3371]*y_cur[IDX_N2HII]; + data[jistart + 4432] = 0.0 + k[1719]*y_cur[IDX_CH3CNI]; + data[jistart + 4433] = 0.0 + k[3371]*y_cur[IDX_CH3CNI]; + data[jistart + 4434] = 0.0 + k[2888]*y_cur[IDX_CH3CNI] + k[2889]*y_cur[IDX_CH3CNI]; + data[jistart + 4435] = 0.0 + k[2863]*y_cur[IDX_C2H7II] + k[2873]*y_cur[IDX_CH3OH2II] + + k[5540]*y_cur[IDX_CH3II]; + data[jistart + 4436] = 0.0 + k[1515]*y_cur[IDX_CH3CNI]; + data[jistart + 4437] = 0.0 + k[5540]*y_cur[IDX_HCNI]; + data[jistart + 4438] = 0.0 + k[2792]*y_cur[IDX_CH3CNI]; + data[jistart + 4439] = 0.0 + k[2951]*y_cur[IDX_CH3CNI]; + data[jistart + 4440] = 0.0 + k[2658]*y_cur[IDX_CH3CNI]; + data[jistart + 4441] = 0.0 - k[6502]*y_cur[IDX_CH3CNHII] - k[6503]*y_cur[IDX_CH3CNHII]; + data[jistart + 4442] = 0.0 + k[2431]*y_cur[IDX_CH3CNII]; + data[jistart + 4443] = 0.0 - k[946]*y_cur[IDX_CH3CNHII] - k[947]*y_cur[IDX_CH3CNHII]; + data[jistart + 4444] = 0.0 + k[5639]*y_cur[IDX_CII]; + data[jistart + 4445] = 0.0 + k[5674]*y_cur[IDX_HeII]; + data[jistart + 4446] = 0.0 + k[2114]*y_cur[IDX_CH3CHOI]; + data[jistart + 4447] = 0.0 - k[948]*y_cur[IDX_eM] - k[949]*y_cur[IDX_eM] - + k[6518]*y_cur[IDX_GRAINM] - k[6519]*y_cur[IDX_GRAINM]; + data[jistart + 4448] = 0.0 + k[2639]*y_cur[IDX_H3II] + k[2786]*y_cur[IDX_H3OII] + + k[2940]*y_cur[IDX_HCOII]; + data[jistart + 4449] = 0.0 + k[1380]*y_cur[IDX_CII] + k[2070]*y_cur[IDX_CH3II] + + k[2662]*y_cur[IDX_H3II] + k[3194]*y_cur[IDX_HeII]; + data[jistart + 4450] = 0.0 + k[1378]*y_cur[IDX_CII] + k[2065]*y_cur[IDX_CH3II] + + k[2114]*y_cur[IDX_S2II] + k[2655]*y_cur[IDX_H3II]; + data[jistart + 4451] = 0.0 + k[3852]*y_cur[IDX_SOII]; + data[jistart + 4452] = 0.0 + k[2189]*y_cur[IDX_CH4I]; + data[jistart + 4453] = 0.0 + k[1980]*y_cur[IDX_H2COI]; + data[jistart + 4454] = 0.0 + k[3852]*y_cur[IDX_CH2CCH2I]; + data[jistart + 4455] = 0.0 + k[2189]*y_cur[IDX_COII]; + data[jistart + 4456] = 0.0 + k[1980]*y_cur[IDX_CH2II]; + data[jistart + 4457] = 0.0 + k[2065]*y_cur[IDX_CH3CHOI] + k[2070]*y_cur[IDX_CH3COCH3I] + + k[5535]*y_cur[IDX_COI]; + data[jistart + 4458] = 0.0 + k[2786]*y_cur[IDX_CH2COI]; + data[jistart + 4459] = 0.0 + k[3194]*y_cur[IDX_CH3COCH3I] + k[5674]*y_cur[IDX_CH3COOHI]; + data[jistart + 4460] = 0.0 + k[1378]*y_cur[IDX_CH3CHOI] + k[1380]*y_cur[IDX_CH3COCH3I] + + k[5639]*y_cur[IDX_CH3COI]; + data[jistart + 4461] = 0.0 + k[2940]*y_cur[IDX_CH2COI]; + data[jistart + 4462] = 0.0 + k[2639]*y_cur[IDX_CH2COI] + k[2655]*y_cur[IDX_CH3CHOI] + + k[2662]*y_cur[IDX_CH3COCH3I]; + data[jistart + 4463] = 0.0 + k[5535]*y_cur[IDX_CH3II]; + data[jistart + 4464] = 0.0 - k[6518]*y_cur[IDX_CH3COII] - k[6519]*y_cur[IDX_CH3COII]; + data[jistart + 4465] = 0.0 - k[948]*y_cur[IDX_CH3COII] - k[949]*y_cur[IDX_CH3COII]; + data[jistart + 4466] = 0.0 + k[7241] + k[7423] + k[7605]; + data[jistart + 4467] = 0.0 + k[990]*y_cur[IDX_eM] + k[6850]*y_cur[IDX_GRAINM]; + data[jistart + 4468] = 0.0 + k[934]*y_cur[IDX_eM] + k[6868]*y_cur[IDX_GRAINM]; + data[jistart + 4469] = 0.0 + k[8645]*y_cur[IDX_GHI]; + data[jistart + 4470] = 0.0 + k[1031]*y_cur[IDX_eM] + k[6852]*y_cur[IDX_GRAINM]; + data[jistart + 4471] = 0.0 + k[8710]*y_cur[IDX_GNI]; + data[jistart + 4472] = 0.0 + k[2324]*y_cur[IDX_HII]; + data[jistart + 4473] = 0.0 - k[386]*y_cur[IDX_HII] - k[1405]*y_cur[IDX_CII] - + k[2692]*y_cur[IDX_H3II] - k[2967]*y_cur[IDX_HCOII] - + k[3243]*y_cur[IDX_HeII] - k[5510]*y_cur[IDX_C2H2II] - + k[5539]*y_cur[IDX_CH3II] - k[5852] - k[6177] - k[6178] - k[7059]; + data[jistart + 4474] = 0.0 + k[5245]*y_cur[IDX_NI]; + data[jistart + 4475] = 0.0 + k[5107]*y_cur[IDX_CNI]; + data[jistart + 4476] = 0.0 + k[8710]*y_cur[IDX_GC7HI]; + data[jistart + 4477] = 0.0 + k[119]*y_cur[IDX_NI]; + data[jistart + 4478] = 0.0 - k[5510]*y_cur[IDX_HC7NI]; + data[jistart + 4479] = 0.0 - k[5539]*y_cur[IDX_HC7NI]; + data[jistart + 4480] = 0.0 + k[5107]*y_cur[IDX_C6H2I]; + data[jistart + 4481] = 0.0 + k[8645]*y_cur[IDX_GC7NI]; + data[jistart + 4482] = 0.0 + k[119]*y_cur[IDX_C7HM] + k[5245]*y_cur[IDX_C7H2I]; + data[jistart + 4483] = 0.0 - k[3243]*y_cur[IDX_HC7NI]; + data[jistart + 4484] = 0.0 - k[1405]*y_cur[IDX_HC7NI]; + data[jistart + 4485] = 0.0 - k[386]*y_cur[IDX_HC7NI] + k[2324]*y_cur[IDX_CH3C7NI]; + data[jistart + 4486] = 0.0 - k[2967]*y_cur[IDX_HC7NI]; + data[jistart + 4487] = 0.0 - k[2692]*y_cur[IDX_HC7NI]; + data[jistart + 4488] = 0.0 + k[6850]*y_cur[IDX_H2C7NII] + k[6852]*y_cur[IDX_H3C7NII] + + k[6868]*y_cur[IDX_CH3C7NHII]; + data[jistart + 4489] = 0.0 + k[934]*y_cur[IDX_CH3C7NHII] + k[990]*y_cur[IDX_H2C7NII] + + k[1031]*y_cur[IDX_H3C7NII]; + data[jistart + 4490] = 0.0 - k[848]*y_cur[IDX_eM] - k[849]*y_cur[IDX_eM] - + k[1557]*y_cur[IDX_C2H2I] - k[1558]*y_cur[IDX_C2H2I] - + k[2182]*y_cur[IDX_CH4I] - k[2183]*y_cur[IDX_CH4I] - + k[2184]*y_cur[IDX_CH4I] - k[2417]*y_cur[IDX_H2I] - + k[5552]*y_cur[IDX_H2I] - k[6780]*y_cur[IDX_GRAINM] - + k[6781]*y_cur[IDX_GRAINM]; + data[jistart + 4491] = 0.0 + k[3141]*y_cur[IDX_HeII]; + data[jistart + 4492] = 0.0 + k[1867]*y_cur[IDX_CI]; + data[jistart + 4493] = 0.0 + k[3128]*y_cur[IDX_HeII]; + data[jistart + 4494] = 0.0 + k[1323]*y_cur[IDX_CII]; + data[jistart + 4495] = 0.0 + k[1868]*y_cur[IDX_CI]; + data[jistart + 4496] = 0.0 + k[1734]*y_cur[IDX_C2HI]; + data[jistart + 4497] = 0.0 + k[3057]*y_cur[IDX_HeII] + k[3058]*y_cur[IDX_HeII]; + data[jistart + 4498] = 0.0 + k[3135]*y_cur[IDX_HeII]; + data[jistart + 4499] = 0.0 + k[3142]*y_cur[IDX_HeII]; + data[jistart + 4500] = 0.0 + k[5498]*y_cur[IDX_CII]; + data[jistart + 4501] = 0.0 + k[346]*y_cur[IDX_HII] + k[6034]; + data[jistart + 4502] = 0.0 + k[2307]*y_cur[IDX_HII] + k[3133]*y_cur[IDX_HeII]; + data[jistart + 4503] = 0.0 + k[1325]*y_cur[IDX_CII]; + data[jistart + 4504] = 0.0 - k[2182]*y_cur[IDX_C6II] - k[2183]*y_cur[IDX_C6II] - + k[2184]*y_cur[IDX_C6II]; + data[jistart + 4505] = 0.0 + k[1734]*y_cur[IDX_C4HII]; + data[jistart + 4506] = 0.0 - k[1557]*y_cur[IDX_C6II] - k[1558]*y_cur[IDX_C6II]; + data[jistart + 4507] = 0.0 + k[3057]*y_cur[IDX_C10I] + k[3058]*y_cur[IDX_C10I] + + k[3128]*y_cur[IDX_C6H2I] + k[3133]*y_cur[IDX_C6HI] + + k[3135]*y_cur[IDX_C7I] + k[3141]*y_cur[IDX_C7NI] + + k[3142]*y_cur[IDX_C8I]; + data[jistart + 4508] = 0.0 + k[1323]*y_cur[IDX_C5H2I] + k[1325]*y_cur[IDX_C5HI] + + k[5498]*y_cur[IDX_C5I]; + data[jistart + 4509] = 0.0 + k[346]*y_cur[IDX_C6I] + k[2307]*y_cur[IDX_C6HI]; + data[jistart + 4510] = 0.0 + k[1867]*y_cur[IDX_C5HII] + k[1868]*y_cur[IDX_C5H2II]; + data[jistart + 4511] = 0.0 - k[6780]*y_cur[IDX_C6II] - k[6781]*y_cur[IDX_C6II]; + data[jistart + 4512] = 0.0 - k[2417]*y_cur[IDX_C6II] - k[5552]*y_cur[IDX_C6II]; + data[jistart + 4513] = 0.0 - k[848]*y_cur[IDX_C6II] - k[849]*y_cur[IDX_C6II]; + data[jistart + 4514] = 0.0 + k[7229] + k[7411] + k[7593]; + data[jistart + 4515] = 0.0 + k[862]*y_cur[IDX_eM] + k[6808]*y_cur[IDX_GRAINM]; + data[jistart + 4516] = 0.0 - k[157]*y_cur[IDX_CII] - k[1328]*y_cur[IDX_CII] - + k[1329]*y_cur[IDX_CII] - k[1330]*y_cur[IDX_CII] - + k[1598]*y_cur[IDX_C2H3II] - k[1814]*y_cur[IDX_C3H5II] - + k[2221]*y_cur[IDX_CH5II] - k[2619]*y_cur[IDX_H3II] - + k[2783]*y_cur[IDX_H3OII] - k[2924]*y_cur[IDX_HCOII] - + k[3130]*y_cur[IDX_HeII] - k[3131]*y_cur[IDX_HeII] - + k[3368]*y_cur[IDX_N2HII] - k[5751] - k[6038] - k[7047]; + data[jistart + 4517] = 0.0 - k[1814]*y_cur[IDX_C6H6I]; + data[jistart + 4518] = 0.0 - k[2221]*y_cur[IDX_C6H6I]; + data[jistart + 4519] = 0.0 - k[3368]*y_cur[IDX_C6H6I]; + data[jistart + 4520] = 0.0 - k[1598]*y_cur[IDX_C6H6I]; + data[jistart + 4521] = 0.0 - k[2783]*y_cur[IDX_C6H6I]; + data[jistart + 4522] = 0.0 - k[3130]*y_cur[IDX_C6H6I] - k[3131]*y_cur[IDX_C6H6I]; + data[jistart + 4523] = 0.0 - k[157]*y_cur[IDX_C6H6I] - k[1328]*y_cur[IDX_C6H6I] - + k[1329]*y_cur[IDX_C6H6I] - k[1330]*y_cur[IDX_C6H6I]; + data[jistart + 4524] = 0.0 - k[2924]*y_cur[IDX_C6H6I]; + data[jistart + 4525] = 0.0 - k[2619]*y_cur[IDX_C6H6I]; + data[jistart + 4526] = 0.0 + k[6808]*y_cur[IDX_C6H7II]; + data[jistart + 4527] = 0.0 + k[862]*y_cur[IDX_C6H7II]; + data[jistart + 4528] = 0.0 + k[901]*y_cur[IDX_eM] + k[6875]*y_cur[IDX_GRAINM]; + data[jistart + 4529] = 0.0 + k[989]*y_cur[IDX_eM] + k[6849]*y_cur[IDX_GRAINM]; + data[jistart + 4530] = 0.0 + k[7239] + k[7421] + k[7603]; + data[jistart + 4531] = 0.0 + k[1030]*y_cur[IDX_eM] + k[6851]*y_cur[IDX_GRAINM]; + data[jistart + 4532] = 0.0 + k[1085]*y_cur[IDX_eM] + k[6844]*y_cur[IDX_GRAINM]; + data[jistart + 4533] = 0.0 + k[3183]*y_cur[IDX_HeII] + k[5800] + k[6104]; + data[jistart + 4534] = 0.0 + k[8709]*y_cur[IDX_GNI]; + data[jistart + 4535] = 0.0 + k[5252]*y_cur[IDX_NI]; + data[jistart + 4536] = 0.0 - k[2624]*y_cur[IDX_H3II] - k[2929]*y_cur[IDX_HCOII] - + k[3141]*y_cur[IDX_HeII] - k[4937]*y_cur[IDX_CI] - + k[5247]*y_cur[IDX_NI] - k[5372]*y_cur[IDX_OI] - k[5760] - k[6049] - + k[6050] - k[7057]; + data[jistart + 4537] = 0.0 + k[8709]*y_cur[IDX_GC7I]; + data[jistart + 4538] = 0.0 + k[118]*y_cur[IDX_NI]; + data[jistart + 4539] = 0.0 + k[5246]*y_cur[IDX_NI]; + data[jistart + 4540] = 0.0 + k[118]*y_cur[IDX_C7M] + k[5246]*y_cur[IDX_C7HI] - + k[5247]*y_cur[IDX_C7NI] + k[5252]*y_cur[IDX_C9NI]; + data[jistart + 4541] = 0.0 - k[5372]*y_cur[IDX_C7NI]; + data[jistart + 4542] = 0.0 - k[3141]*y_cur[IDX_C7NI] + k[3183]*y_cur[IDX_CH3C7NI]; + data[jistart + 4543] = 0.0 - k[4937]*y_cur[IDX_C7NI]; + data[jistart + 4544] = 0.0 - k[2929]*y_cur[IDX_C7NI]; + data[jistart + 4545] = 0.0 - k[2624]*y_cur[IDX_C7NI]; + data[jistart + 4546] = 0.0 + k[6844]*y_cur[IDX_HC7NII] + k[6849]*y_cur[IDX_H2C7NII] + + k[6851]*y_cur[IDX_H3C7NII] + k[6875]*y_cur[IDX_C9NII]; + data[jistart + 4547] = 0.0 + k[901]*y_cur[IDX_C9NII] + k[989]*y_cur[IDX_H2C7NII] + + k[1030]*y_cur[IDX_H3C7NII] + k[1085]*y_cur[IDX_HC7NII]; + data[jistart + 4548] = 0.0 + k[8628]*y_cur[IDX_GHI]; + data[jistart + 4549] = 0.0 + k[7168] + k[7350] + k[7532]; + data[jistart + 4550] = 0.0 + k[1104]*y_cur[IDX_eM] + k[2113]*y_cur[IDX_CH3CHOI] + + k[2117]*y_cur[IDX_CH3CNI] + k[2127]*y_cur[IDX_CH3OHI] + + k[2549]*y_cur[IDX_H2OI] + k[3586]*y_cur[IDX_NH3I] + + k[6611]*y_cur[IDX_GRAINM]; + data[jistart + 4551] = 0.0 + k[8740]*y_cur[IDX_GOHI]; + data[jistart + 4552] = 0.0 - k[675]*y_cur[IDX_O2II] - k[2120]*y_cur[IDX_CH3OH2II] - + k[2699]*y_cur[IDX_H3II] - k[2700]*y_cur[IDX_H3II] - + k[2765]*y_cur[IDX_H3COII] - k[2971]*y_cur[IDX_HCOII] - + k[3666]*y_cur[IDX_O2II] - k[5860] - k[6187] - k[6188] - k[6986]; + data[jistart + 4553] = 0.0 - k[2120]*y_cur[IDX_HCOOHI]; + data[jistart + 4554] = 0.0 + k[8740]*y_cur[IDX_GHCOI]; + data[jistart + 4555] = 0.0 + k[2113]*y_cur[IDX_HCOOH2II]; + data[jistart + 4556] = 0.0 + k[2117]*y_cur[IDX_HCOOH2II]; + data[jistart + 4557] = 0.0 + k[3658]*y_cur[IDX_O2II]; + data[jistart + 4558] = 0.0 + k[2127]*y_cur[IDX_HCOOH2II]; + data[jistart + 4559] = 0.0 - k[2765]*y_cur[IDX_HCOOHI]; + data[jistart + 4560] = 0.0 - k[675]*y_cur[IDX_HCOOHI] + k[3658]*y_cur[IDX_CH3CHCH2I] - + k[3666]*y_cur[IDX_HCOOHI]; + data[jistart + 4561] = 0.0 + k[5466]*y_cur[IDX_OHI]; + data[jistart + 4562] = 0.0 + k[5466]*y_cur[IDX_H2COI]; + data[jistart + 4563] = 0.0 + k[3586]*y_cur[IDX_HCOOH2II]; + data[jistart + 4564] = 0.0 + k[8628]*y_cur[IDX_GCOOHI]; + data[jistart + 4565] = 0.0 + k[2549]*y_cur[IDX_HCOOH2II]; + data[jistart + 4566] = 0.0 - k[2971]*y_cur[IDX_HCOOHI]; + data[jistart + 4567] = 0.0 - k[2699]*y_cur[IDX_HCOOHI] - k[2700]*y_cur[IDX_HCOOHI]; + data[jistart + 4568] = 0.0 + k[6611]*y_cur[IDX_HCOOH2II]; + data[jistart + 4569] = 0.0 + k[1104]*y_cur[IDX_HCOOH2II]; + data[jistart + 4570] = 0.0 + k[201]*y_cur[IDX_CII] + k[428]*y_cur[IDX_HII] + k[6272]; + data[jistart + 4571] = 0.0 - k[1251]*y_cur[IDX_eM] - k[1252]*y_cur[IDX_eM] - + k[1253]*y_cur[IDX_eM] - k[1926]*y_cur[IDX_CI] - + k[3472]*y_cur[IDX_NI] - k[3757]*y_cur[IDX_OI] - + k[3882]*y_cur[IDX_O2I] - k[3883]*y_cur[IDX_SI] - + k[6402]*y_cur[IDX_GRAINM] - k[6403]*y_cur[IDX_GRAINM] - + k[6404]*y_cur[IDX_GRAINM]; + data[jistart + 4572] = 0.0 + k[2363]*y_cur[IDX_HII] + k[3325]*y_cur[IDX_HeII]; + data[jistart + 4573] = 0.0 + k[2756]*y_cur[IDX_H3II] + k[2824]*y_cur[IDX_H3OII] + + k[3002]*y_cur[IDX_HCOII] + k[3793]*y_cur[IDX_OHII]; + data[jistart + 4574] = 0.0 + k[1533]*y_cur[IDX_C2H2II] + k[1682]*y_cur[IDX_C2H4II]; + data[jistart + 4575] = 0.0 + k[3793]*y_cur[IDX_SiHI]; + data[jistart + 4576] = 0.0 + k[1682]*y_cur[IDX_SiH4I]; + data[jistart + 4577] = 0.0 - k[3882]*y_cur[IDX_SiH2II]; + data[jistart + 4578] = 0.0 + k[5562]*y_cur[IDX_H2I]; + data[jistart + 4579] = 0.0 - k[3883]*y_cur[IDX_SiH2II]; + data[jistart + 4580] = 0.0 + k[1533]*y_cur[IDX_SiH4I]; + data[jistart + 4581] = 0.0 - k[3472]*y_cur[IDX_SiH2II]; + data[jistart + 4582] = 0.0 + k[2824]*y_cur[IDX_SiHI]; + data[jistart + 4583] = 0.0 - k[3757]*y_cur[IDX_SiH2II]; + data[jistart + 4584] = 0.0 + k[3325]*y_cur[IDX_SiH3I]; + data[jistart + 4585] = 0.0 + k[201]*y_cur[IDX_SiH2I]; + data[jistart + 4586] = 0.0 + k[428]*y_cur[IDX_SiH2I] + k[2363]*y_cur[IDX_SiH3I]; + data[jistart + 4587] = 0.0 - k[1926]*y_cur[IDX_SiH2II]; + data[jistart + 4588] = 0.0 + k[3002]*y_cur[IDX_SiHI]; + data[jistart + 4589] = 0.0 + k[2756]*y_cur[IDX_SiHI]; + data[jistart + 4590] = 0.0 - k[6402]*y_cur[IDX_SiH2II] - k[6403]*y_cur[IDX_SiH2II] - + k[6404]*y_cur[IDX_SiH2II]; + data[jistart + 4591] = 0.0 + k[5562]*y_cur[IDX_SiII]; + data[jistart + 4592] = 0.0 - k[1251]*y_cur[IDX_SiH2II] - k[1252]*y_cur[IDX_SiH2II] - + k[1253]*y_cur[IDX_SiH2II]; + data[jistart + 4593] = 0.0 + k[2753]*y_cur[IDX_H3II] + k[2823]*y_cur[IDX_H3OII] + + k[3000]*y_cur[IDX_HCOII]; + data[jistart + 4594] = 0.0 - k[1254]*y_cur[IDX_eM] - k[1255]*y_cur[IDX_eM] - + k[1927]*y_cur[IDX_CI] - k[3473]*y_cur[IDX_NI] - + k[3474]*y_cur[IDX_NI] - k[3758]*y_cur[IDX_OI] - + k[3759]*y_cur[IDX_OI] - k[3884]*y_cur[IDX_O2I] - + k[5565]*y_cur[IDX_H2I] - k[6412]*y_cur[IDX_GRAINM] - + k[6413]*y_cur[IDX_GRAINM]; + data[jistart + 4595] = 0.0 + k[202]*y_cur[IDX_CII] + k[429]*y_cur[IDX_HII] + k[6275]; + data[jistart + 4596] = 0.0 + k[5564]*y_cur[IDX_H2I]; + data[jistart + 4597] = 0.0 + k[1534]*y_cur[IDX_C2H2II] + k[1683]*y_cur[IDX_C2H4II] + + k[2099]*y_cur[IDX_CH3II] + k[2238]*y_cur[IDX_CH5II] + + k[2364]*y_cur[IDX_HII]; + data[jistart + 4598] = 0.0 + k[2238]*y_cur[IDX_SiH4I]; + data[jistart + 4599] = 0.0 + k[1683]*y_cur[IDX_SiH4I]; + data[jistart + 4600] = 0.0 - k[3884]*y_cur[IDX_SiH3II]; + data[jistart + 4601] = 0.0 + k[1534]*y_cur[IDX_SiH4I]; + data[jistart + 4602] = 0.0 + k[2099]*y_cur[IDX_SiH4I]; + data[jistart + 4603] = 0.0 - k[3473]*y_cur[IDX_SiH3II] - k[3474]*y_cur[IDX_SiH3II]; + data[jistart + 4604] = 0.0 + k[2823]*y_cur[IDX_SiH2I]; + data[jistart + 4605] = 0.0 - k[3758]*y_cur[IDX_SiH3II] - k[3759]*y_cur[IDX_SiH3II]; + data[jistart + 4606] = 0.0 + k[202]*y_cur[IDX_SiH3I]; + data[jistart + 4607] = 0.0 + k[429]*y_cur[IDX_SiH3I] + k[2364]*y_cur[IDX_SiH4I]; + data[jistart + 4608] = 0.0 - k[1927]*y_cur[IDX_SiH3II]; + data[jistart + 4609] = 0.0 + k[3000]*y_cur[IDX_SiH2I]; + data[jistart + 4610] = 0.0 + k[2753]*y_cur[IDX_SiH2I]; + data[jistart + 4611] = 0.0 - k[6412]*y_cur[IDX_SiH3II] - k[6413]*y_cur[IDX_SiH3II]; + data[jistart + 4612] = 0.0 + k[5564]*y_cur[IDX_SiHII] - k[5565]*y_cur[IDX_SiH3II]; + data[jistart + 4613] = 0.0 - k[1254]*y_cur[IDX_SiH3II] - k[1255]*y_cur[IDX_SiH3II]; + data[jistart + 4614] = 0.0 + k[7249] + k[7431] + k[7613]; + data[jistart + 4615] = 0.0 + k[733]*y_cur[IDX_eM] + k[6878]*y_cur[IDX_GRAINM]; + data[jistart + 4616] = 0.0 + k[8649]*y_cur[IDX_GHI]; + data[jistart + 4617] = 0.0 + k[8736]*y_cur[IDX_GCHI]; + data[jistart + 4618] = 0.0 - k[321]*y_cur[IDX_HII] - k[1297]*y_cur[IDX_CII] - + k[2294]*y_cur[IDX_HII] - k[2584]*y_cur[IDX_H3II] - + k[2900]*y_cur[IDX_HCOII] - k[3062]*y_cur[IDX_HeII] - + k[3063]*y_cur[IDX_HeII] - k[3064]*y_cur[IDX_HeII] - + k[3065]*y_cur[IDX_HeII] - k[3066]*y_cur[IDX_HeII] - + k[4909]*y_cur[IDX_CI] - k[5690] - k[5957] - k[5958] - k[5959] - + k[5960] - k[7067]; + data[jistart + 4619] = 0.0 + k[4893]*y_cur[IDX_C2HI]; + data[jistart + 4620] = 0.0 + k[86]*y_cur[IDX_HI]; + data[jistart + 4621] = 0.0 + k[8736]*y_cur[IDX_GC9HI]; + data[jistart + 4622] = 0.0 + k[4893]*y_cur[IDX_C8H2I]; + data[jistart + 4623] = 0.0 + k[8649]*y_cur[IDX_GC10HI]; + data[jistart + 4624] = 0.0 - k[3062]*y_cur[IDX_C10H2I] - k[3063]*y_cur[IDX_C10H2I] - + k[3064]*y_cur[IDX_C10H2I] - k[3065]*y_cur[IDX_C10H2I] - + k[3066]*y_cur[IDX_C10H2I]; + data[jistart + 4625] = 0.0 - k[1297]*y_cur[IDX_C10H2I]; + data[jistart + 4626] = 0.0 - k[321]*y_cur[IDX_C10H2I] - k[2294]*y_cur[IDX_C10H2I]; + data[jistart + 4627] = 0.0 - k[4909]*y_cur[IDX_C10H2I]; + data[jistart + 4628] = 0.0 - k[2900]*y_cur[IDX_C10H2I]; + data[jistart + 4629] = 0.0 - k[2584]*y_cur[IDX_C10H2I]; + data[jistart + 4630] = 0.0 + k[6878]*y_cur[IDX_C10H3II]; + data[jistart + 4631] = 0.0 + k[733]*y_cur[IDX_C10H3II]; + data[jistart + 4632] = 0.0 + k[86]*y_cur[IDX_C10HM]; + data[jistart + 4633] = 0.0 + k[1315]*y_cur[IDX_CII]; + data[jistart + 4634] = 0.0 + k[1316]*y_cur[IDX_CII]; + data[jistart + 4635] = 0.0 + k[1314]*y_cur[IDX_CII]; + data[jistart + 4636] = 0.0 - k[819]*y_cur[IDX_eM] - k[820]*y_cur[IDX_eM] - + k[1549]*y_cur[IDX_C2H2I] - k[1550]*y_cur[IDX_C2H2I] - + k[2164]*y_cur[IDX_CH4I] - k[2165]*y_cur[IDX_CH4I] - + k[2166]*y_cur[IDX_CH4I] - k[2167]*y_cur[IDX_CH4I] - + k[2411]*y_cur[IDX_H2I] - k[6615]*y_cur[IDX_GRAINM] - + k[6616]*y_cur[IDX_GRAINM]; + data[jistart + 4637] = 0.0 + k[1388]*y_cur[IDX_CII]; + data[jistart + 4638] = 0.0 + k[1310]*y_cur[IDX_CII]; + data[jistart + 4639] = 0.0 + k[1855]*y_cur[IDX_CI]; + data[jistart + 4640] = 0.0 + k[3124]*y_cur[IDX_HeII]; + data[jistart + 4641] = 0.0 + k[3118]*y_cur[IDX_HeII]; + data[jistart + 4642] = 0.0 + k[3125]*y_cur[IDX_HeII]; + data[jistart + 4643] = 0.0 + k[338]*y_cur[IDX_HII]; + data[jistart + 4644] = 0.0 + k[1312]*y_cur[IDX_CII]; + data[jistart + 4645] = 0.0 + k[5496]*y_cur[IDX_CII]; + data[jistart + 4646] = 0.0 + k[2303]*y_cur[IDX_HII] + k[3112]*y_cur[IDX_HeII]; + data[jistart + 4647] = 0.0 + k[3239]*y_cur[IDX_HeII]; + data[jistart + 4648] = 0.0 - k[2164]*y_cur[IDX_C4II] - k[2165]*y_cur[IDX_C4II] - + k[2166]*y_cur[IDX_C4II] - k[2167]*y_cur[IDX_C4II]; + data[jistart + 4649] = 0.0 - k[1549]*y_cur[IDX_C4II] - k[1550]*y_cur[IDX_C4II]; + data[jistart + 4650] = 0.0 + k[3112]*y_cur[IDX_C4HI] + k[3118]*y_cur[IDX_C5I] + + k[3124]*y_cur[IDX_C5NI] + k[3125]*y_cur[IDX_C6I] + + k[3239]*y_cur[IDX_C4H2I]; + data[jistart + 4651] = 0.0 + k[1310]*y_cur[IDX_C3H2I] + k[1312]*y_cur[IDX_C3HI] + + k[1314]*y_cur[IDX_C3OI] + k[1315]*y_cur[IDX_C3PI] + + k[1316]*y_cur[IDX_C3SI] + k[1388]*y_cur[IDX_H2CCCI] + + k[5496]*y_cur[IDX_C3I]; + data[jistart + 4652] = 0.0 + k[338]*y_cur[IDX_C4I] + k[2303]*y_cur[IDX_C4HI]; + data[jistart + 4653] = 0.0 + k[1855]*y_cur[IDX_C3H2II]; + data[jistart + 4654] = 0.0 - k[6615]*y_cur[IDX_C4II] - k[6616]*y_cur[IDX_C4II]; + data[jistart + 4655] = 0.0 - k[2411]*y_cur[IDX_C4II]; + data[jistart + 4656] = 0.0 - k[819]*y_cur[IDX_C4II] - k[820]*y_cur[IDX_C4II]; + data[jistart + 4657] = 0.0 + k[7196] + k[7378] + k[7562]; + data[jistart + 4658] = 0.0 + k[834]*y_cur[IDX_eM] + k[6810]*y_cur[IDX_GRAINM]; + data[jistart + 4659] = 0.0 + k[1187]*y_cur[IDX_eM] + k[6689]*y_cur[IDX_GRAINM]; + data[jistart + 4660] = 0.0 + k[1184]*y_cur[IDX_eM] + k[6685]*y_cur[IDX_GRAINM]; + data[jistart + 4661] = 0.0 + k[1191]*y_cur[IDX_eM] + k[6773]*y_cur[IDX_GRAINM]; + data[jistart + 4662] = 0.0 + k[1181]*y_cur[IDX_eM] + k[6680]*y_cur[IDX_GRAINM]; + data[jistart + 4663] = 0.0 + k[1195]*y_cur[IDX_eM] + k[6813]*y_cur[IDX_GRAINM]; + data[jistart + 4664] = 0.0 + k[1059]*y_cur[IDX_eM] + k[6676]*y_cur[IDX_GRAINM]; + data[jistart + 4665] = 0.0 + k[3114]*y_cur[IDX_HeII]; + data[jistart + 4666] = 0.0 + k[5360]*y_cur[IDX_OI] + k[5724]; + data[jistart + 4667] = 0.0 + k[5845] + k[6170]; + data[jistart + 4668] = 0.0 - k[158]*y_cur[IDX_CII] - k[358]*y_cur[IDX_HII] - + k[1341]*y_cur[IDX_CII] - k[2633]*y_cur[IDX_H3II] - + k[2784]*y_cur[IDX_H3OII] - k[2937]*y_cur[IDX_HCOII] - + k[3157]*y_cur[IDX_HeII] - k[3158]*y_cur[IDX_HeII] - + k[5378]*y_cur[IDX_OI] - k[5773] - k[5774] - k[6070] - k[6071] - + k[7014]; + data[jistart + 4669] = 0.0 - k[2784]*y_cur[IDX_CCPI]; + data[jistart + 4670] = 0.0 + k[5360]*y_cur[IDX_C3PI] - k[5378]*y_cur[IDX_CCPI]; + data[jistart + 4671] = 0.0 + k[3114]*y_cur[IDX_C4PI] - k[3157]*y_cur[IDX_CCPI] - + k[3158]*y_cur[IDX_CCPI]; + data[jistart + 4672] = 0.0 - k[158]*y_cur[IDX_CCPI] - k[1341]*y_cur[IDX_CCPI]; + data[jistart + 4673] = 0.0 - k[358]*y_cur[IDX_CCPI]; + data[jistart + 4674] = 0.0 - k[2937]*y_cur[IDX_CCPI]; + data[jistart + 4675] = 0.0 - k[2633]*y_cur[IDX_CCPI]; + data[jistart + 4676] = 0.0 + k[6676]*y_cur[IDX_HC2PII] + k[6680]*y_cur[IDX_PC2H2II] + + k[6685]*y_cur[IDX_PC2H3II] + k[6689]*y_cur[IDX_PC2H4II] + + k[6773]*y_cur[IDX_PC3HII] + k[6810]*y_cur[IDX_C4PII] + + k[6813]*y_cur[IDX_PC4HII]; + data[jistart + 4677] = 0.0 + k[834]*y_cur[IDX_C4PII] + k[1059]*y_cur[IDX_HC2PII] + + k[1181]*y_cur[IDX_PC2H2II] + k[1184]*y_cur[IDX_PC2H3II] + + k[1187]*y_cur[IDX_PC2H4II] + k[1191]*y_cur[IDX_PC3HII] + + k[1195]*y_cur[IDX_PC4HII]; + data[jistart + 4678] = 0.0 + k[7154] + k[7336] + k[7518]; + data[jistart + 4679] = 0.0 + k[1199]*y_cur[IDX_eM] + k[6578]*y_cur[IDX_GRAINM]; + data[jistart + 4680] = 0.0 + k[902]*y_cur[IDX_eM] + k[6662]*y_cur[IDX_GRAINM]; + data[jistart + 4681] = 0.0 + k[1196]*y_cur[IDX_eM] + k[6814]*y_cur[IDX_GRAINM]; + data[jistart + 4682] = 0.0 + k[1060]*y_cur[IDX_eM] + k[6677]*y_cur[IDX_GRAINM]; + data[jistart + 4683] = 0.0 + k[1197]*y_cur[IDX_eM] + k[6569]*y_cur[IDX_GRAINM]; + data[jistart + 4684] = 0.0 + k[1105]*y_cur[IDX_eM] + k[6543]*y_cur[IDX_GRAINM]; + data[jistart + 4685] = 0.0 + k[6020]; + data[jistart + 4686] = 0.0 + k[5861] + k[6189]; + data[jistart + 4687] = 0.0 + k[6008]; + data[jistart + 4688] = 0.0 + k[3233]*y_cur[IDX_HeII]; + data[jistart + 4689] = 0.0 + k[3157]*y_cur[IDX_HeII] + k[5378]*y_cur[IDX_OI] + k[5774] + + k[6071]; + data[jistart + 4690] = 0.0 - k[171]*y_cur[IDX_CII] - k[373]*y_cur[IDX_HII] - + k[2677]*y_cur[IDX_H3II] - k[2796]*y_cur[IDX_H3OII] - + k[2955]*y_cur[IDX_HCOII] - k[3212]*y_cur[IDX_HeII] - + k[3213]*y_cur[IDX_HeII] - k[5391]*y_cur[IDX_OI] - k[5827] - k[6139] + - k[6972]; + data[jistart + 4691] = 0.0 + k[4983]*y_cur[IDX_CI]; + data[jistart + 4692] = 0.0 + k[5527]*y_cur[IDX_CI]; + data[jistart + 4693] = 0.0 - k[2796]*y_cur[IDX_CPI]; + data[jistart + 4694] = 0.0 + k[5378]*y_cur[IDX_CCPI] - k[5391]*y_cur[IDX_CPI]; + data[jistart + 4695] = 0.0 + k[3157]*y_cur[IDX_CCPI] - k[3212]*y_cur[IDX_CPI] - + k[3213]*y_cur[IDX_CPI] + k[3233]*y_cur[IDX_HC2PI]; + data[jistart + 4696] = 0.0 - k[171]*y_cur[IDX_CPI]; + data[jistart + 4697] = 0.0 - k[373]*y_cur[IDX_CPI]; + data[jistart + 4698] = 0.0 + k[4983]*y_cur[IDX_PHI] + k[5527]*y_cur[IDX_PI]; + data[jistart + 4699] = 0.0 - k[2955]*y_cur[IDX_CPI]; + data[jistart + 4700] = 0.0 - k[2677]*y_cur[IDX_CPI]; + data[jistart + 4701] = 0.0 + k[6543]*y_cur[IDX_HCPII] + k[6569]*y_cur[IDX_PCH2II] + + k[6578]*y_cur[IDX_PCH3II] + k[6662]*y_cur[IDX_CCPII] + + k[6677]*y_cur[IDX_HC2PII] + k[6814]*y_cur[IDX_PC4HII]; + data[jistart + 4702] = 0.0 + k[902]*y_cur[IDX_CCPII] + k[1060]*y_cur[IDX_HC2PII] + + k[1105]*y_cur[IDX_HCPII] + k[1196]*y_cur[IDX_PC4HII] + + k[1197]*y_cur[IDX_PCH2II] + k[1199]*y_cur[IDX_PCH3II]; + data[jistart + 4703] = 0.0 + k[7860] + k[8192]; + data[jistart + 4704] = 0.0 + k[7836] + k[8160]; + data[jistart + 4705] = 0.0 + k[8191]; + data[jistart + 4706] = 0.0 + k[8250]; + data[jistart + 4707] = 0.0 + k[8022]; + data[jistart + 4708] = 0.0 + k[8255] + k[8255] + k[8258] + k[8262]; + data[jistart + 4709] = 0.0 + k[8229]; + data[jistart + 4710] = 0.0 + k[8239] + k[8240] + k[8245]; + data[jistart + 4711] = 0.0 + k[7822] + k[8149]; + data[jistart + 4712] = 0.0 + k[7714] + k[8020]; + data[jistart + 4713] = 0.0 + k[7833] + k[8157]; + data[jistart + 4714] = 0.0 + k[7850] + k[8181]; + data[jistart + 4715] = 0.0 + k[8194]; + data[jistart + 4716] = 0.0 + k[7784] + k[8108]; + data[jistart + 4717] = 0.0 - k[7125] - k[7307] - k[7489] - k[7712] - k[8017] - + k[8315]*y_cur[IDX_GHI] - k[8377]*y_cur[IDX_GH2I] - + k[8416]*y_cur[IDX_GCI] - k[8451]*y_cur[IDX_GOI] - + k[8465]*y_cur[IDX_GNI] - k[8491]*y_cur[IDX_GCHI] - + k[8610]*y_cur[IDX_GHI] - k[8667]*y_cur[IDX_GCI] - + k[8695]*y_cur[IDX_GOI] - k[8705]*y_cur[IDX_GNI] - + k[8724]*y_cur[IDX_GCHI]; + data[jistart + 4718] = 0.0 + k[8410]*y_cur[IDX_GCI]; + data[jistart + 4719] = 0.0 - k[8465]*y_cur[IDX_GC3I] - k[8705]*y_cur[IDX_GC3I]; + data[jistart + 4720] = 0.0 - k[8451]*y_cur[IDX_GC3I] - k[8695]*y_cur[IDX_GC3I]; + data[jistart + 4721] = 0.0 - k[8491]*y_cur[IDX_GC3I] - k[8724]*y_cur[IDX_GC3I]; + data[jistart + 4722] = 0.0 - k[8377]*y_cur[IDX_GC3I]; + data[jistart + 4723] = 0.0 + k[8410]*y_cur[IDX_GC2I] - k[8416]*y_cur[IDX_GC3I] - + k[8667]*y_cur[IDX_GC3I]; + data[jistart + 4724] = 0.0 + k[6943]; + data[jistart + 4725] = 0.0 - k[8315]*y_cur[IDX_GC3I] - k[8610]*y_cur[IDX_GC3I]; + data[jistart + 4726] = 0.0 + k[7119] + k[7301] + k[7483]; + data[jistart + 4727] = 0.0 + k[5167]*y_cur[IDX_HI] + k[5398]*y_cur[IDX_OI] + + k[5467]*y_cur[IDX_OHI]; + data[jistart + 4728] = 0.0 + k[8605]*y_cur[IDX_GHI]; + data[jistart + 4729] = 0.0 + k[3664]*y_cur[IDX_O2II]; + data[jistart + 4730] = 0.0 + k[3666]*y_cur[IDX_O2II]; + data[jistart + 4731] = 0.0 - k[5042]*y_cur[IDX_CH3I] - k[5094]*y_cur[IDX_CHI] - + k[5095]*y_cur[IDX_CHI] - k[5131]*y_cur[IDX_COI] - + k[5146]*y_cur[IDX_H2I] - k[5150]*y_cur[IDX_H2COI] - + k[5152]*y_cur[IDX_H2OI] - k[5191]*y_cur[IDX_HI] - + k[5192]*y_cur[IDX_HI] - k[5193]*y_cur[IDX_HI] - + k[5210]*y_cur[IDX_HCOI] - k[5282]*y_cur[IDX_NI] - + k[5339]*y_cur[IDX_O2HI] - k[5339]*y_cur[IDX_O2HI] - + k[5339]*y_cur[IDX_O2HI] - k[5339]*y_cur[IDX_O2HI] - + k[5427]*y_cur[IDX_OI] - k[5478]*y_cur[IDX_OHI] - k[5899] - k[6237] - + k[6238] - k[6937]; + data[jistart + 4732] = 0.0 + k[5474]*y_cur[IDX_OHI]; + data[jistart + 4733] = 0.0 + k[8690]*y_cur[IDX_GOI]; + data[jistart + 4734] = 0.0 + k[3656]*y_cur[IDX_O2II]; + data[jistart + 4735] = 0.0 + k[8690]*y_cur[IDX_GOHI]; + data[jistart + 4736] = 0.0 + k[3660]*y_cur[IDX_O2II]; + data[jistart + 4737] = 0.0 + k[3656]*y_cur[IDX_CH2CCH2I] + k[3660]*y_cur[IDX_CH3CHCH2I] + + k[3664]*y_cur[IDX_CH3OCH3I] + k[3666]*y_cur[IDX_HCOOHI]; + data[jistart + 4738] = 0.0 + k[2489]*y_cur[IDX_O2I]; + data[jistart + 4739] = 0.0 + k[4882]*y_cur[IDX_O2I]; + data[jistart + 4740] = 0.0 + k[2489]*y_cur[IDX_H2COII] + k[4882]*y_cur[IDX_C2H3I] + + k[5041]*y_cur[IDX_CH3I] + k[5060]*y_cur[IDX_CH4I] + + k[5144]*y_cur[IDX_H2I] + k[5209]*y_cur[IDX_HCOI]; + data[jistart + 4741] = 0.0 + k[5209]*y_cur[IDX_O2I] - k[5210]*y_cur[IDX_O2HI]; + data[jistart + 4742] = 0.0 + k[5060]*y_cur[IDX_O2I]; + data[jistart + 4743] = 0.0 - k[5150]*y_cur[IDX_O2HI]; + data[jistart + 4744] = 0.0 - k[5094]*y_cur[IDX_O2HI] - k[5095]*y_cur[IDX_O2HI]; + data[jistart + 4745] = 0.0 + k[5467]*y_cur[IDX_H2O2I] + k[5474]*y_cur[IDX_N2OI] - + k[5478]*y_cur[IDX_O2HI]; + data[jistart + 4746] = 0.0 + k[8605]*y_cur[IDX_GO2I]; + data[jistart + 4747] = 0.0 + k[5041]*y_cur[IDX_O2I] - k[5042]*y_cur[IDX_O2HI]; + data[jistart + 4748] = 0.0 - k[5282]*y_cur[IDX_O2HI]; + data[jistart + 4749] = 0.0 + k[5398]*y_cur[IDX_H2O2I] - k[5427]*y_cur[IDX_O2HI]; + data[jistart + 4750] = 0.0 - k[5152]*y_cur[IDX_O2HI]; + data[jistart + 4751] = 0.0 - k[5131]*y_cur[IDX_O2HI]; + data[jistart + 4752] = 0.0 + k[5144]*y_cur[IDX_O2I] - k[5146]*y_cur[IDX_O2HI]; + data[jistart + 4753] = 0.0 + k[5167]*y_cur[IDX_H2O2I] - k[5191]*y_cur[IDX_O2HI] - + k[5192]*y_cur[IDX_O2HI] - k[5193]*y_cur[IDX_O2HI]; + data[jistart + 4754] = 0.0 + k[7214] + k[7396] + k[7578]; + data[jistart + 4755] = 0.0 + k[8697]*y_cur[IDX_GOI]; + data[jistart + 4756] = 0.0 + k[1142]*y_cur[IDX_eM] + k[2555]*y_cur[IDX_H2OI] + + k[3590]*y_cur[IDX_NH3I] + k[6755]*y_cur[IDX_GRAINM]; + data[jistart + 4757] = 0.0 + k[680]*y_cur[IDX_O2I]; + data[jistart + 4758] = 0.0 - k[315]*y_cur[IDX_CO2II] - k[416]*y_cur[IDX_HII] - + k[527]*y_cur[IDX_HeII] - k[665]*y_cur[IDX_OII] - + k[1427]*y_cur[IDX_CII] - k[2282]*y_cur[IDX_COII] - + k[2518]*y_cur[IDX_H2OII] - k[2741]*y_cur[IDX_H3II] - + k[3303]*y_cur[IDX_HeII] - k[3304]*y_cur[IDX_HeII] - + k[3651]*y_cur[IDX_OII] - k[4985]*y_cur[IDX_CI] - + k[5438]*y_cur[IDX_OI] - k[5489]*y_cur[IDX_SI] - k[5914] - k[6256] - + k[7032]; + data[jistart + 4759] = 0.0 + k[3857]*y_cur[IDX_SOII]; + data[jistart + 4760] = 0.0 - k[315]*y_cur[IDX_SO2I]; + data[jistart + 4761] = 0.0 + k[8697]*y_cur[IDX_GSOI]; + data[jistart + 4762] = 0.0 + k[127]*y_cur[IDX_O2I]; + data[jistart + 4763] = 0.0 - k[2282]*y_cur[IDX_SO2I]; + data[jistart + 4764] = 0.0 - k[2518]*y_cur[IDX_SO2I]; + data[jistart + 4765] = 0.0 + k[5338]*y_cur[IDX_O2I] + k[5481]*y_cur[IDX_OHI] + + k[5583]*y_cur[IDX_OI]; + data[jistart + 4766] = 0.0 + k[3857]*y_cur[IDX_CH3COCH3I]; + data[jistart + 4767] = 0.0 - k[665]*y_cur[IDX_SO2I] - k[3651]*y_cur[IDX_SO2I]; + data[jistart + 4768] = 0.0 + k[127]*y_cur[IDX_SM] + k[680]*y_cur[IDX_SO2II] + + k[5338]*y_cur[IDX_SOI]; + data[jistart + 4769] = 0.0 - k[5489]*y_cur[IDX_SO2I]; + data[jistart + 4770] = 0.0 + k[5481]*y_cur[IDX_SOI]; + data[jistart + 4771] = 0.0 + k[3590]*y_cur[IDX_HSO2II]; + data[jistart + 4772] = 0.0 - k[5438]*y_cur[IDX_SO2I] + k[5583]*y_cur[IDX_SOI]; + data[jistart + 4773] = 0.0 - k[527]*y_cur[IDX_SO2I] - k[3303]*y_cur[IDX_SO2I] - + k[3304]*y_cur[IDX_SO2I]; + data[jistart + 4774] = 0.0 - k[1427]*y_cur[IDX_SO2I]; + data[jistart + 4775] = 0.0 + k[2555]*y_cur[IDX_HSO2II]; + data[jistart + 4776] = 0.0 - k[416]*y_cur[IDX_SO2I]; + data[jistart + 4777] = 0.0 - k[4985]*y_cur[IDX_SO2I]; + data[jistart + 4778] = 0.0 - k[2741]*y_cur[IDX_SO2I]; + data[jistart + 4779] = 0.0 + k[6755]*y_cur[IDX_HSO2II]; + data[jistart + 4780] = 0.0 + k[1142]*y_cur[IDX_HSO2II]; + data[jistart + 4781] = 0.0 + k[7137] + k[7319] + k[7501]; + data[jistart + 4782] = 0.0 + k[1233]*y_cur[IDX_eM] + k[6747]*y_cur[IDX_GRAINM]; + data[jistart + 4783] = 0.0 + k[1225]*y_cur[IDX_eM] + k[6643]*y_cur[IDX_GRAINM]; + data[jistart + 4784] = 0.0 + k[6263]; + data[jistart + 4785] = 0.0 + k[6193]; + data[jistart + 4786] = 0.0 + k[5925]; + data[jistart + 4787] = 0.0 + k[1110]*y_cur[IDX_eM] + k[6491]*y_cur[IDX_GRAINM]; + data[jistart + 4788] = 0.0 + k[5440]*y_cur[IDX_OI] + k[5918]; + data[jistart + 4789] = 0.0 - k[198]*y_cur[IDX_CII] - k[425]*y_cur[IDX_HII] - + k[705]*y_cur[IDX_SII] - k[1434]*y_cur[IDX_CII] - + k[2750]*y_cur[IDX_H3II] - k[2821]*y_cur[IDX_H3OII] - + k[2997]*y_cur[IDX_HCOII] - k[3316]*y_cur[IDX_HeII] - + k[3317]*y_cur[IDX_HeII] - k[3792]*y_cur[IDX_OHII] - + k[5292]*y_cur[IDX_NI] - k[5293]*y_cur[IDX_NI] - + k[5443]*y_cur[IDX_OI] - k[5444]*y_cur[IDX_OI] - k[5924] - k[6267] - + k[6955]; + data[jistart + 4790] = 0.0 + k[1244]*y_cur[IDX_eM] + k[6498]*y_cur[IDX_GRAINM]; + data[jistart + 4791] = 0.0 + k[4990]*y_cur[IDX_CI]; + data[jistart + 4792] = 0.0 - k[3792]*y_cur[IDX_SiCI]; + data[jistart + 4793] = 0.0 - k[705]*y_cur[IDX_SiCI]; + data[jistart + 4794] = 0.0 - k[5292]*y_cur[IDX_SiCI] - k[5293]*y_cur[IDX_SiCI]; + data[jistart + 4795] = 0.0 - k[2821]*y_cur[IDX_SiCI]; + data[jistart + 4796] = 0.0 + k[5440]*y_cur[IDX_SiC2I] - k[5443]*y_cur[IDX_SiCI] - + k[5444]*y_cur[IDX_SiCI]; + data[jistart + 4797] = 0.0 - k[3316]*y_cur[IDX_SiCI] - k[3317]*y_cur[IDX_SiCI]; + data[jistart + 4798] = 0.0 - k[198]*y_cur[IDX_SiCI] - k[1434]*y_cur[IDX_SiCI]; + data[jistart + 4799] = 0.0 - k[425]*y_cur[IDX_SiCI]; + data[jistart + 4800] = 0.0 + k[4990]*y_cur[IDX_SiHI]; + data[jistart + 4801] = 0.0 - k[2997]*y_cur[IDX_SiCI]; + data[jistart + 4802] = 0.0 - k[2750]*y_cur[IDX_SiCI]; + data[jistart + 4803] = 0.0 + k[6491]*y_cur[IDX_HCSiII] + k[6498]*y_cur[IDX_SiCH2II] + + k[6643]*y_cur[IDX_SiC2II] + k[6747]*y_cur[IDX_SiC3II]; + data[jistart + 4804] = 0.0 + k[1110]*y_cur[IDX_HCSiII] + k[1225]*y_cur[IDX_SiC2II] + + k[1233]*y_cur[IDX_SiC3II] + k[1244]*y_cur[IDX_SiCH2II]; + data[jistart + 4805] = 0.0 + k[7169] + k[7351] + k[7533]; + data[jistart + 4806] = 0.0 + k[777]*y_cur[IDX_eM] + k[3559]*y_cur[IDX_NH3I] + + k[6609]*y_cur[IDX_GRAINM]; + data[jistart + 4807] = 0.0 + k[8753]*y_cur[IDX_GCH3I]; + data[jistart + 4808] = 0.0 - k[1724]*y_cur[IDX_C2H5OHI]; + data[jistart + 4809] = 0.0 - k[150]*y_cur[IDX_CII] - k[328]*y_cur[IDX_HII] - + k[1307]*y_cur[IDX_CII] - k[1724]*y_cur[IDX_S2II] - + k[2592]*y_cur[IDX_H3II] - k[2593]*y_cur[IDX_H3II] - + k[2594]*y_cur[IDX_H3II] - k[2595]*y_cur[IDX_H3II] - + k[2596]*y_cur[IDX_H3II] - k[2768]*y_cur[IDX_H3OII] - + k[2903]*y_cur[IDX_HCOII] - k[3013]*y_cur[IDX_HCSII] - + k[3085]*y_cur[IDX_HeII] - k[3859]*y_cur[IDX_SiII] - k[5706] - + k[5707] - k[5991] - k[5992] - k[6987]; + data[jistart + 4810] = 0.0 + k[2661]*y_cur[IDX_H3II]; + data[jistart + 4811] = 0.0 - k[3013]*y_cur[IDX_C2H5OHI]; + data[jistart + 4812] = 0.0 + k[8753]*y_cur[IDX_GCH2OHI]; + data[jistart + 4813] = 0.0 - k[3859]*y_cur[IDX_C2H5OHI]; + data[jistart + 4814] = 0.0 + k[3559]*y_cur[IDX_C2H5OH2II]; + data[jistart + 4815] = 0.0 - k[2768]*y_cur[IDX_C2H5OHI]; + data[jistart + 4816] = 0.0 - k[3085]*y_cur[IDX_C2H5OHI]; + data[jistart + 4817] = 0.0 - k[150]*y_cur[IDX_C2H5OHI] - k[1307]*y_cur[IDX_C2H5OHI]; + data[jistart + 4818] = 0.0 - k[328]*y_cur[IDX_C2H5OHI]; + data[jistart + 4819] = 0.0 - k[2903]*y_cur[IDX_C2H5OHI]; + data[jistart + 4820] = 0.0 - k[2592]*y_cur[IDX_C2H5OHI] - k[2593]*y_cur[IDX_C2H5OHI] - + k[2594]*y_cur[IDX_C2H5OHI] - k[2595]*y_cur[IDX_C2H5OHI] - + k[2596]*y_cur[IDX_C2H5OHI] + k[2661]*y_cur[IDX_CH3COCH3I]; + data[jistart + 4821] = 0.0 + k[6609]*y_cur[IDX_C2H5OH2II]; + data[jistart + 4822] = 0.0 + k[777]*y_cur[IDX_C2H5OH2II]; + data[jistart + 4823] = 0.0 + k[1010]*y_cur[IDX_eM] + k[6431]*y_cur[IDX_GRAINM]; + data[jistart + 4824] = 0.0 + k[7112] + k[7294] + k[7476]; + data[jistart + 4825] = 0.0 + k[5203]*y_cur[IDX_OI]; + data[jistart + 4826] = 0.0 + k[8604]*y_cur[IDX_GHI]; + data[jistart + 4827] = 0.0 + k[5037]*y_cur[IDX_CH3I] + k[5311]*y_cur[IDX_NHI]; + data[jistart + 4828] = 0.0 + k[8687]*y_cur[IDX_GOI]; + data[jistart + 4829] = 0.0 - k[2349]*y_cur[IDX_HII] - k[2709]*y_cur[IDX_H3II] - + k[3265]*y_cur[IDX_HeII] - k[3266]*y_cur[IDX_HeII] - + k[5000]*y_cur[IDX_CH2I] - k[5034]*y_cur[IDX_CH3I] - + k[5078]*y_cur[IDX_CHI] - k[5119]*y_cur[IDX_CNI] - + k[5127]*y_cur[IDX_COI] - k[5175]*y_cur[IDX_HI] - + k[5176]*y_cur[IDX_HI] - k[5177]*y_cur[IDX_HI] - + k[5206]*y_cur[IDX_HCOI] - k[5269]*y_cur[IDX_NI] - + k[5270]*y_cur[IDX_NI] - k[5326]*y_cur[IDX_NOI] - + k[5411]*y_cur[IDX_OI] - k[5412]*y_cur[IDX_OI] - + k[5413]*y_cur[IDX_OI] - k[5472]*y_cur[IDX_OHI] - k[5869] - k[6200] - + k[6930]; + data[jistart + 4830] = 0.0 + k[5473]*y_cur[IDX_OHI]; + data[jistart + 4831] = 0.0 + k[626]*y_cur[IDX_NOI]; + data[jistart + 4832] = 0.0 + k[8687]*y_cur[IDX_GNHI]; + data[jistart + 4833] = 0.0 + k[5420]*y_cur[IDX_OI]; + data[jistart + 4834] = 0.0 + k[5311]*y_cur[IDX_NO2I] + k[5316]*y_cur[IDX_O2I] + + k[5322]*y_cur[IDX_OHI]; + data[jistart + 4835] = 0.0 - k[5000]*y_cur[IDX_HNOI]; + data[jistart + 4836] = 0.0 + k[5316]*y_cur[IDX_NHI]; + data[jistart + 4837] = 0.0 + k[626]*y_cur[IDX_HNOII] + k[5207]*y_cur[IDX_HCOI] - + k[5326]*y_cur[IDX_HNOI]; + data[jistart + 4838] = 0.0 - k[5206]*y_cur[IDX_HNOI] + k[5207]*y_cur[IDX_NOI]; + data[jistart + 4839] = 0.0 - k[5078]*y_cur[IDX_HNOI]; + data[jistart + 4840] = 0.0 + k[5322]*y_cur[IDX_NHI] - k[5472]*y_cur[IDX_HNOI] + + k[5473]*y_cur[IDX_N2OI]; + data[jistart + 4841] = 0.0 - k[5119]*y_cur[IDX_HNOI]; + data[jistart + 4842] = 0.0 + k[8604]*y_cur[IDX_GNOI]; + data[jistart + 4843] = 0.0 - k[5034]*y_cur[IDX_HNOI] + k[5037]*y_cur[IDX_NO2I]; + data[jistart + 4844] = 0.0 - k[5269]*y_cur[IDX_HNOI] - k[5270]*y_cur[IDX_HNOI]; + data[jistart + 4845] = 0.0 + k[5203]*y_cur[IDX_HCNOI] - k[5411]*y_cur[IDX_HNOI] - + k[5412]*y_cur[IDX_HNOI] - k[5413]*y_cur[IDX_HNOI] + + k[5420]*y_cur[IDX_NH2I]; + data[jistart + 4846] = 0.0 - k[3265]*y_cur[IDX_HNOI] - k[3266]*y_cur[IDX_HNOI]; + data[jistart + 4847] = 0.0 - k[2349]*y_cur[IDX_HNOI]; + data[jistart + 4848] = 0.0 - k[2709]*y_cur[IDX_HNOI]; + data[jistart + 4849] = 0.0 - k[5127]*y_cur[IDX_HNOI]; + data[jistart + 4850] = 0.0 + k[6431]*y_cur[IDX_H2NOII]; + data[jistart + 4851] = 0.0 + k[1010]*y_cur[IDX_H2NOII]; + data[jistart + 4852] = 0.0 - k[5175]*y_cur[IDX_HNOI] - k[5176]*y_cur[IDX_HNOI] - + k[5177]*y_cur[IDX_HNOI]; + data[jistart + 4853] = 0.0 + k[7156] + k[7338] + k[7520]; + data[jistart + 4854] = 0.0 + k[482]*y_cur[IDX_H2OI] + k[485]*y_cur[IDX_H2SI]; + data[jistart + 4855] = 0.0 + k[5276]*y_cur[IDX_NI] + k[5312]*y_cur[IDX_NHI]; + data[jistart + 4856] = 0.0 + k[5269]*y_cur[IDX_NI] + k[5326]*y_cur[IDX_NOI]; + data[jistart + 4857] = 0.0 - k[399]*y_cur[IDX_HII] - k[659]*y_cur[IDX_OII] - + k[1416]*y_cur[IDX_CII] - k[2085]*y_cur[IDX_CH3II] - + k[2234]*y_cur[IDX_CH5II] - k[2354]*y_cur[IDX_HII] - + k[2719]*y_cur[IDX_H3II] - k[2978]*y_cur[IDX_HCOII] - + k[3275]*y_cur[IDX_HeII] - k[3276]*y_cur[IDX_HeII] - + k[3277]*y_cur[IDX_HeII] - k[3278]*y_cur[IDX_HeII] - + k[5128]*y_cur[IDX_COI] - k[5179]*y_cur[IDX_HI] - + k[5180]*y_cur[IDX_HI] - k[5327]*y_cur[IDX_NOI] - + k[5418]*y_cur[IDX_OI] - k[5419]*y_cur[IDX_OI] - + k[5473]*y_cur[IDX_OHI] - k[5474]*y_cur[IDX_OHI] - k[5879] - k[6212] + - k[6213] - k[6214] - k[6974]; + data[jistart + 4858] = 0.0 + k[5332]*y_cur[IDX_NOI]; + data[jistart + 4859] = 0.0 - k[2234]*y_cur[IDX_N2OI]; + data[jistart + 4860] = 0.0 + k[5312]*y_cur[IDX_NO2I] + k[5315]*y_cur[IDX_NOI]; + data[jistart + 4861] = 0.0 - k[659]*y_cur[IDX_N2OI]; + data[jistart + 4862] = 0.0 + k[5220]*y_cur[IDX_O2I]; + data[jistart + 4863] = 0.0 + k[5220]*y_cur[IDX_N2I]; + data[jistart + 4864] = 0.0 + k[485]*y_cur[IDX_N2OII]; + data[jistart + 4865] = 0.0 + k[5315]*y_cur[IDX_NHI] + k[5326]*y_cur[IDX_HNOI] - + k[5327]*y_cur[IDX_N2OI] + k[5328]*y_cur[IDX_NOI] + + k[5328]*y_cur[IDX_NOI] + k[5332]*y_cur[IDX_OCNI]; + data[jistart + 4866] = 0.0 - k[5473]*y_cur[IDX_N2OI] - k[5474]*y_cur[IDX_N2OI]; + data[jistart + 4867] = 0.0 - k[2085]*y_cur[IDX_N2OI]; + data[jistart + 4868] = 0.0 + k[5269]*y_cur[IDX_HNOI] + k[5276]*y_cur[IDX_NO2I]; + data[jistart + 4869] = 0.0 - k[5418]*y_cur[IDX_N2OI] - k[5419]*y_cur[IDX_N2OI]; + data[jistart + 4870] = 0.0 - k[3275]*y_cur[IDX_N2OI] - k[3276]*y_cur[IDX_N2OI] - + k[3277]*y_cur[IDX_N2OI] - k[3278]*y_cur[IDX_N2OI]; + data[jistart + 4871] = 0.0 - k[1416]*y_cur[IDX_N2OI]; + data[jistart + 4872] = 0.0 + k[482]*y_cur[IDX_N2OII]; + data[jistart + 4873] = 0.0 - k[399]*y_cur[IDX_N2OI] - k[2354]*y_cur[IDX_N2OI]; + data[jistart + 4874] = 0.0 - k[2978]*y_cur[IDX_N2OI]; + data[jistart + 4875] = 0.0 - k[2719]*y_cur[IDX_N2OI]; + data[jistart + 4876] = 0.0 - k[5128]*y_cur[IDX_N2OI]; + data[jistart + 4877] = 0.0 - k[5179]*y_cur[IDX_N2OI] - k[5180]*y_cur[IDX_N2OI]; + data[jistart + 4878] = 0.0 + k[7109] + k[7291] + k[7473]; + data[jistart + 4879] = 0.0 + k[8602]*y_cur[IDX_GHI]; + data[jistart + 4880] = 0.0 + k[1257]*y_cur[IDX_eM] + k[2291]*y_cur[IDX_COI] + + k[2572]*y_cur[IDX_H2OI] + k[6427]*y_cur[IDX_GRAINM]; + data[jistart + 4881] = 0.0 + k[1258]*y_cur[IDX_eM] + k[6438]*y_cur[IDX_GRAINM]; + data[jistart + 4882] = 0.0 - k[202]*y_cur[IDX_CII] - k[429]*y_cur[IDX_HII] - + k[1441]*y_cur[IDX_CII] - k[1442]*y_cur[IDX_CII] - + k[2363]*y_cur[IDX_HII] - k[2754]*y_cur[IDX_H3II] - + k[3324]*y_cur[IDX_HeII] - k[3325]*y_cur[IDX_HeII] - + k[4989]*y_cur[IDX_CI] - k[5295]*y_cur[IDX_NI] - + k[5447]*y_cur[IDX_OI] - k[5928] - k[6274] - k[6275] - k[6276] - + k[6927]; + data[jistart + 4883] = 0.0 + k[1684]*y_cur[IDX_C2H4II] + k[5126]*y_cur[IDX_CNI] + + k[5448]*y_cur[IDX_OI] + k[6278]; + data[jistart + 4884] = 0.0 + k[1684]*y_cur[IDX_SiH4I]; + data[jistart + 4885] = 0.0 + k[5126]*y_cur[IDX_SiH4I]; + data[jistart + 4886] = 0.0 + k[8602]*y_cur[IDX_GSiH2I]; + data[jistart + 4887] = 0.0 - k[5295]*y_cur[IDX_SiH3I]; + data[jistart + 4888] = 0.0 - k[5447]*y_cur[IDX_SiH3I] + k[5448]*y_cur[IDX_SiH4I]; + data[jistart + 4889] = 0.0 - k[3324]*y_cur[IDX_SiH3I] - k[3325]*y_cur[IDX_SiH3I]; + data[jistart + 4890] = 0.0 - k[202]*y_cur[IDX_SiH3I] - k[1441]*y_cur[IDX_SiH3I] - + k[1442]*y_cur[IDX_SiH3I]; + data[jistart + 4891] = 0.0 + k[2572]*y_cur[IDX_SiH4II]; + data[jistart + 4892] = 0.0 - k[429]*y_cur[IDX_SiH3I] - k[2363]*y_cur[IDX_SiH3I]; + data[jistart + 4893] = 0.0 - k[4989]*y_cur[IDX_SiH3I]; + data[jistart + 4894] = 0.0 - k[2754]*y_cur[IDX_SiH3I]; + data[jistart + 4895] = 0.0 + k[2291]*y_cur[IDX_SiH4II]; + data[jistart + 4896] = 0.0 + k[6427]*y_cur[IDX_SiH4II] + k[6438]*y_cur[IDX_SiH5II]; + data[jistart + 4897] = 0.0 + k[1257]*y_cur[IDX_SiH4II] + k[1258]*y_cur[IDX_SiH5II]; + data[jistart + 4898] = 0.0 + k[2131]*y_cur[IDX_CH3OHI]; + data[jistart + 4899] = 0.0 + k[2127]*y_cur[IDX_CH3OHI]; + data[jistart + 4900] = 0.0 + k[2128]*y_cur[IDX_CH3OHI]; + data[jistart + 4901] = 0.0 - k[2120]*y_cur[IDX_CH3OH2II]; + data[jistart + 4902] = 0.0 - k[963]*y_cur[IDX_eM] - k[964]*y_cur[IDX_eM] - + k[965]*y_cur[IDX_eM] - k[966]*y_cur[IDX_eM] - k[967]*y_cur[IDX_eM] - + k[2120]*y_cur[IDX_HCOOHI] - k[2121]*y_cur[IDX_NH3I] - + k[2125]*y_cur[IDX_CH3OHI] - k[2494]*y_cur[IDX_H2COI] - + k[2495]*y_cur[IDX_H2COI] - k[2873]*y_cur[IDX_HCNI] - + k[6440]*y_cur[IDX_GRAINM] - k[6441]*y_cur[IDX_GRAINM] - + k[6442]*y_cur[IDX_GRAINM] - k[6443]*y_cur[IDX_GRAINM] - + k[6444]*y_cur[IDX_GRAINM]; + data[jistart + 4903] = 0.0 + k[2126]*y_cur[IDX_CH3OHI]; + data[jistart + 4904] = 0.0 + k[2137]*y_cur[IDX_CH3OHI]; + data[jistart + 4905] = 0.0 + k[1937]*y_cur[IDX_CHII] + k[2124]*y_cur[IDX_C4H3II] - + k[2125]*y_cur[IDX_CH3OH2II] + k[2126]*y_cur[IDX_HC3NHII] + + k[2127]*y_cur[IDX_HCOOH2II] + k[2128]*y_cur[IDX_NCCNHII] + + k[2131]*y_cur[IDX_PH3II] + k[2137]*y_cur[IDX_CH4II] + + k[2487]*y_cur[IDX_H2COII] + k[2668]*y_cur[IDX_H3II] + + k[2762]*y_cur[IDX_H3COII] + k[2795]*y_cur[IDX_H3OII] + + k[2954]*y_cur[IDX_HCOII]; + data[jistart + 4906] = 0.0 + k[2762]*y_cur[IDX_CH3OHI]; + data[jistart + 4907] = 0.0 + k[1937]*y_cur[IDX_CH3OHI]; + data[jistart + 4908] = 0.0 + k[2124]*y_cur[IDX_CH3OHI]; + data[jistart + 4909] = 0.0 + k[2487]*y_cur[IDX_CH3OHI]; + data[jistart + 4910] = 0.0 - k[2494]*y_cur[IDX_CH3OH2II] - k[2495]*y_cur[IDX_CH3OH2II]; + data[jistart + 4911] = 0.0 - k[2873]*y_cur[IDX_CH3OH2II]; + data[jistart + 4912] = 0.0 - k[2121]*y_cur[IDX_CH3OH2II]; + data[jistart + 4913] = 0.0 + k[5536]*y_cur[IDX_H2OI]; + data[jistart + 4914] = 0.0 + k[2795]*y_cur[IDX_CH3OHI]; + data[jistart + 4915] = 0.0 + k[5536]*y_cur[IDX_CH3II]; + data[jistart + 4916] = 0.0 + k[2954]*y_cur[IDX_CH3OHI]; + data[jistart + 4917] = 0.0 + k[2668]*y_cur[IDX_CH3OHI]; + data[jistart + 4918] = 0.0 - k[6440]*y_cur[IDX_CH3OH2II] - k[6441]*y_cur[IDX_CH3OH2II] - + k[6442]*y_cur[IDX_CH3OH2II] - k[6443]*y_cur[IDX_CH3OH2II] - + k[6444]*y_cur[IDX_CH3OH2II]; + data[jistart + 4919] = 0.0 - k[963]*y_cur[IDX_CH3OH2II] - k[964]*y_cur[IDX_CH3OH2II] - + k[965]*y_cur[IDX_CH3OH2II] - k[966]*y_cur[IDX_CH3OH2II] - + k[967]*y_cur[IDX_CH3OH2II]; + data[jistart + 4920] = 0.0 - k[780]*y_cur[IDX_eM] - k[781]*y_cur[IDX_eM] - + k[1540]*y_cur[IDX_C2H2I] - k[1541]*y_cur[IDX_C2H2I] - + k[2525]*y_cur[IDX_H2OI] - k[2526]*y_cur[IDX_H2OI] - + k[2575]*y_cur[IDX_H2SI] - k[3561]*y_cur[IDX_NH3I] - + k[6466]*y_cur[IDX_GRAINM] - k[6467]*y_cur[IDX_GRAINM]; + data[jistart + 4921] = 0.0 + k[3460]*y_cur[IDX_NI]; + data[jistart + 4922] = 0.0 + k[183]*y_cur[IDX_CII] + k[3351]*y_cur[IDX_NII]; + data[jistart + 4923] = 0.0 + k[3606]*y_cur[IDX_NHI]; + data[jistart + 4924] = 0.0 + k[3478]*y_cur[IDX_C2I]; + data[jistart + 4925] = 0.0 + k[1398]*y_cur[IDX_CII] + k[3234]*y_cur[IDX_HeII]; + data[jistart + 4926] = 0.0 + k[330]*y_cur[IDX_HII]; + data[jistart + 4927] = 0.0 + k[3385]*y_cur[IDX_NI]; + data[jistart + 4928] = 0.0 + k[1944]*y_cur[IDX_CNI] + k[1956]*y_cur[IDX_HCNI]; + data[jistart + 4929] = 0.0 + k[3606]*y_cur[IDX_C2II]; + data[jistart + 4930] = 0.0 + k[3351]*y_cur[IDX_NCCNI]; + data[jistart + 4931] = 0.0 + k[1413]*y_cur[IDX_CII]; + data[jistart + 4932] = 0.0 - k[2575]*y_cur[IDX_C2NII]; + data[jistart + 4933] = 0.0 + k[1956]*y_cur[IDX_CHII]; + data[jistart + 4934] = 0.0 + k[3478]*y_cur[IDX_NHII]; + data[jistart + 4935] = 0.0 - k[3561]*y_cur[IDX_C2NII]; + data[jistart + 4936] = 0.0 + k[3387]*y_cur[IDX_NI]; + data[jistart + 4937] = 0.0 - k[1540]*y_cur[IDX_C2NII] - k[1541]*y_cur[IDX_C2NII]; + data[jistart + 4938] = 0.0 + k[1944]*y_cur[IDX_CHII]; + data[jistart + 4939] = 0.0 + k[3385]*y_cur[IDX_C2HII] + k[3387]*y_cur[IDX_C2H2II] + + k[3460]*y_cur[IDX_HC3NII]; + data[jistart + 4940] = 0.0 + k[3234]*y_cur[IDX_HC3NI]; + data[jistart + 4941] = 0.0 + k[183]*y_cur[IDX_NCCNI] + k[1398]*y_cur[IDX_HC3NI] + + k[1413]*y_cur[IDX_HNCI]; + data[jistart + 4942] = 0.0 - k[2525]*y_cur[IDX_C2NII] - k[2526]*y_cur[IDX_C2NII]; + data[jistart + 4943] = 0.0 + k[330]*y_cur[IDX_C2NI]; + data[jistart + 4944] = 0.0 - k[6466]*y_cur[IDX_C2NII] - k[6467]*y_cur[IDX_C2NII]; + data[jistart + 4945] = 0.0 - k[780]*y_cur[IDX_C2NII] - k[781]*y_cur[IDX_C2NII]; + data[jistart + 4946] = 0.0 + k[1321]*y_cur[IDX_CII]; + data[jistart + 4947] = 0.0 - k[236]*y_cur[IDX_C2H4I] - k[838]*y_cur[IDX_eM] - + k[1556]*y_cur[IDX_C2H2I] - k[1698]*y_cur[IDX_C2H4I] - + k[1699]*y_cur[IDX_C2H4I] - k[1700]*y_cur[IDX_C2H4I] - + k[2176]*y_cur[IDX_CH4I] - k[2177]*y_cur[IDX_CH4I] - + k[2178]*y_cur[IDX_CH4I] - k[2179]*y_cur[IDX_CH4I] - + k[2414]*y_cur[IDX_H2I] - k[2871]*y_cur[IDX_HCNI] - k[6709]*y_cur[IDX_GRAINM]; - data[jistart + 2296] = 0.0 - k[28]*y_cur[IDX_C3I]; - data[jistart + 2297] = 0.0 + k[5742] + k[6027]; - data[jistart + 2298] = 0.0 + k[4931]*y_cur[IDX_CI]; - data[jistart + 2299] = 0.0 + k[1557]*y_cur[IDX_C2H2I]; - data[jistart + 2300] = 0.0 - k[32]*y_cur[IDX_C3I] + - k[3418]*y_cur[IDX_NI]; - data[jistart + 2301] = 0.0 + k[5752] + k[6039]; - data[jistart + 2302] = 0.0 + k[4934]*y_cur[IDX_CI]; - data[jistart + 2303] = 0.0 + k[863]*y_cur[IDX_eM] + - k[6821]*y_cur[IDX_GRAINM]; - data[jistart + 2304] = 0.0 - k[35]*y_cur[IDX_C3I]; - data[jistart + 2305] = 0.0 + k[3437]*y_cur[IDX_NI]; - data[jistart + 2306] = 0.0 + k[4067]*y_cur[IDX_C3M]; - data[jistart + 2307] = 0.0 + k[4068]*y_cur[IDX_C3M]; - data[jistart + 2308] = 0.0 + k[4069]*y_cur[IDX_C3M]; - data[jistart + 2309] = 0.0 + k[4070]*y_cur[IDX_C3M]; - data[jistart + 2310] = 0.0 + k[8662]*y_cur[IDX_GC2I]; - data[jistart + 2311] = 0.0 + k[8662]*y_cur[IDX_GCI]; - data[jistart + 2312] = 0.0 + k[7125] + k[7307] + k[7489]; - data[jistart + 2313] = 0.0 + k[6460]*y_cur[IDX_C3HII] + - k[6463]*y_cur[IDX_C3H2II] + k[6464]*y_cur[IDX_C3H2II] + - k[6616]*y_cur[IDX_C4II] + k[6709]*y_cur[IDX_C5II] + - k[6776]*y_cur[IDX_C3SII] + k[6817]*y_cur[IDX_C4SII] + - k[6821]*y_cur[IDX_C7II] + k[6873]*y_cur[IDX_C10HII] + - k[6886]*y_cur[IDX_C11II]; - data[jistart + 2314] = 0.0 - k[333]*y_cur[IDX_C3I] + - k[4071]*y_cur[IDX_C3M]; - data[jistart + 2315] = 0.0 + k[6149]; - data[jistart + 2316] = 0.0 + k[4072]*y_cur[IDX_C3M]; - data[jistart + 2317] = 0.0 + k[4073]*y_cur[IDX_C3M]; - data[jistart + 2318] = 0.0 - k[2601]*y_cur[IDX_C3I] + - k[4074]*y_cur[IDX_C3M]; - data[jistart + 2319] = 0.0 - k[2771]*y_cur[IDX_C3I] + - k[4075]*y_cur[IDX_C3M]; - data[jistart + 2320] = 0.0 + k[4076]*y_cur[IDX_C3M]; - data[jistart + 2321] = 0.0 + k[4077]*y_cur[IDX_C3M] + - k[4078]*y_cur[IDX_C3M]; - data[jistart + 2322] = 0.0 - k[2906]*y_cur[IDX_C3I] + - k[4079]*y_cur[IDX_C3M] + k[4080]*y_cur[IDX_C3M]; - data[jistart + 2323] = 0.0 + k[3017]*y_cur[IDX_CII] + - k[3033]*y_cur[IDX_HeII] + k[5212]*y_cur[IDX_CI]; - data[jistart + 2324] = 0.0 + k[3033]*y_cur[IDX_HNC3I] + - k[3057]*y_cur[IDX_C10I] + k[3059]*y_cur[IDX_C10I] + - k[3064]*y_cur[IDX_C10H2I] + k[3067]*y_cur[IDX_C10HI] + - k[3069]*y_cur[IDX_C10HI] + k[3071]*y_cur[IDX_C10HI] - - k[3095]*y_cur[IDX_C3I] + k[3102]*y_cur[IDX_C3PI] + - k[3107]*y_cur[IDX_C4I] + k[3115]*y_cur[IDX_C4SI] + - k[4081]*y_cur[IDX_C3M]; - data[jistart + 2325] = 0.0 + k[4082]*y_cur[IDX_C3M]; - data[jistart + 2326] = 0.0 + k[3402]*y_cur[IDX_C4M] + - k[3407]*y_cur[IDX_C4H2II] + k[3418]*y_cur[IDX_C6M] + - k[3437]*y_cur[IDX_C8M] - k[5231]*y_cur[IDX_C3I] + - k[5235]*y_cur[IDX_C4I]; - data[jistart + 2327] = 0.0 + k[4083]*y_cur[IDX_C3M]; - data[jistart + 2328] = 0.0 + k[4084]*y_cur[IDX_C3M]; - data[jistart + 2329] = 0.0 + k[3562]*y_cur[IDX_C3HII]; - data[jistart + 2330] = 0.0 + k[4085]*y_cur[IDX_C3M]; - data[jistart + 2331] = 0.0 + k[4086]*y_cur[IDX_C3M]; - data[jistart + 2332] = 0.0 + k[4087]*y_cur[IDX_C3M]; - data[jistart + 2333] = 0.0 + k[4088]*y_cur[IDX_C3M]; - data[jistart + 2334] = 0.0 + k[3699]*y_cur[IDX_C4HII] - - k[5356]*y_cur[IDX_C3I] + k[5361]*y_cur[IDX_C4I]; - data[jistart + 2335] = 0.0 + k[4089]*y_cur[IDX_C3M]; - data[jistart + 2336] = 0.0 + k[4090]*y_cur[IDX_C3M]; - data[jistart + 2337] = 0.0 + k[4091]*y_cur[IDX_C3M]; - data[jistart + 2338] = 0.0 + k[4092]*y_cur[IDX_C3M]; - data[jistart + 2339] = 0.0 + k[4093]*y_cur[IDX_C3M]; - data[jistart + 2340] = 0.0 + k[4094]*y_cur[IDX_C3M]; - data[jistart + 2341] = 0.0 + k[4095]*y_cur[IDX_C3M]; - data[jistart + 2342] = 0.0 + k[731]*y_cur[IDX_C10HII] + - k[737]*y_cur[IDX_C11II] + k[790]*y_cur[IDX_C3HII] + - k[793]*y_cur[IDX_C3H2II] + k[794]*y_cur[IDX_C3H2II] + - k[817]*y_cur[IDX_C3SII] + k[820]*y_cur[IDX_C4II] + - k[837]*y_cur[IDX_C4SII] + k[838]*y_cur[IDX_C5II] + - k[863]*y_cur[IDX_C7II] - k[5591]*y_cur[IDX_C3I]; - data[jistart + 2343] = 0.0 + k[1849]*y_cur[IDX_C2HII]; - data[jistart + 2344] = 0.0 + k[1308]*y_cur[IDX_C2HI] + - k[1309]*y_cur[IDX_C2SI] + k[1313]*y_cur[IDX_C3OI] + - k[1399]*y_cur[IDX_HC3NI] + k[3016]*y_cur[IDX_HNC3I]; - data[jistart + 2345] = 0.0 + k[1451]*y_cur[IDX_C2II] + - k[1933]*y_cur[IDX_CHII]; - data[jistart + 2346] = 0.0 + k[1451]*y_cur[IDX_C2I] + - k[2239]*y_cur[IDX_CHI]; - data[jistart + 2347] = 0.0 + k[1308]*y_cur[IDX_CII] + - k[1935]*y_cur[IDX_CHII]; - data[jistart + 2348] = 0.0 + k[1849]*y_cur[IDX_CI]; - data[jistart + 2349] = 0.0 - k[1543]*y_cur[IDX_C3II]; - data[jistart + 2350] = 0.0 - k[235]*y_cur[IDX_C3II] - - k[1686]*y_cur[IDX_C3II] - k[1687]*y_cur[IDX_C3II] - - k[1688]*y_cur[IDX_C3II]; - data[jistart + 2351] = 0.0 + k[1309]*y_cur[IDX_CII]; - data[jistart + 2352] = 0.0 + k[333]*y_cur[IDX_HII]; - data[jistart + 2353] = 0.0 - k[235]*y_cur[IDX_C2H4I] - - k[788]*y_cur[IDX_eM] - k[1543]*y_cur[IDX_C2H2I] - - k[1686]*y_cur[IDX_C2H4I] - k[1687]*y_cur[IDX_C2H4I] - - k[1688]*y_cur[IDX_C2H4I] - k[1752]*y_cur[IDX_HC3NI] - - k[2157]*y_cur[IDX_CH4I] - k[2158]*y_cur[IDX_CH4I] - - k[2159]*y_cur[IDX_CH4I] - k[2406]*y_cur[IDX_H2I] - - k[2867]*y_cur[IDX_HCNI] - k[2868]*y_cur[IDX_HCNI] - - k[3668]*y_cur[IDX_O2I] - k[6455]*y_cur[IDX_GRAINM]; - data[jistart + 2354] = 0.0 + k[2301]*y_cur[IDX_HII] + - k[3097]*y_cur[IDX_HeII]; - data[jistart + 2355] = 0.0 + k[1313]*y_cur[IDX_CII] + - k[3099]*y_cur[IDX_HeII]; - data[jistart + 2356] = 0.0 + k[3101]*y_cur[IDX_HeII]; - data[jistart + 2357] = 0.0 + k[3106]*y_cur[IDX_HeII]; - data[jistart + 2358] = 0.0 + k[3116]*y_cur[IDX_HeII]; - data[jistart + 2359] = 0.0 + k[3117]*y_cur[IDX_HeII]; - data[jistart + 2360] = 0.0 + k[2239]*y_cur[IDX_C2II]; - data[jistart + 2361] = 0.0 + k[1933]*y_cur[IDX_C2I] + - k[1935]*y_cur[IDX_C2HI]; - data[jistart + 2362] = 0.0 + k[3162]*y_cur[IDX_HeII]; - data[jistart + 2363] = 0.0 + k[3184]*y_cur[IDX_HeII]; - data[jistart + 2364] = 0.0 - k[2157]*y_cur[IDX_C3II] - - k[2158]*y_cur[IDX_C3II] - k[2159]*y_cur[IDX_C3II]; - data[jistart + 2365] = 0.0 - k[6455]*y_cur[IDX_C3II]; - data[jistart + 2366] = 0.0 + k[333]*y_cur[IDX_C3I] + - k[2301]*y_cur[IDX_C3HI]; - data[jistart + 2367] = 0.0 - k[2406]*y_cur[IDX_C3II]; - data[jistart + 2368] = 0.0 + k[3217]*y_cur[IDX_HeII]; - data[jistart + 2369] = 0.0 + k[1399]*y_cur[IDX_CII] - - k[1752]*y_cur[IDX_C3II]; - data[jistart + 2370] = 0.0 - k[2867]*y_cur[IDX_C3II] - - k[2868]*y_cur[IDX_C3II]; - data[jistart + 2371] = 0.0 + k[3016]*y_cur[IDX_CII] + - k[3032]*y_cur[IDX_HeII]; - data[jistart + 2372] = 0.0 + k[3032]*y_cur[IDX_HNC3I] + - k[3097]*y_cur[IDX_C3HI] + k[3099]*y_cur[IDX_C3OI] + - k[3101]*y_cur[IDX_C3PI] + k[3106]*y_cur[IDX_C4I] + - k[3116]*y_cur[IDX_C4SI] + k[3117]*y_cur[IDX_C5I] + - k[3162]*y_cur[IDX_CH2CCHI] + k[3184]*y_cur[IDX_CH3CCHI] + - k[3217]*y_cur[IDX_H2CCCI]; - data[jistart + 2373] = 0.0 - k[3668]*y_cur[IDX_C3II]; - data[jistart + 2374] = 0.0 - k[788]*y_cur[IDX_C3II]; - data[jistart + 2375] = 0.0 - k[40]*y_cur[IDX_C3M]; - data[jistart + 2376] = 0.0 - k[4061]*y_cur[IDX_C3M]; - data[jistart + 2377] = 0.0 - k[4062]*y_cur[IDX_C3M]; - data[jistart + 2378] = 0.0 - k[4063]*y_cur[IDX_C3M]; - data[jistart + 2379] = 0.0 - k[17]*y_cur[IDX_C3M] + - k[5591]*y_cur[IDX_eM]; - data[jistart + 2380] = 0.0 - k[17]*y_cur[IDX_C3I] - - k[18]*y_cur[IDX_C4I] - k[19]*y_cur[IDX_C5I] - k[20]*y_cur[IDX_C6I] - - k[21]*y_cur[IDX_C7I] - k[40]*y_cur[IDX_CI] - k[89]*y_cur[IDX_HI] - - k[112]*y_cur[IDX_NI] - k[3392]*y_cur[IDX_NI] - k[3393]*y_cur[IDX_NI] - - k[3693]*y_cur[IDX_OI] - k[4061]*y_cur[IDX_CII] - - k[4062]*y_cur[IDX_C2H2II] - k[4063]*y_cur[IDX_C2H3II] - - k[4064]*y_cur[IDX_C4H2II] - k[4065]*y_cur[IDX_C4H3II] - - k[4066]*y_cur[IDX_C4SII] - k[4067]*y_cur[IDX_CH2CCHII] - - k[4068]*y_cur[IDX_CH3II] - k[4069]*y_cur[IDX_CNCII] - - k[4070]*y_cur[IDX_FeII] - k[4071]*y_cur[IDX_HII] - - k[4072]*y_cur[IDX_H2COII] - k[4073]*y_cur[IDX_H2SII] - - k[4074]*y_cur[IDX_H3II] - k[4075]*y_cur[IDX_H3OII] - - k[4076]*y_cur[IDX_HC2SII] - k[4077]*y_cur[IDX_HCNHII] - - k[4078]*y_cur[IDX_HCNHII] - k[4079]*y_cur[IDX_HCOII] - - k[4080]*y_cur[IDX_HCOII] - k[4081]*y_cur[IDX_HeII] - - k[4082]*y_cur[IDX_MgII] - k[4083]*y_cur[IDX_NII] - - k[4084]*y_cur[IDX_N2HII] - k[4085]*y_cur[IDX_NH3II] - - k[4086]*y_cur[IDX_NH4II] - k[4087]*y_cur[IDX_NOII] - - k[4088]*y_cur[IDX_NaII] - k[4089]*y_cur[IDX_OII] - - k[4090]*y_cur[IDX_SII] - k[4091]*y_cur[IDX_SOII] - - k[4092]*y_cur[IDX_SiII] - k[4093]*y_cur[IDX_SiOII] - - k[4094]*y_cur[IDX_SiOHII] - k[4095]*y_cur[IDX_SiSII] - k[5716] - - k[6000]; - data[jistart + 2381] = 0.0 - k[18]*y_cur[IDX_C3M]; - data[jistart + 2382] = 0.0 + k[3403]*y_cur[IDX_NI] + - k[3698]*y_cur[IDX_OI]; - data[jistart + 2383] = 0.0 - k[4064]*y_cur[IDX_C3M]; - data[jistart + 2384] = 0.0 - k[4065]*y_cur[IDX_C3M]; - data[jistart + 2385] = 0.0 - k[4066]*y_cur[IDX_C3M]; - data[jistart + 2386] = 0.0 - k[19]*y_cur[IDX_C3M]; - data[jistart + 2387] = 0.0 - k[20]*y_cur[IDX_C3M]; - data[jistart + 2388] = 0.0 - k[21]*y_cur[IDX_C3M]; - data[jistart + 2389] = 0.0 - k[4067]*y_cur[IDX_C3M]; - data[jistart + 2390] = 0.0 - k[4068]*y_cur[IDX_C3M]; - data[jistart + 2391] = 0.0 - k[4069]*y_cur[IDX_C3M]; - data[jistart + 2392] = 0.0 - k[4070]*y_cur[IDX_C3M]; - data[jistart + 2393] = 0.0 - k[89]*y_cur[IDX_C3M]; - data[jistart + 2394] = 0.0 - k[4071]*y_cur[IDX_C3M]; - data[jistart + 2395] = 0.0 - k[4072]*y_cur[IDX_C3M]; - data[jistart + 2396] = 0.0 - k[4073]*y_cur[IDX_C3M]; - data[jistart + 2397] = 0.0 - k[4074]*y_cur[IDX_C3M]; - data[jistart + 2398] = 0.0 - k[4075]*y_cur[IDX_C3M]; - data[jistart + 2399] = 0.0 - k[4076]*y_cur[IDX_C3M]; - data[jistart + 2400] = 0.0 - k[4077]*y_cur[IDX_C3M] - - k[4078]*y_cur[IDX_C3M]; - data[jistart + 2401] = 0.0 - k[4079]*y_cur[IDX_C3M] - - k[4080]*y_cur[IDX_C3M]; - data[jistart + 2402] = 0.0 - k[4081]*y_cur[IDX_C3M]; - data[jistart + 2403] = 0.0 - k[4082]*y_cur[IDX_C3M]; - data[jistart + 2404] = 0.0 - k[112]*y_cur[IDX_C3M] - - k[3392]*y_cur[IDX_C3M] - k[3393]*y_cur[IDX_C3M] + - k[3403]*y_cur[IDX_C4M]; - data[jistart + 2405] = 0.0 - k[4083]*y_cur[IDX_C3M]; - data[jistart + 2406] = 0.0 - k[4084]*y_cur[IDX_C3M]; - data[jistart + 2407] = 0.0 - k[4085]*y_cur[IDX_C3M]; - data[jistart + 2408] = 0.0 - k[4086]*y_cur[IDX_C3M]; - data[jistart + 2409] = 0.0 - k[4087]*y_cur[IDX_C3M]; - data[jistart + 2410] = 0.0 - k[4088]*y_cur[IDX_C3M]; - data[jistart + 2411] = 0.0 - k[3693]*y_cur[IDX_C3M] + - k[3698]*y_cur[IDX_C4M]; - data[jistart + 2412] = 0.0 - k[4089]*y_cur[IDX_C3M]; - data[jistart + 2413] = 0.0 - k[4090]*y_cur[IDX_C3M]; - data[jistart + 2414] = 0.0 - k[4091]*y_cur[IDX_C3M]; - data[jistart + 2415] = 0.0 - k[4092]*y_cur[IDX_C3M]; - data[jistart + 2416] = 0.0 - k[4093]*y_cur[IDX_C3M]; - data[jistart + 2417] = 0.0 - k[4094]*y_cur[IDX_C3M]; - data[jistart + 2418] = 0.0 - k[4095]*y_cur[IDX_C3M]; - data[jistart + 2419] = 0.0 + k[5591]*y_cur[IDX_C3I]; - data[jistart + 2420] = 0.0 + k[39]*y_cur[IDX_C2HM] + - k[4912]*y_cur[IDX_C2H2I] - k[4920]*y_cur[IDX_C3HI]; - data[jistart + 2421] = 0.0 - k[1312]*y_cur[IDX_C3HI] + - k[4096]*y_cur[IDX_C3HM]; - data[jistart + 2422] = 0.0 + k[3065]*y_cur[IDX_HeII]; - data[jistart + 2423] = 0.0 + k[39]*y_cur[IDX_CI]; - data[jistart + 2424] = 0.0 + k[4912]*y_cur[IDX_CI]; - data[jistart + 2425] = 0.0 - k[1487]*y_cur[IDX_C3HI] - - k[1488]*y_cur[IDX_C3HI] + k[4097]*y_cur[IDX_C3HM]; - data[jistart + 2426] = 0.0 - k[1583]*y_cur[IDX_C3HI] - - k[1584]*y_cur[IDX_C3HI] - k[1585]*y_cur[IDX_C3HI] + - k[4098]*y_cur[IDX_C3HM]; - data[jistart + 2427] = 0.0 - k[1651]*y_cur[IDX_C3HI] - - k[1652]*y_cur[IDX_C3HI]; - data[jistart + 2428] = 0.0 + k[89]*y_cur[IDX_HI]; - data[jistart + 2429] = 0.0 - k[335]*y_cur[IDX_HII] - - k[1312]*y_cur[IDX_CII] - k[1487]*y_cur[IDX_C2H2II] - - k[1488]*y_cur[IDX_C2H2II] - k[1583]*y_cur[IDX_C2H3II] - - k[1584]*y_cur[IDX_C2H3II] - k[1585]*y_cur[IDX_C2H3II] - - k[1651]*y_cur[IDX_C2H4II] - k[1652]*y_cur[IDX_C2H4II] - - k[1819]*y_cur[IDX_C3H2II] - k[1820]*y_cur[IDX_C3H3II] - - k[1821]*y_cur[IDX_C3H3II] - k[1822]*y_cur[IDX_C4HII] - - k[1823]*y_cur[IDX_C4HII] - k[1824]*y_cur[IDX_C4H2II] - - k[1825]*y_cur[IDX_C4H3II] - k[1826]*y_cur[IDX_C5H2II] - - k[1827]*y_cur[IDX_C6H2II] - k[1828]*y_cur[IDX_CH2CCHII] - - k[1829]*y_cur[IDX_CH2CCHII] - k[2051]*y_cur[IDX_CH3II] - - k[2301]*y_cur[IDX_HII] - k[2603]*y_cur[IDX_H3II] - - k[2773]*y_cur[IDX_H3OII] - k[2908]*y_cur[IDX_HCOII] - - k[3097]*y_cur[IDX_HeII] - k[3821]*y_cur[IDX_SII] - - k[3861]*y_cur[IDX_SiII] - k[4920]*y_cur[IDX_CI] - - k[5233]*y_cur[IDX_NI] - k[5357]*y_cur[IDX_OI] - - k[5592]*y_cur[IDX_eM] - k[5720] - k[6004] - k[6945]; - data[jistart + 2430] = 0.0 + k[600]*y_cur[IDX_NH3I] + - k[621]*y_cur[IDX_NOI]; - data[jistart + 2431] = 0.0 + k[4096]*y_cur[IDX_CII] + - k[4097]*y_cur[IDX_C2H2II] + k[4098]*y_cur[IDX_C2H3II] + - k[4099]*y_cur[IDX_C4H2II] + k[4100]*y_cur[IDX_C4H3II] + - k[4101]*y_cur[IDX_C4SII] + k[4102]*y_cur[IDX_CH2CCHII] + - k[4103]*y_cur[IDX_CH3II] + k[4104]*y_cur[IDX_CNCII] + - k[4105]*y_cur[IDX_FeII] + k[4106]*y_cur[IDX_HII] + - k[4107]*y_cur[IDX_H2COII] + k[4108]*y_cur[IDX_H2SII] + - k[4109]*y_cur[IDX_H3II] + k[4110]*y_cur[IDX_H3OII] + - k[4111]*y_cur[IDX_HC2SII] + k[4112]*y_cur[IDX_HCNHII] + - k[4113]*y_cur[IDX_HCNHII] + k[4114]*y_cur[IDX_HCOII] + - k[4115]*y_cur[IDX_HCOII] + k[4116]*y_cur[IDX_HeII] + - k[4117]*y_cur[IDX_MgII] + k[4118]*y_cur[IDX_NII] + - k[4119]*y_cur[IDX_N2HII] + k[4120]*y_cur[IDX_NH3II] + - k[4121]*y_cur[IDX_NH4II] + k[4122]*y_cur[IDX_NOII] + - k[4123]*y_cur[IDX_NaII] + k[4124]*y_cur[IDX_OII] + - k[4125]*y_cur[IDX_SII] + k[4126]*y_cur[IDX_SOII] + - k[4127]*y_cur[IDX_SiII] + k[4128]*y_cur[IDX_SiOII] + - k[4129]*y_cur[IDX_SiOHII] + k[4130]*y_cur[IDX_SiSII] + k[5718] + - k[6002]; - data[jistart + 2432] = 0.0 + k[5719] + k[6003]; - data[jistart + 2433] = 0.0 + k[795]*y_cur[IDX_eM] - - k[1819]*y_cur[IDX_C3HI] + k[6465]*y_cur[IDX_GRAINM]; - data[jistart + 2434] = 0.0 - k[1820]*y_cur[IDX_C3HI] - - k[1821]*y_cur[IDX_C3HI]; - data[jistart + 2435] = 0.0 + k[5362]*y_cur[IDX_OI]; - data[jistart + 2436] = 0.0 - k[1822]*y_cur[IDX_C3HI] - - k[1823]*y_cur[IDX_C3HI]; - data[jistart + 2437] = 0.0 + k[115]*y_cur[IDX_NI] + - k[3404]*y_cur[IDX_NI]; - data[jistart + 2438] = 0.0 - k[1824]*y_cur[IDX_C3HI] + - k[4099]*y_cur[IDX_C3HM]; - data[jistart + 2439] = 0.0 - k[1825]*y_cur[IDX_C3HI] + - k[4100]*y_cur[IDX_C3HM]; - data[jistart + 2440] = 0.0 + k[4101]*y_cur[IDX_C3HM]; - data[jistart + 2441] = 0.0 + k[5743] + k[6028]; - data[jistart + 2442] = 0.0 + k[5740] + k[6025]; - data[jistart + 2443] = 0.0 - k[1826]*y_cur[IDX_C3HI]; - data[jistart + 2444] = 0.0 + k[5752] + k[6039]; - data[jistart + 2445] = 0.0 + k[3421]*y_cur[IDX_NI]; - data[jistart + 2446] = 0.0 - k[1827]*y_cur[IDX_C3HI]; - data[jistart + 2447] = 0.0 + k[5783] + k[6084]; - data[jistart + 2448] = 0.0 - k[1828]*y_cur[IDX_C3HI] - - k[1829]*y_cur[IDX_C3HI] + k[4102]*y_cur[IDX_C3HM]; - data[jistart + 2449] = 0.0 - k[2051]*y_cur[IDX_C3HI] + - k[4103]*y_cur[IDX_C3HM]; - data[jistart + 2450] = 0.0 + k[4104]*y_cur[IDX_C3HM]; - data[jistart + 2451] = 0.0 + k[4105]*y_cur[IDX_C3HM]; - data[jistart + 2452] = 0.0 + k[8663]*y_cur[IDX_GC2HI]; - data[jistart + 2453] = 0.0 + k[8719]*y_cur[IDX_GCHI]; - data[jistart + 2454] = 0.0 + k[8663]*y_cur[IDX_GCI]; - data[jistart + 2455] = 0.0 + k[8610]*y_cur[IDX_GHI]; - data[jistart + 2456] = 0.0 + k[7127] + k[7309] + k[7491]; - data[jistart + 2457] = 0.0 + k[8719]*y_cur[IDX_GC2I]; - data[jistart + 2458] = 0.0 + k[8610]*y_cur[IDX_GC3I]; - data[jistart + 2459] = 0.0 + k[6465]*y_cur[IDX_C3H2II] + - k[6761]*y_cur[IDX_SiC3HII] + k[6814]*y_cur[IDX_PC4HII]; - data[jistart + 2460] = 0.0 + k[89]*y_cur[IDX_C3M]; - data[jistart + 2461] = 0.0 - k[335]*y_cur[IDX_C3HI] - - k[2301]*y_cur[IDX_C3HI] + k[4106]*y_cur[IDX_C3HM]; - data[jistart + 2462] = 0.0 + k[5834] + k[6150]; - data[jistart + 2463] = 0.0 + k[4107]*y_cur[IDX_C3HM]; - data[jistart + 2464] = 0.0 + k[4108]*y_cur[IDX_C3HM]; - data[jistart + 2465] = 0.0 - k[2603]*y_cur[IDX_C3HI] + - k[4109]*y_cur[IDX_C3HM]; - data[jistart + 2466] = 0.0 - k[2773]*y_cur[IDX_C3HI] + - k[4110]*y_cur[IDX_C3HM]; - data[jistart + 2467] = 0.0 + k[4111]*y_cur[IDX_C3HM]; - data[jistart + 2468] = 0.0 + k[4112]*y_cur[IDX_C3HM] + - k[4113]*y_cur[IDX_C3HM]; - data[jistart + 2469] = 0.0 - k[2908]*y_cur[IDX_C3HI] + - k[4114]*y_cur[IDX_C3HM] + k[4115]*y_cur[IDX_C3HM]; - data[jistart + 2470] = 0.0 + k[3065]*y_cur[IDX_C10H2I] - - k[3097]*y_cur[IDX_C3HI] + k[3313]*y_cur[IDX_SiC3HI] + - k[4116]*y_cur[IDX_C3HM]; - data[jistart + 2471] = 0.0 + k[4117]*y_cur[IDX_C3HM]; - data[jistart + 2472] = 0.0 + k[115]*y_cur[IDX_C4HM] + - k[3404]*y_cur[IDX_C4HM] + k[3421]*y_cur[IDX_C6HM] - - k[5233]*y_cur[IDX_C3HI]; - data[jistart + 2473] = 0.0 + k[4118]*y_cur[IDX_C3HM]; - data[jistart + 2474] = 0.0 + k[4119]*y_cur[IDX_C3HM]; - data[jistart + 2475] = 0.0 + k[600]*y_cur[IDX_C3HII]; - data[jistart + 2476] = 0.0 + k[4120]*y_cur[IDX_C3HM]; - data[jistart + 2477] = 0.0 + k[4121]*y_cur[IDX_C3HM]; - data[jistart + 2478] = 0.0 + k[621]*y_cur[IDX_C3HII]; - data[jistart + 2479] = 0.0 + k[4122]*y_cur[IDX_C3HM]; - data[jistart + 2480] = 0.0 + k[4123]*y_cur[IDX_C3HM]; - data[jistart + 2481] = 0.0 - k[5357]*y_cur[IDX_C3HI] + - k[5362]*y_cur[IDX_C4HI]; - data[jistart + 2482] = 0.0 + k[4124]*y_cur[IDX_C3HM]; - data[jistart + 2483] = 0.0 + k[1196]*y_cur[IDX_eM] + - k[6814]*y_cur[IDX_GRAINM]; - data[jistart + 2484] = 0.0 - k[3821]*y_cur[IDX_C3HI] + - k[4125]*y_cur[IDX_C3HM]; - data[jistart + 2485] = 0.0 + k[4126]*y_cur[IDX_C3HM]; - data[jistart + 2486] = 0.0 - k[3861]*y_cur[IDX_C3HI] + - k[4127]*y_cur[IDX_C3HM]; - data[jistart + 2487] = 0.0 + k[3313]*y_cur[IDX_HeII]; - data[jistart + 2488] = 0.0 + k[1234]*y_cur[IDX_eM] + - k[6761]*y_cur[IDX_GRAINM]; - data[jistart + 2489] = 0.0 + k[4128]*y_cur[IDX_C3HM]; - data[jistart + 2490] = 0.0 + k[4129]*y_cur[IDX_C3HM]; - data[jistart + 2491] = 0.0 + k[4130]*y_cur[IDX_C3HM]; - data[jistart + 2492] = 0.0 + k[795]*y_cur[IDX_C3H2II] + - k[1196]*y_cur[IDX_PC4HII] + k[1234]*y_cur[IDX_SiC3HII] - - k[5592]*y_cur[IDX_C3HI]; - data[jistart + 2493] = 0.0 + k[1850]*y_cur[IDX_C2H2II] + - k[1851]*y_cur[IDX_C2H3II]; - data[jistart + 2494] = 0.0 + k[1300]*y_cur[IDX_C2H2I] + - k[1303]*y_cur[IDX_C2H4I] + k[1400]*y_cur[IDX_HC3NI] + - k[1402]*y_cur[IDX_C4H2I]; - data[jistart + 2495] = 0.0 + k[2041]*y_cur[IDX_CH3II]; - data[jistart + 2496] = 0.0 + k[1995]*y_cur[IDX_CH2I] + - k[2148]*y_cur[IDX_CH4I]; - data[jistart + 2497] = 0.0 + k[2241]*y_cur[IDX_CHI]; - data[jistart + 2498] = 0.0 + k[1300]*y_cur[IDX_CII] + - k[1540]*y_cur[IDX_C2NII] - k[1544]*y_cur[IDX_C3HII]; - data[jistart + 2499] = 0.0 + k[1850]*y_cur[IDX_CI]; - data[jistart + 2500] = 0.0 + k[1851]*y_cur[IDX_CI]; - data[jistart + 2501] = 0.0 + k[1303]*y_cur[IDX_CII] - - k[1689]*y_cur[IDX_C3HII] - k[1690]*y_cur[IDX_C3HII]; - data[jistart + 2502] = 0.0 + k[1540]*y_cur[IDX_C2H2I]; - data[jistart + 2503] = 0.0 + k[2601]*y_cur[IDX_H3II] + - k[2771]*y_cur[IDX_H3OII] + k[2906]*y_cur[IDX_HCOII]; - data[jistart + 2504] = 0.0 + k[2157]*y_cur[IDX_CH4I] + - k[2406]*y_cur[IDX_H2I] + k[2867]*y_cur[IDX_HCNI]; - data[jistart + 2505] = 0.0 + k[335]*y_cur[IDX_HII]; - data[jistart + 2506] = 0.0 - k[600]*y_cur[IDX_NH3I] - - k[621]*y_cur[IDX_NOI] - k[789]*y_cur[IDX_eM] - k[790]*y_cur[IDX_eM] - - k[1544]*y_cur[IDX_C2H2I] - k[1689]*y_cur[IDX_C2H4I] - - k[1690]*y_cur[IDX_C2H4I] - k[1753]*y_cur[IDX_CO2I] - - k[1754]*y_cur[IDX_C4H2I] - k[1755]*y_cur[IDX_C4H2I] - - k[1756]*y_cur[IDX_OCSI] - k[1757]*y_cur[IDX_OCSI] - - k[1758]*y_cur[IDX_OCSI] - k[2122]*y_cur[IDX_CH3OHI] - - k[2123]*y_cur[IDX_CH3OHI] - k[2160]*y_cur[IDX_CH4I] - - k[2161]*y_cur[IDX_CH4I] - k[2407]*y_cur[IDX_H2I] - - k[2528]*y_cur[IDX_H2OI] - k[2529]*y_cur[IDX_H2OI] - - k[2530]*y_cur[IDX_H2OI] - k[2576]*y_cur[IDX_H2SI] - - k[2577]*y_cur[IDX_H2SI] - k[2578]*y_cur[IDX_H2SI] - - k[3394]*y_cur[IDX_NI] - k[3562]*y_cur[IDX_NH3I] - - k[3563]*y_cur[IDX_NH3I] - k[3626]*y_cur[IDX_NOI] - - k[3669]*y_cur[IDX_O2I] - k[3670]*y_cur[IDX_O2I] - - k[3671]*y_cur[IDX_O2I] - k[3872]*y_cur[IDX_SiI] - - k[5550]*y_cur[IDX_H2I] - k[5551]*y_cur[IDX_H2I] - - k[6459]*y_cur[IDX_GRAINM] - k[6460]*y_cur[IDX_GRAINM]; - data[jistart + 2507] = 0.0 + k[2300]*y_cur[IDX_HII] + - k[3096]*y_cur[IDX_HeII]; - data[jistart + 2508] = 0.0 + k[2831]*y_cur[IDX_HI]; - data[jistart + 2509] = 0.0 + k[1402]*y_cur[IDX_CII] - - k[1754]*y_cur[IDX_C3HII] - k[1755]*y_cur[IDX_C3HII]; - data[jistart + 2510] = 0.0 + k[3405]*y_cur[IDX_NI]; - data[jistart + 2511] = 0.0 + k[2413]*y_cur[IDX_H2I]; - data[jistart + 2512] = 0.0 + k[3122]*y_cur[IDX_HeII]; - data[jistart + 2513] = 0.0 + k[3119]*y_cur[IDX_HeII]; - data[jistart + 2514] = 0.0 + k[2241]*y_cur[IDX_C2HII]; - data[jistart + 2515] = 0.0 + k[1995]*y_cur[IDX_C2II]; - data[jistart + 2516] = 0.0 + k[3163]*y_cur[IDX_HeII]; - data[jistart + 2517] = 0.0 + k[2041]*y_cur[IDX_C2I]; - data[jistart + 2518] = 0.0 + k[3185]*y_cur[IDX_HeII]; - data[jistart + 2519] = 0.0 - k[2122]*y_cur[IDX_C3HII] - - k[2123]*y_cur[IDX_C3HII]; - data[jistart + 2520] = 0.0 + k[2148]*y_cur[IDX_C2II] + - k[2157]*y_cur[IDX_C3II] - k[2160]*y_cur[IDX_C3HII] - - k[2161]*y_cur[IDX_C3HII]; - data[jistart + 2521] = 0.0 - k[1753]*y_cur[IDX_C3HII]; - data[jistart + 2522] = 0.0 - k[6459]*y_cur[IDX_C3HII] - - k[6460]*y_cur[IDX_C3HII]; - data[jistart + 2523] = 0.0 + k[2831]*y_cur[IDX_C3H2II]; - data[jistart + 2524] = 0.0 + k[335]*y_cur[IDX_C3HI] + - k[2300]*y_cur[IDX_C3H2I] + k[2335]*y_cur[IDX_H2CCCI] + - k[3021]*y_cur[IDX_HNC3I]; - data[jistart + 2525] = 0.0 + k[2406]*y_cur[IDX_C3II] - - k[2407]*y_cur[IDX_C3HII] + k[2413]*y_cur[IDX_C4NII] - - k[5550]*y_cur[IDX_C3HII] - k[5551]*y_cur[IDX_C3HII]; - data[jistart + 2526] = 0.0 + k[2335]*y_cur[IDX_HII] + - k[3218]*y_cur[IDX_HeII]; - data[jistart + 2527] = 0.0 - k[2528]*y_cur[IDX_C3HII] - - k[2529]*y_cur[IDX_C3HII] - k[2530]*y_cur[IDX_C3HII]; - data[jistart + 2528] = 0.0 - k[2576]*y_cur[IDX_C3HII] - - k[2577]*y_cur[IDX_C3HII] - k[2578]*y_cur[IDX_C3HII]; - data[jistart + 2529] = 0.0 + k[2601]*y_cur[IDX_C3I]; - data[jistart + 2530] = 0.0 + k[2771]*y_cur[IDX_C3I]; - data[jistart + 2531] = 0.0 + k[1400]*y_cur[IDX_CII] + - k[3235]*y_cur[IDX_HeII]; - data[jistart + 2532] = 0.0 + k[3461]*y_cur[IDX_NI]; - data[jistart + 2533] = 0.0 + k[2867]*y_cur[IDX_C3II]; - data[jistart + 2534] = 0.0 + k[2906]*y_cur[IDX_C3I]; - data[jistart + 2535] = 0.0 + k[3021]*y_cur[IDX_HII]; - data[jistart + 2536] = 0.0 + k[3096]*y_cur[IDX_C3H2I] + - k[3119]*y_cur[IDX_C5H2I] + k[3122]*y_cur[IDX_C5HI] + - k[3163]*y_cur[IDX_CH2CCHI] + k[3185]*y_cur[IDX_CH3CCHI] + - k[3218]*y_cur[IDX_H2CCCI] + k[3235]*y_cur[IDX_HC3NI]; - data[jistart + 2537] = 0.0 - k[3394]*y_cur[IDX_C3HII] + - k[3405]*y_cur[IDX_C4H2II] + k[3461]*y_cur[IDX_HC3NII]; - data[jistart + 2538] = 0.0 - k[600]*y_cur[IDX_C3HII] - - k[3562]*y_cur[IDX_C3HII] - k[3563]*y_cur[IDX_C3HII]; - data[jistart + 2539] = 0.0 - k[621]*y_cur[IDX_C3HII] - - k[3626]*y_cur[IDX_C3HII]; - data[jistart + 2540] = 0.0 - k[3669]*y_cur[IDX_C3HII] - - k[3670]*y_cur[IDX_C3HII] - k[3671]*y_cur[IDX_C3HII]; - data[jistart + 2541] = 0.0 - k[1756]*y_cur[IDX_C3HII] - - k[1757]*y_cur[IDX_C3HII] - k[1758]*y_cur[IDX_C3HII]; - data[jistart + 2542] = 0.0 - k[3872]*y_cur[IDX_C3HII]; - data[jistart + 2543] = 0.0 - k[789]*y_cur[IDX_C3HII] - - k[790]*y_cur[IDX_C3HII]; - data[jistart + 2544] = 0.0 - k[41]*y_cur[IDX_C3HM]; - data[jistart + 2545] = 0.0 - k[4096]*y_cur[IDX_C3HM]; - data[jistart + 2546] = 0.0 - k[4097]*y_cur[IDX_C3HM]; - data[jistart + 2547] = 0.0 - k[4098]*y_cur[IDX_C3HM]; - data[jistart + 2548] = 0.0 + k[5592]*y_cur[IDX_eM]; - data[jistart + 2549] = 0.0 - k[41]*y_cur[IDX_CI] - - k[90]*y_cur[IDX_HI] - k[113]*y_cur[IDX_NI] - k[3395]*y_cur[IDX_NI] - - k[3396]*y_cur[IDX_NI] - k[3694]*y_cur[IDX_OI] - - k[4096]*y_cur[IDX_CII] - k[4097]*y_cur[IDX_C2H2II] - - k[4098]*y_cur[IDX_C2H3II] - k[4099]*y_cur[IDX_C4H2II] - - k[4100]*y_cur[IDX_C4H3II] - k[4101]*y_cur[IDX_C4SII] - - k[4102]*y_cur[IDX_CH2CCHII] - k[4103]*y_cur[IDX_CH3II] - - k[4104]*y_cur[IDX_CNCII] - k[4105]*y_cur[IDX_FeII] - - k[4106]*y_cur[IDX_HII] - k[4107]*y_cur[IDX_H2COII] - - k[4108]*y_cur[IDX_H2SII] - k[4109]*y_cur[IDX_H3II] - - k[4110]*y_cur[IDX_H3OII] - k[4111]*y_cur[IDX_HC2SII] - - k[4112]*y_cur[IDX_HCNHII] - k[4113]*y_cur[IDX_HCNHII] - - k[4114]*y_cur[IDX_HCOII] - k[4115]*y_cur[IDX_HCOII] - - k[4116]*y_cur[IDX_HeII] - k[4117]*y_cur[IDX_MgII] - - k[4118]*y_cur[IDX_NII] - k[4119]*y_cur[IDX_N2HII] - - k[4120]*y_cur[IDX_NH3II] - k[4121]*y_cur[IDX_NH4II] - - k[4122]*y_cur[IDX_NOII] - k[4123]*y_cur[IDX_NaII] - - k[4124]*y_cur[IDX_OII] - k[4125]*y_cur[IDX_SII] - - k[4126]*y_cur[IDX_SOII] - k[4127]*y_cur[IDX_SiII] - - k[4128]*y_cur[IDX_SiOII] - k[4129]*y_cur[IDX_SiOHII] - - k[4130]*y_cur[IDX_SiSII] - k[5718] - k[6002]; - data[jistart + 2550] = 0.0 + k[3700]*y_cur[IDX_OI]; - data[jistart + 2551] = 0.0 - k[4099]*y_cur[IDX_C3HM]; - data[jistart + 2552] = 0.0 - k[4100]*y_cur[IDX_C3HM]; - data[jistart + 2553] = 0.0 - k[4101]*y_cur[IDX_C3HM]; - data[jistart + 2554] = 0.0 - k[4102]*y_cur[IDX_C3HM]; - data[jistart + 2555] = 0.0 - k[4103]*y_cur[IDX_C3HM]; - data[jistart + 2556] = 0.0 - k[4104]*y_cur[IDX_C3HM]; - data[jistart + 2557] = 0.0 - k[4105]*y_cur[IDX_C3HM]; - data[jistart + 2558] = 0.0 - k[90]*y_cur[IDX_C3HM]; - data[jistart + 2559] = 0.0 - k[4106]*y_cur[IDX_C3HM]; - data[jistart + 2560] = 0.0 - k[4107]*y_cur[IDX_C3HM]; - data[jistart + 2561] = 0.0 - k[4108]*y_cur[IDX_C3HM]; - data[jistart + 2562] = 0.0 - k[4109]*y_cur[IDX_C3HM]; - data[jistart + 2563] = 0.0 - k[4110]*y_cur[IDX_C3HM]; - data[jistart + 2564] = 0.0 - k[4111]*y_cur[IDX_C3HM]; - data[jistart + 2565] = 0.0 - k[4112]*y_cur[IDX_C3HM] - - k[4113]*y_cur[IDX_C3HM]; - data[jistart + 2566] = 0.0 - k[4114]*y_cur[IDX_C3HM] - - k[4115]*y_cur[IDX_C3HM]; - data[jistart + 2567] = 0.0 - k[4116]*y_cur[IDX_C3HM]; - data[jistart + 2568] = 0.0 - k[4117]*y_cur[IDX_C3HM]; - data[jistart + 2569] = 0.0 - k[113]*y_cur[IDX_C3HM] - - k[3395]*y_cur[IDX_C3HM] - k[3396]*y_cur[IDX_C3HM]; - data[jistart + 2570] = 0.0 - k[4118]*y_cur[IDX_C3HM]; - data[jistart + 2571] = 0.0 - k[4119]*y_cur[IDX_C3HM]; - data[jistart + 2572] = 0.0 - k[4120]*y_cur[IDX_C3HM]; - data[jistart + 2573] = 0.0 - k[4121]*y_cur[IDX_C3HM]; - data[jistart + 2574] = 0.0 - k[4122]*y_cur[IDX_C3HM]; - data[jistart + 2575] = 0.0 - k[4123]*y_cur[IDX_C3HM]; - data[jistart + 2576] = 0.0 - k[3694]*y_cur[IDX_C3HM] + - k[3700]*y_cur[IDX_C4HM]; - data[jistart + 2577] = 0.0 - k[4124]*y_cur[IDX_C3HM]; - data[jistart + 2578] = 0.0 - k[4125]*y_cur[IDX_C3HM]; - data[jistart + 2579] = 0.0 - k[4126]*y_cur[IDX_C3HM]; - data[jistart + 2580] = 0.0 - k[4127]*y_cur[IDX_C3HM]; - data[jistart + 2581] = 0.0 - k[4128]*y_cur[IDX_C3HM]; - data[jistart + 2582] = 0.0 - k[4129]*y_cur[IDX_C3HM]; - data[jistart + 2583] = 0.0 - k[4130]*y_cur[IDX_C3HM]; - data[jistart + 2584] = 0.0 + k[5592]*y_cur[IDX_C3HI]; - data[jistart + 2585] = 0.0 + k[4913]*y_cur[IDX_C2H3I] - - k[4919]*y_cur[IDX_C3H2I]; - data[jistart + 2586] = 0.0 - k[1310]*y_cur[IDX_C3H2I] - - k[1311]*y_cur[IDX_C3H2I]; - data[jistart + 2587] = 0.0 - k[4889]*y_cur[IDX_C3H2I]; - data[jistart + 2588] = 0.0 + k[5063]*y_cur[IDX_CHI]; - data[jistart + 2589] = 0.0 - k[1485]*y_cur[IDX_C3H2I] - - k[1486]*y_cur[IDX_C3H2I]; - data[jistart + 2590] = 0.0 + k[4913]*y_cur[IDX_CI]; - data[jistart + 2591] = 0.0 - k[1580]*y_cur[IDX_C3H2I] - - k[1581]*y_cur[IDX_C3H2I] - k[1582]*y_cur[IDX_C3H2I]; - data[jistart + 2592] = 0.0 - k[1649]*y_cur[IDX_C3H2I] - - k[1650]*y_cur[IDX_C3H2I]; - data[jistart + 2593] = 0.0 + k[2122]*y_cur[IDX_CH3OHI]; - data[jistart + 2594] = 0.0 - k[334]*y_cur[IDX_HII] - - k[1310]*y_cur[IDX_CII] - k[1311]*y_cur[IDX_CII] - - k[1485]*y_cur[IDX_C2H2II] - k[1486]*y_cur[IDX_C2H2II] - - k[1580]*y_cur[IDX_C2H3II] - k[1581]*y_cur[IDX_C2H3II] - - k[1582]*y_cur[IDX_C2H3II] - k[1649]*y_cur[IDX_C2H4II] - - k[1650]*y_cur[IDX_C2H4II] - k[1759]*y_cur[IDX_C3H2II] - - k[1760]*y_cur[IDX_C3H2II] - k[1786]*y_cur[IDX_C3H3II] - - k[1787]*y_cur[IDX_C3H3II] - k[1788]*y_cur[IDX_C4H2II] - - k[1789]*y_cur[IDX_C4H3II] - k[1790]*y_cur[IDX_C5H2II] - - k[1791]*y_cur[IDX_C5H2II] - k[1792]*y_cur[IDX_C6H2II] - - k[1793]*y_cur[IDX_C6H2II] - k[1794]*y_cur[IDX_CH2CCHII] - - k[1795]*y_cur[IDX_CH2CCHII] - k[2050]*y_cur[IDX_CH3II] - - k[2300]*y_cur[IDX_HII] - k[2602]*y_cur[IDX_H3II] - - k[2772]*y_cur[IDX_H3OII] - k[2907]*y_cur[IDX_HCOII] - - k[3096]*y_cur[IDX_HeII] - k[3820]*y_cur[IDX_SII] - - k[3860]*y_cur[IDX_SiII] - k[4889]*y_cur[IDX_C2HI] - - k[4919]*y_cur[IDX_CI] - k[5232]*y_cur[IDX_NI] - k[5719] - k[6003] - - k[6948]; - data[jistart + 2595] = 0.0 - k[1759]*y_cur[IDX_C3H2I] - - k[1760]*y_cur[IDX_C3H2I]; - data[jistart + 2596] = 0.0 + k[798]*y_cur[IDX_eM] - - k[1786]*y_cur[IDX_C3H2I] - k[1787]*y_cur[IDX_C3H2I] + - k[3565]*y_cur[IDX_NH3I] + k[6473]*y_cur[IDX_GRAINM]; - data[jistart + 2597] = 0.0 - k[1788]*y_cur[IDX_C3H2I]; - data[jistart + 2598] = 0.0 - k[1789]*y_cur[IDX_C3H2I]; - data[jistart + 2599] = 0.0 - k[1790]*y_cur[IDX_C3H2I] - - k[1791]*y_cur[IDX_C3H2I]; - data[jistart + 2600] = 0.0 - k[1792]*y_cur[IDX_C3H2I] - - k[1793]*y_cur[IDX_C3H2I]; - data[jistart + 2601] = 0.0 + k[5063]*y_cur[IDX_C2H2I]; - data[jistart + 2602] = 0.0 + k[5782] + k[6083]; - data[jistart + 2603] = 0.0 - k[1794]*y_cur[IDX_C3H2I] - - k[1795]*y_cur[IDX_C3H2I]; - data[jistart + 2604] = 0.0 - k[2050]*y_cur[IDX_C3H2I]; - data[jistart + 2605] = 0.0 + k[2122]*y_cur[IDX_C3HII]; - data[jistart + 2606] = 0.0 + k[8720]*y_cur[IDX_GCHI]; - data[jistart + 2607] = 0.0 + k[8611]*y_cur[IDX_GHI]; - data[jistart + 2608] = 0.0 + k[7130] + k[7312] + k[7494]; - data[jistart + 2609] = 0.0 + k[8720]*y_cur[IDX_GC2HI]; - data[jistart + 2610] = 0.0 + k[8611]*y_cur[IDX_GC3HI]; - data[jistart + 2611] = 0.0 + k[6473]*y_cur[IDX_C3H3II]; - data[jistart + 2612] = 0.0 - k[334]*y_cur[IDX_C3H2I] - - k[2300]*y_cur[IDX_C3H2I]; - data[jistart + 2613] = 0.0 - k[2602]*y_cur[IDX_C3H2I]; - data[jistart + 2614] = 0.0 - k[2772]*y_cur[IDX_C3H2I]; - data[jistart + 2615] = 0.0 - k[2907]*y_cur[IDX_C3H2I]; - data[jistart + 2616] = 0.0 - k[3096]*y_cur[IDX_C3H2I]; - data[jistart + 2617] = 0.0 - k[5232]*y_cur[IDX_C3H2I]; - data[jistart + 2618] = 0.0 + k[3565]*y_cur[IDX_C3H3II]; - data[jistart + 2619] = 0.0 - k[3820]*y_cur[IDX_C3H2I]; - data[jistart + 2620] = 0.0 - k[3860]*y_cur[IDX_C3H2I]; - data[jistart + 2621] = 0.0 + k[798]*y_cur[IDX_C3H3II]; - data[jistart + 2622] = 0.0 + k[1852]*y_cur[IDX_C2H3II] + - k[1853]*y_cur[IDX_C2H4II] - k[1855]*y_cur[IDX_C3H2II] - - k[1856]*y_cur[IDX_C3H2II]; - data[jistart + 2623] = 0.0 + k[1301]*y_cur[IDX_C2H3I] + - k[1304]*y_cur[IDX_C2H4I] + k[1317]*y_cur[IDX_C4H3I] + - k[1348]*y_cur[IDX_CH2CHCNI] + k[1371]*y_cur[IDX_C2H6I]; - data[jistart + 2624] = 0.0 + k[2149]*y_cur[IDX_CH4I]; - data[jistart + 2625] = 0.0 - k[1731]*y_cur[IDX_C3H2II] + - k[1975]*y_cur[IDX_CH2II] + k[2048]*y_cur[IDX_CH3II]; - data[jistart + 2626] = 0.0 + k[1997]*y_cur[IDX_CH2I]; - data[jistart + 2627] = 0.0 - k[1545]*y_cur[IDX_C3H2II] + - k[1549]*y_cur[IDX_C4II] + k[1934]*y_cur[IDX_CHII]; - data[jistart + 2628] = 0.0 + k[2242]*y_cur[IDX_CHI]; - data[jistart + 2629] = 0.0 + k[1301]*y_cur[IDX_CII] - - k[1629]*y_cur[IDX_C3H2II] - k[1630]*y_cur[IDX_C3H2II]; - data[jistart + 2630] = 0.0 + k[1583]*y_cur[IDX_C3HI] + - k[1852]*y_cur[IDX_CI]; - data[jistart + 2631] = 0.0 + k[1304]*y_cur[IDX_CII] + - k[1686]*y_cur[IDX_C3II] - k[1691]*y_cur[IDX_C3H2II] - - k[1692]*y_cur[IDX_C3H2II]; - data[jistart + 2632] = 0.0 + k[1853]*y_cur[IDX_CI]; - data[jistart + 2633] = 0.0 + k[1371]*y_cur[IDX_CII]; - data[jistart + 2634] = 0.0 + k[1686]*y_cur[IDX_C2H4I]; - data[jistart + 2635] = 0.0 + k[1583]*y_cur[IDX_C2H3II] - - k[1819]*y_cur[IDX_C3H2II] + k[2603]*y_cur[IDX_H3II] + - k[2773]*y_cur[IDX_H3OII] + k[2908]*y_cur[IDX_HCOII]; - data[jistart + 2636] = 0.0 + k[2407]*y_cur[IDX_H2I]; - data[jistart + 2637] = 0.0 + k[334]*y_cur[IDX_HII] - - k[1759]*y_cur[IDX_C3H2II] - k[1760]*y_cur[IDX_C3H2II]; - data[jistart + 2638] = 0.0 - k[791]*y_cur[IDX_eM] - - k[792]*y_cur[IDX_eM] - k[793]*y_cur[IDX_eM] - k[794]*y_cur[IDX_eM] - - k[795]*y_cur[IDX_eM] - k[1545]*y_cur[IDX_C2H2I] - - k[1629]*y_cur[IDX_C2H3I] - k[1630]*y_cur[IDX_C2H3I] - - k[1691]*y_cur[IDX_C2H4I] - k[1692]*y_cur[IDX_C2H4I] - - k[1731]*y_cur[IDX_C2HI] - k[1759]*y_cur[IDX_C3H2I] - - k[1760]*y_cur[IDX_C3H2I] - k[1761]*y_cur[IDX_C4HI] - - k[1762]*y_cur[IDX_C4HI] - k[1763]*y_cur[IDX_C5H2I] - - k[1764]*y_cur[IDX_C5H2I] - k[1765]*y_cur[IDX_C5HI] - - k[1766]*y_cur[IDX_C5HI] - k[1767]*y_cur[IDX_C6H2I] - - k[1768]*y_cur[IDX_C6H2I] - k[1769]*y_cur[IDX_C6HI] - - k[1770]*y_cur[IDX_C6HI] - k[1771]*y_cur[IDX_CH2CCH2I] - - k[1772]*y_cur[IDX_CH2CCH2I] - k[1773]*y_cur[IDX_CH2CCH2I] - - k[1774]*y_cur[IDX_CH2CCH2I] - k[1775]*y_cur[IDX_CH2CCH2I] - - k[1776]*y_cur[IDX_CH2CCHI] - k[1777]*y_cur[IDX_CH3CCHI] - - k[1778]*y_cur[IDX_CH3CCHI] - k[1779]*y_cur[IDX_CH3CCHI] - - k[1780]*y_cur[IDX_CH3CCHI] - k[1781]*y_cur[IDX_CH3CCHI] - - k[1782]*y_cur[IDX_H2CCCI] - k[1783]*y_cur[IDX_H2CCCI] - - k[1784]*y_cur[IDX_C4H2I] - k[1785]*y_cur[IDX_C4H2I] - - k[1819]*y_cur[IDX_C3HI] - k[1855]*y_cur[IDX_CI] - - k[1856]*y_cur[IDX_CI] - k[2162]*y_cur[IDX_CH4I] - - k[2408]*y_cur[IDX_H2I] - k[2831]*y_cur[IDX_HI] - - k[3397]*y_cur[IDX_NI] - k[3398]*y_cur[IDX_NI] - - k[3695]*y_cur[IDX_OI] - k[3814]*y_cur[IDX_PI] - - k[3834]*y_cur[IDX_SI] - k[3873]*y_cur[IDX_SiI] - - k[3874]*y_cur[IDX_SiI] - k[6461]*y_cur[IDX_GRAINM] - - k[6462]*y_cur[IDX_GRAINM] - k[6463]*y_cur[IDX_GRAINM] - - k[6464]*y_cur[IDX_GRAINM] - k[6465]*y_cur[IDX_GRAINM]; - data[jistart + 2639] = 0.0 + k[1549]*y_cur[IDX_C2H2I] + - k[2164]*y_cur[IDX_CH4I]; - data[jistart + 2640] = 0.0 - k[1761]*y_cur[IDX_C3H2II] - - k[1762]*y_cur[IDX_C3H2II]; - data[jistart + 2641] = 0.0 - k[1784]*y_cur[IDX_C3H2II] - - k[1785]*y_cur[IDX_C3H2II] + k[3831]*y_cur[IDX_SII]; - data[jistart + 2642] = 0.0 + k[3701]*y_cur[IDX_OI]; - data[jistart + 2643] = 0.0 + k[1317]*y_cur[IDX_CII] + - k[3108]*y_cur[IDX_HeII]; - data[jistart + 2644] = 0.0 - k[1765]*y_cur[IDX_C3H2II] - - k[1766]*y_cur[IDX_C3H2II]; - data[jistart + 2645] = 0.0 - k[1763]*y_cur[IDX_C3H2II] - - k[1764]*y_cur[IDX_C3H2II]; - data[jistart + 2646] = 0.0 - k[1769]*y_cur[IDX_C3H2II] - - k[1770]*y_cur[IDX_C3H2II]; - data[jistart + 2647] = 0.0 - k[1767]*y_cur[IDX_C3H2II] - - k[1768]*y_cur[IDX_C3H2II]; - data[jistart + 2648] = 0.0 + k[2242]*y_cur[IDX_C2H2II]; - data[jistart + 2649] = 0.0 + k[1934]*y_cur[IDX_C2H2I]; - data[jistart + 2650] = 0.0 + k[1997]*y_cur[IDX_C2HII]; - data[jistart + 2651] = 0.0 + k[1975]*y_cur[IDX_C2HI]; - data[jistart + 2652] = 0.0 - k[1776]*y_cur[IDX_C3H2II] + - k[2315]*y_cur[IDX_HII] + k[3164]*y_cur[IDX_HeII]; - data[jistart + 2653] = 0.0 - k[1771]*y_cur[IDX_C3H2II] - - k[1772]*y_cur[IDX_C3H2II] - k[1773]*y_cur[IDX_C3H2II] - - k[1774]*y_cur[IDX_C3H2II] - k[1775]*y_cur[IDX_C3H2II]; - data[jistart + 2654] = 0.0 + k[1348]*y_cur[IDX_CII]; - data[jistart + 2655] = 0.0 + k[2048]*y_cur[IDX_C2HI]; - data[jistart + 2656] = 0.0 - k[1777]*y_cur[IDX_C3H2II] - - k[1778]*y_cur[IDX_C3H2II] - k[1779]*y_cur[IDX_C3H2II] - - k[1780]*y_cur[IDX_C3H2II] - k[1781]*y_cur[IDX_C3H2II] + - k[3186]*y_cur[IDX_HeII]; - data[jistart + 2657] = 0.0 + k[2149]*y_cur[IDX_C2II] - - k[2162]*y_cur[IDX_C3H2II] + k[2164]*y_cur[IDX_C4II]; - data[jistart + 2658] = 0.0 - k[6461]*y_cur[IDX_C3H2II] - - k[6462]*y_cur[IDX_C3H2II] - k[6463]*y_cur[IDX_C3H2II] - - k[6464]*y_cur[IDX_C3H2II] - k[6465]*y_cur[IDX_C3H2II]; - data[jistart + 2659] = 0.0 - k[2831]*y_cur[IDX_C3H2II]; - data[jistart + 2660] = 0.0 + k[334]*y_cur[IDX_C3H2I] + - k[2315]*y_cur[IDX_CH2CCHI] + k[2336]*y_cur[IDX_H2CCCI]; - data[jistart + 2661] = 0.0 + k[2407]*y_cur[IDX_C3HII] - - k[2408]*y_cur[IDX_C3H2II]; - data[jistart + 2662] = 0.0 - k[1782]*y_cur[IDX_C3H2II] - - k[1783]*y_cur[IDX_C3H2II] + k[2336]*y_cur[IDX_HII]; - data[jistart + 2663] = 0.0 + k[2603]*y_cur[IDX_C3HI]; - data[jistart + 2664] = 0.0 + k[2773]*y_cur[IDX_C3HI]; - data[jistart + 2665] = 0.0 + k[2908]*y_cur[IDX_C3HI]; - data[jistart + 2666] = 0.0 + k[3108]*y_cur[IDX_C4H3I] + - k[3164]*y_cur[IDX_CH2CCHI] + k[3186]*y_cur[IDX_CH3CCHI]; - data[jistart + 2667] = 0.0 - k[3397]*y_cur[IDX_C3H2II] - - k[3398]*y_cur[IDX_C3H2II]; - data[jistart + 2668] = 0.0 - k[3695]*y_cur[IDX_C3H2II] + - k[3701]*y_cur[IDX_C4H2II]; - data[jistart + 2669] = 0.0 - k[3814]*y_cur[IDX_C3H2II]; - data[jistart + 2670] = 0.0 - k[3834]*y_cur[IDX_C3H2II]; - data[jistart + 2671] = 0.0 + k[3831]*y_cur[IDX_C4H2I]; - data[jistart + 2672] = 0.0 - k[3873]*y_cur[IDX_C3H2II] - - k[3874]*y_cur[IDX_C3H2II]; - data[jistart + 2673] = 0.0 - k[791]*y_cur[IDX_C3H2II] - - k[792]*y_cur[IDX_C3H2II] - k[793]*y_cur[IDX_C3H2II] - - k[794]*y_cur[IDX_C3H2II] - k[795]*y_cur[IDX_C3H2II]; - data[jistart + 2674] = 0.0 + k[5507]*y_cur[IDX_COI]; - data[jistart + 2675] = 0.0 - k[796]*y_cur[IDX_eM] - - k[797]*y_cur[IDX_eM] - k[6655]*y_cur[IDX_GRAINM] - - k[6656]*y_cur[IDX_GRAINM]; - data[jistart + 2676] = 0.0 + k[5507]*y_cur[IDX_C2H2II]; - data[jistart + 2677] = 0.0 - k[6655]*y_cur[IDX_C3H2OII] - - k[6656]*y_cur[IDX_C3H2OII]; - data[jistart + 2678] = 0.0 - k[796]*y_cur[IDX_C3H2OII] - - k[797]*y_cur[IDX_C3H2OII]; - data[jistart + 2679] = 0.0 - k[1857]*y_cur[IDX_C3H3II] - - k[1858]*y_cur[IDX_C3H3II]; - data[jistart + 2680] = 0.0 + k[1328]*y_cur[IDX_C6H6I] + - k[1344]*y_cur[IDX_CH2CCH2I] + k[1349]*y_cur[IDX_CH2CHCNI] + - k[1372]*y_cur[IDX_C2H6I] + k[1375]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2681] = 0.0 - k[1732]*y_cur[IDX_C3H3II] - - k[1733]*y_cur[IDX_C3H3II]; - data[jistart + 2682] = 0.0 + k[227]*y_cur[IDX_CH2CCHII] + - k[1536]*y_cur[IDX_C2H4II] + k[1538]*y_cur[IDX_C2H5II] - - k[1546]*y_cur[IDX_C3H3II]; - data[jistart + 2683] = 0.0 + k[219]*y_cur[IDX_CH2CCHI]; - data[jistart + 2684] = 0.0 + k[1578]*y_cur[IDX_C2H3II] - - k[1631]*y_cur[IDX_C3H3II] + k[2043]*y_cur[IDX_CH3II]; - data[jistart + 2685] = 0.0 + k[1578]*y_cur[IDX_C2H3I] + - k[1580]*y_cur[IDX_C3H2I]; - data[jistart + 2686] = 0.0 - k[1693]*y_cur[IDX_C3H3II]; - data[jistart + 2687] = 0.0 + k[232]*y_cur[IDX_CH2CCHI] + - k[1536]*y_cur[IDX_C2H2I]; - data[jistart + 2688] = 0.0 + k[1538]*y_cur[IDX_C2H2I]; - data[jistart + 2689] = 0.0 + k[1372]*y_cur[IDX_CII]; - data[jistart + 2690] = 0.0 - k[1820]*y_cur[IDX_C3H3II] - - k[1821]*y_cur[IDX_C3H3II]; - data[jistart + 2691] = 0.0 + k[5550]*y_cur[IDX_H2I]; - data[jistart + 2692] = 0.0 + k[1580]*y_cur[IDX_C2H3II] - - k[1786]*y_cur[IDX_C3H3II] - k[1787]*y_cur[IDX_C3H3II] + - k[2602]*y_cur[IDX_H3II] + k[2772]*y_cur[IDX_H3OII] + - k[2907]*y_cur[IDX_HCOII]; - data[jistart + 2693] = 0.0 + k[2162]*y_cur[IDX_CH4I] + - k[2408]*y_cur[IDX_H2I]; - data[jistart + 2694] = 0.0 - k[798]*y_cur[IDX_eM] - - k[1546]*y_cur[IDX_C2H2I] - k[1631]*y_cur[IDX_C2H3I] - - k[1693]*y_cur[IDX_C2H4I] - k[1732]*y_cur[IDX_C2HI] - - k[1733]*y_cur[IDX_C2HI] - k[1786]*y_cur[IDX_C3H2I] - - k[1787]*y_cur[IDX_C3H2I] - k[1796]*y_cur[IDX_C4HI] - - k[1797]*y_cur[IDX_C4HI] - k[1798]*y_cur[IDX_C5H2I] - - k[1799]*y_cur[IDX_C5H2I] - k[1800]*y_cur[IDX_C5HI] - - k[1801]*y_cur[IDX_C5HI] - k[1802]*y_cur[IDX_C6H2I] - - k[1803]*y_cur[IDX_C6HI] - k[1804]*y_cur[IDX_C6HI] - - k[1805]*y_cur[IDX_CH2CCHI] - k[1806]*y_cur[IDX_CH2CCHI] - - k[1807]*y_cur[IDX_C4H2I] - k[1820]*y_cur[IDX_C3HI] - - k[1821]*y_cur[IDX_C3HI] - k[1857]*y_cur[IDX_CI] - - k[1858]*y_cur[IDX_CI] - k[2476]*y_cur[IDX_H2CCCI] - - k[2477]*y_cur[IDX_H2CCCI] - k[3564]*y_cur[IDX_NH3I] - - k[3565]*y_cur[IDX_NH3I] - k[3696]*y_cur[IDX_OI] - - k[3835]*y_cur[IDX_SI] - k[3875]*y_cur[IDX_SiI] - - k[3876]*y_cur[IDX_SiI] - k[5515]*y_cur[IDX_C4H2I] - - k[6473]*y_cur[IDX_GRAINM]; - data[jistart + 2695] = 0.0 + k[2832]*y_cur[IDX_HI]; - data[jistart + 2696] = 0.0 - k[1796]*y_cur[IDX_C3H3II] - - k[1797]*y_cur[IDX_C3H3II]; - data[jistart + 2697] = 0.0 - k[1807]*y_cur[IDX_C3H3II] - - k[5515]*y_cur[IDX_C3H3II]; - data[jistart + 2698] = 0.0 + k[3109]*y_cur[IDX_HeII]; - data[jistart + 2699] = 0.0 - k[1800]*y_cur[IDX_C3H3II] - - k[1801]*y_cur[IDX_C3H3II]; - data[jistart + 2700] = 0.0 - k[1798]*y_cur[IDX_C3H3II] - - k[1799]*y_cur[IDX_C3H3II]; - data[jistart + 2701] = 0.0 - k[1803]*y_cur[IDX_C3H3II] - - k[1804]*y_cur[IDX_C3H3II]; - data[jistart + 2702] = 0.0 - k[1802]*y_cur[IDX_C3H3II]; - data[jistart + 2703] = 0.0 + k[1328]*y_cur[IDX_CII]; - data[jistart + 2704] = 0.0 + k[219]*y_cur[IDX_C2H2II] + - k[232]*y_cur[IDX_C2H4II] + k[360]*y_cur[IDX_HII] - - k[1805]*y_cur[IDX_C3H3II] - k[1806]*y_cur[IDX_C3H3II]; - data[jistart + 2705] = 0.0 + k[227]*y_cur[IDX_C2H2I]; - data[jistart + 2706] = 0.0 + k[1344]*y_cur[IDX_CII] + - k[2635]*y_cur[IDX_H3II] + k[3656]*y_cur[IDX_O2II]; - data[jistart + 2707] = 0.0 + k[1349]*y_cur[IDX_CII]; - data[jistart + 2708] = 0.0 + k[2043]*y_cur[IDX_C2H3I] + - k[2079]*y_cur[IDX_HC3NI] + k[3020]*y_cur[IDX_HNC3I]; - data[jistart + 2709] = 0.0 + k[1375]*y_cur[IDX_CII]; - data[jistart + 2710] = 0.0 + k[2162]*y_cur[IDX_C3H2II]; - data[jistart + 2711] = 0.0 - k[6473]*y_cur[IDX_C3H3II]; - data[jistart + 2712] = 0.0 + k[2832]*y_cur[IDX_C3H4II]; - data[jistart + 2713] = 0.0 + k[360]*y_cur[IDX_CH2CCHI]; - data[jistart + 2714] = 0.0 + k[2408]*y_cur[IDX_C3H2II] + - k[5550]*y_cur[IDX_C3HII]; - data[jistart + 2715] = 0.0 - k[2476]*y_cur[IDX_C3H3II] - - k[2477]*y_cur[IDX_C3H3II]; - data[jistart + 2716] = 0.0 + k[2602]*y_cur[IDX_C3H2I] + - k[2635]*y_cur[IDX_CH2CCH2I]; - data[jistart + 2717] = 0.0 + k[2772]*y_cur[IDX_C3H2I]; - data[jistart + 2718] = 0.0 + k[2079]*y_cur[IDX_CH3II]; - data[jistart + 2719] = 0.0 + k[2907]*y_cur[IDX_C3H2I]; - data[jistart + 2720] = 0.0 + k[3020]*y_cur[IDX_CH3II]; - data[jistart + 2721] = 0.0 + k[3109]*y_cur[IDX_C4H3I]; - data[jistart + 2722] = 0.0 - k[3564]*y_cur[IDX_C3H3II] - - k[3565]*y_cur[IDX_C3H3II]; - data[jistart + 2723] = 0.0 - k[3696]*y_cur[IDX_C3H3II]; - data[jistart + 2724] = 0.0 + k[3656]*y_cur[IDX_CH2CCH2I]; - data[jistart + 2725] = 0.0 - k[3835]*y_cur[IDX_C3H3II]; - data[jistart + 2726] = 0.0 - k[3875]*y_cur[IDX_C3H3II] - - k[3876]*y_cur[IDX_C3H3II]; - data[jistart + 2727] = 0.0 - k[798]*y_cur[IDX_C3H3II]; - data[jistart + 2728] = 0.0 - k[1859]*y_cur[IDX_C3H4II] - - k[1860]*y_cur[IDX_C3H4II]; - data[jistart + 2729] = 0.0 + k[161]*y_cur[IDX_CH2CCH2I] + - k[165]*y_cur[IDX_CH3CCHI]; - data[jistart + 2730] = 0.0 + k[2152]*y_cur[IDX_CH4I]; - data[jistart + 2731] = 0.0 - k[1547]*y_cur[IDX_C3H4II]; - data[jistart + 2732] = 0.0 + k[220]*y_cur[IDX_CH3CCHI] + - k[1513]*y_cur[IDX_CH3CNI] + k[2154]*y_cur[IDX_CH4I]; - data[jistart + 2733] = 0.0 + k[2044]*y_cur[IDX_CH3II]; - data[jistart + 2734] = 0.0 + k[1608]*y_cur[IDX_CH2CCHI]; - data[jistart + 2735] = 0.0 + k[1691]*y_cur[IDX_C3H2II]; - data[jistart + 2736] = 0.0 + k[1691]*y_cur[IDX_C2H4I]; - data[jistart + 2737] = 0.0 - k[799]*y_cur[IDX_eM] - - k[800]*y_cur[IDX_eM] - k[801]*y_cur[IDX_eM] - k[802]*y_cur[IDX_eM] - + data[jistart + 4948] = 0.0 + k[3120]*y_cur[IDX_HeII]; + data[jistart + 4949] = 0.0 + k[1862]*y_cur[IDX_CI]; + data[jistart + 4950] = 0.0 + k[1322]*y_cur[IDX_CII]; + data[jistart + 4951] = 0.0 + k[3056]*y_cur[IDX_HeII]; + data[jistart + 4952] = 0.0 + k[3134]*y_cur[IDX_HeII]; + data[jistart + 4953] = 0.0 + k[343]*y_cur[IDX_HII]; + data[jistart + 4954] = 0.0 + k[3126]*y_cur[IDX_HeII]; + data[jistart + 4955] = 0.0 + k[5497]*y_cur[IDX_CII]; + data[jistart + 4956] = 0.0 + k[2305]*y_cur[IDX_HII] + k[3123]*y_cur[IDX_HeII]; + data[jistart + 4957] = 0.0 + k[1320]*y_cur[IDX_CII]; + data[jistart + 4958] = 0.0 + k[1863]*y_cur[IDX_CI]; + data[jistart + 4959] = 0.0 - k[236]*y_cur[IDX_C5II] - k[1698]*y_cur[IDX_C5II] - + k[1699]*y_cur[IDX_C5II] - k[1700]*y_cur[IDX_C5II]; + data[jistart + 4960] = 0.0 - k[2176]*y_cur[IDX_C5II] - k[2177]*y_cur[IDX_C5II] - + k[2178]*y_cur[IDX_C5II] - k[2179]*y_cur[IDX_C5II]; + data[jistart + 4961] = 0.0 - k[2871]*y_cur[IDX_C5II]; + data[jistart + 4962] = 0.0 - k[1556]*y_cur[IDX_C5II]; + data[jistart + 4963] = 0.0 + k[3056]*y_cur[IDX_C10I] + k[3120]*y_cur[IDX_C5H2I] + + k[3123]*y_cur[IDX_C5HI] + k[3126]*y_cur[IDX_C6I] + + k[3134]*y_cur[IDX_C7I]; + data[jistart + 4964] = 0.0 + k[1320]*y_cur[IDX_C4HI] + k[1321]*y_cur[IDX_C4PI] + + k[1322]*y_cur[IDX_C4SI] + k[5497]*y_cur[IDX_C4I]; + data[jistart + 4965] = 0.0 + k[343]*y_cur[IDX_C5I] + k[2305]*y_cur[IDX_C5HI]; + data[jistart + 4966] = 0.0 + k[1862]*y_cur[IDX_C4HII] + k[1863]*y_cur[IDX_C4H2II]; + data[jistart + 4967] = 0.0 - k[6709]*y_cur[IDX_C5II]; + data[jistart + 4968] = 0.0 - k[2414]*y_cur[IDX_C5II]; + data[jistart + 4969] = 0.0 - k[838]*y_cur[IDX_C5II]; + data[jistart + 4970] = 0.0 + k[1359]*y_cur[IDX_CII]; + data[jistart + 4971] = 0.0 + k[1358]*y_cur[IDX_CII]; + data[jistart + 4972] = 0.0 + k[2179]*y_cur[IDX_CH4I]; + data[jistart + 4973] = 0.0 - k[854]*y_cur[IDX_eM] - k[855]*y_cur[IDX_eM] - + k[1874]*y_cur[IDX_CI] - k[1875]*y_cur[IDX_CI] - + k[3711]*y_cur[IDX_OI] - k[6789]*y_cur[IDX_GRAINM] - + k[6790]*y_cur[IDX_GRAINM]; + data[jistart + 4974] = 0.0 + k[1783]*y_cur[IDX_C3H2II] + k[2476]*y_cur[IDX_C3H3II] + + k[2485]*y_cur[IDX_CH2CCHII]; + data[jistart + 4975] = 0.0 + k[1595]*y_cur[IDX_C2H3II] + k[2618]*y_cur[IDX_H3II] + + k[2923]*y_cur[IDX_HCOII]; + data[jistart + 4976] = 0.0 + k[1655]*y_cur[IDX_C2H4II] + k[2053]*y_cur[IDX_CH3II]; + data[jistart + 4977] = 0.0 + k[1760]*y_cur[IDX_C3H2II] + k[1786]*y_cur[IDX_C3H3II] + + k[1794]*y_cur[IDX_CH2CCHII]; + data[jistart + 4978] = 0.0 + k[1632]*y_cur[IDX_C2H3I]; + data[jistart + 4979] = 0.0 + k[1786]*y_cur[IDX_C3H2I] + k[1821]*y_cur[IDX_C3HI] + + k[2476]*y_cur[IDX_H2CCCI]; + data[jistart + 4980] = 0.0 + k[1760]*y_cur[IDX_C3H2I] + k[1783]*y_cur[IDX_H2CCCI]; + data[jistart + 4981] = 0.0 + k[1655]*y_cur[IDX_C5H2I]; + data[jistart + 4982] = 0.0 + k[1737]*y_cur[IDX_C2HI] + k[2850]*y_cur[IDX_C4H2I]; + data[jistart + 4983] = 0.0 + k[1794]*y_cur[IDX_C3H2I] + k[1829]*y_cur[IDX_C3HI] + + k[2485]*y_cur[IDX_H2CCCI]; + data[jistart + 4984] = 0.0 + k[1821]*y_cur[IDX_C3H3II] + k[1829]*y_cur[IDX_CH2CCHII]; + data[jistart + 4985] = 0.0 + k[1588]*y_cur[IDX_C2H3II]; + data[jistart + 4986] = 0.0 + k[1521]*y_cur[IDX_C2H2II] + k[1622]*y_cur[IDX_C2H3II] + + k[2850]*y_cur[IDX_C4H3II]; + data[jistart + 4987] = 0.0 + k[1552]*y_cur[IDX_C2H2I] + k[1633]*y_cur[IDX_C2H3I]; + data[jistart + 4988] = 0.0 + k[1632]*y_cur[IDX_C4HII] + k[1633]*y_cur[IDX_C4H2II]; + data[jistart + 4989] = 0.0 + k[1588]*y_cur[IDX_C4HI] + k[1595]*y_cur[IDX_C6H2I] + + k[1622]*y_cur[IDX_C4H2I]; + data[jistart + 4990] = 0.0 + k[2179]*y_cur[IDX_C5II]; + data[jistart + 4991] = 0.0 + k[1737]*y_cur[IDX_C4H3II]; + data[jistart + 4992] = 0.0 + k[1521]*y_cur[IDX_C4H2I]; + data[jistart + 4993] = 0.0 + k[2053]*y_cur[IDX_C5H2I]; + data[jistart + 4994] = 0.0 + k[1552]*y_cur[IDX_C4H2II]; + data[jistart + 4995] = 0.0 - k[3711]*y_cur[IDX_C6H3II]; + data[jistart + 4996] = 0.0 + k[1358]*y_cur[IDX_CH3C4HI] + k[1359]*y_cur[IDX_CH3C5NI]; + data[jistart + 4997] = 0.0 - k[1874]*y_cur[IDX_C6H3II] - k[1875]*y_cur[IDX_C6H3II]; + data[jistart + 4998] = 0.0 + k[2923]*y_cur[IDX_C6H2I]; + data[jistart + 4999] = 0.0 + k[2618]*y_cur[IDX_C6H2I]; + data[jistart + 5000] = 0.0 - k[6789]*y_cur[IDX_C6H3II] - k[6790]*y_cur[IDX_C6H3II]; + data[jistart + 5001] = 0.0 - k[854]*y_cur[IDX_C6H3II] - k[855]*y_cur[IDX_C6H3II]; + data[jistart + 5002] = 0.0 + k[1362]*y_cur[IDX_CII]; + data[jistart + 5003] = 0.0 - k[883]*y_cur[IDX_eM] - k[884]*y_cur[IDX_eM] - + k[1883]*y_cur[IDX_CI] - k[1884]*y_cur[IDX_CI] - + k[3720]*y_cur[IDX_OI] - k[6845]*y_cur[IDX_GRAINM] - + k[6846]*y_cur[IDX_GRAINM]; + data[jistart + 5004] = 0.0 + k[2626]*y_cur[IDX_H3II] + k[2931]*y_cur[IDX_HCOII]; + data[jistart + 5005] = 0.0 + k[1663]*y_cur[IDX_C2H4II] + k[2057]*y_cur[IDX_CH3II]; + data[jistart + 5006] = 0.0 + k[1639]*y_cur[IDX_C2H3I]; + data[jistart + 5007] = 0.0 + k[2482]*y_cur[IDX_C5H2II]; + data[jistart + 5008] = 0.0 + k[1496]*y_cur[IDX_C2H2II] + k[1596]*y_cur[IDX_C2H3II]; + data[jistart + 5009] = 0.0 + k[1764]*y_cur[IDX_C3H2II] + k[1798]*y_cur[IDX_C3H3II] + + k[2022]*y_cur[IDX_CH2CCHII]; + data[jistart + 5010] = 0.0 + k[1791]*y_cur[IDX_C3H2I] + k[2037]*y_cur[IDX_CH2CCHI] + + k[2482]*y_cur[IDX_H2CCCI]; + data[jistart + 5011] = 0.0 + k[1791]*y_cur[IDX_C5H2II]; + data[jistart + 5012] = 0.0 + k[1798]*y_cur[IDX_C5H2I] + k[1801]*y_cur[IDX_C5HI]; + data[jistart + 5013] = 0.0 + k[1764]*y_cur[IDX_C5H2I]; + data[jistart + 5014] = 0.0 + k[1663]*y_cur[IDX_C7H2I]; + data[jistart + 5015] = 0.0 + k[1844]*y_cur[IDX_C4HI]; + data[jistart + 5016] = 0.0 + k[2037]*y_cur[IDX_C5H2II]; + data[jistart + 5017] = 0.0 + k[2022]*y_cur[IDX_C5H2I] + k[2025]*y_cur[IDX_C5HI]; + data[jistart + 5018] = 0.0 + k[1601]*y_cur[IDX_C2H3II]; + data[jistart + 5019] = 0.0 + k[1801]*y_cur[IDX_C3H3II] + k[2025]*y_cur[IDX_CH2CCHII]; + data[jistart + 5020] = 0.0 + k[1844]*y_cur[IDX_C4H3II]; + data[jistart + 5021] = 0.0 + k[1838]*y_cur[IDX_C4H2II]; + data[jistart + 5022] = 0.0 + k[1838]*y_cur[IDX_C4H2I]; + data[jistart + 5023] = 0.0 + k[1639]*y_cur[IDX_C6H2II]; + data[jistart + 5024] = 0.0 + k[1596]*y_cur[IDX_C6H2I] + k[1601]*y_cur[IDX_C6HI]; + data[jistart + 5025] = 0.0 + k[1496]*y_cur[IDX_C6H2I]; + data[jistart + 5026] = 0.0 + k[2057]*y_cur[IDX_C7H2I]; + data[jistart + 5027] = 0.0 - k[3720]*y_cur[IDX_C8H3II]; + data[jistart + 5028] = 0.0 + k[1362]*y_cur[IDX_CH3C7NI]; + data[jistart + 5029] = 0.0 - k[1883]*y_cur[IDX_C8H3II] - k[1884]*y_cur[IDX_C8H3II]; + data[jistart + 5030] = 0.0 + k[2931]*y_cur[IDX_C8H2I]; + data[jistart + 5031] = 0.0 + k[2626]*y_cur[IDX_C8H2I]; + data[jistart + 5032] = 0.0 - k[6845]*y_cur[IDX_C8H3II] - k[6846]*y_cur[IDX_C8H3II]; + data[jistart + 5033] = 0.0 - k[883]*y_cur[IDX_C8H3II] - k[884]*y_cur[IDX_C8H3II]; + data[jistart + 5034] = 0.0 + k[2424]*y_cur[IDX_H2I]; + data[jistart + 5035] = 0.0 + k[1406]*y_cur[IDX_CII]; + data[jistart + 5036] = 0.0 + k[3680]*y_cur[IDX_OI]; + data[jistart + 5037] = 0.0 + k[2312]*y_cur[IDX_HII] + k[3153]*y_cur[IDX_HeII]; + data[jistart + 5038] = 0.0 + k[3066]*y_cur[IDX_HeII]; + data[jistart + 5039] = 0.0 + k[1883]*y_cur[IDX_CI]; + data[jistart + 5040] = 0.0 - k[891]*y_cur[IDX_eM] - k[892]*y_cur[IDX_eM] - + k[1885]*y_cur[IDX_CI] - k[2425]*y_cur[IDX_H2I] - + k[3446]*y_cur[IDX_NI] - k[3722]*y_cur[IDX_OI] - + k[6857]*y_cur[IDX_GRAINM] - k[6858]*y_cur[IDX_GRAINM]; + data[jistart + 5041] = 0.0 + k[1336]*y_cur[IDX_CII]; + data[jistart + 5042] = 0.0 + k[1882]*y_cur[IDX_CI]; + data[jistart + 5043] = 0.0 + k[1833]*y_cur[IDX_C5HI]; + data[jistart + 5044] = 0.0 + k[1769]*y_cur[IDX_C6HI]; + data[jistart + 5045] = 0.0 + k[1299]*y_cur[IDX_CII]; + data[jistart + 5046] = 0.0 + k[357]*y_cur[IDX_HII] + k[6066]; + data[jistart + 5047] = 0.0 + k[2293]*y_cur[IDX_HII]; + data[jistart + 5048] = 0.0 + k[2628]*y_cur[IDX_H3II] + k[2933]*y_cur[IDX_HCOII]; + data[jistart + 5049] = 0.0 + k[1501]*y_cur[IDX_C2H2II]; + data[jistart + 5050] = 0.0 + k[1769]*y_cur[IDX_C3H2II]; + data[jistart + 5051] = 0.0 + k[1833]*y_cur[IDX_C4HII]; + data[jistart + 5052] = 0.0 + k[1501]*y_cur[IDX_C7HI]; + data[jistart + 5053] = 0.0 - k[3446]*y_cur[IDX_C9HII]; + data[jistart + 5054] = 0.0 + k[3680]*y_cur[IDX_C10HII] - k[3722]*y_cur[IDX_C9HII]; + data[jistart + 5055] = 0.0 + k[3066]*y_cur[IDX_C10H2I] + k[3153]*y_cur[IDX_C9H2I]; + data[jistart + 5056] = 0.0 + k[1299]*y_cur[IDX_C10HI] + k[1336]*y_cur[IDX_C8H2I] + + k[1406]*y_cur[IDX_HC9NI]; + data[jistart + 5057] = 0.0 + k[357]*y_cur[IDX_C9HI] + k[2293]*y_cur[IDX_C10I] + + k[2312]*y_cur[IDX_C9H2I]; + data[jistart + 5058] = 0.0 + k[1882]*y_cur[IDX_C8H2II] + k[1883]*y_cur[IDX_C8H3II] - + k[1885]*y_cur[IDX_C9HII]; + data[jistart + 5059] = 0.0 + k[2933]*y_cur[IDX_C9I]; + data[jistart + 5060] = 0.0 + k[2628]*y_cur[IDX_C9I]; + data[jistart + 5061] = 0.0 - k[6857]*y_cur[IDX_C9HII] - k[6858]*y_cur[IDX_C9HII]; + data[jistart + 5062] = 0.0 + k[2424]*y_cur[IDX_C9II] - k[2425]*y_cur[IDX_C9HII]; + data[jistart + 5063] = 0.0 - k[891]*y_cur[IDX_C9HII] - k[892]*y_cur[IDX_C9HII]; + data[jistart + 5064] = 0.0 + k[2629]*y_cur[IDX_H3II] + k[2934]*y_cur[IDX_HCOII]; + data[jistart + 5065] = 0.0 - k[895]*y_cur[IDX_eM] - k[896]*y_cur[IDX_eM] - + k[1888]*y_cur[IDX_CI] - k[1889]*y_cur[IDX_CI] - + k[3450]*y_cur[IDX_NI] - k[3725]*y_cur[IDX_OI] - + k[6861]*y_cur[IDX_GRAINM] - k[6862]*y_cur[IDX_GRAINM]; + data[jistart + 5066] = 0.0 + k[2059]*y_cur[IDX_CH3II]; + data[jistart + 5067] = 0.0 + k[1500]*y_cur[IDX_C2H2II] + k[1603]*y_cur[IDX_C2H3II]; + data[jistart + 5068] = 0.0 + k[5577]*y_cur[IDX_C4H2I]; + data[jistart + 5069] = 0.0 + k[1561]*y_cur[IDX_C2H2I] + k[1641]*y_cur[IDX_C2H3I]; + data[jistart + 5070] = 0.0 + k[1793]*y_cur[IDX_C3H2I] + k[2039]*y_cur[IDX_CH2CCHI] + + k[2484]*y_cur[IDX_H2CCCI]; + data[jistart + 5071] = 0.0 + k[2484]*y_cur[IDX_C6H2II]; + data[jistart + 5072] = 0.0 + k[1768]*y_cur[IDX_C3H2II] + k[1802]*y_cur[IDX_C3H3II] + + k[2026]*y_cur[IDX_CH2CCHII]; + data[jistart + 5073] = 0.0 + k[1835]*y_cur[IDX_C4H2II] + k[1839]*y_cur[IDX_C4H3II]; + data[jistart + 5074] = 0.0 + k[1793]*y_cur[IDX_C6H2II]; + data[jistart + 5075] = 0.0 + k[1802]*y_cur[IDX_C6H2I] + k[1804]*y_cur[IDX_C6HI]; + data[jistart + 5076] = 0.0 + k[1768]*y_cur[IDX_C6H2I]; + data[jistart + 5077] = 0.0 + k[1607]*y_cur[IDX_C2H3II]; + data[jistart + 5078] = 0.0 + k[1839]*y_cur[IDX_C5H2I] + k[1841]*y_cur[IDX_C5HI]; + data[jistart + 5079] = 0.0 + k[2039]*y_cur[IDX_C6H2II]; + data[jistart + 5080] = 0.0 + k[2026]*y_cur[IDX_C6H2I] + k[2028]*y_cur[IDX_C6HI]; + data[jistart + 5081] = 0.0 + k[1804]*y_cur[IDX_C3H3II] + k[2028]*y_cur[IDX_CH2CCHII]; + data[jistart + 5082] = 0.0 + k[1841]*y_cur[IDX_C4H3II]; + data[jistart + 5083] = 0.0 + k[5577]*y_cur[IDX_C5HII]; + data[jistart + 5084] = 0.0 + k[1835]*y_cur[IDX_C5H2I]; + data[jistart + 5085] = 0.0 + k[1641]*y_cur[IDX_C7H2II]; + data[jistart + 5086] = 0.0 + k[1603]*y_cur[IDX_C7H2I] + k[1607]*y_cur[IDX_C7HI]; + data[jistart + 5087] = 0.0 + k[1500]*y_cur[IDX_C7H2I]; + data[jistart + 5088] = 0.0 + k[2059]*y_cur[IDX_C8H2I]; + data[jistart + 5089] = 0.0 + k[1561]*y_cur[IDX_C7H2II]; + data[jistart + 5090] = 0.0 - k[3450]*y_cur[IDX_C9H3II]; + data[jistart + 5091] = 0.0 - k[3725]*y_cur[IDX_C9H3II]; + data[jistart + 5092] = 0.0 - k[1888]*y_cur[IDX_C9H3II] - k[1889]*y_cur[IDX_C9H3II]; + data[jistart + 5093] = 0.0 + k[2934]*y_cur[IDX_C9H2I]; + data[jistart + 5094] = 0.0 + k[2629]*y_cur[IDX_C9H2I]; + data[jistart + 5095] = 0.0 - k[6861]*y_cur[IDX_C9H3II] - k[6862]*y_cur[IDX_C9H3II]; + data[jistart + 5096] = 0.0 - k[895]*y_cur[IDX_C9H3II] - k[896]*y_cur[IDX_C9H3II]; + data[jistart + 5097] = 0.0 + k[8620]*y_cur[IDX_GHI]; + data[jistart + 5098] = 0.0 + k[7143] + k[7325] + k[7507]; + data[jistart + 5099] = 0.0 + k[1287]*y_cur[IDX_eM] + k[6714]*y_cur[IDX_GRAINM]; + data[jistart + 5100] = 0.0 + k[1293]*y_cur[IDX_eM] + k[6734]*y_cur[IDX_GRAINM]; + data[jistart + 5101] = 0.0 + k[937]*y_cur[IDX_eM] + k[6547]*y_cur[IDX_GRAINM]; + data[jistart + 5102] = 0.0 + k[948]*y_cur[IDX_eM] + k[6518]*y_cur[IDX_GRAINM]; + data[jistart + 5103] = 0.0 - k[164]*y_cur[IDX_CII] - k[2639]*y_cur[IDX_H3II] - + k[2786]*y_cur[IDX_H3OII] - k[2940]*y_cur[IDX_HCOII] - + k[3171]*y_cur[IDX_HeII] - k[3172]*y_cur[IDX_HeII] - + k[5157]*y_cur[IDX_HI] - k[5789] - k[5790] - k[6091] - k[6092] - + k[6961]; + data[jistart + 5104] = 0.0 + k[5811]; + data[jistart + 5105] = 0.0 + k[3854]*y_cur[IDX_SOII] + k[3855]*y_cur[IDX_SOII] + + k[5381]*y_cur[IDX_OI]; + data[jistart + 5106] = 0.0 + k[3663]*y_cur[IDX_O2II]; + data[jistart + 5107] = 0.0 + k[3663]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 5108] = 0.0 + k[3854]*y_cur[IDX_CH2CCH2I] + k[3855]*y_cur[IDX_CH2CCH2I]; + data[jistart + 5109] = 0.0 + k[5347]*y_cur[IDX_OI]; + data[jistart + 5110] = 0.0 + k[5345]*y_cur[IDX_OI]; + data[jistart + 5111] = 0.0 + k[5454]*y_cur[IDX_C2H2I]; + data[jistart + 5112] = 0.0 + k[5454]*y_cur[IDX_OHI]; + data[jistart + 5113] = 0.0 + k[8620]*y_cur[IDX_GHC2OI]; + data[jistart + 5114] = 0.0 - k[2786]*y_cur[IDX_CH2COI]; + data[jistart + 5115] = 0.0 + k[5345]*y_cur[IDX_C2H3I] + k[5347]*y_cur[IDX_C2H4I] + + k[5381]*y_cur[IDX_CH2CCH2I]; + data[jistart + 5116] = 0.0 - k[3171]*y_cur[IDX_CH2COI] - k[3172]*y_cur[IDX_CH2COI]; + data[jistart + 5117] = 0.0 - k[164]*y_cur[IDX_CH2COI]; + data[jistart + 5118] = 0.0 - k[2940]*y_cur[IDX_CH2COI]; + data[jistart + 5119] = 0.0 - k[2639]*y_cur[IDX_CH2COI]; + data[jistart + 5120] = 0.0 + k[6518]*y_cur[IDX_CH3COII] + k[6547]*y_cur[IDX_CH3CHOII] + + k[6714]*y_cur[IDX_CH3COOHII] + k[6734]*y_cur[IDX_CH3COOH2II]; + data[jistart + 5121] = 0.0 + k[937]*y_cur[IDX_CH3CHOII] + k[948]*y_cur[IDX_CH3COII] + + k[1287]*y_cur[IDX_CH3COOHII] + k[1293]*y_cur[IDX_CH3COOH2II]; + data[jistart + 5122] = 0.0 - k[5157]*y_cur[IDX_CH2COI]; + data[jistart + 5123] = 0.0 + k[7182] + k[7364] + k[7546]; + data[jistart + 5124] = 0.0 - k[1115]*y_cur[IDX_eM] - k[3016]*y_cur[IDX_CII] - + k[3017]*y_cur[IDX_CII] - k[3018]*y_cur[IDX_CII] - + k[3019]*y_cur[IDX_CII] - k[3020]*y_cur[IDX_CH3II] - + k[3021]*y_cur[IDX_HII] - k[3022]*y_cur[IDX_HII] - + k[3023]*y_cur[IDX_HII] - k[3024]*y_cur[IDX_HII] - + k[3025]*y_cur[IDX_HII] - k[3026]*y_cur[IDX_HII] - + k[3027]*y_cur[IDX_H3II] - k[3028]*y_cur[IDX_H3OII] - + k[3029]*y_cur[IDX_HCOII] - k[3030]*y_cur[IDX_HeII] - + k[3031]*y_cur[IDX_HeII] - k[3032]*y_cur[IDX_HeII] - + k[3033]*y_cur[IDX_HeII] - k[3034]*y_cur[IDX_HeII] - + k[3035]*y_cur[IDX_N2HII] - k[5212]*y_cur[IDX_CI] - + k[5213]*y_cur[IDX_HI] - k[5866] - k[6197] - k[7000]; + data[jistart + 5125] = 0.0 + k[1069]*y_cur[IDX_eM] + k[6640]*y_cur[IDX_GRAINM]; + data[jistart + 5126] = 0.0 - k[3035]*y_cur[IDX_HNC3I]; + data[jistart + 5127] = 0.0 - k[3020]*y_cur[IDX_HNC3I]; + data[jistart + 5128] = 0.0 - k[3028]*y_cur[IDX_HNC3I]; + data[jistart + 5129] = 0.0 - k[3030]*y_cur[IDX_HNC3I] - k[3031]*y_cur[IDX_HNC3I] - + k[3032]*y_cur[IDX_HNC3I] - k[3033]*y_cur[IDX_HNC3I] - + k[3034]*y_cur[IDX_HNC3I]; + data[jistart + 5130] = 0.0 - k[3016]*y_cur[IDX_HNC3I] - k[3017]*y_cur[IDX_HNC3I] - + k[3018]*y_cur[IDX_HNC3I] - k[3019]*y_cur[IDX_HNC3I]; + data[jistart + 5131] = 0.0 - k[3021]*y_cur[IDX_HNC3I] - k[3022]*y_cur[IDX_HNC3I] - + k[3023]*y_cur[IDX_HNC3I] - k[3024]*y_cur[IDX_HNC3I] - + k[3025]*y_cur[IDX_HNC3I] - k[3026]*y_cur[IDX_HNC3I]; + data[jistart + 5132] = 0.0 - k[5212]*y_cur[IDX_HNC3I]; + data[jistart + 5133] = 0.0 - k[3029]*y_cur[IDX_HNC3I]; + data[jistart + 5134] = 0.0 - k[3027]*y_cur[IDX_HNC3I]; + data[jistart + 5135] = 0.0 + k[6640]*y_cur[IDX_HC3NHII]; + data[jistart + 5136] = 0.0 + k[1069]*y_cur[IDX_HC3NHII] - k[1115]*y_cur[IDX_HNC3I]; + data[jistart + 5137] = 0.0 - k[5213]*y_cur[IDX_HNC3I]; + data[jistart + 5138] = 0.0 + k[7146] + k[7328] + k[7510]; + data[jistart + 5139] = 0.0 + k[1126]*y_cur[IDX_eM] + k[6524]*y_cur[IDX_GRAINM]; + data[jistart + 5140] = 0.0 + k[5396]*y_cur[IDX_OI]; + data[jistart + 5141] = 0.0 + k[1117]*y_cur[IDX_eM] + k[6523]*y_cur[IDX_GRAINM]; + data[jistart + 5142] = 0.0 + k[5216]*y_cur[IDX_OI]; + data[jistart + 5143] = 0.0 + k[5120]*y_cur[IDX_CNI]; + data[jistart + 5144] = 0.0 + k[5377]*y_cur[IDX_OI]; + data[jistart + 5145] = 0.0 + k[5372]*y_cur[IDX_OI]; + data[jistart + 5146] = 0.0 - k[1424]*y_cur[IDX_CII] - k[3291]*y_cur[IDX_HeII] - + k[3292]*y_cur[IDX_HeII] - k[3767]*y_cur[IDX_H3II] - + k[3768]*y_cur[IDX_H3II] - k[4979]*y_cur[IDX_CI] - + k[5194]*y_cur[IDX_HI] - k[5195]*y_cur[IDX_HI] - + k[5196]*y_cur[IDX_HI] - k[5331]*y_cur[IDX_NOI] - + k[5332]*y_cur[IDX_NOI] - k[5335]*y_cur[IDX_O2I] - + k[5336]*y_cur[IDX_O2I] - k[5428]*y_cur[IDX_OI] - + k[5429]*y_cur[IDX_OI] - k[5901] - k[6239] - k[6964]; + data[jistart + 5147] = 0.0 + k[5475]*y_cur[IDX_OHI]; + data[jistart + 5148] = 0.0 + k[8692]*y_cur[IDX_GOI]; + data[jistart + 5149] = 0.0 + k[8692]*y_cur[IDX_GCNI]; + data[jistart + 5150] = 0.0 + k[5124]*y_cur[IDX_CNI] - k[5335]*y_cur[IDX_OCNI] - + k[5336]*y_cur[IDX_OCNI]; + data[jistart + 5151] = 0.0 + k[5085]*y_cur[IDX_CHI] + k[5122]*y_cur[IDX_CNI] - + k[5331]*y_cur[IDX_OCNI] - k[5332]*y_cur[IDX_OCNI]; + data[jistart + 5152] = 0.0 + k[5267]*y_cur[IDX_NI]; + data[jistart + 5153] = 0.0 + k[5404]*y_cur[IDX_OI]; + data[jistart + 5154] = 0.0 + k[5085]*y_cur[IDX_NOI]; + data[jistart + 5155] = 0.0 + k[5460]*y_cur[IDX_CNI] + k[5475]*y_cur[IDX_NCCNI]; + data[jistart + 5156] = 0.0 + k[5120]*y_cur[IDX_NO2I] + k[5122]*y_cur[IDX_NOI] + + k[5124]*y_cur[IDX_O2I] + k[5460]*y_cur[IDX_OHI]; + data[jistart + 5157] = 0.0 + k[5267]*y_cur[IDX_HCOI]; + data[jistart + 5158] = 0.0 + k[5216]*y_cur[IDX_HOCNI] + k[5372]*y_cur[IDX_C7NI] + + k[5377]*y_cur[IDX_C9NI] + k[5396]*y_cur[IDX_H2CNI] + + k[5404]*y_cur[IDX_HCNI] - k[5428]*y_cur[IDX_OCNI] - + k[5429]*y_cur[IDX_OCNI]; + data[jistart + 5159] = 0.0 - k[3291]*y_cur[IDX_OCNI] - k[3292]*y_cur[IDX_OCNI]; + data[jistart + 5160] = 0.0 - k[1424]*y_cur[IDX_OCNI]; + data[jistart + 5161] = 0.0 - k[4979]*y_cur[IDX_OCNI]; + data[jistart + 5162] = 0.0 - k[3767]*y_cur[IDX_OCNI] - k[3768]*y_cur[IDX_OCNI]; + data[jistart + 5163] = 0.0 + k[6523]*y_cur[IDX_HNCOII] + k[6524]*y_cur[IDX_HOCNII]; + data[jistart + 5164] = 0.0 + k[1117]*y_cur[IDX_HNCOII] + k[1126]*y_cur[IDX_HOCNII]; + data[jistart + 5165] = 0.0 - k[5194]*y_cur[IDX_OCNI] - k[5195]*y_cur[IDX_OCNI] - + k[5196]*y_cur[IDX_OCNI]; + data[jistart + 5166] = 0.0 + k[1928]*y_cur[IDX_CI]; + data[jistart + 5167] = 0.0 + k[2361]*y_cur[IDX_HII] + k[3320]*y_cur[IDX_HeII]; + data[jistart + 5168] = 0.0 + k[2703]*y_cur[IDX_H3II] + k[2809]*y_cur[IDX_H3OII] + + k[2973]*y_cur[IDX_HCOII]; + data[jistart + 5169] = 0.0 + k[199]*y_cur[IDX_CII] + k[426]*y_cur[IDX_HII] + k[6269]; + data[jistart + 5170] = 0.0 + k[2452]*y_cur[IDX_H2I]; + data[jistart + 5171] = 0.0 + k[1927]*y_cur[IDX_CI]; + data[jistart + 5172] = 0.0 + k[1442]*y_cur[IDX_CII]; + data[jistart + 5173] = 0.0 - k[1242]*y_cur[IDX_eM] - k[1243]*y_cur[IDX_eM] - + k[1244]*y_cur[IDX_eM] - k[1920]*y_cur[IDX_CI] - + k[1921]*y_cur[IDX_CI] - k[1922]*y_cur[IDX_CI] - + k[3470]*y_cur[IDX_NI] - k[3754]*y_cur[IDX_OI] - + k[3755]*y_cur[IDX_OI] - k[3841]*y_cur[IDX_SI] - + k[6496]*y_cur[IDX_GRAINM] - k[6497]*y_cur[IDX_GRAINM] - + k[6498]*y_cur[IDX_GRAINM]; + data[jistart + 5174] = 0.0 + k[2100]*y_cur[IDX_CH3II]; + data[jistart + 5175] = 0.0 + k[1443]*y_cur[IDX_CII]; + data[jistart + 5176] = 0.0 + k[3866]*y_cur[IDX_SiII]; + data[jistart + 5177] = 0.0 + k[2103]*y_cur[IDX_CH3I] + k[3866]*y_cur[IDX_CH3CCHI]; + data[jistart + 5178] = 0.0 + k[2098]*y_cur[IDX_CH3II]; + data[jistart + 5179] = 0.0 - k[3841]*y_cur[IDX_SiCH2II]; + data[jistart + 5180] = 0.0 + k[2098]*y_cur[IDX_SiI] + k[2100]*y_cur[IDX_SiHI]; + data[jistart + 5181] = 0.0 + k[2103]*y_cur[IDX_SiII]; + data[jistart + 5182] = 0.0 - k[3470]*y_cur[IDX_SiCH2II]; + data[jistart + 5183] = 0.0 + k[2809]*y_cur[IDX_HCSiI]; + data[jistart + 5184] = 0.0 - k[3754]*y_cur[IDX_SiCH2II] - k[3755]*y_cur[IDX_SiCH2II]; + data[jistart + 5185] = 0.0 + k[3320]*y_cur[IDX_SiCH3I]; + data[jistart + 5186] = 0.0 + k[199]*y_cur[IDX_SiCH2I] + k[1442]*y_cur[IDX_SiH3I] + + k[1443]*y_cur[IDX_SiH4I]; + data[jistart + 5187] = 0.0 + k[426]*y_cur[IDX_SiCH2I] + k[2361]*y_cur[IDX_SiCH3I]; + data[jistart + 5188] = 0.0 - k[1920]*y_cur[IDX_SiCH2II] - k[1921]*y_cur[IDX_SiCH2II] - + k[1922]*y_cur[IDX_SiCH2II] + k[1927]*y_cur[IDX_SiH3II] + + k[1928]*y_cur[IDX_SiH4II]; + data[jistart + 5189] = 0.0 + k[2973]*y_cur[IDX_HCSiI]; + data[jistart + 5190] = 0.0 + k[2703]*y_cur[IDX_HCSiI]; + data[jistart + 5191] = 0.0 - k[6496]*y_cur[IDX_SiCH2II] - k[6497]*y_cur[IDX_SiCH2II] - + k[6498]*y_cur[IDX_SiCH2II]; + data[jistart + 5192] = 0.0 + k[2452]*y_cur[IDX_HCSiII]; + data[jistart + 5193] = 0.0 - k[1242]*y_cur[IDX_SiCH2II] - k[1243]*y_cur[IDX_SiCH2II] - + k[1244]*y_cur[IDX_SiCH2II]; + data[jistart + 5194] = 0.0 + k[3309]*y_cur[IDX_HeII]; + data[jistart + 5195] = 0.0 + k[3321]*y_cur[IDX_HeII]; + data[jistart + 5196] = 0.0 + k[3319]*y_cur[IDX_HeII]; + data[jistart + 5197] = 0.0 + k[2362]*y_cur[IDX_HII] + k[3323]*y_cur[IDX_HeII]; + data[jistart + 5198] = 0.0 + k[3324]*y_cur[IDX_HeII]; + data[jistart + 5199] = 0.0 - k[1250]*y_cur[IDX_eM] - k[1925]*y_cur[IDX_CI] - + k[2267]*y_cur[IDX_CHI] - k[2571]*y_cur[IDX_H2OI] - + k[2848]*y_cur[IDX_HI] - k[3471]*y_cur[IDX_NI] - + k[3603]*y_cur[IDX_NH3I] - k[3756]*y_cur[IDX_OI] - + k[5564]*y_cur[IDX_H2I] - k[6271] - k[6388]*y_cur[IDX_GRAINM]; + data[jistart + 5200] = 0.0 + k[431]*y_cur[IDX_HII] + k[725]*y_cur[IDX_SII]; + data[jistart + 5201] = 0.0 + k[1532]*y_cur[IDX_C2H2II] + k[3327]*y_cur[IDX_HeII]; + data[jistart + 5202] = 0.0 + k[3791]*y_cur[IDX_SiI]; + data[jistart + 5203] = 0.0 + k[5575]*y_cur[IDX_HI]; + data[jistart + 5204] = 0.0 + k[725]*y_cur[IDX_SiHI]; + data[jistart + 5205] = 0.0 + k[2743]*y_cur[IDX_H3II] + k[2818]*y_cur[IDX_H3OII] + + k[3791]*y_cur[IDX_OHII] + k[3881]*y_cur[IDX_HCOII]; + data[jistart + 5206] = 0.0 - k[2267]*y_cur[IDX_SiHII]; + data[jistart + 5207] = 0.0 - k[3603]*y_cur[IDX_SiHII]; + data[jistart + 5208] = 0.0 + k[1532]*y_cur[IDX_SiH4I]; + data[jistart + 5209] = 0.0 - k[3471]*y_cur[IDX_SiHII]; + data[jistart + 5210] = 0.0 + k[2818]*y_cur[IDX_SiI]; + data[jistart + 5211] = 0.0 - k[3756]*y_cur[IDX_SiHII]; + data[jistart + 5212] = 0.0 + k[3309]*y_cur[IDX_SiC2H2I] + k[3319]*y_cur[IDX_SiCH2I] + + k[3321]*y_cur[IDX_SiCH3I] + k[3323]*y_cur[IDX_SiH2I] + + k[3324]*y_cur[IDX_SiH3I] + k[3327]*y_cur[IDX_SiH4I]; + data[jistart + 5213] = 0.0 - k[2571]*y_cur[IDX_SiHII]; + data[jistart + 5214] = 0.0 + k[431]*y_cur[IDX_SiHI] + k[2362]*y_cur[IDX_SiH2I]; + data[jistart + 5215] = 0.0 - k[1925]*y_cur[IDX_SiHII]; + data[jistart + 5216] = 0.0 + k[3881]*y_cur[IDX_SiI]; + data[jistart + 5217] = 0.0 + k[2743]*y_cur[IDX_SiI]; + data[jistart + 5218] = 0.0 - k[6388]*y_cur[IDX_SiHII]; + data[jistart + 5219] = 0.0 - k[5564]*y_cur[IDX_SiHII]; + data[jistart + 5220] = 0.0 - k[1250]*y_cur[IDX_SiHII]; + data[jistart + 5221] = 0.0 - k[2848]*y_cur[IDX_SiHII] + k[5575]*y_cur[IDX_SiII]; + data[jistart + 5222] = 0.0 + k[7200] + k[7382] + k[7568]; + data[jistart + 5223] = 0.0 - k[1723]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5224] = 0.0 + k[8754]*y_cur[IDX_GCH3I]; + data[jistart + 5225] = 0.0 + k[953]*y_cur[IDX_eM] + k[6693]*y_cur[IDX_GRAINM]; + data[jistart + 5226] = 0.0 - k[168]*y_cur[IDX_CII] - k[270]*y_cur[IDX_CH3II] - + k[368]*y_cur[IDX_HII] - k[713]*y_cur[IDX_SOII] - + k[1380]*y_cur[IDX_CII] - k[1723]*y_cur[IDX_C2H5CNHII] - + k[2070]*y_cur[IDX_CH3II] - k[2071]*y_cur[IDX_CH3II] - + k[2659]*y_cur[IDX_H3II] - k[2660]*y_cur[IDX_H3II] - + k[2661]*y_cur[IDX_H3II] - k[2662]*y_cur[IDX_H3II] - + k[2663]*y_cur[IDX_H3II] - k[2664]*y_cur[IDX_H3II] - + k[2665]*y_cur[IDX_H3II] - k[2793]*y_cur[IDX_H3OII] - + k[2952]*y_cur[IDX_HCOII] - k[3014]*y_cur[IDX_HCSII] - + k[3194]*y_cur[IDX_HeII] - k[3857]*y_cur[IDX_SOII] - k[5811] - + k[5812] - k[5813] - k[6116] - k[6117] - k[7018]; + data[jistart + 5227] = 0.0 - k[3014]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5228] = 0.0 + k[8754]*y_cur[IDX_GCH3COI]; + data[jistart + 5229] = 0.0 - k[713]*y_cur[IDX_CH3COCH3I] - k[3857]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5230] = 0.0 - k[270]*y_cur[IDX_CH3COCH3I] - k[2070]*y_cur[IDX_CH3COCH3I] - + k[2071]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5231] = 0.0 - k[2793]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5232] = 0.0 - k[3194]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5233] = 0.0 - k[168]*y_cur[IDX_CH3COCH3I] - k[1380]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5234] = 0.0 - k[368]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5235] = 0.0 - k[2952]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5236] = 0.0 - k[2659]*y_cur[IDX_CH3COCH3I] - k[2660]*y_cur[IDX_CH3COCH3I] - + k[2661]*y_cur[IDX_CH3COCH3I] - k[2662]*y_cur[IDX_CH3COCH3I] - + k[2663]*y_cur[IDX_CH3COCH3I] - k[2664]*y_cur[IDX_CH3COCH3I] - + k[2665]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5237] = 0.0 + k[6693]*y_cur[IDX_CH3COCH4II]; + data[jistart + 5238] = 0.0 + k[953]*y_cur[IDX_CH3COCH4II]; + data[jistart + 5239] = 0.0 + k[2409]*y_cur[IDX_H2I]; + data[jistart + 5240] = 0.0 + k[3167]*y_cur[IDX_HeII]; + data[jistart + 5241] = 0.0 + k[3023]*y_cur[IDX_HII]; + data[jistart + 5242] = 0.0 - k[229]*y_cur[IDX_C2H2I] - k[239]*y_cur[IDX_C2H4I] - + k[493]*y_cur[IDX_C4H2I] - k[607]*y_cur[IDX_NH3I] - + k[1063]*y_cur[IDX_eM] - k[1064]*y_cur[IDX_eM] - + k[1065]*y_cur[IDX_eM] - k[1565]*y_cur[IDX_C2H2I] - + k[1707]*y_cur[IDX_C2H4I] - k[2196]*y_cur[IDX_CH4I] - + k[2197]*y_cur[IDX_CH4I] - k[2198]*y_cur[IDX_CH4I] - + k[2444]*y_cur[IDX_H2I] - k[2445]*y_cur[IDX_H2I] - + k[3460]*y_cur[IDX_NI] - k[3461]*y_cur[IDX_NI] - + k[6629]*y_cur[IDX_GRAINM] - k[6630]*y_cur[IDX_GRAINM] - + k[6631]*y_cur[IDX_GRAINM]; + data[jistart + 5243] = 0.0 + k[383]*y_cur[IDX_HII]; + data[jistart + 5244] = 0.0 + k[1475]*y_cur[IDX_HCNI]; + data[jistart + 5245] = 0.0 + k[2604]*y_cur[IDX_H3II] + k[2774]*y_cur[IDX_H3OII] + + k[2909]*y_cur[IDX_HCOII]; + data[jistart + 5246] = 0.0 - k[493]*y_cur[IDX_HC3NII]; + data[jistart + 5247] = 0.0 - k[239]*y_cur[IDX_HC3NII] - k[1707]*y_cur[IDX_HC3NII]; + data[jistart + 5248] = 0.0 - k[2196]*y_cur[IDX_HC3NII] - k[2197]*y_cur[IDX_HC3NII] - + k[2198]*y_cur[IDX_HC3NII]; + data[jistart + 5249] = 0.0 + k[1475]*y_cur[IDX_C2HII]; + data[jistart + 5250] = 0.0 - k[607]*y_cur[IDX_HC3NII]; + data[jistart + 5251] = 0.0 + k[2277]*y_cur[IDX_CNI]; + data[jistart + 5252] = 0.0 - k[229]*y_cur[IDX_HC3NII] - k[1565]*y_cur[IDX_HC3NII]; + data[jistart + 5253] = 0.0 + k[2277]*y_cur[IDX_C2H2II]; + data[jistart + 5254] = 0.0 - k[3460]*y_cur[IDX_HC3NII] - k[3461]*y_cur[IDX_HC3NII]; + data[jistart + 5255] = 0.0 + k[2774]*y_cur[IDX_C3NI]; + data[jistart + 5256] = 0.0 + k[3167]*y_cur[IDX_CH2CHCNI]; + data[jistart + 5257] = 0.0 + k[383]*y_cur[IDX_HC3NI] + k[3023]*y_cur[IDX_HNC3I]; + data[jistart + 5258] = 0.0 + k[2909]*y_cur[IDX_C3NI]; + data[jistart + 5259] = 0.0 + k[2604]*y_cur[IDX_C3NI]; + data[jistart + 5260] = 0.0 - k[6629]*y_cur[IDX_HC3NII] - k[6630]*y_cur[IDX_HC3NII] - + k[6631]*y_cur[IDX_HC3NII]; + data[jistart + 5261] = 0.0 + k[2409]*y_cur[IDX_C3NII] - k[2444]*y_cur[IDX_HC3NII] - + k[2445]*y_cur[IDX_HC3NII]; + data[jistart + 5262] = 0.0 - k[1063]*y_cur[IDX_HC3NII] - k[1064]*y_cur[IDX_HC3NII] - + k[1065]*y_cur[IDX_HC3NII]; + data[jistart + 5263] = 0.0 + k[7240] + k[7422] + k[7604]; + data[jistart + 5264] = 0.0 + k[887]*y_cur[IDX_eM] + k[6853]*y_cur[IDX_GRAINM]; + data[jistart + 5265] = 0.0 + k[8644]*y_cur[IDX_GHI]; + data[jistart + 5266] = 0.0 + k[8733]*y_cur[IDX_GCHI]; + data[jistart + 5267] = 0.0 + k[885]*y_cur[IDX_eM] + k[6847]*y_cur[IDX_GRAINM]; + data[jistart + 5268] = 0.0 + k[4951]*y_cur[IDX_CI]; + data[jistart + 5269] = 0.0 + k[883]*y_cur[IDX_eM] + k[6845]*y_cur[IDX_GRAINM]; + data[jistart + 5270] = 0.0 + k[3725]*y_cur[IDX_OI]; + data[jistart + 5271] = 0.0 - k[353]*y_cur[IDX_HII] - k[1335]*y_cur[IDX_CII] - + k[1336]*y_cur[IDX_CII] - k[1503]*y_cur[IDX_C2H2II] - + k[1504]*y_cur[IDX_C2H2II] - k[2059]*y_cur[IDX_CH3II] - + k[2310]*y_cur[IDX_HII] - k[2626]*y_cur[IDX_H3II] - + k[2931]*y_cur[IDX_HCOII] - k[3144]*y_cur[IDX_HeII] - + k[3145]*y_cur[IDX_HeII] - k[3146]*y_cur[IDX_HeII] - + k[4893]*y_cur[IDX_C2HI] - k[4939]*y_cur[IDX_CI] - + k[5108]*y_cur[IDX_CNI] - k[5764] - k[6055] - k[6056] - k[7058]; + data[jistart + 5272] = 0.0 + k[4891]*y_cur[IDX_C2HI]; + data[jistart + 5273] = 0.0 + k[102]*y_cur[IDX_HI]; + data[jistart + 5274] = 0.0 + k[8733]*y_cur[IDX_GC7HI]; + data[jistart + 5275] = 0.0 + k[4891]*y_cur[IDX_C6H2I] - k[4893]*y_cur[IDX_C8H2I]; + data[jistart + 5276] = 0.0 - k[1503]*y_cur[IDX_C8H2I] - k[1504]*y_cur[IDX_C8H2I]; + data[jistart + 5277] = 0.0 - k[2059]*y_cur[IDX_C8H2I]; + data[jistart + 5278] = 0.0 - k[5108]*y_cur[IDX_C8H2I]; + data[jistart + 5279] = 0.0 + k[8644]*y_cur[IDX_GC8HI]; + data[jistart + 5280] = 0.0 + k[3725]*y_cur[IDX_C9H3II]; + data[jistart + 5281] = 0.0 - k[3144]*y_cur[IDX_C8H2I] - k[3145]*y_cur[IDX_C8H2I] - + k[3146]*y_cur[IDX_C8H2I]; + data[jistart + 5282] = 0.0 - k[1335]*y_cur[IDX_C8H2I] - k[1336]*y_cur[IDX_C8H2I]; + data[jistart + 5283] = 0.0 - k[353]*y_cur[IDX_C8H2I] - k[2310]*y_cur[IDX_C8H2I]; + data[jistart + 5284] = 0.0 - k[4939]*y_cur[IDX_C8H2I] + k[4951]*y_cur[IDX_CH3C6HI]; + data[jistart + 5285] = 0.0 - k[2931]*y_cur[IDX_C8H2I]; + data[jistart + 5286] = 0.0 - k[2626]*y_cur[IDX_C8H2I]; + data[jistart + 5287] = 0.0 + k[6845]*y_cur[IDX_C8H3II] + k[6847]*y_cur[IDX_C8H4II] + + k[6853]*y_cur[IDX_C8H5II]; + data[jistart + 5288] = 0.0 + k[883]*y_cur[IDX_C8H3II] + k[885]*y_cur[IDX_C8H4II] + + k[887]*y_cur[IDX_C8H5II]; + data[jistart + 5289] = 0.0 + k[102]*y_cur[IDX_C8HM]; + data[jistart + 5290] = 0.0 - k[315]*y_cur[IDX_CO2II]; + data[jistart + 5291] = 0.0 - k[228]*y_cur[IDX_C2H2I] - k[238]*y_cur[IDX_C2H4I] - + k[286]*y_cur[IDX_CH4I] - k[314]*y_cur[IDX_OCSI] - + k[315]*y_cur[IDX_SO2I] - k[479]*y_cur[IDX_H2OI] - + k[484]*y_cur[IDX_H2SI] - k[603]*y_cur[IDX_NH3I] - + k[623]*y_cur[IDX_NOI] - k[678]*y_cur[IDX_O2I] - k[683]*y_cur[IDX_OI] + - k[981]*y_cur[IDX_eM] - k[2191]*y_cur[IDX_CH4I] - + k[2436]*y_cur[IDX_H2I] - k[2541]*y_cur[IDX_H2OI] - + k[2841]*y_cur[IDX_HI] - k[3730]*y_cur[IDX_OI] - + k[6540]*y_cur[IDX_GRAINM]; + data[jistart + 5292] = 0.0 + k[298]*y_cur[IDX_CO2I]; + data[jistart + 5293] = 0.0 + k[564]*y_cur[IDX_CO2I]; + data[jistart + 5294] = 0.0 - k[314]*y_cur[IDX_CO2II]; + data[jistart + 5295] = 0.0 + k[307]*y_cur[IDX_CO2I]; + data[jistart + 5296] = 0.0 + k[298]*y_cur[IDX_CNII] + k[307]*y_cur[IDX_COII] + + k[516]*y_cur[IDX_HeII] + k[548]*y_cur[IDX_NII] + + k[564]*y_cur[IDX_N2II]; + data[jistart + 5297] = 0.0 + k[548]*y_cur[IDX_CO2I]; + data[jistart + 5298] = 0.0 - k[238]*y_cur[IDX_CO2II]; + data[jistart + 5299] = 0.0 - k[678]*y_cur[IDX_CO2II]; + data[jistart + 5300] = 0.0 - k[484]*y_cur[IDX_CO2II]; + data[jistart + 5301] = 0.0 - k[623]*y_cur[IDX_CO2II]; + data[jistart + 5302] = 0.0 - k[286]*y_cur[IDX_CO2II] - k[2191]*y_cur[IDX_CO2II]; + data[jistart + 5303] = 0.0 - k[603]*y_cur[IDX_CO2II]; + data[jistart + 5304] = 0.0 - k[228]*y_cur[IDX_CO2II]; + data[jistart + 5305] = 0.0 - k[683]*y_cur[IDX_CO2II] - k[3730]*y_cur[IDX_CO2II]; + data[jistart + 5306] = 0.0 + k[516]*y_cur[IDX_CO2I]; + data[jistart + 5307] = 0.0 - k[479]*y_cur[IDX_CO2II] - k[2541]*y_cur[IDX_CO2II]; + data[jistart + 5308] = 0.0 - k[6540]*y_cur[IDX_CO2II]; + data[jistart + 5309] = 0.0 - k[2436]*y_cur[IDX_CO2II]; + data[jistart + 5310] = 0.0 - k[981]*y_cur[IDX_CO2II]; + data[jistart + 5311] = 0.0 - k[2841]*y_cur[IDX_CO2II]; + data[jistart + 5312] = 0.0 + k[7892] + k[8271]; + data[jistart + 5313] = 0.0 + k[7755] + k[8069]; + data[jistart + 5314] = 0.0 + k[7754] + k[8068]; + data[jistart + 5315] = 0.0 + k[7708] + k[7708] + k[8012] + k[8012] + k[8310]*y_cur[IDX_GHI]; + data[jistart + 5316] = 0.0 + k[7772] + k[7773] + k[8092] + k[8093]; + data[jistart + 5317] = 0.0 + k[8006] + k[8436]*y_cur[IDX_GOI]; + data[jistart + 5318] = 0.0 + k[8435]*y_cur[IDX_GOI]; + data[jistart + 5319] = 0.0 + k[7884] + k[8267]; + data[jistart + 5320] = 0.0 - k[8519]*y_cur[IDX_GOHI] - k[8520]*y_cur[IDX_GOHI]; + data[jistart + 5321] = 0.0 + k[7780] + k[8102] + k[8104] - k[8510]*y_cur[IDX_GOHI]; + data[jistart + 5322] = 0.0 - k[8504]*y_cur[IDX_GOHI] - k[8742]*y_cur[IDX_GOHI]; + data[jistart + 5323] = 0.0 - k[8511]*y_cur[IDX_GOHI] - k[8512]*y_cur[IDX_GOHI]; + data[jistart + 5324] = 0.0 + k[7882] + k[8265]; + data[jistart + 5325] = 0.0 + k[7699] + k[7702] + k[7997] + k[8002]; + data[jistart + 5326] = 0.0 + k[7639] + k[7921] + k[7925]; + data[jistart + 5327] = 0.0 - k[8505]*y_cur[IDX_GOHI] - k[8506]*y_cur[IDX_GOHI] - + k[8507]*y_cur[IDX_GOHI]; + data[jistart + 5328] = 0.0 - k[8508]*y_cur[IDX_GOHI] - k[8509]*y_cur[IDX_GOHI]; + data[jistart + 5329] = 0.0 + k[8434]*y_cur[IDX_GOI] - k[8517]*y_cur[IDX_GOHI] - + k[8740]*y_cur[IDX_GOHI]; + data[jistart + 5330] = 0.0 - k[7083] - k[7265] - k[7447] - k[7638] - k[7919] - k[7920] - + k[8283]*y_cur[IDX_GHI] - k[8373]*y_cur[IDX_GH2I] - + k[8408]*y_cur[IDX_GCI] - k[8444]*y_cur[IDX_GOI] - + k[8504]*y_cur[IDX_GCH3COI] - k[8505]*y_cur[IDX_GCH3CHOI] - + k[8506]*y_cur[IDX_GCH3CHOI] - k[8507]*y_cur[IDX_GCH3CHOI] - + k[8508]*y_cur[IDX_GH2COI] - k[8509]*y_cur[IDX_GH2COI] - + k[8510]*y_cur[IDX_GHCOOHI] - k[8511]*y_cur[IDX_GHCOOCH3I] - + k[8512]*y_cur[IDX_GHCOOCH3I] - k[8513]*y_cur[IDX_GCH3I] - + k[8514]*y_cur[IDX_GOHI] - k[8514]*y_cur[IDX_GOHI] - + k[8514]*y_cur[IDX_GOHI] - k[8514]*y_cur[IDX_GOHI] - + k[8515]*y_cur[IDX_GCOI] - k[8516]*y_cur[IDX_GCOI] - + k[8517]*y_cur[IDX_GHCOI] - k[8518]*y_cur[IDX_GCH2I] - + k[8519]*y_cur[IDX_GCH2OHCHOI] - k[8520]*y_cur[IDX_GCH2OHCHOI] - + k[8584]*y_cur[IDX_GHI] - k[8690]*y_cur[IDX_GOI] - + k[8737]*y_cur[IDX_GCH3I] - k[8738]*y_cur[IDX_GOHI] - + k[8738]*y_cur[IDX_GOHI] - k[8738]*y_cur[IDX_GOHI] - + k[8738]*y_cur[IDX_GOHI] - k[8739]*y_cur[IDX_GCOI] - + k[8740]*y_cur[IDX_GHCOI] - k[8741]*y_cur[IDX_GCH2I] - + k[8742]*y_cur[IDX_GCH3COI]; + data[jistart + 5331] = 0.0 - k[8515]*y_cur[IDX_GOHI] - k[8516]*y_cur[IDX_GOHI] - + k[8739]*y_cur[IDX_GOHI]; + data[jistart + 5332] = 0.0 - k[8518]*y_cur[IDX_GOHI] - k[8741]*y_cur[IDX_GOHI]; + data[jistart + 5333] = 0.0 + k[8282]*y_cur[IDX_GHI] + k[8434]*y_cur[IDX_GHCOI] + + k[8435]*y_cur[IDX_GHNOI] + k[8436]*y_cur[IDX_GO2HI] - + k[8444]*y_cur[IDX_GOHI] - k[8690]*y_cur[IDX_GOHI]; + data[jistart + 5334] = 0.0 - k[8513]*y_cur[IDX_GOHI] - k[8737]*y_cur[IDX_GOHI]; + data[jistart + 5335] = 0.0 - k[8373]*y_cur[IDX_GOHI]; + data[jistart + 5336] = 0.0 - k[8408]*y_cur[IDX_GOHI]; + data[jistart + 5337] = 0.0 + k[6901]; + data[jistart + 5338] = 0.0 + k[8282]*y_cur[IDX_GOI] - k[8283]*y_cur[IDX_GOHI] + + k[8310]*y_cur[IDX_GH2O2I] - k[8584]*y_cur[IDX_GOHI]; + data[jistart + 5339] = 0.0 + k[7227] + k[7409] + k[7591]; + data[jistart + 5340] = 0.0 + k[8640]*y_cur[IDX_GHI]; + data[jistart + 5341] = 0.0 + k[932]*y_cur[IDX_eM] + k[6835]*y_cur[IDX_GRAINM]; + data[jistart + 5342] = 0.0 + k[1029]*y_cur[IDX_eM] + k[6805]*y_cur[IDX_GRAINM]; + data[jistart + 5343] = 0.0 + k[1081]*y_cur[IDX_eM] + k[6793]*y_cur[IDX_GRAINM]; + data[jistart + 5344] = 0.0 + k[2322]*y_cur[IDX_HII]; + data[jistart + 5345] = 0.0 + k[8708]*y_cur[IDX_GNI]; + data[jistart + 5346] = 0.0 - k[385]*y_cur[IDX_HII] - k[1404]*y_cur[IDX_CII] - + k[2691]*y_cur[IDX_H3II] - k[2966]*y_cur[IDX_HCOII] - + k[3241]*y_cur[IDX_HeII] - k[3242]*y_cur[IDX_HeII] - + k[5509]*y_cur[IDX_C2H2II] - k[5519]*y_cur[IDX_C4H2II] - + k[5538]*y_cur[IDX_CH3II] - k[5850] - k[5851] - k[6175] - k[6176] - + k[7045]; + data[jistart + 5347] = 0.0 + k[4908]*y_cur[IDX_C4HI]; + data[jistart + 5348] = 0.0 + k[5239]*y_cur[IDX_NI]; + data[jistart + 5349] = 0.0 + k[8708]*y_cur[IDX_GC5HI]; + data[jistart + 5350] = 0.0 + k[117]*y_cur[IDX_NI]; + data[jistart + 5351] = 0.0 + k[96]*y_cur[IDX_HI]; + data[jistart + 5352] = 0.0 + k[4907]*y_cur[IDX_HNCI] + k[4908]*y_cur[IDX_NCCNI]; + data[jistart + 5353] = 0.0 + k[5115]*y_cur[IDX_CNI]; + data[jistart + 5354] = 0.0 - k[5519]*y_cur[IDX_HC5NI]; + data[jistart + 5355] = 0.0 + k[4907]*y_cur[IDX_C4HI]; + data[jistart + 5356] = 0.0 - k[5509]*y_cur[IDX_HC5NI]; + data[jistart + 5357] = 0.0 - k[5538]*y_cur[IDX_HC5NI]; + data[jistart + 5358] = 0.0 + k[5115]*y_cur[IDX_C4H2I]; + data[jistart + 5359] = 0.0 + k[8640]*y_cur[IDX_GC5NI]; + data[jistart + 5360] = 0.0 + k[117]*y_cur[IDX_C5HM] + k[5239]*y_cur[IDX_C5H2I]; + data[jistart + 5361] = 0.0 - k[3241]*y_cur[IDX_HC5NI] - k[3242]*y_cur[IDX_HC5NI]; + data[jistart + 5362] = 0.0 - k[1404]*y_cur[IDX_HC5NI]; + data[jistart + 5363] = 0.0 - k[385]*y_cur[IDX_HC5NI] + k[2322]*y_cur[IDX_CH3C5NI]; + data[jistart + 5364] = 0.0 - k[2966]*y_cur[IDX_HC5NI]; + data[jistart + 5365] = 0.0 - k[2691]*y_cur[IDX_HC5NI]; + data[jistart + 5366] = 0.0 + k[6793]*y_cur[IDX_HC5NHII] + k[6805]*y_cur[IDX_H3C5NII] + + k[6835]*y_cur[IDX_CH3C5NHII]; + data[jistart + 5367] = 0.0 + k[932]*y_cur[IDX_CH3C5NHII] + k[1029]*y_cur[IDX_H3C5NII] + + k[1081]*y_cur[IDX_HC5NHII]; + data[jistart + 5368] = 0.0 + k[96]*y_cur[IDX_C5NM]; + data[jistart + 5369] = 0.0 + k[7102] + k[7284] + k[7466]; + data[jistart + 5370] = 0.0 + k[1023]*y_cur[IDX_eM] + k[6585]*y_cur[IDX_GRAINM]; + data[jistart + 5371] = 0.0 + k[8600]*y_cur[IDX_GHI]; + data[jistart + 5372] = 0.0 + k[5927] + k[6273]; + data[jistart + 5373] = 0.0 + k[1253]*y_cur[IDX_eM] + k[6404]*y_cur[IDX_GRAINM]; + data[jistart + 5374] = 0.0 + k[1255]*y_cur[IDX_eM] + k[6413]*y_cur[IDX_GRAINM]; + data[jistart + 5375] = 0.0 + k[6276]; + data[jistart + 5376] = 0.0 + k[3755]*y_cur[IDX_OI]; + data[jistart + 5377] = 0.0 - k[431]*y_cur[IDX_HII] - k[725]*y_cur[IDX_SII] - + k[1445]*y_cur[IDX_CII] - k[2100]*y_cur[IDX_CH3II] - + k[2365]*y_cur[IDX_HII] - k[2756]*y_cur[IDX_H3II] - + k[2824]*y_cur[IDX_H3OII] - k[3002]*y_cur[IDX_HCOII] - + k[3328]*y_cur[IDX_HeII] - k[3793]*y_cur[IDX_OHII] - + k[3885]*y_cur[IDX_SII] - k[4990]*y_cur[IDX_CI] - + k[5296]*y_cur[IDX_NI] - k[5449]*y_cur[IDX_OI] - k[5930] - k[6280] - + k[6920]; + data[jistart + 5378] = 0.0 + k[6279]; + data[jistart + 5379] = 0.0 - k[3793]*y_cur[IDX_SiHI]; + data[jistart + 5380] = 0.0 + k[3869]*y_cur[IDX_SiII]; + data[jistart + 5381] = 0.0 + k[3869]*y_cur[IDX_C4H2I]; + data[jistart + 5382] = 0.0 - k[725]*y_cur[IDX_SiHI] - k[3885]*y_cur[IDX_SiHI]; + data[jistart + 5383] = 0.0 - k[2100]*y_cur[IDX_SiHI]; + data[jistart + 5384] = 0.0 + k[8600]*y_cur[IDX_GSiI]; + data[jistart + 5385] = 0.0 - k[5296]*y_cur[IDX_SiHI]; + data[jistart + 5386] = 0.0 - k[2824]*y_cur[IDX_SiHI]; + data[jistart + 5387] = 0.0 + k[3755]*y_cur[IDX_SiCH2II] - k[5449]*y_cur[IDX_SiHI]; + data[jistart + 5388] = 0.0 - k[3328]*y_cur[IDX_SiHI]; + data[jistart + 5389] = 0.0 - k[1445]*y_cur[IDX_SiHI]; + data[jistart + 5390] = 0.0 - k[431]*y_cur[IDX_SiHI] - k[2365]*y_cur[IDX_SiHI]; + data[jistart + 5391] = 0.0 - k[4990]*y_cur[IDX_SiHI]; + data[jistart + 5392] = 0.0 - k[3002]*y_cur[IDX_SiHI]; + data[jistart + 5393] = 0.0 - k[2756]*y_cur[IDX_SiHI]; + data[jistart + 5394] = 0.0 + k[6404]*y_cur[IDX_SiH2II] + k[6413]*y_cur[IDX_SiH3II] + + k[6585]*y_cur[IDX_H2SiOII]; + data[jistart + 5395] = 0.0 + k[1023]*y_cur[IDX_H2SiOII] + k[1253]*y_cur[IDX_SiH2II] + + k[1255]*y_cur[IDX_SiH3II]; + data[jistart + 5396] = 0.0 + k[7117] + k[7299] + k[7481]; + data[jistart + 5397] = 0.0 + k[8603]*y_cur[IDX_GHI]; + data[jistart + 5398] = 0.0 + k[1259]*y_cur[IDX_eM] + k[2573]*y_cur[IDX_H2OI] + + k[6439]*y_cur[IDX_GRAINM]; + data[jistart + 5399] = 0.0 - k[430]*y_cur[IDX_HII] - k[1443]*y_cur[IDX_CII] - + k[1444]*y_cur[IDX_CII] - k[1531]*y_cur[IDX_C2H2II] - + k[1532]*y_cur[IDX_C2H2II] - k[1533]*y_cur[IDX_C2H2II] - + k[1534]*y_cur[IDX_C2H2II] - k[1682]*y_cur[IDX_C2H4II] - + k[1683]*y_cur[IDX_C2H4II] - k[1684]*y_cur[IDX_C2H4II] - + k[2099]*y_cur[IDX_CH3II] - k[2238]*y_cur[IDX_CH5II] - + k[2364]*y_cur[IDX_HII] - k[2755]*y_cur[IDX_H3II] - + k[3001]*y_cur[IDX_HCOII] - k[3326]*y_cur[IDX_HeII] - + k[3327]*y_cur[IDX_HeII] - k[5126]*y_cur[IDX_CNI] - + k[5448]*y_cur[IDX_OI] - k[5929] - k[6277] - k[6278] - k[6279] - + k[6935]; + data[jistart + 5400] = 0.0 - k[2238]*y_cur[IDX_SiH4I]; + data[jistart + 5401] = 0.0 - k[1682]*y_cur[IDX_SiH4I] - k[1683]*y_cur[IDX_SiH4I] - + k[1684]*y_cur[IDX_SiH4I]; + data[jistart + 5402] = 0.0 - k[1531]*y_cur[IDX_SiH4I] - k[1532]*y_cur[IDX_SiH4I] - + k[1533]*y_cur[IDX_SiH4I] - k[1534]*y_cur[IDX_SiH4I]; + data[jistart + 5403] = 0.0 - k[2099]*y_cur[IDX_SiH4I]; + data[jistart + 5404] = 0.0 - k[5126]*y_cur[IDX_SiH4I]; + data[jistart + 5405] = 0.0 + k[8603]*y_cur[IDX_GSiH3I]; + data[jistart + 5406] = 0.0 - k[5448]*y_cur[IDX_SiH4I]; + data[jistart + 5407] = 0.0 - k[3326]*y_cur[IDX_SiH4I] - k[3327]*y_cur[IDX_SiH4I]; + data[jistart + 5408] = 0.0 - k[1443]*y_cur[IDX_SiH4I] - k[1444]*y_cur[IDX_SiH4I]; + data[jistart + 5409] = 0.0 + k[2573]*y_cur[IDX_SiH5II]; + data[jistart + 5410] = 0.0 - k[430]*y_cur[IDX_SiH4I] - k[2364]*y_cur[IDX_SiH4I]; + data[jistart + 5411] = 0.0 - k[3001]*y_cur[IDX_SiH4I]; + data[jistart + 5412] = 0.0 - k[2755]*y_cur[IDX_SiH4I]; + data[jistart + 5413] = 0.0 + k[6439]*y_cur[IDX_SiH5II]; + data[jistart + 5414] = 0.0 + k[1259]*y_cur[IDX_SiH5II]; + data[jistart + 5415] = 0.0 + k[2419]*y_cur[IDX_H2I]; + data[jistart + 5416] = 0.0 + k[3151]*y_cur[IDX_HeII]; + data[jistart + 5417] = 0.0 + k[1405]*y_cur[IDX_CII]; + data[jistart + 5418] = 0.0 + k[3064]*y_cur[IDX_HeII] + k[3065]*y_cur[IDX_HeII]; + data[jistart + 5419] = 0.0 + k[1556]*y_cur[IDX_C2H2I]; + data[jistart + 5420] = 0.0 + k[1874]*y_cur[IDX_CI]; + data[jistart + 5421] = 0.0 - k[866]*y_cur[IDX_eM] - k[867]*y_cur[IDX_eM] - + k[1876]*y_cur[IDX_CI] - k[2420]*y_cur[IDX_H2I] - + k[3429]*y_cur[IDX_NI] - k[3713]*y_cur[IDX_OI] - + k[6824]*y_cur[IDX_GRAINM] - k[6825]*y_cur[IDX_GRAINM]; + data[jistart + 5422] = 0.0 + k[2308]*y_cur[IDX_HII] + k[3138]*y_cur[IDX_HeII]; + data[jistart + 5423] = 0.0 + k[1873]*y_cur[IDX_CI]; + data[jistart + 5424] = 0.0 + k[1327]*y_cur[IDX_CII]; + data[jistart + 5425] = 0.0 + k[1823]*y_cur[IDX_C3HI]; + data[jistart + 5426] = 0.0 + k[1761]*y_cur[IDX_C4HI]; + data[jistart + 5427] = 0.0 + k[3070]*y_cur[IDX_HeII] + k[3071]*y_cur[IDX_HeII]; + data[jistart + 5428] = 0.0 + k[3154]*y_cur[IDX_HeII]; + data[jistart + 5429] = 0.0 + k[2621]*y_cur[IDX_H3II] + k[2926]*y_cur[IDX_HCOII]; + data[jistart + 5430] = 0.0 + k[351]*y_cur[IDX_HII] + k[6048]; + data[jistart + 5431] = 0.0 + k[1493]*y_cur[IDX_C2H2II]; + data[jistart + 5432] = 0.0 + k[1823]*y_cur[IDX_C4HII]; + data[jistart + 5433] = 0.0 + k[1761]*y_cur[IDX_C3H2II]; + data[jistart + 5434] = 0.0 + k[1493]*y_cur[IDX_C5HI]; + data[jistart + 5435] = 0.0 + k[1556]*y_cur[IDX_C5II]; + data[jistart + 5436] = 0.0 - k[3429]*y_cur[IDX_C7HII]; + data[jistart + 5437] = 0.0 - k[3713]*y_cur[IDX_C7HII]; + data[jistart + 5438] = 0.0 + k[3064]*y_cur[IDX_C10H2I] + k[3065]*y_cur[IDX_C10H2I] + + k[3070]*y_cur[IDX_C10HI] + k[3071]*y_cur[IDX_C10HI] + + k[3138]*y_cur[IDX_C7H2I] + k[3151]*y_cur[IDX_C9H2I] + + k[3154]*y_cur[IDX_C9HI]; + data[jistart + 5439] = 0.0 + k[1327]*y_cur[IDX_C6H2I] + k[1405]*y_cur[IDX_HC7NI]; + data[jistart + 5440] = 0.0 + k[351]*y_cur[IDX_C7HI] + k[2308]*y_cur[IDX_C7H2I]; + data[jistart + 5441] = 0.0 + k[1873]*y_cur[IDX_C6H2II] + k[1874]*y_cur[IDX_C6H3II] - + k[1876]*y_cur[IDX_C7HII]; + data[jistart + 5442] = 0.0 + k[2926]*y_cur[IDX_C7I]; + data[jistart + 5443] = 0.0 + k[2621]*y_cur[IDX_C7I]; + data[jistart + 5444] = 0.0 - k[6824]*y_cur[IDX_C7HII] - k[6825]*y_cur[IDX_C7HII]; + data[jistart + 5445] = 0.0 + k[2419]*y_cur[IDX_C7II] - k[2420]*y_cur[IDX_C7HII]; + data[jistart + 5446] = 0.0 - k[866]*y_cur[IDX_C7HII] - k[867]*y_cur[IDX_C7HII]; + data[jistart + 5447] = 0.0 + k[356]*y_cur[IDX_HII] + k[6063]; + data[jistart + 5448] = 0.0 + k[1884]*y_cur[IDX_CI]; + data[jistart + 5449] = 0.0 + k[2425]*y_cur[IDX_H2I]; + data[jistart + 5450] = 0.0 - k[893]*y_cur[IDX_eM] - k[894]*y_cur[IDX_eM] - + k[1886]*y_cur[IDX_CI] - k[1887]*y_cur[IDX_CI] - + k[3449]*y_cur[IDX_NI] - k[3724]*y_cur[IDX_OI] - + k[6859]*y_cur[IDX_GRAINM] - k[6860]*y_cur[IDX_GRAINM]; + data[jistart + 5451] = 0.0 + k[1499]*y_cur[IDX_C2H2II]; + data[jistart + 5452] = 0.0 + k[1560]*y_cur[IDX_C2H2I] + k[1740]*y_cur[IDX_C2HI]; + data[jistart + 5453] = 0.0 + k[1792]*y_cur[IDX_C3H2I] + k[1827]*y_cur[IDX_C3HI] + + k[2483]*y_cur[IDX_H2CCCI]; + data[jistart + 5454] = 0.0 + k[2483]*y_cur[IDX_C6H2II]; + data[jistart + 5455] = 0.0 + k[1767]*y_cur[IDX_C3H2II]; + data[jistart + 5456] = 0.0 + k[1832]*y_cur[IDX_C4HII]; + data[jistart + 5457] = 0.0 + k[1845]*y_cur[IDX_C4HI]; + data[jistart + 5458] = 0.0 + k[1792]*y_cur[IDX_C6H2II]; + data[jistart + 5459] = 0.0 + k[1832]*y_cur[IDX_C5H2I]; + data[jistart + 5460] = 0.0 + k[1803]*y_cur[IDX_C6HI]; + data[jistart + 5461] = 0.0 + k[1767]*y_cur[IDX_C6H2I] + k[1770]*y_cur[IDX_C6HI]; + data[jistart + 5462] = 0.0 + k[2630]*y_cur[IDX_H3II] + k[2935]*y_cur[IDX_HCOII]; + data[jistart + 5463] = 0.0 + k[2060]*y_cur[IDX_CH3II]; + data[jistart + 5464] = 0.0 + k[1502]*y_cur[IDX_C2H2II] + k[1606]*y_cur[IDX_C2H3II]; + data[jistart + 5465] = 0.0 + k[2027]*y_cur[IDX_C6HI]; + data[jistart + 5466] = 0.0 + k[1770]*y_cur[IDX_C3H2II] + k[1803]*y_cur[IDX_C3H3II] + + k[2027]*y_cur[IDX_CH2CCHII]; + data[jistart + 5467] = 0.0 + k[1836]*y_cur[IDX_C4H2II]; + data[jistart + 5468] = 0.0 + k[1827]*y_cur[IDX_C6H2II]; + data[jistart + 5469] = 0.0 + k[1845]*y_cur[IDX_C5H2II]; + data[jistart + 5470] = 0.0 + k[1836]*y_cur[IDX_C5HI]; + data[jistart + 5471] = 0.0 + k[1606]*y_cur[IDX_C7HI]; + data[jistart + 5472] = 0.0 + k[1740]*y_cur[IDX_C7H2II]; + data[jistart + 5473] = 0.0 + k[1499]*y_cur[IDX_C7H2I] + k[1502]*y_cur[IDX_C7HI]; + data[jistart + 5474] = 0.0 + k[2060]*y_cur[IDX_C8HI]; + data[jistart + 5475] = 0.0 + k[1560]*y_cur[IDX_C7H2II]; + data[jistart + 5476] = 0.0 - k[3449]*y_cur[IDX_C9H2II]; + data[jistart + 5477] = 0.0 - k[3724]*y_cur[IDX_C9H2II]; + data[jistart + 5478] = 0.0 + k[356]*y_cur[IDX_C9H2I]; + data[jistart + 5479] = 0.0 + k[1884]*y_cur[IDX_C8H3II] - k[1886]*y_cur[IDX_C9H2II] - + k[1887]*y_cur[IDX_C9H2II]; + data[jistart + 5480] = 0.0 + k[2935]*y_cur[IDX_C9HI]; + data[jistart + 5481] = 0.0 + k[2630]*y_cur[IDX_C9HI]; + data[jistart + 5482] = 0.0 - k[6859]*y_cur[IDX_C9H2II] - k[6860]*y_cur[IDX_C9H2II]; + data[jistart + 5483] = 0.0 + k[2425]*y_cur[IDX_C9HII]; + data[jistart + 5484] = 0.0 - k[893]*y_cur[IDX_C9H2II] - k[894]*y_cur[IDX_C9H2II]; + data[jistart + 5485] = 0.0 + k[7115] + k[7297] + k[7479]; + data[jistart + 5486] = 0.0 + k[1186]*y_cur[IDX_eM] + k[6687]*y_cur[IDX_GRAINM]; + data[jistart + 5487] = 0.0 + k[1216]*y_cur[IDX_eM] + k[6618]*y_cur[IDX_GRAINM]; + data[jistart + 5488] = 0.0 + k[1213]*y_cur[IDX_eM] + k[6594]*y_cur[IDX_GRAINM]; + data[jistart + 5489] = 0.0 + k[1133]*y_cur[IDX_eM] + k[6572]*y_cur[IDX_GRAINM]; + data[jistart + 5490] = 0.0 + k[1018]*y_cur[IDX_eM] + k[6623]*y_cur[IDX_GRAINM]; + data[jistart + 5491] = 0.0 + k[1210]*y_cur[IDX_eM] + k[6449]*y_cur[IDX_GRAINM]; + data[jistart + 5492] = 0.0 + k[1136]*y_cur[IDX_eM] + k[6613]*y_cur[IDX_GRAINM]; + data[jistart + 5493] = 0.0 + k[3175]*y_cur[IDX_HeII] + k[6094]; + data[jistart + 5494] = 0.0 + k[4964]*y_cur[IDX_CI]; + data[jistart + 5495] = 0.0 + k[5434]*y_cur[IDX_OI] + k[5907] + k[6248]; + data[jistart + 5496] = 0.0 + k[3254]*y_cur[IDX_HeII] + k[5407]*y_cur[IDX_OI]; + data[jistart + 5497] = 0.0 + k[1208]*y_cur[IDX_eM] + k[2568]*y_cur[IDX_H2OI] + + k[3599]*y_cur[IDX_NH3I] + k[6436]*y_cur[IDX_GRAINM]; + data[jistart + 5498] = 0.0 - k[191]*y_cur[IDX_CII] - k[411]*y_cur[IDX_HII] - + k[2736]*y_cur[IDX_H3II] - k[2985]*y_cur[IDX_HCOII] - + k[3299]*y_cur[IDX_HeII] - k[4983]*y_cur[IDX_CI] - + k[5285]*y_cur[IDX_NI] - k[5436]*y_cur[IDX_OI] - k[5908] - k[6249] - + k[6933]; + data[jistart + 5499] = 0.0 + k[3599]*y_cur[IDX_PH2II]; + data[jistart + 5500] = 0.0 - k[5285]*y_cur[IDX_PHI]; + data[jistart + 5501] = 0.0 + k[5407]*y_cur[IDX_HCPI] + k[5434]*y_cur[IDX_PH2I] - + k[5436]*y_cur[IDX_PHI]; + data[jistart + 5502] = 0.0 + k[3175]*y_cur[IDX_CH2PHI] + k[3254]*y_cur[IDX_HCPI] - + k[3299]*y_cur[IDX_PHI]; + data[jistart + 5503] = 0.0 - k[191]*y_cur[IDX_PHI]; + data[jistart + 5504] = 0.0 + k[2568]*y_cur[IDX_PH2II]; + data[jistart + 5505] = 0.0 - k[411]*y_cur[IDX_PHI]; + data[jistart + 5506] = 0.0 + k[4964]*y_cur[IDX_HPOI] - k[4983]*y_cur[IDX_PHI]; + data[jistart + 5507] = 0.0 - k[2985]*y_cur[IDX_PHI]; + data[jistart + 5508] = 0.0 - k[2736]*y_cur[IDX_PHI]; + data[jistart + 5509] = 0.0 + k[6436]*y_cur[IDX_PH2II] + k[6449]*y_cur[IDX_PH3II] + + k[6572]*y_cur[IDX_HPNII] + k[6594]*y_cur[IDX_PNH2II] + + k[6613]*y_cur[IDX_HPOII] + k[6618]*y_cur[IDX_PNH3II] + + k[6623]*y_cur[IDX_H2POII] + k[6687]*y_cur[IDX_PC2H3II]; + data[jistart + 5510] = 0.0 + k[1018]*y_cur[IDX_H2POII] + k[1133]*y_cur[IDX_HPNII] + + k[1136]*y_cur[IDX_HPOII] + k[1186]*y_cur[IDX_PC2H3II] + + k[1208]*y_cur[IDX_PH2II] + k[1210]*y_cur[IDX_PH3II] + + k[1213]*y_cur[IDX_PNH2II] + k[1216]*y_cur[IDX_PNH3II]; + data[jistart + 5511] = 0.0 + k[7234] + k[7416] + k[7598]; + data[jistart + 5512] = 0.0 + k[8642]*y_cur[IDX_GHI]; + data[jistart + 5513] = 0.0 + k[8731]*y_cur[IDX_GCHI]; + data[jistart + 5514] = 0.0 + k[872]*y_cur[IDX_eM] + k[6830]*y_cur[IDX_GRAINM]; + data[jistart + 5515] = 0.0 + k[874]*y_cur[IDX_eM] + k[6832]*y_cur[IDX_GRAINM]; + data[jistart + 5516] = 0.0 + k[3720]*y_cur[IDX_OI]; + data[jistart + 5517] = 0.0 - k[218]*y_cur[IDX_C2H2II] - k[350]*y_cur[IDX_HII] - + k[1332]*y_cur[IDX_CII] - k[1333]*y_cur[IDX_CII] - + k[1499]*y_cur[IDX_C2H2II] - k[1500]*y_cur[IDX_C2H2II] - + k[1602]*y_cur[IDX_C2H3II] - k[1603]*y_cur[IDX_C2H3II] - + k[1604]*y_cur[IDX_C2H3II] - k[1663]*y_cur[IDX_C2H4II] - + k[1664]*y_cur[IDX_C2H4II] - k[2057]*y_cur[IDX_CH3II] - + k[2308]*y_cur[IDX_HII] - k[2622]*y_cur[IDX_H3II] - + k[2927]*y_cur[IDX_HCOII] - k[3136]*y_cur[IDX_HeII] - + k[3137]*y_cur[IDX_HeII] - k[3138]*y_cur[IDX_HeII] - + k[4892]*y_cur[IDX_C2HI] - k[4935]*y_cur[IDX_CI] - + k[5245]*y_cur[IDX_NI] - k[5758] - k[6045] - k[6046] - k[7052]; + data[jistart + 5518] = 0.0 + k[870]*y_cur[IDX_eM] + k[6828]*y_cur[IDX_GRAINM]; + data[jistart + 5519] = 0.0 + k[4890]*y_cur[IDX_C2HI]; + data[jistart + 5520] = 0.0 + k[100]*y_cur[IDX_HI]; + data[jistart + 5521] = 0.0 + k[8731]*y_cur[IDX_GC6HI]; + data[jistart + 5522] = 0.0 - k[1663]*y_cur[IDX_C7H2I] - k[1664]*y_cur[IDX_C7H2I]; + data[jistart + 5523] = 0.0 - k[1602]*y_cur[IDX_C7H2I] - k[1603]*y_cur[IDX_C7H2I] - + k[1604]*y_cur[IDX_C7H2I]; + data[jistart + 5524] = 0.0 + k[4890]*y_cur[IDX_C5H2I] - k[4892]*y_cur[IDX_C7H2I]; + data[jistart + 5525] = 0.0 - k[218]*y_cur[IDX_C7H2I] - k[1499]*y_cur[IDX_C7H2I] - + k[1500]*y_cur[IDX_C7H2I]; + data[jistart + 5526] = 0.0 - k[2057]*y_cur[IDX_C7H2I]; + data[jistart + 5527] = 0.0 + k[8642]*y_cur[IDX_GC7HI]; + data[jistart + 5528] = 0.0 - k[5245]*y_cur[IDX_C7H2I]; + data[jistart + 5529] = 0.0 + k[3720]*y_cur[IDX_C8H3II]; + data[jistart + 5530] = 0.0 - k[3136]*y_cur[IDX_C7H2I] - k[3137]*y_cur[IDX_C7H2I] - + k[3138]*y_cur[IDX_C7H2I]; + data[jistart + 5531] = 0.0 - k[1332]*y_cur[IDX_C7H2I] - k[1333]*y_cur[IDX_C7H2I]; + data[jistart + 5532] = 0.0 - k[350]*y_cur[IDX_C7H2I] - k[2308]*y_cur[IDX_C7H2I]; + data[jistart + 5533] = 0.0 - k[4935]*y_cur[IDX_C7H2I]; + data[jistart + 5534] = 0.0 - k[2927]*y_cur[IDX_C7H2I]; + data[jistart + 5535] = 0.0 - k[2622]*y_cur[IDX_C7H2I]; + data[jistart + 5536] = 0.0 + k[6828]*y_cur[IDX_C7H3II] + k[6830]*y_cur[IDX_C7H4II] + + k[6832]*y_cur[IDX_C7H5II]; + data[jistart + 5537] = 0.0 + k[870]*y_cur[IDX_C7H3II] + k[872]*y_cur[IDX_C7H4II] + + k[874]*y_cur[IDX_C7H5II]; + data[jistart + 5538] = 0.0 + k[100]*y_cur[IDX_C7HM]; + data[jistart + 5539] = 0.0 + k[7751] + k[8065]; + data[jistart + 5540] = 0.0 + k[7803] + k[8130]; + data[jistart + 5541] = 0.0 + k[7887]; + data[jistart + 5542] = 0.0 + k[7819] + k[7821] + k[8146] + k[8148]; + data[jistart + 5543] = 0.0 + k[7827] + k[7830] + k[8151] + k[8154] + k[8348]*y_cur[IDX_GHI]; + data[jistart + 5544] = 0.0 + k[7728] + k[8036]; + data[jistart + 5545] = 0.0 + k[7764] + k[8082]; + data[jistart + 5546] = 0.0 + k[8401]*y_cur[IDX_GCI]; + data[jistart + 5547] = 0.0 + k[8409]*y_cur[IDX_GCI]; + data[jistart + 5548] = 0.0 + k[8402]*y_cur[IDX_GCI]; + data[jistart + 5549] = 0.0 + k[7742] + k[7745] + k[8053] + k[8056]; + data[jistart + 5550] = 0.0 + k[7888] + k[8268]; + data[jistart + 5551] = 0.0 + k[7889] + k[8269]; + data[jistart + 5552] = 0.0 + k[7884] + k[8267]; + data[jistart + 5553] = 0.0 + k[8407]*y_cur[IDX_GCI]; + data[jistart + 5554] = 0.0 + k[7883] + k[8266]; + data[jistart + 5555] = 0.0 + k[7825]; + data[jistart + 5556] = 0.0 - k[8568]*y_cur[IDX_GCOI] - k[8761]*y_cur[IDX_GCOI]; + data[jistart + 5557] = 0.0 - k[8558]*y_cur[IDX_GCOI] - k[8760]*y_cur[IDX_GCOI]; + data[jistart + 5558] = 0.0 + k[7760] + k[8078]; + data[jistart + 5559] = 0.0 + k[7692] + k[7982] + k[7983] + k[7985] + k[7986]; + data[jistart + 5560] = 0.0 + k[7682] + k[7683] + k[7969] + k[7970] + k[8434]*y_cur[IDX_GOI]; + data[jistart + 5561] = 0.0 - k[8526]*y_cur[IDX_GCOI] - k[8744]*y_cur[IDX_GCOI]; + data[jistart + 5562] = 0.0 - k[8476]*y_cur[IDX_GCOI] - k[8714]*y_cur[IDX_GCOI]; + data[jistart + 5563] = 0.0 + k[8408]*y_cur[IDX_GCI] - k[8515]*y_cur[IDX_GCOI] - + k[8516]*y_cur[IDX_GCOI] - k[8739]*y_cur[IDX_GCOI]; + data[jistart + 5564] = 0.0 - k[7100] - k[7282] - k[7464] - k[7616] - k[7675] - k[7962] - + k[8294]*y_cur[IDX_GHI] - k[8447]*y_cur[IDX_GOI] - + k[8476]*y_cur[IDX_GSI] - k[8515]*y_cur[IDX_GOHI] - + k[8516]*y_cur[IDX_GOHI] - k[8526]*y_cur[IDX_GNHI] - + k[8539]*y_cur[IDX_GCH3I] - k[8558]*y_cur[IDX_GCH3OI] - + k[8568]*y_cur[IDX_GCH2OHI] - k[8594]*y_cur[IDX_GHI] - + k[8693]*y_cur[IDX_GOI] - k[8714]*y_cur[IDX_GSI] - + k[8739]*y_cur[IDX_GOHI] - k[8744]*y_cur[IDX_GNHI] - + k[8750]*y_cur[IDX_GCH3I] - k[8760]*y_cur[IDX_GCH3OI] - + k[8761]*y_cur[IDX_GCH2OHI]; + data[jistart + 5565] = 0.0 + k[8406]*y_cur[IDX_GCI] + k[8434]*y_cur[IDX_GHCOI] - + k[8447]*y_cur[IDX_GCOI] - k[8693]*y_cur[IDX_GCOI]; + data[jistart + 5566] = 0.0 - k[8539]*y_cur[IDX_GCOI] - k[8750]*y_cur[IDX_GCOI]; + data[jistart + 5567] = 0.0 + k[8401]*y_cur[IDX_GOCNI] + k[8402]*y_cur[IDX_GCNOI] + + k[8406]*y_cur[IDX_GOI] + k[8407]*y_cur[IDX_GO2I] + + k[8408]*y_cur[IDX_GOHI] + k[8409]*y_cur[IDX_GSOI]; + data[jistart + 5568] = 0.0 - k[8294]*y_cur[IDX_GCOI] + k[8348]*y_cur[IDX_GOCSI] - + k[8594]*y_cur[IDX_GCOI]; + data[jistart + 5569] = 0.0 + k[6918]; + data[jistart + 5570] = 0.0 + k[5862] + k[6191]; + data[jistart + 5571] = 0.0 - k[3013]*y_cur[IDX_HCSII]; + data[jistart + 5572] = 0.0 + k[2575]*y_cur[IDX_H2SI]; + data[jistart + 5573] = 0.0 - k[3014]*y_cur[IDX_HCSII]; + data[jistart + 5574] = 0.0 - k[1107]*y_cur[IDX_eM] - k[1108]*y_cur[IDX_eM] - + k[3013]*y_cur[IDX_C2H5OHI] - k[3014]*y_cur[IDX_CH3COCH3I] - + k[3587]*y_cur[IDX_NH3I] - k[3738]*y_cur[IDX_OI] - + k[3739]*y_cur[IDX_OI] - k[6554]*y_cur[IDX_GRAINM] - + k[6555]*y_cur[IDX_GRAINM]; + data[jistart + 5575] = 0.0 + k[2192]*y_cur[IDX_CH4I] + k[2438]*y_cur[IDX_H2I]; + data[jistart + 5576] = 0.0 + k[3855]*y_cur[IDX_SOII]; + data[jistart + 5577] = 0.0 + k[3826]*y_cur[IDX_SII]; + data[jistart + 5578] = 0.0 + k[1970]*y_cur[IDX_CHII] + k[1993]*y_cur[IDX_CH2II]; + data[jistart + 5579] = 0.0 + k[2678]*y_cur[IDX_H3II] + k[2797]*y_cur[IDX_H3OII] + + k[2956]*y_cur[IDX_HCOII]; + data[jistart + 5580] = 0.0 + k[2578]*y_cur[IDX_H2SI]; + data[jistart + 5581] = 0.0 + k[1985]*y_cur[IDX_H2SI] + k[1993]*y_cur[IDX_OCSI] + + k[1994]*y_cur[IDX_SI]; + data[jistart + 5582] = 0.0 + k[1955]*y_cur[IDX_H2SI] + k[1970]*y_cur[IDX_OCSI]; + data[jistart + 5583] = 0.0 + k[3846]*y_cur[IDX_C2H2I] + k[3855]*y_cur[IDX_CH2CCH2I]; + data[jistart + 5584] = 0.0 + k[1900]*y_cur[IDX_CI]; + data[jistart + 5585] = 0.0 + k[2017]*y_cur[IDX_SII]; + data[jistart + 5586] = 0.0 + k[1717]*y_cur[IDX_SII]; + data[jistart + 5587] = 0.0 + k[1395]*y_cur[IDX_CII] + k[1955]*y_cur[IDX_CHII] + + k[1985]*y_cur[IDX_CH2II] + k[2575]*y_cur[IDX_C2NII] + + k[2578]*y_cur[IDX_C3HII]; + data[jistart + 5588] = 0.0 + k[1717]*y_cur[IDX_C2H4I] + k[2017]*y_cur[IDX_CH2I] + + k[2216]*y_cur[IDX_CH4I] + k[3826]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 5589] = 0.0 + k[2192]*y_cur[IDX_CSII] + k[2216]*y_cur[IDX_SII]; + data[jistart + 5590] = 0.0 + k[1994]*y_cur[IDX_CH2II] + k[2095]*y_cur[IDX_CH3II]; + data[jistart + 5591] = 0.0 - k[3587]*y_cur[IDX_HCSII]; + data[jistart + 5592] = 0.0 + k[2095]*y_cur[IDX_SI]; + data[jistart + 5593] = 0.0 + k[3846]*y_cur[IDX_SOII]; + data[jistart + 5594] = 0.0 + k[2797]*y_cur[IDX_CSI]; + data[jistart + 5595] = 0.0 - k[3738]*y_cur[IDX_HCSII] - k[3739]*y_cur[IDX_HCSII]; + data[jistart + 5596] = 0.0 + k[1395]*y_cur[IDX_H2SI]; + data[jistart + 5597] = 0.0 + k[1900]*y_cur[IDX_H2SII]; + data[jistart + 5598] = 0.0 + k[2956]*y_cur[IDX_CSI]; + data[jistart + 5599] = 0.0 + k[2678]*y_cur[IDX_CSI]; + data[jistart + 5600] = 0.0 - k[6554]*y_cur[IDX_HCSII] - k[6555]*y_cur[IDX_HCSII]; + data[jistart + 5601] = 0.0 + k[2438]*y_cur[IDX_CSII]; + data[jistart + 5602] = 0.0 - k[1107]*y_cur[IDX_HCSII] - k[1108]*y_cur[IDX_HCSII]; + data[jistart + 5603] = 0.0 + k[3737]*y_cur[IDX_OI]; + data[jistart + 5604] = 0.0 + k[3741]*y_cur[IDX_OI]; + data[jistart + 5605] = 0.0 + k[3174]*y_cur[IDX_HeII]; + data[jistart + 5606] = 0.0 + k[3269]*y_cur[IDX_HeII]; + data[jistart + 5607] = 0.0 + k[191]*y_cur[IDX_CII] + k[411]*y_cur[IDX_HII]; + data[jistart + 5608] = 0.0 - k[1205]*y_cur[IDX_eM] - k[1570]*y_cur[IDX_C2H2I] - + k[1711]*y_cur[IDX_C2H4I] - k[1712]*y_cur[IDX_C2H4I] - + k[2212]*y_cur[IDX_CH4I] - k[2213]*y_cur[IDX_CH4I] - + k[2564]*y_cur[IDX_H2OI] - k[2565]*y_cur[IDX_H2OI] - + k[2566]*y_cur[IDX_H2OI] - k[2884]*y_cur[IDX_HCNI] - + k[3596]*y_cur[IDX_NH3I] - k[3597]*y_cur[IDX_NH3I] - + k[3598]*y_cur[IDX_NH3I] - k[3751]*y_cur[IDX_OI] - + k[3816]*y_cur[IDX_CH3OHI] - k[3817]*y_cur[IDX_H2SI] - + k[3818]*y_cur[IDX_O2I] - k[5560]*y_cur[IDX_H2I] - + k[6433]*y_cur[IDX_GRAINM]; + data[jistart + 5609] = 0.0 + k[2734]*y_cur[IDX_H3II] + k[2983]*y_cur[IDX_HCOII]; + data[jistart + 5610] = 0.0 - k[3816]*y_cur[IDX_PHII]; + data[jistart + 5611] = 0.0 - k[1711]*y_cur[IDX_PHII] - k[1712]*y_cur[IDX_PHII]; + data[jistart + 5612] = 0.0 - k[3818]*y_cur[IDX_PHII]; + data[jistart + 5613] = 0.0 - k[3817]*y_cur[IDX_PHII]; + data[jistart + 5614] = 0.0 - k[2212]*y_cur[IDX_PHII] - k[2213]*y_cur[IDX_PHII]; + data[jistart + 5615] = 0.0 - k[2884]*y_cur[IDX_PHII]; + data[jistart + 5616] = 0.0 - k[3596]*y_cur[IDX_PHII] - k[3597]*y_cur[IDX_PHII] - + k[3598]*y_cur[IDX_PHII]; + data[jistart + 5617] = 0.0 - k[1570]*y_cur[IDX_PHII]; + data[jistart + 5618] = 0.0 + k[3737]*y_cur[IDX_HCPII] + k[3741]*y_cur[IDX_HPOII] - + k[3751]*y_cur[IDX_PHII]; + data[jistart + 5619] = 0.0 + k[3174]*y_cur[IDX_CH2PHI] + k[3269]*y_cur[IDX_HPOI]; + data[jistart + 5620] = 0.0 + k[191]*y_cur[IDX_PHI]; + data[jistart + 5621] = 0.0 - k[2564]*y_cur[IDX_PHII] - k[2565]*y_cur[IDX_PHII] - + k[2566]*y_cur[IDX_PHII]; + data[jistart + 5622] = 0.0 + k[411]*y_cur[IDX_PHI]; + data[jistart + 5623] = 0.0 + k[2983]*y_cur[IDX_PI]; + data[jistart + 5624] = 0.0 + k[2734]*y_cur[IDX_PI]; + data[jistart + 5625] = 0.0 - k[6433]*y_cur[IDX_PHII]; + data[jistart + 5626] = 0.0 - k[5560]*y_cur[IDX_PHII]; + data[jistart + 5627] = 0.0 - k[1205]*y_cur[IDX_PHII]; + data[jistart + 5628] = 0.0 + k[2196]*y_cur[IDX_CH4I]; + data[jistart + 5629] = 0.0 - k[799]*y_cur[IDX_eM] - k[800]*y_cur[IDX_eM] - + k[801]*y_cur[IDX_eM] - k[802]*y_cur[IDX_eM] - k[1547]*y_cur[IDX_C2H2I] - k[1808]*y_cur[IDX_CH2CCH2I] - k[1809]*y_cur[IDX_CH2CCH2I] - k[1810]*y_cur[IDX_CH2CCH2I] - k[1811]*y_cur[IDX_CH3CCHI] - k[1812]*y_cur[IDX_CH3CCHI] - @@ -7073,1701 +9062,1860 @@ __global__ void JacKernel(realtype *y, realtype *data, NaunetData *d_udata, k[3399]*y_cur[IDX_NI] - k[3697]*y_cur[IDX_OI] - k[6477]*y_cur[IDX_GRAINM] - k[6478]*y_cur[IDX_GRAINM] - k[6479]*y_cur[IDX_GRAINM] - k[6480]*y_cur[IDX_GRAINM]; - data[jistart + 2738] = 0.0 + k[1608]*y_cur[IDX_C2H3II] + - k[2636]*y_cur[IDX_H3II] + k[2785]*y_cur[IDX_H3OII] + - k[2938]*y_cur[IDX_HCOII]; - data[jistart + 2739] = 0.0 + k[161]*y_cur[IDX_CII] + - k[669]*y_cur[IDX_O2II] + k[711]*y_cur[IDX_SOII] - - k[1808]*y_cur[IDX_C3H4II] - k[1809]*y_cur[IDX_C3H4II] - - k[1810]*y_cur[IDX_C3H4II] + k[5780] + k[6080]; - data[jistart + 2740] = 0.0 + k[2044]*y_cur[IDX_C2H3I]; - data[jistart + 2741] = 0.0 + k[165]*y_cur[IDX_CII] + - k[220]*y_cur[IDX_C2H2II] + k[365]*y_cur[IDX_HII] - - k[1811]*y_cur[IDX_C3H4II] - k[1812]*y_cur[IDX_C3H4II] - - k[1813]*y_cur[IDX_C3H4II] + k[5801] + k[6105]; - data[jistart + 2742] = 0.0 + k[1513]*y_cur[IDX_C2H2II]; - data[jistart + 2743] = 0.0 + k[2152]*y_cur[IDX_C2HII] + - k[2154]*y_cur[IDX_C2H2II] + k[2196]*y_cur[IDX_HC3NII]; - data[jistart + 2744] = 0.0 - k[6477]*y_cur[IDX_C3H4II] - - k[6478]*y_cur[IDX_C3H4II] - k[6479]*y_cur[IDX_C3H4II] - - k[6480]*y_cur[IDX_C3H4II]; - data[jistart + 2745] = 0.0 - k[2832]*y_cur[IDX_C3H4II]; - data[jistart + 2746] = 0.0 + k[365]*y_cur[IDX_CH3CCHI]; - data[jistart + 2747] = 0.0 + k[2636]*y_cur[IDX_CH2CCHI]; - data[jistart + 2748] = 0.0 + k[2785]*y_cur[IDX_CH2CCHI]; - data[jistart + 2749] = 0.0 + k[2196]*y_cur[IDX_CH4I]; - data[jistart + 2750] = 0.0 + k[2938]*y_cur[IDX_CH2CCHI]; - data[jistart + 2751] = 0.0 - k[3399]*y_cur[IDX_C3H4II]; - data[jistart + 2752] = 0.0 - k[3697]*y_cur[IDX_C3H4II]; - data[jistart + 2753] = 0.0 + k[669]*y_cur[IDX_CH2CCH2I]; - data[jistart + 2754] = 0.0 + k[711]*y_cur[IDX_CH2CCH2I]; - data[jistart + 2755] = 0.0 - k[799]*y_cur[IDX_C3H4II] - - k[800]*y_cur[IDX_C3H4II] - k[801]*y_cur[IDX_C3H4II] - - k[802]*y_cur[IDX_C3H4II]; - data[jistart + 2756] = 0.0 - k[1861]*y_cur[IDX_C3H5II]; - data[jistart + 2757] = 0.0 + k[1376]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2758] = 0.0 - k[1548]*y_cur[IDX_C3H5II] + - k[1563]*y_cur[IDX_C2H6II]; - data[jistart + 2759] = 0.0 + k[1512]*y_cur[IDX_C2H6I] + - k[1514]*y_cur[IDX_CH3CNI] + k[2155]*y_cur[IDX_CH4I]; - data[jistart + 2760] = 0.0 + k[1611]*y_cur[IDX_CH3CCHI] + - k[1614]*y_cur[IDX_C2H6I] + k[2156]*y_cur[IDX_CH4I]; - data[jistart + 2761] = 0.0 + k[1647]*y_cur[IDX_C2H4II] + - k[1685]*y_cur[IDX_C2H5II] + k[2046]*y_cur[IDX_CH3II]; - data[jistart + 2762] = 0.0 + k[1647]*y_cur[IDX_C2H4I]; - data[jistart + 2763] = 0.0 + k[1685]*y_cur[IDX_C2H4I]; - data[jistart + 2764] = 0.0 + k[1512]*y_cur[IDX_C2H2II] + - k[1614]*y_cur[IDX_C2H3II] + k[2063]*y_cur[IDX_CH3II]; - data[jistart + 2765] = 0.0 + k[1563]*y_cur[IDX_C2H2I]; - data[jistart + 2766] = 0.0 + k[1811]*y_cur[IDX_CH3CCHI]; - data[jistart + 2767] = 0.0 - k[803]*y_cur[IDX_eM] - - k[804]*y_cur[IDX_eM] - k[1548]*y_cur[IDX_C2H2I] - - k[1814]*y_cur[IDX_C6H6I] - k[1815]*y_cur[IDX_CH3CHCH2I] - - k[1816]*y_cur[IDX_HC3NI] - k[1861]*y_cur[IDX_CI] - - k[2104]*y_cur[IDX_CH3CCHI] - k[3400]*y_cur[IDX_NI] - - k[3401]*y_cur[IDX_NI] - k[5516]*y_cur[IDX_H2I] - - k[6482]*y_cur[IDX_GRAINM] - k[6483]*y_cur[IDX_GRAINM]; - data[jistart + 2768] = 0.0 - k[1814]*y_cur[IDX_C3H5II]; - data[jistart + 2769] = 0.0 + k[5530]*y_cur[IDX_H2I]; - data[jistart + 2770] = 0.0 + k[2046]*y_cur[IDX_C2H4I] + - k[2063]*y_cur[IDX_C2H6I]; - data[jistart + 2771] = 0.0 + k[1611]*y_cur[IDX_C2H3II] + - k[1811]*y_cur[IDX_C3H4II] - k[2104]*y_cur[IDX_C3H5II] + - k[2789]*y_cur[IDX_H3OII] + k[2948]*y_cur[IDX_HCOII]; - data[jistart + 2772] = 0.0 + k[1376]*y_cur[IDX_CII] - - k[1815]*y_cur[IDX_C3H5II] + k[2650]*y_cur[IDX_H3II] + - k[3369]*y_cur[IDX_N2HII] + k[3660]*y_cur[IDX_O2II] + - k[3823]*y_cur[IDX_SII]; - data[jistart + 2773] = 0.0 + k[1514]*y_cur[IDX_C2H2II]; - data[jistart + 2774] = 0.0 + k[2660]*y_cur[IDX_H3II]; - data[jistart + 2775] = 0.0 + k[2155]*y_cur[IDX_C2H2II] + - k[2156]*y_cur[IDX_C2H3II] + k[2197]*y_cur[IDX_HC3NII]; - data[jistart + 2776] = 0.0 - k[6482]*y_cur[IDX_C3H5II] - - k[6483]*y_cur[IDX_C3H5II]; - data[jistart + 2777] = 0.0 - k[5516]*y_cur[IDX_C3H5II] + - k[5530]*y_cur[IDX_CH2CCHII]; - data[jistart + 2778] = 0.0 + k[2650]*y_cur[IDX_CH3CHCH2I] + - k[2660]*y_cur[IDX_CH3COCH3I]; - data[jistart + 2779] = 0.0 + k[2789]*y_cur[IDX_CH3CCHI]; - data[jistart + 2780] = 0.0 - k[1816]*y_cur[IDX_C3H5II]; - data[jistart + 2781] = 0.0 + k[2197]*y_cur[IDX_CH4I]; - data[jistart + 2782] = 0.0 + k[2948]*y_cur[IDX_CH3CCHI]; - data[jistart + 2783] = 0.0 - k[3400]*y_cur[IDX_C3H5II] - - k[3401]*y_cur[IDX_C3H5II]; - data[jistart + 2784] = 0.0 + k[3369]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2785] = 0.0 + k[3660]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2786] = 0.0 + k[3823]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2787] = 0.0 - k[803]*y_cur[IDX_C3H5II] - - k[804]*y_cur[IDX_C3H5II]; - data[jistart + 2788] = 0.0 + k[166]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2789] = 0.0 + k[1670]*y_cur[IDX_C2H6I]; - data[jistart + 2790] = 0.0 + k[1670]*y_cur[IDX_C2H4II]; - data[jistart + 2791] = 0.0 - k[805]*y_cur[IDX_eM] - - k[806]*y_cur[IDX_eM] - k[1817]*y_cur[IDX_CH3CHCH2I] - - k[6499]*y_cur[IDX_GRAINM] - k[6500]*y_cur[IDX_GRAINM]; - data[jistart + 2792] = 0.0 + k[2833]*y_cur[IDX_HI]; - data[jistart + 2793] = 0.0 + k[166]*y_cur[IDX_CII] + - k[670]*y_cur[IDX_O2II] + k[702]*y_cur[IDX_SII] + - k[712]*y_cur[IDX_SOII] - k[1817]*y_cur[IDX_C3H6II]; - data[jistart + 2794] = 0.0 + k[3857]*y_cur[IDX_SOII]; - data[jistart + 2795] = 0.0 - k[6499]*y_cur[IDX_C3H6II] - - k[6500]*y_cur[IDX_C3H6II]; - data[jistart + 2796] = 0.0 + k[2833]*y_cur[IDX_C3H7II]; - data[jistart + 2797] = 0.0 + k[670]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2798] = 0.0 + k[702]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2799] = 0.0 + k[712]*y_cur[IDX_CH3CHCH2I] + - k[3857]*y_cur[IDX_CH3COCH3I]; - data[jistart + 2800] = 0.0 - k[805]*y_cur[IDX_C3H6II] - - k[806]*y_cur[IDX_C3H6II]; - data[jistart + 2801] = 0.0 + k[1671]*y_cur[IDX_C2H6I]; - data[jistart + 2802] = 0.0 + k[1671]*y_cur[IDX_C2H4II] + - k[2064]*y_cur[IDX_CH3II]; - data[jistart + 2803] = 0.0 + k[5516]*y_cur[IDX_H2I]; - data[jistart + 2804] = 0.0 - k[807]*y_cur[IDX_eM] - - k[808]*y_cur[IDX_eM] - k[809]*y_cur[IDX_eM] - k[810]*y_cur[IDX_eM] - - k[811]*y_cur[IDX_eM] - k[812]*y_cur[IDX_eM] - k[813]*y_cur[IDX_eM] - - k[1818]*y_cur[IDX_NH3I] - k[2833]*y_cur[IDX_HI] - - k[6504]*y_cur[IDX_GRAINM] - k[6505]*y_cur[IDX_GRAINM] - - k[6506]*y_cur[IDX_GRAINM] - k[6507]*y_cur[IDX_GRAINM] - - k[6508]*y_cur[IDX_GRAINM] - k[6509]*y_cur[IDX_GRAINM] - - k[6510]*y_cur[IDX_GRAINM]; - data[jistart + 2805] = 0.0 + k[2064]*y_cur[IDX_C2H6I]; - data[jistart + 2806] = 0.0 + k[2790]*y_cur[IDX_H3OII] + - k[3370]*y_cur[IDX_N2HII]; - data[jistart + 2807] = 0.0 - k[6504]*y_cur[IDX_C3H7II] - - k[6505]*y_cur[IDX_C3H7II] - k[6506]*y_cur[IDX_C3H7II] - - k[6507]*y_cur[IDX_C3H7II] - k[6508]*y_cur[IDX_C3H7II] - - k[6509]*y_cur[IDX_C3H7II] - k[6510]*y_cur[IDX_C3H7II]; - data[jistart + 2808] = 0.0 - k[2833]*y_cur[IDX_C3H7II]; - data[jistart + 2809] = 0.0 + k[5516]*y_cur[IDX_C3H5II]; - data[jistart + 2810] = 0.0 + k[2790]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2811] = 0.0 + k[3370]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 2812] = 0.0 - k[1818]*y_cur[IDX_C3H7II]; - data[jistart + 2813] = 0.0 - k[807]*y_cur[IDX_C3H7II] - - k[808]*y_cur[IDX_C3H7II] - k[809]*y_cur[IDX_C3H7II] - - k[810]*y_cur[IDX_C3H7II] - k[811]*y_cur[IDX_C3H7II] - - k[812]*y_cur[IDX_C3H7II] - k[813]*y_cur[IDX_C3H7II]; - data[jistart + 2814] = 0.0 - k[4921]*y_cur[IDX_C3NI]; - data[jistart + 2815] = 0.0 + k[1354]*y_cur[IDX_CH3C3NI] + - k[4131]*y_cur[IDX_C3NM]; - data[jistart + 2816] = 0.0 + k[4873]*y_cur[IDX_HCNI]; - data[jistart + 2817] = 0.0 + k[4132]*y_cur[IDX_C3NM]; - data[jistart + 2818] = 0.0 + k[4133]*y_cur[IDX_C3NM]; - data[jistart + 2819] = 0.0 + k[112]*y_cur[IDX_NI]; - data[jistart + 2820] = 0.0 + k[5233]*y_cur[IDX_NI]; - data[jistart + 2821] = 0.0 - k[512]*y_cur[IDX_HeII] - - k[2604]*y_cur[IDX_H3II] - k[2774]*y_cur[IDX_H3OII] - - k[2909]*y_cur[IDX_HCOII] - k[3098]*y_cur[IDX_HeII] - - k[4921]*y_cur[IDX_CI] - k[5234]*y_cur[IDX_NI] - - k[5358]*y_cur[IDX_OI] - k[5593]*y_cur[IDX_eM] - k[5722] - k[6006] - - k[6997]; - data[jistart + 2822] = 0.0 + k[4131]*y_cur[IDX_CII] + - k[4132]*y_cur[IDX_C2H2II] + k[4133]*y_cur[IDX_C2H3II] + - k[4134]*y_cur[IDX_C4H2II] + k[4135]*y_cur[IDX_C4H3II] + - k[4136]*y_cur[IDX_C4SII] + k[4137]*y_cur[IDX_CH2CCHII] + - k[4138]*y_cur[IDX_CH3II] + k[4139]*y_cur[IDX_CNCII] + - k[4140]*y_cur[IDX_FeII] + k[4141]*y_cur[IDX_HII] + - k[4142]*y_cur[IDX_H2COII] + k[4143]*y_cur[IDX_H2SII] + - k[4144]*y_cur[IDX_H3II] + k[4145]*y_cur[IDX_H3OII] + - k[4146]*y_cur[IDX_HC2SII] + k[4147]*y_cur[IDX_HCNHII] + - k[4148]*y_cur[IDX_HCNHII] + k[4149]*y_cur[IDX_HCOII] + - k[4150]*y_cur[IDX_HCOII] + k[4151]*y_cur[IDX_HeII] + - k[4152]*y_cur[IDX_MgII] + k[4153]*y_cur[IDX_NII] + - k[4154]*y_cur[IDX_N2HII] + k[4155]*y_cur[IDX_NH3II] + - k[4156]*y_cur[IDX_NH4II] + k[4157]*y_cur[IDX_NOII] + - k[4158]*y_cur[IDX_NaII] + k[4159]*y_cur[IDX_OII] + - k[4160]*y_cur[IDX_SII] + k[4161]*y_cur[IDX_SOII] + - k[4162]*y_cur[IDX_SiII] + k[4163]*y_cur[IDX_SiOII] + - k[4164]*y_cur[IDX_SiOHII] + k[4165]*y_cur[IDX_SiSII] + k[5721] + - k[6005]; - data[jistart + 2823] = 0.0 + k[4134]*y_cur[IDX_C3NM]; - data[jistart + 2824] = 0.0 + k[4135]*y_cur[IDX_C3NM]; - data[jistart + 2825] = 0.0 + k[5237]*y_cur[IDX_NI] + - k[5363]*y_cur[IDX_OI]; - data[jistart + 2826] = 0.0 + k[832]*y_cur[IDX_eM] + - k[6741]*y_cur[IDX_GRAINM]; - data[jistart + 2827] = 0.0 + k[4136]*y_cur[IDX_C3NM]; - data[jistart + 2828] = 0.0 + k[847]*y_cur[IDX_eM] + - k[6784]*y_cur[IDX_GRAINM]; - data[jistart + 2829] = 0.0 + k[4137]*y_cur[IDX_C3NM]; - data[jistart + 2830] = 0.0 + k[4138]*y_cur[IDX_C3NM]; - data[jistart + 2831] = 0.0 + k[1354]*y_cur[IDX_CII] + - k[3177]*y_cur[IDX_HeII] + k[5796] + k[6100]; - data[jistart + 2832] = 0.0 + k[4139]*y_cur[IDX_C3NM]; - data[jistart + 2833] = 0.0 + k[4140]*y_cur[IDX_C3NM]; - data[jistart + 2834] = 0.0 + k[8669]*y_cur[IDX_GC2NI]; - data[jistart + 2835] = 0.0 + k[8669]*y_cur[IDX_GCI]; - data[jistart + 2836] = 0.0 + k[8705]*y_cur[IDX_GNI]; - data[jistart + 2837] = 0.0 + k[7179] + k[7361] + k[7543]; - data[jistart + 2838] = 0.0 + k[8705]*y_cur[IDX_GC3I]; - data[jistart + 2839] = 0.0 + k[6629]*y_cur[IDX_HC3NII] + - k[6638]*y_cur[IDX_HC3NHII] + k[6741]*y_cur[IDX_C4NII] + - k[6744]*y_cur[IDX_HC4NII] + k[6784]*y_cur[IDX_C5NII] + - k[6787]*y_cur[IDX_HC5NII]; - data[jistart + 2840] = 0.0 + k[4141]*y_cur[IDX_C3NM]; - data[jistart + 2841] = 0.0 + k[4142]*y_cur[IDX_C3NM]; - data[jistart + 2842] = 0.0 + k[4143]*y_cur[IDX_C3NM]; - data[jistart + 2843] = 0.0 - k[2604]*y_cur[IDX_C3NI] + - k[4144]*y_cur[IDX_C3NM]; - data[jistart + 2844] = 0.0 - k[2774]*y_cur[IDX_C3NI] + - k[4145]*y_cur[IDX_C3NM]; - data[jistart + 2845] = 0.0 + k[4146]*y_cur[IDX_C3NM]; - data[jistart + 2846] = 0.0 + k[1063]*y_cur[IDX_eM] + - k[6629]*y_cur[IDX_GRAINM]; - data[jistart + 2847] = 0.0 + k[1067]*y_cur[IDX_eM] + - k[6638]*y_cur[IDX_GRAINM]; - data[jistart + 2848] = 0.0 + k[1073]*y_cur[IDX_eM] + - k[6744]*y_cur[IDX_GRAINM]; - data[jistart + 2849] = 0.0 + k[3241]*y_cur[IDX_HeII]; - data[jistart + 2850] = 0.0 + k[1077]*y_cur[IDX_eM] + - k[6787]*y_cur[IDX_GRAINM]; - data[jistart + 2851] = 0.0 + k[4873]*y_cur[IDX_C2I]; - data[jistart + 2852] = 0.0 + k[4147]*y_cur[IDX_C3NM] + - k[4148]*y_cur[IDX_C3NM]; - data[jistart + 2853] = 0.0 - k[2909]*y_cur[IDX_C3NI] + - k[4149]*y_cur[IDX_C3NM] + k[4150]*y_cur[IDX_C3NM]; - data[jistart + 2854] = 0.0 + k[6197]; - data[jistart + 2855] = 0.0 - k[512]*y_cur[IDX_C3NI] - - k[3098]*y_cur[IDX_C3NI] + k[3177]*y_cur[IDX_CH3C3NI] + - k[3241]*y_cur[IDX_HC5NI] + k[4151]*y_cur[IDX_C3NM]; - data[jistart + 2856] = 0.0 + k[4152]*y_cur[IDX_C3NM]; - data[jistart + 2857] = 0.0 + k[112]*y_cur[IDX_C3M] + - k[5233]*y_cur[IDX_C3HI] - k[5234]*y_cur[IDX_C3NI] + - k[5237]*y_cur[IDX_C4NI]; - data[jistart + 2858] = 0.0 + k[4153]*y_cur[IDX_C3NM]; - data[jistart + 2859] = 0.0 + k[4154]*y_cur[IDX_C3NM]; - data[jistart + 2860] = 0.0 + k[4155]*y_cur[IDX_C3NM]; - data[jistart + 2861] = 0.0 + k[4156]*y_cur[IDX_C3NM]; - data[jistart + 2862] = 0.0 + k[4157]*y_cur[IDX_C3NM]; - data[jistart + 2863] = 0.0 + k[4158]*y_cur[IDX_C3NM]; - data[jistart + 2864] = 0.0 - k[5358]*y_cur[IDX_C3NI] + - k[5363]*y_cur[IDX_C4NI]; - data[jistart + 2865] = 0.0 + k[4159]*y_cur[IDX_C3NM]; - data[jistart + 2866] = 0.0 + k[4160]*y_cur[IDX_C3NM]; - data[jistart + 2867] = 0.0 + k[4161]*y_cur[IDX_C3NM]; - data[jistart + 2868] = 0.0 + k[4162]*y_cur[IDX_C3NM]; - data[jistart + 2869] = 0.0 + k[4163]*y_cur[IDX_C3NM]; - data[jistart + 2870] = 0.0 + k[4164]*y_cur[IDX_C3NM]; - data[jistart + 2871] = 0.0 + k[4165]*y_cur[IDX_C3NM]; - data[jistart + 2872] = 0.0 + k[832]*y_cur[IDX_C4NII] + - k[847]*y_cur[IDX_C5NII] + k[1063]*y_cur[IDX_HC3NII] + - k[1067]*y_cur[IDX_HC3NHII] + k[1073]*y_cur[IDX_HC4NII] + - k[1077]*y_cur[IDX_HC5NII] - k[5593]*y_cur[IDX_C3NI]; - data[jistart + 2873] = 0.0 + k[3018]*y_cur[IDX_HNC3I]; - data[jistart + 2874] = 0.0 + k[1453]*y_cur[IDX_HCNI]; - data[jistart + 2875] = 0.0 + k[1467]*y_cur[IDX_CNI]; - data[jistart + 2876] = 0.0 + k[3394]*y_cur[IDX_NI]; - data[jistart + 2877] = 0.0 + k[512]*y_cur[IDX_HeII]; - data[jistart + 2878] = 0.0 - k[814]*y_cur[IDX_eM] - - k[2409]*y_cur[IDX_H2I] - k[6626]*y_cur[IDX_GRAINM]; - data[jistart + 2879] = 0.0 + k[1467]*y_cur[IDX_C2HII]; - data[jistart + 2880] = 0.0 - k[6626]*y_cur[IDX_C3NII]; - data[jistart + 2881] = 0.0 + k[3022]*y_cur[IDX_HNC3I]; - data[jistart + 2882] = 0.0 - k[2409]*y_cur[IDX_C3NII]; - data[jistart + 2883] = 0.0 + k[3236]*y_cur[IDX_HeII]; - data[jistart + 2884] = 0.0 + k[1453]*y_cur[IDX_C2II]; - data[jistart + 2885] = 0.0 + k[3018]*y_cur[IDX_CII] + - k[3022]*y_cur[IDX_HII] + k[3034]*y_cur[IDX_HeII]; - data[jistart + 2886] = 0.0 + k[512]*y_cur[IDX_C3NI] + - k[3034]*y_cur[IDX_HNC3I] + k[3236]*y_cur[IDX_HC3NI]; - data[jistart + 2887] = 0.0 + k[3394]*y_cur[IDX_C3HII]; - data[jistart + 2888] = 0.0 - k[814]*y_cur[IDX_C3NII]; - data[jistart + 2889] = 0.0 - k[42]*y_cur[IDX_C3NM]; - data[jistart + 2890] = 0.0 - k[4131]*y_cur[IDX_C3NM]; - data[jistart + 2891] = 0.0 + k[3377]*y_cur[IDX_NI]; - data[jistart + 2892] = 0.0 + k[3381]*y_cur[IDX_NI]; - data[jistart + 2893] = 0.0 - k[4132]*y_cur[IDX_C3NM]; - data[jistart + 2894] = 0.0 - k[4133]*y_cur[IDX_C3NM]; - data[jistart + 2895] = 0.0 + k[5593]*y_cur[IDX_eM]; - data[jistart + 2896] = 0.0 - k[42]*y_cur[IDX_CI] - - k[91]*y_cur[IDX_HI] - k[130]*y_cur[IDX_OI] - k[4131]*y_cur[IDX_CII] - - k[4132]*y_cur[IDX_C2H2II] - k[4133]*y_cur[IDX_C2H3II] - - k[4134]*y_cur[IDX_C4H2II] - k[4135]*y_cur[IDX_C4H3II] - - k[4136]*y_cur[IDX_C4SII] - k[4137]*y_cur[IDX_CH2CCHII] - - k[4138]*y_cur[IDX_CH3II] - k[4139]*y_cur[IDX_CNCII] - - k[4140]*y_cur[IDX_FeII] - k[4141]*y_cur[IDX_HII] - - k[4142]*y_cur[IDX_H2COII] - k[4143]*y_cur[IDX_H2SII] - - k[4144]*y_cur[IDX_H3II] - k[4145]*y_cur[IDX_H3OII] - - k[4146]*y_cur[IDX_HC2SII] - k[4147]*y_cur[IDX_HCNHII] - - k[4148]*y_cur[IDX_HCNHII] - k[4149]*y_cur[IDX_HCOII] - - k[4150]*y_cur[IDX_HCOII] - k[4151]*y_cur[IDX_HeII] - - k[4152]*y_cur[IDX_MgII] - k[4153]*y_cur[IDX_NII] - - k[4154]*y_cur[IDX_N2HII] - k[4155]*y_cur[IDX_NH3II] - - k[4156]*y_cur[IDX_NH4II] - k[4157]*y_cur[IDX_NOII] - - k[4158]*y_cur[IDX_NaII] - k[4159]*y_cur[IDX_OII] - - k[4160]*y_cur[IDX_SII] - k[4161]*y_cur[IDX_SOII] - - k[4162]*y_cur[IDX_SiII] - k[4163]*y_cur[IDX_SiOII] - - k[4164]*y_cur[IDX_SiOHII] - k[4165]*y_cur[IDX_SiSII] - k[5721] - - k[6005]; - data[jistart + 2897] = 0.0 - k[4134]*y_cur[IDX_C3NM]; - data[jistart + 2898] = 0.0 - k[4135]*y_cur[IDX_C3NM]; - data[jistart + 2899] = 0.0 - k[4136]*y_cur[IDX_C3NM]; - data[jistart + 2900] = 0.0 + k[3409]*y_cur[IDX_NI]; - data[jistart + 2901] = 0.0 + k[3418]*y_cur[IDX_NI]; - data[jistart + 2902] = 0.0 + k[3421]*y_cur[IDX_NI]; - data[jistart + 2903] = 0.0 + k[3425]*y_cur[IDX_NI]; - data[jistart + 2904] = 0.0 + k[3430]*y_cur[IDX_NI]; - data[jistart + 2905] = 0.0 + k[3436]*y_cur[IDX_NI]; - data[jistart + 2906] = 0.0 + k[3440]*y_cur[IDX_NI]; - data[jistart + 2907] = 0.0 + k[3442]*y_cur[IDX_NI]; - data[jistart + 2908] = 0.0 + k[3447]*y_cur[IDX_NI]; - data[jistart + 2909] = 0.0 - k[4137]*y_cur[IDX_C3NM]; - data[jistart + 2910] = 0.0 - k[4138]*y_cur[IDX_C3NM]; - data[jistart + 2911] = 0.0 - k[4139]*y_cur[IDX_C3NM]; - data[jistart + 2912] = 0.0 - k[4140]*y_cur[IDX_C3NM]; - data[jistart + 2913] = 0.0 - k[91]*y_cur[IDX_C3NM]; - data[jistart + 2914] = 0.0 - k[4141]*y_cur[IDX_C3NM]; - data[jistart + 2915] = 0.0 - k[4142]*y_cur[IDX_C3NM]; - data[jistart + 2916] = 0.0 - k[4143]*y_cur[IDX_C3NM]; - data[jistart + 2917] = 0.0 - k[4144]*y_cur[IDX_C3NM]; - data[jistart + 2918] = 0.0 - k[4145]*y_cur[IDX_C3NM]; - data[jistart + 2919] = 0.0 - k[4146]*y_cur[IDX_C3NM]; - data[jistart + 2920] = 0.0 - k[4147]*y_cur[IDX_C3NM] - - k[4148]*y_cur[IDX_C3NM]; - data[jistart + 2921] = 0.0 - k[4149]*y_cur[IDX_C3NM] - - k[4150]*y_cur[IDX_C3NM]; - data[jistart + 2922] = 0.0 + k[1115]*y_cur[IDX_eM]; - data[jistart + 2923] = 0.0 - k[4151]*y_cur[IDX_C3NM]; - data[jistart + 2924] = 0.0 - k[4152]*y_cur[IDX_C3NM]; - data[jistart + 2925] = 0.0 + k[3377]*y_cur[IDX_C10M] + - k[3381]*y_cur[IDX_C10HM] + k[3409]*y_cur[IDX_C5M] + - k[3418]*y_cur[IDX_C6M] + k[3421]*y_cur[IDX_C6HM] + - k[3425]*y_cur[IDX_C7M] + k[3430]*y_cur[IDX_C7HM] + - k[3436]*y_cur[IDX_C8M] + k[3440]*y_cur[IDX_C8HM] + - k[3442]*y_cur[IDX_C9M] + k[3447]*y_cur[IDX_C9HM]; - data[jistart + 2926] = 0.0 - k[4153]*y_cur[IDX_C3NM]; - data[jistart + 2927] = 0.0 - k[4154]*y_cur[IDX_C3NM]; - data[jistart + 2928] = 0.0 - k[4155]*y_cur[IDX_C3NM]; - data[jistart + 2929] = 0.0 - k[4156]*y_cur[IDX_C3NM]; - data[jistart + 2930] = 0.0 - k[4157]*y_cur[IDX_C3NM]; - data[jistart + 2931] = 0.0 - k[4158]*y_cur[IDX_C3NM]; - data[jistart + 2932] = 0.0 - k[130]*y_cur[IDX_C3NM]; - data[jistart + 2933] = 0.0 - k[4159]*y_cur[IDX_C3NM]; - data[jistart + 2934] = 0.0 - k[4160]*y_cur[IDX_C3NM]; - data[jistart + 2935] = 0.0 - k[4161]*y_cur[IDX_C3NM]; - data[jistart + 2936] = 0.0 - k[4162]*y_cur[IDX_C3NM]; - data[jistart + 2937] = 0.0 - k[4163]*y_cur[IDX_C3NM]; - data[jistart + 2938] = 0.0 - k[4164]*y_cur[IDX_C3NM]; - data[jistart + 2939] = 0.0 - k[4165]*y_cur[IDX_C3NM]; - data[jistart + 2940] = 0.0 + k[1115]*y_cur[IDX_HNC3I] + - k[5593]*y_cur[IDX_C3NI]; - data[jistart + 2941] = 0.0 - k[4922]*y_cur[IDX_C3OI]; - data[jistart + 2942] = 0.0 - k[153]*y_cur[IDX_C3OI] - - k[1313]*y_cur[IDX_C3OI] - k[1314]*y_cur[IDX_C3OI]; - data[jistart + 2943] = 0.0 + k[1756]*y_cur[IDX_OCSI]; - data[jistart + 2944] = 0.0 + k[796]*y_cur[IDX_eM] + - k[6655]*y_cur[IDX_GRAINM]; - data[jistart + 2945] = 0.0 - k[153]*y_cur[IDX_CII] - - k[336]*y_cur[IDX_HII] - k[1313]*y_cur[IDX_CII] - - k[1314]*y_cur[IDX_CII] - k[2605]*y_cur[IDX_H3II] - - k[2775]*y_cur[IDX_H3OII] - k[2910]*y_cur[IDX_HCOII] - - k[3099]*y_cur[IDX_HeII] - k[3100]*y_cur[IDX_HeII] - - k[4922]*y_cur[IDX_CI] - k[5359]*y_cur[IDX_OI] - k[5723] - k[6007] - - k[7006]; - data[jistart + 2946] = 0.0 + k[8670]*y_cur[IDX_GC2OI]; - data[jistart + 2947] = 0.0 + k[8670]*y_cur[IDX_GCI]; - data[jistart + 2948] = 0.0 + k[8695]*y_cur[IDX_GOI]; - data[jistart + 2949] = 0.0 + k[7188] + k[7370] + k[7552]; - data[jistart + 2950] = 0.0 + k[8695]*y_cur[IDX_GC3I]; - data[jistart + 2951] = 0.0 + k[6648]*y_cur[IDX_HC3OII] + - k[6655]*y_cur[IDX_C3H2OII] + k[6666]*y_cur[IDX_H3C3OII]; - data[jistart + 2952] = 0.0 - k[336]*y_cur[IDX_C3OI]; - data[jistart + 2953] = 0.0 - k[2605]*y_cur[IDX_C3OI]; - data[jistart + 2954] = 0.0 + k[1027]*y_cur[IDX_eM] + - k[6666]*y_cur[IDX_GRAINM]; - data[jistart + 2955] = 0.0 - k[2775]*y_cur[IDX_C3OI]; - data[jistart + 2956] = 0.0 + k[1070]*y_cur[IDX_eM] + - k[6648]*y_cur[IDX_GRAINM]; - data[jistart + 2957] = 0.0 - k[2910]*y_cur[IDX_C3OI]; - data[jistart + 2958] = 0.0 - k[3099]*y_cur[IDX_C3OI] - - k[3100]*y_cur[IDX_C3OI]; - data[jistart + 2959] = 0.0 - k[5359]*y_cur[IDX_C3OI]; - data[jistart + 2960] = 0.0 + k[1756]*y_cur[IDX_C3HII]; - data[jistart + 2961] = 0.0 + k[796]*y_cur[IDX_C3H2OII] + - k[1027]*y_cur[IDX_H3C3OII] + k[1070]*y_cur[IDX_HC3OII]; - data[jistart + 2962] = 0.0 + k[153]*y_cur[IDX_C3OI]; - data[jistart + 2963] = 0.0 + k[3668]*y_cur[IDX_O2I]; - data[jistart + 2964] = 0.0 + k[153]*y_cur[IDX_CII] + - k[336]*y_cur[IDX_HII]; - data[jistart + 2965] = 0.0 - k[815]*y_cur[IDX_eM] - - k[2163]*y_cur[IDX_CH4I] - k[2410]*y_cur[IDX_H2I] - - k[2531]*y_cur[IDX_H2OI] - k[6644]*y_cur[IDX_GRAINM]; - data[jistart + 2966] = 0.0 - k[2163]*y_cur[IDX_C3OII]; - data[jistart + 2967] = 0.0 - k[6644]*y_cur[IDX_C3OII]; - data[jistart + 2968] = 0.0 + k[336]*y_cur[IDX_C3OI]; - data[jistart + 2969] = 0.0 - k[2410]*y_cur[IDX_C3OII]; - data[jistart + 2970] = 0.0 - k[2531]*y_cur[IDX_C3OII]; - data[jistart + 2971] = 0.0 + k[3668]*y_cur[IDX_C3II]; - data[jistart + 2972] = 0.0 - k[815]*y_cur[IDX_C3OII]; - data[jistart + 2973] = 0.0 - k[1315]*y_cur[IDX_C3PI]; - data[jistart + 2974] = 0.0 - k[1315]*y_cur[IDX_CII] - - k[2606]*y_cur[IDX_H3II] - k[2776]*y_cur[IDX_H3OII] - - k[2911]*y_cur[IDX_HCOII] - k[3101]*y_cur[IDX_HeII] - - k[3102]*y_cur[IDX_HeII] - k[5360]*y_cur[IDX_OI] - k[5724] - k[6008] - - k[7039]; - data[jistart + 2975] = 0.0 + k[5364]*y_cur[IDX_OI] + k[5734]; - data[jistart + 2976] = 0.0 + k[833]*y_cur[IDX_eM] + - k[6809]*y_cur[IDX_GRAINM]; - data[jistart + 2977] = 0.0 + k[7221] + k[7403] + k[7585]; - data[jistart + 2978] = 0.0 + k[6772]*y_cur[IDX_PC3HII] + - k[6809]*y_cur[IDX_C4PII] + k[6811]*y_cur[IDX_PC4HII]; - data[jistart + 2979] = 0.0 - k[2606]*y_cur[IDX_C3PI]; - data[jistart + 2980] = 0.0 - k[2776]*y_cur[IDX_C3PI]; - data[jistart + 2981] = 0.0 - k[2911]*y_cur[IDX_C3PI]; - data[jistart + 2982] = 0.0 - k[3101]*y_cur[IDX_C3PI] - - k[3102]*y_cur[IDX_C3PI]; - data[jistart + 2983] = 0.0 - k[5360]*y_cur[IDX_C3PI] + - k[5364]*y_cur[IDX_C4PI]; - data[jistart + 2984] = 0.0 + k[1190]*y_cur[IDX_eM] + - k[6772]*y_cur[IDX_GRAINM]; - data[jistart + 2985] = 0.0 + k[1193]*y_cur[IDX_eM] + - k[6811]*y_cur[IDX_GRAINM]; - data[jistart + 2986] = 0.0 + k[833]*y_cur[IDX_C4PII] + - k[1190]*y_cur[IDX_PC3HII] + k[1193]*y_cur[IDX_PC4HII]; - data[jistart + 2987] = 0.0 - k[154]*y_cur[IDX_C3SI] - - k[1316]*y_cur[IDX_C3SI]; - data[jistart + 2988] = 0.0 + k[4899]*y_cur[IDX_CSI]; - data[jistart + 2989] = 0.0 - k[154]*y_cur[IDX_CII] - - k[337]*y_cur[IDX_HII] - k[1316]*y_cur[IDX_CII] - - k[2607]*y_cur[IDX_H3II] - k[2777]*y_cur[IDX_H3OII] - - k[2912]*y_cur[IDX_HCOII] - k[3103]*y_cur[IDX_HeII] - - k[3104]*y_cur[IDX_HeII] - k[5725] - k[6009] - k[7040]; - data[jistart + 2990] = 0.0 + k[836]*y_cur[IDX_eM] + - k[6816]*y_cur[IDX_GRAINM]; - data[jistart + 2991] = 0.0 + k[4899]*y_cur[IDX_C2HI]; - data[jistart + 2992] = 0.0 + k[8673]*y_cur[IDX_GC2SI]; - data[jistart + 2993] = 0.0 + k[8673]*y_cur[IDX_GCI]; - data[jistart + 2994] = 0.0 + k[7222] + k[7404] + k[7586]; - data[jistart + 2995] = 0.0 + k[6779]*y_cur[IDX_HC3SII] + - k[6816]*y_cur[IDX_C4SII] + k[6819]*y_cur[IDX_HC4SII]; - data[jistart + 2996] = 0.0 - k[337]*y_cur[IDX_C3SI]; - data[jistart + 2997] = 0.0 - k[2607]*y_cur[IDX_C3SI]; - data[jistart + 2998] = 0.0 - k[2777]*y_cur[IDX_C3SI]; - data[jistart + 2999] = 0.0 + k[1072]*y_cur[IDX_eM] + - k[6779]*y_cur[IDX_GRAINM]; - data[jistart + 3000] = 0.0 + k[1075]*y_cur[IDX_eM] + - k[6819]*y_cur[IDX_GRAINM]; - data[jistart + 3001] = 0.0 - k[2912]*y_cur[IDX_C3SI]; - data[jistart + 3002] = 0.0 - k[3103]*y_cur[IDX_C3SI] - - k[3104]*y_cur[IDX_C3SI]; - data[jistart + 3003] = 0.0 + k[836]*y_cur[IDX_C4SII] + - k[1072]*y_cur[IDX_HC3SII] + k[1075]*y_cur[IDX_HC4SII]; - data[jistart + 3004] = 0.0 + k[1902]*y_cur[IDX_HC2SII]; - data[jistart + 3005] = 0.0 + k[154]*y_cur[IDX_C3SI]; - data[jistart + 3006] = 0.0 + k[3821]*y_cur[IDX_SII]; - data[jistart + 3007] = 0.0 + k[154]*y_cur[IDX_CII] + - k[337]*y_cur[IDX_HII]; - data[jistart + 3008] = 0.0 - k[816]*y_cur[IDX_eM] - - k[817]*y_cur[IDX_eM] - k[818]*y_cur[IDX_eM] - - k[6775]*y_cur[IDX_GRAINM] - k[6776]*y_cur[IDX_GRAINM] - - k[6777]*y_cur[IDX_GRAINM]; - data[jistart + 3009] = 0.0 - k[6775]*y_cur[IDX_C3SII] - - k[6776]*y_cur[IDX_C3SII] - k[6777]*y_cur[IDX_C3SII]; - data[jistart + 3010] = 0.0 + k[337]*y_cur[IDX_C3SI]; - data[jistart + 3011] = 0.0 + k[1902]*y_cur[IDX_CI]; - data[jistart + 3012] = 0.0 + k[3821]*y_cur[IDX_C3HI]; - data[jistart + 3013] = 0.0 - k[816]*y_cur[IDX_C3SII] - - k[817]*y_cur[IDX_C3SII] - k[818]*y_cur[IDX_C3SII]; - data[jistart + 3014] = 0.0 + k[40]*y_cur[IDX_C3M] + - k[4920]*y_cur[IDX_C3HI] - k[4923]*y_cur[IDX_C4I] + - k[4931]*y_cur[IDX_C6I] + k[5522]*y_cur[IDX_C3I]; - data[jistart + 3015] = 0.0 + k[4166]*y_cur[IDX_C4M] - - k[5497]*y_cur[IDX_C4I]; - data[jistart + 3016] = 0.0 + k[3058]*y_cur[IDX_HeII] + k[5952]; - data[jistart + 3017] = 0.0 + k[5972]; - data[jistart + 3018] = 0.0 + k[736]*y_cur[IDX_eM] + - k[6885]*y_cur[IDX_GRAINM]; - data[jistart + 3019] = 0.0 + k[10]*y_cur[IDX_C2M]; - data[jistart + 3020] = 0.0 + k[10]*y_cur[IDX_C2I] - - k[12]*y_cur[IDX_C4I]; - data[jistart + 3021] = 0.0 + k[4167]*y_cur[IDX_C4M]; - data[jistart + 3022] = 0.0 + k[4168]*y_cur[IDX_C4M]; - data[jistart + 3023] = 0.0 + k[5522]*y_cur[IDX_CI]; - data[jistart + 3024] = 0.0 - k[18]*y_cur[IDX_C4I] + - k[40]*y_cur[IDX_CI]; - data[jistart + 3025] = 0.0 + k[4920]*y_cur[IDX_CI]; - data[jistart + 3026] = 0.0 - k[12]*y_cur[IDX_C2M] - - k[18]*y_cur[IDX_C3M] - k[24]*y_cur[IDX_C4M] - k[29]*y_cur[IDX_C5M] - - k[33]*y_cur[IDX_C6M] - k[338]*y_cur[IDX_HII] - - k[2608]*y_cur[IDX_H3II] - k[2778]*y_cur[IDX_H3OII] - - k[2913]*y_cur[IDX_HCOII] - k[3105]*y_cur[IDX_HeII] - - k[3106]*y_cur[IDX_HeII] - k[3107]*y_cur[IDX_HeII] - - k[4923]*y_cur[IDX_CI] - k[5235]*y_cur[IDX_NI] - - k[5361]*y_cur[IDX_OI] - k[5497]*y_cur[IDX_CII] - - k[5594]*y_cur[IDX_eM] - k[5727] - k[5728] - k[6011] - k[6012] - - k[6995]; - data[jistart + 3027] = 0.0 - k[24]*y_cur[IDX_C4I] + - k[4166]*y_cur[IDX_CII] + k[4167]*y_cur[IDX_C2H2II] + - k[4168]*y_cur[IDX_C2H3II] + k[4169]*y_cur[IDX_C4H2II] + - k[4170]*y_cur[IDX_C4H3II] + k[4171]*y_cur[IDX_C4SII] + - k[4172]*y_cur[IDX_CH2CCHII] + k[4173]*y_cur[IDX_CH3II] + - k[4174]*y_cur[IDX_CNCII] + k[4175]*y_cur[IDX_FeII] + - k[4176]*y_cur[IDX_HII] + k[4177]*y_cur[IDX_H2COII] + - k[4178]*y_cur[IDX_H2SII] + k[4179]*y_cur[IDX_H3II] + - k[4180]*y_cur[IDX_H3OII] + k[4181]*y_cur[IDX_HC2SII] + - k[4182]*y_cur[IDX_HCNHII] + k[4183]*y_cur[IDX_HCNHII] + - k[4184]*y_cur[IDX_HCOII] + k[4185]*y_cur[IDX_HCOII] + - k[4186]*y_cur[IDX_HeII] + k[4187]*y_cur[IDX_MgII] + - k[4188]*y_cur[IDX_NII] + k[4189]*y_cur[IDX_N2HII] + - k[4190]*y_cur[IDX_NH3II] + k[4191]*y_cur[IDX_NH4II] + - k[4192]*y_cur[IDX_NOII] + k[4193]*y_cur[IDX_NaII] + - k[4194]*y_cur[IDX_OII] + k[4195]*y_cur[IDX_SII] + - k[4196]*y_cur[IDX_SOII] + k[4197]*y_cur[IDX_SiII] + - k[4198]*y_cur[IDX_SiOII] + k[4199]*y_cur[IDX_SiOHII] + - k[4200]*y_cur[IDX_SiSII] + k[5726] + k[6010]; - data[jistart + 3028] = 0.0 + k[1830]*y_cur[IDX_C4HII] + k[5732] + - k[6017]; - data[jistart + 3029] = 0.0 + k[821]*y_cur[IDX_eM] + - k[1830]*y_cur[IDX_C4HI] + k[6621]*y_cur[IDX_GRAINM]; - data[jistart + 3030] = 0.0 + k[4169]*y_cur[IDX_C4M]; - data[jistart + 3031] = 0.0 + k[4170]*y_cur[IDX_C4M]; - data[jistart + 3032] = 0.0 + k[6019]; - data[jistart + 3033] = 0.0 + k[4171]*y_cur[IDX_C4M]; - data[jistart + 3034] = 0.0 + k[5238]*y_cur[IDX_NI] + - k[5365]*y_cur[IDX_OI] + k[5738]; - data[jistart + 3035] = 0.0 - k[29]*y_cur[IDX_C4I] + - k[3410]*y_cur[IDX_NI]; - data[jistart + 3036] = 0.0 + k[3704]*y_cur[IDX_OI]; - data[jistart + 3037] = 0.0 + k[5746] + k[6031]; - data[jistart + 3038] = 0.0 + k[4931]*y_cur[IDX_CI]; - data[jistart + 3039] = 0.0 + k[848]*y_cur[IDX_eM] + - k[6780]*y_cur[IDX_GRAINM]; - data[jistart + 3040] = 0.0 - k[33]*y_cur[IDX_C4I]; - data[jistart + 3041] = 0.0 + k[5753] + k[6040]; - data[jistart + 3042] = 0.0 + k[863]*y_cur[IDX_eM] + - k[6821]*y_cur[IDX_GRAINM]; - data[jistart + 3043] = 0.0 + k[3425]*y_cur[IDX_NI]; - data[jistart + 3044] = 0.0 + k[3443]*y_cur[IDX_NI]; - data[jistart + 3045] = 0.0 + k[4172]*y_cur[IDX_C4M]; - data[jistart + 3046] = 0.0 + k[4173]*y_cur[IDX_C4M]; - data[jistart + 3047] = 0.0 + k[4174]*y_cur[IDX_C4M]; - data[jistart + 3048] = 0.0 + k[4175]*y_cur[IDX_C4M]; - data[jistart + 3049] = 0.0 + k[8667]*y_cur[IDX_GC3I]; - data[jistart + 3050] = 0.0 + k[8667]*y_cur[IDX_GCI]; - data[jistart + 3051] = 0.0 + k[7177] + k[7359] + k[7541]; - data[jistart + 3052] = 0.0 + k[6621]*y_cur[IDX_C4HII] + - k[6780]*y_cur[IDX_C6II] + k[6821]*y_cur[IDX_C7II] + - k[6885]*y_cur[IDX_C11II]; - data[jistart + 3053] = 0.0 - k[338]*y_cur[IDX_C4I] + - k[4176]*y_cur[IDX_C4M]; - data[jistart + 3054] = 0.0 + k[4177]*y_cur[IDX_C4M]; - data[jistart + 3055] = 0.0 + k[4178]*y_cur[IDX_C4M]; - data[jistart + 3056] = 0.0 - k[2608]*y_cur[IDX_C4I] + - k[4179]*y_cur[IDX_C4M]; - data[jistart + 3057] = 0.0 - k[2778]*y_cur[IDX_C4I] + - k[4180]*y_cur[IDX_C4M]; - data[jistart + 3058] = 0.0 + k[4181]*y_cur[IDX_C4M]; - data[jistart + 3059] = 0.0 + k[4182]*y_cur[IDX_C4M] + - k[4183]*y_cur[IDX_C4M]; - data[jistart + 3060] = 0.0 - k[2913]*y_cur[IDX_C4I] + - k[4184]*y_cur[IDX_C4M] + k[4185]*y_cur[IDX_C4M]; - data[jistart + 3061] = 0.0 + k[3058]*y_cur[IDX_C10I] - - k[3105]*y_cur[IDX_C4I] - k[3106]*y_cur[IDX_C4I] - - k[3107]*y_cur[IDX_C4I] + k[4186]*y_cur[IDX_C4M]; - data[jistart + 3062] = 0.0 + k[4187]*y_cur[IDX_C4M]; - data[jistart + 3063] = 0.0 + k[3410]*y_cur[IDX_C5M] + - k[3425]*y_cur[IDX_C7M] + k[3443]*y_cur[IDX_C9M] - - k[5235]*y_cur[IDX_C4I] + k[5238]*y_cur[IDX_C5I]; - data[jistart + 3064] = 0.0 + k[4188]*y_cur[IDX_C4M]; - data[jistart + 3065] = 0.0 + k[4189]*y_cur[IDX_C4M]; - data[jistart + 3066] = 0.0 + k[4190]*y_cur[IDX_C4M]; - data[jistart + 3067] = 0.0 + k[4191]*y_cur[IDX_C4M]; - data[jistart + 3068] = 0.0 + k[4192]*y_cur[IDX_C4M]; - data[jistart + 3069] = 0.0 + k[4193]*y_cur[IDX_C4M]; - data[jistart + 3070] = 0.0 + k[3704]*y_cur[IDX_C5HII] - - k[5361]*y_cur[IDX_C4I] + k[5365]*y_cur[IDX_C5I]; - data[jistart + 3071] = 0.0 + k[4194]*y_cur[IDX_C4M]; - data[jistart + 3072] = 0.0 + k[4195]*y_cur[IDX_C4M]; - data[jistart + 3073] = 0.0 + k[4196]*y_cur[IDX_C4M]; - data[jistart + 3074] = 0.0 + k[4197]*y_cur[IDX_C4M]; - data[jistart + 3075] = 0.0 + k[6266]; - data[jistart + 3076] = 0.0 + k[4198]*y_cur[IDX_C4M]; - data[jistart + 3077] = 0.0 + k[4199]*y_cur[IDX_C4M]; - data[jistart + 3078] = 0.0 + k[4200]*y_cur[IDX_C4M]; - data[jistart + 3079] = 0.0 + k[736]*y_cur[IDX_C11II] + - k[821]*y_cur[IDX_C4HII] + k[848]*y_cur[IDX_C6II] + - k[863]*y_cur[IDX_C7II] - k[5594]*y_cur[IDX_C4I]; - data[jistart + 3080] = 0.0 + k[1855]*y_cur[IDX_C3H2II]; - data[jistart + 3081] = 0.0 + k[1310]*y_cur[IDX_C3H2I] + - k[1312]*y_cur[IDX_C3HI] + k[1314]*y_cur[IDX_C3OI] + - k[1315]*y_cur[IDX_C3PI] + k[1316]*y_cur[IDX_C3SI] + - k[1388]*y_cur[IDX_H2CCCI] + k[5496]*y_cur[IDX_C3I]; - data[jistart + 3082] = 0.0 - k[1549]*y_cur[IDX_C4II] - - k[1550]*y_cur[IDX_C4II]; - data[jistart + 3083] = 0.0 + k[5496]*y_cur[IDX_CII]; - data[jistart + 3084] = 0.0 + k[1312]*y_cur[IDX_CII]; - data[jistart + 3085] = 0.0 + k[1310]*y_cur[IDX_CII]; - data[jistart + 3086] = 0.0 + k[1855]*y_cur[IDX_CI]; - data[jistart + 3087] = 0.0 + k[1314]*y_cur[IDX_CII]; - data[jistart + 3088] = 0.0 + k[1315]*y_cur[IDX_CII]; - data[jistart + 3089] = 0.0 + k[1316]*y_cur[IDX_CII]; - data[jistart + 3090] = 0.0 + k[338]*y_cur[IDX_HII]; - data[jistart + 3091] = 0.0 - k[819]*y_cur[IDX_eM] - - k[820]*y_cur[IDX_eM] - k[1549]*y_cur[IDX_C2H2I] - - k[1550]*y_cur[IDX_C2H2I] - k[2164]*y_cur[IDX_CH4I] - - k[2165]*y_cur[IDX_CH4I] - k[2166]*y_cur[IDX_CH4I] - - k[2167]*y_cur[IDX_CH4I] - k[2411]*y_cur[IDX_H2I] - - k[6615]*y_cur[IDX_GRAINM] - k[6616]*y_cur[IDX_GRAINM]; - data[jistart + 3092] = 0.0 + k[2303]*y_cur[IDX_HII] + - k[3112]*y_cur[IDX_HeII]; - data[jistart + 3093] = 0.0 + k[3239]*y_cur[IDX_HeII]; - data[jistart + 3094] = 0.0 + k[3118]*y_cur[IDX_HeII]; - data[jistart + 3095] = 0.0 + k[3124]*y_cur[IDX_HeII]; - data[jistart + 3096] = 0.0 + k[3125]*y_cur[IDX_HeII]; - data[jistart + 3097] = 0.0 - k[2164]*y_cur[IDX_C4II] - - k[2165]*y_cur[IDX_C4II] - k[2166]*y_cur[IDX_C4II] - - k[2167]*y_cur[IDX_C4II]; - data[jistart + 3098] = 0.0 - k[6615]*y_cur[IDX_C4II] - - k[6616]*y_cur[IDX_C4II]; - data[jistart + 3099] = 0.0 + k[338]*y_cur[IDX_C4I] + - k[2303]*y_cur[IDX_C4HI]; - data[jistart + 3100] = 0.0 - k[2411]*y_cur[IDX_C4II]; - data[jistart + 3101] = 0.0 + k[1388]*y_cur[IDX_CII]; - data[jistart + 3102] = 0.0 + k[3112]*y_cur[IDX_C4HI] + - k[3118]*y_cur[IDX_C5I] + k[3124]*y_cur[IDX_C5NI] + - k[3125]*y_cur[IDX_C6I] + k[3239]*y_cur[IDX_C4H2I]; - data[jistart + 3103] = 0.0 - k[819]*y_cur[IDX_C4II] - - k[820]*y_cur[IDX_C4II]; - data[jistart + 3104] = 0.0 - k[43]*y_cur[IDX_C4M]; - data[jistart + 3105] = 0.0 - k[4166]*y_cur[IDX_C4M]; - data[jistart + 3106] = 0.0 - k[22]*y_cur[IDX_C4M]; - data[jistart + 3107] = 0.0 - k[4167]*y_cur[IDX_C4M]; - data[jistart + 3108] = 0.0 - k[4168]*y_cur[IDX_C4M]; - data[jistart + 3109] = 0.0 - k[23]*y_cur[IDX_C4M]; - data[jistart + 3110] = 0.0 - k[24]*y_cur[IDX_C4M] + - k[5594]*y_cur[IDX_eM]; - data[jistart + 3111] = 0.0 - k[22]*y_cur[IDX_C2I] - - k[23]*y_cur[IDX_C3I] - k[24]*y_cur[IDX_C4I] - k[25]*y_cur[IDX_C5I] - - k[26]*y_cur[IDX_C6I] - k[43]*y_cur[IDX_CI] - k[92]*y_cur[IDX_HI] - - k[114]*y_cur[IDX_NI] - k[3402]*y_cur[IDX_NI] - k[3403]*y_cur[IDX_NI] - - k[3698]*y_cur[IDX_OI] - k[4166]*y_cur[IDX_CII] - - k[4167]*y_cur[IDX_C2H2II] - k[4168]*y_cur[IDX_C2H3II] - - k[4169]*y_cur[IDX_C4H2II] - k[4170]*y_cur[IDX_C4H3II] - - k[4171]*y_cur[IDX_C4SII] - k[4172]*y_cur[IDX_CH2CCHII] - - k[4173]*y_cur[IDX_CH3II] - k[4174]*y_cur[IDX_CNCII] - - k[4175]*y_cur[IDX_FeII] - k[4176]*y_cur[IDX_HII] - - k[4177]*y_cur[IDX_H2COII] - k[4178]*y_cur[IDX_H2SII] - - k[4179]*y_cur[IDX_H3II] - k[4180]*y_cur[IDX_H3OII] - - k[4181]*y_cur[IDX_HC2SII] - k[4182]*y_cur[IDX_HCNHII] - - k[4183]*y_cur[IDX_HCNHII] - k[4184]*y_cur[IDX_HCOII] - - k[4185]*y_cur[IDX_HCOII] - k[4186]*y_cur[IDX_HeII] - - k[4187]*y_cur[IDX_MgII] - k[4188]*y_cur[IDX_NII] - - k[4189]*y_cur[IDX_N2HII] - k[4190]*y_cur[IDX_NH3II] - - k[4191]*y_cur[IDX_NH4II] - k[4192]*y_cur[IDX_NOII] - - k[4193]*y_cur[IDX_NaII] - k[4194]*y_cur[IDX_OII] - - k[4195]*y_cur[IDX_SII] - k[4196]*y_cur[IDX_SOII] - - k[4197]*y_cur[IDX_SiII] - k[4198]*y_cur[IDX_SiOII] - - k[4199]*y_cur[IDX_SiOHII] - k[4200]*y_cur[IDX_SiSII] - k[5726] - - k[6010]; - data[jistart + 3112] = 0.0 - k[4169]*y_cur[IDX_C4M]; - data[jistart + 3113] = 0.0 - k[4170]*y_cur[IDX_C4M]; - data[jistart + 3114] = 0.0 - k[4171]*y_cur[IDX_C4M]; - data[jistart + 3115] = 0.0 - k[25]*y_cur[IDX_C4M]; - data[jistart + 3116] = 0.0 + k[3411]*y_cur[IDX_NI] + - k[3703]*y_cur[IDX_OI]; - data[jistart + 3117] = 0.0 - k[26]*y_cur[IDX_C4M]; - data[jistart + 3118] = 0.0 - k[4172]*y_cur[IDX_C4M]; - data[jistart + 3119] = 0.0 - k[4173]*y_cur[IDX_C4M]; - data[jistart + 3120] = 0.0 - k[4174]*y_cur[IDX_C4M]; - data[jistart + 3121] = 0.0 - k[4175]*y_cur[IDX_C4M]; - data[jistart + 3122] = 0.0 - k[92]*y_cur[IDX_C4M]; - data[jistart + 3123] = 0.0 - k[4176]*y_cur[IDX_C4M]; - data[jistart + 3124] = 0.0 - k[4177]*y_cur[IDX_C4M]; - data[jistart + 3125] = 0.0 - k[4178]*y_cur[IDX_C4M]; - data[jistart + 3126] = 0.0 - k[4179]*y_cur[IDX_C4M]; - data[jistart + 3127] = 0.0 - k[4180]*y_cur[IDX_C4M]; - data[jistart + 3128] = 0.0 - k[4181]*y_cur[IDX_C4M]; - data[jistart + 3129] = 0.0 - k[4182]*y_cur[IDX_C4M] - - k[4183]*y_cur[IDX_C4M]; - data[jistart + 3130] = 0.0 - k[4184]*y_cur[IDX_C4M] - - k[4185]*y_cur[IDX_C4M]; - data[jistart + 3131] = 0.0 - k[4186]*y_cur[IDX_C4M]; - data[jistart + 3132] = 0.0 - k[4187]*y_cur[IDX_C4M]; - data[jistart + 3133] = 0.0 - k[114]*y_cur[IDX_C4M] - - k[3402]*y_cur[IDX_C4M] - k[3403]*y_cur[IDX_C4M] + - k[3411]*y_cur[IDX_C5M]; - data[jistart + 3134] = 0.0 - k[4188]*y_cur[IDX_C4M]; - data[jistart + 3135] = 0.0 - k[4189]*y_cur[IDX_C4M]; - data[jistart + 3136] = 0.0 - k[4190]*y_cur[IDX_C4M]; - data[jistart + 3137] = 0.0 - k[4191]*y_cur[IDX_C4M]; - data[jistart + 3138] = 0.0 - k[4192]*y_cur[IDX_C4M]; - data[jistart + 3139] = 0.0 - k[4193]*y_cur[IDX_C4M]; - data[jistart + 3140] = 0.0 - k[3698]*y_cur[IDX_C4M] + - k[3703]*y_cur[IDX_C5M]; - data[jistart + 3141] = 0.0 - k[4194]*y_cur[IDX_C4M]; - data[jistart + 3142] = 0.0 - k[4195]*y_cur[IDX_C4M]; - data[jistart + 3143] = 0.0 - k[4196]*y_cur[IDX_C4M]; - data[jistart + 3144] = 0.0 - k[4197]*y_cur[IDX_C4M]; - data[jistart + 3145] = 0.0 - k[4198]*y_cur[IDX_C4M]; - data[jistart + 3146] = 0.0 - k[4199]*y_cur[IDX_C4M]; - data[jistart + 3147] = 0.0 - k[4200]*y_cur[IDX_C4M]; - data[jistart + 3148] = 0.0 + k[5594]*y_cur[IDX_C4I]; - data[jistart + 3149] = 0.0 + k[41]*y_cur[IDX_C3HM] + - k[4919]*y_cur[IDX_C3H2I] - k[4925]*y_cur[IDX_C4HI] + - k[4959]*y_cur[IDX_H2CCCI]; - data[jistart + 3150] = 0.0 - k[1320]*y_cur[IDX_C4HI] + - k[4201]*y_cur[IDX_C4HM]; - data[jistart + 3151] = 0.0 + k[4867]*y_cur[IDX_C2H2I]; - data[jistart + 3152] = 0.0 + k[4867]*y_cur[IDX_C2I] - - k[4877]*y_cur[IDX_C4HI]; - data[jistart + 3153] = 0.0 - k[1489]*y_cur[IDX_C4HI] - - k[1490]*y_cur[IDX_C4HI] + k[4202]*y_cur[IDX_C4HM]; - data[jistart + 3154] = 0.0 - k[1586]*y_cur[IDX_C4HI] - - k[1587]*y_cur[IDX_C4HI] - k[1588]*y_cur[IDX_C4HI] + - k[4203]*y_cur[IDX_C4HM]; - data[jistart + 3155] = 0.0 - k[4884]*y_cur[IDX_C4HI]; - data[jistart + 3156] = 0.0 - k[1653]*y_cur[IDX_C4HI] - - k[1654]*y_cur[IDX_C4HI]; - data[jistart + 3157] = 0.0 - k[5052]*y_cur[IDX_C4HI]; - data[jistart + 3158] = 0.0 + k[41]*y_cur[IDX_CI]; - data[jistart + 3159] = 0.0 + k[4919]*y_cur[IDX_CI]; - data[jistart + 3160] = 0.0 - k[1761]*y_cur[IDX_C4HI] - - k[1762]*y_cur[IDX_C4HI]; - data[jistart + 3161] = 0.0 - k[1796]*y_cur[IDX_C4HI] - - k[1797]*y_cur[IDX_C4HI]; - data[jistart + 3162] = 0.0 + k[92]*y_cur[IDX_HI]; - data[jistart + 3163] = 0.0 - k[340]*y_cur[IDX_HII] - - k[1320]*y_cur[IDX_CII] - k[1489]*y_cur[IDX_C2H2II] - - k[1490]*y_cur[IDX_C2H2II] - k[1586]*y_cur[IDX_C2H3II] - - k[1587]*y_cur[IDX_C2H3II] - k[1588]*y_cur[IDX_C2H3II] - - k[1653]*y_cur[IDX_C2H4II] - k[1654]*y_cur[IDX_C2H4II] - - k[1761]*y_cur[IDX_C3H2II] - k[1762]*y_cur[IDX_C3H2II] - - k[1796]*y_cur[IDX_C3H3II] - k[1797]*y_cur[IDX_C3H3II] - - k[1830]*y_cur[IDX_C4HII] - k[1831]*y_cur[IDX_C4HII] - - k[1843]*y_cur[IDX_C4H2II] - k[1844]*y_cur[IDX_C4H3II] - - k[1845]*y_cur[IDX_C5H2II] - k[2020]*y_cur[IDX_CH2CCHII] - - k[2021]*y_cur[IDX_CH2CCHII] - k[2052]*y_cur[IDX_CH3II] - - k[2303]*y_cur[IDX_HII] - k[2610]*y_cur[IDX_H3II] - - k[2780]*y_cur[IDX_H3OII] - k[2915]*y_cur[IDX_HCOII] - - k[3111]*y_cur[IDX_HeII] - k[3112]*y_cur[IDX_HeII] - - k[3822]*y_cur[IDX_SII] - k[3862]*y_cur[IDX_SiII] - - k[4877]*y_cur[IDX_C2H2I] - k[4884]*y_cur[IDX_C2H4I] - - k[4907]*y_cur[IDX_HNCI] - k[4908]*y_cur[IDX_NCCNI] - - k[4925]*y_cur[IDX_CI] - k[5022]*y_cur[IDX_CH2CCH2I] - - k[5023]*y_cur[IDX_CH2CCH2I] - k[5050]*y_cur[IDX_CH3CCHI] - - k[5051]*y_cur[IDX_CH3CCHI] - k[5052]*y_cur[IDX_C2H6I] - - k[5053]*y_cur[IDX_CH3CHCH2I] - k[5054]*y_cur[IDX_CH3CHCH2I] - - k[5057]*y_cur[IDX_CH4I] - k[5058]*y_cur[IDX_CH4I] - - k[5236]*y_cur[IDX_NI] - k[5362]*y_cur[IDX_OI] - - k[5595]*y_cur[IDX_eM] - k[5731] - k[5732] - k[6016] - k[6017] - - k[6996]; - data[jistart + 3164] = 0.0 - k[1830]*y_cur[IDX_C4HI] - - k[1831]*y_cur[IDX_C4HI]; - data[jistart + 3165] = 0.0 + k[4201]*y_cur[IDX_CII] + - k[4202]*y_cur[IDX_C2H2II] + k[4203]*y_cur[IDX_C2H3II] + - k[4204]*y_cur[IDX_C4H2II] + k[4205]*y_cur[IDX_C4H3II] + - k[4206]*y_cur[IDX_C4SII] + k[4207]*y_cur[IDX_CH2CCHII] + - k[4208]*y_cur[IDX_CH3II] + k[4209]*y_cur[IDX_CNCII] + - k[4210]*y_cur[IDX_FeII] + k[4211]*y_cur[IDX_HII] + - k[4212]*y_cur[IDX_H2COII] + k[4213]*y_cur[IDX_H2SII] + - k[4214]*y_cur[IDX_H3II] + k[4215]*y_cur[IDX_H3OII] + - k[4216]*y_cur[IDX_HC2SII] + k[4217]*y_cur[IDX_HCNHII] + - k[4218]*y_cur[IDX_HCNHII] + k[4219]*y_cur[IDX_HCOII] + - k[4220]*y_cur[IDX_HCOII] + k[4221]*y_cur[IDX_HeII] + - k[4222]*y_cur[IDX_MgII] + k[4223]*y_cur[IDX_NII] + - k[4224]*y_cur[IDX_N2HII] + k[4225]*y_cur[IDX_NH3II] + - k[4226]*y_cur[IDX_NH4II] + k[4227]*y_cur[IDX_NOII] + - k[4228]*y_cur[IDX_NaII] + k[4229]*y_cur[IDX_OII] + - k[4230]*y_cur[IDX_SII] + k[4231]*y_cur[IDX_SOII] + - k[4232]*y_cur[IDX_SiII] + k[4233]*y_cur[IDX_SiOII] + - k[4234]*y_cur[IDX_SiOHII] + k[4235]*y_cur[IDX_SiSII] + k[5729] + - k[6013]; - data[jistart + 3166] = 0.0 + k[5849] + k[6174]; - data[jistart + 3167] = 0.0 + k[823]*y_cur[IDX_eM] - - k[1843]*y_cur[IDX_C4HI] + k[4204]*y_cur[IDX_C4HM] + - k[6628]*y_cur[IDX_GRAINM]; - data[jistart + 3168] = 0.0 + k[5730] + k[6014]; - data[jistart + 3169] = 0.0 + k[824]*y_cur[IDX_eM] - - k[1844]*y_cur[IDX_C4HI] + k[4205]*y_cur[IDX_C4HM] + - k[6633]*y_cur[IDX_GRAINM]; - data[jistart + 3170] = 0.0 + k[827]*y_cur[IDX_eM] + - k[6645]*y_cur[IDX_GRAINM]; - data[jistart + 3171] = 0.0 + k[4206]*y_cur[IDX_C4HM]; - data[jistart + 3172] = 0.0 + k[5366]*y_cur[IDX_OI]; - data[jistart + 3173] = 0.0 + k[839]*y_cur[IDX_eM] + - k[6721]*y_cur[IDX_GRAINM]; - data[jistart + 3174] = 0.0 + k[3413]*y_cur[IDX_NI]; - data[jistart + 3175] = 0.0 - k[1845]*y_cur[IDX_C4HI] + - k[3706]*y_cur[IDX_OI]; - data[jistart + 3176] = 0.0 + k[5750]; - data[jistart + 3177] = 0.0 + k[3430]*y_cur[IDX_NI]; - data[jistart + 3178] = 0.0 - k[2020]*y_cur[IDX_C4HI] - - k[2021]*y_cur[IDX_C4HI] + k[4207]*y_cur[IDX_C4HM]; - data[jistart + 3179] = 0.0 - k[5022]*y_cur[IDX_C4HI] - - k[5023]*y_cur[IDX_C4HI]; - data[jistart + 3180] = 0.0 - k[2052]*y_cur[IDX_C4HI] + - k[4208]*y_cur[IDX_C4HM]; - data[jistart + 3181] = 0.0 + k[5797] + k[6101]; - data[jistart + 3182] = 0.0 - k[5050]*y_cur[IDX_C4HI] - - k[5051]*y_cur[IDX_C4HI]; - data[jistart + 3183] = 0.0 - k[5053]*y_cur[IDX_C4HI] - - k[5054]*y_cur[IDX_C4HI]; - data[jistart + 3184] = 0.0 - k[5057]*y_cur[IDX_C4HI] - - k[5058]*y_cur[IDX_C4HI]; - data[jistart + 3185] = 0.0 + k[4209]*y_cur[IDX_C4HM]; - data[jistart + 3186] = 0.0 + k[4210]*y_cur[IDX_C4HM]; - data[jistart + 3187] = 0.0 + k[8668]*y_cur[IDX_GC3HI]; - data[jistart + 3188] = 0.0 + k[8724]*y_cur[IDX_GCHI]; - data[jistart + 3189] = 0.0 + k[8668]*y_cur[IDX_GCI]; - data[jistart + 3190] = 0.0 + k[8629]*y_cur[IDX_GHI]; - data[jistart + 3191] = 0.0 + k[7178] + k[7360] + k[7542]; - data[jistart + 3192] = 0.0 + k[8724]*y_cur[IDX_GC3I]; - data[jistart + 3193] = 0.0 + k[8629]*y_cur[IDX_GC4I]; - data[jistart + 3194] = 0.0 + k[6628]*y_cur[IDX_C4H2II] + - k[6633]*y_cur[IDX_C4H3II] + k[6645]*y_cur[IDX_C4H5II] + - k[6721]*y_cur[IDX_C5HII] + k[6794]*y_cur[IDX_HC5NHII] + - k[6795]*y_cur[IDX_HC5NHII]; - data[jistart + 3195] = 0.0 + k[92]*y_cur[IDX_C4M]; - data[jistart + 3196] = 0.0 - k[340]*y_cur[IDX_C4HI] - - k[2303]*y_cur[IDX_C4HI] + k[4211]*y_cur[IDX_C4HM]; - data[jistart + 3197] = 0.0 + k[4959]*y_cur[IDX_CI]; - data[jistart + 3198] = 0.0 + k[4212]*y_cur[IDX_C4HM]; - data[jistart + 3199] = 0.0 + k[4213]*y_cur[IDX_C4HM]; - data[jistart + 3200] = 0.0 - k[2610]*y_cur[IDX_C4HI] + - k[4214]*y_cur[IDX_C4HM]; - data[jistart + 3201] = 0.0 - k[2780]*y_cur[IDX_C4HI] + - k[4215]*y_cur[IDX_C4HM]; - data[jistart + 3202] = 0.0 + k[4216]*y_cur[IDX_C4HM]; - data[jistart + 3203] = 0.0 + k[5850] + k[6175]; - data[jistart + 3204] = 0.0 + k[1082]*y_cur[IDX_eM] + - k[1083]*y_cur[IDX_eM] + k[6794]*y_cur[IDX_GRAINM] + - k[6795]*y_cur[IDX_GRAINM]; - data[jistart + 3205] = 0.0 + k[4217]*y_cur[IDX_C4HM] + - k[4218]*y_cur[IDX_C4HM]; - data[jistart + 3206] = 0.0 - k[2915]*y_cur[IDX_C4HI] + - k[4219]*y_cur[IDX_C4HM] + k[4220]*y_cur[IDX_C4HM]; - data[jistart + 3207] = 0.0 - k[4907]*y_cur[IDX_C4HI]; - data[jistart + 3208] = 0.0 - k[3111]*y_cur[IDX_C4HI] - - k[3112]*y_cur[IDX_C4HI] + k[4221]*y_cur[IDX_C4HM]; - data[jistart + 3209] = 0.0 + k[4222]*y_cur[IDX_C4HM]; - data[jistart + 3210] = 0.0 + k[3413]*y_cur[IDX_C5HM] + - k[3430]*y_cur[IDX_C7HM] - k[5236]*y_cur[IDX_C4HI]; - data[jistart + 3211] = 0.0 + k[4223]*y_cur[IDX_C4HM]; - data[jistart + 3212] = 0.0 + k[4224]*y_cur[IDX_C4HM]; - data[jistart + 3213] = 0.0 - k[4908]*y_cur[IDX_C4HI]; - data[jistart + 3214] = 0.0 + k[4225]*y_cur[IDX_C4HM]; - data[jistart + 3215] = 0.0 + k[4226]*y_cur[IDX_C4HM]; - data[jistart + 3216] = 0.0 + k[4227]*y_cur[IDX_C4HM]; - data[jistart + 3217] = 0.0 + k[4228]*y_cur[IDX_C4HM]; - data[jistart + 3218] = 0.0 + k[3706]*y_cur[IDX_C5H2II] - - k[5362]*y_cur[IDX_C4HI] + k[5366]*y_cur[IDX_C5HI]; - data[jistart + 3219] = 0.0 + k[4229]*y_cur[IDX_C4HM]; - data[jistart + 3220] = 0.0 - k[3822]*y_cur[IDX_C4HI] + - k[4230]*y_cur[IDX_C4HM]; - data[jistart + 3221] = 0.0 + k[4231]*y_cur[IDX_C4HM]; - data[jistart + 3222] = 0.0 - k[3862]*y_cur[IDX_C4HI] + - k[4232]*y_cur[IDX_C4HM]; - data[jistart + 3223] = 0.0 + k[4233]*y_cur[IDX_C4HM]; - data[jistart + 3224] = 0.0 + k[4234]*y_cur[IDX_C4HM]; - data[jistart + 3225] = 0.0 + k[4235]*y_cur[IDX_C4HM]; - data[jistart + 3226] = 0.0 + k[823]*y_cur[IDX_C4H2II] + - k[824]*y_cur[IDX_C4H3II] + k[827]*y_cur[IDX_C4H5II] + - k[839]*y_cur[IDX_C5HII] + k[1082]*y_cur[IDX_HC5NHII] + - k[1083]*y_cur[IDX_HC5NHII] - k[5595]*y_cur[IDX_C4HI]; - data[jistart + 3227] = 0.0 + k[1856]*y_cur[IDX_C3H2II] + - k[1857]*y_cur[IDX_C3H3II] - k[1862]*y_cur[IDX_C4HII] + - k[1892]*y_cur[IDX_CH2CCHII]; - data[jistart + 3228] = 0.0 + k[1311]*y_cur[IDX_C3H2I] + - k[1346]*y_cur[IDX_CH2CCHI] + k[1389]*y_cur[IDX_H2CCCI]; - data[jistart + 3229] = 0.0 + k[1452]*y_cur[IDX_C2H2I]; - data[jistart + 3230] = 0.0 - k[1734]*y_cur[IDX_C4HII] - - k[1735]*y_cur[IDX_C4HII]; - data[jistart + 3231] = 0.0 + k[1470]*y_cur[IDX_HC3NI]; - data[jistart + 3232] = 0.0 + k[1452]*y_cur[IDX_C2II] - - k[1551]*y_cur[IDX_C4HII]; - data[jistart + 3233] = 0.0 - k[1632]*y_cur[IDX_C4HII]; - data[jistart + 3234] = 0.0 - k[1694]*y_cur[IDX_C4HII] - - k[1695]*y_cur[IDX_C4HII]; - data[jistart + 3235] = 0.0 - k[1822]*y_cur[IDX_C4HII] - - k[1823]*y_cur[IDX_C4HII]; - data[jistart + 3236] = 0.0 + k[1311]*y_cur[IDX_CII]; - data[jistart + 3237] = 0.0 + k[1856]*y_cur[IDX_CI]; - data[jistart + 3238] = 0.0 + k[1857]*y_cur[IDX_CI]; - data[jistart + 3239] = 0.0 + k[2608]*y_cur[IDX_H3II] + - k[2778]*y_cur[IDX_H3OII] + k[2913]*y_cur[IDX_HCOII]; - data[jistart + 3240] = 0.0 + k[2165]*y_cur[IDX_CH4I] + - k[2411]*y_cur[IDX_H2I]; - data[jistart + 3241] = 0.0 + k[340]*y_cur[IDX_HII] - - k[1830]*y_cur[IDX_C4HII] - k[1831]*y_cur[IDX_C4HII]; - data[jistart + 3242] = 0.0 - k[821]*y_cur[IDX_eM] - - k[1551]*y_cur[IDX_C2H2I] - k[1632]*y_cur[IDX_C2H3I] - - k[1694]*y_cur[IDX_C2H4I] - k[1695]*y_cur[IDX_C2H4I] - - k[1734]*y_cur[IDX_C2HI] - k[1735]*y_cur[IDX_C2HI] - - k[1822]*y_cur[IDX_C3HI] - k[1823]*y_cur[IDX_C3HI] - - k[1830]*y_cur[IDX_C4HI] - k[1831]*y_cur[IDX_C4HI] - - k[1832]*y_cur[IDX_C5H2I] - k[1833]*y_cur[IDX_C5HI] - - k[1834]*y_cur[IDX_C4H2I] - k[1862]*y_cur[IDX_CI] - - k[2032]*y_cur[IDX_CH2CCHI] - k[2105]*y_cur[IDX_CH3CCHI] - - k[2168]*y_cur[IDX_CH4I] - k[2412]*y_cur[IDX_H2I] - - k[2478]*y_cur[IDX_H2CCCI] - k[2869]*y_cur[IDX_HCNI] - - k[2870]*y_cur[IDX_HCNI] - k[3699]*y_cur[IDX_OI] - - k[6621]*y_cur[IDX_GRAINM]; - data[jistart + 3243] = 0.0 - k[1834]*y_cur[IDX_C4HII] + - k[2342]*y_cur[IDX_HII] + k[3240]*y_cur[IDX_HeII] + - k[3830]*y_cur[IDX_SII] + k[3869]*y_cur[IDX_SiII]; - data[jistart + 3244] = 0.0 - k[1833]*y_cur[IDX_C4HII]; - data[jistart + 3245] = 0.0 - k[1832]*y_cur[IDX_C4HII]; - data[jistart + 3246] = 0.0 + k[3132]*y_cur[IDX_HeII]; - data[jistart + 3247] = 0.0 + k[3127]*y_cur[IDX_HeII]; - data[jistart + 3248] = 0.0 + k[1346]*y_cur[IDX_CII] - - k[2032]*y_cur[IDX_C4HII]; - data[jistart + 3249] = 0.0 + k[1892]*y_cur[IDX_CI]; - data[jistart + 3250] = 0.0 - k[2105]*y_cur[IDX_C4HII]; - data[jistart + 3251] = 0.0 + k[2165]*y_cur[IDX_C4II] - - k[2168]*y_cur[IDX_C4HII]; - data[jistart + 3252] = 0.0 - k[6621]*y_cur[IDX_C4HII]; - data[jistart + 3253] = 0.0 + k[340]*y_cur[IDX_C4HI] + - k[2342]*y_cur[IDX_C4H2I]; - data[jistart + 3254] = 0.0 + k[2411]*y_cur[IDX_C4II] - - k[2412]*y_cur[IDX_C4HII]; - data[jistart + 3255] = 0.0 + k[1389]*y_cur[IDX_CII] - - k[2478]*y_cur[IDX_C4HII]; - data[jistart + 3256] = 0.0 + k[2608]*y_cur[IDX_C4I]; - data[jistart + 3257] = 0.0 + k[2778]*y_cur[IDX_C4I]; - data[jistart + 3258] = 0.0 + k[1470]*y_cur[IDX_C2HII]; - data[jistart + 3259] = 0.0 + k[3242]*y_cur[IDX_HeII]; - data[jistart + 3260] = 0.0 - k[2869]*y_cur[IDX_C4HII] - - k[2870]*y_cur[IDX_C4HII]; - data[jistart + 3261] = 0.0 + k[2913]*y_cur[IDX_C4I]; - data[jistart + 3262] = 0.0 + k[3127]*y_cur[IDX_C6H2I] + - k[3132]*y_cur[IDX_C6HI] + k[3240]*y_cur[IDX_C4H2I] + - k[3242]*y_cur[IDX_HC5NI]; - data[jistart + 3263] = 0.0 - k[3699]*y_cur[IDX_C4HII]; - data[jistart + 3264] = 0.0 + k[3830]*y_cur[IDX_C4H2I]; - data[jistart + 3265] = 0.0 + k[3869]*y_cur[IDX_C4H2I]; - data[jistart + 3266] = 0.0 - k[821]*y_cur[IDX_C4HII]; - data[jistart + 3267] = 0.0 - k[44]*y_cur[IDX_C4HM]; - data[jistart + 3268] = 0.0 - k[4201]*y_cur[IDX_C4HM]; - data[jistart + 3269] = 0.0 - k[4202]*y_cur[IDX_C4HM]; - data[jistart + 3270] = 0.0 - k[4203]*y_cur[IDX_C4HM]; - data[jistart + 3271] = 0.0 + k[5595]*y_cur[IDX_eM]; - data[jistart + 3272] = 0.0 - k[44]*y_cur[IDX_CI] - - k[93]*y_cur[IDX_HI] - k[115]*y_cur[IDX_NI] - k[3404]*y_cur[IDX_NI] - - k[3700]*y_cur[IDX_OI] - k[4201]*y_cur[IDX_CII] - - k[4202]*y_cur[IDX_C2H2II] - k[4203]*y_cur[IDX_C2H3II] - - k[4204]*y_cur[IDX_C4H2II] - k[4205]*y_cur[IDX_C4H3II] - - k[4206]*y_cur[IDX_C4SII] - k[4207]*y_cur[IDX_CH2CCHII] - - k[4208]*y_cur[IDX_CH3II] - k[4209]*y_cur[IDX_CNCII] - - k[4210]*y_cur[IDX_FeII] - k[4211]*y_cur[IDX_HII] - - k[4212]*y_cur[IDX_H2COII] - k[4213]*y_cur[IDX_H2SII] - - k[4214]*y_cur[IDX_H3II] - k[4215]*y_cur[IDX_H3OII] - - k[4216]*y_cur[IDX_HC2SII] - k[4217]*y_cur[IDX_HCNHII] - - k[4218]*y_cur[IDX_HCNHII] - k[4219]*y_cur[IDX_HCOII] - - k[4220]*y_cur[IDX_HCOII] - k[4221]*y_cur[IDX_HeII] - - k[4222]*y_cur[IDX_MgII] - k[4223]*y_cur[IDX_NII] - - k[4224]*y_cur[IDX_N2HII] - k[4225]*y_cur[IDX_NH3II] - - k[4226]*y_cur[IDX_NH4II] - k[4227]*y_cur[IDX_NOII] - - k[4228]*y_cur[IDX_NaII] - k[4229]*y_cur[IDX_OII] - - k[4230]*y_cur[IDX_SII] - k[4231]*y_cur[IDX_SOII] - - k[4232]*y_cur[IDX_SiII] - k[4233]*y_cur[IDX_SiOII] - - k[4234]*y_cur[IDX_SiOHII] - k[4235]*y_cur[IDX_SiSII] - k[5729] - - k[6013]; - data[jistart + 3273] = 0.0 - k[4204]*y_cur[IDX_C4HM]; - data[jistart + 3274] = 0.0 - k[4205]*y_cur[IDX_C4HM]; - data[jistart + 3275] = 0.0 - k[4206]*y_cur[IDX_C4HM]; - data[jistart + 3276] = 0.0 + k[3414]*y_cur[IDX_NI] + - k[3705]*y_cur[IDX_OI]; - data[jistart + 3277] = 0.0 - k[4207]*y_cur[IDX_C4HM]; - data[jistart + 3278] = 0.0 - k[4208]*y_cur[IDX_C4HM]; - data[jistart + 3279] = 0.0 - k[4209]*y_cur[IDX_C4HM]; - data[jistart + 3280] = 0.0 - k[4210]*y_cur[IDX_C4HM]; - data[jistart + 3281] = 0.0 - k[93]*y_cur[IDX_C4HM]; - data[jistart + 3282] = 0.0 - k[4211]*y_cur[IDX_C4HM]; - data[jistart + 3283] = 0.0 - k[4212]*y_cur[IDX_C4HM]; - data[jistart + 3284] = 0.0 - k[4213]*y_cur[IDX_C4HM]; - data[jistart + 3285] = 0.0 - k[4214]*y_cur[IDX_C4HM]; - data[jistart + 3286] = 0.0 - k[4215]*y_cur[IDX_C4HM]; - data[jistart + 3287] = 0.0 - k[4216]*y_cur[IDX_C4HM]; - data[jistart + 3288] = 0.0 - k[4217]*y_cur[IDX_C4HM] - - k[4218]*y_cur[IDX_C4HM]; - data[jistart + 3289] = 0.0 - k[4219]*y_cur[IDX_C4HM] - - k[4220]*y_cur[IDX_C4HM]; - data[jistart + 3290] = 0.0 - k[4221]*y_cur[IDX_C4HM]; - data[jistart + 3291] = 0.0 - k[4222]*y_cur[IDX_C4HM]; - data[jistart + 3292] = 0.0 - k[115]*y_cur[IDX_C4HM] - - k[3404]*y_cur[IDX_C4HM] + k[3414]*y_cur[IDX_C5HM]; - data[jistart + 3293] = 0.0 - k[4223]*y_cur[IDX_C4HM]; - data[jistart + 3294] = 0.0 - k[4224]*y_cur[IDX_C4HM]; - data[jistart + 3295] = 0.0 - k[4225]*y_cur[IDX_C4HM]; - data[jistart + 3296] = 0.0 - k[4226]*y_cur[IDX_C4HM]; - data[jistart + 3297] = 0.0 - k[4227]*y_cur[IDX_C4HM]; - data[jistart + 3298] = 0.0 - k[4228]*y_cur[IDX_C4HM]; - data[jistart + 3299] = 0.0 - k[3700]*y_cur[IDX_C4HM] + - k[3705]*y_cur[IDX_C5HM]; - data[jistart + 3300] = 0.0 - k[4229]*y_cur[IDX_C4HM]; - data[jistart + 3301] = 0.0 - k[4230]*y_cur[IDX_C4HM]; - data[jistart + 3302] = 0.0 - k[4231]*y_cur[IDX_C4HM]; - data[jistart + 3303] = 0.0 - k[4232]*y_cur[IDX_C4HM]; - data[jistart + 3304] = 0.0 - k[4233]*y_cur[IDX_C4HM]; - data[jistart + 3305] = 0.0 - k[4234]*y_cur[IDX_C4HM]; - data[jistart + 3306] = 0.0 - k[4235]*y_cur[IDX_C4HM]; - data[jistart + 3307] = 0.0 + k[5595]*y_cur[IDX_C4HI]; - data[jistart + 3308] = 0.0 + k[4947]*y_cur[IDX_CH2CCHI] + - k[4953]*y_cur[IDX_CH3CCHI] - k[4961]*y_cur[IDX_C4H2I]; - data[jistart + 3309] = 0.0 - k[177]*y_cur[IDX_C4H2I] - - k[1402]*y_cur[IDX_C4H2I] - k[1403]*y_cur[IDX_C4H2I]; - data[jistart + 3310] = 0.0 + k[3889]*y_cur[IDX_C4H2II]; - data[jistart + 3311] = 0.0 + k[3924]*y_cur[IDX_C4H2II]; - data[jistart + 3312] = 0.0 + k[3959]*y_cur[IDX_C4H2II]; - data[jistart + 3313] = 0.0 - k[4872]*y_cur[IDX_C4H2I]; - data[jistart + 3314] = 0.0 + k[3994]*y_cur[IDX_C4H2II]; - data[jistart + 3315] = 0.0 + k[4888]*y_cur[IDX_C2H2I] - - k[4900]*y_cur[IDX_C4H2I]; - data[jistart + 3316] = 0.0 + k[4029]*y_cur[IDX_C4H2II]; - data[jistart + 3317] = 0.0 + k[4888]*y_cur[IDX_C2HI]; - data[jistart + 3318] = 0.0 - k[224]*y_cur[IDX_C4H2I] - - k[1520]*y_cur[IDX_C4H2I] - k[1521]*y_cur[IDX_C4H2I]; - data[jistart + 3319] = 0.0 - k[1621]*y_cur[IDX_C4H2I] - - k[1622]*y_cur[IDX_C4H2I] - k[1623]*y_cur[IDX_C4H2I]; - data[jistart + 3320] = 0.0 - k[1677]*y_cur[IDX_C4H2I] - - k[1678]*y_cur[IDX_C4H2I]; - data[jistart + 3321] = 0.0 + k[5052]*y_cur[IDX_C4HI]; - data[jistart + 3322] = 0.0 + k[4064]*y_cur[IDX_C4H2II]; - data[jistart + 3323] = 0.0 - k[1754]*y_cur[IDX_C4H2I] - - k[1755]*y_cur[IDX_C4H2I]; - data[jistart + 3324] = 0.0 + k[4099]*y_cur[IDX_C4H2II]; - data[jistart + 3325] = 0.0 - k[1784]*y_cur[IDX_C4H2I] - - k[1785]*y_cur[IDX_C4H2I]; - data[jistart + 3326] = 0.0 - k[1807]*y_cur[IDX_C4H2I] - - k[5515]*y_cur[IDX_C4H2I]; - data[jistart + 3327] = 0.0 + k[4134]*y_cur[IDX_C4H2II]; - data[jistart + 3328] = 0.0 + k[4169]*y_cur[IDX_C4H2II]; - data[jistart + 3329] = 0.0 + k[5052]*y_cur[IDX_C2H6I] + - k[5057]*y_cur[IDX_CH4I] + k[5058]*y_cur[IDX_CH4I]; - data[jistart + 3330] = 0.0 - k[1834]*y_cur[IDX_C4H2I]; - data[jistart + 3331] = 0.0 + k[93]*y_cur[IDX_HI] + - k[4204]*y_cur[IDX_C4H2II]; - data[jistart + 3332] = 0.0 - k[177]*y_cur[IDX_CII] - - k[224]*y_cur[IDX_C2H2II] - k[384]*y_cur[IDX_HII] - - k[493]*y_cur[IDX_HC3NII] - k[704]*y_cur[IDX_SII] - - k[1402]*y_cur[IDX_CII] - k[1403]*y_cur[IDX_CII] - - k[1520]*y_cur[IDX_C2H2II] - k[1521]*y_cur[IDX_C2H2II] - - k[1621]*y_cur[IDX_C2H3II] - k[1622]*y_cur[IDX_C2H3II] - - k[1623]*y_cur[IDX_C2H3II] - k[1677]*y_cur[IDX_C2H4II] - - k[1678]*y_cur[IDX_C2H4II] - k[1754]*y_cur[IDX_C3HII] - - k[1755]*y_cur[IDX_C3HII] - k[1784]*y_cur[IDX_C3H2II] - - k[1785]*y_cur[IDX_C3H2II] - k[1807]*y_cur[IDX_C3H3II] - - k[1834]*y_cur[IDX_C4HII] - k[1837]*y_cur[IDX_C4H2II] - - k[1838]*y_cur[IDX_C4H2II] - k[2031]*y_cur[IDX_CH2CCHII] - - k[2080]*y_cur[IDX_CH3II] - k[2081]*y_cur[IDX_CH3II] - - k[2342]*y_cur[IDX_HII] - k[2690]*y_cur[IDX_H3II] - - k[2764]*y_cur[IDX_H3COII] - k[2805]*y_cur[IDX_H3OII] - - k[2850]*y_cur[IDX_C4H3II] - k[2851]*y_cur[IDX_C4H4II] - - k[2852]*y_cur[IDX_C5H2II] - k[2965]*y_cur[IDX_HCOII] - - k[3238]*y_cur[IDX_HeII] - k[3239]*y_cur[IDX_HeII] - - k[3240]*y_cur[IDX_HeII] - k[3830]*y_cur[IDX_SII] - - k[3831]*y_cur[IDX_SII] - k[3832]*y_cur[IDX_SII] - - k[3869]*y_cur[IDX_SiII] - k[4872]*y_cur[IDX_C2I] - - k[4900]*y_cur[IDX_C2HI] - k[4961]*y_cur[IDX_CI] - - k[5115]*y_cur[IDX_CNI] - k[5515]*y_cur[IDX_C3H3II] - - k[5518]*y_cur[IDX_C4H2II] - k[5531]*y_cur[IDX_CH2CCHII] - - k[5576]*y_cur[IDX_C4H3II] - k[5577]*y_cur[IDX_C5HII] - - k[5578]*y_cur[IDX_C5H2II] - k[5579]*y_cur[IDX_C5H3II] - k[5847] - - k[5848] - k[5849] - k[6172] - k[6173] - k[6174] - k[6998]; - data[jistart + 3333] = 0.0 + k[622]*y_cur[IDX_NOI] - - k[1837]*y_cur[IDX_C4H2I] - k[1838]*y_cur[IDX_C4H2I] + - k[3889]*y_cur[IDX_CM] + k[3924]*y_cur[IDX_C10M] + - k[3959]*y_cur[IDX_C10HM] + k[3994]*y_cur[IDX_C2M] + - k[4029]*y_cur[IDX_C2HM] + k[4064]*y_cur[IDX_C3M] + - k[4099]*y_cur[IDX_C3HM] + k[4134]*y_cur[IDX_C3NM] + - k[4169]*y_cur[IDX_C4M] + k[4204]*y_cur[IDX_C4HM] + - k[4239]*y_cur[IDX_C5M] + k[4274]*y_cur[IDX_C5HM] + - k[4309]*y_cur[IDX_C5NM] + k[4344]*y_cur[IDX_C6M] + - k[4379]*y_cur[IDX_C6HM] + k[4414]*y_cur[IDX_C7M] + - k[4449]*y_cur[IDX_C7HM] + k[4484]*y_cur[IDX_C8M] + - k[4519]*y_cur[IDX_C8HM] + k[4554]*y_cur[IDX_C9M] + - k[4589]*y_cur[IDX_C9HM] + k[4624]*y_cur[IDX_CHM] + - k[4659]*y_cur[IDX_CNM] + k[4694]*y_cur[IDX_HM] + - k[4730]*y_cur[IDX_OM] + k[4765]*y_cur[IDX_O2M] + - k[4800]*y_cur[IDX_OHM] + k[4835]*y_cur[IDX_SM] - - k[5518]*y_cur[IDX_C4H2I]; - data[jistart + 3334] = 0.0 + k[6015]; - data[jistart + 3335] = 0.0 + k[825]*y_cur[IDX_eM] + - k[2124]*y_cur[IDX_CH3OHI] - k[2850]*y_cur[IDX_C4H2I] - - k[5576]*y_cur[IDX_C4H2I] + k[6634]*y_cur[IDX_GRAINM]; - data[jistart + 3336] = 0.0 - k[2851]*y_cur[IDX_C4H2I]; - data[jistart + 3337] = 0.0 + k[829]*y_cur[IDX_eM] + - k[6647]*y_cur[IDX_GRAINM]; - data[jistart + 3338] = 0.0 + k[830]*y_cur[IDX_eM] + - k[6667]*y_cur[IDX_GRAINM]; - data[jistart + 3339] = 0.0 + k[4239]*y_cur[IDX_C4H2II]; - data[jistart + 3340] = 0.0 - k[5577]*y_cur[IDX_C4H2I]; - data[jistart + 3341] = 0.0 + k[4274]*y_cur[IDX_C4H2II]; - data[jistart + 3342] = 0.0 - k[2852]*y_cur[IDX_C4H2I] - - k[5578]*y_cur[IDX_C4H2I]; - data[jistart + 3343] = 0.0 + k[3707]*y_cur[IDX_OI] - - k[5579]*y_cur[IDX_C4H2I]; - data[jistart + 3344] = 0.0 + k[4309]*y_cur[IDX_C4H2II]; - data[jistart + 3345] = 0.0 + k[4344]*y_cur[IDX_C4H2II]; - data[jistart + 3346] = 0.0 + k[4379]*y_cur[IDX_C4H2II]; - data[jistart + 3347] = 0.0 + k[4414]*y_cur[IDX_C4H2II]; - data[jistart + 3348] = 0.0 + k[4449]*y_cur[IDX_C4H2II]; - data[jistart + 3349] = 0.0 + k[4484]*y_cur[IDX_C4H2II]; - data[jistart + 3350] = 0.0 + k[4519]*y_cur[IDX_C4H2II]; - data[jistart + 3351] = 0.0 + k[4554]*y_cur[IDX_C4H2II]; - data[jistart + 3352] = 0.0 + k[4589]*y_cur[IDX_C4H2II]; - data[jistart + 3353] = 0.0 + k[4624]*y_cur[IDX_C4H2II]; - data[jistart + 3354] = 0.0 + k[4947]*y_cur[IDX_CI]; - data[jistart + 3355] = 0.0 - k[2031]*y_cur[IDX_C4H2I] - - k[5531]*y_cur[IDX_C4H2I]; - data[jistart + 3356] = 0.0 - k[2080]*y_cur[IDX_C4H2I] - - k[2081]*y_cur[IDX_C4H2I]; - data[jistart + 3357] = 0.0 + k[4953]*y_cur[IDX_CI]; - data[jistart + 3358] = 0.0 + k[2124]*y_cur[IDX_C4H3II]; - data[jistart + 3359] = 0.0 + k[5057]*y_cur[IDX_C4HI] + - k[5058]*y_cur[IDX_C4HI]; - data[jistart + 3360] = 0.0 - k[5115]*y_cur[IDX_C4H2I]; - data[jistart + 3361] = 0.0 + k[4659]*y_cur[IDX_C4H2II]; - data[jistart + 3362] = 0.0 + k[8725]*y_cur[IDX_GCHI]; - data[jistart + 3363] = 0.0 + k[8630]*y_cur[IDX_GHI]; - data[jistart + 3364] = 0.0 + k[7180] + k[7362] + k[7544]; - data[jistart + 3365] = 0.0 + k[8725]*y_cur[IDX_GC3HI]; - data[jistart + 3366] = 0.0 + k[8630]*y_cur[IDX_GC4HI]; - data[jistart + 3367] = 0.0 + k[6634]*y_cur[IDX_C4H3II] + - k[6647]*y_cur[IDX_C4H5II] + k[6667]*y_cur[IDX_C4H7II]; - data[jistart + 3368] = 0.0 + k[93]*y_cur[IDX_C4HM]; - data[jistart + 3369] = 0.0 - k[384]*y_cur[IDX_C4H2I] - - k[2342]*y_cur[IDX_C4H2I]; - data[jistart + 3370] = 0.0 + k[4694]*y_cur[IDX_C4H2II]; - data[jistart + 3371] = 0.0 - k[2690]*y_cur[IDX_C4H2I]; - data[jistart + 3372] = 0.0 - k[2764]*y_cur[IDX_C4H2I]; - data[jistart + 3373] = 0.0 - k[2805]*y_cur[IDX_C4H2I]; - data[jistart + 3374] = 0.0 - k[493]*y_cur[IDX_C4H2I]; - data[jistart + 3375] = 0.0 - k[2965]*y_cur[IDX_C4H2I]; - data[jistart + 3376] = 0.0 - k[3238]*y_cur[IDX_C4H2I] - - k[3239]*y_cur[IDX_C4H2I] - k[3240]*y_cur[IDX_C4H2I]; - data[jistart + 3377] = 0.0 + k[622]*y_cur[IDX_C4H2II]; - data[jistart + 3378] = 0.0 + k[3707]*y_cur[IDX_C5H3II]; - data[jistart + 3379] = 0.0 + k[4730]*y_cur[IDX_C4H2II]; - data[jistart + 3380] = 0.0 + k[4765]*y_cur[IDX_C4H2II]; - data[jistart + 3381] = 0.0 + k[4800]*y_cur[IDX_C4H2II]; - data[jistart + 3382] = 0.0 - k[704]*y_cur[IDX_C4H2I] - - k[3830]*y_cur[IDX_C4H2I] - k[3831]*y_cur[IDX_C4H2I] - - k[3832]*y_cur[IDX_C4H2I]; - data[jistart + 3383] = 0.0 + k[4835]*y_cur[IDX_C4H2II]; - data[jistart + 3384] = 0.0 - k[3869]*y_cur[IDX_C4H2I]; - data[jistart + 3385] = 0.0 + k[825]*y_cur[IDX_C4H3II] + - k[829]*y_cur[IDX_C4H5II] + k[830]*y_cur[IDX_C4H7II]; - data[jistart + 3386] = 0.0 + k[1858]*y_cur[IDX_C3H3II] + - k[1859]*y_cur[IDX_C3H4II] - k[1863]*y_cur[IDX_C4H2II] - - k[1864]*y_cur[IDX_C4H2II] + k[1893]*y_cur[IDX_CH2CCHII]; - data[jistart + 3387] = 0.0 + k[177]*y_cur[IDX_C4H2I] + - k[1345]*y_cur[IDX_CH2CCH2I] + k[1347]*y_cur[IDX_CH2CCHI] + - k[1365]*y_cur[IDX_CH3CCHI]; - data[jistart + 3388] = 0.0 - k[3889]*y_cur[IDX_C4H2II]; - data[jistart + 3389] = 0.0 - k[3924]*y_cur[IDX_C4H2II]; - data[jistart + 3390] = 0.0 - k[3959]*y_cur[IDX_C4H2II]; - data[jistart + 3391] = 0.0 - k[3994]*y_cur[IDX_C4H2II]; - data[jistart + 3392] = 0.0 + k[1725]*y_cur[IDX_C2H2II] + - k[1727]*y_cur[IDX_C2H3II] - k[1736]*y_cur[IDX_C4H2II]; - data[jistart + 3393] = 0.0 + k[1466]*y_cur[IDX_C2H2I] + - k[1471]*y_cur[IDX_HC3NI]; - data[jistart + 3394] = 0.0 - k[4029]*y_cur[IDX_C4H2II]; - data[jistart + 3395] = 0.0 + k[1466]*y_cur[IDX_C2HII] + - k[1479]*y_cur[IDX_C2H2II] - k[1552]*y_cur[IDX_C4H2II] + - k[1565]*y_cur[IDX_HC3NII] - k[5511]*y_cur[IDX_C4H2II]; - data[jistart + 3396] = 0.0 + k[224]*y_cur[IDX_C4H2I] + - k[1479]*y_cur[IDX_C2H2I] + k[1725]*y_cur[IDX_C2HI]; - data[jistart + 3397] = 0.0 - k[1633]*y_cur[IDX_C4H2II] - - k[1634]*y_cur[IDX_C4H2II]; - data[jistart + 3398] = 0.0 + k[1586]*y_cur[IDX_C4HI] + - k[1727]*y_cur[IDX_C2HI]; - data[jistart + 3399] = 0.0 - k[1696]*y_cur[IDX_C4H2II] - - k[1697]*y_cur[IDX_C4H2II]; - data[jistart + 3400] = 0.0 + k[1651]*y_cur[IDX_C3HI]; - data[jistart + 3401] = 0.0 + k[2158]*y_cur[IDX_CH4I]; - data[jistart + 3402] = 0.0 - k[4064]*y_cur[IDX_C4H2II]; - data[jistart + 3403] = 0.0 + k[1651]*y_cur[IDX_C2H4II] - - k[1824]*y_cur[IDX_C4H2II] + k[2051]*y_cur[IDX_CH3II]; - data[jistart + 3404] = 0.0 - k[4099]*y_cur[IDX_C4H2II]; - data[jistart + 3405] = 0.0 - k[1788]*y_cur[IDX_C4H2II]; - data[jistart + 3406] = 0.0 + k[1771]*y_cur[IDX_CH2CCH2I] + - k[1777]*y_cur[IDX_CH3CCHI]; - data[jistart + 3407] = 0.0 + k[1858]*y_cur[IDX_CI]; - data[jistart + 3408] = 0.0 + k[1859]*y_cur[IDX_CI]; - data[jistart + 3409] = 0.0 - k[4134]*y_cur[IDX_C4H2II]; - data[jistart + 3410] = 0.0 - k[4169]*y_cur[IDX_C4H2II]; - data[jistart + 3411] = 0.0 + k[1586]*y_cur[IDX_C2H3II] + - k[1830]*y_cur[IDX_C4HII] - k[1843]*y_cur[IDX_C4H2II] + - k[2610]*y_cur[IDX_H3II] + k[2780]*y_cur[IDX_H3OII] + - k[2915]*y_cur[IDX_HCOII]; - data[jistart + 3412] = 0.0 + k[1830]*y_cur[IDX_C4HI] + - k[2412]*y_cur[IDX_H2I] + k[2869]*y_cur[IDX_HCNI]; - data[jistart + 3413] = 0.0 - k[4204]*y_cur[IDX_C4H2II]; - data[jistart + 3414] = 0.0 + k[177]*y_cur[IDX_CII] + - k[224]*y_cur[IDX_C2H2II] + k[384]*y_cur[IDX_HII] + - k[493]*y_cur[IDX_HC3NII] + k[704]*y_cur[IDX_SII] - - k[1837]*y_cur[IDX_C4H2II] - k[1838]*y_cur[IDX_C4H2II] - - k[5518]*y_cur[IDX_C4H2II] + k[5848] + k[6173]; - data[jistart + 3415] = 0.0 - k[622]*y_cur[IDX_NOI] - - k[822]*y_cur[IDX_eM] - k[823]*y_cur[IDX_eM] - - k[1552]*y_cur[IDX_C2H2I] - k[1633]*y_cur[IDX_C2H3I] - - k[1634]*y_cur[IDX_C2H3I] - k[1696]*y_cur[IDX_C2H4I] - - k[1697]*y_cur[IDX_C2H4I] - k[1736]*y_cur[IDX_C2HI] - - k[1788]*y_cur[IDX_C3H2I] - k[1824]*y_cur[IDX_C3HI] - - k[1835]*y_cur[IDX_C5H2I] - k[1836]*y_cur[IDX_C5HI] - - k[1837]*y_cur[IDX_C4H2I] - k[1838]*y_cur[IDX_C4H2I] - - k[1843]*y_cur[IDX_C4HI] - k[1863]*y_cur[IDX_CI] - - k[1864]*y_cur[IDX_CI] - k[2033]*y_cur[IDX_CH2CCHI] - - k[2034]*y_cur[IDX_CH2CCHI] - k[2106]*y_cur[IDX_CH3CCHI] - - k[2107]*y_cur[IDX_CH3CCHI] - k[2169]*y_cur[IDX_CH4I] - - k[2170]*y_cur[IDX_CH4I] - k[2479]*y_cur[IDX_H2CCCI] - - k[3405]*y_cur[IDX_NI] - k[3406]*y_cur[IDX_NI] - - k[3407]*y_cur[IDX_NI] - k[3701]*y_cur[IDX_OI] - - k[3702]*y_cur[IDX_OI] - k[3815]*y_cur[IDX_PI] - - k[3836]*y_cur[IDX_SI] - k[3877]*y_cur[IDX_SiI] - - k[3878]*y_cur[IDX_SiI] - k[3889]*y_cur[IDX_CM] - - k[3924]*y_cur[IDX_C10M] - k[3959]*y_cur[IDX_C10HM] - - k[3994]*y_cur[IDX_C2M] - k[4029]*y_cur[IDX_C2HM] - - k[4064]*y_cur[IDX_C3M] - k[4099]*y_cur[IDX_C3HM] - - k[4134]*y_cur[IDX_C3NM] - k[4169]*y_cur[IDX_C4M] - - k[4204]*y_cur[IDX_C4HM] - k[4239]*y_cur[IDX_C5M] - - k[4274]*y_cur[IDX_C5HM] - k[4309]*y_cur[IDX_C5NM] - - k[4344]*y_cur[IDX_C6M] - k[4379]*y_cur[IDX_C6HM] - - k[4414]*y_cur[IDX_C7M] - k[4449]*y_cur[IDX_C7HM] - - k[4484]*y_cur[IDX_C8M] - k[4519]*y_cur[IDX_C8HM] - - k[4554]*y_cur[IDX_C9M] - k[4589]*y_cur[IDX_C9HM] - - k[4624]*y_cur[IDX_CHM] - k[4659]*y_cur[IDX_CNM] - - k[4694]*y_cur[IDX_HM] - k[4730]*y_cur[IDX_OM] - - k[4765]*y_cur[IDX_O2M] - k[4800]*y_cur[IDX_OHM] - - k[4835]*y_cur[IDX_SM] - k[5511]*y_cur[IDX_C2H2I] - - k[5517]*y_cur[IDX_HC3NI] - k[5518]*y_cur[IDX_C4H2I] - - k[5519]*y_cur[IDX_HC5NI] - k[5570]*y_cur[IDX_HI] - - k[6627]*y_cur[IDX_GRAINM] - k[6628]*y_cur[IDX_GRAINM]; - data[jistart + 3416] = 0.0 + k[2302]*y_cur[IDX_HII] + - k[3110]*y_cur[IDX_HeII]; - data[jistart + 3417] = 0.0 + k[2176]*y_cur[IDX_CH4I]; - data[jistart + 3418] = 0.0 - k[4239]*y_cur[IDX_C4H2II]; - data[jistart + 3419] = 0.0 - k[1836]*y_cur[IDX_C4H2II]; - data[jistart + 3420] = 0.0 - k[4274]*y_cur[IDX_C4H2II]; - data[jistart + 3421] = 0.0 - k[1835]*y_cur[IDX_C4H2II]; - data[jistart + 3422] = 0.0 - k[4309]*y_cur[IDX_C4H2II]; - data[jistart + 3423] = 0.0 - k[4344]*y_cur[IDX_C4H2II]; - data[jistart + 3424] = 0.0 - k[4379]*y_cur[IDX_C4H2II]; - data[jistart + 3425] = 0.0 - k[4414]*y_cur[IDX_C4H2II]; - data[jistart + 3426] = 0.0 - k[4449]*y_cur[IDX_C4H2II]; - data[jistart + 3427] = 0.0 - k[4484]*y_cur[IDX_C4H2II]; - data[jistart + 3428] = 0.0 - k[4519]*y_cur[IDX_C4H2II]; - data[jistart + 3429] = 0.0 - k[4554]*y_cur[IDX_C4H2II]; - data[jistart + 3430] = 0.0 - k[4589]*y_cur[IDX_C4H2II]; - data[jistart + 3431] = 0.0 - k[4624]*y_cur[IDX_C4H2II]; - data[jistart + 3432] = 0.0 + k[1347]*y_cur[IDX_CII] - - k[2033]*y_cur[IDX_C4H2II] - k[2034]*y_cur[IDX_C4H2II]; - data[jistart + 3433] = 0.0 + k[1893]*y_cur[IDX_CI]; - data[jistart + 3434] = 0.0 + k[1345]*y_cur[IDX_CII] + - k[1771]*y_cur[IDX_C3H2II]; - data[jistart + 3435] = 0.0 + k[2051]*y_cur[IDX_C3HI]; - data[jistart + 3436] = 0.0 + k[1365]*y_cur[IDX_CII] + - k[1777]*y_cur[IDX_C3H2II] - k[2106]*y_cur[IDX_C4H2II] - - k[2107]*y_cur[IDX_C4H2II]; - data[jistart + 3437] = 0.0 + k[2158]*y_cur[IDX_C3II] - - k[2169]*y_cur[IDX_C4H2II] - k[2170]*y_cur[IDX_C4H2II] + - k[2176]*y_cur[IDX_C5II]; - data[jistart + 3438] = 0.0 - k[4659]*y_cur[IDX_C4H2II]; - data[jistart + 3439] = 0.0 - k[6627]*y_cur[IDX_C4H2II] - - k[6628]*y_cur[IDX_C4H2II]; - data[jistart + 3440] = 0.0 - k[5570]*y_cur[IDX_C4H2II]; - data[jistart + 3441] = 0.0 + k[384]*y_cur[IDX_C4H2I] + - k[2302]*y_cur[IDX_C4H3I]; - data[jistart + 3442] = 0.0 - k[4694]*y_cur[IDX_C4H2II]; - data[jistart + 3443] = 0.0 + k[2412]*y_cur[IDX_C4HII]; - data[jistart + 3444] = 0.0 - k[2479]*y_cur[IDX_C4H2II]; - data[jistart + 3445] = 0.0 + k[2610]*y_cur[IDX_C4HI]; - data[jistart + 3446] = 0.0 + k[2780]*y_cur[IDX_C4HI]; - data[jistart + 3447] = 0.0 + k[1471]*y_cur[IDX_C2HII] - - k[5517]*y_cur[IDX_C4H2II]; - data[jistart + 3448] = 0.0 + k[493]*y_cur[IDX_C4H2I] + - k[1565]*y_cur[IDX_C2H2I]; - data[jistart + 3449] = 0.0 - k[5519]*y_cur[IDX_C4H2II]; - data[jistart + 3450] = 0.0 + k[2869]*y_cur[IDX_C4HII]; - data[jistart + 3451] = 0.0 + k[2915]*y_cur[IDX_C4HI]; - data[jistart + 3452] = 0.0 + k[3110]*y_cur[IDX_C4H3I]; - data[jistart + 3453] = 0.0 - k[3405]*y_cur[IDX_C4H2II] - - k[3406]*y_cur[IDX_C4H2II] - k[3407]*y_cur[IDX_C4H2II]; - data[jistart + 3454] = 0.0 - k[622]*y_cur[IDX_C4H2II]; - data[jistart + 3455] = 0.0 - k[3701]*y_cur[IDX_C4H2II] - - k[3702]*y_cur[IDX_C4H2II]; - data[jistart + 3456] = 0.0 - k[4730]*y_cur[IDX_C4H2II]; - data[jistart + 3457] = 0.0 - k[4765]*y_cur[IDX_C4H2II]; - data[jistart + 3458] = 0.0 - k[4800]*y_cur[IDX_C4H2II]; - data[jistart + 3459] = 0.0 - k[3815]*y_cur[IDX_C4H2II]; - data[jistart + 3460] = 0.0 - k[3836]*y_cur[IDX_C4H2II]; - data[jistart + 3461] = 0.0 + k[704]*y_cur[IDX_C4H2I]; - data[jistart + 3462] = 0.0 - k[4835]*y_cur[IDX_C4H2II]; - data[jistart + 3463] = 0.0 - k[3877]*y_cur[IDX_C4H2II] - - k[3878]*y_cur[IDX_C4H2II]; - data[jistart + 3464] = 0.0 - k[822]*y_cur[IDX_C4H2II] - - k[823]*y_cur[IDX_C4H2II]; - data[jistart + 3465] = 0.0 - k[4924]*y_cur[IDX_C4H3I] + - k[4946]*y_cur[IDX_CH2CCH2I] + k[4952]*y_cur[IDX_CH3CCHI] + - k[4954]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 3466] = 0.0 - k[155]*y_cur[IDX_C4H3I] - - k[1317]*y_cur[IDX_C4H3I] - k[1318]*y_cur[IDX_C4H3I] - - k[1319]*y_cur[IDX_C4H3I] + k[1328]*y_cur[IDX_C6H6I]; - data[jistart + 3467] = 0.0 + k[3890]*y_cur[IDX_C4H3II]; - data[jistart + 3468] = 0.0 + k[3925]*y_cur[IDX_C4H3II]; - data[jistart + 3469] = 0.0 + k[3960]*y_cur[IDX_C4H3II]; - data[jistart + 3470] = 0.0 + k[4868]*y_cur[IDX_C2H4I]; - data[jistart + 3471] = 0.0 + k[3995]*y_cur[IDX_C4H3II]; - data[jistart + 3472] = 0.0 + k[4030]*y_cur[IDX_C4H3II]; - data[jistart + 3473] = 0.0 + k[4868]*y_cur[IDX_C2I]; - data[jistart + 3474] = 0.0 + k[4065]*y_cur[IDX_C4H3II]; - data[jistart + 3475] = 0.0 + k[4100]*y_cur[IDX_C4H3II]; - data[jistart + 3476] = 0.0 + k[4135]*y_cur[IDX_C4H3II]; - data[jistart + 3477] = 0.0 + k[4170]*y_cur[IDX_C4H3II]; - data[jistart + 3478] = 0.0 + k[4205]*y_cur[IDX_C4H3II]; - data[jistart + 3479] = 0.0 - k[155]*y_cur[IDX_CII] - - k[339]*y_cur[IDX_HII] - k[1317]*y_cur[IDX_CII] - - k[1318]*y_cur[IDX_CII] - k[1319]*y_cur[IDX_CII] - - k[2302]*y_cur[IDX_HII] - k[2609]*y_cur[IDX_H3II] - - k[2779]*y_cur[IDX_H3OII] - k[2914]*y_cur[IDX_HCOII] - - k[3108]*y_cur[IDX_HeII] - k[3109]*y_cur[IDX_HeII] - - k[3110]*y_cur[IDX_HeII] - k[4924]*y_cur[IDX_CI] - k[5730] - k[6014] - - k[6015] - k[7002]; - data[jistart + 3480] = 0.0 + k[3890]*y_cur[IDX_CM] + - k[3925]*y_cur[IDX_C10M] + k[3960]*y_cur[IDX_C10HM] + - k[3995]*y_cur[IDX_C2M] + k[4030]*y_cur[IDX_C2HM] + - k[4065]*y_cur[IDX_C3M] + k[4100]*y_cur[IDX_C3HM] + - k[4135]*y_cur[IDX_C3NM] + k[4170]*y_cur[IDX_C4M] + - k[4205]*y_cur[IDX_C4HM] + k[4240]*y_cur[IDX_C5M] + - k[4275]*y_cur[IDX_C5HM] + k[4310]*y_cur[IDX_C5NM] + - k[4345]*y_cur[IDX_C6M] + k[4380]*y_cur[IDX_C6HM] + - k[4415]*y_cur[IDX_C7M] + k[4450]*y_cur[IDX_C7HM] + - k[4485]*y_cur[IDX_C8M] + k[4520]*y_cur[IDX_C8HM] + - k[4555]*y_cur[IDX_C9M] + k[4590]*y_cur[IDX_C9HM] + - k[4625]*y_cur[IDX_CHM] + k[4660]*y_cur[IDX_CNM] + - k[4695]*y_cur[IDX_HM] + k[4731]*y_cur[IDX_OM] + - k[4766]*y_cur[IDX_O2M] + k[4801]*y_cur[IDX_OHM] + - k[4836]*y_cur[IDX_SM]; - data[jistart + 3481] = 0.0 + k[826]*y_cur[IDX_eM] + - k[6641]*y_cur[IDX_GRAINM]; - data[jistart + 3482] = 0.0 + k[4240]*y_cur[IDX_C4H3II]; - data[jistart + 3483] = 0.0 + k[4275]*y_cur[IDX_C4H3II]; - data[jistart + 3484] = 0.0 + k[4310]*y_cur[IDX_C4H3II]; - data[jistart + 3485] = 0.0 + k[4345]*y_cur[IDX_C4H3II]; - data[jistart + 3486] = 0.0 + k[4380]*y_cur[IDX_C4H3II]; - data[jistart + 3487] = 0.0 + k[1328]*y_cur[IDX_CII]; - data[jistart + 3488] = 0.0 + k[4415]*y_cur[IDX_C4H3II]; - data[jistart + 3489] = 0.0 + k[4450]*y_cur[IDX_C4H3II]; - data[jistart + 3490] = 0.0 + k[4485]*y_cur[IDX_C4H3II]; - data[jistart + 3491] = 0.0 + k[4520]*y_cur[IDX_C4H3II]; - data[jistart + 3492] = 0.0 + k[4555]*y_cur[IDX_C4H3II]; - data[jistart + 3493] = 0.0 + k[4590]*y_cur[IDX_C4H3II]; - data[jistart + 3494] = 0.0 + k[4625]*y_cur[IDX_C4H3II]; - data[jistart + 3495] = 0.0 + k[4946]*y_cur[IDX_CI]; - data[jistart + 3496] = 0.0 + k[4952]*y_cur[IDX_CI]; - data[jistart + 3497] = 0.0 + k[4954]*y_cur[IDX_CI]; - data[jistart + 3498] = 0.0 + k[4660]*y_cur[IDX_C4H3II]; - data[jistart + 3499] = 0.0 + k[8631]*y_cur[IDX_GHI]; - data[jistart + 3500] = 0.0 + k[7184] + k[7366] + k[7548]; - data[jistart + 3501] = 0.0 + k[8631]*y_cur[IDX_GC4H2I]; - data[jistart + 3502] = 0.0 + k[6641]*y_cur[IDX_C4H4II]; - data[jistart + 3503] = 0.0 - k[339]*y_cur[IDX_C4H3I] - - k[2302]*y_cur[IDX_C4H3I]; - data[jistart + 3504] = 0.0 + k[4695]*y_cur[IDX_C4H3II]; - data[jistart + 3505] = 0.0 - k[2609]*y_cur[IDX_C4H3I]; - data[jistart + 3506] = 0.0 - k[2779]*y_cur[IDX_C4H3I]; - data[jistart + 3507] = 0.0 - k[2914]*y_cur[IDX_C4H3I]; - data[jistart + 3508] = 0.0 - k[3108]*y_cur[IDX_C4H3I] - - k[3109]*y_cur[IDX_C4H3I] - k[3110]*y_cur[IDX_C4H3I]; - data[jistart + 3509] = 0.0 + k[4731]*y_cur[IDX_C4H3II]; - data[jistart + 3510] = 0.0 + k[4766]*y_cur[IDX_C4H3II]; - data[jistart + 3511] = 0.0 + k[4801]*y_cur[IDX_C4H3II]; - data[jistart + 3512] = 0.0 + k[4836]*y_cur[IDX_C4H3II]; - data[jistart + 3513] = 0.0 + k[826]*y_cur[IDX_C4H4II]; - data[jistart + 3514] = 0.0 + k[1860]*y_cur[IDX_C3H4II] + - k[1861]*y_cur[IDX_C3H5II] - k[1865]*y_cur[IDX_C4H3II] - - k[1866]*y_cur[IDX_C4H3II]; - data[jistart + 3515] = 0.0 + k[155]*y_cur[IDX_C4H3I] + - k[1355]*y_cur[IDX_CH3C3NI] + k[1377]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 3516] = 0.0 - k[3890]*y_cur[IDX_C4H3II]; - data[jistart + 3517] = 0.0 - k[3925]*y_cur[IDX_C4H3II]; - data[jistart + 3518] = 0.0 - k[3960]*y_cur[IDX_C4H3II]; - data[jistart + 3519] = 0.0 - k[3995]*y_cur[IDX_C4H3II]; - data[jistart + 3520] = 0.0 + k[1728]*y_cur[IDX_C2H3II] + - k[1729]*y_cur[IDX_C2H4II] - k[1737]*y_cur[IDX_C4H3II]; - data[jistart + 3521] = 0.0 - k[4030]*y_cur[IDX_C4H3II]; - data[jistart + 3522] = 0.0 + k[1480]*y_cur[IDX_C2H2II] + - k[1535]*y_cur[IDX_C2H3II] - k[5520]*y_cur[IDX_C4H3II]; - data[jistart + 3523] = 0.0 + k[1480]*y_cur[IDX_C2H2I] + - k[1481]*y_cur[IDX_C2H3I]; - data[jistart + 3524] = 0.0 + k[1481]*y_cur[IDX_C2H2II] - - k[1635]*y_cur[IDX_C4H3II] - k[1636]*y_cur[IDX_C4H3II]; - data[jistart + 3525] = 0.0 + k[1535]*y_cur[IDX_C2H2I] + - k[1621]*y_cur[IDX_C4H2I] + k[1728]*y_cur[IDX_C2HI]; - data[jistart + 3526] = 0.0 + k[1694]*y_cur[IDX_C4HII]; - data[jistart + 3527] = 0.0 + k[1649]*y_cur[IDX_C3H2I] + - k[1667]*y_cur[IDX_CH2CCHI] + k[1672]*y_cur[IDX_H2CCCI] + - k[1729]*y_cur[IDX_C2HI]; - data[jistart + 3528] = 0.0 + k[2159]*y_cur[IDX_CH4I]; - data[jistart + 3529] = 0.0 - k[4065]*y_cur[IDX_C4H3II]; - data[jistart + 3530] = 0.0 - k[1825]*y_cur[IDX_C4H3II]; - data[jistart + 3531] = 0.0 + k[2161]*y_cur[IDX_CH4I]; - data[jistart + 3532] = 0.0 - k[4100]*y_cur[IDX_C4H3II]; - data[jistart + 3533] = 0.0 + k[1649]*y_cur[IDX_C2H4II] - - k[1789]*y_cur[IDX_C4H3II] + k[2050]*y_cur[IDX_CH3II]; - data[jistart + 3534] = 0.0 + k[1772]*y_cur[IDX_CH2CCH2I] + - k[1778]*y_cur[IDX_CH3CCHI]; - data[jistart + 3535] = 0.0 + k[1860]*y_cur[IDX_CI]; - data[jistart + 3536] = 0.0 + k[1861]*y_cur[IDX_CI]; - data[jistart + 3537] = 0.0 - k[4135]*y_cur[IDX_C4H3II]; - data[jistart + 3538] = 0.0 - k[4170]*y_cur[IDX_C4H3II]; - data[jistart + 3539] = 0.0 - k[1844]*y_cur[IDX_C4H3II]; - data[jistart + 3540] = 0.0 + k[1694]*y_cur[IDX_C2H4I]; - data[jistart + 3541] = 0.0 - k[4205]*y_cur[IDX_C4H3II]; - data[jistart + 3542] = 0.0 + k[1621]*y_cur[IDX_C2H3II] + - k[2690]*y_cur[IDX_H3II] + k[2764]*y_cur[IDX_H3COII] + - k[2805]*y_cur[IDX_H3OII] - k[2850]*y_cur[IDX_C4H3II] + - k[2965]*y_cur[IDX_HCOII] - k[5576]*y_cur[IDX_C4H3II]; - data[jistart + 3543] = 0.0 + k[5570]*y_cur[IDX_HI]; - data[jistart + 3544] = 0.0 + k[155]*y_cur[IDX_CII] + - k[339]*y_cur[IDX_HII]; - data[jistart + 3545] = 0.0 - k[824]*y_cur[IDX_eM] - - k[825]*y_cur[IDX_eM] - k[1635]*y_cur[IDX_C2H3I] - - k[1636]*y_cur[IDX_C2H3I] - k[1737]*y_cur[IDX_C2HI] - - k[1789]*y_cur[IDX_C3H2I] - k[1825]*y_cur[IDX_C3HI] - - k[1839]*y_cur[IDX_C5H2I] - k[1840]*y_cur[IDX_C5H2I] - - k[1841]*y_cur[IDX_C5HI] - k[1844]*y_cur[IDX_C4HI] - - k[1865]*y_cur[IDX_CI] - k[1866]*y_cur[IDX_CI] - - k[2035]*y_cur[IDX_CH2CCHI] - k[2036]*y_cur[IDX_CH2CCHI] - - k[2108]*y_cur[IDX_CH3CCHI] - k[2124]*y_cur[IDX_CH3OHI] - - k[2171]*y_cur[IDX_CH4I] - k[2480]*y_cur[IDX_H2CCCI] - - k[2850]*y_cur[IDX_C4H2I] - k[3837]*y_cur[IDX_SI] - - k[3890]*y_cur[IDX_CM] - k[3925]*y_cur[IDX_C10M] - - k[3960]*y_cur[IDX_C10HM] - k[3995]*y_cur[IDX_C2M] - - k[4030]*y_cur[IDX_C2HM] - k[4065]*y_cur[IDX_C3M] - - k[4100]*y_cur[IDX_C3HM] - k[4135]*y_cur[IDX_C3NM] - - k[4170]*y_cur[IDX_C4M] - k[4205]*y_cur[IDX_C4HM] - - k[4240]*y_cur[IDX_C5M] - k[4275]*y_cur[IDX_C5HM] - - k[4310]*y_cur[IDX_C5NM] - k[4345]*y_cur[IDX_C6M] - - k[4380]*y_cur[IDX_C6HM] - k[4415]*y_cur[IDX_C7M] - - k[4450]*y_cur[IDX_C7HM] - k[4485]*y_cur[IDX_C8M] - - k[4520]*y_cur[IDX_C8HM] - k[4555]*y_cur[IDX_C9M] - - k[4590]*y_cur[IDX_C9HM] - k[4625]*y_cur[IDX_CHM] - - k[4660]*y_cur[IDX_CNM] - k[4695]*y_cur[IDX_HM] - - k[4731]*y_cur[IDX_OM] - k[4766]*y_cur[IDX_O2M] - - k[4801]*y_cur[IDX_OHM] - k[4836]*y_cur[IDX_SM] - - k[5520]*y_cur[IDX_C2H2I] - k[5571]*y_cur[IDX_HI] - - k[5576]*y_cur[IDX_C4H2I] - k[6633]*y_cur[IDX_GRAINM] - - k[6634]*y_cur[IDX_GRAINM]; - data[jistart + 3546] = 0.0 + k[2173]*y_cur[IDX_CH4I]; - data[jistart + 3547] = 0.0 - k[4240]*y_cur[IDX_C4H3II]; - data[jistart + 3548] = 0.0 - k[1841]*y_cur[IDX_C4H3II]; - data[jistart + 3549] = 0.0 - k[4275]*y_cur[IDX_C4H3II]; - data[jistart + 3550] = 0.0 - k[1839]*y_cur[IDX_C4H3II] - - k[1840]*y_cur[IDX_C4H3II]; - data[jistart + 3551] = 0.0 - k[4310]*y_cur[IDX_C4H3II]; - data[jistart + 3552] = 0.0 - k[4345]*y_cur[IDX_C4H3II]; - data[jistart + 3553] = 0.0 - k[4380]*y_cur[IDX_C4H3II]; - data[jistart + 3554] = 0.0 - k[4415]*y_cur[IDX_C4H3II]; - data[jistart + 3555] = 0.0 - k[4450]*y_cur[IDX_C4H3II]; - data[jistart + 3556] = 0.0 - k[4485]*y_cur[IDX_C4H3II]; - data[jistart + 3557] = 0.0 - k[4520]*y_cur[IDX_C4H3II]; - data[jistart + 3558] = 0.0 - k[4555]*y_cur[IDX_C4H3II]; - data[jistart + 3559] = 0.0 - k[4590]*y_cur[IDX_C4H3II]; - data[jistart + 3560] = 0.0 - k[4625]*y_cur[IDX_C4H3II]; - data[jistart + 3561] = 0.0 + k[1667]*y_cur[IDX_C2H4II] - - k[2035]*y_cur[IDX_C4H3II] - k[2036]*y_cur[IDX_C4H3II]; - data[jistart + 3562] = 0.0 + k[1772]*y_cur[IDX_C3H2II]; - data[jistart + 3563] = 0.0 + k[2050]*y_cur[IDX_C3H2I] + - k[2076]*y_cur[IDX_H2CCCI]; - data[jistart + 3564] = 0.0 + k[1355]*y_cur[IDX_CII]; - data[jistart + 3565] = 0.0 + k[1778]*y_cur[IDX_C3H2II] - - k[2108]*y_cur[IDX_C4H3II]; - data[jistart + 3566] = 0.0 + k[1377]*y_cur[IDX_CII]; - data[jistart + 3567] = 0.0 - k[2124]*y_cur[IDX_C4H3II]; - data[jistart + 3568] = 0.0 + k[2159]*y_cur[IDX_C3II] + - k[2161]*y_cur[IDX_C3HII] - k[2171]*y_cur[IDX_C4H3II] + - k[2173]*y_cur[IDX_C4NII]; - data[jistart + 3569] = 0.0 - k[4660]*y_cur[IDX_C4H3II]; - data[jistart + 3570] = 0.0 - k[6633]*y_cur[IDX_C4H3II] - - k[6634]*y_cur[IDX_C4H3II]; - data[jistart + 3571] = 0.0 + k[5570]*y_cur[IDX_C4H2II] - - k[5571]*y_cur[IDX_C4H3II]; - data[jistart + 3572] = 0.0 + k[339]*y_cur[IDX_C4H3I]; - data[jistart + 3573] = 0.0 - k[4695]*y_cur[IDX_C4H3II]; - data[jistart + 3574] = 0.0 + k[1672]*y_cur[IDX_C2H4II] + - k[2076]*y_cur[IDX_CH3II] - k[2480]*y_cur[IDX_C4H3II]; - data[jistart + 3575] = 0.0 + k[2690]*y_cur[IDX_C4H2I]; - data[jistart + 3576] = 0.0 + k[2764]*y_cur[IDX_C4H2I]; - data[jistart + 3577] = 0.0 + k[2805]*y_cur[IDX_C4H2I]; - data[jistart + 3578] = 0.0 + k[2965]*y_cur[IDX_C4H2I]; - data[jistart + 3579] = 0.0 - k[4731]*y_cur[IDX_C4H3II]; - data[jistart + 3580] = 0.0 - k[4766]*y_cur[IDX_C4H3II]; - data[jistart + 3581] = 0.0 - k[4801]*y_cur[IDX_C4H3II]; - data[jistart + 3582] = 0.0 - k[3837]*y_cur[IDX_C4H3II]; - data[jistart + 3583] = 0.0 - k[4836]*y_cur[IDX_C4H3II]; - data[jistart + 3584] = 0.0 - k[824]*y_cur[IDX_C4H3II] - - k[825]*y_cur[IDX_C4H3II]; - data[jistart + 3585] = 0.0 - k[1553]*y_cur[IDX_C4H4II] - - k[1554]*y_cur[IDX_C4H4II]; - data[jistart + 3586] = 0.0 + k[1773]*y_cur[IDX_CH2CCH2I] + - k[1779]*y_cur[IDX_CH3CCHI]; - data[jistart + 3587] = 0.0 + k[1808]*y_cur[IDX_CH2CCH2I]; - data[jistart + 3588] = 0.0 - k[2851]*y_cur[IDX_C4H4II]; - data[jistart + 3589] = 0.0 + k[2609]*y_cur[IDX_H3II] + - k[2779]*y_cur[IDX_H3OII] + k[2914]*y_cur[IDX_HCOII]; - data[jistart + 3590] = 0.0 + k[5571]*y_cur[IDX_HI]; - data[jistart + 3591] = 0.0 - k[826]*y_cur[IDX_eM] - - k[1553]*y_cur[IDX_C2H2I] - k[1554]*y_cur[IDX_C2H2I] - - k[2851]*y_cur[IDX_C4H2I] - k[6641]*y_cur[IDX_GRAINM]; - data[jistart + 3592] = 0.0 + k[1773]*y_cur[IDX_C3H2II] + - k[1808]*y_cur[IDX_C3H4II]; - data[jistart + 3593] = 0.0 + k[1779]*y_cur[IDX_C3H2II]; - data[jistart + 3594] = 0.0 - k[6641]*y_cur[IDX_C4H4II]; - data[jistart + 3595] = 0.0 + k[5571]*y_cur[IDX_C4H3II]; - data[jistart + 3596] = 0.0 + k[2609]*y_cur[IDX_C4H3I]; - data[jistart + 3597] = 0.0 + k[2779]*y_cur[IDX_C4H3I]; - data[jistart + 3598] = 0.0 + k[2914]*y_cur[IDX_C4H3I]; - data[jistart + 3599] = 0.0 - k[826]*y_cur[IDX_C4H4II]; - data[jistart + 3600] = 0.0 + k[1537]*y_cur[IDX_C2H4II] + - k[1539]*y_cur[IDX_C2H5II]; - data[jistart + 3601] = 0.0 + k[1483]*y_cur[IDX_C2H4I]; - data[jistart + 3602] = 0.0 + k[1483]*y_cur[IDX_C2H2II]; - data[jistart + 3603] = 0.0 + k[1537]*y_cur[IDX_C2H2I] + - k[1669]*y_cur[IDX_CH3CCHI]; - data[jistart + 3604] = 0.0 + k[1539]*y_cur[IDX_C2H2I]; - data[jistart + 3605] = 0.0 - k[827]*y_cur[IDX_eM] - - k[828]*y_cur[IDX_eM] - k[829]*y_cur[IDX_eM] - k[3408]*y_cur[IDX_NI] - - k[6645]*y_cur[IDX_GRAINM] - k[6646]*y_cur[IDX_GRAINM] - - k[6647]*y_cur[IDX_GRAINM]; - data[jistart + 3606] = 0.0 + k[2061]*y_cur[IDX_CH3II]; - data[jistart + 3607] = 0.0 + k[2061]*y_cur[IDX_CH2CCHI]; - data[jistart + 3608] = 0.0 + k[1669]*y_cur[IDX_C2H4II]; - data[jistart + 3609] = 0.0 - k[6645]*y_cur[IDX_C4H5II] - - k[6646]*y_cur[IDX_C4H5II] - k[6647]*y_cur[IDX_C4H5II]; - data[jistart + 3610] = 0.0 - k[3408]*y_cur[IDX_C4H5II]; - data[jistart + 3611] = 0.0 - k[827]*y_cur[IDX_C4H5II] - - k[828]*y_cur[IDX_C4H5II] - k[829]*y_cur[IDX_C4H5II]; - data[jistart + 3612] = 0.0 + k[4883]*y_cur[IDX_C2H4I]; - data[jistart + 3613] = 0.0 + k[4883]*y_cur[IDX_C2H3I]; - data[jistart + 3614] = 0.0 - k[5024]*y_cur[IDX_HI] - k[5786] - - k[6087] - k[7009]; - data[jistart + 3615] = 0.0 + k[1842]*y_cur[IDX_CH3CNI]; - data[jistart + 3616] = 0.0 + k[5072]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 3617] = 0.0 + k[5072]*y_cur[IDX_CHI]; - data[jistart + 3618] = 0.0 + k[1842]*y_cur[IDX_C4H7II]; - data[jistart + 3619] = 0.0 + k[7191] + k[7373] + k[7555]; - data[jistart + 3620] = 0.0 - k[5024]*y_cur[IDX_C4H6I]; - data[jistart + 3621] = 0.0 + k[1564]*y_cur[IDX_C2H6II]; - data[jistart + 3622] = 0.0 + k[1615]*y_cur[IDX_C2H6I]; - data[jistart + 3623] = 0.0 + k[1648]*y_cur[IDX_C2H4II]; - data[jistart + 3624] = 0.0 + k[1648]*y_cur[IDX_C2H4I]; - data[jistart + 3625] = 0.0 + k[1615]*y_cur[IDX_C2H3II]; - data[jistart + 3626] = 0.0 + k[1564]*y_cur[IDX_C2H2I]; - data[jistart + 3627] = 0.0 + k[1815]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 3628] = 0.0 + k[1817]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 3629] = 0.0 - k[830]*y_cur[IDX_eM] - - k[1842]*y_cur[IDX_CH3CNI] - k[6667]*y_cur[IDX_GRAINM]; - data[jistart + 3630] = 0.0 + k[1815]*y_cur[IDX_C3H5II] + - k[1817]*y_cur[IDX_C3H6II]; - data[jistart + 3631] = 0.0 - k[1842]*y_cur[IDX_C4H7II]; - data[jistart + 3632] = 0.0 - k[6667]*y_cur[IDX_C4H7II]; - data[jistart + 3633] = 0.0 - k[830]*y_cur[IDX_C4H7II]; - data[jistart + 3634] = 0.0 + k[42]*y_cur[IDX_C3NM]; - data[jistart + 3635] = 0.0 + k[42]*y_cur[IDX_CI]; - data[jistart + 3636] = 0.0 + k[114]*y_cur[IDX_NI]; - data[jistart + 3637] = 0.0 + k[5236]*y_cur[IDX_NI]; - data[jistart + 3638] = 0.0 - k[5237]*y_cur[IDX_NI] - - k[5363]*y_cur[IDX_OI] - k[5733] - k[6018] - k[6019] - k[7030]; - data[jistart + 3639] = 0.0 + k[5241]*y_cur[IDX_NI] + - k[5367]*y_cur[IDX_OI]; - data[jistart + 3640] = 0.0 + k[131]*y_cur[IDX_OI]; - data[jistart + 3641] = 0.0 + k[7212] + k[7394] + k[7576]; - data[jistart + 3642] = 0.0 + k[114]*y_cur[IDX_C4M] + - k[5236]*y_cur[IDX_C4HI] - k[5237]*y_cur[IDX_C4NI] + - k[5241]*y_cur[IDX_C5NI]; - data[jistart + 3643] = 0.0 + k[131]*y_cur[IDX_C5NM] - - k[5363]*y_cur[IDX_C4NI] + k[5367]*y_cur[IDX_C5NI]; - data[jistart + 3644] = 0.0 + k[1401]*y_cur[IDX_HC3NI] + - k[3019]*y_cur[IDX_HNC3I]; - data[jistart + 3645] = 0.0 - k[1555]*y_cur[IDX_C4NII]; - data[jistart + 3646] = 0.0 + k[2868]*y_cur[IDX_HCNI]; - data[jistart + 3647] = 0.0 - k[831]*y_cur[IDX_eM] - - k[832]*y_cur[IDX_eM] - k[1555]*y_cur[IDX_C2H2I] - - k[2172]*y_cur[IDX_CH4I] - k[2173]*y_cur[IDX_CH4I] - - k[2174]*y_cur[IDX_CH4I] - k[2175]*y_cur[IDX_CH4I] - - k[2413]*y_cur[IDX_H2I] - k[2532]*y_cur[IDX_H2OI] - - k[2533]*y_cur[IDX_H2OI] - k[6740]*y_cur[IDX_GRAINM] - - k[6741]*y_cur[IDX_GRAINM]; - data[jistart + 3648] = 0.0 - k[2172]*y_cur[IDX_C4NII] - - k[2173]*y_cur[IDX_C4NII] - k[2174]*y_cur[IDX_C4NII] - - k[2175]*y_cur[IDX_C4NII]; - data[jistart + 3649] = 0.0 - k[6740]*y_cur[IDX_C4NII] - - k[6741]*y_cur[IDX_C4NII]; - data[jistart + 3650] = 0.0 - k[2413]*y_cur[IDX_C4NII]; - data[jistart + 3651] = 0.0 - k[2532]*y_cur[IDX_C4NII] - - k[2533]*y_cur[IDX_C4NII]; - data[jistart + 3652] = 0.0 + k[1401]*y_cur[IDX_CII]; - data[jistart + 3653] = 0.0 + k[2868]*y_cur[IDX_C3II]; - data[jistart + 3654] = 0.0 + k[3019]*y_cur[IDX_CII]; - data[jistart + 3655] = 0.0 - k[831]*y_cur[IDX_C4NII] - - k[832]*y_cur[IDX_C4NII]; - data[jistart + 3656] = 0.0 - k[1321]*y_cur[IDX_C4PI]; - data[jistart + 3657] = 0.0 - k[341]*y_cur[IDX_HII] - - k[1321]*y_cur[IDX_CII] - k[2611]*y_cur[IDX_H3II] - - k[2781]*y_cur[IDX_H3OII] - k[2916]*y_cur[IDX_HCOII] - - k[3113]*y_cur[IDX_HeII] - k[3114]*y_cur[IDX_HeII] - - k[5364]*y_cur[IDX_OI] - k[5734] - k[6020] - k[7048]; - data[jistart + 3658] = 0.0 + k[7230] + k[7412] + k[7594]; - data[jistart + 3659] = 0.0 + k[6812]*y_cur[IDX_PC4HII]; - data[jistart + 3660] = 0.0 - k[341]*y_cur[IDX_C4PI]; - data[jistart + 3661] = 0.0 - k[2611]*y_cur[IDX_C4PI]; - data[jistart + 3662] = 0.0 - k[2781]*y_cur[IDX_C4PI]; - data[jistart + 3663] = 0.0 - k[2916]*y_cur[IDX_C4PI]; - data[jistart + 3664] = 0.0 - k[3113]*y_cur[IDX_C4PI] - - k[3114]*y_cur[IDX_C4PI]; - data[jistart + 3665] = 0.0 - k[5364]*y_cur[IDX_C4PI]; - data[jistart + 3666] = 0.0 + k[1194]*y_cur[IDX_eM] + - k[6812]*y_cur[IDX_GRAINM]; - data[jistart + 3667] = 0.0 + k[1194]*y_cur[IDX_PC4HII]; - data[jistart + 3668] = 0.0 + k[341]*y_cur[IDX_HII]; - data[jistart + 3669] = 0.0 - k[833]*y_cur[IDX_eM] - - k[834]*y_cur[IDX_eM] - k[6809]*y_cur[IDX_GRAINM] - - k[6810]*y_cur[IDX_GRAINM]; - data[jistart + 3670] = 0.0 - k[6809]*y_cur[IDX_C4PII] - - k[6810]*y_cur[IDX_C4PII]; - data[jistart + 3671] = 0.0 + k[341]*y_cur[IDX_C4PI]; - data[jistart + 3672] = 0.0 - k[833]*y_cur[IDX_C4PII] - - k[834]*y_cur[IDX_C4PII]; - data[jistart + 3673] = 0.0 - k[156]*y_cur[IDX_C4SI] - - k[1322]*y_cur[IDX_C4SI]; - data[jistart + 3674] = 0.0 + k[3891]*y_cur[IDX_C4SII]; - data[jistart + 3675] = 0.0 + k[3926]*y_cur[IDX_C4SII]; - data[jistart + 3676] = 0.0 + k[3961]*y_cur[IDX_C4SII]; - data[jistart + 3677] = 0.0 + k[3996]*y_cur[IDX_C4SII]; - data[jistart + 3678] = 0.0 + k[4031]*y_cur[IDX_C4SII]; - data[jistart + 3679] = 0.0 + k[4066]*y_cur[IDX_C4SII]; - data[jistart + 3680] = 0.0 + k[4101]*y_cur[IDX_C4SII]; - data[jistart + 3681] = 0.0 + k[4136]*y_cur[IDX_C4SII]; - data[jistart + 3682] = 0.0 + k[4171]*y_cur[IDX_C4SII]; - data[jistart + 3683] = 0.0 + k[4206]*y_cur[IDX_C4SII]; - data[jistart + 3684] = 0.0 - k[156]*y_cur[IDX_CII] - - k[342]*y_cur[IDX_HII] - k[1322]*y_cur[IDX_CII] - - k[2612]*y_cur[IDX_H3II] - k[2782]*y_cur[IDX_H3OII] - - k[2917]*y_cur[IDX_HCOII] - k[3115]*y_cur[IDX_HeII] - - k[3116]*y_cur[IDX_HeII] - k[5735] - k[6021] - k[7049]; - data[jistart + 3685] = 0.0 + k[3891]*y_cur[IDX_CM] + - k[3926]*y_cur[IDX_C10M] + k[3961]*y_cur[IDX_C10HM] + - k[3996]*y_cur[IDX_C2M] + k[4031]*y_cur[IDX_C2HM] + - k[4066]*y_cur[IDX_C3M] + k[4101]*y_cur[IDX_C3HM] + - k[4136]*y_cur[IDX_C3NM] + k[4171]*y_cur[IDX_C4M] + - k[4206]*y_cur[IDX_C4HM] + k[4241]*y_cur[IDX_C5M] + - k[4276]*y_cur[IDX_C5HM] + k[4311]*y_cur[IDX_C5NM] + - k[4346]*y_cur[IDX_C6M] + k[4381]*y_cur[IDX_C6HM] + - k[4416]*y_cur[IDX_C7M] + k[4451]*y_cur[IDX_C7HM] + - k[4486]*y_cur[IDX_C8M] + k[4521]*y_cur[IDX_C8HM] + - k[4556]*y_cur[IDX_C9M] + k[4591]*y_cur[IDX_C9HM] + - k[4626]*y_cur[IDX_CHM] + k[4661]*y_cur[IDX_CNM] + - k[4696]*y_cur[IDX_HM] + k[4732]*y_cur[IDX_OM] + - k[4767]*y_cur[IDX_O2M] + k[4802]*y_cur[IDX_OHM] + - k[4837]*y_cur[IDX_SM]; - data[jistart + 3686] = 0.0 + k[4241]*y_cur[IDX_C4SII]; - data[jistart + 3687] = 0.0 + k[4276]*y_cur[IDX_C4SII]; - data[jistart + 3688] = 0.0 + k[4311]*y_cur[IDX_C4SII]; - data[jistart + 3689] = 0.0 + k[4346]*y_cur[IDX_C4SII]; - data[jistart + 3690] = 0.0 + k[4381]*y_cur[IDX_C4SII]; - data[jistart + 3691] = 0.0 + k[4416]*y_cur[IDX_C4SII]; - data[jistart + 3692] = 0.0 + k[4451]*y_cur[IDX_C4SII]; - data[jistart + 3693] = 0.0 + k[4486]*y_cur[IDX_C4SII]; - data[jistart + 3694] = 0.0 + k[4521]*y_cur[IDX_C4SII]; - data[jistart + 3695] = 0.0 + k[4556]*y_cur[IDX_C4SII]; - data[jistart + 3696] = 0.0 + k[4591]*y_cur[IDX_C4SII]; - data[jistart + 3697] = 0.0 + k[4626]*y_cur[IDX_C4SII]; - data[jistart + 3698] = 0.0 + k[4661]*y_cur[IDX_C4SII]; - data[jistart + 3699] = 0.0 + k[7231] + k[7413] + k[7595]; - data[jistart + 3700] = 0.0 + k[6820]*y_cur[IDX_HC4SII]; - data[jistart + 3701] = 0.0 - k[342]*y_cur[IDX_C4SI]; - data[jistart + 3702] = 0.0 + k[4696]*y_cur[IDX_C4SII]; - data[jistart + 3703] = 0.0 - k[2612]*y_cur[IDX_C4SI]; - data[jistart + 3704] = 0.0 - k[2782]*y_cur[IDX_C4SI]; - data[jistart + 3705] = 0.0 + k[1076]*y_cur[IDX_eM] + - k[6820]*y_cur[IDX_GRAINM]; - data[jistart + 3706] = 0.0 - k[2917]*y_cur[IDX_C4SI]; - data[jistart + 3707] = 0.0 - k[3115]*y_cur[IDX_C4SI] - - k[3116]*y_cur[IDX_C4SI]; - data[jistart + 3708] = 0.0 + k[4732]*y_cur[IDX_C4SII]; - data[jistart + 3709] = 0.0 + k[4767]*y_cur[IDX_C4SII]; - data[jistart + 3710] = 0.0 + k[4802]*y_cur[IDX_C4SII]; - data[jistart + 3711] = 0.0 + k[4837]*y_cur[IDX_C4SII]; - data[jistart + 3712] = 0.0 + k[1076]*y_cur[IDX_HC4SII]; - data[jistart + 3713] = 0.0 + k[156]*y_cur[IDX_C4SI]; - data[jistart + 3714] = 0.0 - k[3891]*y_cur[IDX_C4SII]; - data[jistart + 3715] = 0.0 - k[3926]*y_cur[IDX_C4SII]; - data[jistart + 3716] = 0.0 - k[3961]*y_cur[IDX_C4SII]; - data[jistart + 3717] = 0.0 - k[3996]*y_cur[IDX_C4SII]; - data[jistart + 3718] = 0.0 - k[4031]*y_cur[IDX_C4SII]; - data[jistart + 3719] = 0.0 - k[4066]*y_cur[IDX_C4SII]; - data[jistart + 3720] = 0.0 - k[4101]*y_cur[IDX_C4SII]; - data[jistart + 3721] = 0.0 - k[4136]*y_cur[IDX_C4SII]; - data[jistart + 3722] = 0.0 - k[4171]*y_cur[IDX_C4SII]; - data[jistart + 3723] = 0.0 + k[3822]*y_cur[IDX_SII]; - data[jistart + 3724] = 0.0 - k[4206]*y_cur[IDX_C4SII]; - data[jistart + 3725] = 0.0 + k[156]*y_cur[IDX_CII] + - k[342]*y_cur[IDX_HII]; - data[jistart + 3726] = 0.0 - k[835]*y_cur[IDX_eM] - - k[836]*y_cur[IDX_eM] - k[837]*y_cur[IDX_eM] - k[3891]*y_cur[IDX_CM] - - k[3926]*y_cur[IDX_C10M] - k[3961]*y_cur[IDX_C10HM] - + data[jistart + 5630] = 0.0 + k[1513]*y_cur[IDX_C2H2II]; + data[jistart + 5631] = 0.0 + k[161]*y_cur[IDX_CII] + k[669]*y_cur[IDX_O2II] + + k[711]*y_cur[IDX_SOII] - k[1808]*y_cur[IDX_C3H4II] - + k[1809]*y_cur[IDX_C3H4II] - k[1810]*y_cur[IDX_C3H4II] + k[5780] + + k[6080]; + data[jistart + 5632] = 0.0 + k[165]*y_cur[IDX_CII] + k[220]*y_cur[IDX_C2H2II] + + k[365]*y_cur[IDX_HII] - k[1811]*y_cur[IDX_C3H4II] - + k[1812]*y_cur[IDX_C3H4II] - k[1813]*y_cur[IDX_C3H4II] + k[5801] + + k[6105]; + data[jistart + 5633] = 0.0 + k[2152]*y_cur[IDX_CH4I]; + data[jistart + 5634] = 0.0 + k[1691]*y_cur[IDX_C2H4I]; + data[jistart + 5635] = 0.0 + k[669]*y_cur[IDX_CH2CCH2I]; + data[jistart + 5636] = 0.0 + k[1608]*y_cur[IDX_C2H3II] + k[2636]*y_cur[IDX_H3II] + + k[2785]*y_cur[IDX_H3OII] + k[2938]*y_cur[IDX_HCOII]; + data[jistart + 5637] = 0.0 + k[711]*y_cur[IDX_CH2CCH2I]; + data[jistart + 5638] = 0.0 + k[1691]*y_cur[IDX_C3H2II]; + data[jistart + 5639] = 0.0 + k[2044]*y_cur[IDX_CH3II]; + data[jistart + 5640] = 0.0 + k[1608]*y_cur[IDX_CH2CCHI]; + data[jistart + 5641] = 0.0 + k[2152]*y_cur[IDX_C2HII] + k[2154]*y_cur[IDX_C2H2II] + + k[2196]*y_cur[IDX_HC3NII]; + data[jistart + 5642] = 0.0 + k[220]*y_cur[IDX_CH3CCHI] + k[1513]*y_cur[IDX_CH3CNI] + + k[2154]*y_cur[IDX_CH4I]; + data[jistart + 5643] = 0.0 + k[2044]*y_cur[IDX_C2H3I]; + data[jistart + 5644] = 0.0 - k[1547]*y_cur[IDX_C3H4II]; + data[jistart + 5645] = 0.0 - k[3399]*y_cur[IDX_C3H4II]; + data[jistart + 5646] = 0.0 + k[2785]*y_cur[IDX_CH2CCHI]; + data[jistart + 5647] = 0.0 - k[3697]*y_cur[IDX_C3H4II]; + data[jistart + 5648] = 0.0 + k[161]*y_cur[IDX_CH2CCH2I] + k[165]*y_cur[IDX_CH3CCHI]; + data[jistart + 5649] = 0.0 + k[365]*y_cur[IDX_CH3CCHI]; + data[jistart + 5650] = 0.0 - k[1859]*y_cur[IDX_C3H4II] - k[1860]*y_cur[IDX_C3H4II]; + data[jistart + 5651] = 0.0 + k[2938]*y_cur[IDX_CH2CCHI]; + data[jistart + 5652] = 0.0 + k[2636]*y_cur[IDX_CH2CCHI]; + data[jistart + 5653] = 0.0 - k[6477]*y_cur[IDX_C3H4II] - k[6478]*y_cur[IDX_C3H4II] - + k[6479]*y_cur[IDX_C3H4II] - k[6480]*y_cur[IDX_C3H4II]; + data[jistart + 5654] = 0.0 - k[799]*y_cur[IDX_C3H4II] - k[800]*y_cur[IDX_C3H4II] - + k[801]*y_cur[IDX_C3H4II] - k[802]*y_cur[IDX_C3H4II]; + data[jistart + 5655] = 0.0 - k[2832]*y_cur[IDX_C3H4II]; + data[jistart + 5656] = 0.0 + k[1361]*y_cur[IDX_CII]; + data[jistart + 5657] = 0.0 + k[2423]*y_cur[IDX_H2I]; + data[jistart + 5658] = 0.0 + k[1559]*y_cur[IDX_C2H2I]; + data[jistart + 5659] = 0.0 + k[353]*y_cur[IDX_HII] + k[6055]; + data[jistart + 5660] = 0.0 - k[881]*y_cur[IDX_eM] - k[882]*y_cur[IDX_eM] - + k[1881]*y_cur[IDX_CI] - k[1882]*y_cur[IDX_CI] - + k[2188]*y_cur[IDX_CH4I] - k[3719]*y_cur[IDX_OI] - + k[6841]*y_cur[IDX_GRAINM] - k[6842]*y_cur[IDX_GRAINM]; + data[jistart + 5661] = 0.0 + k[1880]*y_cur[IDX_CI]; + data[jistart + 5662] = 0.0 + k[1739]*y_cur[IDX_C2HI]; + data[jistart + 5663] = 0.0 + k[2481]*y_cur[IDX_C5H2II]; + data[jistart + 5664] = 0.0 + k[1495]*y_cur[IDX_C2H2II]; + data[jistart + 5665] = 0.0 + k[1763]*y_cur[IDX_C3H2II]; + data[jistart + 5666] = 0.0 + k[1790]*y_cur[IDX_C3H2I] + k[1826]*y_cur[IDX_C3HI] + + k[2481]*y_cur[IDX_H2CCCI]; + data[jistart + 5667] = 0.0 + k[1790]*y_cur[IDX_C5H2II]; + data[jistart + 5668] = 0.0 + k[1834]*y_cur[IDX_C4H2I]; + data[jistart + 5669] = 0.0 + k[1800]*y_cur[IDX_C5HI]; + data[jistart + 5670] = 0.0 + k[1763]*y_cur[IDX_C5H2I] + k[1766]*y_cur[IDX_C5HI]; + data[jistart + 5671] = 0.0 + k[2627]*y_cur[IDX_H3II] + k[2932]*y_cur[IDX_HCOII]; + data[jistart + 5672] = 0.0 + k[1665]*y_cur[IDX_C2H4II] + k[2058]*y_cur[IDX_CH3II]; + data[jistart + 5673] = 0.0 + k[1665]*y_cur[IDX_C7HI]; + data[jistart + 5674] = 0.0 + k[2024]*y_cur[IDX_C5HI]; + data[jistart + 5675] = 0.0 + k[1498]*y_cur[IDX_C2H2II] + k[1600]*y_cur[IDX_C2H3II]; + data[jistart + 5676] = 0.0 + k[1766]*y_cur[IDX_C3H2II] + k[1800]*y_cur[IDX_C3H3II] + + k[2024]*y_cur[IDX_CH2CCHII]; + data[jistart + 5677] = 0.0 + k[1826]*y_cur[IDX_C5H2II]; + data[jistart + 5678] = 0.0 + k[1843]*y_cur[IDX_C4H2II]; + data[jistart + 5679] = 0.0 + k[1834]*y_cur[IDX_C4HII]; + data[jistart + 5680] = 0.0 + k[1843]*y_cur[IDX_C4HI]; + data[jistart + 5681] = 0.0 + k[1600]*y_cur[IDX_C6HI]; + data[jistart + 5682] = 0.0 - k[2188]*y_cur[IDX_C8H2II]; + data[jistart + 5683] = 0.0 + k[1739]*y_cur[IDX_C6H2II]; + data[jistart + 5684] = 0.0 + k[1495]*y_cur[IDX_C6H2I] + k[1498]*y_cur[IDX_C6HI]; + data[jistart + 5685] = 0.0 + k[2058]*y_cur[IDX_C7HI]; + data[jistart + 5686] = 0.0 + k[1559]*y_cur[IDX_C6HII]; + data[jistart + 5687] = 0.0 - k[3719]*y_cur[IDX_C8H2II]; + data[jistart + 5688] = 0.0 + k[1361]*y_cur[IDX_CH3C6HI]; + data[jistart + 5689] = 0.0 + k[353]*y_cur[IDX_C8H2I]; + data[jistart + 5690] = 0.0 + k[1880]*y_cur[IDX_C7H3II] - k[1881]*y_cur[IDX_C8H2II] - + k[1882]*y_cur[IDX_C8H2II]; + data[jistart + 5691] = 0.0 + k[2932]*y_cur[IDX_C8HI]; + data[jistart + 5692] = 0.0 + k[2627]*y_cur[IDX_C8HI]; + data[jistart + 5693] = 0.0 - k[6841]*y_cur[IDX_C8H2II] - k[6842]*y_cur[IDX_C8H2II]; + data[jistart + 5694] = 0.0 + k[2423]*y_cur[IDX_C8HII]; + data[jistart + 5695] = 0.0 - k[881]*y_cur[IDX_C8H2II] - k[882]*y_cur[IDX_C8H2II]; + data[jistart + 5696] = 0.0 + k[8095]; + data[jistart + 5697] = 0.0 + k[7740] + k[8051]; + data[jistart + 5698] = 0.0 + k[7726] + k[8034]; + data[jistart + 5699] = 0.0 + k[7737] + k[8046]; + data[jistart + 5700] = 0.0 + k[7820] + k[8147]; + data[jistart + 5701] = 0.0 + k[7770] + k[8090]; + data[jistart + 5702] = 0.0 + k[8059]; + data[jistart + 5703] = 0.0 + k[7685]; + data[jistart + 5704] = 0.0 + k[7742] + k[7745] + k[8053] + k[8056]; + data[jistart + 5705] = 0.0 + k[8477]*y_cur[IDX_GCHI] - k[8533]*y_cur[IDX_GCH2I]; + data[jistart + 5706] = 0.0 + k[7681] + k[7968]; + data[jistart + 5707] = 0.0 - k[8528]*y_cur[IDX_GCH2I]; + data[jistart + 5708] = 0.0 + k[7672] + k[7672] + k[7959] + k[7959]; + data[jistart + 5709] = 0.0 + k[7882] + k[8265]; + data[jistart + 5710] = 0.0 + k[7661] + k[7662] + k[7948] + k[7949]; + data[jistart + 5711] = 0.0 + k[7984]; + data[jistart + 5712] = 0.0 + k[7633] + k[7910] + k[7913]; + data[jistart + 5713] = 0.0 - k[8523]*y_cur[IDX_GCH2I] - k[8743]*y_cur[IDX_GCH2I]; + data[jistart + 5714] = 0.0 - k[8518]*y_cur[IDX_GCH2I] - k[8741]*y_cur[IDX_GCH2I]; + data[jistart + 5715] = 0.0 - k[7075] - k[7257] - k[7439] - k[7619] - k[7620] - k[7621] - + k[7622] - k[7896] - k[7897] - k[7898] - k[7899] - + k[8276]*y_cur[IDX_GHI] - k[8370]*y_cur[IDX_GH2I] - + k[8396]*y_cur[IDX_GCI] - k[8438]*y_cur[IDX_GOI] - + k[8456]*y_cur[IDX_GNI] - k[8482]*y_cur[IDX_GCHI] - + k[8518]*y_cur[IDX_GOHI] - k[8523]*y_cur[IDX_GNHI] - + k[8528]*y_cur[IDX_GO2I] - k[8529]*y_cur[IDX_GCNI] - + k[8531]*y_cur[IDX_GCH2I] - k[8531]*y_cur[IDX_GCH2I] - + k[8531]*y_cur[IDX_GCH2I] - k[8531]*y_cur[IDX_GCH2I] - + k[8532]*y_cur[IDX_GCH3I] - k[8533]*y_cur[IDX_GHNOI] - + k[8578]*y_cur[IDX_GHI] - k[8656]*y_cur[IDX_GCI] - + k[8686]*y_cur[IDX_GOI] - k[8699]*y_cur[IDX_GNI] - + k[8716]*y_cur[IDX_GCHI] - k[8741]*y_cur[IDX_GOHI] - + k[8743]*y_cur[IDX_GNHI] - k[8745]*y_cur[IDX_GCH2I] - + k[8745]*y_cur[IDX_GCH2I] - k[8745]*y_cur[IDX_GCH2I] - + k[8745]*y_cur[IDX_GCH2I] - k[8746]*y_cur[IDX_GCH3I] - + k[8747]*y_cur[IDX_GCNI]; + data[jistart + 5716] = 0.0 - k[8529]*y_cur[IDX_GCH2I] - k[8747]*y_cur[IDX_GCH2I]; + data[jistart + 5717] = 0.0 - k[8456]*y_cur[IDX_GCH2I] - k[8699]*y_cur[IDX_GCH2I]; + data[jistart + 5718] = 0.0 - k[8438]*y_cur[IDX_GCH2I] - k[8686]*y_cur[IDX_GCH2I]; + data[jistart + 5719] = 0.0 + k[7625] + k[7627] + k[7902] + k[7904] - + k[8532]*y_cur[IDX_GCH2I] - k[8746]*y_cur[IDX_GCH2I]; + data[jistart + 5720] = 0.0 + k[8275]*y_cur[IDX_GHI] + k[8477]*y_cur[IDX_GHNOI] - + k[8482]*y_cur[IDX_GCH2I] - k[8716]*y_cur[IDX_GCH2I]; + data[jistart + 5721] = 0.0 + k[8369]*y_cur[IDX_GCI] - k[8370]*y_cur[IDX_GCH2I]; + data[jistart + 5722] = 0.0 + k[8369]*y_cur[IDX_GH2I] - k[8396]*y_cur[IDX_GCH2I] - + k[8656]*y_cur[IDX_GCH2I]; + data[jistart + 5723] = 0.0 + k[6893]; + data[jistart + 5724] = 0.0 + k[8275]*y_cur[IDX_GCHI] - k[8276]*y_cur[IDX_GCH2I] - + k[8578]*y_cur[IDX_GCH2I]; + data[jistart + 5725] = 0.0 + k[5644]*y_cur[IDX_CII]; + data[jistart + 5726] = 0.0 + k[3252]*y_cur[IDX_HeII]; + data[jistart + 5727] = 0.0 + k[5673]*y_cur[IDX_HeII]; + data[jistart + 5728] = 0.0 + k[3666]*y_cur[IDX_O2II]; + data[jistart + 5729] = 0.0 + k[2191]*y_cur[IDX_CH4I] + k[2436]*y_cur[IDX_H2I] + + k[2541]*y_cur[IDX_H2OI]; + data[jistart + 5730] = 0.0 - k[1098]*y_cur[IDX_eM] - k[1099]*y_cur[IDX_eM] - + k[1100]*y_cur[IDX_eM] - k[1567]*y_cur[IDX_C2H2I] - + k[1905]*y_cur[IDX_CI] - k[2116]*y_cur[IDX_CH3CNI] - + k[2201]*y_cur[IDX_CH4I] - k[2285]*y_cur[IDX_COI] - + k[2548]*y_cur[IDX_H2OI] - k[3585]*y_cur[IDX_NH3I] - + k[3736]*y_cur[IDX_OI] - k[6566]*y_cur[IDX_GRAINM] - + k[6567]*y_cur[IDX_GRAINM] - k[6568]*y_cur[IDX_GRAINM]; + data[jistart + 5731] = 0.0 - k[2116]*y_cur[IDX_HCO2II]; + data[jistart + 5732] = 0.0 + k[3677]*y_cur[IDX_CO2I]; + data[jistart + 5733] = 0.0 + k[2139]*y_cur[IDX_CO2I]; + data[jistart + 5734] = 0.0 + k[3049]*y_cur[IDX_CO2I]; + data[jistart + 5735] = 0.0 + k[2853]*y_cur[IDX_CO2I]; + data[jistart + 5736] = 0.0 + k[3482]*y_cur[IDX_CO2I]; + data[jistart + 5737] = 0.0 + k[2382]*y_cur[IDX_CO2I]; + data[jistart + 5738] = 0.0 + k[2223]*y_cur[IDX_CO2I]; + data[jistart + 5739] = 0.0 + k[3776]*y_cur[IDX_CO2I]; + data[jistart + 5740] = 0.0 + k[2139]*y_cur[IDX_CH4II] + k[2223]*y_cur[IDX_CH5II] + + k[2382]*y_cur[IDX_H2II] + k[2674]*y_cur[IDX_H3II] + + k[2853]*y_cur[IDX_HCNII] + k[3049]*y_cur[IDX_HNOII] + + k[3372]*y_cur[IDX_N2HII] + k[3482]*y_cur[IDX_NHII] + + k[3677]*y_cur[IDX_O2HII] + k[3776]*y_cur[IDX_OHII]; + data[jistart + 5741] = 0.0 + k[3666]*y_cur[IDX_HCOOHI]; + data[jistart + 5742] = 0.0 + k[3372]*y_cur[IDX_CO2I]; + data[jistart + 5743] = 0.0 + k[2191]*y_cur[IDX_CO2II] - k[2201]*y_cur[IDX_HCO2II]; + data[jistart + 5744] = 0.0 + k[3802]*y_cur[IDX_HCOII]; + data[jistart + 5745] = 0.0 - k[3585]*y_cur[IDX_HCO2II]; + data[jistart + 5746] = 0.0 - k[1567]*y_cur[IDX_HCO2II]; + data[jistart + 5747] = 0.0 - k[3736]*y_cur[IDX_HCO2II]; + data[jistart + 5748] = 0.0 + k[3252]*y_cur[IDX_HCOOCH3I] + k[5673]*y_cur[IDX_CH3COOHI]; + data[jistart + 5749] = 0.0 + k[5644]*y_cur[IDX_COOHI]; + data[jistart + 5750] = 0.0 + k[2541]*y_cur[IDX_CO2II] - k[2548]*y_cur[IDX_HCO2II]; + data[jistart + 5751] = 0.0 - k[1905]*y_cur[IDX_HCO2II]; + data[jistart + 5752] = 0.0 + k[3802]*y_cur[IDX_OHI]; + data[jistart + 5753] = 0.0 + k[2674]*y_cur[IDX_CO2I]; + data[jistart + 5754] = 0.0 - k[2285]*y_cur[IDX_HCO2II]; + data[jistart + 5755] = 0.0 - k[6566]*y_cur[IDX_HCO2II] - k[6567]*y_cur[IDX_HCO2II] - + k[6568]*y_cur[IDX_HCO2II]; + data[jistart + 5756] = 0.0 + k[2436]*y_cur[IDX_CO2II]; + data[jistart + 5757] = 0.0 - k[1098]*y_cur[IDX_HCO2II] - k[1099]*y_cur[IDX_HCO2II] - + k[1100]*y_cur[IDX_HCO2II]; + data[jistart + 5758] = 0.0 + k[1356]*y_cur[IDX_CII] + k[2321]*y_cur[IDX_HII] + + k[3179]*y_cur[IDX_HeII]; + data[jistart + 5759] = 0.0 + k[1329]*y_cur[IDX_CII]; + data[jistart + 5760] = 0.0 + k[2167]*y_cur[IDX_CH4I]; + data[jistart + 5761] = 0.0 - k[843]*y_cur[IDX_eM] - k[844]*y_cur[IDX_eM] - + k[1870]*y_cur[IDX_CI] - k[1871]*y_cur[IDX_CI] - + k[3416]*y_cur[IDX_NI] - k[3707]*y_cur[IDX_OI] - + k[5579]*y_cur[IDX_C4H2I] - k[6742]*y_cur[IDX_GRAINM] - + k[6743]*y_cur[IDX_GRAINM]; + data[jistart + 5762] = 0.0 + k[1688]*y_cur[IDX_C2H4I]; + data[jistart + 5763] = 0.0 + k[1517]*y_cur[IDX_C2H2II] + k[1616]*y_cur[IDX_C2H3II]; + data[jistart + 5764] = 0.0 + k[1589]*y_cur[IDX_C2H3II] + k[2614]*y_cur[IDX_H3II] + + k[2919]*y_cur[IDX_HCOII]; + data[jistart + 5765] = 0.0 + k[1774]*y_cur[IDX_C3H2II]; + data[jistart + 5766] = 0.0 + k[1486]*y_cur[IDX_C2H2II] + k[1581]*y_cur[IDX_C2H3II]; + data[jistart + 5767] = 0.0 + k[2168]*y_cur[IDX_CH4I]; + data[jistart + 5768] = 0.0 + k[1780]*y_cur[IDX_C3H2II]; + data[jistart + 5769] = 0.0 + k[1689]*y_cur[IDX_C2H4I]; + data[jistart + 5770] = 0.0 + k[1546]*y_cur[IDX_C2H2I] + k[1733]*y_cur[IDX_C2HI] + + k[1807]*y_cur[IDX_C4H2I]; + data[jistart + 5771] = 0.0 + k[1545]*y_cur[IDX_C2H2I] + k[1629]*y_cur[IDX_C2H3I] + + k[1774]*y_cur[IDX_CH2CCH2I] + k[1780]*y_cur[IDX_CH3CCHI]; + data[jistart + 5772] = 0.0 + k[1677]*y_cur[IDX_C4H2I]; + data[jistart + 5773] = 0.0 + k[1507]*y_cur[IDX_C2H2II]; + data[jistart + 5774] = 0.0 + k[1742]*y_cur[IDX_C2HI] + k[2031]*y_cur[IDX_C4H2I]; + data[jistart + 5775] = 0.0 + k[1585]*y_cur[IDX_C2H3II]; + data[jistart + 5776] = 0.0 + k[1677]*y_cur[IDX_C2H4II] + k[1807]*y_cur[IDX_C3H3II] + + k[2031]*y_cur[IDX_CH2CCHII] + k[2080]*y_cur[IDX_CH3II] - + k[5579]*y_cur[IDX_C5H3II]; + data[jistart + 5777] = 0.0 + k[1688]*y_cur[IDX_C3II] + k[1689]*y_cur[IDX_C3HII]; + data[jistart + 5778] = 0.0 + k[1629]*y_cur[IDX_C3H2II]; + data[jistart + 5779] = 0.0 + k[1581]*y_cur[IDX_C3H2I] + k[1585]*y_cur[IDX_C3HI] + + k[1589]*y_cur[IDX_C5H2I] + k[1616]*y_cur[IDX_H2CCCI]; + data[jistart + 5780] = 0.0 + k[2167]*y_cur[IDX_C4II] + k[2168]*y_cur[IDX_C4HII]; + data[jistart + 5781] = 0.0 + k[1733]*y_cur[IDX_C3H3II] + k[1742]*y_cur[IDX_CH2CCHII]; + data[jistart + 5782] = 0.0 + k[1486]*y_cur[IDX_C3H2I] + k[1507]*y_cur[IDX_CH2CCHI] + + k[1517]*y_cur[IDX_H2CCCI]; + data[jistart + 5783] = 0.0 + k[2080]*y_cur[IDX_C4H2I]; + data[jistart + 5784] = 0.0 + k[1545]*y_cur[IDX_C3H2II] + k[1546]*y_cur[IDX_C3H3II]; + data[jistart + 5785] = 0.0 - k[3416]*y_cur[IDX_C5H3II]; + data[jistart + 5786] = 0.0 - k[3707]*y_cur[IDX_C5H3II]; + data[jistart + 5787] = 0.0 + k[3179]*y_cur[IDX_CH3C4HI]; + data[jistart + 5788] = 0.0 + k[1329]*y_cur[IDX_C6H6I] + k[1356]*y_cur[IDX_CH3C4HI]; + data[jistart + 5789] = 0.0 + k[2321]*y_cur[IDX_CH3C4HI]; + data[jistart + 5790] = 0.0 - k[1870]*y_cur[IDX_C5H3II] - k[1871]*y_cur[IDX_C5H3II]; + data[jistart + 5791] = 0.0 + k[2919]*y_cur[IDX_C5H2I]; + data[jistart + 5792] = 0.0 + k[2614]*y_cur[IDX_C5H2I]; + data[jistart + 5793] = 0.0 - k[6742]*y_cur[IDX_C5H3II] - k[6743]*y_cur[IDX_C5H3II]; + data[jistart + 5794] = 0.0 - k[843]*y_cur[IDX_C5H3II] - k[844]*y_cur[IDX_C5H3II]; + data[jistart + 5795] = 0.0 + k[2174]*y_cur[IDX_CH4I] + k[2533]*y_cur[IDX_H2OI]; + data[jistart + 5796] = 0.0 + k[2316]*y_cur[IDX_HII] + k[3168]*y_cur[IDX_HeII]; + data[jistart + 5797] = 0.0 + k[3027]*y_cur[IDX_H3II] + k[3028]*y_cur[IDX_H3OII] + + k[3029]*y_cur[IDX_HCOII] + k[3035]*y_cur[IDX_N2HII]; + data[jistart + 5798] = 0.0 + k[1707]*y_cur[IDX_C2H4I] + k[2198]*y_cur[IDX_CH4I] + + k[2444]*y_cur[IDX_H2I]; + data[jistart + 5799] = 0.0 + k[3399]*y_cur[IDX_NI]; + data[jistart + 5800] = 0.0 - k[1066]*y_cur[IDX_eM] - k[1067]*y_cur[IDX_eM] - + k[1068]*y_cur[IDX_eM] - k[1069]*y_cur[IDX_eM] - + k[2115]*y_cur[IDX_CH3CNI] - k[2126]*y_cur[IDX_CH3OHI] - + k[3580]*y_cur[IDX_NH3I] - k[6637]*y_cur[IDX_GRAINM] - + k[6638]*y_cur[IDX_GRAINM] - k[6639]*y_cur[IDX_GRAINM] - + k[6640]*y_cur[IDX_GRAINM]; + data[jistart + 5801] = 0.0 + k[1816]*y_cur[IDX_HC3NI]; + data[jistart + 5802] = 0.0 - k[2115]*y_cur[IDX_HC3NHII]; + data[jistart + 5803] = 0.0 + k[1722]*y_cur[IDX_HC3NI]; + data[jistart + 5804] = 0.0 + k[2228]*y_cur[IDX_HC3NI]; + data[jistart + 5805] = 0.0 - k[2126]*y_cur[IDX_HC3NHII]; + data[jistart + 5806] = 0.0 + k[1472]*y_cur[IDX_C2HII] + k[1620]*y_cur[IDX_C2H3II] + + k[1676]*y_cur[IDX_C2H4II] + k[1722]*y_cur[IDX_C2H5II] + + k[1816]*y_cur[IDX_C3H5II] + k[2228]*y_cur[IDX_CH5II] + + k[2689]*y_cur[IDX_H3II] + k[2804]*y_cur[IDX_H3OII] + + k[2894]*y_cur[IDX_HCNHII] + k[2895]*y_cur[IDX_HCNHII] + + k[2964]*y_cur[IDX_HCOII] + k[3374]*y_cur[IDX_N2HII]; + data[jistart + 5807] = 0.0 + k[1472]*y_cur[IDX_HC3NI]; + data[jistart + 5808] = 0.0 + k[1676]*y_cur[IDX_HC3NI]; + data[jistart + 5809] = 0.0 + k[3035]*y_cur[IDX_HNC3I] + k[3374]*y_cur[IDX_HC3NI]; + data[jistart + 5810] = 0.0 + k[3453]*y_cur[IDX_NI]; + data[jistart + 5811] = 0.0 + k[2894]*y_cur[IDX_HC3NI] + k[2895]*y_cur[IDX_HC3NI]; + data[jistart + 5812] = 0.0 + k[1707]*y_cur[IDX_HC3NII]; + data[jistart + 5813] = 0.0 + k[1620]*y_cur[IDX_HC3NI]; + data[jistart + 5814] = 0.0 + k[2174]*y_cur[IDX_C4NII] + k[2198]*y_cur[IDX_HC3NII]; + data[jistart + 5815] = 0.0 + k[1522]*y_cur[IDX_C2H2II]; + data[jistart + 5816] = 0.0 - k[3580]*y_cur[IDX_HC3NHII]; + data[jistart + 5817] = 0.0 + k[1522]*y_cur[IDX_HCNI]; + data[jistart + 5818] = 0.0 + k[3399]*y_cur[IDX_C3H4II] + k[3453]*y_cur[IDX_CH2CCHII]; + data[jistart + 5819] = 0.0 + k[2804]*y_cur[IDX_HC3NI] + k[3028]*y_cur[IDX_HNC3I]; + data[jistart + 5820] = 0.0 + k[3168]*y_cur[IDX_CH2CHCNI]; + data[jistart + 5821] = 0.0 + k[2533]*y_cur[IDX_C4NII]; + data[jistart + 5822] = 0.0 + k[2316]*y_cur[IDX_CH2CHCNI]; + data[jistart + 5823] = 0.0 + k[2964]*y_cur[IDX_HC3NI] + k[3029]*y_cur[IDX_HNC3I]; + data[jistart + 5824] = 0.0 + k[2689]*y_cur[IDX_HC3NI] + k[3027]*y_cur[IDX_HNC3I]; + data[jistart + 5825] = 0.0 - k[6637]*y_cur[IDX_HC3NHII] - k[6638]*y_cur[IDX_HC3NHII] - + k[6639]*y_cur[IDX_HC3NHII] - k[6640]*y_cur[IDX_HC3NHII]; + data[jistart + 5826] = 0.0 + k[2444]*y_cur[IDX_HC3NII]; + data[jistart + 5827] = 0.0 - k[1066]*y_cur[IDX_HC3NHII] - k[1067]*y_cur[IDX_HC3NHII] - + k[1068]*y_cur[IDX_HC3NHII] - k[1069]*y_cur[IDX_HC3NHII]; + data[jistart + 5828] = 0.0 + k[1555]*y_cur[IDX_C2H2I]; + data[jistart + 5829] = 0.0 + k[3063]*y_cur[IDX_HeII]; + data[jistart + 5830] = 0.0 + k[2177]*y_cur[IDX_CH4I] + k[2414]*y_cur[IDX_H2I] + + k[2871]*y_cur[IDX_HCNI]; + data[jistart + 5831] = 0.0 + k[1404]*y_cur[IDX_CII]; + data[jistart + 5832] = 0.0 + k[3136]*y_cur[IDX_HeII]; + data[jistart + 5833] = 0.0 - k[839]*y_cur[IDX_eM] - k[840]*y_cur[IDX_eM] - + k[1867]*y_cur[IDX_CI] - k[2415]*y_cur[IDX_H2I] - + k[3412]*y_cur[IDX_NI] - k[3704]*y_cur[IDX_OI] - + k[5577]*y_cur[IDX_C4H2I] - k[6721]*y_cur[IDX_GRAINM] - + k[6722]*y_cur[IDX_GRAINM]; + data[jistart + 5834] = 0.0 + k[1543]*y_cur[IDX_C2H2I] + k[1752]*y_cur[IDX_HC3NI]; + data[jistart + 5835] = 0.0 + k[3423]*y_cur[IDX_NI]; + data[jistart + 5836] = 0.0 + k[2304]*y_cur[IDX_HII] + k[3121]*y_cur[IDX_HeII]; + data[jistart + 5837] = 0.0 + k[1752]*y_cur[IDX_C3II]; + data[jistart + 5838] = 0.0 + k[1754]*y_cur[IDX_C4H2I]; + data[jistart + 5839] = 0.0 + k[1318]*y_cur[IDX_CII]; + data[jistart + 5840] = 0.0 + k[3067]*y_cur[IDX_HeII] + k[3068]*y_cur[IDX_HeII]; + data[jistart + 5841] = 0.0 + k[2613]*y_cur[IDX_H3II] + k[2918]*y_cur[IDX_HCOII]; + data[jistart + 5842] = 0.0 + k[3139]*y_cur[IDX_HeII]; + data[jistart + 5843] = 0.0 + k[1865]*y_cur[IDX_CI]; + data[jistart + 5844] = 0.0 + k[345]*y_cur[IDX_HII]; + data[jistart + 5845] = 0.0 + k[1487]*y_cur[IDX_C2H2II]; + data[jistart + 5846] = 0.0 + k[1403]*y_cur[IDX_CII] + k[1754]*y_cur[IDX_C3HII] - + k[5577]*y_cur[IDX_C5HII]; + data[jistart + 5847] = 0.0 + k[1864]*y_cur[IDX_CI]; + data[jistart + 5848] = 0.0 + k[2177]*y_cur[IDX_C5II]; + data[jistart + 5849] = 0.0 + k[2871]*y_cur[IDX_C5II]; + data[jistart + 5850] = 0.0 + k[1487]*y_cur[IDX_C3HI]; + data[jistart + 5851] = 0.0 + k[1543]*y_cur[IDX_C3II] + k[1555]*y_cur[IDX_C4NII]; + data[jistart + 5852] = 0.0 - k[3412]*y_cur[IDX_C5HII] + k[3423]*y_cur[IDX_C6H2II]; + data[jistart + 5853] = 0.0 - k[3704]*y_cur[IDX_C5HII]; + data[jistart + 5854] = 0.0 + k[3063]*y_cur[IDX_C10H2I] + k[3067]*y_cur[IDX_C10HI] + + k[3068]*y_cur[IDX_C10HI] + k[3121]*y_cur[IDX_C5H2I] + + k[3136]*y_cur[IDX_C7H2I] + k[3139]*y_cur[IDX_C7HI]; + data[jistart + 5855] = 0.0 + k[1318]*y_cur[IDX_C4H3I] + k[1403]*y_cur[IDX_C4H2I] + + k[1404]*y_cur[IDX_HC5NI]; + data[jistart + 5856] = 0.0 + k[345]*y_cur[IDX_C5HI] + k[2304]*y_cur[IDX_C5H2I]; + data[jistart + 5857] = 0.0 + k[1864]*y_cur[IDX_C4H2II] + k[1865]*y_cur[IDX_C4H3II] - + k[1867]*y_cur[IDX_C5HII]; + data[jistart + 5858] = 0.0 + k[2918]*y_cur[IDX_C5I]; + data[jistart + 5859] = 0.0 + k[2613]*y_cur[IDX_C5I]; + data[jistart + 5860] = 0.0 - k[6721]*y_cur[IDX_C5HII] - k[6722]*y_cur[IDX_C5HII]; + data[jistart + 5861] = 0.0 + k[2414]*y_cur[IDX_C5II] - k[2415]*y_cur[IDX_C5HII]; + data[jistart + 5862] = 0.0 - k[839]*y_cur[IDX_C5HII] - k[840]*y_cur[IDX_C5HII]; + data[jistart + 5863] = 0.0 + k[8626]*y_cur[IDX_GHI]; + data[jistart + 5864] = 0.0 + k[950]*y_cur[IDX_eM] + k[6683]*y_cur[IDX_GRAINM]; + data[jistart + 5865] = 0.0 - k[2113]*y_cur[IDX_CH3CHOI]; + data[jistart + 5866] = 0.0 + k[7159] + k[7341] + k[7523]; + data[jistart + 5867] = 0.0 + k[952]*y_cur[IDX_eM] + k[6692]*y_cur[IDX_GRAINM]; + data[jistart + 5868] = 0.0 - k[2114]*y_cur[IDX_CH3CHOI]; + data[jistart + 5869] = 0.0 + k[8751]*y_cur[IDX_GCH3I]; + data[jistart + 5870] = 0.0 + k[941]*y_cur[IDX_eM] + k[3569]*y_cur[IDX_NH3I] + + k[6563]*y_cur[IDX_GRAINM]; + data[jistart + 5871] = 0.0 - k[167]*y_cur[IDX_CII] - k[366]*y_cur[IDX_HII] - + k[1378]*y_cur[IDX_CII] - k[2065]*y_cur[IDX_CH3II] - + k[2066]*y_cur[IDX_CH3II] - k[2067]*y_cur[IDX_CH3II] - + k[2113]*y_cur[IDX_HCOOH2II] - k[2114]*y_cur[IDX_S2II] - + k[2651]*y_cur[IDX_H3II] - k[2652]*y_cur[IDX_H3II] - + k[2653]*y_cur[IDX_H3II] - k[2654]*y_cur[IDX_H3II] - + k[2655]*y_cur[IDX_H3II] - k[2656]*y_cur[IDX_H3II] - + k[2657]*y_cur[IDX_H3II] - k[2791]*y_cur[IDX_H3OII] - + k[2950]*y_cur[IDX_HCOII] - k[3191]*y_cur[IDX_HeII] - + k[5532]*y_cur[IDX_CH3II] - k[5806] - k[5807] - k[5808] - k[6111] - + k[6112] - k[6113] - k[6977]; + data[jistart + 5872] = 0.0 + k[5350]*y_cur[IDX_OI]; + data[jistart + 5873] = 0.0 + k[5055]*y_cur[IDX_OHI]; + data[jistart + 5874] = 0.0 + k[8751]*y_cur[IDX_GHCOI]; + data[jistart + 5875] = 0.0 + k[5073]*y_cur[IDX_CHI]; + data[jistart + 5876] = 0.0 + k[5586]*y_cur[IDX_OHI]; + data[jistart + 5877] = 0.0 + k[5073]*y_cur[IDX_CH3OHI]; + data[jistart + 5878] = 0.0 + k[5055]*y_cur[IDX_CH3CHCH2I] + k[5586]*y_cur[IDX_C2H3I]; + data[jistart + 5879] = 0.0 + k[3569]*y_cur[IDX_CH3CHOHII]; + data[jistart + 5880] = 0.0 - k[2065]*y_cur[IDX_CH3CHOI] - k[2066]*y_cur[IDX_CH3CHOI] - + k[2067]*y_cur[IDX_CH3CHOI] - k[5532]*y_cur[IDX_CH3CHOI]; + data[jistart + 5881] = 0.0 + k[8626]*y_cur[IDX_GCH3COI]; + data[jistart + 5882] = 0.0 - k[2791]*y_cur[IDX_CH3CHOI]; + data[jistart + 5883] = 0.0 + k[5350]*y_cur[IDX_C2H5I]; + data[jistart + 5884] = 0.0 - k[3191]*y_cur[IDX_CH3CHOI]; + data[jistart + 5885] = 0.0 - k[167]*y_cur[IDX_CH3CHOI] - k[1378]*y_cur[IDX_CH3CHOI]; + data[jistart + 5886] = 0.0 - k[366]*y_cur[IDX_CH3CHOI]; + data[jistart + 5887] = 0.0 - k[2950]*y_cur[IDX_CH3CHOI]; + data[jistart + 5888] = 0.0 - k[2651]*y_cur[IDX_CH3CHOI] - k[2652]*y_cur[IDX_CH3CHOI] - + k[2653]*y_cur[IDX_CH3CHOI] - k[2654]*y_cur[IDX_CH3CHOI] - + k[2655]*y_cur[IDX_CH3CHOI] - k[2656]*y_cur[IDX_CH3CHOI] - + k[2657]*y_cur[IDX_CH3CHOI]; + data[jistart + 5889] = 0.0 + k[6563]*y_cur[IDX_CH3CHOHII] + k[6683]*y_cur[IDX_CH3COCH3II] + + k[6692]*y_cur[IDX_CH3COCH4II]; + data[jistart + 5890] = 0.0 + k[941]*y_cur[IDX_CH3CHOHII] + k[950]*y_cur[IDX_CH3COCH3II] + + k[952]*y_cur[IDX_CH3COCH4II]; + data[jistart + 5891] = 0.0 + k[3222]*y_cur[IDX_HeII]; + data[jistart + 5892] = 0.0 + k[3103]*y_cur[IDX_HeII]; + data[jistart + 5893] = 0.0 + k[2346]*y_cur[IDX_HII] + k[3255]*y_cur[IDX_HeII]; + data[jistart + 5894] = 0.0 + k[1421]*y_cur[IDX_CII]; + data[jistart + 5895] = 0.0 - k[317]*y_cur[IDX_FeI] - k[530]*y_cur[IDX_MgI] - + k[633]*y_cur[IDX_NaI] - k[717]*y_cur[IDX_SiI] - k[985]*y_cur[IDX_eM] + - k[2192]*y_cur[IDX_CH4I] - k[2438]*y_cur[IDX_H2I] - + k[3672]*y_cur[IDX_O2I] - k[3732]*y_cur[IDX_OI] - k[6140] - + k[6535]*y_cur[IDX_GRAINM]; + data[jistart + 5896] = 0.0 + k[1456]*y_cur[IDX_SI]; + data[jistart + 5897] = 0.0 + k[1908]*y_cur[IDX_CI]; + data[jistart + 5898] = 0.0 + k[1425]*y_cur[IDX_CII] + k[1756]*y_cur[IDX_C3HII] + + k[3293]*y_cur[IDX_HeII] + k[3359]*y_cur[IDX_NII]; + data[jistart + 5899] = 0.0 + k[3115]*y_cur[IDX_HeII]; + data[jistart + 5900] = 0.0 + k[1415]*y_cur[IDX_CII]; + data[jistart + 5901] = 0.0 + k[374]*y_cur[IDX_HII] + k[5828] + k[6141]; + data[jistart + 5902] = 0.0 + k[1756]*y_cur[IDX_OCSI]; + data[jistart + 5903] = 0.0 + k[3091]*y_cur[IDX_HeII]; + data[jistart + 5904] = 0.0 + k[1973]*y_cur[IDX_SI]; + data[jistart + 5905] = 0.0 - k[317]*y_cur[IDX_CSII]; + data[jistart + 5906] = 0.0 - k[530]*y_cur[IDX_CSII]; + data[jistart + 5907] = 0.0 - k[633]*y_cur[IDX_CSII]; + data[jistart + 5908] = 0.0 + k[1428]*y_cur[IDX_CII]; + data[jistart + 5909] = 0.0 + k[3359]*y_cur[IDX_OCSI]; + data[jistart + 5910] = 0.0 - k[3672]*y_cur[IDX_CSII]; + data[jistart + 5911] = 0.0 + k[1464]*y_cur[IDX_C2I] + k[2265]*y_cur[IDX_CHI] + + k[5528]*y_cur[IDX_CI]; + data[jistart + 5912] = 0.0 - k[717]*y_cur[IDX_CSII]; + data[jistart + 5913] = 0.0 - k[2192]*y_cur[IDX_CSII]; + data[jistart + 5914] = 0.0 + k[2265]*y_cur[IDX_SII]; + data[jistart + 5915] = 0.0 + k[1456]*y_cur[IDX_C2II] + k[1973]*y_cur[IDX_CHII] + + k[5506]*y_cur[IDX_CII]; + data[jistart + 5916] = 0.0 + k[1464]*y_cur[IDX_SII]; + data[jistart + 5917] = 0.0 - k[3732]*y_cur[IDX_CSII]; + data[jistart + 5918] = 0.0 + k[3091]*y_cur[IDX_C2SI] + k[3103]*y_cur[IDX_C3SI] + + k[3115]*y_cur[IDX_C4SI] + k[3222]*y_cur[IDX_H2CSI] + + k[3255]*y_cur[IDX_HCSI] + k[3293]*y_cur[IDX_OCSI]; + data[jistart + 5919] = 0.0 + k[1415]*y_cur[IDX_HSI] + k[1421]*y_cur[IDX_NSI] + + k[1425]*y_cur[IDX_OCSI] + k[1428]*y_cur[IDX_SOI] + + k[5506]*y_cur[IDX_SI]; + data[jistart + 5920] = 0.0 + k[374]*y_cur[IDX_CSI] + k[2346]*y_cur[IDX_HCSI]; + data[jistart + 5921] = 0.0 + k[1908]*y_cur[IDX_HSII] + k[5528]*y_cur[IDX_SII]; + data[jistart + 5922] = 0.0 - k[6535]*y_cur[IDX_CSII]; + data[jistart + 5923] = 0.0 - k[2438]*y_cur[IDX_CSII]; + data[jistart + 5924] = 0.0 - k[985]*y_cur[IDX_CSII]; + data[jistart + 5925] = 0.0 + k[1563]*y_cur[IDX_C2H2I]; + data[jistart + 5926] = 0.0 - k[1814]*y_cur[IDX_C3H5II]; + data[jistart + 5927] = 0.0 + k[2660]*y_cur[IDX_H3II]; + data[jistart + 5928] = 0.0 + k[2197]*y_cur[IDX_CH4I]; + data[jistart + 5929] = 0.0 + k[1811]*y_cur[IDX_CH3CCHI]; + data[jistart + 5930] = 0.0 - k[803]*y_cur[IDX_eM] - k[804]*y_cur[IDX_eM] - + k[1548]*y_cur[IDX_C2H2I] - k[1814]*y_cur[IDX_C6H6I] - + k[1815]*y_cur[IDX_CH3CHCH2I] - k[1816]*y_cur[IDX_HC3NI] - + k[1861]*y_cur[IDX_CI] - k[2104]*y_cur[IDX_CH3CCHI] - + k[3400]*y_cur[IDX_NI] - k[3401]*y_cur[IDX_NI] - + k[5516]*y_cur[IDX_H2I] - k[6482]*y_cur[IDX_GRAINM] - + k[6483]*y_cur[IDX_GRAINM]; + data[jistart + 5931] = 0.0 + k[1514]*y_cur[IDX_C2H2II]; + data[jistart + 5932] = 0.0 + k[1685]*y_cur[IDX_C2H4I]; + data[jistart + 5933] = 0.0 + k[1512]*y_cur[IDX_C2H2II] + k[1614]*y_cur[IDX_C2H3II] + + k[2063]*y_cur[IDX_CH3II]; + data[jistart + 5934] = 0.0 + k[1376]*y_cur[IDX_CII] - k[1815]*y_cur[IDX_C3H5II] + + k[2650]*y_cur[IDX_H3II] + k[3369]*y_cur[IDX_N2HII] + + k[3660]*y_cur[IDX_O2II] + k[3823]*y_cur[IDX_SII]; + data[jistart + 5935] = 0.0 + k[1611]*y_cur[IDX_C2H3II] + k[1811]*y_cur[IDX_C3H4II] - + k[2104]*y_cur[IDX_C3H5II] + k[2789]*y_cur[IDX_H3OII] + + k[2948]*y_cur[IDX_HCOII]; + data[jistart + 5936] = 0.0 - k[1816]*y_cur[IDX_C3H5II]; + data[jistart + 5937] = 0.0 + k[3660]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 5938] = 0.0 + k[1647]*y_cur[IDX_C2H4I]; + data[jistart + 5939] = 0.0 + k[3369]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 5940] = 0.0 + k[5530]*y_cur[IDX_H2I]; + data[jistart + 5941] = 0.0 + k[1647]*y_cur[IDX_C2H4II] + k[1685]*y_cur[IDX_C2H5II] + + k[2046]*y_cur[IDX_CH3II]; + data[jistart + 5942] = 0.0 + k[3823]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 5943] = 0.0 + k[1611]*y_cur[IDX_CH3CCHI] + k[1614]*y_cur[IDX_C2H6I] + + k[2156]*y_cur[IDX_CH4I]; + data[jistart + 5944] = 0.0 + k[2155]*y_cur[IDX_C2H2II] + k[2156]*y_cur[IDX_C2H3II] + + k[2197]*y_cur[IDX_HC3NII]; + data[jistart + 5945] = 0.0 + k[1512]*y_cur[IDX_C2H6I] + k[1514]*y_cur[IDX_CH3CNI] + + k[2155]*y_cur[IDX_CH4I]; + data[jistart + 5946] = 0.0 + k[2046]*y_cur[IDX_C2H4I] + k[2063]*y_cur[IDX_C2H6I]; + data[jistart + 5947] = 0.0 - k[1548]*y_cur[IDX_C3H5II] + k[1563]*y_cur[IDX_C2H6II]; + data[jistart + 5948] = 0.0 - k[3400]*y_cur[IDX_C3H5II] - k[3401]*y_cur[IDX_C3H5II]; + data[jistart + 5949] = 0.0 + k[2789]*y_cur[IDX_CH3CCHI]; + data[jistart + 5950] = 0.0 + k[1376]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 5951] = 0.0 - k[1861]*y_cur[IDX_C3H5II]; + data[jistart + 5952] = 0.0 + k[2948]*y_cur[IDX_CH3CCHI]; + data[jistart + 5953] = 0.0 + k[2650]*y_cur[IDX_CH3CHCH2I] + k[2660]*y_cur[IDX_CH3COCH3I]; + data[jistart + 5954] = 0.0 - k[6482]*y_cur[IDX_C3H5II] - k[6483]*y_cur[IDX_C3H5II]; + data[jistart + 5955] = 0.0 - k[5516]*y_cur[IDX_C3H5II] + k[5530]*y_cur[IDX_CH2CCHII]; + data[jistart + 5956] = 0.0 - k[803]*y_cur[IDX_C3H5II] - k[804]*y_cur[IDX_C3H5II]; + data[jistart + 5957] = 0.0 + k[1360]*y_cur[IDX_CII] + k[2323]*y_cur[IDX_HII] + + k[3182]*y_cur[IDX_HeII]; + data[jistart + 5958] = 0.0 + k[2184]*y_cur[IDX_CH4I]; + data[jistart + 5959] = 0.0 + k[1700]*y_cur[IDX_C2H4I]; + data[jistart + 5960] = 0.0 + k[1602]*y_cur[IDX_C2H3II] + k[2622]*y_cur[IDX_H3II] + + k[2927]*y_cur[IDX_HCOII]; + data[jistart + 5961] = 0.0 - k[870]*y_cur[IDX_eM] - k[871]*y_cur[IDX_eM] - + k[1879]*y_cur[IDX_CI] - k[1880]*y_cur[IDX_CI] - + k[3433]*y_cur[IDX_NI] - k[3716]*y_cur[IDX_OI] - + k[6828]*y_cur[IDX_GRAINM] - k[6829]*y_cur[IDX_GRAINM]; + data[jistart + 5962] = 0.0 + k[2479]*y_cur[IDX_C4H2II]; + data[jistart + 5963] = 0.0 + k[1659]*y_cur[IDX_C2H4II] + k[2055]*y_cur[IDX_CH3II]; + data[jistart + 5964] = 0.0 + k[1492]*y_cur[IDX_C2H2II] + k[1590]*y_cur[IDX_C2H3II]; + data[jistart + 5965] = 0.0 + k[1637]*y_cur[IDX_C2H3I] + k[2852]*y_cur[IDX_C4H2I]; + data[jistart + 5966] = 0.0 + k[1788]*y_cur[IDX_C4H2II]; + data[jistart + 5967] = 0.0 + k[2032]*y_cur[IDX_CH2CCHI]; + data[jistart + 5968] = 0.0 + k[1797]*y_cur[IDX_C4HI]; + data[jistart + 5969] = 0.0 + k[1785]*y_cur[IDX_C4H2I]; + data[jistart + 5970] = 0.0 + k[1659]*y_cur[IDX_C6H2I]; + data[jistart + 5971] = 0.0 + k[1825]*y_cur[IDX_C3HI]; + data[jistart + 5972] = 0.0 + k[2032]*y_cur[IDX_C4HII] + k[2033]*y_cur[IDX_C4H2II]; + data[jistart + 5973] = 0.0 + k[2021]*y_cur[IDX_C4HI]; + data[jistart + 5974] = 0.0 + k[1594]*y_cur[IDX_C2H3II]; + data[jistart + 5975] = 0.0 + k[1825]*y_cur[IDX_C4H3II]; + data[jistart + 5976] = 0.0 + k[1797]*y_cur[IDX_C3H3II] + k[2021]*y_cur[IDX_CH2CCHII]; + data[jistart + 5977] = 0.0 + k[1785]*y_cur[IDX_C3H2II] + k[2852]*y_cur[IDX_C5H2II]; + data[jistart + 5978] = 0.0 + k[1788]*y_cur[IDX_C3H2I] + k[2033]*y_cur[IDX_CH2CCHI] + + k[2479]*y_cur[IDX_H2CCCI]; + data[jistart + 5979] = 0.0 + k[1700]*y_cur[IDX_C5II]; + data[jistart + 5980] = 0.0 + k[1637]*y_cur[IDX_C5H2II]; + data[jistart + 5981] = 0.0 + k[1590]*y_cur[IDX_C5H2I] + k[1594]*y_cur[IDX_C5HI] + + k[1602]*y_cur[IDX_C7H2I]; + data[jistart + 5982] = 0.0 + k[2184]*y_cur[IDX_C6II]; + data[jistart + 5983] = 0.0 + k[1492]*y_cur[IDX_C5H2I]; + data[jistart + 5984] = 0.0 + k[2055]*y_cur[IDX_C6H2I]; + data[jistart + 5985] = 0.0 - k[3433]*y_cur[IDX_C7H3II]; + data[jistart + 5986] = 0.0 - k[3716]*y_cur[IDX_C7H3II]; + data[jistart + 5987] = 0.0 + k[3182]*y_cur[IDX_CH3C6HI]; + data[jistart + 5988] = 0.0 + k[1360]*y_cur[IDX_CH3C6HI]; + data[jistart + 5989] = 0.0 + k[2323]*y_cur[IDX_CH3C6HI]; + data[jistart + 5990] = 0.0 - k[1879]*y_cur[IDX_C7H3II] - k[1880]*y_cur[IDX_C7H3II]; + data[jistart + 5991] = 0.0 + k[2927]*y_cur[IDX_C7H2I]; + data[jistart + 5992] = 0.0 + k[2622]*y_cur[IDX_C7H2I]; + data[jistart + 5993] = 0.0 - k[6828]*y_cur[IDX_C7H3II] - k[6829]*y_cur[IDX_C7H3II]; + data[jistart + 5994] = 0.0 - k[870]*y_cur[IDX_C7H3II] - k[871]*y_cur[IDX_C7H3II]; + data[jistart + 5995] = 0.0 + k[3731]*y_cur[IDX_OI]; + data[jistart + 5996] = 0.0 + k[3298]*y_cur[IDX_HeII]; + data[jistart + 5997] = 0.0 + k[3300]*y_cur[IDX_HeII]; + data[jistart + 5998] = 0.0 + k[3253]*y_cur[IDX_HeII]; + data[jistart + 5999] = 0.0 + k[3102]*y_cur[IDX_HeII]; + data[jistart + 6000] = 0.0 + k[3301]*y_cur[IDX_HeII]; + data[jistart + 6001] = 0.0 + k[3158]*y_cur[IDX_HeII]; + data[jistart + 6002] = 0.0 + k[3212]*y_cur[IDX_HeII]; + data[jistart + 6003] = 0.0 + k[3299]*y_cur[IDX_HeII]; + data[jistart + 6004] = 0.0 - k[613]*y_cur[IDX_NH3I] - k[701]*y_cur[IDX_H2SI] - + k[723]*y_cur[IDX_SiI] - k[1569]*y_cur[IDX_C2H2I] - + k[1710]*y_cur[IDX_C2H4I] - k[2211]*y_cur[IDX_CH4I] - + k[2562]*y_cur[IDX_H2OI] - k[2563]*y_cur[IDX_H2OI] - + k[3595]*y_cur[IDX_NH3I] - k[3807]*y_cur[IDX_OHI] - + k[3810]*y_cur[IDX_CH3OHI] - k[3811]*y_cur[IDX_CO2I] - + k[3812]*y_cur[IDX_O2I] - k[3813]*y_cur[IDX_OCSI] - + k[5559]*y_cur[IDX_H2I] - k[5624]*y_cur[IDX_eM] - + k[6421]*y_cur[IDX_GRAINM]; + data[jistart + 6005] = 0.0 - k[3813]*y_cur[IDX_PII]; + data[jistart + 6006] = 0.0 + k[190]*y_cur[IDX_CII] + k[409]*y_cur[IDX_HII] + + k[526]*y_cur[IDX_HeII] + k[5906] + k[6246]; + data[jistart + 6007] = 0.0 - k[3810]*y_cur[IDX_PII]; + data[jistart + 6008] = 0.0 - k[3811]*y_cur[IDX_PII]; + data[jistart + 6009] = 0.0 - k[1710]*y_cur[IDX_PII]; + data[jistart + 6010] = 0.0 - k[3812]*y_cur[IDX_PII]; + data[jistart + 6011] = 0.0 - k[701]*y_cur[IDX_PII]; + data[jistart + 6012] = 0.0 - k[723]*y_cur[IDX_PII]; + data[jistart + 6013] = 0.0 - k[2211]*y_cur[IDX_PII]; + data[jistart + 6014] = 0.0 - k[3807]*y_cur[IDX_PII]; + data[jistart + 6015] = 0.0 - k[613]*y_cur[IDX_PII] - k[3595]*y_cur[IDX_PII]; + data[jistart + 6016] = 0.0 - k[1569]*y_cur[IDX_PII]; + data[jistart + 6017] = 0.0 + k[3731]*y_cur[IDX_CPII]; + data[jistart + 6018] = 0.0 + k[526]*y_cur[IDX_PI] + k[3102]*y_cur[IDX_C3PI] + + k[3158]*y_cur[IDX_CCPI] + k[3212]*y_cur[IDX_CPI] + + k[3253]*y_cur[IDX_HCPI] + k[3298]*y_cur[IDX_PH2I] + + k[3299]*y_cur[IDX_PHI] + k[3300]*y_cur[IDX_PNI] + + k[3301]*y_cur[IDX_POI]; + data[jistart + 6019] = 0.0 + k[190]*y_cur[IDX_PI]; + data[jistart + 6020] = 0.0 - k[2562]*y_cur[IDX_PII] - k[2563]*y_cur[IDX_PII]; + data[jistart + 6021] = 0.0 + k[409]*y_cur[IDX_PI]; + data[jistart + 6022] = 0.0 - k[6421]*y_cur[IDX_PII]; + data[jistart + 6023] = 0.0 - k[5559]*y_cur[IDX_PII]; + data[jistart + 6024] = 0.0 - k[5624]*y_cur[IDX_PII]; + data[jistart + 6025] = 0.0 + k[8618]*y_cur[IDX_GHI]; + data[jistart + 6026] = 0.0 + k[7139] + k[7321] + k[7503]; + data[jistart + 6027] = 0.0 - k[1842]*y_cur[IDX_CH3CNI]; + data[jistart + 6028] = 0.0 - k[2117]*y_cur[IDX_CH3CNI]; + data[jistart + 6029] = 0.0 + k[946]*y_cur[IDX_eM] + k[6502]*y_cur[IDX_GRAINM]; + data[jistart + 6030] = 0.0 - k[2116]*y_cur[IDX_CH3CNI]; + data[jistart + 6031] = 0.0 - k[2115]*y_cur[IDX_CH3CNI]; + data[jistart + 6032] = 0.0 - k[367]*y_cur[IDX_HII] - k[650]*y_cur[IDX_OII] - + k[1379]*y_cur[IDX_CII] - k[1513]*y_cur[IDX_C2H2II] - + k[1514]*y_cur[IDX_C2H2II] - k[1515]*y_cur[IDX_C2H2II] - + k[1719]*y_cur[IDX_C2H5II] - k[1842]*y_cur[IDX_C4H7II] - + k[2068]*y_cur[IDX_CH3II] - k[2069]*y_cur[IDX_CH3II] - + k[2115]*y_cur[IDX_HC3NHII] - k[2116]*y_cur[IDX_HCO2II] - + k[2117]*y_cur[IDX_HCOOH2II] - k[2328]*y_cur[IDX_HII] - + k[2329]*y_cur[IDX_HII] - k[2658]*y_cur[IDX_H3II] - + k[2792]*y_cur[IDX_H3OII] - k[2888]*y_cur[IDX_HCNHII] - + k[2889]*y_cur[IDX_HCNHII] - k[2951]*y_cur[IDX_HCOII] - + k[3192]*y_cur[IDX_HeII] - k[3193]*y_cur[IDX_HeII] - + k[3371]*y_cur[IDX_N2HII] - k[3635]*y_cur[IDX_OII] - + k[5533]*y_cur[IDX_CH3II] - k[5809] - k[5810] - k[6114] - k[6115] - + k[6957]; + data[jistart + 6033] = 0.0 + k[8749]*y_cur[IDX_GCH3I]; + data[jistart + 6034] = 0.0 - k[1719]*y_cur[IDX_CH3CNI]; + data[jistart + 6035] = 0.0 + k[8749]*y_cur[IDX_GCNI]; + data[jistart + 6036] = 0.0 + k[60]*y_cur[IDX_CH3I]; + data[jistart + 6037] = 0.0 - k[3371]*y_cur[IDX_CH3CNI]; + data[jistart + 6038] = 0.0 - k[650]*y_cur[IDX_CH3CNI] - k[3635]*y_cur[IDX_CH3CNI]; + data[jistart + 6039] = 0.0 - k[2888]*y_cur[IDX_CH3CNI] - k[2889]*y_cur[IDX_CH3CNI]; + data[jistart + 6040] = 0.0 - k[1513]*y_cur[IDX_CH3CNI] - k[1514]*y_cur[IDX_CH3CNI] - + k[1515]*y_cur[IDX_CH3CNI]; + data[jistart + 6041] = 0.0 - k[2068]*y_cur[IDX_CH3CNI] - k[2069]*y_cur[IDX_CH3CNI] - + k[5533]*y_cur[IDX_CH3CNI]; + data[jistart + 6042] = 0.0 + k[5542]*y_cur[IDX_CH3I]; + data[jistart + 6043] = 0.0 + k[8618]*y_cur[IDX_GCH2CNI]; + data[jistart + 6044] = 0.0 + k[60]*y_cur[IDX_CNM] + k[5542]*y_cur[IDX_CNI]; + data[jistart + 6045] = 0.0 - k[2792]*y_cur[IDX_CH3CNI]; + data[jistart + 6046] = 0.0 - k[3192]*y_cur[IDX_CH3CNI] - k[3193]*y_cur[IDX_CH3CNI]; + data[jistart + 6047] = 0.0 - k[1379]*y_cur[IDX_CH3CNI]; + data[jistart + 6048] = 0.0 - k[367]*y_cur[IDX_CH3CNI] - k[2328]*y_cur[IDX_CH3CNI] - + k[2329]*y_cur[IDX_CH3CNI]; + data[jistart + 6049] = 0.0 - k[2951]*y_cur[IDX_CH3CNI]; + data[jistart + 6050] = 0.0 - k[2658]*y_cur[IDX_CH3CNI]; + data[jistart + 6051] = 0.0 + k[6502]*y_cur[IDX_CH3CNHII]; + data[jistart + 6052] = 0.0 + k[946]*y_cur[IDX_CH3CNHII]; + data[jistart + 6053] = 0.0 + k[7187] + k[7369] + k[7551]; + data[jistart + 6054] = 0.0 + k[1155]*y_cur[IDX_eM] + k[6769]*y_cur[IDX_GRAINM]; + data[jistart + 6055] = 0.0 + k[234]*y_cur[IDX_C2H4I] + k[1542]*y_cur[IDX_C2H2I] + + k[2865]*y_cur[IDX_HCNI]; + data[jistart + 6056] = 0.0 + k[1157]*y_cur[IDX_eM] + k[1709]*y_cur[IDX_C2H4I] + + k[2128]*y_cur[IDX_CH3OHI] + k[2560]*y_cur[IDX_H2OI] + + k[2882]*y_cur[IDX_HCNI] + k[3593]*y_cur[IDX_NH3I] + + k[6653]*y_cur[IDX_GRAINM]; + data[jistart + 6057] = 0.0 - k[183]*y_cur[IDX_CII] - k[184]*y_cur[IDX_CII] - + k[1624]*y_cur[IDX_C2H3II] - k[2720]*y_cur[IDX_H3II] - + k[2979]*y_cur[IDX_HCOII] - k[3279]*y_cur[IDX_HeII] - + k[3351]*y_cur[IDX_NII] - k[3352]*y_cur[IDX_NII] - + k[3375]*y_cur[IDX_N2HII] - k[3870]*y_cur[IDX_SiII] - + k[4903]*y_cur[IDX_C2HI] - k[4908]*y_cur[IDX_C4HI] - + k[4968]*y_cur[IDX_CI] - k[5181]*y_cur[IDX_HI] - + k[5273]*y_cur[IDX_NI] - k[5475]*y_cur[IDX_OHI] - + k[5541]*y_cur[IDX_CH3II] - k[5881] - k[6215] - k[6216] - k[7005]; + data[jistart + 6058] = 0.0 + k[2128]*y_cur[IDX_NCCNHII]; + data[jistart + 6059] = 0.0 - k[3375]*y_cur[IDX_NCCNI]; + data[jistart + 6060] = 0.0 - k[3351]*y_cur[IDX_NCCNI] - k[3352]*y_cur[IDX_NCCNI]; + data[jistart + 6061] = 0.0 - k[4908]*y_cur[IDX_NCCNI]; + data[jistart + 6062] = 0.0 + k[5118]*y_cur[IDX_CNI]; + data[jistart + 6063] = 0.0 + k[234]*y_cur[IDX_C2N2II] + k[1709]*y_cur[IDX_NCCNHII]; + data[jistart + 6064] = 0.0 - k[3870]*y_cur[IDX_NCCNI]; + data[jistart + 6065] = 0.0 - k[1624]*y_cur[IDX_NCCNI]; + data[jistart + 6066] = 0.0 - k[4903]*y_cur[IDX_NCCNI]; + data[jistart + 6067] = 0.0 + k[2865]*y_cur[IDX_C2N2II] + k[2882]*y_cur[IDX_NCCNHII] + + k[5116]*y_cur[IDX_CNI]; + data[jistart + 6068] = 0.0 - k[5475]*y_cur[IDX_NCCNI]; + data[jistart + 6069] = 0.0 + k[3593]*y_cur[IDX_NCCNHII]; + data[jistart + 6070] = 0.0 - k[5541]*y_cur[IDX_NCCNI]; + data[jistart + 6071] = 0.0 + k[1542]*y_cur[IDX_C2N2II]; + data[jistart + 6072] = 0.0 + k[5116]*y_cur[IDX_HCNI] + k[5118]*y_cur[IDX_HNCI]; + data[jistart + 6073] = 0.0 - k[5273]*y_cur[IDX_NCCNI]; + data[jistart + 6074] = 0.0 - k[3279]*y_cur[IDX_NCCNI]; + data[jistart + 6075] = 0.0 - k[183]*y_cur[IDX_NCCNI] - k[184]*y_cur[IDX_NCCNI]; + data[jistart + 6076] = 0.0 + k[2560]*y_cur[IDX_NCCNHII]; + data[jistart + 6077] = 0.0 - k[4968]*y_cur[IDX_NCCNI]; + data[jistart + 6078] = 0.0 - k[2979]*y_cur[IDX_NCCNI]; + data[jistart + 6079] = 0.0 - k[2720]*y_cur[IDX_NCCNI]; + data[jistart + 6080] = 0.0 + k[6653]*y_cur[IDX_NCCNHII] + k[6769]*y_cur[IDX_NCCNCH3II]; + data[jistart + 6081] = 0.0 + k[1155]*y_cur[IDX_NCCNCH3II] + k[1157]*y_cur[IDX_NCCNHII]; + data[jistart + 6082] = 0.0 - k[5181]*y_cur[IDX_NCCNI]; + data[jistart + 6083] = 0.0 + k[3181]*y_cur[IDX_HeII]; + data[jistart + 6084] = 0.0 + k[2183]*y_cur[IDX_CH4I]; + data[jistart + 6085] = 0.0 + k[1699]*y_cur[IDX_C2H4I]; + data[jistart + 6086] = 0.0 + k[1875]*y_cur[IDX_CI]; + data[jistart + 6087] = 0.0 + k[2420]*y_cur[IDX_H2I]; + data[jistart + 6088] = 0.0 + k[218]*y_cur[IDX_C2H2II] + k[350]*y_cur[IDX_HII] + k[6045]; + data[jistart + 6089] = 0.0 - k[868]*y_cur[IDX_eM] - k[869]*y_cur[IDX_eM] - + k[1560]*y_cur[IDX_C2H2I] - k[1561]*y_cur[IDX_C2H2I] - + k[1641]*y_cur[IDX_C2H3I] - k[1642]*y_cur[IDX_C2H3I] - + k[1705]*y_cur[IDX_C2H4I] - k[1740]*y_cur[IDX_C2HI] - + k[1877]*y_cur[IDX_CI] - k[1878]*y_cur[IDX_CI] - + k[2187]*y_cur[IDX_CH4I] - k[3432]*y_cur[IDX_NI] - + k[3715]*y_cur[IDX_OI] - k[6826]*y_cur[IDX_GRAINM] - + k[6827]*y_cur[IDX_GRAINM]; + data[jistart + 6090] = 0.0 + k[2478]*y_cur[IDX_C4HII]; + data[jistart + 6091] = 0.0 + k[1491]*y_cur[IDX_C2H2II]; + data[jistart + 6092] = 0.0 + k[1738]*y_cur[IDX_C2HI]; + data[jistart + 6093] = 0.0 + k[2478]*y_cur[IDX_H2CCCI]; + data[jistart + 6094] = 0.0 + k[1796]*y_cur[IDX_C4HI]; + data[jistart + 6095] = 0.0 + k[1762]*y_cur[IDX_C4HI] + k[1784]*y_cur[IDX_C4H2I]; + data[jistart + 6096] = 0.0 + k[1605]*y_cur[IDX_C2H3II] + k[2623]*y_cur[IDX_H3II] + + k[2928]*y_cur[IDX_HCOII]; + data[jistart + 6097] = 0.0 + k[1661]*y_cur[IDX_C6HI]; + data[jistart + 6098] = 0.0 + k[2020]*y_cur[IDX_C4HI]; + data[jistart + 6099] = 0.0 + k[1661]*y_cur[IDX_C2H4II] + k[2056]*y_cur[IDX_CH3II]; + data[jistart + 6100] = 0.0 + k[1494]*y_cur[IDX_C2H2II] + k[1593]*y_cur[IDX_C2H3II]; + data[jistart + 6101] = 0.0 + k[1824]*y_cur[IDX_C4H2II]; + data[jistart + 6102] = 0.0 + k[1762]*y_cur[IDX_C3H2II] + k[1796]*y_cur[IDX_C3H3II] + + k[2020]*y_cur[IDX_CH2CCHII]; + data[jistart + 6103] = 0.0 + k[1784]*y_cur[IDX_C3H2II]; + data[jistart + 6104] = 0.0 + k[1824]*y_cur[IDX_C3HI]; + data[jistart + 6105] = 0.0 + k[1699]*y_cur[IDX_C5II] - k[1705]*y_cur[IDX_C7H2II]; + data[jistart + 6106] = 0.0 - k[1641]*y_cur[IDX_C7H2II] - k[1642]*y_cur[IDX_C7H2II]; + data[jistart + 6107] = 0.0 + k[1593]*y_cur[IDX_C5HI] + k[1605]*y_cur[IDX_C7HI]; + data[jistart + 6108] = 0.0 + k[2183]*y_cur[IDX_C6II] - k[2187]*y_cur[IDX_C7H2II]; + data[jistart + 6109] = 0.0 + k[1738]*y_cur[IDX_C5H2II] - k[1740]*y_cur[IDX_C7H2II]; + data[jistart + 6110] = 0.0 + k[218]*y_cur[IDX_C7H2I] + k[1491]*y_cur[IDX_C5H2I] + + k[1494]*y_cur[IDX_C5HI]; + data[jistart + 6111] = 0.0 + k[2056]*y_cur[IDX_C6HI]; + data[jistart + 6112] = 0.0 - k[1560]*y_cur[IDX_C7H2II] - k[1561]*y_cur[IDX_C7H2II]; + data[jistart + 6113] = 0.0 - k[3432]*y_cur[IDX_C7H2II]; + data[jistart + 6114] = 0.0 - k[3715]*y_cur[IDX_C7H2II]; + data[jistart + 6115] = 0.0 + k[3181]*y_cur[IDX_CH3C6HI]; + data[jistart + 6116] = 0.0 + k[350]*y_cur[IDX_C7H2I]; + data[jistart + 6117] = 0.0 + k[1875]*y_cur[IDX_C6H3II] - k[1877]*y_cur[IDX_C7H2II] - + k[1878]*y_cur[IDX_C7H2II]; + data[jistart + 6118] = 0.0 + k[2928]*y_cur[IDX_C7HI]; + data[jistart + 6119] = 0.0 + k[2623]*y_cur[IDX_C7HI]; + data[jistart + 6120] = 0.0 - k[6826]*y_cur[IDX_C7H2II] - k[6827]*y_cur[IDX_C7H2II]; + data[jistart + 6121] = 0.0 + k[2420]*y_cur[IDX_C7HII]; + data[jistart + 6122] = 0.0 - k[868]*y_cur[IDX_C7H2II] - k[869]*y_cur[IDX_C7H2II]; + data[jistart + 6123] = 0.0 + k[7848] + k[8177]; + data[jistart + 6124] = 0.0 + k[7857]; + data[jistart + 6125] = 0.0 + k[8176]; + data[jistart + 6126] = 0.0 + k[7816] + k[8144]; + data[jistart + 6127] = 0.0 + k[7803] + k[8130]; + data[jistart + 6128] = 0.0 + k[8168]; + data[jistart + 6129] = 0.0 + k[7813] + k[8142]; + data[jistart + 6130] = 0.0 + k[7727] + k[8035]; + data[jistart + 6131] = 0.0 + k[8247]; + data[jistart + 6132] = 0.0 + k[8259] + k[8263]; + data[jistart + 6133] = 0.0 + k[7717] + k[8024]; + data[jistart + 6134] = 0.0 + k[8129]; + data[jistart + 6135] = 0.0 + k[7743] + k[8054]; + data[jistart + 6136] = 0.0 + k[7790] + k[8114]; + data[jistart + 6137] = 0.0 + k[8212]; + data[jistart + 6138] = 0.0 + k[8231] + k[8232] + k[8234]; + data[jistart + 6139] = 0.0 + k[8241]; + data[jistart + 6140] = 0.0 + k[8220]; + data[jistart + 6141] = 0.0 + k[7646] + k[7933]; + data[jistart + 6142] = 0.0 + k[7822] + k[8149]; + data[jistart + 6143] = 0.0 + k[8179]; + data[jistart + 6144] = 0.0 + k[8206]; + data[jistart + 6145] = 0.0 + k[7788] + k[8112]; + data[jistart + 6146] = 0.0 + k[7834] + k[8158]; + data[jistart + 6147] = 0.0 + k[7653] + k[7654] + k[7940] + k[7941]; + data[jistart + 6148] = 0.0 + k[8195]; + data[jistart + 6149] = 0.0 + k[7783] + k[7783] + k[8107] + k[8107]; + data[jistart + 6150] = 0.0 + k[7642] + k[7643] + k[7929] + k[7930]; + data[jistart + 6151] = 0.0 + k[7712] + k[8017]; + data[jistart + 6152] = 0.0 - k[7089] - k[7271] - k[7453] - k[7641] - k[7927] - k[7928] - + k[8285]*y_cur[IDX_GHI] - k[8374]*y_cur[IDX_GH2I] - + k[8410]*y_cur[IDX_GCI] - k[8445]*y_cur[IDX_GOI] - + k[8462]*y_cur[IDX_GNI] - k[8486]*y_cur[IDX_GCHI] - + k[8586]*y_cur[IDX_GHI] - k[8662]*y_cur[IDX_GCI] - + k[8691]*y_cur[IDX_GOI] - k[8703]*y_cur[IDX_GNI] - + k[8719]*y_cur[IDX_GCHI]; + data[jistart + 6153] = 0.0 - k[8462]*y_cur[IDX_GC2I] - k[8703]*y_cur[IDX_GC2I]; + data[jistart + 6154] = 0.0 - k[8445]*y_cur[IDX_GC2I] - k[8691]*y_cur[IDX_GC2I]; + data[jistart + 6155] = 0.0 - k[8486]*y_cur[IDX_GC2I] - k[8719]*y_cur[IDX_GC2I]; + data[jistart + 6156] = 0.0 - k[8374]*y_cur[IDX_GC2I]; + data[jistart + 6157] = 0.0 + k[8394]*y_cur[IDX_GCI] + k[8394]*y_cur[IDX_GCI] - + k[8410]*y_cur[IDX_GC2I] - k[8662]*y_cur[IDX_GC2I]; + data[jistart + 6158] = 0.0 + k[6907]; + data[jistart + 6159] = 0.0 - k[8285]*y_cur[IDX_GC2I] - k[8586]*y_cur[IDX_GC2I]; + data[jistart + 6160] = 0.0 + k[3101]*y_cur[IDX_HeII]; + data[jistart + 6161] = 0.0 + k[1313]*y_cur[IDX_CII] + k[3099]*y_cur[IDX_HeII]; + data[jistart + 6162] = 0.0 + k[3016]*y_cur[IDX_CII] + k[3032]*y_cur[IDX_HeII]; + data[jistart + 6163] = 0.0 - k[235]*y_cur[IDX_C2H4I] - k[788]*y_cur[IDX_eM] - + k[1543]*y_cur[IDX_C2H2I] - k[1686]*y_cur[IDX_C2H4I] - + k[1687]*y_cur[IDX_C2H4I] - k[1688]*y_cur[IDX_C2H4I] - + k[1752]*y_cur[IDX_HC3NI] - k[2157]*y_cur[IDX_CH4I] - + k[2158]*y_cur[IDX_CH4I] - k[2159]*y_cur[IDX_CH4I] - + k[2406]*y_cur[IDX_H2I] - k[2867]*y_cur[IDX_HCNI] - + k[2868]*y_cur[IDX_HCNI] - k[3668]*y_cur[IDX_O2I] - + k[6455]*y_cur[IDX_GRAINM]; + data[jistart + 6164] = 0.0 + k[3217]*y_cur[IDX_HeII]; + data[jistart + 6165] = 0.0 + k[1451]*y_cur[IDX_C2I] + k[2239]*y_cur[IDX_CHI]; + data[jistart + 6166] = 0.0 + k[3184]*y_cur[IDX_HeII]; + data[jistart + 6167] = 0.0 + k[3116]*y_cur[IDX_HeII]; + data[jistart + 6168] = 0.0 + k[1399]*y_cur[IDX_CII] - k[1752]*y_cur[IDX_C3II]; + data[jistart + 6169] = 0.0 + k[1309]*y_cur[IDX_CII]; + data[jistart + 6170] = 0.0 + k[1849]*y_cur[IDX_CI]; + data[jistart + 6171] = 0.0 + k[1933]*y_cur[IDX_C2I] + k[1935]*y_cur[IDX_C2HI]; + data[jistart + 6172] = 0.0 + k[3117]*y_cur[IDX_HeII]; + data[jistart + 6173] = 0.0 + k[3106]*y_cur[IDX_HeII]; + data[jistart + 6174] = 0.0 + k[3162]*y_cur[IDX_HeII]; + data[jistart + 6175] = 0.0 + k[2301]*y_cur[IDX_HII] + k[3097]*y_cur[IDX_HeII]; + data[jistart + 6176] = 0.0 + k[333]*y_cur[IDX_HII]; + data[jistart + 6177] = 0.0 - k[235]*y_cur[IDX_C3II] - k[1686]*y_cur[IDX_C3II] - + k[1687]*y_cur[IDX_C3II] - k[1688]*y_cur[IDX_C3II]; + data[jistart + 6178] = 0.0 - k[3668]*y_cur[IDX_C3II]; + data[jistart + 6179] = 0.0 - k[2157]*y_cur[IDX_C3II] - k[2158]*y_cur[IDX_C3II] - + k[2159]*y_cur[IDX_C3II]; + data[jistart + 6180] = 0.0 + k[1308]*y_cur[IDX_CII] + k[1935]*y_cur[IDX_CHII]; + data[jistart + 6181] = 0.0 - k[2867]*y_cur[IDX_C3II] - k[2868]*y_cur[IDX_C3II]; + data[jistart + 6182] = 0.0 + k[2239]*y_cur[IDX_C2II]; + data[jistart + 6183] = 0.0 + k[1451]*y_cur[IDX_C2II] + k[1933]*y_cur[IDX_CHII]; + data[jistart + 6184] = 0.0 - k[1543]*y_cur[IDX_C3II]; + data[jistart + 6185] = 0.0 + k[3032]*y_cur[IDX_HNC3I] + k[3097]*y_cur[IDX_C3HI] + + k[3099]*y_cur[IDX_C3OI] + k[3101]*y_cur[IDX_C3PI] + + k[3106]*y_cur[IDX_C4I] + k[3116]*y_cur[IDX_C4SI] + + k[3117]*y_cur[IDX_C5I] + k[3162]*y_cur[IDX_CH2CCHI] + + k[3184]*y_cur[IDX_CH3CCHI] + k[3217]*y_cur[IDX_H2CCCI]; + data[jistart + 6186] = 0.0 + k[1308]*y_cur[IDX_C2HI] + k[1309]*y_cur[IDX_C2SI] + + k[1313]*y_cur[IDX_C3OI] + k[1399]*y_cur[IDX_HC3NI] + + k[3016]*y_cur[IDX_HNC3I]; + data[jistart + 6187] = 0.0 + k[333]*y_cur[IDX_C3I] + k[2301]*y_cur[IDX_C3HI]; + data[jistart + 6188] = 0.0 + k[1849]*y_cur[IDX_C2HII]; + data[jistart + 6189] = 0.0 - k[6455]*y_cur[IDX_C3II]; + data[jistart + 6190] = 0.0 - k[2406]*y_cur[IDX_C3II]; + data[jistart + 6191] = 0.0 - k[788]*y_cur[IDX_C3II]; + data[jistart + 6192] = 0.0 + k[3819]*y_cur[IDX_H2SI]; + data[jistart + 6193] = 0.0 + k[2580]*y_cur[IDX_H2SI]; + data[jistart + 6194] = 0.0 + k[2579]*y_cur[IDX_H2SI]; + data[jistart + 6195] = 0.0 + k[2111]*y_cur[IDX_H2SI]; + data[jistart + 6196] = 0.0 + k[3817]*y_cur[IDX_H2SI]; + data[jistart + 6197] = 0.0 - k[1045]*y_cur[IDX_eM] - k[1046]*y_cur[IDX_eM] - + k[1047]*y_cur[IDX_eM] - k[1048]*y_cur[IDX_eM] - + k[2496]*y_cur[IDX_H2COI] - k[2843]*y_cur[IDX_HI] - + k[2876]*y_cur[IDX_HCNI] - k[3040]*y_cur[IDX_HNCI] - + k[3579]*y_cur[IDX_NH3I] - k[3839]*y_cur[IDX_SI] - + k[6450]*y_cur[IDX_GRAINM] - k[6451]*y_cur[IDX_GRAINM] - + k[6452]*y_cur[IDX_GRAINM] - k[6453]*y_cur[IDX_GRAINM]; + data[jistart + 6198] = 0.0 + k[2143]*y_cur[IDX_H2SI]; + data[jistart + 6199] = 0.0 + k[1721]*y_cur[IDX_H2SI]; + data[jistart + 6200] = 0.0 + k[3054]*y_cur[IDX_H2SI] + k[5557]*y_cur[IDX_H2I]; + data[jistart + 6201] = 0.0 + k[3515]*y_cur[IDX_H2SI]; + data[jistart + 6202] = 0.0 + k[2227]*y_cur[IDX_H2SI]; + data[jistart + 6203] = 0.0 + k[2763]*y_cur[IDX_H2SI]; + data[jistart + 6204] = 0.0 + k[1984]*y_cur[IDX_H2SI]; + data[jistart + 6205] = 0.0 + k[3780]*y_cur[IDX_H2SI]; + data[jistart + 6206] = 0.0 + k[2510]*y_cur[IDX_H2SI]; + data[jistart + 6207] = 0.0 + k[1954]*y_cur[IDX_H2SI]; + data[jistart + 6208] = 0.0 + k[2443]*y_cur[IDX_H2I] + k[2574]*y_cur[IDX_H2SI]; + data[jistart + 6209] = 0.0 + k[2892]*y_cur[IDX_H2SI] + k[2893]*y_cur[IDX_H2SI]; + data[jistart + 6210] = 0.0 - k[3040]*y_cur[IDX_H3SII]; + data[jistart + 6211] = 0.0 + k[1518]*y_cur[IDX_C2H2II] + k[1619]*y_cur[IDX_C2H3II] + + k[1721]*y_cur[IDX_C2H5II] + k[1954]*y_cur[IDX_CHII] + + k[1984]*y_cur[IDX_CH2II] + k[2111]*y_cur[IDX_C2H6II] + + k[2143]*y_cur[IDX_CH4II] + k[2227]*y_cur[IDX_CH5II] + + k[2510]*y_cur[IDX_H2OII] + k[2574]*y_cur[IDX_H2SII] + + k[2579]*y_cur[IDX_HS2II] + k[2580]*y_cur[IDX_HSiSII] + + k[2686]*y_cur[IDX_H3II] + k[2763]*y_cur[IDX_H3COII] + + k[2801]*y_cur[IDX_H3OII] + k[2892]*y_cur[IDX_HCNHII] + + k[2893]*y_cur[IDX_HCNHII] + k[2961]*y_cur[IDX_HCOII] + + k[3054]*y_cur[IDX_HSII] + k[3515]*y_cur[IDX_NH2II] + + k[3780]*y_cur[IDX_OHII] + k[3817]*y_cur[IDX_PHII] + + k[3819]*y_cur[IDX_PH3II]; + data[jistart + 6212] = 0.0 + k[1619]*y_cur[IDX_H2SI]; + data[jistart + 6213] = 0.0 - k[2496]*y_cur[IDX_H3SII]; + data[jistart + 6214] = 0.0 - k[2876]*y_cur[IDX_H3SII]; + data[jistart + 6215] = 0.0 - k[3839]*y_cur[IDX_H3SII]; + data[jistart + 6216] = 0.0 - k[3579]*y_cur[IDX_H3SII]; + data[jistart + 6217] = 0.0 + k[1518]*y_cur[IDX_H2SI]; + data[jistart + 6218] = 0.0 + k[2801]*y_cur[IDX_H2SI]; + data[jistart + 6219] = 0.0 + k[2961]*y_cur[IDX_H2SI]; + data[jistart + 6220] = 0.0 + k[2686]*y_cur[IDX_H2SI]; + data[jistart + 6221] = 0.0 - k[6450]*y_cur[IDX_H3SII] - k[6451]*y_cur[IDX_H3SII] - + k[6452]*y_cur[IDX_H3SII] - k[6453]*y_cur[IDX_H3SII]; + data[jistart + 6222] = 0.0 + k[2443]*y_cur[IDX_H2SII] + k[5557]*y_cur[IDX_HSII]; + data[jistart + 6223] = 0.0 - k[1045]*y_cur[IDX_H3SII] - k[1046]*y_cur[IDX_H3SII] - + k[1047]*y_cur[IDX_H3SII] - k[1048]*y_cur[IDX_H3SII]; + data[jistart + 6224] = 0.0 - k[2843]*y_cur[IDX_H3SII]; + data[jistart + 6225] = 0.0 - k[1175]*y_cur[IDX_eM] - k[1463]*y_cur[IDX_C2I] - + k[1749]*y_cur[IDX_C2HI] - k[1913]*y_cur[IDX_CI] - + k[2015]*y_cur[IDX_CH2I] - k[2263]*y_cur[IDX_CHI] - + k[2279]*y_cur[IDX_CNI] - k[2289]*y_cur[IDX_COI] - + k[2468]*y_cur[IDX_H2I] - k[2499]*y_cur[IDX_H2COI] - + k[2561]*y_cur[IDX_H2OI] - k[2883]*y_cur[IDX_HCNI] - + k[3011]*y_cur[IDX_HCOI] - k[3045]*y_cur[IDX_HNCI] - + k[3367]*y_cur[IDX_N2I] - k[3466]*y_cur[IDX_NI] - + k[3546]*y_cur[IDX_NH2I] - k[3594]*y_cur[IDX_NH3I] - + k[3622]*y_cur[IDX_NHI] - k[3627]*y_cur[IDX_NOI] - + k[3677]*y_cur[IDX_CO2I] - k[3749]*y_cur[IDX_OI] - + k[3806]*y_cur[IDX_OHI] - k[3840]*y_cur[IDX_SI] - + k[6437]*y_cur[IDX_GRAINM]; + data[jistart + 6226] = 0.0 + k[3502]*y_cur[IDX_O2I]; + data[jistart + 6227] = 0.0 + k[2395]*y_cur[IDX_O2I]; + data[jistart + 6228] = 0.0 - k[3546]*y_cur[IDX_O2HII]; + data[jistart + 6229] = 0.0 - k[3677]*y_cur[IDX_O2HII]; + data[jistart + 6230] = 0.0 + k[3010]*y_cur[IDX_HCOI]; + data[jistart + 6231] = 0.0 - k[3622]*y_cur[IDX_O2HII]; + data[jistart + 6232] = 0.0 - k[2015]*y_cur[IDX_O2HII]; + data[jistart + 6233] = 0.0 - k[3045]*y_cur[IDX_O2HII]; + data[jistart + 6234] = 0.0 - k[3367]*y_cur[IDX_O2HII]; + data[jistart + 6235] = 0.0 + k[2395]*y_cur[IDX_H2II] + k[2729]*y_cur[IDX_H3II] + + k[3502]*y_cur[IDX_NHII]; + data[jistart + 6236] = 0.0 - k[3627]*y_cur[IDX_O2HII]; + data[jistart + 6237] = 0.0 + k[3010]*y_cur[IDX_O2II] - k[3011]*y_cur[IDX_O2HII]; + data[jistart + 6238] = 0.0 - k[1749]*y_cur[IDX_O2HII]; + data[jistart + 6239] = 0.0 - k[2499]*y_cur[IDX_O2HII]; + data[jistart + 6240] = 0.0 - k[2883]*y_cur[IDX_O2HII]; + data[jistart + 6241] = 0.0 - k[2263]*y_cur[IDX_O2HII]; + data[jistart + 6242] = 0.0 - k[3840]*y_cur[IDX_O2HII]; + data[jistart + 6243] = 0.0 - k[1463]*y_cur[IDX_O2HII]; + data[jistart + 6244] = 0.0 - k[3806]*y_cur[IDX_O2HII]; + data[jistart + 6245] = 0.0 - k[3594]*y_cur[IDX_O2HII]; + data[jistart + 6246] = 0.0 - k[2279]*y_cur[IDX_O2HII]; + data[jistart + 6247] = 0.0 - k[3466]*y_cur[IDX_O2HII]; + data[jistart + 6248] = 0.0 - k[3749]*y_cur[IDX_O2HII]; + data[jistart + 6249] = 0.0 - k[2561]*y_cur[IDX_O2HII]; + data[jistart + 6250] = 0.0 - k[1913]*y_cur[IDX_O2HII]; + data[jistart + 6251] = 0.0 + k[2729]*y_cur[IDX_O2I]; + data[jistart + 6252] = 0.0 - k[2289]*y_cur[IDX_O2HII]; + data[jistart + 6253] = 0.0 - k[6437]*y_cur[IDX_O2HII]; + data[jistart + 6254] = 0.0 - k[2468]*y_cur[IDX_O2HII]; + data[jistart + 6255] = 0.0 - k[1175]*y_cur[IDX_O2HII]; + data[jistart + 6256] = 0.0 + k[1357]*y_cur[IDX_CII]; + data[jistart + 6257] = 0.0 + k[2418]*y_cur[IDX_H2I]; + data[jistart + 6258] = 0.0 + k[5552]*y_cur[IDX_H2I]; + data[jistart + 6259] = 0.0 + k[2178]*y_cur[IDX_CH4I]; + data[jistart + 6260] = 0.0 + k[1871]*y_cur[IDX_CI]; + data[jistart + 6261] = 0.0 - k[852]*y_cur[IDX_eM] - k[853]*y_cur[IDX_eM] - + k[1639]*y_cur[IDX_C2H3I] - k[1640]*y_cur[IDX_C2H3I] - + k[1703]*y_cur[IDX_C2H4I] - k[1739]*y_cur[IDX_C2HI] - + k[1792]*y_cur[IDX_C3H2I] - k[1793]*y_cur[IDX_C3H2I] - + k[1827]*y_cur[IDX_C3HI] - k[1872]*y_cur[IDX_CI] - + k[1873]*y_cur[IDX_CI] - k[2039]*y_cur[IDX_CH2CCHI] - + k[2040]*y_cur[IDX_CH2CCHI] - k[2110]*y_cur[IDX_CH3CCHI] - + k[2185]*y_cur[IDX_CH4I] - k[2186]*y_cur[IDX_CH4I] - + k[2483]*y_cur[IDX_H2CCCI] - k[2484]*y_cur[IDX_H2CCCI] - + k[3423]*y_cur[IDX_NI] - k[3710]*y_cur[IDX_OI] - + k[6785]*y_cur[IDX_GRAINM] - k[6786]*y_cur[IDX_GRAINM]; + data[jistart + 6262] = 0.0 + k[1782]*y_cur[IDX_C3H2II] - k[2483]*y_cur[IDX_C6H2II] - + k[2484]*y_cur[IDX_C6H2II]; + data[jistart + 6263] = 0.0 + k[217]*y_cur[IDX_C2H2II] + k[347]*y_cur[IDX_HII] + k[6036]; + data[jistart + 6264] = 0.0 + k[1759]*y_cur[IDX_C3H2II] - k[1792]*y_cur[IDX_C6H2II] - + k[1793]*y_cur[IDX_C6H2II]; + data[jistart + 6265] = 0.0 + k[1551]*y_cur[IDX_C2H2I]; + data[jistart + 6266] = 0.0 - k[2110]*y_cur[IDX_C6H2II]; + data[jistart + 6267] = 0.0 + k[1820]*y_cur[IDX_C3HI]; + data[jistart + 6268] = 0.0 + k[1759]*y_cur[IDX_C3H2I] + k[1782]*y_cur[IDX_H2CCCI] + + k[1819]*y_cur[IDX_C3HI]; + data[jistart + 6269] = 0.0 + k[1657]*y_cur[IDX_C5HI]; + data[jistart + 6270] = 0.0 - k[2039]*y_cur[IDX_C6H2II] - k[2040]*y_cur[IDX_C6H2II]; + data[jistart + 6271] = 0.0 + k[1828]*y_cur[IDX_C3HI]; + data[jistart + 6272] = 0.0 + k[1599]*y_cur[IDX_C2H3II] + k[2620]*y_cur[IDX_H3II] + + k[2925]*y_cur[IDX_HCOII]; + data[jistart + 6273] = 0.0 + k[1657]*y_cur[IDX_C2H4II] + k[2054]*y_cur[IDX_CH3II]; + data[jistart + 6274] = 0.0 + k[1819]*y_cur[IDX_C3H2II] + k[1820]*y_cur[IDX_C3H3II] - + k[1827]*y_cur[IDX_C6H2II] + k[1828]*y_cur[IDX_CH2CCHII]; + data[jistart + 6275] = 0.0 + k[1490]*y_cur[IDX_C2H2II] + k[1587]*y_cur[IDX_C2H3II]; + data[jistart + 6276] = 0.0 + k[1520]*y_cur[IDX_C2H2II] + k[1837]*y_cur[IDX_C4H2II]; + data[jistart + 6277] = 0.0 + k[1736]*y_cur[IDX_C2HI] + k[1837]*y_cur[IDX_C4H2I]; + data[jistart + 6278] = 0.0 - k[1703]*y_cur[IDX_C6H2II]; + data[jistart + 6279] = 0.0 - k[1639]*y_cur[IDX_C6H2II] - k[1640]*y_cur[IDX_C6H2II]; + data[jistart + 6280] = 0.0 + k[1587]*y_cur[IDX_C4HI] + k[1599]*y_cur[IDX_C6HI]; + data[jistart + 6281] = 0.0 + k[2178]*y_cur[IDX_C5II] - k[2185]*y_cur[IDX_C6H2II] - + k[2186]*y_cur[IDX_C6H2II]; + data[jistart + 6282] = 0.0 + k[1736]*y_cur[IDX_C4H2II] - k[1739]*y_cur[IDX_C6H2II]; + data[jistart + 6283] = 0.0 + k[217]*y_cur[IDX_C6H2I] + k[1490]*y_cur[IDX_C4HI] + + k[1520]*y_cur[IDX_C4H2I]; + data[jistart + 6284] = 0.0 + k[2054]*y_cur[IDX_C5HI]; + data[jistart + 6285] = 0.0 + k[1551]*y_cur[IDX_C4HII]; + data[jistart + 6286] = 0.0 - k[3423]*y_cur[IDX_C6H2II]; + data[jistart + 6287] = 0.0 - k[3710]*y_cur[IDX_C6H2II]; + data[jistart + 6288] = 0.0 + k[1357]*y_cur[IDX_CH3C4HI]; + data[jistart + 6289] = 0.0 + k[347]*y_cur[IDX_C6H2I]; + data[jistart + 6290] = 0.0 + k[1871]*y_cur[IDX_C5H3II] - k[1872]*y_cur[IDX_C6H2II] - + k[1873]*y_cur[IDX_C6H2II]; + data[jistart + 6291] = 0.0 + k[2925]*y_cur[IDX_C6HI]; + data[jistart + 6292] = 0.0 + k[2620]*y_cur[IDX_C6HI]; + data[jistart + 6293] = 0.0 - k[6785]*y_cur[IDX_C6H2II] - k[6786]*y_cur[IDX_C6H2II]; + data[jistart + 6294] = 0.0 + k[2418]*y_cur[IDX_C6HII] + k[5552]*y_cur[IDX_C6II]; + data[jistart + 6295] = 0.0 - k[852]*y_cur[IDX_C6H2II] - k[853]*y_cur[IDX_C6H2II]; + data[jistart + 6296] = 0.0 - k[2136]*y_cur[IDX_CH4II]; + data[jistart + 6297] = 0.0 + k[286]*y_cur[IDX_CH4I]; + data[jistart + 6298] = 0.0 - k[277]*y_cur[IDX_C2H2I] - k[278]*y_cur[IDX_C2H4I] - + k[279]*y_cur[IDX_CH3OHI] - k[280]*y_cur[IDX_H2COI] - + k[281]*y_cur[IDX_H2SI] - k[282]*y_cur[IDX_NH3I] - + k[283]*y_cur[IDX_O2I] - k[284]*y_cur[IDX_OCSI] - + k[968]*y_cur[IDX_eM] - k[969]*y_cur[IDX_eM] - + k[2133]*y_cur[IDX_C2H2I] - k[2134]*y_cur[IDX_C2H2I] - + k[2135]*y_cur[IDX_C2H4I] - k[2136]*y_cur[IDX_C2H5CNI] - + k[2137]*y_cur[IDX_CH3OHI] - k[2138]*y_cur[IDX_CH4I] - + k[2139]*y_cur[IDX_CO2I] - k[2140]*y_cur[IDX_COI] - + k[2141]*y_cur[IDX_H2COI] - k[2142]*y_cur[IDX_H2OI] - + k[2143]*y_cur[IDX_H2SI] - k[2144]*y_cur[IDX_NH3I] - + k[2145]*y_cur[IDX_OCSI] - k[2432]*y_cur[IDX_H2I] - + k[2839]*y_cur[IDX_HI] - k[3727]*y_cur[IDX_OI] - k[6125] - k[6126] - + k[6327]*y_cur[IDX_GRAINM] - k[6328]*y_cur[IDX_GRAINM]; + data[jistart + 6299] = 0.0 + k[442]*y_cur[IDX_CH4I]; + data[jistart + 6300] = 0.0 - k[284]*y_cur[IDX_CH4II] - k[2145]*y_cur[IDX_CH4II]; + data[jistart + 6301] = 0.0 + k[285]*y_cur[IDX_CH4I]; + data[jistart + 6302] = 0.0 + k[2840]*y_cur[IDX_HI]; + data[jistart + 6303] = 0.0 - k[279]*y_cur[IDX_CH4II] - k[2137]*y_cur[IDX_CH4II]; + data[jistart + 6304] = 0.0 - k[2139]*y_cur[IDX_CH4II]; + data[jistart + 6305] = 0.0 + k[546]*y_cur[IDX_CH4I]; + data[jistart + 6306] = 0.0 + k[652]*y_cur[IDX_CH4I]; + data[jistart + 6307] = 0.0 - k[278]*y_cur[IDX_CH4II] - k[2135]*y_cur[IDX_CH4II]; + data[jistart + 6308] = 0.0 - k[283]*y_cur[IDX_CH4II]; + data[jistart + 6309] = 0.0 - k[281]*y_cur[IDX_CH4II] - k[2143]*y_cur[IDX_CH4II]; + data[jistart + 6310] = 0.0 + k[2082]*y_cur[IDX_CH3II]; + data[jistart + 6311] = 0.0 + k[285]*y_cur[IDX_COII] + k[286]*y_cur[IDX_CO2II] + + k[371]*y_cur[IDX_HII] + k[442]*y_cur[IDX_H2II] + + k[514]*y_cur[IDX_HeII] + k[546]*y_cur[IDX_NII] + + k[652]*y_cur[IDX_OII] - k[2138]*y_cur[IDX_CH4II] + k[6129]; + data[jistart + 6312] = 0.0 - k[280]*y_cur[IDX_CH4II] - k[2141]*y_cur[IDX_CH4II]; + data[jistart + 6313] = 0.0 - k[282]*y_cur[IDX_CH4II] - k[2144]*y_cur[IDX_CH4II]; + data[jistart + 6314] = 0.0 + k[2082]*y_cur[IDX_HCOI]; + data[jistart + 6315] = 0.0 - k[277]*y_cur[IDX_CH4II] - k[2133]*y_cur[IDX_CH4II] - + k[2134]*y_cur[IDX_CH4II]; + data[jistart + 6316] = 0.0 + k[2641]*y_cur[IDX_H3II]; + data[jistart + 6317] = 0.0 - k[3727]*y_cur[IDX_CH4II]; + data[jistart + 6318] = 0.0 + k[514]*y_cur[IDX_CH4I]; + data[jistart + 6319] = 0.0 - k[2142]*y_cur[IDX_CH4II]; + data[jistart + 6320] = 0.0 + k[371]*y_cur[IDX_CH4I]; + data[jistart + 6321] = 0.0 + k[2641]*y_cur[IDX_CH3I]; + data[jistart + 6322] = 0.0 - k[2140]*y_cur[IDX_CH4II]; + data[jistart + 6323] = 0.0 - k[6327]*y_cur[IDX_CH4II] - k[6328]*y_cur[IDX_CH4II]; + data[jistart + 6324] = 0.0 - k[2432]*y_cur[IDX_CH4II]; + data[jistart + 6325] = 0.0 - k[968]*y_cur[IDX_CH4II] - k[969]*y_cur[IDX_CH4II]; + data[jistart + 6326] = 0.0 - k[2839]*y_cur[IDX_CH4II] + k[2840]*y_cur[IDX_CH5II]; + data[jistart + 6327] = 0.0 + k[3627]*y_cur[IDX_NOI]; + data[jistart + 6328] = 0.0 - k[626]*y_cur[IDX_NOI] - k[1121]*y_cur[IDX_eM] - + k[1460]*y_cur[IDX_C2I] - k[1747]*y_cur[IDX_C2HI] - + k[1907]*y_cur[IDX_CI] - k[2009]*y_cur[IDX_CH2I] - + k[2202]*y_cur[IDX_CH4I] - k[2254]*y_cur[IDX_CHI] - + k[2278]*y_cur[IDX_CNI] - k[2286]*y_cur[IDX_COI] - + k[2497]*y_cur[IDX_H2COI] - k[2550]*y_cur[IDX_H2OI] - + k[2878]*y_cur[IDX_HCNI] - k[3008]*y_cur[IDX_HCOI] - + k[3042]*y_cur[IDX_HNCI] - k[3049]*y_cur[IDX_CO2I] - + k[3050]*y_cur[IDX_SI] - k[3366]*y_cur[IDX_N2I] - + k[3543]*y_cur[IDX_NH2I] - k[3588]*y_cur[IDX_NH3I] - + k[3615]*y_cur[IDX_NHI] - k[3740]*y_cur[IDX_OI] - + k[3803]*y_cur[IDX_OHI] - k[6422]*y_cur[IDX_GRAINM]; + data[jistart + 6329] = 0.0 + k[3483]*y_cur[IDX_CO2I] + k[3490]*y_cur[IDX_H2OI]; + data[jistart + 6330] = 0.0 + k[2394]*y_cur[IDX_NOI]; + data[jistart + 6331] = 0.0 + k[3525]*y_cur[IDX_O2I] + k[3746]*y_cur[IDX_OI]; + data[jistart + 6332] = 0.0 - k[3543]*y_cur[IDX_HNOII]; + data[jistart + 6333] = 0.0 + k[3787]*y_cur[IDX_NOI]; + data[jistart + 6334] = 0.0 + k[3457]*y_cur[IDX_NI]; + data[jistart + 6335] = 0.0 - k[3049]*y_cur[IDX_HNOII] + k[3483]*y_cur[IDX_NHII]; + data[jistart + 6336] = 0.0 + k[3620]*y_cur[IDX_NHI]; + data[jistart + 6337] = 0.0 - k[3615]*y_cur[IDX_HNOII] + k[3620]*y_cur[IDX_O2II]; + data[jistart + 6338] = 0.0 - k[2009]*y_cur[IDX_HNOII]; + data[jistart + 6339] = 0.0 - k[3042]*y_cur[IDX_HNOII]; + data[jistart + 6340] = 0.0 + k[3747]*y_cur[IDX_OI]; + data[jistart + 6341] = 0.0 - k[3366]*y_cur[IDX_HNOII]; + data[jistart + 6342] = 0.0 + k[3525]*y_cur[IDX_NH2II]; + data[jistart + 6343] = 0.0 - k[626]*y_cur[IDX_HNOII] + k[2394]*y_cur[IDX_H2II] + + k[2726]*y_cur[IDX_H3II] + k[3627]*y_cur[IDX_O2HII] + + k[3787]*y_cur[IDX_OHII]; + data[jistart + 6344] = 0.0 - k[3008]*y_cur[IDX_HNOII]; + data[jistart + 6345] = 0.0 - k[2202]*y_cur[IDX_HNOII]; + data[jistart + 6346] = 0.0 - k[1747]*y_cur[IDX_HNOII]; + data[jistart + 6347] = 0.0 - k[2497]*y_cur[IDX_HNOII]; + data[jistart + 6348] = 0.0 - k[2878]*y_cur[IDX_HNOII]; + data[jistart + 6349] = 0.0 - k[2254]*y_cur[IDX_HNOII]; + data[jistart + 6350] = 0.0 - k[3050]*y_cur[IDX_HNOII]; + data[jistart + 6351] = 0.0 - k[1460]*y_cur[IDX_HNOII]; + data[jistart + 6352] = 0.0 - k[3803]*y_cur[IDX_HNOII]; + data[jistart + 6353] = 0.0 - k[3588]*y_cur[IDX_HNOII]; + data[jistart + 6354] = 0.0 - k[2278]*y_cur[IDX_HNOII]; + data[jistart + 6355] = 0.0 + k[3457]*y_cur[IDX_H2OII]; + data[jistart + 6356] = 0.0 - k[3740]*y_cur[IDX_HNOII] + k[3746]*y_cur[IDX_NH2II] + + k[3747]*y_cur[IDX_NH3II]; + data[jistart + 6357] = 0.0 - k[2550]*y_cur[IDX_HNOII] + k[3490]*y_cur[IDX_NHII]; + data[jistart + 6358] = 0.0 - k[1907]*y_cur[IDX_HNOII]; + data[jistart + 6359] = 0.0 + k[2726]*y_cur[IDX_NOI]; + data[jistart + 6360] = 0.0 - k[2286]*y_cur[IDX_HNOII]; + data[jistart + 6361] = 0.0 - k[6422]*y_cur[IDX_HNOII]; + data[jistart + 6362] = 0.0 - k[1121]*y_cur[IDX_HNOII]; + data[jistart + 6363] = 0.0 + k[7128] + k[7310] + k[7492]; + data[jistart + 6364] = 0.0 + k[802]*y_cur[IDX_eM] + k[6480]*y_cur[IDX_GRAINM]; + data[jistart + 6365] = 0.0 - k[2483]*y_cur[IDX_H2CCCI] - k[2484]*y_cur[IDX_H2CCCI]; + data[jistart + 6366] = 0.0 - k[1388]*y_cur[IDX_CII] - k[1389]*y_cur[IDX_CII] - + k[1516]*y_cur[IDX_C2H2II] - k[1517]*y_cur[IDX_C2H2II] - + k[1616]*y_cur[IDX_C2H3II] - k[1617]*y_cur[IDX_C2H3II] - + k[1618]*y_cur[IDX_C2H3II] - k[1672]*y_cur[IDX_C2H4II] - + k[1673]*y_cur[IDX_C2H4II] - k[1782]*y_cur[IDX_C3H2II] - + k[1783]*y_cur[IDX_C3H2II] - k[2076]*y_cur[IDX_CH3II] - + k[2335]*y_cur[IDX_HII] - k[2336]*y_cur[IDX_HII] - + k[2476]*y_cur[IDX_C3H3II] - k[2477]*y_cur[IDX_C3H3II] - + k[2478]*y_cur[IDX_C4HII] - k[2479]*y_cur[IDX_C4H2II] - + k[2480]*y_cur[IDX_C4H3II] - k[2481]*y_cur[IDX_C5H2II] - + k[2482]*y_cur[IDX_C5H2II] - k[2483]*y_cur[IDX_C6H2II] - + k[2484]*y_cur[IDX_C6H2II] - k[2485]*y_cur[IDX_CH2CCHII] - + k[2486]*y_cur[IDX_CH2CCHII] - k[2681]*y_cur[IDX_H3II] - + k[2798]*y_cur[IDX_H3OII] - k[2957]*y_cur[IDX_HCOII] - + k[3217]*y_cur[IDX_HeII] - k[3218]*y_cur[IDX_HeII] - + k[3827]*y_cur[IDX_SII] - k[3868]*y_cur[IDX_SiII] - + k[4959]*y_cur[IDX_CI] - k[5395]*y_cur[IDX_OI] - k[5834] - k[6149] - + k[6150] - k[6946]; + data[jistart + 6367] = 0.0 - k[2481]*y_cur[IDX_H2CCCI] - k[2482]*y_cur[IDX_H2CCCI]; + data[jistart + 6368] = 0.0 + k[6082]; + data[jistart + 6369] = 0.0 - k[2478]*y_cur[IDX_H2CCCI]; + data[jistart + 6370] = 0.0 + k[6107]; + data[jistart + 6371] = 0.0 + k[90]*y_cur[IDX_HI]; + data[jistart + 6372] = 0.0 - k[2476]*y_cur[IDX_H2CCCI] - k[2477]*y_cur[IDX_H2CCCI]; + data[jistart + 6373] = 0.0 - k[1782]*y_cur[IDX_H2CCCI] - k[1783]*y_cur[IDX_H2CCCI]; + data[jistart + 6374] = 0.0 - k[1672]*y_cur[IDX_H2CCCI] - k[1673]*y_cur[IDX_H2CCCI]; + data[jistart + 6375] = 0.0 - k[2480]*y_cur[IDX_H2CCCI]; + data[jistart + 6376] = 0.0 + k[911]*y_cur[IDX_eM] - k[2485]*y_cur[IDX_H2CCCI] - + k[2486]*y_cur[IDX_H2CCCI] + k[6471]*y_cur[IDX_GRAINM]; + data[jistart + 6377] = 0.0 - k[2479]*y_cur[IDX_H2CCCI]; + data[jistart + 6378] = 0.0 - k[3868]*y_cur[IDX_H2CCCI]; + data[jistart + 6379] = 0.0 - k[3827]*y_cur[IDX_H2CCCI]; + data[jistart + 6380] = 0.0 - k[1616]*y_cur[IDX_H2CCCI] - k[1617]*y_cur[IDX_H2CCCI] - + k[1618]*y_cur[IDX_H2CCCI]; + data[jistart + 6381] = 0.0 + k[5064]*y_cur[IDX_C2H2I]; + data[jistart + 6382] = 0.0 - k[1516]*y_cur[IDX_H2CCCI] - k[1517]*y_cur[IDX_H2CCCI]; + data[jistart + 6383] = 0.0 - k[2076]*y_cur[IDX_H2CCCI]; + data[jistart + 6384] = 0.0 + k[5064]*y_cur[IDX_CHI]; + data[jistart + 6385] = 0.0 - k[2798]*y_cur[IDX_H2CCCI]; + data[jistart + 6386] = 0.0 - k[5395]*y_cur[IDX_H2CCCI]; + data[jistart + 6387] = 0.0 - k[3217]*y_cur[IDX_H2CCCI] - k[3218]*y_cur[IDX_H2CCCI]; + data[jistart + 6388] = 0.0 - k[1388]*y_cur[IDX_H2CCCI] - k[1389]*y_cur[IDX_H2CCCI]; + data[jistart + 6389] = 0.0 - k[2335]*y_cur[IDX_H2CCCI] - k[2336]*y_cur[IDX_H2CCCI]; + data[jistart + 6390] = 0.0 - k[4959]*y_cur[IDX_H2CCCI]; + data[jistart + 6391] = 0.0 - k[2957]*y_cur[IDX_H2CCCI]; + data[jistart + 6392] = 0.0 - k[2681]*y_cur[IDX_H2CCCI]; + data[jistart + 6393] = 0.0 + k[6471]*y_cur[IDX_CH2CCHII] + k[6480]*y_cur[IDX_C3H4II]; + data[jistart + 6394] = 0.0 + k[802]*y_cur[IDX_C3H4II] + k[911]*y_cur[IDX_CH2CCHII]; + data[jistart + 6395] = 0.0 + k[90]*y_cur[IDX_C3HM]; + data[jistart + 6396] = 0.0 + k[860]*y_cur[IDX_eM] + k[6806]*y_cur[IDX_GRAINM]; + data[jistart + 6397] = 0.0 + k[7225] + k[7407] + k[7589]; + data[jistart + 6398] = 0.0 + k[8729]*y_cur[IDX_GCHI]; + data[jistart + 6399] = 0.0 + k[8639]*y_cur[IDX_GHI]; + data[jistart + 6400] = 0.0 + k[861]*y_cur[IDX_eM] + k[6807]*y_cur[IDX_GRAINM]; + data[jistart + 6401] = 0.0 + k[856]*y_cur[IDX_eM] + k[6796]*y_cur[IDX_GRAINM]; + data[jistart + 6402] = 0.0 + k[4950]*y_cur[IDX_CI]; + data[jistart + 6403] = 0.0 + k[858]*y_cur[IDX_eM] + k[6802]*y_cur[IDX_GRAINM]; + data[jistart + 6404] = 0.0 + k[5751]; + data[jistart + 6405] = 0.0 + k[854]*y_cur[IDX_eM] + k[6789]*y_cur[IDX_GRAINM]; + data[jistart + 6406] = 0.0 + k[3716]*y_cur[IDX_OI]; + data[jistart + 6407] = 0.0 - k[217]*y_cur[IDX_C2H2II] - k[347]*y_cur[IDX_HII] - + k[1326]*y_cur[IDX_CII] - k[1327]*y_cur[IDX_CII] - + k[1495]*y_cur[IDX_C2H2II] - k[1496]*y_cur[IDX_C2H2II] - + k[1595]*y_cur[IDX_C2H3II] - k[1596]*y_cur[IDX_C2H3II] - + k[1597]*y_cur[IDX_C2H3II] - k[1659]*y_cur[IDX_C2H4II] - + k[1660]*y_cur[IDX_C2H4II] - k[1767]*y_cur[IDX_C3H2II] - + k[1768]*y_cur[IDX_C3H2II] - k[1802]*y_cur[IDX_C3H3II] - + k[2026]*y_cur[IDX_CH2CCHII] - k[2055]*y_cur[IDX_CH3II] - + k[2306]*y_cur[IDX_HII] - k[2618]*y_cur[IDX_H3II] - + k[2923]*y_cur[IDX_HCOII] - k[3127]*y_cur[IDX_HeII] - + k[3128]*y_cur[IDX_HeII] - k[3129]*y_cur[IDX_HeII] - + k[4891]*y_cur[IDX_C2HI] - k[4932]*y_cur[IDX_CI] - + k[5107]*y_cur[IDX_CNI] - k[5750] - k[6036] - k[6037] - k[7043]; + data[jistart + 6408] = 0.0 + k[5022]*y_cur[IDX_C4HI]; + data[jistart + 6409] = 0.0 + k[5053]*y_cur[IDX_C4HI]; + data[jistart + 6410] = 0.0 + k[5050]*y_cur[IDX_C4HI]; + data[jistart + 6411] = 0.0 + k[98]*y_cur[IDX_HI]; + data[jistart + 6412] = 0.0 - k[1802]*y_cur[IDX_C6H2I]; + data[jistart + 6413] = 0.0 + k[8729]*y_cur[IDX_GC5HI]; + data[jistart + 6414] = 0.0 - k[1767]*y_cur[IDX_C6H2I] - k[1768]*y_cur[IDX_C6H2I]; + data[jistart + 6415] = 0.0 - k[1659]*y_cur[IDX_C6H2I] - k[1660]*y_cur[IDX_C6H2I]; + data[jistart + 6416] = 0.0 - k[2026]*y_cur[IDX_C6H2I]; + data[jistart + 6417] = 0.0 + k[4877]*y_cur[IDX_C2H2I] + k[4884]*y_cur[IDX_C2H4I] + + k[5022]*y_cur[IDX_CH2CCH2I] + k[5050]*y_cur[IDX_CH3CCHI] + + k[5053]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6418] = 0.0 + k[4900]*y_cur[IDX_C2HI]; + data[jistart + 6419] = 0.0 + k[4884]*y_cur[IDX_C4HI]; + data[jistart + 6420] = 0.0 - k[1595]*y_cur[IDX_C6H2I] - k[1596]*y_cur[IDX_C6H2I] - + k[1597]*y_cur[IDX_C6H2I]; + data[jistart + 6421] = 0.0 - k[4891]*y_cur[IDX_C6H2I] + k[4900]*y_cur[IDX_C4H2I]; + data[jistart + 6422] = 0.0 - k[217]*y_cur[IDX_C6H2I] - k[1495]*y_cur[IDX_C6H2I] - + k[1496]*y_cur[IDX_C6H2I]; + data[jistart + 6423] = 0.0 - k[2055]*y_cur[IDX_C6H2I]; + data[jistart + 6424] = 0.0 + k[4877]*y_cur[IDX_C4HI]; + data[jistart + 6425] = 0.0 - k[5107]*y_cur[IDX_C6H2I]; + data[jistart + 6426] = 0.0 + k[8639]*y_cur[IDX_GC6HI]; + data[jistart + 6427] = 0.0 + k[3716]*y_cur[IDX_C7H3II]; + data[jistart + 6428] = 0.0 - k[3127]*y_cur[IDX_C6H2I] - k[3128]*y_cur[IDX_C6H2I] - + k[3129]*y_cur[IDX_C6H2I]; + data[jistart + 6429] = 0.0 - k[1326]*y_cur[IDX_C6H2I] - k[1327]*y_cur[IDX_C6H2I]; + data[jistart + 6430] = 0.0 - k[347]*y_cur[IDX_C6H2I] - k[2306]*y_cur[IDX_C6H2I]; + data[jistart + 6431] = 0.0 - k[4932]*y_cur[IDX_C6H2I] + k[4950]*y_cur[IDX_CH3C4HI]; + data[jistart + 6432] = 0.0 - k[2923]*y_cur[IDX_C6H2I]; + data[jistart + 6433] = 0.0 - k[2618]*y_cur[IDX_C6H2I]; + data[jistart + 6434] = 0.0 + k[6789]*y_cur[IDX_C6H3II] + k[6796]*y_cur[IDX_C6H4II] + + k[6802]*y_cur[IDX_C6H5II] + k[6806]*y_cur[IDX_C6H6II] + + k[6807]*y_cur[IDX_C6H7II]; + data[jistart + 6435] = 0.0 + k[854]*y_cur[IDX_C6H3II] + k[856]*y_cur[IDX_C6H4II] + + k[858]*y_cur[IDX_C6H5II] + k[860]*y_cur[IDX_C6H6II] + + k[861]*y_cur[IDX_C6H7II]; + data[jistart + 6436] = 0.0 + k[98]*y_cur[IDX_C6HM]; + data[jistart + 6437] = 0.0 + k[7739] + k[8050]; + data[jistart + 6438] = 0.0 + k[7801] + k[7801] + k[8126] + k[8126] + k[8128] + k[8128]; + data[jistart + 6439] = 0.0 + k[7836] + k[8160]; + data[jistart + 6440] = 0.0 + k[7797]; + data[jistart + 6441] = 0.0 + k[7755] + k[8069]; + data[jistart + 6442] = 0.0 + k[7754] + k[8068]; + data[jistart + 6443] = 0.0 + k[7806] + k[8135]; + data[jistart + 6444] = 0.0 + k[7885]; + data[jistart + 6445] = 0.0 + k[7726] + k[8034]; + data[jistart + 6446] = 0.0 + k[7735] + k[8044]; + data[jistart + 6447] = 0.0 + k[7855] + k[8187]; + data[jistart + 6448] = 0.0 + k[7870] + k[8216] + k[8217]; + data[jistart + 6449] = 0.0 + k[7879] + k[8252] + k[8253]; + data[jistart + 6450] = 0.0 + k[7804] + k[8131]; + data[jistart + 6451] = 0.0 + k[7798] + k[8123]; + data[jistart + 6452] = 0.0 + k[7809] + k[8138]; + data[jistart + 6453] = 0.0 + k[7877] + k[8246]; + data[jistart + 6454] = 0.0 + k[7747] + k[8061] + k[8401]*y_cur[IDX_GCI]; + data[jistart + 6455] = 0.0 + k[7718] + k[8025]; + data[jistart + 6456] = 0.0 + k[7741] + k[8052] + k[8402]*y_cur[IDX_GCI]; + data[jistart + 6457] = 0.0 + k[7650] + k[7937]; + data[jistart + 6458] = 0.0 + k[8400]*y_cur[IDX_GCI]; + data[jistart + 6459] = 0.0 + k[7854] + k[8186]; + data[jistart + 6460] = 0.0 + k[7790] + k[8114]; + data[jistart + 6461] = 0.0 + k[7868] + k[8211]; + data[jistart + 6462] = 0.0 + k[7651] + k[7938]; + data[jistart + 6463] = 0.0 + k[8398]*y_cur[IDX_GCI]; + data[jistart + 6464] = 0.0 - k[8529]*y_cur[IDX_GCNI] - k[8747]*y_cur[IDX_GCNI]; + data[jistart + 6465] = 0.0 - k[7091] - k[7273] - k[7455] - k[7649] - k[7936] - + k[8292]*y_cur[IDX_GHI] - k[8376]*y_cur[IDX_GH2I] - + k[8412]*y_cur[IDX_GCI] - k[8446]*y_cur[IDX_GOI] - + k[8488]*y_cur[IDX_GCHI] - k[8529]*y_cur[IDX_GCH2I] - + k[8540]*y_cur[IDX_GCH3I] - k[8592]*y_cur[IDX_GHI] - + k[8664]*y_cur[IDX_GCI] - k[8692]*y_cur[IDX_GOI] - + k[8721]*y_cur[IDX_GCHI] - k[8747]*y_cur[IDX_GCH2I] - + k[8749]*y_cur[IDX_GCH3I]; + data[jistart + 6466] = 0.0 + k[8397]*y_cur[IDX_GCI]; + data[jistart + 6467] = 0.0 - k[8446]*y_cur[IDX_GCNI] - k[8692]*y_cur[IDX_GCNI]; + data[jistart + 6468] = 0.0 - k[8540]*y_cur[IDX_GCNI] - k[8749]*y_cur[IDX_GCNI]; + data[jistart + 6469] = 0.0 - k[8488]*y_cur[IDX_GCNI] - k[8721]*y_cur[IDX_GCNI]; + data[jistart + 6470] = 0.0 - k[8376]*y_cur[IDX_GCNI]; + data[jistart + 6471] = 0.0 + k[8397]*y_cur[IDX_GNI] + k[8398]*y_cur[IDX_GNOI] + + k[8400]*y_cur[IDX_GNSI] + k[8401]*y_cur[IDX_GOCNI] + + k[8402]*y_cur[IDX_GCNOI] - k[8412]*y_cur[IDX_GCNI] - + k[8664]*y_cur[IDX_GCNI]; + data[jistart + 6472] = 0.0 + k[6909]; + data[jistart + 6473] = 0.0 - k[8292]*y_cur[IDX_GCNI] - k[8592]*y_cur[IDX_GCNI]; + data[jistart + 6474] = 0.0 + k[1709]*y_cur[IDX_C2H4I]; + data[jistart + 6475] = 0.0 + k[1562]*y_cur[IDX_C2H2I] + k[2838]*y_cur[IDX_HI]; + data[jistart + 6476] = 0.0 + k[2593]*y_cur[IDX_H3II] + k[3085]*y_cur[IDX_HeII]; + data[jistart + 6477] = 0.0 + k[1684]*y_cur[IDX_C2H4II]; + data[jistart + 6478] = 0.0 + k[2066]*y_cur[IDX_CH3II] + k[2652]*y_cur[IDX_H3II]; + data[jistart + 6479] = 0.0 - k[1719]*y_cur[IDX_C2H5II] + k[2068]*y_cur[IDX_CH3II]; + data[jistart + 6480] = 0.0 + k[2135]*y_cur[IDX_C2H4I]; + data[jistart + 6481] = 0.0 - k[764]*y_cur[IDX_eM] - k[765]*y_cur[IDX_eM] - + k[766]*y_cur[IDX_eM] - k[767]*y_cur[IDX_eM] - k[768]*y_cur[IDX_eM] - + k[1538]*y_cur[IDX_C2H2I] - k[1539]*y_cur[IDX_C2H2I] - + k[1685]*y_cur[IDX_C2H4I] - k[1719]*y_cur[IDX_CH3CNI] - + k[1720]*y_cur[IDX_H2COI] - k[1721]*y_cur[IDX_H2SI] - + k[1722]*y_cur[IDX_HC3NI] - k[2524]*y_cur[IDX_H2OI] - + k[2829]*y_cur[IDX_HI] - k[2862]*y_cur[IDX_HCNI] - + k[3037]*y_cur[IDX_HNCI] - k[3558]*y_cur[IDX_NH3I] - + k[6391]*y_cur[IDX_GRAINM] - k[6392]*y_cur[IDX_GRAINM] - + k[6393]*y_cur[IDX_GRAINM] - k[6394]*y_cur[IDX_GRAINM] - + k[6395]*y_cur[IDX_GRAINM]; + data[jistart + 6482] = 0.0 + k[1370]*y_cur[IDX_CII] + k[1613]*y_cur[IDX_C2H3II] + + k[2062]*y_cur[IDX_CH3II] + k[2377]*y_cur[IDX_H2II] + + k[2648]*y_cur[IDX_H3II] + k[3773]*y_cur[IDX_OHII]; + data[jistart + 6483] = 0.0 + k[149]*y_cur[IDX_CII] + k[511]*y_cur[IDX_HeII] + k[5703] + + k[5988]; + data[jistart + 6484] = 0.0 + k[3659]*y_cur[IDX_O2II] + k[3856]*y_cur[IDX_SOII]; + data[jistart + 6485] = 0.0 + k[2377]*y_cur[IDX_C2H6I]; + data[jistart + 6486] = 0.0 + k[2219]*y_cur[IDX_C2H4I]; + data[jistart + 6487] = 0.0 - k[1722]*y_cur[IDX_C2H5II]; + data[jistart + 6488] = 0.0 + k[1977]*y_cur[IDX_CH4I]; + data[jistart + 6489] = 0.0 + k[3773]*y_cur[IDX_C2H6I]; + data[jistart + 6490] = 0.0 + k[3659]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6491] = 0.0 + k[1628]*y_cur[IDX_C2H3I] + k[1684]*y_cur[IDX_SiH4I]; + data[jistart + 6492] = 0.0 + k[3856]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6493] = 0.0 - k[3037]*y_cur[IDX_C2H5II]; + data[jistart + 6494] = 0.0 + k[1579]*y_cur[IDX_C2H3II] - k[1685]*y_cur[IDX_C2H5II] + + k[1708]*y_cur[IDX_HCOII] + k[1709]*y_cur[IDX_NCCNHII] + + k[2135]*y_cur[IDX_CH4II] + k[2219]*y_cur[IDX_CH5II] + + k[2590]*y_cur[IDX_H3II]; + data[jistart + 6495] = 0.0 + k[1577]*y_cur[IDX_C2H3II] + k[1628]*y_cur[IDX_C2H4II]; + data[jistart + 6496] = 0.0 - k[1721]*y_cur[IDX_C2H5II]; + data[jistart + 6497] = 0.0 + k[1577]*y_cur[IDX_C2H3I] + k[1579]*y_cur[IDX_C2H4I] + + k[1613]*y_cur[IDX_C2H6I]; + data[jistart + 6498] = 0.0 + k[1977]*y_cur[IDX_CH2II] + k[2074]*y_cur[IDX_CH3II]; + data[jistart + 6499] = 0.0 - k[1720]*y_cur[IDX_C2H5II]; + data[jistart + 6500] = 0.0 - k[2862]*y_cur[IDX_C2H5II]; + data[jistart + 6501] = 0.0 - k[3558]*y_cur[IDX_C2H5II]; + data[jistart + 6502] = 0.0 + k[2062]*y_cur[IDX_C2H6I] + k[2066]*y_cur[IDX_CH3CHOI] + + k[2068]*y_cur[IDX_CH3CNI] + k[2074]*y_cur[IDX_CH4I]; + data[jistart + 6503] = 0.0 - k[1538]*y_cur[IDX_C2H5II] - k[1539]*y_cur[IDX_C2H5II] + + k[1562]*y_cur[IDX_C2H6II]; + data[jistart + 6504] = 0.0 + k[511]*y_cur[IDX_C2H5I] + k[3085]*y_cur[IDX_C2H5OHI]; + data[jistart + 6505] = 0.0 + k[149]*y_cur[IDX_C2H5I] + k[1370]*y_cur[IDX_C2H6I]; + data[jistart + 6506] = 0.0 - k[2524]*y_cur[IDX_C2H5II]; + data[jistart + 6507] = 0.0 + k[1708]*y_cur[IDX_C2H4I]; + data[jistart + 6508] = 0.0 + k[2590]*y_cur[IDX_C2H4I] + k[2593]*y_cur[IDX_C2H5OHI] + + k[2648]*y_cur[IDX_C2H6I] + k[2652]*y_cur[IDX_CH3CHOI]; + data[jistart + 6509] = 0.0 - k[6391]*y_cur[IDX_C2H5II] - k[6392]*y_cur[IDX_C2H5II] - + k[6393]*y_cur[IDX_C2H5II] - k[6394]*y_cur[IDX_C2H5II] - + k[6395]*y_cur[IDX_C2H5II]; + data[jistart + 6510] = 0.0 - k[764]*y_cur[IDX_C2H5II] - k[765]*y_cur[IDX_C2H5II] - + k[766]*y_cur[IDX_C2H5II] - k[767]*y_cur[IDX_C2H5II] - + k[768]*y_cur[IDX_C2H5II]; + data[jistart + 6511] = 0.0 - k[2829]*y_cur[IDX_C2H5II] + k[2838]*y_cur[IDX_C2H6II]; + data[jistart + 6512] = 0.0 + k[7211] + k[7393] + k[7575]; + data[jistart + 6513] = 0.0 + k[8727]*y_cur[IDX_GCHI]; + data[jistart + 6514] = 0.0 + k[8637]*y_cur[IDX_GHI]; + data[jistart + 6515] = 0.0 + k[929]*y_cur[IDX_eM] + k[6748]*y_cur[IDX_GRAINM]; + data[jistart + 6516] = 0.0 + k[845]*y_cur[IDX_eM] + k[6753]*y_cur[IDX_GRAINM]; + data[jistart + 6517] = 0.0 + k[3711]*y_cur[IDX_OI]; + data[jistart + 6518] = 0.0 + k[843]*y_cur[IDX_eM] + k[6742]*y_cur[IDX_GRAINM]; + data[jistart + 6519] = 0.0 - k[216]*y_cur[IDX_C2H2II] - k[344]*y_cur[IDX_HII] - + k[1323]*y_cur[IDX_CII] - k[1324]*y_cur[IDX_CII] - + k[1491]*y_cur[IDX_C2H2II] - k[1492]*y_cur[IDX_C2H2II] - + k[1589]*y_cur[IDX_C2H3II] - k[1590]*y_cur[IDX_C2H3II] - + k[1591]*y_cur[IDX_C2H3II] - k[1655]*y_cur[IDX_C2H4II] - + k[1656]*y_cur[IDX_C2H4II] - k[1763]*y_cur[IDX_C3H2II] - + k[1764]*y_cur[IDX_C3H2II] - k[1798]*y_cur[IDX_C3H3II] - + k[1799]*y_cur[IDX_C3H3II] - k[1832]*y_cur[IDX_C4HII] - + k[1835]*y_cur[IDX_C4H2II] - k[1839]*y_cur[IDX_C4H3II] - + k[1840]*y_cur[IDX_C4H3II] - k[2022]*y_cur[IDX_CH2CCHII] - + k[2023]*y_cur[IDX_CH2CCHII] - k[2053]*y_cur[IDX_CH3II] - + k[2304]*y_cur[IDX_HII] - k[2614]*y_cur[IDX_H3II] - + k[2919]*y_cur[IDX_HCOII] - k[3119]*y_cur[IDX_HeII] - + k[3120]*y_cur[IDX_HeII] - k[3121]*y_cur[IDX_HeII] - + k[4890]*y_cur[IDX_C2HI] - k[4927]*y_cur[IDX_CI] - + k[5239]*y_cur[IDX_NI] - k[5740] - k[5741] - k[6025] - k[6026] - + k[7029]; + data[jistart + 6520] = 0.0 + k[4889]*y_cur[IDX_C2HI]; + data[jistart + 6521] = 0.0 - k[1832]*y_cur[IDX_C5H2I]; + data[jistart + 6522] = 0.0 + k[95]*y_cur[IDX_HI]; + data[jistart + 6523] = 0.0 - k[1798]*y_cur[IDX_C5H2I] - k[1799]*y_cur[IDX_C5H2I]; + data[jistart + 6524] = 0.0 + k[8727]*y_cur[IDX_GC4HI]; + data[jistart + 6525] = 0.0 + k[4924]*y_cur[IDX_CI]; + data[jistart + 6526] = 0.0 - k[1763]*y_cur[IDX_C5H2I] - k[1764]*y_cur[IDX_C5H2I]; + data[jistart + 6527] = 0.0 - k[1655]*y_cur[IDX_C5H2I] - k[1656]*y_cur[IDX_C5H2I]; + data[jistart + 6528] = 0.0 - k[1839]*y_cur[IDX_C5H2I] - k[1840]*y_cur[IDX_C5H2I]; + data[jistart + 6529] = 0.0 - k[2022]*y_cur[IDX_C5H2I] - k[2023]*y_cur[IDX_C5H2I]; + data[jistart + 6530] = 0.0 - k[1835]*y_cur[IDX_C5H2I]; + data[jistart + 6531] = 0.0 - k[1589]*y_cur[IDX_C5H2I] - k[1590]*y_cur[IDX_C5H2I] - + k[1591]*y_cur[IDX_C5H2I]; + data[jistart + 6532] = 0.0 + k[4889]*y_cur[IDX_C3H2I] - k[4890]*y_cur[IDX_C5H2I]; + data[jistart + 6533] = 0.0 - k[216]*y_cur[IDX_C5H2I] - k[1491]*y_cur[IDX_C5H2I] - + k[1492]*y_cur[IDX_C5H2I]; + data[jistart + 6534] = 0.0 - k[2053]*y_cur[IDX_C5H2I]; + data[jistart + 6535] = 0.0 + k[8637]*y_cur[IDX_GC5HI]; + data[jistart + 6536] = 0.0 - k[5239]*y_cur[IDX_C5H2I]; + data[jistart + 6537] = 0.0 + k[3711]*y_cur[IDX_C6H3II]; + data[jistart + 6538] = 0.0 - k[3119]*y_cur[IDX_C5H2I] - k[3120]*y_cur[IDX_C5H2I] - + k[3121]*y_cur[IDX_C5H2I]; + data[jistart + 6539] = 0.0 - k[1323]*y_cur[IDX_C5H2I] - k[1324]*y_cur[IDX_C5H2I]; + data[jistart + 6540] = 0.0 - k[344]*y_cur[IDX_C5H2I] - k[2304]*y_cur[IDX_C5H2I]; + data[jistart + 6541] = 0.0 + k[4924]*y_cur[IDX_C4H3I] - k[4927]*y_cur[IDX_C5H2I]; + data[jistart + 6542] = 0.0 - k[2919]*y_cur[IDX_C5H2I]; + data[jistart + 6543] = 0.0 - k[2614]*y_cur[IDX_C5H2I]; + data[jistart + 6544] = 0.0 + k[6742]*y_cur[IDX_C5H3II] + k[6748]*y_cur[IDX_CH3C4HII] + + k[6753]*y_cur[IDX_C5H5II]; + data[jistart + 6545] = 0.0 + k[843]*y_cur[IDX_C5H3II] + k[845]*y_cur[IDX_C5H5II] + + k[929]*y_cur[IDX_CH3C4HII]; + data[jistart + 6546] = 0.0 + k[95]*y_cur[IDX_C5HM]; + data[jistart + 6547] = 0.0 + k[3178]*y_cur[IDX_HeII]; + data[jistart + 6548] = 0.0 + k[1557]*y_cur[IDX_C2H2I] + k[2182]*y_cur[IDX_CH4I]; + data[jistart + 6549] = 0.0 + k[2166]*y_cur[IDX_CH4I]; + data[jistart + 6550] = 0.0 + k[1698]*y_cur[IDX_C2H4I]; + data[jistart + 6551] = 0.0 + k[2415]*y_cur[IDX_H2I]; + data[jistart + 6552] = 0.0 + k[1687]*y_cur[IDX_C2H4I]; + data[jistart + 6553] = 0.0 + k[1516]*y_cur[IDX_C2H2II] - k[2481]*y_cur[IDX_C5H2II] - + k[2482]*y_cur[IDX_C5H2II]; + data[jistart + 6554] = 0.0 + k[216]*y_cur[IDX_C2H2II] + k[344]*y_cur[IDX_HII]; + data[jistart + 6555] = 0.0 - k[841]*y_cur[IDX_eM] - k[842]*y_cur[IDX_eM] - + k[1637]*y_cur[IDX_C2H3I] - k[1638]*y_cur[IDX_C2H3I] - + k[1701]*y_cur[IDX_C2H4I] - k[1702]*y_cur[IDX_C2H4I] - + k[1738]*y_cur[IDX_C2HI] - k[1790]*y_cur[IDX_C3H2I] - + k[1791]*y_cur[IDX_C3H2I] - k[1826]*y_cur[IDX_C3HI] - + k[1845]*y_cur[IDX_C4HI] - k[1868]*y_cur[IDX_CI] - + k[1869]*y_cur[IDX_CI] - k[2037]*y_cur[IDX_CH2CCHI] - + k[2038]*y_cur[IDX_CH2CCHI] - k[2109]*y_cur[IDX_CH3CCHI] - + k[2180]*y_cur[IDX_CH4I] - k[2181]*y_cur[IDX_CH4I] - + k[2481]*y_cur[IDX_H2CCCI] - k[2482]*y_cur[IDX_H2CCCI] - + k[2852]*y_cur[IDX_C4H2I] - k[3415]*y_cur[IDX_NI] - + k[3706]*y_cur[IDX_OI] - k[5578]*y_cur[IDX_C4H2I] - + k[6738]*y_cur[IDX_GRAINM] - k[6739]*y_cur[IDX_GRAINM]; + data[jistart + 6556] = 0.0 + k[1485]*y_cur[IDX_C2H2II] - k[1790]*y_cur[IDX_C5H2II] - + k[1791]*y_cur[IDX_C5H2II]; + data[jistart + 6557] = 0.0 - k[2109]*y_cur[IDX_C5H2II]; + data[jistart + 6558] = 0.0 + k[1544]*y_cur[IDX_C2H2I] + k[1755]*y_cur[IDX_C4H2I]; + data[jistart + 6559] = 0.0 + k[1732]*y_cur[IDX_C2HI]; + data[jistart + 6560] = 0.0 + k[1319]*y_cur[IDX_CII]; + data[jistart + 6561] = 0.0 + k[1731]*y_cur[IDX_C2HI]; + data[jistart + 6562] = 0.0 + k[1653]*y_cur[IDX_C4HI]; + data[jistart + 6563] = 0.0 + k[1866]*y_cur[IDX_CI]; + data[jistart + 6564] = 0.0 - k[2037]*y_cur[IDX_C5H2II] - k[2038]*y_cur[IDX_C5H2II]; + data[jistart + 6565] = 0.0 + k[1741]*y_cur[IDX_C2HI]; + data[jistart + 6566] = 0.0 + k[1592]*y_cur[IDX_C2H3II] + k[2615]*y_cur[IDX_H3II] + + k[2920]*y_cur[IDX_HCOII]; + data[jistart + 6567] = 0.0 + k[1488]*y_cur[IDX_C2H2II] + k[1584]*y_cur[IDX_C2H3II] - + k[1826]*y_cur[IDX_C5H2II]; + data[jistart + 6568] = 0.0 + k[1653]*y_cur[IDX_C2H4II] - k[1845]*y_cur[IDX_C5H2II] + + k[2052]*y_cur[IDX_CH3II]; + data[jistart + 6569] = 0.0 + k[1755]*y_cur[IDX_C3HII] - k[2852]*y_cur[IDX_C5H2II] - + k[5578]*y_cur[IDX_C5H2II]; + data[jistart + 6570] = 0.0 + k[1687]*y_cur[IDX_C3II] + k[1698]*y_cur[IDX_C5II] - + k[1701]*y_cur[IDX_C5H2II] - k[1702]*y_cur[IDX_C5H2II]; + data[jistart + 6571] = 0.0 - k[1637]*y_cur[IDX_C5H2II] - k[1638]*y_cur[IDX_C5H2II]; + data[jistart + 6572] = 0.0 + k[1584]*y_cur[IDX_C3HI] + k[1592]*y_cur[IDX_C5HI]; + data[jistart + 6573] = 0.0 + k[2166]*y_cur[IDX_C4II] - k[2180]*y_cur[IDX_C5H2II] - + k[2181]*y_cur[IDX_C5H2II] + k[2182]*y_cur[IDX_C6II]; + data[jistart + 6574] = 0.0 + k[1731]*y_cur[IDX_C3H2II] + k[1732]*y_cur[IDX_C3H3II] - + k[1738]*y_cur[IDX_C5H2II] + k[1741]*y_cur[IDX_CH2CCHII]; + data[jistart + 6575] = 0.0 + k[216]*y_cur[IDX_C5H2I] + k[1485]*y_cur[IDX_C3H2I] + + k[1488]*y_cur[IDX_C3HI] + k[1516]*y_cur[IDX_H2CCCI]; + data[jistart + 6576] = 0.0 + k[2052]*y_cur[IDX_C4HI]; + data[jistart + 6577] = 0.0 + k[1544]*y_cur[IDX_C3HII] + k[1557]*y_cur[IDX_C6II]; + data[jistart + 6578] = 0.0 - k[3415]*y_cur[IDX_C5H2II]; + data[jistart + 6579] = 0.0 - k[3706]*y_cur[IDX_C5H2II]; + data[jistart + 6580] = 0.0 + k[3178]*y_cur[IDX_CH3C4HI]; + data[jistart + 6581] = 0.0 + k[1319]*y_cur[IDX_C4H3I]; + data[jistart + 6582] = 0.0 + k[344]*y_cur[IDX_C5H2I]; + data[jistart + 6583] = 0.0 + k[1866]*y_cur[IDX_C4H3II] - k[1868]*y_cur[IDX_C5H2II] - + k[1869]*y_cur[IDX_C5H2II]; + data[jistart + 6584] = 0.0 + k[2920]*y_cur[IDX_C5HI]; + data[jistart + 6585] = 0.0 + k[2615]*y_cur[IDX_C5HI]; + data[jistart + 6586] = 0.0 - k[6738]*y_cur[IDX_C5H2II] - k[6739]*y_cur[IDX_C5H2II]; + data[jistart + 6587] = 0.0 + k[2415]*y_cur[IDX_C5HII]; + data[jistart + 6588] = 0.0 - k[841]*y_cur[IDX_C5H2II] - k[842]*y_cur[IDX_C5H2II]; + data[jistart + 6589] = 0.0 + k[7133] + k[7315] + k[7497]; + data[jistart + 6590] = 0.0 + k[5784] + k[6085]; + data[jistart + 6591] = 0.0 + k[8614]*y_cur[IDX_GHI]; + data[jistart + 6592] = 0.0 + k[2118]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6593] = 0.0 + k[8722]*y_cur[IDX_GCHI]; + data[jistart + 6594] = 0.0 + k[810]*y_cur[IDX_eM] + k[6507]*y_cur[IDX_GRAINM]; + data[jistart + 6595] = 0.0 - k[1808]*y_cur[IDX_CH2CCH2I] - k[1809]*y_cur[IDX_CH2CCH2I] - + k[1810]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6596] = 0.0 - k[161]*y_cur[IDX_CII] - k[669]*y_cur[IDX_O2II] - + k[711]*y_cur[IDX_SOII] - k[1343]*y_cur[IDX_CII] - + k[1344]*y_cur[IDX_CII] - k[1345]*y_cur[IDX_CII] - + k[1771]*y_cur[IDX_C3H2II] - k[1772]*y_cur[IDX_C3H2II] - + k[1773]*y_cur[IDX_C3H2II] - k[1774]*y_cur[IDX_C3H2II] - + k[1775]*y_cur[IDX_C3H2II] - k[1808]*y_cur[IDX_C3H4II] - + k[1809]*y_cur[IDX_C3H4II] - k[1810]*y_cur[IDX_C3H4II] - + k[2635]*y_cur[IDX_H3II] - k[3656]*y_cur[IDX_O2II] - + k[3657]*y_cur[IDX_O2II] - k[3851]*y_cur[IDX_SOII] - + k[3852]*y_cur[IDX_SOII] - k[3853]*y_cur[IDX_SOII] - + k[3854]*y_cur[IDX_SOII] - k[3855]*y_cur[IDX_SOII] - + k[4894]*y_cur[IDX_C2HI] - k[4895]*y_cur[IDX_C2HI] - + k[4946]*y_cur[IDX_CI] - k[5022]*y_cur[IDX_C4HI] - + k[5023]*y_cur[IDX_C4HI] - k[5067]*y_cur[IDX_CHI] - + k[5109]*y_cur[IDX_CNI] - k[5381]*y_cur[IDX_OI] - + k[5382]*y_cur[IDX_OI] - k[5383]*y_cur[IDX_OI] - k[5780] - k[5781] - + k[6080] - k[6081] - k[6082] - k[6951]; + data[jistart + 6597] = 0.0 + k[2118]*y_cur[IDX_CH3COCH3II] + k[5071]*y_cur[IDX_CHI]; + data[jistart + 6598] = 0.0 + k[8722]*y_cur[IDX_GC2H3I]; + data[jistart + 6599] = 0.0 - k[1771]*y_cur[IDX_CH2CCH2I] - k[1772]*y_cur[IDX_CH2CCH2I] - + k[1773]*y_cur[IDX_CH2CCH2I] - k[1774]*y_cur[IDX_CH2CCH2I] - + k[1775]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6600] = 0.0 - k[669]*y_cur[IDX_CH2CCH2I] - k[3656]*y_cur[IDX_CH2CCH2I] - + k[3657]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6601] = 0.0 - k[711]*y_cur[IDX_CH2CCH2I] - k[3851]*y_cur[IDX_CH2CCH2I] - + k[3852]*y_cur[IDX_CH2CCH2I] - k[3853]*y_cur[IDX_CH2CCH2I] - + k[3854]*y_cur[IDX_CH2CCH2I] - k[3855]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6602] = 0.0 - k[5022]*y_cur[IDX_CH2CCH2I] - k[5023]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6603] = 0.0 + k[5065]*y_cur[IDX_CHI]; + data[jistart + 6604] = 0.0 - k[4894]*y_cur[IDX_CH2CCH2I] - k[4895]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6605] = 0.0 + k[5065]*y_cur[IDX_C2H4I] - k[5067]*y_cur[IDX_CH2CCH2I] + + k[5071]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6606] = 0.0 - k[5109]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6607] = 0.0 + k[8614]*y_cur[IDX_GCH2CCHI]; + data[jistart + 6608] = 0.0 - k[5381]*y_cur[IDX_CH2CCH2I] - k[5382]*y_cur[IDX_CH2CCH2I] - + k[5383]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6609] = 0.0 - k[161]*y_cur[IDX_CH2CCH2I] - k[1343]*y_cur[IDX_CH2CCH2I] - + k[1344]*y_cur[IDX_CH2CCH2I] - k[1345]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6610] = 0.0 - k[4946]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6611] = 0.0 - k[2635]*y_cur[IDX_CH2CCH2I]; + data[jistart + 6612] = 0.0 + k[6507]*y_cur[IDX_C3H7II]; + data[jistart + 6613] = 0.0 + k[810]*y_cur[IDX_C3H7II]; + data[jistart + 6614] = 0.0 + k[3330]*y_cur[IDX_HeII]; + data[jistart + 6615] = 0.0 + k[3205]*y_cur[IDX_HeII]; + data[jistart + 6616] = 0.0 + k[3291]*y_cur[IDX_HeII]; + data[jistart + 6617] = 0.0 + k[3192]*y_cur[IDX_HeII]; + data[jistart + 6618] = 0.0 + k[3279]*y_cur[IDX_HeII]; + data[jistart + 6619] = 0.0 - k[208]*y_cur[IDX_C2I] - k[241]*y_cur[IDX_C2HI] - + k[245]*y_cur[IDX_CI] - k[260]*y_cur[IDX_CH2I] - + k[288]*y_cur[IDX_CHI] - k[298]*y_cur[IDX_CO2I] - + k[299]*y_cur[IDX_COI] - k[300]*y_cur[IDX_H2COI] - + k[301]*y_cur[IDX_HCNI] - k[302]*y_cur[IDX_HCOI] - + k[303]*y_cur[IDX_NOI] - k[304]*y_cur[IDX_O2I] - k[305]*y_cur[IDX_SI] + - k[487]*y_cur[IDX_HI] - k[586]*y_cur[IDX_NH2I] - + k[616]*y_cur[IDX_NHI] - k[681]*y_cur[IDX_OI] - k[698]*y_cur[IDX_OHI] + - k[977]*y_cur[IDX_eM] - k[2269]*y_cur[IDX_CO2I] - + k[2270]*y_cur[IDX_CO2I] - k[2271]*y_cur[IDX_H2COI] - + k[2272]*y_cur[IDX_HCNI] - k[2273]*y_cur[IDX_HCOI] - + k[2274]*y_cur[IDX_NOI] - k[2275]*y_cur[IDX_O2I] - + k[2276]*y_cur[IDX_O2I] - k[2433]*y_cur[IDX_H2I] - + k[2535]*y_cur[IDX_H2OI] - k[2536]*y_cur[IDX_H2OI] - + k[2537]*y_cur[IDX_H2OI] - k[2538]*y_cur[IDX_H2OI] - + k[3456]*y_cur[IDX_NI] - k[6359]*y_cur[IDX_GRAINM]; + data[jistart + 6620] = 0.0 + k[306]*y_cur[IDX_CNI]; + data[jistart + 6621] = 0.0 + k[444]*y_cur[IDX_CNI]; + data[jistart + 6622] = 0.0 - k[586]*y_cur[IDX_CNII]; + data[jistart + 6623] = 0.0 + k[1961]*y_cur[IDX_NI] + k[1965]*y_cur[IDX_NHI]; + data[jistart + 6624] = 0.0 - k[298]*y_cur[IDX_CNII] - k[2269]*y_cur[IDX_CNII] - + k[2270]*y_cur[IDX_CNII]; + data[jistart + 6625] = 0.0 - k[616]*y_cur[IDX_CNII] + k[1420]*y_cur[IDX_CII] + + k[1965]*y_cur[IDX_CHII]; + data[jistart + 6626] = 0.0 + k[547]*y_cur[IDX_CNI] + k[2256]*y_cur[IDX_CHI]; + data[jistart + 6627] = 0.0 - k[260]*y_cur[IDX_CNII]; + data[jistart + 6628] = 0.0 + k[3261]*y_cur[IDX_HeII]; + data[jistart + 6629] = 0.0 - k[304]*y_cur[IDX_CNII] - k[2275]*y_cur[IDX_CNII] - + k[2276]*y_cur[IDX_CNII]; + data[jistart + 6630] = 0.0 - k[303]*y_cur[IDX_CNII] - k[2274]*y_cur[IDX_CNII]; + data[jistart + 6631] = 0.0 - k[302]*y_cur[IDX_CNII] - k[2273]*y_cur[IDX_CNII]; + data[jistart + 6632] = 0.0 - k[241]*y_cur[IDX_CNII]; + data[jistart + 6633] = 0.0 - k[300]*y_cur[IDX_CNII] - k[2271]*y_cur[IDX_CNII]; + data[jistart + 6634] = 0.0 - k[301]*y_cur[IDX_CNII] - k[2272]*y_cur[IDX_CNII] + + k[3245]*y_cur[IDX_HeII]; + data[jistart + 6635] = 0.0 - k[288]*y_cur[IDX_CNII] + k[2256]*y_cur[IDX_NII]; + data[jistart + 6636] = 0.0 - k[305]*y_cur[IDX_CNII]; + data[jistart + 6637] = 0.0 - k[208]*y_cur[IDX_CNII]; + data[jistart + 6638] = 0.0 - k[698]*y_cur[IDX_CNII]; + data[jistart + 6639] = 0.0 + k[306]*y_cur[IDX_N2II] + k[444]*y_cur[IDX_H2II] + + k[547]*y_cur[IDX_NII]; + data[jistart + 6640] = 0.0 + k[1961]*y_cur[IDX_CHII] - k[3456]*y_cur[IDX_CNII] + + k[5504]*y_cur[IDX_CII]; + data[jistart + 6641] = 0.0 - k[681]*y_cur[IDX_CNII]; + data[jistart + 6642] = 0.0 + k[3192]*y_cur[IDX_CH3CNI] + k[3205]*y_cur[IDX_CNOI] + + k[3245]*y_cur[IDX_HCNI] + k[3261]*y_cur[IDX_HNCI] + + k[3279]*y_cur[IDX_NCCNI] + k[3291]*y_cur[IDX_OCNI] + + k[3330]*y_cur[IDX_SiNCI]; + data[jistart + 6643] = 0.0 + k[1420]*y_cur[IDX_NHI] + k[5504]*y_cur[IDX_NI]; + data[jistart + 6644] = 0.0 - k[2535]*y_cur[IDX_CNII] - k[2536]*y_cur[IDX_CNII] - + k[2537]*y_cur[IDX_CNII] - k[2538]*y_cur[IDX_CNII]; + data[jistart + 6645] = 0.0 - k[245]*y_cur[IDX_CNII]; + data[jistart + 6646] = 0.0 - k[299]*y_cur[IDX_CNII]; + data[jistart + 6647] = 0.0 - k[6359]*y_cur[IDX_CNII]; + data[jistart + 6648] = 0.0 - k[2433]*y_cur[IDX_CNII]; + data[jistart + 6649] = 0.0 - k[977]*y_cur[IDX_CNII]; + data[jistart + 6650] = 0.0 - k[487]*y_cur[IDX_CNII]; + data[jistart + 6651] = 0.0 + k[7105] + k[7287] + k[7469]; + data[jistart + 6652] = 0.0 + k[8591]*y_cur[IDX_GHI]; + data[jistart + 6653] = 0.0 + k[779]*y_cur[IDX_eM] + k[2864]*y_cur[IDX_HCNI] + + k[3560]*y_cur[IDX_NH3I] + k[6420]*y_cur[IDX_GRAINM]; + data[jistart + 6654] = 0.0 + k[812]*y_cur[IDX_eM] + k[6509]*y_cur[IDX_GRAINM]; + data[jistart + 6655] = 0.0 - k[2112]*y_cur[IDX_C2H6I]; + data[jistart + 6656] = 0.0 + k[237]*y_cur[IDX_C2H4I] + k[276]*y_cur[IDX_H2SI] + + k[601]*y_cur[IDX_NH3I]; + data[jistart + 6657] = 0.0 + k[2070]*y_cur[IDX_CH3II] + k[2665]*y_cur[IDX_H3II]; + data[jistart + 6658] = 0.0 + k[1682]*y_cur[IDX_C2H4II]; + data[jistart + 6659] = 0.0 - k[441]*y_cur[IDX_H2II] - k[466]*y_cur[IDX_H2OII] - + k[687]*y_cur[IDX_OHII] - k[1367]*y_cur[IDX_CII] - + k[1368]*y_cur[IDX_CII] - k[1369]*y_cur[IDX_CII] - + k[1370]*y_cur[IDX_CII] - k[1371]*y_cur[IDX_CII] - + k[1372]*y_cur[IDX_CII] - k[1511]*y_cur[IDX_C2H2II] - + k[1512]*y_cur[IDX_C2H2II] - k[1613]*y_cur[IDX_C2H3II] - + k[1614]*y_cur[IDX_C2H3II] - k[1615]*y_cur[IDX_C2H3II] - + k[1670]*y_cur[IDX_C2H4II] - k[1671]*y_cur[IDX_C2H4II] - + k[2062]*y_cur[IDX_CH3II] - k[2063]*y_cur[IDX_CH3II] - + k[2064]*y_cur[IDX_CH3II] - k[2112]*y_cur[IDX_S2II] - + k[2222]*y_cur[IDX_CH5II] - k[2326]*y_cur[IDX_HII] - + k[2327]*y_cur[IDX_HII] - k[2376]*y_cur[IDX_H2II] - + k[2377]*y_cur[IDX_H2II] - k[2505]*y_cur[IDX_H2OII] - + k[2506]*y_cur[IDX_H2OII] - k[2648]*y_cur[IDX_H3II] - + k[2949]*y_cur[IDX_HCOII] - k[3188]*y_cur[IDX_HeII] - + k[3189]*y_cur[IDX_HeII] - k[3190]*y_cur[IDX_HeII] - + k[3771]*y_cur[IDX_OHII] - k[3772]*y_cur[IDX_OHII] - + k[3773]*y_cur[IDX_OHII] - k[3774]*y_cur[IDX_OHII] - + k[4869]*y_cur[IDX_C2I] - k[5052]*y_cur[IDX_C4HI] - + k[5069]*y_cur[IDX_CHI] - k[5070]*y_cur[IDX_CHI] - + k[5111]*y_cur[IDX_CNI] - k[5803] - k[5804] - k[6108] - k[6109] - + k[6923]; + data[jistart + 6660] = 0.0 + k[5458]*y_cur[IDX_OHI]; + data[jistart + 6661] = 0.0 - k[441]*y_cur[IDX_C2H6I] - k[2376]*y_cur[IDX_C2H6I] - + k[2377]*y_cur[IDX_C2H6I]; + data[jistart + 6662] = 0.0 + k[8748]*y_cur[IDX_GCH3I] + k[8748]*y_cur[IDX_GCH3I]; + data[jistart + 6663] = 0.0 - k[2222]*y_cur[IDX_C2H6I]; + data[jistart + 6664] = 0.0 - k[687]*y_cur[IDX_C2H6I] - k[3771]*y_cur[IDX_C2H6I] - + k[3772]*y_cur[IDX_C2H6I] - k[3773]*y_cur[IDX_C2H6I] - + k[3774]*y_cur[IDX_C2H6I]; + data[jistart + 6665] = 0.0 - k[466]*y_cur[IDX_C2H6I] - k[2505]*y_cur[IDX_C2H6I] - + k[2506]*y_cur[IDX_C2H6I]; + data[jistart + 6666] = 0.0 - k[1670]*y_cur[IDX_C2H6I] - k[1671]*y_cur[IDX_C2H6I] + + k[1682]*y_cur[IDX_SiH4I]; + data[jistart + 6667] = 0.0 - k[5052]*y_cur[IDX_C2H6I]; + data[jistart + 6668] = 0.0 + k[237]*y_cur[IDX_C2H6II]; + data[jistart + 6669] = 0.0 + k[276]*y_cur[IDX_C2H6II]; + data[jistart + 6670] = 0.0 - k[1613]*y_cur[IDX_C2H6I] - k[1614]*y_cur[IDX_C2H6I] - + k[1615]*y_cur[IDX_C2H6I]; + data[jistart + 6671] = 0.0 + k[2864]*y_cur[IDX_C2H7II]; + data[jistart + 6672] = 0.0 - k[5069]*y_cur[IDX_C2H6I] - k[5070]*y_cur[IDX_C2H6I]; + data[jistart + 6673] = 0.0 - k[4869]*y_cur[IDX_C2H6I]; + data[jistart + 6674] = 0.0 + k[5458]*y_cur[IDX_C2H5I]; + data[jistart + 6675] = 0.0 + k[601]*y_cur[IDX_C2H6II] + k[3560]*y_cur[IDX_C2H7II]; + data[jistart + 6676] = 0.0 - k[1511]*y_cur[IDX_C2H6I] - k[1512]*y_cur[IDX_C2H6I]; + data[jistart + 6677] = 0.0 - k[2062]*y_cur[IDX_C2H6I] - k[2063]*y_cur[IDX_C2H6I] - + k[2064]*y_cur[IDX_C2H6I] + k[2070]*y_cur[IDX_CH3COCH3I]; + data[jistart + 6678] = 0.0 - k[5111]*y_cur[IDX_C2H6I]; + data[jistart + 6679] = 0.0 + k[8591]*y_cur[IDX_GC2H5I]; + data[jistart + 6680] = 0.0 - k[3188]*y_cur[IDX_C2H6I] - k[3189]*y_cur[IDX_C2H6I] - + k[3190]*y_cur[IDX_C2H6I]; + data[jistart + 6681] = 0.0 - k[1367]*y_cur[IDX_C2H6I] - k[1368]*y_cur[IDX_C2H6I] - + k[1369]*y_cur[IDX_C2H6I] - k[1370]*y_cur[IDX_C2H6I] - + k[1371]*y_cur[IDX_C2H6I] - k[1372]*y_cur[IDX_C2H6I]; + data[jistart + 6682] = 0.0 - k[2326]*y_cur[IDX_C2H6I] - k[2327]*y_cur[IDX_C2H6I]; + data[jistart + 6683] = 0.0 - k[2949]*y_cur[IDX_C2H6I]; + data[jistart + 6684] = 0.0 - k[2648]*y_cur[IDX_C2H6I] + k[2665]*y_cur[IDX_CH3COCH3I]; + data[jistart + 6685] = 0.0 + k[6420]*y_cur[IDX_C2H7II] + k[6509]*y_cur[IDX_C3H7II]; + data[jistart + 6686] = 0.0 + k[779]*y_cur[IDX_C2H7II] + k[812]*y_cur[IDX_C3H7II]; + data[jistart + 6687] = 0.0 + k[7768] + k[8088]; + data[jistart + 6688] = 0.0 + k[8127]; + data[jistart + 6689] = 0.0 + k[8161]; + data[jistart + 6690] = 0.0 + k[7756] + k[8071] + k[8073] + k[8074] + k[8074]; + data[jistart + 6691] = 0.0 + k[7748] + k[8062]; + data[jistart + 6692] = 0.0 - k[8454]*y_cur[IDX_GNI]; + data[jistart + 6693] = 0.0 + k[7717] + k[8024]; + data[jistart + 6694] = 0.0 + k[7779] + k[8101] - k[8459]*y_cur[IDX_GNI]; + data[jistart + 6695] = 0.0 + k[7666] + k[7666] + k[7953] + k[7953]; + data[jistart + 6696] = 0.0 - k[8471]*y_cur[IDX_GNI] - k[8711]*y_cur[IDX_GNI]; + data[jistart + 6697] = 0.0 - k[8472]*y_cur[IDX_GNI] - k[8712]*y_cur[IDX_GNI]; + data[jistart + 6698] = 0.0 - k[8463]*y_cur[IDX_GNI]; + data[jistart + 6699] = 0.0 - k[8467]*y_cur[IDX_GNI] - k[8707]*y_cur[IDX_GNI]; + data[jistart + 6700] = 0.0 - k[8470]*y_cur[IDX_GNI] - k[8710]*y_cur[IDX_GNI]; + data[jistart + 6701] = 0.0 - k[8466]*y_cur[IDX_GNI] - k[8706]*y_cur[IDX_GNI]; + data[jistart + 6702] = 0.0 - k[8468]*y_cur[IDX_GNI] - k[8708]*y_cur[IDX_GNI]; + data[jistart + 6703] = 0.0 - k[8469]*y_cur[IDX_GNI] - k[8709]*y_cur[IDX_GNI]; + data[jistart + 6704] = 0.0 + k[7690] + k[7691] + k[7980] + k[7981]; + data[jistart + 6705] = 0.0 + k[7631] + k[7908]; + data[jistart + 6706] = 0.0 + k[7623] + k[7624] + k[7900] + k[7901] - k[8458]*y_cur[IDX_GNI]; + data[jistart + 6707] = 0.0 - k[8464]*y_cur[IDX_GNI] - k[8704]*y_cur[IDX_GNI]; + data[jistart + 6708] = 0.0 - k[8465]*y_cur[IDX_GNI] - k[8705]*y_cur[IDX_GNI]; + data[jistart + 6709] = 0.0 - k[8456]*y_cur[IDX_GNI] - k[8699]*y_cur[IDX_GNI]; + data[jistart + 6710] = 0.0 - k[8462]*y_cur[IDX_GNI] - k[8703]*y_cur[IDX_GNI]; + data[jistart + 6711] = 0.0 + k[7649] + k[7936]; + data[jistart + 6712] = 0.0 - k[7076] - k[7258] - k[7440] - k[8279]*y_cur[IDX_GHI] - + k[8397]*y_cur[IDX_GCI] - k[8454]*y_cur[IDX_GO2HI] - + k[8455]*y_cur[IDX_GCHI] - k[8456]*y_cur[IDX_GCH2I] - + k[8457]*y_cur[IDX_GNI] - k[8457]*y_cur[IDX_GNI] - + k[8457]*y_cur[IDX_GNI] - k[8457]*y_cur[IDX_GNI] - + k[8458]*y_cur[IDX_GNHI] - k[8459]*y_cur[IDX_GNSI] - + k[8460]*y_cur[IDX_GCH3I] - k[8461]*y_cur[IDX_GOI] - + k[8462]*y_cur[IDX_GC2I] - k[8463]*y_cur[IDX_GHSI] - + k[8464]*y_cur[IDX_GSI] - k[8465]*y_cur[IDX_GC3I] - + k[8466]*y_cur[IDX_GC3HI] - k[8467]*y_cur[IDX_GC5I] - + k[8468]*y_cur[IDX_GC5HI] - k[8469]*y_cur[IDX_GC7I] - + k[8470]*y_cur[IDX_GC7HI] - k[8471]*y_cur[IDX_GC9I] - + k[8472]*y_cur[IDX_GC9HI] - k[8580]*y_cur[IDX_GHI] - + k[8657]*y_cur[IDX_GCI] - k[8698]*y_cur[IDX_GCHI] - + k[8699]*y_cur[IDX_GCH2I] - k[8700]*y_cur[IDX_GNI] - + k[8700]*y_cur[IDX_GNI] - k[8700]*y_cur[IDX_GNI] - + k[8700]*y_cur[IDX_GNI] - k[8701]*y_cur[IDX_GCH3I] - + k[8702]*y_cur[IDX_GOI] - k[8703]*y_cur[IDX_GC2I] - + k[8704]*y_cur[IDX_GSI] - k[8705]*y_cur[IDX_GC3I] - + k[8706]*y_cur[IDX_GC3HI] - k[8707]*y_cur[IDX_GC5I] - + k[8708]*y_cur[IDX_GC5HI] - k[8709]*y_cur[IDX_GC7I] - + k[8710]*y_cur[IDX_GC7HI] - k[8711]*y_cur[IDX_GC9I] - + k[8712]*y_cur[IDX_GC9HI]; + data[jistart + 6713] = 0.0 - k[8461]*y_cur[IDX_GNI] - k[8702]*y_cur[IDX_GNI]; + data[jistart + 6714] = 0.0 - k[8460]*y_cur[IDX_GNI] - k[8701]*y_cur[IDX_GNI]; + data[jistart + 6715] = 0.0 - k[8455]*y_cur[IDX_GNI] - k[8698]*y_cur[IDX_GNI]; + data[jistart + 6716] = 0.0 - k[8397]*y_cur[IDX_GNI] - k[8657]*y_cur[IDX_GNI]; + data[jistart + 6717] = 0.0 - k[8279]*y_cur[IDX_GNI] - k[8580]*y_cur[IDX_GNI]; + data[jistart + 6718] = 0.0 + k[6894]; + data[jistart + 6719] = 0.0 + k[7130] + k[7312] + k[7494]; + data[jistart + 6720] = 0.0 + k[8611]*y_cur[IDX_GHI]; + data[jistart + 6721] = 0.0 + k[8720]*y_cur[IDX_GCHI]; + data[jistart + 6722] = 0.0 - k[1792]*y_cur[IDX_C3H2I] - k[1793]*y_cur[IDX_C3H2I]; + data[jistart + 6723] = 0.0 - k[1790]*y_cur[IDX_C3H2I] - k[1791]*y_cur[IDX_C3H2I]; + data[jistart + 6724] = 0.0 - k[334]*y_cur[IDX_HII] - k[1310]*y_cur[IDX_CII] - + k[1311]*y_cur[IDX_CII] - k[1485]*y_cur[IDX_C2H2II] - + k[1486]*y_cur[IDX_C2H2II] - k[1580]*y_cur[IDX_C2H3II] - + k[1581]*y_cur[IDX_C2H3II] - k[1582]*y_cur[IDX_C2H3II] - + k[1649]*y_cur[IDX_C2H4II] - k[1650]*y_cur[IDX_C2H4II] - + k[1759]*y_cur[IDX_C3H2II] - k[1760]*y_cur[IDX_C3H2II] - + k[1786]*y_cur[IDX_C3H3II] - k[1787]*y_cur[IDX_C3H3II] - + k[1788]*y_cur[IDX_C4H2II] - k[1789]*y_cur[IDX_C4H3II] - + k[1790]*y_cur[IDX_C5H2II] - k[1791]*y_cur[IDX_C5H2II] - + k[1792]*y_cur[IDX_C6H2II] - k[1793]*y_cur[IDX_C6H2II] - + k[1794]*y_cur[IDX_CH2CCHII] - k[1795]*y_cur[IDX_CH2CCHII] - + k[2050]*y_cur[IDX_CH3II] - k[2300]*y_cur[IDX_HII] - + k[2602]*y_cur[IDX_H3II] - k[2772]*y_cur[IDX_H3OII] - + k[2907]*y_cur[IDX_HCOII] - k[3096]*y_cur[IDX_HeII] - + k[3820]*y_cur[IDX_SII] - k[3860]*y_cur[IDX_SiII] - + k[4889]*y_cur[IDX_C2HI] - k[4919]*y_cur[IDX_CI] - + k[5232]*y_cur[IDX_NI] - k[5719] - k[6003] - k[6948]; + data[jistart + 6725] = 0.0 + k[2122]*y_cur[IDX_C3HII]; + data[jistart + 6726] = 0.0 + k[2122]*y_cur[IDX_CH3OHI]; + data[jistart + 6727] = 0.0 + k[798]*y_cur[IDX_eM] - k[1786]*y_cur[IDX_C3H2I] - + k[1787]*y_cur[IDX_C3H2I] + k[3565]*y_cur[IDX_NH3I] + + k[6473]*y_cur[IDX_GRAINM]; + data[jistart + 6728] = 0.0 + k[8720]*y_cur[IDX_GC2HI]; + data[jistart + 6729] = 0.0 - k[1759]*y_cur[IDX_C3H2I] - k[1760]*y_cur[IDX_C3H2I]; + data[jistart + 6730] = 0.0 - k[1649]*y_cur[IDX_C3H2I] - k[1650]*y_cur[IDX_C3H2I]; + data[jistart + 6731] = 0.0 - k[1789]*y_cur[IDX_C3H2I]; + data[jistart + 6732] = 0.0 + k[5782] + k[6083]; + data[jistart + 6733] = 0.0 - k[1794]*y_cur[IDX_C3H2I] - k[1795]*y_cur[IDX_C3H2I]; + data[jistart + 6734] = 0.0 - k[1788]*y_cur[IDX_C3H2I]; + data[jistart + 6735] = 0.0 + k[4913]*y_cur[IDX_CI]; + data[jistart + 6736] = 0.0 - k[3860]*y_cur[IDX_C3H2I]; + data[jistart + 6737] = 0.0 - k[3820]*y_cur[IDX_C3H2I]; + data[jistart + 6738] = 0.0 - k[1580]*y_cur[IDX_C3H2I] - k[1581]*y_cur[IDX_C3H2I] - + k[1582]*y_cur[IDX_C3H2I]; + data[jistart + 6739] = 0.0 - k[4889]*y_cur[IDX_C3H2I]; + data[jistart + 6740] = 0.0 + k[5063]*y_cur[IDX_C2H2I]; + data[jistart + 6741] = 0.0 + k[3565]*y_cur[IDX_C3H3II]; + data[jistart + 6742] = 0.0 - k[1485]*y_cur[IDX_C3H2I] - k[1486]*y_cur[IDX_C3H2I]; + data[jistart + 6743] = 0.0 - k[2050]*y_cur[IDX_C3H2I]; + data[jistart + 6744] = 0.0 + k[5063]*y_cur[IDX_CHI]; + data[jistart + 6745] = 0.0 + k[8611]*y_cur[IDX_GC3HI]; + data[jistart + 6746] = 0.0 - k[5232]*y_cur[IDX_C3H2I]; + data[jistart + 6747] = 0.0 - k[2772]*y_cur[IDX_C3H2I]; + data[jistart + 6748] = 0.0 - k[3096]*y_cur[IDX_C3H2I]; + data[jistart + 6749] = 0.0 - k[1310]*y_cur[IDX_C3H2I] - k[1311]*y_cur[IDX_C3H2I]; + data[jistart + 6750] = 0.0 - k[334]*y_cur[IDX_C3H2I] - k[2300]*y_cur[IDX_C3H2I]; + data[jistart + 6751] = 0.0 + k[4913]*y_cur[IDX_C2H3I] - k[4919]*y_cur[IDX_C3H2I]; + data[jistart + 6752] = 0.0 - k[2907]*y_cur[IDX_C3H2I]; + data[jistart + 6753] = 0.0 - k[2602]*y_cur[IDX_C3H2I]; + data[jistart + 6754] = 0.0 + k[6473]*y_cur[IDX_C3H3II]; + data[jistart + 6755] = 0.0 + k[798]*y_cur[IDX_C3H3II]; + data[jistart + 6756] = 0.0 + k[772]*y_cur[IDX_eM] + k[6576]*y_cur[IDX_GRAINM]; + data[jistart + 6757] = 0.0 + k[7104] + k[7286] + k[7468]; + data[jistart + 6758] = 0.0 + k[8590]*y_cur[IDX_GHI]; + data[jistart + 6759] = 0.0 + k[4886]*y_cur[IDX_OHI] + k[4887]*y_cur[IDX_OHI] + k[5705] + + k[5990]; + data[jistart + 6760] = 0.0 + k[775]*y_cur[IDX_eM] + k[776]*y_cur[IDX_eM] + + k[6607]*y_cur[IDX_GRAINM] + k[6608]*y_cur[IDX_GRAINM]; + data[jistart + 6761] = 0.0 + k[778]*y_cur[IDX_eM] + k[6419]*y_cur[IDX_GRAINM]; + data[jistart + 6762] = 0.0 + k[1817]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6763] = 0.0 + k[936]*y_cur[IDX_eM] + k[2111]*y_cur[IDX_H2SI] + + k[2534]*y_cur[IDX_H2OI] + k[2872]*y_cur[IDX_HCNI] + + k[3568]*y_cur[IDX_NH3I] + k[6411]*y_cur[IDX_GRAINM]; + data[jistart + 6764] = 0.0 + k[3859]*y_cur[IDX_SiII] + k[5706] + k[5991]; + data[jistart + 6765] = 0.0 + k[1532]*y_cur[IDX_C2H2II] + k[1683]*y_cur[IDX_C2H4II]; + data[jistart + 6766] = 0.0 + k[8746]*y_cur[IDX_GCH3I]; + data[jistart + 6767] = 0.0 + k[2506]*y_cur[IDX_H2OII] + k[5052]*y_cur[IDX_C4HI] + + k[5111]*y_cur[IDX_CNI]; + data[jistart + 6768] = 0.0 - k[149]*y_cur[IDX_CII] - k[327]*y_cur[IDX_HII] - + k[511]*y_cur[IDX_HeII] - k[1306]*y_cur[IDX_CII] - + k[2298]*y_cur[IDX_HII] - k[2591]*y_cur[IDX_H3II] - + k[2902]*y_cur[IDX_HCOII] - k[3083]*y_cur[IDX_HeII] - + k[3084]*y_cur[IDX_HeII] - k[4915]*y_cur[IDX_CI] - + k[5226]*y_cur[IDX_NI] - k[5227]*y_cur[IDX_NI] - + k[5350]*y_cur[IDX_OI] - k[5351]*y_cur[IDX_OI] - + k[5457]*y_cur[IDX_OHI] - k[5458]*y_cur[IDX_OHI] - k[5702] - k[5703] + - k[5987] - k[5988] - k[6922]; + data[jistart + 6769] = 0.0 + k[1817]*y_cur[IDX_C3H6II] + k[3826]*y_cur[IDX_SII] + + k[5056]*y_cur[IDX_OHI]; + data[jistart + 6770] = 0.0 + k[8746]*y_cur[IDX_GCH2I]; + data[jistart + 6771] = 0.0 + k[2506]*y_cur[IDX_C2H6I]; + data[jistart + 6772] = 0.0 + k[1683]*y_cur[IDX_SiH4I]; + data[jistart + 6773] = 0.0 + k[5052]*y_cur[IDX_C2H6I]; + data[jistart + 6774] = 0.0 + k[3859]*y_cur[IDX_C2H5OHI]; + data[jistart + 6775] = 0.0 + k[2111]*y_cur[IDX_C2H6II]; + data[jistart + 6776] = 0.0 + k[3826]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6777] = 0.0 + k[2872]*y_cur[IDX_C2H6II]; + data[jistart + 6778] = 0.0 + k[4886]*y_cur[IDX_C2H5CNI] + k[4887]*y_cur[IDX_C2H5CNI] + + k[5056]*y_cur[IDX_CH3CHCH2I] - k[5457]*y_cur[IDX_C2H5I] - + k[5458]*y_cur[IDX_C2H5I]; + data[jistart + 6779] = 0.0 + k[3568]*y_cur[IDX_C2H6II]; + data[jistart + 6780] = 0.0 + k[1532]*y_cur[IDX_SiH4I]; + data[jistart + 6781] = 0.0 + k[5111]*y_cur[IDX_C2H6I]; + data[jistart + 6782] = 0.0 + k[8590]*y_cur[IDX_GC2H4I]; + data[jistart + 6783] = 0.0 + k[5027]*y_cur[IDX_CH3I] + k[5027]*y_cur[IDX_CH3I]; + data[jistart + 6784] = 0.0 - k[5226]*y_cur[IDX_C2H5I] - k[5227]*y_cur[IDX_C2H5I]; + data[jistart + 6785] = 0.0 - k[5350]*y_cur[IDX_C2H5I] - k[5351]*y_cur[IDX_C2H5I]; + data[jistart + 6786] = 0.0 - k[511]*y_cur[IDX_C2H5I] - k[3083]*y_cur[IDX_C2H5I] - + k[3084]*y_cur[IDX_C2H5I]; + data[jistart + 6787] = 0.0 - k[149]*y_cur[IDX_C2H5I] - k[1306]*y_cur[IDX_C2H5I]; + data[jistart + 6788] = 0.0 + k[2534]*y_cur[IDX_C2H6II]; + data[jistart + 6789] = 0.0 - k[327]*y_cur[IDX_C2H5I] - k[2298]*y_cur[IDX_C2H5I]; + data[jistart + 6790] = 0.0 - k[4915]*y_cur[IDX_C2H5I]; + data[jistart + 6791] = 0.0 - k[2902]*y_cur[IDX_C2H5I]; + data[jistart + 6792] = 0.0 - k[2591]*y_cur[IDX_C2H5I]; + data[jistart + 6793] = 0.0 + k[6411]*y_cur[IDX_C2H6II] + k[6419]*y_cur[IDX_C2H7II] + + k[6576]*y_cur[IDX_C2H5OHII] + k[6607]*y_cur[IDX_C2H5OH2II] + + k[6608]*y_cur[IDX_C2H5OH2II]; + data[jistart + 6794] = 0.0 + k[772]*y_cur[IDX_C2H5OHII] + k[775]*y_cur[IDX_C2H5OH2II] + + k[776]*y_cur[IDX_C2H5OH2II] + k[778]*y_cur[IDX_C2H7II] + + k[936]*y_cur[IDX_C2H6II]; + data[jistart + 6795] = 0.0 + k[7796] + k[8121]; + data[jistart + 6796] = 0.0 + k[7778] + k[8099] + k[8100]; + data[jistart + 6797] = 0.0 + k[7832] + k[8156]; + data[jistart + 6798] = 0.0 + k[8070] + k[8072] + k[8074]; + data[jistart + 6799] = 0.0 + k[7782] + k[8106]; + data[jistart + 6800] = 0.0 + k[7839] + k[8164]; + data[jistart + 6801] = 0.0 + k[7765] + k[8083] + k[8084]; + data[jistart + 6802] = 0.0 + k[7771] + k[8091]; + data[jistart + 6803] = 0.0 + k[7829] + k[8153]; + data[jistart + 6804] = 0.0 + k[7727] + k[8035]; + data[jistart + 6805] = 0.0 + k[7764] + k[8082]; + data[jistart + 6806] = 0.0 + k[8006] - k[8436]*y_cur[IDX_GOI]; + data[jistart + 6807] = 0.0 + k[7747] + k[8061]; + data[jistart + 6808] = 0.0 + k[7786] + k[7787] + k[8110] + k[8111] - k[8453]*y_cur[IDX_GOI] + - k[8697]*y_cur[IDX_GOI]; + data[jistart + 6809] = 0.0 + k[7741] + k[8052]; + data[jistart + 6810] = 0.0 - k[8442]*y_cur[IDX_GOI]; + data[jistart + 6811] = 0.0 + k[7744] + k[8055]; + data[jistart + 6812] = 0.0 - k[8435]*y_cur[IDX_GOI]; + data[jistart + 6813] = 0.0 + k[7703] + k[7703] + k[7704] + k[7704] + k[8003] + k[8003] + + k[8004] + k[8004] + k[8407]*y_cur[IDX_GCI] + k[8485]*y_cur[IDX_GCHI] + + k[8528]*y_cur[IDX_GCH2I]; + data[jistart + 6814] = 0.0 - k[8452]*y_cur[IDX_GOI] - k[8696]*y_cur[IDX_GOI]; + data[jistart + 6815] = 0.0 - k[8449]*y_cur[IDX_GOI]; + data[jistart + 6816] = 0.0 + k[7881] + k[8264]; + data[jistart + 6817] = 0.0 + k[7922] + k[7923] + k[7924]; + data[jistart + 6818] = 0.0 + k[7984]; + data[jistart + 6819] = 0.0 + k[7690] + k[7691] + k[7980] + k[7981] + k[8398]*y_cur[IDX_GCI] + + k[8481]*y_cur[IDX_GCHI] + k[8525]*y_cur[IDX_GNHI]; + data[jistart + 6820] = 0.0 - k[8440]*y_cur[IDX_GOI]; + data[jistart + 6821] = 0.0 - k[8434]*y_cur[IDX_GOI] - k[8448]*y_cur[IDX_GOI]; + data[jistart + 6822] = 0.0 - k[8439]*y_cur[IDX_GOI] + k[8525]*y_cur[IDX_GNOI] - + k[8687]*y_cur[IDX_GOI]; + data[jistart + 6823] = 0.0 - k[8450]*y_cur[IDX_GOI] - k[8694]*y_cur[IDX_GOI]; + data[jistart + 6824] = 0.0 - k[8451]*y_cur[IDX_GOI] - k[8695]*y_cur[IDX_GOI]; + data[jistart + 6825] = 0.0 + k[7638] + k[7919] + k[7920] - k[8444]*y_cur[IDX_GOI] - + k[8690]*y_cur[IDX_GOI]; + data[jistart + 6826] = 0.0 + k[7616] + k[7675] + k[7962] - k[8447]*y_cur[IDX_GOI] - + k[8693]*y_cur[IDX_GOI]; + data[jistart + 6827] = 0.0 - k[8438]*y_cur[IDX_GOI] + k[8528]*y_cur[IDX_GO2I] - + k[8686]*y_cur[IDX_GOI]; + data[jistart + 6828] = 0.0 - k[8445]*y_cur[IDX_GOI] - k[8691]*y_cur[IDX_GOI]; + data[jistart + 6829] = 0.0 - k[8446]*y_cur[IDX_GOI] - k[8692]*y_cur[IDX_GOI]; + data[jistart + 6830] = 0.0 - k[8461]*y_cur[IDX_GOI] - k[8702]*y_cur[IDX_GOI]; + data[jistart + 6831] = 0.0 - k[7081] - k[7263] - k[7445] - k[8282]*y_cur[IDX_GHI] - + k[8406]*y_cur[IDX_GCI] - k[8434]*y_cur[IDX_GHCOI] - + k[8435]*y_cur[IDX_GHNOI] - k[8436]*y_cur[IDX_GO2HI] - + k[8437]*y_cur[IDX_GCHI] - k[8438]*y_cur[IDX_GCH2I] - + k[8439]*y_cur[IDX_GNHI] - k[8440]*y_cur[IDX_GNH2I] - + k[8441]*y_cur[IDX_GCH3I] - k[8442]*y_cur[IDX_GNSI] - + k[8443]*y_cur[IDX_GOI] - k[8443]*y_cur[IDX_GOI] - + k[8443]*y_cur[IDX_GOI] - k[8443]*y_cur[IDX_GOI] - + k[8444]*y_cur[IDX_GOHI] - k[8445]*y_cur[IDX_GC2I] - + k[8446]*y_cur[IDX_GCNI] - k[8447]*y_cur[IDX_GCOI] - + k[8448]*y_cur[IDX_GHCOI] - k[8449]*y_cur[IDX_GHSI] - + k[8450]*y_cur[IDX_GSI] - k[8451]*y_cur[IDX_GC3I] - + k[8452]*y_cur[IDX_GCSI] - k[8453]*y_cur[IDX_GSOI] - + k[8461]*y_cur[IDX_GNI] - k[8583]*y_cur[IDX_GHI] - + k[8661]*y_cur[IDX_GCI] - k[8685]*y_cur[IDX_GCHI] - + k[8686]*y_cur[IDX_GCH2I] - k[8687]*y_cur[IDX_GNHI] - + k[8688]*y_cur[IDX_GCH3I] - k[8689]*y_cur[IDX_GOI] - + k[8689]*y_cur[IDX_GOI] - k[8689]*y_cur[IDX_GOI] - + k[8689]*y_cur[IDX_GOI] - k[8690]*y_cur[IDX_GOHI] - + k[8691]*y_cur[IDX_GC2I] - k[8692]*y_cur[IDX_GCNI] - + k[8693]*y_cur[IDX_GCOI] - k[8694]*y_cur[IDX_GSI] - + k[8695]*y_cur[IDX_GC3I] - k[8696]*y_cur[IDX_GCSI] - + k[8697]*y_cur[IDX_GSOI] - k[8702]*y_cur[IDX_GNI]; + data[jistart + 6832] = 0.0 - k[8441]*y_cur[IDX_GOI] - k[8688]*y_cur[IDX_GOI]; + data[jistart + 6833] = 0.0 - k[8437]*y_cur[IDX_GOI] + k[8481]*y_cur[IDX_GNOI] + + k[8485]*y_cur[IDX_GO2I] - k[8685]*y_cur[IDX_GOI]; + data[jistart + 6834] = 0.0 + k[8398]*y_cur[IDX_GNOI] - k[8406]*y_cur[IDX_GOI] + + k[8407]*y_cur[IDX_GO2I] - k[8661]*y_cur[IDX_GOI]; + data[jistart + 6835] = 0.0 - k[8282]*y_cur[IDX_GOI] - k[8583]*y_cur[IDX_GOI]; + data[jistart + 6836] = 0.0 + k[6899]; + data[jistart + 6837] = 0.0 + k[3275]*y_cur[IDX_HeII]; + data[jistart + 6838] = 0.0 + k[3456]*y_cur[IDX_NI]; + data[jistart + 6839] = 0.0 - k[210]*y_cur[IDX_C2I] - k[243]*y_cur[IDX_C2HI] - + k[247]*y_cur[IDX_CI] - k[264]*y_cur[IDX_CH2I] - + k[293]*y_cur[IDX_CHI] - k[306]*y_cur[IDX_CNI] - + k[316]*y_cur[IDX_COI] - k[481]*y_cur[IDX_H2OI] - + k[498]*y_cur[IDX_HCNI] - k[535]*y_cur[IDX_MgI] - + k[564]*y_cur[IDX_CO2I] - k[565]*y_cur[IDX_FeI] - + k[566]*y_cur[IDX_H2COI] - k[567]*y_cur[IDX_H2SI] - + k[568]*y_cur[IDX_HCOI] - k[569]*y_cur[IDX_NOI] - + k[570]*y_cur[IDX_O2I] - k[571]*y_cur[IDX_OCSI] - + k[572]*y_cur[IDX_SI] - k[573]*y_cur[IDX_NI] - k[589]*y_cur[IDX_NH2I] + - k[610]*y_cur[IDX_NH3I] - k[618]*y_cur[IDX_NHI] - + k[640]*y_cur[IDX_NaI] - k[684]*y_cur[IDX_OI] - k[700]*y_cur[IDX_OHI] + - k[1150]*y_cur[IDX_eM] - k[2204]*y_cur[IDX_CH4I] - + k[2205]*y_cur[IDX_CH4I] - k[2460]*y_cur[IDX_H2I] - + k[2557]*y_cur[IDX_H2OI] - k[3361]*y_cur[IDX_H2COI] - + k[3362]*y_cur[IDX_H2SI] - k[3363]*y_cur[IDX_H2SI] - + k[3364]*y_cur[IDX_HCOI] - k[3365]*y_cur[IDX_OCSI] - + k[3744]*y_cur[IDX_OI] - k[6375]*y_cur[IDX_GRAINM]; + data[jistart + 6840] = 0.0 + k[3463]*y_cur[IDX_NI]; + data[jistart + 6841] = 0.0 - k[571]*y_cur[IDX_N2II] - k[3365]*y_cur[IDX_N2II]; + data[jistart + 6842] = 0.0 - k[589]*y_cur[IDX_N2II]; + data[jistart + 6843] = 0.0 - k[564]*y_cur[IDX_N2II]; + data[jistart + 6844] = 0.0 - k[565]*y_cur[IDX_N2II]; + data[jistart + 6845] = 0.0 - k[535]*y_cur[IDX_N2II]; + data[jistart + 6846] = 0.0 - k[640]*y_cur[IDX_N2II]; + data[jistart + 6847] = 0.0 - k[618]*y_cur[IDX_N2II] + k[3355]*y_cur[IDX_NII]; + data[jistart + 6848] = 0.0 + k[3355]*y_cur[IDX_NHI] + k[3356]*y_cur[IDX_NOI] + + k[5581]*y_cur[IDX_NI]; + data[jistart + 6849] = 0.0 - k[264]*y_cur[IDX_N2II]; + data[jistart + 6850] = 0.0 + k[523]*y_cur[IDX_HeII]; + data[jistart + 6851] = 0.0 - k[570]*y_cur[IDX_N2II]; + data[jistart + 6852] = 0.0 - k[567]*y_cur[IDX_N2II] - k[3362]*y_cur[IDX_N2II] - + k[3363]*y_cur[IDX_N2II]; + data[jistart + 6853] = 0.0 - k[569]*y_cur[IDX_N2II] + k[3356]*y_cur[IDX_NII]; + data[jistart + 6854] = 0.0 - k[568]*y_cur[IDX_N2II] - k[3364]*y_cur[IDX_N2II]; + data[jistart + 6855] = 0.0 - k[2204]*y_cur[IDX_N2II] - k[2205]*y_cur[IDX_N2II]; + data[jistart + 6856] = 0.0 - k[243]*y_cur[IDX_N2II]; + data[jistart + 6857] = 0.0 - k[566]*y_cur[IDX_N2II] - k[3361]*y_cur[IDX_N2II]; + data[jistart + 6858] = 0.0 - k[498]*y_cur[IDX_N2II]; + data[jistart + 6859] = 0.0 - k[293]*y_cur[IDX_N2II]; + data[jistart + 6860] = 0.0 - k[572]*y_cur[IDX_N2II]; + data[jistart + 6861] = 0.0 - k[210]*y_cur[IDX_N2II]; + data[jistart + 6862] = 0.0 - k[700]*y_cur[IDX_N2II]; + data[jistart + 6863] = 0.0 - k[610]*y_cur[IDX_N2II]; + data[jistart + 6864] = 0.0 - k[306]*y_cur[IDX_N2II]; + data[jistart + 6865] = 0.0 - k[573]*y_cur[IDX_N2II] + k[3456]*y_cur[IDX_CNII] + + k[3463]*y_cur[IDX_NHII] + k[5581]*y_cur[IDX_NII]; + data[jistart + 6866] = 0.0 - k[684]*y_cur[IDX_N2II] - k[3744]*y_cur[IDX_N2II]; + data[jistart + 6867] = 0.0 + k[523]*y_cur[IDX_N2I] + k[3275]*y_cur[IDX_N2OI]; + data[jistart + 6868] = 0.0 - k[481]*y_cur[IDX_N2II] - k[2557]*y_cur[IDX_N2II]; + data[jistart + 6869] = 0.0 - k[247]*y_cur[IDX_N2II]; + data[jistart + 6870] = 0.0 - k[316]*y_cur[IDX_N2II]; + data[jistart + 6871] = 0.0 - k[6375]*y_cur[IDX_N2II]; + data[jistart + 6872] = 0.0 - k[2460]*y_cur[IDX_N2II]; + data[jistart + 6873] = 0.0 - k[1150]*y_cur[IDX_N2II]; + data[jistart + 6874] = 0.0 - k[835]*y_cur[IDX_eM] - k[836]*y_cur[IDX_eM] - + k[837]*y_cur[IDX_eM] - k[3891]*y_cur[IDX_CM] - + k[3926]*y_cur[IDX_C10M] - k[3961]*y_cur[IDX_C10HM] - k[3996]*y_cur[IDX_C2M] - k[4031]*y_cur[IDX_C2HM] - k[4066]*y_cur[IDX_C3M] - k[4101]*y_cur[IDX_C3HM] - k[4136]*y_cur[IDX_C3NM] - k[4171]*y_cur[IDX_C4M] - @@ -8782,1344 +10930,1781 @@ __global__ void JacKernel(realtype *y, realtype *data, NaunetData *d_udata, k[4767]*y_cur[IDX_O2M] - k[4802]*y_cur[IDX_OHM] - k[4837]*y_cur[IDX_SM] - k[6815]*y_cur[IDX_GRAINM] - k[6816]*y_cur[IDX_GRAINM] - k[6817]*y_cur[IDX_GRAINM]; - data[jistart + 3727] = 0.0 - k[4241]*y_cur[IDX_C4SII]; - data[jistart + 3728] = 0.0 - k[4276]*y_cur[IDX_C4SII]; - data[jistart + 3729] = 0.0 - k[4311]*y_cur[IDX_C4SII]; - data[jistart + 3730] = 0.0 - k[4346]*y_cur[IDX_C4SII]; - data[jistart + 3731] = 0.0 - k[4381]*y_cur[IDX_C4SII]; - data[jistart + 3732] = 0.0 - k[4416]*y_cur[IDX_C4SII]; - data[jistart + 3733] = 0.0 - k[4451]*y_cur[IDX_C4SII]; - data[jistart + 3734] = 0.0 - k[4486]*y_cur[IDX_C4SII]; - data[jistart + 3735] = 0.0 - k[4521]*y_cur[IDX_C4SII]; - data[jistart + 3736] = 0.0 - k[4556]*y_cur[IDX_C4SII]; - data[jistart + 3737] = 0.0 - k[4591]*y_cur[IDX_C4SII]; - data[jistart + 3738] = 0.0 - k[4626]*y_cur[IDX_C4SII]; - data[jistart + 3739] = 0.0 - k[4661]*y_cur[IDX_C4SII]; - data[jistart + 3740] = 0.0 - k[6815]*y_cur[IDX_C4SII] - - k[6816]*y_cur[IDX_C4SII] - k[6817]*y_cur[IDX_C4SII]; - data[jistart + 3741] = 0.0 + k[342]*y_cur[IDX_C4SI]; - data[jistart + 3742] = 0.0 - k[4696]*y_cur[IDX_C4SII]; - data[jistart + 3743] = 0.0 - k[4732]*y_cur[IDX_C4SII]; - data[jistart + 3744] = 0.0 - k[4767]*y_cur[IDX_C4SII]; - data[jistart + 3745] = 0.0 - k[4802]*y_cur[IDX_C4SII]; - data[jistart + 3746] = 0.0 + k[3822]*y_cur[IDX_C4HI]; - data[jistart + 3747] = 0.0 - k[4837]*y_cur[IDX_C4SII]; - data[jistart + 3748] = 0.0 - k[835]*y_cur[IDX_C4SII] - - k[836]*y_cur[IDX_C4SII] - k[837]*y_cur[IDX_C4SII]; - data[jistart + 3749] = 0.0 + k[37]*y_cur[IDX_C10M] + - k[43]*y_cur[IDX_C4M] + k[4925]*y_cur[IDX_C4HI] - - k[4926]*y_cur[IDX_C5I] + k[4929]*y_cur[IDX_C5NI] + - k[4930]*y_cur[IDX_C6I] + k[4934]*y_cur[IDX_C7I]; - data[jistart + 3750] = 0.0 + k[4236]*y_cur[IDX_C5M] - - k[5498]*y_cur[IDX_C5I]; - data[jistart + 3751] = 0.0 + k[3056]*y_cur[IDX_HeII]; - data[jistart + 3752] = 0.0 + k[37]*y_cur[IDX_CI] + - k[3378]*y_cur[IDX_NI]; - data[jistart + 3753] = 0.0 + k[3068]*y_cur[IDX_HeII] + k[5963] + - k[5963] + k[5964]; - data[jistart + 3754] = 0.0 + k[730]*y_cur[IDX_eM] + - k[6872]*y_cur[IDX_GRAINM]; - data[jistart + 3755] = 0.0 + k[5970] + k[5971]; - data[jistart + 3756] = 0.0 + k[735]*y_cur[IDX_eM] + - k[6884]*y_cur[IDX_GRAINM]; - data[jistart + 3757] = 0.0 + k[11]*y_cur[IDX_C3I] - - k[13]*y_cur[IDX_C5I]; - data[jistart + 3758] = 0.0 + k[4237]*y_cur[IDX_C5M]; - data[jistart + 3759] = 0.0 + k[4238]*y_cur[IDX_C5M]; - data[jistart + 3760] = 0.0 + k[236]*y_cur[IDX_C5II]; - data[jistart + 3761] = 0.0 + k[11]*y_cur[IDX_C2M]; - data[jistart + 3762] = 0.0 - k[19]*y_cur[IDX_C5I]; - data[jistart + 3763] = 0.0 - k[25]*y_cur[IDX_C5I] + - k[43]*y_cur[IDX_CI]; - data[jistart + 3764] = 0.0 + k[4925]*y_cur[IDX_CI]; - data[jistart + 3765] = 0.0 + k[4239]*y_cur[IDX_C5M]; - data[jistart + 3766] = 0.0 + k[4240]*y_cur[IDX_C5M]; - data[jistart + 3767] = 0.0 + k[4241]*y_cur[IDX_C5M]; - data[jistart + 3768] = 0.0 - k[13]*y_cur[IDX_C2M] - - k[19]*y_cur[IDX_C3M] - k[25]*y_cur[IDX_C4M] - k[30]*y_cur[IDX_C5M] - - k[343]*y_cur[IDX_HII] - k[2613]*y_cur[IDX_H3II] - - k[2918]*y_cur[IDX_HCOII] - k[3117]*y_cur[IDX_HeII] - - k[3118]*y_cur[IDX_HeII] - k[4926]*y_cur[IDX_CI] - - k[5238]*y_cur[IDX_NI] - k[5365]*y_cur[IDX_OI] - - k[5498]*y_cur[IDX_CII] - k[5596]*y_cur[IDX_eM] - k[5737] - k[5738] - - k[6023] - k[7024]; - data[jistart + 3769] = 0.0 + k[236]*y_cur[IDX_C2H4I]; - data[jistart + 3770] = 0.0 - k[30]*y_cur[IDX_C5I] + - k[4236]*y_cur[IDX_CII] + k[4237]*y_cur[IDX_C2H2II] + - k[4238]*y_cur[IDX_C2H3II] + k[4239]*y_cur[IDX_C4H2II] + - k[4240]*y_cur[IDX_C4H3II] + k[4241]*y_cur[IDX_C4SII] + - k[4242]*y_cur[IDX_CH2CCHII] + k[4243]*y_cur[IDX_CH3II] + - k[4244]*y_cur[IDX_CNCII] + k[4245]*y_cur[IDX_FeII] + - k[4246]*y_cur[IDX_HII] + k[4247]*y_cur[IDX_H2COII] + - k[4248]*y_cur[IDX_H2SII] + k[4249]*y_cur[IDX_H3II] + - k[4250]*y_cur[IDX_H3OII] + k[4251]*y_cur[IDX_HC2SII] + - k[4252]*y_cur[IDX_HCNHII] + k[4253]*y_cur[IDX_HCNHII] + - k[4254]*y_cur[IDX_HCOII] + k[4255]*y_cur[IDX_HCOII] + - k[4256]*y_cur[IDX_HeII] + k[4257]*y_cur[IDX_MgII] + - k[4258]*y_cur[IDX_NII] + k[4259]*y_cur[IDX_N2HII] + - k[4260]*y_cur[IDX_NH3II] + k[4261]*y_cur[IDX_NH4II] + - k[4262]*y_cur[IDX_NOII] + k[4263]*y_cur[IDX_NaII] + - k[4264]*y_cur[IDX_OII] + k[4265]*y_cur[IDX_SII] + - k[4266]*y_cur[IDX_SOII] + k[4267]*y_cur[IDX_SiII] + - k[4268]*y_cur[IDX_SiOII] + k[4269]*y_cur[IDX_SiOHII] + - k[4270]*y_cur[IDX_SiSII] + k[5736] + k[6022]; - data[jistart + 3771] = 0.0 + k[5744] + k[6029]; - data[jistart + 3772] = 0.0 + k[840]*y_cur[IDX_eM] + - k[6722]*y_cur[IDX_GRAINM]; - data[jistart + 3773] = 0.0 + k[841]*y_cur[IDX_eM] + - k[6738]*y_cur[IDX_GRAINM]; - data[jistart + 3774] = 0.0 + k[4929]*y_cur[IDX_CI]; - data[jistart + 3775] = 0.0 + k[4930]*y_cur[IDX_CI] + - k[5242]*y_cur[IDX_NI] + k[5368]*y_cur[IDX_OI] + k[5748] + k[6033]; - data[jistart + 3776] = 0.0 + k[849]*y_cur[IDX_eM] + - k[6781]*y_cur[IDX_GRAINM]; - data[jistart + 3777] = 0.0 + k[3419]*y_cur[IDX_NI]; - data[jistart + 3778] = 0.0 + k[4934]*y_cur[IDX_CI]; - data[jistart + 3779] = 0.0 + k[864]*y_cur[IDX_eM] + - k[6822]*y_cur[IDX_GRAINM]; - data[jistart + 3780] = 0.0 + k[3436]*y_cur[IDX_NI]; - data[jistart + 3781] = 0.0 + k[4242]*y_cur[IDX_C5M]; - data[jistart + 3782] = 0.0 + k[4243]*y_cur[IDX_C5M]; - data[jistart + 3783] = 0.0 + k[4244]*y_cur[IDX_C5M]; - data[jistart + 3784] = 0.0 + k[4245]*y_cur[IDX_C5M]; - data[jistart + 3785] = 0.0 + k[8671]*y_cur[IDX_GC4I]; - data[jistart + 3786] = 0.0 + k[8671]*y_cur[IDX_GCI]; - data[jistart + 3787] = 0.0 + k[7206] + k[7388] + k[7572]; - data[jistart + 3788] = 0.0 + k[6722]*y_cur[IDX_C5HII] + - k[6738]*y_cur[IDX_C5H2II] + k[6781]*y_cur[IDX_C6II] + - k[6822]*y_cur[IDX_C7II] + k[6872]*y_cur[IDX_C10HII] + - k[6884]*y_cur[IDX_C11II]; - data[jistart + 3789] = 0.0 - k[343]*y_cur[IDX_C5I] + - k[4246]*y_cur[IDX_C5M]; - data[jistart + 3790] = 0.0 + k[4247]*y_cur[IDX_C5M]; - data[jistart + 3791] = 0.0 + k[4248]*y_cur[IDX_C5M]; - data[jistart + 3792] = 0.0 - k[2613]*y_cur[IDX_C5I] + - k[4249]*y_cur[IDX_C5M]; - data[jistart + 3793] = 0.0 + k[4250]*y_cur[IDX_C5M]; - data[jistart + 3794] = 0.0 + k[4251]*y_cur[IDX_C5M]; - data[jistart + 3795] = 0.0 + k[4252]*y_cur[IDX_C5M] + - k[4253]*y_cur[IDX_C5M]; - data[jistart + 3796] = 0.0 - k[2918]*y_cur[IDX_C5I] + - k[4254]*y_cur[IDX_C5M] + k[4255]*y_cur[IDX_C5M]; - data[jistart + 3797] = 0.0 + k[3056]*y_cur[IDX_C10I] + - k[3068]*y_cur[IDX_C10HI] - k[3117]*y_cur[IDX_C5I] - - k[3118]*y_cur[IDX_C5I] + k[4256]*y_cur[IDX_C5M]; - data[jistart + 3798] = 0.0 + k[4257]*y_cur[IDX_C5M]; - data[jistart + 3799] = 0.0 + k[3378]*y_cur[IDX_C10M] + - k[3419]*y_cur[IDX_C6M] + k[3436]*y_cur[IDX_C8M] - - k[5238]*y_cur[IDX_C5I] + k[5242]*y_cur[IDX_C6I]; - data[jistart + 3800] = 0.0 + k[4258]*y_cur[IDX_C5M]; - data[jistart + 3801] = 0.0 + k[4259]*y_cur[IDX_C5M]; - data[jistart + 3802] = 0.0 + k[4260]*y_cur[IDX_C5M]; - data[jistart + 3803] = 0.0 + k[4261]*y_cur[IDX_C5M]; - data[jistart + 3804] = 0.0 + k[4262]*y_cur[IDX_C5M]; - data[jistart + 3805] = 0.0 + k[4263]*y_cur[IDX_C5M]; - data[jistart + 3806] = 0.0 - k[5365]*y_cur[IDX_C5I] + - k[5368]*y_cur[IDX_C6I]; - data[jistart + 3807] = 0.0 + k[4264]*y_cur[IDX_C5M]; - data[jistart + 3808] = 0.0 + k[4265]*y_cur[IDX_C5M]; - data[jistart + 3809] = 0.0 + k[4266]*y_cur[IDX_C5M]; - data[jistart + 3810] = 0.0 + k[4267]*y_cur[IDX_C5M]; - data[jistart + 3811] = 0.0 + k[4268]*y_cur[IDX_C5M]; - data[jistart + 3812] = 0.0 + k[4269]*y_cur[IDX_C5M]; - data[jistart + 3813] = 0.0 + k[4270]*y_cur[IDX_C5M]; - data[jistart + 3814] = 0.0 + k[730]*y_cur[IDX_C10HII] + - k[735]*y_cur[IDX_C11II] + k[840]*y_cur[IDX_C5HII] + - k[841]*y_cur[IDX_C5H2II] + k[849]*y_cur[IDX_C6II] + - k[864]*y_cur[IDX_C7II] - k[5596]*y_cur[IDX_C5I]; - data[jistart + 3815] = 0.0 + k[1862]*y_cur[IDX_C4HII] + - k[1863]*y_cur[IDX_C4H2II]; - data[jistart + 3816] = 0.0 + k[1320]*y_cur[IDX_C4HI] + - k[1321]*y_cur[IDX_C4PI] + k[1322]*y_cur[IDX_C4SI] + - k[5497]*y_cur[IDX_C4I]; - data[jistart + 3817] = 0.0 + k[3056]*y_cur[IDX_HeII]; - data[jistart + 3818] = 0.0 - k[1556]*y_cur[IDX_C5II]; - data[jistart + 3819] = 0.0 - k[236]*y_cur[IDX_C5II] - - k[1698]*y_cur[IDX_C5II] - k[1699]*y_cur[IDX_C5II] - - k[1700]*y_cur[IDX_C5II]; - data[jistart + 3820] = 0.0 + k[5497]*y_cur[IDX_CII]; - data[jistart + 3821] = 0.0 + k[1320]*y_cur[IDX_CII]; - data[jistart + 3822] = 0.0 + k[1862]*y_cur[IDX_CI]; - data[jistart + 3823] = 0.0 + k[1863]*y_cur[IDX_CI]; - data[jistart + 3824] = 0.0 + k[1321]*y_cur[IDX_CII]; - data[jistart + 3825] = 0.0 + k[1322]*y_cur[IDX_CII]; - data[jistart + 3826] = 0.0 + k[343]*y_cur[IDX_HII]; - data[jistart + 3827] = 0.0 - k[236]*y_cur[IDX_C2H4I] - - k[838]*y_cur[IDX_eM] - k[1556]*y_cur[IDX_C2H2I] - - k[1698]*y_cur[IDX_C2H4I] - k[1699]*y_cur[IDX_C2H4I] - - k[1700]*y_cur[IDX_C2H4I] - k[2176]*y_cur[IDX_CH4I] - - k[2177]*y_cur[IDX_CH4I] - k[2178]*y_cur[IDX_CH4I] - - k[2179]*y_cur[IDX_CH4I] - k[2414]*y_cur[IDX_H2I] - - k[2871]*y_cur[IDX_HCNI] - k[6709]*y_cur[IDX_GRAINM]; - data[jistart + 3828] = 0.0 + k[2305]*y_cur[IDX_HII] + - k[3123]*y_cur[IDX_HeII]; - data[jistart + 3829] = 0.0 + k[3120]*y_cur[IDX_HeII]; - data[jistart + 3830] = 0.0 + k[3126]*y_cur[IDX_HeII]; - data[jistart + 3831] = 0.0 + k[3134]*y_cur[IDX_HeII]; - data[jistart + 3832] = 0.0 - k[2176]*y_cur[IDX_C5II] - - k[2177]*y_cur[IDX_C5II] - k[2178]*y_cur[IDX_C5II] - - k[2179]*y_cur[IDX_C5II]; - data[jistart + 3833] = 0.0 - k[6709]*y_cur[IDX_C5II]; - data[jistart + 3834] = 0.0 + k[343]*y_cur[IDX_C5I] + - k[2305]*y_cur[IDX_C5HI]; - data[jistart + 3835] = 0.0 - k[2414]*y_cur[IDX_C5II]; - data[jistart + 3836] = 0.0 - k[2871]*y_cur[IDX_C5II]; - data[jistart + 3837] = 0.0 + k[3056]*y_cur[IDX_C10I] + - k[3120]*y_cur[IDX_C5H2I] + k[3123]*y_cur[IDX_C5HI] + - k[3126]*y_cur[IDX_C6I] + k[3134]*y_cur[IDX_C7I]; - data[jistart + 3838] = 0.0 - k[838]*y_cur[IDX_C5II]; - data[jistart + 3839] = 0.0 - k[45]*y_cur[IDX_C5M]; - data[jistart + 3840] = 0.0 - k[4236]*y_cur[IDX_C5M]; - data[jistart + 3841] = 0.0 - k[27]*y_cur[IDX_C5M]; - data[jistart + 3842] = 0.0 - k[4237]*y_cur[IDX_C5M]; - data[jistart + 3843] = 0.0 - k[4238]*y_cur[IDX_C5M]; - data[jistart + 3844] = 0.0 - k[28]*y_cur[IDX_C5M]; - data[jistart + 3845] = 0.0 - k[29]*y_cur[IDX_C5M]; - data[jistart + 3846] = 0.0 - k[4239]*y_cur[IDX_C5M]; - data[jistart + 3847] = 0.0 - k[4240]*y_cur[IDX_C5M]; - data[jistart + 3848] = 0.0 - k[4241]*y_cur[IDX_C5M]; - data[jistart + 3849] = 0.0 - k[30]*y_cur[IDX_C5M] + - k[5596]*y_cur[IDX_eM]; - data[jistart + 3850] = 0.0 - k[27]*y_cur[IDX_C2I] - - k[28]*y_cur[IDX_C3I] - k[29]*y_cur[IDX_C4I] - k[30]*y_cur[IDX_C5I] - - k[45]*y_cur[IDX_CI] - k[94]*y_cur[IDX_HI] - k[116]*y_cur[IDX_NI] - - k[3409]*y_cur[IDX_NI] - k[3410]*y_cur[IDX_NI] - - k[3411]*y_cur[IDX_NI] - k[3703]*y_cur[IDX_OI] - - k[4236]*y_cur[IDX_CII] - k[4237]*y_cur[IDX_C2H2II] - - k[4238]*y_cur[IDX_C2H3II] - k[4239]*y_cur[IDX_C4H2II] - - k[4240]*y_cur[IDX_C4H3II] - k[4241]*y_cur[IDX_C4SII] - - k[4242]*y_cur[IDX_CH2CCHII] - k[4243]*y_cur[IDX_CH3II] - - k[4244]*y_cur[IDX_CNCII] - k[4245]*y_cur[IDX_FeII] - - k[4246]*y_cur[IDX_HII] - k[4247]*y_cur[IDX_H2COII] - - k[4248]*y_cur[IDX_H2SII] - k[4249]*y_cur[IDX_H3II] - - k[4250]*y_cur[IDX_H3OII] - k[4251]*y_cur[IDX_HC2SII] - - k[4252]*y_cur[IDX_HCNHII] - k[4253]*y_cur[IDX_HCNHII] - - k[4254]*y_cur[IDX_HCOII] - k[4255]*y_cur[IDX_HCOII] - - k[4256]*y_cur[IDX_HeII] - k[4257]*y_cur[IDX_MgII] - - k[4258]*y_cur[IDX_NII] - k[4259]*y_cur[IDX_N2HII] - - k[4260]*y_cur[IDX_NH3II] - k[4261]*y_cur[IDX_NH4II] - - k[4262]*y_cur[IDX_NOII] - k[4263]*y_cur[IDX_NaII] - - k[4264]*y_cur[IDX_OII] - k[4265]*y_cur[IDX_SII] - - k[4266]*y_cur[IDX_SOII] - k[4267]*y_cur[IDX_SiII] - - k[4268]*y_cur[IDX_SiOII] - k[4269]*y_cur[IDX_SiOHII] - - k[4270]*y_cur[IDX_SiSII] - k[5736] - k[6022]; - data[jistart + 3851] = 0.0 + k[3420]*y_cur[IDX_NI] + - k[3708]*y_cur[IDX_OI]; - data[jistart + 3852] = 0.0 - k[4242]*y_cur[IDX_C5M]; - data[jistart + 3853] = 0.0 - k[4243]*y_cur[IDX_C5M]; - data[jistart + 3854] = 0.0 - k[4244]*y_cur[IDX_C5M]; - data[jistart + 3855] = 0.0 - k[4245]*y_cur[IDX_C5M]; - data[jistart + 3856] = 0.0 - k[94]*y_cur[IDX_C5M]; - data[jistart + 3857] = 0.0 - k[4246]*y_cur[IDX_C5M]; - data[jistart + 3858] = 0.0 - k[4247]*y_cur[IDX_C5M]; - data[jistart + 3859] = 0.0 - k[4248]*y_cur[IDX_C5M]; - data[jistart + 3860] = 0.0 - k[4249]*y_cur[IDX_C5M]; - data[jistart + 3861] = 0.0 - k[4250]*y_cur[IDX_C5M]; - data[jistart + 3862] = 0.0 - k[4251]*y_cur[IDX_C5M]; - data[jistart + 3863] = 0.0 - k[4252]*y_cur[IDX_C5M] - - k[4253]*y_cur[IDX_C5M]; - data[jistart + 3864] = 0.0 - k[4254]*y_cur[IDX_C5M] - - k[4255]*y_cur[IDX_C5M]; - data[jistart + 3865] = 0.0 - k[4256]*y_cur[IDX_C5M]; - data[jistart + 3866] = 0.0 - k[4257]*y_cur[IDX_C5M]; - data[jistart + 3867] = 0.0 - k[116]*y_cur[IDX_C5M] - - k[3409]*y_cur[IDX_C5M] - k[3410]*y_cur[IDX_C5M] - - k[3411]*y_cur[IDX_C5M] + k[3420]*y_cur[IDX_C6M]; - data[jistart + 3868] = 0.0 - k[4258]*y_cur[IDX_C5M]; - data[jistart + 3869] = 0.0 - k[4259]*y_cur[IDX_C5M]; - data[jistart + 3870] = 0.0 - k[4260]*y_cur[IDX_C5M]; - data[jistart + 3871] = 0.0 - k[4261]*y_cur[IDX_C5M]; - data[jistart + 3872] = 0.0 - k[4262]*y_cur[IDX_C5M]; - data[jistart + 3873] = 0.0 - k[4263]*y_cur[IDX_C5M]; - data[jistart + 3874] = 0.0 - k[3703]*y_cur[IDX_C5M] + - k[3708]*y_cur[IDX_C6M]; - data[jistart + 3875] = 0.0 - k[4264]*y_cur[IDX_C5M]; - data[jistart + 3876] = 0.0 - k[4265]*y_cur[IDX_C5M]; - data[jistart + 3877] = 0.0 - k[4266]*y_cur[IDX_C5M]; - data[jistart + 3878] = 0.0 - k[4267]*y_cur[IDX_C5M]; - data[jistart + 3879] = 0.0 - k[4268]*y_cur[IDX_C5M]; - data[jistart + 3880] = 0.0 - k[4269]*y_cur[IDX_C5M]; - data[jistart + 3881] = 0.0 - k[4270]*y_cur[IDX_C5M]; - data[jistart + 3882] = 0.0 + k[5596]*y_cur[IDX_C5I]; - data[jistart + 3883] = 0.0 + k[44]*y_cur[IDX_C4HM] + - k[4909]*y_cur[IDX_C10H2I] - k[4928]*y_cur[IDX_C5HI] + - k[4961]*y_cur[IDX_C4H2I]; - data[jistart + 3884] = 0.0 - k[1325]*y_cur[IDX_C5HI] + - k[4271]*y_cur[IDX_C5HM]; - data[jistart + 3885] = 0.0 + k[5964]; - data[jistart + 3886] = 0.0 + k[730]*y_cur[IDX_eM] + - k[6872]*y_cur[IDX_GRAINM]; - data[jistart + 3887] = 0.0 + k[3063]*y_cur[IDX_HeII] + - k[4909]*y_cur[IDX_CI]; - data[jistart + 3888] = 0.0 - k[1493]*y_cur[IDX_C5HI] - - k[1494]*y_cur[IDX_C5HI] + k[4272]*y_cur[IDX_C5HM]; - data[jistart + 3889] = 0.0 - k[1592]*y_cur[IDX_C5HI] - - k[1593]*y_cur[IDX_C5HI] - k[1594]*y_cur[IDX_C5HI] + - k[4273]*y_cur[IDX_C5HM]; - data[jistart + 3890] = 0.0 - k[1657]*y_cur[IDX_C5HI] - - k[1658]*y_cur[IDX_C5HI]; - data[jistart + 3891] = 0.0 - k[1765]*y_cur[IDX_C5HI] - - k[1766]*y_cur[IDX_C5HI]; - data[jistart + 3892] = 0.0 - k[1800]*y_cur[IDX_C5HI] - - k[1801]*y_cur[IDX_C5HI]; - data[jistart + 3893] = 0.0 - k[1833]*y_cur[IDX_C5HI]; - data[jistart + 3894] = 0.0 + k[44]*y_cur[IDX_CI]; - data[jistart + 3895] = 0.0 + k[4961]*y_cur[IDX_CI]; - data[jistart + 3896] = 0.0 - k[1836]*y_cur[IDX_C5HI] + - k[4274]*y_cur[IDX_C5HM]; - data[jistart + 3897] = 0.0 - k[1841]*y_cur[IDX_C5HI] + - k[4275]*y_cur[IDX_C5HM]; - data[jistart + 3898] = 0.0 + k[4276]*y_cur[IDX_C5HM]; - data[jistart + 3899] = 0.0 + k[94]*y_cur[IDX_HI]; - data[jistart + 3900] = 0.0 - k[345]*y_cur[IDX_HII] - - k[1325]*y_cur[IDX_CII] - k[1493]*y_cur[IDX_C2H2II] - - k[1494]*y_cur[IDX_C2H2II] - k[1592]*y_cur[IDX_C2H3II] - - k[1593]*y_cur[IDX_C2H3II] - k[1594]*y_cur[IDX_C2H3II] - - k[1657]*y_cur[IDX_C2H4II] - k[1658]*y_cur[IDX_C2H4II] - - k[1765]*y_cur[IDX_C3H2II] - k[1766]*y_cur[IDX_C3H2II] - - k[1800]*y_cur[IDX_C3H3II] - k[1801]*y_cur[IDX_C3H3II] - - k[1833]*y_cur[IDX_C4HII] - k[1836]*y_cur[IDX_C4H2II] - - k[1841]*y_cur[IDX_C4H3II] - k[2024]*y_cur[IDX_CH2CCHII] - - k[2025]*y_cur[IDX_CH2CCHII] - k[2054]*y_cur[IDX_CH3II] - - k[2305]*y_cur[IDX_HII] - k[2615]*y_cur[IDX_H3II] - - k[2920]*y_cur[IDX_HCOII] - k[3122]*y_cur[IDX_HeII] - - k[3123]*y_cur[IDX_HeII] - k[4928]*y_cur[IDX_CI] - - k[5240]*y_cur[IDX_NI] - k[5366]*y_cur[IDX_OI] - - k[5597]*y_cur[IDX_eM] - k[5742] - k[5743] - k[5744] - k[6027] - - k[6028] - k[6029] - k[7028]; - data[jistart + 3901] = 0.0 + k[4271]*y_cur[IDX_CII] + - k[4272]*y_cur[IDX_C2H2II] + k[4273]*y_cur[IDX_C2H3II] + - k[4274]*y_cur[IDX_C4H2II] + k[4275]*y_cur[IDX_C4H3II] + - k[4276]*y_cur[IDX_C4SII] + k[4277]*y_cur[IDX_CH2CCHII] + - k[4278]*y_cur[IDX_CH3II] + k[4279]*y_cur[IDX_CNCII] + - k[4280]*y_cur[IDX_FeII] + k[4281]*y_cur[IDX_HII] + - k[4282]*y_cur[IDX_H2COII] + k[4283]*y_cur[IDX_H2SII] + - k[4284]*y_cur[IDX_H3II] + k[4285]*y_cur[IDX_H3OII] + - k[4286]*y_cur[IDX_HC2SII] + k[4287]*y_cur[IDX_HCNHII] + - k[4288]*y_cur[IDX_HCNHII] + k[4289]*y_cur[IDX_HCOII] + - k[4290]*y_cur[IDX_HCOII] + k[4291]*y_cur[IDX_HeII] + - k[4292]*y_cur[IDX_MgII] + k[4293]*y_cur[IDX_NII] + - k[4294]*y_cur[IDX_N2HII] + k[4295]*y_cur[IDX_NH3II] + - k[4296]*y_cur[IDX_NH4II] + k[4297]*y_cur[IDX_NOII] + - k[4298]*y_cur[IDX_NaII] + k[4299]*y_cur[IDX_OII] + - k[4300]*y_cur[IDX_SII] + k[4301]*y_cur[IDX_SOII] + - k[4302]*y_cur[IDX_SiII] + k[4303]*y_cur[IDX_SiOII] + - k[4304]*y_cur[IDX_SiOHII] + k[4305]*y_cur[IDX_SiSII] + k[5739] + - k[6024]; - data[jistart + 3902] = 0.0 + k[5741] + k[6026]; - data[jistart + 3903] = 0.0 + k[842]*y_cur[IDX_eM] + - k[6739]*y_cur[IDX_GRAINM]; - data[jistart + 3904] = 0.0 + k[844]*y_cur[IDX_eM] + - k[6743]*y_cur[IDX_GRAINM]; - data[jistart + 3905] = 0.0 + k[5243]*y_cur[IDX_NI] + - k[5369]*y_cur[IDX_OI]; - data[jistart + 3906] = 0.0 + k[850]*y_cur[IDX_eM] + - k[6782]*y_cur[IDX_GRAINM]; - data[jistart + 3907] = 0.0 + k[3422]*y_cur[IDX_NI]; - data[jistart + 3908] = 0.0 + k[3710]*y_cur[IDX_OI]; - data[jistart + 3909] = 0.0 + k[3440]*y_cur[IDX_NI]; - data[jistart + 3910] = 0.0 - k[2024]*y_cur[IDX_C5HI] - - k[2025]*y_cur[IDX_C5HI] + k[4277]*y_cur[IDX_C5HM]; - data[jistart + 3911] = 0.0 - k[2054]*y_cur[IDX_C5HI] + - k[4278]*y_cur[IDX_C5HM]; - data[jistart + 3912] = 0.0 + k[930]*y_cur[IDX_eM] + - k[6749]*y_cur[IDX_GRAINM]; - data[jistart + 3913] = 0.0 + k[4279]*y_cur[IDX_C5HM]; - data[jistart + 3914] = 0.0 + k[4280]*y_cur[IDX_C5HM]; - data[jistart + 3915] = 0.0 + k[8672]*y_cur[IDX_GC4HI]; - data[jistart + 3916] = 0.0 + k[8726]*y_cur[IDX_GCHI]; - data[jistart + 3917] = 0.0 + k[8672]*y_cur[IDX_GCI]; - data[jistart + 3918] = 0.0 + k[8636]*y_cur[IDX_GHI]; - data[jistart + 3919] = 0.0 + k[7210] + k[7392] + k[7574]; - data[jistart + 3920] = 0.0 + k[8726]*y_cur[IDX_GC4I]; - data[jistart + 3921] = 0.0 + k[8636]*y_cur[IDX_GC5I]; - data[jistart + 3922] = 0.0 + k[6739]*y_cur[IDX_C5H2II] + - k[6743]*y_cur[IDX_C5H3II] + k[6749]*y_cur[IDX_CH3C4HII] + - k[6782]*y_cur[IDX_C6HII] + k[6872]*y_cur[IDX_C10HII]; - data[jistart + 3923] = 0.0 + k[94]*y_cur[IDX_C5M]; - data[jistart + 3924] = 0.0 - k[345]*y_cur[IDX_C5HI] - - k[2305]*y_cur[IDX_C5HI] + k[4281]*y_cur[IDX_C5HM]; - data[jistart + 3925] = 0.0 + k[4282]*y_cur[IDX_C5HM]; - data[jistart + 3926] = 0.0 + k[4283]*y_cur[IDX_C5HM]; - data[jistart + 3927] = 0.0 - k[2615]*y_cur[IDX_C5HI] + - k[4284]*y_cur[IDX_C5HM]; - data[jistart + 3928] = 0.0 + k[4285]*y_cur[IDX_C5HM]; - data[jistart + 3929] = 0.0 + k[4286]*y_cur[IDX_C5HM]; - data[jistart + 3930] = 0.0 + k[4287]*y_cur[IDX_C5HM] + - k[4288]*y_cur[IDX_C5HM]; - data[jistart + 3931] = 0.0 - k[2920]*y_cur[IDX_C5HI] + - k[4289]*y_cur[IDX_C5HM] + k[4290]*y_cur[IDX_C5HM]; - data[jistart + 3932] = 0.0 + k[3063]*y_cur[IDX_C10H2I] - - k[3122]*y_cur[IDX_C5HI] - k[3123]*y_cur[IDX_C5HI] + - k[4291]*y_cur[IDX_C5HM]; - data[jistart + 3933] = 0.0 + k[4292]*y_cur[IDX_C5HM]; - data[jistart + 3934] = 0.0 + k[3422]*y_cur[IDX_C6HM] + - k[3440]*y_cur[IDX_C8HM] - k[5240]*y_cur[IDX_C5HI] + - k[5243]*y_cur[IDX_C6HI]; - data[jistart + 3935] = 0.0 + k[4293]*y_cur[IDX_C5HM]; - data[jistart + 3936] = 0.0 + k[4294]*y_cur[IDX_C5HM]; - data[jistart + 3937] = 0.0 + k[4295]*y_cur[IDX_C5HM]; - data[jistart + 3938] = 0.0 + k[4296]*y_cur[IDX_C5HM]; - data[jistart + 3939] = 0.0 + k[4297]*y_cur[IDX_C5HM]; - data[jistart + 3940] = 0.0 + k[4298]*y_cur[IDX_C5HM]; - data[jistart + 3941] = 0.0 + k[3710]*y_cur[IDX_C6H2II] - - k[5366]*y_cur[IDX_C5HI] + k[5369]*y_cur[IDX_C6HI]; - data[jistart + 3942] = 0.0 + k[4299]*y_cur[IDX_C5HM]; - data[jistart + 3943] = 0.0 + k[4300]*y_cur[IDX_C5HM]; - data[jistart + 3944] = 0.0 + k[4301]*y_cur[IDX_C5HM]; - data[jistart + 3945] = 0.0 + k[4302]*y_cur[IDX_C5HM]; - data[jistart + 3946] = 0.0 + k[4303]*y_cur[IDX_C5HM]; - data[jistart + 3947] = 0.0 + k[4304]*y_cur[IDX_C5HM]; - data[jistart + 3948] = 0.0 + k[4305]*y_cur[IDX_C5HM]; - data[jistart + 3949] = 0.0 + k[730]*y_cur[IDX_C10HII] + - k[842]*y_cur[IDX_C5H2II] + k[844]*y_cur[IDX_C5H3II] + - k[850]*y_cur[IDX_C6HII] + k[930]*y_cur[IDX_CH3C4HII] - - k[5597]*y_cur[IDX_C5HI]; - data[jistart + 3950] = 0.0 + k[1864]*y_cur[IDX_C4H2II] + - k[1865]*y_cur[IDX_C4H3II] - k[1867]*y_cur[IDX_C5HII]; - data[jistart + 3951] = 0.0 + k[1318]*y_cur[IDX_C4H3I] + - k[1403]*y_cur[IDX_C4H2I] + k[1404]*y_cur[IDX_HC5NI]; - data[jistart + 3952] = 0.0 + k[3067]*y_cur[IDX_HeII] + - k[3068]*y_cur[IDX_HeII]; - data[jistart + 3953] = 0.0 + k[3063]*y_cur[IDX_HeII]; - data[jistart + 3954] = 0.0 + k[1543]*y_cur[IDX_C3II] + - k[1555]*y_cur[IDX_C4NII]; - data[jistart + 3955] = 0.0 + k[1487]*y_cur[IDX_C3HI]; - data[jistart + 3956] = 0.0 + k[1543]*y_cur[IDX_C2H2I] + - k[1752]*y_cur[IDX_HC3NI]; - data[jistart + 3957] = 0.0 + k[1487]*y_cur[IDX_C2H2II]; - data[jistart + 3958] = 0.0 + k[1754]*y_cur[IDX_C4H2I]; - data[jistart + 3959] = 0.0 + k[1403]*y_cur[IDX_CII] + - k[1754]*y_cur[IDX_C3HII] - k[5577]*y_cur[IDX_C5HII]; - data[jistart + 3960] = 0.0 + k[1864]*y_cur[IDX_CI]; - data[jistart + 3961] = 0.0 + k[1318]*y_cur[IDX_CII]; - data[jistart + 3962] = 0.0 + k[1865]*y_cur[IDX_CI]; - data[jistart + 3963] = 0.0 + k[1555]*y_cur[IDX_C2H2I]; - data[jistart + 3964] = 0.0 + k[2613]*y_cur[IDX_H3II] + - k[2918]*y_cur[IDX_HCOII]; - data[jistart + 3965] = 0.0 + k[2177]*y_cur[IDX_CH4I] + - k[2414]*y_cur[IDX_H2I] + k[2871]*y_cur[IDX_HCNI]; - data[jistart + 3966] = 0.0 + k[345]*y_cur[IDX_HII]; - data[jistart + 3967] = 0.0 - k[839]*y_cur[IDX_eM] - - k[840]*y_cur[IDX_eM] - k[1867]*y_cur[IDX_CI] - - k[2415]*y_cur[IDX_H2I] - k[3412]*y_cur[IDX_NI] - - k[3704]*y_cur[IDX_OI] - k[5577]*y_cur[IDX_C4H2I] - - k[6721]*y_cur[IDX_GRAINM] - k[6722]*y_cur[IDX_GRAINM]; - data[jistart + 3968] = 0.0 + k[2304]*y_cur[IDX_HII] + - k[3121]*y_cur[IDX_HeII]; - data[jistart + 3969] = 0.0 + k[3423]*y_cur[IDX_NI]; - data[jistart + 3970] = 0.0 + k[3139]*y_cur[IDX_HeII]; - data[jistart + 3971] = 0.0 + k[3136]*y_cur[IDX_HeII]; - data[jistart + 3972] = 0.0 + k[2177]*y_cur[IDX_C5II]; - data[jistart + 3973] = 0.0 - k[6721]*y_cur[IDX_C5HII] - - k[6722]*y_cur[IDX_C5HII]; - data[jistart + 3974] = 0.0 + k[345]*y_cur[IDX_C5HI] + - k[2304]*y_cur[IDX_C5H2I]; - data[jistart + 3975] = 0.0 + k[2414]*y_cur[IDX_C5II] - - k[2415]*y_cur[IDX_C5HII]; - data[jistart + 3976] = 0.0 + k[2613]*y_cur[IDX_C5I]; - data[jistart + 3977] = 0.0 + k[1752]*y_cur[IDX_C3II]; - data[jistart + 3978] = 0.0 + k[1404]*y_cur[IDX_CII]; - data[jistart + 3979] = 0.0 + k[2871]*y_cur[IDX_C5II]; - data[jistart + 3980] = 0.0 + k[2918]*y_cur[IDX_C5I]; - data[jistart + 3981] = 0.0 + k[3063]*y_cur[IDX_C10H2I] + - k[3067]*y_cur[IDX_C10HI] + k[3068]*y_cur[IDX_C10HI] + - k[3121]*y_cur[IDX_C5H2I] + k[3136]*y_cur[IDX_C7H2I] + - k[3139]*y_cur[IDX_C7HI]; - data[jistart + 3982] = 0.0 - k[3412]*y_cur[IDX_C5HII] + - k[3423]*y_cur[IDX_C6H2II]; - data[jistart + 3983] = 0.0 - k[3704]*y_cur[IDX_C5HII]; - data[jistart + 3984] = 0.0 - k[839]*y_cur[IDX_C5HII] - - k[840]*y_cur[IDX_C5HII]; - data[jistart + 3985] = 0.0 - k[46]*y_cur[IDX_C5HM] + - k[1847]*y_cur[IDX_C10HM]; - data[jistart + 3986] = 0.0 - k[4271]*y_cur[IDX_C5HM]; - data[jistart + 3987] = 0.0 + k[1847]*y_cur[IDX_CI]; - data[jistart + 3988] = 0.0 - k[4272]*y_cur[IDX_C5HM]; - data[jistart + 3989] = 0.0 - k[4273]*y_cur[IDX_C5HM]; - data[jistart + 3990] = 0.0 - k[4274]*y_cur[IDX_C5HM]; - data[jistart + 3991] = 0.0 - k[4275]*y_cur[IDX_C5HM]; - data[jistart + 3992] = 0.0 - k[4276]*y_cur[IDX_C5HM]; - data[jistart + 3993] = 0.0 + k[5597]*y_cur[IDX_eM]; - data[jistart + 3994] = 0.0 - k[46]*y_cur[IDX_CI] - - k[95]*y_cur[IDX_HI] - k[117]*y_cur[IDX_NI] - k[3413]*y_cur[IDX_NI] - - k[3414]*y_cur[IDX_NI] - k[3705]*y_cur[IDX_OI] - - k[4271]*y_cur[IDX_CII] - k[4272]*y_cur[IDX_C2H2II] - - k[4273]*y_cur[IDX_C2H3II] - k[4274]*y_cur[IDX_C4H2II] - - k[4275]*y_cur[IDX_C4H3II] - k[4276]*y_cur[IDX_C4SII] - - k[4277]*y_cur[IDX_CH2CCHII] - k[4278]*y_cur[IDX_CH3II] - - k[4279]*y_cur[IDX_CNCII] - k[4280]*y_cur[IDX_FeII] - - k[4281]*y_cur[IDX_HII] - k[4282]*y_cur[IDX_H2COII] - - k[4283]*y_cur[IDX_H2SII] - k[4284]*y_cur[IDX_H3II] - - k[4285]*y_cur[IDX_H3OII] - k[4286]*y_cur[IDX_HC2SII] - - k[4287]*y_cur[IDX_HCNHII] - k[4288]*y_cur[IDX_HCNHII] - - k[4289]*y_cur[IDX_HCOII] - k[4290]*y_cur[IDX_HCOII] - - k[4291]*y_cur[IDX_HeII] - k[4292]*y_cur[IDX_MgII] - - k[4293]*y_cur[IDX_NII] - k[4294]*y_cur[IDX_N2HII] - - k[4295]*y_cur[IDX_NH3II] - k[4296]*y_cur[IDX_NH4II] - - k[4297]*y_cur[IDX_NOII] - k[4298]*y_cur[IDX_NaII] - - k[4299]*y_cur[IDX_OII] - k[4300]*y_cur[IDX_SII] - - k[4301]*y_cur[IDX_SOII] - k[4302]*y_cur[IDX_SiII] - - k[4303]*y_cur[IDX_SiOII] - k[4304]*y_cur[IDX_SiOHII] - - k[4305]*y_cur[IDX_SiSII] - k[5739] - k[6024]; - data[jistart + 3995] = 0.0 + k[3709]*y_cur[IDX_OI]; - data[jistart + 3996] = 0.0 - k[4277]*y_cur[IDX_C5HM]; - data[jistart + 3997] = 0.0 - k[4278]*y_cur[IDX_C5HM]; - data[jistart + 3998] = 0.0 - k[4279]*y_cur[IDX_C5HM]; - data[jistart + 3999] = 0.0 - k[4280]*y_cur[IDX_C5HM]; - data[jistart + 4000] = 0.0 - k[95]*y_cur[IDX_C5HM]; - data[jistart + 4001] = 0.0 - k[4281]*y_cur[IDX_C5HM]; - data[jistart + 4002] = 0.0 - k[4282]*y_cur[IDX_C5HM]; - data[jistart + 4003] = 0.0 - k[4283]*y_cur[IDX_C5HM]; - data[jistart + 4004] = 0.0 - k[4284]*y_cur[IDX_C5HM]; - data[jistart + 4005] = 0.0 - k[4285]*y_cur[IDX_C5HM]; - data[jistart + 4006] = 0.0 - k[4286]*y_cur[IDX_C5HM]; - data[jistart + 4007] = 0.0 - k[4287]*y_cur[IDX_C5HM] - - k[4288]*y_cur[IDX_C5HM]; - data[jistart + 4008] = 0.0 - k[4289]*y_cur[IDX_C5HM] - - k[4290]*y_cur[IDX_C5HM]; - data[jistart + 4009] = 0.0 - k[4291]*y_cur[IDX_C5HM]; - data[jistart + 4010] = 0.0 - k[4292]*y_cur[IDX_C5HM]; - data[jistart + 4011] = 0.0 - k[117]*y_cur[IDX_C5HM] - - k[3413]*y_cur[IDX_C5HM] - k[3414]*y_cur[IDX_C5HM]; - data[jistart + 4012] = 0.0 - k[4293]*y_cur[IDX_C5HM]; - data[jistart + 4013] = 0.0 - k[4294]*y_cur[IDX_C5HM]; - data[jistart + 4014] = 0.0 - k[4295]*y_cur[IDX_C5HM]; - data[jistart + 4015] = 0.0 - k[4296]*y_cur[IDX_C5HM]; - data[jistart + 4016] = 0.0 - k[4297]*y_cur[IDX_C5HM]; - data[jistart + 4017] = 0.0 - k[4298]*y_cur[IDX_C5HM]; - data[jistart + 4018] = 0.0 - k[3705]*y_cur[IDX_C5HM] + - k[3709]*y_cur[IDX_C6HM]; - data[jistart + 4019] = 0.0 - k[4299]*y_cur[IDX_C5HM]; - data[jistart + 4020] = 0.0 - k[4300]*y_cur[IDX_C5HM]; - data[jistart + 4021] = 0.0 - k[4301]*y_cur[IDX_C5HM]; - data[jistart + 4022] = 0.0 - k[4302]*y_cur[IDX_C5HM]; - data[jistart + 4023] = 0.0 - k[4303]*y_cur[IDX_C5HM]; - data[jistart + 4024] = 0.0 - k[4304]*y_cur[IDX_C5HM]; - data[jistart + 4025] = 0.0 - k[4305]*y_cur[IDX_C5HM]; - data[jistart + 4026] = 0.0 + k[5597]*y_cur[IDX_C5HI]; - data[jistart + 4027] = 0.0 + k[4924]*y_cur[IDX_C4H3I] - - k[4927]*y_cur[IDX_C5H2I]; - data[jistart + 4028] = 0.0 - k[1323]*y_cur[IDX_C5H2I] - - k[1324]*y_cur[IDX_C5H2I]; - data[jistart + 4029] = 0.0 + k[4889]*y_cur[IDX_C3H2I] - - k[4890]*y_cur[IDX_C5H2I]; - data[jistart + 4030] = 0.0 - k[216]*y_cur[IDX_C5H2I] - - k[1491]*y_cur[IDX_C5H2I] - k[1492]*y_cur[IDX_C5H2I]; - data[jistart + 4031] = 0.0 - k[1589]*y_cur[IDX_C5H2I] - - k[1590]*y_cur[IDX_C5H2I] - k[1591]*y_cur[IDX_C5H2I]; - data[jistart + 4032] = 0.0 - k[1655]*y_cur[IDX_C5H2I] - - k[1656]*y_cur[IDX_C5H2I]; - data[jistart + 4033] = 0.0 + k[4889]*y_cur[IDX_C2HI]; - data[jistart + 4034] = 0.0 - k[1763]*y_cur[IDX_C5H2I] - - k[1764]*y_cur[IDX_C5H2I]; - data[jistart + 4035] = 0.0 - k[1798]*y_cur[IDX_C5H2I] - - k[1799]*y_cur[IDX_C5H2I]; - data[jistart + 4036] = 0.0 - k[1832]*y_cur[IDX_C5H2I]; - data[jistart + 4037] = 0.0 - k[1835]*y_cur[IDX_C5H2I]; - data[jistart + 4038] = 0.0 + k[4924]*y_cur[IDX_CI]; - data[jistart + 4039] = 0.0 - k[1839]*y_cur[IDX_C5H2I] - - k[1840]*y_cur[IDX_C5H2I]; - data[jistart + 4040] = 0.0 + k[95]*y_cur[IDX_HI]; - data[jistart + 4041] = 0.0 - k[216]*y_cur[IDX_C2H2II] - - k[344]*y_cur[IDX_HII] - k[1323]*y_cur[IDX_CII] - - k[1324]*y_cur[IDX_CII] - k[1491]*y_cur[IDX_C2H2II] - - k[1492]*y_cur[IDX_C2H2II] - k[1589]*y_cur[IDX_C2H3II] - - k[1590]*y_cur[IDX_C2H3II] - k[1591]*y_cur[IDX_C2H3II] - - k[1655]*y_cur[IDX_C2H4II] - k[1656]*y_cur[IDX_C2H4II] - - k[1763]*y_cur[IDX_C3H2II] - k[1764]*y_cur[IDX_C3H2II] - - k[1798]*y_cur[IDX_C3H3II] - k[1799]*y_cur[IDX_C3H3II] - - k[1832]*y_cur[IDX_C4HII] - k[1835]*y_cur[IDX_C4H2II] - - k[1839]*y_cur[IDX_C4H3II] - k[1840]*y_cur[IDX_C4H3II] - - k[2022]*y_cur[IDX_CH2CCHII] - k[2023]*y_cur[IDX_CH2CCHII] - - k[2053]*y_cur[IDX_CH3II] - k[2304]*y_cur[IDX_HII] - - k[2614]*y_cur[IDX_H3II] - k[2919]*y_cur[IDX_HCOII] - - k[3119]*y_cur[IDX_HeII] - k[3120]*y_cur[IDX_HeII] - - k[3121]*y_cur[IDX_HeII] - k[4890]*y_cur[IDX_C2HI] - - k[4927]*y_cur[IDX_CI] - k[5239]*y_cur[IDX_NI] - k[5740] - k[5741] - - k[6025] - k[6026] - k[7029]; - data[jistart + 4042] = 0.0 + k[843]*y_cur[IDX_eM] + - k[6742]*y_cur[IDX_GRAINM]; - data[jistart + 4043] = 0.0 + k[845]*y_cur[IDX_eM] + - k[6753]*y_cur[IDX_GRAINM]; - data[jistart + 4044] = 0.0 + k[3711]*y_cur[IDX_OI]; - data[jistart + 4045] = 0.0 - k[2022]*y_cur[IDX_C5H2I] - - k[2023]*y_cur[IDX_C5H2I]; - data[jistart + 4046] = 0.0 - k[2053]*y_cur[IDX_C5H2I]; - data[jistart + 4047] = 0.0 + k[929]*y_cur[IDX_eM] + - k[6748]*y_cur[IDX_GRAINM]; - data[jistart + 4048] = 0.0 + k[8727]*y_cur[IDX_GCHI]; - data[jistart + 4049] = 0.0 + k[8637]*y_cur[IDX_GHI]; - data[jistart + 4050] = 0.0 + k[7211] + k[7393] + k[7575]; - data[jistart + 4051] = 0.0 + k[8727]*y_cur[IDX_GC4HI]; - data[jistart + 4052] = 0.0 + k[8637]*y_cur[IDX_GC5HI]; - data[jistart + 4053] = 0.0 + k[6742]*y_cur[IDX_C5H3II] + - k[6748]*y_cur[IDX_CH3C4HII] + k[6753]*y_cur[IDX_C5H5II]; - data[jistart + 4054] = 0.0 + k[95]*y_cur[IDX_C5HM]; - data[jistart + 4055] = 0.0 - k[344]*y_cur[IDX_C5H2I] - - k[2304]*y_cur[IDX_C5H2I]; - data[jistart + 4056] = 0.0 - k[2614]*y_cur[IDX_C5H2I]; - data[jistart + 4057] = 0.0 - k[2919]*y_cur[IDX_C5H2I]; - data[jistart + 4058] = 0.0 - k[3119]*y_cur[IDX_C5H2I] - - k[3120]*y_cur[IDX_C5H2I] - k[3121]*y_cur[IDX_C5H2I]; - data[jistart + 4059] = 0.0 - k[5239]*y_cur[IDX_C5H2I]; - data[jistart + 4060] = 0.0 + k[3711]*y_cur[IDX_C6H3II]; - data[jistart + 4061] = 0.0 + k[843]*y_cur[IDX_C5H3II] + - k[845]*y_cur[IDX_C5H5II] + k[929]*y_cur[IDX_CH3C4HII]; - data[jistart + 4062] = 0.0 + k[1866]*y_cur[IDX_C4H3II] - - k[1868]*y_cur[IDX_C5H2II] - k[1869]*y_cur[IDX_C5H2II]; - data[jistart + 4063] = 0.0 + k[1319]*y_cur[IDX_C4H3I]; - data[jistart + 4064] = 0.0 + k[1731]*y_cur[IDX_C3H2II] + - k[1732]*y_cur[IDX_C3H3II] - k[1738]*y_cur[IDX_C5H2II] + - k[1741]*y_cur[IDX_CH2CCHII]; - data[jistart + 4065] = 0.0 + k[1544]*y_cur[IDX_C3HII] + - k[1557]*y_cur[IDX_C6II]; - data[jistart + 4066] = 0.0 + k[216]*y_cur[IDX_C5H2I] + - k[1485]*y_cur[IDX_C3H2I] + k[1488]*y_cur[IDX_C3HI] + - k[1516]*y_cur[IDX_H2CCCI]; - data[jistart + 4067] = 0.0 - k[1637]*y_cur[IDX_C5H2II] - - k[1638]*y_cur[IDX_C5H2II]; - data[jistart + 4068] = 0.0 + k[1584]*y_cur[IDX_C3HI] + - k[1592]*y_cur[IDX_C5HI]; - data[jistart + 4069] = 0.0 + k[1687]*y_cur[IDX_C3II] + - k[1698]*y_cur[IDX_C5II] - k[1701]*y_cur[IDX_C5H2II] - - k[1702]*y_cur[IDX_C5H2II]; - data[jistart + 4070] = 0.0 + k[1653]*y_cur[IDX_C4HI]; - data[jistart + 4071] = 0.0 + k[1687]*y_cur[IDX_C2H4I]; - data[jistart + 4072] = 0.0 + k[1488]*y_cur[IDX_C2H2II] + - k[1584]*y_cur[IDX_C2H3II] - k[1826]*y_cur[IDX_C5H2II]; - data[jistart + 4073] = 0.0 + k[1544]*y_cur[IDX_C2H2I] + - k[1755]*y_cur[IDX_C4H2I]; - data[jistart + 4074] = 0.0 + k[1485]*y_cur[IDX_C2H2II] - - k[1790]*y_cur[IDX_C5H2II] - k[1791]*y_cur[IDX_C5H2II]; - data[jistart + 4075] = 0.0 + k[1731]*y_cur[IDX_C2HI]; - data[jistart + 4076] = 0.0 + k[1732]*y_cur[IDX_C2HI]; - data[jistart + 4077] = 0.0 + k[2166]*y_cur[IDX_CH4I]; - data[jistart + 4078] = 0.0 + k[1653]*y_cur[IDX_C2H4II] - - k[1845]*y_cur[IDX_C5H2II] + k[2052]*y_cur[IDX_CH3II]; - data[jistart + 4079] = 0.0 + k[1755]*y_cur[IDX_C3HII] - - k[2852]*y_cur[IDX_C5H2II] - k[5578]*y_cur[IDX_C5H2II]; - data[jistart + 4080] = 0.0 + k[1319]*y_cur[IDX_CII]; - data[jistart + 4081] = 0.0 + k[1866]*y_cur[IDX_CI]; - data[jistart + 4082] = 0.0 + k[1698]*y_cur[IDX_C2H4I]; - data[jistart + 4083] = 0.0 + k[1592]*y_cur[IDX_C2H3II] + - k[2615]*y_cur[IDX_H3II] + k[2920]*y_cur[IDX_HCOII]; - data[jistart + 4084] = 0.0 + k[2415]*y_cur[IDX_H2I]; - data[jistart + 4085] = 0.0 + k[216]*y_cur[IDX_C2H2II] + - k[344]*y_cur[IDX_HII]; - data[jistart + 4086] = 0.0 - k[841]*y_cur[IDX_eM] - - k[842]*y_cur[IDX_eM] - k[1637]*y_cur[IDX_C2H3I] - - k[1638]*y_cur[IDX_C2H3I] - k[1701]*y_cur[IDX_C2H4I] - - k[1702]*y_cur[IDX_C2H4I] - k[1738]*y_cur[IDX_C2HI] - - k[1790]*y_cur[IDX_C3H2I] - k[1791]*y_cur[IDX_C3H2I] - - k[1826]*y_cur[IDX_C3HI] - k[1845]*y_cur[IDX_C4HI] - - k[1868]*y_cur[IDX_CI] - k[1869]*y_cur[IDX_CI] - - k[2037]*y_cur[IDX_CH2CCHI] - k[2038]*y_cur[IDX_CH2CCHI] - - k[2109]*y_cur[IDX_CH3CCHI] - k[2180]*y_cur[IDX_CH4I] - - k[2181]*y_cur[IDX_CH4I] - k[2481]*y_cur[IDX_H2CCCI] - - k[2482]*y_cur[IDX_H2CCCI] - k[2852]*y_cur[IDX_C4H2I] - - k[3415]*y_cur[IDX_NI] - k[3706]*y_cur[IDX_OI] - - k[5578]*y_cur[IDX_C4H2I] - k[6738]*y_cur[IDX_GRAINM] - - k[6739]*y_cur[IDX_GRAINM]; - data[jistart + 4087] = 0.0 + k[1557]*y_cur[IDX_C2H2I] + - k[2182]*y_cur[IDX_CH4I]; - data[jistart + 4088] = 0.0 - k[2037]*y_cur[IDX_C5H2II] - - k[2038]*y_cur[IDX_C5H2II]; - data[jistart + 4089] = 0.0 + k[1741]*y_cur[IDX_C2HI]; - data[jistart + 4090] = 0.0 + k[2052]*y_cur[IDX_C4HI]; - data[jistart + 4091] = 0.0 + k[3178]*y_cur[IDX_HeII]; - data[jistart + 4092] = 0.0 - k[2109]*y_cur[IDX_C5H2II]; - data[jistart + 4093] = 0.0 + k[2166]*y_cur[IDX_C4II] - - k[2180]*y_cur[IDX_C5H2II] - k[2181]*y_cur[IDX_C5H2II] + - k[2182]*y_cur[IDX_C6II]; - data[jistart + 4094] = 0.0 - k[6738]*y_cur[IDX_C5H2II] - - k[6739]*y_cur[IDX_C5H2II]; - data[jistart + 4095] = 0.0 + k[344]*y_cur[IDX_C5H2I]; - data[jistart + 4096] = 0.0 + k[2415]*y_cur[IDX_C5HII]; - data[jistart + 4097] = 0.0 + k[1516]*y_cur[IDX_C2H2II] - - k[2481]*y_cur[IDX_C5H2II] - k[2482]*y_cur[IDX_C5H2II]; - data[jistart + 4098] = 0.0 + k[2615]*y_cur[IDX_C5HI]; - data[jistart + 4099] = 0.0 + k[2920]*y_cur[IDX_C5HI]; - data[jistart + 4100] = 0.0 + k[3178]*y_cur[IDX_CH3C4HI]; - data[jistart + 4101] = 0.0 - k[3415]*y_cur[IDX_C5H2II]; - data[jistart + 4102] = 0.0 - k[3706]*y_cur[IDX_C5H2II]; - data[jistart + 4103] = 0.0 - k[841]*y_cur[IDX_C5H2II] - - k[842]*y_cur[IDX_C5H2II]; - data[jistart + 4104] = 0.0 - k[1870]*y_cur[IDX_C5H3II] - - k[1871]*y_cur[IDX_C5H3II]; - data[jistart + 4105] = 0.0 + k[1329]*y_cur[IDX_C6H6I] + - k[1356]*y_cur[IDX_CH3C4HI]; - data[jistart + 4106] = 0.0 + k[1733]*y_cur[IDX_C3H3II] + - k[1742]*y_cur[IDX_CH2CCHII]; - data[jistart + 4107] = 0.0 + k[1545]*y_cur[IDX_C3H2II] + - k[1546]*y_cur[IDX_C3H3II]; - data[jistart + 4108] = 0.0 + k[1486]*y_cur[IDX_C3H2I] + - k[1507]*y_cur[IDX_CH2CCHI] + k[1517]*y_cur[IDX_H2CCCI]; - data[jistart + 4109] = 0.0 + k[1629]*y_cur[IDX_C3H2II]; - data[jistart + 4110] = 0.0 + k[1581]*y_cur[IDX_C3H2I] + - k[1585]*y_cur[IDX_C3HI] + k[1589]*y_cur[IDX_C5H2I] + - k[1616]*y_cur[IDX_H2CCCI]; - data[jistart + 4111] = 0.0 + k[1688]*y_cur[IDX_C3II] + - k[1689]*y_cur[IDX_C3HII]; - data[jistart + 4112] = 0.0 + k[1677]*y_cur[IDX_C4H2I]; - data[jistart + 4113] = 0.0 + k[1688]*y_cur[IDX_C2H4I]; - data[jistart + 4114] = 0.0 + k[1585]*y_cur[IDX_C2H3II]; - data[jistart + 4115] = 0.0 + k[1689]*y_cur[IDX_C2H4I]; - data[jistart + 4116] = 0.0 + k[1486]*y_cur[IDX_C2H2II] + - k[1581]*y_cur[IDX_C2H3II]; - data[jistart + 4117] = 0.0 + k[1545]*y_cur[IDX_C2H2I] + - k[1629]*y_cur[IDX_C2H3I] + k[1774]*y_cur[IDX_CH2CCH2I] + - k[1780]*y_cur[IDX_CH3CCHI]; - data[jistart + 4118] = 0.0 + k[1546]*y_cur[IDX_C2H2I] + - k[1733]*y_cur[IDX_C2HI] + k[1807]*y_cur[IDX_C4H2I]; - data[jistart + 4119] = 0.0 + k[2167]*y_cur[IDX_CH4I]; - data[jistart + 4120] = 0.0 + k[2168]*y_cur[IDX_CH4I]; - data[jistart + 4121] = 0.0 + k[1677]*y_cur[IDX_C2H4II] + - k[1807]*y_cur[IDX_C3H3II] + k[2031]*y_cur[IDX_CH2CCHII] + - k[2080]*y_cur[IDX_CH3II] - k[5579]*y_cur[IDX_C5H3II]; - data[jistart + 4122] = 0.0 + k[1589]*y_cur[IDX_C2H3II] + - k[2614]*y_cur[IDX_H3II] + k[2919]*y_cur[IDX_HCOII]; - data[jistart + 4123] = 0.0 - k[843]*y_cur[IDX_eM] - - k[844]*y_cur[IDX_eM] - k[1870]*y_cur[IDX_CI] - k[1871]*y_cur[IDX_CI] - - k[3416]*y_cur[IDX_NI] - k[3707]*y_cur[IDX_OI] - - k[5579]*y_cur[IDX_C4H2I] - k[6742]*y_cur[IDX_GRAINM] - - k[6743]*y_cur[IDX_GRAINM]; - data[jistart + 4124] = 0.0 + k[1329]*y_cur[IDX_CII]; - data[jistart + 4125] = 0.0 + k[1507]*y_cur[IDX_C2H2II]; - data[jistart + 4126] = 0.0 + k[1742]*y_cur[IDX_C2HI] + - k[2031]*y_cur[IDX_C4H2I]; - data[jistart + 4127] = 0.0 + k[1774]*y_cur[IDX_C3H2II]; - data[jistart + 4128] = 0.0 + k[2080]*y_cur[IDX_C4H2I]; - data[jistart + 4129] = 0.0 + k[1356]*y_cur[IDX_CII] + - k[2321]*y_cur[IDX_HII] + k[3179]*y_cur[IDX_HeII]; - data[jistart + 4130] = 0.0 + k[1780]*y_cur[IDX_C3H2II]; - data[jistart + 4131] = 0.0 + k[2167]*y_cur[IDX_C4II] + - k[2168]*y_cur[IDX_C4HII]; - data[jistart + 4132] = 0.0 - k[6742]*y_cur[IDX_C5H3II] - - k[6743]*y_cur[IDX_C5H3II]; - data[jistart + 4133] = 0.0 + k[2321]*y_cur[IDX_CH3C4HI]; - data[jistart + 4134] = 0.0 + k[1517]*y_cur[IDX_C2H2II] + - k[1616]*y_cur[IDX_C2H3II]; - data[jistart + 4135] = 0.0 + k[2614]*y_cur[IDX_C5H2I]; - data[jistart + 4136] = 0.0 + k[2919]*y_cur[IDX_C5H2I]; - data[jistart + 4137] = 0.0 + k[3179]*y_cur[IDX_CH3C4HI]; - data[jistart + 4138] = 0.0 - k[3416]*y_cur[IDX_C5H3II]; - data[jistart + 4139] = 0.0 - k[3707]*y_cur[IDX_C5H3II]; - data[jistart + 4140] = 0.0 - k[843]*y_cur[IDX_C5H3II] - - k[844]*y_cur[IDX_C5H3II]; - data[jistart + 4141] = 0.0 + k[1547]*y_cur[IDX_C3H4II] + - k[1548]*y_cur[IDX_C3H5II]; - data[jistart + 4142] = 0.0 + k[1509]*y_cur[IDX_CH3CCHI]; - data[jistart + 4143] = 0.0 + k[1609]*y_cur[IDX_CH2CCHI] + - k[1612]*y_cur[IDX_CH3CCHI]; - data[jistart + 4144] = 0.0 + k[1692]*y_cur[IDX_C3H2II] + - k[1693]*y_cur[IDX_C3H3II] + k[1706]*y_cur[IDX_CH2CCHII]; - data[jistart + 4145] = 0.0 + k[1650]*y_cur[IDX_C3H2I] + - k[1668]*y_cur[IDX_CH2CCHI] + k[1673]*y_cur[IDX_H2CCCI]; - data[jistart + 4146] = 0.0 + k[1650]*y_cur[IDX_C2H4II]; - data[jistart + 4147] = 0.0 + k[1692]*y_cur[IDX_C2H4I]; - data[jistart + 4148] = 0.0 + k[1693]*y_cur[IDX_C2H4I]; - data[jistart + 4149] = 0.0 + k[1547]*y_cur[IDX_C2H2I]; - data[jistart + 4150] = 0.0 + k[1548]*y_cur[IDX_C2H2I]; - data[jistart + 4151] = 0.0 + k[2169]*y_cur[IDX_CH4I]; - data[jistart + 4152] = 0.0 + k[2171]*y_cur[IDX_CH4I]; - data[jistart + 4153] = 0.0 - k[845]*y_cur[IDX_eM] - - k[846]*y_cur[IDX_eM] - k[3417]*y_cur[IDX_NI] - - k[6753]*y_cur[IDX_GRAINM] - k[6754]*y_cur[IDX_GRAINM]; - data[jistart + 4154] = 0.0 + k[3130]*y_cur[IDX_HeII]; - data[jistart + 4155] = 0.0 + k[1609]*y_cur[IDX_C2H3II] + - k[1668]*y_cur[IDX_C2H4II]; - data[jistart + 4156] = 0.0 + k[1706]*y_cur[IDX_C2H4I]; - data[jistart + 4157] = 0.0 + k[2643]*y_cur[IDX_H3II] + - k[2944]*y_cur[IDX_HCOII]; - data[jistart + 4158] = 0.0 + k[1509]*y_cur[IDX_C2H2II] + - k[1612]*y_cur[IDX_C2H3II]; - data[jistart + 4159] = 0.0 + k[2169]*y_cur[IDX_C4H2II] + - k[2171]*y_cur[IDX_C4H3II]; - data[jistart + 4160] = 0.0 - k[6753]*y_cur[IDX_C5H5II] - - k[6754]*y_cur[IDX_C5H5II]; - data[jistart + 4161] = 0.0 + k[1673]*y_cur[IDX_C2H4II]; - data[jistart + 4162] = 0.0 + k[2643]*y_cur[IDX_CH3C4HI]; - data[jistart + 4163] = 0.0 + k[2944]*y_cur[IDX_CH3C4HI]; - data[jistart + 4164] = 0.0 + k[3130]*y_cur[IDX_C6H6I]; - data[jistart + 4165] = 0.0 - k[3417]*y_cur[IDX_C5H5II]; - data[jistart + 4166] = 0.0 - k[845]*y_cur[IDX_C5H5II] - - k[846]*y_cur[IDX_C5H5II]; - data[jistart + 4167] = 0.0 - k[4929]*y_cur[IDX_C5NI]; - data[jistart + 4168] = 0.0 + k[4306]*y_cur[IDX_C5NM]; - data[jistart + 4169] = 0.0 + k[4307]*y_cur[IDX_C5NM]; - data[jistart + 4170] = 0.0 + k[4308]*y_cur[IDX_C5NM]; - data[jistart + 4171] = 0.0 + k[4309]*y_cur[IDX_C5NM]; - data[jistart + 4172] = 0.0 + k[4310]*y_cur[IDX_C5NM]; - data[jistart + 4173] = 0.0 + k[4311]*y_cur[IDX_C5NM]; - data[jistart + 4174] = 0.0 + k[116]*y_cur[IDX_NI]; - data[jistart + 4175] = 0.0 + k[5240]*y_cur[IDX_NI]; - data[jistart + 4176] = 0.0 - k[2616]*y_cur[IDX_H3II] - - k[2921]*y_cur[IDX_HCOII] - k[3124]*y_cur[IDX_HeII] - - k[4929]*y_cur[IDX_CI] - k[5241]*y_cur[IDX_NI] - - k[5367]*y_cur[IDX_OI] - k[5598]*y_cur[IDX_eM] - k[5746] - k[6031] - - k[7044]; - data[jistart + 4177] = 0.0 + k[4306]*y_cur[IDX_CII] + - k[4307]*y_cur[IDX_C2H2II] + k[4308]*y_cur[IDX_C2H3II] + - k[4309]*y_cur[IDX_C4H2II] + k[4310]*y_cur[IDX_C4H3II] + - k[4311]*y_cur[IDX_C4SII] + k[4312]*y_cur[IDX_CH2CCHII] + - k[4313]*y_cur[IDX_CH3II] + k[4314]*y_cur[IDX_CNCII] + - k[4315]*y_cur[IDX_FeII] + k[4316]*y_cur[IDX_HII] + - k[4317]*y_cur[IDX_H2COII] + k[4318]*y_cur[IDX_H2SII] + - k[4319]*y_cur[IDX_H3II] + k[4320]*y_cur[IDX_H3OII] + - k[4321]*y_cur[IDX_HC2SII] + k[4322]*y_cur[IDX_HCNHII] + - k[4323]*y_cur[IDX_HCNHII] + k[4324]*y_cur[IDX_HCOII] + - k[4325]*y_cur[IDX_HCOII] + k[4326]*y_cur[IDX_HeII] + - k[4327]*y_cur[IDX_MgII] + k[4328]*y_cur[IDX_NII] + - k[4329]*y_cur[IDX_N2HII] + k[4330]*y_cur[IDX_NH3II] + - k[4331]*y_cur[IDX_NH4II] + k[4332]*y_cur[IDX_NOII] + - k[4333]*y_cur[IDX_NaII] + k[4334]*y_cur[IDX_OII] + - k[4335]*y_cur[IDX_SII] + k[4336]*y_cur[IDX_SOII] + - k[4337]*y_cur[IDX_SiII] + k[4338]*y_cur[IDX_SiOII] + - k[4339]*y_cur[IDX_SiOHII] + k[4340]*y_cur[IDX_SiSII] + k[5745] + - k[6030]; - data[jistart + 4178] = 0.0 + k[5247]*y_cur[IDX_NI]; - data[jistart + 4179] = 0.0 + k[876]*y_cur[IDX_eM] + - k[6840]*y_cur[IDX_GRAINM]; - data[jistart + 4180] = 0.0 + k[4312]*y_cur[IDX_C5NM]; - data[jistart + 4181] = 0.0 + k[4313]*y_cur[IDX_C5NM]; - data[jistart + 4182] = 0.0 + k[3180]*y_cur[IDX_HeII] + k[5798] + - k[6102]; - data[jistart + 4183] = 0.0 + k[4314]*y_cur[IDX_C5NM]; - data[jistart + 4184] = 0.0 + k[4315]*y_cur[IDX_C5NM]; - data[jistart + 4185] = 0.0 + k[8707]*y_cur[IDX_GNI]; - data[jistart + 4186] = 0.0 + k[7226] + k[7408] + k[7590]; - data[jistart + 4187] = 0.0 + k[8707]*y_cur[IDX_GC5I]; - data[jistart + 4188] = 0.0 + k[6788]*y_cur[IDX_HC5NII] + - k[6791]*y_cur[IDX_HC5NHII] + k[6804]*y_cur[IDX_H3C5NII] + - k[6840]*y_cur[IDX_C7NII]; - data[jistart + 4189] = 0.0 + k[4316]*y_cur[IDX_C5NM]; - data[jistart + 4190] = 0.0 + k[4317]*y_cur[IDX_C5NM]; - data[jistart + 4191] = 0.0 + k[4318]*y_cur[IDX_C5NM]; - data[jistart + 4192] = 0.0 - k[2616]*y_cur[IDX_C5NI] + - k[4319]*y_cur[IDX_C5NM]; - data[jistart + 4193] = 0.0 + k[1028]*y_cur[IDX_eM] + - k[6804]*y_cur[IDX_GRAINM]; - data[jistart + 4194] = 0.0 + k[4320]*y_cur[IDX_C5NM]; - data[jistart + 4195] = 0.0 + k[4321]*y_cur[IDX_C5NM]; - data[jistart + 4196] = 0.0 + k[5851] + k[6176]; - data[jistart + 4197] = 0.0 + k[1078]*y_cur[IDX_eM] + - k[6788]*y_cur[IDX_GRAINM]; - data[jistart + 4198] = 0.0 + k[1079]*y_cur[IDX_eM] + - k[6791]*y_cur[IDX_GRAINM]; - data[jistart + 4199] = 0.0 + k[4322]*y_cur[IDX_C5NM] + - k[4323]*y_cur[IDX_C5NM]; - data[jistart + 4200] = 0.0 - k[2921]*y_cur[IDX_C5NI] + - k[4324]*y_cur[IDX_C5NM] + k[4325]*y_cur[IDX_C5NM]; - data[jistart + 4201] = 0.0 - k[3124]*y_cur[IDX_C5NI] + - k[3180]*y_cur[IDX_CH3C5NI] + k[4326]*y_cur[IDX_C5NM]; - data[jistart + 4202] = 0.0 + k[4327]*y_cur[IDX_C5NM]; - data[jistart + 4203] = 0.0 + k[116]*y_cur[IDX_C5M] + - k[5240]*y_cur[IDX_C5HI] - k[5241]*y_cur[IDX_C5NI] + - k[5247]*y_cur[IDX_C7NI]; - data[jistart + 4204] = 0.0 + k[4328]*y_cur[IDX_C5NM]; - data[jistart + 4205] = 0.0 + k[4329]*y_cur[IDX_C5NM]; - data[jistart + 4206] = 0.0 + k[4330]*y_cur[IDX_C5NM]; - data[jistart + 4207] = 0.0 + k[4331]*y_cur[IDX_C5NM]; - data[jistart + 4208] = 0.0 + k[4332]*y_cur[IDX_C5NM]; - data[jistart + 4209] = 0.0 + k[4333]*y_cur[IDX_C5NM]; - data[jistart + 4210] = 0.0 - k[5367]*y_cur[IDX_C5NI]; - data[jistart + 4211] = 0.0 + k[4334]*y_cur[IDX_C5NM]; - data[jistart + 4212] = 0.0 + k[4335]*y_cur[IDX_C5NM]; - data[jistart + 4213] = 0.0 + k[4336]*y_cur[IDX_C5NM]; - data[jistart + 4214] = 0.0 + k[4337]*y_cur[IDX_C5NM]; - data[jistart + 4215] = 0.0 + k[4338]*y_cur[IDX_C5NM]; - data[jistart + 4216] = 0.0 + k[4339]*y_cur[IDX_C5NM]; - data[jistart + 4217] = 0.0 + k[4340]*y_cur[IDX_C5NM]; - data[jistart + 4218] = 0.0 + k[876]*y_cur[IDX_C7NII] + - k[1028]*y_cur[IDX_H3C5NII] + k[1078]*y_cur[IDX_HC5NII] + - k[1079]*y_cur[IDX_HC5NHII] - k[5598]*y_cur[IDX_C5NI]; - data[jistart + 4219] = 0.0 + k[3412]*y_cur[IDX_NI]; - data[jistart + 4220] = 0.0 - k[847]*y_cur[IDX_eM] - - k[2416]*y_cur[IDX_H2I] - k[6784]*y_cur[IDX_GRAINM]; - data[jistart + 4221] = 0.0 - k[6784]*y_cur[IDX_C5NII]; - data[jistart + 4222] = 0.0 - k[2416]*y_cur[IDX_C5NII]; - data[jistart + 4223] = 0.0 + k[3412]*y_cur[IDX_C5HII]; - data[jistart + 4224] = 0.0 - k[847]*y_cur[IDX_C5NII]; - data[jistart + 4225] = 0.0 - k[4306]*y_cur[IDX_C5NM]; - data[jistart + 4226] = 0.0 + k[3378]*y_cur[IDX_NI]; - data[jistart + 4227] = 0.0 - k[4307]*y_cur[IDX_C5NM]; - data[jistart + 4228] = 0.0 - k[4308]*y_cur[IDX_C5NM]; - data[jistart + 4229] = 0.0 - k[4309]*y_cur[IDX_C5NM]; - data[jistart + 4230] = 0.0 - k[4310]*y_cur[IDX_C5NM]; - data[jistart + 4231] = 0.0 - k[4311]*y_cur[IDX_C5NM]; - data[jistart + 4232] = 0.0 + k[5598]*y_cur[IDX_eM]; - data[jistart + 4233] = 0.0 - k[96]*y_cur[IDX_HI] - - k[131]*y_cur[IDX_OI] - k[4306]*y_cur[IDX_CII] - - k[4307]*y_cur[IDX_C2H2II] - k[4308]*y_cur[IDX_C2H3II] - - k[4309]*y_cur[IDX_C4H2II] - k[4310]*y_cur[IDX_C4H3II] - - k[4311]*y_cur[IDX_C4SII] - k[4312]*y_cur[IDX_CH2CCHII] - - k[4313]*y_cur[IDX_CH3II] - k[4314]*y_cur[IDX_CNCII] - - k[4315]*y_cur[IDX_FeII] - k[4316]*y_cur[IDX_HII] - - k[4317]*y_cur[IDX_H2COII] - k[4318]*y_cur[IDX_H2SII] - - k[4319]*y_cur[IDX_H3II] - k[4320]*y_cur[IDX_H3OII] - - k[4321]*y_cur[IDX_HC2SII] - k[4322]*y_cur[IDX_HCNHII] - - k[4323]*y_cur[IDX_HCNHII] - k[4324]*y_cur[IDX_HCOII] - - k[4325]*y_cur[IDX_HCOII] - k[4326]*y_cur[IDX_HeII] - - k[4327]*y_cur[IDX_MgII] - k[4328]*y_cur[IDX_NII] - - k[4329]*y_cur[IDX_N2HII] - k[4330]*y_cur[IDX_NH3II] - - k[4331]*y_cur[IDX_NH4II] - k[4332]*y_cur[IDX_NOII] - - k[4333]*y_cur[IDX_NaII] - k[4334]*y_cur[IDX_OII] - - k[4335]*y_cur[IDX_SII] - k[4336]*y_cur[IDX_SOII] - - k[4337]*y_cur[IDX_SiII] - k[4338]*y_cur[IDX_SiOII] - - k[4339]*y_cur[IDX_SiOHII] - k[4340]*y_cur[IDX_SiSII] - k[5745] - - k[6030]; - data[jistart + 4234] = 0.0 + k[3426]*y_cur[IDX_NI]; - data[jistart + 4235] = 0.0 + k[3437]*y_cur[IDX_NI]; - data[jistart + 4236] = 0.0 + k[3443]*y_cur[IDX_NI]; - data[jistart + 4237] = 0.0 - k[4312]*y_cur[IDX_C5NM]; - data[jistart + 4238] = 0.0 - k[4313]*y_cur[IDX_C5NM]; - data[jistart + 4239] = 0.0 - k[4314]*y_cur[IDX_C5NM]; - data[jistart + 4240] = 0.0 - k[4315]*y_cur[IDX_C5NM]; - data[jistart + 4241] = 0.0 - k[96]*y_cur[IDX_C5NM]; - data[jistart + 4242] = 0.0 - k[4316]*y_cur[IDX_C5NM]; - data[jistart + 4243] = 0.0 - k[4317]*y_cur[IDX_C5NM]; - data[jistart + 4244] = 0.0 - k[4318]*y_cur[IDX_C5NM]; - data[jistart + 4245] = 0.0 - k[4319]*y_cur[IDX_C5NM]; - data[jistart + 4246] = 0.0 - k[4320]*y_cur[IDX_C5NM]; - data[jistart + 4247] = 0.0 - k[4321]*y_cur[IDX_C5NM]; - data[jistart + 4248] = 0.0 - k[4322]*y_cur[IDX_C5NM] - - k[4323]*y_cur[IDX_C5NM]; - data[jistart + 4249] = 0.0 - k[4324]*y_cur[IDX_C5NM] - - k[4325]*y_cur[IDX_C5NM]; - data[jistart + 4250] = 0.0 - k[4326]*y_cur[IDX_C5NM]; - data[jistart + 4251] = 0.0 - k[4327]*y_cur[IDX_C5NM]; - data[jistart + 4252] = 0.0 + k[3378]*y_cur[IDX_C10M] + - k[3426]*y_cur[IDX_C7M] + k[3437]*y_cur[IDX_C8M] + - k[3443]*y_cur[IDX_C9M]; - data[jistart + 4253] = 0.0 - k[4328]*y_cur[IDX_C5NM]; - data[jistart + 4254] = 0.0 - k[4329]*y_cur[IDX_C5NM]; - data[jistart + 4255] = 0.0 - k[4330]*y_cur[IDX_C5NM]; - data[jistart + 4256] = 0.0 - k[4331]*y_cur[IDX_C5NM]; - data[jistart + 4257] = 0.0 - k[4332]*y_cur[IDX_C5NM]; - data[jistart + 4258] = 0.0 - k[4333]*y_cur[IDX_C5NM]; - data[jistart + 4259] = 0.0 - k[131]*y_cur[IDX_C5NM]; - data[jistart + 4260] = 0.0 - k[4334]*y_cur[IDX_C5NM]; - data[jistart + 4261] = 0.0 - k[4335]*y_cur[IDX_C5NM]; - data[jistart + 4262] = 0.0 - k[4336]*y_cur[IDX_C5NM]; - data[jistart + 4263] = 0.0 - k[4337]*y_cur[IDX_C5NM]; - data[jistart + 4264] = 0.0 - k[4338]*y_cur[IDX_C5NM]; - data[jistart + 4265] = 0.0 - k[4339]*y_cur[IDX_C5NM]; - data[jistart + 4266] = 0.0 - k[4340]*y_cur[IDX_C5NM]; - data[jistart + 4267] = 0.0 + k[5598]*y_cur[IDX_C5NI]; - data[jistart + 4268] = 0.0 + k[37]*y_cur[IDX_C10M] + - k[45]*y_cur[IDX_C5M] + k[1847]*y_cur[IDX_C10HM] + - k[4928]*y_cur[IDX_C5HI] - k[4930]*y_cur[IDX_C6I] - - k[4931]*y_cur[IDX_C6I]; - data[jistart + 4269] = 0.0 + k[4341]*y_cur[IDX_C6M] - - k[5499]*y_cur[IDX_C6I]; - data[jistart + 4270] = 0.0 + k[5951] + k[5952]; - data[jistart + 4271] = 0.0 + k[37]*y_cur[IDX_CI]; - data[jistart + 4272] = 0.0 + k[1847]*y_cur[IDX_CI]; - data[jistart + 4273] = 0.0 + k[5971]; - data[jistart + 4274] = 0.0 + k[735]*y_cur[IDX_eM] + - k[6884]*y_cur[IDX_GRAINM]; - data[jistart + 4275] = 0.0 + k[22]*y_cur[IDX_C4M]; - data[jistart + 4276] = 0.0 + k[12]*y_cur[IDX_C4I] - - k[14]*y_cur[IDX_C6I]; - data[jistart + 4277] = 0.0 + k[4342]*y_cur[IDX_C6M]; - data[jistart + 4278] = 0.0 + k[4343]*y_cur[IDX_C6M]; - data[jistart + 4279] = 0.0 + k[17]*y_cur[IDX_C3M]; - data[jistart + 4280] = 0.0 + k[17]*y_cur[IDX_C3I] - - k[20]*y_cur[IDX_C6I]; - data[jistart + 4281] = 0.0 + k[12]*y_cur[IDX_C2M]; - data[jistart + 4282] = 0.0 + k[22]*y_cur[IDX_C2I] - - k[26]*y_cur[IDX_C6I]; - data[jistart + 4283] = 0.0 + k[4344]*y_cur[IDX_C6M]; - data[jistart + 4284] = 0.0 + k[4345]*y_cur[IDX_C6M]; - data[jistart + 4285] = 0.0 + k[4346]*y_cur[IDX_C6M]; - data[jistart + 4286] = 0.0 + k[45]*y_cur[IDX_CI]; - data[jistart + 4287] = 0.0 + k[4928]*y_cur[IDX_CI]; - data[jistart + 4288] = 0.0 - k[14]*y_cur[IDX_C2M] - - k[20]*y_cur[IDX_C3M] - k[26]*y_cur[IDX_C4M] - k[346]*y_cur[IDX_HII] - - k[2617]*y_cur[IDX_H3II] - k[2922]*y_cur[IDX_HCOII] - - k[3125]*y_cur[IDX_HeII] - k[3126]*y_cur[IDX_HeII] - - k[4930]*y_cur[IDX_CI] - k[4931]*y_cur[IDX_CI] - - k[5242]*y_cur[IDX_NI] - k[5368]*y_cur[IDX_OI] - - k[5499]*y_cur[IDX_CII] - k[5599]*y_cur[IDX_eM] - k[5748] - k[6033] - - k[6034] - k[7041]; - data[jistart + 4289] = 0.0 + k[4341]*y_cur[IDX_CII] + - k[4342]*y_cur[IDX_C2H2II] + k[4343]*y_cur[IDX_C2H3II] + - k[4344]*y_cur[IDX_C4H2II] + k[4345]*y_cur[IDX_C4H3II] + - k[4346]*y_cur[IDX_C4SII] + k[4347]*y_cur[IDX_CH2CCHII] + - k[4348]*y_cur[IDX_CH3II] + k[4349]*y_cur[IDX_CNCII] + - k[4350]*y_cur[IDX_FeII] + k[4351]*y_cur[IDX_HII] + - k[4352]*y_cur[IDX_H2COII] + k[4353]*y_cur[IDX_H2SII] + - k[4354]*y_cur[IDX_H3II] + k[4355]*y_cur[IDX_H3OII] + - k[4356]*y_cur[IDX_HC2SII] + k[4357]*y_cur[IDX_HCNHII] + - k[4358]*y_cur[IDX_HCNHII] + k[4359]*y_cur[IDX_HCOII] + - k[4360]*y_cur[IDX_HCOII] + k[4361]*y_cur[IDX_HeII] + - k[4362]*y_cur[IDX_MgII] + k[4363]*y_cur[IDX_NII] + - k[4364]*y_cur[IDX_N2HII] + k[4365]*y_cur[IDX_NH3II] + - k[4366]*y_cur[IDX_NH4II] + k[4367]*y_cur[IDX_NOII] + - k[4368]*y_cur[IDX_NaII] + k[4369]*y_cur[IDX_OII] + - k[4370]*y_cur[IDX_SII] + k[4371]*y_cur[IDX_SOII] + - k[4372]*y_cur[IDX_SiII] + k[4373]*y_cur[IDX_SiOII] + - k[4374]*y_cur[IDX_SiOHII] + k[4375]*y_cur[IDX_SiSII] + k[5747] + - k[6032]; - data[jistart + 4290] = 0.0 + k[5754]; - data[jistart + 4291] = 0.0 + k[851]*y_cur[IDX_eM] + - k[6783]*y_cur[IDX_GRAINM]; - data[jistart + 4292] = 0.0 + k[852]*y_cur[IDX_eM] + - k[6785]*y_cur[IDX_GRAINM]; - data[jistart + 4293] = 0.0 + k[5244]*y_cur[IDX_NI] + - k[5370]*y_cur[IDX_OI] + k[5756] + k[6042]; - data[jistart + 4294] = 0.0 + k[865]*y_cur[IDX_eM] + - k[6823]*y_cur[IDX_GRAINM]; - data[jistart + 4295] = 0.0 + k[3427]*y_cur[IDX_NI]; - data[jistart + 4296] = 0.0 + k[3713]*y_cur[IDX_OI]; - data[jistart + 4297] = 0.0 + k[5372]*y_cur[IDX_OI] + k[5760] + - k[6049]; - data[jistart + 4298] = 0.0 + k[877]*y_cur[IDX_eM] + - k[6836]*y_cur[IDX_GRAINM]; - data[jistart + 4299] = 0.0 + k[3442]*y_cur[IDX_NI]; - data[jistart + 4300] = 0.0 + k[4347]*y_cur[IDX_C6M]; - data[jistart + 4301] = 0.0 + k[4348]*y_cur[IDX_C6M]; - data[jistart + 4302] = 0.0 + k[4349]*y_cur[IDX_C6M]; - data[jistart + 4303] = 0.0 + k[4350]*y_cur[IDX_C6M]; - data[jistart + 4304] = 0.0 + k[8674]*y_cur[IDX_GC5I]; - data[jistart + 4305] = 0.0 + k[8674]*y_cur[IDX_GCI]; - data[jistart + 4306] = 0.0 + k[7223] + k[7405] + k[7587]; - data[jistart + 4307] = 0.0 + k[6783]*y_cur[IDX_C6HII] + - k[6785]*y_cur[IDX_C6H2II] + k[6823]*y_cur[IDX_C7II] + - k[6836]*y_cur[IDX_C8II] + k[6884]*y_cur[IDX_C11II]; - data[jistart + 4308] = 0.0 - k[346]*y_cur[IDX_C6I] + - k[4351]*y_cur[IDX_C6M]; - data[jistart + 4309] = 0.0 + k[4352]*y_cur[IDX_C6M]; - data[jistart + 4310] = 0.0 + k[4353]*y_cur[IDX_C6M]; - data[jistart + 4311] = 0.0 - k[2617]*y_cur[IDX_C6I] + - k[4354]*y_cur[IDX_C6M]; - data[jistart + 4312] = 0.0 + k[4355]*y_cur[IDX_C6M]; - data[jistart + 4313] = 0.0 + k[4356]*y_cur[IDX_C6M]; - data[jistart + 4314] = 0.0 + k[4357]*y_cur[IDX_C6M] + - k[4358]*y_cur[IDX_C6M]; - data[jistart + 4315] = 0.0 - k[2922]*y_cur[IDX_C6I] + - k[4359]*y_cur[IDX_C6M] + k[4360]*y_cur[IDX_C6M]; - data[jistart + 4316] = 0.0 - k[3125]*y_cur[IDX_C6I] - - k[3126]*y_cur[IDX_C6I] + k[4361]*y_cur[IDX_C6M]; - data[jistart + 4317] = 0.0 + k[4362]*y_cur[IDX_C6M]; - data[jistart + 4318] = 0.0 + k[3427]*y_cur[IDX_C7M] + - k[3442]*y_cur[IDX_C9M] - k[5242]*y_cur[IDX_C6I] + - k[5244]*y_cur[IDX_C7I]; - data[jistart + 4319] = 0.0 + k[4363]*y_cur[IDX_C6M]; - data[jistart + 4320] = 0.0 + k[4364]*y_cur[IDX_C6M]; - data[jistart + 4321] = 0.0 + k[4365]*y_cur[IDX_C6M]; - data[jistart + 4322] = 0.0 + k[4366]*y_cur[IDX_C6M]; - data[jistart + 4323] = 0.0 + k[4367]*y_cur[IDX_C6M]; - data[jistart + 4324] = 0.0 + k[4368]*y_cur[IDX_C6M]; - data[jistart + 4325] = 0.0 + k[3713]*y_cur[IDX_C7HII] - - k[5368]*y_cur[IDX_C6I] + k[5370]*y_cur[IDX_C7I] + - k[5372]*y_cur[IDX_C7NI]; - data[jistart + 4326] = 0.0 + k[4369]*y_cur[IDX_C6M]; - data[jistart + 4327] = 0.0 + k[4370]*y_cur[IDX_C6M]; - data[jistart + 4328] = 0.0 + k[4371]*y_cur[IDX_C6M]; - data[jistart + 4329] = 0.0 + k[4372]*y_cur[IDX_C6M]; - data[jistart + 4330] = 0.0 + k[4373]*y_cur[IDX_C6M]; - data[jistart + 4331] = 0.0 + k[4374]*y_cur[IDX_C6M]; - data[jistart + 4332] = 0.0 + k[4375]*y_cur[IDX_C6M]; - data[jistart + 4333] = 0.0 + k[735]*y_cur[IDX_C11II] + - k[851]*y_cur[IDX_C6HII] + k[852]*y_cur[IDX_C6H2II] + - k[865]*y_cur[IDX_C7II] + k[877]*y_cur[IDX_C8II] - - k[5599]*y_cur[IDX_C6I]; - data[jistart + 4334] = 0.0 + k[1867]*y_cur[IDX_C5HII] + - k[1868]*y_cur[IDX_C5H2II]; - data[jistart + 4335] = 0.0 + k[1323]*y_cur[IDX_C5H2I] + - k[1325]*y_cur[IDX_C5HI] + k[5498]*y_cur[IDX_C5I]; - data[jistart + 4336] = 0.0 + k[3057]*y_cur[IDX_HeII] + - k[3058]*y_cur[IDX_HeII]; - data[jistart + 4337] = 0.0 + k[1734]*y_cur[IDX_C4HII]; - data[jistart + 4338] = 0.0 - k[1557]*y_cur[IDX_C6II] - - k[1558]*y_cur[IDX_C6II]; - data[jistart + 4339] = 0.0 + k[1734]*y_cur[IDX_C2HI]; - data[jistart + 4340] = 0.0 + k[5498]*y_cur[IDX_CII]; - data[jistart + 4341] = 0.0 + k[1325]*y_cur[IDX_CII]; - data[jistart + 4342] = 0.0 + k[1867]*y_cur[IDX_CI]; - data[jistart + 4343] = 0.0 + k[1323]*y_cur[IDX_CII]; - data[jistart + 4344] = 0.0 + k[1868]*y_cur[IDX_CI]; - data[jistart + 4345] = 0.0 + k[346]*y_cur[IDX_HII] + k[6034]; - data[jistart + 4346] = 0.0 - k[848]*y_cur[IDX_eM] - - k[849]*y_cur[IDX_eM] - k[1557]*y_cur[IDX_C2H2I] - - k[1558]*y_cur[IDX_C2H2I] - k[2182]*y_cur[IDX_CH4I] - - k[2183]*y_cur[IDX_CH4I] - k[2184]*y_cur[IDX_CH4I] - - k[2417]*y_cur[IDX_H2I] - k[5552]*y_cur[IDX_H2I] - - k[6780]*y_cur[IDX_GRAINM] - k[6781]*y_cur[IDX_GRAINM]; - data[jistart + 4347] = 0.0 + k[2307]*y_cur[IDX_HII] + - k[3133]*y_cur[IDX_HeII]; - data[jistart + 4348] = 0.0 + k[3128]*y_cur[IDX_HeII]; - data[jistart + 4349] = 0.0 + k[3135]*y_cur[IDX_HeII]; - data[jistart + 4350] = 0.0 + k[3141]*y_cur[IDX_HeII]; - data[jistart + 4351] = 0.0 + k[3142]*y_cur[IDX_HeII]; - data[jistart + 4352] = 0.0 - k[2182]*y_cur[IDX_C6II] - - k[2183]*y_cur[IDX_C6II] - k[2184]*y_cur[IDX_C6II]; - data[jistart + 4353] = 0.0 - k[6780]*y_cur[IDX_C6II] - - k[6781]*y_cur[IDX_C6II]; - data[jistart + 4354] = 0.0 + k[346]*y_cur[IDX_C6I] + - k[2307]*y_cur[IDX_C6HI]; - data[jistart + 4355] = 0.0 - k[2417]*y_cur[IDX_C6II] - - k[5552]*y_cur[IDX_C6II]; - data[jistart + 4356] = 0.0 + k[3057]*y_cur[IDX_C10I] + - k[3058]*y_cur[IDX_C10I] + k[3128]*y_cur[IDX_C6H2I] + - k[3133]*y_cur[IDX_C6HI] + k[3135]*y_cur[IDX_C7I] + - k[3141]*y_cur[IDX_C7NI] + k[3142]*y_cur[IDX_C8I]; - data[jistart + 4357] = 0.0 - k[848]*y_cur[IDX_C6II] - - k[849]*y_cur[IDX_C6II]; - data[jistart + 4358] = 0.0 - k[47]*y_cur[IDX_C6M]; - data[jistart + 4359] = 0.0 - k[4341]*y_cur[IDX_C6M]; - data[jistart + 4360] = 0.0 - k[31]*y_cur[IDX_C6M]; - data[jistart + 4361] = 0.0 - k[4342]*y_cur[IDX_C6M]; - data[jistart + 4362] = 0.0 - k[4343]*y_cur[IDX_C6M]; - data[jistart + 4363] = 0.0 - k[32]*y_cur[IDX_C6M]; - data[jistart + 4364] = 0.0 - k[33]*y_cur[IDX_C6M]; - data[jistart + 4365] = 0.0 - k[4344]*y_cur[IDX_C6M]; - data[jistart + 4366] = 0.0 - k[4345]*y_cur[IDX_C6M]; - data[jistart + 4367] = 0.0 - k[4346]*y_cur[IDX_C6M]; - data[jistart + 4368] = 0.0 + k[5599]*y_cur[IDX_eM]; - data[jistart + 4369] = 0.0 - k[31]*y_cur[IDX_C2I] - - k[32]*y_cur[IDX_C3I] - k[33]*y_cur[IDX_C4I] - k[47]*y_cur[IDX_CI] - - k[97]*y_cur[IDX_HI] - k[3418]*y_cur[IDX_NI] - k[3419]*y_cur[IDX_NI] - - k[3420]*y_cur[IDX_NI] - k[3708]*y_cur[IDX_OI] - - k[4341]*y_cur[IDX_CII] - k[4342]*y_cur[IDX_C2H2II] - - k[4343]*y_cur[IDX_C2H3II] - k[4344]*y_cur[IDX_C4H2II] - - k[4345]*y_cur[IDX_C4H3II] - k[4346]*y_cur[IDX_C4SII] - - k[4347]*y_cur[IDX_CH2CCHII] - k[4348]*y_cur[IDX_CH3II] - - k[4349]*y_cur[IDX_CNCII] - k[4350]*y_cur[IDX_FeII] - - k[4351]*y_cur[IDX_HII] - k[4352]*y_cur[IDX_H2COII] - - k[4353]*y_cur[IDX_H2SII] - k[4354]*y_cur[IDX_H3II] - - k[4355]*y_cur[IDX_H3OII] - k[4356]*y_cur[IDX_HC2SII] - - k[4357]*y_cur[IDX_HCNHII] - k[4358]*y_cur[IDX_HCNHII] - - k[4359]*y_cur[IDX_HCOII] - k[4360]*y_cur[IDX_HCOII] - - k[4361]*y_cur[IDX_HeII] - k[4362]*y_cur[IDX_MgII] - - k[4363]*y_cur[IDX_NII] - k[4364]*y_cur[IDX_N2HII] - - k[4365]*y_cur[IDX_NH3II] - k[4366]*y_cur[IDX_NH4II] - - k[4367]*y_cur[IDX_NOII] - k[4368]*y_cur[IDX_NaII] - - k[4369]*y_cur[IDX_OII] - k[4370]*y_cur[IDX_SII] - - k[4371]*y_cur[IDX_SOII] - k[4372]*y_cur[IDX_SiII] - - k[4373]*y_cur[IDX_SiOII] - k[4374]*y_cur[IDX_SiOHII] - - k[4375]*y_cur[IDX_SiSII] - k[5747] - k[6032]; - data[jistart + 4370] = 0.0 + k[3428]*y_cur[IDX_NI] + - k[3712]*y_cur[IDX_OI]; - data[jistart + 4371] = 0.0 - k[4347]*y_cur[IDX_C6M]; - data[jistart + 4372] = 0.0 - k[4348]*y_cur[IDX_C6M]; - data[jistart + 4373] = 0.0 - k[4349]*y_cur[IDX_C6M]; - data[jistart + 4374] = 0.0 - k[4350]*y_cur[IDX_C6M]; - data[jistart + 4375] = 0.0 - k[97]*y_cur[IDX_C6M]; - data[jistart + 4376] = 0.0 - k[4351]*y_cur[IDX_C6M]; - data[jistart + 4377] = 0.0 - k[4352]*y_cur[IDX_C6M]; - data[jistart + 4378] = 0.0 - k[4353]*y_cur[IDX_C6M]; - data[jistart + 4379] = 0.0 - k[4354]*y_cur[IDX_C6M]; - data[jistart + 4380] = 0.0 - k[4355]*y_cur[IDX_C6M]; - data[jistart + 4381] = 0.0 - k[4356]*y_cur[IDX_C6M]; - data[jistart + 4382] = 0.0 - k[4357]*y_cur[IDX_C6M] - - k[4358]*y_cur[IDX_C6M]; - data[jistart + 4383] = 0.0 - k[4359]*y_cur[IDX_C6M] - - k[4360]*y_cur[IDX_C6M]; - data[jistart + 4384] = 0.0 - k[4361]*y_cur[IDX_C6M]; - data[jistart + 4385] = 0.0 - k[4362]*y_cur[IDX_C6M]; - data[jistart + 4386] = 0.0 - k[3418]*y_cur[IDX_C6M] - - k[3419]*y_cur[IDX_C6M] - k[3420]*y_cur[IDX_C6M] + - k[3428]*y_cur[IDX_C7M]; - data[jistart + 4387] = 0.0 - k[4363]*y_cur[IDX_C6M]; - data[jistart + 4388] = 0.0 - k[4364]*y_cur[IDX_C6M]; - data[jistart + 4389] = 0.0 - k[4365]*y_cur[IDX_C6M]; - data[jistart + 4390] = 0.0 - k[4366]*y_cur[IDX_C6M]; - data[jistart + 4391] = 0.0 - k[4367]*y_cur[IDX_C6M]; - data[jistart + 4392] = 0.0 - k[4368]*y_cur[IDX_C6M]; - data[jistart + 4393] = 0.0 - k[3708]*y_cur[IDX_C6M] + - k[3712]*y_cur[IDX_C7M]; - data[jistart + 4394] = 0.0 - k[4369]*y_cur[IDX_C6M]; - data[jistart + 4395] = 0.0 - k[4370]*y_cur[IDX_C6M]; - data[jistart + 4396] = 0.0 - k[4371]*y_cur[IDX_C6M]; - data[jistart + 4397] = 0.0 - k[4372]*y_cur[IDX_C6M]; - data[jistart + 4398] = 0.0 - k[4373]*y_cur[IDX_C6M]; - data[jistart + 4399] = 0.0 - k[4374]*y_cur[IDX_C6M]; - data[jistart + 4400] = 0.0 - k[4375]*y_cur[IDX_C6M]; - data[jistart + 4401] = 0.0 + k[5599]*y_cur[IDX_C6I]; - data[jistart + 4402] = 0.0 + k[46]*y_cur[IDX_C5HM] + - k[4909]*y_cur[IDX_C10H2I] + k[4927]*y_cur[IDX_C5H2I] - - k[4933]*y_cur[IDX_C6HI]; - data[jistart + 4403] = 0.0 - k[1331]*y_cur[IDX_C6HI] + - k[4376]*y_cur[IDX_C6HM]; - data[jistart + 4404] = 0.0 + k[4909]*y_cur[IDX_CI]; - data[jistart + 4405] = 0.0 + k[4872]*y_cur[IDX_C4H2I]; - data[jistart + 4406] = 0.0 - k[1497]*y_cur[IDX_C6HI] - - k[1498]*y_cur[IDX_C6HI] + k[4377]*y_cur[IDX_C6HM]; - data[jistart + 4407] = 0.0 - k[1599]*y_cur[IDX_C6HI] - - k[1600]*y_cur[IDX_C6HI] - k[1601]*y_cur[IDX_C6HI] + - k[4378]*y_cur[IDX_C6HM]; - data[jistart + 4408] = 0.0 - k[1661]*y_cur[IDX_C6HI] - - k[1662]*y_cur[IDX_C6HI]; - data[jistart + 4409] = 0.0 - k[1769]*y_cur[IDX_C6HI] - - k[1770]*y_cur[IDX_C6HI]; - data[jistart + 4410] = 0.0 - k[1803]*y_cur[IDX_C6HI] - - k[1804]*y_cur[IDX_C6HI]; - data[jistart + 4411] = 0.0 + k[4872]*y_cur[IDX_C2I]; - data[jistart + 4412] = 0.0 + k[4379]*y_cur[IDX_C6HM]; - data[jistart + 4413] = 0.0 + k[4380]*y_cur[IDX_C6HM]; - data[jistart + 4414] = 0.0 + k[4381]*y_cur[IDX_C6HM]; - data[jistart + 4415] = 0.0 + k[46]*y_cur[IDX_CI]; - data[jistart + 4416] = 0.0 + k[4927]*y_cur[IDX_CI]; - data[jistart + 4417] = 0.0 + k[97]*y_cur[IDX_HI]; - data[jistart + 4418] = 0.0 - k[348]*y_cur[IDX_HII] - - k[1331]*y_cur[IDX_CII] - k[1497]*y_cur[IDX_C2H2II] - - k[1498]*y_cur[IDX_C2H2II] - k[1599]*y_cur[IDX_C2H3II] - - k[1600]*y_cur[IDX_C2H3II] - k[1601]*y_cur[IDX_C2H3II] - - k[1661]*y_cur[IDX_C2H4II] - k[1662]*y_cur[IDX_C2H4II] - - k[1769]*y_cur[IDX_C3H2II] - k[1770]*y_cur[IDX_C3H2II] - - k[1803]*y_cur[IDX_C3H3II] - k[1804]*y_cur[IDX_C3H3II] - - k[2027]*y_cur[IDX_CH2CCHII] - k[2028]*y_cur[IDX_CH2CCHII] - - k[2056]*y_cur[IDX_CH3II] - k[2307]*y_cur[IDX_HII] - - k[2620]*y_cur[IDX_H3II] - k[2925]*y_cur[IDX_HCOII] - - k[3132]*y_cur[IDX_HeII] - k[3133]*y_cur[IDX_HeII] - - k[4933]*y_cur[IDX_CI] - k[5243]*y_cur[IDX_NI] - - k[5369]*y_cur[IDX_OI] - k[5600]*y_cur[IDX_eM] - k[5752] - k[5753] - - k[5754] - k[6039] - k[6040] - k[7042]; - data[jistart + 4419] = 0.0 + k[4376]*y_cur[IDX_CII] + - k[4377]*y_cur[IDX_C2H2II] + k[4378]*y_cur[IDX_C2H3II] + - k[4379]*y_cur[IDX_C4H2II] + k[4380]*y_cur[IDX_C4H3II] + - k[4381]*y_cur[IDX_C4SII] + k[4382]*y_cur[IDX_CH2CCHII] + - k[4383]*y_cur[IDX_CH3II] + k[4384]*y_cur[IDX_CNCII] + - k[4385]*y_cur[IDX_FeII] + k[4386]*y_cur[IDX_HII] + - k[4387]*y_cur[IDX_H2COII] + k[4388]*y_cur[IDX_H2SII] + - k[4389]*y_cur[IDX_H3II] + k[4390]*y_cur[IDX_H3OII] + - k[4391]*y_cur[IDX_HC2SII] + k[4392]*y_cur[IDX_HCNHII] + - k[4393]*y_cur[IDX_HCNHII] + k[4394]*y_cur[IDX_HCOII] + - k[4395]*y_cur[IDX_HCOII] + k[4396]*y_cur[IDX_HeII] + - k[4397]*y_cur[IDX_MgII] + k[4398]*y_cur[IDX_NII] + - k[4399]*y_cur[IDX_N2HII] + k[4400]*y_cur[IDX_NH3II] + - k[4401]*y_cur[IDX_NH4II] + k[4402]*y_cur[IDX_NOII] + - k[4403]*y_cur[IDX_NaII] + k[4404]*y_cur[IDX_OII] + - k[4405]*y_cur[IDX_SII] + k[4406]*y_cur[IDX_SOII] + - k[4407]*y_cur[IDX_SiII] + k[4408]*y_cur[IDX_SiOII] + - k[4409]*y_cur[IDX_SiOHII] + k[4410]*y_cur[IDX_SiSII] + k[5749] + - k[6035]; - data[jistart + 4420] = 0.0 + k[6037]; - data[jistart + 4421] = 0.0 + k[853]*y_cur[IDX_eM] + - k[6786]*y_cur[IDX_GRAINM]; - data[jistart + 4422] = 0.0 + k[855]*y_cur[IDX_eM] + - k[6790]*y_cur[IDX_GRAINM]; - data[jistart + 4423] = 0.0 + k[857]*y_cur[IDX_eM] + - k[6797]*y_cur[IDX_GRAINM]; - data[jistart + 4424] = 0.0 + k[859]*y_cur[IDX_eM] + - k[6803]*y_cur[IDX_GRAINM]; - data[jistart + 4425] = 0.0 + k[5371]*y_cur[IDX_OI]; - data[jistart + 4426] = 0.0 + k[866]*y_cur[IDX_eM] + - k[6824]*y_cur[IDX_GRAINM]; - data[jistart + 4427] = 0.0 + k[3431]*y_cur[IDX_NI]; - data[jistart + 4428] = 0.0 + k[3715]*y_cur[IDX_OI]; - data[jistart + 4429] = 0.0 + k[3447]*y_cur[IDX_NI]; - data[jistart + 4430] = 0.0 - k[2027]*y_cur[IDX_C6HI] - - k[2028]*y_cur[IDX_C6HI] + k[4382]*y_cur[IDX_C6HM]; - data[jistart + 4431] = 0.0 - k[2056]*y_cur[IDX_C6HI] + - k[4383]*y_cur[IDX_C6HM]; - data[jistart + 4432] = 0.0 + k[5799] + k[6103]; - data[jistart + 4433] = 0.0 + k[4384]*y_cur[IDX_C6HM]; - data[jistart + 4434] = 0.0 + k[4385]*y_cur[IDX_C6HM]; - data[jistart + 4435] = 0.0 + k[8675]*y_cur[IDX_GC5HI]; - data[jistart + 4436] = 0.0 + k[8728]*y_cur[IDX_GCHI]; - data[jistart + 4437] = 0.0 + k[8675]*y_cur[IDX_GCI]; - data[jistart + 4438] = 0.0 + k[8638]*y_cur[IDX_GHI]; - data[jistart + 4439] = 0.0 + k[7224] + k[7406] + k[7588]; - data[jistart + 4440] = 0.0 + k[8728]*y_cur[IDX_GC5I]; - data[jistart + 4441] = 0.0 + k[8638]*y_cur[IDX_GC6I]; - data[jistart + 4442] = 0.0 + k[6786]*y_cur[IDX_C6H2II] + - k[6790]*y_cur[IDX_C6H3II] + k[6797]*y_cur[IDX_C6H4II] + - k[6803]*y_cur[IDX_C6H5II] + k[6824]*y_cur[IDX_C7HII] + - k[6843]*y_cur[IDX_HC7NII]; - data[jistart + 4443] = 0.0 + k[97]*y_cur[IDX_C6M]; - data[jistart + 4444] = 0.0 - k[348]*y_cur[IDX_C6HI] - - k[2307]*y_cur[IDX_C6HI] + k[4386]*y_cur[IDX_C6HM]; - data[jistart + 4445] = 0.0 + k[4387]*y_cur[IDX_C6HM]; - data[jistart + 4446] = 0.0 + k[4388]*y_cur[IDX_C6HM]; - data[jistart + 4447] = 0.0 - k[2620]*y_cur[IDX_C6HI] + - k[4389]*y_cur[IDX_C6HM]; - data[jistart + 4448] = 0.0 + k[4390]*y_cur[IDX_C6HM]; - data[jistart + 4449] = 0.0 + k[4391]*y_cur[IDX_C6HM]; - data[jistart + 4450] = 0.0 + k[5852] + k[6177]; - data[jistart + 4451] = 0.0 + k[1084]*y_cur[IDX_eM] + - k[6843]*y_cur[IDX_GRAINM]; - data[jistart + 4452] = 0.0 + k[4392]*y_cur[IDX_C6HM] + - k[4393]*y_cur[IDX_C6HM]; - data[jistart + 4453] = 0.0 - k[2925]*y_cur[IDX_C6HI] + - k[4394]*y_cur[IDX_C6HM] + k[4395]*y_cur[IDX_C6HM]; - data[jistart + 4454] = 0.0 - k[3132]*y_cur[IDX_C6HI] - - k[3133]*y_cur[IDX_C6HI] + k[4396]*y_cur[IDX_C6HM]; - data[jistart + 4455] = 0.0 + k[4397]*y_cur[IDX_C6HM]; - data[jistart + 4456] = 0.0 + k[3431]*y_cur[IDX_C7HM] + - k[3447]*y_cur[IDX_C9HM] - k[5243]*y_cur[IDX_C6HI]; - data[jistart + 4457] = 0.0 + k[4398]*y_cur[IDX_C6HM]; - data[jistart + 4458] = 0.0 + k[4399]*y_cur[IDX_C6HM]; - data[jistart + 4459] = 0.0 + k[4400]*y_cur[IDX_C6HM]; - data[jistart + 4460] = 0.0 + k[4401]*y_cur[IDX_C6HM]; - data[jistart + 4461] = 0.0 + k[4402]*y_cur[IDX_C6HM]; - data[jistart + 4462] = 0.0 + k[4403]*y_cur[IDX_C6HM]; - data[jistart + 4463] = 0.0 + k[3715]*y_cur[IDX_C7H2II] - - k[5369]*y_cur[IDX_C6HI] + k[5371]*y_cur[IDX_C7HI]; - data[jistart + 4464] = 0.0 + k[4404]*y_cur[IDX_C6HM]; - data[jistart + 4465] = 0.0 + k[4405]*y_cur[IDX_C6HM]; - data[jistart + 4466] = 0.0 + k[4406]*y_cur[IDX_C6HM]; - data[jistart + 4467] = 0.0 + k[4407]*y_cur[IDX_C6HM]; - data[jistart + 4468] = 0.0 + k[4408]*y_cur[IDX_C6HM]; - data[jistart + 4469] = 0.0 + k[4409]*y_cur[IDX_C6HM]; - data[jistart + 4470] = 0.0 + k[4410]*y_cur[IDX_C6HM]; - data[jistart + 4471] = 0.0 + k[853]*y_cur[IDX_C6H2II] + - k[855]*y_cur[IDX_C6H3II] + k[857]*y_cur[IDX_C6H4II] + - k[859]*y_cur[IDX_C6H5II] + k[866]*y_cur[IDX_C7HII] + - k[1084]*y_cur[IDX_HC7NII] - k[5600]*y_cur[IDX_C6HI]; - data[jistart + 4472] = 0.0 + k[1869]*y_cur[IDX_C5H2II] + - k[1870]*y_cur[IDX_C5H3II]; - data[jistart + 4473] = 0.0 + k[1324]*y_cur[IDX_C5H2I]; - data[jistart + 4474] = 0.0 + k[1735]*y_cur[IDX_C4HII]; - data[jistart + 4475] = 0.0 + k[1550]*y_cur[IDX_C4II] - - k[1559]*y_cur[IDX_C6HII]; - data[jistart + 4476] = 0.0 + k[1489]*y_cur[IDX_C4HI]; - data[jistart + 4477] = 0.0 + k[1550]*y_cur[IDX_C2H2I]; - data[jistart + 4478] = 0.0 + k[1489]*y_cur[IDX_C2H2II]; - data[jistart + 4479] = 0.0 + k[1735]*y_cur[IDX_C2HI]; - data[jistart + 4480] = 0.0 + k[1324]*y_cur[IDX_CII]; - data[jistart + 4481] = 0.0 + k[1869]*y_cur[IDX_CI]; - data[jistart + 4482] = 0.0 + k[1870]*y_cur[IDX_CI]; - data[jistart + 4483] = 0.0 + k[2617]*y_cur[IDX_H3II] + - k[2922]*y_cur[IDX_HCOII]; - data[jistart + 4484] = 0.0 + k[2417]*y_cur[IDX_H2I]; - data[jistart + 4485] = 0.0 + k[348]*y_cur[IDX_HII]; - data[jistart + 4486] = 0.0 - k[850]*y_cur[IDX_eM] - - k[851]*y_cur[IDX_eM] - k[1559]*y_cur[IDX_C2H2I] - - k[2418]*y_cur[IDX_H2I] - k[6782]*y_cur[IDX_GRAINM] - - k[6783]*y_cur[IDX_GRAINM]; - data[jistart + 4487] = 0.0 + k[2306]*y_cur[IDX_HII] + - k[3129]*y_cur[IDX_HeII]; - data[jistart + 4488] = 0.0 + k[3147]*y_cur[IDX_HeII]; - data[jistart + 4489] = 0.0 + k[3144]*y_cur[IDX_HeII]; - data[jistart + 4490] = 0.0 - k[6782]*y_cur[IDX_C6HII] - - k[6783]*y_cur[IDX_C6HII]; - data[jistart + 4491] = 0.0 + k[348]*y_cur[IDX_C6HI] + - k[2306]*y_cur[IDX_C6H2I]; - data[jistart + 4492] = 0.0 + k[2417]*y_cur[IDX_C6II] - - k[2418]*y_cur[IDX_C6HII]; - data[jistart + 4493] = 0.0 + k[2617]*y_cur[IDX_C6I]; - data[jistart + 4494] = 0.0 + k[3243]*y_cur[IDX_HeII]; - data[jistart + 4495] = 0.0 + k[2922]*y_cur[IDX_C6I]; - data[jistart + 4496] = 0.0 + k[3129]*y_cur[IDX_C6H2I] + - k[3144]*y_cur[IDX_C8H2I] + k[3147]*y_cur[IDX_C8HI] + - k[3243]*y_cur[IDX_HC7NI]; - data[jistart + 4497] = 0.0 - k[850]*y_cur[IDX_C6HII] - - k[851]*y_cur[IDX_C6HII]; - data[jistart + 4498] = 0.0 - k[48]*y_cur[IDX_C6HM]; - data[jistart + 4499] = 0.0 - k[4376]*y_cur[IDX_C6HM]; - data[jistart + 4500] = 0.0 - k[4377]*y_cur[IDX_C6HM]; - data[jistart + 4501] = 0.0 - k[4378]*y_cur[IDX_C6HM]; - data[jistart + 4502] = 0.0 - k[4379]*y_cur[IDX_C6HM]; - data[jistart + 4503] = 0.0 - k[4380]*y_cur[IDX_C6HM]; - data[jistart + 4504] = 0.0 - k[4381]*y_cur[IDX_C6HM]; - data[jistart + 4505] = 0.0 + k[5600]*y_cur[IDX_eM]; - data[jistart + 4506] = 0.0 - k[48]*y_cur[IDX_CI] - - k[98]*y_cur[IDX_HI] - k[3421]*y_cur[IDX_NI] - k[3422]*y_cur[IDX_NI] - - k[3709]*y_cur[IDX_OI] - k[4376]*y_cur[IDX_CII] - + data[jistart + 6875] = 0.0 - k[4767]*y_cur[IDX_C4SII]; + data[jistart + 6876] = 0.0 - k[4626]*y_cur[IDX_C4SII]; + data[jistart + 6877] = 0.0 - k[4837]*y_cur[IDX_C4SII]; + data[jistart + 6878] = 0.0 - k[4031]*y_cur[IDX_C4SII]; + data[jistart + 6879] = 0.0 - k[4206]*y_cur[IDX_C4SII]; + data[jistart + 6880] = 0.0 - k[4802]*y_cur[IDX_C4SII]; + data[jistart + 6881] = 0.0 - k[3961]*y_cur[IDX_C4SII]; + data[jistart + 6882] = 0.0 - k[4101]*y_cur[IDX_C4SII]; + data[jistart + 6883] = 0.0 + k[156]*y_cur[IDX_CII] + k[342]*y_cur[IDX_HII]; + data[jistart + 6884] = 0.0 - k[4381]*y_cur[IDX_C4SII]; + data[jistart + 6885] = 0.0 - k[4521]*y_cur[IDX_C4SII]; + data[jistart + 6886] = 0.0 - k[4451]*y_cur[IDX_C4SII]; + data[jistart + 6887] = 0.0 - k[4591]*y_cur[IDX_C4SII]; + data[jistart + 6888] = 0.0 - k[3926]*y_cur[IDX_C4SII]; + data[jistart + 6889] = 0.0 - k[4276]*y_cur[IDX_C4SII]; + data[jistart + 6890] = 0.0 - k[4311]*y_cur[IDX_C4SII]; + data[jistart + 6891] = 0.0 - k[3891]*y_cur[IDX_C4SII]; + data[jistart + 6892] = 0.0 - k[4732]*y_cur[IDX_C4SII]; + data[jistart + 6893] = 0.0 - k[4556]*y_cur[IDX_C4SII]; + data[jistart + 6894] = 0.0 - k[4696]*y_cur[IDX_C4SII]; + data[jistart + 6895] = 0.0 - k[4486]*y_cur[IDX_C4SII]; + data[jistart + 6896] = 0.0 - k[3996]*y_cur[IDX_C4SII]; + data[jistart + 6897] = 0.0 - k[4066]*y_cur[IDX_C4SII]; + data[jistart + 6898] = 0.0 - k[4171]*y_cur[IDX_C4SII]; + data[jistart + 6899] = 0.0 - k[4346]*y_cur[IDX_C4SII]; + data[jistart + 6900] = 0.0 - k[4241]*y_cur[IDX_C4SII]; + data[jistart + 6901] = 0.0 - k[4416]*y_cur[IDX_C4SII]; + data[jistart + 6902] = 0.0 - k[4136]*y_cur[IDX_C4SII]; + data[jistart + 6903] = 0.0 - k[4661]*y_cur[IDX_C4SII]; + data[jistart + 6904] = 0.0 + k[3822]*y_cur[IDX_SII]; + data[jistart + 6905] = 0.0 + k[3822]*y_cur[IDX_C4HI]; + data[jistart + 6906] = 0.0 + k[156]*y_cur[IDX_C4SI]; + data[jistart + 6907] = 0.0 + k[342]*y_cur[IDX_C4SI]; + data[jistart + 6908] = 0.0 - k[6815]*y_cur[IDX_C4SII] - k[6816]*y_cur[IDX_C4SII] - + k[6817]*y_cur[IDX_C4SII]; + data[jistart + 6909] = 0.0 - k[835]*y_cur[IDX_C4SII] - k[836]*y_cur[IDX_C4SII] - + k[837]*y_cur[IDX_C4SII]; + data[jistart + 6910] = 0.0 + k[2830]*y_cur[IDX_HI] + k[2865]*y_cur[IDX_HCNI]; + data[jistart + 6911] = 0.0 + k[3017]*y_cur[IDX_CII] + k[3025]*y_cur[IDX_HII]; + data[jistart + 6912] = 0.0 + k[2279]*y_cur[IDX_CNI]; + data[jistart + 6913] = 0.0 + k[2278]*y_cur[IDX_CNI]; + data[jistart + 6914] = 0.0 + k[301]*y_cur[IDX_HCNI] + k[2273]*y_cur[IDX_HCOI] + + k[2433]*y_cur[IDX_H2I] + k[2536]*y_cur[IDX_H2OI]; + data[jistart + 6915] = 0.0 + k[498]*y_cur[IDX_HCNI]; + data[jistart + 6916] = 0.0 - k[230]*y_cur[IDX_C2H2I] - k[480]*y_cur[IDX_H2OI] - + k[490]*y_cur[IDX_HI] - k[494]*y_cur[IDX_NOI] - k[495]*y_cur[IDX_O2I] + - k[496]*y_cur[IDX_SI] - k[608]*y_cur[IDX_NH3I] - + k[1088]*y_cur[IDX_eM] - k[1458]*y_cur[IDX_C2I] - + k[1745]*y_cur[IDX_C2HI] - k[1903]*y_cur[IDX_CI] - + k[2005]*y_cur[IDX_CH2I] - k[2199]*y_cur[IDX_CH4I] - + k[2200]*y_cur[IDX_CH4I] - k[2250]*y_cur[IDX_CHI] - + k[2450]*y_cur[IDX_H2I] - k[2546]*y_cur[IDX_H2OI] - + k[2853]*y_cur[IDX_CO2I] - k[2854]*y_cur[IDX_COI] - + k[2855]*y_cur[IDX_H2COI] - k[2856]*y_cur[IDX_HCNI] - + k[2857]*y_cur[IDX_HCOI] - k[2858]*y_cur[IDX_HCOI] - + k[2859]*y_cur[IDX_HNCI] - k[2860]*y_cur[IDX_SI] - + k[3539]*y_cur[IDX_NH2I] - k[3581]*y_cur[IDX_NH3I] - + k[3613]*y_cur[IDX_NHI] - k[3800]*y_cur[IDX_OHI] - + k[6372]*y_cur[IDX_GRAINM]; + data[jistart + 6917] = 0.0 + k[3479]*y_cur[IDX_C2I] + k[3481]*y_cur[IDX_CNI]; + data[jistart + 6918] = 0.0 + k[449]*y_cur[IDX_HCNI] + k[2381]*y_cur[IDX_CNI]; + data[jistart + 6919] = 0.0 + k[497]*y_cur[IDX_HCNI]; + data[jistart + 6920] = 0.0 + k[1417]*y_cur[IDX_CII] + k[1962]*y_cur[IDX_CHII] - + k[3539]*y_cur[IDX_HCNII]; + data[jistart + 6921] = 0.0 + k[3452]*y_cur[IDX_NI]; + data[jistart + 6922] = 0.0 + k[3775]*y_cur[IDX_CNI]; + data[jistart + 6923] = 0.0 + k[1962]*y_cur[IDX_NH2I]; + data[jistart + 6924] = 0.0 - k[2853]*y_cur[IDX_HCNII]; + data[jistart + 6925] = 0.0 - k[3613]*y_cur[IDX_HCNII]; + data[jistart + 6926] = 0.0 + k[554]*y_cur[IDX_HCNI] + k[3341]*y_cur[IDX_CH4I]; + data[jistart + 6927] = 0.0 - k[2005]*y_cur[IDX_HCNII]; + data[jistart + 6928] = 0.0 - k[2859]*y_cur[IDX_HCNII]; + data[jistart + 6929] = 0.0 - k[495]*y_cur[IDX_HCNII]; + data[jistart + 6930] = 0.0 - k[494]*y_cur[IDX_HCNII]; + data[jistart + 6931] = 0.0 + k[2273]*y_cur[IDX_CNII] - k[2857]*y_cur[IDX_HCNII] - + k[2858]*y_cur[IDX_HCNII]; + data[jistart + 6932] = 0.0 - k[2199]*y_cur[IDX_HCNII] - k[2200]*y_cur[IDX_HCNII] + + k[3341]*y_cur[IDX_NII]; + data[jistart + 6933] = 0.0 - k[1745]*y_cur[IDX_HCNII]; + data[jistart + 6934] = 0.0 - k[2855]*y_cur[IDX_HCNII]; + data[jistart + 6935] = 0.0 + k[301]*y_cur[IDX_CNII] + k[388]*y_cur[IDX_HII] + + k[449]*y_cur[IDX_H2II] + k[497]*y_cur[IDX_COII] + + k[498]*y_cur[IDX_N2II] + k[554]*y_cur[IDX_NII] - + k[2856]*y_cur[IDX_HCNII] + k[2865]*y_cur[IDX_C2N2II]; + data[jistart + 6936] = 0.0 - k[2250]*y_cur[IDX_HCNII]; + data[jistart + 6937] = 0.0 - k[496]*y_cur[IDX_HCNII] - k[2860]*y_cur[IDX_HCNII]; + data[jistart + 6938] = 0.0 - k[1458]*y_cur[IDX_HCNII] + k[3479]*y_cur[IDX_NHII]; + data[jistart + 6939] = 0.0 - k[3800]*y_cur[IDX_HCNII]; + data[jistart + 6940] = 0.0 - k[608]*y_cur[IDX_HCNII] + k[1419]*y_cur[IDX_CII] - + k[3581]*y_cur[IDX_HCNII]; + data[jistart + 6941] = 0.0 - k[230]*y_cur[IDX_HCNII]; + data[jistart + 6942] = 0.0 + k[2278]*y_cur[IDX_HNOII] + k[2279]*y_cur[IDX_O2HII] + + k[2381]*y_cur[IDX_H2II] + k[2671]*y_cur[IDX_H3II] + + k[3481]*y_cur[IDX_NHII] + k[3775]*y_cur[IDX_OHII]; + data[jistart + 6943] = 0.0 + k[3452]*y_cur[IDX_CH2II]; + data[jistart + 6944] = 0.0 + k[1417]*y_cur[IDX_NH2I] + k[1419]*y_cur[IDX_NH3I] + + k[3017]*y_cur[IDX_HNC3I]; + data[jistart + 6945] = 0.0 - k[480]*y_cur[IDX_HCNII] + k[2536]*y_cur[IDX_CNII] - + k[2546]*y_cur[IDX_HCNII]; + data[jistart + 6946] = 0.0 + k[388]*y_cur[IDX_HCNI] + k[3025]*y_cur[IDX_HNC3I]; + data[jistart + 6947] = 0.0 - k[1903]*y_cur[IDX_HCNII]; + data[jistart + 6948] = 0.0 + k[2671]*y_cur[IDX_CNI]; + data[jistart + 6949] = 0.0 - k[2854]*y_cur[IDX_HCNII]; + data[jistart + 6950] = 0.0 - k[6372]*y_cur[IDX_HCNII]; + data[jistart + 6951] = 0.0 + k[2433]*y_cur[IDX_CNII] - k[2450]*y_cur[IDX_HCNII]; + data[jistart + 6952] = 0.0 - k[1088]*y_cur[IDX_HCNII]; + data[jistart + 6953] = 0.0 - k[490]*y_cur[IDX_HCNII] + k[2830]*y_cur[IDX_C2N2II]; + data[jistart + 6954] = 0.0 + k[7141] + k[7323] + k[7505]; + data[jistart + 6955] = 0.0 + k[5786] + k[6087]; + data[jistart + 6956] = 0.0 - k[2118]*y_cur[IDX_CH3CHCH2I] - k[2119]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6957] = 0.0 - k[1817]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6958] = 0.0 + k[813]*y_cur[IDX_eM] + k[1818]*y_cur[IDX_NH3I] + + k[6510]*y_cur[IDX_GRAINM]; + data[jistart + 6959] = 0.0 - k[1815]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6960] = 0.0 + k[5070]*y_cur[IDX_CHI]; + data[jistart + 6961] = 0.0 - k[166]*y_cur[IDX_CII] - k[670]*y_cur[IDX_O2II] - + k[702]*y_cur[IDX_SII] - k[712]*y_cur[IDX_SOII] - + k[1373]*y_cur[IDX_CII] - k[1374]*y_cur[IDX_CII] - + k[1375]*y_cur[IDX_CII] - k[1376]*y_cur[IDX_CII] - + k[1377]*y_cur[IDX_CII] - k[1815]*y_cur[IDX_C3H5II] - + k[1817]*y_cur[IDX_C3H6II] - k[2118]*y_cur[IDX_CH3COCH3II] - + k[2119]*y_cur[IDX_CH3COCH3II] - k[2649]*y_cur[IDX_H3II] - + k[2650]*y_cur[IDX_H3II] - k[2790]*y_cur[IDX_H3OII] - + k[3369]*y_cur[IDX_N2HII] - k[3370]*y_cur[IDX_N2HII] - + k[3658]*y_cur[IDX_O2II] - k[3659]*y_cur[IDX_O2II] - + k[3660]*y_cur[IDX_O2II] - k[3661]*y_cur[IDX_O2II] - + k[3662]*y_cur[IDX_O2II] - k[3663]*y_cur[IDX_O2II] - + k[3823]*y_cur[IDX_SII] - k[3824]*y_cur[IDX_SII] - + k[3825]*y_cur[IDX_SII] - k[3826]*y_cur[IDX_SII] - + k[3856]*y_cur[IDX_SOII] - k[4870]*y_cur[IDX_C2I] - + k[4898]*y_cur[IDX_C2HI] - k[4954]*y_cur[IDX_CI] - + k[5053]*y_cur[IDX_C4HI] - k[5054]*y_cur[IDX_C4HI] - + k[5055]*y_cur[IDX_OHI] - k[5056]*y_cur[IDX_OHI] - + k[5071]*y_cur[IDX_CHI] - k[5072]*y_cur[IDX_CHI] - + k[5112]*y_cur[IDX_CNI] - k[5805] - k[6110] - k[6959]; + data[jistart + 6962] = 0.0 - k[670]*y_cur[IDX_CH3CHCH2I] - k[3658]*y_cur[IDX_CH3CHCH2I] - + k[3659]*y_cur[IDX_CH3CHCH2I] - k[3660]*y_cur[IDX_CH3CHCH2I] - + k[3661]*y_cur[IDX_CH3CHCH2I] - k[3662]*y_cur[IDX_CH3CHCH2I] - + k[3663]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6963] = 0.0 - k[3369]*y_cur[IDX_CH3CHCH2I] - k[3370]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6964] = 0.0 - k[712]*y_cur[IDX_CH3CHCH2I] - k[3856]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6965] = 0.0 - k[5053]*y_cur[IDX_CH3CHCH2I] - k[5054]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6966] = 0.0 - k[702]*y_cur[IDX_CH3CHCH2I] - k[3823]*y_cur[IDX_CH3CHCH2I] - + k[3824]*y_cur[IDX_CH3CHCH2I] - k[3825]*y_cur[IDX_CH3CHCH2I] - + k[3826]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6967] = 0.0 - k[4898]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6968] = 0.0 + k[5070]*y_cur[IDX_C2H6I] - k[5071]*y_cur[IDX_CH3CHCH2I] - + k[5072]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6969] = 0.0 - k[4870]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6970] = 0.0 - k[5055]*y_cur[IDX_CH3CHCH2I] - k[5056]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6971] = 0.0 + k[1818]*y_cur[IDX_C3H7II]; + data[jistart + 6972] = 0.0 - k[5112]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6973] = 0.0 - k[2790]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6974] = 0.0 - k[166]*y_cur[IDX_CH3CHCH2I] - k[1373]*y_cur[IDX_CH3CHCH2I] - + k[1374]*y_cur[IDX_CH3CHCH2I] - k[1375]*y_cur[IDX_CH3CHCH2I] - + k[1376]*y_cur[IDX_CH3CHCH2I] - k[1377]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6975] = 0.0 - k[4954]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6976] = 0.0 - k[2649]*y_cur[IDX_CH3CHCH2I] - k[2650]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 6977] = 0.0 + k[6510]*y_cur[IDX_C3H7II]; + data[jistart + 6978] = 0.0 + k[813]*y_cur[IDX_C3H7II]; + data[jistart + 6979] = 0.0 + k[3114]*y_cur[IDX_HeII]; + data[jistart + 6980] = 0.0 + k[3104]*y_cur[IDX_HeII]; + data[jistart + 6981] = 0.0 + k[3100]*y_cur[IDX_HeII]; + data[jistart + 6982] = 0.0 + k[3030]*y_cur[IDX_HeII]; + data[jistart + 6983] = 0.0 + k[208]*y_cur[IDX_C2I]; + data[jistart + 6984] = 0.0 + k[210]*y_cur[IDX_C2I]; + data[jistart + 6985] = 0.0 - k[205]*y_cur[IDX_HCOI] - k[206]*y_cur[IDX_NOI] - + k[207]*y_cur[IDX_SI] - k[244]*y_cur[IDX_CI] - k[259]*y_cur[IDX_CH2I] + - k[287]*y_cur[IDX_CHI] - k[585]*y_cur[IDX_NH2I] - + k[697]*y_cur[IDX_OHI] - k[739]*y_cur[IDX_eM] - + k[1451]*y_cur[IDX_C2I] - k[1452]*y_cur[IDX_C2H2I] - + k[1453]*y_cur[IDX_HCNI] - k[1454]*y_cur[IDX_HCOI] - + k[1455]*y_cur[IDX_O2I] - k[1456]*y_cur[IDX_SI] - + k[1995]*y_cur[IDX_CH2I] - k[2146]*y_cur[IDX_CH4I] - + k[2147]*y_cur[IDX_CH4I] - k[2148]*y_cur[IDX_CH4I] - + k[2149]*y_cur[IDX_CH4I] - k[2150]*y_cur[IDX_CH4I] - + k[2239]*y_cur[IDX_CHI] - k[2401]*y_cur[IDX_H2I] - + k[2519]*y_cur[IDX_H2OI] - k[2520]*y_cur[IDX_H2OI] - + k[3383]*y_cur[IDX_NI] - k[3528]*y_cur[IDX_NH2I] - + k[3605]*y_cur[IDX_NHI] - k[3606]*y_cur[IDX_NHI] - + k[3684]*y_cur[IDX_OI] - k[5975] - k[6352]*y_cur[IDX_GRAINM]; + data[jistart + 6986] = 0.0 + k[436]*y_cur[IDX_C2I]; + data[jistart + 6987] = 0.0 + k[209]*y_cur[IDX_C2I]; + data[jistart + 6988] = 0.0 + k[3094]*y_cur[IDX_HeII]; + data[jistart + 6989] = 0.0 - k[585]*y_cur[IDX_C2II] - k[3528]*y_cur[IDX_C2II]; + data[jistart + 6990] = 0.0 + k[5979]; + data[jistart + 6991] = 0.0 + k[685]*y_cur[IDX_C2I]; + data[jistart + 6992] = 0.0 + k[462]*y_cur[IDX_C2I]; + data[jistart + 6993] = 0.0 + k[3098]*y_cur[IDX_HeII]; + data[jistart + 6994] = 0.0 + k[1890]*y_cur[IDX_CI] + k[1943]*y_cur[IDX_CHI]; + data[jistart + 6995] = 0.0 + k[211]*y_cur[IDX_C2I]; + data[jistart + 6996] = 0.0 - k[3605]*y_cur[IDX_C2II] - k[3606]*y_cur[IDX_C2II]; + data[jistart + 6997] = 0.0 + k[3105]*y_cur[IDX_HeII]; + data[jistart + 6998] = 0.0 + k[542]*y_cur[IDX_C2I]; + data[jistart + 6999] = 0.0 + k[646]*y_cur[IDX_C2I]; + data[jistart + 7000] = 0.0 - k[259]*y_cur[IDX_C2II] - k[1995]*y_cur[IDX_C2II]; + data[jistart + 7001] = 0.0 - k[1455]*y_cur[IDX_C2II]; + data[jistart + 7002] = 0.0 - k[206]*y_cur[IDX_C2II]; + data[jistart + 7003] = 0.0 - k[205]*y_cur[IDX_C2II] - k[1454]*y_cur[IDX_C2II]; + data[jistart + 7004] = 0.0 - k[2146]*y_cur[IDX_C2II] - k[2147]*y_cur[IDX_C2II] - + k[2148]*y_cur[IDX_C2II] - k[2149]*y_cur[IDX_C2II] - + k[2150]*y_cur[IDX_C2II]; + data[jistart + 7005] = 0.0 + k[2299]*y_cur[IDX_HII] + k[3086]*y_cur[IDX_HeII]; + data[jistart + 7006] = 0.0 - k[1453]*y_cur[IDX_C2II]; + data[jistart + 7007] = 0.0 - k[287]*y_cur[IDX_C2II] + k[1385]*y_cur[IDX_CII] + + k[1943]*y_cur[IDX_CHII] - k[2239]*y_cur[IDX_C2II]; + data[jistart + 7008] = 0.0 - k[207]*y_cur[IDX_C2II] - k[1456]*y_cur[IDX_C2II]; + data[jistart + 7009] = 0.0 + k[208]*y_cur[IDX_CNII] + k[209]*y_cur[IDX_COII] + + k[210]*y_cur[IDX_N2II] + k[211]*y_cur[IDX_O2II] + + k[323]*y_cur[IDX_HII] + k[436]*y_cur[IDX_H2II] + + k[462]*y_cur[IDX_H2OII] + k[508]*y_cur[IDX_HeII] + + k[542]*y_cur[IDX_NII] + k[646]*y_cur[IDX_OII] + + k[685]*y_cur[IDX_OHII] - k[1451]*y_cur[IDX_C2II] + k[5977]; + data[jistart + 7010] = 0.0 - k[697]*y_cur[IDX_C2II]; + data[jistart + 7011] = 0.0 - k[1452]*y_cur[IDX_C2II] + k[3074]*y_cur[IDX_HeII]; + data[jistart + 7012] = 0.0 - k[3383]*y_cur[IDX_C2II]; + data[jistart + 7013] = 0.0 - k[3684]*y_cur[IDX_C2II]; + data[jistart + 7014] = 0.0 + k[508]*y_cur[IDX_C2I] + k[3030]*y_cur[IDX_HNC3I] + + k[3074]*y_cur[IDX_C2H2I] + k[3086]*y_cur[IDX_C2HI] + + k[3094]*y_cur[IDX_C2SI] + k[3098]*y_cur[IDX_C3NI] + + k[3100]*y_cur[IDX_C3OI] + k[3104]*y_cur[IDX_C3SI] + + k[3105]*y_cur[IDX_C4I] + k[3114]*y_cur[IDX_C4PI]; + data[jistart + 7015] = 0.0 + k[1385]*y_cur[IDX_CHI] + k[5503]*y_cur[IDX_CI]; + data[jistart + 7016] = 0.0 - k[2519]*y_cur[IDX_C2II] - k[2520]*y_cur[IDX_C2II]; + data[jistart + 7017] = 0.0 + k[323]*y_cur[IDX_C2I] + k[2299]*y_cur[IDX_C2HI]; + data[jistart + 7018] = 0.0 - k[244]*y_cur[IDX_C2II] + k[1890]*y_cur[IDX_CHII] + + k[5503]*y_cur[IDX_CII]; + data[jistart + 7019] = 0.0 - k[6352]*y_cur[IDX_C2II]; + data[jistart + 7020] = 0.0 - k[2401]*y_cur[IDX_C2II]; + data[jistart + 7021] = 0.0 - k[739]*y_cur[IDX_C2II]; + data[jistart + 7022] = 0.0 + k[2165]*y_cur[IDX_CH4I] + k[2411]*y_cur[IDX_H2I]; + data[jistart + 7023] = 0.0 + k[3242]*y_cur[IDX_HeII]; + data[jistart + 7024] = 0.0 + k[1389]*y_cur[IDX_CII] - k[2478]*y_cur[IDX_C4HII]; + data[jistart + 7025] = 0.0 + k[3127]*y_cur[IDX_HeII]; + data[jistart + 7026] = 0.0 - k[1832]*y_cur[IDX_C4HII]; + data[jistart + 7027] = 0.0 + k[1311]*y_cur[IDX_CII]; + data[jistart + 7028] = 0.0 + k[1452]*y_cur[IDX_C2H2I]; + data[jistart + 7029] = 0.0 - k[821]*y_cur[IDX_eM] - k[1551]*y_cur[IDX_C2H2I] - + k[1632]*y_cur[IDX_C2H3I] - k[1694]*y_cur[IDX_C2H4I] - + k[1695]*y_cur[IDX_C2H4I] - k[1734]*y_cur[IDX_C2HI] - + k[1735]*y_cur[IDX_C2HI] - k[1822]*y_cur[IDX_C3HI] - + k[1823]*y_cur[IDX_C3HI] - k[1830]*y_cur[IDX_C4HI] - + k[1831]*y_cur[IDX_C4HI] - k[1832]*y_cur[IDX_C5H2I] - + k[1833]*y_cur[IDX_C5HI] - k[1834]*y_cur[IDX_C4H2I] - + k[1862]*y_cur[IDX_CI] - k[2032]*y_cur[IDX_CH2CCHI] - + k[2105]*y_cur[IDX_CH3CCHI] - k[2168]*y_cur[IDX_CH4I] - + k[2412]*y_cur[IDX_H2I] - k[2478]*y_cur[IDX_H2CCCI] - + k[2869]*y_cur[IDX_HCNI] - k[2870]*y_cur[IDX_HCNI] - + k[3699]*y_cur[IDX_OI] - k[6621]*y_cur[IDX_GRAINM]; + data[jistart + 7030] = 0.0 - k[2105]*y_cur[IDX_C4HII]; + data[jistart + 7031] = 0.0 + k[1470]*y_cur[IDX_C2HII]; + data[jistart + 7032] = 0.0 + k[1857]*y_cur[IDX_CI]; + data[jistart + 7033] = 0.0 + k[1470]*y_cur[IDX_HC3NI]; + data[jistart + 7034] = 0.0 + k[1856]*y_cur[IDX_CI]; + data[jistart + 7035] = 0.0 + k[2608]*y_cur[IDX_H3II] + k[2778]*y_cur[IDX_H3OII] + + k[2913]*y_cur[IDX_HCOII]; + data[jistart + 7036] = 0.0 + k[1346]*y_cur[IDX_CII] - k[2032]*y_cur[IDX_C4HII]; + data[jistart + 7037] = 0.0 + k[1892]*y_cur[IDX_CI]; + data[jistart + 7038] = 0.0 + k[3132]*y_cur[IDX_HeII]; + data[jistart + 7039] = 0.0 - k[1833]*y_cur[IDX_C4HII]; + data[jistart + 7040] = 0.0 - k[1822]*y_cur[IDX_C4HII] - k[1823]*y_cur[IDX_C4HII]; + data[jistart + 7041] = 0.0 + k[340]*y_cur[IDX_HII] - k[1830]*y_cur[IDX_C4HII] - + k[1831]*y_cur[IDX_C4HII]; + data[jistart + 7042] = 0.0 - k[1834]*y_cur[IDX_C4HII] + k[2342]*y_cur[IDX_HII] + + k[3240]*y_cur[IDX_HeII] + k[3830]*y_cur[IDX_SII] + + k[3869]*y_cur[IDX_SiII]; + data[jistart + 7043] = 0.0 - k[1694]*y_cur[IDX_C4HII] - k[1695]*y_cur[IDX_C4HII]; + data[jistart + 7044] = 0.0 - k[1632]*y_cur[IDX_C4HII]; + data[jistart + 7045] = 0.0 + k[3869]*y_cur[IDX_C4H2I]; + data[jistart + 7046] = 0.0 + k[3830]*y_cur[IDX_C4H2I]; + data[jistart + 7047] = 0.0 + k[2165]*y_cur[IDX_C4II] - k[2168]*y_cur[IDX_C4HII]; + data[jistart + 7048] = 0.0 - k[1734]*y_cur[IDX_C4HII] - k[1735]*y_cur[IDX_C4HII]; + data[jistart + 7049] = 0.0 - k[2869]*y_cur[IDX_C4HII] - k[2870]*y_cur[IDX_C4HII]; + data[jistart + 7050] = 0.0 + k[1452]*y_cur[IDX_C2II] - k[1551]*y_cur[IDX_C4HII]; + data[jistart + 7051] = 0.0 + k[2778]*y_cur[IDX_C4I]; + data[jistart + 7052] = 0.0 - k[3699]*y_cur[IDX_C4HII]; + data[jistart + 7053] = 0.0 + k[3127]*y_cur[IDX_C6H2I] + k[3132]*y_cur[IDX_C6HI] + + k[3240]*y_cur[IDX_C4H2I] + k[3242]*y_cur[IDX_HC5NI]; + data[jistart + 7054] = 0.0 + k[1311]*y_cur[IDX_C3H2I] + k[1346]*y_cur[IDX_CH2CCHI] + + k[1389]*y_cur[IDX_H2CCCI]; + data[jistart + 7055] = 0.0 + k[340]*y_cur[IDX_C4HI] + k[2342]*y_cur[IDX_C4H2I]; + data[jistart + 7056] = 0.0 + k[1856]*y_cur[IDX_C3H2II] + k[1857]*y_cur[IDX_C3H3II] - + k[1862]*y_cur[IDX_C4HII] + k[1892]*y_cur[IDX_CH2CCHII]; + data[jistart + 7057] = 0.0 + k[2913]*y_cur[IDX_C4I]; + data[jistart + 7058] = 0.0 + k[2608]*y_cur[IDX_C4I]; + data[jistart + 7059] = 0.0 - k[6621]*y_cur[IDX_C4HII]; + data[jistart + 7060] = 0.0 + k[2411]*y_cur[IDX_C4II] - k[2412]*y_cur[IDX_C4HII]; + data[jistart + 7061] = 0.0 - k[821]*y_cur[IDX_C4HII]; + data[jistart + 7062] = 0.0 + k[184]*y_cur[IDX_CII]; + data[jistart + 7063] = 0.0 - k[978]*y_cur[IDX_eM] - k[979]*y_cur[IDX_eM] - + k[2539]*y_cur[IDX_H2OI] - k[3572]*y_cur[IDX_NH3I] - + k[3894]*y_cur[IDX_CM] - k[3929]*y_cur[IDX_C10M] - + k[3964]*y_cur[IDX_C10HM] - k[3999]*y_cur[IDX_C2M] - + k[4034]*y_cur[IDX_C2HM] - k[4069]*y_cur[IDX_C3M] - + k[4104]*y_cur[IDX_C3HM] - k[4139]*y_cur[IDX_C3NM] - + k[4174]*y_cur[IDX_C4M] - k[4209]*y_cur[IDX_C4HM] - + k[4244]*y_cur[IDX_C5M] - k[4279]*y_cur[IDX_C5HM] - + k[4314]*y_cur[IDX_C5NM] - k[4349]*y_cur[IDX_C6M] - + k[4384]*y_cur[IDX_C6HM] - k[4419]*y_cur[IDX_C7M] - + k[4454]*y_cur[IDX_C7HM] - k[4489]*y_cur[IDX_C8M] - + k[4524]*y_cur[IDX_C8HM] - k[4559]*y_cur[IDX_C9M] - + k[4594]*y_cur[IDX_C9HM] - k[4629]*y_cur[IDX_CHM] - + k[4664]*y_cur[IDX_CNM] - k[4699]*y_cur[IDX_HM] - + k[4735]*y_cur[IDX_OM] - k[4770]*y_cur[IDX_O2M] - + k[4805]*y_cur[IDX_OHM] - k[4840]*y_cur[IDX_SM] - + k[6468]*y_cur[IDX_GRAINM] - k[6469]*y_cur[IDX_GRAINM]; + data[jistart + 7064] = 0.0 - k[4770]*y_cur[IDX_CNCII]; + data[jistart + 7065] = 0.0 - k[4629]*y_cur[IDX_CNCII]; + data[jistart + 7066] = 0.0 - k[4840]*y_cur[IDX_CNCII]; + data[jistart + 7067] = 0.0 - k[4034]*y_cur[IDX_CNCII]; + data[jistart + 7068] = 0.0 - k[4209]*y_cur[IDX_CNCII]; + data[jistart + 7069] = 0.0 - k[4805]*y_cur[IDX_CNCII]; + data[jistart + 7070] = 0.0 - k[3964]*y_cur[IDX_CNCII]; + data[jistart + 7071] = 0.0 - k[4104]*y_cur[IDX_CNCII]; + data[jistart + 7072] = 0.0 - k[4384]*y_cur[IDX_CNCII]; + data[jistart + 7073] = 0.0 - k[4524]*y_cur[IDX_CNCII]; + data[jistart + 7074] = 0.0 - k[4454]*y_cur[IDX_CNCII]; + data[jistart + 7075] = 0.0 - k[4594]*y_cur[IDX_CNCII]; + data[jistart + 7076] = 0.0 - k[3929]*y_cur[IDX_CNCII]; + data[jistart + 7077] = 0.0 - k[4279]*y_cur[IDX_CNCII]; + data[jistart + 7078] = 0.0 - k[4314]*y_cur[IDX_CNCII]; + data[jistart + 7079] = 0.0 - k[3894]*y_cur[IDX_CNCII]; + data[jistart + 7080] = 0.0 - k[4735]*y_cur[IDX_CNCII]; + data[jistart + 7081] = 0.0 - k[4559]*y_cur[IDX_CNCII]; + data[jistart + 7082] = 0.0 - k[4699]*y_cur[IDX_CNCII]; + data[jistart + 7083] = 0.0 - k[4489]*y_cur[IDX_CNCII]; + data[jistart + 7084] = 0.0 - k[3999]*y_cur[IDX_CNCII]; + data[jistart + 7085] = 0.0 - k[4069]*y_cur[IDX_CNCII]; + data[jistart + 7086] = 0.0 - k[4174]*y_cur[IDX_CNCII]; + data[jistart + 7087] = 0.0 - k[4349]*y_cur[IDX_CNCII]; + data[jistart + 7088] = 0.0 - k[4244]*y_cur[IDX_CNCII]; + data[jistart + 7089] = 0.0 - k[4419]*y_cur[IDX_CNCII]; + data[jistart + 7090] = 0.0 - k[4139]*y_cur[IDX_CNCII]; + data[jistart + 7091] = 0.0 + k[1945]*y_cur[IDX_CNI]; + data[jistart + 7092] = 0.0 - k[4664]*y_cur[IDX_CNCII]; + data[jistart + 7093] = 0.0 + k[1407]*y_cur[IDX_CII]; + data[jistart + 7094] = 0.0 - k[3572]*y_cur[IDX_CNCII]; + data[jistart + 7095] = 0.0 + k[1945]*y_cur[IDX_CHII]; + data[jistart + 7096] = 0.0 + k[184]*y_cur[IDX_NCCNI] + k[1407]*y_cur[IDX_HCNI]; + data[jistart + 7097] = 0.0 - k[2539]*y_cur[IDX_CNCII]; + data[jistart + 7098] = 0.0 - k[6468]*y_cur[IDX_CNCII] - k[6469]*y_cur[IDX_CNCII]; + data[jistart + 7099] = 0.0 - k[978]*y_cur[IDX_CNCII] - k[979]*y_cur[IDX_CNCII]; + data[jistart + 7100] = 0.0 + k[3227]*y_cur[IDX_HeII]; + data[jistart + 7101] = 0.0 + k[3840]*y_cur[IDX_SI]; + data[jistart + 7102] = 0.0 + k[3050]*y_cur[IDX_SI]; + data[jistart + 7103] = 0.0 + k[3362]*y_cur[IDX_H2SI]; + data[jistart + 7104] = 0.0 + k[2860]*y_cur[IDX_SI]; + data[jistart + 7105] = 0.0 - k[505]*y_cur[IDX_FeI] - k[534]*y_cur[IDX_MgI] - + k[609]*y_cur[IDX_NH3I] - k[627]*y_cur[IDX_NOI] - + k[638]*y_cur[IDX_NaI] - k[710]*y_cur[IDX_SI] - k[720]*y_cur[IDX_SiI] + - k[1138]*y_cur[IDX_eM] - k[1908]*y_cur[IDX_CI] - + k[2203]*y_cur[IDX_CH4I] - k[2255]*y_cur[IDX_CHI] - + k[2456]*y_cur[IDX_H2I] - k[2554]*y_cur[IDX_H2OI] - + k[2844]*y_cur[IDX_HI] - k[2879]*y_cur[IDX_HCNI] - + k[3043]*y_cur[IDX_HNCI] - k[3054]*y_cur[IDX_H2SI] - + k[3055]*y_cur[IDX_H2SI] - k[3462]*y_cur[IDX_NI] - + k[3589]*y_cur[IDX_NH3I] - k[3742]*y_cur[IDX_OI] - + k[3743]*y_cur[IDX_OI] - k[5557]*y_cur[IDX_H2I] - k[6205] - k[6206] - + k[6445]*y_cur[IDX_GRAINM]; + data[jistart + 7106] = 0.0 + k[3505]*y_cur[IDX_SI]; + data[jistart + 7107] = 0.0 + k[2387]*y_cur[IDX_H2SI]; + data[jistart + 7108] = 0.0 + k[2356]*y_cur[IDX_HII]; + data[jistart + 7109] = 0.0 + k[3516]*y_cur[IDX_H2SI] + k[3527]*y_cur[IDX_SI]; + data[jistart + 7110] = 0.0 + k[2235]*y_cur[IDX_SI]; + data[jistart + 7111] = 0.0 + k[397]*y_cur[IDX_HII]; + data[jistart + 7112] = 0.0 + k[3789]*y_cur[IDX_SI]; + data[jistart + 7113] = 0.0 + k[2516]*y_cur[IDX_SI]; + data[jistart + 7114] = 0.0 + k[1974]*y_cur[IDX_SI]; + data[jistart + 7115] = 0.0 - k[505]*y_cur[IDX_HSII]; + data[jistart + 7116] = 0.0 - k[534]*y_cur[IDX_HSII]; + data[jistart + 7117] = 0.0 - k[638]*y_cur[IDX_HSII]; + data[jistart + 7118] = 0.0 + k[3376]*y_cur[IDX_SI]; + data[jistart + 7119] = 0.0 + k[2842]*y_cur[IDX_HI] + k[3734]*y_cur[IDX_OI]; + data[jistart + 7120] = 0.0 + k[3347]*y_cur[IDX_H2SI]; + data[jistart + 7121] = 0.0 + k[2490]*y_cur[IDX_SI]; + data[jistart + 7122] = 0.0 + k[3642]*y_cur[IDX_H2SI]; + data[jistart + 7123] = 0.0 - k[3043]*y_cur[IDX_HSII]; + data[jistart + 7124] = 0.0 + k[2339]*y_cur[IDX_HII] + k[2387]*y_cur[IDX_H2II] - + k[3054]*y_cur[IDX_HSII] - k[3055]*y_cur[IDX_HSII] + + k[3229]*y_cur[IDX_HeII] + k[3347]*y_cur[IDX_NII] + + k[3362]*y_cur[IDX_N2II] + k[3516]*y_cur[IDX_NH2II] + + k[3642]*y_cur[IDX_OII]; + data[jistart + 7125] = 0.0 + k[2470]*y_cur[IDX_H2I] + k[3012]*y_cur[IDX_HCOI]; + data[jistart + 7126] = 0.0 - k[720]*y_cur[IDX_HSII]; + data[jistart + 7127] = 0.0 - k[627]*y_cur[IDX_HSII]; + data[jistart + 7128] = 0.0 + k[3012]*y_cur[IDX_SII]; + data[jistart + 7129] = 0.0 - k[2203]*y_cur[IDX_HSII]; + data[jistart + 7130] = 0.0 - k[2879]*y_cur[IDX_HSII]; + data[jistart + 7131] = 0.0 - k[2255]*y_cur[IDX_HSII]; + data[jistart + 7132] = 0.0 - k[710]*y_cur[IDX_HSII] + k[1974]*y_cur[IDX_CHII] + + k[2235]*y_cur[IDX_CH5II] + k[2490]*y_cur[IDX_H2COII] + + k[2516]*y_cur[IDX_H2OII] + k[2740]*y_cur[IDX_H3II] + + k[2860]*y_cur[IDX_HCNII] + k[2989]*y_cur[IDX_HCOII] + + k[3050]*y_cur[IDX_HNOII] + k[3376]*y_cur[IDX_N2HII] + + k[3505]*y_cur[IDX_NHII] + k[3527]*y_cur[IDX_NH2II] + + k[3789]*y_cur[IDX_OHII] + k[3840]*y_cur[IDX_O2HII]; + data[jistart + 7133] = 0.0 - k[609]*y_cur[IDX_HSII] - k[3589]*y_cur[IDX_HSII]; + data[jistart + 7134] = 0.0 - k[3462]*y_cur[IDX_HSII]; + data[jistart + 7135] = 0.0 + k[3734]*y_cur[IDX_H2SII] - k[3742]*y_cur[IDX_HSII] - + k[3743]*y_cur[IDX_HSII]; + data[jistart + 7136] = 0.0 + k[3227]*y_cur[IDX_H2S2I] + k[3229]*y_cur[IDX_H2SI]; + data[jistart + 7137] = 0.0 - k[2554]*y_cur[IDX_HSII]; + data[jistart + 7138] = 0.0 + k[397]*y_cur[IDX_HSI] + k[2339]*y_cur[IDX_H2SI] + + k[2356]*y_cur[IDX_OCSI]; + data[jistart + 7139] = 0.0 - k[1908]*y_cur[IDX_HSII]; + data[jistart + 7140] = 0.0 + k[2989]*y_cur[IDX_SI]; + data[jistart + 7141] = 0.0 + k[2740]*y_cur[IDX_SI]; + data[jistart + 7142] = 0.0 - k[6445]*y_cur[IDX_HSII]; + data[jistart + 7143] = 0.0 - k[2456]*y_cur[IDX_HSII] + k[2470]*y_cur[IDX_SII] - + k[5557]*y_cur[IDX_HSII]; + data[jistart + 7144] = 0.0 - k[1138]*y_cur[IDX_HSII]; + data[jistart + 7145] = 0.0 + k[2842]*y_cur[IDX_H2SII] - k[2844]*y_cur[IDX_HSII]; + data[jistart + 7146] = 0.0 + k[3033]*y_cur[IDX_HeII]; + data[jistart + 7147] = 0.0 + k[616]*y_cur[IDX_NHI]; + data[jistart + 7148] = 0.0 + k[618]*y_cur[IDX_NHI]; + data[jistart + 7149] = 0.0 - k[574]*y_cur[IDX_H2COI] - k[575]*y_cur[IDX_H2OI] - + k[576]*y_cur[IDX_NH3I] - k[577]*y_cur[IDX_NOI] - + k[578]*y_cur[IDX_O2I] - k[579]*y_cur[IDX_SI] - k[1158]*y_cur[IDX_eM] + - k[1910]*y_cur[IDX_CI] - k[2011]*y_cur[IDX_CH2I] - + k[2258]*y_cur[IDX_CHI] - k[2461]*y_cur[IDX_H2I] - + k[2462]*y_cur[IDX_H2I] - k[3463]*y_cur[IDX_NI] - + k[3477]*y_cur[IDX_C2I] - k[3478]*y_cur[IDX_C2I] - + k[3479]*y_cur[IDX_C2I] - k[3480]*y_cur[IDX_C2HI] - + k[3481]*y_cur[IDX_CNI] - k[3482]*y_cur[IDX_CO2I] - + k[3483]*y_cur[IDX_CO2I] - k[3484]*y_cur[IDX_CO2I] - + k[3485]*y_cur[IDX_COI] - k[3486]*y_cur[IDX_COI] - + k[3487]*y_cur[IDX_H2COI] - k[3488]*y_cur[IDX_H2COI] - + k[3489]*y_cur[IDX_H2OI] - k[3490]*y_cur[IDX_H2OI] - + k[3491]*y_cur[IDX_H2OI] - k[3492]*y_cur[IDX_H2OI] - + k[3493]*y_cur[IDX_HCNI] - k[3494]*y_cur[IDX_HCOI] - + k[3495]*y_cur[IDX_HNCI] - k[3496]*y_cur[IDX_N2I] - + k[3497]*y_cur[IDX_NH2I] - k[3498]*y_cur[IDX_NH3I] - + k[3499]*y_cur[IDX_NHI] - k[3500]*y_cur[IDX_NOI] - + k[3501]*y_cur[IDX_O2I] - k[3502]*y_cur[IDX_O2I] - + k[3503]*y_cur[IDX_OI] - k[3504]*y_cur[IDX_OHI] - + k[3505]*y_cur[IDX_SI] - k[3506]*y_cur[IDX_SI] - k[6217] - + k[6320]*y_cur[IDX_GRAINM]; + data[jistart + 7150] = 0.0 + k[453]*y_cur[IDX_NHI] + k[2392]*y_cur[IDX_NI]; + data[jistart + 7151] = 0.0 + k[617]*y_cur[IDX_NHI]; + data[jistart + 7152] = 0.0 + k[3281]*y_cur[IDX_HeII] - k[3497]*y_cur[IDX_NHII]; + data[jistart + 7153] = 0.0 - k[3482]*y_cur[IDX_NHII] - k[3483]*y_cur[IDX_NHII] - + k[3484]*y_cur[IDX_NHII]; + data[jistart + 7154] = 0.0 + k[402]*y_cur[IDX_HII] + k[453]*y_cur[IDX_H2II] + + k[559]*y_cur[IDX_NII] + k[616]*y_cur[IDX_CNII] + + k[617]*y_cur[IDX_COII] + k[618]*y_cur[IDX_N2II] + + k[619]*y_cur[IDX_OII] - k[3499]*y_cur[IDX_NHII] + k[5889] + k[6225]; + data[jistart + 7155] = 0.0 + k[559]*y_cur[IDX_NHI] + k[2459]*y_cur[IDX_H2I] + + k[3348]*y_cur[IDX_H2SI] + k[3350]*y_cur[IDX_HCOI]; + data[jistart + 7156] = 0.0 + k[619]*y_cur[IDX_NHI]; + data[jistart + 7157] = 0.0 - k[2011]*y_cur[IDX_NHII]; + data[jistart + 7158] = 0.0 + k[3263]*y_cur[IDX_HeII] - k[3495]*y_cur[IDX_NHII]; + data[jistart + 7159] = 0.0 - k[3496]*y_cur[IDX_NHII]; + data[jistart + 7160] = 0.0 - k[578]*y_cur[IDX_NHII] - k[3501]*y_cur[IDX_NHII] - + k[3502]*y_cur[IDX_NHII]; + data[jistart + 7161] = 0.0 + k[3348]*y_cur[IDX_NII]; + data[jistart + 7162] = 0.0 - k[577]*y_cur[IDX_NHII] - k[3500]*y_cur[IDX_NHII]; + data[jistart + 7163] = 0.0 + k[3350]*y_cur[IDX_NII] - k[3494]*y_cur[IDX_NHII]; + data[jistart + 7164] = 0.0 - k[3480]*y_cur[IDX_NHII]; + data[jistart + 7165] = 0.0 - k[574]*y_cur[IDX_NHII] - k[3487]*y_cur[IDX_NHII] - + k[3488]*y_cur[IDX_NHII]; + data[jistart + 7166] = 0.0 - k[3493]*y_cur[IDX_NHII]; + data[jistart + 7167] = 0.0 - k[2258]*y_cur[IDX_NHII]; + data[jistart + 7168] = 0.0 - k[579]*y_cur[IDX_NHII] - k[3505]*y_cur[IDX_NHII] - + k[3506]*y_cur[IDX_NHII]; + data[jistart + 7169] = 0.0 - k[3477]*y_cur[IDX_NHII] - k[3478]*y_cur[IDX_NHII] - + k[3479]*y_cur[IDX_NHII]; + data[jistart + 7170] = 0.0 - k[3504]*y_cur[IDX_NHII]; + data[jistart + 7171] = 0.0 - k[576]*y_cur[IDX_NHII] + k[3283]*y_cur[IDX_HeII] - + k[3498]*y_cur[IDX_NHII]; + data[jistart + 7172] = 0.0 - k[3481]*y_cur[IDX_NHII]; + data[jistart + 7173] = 0.0 + k[2392]*y_cur[IDX_H2II] - k[3463]*y_cur[IDX_NHII]; + data[jistart + 7174] = 0.0 - k[3503]*y_cur[IDX_NHII]; + data[jistart + 7175] = 0.0 + k[3033]*y_cur[IDX_HNC3I] + k[3263]*y_cur[IDX_HNCI] + + k[3281]*y_cur[IDX_NH2I] + k[3283]*y_cur[IDX_NH3I]; + data[jistart + 7176] = 0.0 - k[575]*y_cur[IDX_NHII] - k[3489]*y_cur[IDX_NHII] - + k[3490]*y_cur[IDX_NHII] - k[3491]*y_cur[IDX_NHII] - + k[3492]*y_cur[IDX_NHII]; + data[jistart + 7177] = 0.0 + k[402]*y_cur[IDX_NHI]; + data[jistart + 7178] = 0.0 - k[1910]*y_cur[IDX_NHII]; + data[jistart + 7179] = 0.0 - k[3485]*y_cur[IDX_NHII] - k[3486]*y_cur[IDX_NHII]; + data[jistart + 7180] = 0.0 - k[6320]*y_cur[IDX_NHII]; + data[jistart + 7181] = 0.0 + k[2459]*y_cur[IDX_NII] - k[2461]*y_cur[IDX_NHII] - + k[2462]*y_cur[IDX_NHII]; + data[jistart + 7182] = 0.0 - k[1158]*y_cur[IDX_NHII]; + data[jistart + 7183] = 0.0 - k[4767]*y_cur[IDX_O2M]; + data[jistart + 7184] = 0.0 - k[4770]*y_cur[IDX_O2M]; + data[jistart + 7185] = 0.0 - k[146]*y_cur[IDX_O2I] - k[4762]*y_cur[IDX_CII] - + k[4763]*y_cur[IDX_C2H2II] - k[4764]*y_cur[IDX_C2H3II] - + k[4765]*y_cur[IDX_C4H2II] - k[4766]*y_cur[IDX_C4H3II] - + k[4767]*y_cur[IDX_C4SII] - k[4768]*y_cur[IDX_CH2CCHII] - + k[4769]*y_cur[IDX_CH3II] - k[4770]*y_cur[IDX_CNCII] - + k[4771]*y_cur[IDX_FeII] - k[4772]*y_cur[IDX_HII] - + k[4773]*y_cur[IDX_H2COII] - k[4774]*y_cur[IDX_H2SII] - + k[4775]*y_cur[IDX_H3II] - k[4776]*y_cur[IDX_H3OII] - + k[4777]*y_cur[IDX_HC2SII] - k[4778]*y_cur[IDX_HCNHII] - + k[4779]*y_cur[IDX_HCNHII] - k[4780]*y_cur[IDX_HCOII] - + k[4781]*y_cur[IDX_HCOII] - k[4782]*y_cur[IDX_HeII] - + k[4783]*y_cur[IDX_MgII] - k[4784]*y_cur[IDX_NII] - + k[4785]*y_cur[IDX_N2HII] - k[4786]*y_cur[IDX_NH3II] - + k[4787]*y_cur[IDX_NH4II] - k[4788]*y_cur[IDX_NOII] - + k[4789]*y_cur[IDX_NaII] - k[4790]*y_cur[IDX_OII] - + k[4791]*y_cur[IDX_SII] - k[4792]*y_cur[IDX_SOII] - + k[4793]*y_cur[IDX_SiII] - k[4794]*y_cur[IDX_SiOII] - + k[4795]*y_cur[IDX_SiOHII] - k[4796]*y_cur[IDX_SiSII] - k[5896] - + k[6234]; + data[jistart + 7186] = 0.0 - k[4796]*y_cur[IDX_O2M]; + data[jistart + 7187] = 0.0 - k[4777]*y_cur[IDX_O2M]; + data[jistart + 7188] = 0.0 + k[667]*y_cur[IDX_O2I]; + data[jistart + 7189] = 0.0 - k[4794]*y_cur[IDX_O2M]; + data[jistart + 7190] = 0.0 - k[4795]*y_cur[IDX_O2M]; + data[jistart + 7191] = 0.0 - k[4771]*y_cur[IDX_O2M]; + data[jistart + 7192] = 0.0 - k[4783]*y_cur[IDX_O2M]; + data[jistart + 7193] = 0.0 - k[4789]*y_cur[IDX_O2M]; + data[jistart + 7194] = 0.0 - k[4766]*y_cur[IDX_O2M]; + data[jistart + 7195] = 0.0 - k[4785]*y_cur[IDX_O2M]; + data[jistart + 7196] = 0.0 - k[4792]*y_cur[IDX_O2M]; + data[jistart + 7197] = 0.0 - k[4768]*y_cur[IDX_O2M]; + data[jistart + 7198] = 0.0 - k[4774]*y_cur[IDX_O2M]; + data[jistart + 7199] = 0.0 - k[4784]*y_cur[IDX_O2M]; + data[jistart + 7200] = 0.0 - k[4773]*y_cur[IDX_O2M]; + data[jistart + 7201] = 0.0 - k[4788]*y_cur[IDX_O2M]; + data[jistart + 7202] = 0.0 - k[4790]*y_cur[IDX_O2M]; + data[jistart + 7203] = 0.0 - k[4765]*y_cur[IDX_O2M]; + data[jistart + 7204] = 0.0 - k[4778]*y_cur[IDX_O2M] - k[4779]*y_cur[IDX_O2M]; + data[jistart + 7205] = 0.0 - k[4786]*y_cur[IDX_O2M]; + data[jistart + 7206] = 0.0 - k[4787]*y_cur[IDX_O2M]; + data[jistart + 7207] = 0.0 - k[146]*y_cur[IDX_O2M] + k[667]*y_cur[IDX_OM]; + data[jistart + 7208] = 0.0 - k[4793]*y_cur[IDX_O2M]; + data[jistart + 7209] = 0.0 - k[4791]*y_cur[IDX_O2M]; + data[jistart + 7210] = 0.0 - k[4764]*y_cur[IDX_O2M]; + data[jistart + 7211] = 0.0 - k[4763]*y_cur[IDX_O2M]; + data[jistart + 7212] = 0.0 - k[4769]*y_cur[IDX_O2M]; + data[jistart + 7213] = 0.0 - k[4776]*y_cur[IDX_O2M]; + data[jistart + 7214] = 0.0 - k[4782]*y_cur[IDX_O2M]; + data[jistart + 7215] = 0.0 - k[4762]*y_cur[IDX_O2M]; + data[jistart + 7216] = 0.0 - k[4772]*y_cur[IDX_O2M]; + data[jistart + 7217] = 0.0 - k[4780]*y_cur[IDX_O2M] - k[4781]*y_cur[IDX_O2M]; + data[jistart + 7218] = 0.0 - k[4775]*y_cur[IDX_O2M]; + data[jistart + 7219] = 0.0 - k[4626]*y_cur[IDX_CHM]; + data[jistart + 7220] = 0.0 - k[4629]*y_cur[IDX_CHM]; + data[jistart + 7221] = 0.0 - k[55]*y_cur[IDX_CI] - k[105]*y_cur[IDX_HI] - + k[4621]*y_cur[IDX_CII] - k[4622]*y_cur[IDX_C2H2II] - + k[4623]*y_cur[IDX_C2H3II] - k[4624]*y_cur[IDX_C4H2II] - + k[4625]*y_cur[IDX_C4H3II] - k[4626]*y_cur[IDX_C4SII] - + k[4627]*y_cur[IDX_CH2CCHII] - k[4628]*y_cur[IDX_CH3II] - + k[4629]*y_cur[IDX_CNCII] - k[4630]*y_cur[IDX_FeII] - + k[4631]*y_cur[IDX_HII] - k[4632]*y_cur[IDX_H2COII] - + k[4633]*y_cur[IDX_H2SII] - k[4634]*y_cur[IDX_H3II] - + k[4635]*y_cur[IDX_H3OII] - k[4636]*y_cur[IDX_HC2SII] - + k[4637]*y_cur[IDX_HCNHII] - k[4638]*y_cur[IDX_HCNHII] - + k[4639]*y_cur[IDX_HCOII] - k[4640]*y_cur[IDX_HCOII] - + k[4641]*y_cur[IDX_HeII] - k[4642]*y_cur[IDX_MgII] - + k[4643]*y_cur[IDX_NII] - k[4644]*y_cur[IDX_N2HII] - + k[4645]*y_cur[IDX_NH3II] - k[4646]*y_cur[IDX_NH4II] - + k[4647]*y_cur[IDX_NOII] - k[4648]*y_cur[IDX_NaII] - + k[4649]*y_cur[IDX_OII] - k[4650]*y_cur[IDX_SII] - + k[4651]*y_cur[IDX_SOII] - k[4652]*y_cur[IDX_SiII] - + k[4653]*y_cur[IDX_SiOII] - k[4654]*y_cur[IDX_SiOHII] - + k[4655]*y_cur[IDX_SiSII] - k[5777] - k[6074]; + data[jistart + 7222] = 0.0 - k[4655]*y_cur[IDX_CHM]; + data[jistart + 7223] = 0.0 + k[3687]*y_cur[IDX_OI]; + data[jistart + 7224] = 0.0 - k[4636]*y_cur[IDX_CHM]; + data[jistart + 7225] = 0.0 - k[4653]*y_cur[IDX_CHM]; + data[jistart + 7226] = 0.0 - k[4654]*y_cur[IDX_CHM]; + data[jistart + 7227] = 0.0 - k[4630]*y_cur[IDX_CHM]; + data[jistart + 7228] = 0.0 - k[4642]*y_cur[IDX_CHM]; + data[jistart + 7229] = 0.0 - k[4648]*y_cur[IDX_CHM]; + data[jistart + 7230] = 0.0 - k[4625]*y_cur[IDX_CHM]; + data[jistart + 7231] = 0.0 - k[4644]*y_cur[IDX_CHM]; + data[jistart + 7232] = 0.0 - k[4651]*y_cur[IDX_CHM]; + data[jistart + 7233] = 0.0 - k[4627]*y_cur[IDX_CHM]; + data[jistart + 7234] = 0.0 - k[4633]*y_cur[IDX_CHM]; + data[jistart + 7235] = 0.0 - k[4643]*y_cur[IDX_CHM]; + data[jistart + 7236] = 0.0 - k[4632]*y_cur[IDX_CHM]; + data[jistart + 7237] = 0.0 - k[4647]*y_cur[IDX_CHM]; + data[jistart + 7238] = 0.0 - k[4649]*y_cur[IDX_CHM]; + data[jistart + 7239] = 0.0 - k[4624]*y_cur[IDX_CHM]; + data[jistart + 7240] = 0.0 - k[4637]*y_cur[IDX_CHM] - k[4638]*y_cur[IDX_CHM]; + data[jistart + 7241] = 0.0 - k[4645]*y_cur[IDX_CHM]; + data[jistart + 7242] = 0.0 - k[4646]*y_cur[IDX_CHM]; + data[jistart + 7243] = 0.0 - k[4652]*y_cur[IDX_CHM]; + data[jistart + 7244] = 0.0 - k[4650]*y_cur[IDX_CHM]; + data[jistart + 7245] = 0.0 - k[4623]*y_cur[IDX_CHM]; + data[jistart + 7246] = 0.0 - k[4622]*y_cur[IDX_CHM]; + data[jistart + 7247] = 0.0 - k[4628]*y_cur[IDX_CHM]; + data[jistart + 7248] = 0.0 - k[4635]*y_cur[IDX_CHM]; + data[jistart + 7249] = 0.0 + k[3687]*y_cur[IDX_C2HM]; + data[jistart + 7250] = 0.0 - k[4641]*y_cur[IDX_CHM]; + data[jistart + 7251] = 0.0 - k[4621]*y_cur[IDX_CHM]; + data[jistart + 7252] = 0.0 - k[4631]*y_cur[IDX_CHM]; + data[jistart + 7253] = 0.0 - k[55]*y_cur[IDX_CHM]; + data[jistart + 7254] = 0.0 - k[4639]*y_cur[IDX_CHM] - k[4640]*y_cur[IDX_CHM]; + data[jistart + 7255] = 0.0 - k[4634]*y_cur[IDX_CHM]; + data[jistart + 7256] = 0.0 - k[105]*y_cur[IDX_CHM]; + data[jistart + 7257] = 0.0 + k[457]*y_cur[IDX_H2I]; + data[jistart + 7258] = 0.0 + k[2845]*y_cur[IDX_HI]; + data[jistart + 7259] = 0.0 - k[441]*y_cur[IDX_H2II] - k[2376]*y_cur[IDX_H2II] - + k[2377]*y_cur[IDX_H2II]; + data[jistart + 7260] = 0.0 - k[436]*y_cur[IDX_C2I] - k[437]*y_cur[IDX_C2H2I] - + k[438]*y_cur[IDX_C2H4I] - k[439]*y_cur[IDX_C2HI] - + k[440]*y_cur[IDX_CH2I] - k[441]*y_cur[IDX_C2H6I] - + k[442]*y_cur[IDX_CH4I] - k[443]*y_cur[IDX_CHI] - + k[444]*y_cur[IDX_CNI] - k[445]*y_cur[IDX_COI] - + k[446]*y_cur[IDX_H2COI] - k[447]*y_cur[IDX_H2OI] - + k[448]*y_cur[IDX_H2SI] - k[449]*y_cur[IDX_HCNI] - + k[450]*y_cur[IDX_HCOI] - k[451]*y_cur[IDX_NH2I] - + k[452]*y_cur[IDX_NH3I] - k[453]*y_cur[IDX_NHI] - + k[454]*y_cur[IDX_NOI] - k[455]*y_cur[IDX_O2I] - + k[456]*y_cur[IDX_OHI] - k[489]*y_cur[IDX_HI] - k[987]*y_cur[IDX_eM] + - k[2369]*y_cur[IDX_C2I] - k[2370]*y_cur[IDX_C2H2I] - + k[2371]*y_cur[IDX_C2H4I] - k[2372]*y_cur[IDX_C2H4I] - + k[2373]*y_cur[IDX_C2HI] - k[2374]*y_cur[IDX_CI] - + k[2375]*y_cur[IDX_CH2I] - k[2376]*y_cur[IDX_C2H6I] - + k[2377]*y_cur[IDX_C2H6I] - k[2378]*y_cur[IDX_CH4I] - + k[2379]*y_cur[IDX_CH4I] - k[2380]*y_cur[IDX_CHI] - + k[2381]*y_cur[IDX_CNI] - k[2382]*y_cur[IDX_CO2I] - + k[2383]*y_cur[IDX_COI] - k[2384]*y_cur[IDX_H2I] - + k[2385]*y_cur[IDX_H2COI] - k[2386]*y_cur[IDX_H2OI] - + k[2387]*y_cur[IDX_H2SI] - k[2388]*y_cur[IDX_H2SI] - + k[2389]*y_cur[IDX_HCOI] - k[2390]*y_cur[IDX_HeI] - + k[2391]*y_cur[IDX_N2I] - k[2392]*y_cur[IDX_NI] - + k[2393]*y_cur[IDX_NHI] - k[2394]*y_cur[IDX_NOI] - + k[2395]*y_cur[IDX_O2I] - k[2396]*y_cur[IDX_OI] - + k[2397]*y_cur[IDX_OHI] - k[4702]*y_cur[IDX_HM] - k[6148] - + k[6309]*y_cur[IDX_GRAINM]; + data[jistart + 7261] = 0.0 - k[4702]*y_cur[IDX_H2II]; + data[jistart + 7262] = 0.0 - k[451]*y_cur[IDX_H2II]; + data[jistart + 7263] = 0.0 - k[2382]*y_cur[IDX_H2II]; + data[jistart + 7264] = 0.0 - k[453]*y_cur[IDX_H2II] - k[2393]*y_cur[IDX_H2II]; + data[jistart + 7265] = 0.0 - k[440]*y_cur[IDX_H2II] - k[2375]*y_cur[IDX_H2II]; + data[jistart + 7266] = 0.0 - k[438]*y_cur[IDX_H2II] - k[2371]*y_cur[IDX_H2II] - + k[2372]*y_cur[IDX_H2II]; + data[jistart + 7267] = 0.0 - k[2391]*y_cur[IDX_H2II]; + data[jistart + 7268] = 0.0 - k[455]*y_cur[IDX_H2II] - k[2395]*y_cur[IDX_H2II]; + data[jistart + 7269] = 0.0 - k[448]*y_cur[IDX_H2II] - k[2387]*y_cur[IDX_H2II] - + k[2388]*y_cur[IDX_H2II]; + data[jistart + 7270] = 0.0 - k[454]*y_cur[IDX_H2II] - k[2394]*y_cur[IDX_H2II]; + data[jistart + 7271] = 0.0 - k[450]*y_cur[IDX_H2II] + k[2345]*y_cur[IDX_HII] - + k[2389]*y_cur[IDX_H2II]; + data[jistart + 7272] = 0.0 - k[442]*y_cur[IDX_H2II] - k[2378]*y_cur[IDX_H2II] - + k[2379]*y_cur[IDX_H2II]; + data[jistart + 7273] = 0.0 - k[439]*y_cur[IDX_H2II] - k[2373]*y_cur[IDX_H2II]; + data[jistart + 7274] = 0.0 - k[446]*y_cur[IDX_H2II] - k[2385]*y_cur[IDX_H2II]; + data[jistart + 7275] = 0.0 - k[449]*y_cur[IDX_H2II]; + data[jistart + 7276] = 0.0 - k[443]*y_cur[IDX_H2II] - k[2380]*y_cur[IDX_H2II]; + data[jistart + 7277] = 0.0 - k[436]*y_cur[IDX_H2II] - k[2369]*y_cur[IDX_H2II]; + data[jistart + 7278] = 0.0 - k[456]*y_cur[IDX_H2II] - k[2397]*y_cur[IDX_H2II]; + data[jistart + 7279] = 0.0 - k[452]*y_cur[IDX_H2II]; + data[jistart + 7280] = 0.0 - k[437]*y_cur[IDX_H2II] - k[2370]*y_cur[IDX_H2II]; + data[jistart + 7281] = 0.0 - k[444]*y_cur[IDX_H2II] - k[2381]*y_cur[IDX_H2II]; + data[jistart + 7282] = 0.0 - k[2392]*y_cur[IDX_H2II]; + data[jistart + 7283] = 0.0 - k[2396]*y_cur[IDX_H2II]; + data[jistart + 7284] = 0.0 + k[458]*y_cur[IDX_H2I]; + data[jistart + 7285] = 0.0 - k[2390]*y_cur[IDX_H2II]; + data[jistart + 7286] = 0.0 - k[447]*y_cur[IDX_H2II] - k[2386]*y_cur[IDX_H2II]; + data[jistart + 7287] = 0.0 + k[2345]*y_cur[IDX_HCOI] + k[5546]*y_cur[IDX_HI]; + data[jistart + 7288] = 0.0 - k[2374]*y_cur[IDX_H2II]; + data[jistart + 7289] = 0.0 + k[6168]; + data[jistart + 7290] = 0.0 - k[445]*y_cur[IDX_H2II] - k[2383]*y_cur[IDX_H2II]; + data[jistart + 7291] = 0.0 - k[6309]*y_cur[IDX_H2II]; + data[jistart + 7292] = 0.0 + k[457]*y_cur[IDX_FII] + k[458]*y_cur[IDX_HeII] - + k[2384]*y_cur[IDX_H2II] + k[5680]; + data[jistart + 7293] = 0.0 - k[987]*y_cur[IDX_H2II]; + data[jistart + 7294] = 0.0 - k[489]*y_cur[IDX_H2II] + k[2845]*y_cur[IDX_HeHII] + + k[5546]*y_cur[IDX_HII]; + data[jistart + 7295] = 0.0 + k[7204] + k[7386] + k[7570]; + data[jistart + 7296] = 0.0 + k[8696]*y_cur[IDX_GOI]; + data[jistart + 7297] = 0.0 + k[1129]*y_cur[IDX_eM] + k[2552]*y_cur[IDX_H2OI] + + k[6718]*y_cur[IDX_GRAINM]; + data[jistart + 7298] = 0.0 + k[486]*y_cur[IDX_H2SI] + k[612]*y_cur[IDX_NH3I]; + data[jistart + 7299] = 0.0 + k[8714]*y_cur[IDX_GCOI]; + data[jistart + 7300] = 0.0 + k[5409]*y_cur[IDX_OI]; + data[jistart + 7301] = 0.0 - k[314]*y_cur[IDX_OCSI]; + data[jistart + 7302] = 0.0 + k[8714]*y_cur[IDX_GSI]; + data[jistart + 7303] = 0.0 - k[3813]*y_cur[IDX_OCSI]; + data[jistart + 7304] = 0.0 - k[284]*y_cur[IDX_OCSI] - k[2145]*y_cur[IDX_OCSI]; + data[jistart + 7305] = 0.0 + k[8696]*y_cur[IDX_GCSI]; + data[jistart + 7306] = 0.0 - k[571]*y_cur[IDX_OCSI] - k[3365]*y_cur[IDX_OCSI]; + data[jistart + 7307] = 0.0 - k[189]*y_cur[IDX_CII] - k[284]*y_cur[IDX_CH4II] - + k[314]*y_cur[IDX_CO2II] - k[407]*y_cur[IDX_HII] - + k[475]*y_cur[IDX_H2OII] - k[562]*y_cur[IDX_NII] - + k[571]*y_cur[IDX_N2II] - k[663]*y_cur[IDX_OII] - + k[1425]*y_cur[IDX_CII] - k[1756]*y_cur[IDX_C3HII] - + k[1757]*y_cur[IDX_C3HII] - k[1758]*y_cur[IDX_C3HII] - + k[1970]*y_cur[IDX_CHII] - k[1971]*y_cur[IDX_CHII] - + k[1992]*y_cur[IDX_CH2II] - k[1993]*y_cur[IDX_CH2II] - + k[2092]*y_cur[IDX_CH3II] - k[2145]*y_cur[IDX_CH4II] - + k[2356]*y_cur[IDX_HII] - k[2732]*y_cur[IDX_H3II] - + k[2982]*y_cur[IDX_HCOII] - k[3293]*y_cur[IDX_HeII] - + k[3294]*y_cur[IDX_HeII] - k[3295]*y_cur[IDX_HeII] - + k[3296]*y_cur[IDX_HeII] - k[3359]*y_cur[IDX_NII] - + k[3360]*y_cur[IDX_NII] - k[3365]*y_cur[IDX_N2II] - + k[3649]*y_cur[IDX_OII] - k[3813]*y_cur[IDX_PII] - + k[3833]*y_cur[IDX_SII] - k[3858]*y_cur[IDX_SOII] - + k[3871]*y_cur[IDX_SiII] - k[4875]*y_cur[IDX_C2I] - + k[4905]*y_cur[IDX_C2HI] - k[4980]*y_cur[IDX_CI] - + k[5098]*y_cur[IDX_CHI] - k[5197]*y_cur[IDX_HI] - + k[5430]*y_cur[IDX_OI] - k[5431]*y_cur[IDX_OI] - k[5902] - k[5903] - + k[6240] - k[6241] - k[7022]; + data[jistart + 7308] = 0.0 + k[65]*y_cur[IDX_COI]; + data[jistart + 7309] = 0.0 + k[5463]*y_cur[IDX_OHI]; + data[jistart + 7310] = 0.0 - k[1756]*y_cur[IDX_OCSI] - k[1757]*y_cur[IDX_OCSI] - + k[1758]*y_cur[IDX_OCSI]; + data[jistart + 7311] = 0.0 - k[1992]*y_cur[IDX_OCSI] - k[1993]*y_cur[IDX_OCSI]; + data[jistart + 7312] = 0.0 - k[475]*y_cur[IDX_OCSI]; + data[jistart + 7313] = 0.0 - k[1970]*y_cur[IDX_OCSI] - k[1971]*y_cur[IDX_OCSI]; + data[jistart + 7314] = 0.0 + k[5103]*y_cur[IDX_CHI]; + data[jistart + 7315] = 0.0 - k[3858]*y_cur[IDX_OCSI]; + data[jistart + 7316] = 0.0 - k[562]*y_cur[IDX_OCSI] - k[3359]*y_cur[IDX_OCSI] - + k[3360]*y_cur[IDX_OCSI]; + data[jistart + 7317] = 0.0 - k[663]*y_cur[IDX_OCSI] - k[3649]*y_cur[IDX_OCSI]; + data[jistart + 7318] = 0.0 - k[3871]*y_cur[IDX_OCSI]; + data[jistart + 7319] = 0.0 + k[486]*y_cur[IDX_OCSII]; + data[jistart + 7320] = 0.0 - k[3833]*y_cur[IDX_OCSI]; + data[jistart + 7321] = 0.0 + k[5486]*y_cur[IDX_SI]; + data[jistart + 7322] = 0.0 - k[4905]*y_cur[IDX_OCSI]; + data[jistart + 7323] = 0.0 - k[5098]*y_cur[IDX_OCSI] + k[5103]*y_cur[IDX_SOI]; + data[jistart + 7324] = 0.0 + k[5486]*y_cur[IDX_HCOI]; + data[jistart + 7325] = 0.0 - k[4875]*y_cur[IDX_OCSI]; + data[jistart + 7326] = 0.0 + k[5463]*y_cur[IDX_CSI]; + data[jistart + 7327] = 0.0 + k[612]*y_cur[IDX_OCSII]; + data[jistart + 7328] = 0.0 - k[2092]*y_cur[IDX_OCSI]; + data[jistart + 7329] = 0.0 + k[5409]*y_cur[IDX_HCSI] - k[5430]*y_cur[IDX_OCSI] - + k[5431]*y_cur[IDX_OCSI]; + data[jistart + 7330] = 0.0 - k[3293]*y_cur[IDX_OCSI] - k[3294]*y_cur[IDX_OCSI] - + k[3295]*y_cur[IDX_OCSI] - k[3296]*y_cur[IDX_OCSI]; + data[jistart + 7331] = 0.0 - k[189]*y_cur[IDX_OCSI] - k[1425]*y_cur[IDX_OCSI]; + data[jistart + 7332] = 0.0 + k[2552]*y_cur[IDX_HOCSII]; + data[jistart + 7333] = 0.0 - k[407]*y_cur[IDX_OCSI] - k[2356]*y_cur[IDX_OCSI]; + data[jistart + 7334] = 0.0 - k[4980]*y_cur[IDX_OCSI]; + data[jistart + 7335] = 0.0 - k[2982]*y_cur[IDX_OCSI]; + data[jistart + 7336] = 0.0 - k[2732]*y_cur[IDX_OCSI]; + data[jistart + 7337] = 0.0 + k[65]*y_cur[IDX_SM]; + data[jistart + 7338] = 0.0 + k[6718]*y_cur[IDX_HOCSII]; + data[jistart + 7339] = 0.0 + k[1129]*y_cur[IDX_HOCSII]; + data[jistart + 7340] = 0.0 - k[5197]*y_cur[IDX_OCSI]; + data[jistart + 7341] = 0.0 + k[7844] + k[8171]; + data[jistart + 7342] = 0.0 + k[7841] + k[8167]; + data[jistart + 7343] = 0.0 + k[7865] + k[8204]; + data[jistart + 7344] = 0.0 + k[7864] + k[8203]; + data[jistart + 7345] = 0.0 + k[7874] + k[8228]; + data[jistart + 7346] = 0.0 + k[7891] + k[8272]; + data[jistart + 7347] = 0.0 + k[7735] + k[8044]; + data[jistart + 7348] = 0.0 + k[7819] + k[7819] + k[7821] + k[7821] + k[8146] + k[8146] + + k[8148] + k[8148]; + data[jistart + 7349] = 0.0 + k[7771] + k[7771] + k[8091] + k[8091]; + data[jistart + 7350] = 0.0 + k[7724] + k[8032]; + data[jistart + 7351] = 0.0 + k[7732] + k[8041]; + data[jistart + 7352] = 0.0 + k[8533]*y_cur[IDX_GCH2I] - k[8541]*y_cur[IDX_GCH3I]; + data[jistart + 7353] = 0.0 - k[8553]*y_cur[IDX_GCH3I] - k[8757]*y_cur[IDX_GCH3I]; + data[jistart + 7354] = 0.0 + k[7681] + k[7968]; + data[jistart + 7355] = 0.0 - k[8552]*y_cur[IDX_GCH3I] - k[8756]*y_cur[IDX_GCH3I]; + data[jistart + 7356] = 0.0 - k[8554]*y_cur[IDX_GCH3I] - k[8758]*y_cur[IDX_GCH3I]; + data[jistart + 7357] = 0.0 - k[8549]*y_cur[IDX_GCH3I] - k[8755]*y_cur[IDX_GCH3I]; + data[jistart + 7358] = 0.0 + k[7673] + k[7960]; + data[jistart + 7359] = 0.0 - k[8556]*y_cur[IDX_GCH3I] - k[8557]*y_cur[IDX_GCH3I]; + data[jistart + 7360] = 0.0 - k[8550]*y_cur[IDX_GCH3I]; + data[jistart + 7361] = 0.0 + k[7883] + k[8266] - k[8551]*y_cur[IDX_GCH3I] - + k[8754]*y_cur[IDX_GCH3I]; + data[jistart + 7362] = 0.0 + k[7826] - k[8555]*y_cur[IDX_GCH3I]; + data[jistart + 7363] = 0.0 - k[8546]*y_cur[IDX_GCH3I] + k[8573]*y_cur[IDX_GCH3CHOI] - + k[8753]*y_cur[IDX_GCH3I]; + data[jistart + 7364] = 0.0 + k[7699] + k[7702] + k[7997] + k[8002]; + data[jistart + 7365] = 0.0 + k[7663] + k[7664] + k[7950] + k[7951]; + data[jistart + 7366] = 0.0 + k[7881] + k[8264] - k[8545]*y_cur[IDX_GCH3I] + + k[8563]*y_cur[IDX_GCH3CHOI] - k[8752]*y_cur[IDX_GCH3I]; + data[jistart + 7367] = 0.0 + k[7761] + k[7763] + k[8079] + k[8081] + k[8334]*y_cur[IDX_GHI] + + k[8505]*y_cur[IDX_GOHI] - k[8547]*y_cur[IDX_GCH3I] - + k[8548]*y_cur[IDX_GCH3I] + k[8563]*y_cur[IDX_GCH3OI] + + k[8573]*y_cur[IDX_GCH2OHI]; + data[jistart + 7368] = 0.0 - k[8544]*y_cur[IDX_GCH3I]; + data[jistart + 7369] = 0.0 + k[7911] + k[7914] + k[8278]*y_cur[IDX_GHI] + + k[8575]*y_cur[IDX_GC2HI]; + data[jistart + 7370] = 0.0 + k[8575]*y_cur[IDX_GCH4I]; + data[jistart + 7371] = 0.0 - k[8543]*y_cur[IDX_GCH3I] - k[8751]*y_cur[IDX_GCH3I]; + data[jistart + 7372] = 0.0 - k[8474]*y_cur[IDX_GCH3I]; + data[jistart + 7373] = 0.0 + k[8505]*y_cur[IDX_GCH3CHOI] - k[8513]*y_cur[IDX_GCH3I] - + k[8737]*y_cur[IDX_GCH3I]; + data[jistart + 7374] = 0.0 - k[8539]*y_cur[IDX_GCH3I] - k[8750]*y_cur[IDX_GCH3I]; + data[jistart + 7375] = 0.0 + k[8276]*y_cur[IDX_GHI] + k[8370]*y_cur[IDX_GH2I] - + k[8532]*y_cur[IDX_GCH3I] + k[8533]*y_cur[IDX_GHNOI] - + k[8746]*y_cur[IDX_GCH3I]; + data[jistart + 7376] = 0.0 - k[8540]*y_cur[IDX_GCH3I] - k[8749]*y_cur[IDX_GCH3I]; + data[jistart + 7377] = 0.0 - k[8460]*y_cur[IDX_GCH3I] - k[8701]*y_cur[IDX_GCH3I]; + data[jistart + 7378] = 0.0 - k[8441]*y_cur[IDX_GCH3I] - k[8688]*y_cur[IDX_GCH3I]; + data[jistart + 7379] = 0.0 - k[7077] - k[7259] - k[7441] - k[7625] - k[7626] - k[7627] - + k[7628] - k[7629] - k[7902] - k[7903] - k[7904] - k[7905] - k[7906] + - k[8277]*y_cur[IDX_GHI] - k[8371]*y_cur[IDX_GH2I] - + k[8405]*y_cur[IDX_GCI] - k[8441]*y_cur[IDX_GOI] - + k[8460]*y_cur[IDX_GNI] - k[8474]*y_cur[IDX_GSI] - + k[8484]*y_cur[IDX_GCHI] - k[8513]*y_cur[IDX_GOHI] - + k[8532]*y_cur[IDX_GCH2I] - k[8539]*y_cur[IDX_GCOI] - + k[8540]*y_cur[IDX_GCNI] - k[8541]*y_cur[IDX_GHNOI] - + k[8542]*y_cur[IDX_GCH3I] - k[8542]*y_cur[IDX_GCH3I] - + k[8542]*y_cur[IDX_GCH3I] - k[8542]*y_cur[IDX_GCH3I] - + k[8543]*y_cur[IDX_GHCOI] - k[8544]*y_cur[IDX_GH2COI] - + k[8545]*y_cur[IDX_GCH3OI] - k[8546]*y_cur[IDX_GCH2OHI] - + k[8547]*y_cur[IDX_GCH3CHOI] - k[8548]*y_cur[IDX_GCH3CHOI] - + k[8549]*y_cur[IDX_GCOOHI] - k[8550]*y_cur[IDX_GHCOOHI] - + k[8551]*y_cur[IDX_GCH3COI] - k[8552]*y_cur[IDX_GC3NI] - + k[8553]*y_cur[IDX_GC5NI] - k[8554]*y_cur[IDX_GC7NI] - + k[8555]*y_cur[IDX_GHCOOCH3I] - k[8556]*y_cur[IDX_GCH2OHCHOI] - + k[8557]*y_cur[IDX_GCH2OHCHOI] - k[8579]*y_cur[IDX_GHI] - + k[8660]*y_cur[IDX_GCI] - k[8688]*y_cur[IDX_GOI] - + k[8701]*y_cur[IDX_GNI] - k[8718]*y_cur[IDX_GCHI] - + k[8737]*y_cur[IDX_GOHI] - k[8746]*y_cur[IDX_GCH2I] - + k[8748]*y_cur[IDX_GCH3I] - k[8748]*y_cur[IDX_GCH3I] - + k[8748]*y_cur[IDX_GCH3I] - k[8748]*y_cur[IDX_GCH3I] - + k[8749]*y_cur[IDX_GCNI] - k[8750]*y_cur[IDX_GCOI] - + k[8751]*y_cur[IDX_GHCOI] - k[8752]*y_cur[IDX_GCH3OI] - + k[8753]*y_cur[IDX_GCH2OHI] - k[8754]*y_cur[IDX_GCH3COI] - + k[8755]*y_cur[IDX_GCOOHI] - k[8756]*y_cur[IDX_GC3NI] - + k[8757]*y_cur[IDX_GC5NI] - k[8758]*y_cur[IDX_GC7NI]; + data[jistart + 7380] = 0.0 - k[8484]*y_cur[IDX_GCH3I] - k[8718]*y_cur[IDX_GCH3I]; + data[jistart + 7381] = 0.0 + k[8370]*y_cur[IDX_GCH2I] - k[8371]*y_cur[IDX_GCH3I]; + data[jistart + 7382] = 0.0 - k[8405]*y_cur[IDX_GCH3I] - k[8660]*y_cur[IDX_GCH3I]; + data[jistart + 7383] = 0.0 + k[8276]*y_cur[IDX_GCH2I] - k[8277]*y_cur[IDX_GCH3I] + + k[8278]*y_cur[IDX_GCH4I] + k[8334]*y_cur[IDX_GCH3CHOI] - + k[8579]*y_cur[IDX_GCH3I]; + data[jistart + 7384] = 0.0 + k[6895]; + data[jistart + 7385] = 0.0 + k[3282]*y_cur[IDX_HeII]; + data[jistart + 7386] = 0.0 + k[2348]*y_cur[IDX_HII]; + data[jistart + 7387] = 0.0 + k[2317]*y_cur[IDX_HII]; + data[jistart + 7388] = 0.0 + k[3622]*y_cur[IDX_NHI]; + data[jistart + 7389] = 0.0 + k[3615]*y_cur[IDX_NHI]; + data[jistart + 7390] = 0.0 + k[586]*y_cur[IDX_NH2I]; + data[jistart + 7391] = 0.0 + k[589]*y_cur[IDX_NH2I]; + data[jistart + 7392] = 0.0 + k[3613]*y_cur[IDX_NHI]; + data[jistart + 7393] = 0.0 + k[585]*y_cur[IDX_NH2I]; + data[jistart + 7394] = 0.0 + k[2462]*y_cur[IDX_H2I] + k[3492]*y_cur[IDX_H2OI] + + k[3499]*y_cur[IDX_NHI]; + data[jistart + 7395] = 0.0 + k[451]*y_cur[IDX_NH2I] + k[2393]*y_cur[IDX_NHI]; + data[jistart + 7396] = 0.0 - k[265]*y_cur[IDX_CH2I] - k[294]*y_cur[IDX_CHI] - + k[580]*y_cur[IDX_H2SI] - k[581]*y_cur[IDX_HCOI] - + k[582]*y_cur[IDX_NH3I] - k[583]*y_cur[IDX_NOI] - + k[584]*y_cur[IDX_SI] - k[1159]*y_cur[IDX_eM] - k[1160]*y_cur[IDX_eM] + - k[2012]*y_cur[IDX_CH2I] - k[2259]*y_cur[IDX_CHI] - + k[2463]*y_cur[IDX_H2I] - k[3464]*y_cur[IDX_NI] - + k[3507]*y_cur[IDX_C2I] - k[3508]*y_cur[IDX_C2HI] - + k[3509]*y_cur[IDX_CNI] - k[3510]*y_cur[IDX_H2COI] - + k[3511]*y_cur[IDX_H2COI] - k[3512]*y_cur[IDX_H2OI] - + k[3513]*y_cur[IDX_H2OI] - k[3514]*y_cur[IDX_H2OI] - + k[3515]*y_cur[IDX_H2SI] - k[3516]*y_cur[IDX_H2SI] - + k[3517]*y_cur[IDX_H2SI] - k[3518]*y_cur[IDX_H2SI] - + k[3519]*y_cur[IDX_HCNI] - k[3520]*y_cur[IDX_HCOI] - + k[3521]*y_cur[IDX_HNCI] - k[3522]*y_cur[IDX_NH2I] - + k[3523]*y_cur[IDX_NH3I] - k[3524]*y_cur[IDX_O2I] - + k[3525]*y_cur[IDX_O2I] - k[3526]*y_cur[IDX_SI] - + k[3527]*y_cur[IDX_SI] - k[3617]*y_cur[IDX_NHI] - + k[3746]*y_cur[IDX_OI] - k[6324]*y_cur[IDX_GRAINM] - + k[6325]*y_cur[IDX_GRAINM]; + data[jistart + 7397] = 0.0 + k[587]*y_cur[IDX_NH2I]; + data[jistart + 7398] = 0.0 + k[3609]*y_cur[IDX_NHI]; + data[jistart + 7399] = 0.0 + k[400]*y_cur[IDX_HII] + k[451]*y_cur[IDX_H2II] + + k[557]*y_cur[IDX_NII] + k[585]*y_cur[IDX_C2II] + + k[586]*y_cur[IDX_CNII] + k[587]*y_cur[IDX_COII] + + k[588]*y_cur[IDX_H2OII] + k[589]*y_cur[IDX_N2II] + + k[590]*y_cur[IDX_O2II] + k[591]*y_cur[IDX_OHII] + + k[660]*y_cur[IDX_OII] - k[3522]*y_cur[IDX_NH2II] + k[5882] + k[6218]; + data[jistart + 7400] = 0.0 + k[591]*y_cur[IDX_NH2I] + k[3623]*y_cur[IDX_NHI]; + data[jistart + 7401] = 0.0 + k[588]*y_cur[IDX_NH2I]; + data[jistart + 7402] = 0.0 + k[590]*y_cur[IDX_NH2I]; + data[jistart + 7403] = 0.0 + k[2393]*y_cur[IDX_H2II] + k[2724]*y_cur[IDX_H3II] + + k[3499]*y_cur[IDX_NHII] + k[3609]*y_cur[IDX_CH5II] + + k[3613]*y_cur[IDX_HCNII] + k[3614]*y_cur[IDX_HCOII] + + k[3615]*y_cur[IDX_HNOII] + k[3616]*y_cur[IDX_N2HII] - + k[3617]*y_cur[IDX_NH2II] + k[3622]*y_cur[IDX_O2HII] + + k[3623]*y_cur[IDX_OHII]; + data[jistart + 7404] = 0.0 + k[3616]*y_cur[IDX_NHI]; + data[jistart + 7405] = 0.0 + k[557]*y_cur[IDX_NH2I] + k[3354]*y_cur[IDX_NH3I]; + data[jistart + 7406] = 0.0 + k[660]*y_cur[IDX_NH2I]; + data[jistart + 7407] = 0.0 - k[265]*y_cur[IDX_NH2II] - k[2012]*y_cur[IDX_NH2II]; + data[jistart + 7408] = 0.0 - k[3521]*y_cur[IDX_NH2II]; + data[jistart + 7409] = 0.0 - k[3524]*y_cur[IDX_NH2II] - k[3525]*y_cur[IDX_NH2II]; + data[jistart + 7410] = 0.0 - k[580]*y_cur[IDX_NH2II] - k[3515]*y_cur[IDX_NH2II] - + k[3516]*y_cur[IDX_NH2II] - k[3517]*y_cur[IDX_NH2II] - + k[3518]*y_cur[IDX_NH2II]; + data[jistart + 7411] = 0.0 - k[583]*y_cur[IDX_NH2II]; + data[jistart + 7412] = 0.0 - k[581]*y_cur[IDX_NH2II] - k[3520]*y_cur[IDX_NH2II]; + data[jistart + 7413] = 0.0 - k[3508]*y_cur[IDX_NH2II]; + data[jistart + 7414] = 0.0 - k[3510]*y_cur[IDX_NH2II] - k[3511]*y_cur[IDX_NH2II]; + data[jistart + 7415] = 0.0 - k[3519]*y_cur[IDX_NH2II]; + data[jistart + 7416] = 0.0 - k[294]*y_cur[IDX_NH2II] - k[2259]*y_cur[IDX_NH2II]; + data[jistart + 7417] = 0.0 - k[584]*y_cur[IDX_NH2II] - k[3526]*y_cur[IDX_NH2II] - + k[3527]*y_cur[IDX_NH2II]; + data[jistart + 7418] = 0.0 - k[3507]*y_cur[IDX_NH2II]; + data[jistart + 7419] = 0.0 - k[582]*y_cur[IDX_NH2II] + k[3284]*y_cur[IDX_HeII] + + k[3354]*y_cur[IDX_NII] - k[3523]*y_cur[IDX_NH2II]; + data[jistart + 7420] = 0.0 - k[3509]*y_cur[IDX_NH2II]; + data[jistart + 7421] = 0.0 - k[3464]*y_cur[IDX_NH2II]; + data[jistart + 7422] = 0.0 - k[3746]*y_cur[IDX_NH2II]; + data[jistart + 7423] = 0.0 + k[3282]*y_cur[IDX_NH2CNI] + k[3284]*y_cur[IDX_NH3I]; + data[jistart + 7424] = 0.0 + k[3492]*y_cur[IDX_NHII] - k[3512]*y_cur[IDX_NH2II] - + k[3513]*y_cur[IDX_NH2II] - k[3514]*y_cur[IDX_NH2II]; + data[jistart + 7425] = 0.0 + k[400]*y_cur[IDX_NH2I] + k[2317]*y_cur[IDX_CH2NHI] + + k[2348]*y_cur[IDX_HNCOI]; + data[jistart + 7426] = 0.0 + k[3614]*y_cur[IDX_NHI]; + data[jistart + 7427] = 0.0 + k[2724]*y_cur[IDX_NHI]; + data[jistart + 7428] = 0.0 - k[6324]*y_cur[IDX_NH2II] - k[6325]*y_cur[IDX_NH2II]; + data[jistart + 7429] = 0.0 + k[2462]*y_cur[IDX_NHII] - k[2463]*y_cur[IDX_NH2II]; + data[jistart + 7430] = 0.0 - k[1159]*y_cur[IDX_NH2II] - k[1160]*y_cur[IDX_NH2II]; + data[jistart + 7431] = 0.0 + k[1189]*y_cur[IDX_eM] + k[6691]*y_cur[IDX_GRAINM]; + data[jistart + 7432] = 0.0 + k[1211]*y_cur[IDX_eM] + k[6560]*y_cur[IDX_GRAINM]; + data[jistart + 7433] = 0.0 + k[1215]*y_cur[IDX_eM] + k[6617]*y_cur[IDX_GRAINM]; + data[jistart + 7434] = 0.0 + k[7110] + k[7292] + k[7474]; + data[jistart + 7435] = 0.0 + k[1201]*y_cur[IDX_eM] + k[6580]*y_cur[IDX_GRAINM]; + data[jistart + 7436] = 0.0 + k[1212]*y_cur[IDX_eM] + k[6593]*y_cur[IDX_GRAINM]; + data[jistart + 7437] = 0.0 + k[1132]*y_cur[IDX_eM] + k[6571]*y_cur[IDX_GRAINM]; + data[jistart + 7438] = 0.0 + k[1204]*y_cur[IDX_eM] + k[6598]*y_cur[IDX_GRAINM]; + data[jistart + 7439] = 0.0 + k[903]*y_cur[IDX_eM] + k[6663]*y_cur[IDX_GRAINM]; + data[jistart + 7440] = 0.0 + k[1183]*y_cur[IDX_eM] + k[6682]*y_cur[IDX_GRAINM]; + data[jistart + 7441] = 0.0 + k[984]*y_cur[IDX_eM] + k[6511]*y_cur[IDX_GRAINM]; + data[jistart + 7442] = 0.0 + k[1106]*y_cur[IDX_eM] + k[6544]*y_cur[IDX_GRAINM]; + data[jistart + 7443] = 0.0 + k[1135]*y_cur[IDX_eM] + k[6612]*y_cur[IDX_GRAINM]; + data[jistart + 7444] = 0.0 + k[1218]*y_cur[IDX_eM] + k[6600]*y_cur[IDX_GRAINM]; + data[jistart + 7445] = 0.0 + k[5286]*y_cur[IDX_NI] + k[5909] + k[6250]; + data[jistart + 7446] = 0.0 + k[1321]*y_cur[IDX_CII]; + data[jistart + 7447] = 0.0 + k[1315]*y_cur[IDX_CII] + k[3101]*y_cur[IDX_HeII]; + data[jistart + 7448] = 0.0 + k[1206]*y_cur[IDX_eM] + k[1207]*y_cur[IDX_eM] + + k[6434]*y_cur[IDX_GRAINM] + k[6435]*y_cur[IDX_GRAINM]; + data[jistart + 7449] = 0.0 + k[5287]*y_cur[IDX_NI] + k[5910] + k[6251]; + data[jistart + 7450] = 0.0 + k[5773] + k[6070]; + data[jistart + 7451] = 0.0 + k[3213]*y_cur[IDX_HeII] + k[5391]*y_cur[IDX_OI] + k[5827] + + k[6139]; + data[jistart + 7452] = 0.0 + k[5908] + k[6249]; + data[jistart + 7453] = 0.0 + k[1205]*y_cur[IDX_eM] + k[2566]*y_cur[IDX_H2OI] + + k[2884]*y_cur[IDX_HCNI] + k[3596]*y_cur[IDX_NH3I] + + k[3817]*y_cur[IDX_H2SI] + k[6433]*y_cur[IDX_GRAINM]; + data[jistart + 7454] = 0.0 + k[613]*y_cur[IDX_NH3I] + k[701]*y_cur[IDX_H2SI] + + k[723]*y_cur[IDX_SiI] + k[5624]*y_cur[IDX_eM] + + k[6421]*y_cur[IDX_GRAINM]; + data[jistart + 7455] = 0.0 - k[190]*y_cur[IDX_CII] - k[409]*y_cur[IDX_HII] - + k[526]*y_cur[IDX_HeII] - k[1526]*y_cur[IDX_C2H2II] - + k[2094]*y_cur[IDX_CH3II] - k[2734]*y_cur[IDX_H3II] - + k[2815]*y_cur[IDX_H3OII] - k[2983]*y_cur[IDX_HCOII] - + k[3814]*y_cur[IDX_C3H2II] - k[3815]*y_cur[IDX_C4H2II] - + k[5484]*y_cur[IDX_O2I] - k[5527]*y_cur[IDX_CI] - k[5906] - k[6246] - + k[6928]; + data[jistart + 7456] = 0.0 - k[3814]*y_cur[IDX_PI]; + data[jistart + 7457] = 0.0 - k[3815]*y_cur[IDX_PI]; + data[jistart + 7458] = 0.0 - k[5484]*y_cur[IDX_PI]; + data[jistart + 7459] = 0.0 + k[701]*y_cur[IDX_PII] + k[3817]*y_cur[IDX_PHII]; + data[jistart + 7460] = 0.0 + k[723]*y_cur[IDX_PII]; + data[jistart + 7461] = 0.0 + k[2884]*y_cur[IDX_PHII]; + data[jistart + 7462] = 0.0 + k[613]*y_cur[IDX_PII] + k[3596]*y_cur[IDX_PHII]; + data[jistart + 7463] = 0.0 - k[1526]*y_cur[IDX_PI]; + data[jistart + 7464] = 0.0 - k[2094]*y_cur[IDX_PI]; + data[jistart + 7465] = 0.0 + k[5286]*y_cur[IDX_PNI] + k[5287]*y_cur[IDX_POI]; + data[jistart + 7466] = 0.0 - k[2815]*y_cur[IDX_PI]; + data[jistart + 7467] = 0.0 + k[5391]*y_cur[IDX_CPI]; + data[jistart + 7468] = 0.0 - k[526]*y_cur[IDX_PI] + k[3101]*y_cur[IDX_C3PI] + + k[3213]*y_cur[IDX_CPI]; + data[jistart + 7469] = 0.0 - k[190]*y_cur[IDX_PI] + k[1315]*y_cur[IDX_C3PI] + + k[1321]*y_cur[IDX_C4PI]; + data[jistart + 7470] = 0.0 + k[2566]*y_cur[IDX_PHII]; + data[jistart + 7471] = 0.0 - k[409]*y_cur[IDX_PI]; + data[jistart + 7472] = 0.0 - k[5527]*y_cur[IDX_PI]; + data[jistart + 7473] = 0.0 - k[2983]*y_cur[IDX_PI]; + data[jistart + 7474] = 0.0 - k[2734]*y_cur[IDX_PI]; + data[jistart + 7475] = 0.0 + k[6421]*y_cur[IDX_PII] + k[6433]*y_cur[IDX_PHII] + + k[6434]*y_cur[IDX_PH2II] + k[6435]*y_cur[IDX_PH2II] + + k[6511]*y_cur[IDX_CPII] + k[6544]*y_cur[IDX_HCPII] + + k[6560]*y_cur[IDX_PNII] + k[6571]*y_cur[IDX_HPNII] + + k[6580]*y_cur[IDX_PCH3II] + k[6593]*y_cur[IDX_PNH2II] + + k[6598]*y_cur[IDX_PCH4II] + k[6600]*y_cur[IDX_POII] + + k[6612]*y_cur[IDX_HPOII] + k[6617]*y_cur[IDX_PNH3II] + + k[6663]*y_cur[IDX_CCPII] + k[6682]*y_cur[IDX_PC2H2II] + + k[6691]*y_cur[IDX_PC2H4II]; + data[jistart + 7476] = 0.0 + k[903]*y_cur[IDX_CCPII] + k[984]*y_cur[IDX_CPII] + + k[1106]*y_cur[IDX_HCPII] + k[1132]*y_cur[IDX_HPNII] + + k[1135]*y_cur[IDX_HPOII] + k[1183]*y_cur[IDX_PC2H2II] + + k[1189]*y_cur[IDX_PC2H4II] + k[1201]*y_cur[IDX_PCH3II] + + k[1204]*y_cur[IDX_PCH4II] + k[1205]*y_cur[IDX_PHII] + + k[1206]*y_cur[IDX_PH2II] + k[1207]*y_cur[IDX_PH2II] + + k[1211]*y_cur[IDX_PNII] + k[1212]*y_cur[IDX_PNH2II] + + k[1215]*y_cur[IDX_PNH3II] + k[1218]*y_cur[IDX_POII] + + k[5624]*y_cur[IDX_PII]; + data[jistart + 7477] = 0.0 - k[4837]*y_cur[IDX_SM]; + data[jistart + 7478] = 0.0 - k[4840]*y_cur[IDX_SM]; + data[jistart + 7479] = 0.0 - k[58]*y_cur[IDX_CI] - k[65]*y_cur[IDX_COI] - + k[109]*y_cur[IDX_HI] - k[123]*y_cur[IDX_NI] - k[127]*y_cur[IDX_O2I] + - k[132]*y_cur[IDX_OI] - k[4832]*y_cur[IDX_CII] - + k[4833]*y_cur[IDX_C2H2II] - k[4834]*y_cur[IDX_C2H3II] - + k[4835]*y_cur[IDX_C4H2II] - k[4836]*y_cur[IDX_C4H3II] - + k[4837]*y_cur[IDX_C4SII] - k[4838]*y_cur[IDX_CH2CCHII] - + k[4839]*y_cur[IDX_CH3II] - k[4840]*y_cur[IDX_CNCII] - + k[4841]*y_cur[IDX_FeII] - k[4842]*y_cur[IDX_HII] - + k[4843]*y_cur[IDX_H2COII] - k[4844]*y_cur[IDX_H2SII] - + k[4845]*y_cur[IDX_H3II] - k[4846]*y_cur[IDX_H3OII] - + k[4847]*y_cur[IDX_HC2SII] - k[4848]*y_cur[IDX_HCNHII] - + k[4849]*y_cur[IDX_HCNHII] - k[4850]*y_cur[IDX_HCOII] - + k[4851]*y_cur[IDX_HCOII] - k[4852]*y_cur[IDX_HeII] - + k[4853]*y_cur[IDX_MgII] - k[4854]*y_cur[IDX_NII] - + k[4855]*y_cur[IDX_N2HII] - k[4856]*y_cur[IDX_NH3II] - + k[4857]*y_cur[IDX_NH4II] - k[4858]*y_cur[IDX_NOII] - + k[4859]*y_cur[IDX_NaII] - k[4860]*y_cur[IDX_OII] - + k[4861]*y_cur[IDX_SII] - k[4862]*y_cur[IDX_SOII] - + k[4863]*y_cur[IDX_SiII] - k[4864]*y_cur[IDX_SiOII] - + k[4865]*y_cur[IDX_SiOHII] - k[4866]*y_cur[IDX_SiSII] - k[5911] - + k[6252]; + data[jistart + 7480] = 0.0 - k[4866]*y_cur[IDX_SM]; + data[jistart + 7481] = 0.0 - k[4847]*y_cur[IDX_SM]; + data[jistart + 7482] = 0.0 - k[4864]*y_cur[IDX_SM]; + data[jistart + 7483] = 0.0 - k[4865]*y_cur[IDX_SM]; + data[jistart + 7484] = 0.0 - k[4841]*y_cur[IDX_SM]; + data[jistart + 7485] = 0.0 - k[4853]*y_cur[IDX_SM]; + data[jistart + 7486] = 0.0 - k[4859]*y_cur[IDX_SM]; + data[jistart + 7487] = 0.0 - k[4836]*y_cur[IDX_SM]; + data[jistart + 7488] = 0.0 - k[4855]*y_cur[IDX_SM]; + data[jistart + 7489] = 0.0 - k[4862]*y_cur[IDX_SM]; + data[jistart + 7490] = 0.0 - k[4838]*y_cur[IDX_SM]; + data[jistart + 7491] = 0.0 - k[4844]*y_cur[IDX_SM]; + data[jistart + 7492] = 0.0 - k[4854]*y_cur[IDX_SM]; + data[jistart + 7493] = 0.0 - k[4843]*y_cur[IDX_SM]; + data[jistart + 7494] = 0.0 - k[4858]*y_cur[IDX_SM]; + data[jistart + 7495] = 0.0 - k[4860]*y_cur[IDX_SM]; + data[jistart + 7496] = 0.0 - k[4835]*y_cur[IDX_SM]; + data[jistart + 7497] = 0.0 - k[4848]*y_cur[IDX_SM] - k[4849]*y_cur[IDX_SM]; + data[jistart + 7498] = 0.0 - k[4856]*y_cur[IDX_SM]; + data[jistart + 7499] = 0.0 - k[4857]*y_cur[IDX_SM]; + data[jistart + 7500] = 0.0 - k[127]*y_cur[IDX_SM]; + data[jistart + 7501] = 0.0 - k[4863]*y_cur[IDX_SM]; + data[jistart + 7502] = 0.0 - k[4861]*y_cur[IDX_SM]; + data[jistart + 7503] = 0.0 - k[4834]*y_cur[IDX_SM]; + data[jistart + 7504] = 0.0 + k[5610]*y_cur[IDX_eM]; + data[jistart + 7505] = 0.0 - k[4833]*y_cur[IDX_SM]; + data[jistart + 7506] = 0.0 - k[4839]*y_cur[IDX_SM]; + data[jistart + 7507] = 0.0 - k[123]*y_cur[IDX_SM]; + data[jistart + 7508] = 0.0 - k[4846]*y_cur[IDX_SM]; + data[jistart + 7509] = 0.0 - k[132]*y_cur[IDX_SM]; + data[jistart + 7510] = 0.0 - k[4852]*y_cur[IDX_SM]; + data[jistart + 7511] = 0.0 - k[4832]*y_cur[IDX_SM]; + data[jistart + 7512] = 0.0 - k[4842]*y_cur[IDX_SM]; + data[jistart + 7513] = 0.0 - k[58]*y_cur[IDX_SM]; + data[jistart + 7514] = 0.0 - k[4850]*y_cur[IDX_SM] - k[4851]*y_cur[IDX_SM]; + data[jistart + 7515] = 0.0 - k[4845]*y_cur[IDX_SM]; + data[jistart + 7516] = 0.0 - k[65]*y_cur[IDX_SM]; + data[jistart + 7517] = 0.0 + k[5610]*y_cur[IDX_SI]; + data[jistart + 7518] = 0.0 - k[109]*y_cur[IDX_SM]; + data[jistart + 7519] = 0.0 + k[3885]*y_cur[IDX_SII]; + data[jistart + 7520] = 0.0 - k[4796]*y_cur[IDX_SiSII]; + data[jistart + 7521] = 0.0 - k[4655]*y_cur[IDX_SiSII]; + data[jistart + 7522] = 0.0 + k[3871]*y_cur[IDX_SiII]; + data[jistart + 7523] = 0.0 - k[4866]*y_cur[IDX_SiSII]; + data[jistart + 7524] = 0.0 - k[1269]*y_cur[IDX_eM] - k[2849]*y_cur[IDX_HI] - + k[3675]*y_cur[IDX_O2I] - k[3676]*y_cur[IDX_O2I] - + k[3920]*y_cur[IDX_CM] - k[3955]*y_cur[IDX_C10M] - + k[3990]*y_cur[IDX_C10HM] - k[4025]*y_cur[IDX_C2M] - + k[4060]*y_cur[IDX_C2HM] - k[4095]*y_cur[IDX_C3M] - + k[4130]*y_cur[IDX_C3HM] - k[4165]*y_cur[IDX_C3NM] - + k[4200]*y_cur[IDX_C4M] - k[4235]*y_cur[IDX_C4HM] - + k[4270]*y_cur[IDX_C5M] - k[4305]*y_cur[IDX_C5HM] - + k[4340]*y_cur[IDX_C5NM] - k[4375]*y_cur[IDX_C6M] - + k[4410]*y_cur[IDX_C6HM] - k[4445]*y_cur[IDX_C7M] - + k[4480]*y_cur[IDX_C7HM] - k[4515]*y_cur[IDX_C8M] - + k[4550]*y_cur[IDX_C8HM] - k[4585]*y_cur[IDX_C9M] - + k[4620]*y_cur[IDX_C9HM] - k[4655]*y_cur[IDX_CHM] - + k[4690]*y_cur[IDX_CNM] - k[4726]*y_cur[IDX_HM] - + k[4761]*y_cur[IDX_OM] - k[4796]*y_cur[IDX_O2M] - + k[4831]*y_cur[IDX_OHM] - k[4866]*y_cur[IDX_SM] - + k[6710]*y_cur[IDX_GRAINM]; + data[jistart + 7525] = 0.0 - k[4060]*y_cur[IDX_SiSII]; + data[jistart + 7526] = 0.0 - k[4235]*y_cur[IDX_SiSII]; + data[jistart + 7527] = 0.0 - k[4831]*y_cur[IDX_SiSII]; + data[jistart + 7528] = 0.0 - k[3990]*y_cur[IDX_SiSII]; + data[jistart + 7529] = 0.0 - k[4130]*y_cur[IDX_SiSII]; + data[jistart + 7530] = 0.0 - k[4410]*y_cur[IDX_SiSII]; + data[jistart + 7531] = 0.0 - k[4550]*y_cur[IDX_SiSII]; + data[jistart + 7532] = 0.0 - k[4480]*y_cur[IDX_SiSII]; + data[jistart + 7533] = 0.0 - k[4620]*y_cur[IDX_SiSII]; + data[jistart + 7534] = 0.0 - k[3955]*y_cur[IDX_SiSII]; + data[jistart + 7535] = 0.0 - k[4305]*y_cur[IDX_SiSII]; + data[jistart + 7536] = 0.0 - k[4340]*y_cur[IDX_SiSII]; + data[jistart + 7537] = 0.0 - k[3920]*y_cur[IDX_SiSII]; + data[jistart + 7538] = 0.0 - k[4761]*y_cur[IDX_SiSII]; + data[jistart + 7539] = 0.0 - k[4585]*y_cur[IDX_SiSII]; + data[jistart + 7540] = 0.0 - k[4726]*y_cur[IDX_SiSII]; + data[jistart + 7541] = 0.0 + k[204]*y_cur[IDX_CII] + k[435]*y_cur[IDX_HII] + + k[706]*y_cur[IDX_SII]; + data[jistart + 7542] = 0.0 - k[4515]*y_cur[IDX_SiSII]; + data[jistart + 7543] = 0.0 - k[4025]*y_cur[IDX_SiSII]; + data[jistart + 7544] = 0.0 - k[4095]*y_cur[IDX_SiSII]; + data[jistart + 7545] = 0.0 - k[4200]*y_cur[IDX_SiSII]; + data[jistart + 7546] = 0.0 - k[4375]*y_cur[IDX_SiSII]; + data[jistart + 7547] = 0.0 - k[4270]*y_cur[IDX_SiSII]; + data[jistart + 7548] = 0.0 - k[4445]*y_cur[IDX_SiSII]; + data[jistart + 7549] = 0.0 - k[4165]*y_cur[IDX_SiSII]; + data[jistart + 7550] = 0.0 - k[4690]*y_cur[IDX_SiSII]; + data[jistart + 7551] = 0.0 - k[3675]*y_cur[IDX_SiSII] - k[3676]*y_cur[IDX_SiSII]; + data[jistart + 7552] = 0.0 + k[3871]*y_cur[IDX_OCSI]; + data[jistart + 7553] = 0.0 + k[706]*y_cur[IDX_SiSI] + k[3885]*y_cur[IDX_SiHI]; + data[jistart + 7554] = 0.0 + k[204]*y_cur[IDX_SiSI]; + data[jistart + 7555] = 0.0 + k[435]*y_cur[IDX_SiSI]; + data[jistart + 7556] = 0.0 - k[6710]*y_cur[IDX_SiSII]; + data[jistart + 7557] = 0.0 - k[1269]*y_cur[IDX_SiSII]; + data[jistart + 7558] = 0.0 - k[2849]*y_cur[IDX_SiSII]; + data[jistart + 7559] = 0.0 - k[4031]*y_cur[IDX_C2HM]; + data[jistart + 7560] = 0.0 - k[4034]*y_cur[IDX_C2HM]; + data[jistart + 7561] = 0.0 - k[4060]*y_cur[IDX_C2HM]; + data[jistart + 7562] = 0.0 - k[39]*y_cur[IDX_CI] - k[88]*y_cur[IDX_HI] - + k[111]*y_cur[IDX_NI] - k[129]*y_cur[IDX_OI] - k[3687]*y_cur[IDX_OI] + - k[4026]*y_cur[IDX_CII] - k[4027]*y_cur[IDX_C2H2II] - + k[4028]*y_cur[IDX_C2H3II] - k[4029]*y_cur[IDX_C4H2II] - + k[4030]*y_cur[IDX_C4H3II] - k[4031]*y_cur[IDX_C4SII] - + k[4032]*y_cur[IDX_CH2CCHII] - k[4033]*y_cur[IDX_CH3II] - + k[4034]*y_cur[IDX_CNCII] - k[4035]*y_cur[IDX_FeII] - + k[4036]*y_cur[IDX_HII] - k[4037]*y_cur[IDX_H2COII] - + k[4038]*y_cur[IDX_H2SII] - k[4039]*y_cur[IDX_H3II] - + k[4040]*y_cur[IDX_H3OII] - k[4041]*y_cur[IDX_HC2SII] - + k[4042]*y_cur[IDX_HCNHII] - k[4043]*y_cur[IDX_HCNHII] - + k[4044]*y_cur[IDX_HCOII] - k[4045]*y_cur[IDX_HCOII] - + k[4046]*y_cur[IDX_HeII] - k[4047]*y_cur[IDX_MgII] - + k[4048]*y_cur[IDX_NII] - k[4049]*y_cur[IDX_N2HII] - + k[4050]*y_cur[IDX_NH3II] - k[4051]*y_cur[IDX_NH4II] - + k[4052]*y_cur[IDX_NOII] - k[4053]*y_cur[IDX_NaII] - + k[4054]*y_cur[IDX_OII] - k[4055]*y_cur[IDX_SII] - + k[4056]*y_cur[IDX_SOII] - k[4057]*y_cur[IDX_SiII] - + k[4058]*y_cur[IDX_SiOII] - k[4059]*y_cur[IDX_SiOHII] - + k[4060]*y_cur[IDX_SiSII] - k[5695] - k[5980]; + data[jistart + 7563] = 0.0 - k[4041]*y_cur[IDX_C2HM]; + data[jistart + 7564] = 0.0 + k[3396]*y_cur[IDX_NI] + k[3694]*y_cur[IDX_OI]; + data[jistart + 7565] = 0.0 + k[2366]*y_cur[IDX_C2H2I]; + data[jistart + 7566] = 0.0 - k[4058]*y_cur[IDX_C2HM]; + data[jistart + 7567] = 0.0 - k[4059]*y_cur[IDX_C2HM]; + data[jistart + 7568] = 0.0 - k[4035]*y_cur[IDX_C2HM]; + data[jistart + 7569] = 0.0 - k[4047]*y_cur[IDX_C2HM]; + data[jistart + 7570] = 0.0 - k[4053]*y_cur[IDX_C2HM]; + data[jistart + 7571] = 0.0 - k[4030]*y_cur[IDX_C2HM]; + data[jistart + 7572] = 0.0 - k[4049]*y_cur[IDX_C2HM]; + data[jistart + 7573] = 0.0 - k[4056]*y_cur[IDX_C2HM]; + data[jistart + 7574] = 0.0 - k[4032]*y_cur[IDX_C2HM]; + data[jistart + 7575] = 0.0 - k[4038]*y_cur[IDX_C2HM]; + data[jistart + 7576] = 0.0 - k[4048]*y_cur[IDX_C2HM]; + data[jistart + 7577] = 0.0 - k[4037]*y_cur[IDX_C2HM]; + data[jistart + 7578] = 0.0 - k[4052]*y_cur[IDX_C2HM]; + data[jistart + 7579] = 0.0 - k[4054]*y_cur[IDX_C2HM]; + data[jistart + 7580] = 0.0 - k[4029]*y_cur[IDX_C2HM]; + data[jistart + 7581] = 0.0 - k[4042]*y_cur[IDX_C2HM] - k[4043]*y_cur[IDX_C2HM]; + data[jistart + 7582] = 0.0 - k[4050]*y_cur[IDX_C2HM]; + data[jistart + 7583] = 0.0 - k[4051]*y_cur[IDX_C2HM]; + data[jistart + 7584] = 0.0 - k[4057]*y_cur[IDX_C2HM]; + data[jistart + 7585] = 0.0 - k[4055]*y_cur[IDX_C2HM]; + data[jistart + 7586] = 0.0 - k[4028]*y_cur[IDX_C2HM]; + data[jistart + 7587] = 0.0 + k[5590]*y_cur[IDX_eM]; + data[jistart + 7588] = 0.0 - k[4027]*y_cur[IDX_C2HM]; + data[jistart + 7589] = 0.0 - k[4033]*y_cur[IDX_C2HM]; + data[jistart + 7590] = 0.0 + k[2366]*y_cur[IDX_HM]; + data[jistart + 7591] = 0.0 - k[111]*y_cur[IDX_C2HM] + k[3396]*y_cur[IDX_C3HM]; + data[jistart + 7592] = 0.0 - k[4040]*y_cur[IDX_C2HM]; + data[jistart + 7593] = 0.0 - k[129]*y_cur[IDX_C2HM] - k[3687]*y_cur[IDX_C2HM] + + k[3694]*y_cur[IDX_C3HM]; + data[jistart + 7594] = 0.0 - k[4046]*y_cur[IDX_C2HM]; + data[jistart + 7595] = 0.0 - k[4026]*y_cur[IDX_C2HM]; + data[jistart + 7596] = 0.0 - k[4036]*y_cur[IDX_C2HM]; + data[jistart + 7597] = 0.0 - k[39]*y_cur[IDX_C2HM]; + data[jistart + 7598] = 0.0 - k[4044]*y_cur[IDX_C2HM] - k[4045]*y_cur[IDX_C2HM]; + data[jistart + 7599] = 0.0 - k[4039]*y_cur[IDX_C2HM]; + data[jistart + 7600] = 0.0 + k[5590]*y_cur[IDX_C2HI]; + data[jistart + 7601] = 0.0 - k[88]*y_cur[IDX_C2HM]; + data[jistart + 7602] = 0.0 - k[4206]*y_cur[IDX_C4HM]; + data[jistart + 7603] = 0.0 - k[4209]*y_cur[IDX_C4HM]; + data[jistart + 7604] = 0.0 - k[4235]*y_cur[IDX_C4HM]; + data[jistart + 7605] = 0.0 - k[44]*y_cur[IDX_CI] - k[93]*y_cur[IDX_HI] - + k[115]*y_cur[IDX_NI] - k[3404]*y_cur[IDX_NI] - k[3700]*y_cur[IDX_OI] + - k[4201]*y_cur[IDX_CII] - k[4202]*y_cur[IDX_C2H2II] - + k[4203]*y_cur[IDX_C2H3II] - k[4204]*y_cur[IDX_C4H2II] - + k[4205]*y_cur[IDX_C4H3II] - k[4206]*y_cur[IDX_C4SII] - + k[4207]*y_cur[IDX_CH2CCHII] - k[4208]*y_cur[IDX_CH3II] - + k[4209]*y_cur[IDX_CNCII] - k[4210]*y_cur[IDX_FeII] - + k[4211]*y_cur[IDX_HII] - k[4212]*y_cur[IDX_H2COII] - + k[4213]*y_cur[IDX_H2SII] - k[4214]*y_cur[IDX_H3II] - + k[4215]*y_cur[IDX_H3OII] - k[4216]*y_cur[IDX_HC2SII] - + k[4217]*y_cur[IDX_HCNHII] - k[4218]*y_cur[IDX_HCNHII] - + k[4219]*y_cur[IDX_HCOII] - k[4220]*y_cur[IDX_HCOII] - + k[4221]*y_cur[IDX_HeII] - k[4222]*y_cur[IDX_MgII] - + k[4223]*y_cur[IDX_NII] - k[4224]*y_cur[IDX_N2HII] - + k[4225]*y_cur[IDX_NH3II] - k[4226]*y_cur[IDX_NH4II] - + k[4227]*y_cur[IDX_NOII] - k[4228]*y_cur[IDX_NaII] - + k[4229]*y_cur[IDX_OII] - k[4230]*y_cur[IDX_SII] - + k[4231]*y_cur[IDX_SOII] - k[4232]*y_cur[IDX_SiII] - + k[4233]*y_cur[IDX_SiOII] - k[4234]*y_cur[IDX_SiOHII] - + k[4235]*y_cur[IDX_SiSII] - k[5729] - k[6013]; + data[jistart + 7606] = 0.0 - k[4216]*y_cur[IDX_C4HM]; + data[jistart + 7607] = 0.0 + k[3414]*y_cur[IDX_NI] + k[3705]*y_cur[IDX_OI]; + data[jistart + 7608] = 0.0 - k[4233]*y_cur[IDX_C4HM]; + data[jistart + 7609] = 0.0 - k[4234]*y_cur[IDX_C4HM]; + data[jistart + 7610] = 0.0 - k[4210]*y_cur[IDX_C4HM]; + data[jistart + 7611] = 0.0 - k[4222]*y_cur[IDX_C4HM]; + data[jistart + 7612] = 0.0 - k[4228]*y_cur[IDX_C4HM]; + data[jistart + 7613] = 0.0 - k[4205]*y_cur[IDX_C4HM]; + data[jistart + 7614] = 0.0 - k[4224]*y_cur[IDX_C4HM]; + data[jistart + 7615] = 0.0 - k[4231]*y_cur[IDX_C4HM]; + data[jistart + 7616] = 0.0 - k[4207]*y_cur[IDX_C4HM]; + data[jistart + 7617] = 0.0 - k[4213]*y_cur[IDX_C4HM]; + data[jistart + 7618] = 0.0 - k[4223]*y_cur[IDX_C4HM]; + data[jistart + 7619] = 0.0 - k[4212]*y_cur[IDX_C4HM]; + data[jistart + 7620] = 0.0 + k[5595]*y_cur[IDX_eM]; + data[jistart + 7621] = 0.0 - k[4227]*y_cur[IDX_C4HM]; + data[jistart + 7622] = 0.0 - k[4229]*y_cur[IDX_C4HM]; + data[jistart + 7623] = 0.0 - k[4204]*y_cur[IDX_C4HM]; + data[jistart + 7624] = 0.0 - k[4217]*y_cur[IDX_C4HM] - k[4218]*y_cur[IDX_C4HM]; + data[jistart + 7625] = 0.0 - k[4225]*y_cur[IDX_C4HM]; + data[jistart + 7626] = 0.0 - k[4226]*y_cur[IDX_C4HM]; + data[jistart + 7627] = 0.0 - k[4232]*y_cur[IDX_C4HM]; + data[jistart + 7628] = 0.0 - k[4230]*y_cur[IDX_C4HM]; + data[jistart + 7629] = 0.0 - k[4203]*y_cur[IDX_C4HM]; + data[jistart + 7630] = 0.0 - k[4202]*y_cur[IDX_C4HM]; + data[jistart + 7631] = 0.0 - k[4208]*y_cur[IDX_C4HM]; + data[jistart + 7632] = 0.0 - k[115]*y_cur[IDX_C4HM] - k[3404]*y_cur[IDX_C4HM] + + k[3414]*y_cur[IDX_C5HM]; + data[jistart + 7633] = 0.0 - k[4215]*y_cur[IDX_C4HM]; + data[jistart + 7634] = 0.0 - k[3700]*y_cur[IDX_C4HM] + k[3705]*y_cur[IDX_C5HM]; + data[jistart + 7635] = 0.0 - k[4221]*y_cur[IDX_C4HM]; + data[jistart + 7636] = 0.0 - k[4201]*y_cur[IDX_C4HM]; + data[jistart + 7637] = 0.0 - k[4211]*y_cur[IDX_C4HM]; + data[jistart + 7638] = 0.0 - k[44]*y_cur[IDX_C4HM]; + data[jistart + 7639] = 0.0 - k[4219]*y_cur[IDX_C4HM] - k[4220]*y_cur[IDX_C4HM]; + data[jistart + 7640] = 0.0 - k[4214]*y_cur[IDX_C4HM]; + data[jistart + 7641] = 0.0 + k[5595]*y_cur[IDX_C4HI]; + data[jistart + 7642] = 0.0 - k[93]*y_cur[IDX_C4HM]; + data[jistart + 7643] = 0.0 + k[5653]*y_cur[IDX_HeII]; + data[jistart + 7644] = 0.0 + k[5660]*y_cur[IDX_HeII]; + data[jistart + 7645] = 0.0 + k[1386]*y_cur[IDX_CII]; + data[jistart + 7646] = 0.0 + k[5643]*y_cur[IDX_HeII]; + data[jistart + 7647] = 0.0 + k[5647]*y_cur[IDX_HeII]; + data[jistart + 7648] = 0.0 - k[2282]*y_cur[IDX_COII]; + data[jistart + 7649] = 0.0 + k[3171]*y_cur[IDX_HeII]; + data[jistart + 7650] = 0.0 + k[1424]*y_cur[IDX_CII]; + data[jistart + 7651] = 0.0 + k[3732]*y_cur[IDX_OI]; + data[jistart + 7652] = 0.0 + k[299]*y_cur[IDX_COI]; + data[jistart + 7653] = 0.0 + k[316]*y_cur[IDX_COI]; + data[jistart + 7654] = 0.0 + k[1455]*y_cur[IDX_O2I] + k[3684]*y_cur[IDX_OI]; + data[jistart + 7655] = 0.0 + k[445]*y_cur[IDX_COI]; + data[jistart + 7656] = 0.0 + k[3296]*y_cur[IDX_HeII]; + data[jistart + 7657] = 0.0 - k[209]*y_cur[IDX_C2I] - k[242]*y_cur[IDX_C2HI] - + k[246]*y_cur[IDX_CI] - k[261]*y_cur[IDX_CH2I] - + k[285]*y_cur[IDX_CH4I] - k[289]*y_cur[IDX_CHI] - + k[307]*y_cur[IDX_CO2I] - k[308]*y_cur[IDX_H2COI] - + k[309]*y_cur[IDX_H2SI] - k[310]*y_cur[IDX_HCOI] - + k[311]*y_cur[IDX_NOI] - k[312]*y_cur[IDX_O2I] - k[313]*y_cur[IDX_SI] + - k[478]*y_cur[IDX_H2OI] - k[488]*y_cur[IDX_HI] - + k[497]*y_cur[IDX_HCNI] - k[587]*y_cur[IDX_NH2I] - + k[602]*y_cur[IDX_NH3I] - k[617]*y_cur[IDX_NHI] - + k[682]*y_cur[IDX_OI] - k[699]*y_cur[IDX_OHI] - k[980]*y_cur[IDX_eM] + - k[1743]*y_cur[IDX_C2HI] - k[2001]*y_cur[IDX_CH2I] - + k[2189]*y_cur[IDX_CH4I] - k[2190]*y_cur[IDX_CH4I] - + k[2245]*y_cur[IDX_CHI] - k[2280]*y_cur[IDX_H2COI] - + k[2281]*y_cur[IDX_H2SI] - k[2282]*y_cur[IDX_SO2I] - + k[2434]*y_cur[IDX_H2I] - k[2435]*y_cur[IDX_H2I] - + k[2540]*y_cur[IDX_H2OI] - k[3534]*y_cur[IDX_NH2I] - + k[3573]*y_cur[IDX_NH3I] - k[3610]*y_cur[IDX_NHI] - + k[3798]*y_cur[IDX_OHI] - k[6136] - k[6373]*y_cur[IDX_GRAINM]; + data[jistart + 7658] = 0.0 - k[587]*y_cur[IDX_COII] - k[3534]*y_cur[IDX_COII]; + data[jistart + 7659] = 0.0 + k[1966]*y_cur[IDX_O2I] + k[1969]*y_cur[IDX_OI] + + k[1972]*y_cur[IDX_OHI]; + data[jistart + 7660] = 0.0 - k[307]*y_cur[IDX_COII] + k[1387]*y_cur[IDX_CII] + + k[3207]*y_cur[IDX_HeII] + k[3343]*y_cur[IDX_NII]; + data[jistart + 7661] = 0.0 + k[1462]*y_cur[IDX_C2I] + k[1912]*y_cur[IDX_CI]; + data[jistart + 7662] = 0.0 - k[617]*y_cur[IDX_COII] - k[3610]*y_cur[IDX_COII]; + data[jistart + 7663] = 0.0 + k[1430]*y_cur[IDX_CII]; + data[jistart + 7664] = 0.0 + k[549]*y_cur[IDX_COI] + k[3343]*y_cur[IDX_CO2I]; + data[jistart + 7665] = 0.0 + k[653]*y_cur[IDX_COI] + k[2261]*y_cur[IDX_CHI] + + k[3631]*y_cur[IDX_C2I] + k[3634]*y_cur[IDX_C2HI] + + k[5525]*y_cur[IDX_CI]; + data[jistart + 7666] = 0.0 - k[261]*y_cur[IDX_COII] - k[2001]*y_cur[IDX_COII]; + data[jistart + 7667] = 0.0 - k[312]*y_cur[IDX_COII] + k[1422]*y_cur[IDX_CII] + + k[1455]*y_cur[IDX_C2II] + k[1966]*y_cur[IDX_CHII]; + data[jistart + 7668] = 0.0 - k[309]*y_cur[IDX_COII] - k[2281]*y_cur[IDX_COII]; + data[jistart + 7669] = 0.0 - k[311]*y_cur[IDX_COII]; + data[jistart + 7670] = 0.0 - k[310]*y_cur[IDX_COII] + k[2344]*y_cur[IDX_HII] + + k[3249]*y_cur[IDX_HeII]; + data[jistart + 7671] = 0.0 - k[285]*y_cur[IDX_COII] - k[2189]*y_cur[IDX_COII] - + k[2190]*y_cur[IDX_COII]; + data[jistart + 7672] = 0.0 - k[242]*y_cur[IDX_COII] - k[1743]*y_cur[IDX_COII] + + k[3634]*y_cur[IDX_OII]; + data[jistart + 7673] = 0.0 - k[308]*y_cur[IDX_COII] - k[2280]*y_cur[IDX_COII] + + k[2337]*y_cur[IDX_HII] + k[3219]*y_cur[IDX_HeII]; + data[jistart + 7674] = 0.0 - k[497]*y_cur[IDX_COII]; + data[jistart + 7675] = 0.0 - k[289]*y_cur[IDX_COII] - k[2245]*y_cur[IDX_COII] + + k[2261]*y_cur[IDX_OII]; + data[jistart + 7676] = 0.0 - k[313]*y_cur[IDX_COII]; + data[jistart + 7677] = 0.0 - k[209]*y_cur[IDX_COII] + k[1462]*y_cur[IDX_O2II] + + k[3631]*y_cur[IDX_OII]; + data[jistart + 7678] = 0.0 - k[699]*y_cur[IDX_COII] + k[1426]*y_cur[IDX_CII] + + k[1972]*y_cur[IDX_CHII] - k[3798]*y_cur[IDX_COII]; + data[jistart + 7679] = 0.0 - k[602]*y_cur[IDX_COII] - k[3573]*y_cur[IDX_COII]; + data[jistart + 7680] = 0.0 - k[682]*y_cur[IDX_COII] + k[1969]*y_cur[IDX_CHII] + + k[3684]*y_cur[IDX_C2II] + k[3732]*y_cur[IDX_CSII] + + k[5505]*y_cur[IDX_CII]; + data[jistart + 7681] = 0.0 + k[3171]*y_cur[IDX_CH2COI] + k[3207]*y_cur[IDX_CO2I] + + k[3219]*y_cur[IDX_H2COI] + k[3249]*y_cur[IDX_HCOI] + + k[3296]*y_cur[IDX_OCSI] + k[5643]*y_cur[IDX_CH3COI] + + k[5647]*y_cur[IDX_COOHI] + k[5653]*y_cur[IDX_COOCH3I] + + k[5660]*y_cur[IDX_CH2OHCOI]; + data[jistart + 7682] = 0.0 + k[1386]*y_cur[IDX_CNOI] + k[1387]*y_cur[IDX_CO2I] + + k[1422]*y_cur[IDX_O2I] + k[1424]*y_cur[IDX_OCNI] + + k[1426]*y_cur[IDX_OHI] + k[1430]*y_cur[IDX_SOI] + + k[5505]*y_cur[IDX_OI]; + data[jistart + 7683] = 0.0 - k[478]*y_cur[IDX_COII] - k[2540]*y_cur[IDX_COII]; + data[jistart + 7684] = 0.0 + k[2337]*y_cur[IDX_H2COI] + k[2344]*y_cur[IDX_HCOI]; + data[jistart + 7685] = 0.0 - k[246]*y_cur[IDX_COII] + k[1912]*y_cur[IDX_O2II] + + k[5525]*y_cur[IDX_OII]; + data[jistart + 7686] = 0.0 + k[6183]; + data[jistart + 7687] = 0.0 + k[299]*y_cur[IDX_CNII] + k[316]*y_cur[IDX_N2II] + + k[445]*y_cur[IDX_H2II] + k[549]*y_cur[IDX_NII] + + k[653]*y_cur[IDX_OII] + k[5676]; + data[jistart + 7688] = 0.0 - k[6373]*y_cur[IDX_COII]; + data[jistart + 7689] = 0.0 - k[2434]*y_cur[IDX_COII] - k[2435]*y_cur[IDX_COII]; + data[jistart + 7690] = 0.0 - k[980]*y_cur[IDX_COII]; + data[jistart + 7691] = 0.0 - k[488]*y_cur[IDX_COII]; + data[jistart + 7692] = 0.0 + k[7134] + k[7316] + k[7498]; + data[jistart + 7693] = 0.0 + k[5785] + k[6086]; + data[jistart + 7694] = 0.0 + k[8615]*y_cur[IDX_GHI]; + data[jistart + 7695] = 0.0 + k[828]*y_cur[IDX_eM] + k[6646]*y_cur[IDX_GRAINM]; + data[jistart + 7696] = 0.0 + k[2119]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 7697] = 0.0 + k[8723]*y_cur[IDX_GCHI]; + data[jistart + 7698] = 0.0 + k[806]*y_cur[IDX_eM] + k[6500]*y_cur[IDX_GRAINM]; + data[jistart + 7699] = 0.0 + k[811]*y_cur[IDX_eM] + k[6508]*y_cur[IDX_GRAINM]; + data[jistart + 7700] = 0.0 + k[1814]*y_cur[IDX_C3H5II]; + data[jistart + 7701] = 0.0 - k[1811]*y_cur[IDX_CH3CCHI] - k[1812]*y_cur[IDX_CH3CCHI] - + k[1813]*y_cur[IDX_CH3CCHI]; + data[jistart + 7702] = 0.0 + k[804]*y_cur[IDX_eM] + k[1814]*y_cur[IDX_C6H6I] + + k[1816]*y_cur[IDX_HC3NI] - k[2104]*y_cur[IDX_CH3CCHI] + + k[6483]*y_cur[IDX_GRAINM]; + data[jistart + 7703] = 0.0 - k[2110]*y_cur[IDX_CH3CCHI]; + data[jistart + 7704] = 0.0 - k[2109]*y_cur[IDX_CH3CCHI]; + data[jistart + 7705] = 0.0 + k[4915]*y_cur[IDX_CI]; + data[jistart + 7706] = 0.0 + k[2119]*y_cur[IDX_CH3COCH3II] + k[4898]*y_cur[IDX_C2HI]; + data[jistart + 7707] = 0.0 - k[2105]*y_cur[IDX_CH3CCHI]; + data[jistart + 7708] = 0.0 - k[165]*y_cur[IDX_CII] - k[220]*y_cur[IDX_C2H2II] - + k[365]*y_cur[IDX_HII] - k[1363]*y_cur[IDX_CII] - + k[1364]*y_cur[IDX_CII] - k[1365]*y_cur[IDX_CII] - + k[1366]*y_cur[IDX_CII] - k[1509]*y_cur[IDX_C2H2II] - + k[1510]*y_cur[IDX_C2H2II] - k[1611]*y_cur[IDX_C2H3II] - + k[1612]*y_cur[IDX_C2H3II] - k[1669]*y_cur[IDX_C2H4II] - + k[1777]*y_cur[IDX_C3H2II] - k[1778]*y_cur[IDX_C3H2II] - + k[1779]*y_cur[IDX_C3H2II] - k[1780]*y_cur[IDX_C3H2II] - + k[1781]*y_cur[IDX_C3H2II] - k[1811]*y_cur[IDX_C3H4II] - + k[1812]*y_cur[IDX_C3H4II] - k[1813]*y_cur[IDX_C3H4II] - + k[2104]*y_cur[IDX_C3H5II] - k[2105]*y_cur[IDX_C4HII] - + k[2106]*y_cur[IDX_C4H2II] - k[2107]*y_cur[IDX_C4H2II] - + k[2108]*y_cur[IDX_C4H3II] - k[2109]*y_cur[IDX_C5H2II] - + k[2110]*y_cur[IDX_C6H2II] - k[2325]*y_cur[IDX_HII] - + k[2647]*y_cur[IDX_H3II] - k[2789]*y_cur[IDX_H3OII] - + k[2948]*y_cur[IDX_HCOII] - k[3184]*y_cur[IDX_HeII] - + k[3185]*y_cur[IDX_HeII] - k[3186]*y_cur[IDX_HeII] - + k[3187]*y_cur[IDX_HeII] - k[3864]*y_cur[IDX_SiII] - + k[3865]*y_cur[IDX_SiII] - k[3866]*y_cur[IDX_SiII] - + k[4896]*y_cur[IDX_C2HI] - k[4897]*y_cur[IDX_C2HI] - + k[4952]*y_cur[IDX_CI] - k[4953]*y_cur[IDX_CI] - + k[5050]*y_cur[IDX_C4HI] - k[5051]*y_cur[IDX_C4HI] - + k[5068]*y_cur[IDX_CHI] - k[5110]*y_cur[IDX_CNI] - k[5801] - k[5802] + - k[6105] - k[6106] - k[6107] - k[6952]; + data[jistart + 7709] = 0.0 + k[1816]*y_cur[IDX_C3H5II]; + data[jistart + 7710] = 0.0 + k[8723]*y_cur[IDX_GC2H3I]; + data[jistart + 7711] = 0.0 - k[1777]*y_cur[IDX_CH3CCHI] - k[1778]*y_cur[IDX_CH3CCHI] - + k[1779]*y_cur[IDX_CH3CCHI] - k[1780]*y_cur[IDX_CH3CCHI] - + k[1781]*y_cur[IDX_CH3CCHI]; + data[jistart + 7712] = 0.0 - k[1669]*y_cur[IDX_CH3CCHI]; + data[jistart + 7713] = 0.0 - k[2108]*y_cur[IDX_CH3CCHI]; + data[jistart + 7714] = 0.0 - k[5050]*y_cur[IDX_CH3CCHI] - k[5051]*y_cur[IDX_CH3CCHI]; + data[jistart + 7715] = 0.0 - k[2106]*y_cur[IDX_CH3CCHI] - k[2107]*y_cur[IDX_CH3CCHI]; + data[jistart + 7716] = 0.0 + k[5066]*y_cur[IDX_CHI]; + data[jistart + 7717] = 0.0 - k[3864]*y_cur[IDX_CH3CCHI] - k[3865]*y_cur[IDX_CH3CCHI] - + k[3866]*y_cur[IDX_CH3CCHI]; + data[jistart + 7718] = 0.0 - k[1611]*y_cur[IDX_CH3CCHI] - k[1612]*y_cur[IDX_CH3CCHI]; + data[jistart + 7719] = 0.0 - k[4896]*y_cur[IDX_CH3CCHI] - k[4897]*y_cur[IDX_CH3CCHI] + + k[4898]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 7720] = 0.0 + k[5066]*y_cur[IDX_C2H4I] - k[5068]*y_cur[IDX_CH3CCHI]; + data[jistart + 7721] = 0.0 - k[220]*y_cur[IDX_CH3CCHI] - k[1509]*y_cur[IDX_CH3CCHI] - + k[1510]*y_cur[IDX_CH3CCHI]; + data[jistart + 7722] = 0.0 - k[5110]*y_cur[IDX_CH3CCHI]; + data[jistart + 7723] = 0.0 + k[8615]*y_cur[IDX_GCH2CCHI]; + data[jistart + 7724] = 0.0 - k[2789]*y_cur[IDX_CH3CCHI]; + data[jistart + 7725] = 0.0 - k[3184]*y_cur[IDX_CH3CCHI] - k[3185]*y_cur[IDX_CH3CCHI] - + k[3186]*y_cur[IDX_CH3CCHI] - k[3187]*y_cur[IDX_CH3CCHI]; + data[jistart + 7726] = 0.0 - k[165]*y_cur[IDX_CH3CCHI] - k[1363]*y_cur[IDX_CH3CCHI] - + k[1364]*y_cur[IDX_CH3CCHI] - k[1365]*y_cur[IDX_CH3CCHI] - + k[1366]*y_cur[IDX_CH3CCHI]; + data[jistart + 7727] = 0.0 - k[365]*y_cur[IDX_CH3CCHI] - k[2325]*y_cur[IDX_CH3CCHI]; + data[jistart + 7728] = 0.0 + k[4915]*y_cur[IDX_C2H5I] - k[4952]*y_cur[IDX_CH3CCHI] - + k[4953]*y_cur[IDX_CH3CCHI]; + data[jistart + 7729] = 0.0 - k[2948]*y_cur[IDX_CH3CCHI]; + data[jistart + 7730] = 0.0 - k[2647]*y_cur[IDX_CH3CCHI]; + data[jistart + 7731] = 0.0 + k[6483]*y_cur[IDX_C3H5II] + k[6500]*y_cur[IDX_C3H6II] + + k[6508]*y_cur[IDX_C3H7II] + k[6646]*y_cur[IDX_C4H5II]; + data[jistart + 7732] = 0.0 + k[804]*y_cur[IDX_C3H5II] + k[806]*y_cur[IDX_C3H6II] + + k[811]*y_cur[IDX_C3H7II] + k[828]*y_cur[IDX_C4H5II]; + data[jistart + 7733] = 0.0 - k[2231]*y_cur[IDX_CH5II]; + data[jistart + 7734] = 0.0 - k[2221]*y_cur[IDX_CH5II]; + data[jistart + 7735] = 0.0 - k[2234]*y_cur[IDX_CH5II]; + data[jistart + 7736] = 0.0 + k[2664]*y_cur[IDX_H3II]; + data[jistart + 7737] = 0.0 - k[2238]*y_cur[IDX_CH5II]; + data[jistart + 7738] = 0.0 + k[2201]*y_cur[IDX_CH4I]; + data[jistart + 7739] = 0.0 + k[2656]*y_cur[IDX_H3II]; + data[jistart + 7740] = 0.0 + k[2138]*y_cur[IDX_CH4I] + k[2432]*y_cur[IDX_H2I]; + data[jistart + 7741] = 0.0 + k[2202]*y_cur[IDX_CH4I]; + data[jistart + 7742] = 0.0 - k[2222]*y_cur[IDX_CH5II]; + data[jistart + 7743] = 0.0 + k[2379]*y_cur[IDX_CH4I]; + data[jistart + 7744] = 0.0 - k[972]*y_cur[IDX_eM] - k[973]*y_cur[IDX_eM] - + k[974]*y_cur[IDX_eM] - k[975]*y_cur[IDX_eM] - k[976]*y_cur[IDX_eM] - + k[1898]*y_cur[IDX_CI] - k[2000]*y_cur[IDX_CH2I] - + k[2217]*y_cur[IDX_C2I] - k[2218]*y_cur[IDX_C2H2I] - + k[2219]*y_cur[IDX_C2H4I] - k[2220]*y_cur[IDX_C2HI] - + k[2221]*y_cur[IDX_C6H6I] - k[2222]*y_cur[IDX_C2H6I] - + k[2223]*y_cur[IDX_CO2I] - k[2224]*y_cur[IDX_COI] - + k[2225]*y_cur[IDX_H2COI] - k[2226]*y_cur[IDX_H2OI] - + k[2227]*y_cur[IDX_H2SI] - k[2228]*y_cur[IDX_HC3NI] - + k[2229]*y_cur[IDX_HCNI] - k[2230]*y_cur[IDX_HCOI] - + k[2231]*y_cur[IDX_HClI] - k[2232]*y_cur[IDX_HNCI] - + k[2233]*y_cur[IDX_MgI] - k[2234]*y_cur[IDX_N2OI] - + k[2235]*y_cur[IDX_SI] - k[2236]*y_cur[IDX_SiI] - + k[2237]*y_cur[IDX_SiI] - k[2238]*y_cur[IDX_SiH4I] - + k[2244]*y_cur[IDX_CHI] - k[2840]*y_cur[IDX_HI] - + k[3533]*y_cur[IDX_NH2I] - k[3571]*y_cur[IDX_NH3I] - + k[3609]*y_cur[IDX_NHI] - k[3728]*y_cur[IDX_OI] - + k[3729]*y_cur[IDX_OI] - k[3797]*y_cur[IDX_OHI] - + k[5545]*y_cur[IDX_COI] - k[6332]*y_cur[IDX_GRAINM] - + k[6333]*y_cur[IDX_GRAINM] - k[6334]*y_cur[IDX_GRAINM] - + k[6335]*y_cur[IDX_GRAINM] - k[6336]*y_cur[IDX_GRAINM]; + data[jistart + 7745] = 0.0 - k[2228]*y_cur[IDX_CH5II]; + data[jistart + 7746] = 0.0 - k[3533]*y_cur[IDX_CH5II]; + data[jistart + 7747] = 0.0 + k[2209]*y_cur[IDX_CH4I]; + data[jistart + 7748] = 0.0 - k[2223]*y_cur[IDX_CH5II]; + data[jistart + 7749] = 0.0 - k[2233]*y_cur[IDX_CH5II]; + data[jistart + 7750] = 0.0 - k[3609]*y_cur[IDX_CH5II]; + data[jistart + 7751] = 0.0 + k[2206]*y_cur[IDX_CH4I]; + data[jistart + 7752] = 0.0 - k[2000]*y_cur[IDX_CH5II]; + data[jistart + 7753] = 0.0 - k[2232]*y_cur[IDX_CH5II]; + data[jistart + 7754] = 0.0 - k[2219]*y_cur[IDX_CH5II]; + data[jistart + 7755] = 0.0 - k[2227]*y_cur[IDX_CH5II]; + data[jistart + 7756] = 0.0 - k[2236]*y_cur[IDX_CH5II] - k[2237]*y_cur[IDX_CH5II]; + data[jistart + 7757] = 0.0 - k[2230]*y_cur[IDX_CH5II]; + data[jistart + 7758] = 0.0 + k[2138]*y_cur[IDX_CH4II] + k[2201]*y_cur[IDX_HCO2II] + + k[2202]*y_cur[IDX_HNOII] + k[2206]*y_cur[IDX_N2HII] + + k[2209]*y_cur[IDX_OHII] + k[2379]*y_cur[IDX_H2II] + + k[2669]*y_cur[IDX_H3II]; + data[jistart + 7759] = 0.0 - k[2220]*y_cur[IDX_CH5II]; + data[jistart + 7760] = 0.0 - k[2225]*y_cur[IDX_CH5II]; + data[jistart + 7761] = 0.0 - k[2229]*y_cur[IDX_CH5II]; + data[jistart + 7762] = 0.0 - k[2244]*y_cur[IDX_CH5II]; + data[jistart + 7763] = 0.0 - k[2235]*y_cur[IDX_CH5II]; + data[jistart + 7764] = 0.0 - k[2217]*y_cur[IDX_CH5II]; + data[jistart + 7765] = 0.0 - k[3797]*y_cur[IDX_CH5II]; + data[jistart + 7766] = 0.0 - k[3571]*y_cur[IDX_CH5II]; + data[jistart + 7767] = 0.0 + k[5555]*y_cur[IDX_H2I]; + data[jistart + 7768] = 0.0 - k[2218]*y_cur[IDX_CH5II]; + data[jistart + 7769] = 0.0 - k[3728]*y_cur[IDX_CH5II] - k[3729]*y_cur[IDX_CH5II]; + data[jistart + 7770] = 0.0 - k[2226]*y_cur[IDX_CH5II]; + data[jistart + 7771] = 0.0 - k[1898]*y_cur[IDX_CH5II]; + data[jistart + 7772] = 0.0 + k[2656]*y_cur[IDX_CH3CHOI] + k[2664]*y_cur[IDX_CH3COCH3I] + + k[2669]*y_cur[IDX_CH4I]; + data[jistart + 7773] = 0.0 - k[2224]*y_cur[IDX_CH5II] - k[5545]*y_cur[IDX_CH5II]; + data[jistart + 7774] = 0.0 - k[6332]*y_cur[IDX_CH5II] - k[6333]*y_cur[IDX_CH5II] - + k[6334]*y_cur[IDX_CH5II] - k[6335]*y_cur[IDX_CH5II] - + k[6336]*y_cur[IDX_CH5II]; + data[jistart + 7775] = 0.0 + k[2432]*y_cur[IDX_CH4II] + k[5555]*y_cur[IDX_CH3II]; + data[jistart + 7776] = 0.0 - k[972]*y_cur[IDX_CH5II] - k[973]*y_cur[IDX_CH5II] - + k[974]*y_cur[IDX_CH5II] - k[975]*y_cur[IDX_CH5II] - + k[976]*y_cur[IDX_CH5II]; + data[jistart + 7777] = 0.0 - k[2840]*y_cur[IDX_CH5II]; + data[jistart + 7778] = 0.0 + k[2405]*y_cur[IDX_H2I]; + data[jistart + 7779] = 0.0 - k[4777]*y_cur[IDX_HC2SII]; + data[jistart + 7780] = 0.0 - k[4636]*y_cur[IDX_HC2SII]; + data[jistart + 7781] = 0.0 - k[4847]*y_cur[IDX_HC2SII]; + data[jistart + 7782] = 0.0 - k[4041]*y_cur[IDX_HC2SII]; + data[jistart + 7783] = 0.0 - k[4216]*y_cur[IDX_HC2SII]; + data[jistart + 7784] = 0.0 - k[1061]*y_cur[IDX_eM] - k[1062]*y_cur[IDX_eM] - + k[1902]*y_cur[IDX_CI] - k[3901]*y_cur[IDX_CM] - + k[3936]*y_cur[IDX_C10M] - k[3971]*y_cur[IDX_C10HM] - + k[4006]*y_cur[IDX_C2M] - k[4041]*y_cur[IDX_C2HM] - + k[4076]*y_cur[IDX_C3M] - k[4111]*y_cur[IDX_C3HM] - + k[4146]*y_cur[IDX_C3NM] - k[4181]*y_cur[IDX_C4M] - + k[4216]*y_cur[IDX_C4HM] - k[4251]*y_cur[IDX_C5M] - + k[4286]*y_cur[IDX_C5HM] - k[4321]*y_cur[IDX_C5NM] - + k[4356]*y_cur[IDX_C6M] - k[4391]*y_cur[IDX_C6HM] - + k[4426]*y_cur[IDX_C7M] - k[4461]*y_cur[IDX_C7HM] - + k[4496]*y_cur[IDX_C8M] - k[4531]*y_cur[IDX_C8HM] - + k[4566]*y_cur[IDX_C9M] - k[4601]*y_cur[IDX_C9HM] - + k[4636]*y_cur[IDX_CHM] - k[4671]*y_cur[IDX_CNM] - + k[4707]*y_cur[IDX_HM] - k[4742]*y_cur[IDX_OM] - + k[4777]*y_cur[IDX_O2M] - k[4812]*y_cur[IDX_OHM] - + k[4847]*y_cur[IDX_SM] - k[6678]*y_cur[IDX_GRAINM] - + k[6679]*y_cur[IDX_GRAINM]; + data[jistart + 7785] = 0.0 - k[4812]*y_cur[IDX_HC2SII]; + data[jistart + 7786] = 0.0 - k[3971]*y_cur[IDX_HC2SII]; + data[jistart + 7787] = 0.0 - k[4111]*y_cur[IDX_HC2SII]; + data[jistart + 7788] = 0.0 - k[4391]*y_cur[IDX_HC2SII]; + data[jistart + 7789] = 0.0 - k[4531]*y_cur[IDX_HC2SII]; + data[jistart + 7790] = 0.0 - k[4461]*y_cur[IDX_HC2SII]; + data[jistart + 7791] = 0.0 - k[4601]*y_cur[IDX_HC2SII]; + data[jistart + 7792] = 0.0 - k[3936]*y_cur[IDX_HC2SII]; + data[jistart + 7793] = 0.0 - k[4286]*y_cur[IDX_HC2SII]; + data[jistart + 7794] = 0.0 - k[4321]*y_cur[IDX_HC2SII]; + data[jistart + 7795] = 0.0 - k[3901]*y_cur[IDX_HC2SII]; + data[jistart + 7796] = 0.0 - k[4742]*y_cur[IDX_HC2SII]; + data[jistart + 7797] = 0.0 - k[4566]*y_cur[IDX_HC2SII]; + data[jistart + 7798] = 0.0 - k[4707]*y_cur[IDX_HC2SII]; + data[jistart + 7799] = 0.0 - k[4496]*y_cur[IDX_HC2SII]; + data[jistart + 7800] = 0.0 - k[4006]*y_cur[IDX_HC2SII]; + data[jistart + 7801] = 0.0 + k[2600]*y_cur[IDX_H3II] + k[2770]*y_cur[IDX_H3OII] + + k[2905]*y_cur[IDX_HCOII]; + data[jistart + 7802] = 0.0 - k[4076]*y_cur[IDX_HC2SII]; + data[jistart + 7803] = 0.0 - k[4181]*y_cur[IDX_HC2SII]; + data[jistart + 7804] = 0.0 - k[4356]*y_cur[IDX_HC2SII]; + data[jistart + 7805] = 0.0 - k[4251]*y_cur[IDX_HC2SII]; + data[jistart + 7806] = 0.0 - k[4426]*y_cur[IDX_HC2SII]; + data[jistart + 7807] = 0.0 - k[4146]*y_cur[IDX_HC2SII]; + data[jistart + 7808] = 0.0 - k[4671]*y_cur[IDX_HC2SII]; + data[jistart + 7809] = 0.0 + k[1679]*y_cur[IDX_SI]; + data[jistart + 7810] = 0.0 + k[1645]*y_cur[IDX_SII]; + data[jistart + 7811] = 0.0 + k[1573]*y_cur[IDX_C2H2I] + k[1645]*y_cur[IDX_C2H3I]; + data[jistart + 7812] = 0.0 + k[1625]*y_cur[IDX_SI]; + data[jistart + 7813] = 0.0 + k[1528]*y_cur[IDX_C2H2II] + k[1625]*y_cur[IDX_C2H3II] + + k[1679]*y_cur[IDX_C2H4II]; + data[jistart + 7814] = 0.0 + k[1528]*y_cur[IDX_SI]; + data[jistart + 7815] = 0.0 + k[1573]*y_cur[IDX_SII]; + data[jistart + 7816] = 0.0 + k[2770]*y_cur[IDX_C2SI]; + data[jistart + 7817] = 0.0 - k[1902]*y_cur[IDX_HC2SII]; + data[jistart + 7818] = 0.0 + k[2905]*y_cur[IDX_C2SI]; + data[jistart + 7819] = 0.0 + k[2600]*y_cur[IDX_C2SI]; + data[jistart + 7820] = 0.0 - k[6678]*y_cur[IDX_HC2SII] - k[6679]*y_cur[IDX_HC2SII]; + data[jistart + 7821] = 0.0 + k[2405]*y_cur[IDX_C2SII]; + data[jistart + 7822] = 0.0 - k[1061]*y_cur[IDX_HC2SII] - k[1062]*y_cur[IDX_HC2SII]; + data[jistart + 7823] = 0.0 - k[4802]*y_cur[IDX_OHM]; + data[jistart + 7824] = 0.0 - k[4805]*y_cur[IDX_OHM]; + data[jistart + 7825] = 0.0 - k[4831]*y_cur[IDX_OHM]; + data[jistart + 7826] = 0.0 - k[4812]*y_cur[IDX_OHM]; + data[jistart + 7827] = 0.0 - k[57]*y_cur[IDX_CI] - k[61]*y_cur[IDX_CH3I] - + k[64]*y_cur[IDX_CHI] - k[108]*y_cur[IDX_HI] - k[696]*y_cur[IDX_CNI] + - k[3795]*y_cur[IDX_HCNI] - k[4797]*y_cur[IDX_CII] - + k[4798]*y_cur[IDX_C2H2II] - k[4799]*y_cur[IDX_C2H3II] - + k[4800]*y_cur[IDX_C4H2II] - k[4801]*y_cur[IDX_C4H3II] - + k[4802]*y_cur[IDX_C4SII] - k[4803]*y_cur[IDX_CH2CCHII] - + k[4804]*y_cur[IDX_CH3II] - k[4805]*y_cur[IDX_CNCII] - + k[4806]*y_cur[IDX_FeII] - k[4807]*y_cur[IDX_HII] - + k[4808]*y_cur[IDX_H2COII] - k[4809]*y_cur[IDX_H2SII] - + k[4810]*y_cur[IDX_H3II] - k[4811]*y_cur[IDX_H3OII] - + k[4812]*y_cur[IDX_HC2SII] - k[4813]*y_cur[IDX_HCNHII] - + k[4814]*y_cur[IDX_HCNHII] - k[4815]*y_cur[IDX_HCOII] - + k[4816]*y_cur[IDX_HCOII] - k[4817]*y_cur[IDX_HeII] - + k[4818]*y_cur[IDX_MgII] - k[4819]*y_cur[IDX_NII] - + k[4820]*y_cur[IDX_N2HII] - k[4821]*y_cur[IDX_NH3II] - + k[4822]*y_cur[IDX_NH4II] - k[4823]*y_cur[IDX_NOII] - + k[4824]*y_cur[IDX_NaII] - k[4825]*y_cur[IDX_OII] - + k[4826]*y_cur[IDX_SII] - k[4827]*y_cur[IDX_SOII] - + k[4828]*y_cur[IDX_SiII] - k[4829]*y_cur[IDX_SiOII] - + k[4830]*y_cur[IDX_SiOHII] - k[4831]*y_cur[IDX_SiSII] - k[5904] - + k[6243]; + data[jistart + 7828] = 0.0 + k[2467]*y_cur[IDX_H2I] + k[3652]*y_cur[IDX_CH4I]; + data[jistart + 7829] = 0.0 + k[2367]*y_cur[IDX_H2OI]; + data[jistart + 7830] = 0.0 - k[4829]*y_cur[IDX_OHM]; + data[jistart + 7831] = 0.0 - k[4830]*y_cur[IDX_OHM]; + data[jistart + 7832] = 0.0 - k[4806]*y_cur[IDX_OHM]; + data[jistart + 7833] = 0.0 - k[4818]*y_cur[IDX_OHM]; + data[jistart + 7834] = 0.0 - k[4824]*y_cur[IDX_OHM]; + data[jistart + 7835] = 0.0 - k[4801]*y_cur[IDX_OHM]; + data[jistart + 7836] = 0.0 - k[4820]*y_cur[IDX_OHM]; + data[jistart + 7837] = 0.0 - k[4827]*y_cur[IDX_OHM]; + data[jistart + 7838] = 0.0 - k[4803]*y_cur[IDX_OHM]; + data[jistart + 7839] = 0.0 - k[4809]*y_cur[IDX_OHM]; + data[jistart + 7840] = 0.0 - k[4819]*y_cur[IDX_OHM]; + data[jistart + 7841] = 0.0 - k[4808]*y_cur[IDX_OHM]; + data[jistart + 7842] = 0.0 - k[4823]*y_cur[IDX_OHM]; + data[jistart + 7843] = 0.0 - k[4825]*y_cur[IDX_OHM]; + data[jistart + 7844] = 0.0 - k[4800]*y_cur[IDX_OHM]; + data[jistart + 7845] = 0.0 - k[4813]*y_cur[IDX_OHM] - k[4814]*y_cur[IDX_OHM]; + data[jistart + 7846] = 0.0 - k[4821]*y_cur[IDX_OHM]; + data[jistart + 7847] = 0.0 - k[4822]*y_cur[IDX_OHM]; + data[jistart + 7848] = 0.0 - k[4828]*y_cur[IDX_OHM]; + data[jistart + 7849] = 0.0 - k[4826]*y_cur[IDX_OHM]; + data[jistart + 7850] = 0.0 - k[4799]*y_cur[IDX_OHM]; + data[jistart + 7851] = 0.0 + k[3652]*y_cur[IDX_OM]; + data[jistart + 7852] = 0.0 - k[3795]*y_cur[IDX_OHM]; + data[jistart + 7853] = 0.0 - k[64]*y_cur[IDX_OHM]; + data[jistart + 7854] = 0.0 - k[4798]*y_cur[IDX_OHM]; + data[jistart + 7855] = 0.0 - k[4804]*y_cur[IDX_OHM]; + data[jistart + 7856] = 0.0 - k[696]*y_cur[IDX_OHM]; + data[jistart + 7857] = 0.0 - k[61]*y_cur[IDX_OHM]; + data[jistart + 7858] = 0.0 - k[4811]*y_cur[IDX_OHM]; + data[jistart + 7859] = 0.0 - k[4817]*y_cur[IDX_OHM]; + data[jistart + 7860] = 0.0 - k[4797]*y_cur[IDX_OHM]; + data[jistart + 7861] = 0.0 + k[2367]*y_cur[IDX_HM]; + data[jistart + 7862] = 0.0 - k[4807]*y_cur[IDX_OHM]; + data[jistart + 7863] = 0.0 - k[57]*y_cur[IDX_OHM]; + data[jistart + 7864] = 0.0 - k[4815]*y_cur[IDX_OHM] - k[4816]*y_cur[IDX_OHM]; + data[jistart + 7865] = 0.0 - k[4810]*y_cur[IDX_OHM]; + data[jistart + 7866] = 0.0 + k[2467]*y_cur[IDX_OM]; + data[jistart + 7867] = 0.0 - k[108]*y_cur[IDX_OHM]; + data[jistart + 7868] = 0.0 - k[3961]*y_cur[IDX_C10HM]; + data[jistart + 7869] = 0.0 - k[3964]*y_cur[IDX_C10HM]; + data[jistart + 7870] = 0.0 - k[3990]*y_cur[IDX_C10HM]; + data[jistart + 7871] = 0.0 - k[3971]*y_cur[IDX_C10HM]; + data[jistart + 7872] = 0.0 - k[86]*y_cur[IDX_HI] - k[1847]*y_cur[IDX_CI] - + k[3381]*y_cur[IDX_NI] - k[3382]*y_cur[IDX_NI] - + k[3681]*y_cur[IDX_OI] - k[3956]*y_cur[IDX_CII] - + k[3957]*y_cur[IDX_C2H2II] - k[3958]*y_cur[IDX_C2H3II] - + k[3959]*y_cur[IDX_C4H2II] - k[3960]*y_cur[IDX_C4H3II] - + k[3961]*y_cur[IDX_C4SII] - k[3962]*y_cur[IDX_CH2CCHII] - + k[3963]*y_cur[IDX_CH3II] - k[3964]*y_cur[IDX_CNCII] - + k[3965]*y_cur[IDX_FeII] - k[3966]*y_cur[IDX_HII] - + k[3967]*y_cur[IDX_H2COII] - k[3968]*y_cur[IDX_H2SII] - + k[3969]*y_cur[IDX_H3II] - k[3970]*y_cur[IDX_H3OII] - + k[3971]*y_cur[IDX_HC2SII] - k[3972]*y_cur[IDX_HCNHII] - + k[3973]*y_cur[IDX_HCNHII] - k[3974]*y_cur[IDX_HCOII] - + k[3975]*y_cur[IDX_HCOII] - k[3976]*y_cur[IDX_HeII] - + k[3977]*y_cur[IDX_MgII] - k[3978]*y_cur[IDX_NII] - + k[3979]*y_cur[IDX_N2HII] - k[3980]*y_cur[IDX_NH3II] - + k[3981]*y_cur[IDX_NH4II] - k[3982]*y_cur[IDX_NOII] - + k[3983]*y_cur[IDX_NaII] - k[3984]*y_cur[IDX_OII] - + k[3985]*y_cur[IDX_SII] - k[3986]*y_cur[IDX_SOII] - + k[3987]*y_cur[IDX_SiII] - k[3988]*y_cur[IDX_SiOII] - + k[3989]*y_cur[IDX_SiOHII] - k[3990]*y_cur[IDX_SiSII] - k[5689] - + k[5956]; + data[jistart + 7873] = 0.0 - k[3988]*y_cur[IDX_C10HM]; + data[jistart + 7874] = 0.0 - k[3989]*y_cur[IDX_C10HM]; + data[jistart + 7875] = 0.0 + k[5588]*y_cur[IDX_eM]; + data[jistart + 7876] = 0.0 - k[3965]*y_cur[IDX_C10HM]; + data[jistart + 7877] = 0.0 - k[3977]*y_cur[IDX_C10HM]; + data[jistart + 7878] = 0.0 - k[3983]*y_cur[IDX_C10HM]; + data[jistart + 7879] = 0.0 - k[3960]*y_cur[IDX_C10HM]; + data[jistart + 7880] = 0.0 - k[3979]*y_cur[IDX_C10HM]; + data[jistart + 7881] = 0.0 - k[3986]*y_cur[IDX_C10HM]; + data[jistart + 7882] = 0.0 - k[3962]*y_cur[IDX_C10HM]; + data[jistart + 7883] = 0.0 - k[3968]*y_cur[IDX_C10HM]; + data[jistart + 7884] = 0.0 - k[3978]*y_cur[IDX_C10HM]; + data[jistart + 7885] = 0.0 - k[3967]*y_cur[IDX_C10HM]; + data[jistart + 7886] = 0.0 - k[3982]*y_cur[IDX_C10HM]; + data[jistart + 7887] = 0.0 - k[3984]*y_cur[IDX_C10HM]; + data[jistart + 7888] = 0.0 - k[3959]*y_cur[IDX_C10HM]; + data[jistart + 7889] = 0.0 - k[3972]*y_cur[IDX_C10HM] - k[3973]*y_cur[IDX_C10HM]; + data[jistart + 7890] = 0.0 - k[3980]*y_cur[IDX_C10HM]; + data[jistart + 7891] = 0.0 - k[3981]*y_cur[IDX_C10HM]; + data[jistart + 7892] = 0.0 - k[3987]*y_cur[IDX_C10HM]; + data[jistart + 7893] = 0.0 - k[3985]*y_cur[IDX_C10HM]; + data[jistart + 7894] = 0.0 - k[3958]*y_cur[IDX_C10HM]; + data[jistart + 7895] = 0.0 - k[3957]*y_cur[IDX_C10HM]; + data[jistart + 7896] = 0.0 - k[3963]*y_cur[IDX_C10HM]; + data[jistart + 7897] = 0.0 - k[3381]*y_cur[IDX_C10HM] - k[3382]*y_cur[IDX_C10HM]; + data[jistart + 7898] = 0.0 - k[3970]*y_cur[IDX_C10HM]; + data[jistart + 7899] = 0.0 - k[3681]*y_cur[IDX_C10HM]; + data[jistart + 7900] = 0.0 - k[3976]*y_cur[IDX_C10HM]; + data[jistart + 7901] = 0.0 - k[3956]*y_cur[IDX_C10HM]; + data[jistart + 7902] = 0.0 - k[3966]*y_cur[IDX_C10HM]; + data[jistart + 7903] = 0.0 - k[1847]*y_cur[IDX_C10HM]; + data[jistart + 7904] = 0.0 - k[3974]*y_cur[IDX_C10HM] - k[3975]*y_cur[IDX_C10HM]; + data[jistart + 7905] = 0.0 - k[3969]*y_cur[IDX_C10HM]; + data[jistart + 7906] = 0.0 + k[5588]*y_cur[IDX_C10HI]; + data[jistart + 7907] = 0.0 - k[86]*y_cur[IDX_C10HM]; + data[jistart + 7908] = 0.0 - k[4101]*y_cur[IDX_C3HM]; + data[jistart + 7909] = 0.0 - k[4104]*y_cur[IDX_C3HM]; + data[jistart + 7910] = 0.0 - k[4130]*y_cur[IDX_C3HM]; + data[jistart + 7911] = 0.0 + k[3700]*y_cur[IDX_OI]; + data[jistart + 7912] = 0.0 - k[4111]*y_cur[IDX_C3HM]; + data[jistart + 7913] = 0.0 - k[41]*y_cur[IDX_CI] - k[90]*y_cur[IDX_HI] - + k[113]*y_cur[IDX_NI] - k[3395]*y_cur[IDX_NI] - k[3396]*y_cur[IDX_NI] + - k[3694]*y_cur[IDX_OI] - k[4096]*y_cur[IDX_CII] - + k[4097]*y_cur[IDX_C2H2II] - k[4098]*y_cur[IDX_C2H3II] - + k[4099]*y_cur[IDX_C4H2II] - k[4100]*y_cur[IDX_C4H3II] - + k[4101]*y_cur[IDX_C4SII] - k[4102]*y_cur[IDX_CH2CCHII] - + k[4103]*y_cur[IDX_CH3II] - k[4104]*y_cur[IDX_CNCII] - + k[4105]*y_cur[IDX_FeII] - k[4106]*y_cur[IDX_HII] - + k[4107]*y_cur[IDX_H2COII] - k[4108]*y_cur[IDX_H2SII] - + k[4109]*y_cur[IDX_H3II] - k[4110]*y_cur[IDX_H3OII] - + k[4111]*y_cur[IDX_HC2SII] - k[4112]*y_cur[IDX_HCNHII] - + k[4113]*y_cur[IDX_HCNHII] - k[4114]*y_cur[IDX_HCOII] - + k[4115]*y_cur[IDX_HCOII] - k[4116]*y_cur[IDX_HeII] - + k[4117]*y_cur[IDX_MgII] - k[4118]*y_cur[IDX_NII] - + k[4119]*y_cur[IDX_N2HII] - k[4120]*y_cur[IDX_NH3II] - + k[4121]*y_cur[IDX_NH4II] - k[4122]*y_cur[IDX_NOII] - + k[4123]*y_cur[IDX_NaII] - k[4124]*y_cur[IDX_OII] - + k[4125]*y_cur[IDX_SII] - k[4126]*y_cur[IDX_SOII] - + k[4127]*y_cur[IDX_SiII] - k[4128]*y_cur[IDX_SiOII] - + k[4129]*y_cur[IDX_SiOHII] - k[4130]*y_cur[IDX_SiSII] - k[5718] - + k[6002]; + data[jistart + 7914] = 0.0 - k[4128]*y_cur[IDX_C3HM]; + data[jistart + 7915] = 0.0 - k[4129]*y_cur[IDX_C3HM]; + data[jistart + 7916] = 0.0 - k[4105]*y_cur[IDX_C3HM]; + data[jistart + 7917] = 0.0 - k[4117]*y_cur[IDX_C3HM]; + data[jistart + 7918] = 0.0 - k[4123]*y_cur[IDX_C3HM]; + data[jistart + 7919] = 0.0 - k[4100]*y_cur[IDX_C3HM]; + data[jistart + 7920] = 0.0 - k[4119]*y_cur[IDX_C3HM]; + data[jistart + 7921] = 0.0 - k[4126]*y_cur[IDX_C3HM]; + data[jistart + 7922] = 0.0 - k[4102]*y_cur[IDX_C3HM]; + data[jistart + 7923] = 0.0 - k[4108]*y_cur[IDX_C3HM]; + data[jistart + 7924] = 0.0 - k[4118]*y_cur[IDX_C3HM]; + data[jistart + 7925] = 0.0 + k[5592]*y_cur[IDX_eM]; + data[jistart + 7926] = 0.0 - k[4107]*y_cur[IDX_C3HM]; + data[jistart + 7927] = 0.0 - k[4122]*y_cur[IDX_C3HM]; + data[jistart + 7928] = 0.0 - k[4124]*y_cur[IDX_C3HM]; + data[jistart + 7929] = 0.0 - k[4099]*y_cur[IDX_C3HM]; + data[jistart + 7930] = 0.0 - k[4112]*y_cur[IDX_C3HM] - k[4113]*y_cur[IDX_C3HM]; + data[jistart + 7931] = 0.0 - k[4120]*y_cur[IDX_C3HM]; + data[jistart + 7932] = 0.0 - k[4121]*y_cur[IDX_C3HM]; + data[jistart + 7933] = 0.0 - k[4127]*y_cur[IDX_C3HM]; + data[jistart + 7934] = 0.0 - k[4125]*y_cur[IDX_C3HM]; + data[jistart + 7935] = 0.0 - k[4098]*y_cur[IDX_C3HM]; + data[jistart + 7936] = 0.0 - k[4097]*y_cur[IDX_C3HM]; + data[jistart + 7937] = 0.0 - k[4103]*y_cur[IDX_C3HM]; + data[jistart + 7938] = 0.0 - k[113]*y_cur[IDX_C3HM] - k[3395]*y_cur[IDX_C3HM] - + k[3396]*y_cur[IDX_C3HM]; + data[jistart + 7939] = 0.0 - k[4110]*y_cur[IDX_C3HM]; + data[jistart + 7940] = 0.0 - k[3694]*y_cur[IDX_C3HM] + k[3700]*y_cur[IDX_C4HM]; + data[jistart + 7941] = 0.0 - k[4116]*y_cur[IDX_C3HM]; + data[jistart + 7942] = 0.0 - k[4096]*y_cur[IDX_C3HM]; + data[jistart + 7943] = 0.0 - k[4106]*y_cur[IDX_C3HM]; + data[jistart + 7944] = 0.0 - k[41]*y_cur[IDX_C3HM]; + data[jistart + 7945] = 0.0 - k[4114]*y_cur[IDX_C3HM] - k[4115]*y_cur[IDX_C3HM]; + data[jistart + 7946] = 0.0 - k[4109]*y_cur[IDX_C3HM]; + data[jistart + 7947] = 0.0 + k[5592]*y_cur[IDX_C3HI]; + data[jistart + 7948] = 0.0 - k[90]*y_cur[IDX_C3HM]; + data[jistart + 7949] = 0.0 + k[7231] + k[7413] + k[7595]; + data[jistart + 7950] = 0.0 + k[1076]*y_cur[IDX_eM] + k[6820]*y_cur[IDX_GRAINM]; + data[jistart + 7951] = 0.0 + k[3891]*y_cur[IDX_CM] + k[3926]*y_cur[IDX_C10M] + + k[3961]*y_cur[IDX_C10HM] + k[3996]*y_cur[IDX_C2M] + + k[4031]*y_cur[IDX_C2HM] + k[4066]*y_cur[IDX_C3M] + + k[4101]*y_cur[IDX_C3HM] + k[4136]*y_cur[IDX_C3NM] + + k[4171]*y_cur[IDX_C4M] + k[4206]*y_cur[IDX_C4HM] + + k[4241]*y_cur[IDX_C5M] + k[4276]*y_cur[IDX_C5HM] + + k[4311]*y_cur[IDX_C5NM] + k[4346]*y_cur[IDX_C6M] + + k[4381]*y_cur[IDX_C6HM] + k[4416]*y_cur[IDX_C7M] + + k[4451]*y_cur[IDX_C7HM] + k[4486]*y_cur[IDX_C8M] + + k[4521]*y_cur[IDX_C8HM] + k[4556]*y_cur[IDX_C9M] + + k[4591]*y_cur[IDX_C9HM] + k[4626]*y_cur[IDX_CHM] + + k[4661]*y_cur[IDX_CNM] + k[4696]*y_cur[IDX_HM] + + k[4732]*y_cur[IDX_OM] + k[4767]*y_cur[IDX_O2M] + + k[4802]*y_cur[IDX_OHM] + k[4837]*y_cur[IDX_SM]; + data[jistart + 7952] = 0.0 + k[4767]*y_cur[IDX_C4SII]; + data[jistart + 7953] = 0.0 + k[4626]*y_cur[IDX_C4SII]; + data[jistart + 7954] = 0.0 + k[4837]*y_cur[IDX_C4SII]; + data[jistart + 7955] = 0.0 + k[4031]*y_cur[IDX_C4SII]; + data[jistart + 7956] = 0.0 + k[4206]*y_cur[IDX_C4SII]; + data[jistart + 7957] = 0.0 + k[4802]*y_cur[IDX_C4SII]; + data[jistart + 7958] = 0.0 + k[3961]*y_cur[IDX_C4SII]; + data[jistart + 7959] = 0.0 + k[4101]*y_cur[IDX_C4SII]; + data[jistart + 7960] = 0.0 - k[156]*y_cur[IDX_CII] - k[342]*y_cur[IDX_HII] - + k[1322]*y_cur[IDX_CII] - k[2612]*y_cur[IDX_H3II] - + k[2782]*y_cur[IDX_H3OII] - k[2917]*y_cur[IDX_HCOII] - + k[3115]*y_cur[IDX_HeII] - k[3116]*y_cur[IDX_HeII] - k[5735] - + k[6021] - k[7049]; + data[jistart + 7961] = 0.0 + k[4381]*y_cur[IDX_C4SII]; + data[jistart + 7962] = 0.0 + k[4521]*y_cur[IDX_C4SII]; + data[jistart + 7963] = 0.0 + k[4451]*y_cur[IDX_C4SII]; + data[jistart + 7964] = 0.0 + k[4591]*y_cur[IDX_C4SII]; + data[jistart + 7965] = 0.0 + k[3926]*y_cur[IDX_C4SII]; + data[jistart + 7966] = 0.0 + k[4276]*y_cur[IDX_C4SII]; + data[jistart + 7967] = 0.0 + k[4311]*y_cur[IDX_C4SII]; + data[jistart + 7968] = 0.0 + k[3891]*y_cur[IDX_C4SII]; + data[jistart + 7969] = 0.0 + k[4732]*y_cur[IDX_C4SII]; + data[jistart + 7970] = 0.0 + k[4556]*y_cur[IDX_C4SII]; + data[jistart + 7971] = 0.0 + k[4696]*y_cur[IDX_C4SII]; + data[jistart + 7972] = 0.0 + k[4486]*y_cur[IDX_C4SII]; + data[jistart + 7973] = 0.0 + k[3996]*y_cur[IDX_C4SII]; + data[jistart + 7974] = 0.0 + k[4066]*y_cur[IDX_C4SII]; + data[jistart + 7975] = 0.0 + k[4171]*y_cur[IDX_C4SII]; + data[jistart + 7976] = 0.0 + k[4346]*y_cur[IDX_C4SII]; + data[jistart + 7977] = 0.0 + k[4241]*y_cur[IDX_C4SII]; + data[jistart + 7978] = 0.0 + k[4416]*y_cur[IDX_C4SII]; + data[jistart + 7979] = 0.0 + k[4136]*y_cur[IDX_C4SII]; + data[jistart + 7980] = 0.0 + k[4661]*y_cur[IDX_C4SII]; + data[jistart + 7981] = 0.0 - k[2782]*y_cur[IDX_C4SI]; + data[jistart + 7982] = 0.0 - k[3115]*y_cur[IDX_C4SI] - k[3116]*y_cur[IDX_C4SI]; + data[jistart + 7983] = 0.0 - k[156]*y_cur[IDX_C4SI] - k[1322]*y_cur[IDX_C4SI]; + data[jistart + 7984] = 0.0 - k[342]*y_cur[IDX_C4SI]; + data[jistart + 7985] = 0.0 - k[2917]*y_cur[IDX_C4SI]; + data[jistart + 7986] = 0.0 - k[2612]*y_cur[IDX_C4SI]; + data[jistart + 7987] = 0.0 + k[6820]*y_cur[IDX_HC4SII]; + data[jistart + 7988] = 0.0 + k[1076]*y_cur[IDX_HC4SII]; + data[jistart + 7989] = 0.0 - k[4381]*y_cur[IDX_C6HM]; + data[jistart + 7990] = 0.0 - k[4384]*y_cur[IDX_C6HM]; + data[jistart + 7991] = 0.0 - k[4410]*y_cur[IDX_C6HM]; + data[jistart + 7992] = 0.0 - k[4391]*y_cur[IDX_C6HM]; + data[jistart + 7993] = 0.0 - k[48]*y_cur[IDX_CI] - k[98]*y_cur[IDX_HI] - + k[3421]*y_cur[IDX_NI] - k[3422]*y_cur[IDX_NI] - + k[3709]*y_cur[IDX_OI] - k[4376]*y_cur[IDX_CII] - k[4377]*y_cur[IDX_C2H2II] - k[4378]*y_cur[IDX_C2H3II] - k[4379]*y_cur[IDX_C4H2II] - k[4380]*y_cur[IDX_C4H3II] - k[4381]*y_cur[IDX_C4SII] - k[4382]*y_cur[IDX_CH2CCHII] - @@ -10138,1465 +12723,49 @@ __global__ void JacKernel(realtype *y, realtype *data, NaunetData *d_udata, k[4407]*y_cur[IDX_SiII] - k[4408]*y_cur[IDX_SiOII] - k[4409]*y_cur[IDX_SiOHII] - k[4410]*y_cur[IDX_SiSII] - k[5749] - k[6035]; - data[jistart + 4507] = 0.0 + k[3714]*y_cur[IDX_OI]; - data[jistart + 4508] = 0.0 - k[4382]*y_cur[IDX_C6HM]; - data[jistart + 4509] = 0.0 - k[4383]*y_cur[IDX_C6HM]; - data[jistart + 4510] = 0.0 - k[4384]*y_cur[IDX_C6HM]; - data[jistart + 4511] = 0.0 - k[4385]*y_cur[IDX_C6HM]; - data[jistart + 4512] = 0.0 - k[98]*y_cur[IDX_C6HM]; - data[jistart + 4513] = 0.0 - k[4386]*y_cur[IDX_C6HM]; - data[jistart + 4514] = 0.0 - k[4387]*y_cur[IDX_C6HM]; - data[jistart + 4515] = 0.0 - k[4388]*y_cur[IDX_C6HM]; - data[jistart + 4516] = 0.0 - k[4389]*y_cur[IDX_C6HM]; - data[jistart + 4517] = 0.0 - k[4390]*y_cur[IDX_C6HM]; - data[jistart + 4518] = 0.0 - k[4391]*y_cur[IDX_C6HM]; - data[jistart + 4519] = 0.0 - k[4392]*y_cur[IDX_C6HM] - - k[4393]*y_cur[IDX_C6HM]; - data[jistart + 4520] = 0.0 - k[4394]*y_cur[IDX_C6HM] - - k[4395]*y_cur[IDX_C6HM]; - data[jistart + 4521] = 0.0 - k[4396]*y_cur[IDX_C6HM]; - data[jistart + 4522] = 0.0 - k[4397]*y_cur[IDX_C6HM]; - data[jistart + 4523] = 0.0 - k[3421]*y_cur[IDX_C6HM] - - k[3422]*y_cur[IDX_C6HM]; - data[jistart + 4524] = 0.0 - k[4398]*y_cur[IDX_C6HM]; - data[jistart + 4525] = 0.0 - k[4399]*y_cur[IDX_C6HM]; - data[jistart + 4526] = 0.0 - k[4400]*y_cur[IDX_C6HM]; - data[jistart + 4527] = 0.0 - k[4401]*y_cur[IDX_C6HM]; - data[jistart + 4528] = 0.0 - k[4402]*y_cur[IDX_C6HM]; - data[jistart + 4529] = 0.0 - k[4403]*y_cur[IDX_C6HM]; - data[jistart + 4530] = 0.0 - k[3709]*y_cur[IDX_C6HM] + - k[3714]*y_cur[IDX_C7HM]; - data[jistart + 4531] = 0.0 - k[4404]*y_cur[IDX_C6HM]; - data[jistart + 4532] = 0.0 - k[4405]*y_cur[IDX_C6HM]; - data[jistart + 4533] = 0.0 - k[4406]*y_cur[IDX_C6HM]; - data[jistart + 4534] = 0.0 - k[4407]*y_cur[IDX_C6HM]; - data[jistart + 4535] = 0.0 - k[4408]*y_cur[IDX_C6HM]; - data[jistart + 4536] = 0.0 - k[4409]*y_cur[IDX_C6HM]; - data[jistart + 4537] = 0.0 - k[4410]*y_cur[IDX_C6HM]; - data[jistart + 4538] = 0.0 + k[5600]*y_cur[IDX_C6HI]; - data[jistart + 4539] = 0.0 - k[4932]*y_cur[IDX_C6H2I] + - k[4950]*y_cur[IDX_CH3C4HI]; - data[jistart + 4540] = 0.0 - k[1326]*y_cur[IDX_C6H2I] - - k[1327]*y_cur[IDX_C6H2I]; - data[jistart + 4541] = 0.0 - k[4891]*y_cur[IDX_C6H2I] + - k[4900]*y_cur[IDX_C4H2I]; - data[jistart + 4542] = 0.0 + k[4877]*y_cur[IDX_C4HI]; - data[jistart + 4543] = 0.0 - k[217]*y_cur[IDX_C6H2I] - - k[1495]*y_cur[IDX_C6H2I] - k[1496]*y_cur[IDX_C6H2I]; - data[jistart + 4544] = 0.0 - k[1595]*y_cur[IDX_C6H2I] - - k[1596]*y_cur[IDX_C6H2I] - k[1597]*y_cur[IDX_C6H2I]; - data[jistart + 4545] = 0.0 + k[4884]*y_cur[IDX_C4HI]; - data[jistart + 4546] = 0.0 - k[1659]*y_cur[IDX_C6H2I] - - k[1660]*y_cur[IDX_C6H2I]; - data[jistart + 4547] = 0.0 - k[1767]*y_cur[IDX_C6H2I] - - k[1768]*y_cur[IDX_C6H2I]; - data[jistart + 4548] = 0.0 - k[1802]*y_cur[IDX_C6H2I]; - data[jistart + 4549] = 0.0 + k[4877]*y_cur[IDX_C2H2I] + - k[4884]*y_cur[IDX_C2H4I] + k[5022]*y_cur[IDX_CH2CCH2I] + - k[5050]*y_cur[IDX_CH3CCHI] + k[5053]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 4550] = 0.0 + k[4900]*y_cur[IDX_C2HI]; - data[jistart + 4551] = 0.0 + k[98]*y_cur[IDX_HI]; - data[jistart + 4552] = 0.0 - k[217]*y_cur[IDX_C2H2II] - - k[347]*y_cur[IDX_HII] - k[1326]*y_cur[IDX_CII] - - k[1327]*y_cur[IDX_CII] - k[1495]*y_cur[IDX_C2H2II] - - k[1496]*y_cur[IDX_C2H2II] - k[1595]*y_cur[IDX_C2H3II] - - k[1596]*y_cur[IDX_C2H3II] - k[1597]*y_cur[IDX_C2H3II] - - k[1659]*y_cur[IDX_C2H4II] - k[1660]*y_cur[IDX_C2H4II] - - k[1767]*y_cur[IDX_C3H2II] - k[1768]*y_cur[IDX_C3H2II] - - k[1802]*y_cur[IDX_C3H3II] - k[2026]*y_cur[IDX_CH2CCHII] - - k[2055]*y_cur[IDX_CH3II] - k[2306]*y_cur[IDX_HII] - - k[2618]*y_cur[IDX_H3II] - k[2923]*y_cur[IDX_HCOII] - - k[3127]*y_cur[IDX_HeII] - k[3128]*y_cur[IDX_HeII] - - k[3129]*y_cur[IDX_HeII] - k[4891]*y_cur[IDX_C2HI] - - k[4932]*y_cur[IDX_CI] - k[5107]*y_cur[IDX_CNI] - k[5750] - k[6036] - - k[6037] - k[7043]; - data[jistart + 4553] = 0.0 + k[854]*y_cur[IDX_eM] + - k[6789]*y_cur[IDX_GRAINM]; - data[jistart + 4554] = 0.0 + k[856]*y_cur[IDX_eM] + - k[6796]*y_cur[IDX_GRAINM]; - data[jistart + 4555] = 0.0 + k[858]*y_cur[IDX_eM] + - k[6802]*y_cur[IDX_GRAINM]; - data[jistart + 4556] = 0.0 + k[5751]; - data[jistart + 4557] = 0.0 + k[860]*y_cur[IDX_eM] + - k[6806]*y_cur[IDX_GRAINM]; - data[jistart + 4558] = 0.0 + k[861]*y_cur[IDX_eM] + - k[6807]*y_cur[IDX_GRAINM]; - data[jistart + 4559] = 0.0 + k[3716]*y_cur[IDX_OI]; - data[jistart + 4560] = 0.0 - k[2026]*y_cur[IDX_C6H2I]; - data[jistart + 4561] = 0.0 + k[5022]*y_cur[IDX_C4HI]; - data[jistart + 4562] = 0.0 - k[2055]*y_cur[IDX_C6H2I]; - data[jistart + 4563] = 0.0 + k[4950]*y_cur[IDX_CI]; - data[jistart + 4564] = 0.0 + k[5050]*y_cur[IDX_C4HI]; - data[jistart + 4565] = 0.0 + k[5053]*y_cur[IDX_C4HI]; - data[jistart + 4566] = 0.0 - k[5107]*y_cur[IDX_C6H2I]; - data[jistart + 4567] = 0.0 + k[8729]*y_cur[IDX_GCHI]; - data[jistart + 4568] = 0.0 + k[8639]*y_cur[IDX_GHI]; - data[jistart + 4569] = 0.0 + k[7225] + k[7407] + k[7589]; - data[jistart + 4570] = 0.0 + k[8729]*y_cur[IDX_GC5HI]; - data[jistart + 4571] = 0.0 + k[8639]*y_cur[IDX_GC6HI]; - data[jistart + 4572] = 0.0 + k[6789]*y_cur[IDX_C6H3II] + - k[6796]*y_cur[IDX_C6H4II] + k[6802]*y_cur[IDX_C6H5II] + - k[6806]*y_cur[IDX_C6H6II] + k[6807]*y_cur[IDX_C6H7II]; - data[jistart + 4573] = 0.0 + k[98]*y_cur[IDX_C6HM]; - data[jistart + 4574] = 0.0 - k[347]*y_cur[IDX_C6H2I] - - k[2306]*y_cur[IDX_C6H2I]; - data[jistart + 4575] = 0.0 - k[2618]*y_cur[IDX_C6H2I]; - data[jistart + 4576] = 0.0 - k[2923]*y_cur[IDX_C6H2I]; - data[jistart + 4577] = 0.0 - k[3127]*y_cur[IDX_C6H2I] - - k[3128]*y_cur[IDX_C6H2I] - k[3129]*y_cur[IDX_C6H2I]; - data[jistart + 4578] = 0.0 + k[3716]*y_cur[IDX_C7H3II]; - data[jistart + 4579] = 0.0 + k[854]*y_cur[IDX_C6H3II] + - k[856]*y_cur[IDX_C6H4II] + k[858]*y_cur[IDX_C6H5II] + - k[860]*y_cur[IDX_C6H6II] + k[861]*y_cur[IDX_C6H7II]; - data[jistart + 4580] = 0.0 + k[1871]*y_cur[IDX_C5H3II] - - k[1872]*y_cur[IDX_C6H2II] - k[1873]*y_cur[IDX_C6H2II]; - data[jistart + 4581] = 0.0 + k[1357]*y_cur[IDX_CH3C4HI]; - data[jistart + 4582] = 0.0 + k[1736]*y_cur[IDX_C4H2II] - - k[1739]*y_cur[IDX_C6H2II]; - data[jistart + 4583] = 0.0 + k[1551]*y_cur[IDX_C4HII]; - data[jistart + 4584] = 0.0 + k[217]*y_cur[IDX_C6H2I] + - k[1490]*y_cur[IDX_C4HI] + k[1520]*y_cur[IDX_C4H2I]; - data[jistart + 4585] = 0.0 - k[1639]*y_cur[IDX_C6H2II] - - k[1640]*y_cur[IDX_C6H2II]; - data[jistart + 4586] = 0.0 + k[1587]*y_cur[IDX_C4HI] + - k[1599]*y_cur[IDX_C6HI]; - data[jistart + 4587] = 0.0 - k[1703]*y_cur[IDX_C6H2II]; - data[jistart + 4588] = 0.0 + k[1657]*y_cur[IDX_C5HI]; - data[jistart + 4589] = 0.0 + k[1819]*y_cur[IDX_C3H2II] + - k[1820]*y_cur[IDX_C3H3II] - k[1827]*y_cur[IDX_C6H2II] + - k[1828]*y_cur[IDX_CH2CCHII]; - data[jistart + 4590] = 0.0 + k[1759]*y_cur[IDX_C3H2II] - - k[1792]*y_cur[IDX_C6H2II] - k[1793]*y_cur[IDX_C6H2II]; - data[jistart + 4591] = 0.0 + k[1759]*y_cur[IDX_C3H2I] + - k[1782]*y_cur[IDX_H2CCCI] + k[1819]*y_cur[IDX_C3HI]; - data[jistart + 4592] = 0.0 + k[1820]*y_cur[IDX_C3HI]; - data[jistart + 4593] = 0.0 + k[1490]*y_cur[IDX_C2H2II] + - k[1587]*y_cur[IDX_C2H3II]; - data[jistart + 4594] = 0.0 + k[1551]*y_cur[IDX_C2H2I]; - data[jistart + 4595] = 0.0 + k[1520]*y_cur[IDX_C2H2II] + - k[1837]*y_cur[IDX_C4H2II]; - data[jistart + 4596] = 0.0 + k[1736]*y_cur[IDX_C2HI] + - k[1837]*y_cur[IDX_C4H2I]; - data[jistart + 4597] = 0.0 + k[2178]*y_cur[IDX_CH4I]; - data[jistart + 4598] = 0.0 + k[1657]*y_cur[IDX_C2H4II] + - k[2054]*y_cur[IDX_CH3II]; - data[jistart + 4599] = 0.0 + k[1871]*y_cur[IDX_CI]; - data[jistart + 4600] = 0.0 + k[5552]*y_cur[IDX_H2I]; - data[jistart + 4601] = 0.0 + k[1599]*y_cur[IDX_C2H3II] + - k[2620]*y_cur[IDX_H3II] + k[2925]*y_cur[IDX_HCOII]; - data[jistart + 4602] = 0.0 + k[2418]*y_cur[IDX_H2I]; - data[jistart + 4603] = 0.0 + k[217]*y_cur[IDX_C2H2II] + - k[347]*y_cur[IDX_HII] + k[6036]; - data[jistart + 4604] = 0.0 - k[852]*y_cur[IDX_eM] - - k[853]*y_cur[IDX_eM] - k[1639]*y_cur[IDX_C2H3I] - - k[1640]*y_cur[IDX_C2H3I] - k[1703]*y_cur[IDX_C2H4I] - - k[1739]*y_cur[IDX_C2HI] - k[1792]*y_cur[IDX_C3H2I] - - k[1793]*y_cur[IDX_C3H2I] - k[1827]*y_cur[IDX_C3HI] - - k[1872]*y_cur[IDX_CI] - k[1873]*y_cur[IDX_CI] - - k[2039]*y_cur[IDX_CH2CCHI] - k[2040]*y_cur[IDX_CH2CCHI] - - k[2110]*y_cur[IDX_CH3CCHI] - k[2185]*y_cur[IDX_CH4I] - - k[2186]*y_cur[IDX_CH4I] - k[2483]*y_cur[IDX_H2CCCI] - - k[2484]*y_cur[IDX_H2CCCI] - k[3423]*y_cur[IDX_NI] - - k[3710]*y_cur[IDX_OI] - k[6785]*y_cur[IDX_GRAINM] - - k[6786]*y_cur[IDX_GRAINM]; - data[jistart + 4605] = 0.0 - k[2039]*y_cur[IDX_C6H2II] - - k[2040]*y_cur[IDX_C6H2II]; - data[jistart + 4606] = 0.0 + k[1828]*y_cur[IDX_C3HI]; - data[jistart + 4607] = 0.0 + k[2054]*y_cur[IDX_C5HI]; - data[jistart + 4608] = 0.0 + k[1357]*y_cur[IDX_CII]; - data[jistart + 4609] = 0.0 - k[2110]*y_cur[IDX_C6H2II]; - data[jistart + 4610] = 0.0 + k[2178]*y_cur[IDX_C5II] - - k[2185]*y_cur[IDX_C6H2II] - k[2186]*y_cur[IDX_C6H2II]; - data[jistart + 4611] = 0.0 - k[6785]*y_cur[IDX_C6H2II] - - k[6786]*y_cur[IDX_C6H2II]; - data[jistart + 4612] = 0.0 + k[347]*y_cur[IDX_C6H2I]; - data[jistart + 4613] = 0.0 + k[2418]*y_cur[IDX_C6HII] + - k[5552]*y_cur[IDX_C6II]; - data[jistart + 4614] = 0.0 + k[1782]*y_cur[IDX_C3H2II] - - k[2483]*y_cur[IDX_C6H2II] - k[2484]*y_cur[IDX_C6H2II]; - data[jistart + 4615] = 0.0 + k[2620]*y_cur[IDX_C6HI]; - data[jistart + 4616] = 0.0 + k[2925]*y_cur[IDX_C6HI]; - data[jistart + 4617] = 0.0 - k[3423]*y_cur[IDX_C6H2II]; - data[jistart + 4618] = 0.0 - k[3710]*y_cur[IDX_C6H2II]; - data[jistart + 4619] = 0.0 - k[852]*y_cur[IDX_C6H2II] - - k[853]*y_cur[IDX_C6H2II]; - data[jistart + 4620] = 0.0 - k[1874]*y_cur[IDX_C6H3II] - - k[1875]*y_cur[IDX_C6H3II]; - data[jistart + 4621] = 0.0 + k[1358]*y_cur[IDX_CH3C4HI] + - k[1359]*y_cur[IDX_CH3C5NI]; - data[jistart + 4622] = 0.0 + k[1737]*y_cur[IDX_C4H3II]; - data[jistart + 4623] = 0.0 + k[1552]*y_cur[IDX_C4H2II]; - data[jistart + 4624] = 0.0 + k[1521]*y_cur[IDX_C4H2I]; - data[jistart + 4625] = 0.0 + k[1632]*y_cur[IDX_C4HII] + - k[1633]*y_cur[IDX_C4H2II]; - data[jistart + 4626] = 0.0 + k[1588]*y_cur[IDX_C4HI] + - k[1595]*y_cur[IDX_C6H2I] + k[1622]*y_cur[IDX_C4H2I]; - data[jistart + 4627] = 0.0 + k[1655]*y_cur[IDX_C5H2I]; - data[jistart + 4628] = 0.0 + k[1821]*y_cur[IDX_C3H3II] + - k[1829]*y_cur[IDX_CH2CCHII]; - data[jistart + 4629] = 0.0 + k[1760]*y_cur[IDX_C3H2II] + - k[1786]*y_cur[IDX_C3H3II] + k[1794]*y_cur[IDX_CH2CCHII]; - data[jistart + 4630] = 0.0 + k[1760]*y_cur[IDX_C3H2I] + - k[1783]*y_cur[IDX_H2CCCI]; - data[jistart + 4631] = 0.0 + k[1786]*y_cur[IDX_C3H2I] + - k[1821]*y_cur[IDX_C3HI] + k[2476]*y_cur[IDX_H2CCCI]; - data[jistart + 4632] = 0.0 + k[1588]*y_cur[IDX_C2H3II]; - data[jistart + 4633] = 0.0 + k[1632]*y_cur[IDX_C2H3I]; - data[jistart + 4634] = 0.0 + k[1521]*y_cur[IDX_C2H2II] + - k[1622]*y_cur[IDX_C2H3II] + k[2850]*y_cur[IDX_C4H3II]; - data[jistart + 4635] = 0.0 + k[1552]*y_cur[IDX_C2H2I] + - k[1633]*y_cur[IDX_C2H3I]; - data[jistart + 4636] = 0.0 + k[1737]*y_cur[IDX_C2HI] + - k[2850]*y_cur[IDX_C4H2I]; - data[jistart + 4637] = 0.0 + k[2179]*y_cur[IDX_CH4I]; - data[jistart + 4638] = 0.0 + k[1655]*y_cur[IDX_C2H4II] + - k[2053]*y_cur[IDX_CH3II]; - data[jistart + 4639] = 0.0 + k[1595]*y_cur[IDX_C2H3II] + - k[2618]*y_cur[IDX_H3II] + k[2923]*y_cur[IDX_HCOII]; - data[jistart + 4640] = 0.0 - k[854]*y_cur[IDX_eM] - - k[855]*y_cur[IDX_eM] - k[1874]*y_cur[IDX_CI] - k[1875]*y_cur[IDX_CI] - - k[3711]*y_cur[IDX_OI] - k[6789]*y_cur[IDX_GRAINM] - - k[6790]*y_cur[IDX_GRAINM]; - data[jistart + 4641] = 0.0 + k[1794]*y_cur[IDX_C3H2I] + - k[1829]*y_cur[IDX_C3HI] + k[2485]*y_cur[IDX_H2CCCI]; - data[jistart + 4642] = 0.0 + k[2053]*y_cur[IDX_C5H2I]; - data[jistart + 4643] = 0.0 + k[1358]*y_cur[IDX_CII]; - data[jistart + 4644] = 0.0 + k[1359]*y_cur[IDX_CII]; - data[jistart + 4645] = 0.0 + k[2179]*y_cur[IDX_C5II]; - data[jistart + 4646] = 0.0 - k[6789]*y_cur[IDX_C6H3II] - - k[6790]*y_cur[IDX_C6H3II]; - data[jistart + 4647] = 0.0 + k[1783]*y_cur[IDX_C3H2II] + - k[2476]*y_cur[IDX_C3H3II] + k[2485]*y_cur[IDX_CH2CCHII]; - data[jistart + 4648] = 0.0 + k[2618]*y_cur[IDX_C6H2I]; - data[jistart + 4649] = 0.0 + k[2923]*y_cur[IDX_C6H2I]; - data[jistart + 4650] = 0.0 - k[3711]*y_cur[IDX_C6H3II]; - data[jistart + 4651] = 0.0 - k[854]*y_cur[IDX_C6H3II] - - k[855]*y_cur[IDX_C6H3II]; - data[jistart + 4652] = 0.0 + k[1553]*y_cur[IDX_C4H4II] + - k[5511]*y_cur[IDX_C4H2II]; - data[jistart + 4653] = 0.0 + k[1634]*y_cur[IDX_C4H2II] + - k[1635]*y_cur[IDX_C4H3II]; - data[jistart + 4654] = 0.0 + k[1623]*y_cur[IDX_C4H2I]; - data[jistart + 4655] = 0.0 + k[1695]*y_cur[IDX_C4HII] + - k[1696]*y_cur[IDX_C4H2II]; - data[jistart + 4656] = 0.0 + k[1654]*y_cur[IDX_C4HI] + - k[1678]*y_cur[IDX_C4H2I]; - data[jistart + 4657] = 0.0 + k[1787]*y_cur[IDX_C3H3II] + - k[1795]*y_cur[IDX_CH2CCHII]; - data[jistart + 4658] = 0.0 + k[1776]*y_cur[IDX_CH2CCHI]; - data[jistart + 4659] = 0.0 + k[1787]*y_cur[IDX_C3H2I] + - k[1805]*y_cur[IDX_CH2CCHI] + k[2477]*y_cur[IDX_H2CCCI]; - data[jistart + 4660] = 0.0 + k[1654]*y_cur[IDX_C2H4II]; - data[jistart + 4661] = 0.0 + k[1695]*y_cur[IDX_C2H4I]; - data[jistart + 4662] = 0.0 + k[1623]*y_cur[IDX_C2H3II] + - k[1678]*y_cur[IDX_C2H4II] + k[2851]*y_cur[IDX_C4H4II]; - data[jistart + 4663] = 0.0 + k[1634]*y_cur[IDX_C2H3I] + - k[1696]*y_cur[IDX_C2H4I] + k[5511]*y_cur[IDX_C2H2I]; - data[jistart + 4664] = 0.0 + k[1635]*y_cur[IDX_C2H3I]; - data[jistart + 4665] = 0.0 + k[1553]*y_cur[IDX_C2H2I] + - k[2851]*y_cur[IDX_C4H2I]; - data[jistart + 4666] = 0.0 + k[2180]*y_cur[IDX_CH4I]; - data[jistart + 4667] = 0.0 - k[856]*y_cur[IDX_eM] - - k[857]*y_cur[IDX_eM] - k[6796]*y_cur[IDX_GRAINM] - - k[6797]*y_cur[IDX_GRAINM]; - data[jistart + 4668] = 0.0 + k[1776]*y_cur[IDX_C3H2II] + - k[1805]*y_cur[IDX_C3H3II] + k[2029]*y_cur[IDX_CH2CCHII]; - data[jistart + 4669] = 0.0 + k[1795]*y_cur[IDX_C3H2I] + - k[2029]*y_cur[IDX_CH2CCHI] + k[2486]*y_cur[IDX_H2CCCI]; - data[jistart + 4670] = 0.0 + k[2180]*y_cur[IDX_C5H2II]; - data[jistart + 4671] = 0.0 - k[6796]*y_cur[IDX_C6H4II] - - k[6797]*y_cur[IDX_C6H4II]; - data[jistart + 4672] = 0.0 + k[2477]*y_cur[IDX_C3H3II] + - k[2486]*y_cur[IDX_CH2CCHII]; - data[jistart + 4673] = 0.0 - k[856]*y_cur[IDX_C6H4II] - - k[857]*y_cur[IDX_C6H4II]; - data[jistart + 4674] = 0.0 + k[1554]*y_cur[IDX_C4H4II] + - k[5520]*y_cur[IDX_C4H3II]; - data[jistart + 4675] = 0.0 + k[1636]*y_cur[IDX_C4H3II]; - data[jistart + 4676] = 0.0 + k[1697]*y_cur[IDX_C4H2II] - - k[1704]*y_cur[IDX_C6H5II]; - data[jistart + 4677] = 0.0 + k[1775]*y_cur[IDX_CH2CCH2I] + - k[1781]*y_cur[IDX_CH3CCHI]; - data[jistart + 4678] = 0.0 + k[1806]*y_cur[IDX_CH2CCHI]; - data[jistart + 4679] = 0.0 + k[1809]*y_cur[IDX_CH2CCH2I] + - k[1812]*y_cur[IDX_CH3CCHI]; - data[jistart + 4680] = 0.0 + k[1697]*y_cur[IDX_C2H4I]; - data[jistart + 4681] = 0.0 + k[1636]*y_cur[IDX_C2H3I] + - k[5520]*y_cur[IDX_C2H2I]; - data[jistart + 4682] = 0.0 + k[1554]*y_cur[IDX_C2H2I]; - data[jistart + 4683] = 0.0 + k[2181]*y_cur[IDX_CH4I]; - data[jistart + 4684] = 0.0 - k[858]*y_cur[IDX_eM] - - k[859]*y_cur[IDX_eM] - k[1704]*y_cur[IDX_C2H4I] - - k[3424]*y_cur[IDX_NI] - k[5553]*y_cur[IDX_H2I] - - k[6802]*y_cur[IDX_GRAINM] - k[6803]*y_cur[IDX_GRAINM]; - data[jistart + 4685] = 0.0 + k[3131]*y_cur[IDX_HeII]; - data[jistart + 4686] = 0.0 + k[2834]*y_cur[IDX_HI]; - data[jistart + 4687] = 0.0 + k[1806]*y_cur[IDX_C3H3II] + - k[2030]*y_cur[IDX_CH2CCHII]; - data[jistart + 4688] = 0.0 + k[2030]*y_cur[IDX_CH2CCHI]; - data[jistart + 4689] = 0.0 + k[1775]*y_cur[IDX_C3H2II] + - k[1809]*y_cur[IDX_C3H4II]; - data[jistart + 4690] = 0.0 + k[1781]*y_cur[IDX_C3H2II] + - k[1812]*y_cur[IDX_C3H4II]; - data[jistart + 4691] = 0.0 + k[2181]*y_cur[IDX_C5H2II]; - data[jistart + 4692] = 0.0 - k[6802]*y_cur[IDX_C6H5II] - - k[6803]*y_cur[IDX_C6H5II]; - data[jistart + 4693] = 0.0 + k[2834]*y_cur[IDX_C6H6II]; - data[jistart + 4694] = 0.0 - k[5553]*y_cur[IDX_C6H5II]; - data[jistart + 4695] = 0.0 + k[3131]*y_cur[IDX_C6H6I]; - data[jistart + 4696] = 0.0 - k[3424]*y_cur[IDX_C6H5II]; - data[jistart + 4697] = 0.0 - k[858]*y_cur[IDX_C6H5II] - - k[859]*y_cur[IDX_C6H5II]; - data[jistart + 4698] = 0.0 - k[157]*y_cur[IDX_C6H6I] - - k[1328]*y_cur[IDX_C6H6I] - k[1329]*y_cur[IDX_C6H6I] - - k[1330]*y_cur[IDX_C6H6I]; - data[jistart + 4699] = 0.0 - k[1598]*y_cur[IDX_C6H6I]; - data[jistart + 4700] = 0.0 - k[1814]*y_cur[IDX_C6H6I]; - data[jistart + 4701] = 0.0 - k[157]*y_cur[IDX_CII] - - k[1328]*y_cur[IDX_CII] - k[1329]*y_cur[IDX_CII] - - k[1330]*y_cur[IDX_CII] - k[1598]*y_cur[IDX_C2H3II] - - k[1814]*y_cur[IDX_C3H5II] - k[2221]*y_cur[IDX_CH5II] - - k[2619]*y_cur[IDX_H3II] - k[2783]*y_cur[IDX_H3OII] - - k[2924]*y_cur[IDX_HCOII] - k[3130]*y_cur[IDX_HeII] - - k[3131]*y_cur[IDX_HeII] - k[3368]*y_cur[IDX_N2HII] - k[5751] - - k[6038] - k[7047]; - data[jistart + 4702] = 0.0 + k[862]*y_cur[IDX_eM] + - k[6808]*y_cur[IDX_GRAINM]; - data[jistart + 4703] = 0.0 - k[2221]*y_cur[IDX_C6H6I]; - data[jistart + 4704] = 0.0 + k[7229] + k[7411] + k[7593]; - data[jistart + 4705] = 0.0 + k[6808]*y_cur[IDX_C6H7II]; - data[jistart + 4706] = 0.0 - k[2619]*y_cur[IDX_C6H6I]; - data[jistart + 4707] = 0.0 - k[2783]*y_cur[IDX_C6H6I]; - data[jistart + 4708] = 0.0 - k[2924]*y_cur[IDX_C6H6I]; - data[jistart + 4709] = 0.0 - k[3130]*y_cur[IDX_C6H6I] - - k[3131]*y_cur[IDX_C6H6I]; - data[jistart + 4710] = 0.0 - k[3368]*y_cur[IDX_C6H6I]; - data[jistart + 4711] = 0.0 + k[862]*y_cur[IDX_C6H7II]; - data[jistart + 4712] = 0.0 + k[157]*y_cur[IDX_C6H6I]; - data[jistart + 4713] = 0.0 + k[157]*y_cur[IDX_CII]; - data[jistart + 4714] = 0.0 - k[860]*y_cur[IDX_eM] - - k[2834]*y_cur[IDX_HI] - k[6806]*y_cur[IDX_GRAINM]; - data[jistart + 4715] = 0.0 - k[6806]*y_cur[IDX_C6H6II]; - data[jistart + 4716] = 0.0 - k[2834]*y_cur[IDX_C6H6II]; - data[jistart + 4717] = 0.0 - k[860]*y_cur[IDX_C6H6II]; - data[jistart + 4718] = 0.0 + k[1598]*y_cur[IDX_C6H6I]; - data[jistart + 4719] = 0.0 + k[1704]*y_cur[IDX_C6H5II]; - data[jistart + 4720] = 0.0 + k[1810]*y_cur[IDX_CH2CCH2I] + - k[1813]*y_cur[IDX_CH3CCHI]; - data[jistart + 4721] = 0.0 + k[1814]*y_cur[IDX_C6H6I] + - k[2104]*y_cur[IDX_CH3CCHI]; - data[jistart + 4722] = 0.0 + k[1704]*y_cur[IDX_C2H4I] + - k[5553]*y_cur[IDX_H2I]; - data[jistart + 4723] = 0.0 + k[1598]*y_cur[IDX_C2H3II] + - k[1814]*y_cur[IDX_C3H5II] + k[2221]*y_cur[IDX_CH5II] + - k[2619]*y_cur[IDX_H3II] + k[2783]*y_cur[IDX_H3OII] + - k[2924]*y_cur[IDX_HCOII] + k[3368]*y_cur[IDX_N2HII]; - data[jistart + 4724] = 0.0 - k[861]*y_cur[IDX_eM] - - k[862]*y_cur[IDX_eM] - k[6807]*y_cur[IDX_GRAINM] - - k[6808]*y_cur[IDX_GRAINM]; - data[jistart + 4725] = 0.0 + k[1810]*y_cur[IDX_C3H4II]; - data[jistart + 4726] = 0.0 + k[1813]*y_cur[IDX_C3H4II] + - k[2104]*y_cur[IDX_C3H5II]; - data[jistart + 4727] = 0.0 + k[2221]*y_cur[IDX_C6H6I]; - data[jistart + 4728] = 0.0 - k[6807]*y_cur[IDX_C6H7II] - - k[6808]*y_cur[IDX_C6H7II]; - data[jistart + 4729] = 0.0 + k[5553]*y_cur[IDX_C6H5II]; - data[jistart + 4730] = 0.0 + k[2619]*y_cur[IDX_C6H6I]; - data[jistart + 4731] = 0.0 + k[2783]*y_cur[IDX_C6H6I]; - data[jistart + 4732] = 0.0 + k[2924]*y_cur[IDX_C6H6I]; - data[jistart + 4733] = 0.0 + k[3368]*y_cur[IDX_C6H6I]; - data[jistart + 4734] = 0.0 - k[861]*y_cur[IDX_C6H7II] - - k[862]*y_cur[IDX_C6H7II]; - data[jistart + 4735] = 0.0 + k[47]*y_cur[IDX_C6M] + - k[4933]*y_cur[IDX_C6HI] - k[4934]*y_cur[IDX_C7I] + - k[4937]*y_cur[IDX_C7NI] + k[4938]*y_cur[IDX_C8I]; - data[jistart + 4736] = 0.0 + k[4411]*y_cur[IDX_C7M] - - k[5500]*y_cur[IDX_C7I]; - data[jistart + 4737] = 0.0 + k[5953]; - data[jistart + 4738] = 0.0 + k[3377]*y_cur[IDX_NI]; - data[jistart + 4739] = 0.0 + k[5965]; - data[jistart + 4740] = 0.0 + k[5972]; - data[jistart + 4741] = 0.0 + k[736]*y_cur[IDX_eM] + - k[6885]*y_cur[IDX_GRAINM]; - data[jistart + 4742] = 0.0 + k[27]*y_cur[IDX_C5M]; - data[jistart + 4743] = 0.0 + k[13]*y_cur[IDX_C5I] - - k[15]*y_cur[IDX_C7I]; - data[jistart + 4744] = 0.0 + k[4412]*y_cur[IDX_C7M]; - data[jistart + 4745] = 0.0 + k[4413]*y_cur[IDX_C7M]; - data[jistart + 4746] = 0.0 + k[23]*y_cur[IDX_C4M]; - data[jistart + 4747] = 0.0 + k[18]*y_cur[IDX_C4I] - - k[21]*y_cur[IDX_C7I]; - data[jistart + 4748] = 0.0 + k[18]*y_cur[IDX_C3M]; - data[jistart + 4749] = 0.0 + k[23]*y_cur[IDX_C3I]; - data[jistart + 4750] = 0.0 + k[4414]*y_cur[IDX_C7M]; - data[jistart + 4751] = 0.0 + k[4415]*y_cur[IDX_C7M]; - data[jistart + 4752] = 0.0 + k[4416]*y_cur[IDX_C7M]; - data[jistart + 4753] = 0.0 + k[13]*y_cur[IDX_C2M]; - data[jistart + 4754] = 0.0 + k[27]*y_cur[IDX_C2I]; - data[jistart + 4755] = 0.0 + k[47]*y_cur[IDX_CI]; - data[jistart + 4756] = 0.0 + k[4933]*y_cur[IDX_CI]; - data[jistart + 4757] = 0.0 - k[15]*y_cur[IDX_C2M] - - k[21]*y_cur[IDX_C3M] - k[349]*y_cur[IDX_HII] - - k[2621]*y_cur[IDX_H3II] - k[2926]*y_cur[IDX_HCOII] - - k[3134]*y_cur[IDX_HeII] - k[3135]*y_cur[IDX_HeII] - - k[4934]*y_cur[IDX_CI] - k[5244]*y_cur[IDX_NI] - - k[5370]*y_cur[IDX_OI] - k[5500]*y_cur[IDX_CII] - - k[5601]*y_cur[IDX_eM] - k[5756] - k[6042] - k[6043] - k[7050]; - data[jistart + 4758] = 0.0 + k[4411]*y_cur[IDX_CII] + - k[4412]*y_cur[IDX_C2H2II] + k[4413]*y_cur[IDX_C2H3II] + - k[4414]*y_cur[IDX_C4H2II] + k[4415]*y_cur[IDX_C4H3II] + - k[4416]*y_cur[IDX_C4SII] + k[4417]*y_cur[IDX_CH2CCHII] + - k[4418]*y_cur[IDX_CH3II] + k[4419]*y_cur[IDX_CNCII] + - k[4420]*y_cur[IDX_FeII] + k[4421]*y_cur[IDX_HII] + - k[4422]*y_cur[IDX_H2COII] + k[4423]*y_cur[IDX_H2SII] + - k[4424]*y_cur[IDX_H3II] + k[4425]*y_cur[IDX_H3OII] + - k[4426]*y_cur[IDX_HC2SII] + k[4427]*y_cur[IDX_HCNHII] + - k[4428]*y_cur[IDX_HCNHII] + k[4429]*y_cur[IDX_HCOII] + - k[4430]*y_cur[IDX_HCOII] + k[4431]*y_cur[IDX_HeII] + - k[4432]*y_cur[IDX_MgII] + k[4433]*y_cur[IDX_NII] + - k[4434]*y_cur[IDX_N2HII] + k[4435]*y_cur[IDX_NH3II] + - k[4436]*y_cur[IDX_NH4II] + k[4437]*y_cur[IDX_NOII] + - k[4438]*y_cur[IDX_NaII] + k[4439]*y_cur[IDX_OII] + - k[4440]*y_cur[IDX_SII] + k[4441]*y_cur[IDX_SOII] + - k[4442]*y_cur[IDX_SiII] + k[4443]*y_cur[IDX_SiOII] + - k[4444]*y_cur[IDX_SiOHII] + k[4445]*y_cur[IDX_SiSII] + k[5755] + - k[6041]; - data[jistart + 4759] = 0.0 + k[5759] + k[6047]; - data[jistart + 4760] = 0.0 + k[867]*y_cur[IDX_eM] + - k[6825]*y_cur[IDX_GRAINM]; - data[jistart + 4761] = 0.0 + k[868]*y_cur[IDX_eM] + - k[6826]*y_cur[IDX_GRAINM]; - data[jistart + 4762] = 0.0 + k[4937]*y_cur[IDX_CI]; - data[jistart + 4763] = 0.0 + k[4938]*y_cur[IDX_CI] + - k[5248]*y_cur[IDX_NI] + k[5373]*y_cur[IDX_OI] + k[5762] + k[6052]; - data[jistart + 4764] = 0.0 + k[878]*y_cur[IDX_eM] + - k[6837]*y_cur[IDX_GRAINM]; - data[jistart + 4765] = 0.0 + k[3438]*y_cur[IDX_NI]; - data[jistart + 4766] = 0.0 + k[889]*y_cur[IDX_eM] + - k[6855]*y_cur[IDX_GRAINM]; - data[jistart + 4767] = 0.0 + k[4417]*y_cur[IDX_C7M]; - data[jistart + 4768] = 0.0 + k[4418]*y_cur[IDX_C7M]; - data[jistart + 4769] = 0.0 + k[4419]*y_cur[IDX_C7M]; - data[jistart + 4770] = 0.0 + k[4420]*y_cur[IDX_C7M]; - data[jistart + 4771] = 0.0 + k[8676]*y_cur[IDX_GC6I]; - data[jistart + 4772] = 0.0 + k[8676]*y_cur[IDX_GCI]; - data[jistart + 4773] = 0.0 + k[7232] + k[7414] + k[7596]; - data[jistart + 4774] = 0.0 + k[6825]*y_cur[IDX_C7HII] + - k[6826]*y_cur[IDX_C7H2II] + k[6837]*y_cur[IDX_C8II] + - k[6855]*y_cur[IDX_C9II] + k[6885]*y_cur[IDX_C11II]; - data[jistart + 4775] = 0.0 - k[349]*y_cur[IDX_C7I] + - k[4421]*y_cur[IDX_C7M]; - data[jistart + 4776] = 0.0 + k[4422]*y_cur[IDX_C7M]; - data[jistart + 4777] = 0.0 + k[4423]*y_cur[IDX_C7M]; - data[jistart + 4778] = 0.0 - k[2621]*y_cur[IDX_C7I] + - k[4424]*y_cur[IDX_C7M]; - data[jistart + 4779] = 0.0 + k[4425]*y_cur[IDX_C7M]; - data[jistart + 4780] = 0.0 + k[4426]*y_cur[IDX_C7M]; - data[jistart + 4781] = 0.0 + k[4427]*y_cur[IDX_C7M] + - k[4428]*y_cur[IDX_C7M]; - data[jistart + 4782] = 0.0 - k[2926]*y_cur[IDX_C7I] + - k[4429]*y_cur[IDX_C7M] + k[4430]*y_cur[IDX_C7M]; - data[jistart + 4783] = 0.0 - k[3134]*y_cur[IDX_C7I] - - k[3135]*y_cur[IDX_C7I] + k[4431]*y_cur[IDX_C7M]; - data[jistart + 4784] = 0.0 + k[4432]*y_cur[IDX_C7M]; - data[jistart + 4785] = 0.0 + k[3377]*y_cur[IDX_C10M] + - k[3438]*y_cur[IDX_C8M] - k[5244]*y_cur[IDX_C7I] + - k[5248]*y_cur[IDX_C8I]; - data[jistart + 4786] = 0.0 + k[4433]*y_cur[IDX_C7M]; - data[jistart + 4787] = 0.0 + k[4434]*y_cur[IDX_C7M]; - data[jistart + 4788] = 0.0 + k[4435]*y_cur[IDX_C7M]; - data[jistart + 4789] = 0.0 + k[4436]*y_cur[IDX_C7M]; - data[jistart + 4790] = 0.0 + k[4437]*y_cur[IDX_C7M]; - data[jistart + 4791] = 0.0 + k[4438]*y_cur[IDX_C7M]; - data[jistart + 4792] = 0.0 - k[5370]*y_cur[IDX_C7I] + - k[5373]*y_cur[IDX_C8I]; - data[jistart + 4793] = 0.0 + k[4439]*y_cur[IDX_C7M]; - data[jistart + 4794] = 0.0 + k[4440]*y_cur[IDX_C7M]; - data[jistart + 4795] = 0.0 + k[4441]*y_cur[IDX_C7M]; - data[jistart + 4796] = 0.0 + k[4442]*y_cur[IDX_C7M]; - data[jistart + 4797] = 0.0 + k[4443]*y_cur[IDX_C7M]; - data[jistart + 4798] = 0.0 + k[4444]*y_cur[IDX_C7M]; - data[jistart + 4799] = 0.0 + k[4445]*y_cur[IDX_C7M]; - data[jistart + 4800] = 0.0 + k[736]*y_cur[IDX_C11II] + - k[867]*y_cur[IDX_C7HII] + k[868]*y_cur[IDX_C7H2II] + - k[878]*y_cur[IDX_C8II] + k[889]*y_cur[IDX_C9II] - - k[5601]*y_cur[IDX_C7I]; - data[jistart + 4801] = 0.0 + k[1872]*y_cur[IDX_C6H2II]; - data[jistart + 4802] = 0.0 + k[1326]*y_cur[IDX_C6H2I] + - k[1331]*y_cur[IDX_C6HI] + k[5499]*y_cur[IDX_C6I]; - data[jistart + 4803] = 0.0 + k[3059]*y_cur[IDX_HeII]; - data[jistart + 4804] = 0.0 + k[3069]*y_cur[IDX_HeII]; - data[jistart + 4805] = 0.0 + k[1822]*y_cur[IDX_C4HII]; - data[jistart + 4806] = 0.0 + k[1822]*y_cur[IDX_C3HI]; - data[jistart + 4807] = 0.0 + k[5499]*y_cur[IDX_CII]; - data[jistart + 4808] = 0.0 + k[1331]*y_cur[IDX_CII]; - data[jistart + 4809] = 0.0 + k[1326]*y_cur[IDX_CII]; - data[jistart + 4810] = 0.0 + k[1872]*y_cur[IDX_CI]; - data[jistart + 4811] = 0.0 + k[349]*y_cur[IDX_HII] + k[6043]; - data[jistart + 4812] = 0.0 - k[863]*y_cur[IDX_eM] - - k[864]*y_cur[IDX_eM] - k[865]*y_cur[IDX_eM] - k[2419]*y_cur[IDX_H2I] - - k[6821]*y_cur[IDX_GRAINM] - k[6822]*y_cur[IDX_GRAINM] - - k[6823]*y_cur[IDX_GRAINM]; - data[jistart + 4813] = 0.0 + k[2309]*y_cur[IDX_HII] + - k[3140]*y_cur[IDX_HeII]; - data[jistart + 4814] = 0.0 + k[3137]*y_cur[IDX_HeII]; - data[jistart + 4815] = 0.0 + k[3143]*y_cur[IDX_HeII]; - data[jistart + 4816] = 0.0 + k[3149]*y_cur[IDX_HeII]; - data[jistart + 4817] = 0.0 - k[6821]*y_cur[IDX_C7II] - - k[6822]*y_cur[IDX_C7II] - k[6823]*y_cur[IDX_C7II]; - data[jistart + 4818] = 0.0 + k[349]*y_cur[IDX_C7I] + - k[2309]*y_cur[IDX_C7HI]; - data[jistart + 4819] = 0.0 - k[2419]*y_cur[IDX_C7II]; - data[jistart + 4820] = 0.0 + k[3059]*y_cur[IDX_C10I] + - k[3069]*y_cur[IDX_C10HI] + k[3137]*y_cur[IDX_C7H2I] + - k[3140]*y_cur[IDX_C7HI] + k[3143]*y_cur[IDX_C8I] + - k[3149]*y_cur[IDX_C9I]; - data[jistart + 4821] = 0.0 - k[863]*y_cur[IDX_C7II] - - k[864]*y_cur[IDX_C7II] - k[865]*y_cur[IDX_C7II]; - data[jistart + 4822] = 0.0 - k[49]*y_cur[IDX_C7M]; - data[jistart + 4823] = 0.0 - k[4411]*y_cur[IDX_C7M]; - data[jistart + 4824] = 0.0 - k[34]*y_cur[IDX_C7M]; - data[jistart + 4825] = 0.0 - k[4412]*y_cur[IDX_C7M]; - data[jistart + 4826] = 0.0 - k[4413]*y_cur[IDX_C7M]; - data[jistart + 4827] = 0.0 - k[35]*y_cur[IDX_C7M]; - data[jistart + 4828] = 0.0 - k[4414]*y_cur[IDX_C7M]; - data[jistart + 4829] = 0.0 - k[4415]*y_cur[IDX_C7M]; - data[jistart + 4830] = 0.0 - k[4416]*y_cur[IDX_C7M]; - data[jistart + 4831] = 0.0 + k[5601]*y_cur[IDX_eM]; - data[jistart + 4832] = 0.0 - k[34]*y_cur[IDX_C2I] - - k[35]*y_cur[IDX_C3I] - k[49]*y_cur[IDX_CI] - k[99]*y_cur[IDX_HI] - - k[118]*y_cur[IDX_NI] - k[3425]*y_cur[IDX_NI] - k[3426]*y_cur[IDX_NI] - - k[3427]*y_cur[IDX_NI] - k[3428]*y_cur[IDX_NI] - - k[3712]*y_cur[IDX_OI] - k[4411]*y_cur[IDX_CII] - - k[4412]*y_cur[IDX_C2H2II] - k[4413]*y_cur[IDX_C2H3II] - - k[4414]*y_cur[IDX_C4H2II] - k[4415]*y_cur[IDX_C4H3II] - - k[4416]*y_cur[IDX_C4SII] - k[4417]*y_cur[IDX_CH2CCHII] - - k[4418]*y_cur[IDX_CH3II] - k[4419]*y_cur[IDX_CNCII] - - k[4420]*y_cur[IDX_FeII] - k[4421]*y_cur[IDX_HII] - - k[4422]*y_cur[IDX_H2COII] - k[4423]*y_cur[IDX_H2SII] - - k[4424]*y_cur[IDX_H3II] - k[4425]*y_cur[IDX_H3OII] - - k[4426]*y_cur[IDX_HC2SII] - k[4427]*y_cur[IDX_HCNHII] - - k[4428]*y_cur[IDX_HCNHII] - k[4429]*y_cur[IDX_HCOII] - - k[4430]*y_cur[IDX_HCOII] - k[4431]*y_cur[IDX_HeII] - - k[4432]*y_cur[IDX_MgII] - k[4433]*y_cur[IDX_NII] - - k[4434]*y_cur[IDX_N2HII] - k[4435]*y_cur[IDX_NH3II] - - k[4436]*y_cur[IDX_NH4II] - k[4437]*y_cur[IDX_NOII] - - k[4438]*y_cur[IDX_NaII] - k[4439]*y_cur[IDX_OII] - - k[4440]*y_cur[IDX_SII] - k[4441]*y_cur[IDX_SOII] - - k[4442]*y_cur[IDX_SiII] - k[4443]*y_cur[IDX_SiOII] - - k[4444]*y_cur[IDX_SiOHII] - k[4445]*y_cur[IDX_SiSII] - k[5755] - - k[6041]; - data[jistart + 4833] = 0.0 + k[3439]*y_cur[IDX_NI] + - k[3717]*y_cur[IDX_OI]; - data[jistart + 4834] = 0.0 - k[4417]*y_cur[IDX_C7M]; - data[jistart + 4835] = 0.0 - k[4418]*y_cur[IDX_C7M]; - data[jistart + 4836] = 0.0 - k[4419]*y_cur[IDX_C7M]; - data[jistart + 4837] = 0.0 - k[4420]*y_cur[IDX_C7M]; - data[jistart + 4838] = 0.0 - k[99]*y_cur[IDX_C7M]; - data[jistart + 4839] = 0.0 - k[4421]*y_cur[IDX_C7M]; - data[jistart + 4840] = 0.0 - k[4422]*y_cur[IDX_C7M]; - data[jistart + 4841] = 0.0 - k[4423]*y_cur[IDX_C7M]; - data[jistart + 4842] = 0.0 - k[4424]*y_cur[IDX_C7M]; - data[jistart + 4843] = 0.0 - k[4425]*y_cur[IDX_C7M]; - data[jistart + 4844] = 0.0 - k[4426]*y_cur[IDX_C7M]; - data[jistart + 4845] = 0.0 - k[4427]*y_cur[IDX_C7M] - - k[4428]*y_cur[IDX_C7M]; - data[jistart + 4846] = 0.0 - k[4429]*y_cur[IDX_C7M] - - k[4430]*y_cur[IDX_C7M]; - data[jistart + 4847] = 0.0 - k[4431]*y_cur[IDX_C7M]; - data[jistart + 4848] = 0.0 - k[4432]*y_cur[IDX_C7M]; - data[jistart + 4849] = 0.0 - k[118]*y_cur[IDX_C7M] - - k[3425]*y_cur[IDX_C7M] - k[3426]*y_cur[IDX_C7M] - - k[3427]*y_cur[IDX_C7M] - k[3428]*y_cur[IDX_C7M] + - k[3439]*y_cur[IDX_C8M]; - data[jistart + 4850] = 0.0 - k[4433]*y_cur[IDX_C7M]; - data[jistart + 4851] = 0.0 - k[4434]*y_cur[IDX_C7M]; - data[jistart + 4852] = 0.0 - k[4435]*y_cur[IDX_C7M]; - data[jistart + 4853] = 0.0 - k[4436]*y_cur[IDX_C7M]; - data[jistart + 4854] = 0.0 - k[4437]*y_cur[IDX_C7M]; - data[jistart + 4855] = 0.0 - k[4438]*y_cur[IDX_C7M]; - data[jistart + 4856] = 0.0 - k[3712]*y_cur[IDX_C7M] + - k[3717]*y_cur[IDX_C8M]; - data[jistart + 4857] = 0.0 - k[4439]*y_cur[IDX_C7M]; - data[jistart + 4858] = 0.0 - k[4440]*y_cur[IDX_C7M]; - data[jistart + 4859] = 0.0 - k[4441]*y_cur[IDX_C7M]; - data[jistart + 4860] = 0.0 - k[4442]*y_cur[IDX_C7M]; - data[jistart + 4861] = 0.0 - k[4443]*y_cur[IDX_C7M]; - data[jistart + 4862] = 0.0 - k[4444]*y_cur[IDX_C7M]; - data[jistart + 4863] = 0.0 - k[4445]*y_cur[IDX_C7M]; - data[jistart + 4864] = 0.0 + k[5601]*y_cur[IDX_C7I]; - data[jistart + 4865] = 0.0 + k[48]*y_cur[IDX_C6HM] + - k[4932]*y_cur[IDX_C6H2I] - k[4936]*y_cur[IDX_C7HI]; - data[jistart + 4866] = 0.0 - k[1334]*y_cur[IDX_C7HI] + - k[4446]*y_cur[IDX_C7HM]; - data[jistart + 4867] = 0.0 + k[5966]; - data[jistart + 4868] = 0.0 + k[731]*y_cur[IDX_eM] + - k[6873]*y_cur[IDX_GRAINM]; - data[jistart + 4869] = 0.0 + k[3381]*y_cur[IDX_NI]; - data[jistart + 4870] = 0.0 + k[5960]; - data[jistart + 4871] = 0.0 - k[1501]*y_cur[IDX_C7HI] - - k[1502]*y_cur[IDX_C7HI] + k[4447]*y_cur[IDX_C7HM]; - data[jistart + 4872] = 0.0 - k[1605]*y_cur[IDX_C7HI] - - k[1606]*y_cur[IDX_C7HI] - k[1607]*y_cur[IDX_C7HI] + - k[4448]*y_cur[IDX_C7HM]; - data[jistart + 4873] = 0.0 - k[1665]*y_cur[IDX_C7HI] - - k[1666]*y_cur[IDX_C7HI]; - data[jistart + 4874] = 0.0 + k[4449]*y_cur[IDX_C7HM]; - data[jistart + 4875] = 0.0 + k[4450]*y_cur[IDX_C7HM]; - data[jistart + 4876] = 0.0 + k[4451]*y_cur[IDX_C7HM]; - data[jistart + 4877] = 0.0 + k[48]*y_cur[IDX_CI]; - data[jistart + 4878] = 0.0 + k[4932]*y_cur[IDX_CI]; - data[jistart + 4879] = 0.0 + k[99]*y_cur[IDX_HI]; - data[jistart + 4880] = 0.0 - k[351]*y_cur[IDX_HII] - - k[1334]*y_cur[IDX_CII] - k[1501]*y_cur[IDX_C2H2II] - - k[1502]*y_cur[IDX_C2H2II] - k[1605]*y_cur[IDX_C2H3II] - - k[1606]*y_cur[IDX_C2H3II] - k[1607]*y_cur[IDX_C2H3II] - - k[1665]*y_cur[IDX_C2H4II] - k[1666]*y_cur[IDX_C2H4II] - - k[2058]*y_cur[IDX_CH3II] - k[2309]*y_cur[IDX_HII] - - k[2623]*y_cur[IDX_H3II] - k[2928]*y_cur[IDX_HCOII] - - k[3139]*y_cur[IDX_HeII] - k[3140]*y_cur[IDX_HeII] - - k[4936]*y_cur[IDX_CI] - k[5246]*y_cur[IDX_NI] - - k[5371]*y_cur[IDX_OI] - k[5602]*y_cur[IDX_eM] - k[5759] - k[6047] - - k[6048] - k[7051]; - data[jistart + 4881] = 0.0 + k[4446]*y_cur[IDX_CII] + - k[4447]*y_cur[IDX_C2H2II] + k[4448]*y_cur[IDX_C2H3II] + - k[4449]*y_cur[IDX_C4H2II] + k[4450]*y_cur[IDX_C4H3II] + - k[4451]*y_cur[IDX_C4SII] + k[4452]*y_cur[IDX_CH2CCHII] + - k[4453]*y_cur[IDX_CH3II] + k[4454]*y_cur[IDX_CNCII] + - k[4455]*y_cur[IDX_FeII] + k[4456]*y_cur[IDX_HII] + - k[4457]*y_cur[IDX_H2COII] + k[4458]*y_cur[IDX_H2SII] + - k[4459]*y_cur[IDX_H3II] + k[4460]*y_cur[IDX_H3OII] + - k[4461]*y_cur[IDX_HC2SII] + k[4462]*y_cur[IDX_HCNHII] + - k[4463]*y_cur[IDX_HCNHII] + k[4464]*y_cur[IDX_HCOII] + - k[4465]*y_cur[IDX_HCOII] + k[4466]*y_cur[IDX_HeII] + - k[4467]*y_cur[IDX_MgII] + k[4468]*y_cur[IDX_NII] + - k[4469]*y_cur[IDX_N2HII] + k[4470]*y_cur[IDX_NH3II] + - k[4471]*y_cur[IDX_NH4II] + k[4472]*y_cur[IDX_NOII] + - k[4473]*y_cur[IDX_NaII] + k[4474]*y_cur[IDX_OII] + - k[4475]*y_cur[IDX_SII] + k[4476]*y_cur[IDX_SOII] + - k[4477]*y_cur[IDX_SiII] + k[4478]*y_cur[IDX_SiOII] + - k[4479]*y_cur[IDX_SiOHII] + k[4480]*y_cur[IDX_SiSII] + k[5757] + - k[6044]; - data[jistart + 4882] = 0.0 + k[5758] + k[6046]; - data[jistart + 4883] = 0.0 + k[869]*y_cur[IDX_eM] + - k[6827]*y_cur[IDX_GRAINM]; - data[jistart + 4884] = 0.0 + k[871]*y_cur[IDX_eM] + - k[6829]*y_cur[IDX_GRAINM]; - data[jistart + 4885] = 0.0 + k[873]*y_cur[IDX_eM] + - k[6831]*y_cur[IDX_GRAINM]; - data[jistart + 4886] = 0.0 + k[5249]*y_cur[IDX_NI] + - k[5374]*y_cur[IDX_OI]; - data[jistart + 4887] = 0.0 + k[879]*y_cur[IDX_eM] + - k[6838]*y_cur[IDX_GRAINM]; - data[jistart + 4888] = 0.0 + k[3441]*y_cur[IDX_NI]; - data[jistart + 4889] = 0.0 + k[3719]*y_cur[IDX_OI]; - data[jistart + 4890] = 0.0 + k[4452]*y_cur[IDX_C7HM]; - data[jistart + 4891] = 0.0 - k[2058]*y_cur[IDX_C7HI] + - k[4453]*y_cur[IDX_C7HM]; - data[jistart + 4892] = 0.0 + k[4454]*y_cur[IDX_C7HM]; - data[jistart + 4893] = 0.0 + k[4455]*y_cur[IDX_C7HM]; - data[jistart + 4894] = 0.0 + k[8677]*y_cur[IDX_GC6HI]; - data[jistart + 4895] = 0.0 + k[8730]*y_cur[IDX_GCHI]; - data[jistart + 4896] = 0.0 + k[8677]*y_cur[IDX_GCI]; - data[jistart + 4897] = 0.0 + k[8641]*y_cur[IDX_GHI]; - data[jistart + 4898] = 0.0 + k[7233] + k[7415] + k[7597]; - data[jistart + 4899] = 0.0 + k[8730]*y_cur[IDX_GC6I]; - data[jistart + 4900] = 0.0 + k[8641]*y_cur[IDX_GC7I]; - data[jistart + 4901] = 0.0 + k[6827]*y_cur[IDX_C7H2II] + - k[6829]*y_cur[IDX_C7H3II] + k[6831]*y_cur[IDX_C7H4II] + - k[6838]*y_cur[IDX_C8HII] + k[6873]*y_cur[IDX_C10HII]; - data[jistart + 4902] = 0.0 + k[99]*y_cur[IDX_C7M]; - data[jistart + 4903] = 0.0 - k[351]*y_cur[IDX_C7HI] - - k[2309]*y_cur[IDX_C7HI] + k[4456]*y_cur[IDX_C7HM]; - data[jistart + 4904] = 0.0 + k[4457]*y_cur[IDX_C7HM]; - data[jistart + 4905] = 0.0 + k[4458]*y_cur[IDX_C7HM]; - data[jistart + 4906] = 0.0 - k[2623]*y_cur[IDX_C7HI] + - k[4459]*y_cur[IDX_C7HM]; - data[jistart + 4907] = 0.0 + k[4460]*y_cur[IDX_C7HM]; - data[jistart + 4908] = 0.0 + k[4461]*y_cur[IDX_C7HM]; - data[jistart + 4909] = 0.0 + k[4462]*y_cur[IDX_C7HM] + - k[4463]*y_cur[IDX_C7HM]; - data[jistart + 4910] = 0.0 - k[2928]*y_cur[IDX_C7HI] + - k[4464]*y_cur[IDX_C7HM] + k[4465]*y_cur[IDX_C7HM]; - data[jistart + 4911] = 0.0 - k[3139]*y_cur[IDX_C7HI] - - k[3140]*y_cur[IDX_C7HI] + k[4466]*y_cur[IDX_C7HM]; - data[jistart + 4912] = 0.0 + k[4467]*y_cur[IDX_C7HM]; - data[jistart + 4913] = 0.0 + k[3381]*y_cur[IDX_C10HM] + - k[3441]*y_cur[IDX_C8HM] - k[5246]*y_cur[IDX_C7HI] + - k[5249]*y_cur[IDX_C8HI]; - data[jistart + 4914] = 0.0 + k[4468]*y_cur[IDX_C7HM]; - data[jistart + 4915] = 0.0 + k[4469]*y_cur[IDX_C7HM]; - data[jistart + 4916] = 0.0 + k[4470]*y_cur[IDX_C7HM]; - data[jistart + 4917] = 0.0 + k[4471]*y_cur[IDX_C7HM]; - data[jistart + 4918] = 0.0 + k[4472]*y_cur[IDX_C7HM]; - data[jistart + 4919] = 0.0 + k[4473]*y_cur[IDX_C7HM]; - data[jistart + 4920] = 0.0 + k[3719]*y_cur[IDX_C8H2II] - - k[5371]*y_cur[IDX_C7HI] + k[5374]*y_cur[IDX_C8HI]; - data[jistart + 4921] = 0.0 + k[4474]*y_cur[IDX_C7HM]; - data[jistart + 4922] = 0.0 + k[4475]*y_cur[IDX_C7HM]; - data[jistart + 4923] = 0.0 + k[4476]*y_cur[IDX_C7HM]; - data[jistart + 4924] = 0.0 + k[4477]*y_cur[IDX_C7HM]; - data[jistart + 4925] = 0.0 + k[4478]*y_cur[IDX_C7HM]; - data[jistart + 4926] = 0.0 + k[4479]*y_cur[IDX_C7HM]; - data[jistart + 4927] = 0.0 + k[4480]*y_cur[IDX_C7HM]; - data[jistart + 4928] = 0.0 + k[731]*y_cur[IDX_C10HII] + - k[869]*y_cur[IDX_C7H2II] + k[871]*y_cur[IDX_C7H3II] + - k[873]*y_cur[IDX_C7H4II] + k[879]*y_cur[IDX_C8HII] - - k[5602]*y_cur[IDX_C7HI]; - data[jistart + 4929] = 0.0 + k[1873]*y_cur[IDX_C6H2II] + - k[1874]*y_cur[IDX_C6H3II] - k[1876]*y_cur[IDX_C7HII]; - data[jistart + 4930] = 0.0 + k[1327]*y_cur[IDX_C6H2I] + - k[1405]*y_cur[IDX_HC7NI]; - data[jistart + 4931] = 0.0 + k[3070]*y_cur[IDX_HeII] + - k[3071]*y_cur[IDX_HeII]; - data[jistart + 4932] = 0.0 + k[3064]*y_cur[IDX_HeII] + - k[3065]*y_cur[IDX_HeII]; - data[jistart + 4933] = 0.0 + k[1556]*y_cur[IDX_C5II]; - data[jistart + 4934] = 0.0 + k[1493]*y_cur[IDX_C5HI]; - data[jistart + 4935] = 0.0 + k[1823]*y_cur[IDX_C4HII]; - data[jistart + 4936] = 0.0 + k[1761]*y_cur[IDX_C4HI]; - data[jistart + 4937] = 0.0 + k[1761]*y_cur[IDX_C3H2II]; - data[jistart + 4938] = 0.0 + k[1823]*y_cur[IDX_C3HI]; - data[jistart + 4939] = 0.0 + k[1556]*y_cur[IDX_C2H2I]; - data[jistart + 4940] = 0.0 + k[1493]*y_cur[IDX_C2H2II]; - data[jistart + 4941] = 0.0 + k[1327]*y_cur[IDX_CII]; - data[jistart + 4942] = 0.0 + k[1873]*y_cur[IDX_CI]; - data[jistart + 4943] = 0.0 + k[1874]*y_cur[IDX_CI]; - data[jistart + 4944] = 0.0 + k[2621]*y_cur[IDX_H3II] + - k[2926]*y_cur[IDX_HCOII]; - data[jistart + 4945] = 0.0 + k[2419]*y_cur[IDX_H2I]; - data[jistart + 4946] = 0.0 + k[351]*y_cur[IDX_HII] + k[6048]; - data[jistart + 4947] = 0.0 - k[866]*y_cur[IDX_eM] - - k[867]*y_cur[IDX_eM] - k[1876]*y_cur[IDX_CI] - - k[2420]*y_cur[IDX_H2I] - k[3429]*y_cur[IDX_NI] - - k[3713]*y_cur[IDX_OI] - k[6824]*y_cur[IDX_GRAINM] - - k[6825]*y_cur[IDX_GRAINM]; - data[jistart + 4948] = 0.0 + k[2308]*y_cur[IDX_HII] + - k[3138]*y_cur[IDX_HeII]; - data[jistart + 4949] = 0.0 + k[3154]*y_cur[IDX_HeII]; - data[jistart + 4950] = 0.0 + k[3151]*y_cur[IDX_HeII]; - data[jistart + 4951] = 0.0 - k[6824]*y_cur[IDX_C7HII] - - k[6825]*y_cur[IDX_C7HII]; - data[jistart + 4952] = 0.0 + k[351]*y_cur[IDX_C7HI] + - k[2308]*y_cur[IDX_C7H2I]; - data[jistart + 4953] = 0.0 + k[2419]*y_cur[IDX_C7II] - - k[2420]*y_cur[IDX_C7HII]; - data[jistart + 4954] = 0.0 + k[2621]*y_cur[IDX_C7I]; - data[jistart + 4955] = 0.0 + k[1405]*y_cur[IDX_CII]; - data[jistart + 4956] = 0.0 + k[2926]*y_cur[IDX_C7I]; - data[jistart + 4957] = 0.0 + k[3064]*y_cur[IDX_C10H2I] + - k[3065]*y_cur[IDX_C10H2I] + k[3070]*y_cur[IDX_C10HI] + - k[3071]*y_cur[IDX_C10HI] + k[3138]*y_cur[IDX_C7H2I] + - k[3151]*y_cur[IDX_C9H2I] + k[3154]*y_cur[IDX_C9HI]; - data[jistart + 4958] = 0.0 - k[3429]*y_cur[IDX_C7HII]; - data[jistart + 4959] = 0.0 - k[3713]*y_cur[IDX_C7HII]; - data[jistart + 4960] = 0.0 - k[866]*y_cur[IDX_C7HII] - - k[867]*y_cur[IDX_C7HII]; - data[jistart + 4961] = 0.0 - k[50]*y_cur[IDX_C7HM]; - data[jistart + 4962] = 0.0 - k[4446]*y_cur[IDX_C7HM]; - data[jistart + 4963] = 0.0 - k[4447]*y_cur[IDX_C7HM]; - data[jistart + 4964] = 0.0 - k[4448]*y_cur[IDX_C7HM]; - data[jistart + 4965] = 0.0 - k[4449]*y_cur[IDX_C7HM]; - data[jistart + 4966] = 0.0 - k[4450]*y_cur[IDX_C7HM]; - data[jistart + 4967] = 0.0 - k[4451]*y_cur[IDX_C7HM]; - data[jistart + 4968] = 0.0 + k[5602]*y_cur[IDX_eM]; - data[jistart + 4969] = 0.0 - k[50]*y_cur[IDX_CI] - - k[100]*y_cur[IDX_HI] - k[119]*y_cur[IDX_NI] - k[3430]*y_cur[IDX_NI] - - k[3431]*y_cur[IDX_NI] - k[3714]*y_cur[IDX_OI] - - k[4446]*y_cur[IDX_CII] - k[4447]*y_cur[IDX_C2H2II] - - k[4448]*y_cur[IDX_C2H3II] - k[4449]*y_cur[IDX_C4H2II] - - k[4450]*y_cur[IDX_C4H3II] - k[4451]*y_cur[IDX_C4SII] - - k[4452]*y_cur[IDX_CH2CCHII] - k[4453]*y_cur[IDX_CH3II] - - k[4454]*y_cur[IDX_CNCII] - k[4455]*y_cur[IDX_FeII] - - k[4456]*y_cur[IDX_HII] - k[4457]*y_cur[IDX_H2COII] - - k[4458]*y_cur[IDX_H2SII] - k[4459]*y_cur[IDX_H3II] - - k[4460]*y_cur[IDX_H3OII] - k[4461]*y_cur[IDX_HC2SII] - - k[4462]*y_cur[IDX_HCNHII] - k[4463]*y_cur[IDX_HCNHII] - - k[4464]*y_cur[IDX_HCOII] - k[4465]*y_cur[IDX_HCOII] - - k[4466]*y_cur[IDX_HeII] - k[4467]*y_cur[IDX_MgII] - - k[4468]*y_cur[IDX_NII] - k[4469]*y_cur[IDX_N2HII] - - k[4470]*y_cur[IDX_NH3II] - k[4471]*y_cur[IDX_NH4II] - - k[4472]*y_cur[IDX_NOII] - k[4473]*y_cur[IDX_NaII] - - k[4474]*y_cur[IDX_OII] - k[4475]*y_cur[IDX_SII] - - k[4476]*y_cur[IDX_SOII] - k[4477]*y_cur[IDX_SiII] - - k[4478]*y_cur[IDX_SiOII] - k[4479]*y_cur[IDX_SiOHII] - - k[4480]*y_cur[IDX_SiSII] - k[5757] - k[6044]; - data[jistart + 4970] = 0.0 + k[3718]*y_cur[IDX_OI]; - data[jistart + 4971] = 0.0 - k[4452]*y_cur[IDX_C7HM]; - data[jistart + 4972] = 0.0 - k[4453]*y_cur[IDX_C7HM]; - data[jistart + 4973] = 0.0 - k[4454]*y_cur[IDX_C7HM]; - data[jistart + 4974] = 0.0 - k[4455]*y_cur[IDX_C7HM]; - data[jistart + 4975] = 0.0 - k[100]*y_cur[IDX_C7HM]; - data[jistart + 4976] = 0.0 - k[4456]*y_cur[IDX_C7HM]; - data[jistart + 4977] = 0.0 - k[4457]*y_cur[IDX_C7HM]; - data[jistart + 4978] = 0.0 - k[4458]*y_cur[IDX_C7HM]; - data[jistart + 4979] = 0.0 - k[4459]*y_cur[IDX_C7HM]; - data[jistart + 4980] = 0.0 - k[4460]*y_cur[IDX_C7HM]; - data[jistart + 4981] = 0.0 - k[4461]*y_cur[IDX_C7HM]; - data[jistart + 4982] = 0.0 - k[4462]*y_cur[IDX_C7HM] - - k[4463]*y_cur[IDX_C7HM]; - data[jistart + 4983] = 0.0 - k[4464]*y_cur[IDX_C7HM] - - k[4465]*y_cur[IDX_C7HM]; - data[jistart + 4984] = 0.0 - k[4466]*y_cur[IDX_C7HM]; - data[jistart + 4985] = 0.0 - k[4467]*y_cur[IDX_C7HM]; - data[jistart + 4986] = 0.0 - k[119]*y_cur[IDX_C7HM] - - k[3430]*y_cur[IDX_C7HM] - k[3431]*y_cur[IDX_C7HM]; - data[jistart + 4987] = 0.0 - k[4468]*y_cur[IDX_C7HM]; - data[jistart + 4988] = 0.0 - k[4469]*y_cur[IDX_C7HM]; - data[jistart + 4989] = 0.0 - k[4470]*y_cur[IDX_C7HM]; - data[jistart + 4990] = 0.0 - k[4471]*y_cur[IDX_C7HM]; - data[jistart + 4991] = 0.0 - k[4472]*y_cur[IDX_C7HM]; - data[jistart + 4992] = 0.0 - k[4473]*y_cur[IDX_C7HM]; - data[jistart + 4993] = 0.0 - k[3714]*y_cur[IDX_C7HM] + - k[3718]*y_cur[IDX_C8HM]; - data[jistart + 4994] = 0.0 - k[4474]*y_cur[IDX_C7HM]; - data[jistart + 4995] = 0.0 - k[4475]*y_cur[IDX_C7HM]; - data[jistart + 4996] = 0.0 - k[4476]*y_cur[IDX_C7HM]; - data[jistart + 4997] = 0.0 - k[4477]*y_cur[IDX_C7HM]; - data[jistart + 4998] = 0.0 - k[4478]*y_cur[IDX_C7HM]; - data[jistart + 4999] = 0.0 - k[4479]*y_cur[IDX_C7HM]; - data[jistart + 5000] = 0.0 - k[4480]*y_cur[IDX_C7HM]; - data[jistart + 5001] = 0.0 + k[5602]*y_cur[IDX_C7HI]; - data[jistart + 5002] = 0.0 - k[4935]*y_cur[IDX_C7H2I]; - data[jistart + 5003] = 0.0 - k[1332]*y_cur[IDX_C7H2I] - - k[1333]*y_cur[IDX_C7H2I]; - data[jistart + 5004] = 0.0 + k[4890]*y_cur[IDX_C5H2I] - - k[4892]*y_cur[IDX_C7H2I]; - data[jistart + 5005] = 0.0 - k[218]*y_cur[IDX_C7H2I] - - k[1499]*y_cur[IDX_C7H2I] - k[1500]*y_cur[IDX_C7H2I]; - data[jistart + 5006] = 0.0 - k[1602]*y_cur[IDX_C7H2I] - - k[1603]*y_cur[IDX_C7H2I] - k[1604]*y_cur[IDX_C7H2I]; - data[jistart + 5007] = 0.0 - k[1663]*y_cur[IDX_C7H2I] - - k[1664]*y_cur[IDX_C7H2I]; - data[jistart + 5008] = 0.0 + k[4890]*y_cur[IDX_C2HI]; - data[jistart + 5009] = 0.0 + k[100]*y_cur[IDX_HI]; - data[jistart + 5010] = 0.0 - k[218]*y_cur[IDX_C2H2II] - - k[350]*y_cur[IDX_HII] - k[1332]*y_cur[IDX_CII] - - k[1333]*y_cur[IDX_CII] - k[1499]*y_cur[IDX_C2H2II] - - k[1500]*y_cur[IDX_C2H2II] - k[1602]*y_cur[IDX_C2H3II] - - k[1603]*y_cur[IDX_C2H3II] - k[1604]*y_cur[IDX_C2H3II] - - k[1663]*y_cur[IDX_C2H4II] - k[1664]*y_cur[IDX_C2H4II] - - k[2057]*y_cur[IDX_CH3II] - k[2308]*y_cur[IDX_HII] - - k[2622]*y_cur[IDX_H3II] - k[2927]*y_cur[IDX_HCOII] - - k[3136]*y_cur[IDX_HeII] - k[3137]*y_cur[IDX_HeII] - - k[3138]*y_cur[IDX_HeII] - k[4892]*y_cur[IDX_C2HI] - - k[4935]*y_cur[IDX_CI] - k[5245]*y_cur[IDX_NI] - k[5758] - k[6045] - - k[6046] - k[7052]; - data[jistart + 5011] = 0.0 + k[870]*y_cur[IDX_eM] + - k[6828]*y_cur[IDX_GRAINM]; - data[jistart + 5012] = 0.0 + k[872]*y_cur[IDX_eM] + - k[6830]*y_cur[IDX_GRAINM]; - data[jistart + 5013] = 0.0 + k[874]*y_cur[IDX_eM] + - k[6832]*y_cur[IDX_GRAINM]; - data[jistart + 5014] = 0.0 + k[3720]*y_cur[IDX_OI]; - data[jistart + 5015] = 0.0 - k[2057]*y_cur[IDX_C7H2I]; - data[jistart + 5016] = 0.0 + k[8731]*y_cur[IDX_GCHI]; - data[jistart + 5017] = 0.0 + k[8642]*y_cur[IDX_GHI]; - data[jistart + 5018] = 0.0 + k[7234] + k[7416] + k[7598]; - data[jistart + 5019] = 0.0 + k[8731]*y_cur[IDX_GC6HI]; - data[jistart + 5020] = 0.0 + k[8642]*y_cur[IDX_GC7HI]; - data[jistart + 5021] = 0.0 + k[6828]*y_cur[IDX_C7H3II] + - k[6830]*y_cur[IDX_C7H4II] + k[6832]*y_cur[IDX_C7H5II]; - data[jistart + 5022] = 0.0 + k[100]*y_cur[IDX_C7HM]; - data[jistart + 5023] = 0.0 - k[350]*y_cur[IDX_C7H2I] - - k[2308]*y_cur[IDX_C7H2I]; - data[jistart + 5024] = 0.0 - k[2622]*y_cur[IDX_C7H2I]; - data[jistart + 5025] = 0.0 - k[2927]*y_cur[IDX_C7H2I]; - data[jistart + 5026] = 0.0 - k[3136]*y_cur[IDX_C7H2I] - - k[3137]*y_cur[IDX_C7H2I] - k[3138]*y_cur[IDX_C7H2I]; - data[jistart + 5027] = 0.0 - k[5245]*y_cur[IDX_C7H2I]; - data[jistart + 5028] = 0.0 + k[3720]*y_cur[IDX_C8H3II]; - data[jistart + 5029] = 0.0 + k[870]*y_cur[IDX_C7H3II] + - k[872]*y_cur[IDX_C7H4II] + k[874]*y_cur[IDX_C7H5II]; - data[jistart + 5030] = 0.0 + k[1875]*y_cur[IDX_C6H3II] - - k[1877]*y_cur[IDX_C7H2II] - k[1878]*y_cur[IDX_C7H2II]; - data[jistart + 5031] = 0.0 + k[1738]*y_cur[IDX_C5H2II] - - k[1740]*y_cur[IDX_C7H2II]; - data[jistart + 5032] = 0.0 - k[1560]*y_cur[IDX_C7H2II] - - k[1561]*y_cur[IDX_C7H2II]; - data[jistart + 5033] = 0.0 + k[218]*y_cur[IDX_C7H2I] + - k[1491]*y_cur[IDX_C5H2I] + k[1494]*y_cur[IDX_C5HI]; - data[jistart + 5034] = 0.0 - k[1641]*y_cur[IDX_C7H2II] - - k[1642]*y_cur[IDX_C7H2II]; - data[jistart + 5035] = 0.0 + k[1593]*y_cur[IDX_C5HI] + - k[1605]*y_cur[IDX_C7HI]; - data[jistart + 5036] = 0.0 + k[1699]*y_cur[IDX_C5II] - - k[1705]*y_cur[IDX_C7H2II]; - data[jistart + 5037] = 0.0 + k[1661]*y_cur[IDX_C6HI]; - data[jistart + 5038] = 0.0 + k[1824]*y_cur[IDX_C4H2II]; - data[jistart + 5039] = 0.0 + k[1762]*y_cur[IDX_C4HI] + - k[1784]*y_cur[IDX_C4H2I]; - data[jistart + 5040] = 0.0 + k[1796]*y_cur[IDX_C4HI]; - data[jistart + 5041] = 0.0 + k[1762]*y_cur[IDX_C3H2II] + - k[1796]*y_cur[IDX_C3H3II] + k[2020]*y_cur[IDX_CH2CCHII]; - data[jistart + 5042] = 0.0 + k[2478]*y_cur[IDX_H2CCCI]; - data[jistart + 5043] = 0.0 + k[1784]*y_cur[IDX_C3H2II]; - data[jistart + 5044] = 0.0 + k[1824]*y_cur[IDX_C3HI]; - data[jistart + 5045] = 0.0 + k[1699]*y_cur[IDX_C2H4I]; - data[jistart + 5046] = 0.0 + k[1494]*y_cur[IDX_C2H2II] + - k[1593]*y_cur[IDX_C2H3II]; - data[jistart + 5047] = 0.0 + k[1491]*y_cur[IDX_C2H2II]; - data[jistart + 5048] = 0.0 + k[1738]*y_cur[IDX_C2HI]; - data[jistart + 5049] = 0.0 + k[2183]*y_cur[IDX_CH4I]; - data[jistart + 5050] = 0.0 + k[1661]*y_cur[IDX_C2H4II] + - k[2056]*y_cur[IDX_CH3II]; - data[jistart + 5051] = 0.0 + k[1875]*y_cur[IDX_CI]; - data[jistart + 5052] = 0.0 + k[1605]*y_cur[IDX_C2H3II] + - k[2623]*y_cur[IDX_H3II] + k[2928]*y_cur[IDX_HCOII]; - data[jistart + 5053] = 0.0 + k[2420]*y_cur[IDX_H2I]; - data[jistart + 5054] = 0.0 + k[218]*y_cur[IDX_C2H2II] + - k[350]*y_cur[IDX_HII] + k[6045]; - data[jistart + 5055] = 0.0 - k[868]*y_cur[IDX_eM] - - k[869]*y_cur[IDX_eM] - k[1560]*y_cur[IDX_C2H2I] - - k[1561]*y_cur[IDX_C2H2I] - k[1641]*y_cur[IDX_C2H3I] - - k[1642]*y_cur[IDX_C2H3I] - k[1705]*y_cur[IDX_C2H4I] - - k[1740]*y_cur[IDX_C2HI] - k[1877]*y_cur[IDX_CI] - - k[1878]*y_cur[IDX_CI] - k[2187]*y_cur[IDX_CH4I] - - k[3432]*y_cur[IDX_NI] - k[3715]*y_cur[IDX_OI] - - k[6826]*y_cur[IDX_GRAINM] - k[6827]*y_cur[IDX_GRAINM]; - data[jistart + 5056] = 0.0 + k[2020]*y_cur[IDX_C4HI]; - data[jistart + 5057] = 0.0 + k[2056]*y_cur[IDX_C6HI]; - data[jistart + 5058] = 0.0 + k[3181]*y_cur[IDX_HeII]; - data[jistart + 5059] = 0.0 + k[2183]*y_cur[IDX_C6II] - - k[2187]*y_cur[IDX_C7H2II]; - data[jistart + 5060] = 0.0 - k[6826]*y_cur[IDX_C7H2II] - - k[6827]*y_cur[IDX_C7H2II]; - data[jistart + 5061] = 0.0 + k[350]*y_cur[IDX_C7H2I]; - data[jistart + 5062] = 0.0 + k[2420]*y_cur[IDX_C7HII]; - data[jistart + 5063] = 0.0 + k[2478]*y_cur[IDX_C4HII]; - data[jistart + 5064] = 0.0 + k[2623]*y_cur[IDX_C7HI]; - data[jistart + 5065] = 0.0 + k[2928]*y_cur[IDX_C7HI]; - data[jistart + 5066] = 0.0 + k[3181]*y_cur[IDX_CH3C6HI]; - data[jistart + 5067] = 0.0 - k[3432]*y_cur[IDX_C7H2II]; - data[jistart + 5068] = 0.0 - k[3715]*y_cur[IDX_C7H2II]; - data[jistart + 5069] = 0.0 - k[868]*y_cur[IDX_C7H2II] - - k[869]*y_cur[IDX_C7H2II]; - data[jistart + 5070] = 0.0 - k[1879]*y_cur[IDX_C7H3II] - - k[1880]*y_cur[IDX_C7H3II]; - data[jistart + 5071] = 0.0 + k[1360]*y_cur[IDX_CH3C6HI]; - data[jistart + 5072] = 0.0 + k[1492]*y_cur[IDX_C5H2I]; - data[jistart + 5073] = 0.0 + k[1637]*y_cur[IDX_C5H2II]; - data[jistart + 5074] = 0.0 + k[1590]*y_cur[IDX_C5H2I] + - k[1594]*y_cur[IDX_C5HI] + k[1602]*y_cur[IDX_C7H2I]; - data[jistart + 5075] = 0.0 + k[1700]*y_cur[IDX_C5II]; - data[jistart + 5076] = 0.0 + k[1659]*y_cur[IDX_C6H2I]; - data[jistart + 5077] = 0.0 + k[1825]*y_cur[IDX_C4H3II]; - data[jistart + 5078] = 0.0 + k[1788]*y_cur[IDX_C4H2II]; - data[jistart + 5079] = 0.0 + k[1785]*y_cur[IDX_C4H2I]; - data[jistart + 5080] = 0.0 + k[1797]*y_cur[IDX_C4HI]; - data[jistart + 5081] = 0.0 + k[1797]*y_cur[IDX_C3H3II] + - k[2021]*y_cur[IDX_CH2CCHII]; - data[jistart + 5082] = 0.0 + k[2032]*y_cur[IDX_CH2CCHI]; - data[jistart + 5083] = 0.0 + k[1785]*y_cur[IDX_C3H2II] + - k[2852]*y_cur[IDX_C5H2II]; - data[jistart + 5084] = 0.0 + k[1788]*y_cur[IDX_C3H2I] + - k[2033]*y_cur[IDX_CH2CCHI] + k[2479]*y_cur[IDX_H2CCCI]; - data[jistart + 5085] = 0.0 + k[1825]*y_cur[IDX_C3HI]; - data[jistart + 5086] = 0.0 + k[1700]*y_cur[IDX_C2H4I]; - data[jistart + 5087] = 0.0 + k[1594]*y_cur[IDX_C2H3II]; - data[jistart + 5088] = 0.0 + k[1492]*y_cur[IDX_C2H2II] + - k[1590]*y_cur[IDX_C2H3II]; - data[jistart + 5089] = 0.0 + k[1637]*y_cur[IDX_C2H3I] + - k[2852]*y_cur[IDX_C4H2I]; - data[jistart + 5090] = 0.0 + k[2184]*y_cur[IDX_CH4I]; - data[jistart + 5091] = 0.0 + k[1659]*y_cur[IDX_C2H4II] + - k[2055]*y_cur[IDX_CH3II]; - data[jistart + 5092] = 0.0 + k[1602]*y_cur[IDX_C2H3II] + - k[2622]*y_cur[IDX_H3II] + k[2927]*y_cur[IDX_HCOII]; - data[jistart + 5093] = 0.0 - k[870]*y_cur[IDX_eM] - - k[871]*y_cur[IDX_eM] - k[1879]*y_cur[IDX_CI] - k[1880]*y_cur[IDX_CI] - - k[3433]*y_cur[IDX_NI] - k[3716]*y_cur[IDX_OI] - - k[6828]*y_cur[IDX_GRAINM] - k[6829]*y_cur[IDX_GRAINM]; - data[jistart + 5094] = 0.0 + k[2032]*y_cur[IDX_C4HII] + - k[2033]*y_cur[IDX_C4H2II]; - data[jistart + 5095] = 0.0 + k[2021]*y_cur[IDX_C4HI]; - data[jistart + 5096] = 0.0 + k[2055]*y_cur[IDX_C6H2I]; - data[jistart + 5097] = 0.0 + k[1360]*y_cur[IDX_CII] + - k[2323]*y_cur[IDX_HII] + k[3182]*y_cur[IDX_HeII]; - data[jistart + 5098] = 0.0 + k[2184]*y_cur[IDX_C6II]; - data[jistart + 5099] = 0.0 - k[6828]*y_cur[IDX_C7H3II] - - k[6829]*y_cur[IDX_C7H3II]; - data[jistart + 5100] = 0.0 + k[2323]*y_cur[IDX_CH3C6HI]; - data[jistart + 5101] = 0.0 + k[2479]*y_cur[IDX_C4H2II]; - data[jistart + 5102] = 0.0 + k[2622]*y_cur[IDX_C7H2I]; - data[jistart + 5103] = 0.0 + k[2927]*y_cur[IDX_C7H2I]; - data[jistart + 5104] = 0.0 + k[3182]*y_cur[IDX_CH3C6HI]; - data[jistart + 5105] = 0.0 - k[3433]*y_cur[IDX_C7H3II]; - data[jistart + 5106] = 0.0 - k[3716]*y_cur[IDX_C7H3II]; - data[jistart + 5107] = 0.0 - k[870]*y_cur[IDX_C7H3II] - - k[871]*y_cur[IDX_C7H3II]; - data[jistart + 5108] = 0.0 + k[1638]*y_cur[IDX_C5H2II]; - data[jistart + 5109] = 0.0 + k[1591]*y_cur[IDX_C5H2I]; - data[jistart + 5110] = 0.0 + k[1701]*y_cur[IDX_C5H2II]; - data[jistart + 5111] = 0.0 + k[1658]*y_cur[IDX_C5HI]; - data[jistart + 5112] = 0.0 + k[1789]*y_cur[IDX_C4H3II]; - data[jistart + 5113] = 0.0 + k[2105]*y_cur[IDX_CH3CCHI]; - data[jistart + 5114] = 0.0 + k[2034]*y_cur[IDX_CH2CCHI]; - data[jistart + 5115] = 0.0 + k[1789]*y_cur[IDX_C3H2I] + - k[2035]*y_cur[IDX_CH2CCHI] + k[2480]*y_cur[IDX_H2CCCI]; - data[jistart + 5116] = 0.0 + k[1658]*y_cur[IDX_C2H4II]; - data[jistart + 5117] = 0.0 + k[1591]*y_cur[IDX_C2H3II]; - data[jistart + 5118] = 0.0 + k[1638]*y_cur[IDX_C2H3I] + - k[1701]*y_cur[IDX_C2H4I]; - data[jistart + 5119] = 0.0 + k[2185]*y_cur[IDX_CH4I]; - data[jistart + 5120] = 0.0 - k[872]*y_cur[IDX_eM] - - k[873]*y_cur[IDX_eM] - k[3434]*y_cur[IDX_NI] - - k[6830]*y_cur[IDX_GRAINM] - k[6831]*y_cur[IDX_GRAINM]; - data[jistart + 5121] = 0.0 + k[2034]*y_cur[IDX_C4H2II] + - k[2035]*y_cur[IDX_C4H3II]; - data[jistart + 5122] = 0.0 + k[364]*y_cur[IDX_HII]; - data[jistart + 5123] = 0.0 + k[2105]*y_cur[IDX_C4HII]; - data[jistart + 5124] = 0.0 + k[2185]*y_cur[IDX_C6H2II]; - data[jistart + 5125] = 0.0 - k[6830]*y_cur[IDX_C7H4II] - - k[6831]*y_cur[IDX_C7H4II]; - data[jistart + 5126] = 0.0 + k[364]*y_cur[IDX_CH3C6HI]; - data[jistart + 5127] = 0.0 + k[2480]*y_cur[IDX_C4H3II]; - data[jistart + 5128] = 0.0 - k[3434]*y_cur[IDX_C7H4II]; - data[jistart + 5129] = 0.0 - k[872]*y_cur[IDX_C7H4II] - - k[873]*y_cur[IDX_C7H4II]; - data[jistart + 5130] = 0.0 + k[1330]*y_cur[IDX_C6H6I]; - data[jistart + 5131] = 0.0 + k[1702]*y_cur[IDX_C5H2II]; - data[jistart + 5132] = 0.0 + k[1656]*y_cur[IDX_C5H2I]; - data[jistart + 5133] = 0.0 + k[5515]*y_cur[IDX_C4H2I]; - data[jistart + 5134] = 0.0 + k[5515]*y_cur[IDX_C3H3II] + - k[5531]*y_cur[IDX_CH2CCHII]; - data[jistart + 5135] = 0.0 + k[2106]*y_cur[IDX_CH3CCHI]; - data[jistart + 5136] = 0.0 + k[2036]*y_cur[IDX_CH2CCHI] + - k[2108]*y_cur[IDX_CH3CCHI]; - data[jistart + 5137] = 0.0 + k[1656]*y_cur[IDX_C2H4II]; - data[jistart + 5138] = 0.0 + k[1702]*y_cur[IDX_C2H4I]; - data[jistart + 5139] = 0.0 + k[2186]*y_cur[IDX_CH4I]; - data[jistart + 5140] = 0.0 + k[1330]*y_cur[IDX_CII]; - data[jistart + 5141] = 0.0 - k[874]*y_cur[IDX_eM] - - k[875]*y_cur[IDX_eM] - k[3435]*y_cur[IDX_NI] - - k[6832]*y_cur[IDX_GRAINM] - k[6833]*y_cur[IDX_GRAINM]; - data[jistart + 5142] = 0.0 + k[2036]*y_cur[IDX_C4H3II]; - data[jistart + 5143] = 0.0 + k[5531]*y_cur[IDX_C4H2I]; - data[jistart + 5144] = 0.0 + k[2645]*y_cur[IDX_H3II] + - k[2946]*y_cur[IDX_HCOII]; - data[jistart + 5145] = 0.0 + k[2106]*y_cur[IDX_C4H2II] + - k[2108]*y_cur[IDX_C4H3II]; - data[jistart + 5146] = 0.0 + k[2186]*y_cur[IDX_C6H2II]; - data[jistart + 5147] = 0.0 - k[6832]*y_cur[IDX_C7H5II] - - k[6833]*y_cur[IDX_C7H5II]; - data[jistart + 5148] = 0.0 + k[2645]*y_cur[IDX_CH3C6HI]; - data[jistart + 5149] = 0.0 + k[2946]*y_cur[IDX_CH3C6HI]; - data[jistart + 5150] = 0.0 - k[3435]*y_cur[IDX_C7H5II]; - data[jistart + 5151] = 0.0 - k[874]*y_cur[IDX_C7H5II] - - k[875]*y_cur[IDX_C7H5II]; - data[jistart + 5152] = 0.0 - k[4937]*y_cur[IDX_C7NI]; - data[jistart + 5153] = 0.0 + k[118]*y_cur[IDX_NI]; - data[jistart + 5154] = 0.0 + k[5246]*y_cur[IDX_NI]; - data[jistart + 5155] = 0.0 - k[2624]*y_cur[IDX_H3II] - - k[2929]*y_cur[IDX_HCOII] - k[3141]*y_cur[IDX_HeII] - - k[4937]*y_cur[IDX_CI] - k[5247]*y_cur[IDX_NI] - - k[5372]*y_cur[IDX_OI] - k[5760] - k[6049] - k[6050] - k[7057]; - data[jistart + 5156] = 0.0 + k[5252]*y_cur[IDX_NI]; - data[jistart + 5157] = 0.0 + k[901]*y_cur[IDX_eM] + - k[6875]*y_cur[IDX_GRAINM]; - data[jistart + 5158] = 0.0 + k[3183]*y_cur[IDX_HeII] + k[5800] + - k[6104]; - data[jistart + 5159] = 0.0 + k[8709]*y_cur[IDX_GNI]; - data[jistart + 5160] = 0.0 + k[7239] + k[7421] + k[7603]; - data[jistart + 5161] = 0.0 + k[8709]*y_cur[IDX_GC7I]; - data[jistart + 5162] = 0.0 + k[6844]*y_cur[IDX_HC7NII] + - k[6849]*y_cur[IDX_H2C7NII] + k[6851]*y_cur[IDX_H3C7NII] + - k[6875]*y_cur[IDX_C9NII]; - data[jistart + 5163] = 0.0 + k[989]*y_cur[IDX_eM] + - k[6849]*y_cur[IDX_GRAINM]; - data[jistart + 5164] = 0.0 - k[2624]*y_cur[IDX_C7NI]; - data[jistart + 5165] = 0.0 + k[1030]*y_cur[IDX_eM] + - k[6851]*y_cur[IDX_GRAINM]; - data[jistart + 5166] = 0.0 + k[1085]*y_cur[IDX_eM] + - k[6844]*y_cur[IDX_GRAINM]; - data[jistart + 5167] = 0.0 - k[2929]*y_cur[IDX_C7NI]; - data[jistart + 5168] = 0.0 - k[3141]*y_cur[IDX_C7NI] + - k[3183]*y_cur[IDX_CH3C7NI]; - data[jistart + 5169] = 0.0 + k[118]*y_cur[IDX_C7M] + - k[5246]*y_cur[IDX_C7HI] - k[5247]*y_cur[IDX_C7NI] + - k[5252]*y_cur[IDX_C9NI]; - data[jistart + 5170] = 0.0 - k[5372]*y_cur[IDX_C7NI]; - data[jistart + 5171] = 0.0 + k[901]*y_cur[IDX_C9NII] + - k[989]*y_cur[IDX_H2C7NII] + k[1030]*y_cur[IDX_H3C7NII] + - k[1085]*y_cur[IDX_HC7NII]; - data[jistart + 5172] = 0.0 + k[3429]*y_cur[IDX_NI]; - data[jistart + 5173] = 0.0 + k[6050]; - data[jistart + 5174] = 0.0 - k[876]*y_cur[IDX_eM] - - k[2421]*y_cur[IDX_H2I] - k[6840]*y_cur[IDX_GRAINM]; - data[jistart + 5175] = 0.0 - k[6840]*y_cur[IDX_C7NII]; - data[jistart + 5176] = 0.0 - k[2421]*y_cur[IDX_C7NII]; - data[jistart + 5177] = 0.0 + k[3429]*y_cur[IDX_C7HII]; - data[jistart + 5178] = 0.0 - k[876]*y_cur[IDX_C7NII]; - data[jistart + 5179] = 0.0 + k[49]*y_cur[IDX_C7M] + - k[4936]*y_cur[IDX_C7HI] - k[4938]*y_cur[IDX_C8I]; - data[jistart + 5180] = 0.0 + k[4481]*y_cur[IDX_C8M] - - k[5501]*y_cur[IDX_C8I]; - data[jistart + 5181] = 0.0 + k[5954]; - data[jistart + 5182] = 0.0 + k[727]*y_cur[IDX_eM] + - k[6869]*y_cur[IDX_GRAINM]; - data[jistart + 5183] = 0.0 + k[5967]; - data[jistart + 5184] = 0.0 + k[5973]; - data[jistart + 5185] = 0.0 + k[737]*y_cur[IDX_eM] + - k[6886]*y_cur[IDX_GRAINM]; - data[jistart + 5186] = 0.0 + k[31]*y_cur[IDX_C6M]; - data[jistart + 5187] = 0.0 + k[14]*y_cur[IDX_C6I] - - k[16]*y_cur[IDX_C8I]; - data[jistart + 5188] = 0.0 + k[4482]*y_cur[IDX_C8M]; - data[jistart + 5189] = 0.0 + k[4483]*y_cur[IDX_C8M]; - data[jistart + 5190] = 0.0 + k[28]*y_cur[IDX_C5M]; - data[jistart + 5191] = 0.0 + k[19]*y_cur[IDX_C5I]; - data[jistart + 5192] = 0.0 + k[24]*y_cur[IDX_C4M]; - data[jistart + 5193] = 0.0 + k[24]*y_cur[IDX_C4I]; - data[jistart + 5194] = 0.0 + k[4484]*y_cur[IDX_C8M]; - data[jistart + 5195] = 0.0 + k[4485]*y_cur[IDX_C8M]; - data[jistart + 5196] = 0.0 + k[4486]*y_cur[IDX_C8M]; - data[jistart + 5197] = 0.0 + k[19]*y_cur[IDX_C3M]; - data[jistart + 5198] = 0.0 + k[28]*y_cur[IDX_C3I]; - data[jistart + 5199] = 0.0 + k[14]*y_cur[IDX_C2M]; - data[jistart + 5200] = 0.0 + k[31]*y_cur[IDX_C2I]; - data[jistart + 5201] = 0.0 + k[49]*y_cur[IDX_CI]; - data[jistart + 5202] = 0.0 + k[4936]*y_cur[IDX_CI]; - data[jistart + 5203] = 0.0 - k[16]*y_cur[IDX_C2M] - - k[352]*y_cur[IDX_HII] - k[2625]*y_cur[IDX_H3II] - - k[2930]*y_cur[IDX_HCOII] - k[3142]*y_cur[IDX_HeII] - - k[3143]*y_cur[IDX_HeII] - k[4938]*y_cur[IDX_CI] - - k[5248]*y_cur[IDX_NI] - k[5373]*y_cur[IDX_OI] - - k[5501]*y_cur[IDX_CII] - k[5603]*y_cur[IDX_eM] - k[5762] - k[6052] - - k[6053] - k[7055]; - data[jistart + 5204] = 0.0 + k[4481]*y_cur[IDX_CII] + - k[4482]*y_cur[IDX_C2H2II] + k[4483]*y_cur[IDX_C2H3II] + - k[4484]*y_cur[IDX_C4H2II] + k[4485]*y_cur[IDX_C4H3II] + - k[4486]*y_cur[IDX_C4SII] + k[4487]*y_cur[IDX_CH2CCHII] + - k[4488]*y_cur[IDX_CH3II] + k[4489]*y_cur[IDX_CNCII] + - k[4490]*y_cur[IDX_FeII] + k[4491]*y_cur[IDX_HII] + - k[4492]*y_cur[IDX_H2COII] + k[4493]*y_cur[IDX_H2SII] + - k[4494]*y_cur[IDX_H3II] + k[4495]*y_cur[IDX_H3OII] + - k[4496]*y_cur[IDX_HC2SII] + k[4497]*y_cur[IDX_HCNHII] + - k[4498]*y_cur[IDX_HCNHII] + k[4499]*y_cur[IDX_HCOII] + - k[4500]*y_cur[IDX_HCOII] + k[4501]*y_cur[IDX_HeII] + - k[4502]*y_cur[IDX_MgII] + k[4503]*y_cur[IDX_NII] + - k[4504]*y_cur[IDX_N2HII] + k[4505]*y_cur[IDX_NH3II] + - k[4506]*y_cur[IDX_NH4II] + k[4507]*y_cur[IDX_NOII] + - k[4508]*y_cur[IDX_NaII] + k[4509]*y_cur[IDX_OII] + - k[4510]*y_cur[IDX_SII] + k[4511]*y_cur[IDX_SOII] + - k[4512]*y_cur[IDX_SiII] + k[4513]*y_cur[IDX_SiOII] + - k[4514]*y_cur[IDX_SiOHII] + k[4515]*y_cur[IDX_SiSII] + k[5761] + - k[6051]; - data[jistart + 5205] = 0.0 + k[5765] + k[6057]; - data[jistart + 5206] = 0.0 + k[880]*y_cur[IDX_eM] + - k[6839]*y_cur[IDX_GRAINM]; - data[jistart + 5207] = 0.0 + k[881]*y_cur[IDX_eM] + - k[6841]*y_cur[IDX_GRAINM]; - data[jistart + 5208] = 0.0 + k[5250]*y_cur[IDX_NI] + - k[5375]*y_cur[IDX_OI] + k[5767] + k[6060]; - data[jistart + 5209] = 0.0 + k[890]*y_cur[IDX_eM] + - k[6856]*y_cur[IDX_GRAINM]; - data[jistart + 5210] = 0.0 + k[3444]*y_cur[IDX_NI]; - data[jistart + 5211] = 0.0 + k[3722]*y_cur[IDX_OI]; - data[jistart + 5212] = 0.0 + k[5377]*y_cur[IDX_OI] + k[5771] + - k[6067]; - data[jistart + 5213] = 0.0 + k[4487]*y_cur[IDX_C8M]; - data[jistart + 5214] = 0.0 + k[4488]*y_cur[IDX_C8M]; - data[jistart + 5215] = 0.0 + k[4489]*y_cur[IDX_C8M]; - data[jistart + 5216] = 0.0 + k[4490]*y_cur[IDX_C8M]; - data[jistart + 5217] = 0.0 + k[8678]*y_cur[IDX_GC7I]; - data[jistart + 5218] = 0.0 + k[8678]*y_cur[IDX_GCI]; - data[jistart + 5219] = 0.0 + k[7237] + k[7419] + k[7601]; - data[jistart + 5220] = 0.0 + k[6839]*y_cur[IDX_C8HII] + - k[6841]*y_cur[IDX_C8H2II] + k[6856]*y_cur[IDX_C9II] + - k[6869]*y_cur[IDX_C10II] + k[6886]*y_cur[IDX_C11II]; - data[jistart + 5221] = 0.0 - k[352]*y_cur[IDX_C8I] + - k[4491]*y_cur[IDX_C8M]; - data[jistart + 5222] = 0.0 + k[4492]*y_cur[IDX_C8M]; - data[jistart + 5223] = 0.0 + k[4493]*y_cur[IDX_C8M]; - data[jistart + 5224] = 0.0 - k[2625]*y_cur[IDX_C8I] + - k[4494]*y_cur[IDX_C8M]; - data[jistart + 5225] = 0.0 + k[4495]*y_cur[IDX_C8M]; - data[jistart + 5226] = 0.0 + k[4496]*y_cur[IDX_C8M]; - data[jistart + 5227] = 0.0 + k[4497]*y_cur[IDX_C8M] + - k[4498]*y_cur[IDX_C8M]; - data[jistart + 5228] = 0.0 - k[2930]*y_cur[IDX_C8I] + - k[4499]*y_cur[IDX_C8M] + k[4500]*y_cur[IDX_C8M]; - data[jistart + 5229] = 0.0 - k[3142]*y_cur[IDX_C8I] - - k[3143]*y_cur[IDX_C8I] + k[4501]*y_cur[IDX_C8M]; - data[jistart + 5230] = 0.0 + k[4502]*y_cur[IDX_C8M]; - data[jistart + 5231] = 0.0 + k[3444]*y_cur[IDX_C9M] - - k[5248]*y_cur[IDX_C8I] + k[5250]*y_cur[IDX_C9I]; - data[jistart + 5232] = 0.0 + k[4503]*y_cur[IDX_C8M]; - data[jistart + 5233] = 0.0 + k[4504]*y_cur[IDX_C8M]; - data[jistart + 5234] = 0.0 + k[4505]*y_cur[IDX_C8M]; - data[jistart + 5235] = 0.0 + k[4506]*y_cur[IDX_C8M]; - data[jistart + 5236] = 0.0 + k[4507]*y_cur[IDX_C8M]; - data[jistart + 5237] = 0.0 + k[4508]*y_cur[IDX_C8M]; - data[jistart + 5238] = 0.0 + k[3722]*y_cur[IDX_C9HII] - - k[5373]*y_cur[IDX_C8I] + k[5375]*y_cur[IDX_C9I] + - k[5377]*y_cur[IDX_C9NI]; - data[jistart + 5239] = 0.0 + k[4509]*y_cur[IDX_C8M]; - data[jistart + 5240] = 0.0 + k[4510]*y_cur[IDX_C8M]; - data[jistart + 5241] = 0.0 + k[4511]*y_cur[IDX_C8M]; - data[jistart + 5242] = 0.0 + k[4512]*y_cur[IDX_C8M]; - data[jistart + 5243] = 0.0 + k[4513]*y_cur[IDX_C8M]; - data[jistart + 5244] = 0.0 + k[4514]*y_cur[IDX_C8M]; - data[jistart + 5245] = 0.0 + k[4515]*y_cur[IDX_C8M]; - data[jistart + 5246] = 0.0 + k[727]*y_cur[IDX_C10II] + - k[737]*y_cur[IDX_C11II] + k[880]*y_cur[IDX_C8HII] + - k[881]*y_cur[IDX_C8H2II] + k[890]*y_cur[IDX_C9II] - - k[5603]*y_cur[IDX_C8I]; - data[jistart + 5247] = 0.0 + k[1876]*y_cur[IDX_C7HII] + - k[1877]*y_cur[IDX_C7H2II]; - data[jistart + 5248] = 0.0 + k[1332]*y_cur[IDX_C7H2I] + - k[1334]*y_cur[IDX_C7HI] + k[5500]*y_cur[IDX_C7I]; - data[jistart + 5249] = 0.0 + k[3060]*y_cur[IDX_HeII]; - data[jistart + 5250] = 0.0 + k[5500]*y_cur[IDX_CII]; - data[jistart + 5251] = 0.0 + k[1334]*y_cur[IDX_CII]; - data[jistart + 5252] = 0.0 + k[1876]*y_cur[IDX_CI]; - data[jistart + 5253] = 0.0 + k[1332]*y_cur[IDX_CII]; - data[jistart + 5254] = 0.0 + k[1877]*y_cur[IDX_CI]; - data[jistart + 5255] = 0.0 + k[352]*y_cur[IDX_HII] + k[6053]; - data[jistart + 5256] = 0.0 - k[877]*y_cur[IDX_eM] - - k[878]*y_cur[IDX_eM] - k[2422]*y_cur[IDX_H2I] - - k[6836]*y_cur[IDX_GRAINM] - k[6837]*y_cur[IDX_GRAINM]; - data[jistart + 5257] = 0.0 + k[2311]*y_cur[IDX_HII] + - k[3148]*y_cur[IDX_HeII]; - data[jistart + 5258] = 0.0 + k[3145]*y_cur[IDX_HeII]; - data[jistart + 5259] = 0.0 + k[3150]*y_cur[IDX_HeII]; - data[jistart + 5260] = 0.0 + k[3156]*y_cur[IDX_HeII]; - data[jistart + 5261] = 0.0 - k[6836]*y_cur[IDX_C8II] - - k[6837]*y_cur[IDX_C8II]; - data[jistart + 5262] = 0.0 + k[352]*y_cur[IDX_C8I] + - k[2311]*y_cur[IDX_C8HI]; - data[jistart + 5263] = 0.0 - k[2422]*y_cur[IDX_C8II]; - data[jistart + 5264] = 0.0 + k[3060]*y_cur[IDX_C10I] + - k[3145]*y_cur[IDX_C8H2I] + k[3148]*y_cur[IDX_C8HI] + - k[3150]*y_cur[IDX_C9I] + k[3156]*y_cur[IDX_C9NI]; - data[jistart + 5265] = 0.0 - k[877]*y_cur[IDX_C8II] - - k[878]*y_cur[IDX_C8II]; - data[jistart + 5266] = 0.0 - k[51]*y_cur[IDX_C8M]; - data[jistart + 5267] = 0.0 - k[4481]*y_cur[IDX_C8M]; - data[jistart + 5268] = 0.0 - k[36]*y_cur[IDX_C8M]; - data[jistart + 5269] = 0.0 - k[4482]*y_cur[IDX_C8M]; - data[jistart + 5270] = 0.0 - k[4483]*y_cur[IDX_C8M]; - data[jistart + 5271] = 0.0 - k[4484]*y_cur[IDX_C8M]; - data[jistart + 5272] = 0.0 - k[4485]*y_cur[IDX_C8M]; - data[jistart + 5273] = 0.0 - k[4486]*y_cur[IDX_C8M]; - data[jistart + 5274] = 0.0 + k[5603]*y_cur[IDX_eM]; - data[jistart + 5275] = 0.0 - k[36]*y_cur[IDX_C2I] - - k[51]*y_cur[IDX_CI] - k[101]*y_cur[IDX_HI] - k[3436]*y_cur[IDX_NI] - - k[3437]*y_cur[IDX_NI] - k[3438]*y_cur[IDX_NI] - - k[3439]*y_cur[IDX_NI] - k[3717]*y_cur[IDX_OI] - - k[4481]*y_cur[IDX_CII] - k[4482]*y_cur[IDX_C2H2II] - - k[4483]*y_cur[IDX_C2H3II] - k[4484]*y_cur[IDX_C4H2II] - - k[4485]*y_cur[IDX_C4H3II] - k[4486]*y_cur[IDX_C4SII] - - k[4487]*y_cur[IDX_CH2CCHII] - k[4488]*y_cur[IDX_CH3II] - - k[4489]*y_cur[IDX_CNCII] - k[4490]*y_cur[IDX_FeII] - - k[4491]*y_cur[IDX_HII] - k[4492]*y_cur[IDX_H2COII] - - k[4493]*y_cur[IDX_H2SII] - k[4494]*y_cur[IDX_H3II] - - k[4495]*y_cur[IDX_H3OII] - k[4496]*y_cur[IDX_HC2SII] - - k[4497]*y_cur[IDX_HCNHII] - k[4498]*y_cur[IDX_HCNHII] - - k[4499]*y_cur[IDX_HCOII] - k[4500]*y_cur[IDX_HCOII] - - k[4501]*y_cur[IDX_HeII] - k[4502]*y_cur[IDX_MgII] - - k[4503]*y_cur[IDX_NII] - k[4504]*y_cur[IDX_N2HII] - - k[4505]*y_cur[IDX_NH3II] - k[4506]*y_cur[IDX_NH4II] - - k[4507]*y_cur[IDX_NOII] - k[4508]*y_cur[IDX_NaII] - - k[4509]*y_cur[IDX_OII] - k[4510]*y_cur[IDX_SII] - - k[4511]*y_cur[IDX_SOII] - k[4512]*y_cur[IDX_SiII] - - k[4513]*y_cur[IDX_SiOII] - k[4514]*y_cur[IDX_SiOHII] - - k[4515]*y_cur[IDX_SiSII] - k[5761] - k[6051]; - data[jistart + 5276] = 0.0 + k[3445]*y_cur[IDX_NI] + - k[3721]*y_cur[IDX_OI]; - data[jistart + 5277] = 0.0 - k[4487]*y_cur[IDX_C8M]; - data[jistart + 5278] = 0.0 - k[4488]*y_cur[IDX_C8M]; - data[jistart + 5279] = 0.0 - k[4489]*y_cur[IDX_C8M]; - data[jistart + 5280] = 0.0 - k[4490]*y_cur[IDX_C8M]; - data[jistart + 5281] = 0.0 - k[101]*y_cur[IDX_C8M]; - data[jistart + 5282] = 0.0 - k[4491]*y_cur[IDX_C8M]; - data[jistart + 5283] = 0.0 - k[4492]*y_cur[IDX_C8M]; - data[jistart + 5284] = 0.0 - k[4493]*y_cur[IDX_C8M]; - data[jistart + 5285] = 0.0 - k[4494]*y_cur[IDX_C8M]; - data[jistart + 5286] = 0.0 - k[4495]*y_cur[IDX_C8M]; - data[jistart + 5287] = 0.0 - k[4496]*y_cur[IDX_C8M]; - data[jistart + 5288] = 0.0 - k[4497]*y_cur[IDX_C8M] - - k[4498]*y_cur[IDX_C8M]; - data[jistart + 5289] = 0.0 - k[4499]*y_cur[IDX_C8M] - - k[4500]*y_cur[IDX_C8M]; - data[jistart + 5290] = 0.0 - k[4501]*y_cur[IDX_C8M]; - data[jistart + 5291] = 0.0 - k[4502]*y_cur[IDX_C8M]; - data[jistart + 5292] = 0.0 - k[3436]*y_cur[IDX_C8M] - - k[3437]*y_cur[IDX_C8M] - k[3438]*y_cur[IDX_C8M] - - k[3439]*y_cur[IDX_C8M] + k[3445]*y_cur[IDX_C9M]; - data[jistart + 5293] = 0.0 - k[4503]*y_cur[IDX_C8M]; - data[jistart + 5294] = 0.0 - k[4504]*y_cur[IDX_C8M]; - data[jistart + 5295] = 0.0 - k[4505]*y_cur[IDX_C8M]; - data[jistart + 5296] = 0.0 - k[4506]*y_cur[IDX_C8M]; - data[jistart + 5297] = 0.0 - k[4507]*y_cur[IDX_C8M]; - data[jistart + 5298] = 0.0 - k[4508]*y_cur[IDX_C8M]; - data[jistart + 5299] = 0.0 - k[3717]*y_cur[IDX_C8M] + - k[3721]*y_cur[IDX_C9M]; - data[jistart + 5300] = 0.0 - k[4509]*y_cur[IDX_C8M]; - data[jistart + 5301] = 0.0 - k[4510]*y_cur[IDX_C8M]; - data[jistart + 5302] = 0.0 - k[4511]*y_cur[IDX_C8M]; - data[jistart + 5303] = 0.0 - k[4512]*y_cur[IDX_C8M]; - data[jistart + 5304] = 0.0 - k[4513]*y_cur[IDX_C8M]; - data[jistart + 5305] = 0.0 - k[4514]*y_cur[IDX_C8M]; - data[jistart + 5306] = 0.0 - k[4515]*y_cur[IDX_C8M]; - data[jistart + 5307] = 0.0 + k[5603]*y_cur[IDX_C8I]; - data[jistart + 5308] = 0.0 + k[50]*y_cur[IDX_C7HM] + - k[4935]*y_cur[IDX_C7H2I] - k[4940]*y_cur[IDX_C8HI]; - data[jistart + 5309] = 0.0 - k[1337]*y_cur[IDX_C8HI] + - k[4516]*y_cur[IDX_C8HM]; - data[jistart + 5310] = 0.0 - k[1505]*y_cur[IDX_C8HI] - - k[1506]*y_cur[IDX_C8HI] + k[4517]*y_cur[IDX_C8HM]; - data[jistart + 5311] = 0.0 + k[4518]*y_cur[IDX_C8HM]; - data[jistart + 5312] = 0.0 + k[4519]*y_cur[IDX_C8HM]; - data[jistart + 5313] = 0.0 + k[4520]*y_cur[IDX_C8HM]; - data[jistart + 5314] = 0.0 + k[4521]*y_cur[IDX_C8HM]; - data[jistart + 5315] = 0.0 + k[50]*y_cur[IDX_CI]; - data[jistart + 5316] = 0.0 + k[4935]*y_cur[IDX_CI]; - data[jistart + 5317] = 0.0 + k[101]*y_cur[IDX_HI]; - data[jistart + 5318] = 0.0 - k[354]*y_cur[IDX_HII] - - k[1337]*y_cur[IDX_CII] - k[1505]*y_cur[IDX_C2H2II] - - k[1506]*y_cur[IDX_C2H2II] - k[2060]*y_cur[IDX_CH3II] - - k[2311]*y_cur[IDX_HII] - k[2627]*y_cur[IDX_H3II] - - k[2932]*y_cur[IDX_HCOII] - k[3147]*y_cur[IDX_HeII] - - k[3148]*y_cur[IDX_HeII] - k[4940]*y_cur[IDX_CI] - - k[5249]*y_cur[IDX_NI] - k[5374]*y_cur[IDX_OI] - - k[5604]*y_cur[IDX_eM] - k[5765] - k[6057] - k[6058] - k[7056]; - data[jistart + 5319] = 0.0 + k[4516]*y_cur[IDX_CII] + - k[4517]*y_cur[IDX_C2H2II] + k[4518]*y_cur[IDX_C2H3II] + - k[4519]*y_cur[IDX_C4H2II] + k[4520]*y_cur[IDX_C4H3II] + - k[4521]*y_cur[IDX_C4SII] + k[4522]*y_cur[IDX_CH2CCHII] + - k[4523]*y_cur[IDX_CH3II] + k[4524]*y_cur[IDX_CNCII] + - k[4525]*y_cur[IDX_FeII] + k[4526]*y_cur[IDX_HII] + - k[4527]*y_cur[IDX_H2COII] + k[4528]*y_cur[IDX_H2SII] + - k[4529]*y_cur[IDX_H3II] + k[4530]*y_cur[IDX_H3OII] + - k[4531]*y_cur[IDX_HC2SII] + k[4532]*y_cur[IDX_HCNHII] + - k[4533]*y_cur[IDX_HCNHII] + k[4534]*y_cur[IDX_HCOII] + - k[4535]*y_cur[IDX_HCOII] + k[4536]*y_cur[IDX_HeII] + - k[4537]*y_cur[IDX_MgII] + k[4538]*y_cur[IDX_NII] + - k[4539]*y_cur[IDX_N2HII] + k[4540]*y_cur[IDX_NH3II] + - k[4541]*y_cur[IDX_NH4II] + k[4542]*y_cur[IDX_NOII] + - k[4543]*y_cur[IDX_NaII] + k[4544]*y_cur[IDX_OII] + - k[4545]*y_cur[IDX_SII] + k[4546]*y_cur[IDX_SOII] + - k[4547]*y_cur[IDX_SiII] + k[4548]*y_cur[IDX_SiOII] + - k[4549]*y_cur[IDX_SiOHII] + k[4550]*y_cur[IDX_SiSII] + k[5763] + - k[6054]; - data[jistart + 5320] = 0.0 + k[5764] + k[6056]; - data[jistart + 5321] = 0.0 + k[882]*y_cur[IDX_eM] + - k[6842]*y_cur[IDX_GRAINM]; - data[jistart + 5322] = 0.0 + k[884]*y_cur[IDX_eM] + - k[6846]*y_cur[IDX_GRAINM]; - data[jistart + 5323] = 0.0 + k[886]*y_cur[IDX_eM] + - k[6848]*y_cur[IDX_GRAINM]; - data[jistart + 5324] = 0.0 + k[888]*y_cur[IDX_eM] + - k[6854]*y_cur[IDX_GRAINM]; - data[jistart + 5325] = 0.0 + k[5376]*y_cur[IDX_OI]; - data[jistart + 5326] = 0.0 + k[891]*y_cur[IDX_eM] + - k[6857]*y_cur[IDX_GRAINM]; - data[jistart + 5327] = 0.0 + k[3448]*y_cur[IDX_NI]; - data[jistart + 5328] = 0.0 + k[3724]*y_cur[IDX_OI]; - data[jistart + 5329] = 0.0 + k[4522]*y_cur[IDX_C8HM]; - data[jistart + 5330] = 0.0 - k[2060]*y_cur[IDX_C8HI] + - k[4523]*y_cur[IDX_C8HM]; - data[jistart + 5331] = 0.0 + k[4524]*y_cur[IDX_C8HM]; - data[jistart + 5332] = 0.0 + k[4525]*y_cur[IDX_C8HM]; - data[jistart + 5333] = 0.0 + k[8679]*y_cur[IDX_GC7HI]; - data[jistart + 5334] = 0.0 + k[8732]*y_cur[IDX_GCHI]; - data[jistart + 5335] = 0.0 + k[8679]*y_cur[IDX_GCI]; - data[jistart + 5336] = 0.0 + k[8643]*y_cur[IDX_GHI]; - data[jistart + 5337] = 0.0 + k[7238] + k[7420] + k[7602]; - data[jistart + 5338] = 0.0 + k[8732]*y_cur[IDX_GC7I]; - data[jistart + 5339] = 0.0 + k[8643]*y_cur[IDX_GC8I]; - data[jistart + 5340] = 0.0 + k[6842]*y_cur[IDX_C8H2II] + - k[6846]*y_cur[IDX_C8H3II] + k[6848]*y_cur[IDX_C8H4II] + - k[6854]*y_cur[IDX_C8H5II] + k[6857]*y_cur[IDX_C9HII] + - k[6876]*y_cur[IDX_HC9NII]; - data[jistart + 5341] = 0.0 + k[101]*y_cur[IDX_C8M]; - data[jistart + 5342] = 0.0 - k[354]*y_cur[IDX_C8HI] - - k[2311]*y_cur[IDX_C8HI] + k[4526]*y_cur[IDX_C8HM]; - data[jistart + 5343] = 0.0 + k[4527]*y_cur[IDX_C8HM]; - data[jistart + 5344] = 0.0 + k[4528]*y_cur[IDX_C8HM]; - data[jistart + 5345] = 0.0 - k[2627]*y_cur[IDX_C8HI] + - k[4529]*y_cur[IDX_C8HM]; - data[jistart + 5346] = 0.0 + k[4530]*y_cur[IDX_C8HM]; - data[jistart + 5347] = 0.0 + k[4531]*y_cur[IDX_C8HM]; - data[jistart + 5348] = 0.0 + k[5853] + k[6179]; - data[jistart + 5349] = 0.0 + k[1086]*y_cur[IDX_eM] + - k[6876]*y_cur[IDX_GRAINM]; - data[jistart + 5350] = 0.0 + k[4532]*y_cur[IDX_C8HM] + - k[4533]*y_cur[IDX_C8HM]; - data[jistart + 5351] = 0.0 - k[2932]*y_cur[IDX_C8HI] + - k[4534]*y_cur[IDX_C8HM] + k[4535]*y_cur[IDX_C8HM]; - data[jistart + 5352] = 0.0 - k[3147]*y_cur[IDX_C8HI] - - k[3148]*y_cur[IDX_C8HI] + k[4536]*y_cur[IDX_C8HM]; - data[jistart + 5353] = 0.0 + k[4537]*y_cur[IDX_C8HM]; - data[jistart + 5354] = 0.0 + k[3448]*y_cur[IDX_C9HM] - - k[5249]*y_cur[IDX_C8HI]; - data[jistart + 5355] = 0.0 + k[4538]*y_cur[IDX_C8HM]; - data[jistart + 5356] = 0.0 + k[4539]*y_cur[IDX_C8HM]; - data[jistart + 5357] = 0.0 + k[4540]*y_cur[IDX_C8HM]; - data[jistart + 5358] = 0.0 + k[4541]*y_cur[IDX_C8HM]; - data[jistart + 5359] = 0.0 + k[4542]*y_cur[IDX_C8HM]; - data[jistart + 5360] = 0.0 + k[4543]*y_cur[IDX_C8HM]; - data[jistart + 5361] = 0.0 + k[3724]*y_cur[IDX_C9H2II] - - k[5374]*y_cur[IDX_C8HI] + k[5376]*y_cur[IDX_C9HI]; - data[jistart + 5362] = 0.0 + k[4544]*y_cur[IDX_C8HM]; - data[jistart + 5363] = 0.0 + k[4545]*y_cur[IDX_C8HM]; - data[jistart + 5364] = 0.0 + k[4546]*y_cur[IDX_C8HM]; - data[jistart + 5365] = 0.0 + k[4547]*y_cur[IDX_C8HM]; - data[jistart + 5366] = 0.0 + k[4548]*y_cur[IDX_C8HM]; - data[jistart + 5367] = 0.0 + k[4549]*y_cur[IDX_C8HM]; - data[jistart + 5368] = 0.0 + k[4550]*y_cur[IDX_C8HM]; - data[jistart + 5369] = 0.0 + k[882]*y_cur[IDX_C8H2II] + - k[884]*y_cur[IDX_C8H3II] + k[886]*y_cur[IDX_C8H4II] + - k[888]*y_cur[IDX_C8H5II] + k[891]*y_cur[IDX_C9HII] + - k[1086]*y_cur[IDX_HC9NII] - k[5604]*y_cur[IDX_C8HI]; - data[jistart + 5370] = 0.0 + k[1878]*y_cur[IDX_C7H2II] + - k[1879]*y_cur[IDX_C7H3II]; - data[jistart + 5371] = 0.0 + k[1333]*y_cur[IDX_C7H2I]; - data[jistart + 5372] = 0.0 + k[1558]*y_cur[IDX_C6II]; - data[jistart + 5373] = 0.0 + k[1497]*y_cur[IDX_C6HI]; - data[jistart + 5374] = 0.0 + k[1765]*y_cur[IDX_C5HI]; - data[jistart + 5375] = 0.0 + k[1831]*y_cur[IDX_C4HII]; - data[jistart + 5376] = 0.0 + k[1831]*y_cur[IDX_C4HI]; - data[jistart + 5377] = 0.0 + k[1765]*y_cur[IDX_C3H2II]; - data[jistart + 5378] = 0.0 + k[1558]*y_cur[IDX_C2H2I]; - data[jistart + 5379] = 0.0 + k[1497]*y_cur[IDX_C2H2II]; - data[jistart + 5380] = 0.0 + k[1333]*y_cur[IDX_CII]; - data[jistart + 5381] = 0.0 + k[1878]*y_cur[IDX_CI]; - data[jistart + 5382] = 0.0 + k[1879]*y_cur[IDX_CI]; - data[jistart + 5383] = 0.0 + k[2625]*y_cur[IDX_H3II] + - k[2930]*y_cur[IDX_HCOII]; - data[jistart + 5384] = 0.0 + k[2422]*y_cur[IDX_H2I]; - data[jistart + 5385] = 0.0 + k[354]*y_cur[IDX_HII] + k[6058]; - data[jistart + 5386] = 0.0 - k[879]*y_cur[IDX_eM] - - k[880]*y_cur[IDX_eM] - k[2423]*y_cur[IDX_H2I] - - k[6838]*y_cur[IDX_GRAINM] - k[6839]*y_cur[IDX_GRAINM]; - data[jistart + 5387] = 0.0 + k[2310]*y_cur[IDX_HII] + - k[3146]*y_cur[IDX_HeII]; - data[jistart + 5388] = 0.0 - k[6838]*y_cur[IDX_C8HII] - - k[6839]*y_cur[IDX_C8HII]; - data[jistart + 5389] = 0.0 + k[354]*y_cur[IDX_C8HI] + - k[2310]*y_cur[IDX_C8H2I]; - data[jistart + 5390] = 0.0 + k[2422]*y_cur[IDX_C8II] - - k[2423]*y_cur[IDX_C8HII]; - data[jistart + 5391] = 0.0 + k[2625]*y_cur[IDX_C8I]; - data[jistart + 5392] = 0.0 + k[3244]*y_cur[IDX_HeII]; - data[jistart + 5393] = 0.0 + k[2930]*y_cur[IDX_C8I]; - data[jistart + 5394] = 0.0 + k[3146]*y_cur[IDX_C8H2I] + - k[3244]*y_cur[IDX_HC9NI]; - data[jistart + 5395] = 0.0 - k[879]*y_cur[IDX_C8HII] - - k[880]*y_cur[IDX_C8HII]; - data[jistart + 5396] = 0.0 - k[52]*y_cur[IDX_C8HM]; - data[jistart + 5397] = 0.0 - k[4516]*y_cur[IDX_C8HM]; - data[jistart + 5398] = 0.0 - k[4517]*y_cur[IDX_C8HM]; - data[jistart + 5399] = 0.0 - k[4518]*y_cur[IDX_C8HM]; - data[jistart + 5400] = 0.0 - k[4519]*y_cur[IDX_C8HM]; - data[jistart + 5401] = 0.0 - k[4520]*y_cur[IDX_C8HM]; - data[jistart + 5402] = 0.0 - k[4521]*y_cur[IDX_C8HM]; - data[jistart + 5403] = 0.0 + k[5604]*y_cur[IDX_eM]; - data[jistart + 5404] = 0.0 - k[52]*y_cur[IDX_CI] - - k[102]*y_cur[IDX_HI] - k[3440]*y_cur[IDX_NI] - k[3441]*y_cur[IDX_NI] - - k[3718]*y_cur[IDX_OI] - k[4516]*y_cur[IDX_CII] - + data[jistart + 7994] = 0.0 + k[3714]*y_cur[IDX_OI]; + data[jistart + 7995] = 0.0 - k[4408]*y_cur[IDX_C6HM]; + data[jistart + 7996] = 0.0 - k[4409]*y_cur[IDX_C6HM]; + data[jistart + 7997] = 0.0 - k[4385]*y_cur[IDX_C6HM]; + data[jistart + 7998] = 0.0 - k[4397]*y_cur[IDX_C6HM]; + data[jistart + 7999] = 0.0 - k[4403]*y_cur[IDX_C6HM]; + data[jistart + 8000] = 0.0 - k[4380]*y_cur[IDX_C6HM]; + data[jistart + 8001] = 0.0 - k[4399]*y_cur[IDX_C6HM]; + data[jistart + 8002] = 0.0 - k[4406]*y_cur[IDX_C6HM]; + data[jistart + 8003] = 0.0 - k[4382]*y_cur[IDX_C6HM]; + data[jistart + 8004] = 0.0 + k[5600]*y_cur[IDX_eM]; + data[jistart + 8005] = 0.0 - k[4388]*y_cur[IDX_C6HM]; + data[jistart + 8006] = 0.0 - k[4398]*y_cur[IDX_C6HM]; + data[jistart + 8007] = 0.0 - k[4387]*y_cur[IDX_C6HM]; + data[jistart + 8008] = 0.0 - k[4402]*y_cur[IDX_C6HM]; + data[jistart + 8009] = 0.0 - k[4404]*y_cur[IDX_C6HM]; + data[jistart + 8010] = 0.0 - k[4379]*y_cur[IDX_C6HM]; + data[jistart + 8011] = 0.0 - k[4392]*y_cur[IDX_C6HM] - k[4393]*y_cur[IDX_C6HM]; + data[jistart + 8012] = 0.0 - k[4400]*y_cur[IDX_C6HM]; + data[jistart + 8013] = 0.0 - k[4401]*y_cur[IDX_C6HM]; + data[jistart + 8014] = 0.0 - k[4407]*y_cur[IDX_C6HM]; + data[jistart + 8015] = 0.0 - k[4405]*y_cur[IDX_C6HM]; + data[jistart + 8016] = 0.0 - k[4378]*y_cur[IDX_C6HM]; + data[jistart + 8017] = 0.0 - k[4377]*y_cur[IDX_C6HM]; + data[jistart + 8018] = 0.0 - k[4383]*y_cur[IDX_C6HM]; + data[jistart + 8019] = 0.0 - k[3421]*y_cur[IDX_C6HM] - k[3422]*y_cur[IDX_C6HM]; + data[jistart + 8020] = 0.0 - k[4390]*y_cur[IDX_C6HM]; + data[jistart + 8021] = 0.0 - k[3709]*y_cur[IDX_C6HM] + k[3714]*y_cur[IDX_C7HM]; + data[jistart + 8022] = 0.0 - k[4396]*y_cur[IDX_C6HM]; + data[jistart + 8023] = 0.0 - k[4376]*y_cur[IDX_C6HM]; + data[jistart + 8024] = 0.0 - k[4386]*y_cur[IDX_C6HM]; + data[jistart + 8025] = 0.0 - k[48]*y_cur[IDX_C6HM]; + data[jistart + 8026] = 0.0 - k[4394]*y_cur[IDX_C6HM] - k[4395]*y_cur[IDX_C6HM]; + data[jistart + 8027] = 0.0 - k[4389]*y_cur[IDX_C6HM]; + data[jistart + 8028] = 0.0 + k[5600]*y_cur[IDX_C6HI]; + data[jistart + 8029] = 0.0 - k[98]*y_cur[IDX_C6HM]; + data[jistart + 8030] = 0.0 - k[4521]*y_cur[IDX_C8HM]; + data[jistart + 8031] = 0.0 - k[4524]*y_cur[IDX_C8HM]; + data[jistart + 8032] = 0.0 - k[4550]*y_cur[IDX_C8HM]; + data[jistart + 8033] = 0.0 - k[4531]*y_cur[IDX_C8HM]; + data[jistart + 8034] = 0.0 - k[52]*y_cur[IDX_CI] - k[102]*y_cur[IDX_HI] - + k[3440]*y_cur[IDX_NI] - k[3441]*y_cur[IDX_NI] - + k[3718]*y_cur[IDX_OI] - k[4516]*y_cur[IDX_CII] - k[4517]*y_cur[IDX_C2H2II] - k[4518]*y_cur[IDX_C2H3II] - k[4519]*y_cur[IDX_C4H2II] - k[4520]*y_cur[IDX_C4H3II] - k[4521]*y_cur[IDX_C4SII] - k[4522]*y_cur[IDX_CH2CCHII] - @@ -11615,7674 +12784,2049 @@ __global__ void JacKernel(realtype *y, realtype *data, NaunetData *d_udata, k[4547]*y_cur[IDX_SiII] - k[4548]*y_cur[IDX_SiOII] - k[4549]*y_cur[IDX_SiOHII] - k[4550]*y_cur[IDX_SiSII] - k[5763] - k[6054]; - data[jistart + 5405] = 0.0 + k[3723]*y_cur[IDX_OI]; - data[jistart + 5406] = 0.0 - k[4522]*y_cur[IDX_C8HM]; - data[jistart + 5407] = 0.0 - k[4523]*y_cur[IDX_C8HM]; - data[jistart + 5408] = 0.0 - k[4524]*y_cur[IDX_C8HM]; - data[jistart + 5409] = 0.0 - k[4525]*y_cur[IDX_C8HM]; - data[jistart + 5410] = 0.0 - k[102]*y_cur[IDX_C8HM]; - data[jistart + 5411] = 0.0 - k[4526]*y_cur[IDX_C8HM]; - data[jistart + 5412] = 0.0 - k[4527]*y_cur[IDX_C8HM]; - data[jistart + 5413] = 0.0 - k[4528]*y_cur[IDX_C8HM]; - data[jistart + 5414] = 0.0 - k[4529]*y_cur[IDX_C8HM]; - data[jistart + 5415] = 0.0 - k[4530]*y_cur[IDX_C8HM]; - data[jistart + 5416] = 0.0 - k[4531]*y_cur[IDX_C8HM]; - data[jistart + 5417] = 0.0 - k[4532]*y_cur[IDX_C8HM] - - k[4533]*y_cur[IDX_C8HM]; - data[jistart + 5418] = 0.0 - k[4534]*y_cur[IDX_C8HM] - - k[4535]*y_cur[IDX_C8HM]; - data[jistart + 5419] = 0.0 - k[4536]*y_cur[IDX_C8HM]; - data[jistart + 5420] = 0.0 - k[4537]*y_cur[IDX_C8HM]; - data[jistart + 5421] = 0.0 - k[3440]*y_cur[IDX_C8HM] - - k[3441]*y_cur[IDX_C8HM]; - data[jistart + 5422] = 0.0 - k[4538]*y_cur[IDX_C8HM]; - data[jistart + 5423] = 0.0 - k[4539]*y_cur[IDX_C8HM]; - data[jistart + 5424] = 0.0 - k[4540]*y_cur[IDX_C8HM]; - data[jistart + 5425] = 0.0 - k[4541]*y_cur[IDX_C8HM]; - data[jistart + 5426] = 0.0 - k[4542]*y_cur[IDX_C8HM]; - data[jistart + 5427] = 0.0 - k[4543]*y_cur[IDX_C8HM]; - data[jistart + 5428] = 0.0 - k[3718]*y_cur[IDX_C8HM] + - k[3723]*y_cur[IDX_C9HM]; - data[jistart + 5429] = 0.0 - k[4544]*y_cur[IDX_C8HM]; - data[jistart + 5430] = 0.0 - k[4545]*y_cur[IDX_C8HM]; - data[jistart + 5431] = 0.0 - k[4546]*y_cur[IDX_C8HM]; - data[jistart + 5432] = 0.0 - k[4547]*y_cur[IDX_C8HM]; - data[jistart + 5433] = 0.0 - k[4548]*y_cur[IDX_C8HM]; - data[jistart + 5434] = 0.0 - k[4549]*y_cur[IDX_C8HM]; - data[jistart + 5435] = 0.0 - k[4550]*y_cur[IDX_C8HM]; - data[jistart + 5436] = 0.0 + k[5604]*y_cur[IDX_C8HI]; - data[jistart + 5437] = 0.0 - k[4939]*y_cur[IDX_C8H2I] + - k[4951]*y_cur[IDX_CH3C6HI]; - data[jistart + 5438] = 0.0 - k[1335]*y_cur[IDX_C8H2I] - - k[1336]*y_cur[IDX_C8H2I]; - data[jistart + 5439] = 0.0 + k[4891]*y_cur[IDX_C6H2I] - - k[4893]*y_cur[IDX_C8H2I]; - data[jistart + 5440] = 0.0 - k[1503]*y_cur[IDX_C8H2I] - - k[1504]*y_cur[IDX_C8H2I]; - data[jistart + 5441] = 0.0 + k[4891]*y_cur[IDX_C2HI]; - data[jistart + 5442] = 0.0 + k[102]*y_cur[IDX_HI]; - data[jistart + 5443] = 0.0 - k[353]*y_cur[IDX_HII] - - k[1335]*y_cur[IDX_CII] - k[1336]*y_cur[IDX_CII] - - k[1503]*y_cur[IDX_C2H2II] - k[1504]*y_cur[IDX_C2H2II] - - k[2059]*y_cur[IDX_CH3II] - k[2310]*y_cur[IDX_HII] - - k[2626]*y_cur[IDX_H3II] - k[2931]*y_cur[IDX_HCOII] - - k[3144]*y_cur[IDX_HeII] - k[3145]*y_cur[IDX_HeII] - - k[3146]*y_cur[IDX_HeII] - k[4893]*y_cur[IDX_C2HI] - - k[4939]*y_cur[IDX_CI] - k[5108]*y_cur[IDX_CNI] - k[5764] - k[6055] - - k[6056] - k[7058]; - data[jistart + 5444] = 0.0 + k[883]*y_cur[IDX_eM] + - k[6845]*y_cur[IDX_GRAINM]; - data[jistart + 5445] = 0.0 + k[885]*y_cur[IDX_eM] + - k[6847]*y_cur[IDX_GRAINM]; - data[jistart + 5446] = 0.0 + k[887]*y_cur[IDX_eM] + - k[6853]*y_cur[IDX_GRAINM]; - data[jistart + 5447] = 0.0 + k[3725]*y_cur[IDX_OI]; - data[jistart + 5448] = 0.0 - k[2059]*y_cur[IDX_C8H2I]; - data[jistart + 5449] = 0.0 + k[4951]*y_cur[IDX_CI]; - data[jistart + 5450] = 0.0 - k[5108]*y_cur[IDX_C8H2I]; - data[jistart + 5451] = 0.0 + k[8733]*y_cur[IDX_GCHI]; - data[jistart + 5452] = 0.0 + k[8644]*y_cur[IDX_GHI]; - data[jistart + 5453] = 0.0 + k[7240] + k[7422] + k[7604]; - data[jistart + 5454] = 0.0 + k[8733]*y_cur[IDX_GC7HI]; - data[jistart + 5455] = 0.0 + k[8644]*y_cur[IDX_GC8HI]; - data[jistart + 5456] = 0.0 + k[6845]*y_cur[IDX_C8H3II] + - k[6847]*y_cur[IDX_C8H4II] + k[6853]*y_cur[IDX_C8H5II]; - data[jistart + 5457] = 0.0 + k[102]*y_cur[IDX_C8HM]; - data[jistart + 5458] = 0.0 - k[353]*y_cur[IDX_C8H2I] - - k[2310]*y_cur[IDX_C8H2I]; - data[jistart + 5459] = 0.0 - k[2626]*y_cur[IDX_C8H2I]; - data[jistart + 5460] = 0.0 - k[2931]*y_cur[IDX_C8H2I]; - data[jistart + 5461] = 0.0 - k[3144]*y_cur[IDX_C8H2I] - - k[3145]*y_cur[IDX_C8H2I] - k[3146]*y_cur[IDX_C8H2I]; - data[jistart + 5462] = 0.0 + k[3725]*y_cur[IDX_C9H3II]; - data[jistart + 5463] = 0.0 + k[883]*y_cur[IDX_C8H3II] + - k[885]*y_cur[IDX_C8H4II] + k[887]*y_cur[IDX_C8H5II]; - data[jistart + 5464] = 0.0 + k[1880]*y_cur[IDX_C7H3II] - - k[1881]*y_cur[IDX_C8H2II] - k[1882]*y_cur[IDX_C8H2II]; - data[jistart + 5465] = 0.0 + k[1361]*y_cur[IDX_CH3C6HI]; - data[jistart + 5466] = 0.0 + k[1739]*y_cur[IDX_C6H2II]; - data[jistart + 5467] = 0.0 + k[1559]*y_cur[IDX_C6HII]; - data[jistart + 5468] = 0.0 + k[1495]*y_cur[IDX_C6H2I] + - k[1498]*y_cur[IDX_C6HI]; - data[jistart + 5469] = 0.0 + k[1600]*y_cur[IDX_C6HI]; - data[jistart + 5470] = 0.0 + k[1665]*y_cur[IDX_C7HI]; - data[jistart + 5471] = 0.0 + k[1826]*y_cur[IDX_C5H2II]; - data[jistart + 5472] = 0.0 + k[1790]*y_cur[IDX_C5H2II]; - data[jistart + 5473] = 0.0 + k[1763]*y_cur[IDX_C5H2I] + - k[1766]*y_cur[IDX_C5HI]; - data[jistart + 5474] = 0.0 + k[1800]*y_cur[IDX_C5HI]; - data[jistart + 5475] = 0.0 + k[1843]*y_cur[IDX_C4H2II]; - data[jistart + 5476] = 0.0 + k[1834]*y_cur[IDX_C4H2I]; - data[jistart + 5477] = 0.0 + k[1834]*y_cur[IDX_C4HII]; - data[jistart + 5478] = 0.0 + k[1843]*y_cur[IDX_C4HI]; - data[jistart + 5479] = 0.0 + k[1766]*y_cur[IDX_C3H2II] + - k[1800]*y_cur[IDX_C3H3II] + k[2024]*y_cur[IDX_CH2CCHII]; - data[jistart + 5480] = 0.0 + k[1763]*y_cur[IDX_C3H2II]; - data[jistart + 5481] = 0.0 + k[1790]*y_cur[IDX_C3H2I] + - k[1826]*y_cur[IDX_C3HI] + k[2481]*y_cur[IDX_H2CCCI]; - data[jistart + 5482] = 0.0 + k[1498]*y_cur[IDX_C2H2II] + - k[1600]*y_cur[IDX_C2H3II]; - data[jistart + 5483] = 0.0 + k[1559]*y_cur[IDX_C2H2I]; - data[jistart + 5484] = 0.0 + k[1495]*y_cur[IDX_C2H2II]; - data[jistart + 5485] = 0.0 + k[1739]*y_cur[IDX_C2HI]; - data[jistart + 5486] = 0.0 + k[1665]*y_cur[IDX_C2H4II] + - k[2058]*y_cur[IDX_CH3II]; - data[jistart + 5487] = 0.0 + k[1880]*y_cur[IDX_CI]; - data[jistart + 5488] = 0.0 + k[2627]*y_cur[IDX_H3II] + - k[2932]*y_cur[IDX_HCOII]; - data[jistart + 5489] = 0.0 + k[2423]*y_cur[IDX_H2I]; - data[jistart + 5490] = 0.0 + k[353]*y_cur[IDX_HII] + k[6055]; - data[jistart + 5491] = 0.0 - k[881]*y_cur[IDX_eM] - - k[882]*y_cur[IDX_eM] - k[1881]*y_cur[IDX_CI] - k[1882]*y_cur[IDX_CI] - - k[2188]*y_cur[IDX_CH4I] - k[3719]*y_cur[IDX_OI] - - k[6841]*y_cur[IDX_GRAINM] - k[6842]*y_cur[IDX_GRAINM]; - data[jistart + 5492] = 0.0 + k[2024]*y_cur[IDX_C5HI]; - data[jistart + 5493] = 0.0 + k[2058]*y_cur[IDX_C7HI]; - data[jistart + 5494] = 0.0 + k[1361]*y_cur[IDX_CII]; - data[jistart + 5495] = 0.0 - k[2188]*y_cur[IDX_C8H2II]; - data[jistart + 5496] = 0.0 - k[6841]*y_cur[IDX_C8H2II] - - k[6842]*y_cur[IDX_C8H2II]; - data[jistart + 5497] = 0.0 + k[353]*y_cur[IDX_C8H2I]; - data[jistart + 5498] = 0.0 + k[2423]*y_cur[IDX_C8HII]; - data[jistart + 5499] = 0.0 + k[2481]*y_cur[IDX_C5H2II]; - data[jistart + 5500] = 0.0 + k[2627]*y_cur[IDX_C8HI]; - data[jistart + 5501] = 0.0 + k[2932]*y_cur[IDX_C8HI]; - data[jistart + 5502] = 0.0 - k[3719]*y_cur[IDX_C8H2II]; - data[jistart + 5503] = 0.0 - k[881]*y_cur[IDX_C8H2II] - - k[882]*y_cur[IDX_C8H2II]; - data[jistart + 5504] = 0.0 - k[1883]*y_cur[IDX_C8H3II] - - k[1884]*y_cur[IDX_C8H3II]; - data[jistart + 5505] = 0.0 + k[1362]*y_cur[IDX_CH3C7NI]; - data[jistart + 5506] = 0.0 + k[1496]*y_cur[IDX_C6H2I]; - data[jistart + 5507] = 0.0 + k[1639]*y_cur[IDX_C6H2II]; - data[jistart + 5508] = 0.0 + k[1596]*y_cur[IDX_C6H2I] + - k[1601]*y_cur[IDX_C6HI]; - data[jistart + 5509] = 0.0 + k[1663]*y_cur[IDX_C7H2I]; - data[jistart + 5510] = 0.0 + k[1791]*y_cur[IDX_C5H2II]; - data[jistart + 5511] = 0.0 + k[1764]*y_cur[IDX_C5H2I]; - data[jistart + 5512] = 0.0 + k[1798]*y_cur[IDX_C5H2I] + - k[1801]*y_cur[IDX_C5HI]; - data[jistart + 5513] = 0.0 + k[1844]*y_cur[IDX_C4H3II]; - data[jistart + 5514] = 0.0 + k[1838]*y_cur[IDX_C4H2II]; - data[jistart + 5515] = 0.0 + k[1838]*y_cur[IDX_C4H2I]; - data[jistart + 5516] = 0.0 + k[1844]*y_cur[IDX_C4HI]; - data[jistart + 5517] = 0.0 + k[1801]*y_cur[IDX_C3H3II] + - k[2025]*y_cur[IDX_CH2CCHII]; - data[jistart + 5518] = 0.0 + k[1764]*y_cur[IDX_C3H2II] + - k[1798]*y_cur[IDX_C3H3II] + k[2022]*y_cur[IDX_CH2CCHII]; - data[jistart + 5519] = 0.0 + k[1791]*y_cur[IDX_C3H2I] + - k[2037]*y_cur[IDX_CH2CCHI] + k[2482]*y_cur[IDX_H2CCCI]; - data[jistart + 5520] = 0.0 + k[1601]*y_cur[IDX_C2H3II]; - data[jistart + 5521] = 0.0 + k[1496]*y_cur[IDX_C2H2II] + - k[1596]*y_cur[IDX_C2H3II]; - data[jistart + 5522] = 0.0 + k[1639]*y_cur[IDX_C2H3I]; - data[jistart + 5523] = 0.0 + k[1663]*y_cur[IDX_C2H4II] + - k[2057]*y_cur[IDX_CH3II]; - data[jistart + 5524] = 0.0 + k[2626]*y_cur[IDX_H3II] + - k[2931]*y_cur[IDX_HCOII]; - data[jistart + 5525] = 0.0 - k[883]*y_cur[IDX_eM] - - k[884]*y_cur[IDX_eM] - k[1883]*y_cur[IDX_CI] - k[1884]*y_cur[IDX_CI] - - k[3720]*y_cur[IDX_OI] - k[6845]*y_cur[IDX_GRAINM] - - k[6846]*y_cur[IDX_GRAINM]; - data[jistart + 5526] = 0.0 + k[2037]*y_cur[IDX_C5H2II]; - data[jistart + 5527] = 0.0 + k[2022]*y_cur[IDX_C5H2I] + - k[2025]*y_cur[IDX_C5HI]; - data[jistart + 5528] = 0.0 + k[2057]*y_cur[IDX_C7H2I]; - data[jistart + 5529] = 0.0 + k[1362]*y_cur[IDX_CII]; - data[jistart + 5530] = 0.0 - k[6845]*y_cur[IDX_C8H3II] - - k[6846]*y_cur[IDX_C8H3II]; - data[jistart + 5531] = 0.0 + k[2482]*y_cur[IDX_C5H2II]; - data[jistart + 5532] = 0.0 + k[2626]*y_cur[IDX_C8H2I]; - data[jistart + 5533] = 0.0 + k[2931]*y_cur[IDX_C8H2I]; - data[jistart + 5534] = 0.0 - k[3720]*y_cur[IDX_C8H3II]; - data[jistart + 5535] = 0.0 - k[883]*y_cur[IDX_C8H3II] - - k[884]*y_cur[IDX_C8H3II]; - data[jistart + 5536] = 0.0 + k[1640]*y_cur[IDX_C6H2II]; - data[jistart + 5537] = 0.0 + k[1597]*y_cur[IDX_C6H2I]; - data[jistart + 5538] = 0.0 + k[1703]*y_cur[IDX_C6H2II]; - data[jistart + 5539] = 0.0 + k[1660]*y_cur[IDX_C6H2I] + - k[1662]*y_cur[IDX_C6HI]; - data[jistart + 5540] = 0.0 + k[1799]*y_cur[IDX_C5H2I]; - data[jistart + 5541] = 0.0 + k[5518]*y_cur[IDX_C4H2II]; - data[jistart + 5542] = 0.0 + k[5518]*y_cur[IDX_C4H2I]; - data[jistart + 5543] = 0.0 + k[1799]*y_cur[IDX_C3H3II] + - k[2023]*y_cur[IDX_CH2CCHII]; - data[jistart + 5544] = 0.0 + k[2038]*y_cur[IDX_CH2CCHI] + - k[2109]*y_cur[IDX_CH3CCHI]; - data[jistart + 5545] = 0.0 + k[1662]*y_cur[IDX_C2H4II]; - data[jistart + 5546] = 0.0 + k[1597]*y_cur[IDX_C2H3II] + - k[1660]*y_cur[IDX_C2H4II]; - data[jistart + 5547] = 0.0 + k[1640]*y_cur[IDX_C2H3I] + - k[1703]*y_cur[IDX_C2H4I]; - data[jistart + 5548] = 0.0 + k[2187]*y_cur[IDX_CH4I]; - data[jistart + 5549] = 0.0 - k[885]*y_cur[IDX_eM] - - k[886]*y_cur[IDX_eM] - k[6847]*y_cur[IDX_GRAINM] - - k[6848]*y_cur[IDX_GRAINM]; - data[jistart + 5550] = 0.0 + k[2038]*y_cur[IDX_C5H2II]; - data[jistart + 5551] = 0.0 + k[2023]*y_cur[IDX_C5H2I]; - data[jistart + 5552] = 0.0 + k[2109]*y_cur[IDX_C5H2II]; - data[jistart + 5553] = 0.0 + k[2187]*y_cur[IDX_C7H2II]; - data[jistart + 5554] = 0.0 - k[6847]*y_cur[IDX_C8H4II] - - k[6848]*y_cur[IDX_C8H4II]; - data[jistart + 5555] = 0.0 - k[885]*y_cur[IDX_C8H4II] - - k[886]*y_cur[IDX_C8H4II]; - data[jistart + 5556] = 0.0 + k[5576]*y_cur[IDX_C4H3II]; - data[jistart + 5557] = 0.0 + k[5576]*y_cur[IDX_C4H2I]; - data[jistart + 5558] = 0.0 - k[887]*y_cur[IDX_eM] - - k[888]*y_cur[IDX_eM] - k[6853]*y_cur[IDX_GRAINM] - - k[6854]*y_cur[IDX_GRAINM]; - data[jistart + 5559] = 0.0 - k[6853]*y_cur[IDX_C8H5II] - - k[6854]*y_cur[IDX_C8H5II]; - data[jistart + 5560] = 0.0 - k[887]*y_cur[IDX_C8H5II] - - k[888]*y_cur[IDX_C8H5II]; - data[jistart + 5561] = 0.0 + k[51]*y_cur[IDX_C8M] + - k[4940]*y_cur[IDX_C8HI] + k[4943]*y_cur[IDX_C9NI]; - data[jistart + 5562] = 0.0 + k[4551]*y_cur[IDX_C9M] - - k[5502]*y_cur[IDX_C9I]; - data[jistart + 5563] = 0.0 + k[5221]*y_cur[IDX_NI] + - k[5340]*y_cur[IDX_OI] + k[5688] + k[5955]; - data[jistart + 5564] = 0.0 + k[728]*y_cur[IDX_eM] + - k[6870]*y_cur[IDX_GRAINM]; - data[jistart + 5565] = 0.0 + k[3379]*y_cur[IDX_NI]; - data[jistart + 5566] = 0.0 + k[5968]; - data[jistart + 5567] = 0.0 + k[3679]*y_cur[IDX_OI]; - data[jistart + 5568] = 0.0 + k[5974]; - data[jistart + 5569] = 0.0 + k[738]*y_cur[IDX_eM] + - k[6887]*y_cur[IDX_GRAINM]; - data[jistart + 5570] = 0.0 + k[34]*y_cur[IDX_C7M]; - data[jistart + 5571] = 0.0 + k[15]*y_cur[IDX_C7I]; - data[jistart + 5572] = 0.0 + k[4552]*y_cur[IDX_C9M]; - data[jistart + 5573] = 0.0 + k[4553]*y_cur[IDX_C9M]; - data[jistart + 5574] = 0.0 + k[32]*y_cur[IDX_C6M]; - data[jistart + 5575] = 0.0 + k[20]*y_cur[IDX_C6I]; - data[jistart + 5576] = 0.0 + k[29]*y_cur[IDX_C5M]; - data[jistart + 5577] = 0.0 + k[25]*y_cur[IDX_C5I]; - data[jistart + 5578] = 0.0 + k[4554]*y_cur[IDX_C9M]; - data[jistart + 5579] = 0.0 + k[4555]*y_cur[IDX_C9M]; - data[jistart + 5580] = 0.0 + k[4556]*y_cur[IDX_C9M]; - data[jistart + 5581] = 0.0 + k[25]*y_cur[IDX_C4M]; - data[jistart + 5582] = 0.0 + k[29]*y_cur[IDX_C4I]; - data[jistart + 5583] = 0.0 + k[20]*y_cur[IDX_C3M]; - data[jistart + 5584] = 0.0 + k[32]*y_cur[IDX_C3I]; - data[jistart + 5585] = 0.0 + k[15]*y_cur[IDX_C2M]; - data[jistart + 5586] = 0.0 + k[34]*y_cur[IDX_C2I]; - data[jistart + 5587] = 0.0 + k[51]*y_cur[IDX_CI]; - data[jistart + 5588] = 0.0 + k[4940]*y_cur[IDX_CI]; - data[jistart + 5589] = 0.0 - k[355]*y_cur[IDX_HII] - - k[2628]*y_cur[IDX_H3II] - k[2933]*y_cur[IDX_HCOII] - - k[3149]*y_cur[IDX_HeII] - k[3150]*y_cur[IDX_HeII] - - k[5250]*y_cur[IDX_NI] - k[5375]*y_cur[IDX_OI] - - k[5502]*y_cur[IDX_CII] - k[5605]*y_cur[IDX_eM] - k[5767] - k[6060] - - k[6061] - k[7060]; - data[jistart + 5590] = 0.0 + k[4551]*y_cur[IDX_CII] + - k[4552]*y_cur[IDX_C2H2II] + k[4553]*y_cur[IDX_C2H3II] + - k[4554]*y_cur[IDX_C4H2II] + k[4555]*y_cur[IDX_C4H3II] + - k[4556]*y_cur[IDX_C4SII] + k[4557]*y_cur[IDX_CH2CCHII] + - k[4558]*y_cur[IDX_CH3II] + k[4559]*y_cur[IDX_CNCII] + - k[4560]*y_cur[IDX_FeII] + k[4561]*y_cur[IDX_HII] + - k[4562]*y_cur[IDX_H2COII] + k[4563]*y_cur[IDX_H2SII] + - k[4564]*y_cur[IDX_H3II] + k[4565]*y_cur[IDX_H3OII] + - k[4566]*y_cur[IDX_HC2SII] + k[4567]*y_cur[IDX_HCNHII] + - k[4568]*y_cur[IDX_HCNHII] + k[4569]*y_cur[IDX_HCOII] + - k[4570]*y_cur[IDX_HCOII] + k[4571]*y_cur[IDX_HeII] + - k[4572]*y_cur[IDX_MgII] + k[4573]*y_cur[IDX_NII] + - k[4574]*y_cur[IDX_N2HII] + k[4575]*y_cur[IDX_NH3II] + - k[4576]*y_cur[IDX_NH4II] + k[4577]*y_cur[IDX_NOII] + - k[4578]*y_cur[IDX_NaII] + k[4579]*y_cur[IDX_OII] + - k[4580]*y_cur[IDX_SII] + k[4581]*y_cur[IDX_SOII] + - k[4582]*y_cur[IDX_SiII] + k[4583]*y_cur[IDX_SiOII] + - k[4584]*y_cur[IDX_SiOHII] + k[4585]*y_cur[IDX_SiSII] + k[5766] + - k[6059]; - data[jistart + 5591] = 0.0 + k[5770] + k[6065]; - data[jistart + 5592] = 0.0 + k[892]*y_cur[IDX_eM] + - k[6858]*y_cur[IDX_GRAINM]; - data[jistart + 5593] = 0.0 + k[893]*y_cur[IDX_eM] + - k[6859]*y_cur[IDX_GRAINM]; - data[jistart + 5594] = 0.0 + k[4943]*y_cur[IDX_CI]; - data[jistart + 5595] = 0.0 + k[4557]*y_cur[IDX_C9M]; - data[jistart + 5596] = 0.0 + k[4558]*y_cur[IDX_C9M]; - data[jistart + 5597] = 0.0 + k[4559]*y_cur[IDX_C9M]; - data[jistart + 5598] = 0.0 + k[4560]*y_cur[IDX_C9M]; - data[jistart + 5599] = 0.0 + k[8680]*y_cur[IDX_GC8I]; - data[jistart + 5600] = 0.0 + k[8680]*y_cur[IDX_GCI]; - data[jistart + 5601] = 0.0 + k[7242] + k[7424] + k[7606]; - data[jistart + 5602] = 0.0 + k[6858]*y_cur[IDX_C9HII] + - k[6859]*y_cur[IDX_C9H2II] + k[6870]*y_cur[IDX_C10II] + - k[6887]*y_cur[IDX_C11II]; - data[jistart + 5603] = 0.0 - k[355]*y_cur[IDX_C9I] + - k[4561]*y_cur[IDX_C9M]; - data[jistart + 5604] = 0.0 + k[4562]*y_cur[IDX_C9M]; - data[jistart + 5605] = 0.0 + k[4563]*y_cur[IDX_C9M]; - data[jistart + 5606] = 0.0 - k[2628]*y_cur[IDX_C9I] + - k[4564]*y_cur[IDX_C9M]; - data[jistart + 5607] = 0.0 + k[4565]*y_cur[IDX_C9M]; - data[jistart + 5608] = 0.0 + k[4566]*y_cur[IDX_C9M]; - data[jistart + 5609] = 0.0 + k[4567]*y_cur[IDX_C9M] + - k[4568]*y_cur[IDX_C9M]; - data[jistart + 5610] = 0.0 - k[2933]*y_cur[IDX_C9I] + - k[4569]*y_cur[IDX_C9M] + k[4570]*y_cur[IDX_C9M]; - data[jistart + 5611] = 0.0 - k[3149]*y_cur[IDX_C9I] - - k[3150]*y_cur[IDX_C9I] + k[4571]*y_cur[IDX_C9M]; - data[jistart + 5612] = 0.0 + k[4572]*y_cur[IDX_C9M]; - data[jistart + 5613] = 0.0 + k[3379]*y_cur[IDX_C10M] + - k[5221]*y_cur[IDX_C10I] - k[5250]*y_cur[IDX_C9I]; - data[jistart + 5614] = 0.0 + k[4573]*y_cur[IDX_C9M]; - data[jistart + 5615] = 0.0 + k[4574]*y_cur[IDX_C9M]; - data[jistart + 5616] = 0.0 + k[4575]*y_cur[IDX_C9M]; - data[jistart + 5617] = 0.0 + k[4576]*y_cur[IDX_C9M]; - data[jistart + 5618] = 0.0 + k[4577]*y_cur[IDX_C9M]; - data[jistart + 5619] = 0.0 + k[4578]*y_cur[IDX_C9M]; - data[jistart + 5620] = 0.0 + k[3679]*y_cur[IDX_C10HII] + - k[5340]*y_cur[IDX_C10I] - k[5375]*y_cur[IDX_C9I]; - data[jistart + 5621] = 0.0 + k[4579]*y_cur[IDX_C9M]; - data[jistart + 5622] = 0.0 + k[4580]*y_cur[IDX_C9M]; - data[jistart + 5623] = 0.0 + k[4581]*y_cur[IDX_C9M]; - data[jistart + 5624] = 0.0 + k[4582]*y_cur[IDX_C9M]; - data[jistart + 5625] = 0.0 + k[4583]*y_cur[IDX_C9M]; - data[jistart + 5626] = 0.0 + k[4584]*y_cur[IDX_C9M]; - data[jistart + 5627] = 0.0 + k[4585]*y_cur[IDX_C9M]; - data[jistart + 5628] = 0.0 + k[728]*y_cur[IDX_C10II] + - k[738]*y_cur[IDX_C11II] + k[892]*y_cur[IDX_C9HII] + - k[893]*y_cur[IDX_C9H2II] - k[5605]*y_cur[IDX_C9I]; - data[jistart + 5629] = 0.0 + k[1881]*y_cur[IDX_C8H2II]; - data[jistart + 5630] = 0.0 + k[1335]*y_cur[IDX_C8H2I] + - k[1337]*y_cur[IDX_C8HI] + k[5501]*y_cur[IDX_C8I]; - data[jistart + 5631] = 0.0 + k[3061]*y_cur[IDX_HeII]; - data[jistart + 5632] = 0.0 + k[3072]*y_cur[IDX_HeII]; - data[jistart + 5633] = 0.0 + k[5501]*y_cur[IDX_CII]; - data[jistart + 5634] = 0.0 + k[1337]*y_cur[IDX_CII]; - data[jistart + 5635] = 0.0 + k[1335]*y_cur[IDX_CII]; - data[jistart + 5636] = 0.0 + k[1881]*y_cur[IDX_CI]; - data[jistart + 5637] = 0.0 + k[355]*y_cur[IDX_HII] + k[6061]; - data[jistart + 5638] = 0.0 - k[889]*y_cur[IDX_eM] - - k[890]*y_cur[IDX_eM] - k[2424]*y_cur[IDX_H2I] - - k[6855]*y_cur[IDX_GRAINM] - k[6856]*y_cur[IDX_GRAINM]; - data[jistart + 5639] = 0.0 + k[2313]*y_cur[IDX_HII] + - k[3155]*y_cur[IDX_HeII]; - data[jistart + 5640] = 0.0 + k[3152]*y_cur[IDX_HeII]; - data[jistart + 5641] = 0.0 - k[6855]*y_cur[IDX_C9II] - - k[6856]*y_cur[IDX_C9II]; - data[jistart + 5642] = 0.0 + k[355]*y_cur[IDX_C9I] + - k[2313]*y_cur[IDX_C9HI]; - data[jistart + 5643] = 0.0 - k[2424]*y_cur[IDX_C9II]; - data[jistart + 5644] = 0.0 + k[3061]*y_cur[IDX_C10I] + - k[3072]*y_cur[IDX_C10HI] + k[3152]*y_cur[IDX_C9H2I] + - k[3155]*y_cur[IDX_C9HI]; - data[jistart + 5645] = 0.0 - k[889]*y_cur[IDX_C9II] - - k[890]*y_cur[IDX_C9II]; - data[jistart + 5646] = 0.0 - k[53]*y_cur[IDX_C9M]; - data[jistart + 5647] = 0.0 - k[4551]*y_cur[IDX_C9M]; - data[jistart + 5648] = 0.0 + k[3380]*y_cur[IDX_NI] + - k[3678]*y_cur[IDX_OI]; - data[jistart + 5649] = 0.0 - k[4552]*y_cur[IDX_C9M]; - data[jistart + 5650] = 0.0 - k[4553]*y_cur[IDX_C9M]; - data[jistart + 5651] = 0.0 - k[4554]*y_cur[IDX_C9M]; - data[jistart + 5652] = 0.0 - k[4555]*y_cur[IDX_C9M]; - data[jistart + 5653] = 0.0 - k[4556]*y_cur[IDX_C9M]; - data[jistart + 5654] = 0.0 + k[5605]*y_cur[IDX_eM]; - data[jistart + 5655] = 0.0 - k[53]*y_cur[IDX_CI] - - k[103]*y_cur[IDX_HI] - k[120]*y_cur[IDX_NI] - k[3442]*y_cur[IDX_NI] - - k[3443]*y_cur[IDX_NI] - k[3444]*y_cur[IDX_NI] - - k[3445]*y_cur[IDX_NI] - k[3721]*y_cur[IDX_OI] - - k[4551]*y_cur[IDX_CII] - k[4552]*y_cur[IDX_C2H2II] - - k[4553]*y_cur[IDX_C2H3II] - k[4554]*y_cur[IDX_C4H2II] - - k[4555]*y_cur[IDX_C4H3II] - k[4556]*y_cur[IDX_C4SII] - - k[4557]*y_cur[IDX_CH2CCHII] - k[4558]*y_cur[IDX_CH3II] - - k[4559]*y_cur[IDX_CNCII] - k[4560]*y_cur[IDX_FeII] - - k[4561]*y_cur[IDX_HII] - k[4562]*y_cur[IDX_H2COII] - - k[4563]*y_cur[IDX_H2SII] - k[4564]*y_cur[IDX_H3II] - - k[4565]*y_cur[IDX_H3OII] - k[4566]*y_cur[IDX_HC2SII] - - k[4567]*y_cur[IDX_HCNHII] - k[4568]*y_cur[IDX_HCNHII] - - k[4569]*y_cur[IDX_HCOII] - k[4570]*y_cur[IDX_HCOII] - - k[4571]*y_cur[IDX_HeII] - k[4572]*y_cur[IDX_MgII] - - k[4573]*y_cur[IDX_NII] - k[4574]*y_cur[IDX_N2HII] - - k[4575]*y_cur[IDX_NH3II] - k[4576]*y_cur[IDX_NH4II] - - k[4577]*y_cur[IDX_NOII] - k[4578]*y_cur[IDX_NaII] - - k[4579]*y_cur[IDX_OII] - k[4580]*y_cur[IDX_SII] - - k[4581]*y_cur[IDX_SOII] - k[4582]*y_cur[IDX_SiII] - - k[4583]*y_cur[IDX_SiOII] - k[4584]*y_cur[IDX_SiOHII] - - k[4585]*y_cur[IDX_SiSII] - k[5766] - k[6059]; - data[jistart + 5656] = 0.0 - k[4557]*y_cur[IDX_C9M]; - data[jistart + 5657] = 0.0 - k[4558]*y_cur[IDX_C9M]; - data[jistart + 5658] = 0.0 - k[4559]*y_cur[IDX_C9M]; - data[jistart + 5659] = 0.0 - k[4560]*y_cur[IDX_C9M]; - data[jistart + 5660] = 0.0 - k[103]*y_cur[IDX_C9M]; - data[jistart + 5661] = 0.0 - k[4561]*y_cur[IDX_C9M]; - data[jistart + 5662] = 0.0 - k[4562]*y_cur[IDX_C9M]; - data[jistart + 5663] = 0.0 - k[4563]*y_cur[IDX_C9M]; - data[jistart + 5664] = 0.0 - k[4564]*y_cur[IDX_C9M]; - data[jistart + 5665] = 0.0 - k[4565]*y_cur[IDX_C9M]; - data[jistart + 5666] = 0.0 - k[4566]*y_cur[IDX_C9M]; - data[jistart + 5667] = 0.0 - k[4567]*y_cur[IDX_C9M] - - k[4568]*y_cur[IDX_C9M]; - data[jistart + 5668] = 0.0 - k[4569]*y_cur[IDX_C9M] - - k[4570]*y_cur[IDX_C9M]; - data[jistart + 5669] = 0.0 - k[4571]*y_cur[IDX_C9M]; - data[jistart + 5670] = 0.0 - k[4572]*y_cur[IDX_C9M]; - data[jistart + 5671] = 0.0 - k[120]*y_cur[IDX_C9M] + - k[3380]*y_cur[IDX_C10M] - k[3442]*y_cur[IDX_C9M] - - k[3443]*y_cur[IDX_C9M] - k[3444]*y_cur[IDX_C9M] - - k[3445]*y_cur[IDX_C9M]; - data[jistart + 5672] = 0.0 - k[4573]*y_cur[IDX_C9M]; - data[jistart + 5673] = 0.0 - k[4574]*y_cur[IDX_C9M]; - data[jistart + 5674] = 0.0 - k[4575]*y_cur[IDX_C9M]; - data[jistart + 5675] = 0.0 - k[4576]*y_cur[IDX_C9M]; - data[jistart + 5676] = 0.0 - k[4577]*y_cur[IDX_C9M]; - data[jistart + 5677] = 0.0 - k[4578]*y_cur[IDX_C9M]; - data[jistart + 5678] = 0.0 + k[3678]*y_cur[IDX_C10M] - - k[3721]*y_cur[IDX_C9M]; - data[jistart + 5679] = 0.0 - k[4579]*y_cur[IDX_C9M]; - data[jistart + 5680] = 0.0 - k[4580]*y_cur[IDX_C9M]; - data[jistart + 5681] = 0.0 - k[4581]*y_cur[IDX_C9M]; - data[jistart + 5682] = 0.0 - k[4582]*y_cur[IDX_C9M]; - data[jistart + 5683] = 0.0 - k[4583]*y_cur[IDX_C9M]; - data[jistart + 5684] = 0.0 - k[4584]*y_cur[IDX_C9M]; - data[jistart + 5685] = 0.0 - k[4585]*y_cur[IDX_C9M]; - data[jistart + 5686] = 0.0 + k[5605]*y_cur[IDX_C9I]; - data[jistart + 5687] = 0.0 + k[52]*y_cur[IDX_C8HM] + - k[4939]*y_cur[IDX_C8H2I] - k[4942]*y_cur[IDX_C9HI]; - data[jistart + 5688] = 0.0 - k[1340]*y_cur[IDX_C9HI] + - k[4586]*y_cur[IDX_C9HM]; - data[jistart + 5689] = 0.0 + k[5341]*y_cur[IDX_OI]; - data[jistart + 5690] = 0.0 + k[3382]*y_cur[IDX_NI]; - data[jistart + 5691] = 0.0 + k[3682]*y_cur[IDX_OI]; - data[jistart + 5692] = 0.0 + k[4587]*y_cur[IDX_C9HM]; - data[jistart + 5693] = 0.0 + k[4588]*y_cur[IDX_C9HM]; - data[jistart + 5694] = 0.0 + k[4589]*y_cur[IDX_C9HM]; - data[jistart + 5695] = 0.0 + k[4590]*y_cur[IDX_C9HM]; - data[jistart + 5696] = 0.0 + k[4591]*y_cur[IDX_C9HM]; - data[jistart + 5697] = 0.0 + k[52]*y_cur[IDX_CI]; - data[jistart + 5698] = 0.0 + k[4939]*y_cur[IDX_CI]; - data[jistart + 5699] = 0.0 + k[103]*y_cur[IDX_HI]; - data[jistart + 5700] = 0.0 - k[357]*y_cur[IDX_HII] - - k[1340]*y_cur[IDX_CII] - k[2313]*y_cur[IDX_HII] - - k[2630]*y_cur[IDX_H3II] - k[2935]*y_cur[IDX_HCOII] - - k[3154]*y_cur[IDX_HeII] - k[3155]*y_cur[IDX_HeII] - - k[4942]*y_cur[IDX_CI] - k[5251]*y_cur[IDX_NI] - - k[5376]*y_cur[IDX_OI] - k[5606]*y_cur[IDX_eM] - k[5770] - k[6065] - - k[6066] - k[7061]; - data[jistart + 5701] = 0.0 + k[4586]*y_cur[IDX_CII] + - k[4587]*y_cur[IDX_C2H2II] + k[4588]*y_cur[IDX_C2H3II] + - k[4589]*y_cur[IDX_C4H2II] + k[4590]*y_cur[IDX_C4H3II] + - k[4591]*y_cur[IDX_C4SII] + k[4592]*y_cur[IDX_CH2CCHII] + - k[4593]*y_cur[IDX_CH3II] + k[4594]*y_cur[IDX_CNCII] + - k[4595]*y_cur[IDX_FeII] + k[4596]*y_cur[IDX_HII] + - k[4597]*y_cur[IDX_H2COII] + k[4598]*y_cur[IDX_H2SII] + - k[4599]*y_cur[IDX_H3II] + k[4600]*y_cur[IDX_H3OII] + - k[4601]*y_cur[IDX_HC2SII] + k[4602]*y_cur[IDX_HCNHII] + - k[4603]*y_cur[IDX_HCNHII] + k[4604]*y_cur[IDX_HCOII] + - k[4605]*y_cur[IDX_HCOII] + k[4606]*y_cur[IDX_HeII] + - k[4607]*y_cur[IDX_MgII] + k[4608]*y_cur[IDX_NII] + - k[4609]*y_cur[IDX_N2HII] + k[4610]*y_cur[IDX_NH3II] + - k[4611]*y_cur[IDX_NH4II] + k[4612]*y_cur[IDX_NOII] + - k[4613]*y_cur[IDX_NaII] + k[4614]*y_cur[IDX_OII] + - k[4615]*y_cur[IDX_SII] + k[4616]*y_cur[IDX_SOII] + - k[4617]*y_cur[IDX_SiII] + k[4618]*y_cur[IDX_SiOII] + - k[4619]*y_cur[IDX_SiOHII] + k[4620]*y_cur[IDX_SiSII] + k[5768] + + data[jistart + 8035] = 0.0 + k[3723]*y_cur[IDX_OI]; + data[jistart + 8036] = 0.0 - k[4548]*y_cur[IDX_C8HM]; + data[jistart + 8037] = 0.0 - k[4549]*y_cur[IDX_C8HM]; + data[jistart + 8038] = 0.0 - k[4525]*y_cur[IDX_C8HM]; + data[jistart + 8039] = 0.0 - k[4537]*y_cur[IDX_C8HM]; + data[jistart + 8040] = 0.0 - k[4543]*y_cur[IDX_C8HM]; + data[jistart + 8041] = 0.0 + k[5604]*y_cur[IDX_eM]; + data[jistart + 8042] = 0.0 - k[4520]*y_cur[IDX_C8HM]; + data[jistart + 8043] = 0.0 - k[4539]*y_cur[IDX_C8HM]; + data[jistart + 8044] = 0.0 - k[4546]*y_cur[IDX_C8HM]; + data[jistart + 8045] = 0.0 - k[4522]*y_cur[IDX_C8HM]; + data[jistart + 8046] = 0.0 - k[4528]*y_cur[IDX_C8HM]; + data[jistart + 8047] = 0.0 - k[4538]*y_cur[IDX_C8HM]; + data[jistart + 8048] = 0.0 - k[4527]*y_cur[IDX_C8HM]; + data[jistart + 8049] = 0.0 - k[4542]*y_cur[IDX_C8HM]; + data[jistart + 8050] = 0.0 - k[4544]*y_cur[IDX_C8HM]; + data[jistart + 8051] = 0.0 - k[4519]*y_cur[IDX_C8HM]; + data[jistart + 8052] = 0.0 - k[4532]*y_cur[IDX_C8HM] - k[4533]*y_cur[IDX_C8HM]; + data[jistart + 8053] = 0.0 - k[4540]*y_cur[IDX_C8HM]; + data[jistart + 8054] = 0.0 - k[4541]*y_cur[IDX_C8HM]; + data[jistart + 8055] = 0.0 - k[4547]*y_cur[IDX_C8HM]; + data[jistart + 8056] = 0.0 - k[4545]*y_cur[IDX_C8HM]; + data[jistart + 8057] = 0.0 - k[4518]*y_cur[IDX_C8HM]; + data[jistart + 8058] = 0.0 - k[4517]*y_cur[IDX_C8HM]; + data[jistart + 8059] = 0.0 - k[4523]*y_cur[IDX_C8HM]; + data[jistart + 8060] = 0.0 - k[3440]*y_cur[IDX_C8HM] - k[3441]*y_cur[IDX_C8HM]; + data[jistart + 8061] = 0.0 - k[4530]*y_cur[IDX_C8HM]; + data[jistart + 8062] = 0.0 - k[3718]*y_cur[IDX_C8HM] + k[3723]*y_cur[IDX_C9HM]; + data[jistart + 8063] = 0.0 - k[4536]*y_cur[IDX_C8HM]; + data[jistart + 8064] = 0.0 - k[4516]*y_cur[IDX_C8HM]; + data[jistart + 8065] = 0.0 - k[4526]*y_cur[IDX_C8HM]; + data[jistart + 8066] = 0.0 - k[52]*y_cur[IDX_C8HM]; + data[jistart + 8067] = 0.0 - k[4534]*y_cur[IDX_C8HM] - k[4535]*y_cur[IDX_C8HM]; + data[jistart + 8068] = 0.0 - k[4529]*y_cur[IDX_C8HM]; + data[jistart + 8069] = 0.0 + k[5604]*y_cur[IDX_C8HI]; + data[jistart + 8070] = 0.0 - k[102]*y_cur[IDX_C8HM]; + data[jistart + 8071] = 0.0 - k[4451]*y_cur[IDX_C7HM]; + data[jistart + 8072] = 0.0 - k[4454]*y_cur[IDX_C7HM]; + data[jistart + 8073] = 0.0 - k[4480]*y_cur[IDX_C7HM]; + data[jistart + 8074] = 0.0 - k[4461]*y_cur[IDX_C7HM]; + data[jistart + 8075] = 0.0 + k[3718]*y_cur[IDX_OI]; + data[jistart + 8076] = 0.0 - k[50]*y_cur[IDX_CI] - k[100]*y_cur[IDX_HI] - + k[119]*y_cur[IDX_NI] - k[3430]*y_cur[IDX_NI] - k[3431]*y_cur[IDX_NI] + - k[3714]*y_cur[IDX_OI] - k[4446]*y_cur[IDX_CII] - + k[4447]*y_cur[IDX_C2H2II] - k[4448]*y_cur[IDX_C2H3II] - + k[4449]*y_cur[IDX_C4H2II] - k[4450]*y_cur[IDX_C4H3II] - + k[4451]*y_cur[IDX_C4SII] - k[4452]*y_cur[IDX_CH2CCHII] - + k[4453]*y_cur[IDX_CH3II] - k[4454]*y_cur[IDX_CNCII] - + k[4455]*y_cur[IDX_FeII] - k[4456]*y_cur[IDX_HII] - + k[4457]*y_cur[IDX_H2COII] - k[4458]*y_cur[IDX_H2SII] - + k[4459]*y_cur[IDX_H3II] - k[4460]*y_cur[IDX_H3OII] - + k[4461]*y_cur[IDX_HC2SII] - k[4462]*y_cur[IDX_HCNHII] - + k[4463]*y_cur[IDX_HCNHII] - k[4464]*y_cur[IDX_HCOII] - + k[4465]*y_cur[IDX_HCOII] - k[4466]*y_cur[IDX_HeII] - + k[4467]*y_cur[IDX_MgII] - k[4468]*y_cur[IDX_NII] - + k[4469]*y_cur[IDX_N2HII] - k[4470]*y_cur[IDX_NH3II] - + k[4471]*y_cur[IDX_NH4II] - k[4472]*y_cur[IDX_NOII] - + k[4473]*y_cur[IDX_NaII] - k[4474]*y_cur[IDX_OII] - + k[4475]*y_cur[IDX_SII] - k[4476]*y_cur[IDX_SOII] - + k[4477]*y_cur[IDX_SiII] - k[4478]*y_cur[IDX_SiOII] - + k[4479]*y_cur[IDX_SiOHII] - k[4480]*y_cur[IDX_SiSII] - k[5757] - + k[6044]; + data[jistart + 8077] = 0.0 - k[4478]*y_cur[IDX_C7HM]; + data[jistart + 8078] = 0.0 - k[4479]*y_cur[IDX_C7HM]; + data[jistart + 8079] = 0.0 - k[4455]*y_cur[IDX_C7HM]; + data[jistart + 8080] = 0.0 - k[4467]*y_cur[IDX_C7HM]; + data[jistart + 8081] = 0.0 - k[4473]*y_cur[IDX_C7HM]; + data[jistart + 8082] = 0.0 + k[5602]*y_cur[IDX_eM]; + data[jistart + 8083] = 0.0 - k[4450]*y_cur[IDX_C7HM]; + data[jistart + 8084] = 0.0 - k[4469]*y_cur[IDX_C7HM]; + data[jistart + 8085] = 0.0 - k[4476]*y_cur[IDX_C7HM]; + data[jistart + 8086] = 0.0 - k[4452]*y_cur[IDX_C7HM]; + data[jistart + 8087] = 0.0 - k[4458]*y_cur[IDX_C7HM]; + data[jistart + 8088] = 0.0 - k[4468]*y_cur[IDX_C7HM]; + data[jistart + 8089] = 0.0 - k[4457]*y_cur[IDX_C7HM]; + data[jistart + 8090] = 0.0 - k[4472]*y_cur[IDX_C7HM]; + data[jistart + 8091] = 0.0 - k[4474]*y_cur[IDX_C7HM]; + data[jistart + 8092] = 0.0 - k[4449]*y_cur[IDX_C7HM]; + data[jistart + 8093] = 0.0 - k[4462]*y_cur[IDX_C7HM] - k[4463]*y_cur[IDX_C7HM]; + data[jistart + 8094] = 0.0 - k[4470]*y_cur[IDX_C7HM]; + data[jistart + 8095] = 0.0 - k[4471]*y_cur[IDX_C7HM]; + data[jistart + 8096] = 0.0 - k[4477]*y_cur[IDX_C7HM]; + data[jistart + 8097] = 0.0 - k[4475]*y_cur[IDX_C7HM]; + data[jistart + 8098] = 0.0 - k[4448]*y_cur[IDX_C7HM]; + data[jistart + 8099] = 0.0 - k[4447]*y_cur[IDX_C7HM]; + data[jistart + 8100] = 0.0 - k[4453]*y_cur[IDX_C7HM]; + data[jistart + 8101] = 0.0 - k[119]*y_cur[IDX_C7HM] - k[3430]*y_cur[IDX_C7HM] - + k[3431]*y_cur[IDX_C7HM]; + data[jistart + 8102] = 0.0 - k[4460]*y_cur[IDX_C7HM]; + data[jistart + 8103] = 0.0 - k[3714]*y_cur[IDX_C7HM] + k[3718]*y_cur[IDX_C8HM]; + data[jistart + 8104] = 0.0 - k[4466]*y_cur[IDX_C7HM]; + data[jistart + 8105] = 0.0 - k[4446]*y_cur[IDX_C7HM]; + data[jistart + 8106] = 0.0 - k[4456]*y_cur[IDX_C7HM]; + data[jistart + 8107] = 0.0 - k[50]*y_cur[IDX_C7HM]; + data[jistart + 8108] = 0.0 - k[4464]*y_cur[IDX_C7HM] - k[4465]*y_cur[IDX_C7HM]; + data[jistart + 8109] = 0.0 - k[4459]*y_cur[IDX_C7HM]; + data[jistart + 8110] = 0.0 + k[5602]*y_cur[IDX_C7HI]; + data[jistart + 8111] = 0.0 - k[100]*y_cur[IDX_C7HM]; + data[jistart + 8112] = 0.0 - k[4591]*y_cur[IDX_C9HM]; + data[jistart + 8113] = 0.0 - k[4594]*y_cur[IDX_C9HM]; + data[jistart + 8114] = 0.0 - k[4620]*y_cur[IDX_C9HM]; + data[jistart + 8115] = 0.0 - k[4601]*y_cur[IDX_C9HM]; + data[jistart + 8116] = 0.0 + k[3681]*y_cur[IDX_OI]; + data[jistart + 8117] = 0.0 - k[54]*y_cur[IDX_CI] - k[104]*y_cur[IDX_HI] - + k[121]*y_cur[IDX_NI] - k[3447]*y_cur[IDX_NI] - k[3448]*y_cur[IDX_NI] + - k[3723]*y_cur[IDX_OI] - k[4586]*y_cur[IDX_CII] - + k[4587]*y_cur[IDX_C2H2II] - k[4588]*y_cur[IDX_C2H3II] - + k[4589]*y_cur[IDX_C4H2II] - k[4590]*y_cur[IDX_C4H3II] - + k[4591]*y_cur[IDX_C4SII] - k[4592]*y_cur[IDX_CH2CCHII] - + k[4593]*y_cur[IDX_CH3II] - k[4594]*y_cur[IDX_CNCII] - + k[4595]*y_cur[IDX_FeII] - k[4596]*y_cur[IDX_HII] - + k[4597]*y_cur[IDX_H2COII] - k[4598]*y_cur[IDX_H2SII] - + k[4599]*y_cur[IDX_H3II] - k[4600]*y_cur[IDX_H3OII] - + k[4601]*y_cur[IDX_HC2SII] - k[4602]*y_cur[IDX_HCNHII] - + k[4603]*y_cur[IDX_HCNHII] - k[4604]*y_cur[IDX_HCOII] - + k[4605]*y_cur[IDX_HCOII] - k[4606]*y_cur[IDX_HeII] - + k[4607]*y_cur[IDX_MgII] - k[4608]*y_cur[IDX_NII] - + k[4609]*y_cur[IDX_N2HII] - k[4610]*y_cur[IDX_NH3II] - + k[4611]*y_cur[IDX_NH4II] - k[4612]*y_cur[IDX_NOII] - + k[4613]*y_cur[IDX_NaII] - k[4614]*y_cur[IDX_OII] - + k[4615]*y_cur[IDX_SII] - k[4616]*y_cur[IDX_SOII] - + k[4617]*y_cur[IDX_SiII] - k[4618]*y_cur[IDX_SiOII] - + k[4619]*y_cur[IDX_SiOHII] - k[4620]*y_cur[IDX_SiSII] - k[5768] - k[6062]; - data[jistart + 5702] = 0.0 + k[5769] + k[6064]; - data[jistart + 5703] = 0.0 + k[894]*y_cur[IDX_eM] + - k[6860]*y_cur[IDX_GRAINM]; - data[jistart + 5704] = 0.0 + k[896]*y_cur[IDX_eM] + - k[6862]*y_cur[IDX_GRAINM]; - data[jistart + 5705] = 0.0 + k[898]*y_cur[IDX_eM] + - k[6864]*y_cur[IDX_GRAINM]; - data[jistart + 5706] = 0.0 + k[900]*y_cur[IDX_eM] + - k[6866]*y_cur[IDX_GRAINM]; - data[jistart + 5707] = 0.0 + k[4592]*y_cur[IDX_C9HM]; - data[jistart + 5708] = 0.0 + k[4593]*y_cur[IDX_C9HM]; - data[jistart + 5709] = 0.0 + k[4594]*y_cur[IDX_C9HM]; - data[jistart + 5710] = 0.0 + k[4595]*y_cur[IDX_C9HM]; - data[jistart + 5711] = 0.0 + k[8681]*y_cur[IDX_GC8HI]; - data[jistart + 5712] = 0.0 + k[8734]*y_cur[IDX_GCHI]; - data[jistart + 5713] = 0.0 + k[8681]*y_cur[IDX_GCI]; - data[jistart + 5714] = 0.0 + k[8646]*y_cur[IDX_GHI]; - data[jistart + 5715] = 0.0 + k[7243] + k[7425] + k[7607]; - data[jistart + 5716] = 0.0 + k[8734]*y_cur[IDX_GC8I]; - data[jistart + 5717] = 0.0 + k[8646]*y_cur[IDX_GC9I]; - data[jistart + 5718] = 0.0 + k[6860]*y_cur[IDX_C9H2II] + - k[6862]*y_cur[IDX_C9H3II] + k[6864]*y_cur[IDX_C9H4II] + - k[6866]*y_cur[IDX_C9H5II]; - data[jistart + 5719] = 0.0 + k[103]*y_cur[IDX_C9M]; - data[jistart + 5720] = 0.0 - k[357]*y_cur[IDX_C9HI] - - k[2313]*y_cur[IDX_C9HI] + k[4596]*y_cur[IDX_C9HM]; - data[jistart + 5721] = 0.0 + k[4597]*y_cur[IDX_C9HM]; - data[jistart + 5722] = 0.0 + k[4598]*y_cur[IDX_C9HM]; - data[jistart + 5723] = 0.0 - k[2630]*y_cur[IDX_C9HI] + - k[4599]*y_cur[IDX_C9HM]; - data[jistart + 5724] = 0.0 + k[4600]*y_cur[IDX_C9HM]; - data[jistart + 5725] = 0.0 + k[4601]*y_cur[IDX_C9HM]; - data[jistart + 5726] = 0.0 + k[4602]*y_cur[IDX_C9HM] + - k[4603]*y_cur[IDX_C9HM]; - data[jistart + 5727] = 0.0 - k[2935]*y_cur[IDX_C9HI] + - k[4604]*y_cur[IDX_C9HM] + k[4605]*y_cur[IDX_C9HM]; - data[jistart + 5728] = 0.0 - k[3154]*y_cur[IDX_C9HI] - - k[3155]*y_cur[IDX_C9HI] + k[4606]*y_cur[IDX_C9HM]; - data[jistart + 5729] = 0.0 + k[4607]*y_cur[IDX_C9HM]; - data[jistart + 5730] = 0.0 + k[3382]*y_cur[IDX_C10HM] - - k[5251]*y_cur[IDX_C9HI]; - data[jistart + 5731] = 0.0 + k[4608]*y_cur[IDX_C9HM]; - data[jistart + 5732] = 0.0 + k[4609]*y_cur[IDX_C9HM]; - data[jistart + 5733] = 0.0 + k[4610]*y_cur[IDX_C9HM]; - data[jistart + 5734] = 0.0 + k[4611]*y_cur[IDX_C9HM]; - data[jistart + 5735] = 0.0 + k[4612]*y_cur[IDX_C9HM]; - data[jistart + 5736] = 0.0 + k[4613]*y_cur[IDX_C9HM]; - data[jistart + 5737] = 0.0 + k[3682]*y_cur[IDX_C10H2II] + - k[5341]*y_cur[IDX_C10HI] - k[5376]*y_cur[IDX_C9HI]; - data[jistart + 5738] = 0.0 + k[4614]*y_cur[IDX_C9HM]; - data[jistart + 5739] = 0.0 + k[4615]*y_cur[IDX_C9HM]; - data[jistart + 5740] = 0.0 + k[4616]*y_cur[IDX_C9HM]; - data[jistart + 5741] = 0.0 + k[4617]*y_cur[IDX_C9HM]; - data[jistart + 5742] = 0.0 + k[4618]*y_cur[IDX_C9HM]; - data[jistart + 5743] = 0.0 + k[4619]*y_cur[IDX_C9HM]; - data[jistart + 5744] = 0.0 + k[4620]*y_cur[IDX_C9HM]; - data[jistart + 5745] = 0.0 + k[894]*y_cur[IDX_C9H2II] + - k[896]*y_cur[IDX_C9H3II] + k[898]*y_cur[IDX_C9H4II] + - k[900]*y_cur[IDX_C9H5II] - k[5606]*y_cur[IDX_C9HI]; - data[jistart + 5746] = 0.0 + k[1882]*y_cur[IDX_C8H2II] + - k[1883]*y_cur[IDX_C8H3II] - k[1885]*y_cur[IDX_C9HII]; - data[jistart + 5747] = 0.0 + k[1299]*y_cur[IDX_C10HI] + - k[1336]*y_cur[IDX_C8H2I] + k[1406]*y_cur[IDX_HC9NI]; - data[jistart + 5748] = 0.0 + k[2293]*y_cur[IDX_HII]; - data[jistart + 5749] = 0.0 + k[1299]*y_cur[IDX_CII]; - data[jistart + 5750] = 0.0 + k[3680]*y_cur[IDX_OI]; - data[jistart + 5751] = 0.0 + k[3066]*y_cur[IDX_HeII]; - data[jistart + 5752] = 0.0 + k[1501]*y_cur[IDX_C7HI]; - data[jistart + 5753] = 0.0 + k[1769]*y_cur[IDX_C6HI]; - data[jistart + 5754] = 0.0 + k[1833]*y_cur[IDX_C5HI]; - data[jistart + 5755] = 0.0 + k[1833]*y_cur[IDX_C4HII]; - data[jistart + 5756] = 0.0 + k[1769]*y_cur[IDX_C3H2II]; - data[jistart + 5757] = 0.0 + k[1501]*y_cur[IDX_C2H2II]; - data[jistart + 5758] = 0.0 + k[1336]*y_cur[IDX_CII]; - data[jistart + 5759] = 0.0 + k[1882]*y_cur[IDX_CI]; - data[jistart + 5760] = 0.0 + k[1883]*y_cur[IDX_CI]; - data[jistart + 5761] = 0.0 + k[2628]*y_cur[IDX_H3II] + - k[2933]*y_cur[IDX_HCOII]; - data[jistart + 5762] = 0.0 + k[2424]*y_cur[IDX_H2I]; - data[jistart + 5763] = 0.0 + k[357]*y_cur[IDX_HII] + k[6066]; - data[jistart + 5764] = 0.0 - k[891]*y_cur[IDX_eM] - - k[892]*y_cur[IDX_eM] - k[1885]*y_cur[IDX_CI] - - k[2425]*y_cur[IDX_H2I] - k[3446]*y_cur[IDX_NI] - - k[3722]*y_cur[IDX_OI] - k[6857]*y_cur[IDX_GRAINM] - - k[6858]*y_cur[IDX_GRAINM]; - data[jistart + 5765] = 0.0 + k[2312]*y_cur[IDX_HII] + - k[3153]*y_cur[IDX_HeII]; - data[jistart + 5766] = 0.0 - k[6857]*y_cur[IDX_C9HII] - - k[6858]*y_cur[IDX_C9HII]; - data[jistart + 5767] = 0.0 + k[357]*y_cur[IDX_C9HI] + - k[2293]*y_cur[IDX_C10I] + k[2312]*y_cur[IDX_C9H2I]; - data[jistart + 5768] = 0.0 + k[2424]*y_cur[IDX_C9II] - - k[2425]*y_cur[IDX_C9HII]; - data[jistart + 5769] = 0.0 + k[2628]*y_cur[IDX_C9I]; - data[jistart + 5770] = 0.0 + k[1406]*y_cur[IDX_CII]; - data[jistart + 5771] = 0.0 + k[2933]*y_cur[IDX_C9I]; - data[jistart + 5772] = 0.0 + k[3066]*y_cur[IDX_C10H2I] + - k[3153]*y_cur[IDX_C9H2I]; - data[jistart + 5773] = 0.0 - k[3446]*y_cur[IDX_C9HII]; - data[jistart + 5774] = 0.0 + k[3680]*y_cur[IDX_C10HII] - - k[3722]*y_cur[IDX_C9HII]; - data[jistart + 5775] = 0.0 - k[891]*y_cur[IDX_C9HII] - - k[892]*y_cur[IDX_C9HII]; - data[jistart + 5776] = 0.0 - k[54]*y_cur[IDX_C9HM]; - data[jistart + 5777] = 0.0 - k[4586]*y_cur[IDX_C9HM]; - data[jistart + 5778] = 0.0 + k[3681]*y_cur[IDX_OI]; - data[jistart + 5779] = 0.0 - k[4587]*y_cur[IDX_C9HM]; - data[jistart + 5780] = 0.0 - k[4588]*y_cur[IDX_C9HM]; - data[jistart + 5781] = 0.0 - k[4589]*y_cur[IDX_C9HM]; - data[jistart + 5782] = 0.0 - k[4590]*y_cur[IDX_C9HM]; - data[jistart + 5783] = 0.0 - k[4591]*y_cur[IDX_C9HM]; - data[jistart + 5784] = 0.0 + k[5606]*y_cur[IDX_eM]; - data[jistart + 5785] = 0.0 - k[54]*y_cur[IDX_CI] - - k[104]*y_cur[IDX_HI] - k[121]*y_cur[IDX_NI] - k[3447]*y_cur[IDX_NI] - - k[3448]*y_cur[IDX_NI] - k[3723]*y_cur[IDX_OI] - - k[4586]*y_cur[IDX_CII] - k[4587]*y_cur[IDX_C2H2II] - - k[4588]*y_cur[IDX_C2H3II] - k[4589]*y_cur[IDX_C4H2II] - - k[4590]*y_cur[IDX_C4H3II] - k[4591]*y_cur[IDX_C4SII] - - k[4592]*y_cur[IDX_CH2CCHII] - k[4593]*y_cur[IDX_CH3II] - - k[4594]*y_cur[IDX_CNCII] - k[4595]*y_cur[IDX_FeII] - - k[4596]*y_cur[IDX_HII] - k[4597]*y_cur[IDX_H2COII] - - k[4598]*y_cur[IDX_H2SII] - k[4599]*y_cur[IDX_H3II] - - k[4600]*y_cur[IDX_H3OII] - k[4601]*y_cur[IDX_HC2SII] - - k[4602]*y_cur[IDX_HCNHII] - k[4603]*y_cur[IDX_HCNHII] - - k[4604]*y_cur[IDX_HCOII] - k[4605]*y_cur[IDX_HCOII] - - k[4606]*y_cur[IDX_HeII] - k[4607]*y_cur[IDX_MgII] - - k[4608]*y_cur[IDX_NII] - k[4609]*y_cur[IDX_N2HII] - - k[4610]*y_cur[IDX_NH3II] - k[4611]*y_cur[IDX_NH4II] - - k[4612]*y_cur[IDX_NOII] - k[4613]*y_cur[IDX_NaII] - - k[4614]*y_cur[IDX_OII] - k[4615]*y_cur[IDX_SII] - - k[4616]*y_cur[IDX_SOII] - k[4617]*y_cur[IDX_SiII] - - k[4618]*y_cur[IDX_SiOII] - k[4619]*y_cur[IDX_SiOHII] - - k[4620]*y_cur[IDX_SiSII] - k[5768] - k[6062]; - data[jistart + 5786] = 0.0 - k[4592]*y_cur[IDX_C9HM]; - data[jistart + 5787] = 0.0 - k[4593]*y_cur[IDX_C9HM]; - data[jistart + 5788] = 0.0 - k[4594]*y_cur[IDX_C9HM]; - data[jistart + 5789] = 0.0 - k[4595]*y_cur[IDX_C9HM]; - data[jistart + 5790] = 0.0 - k[104]*y_cur[IDX_C9HM]; - data[jistart + 5791] = 0.0 - k[4596]*y_cur[IDX_C9HM]; - data[jistart + 5792] = 0.0 - k[4597]*y_cur[IDX_C9HM]; - data[jistart + 5793] = 0.0 - k[4598]*y_cur[IDX_C9HM]; - data[jistart + 5794] = 0.0 - k[4599]*y_cur[IDX_C9HM]; - data[jistart + 5795] = 0.0 - k[4600]*y_cur[IDX_C9HM]; - data[jistart + 5796] = 0.0 - k[4601]*y_cur[IDX_C9HM]; - data[jistart + 5797] = 0.0 - k[4602]*y_cur[IDX_C9HM] - - k[4603]*y_cur[IDX_C9HM]; - data[jistart + 5798] = 0.0 - k[4604]*y_cur[IDX_C9HM] - - k[4605]*y_cur[IDX_C9HM]; - data[jistart + 5799] = 0.0 - k[4606]*y_cur[IDX_C9HM]; - data[jistart + 5800] = 0.0 - k[4607]*y_cur[IDX_C9HM]; - data[jistart + 5801] = 0.0 - k[121]*y_cur[IDX_C9HM] - - k[3447]*y_cur[IDX_C9HM] - k[3448]*y_cur[IDX_C9HM]; - data[jistart + 5802] = 0.0 - k[4608]*y_cur[IDX_C9HM]; - data[jistart + 5803] = 0.0 - k[4609]*y_cur[IDX_C9HM]; - data[jistart + 5804] = 0.0 - k[4610]*y_cur[IDX_C9HM]; - data[jistart + 5805] = 0.0 - k[4611]*y_cur[IDX_C9HM]; - data[jistart + 5806] = 0.0 - k[4612]*y_cur[IDX_C9HM]; - data[jistart + 5807] = 0.0 - k[4613]*y_cur[IDX_C9HM]; - data[jistart + 5808] = 0.0 + k[3681]*y_cur[IDX_C10HM] - - k[3723]*y_cur[IDX_C9HM]; - data[jistart + 5809] = 0.0 - k[4614]*y_cur[IDX_C9HM]; - data[jistart + 5810] = 0.0 - k[4615]*y_cur[IDX_C9HM]; - data[jistart + 5811] = 0.0 - k[4616]*y_cur[IDX_C9HM]; - data[jistart + 5812] = 0.0 - k[4617]*y_cur[IDX_C9HM]; - data[jistart + 5813] = 0.0 - k[4618]*y_cur[IDX_C9HM]; - data[jistart + 5814] = 0.0 - k[4619]*y_cur[IDX_C9HM]; - data[jistart + 5815] = 0.0 - k[4620]*y_cur[IDX_C9HM]; - data[jistart + 5816] = 0.0 + k[5606]*y_cur[IDX_C9HI]; - data[jistart + 5817] = 0.0 - k[4941]*y_cur[IDX_C9H2I]; - data[jistart + 5818] = 0.0 - k[1338]*y_cur[IDX_C9H2I] - - k[1339]*y_cur[IDX_C9H2I]; - data[jistart + 5819] = 0.0 + k[734]*y_cur[IDX_eM] + - k[3683]*y_cur[IDX_OI] + k[6879]*y_cur[IDX_GRAINM]; - data[jistart + 5820] = 0.0 + k[4892]*y_cur[IDX_C7H2I]; - data[jistart + 5821] = 0.0 + k[4892]*y_cur[IDX_C2HI]; - data[jistart + 5822] = 0.0 + k[104]*y_cur[IDX_HI]; - data[jistart + 5823] = 0.0 - k[356]*y_cur[IDX_HII] - - k[1338]*y_cur[IDX_CII] - k[1339]*y_cur[IDX_CII] - - k[2312]*y_cur[IDX_HII] - k[2629]*y_cur[IDX_H3II] - - k[2934]*y_cur[IDX_HCOII] - k[3151]*y_cur[IDX_HeII] - - k[3152]*y_cur[IDX_HeII] - k[3153]*y_cur[IDX_HeII] - - k[4941]*y_cur[IDX_CI] - k[5769] - k[6063] - k[6064] - k[7062]; - data[jistart + 5824] = 0.0 + k[895]*y_cur[IDX_eM] + - k[6861]*y_cur[IDX_GRAINM]; - data[jistart + 5825] = 0.0 + k[897]*y_cur[IDX_eM] + - k[6863]*y_cur[IDX_GRAINM]; - data[jistart + 5826] = 0.0 + k[899]*y_cur[IDX_eM] + - k[6865]*y_cur[IDX_GRAINM]; - data[jistart + 5827] = 0.0 + k[8735]*y_cur[IDX_GCHI]; - data[jistart + 5828] = 0.0 + k[8647]*y_cur[IDX_GHI]; - data[jistart + 5829] = 0.0 + k[7244] + k[7426] + k[7608]; - data[jistart + 5830] = 0.0 + k[8735]*y_cur[IDX_GC8HI]; - data[jistart + 5831] = 0.0 + k[8647]*y_cur[IDX_GC9HI]; - data[jistart + 5832] = 0.0 + k[6861]*y_cur[IDX_C9H3II] + - k[6863]*y_cur[IDX_C9H4II] + k[6865]*y_cur[IDX_C9H5II] + - k[6879]*y_cur[IDX_C10H3II]; - data[jistart + 5833] = 0.0 + k[104]*y_cur[IDX_C9HM]; - data[jistart + 5834] = 0.0 - k[356]*y_cur[IDX_C9H2I] - - k[2312]*y_cur[IDX_C9H2I]; - data[jistart + 5835] = 0.0 - k[2629]*y_cur[IDX_C9H2I]; - data[jistart + 5836] = 0.0 - k[2934]*y_cur[IDX_C9H2I]; - data[jistart + 5837] = 0.0 - k[3151]*y_cur[IDX_C9H2I] - - k[3152]*y_cur[IDX_C9H2I] - k[3153]*y_cur[IDX_C9H2I]; - data[jistart + 5838] = 0.0 + k[3683]*y_cur[IDX_C10H3II]; - data[jistart + 5839] = 0.0 + k[734]*y_cur[IDX_C10H3II] + - k[895]*y_cur[IDX_C9H3II] + k[897]*y_cur[IDX_C9H4II] + - k[899]*y_cur[IDX_C9H5II]; - data[jistart + 5840] = 0.0 + k[1884]*y_cur[IDX_C8H3II] - - k[1886]*y_cur[IDX_C9H2II] - k[1887]*y_cur[IDX_C9H2II]; - data[jistart + 5841] = 0.0 + k[1740]*y_cur[IDX_C7H2II]; - data[jistart + 5842] = 0.0 + k[1560]*y_cur[IDX_C7H2II]; - data[jistart + 5843] = 0.0 + k[1499]*y_cur[IDX_C7H2I] + - k[1502]*y_cur[IDX_C7HI]; - data[jistart + 5844] = 0.0 + k[1606]*y_cur[IDX_C7HI]; - data[jistart + 5845] = 0.0 + k[1827]*y_cur[IDX_C6H2II]; - data[jistart + 5846] = 0.0 + k[1792]*y_cur[IDX_C6H2II]; - data[jistart + 5847] = 0.0 + k[1767]*y_cur[IDX_C6H2I] + - k[1770]*y_cur[IDX_C6HI]; - data[jistart + 5848] = 0.0 + k[1803]*y_cur[IDX_C6HI]; - data[jistart + 5849] = 0.0 + k[1845]*y_cur[IDX_C5H2II]; - data[jistart + 5850] = 0.0 + k[1832]*y_cur[IDX_C5H2I]; - data[jistart + 5851] = 0.0 + k[1836]*y_cur[IDX_C5HI]; - data[jistart + 5852] = 0.0 + k[1836]*y_cur[IDX_C4H2II]; - data[jistart + 5853] = 0.0 + k[1832]*y_cur[IDX_C4HII]; - data[jistart + 5854] = 0.0 + k[1845]*y_cur[IDX_C4HI]; - data[jistart + 5855] = 0.0 + k[1770]*y_cur[IDX_C3H2II] + - k[1803]*y_cur[IDX_C3H3II] + k[2027]*y_cur[IDX_CH2CCHII]; - data[jistart + 5856] = 0.0 + k[1767]*y_cur[IDX_C3H2II]; - data[jistart + 5857] = 0.0 + k[1792]*y_cur[IDX_C3H2I] + - k[1827]*y_cur[IDX_C3HI] + k[2483]*y_cur[IDX_H2CCCI]; - data[jistart + 5858] = 0.0 + k[1502]*y_cur[IDX_C2H2II] + - k[1606]*y_cur[IDX_C2H3II]; - data[jistart + 5859] = 0.0 + k[1499]*y_cur[IDX_C2H2II]; - data[jistart + 5860] = 0.0 + k[1560]*y_cur[IDX_C2H2I] + - k[1740]*y_cur[IDX_C2HI]; - data[jistart + 5861] = 0.0 + k[2060]*y_cur[IDX_CH3II]; - data[jistart + 5862] = 0.0 + k[1884]*y_cur[IDX_CI]; - data[jistart + 5863] = 0.0 + k[2630]*y_cur[IDX_H3II] + - k[2935]*y_cur[IDX_HCOII]; - data[jistart + 5864] = 0.0 + k[2425]*y_cur[IDX_H2I]; - data[jistart + 5865] = 0.0 + k[356]*y_cur[IDX_HII] + k[6063]; - data[jistart + 5866] = 0.0 - k[893]*y_cur[IDX_eM] - - k[894]*y_cur[IDX_eM] - k[1886]*y_cur[IDX_CI] - k[1887]*y_cur[IDX_CI] - - k[3449]*y_cur[IDX_NI] - k[3724]*y_cur[IDX_OI] - - k[6859]*y_cur[IDX_GRAINM] - k[6860]*y_cur[IDX_GRAINM]; - data[jistart + 5867] = 0.0 + k[2027]*y_cur[IDX_C6HI]; - data[jistart + 5868] = 0.0 + k[2060]*y_cur[IDX_C8HI]; - data[jistart + 5869] = 0.0 - k[6859]*y_cur[IDX_C9H2II] - - k[6860]*y_cur[IDX_C9H2II]; - data[jistart + 5870] = 0.0 + k[356]*y_cur[IDX_C9H2I]; - data[jistart + 5871] = 0.0 + k[2425]*y_cur[IDX_C9HII]; - data[jistart + 5872] = 0.0 + k[2483]*y_cur[IDX_C6H2II]; - data[jistart + 5873] = 0.0 + k[2630]*y_cur[IDX_C9HI]; - data[jistart + 5874] = 0.0 + k[2935]*y_cur[IDX_C9HI]; - data[jistart + 5875] = 0.0 - k[3449]*y_cur[IDX_C9H2II]; - data[jistart + 5876] = 0.0 - k[3724]*y_cur[IDX_C9H2II]; - data[jistart + 5877] = 0.0 - k[893]*y_cur[IDX_C9H2II] - - k[894]*y_cur[IDX_C9H2II]; - data[jistart + 5878] = 0.0 - k[1888]*y_cur[IDX_C9H3II] - - k[1889]*y_cur[IDX_C9H3II]; - data[jistart + 5879] = 0.0 + k[1561]*y_cur[IDX_C7H2II]; - data[jistart + 5880] = 0.0 + k[1500]*y_cur[IDX_C7H2I]; - data[jistart + 5881] = 0.0 + k[1641]*y_cur[IDX_C7H2II]; - data[jistart + 5882] = 0.0 + k[1603]*y_cur[IDX_C7H2I] + - k[1607]*y_cur[IDX_C7HI]; - data[jistart + 5883] = 0.0 + k[1793]*y_cur[IDX_C6H2II]; - data[jistart + 5884] = 0.0 + k[1768]*y_cur[IDX_C6H2I]; - data[jistart + 5885] = 0.0 + k[1802]*y_cur[IDX_C6H2I] + - k[1804]*y_cur[IDX_C6HI]; - data[jistart + 5886] = 0.0 + k[5577]*y_cur[IDX_C5HII]; - data[jistart + 5887] = 0.0 + k[1835]*y_cur[IDX_C5H2I]; - data[jistart + 5888] = 0.0 + k[1839]*y_cur[IDX_C5H2I] + - k[1841]*y_cur[IDX_C5HI]; - data[jistart + 5889] = 0.0 + k[1841]*y_cur[IDX_C4H3II]; - data[jistart + 5890] = 0.0 + k[5577]*y_cur[IDX_C4H2I]; - data[jistart + 5891] = 0.0 + k[1835]*y_cur[IDX_C4H2II] + - k[1839]*y_cur[IDX_C4H3II]; - data[jistart + 5892] = 0.0 + k[1804]*y_cur[IDX_C3H3II] + - k[2028]*y_cur[IDX_CH2CCHII]; - data[jistart + 5893] = 0.0 + k[1768]*y_cur[IDX_C3H2II] + - k[1802]*y_cur[IDX_C3H3II] + k[2026]*y_cur[IDX_CH2CCHII]; - data[jistart + 5894] = 0.0 + k[1793]*y_cur[IDX_C3H2I] + - k[2039]*y_cur[IDX_CH2CCHI] + k[2484]*y_cur[IDX_H2CCCI]; - data[jistart + 5895] = 0.0 + k[1607]*y_cur[IDX_C2H3II]; - data[jistart + 5896] = 0.0 + k[1500]*y_cur[IDX_C2H2II] + - k[1603]*y_cur[IDX_C2H3II]; - data[jistart + 5897] = 0.0 + k[1561]*y_cur[IDX_C2H2I] + - k[1641]*y_cur[IDX_C2H3I]; - data[jistart + 5898] = 0.0 + k[2059]*y_cur[IDX_CH3II]; - data[jistart + 5899] = 0.0 + k[2629]*y_cur[IDX_H3II] + - k[2934]*y_cur[IDX_HCOII]; - data[jistart + 5900] = 0.0 - k[895]*y_cur[IDX_eM] - - k[896]*y_cur[IDX_eM] - k[1888]*y_cur[IDX_CI] - k[1889]*y_cur[IDX_CI] - - k[3450]*y_cur[IDX_NI] - k[3725]*y_cur[IDX_OI] - - k[6861]*y_cur[IDX_GRAINM] - k[6862]*y_cur[IDX_GRAINM]; - data[jistart + 5901] = 0.0 + k[2039]*y_cur[IDX_C6H2II]; - data[jistart + 5902] = 0.0 + k[2026]*y_cur[IDX_C6H2I] + - k[2028]*y_cur[IDX_C6HI]; - data[jistart + 5903] = 0.0 + k[2059]*y_cur[IDX_C8H2I]; - data[jistart + 5904] = 0.0 - k[6861]*y_cur[IDX_C9H3II] - - k[6862]*y_cur[IDX_C9H3II]; - data[jistart + 5905] = 0.0 + k[2484]*y_cur[IDX_C6H2II]; - data[jistart + 5906] = 0.0 + k[2629]*y_cur[IDX_C9H2I]; - data[jistart + 5907] = 0.0 + k[2934]*y_cur[IDX_C9H2I]; - data[jistart + 5908] = 0.0 - k[3450]*y_cur[IDX_C9H3II]; - data[jistart + 5909] = 0.0 - k[3725]*y_cur[IDX_C9H3II]; - data[jistart + 5910] = 0.0 - k[895]*y_cur[IDX_C9H3II] - - k[896]*y_cur[IDX_C9H3II]; - data[jistart + 5911] = 0.0 + k[1642]*y_cur[IDX_C7H2II]; - data[jistart + 5912] = 0.0 + k[1604]*y_cur[IDX_C7H2I]; - data[jistart + 5913] = 0.0 + k[1705]*y_cur[IDX_C7H2II]; - data[jistart + 5914] = 0.0 + k[1664]*y_cur[IDX_C7H2I] + - k[1666]*y_cur[IDX_C7HI]; - data[jistart + 5915] = 0.0 + k[5578]*y_cur[IDX_C5H2II]; - data[jistart + 5916] = 0.0 + k[1840]*y_cur[IDX_C5H2I]; - data[jistart + 5917] = 0.0 + k[1840]*y_cur[IDX_C4H3II]; - data[jistart + 5918] = 0.0 + k[5578]*y_cur[IDX_C4H2I]; - data[jistart + 5919] = 0.0 + k[2040]*y_cur[IDX_CH2CCHI] + - k[2110]*y_cur[IDX_CH3CCHI]; - data[jistart + 5920] = 0.0 + k[1666]*y_cur[IDX_C2H4II]; - data[jistart + 5921] = 0.0 + k[1604]*y_cur[IDX_C2H3II] + - k[1664]*y_cur[IDX_C2H4II]; - data[jistart + 5922] = 0.0 + k[1642]*y_cur[IDX_C2H3I] + - k[1705]*y_cur[IDX_C2H4I]; - data[jistart + 5923] = 0.0 + k[2188]*y_cur[IDX_CH4I]; - data[jistart + 5924] = 0.0 - k[897]*y_cur[IDX_eM] - - k[898]*y_cur[IDX_eM] - k[3451]*y_cur[IDX_NI] - - k[6863]*y_cur[IDX_GRAINM] - k[6864]*y_cur[IDX_GRAINM]; - data[jistart + 5925] = 0.0 + k[2040]*y_cur[IDX_C6H2II]; - data[jistart + 5926] = 0.0 + k[2110]*y_cur[IDX_C6H2II]; - data[jistart + 5927] = 0.0 + k[2188]*y_cur[IDX_C8H2II]; - data[jistart + 5928] = 0.0 - k[6863]*y_cur[IDX_C9H4II] - - k[6864]*y_cur[IDX_C9H4II]; - data[jistart + 5929] = 0.0 - k[3451]*y_cur[IDX_C9H4II]; - data[jistart + 5930] = 0.0 - k[897]*y_cur[IDX_C9H4II] - - k[898]*y_cur[IDX_C9H4II]; - data[jistart + 5931] = 0.0 + k[5579]*y_cur[IDX_C5H3II]; - data[jistart + 5932] = 0.0 + k[5579]*y_cur[IDX_C4H2I]; - data[jistart + 5933] = 0.0 - k[899]*y_cur[IDX_eM] - - k[900]*y_cur[IDX_eM] - k[6865]*y_cur[IDX_GRAINM] - - k[6866]*y_cur[IDX_GRAINM]; - data[jistart + 5934] = 0.0 - k[6865]*y_cur[IDX_C9H5II] - - k[6866]*y_cur[IDX_C9H5II]; - data[jistart + 5935] = 0.0 - k[899]*y_cur[IDX_C9H5II] - - k[900]*y_cur[IDX_C9H5II]; - data[jistart + 5936] = 0.0 - k[4943]*y_cur[IDX_C9NI]; - data[jistart + 5937] = 0.0 + k[120]*y_cur[IDX_NI]; - data[jistart + 5938] = 0.0 + k[5251]*y_cur[IDX_NI]; - data[jistart + 5939] = 0.0 - k[2631]*y_cur[IDX_H3II] - - k[2936]*y_cur[IDX_HCOII] - k[3156]*y_cur[IDX_HeII] - - k[4943]*y_cur[IDX_CI] - k[5252]*y_cur[IDX_NI] - - k[5377]*y_cur[IDX_OI] - k[5771] - k[6067] - k[6068] - k[7066]; - data[jistart + 5940] = 0.0 + k[8711]*y_cur[IDX_GNI]; - data[jistart + 5941] = 0.0 + k[7248] + k[7430] + k[7612]; - data[jistart + 5942] = 0.0 + k[8711]*y_cur[IDX_GC9I]; - data[jistart + 5943] = 0.0 + k[6877]*y_cur[IDX_HC9NII] + - k[6880]*y_cur[IDX_H2C9NII] + k[6882]*y_cur[IDX_H3C9NII]; - data[jistart + 5944] = 0.0 + k[991]*y_cur[IDX_eM] + - k[6880]*y_cur[IDX_GRAINM]; - data[jistart + 5945] = 0.0 - k[2631]*y_cur[IDX_C9NI]; - data[jistart + 5946] = 0.0 + k[1032]*y_cur[IDX_eM] + - k[6882]*y_cur[IDX_GRAINM]; - data[jistart + 5947] = 0.0 + k[1087]*y_cur[IDX_eM] + - k[6877]*y_cur[IDX_GRAINM]; - data[jistart + 5948] = 0.0 - k[2936]*y_cur[IDX_C9NI]; - data[jistart + 5949] = 0.0 - k[3156]*y_cur[IDX_C9NI]; - data[jistart + 5950] = 0.0 + k[120]*y_cur[IDX_C9M] + - k[5251]*y_cur[IDX_C9HI] - k[5252]*y_cur[IDX_C9NI]; - data[jistart + 5951] = 0.0 - k[5377]*y_cur[IDX_C9NI]; - data[jistart + 5952] = 0.0 + k[991]*y_cur[IDX_H2C9NII] + - k[1032]*y_cur[IDX_H3C9NII] + k[1087]*y_cur[IDX_HC9NII]; - data[jistart + 5953] = 0.0 + k[3446]*y_cur[IDX_NI]; - data[jistart + 5954] = 0.0 + k[6068]; - data[jistart + 5955] = 0.0 - k[901]*y_cur[IDX_eM] - - k[2426]*y_cur[IDX_H2I] - k[6875]*y_cur[IDX_GRAINM]; - data[jistart + 5956] = 0.0 - k[6875]*y_cur[IDX_C9NII]; - data[jistart + 5957] = 0.0 - k[2426]*y_cur[IDX_C9NII]; - data[jistart + 5958] = 0.0 + k[3446]*y_cur[IDX_C9HII]; - data[jistart + 5959] = 0.0 - k[901]*y_cur[IDX_C9NII]; - data[jistart + 5960] = 0.0 - k[158]*y_cur[IDX_CCPI] - - k[1341]*y_cur[IDX_CCPI]; - data[jistart + 5961] = 0.0 + k[5360]*y_cur[IDX_OI] + k[5724]; - data[jistart + 5962] = 0.0 + k[3114]*y_cur[IDX_HeII]; - data[jistart + 5963] = 0.0 + k[834]*y_cur[IDX_eM] + - k[6810]*y_cur[IDX_GRAINM]; - data[jistart + 5964] = 0.0 - k[158]*y_cur[IDX_CII] - - k[358]*y_cur[IDX_HII] - k[1341]*y_cur[IDX_CII] - - k[2633]*y_cur[IDX_H3II] - k[2784]*y_cur[IDX_H3OII] - - k[2937]*y_cur[IDX_HCOII] - k[3157]*y_cur[IDX_HeII] - - k[3158]*y_cur[IDX_HeII] - k[5378]*y_cur[IDX_OI] - k[5773] - k[5774] - - k[6070] - k[6071] - k[7014]; - data[jistart + 5965] = 0.0 + k[7196] + k[7378] + k[7562]; - data[jistart + 5966] = 0.0 + k[6676]*y_cur[IDX_HC2PII] + - k[6680]*y_cur[IDX_PC2H2II] + k[6685]*y_cur[IDX_PC2H3II] + - k[6689]*y_cur[IDX_PC2H4II] + k[6773]*y_cur[IDX_PC3HII] + - k[6810]*y_cur[IDX_C4PII] + k[6813]*y_cur[IDX_PC4HII]; - data[jistart + 5967] = 0.0 - k[358]*y_cur[IDX_CCPI]; - data[jistart + 5968] = 0.0 - k[2633]*y_cur[IDX_CCPI]; - data[jistart + 5969] = 0.0 - k[2784]*y_cur[IDX_CCPI]; - data[jistart + 5970] = 0.0 + k[5845] + k[6170]; - data[jistart + 5971] = 0.0 + k[1059]*y_cur[IDX_eM] + - k[6676]*y_cur[IDX_GRAINM]; - data[jistart + 5972] = 0.0 - k[2937]*y_cur[IDX_CCPI]; - data[jistart + 5973] = 0.0 + k[3114]*y_cur[IDX_C4PI] - - k[3157]*y_cur[IDX_CCPI] - k[3158]*y_cur[IDX_CCPI]; - data[jistart + 5974] = 0.0 + k[5360]*y_cur[IDX_C3PI] - - k[5378]*y_cur[IDX_CCPI]; - data[jistart + 5975] = 0.0 + k[1181]*y_cur[IDX_eM] + - k[6680]*y_cur[IDX_GRAINM]; - data[jistart + 5976] = 0.0 + k[1184]*y_cur[IDX_eM] + - k[6685]*y_cur[IDX_GRAINM]; - data[jistart + 5977] = 0.0 + k[1187]*y_cur[IDX_eM] + - k[6689]*y_cur[IDX_GRAINM]; - data[jistart + 5978] = 0.0 + k[1191]*y_cur[IDX_eM] + - k[6773]*y_cur[IDX_GRAINM]; - data[jistart + 5979] = 0.0 + k[1195]*y_cur[IDX_eM] + - k[6813]*y_cur[IDX_GRAINM]; - data[jistart + 5980] = 0.0 + k[834]*y_cur[IDX_C4PII] + - k[1059]*y_cur[IDX_HC2PII] + k[1181]*y_cur[IDX_PC2H2II] + - k[1184]*y_cur[IDX_PC2H3II] + k[1187]*y_cur[IDX_PC2H4II] + - k[1191]*y_cur[IDX_PC3HII] + k[1195]*y_cur[IDX_PC4HII]; - data[jistart + 5981] = 0.0 + k[1906]*y_cur[IDX_HCPII]; - data[jistart + 5982] = 0.0 + k[158]*y_cur[IDX_CCPI] + - k[1396]*y_cur[IDX_HC2PI] + k[1409]*y_cur[IDX_HCPI]; - data[jistart + 5983] = 0.0 + k[3113]*y_cur[IDX_HeII]; - data[jistart + 5984] = 0.0 + k[158]*y_cur[IDX_CII] + - k[358]*y_cur[IDX_HII]; - data[jistart + 5985] = 0.0 - k[902]*y_cur[IDX_eM] - - k[903]*y_cur[IDX_eM] - k[6662]*y_cur[IDX_GRAINM] - - k[6663]*y_cur[IDX_GRAINM]; - data[jistart + 5986] = 0.0 - k[6662]*y_cur[IDX_CCPII] - - k[6663]*y_cur[IDX_CCPII]; - data[jistart + 5987] = 0.0 + k[358]*y_cur[IDX_CCPI]; - data[jistart + 5988] = 0.0 + k[1396]*y_cur[IDX_CII]; - data[jistart + 5989] = 0.0 + k[1409]*y_cur[IDX_CII]; - data[jistart + 5990] = 0.0 + k[1906]*y_cur[IDX_CI]; - data[jistart + 5991] = 0.0 + k[3113]*y_cur[IDX_C4PI]; - data[jistart + 5992] = 0.0 - k[902]*y_cur[IDX_CCPII] - - k[903]*y_cur[IDX_CCPII]; - data[jistart + 5993] = 0.0 - k[159]*y_cur[IDX_CClI]; - data[jistart + 5994] = 0.0 - k[159]*y_cur[IDX_CII] - - k[3159]*y_cur[IDX_HeII] - k[5379]*y_cur[IDX_OI] - - k[5380]*y_cur[IDX_OI] - k[5775] - k[6072] - k[6991]; - data[jistart + 5995] = 0.0 + k[7173] + k[7355] + k[7537]; - data[jistart + 5996] = 0.0 + k[6624]*y_cur[IDX_H2CClII]; - data[jistart + 5997] = 0.0 + k[993]*y_cur[IDX_eM] + - k[6624]*y_cur[IDX_GRAINM]; - data[jistart + 5998] = 0.0 - k[3159]*y_cur[IDX_CClI]; - data[jistart + 5999] = 0.0 - k[5379]*y_cur[IDX_CClI] - - k[5380]*y_cur[IDX_CClI]; - data[jistart + 6000] = 0.0 + k[993]*y_cur[IDX_H2CClII]; - data[jistart + 6001] = 0.0 + k[159]*y_cur[IDX_CClI] + - k[1411]*y_cur[IDX_HClI]; - data[jistart + 6002] = 0.0 + k[159]*y_cur[IDX_CII]; - data[jistart + 6003] = 0.0 - k[904]*y_cur[IDX_eM] - - k[2492]*y_cur[IDX_H2COI] - k[3566]*y_cur[IDX_NH3I] - - k[6599]*y_cur[IDX_GRAINM]; - data[jistart + 6004] = 0.0 - k[6599]*y_cur[IDX_CClII]; - data[jistart + 6005] = 0.0 - k[2492]*y_cur[IDX_CClII]; - data[jistart + 6006] = 0.0 + k[1411]*y_cur[IDX_CII]; - data[jistart + 6007] = 0.0 - k[3566]*y_cur[IDX_CClII]; - data[jistart + 6008] = 0.0 - k[904]*y_cur[IDX_CClII]; - data[jistart + 6009] = 0.0 + k[1412]*y_cur[IDX_HFI]; - data[jistart + 6010] = 0.0 - k[905]*y_cur[IDX_eM] - - k[6423]*y_cur[IDX_GRAINM]; - data[jistart + 6011] = 0.0 - k[6423]*y_cur[IDX_CFII]; - data[jistart + 6012] = 0.0 + k[1412]*y_cur[IDX_CII]; - data[jistart + 6013] = 0.0 - k[905]*y_cur[IDX_CFII]; - data[jistart + 6014] = 0.0 + k[68]*y_cur[IDX_HM] + - k[4945]*y_cur[IDX_CH2I] + k[4945]*y_cur[IDX_CH2I] - - k[4955]*y_cur[IDX_CHI] + k[4963]*y_cur[IDX_HCOI] + - k[4966]*y_cur[IDX_HSI] + k[4971]*y_cur[IDX_NH2I] + - k[4973]*y_cur[IDX_NHI] + k[4982]*y_cur[IDX_OHI] + - k[5134]*y_cur[IDX_H2I] + k[5572]*y_cur[IDX_HI]; - data[jistart + 6015] = 0.0 - k[170]*y_cur[IDX_CHI] + - k[1302]*y_cur[IDX_C2H4I] + k[1344]*y_cur[IDX_CH2CCH2I] + - k[1356]*y_cur[IDX_CH3C4HI] + k[1360]*y_cur[IDX_CH3C6HI] + - k[1366]*y_cur[IDX_CH3CCHI] + k[1370]*y_cur[IDX_C2H6I] + - k[1376]*y_cur[IDX_CH3CHCH2I] + k[1378]*y_cur[IDX_CH3CHOI] + - k[1381]*y_cur[IDX_CH3OHI] - k[1385]*y_cur[IDX_CHI] + - k[1391]*y_cur[IDX_H2COI] + k[1396]*y_cur[IDX_HC2PI] + - k[3018]*y_cur[IDX_HNC3I] + k[4621]*y_cur[IDX_CHM]; - data[jistart + 6016] = 0.0 - k[2]*y_cur[IDX_CHI] + - k[84]*y_cur[IDX_HI]; - data[jistart + 6017] = 0.0 + k[5153]*y_cur[IDX_HI]; - data[jistart + 6018] = 0.0 - k[287]*y_cur[IDX_CHI] - - k[2239]*y_cur[IDX_CHI]; - data[jistart + 6019] = 0.0 + k[3088]*y_cur[IDX_HeII] + - k[3634]*y_cur[IDX_OII] + k[5352]*y_cur[IDX_OI]; - data[jistart + 6020] = 0.0 + k[741]*y_cur[IDX_eM] - - k[2240]*y_cur[IDX_CHI] - k[2241]*y_cur[IDX_CHI] + - k[6355]*y_cur[IDX_GRAINM]; - data[jistart + 6021] = 0.0 + k[3076]*y_cur[IDX_HeII] - - k[5063]*y_cur[IDX_CHI] - k[5064]*y_cur[IDX_CHI]; - data[jistart + 6022] = 0.0 + k[744]*y_cur[IDX_eM] + - k[744]*y_cur[IDX_eM] - k[2242]*y_cur[IDX_CHI] + - k[3689]*y_cur[IDX_OI] + k[4622]*y_cur[IDX_CHM] + - k[6358]*y_cur[IDX_GRAINM] + k[6358]*y_cur[IDX_GRAINM]; - data[jistart + 6023] = 0.0 + k[753]*y_cur[IDX_eM] + - k[754]*y_cur[IDX_eM] + k[4623]*y_cur[IDX_CHM] + - k[6368]*y_cur[IDX_GRAINM] + k[6369]*y_cur[IDX_GRAINM]; - data[jistart + 6024] = 0.0 + k[1302]*y_cur[IDX_CII] - - k[5065]*y_cur[IDX_CHI] - k[5066]*y_cur[IDX_CHI]; - data[jistart + 6025] = 0.0 + k[762]*y_cur[IDX_eM] + - k[6386]*y_cur[IDX_GRAINM]; - data[jistart + 6026] = 0.0 + k[1370]*y_cur[IDX_CII] - - k[5069]*y_cur[IDX_CHI] - k[5070]*y_cur[IDX_CHI]; - data[jistart + 6027] = 0.0 + k[799]*y_cur[IDX_eM] + - k[6477]*y_cur[IDX_GRAINM]; - data[jistart + 6028] = 0.0 + k[812]*y_cur[IDX_eM] + - k[6509]*y_cur[IDX_GRAINM]; - data[jistart + 6029] = 0.0 + k[3702]*y_cur[IDX_OI] + - k[4624]*y_cur[IDX_CHM]; - data[jistart + 6030] = 0.0 + k[3108]*y_cur[IDX_HeII]; - data[jistart + 6031] = 0.0 + k[4625]*y_cur[IDX_CHM]; - data[jistart + 6032] = 0.0 + k[828]*y_cur[IDX_eM] + - k[6646]*y_cur[IDX_GRAINM]; - data[jistart + 6033] = 0.0 + k[4626]*y_cur[IDX_CHM]; - data[jistart + 6034] = 0.0 + k[3130]*y_cur[IDX_HeII]; - data[jistart + 6035] = 0.0 - k[2]*y_cur[IDX_CM] - - k[62]*y_cur[IDX_OM] - k[63]*y_cur[IDX_OI] - k[64]*y_cur[IDX_OHM] - - k[71]*y_cur[IDX_HM] - k[134]*y_cur[IDX_H2I] - k[141]*y_cur[IDX_HI] - - k[170]*y_cur[IDX_CII] - k[287]*y_cur[IDX_C2II] - - k[288]*y_cur[IDX_CNII] - k[289]*y_cur[IDX_COII] - - k[290]*y_cur[IDX_H2COII] - k[291]*y_cur[IDX_H2OII] - - k[292]*y_cur[IDX_NII] - k[293]*y_cur[IDX_N2II] - - k[294]*y_cur[IDX_NH2II] - k[295]*y_cur[IDX_OII] - - k[296]*y_cur[IDX_O2II] - k[297]*y_cur[IDX_OHII] - - k[372]*y_cur[IDX_HII] - k[443]*y_cur[IDX_H2II] - - k[515]*y_cur[IDX_HeII] - k[1385]*y_cur[IDX_CII] - - k[1943]*y_cur[IDX_CHII] - k[2239]*y_cur[IDX_C2II] - - k[2240]*y_cur[IDX_C2HII] - k[2241]*y_cur[IDX_C2HII] - - k[2242]*y_cur[IDX_C2H2II] - k[2243]*y_cur[IDX_CH3II] - - k[2244]*y_cur[IDX_CH5II] - k[2245]*y_cur[IDX_COII] - - k[2246]*y_cur[IDX_H2COII] - k[2247]*y_cur[IDX_H2OII] - - k[2248]*y_cur[IDX_H3COII] - k[2249]*y_cur[IDX_H3OII] - - k[2250]*y_cur[IDX_HCNII] - k[2251]*y_cur[IDX_HCNHII] - - k[2252]*y_cur[IDX_HCNHII] - k[2253]*y_cur[IDX_HCOII] - - k[2254]*y_cur[IDX_HNOII] - k[2255]*y_cur[IDX_HSII] - - k[2256]*y_cur[IDX_NII] - k[2257]*y_cur[IDX_N2HII] - - k[2258]*y_cur[IDX_NHII] - k[2259]*y_cur[IDX_NH2II] - - k[2260]*y_cur[IDX_NH3II] - k[2261]*y_cur[IDX_OII] - - k[2262]*y_cur[IDX_O2II] - k[2263]*y_cur[IDX_O2HII] - - k[2264]*y_cur[IDX_OHII] - k[2265]*y_cur[IDX_SII] - - k[2266]*y_cur[IDX_SiII] - k[2267]*y_cur[IDX_SiHII] - - k[2268]*y_cur[IDX_SiOII] - k[2380]*y_cur[IDX_H2II] - - k[2670]*y_cur[IDX_H3II] - k[3202]*y_cur[IDX_HeII] - - k[4955]*y_cur[IDX_CI] - k[5063]*y_cur[IDX_C2H2I] - - k[5064]*y_cur[IDX_C2H2I] - k[5065]*y_cur[IDX_C2H4I] - - k[5066]*y_cur[IDX_C2H4I] - k[5067]*y_cur[IDX_CH2CCH2I] - - k[5068]*y_cur[IDX_CH3CCHI] - k[5069]*y_cur[IDX_C2H6I] - - k[5070]*y_cur[IDX_C2H6I] - k[5071]*y_cur[IDX_CH3CHCH2I] - - k[5072]*y_cur[IDX_CH3CHCH2I] - k[5073]*y_cur[IDX_CH3OHI] - - k[5074]*y_cur[IDX_CH4I] - k[5075]*y_cur[IDX_CO2I] - - k[5076]*y_cur[IDX_H2COI] - k[5077]*y_cur[IDX_HCOI] - - k[5078]*y_cur[IDX_HNOI] - k[5079]*y_cur[IDX_N2I] - - k[5080]*y_cur[IDX_NI] - k[5081]*y_cur[IDX_NI] - - k[5082]*y_cur[IDX_NH3I] - k[5083]*y_cur[IDX_NOI] - - k[5084]*y_cur[IDX_NOI] - k[5085]*y_cur[IDX_NOI] - - k[5086]*y_cur[IDX_O2I] - k[5087]*y_cur[IDX_O2I] - - k[5088]*y_cur[IDX_O2I] - k[5089]*y_cur[IDX_O2I] - - k[5090]*y_cur[IDX_O2I] - k[5091]*y_cur[IDX_O2I] - - k[5092]*y_cur[IDX_O2I] - k[5093]*y_cur[IDX_O2I] - - k[5094]*y_cur[IDX_O2HI] - k[5095]*y_cur[IDX_O2HI] - - k[5096]*y_cur[IDX_OI] - k[5097]*y_cur[IDX_OI] - - k[5098]*y_cur[IDX_OCSI] - k[5099]*y_cur[IDX_OHI] - - k[5100]*y_cur[IDX_SI] - k[5101]*y_cur[IDX_SI] - - k[5102]*y_cur[IDX_SOI] - k[5103]*y_cur[IDX_SOI] - - k[5137]*y_cur[IDX_H2I] - k[5160]*y_cur[IDX_HI] - - k[5556]*y_cur[IDX_H2I] - k[5821] - k[6131] - k[6132] - k[6892]; - data[jistart + 6036] = 0.0 + k[250]*y_cur[IDX_FeI] + - k[251]*y_cur[IDX_HCOI] + k[252]*y_cur[IDX_MgI] + - k[253]*y_cur[IDX_NH3I] + k[254]*y_cur[IDX_NOI] + - k[255]*y_cur[IDX_NaI] + k[256]*y_cur[IDX_SI] + k[257]*y_cur[IDX_SiI] - - k[1943]*y_cur[IDX_CHI]; - data[jistart + 6037] = 0.0 + k[4621]*y_cur[IDX_CII] + - k[4622]*y_cur[IDX_C2H2II] + k[4623]*y_cur[IDX_C2H3II] + - k[4624]*y_cur[IDX_C4H2II] + k[4625]*y_cur[IDX_C4H3II] + - k[4626]*y_cur[IDX_C4SII] + k[4627]*y_cur[IDX_CH2CCHII] + - k[4628]*y_cur[IDX_CH3II] + k[4629]*y_cur[IDX_CNCII] + - k[4630]*y_cur[IDX_FeII] + k[4631]*y_cur[IDX_HII] + - k[4632]*y_cur[IDX_H2COII] + k[4633]*y_cur[IDX_H2SII] + - k[4634]*y_cur[IDX_H3II] + k[4635]*y_cur[IDX_H3OII] + - k[4636]*y_cur[IDX_HC2SII] + k[4637]*y_cur[IDX_HCNHII] + - k[4638]*y_cur[IDX_HCNHII] + k[4639]*y_cur[IDX_HCOII] + - k[4640]*y_cur[IDX_HCOII] + k[4641]*y_cur[IDX_HeII] + - k[4642]*y_cur[IDX_MgII] + k[4643]*y_cur[IDX_NII] + - k[4644]*y_cur[IDX_N2HII] + k[4645]*y_cur[IDX_NH3II] + - k[4646]*y_cur[IDX_NH4II] + k[4647]*y_cur[IDX_NOII] + - k[4648]*y_cur[IDX_NaII] + k[4649]*y_cur[IDX_OII] + - k[4650]*y_cur[IDX_SII] + k[4651]*y_cur[IDX_SOII] + - k[4652]*y_cur[IDX_SiII] + k[4653]*y_cur[IDX_SiOII] + - k[4654]*y_cur[IDX_SiOHII] + k[4655]*y_cur[IDX_SiSII] + k[5777] + - k[6074]; - data[jistart + 6038] = 0.0 + k[2001]*y_cur[IDX_COII] + - k[4945]*y_cur[IDX_CI] + k[4945]*y_cur[IDX_CI] + - k[4995]*y_cur[IDX_CH2I] + k[4995]*y_cur[IDX_CH2I] + - k[4997]*y_cur[IDX_CNI] + k[5015]*y_cur[IDX_OI] + - k[5017]*y_cur[IDX_OHI] + k[5156]*y_cur[IDX_HI] + - k[5255]*y_cur[IDX_NI] + k[5779] + k[6079]; - data[jistart + 6039] = 0.0 + k[909]*y_cur[IDX_eM] + - k[1984]*y_cur[IDX_H2SI] + k[1989]*y_cur[IDX_NH3I] + k[6077] + - k[6318]*y_cur[IDX_GRAINM]; - data[jistart + 6040] = 0.0 + k[910]*y_cur[IDX_eM] + - k[4627]*y_cur[IDX_CHM] + k[6470]*y_cur[IDX_GRAINM]; - data[jistart + 6041] = 0.0 + k[1344]*y_cur[IDX_CII] - - k[5067]*y_cur[IDX_CHI]; - data[jistart + 6042] = 0.0 + k[917]*y_cur[IDX_eM] + - k[6476]*y_cur[IDX_GRAINM]; - data[jistart + 6043] = 0.0 + k[5795] + k[6099]; - data[jistart + 6044] = 0.0 + k[924]*y_cur[IDX_eM] + - k[925]*y_cur[IDX_eM] - k[2243]*y_cur[IDX_CHI] + - k[4628]*y_cur[IDX_CHM] + k[6322]*y_cur[IDX_GRAINM] + - k[6323]*y_cur[IDX_GRAINM]; - data[jistart + 6045] = 0.0 + k[1356]*y_cur[IDX_CII]; - data[jistart + 6046] = 0.0 + k[1360]*y_cur[IDX_CII]; - data[jistart + 6047] = 0.0 + k[1366]*y_cur[IDX_CII] + - k[3865]*y_cur[IDX_SiII] - k[5068]*y_cur[IDX_CHI]; - data[jistart + 6048] = 0.0 + k[1376]*y_cur[IDX_CII] - - k[5071]*y_cur[IDX_CHI] - k[5072]*y_cur[IDX_CHI]; - data[jistart + 6049] = 0.0 + k[1378]*y_cur[IDX_CII]; - data[jistart + 6050] = 0.0 + k[1381]*y_cur[IDX_CII] - - k[5073]*y_cur[IDX_CHI]; - data[jistart + 6051] = 0.0 + k[960]*y_cur[IDX_eM] + - k[6428]*y_cur[IDX_GRAINM]; - data[jistart + 6052] = 0.0 - k[5074]*y_cur[IDX_CHI] + k[6130]; - data[jistart + 6053] = 0.0 + k[976]*y_cur[IDX_eM] - - k[2244]*y_cur[IDX_CHI] + k[6336]*y_cur[IDX_GRAINM]; - data[jistart + 6054] = 0.0 + k[4997]*y_cur[IDX_CH2I]; - data[jistart + 6055] = 0.0 - k[288]*y_cur[IDX_CHI]; - data[jistart + 6056] = 0.0 + k[4629]*y_cur[IDX_CHM]; - data[jistart + 6057] = 0.0 - k[289]*y_cur[IDX_CHI] + - k[2001]*y_cur[IDX_CH2I] - k[2245]*y_cur[IDX_CHI]; - data[jistart + 6058] = 0.0 - k[5075]*y_cur[IDX_CHI]; - data[jistart + 6059] = 0.0 + k[250]*y_cur[IDX_CHII]; - data[jistart + 6060] = 0.0 + k[4630]*y_cur[IDX_CHM]; - data[jistart + 6061] = 0.0 + k[8576]*y_cur[IDX_GHI]; - data[jistart + 6062] = 0.0 + k[7074] + k[7256] + k[7438]; - data[jistart + 6063] = 0.0 + k[8576]*y_cur[IDX_GCI]; - data[jistart + 6064] = 0.0 + k[6318]*y_cur[IDX_CH2II] + - k[6322]*y_cur[IDX_CH3II] + k[6323]*y_cur[IDX_CH3II] + - k[6336]*y_cur[IDX_CH5II] + k[6355]*y_cur[IDX_C2HII] + - k[6358]*y_cur[IDX_C2H2II] + k[6358]*y_cur[IDX_C2H2II] + - k[6368]*y_cur[IDX_C2H3II] + k[6369]*y_cur[IDX_C2H3II] + - k[6386]*y_cur[IDX_C2H4II] + k[6415]*y_cur[IDX_H3COII] + - k[6428]*y_cur[IDX_CH3OHII] + k[6470]*y_cur[IDX_CH2CCHII] + - k[6476]*y_cur[IDX_CH2CNII] + k[6477]*y_cur[IDX_C3H4II] + - k[6489]*y_cur[IDX_HC2OII] + k[6490]*y_cur[IDX_HCSiII] + - k[6509]*y_cur[IDX_C3H7II] + k[6514]*y_cur[IDX_HCNOII] + - k[6544]*y_cur[IDX_HCPII] + k[6554]*y_cur[IDX_HCSII] + - k[6646]*y_cur[IDX_C4H5II] + k[6668]*y_cur[IDX_SiNCHII] + - k[6677]*y_cur[IDX_HC2PII] + k[6679]*y_cur[IDX_HC2SII] + - k[6744]*y_cur[IDX_HC4NII] + k[6745]*y_cur[IDX_H2C4NII] + - k[6773]*y_cur[IDX_PC3HII] + k[6778]*y_cur[IDX_HC3SII] + - k[6800]*y_cur[IDX_SiC4HII] + k[6811]*y_cur[IDX_PC4HII] + - k[6819]*y_cur[IDX_HC4SII]; - data[jistart + 6065] = 0.0 + k[84]*y_cur[IDX_CM] - - k[141]*y_cur[IDX_CHI] + k[5153]*y_cur[IDX_C2I] + - k[5156]*y_cur[IDX_CH2I] - k[5160]*y_cur[IDX_CHI] + - k[5572]*y_cur[IDX_CI]; - data[jistart + 6066] = 0.0 - k[372]*y_cur[IDX_CHI] + - k[4631]*y_cur[IDX_CHM]; - data[jistart + 6067] = 0.0 + k[68]*y_cur[IDX_CI] - - k[71]*y_cur[IDX_CHI]; - data[jistart + 6068] = 0.0 - k[134]*y_cur[IDX_CHI] + - k[5134]*y_cur[IDX_CI] - k[5137]*y_cur[IDX_CHI] - - k[5556]*y_cur[IDX_CHI]; - data[jistart + 6069] = 0.0 - k[443]*y_cur[IDX_CHI] - - k[2380]*y_cur[IDX_CHI]; - data[jistart + 6070] = 0.0 + k[988]*y_cur[IDX_eM] + - k[6745]*y_cur[IDX_GRAINM]; - data[jistart + 6071] = 0.0 + k[1391]*y_cur[IDX_CII] - - k[5076]*y_cur[IDX_CHI]; - data[jistart + 6072] = 0.0 - k[290]*y_cur[IDX_CHI] - - k[2246]*y_cur[IDX_CHI] + k[4632]*y_cur[IDX_CHM]; - data[jistart + 6073] = 0.0 - k[291]*y_cur[IDX_CHI] - - k[2247]*y_cur[IDX_CHI]; - data[jistart + 6074] = 0.0 + k[1984]*y_cur[IDX_CH2II]; - data[jistart + 6075] = 0.0 + k[4633]*y_cur[IDX_CHM]; - data[jistart + 6076] = 0.0 - k[2670]*y_cur[IDX_CHI] + - k[4634]*y_cur[IDX_CHM]; - data[jistart + 6077] = 0.0 + k[1035]*y_cur[IDX_eM] - - k[2248]*y_cur[IDX_CHI] + k[6415]*y_cur[IDX_GRAINM]; - data[jistart + 6078] = 0.0 - k[2249]*y_cur[IDX_CHI] + - k[4635]*y_cur[IDX_CHM]; - data[jistart + 6079] = 0.0 + k[5942]; - data[jistart + 6080] = 0.0 + k[1058]*y_cur[IDX_eM] + - k[6489]*y_cur[IDX_GRAINM]; - data[jistart + 6081] = 0.0 + k[1396]*y_cur[IDX_CII] + - k[3232]*y_cur[IDX_HeII]; - data[jistart + 6082] = 0.0 + k[1060]*y_cur[IDX_eM] + - k[6677]*y_cur[IDX_GRAINM]; - data[jistart + 6083] = 0.0 + k[1062]*y_cur[IDX_eM] + - k[4636]*y_cur[IDX_CHM] + k[6679]*y_cur[IDX_GRAINM]; - data[jistart + 6084] = 0.0 + k[3234]*y_cur[IDX_HeII]; - data[jistart + 6085] = 0.0 + k[1071]*y_cur[IDX_eM] + - k[6778]*y_cur[IDX_GRAINM]; - data[jistart + 6086] = 0.0 + k[1073]*y_cur[IDX_eM] + - k[6744]*y_cur[IDX_GRAINM]; - data[jistart + 6087] = 0.0 + k[1075]*y_cur[IDX_eM] + - k[6819]*y_cur[IDX_GRAINM]; - data[jistart + 6088] = 0.0 + k[3246]*y_cur[IDX_HeII] + - k[3645]*y_cur[IDX_OII]; - data[jistart + 6089] = 0.0 - k[2250]*y_cur[IDX_CHI]; - data[jistart + 6090] = 0.0 - k[2251]*y_cur[IDX_CHI] - - k[2252]*y_cur[IDX_CHI] + k[4637]*y_cur[IDX_CHM] + - k[4638]*y_cur[IDX_CHM]; - data[jistart + 6091] = 0.0 + k[5855] + k[6182]; - data[jistart + 6092] = 0.0 + k[1092]*y_cur[IDX_eM] + - k[6514]*y_cur[IDX_GRAINM]; - data[jistart + 6093] = 0.0 + k[251]*y_cur[IDX_CHII] + - k[4963]*y_cur[IDX_CI] - k[5077]*y_cur[IDX_CHI]; - data[jistart + 6094] = 0.0 - k[2253]*y_cur[IDX_CHI] + - k[4639]*y_cur[IDX_CHM] + k[4640]*y_cur[IDX_CHM]; - data[jistart + 6095] = 0.0 + k[3253]*y_cur[IDX_HeII]; - data[jistart + 6096] = 0.0 + k[1106]*y_cur[IDX_eM] + - k[6544]*y_cur[IDX_GRAINM]; - data[jistart + 6097] = 0.0 + k[1107]*y_cur[IDX_eM] + - k[6554]*y_cur[IDX_GRAINM]; - data[jistart + 6098] = 0.0 + k[3257]*y_cur[IDX_HeII] + - k[5410]*y_cur[IDX_OI] + k[5863]; - data[jistart + 6099] = 0.0 + k[1109]*y_cur[IDX_eM] + - k[6490]*y_cur[IDX_GRAINM]; - data[jistart + 6100] = 0.0 + k[3018]*y_cur[IDX_CII]; - data[jistart + 6101] = 0.0 - k[5078]*y_cur[IDX_CHI]; - data[jistart + 6102] = 0.0 - k[2254]*y_cur[IDX_CHI]; - data[jistart + 6103] = 0.0 + k[4966]*y_cur[IDX_CI]; - data[jistart + 6104] = 0.0 - k[2255]*y_cur[IDX_CHI]; - data[jistart + 6105] = 0.0 - k[515]*y_cur[IDX_CHI] + - k[3076]*y_cur[IDX_C2H2I] + k[3088]*y_cur[IDX_C2HI] + - k[3108]*y_cur[IDX_C4H3I] + k[3130]*y_cur[IDX_C6H6I] - - k[3202]*y_cur[IDX_CHI] + k[3232]*y_cur[IDX_HC2PI] + - k[3234]*y_cur[IDX_HC3NI] + k[3246]*y_cur[IDX_HCNI] + - k[3253]*y_cur[IDX_HCPI] + k[3257]*y_cur[IDX_HCSiI] + - k[3319]*y_cur[IDX_SiCH2I] + k[4641]*y_cur[IDX_CHM]; - data[jistart + 6106] = 0.0 + k[252]*y_cur[IDX_CHII]; - data[jistart + 6107] = 0.0 + k[4642]*y_cur[IDX_CHM]; - data[jistart + 6108] = 0.0 - k[5080]*y_cur[IDX_CHI] - - k[5081]*y_cur[IDX_CHI] + k[5255]*y_cur[IDX_CH2I]; - data[jistart + 6109] = 0.0 - k[292]*y_cur[IDX_CHI] - - k[2256]*y_cur[IDX_CHI] + k[4643]*y_cur[IDX_CHM]; - data[jistart + 6110] = 0.0 - k[5079]*y_cur[IDX_CHI]; - data[jistart + 6111] = 0.0 - k[293]*y_cur[IDX_CHI]; - data[jistart + 6112] = 0.0 - k[2257]*y_cur[IDX_CHI] + - k[4644]*y_cur[IDX_CHM]; - data[jistart + 6113] = 0.0 + k[4973]*y_cur[IDX_CI]; - data[jistart + 6114] = 0.0 - k[2258]*y_cur[IDX_CHI]; - data[jistart + 6115] = 0.0 + k[4971]*y_cur[IDX_CI]; - data[jistart + 6116] = 0.0 - k[294]*y_cur[IDX_CHI] - - k[2259]*y_cur[IDX_CHI]; - data[jistart + 6117] = 0.0 + k[253]*y_cur[IDX_CHII] + - k[1989]*y_cur[IDX_CH2II] - k[5082]*y_cur[IDX_CHI]; - data[jistart + 6118] = 0.0 - k[2260]*y_cur[IDX_CHI] + - k[4645]*y_cur[IDX_CHM]; - data[jistart + 6119] = 0.0 + k[4646]*y_cur[IDX_CHM]; - data[jistart + 6120] = 0.0 + k[254]*y_cur[IDX_CHII] - - k[5083]*y_cur[IDX_CHI] - k[5084]*y_cur[IDX_CHI] - - k[5085]*y_cur[IDX_CHI]; - data[jistart + 6121] = 0.0 + k[4647]*y_cur[IDX_CHM]; - data[jistart + 6122] = 0.0 + k[255]*y_cur[IDX_CHII]; - data[jistart + 6123] = 0.0 + k[4648]*y_cur[IDX_CHM]; - data[jistart + 6124] = 0.0 - k[63]*y_cur[IDX_CHI] + - k[3689]*y_cur[IDX_C2H2II] + k[3702]*y_cur[IDX_C4H2II] + - k[5015]*y_cur[IDX_CH2I] - k[5096]*y_cur[IDX_CHI] - - k[5097]*y_cur[IDX_CHI] + k[5352]*y_cur[IDX_C2HI] + - k[5410]*y_cur[IDX_HCSiI]; - data[jistart + 6125] = 0.0 - k[295]*y_cur[IDX_CHI] - - k[2261]*y_cur[IDX_CHI] + k[3634]*y_cur[IDX_C2HI] + - k[3645]*y_cur[IDX_HCNI] + k[4649]*y_cur[IDX_CHM]; - data[jistart + 6126] = 0.0 - k[62]*y_cur[IDX_CHI]; - data[jistart + 6127] = 0.0 - k[5086]*y_cur[IDX_CHI] - - k[5087]*y_cur[IDX_CHI] - k[5088]*y_cur[IDX_CHI] - - k[5089]*y_cur[IDX_CHI] - k[5090]*y_cur[IDX_CHI] - - k[5091]*y_cur[IDX_CHI] - k[5092]*y_cur[IDX_CHI] - - k[5093]*y_cur[IDX_CHI]; - data[jistart + 6128] = 0.0 - k[296]*y_cur[IDX_CHI] - - k[2262]*y_cur[IDX_CHI]; - data[jistart + 6129] = 0.0 - k[5094]*y_cur[IDX_CHI] - - k[5095]*y_cur[IDX_CHI]; - data[jistart + 6130] = 0.0 - k[2263]*y_cur[IDX_CHI]; - data[jistart + 6131] = 0.0 - k[5098]*y_cur[IDX_CHI]; - data[jistart + 6132] = 0.0 + k[4982]*y_cur[IDX_CI] + - k[5017]*y_cur[IDX_CH2I] - k[5099]*y_cur[IDX_CHI]; - data[jistart + 6133] = 0.0 - k[297]*y_cur[IDX_CHI] - - k[2264]*y_cur[IDX_CHI]; - data[jistart + 6134] = 0.0 - k[64]*y_cur[IDX_CHI]; - data[jistart + 6135] = 0.0 + k[1191]*y_cur[IDX_eM] + - k[6773]*y_cur[IDX_GRAINM]; - data[jistart + 6136] = 0.0 + k[1193]*y_cur[IDX_eM] + - k[6811]*y_cur[IDX_GRAINM]; - data[jistart + 6137] = 0.0 + k[256]*y_cur[IDX_CHII] - - k[5100]*y_cur[IDX_CHI] - k[5101]*y_cur[IDX_CHI]; - data[jistart + 6138] = 0.0 - k[2265]*y_cur[IDX_CHI] + - k[4650]*y_cur[IDX_CHM]; - data[jistart + 6139] = 0.0 - k[5102]*y_cur[IDX_CHI] - - k[5103]*y_cur[IDX_CHI]; - data[jistart + 6140] = 0.0 + k[4651]*y_cur[IDX_CHM]; - data[jistart + 6141] = 0.0 + k[257]*y_cur[IDX_CHII]; - data[jistart + 6142] = 0.0 - k[2266]*y_cur[IDX_CHI] + - k[3865]*y_cur[IDX_CH3CCHI] + k[4652]*y_cur[IDX_CHM]; - data[jistart + 6143] = 0.0 + k[1240]*y_cur[IDX_eM] + - k[6800]*y_cur[IDX_GRAINM]; - data[jistart + 6144] = 0.0 + k[3319]*y_cur[IDX_HeII]; - data[jistart + 6145] = 0.0 - k[2267]*y_cur[IDX_CHI]; - data[jistart + 6146] = 0.0 + k[1262]*y_cur[IDX_eM] + - k[6668]*y_cur[IDX_GRAINM]; - data[jistart + 6147] = 0.0 - k[2268]*y_cur[IDX_CHI] + - k[4653]*y_cur[IDX_CHM]; - data[jistart + 6148] = 0.0 + k[4654]*y_cur[IDX_CHM]; - data[jistart + 6149] = 0.0 + k[4655]*y_cur[IDX_CHM]; - data[jistart + 6150] = 0.0 + k[741]*y_cur[IDX_C2HII] + - k[744]*y_cur[IDX_C2H2II] + k[744]*y_cur[IDX_C2H2II] + - k[753]*y_cur[IDX_C2H3II] + k[754]*y_cur[IDX_C2H3II] + - k[762]*y_cur[IDX_C2H4II] + k[799]*y_cur[IDX_C3H4II] + - k[812]*y_cur[IDX_C3H7II] + k[828]*y_cur[IDX_C4H5II] + - k[909]*y_cur[IDX_CH2II] + k[910]*y_cur[IDX_CH2CCHII] + - k[917]*y_cur[IDX_CH2CNII] + k[924]*y_cur[IDX_CH3II] + - k[925]*y_cur[IDX_CH3II] + k[960]*y_cur[IDX_CH3OHII] + - k[976]*y_cur[IDX_CH5II] + k[988]*y_cur[IDX_H2C4NII] + - k[1035]*y_cur[IDX_H3COII] + k[1058]*y_cur[IDX_HC2OII] + - k[1060]*y_cur[IDX_HC2PII] + k[1062]*y_cur[IDX_HC2SII] + - k[1071]*y_cur[IDX_HC3SII] + k[1073]*y_cur[IDX_HC4NII] + - k[1075]*y_cur[IDX_HC4SII] + k[1092]*y_cur[IDX_HCNOII] + - k[1106]*y_cur[IDX_HCPII] + k[1107]*y_cur[IDX_HCSII] + - k[1109]*y_cur[IDX_HCSiII] + k[1191]*y_cur[IDX_PC3HII] + - k[1193]*y_cur[IDX_PC4HII] + k[1240]*y_cur[IDX_SiC4HII] + - k[1262]*y_cur[IDX_SiNCHII]; - data[jistart + 6151] = 0.0 - k[1890]*y_cur[IDX_CHII] + - k[1898]*y_cur[IDX_CH5II] + k[1899]*y_cur[IDX_H2OII] + - k[1903]*y_cur[IDX_HCNII] + k[1904]*y_cur[IDX_HCOII] + - k[1905]*y_cur[IDX_HCO2II] + k[1907]*y_cur[IDX_HNOII] + - k[1909]*y_cur[IDX_N2HII] + k[1910]*y_cur[IDX_NHII] + - k[1913]*y_cur[IDX_O2HII] + k[1914]*y_cur[IDX_OHII] + - k[2374]*y_cur[IDX_H2II] + k[2632]*y_cur[IDX_H3II]; - data[jistart + 6152] = 0.0 + k[170]*y_cur[IDX_CHI] + - k[1408]*y_cur[IDX_HCOI] + k[2398]*y_cur[IDX_H2I] + - k[5569]*y_cur[IDX_HI]; - data[jistart + 6153] = 0.0 - k[1933]*y_cur[IDX_CHII]; - data[jistart + 6154] = 0.0 + k[287]*y_cur[IDX_CHI]; - data[jistart + 6155] = 0.0 - k[1935]*y_cur[IDX_CHII] + - k[3087]*y_cur[IDX_HeII]; - data[jistart + 6156] = 0.0 + k[3386]*y_cur[IDX_NI]; - data[jistart + 6157] = 0.0 - k[1934]*y_cur[IDX_CHII] + - k[3076]*y_cur[IDX_HeII]; - data[jistart + 6158] = 0.0 + k[3389]*y_cur[IDX_NI]; - data[jistart + 6159] = 0.0 + k[170]*y_cur[IDX_CII] + - k[287]*y_cur[IDX_C2II] + k[288]*y_cur[IDX_CNII] + - k[289]*y_cur[IDX_COII] + k[290]*y_cur[IDX_H2COII] + - k[291]*y_cur[IDX_H2OII] + k[292]*y_cur[IDX_NII] + - k[293]*y_cur[IDX_N2II] + k[294]*y_cur[IDX_NH2II] + - k[295]*y_cur[IDX_OII] + k[296]*y_cur[IDX_O2II] + - k[297]*y_cur[IDX_OHII] + k[372]*y_cur[IDX_HII] + - k[443]*y_cur[IDX_H2II] + k[515]*y_cur[IDX_HeII] - - k[1943]*y_cur[IDX_CHII] + k[6132]; - data[jistart + 6160] = 0.0 - k[250]*y_cur[IDX_FeI] - - k[251]*y_cur[IDX_HCOI] - k[252]*y_cur[IDX_MgI] - - k[253]*y_cur[IDX_NH3I] - k[254]*y_cur[IDX_NOI] - - k[255]*y_cur[IDX_NaI] - k[256]*y_cur[IDX_SI] - k[257]*y_cur[IDX_SiI] - - k[906]*y_cur[IDX_eM] - k[1890]*y_cur[IDX_CI] - - k[1933]*y_cur[IDX_C2I] - k[1934]*y_cur[IDX_C2H2I] - - k[1935]*y_cur[IDX_C2HI] - k[1936]*y_cur[IDX_CH2I] - - k[1937]*y_cur[IDX_CH3OHI] - k[1938]*y_cur[IDX_CH3OHI] - - k[1939]*y_cur[IDX_CH3OHI] - k[1940]*y_cur[IDX_CH4I] - - k[1941]*y_cur[IDX_CH4I] - k[1942]*y_cur[IDX_CH4I] - - k[1943]*y_cur[IDX_CHI] - k[1944]*y_cur[IDX_CNI] - - k[1945]*y_cur[IDX_CNI] - k[1946]*y_cur[IDX_CO2I] - - k[1947]*y_cur[IDX_H2COI] - k[1948]*y_cur[IDX_H2COI] - - k[1949]*y_cur[IDX_H2COI] - k[1950]*y_cur[IDX_H2COI] - - k[1951]*y_cur[IDX_H2OI] - k[1952]*y_cur[IDX_H2OI] - - k[1953]*y_cur[IDX_H2OI] - k[1954]*y_cur[IDX_H2SI] - - k[1955]*y_cur[IDX_H2SI] - k[1956]*y_cur[IDX_HCNI] - - k[1957]*y_cur[IDX_HCNI] - k[1958]*y_cur[IDX_HCNI] - - k[1959]*y_cur[IDX_HCOI] - k[1960]*y_cur[IDX_HNCI] - - k[1961]*y_cur[IDX_NI] - k[1962]*y_cur[IDX_NH2I] - - k[1963]*y_cur[IDX_NH3I] - k[1964]*y_cur[IDX_NH3I] - - k[1965]*y_cur[IDX_NHI] - k[1966]*y_cur[IDX_O2I] - - k[1967]*y_cur[IDX_O2I] - k[1968]*y_cur[IDX_O2I] - - k[1969]*y_cur[IDX_OI] - k[1970]*y_cur[IDX_OCSI] - - k[1971]*y_cur[IDX_OCSI] - k[1972]*y_cur[IDX_OHI] - - k[1973]*y_cur[IDX_SI] - k[1974]*y_cur[IDX_SI] - - k[2427]*y_cur[IDX_H2I] - k[2835]*y_cur[IDX_HI] - k[5776] - k[6073] - - k[6315]*y_cur[IDX_GRAINM]; - data[jistart + 6161] = 0.0 - k[1936]*y_cur[IDX_CHII] + - k[2314]*y_cur[IDX_HII] + k[3161]*y_cur[IDX_HeII]; - data[jistart + 6162] = 0.0 + k[2836]*y_cur[IDX_HI] + k[6076]; - data[jistart + 6163] = 0.0 + k[3176]*y_cur[IDX_HeII]; - data[jistart + 6164] = 0.0 + k[6095]; - data[jistart + 6165] = 0.0 - k[1937]*y_cur[IDX_CHII] - - k[1938]*y_cur[IDX_CHII] - k[1939]*y_cur[IDX_CHII]; - data[jistart + 6166] = 0.0 - k[1940]*y_cur[IDX_CHII] - - k[1941]*y_cur[IDX_CHII] - k[1942]*y_cur[IDX_CHII] + - k[3198]*y_cur[IDX_HeII]; - data[jistart + 6167] = 0.0 + k[1898]*y_cur[IDX_CI]; - data[jistart + 6168] = 0.0 - k[1944]*y_cur[IDX_CHII] - - k[1945]*y_cur[IDX_CHII]; - data[jistart + 6169] = 0.0 + k[288]*y_cur[IDX_CHI]; - data[jistart + 6170] = 0.0 + k[289]*y_cur[IDX_CHI]; - data[jistart + 6171] = 0.0 - k[1946]*y_cur[IDX_CHII]; - data[jistart + 6172] = 0.0 - k[250]*y_cur[IDX_CHII]; - data[jistart + 6173] = 0.0 - k[6315]*y_cur[IDX_CHII]; - data[jistart + 6174] = 0.0 - k[2835]*y_cur[IDX_CHII] + - k[2836]*y_cur[IDX_CH2II] + k[5569]*y_cur[IDX_CII]; - data[jistart + 6175] = 0.0 + k[372]*y_cur[IDX_CHI] + - k[2314]*y_cur[IDX_CH2I]; - data[jistart + 6176] = 0.0 + k[2398]*y_cur[IDX_CII] - - k[2427]*y_cur[IDX_CHII]; - data[jistart + 6177] = 0.0 + k[443]*y_cur[IDX_CHI] + - k[2374]*y_cur[IDX_CI]; - data[jistart + 6178] = 0.0 - k[1947]*y_cur[IDX_CHII] - - k[1948]*y_cur[IDX_CHII] - k[1949]*y_cur[IDX_CHII] - - k[1950]*y_cur[IDX_CHII]; - data[jistart + 6179] = 0.0 + k[290]*y_cur[IDX_CHI]; - data[jistart + 6180] = 0.0 - k[1951]*y_cur[IDX_CHII] - - k[1952]*y_cur[IDX_CHII] - k[1953]*y_cur[IDX_CHII]; - data[jistart + 6181] = 0.0 + k[291]*y_cur[IDX_CHI] + - k[1899]*y_cur[IDX_CI]; - data[jistart + 6182] = 0.0 - k[1954]*y_cur[IDX_CHII] - - k[1955]*y_cur[IDX_CHII]; - data[jistart + 6183] = 0.0 + k[2632]*y_cur[IDX_CI]; - data[jistart + 6184] = 0.0 + k[3233]*y_cur[IDX_HeII]; - data[jistart + 6185] = 0.0 - k[1956]*y_cur[IDX_CHII] - - k[1957]*y_cur[IDX_CHII] - k[1958]*y_cur[IDX_CHII] + - k[3248]*y_cur[IDX_HeII]; - data[jistart + 6186] = 0.0 + k[1903]*y_cur[IDX_CI]; - data[jistart + 6187] = 0.0 - k[251]*y_cur[IDX_CHII] + - k[1408]*y_cur[IDX_CII] - k[1959]*y_cur[IDX_CHII] + - k[3251]*y_cur[IDX_HeII]; - data[jistart + 6188] = 0.0 + k[1904]*y_cur[IDX_CI]; - data[jistart + 6189] = 0.0 + k[1905]*y_cur[IDX_CI]; - data[jistart + 6190] = 0.0 - k[1960]*y_cur[IDX_CHII]; - data[jistart + 6191] = 0.0 + k[1907]*y_cur[IDX_CI]; - data[jistart + 6192] = 0.0 + k[515]*y_cur[IDX_CHI] + - k[3076]*y_cur[IDX_C2H2I] + k[3087]*y_cur[IDX_C2HI] + - k[3161]*y_cur[IDX_CH2I] + k[3176]*y_cur[IDX_CH3I] + - k[3198]*y_cur[IDX_CH4I] + k[3233]*y_cur[IDX_HC2PI] + - k[3248]*y_cur[IDX_HCNI] + k[3251]*y_cur[IDX_HCOI]; - data[jistart + 6193] = 0.0 - k[252]*y_cur[IDX_CHII]; - data[jistart + 6194] = 0.0 - k[1961]*y_cur[IDX_CHII] + - k[3386]*y_cur[IDX_C2HII] + k[3389]*y_cur[IDX_C2H2II]; - data[jistart + 6195] = 0.0 + k[292]*y_cur[IDX_CHI]; - data[jistart + 6196] = 0.0 + k[293]*y_cur[IDX_CHI]; - data[jistart + 6197] = 0.0 + k[1909]*y_cur[IDX_CI]; - data[jistart + 6198] = 0.0 - k[1965]*y_cur[IDX_CHII]; - data[jistart + 6199] = 0.0 + k[1910]*y_cur[IDX_CI]; - data[jistart + 6200] = 0.0 - k[1962]*y_cur[IDX_CHII]; - data[jistart + 6201] = 0.0 + k[294]*y_cur[IDX_CHI]; - data[jistart + 6202] = 0.0 - k[253]*y_cur[IDX_CHII] - - k[1963]*y_cur[IDX_CHII] - k[1964]*y_cur[IDX_CHII]; - data[jistart + 6203] = 0.0 - k[254]*y_cur[IDX_CHII]; - data[jistart + 6204] = 0.0 - k[255]*y_cur[IDX_CHII]; - data[jistart + 6205] = 0.0 - k[1969]*y_cur[IDX_CHII]; - data[jistart + 6206] = 0.0 + k[295]*y_cur[IDX_CHI]; - data[jistart + 6207] = 0.0 - k[1966]*y_cur[IDX_CHII] - - k[1967]*y_cur[IDX_CHII] - k[1968]*y_cur[IDX_CHII]; - data[jistart + 6208] = 0.0 + k[296]*y_cur[IDX_CHI]; - data[jistart + 6209] = 0.0 + k[1913]*y_cur[IDX_CI]; - data[jistart + 6210] = 0.0 - k[1970]*y_cur[IDX_CHII] - - k[1971]*y_cur[IDX_CHII]; - data[jistart + 6211] = 0.0 - k[1972]*y_cur[IDX_CHII]; - data[jistart + 6212] = 0.0 + k[297]*y_cur[IDX_CHI] + - k[1914]*y_cur[IDX_CI]; - data[jistart + 6213] = 0.0 - k[256]*y_cur[IDX_CHII] - - k[1973]*y_cur[IDX_CHII] - k[1974]*y_cur[IDX_CHII]; - data[jistart + 6214] = 0.0 - k[257]*y_cur[IDX_CHII]; - data[jistart + 6215] = 0.0 - k[906]*y_cur[IDX_CHII]; - data[jistart + 6216] = 0.0 - k[55]*y_cur[IDX_CHM]; - data[jistart + 6217] = 0.0 - k[4621]*y_cur[IDX_CHM]; - data[jistart + 6218] = 0.0 + k[3687]*y_cur[IDX_OI]; - data[jistart + 6219] = 0.0 - k[4622]*y_cur[IDX_CHM]; - data[jistart + 6220] = 0.0 - k[4623]*y_cur[IDX_CHM]; - data[jistart + 6221] = 0.0 - k[4624]*y_cur[IDX_CHM]; - data[jistart + 6222] = 0.0 - k[4625]*y_cur[IDX_CHM]; - data[jistart + 6223] = 0.0 - k[4626]*y_cur[IDX_CHM]; - data[jistart + 6224] = 0.0 - k[55]*y_cur[IDX_CI] - - k[105]*y_cur[IDX_HI] - k[4621]*y_cur[IDX_CII] - - k[4622]*y_cur[IDX_C2H2II] - k[4623]*y_cur[IDX_C2H3II] - - k[4624]*y_cur[IDX_C4H2II] - k[4625]*y_cur[IDX_C4H3II] - - k[4626]*y_cur[IDX_C4SII] - k[4627]*y_cur[IDX_CH2CCHII] - - k[4628]*y_cur[IDX_CH3II] - k[4629]*y_cur[IDX_CNCII] - - k[4630]*y_cur[IDX_FeII] - k[4631]*y_cur[IDX_HII] - - k[4632]*y_cur[IDX_H2COII] - k[4633]*y_cur[IDX_H2SII] - - k[4634]*y_cur[IDX_H3II] - k[4635]*y_cur[IDX_H3OII] - - k[4636]*y_cur[IDX_HC2SII] - k[4637]*y_cur[IDX_HCNHII] - - k[4638]*y_cur[IDX_HCNHII] - k[4639]*y_cur[IDX_HCOII] - - k[4640]*y_cur[IDX_HCOII] - k[4641]*y_cur[IDX_HeII] - - k[4642]*y_cur[IDX_MgII] - k[4643]*y_cur[IDX_NII] - - k[4644]*y_cur[IDX_N2HII] - k[4645]*y_cur[IDX_NH3II] - - k[4646]*y_cur[IDX_NH4II] - k[4647]*y_cur[IDX_NOII] - - k[4648]*y_cur[IDX_NaII] - k[4649]*y_cur[IDX_OII] - - k[4650]*y_cur[IDX_SII] - k[4651]*y_cur[IDX_SOII] - - k[4652]*y_cur[IDX_SiII] - k[4653]*y_cur[IDX_SiOII] - - k[4654]*y_cur[IDX_SiOHII] - k[4655]*y_cur[IDX_SiSII] - k[5777] - - k[6074]; - data[jistart + 6225] = 0.0 - k[4627]*y_cur[IDX_CHM]; - data[jistart + 6226] = 0.0 - k[4628]*y_cur[IDX_CHM]; - data[jistart + 6227] = 0.0 - k[4629]*y_cur[IDX_CHM]; - data[jistart + 6228] = 0.0 - k[4630]*y_cur[IDX_CHM]; - data[jistart + 6229] = 0.0 - k[105]*y_cur[IDX_CHM]; - data[jistart + 6230] = 0.0 - k[4631]*y_cur[IDX_CHM]; - data[jistart + 6231] = 0.0 - k[4632]*y_cur[IDX_CHM]; - data[jistart + 6232] = 0.0 - k[4633]*y_cur[IDX_CHM]; - data[jistart + 6233] = 0.0 - k[4634]*y_cur[IDX_CHM]; - data[jistart + 6234] = 0.0 - k[4635]*y_cur[IDX_CHM]; - data[jistart + 6235] = 0.0 - k[4636]*y_cur[IDX_CHM]; - data[jistart + 6236] = 0.0 - k[4637]*y_cur[IDX_CHM] - - k[4638]*y_cur[IDX_CHM]; - data[jistart + 6237] = 0.0 - k[4639]*y_cur[IDX_CHM] - - k[4640]*y_cur[IDX_CHM]; - data[jistart + 6238] = 0.0 - k[4641]*y_cur[IDX_CHM]; - data[jistart + 6239] = 0.0 - k[4642]*y_cur[IDX_CHM]; - data[jistart + 6240] = 0.0 - k[4643]*y_cur[IDX_CHM]; - data[jistart + 6241] = 0.0 - k[4644]*y_cur[IDX_CHM]; - data[jistart + 6242] = 0.0 - k[4645]*y_cur[IDX_CHM]; - data[jistart + 6243] = 0.0 - k[4646]*y_cur[IDX_CHM]; - data[jistart + 6244] = 0.0 - k[4647]*y_cur[IDX_CHM]; - data[jistart + 6245] = 0.0 - k[4648]*y_cur[IDX_CHM]; - data[jistart + 6246] = 0.0 + k[3687]*y_cur[IDX_C2HM]; - data[jistart + 6247] = 0.0 - k[4649]*y_cur[IDX_CHM]; - data[jistart + 6248] = 0.0 - k[4650]*y_cur[IDX_CHM]; - data[jistart + 6249] = 0.0 - k[4651]*y_cur[IDX_CHM]; - data[jistart + 6250] = 0.0 - k[4652]*y_cur[IDX_CHM]; - data[jistart + 6251] = 0.0 - k[4653]*y_cur[IDX_CHM]; - data[jistart + 6252] = 0.0 - k[4654]*y_cur[IDX_CHM]; - data[jistart + 6253] = 0.0 - k[4655]*y_cur[IDX_CHM]; - data[jistart + 6254] = 0.0 - k[4944]*y_cur[IDX_CH2I] - - k[4945]*y_cur[IDX_CH2I] + k[5554]*y_cur[IDX_H2I]; - data[jistart + 6255] = 0.0 - k[160]*y_cur[IDX_CH2I] - - k[1342]*y_cur[IDX_CH2I] + k[1369]*y_cur[IDX_C2H6I]; - data[jistart + 6256] = 0.0 - k[1]*y_cur[IDX_CH2I] + - k[82]*y_cur[IDX_H2I]; - data[jistart + 6257] = 0.0 - k[259]*y_cur[IDX_CH2I] - - k[1995]*y_cur[IDX_CH2I] + k[2147]*y_cur[IDX_CH4I]; - data[jistart + 6258] = 0.0 + k[1730]*y_cur[IDX_C2H4II]; - data[jistart + 6259] = 0.0 - k[1996]*y_cur[IDX_CH2I] - - k[1997]*y_cur[IDX_CH2I]; - data[jistart + 6260] = 0.0 - k[4991]*y_cur[IDX_CH2I] + - k[5344]*y_cur[IDX_OI]; - data[jistart + 6261] = 0.0 + k[1482]*y_cur[IDX_C2H3I] - - k[1998]*y_cur[IDX_CH2I]; - data[jistart + 6262] = 0.0 + k[1482]*y_cur[IDX_C2H2II]; - data[jistart + 6263] = 0.0 + k[753]*y_cur[IDX_eM] + - k[754]*y_cur[IDX_eM] + k[6368]*y_cur[IDX_GRAINM] + - k[6369]*y_cur[IDX_GRAINM]; - data[jistart + 6264] = 0.0 + k[3082]*y_cur[IDX_HeII] + - k[5348]*y_cur[IDX_OI]; - data[jistart + 6265] = 0.0 + k[761]*y_cur[IDX_eM] + - k[761]*y_cur[IDX_eM] + k[1730]*y_cur[IDX_C2HI] + - k[6385]*y_cur[IDX_GRAINM] + k[6385]*y_cur[IDX_GRAINM]; - data[jistart + 6266] = 0.0 + k[768]*y_cur[IDX_eM] + - k[6395]*y_cur[IDX_GRAINM]; - data[jistart + 6267] = 0.0 + k[1369]*y_cur[IDX_CII]; - data[jistart + 6268] = 0.0 + k[791]*y_cur[IDX_eM] + - k[6461]*y_cur[IDX_GRAINM]; - data[jistart + 6269] = 0.0 + k[809]*y_cur[IDX_eM] + - k[6506]*y_cur[IDX_GRAINM]; - data[jistart + 6270] = 0.0 + k[71]*y_cur[IDX_HM] + - k[5076]*y_cur[IDX_H2COI] + k[5077]*y_cur[IDX_HCOI] + - k[5078]*y_cur[IDX_HNOI] + k[5095]*y_cur[IDX_O2HI] + - k[5137]*y_cur[IDX_H2I]; - data[jistart + 6271] = 0.0 - k[1936]*y_cur[IDX_CH2I] + - k[1939]*y_cur[IDX_CH3OHI] + k[1950]*y_cur[IDX_H2COI]; - data[jistart + 6272] = 0.0 + k[105]*y_cur[IDX_HI]; - data[jistart + 6273] = 0.0 - k[1]*y_cur[IDX_CM] - - k[59]*y_cur[IDX_OM] - k[69]*y_cur[IDX_HM] - k[160]*y_cur[IDX_CII] - - k[259]*y_cur[IDX_C2II] - k[260]*y_cur[IDX_CNII] - - k[261]*y_cur[IDX_COII] - k[262]*y_cur[IDX_H2COII] - - k[263]*y_cur[IDX_H2OII] - k[264]*y_cur[IDX_N2II] - - k[265]*y_cur[IDX_NH2II] - k[266]*y_cur[IDX_OII] - - k[267]*y_cur[IDX_O2II] - k[268]*y_cur[IDX_OHII] - - k[359]*y_cur[IDX_HII] - k[440]*y_cur[IDX_H2II] - - k[544]*y_cur[IDX_NII] - k[1342]*y_cur[IDX_CII] - - k[1936]*y_cur[IDX_CHII] - k[1995]*y_cur[IDX_C2II] - - k[1996]*y_cur[IDX_C2HII] - k[1997]*y_cur[IDX_C2HII] - - k[1998]*y_cur[IDX_C2H2II] - k[1999]*y_cur[IDX_CH3II] - - k[2000]*y_cur[IDX_CH5II] - k[2001]*y_cur[IDX_COII] - - k[2002]*y_cur[IDX_H2COII] - k[2003]*y_cur[IDX_H2OII] - - k[2004]*y_cur[IDX_H3OII] - k[2005]*y_cur[IDX_HCNII] - - k[2006]*y_cur[IDX_HCNHII] - k[2007]*y_cur[IDX_HCNHII] - - k[2008]*y_cur[IDX_HCOII] - k[2009]*y_cur[IDX_HNOII] - - k[2010]*y_cur[IDX_N2HII] - k[2011]*y_cur[IDX_NHII] - - k[2012]*y_cur[IDX_NH2II] - k[2013]*y_cur[IDX_NH3II] - - k[2014]*y_cur[IDX_O2II] - k[2015]*y_cur[IDX_O2HII] - - k[2016]*y_cur[IDX_OHII] - k[2017]*y_cur[IDX_SII] - - k[2018]*y_cur[IDX_SiII] - k[2019]*y_cur[IDX_SiOII] - - k[2314]*y_cur[IDX_HII] - k[2375]*y_cur[IDX_H2II] - - k[2634]*y_cur[IDX_H3II] - k[3160]*y_cur[IDX_HeII] - - k[3161]*y_cur[IDX_HeII] - k[4944]*y_cur[IDX_CI] - - k[4945]*y_cur[IDX_CI] - k[4991]*y_cur[IDX_C2H2I] - - k[4992]*y_cur[IDX_CH2I] - k[4992]*y_cur[IDX_CH2I] - - k[4992]*y_cur[IDX_CH2I] - k[4992]*y_cur[IDX_CH2I] - - k[4993]*y_cur[IDX_CH2I] - k[4993]*y_cur[IDX_CH2I] - - k[4993]*y_cur[IDX_CH2I] - k[4993]*y_cur[IDX_CH2I] - - k[4994]*y_cur[IDX_CH2I] - k[4994]*y_cur[IDX_CH2I] - - k[4994]*y_cur[IDX_CH2I] - k[4994]*y_cur[IDX_CH2I] - - k[4995]*y_cur[IDX_CH2I] - k[4995]*y_cur[IDX_CH2I] - - k[4995]*y_cur[IDX_CH2I] - k[4995]*y_cur[IDX_CH2I] - - k[4996]*y_cur[IDX_CH4I] - k[4997]*y_cur[IDX_CNI] - - k[4998]*y_cur[IDX_H2COI] - k[4999]*y_cur[IDX_HCOI] - - k[5000]*y_cur[IDX_HNOI] - k[5001]*y_cur[IDX_N2I] - - k[5002]*y_cur[IDX_NO2I] - k[5003]*y_cur[IDX_NOI] - - k[5004]*y_cur[IDX_NOI] - k[5005]*y_cur[IDX_NOI] - - k[5006]*y_cur[IDX_NOI] - k[5007]*y_cur[IDX_O2I] - - k[5008]*y_cur[IDX_O2I] - k[5009]*y_cur[IDX_O2I] - - k[5010]*y_cur[IDX_O2I] - k[5011]*y_cur[IDX_O2I] - - k[5012]*y_cur[IDX_OI] - k[5013]*y_cur[IDX_OI] - - k[5014]*y_cur[IDX_OI] - k[5015]*y_cur[IDX_OI] - - k[5016]*y_cur[IDX_OHI] - k[5017]*y_cur[IDX_OHI] - - k[5018]*y_cur[IDX_OHI] - k[5019]*y_cur[IDX_SI] - - k[5020]*y_cur[IDX_SI] - k[5021]*y_cur[IDX_SiI] - - k[5135]*y_cur[IDX_H2I] - k[5156]*y_cur[IDX_HI] - - k[5253]*y_cur[IDX_NI] - k[5254]*y_cur[IDX_NI] - - k[5255]*y_cur[IDX_NI] - k[5778] - k[5779] - k[6078] - k[6079] - - k[6893]; - data[jistart + 6274] = 0.0 + k[258]*y_cur[IDX_NOI]; - data[jistart + 6275] = 0.0 + k[5381]*y_cur[IDX_OI]; - data[jistart + 6276] = 0.0 + k[5788] + k[6090]; - data[jistart + 6277] = 0.0 + k[916]*y_cur[IDX_eM] + - k[6475]*y_cur[IDX_GRAINM]; - data[jistart + 6278] = 0.0 + k[3171]*y_cur[IDX_HeII] + k[5790] + - k[6092]; - data[jistart + 6279] = 0.0 + k[920]*y_cur[IDX_eM] + - k[6494]*y_cur[IDX_GRAINM]; - data[jistart + 6280] = 0.0 + k[2317]*y_cur[IDX_HII] + k[5791]; - data[jistart + 6281] = 0.0 + k[922]*y_cur[IDX_eM] + - k[6409]*y_cur[IDX_GRAINM]; - data[jistart + 6282] = 0.0 + k[5637]*y_cur[IDX_HeII] + k[5937] + - k[6290]; - data[jistart + 6283] = 0.0 + k[1275]*y_cur[IDX_eM] + - k[6701]*y_cur[IDX_GRAINM]; - data[jistart + 6284] = 0.0 + k[1272]*y_cur[IDX_eM] + - k[6696]*y_cur[IDX_GRAINM]; - data[jistart + 6285] = 0.0 + k[3174]*y_cur[IDX_HeII] + k[6094]; - data[jistart + 6286] = 0.0 + k[5028]*y_cur[IDX_CH3I] + - k[5028]*y_cur[IDX_CH3I] + k[5029]*y_cur[IDX_CNI] + - k[5041]*y_cur[IDX_O2I] + k[5047]*y_cur[IDX_OHI] + - k[5158]*y_cur[IDX_HI] + k[5793] + k[6097]; - data[jistart + 6287] = 0.0 + k[923]*y_cur[IDX_eM] - - k[1999]*y_cur[IDX_CH2I] + k[2071]*y_cur[IDX_CH3COCH3I] + - k[2088]*y_cur[IDX_NH3I] + k[6321]*y_cur[IDX_GRAINM]; - data[jistart + 6288] = 0.0 + k[926]*y_cur[IDX_eM] + - k[6760]*y_cur[IDX_GRAINM]; - data[jistart + 6289] = 0.0 + k[5805] + k[6110]; - data[jistart + 6290] = 0.0 + k[939]*y_cur[IDX_eM] + - k[6561]*y_cur[IDX_GRAINM]; - data[jistart + 6291] = 0.0 + k[945]*y_cur[IDX_eM] + - k[6485]*y_cur[IDX_GRAINM]; - data[jistart + 6292] = 0.0 + k[2071]*y_cur[IDX_CH3II]; - data[jistart + 6293] = 0.0 + k[950]*y_cur[IDX_eM] + - k[6683]*y_cur[IDX_GRAINM]; - data[jistart + 6294] = 0.0 + k[1285]*y_cur[IDX_eM] + - k[6712]*y_cur[IDX_GRAINM]; - data[jistart + 6295] = 0.0 + k[955]*y_cur[IDX_eM] + - k[6587]*y_cur[IDX_GRAINM]; - data[jistart + 6296] = 0.0 + k[1939]*y_cur[IDX_CHII]; - data[jistart + 6297] = 0.0 + k[963]*y_cur[IDX_eM] + - k[6440]*y_cur[IDX_GRAINM]; - data[jistart + 6298] = 0.0 + k[2147]*y_cur[IDX_C2II] + - k[2210]*y_cur[IDX_OHII] - k[4996]*y_cur[IDX_CH2I] + k[5820] + - k[6127]; - data[jistart + 6299] = 0.0 + k[968]*y_cur[IDX_eM] + - k[6327]*y_cur[IDX_GRAINM]; - data[jistart + 6300] = 0.0 + k[972]*y_cur[IDX_eM] - - k[2000]*y_cur[IDX_CH2I] + k[3729]*y_cur[IDX_OI] + - k[6332]*y_cur[IDX_GRAINM]; - data[jistart + 6301] = 0.0 - k[4997]*y_cur[IDX_CH2I] + - k[5029]*y_cur[IDX_CH3I]; - data[jistart + 6302] = 0.0 - k[260]*y_cur[IDX_CH2I]; - data[jistart + 6303] = 0.0 - k[261]*y_cur[IDX_CH2I] - - k[2001]*y_cur[IDX_CH2I]; - data[jistart + 6304] = 0.0 + k[8653]*y_cur[IDX_GH2I]; - data[jistart + 6305] = 0.0 + k[8577]*y_cur[IDX_GHI]; - data[jistart + 6306] = 0.0 + k[7075] + k[7257] + k[7439]; - data[jistart + 6307] = 0.0 + k[8577]*y_cur[IDX_GCHI]; - data[jistart + 6308] = 0.0 + k[8653]*y_cur[IDX_GCI]; - data[jistart + 6309] = 0.0 + k[6321]*y_cur[IDX_CH3II] + - k[6327]*y_cur[IDX_CH4II] + k[6332]*y_cur[IDX_CH5II] + - k[6368]*y_cur[IDX_C2H3II] + k[6369]*y_cur[IDX_C2H3II] + - k[6385]*y_cur[IDX_C2H4II] + k[6385]*y_cur[IDX_C2H4II] + - k[6395]*y_cur[IDX_C2H5II] + k[6398]*y_cur[IDX_H2COII] + - k[6409]*y_cur[IDX_CH2NH2II] + k[6414]*y_cur[IDX_H3COII] + - k[6440]*y_cur[IDX_CH3OH2II] + k[6461]*y_cur[IDX_C3H2II] + - k[6475]*y_cur[IDX_CH2CNII] + k[6485]*y_cur[IDX_CH3CNII] + - k[6494]*y_cur[IDX_CH2COII] + k[6497]*y_cur[IDX_SiCH2II] + - k[6506]*y_cur[IDX_C3H7II] + k[6536]*y_cur[IDX_H2CNOII] + - k[6561]*y_cur[IDX_CH3CHOHII] + k[6587]*y_cur[IDX_CH3OCH3II] + - k[6683]*y_cur[IDX_CH3COCH3II] + k[6696]*y_cur[IDX_CH2OHCOII] + - k[6701]*y_cur[IDX_CH2OHCHOII] + k[6712]*y_cur[IDX_CH3COOHII] + - k[6760]*y_cur[IDX_CH3C3NII]; - data[jistart + 6310] = 0.0 + k[105]*y_cur[IDX_CHM] - - k[5156]*y_cur[IDX_CH2I] + k[5158]*y_cur[IDX_CH3I] + - k[5172]*y_cur[IDX_HCOI]; - data[jistart + 6311] = 0.0 - k[359]*y_cur[IDX_CH2I] - - k[2314]*y_cur[IDX_CH2I] + k[2317]*y_cur[IDX_CH2NHI]; - data[jistart + 6312] = 0.0 - k[69]*y_cur[IDX_CH2I] + - k[71]*y_cur[IDX_CHI]; - data[jistart + 6313] = 0.0 + k[82]*y_cur[IDX_CM] - - k[5135]*y_cur[IDX_CH2I] + k[5137]*y_cur[IDX_CHI] + - k[5554]*y_cur[IDX_CI]; - data[jistart + 6314] = 0.0 - k[440]*y_cur[IDX_CH2I] - - k[2375]*y_cur[IDX_CH2I]; - data[jistart + 6315] = 0.0 + k[994]*y_cur[IDX_eM] + - k[6536]*y_cur[IDX_GRAINM]; - data[jistart + 6316] = 0.0 + k[1950]*y_cur[IDX_CHII] + - k[3346]*y_cur[IDX_NII] - k[4998]*y_cur[IDX_CH2I] + - k[5076]*y_cur[IDX_CHI]; - data[jistart + 6317] = 0.0 - k[262]*y_cur[IDX_CH2I] + - k[996]*y_cur[IDX_eM] - k[2002]*y_cur[IDX_CH2I] + - k[6398]*y_cur[IDX_GRAINM]; - data[jistart + 6318] = 0.0 + k[3223]*y_cur[IDX_HeII]; - data[jistart + 6319] = 0.0 - k[263]*y_cur[IDX_CH2I] - - k[2003]*y_cur[IDX_CH2I]; - data[jistart + 6320] = 0.0 - k[2634]*y_cur[IDX_CH2I]; - data[jistart + 6321] = 0.0 + k[1034]*y_cur[IDX_eM] + - k[6414]*y_cur[IDX_GRAINM]; - data[jistart + 6322] = 0.0 - k[2004]*y_cur[IDX_CH2I]; - data[jistart + 6323] = 0.0 - k[2005]*y_cur[IDX_CH2I]; - data[jistart + 6324] = 0.0 - k[2006]*y_cur[IDX_CH2I] - - k[2007]*y_cur[IDX_CH2I]; - data[jistart + 6325] = 0.0 - k[4999]*y_cur[IDX_CH2I] + - k[5077]*y_cur[IDX_CHI] + k[5172]*y_cur[IDX_HI]; - data[jistart + 6326] = 0.0 - k[2008]*y_cur[IDX_CH2I]; - data[jistart + 6327] = 0.0 - k[5000]*y_cur[IDX_CH2I] + - k[5078]*y_cur[IDX_CHI]; - data[jistart + 6328] = 0.0 - k[2009]*y_cur[IDX_CH2I]; - data[jistart + 6329] = 0.0 + k[3082]*y_cur[IDX_C2H4I] - - k[3160]*y_cur[IDX_CH2I] - k[3161]*y_cur[IDX_CH2I] + - k[3171]*y_cur[IDX_CH2COI] + k[3174]*y_cur[IDX_CH2PHI] + - k[3223]*y_cur[IDX_H2CSI] + k[3321]*y_cur[IDX_SiCH3I] + - k[5637]*y_cur[IDX_CH2OHI]; - data[jistart + 6330] = 0.0 - k[5253]*y_cur[IDX_CH2I] - - k[5254]*y_cur[IDX_CH2I] - k[5255]*y_cur[IDX_CH2I]; - data[jistart + 6331] = 0.0 - k[544]*y_cur[IDX_CH2I] + - k[3346]*y_cur[IDX_H2COI]; - data[jistart + 6332] = 0.0 - k[5001]*y_cur[IDX_CH2I]; - data[jistart + 6333] = 0.0 - k[264]*y_cur[IDX_CH2I]; - data[jistart + 6334] = 0.0 - k[2010]*y_cur[IDX_CH2I]; - data[jistart + 6335] = 0.0 - k[2011]*y_cur[IDX_CH2I]; - data[jistart + 6336] = 0.0 - k[265]*y_cur[IDX_CH2I] - - k[2012]*y_cur[IDX_CH2I]; - data[jistart + 6337] = 0.0 + k[2088]*y_cur[IDX_CH3II]; - data[jistart + 6338] = 0.0 - k[2013]*y_cur[IDX_CH2I]; - data[jistart + 6339] = 0.0 + k[258]*y_cur[IDX_CH2II] - - k[5003]*y_cur[IDX_CH2I] - k[5004]*y_cur[IDX_CH2I] - - k[5005]*y_cur[IDX_CH2I] - k[5006]*y_cur[IDX_CH2I]; - data[jistart + 6340] = 0.0 - k[5002]*y_cur[IDX_CH2I]; - data[jistart + 6341] = 0.0 + k[3729]*y_cur[IDX_CH5II] - - k[5012]*y_cur[IDX_CH2I] - k[5013]*y_cur[IDX_CH2I] - - k[5014]*y_cur[IDX_CH2I] - k[5015]*y_cur[IDX_CH2I] + - k[5344]*y_cur[IDX_C2H2I] + k[5348]*y_cur[IDX_C2H4I] + - k[5381]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6342] = 0.0 - k[266]*y_cur[IDX_CH2I]; - data[jistart + 6343] = 0.0 - k[59]*y_cur[IDX_CH2I]; - data[jistart + 6344] = 0.0 - k[5007]*y_cur[IDX_CH2I] - - k[5008]*y_cur[IDX_CH2I] - k[5009]*y_cur[IDX_CH2I] - - k[5010]*y_cur[IDX_CH2I] - k[5011]*y_cur[IDX_CH2I] + - k[5041]*y_cur[IDX_CH3I]; - data[jistart + 6345] = 0.0 - k[267]*y_cur[IDX_CH2I] - - k[2014]*y_cur[IDX_CH2I]; - data[jistart + 6346] = 0.0 + k[5095]*y_cur[IDX_CHI]; - data[jistart + 6347] = 0.0 - k[2015]*y_cur[IDX_CH2I]; - data[jistart + 6348] = 0.0 - k[5016]*y_cur[IDX_CH2I] - - k[5017]*y_cur[IDX_CH2I] - k[5018]*y_cur[IDX_CH2I] + - k[5047]*y_cur[IDX_CH3I]; - data[jistart + 6349] = 0.0 - k[268]*y_cur[IDX_CH2I] - - k[2016]*y_cur[IDX_CH2I] + k[2210]*y_cur[IDX_CH4I]; - data[jistart + 6350] = 0.0 - k[5019]*y_cur[IDX_CH2I] - - k[5020]*y_cur[IDX_CH2I]; - data[jistart + 6351] = 0.0 - k[2017]*y_cur[IDX_CH2I]; - data[jistart + 6352] = 0.0 - k[5021]*y_cur[IDX_CH2I]; - data[jistart + 6353] = 0.0 - k[2018]*y_cur[IDX_CH2I]; - data[jistart + 6354] = 0.0 + k[1243]*y_cur[IDX_eM] + - k[6497]*y_cur[IDX_GRAINM]; - data[jistart + 6355] = 0.0 + k[3321]*y_cur[IDX_HeII]; - data[jistart + 6356] = 0.0 - k[2019]*y_cur[IDX_CH2I]; - data[jistart + 6357] = 0.0 + k[753]*y_cur[IDX_C2H3II] + - k[754]*y_cur[IDX_C2H3II] + k[761]*y_cur[IDX_C2H4II] + - k[761]*y_cur[IDX_C2H4II] + k[768]*y_cur[IDX_C2H5II] + - k[791]*y_cur[IDX_C3H2II] + k[809]*y_cur[IDX_C3H7II] + - k[916]*y_cur[IDX_CH2CNII] + k[920]*y_cur[IDX_CH2COII] + - k[922]*y_cur[IDX_CH2NH2II] + k[923]*y_cur[IDX_CH3II] + - k[926]*y_cur[IDX_CH3C3NII] + k[939]*y_cur[IDX_CH3CHOHII] + - k[945]*y_cur[IDX_CH3CNII] + k[950]*y_cur[IDX_CH3COCH3II] + - k[955]*y_cur[IDX_CH3OCH3II] + k[963]*y_cur[IDX_CH3OH2II] + - k[968]*y_cur[IDX_CH4II] + k[972]*y_cur[IDX_CH5II] + - k[994]*y_cur[IDX_H2CNOII] + k[996]*y_cur[IDX_H2COII] + - k[1034]*y_cur[IDX_H3COII] + k[1243]*y_cur[IDX_SiCH2II] + - k[1272]*y_cur[IDX_CH2OHCOII] + k[1275]*y_cur[IDX_CH2OHCHOII] + - k[1285]*y_cur[IDX_CH3COOHII]; - data[jistart + 6358] = 0.0 - k[1891]*y_cur[IDX_CH2II]; - data[jistart + 6359] = 0.0 + k[160]*y_cur[IDX_CH2I] + - k[1390]*y_cur[IDX_H2COI] + k[1392]*y_cur[IDX_H2CSI] + - k[5548]*y_cur[IDX_H2I] + k[5633]*y_cur[IDX_CH2OHI]; - data[jistart + 6360] = 0.0 + k[259]*y_cur[IDX_CH2I]; - data[jistart + 6361] = 0.0 - k[1975]*y_cur[IDX_CH2II]; - data[jistart + 6362] = 0.0 + k[2240]*y_cur[IDX_CHI]; - data[jistart + 6363] = 0.0 + k[3082]*y_cur[IDX_HeII]; - data[jistart + 6364] = 0.0 + k[2240]*y_cur[IDX_C2HII] + - k[2244]*y_cur[IDX_CH5II] + k[2246]*y_cur[IDX_H2COII] + - k[2247]*y_cur[IDX_H2OII] + k[2248]*y_cur[IDX_H3COII] + - k[2249]*y_cur[IDX_H3OII] + k[2250]*y_cur[IDX_HCNII] + - k[2251]*y_cur[IDX_HCNHII] + k[2252]*y_cur[IDX_HCNHII] + - k[2253]*y_cur[IDX_HCOII] + k[2254]*y_cur[IDX_HNOII] + - k[2255]*y_cur[IDX_HSII] + k[2257]*y_cur[IDX_N2HII] + - k[2258]*y_cur[IDX_NHII] + k[2259]*y_cur[IDX_NH2II] + - k[2263]*y_cur[IDX_O2HII] + k[2264]*y_cur[IDX_OHII] + - k[2267]*y_cur[IDX_SiHII] + k[2380]*y_cur[IDX_H2II] + - k[2670]*y_cur[IDX_H3II]; - data[jistart + 6365] = 0.0 + k[1959]*y_cur[IDX_HCOI] + - k[2427]*y_cur[IDX_H2I]; - data[jistart + 6366] = 0.0 + k[160]*y_cur[IDX_CII] + - k[259]*y_cur[IDX_C2II] + k[260]*y_cur[IDX_CNII] + - k[261]*y_cur[IDX_COII] + k[262]*y_cur[IDX_H2COII] + - k[263]*y_cur[IDX_H2OII] + k[264]*y_cur[IDX_N2II] + - k[265]*y_cur[IDX_NH2II] + k[266]*y_cur[IDX_OII] + - k[267]*y_cur[IDX_O2II] + k[268]*y_cur[IDX_OHII] + - k[359]*y_cur[IDX_HII] + k[440]*y_cur[IDX_H2II] + - k[544]*y_cur[IDX_NII] + k[5778] + k[6078]; - data[jistart + 6367] = 0.0 - k[258]*y_cur[IDX_NOI] - - k[907]*y_cur[IDX_eM] - k[908]*y_cur[IDX_eM] - k[909]*y_cur[IDX_eM] - - k[1891]*y_cur[IDX_CI] - k[1975]*y_cur[IDX_C2HI] - - k[1976]*y_cur[IDX_CH4I] - k[1977]*y_cur[IDX_CH4I] - - k[1978]*y_cur[IDX_CO2I] - k[1979]*y_cur[IDX_H2COI] - - k[1980]*y_cur[IDX_H2COI] - k[1981]*y_cur[IDX_H2COI] - - k[1982]*y_cur[IDX_H2OI] - k[1983]*y_cur[IDX_H2SI] - - k[1984]*y_cur[IDX_H2SI] - k[1985]*y_cur[IDX_H2SI] - - k[1986]*y_cur[IDX_HCNI] - k[1987]*y_cur[IDX_HCOI] - - k[1988]*y_cur[IDX_NH3I] - k[1989]*y_cur[IDX_NH3I] - - k[1990]*y_cur[IDX_O2I] - k[1991]*y_cur[IDX_OI] - - k[1992]*y_cur[IDX_OCSI] - k[1993]*y_cur[IDX_OCSI] - - k[1994]*y_cur[IDX_SI] - k[2428]*y_cur[IDX_H2I] - - k[2836]*y_cur[IDX_HI] - k[3452]*y_cur[IDX_NI] - k[6075] - k[6076] - - k[6077] - k[6316]*y_cur[IDX_GRAINM] - k[6317]*y_cur[IDX_GRAINM] - - k[6318]*y_cur[IDX_GRAINM]; - data[jistart + 6368] = 0.0 + k[3170]*y_cur[IDX_HeII]; - data[jistart + 6369] = 0.0 + k[3172]*y_cur[IDX_HeII]; - data[jistart + 6370] = 0.0 + k[2318]*y_cur[IDX_HII] + - k[3173]*y_cur[IDX_HeII]; - data[jistart + 6371] = 0.0 + k[5633]*y_cur[IDX_CII] + - k[5638]*y_cur[IDX_HeII]; - data[jistart + 6372] = 0.0 + k[3175]*y_cur[IDX_HeII]; - data[jistart + 6373] = 0.0 + k[2837]*y_cur[IDX_HI] + k[6096]; - data[jistart + 6374] = 0.0 - k[1976]*y_cur[IDX_CH2II] - - k[1977]*y_cur[IDX_CH2II] + k[2204]*y_cur[IDX_N2II] + - k[3199]*y_cur[IDX_HeII]; - data[jistart + 6375] = 0.0 + k[6125]; - data[jistart + 6376] = 0.0 + k[2244]*y_cur[IDX_CHI]; - data[jistart + 6377] = 0.0 + k[260]*y_cur[IDX_CH2I]; - data[jistart + 6378] = 0.0 + k[261]*y_cur[IDX_CH2I]; - data[jistart + 6379] = 0.0 - k[1978]*y_cur[IDX_CH2II]; - data[jistart + 6380] = 0.0 - k[6316]*y_cur[IDX_CH2II] - - k[6317]*y_cur[IDX_CH2II] - k[6318]*y_cur[IDX_CH2II]; - data[jistart + 6381] = 0.0 - k[2836]*y_cur[IDX_CH2II] + - k[2837]*y_cur[IDX_CH3II]; - data[jistart + 6382] = 0.0 + k[359]*y_cur[IDX_CH2I] + - k[2318]*y_cur[IDX_CH2NHI] + k[2343]*y_cur[IDX_HCNOI]; - data[jistart + 6383] = 0.0 + k[2427]*y_cur[IDX_CHII] - - k[2428]*y_cur[IDX_CH2II] + k[5548]*y_cur[IDX_CII]; - data[jistart + 6384] = 0.0 + k[440]*y_cur[IDX_CH2I] + - k[2380]*y_cur[IDX_CHI]; - data[jistart + 6385] = 0.0 + k[1390]*y_cur[IDX_CII] - - k[1979]*y_cur[IDX_CH2II] - k[1980]*y_cur[IDX_CH2II] - - k[1981]*y_cur[IDX_CH2II] + k[3221]*y_cur[IDX_HeII]; - data[jistart + 6386] = 0.0 + k[262]*y_cur[IDX_CH2I] + - k[2246]*y_cur[IDX_CHI]; - data[jistart + 6387] = 0.0 + k[1392]*y_cur[IDX_CII] + - k[3224]*y_cur[IDX_HeII]; - data[jistart + 6388] = 0.0 - k[1982]*y_cur[IDX_CH2II]; - data[jistart + 6389] = 0.0 + k[263]*y_cur[IDX_CH2I] + - k[2247]*y_cur[IDX_CHI]; - data[jistart + 6390] = 0.0 - k[1983]*y_cur[IDX_CH2II] - - k[1984]*y_cur[IDX_CH2II] - k[1985]*y_cur[IDX_CH2II]; - data[jistart + 6391] = 0.0 + k[2670]*y_cur[IDX_CHI]; - data[jistart + 6392] = 0.0 + k[2248]*y_cur[IDX_CHI]; - data[jistart + 6393] = 0.0 + k[2249]*y_cur[IDX_CHI]; - data[jistart + 6394] = 0.0 - k[1986]*y_cur[IDX_CH2II]; - data[jistart + 6395] = 0.0 + k[2250]*y_cur[IDX_CHI]; - data[jistart + 6396] = 0.0 + k[2251]*y_cur[IDX_CHI] + - k[2252]*y_cur[IDX_CHI]; - data[jistart + 6397] = 0.0 + k[2343]*y_cur[IDX_HII]; - data[jistart + 6398] = 0.0 + k[1959]*y_cur[IDX_CHII] - - k[1987]*y_cur[IDX_CH2II]; - data[jistart + 6399] = 0.0 + k[2253]*y_cur[IDX_CHI]; - data[jistart + 6400] = 0.0 + k[2254]*y_cur[IDX_CHI]; - data[jistart + 6401] = 0.0 + k[2255]*y_cur[IDX_CHI]; - data[jistart + 6402] = 0.0 + k[3082]*y_cur[IDX_C2H4I] + - k[3170]*y_cur[IDX_CH2CNI] + k[3172]*y_cur[IDX_CH2COI] + - k[3173]*y_cur[IDX_CH2NHI] + k[3175]*y_cur[IDX_CH2PHI] + - k[3199]*y_cur[IDX_CH4I] + k[3221]*y_cur[IDX_H2COI] + - k[3224]*y_cur[IDX_H2CSI] + k[5638]*y_cur[IDX_CH2OHI]; - data[jistart + 6403] = 0.0 - k[3452]*y_cur[IDX_CH2II]; - data[jistart + 6404] = 0.0 + k[544]*y_cur[IDX_CH2I]; - data[jistart + 6405] = 0.0 + k[264]*y_cur[IDX_CH2I] + - k[2204]*y_cur[IDX_CH4I]; - data[jistart + 6406] = 0.0 + k[2257]*y_cur[IDX_CHI]; - data[jistart + 6407] = 0.0 + k[2258]*y_cur[IDX_CHI]; - data[jistart + 6408] = 0.0 + k[265]*y_cur[IDX_CH2I] + - k[2259]*y_cur[IDX_CHI]; - data[jistart + 6409] = 0.0 - k[1988]*y_cur[IDX_CH2II] - - k[1989]*y_cur[IDX_CH2II]; - data[jistart + 6410] = 0.0 - k[258]*y_cur[IDX_CH2II]; - data[jistart + 6411] = 0.0 - k[1991]*y_cur[IDX_CH2II]; - data[jistart + 6412] = 0.0 + k[266]*y_cur[IDX_CH2I]; - data[jistart + 6413] = 0.0 - k[1990]*y_cur[IDX_CH2II]; - data[jistart + 6414] = 0.0 + k[267]*y_cur[IDX_CH2I]; - data[jistart + 6415] = 0.0 + k[2263]*y_cur[IDX_CHI]; - data[jistart + 6416] = 0.0 - k[1992]*y_cur[IDX_CH2II] - - k[1993]*y_cur[IDX_CH2II]; - data[jistart + 6417] = 0.0 + k[268]*y_cur[IDX_CH2I] + - k[2264]*y_cur[IDX_CHI]; - data[jistart + 6418] = 0.0 - k[1994]*y_cur[IDX_CH2II]; - data[jistart + 6419] = 0.0 + k[2267]*y_cur[IDX_CHI]; - data[jistart + 6420] = 0.0 - k[907]*y_cur[IDX_CH2II] - - k[908]*y_cur[IDX_CH2II] - k[909]*y_cur[IDX_CH2II]; - data[jistart + 6421] = 0.0 + k[4914]*y_cur[IDX_C2H4I] - - k[4947]*y_cur[IDX_CH2CCHI]; - data[jistart + 6422] = 0.0 - k[162]*y_cur[IDX_CH2CCHI] - - k[1346]*y_cur[IDX_CH2CCHI] - k[1347]*y_cur[IDX_CH2CCHI]; - data[jistart + 6423] = 0.0 + k[3892]*y_cur[IDX_CH2CCHII]; - data[jistart + 6424] = 0.0 + k[3927]*y_cur[IDX_CH2CCHII]; - data[jistart + 6425] = 0.0 + k[3962]*y_cur[IDX_CH2CCHII]; - data[jistart + 6426] = 0.0 + k[4871]*y_cur[IDX_CH4I]; - data[jistart + 6427] = 0.0 + k[3997]*y_cur[IDX_CH2CCHII]; - data[jistart + 6428] = 0.0 + k[4032]*y_cur[IDX_CH2CCHII]; - data[jistart + 6429] = 0.0 + k[4991]*y_cur[IDX_CH2I]; - data[jistart + 6430] = 0.0 - k[219]*y_cur[IDX_CH2CCHI] - - k[1507]*y_cur[IDX_CH2CCHI] - k[1508]*y_cur[IDX_CH2CCHI]; - data[jistart + 6431] = 0.0 - k[1608]*y_cur[IDX_CH2CCHI] - - k[1609]*y_cur[IDX_CH2CCHI] - k[1610]*y_cur[IDX_CH2CCHI]; - data[jistart + 6432] = 0.0 + k[4914]*y_cur[IDX_CI]; - data[jistart + 6433] = 0.0 - k[232]*y_cur[IDX_CH2CCHI] - - k[1667]*y_cur[IDX_CH2CCHI] - k[1668]*y_cur[IDX_CH2CCHI]; - data[jistart + 6434] = 0.0 + k[4067]*y_cur[IDX_CH2CCHII]; - data[jistart + 6435] = 0.0 + k[4102]*y_cur[IDX_CH2CCHII]; - data[jistart + 6436] = 0.0 - k[1776]*y_cur[IDX_CH2CCHI]; - data[jistart + 6437] = 0.0 - k[1805]*y_cur[IDX_CH2CCHI] - - k[1806]*y_cur[IDX_CH2CCHI]; - data[jistart + 6438] = 0.0 + k[800]*y_cur[IDX_eM] + - k[1811]*y_cur[IDX_CH3CCHI] + k[6478]*y_cur[IDX_GRAINM]; - data[jistart + 6439] = 0.0 + k[803]*y_cur[IDX_eM] + - k[6482]*y_cur[IDX_GRAINM]; - data[jistart + 6440] = 0.0 + k[805]*y_cur[IDX_eM] + - k[6499]*y_cur[IDX_GRAINM]; - data[jistart + 6441] = 0.0 + k[4137]*y_cur[IDX_CH2CCHII]; - data[jistart + 6442] = 0.0 + k[4172]*y_cur[IDX_CH2CCHII]; - data[jistart + 6443] = 0.0 - k[2032]*y_cur[IDX_CH2CCHI]; - data[jistart + 6444] = 0.0 + k[4207]*y_cur[IDX_CH2CCHII]; - data[jistart + 6445] = 0.0 - k[2033]*y_cur[IDX_CH2CCHI] - - k[2034]*y_cur[IDX_CH2CCHI]; - data[jistart + 6446] = 0.0 - k[2035]*y_cur[IDX_CH2CCHI] - - k[2036]*y_cur[IDX_CH2CCHI]; - data[jistart + 6447] = 0.0 + k[4242]*y_cur[IDX_CH2CCHII]; - data[jistart + 6448] = 0.0 + k[4277]*y_cur[IDX_CH2CCHII]; - data[jistart + 6449] = 0.0 - k[2037]*y_cur[IDX_CH2CCHI] - - k[2038]*y_cur[IDX_CH2CCHI]; - data[jistart + 6450] = 0.0 + k[4312]*y_cur[IDX_CH2CCHII]; - data[jistart + 6451] = 0.0 + k[4347]*y_cur[IDX_CH2CCHII]; - data[jistart + 6452] = 0.0 + k[4382]*y_cur[IDX_CH2CCHII]; - data[jistart + 6453] = 0.0 - k[2039]*y_cur[IDX_CH2CCHI] - - k[2040]*y_cur[IDX_CH2CCHI]; - data[jistart + 6454] = 0.0 + k[4417]*y_cur[IDX_CH2CCHII]; - data[jistart + 6455] = 0.0 + k[4452]*y_cur[IDX_CH2CCHII]; - data[jistart + 6456] = 0.0 + k[4487]*y_cur[IDX_CH2CCHII]; - data[jistart + 6457] = 0.0 + k[4522]*y_cur[IDX_CH2CCHII]; - data[jistart + 6458] = 0.0 + k[4557]*y_cur[IDX_CH2CCHII]; - data[jistart + 6459] = 0.0 + k[4592]*y_cur[IDX_CH2CCHII]; - data[jistart + 6460] = 0.0 + k[4627]*y_cur[IDX_CH2CCHII]; - data[jistart + 6461] = 0.0 + k[4991]*y_cur[IDX_C2H2I]; - data[jistart + 6462] = 0.0 - k[162]*y_cur[IDX_CII] - - k[219]*y_cur[IDX_C2H2II] - k[232]*y_cur[IDX_C2H4II] - - k[360]*y_cur[IDX_HII] - k[1346]*y_cur[IDX_CII] - - k[1347]*y_cur[IDX_CII] - k[1507]*y_cur[IDX_C2H2II] - - k[1508]*y_cur[IDX_C2H2II] - k[1608]*y_cur[IDX_C2H3II] - - k[1609]*y_cur[IDX_C2H3II] - k[1610]*y_cur[IDX_C2H3II] - - k[1667]*y_cur[IDX_C2H4II] - k[1668]*y_cur[IDX_C2H4II] - - k[1776]*y_cur[IDX_C3H2II] - k[1805]*y_cur[IDX_C3H3II] - - k[1806]*y_cur[IDX_C3H3II] - k[2029]*y_cur[IDX_CH2CCHII] - - k[2030]*y_cur[IDX_CH2CCHII] - k[2032]*y_cur[IDX_C4HII] - - k[2033]*y_cur[IDX_C4H2II] - k[2034]*y_cur[IDX_C4H2II] - - k[2035]*y_cur[IDX_C4H3II] - k[2036]*y_cur[IDX_C4H3II] - - k[2037]*y_cur[IDX_C5H2II] - k[2038]*y_cur[IDX_C5H2II] - - k[2039]*y_cur[IDX_C6H2II] - k[2040]*y_cur[IDX_C6H2II] - - k[2061]*y_cur[IDX_CH3II] - k[2315]*y_cur[IDX_HII] - - k[2636]*y_cur[IDX_H3II] - k[2785]*y_cur[IDX_H3OII] - - k[2938]*y_cur[IDX_HCOII] - k[3162]*y_cur[IDX_HeII] - - k[3163]*y_cur[IDX_HeII] - k[3164]*y_cur[IDX_HeII] - - k[3863]*y_cur[IDX_SiII] - k[4947]*y_cur[IDX_CI] - - k[5256]*y_cur[IDX_NI] - k[5782] - k[5783] - k[6083] - k[6084] - - k[6950]; - data[jistart + 6463] = 0.0 - k[2029]*y_cur[IDX_CH2CCHI] - - k[2030]*y_cur[IDX_CH2CCHI] + k[3892]*y_cur[IDX_CM] + - k[3927]*y_cur[IDX_C10M] + k[3962]*y_cur[IDX_C10HM] + - k[3997]*y_cur[IDX_C2M] + k[4032]*y_cur[IDX_C2HM] + - k[4067]*y_cur[IDX_C3M] + k[4102]*y_cur[IDX_C3HM] + - k[4137]*y_cur[IDX_C3NM] + k[4172]*y_cur[IDX_C4M] + - k[4207]*y_cur[IDX_C4HM] + k[4242]*y_cur[IDX_C5M] + - k[4277]*y_cur[IDX_C5HM] + k[4312]*y_cur[IDX_C5NM] + - k[4347]*y_cur[IDX_C6M] + k[4382]*y_cur[IDX_C6HM] + - k[4417]*y_cur[IDX_C7M] + k[4452]*y_cur[IDX_C7HM] + - k[4487]*y_cur[IDX_C8M] + k[4522]*y_cur[IDX_C8HM] + - k[4557]*y_cur[IDX_C9M] + k[4592]*y_cur[IDX_C9HM] + - k[4627]*y_cur[IDX_CHM] + k[4662]*y_cur[IDX_CNM] + - k[4697]*y_cur[IDX_HM] + k[4733]*y_cur[IDX_OM] + - k[4768]*y_cur[IDX_O2M] + k[4803]*y_cur[IDX_OHM] + - k[4838]*y_cur[IDX_SM]; - data[jistart + 6464] = 0.0 + k[5781] + k[6081]; - data[jistart + 6465] = 0.0 - k[2061]*y_cur[IDX_CH2CCHI]; - data[jistart + 6466] = 0.0 + k[1811]*y_cur[IDX_C3H4II] + k[5802] + - k[6106]; - data[jistart + 6467] = 0.0 + k[4871]*y_cur[IDX_C2I]; - data[jistart + 6468] = 0.0 + k[4662]*y_cur[IDX_CH2CCHII]; - data[jistart + 6469] = 0.0 + k[8665]*y_cur[IDX_GC2H3I]; - data[jistart + 6470] = 0.0 + k[8665]*y_cur[IDX_GCI]; - data[jistart + 6471] = 0.0 + k[8612]*y_cur[IDX_GHI]; - data[jistart + 6472] = 0.0 + k[7132] + k[7314] + k[7496]; - data[jistart + 6473] = 0.0 + k[8612]*y_cur[IDX_GC3H2I] + - k[8613]*y_cur[IDX_GH2CCCI]; - data[jistart + 6474] = 0.0 + k[8613]*y_cur[IDX_GHI]; - data[jistart + 6475] = 0.0 + k[6478]*y_cur[IDX_C3H4II] + - k[6482]*y_cur[IDX_C3H5II] + k[6499]*y_cur[IDX_C3H6II]; - data[jistart + 6476] = 0.0 - k[360]*y_cur[IDX_CH2CCHI] - - k[2315]*y_cur[IDX_CH2CCHI]; - data[jistart + 6477] = 0.0 + k[4697]*y_cur[IDX_CH2CCHII]; - data[jistart + 6478] = 0.0 - k[2636]*y_cur[IDX_CH2CCHI]; - data[jistart + 6479] = 0.0 - k[2785]*y_cur[IDX_CH2CCHI]; - data[jistart + 6480] = 0.0 - k[2938]*y_cur[IDX_CH2CCHI]; - data[jistart + 6481] = 0.0 - k[3162]*y_cur[IDX_CH2CCHI] - - k[3163]*y_cur[IDX_CH2CCHI] - k[3164]*y_cur[IDX_CH2CCHI]; - data[jistart + 6482] = 0.0 - k[5256]*y_cur[IDX_CH2CCHI]; - data[jistart + 6483] = 0.0 + k[4733]*y_cur[IDX_CH2CCHII]; - data[jistart + 6484] = 0.0 + k[4768]*y_cur[IDX_CH2CCHII]; - data[jistart + 6485] = 0.0 + k[4803]*y_cur[IDX_CH2CCHII]; - data[jistart + 6486] = 0.0 + k[4838]*y_cur[IDX_CH2CCHII]; - data[jistart + 6487] = 0.0 - k[3863]*y_cur[IDX_CH2CCHI]; - data[jistart + 6488] = 0.0 + k[800]*y_cur[IDX_C3H4II] + - k[803]*y_cur[IDX_C3H5II] + k[805]*y_cur[IDX_C3H6II]; - data[jistart + 6489] = 0.0 + k[1854]*y_cur[IDX_C2H4II] - - k[1892]*y_cur[IDX_CH2CCHII] - k[1893]*y_cur[IDX_CH2CCHII]; - data[jistart + 6490] = 0.0 + k[162]*y_cur[IDX_CH2CCHI] + - k[1305]*y_cur[IDX_C2H4I] + k[1306]*y_cur[IDX_C2H5I] + - k[1366]*y_cur[IDX_CH3CCHI]; - data[jistart + 6491] = 0.0 - k[3892]*y_cur[IDX_CH2CCHII]; - data[jistart + 6492] = 0.0 - k[3927]*y_cur[IDX_CH2CCHII]; - data[jistart + 6493] = 0.0 - k[3962]*y_cur[IDX_CH2CCHII]; - data[jistart + 6494] = 0.0 + k[2150]*y_cur[IDX_CH4I]; - data[jistart + 6495] = 0.0 - k[3997]*y_cur[IDX_CH2CCHII]; - data[jistart + 6496] = 0.0 + k[1730]*y_cur[IDX_C2H4II] - - k[1741]*y_cur[IDX_CH2CCHII] - k[1742]*y_cur[IDX_CH2CCHII] + - k[2049]*y_cur[IDX_CH3II]; - data[jistart + 6497] = 0.0 + k[2153]*y_cur[IDX_CH4I]; - data[jistart + 6498] = 0.0 - k[4032]*y_cur[IDX_CH2CCHII]; - data[jistart + 6499] = 0.0 - k[227]*y_cur[IDX_CH2CCHII] + - k[2042]*y_cur[IDX_CH3II] + k[2134]*y_cur[IDX_CH4II]; - data[jistart + 6500] = 0.0 + k[1482]*y_cur[IDX_C2H3I] + - k[1484]*y_cur[IDX_C2H4I] + k[1998]*y_cur[IDX_CH2I]; - data[jistart + 6501] = 0.0 + k[1482]*y_cur[IDX_C2H2II] - - k[1643]*y_cur[IDX_CH2CCHII]; - data[jistart + 6502] = 0.0 + k[1617]*y_cur[IDX_H2CCCI]; - data[jistart + 6503] = 0.0 + k[1305]*y_cur[IDX_CII] + - k[1484]*y_cur[IDX_C2H2II] + k[1690]*y_cur[IDX_C3HII] - - k[1706]*y_cur[IDX_CH2CCHII] + k[2047]*y_cur[IDX_CH3II]; - data[jistart + 6504] = 0.0 + k[1730]*y_cur[IDX_C2HI] + - k[1854]*y_cur[IDX_CI]; - data[jistart + 6505] = 0.0 + k[1306]*y_cur[IDX_CII]; - data[jistart + 6506] = 0.0 - k[4067]*y_cur[IDX_CH2CCHII]; - data[jistart + 6507] = 0.0 - k[1828]*y_cur[IDX_CH2CCHII] - - k[1829]*y_cur[IDX_CH2CCHII]; - data[jistart + 6508] = 0.0 + k[1690]*y_cur[IDX_C2H4I] + - k[5551]*y_cur[IDX_H2I]; - data[jistart + 6509] = 0.0 - k[4102]*y_cur[IDX_CH2CCHII]; - data[jistart + 6510] = 0.0 - k[1794]*y_cur[IDX_CH2CCHII] - - k[1795]*y_cur[IDX_CH2CCHII]; - data[jistart + 6511] = 0.0 - k[4137]*y_cur[IDX_CH2CCHII]; - data[jistart + 6512] = 0.0 - k[4172]*y_cur[IDX_CH2CCHII]; - data[jistart + 6513] = 0.0 - k[2020]*y_cur[IDX_CH2CCHII] - - k[2021]*y_cur[IDX_CH2CCHII]; - data[jistart + 6514] = 0.0 - k[4207]*y_cur[IDX_CH2CCHII]; - data[jistart + 6515] = 0.0 - k[2031]*y_cur[IDX_CH2CCHII] + - k[2081]*y_cur[IDX_CH3II] - k[5531]*y_cur[IDX_CH2CCHII]; - data[jistart + 6516] = 0.0 - k[4242]*y_cur[IDX_CH2CCHII]; - data[jistart + 6517] = 0.0 - k[2024]*y_cur[IDX_CH2CCHII] - - k[2025]*y_cur[IDX_CH2CCHII]; - data[jistart + 6518] = 0.0 - k[4277]*y_cur[IDX_CH2CCHII]; - data[jistart + 6519] = 0.0 - k[2022]*y_cur[IDX_CH2CCHII] - - k[2023]*y_cur[IDX_CH2CCHII]; - data[jistart + 6520] = 0.0 - k[4312]*y_cur[IDX_CH2CCHII]; - data[jistart + 6521] = 0.0 - k[4347]*y_cur[IDX_CH2CCHII]; - data[jistart + 6522] = 0.0 - k[2027]*y_cur[IDX_CH2CCHII] - - k[2028]*y_cur[IDX_CH2CCHII]; - data[jistart + 6523] = 0.0 - k[4382]*y_cur[IDX_CH2CCHII]; - data[jistart + 6524] = 0.0 - k[2026]*y_cur[IDX_CH2CCHII]; - data[jistart + 6525] = 0.0 - k[4417]*y_cur[IDX_CH2CCHII]; - data[jistart + 6526] = 0.0 - k[4452]*y_cur[IDX_CH2CCHII]; - data[jistart + 6527] = 0.0 - k[4487]*y_cur[IDX_CH2CCHII]; - data[jistart + 6528] = 0.0 - k[4522]*y_cur[IDX_CH2CCHII]; - data[jistart + 6529] = 0.0 - k[4557]*y_cur[IDX_CH2CCHII]; - data[jistart + 6530] = 0.0 - k[4592]*y_cur[IDX_CH2CCHII]; - data[jistart + 6531] = 0.0 - k[4627]*y_cur[IDX_CH2CCHII]; - data[jistart + 6532] = 0.0 + k[1998]*y_cur[IDX_C2H2II]; - data[jistart + 6533] = 0.0 + k[162]*y_cur[IDX_CII] - - k[2029]*y_cur[IDX_CH2CCHII] - k[2030]*y_cur[IDX_CH2CCHII]; - data[jistart + 6534] = 0.0 - k[227]*y_cur[IDX_C2H2I] - - k[910]*y_cur[IDX_eM] - k[911]*y_cur[IDX_eM] - - k[1643]*y_cur[IDX_C2H3I] - k[1706]*y_cur[IDX_C2H4I] - - k[1741]*y_cur[IDX_C2HI] - k[1742]*y_cur[IDX_C2HI] - - k[1794]*y_cur[IDX_C3H2I] - k[1795]*y_cur[IDX_C3H2I] - - k[1828]*y_cur[IDX_C3HI] - k[1829]*y_cur[IDX_C3HI] - - k[1892]*y_cur[IDX_CI] - k[1893]*y_cur[IDX_CI] - - k[2020]*y_cur[IDX_C4HI] - k[2021]*y_cur[IDX_C4HI] - - k[2022]*y_cur[IDX_C5H2I] - k[2023]*y_cur[IDX_C5H2I] - - k[2024]*y_cur[IDX_C5HI] - k[2025]*y_cur[IDX_C5HI] - - k[2026]*y_cur[IDX_C6H2I] - k[2027]*y_cur[IDX_C6HI] - - k[2028]*y_cur[IDX_C6HI] - k[2029]*y_cur[IDX_CH2CCHI] - - k[2030]*y_cur[IDX_CH2CCHI] - k[2031]*y_cur[IDX_C4H2I] - - k[2485]*y_cur[IDX_H2CCCI] - k[2486]*y_cur[IDX_H2CCCI] - - k[3453]*y_cur[IDX_NI] - k[3726]*y_cur[IDX_OI] - - k[3838]*y_cur[IDX_SI] - k[3879]*y_cur[IDX_SiI] - - k[3880]*y_cur[IDX_SiI] - k[3892]*y_cur[IDX_CM] - - k[3927]*y_cur[IDX_C10M] - k[3962]*y_cur[IDX_C10HM] - - k[3997]*y_cur[IDX_C2M] - k[4032]*y_cur[IDX_C2HM] - - k[4067]*y_cur[IDX_C3M] - k[4102]*y_cur[IDX_C3HM] - - k[4137]*y_cur[IDX_C3NM] - k[4172]*y_cur[IDX_C4M] - - k[4207]*y_cur[IDX_C4HM] - k[4242]*y_cur[IDX_C5M] - - k[4277]*y_cur[IDX_C5HM] - k[4312]*y_cur[IDX_C5NM] - - k[4347]*y_cur[IDX_C6M] - k[4382]*y_cur[IDX_C6HM] - - k[4417]*y_cur[IDX_C7M] - k[4452]*y_cur[IDX_C7HM] - - k[4487]*y_cur[IDX_C8M] - k[4522]*y_cur[IDX_C8HM] - - k[4557]*y_cur[IDX_C9M] - k[4592]*y_cur[IDX_C9HM] - - k[4627]*y_cur[IDX_CHM] - k[4662]*y_cur[IDX_CNM] - - k[4697]*y_cur[IDX_HM] - k[4733]*y_cur[IDX_OM] - - k[4768]*y_cur[IDX_O2M] - k[4803]*y_cur[IDX_OHM] - - k[4838]*y_cur[IDX_SM] - k[5530]*y_cur[IDX_H2I] - - k[5531]*y_cur[IDX_C4H2I] - k[6470]*y_cur[IDX_GRAINM] - - k[6471]*y_cur[IDX_GRAINM]; - data[jistart + 6535] = 0.0 + k[3166]*y_cur[IDX_HeII]; - data[jistart + 6536] = 0.0 + k[2042]*y_cur[IDX_C2H2I] + - k[2047]*y_cur[IDX_C2H4I] + k[2049]*y_cur[IDX_C2HI] + - k[2081]*y_cur[IDX_C4H2I]; - data[jistart + 6537] = 0.0 + k[1366]*y_cur[IDX_CII] + - k[2325]*y_cur[IDX_HII] + k[2647]*y_cur[IDX_H3II] + - k[3187]*y_cur[IDX_HeII]; - data[jistart + 6538] = 0.0 + k[2150]*y_cur[IDX_C2II] + - k[2153]*y_cur[IDX_C2HII]; - data[jistart + 6539] = 0.0 + k[2134]*y_cur[IDX_C2H2I]; - data[jistart + 6540] = 0.0 - k[4662]*y_cur[IDX_CH2CCHII]; - data[jistart + 6541] = 0.0 - k[6470]*y_cur[IDX_CH2CCHII] - - k[6471]*y_cur[IDX_CH2CCHII]; - data[jistart + 6542] = 0.0 + k[2325]*y_cur[IDX_CH3CCHI]; - data[jistart + 6543] = 0.0 - k[4697]*y_cur[IDX_CH2CCHII]; - data[jistart + 6544] = 0.0 - k[5530]*y_cur[IDX_CH2CCHII] + + data[jistart + 8118] = 0.0 - k[4618]*y_cur[IDX_C9HM]; + data[jistart + 8119] = 0.0 - k[4619]*y_cur[IDX_C9HM]; + data[jistart + 8120] = 0.0 + k[5606]*y_cur[IDX_eM]; + data[jistart + 8121] = 0.0 - k[4595]*y_cur[IDX_C9HM]; + data[jistart + 8122] = 0.0 - k[4607]*y_cur[IDX_C9HM]; + data[jistart + 8123] = 0.0 - k[4613]*y_cur[IDX_C9HM]; + data[jistart + 8124] = 0.0 - k[4590]*y_cur[IDX_C9HM]; + data[jistart + 8125] = 0.0 - k[4609]*y_cur[IDX_C9HM]; + data[jistart + 8126] = 0.0 - k[4616]*y_cur[IDX_C9HM]; + data[jistart + 8127] = 0.0 - k[4592]*y_cur[IDX_C9HM]; + data[jistart + 8128] = 0.0 - k[4598]*y_cur[IDX_C9HM]; + data[jistart + 8129] = 0.0 - k[4608]*y_cur[IDX_C9HM]; + data[jistart + 8130] = 0.0 - k[4597]*y_cur[IDX_C9HM]; + data[jistart + 8131] = 0.0 - k[4612]*y_cur[IDX_C9HM]; + data[jistart + 8132] = 0.0 - k[4614]*y_cur[IDX_C9HM]; + data[jistart + 8133] = 0.0 - k[4589]*y_cur[IDX_C9HM]; + data[jistart + 8134] = 0.0 - k[4602]*y_cur[IDX_C9HM] - k[4603]*y_cur[IDX_C9HM]; + data[jistart + 8135] = 0.0 - k[4610]*y_cur[IDX_C9HM]; + data[jistart + 8136] = 0.0 - k[4611]*y_cur[IDX_C9HM]; + data[jistart + 8137] = 0.0 - k[4617]*y_cur[IDX_C9HM]; + data[jistart + 8138] = 0.0 - k[4615]*y_cur[IDX_C9HM]; + data[jistart + 8139] = 0.0 - k[4588]*y_cur[IDX_C9HM]; + data[jistart + 8140] = 0.0 - k[4587]*y_cur[IDX_C9HM]; + data[jistart + 8141] = 0.0 - k[4593]*y_cur[IDX_C9HM]; + data[jistart + 8142] = 0.0 - k[121]*y_cur[IDX_C9HM] - k[3447]*y_cur[IDX_C9HM] - + k[3448]*y_cur[IDX_C9HM]; + data[jistart + 8143] = 0.0 - k[4600]*y_cur[IDX_C9HM]; + data[jistart + 8144] = 0.0 + k[3681]*y_cur[IDX_C10HM] - k[3723]*y_cur[IDX_C9HM]; + data[jistart + 8145] = 0.0 - k[4606]*y_cur[IDX_C9HM]; + data[jistart + 8146] = 0.0 - k[4586]*y_cur[IDX_C9HM]; + data[jistart + 8147] = 0.0 - k[4596]*y_cur[IDX_C9HM]; + data[jistart + 8148] = 0.0 - k[54]*y_cur[IDX_C9HM]; + data[jistart + 8149] = 0.0 - k[4604]*y_cur[IDX_C9HM] - k[4605]*y_cur[IDX_C9HM]; + data[jistart + 8150] = 0.0 - k[4599]*y_cur[IDX_C9HM]; + data[jistart + 8151] = 0.0 + k[5606]*y_cur[IDX_C9HI]; + data[jistart + 8152] = 0.0 - k[104]*y_cur[IDX_C9HM]; + data[jistart + 8153] = 0.0 - k[3926]*y_cur[IDX_C10M]; + data[jistart + 8154] = 0.0 - k[3929]*y_cur[IDX_C10M]; + data[jistart + 8155] = 0.0 - k[3955]*y_cur[IDX_C10M]; + data[jistart + 8156] = 0.0 - k[3936]*y_cur[IDX_C10M]; + data[jistart + 8157] = 0.0 - k[37]*y_cur[IDX_CI] - k[85]*y_cur[IDX_HI] - + k[3377]*y_cur[IDX_NI] - k[3378]*y_cur[IDX_NI] - + k[3379]*y_cur[IDX_NI] - k[3380]*y_cur[IDX_NI] - + k[3678]*y_cur[IDX_OI] - k[3921]*y_cur[IDX_CII] - + k[3922]*y_cur[IDX_C2H2II] - k[3923]*y_cur[IDX_C2H3II] - + k[3924]*y_cur[IDX_C4H2II] - k[3925]*y_cur[IDX_C4H3II] - + k[3926]*y_cur[IDX_C4SII] - k[3927]*y_cur[IDX_CH2CCHII] - + k[3928]*y_cur[IDX_CH3II] - k[3929]*y_cur[IDX_CNCII] - + k[3930]*y_cur[IDX_FeII] - k[3931]*y_cur[IDX_HII] - + k[3932]*y_cur[IDX_H2COII] - k[3933]*y_cur[IDX_H2SII] - + k[3934]*y_cur[IDX_H3II] - k[3935]*y_cur[IDX_H3OII] - + k[3936]*y_cur[IDX_HC2SII] - k[3937]*y_cur[IDX_HCNHII] - + k[3938]*y_cur[IDX_HCNHII] - k[3939]*y_cur[IDX_HCOII] - + k[3940]*y_cur[IDX_HCOII] - k[3941]*y_cur[IDX_HeII] - + k[3942]*y_cur[IDX_MgII] - k[3943]*y_cur[IDX_NII] - + k[3944]*y_cur[IDX_N2HII] - k[3945]*y_cur[IDX_NH3II] - + k[3946]*y_cur[IDX_NH4II] - k[3947]*y_cur[IDX_NOII] - + k[3948]*y_cur[IDX_NaII] - k[3949]*y_cur[IDX_OII] - + k[3950]*y_cur[IDX_SII] - k[3951]*y_cur[IDX_SOII] - + k[3952]*y_cur[IDX_SiII] - k[3953]*y_cur[IDX_SiOII] - + k[3954]*y_cur[IDX_SiOHII] - k[3955]*y_cur[IDX_SiSII] - k[5687] - + k[5949]; + data[jistart + 8158] = 0.0 - k[3953]*y_cur[IDX_C10M]; + data[jistart + 8159] = 0.0 - k[3954]*y_cur[IDX_C10M]; + data[jistart + 8160] = 0.0 - k[3930]*y_cur[IDX_C10M]; + data[jistart + 8161] = 0.0 - k[3942]*y_cur[IDX_C10M]; + data[jistart + 8162] = 0.0 - k[3948]*y_cur[IDX_C10M]; + data[jistart + 8163] = 0.0 + k[5587]*y_cur[IDX_eM]; + data[jistart + 8164] = 0.0 - k[3925]*y_cur[IDX_C10M]; + data[jistart + 8165] = 0.0 - k[3944]*y_cur[IDX_C10M]; + data[jistart + 8166] = 0.0 - k[3951]*y_cur[IDX_C10M]; + data[jistart + 8167] = 0.0 - k[3927]*y_cur[IDX_C10M]; + data[jistart + 8168] = 0.0 - k[3933]*y_cur[IDX_C10M]; + data[jistart + 8169] = 0.0 - k[3943]*y_cur[IDX_C10M]; + data[jistart + 8170] = 0.0 - k[3932]*y_cur[IDX_C10M]; + data[jistart + 8171] = 0.0 - k[3947]*y_cur[IDX_C10M]; + data[jistart + 8172] = 0.0 - k[3949]*y_cur[IDX_C10M]; + data[jistart + 8173] = 0.0 - k[3924]*y_cur[IDX_C10M]; + data[jistart + 8174] = 0.0 - k[3937]*y_cur[IDX_C10M] - k[3938]*y_cur[IDX_C10M]; + data[jistart + 8175] = 0.0 - k[3945]*y_cur[IDX_C10M]; + data[jistart + 8176] = 0.0 - k[3946]*y_cur[IDX_C10M]; + data[jistart + 8177] = 0.0 - k[3952]*y_cur[IDX_C10M]; + data[jistart + 8178] = 0.0 - k[3950]*y_cur[IDX_C10M]; + data[jistart + 8179] = 0.0 - k[3923]*y_cur[IDX_C10M]; + data[jistart + 8180] = 0.0 - k[3922]*y_cur[IDX_C10M]; + data[jistart + 8181] = 0.0 - k[3928]*y_cur[IDX_C10M]; + data[jistart + 8182] = 0.0 - k[3377]*y_cur[IDX_C10M] - k[3378]*y_cur[IDX_C10M] - + k[3379]*y_cur[IDX_C10M] - k[3380]*y_cur[IDX_C10M]; + data[jistart + 8183] = 0.0 - k[3935]*y_cur[IDX_C10M]; + data[jistart + 8184] = 0.0 - k[3678]*y_cur[IDX_C10M]; + data[jistart + 8185] = 0.0 - k[3941]*y_cur[IDX_C10M]; + data[jistart + 8186] = 0.0 - k[3921]*y_cur[IDX_C10M]; + data[jistart + 8187] = 0.0 - k[3931]*y_cur[IDX_C10M]; + data[jistart + 8188] = 0.0 - k[37]*y_cur[IDX_C10M]; + data[jistart + 8189] = 0.0 - k[3939]*y_cur[IDX_C10M] - k[3940]*y_cur[IDX_C10M]; + data[jistart + 8190] = 0.0 - k[3934]*y_cur[IDX_C10M]; + data[jistart + 8191] = 0.0 + k[5587]*y_cur[IDX_C10I]; + data[jistart + 8192] = 0.0 - k[85]*y_cur[IDX_C10M]; + data[jistart + 8193] = 0.0 - k[4276]*y_cur[IDX_C5HM]; + data[jistart + 8194] = 0.0 - k[4279]*y_cur[IDX_C5HM]; + data[jistart + 8195] = 0.0 - k[4305]*y_cur[IDX_C5HM]; + data[jistart + 8196] = 0.0 - k[4286]*y_cur[IDX_C5HM]; + data[jistart + 8197] = 0.0 + k[1847]*y_cur[IDX_CI]; + data[jistart + 8198] = 0.0 + k[3709]*y_cur[IDX_OI]; + data[jistart + 8199] = 0.0 - k[46]*y_cur[IDX_CI] - k[95]*y_cur[IDX_HI] - + k[117]*y_cur[IDX_NI] - k[3413]*y_cur[IDX_NI] - k[3414]*y_cur[IDX_NI] + - k[3705]*y_cur[IDX_OI] - k[4271]*y_cur[IDX_CII] - + k[4272]*y_cur[IDX_C2H2II] - k[4273]*y_cur[IDX_C2H3II] - + k[4274]*y_cur[IDX_C4H2II] - k[4275]*y_cur[IDX_C4H3II] - + k[4276]*y_cur[IDX_C4SII] - k[4277]*y_cur[IDX_CH2CCHII] - + k[4278]*y_cur[IDX_CH3II] - k[4279]*y_cur[IDX_CNCII] - + k[4280]*y_cur[IDX_FeII] - k[4281]*y_cur[IDX_HII] - + k[4282]*y_cur[IDX_H2COII] - k[4283]*y_cur[IDX_H2SII] - + k[4284]*y_cur[IDX_H3II] - k[4285]*y_cur[IDX_H3OII] - + k[4286]*y_cur[IDX_HC2SII] - k[4287]*y_cur[IDX_HCNHII] - + k[4288]*y_cur[IDX_HCNHII] - k[4289]*y_cur[IDX_HCOII] - + k[4290]*y_cur[IDX_HCOII] - k[4291]*y_cur[IDX_HeII] - + k[4292]*y_cur[IDX_MgII] - k[4293]*y_cur[IDX_NII] - + k[4294]*y_cur[IDX_N2HII] - k[4295]*y_cur[IDX_NH3II] - + k[4296]*y_cur[IDX_NH4II] - k[4297]*y_cur[IDX_NOII] - + k[4298]*y_cur[IDX_NaII] - k[4299]*y_cur[IDX_OII] - + k[4300]*y_cur[IDX_SII] - k[4301]*y_cur[IDX_SOII] - + k[4302]*y_cur[IDX_SiII] - k[4303]*y_cur[IDX_SiOII] - + k[4304]*y_cur[IDX_SiOHII] - k[4305]*y_cur[IDX_SiSII] - k[5739] - + k[6024]; + data[jistart + 8200] = 0.0 - k[4303]*y_cur[IDX_C5HM]; + data[jistart + 8201] = 0.0 - k[4304]*y_cur[IDX_C5HM]; + data[jistart + 8202] = 0.0 - k[4280]*y_cur[IDX_C5HM]; + data[jistart + 8203] = 0.0 - k[4292]*y_cur[IDX_C5HM]; + data[jistart + 8204] = 0.0 - k[4298]*y_cur[IDX_C5HM]; + data[jistart + 8205] = 0.0 - k[4275]*y_cur[IDX_C5HM]; + data[jistart + 8206] = 0.0 - k[4294]*y_cur[IDX_C5HM]; + data[jistart + 8207] = 0.0 - k[4301]*y_cur[IDX_C5HM]; + data[jistart + 8208] = 0.0 - k[4277]*y_cur[IDX_C5HM]; + data[jistart + 8209] = 0.0 + k[5597]*y_cur[IDX_eM]; + data[jistart + 8210] = 0.0 - k[4283]*y_cur[IDX_C5HM]; + data[jistart + 8211] = 0.0 - k[4293]*y_cur[IDX_C5HM]; + data[jistart + 8212] = 0.0 - k[4282]*y_cur[IDX_C5HM]; + data[jistart + 8213] = 0.0 - k[4297]*y_cur[IDX_C5HM]; + data[jistart + 8214] = 0.0 - k[4299]*y_cur[IDX_C5HM]; + data[jistart + 8215] = 0.0 - k[4274]*y_cur[IDX_C5HM]; + data[jistart + 8216] = 0.0 - k[4287]*y_cur[IDX_C5HM] - k[4288]*y_cur[IDX_C5HM]; + data[jistart + 8217] = 0.0 - k[4295]*y_cur[IDX_C5HM]; + data[jistart + 8218] = 0.0 - k[4296]*y_cur[IDX_C5HM]; + data[jistart + 8219] = 0.0 - k[4302]*y_cur[IDX_C5HM]; + data[jistart + 8220] = 0.0 - k[4300]*y_cur[IDX_C5HM]; + data[jistart + 8221] = 0.0 - k[4273]*y_cur[IDX_C5HM]; + data[jistart + 8222] = 0.0 - k[4272]*y_cur[IDX_C5HM]; + data[jistart + 8223] = 0.0 - k[4278]*y_cur[IDX_C5HM]; + data[jistart + 8224] = 0.0 - k[117]*y_cur[IDX_C5HM] - k[3413]*y_cur[IDX_C5HM] - + k[3414]*y_cur[IDX_C5HM]; + data[jistart + 8225] = 0.0 - k[4285]*y_cur[IDX_C5HM]; + data[jistart + 8226] = 0.0 - k[3705]*y_cur[IDX_C5HM] + k[3709]*y_cur[IDX_C6HM]; + data[jistart + 8227] = 0.0 - k[4291]*y_cur[IDX_C5HM]; + data[jistart + 8228] = 0.0 - k[4271]*y_cur[IDX_C5HM]; + data[jistart + 8229] = 0.0 - k[4281]*y_cur[IDX_C5HM]; + data[jistart + 8230] = 0.0 - k[46]*y_cur[IDX_C5HM] + k[1847]*y_cur[IDX_C10HM]; + data[jistart + 8231] = 0.0 - k[4289]*y_cur[IDX_C5HM] - k[4290]*y_cur[IDX_C5HM]; + data[jistart + 8232] = 0.0 - k[4284]*y_cur[IDX_C5HM]; + data[jistart + 8233] = 0.0 + k[5597]*y_cur[IDX_C5HI]; + data[jistart + 8234] = 0.0 - k[95]*y_cur[IDX_C5HM]; + data[jistart + 8235] = 0.0 - k[4311]*y_cur[IDX_C5NM]; + data[jistart + 8236] = 0.0 - k[4314]*y_cur[IDX_C5NM]; + data[jistart + 8237] = 0.0 - k[4340]*y_cur[IDX_C5NM]; + data[jistart + 8238] = 0.0 - k[4321]*y_cur[IDX_C5NM]; + data[jistart + 8239] = 0.0 + k[3378]*y_cur[IDX_NI]; + data[jistart + 8240] = 0.0 - k[96]*y_cur[IDX_HI] - k[131]*y_cur[IDX_OI] - + k[4306]*y_cur[IDX_CII] - k[4307]*y_cur[IDX_C2H2II] - + k[4308]*y_cur[IDX_C2H3II] - k[4309]*y_cur[IDX_C4H2II] - + k[4310]*y_cur[IDX_C4H3II] - k[4311]*y_cur[IDX_C4SII] - + k[4312]*y_cur[IDX_CH2CCHII] - k[4313]*y_cur[IDX_CH3II] - + k[4314]*y_cur[IDX_CNCII] - k[4315]*y_cur[IDX_FeII] - + k[4316]*y_cur[IDX_HII] - k[4317]*y_cur[IDX_H2COII] - + k[4318]*y_cur[IDX_H2SII] - k[4319]*y_cur[IDX_H3II] - + k[4320]*y_cur[IDX_H3OII] - k[4321]*y_cur[IDX_HC2SII] - + k[4322]*y_cur[IDX_HCNHII] - k[4323]*y_cur[IDX_HCNHII] - + k[4324]*y_cur[IDX_HCOII] - k[4325]*y_cur[IDX_HCOII] - + k[4326]*y_cur[IDX_HeII] - k[4327]*y_cur[IDX_MgII] - + k[4328]*y_cur[IDX_NII] - k[4329]*y_cur[IDX_N2HII] - + k[4330]*y_cur[IDX_NH3II] - k[4331]*y_cur[IDX_NH4II] - + k[4332]*y_cur[IDX_NOII] - k[4333]*y_cur[IDX_NaII] - + k[4334]*y_cur[IDX_OII] - k[4335]*y_cur[IDX_SII] - + k[4336]*y_cur[IDX_SOII] - k[4337]*y_cur[IDX_SiII] - + k[4338]*y_cur[IDX_SiOII] - k[4339]*y_cur[IDX_SiOHII] - + k[4340]*y_cur[IDX_SiSII] - k[5745] - k[6030]; + data[jistart + 8241] = 0.0 + k[3443]*y_cur[IDX_NI]; + data[jistart + 8242] = 0.0 + k[3437]*y_cur[IDX_NI]; + data[jistart + 8243] = 0.0 + k[3426]*y_cur[IDX_NI]; + data[jistart + 8244] = 0.0 - k[4338]*y_cur[IDX_C5NM]; + data[jistart + 8245] = 0.0 - k[4339]*y_cur[IDX_C5NM]; + data[jistart + 8246] = 0.0 + k[5598]*y_cur[IDX_eM]; + data[jistart + 8247] = 0.0 - k[4315]*y_cur[IDX_C5NM]; + data[jistart + 8248] = 0.0 - k[4327]*y_cur[IDX_C5NM]; + data[jistart + 8249] = 0.0 - k[4333]*y_cur[IDX_C5NM]; + data[jistart + 8250] = 0.0 - k[4310]*y_cur[IDX_C5NM]; + data[jistart + 8251] = 0.0 - k[4329]*y_cur[IDX_C5NM]; + data[jistart + 8252] = 0.0 - k[4336]*y_cur[IDX_C5NM]; + data[jistart + 8253] = 0.0 - k[4312]*y_cur[IDX_C5NM]; + data[jistart + 8254] = 0.0 - k[4318]*y_cur[IDX_C5NM]; + data[jistart + 8255] = 0.0 - k[4328]*y_cur[IDX_C5NM]; + data[jistart + 8256] = 0.0 - k[4317]*y_cur[IDX_C5NM]; + data[jistart + 8257] = 0.0 - k[4332]*y_cur[IDX_C5NM]; + data[jistart + 8258] = 0.0 - k[4334]*y_cur[IDX_C5NM]; + data[jistart + 8259] = 0.0 - k[4309]*y_cur[IDX_C5NM]; + data[jistart + 8260] = 0.0 - k[4322]*y_cur[IDX_C5NM] - k[4323]*y_cur[IDX_C5NM]; + data[jistart + 8261] = 0.0 - k[4330]*y_cur[IDX_C5NM]; + data[jistart + 8262] = 0.0 - k[4331]*y_cur[IDX_C5NM]; + data[jistart + 8263] = 0.0 - k[4337]*y_cur[IDX_C5NM]; + data[jistart + 8264] = 0.0 - k[4335]*y_cur[IDX_C5NM]; + data[jistart + 8265] = 0.0 - k[4308]*y_cur[IDX_C5NM]; + data[jistart + 8266] = 0.0 - k[4307]*y_cur[IDX_C5NM]; + data[jistart + 8267] = 0.0 - k[4313]*y_cur[IDX_C5NM]; + data[jistart + 8268] = 0.0 + k[3378]*y_cur[IDX_C10M] + k[3426]*y_cur[IDX_C7M] + + k[3437]*y_cur[IDX_C8M] + k[3443]*y_cur[IDX_C9M]; + data[jistart + 8269] = 0.0 - k[4320]*y_cur[IDX_C5NM]; + data[jistart + 8270] = 0.0 - k[131]*y_cur[IDX_C5NM]; + data[jistart + 8271] = 0.0 - k[4326]*y_cur[IDX_C5NM]; + data[jistart + 8272] = 0.0 - k[4306]*y_cur[IDX_C5NM]; + data[jistart + 8273] = 0.0 - k[4316]*y_cur[IDX_C5NM]; + data[jistart + 8274] = 0.0 - k[4324]*y_cur[IDX_C5NM] - k[4325]*y_cur[IDX_C5NM]; + data[jistart + 8275] = 0.0 - k[4319]*y_cur[IDX_C5NM]; + data[jistart + 8276] = 0.0 + k[5598]*y_cur[IDX_C5NI]; + data[jistart + 8277] = 0.0 - k[96]*y_cur[IDX_C5NM]; + data[jistart + 8278] = 0.0 + k[7120] + k[7302] + k[7484]; + data[jistart + 8279] = 0.0 + k[2581]*y_cur[IDX_H2SI]; + data[jistart + 8280] = 0.0 + k[3227]*y_cur[IDX_HeII] + k[5840] + k[5840] + k[6162] + + k[6162]; + data[jistart + 8281] = 0.0 + k[1022]*y_cur[IDX_eM] + k[1022]*y_cur[IDX_eM] + + k[6764]*y_cur[IDX_GRAINM] + k[6764]*y_cur[IDX_GRAINM]; + data[jistart + 8282] = 0.0 + k[1147]*y_cur[IDX_eM] + k[6719]*y_cur[IDX_GRAINM]; + data[jistart + 8283] = 0.0 + k[1139]*y_cur[IDX_eM] + k[6758]*y_cur[IDX_GRAINM]; + data[jistart + 8284] = 0.0 + k[3271]*y_cur[IDX_HeII] + k[5874] + k[6208]; + data[jistart + 8285] = 0.0 + k[5199]*y_cur[IDX_HI]; + data[jistart + 8286] = 0.0 + k[8607]*y_cur[IDX_GHI]; + data[jistart + 8287] = 0.0 + k[5408]*y_cur[IDX_OI]; + data[jistart + 8288] = 0.0 + k[5188]*y_cur[IDX_HI]; + data[jistart + 8289] = 0.0 + k[1046]*y_cur[IDX_eM] + k[1047]*y_cur[IDX_eM] + + k[6451]*y_cur[IDX_GRAINM] + k[6452]*y_cur[IDX_GRAINM]; + data[jistart + 8290] = 0.0 + k[3823]*y_cur[IDX_SII] + k[3856]*y_cur[IDX_SOII]; + data[jistart + 8291] = 0.0 + k[505]*y_cur[IDX_FeI] + k[534]*y_cur[IDX_MgI] + + k[609]*y_cur[IDX_NH3I] + k[627]*y_cur[IDX_NOI] + + k[638]*y_cur[IDX_NaI] + k[710]*y_cur[IDX_SI] + k[720]*y_cur[IDX_SiI]; + data[jistart + 8292] = 0.0 + k[5197]*y_cur[IDX_HI]; + data[jistart + 8293] = 0.0 + k[3517]*y_cur[IDX_H2SI]; + data[jistart + 8294] = 0.0 + k[109]*y_cur[IDX_HI]; + data[jistart + 8295] = 0.0 + k[2849]*y_cur[IDX_HI]; + data[jistart + 8296] = 0.0 + k[2281]*y_cur[IDX_H2SI]; + data[jistart + 8297] = 0.0 - k[397]*y_cur[IDX_HII] - k[1415]*y_cur[IDX_CII] - + k[2084]*y_cur[IDX_CH3II] - k[2353]*y_cur[IDX_HII] - + k[2716]*y_cur[IDX_H3II] - k[2977]*y_cur[IDX_HCOII] - + k[3273]*y_cur[IDX_HeII] - k[4965]*y_cur[IDX_CI] - + k[4966]*y_cur[IDX_CI] - k[5140]*y_cur[IDX_H2I] - + k[5178]*y_cur[IDX_HI] - k[5219]*y_cur[IDX_HSI] - + k[5219]*y_cur[IDX_HSI] - k[5219]*y_cur[IDX_HSI] - + k[5219]*y_cur[IDX_HSI] - k[5271]*y_cur[IDX_NI] - + k[5272]*y_cur[IDX_NI] - k[5415]*y_cur[IDX_OI] - + k[5416]*y_cur[IDX_OI] - k[5488]*y_cur[IDX_SI] - k[5875] - k[6209] - + k[6938]; + data[jistart + 8298] = 0.0 + k[5462]*y_cur[IDX_OHI]; + data[jistart + 8299] = 0.0 + k[2511]*y_cur[IDX_H2SI]; + data[jistart + 8300] = 0.0 + k[505]*y_cur[IDX_HSII]; + data[jistart + 8301] = 0.0 + k[534]*y_cur[IDX_HSII]; + data[jistart + 8302] = 0.0 + k[638]*y_cur[IDX_HSII]; + data[jistart + 8303] = 0.0 + k[5324]*y_cur[IDX_SI]; + data[jistart + 8304] = 0.0 + k[5102]*y_cur[IDX_CHI] + k[5200]*y_cur[IDX_HI]; + data[jistart + 8305] = 0.0 + k[3856]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 8306] = 0.0 + k[1019]*y_cur[IDX_eM] + k[2544]*y_cur[IDX_H2OI] + + k[2574]*y_cur[IDX_H2SI] + k[3576]*y_cur[IDX_NH3I] + + k[6446]*y_cur[IDX_GRAINM]; + data[jistart + 8307] = 0.0 + k[3348]*y_cur[IDX_H2SI]; + data[jistart + 8308] = 0.0 + k[3830]*y_cur[IDX_SII]; + data[jistart + 8309] = 0.0 + k[3551]*y_cur[IDX_H2SI]; + data[jistart + 8310] = 0.0 + k[1715]*y_cur[IDX_SII]; + data[jistart + 8311] = 0.0 + k[1519]*y_cur[IDX_C2H2II] + k[2281]*y_cur[IDX_COII] + + k[2511]*y_cur[IDX_H2OII] + k[2574]*y_cur[IDX_H2SII] + + k[2581]*y_cur[IDX_N2OII] + k[3348]*y_cur[IDX_NII] + + k[3517]*y_cur[IDX_NH2II] + k[3551]*y_cur[IDX_NH3II] + + k[5032]*y_cur[IDX_CH3I] + k[5169]*y_cur[IDX_HI] + + k[5400]*y_cur[IDX_OI] + k[5468]*y_cur[IDX_OHI] + k[6164]; + data[jistart + 8312] = 0.0 + k[1715]*y_cur[IDX_C2H4I] + k[2501]*y_cur[IDX_H2COI] + + k[3823]*y_cur[IDX_CH3CHCH2I] + k[3830]*y_cur[IDX_C4H2I]; + data[jistart + 8313] = 0.0 + k[720]*y_cur[IDX_HSII]; + data[jistart + 8314] = 0.0 + k[627]*y_cur[IDX_HSII]; + data[jistart + 8315] = 0.0 + k[5487]*y_cur[IDX_SI]; + data[jistart + 8316] = 0.0 + k[5062]*y_cur[IDX_SI]; + data[jistart + 8317] = 0.0 + k[2501]*y_cur[IDX_SII]; + data[jistart + 8318] = 0.0 + k[5101]*y_cur[IDX_SI] + k[5102]*y_cur[IDX_SOI]; + data[jistart + 8319] = 0.0 + k[710]*y_cur[IDX_HSII] + k[5062]*y_cur[IDX_CH4I] + + k[5101]*y_cur[IDX_CHI] + k[5149]*y_cur[IDX_H2I] + + k[5324]*y_cur[IDX_NHI] + k[5487]*y_cur[IDX_HCOI] - + k[5488]*y_cur[IDX_HSI]; + data[jistart + 8320] = 0.0 + k[5462]*y_cur[IDX_CSI] + k[5468]*y_cur[IDX_H2SI]; + data[jistart + 8321] = 0.0 + k[609]*y_cur[IDX_HSII] + k[3576]*y_cur[IDX_H2SII]; + data[jistart + 8322] = 0.0 + k[1519]*y_cur[IDX_H2SI]; + data[jistart + 8323] = 0.0 - k[2084]*y_cur[IDX_HSI]; + data[jistart + 8324] = 0.0 + k[8607]*y_cur[IDX_GSI]; + data[jistart + 8325] = 0.0 + k[5032]*y_cur[IDX_H2SI]; + data[jistart + 8326] = 0.0 - k[5271]*y_cur[IDX_HSI] - k[5272]*y_cur[IDX_HSI]; + data[jistart + 8327] = 0.0 + k[5400]*y_cur[IDX_H2SI] + k[5408]*y_cur[IDX_HCSI] - + k[5415]*y_cur[IDX_HSI] - k[5416]*y_cur[IDX_HSI]; + data[jistart + 8328] = 0.0 + k[3227]*y_cur[IDX_H2S2I] + k[3271]*y_cur[IDX_HS2I] - + k[3273]*y_cur[IDX_HSI]; + data[jistart + 8329] = 0.0 - k[1415]*y_cur[IDX_HSI]; + data[jistart + 8330] = 0.0 + k[2544]*y_cur[IDX_H2SII]; + data[jistart + 8331] = 0.0 - k[397]*y_cur[IDX_HSI] - k[2353]*y_cur[IDX_HSI]; + data[jistart + 8332] = 0.0 - k[4965]*y_cur[IDX_HSI] - k[4966]*y_cur[IDX_HSI]; + data[jistart + 8333] = 0.0 - k[2977]*y_cur[IDX_HSI]; + data[jistart + 8334] = 0.0 - k[2716]*y_cur[IDX_HSI]; + data[jistart + 8335] = 0.0 + k[6446]*y_cur[IDX_H2SII] + k[6451]*y_cur[IDX_H3SII] + + k[6452]*y_cur[IDX_H3SII] + k[6719]*y_cur[IDX_HSiSII] + + k[6758]*y_cur[IDX_HS2II] + k[6764]*y_cur[IDX_H2S2II] + + k[6764]*y_cur[IDX_H2S2II]; + data[jistart + 8336] = 0.0 - k[5140]*y_cur[IDX_HSI] + k[5149]*y_cur[IDX_SI]; + data[jistart + 8337] = 0.0 + k[1019]*y_cur[IDX_H2SII] + k[1022]*y_cur[IDX_H2S2II] + + k[1022]*y_cur[IDX_H2S2II] + k[1046]*y_cur[IDX_H3SII] + + k[1047]*y_cur[IDX_H3SII] + k[1139]*y_cur[IDX_HS2II] + + k[1147]*y_cur[IDX_HSiSII]; + data[jistart + 8338] = 0.0 + k[109]*y_cur[IDX_SM] + k[2849]*y_cur[IDX_SiSII] + + k[5169]*y_cur[IDX_H2SI] - k[5178]*y_cur[IDX_HSI] + + k[5188]*y_cur[IDX_NSI] + k[5197]*y_cur[IDX_OCSI] + + k[5199]*y_cur[IDX_S2I] + k[5200]*y_cur[IDX_SOI]; + data[jistart + 8339] = 0.0 - k[3891]*y_cur[IDX_CM]; + data[jistart + 8340] = 0.0 - k[3894]*y_cur[IDX_CM]; + data[jistart + 8341] = 0.0 - k[3920]*y_cur[IDX_CM]; + data[jistart + 8342] = 0.0 - k[3901]*y_cur[IDX_CM]; + data[jistart + 8343] = 0.0 - k[0]*y_cur[IDX_CI] - k[1]*y_cur[IDX_CH2I] - + k[2]*y_cur[IDX_CHI] - k[3]*y_cur[IDX_CO2I] - k[4]*y_cur[IDX_H2OI] - + k[5]*y_cur[IDX_NI] - k[6]*y_cur[IDX_NHI] - k[7]*y_cur[IDX_O2I] - + k[8]*y_cur[IDX_OI] - k[9]*y_cur[IDX_OHI] - k[82]*y_cur[IDX_H2I] - + k[84]*y_cur[IDX_HI] - k[1449]*y_cur[IDX_NOI] - + k[1450]*y_cur[IDX_O2I] - k[3886]*y_cur[IDX_CII] - + k[3887]*y_cur[IDX_C2H2II] - k[3888]*y_cur[IDX_C2H3II] - + k[3889]*y_cur[IDX_C4H2II] - k[3890]*y_cur[IDX_C4H3II] - + k[3891]*y_cur[IDX_C4SII] - k[3892]*y_cur[IDX_CH2CCHII] - + k[3893]*y_cur[IDX_CH3II] - k[3894]*y_cur[IDX_CNCII] - + k[3895]*y_cur[IDX_FeII] - k[3896]*y_cur[IDX_HII] - + k[3897]*y_cur[IDX_H2COII] - k[3898]*y_cur[IDX_H2SII] - + k[3899]*y_cur[IDX_H3II] - k[3900]*y_cur[IDX_H3OII] - + k[3901]*y_cur[IDX_HC2SII] - k[3902]*y_cur[IDX_HCNHII] - + k[3903]*y_cur[IDX_HCNHII] - k[3904]*y_cur[IDX_HCOII] - + k[3905]*y_cur[IDX_HCOII] - k[3906]*y_cur[IDX_HeII] - + k[3907]*y_cur[IDX_MgII] - k[3908]*y_cur[IDX_NII] - + k[3909]*y_cur[IDX_N2HII] - k[3910]*y_cur[IDX_NH3II] - + k[3911]*y_cur[IDX_NH4II] - k[3912]*y_cur[IDX_NOII] - + k[3913]*y_cur[IDX_NaII] - k[3914]*y_cur[IDX_OII] - + k[3915]*y_cur[IDX_SII] - k[3916]*y_cur[IDX_SOII] - + k[3917]*y_cur[IDX_SiII] - k[3918]*y_cur[IDX_SiOII] - + k[3919]*y_cur[IDX_SiOHII] - k[3920]*y_cur[IDX_SiSII] - k[5686] - + k[5948]; + data[jistart + 8344] = 0.0 + k[3685]*y_cur[IDX_OI]; + data[jistart + 8345] = 0.0 - k[3918]*y_cur[IDX_CM]; + data[jistart + 8346] = 0.0 - k[3919]*y_cur[IDX_CM]; + data[jistart + 8347] = 0.0 - k[3]*y_cur[IDX_CM]; + data[jistart + 8348] = 0.0 - k[3895]*y_cur[IDX_CM]; + data[jistart + 8349] = 0.0 - k[3907]*y_cur[IDX_CM]; + data[jistart + 8350] = 0.0 - k[3913]*y_cur[IDX_CM]; + data[jistart + 8351] = 0.0 - k[6]*y_cur[IDX_CM]; + data[jistart + 8352] = 0.0 - k[3890]*y_cur[IDX_CM]; + data[jistart + 8353] = 0.0 - k[3909]*y_cur[IDX_CM]; + data[jistart + 8354] = 0.0 - k[3916]*y_cur[IDX_CM]; + data[jistart + 8355] = 0.0 - k[3892]*y_cur[IDX_CM]; + data[jistart + 8356] = 0.0 - k[3898]*y_cur[IDX_CM]; + data[jistart + 8357] = 0.0 - k[3908]*y_cur[IDX_CM]; + data[jistart + 8358] = 0.0 - k[3897]*y_cur[IDX_CM]; + data[jistart + 8359] = 0.0 - k[3912]*y_cur[IDX_CM]; + data[jistart + 8360] = 0.0 - k[3914]*y_cur[IDX_CM]; + data[jistart + 8361] = 0.0 - k[3889]*y_cur[IDX_CM]; + data[jistart + 8362] = 0.0 - k[3902]*y_cur[IDX_CM] - k[3903]*y_cur[IDX_CM]; + data[jistart + 8363] = 0.0 - k[1]*y_cur[IDX_CM]; + data[jistart + 8364] = 0.0 - k[3910]*y_cur[IDX_CM]; + data[jistart + 8365] = 0.0 - k[3911]*y_cur[IDX_CM]; + data[jistart + 8366] = 0.0 - k[7]*y_cur[IDX_CM] - k[1450]*y_cur[IDX_CM]; + data[jistart + 8367] = 0.0 - k[3917]*y_cur[IDX_CM]; + data[jistart + 8368] = 0.0 - k[3915]*y_cur[IDX_CM]; + data[jistart + 8369] = 0.0 - k[3888]*y_cur[IDX_CM]; + data[jistart + 8370] = 0.0 - k[1449]*y_cur[IDX_CM]; + data[jistart + 8371] = 0.0 - k[2]*y_cur[IDX_CM]; + data[jistart + 8372] = 0.0 - k[9]*y_cur[IDX_CM]; + data[jistart + 8373] = 0.0 - k[3887]*y_cur[IDX_CM]; + data[jistart + 8374] = 0.0 - k[3893]*y_cur[IDX_CM]; + data[jistart + 8375] = 0.0 - k[5]*y_cur[IDX_CM]; + data[jistart + 8376] = 0.0 - k[3900]*y_cur[IDX_CM]; + data[jistart + 8377] = 0.0 - k[8]*y_cur[IDX_CM] + k[3685]*y_cur[IDX_C2M]; + data[jistart + 8378] = 0.0 - k[3906]*y_cur[IDX_CM]; + data[jistart + 8379] = 0.0 - k[3886]*y_cur[IDX_CM]; + data[jistart + 8380] = 0.0 - k[4]*y_cur[IDX_CM]; + data[jistart + 8381] = 0.0 - k[3896]*y_cur[IDX_CM]; + data[jistart + 8382] = 0.0 - k[0]*y_cur[IDX_CM] + k[5607]*y_cur[IDX_eM]; + data[jistart + 8383] = 0.0 - k[3904]*y_cur[IDX_CM] - k[3905]*y_cur[IDX_CM]; + data[jistart + 8384] = 0.0 - k[3899]*y_cur[IDX_CM]; + data[jistart + 8385] = 0.0 - k[82]*y_cur[IDX_CM]; + data[jistart + 8386] = 0.0 + k[5607]*y_cur[IDX_CI]; + data[jistart + 8387] = 0.0 - k[84]*y_cur[IDX_CM]; + data[jistart + 8388] = 0.0 + k[954]*y_cur[IDX_eM] + k[6688]*y_cur[IDX_GRAINM]; + data[jistart + 8389] = 0.0 + k[786]*y_cur[IDX_eM] + k[6674]*y_cur[IDX_GRAINM]; + data[jistart + 8390] = 0.0 + k[818]*y_cur[IDX_eM] + k[6777]*y_cur[IDX_GRAINM]; + data[jistart + 8391] = 0.0 + k[7157] + k[7339] + k[7521]; + data[jistart + 8392] = 0.0 + k[1128]*y_cur[IDX_eM] + k[6717]*y_cur[IDX_GRAINM]; + data[jistart + 8393] = 0.0 + k[1039]*y_cur[IDX_eM] + k[6601]*y_cur[IDX_GRAINM]; + data[jistart + 8394] = 0.0 + k[1000]*y_cur[IDX_eM] + k[6582]*y_cur[IDX_GRAINM]; + data[jistart + 8395] = 0.0 + k[1392]*y_cur[IDX_CII] + k[5837] + k[6156]; + data[jistart + 8396] = 0.0 + k[4984]*y_cur[IDX_CI]; + data[jistart + 8397] = 0.0 + k[3104]*y_cur[IDX_HeII] + k[5725] + k[6009]; + data[jistart + 8398] = 0.0 + k[1178]*y_cur[IDX_eM] + k[6707]*y_cur[IDX_GRAINM]; + data[jistart + 8399] = 0.0 + k[5485]*y_cur[IDX_SI]; + data[jistart + 8400] = 0.0 + k[8666]*y_cur[IDX_GCI]; + data[jistart + 8401] = 0.0 + k[3256]*y_cur[IDX_HeII] + k[5173]*y_cur[IDX_HI] + k[6190]; + data[jistart + 8402] = 0.0 + k[4976]*y_cur[IDX_CI]; + data[jistart + 8403] = 0.0 + k[3013]*y_cur[IDX_HCSII]; + data[jistart + 8404] = 0.0 + k[3014]*y_cur[IDX_HCSII]; + data[jistart + 8405] = 0.0 + k[1108]*y_cur[IDX_eM] + k[3013]*y_cur[IDX_C2H5OHI] + + k[3014]*y_cur[IDX_CH3COCH3I] + k[3587]*y_cur[IDX_NH3I] + + k[6555]*y_cur[IDX_GRAINM]; + data[jistart + 8406] = 0.0 + k[317]*y_cur[IDX_FeI] + k[530]*y_cur[IDX_MgI] + + k[633]*y_cur[IDX_NaI] + k[717]*y_cur[IDX_SiI]; + data[jistart + 8407] = 0.0 + k[3813]*y_cur[IDX_OCSI]; + data[jistart + 8408] = 0.0 + k[837]*y_cur[IDX_eM] + k[6817]*y_cur[IDX_GRAINM]; + data[jistart + 8409] = 0.0 + k[1757]*y_cur[IDX_C3HII] + k[3294]*y_cur[IDX_HeII] + + k[3813]*y_cur[IDX_PII] + k[4980]*y_cur[IDX_CI] + + k[5098]*y_cur[IDX_CHI]; + data[jistart + 8410] = 0.0 + k[58]*y_cur[IDX_CI]; + data[jistart + 8411] = 0.0 + k[1062]*y_cur[IDX_eM] + k[6679]*y_cur[IDX_GRAINM]; + data[jistart + 8412] = 0.0 + k[3116]*y_cur[IDX_HeII] + k[5735] + k[6021]; + data[jistart + 8413] = 0.0 + k[4965]*y_cur[IDX_CI]; + data[jistart + 8414] = 0.0 - k[374]*y_cur[IDX_HII] - k[2678]*y_cur[IDX_H3II] - + k[2797]*y_cur[IDX_H3OII] - k[2956]*y_cur[IDX_HCOII] - + k[3214]*y_cur[IDX_HeII] - k[3215]*y_cur[IDX_HeII] - + k[4899]*y_cur[IDX_C2HI] - k[4958]*y_cur[IDX_CI] - + k[5263]*y_cur[IDX_NI] - k[5392]*y_cur[IDX_OI] - + k[5393]*y_cur[IDX_OI] - k[5462]*y_cur[IDX_OHI] - + k[5463]*y_cur[IDX_OHI] - k[5828] - k[5829] - k[6141] - k[6142] - + k[6975]; + data[jistart + 8415] = 0.0 + k[1757]*y_cur[IDX_OCSI] + k[2576]*y_cur[IDX_H2SI]; + data[jistart + 8416] = 0.0 + k[3092]*y_cur[IDX_HeII] + k[5355]*y_cur[IDX_OI] + k[5714]; + data[jistart + 8417] = 0.0 + k[317]*y_cur[IDX_CSII]; + data[jistart + 8418] = 0.0 + k[530]*y_cur[IDX_CSII]; + data[jistart + 8419] = 0.0 + k[633]*y_cur[IDX_CSII]; + data[jistart + 8420] = 0.0 + k[8666]*y_cur[IDX_GSI]; + data[jistart + 8421] = 0.0 + k[4986]*y_cur[IDX_CI]; + data[jistart + 8422] = 0.0 + k[3831]*y_cur[IDX_SII]; + data[jistart + 8423] = 0.0 + k[5019]*y_cur[IDX_SI]; + data[jistart + 8424] = 0.0 + k[2576]*y_cur[IDX_C3HII]; + data[jistart + 8425] = 0.0 + k[3831]*y_cur[IDX_C4H2I]; + data[jistart + 8426] = 0.0 + k[717]*y_cur[IDX_CSII]; + data[jistart + 8427] = 0.0 - k[4899]*y_cur[IDX_CSI]; + data[jistart + 8428] = 0.0 + k[5098]*y_cur[IDX_OCSI] + k[5100]*y_cur[IDX_SI]; + data[jistart + 8429] = 0.0 + k[4876]*y_cur[IDX_C2I] + k[5019]*y_cur[IDX_CH2I] + + k[5100]*y_cur[IDX_CHI] + k[5485]*y_cur[IDX_C2OI] + + k[5529]*y_cur[IDX_CI]; + data[jistart + 8430] = 0.0 + k[4876]*y_cur[IDX_SI]; + data[jistart + 8431] = 0.0 - k[5462]*y_cur[IDX_CSI] - k[5463]*y_cur[IDX_CSI]; + data[jistart + 8432] = 0.0 + k[3587]*y_cur[IDX_HCSII]; + data[jistart + 8433] = 0.0 - k[5263]*y_cur[IDX_CSI]; + data[jistart + 8434] = 0.0 - k[2797]*y_cur[IDX_CSI]; + data[jistart + 8435] = 0.0 + k[5355]*y_cur[IDX_C2SI] - k[5392]*y_cur[IDX_CSI] - + k[5393]*y_cur[IDX_CSI]; + data[jistart + 8436] = 0.0 + k[3092]*y_cur[IDX_C2SI] + k[3104]*y_cur[IDX_C3SI] + + k[3116]*y_cur[IDX_C4SI] - k[3214]*y_cur[IDX_CSI] - + k[3215]*y_cur[IDX_CSI] + k[3256]*y_cur[IDX_HCSI] + + k[3294]*y_cur[IDX_OCSI]; + data[jistart + 8437] = 0.0 + k[1392]*y_cur[IDX_H2CSI]; + data[jistart + 8438] = 0.0 - k[374]*y_cur[IDX_CSI]; + data[jistart + 8439] = 0.0 + k[58]*y_cur[IDX_SM] - k[4958]*y_cur[IDX_CSI] + + k[4965]*y_cur[IDX_HSI] + k[4976]*y_cur[IDX_NSI] + + k[4980]*y_cur[IDX_OCSI] + k[4984]*y_cur[IDX_S2I] + + k[4986]*y_cur[IDX_SOI] + k[5529]*y_cur[IDX_SI]; + data[jistart + 8440] = 0.0 - k[2956]*y_cur[IDX_CSI]; + data[jistart + 8441] = 0.0 - k[2678]*y_cur[IDX_CSI]; + data[jistart + 8442] = 0.0 + k[6555]*y_cur[IDX_HCSII] + k[6582]*y_cur[IDX_H2CSII] + + k[6601]*y_cur[IDX_H3CSII] + k[6674]*y_cur[IDX_C2SII] + + k[6679]*y_cur[IDX_HC2SII] + k[6688]*y_cur[IDX_CH3CSII] + + k[6707]*y_cur[IDX_OCSII] + k[6717]*y_cur[IDX_HOCSII] + + k[6777]*y_cur[IDX_C3SII] + k[6817]*y_cur[IDX_C4SII]; + data[jistart + 8443] = 0.0 + k[786]*y_cur[IDX_C2SII] + k[818]*y_cur[IDX_C3SII] + + k[837]*y_cur[IDX_C4SII] + k[954]*y_cur[IDX_CH3CSII] + + k[1000]*y_cur[IDX_H2CSII] + k[1039]*y_cur[IDX_H3CSII] + + k[1062]*y_cur[IDX_HC2SII] + k[1108]*y_cur[IDX_HCSII] + + k[1128]*y_cur[IDX_HOCSII] + k[1178]*y_cur[IDX_OCSII]; + data[jistart + 8444] = 0.0 + k[5173]*y_cur[IDX_HCSI]; + data[jistart + 8445] = 0.0 - k[4732]*y_cur[IDX_OM]; + data[jistart + 8446] = 0.0 - k[4735]*y_cur[IDX_OM]; + data[jistart + 8447] = 0.0 - k[4761]*y_cur[IDX_OM]; + data[jistart + 8448] = 0.0 - k[4742]*y_cur[IDX_OM]; + data[jistart + 8449] = 0.0 + k[1450]*y_cur[IDX_O2I]; + data[jistart + 8450] = 0.0 - k[56]*y_cur[IDX_CI] - k[59]*y_cur[IDX_CH2I] - + k[62]*y_cur[IDX_CHI] - k[83]*y_cur[IDX_H2I] - k[107]*y_cur[IDX_HI] - + k[122]*y_cur[IDX_NI] - k[124]*y_cur[IDX_COI] - k[125]*y_cur[IDX_NOI] + - k[126]*y_cur[IDX_OI] - k[666]*y_cur[IDX_CNI] - + k[667]*y_cur[IDX_O2I] - k[2467]*y_cur[IDX_H2I] - + k[3652]*y_cur[IDX_CH4I] - k[3653]*y_cur[IDX_HCNI] - + k[4727]*y_cur[IDX_CII] - k[4728]*y_cur[IDX_C2H2II] - + k[4729]*y_cur[IDX_C2H3II] - k[4730]*y_cur[IDX_C4H2II] - + k[4731]*y_cur[IDX_C4H3II] - k[4732]*y_cur[IDX_C4SII] - + k[4733]*y_cur[IDX_CH2CCHII] - k[4734]*y_cur[IDX_CH3II] - + k[4735]*y_cur[IDX_CNCII] - k[4736]*y_cur[IDX_FeII] - + k[4737]*y_cur[IDX_HII] - k[4738]*y_cur[IDX_H2COII] - + k[4739]*y_cur[IDX_H2SII] - k[4740]*y_cur[IDX_H3II] - + k[4741]*y_cur[IDX_H3OII] - k[4742]*y_cur[IDX_HC2SII] - + k[4743]*y_cur[IDX_HCNHII] - k[4744]*y_cur[IDX_HCNHII] - + k[4745]*y_cur[IDX_HCOII] - k[4746]*y_cur[IDX_HCOII] - + k[4747]*y_cur[IDX_HeII] - k[4748]*y_cur[IDX_MgII] - + k[4749]*y_cur[IDX_NII] - k[4750]*y_cur[IDX_N2HII] - + k[4751]*y_cur[IDX_NH3II] - k[4752]*y_cur[IDX_NH4II] - + k[4753]*y_cur[IDX_NOII] - k[4754]*y_cur[IDX_NaII] - + k[4755]*y_cur[IDX_OII] - k[4756]*y_cur[IDX_SII] - + k[4757]*y_cur[IDX_SOII] - k[4758]*y_cur[IDX_SiII] - + k[4759]*y_cur[IDX_SiOII] - k[4760]*y_cur[IDX_SiOHII] - + k[4761]*y_cur[IDX_SiSII] - k[5895] - k[6232]; + data[jistart + 8451] = 0.0 - k[4759]*y_cur[IDX_OM]; + data[jistart + 8452] = 0.0 - k[4760]*y_cur[IDX_OM]; + data[jistart + 8453] = 0.0 - k[4736]*y_cur[IDX_OM]; + data[jistart + 8454] = 0.0 - k[4748]*y_cur[IDX_OM]; + data[jistart + 8455] = 0.0 - k[4754]*y_cur[IDX_OM]; + data[jistart + 8456] = 0.0 - k[4731]*y_cur[IDX_OM]; + data[jistart + 8457] = 0.0 - k[4750]*y_cur[IDX_OM]; + data[jistart + 8458] = 0.0 - k[4757]*y_cur[IDX_OM]; + data[jistart + 8459] = 0.0 - k[4733]*y_cur[IDX_OM]; + data[jistart + 8460] = 0.0 - k[4739]*y_cur[IDX_OM]; + data[jistart + 8461] = 0.0 - k[4749]*y_cur[IDX_OM]; + data[jistart + 8462] = 0.0 - k[4738]*y_cur[IDX_OM]; + data[jistart + 8463] = 0.0 - k[4753]*y_cur[IDX_OM]; + data[jistart + 8464] = 0.0 - k[4755]*y_cur[IDX_OM]; + data[jistart + 8465] = 0.0 - k[4730]*y_cur[IDX_OM]; + data[jistart + 8466] = 0.0 - k[4743]*y_cur[IDX_OM] - k[4744]*y_cur[IDX_OM]; + data[jistart + 8467] = 0.0 - k[59]*y_cur[IDX_OM]; + data[jistart + 8468] = 0.0 - k[4751]*y_cur[IDX_OM]; + data[jistart + 8469] = 0.0 - k[4752]*y_cur[IDX_OM]; + data[jistart + 8470] = 0.0 - k[667]*y_cur[IDX_OM] + k[1450]*y_cur[IDX_CM]; + data[jistart + 8471] = 0.0 - k[4758]*y_cur[IDX_OM]; + data[jistart + 8472] = 0.0 - k[4756]*y_cur[IDX_OM]; + data[jistart + 8473] = 0.0 - k[4729]*y_cur[IDX_OM]; + data[jistart + 8474] = 0.0 - k[125]*y_cur[IDX_OM]; + data[jistart + 8475] = 0.0 - k[3652]*y_cur[IDX_OM]; + data[jistart + 8476] = 0.0 - k[3653]*y_cur[IDX_OM]; + data[jistart + 8477] = 0.0 - k[62]*y_cur[IDX_OM]; + data[jistart + 8478] = 0.0 - k[4728]*y_cur[IDX_OM]; + data[jistart + 8479] = 0.0 - k[4734]*y_cur[IDX_OM]; + data[jistart + 8480] = 0.0 - k[666]*y_cur[IDX_OM]; + data[jistart + 8481] = 0.0 - k[122]*y_cur[IDX_OM]; + data[jistart + 8482] = 0.0 - k[4741]*y_cur[IDX_OM]; + data[jistart + 8483] = 0.0 - k[126]*y_cur[IDX_OM] + k[5609]*y_cur[IDX_eM]; + data[jistart + 8484] = 0.0 - k[4747]*y_cur[IDX_OM]; + data[jistart + 8485] = 0.0 - k[4727]*y_cur[IDX_OM]; + data[jistart + 8486] = 0.0 - k[4737]*y_cur[IDX_OM]; + data[jistart + 8487] = 0.0 - k[56]*y_cur[IDX_OM]; + data[jistart + 8488] = 0.0 - k[4745]*y_cur[IDX_OM] - k[4746]*y_cur[IDX_OM]; + data[jistart + 8489] = 0.0 - k[4740]*y_cur[IDX_OM]; + data[jistart + 8490] = 0.0 - k[124]*y_cur[IDX_OM]; + data[jistart + 8491] = 0.0 - k[83]*y_cur[IDX_OM] - k[2467]*y_cur[IDX_OM]; + data[jistart + 8492] = 0.0 + k[5609]*y_cur[IDX_OI]; + data[jistart + 8493] = 0.0 - k[107]*y_cur[IDX_OM]; + data[jistart + 8494] = 0.0 - k[4556]*y_cur[IDX_C9M]; + data[jistart + 8495] = 0.0 - k[4559]*y_cur[IDX_C9M]; + data[jistart + 8496] = 0.0 - k[4585]*y_cur[IDX_C9M]; + data[jistart + 8497] = 0.0 - k[4566]*y_cur[IDX_C9M]; + data[jistart + 8498] = 0.0 + k[3380]*y_cur[IDX_NI] + k[3678]*y_cur[IDX_OI]; + data[jistart + 8499] = 0.0 - k[53]*y_cur[IDX_CI] - k[103]*y_cur[IDX_HI] - + k[120]*y_cur[IDX_NI] - k[3442]*y_cur[IDX_NI] - k[3443]*y_cur[IDX_NI] + - k[3444]*y_cur[IDX_NI] - k[3445]*y_cur[IDX_NI] - + k[3721]*y_cur[IDX_OI] - k[4551]*y_cur[IDX_CII] - + k[4552]*y_cur[IDX_C2H2II] - k[4553]*y_cur[IDX_C2H3II] - + k[4554]*y_cur[IDX_C4H2II] - k[4555]*y_cur[IDX_C4H3II] - + k[4556]*y_cur[IDX_C4SII] - k[4557]*y_cur[IDX_CH2CCHII] - + k[4558]*y_cur[IDX_CH3II] - k[4559]*y_cur[IDX_CNCII] - + k[4560]*y_cur[IDX_FeII] - k[4561]*y_cur[IDX_HII] - + k[4562]*y_cur[IDX_H2COII] - k[4563]*y_cur[IDX_H2SII] - + k[4564]*y_cur[IDX_H3II] - k[4565]*y_cur[IDX_H3OII] - + k[4566]*y_cur[IDX_HC2SII] - k[4567]*y_cur[IDX_HCNHII] - + k[4568]*y_cur[IDX_HCNHII] - k[4569]*y_cur[IDX_HCOII] - + k[4570]*y_cur[IDX_HCOII] - k[4571]*y_cur[IDX_HeII] - + k[4572]*y_cur[IDX_MgII] - k[4573]*y_cur[IDX_NII] - + k[4574]*y_cur[IDX_N2HII] - k[4575]*y_cur[IDX_NH3II] - + k[4576]*y_cur[IDX_NH4II] - k[4577]*y_cur[IDX_NOII] - + k[4578]*y_cur[IDX_NaII] - k[4579]*y_cur[IDX_OII] - + k[4580]*y_cur[IDX_SII] - k[4581]*y_cur[IDX_SOII] - + k[4582]*y_cur[IDX_SiII] - k[4583]*y_cur[IDX_SiOII] - + k[4584]*y_cur[IDX_SiOHII] - k[4585]*y_cur[IDX_SiSII] - k[5766] - + k[6059]; + data[jistart + 8500] = 0.0 - k[4583]*y_cur[IDX_C9M]; + data[jistart + 8501] = 0.0 - k[4584]*y_cur[IDX_C9M]; + data[jistart + 8502] = 0.0 - k[4560]*y_cur[IDX_C9M]; + data[jistart + 8503] = 0.0 - k[4572]*y_cur[IDX_C9M]; + data[jistart + 8504] = 0.0 - k[4578]*y_cur[IDX_C9M]; + data[jistart + 8505] = 0.0 + k[5605]*y_cur[IDX_eM]; + data[jistart + 8506] = 0.0 - k[4555]*y_cur[IDX_C9M]; + data[jistart + 8507] = 0.0 - k[4574]*y_cur[IDX_C9M]; + data[jistart + 8508] = 0.0 - k[4581]*y_cur[IDX_C9M]; + data[jistart + 8509] = 0.0 - k[4557]*y_cur[IDX_C9M]; + data[jistart + 8510] = 0.0 - k[4563]*y_cur[IDX_C9M]; + data[jistart + 8511] = 0.0 - k[4573]*y_cur[IDX_C9M]; + data[jistart + 8512] = 0.0 - k[4562]*y_cur[IDX_C9M]; + data[jistart + 8513] = 0.0 - k[4577]*y_cur[IDX_C9M]; + data[jistart + 8514] = 0.0 - k[4579]*y_cur[IDX_C9M]; + data[jistart + 8515] = 0.0 - k[4554]*y_cur[IDX_C9M]; + data[jistart + 8516] = 0.0 - k[4567]*y_cur[IDX_C9M] - k[4568]*y_cur[IDX_C9M]; + data[jistart + 8517] = 0.0 - k[4575]*y_cur[IDX_C9M]; + data[jistart + 8518] = 0.0 - k[4576]*y_cur[IDX_C9M]; + data[jistart + 8519] = 0.0 - k[4582]*y_cur[IDX_C9M]; + data[jistart + 8520] = 0.0 - k[4580]*y_cur[IDX_C9M]; + data[jistart + 8521] = 0.0 - k[4553]*y_cur[IDX_C9M]; + data[jistart + 8522] = 0.0 - k[4552]*y_cur[IDX_C9M]; + data[jistart + 8523] = 0.0 - k[4558]*y_cur[IDX_C9M]; + data[jistart + 8524] = 0.0 - k[120]*y_cur[IDX_C9M] + k[3380]*y_cur[IDX_C10M] - + k[3442]*y_cur[IDX_C9M] - k[3443]*y_cur[IDX_C9M] - + k[3444]*y_cur[IDX_C9M] - k[3445]*y_cur[IDX_C9M]; + data[jistart + 8525] = 0.0 - k[4565]*y_cur[IDX_C9M]; + data[jistart + 8526] = 0.0 + k[3678]*y_cur[IDX_C10M] - k[3721]*y_cur[IDX_C9M]; + data[jistart + 8527] = 0.0 - k[4571]*y_cur[IDX_C9M]; + data[jistart + 8528] = 0.0 - k[4551]*y_cur[IDX_C9M]; + data[jistart + 8529] = 0.0 - k[4561]*y_cur[IDX_C9M]; + data[jistart + 8530] = 0.0 - k[53]*y_cur[IDX_C9M]; + data[jistart + 8531] = 0.0 - k[4569]*y_cur[IDX_C9M] - k[4570]*y_cur[IDX_C9M]; + data[jistart + 8532] = 0.0 - k[4564]*y_cur[IDX_C9M]; + data[jistart + 8533] = 0.0 + k[5605]*y_cur[IDX_C9I]; + data[jistart + 8534] = 0.0 - k[103]*y_cur[IDX_C9M]; + data[jistart + 8535] = 0.0 + k[1053]*y_cur[IDX_eM] + k[6725]*y_cur[IDX_GRAINM]; + data[jistart + 8536] = 0.0 + k[955]*y_cur[IDX_eM] + k[6587]*y_cur[IDX_GRAINM]; + data[jistart + 8537] = 0.0 + k[959]*y_cur[IDX_eM] + k[6605]*y_cur[IDX_GRAINM]; + data[jistart + 8538] = 0.0 + k[982]*y_cur[IDX_eM] + k[6699]*y_cur[IDX_GRAINM]; + data[jistart + 8539] = 0.0 - k[2131]*y_cur[IDX_CH3OHI]; + data[jistart + 8540] = 0.0 + k[8599]*y_cur[IDX_GHI]; + data[jistart + 8541] = 0.0 + k[7118] + k[7300] + k[7482]; + data[jistart + 8542] = 0.0 + k[8598]*y_cur[IDX_GHI]; + data[jistart + 8543] = 0.0 - k[2127]*y_cur[IDX_CH3OHI]; + data[jistart + 8544] = 0.0 - k[2128]*y_cur[IDX_CH3OHI]; + data[jistart + 8545] = 0.0 - k[2129]*y_cur[IDX_CH3OHI] - k[2130]*y_cur[IDX_CH3OHI]; + data[jistart + 8546] = 0.0 - k[2132]*y_cur[IDX_CH3OHI]; + data[jistart + 8547] = 0.0 + k[3570]*y_cur[IDX_NH3I]; + data[jistart + 8548] = 0.0 + k[2120]*y_cur[IDX_CH3OH2II]; + data[jistart + 8549] = 0.0 + k[966]*y_cur[IDX_eM] + k[2120]*y_cur[IDX_HCOOHI] + + k[2121]*y_cur[IDX_NH3I] - k[2125]*y_cur[IDX_CH3OHI] + + k[6443]*y_cur[IDX_GRAINM]; + data[jistart + 8550] = 0.0 + k[8737]*y_cur[IDX_GCH3I]; + data[jistart + 8551] = 0.0 - k[3816]*y_cur[IDX_CH3OHI]; + data[jistart + 8552] = 0.0 - k[2126]*y_cur[IDX_CH3OHI]; + data[jistart + 8553] = 0.0 + k[2653]*y_cur[IDX_H3II]; + data[jistart + 8554] = 0.0 - k[3810]*y_cur[IDX_CH3OHI]; + data[jistart + 8555] = 0.0 - k[279]*y_cur[IDX_CH3OHI] - k[2137]*y_cur[IDX_CH3OHI]; + data[jistart + 8556] = 0.0 + k[8737]*y_cur[IDX_GOHI]; + data[jistart + 8557] = 0.0 + k[61]*y_cur[IDX_CH3I]; + data[jistart + 8558] = 0.0 - k[279]*y_cur[IDX_CH4II] - k[370]*y_cur[IDX_HII] - + k[545]*y_cur[IDX_NII] - k[651]*y_cur[IDX_OII] - + k[672]*y_cur[IDX_O2II] - k[1381]*y_cur[IDX_CII] - + k[1382]*y_cur[IDX_CII] - k[1937]*y_cur[IDX_CHII] - + k[1938]*y_cur[IDX_CHII] - k[1939]*y_cur[IDX_CHII] - + k[2073]*y_cur[IDX_CH3II] - k[2122]*y_cur[IDX_C3HII] - + k[2123]*y_cur[IDX_C3HII] - k[2124]*y_cur[IDX_C4H3II] - + k[2125]*y_cur[IDX_CH3OH2II] - k[2126]*y_cur[IDX_HC3NHII] - + k[2127]*y_cur[IDX_HCOOH2II] - k[2128]*y_cur[IDX_NCCNHII] - + k[2129]*y_cur[IDX_PH2II] - k[2130]*y_cur[IDX_PH2II] - + k[2131]*y_cur[IDX_PH3II] - k[2132]*y_cur[IDX_S2II] - + k[2137]*y_cur[IDX_CH4II] - k[2330]*y_cur[IDX_HII] - + k[2331]*y_cur[IDX_HII] - k[2332]*y_cur[IDX_HII] - + k[2487]*y_cur[IDX_H2COII] - k[2667]*y_cur[IDX_H3II] - + k[2668]*y_cur[IDX_H3II] - k[2762]*y_cur[IDX_H3COII] - + k[2795]*y_cur[IDX_H3OII] - k[2954]*y_cur[IDX_HCOII] - + k[3196]*y_cur[IDX_HeII] - k[3197]*y_cur[IDX_HeII] - + k[3336]*y_cur[IDX_NII] - k[3337]*y_cur[IDX_NII] - + k[3338]*y_cur[IDX_NII] - k[3339]*y_cur[IDX_NII] - + k[3636]*y_cur[IDX_OII] - k[3637]*y_cur[IDX_OII] - + k[3665]*y_cur[IDX_O2II] - k[3810]*y_cur[IDX_PII] - + k[3816]*y_cur[IDX_PHII] - k[3867]*y_cur[IDX_SiII] - + k[5073]*y_cur[IDX_CHI] - k[5534]*y_cur[IDX_CH3II] - k[5816] - + k[5817] - k[5818] - k[5819] - k[6120] - k[6121] - k[6122] - k[6123] + - k[6124] - k[6936]; + data[jistart + 8559] = 0.0 - k[2122]*y_cur[IDX_CH3OHI] - k[2123]*y_cur[IDX_CH3OHI]; + data[jistart + 8560] = 0.0 - k[2762]*y_cur[IDX_CH3OHI]; + data[jistart + 8561] = 0.0 - k[1937]*y_cur[IDX_CH3OHI] - k[1938]*y_cur[IDX_CH3OHI] - + k[1939]*y_cur[IDX_CH3OHI]; + data[jistart + 8562] = 0.0 - k[672]*y_cur[IDX_CH3OHI] - k[3665]*y_cur[IDX_CH3OHI]; + data[jistart + 8563] = 0.0 - k[2124]*y_cur[IDX_CH3OHI]; + data[jistart + 8564] = 0.0 - k[545]*y_cur[IDX_CH3OHI] - k[3336]*y_cur[IDX_CH3OHI] - + k[3337]*y_cur[IDX_CH3OHI] - k[3338]*y_cur[IDX_CH3OHI] - + k[3339]*y_cur[IDX_CH3OHI]; + data[jistart + 8565] = 0.0 - k[2487]*y_cur[IDX_CH3OHI]; + data[jistart + 8566] = 0.0 - k[651]*y_cur[IDX_CH3OHI] - k[3636]*y_cur[IDX_CH3OHI] - + k[3637]*y_cur[IDX_CH3OHI]; + data[jistart + 8567] = 0.0 - k[3867]*y_cur[IDX_CH3OHI]; + data[jistart + 8568] = 0.0 - k[5073]*y_cur[IDX_CH3OHI]; + data[jistart + 8569] = 0.0 + k[2121]*y_cur[IDX_CH3OH2II] + k[3570]*y_cur[IDX_CH3CHOHII]; + data[jistart + 8570] = 0.0 - k[2073]*y_cur[IDX_CH3OHI] - k[5534]*y_cur[IDX_CH3OHI]; + data[jistart + 8571] = 0.0 + k[8598]*y_cur[IDX_GCH3OI] + k[8599]*y_cur[IDX_GCH2OHI]; + data[jistart + 8572] = 0.0 + k[61]*y_cur[IDX_OHM]; + data[jistart + 8573] = 0.0 - k[2795]*y_cur[IDX_CH3OHI]; + data[jistart + 8574] = 0.0 - k[3196]*y_cur[IDX_CH3OHI] - k[3197]*y_cur[IDX_CH3OHI]; + data[jistart + 8575] = 0.0 - k[1381]*y_cur[IDX_CH3OHI] - k[1382]*y_cur[IDX_CH3OHI]; + data[jistart + 8576] = 0.0 - k[370]*y_cur[IDX_CH3OHI] - k[2330]*y_cur[IDX_CH3OHI] - + k[2331]*y_cur[IDX_CH3OHI] - k[2332]*y_cur[IDX_CH3OHI]; + data[jistart + 8577] = 0.0 - k[2954]*y_cur[IDX_CH3OHI]; + data[jistart + 8578] = 0.0 + k[2653]*y_cur[IDX_CH3CHOI] - k[2667]*y_cur[IDX_CH3OHI] - + k[2668]*y_cur[IDX_CH3OHI]; + data[jistart + 8579] = 0.0 + k[6443]*y_cur[IDX_CH3OH2II] + k[6587]*y_cur[IDX_CH3OCH3II] + + k[6605]*y_cur[IDX_CH3OCH4II] + k[6699]*y_cur[IDX_HCOOCH3II] + + k[6725]*y_cur[IDX_H5C2O2II]; + data[jistart + 8580] = 0.0 + k[955]*y_cur[IDX_CH3OCH3II] + k[959]*y_cur[IDX_CH3OCH4II] + + k[966]*y_cur[IDX_CH3OH2II] + k[982]*y_cur[IDX_HCOOCH3II] + + k[1053]*y_cur[IDX_H5C2O2II]; + data[jistart + 8581] = 0.0 - k[4696]*y_cur[IDX_HM]; + data[jistart + 8582] = 0.0 - k[4699]*y_cur[IDX_HM]; + data[jistart + 8583] = 0.0 - k[4702]*y_cur[IDX_HM]; + data[jistart + 8584] = 0.0 - k[4726]*y_cur[IDX_HM]; + data[jistart + 8585] = 0.0 - k[4707]*y_cur[IDX_HM]; + data[jistart + 8586] = 0.0 - k[66]*y_cur[IDX_C2I] - k[67]*y_cur[IDX_C2HI] - + k[68]*y_cur[IDX_CI] - k[69]*y_cur[IDX_CH2I] - k[70]*y_cur[IDX_CH3I] + - k[71]*y_cur[IDX_CHI] - k[72]*y_cur[IDX_CNI] - k[73]*y_cur[IDX_COI] + - k[74]*y_cur[IDX_HI] - k[75]*y_cur[IDX_HI] - k[76]*y_cur[IDX_HCOI] + - k[77]*y_cur[IDX_NI] - k[78]*y_cur[IDX_NH2I] - k[79]*y_cur[IDX_NHI] + - k[80]*y_cur[IDX_OI] - k[81]*y_cur[IDX_OHI] - + k[2366]*y_cur[IDX_C2H2I] - k[2367]*y_cur[IDX_H2OI] - + k[2368]*y_cur[IDX_HCNI] - k[4691]*y_cur[IDX_CII] - + k[4692]*y_cur[IDX_C2H2II] - k[4693]*y_cur[IDX_C2H3II] - + k[4694]*y_cur[IDX_C4H2II] - k[4695]*y_cur[IDX_C4H3II] - + k[4696]*y_cur[IDX_C4SII] - k[4697]*y_cur[IDX_CH2CCHII] - + k[4698]*y_cur[IDX_CH3II] - k[4699]*y_cur[IDX_CNCII] - + k[4700]*y_cur[IDX_FeII] - k[4701]*y_cur[IDX_HII] - + k[4702]*y_cur[IDX_H2II] - k[4703]*y_cur[IDX_H2COII] - + k[4704]*y_cur[IDX_H2SII] - k[4705]*y_cur[IDX_H3II] - + k[4706]*y_cur[IDX_H3OII] - k[4707]*y_cur[IDX_HC2SII] - + k[4708]*y_cur[IDX_HCNHII] - k[4709]*y_cur[IDX_HCNHII] - + k[4710]*y_cur[IDX_HCOII] - k[4711]*y_cur[IDX_HCOII] - + k[4712]*y_cur[IDX_HeII] - k[4713]*y_cur[IDX_MgII] - + k[4714]*y_cur[IDX_NII] - k[4715]*y_cur[IDX_N2HII] - + k[4716]*y_cur[IDX_NH3II] - k[4717]*y_cur[IDX_NH4II] - + k[4718]*y_cur[IDX_NOII] - k[4719]*y_cur[IDX_NaII] - + k[4720]*y_cur[IDX_OII] - k[4721]*y_cur[IDX_SII] - + k[4722]*y_cur[IDX_SOII] - k[4723]*y_cur[IDX_SiII] - + k[4724]*y_cur[IDX_SiOII] - k[4725]*y_cur[IDX_SiOHII] - + k[4726]*y_cur[IDX_SiSII] - k[5833] - k[6146]; + data[jistart + 8587] = 0.0 - k[4724]*y_cur[IDX_HM]; + data[jistart + 8588] = 0.0 - k[4725]*y_cur[IDX_HM]; + data[jistart + 8589] = 0.0 - k[78]*y_cur[IDX_HM]; + data[jistart + 8590] = 0.0 - k[4700]*y_cur[IDX_HM]; + data[jistart + 8591] = 0.0 - k[4713]*y_cur[IDX_HM]; + data[jistart + 8592] = 0.0 - k[4719]*y_cur[IDX_HM]; + data[jistart + 8593] = 0.0 - k[79]*y_cur[IDX_HM]; + data[jistart + 8594] = 0.0 - k[4695]*y_cur[IDX_HM]; + data[jistart + 8595] = 0.0 - k[4715]*y_cur[IDX_HM]; + data[jistart + 8596] = 0.0 - k[4722]*y_cur[IDX_HM]; + data[jistart + 8597] = 0.0 - k[4697]*y_cur[IDX_HM]; + data[jistart + 8598] = 0.0 - k[4704]*y_cur[IDX_HM]; + data[jistart + 8599] = 0.0 - k[4714]*y_cur[IDX_HM]; + data[jistart + 8600] = 0.0 - k[4703]*y_cur[IDX_HM]; + data[jistart + 8601] = 0.0 - k[4718]*y_cur[IDX_HM]; + data[jistart + 8602] = 0.0 - k[4720]*y_cur[IDX_HM]; + data[jistart + 8603] = 0.0 - k[4694]*y_cur[IDX_HM]; + data[jistart + 8604] = 0.0 - k[4708]*y_cur[IDX_HM] - k[4709]*y_cur[IDX_HM]; + data[jistart + 8605] = 0.0 - k[69]*y_cur[IDX_HM]; + data[jistart + 8606] = 0.0 - k[4716]*y_cur[IDX_HM]; + data[jistart + 8607] = 0.0 - k[4717]*y_cur[IDX_HM]; + data[jistart + 8608] = 0.0 - k[4723]*y_cur[IDX_HM]; + data[jistart + 8609] = 0.0 - k[4721]*y_cur[IDX_HM]; + data[jistart + 8610] = 0.0 - k[4693]*y_cur[IDX_HM]; + data[jistart + 8611] = 0.0 - k[76]*y_cur[IDX_HM]; + data[jistart + 8612] = 0.0 - k[67]*y_cur[IDX_HM]; + data[jistart + 8613] = 0.0 - k[2368]*y_cur[IDX_HM]; + data[jistart + 8614] = 0.0 - k[71]*y_cur[IDX_HM]; + data[jistart + 8615] = 0.0 - k[66]*y_cur[IDX_HM]; + data[jistart + 8616] = 0.0 - k[81]*y_cur[IDX_HM]; + data[jistart + 8617] = 0.0 - k[4692]*y_cur[IDX_HM]; + data[jistart + 8618] = 0.0 - k[4698]*y_cur[IDX_HM]; + data[jistart + 8619] = 0.0 - k[2366]*y_cur[IDX_HM]; + data[jistart + 8620] = 0.0 - k[72]*y_cur[IDX_HM]; + data[jistart + 8621] = 0.0 - k[70]*y_cur[IDX_HM]; + data[jistart + 8622] = 0.0 - k[77]*y_cur[IDX_HM]; + data[jistart + 8623] = 0.0 - k[4706]*y_cur[IDX_HM]; + data[jistart + 8624] = 0.0 - k[80]*y_cur[IDX_HM]; + data[jistart + 8625] = 0.0 - k[4712]*y_cur[IDX_HM]; + data[jistart + 8626] = 0.0 - k[4691]*y_cur[IDX_HM]; + data[jistart + 8627] = 0.0 - k[2367]*y_cur[IDX_HM]; + data[jistart + 8628] = 0.0 - k[4701]*y_cur[IDX_HM]; + data[jistart + 8629] = 0.0 - k[68]*y_cur[IDX_HM]; + data[jistart + 8630] = 0.0 - k[4710]*y_cur[IDX_HM] - k[4711]*y_cur[IDX_HM]; + data[jistart + 8631] = 0.0 - k[4705]*y_cur[IDX_HM]; + data[jistart + 8632] = 0.0 - k[73]*y_cur[IDX_HM]; + data[jistart + 8633] = 0.0 + k[5678]; + data[jistart + 8634] = 0.0 + k[5608]*y_cur[IDX_HI]; + data[jistart + 8635] = 0.0 - k[74]*y_cur[IDX_HM] - k[75]*y_cur[IDX_HM] + + k[5608]*y_cur[IDX_eM]; + data[jistart + 8636] = 0.0 + k[926]*y_cur[IDX_eM] + k[6760]*y_cur[IDX_GRAINM]; + data[jistart + 8637] = 0.0 + k[7183] + k[7365] + k[7547]; + data[jistart + 8638] = 0.0 + k[912]*y_cur[IDX_eM] + k[6651]*y_cur[IDX_GRAINM]; + data[jistart + 8639] = 0.0 + k[988]*y_cur[IDX_eM] + k[6745]*y_cur[IDX_GRAINM]; + data[jistart + 8640] = 0.0 + k[8633]*y_cur[IDX_GHI]; + data[jistart + 8641] = 0.0 + k[928]*y_cur[IDX_eM] + k[6766]*y_cur[IDX_GRAINM]; + data[jistart + 8642] = 0.0 + k[1080]*y_cur[IDX_eM] + k[6792]*y_cur[IDX_GRAINM]; + data[jistart + 8643] = 0.0 + k[8706]*y_cur[IDX_GNI]; + data[jistart + 8644] = 0.0 + k[2172]*y_cur[IDX_CH4I] + k[2532]*y_cur[IDX_H2OI]; + data[jistart + 8645] = 0.0 + k[2320]*y_cur[IDX_HII]; + data[jistart + 8646] = 0.0 + k[4948]*y_cur[IDX_CI]; + data[jistart + 8647] = 0.0 + k[3024]*y_cur[IDX_HII] + k[5213]*y_cur[IDX_HI]; + data[jistart + 8648] = 0.0 + k[229]*y_cur[IDX_C2H2I] + k[239]*y_cur[IDX_C2H4I] + + k[493]*y_cur[IDX_C4H2I] + k[607]*y_cur[IDX_NH3I]; + data[jistart + 8649] = 0.0 + k[1068]*y_cur[IDX_eM] + k[2115]*y_cur[IDX_CH3CNI] + + k[2126]*y_cur[IDX_CH3OHI] + k[3580]*y_cur[IDX_NH3I] + + k[6639]*y_cur[IDX_GRAINM]; + data[jistart + 8650] = 0.0 - k[1816]*y_cur[IDX_HC3NI]; + data[jistart + 8651] = 0.0 + k[2115]*y_cur[IDX_HC3NHII]; + data[jistart + 8652] = 0.0 + k[4903]*y_cur[IDX_C2HI]; + data[jistart + 8653] = 0.0 - k[1752]*y_cur[IDX_HC3NI]; + data[jistart + 8654] = 0.0 - k[1722]*y_cur[IDX_HC3NI]; + data[jistart + 8655] = 0.0 + k[8706]*y_cur[IDX_GC3HI]; + data[jistart + 8656] = 0.0 + k[5232]*y_cur[IDX_NI]; + data[jistart + 8657] = 0.0 - k[2228]*y_cur[IDX_HC3NI]; + data[jistart + 8658] = 0.0 + k[113]*y_cur[IDX_NI]; + data[jistart + 8659] = 0.0 + k[2126]*y_cur[IDX_HC3NHII]; + data[jistart + 8660] = 0.0 - k[383]*y_cur[IDX_HII] - k[1398]*y_cur[IDX_CII] - + k[1399]*y_cur[IDX_CII] - k[1400]*y_cur[IDX_CII] - + k[1401]*y_cur[IDX_CII] - k[1470]*y_cur[IDX_C2HII] - + k[1471]*y_cur[IDX_C2HII] - k[1472]*y_cur[IDX_C2HII] - + k[1473]*y_cur[IDX_C2HII] - k[1620]*y_cur[IDX_C2H3II] - + k[1676]*y_cur[IDX_C2H4II] - k[1722]*y_cur[IDX_C2H5II] - + k[1752]*y_cur[IDX_C3II] - k[1816]*y_cur[IDX_C3H5II] - + k[2079]*y_cur[IDX_CH3II] - k[2228]*y_cur[IDX_CH5II] - + k[2689]*y_cur[IDX_H3II] - k[2804]*y_cur[IDX_H3OII] - + k[2894]*y_cur[IDX_HCNHII] - k[2895]*y_cur[IDX_HCNHII] - + k[2964]*y_cur[IDX_HCOII] - k[3234]*y_cur[IDX_HeII] - + k[3235]*y_cur[IDX_HeII] - k[3236]*y_cur[IDX_HeII] - + k[3237]*y_cur[IDX_HeII] - k[3374]*y_cur[IDX_N2HII] - + k[5508]*y_cur[IDX_C2H2II] - k[5517]*y_cur[IDX_C4H2II] - + k[5537]*y_cur[IDX_CH3II] - k[5846] - k[6171] - k[7001]; + data[jistart + 8661] = 0.0 - k[1470]*y_cur[IDX_HC3NI] - k[1471]*y_cur[IDX_HC3NI] - + k[1472]*y_cur[IDX_HC3NI] - k[1473]*y_cur[IDX_HC3NI]; + data[jistart + 8662] = 0.0 + k[91]*y_cur[IDX_HI]; + data[jistart + 8663] = 0.0 - k[1676]*y_cur[IDX_HC3NI]; + data[jistart + 8664] = 0.0 - k[3374]*y_cur[IDX_HC3NI]; + data[jistart + 8665] = 0.0 + k[5256]*y_cur[IDX_NI]; + data[jistart + 8666] = 0.0 + k[493]*y_cur[IDX_HC3NII]; + data[jistart + 8667] = 0.0 - k[5517]*y_cur[IDX_HC3NI]; + data[jistart + 8668] = 0.0 - k[2894]*y_cur[IDX_HC3NI] - k[2895]*y_cur[IDX_HC3NI]; + data[jistart + 8669] = 0.0 + k[4902]*y_cur[IDX_C2HI]; + data[jistart + 8670] = 0.0 + k[239]*y_cur[IDX_HC3NII]; + data[jistart + 8671] = 0.0 - k[1620]*y_cur[IDX_HC3NI]; + data[jistart + 8672] = 0.0 + k[2172]*y_cur[IDX_C4NII]; + data[jistart + 8673] = 0.0 + k[4901]*y_cur[IDX_HCNI] + k[4902]*y_cur[IDX_HNCI] + + k[4903]*y_cur[IDX_NCCNI] + k[5514]*y_cur[IDX_CNI]; + data[jistart + 8674] = 0.0 + k[4901]*y_cur[IDX_C2HI]; + data[jistart + 8675] = 0.0 + k[607]*y_cur[IDX_HC3NII] + k[3580]*y_cur[IDX_HC3NHII]; + data[jistart + 8676] = 0.0 - k[5508]*y_cur[IDX_HC3NI]; + data[jistart + 8677] = 0.0 - k[2079]*y_cur[IDX_HC3NI] - k[5537]*y_cur[IDX_HC3NI]; + data[jistart + 8678] = 0.0 + k[229]*y_cur[IDX_HC3NII] + k[5104]*y_cur[IDX_CNI]; + data[jistart + 8679] = 0.0 + k[5104]*y_cur[IDX_C2H2I] + k[5514]*y_cur[IDX_C2HI]; + data[jistart + 8680] = 0.0 + k[8633]*y_cur[IDX_GC3NI]; + data[jistart + 8681] = 0.0 + k[113]*y_cur[IDX_C3HM] + k[5232]*y_cur[IDX_C3H2I] + + k[5256]*y_cur[IDX_CH2CCHI]; + data[jistart + 8682] = 0.0 - k[2804]*y_cur[IDX_HC3NI]; + data[jistart + 8683] = 0.0 - k[3234]*y_cur[IDX_HC3NI] - k[3235]*y_cur[IDX_HC3NI] - + k[3236]*y_cur[IDX_HC3NI] - k[3237]*y_cur[IDX_HC3NI]; + data[jistart + 8684] = 0.0 - k[1398]*y_cur[IDX_HC3NI] - k[1399]*y_cur[IDX_HC3NI] - + k[1400]*y_cur[IDX_HC3NI] - k[1401]*y_cur[IDX_HC3NI]; + data[jistart + 8685] = 0.0 + k[2532]*y_cur[IDX_C4NII]; + data[jistart + 8686] = 0.0 - k[383]*y_cur[IDX_HC3NI] + k[2320]*y_cur[IDX_CH3C3NI] + + k[3024]*y_cur[IDX_HNC3I]; + data[jistart + 8687] = 0.0 + k[4948]*y_cur[IDX_CH2CNI]; + data[jistart + 8688] = 0.0 - k[2964]*y_cur[IDX_HC3NI]; + data[jistart + 8689] = 0.0 - k[2689]*y_cur[IDX_HC3NI]; + data[jistart + 8690] = 0.0 + k[6639]*y_cur[IDX_HC3NHII] + k[6651]*y_cur[IDX_CH2CHCNII] + + k[6745]*y_cur[IDX_H2C4NII] + k[6760]*y_cur[IDX_CH3C3NII] + + k[6766]*y_cur[IDX_CH3C3NHII] + k[6792]*y_cur[IDX_HC5NHII]; + data[jistart + 8691] = 0.0 + k[912]*y_cur[IDX_CH2CHCNII] + k[926]*y_cur[IDX_CH3C3NII] + + k[928]*y_cur[IDX_CH3C3NHII] + k[988]*y_cur[IDX_H2C4NII] + + k[1068]*y_cur[IDX_HC3NHII] + k[1080]*y_cur[IDX_HC5NHII]; + data[jistart + 8692] = 0.0 + k[91]*y_cur[IDX_C3NM] + k[5213]*y_cur[IDX_HNC3I]; + data[jistart + 8693] = 0.0 + k[7205] + k[7387] + k[7571]; + data[jistart + 8694] = 0.0 + k[1148]*y_cur[IDX_eM] + k[2580]*y_cur[IDX_H2SI] + + k[2880]*y_cur[IDX_HCNI] + k[3591]*y_cur[IDX_NH3I] + + k[6720]*y_cur[IDX_GRAINM]; + data[jistart + 8695] = 0.0 + k[4796]*y_cur[IDX_SiSII]; + data[jistart + 8696] = 0.0 + k[4655]*y_cur[IDX_SiSII]; + data[jistart + 8697] = 0.0 + k[4866]*y_cur[IDX_SiSII]; + data[jistart + 8698] = 0.0 + k[3920]*y_cur[IDX_CM] + k[3955]*y_cur[IDX_C10M] + + k[3990]*y_cur[IDX_C10HM] + k[4025]*y_cur[IDX_C2M] + + k[4060]*y_cur[IDX_C2HM] + k[4095]*y_cur[IDX_C3M] + + k[4130]*y_cur[IDX_C3HM] + k[4165]*y_cur[IDX_C3NM] + + k[4200]*y_cur[IDX_C4M] + k[4235]*y_cur[IDX_C4HM] + + k[4270]*y_cur[IDX_C5M] + k[4305]*y_cur[IDX_C5HM] + + k[4340]*y_cur[IDX_C5NM] + k[4375]*y_cur[IDX_C6M] + + k[4410]*y_cur[IDX_C6HM] + k[4445]*y_cur[IDX_C7M] + + k[4480]*y_cur[IDX_C7HM] + k[4515]*y_cur[IDX_C8M] + + k[4550]*y_cur[IDX_C8HM] + k[4585]*y_cur[IDX_C9M] + + k[4620]*y_cur[IDX_C9HM] + k[4655]*y_cur[IDX_CHM] + + k[4690]*y_cur[IDX_CNM] + k[4726]*y_cur[IDX_HM] + + k[4761]*y_cur[IDX_OM] + k[4796]*y_cur[IDX_O2M] + + k[4831]*y_cur[IDX_OHM] + k[4866]*y_cur[IDX_SM]; + data[jistart + 8699] = 0.0 + k[4060]*y_cur[IDX_SiSII]; + data[jistart + 8700] = 0.0 + k[4235]*y_cur[IDX_SiSII]; + data[jistart + 8701] = 0.0 + k[4831]*y_cur[IDX_SiSII]; + data[jistart + 8702] = 0.0 + k[3990]*y_cur[IDX_SiSII]; + data[jistart + 8703] = 0.0 + k[4130]*y_cur[IDX_SiSII]; + data[jistart + 8704] = 0.0 + k[4410]*y_cur[IDX_SiSII]; + data[jistart + 8705] = 0.0 + k[4550]*y_cur[IDX_SiSII]; + data[jistart + 8706] = 0.0 + k[4480]*y_cur[IDX_SiSII]; + data[jistart + 8707] = 0.0 + k[4620]*y_cur[IDX_SiSII]; + data[jistart + 8708] = 0.0 + k[3955]*y_cur[IDX_SiSII]; + data[jistart + 8709] = 0.0 + k[4305]*y_cur[IDX_SiSII]; + data[jistart + 8710] = 0.0 + k[4340]*y_cur[IDX_SiSII]; + data[jistart + 8711] = 0.0 + k[3920]*y_cur[IDX_SiSII]; + data[jistart + 8712] = 0.0 + k[4761]*y_cur[IDX_SiSII]; + data[jistart + 8713] = 0.0 + k[4585]*y_cur[IDX_SiSII]; + data[jistart + 8714] = 0.0 + k[4726]*y_cur[IDX_SiSII]; + data[jistart + 8715] = 0.0 - k[204]*y_cur[IDX_CII] - k[435]*y_cur[IDX_HII] - + k[706]*y_cur[IDX_SII] - k[1448]*y_cur[IDX_CII] - + k[2761]*y_cur[IDX_H3II] - k[3006]*y_cur[IDX_HCOII] - + k[3334]*y_cur[IDX_HeII] - k[3335]*y_cur[IDX_HeII] - k[5935] - + k[6288] - k[7023]; + data[jistart + 8716] = 0.0 + k[4515]*y_cur[IDX_SiSII]; + data[jistart + 8717] = 0.0 + k[4025]*y_cur[IDX_SiSII]; + data[jistart + 8718] = 0.0 + k[4095]*y_cur[IDX_SiSII]; + data[jistart + 8719] = 0.0 + k[4200]*y_cur[IDX_SiSII]; + data[jistart + 8720] = 0.0 + k[4375]*y_cur[IDX_SiSII]; + data[jistart + 8721] = 0.0 + k[4270]*y_cur[IDX_SiSII]; + data[jistart + 8722] = 0.0 + k[4445]*y_cur[IDX_SiSII]; + data[jistart + 8723] = 0.0 + k[4165]*y_cur[IDX_SiSII]; + data[jistart + 8724] = 0.0 + k[4690]*y_cur[IDX_SiSII]; + data[jistart + 8725] = 0.0 + k[2580]*y_cur[IDX_HSiSII]; + data[jistart + 8726] = 0.0 - k[706]*y_cur[IDX_SiSI]; + data[jistart + 8727] = 0.0 + k[2880]*y_cur[IDX_HSiSII]; + data[jistart + 8728] = 0.0 + k[3591]*y_cur[IDX_HSiSII]; + data[jistart + 8729] = 0.0 - k[3334]*y_cur[IDX_SiSI] - k[3335]*y_cur[IDX_SiSI]; + data[jistart + 8730] = 0.0 - k[204]*y_cur[IDX_SiSI] - k[1448]*y_cur[IDX_SiSI]; + data[jistart + 8731] = 0.0 - k[435]*y_cur[IDX_SiSI]; + data[jistart + 8732] = 0.0 - k[3006]*y_cur[IDX_SiSI]; + data[jistart + 8733] = 0.0 - k[2761]*y_cur[IDX_SiSI]; + data[jistart + 8734] = 0.0 + k[6720]*y_cur[IDX_HSiSII]; + data[jistart + 8735] = 0.0 + k[1148]*y_cur[IDX_HSiSII]; + data[jistart + 8736] = 0.0 + k[2413]*y_cur[IDX_H2I]; + data[jistart + 8737] = 0.0 + k[1540]*y_cur[IDX_C2H2I]; + data[jistart + 8738] = 0.0 + k[3021]*y_cur[IDX_HII]; + data[jistart + 8739] = 0.0 + k[3461]*y_cur[IDX_NI]; + data[jistart + 8740] = 0.0 + k[2157]*y_cur[IDX_CH4I] + k[2406]*y_cur[IDX_H2I] + + k[2867]*y_cur[IDX_HCNI]; + data[jistart + 8741] = 0.0 + k[2335]*y_cur[IDX_HII] + k[3218]*y_cur[IDX_HeII]; + data[jistart + 8742] = 0.0 + k[3119]*y_cur[IDX_HeII]; + data[jistart + 8743] = 0.0 + k[2300]*y_cur[IDX_HII] + k[3096]*y_cur[IDX_HeII]; + data[jistart + 8744] = 0.0 + k[1995]*y_cur[IDX_CH2I] + k[2148]*y_cur[IDX_CH4I]; + data[jistart + 8745] = 0.0 - k[1756]*y_cur[IDX_C3HII] - k[1757]*y_cur[IDX_C3HII] - + k[1758]*y_cur[IDX_C3HII]; + data[jistart + 8746] = 0.0 + k[3185]*y_cur[IDX_HeII]; + data[jistart + 8747] = 0.0 - k[2122]*y_cur[IDX_C3HII] - k[2123]*y_cur[IDX_C3HII]; + data[jistart + 8748] = 0.0 + k[1400]*y_cur[IDX_CII] + k[3235]*y_cur[IDX_HeII]; + data[jistart + 8749] = 0.0 - k[600]*y_cur[IDX_NH3I] - k[621]*y_cur[IDX_NOI] - + k[789]*y_cur[IDX_eM] - k[790]*y_cur[IDX_eM] - + k[1544]*y_cur[IDX_C2H2I] - k[1689]*y_cur[IDX_C2H4I] - + k[1690]*y_cur[IDX_C2H4I] - k[1753]*y_cur[IDX_CO2I] - + k[1754]*y_cur[IDX_C4H2I] - k[1755]*y_cur[IDX_C4H2I] - + k[1756]*y_cur[IDX_OCSI] - k[1757]*y_cur[IDX_OCSI] - + k[1758]*y_cur[IDX_OCSI] - k[2122]*y_cur[IDX_CH3OHI] - + k[2123]*y_cur[IDX_CH3OHI] - k[2160]*y_cur[IDX_CH4I] - + k[2161]*y_cur[IDX_CH4I] - k[2407]*y_cur[IDX_H2I] - + k[2528]*y_cur[IDX_H2OI] - k[2529]*y_cur[IDX_H2OI] - + k[2530]*y_cur[IDX_H2OI] - k[2576]*y_cur[IDX_H2SI] - + k[2577]*y_cur[IDX_H2SI] - k[2578]*y_cur[IDX_H2SI] - + k[3394]*y_cur[IDX_NI] - k[3562]*y_cur[IDX_NH3I] - + k[3563]*y_cur[IDX_NH3I] - k[3626]*y_cur[IDX_NOI] - + k[3669]*y_cur[IDX_O2I] - k[3670]*y_cur[IDX_O2I] - + k[3671]*y_cur[IDX_O2I] - k[3872]*y_cur[IDX_SiI] - + k[5550]*y_cur[IDX_H2I] - k[5551]*y_cur[IDX_H2I] - + k[6459]*y_cur[IDX_GRAINM] - k[6460]*y_cur[IDX_GRAINM]; + data[jistart + 8750] = 0.0 + k[2241]*y_cur[IDX_CHI]; + data[jistart + 8751] = 0.0 + k[2831]*y_cur[IDX_HI]; + data[jistart + 8752] = 0.0 - k[1753]*y_cur[IDX_C3HII]; + data[jistart + 8753] = 0.0 + k[3163]*y_cur[IDX_HeII]; + data[jistart + 8754] = 0.0 + k[3122]*y_cur[IDX_HeII]; + data[jistart + 8755] = 0.0 + k[335]*y_cur[IDX_HII]; + data[jistart + 8756] = 0.0 + k[2601]*y_cur[IDX_H3II] + k[2771]*y_cur[IDX_H3OII] + + k[2906]*y_cur[IDX_HCOII]; + data[jistart + 8757] = 0.0 + k[1402]*y_cur[IDX_CII] - k[1754]*y_cur[IDX_C3HII] - + k[1755]*y_cur[IDX_C3HII]; + data[jistart + 8758] = 0.0 + k[3405]*y_cur[IDX_NI]; + data[jistart + 8759] = 0.0 + k[1995]*y_cur[IDX_C2II]; + data[jistart + 8760] = 0.0 + k[1303]*y_cur[IDX_CII] - k[1689]*y_cur[IDX_C3HII] - + k[1690]*y_cur[IDX_C3HII]; + data[jistart + 8761] = 0.0 - k[3669]*y_cur[IDX_C3HII] - k[3670]*y_cur[IDX_C3HII] - + k[3671]*y_cur[IDX_C3HII]; + data[jistart + 8762] = 0.0 - k[2576]*y_cur[IDX_C3HII] - k[2577]*y_cur[IDX_C3HII] - + k[2578]*y_cur[IDX_C3HII]; + data[jistart + 8763] = 0.0 - k[3872]*y_cur[IDX_C3HII]; + data[jistart + 8764] = 0.0 + k[1851]*y_cur[IDX_CI]; + data[jistart + 8765] = 0.0 - k[621]*y_cur[IDX_C3HII] - k[3626]*y_cur[IDX_C3HII]; + data[jistart + 8766] = 0.0 + k[2148]*y_cur[IDX_C2II] + k[2157]*y_cur[IDX_C3II] - + k[2160]*y_cur[IDX_C3HII] - k[2161]*y_cur[IDX_C3HII]; + data[jistart + 8767] = 0.0 + k[2867]*y_cur[IDX_C3II]; + data[jistart + 8768] = 0.0 + k[2241]*y_cur[IDX_C2HII]; + data[jistart + 8769] = 0.0 + k[2041]*y_cur[IDX_CH3II]; + data[jistart + 8770] = 0.0 - k[600]*y_cur[IDX_C3HII] - k[3562]*y_cur[IDX_C3HII] - + k[3563]*y_cur[IDX_C3HII]; + data[jistart + 8771] = 0.0 + k[1850]*y_cur[IDX_CI]; + data[jistart + 8772] = 0.0 + k[2041]*y_cur[IDX_C2I]; + data[jistart + 8773] = 0.0 + k[1300]*y_cur[IDX_CII] + k[1540]*y_cur[IDX_C2NII] - + k[1544]*y_cur[IDX_C3HII]; + data[jistart + 8774] = 0.0 - k[3394]*y_cur[IDX_C3HII] + k[3405]*y_cur[IDX_C4H2II] + + k[3461]*y_cur[IDX_HC3NII]; + data[jistart + 8775] = 0.0 + k[2771]*y_cur[IDX_C3I]; + data[jistart + 8776] = 0.0 + k[3096]*y_cur[IDX_C3H2I] + k[3119]*y_cur[IDX_C5H2I] + + k[3122]*y_cur[IDX_C5HI] + k[3163]*y_cur[IDX_CH2CCHI] + + k[3185]*y_cur[IDX_CH3CCHI] + k[3218]*y_cur[IDX_H2CCCI] + + k[3235]*y_cur[IDX_HC3NI]; + data[jistart + 8777] = 0.0 + k[1300]*y_cur[IDX_C2H2I] + k[1303]*y_cur[IDX_C2H4I] + + k[1400]*y_cur[IDX_HC3NI] + k[1402]*y_cur[IDX_C4H2I]; + data[jistart + 8778] = 0.0 - k[2528]*y_cur[IDX_C3HII] - k[2529]*y_cur[IDX_C3HII] - + k[2530]*y_cur[IDX_C3HII]; + data[jistart + 8779] = 0.0 + k[335]*y_cur[IDX_C3HI] + k[2300]*y_cur[IDX_C3H2I] + + k[2335]*y_cur[IDX_H2CCCI] + k[3021]*y_cur[IDX_HNC3I]; + data[jistart + 8780] = 0.0 + k[1850]*y_cur[IDX_C2H2II] + k[1851]*y_cur[IDX_C2H3II]; + data[jistart + 8781] = 0.0 + k[2906]*y_cur[IDX_C3I]; + data[jistart + 8782] = 0.0 + k[2601]*y_cur[IDX_C3I]; + data[jistart + 8783] = 0.0 - k[6459]*y_cur[IDX_C3HII] - k[6460]*y_cur[IDX_C3HII]; + data[jistart + 8784] = 0.0 + k[2406]*y_cur[IDX_C3II] - k[2407]*y_cur[IDX_C3HII] + + k[2413]*y_cur[IDX_C4NII] - k[5550]*y_cur[IDX_C3HII] - k[5551]*y_cur[IDX_C3HII]; - data[jistart + 6545] = 0.0 + k[1617]*y_cur[IDX_C2H3II] - - k[2485]*y_cur[IDX_CH2CCHII] - k[2486]*y_cur[IDX_CH2CCHII] + - k[2681]*y_cur[IDX_H3II] + k[2798]*y_cur[IDX_H3OII] + - k[2957]*y_cur[IDX_HCOII]; - data[jistart + 6546] = 0.0 + k[2647]*y_cur[IDX_CH3CCHI] + - k[2681]*y_cur[IDX_H2CCCI]; - data[jistart + 6547] = 0.0 + k[2798]*y_cur[IDX_H2CCCI]; - data[jistart + 6548] = 0.0 + k[2957]*y_cur[IDX_H2CCCI]; - data[jistart + 6549] = 0.0 + k[3166]*y_cur[IDX_CH2CHCNI] + - k[3187]*y_cur[IDX_CH3CCHI]; - data[jistart + 6550] = 0.0 - k[3453]*y_cur[IDX_CH2CCHII]; - data[jistart + 6551] = 0.0 - k[3726]*y_cur[IDX_CH2CCHII]; - data[jistart + 6552] = 0.0 - k[4733]*y_cur[IDX_CH2CCHII]; - data[jistart + 6553] = 0.0 - k[4768]*y_cur[IDX_CH2CCHII]; - data[jistart + 6554] = 0.0 - k[4803]*y_cur[IDX_CH2CCHII]; - data[jistart + 6555] = 0.0 - k[3838]*y_cur[IDX_CH2CCHII]; - data[jistart + 6556] = 0.0 - k[4838]*y_cur[IDX_CH2CCHII]; - data[jistart + 6557] = 0.0 - k[3879]*y_cur[IDX_CH2CCHII] - - k[3880]*y_cur[IDX_CH2CCHII]; - data[jistart + 6558] = 0.0 - k[910]*y_cur[IDX_CH2CCHII] - - k[911]*y_cur[IDX_CH2CCHII]; - data[jistart + 6559] = 0.0 - k[4946]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6560] = 0.0 - k[161]*y_cur[IDX_CH2CCH2I] - - k[1343]*y_cur[IDX_CH2CCH2I] - k[1344]*y_cur[IDX_CH2CCH2I] - - k[1345]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6561] = 0.0 - k[4894]*y_cur[IDX_CH2CCH2I] - - k[4895]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6562] = 0.0 + k[5065]*y_cur[IDX_CHI]; - data[jistart + 6563] = 0.0 - k[1771]*y_cur[IDX_CH2CCH2I] - - k[1772]*y_cur[IDX_CH2CCH2I] - k[1773]*y_cur[IDX_CH2CCH2I] - - k[1774]*y_cur[IDX_CH2CCH2I] - k[1775]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6564] = 0.0 - k[1808]*y_cur[IDX_CH2CCH2I] - - k[1809]*y_cur[IDX_CH2CCH2I] - k[1810]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6565] = 0.0 + k[810]*y_cur[IDX_eM] + - k[6507]*y_cur[IDX_GRAINM]; - data[jistart + 6566] = 0.0 - k[5022]*y_cur[IDX_CH2CCH2I] - - k[5023]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6567] = 0.0 + k[5065]*y_cur[IDX_C2H4I] - - k[5067]*y_cur[IDX_CH2CCH2I] + k[5071]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 6568] = 0.0 - k[161]*y_cur[IDX_CII] - - k[669]*y_cur[IDX_O2II] - k[711]*y_cur[IDX_SOII] - - k[1343]*y_cur[IDX_CII] - k[1344]*y_cur[IDX_CII] - - k[1345]*y_cur[IDX_CII] - k[1771]*y_cur[IDX_C3H2II] - - k[1772]*y_cur[IDX_C3H2II] - k[1773]*y_cur[IDX_C3H2II] - - k[1774]*y_cur[IDX_C3H2II] - k[1775]*y_cur[IDX_C3H2II] - - k[1808]*y_cur[IDX_C3H4II] - k[1809]*y_cur[IDX_C3H4II] - - k[1810]*y_cur[IDX_C3H4II] - k[2635]*y_cur[IDX_H3II] - - k[3656]*y_cur[IDX_O2II] - k[3657]*y_cur[IDX_O2II] - - k[3851]*y_cur[IDX_SOII] - k[3852]*y_cur[IDX_SOII] - - k[3853]*y_cur[IDX_SOII] - k[3854]*y_cur[IDX_SOII] - - k[3855]*y_cur[IDX_SOII] - k[4894]*y_cur[IDX_C2HI] - - k[4895]*y_cur[IDX_C2HI] - k[4946]*y_cur[IDX_CI] - - k[5022]*y_cur[IDX_C4HI] - k[5023]*y_cur[IDX_C4HI] - - k[5067]*y_cur[IDX_CHI] - k[5109]*y_cur[IDX_CNI] - - k[5381]*y_cur[IDX_OI] - k[5382]*y_cur[IDX_OI] - - k[5383]*y_cur[IDX_OI] - k[5780] - k[5781] - k[6080] - k[6081] - - k[6082] - k[6951]; - data[jistart + 6569] = 0.0 + k[5784] + k[6085]; - data[jistart + 6570] = 0.0 + k[2118]*y_cur[IDX_CH3COCH3II] + - k[5071]*y_cur[IDX_CHI]; - data[jistart + 6571] = 0.0 + k[2118]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 6572] = 0.0 - k[5109]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6573] = 0.0 + k[8722]*y_cur[IDX_GCHI]; - data[jistart + 6574] = 0.0 + k[8722]*y_cur[IDX_GC2H3I]; - data[jistart + 6575] = 0.0 + k[8614]*y_cur[IDX_GHI]; - data[jistart + 6576] = 0.0 + k[7133] + k[7315] + k[7497]; - data[jistart + 6577] = 0.0 + k[8614]*y_cur[IDX_GCH2CCHI]; - data[jistart + 6578] = 0.0 + k[6507]*y_cur[IDX_C3H7II]; - data[jistart + 6579] = 0.0 - k[2635]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6580] = 0.0 - k[5381]*y_cur[IDX_CH2CCH2I] - - k[5382]*y_cur[IDX_CH2CCH2I] - k[5383]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6581] = 0.0 - k[669]*y_cur[IDX_CH2CCH2I] - - k[3656]*y_cur[IDX_CH2CCH2I] - k[3657]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6582] = 0.0 - k[711]*y_cur[IDX_CH2CCH2I] - - k[3851]*y_cur[IDX_CH2CCH2I] - k[3852]*y_cur[IDX_CH2CCH2I] - - k[3853]*y_cur[IDX_CH2CCH2I] - k[3854]*y_cur[IDX_CH2CCH2I] - - k[3855]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6583] = 0.0 + k[810]*y_cur[IDX_C3H7II]; - data[jistart + 6584] = 0.0 + k[4869]*y_cur[IDX_C2H6I]; - data[jistart + 6585] = 0.0 + k[4869]*y_cur[IDX_C2I]; - data[jistart + 6586] = 0.0 + k[6038]; - data[jistart + 6587] = 0.0 + k[5067]*y_cur[IDX_CH2CCH2I] + - k[5068]*y_cur[IDX_CH3CCHI]; - data[jistart + 6588] = 0.0 + k[5067]*y_cur[IDX_CHI]; - data[jistart + 6589] = 0.0 - k[5784] - k[5785] - k[6085] - k[6086] - - k[7004]; - data[jistart + 6590] = 0.0 + k[5068]*y_cur[IDX_CHI]; - data[jistart + 6591] = 0.0 + k[8632]*y_cur[IDX_GHI]; - data[jistart + 6592] = 0.0 + k[7186] + k[7368] + k[7550]; - data[jistart + 6593] = 0.0 + k[8632]*y_cur[IDX_GC4H3I]; - data[jistart + 6594] = 0.0 - k[1348]*y_cur[IDX_CH2CHCNI] - - k[1349]*y_cur[IDX_CH2CHCNI] - k[1350]*y_cur[IDX_CH2CHCNI]; - data[jistart + 6595] = 0.0 + k[5106]*y_cur[IDX_CNI]; - data[jistart + 6596] = 0.0 - k[1348]*y_cur[IDX_CII] - - k[1349]*y_cur[IDX_CII] - k[1350]*y_cur[IDX_CII] - - k[2316]*y_cur[IDX_HII] - k[2637]*y_cur[IDX_H3II] - - k[2886]*y_cur[IDX_HCNHII] - k[2887]*y_cur[IDX_HCNHII] - - k[2939]*y_cur[IDX_HCOII] - k[3165]*y_cur[IDX_HeII] - - k[3166]*y_cur[IDX_HeII] - k[3167]*y_cur[IDX_HeII] - - k[3168]*y_cur[IDX_HeII] - k[3169]*y_cur[IDX_HeII] - k[5787] - - k[6088] - k[6089] - k[7007]; - data[jistart + 6597] = 0.0 + k[915]*y_cur[IDX_eM] + - k[3567]*y_cur[IDX_NH3I] + k[6659]*y_cur[IDX_GRAINM]; - data[jistart + 6598] = 0.0 + k[5112]*y_cur[IDX_CNI]; - data[jistart + 6599] = 0.0 + k[5106]*y_cur[IDX_C2H4I] + - k[5112]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 6600] = 0.0 + k[7189] + k[7371] + k[7553]; - data[jistart + 6601] = 0.0 + k[6659]*y_cur[IDX_CH2CHCNHII]; - data[jistart + 6602] = 0.0 - k[2316]*y_cur[IDX_CH2CHCNI]; - data[jistart + 6603] = 0.0 - k[2637]*y_cur[IDX_CH2CHCNI]; - data[jistart + 6604] = 0.0 - k[2886]*y_cur[IDX_CH2CHCNI] - - k[2887]*y_cur[IDX_CH2CHCNI]; - data[jistart + 6605] = 0.0 - k[2939]*y_cur[IDX_CH2CHCNI]; - data[jistart + 6606] = 0.0 - k[3165]*y_cur[IDX_CH2CHCNI] - - k[3166]*y_cur[IDX_CH2CHCNI] - k[3167]*y_cur[IDX_CH2CHCNI] - - k[3168]*y_cur[IDX_CH2CHCNI] - k[3169]*y_cur[IDX_CH2CHCNI]; - data[jistart + 6607] = 0.0 + k[3567]*y_cur[IDX_CH2CHCNHII]; - data[jistart + 6608] = 0.0 + k[915]*y_cur[IDX_CH2CHCNHII]; - data[jistart + 6609] = 0.0 + k[3401]*y_cur[IDX_NI]; - data[jistart + 6610] = 0.0 + k[6089]; - data[jistart + 6611] = 0.0 - k[912]*y_cur[IDX_eM] - - k[2429]*y_cur[IDX_H2I] - k[6651]*y_cur[IDX_GRAINM]; - data[jistart + 6612] = 0.0 - k[6651]*y_cur[IDX_CH2CHCNII]; - data[jistart + 6613] = 0.0 - k[2429]*y_cur[IDX_CH2CHCNII]; - data[jistart + 6614] = 0.0 + k[3401]*y_cur[IDX_C3H5II]; - data[jistart + 6615] = 0.0 - k[912]*y_cur[IDX_CH2CHCNII]; - data[jistart + 6616] = 0.0 + k[5704] + k[5989]; - data[jistart + 6617] = 0.0 + k[2637]*y_cur[IDX_H3II] + - k[2886]*y_cur[IDX_HCNHII] + k[2887]*y_cur[IDX_HCNHII] + - k[2939]*y_cur[IDX_HCOII]; - data[jistart + 6618] = 0.0 + k[2429]*y_cur[IDX_H2I]; - data[jistart + 6619] = 0.0 - k[913]*y_cur[IDX_eM] - - k[914]*y_cur[IDX_eM] - k[915]*y_cur[IDX_eM] - - k[3567]*y_cur[IDX_NH3I] - k[6657]*y_cur[IDX_GRAINM] - - k[6658]*y_cur[IDX_GRAINM] - k[6659]*y_cur[IDX_GRAINM]; - data[jistart + 6620] = 0.0 - k[6657]*y_cur[IDX_CH2CHCNHII] - - k[6658]*y_cur[IDX_CH2CHCNHII] - k[6659]*y_cur[IDX_CH2CHCNHII]; - data[jistart + 6621] = 0.0 + k[2429]*y_cur[IDX_CH2CHCNII]; - data[jistart + 6622] = 0.0 + k[2637]*y_cur[IDX_CH2CHCNI]; - data[jistart + 6623] = 0.0 + k[2886]*y_cur[IDX_CH2CHCNI] + - k[2887]*y_cur[IDX_CH2CHCNI]; - data[jistart + 6624] = 0.0 + k[2939]*y_cur[IDX_CH2CHCNI]; - data[jistart + 6625] = 0.0 - k[3567]*y_cur[IDX_CH2CHCNHII]; - data[jistart + 6626] = 0.0 - k[913]*y_cur[IDX_CH2CHCNHII] - - k[914]*y_cur[IDX_CH2CHCNHII] - k[915]*y_cur[IDX_CH2CHCNHII]; - data[jistart + 6627] = 0.0 - k[4948]*y_cur[IDX_CH2CNI]; - data[jistart + 6628] = 0.0 - k[163]*y_cur[IDX_CH2CNI]; - data[jistart + 6629] = 0.0 + k[5224]*y_cur[IDX_NI]; - data[jistart + 6630] = 0.0 + k[771]*y_cur[IDX_eM] + - k[6673]*y_cur[IDX_GRAINM]; - data[jistart + 6631] = 0.0 - k[163]*y_cur[IDX_CII] - - k[361]*y_cur[IDX_HII] - k[2638]*y_cur[IDX_H3II] - - k[3170]*y_cur[IDX_HeII] - k[4948]*y_cur[IDX_CI] - k[5788] - k[6090] - - k[6953]; - data[jistart + 6632] = 0.0 + k[944]*y_cur[IDX_eM] + - k[2283]*y_cur[IDX_COI] + k[6484]*y_cur[IDX_GRAINM]; - data[jistart + 6633] = 0.0 + k[2283]*y_cur[IDX_CH3CNII]; - data[jistart + 6634] = 0.0 + k[8747]*y_cur[IDX_GCNI]; - data[jistart + 6635] = 0.0 + k[7135] + k[7317] + k[7499]; - data[jistart + 6636] = 0.0 + k[8747]*y_cur[IDX_GCH2I]; - data[jistart + 6637] = 0.0 + k[8617]*y_cur[IDX_GHCCNI]; - data[jistart + 6638] = 0.0 + k[8617]*y_cur[IDX_GHI]; - data[jistart + 6639] = 0.0 + k[6484]*y_cur[IDX_CH3CNII] + - k[6673]*y_cur[IDX_C2H5CNHII]; - data[jistart + 6640] = 0.0 - k[361]*y_cur[IDX_CH2CNI]; - data[jistart + 6641] = 0.0 - k[2638]*y_cur[IDX_CH2CNI]; - data[jistart + 6642] = 0.0 - k[3170]*y_cur[IDX_CH2CNI]; - data[jistart + 6643] = 0.0 + k[5224]*y_cur[IDX_C2H3I]; - data[jistart + 6644] = 0.0 + k[771]*y_cur[IDX_C2H5CNHII] + - k[944]*y_cur[IDX_CH3CNII]; - data[jistart + 6645] = 0.0 + k[163]*y_cur[IDX_CH2CNI]; - data[jistart + 6646] = 0.0 + k[3530]*y_cur[IDX_NH2I] + - k[3555]*y_cur[IDX_NH3I]; - data[jistart + 6647] = 0.0 + k[3607]*y_cur[IDX_NHI]; - data[jistart + 6648] = 0.0 + k[1986]*y_cur[IDX_HCNI]; - data[jistart + 6649] = 0.0 + k[163]*y_cur[IDX_CII] + - k[361]*y_cur[IDX_HII]; - data[jistart + 6650] = 0.0 - k[916]*y_cur[IDX_eM] - - k[917]*y_cur[IDX_eM] - k[6475]*y_cur[IDX_GRAINM] - - k[6476]*y_cur[IDX_GRAINM]; - data[jistart + 6651] = 0.0 + k[2075]*y_cur[IDX_CNI]; - data[jistart + 6652] = 0.0 + k[2328]*y_cur[IDX_HII]; - data[jistart + 6653] = 0.0 + k[2075]*y_cur[IDX_CH3II]; - data[jistart + 6654] = 0.0 - k[6475]*y_cur[IDX_CH2CNII] - - k[6476]*y_cur[IDX_CH2CNII]; - data[jistart + 6655] = 0.0 + k[361]*y_cur[IDX_CH2CNI] + - k[2328]*y_cur[IDX_CH3CNI]; - data[jistart + 6656] = 0.0 + k[1986]*y_cur[IDX_CH2II]; - data[jistart + 6657] = 0.0 + k[3607]*y_cur[IDX_C2H2II]; - data[jistart + 6658] = 0.0 + k[3530]*y_cur[IDX_C2HII]; - data[jistart + 6659] = 0.0 + k[3555]*y_cur[IDX_C2HII]; - data[jistart + 6660] = 0.0 - k[916]*y_cur[IDX_CH2CNII] - - k[917]*y_cur[IDX_CH2CNII]; - data[jistart + 6661] = 0.0 - k[164]*y_cur[IDX_CH2COI]; - data[jistart + 6662] = 0.0 + k[5454]*y_cur[IDX_OHI]; - data[jistart + 6663] = 0.0 + k[5345]*y_cur[IDX_OI]; - data[jistart + 6664] = 0.0 + k[5347]*y_cur[IDX_OI]; - data[jistart + 6665] = 0.0 + k[3854]*y_cur[IDX_SOII] + - k[3855]*y_cur[IDX_SOII] + k[5381]*y_cur[IDX_OI]; - data[jistart + 6666] = 0.0 - k[164]*y_cur[IDX_CII] - - k[2639]*y_cur[IDX_H3II] - k[2786]*y_cur[IDX_H3OII] - - k[2940]*y_cur[IDX_HCOII] - k[3171]*y_cur[IDX_HeII] - - k[3172]*y_cur[IDX_HeII] - k[5157]*y_cur[IDX_HI] - k[5789] - k[5790] - - k[6091] - k[6092] - k[6961]; - data[jistart + 6667] = 0.0 + k[3663]*y_cur[IDX_O2II]; - data[jistart + 6668] = 0.0 + k[937]*y_cur[IDX_eM] + - k[6547]*y_cur[IDX_GRAINM]; - data[jistart + 6669] = 0.0 + k[948]*y_cur[IDX_eM] + - k[6518]*y_cur[IDX_GRAINM]; - data[jistart + 6670] = 0.0 + k[5811]; - data[jistart + 6671] = 0.0 + k[1287]*y_cur[IDX_eM] + - k[6714]*y_cur[IDX_GRAINM]; - data[jistart + 6672] = 0.0 + k[1293]*y_cur[IDX_eM] + - k[6734]*y_cur[IDX_GRAINM]; - data[jistart + 6673] = 0.0 + k[7143] + k[7325] + k[7507]; - data[jistart + 6674] = 0.0 + k[8620]*y_cur[IDX_GHC2OI]; - data[jistart + 6675] = 0.0 + k[8620]*y_cur[IDX_GHI]; - data[jistart + 6676] = 0.0 + k[6518]*y_cur[IDX_CH3COII] + - k[6547]*y_cur[IDX_CH3CHOII] + k[6714]*y_cur[IDX_CH3COOHII] + - k[6734]*y_cur[IDX_CH3COOH2II]; - data[jistart + 6677] = 0.0 - k[5157]*y_cur[IDX_CH2COI]; - data[jistart + 6678] = 0.0 - k[2639]*y_cur[IDX_CH2COI]; - data[jistart + 6679] = 0.0 - k[2786]*y_cur[IDX_CH2COI]; - data[jistart + 6680] = 0.0 - k[2940]*y_cur[IDX_CH2COI]; - data[jistart + 6681] = 0.0 - k[3171]*y_cur[IDX_CH2COI] - - k[3172]*y_cur[IDX_CH2COI]; - data[jistart + 6682] = 0.0 + k[5345]*y_cur[IDX_C2H3I] + - k[5347]*y_cur[IDX_C2H4I] + k[5381]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6683] = 0.0 + k[3663]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 6684] = 0.0 + k[5454]*y_cur[IDX_C2H2I]; - data[jistart + 6685] = 0.0 + k[3854]*y_cur[IDX_CH2CCH2I] + - k[3855]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6686] = 0.0 + k[937]*y_cur[IDX_CH3CHOII] + - k[948]*y_cur[IDX_CH3COII] + k[1287]*y_cur[IDX_CH3COOHII] + - k[1293]*y_cur[IDX_CH3COOH2II]; - data[jistart + 6687] = 0.0 + k[164]*y_cur[IDX_CH2COI]; - data[jistart + 6688] = 0.0 + k[2521]*y_cur[IDX_H2OI]; - data[jistart + 6689] = 0.0 + k[3654]*y_cur[IDX_O2II] + - k[3843]*y_cur[IDX_SOII]; - data[jistart + 6690] = 0.0 + k[3796]*y_cur[IDX_OHI]; - data[jistart + 6691] = 0.0 + k[1947]*y_cur[IDX_H2COI]; - data[jistart + 6692] = 0.0 + k[1979]*y_cur[IDX_H2COI]; - data[jistart + 6693] = 0.0 + k[3657]*y_cur[IDX_O2II] + - k[3851]*y_cur[IDX_SOII]; - data[jistart + 6694] = 0.0 + k[164]*y_cur[IDX_CII] + k[5789] + - k[6091]; - data[jistart + 6695] = 0.0 - k[918]*y_cur[IDX_eM] - - k[919]*y_cur[IDX_eM] - k[920]*y_cur[IDX_eM] - - k[6492]*y_cur[IDX_GRAINM] - k[6493]*y_cur[IDX_GRAINM] - - k[6494]*y_cur[IDX_GRAINM]; - data[jistart + 6696] = 0.0 - k[6492]*y_cur[IDX_CH2COII] - - k[6493]*y_cur[IDX_CH2COII] - k[6494]*y_cur[IDX_CH2COII]; - data[jistart + 6697] = 0.0 + k[1947]*y_cur[IDX_CHII] + - k[1979]*y_cur[IDX_CH2II]; - data[jistart + 6698] = 0.0 + k[2521]*y_cur[IDX_C2HII]; - data[jistart + 6699] = 0.0 + k[3654]*y_cur[IDX_C2H2I] + - k[3657]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6700] = 0.0 + k[3796]*y_cur[IDX_C2H2II]; - data[jistart + 6701] = 0.0 + k[3843]*y_cur[IDX_C2H2I] + - k[3851]*y_cur[IDX_CH2CCH2I]; - data[jistart + 6702] = 0.0 - k[918]*y_cur[IDX_CH2COII] - - k[919]*y_cur[IDX_CH2COII] - k[920]*y_cur[IDX_CH2COII]; - data[jistart + 6703] = 0.0 + k[5082]*y_cur[IDX_NH3I]; - data[jistart + 6704] = 0.0 - k[2317]*y_cur[IDX_HII] - - k[2318]*y_cur[IDX_HII] - k[2787]*y_cur[IDX_H3OII] - - k[2941]*y_cur[IDX_HCOII] - k[3173]*y_cur[IDX_HeII] - k[5791] - - k[6093] - k[6921]; - data[jistart + 6705] = 0.0 + k[921]*y_cur[IDX_eM] + - k[6408]*y_cur[IDX_GRAINM]; - data[jistart + 6706] = 0.0 + k[8717]*y_cur[IDX_GNH2I]; - data[jistart + 6707] = 0.0 + k[8743]*y_cur[IDX_GNHI]; - data[jistart + 6708] = 0.0 + k[7103] + k[7285] + k[7467]; - data[jistart + 6709] = 0.0 + k[8701]*y_cur[IDX_GNI]; - data[jistart + 6710] = 0.0 + k[8593]*y_cur[IDX_GH2CNI]; - data[jistart + 6711] = 0.0 + k[8593]*y_cur[IDX_GHI]; - data[jistart + 6712] = 0.0 + k[8701]*y_cur[IDX_GCH3I]; - data[jistart + 6713] = 0.0 + k[8743]*y_cur[IDX_GCH2I]; - data[jistart + 6714] = 0.0 + k[8717]*y_cur[IDX_GCHI]; - data[jistart + 6715] = 0.0 + k[6408]*y_cur[IDX_CH2NH2II]; - data[jistart + 6716] = 0.0 - k[2317]*y_cur[IDX_CH2NHI] - - k[2318]*y_cur[IDX_CH2NHI]; - data[jistart + 6717] = 0.0 - k[2787]*y_cur[IDX_CH2NHI]; - data[jistart + 6718] = 0.0 - k[2941]*y_cur[IDX_CH2NHI]; - data[jistart + 6719] = 0.0 - k[3173]*y_cur[IDX_CH2NHI]; - data[jistart + 6720] = 0.0 + k[5082]*y_cur[IDX_CHI]; - data[jistart + 6721] = 0.0 + k[921]*y_cur[IDX_CH2NH2II]; - data[jistart + 6722] = 0.0 + k[2787]*y_cur[IDX_H3OII] + - k[2941]*y_cur[IDX_HCOII]; - data[jistart + 6723] = 0.0 - k[921]*y_cur[IDX_eM] - - k[922]*y_cur[IDX_eM] - k[6408]*y_cur[IDX_GRAINM] - - k[6409]*y_cur[IDX_GRAINM]; - data[jistart + 6724] = 0.0 + k[3570]*y_cur[IDX_NH3I]; - data[jistart + 6725] = 0.0 - k[6408]*y_cur[IDX_CH2NH2II] - - k[6409]*y_cur[IDX_CH2NH2II]; - data[jistart + 6726] = 0.0 + k[2787]*y_cur[IDX_CH2NHI]; - data[jistart + 6727] = 0.0 + k[2941]*y_cur[IDX_CH2NHI]; - data[jistart + 6728] = 0.0 + k[3570]*y_cur[IDX_CH3CHOHII]; - data[jistart + 6729] = 0.0 - k[921]*y_cur[IDX_CH2NH2II] - - k[922]*y_cur[IDX_CH2NH2II]; - data[jistart + 6730] = 0.0 - k[5633]*y_cur[IDX_CH2OHI]; - data[jistart + 6731] = 0.0 - k[5633]*y_cur[IDX_CII] - - k[5634]*y_cur[IDX_H3II] - k[5635]*y_cur[IDX_H3OII] - - k[5636]*y_cur[IDX_HCOII] - k[5637]*y_cur[IDX_HeII] - - k[5638]*y_cur[IDX_HeII] - k[5937] - k[6290] - k[6929]; - data[jistart + 6732] = 0.0 + k[1280]*y_cur[IDX_eM] + - k[1282]*y_cur[IDX_eM] + k[6727]*y_cur[IDX_GRAINM] + - k[6729]*y_cur[IDX_GRAINM]; - data[jistart + 6733] = 0.0 + k[5666]*y_cur[IDX_HeII] + k[5945] + - k[6295]; - data[jistart + 6734] = 0.0 + k[1276]*y_cur[IDX_eM] + - k[1278]*y_cur[IDX_eM] + k[6702]*y_cur[IDX_GRAINM] + - k[6704]*y_cur[IDX_GRAINM]; - data[jistart + 6735] = 0.0 + k[5660]*y_cur[IDX_HeII] + k[5944] + - k[6294]; - data[jistart + 6736] = 0.0 + k[1274]*y_cur[IDX_eM] + - k[6698]*y_cur[IDX_GRAINM]; - data[jistart + 6737] = 0.0 + k[5818] + k[6122]; - data[jistart + 6738] = 0.0 + k[8741]*y_cur[IDX_GOHI]; - data[jistart + 6739] = 0.0 + k[7111] + k[7293] + k[7475]; - data[jistart + 6740] = 0.0 + k[8597]*y_cur[IDX_GH2COI]; - data[jistart + 6741] = 0.0 + k[8597]*y_cur[IDX_GHI]; - data[jistart + 6742] = 0.0 + k[8741]*y_cur[IDX_GCH2I]; - data[jistart + 6743] = 0.0 + k[6698]*y_cur[IDX_CH2OHCOII] + - k[6702]*y_cur[IDX_CH2OHCHOII] + k[6704]*y_cur[IDX_CH2OHCHOII] + - k[6727]*y_cur[IDX_CH2OHCH2OII] + k[6729]*y_cur[IDX_CH2OHCH2OII]; - data[jistart + 6744] = 0.0 - k[5634]*y_cur[IDX_CH2OHI]; - data[jistart + 6745] = 0.0 - k[5635]*y_cur[IDX_CH2OHI]; - data[jistart + 6746] = 0.0 - k[5636]*y_cur[IDX_CH2OHI]; - data[jistart + 6747] = 0.0 - k[5637]*y_cur[IDX_CH2OHI] - - k[5638]*y_cur[IDX_CH2OHI] + k[5660]*y_cur[IDX_CH2OHCOI] + - k[5666]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6748] = 0.0 + k[1274]*y_cur[IDX_CH2OHCOII] + - k[1276]*y_cur[IDX_CH2OHCHOII] + k[1278]*y_cur[IDX_CH2OHCHOII] + - k[1280]*y_cur[IDX_CH2OHCH2OII] + k[1282]*y_cur[IDX_CH2OHCH2OII]; - data[jistart + 6749] = 0.0 - k[1280]*y_cur[IDX_eM] - - k[1281]*y_cur[IDX_eM] - k[1282]*y_cur[IDX_eM] - - k[1283]*y_cur[IDX_eM] - k[6727]*y_cur[IDX_GRAINM] - - k[6728]*y_cur[IDX_GRAINM] - k[6729]*y_cur[IDX_GRAINM] - - k[6730]*y_cur[IDX_GRAINM]; - data[jistart + 6750] = 0.0 + k[5662]*y_cur[IDX_H3II] + - k[5663]*y_cur[IDX_H3OII] + k[5664]*y_cur[IDX_HCOII]; - data[jistart + 6751] = 0.0 - k[6727]*y_cur[IDX_CH2OHCH2OII] - - k[6728]*y_cur[IDX_CH2OHCH2OII] - k[6729]*y_cur[IDX_CH2OHCH2OII] - - k[6730]*y_cur[IDX_CH2OHCH2OII]; - data[jistart + 6752] = 0.0 + k[5662]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6753] = 0.0 + k[5663]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6754] = 0.0 + k[5664]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6755] = 0.0 - k[1280]*y_cur[IDX_CH2OHCH2OII] - - k[1281]*y_cur[IDX_CH2OHCH2OII] - k[1282]*y_cur[IDX_CH2OHCH2OII] - - k[1283]*y_cur[IDX_CH2OHCH2OII]; - data[jistart + 6756] = 0.0 - k[5661]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6757] = 0.0 + k[1283]*y_cur[IDX_eM] + - k[6730]*y_cur[IDX_GRAINM]; - data[jistart + 6758] = 0.0 - k[5661]*y_cur[IDX_CII] - - k[5662]*y_cur[IDX_H3II] - k[5663]*y_cur[IDX_H3OII] - - k[5664]*y_cur[IDX_HCOII] - k[5665]*y_cur[IDX_HeII] - - k[5666]*y_cur[IDX_HeII] - k[5945] - k[6295] - k[7026]; - data[jistart + 6759] = 0.0 + k[8762]*y_cur[IDX_GHCOI]; - data[jistart + 6760] = 0.0 + k[7208] + k[7390] + k[7565]; - data[jistart + 6761] = 0.0 + k[8652]*y_cur[IDX_GHI]; - data[jistart + 6762] = 0.0 + k[8652]*y_cur[IDX_GCH2OHCOI]; - data[jistart + 6763] = 0.0 + k[8762]*y_cur[IDX_GCH2OHI]; - data[jistart + 6764] = 0.0 + k[6730]*y_cur[IDX_CH2OHCH2OII]; - data[jistart + 6765] = 0.0 - k[5662]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6766] = 0.0 - k[5663]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6767] = 0.0 - k[5664]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6768] = 0.0 - k[5665]*y_cur[IDX_CH2OHCHOI] - - k[5666]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6769] = 0.0 + k[1283]*y_cur[IDX_CH2OHCH2OII]; - data[jistart + 6770] = 0.0 + k[5661]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 6771] = 0.0 + k[5661]*y_cur[IDX_CII]; - data[jistart + 6772] = 0.0 - k[1275]*y_cur[IDX_eM] - - k[1276]*y_cur[IDX_eM] - k[1277]*y_cur[IDX_eM] - - k[1278]*y_cur[IDX_eM] - k[1279]*y_cur[IDX_eM] - - k[6701]*y_cur[IDX_GRAINM] - k[6702]*y_cur[IDX_GRAINM] - - k[6703]*y_cur[IDX_GRAINM] - k[6704]*y_cur[IDX_GRAINM] - - k[6705]*y_cur[IDX_GRAINM]; - data[jistart + 6773] = 0.0 + k[5656]*y_cur[IDX_H3II] + - k[5657]*y_cur[IDX_H3OII] + k[5658]*y_cur[IDX_HCOII]; - data[jistart + 6774] = 0.0 - k[6701]*y_cur[IDX_CH2OHCHOII] - - k[6702]*y_cur[IDX_CH2OHCHOII] - k[6703]*y_cur[IDX_CH2OHCHOII] - - k[6704]*y_cur[IDX_CH2OHCHOII] - k[6705]*y_cur[IDX_CH2OHCHOII]; - data[jistart + 6775] = 0.0 + k[5656]*y_cur[IDX_CH2OHCOI]; - data[jistart + 6776] = 0.0 + k[5657]*y_cur[IDX_CH2OHCOI]; - data[jistart + 6777] = 0.0 + k[5658]*y_cur[IDX_CH2OHCOI]; - data[jistart + 6778] = 0.0 - k[1275]*y_cur[IDX_CH2OHCHOII] - - k[1276]*y_cur[IDX_CH2OHCHOII] - k[1277]*y_cur[IDX_CH2OHCHOII] - - k[1278]*y_cur[IDX_CH2OHCHOII] - k[1279]*y_cur[IDX_CH2OHCHOII]; - data[jistart + 6779] = 0.0 - k[5655]*y_cur[IDX_CH2OHCOI]; - data[jistart + 6780] = 0.0 + k[1279]*y_cur[IDX_eM] + - k[6705]*y_cur[IDX_GRAINM]; - data[jistart + 6781] = 0.0 - k[5655]*y_cur[IDX_CII] - - k[5656]*y_cur[IDX_H3II] - k[5657]*y_cur[IDX_H3OII] - - k[5658]*y_cur[IDX_HCOII] - k[5659]*y_cur[IDX_HeII] - - k[5660]*y_cur[IDX_HeII] - k[5944] - k[6294] - k[7020]; - data[jistart + 6782] = 0.0 + k[8761]*y_cur[IDX_GCOI]; - data[jistart + 6783] = 0.0 + k[7202] + k[7384] + k[7559]; - data[jistart + 6784] = 0.0 + k[8761]*y_cur[IDX_GCH2OHI]; - data[jistart + 6785] = 0.0 + k[6705]*y_cur[IDX_CH2OHCHOII]; - data[jistart + 6786] = 0.0 - k[5656]*y_cur[IDX_CH2OHCOI]; - data[jistart + 6787] = 0.0 - k[5657]*y_cur[IDX_CH2OHCOI]; - data[jistart + 6788] = 0.0 - k[5658]*y_cur[IDX_CH2OHCOI]; - data[jistart + 6789] = 0.0 - k[5659]*y_cur[IDX_CH2OHCOI] - - k[5660]*y_cur[IDX_CH2OHCOI]; - data[jistart + 6790] = 0.0 + k[1279]*y_cur[IDX_CH2OHCHOII]; - data[jistart + 6791] = 0.0 + k[5655]*y_cur[IDX_CH2OHCOI]; - data[jistart + 6792] = 0.0 + k[5655]*y_cur[IDX_CII]; - data[jistart + 6793] = 0.0 - k[1272]*y_cur[IDX_eM] - - k[1273]*y_cur[IDX_eM] - k[1274]*y_cur[IDX_eM] - - k[6696]*y_cur[IDX_GRAINM] - k[6697]*y_cur[IDX_GRAINM] - - k[6698]*y_cur[IDX_GRAINM]; - data[jistart + 6794] = 0.0 - k[6696]*y_cur[IDX_CH2OHCOII] - - k[6697]*y_cur[IDX_CH2OHCOII] - k[6698]*y_cur[IDX_CH2OHCOII]; - data[jistart + 6795] = 0.0 - k[1272]*y_cur[IDX_CH2OHCOII] - - k[1273]*y_cur[IDX_CH2OHCOII] - k[1274]*y_cur[IDX_CH2OHCOII]; - data[jistart + 6796] = 0.0 - k[1351]*y_cur[IDX_CH2PHI]; - data[jistart + 6797] = 0.0 - k[1351]*y_cur[IDX_CII] - - k[2319]*y_cur[IDX_HII] - k[2640]*y_cur[IDX_H3II] - - k[2788]*y_cur[IDX_H3OII] - k[2942]*y_cur[IDX_HCOII] - - k[3174]*y_cur[IDX_HeII] - k[3175]*y_cur[IDX_HeII] - - k[5384]*y_cur[IDX_OI] - k[5792] - k[6094] - k[6984]; - data[jistart + 6798] = 0.0 + k[7166] + k[7348] + k[7530]; - data[jistart + 6799] = 0.0 + k[6596]*y_cur[IDX_PCH4II]; - data[jistart + 6800] = 0.0 - k[2319]*y_cur[IDX_CH2PHI]; - data[jistart + 6801] = 0.0 - k[2640]*y_cur[IDX_CH2PHI]; - data[jistart + 6802] = 0.0 - k[2788]*y_cur[IDX_CH2PHI]; - data[jistart + 6803] = 0.0 - k[2942]*y_cur[IDX_CH2PHI]; - data[jistart + 6804] = 0.0 - k[3174]*y_cur[IDX_CH2PHI] - - k[3175]*y_cur[IDX_CH2PHI]; - data[jistart + 6805] = 0.0 - k[5384]*y_cur[IDX_CH2PHI]; - data[jistart + 6806] = 0.0 + k[1202]*y_cur[IDX_eM] + - k[6596]*y_cur[IDX_GRAINM]; - data[jistart + 6807] = 0.0 + k[1202]*y_cur[IDX_PCH4II]; - data[jistart + 6808] = 0.0 - k[4949]*y_cur[IDX_CH3I]; - data[jistart + 6809] = 0.0 - k[1352]*y_cur[IDX_CH3I] - - k[1353]*y_cur[IDX_CH3I] + k[1368]*y_cur[IDX_C2H6I] + + data[jistart + 8785] = 0.0 - k[789]*y_cur[IDX_C3HII] - k[790]*y_cur[IDX_C3HII]; + data[jistart + 8786] = 0.0 + k[2831]*y_cur[IDX_C3H2II]; + data[jistart + 8787] = 0.0 + k[1349]*y_cur[IDX_CII]; + data[jistart + 8788] = 0.0 + k[1328]*y_cur[IDX_CII]; + data[jistart + 8789] = 0.0 + k[3020]*y_cur[IDX_CH3II]; + data[jistart + 8790] = 0.0 + k[2832]*y_cur[IDX_HI]; + data[jistart + 8791] = 0.0 - k[2476]*y_cur[IDX_C3H3II] - k[2477]*y_cur[IDX_C3H3II]; + data[jistart + 8792] = 0.0 - k[1802]*y_cur[IDX_C3H3II]; + data[jistart + 8793] = 0.0 + k[1538]*y_cur[IDX_C2H2I]; + data[jistart + 8794] = 0.0 - k[1798]*y_cur[IDX_C3H3II] - k[1799]*y_cur[IDX_C3H3II]; + data[jistart + 8795] = 0.0 + k[1344]*y_cur[IDX_CII] + k[2635]*y_cur[IDX_H3II] + + k[3656]*y_cur[IDX_O2II]; + data[jistart + 8796] = 0.0 + k[1372]*y_cur[IDX_CII]; + data[jistart + 8797] = 0.0 + k[1580]*y_cur[IDX_C2H3II] - k[1786]*y_cur[IDX_C3H3II] - + k[1787]*y_cur[IDX_C3H3II] + k[2602]*y_cur[IDX_H3II] + + k[2772]*y_cur[IDX_H3OII] + k[2907]*y_cur[IDX_HCOII]; + data[jistart + 8798] = 0.0 + k[1375]*y_cur[IDX_CII]; + data[jistart + 8799] = 0.0 + k[2079]*y_cur[IDX_CH3II]; + data[jistart + 8800] = 0.0 + k[5550]*y_cur[IDX_H2I]; + data[jistart + 8801] = 0.0 - k[798]*y_cur[IDX_eM] - k[1546]*y_cur[IDX_C2H2I] - + k[1631]*y_cur[IDX_C2H3I] - k[1693]*y_cur[IDX_C2H4I] - + k[1732]*y_cur[IDX_C2HI] - k[1733]*y_cur[IDX_C2HI] - + k[1786]*y_cur[IDX_C3H2I] - k[1787]*y_cur[IDX_C3H2I] - + k[1796]*y_cur[IDX_C4HI] - k[1797]*y_cur[IDX_C4HI] - + k[1798]*y_cur[IDX_C5H2I] - k[1799]*y_cur[IDX_C5H2I] - + k[1800]*y_cur[IDX_C5HI] - k[1801]*y_cur[IDX_C5HI] - + k[1802]*y_cur[IDX_C6H2I] - k[1803]*y_cur[IDX_C6HI] - + k[1804]*y_cur[IDX_C6HI] - k[1805]*y_cur[IDX_CH2CCHI] - + k[1806]*y_cur[IDX_CH2CCHI] - k[1807]*y_cur[IDX_C4H2I] - + k[1820]*y_cur[IDX_C3HI] - k[1821]*y_cur[IDX_C3HI] - + k[1857]*y_cur[IDX_CI] - k[1858]*y_cur[IDX_CI] - + k[2476]*y_cur[IDX_H2CCCI] - k[2477]*y_cur[IDX_H2CCCI] - + k[3564]*y_cur[IDX_NH3I] - k[3565]*y_cur[IDX_NH3I] - + k[3696]*y_cur[IDX_OI] - k[3835]*y_cur[IDX_SI] - + k[3875]*y_cur[IDX_SiI] - k[3876]*y_cur[IDX_SiI] - + k[5515]*y_cur[IDX_C4H2I] - k[6473]*y_cur[IDX_GRAINM]; + data[jistart + 8802] = 0.0 + k[3109]*y_cur[IDX_HeII]; + data[jistart + 8803] = 0.0 + k[2162]*y_cur[IDX_CH4I] + k[2408]*y_cur[IDX_H2I]; + data[jistart + 8804] = 0.0 + k[3656]*y_cur[IDX_CH2CCH2I]; + data[jistart + 8805] = 0.0 + k[232]*y_cur[IDX_CH2CCHI] + k[1536]*y_cur[IDX_C2H2I]; + data[jistart + 8806] = 0.0 + k[219]*y_cur[IDX_C2H2II] + k[232]*y_cur[IDX_C2H4II] + + k[360]*y_cur[IDX_HII] - k[1805]*y_cur[IDX_C3H3II] - + k[1806]*y_cur[IDX_C3H3II]; + data[jistart + 8807] = 0.0 + k[227]*y_cur[IDX_C2H2I]; + data[jistart + 8808] = 0.0 - k[1803]*y_cur[IDX_C3H3II] - k[1804]*y_cur[IDX_C3H3II]; + data[jistart + 8809] = 0.0 - k[1800]*y_cur[IDX_C3H3II] - k[1801]*y_cur[IDX_C3H3II]; + data[jistart + 8810] = 0.0 - k[1820]*y_cur[IDX_C3H3II] - k[1821]*y_cur[IDX_C3H3II]; + data[jistart + 8811] = 0.0 - k[1796]*y_cur[IDX_C3H3II] - k[1797]*y_cur[IDX_C3H3II]; + data[jistart + 8812] = 0.0 - k[1807]*y_cur[IDX_C3H3II] - k[5515]*y_cur[IDX_C3H3II]; + data[jistart + 8813] = 0.0 - k[1693]*y_cur[IDX_C3H3II]; + data[jistart + 8814] = 0.0 + k[1578]*y_cur[IDX_C2H3II] - k[1631]*y_cur[IDX_C3H3II] + + k[2043]*y_cur[IDX_CH3II]; + data[jistart + 8815] = 0.0 - k[3875]*y_cur[IDX_C3H3II] - k[3876]*y_cur[IDX_C3H3II]; + data[jistart + 8816] = 0.0 + k[1578]*y_cur[IDX_C2H3I] + k[1580]*y_cur[IDX_C3H2I]; + data[jistart + 8817] = 0.0 + k[2162]*y_cur[IDX_C3H2II]; + data[jistart + 8818] = 0.0 - k[1732]*y_cur[IDX_C3H3II] - k[1733]*y_cur[IDX_C3H3II]; + data[jistart + 8819] = 0.0 - k[3835]*y_cur[IDX_C3H3II]; + data[jistart + 8820] = 0.0 - k[3564]*y_cur[IDX_C3H3II] - k[3565]*y_cur[IDX_C3H3II]; + data[jistart + 8821] = 0.0 + k[219]*y_cur[IDX_CH2CCHI]; + data[jistart + 8822] = 0.0 + k[2043]*y_cur[IDX_C2H3I] + k[2079]*y_cur[IDX_HC3NI] + + k[3020]*y_cur[IDX_HNC3I]; + data[jistart + 8823] = 0.0 + k[227]*y_cur[IDX_CH2CCHII] + k[1536]*y_cur[IDX_C2H4II] + + k[1538]*y_cur[IDX_C2H5II] - k[1546]*y_cur[IDX_C3H3II]; + data[jistart + 8824] = 0.0 + k[2772]*y_cur[IDX_C3H2I]; + data[jistart + 8825] = 0.0 - k[3696]*y_cur[IDX_C3H3II]; + data[jistart + 8826] = 0.0 + k[3109]*y_cur[IDX_C4H3I]; + data[jistart + 8827] = 0.0 + k[1328]*y_cur[IDX_C6H6I] + k[1344]*y_cur[IDX_CH2CCH2I] + + k[1349]*y_cur[IDX_CH2CHCNI] + k[1372]*y_cur[IDX_C2H6I] + k[1375]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 6810] = 0.0 + k[3893]*y_cur[IDX_CH3II]; - data[jistart + 6811] = 0.0 + k[3928]*y_cur[IDX_CH3II]; - data[jistart + 6812] = 0.0 + k[3963]*y_cur[IDX_CH3II]; - data[jistart + 6813] = 0.0 + k[2146]*y_cur[IDX_CH4I]; - data[jistart + 6814] = 0.0 + k[3998]*y_cur[IDX_CH3II]; - data[jistart + 6815] = 0.0 + k[2151]*y_cur[IDX_CH4I]; - data[jistart + 6816] = 0.0 + k[4033]*y_cur[IDX_CH3II]; - data[jistart + 6817] = 0.0 + k[1536]*y_cur[IDX_C2H4II] + - k[1563]*y_cur[IDX_C2H6II] + k[2133]*y_cur[IDX_CH4II] + - k[5455]*y_cur[IDX_OHI]; - data[jistart + 6818] = 0.0 + k[1484]*y_cur[IDX_C2H4I] + - k[1512]*y_cur[IDX_C2H6I]; - data[jistart + 6819] = 0.0 + k[269]*y_cur[IDX_CH3II] + - k[1578]*y_cur[IDX_C2H3II] - k[5025]*y_cur[IDX_CH3I]; - data[jistart + 6820] = 0.0 + k[755]*y_cur[IDX_eM] + - k[756]*y_cur[IDX_eM] + k[1578]*y_cur[IDX_C2H3I] + - k[6370]*y_cur[IDX_GRAINM] + k[6371]*y_cur[IDX_GRAINM]; - data[jistart + 6821] = 0.0 + k[1484]*y_cur[IDX_C2H2II] + - k[1647]*y_cur[IDX_C2H4II] + k[1712]*y_cur[IDX_PHII] + - k[1717]*y_cur[IDX_SII] + k[2135]*y_cur[IDX_CH4II] + - k[5225]*y_cur[IDX_NI] + k[5349]*y_cur[IDX_OI]; - data[jistart + 6822] = 0.0 + k[762]*y_cur[IDX_eM] + - k[1536]*y_cur[IDX_C2H2I] + k[1647]*y_cur[IDX_C2H4I] + - k[1649]*y_cur[IDX_C3H2I] + k[1651]*y_cur[IDX_C3HI] + - k[1653]*y_cur[IDX_C4HI] + k[1655]*y_cur[IDX_C5H2I] + - k[1657]*y_cur[IDX_C5HI] + k[1659]*y_cur[IDX_C6H2I] + - k[1661]*y_cur[IDX_C6HI] + k[1663]*y_cur[IDX_C7H2I] + - k[1665]*y_cur[IDX_C7HI] + k[1669]*y_cur[IDX_CH3CCHI] + - k[1671]*y_cur[IDX_C2H6I] + k[1672]*y_cur[IDX_H2CCCI] + - k[1675]*y_cur[IDX_H2SI] + k[1677]*y_cur[IDX_C4H2I] + - k[3692]*y_cur[IDX_OI] + k[6386]*y_cur[IDX_GRAINM]; - data[jistart + 6823] = 0.0 + k[5227]*y_cur[IDX_NI] + - k[5351]*y_cur[IDX_OI]; - data[jistart + 6824] = 0.0 + k[768]*y_cur[IDX_eM] + - k[6395]*y_cur[IDX_GRAINM]; - data[jistart + 6825] = 0.0 + k[2136]*y_cur[IDX_CH4II]; - data[jistart + 6826] = 0.0 + k[771]*y_cur[IDX_eM] + - k[6673]*y_cur[IDX_GRAINM]; - data[jistart + 6827] = 0.0 + k[1368]*y_cur[IDX_CII] + - k[1512]*y_cur[IDX_C2H2II] + k[1671]*y_cur[IDX_C2H4II] + - k[5069]*y_cur[IDX_CHI]; - data[jistart + 6828] = 0.0 + k[1563]*y_cur[IDX_C2H2I]; - data[jistart + 6829] = 0.0 + k[2157]*y_cur[IDX_CH4I]; - data[jistart + 6830] = 0.0 + k[4068]*y_cur[IDX_CH3II]; - data[jistart + 6831] = 0.0 + k[1651]*y_cur[IDX_C2H4II]; - data[jistart + 6832] = 0.0 + k[4103]*y_cur[IDX_CH3II]; - data[jistart + 6833] = 0.0 + k[1649]*y_cur[IDX_C2H4II]; - data[jistart + 6834] = 0.0 + k[1774]*y_cur[IDX_CH2CCH2I] + - k[1780]*y_cur[IDX_CH3CCHI] + k[2162]*y_cur[IDX_CH4I]; - data[jistart + 6835] = 0.0 + k[801]*y_cur[IDX_eM] + - k[6479]*y_cur[IDX_GRAINM]; - data[jistart + 6836] = 0.0 + k[807]*y_cur[IDX_eM] + - k[808]*y_cur[IDX_eM] + k[6504]*y_cur[IDX_GRAINM] + - k[6505]*y_cur[IDX_GRAINM]; - data[jistart + 6837] = 0.0 + k[4138]*y_cur[IDX_CH3II]; - data[jistart + 6838] = 0.0 + k[2163]*y_cur[IDX_CH4I]; - data[jistart + 6839] = 0.0 + k[2165]*y_cur[IDX_CH4I]; - data[jistart + 6840] = 0.0 + k[4173]*y_cur[IDX_CH3II]; - data[jistart + 6841] = 0.0 + k[1653]*y_cur[IDX_C2H4II] + - k[5022]*y_cur[IDX_CH2CCH2I] + k[5050]*y_cur[IDX_CH3CCHI] + - k[5053]*y_cur[IDX_CH3CHCH2I] + k[5057]*y_cur[IDX_CH4I] + - k[5058]*y_cur[IDX_CH4I]; - data[jistart + 6842] = 0.0 + k[4208]*y_cur[IDX_CH3II]; - data[jistart + 6843] = 0.0 + k[1677]*y_cur[IDX_C2H4II]; - data[jistart + 6844] = 0.0 + k[2177]*y_cur[IDX_CH4I]; - data[jistart + 6845] = 0.0 + k[4243]*y_cur[IDX_CH3II]; - data[jistart + 6846] = 0.0 + k[1657]*y_cur[IDX_C2H4II]; - data[jistart + 6847] = 0.0 + k[4278]*y_cur[IDX_CH3II]; - data[jistart + 6848] = 0.0 + k[1655]*y_cur[IDX_C2H4II]; - data[jistart + 6849] = 0.0 + k[4313]*y_cur[IDX_CH3II]; - data[jistart + 6850] = 0.0 + k[4348]*y_cur[IDX_CH3II]; - data[jistart + 6851] = 0.0 + k[1661]*y_cur[IDX_C2H4II]; - data[jistart + 6852] = 0.0 + k[4383]*y_cur[IDX_CH3II]; - data[jistart + 6853] = 0.0 + k[1659]*y_cur[IDX_C2H4II]; - data[jistart + 6854] = 0.0 + k[4418]*y_cur[IDX_CH3II]; - data[jistart + 6855] = 0.0 + k[1665]*y_cur[IDX_C2H4II]; - data[jistart + 6856] = 0.0 + k[4453]*y_cur[IDX_CH3II]; - data[jistart + 6857] = 0.0 + k[1663]*y_cur[IDX_C2H4II]; - data[jistart + 6858] = 0.0 + k[4488]*y_cur[IDX_CH3II]; - data[jistart + 6859] = 0.0 + k[4523]*y_cur[IDX_CH3II]; - data[jistart + 6860] = 0.0 + k[4558]*y_cur[IDX_CH3II]; - data[jistart + 6861] = 0.0 + k[4593]*y_cur[IDX_CH3II]; - data[jistart + 6862] = 0.0 + k[5069]*y_cur[IDX_C2H6I] + - k[5071]*y_cur[IDX_CH3CHCH2I] + k[5556]*y_cur[IDX_H2I]; - data[jistart + 6863] = 0.0 + k[4628]*y_cur[IDX_CH3II]; - data[jistart + 6864] = 0.0 + k[69]*y_cur[IDX_HM] + - k[4995]*y_cur[IDX_CH2I] + k[4995]*y_cur[IDX_CH2I] + - k[4996]*y_cur[IDX_CH4I] + k[4996]*y_cur[IDX_CH4I] + - k[4998]*y_cur[IDX_H2COI] + k[4999]*y_cur[IDX_HCOI] + - k[5000]*y_cur[IDX_HNOI] + k[5018]*y_cur[IDX_OHI] + - k[5135]*y_cur[IDX_H2I]; - data[jistart + 6865] = 0.0 + k[1981]*y_cur[IDX_H2COI]; - data[jistart + 6866] = 0.0 + k[1774]*y_cur[IDX_C3H2II] + - k[5022]*y_cur[IDX_C4HI]; - data[jistart + 6867] = 0.0 + k[5157]*y_cur[IDX_HI]; - data[jistart + 6868] = 0.0 - k[60]*y_cur[IDX_CNM] - - k[61]*y_cur[IDX_OHM] - k[70]*y_cur[IDX_HM] - k[362]*y_cur[IDX_HII] - - k[1352]*y_cur[IDX_CII] - k[1353]*y_cur[IDX_CII] - - k[2101]*y_cur[IDX_SII] - k[2102]*y_cur[IDX_SiII] - - k[2103]*y_cur[IDX_SiII] - k[2641]*y_cur[IDX_H3II] - - k[3176]*y_cur[IDX_HeII] - k[4949]*y_cur[IDX_CI] - - k[5025]*y_cur[IDX_C2H3I] - k[5026]*y_cur[IDX_CH3I] - - k[5026]*y_cur[IDX_CH3I] - k[5026]*y_cur[IDX_CH3I] - - k[5026]*y_cur[IDX_CH3I] - k[5027]*y_cur[IDX_CH3I] - - k[5027]*y_cur[IDX_CH3I] - k[5027]*y_cur[IDX_CH3I] - - k[5027]*y_cur[IDX_CH3I] - k[5028]*y_cur[IDX_CH3I] - - k[5028]*y_cur[IDX_CH3I] - k[5028]*y_cur[IDX_CH3I] - - k[5028]*y_cur[IDX_CH3I] - k[5029]*y_cur[IDX_CNI] - - k[5030]*y_cur[IDX_H2COI] - k[5031]*y_cur[IDX_H2OI] - - k[5032]*y_cur[IDX_H2SI] - k[5033]*y_cur[IDX_HCOI] - - k[5034]*y_cur[IDX_HNOI] - k[5035]*y_cur[IDX_NH2I] - - k[5036]*y_cur[IDX_NH3I] - k[5037]*y_cur[IDX_NO2I] - - k[5038]*y_cur[IDX_NOI] - k[5039]*y_cur[IDX_O2I] - - k[5040]*y_cur[IDX_O2I] - k[5041]*y_cur[IDX_O2I] - - k[5042]*y_cur[IDX_O2HI] - k[5043]*y_cur[IDX_OI] - - k[5044]*y_cur[IDX_OI] - k[5045]*y_cur[IDX_OHI] - - k[5046]*y_cur[IDX_OHI] - k[5047]*y_cur[IDX_OHI] - - k[5048]*y_cur[IDX_SI] - k[5049]*y_cur[IDX_SiI] - - k[5136]*y_cur[IDX_H2I] - k[5158]*y_cur[IDX_HI] - - k[5257]*y_cur[IDX_NI] - k[5258]*y_cur[IDX_NI] - - k[5259]*y_cur[IDX_NI] - k[5542]*y_cur[IDX_CNI] - k[5793] - k[5794] - - k[5795] - k[6097] - k[6098] - k[6099] - k[6895]; - data[jistart + 6869] = 0.0 + k[269]*y_cur[IDX_C2H3I] + - k[270]*y_cur[IDX_CH3COCH3I] + k[271]*y_cur[IDX_FeI] + - k[272]*y_cur[IDX_HCOI] + k[273]*y_cur[IDX_MgI] + - k[274]*y_cur[IDX_NOI] + k[275]*y_cur[IDX_NaI] + - k[3893]*y_cur[IDX_CM] + k[3928]*y_cur[IDX_C10M] + - k[3963]*y_cur[IDX_C10HM] + k[3998]*y_cur[IDX_C2M] + - k[4033]*y_cur[IDX_C2HM] + k[4068]*y_cur[IDX_C3M] + - k[4103]*y_cur[IDX_C3HM] + k[4138]*y_cur[IDX_C3NM] + - k[4173]*y_cur[IDX_C4M] + k[4208]*y_cur[IDX_C4HM] + - k[4243]*y_cur[IDX_C5M] + k[4278]*y_cur[IDX_C5HM] + - k[4313]*y_cur[IDX_C5NM] + k[4348]*y_cur[IDX_C6M] + - k[4383]*y_cur[IDX_C6HM] + k[4418]*y_cur[IDX_C7M] + - k[4453]*y_cur[IDX_C7HM] + k[4488]*y_cur[IDX_C8M] + - k[4523]*y_cur[IDX_C8HM] + k[4558]*y_cur[IDX_C9M] + - k[4593]*y_cur[IDX_C9HM] + k[4628]*y_cur[IDX_CHM] + - k[4663]*y_cur[IDX_CNM] + k[4698]*y_cur[IDX_HM] + - k[4734]*y_cur[IDX_OM] + k[4769]*y_cur[IDX_O2M] + - k[4804]*y_cur[IDX_OHM] + k[4839]*y_cur[IDX_SM] + - k[5612]*y_cur[IDX_eM]; - data[jistart + 6870] = 0.0 + k[5796] + k[6100]; - data[jistart + 6871] = 0.0 + k[928]*y_cur[IDX_eM] + - k[6766]*y_cur[IDX_GRAINM]; - data[jistart + 6872] = 0.0 + k[5797] + k[6101]; - data[jistart + 6873] = 0.0 + k[5798] + k[6102]; - data[jistart + 6874] = 0.0 + k[932]*y_cur[IDX_eM] + - k[6835]*y_cur[IDX_GRAINM]; - data[jistart + 6875] = 0.0 + k[5799] + k[6103]; - data[jistart + 6876] = 0.0 + k[5800] + k[6104]; - data[jistart + 6877] = 0.0 + k[934]*y_cur[IDX_eM] + - k[6868]*y_cur[IDX_GRAINM]; - data[jistart + 6878] = 0.0 + k[1669]*y_cur[IDX_C2H4II] + - k[1780]*y_cur[IDX_C3H2II] + k[3864]*y_cur[IDX_SiII] + - k[5050]*y_cur[IDX_C4HI]; - data[jistart + 6879] = 0.0 + k[1375]*y_cur[IDX_CII] + - k[3824]*y_cur[IDX_SII] + k[5053]*y_cur[IDX_C4HI] + - k[5055]*y_cur[IDX_OHI] + k[5071]*y_cur[IDX_CHI] + - k[5112]*y_cur[IDX_CNI]; - data[jistart + 6880] = 0.0 + k[5808] + k[6113]; - data[jistart + 6881] = 0.0 + k[938]*y_cur[IDX_eM] + - k[6548]*y_cur[IDX_GRAINM]; - data[jistart + 6882] = 0.0 + k[940]*y_cur[IDX_eM] + - k[943]*y_cur[IDX_eM] + k[6562]*y_cur[IDX_GRAINM] + - k[6565]*y_cur[IDX_GRAINM]; - data[jistart + 6883] = 0.0 + k[3192]*y_cur[IDX_HeII] + k[5810] + - k[6115]; - data[jistart + 6884] = 0.0 + k[947]*y_cur[IDX_eM] + - k[6503]*y_cur[IDX_GRAINM]; - data[jistart + 6885] = 0.0 + k[5643]*y_cur[IDX_HeII] + k[5938] + - k[6291]; - data[jistart + 6886] = 0.0 + k[949]*y_cur[IDX_eM] + - k[6519]*y_cur[IDX_GRAINM]; - data[jistart + 6887] = 0.0 + k[270]*y_cur[IDX_CH3II] + - k[3194]*y_cur[IDX_HeII] + k[5813] + k[5813] + k[6117] + k[6117]; - data[jistart + 6888] = 0.0 + k[951]*y_cur[IDX_eM] + - k[951]*y_cur[IDX_eM] + k[6684]*y_cur[IDX_GRAINM] + - k[6684]*y_cur[IDX_GRAINM]; - data[jistart + 6889] = 0.0 + k[952]*y_cur[IDX_eM] + - k[6692]*y_cur[IDX_GRAINM]; - data[jistart + 6890] = 0.0 + k[5673]*y_cur[IDX_HeII] + k[5946] + - k[6297]; - data[jistart + 6891] = 0.0 + k[1284]*y_cur[IDX_eM] + - k[1286]*y_cur[IDX_eM] + k[1288]*y_cur[IDX_eM] + - k[6711]*y_cur[IDX_GRAINM] + k[6713]*y_cur[IDX_GRAINM] + - k[6715]*y_cur[IDX_GRAINM]; - data[jistart + 6892] = 0.0 + k[1290]*y_cur[IDX_eM] + - k[1291]*y_cur[IDX_eM] + k[1294]*y_cur[IDX_eM] + - k[6731]*y_cur[IDX_GRAINM] + k[6732]*y_cur[IDX_GRAINM] + - k[6735]*y_cur[IDX_GRAINM]; - data[jistart + 6893] = 0.0 + k[954]*y_cur[IDX_eM] + - k[6688]*y_cur[IDX_GRAINM]; - data[jistart + 6894] = 0.0 + k[5936] + k[6289]; - data[jistart + 6895] = 0.0 + k[956]*y_cur[IDX_eM] + - k[956]*y_cur[IDX_eM] + k[6588]*y_cur[IDX_GRAINM] + - k[6588]*y_cur[IDX_GRAINM]; - data[jistart + 6896] = 0.0 + k[957]*y_cur[IDX_eM] + - k[959]*y_cur[IDX_eM] + k[6603]*y_cur[IDX_GRAINM] + - k[6605]*y_cur[IDX_GRAINM]; - data[jistart + 6897] = 0.0 + k[2137]*y_cur[IDX_CH4II] + - k[3196]*y_cur[IDX_HeII] + k[3338]*y_cur[IDX_NII] + - k[3810]*y_cur[IDX_PII] + k[3816]*y_cur[IDX_PHII] + - k[3867]*y_cur[IDX_SiII] + k[5819] + k[6124]; - data[jistart + 6898] = 0.0 + k[962]*y_cur[IDX_eM] + - k[6430]*y_cur[IDX_GRAINM]; - data[jistart + 6899] = 0.0 + k[964]*y_cur[IDX_eM] + - k[965]*y_cur[IDX_eM] + k[6441]*y_cur[IDX_GRAINM] + - k[6442]*y_cur[IDX_GRAINM]; - data[jistart + 6900] = 0.0 + k[2138]*y_cur[IDX_CH4II] + - k[2146]*y_cur[IDX_C2II] + k[2151]*y_cur[IDX_C2HII] + - k[2157]*y_cur[IDX_C3II] + k[2162]*y_cur[IDX_C3H2II] + - k[2163]*y_cur[IDX_C3OII] + k[2165]*y_cur[IDX_C4II] + - k[2177]*y_cur[IDX_C5II] + k[2190]*y_cur[IDX_COII] + - k[2191]*y_cur[IDX_CO2II] + k[2192]*y_cur[IDX_CSII] + - k[2194]*y_cur[IDX_H2COII] + k[2195]*y_cur[IDX_H2OII] + - k[2198]*y_cur[IDX_HC3NII] + k[2200]*y_cur[IDX_HCNII] + - k[2207]*y_cur[IDX_NH3II] + k[3201]*y_cur[IDX_HeII] + - k[3652]*y_cur[IDX_OM] + k[4996]*y_cur[IDX_CH2I] + - k[4996]*y_cur[IDX_CH2I] + k[5057]*y_cur[IDX_C4HI] + - k[5058]*y_cur[IDX_C4HI] + k[5059]*y_cur[IDX_CNI] + - k[5060]*y_cur[IDX_O2I] + k[5061]*y_cur[IDX_OHI] + - k[5062]*y_cur[IDX_SI] + k[5159]*y_cur[IDX_HI] + - k[5297]*y_cur[IDX_NH2I] + k[5304]*y_cur[IDX_NHI] + - k[5385]*y_cur[IDX_OI] + k[6128]; - data[jistart + 6901] = 0.0 + k[969]*y_cur[IDX_eM] + - k[2133]*y_cur[IDX_C2H2I] + k[2135]*y_cur[IDX_C2H4I] + - k[2136]*y_cur[IDX_C2H5CNI] + k[2137]*y_cur[IDX_CH3OHI] + - k[2138]*y_cur[IDX_CH4I] + k[2139]*y_cur[IDX_CO2I] + - k[2140]*y_cur[IDX_COI] + k[2141]*y_cur[IDX_H2COI] + - k[2142]*y_cur[IDX_H2OI] + k[2143]*y_cur[IDX_H2SI] + - k[2144]*y_cur[IDX_NH3I] + k[2145]*y_cur[IDX_OCSI] + - k[6328]*y_cur[IDX_GRAINM]; - data[jistart + 6902] = 0.0 + k[973]*y_cur[IDX_eM] + - k[974]*y_cur[IDX_eM] + k[6333]*y_cur[IDX_GRAINM] + - k[6334]*y_cur[IDX_GRAINM]; - data[jistart + 6903] = 0.0 - k[5029]*y_cur[IDX_CH3I] + - k[5059]*y_cur[IDX_CH4I] + k[5112]*y_cur[IDX_CH3CHCH2I] - - k[5542]*y_cur[IDX_CH3I]; - data[jistart + 6904] = 0.0 - k[60]*y_cur[IDX_CH3I] + - k[4663]*y_cur[IDX_CH3II]; - data[jistart + 6905] = 0.0 + k[2140]*y_cur[IDX_CH4II]; - data[jistart + 6906] = 0.0 + k[2190]*y_cur[IDX_CH4I]; - data[jistart + 6907] = 0.0 + k[2139]*y_cur[IDX_CH4II]; - data[jistart + 6908] = 0.0 + k[2191]*y_cur[IDX_CH4I]; - data[jistart + 6909] = 0.0 + k[2192]*y_cur[IDX_CH4I]; - data[jistart + 6910] = 0.0 + k[271]*y_cur[IDX_CH3II]; - data[jistart + 6911] = 0.0 + k[8578]*y_cur[IDX_GHI]; - data[jistart + 6912] = 0.0 + k[7077] + k[7259] + k[7441]; - data[jistart + 6913] = 0.0 + k[8578]*y_cur[IDX_GCH2I]; - data[jistart + 6914] = 0.0 + k[6328]*y_cur[IDX_CH4II] + - k[6333]*y_cur[IDX_CH5II] + k[6334]*y_cur[IDX_CH5II] + - k[6370]*y_cur[IDX_C2H3II] + k[6371]*y_cur[IDX_C2H3II] + - k[6386]*y_cur[IDX_C2H4II] + k[6395]*y_cur[IDX_C2H5II] + - k[6430]*y_cur[IDX_CH3OHII] + k[6441]*y_cur[IDX_CH3OH2II] + - k[6442]*y_cur[IDX_CH3OH2II] + k[6479]*y_cur[IDX_C3H4II] + - k[6503]*y_cur[IDX_CH3CNHII] + k[6504]*y_cur[IDX_C3H7II] + - k[6505]*y_cur[IDX_C3H7II] + k[6519]*y_cur[IDX_CH3COII] + - k[6548]*y_cur[IDX_CH3CHOII] + k[6562]*y_cur[IDX_CH3CHOHII] + - k[6565]*y_cur[IDX_CH3CHOHII] + k[6580]*y_cur[IDX_PCH3II] + - k[6588]*y_cur[IDX_CH3OCH3II] + k[6588]*y_cur[IDX_CH3OCH3II] + - k[6603]*y_cur[IDX_CH3OCH4II] + k[6605]*y_cur[IDX_CH3OCH4II] + - k[6673]*y_cur[IDX_C2H5CNHII] + k[6684]*y_cur[IDX_CH3COCH3II] + - k[6684]*y_cur[IDX_CH3COCH3II] + k[6688]*y_cur[IDX_CH3CSII] + - k[6692]*y_cur[IDX_CH3COCH4II] + k[6700]*y_cur[IDX_HCOOCH3II] + - k[6711]*y_cur[IDX_CH3COOHII] + k[6713]*y_cur[IDX_CH3COOHII] + - k[6715]*y_cur[IDX_CH3COOHII] + k[6731]*y_cur[IDX_CH3COOH2II] + - k[6732]*y_cur[IDX_CH3COOH2II] + k[6735]*y_cur[IDX_CH3COOH2II] + - k[6766]*y_cur[IDX_CH3C3NHII] + k[6769]*y_cur[IDX_NCCNCH3II] + - k[6835]*y_cur[IDX_CH3C5NHII] + k[6868]*y_cur[IDX_CH3C7NHII]; - data[jistart + 6915] = 0.0 + k[5157]*y_cur[IDX_CH2COI] - - k[5158]*y_cur[IDX_CH3I] + k[5159]*y_cur[IDX_CH4I]; - data[jistart + 6916] = 0.0 - k[362]*y_cur[IDX_CH3I]; - data[jistart + 6917] = 0.0 + k[69]*y_cur[IDX_CH2I] - - k[70]*y_cur[IDX_CH3I] + k[4698]*y_cur[IDX_CH3II]; - data[jistart + 6918] = 0.0 + k[5135]*y_cur[IDX_CH2I] - - k[5136]*y_cur[IDX_CH3I] + k[5556]*y_cur[IDX_CHI]; - data[jistart + 6919] = 0.0 + k[1672]*y_cur[IDX_C2H4II]; - data[jistart + 6920] = 0.0 + k[1981]*y_cur[IDX_CH2II] + - k[2141]*y_cur[IDX_CH4II] + k[4998]*y_cur[IDX_CH2I] - - k[5030]*y_cur[IDX_CH3I]; - data[jistart + 6921] = 0.0 + k[2194]*y_cur[IDX_CH4I]; - data[jistart + 6922] = 0.0 + k[2142]*y_cur[IDX_CH4II] - - k[5031]*y_cur[IDX_CH3I]; - data[jistart + 6923] = 0.0 + k[2195]*y_cur[IDX_CH4I]; - data[jistart + 6924] = 0.0 + k[1675]*y_cur[IDX_C2H4II] + - k[2143]*y_cur[IDX_CH4II] - k[5032]*y_cur[IDX_CH3I]; - data[jistart + 6925] = 0.0 - k[2641]*y_cur[IDX_CH3I]; - data[jistart + 6926] = 0.0 + k[2198]*y_cur[IDX_CH4I]; - data[jistart + 6927] = 0.0 + k[2200]*y_cur[IDX_CH4I]; - data[jistart + 6928] = 0.0 + k[272]*y_cur[IDX_CH3II] + - k[4999]*y_cur[IDX_CH2I] - k[5033]*y_cur[IDX_CH3I]; - data[jistart + 6929] = 0.0 + k[3252]*y_cur[IDX_HeII]; - data[jistart + 6930] = 0.0 + k[983]*y_cur[IDX_eM] + - k[6700]*y_cur[IDX_GRAINM]; - data[jistart + 6931] = 0.0 + k[5000]*y_cur[IDX_CH2I] - - k[5034]*y_cur[IDX_CH3I]; - data[jistart + 6932] = 0.0 - k[3176]*y_cur[IDX_CH3I] + - k[3192]*y_cur[IDX_CH3CNI] + k[3194]*y_cur[IDX_CH3COCH3I] + - k[3196]*y_cur[IDX_CH3OHI] + k[3201]*y_cur[IDX_CH4I] + - k[3252]*y_cur[IDX_HCOOCH3I] + k[5643]*y_cur[IDX_CH3COI] + - k[5673]*y_cur[IDX_CH3COOHI]; - data[jistart + 6933] = 0.0 + k[273]*y_cur[IDX_CH3II]; - data[jistart + 6934] = 0.0 + k[5225]*y_cur[IDX_C2H4I] + - k[5227]*y_cur[IDX_C2H5I] - k[5257]*y_cur[IDX_CH3I] - - k[5258]*y_cur[IDX_CH3I] - k[5259]*y_cur[IDX_CH3I]; - data[jistart + 6935] = 0.0 + k[3338]*y_cur[IDX_CH3OHI]; - data[jistart + 6936] = 0.0 + k[1155]*y_cur[IDX_eM] + - k[6769]*y_cur[IDX_GRAINM]; - data[jistart + 6937] = 0.0 + k[5304]*y_cur[IDX_CH4I]; - data[jistart + 6938] = 0.0 - k[5035]*y_cur[IDX_CH3I] + - k[5297]*y_cur[IDX_CH4I]; - data[jistart + 6939] = 0.0 + k[2144]*y_cur[IDX_CH4II] - - k[5036]*y_cur[IDX_CH3I]; - data[jistart + 6940] = 0.0 + k[2207]*y_cur[IDX_CH4I]; - data[jistart + 6941] = 0.0 + k[274]*y_cur[IDX_CH3II] - - k[5038]*y_cur[IDX_CH3I]; - data[jistart + 6942] = 0.0 - k[5037]*y_cur[IDX_CH3I]; - data[jistart + 6943] = 0.0 + k[275]*y_cur[IDX_CH3II]; - data[jistart + 6944] = 0.0 + k[3692]*y_cur[IDX_C2H4II] - - k[5043]*y_cur[IDX_CH3I] - k[5044]*y_cur[IDX_CH3I] + - k[5349]*y_cur[IDX_C2H4I] + k[5351]*y_cur[IDX_C2H5I] + - k[5385]*y_cur[IDX_CH4I]; - data[jistart + 6945] = 0.0 + k[3652]*y_cur[IDX_CH4I] + - k[4734]*y_cur[IDX_CH3II]; - data[jistart + 6946] = 0.0 - k[5039]*y_cur[IDX_CH3I] - - k[5040]*y_cur[IDX_CH3I] - k[5041]*y_cur[IDX_CH3I] + - k[5060]*y_cur[IDX_CH4I]; - data[jistart + 6947] = 0.0 + k[4769]*y_cur[IDX_CH3II]; - data[jistart + 6948] = 0.0 - k[5042]*y_cur[IDX_CH3I]; - data[jistart + 6949] = 0.0 + k[2145]*y_cur[IDX_CH4II]; - data[jistart + 6950] = 0.0 + k[5018]*y_cur[IDX_CH2I] - - k[5045]*y_cur[IDX_CH3I] - k[5046]*y_cur[IDX_CH3I] - - k[5047]*y_cur[IDX_CH3I] + k[5055]*y_cur[IDX_CH3CHCH2I] + - k[5061]*y_cur[IDX_CH4I] + k[5455]*y_cur[IDX_C2H2I]; - data[jistart + 6951] = 0.0 - k[61]*y_cur[IDX_CH3I] + - k[4804]*y_cur[IDX_CH3II]; - data[jistart + 6952] = 0.0 + k[3810]*y_cur[IDX_CH3OHI]; - data[jistart + 6953] = 0.0 + k[1201]*y_cur[IDX_eM] + - k[6580]*y_cur[IDX_GRAINM]; - data[jistart + 6954] = 0.0 + k[1712]*y_cur[IDX_C2H4I] + - k[3816]*y_cur[IDX_CH3OHI]; - data[jistart + 6955] = 0.0 - k[5048]*y_cur[IDX_CH3I] + - k[5062]*y_cur[IDX_CH4I]; - data[jistart + 6956] = 0.0 + k[1717]*y_cur[IDX_C2H4I] - - k[2101]*y_cur[IDX_CH3I] + k[3824]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 6957] = 0.0 + k[4839]*y_cur[IDX_CH3II]; - data[jistart + 6958] = 0.0 - k[5049]*y_cur[IDX_CH3I]; - data[jistart + 6959] = 0.0 - k[2102]*y_cur[IDX_CH3I] - - k[2103]*y_cur[IDX_CH3I] + k[3864]*y_cur[IDX_CH3CCHI] + - k[3867]*y_cur[IDX_CH3OHI]; - data[jistart + 6960] = 0.0 + k[755]*y_cur[IDX_C2H3II] + - k[756]*y_cur[IDX_C2H3II] + k[762]*y_cur[IDX_C2H4II] + - k[768]*y_cur[IDX_C2H5II] + k[771]*y_cur[IDX_C2H5CNHII] + - k[801]*y_cur[IDX_C3H4II] + k[807]*y_cur[IDX_C3H7II] + - k[808]*y_cur[IDX_C3H7II] + k[928]*y_cur[IDX_CH3C3NHII] + - k[932]*y_cur[IDX_CH3C5NHII] + k[934]*y_cur[IDX_CH3C7NHII] + - k[938]*y_cur[IDX_CH3CHOII] + k[940]*y_cur[IDX_CH3CHOHII] + - k[943]*y_cur[IDX_CH3CHOHII] + k[947]*y_cur[IDX_CH3CNHII] + - k[949]*y_cur[IDX_CH3COII] + k[951]*y_cur[IDX_CH3COCH3II] + - k[951]*y_cur[IDX_CH3COCH3II] + k[952]*y_cur[IDX_CH3COCH4II] + - k[954]*y_cur[IDX_CH3CSII] + k[956]*y_cur[IDX_CH3OCH3II] + - k[956]*y_cur[IDX_CH3OCH3II] + k[957]*y_cur[IDX_CH3OCH4II] + - k[959]*y_cur[IDX_CH3OCH4II] + k[962]*y_cur[IDX_CH3OHII] + - k[964]*y_cur[IDX_CH3OH2II] + k[965]*y_cur[IDX_CH3OH2II] + - k[969]*y_cur[IDX_CH4II] + k[973]*y_cur[IDX_CH5II] + - k[974]*y_cur[IDX_CH5II] + k[983]*y_cur[IDX_HCOOCH3II] + - k[1155]*y_cur[IDX_NCCNCH3II] + k[1201]*y_cur[IDX_PCH3II] + - k[1284]*y_cur[IDX_CH3COOHII] + k[1286]*y_cur[IDX_CH3COOHII] + - k[1288]*y_cur[IDX_CH3COOHII] + k[1290]*y_cur[IDX_CH3COOH2II] + - k[1291]*y_cur[IDX_CH3COOH2II] + k[1294]*y_cur[IDX_CH3COOH2II] + - k[5612]*y_cur[IDX_CH3II]; - data[jistart + 6961] = 0.0 - k[1894]*y_cur[IDX_CH3II]; - data[jistart + 6962] = 0.0 + k[1382]*y_cur[IDX_CH3OHI]; - data[jistart + 6963] = 0.0 - k[3893]*y_cur[IDX_CH3II]; - data[jistart + 6964] = 0.0 - k[3928]*y_cur[IDX_CH3II]; - data[jistart + 6965] = 0.0 - k[3963]*y_cur[IDX_CH3II]; - data[jistart + 6966] = 0.0 - k[2041]*y_cur[IDX_CH3II]; - data[jistart + 6967] = 0.0 - k[3998]*y_cur[IDX_CH3II]; - data[jistart + 6968] = 0.0 - k[2048]*y_cur[IDX_CH3II] - - k[2049]*y_cur[IDX_CH3II]; - data[jistart + 6969] = 0.0 + k[1996]*y_cur[IDX_CH2I]; - data[jistart + 6970] = 0.0 - k[4033]*y_cur[IDX_CH3II]; - data[jistart + 6971] = 0.0 - k[2042]*y_cur[IDX_CH3II]; - data[jistart + 6972] = 0.0 - k[269]*y_cur[IDX_CH3II] - - k[2043]*y_cur[IDX_CH3II] - k[2044]*y_cur[IDX_CH3II]; - data[jistart + 6973] = 0.0 - k[2045]*y_cur[IDX_CH3II] - - k[2046]*y_cur[IDX_CH3II] - k[2047]*y_cur[IDX_CH3II]; - data[jistart + 6974] = 0.0 + k[3691]*y_cur[IDX_OI]; - data[jistart + 6975] = 0.0 + k[2594]*y_cur[IDX_H3II]; - data[jistart + 6976] = 0.0 - k[2062]*y_cur[IDX_CH3II] - - k[2063]*y_cur[IDX_CH3II] - k[2064]*y_cur[IDX_CH3II]; - data[jistart + 6977] = 0.0 - k[4068]*y_cur[IDX_CH3II]; - data[jistart + 6978] = 0.0 - k[2051]*y_cur[IDX_CH3II]; - data[jistart + 6979] = 0.0 - k[4103]*y_cur[IDX_CH3II]; - data[jistart + 6980] = 0.0 - k[2050]*y_cur[IDX_CH3II]; - data[jistart + 6981] = 0.0 - k[4138]*y_cur[IDX_CH3II]; - data[jistart + 6982] = 0.0 - k[4173]*y_cur[IDX_CH3II]; - data[jistart + 6983] = 0.0 - k[2052]*y_cur[IDX_CH3II]; - data[jistart + 6984] = 0.0 - k[4208]*y_cur[IDX_CH3II]; - data[jistart + 6985] = 0.0 - k[2080]*y_cur[IDX_CH3II] - - k[2081]*y_cur[IDX_CH3II]; - data[jistart + 6986] = 0.0 - k[4243]*y_cur[IDX_CH3II]; - data[jistart + 6987] = 0.0 - k[2054]*y_cur[IDX_CH3II]; - data[jistart + 6988] = 0.0 - k[4278]*y_cur[IDX_CH3II]; - data[jistart + 6989] = 0.0 - k[2053]*y_cur[IDX_CH3II]; - data[jistart + 6990] = 0.0 - k[4313]*y_cur[IDX_CH3II]; - data[jistart + 6991] = 0.0 - k[4348]*y_cur[IDX_CH3II]; - data[jistart + 6992] = 0.0 - k[2056]*y_cur[IDX_CH3II]; - data[jistart + 6993] = 0.0 - k[4383]*y_cur[IDX_CH3II]; - data[jistart + 6994] = 0.0 - k[2055]*y_cur[IDX_CH3II]; - data[jistart + 6995] = 0.0 - k[4418]*y_cur[IDX_CH3II]; - data[jistart + 6996] = 0.0 - k[2058]*y_cur[IDX_CH3II]; - data[jistart + 6997] = 0.0 - k[4453]*y_cur[IDX_CH3II]; - data[jistart + 6998] = 0.0 - k[2057]*y_cur[IDX_CH3II]; - data[jistart + 6999] = 0.0 - k[4488]*y_cur[IDX_CH3II]; - data[jistart + 7000] = 0.0 - k[2060]*y_cur[IDX_CH3II]; - data[jistart + 7001] = 0.0 - k[4523]*y_cur[IDX_CH3II]; - data[jistart + 7002] = 0.0 - k[2059]*y_cur[IDX_CH3II]; - data[jistart + 7003] = 0.0 - k[4558]*y_cur[IDX_CH3II]; - data[jistart + 7004] = 0.0 - k[4593]*y_cur[IDX_CH3II]; - data[jistart + 7005] = 0.0 - k[2243]*y_cur[IDX_CH3II]; - data[jistart + 7006] = 0.0 + k[1938]*y_cur[IDX_CH3OHI] + - k[1948]*y_cur[IDX_H2COI]; - data[jistart + 7007] = 0.0 - k[4628]*y_cur[IDX_CH3II]; - data[jistart + 7008] = 0.0 + k[1996]*y_cur[IDX_C2HII] - - k[1999]*y_cur[IDX_CH3II] + k[2000]*y_cur[IDX_CH5II] + - k[2002]*y_cur[IDX_H2COII] + k[2003]*y_cur[IDX_H2OII] + - k[2004]*y_cur[IDX_H3OII] + k[2005]*y_cur[IDX_HCNII] + - k[2006]*y_cur[IDX_HCNHII] + k[2007]*y_cur[IDX_HCNHII] + - k[2008]*y_cur[IDX_HCOII] + k[2009]*y_cur[IDX_HNOII] + - k[2010]*y_cur[IDX_N2HII] + k[2011]*y_cur[IDX_NHII] + - k[2012]*y_cur[IDX_NH2II] + k[2013]*y_cur[IDX_NH3II] + - k[2015]*y_cur[IDX_O2HII] + k[2016]*y_cur[IDX_OHII] + - k[2375]*y_cur[IDX_H2II] + k[2634]*y_cur[IDX_H3II]; - data[jistart + 7009] = 0.0 + k[1987]*y_cur[IDX_HCOI] + - k[2428]*y_cur[IDX_H2I]; - data[jistart + 7010] = 0.0 - k[2061]*y_cur[IDX_CH3II]; - data[jistart + 7011] = 0.0 + k[362]*y_cur[IDX_HII] + k[5794] + - k[6098]; - data[jistart + 7012] = 0.0 - k[269]*y_cur[IDX_C2H3I] - - k[270]*y_cur[IDX_CH3COCH3I] - k[271]*y_cur[IDX_FeI] - - k[272]*y_cur[IDX_HCOI] - k[273]*y_cur[IDX_MgI] - - k[274]*y_cur[IDX_NOI] - k[275]*y_cur[IDX_NaI] - k[923]*y_cur[IDX_eM] - - k[924]*y_cur[IDX_eM] - k[925]*y_cur[IDX_eM] - - k[1894]*y_cur[IDX_CI] - k[1999]*y_cur[IDX_CH2I] - - k[2041]*y_cur[IDX_C2I] - k[2042]*y_cur[IDX_C2H2I] - - k[2043]*y_cur[IDX_C2H3I] - k[2044]*y_cur[IDX_C2H3I] - - k[2045]*y_cur[IDX_C2H4I] - k[2046]*y_cur[IDX_C2H4I] - - k[2047]*y_cur[IDX_C2H4I] - k[2048]*y_cur[IDX_C2HI] - - k[2049]*y_cur[IDX_C2HI] - k[2050]*y_cur[IDX_C3H2I] - - k[2051]*y_cur[IDX_C3HI] - k[2052]*y_cur[IDX_C4HI] - - k[2053]*y_cur[IDX_C5H2I] - k[2054]*y_cur[IDX_C5HI] - - k[2055]*y_cur[IDX_C6H2I] - k[2056]*y_cur[IDX_C6HI] - - k[2057]*y_cur[IDX_C7H2I] - k[2058]*y_cur[IDX_C7HI] - - k[2059]*y_cur[IDX_C8H2I] - k[2060]*y_cur[IDX_C8HI] - - k[2061]*y_cur[IDX_CH2CCHI] - k[2062]*y_cur[IDX_C2H6I] - - k[2063]*y_cur[IDX_C2H6I] - k[2064]*y_cur[IDX_C2H6I] - - k[2065]*y_cur[IDX_CH3CHOI] - k[2066]*y_cur[IDX_CH3CHOI] - - k[2067]*y_cur[IDX_CH3CHOI] - k[2068]*y_cur[IDX_CH3CNI] - - k[2069]*y_cur[IDX_CH3CNI] - k[2070]*y_cur[IDX_CH3COCH3I] - - k[2071]*y_cur[IDX_CH3COCH3I] - k[2072]*y_cur[IDX_CH3OCH3I] - - k[2073]*y_cur[IDX_CH3OHI] - k[2074]*y_cur[IDX_CH4I] - - k[2075]*y_cur[IDX_CNI] - k[2076]*y_cur[IDX_H2CCCI] - - k[2077]*y_cur[IDX_H2COI] - k[2078]*y_cur[IDX_H2SI] - - k[2079]*y_cur[IDX_HC3NI] - k[2080]*y_cur[IDX_C4H2I] - - k[2081]*y_cur[IDX_C4H2I] - k[2082]*y_cur[IDX_HCOI] - - k[2083]*y_cur[IDX_HClI] - k[2084]*y_cur[IDX_HSI] - - k[2085]*y_cur[IDX_N2OI] - k[2086]*y_cur[IDX_NH2I] - - k[2087]*y_cur[IDX_NH3I] - k[2088]*y_cur[IDX_NH3I] - - k[2089]*y_cur[IDX_O2I] - k[2090]*y_cur[IDX_OI] - - k[2091]*y_cur[IDX_OI] - k[2092]*y_cur[IDX_OCSI] - - k[2093]*y_cur[IDX_OHI] - k[2094]*y_cur[IDX_PI] - - k[2095]*y_cur[IDX_SI] - k[2096]*y_cur[IDX_SOI] - - k[2097]*y_cur[IDX_SiI] - k[2098]*y_cur[IDX_SiI] - - k[2099]*y_cur[IDX_SiH4I] - k[2100]*y_cur[IDX_SiHI] - - k[2243]*y_cur[IDX_CHI] - k[2837]*y_cur[IDX_HI] - - k[3020]*y_cur[IDX_HNC3I] - k[3454]*y_cur[IDX_NI] - - k[3608]*y_cur[IDX_NHI] - k[3893]*y_cur[IDX_CM] - - k[3928]*y_cur[IDX_C10M] - k[3963]*y_cur[IDX_C10HM] - - k[3998]*y_cur[IDX_C2M] - k[4033]*y_cur[IDX_C2HM] - - k[4068]*y_cur[IDX_C3M] - k[4103]*y_cur[IDX_C3HM] - - k[4138]*y_cur[IDX_C3NM] - k[4173]*y_cur[IDX_C4M] - - k[4208]*y_cur[IDX_C4HM] - k[4243]*y_cur[IDX_C5M] - - k[4278]*y_cur[IDX_C5HM] - k[4313]*y_cur[IDX_C5NM] - - k[4348]*y_cur[IDX_C6M] - k[4383]*y_cur[IDX_C6HM] - - k[4418]*y_cur[IDX_C7M] - k[4453]*y_cur[IDX_C7HM] - - k[4488]*y_cur[IDX_C8M] - k[4523]*y_cur[IDX_C8HM] - - k[4558]*y_cur[IDX_C9M] - k[4593]*y_cur[IDX_C9HM] - - k[4628]*y_cur[IDX_CHM] - k[4663]*y_cur[IDX_CNM] - - k[4698]*y_cur[IDX_HM] - k[4734]*y_cur[IDX_OM] - - k[4769]*y_cur[IDX_O2M] - k[4804]*y_cur[IDX_OHM] - - k[4839]*y_cur[IDX_SM] - k[5532]*y_cur[IDX_CH3CHOI] - - k[5533]*y_cur[IDX_CH3CNI] - k[5534]*y_cur[IDX_CH3OHI] - - k[5535]*y_cur[IDX_COI] - k[5536]*y_cur[IDX_H2OI] - - k[5537]*y_cur[IDX_HC3NI] - k[5538]*y_cur[IDX_HC5NI] - - k[5539]*y_cur[IDX_HC7NI] - k[5540]*y_cur[IDX_HCNI] - - k[5541]*y_cur[IDX_NCCNI] - k[5555]*y_cur[IDX_H2I] - - k[5612]*y_cur[IDX_eM] - k[6095] - k[6096] - - k[6321]*y_cur[IDX_GRAINM] - k[6322]*y_cur[IDX_GRAINM] - - k[6323]*y_cur[IDX_GRAINM]; - data[jistart + 7013] = 0.0 + k[2320]*y_cur[IDX_HII] + - k[3177]*y_cur[IDX_HeII]; - data[jistart + 7014] = 0.0 + k[2322]*y_cur[IDX_HII] + - k[3180]*y_cur[IDX_HeII]; - data[jistart + 7015] = 0.0 + k[2324]*y_cur[IDX_HII] + - k[3183]*y_cur[IDX_HeII]; - data[jistart + 7016] = 0.0 - k[2065]*y_cur[IDX_CH3II] - - k[2066]*y_cur[IDX_CH3II] - k[2067]*y_cur[IDX_CH3II] + - k[2653]*y_cur[IDX_H3II] + k[3191]*y_cur[IDX_HeII] - - k[5532]*y_cur[IDX_CH3II]; - data[jistart + 7017] = 0.0 - k[2068]*y_cur[IDX_CH3II] - - k[2069]*y_cur[IDX_CH3II] + k[2329]*y_cur[IDX_HII] + - k[3193]*y_cur[IDX_HeII] - k[5533]*y_cur[IDX_CH3II]; - data[jistart + 7018] = 0.0 + k[5642]*y_cur[IDX_HeII]; - data[jistart + 7019] = 0.0 - k[270]*y_cur[IDX_CH3II] - - k[2070]*y_cur[IDX_CH3II] - k[2071]*y_cur[IDX_CH3II] + - k[2661]*y_cur[IDX_H3II]; - data[jistart + 7020] = 0.0 + k[5672]*y_cur[IDX_HeII]; - data[jistart + 7021] = 0.0 - k[2072]*y_cur[IDX_CH3II] + - k[3195]*y_cur[IDX_HeII]; - data[jistart + 7022] = 0.0 + k[1382]*y_cur[IDX_CII] + - k[1938]*y_cur[IDX_CHII] - k[2073]*y_cur[IDX_CH3II] + - k[2330]*y_cur[IDX_HII] + k[2667]*y_cur[IDX_H3II] + - k[3197]*y_cur[IDX_HeII] + k[3339]*y_cur[IDX_NII] - - k[5534]*y_cur[IDX_CH3II]; - data[jistart + 7023] = 0.0 - k[2074]*y_cur[IDX_CH3II] + - k[2205]*y_cur[IDX_N2II] + k[2333]*y_cur[IDX_HII] + - k[2378]*y_cur[IDX_H2II] + k[3200]*y_cur[IDX_HeII] + - k[3340]*y_cur[IDX_NII] + k[3638]*y_cur[IDX_OII]; - data[jistart + 7024] = 0.0 + k[2839]*y_cur[IDX_HI] + - k[3727]*y_cur[IDX_OI] + k[6126]; - data[jistart + 7025] = 0.0 + k[2000]*y_cur[IDX_CH2I]; - data[jistart + 7026] = 0.0 - k[2075]*y_cur[IDX_CH3II]; - data[jistart + 7027] = 0.0 - k[4663]*y_cur[IDX_CH3II]; - data[jistart + 7028] = 0.0 - k[5535]*y_cur[IDX_CH3II]; - data[jistart + 7029] = 0.0 - k[271]*y_cur[IDX_CH3II]; - data[jistart + 7030] = 0.0 - k[6321]*y_cur[IDX_CH3II] - - k[6322]*y_cur[IDX_CH3II] - k[6323]*y_cur[IDX_CH3II]; - data[jistart + 7031] = 0.0 - k[2837]*y_cur[IDX_CH3II] + - k[2839]*y_cur[IDX_CH4II]; - data[jistart + 7032] = 0.0 + k[362]*y_cur[IDX_CH3I] + - k[2320]*y_cur[IDX_CH3C3NI] + k[2322]*y_cur[IDX_CH3C5NI] + - k[2324]*y_cur[IDX_CH3C7NI] + k[2329]*y_cur[IDX_CH3CNI] + - k[2330]*y_cur[IDX_CH3OHI] + k[2333]*y_cur[IDX_CH4I]; - data[jistart + 7033] = 0.0 - k[4698]*y_cur[IDX_CH3II]; - data[jistart + 7034] = 0.0 + k[2428]*y_cur[IDX_CH2II] - - k[5555]*y_cur[IDX_CH3II]; - data[jistart + 7035] = 0.0 + k[2375]*y_cur[IDX_CH2I] + - k[2378]*y_cur[IDX_CH4I]; - data[jistart + 7036] = 0.0 - k[2076]*y_cur[IDX_CH3II]; - data[jistart + 7037] = 0.0 + k[1948]*y_cur[IDX_CHII] - - k[2077]*y_cur[IDX_CH3II]; - data[jistart + 7038] = 0.0 + k[2002]*y_cur[IDX_CH2I]; - data[jistart + 7039] = 0.0 - k[5536]*y_cur[IDX_CH3II]; - data[jistart + 7040] = 0.0 + k[2003]*y_cur[IDX_CH2I]; - data[jistart + 7041] = 0.0 - k[2078]*y_cur[IDX_CH3II]; - data[jistart + 7042] = 0.0 + k[2594]*y_cur[IDX_C2H5OHI] + - k[2634]*y_cur[IDX_CH2I] + k[2653]*y_cur[IDX_CH3CHOI] + - k[2661]*y_cur[IDX_CH3COCH3I] + k[2667]*y_cur[IDX_CH3OHI]; - data[jistart + 7043] = 0.0 + k[2004]*y_cur[IDX_CH2I]; - data[jistart + 7044] = 0.0 - k[2079]*y_cur[IDX_CH3II] - - k[5537]*y_cur[IDX_CH3II]; - data[jistart + 7045] = 0.0 - k[5538]*y_cur[IDX_CH3II]; - data[jistart + 7046] = 0.0 - k[5539]*y_cur[IDX_CH3II]; - data[jistart + 7047] = 0.0 - k[5540]*y_cur[IDX_CH3II]; - data[jistart + 7048] = 0.0 + k[2005]*y_cur[IDX_CH2I]; - data[jistart + 7049] = 0.0 + k[2006]*y_cur[IDX_CH2I] + - k[2007]*y_cur[IDX_CH2I]; - data[jistart + 7050] = 0.0 - k[272]*y_cur[IDX_CH3II] + - k[1987]*y_cur[IDX_CH2II] - k[2082]*y_cur[IDX_CH3II]; - data[jistart + 7051] = 0.0 + k[2008]*y_cur[IDX_CH2I]; - data[jistart + 7052] = 0.0 - k[2083]*y_cur[IDX_CH3II]; - data[jistart + 7053] = 0.0 - k[3020]*y_cur[IDX_CH3II]; - data[jistart + 7054] = 0.0 + k[2009]*y_cur[IDX_CH2I]; - data[jistart + 7055] = 0.0 - k[2084]*y_cur[IDX_CH3II]; - data[jistart + 7056] = 0.0 + k[3177]*y_cur[IDX_CH3C3NI] + - k[3180]*y_cur[IDX_CH3C5NI] + k[3183]*y_cur[IDX_CH3C7NI] + - k[3191]*y_cur[IDX_CH3CHOI] + k[3193]*y_cur[IDX_CH3CNI] + - k[3195]*y_cur[IDX_CH3OCH3I] + k[3197]*y_cur[IDX_CH3OHI] + - k[3200]*y_cur[IDX_CH4I] + k[5642]*y_cur[IDX_CH3COI] + - k[5672]*y_cur[IDX_CH3COOHI]; - data[jistart + 7057] = 0.0 - k[273]*y_cur[IDX_CH3II]; - data[jistart + 7058] = 0.0 - k[3454]*y_cur[IDX_CH3II]; - data[jistart + 7059] = 0.0 + k[3339]*y_cur[IDX_CH3OHI] + - k[3340]*y_cur[IDX_CH4I]; - data[jistart + 7060] = 0.0 + k[2205]*y_cur[IDX_CH4I]; - data[jistart + 7061] = 0.0 + k[2010]*y_cur[IDX_CH2I]; - data[jistart + 7062] = 0.0 - k[2085]*y_cur[IDX_CH3II]; - data[jistart + 7063] = 0.0 - k[5541]*y_cur[IDX_CH3II]; - data[jistart + 7064] = 0.0 - k[3608]*y_cur[IDX_CH3II]; - data[jistart + 7065] = 0.0 + k[2011]*y_cur[IDX_CH2I]; - data[jistart + 7066] = 0.0 - k[2086]*y_cur[IDX_CH3II]; - data[jistart + 7067] = 0.0 + k[2012]*y_cur[IDX_CH2I]; - data[jistart + 7068] = 0.0 - k[2087]*y_cur[IDX_CH3II] - - k[2088]*y_cur[IDX_CH3II]; - data[jistart + 7069] = 0.0 + k[2013]*y_cur[IDX_CH2I]; - data[jistart + 7070] = 0.0 - k[274]*y_cur[IDX_CH3II]; - data[jistart + 7071] = 0.0 - k[275]*y_cur[IDX_CH3II]; - data[jistart + 7072] = 0.0 - k[2090]*y_cur[IDX_CH3II] - - k[2091]*y_cur[IDX_CH3II] + k[3691]*y_cur[IDX_C2H4II] + - k[3727]*y_cur[IDX_CH4II]; - data[jistart + 7073] = 0.0 + k[3638]*y_cur[IDX_CH4I]; - data[jistart + 7074] = 0.0 - k[4734]*y_cur[IDX_CH3II]; - data[jistart + 7075] = 0.0 - k[2089]*y_cur[IDX_CH3II]; - data[jistart + 7076] = 0.0 - k[4769]*y_cur[IDX_CH3II]; - data[jistart + 7077] = 0.0 + k[2015]*y_cur[IDX_CH2I]; - data[jistart + 7078] = 0.0 - k[2092]*y_cur[IDX_CH3II]; - data[jistart + 7079] = 0.0 - k[2093]*y_cur[IDX_CH3II]; - data[jistart + 7080] = 0.0 + k[2016]*y_cur[IDX_CH2I]; - data[jistart + 7081] = 0.0 - k[4804]*y_cur[IDX_CH3II]; - data[jistart + 7082] = 0.0 - k[2094]*y_cur[IDX_CH3II]; - data[jistart + 7083] = 0.0 - k[2095]*y_cur[IDX_CH3II]; - data[jistart + 7084] = 0.0 - k[4839]*y_cur[IDX_CH3II]; - data[jistart + 7085] = 0.0 - k[2096]*y_cur[IDX_CH3II]; - data[jistart + 7086] = 0.0 - k[2097]*y_cur[IDX_CH3II] - - k[2098]*y_cur[IDX_CH3II]; - data[jistart + 7087] = 0.0 - k[2100]*y_cur[IDX_CH3II]; - data[jistart + 7088] = 0.0 - k[2099]*y_cur[IDX_CH3II]; - data[jistart + 7089] = 0.0 - k[923]*y_cur[IDX_CH3II] - - k[924]*y_cur[IDX_CH3II] - k[925]*y_cur[IDX_CH3II] - - k[5612]*y_cur[IDX_CH3II]; - data[jistart + 7090] = 0.0 - k[1354]*y_cur[IDX_CH3C3NI] - - k[1355]*y_cur[IDX_CH3C3NI]; - data[jistart + 7091] = 0.0 + k[5109]*y_cur[IDX_CNI]; - data[jistart + 7092] = 0.0 - k[1354]*y_cur[IDX_CII] - - k[1355]*y_cur[IDX_CII] - k[2320]*y_cur[IDX_HII] - - k[2642]*y_cur[IDX_H3II] - k[2943]*y_cur[IDX_HCOII] - - k[3177]*y_cur[IDX_HeII] - k[5796] - k[6100] - k[7036]; - data[jistart + 7093] = 0.0 + k[927]*y_cur[IDX_eM] + - k[6765]*y_cur[IDX_GRAINM]; - data[jistart + 7094] = 0.0 + k[5110]*y_cur[IDX_CNI]; - data[jistart + 7095] = 0.0 + k[5109]*y_cur[IDX_CH2CCH2I] + - k[5110]*y_cur[IDX_CH3CCHI]; - data[jistart + 7096] = 0.0 + k[8756]*y_cur[IDX_GCH3I]; - data[jistart + 7097] = 0.0 + k[8756]*y_cur[IDX_GC3NI]; - data[jistart + 7098] = 0.0 + k[7218] + k[7400] + k[7582]; - data[jistart + 7099] = 0.0 + k[6765]*y_cur[IDX_CH3C3NHII]; - data[jistart + 7100] = 0.0 - k[2320]*y_cur[IDX_CH3C3NI]; - data[jistart + 7101] = 0.0 - k[2642]*y_cur[IDX_CH3C3NI]; - data[jistart + 7102] = 0.0 - k[2943]*y_cur[IDX_CH3C3NI]; - data[jistart + 7103] = 0.0 - k[3177]*y_cur[IDX_CH3C3NI]; - data[jistart + 7104] = 0.0 + k[927]*y_cur[IDX_CH3C3NHII]; - data[jistart + 7105] = 0.0 - k[926]*y_cur[IDX_eM] - - k[2430]*y_cur[IDX_H2I] - k[6760]*y_cur[IDX_GRAINM]; - data[jistart + 7106] = 0.0 - k[6760]*y_cur[IDX_CH3C3NII]; - data[jistart + 7107] = 0.0 - k[2430]*y_cur[IDX_CH3C3NII] + - k[2441]*y_cur[IDX_H2C4NII]; - data[jistart + 7108] = 0.0 + k[2441]*y_cur[IDX_H2I]; - data[jistart + 7109] = 0.0 - k[926]*y_cur[IDX_CH3C3NII]; - data[jistart + 7110] = 0.0 - k[1895]*y_cur[IDX_CH3C3NHII]; - data[jistart + 7111] = 0.0 + k[3408]*y_cur[IDX_NI]; - data[jistart + 7112] = 0.0 + k[5537]*y_cur[IDX_HC3NI]; - data[jistart + 7113] = 0.0 + k[2642]*y_cur[IDX_H3II] + - k[2943]*y_cur[IDX_HCOII]; - data[jistart + 7114] = 0.0 + k[2430]*y_cur[IDX_H2I]; - data[jistart + 7115] = 0.0 - k[927]*y_cur[IDX_eM] - - k[928]*y_cur[IDX_eM] - k[1895]*y_cur[IDX_CI] - - k[6765]*y_cur[IDX_GRAINM] - k[6766]*y_cur[IDX_GRAINM]; - data[jistart + 7116] = 0.0 - k[6765]*y_cur[IDX_CH3C3NHII] - - k[6766]*y_cur[IDX_CH3C3NHII]; - data[jistart + 7117] = 0.0 + k[2430]*y_cur[IDX_CH3C3NII]; - data[jistart + 7118] = 0.0 + k[2642]*y_cur[IDX_CH3C3NI]; - data[jistart + 7119] = 0.0 + k[5537]*y_cur[IDX_CH3II]; - data[jistart + 7120] = 0.0 + k[2943]*y_cur[IDX_CH3C3NI]; - data[jistart + 7121] = 0.0 + k[3408]*y_cur[IDX_C4H5II]; - data[jistart + 7122] = 0.0 - k[927]*y_cur[IDX_CH3C3NHII] - - k[928]*y_cur[IDX_CH3C3NHII]; - data[jistart + 7123] = 0.0 - k[4950]*y_cur[IDX_CH3C4HI]; - data[jistart + 7124] = 0.0 - k[1356]*y_cur[IDX_CH3C4HI] - - k[1357]*y_cur[IDX_CH3C4HI] - k[1358]*y_cur[IDX_CH3C4HI]; - data[jistart + 7125] = 0.0 + k[4870]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7126] = 0.0 + k[4894]*y_cur[IDX_CH2CCH2I] + - k[4895]*y_cur[IDX_CH2CCH2I] + k[4896]*y_cur[IDX_CH3CCHI] + - k[4897]*y_cur[IDX_CH3CCHI]; - data[jistart + 7127] = 0.0 + k[846]*y_cur[IDX_eM] + - k[6754]*y_cur[IDX_GRAINM]; - data[jistart + 7128] = 0.0 + k[4894]*y_cur[IDX_C2HI] + - k[4895]*y_cur[IDX_C2HI]; - data[jistart + 7129] = 0.0 - k[363]*y_cur[IDX_HII] - - k[1356]*y_cur[IDX_CII] - k[1357]*y_cur[IDX_CII] - - k[1358]*y_cur[IDX_CII] - k[2321]*y_cur[IDX_HII] - - k[2643]*y_cur[IDX_H3II] - k[2944]*y_cur[IDX_HCOII] - - k[3178]*y_cur[IDX_HeII] - k[3179]*y_cur[IDX_HeII] - - k[4950]*y_cur[IDX_CI] - k[5797] - k[6101] - k[7034]; - data[jistart + 7130] = 0.0 + k[4896]*y_cur[IDX_C2HI] + - k[4897]*y_cur[IDX_C2HI]; - data[jistart + 7131] = 0.0 + k[4870]*y_cur[IDX_C2I]; - data[jistart + 7132] = 0.0 + k[7216] + k[7398] + k[7580]; - data[jistart + 7133] = 0.0 + k[6754]*y_cur[IDX_C5H5II]; - data[jistart + 7134] = 0.0 - k[363]*y_cur[IDX_CH3C4HI] - - k[2321]*y_cur[IDX_CH3C4HI]; - data[jistart + 7135] = 0.0 - k[2643]*y_cur[IDX_CH3C4HI]; - data[jistart + 7136] = 0.0 - k[2944]*y_cur[IDX_CH3C4HI]; - data[jistart + 7137] = 0.0 - k[3178]*y_cur[IDX_CH3C4HI] - - k[3179]*y_cur[IDX_CH3C4HI]; - data[jistart + 7138] = 0.0 + k[846]*y_cur[IDX_C5H5II]; - data[jistart + 7139] = 0.0 + k[1508]*y_cur[IDX_CH2CCHI] + - k[1510]*y_cur[IDX_CH3CCHI]; - data[jistart + 7140] = 0.0 + k[1630]*y_cur[IDX_C3H2II] + - k[1631]*y_cur[IDX_C3H3II] + k[1643]*y_cur[IDX_CH2CCHII]; - data[jistart + 7141] = 0.0 + k[1582]*y_cur[IDX_C3H2I] + - k[1610]*y_cur[IDX_CH2CCHI] + k[1618]*y_cur[IDX_H2CCCI]; - data[jistart + 7142] = 0.0 + k[1652]*y_cur[IDX_C3HI]; - data[jistart + 7143] = 0.0 + k[1652]*y_cur[IDX_C2H4II]; - data[jistart + 7144] = 0.0 + k[1582]*y_cur[IDX_C2H3II]; - data[jistart + 7145] = 0.0 + k[1630]*y_cur[IDX_C2H3I]; - data[jistart + 7146] = 0.0 + k[1631]*y_cur[IDX_C2H3I]; - data[jistart + 7147] = 0.0 + k[2107]*y_cur[IDX_CH3CCHI] + - k[2170]*y_cur[IDX_CH4I]; - data[jistart + 7148] = 0.0 + k[3424]*y_cur[IDX_NI]; - data[jistart + 7149] = 0.0 + k[1508]*y_cur[IDX_C2H2II] + - k[1610]*y_cur[IDX_C2H3II]; - data[jistart + 7150] = 0.0 + k[1643]*y_cur[IDX_C2H3I]; - data[jistart + 7151] = 0.0 + k[363]*y_cur[IDX_HII]; - data[jistart + 7152] = 0.0 - k[929]*y_cur[IDX_eM] - - k[930]*y_cur[IDX_eM] - k[3455]*y_cur[IDX_NI] - - k[6748]*y_cur[IDX_GRAINM] - k[6749]*y_cur[IDX_GRAINM]; - data[jistart + 7153] = 0.0 + k[1510]*y_cur[IDX_C2H2II] + - k[2107]*y_cur[IDX_C4H2II]; - data[jistart + 7154] = 0.0 + k[2170]*y_cur[IDX_C4H2II]; - data[jistart + 7155] = 0.0 - k[6748]*y_cur[IDX_CH3C4HII] - - k[6749]*y_cur[IDX_CH3C4HII]; - data[jistart + 7156] = 0.0 + k[363]*y_cur[IDX_CH3C4HI]; - data[jistart + 7157] = 0.0 + k[1618]*y_cur[IDX_C2H3II]; - data[jistart + 7158] = 0.0 + k[3424]*y_cur[IDX_C6H5II] - - k[3455]*y_cur[IDX_CH3C4HII]; - data[jistart + 7159] = 0.0 - k[929]*y_cur[IDX_CH3C4HII] - - k[930]*y_cur[IDX_CH3C4HII]; - data[jistart + 7160] = 0.0 - k[1359]*y_cur[IDX_CH3C5NI]; - data[jistart + 7161] = 0.0 - k[1359]*y_cur[IDX_CII] - - k[2322]*y_cur[IDX_HII] - k[2644]*y_cur[IDX_H3II] - - k[2945]*y_cur[IDX_HCOII] - k[3180]*y_cur[IDX_HeII] - k[5798] - - k[6102] - k[7054]; - data[jistart + 7162] = 0.0 + k[931]*y_cur[IDX_eM] + - k[6834]*y_cur[IDX_GRAINM]; - data[jistart + 7163] = 0.0 + k[8757]*y_cur[IDX_GCH3I]; - data[jistart + 7164] = 0.0 + k[8757]*y_cur[IDX_GC5NI]; - data[jistart + 7165] = 0.0 + k[7236] + k[7418] + k[7600]; - data[jistart + 7166] = 0.0 + k[6834]*y_cur[IDX_CH3C5NHII]; - data[jistart + 7167] = 0.0 - k[2322]*y_cur[IDX_CH3C5NI]; - data[jistart + 7168] = 0.0 - k[2644]*y_cur[IDX_CH3C5NI]; - data[jistart + 7169] = 0.0 - k[2945]*y_cur[IDX_CH3C5NI]; - data[jistart + 7170] = 0.0 - k[3180]*y_cur[IDX_CH3C5NI]; - data[jistart + 7171] = 0.0 + k[931]*y_cur[IDX_CH3C5NHII]; - data[jistart + 7172] = 0.0 - k[1896]*y_cur[IDX_CH3C5NHII]; - data[jistart + 7173] = 0.0 + k[5538]*y_cur[IDX_HC5NI]; - data[jistart + 7174] = 0.0 + k[2644]*y_cur[IDX_H3II] + - k[2945]*y_cur[IDX_HCOII]; - data[jistart + 7175] = 0.0 - k[931]*y_cur[IDX_eM] - - k[932]*y_cur[IDX_eM] - k[1896]*y_cur[IDX_CI] - - k[6834]*y_cur[IDX_GRAINM] - k[6835]*y_cur[IDX_GRAINM]; - data[jistart + 7176] = 0.0 - k[6834]*y_cur[IDX_CH3C5NHII] - - k[6835]*y_cur[IDX_CH3C5NHII]; - data[jistart + 7177] = 0.0 + k[2644]*y_cur[IDX_CH3C5NI]; - data[jistart + 7178] = 0.0 + k[5538]*y_cur[IDX_CH3II]; - data[jistart + 7179] = 0.0 + k[2945]*y_cur[IDX_CH3C5NI]; - data[jistart + 7180] = 0.0 - k[931]*y_cur[IDX_CH3C5NHII] - - k[932]*y_cur[IDX_CH3C5NHII]; - data[jistart + 7181] = 0.0 - k[4951]*y_cur[IDX_CH3C6HI]; - data[jistart + 7182] = 0.0 - k[1360]*y_cur[IDX_CH3C6HI] - - k[1361]*y_cur[IDX_CH3C6HI]; - data[jistart + 7183] = 0.0 + k[5023]*y_cur[IDX_CH2CCH2I] + - k[5051]*y_cur[IDX_CH3CCHI] + k[5054]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7184] = 0.0 + k[875]*y_cur[IDX_eM] + - k[6833]*y_cur[IDX_GRAINM]; - data[jistart + 7185] = 0.0 + k[5023]*y_cur[IDX_C4HI]; - data[jistart + 7186] = 0.0 - k[364]*y_cur[IDX_HII] - - k[1360]*y_cur[IDX_CII] - k[1361]*y_cur[IDX_CII] - - k[2323]*y_cur[IDX_HII] - k[2645]*y_cur[IDX_H3II] - - k[2946]*y_cur[IDX_HCOII] - k[3181]*y_cur[IDX_HeII] - - k[3182]*y_cur[IDX_HeII] - k[4951]*y_cur[IDX_CI] - k[5799] - k[6103] - - k[7053]; - data[jistart + 7187] = 0.0 + k[5051]*y_cur[IDX_C4HI]; - data[jistart + 7188] = 0.0 + k[5054]*y_cur[IDX_C4HI]; - data[jistart + 7189] = 0.0 + k[7235] + k[7417] + k[7599]; - data[jistart + 7190] = 0.0 + k[6833]*y_cur[IDX_C7H5II]; - data[jistart + 7191] = 0.0 - k[364]*y_cur[IDX_CH3C6HI] - - k[2323]*y_cur[IDX_CH3C6HI]; - data[jistart + 7192] = 0.0 - k[2645]*y_cur[IDX_CH3C6HI]; - data[jistart + 7193] = 0.0 - k[2946]*y_cur[IDX_CH3C6HI]; - data[jistart + 7194] = 0.0 - k[3181]*y_cur[IDX_CH3C6HI] - - k[3182]*y_cur[IDX_CH3C6HI]; - data[jistart + 7195] = 0.0 + k[875]*y_cur[IDX_C7H5II]; - data[jistart + 7196] = 0.0 - k[1362]*y_cur[IDX_CH3C7NI]; - data[jistart + 7197] = 0.0 - k[1362]*y_cur[IDX_CII] - - k[2324]*y_cur[IDX_HII] - k[2646]*y_cur[IDX_H3II] - - k[2947]*y_cur[IDX_HCOII] - k[3183]*y_cur[IDX_HeII] - k[5800] - - k[6104] - k[7063]; - data[jistart + 7198] = 0.0 + k[933]*y_cur[IDX_eM] + - k[6867]*y_cur[IDX_GRAINM]; - data[jistart + 7199] = 0.0 + k[8758]*y_cur[IDX_GCH3I]; - data[jistart + 7200] = 0.0 + k[8758]*y_cur[IDX_GC7NI]; - data[jistart + 7201] = 0.0 + k[7245] + k[7427] + k[7609]; - data[jistart + 7202] = 0.0 + k[6867]*y_cur[IDX_CH3C7NHII]; - data[jistart + 7203] = 0.0 - k[2324]*y_cur[IDX_CH3C7NI]; - data[jistart + 7204] = 0.0 - k[2646]*y_cur[IDX_CH3C7NI]; - data[jistart + 7205] = 0.0 - k[2947]*y_cur[IDX_CH3C7NI]; - data[jistart + 7206] = 0.0 - k[3183]*y_cur[IDX_CH3C7NI]; - data[jistart + 7207] = 0.0 + k[933]*y_cur[IDX_CH3C7NHII]; - data[jistart + 7208] = 0.0 - k[1897]*y_cur[IDX_CH3C7NHII]; - data[jistart + 7209] = 0.0 + k[5539]*y_cur[IDX_HC7NI]; - data[jistart + 7210] = 0.0 + k[2646]*y_cur[IDX_H3II] + - k[2947]*y_cur[IDX_HCOII]; - data[jistart + 7211] = 0.0 - k[933]*y_cur[IDX_eM] - - k[934]*y_cur[IDX_eM] - k[1897]*y_cur[IDX_CI] - - k[6867]*y_cur[IDX_GRAINM] - k[6868]*y_cur[IDX_GRAINM]; - data[jistart + 7212] = 0.0 - k[6867]*y_cur[IDX_CH3C7NHII] - - k[6868]*y_cur[IDX_CH3C7NHII]; - data[jistart + 7213] = 0.0 + k[2646]*y_cur[IDX_CH3C7NI]; - data[jistart + 7214] = 0.0 + k[5539]*y_cur[IDX_CH3II]; - data[jistart + 7215] = 0.0 + k[2947]*y_cur[IDX_CH3C7NI]; - data[jistart + 7216] = 0.0 - k[933]*y_cur[IDX_CH3C7NHII] - - k[934]*y_cur[IDX_CH3C7NHII]; - data[jistart + 7217] = 0.0 + k[4915]*y_cur[IDX_C2H5I] - - k[4952]*y_cur[IDX_CH3CCHI] - k[4953]*y_cur[IDX_CH3CCHI]; - data[jistart + 7218] = 0.0 - k[165]*y_cur[IDX_CH3CCHI] - - k[1363]*y_cur[IDX_CH3CCHI] - k[1364]*y_cur[IDX_CH3CCHI] - - k[1365]*y_cur[IDX_CH3CCHI] - k[1366]*y_cur[IDX_CH3CCHI]; - data[jistart + 7219] = 0.0 - k[4896]*y_cur[IDX_CH3CCHI] - - k[4897]*y_cur[IDX_CH3CCHI] + k[4898]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7220] = 0.0 - k[220]*y_cur[IDX_CH3CCHI] - - k[1509]*y_cur[IDX_CH3CCHI] - k[1510]*y_cur[IDX_CH3CCHI]; - data[jistart + 7221] = 0.0 - k[1611]*y_cur[IDX_CH3CCHI] - - k[1612]*y_cur[IDX_CH3CCHI]; - data[jistart + 7222] = 0.0 + k[5066]*y_cur[IDX_CHI]; - data[jistart + 7223] = 0.0 - k[1669]*y_cur[IDX_CH3CCHI]; - data[jistart + 7224] = 0.0 + k[4915]*y_cur[IDX_CI]; - data[jistart + 7225] = 0.0 - k[1777]*y_cur[IDX_CH3CCHI] - - k[1778]*y_cur[IDX_CH3CCHI] - k[1779]*y_cur[IDX_CH3CCHI] - - k[1780]*y_cur[IDX_CH3CCHI] - k[1781]*y_cur[IDX_CH3CCHI]; - data[jistart + 7226] = 0.0 - k[1811]*y_cur[IDX_CH3CCHI] - - k[1812]*y_cur[IDX_CH3CCHI] - k[1813]*y_cur[IDX_CH3CCHI]; - data[jistart + 7227] = 0.0 + k[804]*y_cur[IDX_eM] + - k[1814]*y_cur[IDX_C6H6I] + k[1816]*y_cur[IDX_HC3NI] - - k[2104]*y_cur[IDX_CH3CCHI] + k[6483]*y_cur[IDX_GRAINM]; - data[jistart + 7228] = 0.0 + k[806]*y_cur[IDX_eM] + - k[6500]*y_cur[IDX_GRAINM]; - data[jistart + 7229] = 0.0 + k[811]*y_cur[IDX_eM] + - k[6508]*y_cur[IDX_GRAINM]; - data[jistart + 7230] = 0.0 - k[5050]*y_cur[IDX_CH3CCHI] - - k[5051]*y_cur[IDX_CH3CCHI]; - data[jistart + 7231] = 0.0 - k[2105]*y_cur[IDX_CH3CCHI]; - data[jistart + 7232] = 0.0 - k[2106]*y_cur[IDX_CH3CCHI] - - k[2107]*y_cur[IDX_CH3CCHI]; - data[jistart + 7233] = 0.0 - k[2108]*y_cur[IDX_CH3CCHI]; - data[jistart + 7234] = 0.0 + k[828]*y_cur[IDX_eM] + - k[6646]*y_cur[IDX_GRAINM]; - data[jistart + 7235] = 0.0 - k[2109]*y_cur[IDX_CH3CCHI]; - data[jistart + 7236] = 0.0 - k[2110]*y_cur[IDX_CH3CCHI]; - data[jistart + 7237] = 0.0 + k[1814]*y_cur[IDX_C3H5II]; - data[jistart + 7238] = 0.0 + k[5066]*y_cur[IDX_C2H4I] - - k[5068]*y_cur[IDX_CH3CCHI]; - data[jistart + 7239] = 0.0 + k[5785] + k[6086]; - data[jistart + 7240] = 0.0 - k[165]*y_cur[IDX_CII] - - k[220]*y_cur[IDX_C2H2II] - k[365]*y_cur[IDX_HII] - - k[1363]*y_cur[IDX_CII] - k[1364]*y_cur[IDX_CII] - - k[1365]*y_cur[IDX_CII] - k[1366]*y_cur[IDX_CII] - - k[1509]*y_cur[IDX_C2H2II] - k[1510]*y_cur[IDX_C2H2II] - - k[1611]*y_cur[IDX_C2H3II] - k[1612]*y_cur[IDX_C2H3II] - - k[1669]*y_cur[IDX_C2H4II] - k[1777]*y_cur[IDX_C3H2II] - - k[1778]*y_cur[IDX_C3H2II] - k[1779]*y_cur[IDX_C3H2II] - - k[1780]*y_cur[IDX_C3H2II] - k[1781]*y_cur[IDX_C3H2II] - - k[1811]*y_cur[IDX_C3H4II] - k[1812]*y_cur[IDX_C3H4II] - - k[1813]*y_cur[IDX_C3H4II] - k[2104]*y_cur[IDX_C3H5II] - - k[2105]*y_cur[IDX_C4HII] - k[2106]*y_cur[IDX_C4H2II] - - k[2107]*y_cur[IDX_C4H2II] - k[2108]*y_cur[IDX_C4H3II] - - k[2109]*y_cur[IDX_C5H2II] - k[2110]*y_cur[IDX_C6H2II] - - k[2325]*y_cur[IDX_HII] - k[2647]*y_cur[IDX_H3II] - - k[2789]*y_cur[IDX_H3OII] - k[2948]*y_cur[IDX_HCOII] - - k[3184]*y_cur[IDX_HeII] - k[3185]*y_cur[IDX_HeII] - - k[3186]*y_cur[IDX_HeII] - k[3187]*y_cur[IDX_HeII] - - k[3864]*y_cur[IDX_SiII] - k[3865]*y_cur[IDX_SiII] - - k[3866]*y_cur[IDX_SiII] - k[4896]*y_cur[IDX_C2HI] - - k[4897]*y_cur[IDX_C2HI] - k[4952]*y_cur[IDX_CI] - - k[4953]*y_cur[IDX_CI] - k[5050]*y_cur[IDX_C4HI] - - k[5051]*y_cur[IDX_C4HI] - k[5068]*y_cur[IDX_CHI] - - k[5110]*y_cur[IDX_CNI] - k[5801] - k[5802] - k[6105] - k[6106] - - k[6107] - k[6952]; - data[jistart + 7241] = 0.0 + k[2119]*y_cur[IDX_CH3COCH3II] + - k[4898]*y_cur[IDX_C2HI]; - data[jistart + 7242] = 0.0 + k[2119]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7243] = 0.0 - k[5110]*y_cur[IDX_CH3CCHI]; - data[jistart + 7244] = 0.0 + k[8723]*y_cur[IDX_GCHI]; - data[jistart + 7245] = 0.0 + k[8723]*y_cur[IDX_GC2H3I]; - data[jistart + 7246] = 0.0 + k[8615]*y_cur[IDX_GHI]; - data[jistart + 7247] = 0.0 + k[7134] + k[7316] + k[7498]; - data[jistart + 7248] = 0.0 + k[8615]*y_cur[IDX_GCH2CCHI]; - data[jistart + 7249] = 0.0 + k[6483]*y_cur[IDX_C3H5II] + - k[6500]*y_cur[IDX_C3H6II] + k[6508]*y_cur[IDX_C3H7II] + - k[6646]*y_cur[IDX_C4H5II]; - data[jistart + 7250] = 0.0 - k[365]*y_cur[IDX_CH3CCHI] - - k[2325]*y_cur[IDX_CH3CCHI]; - data[jistart + 7251] = 0.0 - k[2647]*y_cur[IDX_CH3CCHI]; - data[jistart + 7252] = 0.0 - k[2789]*y_cur[IDX_CH3CCHI]; - data[jistart + 7253] = 0.0 + k[1816]*y_cur[IDX_C3H5II]; - data[jistart + 7254] = 0.0 - k[2948]*y_cur[IDX_CH3CCHI]; - data[jistart + 7255] = 0.0 - k[3184]*y_cur[IDX_CH3CCHI] - - k[3185]*y_cur[IDX_CH3CCHI] - k[3186]*y_cur[IDX_CH3CCHI] - - k[3187]*y_cur[IDX_CH3CCHI]; - data[jistart + 7256] = 0.0 - k[3864]*y_cur[IDX_CH3CCHI] - - k[3865]*y_cur[IDX_CH3CCHI] - k[3866]*y_cur[IDX_CH3CCHI]; - data[jistart + 7257] = 0.0 + k[804]*y_cur[IDX_C3H5II] + - k[806]*y_cur[IDX_C3H6II] + k[811]*y_cur[IDX_C3H7II] + - k[828]*y_cur[IDX_C4H5II]; - data[jistart + 7258] = 0.0 - k[4954]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7259] = 0.0 - k[166]*y_cur[IDX_CH3CHCH2I] - - k[1373]*y_cur[IDX_CH3CHCH2I] - k[1374]*y_cur[IDX_CH3CHCH2I] - - k[1375]*y_cur[IDX_CH3CHCH2I] - k[1376]*y_cur[IDX_CH3CHCH2I] - - k[1377]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7260] = 0.0 - k[4870]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7261] = 0.0 - k[4898]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7262] = 0.0 + k[5070]*y_cur[IDX_CHI]; - data[jistart + 7263] = 0.0 - k[1815]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7264] = 0.0 - k[1817]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7265] = 0.0 + k[813]*y_cur[IDX_eM] + - k[1818]*y_cur[IDX_NH3I] + k[6510]*y_cur[IDX_GRAINM]; - data[jistart + 7266] = 0.0 - k[5053]*y_cur[IDX_CH3CHCH2I] - - k[5054]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7267] = 0.0 + k[5786] + k[6087]; - data[jistart + 7268] = 0.0 + k[5070]*y_cur[IDX_C2H6I] - - k[5071]*y_cur[IDX_CH3CHCH2I] - k[5072]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7269] = 0.0 - k[166]*y_cur[IDX_CII] - - k[670]*y_cur[IDX_O2II] - k[702]*y_cur[IDX_SII] - - k[712]*y_cur[IDX_SOII] - k[1373]*y_cur[IDX_CII] - - k[1374]*y_cur[IDX_CII] - k[1375]*y_cur[IDX_CII] - - k[1376]*y_cur[IDX_CII] - k[1377]*y_cur[IDX_CII] - - k[1815]*y_cur[IDX_C3H5II] - k[1817]*y_cur[IDX_C3H6II] - - k[2118]*y_cur[IDX_CH3COCH3II] - k[2119]*y_cur[IDX_CH3COCH3II] - - k[2649]*y_cur[IDX_H3II] - k[2650]*y_cur[IDX_H3II] - - k[2790]*y_cur[IDX_H3OII] - k[3369]*y_cur[IDX_N2HII] - - k[3370]*y_cur[IDX_N2HII] - k[3658]*y_cur[IDX_O2II] - - k[3659]*y_cur[IDX_O2II] - k[3660]*y_cur[IDX_O2II] - - k[3661]*y_cur[IDX_O2II] - k[3662]*y_cur[IDX_O2II] - - k[3663]*y_cur[IDX_O2II] - k[3823]*y_cur[IDX_SII] - - k[3824]*y_cur[IDX_SII] - k[3825]*y_cur[IDX_SII] - - k[3826]*y_cur[IDX_SII] - k[3856]*y_cur[IDX_SOII] - - k[4870]*y_cur[IDX_C2I] - k[4898]*y_cur[IDX_C2HI] - - k[4954]*y_cur[IDX_CI] - k[5053]*y_cur[IDX_C4HI] - - k[5054]*y_cur[IDX_C4HI] - k[5055]*y_cur[IDX_OHI] - - k[5056]*y_cur[IDX_OHI] - k[5071]*y_cur[IDX_CHI] - - k[5072]*y_cur[IDX_CHI] - k[5112]*y_cur[IDX_CNI] - k[5805] - k[6110] - - k[6959]; - data[jistart + 7270] = 0.0 - k[2118]*y_cur[IDX_CH3CHCH2I] - - k[2119]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7271] = 0.0 - k[5112]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7272] = 0.0 + k[7141] + k[7323] + k[7505]; - data[jistart + 7273] = 0.0 + k[6510]*y_cur[IDX_C3H7II]; - data[jistart + 7274] = 0.0 - k[2649]*y_cur[IDX_CH3CHCH2I] - - k[2650]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7275] = 0.0 - k[2790]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7276] = 0.0 - k[3369]*y_cur[IDX_CH3CHCH2I] - - k[3370]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7277] = 0.0 + k[1818]*y_cur[IDX_C3H7II]; - data[jistart + 7278] = 0.0 - k[670]*y_cur[IDX_CH3CHCH2I] - - k[3658]*y_cur[IDX_CH3CHCH2I] - k[3659]*y_cur[IDX_CH3CHCH2I] - - k[3660]*y_cur[IDX_CH3CHCH2I] - k[3661]*y_cur[IDX_CH3CHCH2I] - - k[3662]*y_cur[IDX_CH3CHCH2I] - k[3663]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7279] = 0.0 - k[5055]*y_cur[IDX_CH3CHCH2I] - - k[5056]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7280] = 0.0 - k[702]*y_cur[IDX_CH3CHCH2I] - - k[3823]*y_cur[IDX_CH3CHCH2I] - k[3824]*y_cur[IDX_CH3CHCH2I] - - k[3825]*y_cur[IDX_CH3CHCH2I] - k[3826]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7281] = 0.0 - k[712]*y_cur[IDX_CH3CHCH2I] - - k[3856]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7282] = 0.0 + k[813]*y_cur[IDX_C3H7II]; - data[jistart + 7283] = 0.0 - k[167]*y_cur[IDX_CH3CHOI] - - k[1378]*y_cur[IDX_CH3CHOI]; - data[jistart + 7284] = 0.0 + k[5586]*y_cur[IDX_OHI]; - data[jistart + 7285] = 0.0 + k[5350]*y_cur[IDX_OI]; - data[jistart + 7286] = 0.0 + k[5073]*y_cur[IDX_CH3OHI]; - data[jistart + 7287] = 0.0 - k[2065]*y_cur[IDX_CH3CHOI] - - k[2066]*y_cur[IDX_CH3CHOI] - k[2067]*y_cur[IDX_CH3CHOI] - - k[5532]*y_cur[IDX_CH3CHOI]; - data[jistart + 7288] = 0.0 + k[5055]*y_cur[IDX_OHI]; - data[jistart + 7289] = 0.0 - k[167]*y_cur[IDX_CII] - - k[366]*y_cur[IDX_HII] - k[1378]*y_cur[IDX_CII] - - k[2065]*y_cur[IDX_CH3II] - k[2066]*y_cur[IDX_CH3II] - - k[2067]*y_cur[IDX_CH3II] - k[2113]*y_cur[IDX_HCOOH2II] - - k[2114]*y_cur[IDX_S2II] - k[2651]*y_cur[IDX_H3II] - - k[2652]*y_cur[IDX_H3II] - k[2653]*y_cur[IDX_H3II] - - k[2654]*y_cur[IDX_H3II] - k[2655]*y_cur[IDX_H3II] - - k[2656]*y_cur[IDX_H3II] - k[2657]*y_cur[IDX_H3II] - - k[2791]*y_cur[IDX_H3OII] - k[2950]*y_cur[IDX_HCOII] - - k[3191]*y_cur[IDX_HeII] - k[5532]*y_cur[IDX_CH3II] - k[5806] - - k[5807] - k[5808] - k[6111] - k[6112] - k[6113] - k[6977]; - data[jistart + 7290] = 0.0 + k[941]*y_cur[IDX_eM] + - k[3569]*y_cur[IDX_NH3I] + k[6563]*y_cur[IDX_GRAINM]; - data[jistart + 7291] = 0.0 + k[950]*y_cur[IDX_eM] + - k[6683]*y_cur[IDX_GRAINM]; - data[jistart + 7292] = 0.0 + k[952]*y_cur[IDX_eM] + - k[6692]*y_cur[IDX_GRAINM]; - data[jistart + 7293] = 0.0 + k[5073]*y_cur[IDX_CHI]; - data[jistart + 7294] = 0.0 + k[8751]*y_cur[IDX_GHCOI]; - data[jistart + 7295] = 0.0 + k[7159] + k[7341] + k[7523]; - data[jistart + 7296] = 0.0 + k[8626]*y_cur[IDX_GHI]; - data[jistart + 7297] = 0.0 + k[8626]*y_cur[IDX_GCH3COI]; - data[jistart + 7298] = 0.0 + k[8751]*y_cur[IDX_GCH3I]; - data[jistart + 7299] = 0.0 + k[6563]*y_cur[IDX_CH3CHOHII] + - k[6683]*y_cur[IDX_CH3COCH3II] + k[6692]*y_cur[IDX_CH3COCH4II]; - data[jistart + 7300] = 0.0 - k[366]*y_cur[IDX_CH3CHOI]; - data[jistart + 7301] = 0.0 - k[2651]*y_cur[IDX_CH3CHOI] - - k[2652]*y_cur[IDX_CH3CHOI] - k[2653]*y_cur[IDX_CH3CHOI] - - k[2654]*y_cur[IDX_CH3CHOI] - k[2655]*y_cur[IDX_CH3CHOI] - - k[2656]*y_cur[IDX_CH3CHOI] - k[2657]*y_cur[IDX_CH3CHOI]; - data[jistart + 7302] = 0.0 - k[2791]*y_cur[IDX_CH3CHOI]; - data[jistart + 7303] = 0.0 - k[2950]*y_cur[IDX_CH3CHOI]; - data[jistart + 7304] = 0.0 - k[2113]*y_cur[IDX_CH3CHOI]; - data[jistart + 7305] = 0.0 - k[3191]*y_cur[IDX_CH3CHOI]; - data[jistart + 7306] = 0.0 + k[3569]*y_cur[IDX_CH3CHOHII]; - data[jistart + 7307] = 0.0 + k[5350]*y_cur[IDX_C2H5I]; - data[jistart + 7308] = 0.0 + k[5055]*y_cur[IDX_CH3CHCH2I] + - k[5586]*y_cur[IDX_C2H3I]; - data[jistart + 7309] = 0.0 - k[2114]*y_cur[IDX_CH3CHOI]; - data[jistart + 7310] = 0.0 + k[941]*y_cur[IDX_CH3CHOHII] + - k[950]*y_cur[IDX_CH3COCH3II] + k[952]*y_cur[IDX_CH3COCH4II]; - data[jistart + 7311] = 0.0 + k[167]*y_cur[IDX_CH3CHOI]; - data[jistart + 7312] = 0.0 + k[3661]*y_cur[IDX_O2II]; - data[jistart + 7313] = 0.0 + k[167]*y_cur[IDX_CII] + - k[366]*y_cur[IDX_HII] + k[5806] + k[6111]; - data[jistart + 7314] = 0.0 - k[937]*y_cur[IDX_eM] - - k[938]*y_cur[IDX_eM] - k[6547]*y_cur[IDX_GRAINM] - - k[6548]*y_cur[IDX_GRAINM]; - data[jistart + 7315] = 0.0 + k[5640]*y_cur[IDX_H3II] + - k[5641]*y_cur[IDX_HCOII]; - data[jistart + 7316] = 0.0 - k[6547]*y_cur[IDX_CH3CHOII] - - k[6548]*y_cur[IDX_CH3CHOII]; - data[jistart + 7317] = 0.0 + k[366]*y_cur[IDX_CH3CHOI]; - data[jistart + 7318] = 0.0 + k[5640]*y_cur[IDX_CH3COI]; - data[jistart + 7319] = 0.0 + k[5641]*y_cur[IDX_CH3COI]; - data[jistart + 7320] = 0.0 + k[3661]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7321] = 0.0 - k[937]*y_cur[IDX_CH3CHOII] - - k[938]*y_cur[IDX_CH3CHOII]; - data[jistart + 7322] = 0.0 + k[5567]*y_cur[IDX_H3OII]; - data[jistart + 7323] = 0.0 + k[1724]*y_cur[IDX_S2II] + - k[2595]*y_cur[IDX_H3II]; - data[jistart + 7324] = 0.0 + k[2072]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7325] = 0.0 + k[3662]*y_cur[IDX_O2II]; - data[jistart + 7326] = 0.0 + k[2113]*y_cur[IDX_HCOOH2II] + - k[2654]*y_cur[IDX_H3II] + k[2791]*y_cur[IDX_H3OII] + - k[2950]*y_cur[IDX_HCOII]; - data[jistart + 7327] = 0.0 - k[939]*y_cur[IDX_eM] - - k[940]*y_cur[IDX_eM] - k[941]*y_cur[IDX_eM] - k[942]*y_cur[IDX_eM] - - k[943]*y_cur[IDX_eM] - k[3569]*y_cur[IDX_NH3I] - - k[3570]*y_cur[IDX_NH3I] - k[6561]*y_cur[IDX_GRAINM] - - k[6562]*y_cur[IDX_GRAINM] - k[6563]*y_cur[IDX_GRAINM] - - k[6564]*y_cur[IDX_GRAINM] - k[6565]*y_cur[IDX_GRAINM]; - data[jistart + 7328] = 0.0 + k[2072]*y_cur[IDX_CH3II] + - k[3664]*y_cur[IDX_O2II]; - data[jistart + 7329] = 0.0 + k[2494]*y_cur[IDX_H2COI]; - data[jistart + 7330] = 0.0 + k[2193]*y_cur[IDX_H2COII] + - k[5543]*y_cur[IDX_HCOII]; - data[jistart + 7331] = 0.0 + k[5545]*y_cur[IDX_COI]; - data[jistart + 7332] = 0.0 + k[5545]*y_cur[IDX_CH5II]; - data[jistart + 7333] = 0.0 - k[6561]*y_cur[IDX_CH3CHOHII] - - k[6562]*y_cur[IDX_CH3CHOHII] - k[6563]*y_cur[IDX_CH3CHOHII] - - k[6564]*y_cur[IDX_CH3CHOHII] - k[6565]*y_cur[IDX_CH3CHOHII]; - data[jistart + 7334] = 0.0 + k[2494]*y_cur[IDX_CH3OH2II]; - data[jistart + 7335] = 0.0 + k[2193]*y_cur[IDX_CH4I]; - data[jistart + 7336] = 0.0 + k[2595]*y_cur[IDX_C2H5OHI] + - k[2654]*y_cur[IDX_CH3CHOI]; - data[jistart + 7337] = 0.0 + k[2791]*y_cur[IDX_CH3CHOI] + - k[5567]*y_cur[IDX_C2H2I]; - data[jistart + 7338] = 0.0 + k[2950]*y_cur[IDX_CH3CHOI] + - k[5543]*y_cur[IDX_CH4I]; - data[jistart + 7339] = 0.0 + k[2113]*y_cur[IDX_CH3CHOI]; - data[jistart + 7340] = 0.0 - k[3569]*y_cur[IDX_CH3CHOHII] - - k[3570]*y_cur[IDX_CH3CHOHII]; - data[jistart + 7341] = 0.0 + k[3662]*y_cur[IDX_CH3CHCH2I] + - k[3664]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7342] = 0.0 + k[1724]*y_cur[IDX_C2H5OHI]; - data[jistart + 7343] = 0.0 - k[939]*y_cur[IDX_CH3CHOHII] - - k[940]*y_cur[IDX_CH3CHOHII] - k[941]*y_cur[IDX_CH3CHOHII] - - k[942]*y_cur[IDX_CH3CHOHII] - k[943]*y_cur[IDX_CH3CHOHII]; - data[jistart + 7344] = 0.0 - k[1379]*y_cur[IDX_CH3CNI]; - data[jistart + 7345] = 0.0 - k[1513]*y_cur[IDX_CH3CNI] - - k[1514]*y_cur[IDX_CH3CNI] - k[1515]*y_cur[IDX_CH3CNI]; - data[jistart + 7346] = 0.0 - k[1719]*y_cur[IDX_CH3CNI]; - data[jistart + 7347] = 0.0 - k[1842]*y_cur[IDX_CH3CNI]; - data[jistart + 7348] = 0.0 + k[60]*y_cur[IDX_CNM] + - k[5542]*y_cur[IDX_CNI]; - data[jistart + 7349] = 0.0 - k[2068]*y_cur[IDX_CH3CNI] - - k[2069]*y_cur[IDX_CH3CNI] - k[5533]*y_cur[IDX_CH3CNI]; - data[jistart + 7350] = 0.0 - k[367]*y_cur[IDX_HII] - - k[650]*y_cur[IDX_OII] - k[1379]*y_cur[IDX_CII] - - k[1513]*y_cur[IDX_C2H2II] - k[1514]*y_cur[IDX_C2H2II] - - k[1515]*y_cur[IDX_C2H2II] - k[1719]*y_cur[IDX_C2H5II] - - k[1842]*y_cur[IDX_C4H7II] - k[2068]*y_cur[IDX_CH3II] - - k[2069]*y_cur[IDX_CH3II] - k[2115]*y_cur[IDX_HC3NHII] - - k[2116]*y_cur[IDX_HCO2II] - k[2117]*y_cur[IDX_HCOOH2II] - - k[2328]*y_cur[IDX_HII] - k[2329]*y_cur[IDX_HII] - - k[2658]*y_cur[IDX_H3II] - k[2792]*y_cur[IDX_H3OII] - - k[2888]*y_cur[IDX_HCNHII] - k[2889]*y_cur[IDX_HCNHII] - - k[2951]*y_cur[IDX_HCOII] - k[3192]*y_cur[IDX_HeII] - - k[3193]*y_cur[IDX_HeII] - k[3371]*y_cur[IDX_N2HII] - - k[3635]*y_cur[IDX_OII] - k[5533]*y_cur[IDX_CH3II] - k[5809] - - k[5810] - k[6114] - k[6115] - k[6957]; - data[jistart + 7351] = 0.0 + k[946]*y_cur[IDX_eM] + - k[6502]*y_cur[IDX_GRAINM]; - data[jistart + 7352] = 0.0 + k[5542]*y_cur[IDX_CH3I]; - data[jistart + 7353] = 0.0 + k[60]*y_cur[IDX_CH3I]; - data[jistart + 7354] = 0.0 + k[8618]*y_cur[IDX_GHI]; - data[jistart + 7355] = 0.0 + k[8749]*y_cur[IDX_GCNI]; - data[jistart + 7356] = 0.0 + k[7139] + k[7321] + k[7503]; - data[jistart + 7357] = 0.0 + k[8749]*y_cur[IDX_GCH3I]; - data[jistart + 7358] = 0.0 + k[8618]*y_cur[IDX_GCH2CNI]; - data[jistart + 7359] = 0.0 + k[6502]*y_cur[IDX_CH3CNHII]; - data[jistart + 7360] = 0.0 - k[367]*y_cur[IDX_CH3CNI] - - k[2328]*y_cur[IDX_CH3CNI] - k[2329]*y_cur[IDX_CH3CNI]; - data[jistart + 7361] = 0.0 - k[2658]*y_cur[IDX_CH3CNI]; - data[jistart + 7362] = 0.0 - k[2792]*y_cur[IDX_CH3CNI]; - data[jistart + 7363] = 0.0 - k[2115]*y_cur[IDX_CH3CNI]; - data[jistart + 7364] = 0.0 - k[2888]*y_cur[IDX_CH3CNI] - - k[2889]*y_cur[IDX_CH3CNI]; - data[jistart + 7365] = 0.0 - k[2951]*y_cur[IDX_CH3CNI]; - data[jistart + 7366] = 0.0 - k[2116]*y_cur[IDX_CH3CNI]; - data[jistart + 7367] = 0.0 - k[2117]*y_cur[IDX_CH3CNI]; - data[jistart + 7368] = 0.0 - k[3192]*y_cur[IDX_CH3CNI] - - k[3193]*y_cur[IDX_CH3CNI]; - data[jistart + 7369] = 0.0 - k[3371]*y_cur[IDX_CH3CNI]; - data[jistart + 7370] = 0.0 - k[650]*y_cur[IDX_CH3CNI] - - k[3635]*y_cur[IDX_CH3CNI]; - data[jistart + 7371] = 0.0 + k[946]*y_cur[IDX_CH3CNHII]; - data[jistart + 7372] = 0.0 + k[3532]*y_cur[IDX_NH2I]; - data[jistart + 7373] = 0.0 + k[3391]*y_cur[IDX_NI]; - data[jistart + 7374] = 0.0 + k[2638]*y_cur[IDX_H3II]; - data[jistart + 7375] = 0.0 + k[367]*y_cur[IDX_HII] + - k[650]*y_cur[IDX_OII] + k[5809] + k[6114]; - data[jistart + 7376] = 0.0 - k[944]*y_cur[IDX_eM] - - k[945]*y_cur[IDX_eM] - k[2283]*y_cur[IDX_COI] - - k[2431]*y_cur[IDX_H2I] - k[6484]*y_cur[IDX_GRAINM] - - k[6485]*y_cur[IDX_GRAINM]; - data[jistart + 7377] = 0.0 - k[2283]*y_cur[IDX_CH3CNII]; - data[jistart + 7378] = 0.0 - k[6484]*y_cur[IDX_CH3CNII] - - k[6485]*y_cur[IDX_CH3CNII]; - data[jistart + 7379] = 0.0 + k[367]*y_cur[IDX_CH3CNI]; - data[jistart + 7380] = 0.0 - k[2431]*y_cur[IDX_CH3CNII]; - data[jistart + 7381] = 0.0 + k[2638]*y_cur[IDX_CH2CNI]; - data[jistart + 7382] = 0.0 + k[3391]*y_cur[IDX_C2H4II]; - data[jistart + 7383] = 0.0 + k[3532]*y_cur[IDX_C2H2II]; - data[jistart + 7384] = 0.0 + k[650]*y_cur[IDX_CH3CNI]; - data[jistart + 7385] = 0.0 - k[944]*y_cur[IDX_CH3CNII] - - k[945]*y_cur[IDX_CH3CNII]; - data[jistart + 7386] = 0.0 + k[1515]*y_cur[IDX_CH3CNI]; - data[jistart + 7387] = 0.0 + k[1719]*y_cur[IDX_CH3CNI]; - data[jistart + 7388] = 0.0 + k[2863]*y_cur[IDX_HCNI]; - data[jistart + 7389] = 0.0 + k[1842]*y_cur[IDX_CH3CNI]; - data[jistart + 7390] = 0.0 + k[5540]*y_cur[IDX_HCNI]; - data[jistart + 7391] = 0.0 + k[1515]*y_cur[IDX_C2H2II] + - k[1719]*y_cur[IDX_C2H5II] + k[1842]*y_cur[IDX_C4H7II] + - k[2115]*y_cur[IDX_HC3NHII] + k[2116]*y_cur[IDX_HCO2II] + - k[2117]*y_cur[IDX_HCOOH2II] + k[2658]*y_cur[IDX_H3II] + - k[2792]*y_cur[IDX_H3OII] + k[2888]*y_cur[IDX_HCNHII] + - k[2889]*y_cur[IDX_HCNHII] + k[2951]*y_cur[IDX_HCOII] + - k[3371]*y_cur[IDX_N2HII]; - data[jistart + 7392] = 0.0 + k[2431]*y_cur[IDX_H2I]; - data[jistart + 7393] = 0.0 - k[946]*y_cur[IDX_eM] - - k[947]*y_cur[IDX_eM] - k[6502]*y_cur[IDX_GRAINM] - - k[6503]*y_cur[IDX_GRAINM]; - data[jistart + 7394] = 0.0 + k[2873]*y_cur[IDX_HCNI]; - data[jistart + 7395] = 0.0 - k[6502]*y_cur[IDX_CH3CNHII] - - k[6503]*y_cur[IDX_CH3CNHII]; - data[jistart + 7396] = 0.0 + k[2431]*y_cur[IDX_CH3CNII]; - data[jistart + 7397] = 0.0 + k[2658]*y_cur[IDX_CH3CNI]; - data[jistart + 7398] = 0.0 + k[2792]*y_cur[IDX_CH3CNI]; - data[jistart + 7399] = 0.0 + k[2115]*y_cur[IDX_CH3CNI]; - data[jistart + 7400] = 0.0 + k[2863]*y_cur[IDX_C2H7II] + - k[2873]*y_cur[IDX_CH3OH2II] + k[5540]*y_cur[IDX_CH3II]; - data[jistart + 7401] = 0.0 + k[2888]*y_cur[IDX_CH3CNI] + - k[2889]*y_cur[IDX_CH3CNI]; - data[jistart + 7402] = 0.0 + k[2951]*y_cur[IDX_CH3CNI]; - data[jistart + 7403] = 0.0 + k[2116]*y_cur[IDX_CH3CNI]; - data[jistart + 7404] = 0.0 + k[2117]*y_cur[IDX_CH3CNI]; - data[jistart + 7405] = 0.0 + k[3371]*y_cur[IDX_CH3CNI]; - data[jistart + 7406] = 0.0 - k[946]*y_cur[IDX_CH3CNHII] - - k[947]*y_cur[IDX_CH3CNHII]; - data[jistart + 7407] = 0.0 - k[5639]*y_cur[IDX_CH3COI]; - data[jistart + 7408] = 0.0 - k[5639]*y_cur[IDX_CII] - - k[5640]*y_cur[IDX_H3II] - k[5641]*y_cur[IDX_HCOII] - - k[5642]*y_cur[IDX_HeII] - k[5643]*y_cur[IDX_HeII] - k[5938] - - k[6291] - k[6966]; - data[jistart + 7409] = 0.0 + k[5671]*y_cur[IDX_HeII] + k[5947] + - k[6296]; - data[jistart + 7410] = 0.0 + k[1289]*y_cur[IDX_eM] + - k[6716]*y_cur[IDX_GRAINM]; - data[jistart + 7411] = 0.0 + k[1292]*y_cur[IDX_eM] + - k[1295]*y_cur[IDX_eM] + k[6733]*y_cur[IDX_GRAINM] + - k[6736]*y_cur[IDX_GRAINM]; - data[jistart + 7412] = 0.0 + k[8750]*y_cur[IDX_GCOI]; - data[jistart + 7413] = 0.0 + k[7148] + k[7330] + k[7512]; - data[jistart + 7414] = 0.0 + k[8750]*y_cur[IDX_GCH3I]; - data[jistart + 7415] = 0.0 + k[6716]*y_cur[IDX_CH3COOHII] + - k[6733]*y_cur[IDX_CH3COOH2II] + k[6736]*y_cur[IDX_CH3COOH2II]; - data[jistart + 7416] = 0.0 - k[5640]*y_cur[IDX_CH3COI]; - data[jistart + 7417] = 0.0 - k[5641]*y_cur[IDX_CH3COI]; - data[jistart + 7418] = 0.0 - k[5642]*y_cur[IDX_CH3COI] - - k[5643]*y_cur[IDX_CH3COI] + k[5671]*y_cur[IDX_CH3COOHI]; - data[jistart + 7419] = 0.0 + k[1289]*y_cur[IDX_CH3COOHII] + - k[1292]*y_cur[IDX_CH3COOH2II] + k[1295]*y_cur[IDX_CH3COOH2II]; - data[jistart + 7420] = 0.0 + k[1378]*y_cur[IDX_CH3CHOI] + - k[1380]*y_cur[IDX_CH3COCH3I] + k[5639]*y_cur[IDX_CH3COI]; - data[jistart + 7421] = 0.0 + k[1980]*y_cur[IDX_H2COI]; - data[jistart + 7422] = 0.0 + k[3852]*y_cur[IDX_SOII]; - data[jistart + 7423] = 0.0 + k[2639]*y_cur[IDX_H3II] + - k[2786]*y_cur[IDX_H3OII] + k[2940]*y_cur[IDX_HCOII]; - data[jistart + 7424] = 0.0 + k[2065]*y_cur[IDX_CH3CHOI] + - k[2070]*y_cur[IDX_CH3COCH3I] + k[5535]*y_cur[IDX_COI]; - data[jistart + 7425] = 0.0 + k[1378]*y_cur[IDX_CII] + - k[2065]*y_cur[IDX_CH3II] + k[2114]*y_cur[IDX_S2II] + - k[2655]*y_cur[IDX_H3II]; - data[jistart + 7426] = 0.0 + k[5639]*y_cur[IDX_CII]; - data[jistart + 7427] = 0.0 - k[948]*y_cur[IDX_eM] - - k[949]*y_cur[IDX_eM] - k[6518]*y_cur[IDX_GRAINM] - - k[6519]*y_cur[IDX_GRAINM]; - data[jistart + 7428] = 0.0 + k[1380]*y_cur[IDX_CII] + - k[2070]*y_cur[IDX_CH3II] + k[2662]*y_cur[IDX_H3II] + - k[3194]*y_cur[IDX_HeII]; - data[jistart + 7429] = 0.0 + k[5674]*y_cur[IDX_HeII]; - data[jistart + 7430] = 0.0 + k[2189]*y_cur[IDX_COII]; - data[jistart + 7431] = 0.0 + k[5535]*y_cur[IDX_CH3II]; - data[jistart + 7432] = 0.0 + k[2189]*y_cur[IDX_CH4I]; - data[jistart + 7433] = 0.0 - k[6518]*y_cur[IDX_CH3COII] - - k[6519]*y_cur[IDX_CH3COII]; - data[jistart + 7434] = 0.0 + k[1980]*y_cur[IDX_CH2II]; - data[jistart + 7435] = 0.0 + k[2639]*y_cur[IDX_CH2COI] + - k[2655]*y_cur[IDX_CH3CHOI] + k[2662]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7436] = 0.0 + k[2786]*y_cur[IDX_CH2COI]; - data[jistart + 7437] = 0.0 + k[2940]*y_cur[IDX_CH2COI]; - data[jistart + 7438] = 0.0 + k[3194]*y_cur[IDX_CH3COCH3I] + - k[5674]*y_cur[IDX_CH3COOHI]; - data[jistart + 7439] = 0.0 + k[2114]*y_cur[IDX_CH3CHOI]; - data[jistart + 7440] = 0.0 + k[3852]*y_cur[IDX_CH2CCH2I]; - data[jistart + 7441] = 0.0 - k[948]*y_cur[IDX_CH3COII] - - k[949]*y_cur[IDX_CH3COII]; - data[jistart + 7442] = 0.0 - k[168]*y_cur[IDX_CH3COCH3I] - - k[1380]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7443] = 0.0 - k[1723]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7444] = 0.0 - k[270]*y_cur[IDX_CH3COCH3I] - - k[2070]*y_cur[IDX_CH3COCH3I] - k[2071]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7445] = 0.0 - k[168]*y_cur[IDX_CII] - - k[270]*y_cur[IDX_CH3II] - k[368]*y_cur[IDX_HII] - - k[713]*y_cur[IDX_SOII] - k[1380]*y_cur[IDX_CII] - - k[1723]*y_cur[IDX_C2H5CNHII] - k[2070]*y_cur[IDX_CH3II] - - k[2071]*y_cur[IDX_CH3II] - k[2659]*y_cur[IDX_H3II] - - k[2660]*y_cur[IDX_H3II] - k[2661]*y_cur[IDX_H3II] - - k[2662]*y_cur[IDX_H3II] - k[2663]*y_cur[IDX_H3II] - - k[2664]*y_cur[IDX_H3II] - k[2665]*y_cur[IDX_H3II] - - k[2793]*y_cur[IDX_H3OII] - k[2952]*y_cur[IDX_HCOII] - - k[3014]*y_cur[IDX_HCSII] - k[3194]*y_cur[IDX_HeII] - - k[3857]*y_cur[IDX_SOII] - k[5811] - k[5812] - k[5813] - k[6116] - - k[6117] - k[7018]; - data[jistart + 7446] = 0.0 + k[953]*y_cur[IDX_eM] + - k[6693]*y_cur[IDX_GRAINM]; - data[jistart + 7447] = 0.0 + k[8754]*y_cur[IDX_GCH3COI]; - data[jistart + 7448] = 0.0 + k[8754]*y_cur[IDX_GCH3I]; - data[jistart + 7449] = 0.0 + k[7200] + k[7382] + k[7568]; - data[jistart + 7450] = 0.0 + k[6693]*y_cur[IDX_CH3COCH4II]; - data[jistart + 7451] = 0.0 - k[368]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7452] = 0.0 - k[2659]*y_cur[IDX_CH3COCH3I] - - k[2660]*y_cur[IDX_CH3COCH3I] - k[2661]*y_cur[IDX_CH3COCH3I] - - k[2662]*y_cur[IDX_CH3COCH3I] - k[2663]*y_cur[IDX_CH3COCH3I] - - k[2664]*y_cur[IDX_CH3COCH3I] - k[2665]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7453] = 0.0 - k[2793]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7454] = 0.0 - k[2952]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7455] = 0.0 - k[3014]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7456] = 0.0 - k[3194]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7457] = 0.0 - k[713]*y_cur[IDX_CH3COCH3I] - - k[3857]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7458] = 0.0 + k[953]*y_cur[IDX_CH3COCH4II]; - data[jistart + 7459] = 0.0 + k[168]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7460] = 0.0 + k[270]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7461] = 0.0 - k[2118]*y_cur[IDX_CH3COCH3II] - - k[2119]*y_cur[IDX_CH3COCH3II]; - data[jistart + 7462] = 0.0 + k[168]*y_cur[IDX_CII] + - k[270]*y_cur[IDX_CH3II] + k[368]*y_cur[IDX_HII] + - k[713]*y_cur[IDX_SOII] + k[5812] + k[6116]; - data[jistart + 7463] = 0.0 - k[950]*y_cur[IDX_eM] - - k[951]*y_cur[IDX_eM] - k[2118]*y_cur[IDX_CH3CHCH2I] - - k[2119]*y_cur[IDX_CH3CHCH2I] - k[2493]*y_cur[IDX_H2COI] - - k[6683]*y_cur[IDX_GRAINM] - k[6684]*y_cur[IDX_GRAINM]; - data[jistart + 7464] = 0.0 - k[6683]*y_cur[IDX_CH3COCH3II] - - k[6684]*y_cur[IDX_CH3COCH3II]; - data[jistart + 7465] = 0.0 + k[368]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7466] = 0.0 - k[2493]*y_cur[IDX_CH3COCH3II]; - data[jistart + 7467] = 0.0 + k[713]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7468] = 0.0 - k[950]*y_cur[IDX_CH3COCH3II] - - k[951]*y_cur[IDX_CH3COCH3II]; - data[jistart + 7469] = 0.0 + k[1723]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7470] = 0.0 + k[2491]*y_cur[IDX_H2COI]; - data[jistart + 7471] = 0.0 + k[2071]*y_cur[IDX_CH3COCH3I] + - k[5532]*y_cur[IDX_CH3CHOI]; - data[jistart + 7472] = 0.0 + k[2118]*y_cur[IDX_CH3COCH3II] + - k[2119]*y_cur[IDX_CH3COCH3II]; - data[jistart + 7473] = 0.0 + k[5532]*y_cur[IDX_CH3II]; - data[jistart + 7474] = 0.0 + k[1723]*y_cur[IDX_C2H5CNHII] + - k[2071]*y_cur[IDX_CH3II] + k[2663]*y_cur[IDX_H3II] + - k[2793]*y_cur[IDX_H3OII] + k[2952]*y_cur[IDX_HCOII] + - k[3014]*y_cur[IDX_HCSII]; - data[jistart + 7475] = 0.0 + k[2118]*y_cur[IDX_CH3CHCH2I] + - k[2119]*y_cur[IDX_CH3CHCH2I] + k[2493]*y_cur[IDX_H2COI]; - data[jistart + 7476] = 0.0 - k[952]*y_cur[IDX_eM] - - k[953]*y_cur[IDX_eM] - k[6692]*y_cur[IDX_GRAINM] - - k[6693]*y_cur[IDX_GRAINM]; - data[jistart + 7477] = 0.0 - k[6692]*y_cur[IDX_CH3COCH4II] - - k[6693]*y_cur[IDX_CH3COCH4II]; - data[jistart + 7478] = 0.0 + k[2491]*y_cur[IDX_C2H5OH2II] + - k[2493]*y_cur[IDX_CH3COCH3II]; - data[jistart + 7479] = 0.0 + k[2663]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7480] = 0.0 + k[2793]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7481] = 0.0 + k[2952]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7482] = 0.0 + k[3014]*y_cur[IDX_CH3COCH3I]; - data[jistart + 7483] = 0.0 - k[952]*y_cur[IDX_CH3COCH4II] - - k[953]*y_cur[IDX_CH3COCH4II]; - data[jistart + 7484] = 0.0 - k[5667]*y_cur[IDX_CH3COOHI]; - data[jistart + 7485] = 0.0 - k[5667]*y_cur[IDX_CII] - - k[5668]*y_cur[IDX_H3II] - k[5669]*y_cur[IDX_H3OII] - - k[5670]*y_cur[IDX_HCOII] - k[5671]*y_cur[IDX_HeII] - - k[5672]*y_cur[IDX_HeII] - k[5673]*y_cur[IDX_HeII] - - k[5674]*y_cur[IDX_HeII] - k[5946] - k[5947] - k[6296] - k[6297] - - k[7027]; - data[jistart + 7486] = 0.0 + k[1296]*y_cur[IDX_eM] + - k[6737]*y_cur[IDX_GRAINM]; - data[jistart + 7487] = 0.0 + k[8755]*y_cur[IDX_GCOOHI]; - data[jistart + 7488] = 0.0 + k[8742]*y_cur[IDX_GOHI]; - data[jistart + 7489] = 0.0 + k[7209] + k[7391] + k[7566]; - data[jistart + 7490] = 0.0 + k[8755]*y_cur[IDX_GCH3I]; - data[jistart + 7491] = 0.0 + k[8742]*y_cur[IDX_GCH3COI]; - data[jistart + 7492] = 0.0 + k[6737]*y_cur[IDX_CH3COOH2II]; - data[jistart + 7493] = 0.0 - k[5668]*y_cur[IDX_CH3COOHI]; - data[jistart + 7494] = 0.0 - k[5669]*y_cur[IDX_CH3COOHI]; - data[jistart + 7495] = 0.0 - k[5670]*y_cur[IDX_CH3COOHI]; - data[jistart + 7496] = 0.0 - k[5671]*y_cur[IDX_CH3COOHI] - - k[5672]*y_cur[IDX_CH3COOHI] - k[5673]*y_cur[IDX_CH3COOHI] - - k[5674]*y_cur[IDX_CH3COOHI]; - data[jistart + 7497] = 0.0 + k[1296]*y_cur[IDX_CH3COOH2II]; - data[jistart + 7498] = 0.0 + k[5667]*y_cur[IDX_CH3COOHI]; - data[jistart + 7499] = 0.0 + k[5667]*y_cur[IDX_CII]; - data[jistart + 7500] = 0.0 - k[1284]*y_cur[IDX_eM] - - k[1285]*y_cur[IDX_eM] - k[1286]*y_cur[IDX_eM] - - k[1287]*y_cur[IDX_eM] - k[1288]*y_cur[IDX_eM] - - k[1289]*y_cur[IDX_eM] - k[6711]*y_cur[IDX_GRAINM] - - k[6712]*y_cur[IDX_GRAINM] - k[6713]*y_cur[IDX_GRAINM] - - k[6714]*y_cur[IDX_GRAINM] - k[6715]*y_cur[IDX_GRAINM] - - k[6716]*y_cur[IDX_GRAINM]; - data[jistart + 7501] = 0.0 - k[6711]*y_cur[IDX_CH3COOHII] - - k[6712]*y_cur[IDX_CH3COOHII] - k[6713]*y_cur[IDX_CH3COOHII] - - k[6714]*y_cur[IDX_CH3COOHII] - k[6715]*y_cur[IDX_CH3COOHII] - - k[6716]*y_cur[IDX_CH3COOHII]; - data[jistart + 7502] = 0.0 - k[1284]*y_cur[IDX_CH3COOHII] - - k[1285]*y_cur[IDX_CH3COOHII] - k[1286]*y_cur[IDX_CH3COOHII] - - k[1287]*y_cur[IDX_CH3COOHII] - k[1288]*y_cur[IDX_CH3COOHII] - - k[1289]*y_cur[IDX_CH3COOHII]; - data[jistart + 7503] = 0.0 + k[5668]*y_cur[IDX_H3II] + - k[5669]*y_cur[IDX_H3OII] + k[5670]*y_cur[IDX_HCOII]; - data[jistart + 7504] = 0.0 - k[1290]*y_cur[IDX_eM] - - k[1291]*y_cur[IDX_eM] - k[1292]*y_cur[IDX_eM] - - k[1293]*y_cur[IDX_eM] - k[1294]*y_cur[IDX_eM] - - k[1295]*y_cur[IDX_eM] - k[1296]*y_cur[IDX_eM] - - k[6731]*y_cur[IDX_GRAINM] - k[6732]*y_cur[IDX_GRAINM] - - k[6733]*y_cur[IDX_GRAINM] - k[6734]*y_cur[IDX_GRAINM] - - k[6735]*y_cur[IDX_GRAINM] - k[6736]*y_cur[IDX_GRAINM] - - k[6737]*y_cur[IDX_GRAINM]; - data[jistart + 7505] = 0.0 - k[6731]*y_cur[IDX_CH3COOH2II] - - k[6732]*y_cur[IDX_CH3COOH2II] - k[6733]*y_cur[IDX_CH3COOH2II] - - k[6734]*y_cur[IDX_CH3COOH2II] - k[6735]*y_cur[IDX_CH3COOH2II] - - k[6736]*y_cur[IDX_CH3COOH2II] - k[6737]*y_cur[IDX_CH3COOH2II]; - data[jistart + 7506] = 0.0 + k[5668]*y_cur[IDX_CH3COOHI]; - data[jistart + 7507] = 0.0 + k[5669]*y_cur[IDX_CH3COOHI]; - data[jistart + 7508] = 0.0 + k[5670]*y_cur[IDX_CH3COOHI]; - data[jistart + 7509] = 0.0 - k[1290]*y_cur[IDX_CH3COOH2II] - - k[1291]*y_cur[IDX_CH3COOH2II] - k[1292]*y_cur[IDX_CH3COOH2II] - - k[1293]*y_cur[IDX_CH3COOH2II] - k[1294]*y_cur[IDX_CH3COOH2II] - - k[1295]*y_cur[IDX_CH3COOH2II] - k[1296]*y_cur[IDX_CH3COOH2II]; - data[jistart + 7510] = 0.0 + k[1716]*y_cur[IDX_SII] + - k[3847]*y_cur[IDX_SOII]; - data[jistart + 7511] = 0.0 + k[3853]*y_cur[IDX_SOII]; - data[jistart + 7512] = 0.0 + k[3824]*y_cur[IDX_SII]; - data[jistart + 7513] = 0.0 - k[954]*y_cur[IDX_eM] - - k[6688]*y_cur[IDX_GRAINM]; - data[jistart + 7514] = 0.0 - k[6688]*y_cur[IDX_CH3CSII]; - data[jistart + 7515] = 0.0 + k[1716]*y_cur[IDX_C2H4I] + - k[3824]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 7516] = 0.0 + k[3847]*y_cur[IDX_C2H4I] + - k[3853]*y_cur[IDX_CH2CCH2I]; - data[jistart + 7517] = 0.0 - k[954]*y_cur[IDX_CH3CSII]; - data[jistart + 7518] = 0.0 + k[1988]*y_cur[IDX_NH3I]; - data[jistart + 7519] = 0.0 + k[2086]*y_cur[IDX_NH2I] + - k[2087]*y_cur[IDX_NH3I]; - data[jistart + 7520] = 0.0 - k[970]*y_cur[IDX_eM] - - k[971]*y_cur[IDX_eM] - k[6405]*y_cur[IDX_GRAINM] - - k[6406]*y_cur[IDX_GRAINM]; - data[jistart + 7521] = 0.0 - k[6405]*y_cur[IDX_CH3NHII] - - k[6406]*y_cur[IDX_CH3NHII]; - data[jistart + 7522] = 0.0 + k[2086]*y_cur[IDX_CH3II]; - data[jistart + 7523] = 0.0 + k[1988]*y_cur[IDX_CH2II] + - k[2087]*y_cur[IDX_CH3II]; - data[jistart + 7524] = 0.0 - k[970]*y_cur[IDX_CH3NHII] - - k[971]*y_cur[IDX_CH3NHII]; - data[jistart + 7525] = 0.0 - k[5627]*y_cur[IDX_CH3OI]; - data[jistart + 7526] = 0.0 - k[5627]*y_cur[IDX_CII] - - k[5628]*y_cur[IDX_H3II] - k[5629]*y_cur[IDX_H3OII] - - k[5630]*y_cur[IDX_HCOII] - k[5631]*y_cur[IDX_HeII] - - k[5632]*y_cur[IDX_HeII] - k[5936] - k[6289] - k[6931]; - data[jistart + 7527] = 0.0 + k[5817] + k[6121]; - data[jistart + 7528] = 0.0 + k[5653]*y_cur[IDX_HeII] + k[5943] + - k[6293]; - data[jistart + 7529] = 0.0 + k[1271]*y_cur[IDX_eM] + - k[6695]*y_cur[IDX_GRAINM]; - data[jistart + 7530] = 0.0 + k[8688]*y_cur[IDX_GOI]; - data[jistart + 7531] = 0.0 + k[7113] + k[7295] + k[7477]; - data[jistart + 7532] = 0.0 + k[8596]*y_cur[IDX_GH2COI]; - data[jistart + 7533] = 0.0 + k[8596]*y_cur[IDX_GHI]; - data[jistart + 7534] = 0.0 + k[8688]*y_cur[IDX_GCH3I]; - data[jistart + 7535] = 0.0 + k[6695]*y_cur[IDX_COOCH3II]; - data[jistart + 7536] = 0.0 - k[5628]*y_cur[IDX_CH3OI]; - data[jistart + 7537] = 0.0 - k[5629]*y_cur[IDX_CH3OI]; - data[jistart + 7538] = 0.0 - k[5630]*y_cur[IDX_CH3OI]; - data[jistart + 7539] = 0.0 - k[5631]*y_cur[IDX_CH3OI] - - k[5632]*y_cur[IDX_CH3OI] + k[5653]*y_cur[IDX_COOCH3I]; - data[jistart + 7540] = 0.0 + k[1271]*y_cur[IDX_COOCH3II]; - data[jistart + 7541] = 0.0 - k[169]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7542] = 0.0 - k[2072]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7543] = 0.0 - k[169]*y_cur[IDX_CII] - - k[369]*y_cur[IDX_HII] - k[671]*y_cur[IDX_O2II] - - k[714]*y_cur[IDX_SOII] - k[2072]*y_cur[IDX_CH3II] - - k[2666]*y_cur[IDX_H3II] - k[2794]*y_cur[IDX_H3OII] - - k[2953]*y_cur[IDX_HCOII] - k[3195]*y_cur[IDX_HeII] - - k[3664]*y_cur[IDX_O2II] - k[5814] - k[5815] - k[6118] - k[6119] - - k[6983]; - data[jistart + 7544] = 0.0 + k[958]*y_cur[IDX_eM] + - k[6604]*y_cur[IDX_GRAINM]; - data[jistart + 7545] = 0.0 + k[8752]*y_cur[IDX_GCH3OI]; - data[jistart + 7546] = 0.0 + k[8752]*y_cur[IDX_GCH3I]; - data[jistart + 7547] = 0.0 + k[7165] + k[7347] + k[7529]; - data[jistart + 7548] = 0.0 + k[6604]*y_cur[IDX_CH3OCH4II]; - data[jistart + 7549] = 0.0 - k[369]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7550] = 0.0 - k[2666]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7551] = 0.0 - k[2794]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7552] = 0.0 - k[2953]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7553] = 0.0 - k[3195]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7554] = 0.0 - k[671]*y_cur[IDX_CH3OCH3I] - - k[3664]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7555] = 0.0 - k[714]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7556] = 0.0 + k[958]*y_cur[IDX_CH3OCH4II]; - data[jistart + 7557] = 0.0 + k[169]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7558] = 0.0 + k[169]*y_cur[IDX_CII] + - k[369]*y_cur[IDX_HII] + k[671]*y_cur[IDX_O2II] + - k[714]*y_cur[IDX_SOII] + k[5814] + k[6118]; - data[jistart + 7559] = 0.0 - k[955]*y_cur[IDX_eM] - - k[956]*y_cur[IDX_eM] - k[6587]*y_cur[IDX_GRAINM] - - k[6588]*y_cur[IDX_GRAINM]; - data[jistart + 7560] = 0.0 - k[6587]*y_cur[IDX_CH3OCH3II] - - k[6588]*y_cur[IDX_CH3OCH3II]; - data[jistart + 7561] = 0.0 + k[369]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7562] = 0.0 + k[671]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7563] = 0.0 + k[714]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7564] = 0.0 - k[955]*y_cur[IDX_CH3OCH3II] - - k[956]*y_cur[IDX_CH3OCH3II]; - data[jistart + 7565] = 0.0 + k[5534]*y_cur[IDX_CH3OHI]; - data[jistart + 7566] = 0.0 + k[2666]*y_cur[IDX_H3II] + - k[2794]*y_cur[IDX_H3OII] + k[2953]*y_cur[IDX_HCOII]; - data[jistart + 7567] = 0.0 - k[957]*y_cur[IDX_eM] - - k[958]*y_cur[IDX_eM] - k[959]*y_cur[IDX_eM] - - k[6603]*y_cur[IDX_GRAINM] - k[6604]*y_cur[IDX_GRAINM] - - k[6605]*y_cur[IDX_GRAINM]; - data[jistart + 7568] = 0.0 + k[2125]*y_cur[IDX_CH3OH2II] + - k[5534]*y_cur[IDX_CH3II]; - data[jistart + 7569] = 0.0 + k[2125]*y_cur[IDX_CH3OHI]; - data[jistart + 7570] = 0.0 - k[6603]*y_cur[IDX_CH3OCH4II] - - k[6604]*y_cur[IDX_CH3OCH4II] - k[6605]*y_cur[IDX_CH3OCH4II]; - data[jistart + 7571] = 0.0 + k[2666]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7572] = 0.0 + k[2794]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7573] = 0.0 + k[2953]*y_cur[IDX_CH3OCH3I]; - data[jistart + 7574] = 0.0 - k[957]*y_cur[IDX_CH3OCH4II] - - k[958]*y_cur[IDX_CH3OCH4II] - k[959]*y_cur[IDX_CH3OCH4II]; - data[jistart + 7575] = 0.0 - k[1381]*y_cur[IDX_CH3OHI] - - k[1382]*y_cur[IDX_CH3OHI]; - data[jistart + 7576] = 0.0 - k[2122]*y_cur[IDX_CH3OHI] - - k[2123]*y_cur[IDX_CH3OHI]; - data[jistart + 7577] = 0.0 - k[2124]*y_cur[IDX_CH3OHI]; - data[jistart + 7578] = 0.0 - k[5073]*y_cur[IDX_CH3OHI]; - data[jistart + 7579] = 0.0 - k[1937]*y_cur[IDX_CH3OHI] - - k[1938]*y_cur[IDX_CH3OHI] - k[1939]*y_cur[IDX_CH3OHI]; - data[jistart + 7580] = 0.0 + k[61]*y_cur[IDX_OHM]; - data[jistart + 7581] = 0.0 - k[2073]*y_cur[IDX_CH3OHI] - - k[5534]*y_cur[IDX_CH3OHI]; - data[jistart + 7582] = 0.0 + k[2653]*y_cur[IDX_H3II]; - data[jistart + 7583] = 0.0 + k[3570]*y_cur[IDX_NH3I]; - data[jistart + 7584] = 0.0 + k[955]*y_cur[IDX_eM] + - k[6587]*y_cur[IDX_GRAINM]; - data[jistart + 7585] = 0.0 + k[959]*y_cur[IDX_eM] + - k[6605]*y_cur[IDX_GRAINM]; - data[jistart + 7586] = 0.0 - k[279]*y_cur[IDX_CH4II] - - k[370]*y_cur[IDX_HII] - k[545]*y_cur[IDX_NII] - - k[651]*y_cur[IDX_OII] - k[672]*y_cur[IDX_O2II] - - k[1381]*y_cur[IDX_CII] - k[1382]*y_cur[IDX_CII] - - k[1937]*y_cur[IDX_CHII] - k[1938]*y_cur[IDX_CHII] - - k[1939]*y_cur[IDX_CHII] - k[2073]*y_cur[IDX_CH3II] - - k[2122]*y_cur[IDX_C3HII] - k[2123]*y_cur[IDX_C3HII] - - k[2124]*y_cur[IDX_C4H3II] - k[2125]*y_cur[IDX_CH3OH2II] - - k[2126]*y_cur[IDX_HC3NHII] - k[2127]*y_cur[IDX_HCOOH2II] - - k[2128]*y_cur[IDX_NCCNHII] - k[2129]*y_cur[IDX_PH2II] - - k[2130]*y_cur[IDX_PH2II] - k[2131]*y_cur[IDX_PH3II] - - k[2132]*y_cur[IDX_S2II] - k[2137]*y_cur[IDX_CH4II] - - k[2330]*y_cur[IDX_HII] - k[2331]*y_cur[IDX_HII] - - k[2332]*y_cur[IDX_HII] - k[2487]*y_cur[IDX_H2COII] - - k[2667]*y_cur[IDX_H3II] - k[2668]*y_cur[IDX_H3II] - - k[2762]*y_cur[IDX_H3COII] - k[2795]*y_cur[IDX_H3OII] - - k[2954]*y_cur[IDX_HCOII] - k[3196]*y_cur[IDX_HeII] - - k[3197]*y_cur[IDX_HeII] - k[3336]*y_cur[IDX_NII] - - k[3337]*y_cur[IDX_NII] - k[3338]*y_cur[IDX_NII] - - k[3339]*y_cur[IDX_NII] - k[3636]*y_cur[IDX_OII] - - k[3637]*y_cur[IDX_OII] - k[3665]*y_cur[IDX_O2II] - - k[3810]*y_cur[IDX_PII] - k[3816]*y_cur[IDX_PHII] - - k[3867]*y_cur[IDX_SiII] - k[5073]*y_cur[IDX_CHI] - - k[5534]*y_cur[IDX_CH3II] - k[5816] - k[5817] - k[5818] - k[5819] - - k[6120] - k[6121] - k[6122] - k[6123] - k[6124] - k[6936]; - data[jistart + 7587] = 0.0 + k[966]*y_cur[IDX_eM] + - k[2120]*y_cur[IDX_HCOOHI] + k[2121]*y_cur[IDX_NH3I] - - k[2125]*y_cur[IDX_CH3OHI] + k[6443]*y_cur[IDX_GRAINM]; - data[jistart + 7588] = 0.0 - k[279]*y_cur[IDX_CH3OHI] - - k[2137]*y_cur[IDX_CH3OHI]; - data[jistart + 7589] = 0.0 + k[8599]*y_cur[IDX_GHI]; - data[jistart + 7590] = 0.0 + k[8737]*y_cur[IDX_GOHI]; - data[jistart + 7591] = 0.0 + k[8598]*y_cur[IDX_GHI]; - data[jistart + 7592] = 0.0 + k[7118] + k[7300] + k[7482]; - data[jistart + 7593] = 0.0 + k[8598]*y_cur[IDX_GCH3OI] + - k[8599]*y_cur[IDX_GCH2OHI]; - data[jistart + 7594] = 0.0 + k[8737]*y_cur[IDX_GCH3I]; - data[jistart + 7595] = 0.0 + k[6443]*y_cur[IDX_CH3OH2II] + - k[6587]*y_cur[IDX_CH3OCH3II] + k[6605]*y_cur[IDX_CH3OCH4II] + - k[6699]*y_cur[IDX_HCOOCH3II] + k[6725]*y_cur[IDX_H5C2O2II]; - data[jistart + 7596] = 0.0 - k[370]*y_cur[IDX_CH3OHI] - - k[2330]*y_cur[IDX_CH3OHI] - k[2331]*y_cur[IDX_CH3OHI] - - k[2332]*y_cur[IDX_CH3OHI]; - data[jistart + 7597] = 0.0 - k[2487]*y_cur[IDX_CH3OHI]; - data[jistart + 7598] = 0.0 + k[2653]*y_cur[IDX_CH3CHOI] - - k[2667]*y_cur[IDX_CH3OHI] - k[2668]*y_cur[IDX_CH3OHI]; - data[jistart + 7599] = 0.0 - k[2762]*y_cur[IDX_CH3OHI]; - data[jistart + 7600] = 0.0 - k[2795]*y_cur[IDX_CH3OHI]; - data[jistart + 7601] = 0.0 + k[1053]*y_cur[IDX_eM] + - k[6725]*y_cur[IDX_GRAINM]; - data[jistart + 7602] = 0.0 - k[2126]*y_cur[IDX_CH3OHI]; - data[jistart + 7603] = 0.0 - k[2954]*y_cur[IDX_CH3OHI]; - data[jistart + 7604] = 0.0 + k[982]*y_cur[IDX_eM] + - k[6699]*y_cur[IDX_GRAINM]; - data[jistart + 7605] = 0.0 + k[2120]*y_cur[IDX_CH3OH2II]; - data[jistart + 7606] = 0.0 - k[2127]*y_cur[IDX_CH3OHI]; - data[jistart + 7607] = 0.0 - k[3196]*y_cur[IDX_CH3OHI] - - k[3197]*y_cur[IDX_CH3OHI]; - data[jistart + 7608] = 0.0 - k[545]*y_cur[IDX_CH3OHI] - - k[3336]*y_cur[IDX_CH3OHI] - k[3337]*y_cur[IDX_CH3OHI] - - k[3338]*y_cur[IDX_CH3OHI] - k[3339]*y_cur[IDX_CH3OHI]; - data[jistart + 7609] = 0.0 - k[2128]*y_cur[IDX_CH3OHI]; - data[jistart + 7610] = 0.0 + k[2121]*y_cur[IDX_CH3OH2II] + - k[3570]*y_cur[IDX_CH3CHOHII]; - data[jistart + 7611] = 0.0 - k[651]*y_cur[IDX_CH3OHI] - - k[3636]*y_cur[IDX_CH3OHI] - k[3637]*y_cur[IDX_CH3OHI]; - data[jistart + 7612] = 0.0 - k[672]*y_cur[IDX_CH3OHI] - - k[3665]*y_cur[IDX_CH3OHI]; - data[jistart + 7613] = 0.0 + k[61]*y_cur[IDX_CH3I]; - data[jistart + 7614] = 0.0 - k[3810]*y_cur[IDX_CH3OHI]; - data[jistart + 7615] = 0.0 - k[3816]*y_cur[IDX_CH3OHI]; - data[jistart + 7616] = 0.0 - k[2129]*y_cur[IDX_CH3OHI] - - k[2130]*y_cur[IDX_CH3OHI]; - data[jistart + 7617] = 0.0 - k[2131]*y_cur[IDX_CH3OHI]; - data[jistart + 7618] = 0.0 - k[2132]*y_cur[IDX_CH3OHI]; - data[jistart + 7619] = 0.0 - k[3867]*y_cur[IDX_CH3OHI]; - data[jistart + 7620] = 0.0 + k[955]*y_cur[IDX_CH3OCH3II] + - k[959]*y_cur[IDX_CH3OCH4II] + k[966]*y_cur[IDX_CH3OH2II] + - k[982]*y_cur[IDX_HCOOCH3II] + k[1053]*y_cur[IDX_H5C2O2II]; - data[jistart + 7621] = 0.0 + k[5634]*y_cur[IDX_H3II] + - k[5635]*y_cur[IDX_H3OII] + k[5636]*y_cur[IDX_HCOII]; - data[jistart + 7622] = 0.0 + k[5628]*y_cur[IDX_H3II] + - k[5629]*y_cur[IDX_H3OII] + k[5630]*y_cur[IDX_HCOII]; - data[jistart + 7623] = 0.0 + k[279]*y_cur[IDX_CH4II] + - k[370]*y_cur[IDX_HII] + k[545]*y_cur[IDX_NII] + - k[651]*y_cur[IDX_OII] + k[672]*y_cur[IDX_O2II] + k[5816] + k[6120]; - data[jistart + 7624] = 0.0 - k[960]*y_cur[IDX_eM] - - k[961]*y_cur[IDX_eM] - k[962]*y_cur[IDX_eM] - - k[6428]*y_cur[IDX_GRAINM] - k[6429]*y_cur[IDX_GRAINM] - - k[6430]*y_cur[IDX_GRAINM]; - data[jistart + 7625] = 0.0 + k[279]*y_cur[IDX_CH3OHI]; - data[jistart + 7626] = 0.0 - k[6428]*y_cur[IDX_CH3OHII] - - k[6429]*y_cur[IDX_CH3OHII] - k[6430]*y_cur[IDX_CH3OHII]; - data[jistart + 7627] = 0.0 + k[370]*y_cur[IDX_CH3OHI]; - data[jistart + 7628] = 0.0 + k[5628]*y_cur[IDX_CH3OI] + - k[5634]*y_cur[IDX_CH2OHI]; - data[jistart + 7629] = 0.0 + k[5629]*y_cur[IDX_CH3OI] + - k[5635]*y_cur[IDX_CH2OHI]; - data[jistart + 7630] = 0.0 + k[5630]*y_cur[IDX_CH3OI] + - k[5636]*y_cur[IDX_CH2OHI]; - data[jistart + 7631] = 0.0 + k[545]*y_cur[IDX_CH3OHI]; - data[jistart + 7632] = 0.0 + k[651]*y_cur[IDX_CH3OHI]; - data[jistart + 7633] = 0.0 + k[672]*y_cur[IDX_CH3OHI]; - data[jistart + 7634] = 0.0 - k[960]*y_cur[IDX_CH3OHII] - - k[961]*y_cur[IDX_CH3OHII] - k[962]*y_cur[IDX_CH3OHII]; - data[jistart + 7635] = 0.0 + k[2124]*y_cur[IDX_CH3OHI]; - data[jistart + 7636] = 0.0 + k[1937]*y_cur[IDX_CH3OHI]; - data[jistart + 7637] = 0.0 + k[5536]*y_cur[IDX_H2OI]; - data[jistart + 7638] = 0.0 + k[1937]*y_cur[IDX_CHII] + - k[2124]*y_cur[IDX_C4H3II] - k[2125]*y_cur[IDX_CH3OH2II] + - k[2126]*y_cur[IDX_HC3NHII] + k[2127]*y_cur[IDX_HCOOH2II] + - k[2128]*y_cur[IDX_NCCNHII] + k[2131]*y_cur[IDX_PH3II] + - k[2137]*y_cur[IDX_CH4II] + k[2487]*y_cur[IDX_H2COII] + - k[2668]*y_cur[IDX_H3II] + k[2762]*y_cur[IDX_H3COII] + - k[2795]*y_cur[IDX_H3OII] + k[2954]*y_cur[IDX_HCOII]; - data[jistart + 7639] = 0.0 - k[963]*y_cur[IDX_eM] - - k[964]*y_cur[IDX_eM] - k[965]*y_cur[IDX_eM] - k[966]*y_cur[IDX_eM] - - k[967]*y_cur[IDX_eM] - k[2120]*y_cur[IDX_HCOOHI] - - k[2121]*y_cur[IDX_NH3I] - k[2125]*y_cur[IDX_CH3OHI] - - k[2494]*y_cur[IDX_H2COI] - k[2495]*y_cur[IDX_H2COI] - - k[2873]*y_cur[IDX_HCNI] - k[6440]*y_cur[IDX_GRAINM] - - k[6441]*y_cur[IDX_GRAINM] - k[6442]*y_cur[IDX_GRAINM] - - k[6443]*y_cur[IDX_GRAINM] - k[6444]*y_cur[IDX_GRAINM]; - data[jistart + 7640] = 0.0 + k[2137]*y_cur[IDX_CH3OHI]; - data[jistart + 7641] = 0.0 - k[6440]*y_cur[IDX_CH3OH2II] - - k[6441]*y_cur[IDX_CH3OH2II] - k[6442]*y_cur[IDX_CH3OH2II] - - k[6443]*y_cur[IDX_CH3OH2II] - k[6444]*y_cur[IDX_CH3OH2II]; - data[jistart + 7642] = 0.0 - k[2494]*y_cur[IDX_CH3OH2II] - - k[2495]*y_cur[IDX_CH3OH2II]; - data[jistart + 7643] = 0.0 + k[2487]*y_cur[IDX_CH3OHI]; - data[jistart + 7644] = 0.0 + k[5536]*y_cur[IDX_CH3II]; - data[jistart + 7645] = 0.0 + k[2668]*y_cur[IDX_CH3OHI]; - data[jistart + 7646] = 0.0 + k[2762]*y_cur[IDX_CH3OHI]; - data[jistart + 7647] = 0.0 + k[2795]*y_cur[IDX_CH3OHI]; - data[jistart + 7648] = 0.0 + k[2126]*y_cur[IDX_CH3OHI]; - data[jistart + 7649] = 0.0 - k[2873]*y_cur[IDX_CH3OH2II]; - data[jistart + 7650] = 0.0 + k[2954]*y_cur[IDX_CH3OHI]; - data[jistart + 7651] = 0.0 - k[2120]*y_cur[IDX_CH3OH2II]; - data[jistart + 7652] = 0.0 + k[2127]*y_cur[IDX_CH3OHI]; - data[jistart + 7653] = 0.0 + k[2128]*y_cur[IDX_CH3OHI]; - data[jistart + 7654] = 0.0 - k[2121]*y_cur[IDX_CH3OH2II]; - data[jistart + 7655] = 0.0 + k[2131]*y_cur[IDX_CH3OHI]; - data[jistart + 7656] = 0.0 - k[963]*y_cur[IDX_CH3OH2II] - - k[964]*y_cur[IDX_CH3OH2II] - k[965]*y_cur[IDX_CH3OH2II] - - k[966]*y_cur[IDX_CH3OH2II] - k[967]*y_cur[IDX_CH3OH2II]; - data[jistart + 7657] = 0.0 + k[1898]*y_cur[IDX_CH5II]; - data[jistart + 7658] = 0.0 + k[1367]*y_cur[IDX_C2H6I] - - k[1383]*y_cur[IDX_CH4I] - k[1384]*y_cur[IDX_CH4I]; - data[jistart + 7659] = 0.0 + k[2217]*y_cur[IDX_CH5II] - - k[4871]*y_cur[IDX_CH4I]; - data[jistart + 7660] = 0.0 - k[2146]*y_cur[IDX_CH4I] - - k[2147]*y_cur[IDX_CH4I] - k[2148]*y_cur[IDX_CH4I] - - k[2149]*y_cur[IDX_CH4I] - k[2150]*y_cur[IDX_CH4I]; - data[jistart + 7661] = 0.0 + k[2220]*y_cur[IDX_CH5II]; - data[jistart + 7662] = 0.0 - k[2151]*y_cur[IDX_CH4I] - - k[2152]*y_cur[IDX_CH4I] - k[2153]*y_cur[IDX_CH4I]; - data[jistart + 7663] = 0.0 + k[277]*y_cur[IDX_CH4II] + - k[1538]*y_cur[IDX_C2H5II] + k[2218]*y_cur[IDX_CH5II]; - data[jistart + 7664] = 0.0 - k[2154]*y_cur[IDX_CH4I] - - k[2155]*y_cur[IDX_CH4I]; - data[jistart + 7665] = 0.0 + k[5025]*y_cur[IDX_CH3I]; - data[jistart + 7666] = 0.0 + k[1614]*y_cur[IDX_C2H6I] - - k[2156]*y_cur[IDX_CH4I]; - data[jistart + 7667] = 0.0 + k[278]*y_cur[IDX_CH4II] + - k[1685]*y_cur[IDX_C2H5II] + k[1714]*y_cur[IDX_PH2II] + - k[2045]*y_cur[IDX_CH3II] + k[2219]*y_cur[IDX_CH5II]; - data[jistart + 7668] = 0.0 + k[763]*y_cur[IDX_eM] + - k[1667]*y_cur[IDX_CH2CCHI] + k[1670]*y_cur[IDX_C2H6I] + - k[1674]*y_cur[IDX_H2SI] + k[6387]*y_cur[IDX_GRAINM]; - data[jistart + 7669] = 0.0 + k[1538]*y_cur[IDX_C2H2I] + - k[1685]*y_cur[IDX_C2H4I]; - data[jistart + 7670] = 0.0 + k[2594]*y_cur[IDX_H3II] + - k[2596]*y_cur[IDX_H3II]; - data[jistart + 7671] = 0.0 + k[773]*y_cur[IDX_eM] + - k[6577]*y_cur[IDX_GRAINM]; - data[jistart + 7672] = 0.0 + k[1367]*y_cur[IDX_CII] + - k[1614]*y_cur[IDX_C2H3II] + k[1670]*y_cur[IDX_C2H4II] + - k[2062]*y_cur[IDX_CH3II] + k[2222]*y_cur[IDX_CH5II]; - data[jistart + 7673] = 0.0 + k[2863]*y_cur[IDX_HCNI]; - data[jistart + 7674] = 0.0 - k[2157]*y_cur[IDX_CH4I] - - k[2158]*y_cur[IDX_CH4I] - k[2159]*y_cur[IDX_CH4I]; - data[jistart + 7675] = 0.0 + k[2123]*y_cur[IDX_CH3OHI] - - k[2160]*y_cur[IDX_CH4I] - k[2161]*y_cur[IDX_CH4I]; - data[jistart + 7676] = 0.0 - k[2162]*y_cur[IDX_CH4I]; - data[jistart + 7677] = 0.0 - k[2163]*y_cur[IDX_CH4I]; - data[jistart + 7678] = 0.0 - k[2164]*y_cur[IDX_CH4I] - - k[2165]*y_cur[IDX_CH4I] - k[2166]*y_cur[IDX_CH4I] - - k[2167]*y_cur[IDX_CH4I]; - data[jistart + 7679] = 0.0 - k[5057]*y_cur[IDX_CH4I] - - k[5058]*y_cur[IDX_CH4I]; - data[jistart + 7680] = 0.0 - k[2168]*y_cur[IDX_CH4I]; - data[jistart + 7681] = 0.0 - k[2169]*y_cur[IDX_CH4I] - - k[2170]*y_cur[IDX_CH4I]; - data[jistart + 7682] = 0.0 - k[2171]*y_cur[IDX_CH4I]; - data[jistart + 7683] = 0.0 - k[2172]*y_cur[IDX_CH4I] - - k[2173]*y_cur[IDX_CH4I] - k[2174]*y_cur[IDX_CH4I] - - k[2175]*y_cur[IDX_CH4I]; - data[jistart + 7684] = 0.0 - k[2176]*y_cur[IDX_CH4I] - - k[2177]*y_cur[IDX_CH4I] - k[2178]*y_cur[IDX_CH4I] - - k[2179]*y_cur[IDX_CH4I]; - data[jistart + 7685] = 0.0 - k[2180]*y_cur[IDX_CH4I] - - k[2181]*y_cur[IDX_CH4I]; - data[jistart + 7686] = 0.0 - k[2182]*y_cur[IDX_CH4I] - - k[2183]*y_cur[IDX_CH4I] - k[2184]*y_cur[IDX_CH4I]; - data[jistart + 7687] = 0.0 - k[2185]*y_cur[IDX_CH4I] - - k[2186]*y_cur[IDX_CH4I]; - data[jistart + 7688] = 0.0 + k[2221]*y_cur[IDX_CH5II]; - data[jistart + 7689] = 0.0 - k[2187]*y_cur[IDX_CH4I]; - data[jistart + 7690] = 0.0 - k[2188]*y_cur[IDX_CH4I]; - data[jistart + 7691] = 0.0 + k[2244]*y_cur[IDX_CH5II] - - k[5074]*y_cur[IDX_CH4I]; - data[jistart + 7692] = 0.0 - k[1940]*y_cur[IDX_CH4I] - - k[1941]*y_cur[IDX_CH4I] - k[1942]*y_cur[IDX_CH4I]; - data[jistart + 7693] = 0.0 + k[2000]*y_cur[IDX_CH5II] - - k[4996]*y_cur[IDX_CH4I]; - data[jistart + 7694] = 0.0 - k[1976]*y_cur[IDX_CH4I] - - k[1977]*y_cur[IDX_CH4I]; - data[jistart + 7695] = 0.0 + k[1667]*y_cur[IDX_C2H4II]; - data[jistart + 7696] = 0.0 + k[70]*y_cur[IDX_HM] + - k[5025]*y_cur[IDX_C2H3I] + k[5028]*y_cur[IDX_CH3I] + - k[5028]*y_cur[IDX_CH3I] + k[5030]*y_cur[IDX_H2COI] + - k[5031]*y_cur[IDX_H2OI] + k[5032]*y_cur[IDX_H2SI] + - k[5033]*y_cur[IDX_HCOI] + k[5034]*y_cur[IDX_HNOI] + - k[5035]*y_cur[IDX_NH2I] + k[5036]*y_cur[IDX_NH3I] + - k[5042]*y_cur[IDX_O2HI] + k[5045]*y_cur[IDX_OHI] + - k[5136]*y_cur[IDX_H2I]; - data[jistart + 7697] = 0.0 + k[2045]*y_cur[IDX_C2H4I] + - k[2062]*y_cur[IDX_C2H6I] + k[2065]*y_cur[IDX_CH3CHOI] + - k[2072]*y_cur[IDX_CH3OCH3I] + k[2073]*y_cur[IDX_CH3OHI] - - k[2074]*y_cur[IDX_CH4I] + k[2077]*y_cur[IDX_H2COI] + - k[2099]*y_cur[IDX_SiH4I]; - data[jistart + 7698] = 0.0 + k[2649]*y_cur[IDX_H3II]; - data[jistart + 7699] = 0.0 + k[2065]*y_cur[IDX_CH3II] + k[5807] + - k[6112]; - data[jistart + 7700] = 0.0 + k[942]*y_cur[IDX_eM] + - k[6564]*y_cur[IDX_GRAINM]; - data[jistart + 7701] = 0.0 + k[2659]*y_cur[IDX_H3II] + - k[2662]*y_cur[IDX_H3II] + k[2664]*y_cur[IDX_H3II] + k[5811]; - data[jistart + 7702] = 0.0 + k[2072]*y_cur[IDX_CH3II] + k[5815] + - k[6119]; - data[jistart + 7703] = 0.0 + k[957]*y_cur[IDX_eM] + - k[6603]*y_cur[IDX_GRAINM]; - data[jistart + 7704] = 0.0 + k[279]*y_cur[IDX_CH4II] + - k[2073]*y_cur[IDX_CH3II] + k[2123]*y_cur[IDX_C3HII] + - k[2129]*y_cur[IDX_PH2II]; - data[jistart + 7705] = 0.0 - k[285]*y_cur[IDX_COII] - - k[286]*y_cur[IDX_CO2II] - k[371]*y_cur[IDX_HII] - - k[442]*y_cur[IDX_H2II] - k[514]*y_cur[IDX_HeII] - - k[546]*y_cur[IDX_NII] - k[652]*y_cur[IDX_OII] - - k[1383]*y_cur[IDX_CII] - k[1384]*y_cur[IDX_CII] - - k[1940]*y_cur[IDX_CHII] - k[1941]*y_cur[IDX_CHII] - - k[1942]*y_cur[IDX_CHII] - k[1976]*y_cur[IDX_CH2II] - - k[1977]*y_cur[IDX_CH2II] - k[2074]*y_cur[IDX_CH3II] - - k[2138]*y_cur[IDX_CH4II] - k[2146]*y_cur[IDX_C2II] - - k[2147]*y_cur[IDX_C2II] - k[2148]*y_cur[IDX_C2II] - - k[2149]*y_cur[IDX_C2II] - k[2150]*y_cur[IDX_C2II] - - k[2151]*y_cur[IDX_C2HII] - k[2152]*y_cur[IDX_C2HII] - - k[2153]*y_cur[IDX_C2HII] - k[2154]*y_cur[IDX_C2H2II] - - k[2155]*y_cur[IDX_C2H2II] - k[2156]*y_cur[IDX_C2H3II] - - k[2157]*y_cur[IDX_C3II] - k[2158]*y_cur[IDX_C3II] - - k[2159]*y_cur[IDX_C3II] - k[2160]*y_cur[IDX_C3HII] - - k[2161]*y_cur[IDX_C3HII] - k[2162]*y_cur[IDX_C3H2II] - - k[2163]*y_cur[IDX_C3OII] - k[2164]*y_cur[IDX_C4II] - - k[2165]*y_cur[IDX_C4II] - k[2166]*y_cur[IDX_C4II] - - k[2167]*y_cur[IDX_C4II] - k[2168]*y_cur[IDX_C4HII] - - k[2169]*y_cur[IDX_C4H2II] - k[2170]*y_cur[IDX_C4H2II] - - k[2171]*y_cur[IDX_C4H3II] - k[2172]*y_cur[IDX_C4NII] - - k[2173]*y_cur[IDX_C4NII] - k[2174]*y_cur[IDX_C4NII] - - k[2175]*y_cur[IDX_C4NII] - k[2176]*y_cur[IDX_C5II] - - k[2177]*y_cur[IDX_C5II] - k[2178]*y_cur[IDX_C5II] - - k[2179]*y_cur[IDX_C5II] - k[2180]*y_cur[IDX_C5H2II] - - k[2181]*y_cur[IDX_C5H2II] - k[2182]*y_cur[IDX_C6II] - - k[2183]*y_cur[IDX_C6II] - k[2184]*y_cur[IDX_C6II] - - k[2185]*y_cur[IDX_C6H2II] - k[2186]*y_cur[IDX_C6H2II] - - k[2187]*y_cur[IDX_C7H2II] - k[2188]*y_cur[IDX_C8H2II] - - k[2189]*y_cur[IDX_COII] - k[2190]*y_cur[IDX_COII] - - k[2191]*y_cur[IDX_CO2II] - k[2192]*y_cur[IDX_CSII] - - k[2193]*y_cur[IDX_H2COII] - k[2194]*y_cur[IDX_H2COII] - - k[2195]*y_cur[IDX_H2OII] - k[2196]*y_cur[IDX_HC3NII] - - k[2197]*y_cur[IDX_HC3NII] - k[2198]*y_cur[IDX_HC3NII] - - k[2199]*y_cur[IDX_HCNII] - k[2200]*y_cur[IDX_HCNII] - - k[2201]*y_cur[IDX_HCO2II] - k[2202]*y_cur[IDX_HNOII] - - k[2203]*y_cur[IDX_HSII] - k[2204]*y_cur[IDX_N2II] - - k[2205]*y_cur[IDX_N2II] - k[2206]*y_cur[IDX_N2HII] - - k[2207]*y_cur[IDX_NH3II] - k[2208]*y_cur[IDX_O2II] - - k[2209]*y_cur[IDX_OHII] - k[2210]*y_cur[IDX_OHII] - - k[2211]*y_cur[IDX_PII] - k[2212]*y_cur[IDX_PHII] - - k[2213]*y_cur[IDX_PHII] - k[2214]*y_cur[IDX_PH2II] - - k[2215]*y_cur[IDX_SII] - k[2216]*y_cur[IDX_SII] - - k[2333]*y_cur[IDX_HII] - k[2378]*y_cur[IDX_H2II] - - k[2379]*y_cur[IDX_H2II] - k[2669]*y_cur[IDX_H3II] - - k[3198]*y_cur[IDX_HeII] - k[3199]*y_cur[IDX_HeII] - - k[3200]*y_cur[IDX_HeII] - k[3201]*y_cur[IDX_HeII] - - k[3340]*y_cur[IDX_NII] - k[3341]*y_cur[IDX_NII] - - k[3342]*y_cur[IDX_NII] - k[3638]*y_cur[IDX_OII] - - k[3652]*y_cur[IDX_OM] - k[4871]*y_cur[IDX_C2I] - - k[4996]*y_cur[IDX_CH2I] - k[5057]*y_cur[IDX_C4HI] - - k[5058]*y_cur[IDX_C4HI] - k[5059]*y_cur[IDX_CNI] - - k[5060]*y_cur[IDX_O2I] - k[5061]*y_cur[IDX_OHI] - - k[5062]*y_cur[IDX_SI] - k[5074]*y_cur[IDX_CHI] - - k[5159]*y_cur[IDX_HI] - k[5297]*y_cur[IDX_NH2I] - - k[5304]*y_cur[IDX_NHI] - k[5385]*y_cur[IDX_OI] - - k[5543]*y_cur[IDX_HCOII] - k[5544]*y_cur[IDX_SiII] - k[5820] - - k[6127] - k[6128] - k[6129] - k[6130] - k[6898]; - data[jistart + 7706] = 0.0 + k[277]*y_cur[IDX_C2H2I] + - k[278]*y_cur[IDX_C2H4I] + k[279]*y_cur[IDX_CH3OHI] + - k[280]*y_cur[IDX_H2COI] + k[281]*y_cur[IDX_H2SI] + - k[282]*y_cur[IDX_NH3I] + k[283]*y_cur[IDX_O2I] + - k[284]*y_cur[IDX_OCSI] - k[2138]*y_cur[IDX_CH4I]; - data[jistart + 7707] = 0.0 + k[975]*y_cur[IDX_eM] + - k[1898]*y_cur[IDX_CI] + k[2000]*y_cur[IDX_CH2I] + - k[2217]*y_cur[IDX_C2I] + k[2218]*y_cur[IDX_C2H2I] + - k[2219]*y_cur[IDX_C2H4I] + k[2220]*y_cur[IDX_C2HI] + - k[2221]*y_cur[IDX_C6H6I] + k[2222]*y_cur[IDX_C2H6I] + - k[2223]*y_cur[IDX_CO2I] + k[2224]*y_cur[IDX_COI] + - k[2225]*y_cur[IDX_H2COI] + k[2226]*y_cur[IDX_H2OI] + - k[2227]*y_cur[IDX_H2SI] + k[2228]*y_cur[IDX_HC3NI] + - k[2229]*y_cur[IDX_HCNI] + k[2230]*y_cur[IDX_HCOI] + - k[2231]*y_cur[IDX_HClI] + k[2232]*y_cur[IDX_HNCI] + - k[2233]*y_cur[IDX_MgI] + k[2234]*y_cur[IDX_N2OI] + - k[2235]*y_cur[IDX_SI] + k[2238]*y_cur[IDX_SiH4I] + - k[2244]*y_cur[IDX_CHI] + k[3533]*y_cur[IDX_NH2I] + - k[3571]*y_cur[IDX_NH3I] + k[3609]*y_cur[IDX_NHI] + - k[3797]*y_cur[IDX_OHI] + k[6335]*y_cur[IDX_GRAINM]; - data[jistart + 7708] = 0.0 - k[5059]*y_cur[IDX_CH4I]; - data[jistart + 7709] = 0.0 + k[2224]*y_cur[IDX_CH5II]; - data[jistart + 7710] = 0.0 - k[285]*y_cur[IDX_CH4I] - - k[2189]*y_cur[IDX_CH4I] - k[2190]*y_cur[IDX_CH4I]; - data[jistart + 7711] = 0.0 + k[2223]*y_cur[IDX_CH5II]; - data[jistart + 7712] = 0.0 - k[286]*y_cur[IDX_CH4I] - - k[2191]*y_cur[IDX_CH4I]; - data[jistart + 7713] = 0.0 - k[2192]*y_cur[IDX_CH4I]; - data[jistart + 7714] = 0.0 + k[8579]*y_cur[IDX_GHI]; - data[jistart + 7715] = 0.0 + k[7080] + k[7262] + k[7444]; - data[jistart + 7716] = 0.0 + k[8579]*y_cur[IDX_GCH3I]; - data[jistart + 7717] = 0.0 + k[6335]*y_cur[IDX_CH5II] + - k[6387]*y_cur[IDX_C2H4II] + k[6564]*y_cur[IDX_CH3CHOHII] + - k[6577]*y_cur[IDX_C2H5OHII] + k[6598]*y_cur[IDX_PCH4II] + - k[6603]*y_cur[IDX_CH3OCH4II]; - data[jistart + 7718] = 0.0 - k[5159]*y_cur[IDX_CH4I]; - data[jistart + 7719] = 0.0 - k[371]*y_cur[IDX_CH4I] - - k[2333]*y_cur[IDX_CH4I]; - data[jistart + 7720] = 0.0 + k[70]*y_cur[IDX_CH3I]; - data[jistart + 7721] = 0.0 + k[5136]*y_cur[IDX_CH3I]; - data[jistart + 7722] = 0.0 - k[442]*y_cur[IDX_CH4I] - - k[2378]*y_cur[IDX_CH4I] - k[2379]*y_cur[IDX_CH4I]; - data[jistart + 7723] = 0.0 + k[280]*y_cur[IDX_CH4II] + - k[2077]*y_cur[IDX_CH3II] + k[2225]*y_cur[IDX_CH5II] + - k[5030]*y_cur[IDX_CH3I]; - data[jistart + 7724] = 0.0 - k[2193]*y_cur[IDX_CH4I] - - k[2194]*y_cur[IDX_CH4I]; - data[jistart + 7725] = 0.0 + k[2226]*y_cur[IDX_CH5II] + - k[5031]*y_cur[IDX_CH3I]; - data[jistart + 7726] = 0.0 - k[2195]*y_cur[IDX_CH4I]; - data[jistart + 7727] = 0.0 + k[281]*y_cur[IDX_CH4II] + - k[1674]*y_cur[IDX_C2H4II] + k[2227]*y_cur[IDX_CH5II] + - k[5032]*y_cur[IDX_CH3I]; - data[jistart + 7728] = 0.0 + k[2594]*y_cur[IDX_C2H5OHI] + - k[2596]*y_cur[IDX_C2H5OHI] + k[2649]*y_cur[IDX_CH3CHCH2I] + - k[2659]*y_cur[IDX_CH3COCH3I] + k[2662]*y_cur[IDX_CH3COCH3I] + - k[2664]*y_cur[IDX_CH3COCH3I] - k[2669]*y_cur[IDX_CH4I]; - data[jistart + 7729] = 0.0 + k[2228]*y_cur[IDX_CH5II]; - data[jistart + 7730] = 0.0 - k[2196]*y_cur[IDX_CH4I] - - k[2197]*y_cur[IDX_CH4I] - k[2198]*y_cur[IDX_CH4I]; - data[jistart + 7731] = 0.0 + k[2229]*y_cur[IDX_CH5II] + - k[2863]*y_cur[IDX_C2H7II]; - data[jistart + 7732] = 0.0 - k[2199]*y_cur[IDX_CH4I] - - k[2200]*y_cur[IDX_CH4I]; - data[jistart + 7733] = 0.0 + k[2230]*y_cur[IDX_CH5II] + - k[5033]*y_cur[IDX_CH3I]; - data[jistart + 7734] = 0.0 - k[5543]*y_cur[IDX_CH4I]; - data[jistart + 7735] = 0.0 - k[2201]*y_cur[IDX_CH4I]; - data[jistart + 7736] = 0.0 + k[5858]; - data[jistart + 7737] = 0.0 + k[2231]*y_cur[IDX_CH5II]; - data[jistart + 7738] = 0.0 + k[2232]*y_cur[IDX_CH5II]; - data[jistart + 7739] = 0.0 + k[5034]*y_cur[IDX_CH3I]; - data[jistart + 7740] = 0.0 - k[2202]*y_cur[IDX_CH4I]; - data[jistart + 7741] = 0.0 - k[2203]*y_cur[IDX_CH4I]; - data[jistart + 7742] = 0.0 - k[514]*y_cur[IDX_CH4I] - - k[3198]*y_cur[IDX_CH4I] - k[3199]*y_cur[IDX_CH4I] - - k[3200]*y_cur[IDX_CH4I] - k[3201]*y_cur[IDX_CH4I]; - data[jistart + 7743] = 0.0 + k[2233]*y_cur[IDX_CH5II]; - data[jistart + 7744] = 0.0 - k[546]*y_cur[IDX_CH4I] - - k[3340]*y_cur[IDX_CH4I] - k[3341]*y_cur[IDX_CH4I] - - k[3342]*y_cur[IDX_CH4I]; - data[jistart + 7745] = 0.0 - k[2204]*y_cur[IDX_CH4I] - - k[2205]*y_cur[IDX_CH4I]; - data[jistart + 7746] = 0.0 - k[2206]*y_cur[IDX_CH4I]; - data[jistart + 7747] = 0.0 + k[2234]*y_cur[IDX_CH5II]; - data[jistart + 7748] = 0.0 + k[3609]*y_cur[IDX_CH5II] - - k[5304]*y_cur[IDX_CH4I]; - data[jistart + 7749] = 0.0 + k[3533]*y_cur[IDX_CH5II] + - k[5035]*y_cur[IDX_CH3I] - k[5297]*y_cur[IDX_CH4I]; - data[jistart + 7750] = 0.0 + k[282]*y_cur[IDX_CH4II] + - k[3571]*y_cur[IDX_CH5II] + k[5036]*y_cur[IDX_CH3I]; - data[jistart + 7751] = 0.0 - k[2207]*y_cur[IDX_CH4I]; - data[jistart + 7752] = 0.0 - k[5385]*y_cur[IDX_CH4I]; - data[jistart + 7753] = 0.0 - k[652]*y_cur[IDX_CH4I] - - k[3638]*y_cur[IDX_CH4I]; - data[jistart + 7754] = 0.0 - k[3652]*y_cur[IDX_CH4I]; - data[jistart + 7755] = 0.0 + k[283]*y_cur[IDX_CH4II] - - k[5060]*y_cur[IDX_CH4I]; - data[jistart + 7756] = 0.0 - k[2208]*y_cur[IDX_CH4I]; - data[jistart + 7757] = 0.0 + k[5042]*y_cur[IDX_CH3I]; - data[jistart + 7758] = 0.0 + k[284]*y_cur[IDX_CH4II]; - data[jistart + 7759] = 0.0 + k[3797]*y_cur[IDX_CH5II] + - k[5045]*y_cur[IDX_CH3I] - k[5061]*y_cur[IDX_CH4I]; - data[jistart + 7760] = 0.0 - k[2209]*y_cur[IDX_CH4I] - - k[2210]*y_cur[IDX_CH4I]; - data[jistart + 7761] = 0.0 - k[2211]*y_cur[IDX_CH4I]; - data[jistart + 7762] = 0.0 + k[1204]*y_cur[IDX_eM] + - k[6598]*y_cur[IDX_GRAINM]; - data[jistart + 7763] = 0.0 - k[2212]*y_cur[IDX_CH4I] - - k[2213]*y_cur[IDX_CH4I]; - data[jistart + 7764] = 0.0 + k[1714]*y_cur[IDX_C2H4I] + - k[2129]*y_cur[IDX_CH3OHI] - k[2214]*y_cur[IDX_CH4I]; - data[jistart + 7765] = 0.0 + k[2235]*y_cur[IDX_CH5II] - - k[5062]*y_cur[IDX_CH4I]; - data[jistart + 7766] = 0.0 - k[2215]*y_cur[IDX_CH4I] - - k[2216]*y_cur[IDX_CH4I]; - data[jistart + 7767] = 0.0 - k[5544]*y_cur[IDX_CH4I]; - data[jistart + 7768] = 0.0 + k[2099]*y_cur[IDX_CH3II] + - k[2238]*y_cur[IDX_CH5II]; - data[jistart + 7769] = 0.0 + k[763]*y_cur[IDX_C2H4II] + - k[773]*y_cur[IDX_C2H5OHII] + k[942]*y_cur[IDX_CH3CHOHII] + - k[957]*y_cur[IDX_CH3OCH4II] + k[975]*y_cur[IDX_CH5II] + - k[1204]*y_cur[IDX_PCH4II]; - data[jistart + 7770] = 0.0 - k[277]*y_cur[IDX_CH4II] - - k[2133]*y_cur[IDX_CH4II] - k[2134]*y_cur[IDX_CH4II]; - data[jistart + 7771] = 0.0 - k[278]*y_cur[IDX_CH4II] - - k[2135]*y_cur[IDX_CH4II]; - data[jistart + 7772] = 0.0 - k[2136]*y_cur[IDX_CH4II]; - data[jistart + 7773] = 0.0 + k[2641]*y_cur[IDX_H3II]; - data[jistart + 7774] = 0.0 + k[2082]*y_cur[IDX_HCOI]; - data[jistart + 7775] = 0.0 - k[279]*y_cur[IDX_CH4II] - - k[2137]*y_cur[IDX_CH4II]; - data[jistart + 7776] = 0.0 + k[285]*y_cur[IDX_COII] + - k[286]*y_cur[IDX_CO2II] + k[371]*y_cur[IDX_HII] + - k[442]*y_cur[IDX_H2II] + k[514]*y_cur[IDX_HeII] + - k[546]*y_cur[IDX_NII] + k[652]*y_cur[IDX_OII] - - k[2138]*y_cur[IDX_CH4II] + k[6129]; - data[jistart + 7777] = 0.0 - k[277]*y_cur[IDX_C2H2I] - - k[278]*y_cur[IDX_C2H4I] - k[279]*y_cur[IDX_CH3OHI] - - k[280]*y_cur[IDX_H2COI] - k[281]*y_cur[IDX_H2SI] - - k[282]*y_cur[IDX_NH3I] - k[283]*y_cur[IDX_O2I] - - k[284]*y_cur[IDX_OCSI] - k[968]*y_cur[IDX_eM] - k[969]*y_cur[IDX_eM] - - k[2133]*y_cur[IDX_C2H2I] - k[2134]*y_cur[IDX_C2H2I] - - k[2135]*y_cur[IDX_C2H4I] - k[2136]*y_cur[IDX_C2H5CNI] - - k[2137]*y_cur[IDX_CH3OHI] - k[2138]*y_cur[IDX_CH4I] - - k[2139]*y_cur[IDX_CO2I] - k[2140]*y_cur[IDX_COI] - - k[2141]*y_cur[IDX_H2COI] - k[2142]*y_cur[IDX_H2OI] - - k[2143]*y_cur[IDX_H2SI] - k[2144]*y_cur[IDX_NH3I] - - k[2145]*y_cur[IDX_OCSI] - k[2432]*y_cur[IDX_H2I] - - k[2839]*y_cur[IDX_HI] - k[3727]*y_cur[IDX_OI] - k[6125] - k[6126] - - k[6327]*y_cur[IDX_GRAINM] - k[6328]*y_cur[IDX_GRAINM]; - data[jistart + 7778] = 0.0 + k[2840]*y_cur[IDX_HI]; - data[jistart + 7779] = 0.0 - k[2140]*y_cur[IDX_CH4II]; - data[jistart + 7780] = 0.0 + k[285]*y_cur[IDX_CH4I]; - data[jistart + 7781] = 0.0 - k[2139]*y_cur[IDX_CH4II]; - data[jistart + 7782] = 0.0 + k[286]*y_cur[IDX_CH4I]; - data[jistart + 7783] = 0.0 - k[6327]*y_cur[IDX_CH4II] - - k[6328]*y_cur[IDX_CH4II]; - data[jistart + 7784] = 0.0 - k[2839]*y_cur[IDX_CH4II] + - k[2840]*y_cur[IDX_CH5II]; - data[jistart + 7785] = 0.0 + k[371]*y_cur[IDX_CH4I]; - data[jistart + 7786] = 0.0 - k[2432]*y_cur[IDX_CH4II]; - data[jistart + 7787] = 0.0 + k[442]*y_cur[IDX_CH4I]; - data[jistart + 7788] = 0.0 - k[280]*y_cur[IDX_CH4II] - - k[2141]*y_cur[IDX_CH4II]; - data[jistart + 7789] = 0.0 - k[2142]*y_cur[IDX_CH4II]; - data[jistart + 7790] = 0.0 - k[281]*y_cur[IDX_CH4II] - - k[2143]*y_cur[IDX_CH4II]; - data[jistart + 7791] = 0.0 + k[2641]*y_cur[IDX_CH3I]; - data[jistart + 7792] = 0.0 + k[2082]*y_cur[IDX_CH3II]; - data[jistart + 7793] = 0.0 + k[514]*y_cur[IDX_CH4I]; - data[jistart + 7794] = 0.0 + k[546]*y_cur[IDX_CH4I]; - data[jistart + 7795] = 0.0 - k[282]*y_cur[IDX_CH4II] - - k[2144]*y_cur[IDX_CH4II]; - data[jistart + 7796] = 0.0 - k[3727]*y_cur[IDX_CH4II]; - data[jistart + 7797] = 0.0 + k[652]*y_cur[IDX_CH4I]; - data[jistart + 7798] = 0.0 - k[283]*y_cur[IDX_CH4II]; - data[jistart + 7799] = 0.0 - k[284]*y_cur[IDX_CH4II] - - k[2145]*y_cur[IDX_CH4II]; - data[jistart + 7800] = 0.0 - k[968]*y_cur[IDX_CH4II] - - k[969]*y_cur[IDX_CH4II]; - data[jistart + 7801] = 0.0 - k[1898]*y_cur[IDX_CH5II]; - data[jistart + 7802] = 0.0 - k[2217]*y_cur[IDX_CH5II]; - data[jistart + 7803] = 0.0 - k[2220]*y_cur[IDX_CH5II]; - data[jistart + 7804] = 0.0 - k[2218]*y_cur[IDX_CH5II]; - data[jistart + 7805] = 0.0 - k[2219]*y_cur[IDX_CH5II]; - data[jistart + 7806] = 0.0 - k[2222]*y_cur[IDX_CH5II]; - data[jistart + 7807] = 0.0 - k[2221]*y_cur[IDX_CH5II]; - data[jistart + 7808] = 0.0 - k[2244]*y_cur[IDX_CH5II]; - data[jistart + 7809] = 0.0 - k[2000]*y_cur[IDX_CH5II]; - data[jistart + 7810] = 0.0 + k[5555]*y_cur[IDX_H2I]; - data[jistart + 7811] = 0.0 + k[2656]*y_cur[IDX_H3II]; - data[jistart + 7812] = 0.0 + k[2664]*y_cur[IDX_H3II]; - data[jistart + 7813] = 0.0 + k[2138]*y_cur[IDX_CH4II] + - k[2201]*y_cur[IDX_HCO2II] + k[2202]*y_cur[IDX_HNOII] + - k[2206]*y_cur[IDX_N2HII] + k[2209]*y_cur[IDX_OHII] + - k[2379]*y_cur[IDX_H2II] + k[2669]*y_cur[IDX_H3II]; - data[jistart + 7814] = 0.0 + k[2138]*y_cur[IDX_CH4I] + - k[2432]*y_cur[IDX_H2I]; - data[jistart + 7815] = 0.0 - k[972]*y_cur[IDX_eM] - - k[973]*y_cur[IDX_eM] - k[974]*y_cur[IDX_eM] - k[975]*y_cur[IDX_eM] - - k[976]*y_cur[IDX_eM] - k[1898]*y_cur[IDX_CI] - - k[2000]*y_cur[IDX_CH2I] - k[2217]*y_cur[IDX_C2I] - - k[2218]*y_cur[IDX_C2H2I] - k[2219]*y_cur[IDX_C2H4I] - - k[2220]*y_cur[IDX_C2HI] - k[2221]*y_cur[IDX_C6H6I] - - k[2222]*y_cur[IDX_C2H6I] - k[2223]*y_cur[IDX_CO2I] - - k[2224]*y_cur[IDX_COI] - k[2225]*y_cur[IDX_H2COI] - - k[2226]*y_cur[IDX_H2OI] - k[2227]*y_cur[IDX_H2SI] - - k[2228]*y_cur[IDX_HC3NI] - k[2229]*y_cur[IDX_HCNI] - - k[2230]*y_cur[IDX_HCOI] - k[2231]*y_cur[IDX_HClI] - - k[2232]*y_cur[IDX_HNCI] - k[2233]*y_cur[IDX_MgI] - - k[2234]*y_cur[IDX_N2OI] - k[2235]*y_cur[IDX_SI] - - k[2236]*y_cur[IDX_SiI] - k[2237]*y_cur[IDX_SiI] - - k[2238]*y_cur[IDX_SiH4I] - k[2244]*y_cur[IDX_CHI] - - k[2840]*y_cur[IDX_HI] - k[3533]*y_cur[IDX_NH2I] - - k[3571]*y_cur[IDX_NH3I] - k[3609]*y_cur[IDX_NHI] - - k[3728]*y_cur[IDX_OI] - k[3729]*y_cur[IDX_OI] - - k[3797]*y_cur[IDX_OHI] - k[5545]*y_cur[IDX_COI] - - k[6332]*y_cur[IDX_GRAINM] - k[6333]*y_cur[IDX_GRAINM] - - k[6334]*y_cur[IDX_GRAINM] - k[6335]*y_cur[IDX_GRAINM] - - k[6336]*y_cur[IDX_GRAINM]; - data[jistart + 7816] = 0.0 - k[2224]*y_cur[IDX_CH5II] - - k[5545]*y_cur[IDX_CH5II]; - data[jistart + 7817] = 0.0 - k[2223]*y_cur[IDX_CH5II]; - data[jistart + 7818] = 0.0 - k[6332]*y_cur[IDX_CH5II] - - k[6333]*y_cur[IDX_CH5II] - k[6334]*y_cur[IDX_CH5II] - - k[6335]*y_cur[IDX_CH5II] - k[6336]*y_cur[IDX_CH5II]; - data[jistart + 7819] = 0.0 - k[2840]*y_cur[IDX_CH5II]; - data[jistart + 7820] = 0.0 + k[2432]*y_cur[IDX_CH4II] + - k[5555]*y_cur[IDX_CH3II]; - data[jistart + 7821] = 0.0 + k[2379]*y_cur[IDX_CH4I]; - data[jistart + 7822] = 0.0 - k[2225]*y_cur[IDX_CH5II]; - data[jistart + 7823] = 0.0 - k[2226]*y_cur[IDX_CH5II]; - data[jistart + 7824] = 0.0 - k[2227]*y_cur[IDX_CH5II]; - data[jistart + 7825] = 0.0 + k[2656]*y_cur[IDX_CH3CHOI] + - k[2664]*y_cur[IDX_CH3COCH3I] + k[2669]*y_cur[IDX_CH4I]; - data[jistart + 7826] = 0.0 - k[2228]*y_cur[IDX_CH5II]; - data[jistart + 7827] = 0.0 - k[2229]*y_cur[IDX_CH5II]; - data[jistart + 7828] = 0.0 - k[2230]*y_cur[IDX_CH5II]; - data[jistart + 7829] = 0.0 + k[2201]*y_cur[IDX_CH4I]; - data[jistart + 7830] = 0.0 - k[2231]*y_cur[IDX_CH5II]; - data[jistart + 7831] = 0.0 - k[2232]*y_cur[IDX_CH5II]; - data[jistart + 7832] = 0.0 + k[2202]*y_cur[IDX_CH4I]; - data[jistart + 7833] = 0.0 - k[2233]*y_cur[IDX_CH5II]; - data[jistart + 7834] = 0.0 + k[2206]*y_cur[IDX_CH4I]; - data[jistart + 7835] = 0.0 - k[2234]*y_cur[IDX_CH5II]; - data[jistart + 7836] = 0.0 - k[3609]*y_cur[IDX_CH5II]; - data[jistart + 7837] = 0.0 - k[3533]*y_cur[IDX_CH5II]; - data[jistart + 7838] = 0.0 - k[3571]*y_cur[IDX_CH5II]; - data[jistart + 7839] = 0.0 - k[3728]*y_cur[IDX_CH5II] - - k[3729]*y_cur[IDX_CH5II]; - data[jistart + 7840] = 0.0 - k[3797]*y_cur[IDX_CH5II]; - data[jistart + 7841] = 0.0 + k[2209]*y_cur[IDX_CH4I]; - data[jistart + 7842] = 0.0 - k[2235]*y_cur[IDX_CH5II]; - data[jistart + 7843] = 0.0 - k[2236]*y_cur[IDX_CH5II] - - k[2237]*y_cur[IDX_CH5II]; - data[jistart + 7844] = 0.0 - k[2238]*y_cur[IDX_CH5II]; - data[jistart + 7845] = 0.0 - k[972]*y_cur[IDX_CH5II] - - k[973]*y_cur[IDX_CH5II] - k[974]*y_cur[IDX_CH5II] - - k[975]*y_cur[IDX_CH5II] - k[976]*y_cur[IDX_CH5II]; - data[jistart + 7846] = 0.0 + k[245]*y_cur[IDX_CNII] + - k[1903]*y_cur[IDX_HCNII] + k[4917]*y_cur[IDX_C2NI] + - k[4921]*y_cur[IDX_C3NI] + k[4929]*y_cur[IDX_C5NI] + - k[4937]*y_cur[IDX_C7NI] + k[4943]*y_cur[IDX_C9NI] - - k[4956]*y_cur[IDX_CNI] + k[4967]*y_cur[IDX_N2I] + - k[4968]*y_cur[IDX_NCCNI] + k[4972]*y_cur[IDX_NHI] + - k[4974]*y_cur[IDX_NOI] + k[4977]*y_cur[IDX_NSI] + - k[4979]*y_cur[IDX_OCNI] + k[5524]*y_cur[IDX_NI]; - data[jistart + 7847] = 0.0 + k[183]*y_cur[IDX_NCCNI] + - k[184]*y_cur[IDX_NCCNI] + k[1349]*y_cur[IDX_CH2CHCNI] + - k[1355]*y_cur[IDX_CH3C3NI] + k[1359]*y_cur[IDX_CH3C5NI] + - k[1362]*y_cur[IDX_CH3C7NI] + k[1379]*y_cur[IDX_CH3CNI] + - k[1386]*y_cur[IDX_CNOI] + k[1400]*y_cur[IDX_HC3NI] + - k[1404]*y_cur[IDX_HC5NI] + k[1405]*y_cur[IDX_HC7NI] + - k[1406]*y_cur[IDX_HC9NI] + k[1416]*y_cur[IDX_N2OI] + - k[1424]*y_cur[IDX_OCNI] + k[4656]*y_cur[IDX_CNM]; - data[jistart + 7848] = 0.0 + k[5]*y_cur[IDX_NI]; - data[jistart + 7849] = 0.0 + k[5221]*y_cur[IDX_NI]; - data[jistart + 7850] = 0.0 + k[3380]*y_cur[IDX_NI]; - data[jistart + 7851] = 0.0 + k[208]*y_cur[IDX_CNII] + - k[1458]*y_cur[IDX_HCNII] + k[5222]*y_cur[IDX_NI]; - data[jistart + 7852] = 0.0 + k[3383]*y_cur[IDX_NI]; - data[jistart + 7853] = 0.0 + k[241]*y_cur[IDX_CNII] + - k[1745]*y_cur[IDX_HCNII] + k[4903]*y_cur[IDX_NCCNI] - - k[5514]*y_cur[IDX_CNI]; - data[jistart + 7854] = 0.0 - k[1467]*y_cur[IDX_CNI] + - k[1471]*y_cur[IDX_HC3NI] + k[1474]*y_cur[IDX_HCNI] + - k[3386]*y_cur[IDX_NI]; - data[jistart + 7855] = 0.0 - k[5104]*y_cur[IDX_CNI]; - data[jistart + 7856] = 0.0 + k[1514]*y_cur[IDX_CH3CNI] - - k[2277]*y_cur[IDX_CNI] + k[4657]*y_cur[IDX_CNM]; - data[jistart + 7857] = 0.0 + k[4658]*y_cur[IDX_CNM]; - data[jistart + 7858] = 0.0 - k[5105]*y_cur[IDX_CNI] - - k[5106]*y_cur[IDX_CNI]; - data[jistart + 7859] = 0.0 + k[5941]; - data[jistart + 7860] = 0.0 + k[5705] + k[5990]; - data[jistart + 7861] = 0.0 - k[5111]*y_cur[IDX_CNI]; - data[jistart + 7862] = 0.0 + k[3089]*y_cur[IDX_HeII] + - k[4917]*y_cur[IDX_CI] + k[5229]*y_cur[IDX_NI] + - k[5229]*y_cur[IDX_NI] + k[5353]*y_cur[IDX_OI] + k[5711] + k[5996]; - data[jistart + 7863] = 0.0 + k[781]*y_cur[IDX_eM] + - k[6467]*y_cur[IDX_GRAINM]; - data[jistart + 7864] = 0.0 + k[783]*y_cur[IDX_eM] + - k[783]*y_cur[IDX_eM] + k[2830]*y_cur[IDX_HI] + - k[2866]*y_cur[IDX_HCNI] + k[6636]*y_cur[IDX_GRAINM] + - k[6636]*y_cur[IDX_GRAINM]; - data[jistart + 7865] = 0.0 + k[5230]*y_cur[IDX_NI]; - data[jistart + 7866] = 0.0 + k[5231]*y_cur[IDX_NI]; - data[jistart + 7867] = 0.0 + k[1752]*y_cur[IDX_HC3NI] + - k[2867]*y_cur[IDX_HCNI]; - data[jistart + 7868] = 0.0 + k[3393]*y_cur[IDX_NI]; - data[jistart + 7869] = 0.0 + k[3396]*y_cur[IDX_NI]; - data[jistart + 7870] = 0.0 + k[3397]*y_cur[IDX_NI]; - data[jistart + 7871] = 0.0 + k[3098]*y_cur[IDX_HeII] + - k[4921]*y_cur[IDX_CI] + k[5234]*y_cur[IDX_NI] + k[5722] + k[6006]; - data[jistart + 7872] = 0.0 + k[814]*y_cur[IDX_eM] + - k[6626]*y_cur[IDX_GRAINM]; - data[jistart + 7873] = 0.0 + k[5235]*y_cur[IDX_NI]; - data[jistart + 7874] = 0.0 + k[3403]*y_cur[IDX_NI]; - data[jistart + 7875] = 0.0 + k[4908]*y_cur[IDX_NCCNI]; - data[jistart + 7876] = 0.0 + k[2869]*y_cur[IDX_HCNI]; - data[jistart + 7877] = 0.0 + k[115]*y_cur[IDX_NI]; - data[jistart + 7878] = 0.0 - k[5115]*y_cur[IDX_CNI]; - data[jistart + 7879] = 0.0 + k[4659]*y_cur[IDX_CNM]; - data[jistart + 7880] = 0.0 + k[4660]*y_cur[IDX_CNM]; - data[jistart + 7881] = 0.0 + k[5237]*y_cur[IDX_NI] + k[5733] + - k[6018]; - data[jistart + 7882] = 0.0 + k[4661]*y_cur[IDX_CNM]; - data[jistart + 7883] = 0.0 + k[5238]*y_cur[IDX_NI]; - data[jistart + 7884] = 0.0 + k[2871]*y_cur[IDX_HCNI]; - data[jistart + 7885] = 0.0 + k[3411]*y_cur[IDX_NI]; - data[jistart + 7886] = 0.0 + k[3414]*y_cur[IDX_NI]; - data[jistart + 7887] = 0.0 + k[3124]*y_cur[IDX_HeII] + - k[4929]*y_cur[IDX_CI] + k[5241]*y_cur[IDX_NI] + k[5746] + k[6031]; - data[jistart + 7888] = 0.0 + k[5242]*y_cur[IDX_NI]; - data[jistart + 7889] = 0.0 + k[3420]*y_cur[IDX_NI]; - data[jistart + 7890] = 0.0 + k[5243]*y_cur[IDX_NI]; - data[jistart + 7891] = 0.0 - k[5107]*y_cur[IDX_CNI]; - data[jistart + 7892] = 0.0 + k[5244]*y_cur[IDX_NI]; - data[jistart + 7893] = 0.0 + k[3428]*y_cur[IDX_NI]; - data[jistart + 7894] = 0.0 + k[3141]*y_cur[IDX_HeII] + - k[4937]*y_cur[IDX_CI] + k[5760] + k[6049]; - data[jistart + 7895] = 0.0 + k[5248]*y_cur[IDX_NI]; - data[jistart + 7896] = 0.0 + k[3439]*y_cur[IDX_NI]; - data[jistart + 7897] = 0.0 + k[5249]*y_cur[IDX_NI]; - data[jistart + 7898] = 0.0 - k[5108]*y_cur[IDX_CNI]; - data[jistart + 7899] = 0.0 + k[5250]*y_cur[IDX_NI]; - data[jistart + 7900] = 0.0 + k[3445]*y_cur[IDX_NI]; - data[jistart + 7901] = 0.0 + k[3156]*y_cur[IDX_HeII] + - k[4943]*y_cur[IDX_CI] + k[5771] + k[6067]; - data[jistart + 7902] = 0.0 + k[288]*y_cur[IDX_CNII] + - k[2250]*y_cur[IDX_HCNII] + k[5080]*y_cur[IDX_NI]; - data[jistart + 7903] = 0.0 - k[1944]*y_cur[IDX_CNI] - - k[1945]*y_cur[IDX_CNI]; - data[jistart + 7904] = 0.0 + k[260]*y_cur[IDX_CNII] + - k[2005]*y_cur[IDX_HCNII] - k[4997]*y_cur[IDX_CNI]; - data[jistart + 7905] = 0.0 + k[4662]*y_cur[IDX_CNM]; - data[jistart + 7906] = 0.0 - k[5109]*y_cur[IDX_CNI]; - data[jistart + 7907] = 0.0 + k[1349]*y_cur[IDX_CII] + - k[3165]*y_cur[IDX_HeII] + k[5787] + k[6088]; - data[jistart + 7908] = 0.0 + k[3170]*y_cur[IDX_HeII] + k[5788] + - k[6090]; - data[jistart + 7909] = 0.0 + k[916]*y_cur[IDX_eM] + - k[6475]*y_cur[IDX_GRAINM]; - data[jistart + 7910] = 0.0 - k[5029]*y_cur[IDX_CNI] - - k[5542]*y_cur[IDX_CNI]; - data[jistart + 7911] = 0.0 - k[2075]*y_cur[IDX_CNI] + - k[4663]*y_cur[IDX_CNM]; - data[jistart + 7912] = 0.0 + k[1355]*y_cur[IDX_CII]; - data[jistart + 7913] = 0.0 + k[1359]*y_cur[IDX_CII]; - data[jistart + 7914] = 0.0 + k[1362]*y_cur[IDX_CII]; - data[jistart + 7915] = 0.0 - k[5110]*y_cur[IDX_CNI]; - data[jistart + 7916] = 0.0 - k[5112]*y_cur[IDX_CNI]; - data[jistart + 7917] = 0.0 + k[1379]*y_cur[IDX_CII] + - k[1514]*y_cur[IDX_C2H2II] + k[3193]*y_cur[IDX_HeII] + k[5810] + - k[6115]; - data[jistart + 7918] = 0.0 + k[970]*y_cur[IDX_eM] + - k[6405]*y_cur[IDX_GRAINM]; - data[jistart + 7919] = 0.0 + k[2197]*y_cur[IDX_HC3NII] - - k[5059]*y_cur[IDX_CNI]; - data[jistart + 7920] = 0.0 - k[72]*y_cur[IDX_HM] - - k[306]*y_cur[IDX_N2II] - k[444]*y_cur[IDX_H2II] - - k[547]*y_cur[IDX_NII] - k[666]*y_cur[IDX_OM] - k[696]*y_cur[IDX_OHM] - - k[1467]*y_cur[IDX_C2HII] - k[1944]*y_cur[IDX_CHII] - - k[1945]*y_cur[IDX_CHII] - k[2075]*y_cur[IDX_CH3II] - - k[2277]*y_cur[IDX_C2H2II] - k[2278]*y_cur[IDX_HNOII] - - k[2279]*y_cur[IDX_O2HII] - k[2381]*y_cur[IDX_H2II] - - k[2671]*y_cur[IDX_H3II] - k[3203]*y_cur[IDX_HeII] - - k[3204]*y_cur[IDX_HeII] - k[3481]*y_cur[IDX_NHII] - - k[3509]*y_cur[IDX_NH2II] - k[3639]*y_cur[IDX_OII] - - k[3775]*y_cur[IDX_OHII] - k[4956]*y_cur[IDX_CI] - - k[4997]*y_cur[IDX_CH2I] - k[5029]*y_cur[IDX_CH3I] - - k[5059]*y_cur[IDX_CH4I] - k[5104]*y_cur[IDX_C2H2I] - - k[5105]*y_cur[IDX_C2H4I] - k[5106]*y_cur[IDX_C2H4I] - - k[5107]*y_cur[IDX_C6H2I] - k[5108]*y_cur[IDX_C8H2I] - - k[5109]*y_cur[IDX_CH2CCH2I] - k[5110]*y_cur[IDX_CH3CCHI] - - k[5111]*y_cur[IDX_C2H6I] - k[5112]*y_cur[IDX_CH3CHCH2I] - - k[5113]*y_cur[IDX_CNI] - k[5113]*y_cur[IDX_CNI] - - k[5113]*y_cur[IDX_CNI] - k[5113]*y_cur[IDX_CNI] - - k[5114]*y_cur[IDX_H2COI] - k[5115]*y_cur[IDX_C4H2I] - - k[5116]*y_cur[IDX_HCNI] - k[5117]*y_cur[IDX_HCOI] - - k[5118]*y_cur[IDX_HNCI] - k[5119]*y_cur[IDX_HNOI] - - k[5120]*y_cur[IDX_NO2I] - k[5121]*y_cur[IDX_NOI] - - k[5122]*y_cur[IDX_NOI] - k[5123]*y_cur[IDX_O2I] - - k[5124]*y_cur[IDX_O2I] - k[5125]*y_cur[IDX_SI] - - k[5126]*y_cur[IDX_SiH4I] - k[5138]*y_cur[IDX_H2I] - - k[5260]*y_cur[IDX_NI] - k[5261]*y_cur[IDX_NI] - - k[5302]*y_cur[IDX_NH3I] - k[5303]*y_cur[IDX_NH3I] - - k[5305]*y_cur[IDX_NHI] - k[5386]*y_cur[IDX_OI] - - k[5387]*y_cur[IDX_OI] - k[5388]*y_cur[IDX_OI] - - k[5459]*y_cur[IDX_OHI] - k[5460]*y_cur[IDX_OHI] - - k[5514]*y_cur[IDX_C2HI] - k[5542]*y_cur[IDX_CH3I] - k[5823] - - k[6134] - k[6909]; - data[jistart + 7921] = 0.0 + k[208]*y_cur[IDX_C2I] + - k[241]*y_cur[IDX_C2HI] + k[245]*y_cur[IDX_CI] + - k[260]*y_cur[IDX_CH2I] + k[288]*y_cur[IDX_CHI] + - k[298]*y_cur[IDX_CO2I] + k[299]*y_cur[IDX_COI] + - k[300]*y_cur[IDX_H2COI] + k[301]*y_cur[IDX_HCNI] + - k[302]*y_cur[IDX_HCOI] + k[303]*y_cur[IDX_NOI] + - k[304]*y_cur[IDX_O2I] + k[305]*y_cur[IDX_SI] + k[487]*y_cur[IDX_HI] - + k[586]*y_cur[IDX_NH2I] + k[616]*y_cur[IDX_NHI] + - k[681]*y_cur[IDX_OI] + k[698]*y_cur[IDX_OHI]; - data[jistart + 7922] = 0.0 + k[4656]*y_cur[IDX_CII] + - k[4657]*y_cur[IDX_C2H2II] + k[4658]*y_cur[IDX_C2H3II] + - k[4659]*y_cur[IDX_C4H2II] + k[4660]*y_cur[IDX_C4H3II] + - k[4661]*y_cur[IDX_C4SII] + k[4662]*y_cur[IDX_CH2CCHII] + - k[4663]*y_cur[IDX_CH3II] + k[4664]*y_cur[IDX_CNCII] + - k[4665]*y_cur[IDX_FeII] + k[4666]*y_cur[IDX_HII] + - k[4667]*y_cur[IDX_H2COII] + k[4668]*y_cur[IDX_H2SII] + - k[4669]*y_cur[IDX_H3II] + k[4670]*y_cur[IDX_H3OII] + - k[4671]*y_cur[IDX_HC2SII] + k[4672]*y_cur[IDX_HCNHII] + - k[4673]*y_cur[IDX_HCNHII] + k[4674]*y_cur[IDX_HCOII] + - k[4675]*y_cur[IDX_HCOII] + k[4676]*y_cur[IDX_HeII] + - k[4677]*y_cur[IDX_MgII] + k[4678]*y_cur[IDX_NII] + - k[4679]*y_cur[IDX_N2HII] + k[4680]*y_cur[IDX_NH3II] + - k[4681]*y_cur[IDX_NH4II] + k[4682]*y_cur[IDX_NOII] + - k[4683]*y_cur[IDX_NaII] + k[4684]*y_cur[IDX_OII] + - k[4685]*y_cur[IDX_SII] + k[4686]*y_cur[IDX_SOII] + - k[4687]*y_cur[IDX_SiII] + k[4688]*y_cur[IDX_SiOII] + - k[4689]*y_cur[IDX_SiOHII] + k[4690]*y_cur[IDX_SiSII] + k[5822] + - k[6133]; - data[jistart + 7923] = 0.0 + k[979]*y_cur[IDX_eM] + - k[4664]*y_cur[IDX_CNM] + k[6469]*y_cur[IDX_GRAINM]; - data[jistart + 7924] = 0.0 + k[1386]*y_cur[IDX_CII] + - k[3206]*y_cur[IDX_HeII] + k[5161]*y_cur[IDX_HI] + k[5824] + k[6135]; - data[jistart + 7925] = 0.0 + k[299]*y_cur[IDX_CNII] + - k[2854]*y_cur[IDX_HCNII]; - data[jistart + 7926] = 0.0 + k[298]*y_cur[IDX_CNII] + - k[2853]*y_cur[IDX_HCNII]; - data[jistart + 7927] = 0.0 + k[5263]*y_cur[IDX_NI]; - data[jistart + 7928] = 0.0 + k[4665]*y_cur[IDX_CNM]; - data[jistart + 7929] = 0.0 + k[8657]*y_cur[IDX_GNI]; - data[jistart + 7930] = 0.0 + k[7091] + k[7273] + k[7455]; - data[jistart + 7931] = 0.0 + k[8657]*y_cur[IDX_GCI]; - data[jistart + 7932] = 0.0 + k[6372]*y_cur[IDX_HCNII] + - k[6376]*y_cur[IDX_H2NCII] + k[6378]*y_cur[IDX_HCNHII] + - k[6405]*y_cur[IDX_CH3NHII] + k[6467]*y_cur[IDX_C2NII] + - k[6469]*y_cur[IDX_CNCII] + k[6475]*y_cur[IDX_CH2CNII] + - k[6521]*y_cur[IDX_HONCII] + k[6525]*y_cur[IDX_HOCNII] + - k[6545]*y_cur[IDX_H2OCNII] + k[6626]*y_cur[IDX_C3NII] + - k[6630]*y_cur[IDX_HC3NII] + k[6636]*y_cur[IDX_C2N2II] + - k[6636]*y_cur[IDX_C2N2II] + k[6637]*y_cur[IDX_HC3NHII] + - k[6652]*y_cur[IDX_NCCNHII] + k[6654]*y_cur[IDX_SiNCII] + - k[6843]*y_cur[IDX_HC7NII] + k[6876]*y_cur[IDX_HC9NII]; - data[jistart + 7933] = 0.0 + k[487]*y_cur[IDX_CNII] + - k[2830]*y_cur[IDX_C2N2II] + k[5161]*y_cur[IDX_CNOI] + - k[5170]*y_cur[IDX_HCNI] + k[5181]*y_cur[IDX_NCCNI] + - k[5196]*y_cur[IDX_OCNI]; - data[jistart + 7934] = 0.0 + k[2351]*y_cur[IDX_HOCNI] + - k[2352]*y_cur[IDX_HONCI] + k[4666]*y_cur[IDX_CNM]; - data[jistart + 7935] = 0.0 - k[72]*y_cur[IDX_CNI]; - data[jistart + 7936] = 0.0 - k[5138]*y_cur[IDX_CNI]; - data[jistart + 7937] = 0.0 - k[444]*y_cur[IDX_CNI] - - k[2381]*y_cur[IDX_CNI]; - data[jistart + 7938] = 0.0 + k[300]*y_cur[IDX_CNII] + - k[2855]*y_cur[IDX_HCNII] - k[5114]*y_cur[IDX_CNI]; - data[jistart + 7939] = 0.0 + k[4667]*y_cur[IDX_CNM]; - data[jistart + 7940] = 0.0 + k[1006]*y_cur[IDX_eM] + - k[6376]*y_cur[IDX_GRAINM]; - data[jistart + 7941] = 0.0 + k[2546]*y_cur[IDX_HCNII]; - data[jistart + 7942] = 0.0 + k[1015]*y_cur[IDX_eM] + - k[6545]*y_cur[IDX_GRAINM]; - data[jistart + 7943] = 0.0 + k[4668]*y_cur[IDX_CNM]; - data[jistart + 7944] = 0.0 - k[2671]*y_cur[IDX_CNI] + - k[4669]*y_cur[IDX_CNM]; - data[jistart + 7945] = 0.0 + k[4670]*y_cur[IDX_CNM]; - data[jistart + 7946] = 0.0 + k[4671]*y_cur[IDX_CNM]; - data[jistart + 7947] = 0.0 + k[1400]*y_cur[IDX_CII] + - k[1471]*y_cur[IDX_C2HII] + k[1752]*y_cur[IDX_C3II] + - k[3237]*y_cur[IDX_HeII] + k[5846] + k[6171]; - data[jistart + 7948] = 0.0 + k[1064]*y_cur[IDX_eM] + - k[2197]*y_cur[IDX_CH4I] + k[6630]*y_cur[IDX_GRAINM]; - data[jistart + 7949] = 0.0 + k[1066]*y_cur[IDX_eM] + - k[6637]*y_cur[IDX_GRAINM]; - data[jistart + 7950] = 0.0 + k[1404]*y_cur[IDX_CII] + - k[3242]*y_cur[IDX_HeII] + k[5850] + k[6175]; - data[jistart + 7951] = 0.0 + k[1405]*y_cur[IDX_CII] + - k[3243]*y_cur[IDX_HeII] + k[5852] + k[6177]; - data[jistart + 7952] = 0.0 + k[1084]*y_cur[IDX_eM] + - k[6843]*y_cur[IDX_GRAINM]; - data[jistart + 7953] = 0.0 + k[1406]*y_cur[IDX_CII] + - k[3244]*y_cur[IDX_HeII] + k[5853] + k[6179]; - data[jistart + 7954] = 0.0 + k[1086]*y_cur[IDX_eM] + - k[6876]*y_cur[IDX_GRAINM]; - data[jistart + 7955] = 0.0 + k[301]*y_cur[IDX_CNII] + - k[1474]*y_cur[IDX_C2HII] + k[2856]*y_cur[IDX_HCNII] + - k[2866]*y_cur[IDX_C2N2II] + k[2867]*y_cur[IDX_C3II] + - k[2869]*y_cur[IDX_C4HII] + k[2871]*y_cur[IDX_C5II] - - k[5116]*y_cur[IDX_CNI] + k[5170]*y_cur[IDX_HI] + - k[5402]*y_cur[IDX_OI] + k[5469]*y_cur[IDX_OHI] + k[5854] + k[6181]; - data[jistart + 7956] = 0.0 + k[1088]*y_cur[IDX_eM] + - k[1458]*y_cur[IDX_C2I] + k[1745]*y_cur[IDX_C2HI] + - k[1903]*y_cur[IDX_CI] + k[2005]*y_cur[IDX_CH2I] + - k[2250]*y_cur[IDX_CHI] + k[2546]*y_cur[IDX_H2OI] + - k[2853]*y_cur[IDX_CO2I] + k[2854]*y_cur[IDX_COI] + - k[2855]*y_cur[IDX_H2COI] + k[2856]*y_cur[IDX_HCNI] + - k[2857]*y_cur[IDX_HCOI] + k[2859]*y_cur[IDX_HNCI] + - k[2860]*y_cur[IDX_SI] + k[3539]*y_cur[IDX_NH2I] + - k[3613]*y_cur[IDX_NHI] + k[3800]*y_cur[IDX_OHI] + - k[6372]*y_cur[IDX_GRAINM]; - data[jistart + 7957] = 0.0 + k[1089]*y_cur[IDX_eM] + - k[4672]*y_cur[IDX_CNM] + k[4673]*y_cur[IDX_CNM] + - k[6378]*y_cur[IDX_GRAINM]; - data[jistart + 7958] = 0.0 + k[302]*y_cur[IDX_CNII] + - k[2857]*y_cur[IDX_HCNII] - k[5117]*y_cur[IDX_CNI]; - data[jistart + 7959] = 0.0 + k[4674]*y_cur[IDX_CNM] + - k[4675]*y_cur[IDX_CNM]; - data[jistart + 7960] = 0.0 + k[2859]*y_cur[IDX_HCNII] - - k[5118]*y_cur[IDX_CNI] + k[5867] + k[6198]; - data[jistart + 7961] = 0.0 + k[5866]; - data[jistart + 7962] = 0.0 - k[5119]*y_cur[IDX_CNI]; - data[jistart + 7963] = 0.0 - k[2278]*y_cur[IDX_CNI]; - data[jistart + 7964] = 0.0 + k[2351]*y_cur[IDX_HII] + k[5871] + - k[6202]; - data[jistart + 7965] = 0.0 + k[1127]*y_cur[IDX_eM] + - k[6525]*y_cur[IDX_GRAINM]; - data[jistart + 7966] = 0.0 + k[2352]*y_cur[IDX_HII] + k[5872] + - k[6203]; - data[jistart + 7967] = 0.0 + k[1131]*y_cur[IDX_eM] + - k[6521]*y_cur[IDX_GRAINM]; - data[jistart + 7968] = 0.0 + k[3089]*y_cur[IDX_C2NI] + - k[3098]*y_cur[IDX_C3NI] + k[3124]*y_cur[IDX_C5NI] + - k[3141]*y_cur[IDX_C7NI] + k[3156]*y_cur[IDX_C9NI] + - k[3165]*y_cur[IDX_CH2CHCNI] + k[3170]*y_cur[IDX_CH2CNI] + - k[3193]*y_cur[IDX_CH3CNI] - k[3203]*y_cur[IDX_CNI] - - k[3204]*y_cur[IDX_CNI] + k[3206]*y_cur[IDX_CNOI] + - k[3237]*y_cur[IDX_HC3NI] + k[3242]*y_cur[IDX_HC5NI] + - k[3243]*y_cur[IDX_HC7NI] + k[3244]*y_cur[IDX_HC9NI] + - k[3279]*y_cur[IDX_NCCNI] + k[3282]*y_cur[IDX_NH2CNI] + - k[3292]*y_cur[IDX_OCNI] + k[4676]*y_cur[IDX_CNM]; - data[jistart + 7969] = 0.0 + k[4677]*y_cur[IDX_CNM]; - data[jistart + 7970] = 0.0 + k[5]*y_cur[IDX_CM] + - k[115]*y_cur[IDX_C4HM] + k[3380]*y_cur[IDX_C10M] + - k[3383]*y_cur[IDX_C2II] + k[3386]*y_cur[IDX_C2HII] + - k[3393]*y_cur[IDX_C3M] + k[3396]*y_cur[IDX_C3HM] + - k[3397]*y_cur[IDX_C3H2II] + k[3403]*y_cur[IDX_C4M] + - k[3411]*y_cur[IDX_C5M] + k[3414]*y_cur[IDX_C5HM] + - k[3420]*y_cur[IDX_C6M] + k[3428]*y_cur[IDX_C7M] + - k[3439]*y_cur[IDX_C8M] + k[3445]*y_cur[IDX_C9M] + - k[3469]*y_cur[IDX_SiCII] + k[5080]*y_cur[IDX_CHI] + - k[5221]*y_cur[IDX_C10I] + k[5222]*y_cur[IDX_C2I] + - k[5229]*y_cur[IDX_C2NI] + k[5229]*y_cur[IDX_C2NI] + - k[5230]*y_cur[IDX_C2OI] + k[5231]*y_cur[IDX_C3I] + - k[5234]*y_cur[IDX_C3NI] + k[5235]*y_cur[IDX_C4I] + - k[5237]*y_cur[IDX_C4NI] + k[5238]*y_cur[IDX_C5I] + - k[5241]*y_cur[IDX_C5NI] + k[5242]*y_cur[IDX_C6I] + - k[5243]*y_cur[IDX_C6HI] + k[5244]*y_cur[IDX_C7I] + - k[5248]*y_cur[IDX_C8I] + k[5249]*y_cur[IDX_C8HI] + - k[5250]*y_cur[IDX_C9I] - k[5260]*y_cur[IDX_CNI] - - k[5261]*y_cur[IDX_CNI] + k[5263]*y_cur[IDX_CSI] + - k[5292]*y_cur[IDX_SiCI] + k[5524]*y_cur[IDX_CI]; - data[jistart + 7971] = 0.0 - k[547]*y_cur[IDX_CNI] + - k[4678]*y_cur[IDX_CNM]; - data[jistart + 7972] = 0.0 + k[4967]*y_cur[IDX_CI]; - data[jistart + 7973] = 0.0 - k[306]*y_cur[IDX_CNI]; - data[jistart + 7974] = 0.0 + k[4679]*y_cur[IDX_CNM]; - data[jistart + 7975] = 0.0 + k[1416]*y_cur[IDX_CII]; - data[jistart + 7976] = 0.0 + k[183]*y_cur[IDX_CII] + - k[184]*y_cur[IDX_CII] + k[3279]*y_cur[IDX_HeII] + - k[3870]*y_cur[IDX_SiII] + k[4903]*y_cur[IDX_C2HI] + - k[4908]*y_cur[IDX_C4HI] + k[4968]*y_cur[IDX_CI] + - k[5181]*y_cur[IDX_HI] + k[5881] + k[5881] + k[6216] + k[6216]; - data[jistart + 7977] = 0.0 + k[1156]*y_cur[IDX_eM] + - k[6652]*y_cur[IDX_GRAINM]; - data[jistart + 7978] = 0.0 + k[616]*y_cur[IDX_CNII] + - k[3613]*y_cur[IDX_HCNII] + k[4972]*y_cur[IDX_CI] - - k[5305]*y_cur[IDX_CNI]; - data[jistart + 7979] = 0.0 - k[3481]*y_cur[IDX_CNI]; - data[jistart + 7980] = 0.0 + k[586]*y_cur[IDX_CNII] + - k[3539]*y_cur[IDX_HCNII]; - data[jistart + 7981] = 0.0 - k[3509]*y_cur[IDX_CNI]; - data[jistart + 7982] = 0.0 + k[3282]*y_cur[IDX_HeII] + k[5884] + - k[6220]; - data[jistart + 7983] = 0.0 - k[5302]*y_cur[IDX_CNI] - - k[5303]*y_cur[IDX_CNI]; - data[jistart + 7984] = 0.0 + k[4680]*y_cur[IDX_CNM]; - data[jistart + 7985] = 0.0 + k[4681]*y_cur[IDX_CNM]; - data[jistart + 7986] = 0.0 + k[303]*y_cur[IDX_CNII] + - k[4974]*y_cur[IDX_CI] - k[5121]*y_cur[IDX_CNI] - - k[5122]*y_cur[IDX_CNI]; - data[jistart + 7987] = 0.0 + k[4682]*y_cur[IDX_CNM]; - data[jistart + 7988] = 0.0 - k[5120]*y_cur[IDX_CNI]; - data[jistart + 7989] = 0.0 + k[4977]*y_cur[IDX_CI]; - data[jistart + 7990] = 0.0 + k[4683]*y_cur[IDX_CNM]; - data[jistart + 7991] = 0.0 + k[681]*y_cur[IDX_CNII] + - k[5353]*y_cur[IDX_C2NI] - k[5386]*y_cur[IDX_CNI] - - k[5387]*y_cur[IDX_CNI] - k[5388]*y_cur[IDX_CNI] + - k[5402]*y_cur[IDX_HCNI] + k[5429]*y_cur[IDX_OCNI]; - data[jistart + 7992] = 0.0 - k[3639]*y_cur[IDX_CNI] + - k[4684]*y_cur[IDX_CNM]; - data[jistart + 7993] = 0.0 - k[666]*y_cur[IDX_CNI]; - data[jistart + 7994] = 0.0 + k[304]*y_cur[IDX_CNII] - - k[5123]*y_cur[IDX_CNI] - k[5124]*y_cur[IDX_CNI]; - data[jistart + 7995] = 0.0 - k[2279]*y_cur[IDX_CNI]; - data[jistart + 7996] = 0.0 + k[1424]*y_cur[IDX_CII] + - k[3292]*y_cur[IDX_HeII] + k[4979]*y_cur[IDX_CI] + - k[5196]*y_cur[IDX_HI] + k[5429]*y_cur[IDX_OI] + k[5901] + k[6239]; - data[jistart + 7997] = 0.0 + k[698]*y_cur[IDX_CNII] + - k[3800]*y_cur[IDX_HCNII] - k[5459]*y_cur[IDX_CNI] - - k[5460]*y_cur[IDX_CNI] + k[5469]*y_cur[IDX_HCNI]; - data[jistart + 7998] = 0.0 - k[3775]*y_cur[IDX_CNI]; - data[jistart + 7999] = 0.0 - k[696]*y_cur[IDX_CNI]; - data[jistart + 8000] = 0.0 + k[305]*y_cur[IDX_CNII] + - k[2860]*y_cur[IDX_HCNII] - k[5125]*y_cur[IDX_CNI]; - data[jistart + 8001] = 0.0 + k[4685]*y_cur[IDX_CNM]; - data[jistart + 8002] = 0.0 + k[4686]*y_cur[IDX_CNM]; - data[jistart + 8003] = 0.0 + k[3870]*y_cur[IDX_NCCNI] + - k[4687]*y_cur[IDX_CNM]; - data[jistart + 8004] = 0.0 + k[5292]*y_cur[IDX_NI]; - data[jistart + 8005] = 0.0 + k[3469]*y_cur[IDX_NI]; - data[jistart + 8006] = 0.0 - k[5126]*y_cur[IDX_CNI]; - data[jistart + 8007] = 0.0 + k[5932] + k[6283]; - data[jistart + 8008] = 0.0 + k[1261]*y_cur[IDX_eM] + - k[6654]*y_cur[IDX_GRAINM]; - data[jistart + 8009] = 0.0 + k[4688]*y_cur[IDX_CNM]; - data[jistart + 8010] = 0.0 + k[4689]*y_cur[IDX_CNM]; - data[jistart + 8011] = 0.0 + k[4690]*y_cur[IDX_CNM]; - data[jistart + 8012] = 0.0 + k[781]*y_cur[IDX_C2NII] + - k[783]*y_cur[IDX_C2N2II] + k[783]*y_cur[IDX_C2N2II] + - k[814]*y_cur[IDX_C3NII] + k[916]*y_cur[IDX_CH2CNII] + - k[970]*y_cur[IDX_CH3NHII] + k[979]*y_cur[IDX_CNCII] + - k[1006]*y_cur[IDX_H2NCII] + k[1015]*y_cur[IDX_H2OCNII] + - k[1064]*y_cur[IDX_HC3NII] + k[1066]*y_cur[IDX_HC3NHII] + - k[1084]*y_cur[IDX_HC7NII] + k[1086]*y_cur[IDX_HC9NII] + - k[1088]*y_cur[IDX_HCNII] + k[1089]*y_cur[IDX_HCNHII] + - k[1127]*y_cur[IDX_HOCNII] + k[1131]*y_cur[IDX_HONCII] + - k[1156]*y_cur[IDX_NCCNHII] + k[1261]*y_cur[IDX_SiNCII]; - data[jistart + 8013] = 0.0 - k[245]*y_cur[IDX_CNII]; - data[jistart + 8014] = 0.0 + k[1420]*y_cur[IDX_NHI] + - k[5504]*y_cur[IDX_NI]; - data[jistart + 8015] = 0.0 - k[208]*y_cur[IDX_CNII]; - data[jistart + 8016] = 0.0 - k[241]*y_cur[IDX_CNII]; - data[jistart + 8017] = 0.0 - k[288]*y_cur[IDX_CNII] + - k[2256]*y_cur[IDX_NII]; - data[jistart + 8018] = 0.0 + k[1961]*y_cur[IDX_NI] + - k[1965]*y_cur[IDX_NHI]; - data[jistart + 8019] = 0.0 - k[260]*y_cur[IDX_CNII]; - data[jistart + 8020] = 0.0 + k[3192]*y_cur[IDX_HeII]; - data[jistart + 8021] = 0.0 + k[306]*y_cur[IDX_N2II] + - k[444]*y_cur[IDX_H2II] + k[547]*y_cur[IDX_NII]; - data[jistart + 8022] = 0.0 - k[208]*y_cur[IDX_C2I] - - k[241]*y_cur[IDX_C2HI] - k[245]*y_cur[IDX_CI] - - k[260]*y_cur[IDX_CH2I] - k[288]*y_cur[IDX_CHI] - - k[298]*y_cur[IDX_CO2I] - k[299]*y_cur[IDX_COI] - - k[300]*y_cur[IDX_H2COI] - k[301]*y_cur[IDX_HCNI] - - k[302]*y_cur[IDX_HCOI] - k[303]*y_cur[IDX_NOI] - - k[304]*y_cur[IDX_O2I] - k[305]*y_cur[IDX_SI] - k[487]*y_cur[IDX_HI] - - k[586]*y_cur[IDX_NH2I] - k[616]*y_cur[IDX_NHI] - - k[681]*y_cur[IDX_OI] - k[698]*y_cur[IDX_OHI] - k[977]*y_cur[IDX_eM] - - k[2269]*y_cur[IDX_CO2I] - k[2270]*y_cur[IDX_CO2I] - - k[2271]*y_cur[IDX_H2COI] - k[2272]*y_cur[IDX_HCNI] - - k[2273]*y_cur[IDX_HCOI] - k[2274]*y_cur[IDX_NOI] - - k[2275]*y_cur[IDX_O2I] - k[2276]*y_cur[IDX_O2I] - - k[2433]*y_cur[IDX_H2I] - k[2535]*y_cur[IDX_H2OI] - - k[2536]*y_cur[IDX_H2OI] - k[2537]*y_cur[IDX_H2OI] - - k[2538]*y_cur[IDX_H2OI] - k[3456]*y_cur[IDX_NI] - - k[6359]*y_cur[IDX_GRAINM]; - data[jistart + 8023] = 0.0 + k[3205]*y_cur[IDX_HeII]; - data[jistart + 8024] = 0.0 - k[299]*y_cur[IDX_CNII]; - data[jistart + 8025] = 0.0 - k[298]*y_cur[IDX_CNII] - - k[2269]*y_cur[IDX_CNII] - k[2270]*y_cur[IDX_CNII]; - data[jistart + 8026] = 0.0 - k[6359]*y_cur[IDX_CNII]; - data[jistart + 8027] = 0.0 - k[487]*y_cur[IDX_CNII]; - data[jistart + 8028] = 0.0 - k[2433]*y_cur[IDX_CNII]; - data[jistart + 8029] = 0.0 + k[444]*y_cur[IDX_CNI]; - data[jistart + 8030] = 0.0 - k[300]*y_cur[IDX_CNII] - - k[2271]*y_cur[IDX_CNII]; - data[jistart + 8031] = 0.0 - k[2535]*y_cur[IDX_CNII] - - k[2536]*y_cur[IDX_CNII] - k[2537]*y_cur[IDX_CNII] - - k[2538]*y_cur[IDX_CNII]; - data[jistart + 8032] = 0.0 - k[301]*y_cur[IDX_CNII] - - k[2272]*y_cur[IDX_CNII] + k[3245]*y_cur[IDX_HeII]; - data[jistart + 8033] = 0.0 - k[302]*y_cur[IDX_CNII] - - k[2273]*y_cur[IDX_CNII]; - data[jistart + 8034] = 0.0 + k[3261]*y_cur[IDX_HeII]; - data[jistart + 8035] = 0.0 + k[3192]*y_cur[IDX_CH3CNI] + - k[3205]*y_cur[IDX_CNOI] + k[3245]*y_cur[IDX_HCNI] + - k[3261]*y_cur[IDX_HNCI] + k[3279]*y_cur[IDX_NCCNI] + - k[3291]*y_cur[IDX_OCNI] + k[3330]*y_cur[IDX_SiNCI]; - data[jistart + 8036] = 0.0 + k[1961]*y_cur[IDX_CHII] - - k[3456]*y_cur[IDX_CNII] + k[5504]*y_cur[IDX_CII]; - data[jistart + 8037] = 0.0 + k[547]*y_cur[IDX_CNI] + - k[2256]*y_cur[IDX_CHI]; - data[jistart + 8038] = 0.0 + k[306]*y_cur[IDX_CNI]; - data[jistart + 8039] = 0.0 + k[3279]*y_cur[IDX_HeII]; - data[jistart + 8040] = 0.0 - k[616]*y_cur[IDX_CNII] + - k[1420]*y_cur[IDX_CII] + k[1965]*y_cur[IDX_CHII]; - data[jistart + 8041] = 0.0 - k[586]*y_cur[IDX_CNII]; - data[jistart + 8042] = 0.0 - k[303]*y_cur[IDX_CNII] - - k[2274]*y_cur[IDX_CNII]; - data[jistart + 8043] = 0.0 - k[681]*y_cur[IDX_CNII]; - data[jistart + 8044] = 0.0 - k[304]*y_cur[IDX_CNII] - - k[2275]*y_cur[IDX_CNII] - k[2276]*y_cur[IDX_CNII]; - data[jistart + 8045] = 0.0 + k[3291]*y_cur[IDX_HeII]; - data[jistart + 8046] = 0.0 - k[698]*y_cur[IDX_CNII]; - data[jistart + 8047] = 0.0 - k[305]*y_cur[IDX_CNII]; - data[jistart + 8048] = 0.0 + k[3330]*y_cur[IDX_HeII]; - data[jistart + 8049] = 0.0 - k[977]*y_cur[IDX_CNII]; - data[jistart + 8050] = 0.0 - k[4656]*y_cur[IDX_CNM]; - data[jistart + 8051] = 0.0 + k[1449]*y_cur[IDX_NOI]; - data[jistart + 8052] = 0.0 + k[3379]*y_cur[IDX_NI]; - data[jistart + 8053] = 0.0 + k[3382]*y_cur[IDX_NI]; - data[jistart + 8054] = 0.0 + k[3384]*y_cur[IDX_NI]; - data[jistart + 8055] = 0.0 - k[4657]*y_cur[IDX_CNM]; - data[jistart + 8056] = 0.0 - k[4658]*y_cur[IDX_CNM]; - data[jistart + 8057] = 0.0 + k[3392]*y_cur[IDX_NI]; - data[jistart + 8058] = 0.0 + k[3395]*y_cur[IDX_NI]; - data[jistart + 8059] = 0.0 + k[3402]*y_cur[IDX_NI]; - data[jistart + 8060] = 0.0 + k[3404]*y_cur[IDX_NI]; - data[jistart + 8061] = 0.0 - k[4659]*y_cur[IDX_CNM]; - data[jistart + 8062] = 0.0 - k[4660]*y_cur[IDX_CNM]; - data[jistart + 8063] = 0.0 - k[4661]*y_cur[IDX_CNM]; - data[jistart + 8064] = 0.0 + k[3410]*y_cur[IDX_NI]; - data[jistart + 8065] = 0.0 + k[3413]*y_cur[IDX_NI]; - data[jistart + 8066] = 0.0 + k[3419]*y_cur[IDX_NI]; - data[jistart + 8067] = 0.0 + k[3422]*y_cur[IDX_NI]; - data[jistart + 8068] = 0.0 + k[3427]*y_cur[IDX_NI]; - data[jistart + 8069] = 0.0 + k[3431]*y_cur[IDX_NI]; - data[jistart + 8070] = 0.0 + k[3438]*y_cur[IDX_NI]; - data[jistart + 8071] = 0.0 + k[3441]*y_cur[IDX_NI]; - data[jistart + 8072] = 0.0 + k[3444]*y_cur[IDX_NI]; - data[jistart + 8073] = 0.0 + k[3448]*y_cur[IDX_NI]; - data[jistart + 8074] = 0.0 - k[4662]*y_cur[IDX_CNM]; - data[jistart + 8075] = 0.0 - k[60]*y_cur[IDX_CNM]; - data[jistart + 8076] = 0.0 - k[4663]*y_cur[IDX_CNM]; - data[jistart + 8077] = 0.0 + k[666]*y_cur[IDX_OM] + - k[696]*y_cur[IDX_OHM]; - data[jistart + 8078] = 0.0 - k[60]*y_cur[IDX_CH3I] - - k[106]*y_cur[IDX_HI] - k[4656]*y_cur[IDX_CII] - - k[4657]*y_cur[IDX_C2H2II] - k[4658]*y_cur[IDX_C2H3II] - - k[4659]*y_cur[IDX_C4H2II] - k[4660]*y_cur[IDX_C4H3II] - - k[4661]*y_cur[IDX_C4SII] - k[4662]*y_cur[IDX_CH2CCHII] - - k[4663]*y_cur[IDX_CH3II] - k[4664]*y_cur[IDX_CNCII] - - k[4665]*y_cur[IDX_FeII] - k[4666]*y_cur[IDX_HII] - - k[4667]*y_cur[IDX_H2COII] - k[4668]*y_cur[IDX_H2SII] - - k[4669]*y_cur[IDX_H3II] - k[4670]*y_cur[IDX_H3OII] - - k[4671]*y_cur[IDX_HC2SII] - k[4672]*y_cur[IDX_HCNHII] - - k[4673]*y_cur[IDX_HCNHII] - k[4674]*y_cur[IDX_HCOII] - - k[4675]*y_cur[IDX_HCOII] - k[4676]*y_cur[IDX_HeII] - - k[4677]*y_cur[IDX_MgII] - k[4678]*y_cur[IDX_NII] - - k[4679]*y_cur[IDX_N2HII] - k[4680]*y_cur[IDX_NH3II] - - k[4681]*y_cur[IDX_NH4II] - k[4682]*y_cur[IDX_NOII] - - k[4683]*y_cur[IDX_NaII] - k[4684]*y_cur[IDX_OII] - - k[4685]*y_cur[IDX_SII] - k[4686]*y_cur[IDX_SOII] - - k[4687]*y_cur[IDX_SiII] - k[4688]*y_cur[IDX_SiOII] - - k[4689]*y_cur[IDX_SiOHII] - k[4690]*y_cur[IDX_SiSII] - k[5822] - - k[6133]; - data[jistart + 8079] = 0.0 - k[4664]*y_cur[IDX_CNM]; - data[jistart + 8080] = 0.0 - k[4665]*y_cur[IDX_CNM]; - data[jistart + 8081] = 0.0 - k[106]*y_cur[IDX_CNM]; - data[jistart + 8082] = 0.0 - k[4666]*y_cur[IDX_CNM]; - data[jistart + 8083] = 0.0 + k[2368]*y_cur[IDX_HCNI]; - data[jistart + 8084] = 0.0 - k[4667]*y_cur[IDX_CNM]; - data[jistart + 8085] = 0.0 - k[4668]*y_cur[IDX_CNM]; - data[jistart + 8086] = 0.0 - k[4669]*y_cur[IDX_CNM]; - data[jistart + 8087] = 0.0 - k[4670]*y_cur[IDX_CNM]; - data[jistart + 8088] = 0.0 - k[4671]*y_cur[IDX_CNM]; - data[jistart + 8089] = 0.0 + k[2368]*y_cur[IDX_HM] + - k[3653]*y_cur[IDX_OM] + k[3795]*y_cur[IDX_OHM]; - data[jistart + 8090] = 0.0 - k[4672]*y_cur[IDX_CNM] - - k[4673]*y_cur[IDX_CNM]; - data[jistart + 8091] = 0.0 - k[4674]*y_cur[IDX_CNM] - - k[4675]*y_cur[IDX_CNM]; - data[jistart + 8092] = 0.0 - k[4676]*y_cur[IDX_CNM]; - data[jistart + 8093] = 0.0 - k[4677]*y_cur[IDX_CNM]; - data[jistart + 8094] = 0.0 + k[3379]*y_cur[IDX_C10M] + - k[3382]*y_cur[IDX_C10HM] + k[3384]*y_cur[IDX_C2M] + - k[3392]*y_cur[IDX_C3M] + k[3395]*y_cur[IDX_C3HM] + - k[3402]*y_cur[IDX_C4M] + k[3404]*y_cur[IDX_C4HM] + - k[3410]*y_cur[IDX_C5M] + k[3413]*y_cur[IDX_C5HM] + - k[3419]*y_cur[IDX_C6M] + k[3422]*y_cur[IDX_C6HM] + - k[3427]*y_cur[IDX_C7M] + k[3431]*y_cur[IDX_C7HM] + - k[3438]*y_cur[IDX_C8M] + k[3441]*y_cur[IDX_C8HM] + - k[3444]*y_cur[IDX_C9M] + k[3448]*y_cur[IDX_C9HM]; - data[jistart + 8095] = 0.0 - k[4678]*y_cur[IDX_CNM]; - data[jistart + 8096] = 0.0 - k[4679]*y_cur[IDX_CNM]; - data[jistart + 8097] = 0.0 - k[4680]*y_cur[IDX_CNM]; - data[jistart + 8098] = 0.0 - k[4681]*y_cur[IDX_CNM]; - data[jistart + 8099] = 0.0 + k[1449]*y_cur[IDX_CM]; - data[jistart + 8100] = 0.0 - k[4682]*y_cur[IDX_CNM]; - data[jistart + 8101] = 0.0 - k[4683]*y_cur[IDX_CNM]; - data[jistart + 8102] = 0.0 - k[4684]*y_cur[IDX_CNM]; - data[jistart + 8103] = 0.0 + k[666]*y_cur[IDX_CNI] + - k[3653]*y_cur[IDX_HCNI]; - data[jistart + 8104] = 0.0 + k[696]*y_cur[IDX_CNI] + - k[3795]*y_cur[IDX_HCNI]; - data[jistart + 8105] = 0.0 - k[4685]*y_cur[IDX_CNM]; - data[jistart + 8106] = 0.0 - k[4686]*y_cur[IDX_CNM]; - data[jistart + 8107] = 0.0 - k[4687]*y_cur[IDX_CNM]; - data[jistart + 8108] = 0.0 - k[4688]*y_cur[IDX_CNM]; - data[jistart + 8109] = 0.0 - k[4689]*y_cur[IDX_CNM]; - data[jistart + 8110] = 0.0 - k[4690]*y_cur[IDX_CNM]; - data[jistart + 8111] = 0.0 + k[184]*y_cur[IDX_NCCNI] + - k[1407]*y_cur[IDX_HCNI]; - data[jistart + 8112] = 0.0 - k[3894]*y_cur[IDX_CNCII]; - data[jistart + 8113] = 0.0 - k[3929]*y_cur[IDX_CNCII]; - data[jistart + 8114] = 0.0 - k[3964]*y_cur[IDX_CNCII]; - data[jistart + 8115] = 0.0 - k[3999]*y_cur[IDX_CNCII]; - data[jistart + 8116] = 0.0 - k[4034]*y_cur[IDX_CNCII]; - data[jistart + 8117] = 0.0 - k[4069]*y_cur[IDX_CNCII]; - data[jistart + 8118] = 0.0 - k[4104]*y_cur[IDX_CNCII]; - data[jistart + 8119] = 0.0 - k[4139]*y_cur[IDX_CNCII]; - data[jistart + 8120] = 0.0 - k[4174]*y_cur[IDX_CNCII]; - data[jistart + 8121] = 0.0 - k[4209]*y_cur[IDX_CNCII]; - data[jistart + 8122] = 0.0 - k[4244]*y_cur[IDX_CNCII]; - data[jistart + 8123] = 0.0 - k[4279]*y_cur[IDX_CNCII]; - data[jistart + 8124] = 0.0 - k[4314]*y_cur[IDX_CNCII]; - data[jistart + 8125] = 0.0 - k[4349]*y_cur[IDX_CNCII]; - data[jistart + 8126] = 0.0 - k[4384]*y_cur[IDX_CNCII]; - data[jistart + 8127] = 0.0 - k[4419]*y_cur[IDX_CNCII]; - data[jistart + 8128] = 0.0 - k[4454]*y_cur[IDX_CNCII]; - data[jistart + 8129] = 0.0 - k[4489]*y_cur[IDX_CNCII]; - data[jistart + 8130] = 0.0 - k[4524]*y_cur[IDX_CNCII]; - data[jistart + 8131] = 0.0 - k[4559]*y_cur[IDX_CNCII]; - data[jistart + 8132] = 0.0 - k[4594]*y_cur[IDX_CNCII]; - data[jistart + 8133] = 0.0 + k[1945]*y_cur[IDX_CNI]; - data[jistart + 8134] = 0.0 - k[4629]*y_cur[IDX_CNCII]; - data[jistart + 8135] = 0.0 + k[1945]*y_cur[IDX_CHII]; - data[jistart + 8136] = 0.0 - k[4664]*y_cur[IDX_CNCII]; - data[jistart + 8137] = 0.0 - k[978]*y_cur[IDX_eM] - - k[979]*y_cur[IDX_eM] - k[2539]*y_cur[IDX_H2OI] - - k[3572]*y_cur[IDX_NH3I] - k[3894]*y_cur[IDX_CM] - - k[3929]*y_cur[IDX_C10M] - k[3964]*y_cur[IDX_C10HM] - - k[3999]*y_cur[IDX_C2M] - k[4034]*y_cur[IDX_C2HM] - - k[4069]*y_cur[IDX_C3M] - k[4104]*y_cur[IDX_C3HM] - - k[4139]*y_cur[IDX_C3NM] - k[4174]*y_cur[IDX_C4M] - - k[4209]*y_cur[IDX_C4HM] - k[4244]*y_cur[IDX_C5M] - - k[4279]*y_cur[IDX_C5HM] - k[4314]*y_cur[IDX_C5NM] - - k[4349]*y_cur[IDX_C6M] - k[4384]*y_cur[IDX_C6HM] - - k[4419]*y_cur[IDX_C7M] - k[4454]*y_cur[IDX_C7HM] - - k[4489]*y_cur[IDX_C8M] - k[4524]*y_cur[IDX_C8HM] - - k[4559]*y_cur[IDX_C9M] - k[4594]*y_cur[IDX_C9HM] - - k[4629]*y_cur[IDX_CHM] - k[4664]*y_cur[IDX_CNM] - - k[4699]*y_cur[IDX_HM] - k[4735]*y_cur[IDX_OM] - - k[4770]*y_cur[IDX_O2M] - k[4805]*y_cur[IDX_OHM] - - k[4840]*y_cur[IDX_SM] - k[6468]*y_cur[IDX_GRAINM] - - k[6469]*y_cur[IDX_GRAINM]; - data[jistart + 8138] = 0.0 - k[6468]*y_cur[IDX_CNCII] - - k[6469]*y_cur[IDX_CNCII]; - data[jistart + 8139] = 0.0 - k[4699]*y_cur[IDX_CNCII]; - data[jistart + 8140] = 0.0 - k[2539]*y_cur[IDX_CNCII]; - data[jistart + 8141] = 0.0 + k[1407]*y_cur[IDX_CII]; - data[jistart + 8142] = 0.0 + k[184]*y_cur[IDX_CII]; - data[jistart + 8143] = 0.0 - k[3572]*y_cur[IDX_CNCII]; - data[jistart + 8144] = 0.0 - k[4735]*y_cur[IDX_CNCII]; - data[jistart + 8145] = 0.0 - k[4770]*y_cur[IDX_CNCII]; - data[jistart + 8146] = 0.0 - k[4805]*y_cur[IDX_CNCII]; - data[jistart + 8147] = 0.0 - k[4840]*y_cur[IDX_CNCII]; - data[jistart + 8148] = 0.0 - k[978]*y_cur[IDX_CNCII] - - k[979]*y_cur[IDX_CNCII]; - data[jistart + 8149] = 0.0 - k[1386]*y_cur[IDX_CNOI]; - data[jistart + 8150] = 0.0 - k[1386]*y_cur[IDX_CII] - - k[2672]*y_cur[IDX_H3II] - k[2673]*y_cur[IDX_H3II] - - k[3205]*y_cur[IDX_HeII] - k[3206]*y_cur[IDX_HeII] - - k[5161]*y_cur[IDX_HI] - k[5389]*y_cur[IDX_OI] - k[5824] - k[6135] - - k[6960]; - data[jistart + 8151] = 0.0 + k[8658]*y_cur[IDX_GNOI]; - data[jistart + 8152] = 0.0 + k[7142] + k[7324] + k[7506]; - data[jistart + 8153] = 0.0 + k[8658]*y_cur[IDX_GCI]; - data[jistart + 8154] = 0.0 + k[6515]*y_cur[IDX_HCNOII] + - k[6520]*y_cur[IDX_HONCII]; - data[jistart + 8155] = 0.0 - k[5161]*y_cur[IDX_CNOI]; - data[jistart + 8156] = 0.0 - k[2672]*y_cur[IDX_CNOI] - - k[2673]*y_cur[IDX_CNOI]; - data[jistart + 8157] = 0.0 + k[1093]*y_cur[IDX_eM] + - k[6515]*y_cur[IDX_GRAINM]; - data[jistart + 8158] = 0.0 + k[5218]*y_cur[IDX_OI]; - data[jistart + 8159] = 0.0 + k[1130]*y_cur[IDX_eM] + - k[6520]*y_cur[IDX_GRAINM]; - data[jistart + 8160] = 0.0 - k[3205]*y_cur[IDX_CNOI] - - k[3206]*y_cur[IDX_CNOI]; - data[jistart + 8161] = 0.0 + k[5218]*y_cur[IDX_HONCI] - - k[5389]*y_cur[IDX_CNOI]; - data[jistart + 8162] = 0.0 + k[1093]*y_cur[IDX_HCNOII] + - k[1130]*y_cur[IDX_HONCII]; - data[jistart + 8163] = 0.0 + k[56]*y_cur[IDX_OM] + - k[246]*y_cur[IDX_COII] + k[1904]*y_cur[IDX_HCOII] + - k[1932]*y_cur[IDX_SiOII] + k[4918]*y_cur[IDX_C2OI] + - k[4922]*y_cur[IDX_C3OI] - k[4957]*y_cur[IDX_COI] + - k[4963]*y_cur[IDX_HCOI] + k[4964]*y_cur[IDX_HPOI] + - k[4975]*y_cur[IDX_NOI] + k[4978]*y_cur[IDX_O2I] + - k[4979]*y_cur[IDX_OCNI] + k[4980]*y_cur[IDX_OCSI] + - k[4981]*y_cur[IDX_OHI] + k[4985]*y_cur[IDX_SO2I] + - k[4987]*y_cur[IDX_SOI] + k[5214]*y_cur[IDX_HNCOI] + - k[5215]*y_cur[IDX_HOCNI] + k[5526]*y_cur[IDX_OI]; - data[jistart + 8164] = 0.0 + k[1313]*y_cur[IDX_C3OI] + - k[1387]*y_cur[IDX_CO2I] + k[1390]*y_cur[IDX_H2COI] + - k[1408]*y_cur[IDX_HCOI] + k[1423]*y_cur[IDX_O2I] + - k[1425]*y_cur[IDX_OCSI] + k[1427]*y_cur[IDX_SO2I] + - k[1429]*y_cur[IDX_SOI] + k[1447]*y_cur[IDX_SiOI]; - data[jistart + 8165] = 0.0 + k[3]*y_cur[IDX_CO2I] + - k[3]*y_cur[IDX_CO2I] + k[8]*y_cur[IDX_OI] + k[1450]*y_cur[IDX_O2I] + - k[3904]*y_cur[IDX_HCOII]; - data[jistart + 8166] = 0.0 + k[2899]*y_cur[IDX_HCOII] + - k[5340]*y_cur[IDX_OI]; - data[jistart + 8167] = 0.0 + k[3678]*y_cur[IDX_OI] + - k[3939]*y_cur[IDX_HCOII]; - data[jistart + 8168] = 0.0 + k[2901]*y_cur[IDX_HCOII] + - k[5341]*y_cur[IDX_OI]; - data[jistart + 8169] = 0.0 + k[3680]*y_cur[IDX_OI]; - data[jistart + 8170] = 0.0 + k[3681]*y_cur[IDX_OI] + - k[3974]*y_cur[IDX_HCOII]; - data[jistart + 8171] = 0.0 + k[2900]*y_cur[IDX_HCOII]; - data[jistart + 8172] = 0.0 + k[5342]*y_cur[IDX_OI]; - data[jistart + 8173] = 0.0 + k[209]*y_cur[IDX_COII] + - k[1459]*y_cur[IDX_HCOII] + k[1462]*y_cur[IDX_O2II] + - k[1465]*y_cur[IDX_SiOII] + k[4874]*y_cur[IDX_O2I] + - k[4874]*y_cur[IDX_O2I] + k[4875]*y_cur[IDX_OCSI] + - k[5343]*y_cur[IDX_OI]; - data[jistart + 8174] = 0.0 + k[1454]*y_cur[IDX_HCOI] + - k[1455]*y_cur[IDX_O2I]; - data[jistart + 8175] = 0.0 + k[3685]*y_cur[IDX_OI] + - k[4009]*y_cur[IDX_HCOII]; - data[jistart + 8176] = 0.0 + k[242]*y_cur[IDX_COII] + - k[1746]*y_cur[IDX_HCOII] + k[4904]*y_cur[IDX_O2I] + - k[4905]*y_cur[IDX_OCSI] + k[5352]*y_cur[IDX_OI]; - data[jistart + 8177] = 0.0 + k[1468]*y_cur[IDX_CO2I] + - k[1477]*y_cur[IDX_HCOI]; - data[jistart + 8178] = 0.0 + k[3687]*y_cur[IDX_OI] + - k[4044]*y_cur[IDX_HCOII]; - data[jistart + 8179] = 0.0 + k[1566]*y_cur[IDX_HCOII] + - k[3655]*y_cur[IDX_O2II] + k[3844]*y_cur[IDX_SOII] + - k[4878]*y_cur[IDX_NOI] + k[5344]*y_cur[IDX_OI] + - k[5455]*y_cur[IDX_OHI]; - data[jistart + 8180] = 0.0 + k[1524]*y_cur[IDX_HCOI] - - k[5507]*y_cur[IDX_COI]; - data[jistart + 8181] = 0.0 + k[1644]*y_cur[IDX_HCOII]; - data[jistart + 8182] = 0.0 - k[5513]*y_cur[IDX_COI]; - data[jistart + 8183] = 0.0 + k[1708]*y_cur[IDX_HCOII]; - data[jistart + 8184] = 0.0 + k[2902]*y_cur[IDX_HCOII]; - data[jistart + 8185] = 0.0 + k[2903]*y_cur[IDX_HCOII]; - data[jistart + 8186] = 0.0 + k[2949]*y_cur[IDX_HCOII]; - data[jistart + 8187] = 0.0 + k[5353]*y_cur[IDX_OI]; - data[jistart + 8188] = 0.0 + k[2904]*y_cur[IDX_HCOII] + - k[3090]*y_cur[IDX_HeII] + k[4918]*y_cur[IDX_CI] + - k[5230]*y_cur[IDX_NI] + k[5354]*y_cur[IDX_OI] + - k[5354]*y_cur[IDX_OI] + k[5485]*y_cur[IDX_SI] + k[5713] + k[5998]; - data[jistart + 8189] = 0.0 + k[785]*y_cur[IDX_eM] + - k[6474]*y_cur[IDX_GRAINM]; - data[jistart + 8190] = 0.0 + k[2905]*y_cur[IDX_HCOII] + - k[5355]*y_cur[IDX_OI]; - data[jistart + 8191] = 0.0 + k[2906]*y_cur[IDX_HCOII] + - k[5356]*y_cur[IDX_OI]; - data[jistart + 8192] = 0.0 + k[3693]*y_cur[IDX_OI] + - k[4079]*y_cur[IDX_HCOII]; - data[jistart + 8193] = 0.0 + k[2908]*y_cur[IDX_HCOII] + - k[5357]*y_cur[IDX_OI]; - data[jistart + 8194] = 0.0 + k[1753]*y_cur[IDX_CO2I] + - k[1758]*y_cur[IDX_OCSI] + k[2528]*y_cur[IDX_H2OI] + - k[3626]*y_cur[IDX_NOI] + k[3670]*y_cur[IDX_O2I]; - data[jistart + 8195] = 0.0 + k[3694]*y_cur[IDX_OI] + - k[4114]*y_cur[IDX_HCOII]; - data[jistart + 8196] = 0.0 + k[2907]*y_cur[IDX_HCOII]; - data[jistart + 8197] = 0.0 + k[797]*y_cur[IDX_eM] + - k[6656]*y_cur[IDX_GRAINM]; - data[jistart + 8198] = 0.0 + k[2909]*y_cur[IDX_HCOII] + - k[5358]*y_cur[IDX_OI]; - data[jistart + 8199] = 0.0 + k[130]*y_cur[IDX_OI] + - k[4149]*y_cur[IDX_HCOII]; - data[jistart + 8200] = 0.0 + k[1313]*y_cur[IDX_CII] + - k[2910]*y_cur[IDX_HCOII] + k[3100]*y_cur[IDX_HeII] + - k[4922]*y_cur[IDX_CI] + k[5359]*y_cur[IDX_OI] + k[5723] + k[6007]; - data[jistart + 8201] = 0.0 + k[815]*y_cur[IDX_eM] + - k[6644]*y_cur[IDX_GRAINM]; - data[jistart + 8202] = 0.0 + k[2911]*y_cur[IDX_HCOII] + - k[5360]*y_cur[IDX_OI]; - data[jistart + 8203] = 0.0 + k[2912]*y_cur[IDX_HCOII]; - data[jistart + 8204] = 0.0 + k[2913]*y_cur[IDX_HCOII] + - k[5361]*y_cur[IDX_OI]; - data[jistart + 8205] = 0.0 + k[3698]*y_cur[IDX_OI] + - k[4184]*y_cur[IDX_HCOII]; - data[jistart + 8206] = 0.0 + k[2915]*y_cur[IDX_HCOII] + - k[5362]*y_cur[IDX_OI]; - data[jistart + 8207] = 0.0 + k[3700]*y_cur[IDX_OI] + - k[4219]*y_cur[IDX_HCOII]; - data[jistart + 8208] = 0.0 + k[2965]*y_cur[IDX_HCOII]; - data[jistart + 8209] = 0.0 + k[3701]*y_cur[IDX_OI]; - data[jistart + 8210] = 0.0 + k[2914]*y_cur[IDX_HCOII]; - data[jistart + 8211] = 0.0 + k[5363]*y_cur[IDX_OI]; - data[jistart + 8212] = 0.0 + k[2533]*y_cur[IDX_H2OI]; - data[jistart + 8213] = 0.0 + k[2916]*y_cur[IDX_HCOII] + - k[5364]*y_cur[IDX_OI]; - data[jistart + 8214] = 0.0 + k[2917]*y_cur[IDX_HCOII]; - data[jistart + 8215] = 0.0 + k[2918]*y_cur[IDX_HCOII] + - k[5365]*y_cur[IDX_OI]; - data[jistart + 8216] = 0.0 + k[3703]*y_cur[IDX_OI] + - k[4254]*y_cur[IDX_HCOII]; - data[jistart + 8217] = 0.0 + k[2920]*y_cur[IDX_HCOII] + - k[5366]*y_cur[IDX_OI]; - data[jistart + 8218] = 0.0 + k[3705]*y_cur[IDX_OI] + - k[4289]*y_cur[IDX_HCOII]; - data[jistart + 8219] = 0.0 + k[2919]*y_cur[IDX_HCOII]; - data[jistart + 8220] = 0.0 + k[2921]*y_cur[IDX_HCOII] + - k[5367]*y_cur[IDX_OI]; - data[jistart + 8221] = 0.0 + k[131]*y_cur[IDX_OI] + - k[4324]*y_cur[IDX_HCOII]; - data[jistart + 8222] = 0.0 + k[2922]*y_cur[IDX_HCOII] + - k[5368]*y_cur[IDX_OI]; - data[jistart + 8223] = 0.0 + k[3708]*y_cur[IDX_OI] + - k[4359]*y_cur[IDX_HCOII]; - data[jistart + 8224] = 0.0 + k[2925]*y_cur[IDX_HCOII] + - k[5369]*y_cur[IDX_OI]; - data[jistart + 8225] = 0.0 + k[3709]*y_cur[IDX_OI] + - k[4394]*y_cur[IDX_HCOII]; - data[jistart + 8226] = 0.0 + k[2923]*y_cur[IDX_HCOII]; - data[jistart + 8227] = 0.0 + k[2924]*y_cur[IDX_HCOII]; - data[jistart + 8228] = 0.0 + k[2926]*y_cur[IDX_HCOII] + - k[5370]*y_cur[IDX_OI]; - data[jistart + 8229] = 0.0 + k[3712]*y_cur[IDX_OI] + - k[4429]*y_cur[IDX_HCOII]; - data[jistart + 8230] = 0.0 + k[2928]*y_cur[IDX_HCOII] + - k[5371]*y_cur[IDX_OI]; - data[jistart + 8231] = 0.0 + k[3714]*y_cur[IDX_OI] + - k[4464]*y_cur[IDX_HCOII]; - data[jistart + 8232] = 0.0 + k[2927]*y_cur[IDX_HCOII]; - data[jistart + 8233] = 0.0 + k[2929]*y_cur[IDX_HCOII]; - data[jistart + 8234] = 0.0 + k[2930]*y_cur[IDX_HCOII] + - k[5373]*y_cur[IDX_OI]; - data[jistart + 8235] = 0.0 + k[3717]*y_cur[IDX_OI] + - k[4499]*y_cur[IDX_HCOII]; - data[jistart + 8236] = 0.0 + k[2932]*y_cur[IDX_HCOII] + - k[5374]*y_cur[IDX_OI]; - data[jistart + 8237] = 0.0 + k[3718]*y_cur[IDX_OI] + - k[4534]*y_cur[IDX_HCOII]; - data[jistart + 8238] = 0.0 + k[2931]*y_cur[IDX_HCOII]; - data[jistart + 8239] = 0.0 + k[2933]*y_cur[IDX_HCOII] + - k[5375]*y_cur[IDX_OI]; - data[jistart + 8240] = 0.0 + k[3721]*y_cur[IDX_OI] + - k[4569]*y_cur[IDX_HCOII]; - data[jistart + 8241] = 0.0 + k[2935]*y_cur[IDX_HCOII] + - k[5376]*y_cur[IDX_OI]; - data[jistart + 8242] = 0.0 + k[3723]*y_cur[IDX_OI] + - k[4604]*y_cur[IDX_HCOII]; - data[jistart + 8243] = 0.0 + k[2934]*y_cur[IDX_HCOII]; - data[jistart + 8244] = 0.0 + k[2936]*y_cur[IDX_HCOII]; - data[jistart + 8245] = 0.0 + k[2937]*y_cur[IDX_HCOII] + - k[5378]*y_cur[IDX_OI]; - data[jistart + 8246] = 0.0 + k[5379]*y_cur[IDX_OI]; - data[jistart + 8247] = 0.0 + k[2492]*y_cur[IDX_H2COI]; - data[jistart + 8248] = 0.0 + k[289]*y_cur[IDX_COII] + - k[2253]*y_cur[IDX_HCOII] + k[5075]*y_cur[IDX_CO2I] + - k[5077]*y_cur[IDX_HCOI] + k[5088]*y_cur[IDX_O2I] + - k[5089]*y_cur[IDX_O2I] + k[5090]*y_cur[IDX_O2I] + - k[5091]*y_cur[IDX_O2I] + k[5096]*y_cur[IDX_OI] + - k[5098]*y_cur[IDX_OCSI] + k[5102]*y_cur[IDX_SOI]; - data[jistart + 8249] = 0.0 + k[1946]*y_cur[IDX_CO2I] + - k[1948]*y_cur[IDX_H2COI] + k[1959]*y_cur[IDX_HCOI] + - k[1970]*y_cur[IDX_OCSI]; - data[jistart + 8250] = 0.0 + k[4639]*y_cur[IDX_HCOII]; - data[jistart + 8251] = 0.0 + k[261]*y_cur[IDX_COII] + - k[2008]*y_cur[IDX_HCOII] + k[4999]*y_cur[IDX_HCOI] + - k[5009]*y_cur[IDX_O2I] + k[5012]*y_cur[IDX_OI] + - k[5013]*y_cur[IDX_OI]; - data[jistart + 8252] = 0.0 + k[1978]*y_cur[IDX_CO2I] + - k[1987]*y_cur[IDX_HCOI] + k[1992]*y_cur[IDX_OCSI]; - data[jistart + 8253] = 0.0 + k[2938]*y_cur[IDX_HCOII]; - data[jistart + 8254] = 0.0 + k[5382]*y_cur[IDX_OI]; - data[jistart + 8255] = 0.0 + k[2939]*y_cur[IDX_HCOII]; - data[jistart + 8256] = 0.0 + k[2940]*y_cur[IDX_HCOII] + - k[3172]*y_cur[IDX_HeII] + k[5157]*y_cur[IDX_HI] + k[5790] + k[6092]; - data[jistart + 8257] = 0.0 + k[920]*y_cur[IDX_eM] + - k[6494]*y_cur[IDX_GRAINM]; - data[jistart + 8258] = 0.0 + k[2941]*y_cur[IDX_HCOII]; - data[jistart + 8259] = 0.0 + k[5636]*y_cur[IDX_HCOII]; - data[jistart + 8260] = 0.0 + k[5664]*y_cur[IDX_HCOII]; - data[jistart + 8261] = 0.0 + k[1276]*y_cur[IDX_eM] + - k[6702]*y_cur[IDX_GRAINM]; - data[jistart + 8262] = 0.0 + k[5658]*y_cur[IDX_HCOII] + - k[5659]*y_cur[IDX_HeII] + k[5944] + k[6294]; - data[jistart + 8263] = 0.0 + k[1272]*y_cur[IDX_eM] + - k[1273]*y_cur[IDX_eM] + k[1274]*y_cur[IDX_eM] + - k[6696]*y_cur[IDX_GRAINM] + k[6697]*y_cur[IDX_GRAINM] + - k[6698]*y_cur[IDX_GRAINM]; - data[jistart + 8264] = 0.0 + k[2942]*y_cur[IDX_HCOII] + - k[5384]*y_cur[IDX_OI]; - data[jistart + 8265] = 0.0 + k[5033]*y_cur[IDX_HCOI] + - k[5043]*y_cur[IDX_OI]; - data[jistart + 8266] = 0.0 + k[2082]*y_cur[IDX_HCOI] + - k[2092]*y_cur[IDX_OCSI] - k[5535]*y_cur[IDX_COI]; - data[jistart + 8267] = 0.0 + k[2943]*y_cur[IDX_HCOII]; - data[jistart + 8268] = 0.0 + k[2944]*y_cur[IDX_HCOII]; - data[jistart + 8269] = 0.0 + k[2945]*y_cur[IDX_HCOII]; - data[jistart + 8270] = 0.0 + k[2946]*y_cur[IDX_HCOII]; - data[jistart + 8271] = 0.0 + k[2947]*y_cur[IDX_HCOII]; - data[jistart + 8272] = 0.0 + k[2948]*y_cur[IDX_HCOII]; - data[jistart + 8273] = 0.0 + k[3659]*y_cur[IDX_O2II] + - k[3662]*y_cur[IDX_O2II] + k[3856]*y_cur[IDX_SOII]; - data[jistart + 8274] = 0.0 + k[2950]*y_cur[IDX_HCOII] + k[5807] + - k[6112]; - data[jistart + 8275] = 0.0 + k[942]*y_cur[IDX_eM] + - k[6564]*y_cur[IDX_GRAINM]; - data[jistart + 8276] = 0.0 + k[2951]*y_cur[IDX_HCOII]; - data[jistart + 8277] = 0.0 - k[2283]*y_cur[IDX_COI]; - data[jistart + 8278] = 0.0 + k[5641]*y_cur[IDX_HCOII] + - k[5642]*y_cur[IDX_HeII] + k[5938] + k[6291]; - data[jistart + 8279] = 0.0 + k[949]*y_cur[IDX_eM] + - k[6519]*y_cur[IDX_GRAINM]; - data[jistart + 8280] = 0.0 + k[2664]*y_cur[IDX_H3II] + - k[2952]*y_cur[IDX_HCOII] + k[5813] + k[6117]; - data[jistart + 8281] = 0.0 + k[951]*y_cur[IDX_eM] + - k[6684]*y_cur[IDX_GRAINM]; - data[jistart + 8282] = 0.0 + k[5670]*y_cur[IDX_HCOII]; - data[jistart + 8283] = 0.0 + k[1284]*y_cur[IDX_eM] + - k[6711]*y_cur[IDX_GRAINM]; - data[jistart + 8284] = 0.0 + k[1290]*y_cur[IDX_eM] + - k[1291]*y_cur[IDX_eM] + k[6731]*y_cur[IDX_GRAINM] + - k[6732]*y_cur[IDX_GRAINM]; - data[jistart + 8285] = 0.0 + k[5630]*y_cur[IDX_HCOII]; - data[jistart + 8286] = 0.0 + k[2953]*y_cur[IDX_HCOII]; - data[jistart + 8287] = 0.0 + k[2954]*y_cur[IDX_HCOII]; - data[jistart + 8288] = 0.0 + k[285]*y_cur[IDX_COII]; - data[jistart + 8289] = 0.0 - k[2140]*y_cur[IDX_COI]; - data[jistart + 8290] = 0.0 - k[2224]*y_cur[IDX_COI] - - k[5545]*y_cur[IDX_COI]; - data[jistart + 8291] = 0.0 + k[5117]*y_cur[IDX_HCOI] + - k[5121]*y_cur[IDX_NOI] + k[5123]*y_cur[IDX_O2I] + - k[5386]*y_cur[IDX_OI] + k[5387]*y_cur[IDX_OI]; - data[jistart + 8292] = 0.0 - k[299]*y_cur[IDX_COI] + - k[2270]*y_cur[IDX_CO2I] + k[2273]*y_cur[IDX_HCOI] + - k[2275]*y_cur[IDX_O2I]; - data[jistart + 8293] = 0.0 + k[4674]*y_cur[IDX_HCOII]; - data[jistart + 8294] = 0.0 + k[5389]*y_cur[IDX_OI]; - data[jistart + 8295] = 0.0 - k[65]*y_cur[IDX_SM] - - k[73]*y_cur[IDX_HM] - k[124]*y_cur[IDX_OM] - k[299]*y_cur[IDX_CNII] - - k[316]*y_cur[IDX_N2II] - k[445]*y_cur[IDX_H2II] - - k[549]*y_cur[IDX_NII] - k[653]*y_cur[IDX_OII] - - k[2140]*y_cur[IDX_CH4II] - k[2224]*y_cur[IDX_CH5II] - - k[2283]*y_cur[IDX_CH3CNII] - k[2284]*y_cur[IDX_H2ClII] - - k[2285]*y_cur[IDX_HCO2II] - k[2286]*y_cur[IDX_HNOII] - - k[2287]*y_cur[IDX_HNSiII] - k[2288]*y_cur[IDX_N2HII] - - k[2289]*y_cur[IDX_O2HII] - k[2290]*y_cur[IDX_SO2II] - - k[2291]*y_cur[IDX_SiH4II] - k[2292]*y_cur[IDX_SiOII] - - k[2383]*y_cur[IDX_H2II] - k[2507]*y_cur[IDX_H2OII] - - k[2675]*y_cur[IDX_H3II] - k[2676]*y_cur[IDX_H3II] - - k[2854]*y_cur[IDX_HCNII] - k[3211]*y_cur[IDX_HeII] - - k[3344]*y_cur[IDX_NII] - k[3485]*y_cur[IDX_NHII] - - k[3486]*y_cur[IDX_NHII] - k[3777]*y_cur[IDX_OHII] - - k[4957]*y_cur[IDX_CI] - k[5127]*y_cur[IDX_HNOI] - - k[5128]*y_cur[IDX_N2OI] - k[5129]*y_cur[IDX_NO2I] - - k[5130]*y_cur[IDX_O2I] - k[5131]*y_cur[IDX_O2HI] - - k[5163]*y_cur[IDX_HI] - k[5461]*y_cur[IDX_OHI] - - k[5492]*y_cur[IDX_SiI] - k[5507]*y_cur[IDX_C2H2II] - - k[5513]*y_cur[IDX_C2H3II] - k[5535]*y_cur[IDX_CH3II] - - k[5545]*y_cur[IDX_CH5II] - k[5676] - k[5826] - k[6138] - k[6918]; - data[jistart + 8296] = 0.0 + k[209]*y_cur[IDX_C2I] + - k[242]*y_cur[IDX_C2HI] + k[246]*y_cur[IDX_CI] + - k[261]*y_cur[IDX_CH2I] + k[285]*y_cur[IDX_CH4I] + - k[289]*y_cur[IDX_CHI] + k[307]*y_cur[IDX_CO2I] + - k[308]*y_cur[IDX_H2COI] + k[309]*y_cur[IDX_H2SI] + - k[310]*y_cur[IDX_HCOI] + k[311]*y_cur[IDX_NOI] + - k[312]*y_cur[IDX_O2I] + k[313]*y_cur[IDX_SI] + - k[478]*y_cur[IDX_H2OI] + k[488]*y_cur[IDX_HI] + - k[497]*y_cur[IDX_HCNI] + k[587]*y_cur[IDX_NH2I] + - k[602]*y_cur[IDX_NH3I] + k[617]*y_cur[IDX_NHI] + - k[682]*y_cur[IDX_OI] + k[699]*y_cur[IDX_OHI]; - data[jistart + 8297] = 0.0 + k[3]*y_cur[IDX_CM] + k[3]*y_cur[IDX_CM] - + k[307]*y_cur[IDX_COII] + k[1387]*y_cur[IDX_CII] + - k[1468]*y_cur[IDX_C2HII] + k[1753]*y_cur[IDX_C3HII] + - k[1946]*y_cur[IDX_CHII] + k[1978]*y_cur[IDX_CH2II] + - k[2270]*y_cur[IDX_CNII] + k[3208]*y_cur[IDX_HeII] + - k[3483]*y_cur[IDX_NHII] + k[3640]*y_cur[IDX_OII] + - k[3811]*y_cur[IDX_PII] + k[5075]*y_cur[IDX_CHI] + - k[5162]*y_cur[IDX_HI] + k[5262]*y_cur[IDX_NI] + - k[5390]*y_cur[IDX_OI] + k[5491]*y_cur[IDX_SiI] + k[5825] + k[6137]; - data[jistart + 8298] = 0.0 + k[981]*y_cur[IDX_eM] + - k[3730]*y_cur[IDX_OI] + k[6540]*y_cur[IDX_GRAINM]; - data[jistart + 8299] = 0.0 + k[5652]*y_cur[IDX_HCOII] + - k[5654]*y_cur[IDX_HeII] + k[5943] + k[6293]; - data[jistart + 8300] = 0.0 + k[1270]*y_cur[IDX_eM] + - k[1271]*y_cur[IDX_eM] + k[6694]*y_cur[IDX_GRAINM] + - k[6695]*y_cur[IDX_GRAINM]; - data[jistart + 8301] = 0.0 + k[5646]*y_cur[IDX_HCOII] + - k[5648]*y_cur[IDX_HeII] + k[5939] + k[6292]; - data[jistart + 8302] = 0.0 + k[2955]*y_cur[IDX_HCOII] + - k[5391]*y_cur[IDX_OI]; - data[jistart + 8303] = 0.0 + k[3731]*y_cur[IDX_OI]; - data[jistart + 8304] = 0.0 + k[2956]*y_cur[IDX_HCOII] + - k[5392]*y_cur[IDX_OI] + k[5462]*y_cur[IDX_OHI]; - data[jistart + 8305] = 0.0 + k[8661]*y_cur[IDX_GOI]; - data[jistart + 8306] = 0.0 + k[7100] + k[7282] + k[7464]; - data[jistart + 8307] = 0.0 + k[8661]*y_cur[IDX_GCI]; - data[jistart + 8308] = 0.0 + k[6389]*y_cur[IDX_HCOII] + - k[6390]*y_cur[IDX_HOCII] + k[6399]*y_cur[IDX_H2COII] + - k[6400]*y_cur[IDX_H2COII] + k[6416]*y_cur[IDX_H3COII] + - k[6474]*y_cur[IDX_C2OII] + k[6488]*y_cur[IDX_HC2OII] + - k[6489]*y_cur[IDX_HC2OII] + k[6494]*y_cur[IDX_CH2COII] + - k[6495]*y_cur[IDX_OCNII] + k[6519]*y_cur[IDX_CH3COII] + - k[6522]*y_cur[IDX_HNCOII] + k[6539]*y_cur[IDX_H2NCOII] + - k[6540]*y_cur[IDX_CO2II] + k[6564]*y_cur[IDX_CH3CHOHII] + - k[6567]*y_cur[IDX_HCO2II] + k[6568]*y_cur[IDX_HCO2II] + - k[6644]*y_cur[IDX_C3OII] + k[6656]*y_cur[IDX_C3H2OII] + - k[6684]*y_cur[IDX_CH3COCH3II] + k[6694]*y_cur[IDX_COOCH3II] + - k[6695]*y_cur[IDX_COOCH3II] + k[6696]*y_cur[IDX_CH2OHCOII] + - k[6697]*y_cur[IDX_CH2OHCOII] + k[6698]*y_cur[IDX_CH2OHCOII] + - k[6699]*y_cur[IDX_HCOOCH3II] + k[6702]*y_cur[IDX_CH2OHCHOII] + - k[6708]*y_cur[IDX_OCSII] + k[6711]*y_cur[IDX_CH3COOHII] + - k[6731]*y_cur[IDX_CH3COOH2II] + k[6732]*y_cur[IDX_CH3COOH2II]; - data[jistart + 8309] = 0.0 + k[488]*y_cur[IDX_COII] + - k[5157]*y_cur[IDX_CH2COI] + k[5162]*y_cur[IDX_CO2I] - - k[5163]*y_cur[IDX_COI] + k[5171]*y_cur[IDX_HCOI] + - k[5195]*y_cur[IDX_OCNI] + k[5197]*y_cur[IDX_OCSI]; - data[jistart + 8310] = 0.0 + k[2345]*y_cur[IDX_HCOI] + - k[2348]*y_cur[IDX_HNCOI] + k[2356]*y_cur[IDX_OCSI]; - data[jistart + 8311] = 0.0 - k[73]*y_cur[IDX_COI] + - k[4710]*y_cur[IDX_HCOII]; - data[jistart + 8312] = 0.0 - k[445]*y_cur[IDX_COI] - - k[2383]*y_cur[IDX_COI] + k[2389]*y_cur[IDX_HCOI]; - data[jistart + 8313] = 0.0 + k[2957]*y_cur[IDX_HCOII] + - k[5395]*y_cur[IDX_OI]; - data[jistart + 8314] = 0.0 + k[308]*y_cur[IDX_COII] + - k[1390]*y_cur[IDX_CII] + k[1948]*y_cur[IDX_CHII] + - k[2492]*y_cur[IDX_CClII] + k[2500]*y_cur[IDX_SII] + - k[2958]*y_cur[IDX_HCOII] + k[5836] + k[6152] + k[6153]; - data[jistart + 8315] = 0.0 + k[997]*y_cur[IDX_eM] + - k[998]*y_cur[IDX_eM] + k[3007]*y_cur[IDX_HCOI] + - k[6399]*y_cur[IDX_GRAINM] + k[6400]*y_cur[IDX_GRAINM]; - data[jistart + 8316] = 0.0 + k[2959]*y_cur[IDX_HCOII]; - data[jistart + 8317] = 0.0 - k[2284]*y_cur[IDX_COI]; - data[jistart + 8318] = 0.0 + k[1009]*y_cur[IDX_eM] + - k[6539]*y_cur[IDX_GRAINM]; - data[jistart + 8319] = 0.0 + k[478]*y_cur[IDX_COII] + - k[2528]*y_cur[IDX_C3HII] + k[2533]*y_cur[IDX_C4NII] + - k[2547]*y_cur[IDX_HCOII]; - data[jistart + 8320] = 0.0 - k[2507]*y_cur[IDX_COI] + - k[2513]*y_cur[IDX_HCOI]; - data[jistart + 8321] = 0.0 + k[309]*y_cur[IDX_COII] + - k[2961]*y_cur[IDX_HCOII]; - data[jistart + 8322] = 0.0 + k[2960]*y_cur[IDX_HCOII]; - data[jistart + 8323] = 0.0 + k[2962]*y_cur[IDX_HCOII]; - data[jistart + 8324] = 0.0 + k[2664]*y_cur[IDX_CH3COCH3I] - - k[2675]*y_cur[IDX_COI] - k[2676]*y_cur[IDX_COI] + - k[2699]*y_cur[IDX_HCOOHI]; - data[jistart + 8325] = 0.0 + k[1036]*y_cur[IDX_eM] + - k[6416]*y_cur[IDX_GRAINM]; - data[jistart + 8326] = 0.0 + k[5942]; - data[jistart + 8327] = 0.0 + k[1057]*y_cur[IDX_eM] + - k[1058]*y_cur[IDX_eM] + k[6488]*y_cur[IDX_GRAINM] + - k[6489]*y_cur[IDX_GRAINM]; - data[jistart + 8328] = 0.0 + k[2963]*y_cur[IDX_HCOII] + - k[5401]*y_cur[IDX_OI]; - data[jistart + 8329] = 0.0 + k[2964]*y_cur[IDX_HCOII]; - data[jistart + 8330] = 0.0 + k[2966]*y_cur[IDX_HCOII]; - data[jistart + 8331] = 0.0 + k[2967]*y_cur[IDX_HCOII]; - data[jistart + 8332] = 0.0 + k[2968]*y_cur[IDX_HCOII]; - data[jistart + 8333] = 0.0 + k[497]*y_cur[IDX_COII] + - k[2877]*y_cur[IDX_HCOII] + k[5403]*y_cur[IDX_OI] + - k[5470]*y_cur[IDX_OHI]; - data[jistart + 8334] = 0.0 - k[2854]*y_cur[IDX_COI] + - k[2858]*y_cur[IDX_HCOI]; - data[jistart + 8335] = 0.0 + k[5203]*y_cur[IDX_OI]; - data[jistart + 8336] = 0.0 + k[310]*y_cur[IDX_COII] + - k[1408]*y_cur[IDX_CII] + k[1454]*y_cur[IDX_C2II] + - k[1477]*y_cur[IDX_C2HII] + k[1524]*y_cur[IDX_C2H2II] + - k[1959]*y_cur[IDX_CHII] + k[1987]*y_cur[IDX_CH2II] + - k[2082]*y_cur[IDX_CH3II] + k[2273]*y_cur[IDX_CNII] + - k[2345]*y_cur[IDX_HII] + k[2389]*y_cur[IDX_H2II] + - k[2513]*y_cur[IDX_H2OII] + k[2858]*y_cur[IDX_HCNII] + - k[2969]*y_cur[IDX_HCOII] + k[3007]*y_cur[IDX_H2COII] + - k[3010]*y_cur[IDX_O2II] + k[3012]*y_cur[IDX_SII] + - k[3250]*y_cur[IDX_HeII] + k[3350]*y_cur[IDX_NII] + - k[3364]*y_cur[IDX_N2II] + k[3552]*y_cur[IDX_NH3II] + - k[3646]*y_cur[IDX_OII] + k[3782]*y_cur[IDX_OHII] + - k[4963]*y_cur[IDX_CI] + k[4999]*y_cur[IDX_CH2I] + - k[5033]*y_cur[IDX_CH3I] + k[5077]*y_cur[IDX_CHI] + - k[5117]*y_cur[IDX_CNI] + k[5171]*y_cur[IDX_HI] + - k[5204]*y_cur[IDX_HCOI] + k[5204]*y_cur[IDX_HCOI] + - k[5204]*y_cur[IDX_HCOI] + k[5204]*y_cur[IDX_HCOI] + - k[5205]*y_cur[IDX_HCOI] + k[5205]*y_cur[IDX_HCOI] + - k[5207]*y_cur[IDX_NOI] + k[5209]*y_cur[IDX_O2I] + - k[5265]*y_cur[IDX_NI] + k[5406]*y_cur[IDX_OI] + - k[5471]*y_cur[IDX_OHI] + k[5487]*y_cur[IDX_SI] + k[5856] + k[6184]; - data[jistart + 8337] = 0.0 + k[1097]*y_cur[IDX_eM] + - k[1459]*y_cur[IDX_C2I] + k[1566]*y_cur[IDX_C2H2I] + - k[1644]*y_cur[IDX_C2H3I] + k[1708]*y_cur[IDX_C2H4I] + - k[1746]*y_cur[IDX_C2HI] + k[1904]*y_cur[IDX_CI] + - k[2008]*y_cur[IDX_CH2I] + k[2253]*y_cur[IDX_CHI] + - k[2547]*y_cur[IDX_H2OI] + k[2877]*y_cur[IDX_HCNI] + - k[2899]*y_cur[IDX_C10I] + k[2900]*y_cur[IDX_C10H2I] + - k[2901]*y_cur[IDX_C10HI] + k[2902]*y_cur[IDX_C2H5I] + - k[2903]*y_cur[IDX_C2H5OHI] + k[2904]*y_cur[IDX_C2OI] + - k[2905]*y_cur[IDX_C2SI] + k[2906]*y_cur[IDX_C3I] + - k[2907]*y_cur[IDX_C3H2I] + k[2908]*y_cur[IDX_C3HI] + - k[2909]*y_cur[IDX_C3NI] + k[2910]*y_cur[IDX_C3OI] + - k[2911]*y_cur[IDX_C3PI] + k[2912]*y_cur[IDX_C3SI] + - k[2913]*y_cur[IDX_C4I] + k[2914]*y_cur[IDX_C4H3I] + - k[2915]*y_cur[IDX_C4HI] + k[2916]*y_cur[IDX_C4PI] + - k[2917]*y_cur[IDX_C4SI] + k[2918]*y_cur[IDX_C5I] + - k[2919]*y_cur[IDX_C5H2I] + k[2920]*y_cur[IDX_C5HI] + - k[2921]*y_cur[IDX_C5NI] + k[2922]*y_cur[IDX_C6I] + - k[2923]*y_cur[IDX_C6H2I] + k[2924]*y_cur[IDX_C6H6I] + - k[2925]*y_cur[IDX_C6HI] + k[2926]*y_cur[IDX_C7I] + - k[2927]*y_cur[IDX_C7H2I] + k[2928]*y_cur[IDX_C7HI] + - k[2929]*y_cur[IDX_C7NI] + k[2930]*y_cur[IDX_C8I] + - k[2931]*y_cur[IDX_C8H2I] + k[2932]*y_cur[IDX_C8HI] + - k[2933]*y_cur[IDX_C9I] + k[2934]*y_cur[IDX_C9H2I] + - k[2935]*y_cur[IDX_C9HI] + k[2936]*y_cur[IDX_C9NI] + - k[2937]*y_cur[IDX_CCPI] + k[2938]*y_cur[IDX_CH2CCHI] + - k[2939]*y_cur[IDX_CH2CHCNI] + k[2940]*y_cur[IDX_CH2COI] + - k[2941]*y_cur[IDX_CH2NHI] + k[2942]*y_cur[IDX_CH2PHI] + - k[2943]*y_cur[IDX_CH3C3NI] + k[2944]*y_cur[IDX_CH3C4HI] + - k[2945]*y_cur[IDX_CH3C5NI] + k[2946]*y_cur[IDX_CH3C6HI] + - k[2947]*y_cur[IDX_CH3C7NI] + k[2948]*y_cur[IDX_CH3CCHI] + - k[2949]*y_cur[IDX_C2H6I] + k[2950]*y_cur[IDX_CH3CHOI] + - k[2951]*y_cur[IDX_CH3CNI] + k[2952]*y_cur[IDX_CH3COCH3I] + - k[2953]*y_cur[IDX_CH3OCH3I] + k[2954]*y_cur[IDX_CH3OHI] + - k[2955]*y_cur[IDX_CPI] + k[2956]*y_cur[IDX_CSI] + - k[2957]*y_cur[IDX_H2CCCI] + k[2958]*y_cur[IDX_H2COI] + - k[2959]*y_cur[IDX_H2CSI] + k[2960]*y_cur[IDX_H2S2I] + - k[2961]*y_cur[IDX_H2SI] + k[2962]*y_cur[IDX_H2SiOI] + - k[2963]*y_cur[IDX_HC2PI] + k[2964]*y_cur[IDX_HC3NI] + - k[2965]*y_cur[IDX_C4H2I] + k[2966]*y_cur[IDX_HC5NI] + - k[2967]*y_cur[IDX_HC7NI] + k[2968]*y_cur[IDX_HC9NI] + - k[2969]*y_cur[IDX_HCOI] + k[2970]*y_cur[IDX_HCOOCH3I] + - k[2971]*y_cur[IDX_HCOOHI] + k[2972]*y_cur[IDX_HCPI] + - k[2973]*y_cur[IDX_HCSiI] + k[2974]*y_cur[IDX_HNSiI] + - k[2975]*y_cur[IDX_HPOI] + k[2976]*y_cur[IDX_HS2I] + - k[2977]*y_cur[IDX_HSI] + k[2978]*y_cur[IDX_N2OI] + - k[2979]*y_cur[IDX_NCCNI] + k[2980]*y_cur[IDX_NH2CNI] + - k[2981]*y_cur[IDX_NSI] + k[2982]*y_cur[IDX_OCSI] + - k[2983]*y_cur[IDX_PI] + k[2984]*y_cur[IDX_PH2I] + - k[2985]*y_cur[IDX_PHI] + k[2986]*y_cur[IDX_PNI] + - k[2987]*y_cur[IDX_POI] + k[2988]*y_cur[IDX_S2I] + - k[2989]*y_cur[IDX_SI] + k[2990]*y_cur[IDX_SOI] + - k[2991]*y_cur[IDX_SiC2I] + k[2992]*y_cur[IDX_SiC2H2I] + - k[2993]*y_cur[IDX_SiC2HI] + k[2994]*y_cur[IDX_SiC3I] + - k[2995]*y_cur[IDX_SiC3HI] + k[2996]*y_cur[IDX_SiC4I] + - k[2997]*y_cur[IDX_SiCI] + k[2998]*y_cur[IDX_SiCH2I] + - k[2999]*y_cur[IDX_SiCH3I] + k[3000]*y_cur[IDX_SiH2I] + - k[3001]*y_cur[IDX_SiH4I] + k[3002]*y_cur[IDX_SiHI] + - k[3003]*y_cur[IDX_SiNCI] + k[3004]*y_cur[IDX_SiO2I] + - k[3005]*y_cur[IDX_SiOI] + k[3006]*y_cur[IDX_SiSI] + - k[3029]*y_cur[IDX_HNC3I] + k[3041]*y_cur[IDX_HNCI] + - k[3542]*y_cur[IDX_NH2I] + k[3584]*y_cur[IDX_NH3I] + - k[3614]*y_cur[IDX_NHI] + k[3801]*y_cur[IDX_OHI] + - k[3881]*y_cur[IDX_SiI] + k[3904]*y_cur[IDX_CM] + - k[3939]*y_cur[IDX_C10M] + k[3974]*y_cur[IDX_C10HM] + - k[4009]*y_cur[IDX_C2M] + k[4044]*y_cur[IDX_C2HM] + - k[4079]*y_cur[IDX_C3M] + k[4114]*y_cur[IDX_C3HM] + - k[4149]*y_cur[IDX_C3NM] + k[4184]*y_cur[IDX_C4M] + - k[4219]*y_cur[IDX_C4HM] + k[4254]*y_cur[IDX_C5M] + - k[4289]*y_cur[IDX_C5HM] + k[4324]*y_cur[IDX_C5NM] + - k[4359]*y_cur[IDX_C6M] + k[4394]*y_cur[IDX_C6HM] + - k[4429]*y_cur[IDX_C7M] + k[4464]*y_cur[IDX_C7HM] + - k[4499]*y_cur[IDX_C8M] + k[4534]*y_cur[IDX_C8HM] + - k[4569]*y_cur[IDX_C9M] + k[4604]*y_cur[IDX_C9HM] + - k[4639]*y_cur[IDX_CHM] + k[4674]*y_cur[IDX_CNM] + - k[4710]*y_cur[IDX_HM] + k[4745]*y_cur[IDX_OM] + - k[4780]*y_cur[IDX_O2M] + k[4815]*y_cur[IDX_OHM] + - k[4850]*y_cur[IDX_SM] + k[5630]*y_cur[IDX_CH3OI] + - k[5636]*y_cur[IDX_CH2OHI] + k[5641]*y_cur[IDX_CH3COI] + - k[5646]*y_cur[IDX_COOHI] + k[5652]*y_cur[IDX_COOCH3I] + - k[5658]*y_cur[IDX_CH2OHCOI] + k[5664]*y_cur[IDX_CH2OHCHOI] + - k[5670]*y_cur[IDX_CH3COOHI] + k[6389]*y_cur[IDX_GRAINM]; - data[jistart + 8338] = 0.0 + k[1099]*y_cur[IDX_eM] + - k[1100]*y_cur[IDX_eM] - k[2285]*y_cur[IDX_COI] + - k[6567]*y_cur[IDX_GRAINM] + k[6568]*y_cur[IDX_GRAINM]; - data[jistart + 8339] = 0.0 + k[2970]*y_cur[IDX_HCOII]; - data[jistart + 8340] = 0.0 + k[982]*y_cur[IDX_eM] + - k[6699]*y_cur[IDX_GRAINM]; - data[jistart + 8341] = 0.0 + k[2699]*y_cur[IDX_H3II] + - k[2971]*y_cur[IDX_HCOII]; - data[jistart + 8342] = 0.0 + k[2972]*y_cur[IDX_HCOII] + - k[5407]*y_cur[IDX_OI]; - data[jistart + 8343] = 0.0 + k[3737]*y_cur[IDX_OI]; - data[jistart + 8344] = 0.0 + k[5408]*y_cur[IDX_OI]; - data[jistart + 8345] = 0.0 + k[2973]*y_cur[IDX_HCOII]; - data[jistart + 8346] = 0.0 + k[3041]*y_cur[IDX_HCOII]; - data[jistart + 8347] = 0.0 + k[3029]*y_cur[IDX_HCOII]; - data[jistart + 8348] = 0.0 + k[2348]*y_cur[IDX_HII] + - k[5214]*y_cur[IDX_CI] + k[5868] + k[6199]; - data[jistart + 8349] = 0.0 + k[1116]*y_cur[IDX_eM] + - k[6522]*y_cur[IDX_GRAINM]; - data[jistart + 8350] = 0.0 - k[5127]*y_cur[IDX_COI]; - data[jistart + 8351] = 0.0 - k[2286]*y_cur[IDX_COI]; - data[jistart + 8352] = 0.0 + k[2974]*y_cur[IDX_HCOII]; - data[jistart + 8353] = 0.0 - k[2287]*y_cur[IDX_COI]; - data[jistart + 8354] = 0.0 + k[1125]*y_cur[IDX_eM] + - k[6390]*y_cur[IDX_GRAINM]; - data[jistart + 8355] = 0.0 + k[5215]*y_cur[IDX_CI]; - data[jistart + 8356] = 0.0 + k[2975]*y_cur[IDX_HCOII] + - k[4964]*y_cur[IDX_CI]; - data[jistart + 8357] = 0.0 + k[2977]*y_cur[IDX_HCOII]; - data[jistart + 8358] = 0.0 + k[2976]*y_cur[IDX_HCOII]; - data[jistart + 8359] = 0.0 + k[3090]*y_cur[IDX_C2OI] + - k[3100]*y_cur[IDX_C3OI] + k[3172]*y_cur[IDX_CH2COI] + - k[3208]*y_cur[IDX_CO2I] - k[3211]*y_cur[IDX_COI] + - k[3250]*y_cur[IDX_HCOI] + k[3295]*y_cur[IDX_OCSI] + - k[5642]*y_cur[IDX_CH3COI] + k[5648]*y_cur[IDX_COOHI] + - k[5654]*y_cur[IDX_COOCH3I] + k[5659]*y_cur[IDX_CH2OHCOI]; - data[jistart + 8360] = 0.0 + k[5230]*y_cur[IDX_C2OI] + - k[5262]*y_cur[IDX_CO2I] + k[5265]*y_cur[IDX_HCOI]; - data[jistart + 8361] = 0.0 - k[549]*y_cur[IDX_COI] - - k[3344]*y_cur[IDX_COI] + k[3350]*y_cur[IDX_HCOI] + - k[3360]*y_cur[IDX_OCSI]; - data[jistart + 8362] = 0.0 - k[316]*y_cur[IDX_COI] + - k[3364]*y_cur[IDX_HCOI] + k[3365]*y_cur[IDX_OCSI]; - data[jistart + 8363] = 0.0 - k[2288]*y_cur[IDX_COI]; - data[jistart + 8364] = 0.0 + k[2978]*y_cur[IDX_HCOII] - - k[5128]*y_cur[IDX_COI]; - data[jistart + 8365] = 0.0 + k[2979]*y_cur[IDX_HCOII]; - data[jistart + 8366] = 0.0 + k[617]*y_cur[IDX_COII] + - k[3614]*y_cur[IDX_HCOII]; - data[jistart + 8367] = 0.0 + k[3483]*y_cur[IDX_CO2I] - - k[3485]*y_cur[IDX_COI] - k[3486]*y_cur[IDX_COI]; - data[jistart + 8368] = 0.0 + k[587]*y_cur[IDX_COII] + - k[3542]*y_cur[IDX_HCOII]; - data[jistart + 8369] = 0.0 + k[2980]*y_cur[IDX_HCOII]; - data[jistart + 8370] = 0.0 + k[602]*y_cur[IDX_COII] + - k[3584]*y_cur[IDX_HCOII]; - data[jistart + 8371] = 0.0 + k[3552]*y_cur[IDX_HCOI]; - data[jistart + 8372] = 0.0 + k[311]*y_cur[IDX_COII] + - k[3626]*y_cur[IDX_C3HII] + k[4878]*y_cur[IDX_C2H2I] + - k[4975]*y_cur[IDX_CI] + k[5121]*y_cur[IDX_CNI] + - k[5207]*y_cur[IDX_HCOI] + k[5332]*y_cur[IDX_OCNI]; - data[jistart + 8373] = 0.0 - k[5129]*y_cur[IDX_COI]; - data[jistart + 8374] = 0.0 + k[2981]*y_cur[IDX_HCOII]; - data[jistart + 8375] = 0.0 + k[8]*y_cur[IDX_CM] + - k[130]*y_cur[IDX_C3NM] + k[131]*y_cur[IDX_C5NM] + - k[682]*y_cur[IDX_COII] + k[3678]*y_cur[IDX_C10M] + - k[3680]*y_cur[IDX_C10HII] + k[3681]*y_cur[IDX_C10HM] + - k[3685]*y_cur[IDX_C2M] + k[3687]*y_cur[IDX_C2HM] + - k[3693]*y_cur[IDX_C3M] + k[3694]*y_cur[IDX_C3HM] + - k[3698]*y_cur[IDX_C4M] + k[3700]*y_cur[IDX_C4HM] + - k[3701]*y_cur[IDX_C4H2II] + k[3703]*y_cur[IDX_C5M] + - k[3705]*y_cur[IDX_C5HM] + k[3708]*y_cur[IDX_C6M] + - k[3709]*y_cur[IDX_C6HM] + k[3712]*y_cur[IDX_C7M] + - k[3714]*y_cur[IDX_C7HM] + k[3717]*y_cur[IDX_C8M] + - k[3718]*y_cur[IDX_C8HM] + k[3721]*y_cur[IDX_C9M] + - k[3723]*y_cur[IDX_C9HM] + k[3730]*y_cur[IDX_CO2II] + - k[3731]*y_cur[IDX_CPII] + k[3737]*y_cur[IDX_HCPII] + - k[3762]*y_cur[IDX_SiNCII] + k[5012]*y_cur[IDX_CH2I] + - k[5013]*y_cur[IDX_CH2I] + k[5043]*y_cur[IDX_CH3I] + - k[5096]*y_cur[IDX_CHI] + k[5203]*y_cur[IDX_HCNOI] + - k[5340]*y_cur[IDX_C10I] + k[5341]*y_cur[IDX_C10HI] + - k[5342]*y_cur[IDX_C11I] + k[5343]*y_cur[IDX_C2I] + - k[5344]*y_cur[IDX_C2H2I] + k[5352]*y_cur[IDX_C2HI] + - k[5353]*y_cur[IDX_C2NI] + k[5354]*y_cur[IDX_C2OI] + - k[5354]*y_cur[IDX_C2OI] + k[5355]*y_cur[IDX_C2SI] + - k[5356]*y_cur[IDX_C3I] + k[5357]*y_cur[IDX_C3HI] + - k[5358]*y_cur[IDX_C3NI] + k[5359]*y_cur[IDX_C3OI] + - k[5360]*y_cur[IDX_C3PI] + k[5361]*y_cur[IDX_C4I] + - k[5362]*y_cur[IDX_C4HI] + k[5363]*y_cur[IDX_C4NI] + - k[5364]*y_cur[IDX_C4PI] + k[5365]*y_cur[IDX_C5I] + - k[5366]*y_cur[IDX_C5HI] + k[5367]*y_cur[IDX_C5NI] + - k[5368]*y_cur[IDX_C6I] + k[5369]*y_cur[IDX_C6HI] + - k[5370]*y_cur[IDX_C7I] + k[5371]*y_cur[IDX_C7HI] + - k[5373]*y_cur[IDX_C8I] + k[5374]*y_cur[IDX_C8HI] + - k[5375]*y_cur[IDX_C9I] + k[5376]*y_cur[IDX_C9HI] + - k[5378]*y_cur[IDX_CCPI] + k[5379]*y_cur[IDX_CClI] + - k[5382]*y_cur[IDX_CH2CCH2I] + k[5384]*y_cur[IDX_CH2PHI] + - k[5386]*y_cur[IDX_CNI] + k[5387]*y_cur[IDX_CNI] + - k[5389]*y_cur[IDX_CNOI] + k[5390]*y_cur[IDX_CO2I] + - k[5391]*y_cur[IDX_CPI] + k[5392]*y_cur[IDX_CSI] + - k[5395]*y_cur[IDX_H2CCCI] + k[5401]*y_cur[IDX_HC2PI] + - k[5403]*y_cur[IDX_HCNI] + k[5406]*y_cur[IDX_HCOI] + - k[5407]*y_cur[IDX_HCPI] + k[5408]*y_cur[IDX_HCSI] + - k[5428]*y_cur[IDX_OCNI] + k[5431]*y_cur[IDX_OCSI] + - k[5440]*y_cur[IDX_SiC2I] + k[5441]*y_cur[IDX_SiC3I] + - k[5442]*y_cur[IDX_SiC4I] + k[5443]*y_cur[IDX_SiCI] + - k[5452]*y_cur[IDX_SiNCI] + k[5526]*y_cur[IDX_CI]; - data[jistart + 8376] = 0.0 - k[653]*y_cur[IDX_COI] + - k[3640]*y_cur[IDX_CO2I] + k[3646]*y_cur[IDX_HCOI]; - data[jistart + 8377] = 0.0 + k[56]*y_cur[IDX_CI] - - k[124]*y_cur[IDX_COI] + k[4745]*y_cur[IDX_HCOII]; - data[jistart + 8378] = 0.0 + k[312]*y_cur[IDX_COII] + - k[1423]*y_cur[IDX_CII] + k[1450]*y_cur[IDX_CM] + - k[1455]*y_cur[IDX_C2II] + k[2275]*y_cur[IDX_CNII] + - k[3670]*y_cur[IDX_C3HII] + k[4874]*y_cur[IDX_C2I] + - k[4874]*y_cur[IDX_C2I] + k[4904]*y_cur[IDX_C2HI] + - k[4978]*y_cur[IDX_CI] + k[5009]*y_cur[IDX_CH2I] + - k[5088]*y_cur[IDX_CHI] + k[5089]*y_cur[IDX_CHI] + - k[5090]*y_cur[IDX_CHI] + k[5091]*y_cur[IDX_CHI] + - k[5123]*y_cur[IDX_CNI] - k[5130]*y_cur[IDX_COI] + - k[5209]*y_cur[IDX_HCOI] + k[5336]*y_cur[IDX_OCNI]; - data[jistart + 8379] = 0.0 + k[1462]*y_cur[IDX_C2I] + - k[3010]*y_cur[IDX_HCOI] + k[3655]*y_cur[IDX_C2H2I] + - k[3659]*y_cur[IDX_CH3CHCH2I] + k[3662]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 8380] = 0.0 + k[4780]*y_cur[IDX_HCOII]; - data[jistart + 8381] = 0.0 - k[5131]*y_cur[IDX_COI]; - data[jistart + 8382] = 0.0 - k[2289]*y_cur[IDX_COI]; - data[jistart + 8383] = 0.0 + k[4979]*y_cur[IDX_CI] + - k[5195]*y_cur[IDX_HI] + k[5332]*y_cur[IDX_NOI] + - k[5336]*y_cur[IDX_O2I] + k[5428]*y_cur[IDX_OI]; - data[jistart + 8384] = 0.0 + k[1176]*y_cur[IDX_eM] + - k[6495]*y_cur[IDX_GRAINM]; - data[jistart + 8385] = 0.0 + k[1425]*y_cur[IDX_CII] + - k[1758]*y_cur[IDX_C3HII] + k[1970]*y_cur[IDX_CHII] + - k[1992]*y_cur[IDX_CH2II] + k[2092]*y_cur[IDX_CH3II] + - k[2356]*y_cur[IDX_HII] + k[2982]*y_cur[IDX_HCOII] + - k[3295]*y_cur[IDX_HeII] + k[3360]*y_cur[IDX_NII] + - k[3365]*y_cur[IDX_N2II] + k[3833]*y_cur[IDX_SII] + - k[3871]*y_cur[IDX_SiII] + k[4875]*y_cur[IDX_C2I] + - k[4905]*y_cur[IDX_C2HI] + k[4980]*y_cur[IDX_CI] + - k[5098]*y_cur[IDX_CHI] + k[5197]*y_cur[IDX_HI] + - k[5431]*y_cur[IDX_OI] + k[5903] + k[6241]; - data[jistart + 8386] = 0.0 + k[1179]*y_cur[IDX_eM] + - k[6708]*y_cur[IDX_GRAINM]; - data[jistart + 8387] = 0.0 + k[699]*y_cur[IDX_COII] + - k[3801]*y_cur[IDX_HCOII] + k[4981]*y_cur[IDX_CI] + - k[5455]*y_cur[IDX_C2H2I] - k[5461]*y_cur[IDX_COI] + - k[5462]*y_cur[IDX_CSI] + k[5470]*y_cur[IDX_HCNI] + - k[5471]*y_cur[IDX_HCOI]; - data[jistart + 8388] = 0.0 - k[3777]*y_cur[IDX_COI] + - k[3782]*y_cur[IDX_HCOI]; - data[jistart + 8389] = 0.0 + k[4815]*y_cur[IDX_HCOII]; - data[jistart + 8390] = 0.0 + k[2983]*y_cur[IDX_HCOII]; - data[jistart + 8391] = 0.0 + k[3811]*y_cur[IDX_CO2I]; - data[jistart + 8392] = 0.0 + k[2985]*y_cur[IDX_HCOII]; - data[jistart + 8393] = 0.0 + k[2984]*y_cur[IDX_HCOII]; - data[jistart + 8394] = 0.0 + k[2986]*y_cur[IDX_HCOII]; - data[jistart + 8395] = 0.0 + k[2987]*y_cur[IDX_HCOII]; - data[jistart + 8396] = 0.0 + k[313]*y_cur[IDX_COII] + - k[2989]*y_cur[IDX_HCOII] + k[5485]*y_cur[IDX_C2OI] + - k[5487]*y_cur[IDX_HCOI]; - data[jistart + 8397] = 0.0 + k[2500]*y_cur[IDX_H2COI] + - k[3012]*y_cur[IDX_HCOI] + k[3833]*y_cur[IDX_OCSI]; - data[jistart + 8398] = 0.0 - k[65]*y_cur[IDX_COI] + - k[4850]*y_cur[IDX_HCOII]; - data[jistart + 8399] = 0.0 + k[2988]*y_cur[IDX_HCOII]; - data[jistart + 8400] = 0.0 + k[1429]*y_cur[IDX_CII] + - k[2990]*y_cur[IDX_HCOII] + k[4987]*y_cur[IDX_CI] + - k[5102]*y_cur[IDX_CHI]; - data[jistart + 8401] = 0.0 + k[3844]*y_cur[IDX_C2H2I] + - k[3856]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 8402] = 0.0 + k[1427]*y_cur[IDX_CII] + - k[4985]*y_cur[IDX_CI]; - data[jistart + 8403] = 0.0 - k[2290]*y_cur[IDX_COI]; - data[jistart + 8404] = 0.0 + k[3881]*y_cur[IDX_HCOII] + - k[5491]*y_cur[IDX_CO2I] - k[5492]*y_cur[IDX_COI]; - data[jistart + 8405] = 0.0 + k[3871]*y_cur[IDX_OCSI]; - data[jistart + 8406] = 0.0 + k[2997]*y_cur[IDX_HCOII] + - k[5443]*y_cur[IDX_OI]; - data[jistart + 8407] = 0.0 + k[2991]*y_cur[IDX_HCOII] + - k[5440]*y_cur[IDX_OI]; - data[jistart + 8408] = 0.0 + k[2993]*y_cur[IDX_HCOII]; - data[jistart + 8409] = 0.0 + k[2992]*y_cur[IDX_HCOII]; - data[jistart + 8410] = 0.0 + k[2994]*y_cur[IDX_HCOII] + - k[5441]*y_cur[IDX_OI]; - data[jistart + 8411] = 0.0 + k[2995]*y_cur[IDX_HCOII]; - data[jistart + 8412] = 0.0 + k[2996]*y_cur[IDX_HCOII] + - k[5442]*y_cur[IDX_OI]; - data[jistart + 8413] = 0.0 + k[2998]*y_cur[IDX_HCOII]; - data[jistart + 8414] = 0.0 + k[2999]*y_cur[IDX_HCOII]; - data[jistart + 8415] = 0.0 + k[3002]*y_cur[IDX_HCOII]; - data[jistart + 8416] = 0.0 + k[3000]*y_cur[IDX_HCOII]; - data[jistart + 8417] = 0.0 + k[3001]*y_cur[IDX_HCOII]; - data[jistart + 8418] = 0.0 - k[2291]*y_cur[IDX_COI]; - data[jistart + 8419] = 0.0 + k[3003]*y_cur[IDX_HCOII] + - k[5452]*y_cur[IDX_OI]; - data[jistart + 8420] = 0.0 + k[3762]*y_cur[IDX_OI]; - data[jistart + 8421] = 0.0 + k[1447]*y_cur[IDX_CII] + - k[3005]*y_cur[IDX_HCOII]; - data[jistart + 8422] = 0.0 + k[1465]*y_cur[IDX_C2I] + - k[1932]*y_cur[IDX_CI] - k[2292]*y_cur[IDX_COI]; - data[jistart + 8423] = 0.0 + k[3004]*y_cur[IDX_HCOII]; - data[jistart + 8424] = 0.0 + k[3006]*y_cur[IDX_HCOII]; - data[jistart + 8425] = 0.0 + k[785]*y_cur[IDX_C2OII] + - k[797]*y_cur[IDX_C3H2OII] + k[815]*y_cur[IDX_C3OII] + - k[920]*y_cur[IDX_CH2COII] + k[942]*y_cur[IDX_CH3CHOHII] + - k[949]*y_cur[IDX_CH3COII] + k[951]*y_cur[IDX_CH3COCH3II] + - k[981]*y_cur[IDX_CO2II] + k[982]*y_cur[IDX_HCOOCH3II] + - k[997]*y_cur[IDX_H2COII] + k[998]*y_cur[IDX_H2COII] + - k[1009]*y_cur[IDX_H2NCOII] + k[1036]*y_cur[IDX_H3COII] + - k[1057]*y_cur[IDX_HC2OII] + k[1058]*y_cur[IDX_HC2OII] + - k[1097]*y_cur[IDX_HCOII] + k[1099]*y_cur[IDX_HCO2II] + - k[1100]*y_cur[IDX_HCO2II] + k[1116]*y_cur[IDX_HNCOII] + - k[1125]*y_cur[IDX_HOCII] + k[1176]*y_cur[IDX_OCNII] + - k[1179]*y_cur[IDX_OCSII] + k[1270]*y_cur[IDX_COOCH3II] + - k[1271]*y_cur[IDX_COOCH3II] + k[1272]*y_cur[IDX_CH2OHCOII] + - k[1273]*y_cur[IDX_CH2OHCOII] + k[1274]*y_cur[IDX_CH2OHCOII] + - k[1276]*y_cur[IDX_CH2OHCHOII] + k[1284]*y_cur[IDX_CH3COOHII] + - k[1290]*y_cur[IDX_CH3COOH2II] + k[1291]*y_cur[IDX_CH3COOH2II]; - data[jistart + 8426] = 0.0 - k[246]*y_cur[IDX_COII] + - k[1912]*y_cur[IDX_O2II] + k[5525]*y_cur[IDX_OII]; - data[jistart + 8427] = 0.0 + k[1386]*y_cur[IDX_CNOI] + - k[1387]*y_cur[IDX_CO2I] + k[1422]*y_cur[IDX_O2I] + - k[1424]*y_cur[IDX_OCNI] + k[1426]*y_cur[IDX_OHI] + - k[1430]*y_cur[IDX_SOI] + k[5505]*y_cur[IDX_OI]; - data[jistart + 8428] = 0.0 - k[209]*y_cur[IDX_COII] + - k[1462]*y_cur[IDX_O2II] + k[3631]*y_cur[IDX_OII]; - data[jistart + 8429] = 0.0 + k[1455]*y_cur[IDX_O2I] + - k[3684]*y_cur[IDX_OI]; - data[jistart + 8430] = 0.0 - k[242]*y_cur[IDX_COII] - - k[1743]*y_cur[IDX_COII] + k[3634]*y_cur[IDX_OII]; - data[jistart + 8431] = 0.0 - k[289]*y_cur[IDX_COII] - - k[2245]*y_cur[IDX_COII] + k[2261]*y_cur[IDX_OII]; - data[jistart + 8432] = 0.0 + k[1966]*y_cur[IDX_O2I] + - k[1969]*y_cur[IDX_OI] + k[1972]*y_cur[IDX_OHI]; - data[jistart + 8433] = 0.0 - k[261]*y_cur[IDX_COII] - - k[2001]*y_cur[IDX_COII]; - data[jistart + 8434] = 0.0 + k[3171]*y_cur[IDX_HeII]; - data[jistart + 8435] = 0.0 + k[5660]*y_cur[IDX_HeII]; - data[jistart + 8436] = 0.0 + k[5643]*y_cur[IDX_HeII]; - data[jistart + 8437] = 0.0 - k[285]*y_cur[IDX_COII] - - k[2189]*y_cur[IDX_COII] - k[2190]*y_cur[IDX_COII]; - data[jistart + 8438] = 0.0 + k[299]*y_cur[IDX_COI]; - data[jistart + 8439] = 0.0 + k[1386]*y_cur[IDX_CII]; - data[jistart + 8440] = 0.0 + k[299]*y_cur[IDX_CNII] + - k[316]*y_cur[IDX_N2II] + k[445]*y_cur[IDX_H2II] + - k[549]*y_cur[IDX_NII] + k[653]*y_cur[IDX_OII] + k[5676]; - data[jistart + 8441] = 0.0 - k[209]*y_cur[IDX_C2I] - - k[242]*y_cur[IDX_C2HI] - k[246]*y_cur[IDX_CI] - - k[261]*y_cur[IDX_CH2I] - k[285]*y_cur[IDX_CH4I] - - k[289]*y_cur[IDX_CHI] - k[307]*y_cur[IDX_CO2I] - - k[308]*y_cur[IDX_H2COI] - k[309]*y_cur[IDX_H2SI] - - k[310]*y_cur[IDX_HCOI] - k[311]*y_cur[IDX_NOI] - - k[312]*y_cur[IDX_O2I] - k[313]*y_cur[IDX_SI] - - k[478]*y_cur[IDX_H2OI] - k[488]*y_cur[IDX_HI] - - k[497]*y_cur[IDX_HCNI] - k[587]*y_cur[IDX_NH2I] - - k[602]*y_cur[IDX_NH3I] - k[617]*y_cur[IDX_NHI] - - k[682]*y_cur[IDX_OI] - k[699]*y_cur[IDX_OHI] - k[980]*y_cur[IDX_eM] - - k[1743]*y_cur[IDX_C2HI] - k[2001]*y_cur[IDX_CH2I] - - k[2189]*y_cur[IDX_CH4I] - k[2190]*y_cur[IDX_CH4I] - - k[2245]*y_cur[IDX_CHI] - k[2280]*y_cur[IDX_H2COI] - - k[2281]*y_cur[IDX_H2SI] - k[2282]*y_cur[IDX_SO2I] - - k[2434]*y_cur[IDX_H2I] - k[2435]*y_cur[IDX_H2I] - - k[2540]*y_cur[IDX_H2OI] - k[3534]*y_cur[IDX_NH2I] - - k[3573]*y_cur[IDX_NH3I] - k[3610]*y_cur[IDX_NHI] - - k[3798]*y_cur[IDX_OHI] - k[6136] - k[6373]*y_cur[IDX_GRAINM]; - data[jistart + 8442] = 0.0 - k[307]*y_cur[IDX_COII] + - k[1387]*y_cur[IDX_CII] + k[3207]*y_cur[IDX_HeII] + - k[3343]*y_cur[IDX_NII]; - data[jistart + 8443] = 0.0 + k[5653]*y_cur[IDX_HeII]; - data[jistart + 8444] = 0.0 + k[5647]*y_cur[IDX_HeII]; - data[jistart + 8445] = 0.0 + k[3732]*y_cur[IDX_OI]; - data[jistart + 8446] = 0.0 - k[6373]*y_cur[IDX_COII]; - data[jistart + 8447] = 0.0 - k[488]*y_cur[IDX_COII]; - data[jistart + 8448] = 0.0 + k[2337]*y_cur[IDX_H2COI] + - k[2344]*y_cur[IDX_HCOI]; - data[jistart + 8449] = 0.0 - k[2434]*y_cur[IDX_COII] - - k[2435]*y_cur[IDX_COII]; - data[jistart + 8450] = 0.0 + k[445]*y_cur[IDX_COI]; - data[jistart + 8451] = 0.0 - k[308]*y_cur[IDX_COII] - - k[2280]*y_cur[IDX_COII] + k[2337]*y_cur[IDX_HII] + - k[3219]*y_cur[IDX_HeII]; - data[jistart + 8452] = 0.0 - k[478]*y_cur[IDX_COII] - - k[2540]*y_cur[IDX_COII]; - data[jistart + 8453] = 0.0 - k[309]*y_cur[IDX_COII] - - k[2281]*y_cur[IDX_COII]; - data[jistart + 8454] = 0.0 - k[497]*y_cur[IDX_COII]; - data[jistart + 8455] = 0.0 - k[310]*y_cur[IDX_COII] + - k[2344]*y_cur[IDX_HII] + k[3249]*y_cur[IDX_HeII]; - data[jistart + 8456] = 0.0 + k[6183]; - data[jistart + 8457] = 0.0 + k[3171]*y_cur[IDX_CH2COI] + - k[3207]*y_cur[IDX_CO2I] + k[3219]*y_cur[IDX_H2COI] + - k[3249]*y_cur[IDX_HCOI] + k[3296]*y_cur[IDX_OCSI] + - k[5643]*y_cur[IDX_CH3COI] + k[5647]*y_cur[IDX_COOHI] + - k[5653]*y_cur[IDX_COOCH3I] + k[5660]*y_cur[IDX_CH2OHCOI]; - data[jistart + 8458] = 0.0 + k[549]*y_cur[IDX_COI] + - k[3343]*y_cur[IDX_CO2I]; - data[jistart + 8459] = 0.0 + k[316]*y_cur[IDX_COI]; - data[jistart + 8460] = 0.0 - k[617]*y_cur[IDX_COII] - - k[3610]*y_cur[IDX_COII]; - data[jistart + 8461] = 0.0 - k[587]*y_cur[IDX_COII] - - k[3534]*y_cur[IDX_COII]; - data[jistart + 8462] = 0.0 - k[602]*y_cur[IDX_COII] - - k[3573]*y_cur[IDX_COII]; - data[jistart + 8463] = 0.0 - k[311]*y_cur[IDX_COII]; - data[jistart + 8464] = 0.0 - k[682]*y_cur[IDX_COII] + - k[1969]*y_cur[IDX_CHII] + k[3684]*y_cur[IDX_C2II] + - k[3732]*y_cur[IDX_CSII] + k[5505]*y_cur[IDX_CII]; - data[jistart + 8465] = 0.0 + k[653]*y_cur[IDX_COI] + - k[2261]*y_cur[IDX_CHI] + k[3631]*y_cur[IDX_C2I] + - k[3634]*y_cur[IDX_C2HI] + k[5525]*y_cur[IDX_CI]; - data[jistart + 8466] = 0.0 - k[312]*y_cur[IDX_COII] + - k[1422]*y_cur[IDX_CII] + k[1455]*y_cur[IDX_C2II] + - k[1966]*y_cur[IDX_CHII]; - data[jistart + 8467] = 0.0 + k[1462]*y_cur[IDX_C2I] + - k[1912]*y_cur[IDX_CI]; - data[jistart + 8468] = 0.0 + k[1424]*y_cur[IDX_CII]; - data[jistart + 8469] = 0.0 + k[3296]*y_cur[IDX_HeII]; - data[jistart + 8470] = 0.0 - k[699]*y_cur[IDX_COII] + - k[1426]*y_cur[IDX_CII] + k[1972]*y_cur[IDX_CHII] - - k[3798]*y_cur[IDX_COII]; - data[jistart + 8471] = 0.0 - k[313]*y_cur[IDX_COII]; - data[jistart + 8472] = 0.0 + k[1430]*y_cur[IDX_CII]; - data[jistart + 8473] = 0.0 - k[2282]*y_cur[IDX_COII]; - data[jistart + 8474] = 0.0 - k[980]*y_cur[IDX_COII]; - data[jistart + 8475] = 0.0 + k[1905]*y_cur[IDX_HCO2II]; - data[jistart + 8476] = 0.0 - k[1387]*y_cur[IDX_CO2I]; - data[jistart + 8477] = 0.0 - k[3]*y_cur[IDX_CO2I] + - k[7]*y_cur[IDX_O2I]; - data[jistart + 8478] = 0.0 - k[1468]*y_cur[IDX_CO2I]; - data[jistart + 8479] = 0.0 + k[228]*y_cur[IDX_CO2II] + - k[1567]*y_cur[IDX_HCO2II]; - data[jistart + 8480] = 0.0 + k[238]*y_cur[IDX_CO2II]; - data[jistart + 8481] = 0.0 - k[1753]*y_cur[IDX_CO2I]; - data[jistart + 8482] = 0.0 - k[5075]*y_cur[IDX_CO2I] + - k[5086]*y_cur[IDX_O2I] + k[5087]*y_cur[IDX_O2I]; - data[jistart + 8483] = 0.0 - k[1946]*y_cur[IDX_CO2I]; - data[jistart + 8484] = 0.0 + k[5007]*y_cur[IDX_O2I] + - k[5008]*y_cur[IDX_O2I]; - data[jistart + 8485] = 0.0 - k[1978]*y_cur[IDX_CO2I]; - data[jistart + 8486] = 0.0 + k[2116]*y_cur[IDX_HCO2II]; - data[jistart + 8487] = 0.0 + k[1286]*y_cur[IDX_eM] + - k[6713]*y_cur[IDX_GRAINM]; - data[jistart + 8488] = 0.0 + k[286]*y_cur[IDX_CO2II] + - k[2201]*y_cur[IDX_HCO2II]; - data[jistart + 8489] = 0.0 - k[2139]*y_cur[IDX_CO2I]; - data[jistart + 8490] = 0.0 - k[2223]*y_cur[IDX_CO2I]; - data[jistart + 8491] = 0.0 - k[298]*y_cur[IDX_CO2I] - - k[2269]*y_cur[IDX_CO2I] - k[2270]*y_cur[IDX_CO2I]; - data[jistart + 8492] = 0.0 + k[124]*y_cur[IDX_OM] + - k[2285]*y_cur[IDX_HCO2II] + k[2290]*y_cur[IDX_SO2II] + - k[2292]*y_cur[IDX_SiOII] + k[5127]*y_cur[IDX_HNOI] + - k[5128]*y_cur[IDX_N2OI] + k[5129]*y_cur[IDX_NO2I] + - k[5130]*y_cur[IDX_O2I] + k[5131]*y_cur[IDX_O2HI] + - k[5461]*y_cur[IDX_OHI]; - data[jistart + 8493] = 0.0 - k[307]*y_cur[IDX_CO2I] + - k[2282]*y_cur[IDX_SO2I]; - data[jistart + 8494] = 0.0 - k[3]*y_cur[IDX_CM] - - k[298]*y_cur[IDX_CNII] - k[307]*y_cur[IDX_COII] - - k[516]*y_cur[IDX_HeII] - k[548]*y_cur[IDX_NII] - - k[564]*y_cur[IDX_N2II] - k[1387]*y_cur[IDX_CII] - - k[1468]*y_cur[IDX_C2HII] - k[1753]*y_cur[IDX_C3HII] - - k[1946]*y_cur[IDX_CHII] - k[1978]*y_cur[IDX_CH2II] - - k[2139]*y_cur[IDX_CH4II] - k[2223]*y_cur[IDX_CH5II] - - k[2269]*y_cur[IDX_CNII] - k[2270]*y_cur[IDX_CNII] - - k[2334]*y_cur[IDX_HII] - k[2382]*y_cur[IDX_H2II] - - k[2674]*y_cur[IDX_H3II] - k[2853]*y_cur[IDX_HCNII] - - k[3049]*y_cur[IDX_HNOII] - k[3207]*y_cur[IDX_HeII] - - k[3208]*y_cur[IDX_HeII] - k[3209]*y_cur[IDX_HeII] - - k[3210]*y_cur[IDX_HeII] - k[3343]*y_cur[IDX_NII] - - k[3372]*y_cur[IDX_N2HII] - k[3482]*y_cur[IDX_NHII] - - k[3483]*y_cur[IDX_NHII] - k[3484]*y_cur[IDX_NHII] - - k[3640]*y_cur[IDX_OII] - k[3677]*y_cur[IDX_O2HII] - - k[3776]*y_cur[IDX_OHII] - k[3811]*y_cur[IDX_PII] - - k[5075]*y_cur[IDX_CHI] - k[5162]*y_cur[IDX_HI] - - k[5262]*y_cur[IDX_NI] - k[5390]*y_cur[IDX_OI] - - k[5491]*y_cur[IDX_SiI] - k[5825] - k[6137] - k[6978]; - data[jistart + 8495] = 0.0 + k[228]*y_cur[IDX_C2H2I] + - k[238]*y_cur[IDX_C2H4I] + k[286]*y_cur[IDX_CH4I] + - k[314]*y_cur[IDX_OCSI] + k[315]*y_cur[IDX_SO2I] + - k[479]*y_cur[IDX_H2OI] + k[484]*y_cur[IDX_H2SI] + - k[603]*y_cur[IDX_NH3I] + k[623]*y_cur[IDX_NOI] + - k[678]*y_cur[IDX_O2I] + k[683]*y_cur[IDX_OI]; - data[jistart + 8496] = 0.0 + k[8693]*y_cur[IDX_GOI]; - data[jistart + 8497] = 0.0 + k[7160] + k[7342] + k[7524]; - data[jistart + 8498] = 0.0 + k[8693]*y_cur[IDX_GCOI]; - data[jistart + 8499] = 0.0 + k[6566]*y_cur[IDX_HCO2II] + - k[6574]*y_cur[IDX_HCOOHII] + k[6700]*y_cur[IDX_HCOOCH3II] + - k[6713]*y_cur[IDX_CH3COOHII]; - data[jistart + 8500] = 0.0 - k[5162]*y_cur[IDX_CO2I]; - data[jistart + 8501] = 0.0 - k[2334]*y_cur[IDX_CO2I]; - data[jistart + 8502] = 0.0 - k[2382]*y_cur[IDX_CO2I]; - data[jistart + 8503] = 0.0 + k[479]*y_cur[IDX_CO2II] + - k[2548]*y_cur[IDX_HCO2II]; - data[jistart + 8504] = 0.0 + k[484]*y_cur[IDX_CO2II]; - data[jistart + 8505] = 0.0 - k[2674]*y_cur[IDX_CO2I]; - data[jistart + 8506] = 0.0 - k[2853]*y_cur[IDX_CO2I]; - data[jistart + 8507] = 0.0 + k[5208]*y_cur[IDX_O2I] + - k[5405]*y_cur[IDX_OI]; - data[jistart + 8508] = 0.0 + k[1098]*y_cur[IDX_eM] + - k[1567]*y_cur[IDX_C2H2I] + k[1905]*y_cur[IDX_CI] + - k[2116]*y_cur[IDX_CH3CNI] + k[2201]*y_cur[IDX_CH4I] + - k[2285]*y_cur[IDX_COI] + k[2548]*y_cur[IDX_H2OI] + - k[3585]*y_cur[IDX_NH3I] + k[6566]*y_cur[IDX_GRAINM]; - data[jistart + 8509] = 0.0 + k[5858]; - data[jistart + 8510] = 0.0 + k[983]*y_cur[IDX_eM] + - k[6700]*y_cur[IDX_GRAINM]; - data[jistart + 8511] = 0.0 + k[1101]*y_cur[IDX_eM] + - k[6574]*y_cur[IDX_GRAINM]; - data[jistart + 8512] = 0.0 + k[5127]*y_cur[IDX_COI]; - data[jistart + 8513] = 0.0 - k[3049]*y_cur[IDX_CO2I]; - data[jistart + 8514] = 0.0 - k[516]*y_cur[IDX_CO2I] - - k[3207]*y_cur[IDX_CO2I] - k[3208]*y_cur[IDX_CO2I] - - k[3209]*y_cur[IDX_CO2I] - k[3210]*y_cur[IDX_CO2I]; - data[jistart + 8515] = 0.0 - k[5262]*y_cur[IDX_CO2I]; - data[jistart + 8516] = 0.0 - k[548]*y_cur[IDX_CO2I] - - k[3343]*y_cur[IDX_CO2I]; - data[jistart + 8517] = 0.0 - k[564]*y_cur[IDX_CO2I]; - data[jistart + 8518] = 0.0 - k[3372]*y_cur[IDX_CO2I]; - data[jistart + 8519] = 0.0 + k[5128]*y_cur[IDX_COI]; - data[jistart + 8520] = 0.0 - k[3482]*y_cur[IDX_CO2I] - - k[3483]*y_cur[IDX_CO2I] - k[3484]*y_cur[IDX_CO2I]; - data[jistart + 8521] = 0.0 + k[603]*y_cur[IDX_CO2II] + - k[3585]*y_cur[IDX_HCO2II]; - data[jistart + 8522] = 0.0 + k[623]*y_cur[IDX_CO2II] + - k[5331]*y_cur[IDX_OCNI]; - data[jistart + 8523] = 0.0 + k[5129]*y_cur[IDX_COI]; - data[jistart + 8524] = 0.0 + k[683]*y_cur[IDX_CO2II] - - k[5390]*y_cur[IDX_CO2I] + k[5405]*y_cur[IDX_HCOI] + - k[5430]*y_cur[IDX_OCSI]; - data[jistart + 8525] = 0.0 - k[3640]*y_cur[IDX_CO2I] + - k[3649]*y_cur[IDX_OCSI]; - data[jistart + 8526] = 0.0 + k[124]*y_cur[IDX_COI]; - data[jistart + 8527] = 0.0 + k[7]*y_cur[IDX_CM] + - k[678]*y_cur[IDX_CO2II] + k[5007]*y_cur[IDX_CH2I] + - k[5008]*y_cur[IDX_CH2I] + k[5086]*y_cur[IDX_CHI] + - k[5087]*y_cur[IDX_CHI] + k[5130]*y_cur[IDX_COI] + - k[5208]*y_cur[IDX_HCOI] + k[5335]*y_cur[IDX_OCNI]; - data[jistart + 8528] = 0.0 + k[5131]*y_cur[IDX_COI]; - data[jistart + 8529] = 0.0 - k[3677]*y_cur[IDX_CO2I]; - data[jistart + 8530] = 0.0 + k[5331]*y_cur[IDX_NOI] + - k[5335]*y_cur[IDX_O2I]; - data[jistart + 8531] = 0.0 + k[314]*y_cur[IDX_CO2II] + - k[3649]*y_cur[IDX_OII] + k[3858]*y_cur[IDX_SOII] + - k[5430]*y_cur[IDX_OI]; - data[jistart + 8532] = 0.0 + k[5461]*y_cur[IDX_COI]; - data[jistart + 8533] = 0.0 - k[3776]*y_cur[IDX_CO2I]; - data[jistart + 8534] = 0.0 - k[3811]*y_cur[IDX_CO2I]; - data[jistart + 8535] = 0.0 + k[3858]*y_cur[IDX_OCSI]; - data[jistart + 8536] = 0.0 + k[315]*y_cur[IDX_CO2II] + - k[2282]*y_cur[IDX_COII]; - data[jistart + 8537] = 0.0 + k[2290]*y_cur[IDX_COI]; - data[jistart + 8538] = 0.0 - k[5491]*y_cur[IDX_CO2I]; - data[jistart + 8539] = 0.0 + k[2292]*y_cur[IDX_COI]; - data[jistart + 8540] = 0.0 + k[983]*y_cur[IDX_HCOOCH3II] + - k[1098]*y_cur[IDX_HCO2II] + k[1101]*y_cur[IDX_HCOOHII] + - k[1286]*y_cur[IDX_CH3COOHII]; - data[jistart + 8541] = 0.0 - k[228]*y_cur[IDX_CO2II]; - data[jistart + 8542] = 0.0 - k[238]*y_cur[IDX_CO2II]; - data[jistart + 8543] = 0.0 - k[286]*y_cur[IDX_CO2II] - - k[2191]*y_cur[IDX_CO2II]; - data[jistart + 8544] = 0.0 + k[298]*y_cur[IDX_CO2I]; - data[jistart + 8545] = 0.0 + k[307]*y_cur[IDX_CO2I]; - data[jistart + 8546] = 0.0 + k[298]*y_cur[IDX_CNII] + - k[307]*y_cur[IDX_COII] + k[516]*y_cur[IDX_HeII] + - k[548]*y_cur[IDX_NII] + k[564]*y_cur[IDX_N2II]; - data[jistart + 8547] = 0.0 - k[228]*y_cur[IDX_C2H2I] - - k[238]*y_cur[IDX_C2H4I] - k[286]*y_cur[IDX_CH4I] - - k[314]*y_cur[IDX_OCSI] - k[315]*y_cur[IDX_SO2I] - - k[479]*y_cur[IDX_H2OI] - k[484]*y_cur[IDX_H2SI] - - k[603]*y_cur[IDX_NH3I] - k[623]*y_cur[IDX_NOI] - - k[678]*y_cur[IDX_O2I] - k[683]*y_cur[IDX_OI] - k[981]*y_cur[IDX_eM] - - k[2191]*y_cur[IDX_CH4I] - k[2436]*y_cur[IDX_H2I] - - k[2541]*y_cur[IDX_H2OI] - k[2841]*y_cur[IDX_HI] - - k[3730]*y_cur[IDX_OI] - k[6540]*y_cur[IDX_GRAINM]; - data[jistart + 8548] = 0.0 - k[6540]*y_cur[IDX_CO2II]; - data[jistart + 8549] = 0.0 - k[2841]*y_cur[IDX_CO2II]; - data[jistart + 8550] = 0.0 - k[2436]*y_cur[IDX_CO2II]; - data[jistart + 8551] = 0.0 - k[479]*y_cur[IDX_CO2II] - - k[2541]*y_cur[IDX_CO2II]; - data[jistart + 8552] = 0.0 - k[484]*y_cur[IDX_CO2II]; - data[jistart + 8553] = 0.0 + k[516]*y_cur[IDX_CO2I]; - data[jistart + 8554] = 0.0 + k[548]*y_cur[IDX_CO2I]; - data[jistart + 8555] = 0.0 + k[564]*y_cur[IDX_CO2I]; - data[jistart + 8556] = 0.0 - k[603]*y_cur[IDX_CO2II]; - data[jistart + 8557] = 0.0 - k[623]*y_cur[IDX_CO2II]; - data[jistart + 8558] = 0.0 - k[683]*y_cur[IDX_CO2II] - - k[3730]*y_cur[IDX_CO2II]; - data[jistart + 8559] = 0.0 - k[678]*y_cur[IDX_CO2II]; - data[jistart + 8560] = 0.0 - k[314]*y_cur[IDX_CO2II]; - data[jistart + 8561] = 0.0 - k[315]*y_cur[IDX_CO2II]; - data[jistart + 8562] = 0.0 - k[981]*y_cur[IDX_CO2II]; - data[jistart + 8563] = 0.0 - k[5649]*y_cur[IDX_COOCH3I]; - data[jistart + 8564] = 0.0 - k[5649]*y_cur[IDX_CII] - - k[5650]*y_cur[IDX_H3II] - k[5651]*y_cur[IDX_H3OII] - - k[5652]*y_cur[IDX_HCOII] - k[5653]*y_cur[IDX_HeII] - - k[5654]*y_cur[IDX_HeII] - k[5943] - k[6293] - k[7019]; - data[jistart + 8565] = 0.0 + k[8760]*y_cur[IDX_GCOI]; - data[jistart + 8566] = 0.0 + k[8760]*y_cur[IDX_GCH3OI]; - data[jistart + 8567] = 0.0 + k[7201] + k[7383] + k[7558]; - data[jistart + 8568] = 0.0 - k[5650]*y_cur[IDX_COOCH3I]; - data[jistart + 8569] = 0.0 - k[5651]*y_cur[IDX_COOCH3I]; - data[jistart + 8570] = 0.0 - k[5652]*y_cur[IDX_COOCH3I]; - data[jistart + 8571] = 0.0 - k[5653]*y_cur[IDX_COOCH3I] - - k[5654]*y_cur[IDX_COOCH3I]; - data[jistart + 8572] = 0.0 + k[5649]*y_cur[IDX_COOCH3I]; - data[jistart + 8573] = 0.0 + k[5649]*y_cur[IDX_CII]; - data[jistart + 8574] = 0.0 - k[1270]*y_cur[IDX_eM] - - k[1271]*y_cur[IDX_eM] - k[6694]*y_cur[IDX_GRAINM] - - k[6695]*y_cur[IDX_GRAINM]; - data[jistart + 8575] = 0.0 - k[6694]*y_cur[IDX_COOCH3II] - - k[6695]*y_cur[IDX_COOCH3II]; - data[jistart + 8576] = 0.0 - k[1270]*y_cur[IDX_COOCH3II] - - k[1271]*y_cur[IDX_COOCH3II]; - data[jistart + 8577] = 0.0 - k[5644]*y_cur[IDX_COOHI]; - data[jistart + 8578] = 0.0 + k[5672]*y_cur[IDX_HeII] + k[5946] + - k[6297]; - data[jistart + 8579] = 0.0 + k[1285]*y_cur[IDX_eM] + - k[1288]*y_cur[IDX_eM] + k[6712]*y_cur[IDX_GRAINM] + - k[6715]*y_cur[IDX_GRAINM]; - data[jistart + 8580] = 0.0 + k[1294]*y_cur[IDX_eM] + - k[6735]*y_cur[IDX_GRAINM]; - data[jistart + 8581] = 0.0 - k[5644]*y_cur[IDX_CII] - - k[5645]*y_cur[IDX_H3II] - k[5646]*y_cur[IDX_HCOII] - - k[5647]*y_cur[IDX_HeII] - k[5648]*y_cur[IDX_HeII] - k[5939] - - k[6292] - k[6981]; - data[jistart + 8582] = 0.0 + k[8739]*y_cur[IDX_GOHI]; - data[jistart + 8583] = 0.0 + k[7163] + k[7345] + k[7527]; - data[jistart + 8584] = 0.0 + k[8739]*y_cur[IDX_GCOI]; - data[jistart + 8585] = 0.0 + k[6712]*y_cur[IDX_CH3COOHII] + - k[6715]*y_cur[IDX_CH3COOHII] + k[6735]*y_cur[IDX_CH3COOH2II]; - data[jistart + 8586] = 0.0 - k[5645]*y_cur[IDX_COOHI]; - data[jistart + 8587] = 0.0 - k[5646]*y_cur[IDX_COOHI]; - data[jistart + 8588] = 0.0 - k[5647]*y_cur[IDX_COOHI] - - k[5648]*y_cur[IDX_COOHI] + k[5672]*y_cur[IDX_CH3COOHI]; - data[jistart + 8589] = 0.0 + k[1285]*y_cur[IDX_CH3COOHII] + - k[1288]*y_cur[IDX_CH3COOHII] + k[1294]*y_cur[IDX_CH3COOH2II]; - data[jistart + 8590] = 0.0 + k[4983]*y_cur[IDX_PHI] + - k[5527]*y_cur[IDX_PI]; - data[jistart + 8591] = 0.0 - k[171]*y_cur[IDX_CPI]; - data[jistart + 8592] = 0.0 + k[6008]; - data[jistart + 8593] = 0.0 + k[6020]; - data[jistart + 8594] = 0.0 + k[3157]*y_cur[IDX_HeII] + - k[5378]*y_cur[IDX_OI] + k[5774] + k[6071]; - data[jistart + 8595] = 0.0 + k[902]*y_cur[IDX_eM] + - k[6662]*y_cur[IDX_GRAINM]; - data[jistart + 8596] = 0.0 - k[171]*y_cur[IDX_CII] - - k[373]*y_cur[IDX_HII] - k[2677]*y_cur[IDX_H3II] - - k[2796]*y_cur[IDX_H3OII] - k[2955]*y_cur[IDX_HCOII] - - k[3212]*y_cur[IDX_HeII] - k[3213]*y_cur[IDX_HeII] - - k[5391]*y_cur[IDX_OI] - k[5827] - k[6139] - k[6972]; - data[jistart + 8597] = 0.0 + k[7154] + k[7336] + k[7518]; - data[jistart + 8598] = 0.0 + k[6543]*y_cur[IDX_HCPII] + - k[6569]*y_cur[IDX_PCH2II] + k[6578]*y_cur[IDX_PCH3II] + - k[6662]*y_cur[IDX_CCPII] + k[6677]*y_cur[IDX_HC2PII] + - k[6814]*y_cur[IDX_PC4HII]; - data[jistart + 8599] = 0.0 - k[373]*y_cur[IDX_CPI]; - data[jistart + 8600] = 0.0 - k[2677]*y_cur[IDX_CPI]; - data[jistart + 8601] = 0.0 - k[2796]*y_cur[IDX_CPI]; - data[jistart + 8602] = 0.0 + k[3233]*y_cur[IDX_HeII]; - data[jistart + 8603] = 0.0 + k[1060]*y_cur[IDX_eM] + - k[6677]*y_cur[IDX_GRAINM]; - data[jistart + 8604] = 0.0 - k[2955]*y_cur[IDX_CPI]; - data[jistart + 8605] = 0.0 + k[5861] + k[6189]; - data[jistart + 8606] = 0.0 + k[1105]*y_cur[IDX_eM] + - k[6543]*y_cur[IDX_GRAINM]; - data[jistart + 8607] = 0.0 + k[3157]*y_cur[IDX_CCPI] - - k[3212]*y_cur[IDX_CPI] - k[3213]*y_cur[IDX_CPI] + - k[3233]*y_cur[IDX_HC2PI]; - data[jistart + 8608] = 0.0 + k[5378]*y_cur[IDX_CCPI] - - k[5391]*y_cur[IDX_CPI]; - data[jistart + 8609] = 0.0 + k[5527]*y_cur[IDX_CI]; - data[jistart + 8610] = 0.0 + k[1196]*y_cur[IDX_eM] + - k[6814]*y_cur[IDX_GRAINM]; - data[jistart + 8611] = 0.0 + k[1197]*y_cur[IDX_eM] + - k[6569]*y_cur[IDX_GRAINM]; - data[jistart + 8612] = 0.0 + k[1199]*y_cur[IDX_eM] + - k[6578]*y_cur[IDX_GRAINM]; - data[jistart + 8613] = 0.0 + k[4983]*y_cur[IDX_CI]; - data[jistart + 8614] = 0.0 + k[902]*y_cur[IDX_CCPII] + - k[1060]*y_cur[IDX_HC2PII] + k[1105]*y_cur[IDX_HCPII] + - k[1196]*y_cur[IDX_PC4HII] + k[1197]*y_cur[IDX_PCH2II] + - k[1199]*y_cur[IDX_PCH3II]; - data[jistart + 8615] = 0.0 + k[171]*y_cur[IDX_CPI] + - k[1341]*y_cur[IDX_CCPI] + k[1397]*y_cur[IDX_HC2PI]; - data[jistart + 8616] = 0.0 + k[1341]*y_cur[IDX_CII]; - data[jistart + 8617] = 0.0 + k[171]*y_cur[IDX_CII] + - k[373]*y_cur[IDX_HII]; - data[jistart + 8618] = 0.0 - k[984]*y_cur[IDX_eM] - - k[2437]*y_cur[IDX_H2I] - k[3731]*y_cur[IDX_OI] - - k[6511]*y_cur[IDX_GRAINM]; - data[jistart + 8619] = 0.0 - k[6511]*y_cur[IDX_CPII]; - data[jistart + 8620] = 0.0 + k[373]*y_cur[IDX_CPI]; - data[jistart + 8621] = 0.0 - k[2437]*y_cur[IDX_CPII]; - data[jistart + 8622] = 0.0 + k[1397]*y_cur[IDX_CII] + - k[3232]*y_cur[IDX_HeII]; - data[jistart + 8623] = 0.0 + k[3232]*y_cur[IDX_HC2PI]; - data[jistart + 8624] = 0.0 - k[3731]*y_cur[IDX_CPII]; - data[jistart + 8625] = 0.0 - k[984]*y_cur[IDX_CPII]; - data[jistart + 8626] = 0.0 + k[58]*y_cur[IDX_SM] - - k[4958]*y_cur[IDX_CSI] + k[4965]*y_cur[IDX_HSI] + - k[4976]*y_cur[IDX_NSI] + k[4980]*y_cur[IDX_OCSI] + - k[4984]*y_cur[IDX_S2I] + k[4986]*y_cur[IDX_SOI] + - k[5529]*y_cur[IDX_SI]; - data[jistart + 8627] = 0.0 + k[1392]*y_cur[IDX_H2CSI]; - data[jistart + 8628] = 0.0 + k[4876]*y_cur[IDX_SI]; - data[jistart + 8629] = 0.0 - k[4899]*y_cur[IDX_CSI]; - data[jistart + 8630] = 0.0 + k[3013]*y_cur[IDX_HCSII]; - data[jistart + 8631] = 0.0 + k[5485]*y_cur[IDX_SI]; - data[jistart + 8632] = 0.0 + k[3092]*y_cur[IDX_HeII] + - k[5355]*y_cur[IDX_OI] + k[5714]; - data[jistart + 8633] = 0.0 + k[786]*y_cur[IDX_eM] + - k[6674]*y_cur[IDX_GRAINM]; - data[jistart + 8634] = 0.0 + k[1757]*y_cur[IDX_OCSI] + - k[2576]*y_cur[IDX_H2SI]; - data[jistart + 8635] = 0.0 + k[3104]*y_cur[IDX_HeII] + k[5725] + - k[6009]; - data[jistart + 8636] = 0.0 + k[818]*y_cur[IDX_eM] + - k[6777]*y_cur[IDX_GRAINM]; - data[jistart + 8637] = 0.0 + k[3831]*y_cur[IDX_SII]; - data[jistart + 8638] = 0.0 + k[3116]*y_cur[IDX_HeII] + k[5735] + - k[6021]; - data[jistart + 8639] = 0.0 + k[837]*y_cur[IDX_eM] + - k[6817]*y_cur[IDX_GRAINM]; - data[jistart + 8640] = 0.0 + k[5098]*y_cur[IDX_OCSI] + - k[5100]*y_cur[IDX_SI]; - data[jistart + 8641] = 0.0 + k[5019]*y_cur[IDX_SI]; - data[jistart + 8642] = 0.0 + k[3014]*y_cur[IDX_HCSII]; - data[jistart + 8643] = 0.0 + k[954]*y_cur[IDX_eM] + - k[6688]*y_cur[IDX_GRAINM]; - data[jistart + 8644] = 0.0 - k[374]*y_cur[IDX_HII] - - k[2678]*y_cur[IDX_H3II] - k[2797]*y_cur[IDX_H3OII] - - k[2956]*y_cur[IDX_HCOII] - k[3214]*y_cur[IDX_HeII] - - k[3215]*y_cur[IDX_HeII] - k[4899]*y_cur[IDX_C2HI] - - k[4958]*y_cur[IDX_CI] - k[5263]*y_cur[IDX_NI] - - k[5392]*y_cur[IDX_OI] - k[5393]*y_cur[IDX_OI] - - k[5462]*y_cur[IDX_OHI] - k[5463]*y_cur[IDX_OHI] - k[5828] - k[5829] - - k[6141] - k[6142] - k[6975]; - data[jistart + 8645] = 0.0 + k[317]*y_cur[IDX_FeI] + - k[530]*y_cur[IDX_MgI] + k[633]*y_cur[IDX_NaI] + - k[717]*y_cur[IDX_SiI]; - data[jistart + 8646] = 0.0 + k[317]*y_cur[IDX_CSII]; - data[jistart + 8647] = 0.0 + k[8666]*y_cur[IDX_GSI]; - data[jistart + 8648] = 0.0 + k[7157] + k[7339] + k[7521]; - data[jistart + 8649] = 0.0 + k[6555]*y_cur[IDX_HCSII] + - k[6582]*y_cur[IDX_H2CSII] + k[6601]*y_cur[IDX_H3CSII] + - k[6674]*y_cur[IDX_C2SII] + k[6679]*y_cur[IDX_HC2SII] + - k[6688]*y_cur[IDX_CH3CSII] + k[6707]*y_cur[IDX_OCSII] + - k[6717]*y_cur[IDX_HOCSII] + k[6777]*y_cur[IDX_C3SII] + - k[6817]*y_cur[IDX_C4SII]; - data[jistart + 8650] = 0.0 + k[8666]*y_cur[IDX_GCI]; - data[jistart + 8651] = 0.0 + k[5173]*y_cur[IDX_HCSI]; - data[jistart + 8652] = 0.0 - k[374]*y_cur[IDX_CSI]; - data[jistart + 8653] = 0.0 + k[1392]*y_cur[IDX_CII] + k[5837] + - k[6156]; - data[jistart + 8654] = 0.0 + k[1000]*y_cur[IDX_eM] + - k[6582]*y_cur[IDX_GRAINM]; - data[jistart + 8655] = 0.0 + k[2576]*y_cur[IDX_C3HII]; - data[jistart + 8656] = 0.0 - k[2678]*y_cur[IDX_CSI]; - data[jistart + 8657] = 0.0 + k[1039]*y_cur[IDX_eM] + - k[6601]*y_cur[IDX_GRAINM]; - data[jistart + 8658] = 0.0 - k[2797]*y_cur[IDX_CSI]; - data[jistart + 8659] = 0.0 + k[1062]*y_cur[IDX_eM] + - k[6679]*y_cur[IDX_GRAINM]; - data[jistart + 8660] = 0.0 - k[2956]*y_cur[IDX_CSI]; - data[jistart + 8661] = 0.0 + k[3256]*y_cur[IDX_HeII] + - k[5173]*y_cur[IDX_HI] + k[6190]; - data[jistart + 8662] = 0.0 + k[1108]*y_cur[IDX_eM] + - k[3013]*y_cur[IDX_C2H5OHI] + k[3014]*y_cur[IDX_CH3COCH3I] + - k[3587]*y_cur[IDX_NH3I] + k[6555]*y_cur[IDX_GRAINM]; - data[jistart + 8663] = 0.0 + k[1128]*y_cur[IDX_eM] + - k[6717]*y_cur[IDX_GRAINM]; - data[jistart + 8664] = 0.0 + k[4965]*y_cur[IDX_CI]; - data[jistart + 8665] = 0.0 + k[3092]*y_cur[IDX_C2SI] + - k[3104]*y_cur[IDX_C3SI] + k[3116]*y_cur[IDX_C4SI] - - k[3214]*y_cur[IDX_CSI] - k[3215]*y_cur[IDX_CSI] + - k[3256]*y_cur[IDX_HCSI] + k[3294]*y_cur[IDX_OCSI]; - data[jistart + 8666] = 0.0 + k[530]*y_cur[IDX_CSII]; - data[jistart + 8667] = 0.0 - k[5263]*y_cur[IDX_CSI]; - data[jistart + 8668] = 0.0 + k[3587]*y_cur[IDX_HCSII]; - data[jistart + 8669] = 0.0 + k[4976]*y_cur[IDX_CI]; - data[jistart + 8670] = 0.0 + k[633]*y_cur[IDX_CSII]; - data[jistart + 8671] = 0.0 + k[5355]*y_cur[IDX_C2SI] - - k[5392]*y_cur[IDX_CSI] - k[5393]*y_cur[IDX_CSI]; - data[jistart + 8672] = 0.0 + k[1757]*y_cur[IDX_C3HII] + - k[3294]*y_cur[IDX_HeII] + k[3813]*y_cur[IDX_PII] + - k[4980]*y_cur[IDX_CI] + k[5098]*y_cur[IDX_CHI]; - data[jistart + 8673] = 0.0 + k[1178]*y_cur[IDX_eM] + - k[6707]*y_cur[IDX_GRAINM]; - data[jistart + 8674] = 0.0 - k[5462]*y_cur[IDX_CSI] - - k[5463]*y_cur[IDX_CSI]; - data[jistart + 8675] = 0.0 + k[3813]*y_cur[IDX_OCSI]; - data[jistart + 8676] = 0.0 + k[4876]*y_cur[IDX_C2I] + - k[5019]*y_cur[IDX_CH2I] + k[5100]*y_cur[IDX_CHI] + - k[5485]*y_cur[IDX_C2OI] + k[5529]*y_cur[IDX_CI]; - data[jistart + 8677] = 0.0 + k[3831]*y_cur[IDX_C4H2I]; - data[jistart + 8678] = 0.0 + k[58]*y_cur[IDX_CI]; - data[jistart + 8679] = 0.0 + k[4984]*y_cur[IDX_CI]; - data[jistart + 8680] = 0.0 + k[4986]*y_cur[IDX_CI]; - data[jistart + 8681] = 0.0 + k[717]*y_cur[IDX_CSII]; - data[jistart + 8682] = 0.0 + k[786]*y_cur[IDX_C2SII] + - k[818]*y_cur[IDX_C3SII] + k[837]*y_cur[IDX_C4SII] + - k[954]*y_cur[IDX_CH3CSII] + k[1000]*y_cur[IDX_H2CSII] + - k[1039]*y_cur[IDX_H3CSII] + k[1062]*y_cur[IDX_HC2SII] + - k[1108]*y_cur[IDX_HCSII] + k[1128]*y_cur[IDX_HOCSII] + - k[1178]*y_cur[IDX_OCSII]; - data[jistart + 8683] = 0.0 + k[1908]*y_cur[IDX_HSII] + - k[5528]*y_cur[IDX_SII]; - data[jistart + 8684] = 0.0 + k[1415]*y_cur[IDX_HSI] + - k[1421]*y_cur[IDX_NSI] + k[1425]*y_cur[IDX_OCSI] + - k[1428]*y_cur[IDX_SOI] + k[5506]*y_cur[IDX_SI]; - data[jistart + 8685] = 0.0 + k[1464]*y_cur[IDX_SII]; - data[jistart + 8686] = 0.0 + k[1456]*y_cur[IDX_SI]; - data[jistart + 8687] = 0.0 + k[3091]*y_cur[IDX_HeII]; - data[jistart + 8688] = 0.0 + k[1756]*y_cur[IDX_OCSI]; - data[jistart + 8689] = 0.0 + k[3103]*y_cur[IDX_HeII]; - data[jistart + 8690] = 0.0 + k[3115]*y_cur[IDX_HeII]; - data[jistart + 8691] = 0.0 + k[2265]*y_cur[IDX_SII]; - data[jistart + 8692] = 0.0 + k[1973]*y_cur[IDX_SI]; - data[jistart + 8693] = 0.0 - k[2192]*y_cur[IDX_CSII]; - data[jistart + 8694] = 0.0 + k[374]*y_cur[IDX_HII] + k[5828] + - k[6141]; - data[jistart + 8695] = 0.0 - k[317]*y_cur[IDX_FeI] - - k[530]*y_cur[IDX_MgI] - k[633]*y_cur[IDX_NaI] - - k[717]*y_cur[IDX_SiI] - k[985]*y_cur[IDX_eM] - - k[2192]*y_cur[IDX_CH4I] - k[2438]*y_cur[IDX_H2I] - - k[3672]*y_cur[IDX_O2I] - k[3732]*y_cur[IDX_OI] - k[6140] - - k[6535]*y_cur[IDX_GRAINM]; - data[jistart + 8696] = 0.0 - k[317]*y_cur[IDX_CSII]; - data[jistart + 8697] = 0.0 - k[6535]*y_cur[IDX_CSII]; - data[jistart + 8698] = 0.0 + k[374]*y_cur[IDX_CSI] + - k[2346]*y_cur[IDX_HCSI]; - data[jistart + 8699] = 0.0 - k[2438]*y_cur[IDX_CSII]; - data[jistart + 8700] = 0.0 + k[3222]*y_cur[IDX_HeII]; - data[jistart + 8701] = 0.0 + k[2346]*y_cur[IDX_HII] + - k[3255]*y_cur[IDX_HeII]; - data[jistart + 8702] = 0.0 + k[1415]*y_cur[IDX_CII]; - data[jistart + 8703] = 0.0 + k[1908]*y_cur[IDX_CI]; - data[jistart + 8704] = 0.0 + k[3091]*y_cur[IDX_C2SI] + - k[3103]*y_cur[IDX_C3SI] + k[3115]*y_cur[IDX_C4SI] + - k[3222]*y_cur[IDX_H2CSI] + k[3255]*y_cur[IDX_HCSI] + - k[3293]*y_cur[IDX_OCSI]; - data[jistart + 8705] = 0.0 - k[530]*y_cur[IDX_CSII]; - data[jistart + 8706] = 0.0 + k[3359]*y_cur[IDX_OCSI]; - data[jistart + 8707] = 0.0 + k[1421]*y_cur[IDX_CII]; - data[jistart + 8708] = 0.0 - k[633]*y_cur[IDX_CSII]; - data[jistart + 8709] = 0.0 - k[3732]*y_cur[IDX_CSII]; - data[jistart + 8710] = 0.0 - k[3672]*y_cur[IDX_CSII]; - data[jistart + 8711] = 0.0 + k[1425]*y_cur[IDX_CII] + - k[1756]*y_cur[IDX_C3HII] + k[3293]*y_cur[IDX_HeII] + - k[3359]*y_cur[IDX_NII]; - data[jistart + 8712] = 0.0 + k[1456]*y_cur[IDX_C2II] + - k[1973]*y_cur[IDX_CHII] + k[5506]*y_cur[IDX_CII]; - data[jistart + 8713] = 0.0 + k[1464]*y_cur[IDX_C2I] + - k[2265]*y_cur[IDX_CHI] + k[5528]*y_cur[IDX_CI]; - data[jistart + 8714] = 0.0 + k[1428]*y_cur[IDX_CII]; - data[jistart + 8715] = 0.0 - k[717]*y_cur[IDX_CSII]; - data[jistart + 8716] = 0.0 - k[985]*y_cur[IDX_CSII]; - data[jistart + 8717] = 0.0 + k[3159]*y_cur[IDX_HeII] + - k[5379]*y_cur[IDX_OI] + k[5775] + k[6072]; - data[jistart + 8718] = 0.0 + k[904]*y_cur[IDX_eM] + - k[6599]*y_cur[IDX_GRAINM]; - data[jistart + 8719] = 0.0 - k[319]*y_cur[IDX_HII] - - k[2679]*y_cur[IDX_H3II] - k[5132]*y_cur[IDX_H2I] - k[5677] - k[5830] - - k[6143] - k[6307] - k[6942]; - data[jistart + 8720] = 0.0 + k[318]*y_cur[IDX_HI] + - k[679]*y_cur[IDX_O2I] + k[5613]*y_cur[IDX_eM] + - k[6454]*y_cur[IDX_GRAINM]; - data[jistart + 8721] = 0.0 + k[5394]*y_cur[IDX_OI] + k[5831] + - k[6144]; - data[jistart + 8722] = 0.0 + k[986]*y_cur[IDX_eM] + - k[6632]*y_cur[IDX_GRAINM]; - data[jistart + 8723] = 0.0 + k[7124] + k[7306] + k[7488]; - data[jistart + 8724] = 0.0 + k[6454]*y_cur[IDX_ClII] + - k[6456]*y_cur[IDX_HClII] + k[6457]*y_cur[IDX_H2ClII] + - k[6599]*y_cur[IDX_CClII] + k[6632]*y_cur[IDX_ClOII]; - data[jistart + 8725] = 0.0 + k[318]*y_cur[IDX_ClII] + - k[5211]*y_cur[IDX_HClI]; - data[jistart + 8726] = 0.0 - k[319]*y_cur[IDX_ClI]; - data[jistart + 8727] = 0.0 - k[5132]*y_cur[IDX_ClI]; - data[jistart + 8728] = 0.0 + k[1002]*y_cur[IDX_eM] + - k[6457]*y_cur[IDX_GRAINM]; - data[jistart + 8729] = 0.0 - k[2679]*y_cur[IDX_ClI]; - data[jistart + 8730] = 0.0 + k[5211]*y_cur[IDX_HI] + k[5864] + - k[6194]; - data[jistart + 8731] = 0.0 + k[1111]*y_cur[IDX_eM] + - k[6456]*y_cur[IDX_GRAINM]; - data[jistart + 8732] = 0.0 + k[3159]*y_cur[IDX_CClI]; - data[jistart + 8733] = 0.0 + k[5379]*y_cur[IDX_CClI] + - k[5394]*y_cur[IDX_ClOI]; - data[jistart + 8734] = 0.0 + k[679]*y_cur[IDX_ClII]; - data[jistart + 8735] = 0.0 + k[904]*y_cur[IDX_CClII] + - k[986]*y_cur[IDX_ClOII] + k[1002]*y_cur[IDX_H2ClII] + - k[1111]*y_cur[IDX_HClII] + k[5613]*y_cur[IDX_ClII]; - data[jistart + 8736] = 0.0 + k[319]*y_cur[IDX_HII] + k[5677] + - k[5830] + k[6143] + k[6307]; - data[jistart + 8737] = 0.0 - k[318]*y_cur[IDX_HI] - - k[679]*y_cur[IDX_O2I] - k[2439]*y_cur[IDX_H2I] - - k[5613]*y_cur[IDX_eM] - k[6454]*y_cur[IDX_GRAINM]; - data[jistart + 8738] = 0.0 + k[3216]*y_cur[IDX_HeII]; - data[jistart + 8739] = 0.0 - k[6454]*y_cur[IDX_ClII]; - data[jistart + 8740] = 0.0 - k[318]*y_cur[IDX_ClII]; - data[jistart + 8741] = 0.0 + k[319]*y_cur[IDX_ClI]; - data[jistart + 8742] = 0.0 - k[2439]*y_cur[IDX_ClII]; - data[jistart + 8743] = 0.0 + k[3259]*y_cur[IDX_HeII]; - data[jistart + 8744] = 0.0 + k[3216]*y_cur[IDX_ClOI] + - k[3259]*y_cur[IDX_HClI]; - data[jistart + 8745] = 0.0 - k[679]*y_cur[IDX_ClII]; - data[jistart + 8746] = 0.0 - k[5613]*y_cur[IDX_ClII]; - data[jistart + 8747] = 0.0 - k[172]*y_cur[IDX_ClOI]; - data[jistart + 8748] = 0.0 + k[5380]*y_cur[IDX_OI]; - data[jistart + 8749] = 0.0 - k[172]*y_cur[IDX_CII] - - k[3216]*y_cur[IDX_HeII] - k[5394]*y_cur[IDX_OI] - k[5831] - k[6144] - - k[6999]; - data[jistart + 8750] = 0.0 + k[7181] + k[7363] + k[7545]; - data[jistart + 8751] = 0.0 - k[3216]*y_cur[IDX_ClOI]; - data[jistart + 8752] = 0.0 + k[5380]*y_cur[IDX_CClI] - - k[5394]*y_cur[IDX_ClOI]; - data[jistart + 8753] = 0.0 + k[172]*y_cur[IDX_ClOI]; - data[jistart + 8754] = 0.0 + k[172]*y_cur[IDX_CII]; - data[jistart + 8755] = 0.0 - k[986]*y_cur[IDX_eM] - - k[6632]*y_cur[IDX_GRAINM]; - data[jistart + 8756] = 0.0 - k[6632]*y_cur[IDX_ClOII]; - data[jistart + 8757] = 0.0 - k[986]*y_cur[IDX_ClOII]; - data[jistart + 8758] = 0.0 + k[905]*y_cur[IDX_eM] + - k[6423]*y_cur[IDX_GRAINM]; - data[jistart + 8759] = 0.0 - k[5139]*y_cur[IDX_H2I] - - k[5151]*y_cur[IDX_H2OI] - k[5464]*y_cur[IDX_OHI] - k[6903]; - data[jistart + 8760] = 0.0 + k[457]*y_cur[IDX_H2I] + - k[6347]*y_cur[IDX_GRAINM]; - data[jistart + 8761] = 0.0 + k[7085] + k[7267] + k[7449]; - data[jistart + 8762] = 0.0 + k[6347]*y_cur[IDX_FII] + - k[6348]*y_cur[IDX_HFII] + k[6349]*y_cur[IDX_H2FII] + - k[6423]*y_cur[IDX_CFII] + k[6592]*y_cur[IDX_SiFII]; - data[jistart + 8763] = 0.0 + k[457]*y_cur[IDX_FII] - - k[5139]*y_cur[IDX_FI]; - data[jistart + 8764] = 0.0 + k[1004]*y_cur[IDX_eM] + - k[6349]*y_cur[IDX_GRAINM]; - data[jistart + 8765] = 0.0 - k[5151]*y_cur[IDX_FI]; - data[jistart + 8766] = 0.0 + k[5865] + k[6196]; - data[jistart + 8767] = 0.0 + k[1112]*y_cur[IDX_eM] + - k[6348]*y_cur[IDX_GRAINM]; - data[jistart + 8768] = 0.0 - k[5464]*y_cur[IDX_FI]; - data[jistart + 8769] = 0.0 + k[1249]*y_cur[IDX_eM] + - k[6592]*y_cur[IDX_GRAINM]; - data[jistart + 8770] = 0.0 + k[905]*y_cur[IDX_CFII] + - k[1004]*y_cur[IDX_H2FII] + k[1112]*y_cur[IDX_HFII] + - k[1249]*y_cur[IDX_SiFII]; - data[jistart + 8771] = 0.0 - k[457]*y_cur[IDX_H2I] - - k[2440]*y_cur[IDX_H2I] - k[6347]*y_cur[IDX_GRAINM]; - data[jistart + 8772] = 0.0 - k[6347]*y_cur[IDX_FII]; - data[jistart + 8773] = 0.0 - k[457]*y_cur[IDX_FII] - - k[2440]*y_cur[IDX_FII]; - data[jistart + 8774] = 0.0 + k[3260]*y_cur[IDX_HeII]; - data[jistart + 8775] = 0.0 + k[3260]*y_cur[IDX_HFI]; - data[jistart + 8776] = 0.0 - k[173]*y_cur[IDX_FeI]; - data[jistart + 8777] = 0.0 + k[3895]*y_cur[IDX_FeII]; - data[jistart + 8778] = 0.0 + k[3930]*y_cur[IDX_FeII]; - data[jistart + 8779] = 0.0 + k[3965]*y_cur[IDX_FeII]; - data[jistart + 8780] = 0.0 + k[4000]*y_cur[IDX_FeII]; - data[jistart + 8781] = 0.0 + k[4035]*y_cur[IDX_FeII]; - data[jistart + 8782] = 0.0 - k[221]*y_cur[IDX_FeI]; - data[jistart + 8783] = 0.0 + k[4070]*y_cur[IDX_FeII]; - data[jistart + 8784] = 0.0 + k[4105]*y_cur[IDX_FeII]; - data[jistart + 8785] = 0.0 + k[4140]*y_cur[IDX_FeII]; - data[jistart + 8786] = 0.0 + k[4175]*y_cur[IDX_FeII]; - data[jistart + 8787] = 0.0 + k[4210]*y_cur[IDX_FeII]; - data[jistart + 8788] = 0.0 + k[4245]*y_cur[IDX_FeII]; - data[jistart + 8789] = 0.0 + k[4280]*y_cur[IDX_FeII]; - data[jistart + 8790] = 0.0 + k[4315]*y_cur[IDX_FeII]; - data[jistart + 8791] = 0.0 + k[4350]*y_cur[IDX_FeII]; - data[jistart + 8792] = 0.0 + k[4385]*y_cur[IDX_FeII]; - data[jistart + 8793] = 0.0 + k[4420]*y_cur[IDX_FeII]; - data[jistart + 8794] = 0.0 + k[4455]*y_cur[IDX_FeII]; - data[jistart + 8795] = 0.0 + k[4490]*y_cur[IDX_FeII]; - data[jistart + 8796] = 0.0 + k[4525]*y_cur[IDX_FeII]; - data[jistart + 8797] = 0.0 + k[4560]*y_cur[IDX_FeII]; - data[jistart + 8798] = 0.0 + k[4595]*y_cur[IDX_FeII]; - data[jistart + 8799] = 0.0 - k[250]*y_cur[IDX_FeI]; - data[jistart + 8800] = 0.0 + k[4630]*y_cur[IDX_FeII]; - data[jistart + 8801] = 0.0 - k[271]*y_cur[IDX_FeI]; - data[jistart + 8802] = 0.0 + k[4665]*y_cur[IDX_FeII]; - data[jistart + 8803] = 0.0 - k[317]*y_cur[IDX_FeI]; - data[jistart + 8804] = 0.0 - k[173]*y_cur[IDX_CII] - - k[221]*y_cur[IDX_C2H2II] - k[250]*y_cur[IDX_CHII] - - k[271]*y_cur[IDX_CH3II] - k[317]*y_cur[IDX_CSII] - - k[375]*y_cur[IDX_HII] - k[459]*y_cur[IDX_H2COII] - - k[467]*y_cur[IDX_H2OII] - k[483]*y_cur[IDX_H2SII] - - k[499]*y_cur[IDX_HCOII] - k[505]*y_cur[IDX_HSII] - - k[550]*y_cur[IDX_NII] - k[565]*y_cur[IDX_N2II] - - k[592]*y_cur[IDX_NH3II] - k[620]*y_cur[IDX_NOII] - - k[654]*y_cur[IDX_OII] - k[673]*y_cur[IDX_O2II] - - k[703]*y_cur[IDX_SII] - k[715]*y_cur[IDX_SOII] - - k[716]*y_cur[IDX_SiII] - k[726]*y_cur[IDX_SiOII] - - k[2680]*y_cur[IDX_H3II] - k[5832] - k[6145] - k[6304] - k[7016]; - data[jistart + 8805] = 0.0 + k[634]*y_cur[IDX_NaI] + - k[3895]*y_cur[IDX_CM] + k[3930]*y_cur[IDX_C10M] + - k[3965]*y_cur[IDX_C10HM] + k[4000]*y_cur[IDX_C2M] + - k[4035]*y_cur[IDX_C2HM] + k[4070]*y_cur[IDX_C3M] + - k[4105]*y_cur[IDX_C3HM] + k[4140]*y_cur[IDX_C3NM] + - k[4175]*y_cur[IDX_C4M] + k[4210]*y_cur[IDX_C4HM] + - k[4245]*y_cur[IDX_C5M] + k[4280]*y_cur[IDX_C5HM] + - k[4315]*y_cur[IDX_C5NM] + k[4350]*y_cur[IDX_C6M] + - k[4385]*y_cur[IDX_C6HM] + k[4420]*y_cur[IDX_C7M] + - k[4455]*y_cur[IDX_C7HM] + k[4490]*y_cur[IDX_C8M] + - k[4525]*y_cur[IDX_C8HM] + k[4560]*y_cur[IDX_C9M] + - k[4595]*y_cur[IDX_C9HM] + k[4630]*y_cur[IDX_CHM] + - k[4665]*y_cur[IDX_CNM] + k[4700]*y_cur[IDX_HM] + - k[4736]*y_cur[IDX_OM] + k[4771]*y_cur[IDX_O2M] + - k[4806]*y_cur[IDX_OHM] + k[4841]*y_cur[IDX_SM] + - k[5614]*y_cur[IDX_eM] + k[6670]*y_cur[IDX_GRAINM]; - data[jistart + 8806] = 0.0 + k[7198] + k[7380] + k[7564]; - data[jistart + 8807] = 0.0 + k[6670]*y_cur[IDX_FeII]; - data[jistart + 8808] = 0.0 - k[375]*y_cur[IDX_FeI]; - data[jistart + 8809] = 0.0 + k[4700]*y_cur[IDX_FeII]; - data[jistart + 8810] = 0.0 - k[459]*y_cur[IDX_FeI]; - data[jistart + 8811] = 0.0 - k[467]*y_cur[IDX_FeI]; - data[jistart + 8812] = 0.0 - k[483]*y_cur[IDX_FeI]; - data[jistart + 8813] = 0.0 - k[2680]*y_cur[IDX_FeI]; - data[jistart + 8814] = 0.0 - k[499]*y_cur[IDX_FeI]; - data[jistart + 8815] = 0.0 - k[505]*y_cur[IDX_FeI]; - data[jistart + 8816] = 0.0 - k[550]*y_cur[IDX_FeI]; - data[jistart + 8817] = 0.0 - k[565]*y_cur[IDX_FeI]; - data[jistart + 8818] = 0.0 - k[592]*y_cur[IDX_FeI]; - data[jistart + 8819] = 0.0 - k[620]*y_cur[IDX_FeI]; - data[jistart + 8820] = 0.0 + k[634]*y_cur[IDX_FeII]; - data[jistart + 8821] = 0.0 - k[654]*y_cur[IDX_FeI]; - data[jistart + 8822] = 0.0 + k[4736]*y_cur[IDX_FeII]; - data[jistart + 8823] = 0.0 - k[673]*y_cur[IDX_FeI]; - data[jistart + 8824] = 0.0 + k[4771]*y_cur[IDX_FeII]; - data[jistart + 8825] = 0.0 + k[4806]*y_cur[IDX_FeII]; - data[jistart + 8826] = 0.0 - k[703]*y_cur[IDX_FeI]; - data[jistart + 8827] = 0.0 + k[4841]*y_cur[IDX_FeII]; - data[jistart + 8828] = 0.0 - k[715]*y_cur[IDX_FeI]; - data[jistart + 8829] = 0.0 - k[716]*y_cur[IDX_FeI]; - data[jistart + 8830] = 0.0 - k[726]*y_cur[IDX_FeI]; - data[jistart + 8831] = 0.0 + k[5614]*y_cur[IDX_FeII]; - data[jistart + 8832] = 0.0 + k[173]*y_cur[IDX_FeI]; - data[jistart + 8833] = 0.0 - k[3895]*y_cur[IDX_FeII]; - data[jistart + 8834] = 0.0 - k[3930]*y_cur[IDX_FeII]; - data[jistart + 8835] = 0.0 - k[3965]*y_cur[IDX_FeII]; - data[jistart + 8836] = 0.0 - k[4000]*y_cur[IDX_FeII]; - data[jistart + 8837] = 0.0 - k[4035]*y_cur[IDX_FeII]; - data[jistart + 8838] = 0.0 + k[221]*y_cur[IDX_FeI]; - data[jistart + 8839] = 0.0 - k[4070]*y_cur[IDX_FeII]; - data[jistart + 8840] = 0.0 - k[4105]*y_cur[IDX_FeII]; - data[jistart + 8841] = 0.0 - k[4140]*y_cur[IDX_FeII]; - data[jistart + 8842] = 0.0 - k[4175]*y_cur[IDX_FeII]; - data[jistart + 8843] = 0.0 - k[4210]*y_cur[IDX_FeII]; - data[jistart + 8844] = 0.0 - k[4245]*y_cur[IDX_FeII]; - data[jistart + 8845] = 0.0 - k[4280]*y_cur[IDX_FeII]; - data[jistart + 8846] = 0.0 - k[4315]*y_cur[IDX_FeII]; - data[jistart + 8847] = 0.0 - k[4350]*y_cur[IDX_FeII]; - data[jistart + 8848] = 0.0 - k[4385]*y_cur[IDX_FeII]; - data[jistart + 8849] = 0.0 - k[4420]*y_cur[IDX_FeII]; - data[jistart + 8850] = 0.0 - k[4455]*y_cur[IDX_FeII]; - data[jistart + 8851] = 0.0 - k[4490]*y_cur[IDX_FeII]; - data[jistart + 8852] = 0.0 - k[4525]*y_cur[IDX_FeII]; - data[jistart + 8853] = 0.0 - k[4560]*y_cur[IDX_FeII]; - data[jistart + 8854] = 0.0 - k[4595]*y_cur[IDX_FeII]; - data[jistart + 8855] = 0.0 + k[250]*y_cur[IDX_FeI]; - data[jistart + 8856] = 0.0 - k[4630]*y_cur[IDX_FeII]; - data[jistart + 8857] = 0.0 + k[271]*y_cur[IDX_FeI]; - data[jistart + 8858] = 0.0 - k[4665]*y_cur[IDX_FeII]; - data[jistart + 8859] = 0.0 + k[317]*y_cur[IDX_FeI]; - data[jistart + 8860] = 0.0 + k[173]*y_cur[IDX_CII] + - k[221]*y_cur[IDX_C2H2II] + k[250]*y_cur[IDX_CHII] + - k[271]*y_cur[IDX_CH3II] + k[317]*y_cur[IDX_CSII] + - k[375]*y_cur[IDX_HII] + k[459]*y_cur[IDX_H2COII] + - k[467]*y_cur[IDX_H2OII] + k[483]*y_cur[IDX_H2SII] + - k[499]*y_cur[IDX_HCOII] + k[505]*y_cur[IDX_HSII] + - k[550]*y_cur[IDX_NII] + k[565]*y_cur[IDX_N2II] + - k[592]*y_cur[IDX_NH3II] + k[620]*y_cur[IDX_NOII] + - k[654]*y_cur[IDX_OII] + k[673]*y_cur[IDX_O2II] + - k[703]*y_cur[IDX_SII] + k[715]*y_cur[IDX_SOII] + - k[716]*y_cur[IDX_SiII] + k[726]*y_cur[IDX_SiOII] + - k[2680]*y_cur[IDX_H3II] + k[5832] + k[6145] + k[6304]; - data[jistart + 8861] = 0.0 - k[634]*y_cur[IDX_NaI] - - k[3895]*y_cur[IDX_CM] - k[3930]*y_cur[IDX_C10M] - - k[3965]*y_cur[IDX_C10HM] - k[4000]*y_cur[IDX_C2M] - - k[4035]*y_cur[IDX_C2HM] - k[4070]*y_cur[IDX_C3M] - - k[4105]*y_cur[IDX_C3HM] - k[4140]*y_cur[IDX_C3NM] - - k[4175]*y_cur[IDX_C4M] - k[4210]*y_cur[IDX_C4HM] - - k[4245]*y_cur[IDX_C5M] - k[4280]*y_cur[IDX_C5HM] - - k[4315]*y_cur[IDX_C5NM] - k[4350]*y_cur[IDX_C6M] - - k[4385]*y_cur[IDX_C6HM] - k[4420]*y_cur[IDX_C7M] - - k[4455]*y_cur[IDX_C7HM] - k[4490]*y_cur[IDX_C8M] - - k[4525]*y_cur[IDX_C8HM] - k[4560]*y_cur[IDX_C9M] - - k[4595]*y_cur[IDX_C9HM] - k[4630]*y_cur[IDX_CHM] - - k[4665]*y_cur[IDX_CNM] - k[4700]*y_cur[IDX_HM] - - k[4736]*y_cur[IDX_OM] - k[4771]*y_cur[IDX_O2M] - - k[4806]*y_cur[IDX_OHM] - k[4841]*y_cur[IDX_SM] - - k[5614]*y_cur[IDX_eM] - k[6670]*y_cur[IDX_GRAINM]; - data[jistart + 8862] = 0.0 - k[6670]*y_cur[IDX_FeII]; - data[jistart + 8863] = 0.0 + k[375]*y_cur[IDX_FeI]; - data[jistart + 8864] = 0.0 - k[4700]*y_cur[IDX_FeII]; - data[jistart + 8865] = 0.0 + k[459]*y_cur[IDX_FeI]; - data[jistart + 8866] = 0.0 + k[467]*y_cur[IDX_FeI]; - data[jistart + 8867] = 0.0 + k[483]*y_cur[IDX_FeI]; - data[jistart + 8868] = 0.0 + k[2680]*y_cur[IDX_FeI]; - data[jistart + 8869] = 0.0 + k[499]*y_cur[IDX_FeI]; - data[jistart + 8870] = 0.0 + k[505]*y_cur[IDX_FeI]; - data[jistart + 8871] = 0.0 + k[550]*y_cur[IDX_FeI]; - data[jistart + 8872] = 0.0 + k[565]*y_cur[IDX_FeI]; - data[jistart + 8873] = 0.0 + k[592]*y_cur[IDX_FeI]; - data[jistart + 8874] = 0.0 + k[620]*y_cur[IDX_FeI]; - data[jistart + 8875] = 0.0 - k[634]*y_cur[IDX_FeII]; - data[jistart + 8876] = 0.0 + k[654]*y_cur[IDX_FeI]; - data[jistart + 8877] = 0.0 - k[4736]*y_cur[IDX_FeII]; - data[jistart + 8878] = 0.0 + k[673]*y_cur[IDX_FeI]; - data[jistart + 8879] = 0.0 - k[4771]*y_cur[IDX_FeII]; - data[jistart + 8880] = 0.0 - k[4806]*y_cur[IDX_FeII]; - data[jistart + 8881] = 0.0 + k[703]*y_cur[IDX_FeI]; - data[jistart + 8882] = 0.0 - k[4841]*y_cur[IDX_FeII]; - data[jistart + 8883] = 0.0 + k[715]*y_cur[IDX_FeI]; - data[jistart + 8884] = 0.0 + k[716]*y_cur[IDX_FeI]; - data[jistart + 8885] = 0.0 + k[726]*y_cur[IDX_FeI]; - data[jistart + 8886] = 0.0 - k[5614]*y_cur[IDX_FeII]; - data[jistart + 8887] = 0.0 + k[6891]; - data[jistart + 8888] = 0.0 - k[7073] - k[7255] - k[7437] - - k[8274]*y_cur[IDX_GHI] - k[8369]*y_cur[IDX_GH2I] - - k[8394]*y_cur[IDX_GCI] - k[8394]*y_cur[IDX_GCI] - - k[8394]*y_cur[IDX_GCI] - k[8394]*y_cur[IDX_GCI] - - k[8395]*y_cur[IDX_GCHI] - k[8396]*y_cur[IDX_GCH2I] - - k[8397]*y_cur[IDX_GNI] - k[8398]*y_cur[IDX_GNOI] - - k[8399]*y_cur[IDX_GNOI] - k[8400]*y_cur[IDX_GNSI] - - k[8401]*y_cur[IDX_GOCNI] - k[8402]*y_cur[IDX_GCNOI] - - k[8403]*y_cur[IDX_GNHI] - k[8404]*y_cur[IDX_GNH2I] - - k[8405]*y_cur[IDX_GCH3I] - k[8406]*y_cur[IDX_GOI] - - k[8407]*y_cur[IDX_GO2I] - k[8408]*y_cur[IDX_GOHI] - - k[8409]*y_cur[IDX_GSOI] - k[8410]*y_cur[IDX_GC2I] - - k[8411]*y_cur[IDX_GC2HI] - k[8412]*y_cur[IDX_GCNI] - - k[8413]*y_cur[IDX_GC2H3I] - k[8414]*y_cur[IDX_GHSI] - - k[8415]*y_cur[IDX_GSI] - k[8416]*y_cur[IDX_GC3I] - - k[8417]*y_cur[IDX_GC3HI] - k[8418]*y_cur[IDX_GC2NI] - - k[8419]*y_cur[IDX_GC2OI] - k[8420]*y_cur[IDX_GC4I] - - k[8421]*y_cur[IDX_GC4HI] - k[8422]*y_cur[IDX_GC2SI] - - k[8423]*y_cur[IDX_GC5I] - k[8424]*y_cur[IDX_GC5HI] - - k[8425]*y_cur[IDX_GC6I] - k[8426]*y_cur[IDX_GC6HI] - - k[8427]*y_cur[IDX_GC7I] - k[8428]*y_cur[IDX_GC7HI] - - k[8429]*y_cur[IDX_GC8I] - k[8430]*y_cur[IDX_GC8HI] - - k[8431]*y_cur[IDX_GC9I] - k[8432]*y_cur[IDX_GC9HI] - - k[8433]*y_cur[IDX_GC10I] - k[8576]*y_cur[IDX_GHI] - - k[8653]*y_cur[IDX_GH2I] - k[8654]*y_cur[IDX_GCI] - - k[8654]*y_cur[IDX_GCI] - k[8654]*y_cur[IDX_GCI] - - k[8654]*y_cur[IDX_GCI] - k[8655]*y_cur[IDX_GCHI] - - k[8656]*y_cur[IDX_GCH2I] - k[8657]*y_cur[IDX_GNI] - - k[8658]*y_cur[IDX_GNOI] - k[8659]*y_cur[IDX_GNHI] - - k[8660]*y_cur[IDX_GCH3I] - k[8661]*y_cur[IDX_GOI] - - k[8662]*y_cur[IDX_GC2I] - k[8663]*y_cur[IDX_GC2HI] - - k[8664]*y_cur[IDX_GCNI] - k[8665]*y_cur[IDX_GC2H3I] - - k[8666]*y_cur[IDX_GSI] - k[8667]*y_cur[IDX_GC3I] - - k[8668]*y_cur[IDX_GC3HI] - k[8669]*y_cur[IDX_GC2NI] - - k[8670]*y_cur[IDX_GC2OI] - k[8671]*y_cur[IDX_GC4I] - - k[8672]*y_cur[IDX_GC4HI] - k[8673]*y_cur[IDX_GC2SI] - - k[8674]*y_cur[IDX_GC5I] - k[8675]*y_cur[IDX_GC5HI] - - k[8676]*y_cur[IDX_GC6I] - k[8677]*y_cur[IDX_GC6HI] - - k[8678]*y_cur[IDX_GC7I] - k[8679]*y_cur[IDX_GC7HI] - - k[8680]*y_cur[IDX_GC8I] - k[8681]*y_cur[IDX_GC8HI] - - k[8682]*y_cur[IDX_GC9I] - k[8683]*y_cur[IDX_GC9HI] - - k[8684]*y_cur[IDX_GC10I]; - data[jistart + 8889] = 0.0 + k[7875] + k[8229] + k[8231] + k[8233] + - k[8235] - k[8433]*y_cur[IDX_GCI] - k[8684]*y_cur[IDX_GCI]; - data[jistart + 8890] = 0.0 + k[8242]; - data[jistart + 8891] = 0.0 + k[7880]; - data[jistart + 8892] = 0.0 + k[7641] + k[7641] + k[7927] + k[7927] + - k[7928] + k[7928] - k[8410]*y_cur[IDX_GCI] - k[8662]*y_cur[IDX_GCI]; - data[jistart + 8893] = 0.0 + k[7644] + k[7931] - - k[8411]*y_cur[IDX_GCI] - k[8663]*y_cur[IDX_GCI]; - data[jistart + 8894] = 0.0 + k[7663] + k[7664] + k[7950] + k[7951] - - k[8413]*y_cur[IDX_GCI] - k[8665]*y_cur[IDX_GCI]; - data[jistart + 8895] = 0.0 + k[7674] + k[7961]; - data[jistart + 8896] = 0.0 + k[7718] + k[8025] - - k[8418]*y_cur[IDX_GCI] - k[8669]*y_cur[IDX_GCI]; - data[jistart + 8897] = 0.0 + k[7728] + k[8036] - - k[8419]*y_cur[IDX_GCI] - k[8670]*y_cur[IDX_GCI]; - data[jistart + 8898] = 0.0 + k[7815] - k[8422]*y_cur[IDX_GCI] - - k[8673]*y_cur[IDX_GCI]; - data[jistart + 8899] = 0.0 + k[7712] + k[8017] - - k[8416]*y_cur[IDX_GCI] - k[8667]*y_cur[IDX_GCI]; - data[jistart + 8900] = 0.0 - k[8417]*y_cur[IDX_GCI] - - k[8668]*y_cur[IDX_GCI]; - data[jistart + 8901] = 0.0 + k[7847]; - data[jistart + 8902] = 0.0 + k[7784] + k[8108] - - k[8420]*y_cur[IDX_GCI] - k[8671]*y_cur[IDX_GCI]; - data[jistart + 8903] = 0.0 - k[8421]*y_cur[IDX_GCI] - - k[8672]*y_cur[IDX_GCI]; - data[jistart + 8904] = 0.0 + k[7807] + k[8136]; - data[jistart + 8905] = 0.0 + k[7859]; - data[jistart + 8906] = 0.0 + k[7823] - k[8423]*y_cur[IDX_GCI] - - k[8674]*y_cur[IDX_GCI]; - data[jistart + 8907] = 0.0 - k[8424]*y_cur[IDX_GCI] - - k[8675]*y_cur[IDX_GCI]; - data[jistart + 8908] = 0.0 + k[7849] + k[8178] + k[8180] - - k[8425]*y_cur[IDX_GCI] - k[8676]*y_cur[IDX_GCI]; - data[jistart + 8909] = 0.0 - k[8426]*y_cur[IDX_GCI] - - k[8677]*y_cur[IDX_GCI]; - data[jistart + 8910] = 0.0 + k[7861] + k[8193] + k[8196] - - k[8427]*y_cur[IDX_GCI] - k[8678]*y_cur[IDX_GCI]; - data[jistart + 8911] = 0.0 + k[8198] - k[8428]*y_cur[IDX_GCI] - - k[8679]*y_cur[IDX_GCI]; - data[jistart + 8912] = 0.0 + k[7866] + k[8205] + k[8207] - - k[8429]*y_cur[IDX_GCI] - k[8680]*y_cur[IDX_GCI]; - data[jistart + 8913] = 0.0 + k[8209] - k[8430]*y_cur[IDX_GCI] - - k[8681]*y_cur[IDX_GCI]; - data[jistart + 8914] = 0.0 + k[7871] + k[8219] + k[8221] - - k[8431]*y_cur[IDX_GCI] - k[8682]*y_cur[IDX_GCI]; - data[jistart + 8915] = 0.0 + k[8223] - k[8432]*y_cur[IDX_GCI] - - k[8683]*y_cur[IDX_GCI]; - data[jistart + 8916] = 0.0 + k[7814] + k[8143]; - data[jistart + 8917] = 0.0 + k[7781] + k[8105]; - data[jistart + 8918] = 0.0 + k[7618] + k[7894] + k[7895] - - k[8395]*y_cur[IDX_GCI] - k[8655]*y_cur[IDX_GCI]; - data[jistart + 8919] = 0.0 + k[7620] + k[7621] + k[7897] + k[7898] - - k[8396]*y_cur[IDX_GCI] - k[8656]*y_cur[IDX_GCI]; - data[jistart + 8920] = 0.0 + k[7799] + k[7800] + k[8124] + k[8125]; - data[jistart + 8921] = 0.0 - k[8405]*y_cur[IDX_GCI] - - k[8660]*y_cur[IDX_GCI]; - data[jistart + 8922] = 0.0 + k[7649] + k[7936] - - k[8412]*y_cur[IDX_GCI] - k[8664]*y_cur[IDX_GCI]; - data[jistart + 8923] = 0.0 - k[8402]*y_cur[IDX_GCI]; - data[jistart + 8924] = 0.0 + k[7616] + k[7675] + k[7962]; - data[jistart + 8925] = 0.0 + k[7753] + k[8067]; - data[jistart + 8926] = 0.0 + k[7757] + k[7758] + k[8075] + k[8076]; - data[jistart + 8927] = 0.0 - k[8274]*y_cur[IDX_GCI] - - k[8576]*y_cur[IDX_GCI]; - data[jistart + 8928] = 0.0 - k[8369]*y_cur[IDX_GCI] - - k[8653]*y_cur[IDX_GCI]; - data[jistart + 8929] = 0.0 - k[8414]*y_cur[IDX_GCI]; - data[jistart + 8930] = 0.0 - k[8397]*y_cur[IDX_GCI] - - k[8657]*y_cur[IDX_GCI]; - data[jistart + 8931] = 0.0 - k[8403]*y_cur[IDX_GCI] - - k[8659]*y_cur[IDX_GCI]; - data[jistart + 8932] = 0.0 - k[8404]*y_cur[IDX_GCI]; - data[jistart + 8933] = 0.0 - k[8398]*y_cur[IDX_GCI] - - k[8399]*y_cur[IDX_GCI] - k[8658]*y_cur[IDX_GCI]; - data[jistart + 8934] = 0.0 - k[8400]*y_cur[IDX_GCI]; - data[jistart + 8935] = 0.0 - k[8406]*y_cur[IDX_GCI] - - k[8661]*y_cur[IDX_GCI]; - data[jistart + 8936] = 0.0 - k[8407]*y_cur[IDX_GCI]; - data[jistart + 8937] = 0.0 - k[8401]*y_cur[IDX_GCI]; - data[jistart + 8938] = 0.0 + k[7828] + k[8152]; - data[jistart + 8939] = 0.0 - k[8408]*y_cur[IDX_GCI]; - data[jistart + 8940] = 0.0 - k[8415]*y_cur[IDX_GCI] - - k[8666]*y_cur[IDX_GCI]; - data[jistart + 8941] = 0.0 - k[8409]*y_cur[IDX_GCI]; - data[jistart + 8942] = 0.0 + k[7734] + k[8043]; - data[jistart + 8943] = 0.0 + k[7802]; - data[jistart + 8944] = 0.0 + k[7842] + k[8169]; - data[jistart + 8945] = 0.0 + k[8134]; - data[jistart + 8946] = 0.0 + k[7064]; - data[jistart + 8947] = 0.0 + k[8431]*y_cur[IDX_GC9I] - - k[8433]*y_cur[IDX_GC10I] - k[8684]*y_cur[IDX_GC10I]; - data[jistart + 8948] = 0.0 - k[7246] - k[7428] - k[7610] - k[7875] - - k[8229] - k[8230] - k[8231] - k[8232] - k[8233] - k[8234] - k[8235] - - k[8362]*y_cur[IDX_GHI] - k[8392]*y_cur[IDX_GH2I] - - k[8433]*y_cur[IDX_GCI] - k[8648]*y_cur[IDX_GHI] - - k[8684]*y_cur[IDX_GCI]; - data[jistart + 8949] = 0.0 + k[7876] + k[8236] + k[8243]; - data[jistart + 8950] = 0.0 + k[8248]; - data[jistart + 8951] = 0.0 + k[7880]; - data[jistart + 8952] = 0.0 + k[8431]*y_cur[IDX_GCI]; - data[jistart + 8953] = 0.0 - k[8362]*y_cur[IDX_GC10I] - - k[8648]*y_cur[IDX_GC10I]; - data[jistart + 8954] = 0.0 - k[8392]*y_cur[IDX_GC10I]; - data[jistart + 8955] = 0.0 + k[7065]; - data[jistart + 8956] = 0.0 + k[8432]*y_cur[IDX_GC9HI]; - data[jistart + 8957] = 0.0 + k[8362]*y_cur[IDX_GHI] + - k[8392]*y_cur[IDX_GH2I]; - data[jistart + 8958] = 0.0 - k[7247] - k[7429] - k[7611] - k[7876] - - k[8236] - k[8237] - k[8238] - k[8239] - k[8240] - k[8241] - k[8242] - - k[8243] - k[8244] - k[8245] - k[8363]*y_cur[IDX_GHI] - - k[8393]*y_cur[IDX_GH2I] - k[8649]*y_cur[IDX_GHI]; - data[jistart + 8959] = 0.0 + k[7878] + k[8249] + k[8251]; - data[jistart + 8960] = 0.0 + k[8432]*y_cur[IDX_GCI]; - data[jistart + 8961] = 0.0 + k[8362]*y_cur[IDX_GC10I] - - k[8363]*y_cur[IDX_GC10HI] - k[8649]*y_cur[IDX_GC10HI]; - data[jistart + 8962] = 0.0 + k[8392]*y_cur[IDX_GC10I] - - k[8393]*y_cur[IDX_GC10HI]; - data[jistart + 8963] = 0.0 + k[7067]; - data[jistart + 8964] = 0.0 + k[8363]*y_cur[IDX_GHI] + - k[8393]*y_cur[IDX_GH2I]; - data[jistart + 8965] = 0.0 - k[7249] - k[7431] - k[7613] - k[7878] - - k[8248] - k[8249] - k[8250] - k[8251]; - data[jistart + 8966] = 0.0 + k[8503]*y_cur[IDX_GCHI]; - data[jistart + 8967] = 0.0 + k[8503]*y_cur[IDX_GC9HI]; - data[jistart + 8968] = 0.0 + k[8363]*y_cur[IDX_GC10HI]; - data[jistart + 8969] = 0.0 + k[8393]*y_cur[IDX_GC10HI]; - data[jistart + 8970] = 0.0 + k[7069]; - data[jistart + 8971] = 0.0 + k[8433]*y_cur[IDX_GC10I]; - data[jistart + 8972] = 0.0 + k[8433]*y_cur[IDX_GCI]; - data[jistart + 8973] = 0.0 - k[7251] - k[7433] - k[7615] - k[7880] - - k[8255] - k[8256] - k[8257] - k[8258] - k[8259] - k[8260] - k[8261] - - k[8262] - k[8263]; - data[jistart + 8974] = 0.0 + k[6907]; - data[jistart + 8975] = 0.0 + k[8394]*y_cur[IDX_GCI] + - k[8394]*y_cur[IDX_GCI] - k[8410]*y_cur[IDX_GC2I] - - k[8662]*y_cur[IDX_GC2I]; - data[jistart + 8976] = 0.0 + k[8231] + k[8232] + k[8234]; - data[jistart + 8977] = 0.0 + k[8241]; - data[jistart + 8978] = 0.0 + k[8259] + k[8263]; - data[jistart + 8979] = 0.0 - k[7089] - k[7271] - k[7453] - k[7641] - - k[7927] - k[7928] - k[8285]*y_cur[IDX_GHI] - k[8374]*y_cur[IDX_GH2I] - - k[8410]*y_cur[IDX_GCI] - k[8445]*y_cur[IDX_GOI] - - k[8462]*y_cur[IDX_GNI] - k[8486]*y_cur[IDX_GCHI] - - k[8586]*y_cur[IDX_GHI] - k[8662]*y_cur[IDX_GCI] - - k[8691]*y_cur[IDX_GOI] - k[8703]*y_cur[IDX_GNI] - - k[8719]*y_cur[IDX_GCHI]; - data[jistart + 8980] = 0.0 + k[7642] + k[7643] + k[7929] + k[7930]; - data[jistart + 8981] = 0.0 + k[7646] + k[7933]; - data[jistart + 8982] = 0.0 + k[7653] + k[7654] + k[7940] + k[7941]; - data[jistart + 8983] = 0.0 + k[7717] + k[8024]; - data[jistart + 8984] = 0.0 + k[7727] + k[8035]; - data[jistart + 8985] = 0.0 + k[7816] + k[8144]; - data[jistart + 8986] = 0.0 + k[7712] + k[8017]; - data[jistart + 8987] = 0.0 + k[7790] + k[8114]; - data[jistart + 8988] = 0.0 + k[7803] + k[8130]; - data[jistart + 8989] = 0.0 + k[8176]; - data[jistart + 8990] = 0.0 + k[7848] + k[8177]; - data[jistart + 8991] = 0.0 + k[7783] + k[7783] + k[8107] + k[8107]; - data[jistart + 8992] = 0.0 + k[7788] + k[8112]; - data[jistart + 8993] = 0.0 + k[7822] + k[8149]; - data[jistart + 8994] = 0.0 + k[7834] + k[8158]; - data[jistart + 8995] = 0.0 + k[8179]; - data[jistart + 8996] = 0.0 + k[8195]; - data[jistart + 8997] = 0.0 + k[8212]; - data[jistart + 8998] = 0.0 + k[8206]; - data[jistart + 8999] = 0.0 + k[8220]; - data[jistart + 9000] = 0.0 + k[8247]; - data[jistart + 9001] = 0.0 + k[7813] + k[8142]; - data[jistart + 9002] = 0.0 - k[8486]*y_cur[IDX_GC2I] - - k[8719]*y_cur[IDX_GC2I]; - data[jistart + 9003] = 0.0 + k[7743] + k[8054]; - data[jistart + 9004] = 0.0 - k[8285]*y_cur[IDX_GC2I] - - k[8586]*y_cur[IDX_GC2I]; - data[jistart + 9005] = 0.0 - k[8374]*y_cur[IDX_GC2I]; - data[jistart + 9006] = 0.0 - k[8462]*y_cur[IDX_GC2I] - - k[8703]*y_cur[IDX_GC2I]; - data[jistart + 9007] = 0.0 - k[8445]*y_cur[IDX_GC2I] - - k[8691]*y_cur[IDX_GC2I]; - data[jistart + 9008] = 0.0 + k[8129]; - data[jistart + 9009] = 0.0 + k[8168]; - data[jistart + 9010] = 0.0 + k[7857]; - data[jistart + 9011] = 0.0 + k[6908]; - data[jistart + 9012] = 0.0 + k[8395]*y_cur[IDX_GCHI] - - k[8411]*y_cur[IDX_GC2HI] - k[8663]*y_cur[IDX_GC2HI]; - data[jistart + 9013] = 0.0 + k[8285]*y_cur[IDX_GHI] + - k[8374]*y_cur[IDX_GH2I]; - data[jistart + 9014] = 0.0 - k[7090] - k[7272] - k[7454] - k[7642] - - k[7643] - k[7644] - k[7929] - k[7930] - k[7931] - - k[8286]*y_cur[IDX_GHI] - k[8375]*y_cur[IDX_GH2I] - - k[8411]*y_cur[IDX_GCI] - k[8487]*y_cur[IDX_GCHI] - - k[8575]*y_cur[IDX_GCH4I] - k[8587]*y_cur[IDX_GHI] - - k[8663]*y_cur[IDX_GCI] - k[8720]*y_cur[IDX_GCHI]; - data[jistart + 9015] = 0.0 + k[7645] + k[7647] + k[7932] + k[7934]; - data[jistart + 9016] = 0.0 + k[7657] + k[7658] + k[7659] + k[7660] + - k[7944] + k[7945] + k[7946] + k[7947]; - data[jistart + 9017] = 0.0 + k[7671] + k[7958]; - data[jistart + 9018] = 0.0 + k[7788] + k[8112]; - data[jistart + 9019] = 0.0 + k[7791] + k[7791] + k[7793] + k[7793] + - k[8115] + k[8115] + k[8117] + k[8117]; - data[jistart + 9020] = 0.0 + k[7833] + k[8157]; - data[jistart + 9021] = 0.0 + k[7837] + k[8162]; - data[jistart + 9022] = 0.0 + k[7851] + k[8182]; - data[jistart + 9023] = 0.0 + k[7853]; - data[jistart + 9024] = 0.0 + k[8395]*y_cur[IDX_GCI] - - k[8487]*y_cur[IDX_GC2HI] - k[8720]*y_cur[IDX_GC2HI]; - data[jistart + 9025] = 0.0 + k[7724] + k[8032]; - data[jistart + 9026] = 0.0 + k[7732] + k[8041]; - data[jistart + 9027] = 0.0 - k[8575]*y_cur[IDX_GC2HI]; - data[jistart + 9028] = 0.0 + k[8285]*y_cur[IDX_GC2I] - - k[8286]*y_cur[IDX_GC2HI] - k[8587]*y_cur[IDX_GC2HI]; - data[jistart + 9029] = 0.0 + k[8374]*y_cur[IDX_GC2I] - - k[8375]*y_cur[IDX_GC2HI]; - data[jistart + 9030] = 0.0 + k[7798] + k[8123]; - data[jistart + 9031] = 0.0 + k[7797]; - data[jistart + 9032] = 0.0 + k[6910]; - data[jistart + 9033] = 0.0 + k[8396]*y_cur[IDX_GCH2I]; - data[jistart + 9034] = 0.0 + k[8286]*y_cur[IDX_GHI] + - k[8375]*y_cur[IDX_GH2I] + k[8575]*y_cur[IDX_GCH4I]; - data[jistart + 9035] = 0.0 - k[7092] - k[7274] - k[7456] - k[7645] - - k[7646] - k[7647] - k[7648] - k[7932] - k[7933] - k[7934] - k[7935] - - k[8287]*y_cur[IDX_GHI] - k[8588]*y_cur[IDX_GHI]; - data[jistart + 9036] = 0.0 + k[7652] + k[7655] + k[7656] + k[7939] + - k[7942] + k[7943]; - data[jistart + 9037] = 0.0 + k[7667] + k[7668] + k[7669] + k[7954] + - k[7955] + k[7956]; - data[jistart + 9038] = 0.0 + k[7677] + k[7678] + k[7964] + k[7965]; - data[jistart + 9039] = 0.0 + k[7810] + k[8139]; - data[jistart + 9040] = 0.0 + k[8190]; - data[jistart + 9041] = 0.0 + k[8478]*y_cur[IDX_GCHI] + - k[8478]*y_cur[IDX_GCHI]; - data[jistart + 9042] = 0.0 + k[8396]*y_cur[IDX_GCI]; - data[jistart + 9043] = 0.0 + k[7744] + k[8055]; - data[jistart + 9044] = 0.0 + k[8575]*y_cur[IDX_GC2HI]; - data[jistart + 9045] = 0.0 + k[8286]*y_cur[IDX_GC2HI] - - k[8287]*y_cur[IDX_GC2H2I] - k[8588]*y_cur[IDX_GC2H2I]; - data[jistart + 9046] = 0.0 + k[8375]*y_cur[IDX_GC2HI]; - data[jistart + 9047] = 0.0 + k[6912]; - data[jistart + 9048] = 0.0 + k[8405]*y_cur[IDX_GCH3I] - - k[8413]*y_cur[IDX_GC2H3I] - k[8665]*y_cur[IDX_GC2H3I]; - data[jistart + 9049] = 0.0 + k[8287]*y_cur[IDX_GHI]; - data[jistart + 9050] = 0.0 - k[7094] - k[7276] - k[7458] - k[7652] - - k[7653] - k[7654] - k[7655] - k[7656] - k[7657] - k[7658] - k[7659] - - k[7660] - k[7661] - k[7662] - k[7663] - k[7664] - k[7939] - - k[7940] - k[7941] - k[7942] - k[7943] - k[7944] - k[7945] - k[7946] - - k[7947] - k[7948] - k[7949] - k[7950] - k[7951] - - k[8288]*y_cur[IDX_GHI] - k[8413]*y_cur[IDX_GCI] - - k[8489]*y_cur[IDX_GCHI] - k[8490]*y_cur[IDX_GCHI] - - k[8589]*y_cur[IDX_GHI] - k[8665]*y_cur[IDX_GCI] - - k[8722]*y_cur[IDX_GCHI] - k[8723]*y_cur[IDX_GCHI]; - data[jistart + 9051] = 0.0 + k[7670] + k[7957]; - data[jistart + 9052] = 0.0 + k[7676] + k[7679] + k[7963] + k[7966]; - data[jistart + 9053] = 0.0 + k[7811] + k[8140]; - data[jistart + 9054] = 0.0 + k[8482]*y_cur[IDX_GCH2I] - - k[8489]*y_cur[IDX_GC2H3I] - k[8490]*y_cur[IDX_GC2H3I] - - k[8722]*y_cur[IDX_GC2H3I] - k[8723]*y_cur[IDX_GC2H3I]; - data[jistart + 9055] = 0.0 + k[8482]*y_cur[IDX_GCHI]; - data[jistart + 9056] = 0.0 + k[7722] + k[8030]; - data[jistart + 9057] = 0.0 + k[7804] + k[8131]; - data[jistart + 9058] = 0.0 + k[8405]*y_cur[IDX_GCI]; - data[jistart + 9059] = 0.0 + k[7730] + k[8039]; - data[jistart + 9060] = 0.0 + k[8287]*y_cur[IDX_GC2H2I] - - k[8288]*y_cur[IDX_GC2H3I] - k[8589]*y_cur[IDX_GC2H3I]; - data[jistart + 9061] = 0.0 + k[6917]; - data[jistart + 9062] = 0.0 + k[8288]*y_cur[IDX_GHI]; - data[jistart + 9063] = 0.0 - k[7099] - k[7281] - k[7463] - k[7667] - - k[7668] - k[7669] - k[7670] - k[7671] - k[7672] - k[7673] - k[7674] - - k[7954] - k[7955] - k[7956] - k[7957] - k[7958] - k[7959] - - k[7960] - k[7961] - k[8289]*y_cur[IDX_GHI] - k[8590]*y_cur[IDX_GHI]; - data[jistart + 9064] = 0.0 + k[7885]; - data[jistart + 9065] = 0.0 + k[7680] + k[7967]; - data[jistart + 9066] = 0.0 + k[7687] + k[7688] + k[7977] + k[7978]; - data[jistart + 9067] = 0.0 + k[8484]*y_cur[IDX_GCH3I]; - data[jistart + 9068] = 0.0 + k[8531]*y_cur[IDX_GCH2I] + - k[8531]*y_cur[IDX_GCH2I]; - data[jistart + 9069] = 0.0 + k[8484]*y_cur[IDX_GCHI]; - data[jistart + 9070] = 0.0 + k[7740] + k[8051]; - data[jistart + 9071] = 0.0 + k[8288]*y_cur[IDX_GC2H3I] - - k[8289]*y_cur[IDX_GC2H4I] - k[8590]*y_cur[IDX_GC2H4I]; - data[jistart + 9072] = 0.0 + k[7011]; - data[jistart + 9073] = 0.0 - k[7193] - k[7375] - k[7557] - k[7885] - - k[8345]*y_cur[IDX_GHI] - k[8635]*y_cur[IDX_GHI]; - data[jistart + 9074] = 0.0 + k[8344]*y_cur[IDX_GHI]; - data[jistart + 9075] = 0.0 + k[8344]*y_cur[IDX_GCH2CHCNI] - - k[8345]*y_cur[IDX_GC2H4CNI] - k[8635]*y_cur[IDX_GC2H4CNI]; - data[jistart + 9076] = 0.0 + k[6922]; - data[jistart + 9077] = 0.0 + k[8289]*y_cur[IDX_GHI]; - data[jistart + 9078] = 0.0 - k[7104] - k[7286] - k[7468] - k[7676] - - k[7677] - k[7678] - k[7679] - k[7680] - k[7681] - k[7963] - k[7964] - - k[7965] - k[7966] - k[7967] - k[7968] - k[8290]*y_cur[IDX_GHI] - - k[8591]*y_cur[IDX_GHI]; - data[jistart + 9079] = 0.0 + k[7809] + k[8138]; - data[jistart + 9080] = 0.0 + k[7772] + k[7773] + k[8092] + k[8093]; - data[jistart + 9081] = 0.0 + k[7689] + k[7979] + - k[8291]*y_cur[IDX_GHI]; - data[jistart + 9082] = 0.0 + k[8532]*y_cur[IDX_GCH3I]; - data[jistart + 9083] = 0.0 + k[8532]*y_cur[IDX_GCH2I]; - data[jistart + 9084] = 0.0 + k[8289]*y_cur[IDX_GC2H4I] - - k[8290]*y_cur[IDX_GC2H5I] + k[8291]*y_cur[IDX_GC2H6I] - - k[8591]*y_cur[IDX_GC2H5I]; - data[jistart + 9085] = 0.0 + k[7013]; - data[jistart + 9086] = 0.0 + k[8345]*y_cur[IDX_GHI]; - data[jistart + 9087] = 0.0 - k[7195] - k[7377] - k[7561] - k[7809] - - k[7810] - k[7811] - k[7812] - k[8138] - k[8139] - k[8140] - k[8141]; - data[jistart + 9088] = 0.0 + k[8345]*y_cur[IDX_GC2H4CNI]; - data[jistart + 9089] = 0.0 + k[6987]; - data[jistart + 9090] = 0.0 - k[7169] - k[7351] - k[7533] - k[7772] - - k[7773] - k[7774] - k[8092] - k[8093] - k[8094]; - data[jistart + 9091] = 0.0 + k[8546]*y_cur[IDX_GCH3I] + - k[8571]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9092] = 0.0 + k[8557]*y_cur[IDX_GCH3I]; - data[jistart + 9093] = 0.0 + k[8546]*y_cur[IDX_GCH2OHI] + - k[8557]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9094] = 0.0 + k[8571]*y_cur[IDX_GCH2OHI]; - data[jistart + 9095] = 0.0 + k[6923]; - data[jistart + 9096] = 0.0 + k[8290]*y_cur[IDX_GHI]; - data[jistart + 9097] = 0.0 - k[7105] - k[7287] - k[7469] - k[7687] - - k[7688] - k[7689] - k[7977] - k[7978] - k[7979] - - k[8291]*y_cur[IDX_GHI]; - data[jistart + 9098] = 0.0 + k[8542]*y_cur[IDX_GCH3I] + - k[8542]*y_cur[IDX_GCH3I] + k[8548]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9099] = 0.0 + k[8548]*y_cur[IDX_GCH3I]; - data[jistart + 9100] = 0.0 + k[8290]*y_cur[IDX_GC2H5I] - - k[8291]*y_cur[IDX_GC2H6I]; - data[jistart + 9101] = 0.0 + k[6947]; - data[jistart + 9102] = 0.0 + k[8412]*y_cur[IDX_GCNI] - - k[8418]*y_cur[IDX_GC2NI] - k[8669]*y_cur[IDX_GC2NI]; - data[jistart + 9103] = 0.0 + k[8462]*y_cur[IDX_GNI]; - data[jistart + 9104] = 0.0 - k[7129] - k[7311] - k[7493] - k[7717] - - k[7718] - k[8024] - k[8025] - k[8321]*y_cur[IDX_GHI] - - k[8418]*y_cur[IDX_GCI] - k[8616]*y_cur[IDX_GHI] - - k[8669]*y_cur[IDX_GCI]; - data[jistart + 9105] = 0.0 + k[8412]*y_cur[IDX_GCI]; - data[jistart + 9106] = 0.0 - k[8321]*y_cur[IDX_GC2NI] - - k[8616]*y_cur[IDX_GC2NI]; - data[jistart + 9107] = 0.0 + k[7886]; - data[jistart + 9108] = 0.0 + k[8462]*y_cur[IDX_GC2I]; - data[jistart + 9109] = 0.0 + k[8127]; - data[jistart + 9110] = 0.0 + k[6954]; - data[jistart + 9111] = 0.0 - k[8419]*y_cur[IDX_GC2OI] - - k[8670]*y_cur[IDX_GC2OI]; - data[jistart + 9112] = 0.0 + k[8445]*y_cur[IDX_GOI]; - data[jistart + 9113] = 0.0 - k[7136] - k[7318] - k[7500] - k[7727] - - k[7728] - k[8035] - k[8036] - k[8324]*y_cur[IDX_GHI] - - k[8419]*y_cur[IDX_GCI] - k[8619]*y_cur[IDX_GHI] - - k[8670]*y_cur[IDX_GCI]; - data[jistart + 9114] = 0.0 - k[8324]*y_cur[IDX_GC2OI] - - k[8619]*y_cur[IDX_GC2OI]; - data[jistart + 9115] = 0.0 + k[8445]*y_cur[IDX_GC2I]; - data[jistart + 9116] = 0.0 + k[7015]; - data[jistart + 9117] = 0.0 - k[8422]*y_cur[IDX_GC2SI] - - k[8673]*y_cur[IDX_GC2SI]; - data[jistart + 9118] = 0.0 - k[7197] - k[7379] - k[7563] - k[7815] - - k[7816] - k[8144] - k[8422]*y_cur[IDX_GCI] - k[8673]*y_cur[IDX_GCI]; - data[jistart + 9119] = 0.0 + k[6943]; - data[jistart + 9120] = 0.0 + k[8410]*y_cur[IDX_GC2I] - - k[8416]*y_cur[IDX_GC3I] - k[8667]*y_cur[IDX_GC3I]; - data[jistart + 9121] = 0.0 + k[8229]; - data[jistart + 9122] = 0.0 + k[8239] + k[8240] + k[8245]; - data[jistart + 9123] = 0.0 + k[8250]; - data[jistart + 9124] = 0.0 + k[8255] + k[8255] + k[8258] + k[8262]; - data[jistart + 9125] = 0.0 + k[8410]*y_cur[IDX_GCI]; - data[jistart + 9126] = 0.0 - k[7125] - k[7307] - k[7489] - k[7712] - - k[8017] - k[8315]*y_cur[IDX_GHI] - k[8377]*y_cur[IDX_GH2I] - - k[8416]*y_cur[IDX_GCI] - k[8451]*y_cur[IDX_GOI] - - k[8465]*y_cur[IDX_GNI] - k[8491]*y_cur[IDX_GCHI] - - k[8610]*y_cur[IDX_GHI] - k[8667]*y_cur[IDX_GCI] - - k[8695]*y_cur[IDX_GOI] - k[8705]*y_cur[IDX_GNI] - - k[8724]*y_cur[IDX_GCHI]; - data[jistart + 9127] = 0.0 + k[7714] + k[8020]; - data[jistart + 9128] = 0.0 + k[7784] + k[8108]; - data[jistart + 9129] = 0.0 + k[7836] + k[8160]; - data[jistart + 9130] = 0.0 + k[8191]; - data[jistart + 9131] = 0.0 + k[7860] + k[8192]; - data[jistart + 9132] = 0.0 + k[7822] + k[8149]; - data[jistart + 9133] = 0.0 + k[7833] + k[8157]; - data[jistart + 9134] = 0.0 + k[7850] + k[8181]; - data[jistart + 9135] = 0.0 + k[8194]; - data[jistart + 9136] = 0.0 - k[8491]*y_cur[IDX_GC3I] - - k[8724]*y_cur[IDX_GC3I]; - data[jistart + 9137] = 0.0 - k[8315]*y_cur[IDX_GC3I] - - k[8610]*y_cur[IDX_GC3I]; - data[jistart + 9138] = 0.0 - k[8377]*y_cur[IDX_GC3I]; - data[jistart + 9139] = 0.0 + k[8022]; - data[jistart + 9140] = 0.0 - k[8465]*y_cur[IDX_GC3I] - - k[8705]*y_cur[IDX_GC3I]; - data[jistart + 9141] = 0.0 - k[8451]*y_cur[IDX_GC3I] - - k[8695]*y_cur[IDX_GC3I]; - data[jistart + 9142] = 0.0 + k[6945]; - data[jistart + 9143] = 0.0 + k[8411]*y_cur[IDX_GC2HI] - - k[8417]*y_cur[IDX_GC3HI] - k[8668]*y_cur[IDX_GC3HI]; - data[jistart + 9144] = 0.0 + k[8486]*y_cur[IDX_GCHI]; - data[jistart + 9145] = 0.0 + k[8411]*y_cur[IDX_GCI]; - data[jistart + 9146] = 0.0 + k[8315]*y_cur[IDX_GHI] + - k[8377]*y_cur[IDX_GH2I]; - data[jistart + 9147] = 0.0 - k[7127] - k[7309] - k[7491] - k[7714] - - k[8020] - k[8316]*y_cur[IDX_GHI] - k[8378]*y_cur[IDX_GH2I] - - k[8379]*y_cur[IDX_GH2I] - k[8417]*y_cur[IDX_GCI] - - k[8466]*y_cur[IDX_GNI] - k[8492]*y_cur[IDX_GCHI] - - k[8611]*y_cur[IDX_GHI] - k[8668]*y_cur[IDX_GCI] - - k[8706]*y_cur[IDX_GNI] - k[8725]*y_cur[IDX_GCHI]; - data[jistart + 9148] = 0.0 + k[7715] + k[8021]; - data[jistart + 9149] = 0.0 + k[7834] + k[8158]; - data[jistart + 9150] = 0.0 + k[7837] + k[8162]; - data[jistart + 9151] = 0.0 + k[7850] + k[8181]; - data[jistart + 9152] = 0.0 + k[8486]*y_cur[IDX_GC2I] - - k[8492]*y_cur[IDX_GC3HI] - k[8725]*y_cur[IDX_GC3HI]; - data[jistart + 9153] = 0.0 + k[7720] + k[8027]; - data[jistart + 9154] = 0.0 + k[8315]*y_cur[IDX_GC3I] - - k[8316]*y_cur[IDX_GC3HI] - k[8611]*y_cur[IDX_GC3HI]; - data[jistart + 9155] = 0.0 + k[8377]*y_cur[IDX_GC3I] - - k[8378]*y_cur[IDX_GC3HI] - k[8379]*y_cur[IDX_GC3HI]; - data[jistart + 9156] = 0.0 + k[7716] + k[8023]; - data[jistart + 9157] = 0.0 - k[8466]*y_cur[IDX_GC3HI] - - k[8706]*y_cur[IDX_GC3HI]; - data[jistart + 9158] = 0.0 + k[6948]; - data[jistart + 9159] = 0.0 + k[8487]*y_cur[IDX_GCHI]; - data[jistart + 9160] = 0.0 + k[8316]*y_cur[IDX_GHI] + - k[8379]*y_cur[IDX_GH2I]; - data[jistart + 9161] = 0.0 - k[7130] - k[7312] - k[7494] - k[7715] - - k[8021] - k[8317]*y_cur[IDX_GHI] - k[8612]*y_cur[IDX_GHI]; - data[jistart + 9162] = 0.0 + k[8487]*y_cur[IDX_GC2HI]; - data[jistart + 9163] = 0.0 + k[7719] + k[8026]; - data[jistart + 9164] = 0.0 + k[8316]*y_cur[IDX_GC3HI] - - k[8317]*y_cur[IDX_GC3H2I] - k[8612]*y_cur[IDX_GC3H2I]; - data[jistart + 9165] = 0.0 + k[8379]*y_cur[IDX_GC3HI]; - data[jistart + 9166] = 0.0 + k[6997]; - data[jistart + 9167] = 0.0 + k[8418]*y_cur[IDX_GC2NI]; - data[jistart + 9168] = 0.0 + k[8418]*y_cur[IDX_GCI]; - data[jistart + 9169] = 0.0 + k[8465]*y_cur[IDX_GNI]; - data[jistart + 9170] = 0.0 - k[7179] - k[7361] - k[7543] - k[7790] - - k[8114] - k[8343]*y_cur[IDX_GHI] - k[8552]*y_cur[IDX_GCH3I] - - k[8633]*y_cur[IDX_GHI] - k[8756]*y_cur[IDX_GCH3I]; - data[jistart + 9171] = 0.0 - k[8552]*y_cur[IDX_GC3NI] - - k[8756]*y_cur[IDX_GC3NI]; - data[jistart + 9172] = 0.0 + k[7844] + k[8171]; - data[jistart + 9173] = 0.0 - k[8343]*y_cur[IDX_GC3NI] - - k[8633]*y_cur[IDX_GC3NI]; - data[jistart + 9174] = 0.0 + k[8122]; - data[jistart + 9175] = 0.0 + k[8465]*y_cur[IDX_GC3I]; - data[jistart + 9176] = 0.0 + k[7006]; - data[jistart + 9177] = 0.0 + k[8419]*y_cur[IDX_GC2OI]; - data[jistart + 9178] = 0.0 + k[8419]*y_cur[IDX_GCI]; - data[jistart + 9179] = 0.0 + k[8451]*y_cur[IDX_GOI]; - data[jistart + 9180] = 0.0 - k[7188] - k[7370] - k[7552] - k[7803] - - k[8130]; - data[jistart + 9181] = 0.0 + k[8451]*y_cur[IDX_GC3I]; - data[jistart + 9182] = 0.0 + k[7039]; - data[jistart + 9183] = 0.0 - k[7221] - k[7403] - k[7585] - k[7847] - - k[8176]; - data[jistart + 9184] = 0.0 + k[7859]; - data[jistart + 9185] = 0.0 + k[7040]; - data[jistart + 9186] = 0.0 + k[8422]*y_cur[IDX_GC2SI]; - data[jistart + 9187] = 0.0 + k[8422]*y_cur[IDX_GCI]; - data[jistart + 9188] = 0.0 - k[7222] - k[7404] - k[7586] - k[7848] - - k[8177]; - data[jistart + 9189] = 0.0 + k[6995]; - data[jistart + 9190] = 0.0 + k[8416]*y_cur[IDX_GC3I] - - k[8420]*y_cur[IDX_GC4I] - k[8671]*y_cur[IDX_GC4I]; - data[jistart + 9191] = 0.0 + k[8230]; - data[jistart + 9192] = 0.0 + k[8257] + k[8261]; - data[jistart + 9193] = 0.0 + k[8416]*y_cur[IDX_GCI]; - data[jistart + 9194] = 0.0 - k[7177] - k[7359] - k[7541] - k[7783] - - k[7784] - k[8107] - k[8108] - k[8339]*y_cur[IDX_GHI] - - k[8380]*y_cur[IDX_GH2I] - k[8420]*y_cur[IDX_GCI] - - k[8493]*y_cur[IDX_GCHI] - k[8629]*y_cur[IDX_GHI] - - k[8671]*y_cur[IDX_GCI] - k[8726]*y_cur[IDX_GCHI]; - data[jistart + 9195] = 0.0 + k[7789] + k[8113]; - data[jistart + 9196] = 0.0 + k[8161]; - data[jistart + 9197] = 0.0 + k[7823]; - data[jistart + 9198] = 0.0 + k[7854] + k[8186]; - data[jistart + 9199] = 0.0 + k[8179]; - data[jistart + 9200] = 0.0 + k[7851] + k[8182]; - data[jistart + 9201] = 0.0 + k[8194]; - data[jistart + 9202] = 0.0 - k[8493]*y_cur[IDX_GC4I] - - k[8726]*y_cur[IDX_GC4I]; - data[jistart + 9203] = 0.0 - k[8339]*y_cur[IDX_GC4I] - - k[8629]*y_cur[IDX_GC4I]; - data[jistart + 9204] = 0.0 - k[8380]*y_cur[IDX_GC4I]; - data[jistart + 9205] = 0.0 + k[8189]; - data[jistart + 9206] = 0.0 + k[6996]; - data[jistart + 9207] = 0.0 + k[8417]*y_cur[IDX_GC3HI] - - k[8421]*y_cur[IDX_GC4HI] - k[8672]*y_cur[IDX_GC4HI]; - data[jistart + 9208] = 0.0 + k[8491]*y_cur[IDX_GCHI]; - data[jistart + 9209] = 0.0 + k[8417]*y_cur[IDX_GCI]; - data[jistart + 9210] = 0.0 + k[8339]*y_cur[IDX_GHI] + - k[8380]*y_cur[IDX_GH2I]; - data[jistart + 9211] = 0.0 - k[7178] - k[7360] - k[7542] - k[7788] - - k[7789] - k[8112] - k[8113] - k[8340]*y_cur[IDX_GHI] - - k[8381]*y_cur[IDX_GH2I] - k[8421]*y_cur[IDX_GCI] - - k[8494]*y_cur[IDX_GCHI] - k[8630]*y_cur[IDX_GHI] - - k[8672]*y_cur[IDX_GCI] - k[8727]*y_cur[IDX_GCHI]; - data[jistart + 9212] = 0.0 + k[7792] + k[7794] + k[8116] + k[8118]; - data[jistart + 9213] = 0.0 + k[7795] + k[8119]; - data[jistart + 9214] = 0.0 + k[7853]; - data[jistart + 9215] = 0.0 + k[8491]*y_cur[IDX_GC3I] - - k[8494]*y_cur[IDX_GC4HI] - k[8727]*y_cur[IDX_GC4HI]; - data[jistart + 9216] = 0.0 + k[7841] + k[8167]; - data[jistart + 9217] = 0.0 + k[8339]*y_cur[IDX_GC4I] - - k[8340]*y_cur[IDX_GC4HI] - k[8630]*y_cur[IDX_GC4HI]; - data[jistart + 9218] = 0.0 + k[8380]*y_cur[IDX_GC4I] - - k[8381]*y_cur[IDX_GC4HI]; - data[jistart + 9219] = 0.0 + k[7855] + k[8187]; - data[jistart + 9220] = 0.0 + k[6998]; - data[jistart + 9221] = 0.0 + k[8492]*y_cur[IDX_GCHI]; - data[jistart + 9222] = 0.0 + k[8340]*y_cur[IDX_GHI] + - k[8381]*y_cur[IDX_GH2I]; - data[jistart + 9223] = 0.0 - k[7180] - k[7362] - k[7544] - k[7791] - - k[7792] - k[7793] - k[7794] - k[8115] - k[8116] - k[8117] - k[8118] - - k[8341]*y_cur[IDX_GHI] - k[8631]*y_cur[IDX_GHI]; - data[jistart + 9224] = 0.0 + k[8120]; - data[jistart + 9225] = 0.0 + k[8492]*y_cur[IDX_GC3HI]; - data[jistart + 9226] = 0.0 + k[8340]*y_cur[IDX_GC4HI] - - k[8341]*y_cur[IDX_GC4H2I] - k[8631]*y_cur[IDX_GC4H2I]; - data[jistart + 9227] = 0.0 + k[8381]*y_cur[IDX_GC4HI]; - data[jistart + 9228] = 0.0 + k[7002]; - data[jistart + 9229] = 0.0 + k[8341]*y_cur[IDX_GHI]; - data[jistart + 9230] = 0.0 - k[7184] - k[7366] - k[7548] - k[7795] - - k[8119] - k[8120] - k[8342]*y_cur[IDX_GHI] - k[8632]*y_cur[IDX_GHI]; - data[jistart + 9231] = 0.0 + k[8341]*y_cur[IDX_GC4H2I] - - k[8342]*y_cur[IDX_GC4H3I] - k[8632]*y_cur[IDX_GC4H3I]; - data[jistart + 9232] = 0.0 + k[7009]; - data[jistart + 9233] = 0.0 - k[7191] - k[7373] - k[7555] - k[7807] - - k[8136]; - data[jistart + 9234] = 0.0 + k[7030]; - data[jistart + 9235] = 0.0 - k[7212] - k[7394] - k[7576] - k[7836] - - k[8160] - k[8161]; - data[jistart + 9236] = 0.0 + k[7048]; - data[jistart + 9237] = 0.0 - k[7230] - k[7412] - k[7594] - k[7859] - - k[8191]; - data[jistart + 9238] = 0.0 + k[7049]; - data[jistart + 9239] = 0.0 - k[7231] - k[7413] - k[7595] - k[7860] - - k[8192]; - data[jistart + 9240] = 0.0 + k[7024]; - data[jistart + 9241] = 0.0 + k[8420]*y_cur[IDX_GC4I] - - k[8423]*y_cur[IDX_GC5I] - k[8674]*y_cur[IDX_GC5I]; - data[jistart + 9242] = 0.0 + k[8237] + k[8237] + k[8238] + k[8244]; - data[jistart + 9243] = 0.0 + k[8255] + k[8256] + k[8260]; - data[jistart + 9244] = 0.0 + k[8420]*y_cur[IDX_GCI]; - data[jistart + 9245] = 0.0 - k[7206] - k[7388] - k[7572] - k[7822] - - k[7823] - k[8149] - k[8350]*y_cur[IDX_GHI] - k[8382]*y_cur[IDX_GH2I] - - k[8423]*y_cur[IDX_GCI] - k[8467]*y_cur[IDX_GNI] - - k[8495]*y_cur[IDX_GCHI] - k[8636]*y_cur[IDX_GHI] - - k[8674]*y_cur[IDX_GCI] - k[8707]*y_cur[IDX_GNI] - - k[8728]*y_cur[IDX_GCHI]; - data[jistart + 9246] = 0.0 + k[7835] + k[8159]; - data[jistart + 9247] = 0.0 + k[7849] + k[8178] + k[8180]; - data[jistart + 9248] = 0.0 + k[8195]; - data[jistart + 9249] = 0.0 - k[8495]*y_cur[IDX_GC5I] - - k[8728]*y_cur[IDX_GC5I]; - data[jistart + 9250] = 0.0 - k[8350]*y_cur[IDX_GC5I] - - k[8636]*y_cur[IDX_GC5I]; - data[jistart + 9251] = 0.0 - k[8382]*y_cur[IDX_GC5I]; - data[jistart + 9252] = 0.0 - k[8467]*y_cur[IDX_GC5I] - - k[8707]*y_cur[IDX_GC5I]; - data[jistart + 9253] = 0.0 + k[7028]; - data[jistart + 9254] = 0.0 + k[8421]*y_cur[IDX_GC4HI] - - k[8424]*y_cur[IDX_GC5HI] - k[8675]*y_cur[IDX_GC5HI]; - data[jistart + 9255] = 0.0 + k[8238] + k[8244]; - data[jistart + 9256] = 0.0 + k[8493]*y_cur[IDX_GCHI]; - data[jistart + 9257] = 0.0 + k[8421]*y_cur[IDX_GCI]; - data[jistart + 9258] = 0.0 + k[8350]*y_cur[IDX_GHI] + - k[8382]*y_cur[IDX_GH2I]; - data[jistart + 9259] = 0.0 - k[7210] - k[7392] - k[7574] - k[7833] - - k[7834] - k[7835] - k[8157] - k[8158] - k[8159] - - k[8351]*y_cur[IDX_GHI] - k[8383]*y_cur[IDX_GH2I] - - k[8424]*y_cur[IDX_GCI] - k[8468]*y_cur[IDX_GNI] - - k[8496]*y_cur[IDX_GCHI] - k[8637]*y_cur[IDX_GHI] - - k[8675]*y_cur[IDX_GCI] - k[8708]*y_cur[IDX_GNI] - - k[8729]*y_cur[IDX_GCHI]; - data[jistart + 9260] = 0.0 + k[7838] + k[8163]; - data[jistart + 9261] = 0.0 + k[8493]*y_cur[IDX_GC4I] - - k[8496]*y_cur[IDX_GC5HI] - k[8729]*y_cur[IDX_GC5HI]; - data[jistart + 9262] = 0.0 + k[8350]*y_cur[IDX_GC5I] - - k[8351]*y_cur[IDX_GC5HI] - k[8637]*y_cur[IDX_GC5HI]; - data[jistart + 9263] = 0.0 + k[8382]*y_cur[IDX_GC5I] - - k[8383]*y_cur[IDX_GC5HI]; - data[jistart + 9264] = 0.0 - k[8468]*y_cur[IDX_GC5HI] - - k[8708]*y_cur[IDX_GC5HI]; - data[jistart + 9265] = 0.0 + k[7029]; - data[jistart + 9266] = 0.0 + k[8494]*y_cur[IDX_GCHI]; - data[jistart + 9267] = 0.0 + k[8351]*y_cur[IDX_GHI] + - k[8383]*y_cur[IDX_GH2I]; - data[jistart + 9268] = 0.0 - k[7211] - k[7393] - k[7575] - k[7837] - - k[7838] - k[8162] - k[8163]; - data[jistart + 9269] = 0.0 + k[8494]*y_cur[IDX_GC4HI]; - data[jistart + 9270] = 0.0 + k[8351]*y_cur[IDX_GC5HI]; - data[jistart + 9271] = 0.0 + k[8383]*y_cur[IDX_GC5HI]; - data[jistart + 9272] = 0.0 + k[7044]; - data[jistart + 9273] = 0.0 + k[8467]*y_cur[IDX_GNI]; - data[jistart + 9274] = 0.0 - k[7226] - k[7408] - k[7590] - k[7854] - - k[8186] - k[8354]*y_cur[IDX_GHI] - k[8553]*y_cur[IDX_GCH3I] - - k[8640]*y_cur[IDX_GHI] - k[8757]*y_cur[IDX_GCH3I]; - data[jistart + 9275] = 0.0 + k[8212]; - data[jistart + 9276] = 0.0 - k[8553]*y_cur[IDX_GC5NI] - - k[8757]*y_cur[IDX_GC5NI]; - data[jistart + 9277] = 0.0 + k[7865] + k[8204]; - data[jistart + 9278] = 0.0 - k[8354]*y_cur[IDX_GC5NI] - - k[8640]*y_cur[IDX_GC5NI]; - data[jistart + 9279] = 0.0 + k[7856] + k[8188]; - data[jistart + 9280] = 0.0 + k[8467]*y_cur[IDX_GC5I]; - data[jistart + 9281] = 0.0 + k[7041]; - data[jistart + 9282] = 0.0 + k[8423]*y_cur[IDX_GC5I] - - k[8425]*y_cur[IDX_GC6I] - k[8676]*y_cur[IDX_GC6I]; - data[jistart + 9283] = 0.0 + k[8229] + k[8230]; - data[jistart + 9284] = 0.0 + k[8256] + k[8260]; - data[jistart + 9285] = 0.0 + k[8423]*y_cur[IDX_GCI]; - data[jistart + 9286] = 0.0 - k[7223] - k[7405] - k[7587] - k[7849] - - k[8178] - k[8179] - k[8180] - k[8352]*y_cur[IDX_GHI] - - k[8384]*y_cur[IDX_GH2I] - k[8425]*y_cur[IDX_GCI] - - k[8497]*y_cur[IDX_GCHI] - k[8638]*y_cur[IDX_GHI] - - k[8676]*y_cur[IDX_GCI] - k[8730]*y_cur[IDX_GCHI]; - data[jistart + 9287] = 0.0 + k[7852]; - data[jistart + 9288] = 0.0 + k[8184]; - data[jistart + 9289] = 0.0 + k[7861] + k[8193] + k[8196]; - data[jistart + 9290] = 0.0 + k[7868] + k[8211]; - data[jistart + 9291] = 0.0 + k[8206]; - data[jistart + 9292] = 0.0 - k[8497]*y_cur[IDX_GC6I] - - k[8730]*y_cur[IDX_GC6I]; - data[jistart + 9293] = 0.0 - k[8352]*y_cur[IDX_GC6I] - - k[8638]*y_cur[IDX_GC6I]; - data[jistart + 9294] = 0.0 - k[8384]*y_cur[IDX_GC6I]; - data[jistart + 9295] = 0.0 + k[7042]; - data[jistart + 9296] = 0.0 + k[8424]*y_cur[IDX_GC5HI] - - k[8426]*y_cur[IDX_GC6HI] - k[8677]*y_cur[IDX_GC6HI]; - data[jistart + 9297] = 0.0 + k[8495]*y_cur[IDX_GCHI]; - data[jistart + 9298] = 0.0 + k[8424]*y_cur[IDX_GCI]; - data[jistart + 9299] = 0.0 + k[8352]*y_cur[IDX_GHI] + - k[8384]*y_cur[IDX_GH2I]; - data[jistart + 9300] = 0.0 - k[7224] - k[7406] - k[7588] - k[7850] - - k[7851] - k[7852] - k[8181] - k[8182] - k[8353]*y_cur[IDX_GHI] - - k[8385]*y_cur[IDX_GH2I] - k[8426]*y_cur[IDX_GCI] - - k[8498]*y_cur[IDX_GCHI] - k[8639]*y_cur[IDX_GHI] - - k[8677]*y_cur[IDX_GCI] - k[8731]*y_cur[IDX_GCHI]; - data[jistart + 9301] = 0.0 + k[8183] + k[8185]; - data[jistart + 9302] = 0.0 + k[8198]; - data[jistart + 9303] = 0.0 + k[8495]*y_cur[IDX_GC5I] - - k[8498]*y_cur[IDX_GC6HI] - k[8731]*y_cur[IDX_GC6HI]; - data[jistart + 9304] = 0.0 + k[7864] + k[8203]; - data[jistart + 9305] = 0.0 + k[8352]*y_cur[IDX_GC6I] - - k[8353]*y_cur[IDX_GC6HI] - k[8639]*y_cur[IDX_GC6HI]; - data[jistart + 9306] = 0.0 + k[8384]*y_cur[IDX_GC6I] - - k[8385]*y_cur[IDX_GC6HI]; - data[jistart + 9307] = 0.0 + k[7870] + k[8216] + k[8217]; - data[jistart + 9308] = 0.0 + k[7043]; - data[jistart + 9309] = 0.0 + k[8496]*y_cur[IDX_GCHI]; - data[jistart + 9310] = 0.0 + k[8353]*y_cur[IDX_GHI] + - k[8385]*y_cur[IDX_GH2I]; - data[jistart + 9311] = 0.0 - k[7225] - k[7407] - k[7589] - k[7853] - - k[8183] - k[8184] - k[8185]; - data[jistart + 9312] = 0.0 + k[7858]; - data[jistart + 9313] = 0.0 + k[8496]*y_cur[IDX_GC5HI]; - data[jistart + 9314] = 0.0 + k[8353]*y_cur[IDX_GC6HI]; - data[jistart + 9315] = 0.0 + k[8385]*y_cur[IDX_GC6HI]; - data[jistart + 9316] = 0.0 + k[7047]; - data[jistart + 9317] = 0.0 - k[7229] - k[7411] - k[7593] - k[7858] - - k[8190]; - data[jistart + 9318] = 0.0 + k[7050]; - data[jistart + 9319] = 0.0 + k[8425]*y_cur[IDX_GC6I] - - k[8427]*y_cur[IDX_GC7I] - k[8678]*y_cur[IDX_GC7I]; - data[jistart + 9320] = 0.0 + k[8231]; - data[jistart + 9321] = 0.0 + k[8239]; - data[jistart + 9322] = 0.0 + k[8257] + k[8261]; - data[jistart + 9323] = 0.0 + k[8425]*y_cur[IDX_GCI]; - data[jistart + 9324] = 0.0 - k[7232] - k[7414] - k[7596] - k[7861] - - k[8193] - k[8194] - k[8195] - k[8196] - k[8355]*y_cur[IDX_GHI] - - k[8386]*y_cur[IDX_GH2I] - k[8427]*y_cur[IDX_GCI] - - k[8469]*y_cur[IDX_GNI] - k[8499]*y_cur[IDX_GCHI] - - k[8641]*y_cur[IDX_GHI] - k[8678]*y_cur[IDX_GCI] - - k[8709]*y_cur[IDX_GNI] - k[8732]*y_cur[IDX_GCHI]; - data[jistart + 9325] = 0.0 + k[7862] + k[8197] + k[8199]; - data[jistart + 9326] = 0.0 + k[8201]; - data[jistart + 9327] = 0.0 + k[7866] + k[8205] + k[8207]; - data[jistart + 9328] = 0.0 + k[8220]; - data[jistart + 9329] = 0.0 - k[8499]*y_cur[IDX_GC7I] - - k[8732]*y_cur[IDX_GC7I]; - data[jistart + 9330] = 0.0 - k[8355]*y_cur[IDX_GC7I] - - k[8641]*y_cur[IDX_GC7I]; - data[jistart + 9331] = 0.0 - k[8386]*y_cur[IDX_GC7I]; - data[jistart + 9332] = 0.0 - k[8469]*y_cur[IDX_GC7I] - - k[8709]*y_cur[IDX_GC7I]; - data[jistart + 9333] = 0.0 + k[7051]; - data[jistart + 9334] = 0.0 + k[8426]*y_cur[IDX_GC6HI] - - k[8428]*y_cur[IDX_GC7HI] - k[8679]*y_cur[IDX_GC7HI]; - data[jistart + 9335] = 0.0 + k[8240] + k[8245]; - data[jistart + 9336] = 0.0 + k[8250]; - data[jistart + 9337] = 0.0 + k[8497]*y_cur[IDX_GCHI]; - data[jistart + 9338] = 0.0 + k[8426]*y_cur[IDX_GCI]; - data[jistart + 9339] = 0.0 + k[8355]*y_cur[IDX_GHI] + - k[8386]*y_cur[IDX_GH2I]; - data[jistart + 9340] = 0.0 - k[7233] - k[7415] - k[7597] - k[7862] - - k[8197] - k[8198] - k[8199] - k[8356]*y_cur[IDX_GHI] - - k[8387]*y_cur[IDX_GH2I] - k[8428]*y_cur[IDX_GCI] - - k[8470]*y_cur[IDX_GNI] - k[8500]*y_cur[IDX_GCHI] - - k[8642]*y_cur[IDX_GHI] - k[8679]*y_cur[IDX_GCI] - - k[8710]*y_cur[IDX_GNI] - k[8733]*y_cur[IDX_GCHI]; - data[jistart + 9341] = 0.0 + k[7863] + k[8200] + k[8202]; - data[jistart + 9342] = 0.0 + k[8209]; - data[jistart + 9343] = 0.0 + k[8497]*y_cur[IDX_GC6I] - - k[8500]*y_cur[IDX_GC7HI] - k[8733]*y_cur[IDX_GC7HI]; - data[jistart + 9344] = 0.0 + k[8355]*y_cur[IDX_GC7I] - - k[8356]*y_cur[IDX_GC7HI] - k[8642]*y_cur[IDX_GC7HI]; - data[jistart + 9345] = 0.0 + k[8386]*y_cur[IDX_GC7I] - - k[8387]*y_cur[IDX_GC7HI]; - data[jistart + 9346] = 0.0 - k[8470]*y_cur[IDX_GC7HI] - - k[8710]*y_cur[IDX_GC7HI]; - data[jistart + 9347] = 0.0 + k[7052]; - data[jistart + 9348] = 0.0 + k[8498]*y_cur[IDX_GCHI]; - data[jistart + 9349] = 0.0 + k[8356]*y_cur[IDX_GHI] + - k[8387]*y_cur[IDX_GH2I]; - data[jistart + 9350] = 0.0 - k[7234] - k[7416] - k[7598] - k[7863] - - k[8200] - k[8201] - k[8202]; - data[jistart + 9351] = 0.0 + k[8498]*y_cur[IDX_GC6HI]; - data[jistart + 9352] = 0.0 + k[8356]*y_cur[IDX_GC7HI]; - data[jistart + 9353] = 0.0 + k[8387]*y_cur[IDX_GC7HI]; - data[jistart + 9354] = 0.0 + k[7057]; - data[jistart + 9355] = 0.0 + k[8469]*y_cur[IDX_GNI]; - data[jistart + 9356] = 0.0 - k[7239] - k[7421] - k[7603] - k[7868] - - k[8211] - k[8212] - k[8359]*y_cur[IDX_GHI] - - k[8554]*y_cur[IDX_GCH3I] - k[8645]*y_cur[IDX_GHI] - - k[8758]*y_cur[IDX_GCH3I]; - data[jistart + 9357] = 0.0 + k[8247]; - data[jistart + 9358] = 0.0 - k[8554]*y_cur[IDX_GC7NI] - - k[8758]*y_cur[IDX_GC7NI]; - data[jistart + 9359] = 0.0 + k[7874] + k[8228]; - data[jistart + 9360] = 0.0 - k[8359]*y_cur[IDX_GC7NI] - - k[8645]*y_cur[IDX_GC7NI]; - data[jistart + 9361] = 0.0 + k[8218]; - data[jistart + 9362] = 0.0 + k[8469]*y_cur[IDX_GC7I]; - data[jistart + 9363] = 0.0 + k[7055]; - data[jistart + 9364] = 0.0 + k[8427]*y_cur[IDX_GC7I] - - k[8429]*y_cur[IDX_GC8I] - k[8680]*y_cur[IDX_GC8I]; - data[jistart + 9365] = 0.0 + k[8232] + k[8234]; - data[jistart + 9366] = 0.0 + k[8241]; - data[jistart + 9367] = 0.0 + k[8258] + k[8262]; - data[jistart + 9368] = 0.0 + k[8427]*y_cur[IDX_GCI]; - data[jistart + 9369] = 0.0 - k[7237] - k[7419] - k[7601] - k[7866] - - k[8205] - k[8206] - k[8207] - k[8357]*y_cur[IDX_GHI] - - k[8388]*y_cur[IDX_GH2I] - k[8429]*y_cur[IDX_GCI] - - k[8501]*y_cur[IDX_GCHI] - k[8643]*y_cur[IDX_GHI] - - k[8680]*y_cur[IDX_GCI] - k[8734]*y_cur[IDX_GCHI]; - data[jistart + 9370] = 0.0 + k[7867] + k[8208] + k[8210]; - data[jistart + 9371] = 0.0 + k[8214]; - data[jistart + 9372] = 0.0 + k[7871] + k[8219] + k[8221]; - data[jistart + 9373] = 0.0 + k[7877] + k[8246]; - data[jistart + 9374] = 0.0 - k[8501]*y_cur[IDX_GC8I] - - k[8734]*y_cur[IDX_GC8I]; - data[jistart + 9375] = 0.0 - k[8357]*y_cur[IDX_GC8I] - - k[8643]*y_cur[IDX_GC8I]; - data[jistart + 9376] = 0.0 - k[8388]*y_cur[IDX_GC8I]; - data[jistart + 9377] = 0.0 + k[7056]; - data[jistart + 9378] = 0.0 + k[8428]*y_cur[IDX_GC7HI] - - k[8430]*y_cur[IDX_GC8HI] - k[8681]*y_cur[IDX_GC8HI]; - data[jistart + 9379] = 0.0 + k[8499]*y_cur[IDX_GCHI]; - data[jistart + 9380] = 0.0 + k[8428]*y_cur[IDX_GCI]; - data[jistart + 9381] = 0.0 + k[8357]*y_cur[IDX_GHI] + - k[8388]*y_cur[IDX_GH2I]; - data[jistart + 9382] = 0.0 - k[7238] - k[7420] - k[7602] - k[7867] - - k[8208] - k[8209] - k[8210] - k[8358]*y_cur[IDX_GHI] - - k[8389]*y_cur[IDX_GH2I] - k[8430]*y_cur[IDX_GCI] - - k[8502]*y_cur[IDX_GCHI] - k[8644]*y_cur[IDX_GHI] - - k[8681]*y_cur[IDX_GCI] - k[8735]*y_cur[IDX_GCHI]; - data[jistart + 9383] = 0.0 + k[7869] + k[8213] + k[8215]; - data[jistart + 9384] = 0.0 + k[8223]; - data[jistart + 9385] = 0.0 + k[8499]*y_cur[IDX_GC7I] - - k[8502]*y_cur[IDX_GC8HI] - k[8735]*y_cur[IDX_GC8HI]; - data[jistart + 9386] = 0.0 + k[8357]*y_cur[IDX_GC8I] - - k[8358]*y_cur[IDX_GC8HI] - k[8644]*y_cur[IDX_GC8HI]; - data[jistart + 9387] = 0.0 + k[8388]*y_cur[IDX_GC8I] - - k[8389]*y_cur[IDX_GC8HI]; - data[jistart + 9388] = 0.0 + k[7879] + k[8252] + k[8253]; - data[jistart + 9389] = 0.0 + k[7058]; - data[jistart + 9390] = 0.0 + k[8500]*y_cur[IDX_GCHI]; - data[jistart + 9391] = 0.0 + k[8358]*y_cur[IDX_GHI] + - k[8389]*y_cur[IDX_GH2I]; - data[jistart + 9392] = 0.0 - k[7240] - k[7422] - k[7604] - k[7869] - - k[8213] - k[8214] - k[8215]; - data[jistart + 9393] = 0.0 + k[8500]*y_cur[IDX_GC7HI]; - data[jistart + 9394] = 0.0 + k[8358]*y_cur[IDX_GC8HI]; - data[jistart + 9395] = 0.0 + k[8389]*y_cur[IDX_GC8HI]; - data[jistart + 9396] = 0.0 + k[7060]; - data[jistart + 9397] = 0.0 + k[8429]*y_cur[IDX_GC8I] - - k[8431]*y_cur[IDX_GC9I] - k[8682]*y_cur[IDX_GC9I]; - data[jistart + 9398] = 0.0 + k[7875] + k[8233] + k[8235]; - data[jistart + 9399] = 0.0 + k[8242]; - data[jistart + 9400] = 0.0 + k[8259] + k[8263]; - data[jistart + 9401] = 0.0 + k[8429]*y_cur[IDX_GCI]; - data[jistart + 9402] = 0.0 - k[7242] - k[7424] - k[7606] - k[7871] - - k[8219] - k[8220] - k[8221] - k[8360]*y_cur[IDX_GHI] - - k[8390]*y_cur[IDX_GH2I] - k[8431]*y_cur[IDX_GCI] - - k[8471]*y_cur[IDX_GNI] - k[8646]*y_cur[IDX_GHI] - - k[8682]*y_cur[IDX_GCI] - k[8711]*y_cur[IDX_GNI]; - data[jistart + 9403] = 0.0 + k[7872] + k[8222] + k[8224]; - data[jistart + 9404] = 0.0 + k[8226]; - data[jistart + 9405] = 0.0 - k[8360]*y_cur[IDX_GC9I] - - k[8646]*y_cur[IDX_GC9I]; - data[jistart + 9406] = 0.0 - k[8390]*y_cur[IDX_GC9I]; - data[jistart + 9407] = 0.0 - k[8471]*y_cur[IDX_GC9I] - - k[8711]*y_cur[IDX_GC9I]; - data[jistart + 9408] = 0.0 + k[7061]; - data[jistart + 9409] = 0.0 + k[8430]*y_cur[IDX_GC8HI] - - k[8432]*y_cur[IDX_GC9HI] - k[8683]*y_cur[IDX_GC9HI]; - data[jistart + 9410] = 0.0 + k[8501]*y_cur[IDX_GCHI]; - data[jistart + 9411] = 0.0 + k[8430]*y_cur[IDX_GCI]; - data[jistart + 9412] = 0.0 + k[8360]*y_cur[IDX_GHI] + - k[8390]*y_cur[IDX_GH2I]; - data[jistart + 9413] = 0.0 - k[7243] - k[7425] - k[7607] - k[7872] - - k[8222] - k[8223] - k[8224] - k[8361]*y_cur[IDX_GHI] - - k[8391]*y_cur[IDX_GH2I] - k[8432]*y_cur[IDX_GCI] - - k[8472]*y_cur[IDX_GNI] - k[8503]*y_cur[IDX_GCHI] - - k[8647]*y_cur[IDX_GHI] - k[8683]*y_cur[IDX_GCI] - - k[8712]*y_cur[IDX_GNI] - k[8736]*y_cur[IDX_GCHI]; - data[jistart + 9414] = 0.0 + k[7873] + k[8225] + k[8227]; - data[jistart + 9415] = 0.0 + k[8501]*y_cur[IDX_GC8I] - - k[8503]*y_cur[IDX_GC9HI] - k[8736]*y_cur[IDX_GC9HI]; - data[jistart + 9416] = 0.0 + k[8360]*y_cur[IDX_GC9I] - - k[8361]*y_cur[IDX_GC9HI] - k[8647]*y_cur[IDX_GC9HI]; - data[jistart + 9417] = 0.0 + k[8390]*y_cur[IDX_GC9I] - - k[8391]*y_cur[IDX_GC9HI]; - data[jistart + 9418] = 0.0 - k[8472]*y_cur[IDX_GC9HI] - - k[8712]*y_cur[IDX_GC9HI]; - data[jistart + 9419] = 0.0 + k[7062]; - data[jistart + 9420] = 0.0 + k[8502]*y_cur[IDX_GCHI]; - data[jistart + 9421] = 0.0 + k[8361]*y_cur[IDX_GHI] + - k[8391]*y_cur[IDX_GH2I]; - data[jistart + 9422] = 0.0 - k[7244] - k[7426] - k[7608] - k[7873] - - k[8225] - k[8226] - k[8227]; - data[jistart + 9423] = 0.0 + k[8502]*y_cur[IDX_GC8HI]; - data[jistart + 9424] = 0.0 + k[8361]*y_cur[IDX_GC9HI]; - data[jistart + 9425] = 0.0 + k[8391]*y_cur[IDX_GC9HI]; - data[jistart + 9426] = 0.0 + k[7066]; - data[jistart + 9427] = 0.0 + k[8471]*y_cur[IDX_GNI]; - data[jistart + 9428] = 0.0 - k[7248] - k[7430] - k[7612] - k[7877] - - k[8246] - k[8247] - k[8364]*y_cur[IDX_GHI] - k[8650]*y_cur[IDX_GHI]; - data[jistart + 9429] = 0.0 - k[8364]*y_cur[IDX_GC9NI] - - k[8650]*y_cur[IDX_GC9NI]; - data[jistart + 9430] = 0.0 + k[8254]; - data[jistart + 9431] = 0.0 + k[8471]*y_cur[IDX_GC9I]; - data[jistart + 9432] = 0.0 + k[7014]; - data[jistart + 9433] = 0.0 + k[7847]; - data[jistart + 9434] = 0.0 - k[7196] - k[7378] - k[7562] - k[7813] - - k[7814] - k[8142] - k[8143]; - data[jistart + 9435] = 0.0 + k[7817] + k[8145]; - data[jistart + 9436] = 0.0 + k[6991]; - data[jistart + 9437] = 0.0 - k[7173] - k[7355] - k[7537] - k[7781] - - k[8105]; - data[jistart + 9438] = 0.0 + k[6892]; - data[jistart + 9439] = 0.0 + k[8274]*y_cur[IDX_GHI] - - k[8395]*y_cur[IDX_GCHI] - k[8655]*y_cur[IDX_GCHI]; - data[jistart + 9440] = 0.0 - k[8486]*y_cur[IDX_GCHI] - - k[8719]*y_cur[IDX_GCHI]; - data[jistart + 9441] = 0.0 + k[7644] + k[7931] - - k[8487]*y_cur[IDX_GCHI] - k[8720]*y_cur[IDX_GCHI]; - data[jistart + 9442] = 0.0 + k[7648] + k[7648] + k[7935] + k[7935]; - data[jistart + 9443] = 0.0 + k[7661] + k[7662] + k[7948] + k[7949] - + data[jistart + 8828] = 0.0 + k[360]*y_cur[IDX_CH2CCHI]; + data[jistart + 8829] = 0.0 - k[1857]*y_cur[IDX_C3H3II] - k[1858]*y_cur[IDX_C3H3II]; + data[jistart + 8830] = 0.0 + k[2907]*y_cur[IDX_C3H2I]; + data[jistart + 8831] = 0.0 + k[2602]*y_cur[IDX_C3H2I] + k[2635]*y_cur[IDX_CH2CCH2I]; + data[jistart + 8832] = 0.0 - k[6473]*y_cur[IDX_C3H3II]; + data[jistart + 8833] = 0.0 + k[2408]*y_cur[IDX_C3H2II] + k[5550]*y_cur[IDX_C3HII]; + data[jistart + 8834] = 0.0 - k[798]*y_cur[IDX_C3H3II]; + data[jistart + 8835] = 0.0 + k[2832]*y_cur[IDX_C3H4II]; + data[jistart + 8836] = 0.0 - k[4486]*y_cur[IDX_C8M]; + data[jistart + 8837] = 0.0 - k[4489]*y_cur[IDX_C8M]; + data[jistart + 8838] = 0.0 - k[4515]*y_cur[IDX_C8M]; + data[jistart + 8839] = 0.0 - k[4496]*y_cur[IDX_C8M]; + data[jistart + 8840] = 0.0 + k[3445]*y_cur[IDX_NI] + k[3721]*y_cur[IDX_OI]; + data[jistart + 8841] = 0.0 - k[36]*y_cur[IDX_C2I] - k[51]*y_cur[IDX_CI] - + k[101]*y_cur[IDX_HI] - k[3436]*y_cur[IDX_NI] - k[3437]*y_cur[IDX_NI] + - k[3438]*y_cur[IDX_NI] - k[3439]*y_cur[IDX_NI] - + k[3717]*y_cur[IDX_OI] - k[4481]*y_cur[IDX_CII] - + k[4482]*y_cur[IDX_C2H2II] - k[4483]*y_cur[IDX_C2H3II] - + k[4484]*y_cur[IDX_C4H2II] - k[4485]*y_cur[IDX_C4H3II] - + k[4486]*y_cur[IDX_C4SII] - k[4487]*y_cur[IDX_CH2CCHII] - + k[4488]*y_cur[IDX_CH3II] - k[4489]*y_cur[IDX_CNCII] - + k[4490]*y_cur[IDX_FeII] - k[4491]*y_cur[IDX_HII] - + k[4492]*y_cur[IDX_H2COII] - k[4493]*y_cur[IDX_H2SII] - + k[4494]*y_cur[IDX_H3II] - k[4495]*y_cur[IDX_H3OII] - + k[4496]*y_cur[IDX_HC2SII] - k[4497]*y_cur[IDX_HCNHII] - + k[4498]*y_cur[IDX_HCNHII] - k[4499]*y_cur[IDX_HCOII] - + k[4500]*y_cur[IDX_HCOII] - k[4501]*y_cur[IDX_HeII] - + k[4502]*y_cur[IDX_MgII] - k[4503]*y_cur[IDX_NII] - + k[4504]*y_cur[IDX_N2HII] - k[4505]*y_cur[IDX_NH3II] - + k[4506]*y_cur[IDX_NH4II] - k[4507]*y_cur[IDX_NOII] - + k[4508]*y_cur[IDX_NaII] - k[4509]*y_cur[IDX_OII] - + k[4510]*y_cur[IDX_SII] - k[4511]*y_cur[IDX_SOII] - + k[4512]*y_cur[IDX_SiII] - k[4513]*y_cur[IDX_SiOII] - + k[4514]*y_cur[IDX_SiOHII] - k[4515]*y_cur[IDX_SiSII] - k[5761] - + k[6051]; + data[jistart + 8842] = 0.0 - k[4513]*y_cur[IDX_C8M]; + data[jistart + 8843] = 0.0 - k[4514]*y_cur[IDX_C8M]; + data[jistart + 8844] = 0.0 - k[4490]*y_cur[IDX_C8M]; + data[jistart + 8845] = 0.0 - k[4502]*y_cur[IDX_C8M]; + data[jistart + 8846] = 0.0 - k[4508]*y_cur[IDX_C8M]; + data[jistart + 8847] = 0.0 + k[5603]*y_cur[IDX_eM]; + data[jistart + 8848] = 0.0 - k[4485]*y_cur[IDX_C8M]; + data[jistart + 8849] = 0.0 - k[4504]*y_cur[IDX_C8M]; + data[jistart + 8850] = 0.0 - k[4511]*y_cur[IDX_C8M]; + data[jistart + 8851] = 0.0 - k[4487]*y_cur[IDX_C8M]; + data[jistart + 8852] = 0.0 - k[4493]*y_cur[IDX_C8M]; + data[jistart + 8853] = 0.0 - k[4503]*y_cur[IDX_C8M]; + data[jistart + 8854] = 0.0 - k[4492]*y_cur[IDX_C8M]; + data[jistart + 8855] = 0.0 - k[4507]*y_cur[IDX_C8M]; + data[jistart + 8856] = 0.0 - k[4509]*y_cur[IDX_C8M]; + data[jistart + 8857] = 0.0 - k[4484]*y_cur[IDX_C8M]; + data[jistart + 8858] = 0.0 - k[4497]*y_cur[IDX_C8M] - k[4498]*y_cur[IDX_C8M]; + data[jistart + 8859] = 0.0 - k[4505]*y_cur[IDX_C8M]; + data[jistart + 8860] = 0.0 - k[4506]*y_cur[IDX_C8M]; + data[jistart + 8861] = 0.0 - k[4512]*y_cur[IDX_C8M]; + data[jistart + 8862] = 0.0 - k[4510]*y_cur[IDX_C8M]; + data[jistart + 8863] = 0.0 - k[4483]*y_cur[IDX_C8M]; + data[jistart + 8864] = 0.0 - k[36]*y_cur[IDX_C8M]; + data[jistart + 8865] = 0.0 - k[4482]*y_cur[IDX_C8M]; + data[jistart + 8866] = 0.0 - k[4488]*y_cur[IDX_C8M]; + data[jistart + 8867] = 0.0 - k[3436]*y_cur[IDX_C8M] - k[3437]*y_cur[IDX_C8M] - + k[3438]*y_cur[IDX_C8M] - k[3439]*y_cur[IDX_C8M] + + k[3445]*y_cur[IDX_C9M]; + data[jistart + 8868] = 0.0 - k[4495]*y_cur[IDX_C8M]; + data[jistart + 8869] = 0.0 - k[3717]*y_cur[IDX_C8M] + k[3721]*y_cur[IDX_C9M]; + data[jistart + 8870] = 0.0 - k[4501]*y_cur[IDX_C8M]; + data[jistart + 8871] = 0.0 - k[4481]*y_cur[IDX_C8M]; + data[jistart + 8872] = 0.0 - k[4491]*y_cur[IDX_C8M]; + data[jistart + 8873] = 0.0 - k[51]*y_cur[IDX_C8M]; + data[jistart + 8874] = 0.0 - k[4499]*y_cur[IDX_C8M] - k[4500]*y_cur[IDX_C8M]; + data[jistart + 8875] = 0.0 - k[4494]*y_cur[IDX_C8M]; + data[jistart + 8876] = 0.0 + k[5603]*y_cur[IDX_C8I]; + data[jistart + 8877] = 0.0 - k[101]*y_cur[IDX_C8M]; + data[jistart + 8878] = 0.0 - k[3996]*y_cur[IDX_C2M]; + data[jistart + 8879] = 0.0 - k[3999]*y_cur[IDX_C2M]; + data[jistart + 8880] = 0.0 - k[4025]*y_cur[IDX_C2M]; + data[jistart + 8881] = 0.0 - k[4006]*y_cur[IDX_C2M]; + data[jistart + 8882] = 0.0 - k[10]*y_cur[IDX_C2I] - k[11]*y_cur[IDX_C3I] - + k[12]*y_cur[IDX_C4I] - k[13]*y_cur[IDX_C5I] - k[14]*y_cur[IDX_C6I] - + k[15]*y_cur[IDX_C7I] - k[16]*y_cur[IDX_C8I] - k[38]*y_cur[IDX_CI] - + k[87]*y_cur[IDX_HI] - k[110]*y_cur[IDX_NI] - k[128]*y_cur[IDX_OI] - + k[3384]*y_cur[IDX_NI] - k[3685]*y_cur[IDX_OI] - + k[3991]*y_cur[IDX_CII] - k[3992]*y_cur[IDX_C2H2II] - + k[3993]*y_cur[IDX_C2H3II] - k[3994]*y_cur[IDX_C4H2II] - + k[3995]*y_cur[IDX_C4H3II] - k[3996]*y_cur[IDX_C4SII] - + k[3997]*y_cur[IDX_CH2CCHII] - k[3998]*y_cur[IDX_CH3II] - + k[3999]*y_cur[IDX_CNCII] - k[4000]*y_cur[IDX_FeII] - + k[4001]*y_cur[IDX_HII] - k[4002]*y_cur[IDX_H2COII] - + k[4003]*y_cur[IDX_H2SII] - k[4004]*y_cur[IDX_H3II] - + k[4005]*y_cur[IDX_H3OII] - k[4006]*y_cur[IDX_HC2SII] - + k[4007]*y_cur[IDX_HCNHII] - k[4008]*y_cur[IDX_HCNHII] - + k[4009]*y_cur[IDX_HCOII] - k[4010]*y_cur[IDX_HCOII] - + k[4011]*y_cur[IDX_HeII] - k[4012]*y_cur[IDX_MgII] - + k[4013]*y_cur[IDX_NII] - k[4014]*y_cur[IDX_N2HII] - + k[4015]*y_cur[IDX_NH3II] - k[4016]*y_cur[IDX_NH4II] - + k[4017]*y_cur[IDX_NOII] - k[4018]*y_cur[IDX_NaII] - + k[4019]*y_cur[IDX_OII] - k[4020]*y_cur[IDX_SII] - + k[4021]*y_cur[IDX_SOII] - k[4022]*y_cur[IDX_SiII] - + k[4023]*y_cur[IDX_SiOII] - k[4024]*y_cur[IDX_SiOHII] - + k[4025]*y_cur[IDX_SiSII] - k[5693] - k[5976]; + data[jistart + 8883] = 0.0 + k[3393]*y_cur[IDX_NI] + k[3693]*y_cur[IDX_OI]; + data[jistart + 8884] = 0.0 - k[4023]*y_cur[IDX_C2M]; + data[jistart + 8885] = 0.0 - k[4024]*y_cur[IDX_C2M]; + data[jistart + 8886] = 0.0 - k[4000]*y_cur[IDX_C2M]; + data[jistart + 8887] = 0.0 - k[4012]*y_cur[IDX_C2M]; + data[jistart + 8888] = 0.0 - k[4018]*y_cur[IDX_C2M]; + data[jistart + 8889] = 0.0 - k[15]*y_cur[IDX_C2M]; + data[jistart + 8890] = 0.0 - k[16]*y_cur[IDX_C2M]; + data[jistart + 8891] = 0.0 - k[13]*y_cur[IDX_C2M]; + data[jistart + 8892] = 0.0 - k[14]*y_cur[IDX_C2M]; + data[jistart + 8893] = 0.0 - k[12]*y_cur[IDX_C2M]; + data[jistart + 8894] = 0.0 - k[3995]*y_cur[IDX_C2M]; + data[jistart + 8895] = 0.0 - k[4014]*y_cur[IDX_C2M]; + data[jistart + 8896] = 0.0 - k[4021]*y_cur[IDX_C2M]; + data[jistart + 8897] = 0.0 - k[3997]*y_cur[IDX_C2M]; + data[jistart + 8898] = 0.0 - k[4003]*y_cur[IDX_C2M]; + data[jistart + 8899] = 0.0 - k[4013]*y_cur[IDX_C2M]; + data[jistart + 8900] = 0.0 - k[4002]*y_cur[IDX_C2M]; + data[jistart + 8901] = 0.0 - k[11]*y_cur[IDX_C2M]; + data[jistart + 8902] = 0.0 - k[4017]*y_cur[IDX_C2M]; + data[jistart + 8903] = 0.0 - k[4019]*y_cur[IDX_C2M]; + data[jistart + 8904] = 0.0 - k[3994]*y_cur[IDX_C2M]; + data[jistart + 8905] = 0.0 - k[4007]*y_cur[IDX_C2M] - k[4008]*y_cur[IDX_C2M]; + data[jistart + 8906] = 0.0 - k[4015]*y_cur[IDX_C2M]; + data[jistart + 8907] = 0.0 - k[4016]*y_cur[IDX_C2M]; + data[jistart + 8908] = 0.0 - k[4022]*y_cur[IDX_C2M]; + data[jistart + 8909] = 0.0 - k[4020]*y_cur[IDX_C2M]; + data[jistart + 8910] = 0.0 - k[3993]*y_cur[IDX_C2M]; + data[jistart + 8911] = 0.0 - k[10]*y_cur[IDX_C2M] + k[5589]*y_cur[IDX_eM]; + data[jistart + 8912] = 0.0 - k[3992]*y_cur[IDX_C2M]; + data[jistart + 8913] = 0.0 - k[3998]*y_cur[IDX_C2M]; + data[jistart + 8914] = 0.0 - k[110]*y_cur[IDX_C2M] - k[3384]*y_cur[IDX_C2M] + + k[3393]*y_cur[IDX_C3M]; + data[jistart + 8915] = 0.0 - k[4005]*y_cur[IDX_C2M]; + data[jistart + 8916] = 0.0 - k[128]*y_cur[IDX_C2M] - k[3685]*y_cur[IDX_C2M] + + k[3693]*y_cur[IDX_C3M]; + data[jistart + 8917] = 0.0 - k[4011]*y_cur[IDX_C2M]; + data[jistart + 8918] = 0.0 - k[3991]*y_cur[IDX_C2M]; + data[jistart + 8919] = 0.0 - k[4001]*y_cur[IDX_C2M]; + data[jistart + 8920] = 0.0 - k[38]*y_cur[IDX_C2M]; + data[jistart + 8921] = 0.0 - k[4009]*y_cur[IDX_C2M] - k[4010]*y_cur[IDX_C2M]; + data[jistart + 8922] = 0.0 - k[4004]*y_cur[IDX_C2M]; + data[jistart + 8923] = 0.0 + k[5589]*y_cur[IDX_C2I]; + data[jistart + 8924] = 0.0 - k[87]*y_cur[IDX_C2M]; + data[jistart + 8925] = 0.0 + k[7197] + k[7379] + k[7563]; + data[jistart + 8926] = 0.0 + k[816]*y_cur[IDX_eM] + k[6775]*y_cur[IDX_GRAINM]; + data[jistart + 8927] = 0.0 + k[1074]*y_cur[IDX_eM] + k[6818]*y_cur[IDX_GRAINM]; + data[jistart + 8928] = 0.0 + k[1071]*y_cur[IDX_eM] + k[6778]*y_cur[IDX_GRAINM]; + data[jistart + 8929] = 0.0 + k[835]*y_cur[IDX_eM] + k[6815]*y_cur[IDX_GRAINM]; + data[jistart + 8930] = 0.0 + k[4777]*y_cur[IDX_HC2SII]; + data[jistart + 8931] = 0.0 + k[4636]*y_cur[IDX_HC2SII]; + data[jistart + 8932] = 0.0 + k[4875]*y_cur[IDX_C2I] + k[4905]*y_cur[IDX_C2HI]; + data[jistart + 8933] = 0.0 + k[4847]*y_cur[IDX_HC2SII]; + data[jistart + 8934] = 0.0 + k[4041]*y_cur[IDX_HC2SII]; + data[jistart + 8935] = 0.0 + k[4216]*y_cur[IDX_HC2SII]; + data[jistart + 8936] = 0.0 + k[1061]*y_cur[IDX_eM] + k[3901]*y_cur[IDX_CM] + + k[3936]*y_cur[IDX_C10M] + k[3971]*y_cur[IDX_C10HM] + + k[4006]*y_cur[IDX_C2M] + k[4041]*y_cur[IDX_C2HM] + + k[4076]*y_cur[IDX_C3M] + k[4111]*y_cur[IDX_C3HM] + + k[4146]*y_cur[IDX_C3NM] + k[4181]*y_cur[IDX_C4M] + + k[4216]*y_cur[IDX_C4HM] + k[4251]*y_cur[IDX_C5M] + + k[4286]*y_cur[IDX_C5HM] + k[4321]*y_cur[IDX_C5NM] + + k[4356]*y_cur[IDX_C6M] + k[4391]*y_cur[IDX_C6HM] + + k[4426]*y_cur[IDX_C7M] + k[4461]*y_cur[IDX_C7HM] + + k[4496]*y_cur[IDX_C8M] + k[4531]*y_cur[IDX_C8HM] + + k[4566]*y_cur[IDX_C9M] + k[4601]*y_cur[IDX_C9HM] + + k[4636]*y_cur[IDX_CHM] + k[4671]*y_cur[IDX_CNM] + + k[4707]*y_cur[IDX_HM] + k[4742]*y_cur[IDX_OM] + + k[4777]*y_cur[IDX_O2M] + k[4812]*y_cur[IDX_OHM] + + k[4847]*y_cur[IDX_SM] + k[6678]*y_cur[IDX_GRAINM]; + data[jistart + 8937] = 0.0 + k[4812]*y_cur[IDX_HC2SII]; + data[jistart + 8938] = 0.0 + k[3971]*y_cur[IDX_HC2SII]; + data[jistart + 8939] = 0.0 + k[4111]*y_cur[IDX_HC2SII]; + data[jistart + 8940] = 0.0 + k[4391]*y_cur[IDX_HC2SII]; + data[jistart + 8941] = 0.0 + k[4531]*y_cur[IDX_HC2SII]; + data[jistart + 8942] = 0.0 + k[4461]*y_cur[IDX_HC2SII]; + data[jistart + 8943] = 0.0 + k[4601]*y_cur[IDX_HC2SII]; + data[jistart + 8944] = 0.0 + k[3936]*y_cur[IDX_HC2SII]; + data[jistart + 8945] = 0.0 + k[4286]*y_cur[IDX_HC2SII]; + data[jistart + 8946] = 0.0 + k[4321]*y_cur[IDX_HC2SII]; + data[jistart + 8947] = 0.0 + k[3901]*y_cur[IDX_HC2SII]; + data[jistart + 8948] = 0.0 + k[4742]*y_cur[IDX_HC2SII]; + data[jistart + 8949] = 0.0 + k[4566]*y_cur[IDX_HC2SII]; + data[jistart + 8950] = 0.0 + k[4707]*y_cur[IDX_HC2SII]; + data[jistart + 8951] = 0.0 + k[4496]*y_cur[IDX_HC2SII]; + data[jistart + 8952] = 0.0 + k[4006]*y_cur[IDX_HC2SII]; + data[jistart + 8953] = 0.0 - k[152]*y_cur[IDX_CII] - k[332]*y_cur[IDX_HII] - + k[1309]*y_cur[IDX_CII] - k[2600]*y_cur[IDX_H3II] - + k[2770]*y_cur[IDX_H3OII] - k[2905]*y_cur[IDX_HCOII] - + k[3091]*y_cur[IDX_HeII] - k[3092]*y_cur[IDX_HeII] - + k[3093]*y_cur[IDX_HeII] - k[3094]*y_cur[IDX_HeII] - + k[5355]*y_cur[IDX_OI] - k[5714] - k[5715] - k[5999] - k[7015]; + data[jistart + 8954] = 0.0 + k[4076]*y_cur[IDX_HC2SII]; + data[jistart + 8955] = 0.0 + k[4181]*y_cur[IDX_HC2SII]; + data[jistart + 8956] = 0.0 + k[4356]*y_cur[IDX_HC2SII]; + data[jistart + 8957] = 0.0 + k[4251]*y_cur[IDX_HC2SII]; + data[jistart + 8958] = 0.0 + k[4426]*y_cur[IDX_HC2SII]; + data[jistart + 8959] = 0.0 + k[4146]*y_cur[IDX_HC2SII]; + data[jistart + 8960] = 0.0 + k[4671]*y_cur[IDX_HC2SII]; + data[jistart + 8961] = 0.0 + k[4905]*y_cur[IDX_OCSI] + k[4906]*y_cur[IDX_SI]; + data[jistart + 8962] = 0.0 + k[4906]*y_cur[IDX_C2HI]; + data[jistart + 8963] = 0.0 + k[4875]*y_cur[IDX_OCSI]; + data[jistart + 8964] = 0.0 - k[2770]*y_cur[IDX_C2SI]; + data[jistart + 8965] = 0.0 - k[5355]*y_cur[IDX_C2SI]; + data[jistart + 8966] = 0.0 - k[3091]*y_cur[IDX_C2SI] - k[3092]*y_cur[IDX_C2SI] - + k[3093]*y_cur[IDX_C2SI] - k[3094]*y_cur[IDX_C2SI]; + data[jistart + 8967] = 0.0 - k[152]*y_cur[IDX_C2SI] - k[1309]*y_cur[IDX_C2SI]; + data[jistart + 8968] = 0.0 - k[332]*y_cur[IDX_C2SI]; + data[jistart + 8969] = 0.0 - k[2905]*y_cur[IDX_C2SI]; + data[jistart + 8970] = 0.0 - k[2600]*y_cur[IDX_C2SI]; + data[jistart + 8971] = 0.0 + k[6678]*y_cur[IDX_HC2SII] + k[6775]*y_cur[IDX_C3SII] + + k[6778]*y_cur[IDX_HC3SII] + k[6815]*y_cur[IDX_C4SII] + + k[6818]*y_cur[IDX_HC4SII]; + data[jistart + 8972] = 0.0 + k[816]*y_cur[IDX_C3SII] + k[835]*y_cur[IDX_C4SII] + + k[1061]*y_cur[IDX_HC2SII] + k[1071]*y_cur[IDX_HC3SII] + + k[1074]*y_cur[IDX_HC4SII]; + data[jistart + 8973] = 0.0 - k[4066]*y_cur[IDX_C3M]; + data[jistart + 8974] = 0.0 - k[4069]*y_cur[IDX_C3M]; + data[jistart + 8975] = 0.0 - k[4095]*y_cur[IDX_C3M]; + data[jistart + 8976] = 0.0 - k[4076]*y_cur[IDX_C3M]; + data[jistart + 8977] = 0.0 - k[17]*y_cur[IDX_C3I] - k[18]*y_cur[IDX_C4I] - + k[19]*y_cur[IDX_C5I] - k[20]*y_cur[IDX_C6I] - k[21]*y_cur[IDX_C7I] - + k[40]*y_cur[IDX_CI] - k[89]*y_cur[IDX_HI] - k[112]*y_cur[IDX_NI] - + k[3392]*y_cur[IDX_NI] - k[3393]*y_cur[IDX_NI] - + k[3693]*y_cur[IDX_OI] - k[4061]*y_cur[IDX_CII] - + k[4062]*y_cur[IDX_C2H2II] - k[4063]*y_cur[IDX_C2H3II] - + k[4064]*y_cur[IDX_C4H2II] - k[4065]*y_cur[IDX_C4H3II] - + k[4066]*y_cur[IDX_C4SII] - k[4067]*y_cur[IDX_CH2CCHII] - + k[4068]*y_cur[IDX_CH3II] - k[4069]*y_cur[IDX_CNCII] - + k[4070]*y_cur[IDX_FeII] - k[4071]*y_cur[IDX_HII] - + k[4072]*y_cur[IDX_H2COII] - k[4073]*y_cur[IDX_H2SII] - + k[4074]*y_cur[IDX_H3II] - k[4075]*y_cur[IDX_H3OII] - + k[4076]*y_cur[IDX_HC2SII] - k[4077]*y_cur[IDX_HCNHII] - + k[4078]*y_cur[IDX_HCNHII] - k[4079]*y_cur[IDX_HCOII] - + k[4080]*y_cur[IDX_HCOII] - k[4081]*y_cur[IDX_HeII] - + k[4082]*y_cur[IDX_MgII] - k[4083]*y_cur[IDX_NII] - + k[4084]*y_cur[IDX_N2HII] - k[4085]*y_cur[IDX_NH3II] - + k[4086]*y_cur[IDX_NH4II] - k[4087]*y_cur[IDX_NOII] - + k[4088]*y_cur[IDX_NaII] - k[4089]*y_cur[IDX_OII] - + k[4090]*y_cur[IDX_SII] - k[4091]*y_cur[IDX_SOII] - + k[4092]*y_cur[IDX_SiII] - k[4093]*y_cur[IDX_SiOII] - + k[4094]*y_cur[IDX_SiOHII] - k[4095]*y_cur[IDX_SiSII] - k[5716] - + k[6000]; + data[jistart + 8978] = 0.0 + k[3403]*y_cur[IDX_NI] + k[3698]*y_cur[IDX_OI]; + data[jistart + 8979] = 0.0 - k[4093]*y_cur[IDX_C3M]; + data[jistart + 8980] = 0.0 - k[4094]*y_cur[IDX_C3M]; + data[jistart + 8981] = 0.0 - k[4070]*y_cur[IDX_C3M]; + data[jistart + 8982] = 0.0 - k[4082]*y_cur[IDX_C3M]; + data[jistart + 8983] = 0.0 - k[4088]*y_cur[IDX_C3M]; + data[jistart + 8984] = 0.0 - k[21]*y_cur[IDX_C3M]; + data[jistart + 8985] = 0.0 - k[19]*y_cur[IDX_C3M]; + data[jistart + 8986] = 0.0 - k[20]*y_cur[IDX_C3M]; + data[jistart + 8987] = 0.0 - k[18]*y_cur[IDX_C3M]; + data[jistart + 8988] = 0.0 - k[4065]*y_cur[IDX_C3M]; + data[jistart + 8989] = 0.0 - k[4084]*y_cur[IDX_C3M]; + data[jistart + 8990] = 0.0 - k[4091]*y_cur[IDX_C3M]; + data[jistart + 8991] = 0.0 - k[4067]*y_cur[IDX_C3M]; + data[jistart + 8992] = 0.0 - k[4073]*y_cur[IDX_C3M]; + data[jistart + 8993] = 0.0 - k[4083]*y_cur[IDX_C3M]; + data[jistart + 8994] = 0.0 - k[4072]*y_cur[IDX_C3M]; + data[jistart + 8995] = 0.0 - k[17]*y_cur[IDX_C3M] + k[5591]*y_cur[IDX_eM]; + data[jistart + 8996] = 0.0 - k[4087]*y_cur[IDX_C3M]; + data[jistart + 8997] = 0.0 - k[4089]*y_cur[IDX_C3M]; + data[jistart + 8998] = 0.0 - k[4064]*y_cur[IDX_C3M]; + data[jistart + 8999] = 0.0 - k[4077]*y_cur[IDX_C3M] - k[4078]*y_cur[IDX_C3M]; + data[jistart + 9000] = 0.0 - k[4085]*y_cur[IDX_C3M]; + data[jistart + 9001] = 0.0 - k[4086]*y_cur[IDX_C3M]; + data[jistart + 9002] = 0.0 - k[4092]*y_cur[IDX_C3M]; + data[jistart + 9003] = 0.0 - k[4090]*y_cur[IDX_C3M]; + data[jistart + 9004] = 0.0 - k[4063]*y_cur[IDX_C3M]; + data[jistart + 9005] = 0.0 - k[4062]*y_cur[IDX_C3M]; + data[jistart + 9006] = 0.0 - k[4068]*y_cur[IDX_C3M]; + data[jistart + 9007] = 0.0 - k[112]*y_cur[IDX_C3M] - k[3392]*y_cur[IDX_C3M] - + k[3393]*y_cur[IDX_C3M] + k[3403]*y_cur[IDX_C4M]; + data[jistart + 9008] = 0.0 - k[4075]*y_cur[IDX_C3M]; + data[jistart + 9009] = 0.0 - k[3693]*y_cur[IDX_C3M] + k[3698]*y_cur[IDX_C4M]; + data[jistart + 9010] = 0.0 - k[4081]*y_cur[IDX_C3M]; + data[jistart + 9011] = 0.0 - k[4061]*y_cur[IDX_C3M]; + data[jistart + 9012] = 0.0 - k[4071]*y_cur[IDX_C3M]; + data[jistart + 9013] = 0.0 - k[40]*y_cur[IDX_C3M]; + data[jistart + 9014] = 0.0 - k[4079]*y_cur[IDX_C3M] - k[4080]*y_cur[IDX_C3M]; + data[jistart + 9015] = 0.0 - k[4074]*y_cur[IDX_C3M]; + data[jistart + 9016] = 0.0 + k[5591]*y_cur[IDX_C3I]; + data[jistart + 9017] = 0.0 - k[89]*y_cur[IDX_C3M]; + data[jistart + 9018] = 0.0 - k[4171]*y_cur[IDX_C4M]; + data[jistart + 9019] = 0.0 - k[4174]*y_cur[IDX_C4M]; + data[jistart + 9020] = 0.0 - k[4200]*y_cur[IDX_C4M]; + data[jistart + 9021] = 0.0 - k[4181]*y_cur[IDX_C4M]; + data[jistart + 9022] = 0.0 - k[22]*y_cur[IDX_C2I] - k[23]*y_cur[IDX_C3I] - + k[24]*y_cur[IDX_C4I] - k[25]*y_cur[IDX_C5I] - k[26]*y_cur[IDX_C6I] - + k[43]*y_cur[IDX_CI] - k[92]*y_cur[IDX_HI] - k[114]*y_cur[IDX_NI] - + k[3402]*y_cur[IDX_NI] - k[3403]*y_cur[IDX_NI] - + k[3698]*y_cur[IDX_OI] - k[4166]*y_cur[IDX_CII] - + k[4167]*y_cur[IDX_C2H2II] - k[4168]*y_cur[IDX_C2H3II] - + k[4169]*y_cur[IDX_C4H2II] - k[4170]*y_cur[IDX_C4H3II] - + k[4171]*y_cur[IDX_C4SII] - k[4172]*y_cur[IDX_CH2CCHII] - + k[4173]*y_cur[IDX_CH3II] - k[4174]*y_cur[IDX_CNCII] - + k[4175]*y_cur[IDX_FeII] - k[4176]*y_cur[IDX_HII] - + k[4177]*y_cur[IDX_H2COII] - k[4178]*y_cur[IDX_H2SII] - + k[4179]*y_cur[IDX_H3II] - k[4180]*y_cur[IDX_H3OII] - + k[4181]*y_cur[IDX_HC2SII] - k[4182]*y_cur[IDX_HCNHII] - + k[4183]*y_cur[IDX_HCNHII] - k[4184]*y_cur[IDX_HCOII] - + k[4185]*y_cur[IDX_HCOII] - k[4186]*y_cur[IDX_HeII] - + k[4187]*y_cur[IDX_MgII] - k[4188]*y_cur[IDX_NII] - + k[4189]*y_cur[IDX_N2HII] - k[4190]*y_cur[IDX_NH3II] - + k[4191]*y_cur[IDX_NH4II] - k[4192]*y_cur[IDX_NOII] - + k[4193]*y_cur[IDX_NaII] - k[4194]*y_cur[IDX_OII] - + k[4195]*y_cur[IDX_SII] - k[4196]*y_cur[IDX_SOII] - + k[4197]*y_cur[IDX_SiII] - k[4198]*y_cur[IDX_SiOII] - + k[4199]*y_cur[IDX_SiOHII] - k[4200]*y_cur[IDX_SiSII] - k[5726] - + k[6010]; + data[jistart + 9023] = 0.0 + k[3411]*y_cur[IDX_NI] + k[3703]*y_cur[IDX_OI]; + data[jistart + 9024] = 0.0 - k[4198]*y_cur[IDX_C4M]; + data[jistart + 9025] = 0.0 - k[4199]*y_cur[IDX_C4M]; + data[jistart + 9026] = 0.0 - k[4175]*y_cur[IDX_C4M]; + data[jistart + 9027] = 0.0 - k[4187]*y_cur[IDX_C4M]; + data[jistart + 9028] = 0.0 - k[4193]*y_cur[IDX_C4M]; + data[jistart + 9029] = 0.0 - k[25]*y_cur[IDX_C4M]; + data[jistart + 9030] = 0.0 - k[26]*y_cur[IDX_C4M]; + data[jistart + 9031] = 0.0 - k[24]*y_cur[IDX_C4M] + k[5594]*y_cur[IDX_eM]; + data[jistart + 9032] = 0.0 - k[4170]*y_cur[IDX_C4M]; + data[jistart + 9033] = 0.0 - k[4189]*y_cur[IDX_C4M]; + data[jistart + 9034] = 0.0 - k[4196]*y_cur[IDX_C4M]; + data[jistart + 9035] = 0.0 - k[4172]*y_cur[IDX_C4M]; + data[jistart + 9036] = 0.0 - k[4178]*y_cur[IDX_C4M]; + data[jistart + 9037] = 0.0 - k[4188]*y_cur[IDX_C4M]; + data[jistart + 9038] = 0.0 - k[4177]*y_cur[IDX_C4M]; + data[jistart + 9039] = 0.0 - k[23]*y_cur[IDX_C4M]; + data[jistart + 9040] = 0.0 - k[4192]*y_cur[IDX_C4M]; + data[jistart + 9041] = 0.0 - k[4194]*y_cur[IDX_C4M]; + data[jistart + 9042] = 0.0 - k[4169]*y_cur[IDX_C4M]; + data[jistart + 9043] = 0.0 - k[4182]*y_cur[IDX_C4M] - k[4183]*y_cur[IDX_C4M]; + data[jistart + 9044] = 0.0 - k[4190]*y_cur[IDX_C4M]; + data[jistart + 9045] = 0.0 - k[4191]*y_cur[IDX_C4M]; + data[jistart + 9046] = 0.0 - k[4197]*y_cur[IDX_C4M]; + data[jistart + 9047] = 0.0 - k[4195]*y_cur[IDX_C4M]; + data[jistart + 9048] = 0.0 - k[4168]*y_cur[IDX_C4M]; + data[jistart + 9049] = 0.0 - k[22]*y_cur[IDX_C4M]; + data[jistart + 9050] = 0.0 - k[4167]*y_cur[IDX_C4M]; + data[jistart + 9051] = 0.0 - k[4173]*y_cur[IDX_C4M]; + data[jistart + 9052] = 0.0 - k[114]*y_cur[IDX_C4M] - k[3402]*y_cur[IDX_C4M] - + k[3403]*y_cur[IDX_C4M] + k[3411]*y_cur[IDX_C5M]; + data[jistart + 9053] = 0.0 - k[4180]*y_cur[IDX_C4M]; + data[jistart + 9054] = 0.0 - k[3698]*y_cur[IDX_C4M] + k[3703]*y_cur[IDX_C5M]; + data[jistart + 9055] = 0.0 - k[4186]*y_cur[IDX_C4M]; + data[jistart + 9056] = 0.0 - k[4166]*y_cur[IDX_C4M]; + data[jistart + 9057] = 0.0 - k[4176]*y_cur[IDX_C4M]; + data[jistart + 9058] = 0.0 - k[43]*y_cur[IDX_C4M]; + data[jistart + 9059] = 0.0 - k[4184]*y_cur[IDX_C4M] - k[4185]*y_cur[IDX_C4M]; + data[jistart + 9060] = 0.0 - k[4179]*y_cur[IDX_C4M]; + data[jistart + 9061] = 0.0 + k[5594]*y_cur[IDX_C4I]; + data[jistart + 9062] = 0.0 - k[92]*y_cur[IDX_C4M]; + data[jistart + 9063] = 0.0 - k[4346]*y_cur[IDX_C6M]; + data[jistart + 9064] = 0.0 - k[4349]*y_cur[IDX_C6M]; + data[jistart + 9065] = 0.0 - k[4375]*y_cur[IDX_C6M]; + data[jistart + 9066] = 0.0 - k[4356]*y_cur[IDX_C6M]; + data[jistart + 9067] = 0.0 - k[31]*y_cur[IDX_C2I] - k[32]*y_cur[IDX_C3I] - + k[33]*y_cur[IDX_C4I] - k[47]*y_cur[IDX_CI] - k[97]*y_cur[IDX_HI] - + k[3418]*y_cur[IDX_NI] - k[3419]*y_cur[IDX_NI] - + k[3420]*y_cur[IDX_NI] - k[3708]*y_cur[IDX_OI] - + k[4341]*y_cur[IDX_CII] - k[4342]*y_cur[IDX_C2H2II] - + k[4343]*y_cur[IDX_C2H3II] - k[4344]*y_cur[IDX_C4H2II] - + k[4345]*y_cur[IDX_C4H3II] - k[4346]*y_cur[IDX_C4SII] - + k[4347]*y_cur[IDX_CH2CCHII] - k[4348]*y_cur[IDX_CH3II] - + k[4349]*y_cur[IDX_CNCII] - k[4350]*y_cur[IDX_FeII] - + k[4351]*y_cur[IDX_HII] - k[4352]*y_cur[IDX_H2COII] - + k[4353]*y_cur[IDX_H2SII] - k[4354]*y_cur[IDX_H3II] - + k[4355]*y_cur[IDX_H3OII] - k[4356]*y_cur[IDX_HC2SII] - + k[4357]*y_cur[IDX_HCNHII] - k[4358]*y_cur[IDX_HCNHII] - + k[4359]*y_cur[IDX_HCOII] - k[4360]*y_cur[IDX_HCOII] - + k[4361]*y_cur[IDX_HeII] - k[4362]*y_cur[IDX_MgII] - + k[4363]*y_cur[IDX_NII] - k[4364]*y_cur[IDX_N2HII] - + k[4365]*y_cur[IDX_NH3II] - k[4366]*y_cur[IDX_NH4II] - + k[4367]*y_cur[IDX_NOII] - k[4368]*y_cur[IDX_NaII] - + k[4369]*y_cur[IDX_OII] - k[4370]*y_cur[IDX_SII] - + k[4371]*y_cur[IDX_SOII] - k[4372]*y_cur[IDX_SiII] - + k[4373]*y_cur[IDX_SiOII] - k[4374]*y_cur[IDX_SiOHII] - + k[4375]*y_cur[IDX_SiSII] - k[5747] - k[6032]; + data[jistart + 9068] = 0.0 + k[3428]*y_cur[IDX_NI] + k[3712]*y_cur[IDX_OI]; + data[jistart + 9069] = 0.0 - k[4373]*y_cur[IDX_C6M]; + data[jistart + 9070] = 0.0 - k[4374]*y_cur[IDX_C6M]; + data[jistart + 9071] = 0.0 - k[4350]*y_cur[IDX_C6M]; + data[jistart + 9072] = 0.0 - k[4362]*y_cur[IDX_C6M]; + data[jistart + 9073] = 0.0 - k[4368]*y_cur[IDX_C6M]; + data[jistart + 9074] = 0.0 + k[5599]*y_cur[IDX_eM]; + data[jistart + 9075] = 0.0 - k[33]*y_cur[IDX_C6M]; + data[jistart + 9076] = 0.0 - k[4345]*y_cur[IDX_C6M]; + data[jistart + 9077] = 0.0 - k[4364]*y_cur[IDX_C6M]; + data[jistart + 9078] = 0.0 - k[4371]*y_cur[IDX_C6M]; + data[jistart + 9079] = 0.0 - k[4347]*y_cur[IDX_C6M]; + data[jistart + 9080] = 0.0 - k[4353]*y_cur[IDX_C6M]; + data[jistart + 9081] = 0.0 - k[4363]*y_cur[IDX_C6M]; + data[jistart + 9082] = 0.0 - k[4352]*y_cur[IDX_C6M]; + data[jistart + 9083] = 0.0 - k[32]*y_cur[IDX_C6M]; + data[jistart + 9084] = 0.0 - k[4367]*y_cur[IDX_C6M]; + data[jistart + 9085] = 0.0 - k[4369]*y_cur[IDX_C6M]; + data[jistart + 9086] = 0.0 - k[4344]*y_cur[IDX_C6M]; + data[jistart + 9087] = 0.0 - k[4357]*y_cur[IDX_C6M] - k[4358]*y_cur[IDX_C6M]; + data[jistart + 9088] = 0.0 - k[4365]*y_cur[IDX_C6M]; + data[jistart + 9089] = 0.0 - k[4366]*y_cur[IDX_C6M]; + data[jistart + 9090] = 0.0 - k[4372]*y_cur[IDX_C6M]; + data[jistart + 9091] = 0.0 - k[4370]*y_cur[IDX_C6M]; + data[jistart + 9092] = 0.0 - k[4343]*y_cur[IDX_C6M]; + data[jistart + 9093] = 0.0 - k[31]*y_cur[IDX_C6M]; + data[jistart + 9094] = 0.0 - k[4342]*y_cur[IDX_C6M]; + data[jistart + 9095] = 0.0 - k[4348]*y_cur[IDX_C6M]; + data[jistart + 9096] = 0.0 - k[3418]*y_cur[IDX_C6M] - k[3419]*y_cur[IDX_C6M] - + k[3420]*y_cur[IDX_C6M] + k[3428]*y_cur[IDX_C7M]; + data[jistart + 9097] = 0.0 - k[4355]*y_cur[IDX_C6M]; + data[jistart + 9098] = 0.0 - k[3708]*y_cur[IDX_C6M] + k[3712]*y_cur[IDX_C7M]; + data[jistart + 9099] = 0.0 - k[4361]*y_cur[IDX_C6M]; + data[jistart + 9100] = 0.0 - k[4341]*y_cur[IDX_C6M]; + data[jistart + 9101] = 0.0 - k[4351]*y_cur[IDX_C6M]; + data[jistart + 9102] = 0.0 - k[47]*y_cur[IDX_C6M]; + data[jistart + 9103] = 0.0 - k[4359]*y_cur[IDX_C6M] - k[4360]*y_cur[IDX_C6M]; + data[jistart + 9104] = 0.0 - k[4354]*y_cur[IDX_C6M]; + data[jistart + 9105] = 0.0 + k[5599]*y_cur[IDX_C6I]; + data[jistart + 9106] = 0.0 - k[97]*y_cur[IDX_C6M]; + data[jistart + 9107] = 0.0 + k[5654]*y_cur[IDX_HeII]; + data[jistart + 9108] = 0.0 + k[5659]*y_cur[IDX_HeII]; + data[jistart + 9109] = 0.0 + k[5665]*y_cur[IDX_HeII]; + data[jistart + 9110] = 0.0 + k[5627]*y_cur[IDX_CII]; + data[jistart + 9111] = 0.0 - k[2765]*y_cur[IDX_H3COII]; + data[jistart + 9112] = 0.0 + k[1307]*y_cur[IDX_CII] + k[2596]*y_cur[IDX_H3II]; + data[jistart + 9113] = 0.0 + k[2665]*y_cur[IDX_H3II]; + data[jistart + 9114] = 0.0 + k[2067]*y_cur[IDX_CH3II]; + data[jistart + 9115] = 0.0 + k[2496]*y_cur[IDX_H2COI]; + data[jistart + 9116] = 0.0 + k[2499]*y_cur[IDX_H2COI]; + data[jistart + 9117] = 0.0 + k[2141]*y_cur[IDX_H2COI]; + data[jistart + 9118] = 0.0 + k[2497]*y_cur[IDX_H2COI]; + data[jistart + 9119] = 0.0 + k[1720]*y_cur[IDX_H2COI]; + data[jistart + 9120] = 0.0 + k[2855]*y_cur[IDX_H2COI]; + data[jistart + 9121] = 0.0 + k[3663]*y_cur[IDX_O2II]; + data[jistart + 9122] = 0.0 + k[3487]*y_cur[IDX_H2COI]; + data[jistart + 9123] = 0.0 + k[3510]*y_cur[IDX_H2COI]; + data[jistart + 9124] = 0.0 + k[2225]*y_cur[IDX_H2COI] + k[3728]*y_cur[IDX_OI]; + data[jistart + 9125] = 0.0 + k[1381]*y_cur[IDX_CII] + k[1939]*y_cur[IDX_CHII] + + k[2073]*y_cur[IDX_CH3II] + k[2122]*y_cur[IDX_C3HII] + + k[2331]*y_cur[IDX_HII] - k[2762]*y_cur[IDX_H3COII] + + k[3337]*y_cur[IDX_NII] + k[3637]*y_cur[IDX_OII] + + k[3665]*y_cur[IDX_O2II] + k[6123]; + data[jistart + 9126] = 0.0 + k[2122]*y_cur[IDX_CH3OHI]; + data[jistart + 9127] = 0.0 - k[1034]*y_cur[IDX_eM] - k[1035]*y_cur[IDX_eM] - + k[1036]*y_cur[IDX_eM] - k[1037]*y_cur[IDX_eM] - + k[1038]*y_cur[IDX_eM] - k[2248]*y_cur[IDX_CHI] - + k[2545]*y_cur[IDX_H2OI] - k[2762]*y_cur[IDX_CH3OHI] - + k[2763]*y_cur[IDX_H2SI] - k[2764]*y_cur[IDX_C4H2I] - + k[2765]*y_cur[IDX_HCOOHI] - k[2875]*y_cur[IDX_HCNI] - + k[3039]*y_cur[IDX_HNCI] - k[3537]*y_cur[IDX_NH2I] - + k[3577]*y_cur[IDX_NH3I] - k[3628]*y_cur[IDX_NaI] - + k[6414]*y_cur[IDX_GRAINM] - k[6415]*y_cur[IDX_GRAINM] - + k[6416]*y_cur[IDX_GRAINM] - k[6417]*y_cur[IDX_GRAINM] - + k[6418]*y_cur[IDX_GRAINM]; + data[jistart + 9128] = 0.0 - k[3537]*y_cur[IDX_H3COII]; + data[jistart + 9129] = 0.0 + k[1469]*y_cur[IDX_H2COI]; + data[jistart + 9130] = 0.0 + k[1982]*y_cur[IDX_H2OI]; + data[jistart + 9131] = 0.0 + k[3778]*y_cur[IDX_H2COI]; + data[jistart + 9132] = 0.0 + k[2508]*y_cur[IDX_H2COI]; + data[jistart + 9133] = 0.0 + k[1939]*y_cur[IDX_CH3OHI] + k[1949]*y_cur[IDX_H2COI]; + data[jistart + 9134] = 0.0 + k[3663]*y_cur[IDX_CH3CHCH2I] + k[3665]*y_cur[IDX_CH3OHI]; + data[jistart + 9135] = 0.0 - k[3628]*y_cur[IDX_H3COII]; + data[jistart + 9136] = 0.0 + k[3611]*y_cur[IDX_H2COII]; + data[jistart + 9137] = 0.0 + k[3373]*y_cur[IDX_H2COI]; + data[jistart + 9138] = 0.0 + k[3849]*y_cur[IDX_C2H4I]; + data[jistart + 9139] = 0.0 + k[3337]*y_cur[IDX_CH3OHI]; + data[jistart + 9140] = 0.0 + k[2194]*y_cur[IDX_CH4I] + k[2488]*y_cur[IDX_H2COI] + + k[3007]*y_cur[IDX_HCOI] + k[3611]*y_cur[IDX_NHI]; + data[jistart + 9141] = 0.0 + k[3637]*y_cur[IDX_CH3OHI]; + data[jistart + 9142] = 0.0 - k[2764]*y_cur[IDX_H3COII]; + data[jistart + 9143] = 0.0 + k[2890]*y_cur[IDX_H2COI] + k[2891]*y_cur[IDX_H2COI]; + data[jistart + 9144] = 0.0 - k[3039]*y_cur[IDX_H3COII]; + data[jistart + 9145] = 0.0 + k[3849]*y_cur[IDX_SOII]; + data[jistart + 9146] = 0.0 + k[2089]*y_cur[IDX_CH3II]; + data[jistart + 9147] = 0.0 - k[2763]*y_cur[IDX_H3COII]; + data[jistart + 9148] = 0.0 + k[3007]*y_cur[IDX_H2COII]; + data[jistart + 9149] = 0.0 + k[2194]*y_cur[IDX_H2COII]; + data[jistart + 9150] = 0.0 + k[1469]*y_cur[IDX_C2HII] + k[1720]*y_cur[IDX_C2H5II] + + k[1949]*y_cur[IDX_CHII] + k[2141]*y_cur[IDX_CH4II] + + k[2225]*y_cur[IDX_CH5II] + k[2488]*y_cur[IDX_H2COII] + + k[2496]*y_cur[IDX_H3SII] + k[2497]*y_cur[IDX_HNOII] + + k[2499]*y_cur[IDX_O2HII] + k[2508]*y_cur[IDX_H2OII] + + k[2682]*y_cur[IDX_H3II] + k[2799]*y_cur[IDX_H3OII] + + k[2855]*y_cur[IDX_HCNII] + k[2890]*y_cur[IDX_HCNHII] + + k[2891]*y_cur[IDX_HCNHII] + k[2958]*y_cur[IDX_HCOII] + + k[3373]*y_cur[IDX_N2HII] + k[3487]*y_cur[IDX_NHII] + + k[3510]*y_cur[IDX_NH2II] + k[3778]*y_cur[IDX_OHII]; + data[jistart + 9151] = 0.0 - k[2875]*y_cur[IDX_H3COII]; + data[jistart + 9152] = 0.0 - k[2248]*y_cur[IDX_H3COII]; + data[jistart + 9153] = 0.0 - k[3577]*y_cur[IDX_H3COII]; + data[jistart + 9154] = 0.0 + k[2067]*y_cur[IDX_CH3CHOI] + k[2073]*y_cur[IDX_CH3OHI] + + k[2089]*y_cur[IDX_O2I]; + data[jistart + 9155] = 0.0 + k[2799]*y_cur[IDX_H2COI]; + data[jistart + 9156] = 0.0 + k[3728]*y_cur[IDX_CH5II]; + data[jistart + 9157] = 0.0 + k[5654]*y_cur[IDX_COOCH3I] + k[5659]*y_cur[IDX_CH2OHCOI] + + k[5665]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 9158] = 0.0 + k[1307]*y_cur[IDX_C2H5OHI] + k[1381]*y_cur[IDX_CH3OHI] + + k[5627]*y_cur[IDX_CH3OI]; + data[jistart + 9159] = 0.0 + k[1982]*y_cur[IDX_CH2II] - k[2545]*y_cur[IDX_H3COII]; + data[jistart + 9160] = 0.0 + k[2331]*y_cur[IDX_CH3OHI]; + data[jistart + 9161] = 0.0 + k[2958]*y_cur[IDX_H2COI]; + data[jistart + 9162] = 0.0 + k[2596]*y_cur[IDX_C2H5OHI] + k[2665]*y_cur[IDX_CH3COCH3I] + + k[2682]*y_cur[IDX_H2COI]; + data[jistart + 9163] = 0.0 - k[6414]*y_cur[IDX_H3COII] - k[6415]*y_cur[IDX_H3COII] - + k[6416]*y_cur[IDX_H3COII] - k[6417]*y_cur[IDX_H3COII] - + k[6418]*y_cur[IDX_H3COII]; + data[jistart + 9164] = 0.0 - k[1034]*y_cur[IDX_H3COII] - k[1035]*y_cur[IDX_H3COII] - + k[1036]*y_cur[IDX_H3COII] - k[1037]*y_cur[IDX_H3COII] - + k[1038]*y_cur[IDX_H3COII]; + data[jistart + 9165] = 0.0 - k[4241]*y_cur[IDX_C5M]; + data[jistart + 9166] = 0.0 - k[4244]*y_cur[IDX_C5M]; + data[jistart + 9167] = 0.0 - k[4270]*y_cur[IDX_C5M]; + data[jistart + 9168] = 0.0 - k[4251]*y_cur[IDX_C5M]; + data[jistart + 9169] = 0.0 + k[3420]*y_cur[IDX_NI] + k[3708]*y_cur[IDX_OI]; + data[jistart + 9170] = 0.0 - k[27]*y_cur[IDX_C2I] - k[28]*y_cur[IDX_C3I] - + k[29]*y_cur[IDX_C4I] - k[30]*y_cur[IDX_C5I] - k[45]*y_cur[IDX_CI] - + k[94]*y_cur[IDX_HI] - k[116]*y_cur[IDX_NI] - k[3409]*y_cur[IDX_NI] - + k[3410]*y_cur[IDX_NI] - k[3411]*y_cur[IDX_NI] - + k[3703]*y_cur[IDX_OI] - k[4236]*y_cur[IDX_CII] - + k[4237]*y_cur[IDX_C2H2II] - k[4238]*y_cur[IDX_C2H3II] - + k[4239]*y_cur[IDX_C4H2II] - k[4240]*y_cur[IDX_C4H3II] - + k[4241]*y_cur[IDX_C4SII] - k[4242]*y_cur[IDX_CH2CCHII] - + k[4243]*y_cur[IDX_CH3II] - k[4244]*y_cur[IDX_CNCII] - + k[4245]*y_cur[IDX_FeII] - k[4246]*y_cur[IDX_HII] - + k[4247]*y_cur[IDX_H2COII] - k[4248]*y_cur[IDX_H2SII] - + k[4249]*y_cur[IDX_H3II] - k[4250]*y_cur[IDX_H3OII] - + k[4251]*y_cur[IDX_HC2SII] - k[4252]*y_cur[IDX_HCNHII] - + k[4253]*y_cur[IDX_HCNHII] - k[4254]*y_cur[IDX_HCOII] - + k[4255]*y_cur[IDX_HCOII] - k[4256]*y_cur[IDX_HeII] - + k[4257]*y_cur[IDX_MgII] - k[4258]*y_cur[IDX_NII] - + k[4259]*y_cur[IDX_N2HII] - k[4260]*y_cur[IDX_NH3II] - + k[4261]*y_cur[IDX_NH4II] - k[4262]*y_cur[IDX_NOII] - + k[4263]*y_cur[IDX_NaII] - k[4264]*y_cur[IDX_OII] - + k[4265]*y_cur[IDX_SII] - k[4266]*y_cur[IDX_SOII] - + k[4267]*y_cur[IDX_SiII] - k[4268]*y_cur[IDX_SiOII] - + k[4269]*y_cur[IDX_SiOHII] - k[4270]*y_cur[IDX_SiSII] - k[5736] - + k[6022]; + data[jistart + 9171] = 0.0 - k[4268]*y_cur[IDX_C5M]; + data[jistart + 9172] = 0.0 - k[4269]*y_cur[IDX_C5M]; + data[jistart + 9173] = 0.0 - k[4245]*y_cur[IDX_C5M]; + data[jistart + 9174] = 0.0 - k[4257]*y_cur[IDX_C5M]; + data[jistart + 9175] = 0.0 - k[4263]*y_cur[IDX_C5M]; + data[jistart + 9176] = 0.0 - k[30]*y_cur[IDX_C5M] + k[5596]*y_cur[IDX_eM]; + data[jistart + 9177] = 0.0 - k[29]*y_cur[IDX_C5M]; + data[jistart + 9178] = 0.0 - k[4240]*y_cur[IDX_C5M]; + data[jistart + 9179] = 0.0 - k[4259]*y_cur[IDX_C5M]; + data[jistart + 9180] = 0.0 - k[4266]*y_cur[IDX_C5M]; + data[jistart + 9181] = 0.0 - k[4242]*y_cur[IDX_C5M]; + data[jistart + 9182] = 0.0 - k[4248]*y_cur[IDX_C5M]; + data[jistart + 9183] = 0.0 - k[4258]*y_cur[IDX_C5M]; + data[jistart + 9184] = 0.0 - k[4247]*y_cur[IDX_C5M]; + data[jistart + 9185] = 0.0 - k[28]*y_cur[IDX_C5M]; + data[jistart + 9186] = 0.0 - k[4262]*y_cur[IDX_C5M]; + data[jistart + 9187] = 0.0 - k[4264]*y_cur[IDX_C5M]; + data[jistart + 9188] = 0.0 - k[4239]*y_cur[IDX_C5M]; + data[jistart + 9189] = 0.0 - k[4252]*y_cur[IDX_C5M] - k[4253]*y_cur[IDX_C5M]; + data[jistart + 9190] = 0.0 - k[4260]*y_cur[IDX_C5M]; + data[jistart + 9191] = 0.0 - k[4261]*y_cur[IDX_C5M]; + data[jistart + 9192] = 0.0 - k[4267]*y_cur[IDX_C5M]; + data[jistart + 9193] = 0.0 - k[4265]*y_cur[IDX_C5M]; + data[jistart + 9194] = 0.0 - k[4238]*y_cur[IDX_C5M]; + data[jistart + 9195] = 0.0 - k[27]*y_cur[IDX_C5M]; + data[jistart + 9196] = 0.0 - k[4237]*y_cur[IDX_C5M]; + data[jistart + 9197] = 0.0 - k[4243]*y_cur[IDX_C5M]; + data[jistart + 9198] = 0.0 - k[116]*y_cur[IDX_C5M] - k[3409]*y_cur[IDX_C5M] - + k[3410]*y_cur[IDX_C5M] - k[3411]*y_cur[IDX_C5M] + + k[3420]*y_cur[IDX_C6M]; + data[jistart + 9199] = 0.0 - k[4250]*y_cur[IDX_C5M]; + data[jistart + 9200] = 0.0 - k[3703]*y_cur[IDX_C5M] + k[3708]*y_cur[IDX_C6M]; + data[jistart + 9201] = 0.0 - k[4256]*y_cur[IDX_C5M]; + data[jistart + 9202] = 0.0 - k[4236]*y_cur[IDX_C5M]; + data[jistart + 9203] = 0.0 - k[4246]*y_cur[IDX_C5M]; + data[jistart + 9204] = 0.0 - k[45]*y_cur[IDX_C5M]; + data[jistart + 9205] = 0.0 - k[4254]*y_cur[IDX_C5M] - k[4255]*y_cur[IDX_C5M]; + data[jistart + 9206] = 0.0 - k[4249]*y_cur[IDX_C5M]; + data[jistart + 9207] = 0.0 + k[5596]*y_cur[IDX_C5I]; + data[jistart + 9208] = 0.0 - k[94]*y_cur[IDX_C5M]; + data[jistart + 9209] = 0.0 - k[4416]*y_cur[IDX_C7M]; + data[jistart + 9210] = 0.0 - k[4419]*y_cur[IDX_C7M]; + data[jistart + 9211] = 0.0 - k[4445]*y_cur[IDX_C7M]; + data[jistart + 9212] = 0.0 - k[4426]*y_cur[IDX_C7M]; + data[jistart + 9213] = 0.0 + k[3439]*y_cur[IDX_NI] + k[3717]*y_cur[IDX_OI]; + data[jistart + 9214] = 0.0 - k[34]*y_cur[IDX_C2I] - k[35]*y_cur[IDX_C3I] - + k[49]*y_cur[IDX_CI] - k[99]*y_cur[IDX_HI] - k[118]*y_cur[IDX_NI] - + k[3425]*y_cur[IDX_NI] - k[3426]*y_cur[IDX_NI] - + k[3427]*y_cur[IDX_NI] - k[3428]*y_cur[IDX_NI] - + k[3712]*y_cur[IDX_OI] - k[4411]*y_cur[IDX_CII] - + k[4412]*y_cur[IDX_C2H2II] - k[4413]*y_cur[IDX_C2H3II] - + k[4414]*y_cur[IDX_C4H2II] - k[4415]*y_cur[IDX_C4H3II] - + k[4416]*y_cur[IDX_C4SII] - k[4417]*y_cur[IDX_CH2CCHII] - + k[4418]*y_cur[IDX_CH3II] - k[4419]*y_cur[IDX_CNCII] - + k[4420]*y_cur[IDX_FeII] - k[4421]*y_cur[IDX_HII] - + k[4422]*y_cur[IDX_H2COII] - k[4423]*y_cur[IDX_H2SII] - + k[4424]*y_cur[IDX_H3II] - k[4425]*y_cur[IDX_H3OII] - + k[4426]*y_cur[IDX_HC2SII] - k[4427]*y_cur[IDX_HCNHII] - + k[4428]*y_cur[IDX_HCNHII] - k[4429]*y_cur[IDX_HCOII] - + k[4430]*y_cur[IDX_HCOII] - k[4431]*y_cur[IDX_HeII] - + k[4432]*y_cur[IDX_MgII] - k[4433]*y_cur[IDX_NII] - + k[4434]*y_cur[IDX_N2HII] - k[4435]*y_cur[IDX_NH3II] - + k[4436]*y_cur[IDX_NH4II] - k[4437]*y_cur[IDX_NOII] - + k[4438]*y_cur[IDX_NaII] - k[4439]*y_cur[IDX_OII] - + k[4440]*y_cur[IDX_SII] - k[4441]*y_cur[IDX_SOII] - + k[4442]*y_cur[IDX_SiII] - k[4443]*y_cur[IDX_SiOII] - + k[4444]*y_cur[IDX_SiOHII] - k[4445]*y_cur[IDX_SiSII] - k[5755] - + k[6041]; + data[jistart + 9215] = 0.0 - k[4443]*y_cur[IDX_C7M]; + data[jistart + 9216] = 0.0 - k[4444]*y_cur[IDX_C7M]; + data[jistart + 9217] = 0.0 - k[4420]*y_cur[IDX_C7M]; + data[jistart + 9218] = 0.0 - k[4432]*y_cur[IDX_C7M]; + data[jistart + 9219] = 0.0 - k[4438]*y_cur[IDX_C7M]; + data[jistart + 9220] = 0.0 + k[5601]*y_cur[IDX_eM]; + data[jistart + 9221] = 0.0 - k[4415]*y_cur[IDX_C7M]; + data[jistart + 9222] = 0.0 - k[4434]*y_cur[IDX_C7M]; + data[jistart + 9223] = 0.0 - k[4441]*y_cur[IDX_C7M]; + data[jistart + 9224] = 0.0 - k[4417]*y_cur[IDX_C7M]; + data[jistart + 9225] = 0.0 - k[4423]*y_cur[IDX_C7M]; + data[jistart + 9226] = 0.0 - k[4433]*y_cur[IDX_C7M]; + data[jistart + 9227] = 0.0 - k[4422]*y_cur[IDX_C7M]; + data[jistart + 9228] = 0.0 - k[35]*y_cur[IDX_C7M]; + data[jistart + 9229] = 0.0 - k[4437]*y_cur[IDX_C7M]; + data[jistart + 9230] = 0.0 - k[4439]*y_cur[IDX_C7M]; + data[jistart + 9231] = 0.0 - k[4414]*y_cur[IDX_C7M]; + data[jistart + 9232] = 0.0 - k[4427]*y_cur[IDX_C7M] - k[4428]*y_cur[IDX_C7M]; + data[jistart + 9233] = 0.0 - k[4435]*y_cur[IDX_C7M]; + data[jistart + 9234] = 0.0 - k[4436]*y_cur[IDX_C7M]; + data[jistart + 9235] = 0.0 - k[4442]*y_cur[IDX_C7M]; + data[jistart + 9236] = 0.0 - k[4440]*y_cur[IDX_C7M]; + data[jistart + 9237] = 0.0 - k[4413]*y_cur[IDX_C7M]; + data[jistart + 9238] = 0.0 - k[34]*y_cur[IDX_C7M]; + data[jistart + 9239] = 0.0 - k[4412]*y_cur[IDX_C7M]; + data[jistart + 9240] = 0.0 - k[4418]*y_cur[IDX_C7M]; + data[jistart + 9241] = 0.0 - k[118]*y_cur[IDX_C7M] - k[3425]*y_cur[IDX_C7M] - + k[3426]*y_cur[IDX_C7M] - k[3427]*y_cur[IDX_C7M] - + k[3428]*y_cur[IDX_C7M] + k[3439]*y_cur[IDX_C8M]; + data[jistart + 9242] = 0.0 - k[4425]*y_cur[IDX_C7M]; + data[jistart + 9243] = 0.0 - k[3712]*y_cur[IDX_C7M] + k[3717]*y_cur[IDX_C8M]; + data[jistart + 9244] = 0.0 - k[4431]*y_cur[IDX_C7M]; + data[jistart + 9245] = 0.0 - k[4411]*y_cur[IDX_C7M]; + data[jistart + 9246] = 0.0 - k[4421]*y_cur[IDX_C7M]; + data[jistart + 9247] = 0.0 - k[49]*y_cur[IDX_C7M]; + data[jistart + 9248] = 0.0 - k[4429]*y_cur[IDX_C7M] - k[4430]*y_cur[IDX_C7M]; + data[jistart + 9249] = 0.0 - k[4424]*y_cur[IDX_C7M]; + data[jistart + 9250] = 0.0 + k[5601]*y_cur[IDX_C7I]; + data[jistart + 9251] = 0.0 - k[99]*y_cur[IDX_C7M]; + data[jistart + 9252] = 0.0 + k[3761]*y_cur[IDX_OI]; + data[jistart + 9253] = 0.0 + k[3753]*y_cur[IDX_OI]; + data[jistart + 9254] = 0.0 + k[3756]*y_cur[IDX_OI]; + data[jistart + 9255] = 0.0 - k[4794]*y_cur[IDX_SiOII]; + data[jistart + 9256] = 0.0 - k[4653]*y_cur[IDX_SiOII]; + data[jistart + 9257] = 0.0 - k[4864]*y_cur[IDX_SiOII]; + data[jistart + 9258] = 0.0 + k[3676]*y_cur[IDX_O2I]; + data[jistart + 9259] = 0.0 - k[4058]*y_cur[IDX_SiOII]; + data[jistart + 9260] = 0.0 - k[4233]*y_cur[IDX_SiOII]; + data[jistart + 9261] = 0.0 - k[4829]*y_cur[IDX_SiOII]; + data[jistart + 9262] = 0.0 - k[3988]*y_cur[IDX_SiOII]; + data[jistart + 9263] = 0.0 - k[4128]*y_cur[IDX_SiOII]; + data[jistart + 9264] = 0.0 - k[4408]*y_cur[IDX_SiOII]; + data[jistart + 9265] = 0.0 - k[4548]*y_cur[IDX_SiOII]; + data[jistart + 9266] = 0.0 - k[4478]*y_cur[IDX_SiOII]; + data[jistart + 9267] = 0.0 - k[4618]*y_cur[IDX_SiOII]; + data[jistart + 9268] = 0.0 - k[3953]*y_cur[IDX_SiOII]; + data[jistart + 9269] = 0.0 - k[4303]*y_cur[IDX_SiOII]; + data[jistart + 9270] = 0.0 - k[4338]*y_cur[IDX_SiOII]; + data[jistart + 9271] = 0.0 - k[3918]*y_cur[IDX_SiOII]; + data[jistart + 9272] = 0.0 - k[4759]*y_cur[IDX_SiOII]; + data[jistart + 9273] = 0.0 - k[4583]*y_cur[IDX_SiOII]; + data[jistart + 9274] = 0.0 - k[4724]*y_cur[IDX_SiOII]; + data[jistart + 9275] = 0.0 - k[4513]*y_cur[IDX_SiOII]; + data[jistart + 9276] = 0.0 - k[4023]*y_cur[IDX_SiOII]; + data[jistart + 9277] = 0.0 - k[4093]*y_cur[IDX_SiOII]; + data[jistart + 9278] = 0.0 - k[4198]*y_cur[IDX_SiOII]; + data[jistart + 9279] = 0.0 - k[4373]*y_cur[IDX_SiOII]; + data[jistart + 9280] = 0.0 - k[4268]*y_cur[IDX_SiOII]; + data[jistart + 9281] = 0.0 - k[4443]*y_cur[IDX_SiOII]; + data[jistart + 9282] = 0.0 - k[504]*y_cur[IDX_HCOI] - k[541]*y_cur[IDX_MgI] - + k[631]*y_cur[IDX_NOI] - k[726]*y_cur[IDX_FeI] - + k[1266]*y_cur[IDX_eM] - k[1465]*y_cur[IDX_C2I] - + k[1932]*y_cur[IDX_CI] - k[2019]*y_cur[IDX_CH2I] - + k[2268]*y_cur[IDX_CHI] - k[2292]*y_cur[IDX_COI] - + k[2475]*y_cur[IDX_H2I] - k[3475]*y_cur[IDX_NI] - + k[3476]*y_cur[IDX_NI] - k[3764]*y_cur[IDX_OI] - + k[3842]*y_cur[IDX_SI] - k[3918]*y_cur[IDX_CM] - + k[3953]*y_cur[IDX_C10M] - k[3988]*y_cur[IDX_C10HM] - + k[4023]*y_cur[IDX_C2M] - k[4058]*y_cur[IDX_C2HM] - + k[4093]*y_cur[IDX_C3M] - k[4128]*y_cur[IDX_C3HM] - + k[4163]*y_cur[IDX_C3NM] - k[4198]*y_cur[IDX_C4M] - + k[4233]*y_cur[IDX_C4HM] - k[4268]*y_cur[IDX_C5M] - + k[4303]*y_cur[IDX_C5HM] - k[4338]*y_cur[IDX_C5NM] - + k[4373]*y_cur[IDX_C6M] - k[4408]*y_cur[IDX_C6HM] - + k[4443]*y_cur[IDX_C7M] - k[4478]*y_cur[IDX_C7HM] - + k[4513]*y_cur[IDX_C8M] - k[4548]*y_cur[IDX_C8HM] - + k[4583]*y_cur[IDX_C9M] - k[4618]*y_cur[IDX_C9HM] - + k[4653]*y_cur[IDX_CHM] - k[4688]*y_cur[IDX_CNM] - + k[4724]*y_cur[IDX_HM] - k[4759]*y_cur[IDX_OM] - + k[4794]*y_cur[IDX_O2M] - k[4829]*y_cur[IDX_OHM] - + k[4864]*y_cur[IDX_SM] - k[6284] - k[6531]*y_cur[IDX_GRAINM]; + data[jistart + 9283] = 0.0 - k[4163]*y_cur[IDX_SiOII]; + data[jistart + 9284] = 0.0 + k[434]*y_cur[IDX_HII] + k[6287]; + data[jistart + 9285] = 0.0 - k[726]*y_cur[IDX_SiOII]; + data[jistart + 9286] = 0.0 - k[541]*y_cur[IDX_SiOII]; + data[jistart + 9287] = 0.0 - k[4688]*y_cur[IDX_SiOII]; + data[jistart + 9288] = 0.0 - k[2019]*y_cur[IDX_SiOII]; + data[jistart + 9289] = 0.0 + k[3676]*y_cur[IDX_SiSII]; + data[jistart + 9290] = 0.0 + k[3809]*y_cur[IDX_OHI] + k[5584]*y_cur[IDX_OI]; + data[jistart + 9291] = 0.0 - k[631]*y_cur[IDX_SiOII]; + data[jistart + 9292] = 0.0 - k[504]*y_cur[IDX_SiOII]; + data[jistart + 9293] = 0.0 - k[2268]*y_cur[IDX_SiOII]; + data[jistart + 9294] = 0.0 - k[3842]*y_cur[IDX_SiOII]; + data[jistart + 9295] = 0.0 - k[1465]*y_cur[IDX_SiOII]; + data[jistart + 9296] = 0.0 + k[3809]*y_cur[IDX_SiII]; + data[jistart + 9297] = 0.0 - k[3475]*y_cur[IDX_SiOII] - k[3476]*y_cur[IDX_SiOII]; + data[jistart + 9298] = 0.0 + k[3753]*y_cur[IDX_SiCII] + k[3756]*y_cur[IDX_SiHII] + + k[3761]*y_cur[IDX_SiNII] - k[3764]*y_cur[IDX_SiOII] + + k[5584]*y_cur[IDX_SiII]; + data[jistart + 9299] = 0.0 + k[434]*y_cur[IDX_SiOI]; + data[jistart + 9300] = 0.0 - k[1932]*y_cur[IDX_SiOII]; + data[jistart + 9301] = 0.0 - k[2292]*y_cur[IDX_SiOII]; + data[jistart + 9302] = 0.0 - k[6531]*y_cur[IDX_SiOII]; + data[jistart + 9303] = 0.0 - k[2475]*y_cur[IDX_SiOII]; + data[jistart + 9304] = 0.0 - k[1266]*y_cur[IDX_SiOII]; + data[jistart + 9305] = 0.0 + k[5940]; + data[jistart + 9306] = 0.0 + k[7129] + k[7311] + k[7493]; + data[jistart + 9307] = 0.0 + k[4960]*y_cur[IDX_CI]; + data[jistart + 9308] = 0.0 + k[782]*y_cur[IDX_eM] + k[6635]*y_cur[IDX_GRAINM]; + data[jistart + 9309] = 0.0 + k[5217]*y_cur[IDX_CI]; + data[jistart + 9310] = 0.0 + k[784]*y_cur[IDX_eM] + k[6472]*y_cur[IDX_GRAINM]; + data[jistart + 9311] = 0.0 + k[831]*y_cur[IDX_eM] + k[6740]*y_cur[IDX_GRAINM]; + data[jistart + 9312] = 0.0 + k[5252]*y_cur[IDX_NI]; + data[jistart + 9313] = 0.0 + k[5247]*y_cur[IDX_NI]; + data[jistart + 9314] = 0.0 + k[4968]*y_cur[IDX_CI] + k[5273]*y_cur[IDX_NI]; + data[jistart + 9315] = 0.0 + k[8703]*y_cur[IDX_GNI]; + data[jistart + 9316] = 0.0 + k[8664]*y_cur[IDX_GCI]; + data[jistart + 9317] = 0.0 + k[8703]*y_cur[IDX_GC2I]; + data[jistart + 9318] = 0.0 + k[3894]*y_cur[IDX_CM] + k[3929]*y_cur[IDX_C10M] + + k[3964]*y_cur[IDX_C10HM] + k[3999]*y_cur[IDX_C2M] + + k[4034]*y_cur[IDX_C2HM] + k[4069]*y_cur[IDX_C3M] + + k[4104]*y_cur[IDX_C3HM] + k[4139]*y_cur[IDX_C3NM] + + k[4174]*y_cur[IDX_C4M] + k[4209]*y_cur[IDX_C4HM] + + k[4244]*y_cur[IDX_C5M] + k[4279]*y_cur[IDX_C5HM] + + k[4314]*y_cur[IDX_C5NM] + k[4349]*y_cur[IDX_C6M] + + k[4384]*y_cur[IDX_C6HM] + k[4419]*y_cur[IDX_C7M] + + k[4454]*y_cur[IDX_C7HM] + k[4489]*y_cur[IDX_C8M] + + k[4524]*y_cur[IDX_C8HM] + k[4559]*y_cur[IDX_C9M] + + k[4594]*y_cur[IDX_C9HM] + k[4629]*y_cur[IDX_CHM] + + k[4664]*y_cur[IDX_CNM] + k[4699]*y_cur[IDX_HM] + + k[4735]*y_cur[IDX_OM] + k[4770]*y_cur[IDX_O2M] + + k[4805]*y_cur[IDX_OHM] + k[4840]*y_cur[IDX_SM]; + data[jistart + 9319] = 0.0 + k[4770]*y_cur[IDX_CNCII]; + data[jistart + 9320] = 0.0 + k[4629]*y_cur[IDX_CNCII]; + data[jistart + 9321] = 0.0 + k[4840]*y_cur[IDX_CNCII]; + data[jistart + 9322] = 0.0 + k[111]*y_cur[IDX_NI] + k[4034]*y_cur[IDX_CNCII]; + data[jistart + 9323] = 0.0 + k[4209]*y_cur[IDX_CNCII]; + data[jistart + 9324] = 0.0 + k[4805]*y_cur[IDX_CNCII]; + data[jistart + 9325] = 0.0 + k[3964]*y_cur[IDX_CNCII]; + data[jistart + 9326] = 0.0 + k[4104]*y_cur[IDX_CNCII]; + data[jistart + 9327] = 0.0 + k[4384]*y_cur[IDX_CNCII]; + data[jistart + 9328] = 0.0 + k[4524]*y_cur[IDX_CNCII]; + data[jistart + 9329] = 0.0 + k[4454]*y_cur[IDX_CNCII]; + data[jistart + 9330] = 0.0 + k[4594]*y_cur[IDX_CNCII]; + data[jistart + 9331] = 0.0 + k[3929]*y_cur[IDX_CNCII]; + data[jistart + 9332] = 0.0 + k[4279]*y_cur[IDX_CNCII]; + data[jistart + 9333] = 0.0 + k[4314]*y_cur[IDX_CNCII]; + data[jistart + 9334] = 0.0 + k[3894]*y_cur[IDX_CNCII]; + data[jistart + 9335] = 0.0 + k[4735]*y_cur[IDX_CNCII]; + data[jistart + 9336] = 0.0 + k[4559]*y_cur[IDX_CNCII]; + data[jistart + 9337] = 0.0 + k[4699]*y_cur[IDX_CNCII]; + data[jistart + 9338] = 0.0 + k[4489]*y_cur[IDX_CNCII]; + data[jistart + 9339] = 0.0 + k[110]*y_cur[IDX_NI] + k[3999]*y_cur[IDX_CNCII]; + data[jistart + 9340] = 0.0 + k[4069]*y_cur[IDX_CNCII]; + data[jistart + 9341] = 0.0 + k[4174]*y_cur[IDX_CNCII]; + data[jistart + 9342] = 0.0 + k[4349]*y_cur[IDX_CNCII]; + data[jistart + 9343] = 0.0 + k[4244]*y_cur[IDX_CNCII]; + data[jistart + 9344] = 0.0 + k[4419]*y_cur[IDX_CNCII]; + data[jistart + 9345] = 0.0 - k[330]*y_cur[IDX_HII] - k[2598]*y_cur[IDX_H3II] - + k[3089]*y_cur[IDX_HeII] - k[4917]*y_cur[IDX_CI] - + k[5229]*y_cur[IDX_NI] - k[5353]*y_cur[IDX_OI] - k[5710] - k[5711] - + k[5995] - k[5996] - k[6947]; + data[jistart + 9346] = 0.0 + k[130]*y_cur[IDX_OI] + k[4139]*y_cur[IDX_CNCII]; + data[jistart + 9347] = 0.0 + k[5234]*y_cur[IDX_NI] + k[5358]*y_cur[IDX_OI]; + data[jistart + 9348] = 0.0 + k[8664]*y_cur[IDX_GCNI]; + data[jistart + 9349] = 0.0 + k[4664]*y_cur[IDX_CNCII]; + data[jistart + 9350] = 0.0 + k[5228]*y_cur[IDX_NI]; + data[jistart + 9351] = 0.0 + k[110]*y_cur[IDX_C2M] + k[111]*y_cur[IDX_C2HM] + + k[5228]*y_cur[IDX_C2HI] - k[5229]*y_cur[IDX_C2NI] + + k[5234]*y_cur[IDX_C3NI] + k[5247]*y_cur[IDX_C7NI] + + k[5252]*y_cur[IDX_C9NI] + k[5273]*y_cur[IDX_NCCNI]; + data[jistart + 9352] = 0.0 + k[130]*y_cur[IDX_C3NM] - k[5353]*y_cur[IDX_C2NI] + + k[5358]*y_cur[IDX_C3NI]; + data[jistart + 9353] = 0.0 - k[3089]*y_cur[IDX_C2NI]; + data[jistart + 9354] = 0.0 - k[330]*y_cur[IDX_C2NI]; + data[jistart + 9355] = 0.0 - k[4917]*y_cur[IDX_C2NI] + k[4960]*y_cur[IDX_H2CNI] + + k[4968]*y_cur[IDX_NCCNI] + k[5217]*y_cur[IDX_HONCI]; + data[jistart + 9356] = 0.0 - k[2598]*y_cur[IDX_C2NI]; + data[jistart + 9357] = 0.0 + k[6472]*y_cur[IDX_C2NHII] + k[6635]*y_cur[IDX_C2N2II] + + k[6740]*y_cur[IDX_C4NII]; + data[jistart + 9358] = 0.0 + k[782]*y_cur[IDX_C2N2II] + k[784]*y_cur[IDX_C2NHII] + + k[831]*y_cur[IDX_C4NII]; + data[jistart + 9359] = 0.0 + k[7752] + k[8066]; + data[jistart + 9360] = 0.0 + k[7738] + k[8048]; + data[jistart + 9361] = 0.0 + k[7887]; + data[jistart + 9362] = 0.0 + k[7766] + k[8086]; + data[jistart + 9363] = 0.0 + k[7722] + k[8030]; + data[jistart + 9364] = 0.0 + k[7730] + k[8039]; + data[jistart + 9365] = 0.0 - k[8477]*y_cur[IDX_GCHI]; + data[jistart + 9366] = 0.0 - k[8502]*y_cur[IDX_GCHI] - k[8735]*y_cur[IDX_GCHI]; + data[jistart + 9367] = 0.0 - k[8485]*y_cur[IDX_GCHI]; + data[jistart + 9368] = 0.0 + k[7673] + k[7960]; + data[jistart + 9369] = 0.0 - k[8503]*y_cur[IDX_GCHI] - k[8736]*y_cur[IDX_GCHI]; + data[jistart + 9370] = 0.0 + k[7648] + k[7648] + k[7935] + k[7935]; + data[jistart + 9371] = 0.0 - k[8495]*y_cur[IDX_GCHI] - k[8728]*y_cur[IDX_GCHI]; + data[jistart + 9372] = 0.0 - k[8500]*y_cur[IDX_GCHI] - k[8733]*y_cur[IDX_GCHI]; + data[jistart + 9373] = 0.0 - k[8497]*y_cur[IDX_GCHI] - k[8730]*y_cur[IDX_GCHI]; + data[jistart + 9374] = 0.0 - k[8501]*y_cur[IDX_GCHI] - k[8734]*y_cur[IDX_GCHI]; + data[jistart + 9375] = 0.0 + k[7700] + k[8000]; + data[jistart + 9376] = 0.0 - k[8492]*y_cur[IDX_GCHI] - k[8725]*y_cur[IDX_GCHI]; + data[jistart + 9377] = 0.0 - k[8494]*y_cur[IDX_GCHI] - k[8727]*y_cur[IDX_GCHI]; + data[jistart + 9378] = 0.0 - k[8496]*y_cur[IDX_GCHI] - k[8729]*y_cur[IDX_GCHI]; + data[jistart + 9379] = 0.0 - k[8498]*y_cur[IDX_GCHI] - k[8731]*y_cur[IDX_GCHI]; + data[jistart + 9380] = 0.0 + k[7661] + k[7662] + k[7948] + k[7949] - k[8489]*y_cur[IDX_GCHI] - k[8490]*y_cur[IDX_GCHI] - k[8722]*y_cur[IDX_GCHI] - k[8723]*y_cur[IDX_GCHI]; - data[jistart + 9444] = 0.0 + k[7673] + k[7960]; - data[jistart + 9445] = 0.0 - k[8491]*y_cur[IDX_GCHI] - - k[8724]*y_cur[IDX_GCHI]; - data[jistart + 9446] = 0.0 - k[8492]*y_cur[IDX_GCHI] - - k[8725]*y_cur[IDX_GCHI]; - data[jistart + 9447] = 0.0 - k[8493]*y_cur[IDX_GCHI] - - k[8726]*y_cur[IDX_GCHI]; - data[jistart + 9448] = 0.0 - k[8494]*y_cur[IDX_GCHI] - - k[8727]*y_cur[IDX_GCHI]; - data[jistart + 9449] = 0.0 - k[8495]*y_cur[IDX_GCHI] - - k[8728]*y_cur[IDX_GCHI]; - data[jistart + 9450] = 0.0 - k[8496]*y_cur[IDX_GCHI] - - k[8729]*y_cur[IDX_GCHI]; - data[jistart + 9451] = 0.0 - k[8497]*y_cur[IDX_GCHI] - - k[8730]*y_cur[IDX_GCHI]; - data[jistart + 9452] = 0.0 - k[8498]*y_cur[IDX_GCHI] - - k[8731]*y_cur[IDX_GCHI]; - data[jistart + 9453] = 0.0 - k[8499]*y_cur[IDX_GCHI] - - k[8732]*y_cur[IDX_GCHI]; - data[jistart + 9454] = 0.0 - k[8500]*y_cur[IDX_GCHI] - - k[8733]*y_cur[IDX_GCHI]; - data[jistart + 9455] = 0.0 - k[8501]*y_cur[IDX_GCHI] - - k[8734]*y_cur[IDX_GCHI]; - data[jistart + 9456] = 0.0 - k[8502]*y_cur[IDX_GCHI] - - k[8735]*y_cur[IDX_GCHI]; - data[jistart + 9457] = 0.0 - k[8503]*y_cur[IDX_GCHI] - - k[8736]*y_cur[IDX_GCHI]; - data[jistart + 9458] = 0.0 - k[7074] - k[7256] - k[7438] - k[7618] - - k[7894] - k[7895] - k[8275]*y_cur[IDX_GHI] - k[8395]*y_cur[IDX_GCI] - - k[8437]*y_cur[IDX_GOI] - k[8455]*y_cur[IDX_GNI] - + data[jistart + 9381] = 0.0 - k[8499]*y_cur[IDX_GCHI] - k[8732]*y_cur[IDX_GCHI]; + data[jistart + 9382] = 0.0 - k[8493]*y_cur[IDX_GCHI] - k[8726]*y_cur[IDX_GCHI]; + data[jistart + 9383] = 0.0 - k[8481]*y_cur[IDX_GCHI]; + data[jistart + 9384] = 0.0 + k[7912]; + data[jistart + 9385] = 0.0 + k[7644] + k[7931] - k[8487]*y_cur[IDX_GCHI] - + k[8720]*y_cur[IDX_GCHI]; + data[jistart + 9386] = 0.0 - k[8483]*y_cur[IDX_GCHI] - k[8717]*y_cur[IDX_GCHI]; + data[jistart + 9387] = 0.0 - k[8479]*y_cur[IDX_GCHI] - k[8480]*y_cur[IDX_GCHI]; + data[jistart + 9388] = 0.0 - k[8473]*y_cur[IDX_GCHI] - k[8713]*y_cur[IDX_GCHI]; + data[jistart + 9389] = 0.0 - k[8491]*y_cur[IDX_GCHI] - k[8724]*y_cur[IDX_GCHI]; + data[jistart + 9390] = 0.0 + k[7619] + k[7622] + k[7896] + k[7899] - + k[8482]*y_cur[IDX_GCHI] - k[8716]*y_cur[IDX_GCHI]; + data[jistart + 9391] = 0.0 - k[8486]*y_cur[IDX_GCHI] - k[8719]*y_cur[IDX_GCHI]; + data[jistart + 9392] = 0.0 - k[8488]*y_cur[IDX_GCHI] - k[8721]*y_cur[IDX_GCHI]; + data[jistart + 9393] = 0.0 - k[8455]*y_cur[IDX_GCHI] - k[8698]*y_cur[IDX_GCHI]; + data[jistart + 9394] = 0.0 - k[8437]*y_cur[IDX_GCHI] - k[8685]*y_cur[IDX_GCHI]; + data[jistart + 9395] = 0.0 + k[7626] + k[7628] + k[7629] + k[7903] + k[7905] + k[7906] - + k[8484]*y_cur[IDX_GCHI] - k[8718]*y_cur[IDX_GCHI]; + data[jistart + 9396] = 0.0 - k[7074] - k[7256] - k[7438] - k[7618] - k[7894] - k[7895] - + k[8275]*y_cur[IDX_GHI] - k[8395]*y_cur[IDX_GCI] - + k[8437]*y_cur[IDX_GOI] - k[8455]*y_cur[IDX_GNI] - k[8473]*y_cur[IDX_GSI] - k[8477]*y_cur[IDX_GHNOI] - k[8478]*y_cur[IDX_GCHI] - k[8478]*y_cur[IDX_GCHI] - k[8478]*y_cur[IDX_GCHI] - k[8478]*y_cur[IDX_GCHI] - @@ -19314,1137 +14858,991 @@ __global__ void JacKernel(realtype *y, realtype *data, NaunetData *d_udata, k[8732]*y_cur[IDX_GC7I] - k[8733]*y_cur[IDX_GC7HI] - k[8734]*y_cur[IDX_GC8I] - k[8735]*y_cur[IDX_GC8HI] - k[8736]*y_cur[IDX_GC9HI]; - data[jistart + 9459] = 0.0 + k[7619] + k[7622] + k[7896] + k[7899] - - k[8482]*y_cur[IDX_GCHI] - k[8716]*y_cur[IDX_GCHI]; - data[jistart + 9460] = 0.0 + k[7722] + k[8030]; - data[jistart + 9461] = 0.0 + k[7626] + k[7628] + k[7629] + k[7903] + - k[7905] + k[7906] - k[8484]*y_cur[IDX_GCHI] - - k[8718]*y_cur[IDX_GCHI]; - data[jistart + 9462] = 0.0 + k[7730] + k[8039]; - data[jistart + 9463] = 0.0 + k[7700] + k[8000]; - data[jistart + 9464] = 0.0 + k[7912]; - data[jistart + 9465] = 0.0 - k[8488]*y_cur[IDX_GCHI] - - k[8721]*y_cur[IDX_GCHI]; - data[jistart + 9466] = 0.0 + k[8274]*y_cur[IDX_GCI] - - k[8275]*y_cur[IDX_GCHI] - k[8577]*y_cur[IDX_GCHI]; - data[jistart + 9467] = 0.0 + k[7887]; - data[jistart + 9468] = 0.0 + k[7752] + k[8066]; - data[jistart + 9469] = 0.0 + k[7766] + k[8086]; - data[jistart + 9470] = 0.0 + k[7738] + k[8048]; - data[jistart + 9471] = 0.0 - k[8477]*y_cur[IDX_GCHI]; - data[jistart + 9472] = 0.0 - k[8455]*y_cur[IDX_GCHI] - - k[8698]*y_cur[IDX_GCHI]; - data[jistart + 9473] = 0.0 - k[8479]*y_cur[IDX_GCHI] - - k[8480]*y_cur[IDX_GCHI]; - data[jistart + 9474] = 0.0 - k[8483]*y_cur[IDX_GCHI] - - k[8717]*y_cur[IDX_GCHI]; - data[jistart + 9475] = 0.0 - k[8481]*y_cur[IDX_GCHI]; - data[jistart + 9476] = 0.0 - k[8437]*y_cur[IDX_GCHI] - - k[8685]*y_cur[IDX_GCHI]; - data[jistart + 9477] = 0.0 - k[8485]*y_cur[IDX_GCHI]; - data[jistart + 9478] = 0.0 - k[8473]*y_cur[IDX_GCHI] - - k[8713]*y_cur[IDX_GCHI]; - data[jistart + 9479] = 0.0 + k[6893]; - data[jistart + 9480] = 0.0 + k[8369]*y_cur[IDX_GH2I] - - k[8396]*y_cur[IDX_GCH2I] - k[8656]*y_cur[IDX_GCH2I]; - data[jistart + 9481] = 0.0 + k[7661] + k[7662] + k[7948] + k[7949]; - data[jistart + 9482] = 0.0 + k[7672] + k[7672] + k[7959] + k[7959]; - data[jistart + 9483] = 0.0 + k[7681] + k[7968]; - data[jistart + 9484] = 0.0 + k[8275]*y_cur[IDX_GHI] + - k[8477]*y_cur[IDX_GHNOI] - k[8482]*y_cur[IDX_GCH2I] - - k[8716]*y_cur[IDX_GCH2I]; - data[jistart + 9485] = 0.0 - k[7075] - k[7257] - k[7439] - k[7619] - - k[7620] - k[7621] - k[7622] - k[7896] - k[7897] - k[7898] - k[7899] - - k[8276]*y_cur[IDX_GHI] - k[8370]*y_cur[IDX_GH2I] - - k[8396]*y_cur[IDX_GCI] - k[8438]*y_cur[IDX_GOI] - - k[8456]*y_cur[IDX_GNI] - k[8482]*y_cur[IDX_GCHI] - - k[8518]*y_cur[IDX_GOHI] - k[8523]*y_cur[IDX_GNHI] - - k[8528]*y_cur[IDX_GO2I] - k[8529]*y_cur[IDX_GCNI] - - k[8531]*y_cur[IDX_GCH2I] - k[8531]*y_cur[IDX_GCH2I] - - k[8531]*y_cur[IDX_GCH2I] - k[8531]*y_cur[IDX_GCH2I] - - k[8532]*y_cur[IDX_GCH3I] - k[8533]*y_cur[IDX_GHNOI] - - k[8578]*y_cur[IDX_GHI] - k[8656]*y_cur[IDX_GCI] - - k[8686]*y_cur[IDX_GOI] - k[8699]*y_cur[IDX_GNI] - - k[8716]*y_cur[IDX_GCHI] - k[8741]*y_cur[IDX_GOHI] - - k[8743]*y_cur[IDX_GNHI] - k[8745]*y_cur[IDX_GCH2I] - - k[8745]*y_cur[IDX_GCH2I] - k[8745]*y_cur[IDX_GCH2I] - - k[8745]*y_cur[IDX_GCH2I] - k[8746]*y_cur[IDX_GCH3I] - - k[8747]*y_cur[IDX_GCNI]; - data[jistart + 9486] = 0.0 + k[7726] + k[8034]; - data[jistart + 9487] = 0.0 + k[7742] + k[7745] + k[8053] + k[8056]; - data[jistart + 9488] = 0.0 + k[7685]; - data[jistart + 9489] = 0.0 + k[7882] + k[8265]; - data[jistart + 9490] = 0.0 + k[8095]; - data[jistart + 9491] = 0.0 + k[7625] + k[7627] + k[7902] + k[7904] - - k[8532]*y_cur[IDX_GCH2I] - k[8746]*y_cur[IDX_GCH2I]; - data[jistart + 9492] = 0.0 + k[7740] + k[8051]; - data[jistart + 9493] = 0.0 + k[7737] + k[8046]; - data[jistart + 9494] = 0.0 + k[7820] + k[8147]; - data[jistart + 9495] = 0.0 + k[7770] + k[8090]; - data[jistart + 9496] = 0.0 + k[7633] + k[7910] + k[7913]; - data[jistart + 9497] = 0.0 - k[8529]*y_cur[IDX_GCH2I] - - k[8747]*y_cur[IDX_GCH2I]; - data[jistart + 9498] = 0.0 + k[8275]*y_cur[IDX_GCHI] - - k[8276]*y_cur[IDX_GCH2I] - k[8578]*y_cur[IDX_GCH2I]; - data[jistart + 9499] = 0.0 + k[8369]*y_cur[IDX_GCI] - - k[8370]*y_cur[IDX_GCH2I]; - data[jistart + 9500] = 0.0 + k[7984]; - data[jistart + 9501] = 0.0 + k[8477]*y_cur[IDX_GCHI] - - k[8533]*y_cur[IDX_GCH2I]; - data[jistart + 9502] = 0.0 - k[8456]*y_cur[IDX_GCH2I] - - k[8699]*y_cur[IDX_GCH2I]; - data[jistart + 9503] = 0.0 - k[8523]*y_cur[IDX_GCH2I] - - k[8743]*y_cur[IDX_GCH2I]; - data[jistart + 9504] = 0.0 - k[8438]*y_cur[IDX_GCH2I] - - k[8686]*y_cur[IDX_GCH2I]; - data[jistart + 9505] = 0.0 - k[8528]*y_cur[IDX_GCH2I]; - data[jistart + 9506] = 0.0 - k[8518]*y_cur[IDX_GCH2I] - - k[8741]*y_cur[IDX_GCH2I]; - data[jistart + 9507] = 0.0 + k[8059]; - data[jistart + 9508] = 0.0 + k[6950]; - data[jistart + 9509] = 0.0 + k[8413]*y_cur[IDX_GC2H3I]; - data[jistart + 9510] = 0.0 + k[8413]*y_cur[IDX_GCI]; - data[jistart + 9511] = 0.0 + k[8317]*y_cur[IDX_GHI]; - data[jistart + 9512] = 0.0 - k[7132] - k[7314] - k[7496] - k[7719] - - k[7720] - k[8026] - k[8027] - k[8319]*y_cur[IDX_GHI] - - k[8320]*y_cur[IDX_GHI] - k[8614]*y_cur[IDX_GHI] - - k[8615]*y_cur[IDX_GHI]; - data[jistart + 9513] = 0.0 + k[7721] + k[7723] + k[8028] + k[8031]; - data[jistart + 9514] = 0.0 + k[7729] + k[7731] + k[8037] + k[8040]; - data[jistart + 9515] = 0.0 + k[8317]*y_cur[IDX_GC3H2I] + - k[8318]*y_cur[IDX_GH2CCCI] - k[8319]*y_cur[IDX_GCH2CCHI] - - k[8320]*y_cur[IDX_GCH2CCHI] - k[8614]*y_cur[IDX_GCH2CCHI] - - k[8615]*y_cur[IDX_GCH2CCHI]; - data[jistart + 9516] = 0.0 + k[8318]*y_cur[IDX_GHI]; - data[jistart + 9517] = 0.0 + k[6951]; - data[jistart + 9518] = 0.0 + k[8489]*y_cur[IDX_GCHI]; - data[jistart + 9519] = 0.0 + k[8489]*y_cur[IDX_GC2H3I]; - data[jistart + 9520] = 0.0 + k[8319]*y_cur[IDX_GHI]; - data[jistart + 9521] = 0.0 - k[7133] - k[7315] - k[7497] - k[7721] - - k[7722] - k[7723] - k[7724] - k[7725] - k[8028] - k[8029] - k[8030] - - k[8031] - k[8032] - k[8033]; - data[jistart + 9522] = 0.0 + k[7799] + k[8124]; - data[jistart + 9523] = 0.0 + k[8319]*y_cur[IDX_GCH2CCHI]; - data[jistart + 9524] = 0.0 + k[7004]; - data[jistart + 9525] = 0.0 + k[8342]*y_cur[IDX_GHI]; - data[jistart + 9526] = 0.0 + k[8190]; - data[jistart + 9527] = 0.0 - k[7186] - k[7368] - k[7550] - k[7799] - - k[7800] - k[8124] - k[8125]; - data[jistart + 9528] = 0.0 + k[8342]*y_cur[IDX_GC4H3I]; - data[jistart + 9529] = 0.0 + k[7007]; - data[jistart + 9530] = 0.0 + k[7812] + k[8141]; - data[jistart + 9531] = 0.0 - k[7189] - k[7371] - k[7553] - k[7804] - - k[8131] - k[8132] - k[8344]*y_cur[IDX_GHI] - k[8634]*y_cur[IDX_GHI]; - data[jistart + 9532] = 0.0 - k[8344]*y_cur[IDX_GCH2CHCNI] - - k[8634]*y_cur[IDX_GCH2CHCNI]; - data[jistart + 9533] = 0.0 + k[6953]; - data[jistart + 9534] = 0.0 + k[8529]*y_cur[IDX_GCNI]; - data[jistart + 9535] = 0.0 - k[7135] - k[7317] - k[7499] - k[7726] - - k[8034] - k[8323]*y_cur[IDX_GHI] - k[8618]*y_cur[IDX_GHI]; - data[jistart + 9536] = 0.0 + k[7736] + k[8045]; - data[jistart + 9537] = 0.0 + k[8529]*y_cur[IDX_GCH2I]; - data[jistart + 9538] = 0.0 + k[8322]*y_cur[IDX_GHCCNI] - - k[8323]*y_cur[IDX_GCH2CNI] - k[8618]*y_cur[IDX_GCH2CNI]; - data[jistart + 9539] = 0.0 + k[8322]*y_cur[IDX_GHI]; - data[jistart + 9540] = 0.0 + k[6961]; - data[jistart + 9541] = 0.0 - k[7143] - k[7325] - k[7507] - k[7742] - - k[7743] - k[7744] - k[7745] - k[8053] - k[8054] - k[8055] - k[8056]; - data[jistart + 9542] = 0.0 + k[7762] + k[8080]; - data[jistart + 9543] = 0.0 + k[7818]; - data[jistart + 9544] = 0.0 + k[8325]*y_cur[IDX_GHC2OI]; - data[jistart + 9545] = 0.0 + k[8325]*y_cur[IDX_GHI]; - data[jistart + 9546] = 0.0 + k[6921]; - data[jistart + 9547] = 0.0 + k[8483]*y_cur[IDX_GNH2I]; - data[jistart + 9548] = 0.0 + k[8523]*y_cur[IDX_GNHI]; - data[jistart + 9549] = 0.0 - k[7103] - k[7285] - k[7467] - k[7685] - - k[7972]; - data[jistart + 9550] = 0.0 + k[8460]*y_cur[IDX_GNI]; - data[jistart + 9551] = 0.0 + k[8293]*y_cur[IDX_GH2CNI]; - data[jistart + 9552] = 0.0 + k[8293]*y_cur[IDX_GHI]; - data[jistart + 9553] = 0.0 + k[8460]*y_cur[IDX_GCH3I]; - data[jistart + 9554] = 0.0 + k[8523]*y_cur[IDX_GCH2I]; - data[jistart + 9555] = 0.0 + k[8483]*y_cur[IDX_GCHI]; - data[jistart + 9556] = 0.0 + k[6929]; - data[jistart + 9557] = 0.0 + k[8518]*y_cur[IDX_GOHI]; - data[jistart + 9558] = 0.0 - k[7111] - k[7293] - k[7475] - k[7882] - - k[8265] - k[8300]*y_cur[IDX_GHI] - k[8546]*y_cur[IDX_GCH3I] - - k[8568]*y_cur[IDX_GCOI] - k[8569]*y_cur[IDX_GHCOI] - - k[8570]*y_cur[IDX_GH2COI] - k[8571]*y_cur[IDX_GCH3CHOI] - - k[8572]*y_cur[IDX_GCH3CHOI] - k[8573]*y_cur[IDX_GCH3CHOI] - - k[8574]*y_cur[IDX_GCH2OHCHOI] - k[8599]*y_cur[IDX_GHI] - - k[8753]*y_cur[IDX_GCH3I] - k[8761]*y_cur[IDX_GCOI] - - k[8762]*y_cur[IDX_GHCOI]; - data[jistart + 9559] = 0.0 + k[7890] + k[8270] + - k[8520]*y_cur[IDX_GOHI] + k[8566]*y_cur[IDX_GCH3OI] - - k[8574]*y_cur[IDX_GCH2OHI]; - data[jistart + 9560] = 0.0 + k[7889] + k[8269]; - data[jistart + 9561] = 0.0 - k[8546]*y_cur[IDX_GCH2OHI] - - k[8753]*y_cur[IDX_GCH2OHI]; - data[jistart + 9562] = 0.0 - k[8571]*y_cur[IDX_GCH2OHI] - - k[8572]*y_cur[IDX_GCH2OHI] - k[8573]*y_cur[IDX_GCH2OHI]; - data[jistart + 9563] = 0.0 + k[8566]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9564] = 0.0 + k[7697] + k[7998]; - data[jistart + 9565] = 0.0 - k[8568]*y_cur[IDX_GCH2OHI] - - k[8761]*y_cur[IDX_GCH2OHI]; - data[jistart + 9566] = 0.0 + k[8297]*y_cur[IDX_GH2COI] - - k[8300]*y_cur[IDX_GCH2OHI] - k[8599]*y_cur[IDX_GCH2OHI]; - data[jistart + 9567] = 0.0 + k[8297]*y_cur[IDX_GHI] - - k[8570]*y_cur[IDX_GCH2OHI]; - data[jistart + 9568] = 0.0 - k[8569]*y_cur[IDX_GCH2OHI] - - k[8762]*y_cur[IDX_GCH2OHI]; - data[jistart + 9569] = 0.0 + k[8518]*y_cur[IDX_GCH2I] + - k[8520]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9570] = 0.0 + k[7026]; - data[jistart + 9571] = 0.0 + k[8569]*y_cur[IDX_GHCOI] + - k[8573]*y_cur[IDX_GCH3CHOI] - k[8574]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9572] = 0.0 - k[7208] - k[7390] - k[7565] - k[7890] - - k[8270] - k[8367]*y_cur[IDX_GHI] - k[8368]*y_cur[IDX_GHI] - - k[8519]*y_cur[IDX_GOHI] - k[8520]*y_cur[IDX_GOHI] - - k[8527]*y_cur[IDX_GNHI] - k[8538]*y_cur[IDX_GNH2I] - - k[8556]*y_cur[IDX_GCH3I] - k[8557]*y_cur[IDX_GCH3I] - - k[8566]*y_cur[IDX_GCH3OI] - k[8567]*y_cur[IDX_GCH3OI] - - k[8574]*y_cur[IDX_GCH2OHI]; - data[jistart + 9573] = 0.0 + k[8366]*y_cur[IDX_GHI]; - data[jistart + 9574] = 0.0 - k[8556]*y_cur[IDX_GCH2OHCHOI] - - k[8557]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9575] = 0.0 + k[8573]*y_cur[IDX_GCH2OHI]; - data[jistart + 9576] = 0.0 - k[8566]*y_cur[IDX_GCH2OHCHOI] - - k[8567]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9577] = 0.0 + k[8366]*y_cur[IDX_GCH2OHCOI] - - k[8367]*y_cur[IDX_GCH2OHCHOI] - k[8368]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9578] = 0.0 + k[8569]*y_cur[IDX_GCH2OHI]; - data[jistart + 9579] = 0.0 - k[8527]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9580] = 0.0 - k[8538]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9581] = 0.0 - k[8519]*y_cur[IDX_GCH2OHCHOI] - - k[8520]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9582] = 0.0 + k[7020]; - data[jistart + 9583] = 0.0 + k[8568]*y_cur[IDX_GCOI] + - k[8574]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9584] = 0.0 + k[8367]*y_cur[IDX_GHI] + - k[8519]*y_cur[IDX_GOHI] + k[8527]*y_cur[IDX_GNHI] + - k[8538]*y_cur[IDX_GNH2I] + k[8556]*y_cur[IDX_GCH3I] + - k[8567]*y_cur[IDX_GCH3OI] + k[8574]*y_cur[IDX_GCH2OHI]; - data[jistart + 9585] = 0.0 - k[7202] - k[7384] - k[7559] - k[7889] - - k[8269] - k[8366]*y_cur[IDX_GHI] - k[8652]*y_cur[IDX_GHI]; - data[jistart + 9586] = 0.0 + k[8556]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9587] = 0.0 + k[8567]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9588] = 0.0 + k[8568]*y_cur[IDX_GCH2OHI]; - data[jistart + 9589] = 0.0 - k[8366]*y_cur[IDX_GCH2OHCOI] + - k[8367]*y_cur[IDX_GCH2OHCHOI] - k[8652]*y_cur[IDX_GCH2OHCOI]; - data[jistart + 9590] = 0.0 + k[8527]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9591] = 0.0 + k[8538]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9592] = 0.0 + k[8519]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9593] = 0.0 + k[6984]; - data[jistart + 9594] = 0.0 - k[7166] - k[7348] - k[7530] - k[7775] - - k[8095]; - data[jistart + 9595] = 0.0 + k[6895]; - data[jistart + 9596] = 0.0 - k[8405]*y_cur[IDX_GCH3I] - - k[8660]*y_cur[IDX_GCH3I]; - data[jistart + 9597] = 0.0 + k[8575]*y_cur[IDX_GCH4I]; - data[jistart + 9598] = 0.0 + k[7663] + k[7664] + k[7950] + k[7951]; - data[jistart + 9599] = 0.0 + k[7673] + k[7960]; - data[jistart + 9600] = 0.0 + k[7681] + k[7968]; - data[jistart + 9601] = 0.0 - k[8552]*y_cur[IDX_GCH3I] - - k[8756]*y_cur[IDX_GCH3I]; - data[jistart + 9602] = 0.0 - k[8553]*y_cur[IDX_GCH3I] - - k[8757]*y_cur[IDX_GCH3I]; - data[jistart + 9603] = 0.0 - k[8554]*y_cur[IDX_GCH3I] - - k[8758]*y_cur[IDX_GCH3I]; - data[jistart + 9604] = 0.0 - k[8484]*y_cur[IDX_GCH3I] - - k[8718]*y_cur[IDX_GCH3I]; - data[jistart + 9605] = 0.0 + k[8276]*y_cur[IDX_GHI] + - k[8370]*y_cur[IDX_GH2I] - k[8532]*y_cur[IDX_GCH3I] + - k[8533]*y_cur[IDX_GHNOI] - k[8746]*y_cur[IDX_GCH3I]; - data[jistart + 9606] = 0.0 + k[7724] + k[8032]; - data[jistart + 9607] = 0.0 - k[8546]*y_cur[IDX_GCH3I] + - k[8573]*y_cur[IDX_GCH3CHOI] - k[8753]*y_cur[IDX_GCH3I]; - data[jistart + 9608] = 0.0 - k[8556]*y_cur[IDX_GCH3I] - - k[8557]*y_cur[IDX_GCH3I]; - data[jistart + 9609] = 0.0 - k[7077] - k[7259] - k[7441] - k[7625] - - k[7626] - k[7627] - k[7628] - k[7629] - k[7902] - k[7903] - k[7904] - - k[7905] - k[7906] - k[8277]*y_cur[IDX_GHI] - - k[8371]*y_cur[IDX_GH2I] - k[8405]*y_cur[IDX_GCI] - - k[8441]*y_cur[IDX_GOI] - k[8460]*y_cur[IDX_GNI] - - k[8474]*y_cur[IDX_GSI] - k[8484]*y_cur[IDX_GCHI] - - k[8513]*y_cur[IDX_GOHI] - k[8532]*y_cur[IDX_GCH2I] - - k[8539]*y_cur[IDX_GCOI] - k[8540]*y_cur[IDX_GCNI] - - k[8541]*y_cur[IDX_GHNOI] - k[8542]*y_cur[IDX_GCH3I] - - k[8542]*y_cur[IDX_GCH3I] - k[8542]*y_cur[IDX_GCH3I] - - k[8542]*y_cur[IDX_GCH3I] - k[8543]*y_cur[IDX_GHCOI] - - k[8544]*y_cur[IDX_GH2COI] - k[8545]*y_cur[IDX_GCH3OI] - - k[8546]*y_cur[IDX_GCH2OHI] - k[8547]*y_cur[IDX_GCH3CHOI] - - k[8548]*y_cur[IDX_GCH3CHOI] - k[8549]*y_cur[IDX_GCOOHI] - - k[8550]*y_cur[IDX_GHCOOHI] - k[8551]*y_cur[IDX_GCH3COI] - - k[8552]*y_cur[IDX_GC3NI] - k[8553]*y_cur[IDX_GC5NI] - - k[8554]*y_cur[IDX_GC7NI] - k[8555]*y_cur[IDX_GHCOOCH3I] - - k[8556]*y_cur[IDX_GCH2OHCHOI] - k[8557]*y_cur[IDX_GCH2OHCHOI] - - k[8579]*y_cur[IDX_GHI] - k[8660]*y_cur[IDX_GCI] - - k[8688]*y_cur[IDX_GOI] - k[8701]*y_cur[IDX_GNI] - - k[8718]*y_cur[IDX_GCHI] - k[8737]*y_cur[IDX_GOHI] - - k[8746]*y_cur[IDX_GCH2I] - k[8748]*y_cur[IDX_GCH3I] - - k[8748]*y_cur[IDX_GCH3I] - k[8748]*y_cur[IDX_GCH3I] - - k[8748]*y_cur[IDX_GCH3I] - k[8749]*y_cur[IDX_GCNI] - - k[8750]*y_cur[IDX_GCOI] - k[8751]*y_cur[IDX_GHCOI] - - k[8752]*y_cur[IDX_GCH3OI] - k[8753]*y_cur[IDX_GCH2OHI] - - k[8754]*y_cur[IDX_GCH3COI] - k[8755]*y_cur[IDX_GCOOHI] - - k[8756]*y_cur[IDX_GC3NI] - k[8757]*y_cur[IDX_GC5NI] - - k[8758]*y_cur[IDX_GC7NI]; - data[jistart + 9610] = 0.0 + k[7844] + k[8171]; - data[jistart + 9611] = 0.0 + k[7841] + k[8167]; - data[jistart + 9612] = 0.0 + k[7865] + k[8204]; - data[jistart + 9613] = 0.0 + k[7864] + k[8203]; - data[jistart + 9614] = 0.0 + k[7874] + k[8228]; - data[jistart + 9615] = 0.0 + k[7732] + k[8041]; - data[jistart + 9616] = 0.0 + k[7761] + k[7763] + k[8079] + k[8081] + - k[8334]*y_cur[IDX_GHI] + k[8505]*y_cur[IDX_GOHI] - - k[8547]*y_cur[IDX_GCH3I] - k[8548]*y_cur[IDX_GCH3I] + - k[8563]*y_cur[IDX_GCH3OI] + k[8573]*y_cur[IDX_GCH2OHI]; - data[jistart + 9617] = 0.0 + k[7735] + k[8044]; - data[jistart + 9618] = 0.0 + k[7883] + k[8266] - - k[8551]*y_cur[IDX_GCH3I] - k[8754]*y_cur[IDX_GCH3I]; - data[jistart + 9619] = 0.0 + k[7819] + k[7819] + k[7821] + k[7821] + - k[8146] + k[8146] + k[8148] + k[8148]; - data[jistart + 9620] = 0.0 + k[7891] + k[8272]; - data[jistart + 9621] = 0.0 + k[7881] + k[8264] - - k[8545]*y_cur[IDX_GCH3I] + k[8563]*y_cur[IDX_GCH3CHOI] - - k[8752]*y_cur[IDX_GCH3I]; - data[jistart + 9622] = 0.0 + k[7771] + k[7771] + k[8091] + k[8091]; - data[jistart + 9623] = 0.0 + k[7699] + k[7702] + k[7997] + k[8002]; - data[jistart + 9624] = 0.0 + k[7911] + k[7914] + - k[8278]*y_cur[IDX_GHI] + k[8575]*y_cur[IDX_GC2HI]; - data[jistart + 9625] = 0.0 - k[8540]*y_cur[IDX_GCH3I] - - k[8749]*y_cur[IDX_GCH3I]; - data[jistart + 9626] = 0.0 - k[8539]*y_cur[IDX_GCH3I] - - k[8750]*y_cur[IDX_GCH3I]; - data[jistart + 9627] = 0.0 - k[8549]*y_cur[IDX_GCH3I] - - k[8755]*y_cur[IDX_GCH3I]; - data[jistart + 9628] = 0.0 + k[8276]*y_cur[IDX_GCH2I] - - k[8277]*y_cur[IDX_GCH3I] + k[8278]*y_cur[IDX_GCH4I] + - k[8334]*y_cur[IDX_GCH3CHOI] - k[8579]*y_cur[IDX_GCH3I]; - data[jistart + 9629] = 0.0 + k[8370]*y_cur[IDX_GCH2I] - - k[8371]*y_cur[IDX_GCH3I]; - data[jistart + 9630] = 0.0 - k[8544]*y_cur[IDX_GCH3I]; - data[jistart + 9631] = 0.0 - k[8543]*y_cur[IDX_GCH3I] - - k[8751]*y_cur[IDX_GCH3I]; - data[jistart + 9632] = 0.0 + k[7826] - k[8555]*y_cur[IDX_GCH3I]; - data[jistart + 9633] = 0.0 - k[8550]*y_cur[IDX_GCH3I]; - data[jistart + 9634] = 0.0 + k[8533]*y_cur[IDX_GCH2I] - - k[8541]*y_cur[IDX_GCH3I]; - data[jistart + 9635] = 0.0 - k[8460]*y_cur[IDX_GCH3I] - - k[8701]*y_cur[IDX_GCH3I]; - data[jistart + 9636] = 0.0 - k[8441]*y_cur[IDX_GCH3I] - - k[8688]*y_cur[IDX_GCH3I]; - data[jistart + 9637] = 0.0 + k[8505]*y_cur[IDX_GCH3CHOI] - - k[8513]*y_cur[IDX_GCH3I] - k[8737]*y_cur[IDX_GCH3I]; - data[jistart + 9638] = 0.0 - k[8474]*y_cur[IDX_GCH3I]; - data[jistart + 9639] = 0.0 + k[7036]; - data[jistart + 9640] = 0.0 + k[8552]*y_cur[IDX_GCH3I]; - data[jistart + 9641] = 0.0 + k[8552]*y_cur[IDX_GC3NI]; - data[jistart + 9642] = 0.0 - k[7218] - k[7400] - k[7582] - k[7844] - - k[8171]; - data[jistart + 9643] = 0.0 + k[7034]; - data[jistart + 9644] = 0.0 - k[7216] - k[7398] - k[7580] - k[7841] - - k[8167]; - data[jistart + 9645] = 0.0 + k[7054]; - data[jistart + 9646] = 0.0 + k[8553]*y_cur[IDX_GCH3I]; - data[jistart + 9647] = 0.0 + k[8553]*y_cur[IDX_GC5NI]; - data[jistart + 9648] = 0.0 - k[7236] - k[7418] - k[7600] - k[7865] - - k[8204]; - data[jistart + 9649] = 0.0 + k[7053]; - data[jistart + 9650] = 0.0 - k[7235] - k[7417] - k[7599] - k[7864] - - k[8203]; - data[jistart + 9651] = 0.0 + k[7063]; - data[jistart + 9652] = 0.0 + k[8554]*y_cur[IDX_GCH3I]; - data[jistart + 9653] = 0.0 + k[8554]*y_cur[IDX_GC7NI]; - data[jistart + 9654] = 0.0 - k[7245] - k[7427] - k[7609] - k[7874] - - k[8228]; - data[jistart + 9655] = 0.0 + k[6952]; - data[jistart + 9656] = 0.0 + k[8490]*y_cur[IDX_GCHI]; - data[jistart + 9657] = 0.0 + k[8490]*y_cur[IDX_GC2H3I]; - data[jistart + 9658] = 0.0 + k[8320]*y_cur[IDX_GHI]; - data[jistart + 9659] = 0.0 + k[7800] + k[8125]; - data[jistart + 9660] = 0.0 - k[7134] - k[7316] - k[7498] - k[7729] - - k[7730] - k[7731] - k[7732] - k[7733] - k[8037] - k[8038] - k[8039] - - k[8040] - k[8041] - k[8042]; - data[jistart + 9661] = 0.0 + k[8320]*y_cur[IDX_GCH2CCHI]; - data[jistart + 9662] = 0.0 + k[6959]; - data[jistart + 9663] = 0.0 + k[7807] + k[8136]; - data[jistart + 9664] = 0.0 - k[7141] - k[7323] - k[7505] - k[7740] - - k[8051]; - data[jistart + 9665] = 0.0 + k[6977]; - data[jistart + 9666] = 0.0 - k[8571]*y_cur[IDX_GCH3CHOI] - - k[8572]*y_cur[IDX_GCH3CHOI] - k[8573]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9667] = 0.0 + k[8543]*y_cur[IDX_GHCOI] - - k[8547]*y_cur[IDX_GCH3CHOI] - k[8548]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9668] = 0.0 - k[7159] - k[7341] - k[7523] - k[7760] - - k[7761] - k[7762] - k[7763] - k[8078] - k[8079] - k[8080] - k[8081] - - k[8332]*y_cur[IDX_GHI] - k[8333]*y_cur[IDX_GHI] - - k[8334]*y_cur[IDX_GHI] - k[8505]*y_cur[IDX_GOHI] - - k[8506]*y_cur[IDX_GOHI] - k[8507]*y_cur[IDX_GOHI] - - k[8521]*y_cur[IDX_GNHI] - k[8535]*y_cur[IDX_GNH2I] - - k[8547]*y_cur[IDX_GCH3I] - k[8548]*y_cur[IDX_GCH3I] - - k[8562]*y_cur[IDX_GCH3OI] - k[8563]*y_cur[IDX_GCH3OI] - - k[8571]*y_cur[IDX_GCH2OHI] - k[8572]*y_cur[IDX_GCH2OHI] - - k[8573]*y_cur[IDX_GCH2OHI]; - data[jistart + 9669] = 0.0 + k[8331]*y_cur[IDX_GHI]; - data[jistart + 9670] = 0.0 + k[7820] + k[8147]; - data[jistart + 9671] = 0.0 - k[8562]*y_cur[IDX_GCH3CHOI] - - k[8563]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9672] = 0.0 + k[8331]*y_cur[IDX_GCH3COI] - - k[8332]*y_cur[IDX_GCH3CHOI] - k[8333]*y_cur[IDX_GCH3CHOI] - - k[8334]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9673] = 0.0 + k[8543]*y_cur[IDX_GCH3I]; - data[jistart + 9674] = 0.0 - k[8521]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9675] = 0.0 - k[8535]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9676] = 0.0 - k[8505]*y_cur[IDX_GCH3CHOI] - - k[8506]*y_cur[IDX_GCH3CHOI] - k[8507]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9677] = 0.0 + k[6957]; - data[jistart + 9678] = 0.0 + k[8323]*y_cur[IDX_GHI]; - data[jistart + 9679] = 0.0 + k[8540]*y_cur[IDX_GCNI]; - data[jistart + 9680] = 0.0 - k[7139] - k[7321] - k[7503] - k[7735] - - k[7736] - k[7737] - k[8044] - k[8045] - k[8046]; - data[jistart + 9681] = 0.0 + k[8540]*y_cur[IDX_GCH3I]; - data[jistart + 9682] = 0.0 + k[8323]*y_cur[IDX_GCH2CNI]; - data[jistart + 9683] = 0.0 + k[6966]; - data[jistart + 9684] = 0.0 + k[8572]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9685] = 0.0 + k[8539]*y_cur[IDX_GCOI] + - k[8547]*y_cur[IDX_GCH3CHOI] - k[8551]*y_cur[IDX_GCH3COI] - - k[8754]*y_cur[IDX_GCH3COI]; - data[jistart + 9686] = 0.0 + k[8332]*y_cur[IDX_GHI] + - k[8506]*y_cur[IDX_GOHI] + k[8521]*y_cur[IDX_GNHI] + - k[8535]*y_cur[IDX_GNH2I] + k[8547]*y_cur[IDX_GCH3I] + - k[8562]*y_cur[IDX_GCH3OI] + k[8572]*y_cur[IDX_GCH2OHI]; - data[jistart + 9687] = 0.0 - k[7148] - k[7330] - k[7512] - k[7883] - - k[8266] - k[8331]*y_cur[IDX_GHI] - k[8504]*y_cur[IDX_GOHI] - - k[8551]*y_cur[IDX_GCH3I] - k[8626]*y_cur[IDX_GHI] - - k[8742]*y_cur[IDX_GOHI] - k[8754]*y_cur[IDX_GCH3I]; - data[jistart + 9688] = 0.0 + k[7892] + k[8271]; - data[jistart + 9689] = 0.0 + k[8562]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9690] = 0.0 + k[8539]*y_cur[IDX_GCH3I]; - data[jistart + 9691] = 0.0 - k[8331]*y_cur[IDX_GCH3COI] + - k[8332]*y_cur[IDX_GCH3CHOI] - k[8626]*y_cur[IDX_GCH3COI]; - data[jistart + 9692] = 0.0 + k[8521]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9693] = 0.0 + k[8535]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9694] = 0.0 - k[8504]*y_cur[IDX_GCH3COI] + - k[8506]*y_cur[IDX_GCH3CHOI] - k[8742]*y_cur[IDX_GCH3COI]; - data[jistart + 9695] = 0.0 + k[7018]; - data[jistart + 9696] = 0.0 + k[8551]*y_cur[IDX_GCH3COI]; - data[jistart + 9697] = 0.0 + k[8551]*y_cur[IDX_GCH3I]; - data[jistart + 9698] = 0.0 - k[7200] - k[7382] - k[7568] - k[7818] - - k[7819] - k[7820] - k[7821] - k[8146] - k[8147] - k[8148]; - data[jistart + 9699] = 0.0 + k[7027]; - data[jistart + 9700] = 0.0 + k[8549]*y_cur[IDX_GCOOHI]; - data[jistart + 9701] = 0.0 + k[8504]*y_cur[IDX_GOHI]; - data[jistart + 9702] = 0.0 - k[7209] - k[7391] - k[7566] - k[7891] - - k[7892] - k[8271] - k[8272]; - data[jistart + 9703] = 0.0 + k[8549]*y_cur[IDX_GCH3I]; - data[jistart + 9704] = 0.0 + k[8504]*y_cur[IDX_GCH3COI]; - data[jistart + 9705] = 0.0 + k[6931]; - data[jistart + 9706] = 0.0 - k[8566]*y_cur[IDX_GCH3OI] - - k[8567]*y_cur[IDX_GCH3OI]; - data[jistart + 9707] = 0.0 + k[8441]*y_cur[IDX_GOI] - - k[8545]*y_cur[IDX_GCH3OI] - k[8752]*y_cur[IDX_GCH3OI]; - data[jistart + 9708] = 0.0 - k[8562]*y_cur[IDX_GCH3OI] - - k[8563]*y_cur[IDX_GCH3OI]; - data[jistart + 9709] = 0.0 - k[7113] - k[7295] - k[7477] - k[7881] - - k[8264] - k[8299]*y_cur[IDX_GHI] - k[8545]*y_cur[IDX_GCH3I] - - k[8558]*y_cur[IDX_GCOI] - k[8559]*y_cur[IDX_GHCOI] - - k[8560]*y_cur[IDX_GH2COI] - k[8561]*y_cur[IDX_GH2COI] - - k[8562]*y_cur[IDX_GCH3CHOI] - k[8563]*y_cur[IDX_GCH3CHOI] - - k[8564]*y_cur[IDX_GHCOOHI] - k[8565]*y_cur[IDX_GHCOOCH3I] - - k[8566]*y_cur[IDX_GCH2OHCHOI] - k[8567]*y_cur[IDX_GCH2OHCHOI] - - k[8598]*y_cur[IDX_GHI] - k[8752]*y_cur[IDX_GCH3I] - - k[8759]*y_cur[IDX_GHCOI] - k[8760]*y_cur[IDX_GCOI]; - data[jistart + 9710] = 0.0 + k[7698] + k[7999]; - data[jistart + 9711] = 0.0 - k[8558]*y_cur[IDX_GCH3OI] - - k[8760]*y_cur[IDX_GCH3OI]; - data[jistart + 9712] = 0.0 + k[7888] + k[8268]; - data[jistart + 9713] = 0.0 + k[8296]*y_cur[IDX_GH2COI] - - k[8299]*y_cur[IDX_GCH3OI] - k[8598]*y_cur[IDX_GCH3OI]; - data[jistart + 9714] = 0.0 + k[8296]*y_cur[IDX_GHI] - - k[8560]*y_cur[IDX_GCH3OI] - k[8561]*y_cur[IDX_GCH3OI]; - data[jistart + 9715] = 0.0 - k[8559]*y_cur[IDX_GCH3OI] - - k[8759]*y_cur[IDX_GCH3OI]; - data[jistart + 9716] = 0.0 + k[8511]*y_cur[IDX_GOHI] - - k[8565]*y_cur[IDX_GCH3OI]; - data[jistart + 9717] = 0.0 - k[8564]*y_cur[IDX_GCH3OI]; - data[jistart + 9718] = 0.0 + k[8441]*y_cur[IDX_GCH3I]; - data[jistart + 9719] = 0.0 + k[8511]*y_cur[IDX_GHCOOCH3I]; - data[jistart + 9720] = 0.0 + k[6983]; - data[jistart + 9721] = 0.0 + k[8545]*y_cur[IDX_GCH3OI]; - data[jistart + 9722] = 0.0 + k[8545]*y_cur[IDX_GCH3I]; - data[jistart + 9723] = 0.0 - k[7165] - k[7347] - k[7529] - k[7769] - - k[7770] - k[7771] - k[8089] - k[8090] - k[8091]; - data[jistart + 9724] = 0.0 + k[6936]; - data[jistart + 9725] = 0.0 + k[8300]*y_cur[IDX_GHI] + - k[8570]*y_cur[IDX_GH2COI] + k[8572]*y_cur[IDX_GCH3CHOI] + - k[8574]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9726] = 0.0 + k[8368]*y_cur[IDX_GHI] + - k[8567]*y_cur[IDX_GCH3OI] + k[8574]*y_cur[IDX_GCH2OHI]; - data[jistart + 9727] = 0.0 + k[8513]*y_cur[IDX_GOHI]; - data[jistart + 9728] = 0.0 + k[8507]*y_cur[IDX_GOHI] + - k[8562]*y_cur[IDX_GCH3OI] + k[8572]*y_cur[IDX_GCH2OHI]; - data[jistart + 9729] = 0.0 + k[8299]*y_cur[IDX_GHI] + - k[8560]*y_cur[IDX_GH2COI] + k[8562]*y_cur[IDX_GCH3CHOI] + - k[8564]*y_cur[IDX_GHCOOHI] + k[8565]*y_cur[IDX_GHCOOCH3I] + - k[8567]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9730] = 0.0 + k[7770] + k[8090]; - data[jistart + 9731] = 0.0 - k[7118] - k[7300] - k[7482] - k[7697] - - k[7698] - k[7699] - k[7700] - k[7701] - k[7702] - k[7997] - k[7998] - - k[7999] - k[8000] - k[8001] - k[8002]; - data[jistart + 9732] = 0.0 + k[8299]*y_cur[IDX_GCH3OI] + - k[8300]*y_cur[IDX_GCH2OHI] + k[8346]*y_cur[IDX_GHCOOCH3I] + - k[8368]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9733] = 0.0 + k[8560]*y_cur[IDX_GCH3OI] + - k[8570]*y_cur[IDX_GCH2OHI]; - data[jistart + 9734] = 0.0 + k[7825] + k[8346]*y_cur[IDX_GHI] + - k[8565]*y_cur[IDX_GCH3OI]; - data[jistart + 9735] = 0.0 + k[8564]*y_cur[IDX_GCH3OI]; - data[jistart + 9736] = 0.0 + k[8507]*y_cur[IDX_GCH3CHOI] + - k[8513]*y_cur[IDX_GCH3I]; - data[jistart + 9737] = 0.0 + k[6898]; - data[jistart + 9738] = 0.0 - k[8575]*y_cur[IDX_GCH4I]; - data[jistart + 9739] = 0.0 + k[7674] + k[7961]; - data[jistart + 9740] = 0.0 + k[7774] + k[8094]; - data[jistart + 9741] = 0.0 + k[8556]*y_cur[IDX_GCH3I]; - data[jistart + 9742] = 0.0 + k[8277]*y_cur[IDX_GHI] + - k[8371]*y_cur[IDX_GH2I] + k[8541]*y_cur[IDX_GHNOI] + - k[8544]*y_cur[IDX_GH2COI] + k[8547]*y_cur[IDX_GCH3CHOI] + - k[8550]*y_cur[IDX_GHCOOHI] + k[8555]*y_cur[IDX_GHCOOCH3I] + - k[8556]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 9743] = 0.0 + k[7760] + k[8078] + - k[8333]*y_cur[IDX_GHI] + k[8547]*y_cur[IDX_GCH3I]; - data[jistart + 9744] = 0.0 + k[7818]; - data[jistart + 9745] = 0.0 + k[7769] + k[8089]; - data[jistart + 9746] = 0.0 - k[7080] - k[7262] - k[7444] - k[7633] - - k[7910] - k[7911] - k[7912] - k[7913] - k[7914] - - k[8278]*y_cur[IDX_GHI] - k[8575]*y_cur[IDX_GC2HI]; - data[jistart + 9747] = 0.0 + k[8277]*y_cur[IDX_GCH3I] - - k[8278]*y_cur[IDX_GCH4I] + k[8333]*y_cur[IDX_GCH3CHOI]; - data[jistart + 9748] = 0.0 + k[8371]*y_cur[IDX_GCH3I]; - data[jistart + 9749] = 0.0 + k[8544]*y_cur[IDX_GCH3I]; - data[jistart + 9750] = 0.0 + k[7824] + k[8555]*y_cur[IDX_GCH3I]; - data[jistart + 9751] = 0.0 + k[8550]*y_cur[IDX_GCH3I]; - data[jistart + 9752] = 0.0 + k[8541]*y_cur[IDX_GCH3I]; - data[jistart + 9753] = 0.0 + k[6909]; - data[jistart + 9754] = 0.0 + k[8397]*y_cur[IDX_GNI] + - k[8398]*y_cur[IDX_GNOI] + k[8400]*y_cur[IDX_GNSI] + - k[8401]*y_cur[IDX_GOCNI] + k[8402]*y_cur[IDX_GCNOI] - - k[8412]*y_cur[IDX_GCNI] - k[8664]*y_cur[IDX_GCNI]; - data[jistart + 9755] = 0.0 + k[7885]; - data[jistart + 9756] = 0.0 + k[7809] + k[8138]; - data[jistart + 9757] = 0.0 + k[7718] + k[8025]; - data[jistart + 9758] = 0.0 + k[7790] + k[8114]; - data[jistart + 9759] = 0.0 + k[7836] + k[8160]; - data[jistart + 9760] = 0.0 + k[7854] + k[8186]; - data[jistart + 9761] = 0.0 + k[7868] + k[8211]; - data[jistart + 9762] = 0.0 + k[7877] + k[8246]; - data[jistart + 9763] = 0.0 - k[8488]*y_cur[IDX_GCNI] - - k[8721]*y_cur[IDX_GCNI]; - data[jistart + 9764] = 0.0 - k[8529]*y_cur[IDX_GCNI] - - k[8747]*y_cur[IDX_GCNI]; - data[jistart + 9765] = 0.0 + k[7804] + k[8131]; - data[jistart + 9766] = 0.0 + k[7726] + k[8034]; - data[jistart + 9767] = 0.0 - k[8540]*y_cur[IDX_GCNI] - - k[8749]*y_cur[IDX_GCNI]; - data[jistart + 9768] = 0.0 + k[7735] + k[8044]; - data[jistart + 9769] = 0.0 - k[7091] - k[7273] - k[7455] - k[7649] - - k[7936] - k[8292]*y_cur[IDX_GHI] - k[8376]*y_cur[IDX_GH2I] - - k[8412]*y_cur[IDX_GCI] - k[8446]*y_cur[IDX_GOI] - - k[8488]*y_cur[IDX_GCHI] - k[8529]*y_cur[IDX_GCH2I] - - k[8540]*y_cur[IDX_GCH3I] - k[8592]*y_cur[IDX_GHI] - - k[8664]*y_cur[IDX_GCI] - k[8692]*y_cur[IDX_GOI] - - k[8721]*y_cur[IDX_GCHI] - k[8747]*y_cur[IDX_GCH2I] - - k[8749]*y_cur[IDX_GCH3I]; - data[jistart + 9770] = 0.0 + k[7741] + k[8052] + - k[8402]*y_cur[IDX_GCI]; - data[jistart + 9771] = 0.0 - k[8292]*y_cur[IDX_GCNI] - - k[8592]*y_cur[IDX_GCNI]; - data[jistart + 9772] = 0.0 - k[8376]*y_cur[IDX_GCNI]; - data[jistart + 9773] = 0.0 + k[7798] + k[8123]; - data[jistart + 9774] = 0.0 + k[7855] + k[8187]; - data[jistart + 9775] = 0.0 + k[7870] + k[8216] + k[8217]; - data[jistart + 9776] = 0.0 + k[7879] + k[8252] + k[8253]; - data[jistart + 9777] = 0.0 + k[7651] + k[7938]; - data[jistart + 9778] = 0.0 + k[7650] + k[7937]; - data[jistart + 9779] = 0.0 + k[7797]; - data[jistart + 9780] = 0.0 + k[7755] + k[8069]; - data[jistart + 9781] = 0.0 + k[7754] + k[8068]; - data[jistart + 9782] = 0.0 + k[8397]*y_cur[IDX_GCI]; - data[jistart + 9783] = 0.0 + k[7801] + k[7801] + k[8126] + k[8126] + - k[8128] + k[8128]; - data[jistart + 9784] = 0.0 + k[7739] + k[8050]; - data[jistart + 9785] = 0.0 + k[8398]*y_cur[IDX_GCI]; - data[jistart + 9786] = 0.0 + k[8400]*y_cur[IDX_GCI]; - data[jistart + 9787] = 0.0 - k[8446]*y_cur[IDX_GCNI] - - k[8692]*y_cur[IDX_GCNI]; - data[jistart + 9788] = 0.0 + k[7747] + k[8061] + - k[8401]*y_cur[IDX_GCI]; - data[jistart + 9789] = 0.0 + k[7806] + k[8135]; - data[jistart + 9790] = 0.0 + k[6960]; - data[jistart + 9791] = 0.0 + k[8399]*y_cur[IDX_GNOI] - - k[8402]*y_cur[IDX_GCNOI]; - data[jistart + 9792] = 0.0 - k[7142] - k[7324] - k[7506] - k[7741] - - k[8052] - k[8326]*y_cur[IDX_GHI] - k[8327]*y_cur[IDX_GHI] - - k[8402]*y_cur[IDX_GCI] - k[8621]*y_cur[IDX_GHI] - - k[8622]*y_cur[IDX_GHI]; - data[jistart + 9793] = 0.0 - k[8326]*y_cur[IDX_GCNOI] - - k[8327]*y_cur[IDX_GCNOI] - k[8621]*y_cur[IDX_GCNOI] - - k[8622]*y_cur[IDX_GCNOI]; - data[jistart + 9794] = 0.0 + k[8399]*y_cur[IDX_GCI]; - data[jistart + 9795] = 0.0 + k[6918]; - data[jistart + 9796] = 0.0 + k[8401]*y_cur[IDX_GOCNI] + - k[8402]*y_cur[IDX_GCNOI] + k[8406]*y_cur[IDX_GOI] + - k[8407]*y_cur[IDX_GO2I] + k[8408]*y_cur[IDX_GOHI] + - k[8409]*y_cur[IDX_GSOI]; - data[jistart + 9797] = 0.0 + k[7728] + k[8036]; - data[jistart + 9798] = 0.0 + k[7803] + k[8130]; - data[jistart + 9799] = 0.0 + k[7742] + k[7745] + k[8053] + k[8056]; - data[jistart + 9800] = 0.0 - k[8568]*y_cur[IDX_GCOI] - - k[8761]*y_cur[IDX_GCOI]; - data[jistart + 9801] = 0.0 + k[7889] + k[8269]; - data[jistart + 9802] = 0.0 - k[8539]*y_cur[IDX_GCOI] - - k[8750]*y_cur[IDX_GCOI]; - data[jistart + 9803] = 0.0 + k[7760] + k[8078]; - data[jistart + 9804] = 0.0 + k[7883] + k[8266]; - data[jistart + 9805] = 0.0 + k[7819] + k[7821] + k[8146] + k[8148]; - data[jistart + 9806] = 0.0 - k[8558]*y_cur[IDX_GCOI] - - k[8760]*y_cur[IDX_GCOI]; - data[jistart + 9807] = 0.0 + k[8402]*y_cur[IDX_GCI]; - data[jistart + 9808] = 0.0 - k[7100] - k[7282] - k[7464] - k[7616] - - k[7675] - k[7962] - k[8294]*y_cur[IDX_GHI] - k[8447]*y_cur[IDX_GOI] - - k[8476]*y_cur[IDX_GSI] - k[8515]*y_cur[IDX_GOHI] - - k[8516]*y_cur[IDX_GOHI] - k[8526]*y_cur[IDX_GNHI] - - k[8539]*y_cur[IDX_GCH3I] - k[8558]*y_cur[IDX_GCH3OI] - - k[8568]*y_cur[IDX_GCH2OHI] - k[8594]*y_cur[IDX_GHI] - - k[8693]*y_cur[IDX_GOI] - k[8714]*y_cur[IDX_GSI] - - k[8739]*y_cur[IDX_GOHI] - k[8744]*y_cur[IDX_GNHI] - - k[8750]*y_cur[IDX_GCH3I] - k[8760]*y_cur[IDX_GCH3OI] - - k[8761]*y_cur[IDX_GCH2OHI]; - data[jistart + 9809] = 0.0 + k[7764] + k[8082]; - data[jistart + 9810] = 0.0 + k[7888] + k[8268]; - data[jistart + 9811] = 0.0 + k[7884] + k[8267]; - data[jistart + 9812] = 0.0 - k[8294]*y_cur[IDX_GCOI] + - k[8348]*y_cur[IDX_GOCSI] - k[8594]*y_cur[IDX_GCOI]; - data[jistart + 9813] = 0.0 + k[7692] + k[7982] + k[7983] + k[7985] + - k[7986]; - data[jistart + 9814] = 0.0 + k[7887]; - data[jistart + 9815] = 0.0 + k[7682] + k[7683] + k[7969] + k[7970] + - k[8434]*y_cur[IDX_GOI]; - data[jistart + 9816] = 0.0 + k[7825]; - data[jistart + 9817] = 0.0 + k[7751] + k[8065]; - data[jistart + 9818] = 0.0 - k[8526]*y_cur[IDX_GCOI] - - k[8744]*y_cur[IDX_GCOI]; - data[jistart + 9819] = 0.0 + k[8406]*y_cur[IDX_GCI] + - k[8434]*y_cur[IDX_GHCOI] - k[8447]*y_cur[IDX_GCOI] - - k[8693]*y_cur[IDX_GCOI]; - data[jistart + 9820] = 0.0 + k[8407]*y_cur[IDX_GCI]; - data[jistart + 9821] = 0.0 + k[8401]*y_cur[IDX_GCI]; - data[jistart + 9822] = 0.0 + k[7827] + k[7830] + k[8151] + k[8154] + - k[8348]*y_cur[IDX_GHI]; - data[jistart + 9823] = 0.0 + k[8408]*y_cur[IDX_GCI] - - k[8515]*y_cur[IDX_GCOI] - k[8516]*y_cur[IDX_GCOI] - - k[8739]*y_cur[IDX_GCOI]; - data[jistart + 9824] = 0.0 - k[8476]*y_cur[IDX_GCOI] - - k[8714]*y_cur[IDX_GCOI]; - data[jistart + 9825] = 0.0 + k[8409]*y_cur[IDX_GCI]; - data[jistart + 9826] = 0.0 + k[6978]; - data[jistart + 9827] = 0.0 + k[8447]*y_cur[IDX_GOI] + - k[8515]*y_cur[IDX_GOHI]; - data[jistart + 9828] = 0.0 - k[7160] - k[7342] - k[7524] - k[7764] - - k[8082]; - data[jistart + 9829] = 0.0 + k[8448]*y_cur[IDX_GOI]; - data[jistart + 9830] = 0.0 + k[7824] + k[7826]; - data[jistart + 9831] = 0.0 + k[8103]; - data[jistart + 9832] = 0.0 + k[8447]*y_cur[IDX_GCOI] + - k[8448]*y_cur[IDX_GHCOI]; - data[jistart + 9833] = 0.0 + k[8515]*y_cur[IDX_GCOI]; - data[jistart + 9834] = 0.0 + k[7019]; - data[jistart + 9835] = 0.0 + k[8555]*y_cur[IDX_GHCOOCH3I]; - data[jistart + 9836] = 0.0 + k[8558]*y_cur[IDX_GCOI] + - k[8565]*y_cur[IDX_GHCOOCH3I]; - data[jistart + 9837] = 0.0 + k[8558]*y_cur[IDX_GCH3OI]; - data[jistart + 9838] = 0.0 - k[7201] - k[7383] - k[7558] - k[7888] - - k[8268] - k[8365]*y_cur[IDX_GHI] - k[8651]*y_cur[IDX_GHI]; - data[jistart + 9839] = 0.0 + k[8347]*y_cur[IDX_GHCOOCH3I] - - k[8365]*y_cur[IDX_GCOOCH3I] - k[8651]*y_cur[IDX_GCOOCH3I]; - data[jistart + 9840] = 0.0 + k[8347]*y_cur[IDX_GHI] + - k[8512]*y_cur[IDX_GOHI] + k[8537]*y_cur[IDX_GNH2I] + - k[8555]*y_cur[IDX_GCH3I] + k[8565]*y_cur[IDX_GCH3OI]; - data[jistart + 9841] = 0.0 + k[8537]*y_cur[IDX_GHCOOCH3I]; - data[jistart + 9842] = 0.0 + k[8512]*y_cur[IDX_GHCOOCH3I]; - data[jistart + 9843] = 0.0 + k[6981]; - data[jistart + 9844] = 0.0 - k[8549]*y_cur[IDX_GCOOHI] + - k[8550]*y_cur[IDX_GHCOOHI] - k[8755]*y_cur[IDX_GCOOHI]; - data[jistart + 9845] = 0.0 + k[7891] + k[8272]; - data[jistart + 9846] = 0.0 + k[8564]*y_cur[IDX_GHCOOHI]; - data[jistart + 9847] = 0.0 + k[8516]*y_cur[IDX_GOHI]; - data[jistart + 9848] = 0.0 - k[7163] - k[7345] - k[7527] - k[7884] - - k[8267] - k[8336]*y_cur[IDX_GHI] - k[8549]*y_cur[IDX_GCH3I] - - k[8628]*y_cur[IDX_GHI] - k[8755]*y_cur[IDX_GCH3I]; - data[jistart + 9849] = 0.0 - k[8336]*y_cur[IDX_GCOOHI] + - k[8337]*y_cur[IDX_GHCOOHI] - k[8628]*y_cur[IDX_GCOOHI]; - data[jistart + 9850] = 0.0 + k[8337]*y_cur[IDX_GHI] + - k[8510]*y_cur[IDX_GOHI] + k[8536]*y_cur[IDX_GNH2I] + - k[8550]*y_cur[IDX_GCH3I] + k[8564]*y_cur[IDX_GCH3OI]; - data[jistart + 9851] = 0.0 + k[8536]*y_cur[IDX_GHCOOHI]; - data[jistart + 9852] = 0.0 + k[8510]*y_cur[IDX_GHCOOHI] + - k[8516]*y_cur[IDX_GCOI]; - data[jistart + 9853] = 0.0 + k[6972]; - data[jistart + 9854] = 0.0 + k[8176]; - data[jistart + 9855] = 0.0 + k[8191]; - data[jistart + 9856] = 0.0 + k[7814] + k[8143]; - data[jistart + 9857] = 0.0 - k[7154] - k[7336] - k[7518] - k[7753] - - k[8067]; - data[jistart + 9858] = 0.0 + k[7759] + k[8077]; - data[jistart + 9859] = 0.0 + k[6975]; - data[jistart + 9860] = 0.0 + k[8414]*y_cur[IDX_GHSI] + - k[8415]*y_cur[IDX_GSI]; - data[jistart + 9861] = 0.0 + k[7815]; - data[jistart + 9862] = 0.0 + k[7848] + k[8177]; - data[jistart + 9863] = 0.0 + k[7860] + k[8192]; - data[jistart + 9864] = 0.0 - k[7157] - k[7339] - k[7521] - k[7757] - - k[7758] - k[8075] - k[8076] - k[8330]*y_cur[IDX_GHI] - - k[8452]*y_cur[IDX_GOI] - k[8625]*y_cur[IDX_GHI] - - k[8696]*y_cur[IDX_GOI]; - data[jistart + 9865] = 0.0 - k[8330]*y_cur[IDX_GCSI] - - k[8625]*y_cur[IDX_GCSI]; - data[jistart + 9866] = 0.0 + k[7777] + k[8098]; - data[jistart + 9867] = 0.0 + k[7767] + k[8085] + k[8087]; - data[jistart + 9868] = 0.0 + k[8414]*y_cur[IDX_GCI]; - data[jistart + 9869] = 0.0 - k[8452]*y_cur[IDX_GCSI] - - k[8696]*y_cur[IDX_GCSI]; - data[jistart + 9870] = 0.0 + k[7829] + k[8153]; - data[jistart + 9871] = 0.0 + k[8415]*y_cur[IDX_GCI]; - data[jistart + 9872] = 0.0 + k[6942]; - data[jistart + 9873] = 0.0 + k[7781] + k[8105]; - data[jistart + 9874] = 0.0 - k[7124] - k[7306] - k[7488] - - k[8314]*y_cur[IDX_GHI] - k[8609]*y_cur[IDX_GHI]; - data[jistart + 9875] = 0.0 + k[7796] + k[8121]; - data[jistart + 9876] = 0.0 - k[8314]*y_cur[IDX_GClI] - - k[8609]*y_cur[IDX_GClI]; - data[jistart + 9877] = 0.0 + k[7713] + k[8018] + k[8019]; - data[jistart + 9878] = 0.0 + k[6999]; - data[jistart + 9879] = 0.0 - k[7181] - k[7363] - k[7545] - k[7796] - - k[8121]; - data[jistart + 9880] = 0.0 + k[6903]; - data[jistart + 9881] = 0.0 - k[7085] - k[7267] - k[7449] - - k[8284]*y_cur[IDX_GHI] - k[8585]*y_cur[IDX_GHI]; - data[jistart + 9882] = 0.0 - k[8284]*y_cur[IDX_GFI] - - k[8585]*y_cur[IDX_GFI]; - data[jistart + 9883] = 0.0 + k[7640] + k[7926]; - data[jistart + 9884] = 0.0 + k[7016]; - data[jistart + 9885] = 0.0 - k[7198] - k[7380] - k[7564]; - data[jistart + 9886] = 0.0 - k[8274]*y_cur[IDX_GHI] + - k[8404]*y_cur[IDX_GNH2I] + k[8408]*y_cur[IDX_GOHI] + - k[8414]*y_cur[IDX_GHSI] - k[8576]*y_cur[IDX_GHI]; - data[jistart + 9887] = 0.0 - k[8362]*y_cur[IDX_GHI] + - k[8392]*y_cur[IDX_GH2I] - k[8648]*y_cur[IDX_GHI]; - data[jistart + 9888] = 0.0 + k[7876] + k[8236] + k[8237] + k[8239] + - k[8241] + k[8242] + k[8243] - k[8363]*y_cur[IDX_GHI] + - k[8393]*y_cur[IDX_GH2I] - k[8649]*y_cur[IDX_GHI]; - data[jistart + 9889] = 0.0 + k[7878] + k[8248] + k[8248] + k[8249] + - k[8250] + k[8251]; - data[jistart + 9890] = 0.0 - k[8285]*y_cur[IDX_GHI] + - k[8374]*y_cur[IDX_GH2I] - k[8586]*y_cur[IDX_GHI]; - data[jistart + 9891] = 0.0 + k[7642] + k[7643] + k[7929] + k[7930] - - k[8286]*y_cur[IDX_GHI] + k[8375]*y_cur[IDX_GH2I] - - k[8587]*y_cur[IDX_GHI]; - data[jistart + 9892] = 0.0 + k[7645] + k[7646] + k[7646] + k[7647] + - k[7932] + k[7933] + k[7933] + k[7934] - k[8287]*y_cur[IDX_GHI] - - k[8588]*y_cur[IDX_GHI]; - data[jistart + 9893] = 0.0 + k[7652] + k[7653] + k[7654] + k[7655] + - k[7656] + k[7659] + k[7659] + k[7660] + k[7660] + k[7939] + k[7940] - + k[7941] + k[7942] + k[7943] + k[7946] + k[7946] + k[7947] + - k[7947] - k[8288]*y_cur[IDX_GHI] - k[8589]*y_cur[IDX_GHI]; - data[jistart + 9894] = 0.0 + k[7669] + k[7669] + k[7670] + k[7671] + - k[7956] + k[7956] + k[7957] + k[7958] - k[8289]*y_cur[IDX_GHI] - - k[8590]*y_cur[IDX_GHI]; - data[jistart + 9895] = 0.0 - k[8345]*y_cur[IDX_GHI] - - k[8635]*y_cur[IDX_GHI]; - data[jistart + 9896] = 0.0 + k[7677] + k[7678] + k[7678] + k[7678] + - k[7679] + k[7679] + k[7680] + k[7964] + k[7965] + k[7965] + k[7965] - + k[7966] + k[7966] + k[7967] - k[8290]*y_cur[IDX_GHI] - - k[8591]*y_cur[IDX_GHI]; - data[jistart + 9897] = 0.0 + k[7810] + k[7810] + k[7811] + k[7812] + - k[7812] + k[8139] + k[8139] + k[8140] + k[8141] + k[8141]; - data[jistart + 9898] = 0.0 + k[7689] + k[7979] - - k[8291]*y_cur[IDX_GHI]; - data[jistart + 9899] = 0.0 - k[8321]*y_cur[IDX_GHI] - - k[8616]*y_cur[IDX_GHI]; - data[jistart + 9900] = 0.0 - k[8324]*y_cur[IDX_GHI] - - k[8619]*y_cur[IDX_GHI]; - data[jistart + 9901] = 0.0 - k[8315]*y_cur[IDX_GHI] + - k[8377]*y_cur[IDX_GH2I] - k[8610]*y_cur[IDX_GHI]; - data[jistart + 9902] = 0.0 + k[7714] + k[8020] - - k[8316]*y_cur[IDX_GHI] + k[8378]*y_cur[IDX_GH2I] + - k[8379]*y_cur[IDX_GH2I] - k[8611]*y_cur[IDX_GHI]; - data[jistart + 9903] = 0.0 + k[7715] + k[8021] - - k[8317]*y_cur[IDX_GHI] - k[8612]*y_cur[IDX_GHI]; - data[jistart + 9904] = 0.0 - k[8343]*y_cur[IDX_GHI] - - k[8633]*y_cur[IDX_GHI]; - data[jistart + 9905] = 0.0 - k[8339]*y_cur[IDX_GHI] + - k[8380]*y_cur[IDX_GH2I] - k[8629]*y_cur[IDX_GHI]; - data[jistart + 9906] = 0.0 + k[7789] + k[8113] - - k[8340]*y_cur[IDX_GHI] + k[8381]*y_cur[IDX_GH2I] - - k[8630]*y_cur[IDX_GHI]; - data[jistart + 9907] = 0.0 + k[7792] + k[7794] + k[8116] + k[8118] - - k[8341]*y_cur[IDX_GHI] - k[8631]*y_cur[IDX_GHI]; - data[jistart + 9908] = 0.0 + k[7795] + k[7795] + k[8120] - - k[8342]*y_cur[IDX_GHI] - k[8632]*y_cur[IDX_GHI]; - data[jistart + 9909] = 0.0 - k[8350]*y_cur[IDX_GHI] + - k[8382]*y_cur[IDX_GH2I] - k[8636]*y_cur[IDX_GHI]; - data[jistart + 9910] = 0.0 + k[7835] + k[8159] - - k[8351]*y_cur[IDX_GHI] + k[8383]*y_cur[IDX_GH2I] - - k[8637]*y_cur[IDX_GHI]; - data[jistart + 9911] = 0.0 + k[7838] + k[8163]; - data[jistart + 9912] = 0.0 - k[8354]*y_cur[IDX_GHI] - - k[8640]*y_cur[IDX_GHI]; - data[jistart + 9913] = 0.0 - k[8352]*y_cur[IDX_GHI] + - k[8384]*y_cur[IDX_GH2I] - k[8638]*y_cur[IDX_GHI]; - data[jistart + 9914] = 0.0 + k[7852] - k[8353]*y_cur[IDX_GHI] + - k[8385]*y_cur[IDX_GH2I] - k[8639]*y_cur[IDX_GHI]; - data[jistart + 9915] = 0.0 + k[8183] + k[8185]; - data[jistart + 9916] = 0.0 + k[7858] + k[7858]; - data[jistart + 9917] = 0.0 - k[8355]*y_cur[IDX_GHI] + - k[8386]*y_cur[IDX_GH2I] - k[8641]*y_cur[IDX_GHI]; - data[jistart + 9918] = 0.0 + k[7862] + k[8197] + k[8199] - - k[8356]*y_cur[IDX_GHI] + k[8387]*y_cur[IDX_GH2I] - - k[8642]*y_cur[IDX_GHI]; - data[jistart + 9919] = 0.0 + k[7863] + k[8200] + k[8202]; - data[jistart + 9920] = 0.0 - k[8359]*y_cur[IDX_GHI] - - k[8645]*y_cur[IDX_GHI]; - data[jistart + 9921] = 0.0 - k[8357]*y_cur[IDX_GHI] + - k[8388]*y_cur[IDX_GH2I] - k[8643]*y_cur[IDX_GHI]; - data[jistart + 9922] = 0.0 + k[7867] + k[8208] + k[8210] - - k[8358]*y_cur[IDX_GHI] + k[8389]*y_cur[IDX_GH2I] - - k[8644]*y_cur[IDX_GHI]; - data[jistart + 9923] = 0.0 + k[7869] + k[8213] + k[8215]; - data[jistart + 9924] = 0.0 - k[8360]*y_cur[IDX_GHI] + - k[8390]*y_cur[IDX_GH2I] - k[8646]*y_cur[IDX_GHI]; - data[jistart + 9925] = 0.0 + k[7872] + k[8222] + k[8224] - - k[8361]*y_cur[IDX_GHI] + k[8391]*y_cur[IDX_GH2I] - - k[8647]*y_cur[IDX_GHI]; - data[jistart + 9926] = 0.0 + k[7873] + k[8225] + k[8227]; - data[jistart + 9927] = 0.0 - k[8364]*y_cur[IDX_GHI] - - k[8650]*y_cur[IDX_GHI]; - data[jistart + 9928] = 0.0 + k[7618] + k[7894] + k[7895] - - k[8275]*y_cur[IDX_GHI] + k[8479]*y_cur[IDX_GNHI] + - k[8480]*y_cur[IDX_GNHI] - k[8577]*y_cur[IDX_GHI]; - data[jistart + 9929] = 0.0 + k[7619] + k[7621] + k[7621] + k[7622] + - k[7896] + k[7898] + k[7898] + k[7899] - k[8276]*y_cur[IDX_GHI] + - k[8370]*y_cur[IDX_GH2I] - k[8578]*y_cur[IDX_GHI]; - data[jistart + 9930] = 0.0 + k[7719] + k[8026] - - k[8319]*y_cur[IDX_GHI] - k[8320]*y_cur[IDX_GHI] - - k[8614]*y_cur[IDX_GHI] - k[8615]*y_cur[IDX_GHI]; - data[jistart + 9931] = 0.0 + k[7721] + k[7723] + k[7725] + k[7725] + - k[8028] + k[8031] + k[8033] + k[8033]; - data[jistart + 9932] = 0.0 - k[8344]*y_cur[IDX_GHI] - - k[8634]*y_cur[IDX_GHI]; - data[jistart + 9933] = 0.0 - k[8323]*y_cur[IDX_GHI] - - k[8618]*y_cur[IDX_GHI]; - data[jistart + 9934] = 0.0 - k[8300]*y_cur[IDX_GHI] - - k[8599]*y_cur[IDX_GHI]; - data[jistart + 9935] = 0.0 - k[8367]*y_cur[IDX_GHI] - - k[8368]*y_cur[IDX_GHI]; - data[jistart + 9936] = 0.0 - k[8366]*y_cur[IDX_GHI] - - k[8652]*y_cur[IDX_GHI]; - data[jistart + 9937] = 0.0 + k[7625] + k[7627] + k[7629] + k[7629] + - k[7902] + k[7904] + k[7906] + k[7906] - k[8277]*y_cur[IDX_GHI] + - k[8371]*y_cur[IDX_GH2I] + k[8474]*y_cur[IDX_GSI] - - k[8579]*y_cur[IDX_GHI]; - data[jistart + 9938] = 0.0 + k[7729] + k[7731] + k[7733] + k[7733] + - k[8037] + k[8040] + k[8042] + k[8042]; - data[jistart + 9939] = 0.0 + k[7762] + k[7762] + k[8080] + k[8080] - - k[8332]*y_cur[IDX_GHI] - k[8333]*y_cur[IDX_GHI] - - k[8334]*y_cur[IDX_GHI]; - data[jistart + 9940] = 0.0 + k[7736] + k[8045]; - data[jistart + 9941] = 0.0 - k[8331]*y_cur[IDX_GHI] - - k[8626]*y_cur[IDX_GHI]; - data[jistart + 9942] = 0.0 - k[8299]*y_cur[IDX_GHI] + - k[8561]*y_cur[IDX_GH2COI] - k[8598]*y_cur[IDX_GHI]; - data[jistart + 9943] = 0.0 + k[7697] + k[7698] + k[7700] + k[7701] + - k[7701] + k[7998] + k[7999] + k[8000] + k[8001] + k[8001]; - data[jistart + 9944] = 0.0 + k[7911] + k[7912] + k[7913] + k[7913] + - k[7914] - k[8278]*y_cur[IDX_GHI]; - data[jistart + 9945] = 0.0 - k[8292]*y_cur[IDX_GHI] + - k[8376]*y_cur[IDX_GH2I] - k[8592]*y_cur[IDX_GHI]; - data[jistart + 9946] = 0.0 - k[8326]*y_cur[IDX_GHI] - - k[8327]*y_cur[IDX_GHI] - k[8621]*y_cur[IDX_GHI] - - k[8622]*y_cur[IDX_GHI]; - data[jistart + 9947] = 0.0 - k[8294]*y_cur[IDX_GHI] + - k[8515]*y_cur[IDX_GOHI] - k[8594]*y_cur[IDX_GHI]; - data[jistart + 9948] = 0.0 - k[8365]*y_cur[IDX_GHI] - - k[8651]*y_cur[IDX_GHI]; - data[jistart + 9949] = 0.0 - k[8336]*y_cur[IDX_GHI] - - k[8628]*y_cur[IDX_GHI]; - data[jistart + 9950] = 0.0 - k[8330]*y_cur[IDX_GHI] - - k[8625]*y_cur[IDX_GHI]; - data[jistart + 9951] = 0.0 - k[8314]*y_cur[IDX_GHI] - - k[8609]*y_cur[IDX_GHI]; - data[jistart + 9952] = 0.0 - k[8284]*y_cur[IDX_GHI] - - k[8585]*y_cur[IDX_GHI]; - data[jistart + 9953] = 0.0 - k[7070] - k[7252] - k[7434] - - k[8273]*y_cur[IDX_GHI] - k[8273]*y_cur[IDX_GHI] - - k[8273]*y_cur[IDX_GHI] - k[8273]*y_cur[IDX_GHI] - - k[8274]*y_cur[IDX_GCI] - k[8275]*y_cur[IDX_GCHI] - - k[8276]*y_cur[IDX_GCH2I] - k[8277]*y_cur[IDX_GCH3I] - - k[8278]*y_cur[IDX_GCH4I] - k[8279]*y_cur[IDX_GNI] - - k[8280]*y_cur[IDX_GNHI] - k[8281]*y_cur[IDX_GNH2I] - - k[8282]*y_cur[IDX_GOI] - k[8283]*y_cur[IDX_GOHI] - - k[8284]*y_cur[IDX_GFI] - k[8285]*y_cur[IDX_GC2I] - - k[8286]*y_cur[IDX_GC2HI] - k[8287]*y_cur[IDX_GC2H2I] - - k[8288]*y_cur[IDX_GC2H3I] - k[8289]*y_cur[IDX_GC2H4I] - - k[8290]*y_cur[IDX_GC2H5I] - k[8291]*y_cur[IDX_GC2H6I] - - k[8292]*y_cur[IDX_GCNI] - k[8293]*y_cur[IDX_GH2CNI] - - k[8294]*y_cur[IDX_GCOI] - k[8295]*y_cur[IDX_GHCOI] - - k[8296]*y_cur[IDX_GH2COI] - k[8297]*y_cur[IDX_GH2COI] - - k[8298]*y_cur[IDX_GH2COI] - k[8299]*y_cur[IDX_GCH3OI] - - k[8300]*y_cur[IDX_GCH2OHI] - k[8301]*y_cur[IDX_GSiI] - - k[8302]*y_cur[IDX_GSiHI] - k[8303]*y_cur[IDX_GSiH2I] - - k[8304]*y_cur[IDX_GSiH3I] - k[8305]*y_cur[IDX_GNOI] - - k[8306]*y_cur[IDX_GHNOI] - k[8307]*y_cur[IDX_GO2I] - - k[8308]*y_cur[IDX_GO2HI] - k[8309]*y_cur[IDX_GH2O2I] - - k[8310]*y_cur[IDX_GH2O2I] - k[8311]*y_cur[IDX_GSI] - - k[8312]*y_cur[IDX_GHSI] - k[8313]*y_cur[IDX_GH2SI] - - k[8314]*y_cur[IDX_GClI] - k[8315]*y_cur[IDX_GC3I] - - k[8316]*y_cur[IDX_GC3HI] - k[8317]*y_cur[IDX_GC3H2I] - - k[8318]*y_cur[IDX_GH2CCCI] - k[8319]*y_cur[IDX_GCH2CCHI] - - k[8320]*y_cur[IDX_GCH2CCHI] - k[8321]*y_cur[IDX_GC2NI] - - k[8322]*y_cur[IDX_GHCCNI] - k[8323]*y_cur[IDX_GCH2CNI] - - k[8324]*y_cur[IDX_GC2OI] - k[8325]*y_cur[IDX_GHC2OI] - - k[8326]*y_cur[IDX_GCNOI] - k[8327]*y_cur[IDX_GCNOI] - - k[8328]*y_cur[IDX_GOCNI] - k[8329]*y_cur[IDX_GOCNI] - - k[8330]*y_cur[IDX_GCSI] - k[8331]*y_cur[IDX_GCH3COI] - - k[8332]*y_cur[IDX_GCH3CHOI] - k[8333]*y_cur[IDX_GCH3CHOI] - - k[8334]*y_cur[IDX_GCH3CHOI] - k[8335]*y_cur[IDX_GHCSI] - - k[8336]*y_cur[IDX_GCOOHI] - k[8337]*y_cur[IDX_GHCOOHI] - - k[8338]*y_cur[IDX_GHCOOHI] - k[8339]*y_cur[IDX_GC4I] - - k[8340]*y_cur[IDX_GC4HI] - k[8341]*y_cur[IDX_GC4H2I] - - k[8342]*y_cur[IDX_GC4H3I] - k[8343]*y_cur[IDX_GC3NI] - - k[8344]*y_cur[IDX_GCH2CHCNI] - k[8345]*y_cur[IDX_GC2H4CNI] - - k[8346]*y_cur[IDX_GHCOOCH3I] - k[8347]*y_cur[IDX_GHCOOCH3I] - - k[8348]*y_cur[IDX_GOCSI] - k[8349]*y_cur[IDX_GSO2I] - - k[8350]*y_cur[IDX_GC5I] - k[8351]*y_cur[IDX_GC5HI] - - k[8352]*y_cur[IDX_GC6I] - k[8353]*y_cur[IDX_GC6HI] - - k[8354]*y_cur[IDX_GC5NI] - k[8355]*y_cur[IDX_GC7I] - - k[8356]*y_cur[IDX_GC7HI] - k[8357]*y_cur[IDX_GC8I] - - k[8358]*y_cur[IDX_GC8HI] - k[8359]*y_cur[IDX_GC7NI] - - k[8360]*y_cur[IDX_GC9I] - k[8361]*y_cur[IDX_GC9HI] - - k[8362]*y_cur[IDX_GC10I] - k[8363]*y_cur[IDX_GC10HI] - - k[8364]*y_cur[IDX_GC9NI] - k[8365]*y_cur[IDX_GCOOCH3I] - - k[8366]*y_cur[IDX_GCH2OHCOI] - k[8367]*y_cur[IDX_GCH2OHCHOI] - - k[8368]*y_cur[IDX_GCH2OHCHOI] - k[8576]*y_cur[IDX_GCI] - - k[8577]*y_cur[IDX_GCHI] - k[8578]*y_cur[IDX_GCH2I] - - k[8579]*y_cur[IDX_GCH3I] - k[8580]*y_cur[IDX_GNI] - - k[8581]*y_cur[IDX_GNHI] - k[8582]*y_cur[IDX_GNH2I] - - k[8583]*y_cur[IDX_GOI] - k[8584]*y_cur[IDX_GOHI] - - k[8585]*y_cur[IDX_GFI] - k[8586]*y_cur[IDX_GC2I] - - k[8587]*y_cur[IDX_GC2HI] - k[8588]*y_cur[IDX_GC2H2I] - - k[8589]*y_cur[IDX_GC2H3I] - k[8590]*y_cur[IDX_GC2H4I] - - k[8591]*y_cur[IDX_GC2H5I] - k[8592]*y_cur[IDX_GCNI] - - k[8593]*y_cur[IDX_GH2CNI] - k[8594]*y_cur[IDX_GCOI] - - k[8595]*y_cur[IDX_GHCOI] - k[8596]*y_cur[IDX_GH2COI] - - k[8597]*y_cur[IDX_GH2COI] - k[8598]*y_cur[IDX_GCH3OI] - - k[8599]*y_cur[IDX_GCH2OHI] - k[8600]*y_cur[IDX_GSiI] - - k[8601]*y_cur[IDX_GSiHI] - k[8602]*y_cur[IDX_GSiH2I] - - k[8603]*y_cur[IDX_GSiH3I] - k[8604]*y_cur[IDX_GNOI] - - k[8605]*y_cur[IDX_GO2I] - k[8606]*y_cur[IDX_GO2HI] - - k[8607]*y_cur[IDX_GSI] - k[8608]*y_cur[IDX_GHSI] - - k[8609]*y_cur[IDX_GClI] - k[8610]*y_cur[IDX_GC3I] - - k[8611]*y_cur[IDX_GC3HI] - k[8612]*y_cur[IDX_GC3H2I] - - k[8613]*y_cur[IDX_GH2CCCI] - k[8614]*y_cur[IDX_GCH2CCHI] - - k[8615]*y_cur[IDX_GCH2CCHI] - k[8616]*y_cur[IDX_GC2NI] - - k[8617]*y_cur[IDX_GHCCNI] - k[8618]*y_cur[IDX_GCH2CNI] - - k[8619]*y_cur[IDX_GC2OI] - k[8620]*y_cur[IDX_GHC2OI] - - k[8621]*y_cur[IDX_GCNOI] - k[8622]*y_cur[IDX_GCNOI] - - k[8623]*y_cur[IDX_GOCNI] - k[8624]*y_cur[IDX_GOCNI] - - k[8625]*y_cur[IDX_GCSI] - k[8626]*y_cur[IDX_GCH3COI] - - k[8627]*y_cur[IDX_GHCSI] - k[8628]*y_cur[IDX_GCOOHI] - - k[8629]*y_cur[IDX_GC4I] - k[8630]*y_cur[IDX_GC4HI] - - k[8631]*y_cur[IDX_GC4H2I] - k[8632]*y_cur[IDX_GC4H3I] - - k[8633]*y_cur[IDX_GC3NI] - k[8634]*y_cur[IDX_GCH2CHCNI] - - k[8635]*y_cur[IDX_GC2H4CNI] - k[8636]*y_cur[IDX_GC5I] - - k[8637]*y_cur[IDX_GC5HI] - k[8638]*y_cur[IDX_GC6I] - - k[8639]*y_cur[IDX_GC6HI] - k[8640]*y_cur[IDX_GC5NI] - - k[8641]*y_cur[IDX_GC7I] - k[8642]*y_cur[IDX_GC7HI] - - k[8643]*y_cur[IDX_GC8I] - k[8644]*y_cur[IDX_GC8HI] - - k[8645]*y_cur[IDX_GC7NI] - k[8646]*y_cur[IDX_GC9I] - - k[8647]*y_cur[IDX_GC9HI] - k[8648]*y_cur[IDX_GC10I] - - k[8649]*y_cur[IDX_GC10HI] - k[8650]*y_cur[IDX_GC9NI] - - k[8651]*y_cur[IDX_GCOOCH3I] - k[8652]*y_cur[IDX_GCH2OHCOI]; - data[jistart + 9954] = 0.0 + k[7617] + k[7617] + k[7893] + k[7893] + - k[8370]*y_cur[IDX_GCH2I] + k[8371]*y_cur[IDX_GCH3I] + - k[8372]*y_cur[IDX_GNH2I] + k[8373]*y_cur[IDX_GOHI] + - k[8374]*y_cur[IDX_GC2I] + k[8375]*y_cur[IDX_GC2HI] + - k[8376]*y_cur[IDX_GCNI] + k[8377]*y_cur[IDX_GC3I] + - k[8378]*y_cur[IDX_GC3HI] + k[8379]*y_cur[IDX_GC3HI] + - k[8380]*y_cur[IDX_GC4I] + k[8381]*y_cur[IDX_GC4HI] + - k[8382]*y_cur[IDX_GC5I] + k[8383]*y_cur[IDX_GC5HI] + - k[8384]*y_cur[IDX_GC6I] + k[8385]*y_cur[IDX_GC6HI] + - k[8386]*y_cur[IDX_GC7I] + k[8387]*y_cur[IDX_GC7HI] + - k[8388]*y_cur[IDX_GC8I] + k[8389]*y_cur[IDX_GC8HI] + - k[8390]*y_cur[IDX_GC9I] + k[8391]*y_cur[IDX_GC9HI] + - k[8392]*y_cur[IDX_GC10I] + k[8393]*y_cur[IDX_GC10HI]; - data[jistart + 9955] = 0.0 + k[7716] + k[8023] - - k[8318]*y_cur[IDX_GHI] - k[8613]*y_cur[IDX_GHI]; - data[jistart + 9956] = 0.0 + k[7665] + k[7952] - - k[8293]*y_cur[IDX_GHI] - k[8593]*y_cur[IDX_GHI]; - data[jistart + 9957] = 0.0 + k[7983] + k[7983] + k[7986] + k[7986] + - k[7987] - k[8296]*y_cur[IDX_GHI] - k[8297]*y_cur[IDX_GHI] - - k[8298]*y_cur[IDX_GHI] + k[8509]*y_cur[IDX_GOHI] + - k[8561]*y_cur[IDX_GCH3OI] - k[8596]*y_cur[IDX_GHI] - - k[8597]*y_cur[IDX_GHI]; - data[jistart + 9958] = 0.0 + k[7639] + k[7921] + k[7924] + k[7924] + - k[7925]; - data[jistart + 9959] = 0.0 - k[8309]*y_cur[IDX_GHI] - - k[8310]*y_cur[IDX_GHI]; - data[jistart + 9960] = 0.0 + k[7710] + k[7711] + k[7711] + k[8013] + - k[8015] + k[8016] + k[8016] - k[8313]*y_cur[IDX_GHI]; - data[jistart + 9961] = 0.0 + k[8097] + k[8097]; - data[jistart + 9962] = 0.0 - k[8325]*y_cur[IDX_GHI] - - k[8620]*y_cur[IDX_GHI]; - data[jistart + 9963] = 0.0 + k[7817] + k[8145]; - data[jistart + 9964] = 0.0 + k[7856] + k[8188]; - data[jistart + 9965] = 0.0 + k[8218]; - data[jistart + 9966] = 0.0 + k[8254]; - data[jistart + 9967] = 0.0 + k[7886] - k[8322]*y_cur[IDX_GHI] - - k[8617]*y_cur[IDX_GHI]; - data[jistart + 9968] = 0.0 + k[7651] + k[7938]; - data[jistart + 9969] = 0.0 + k[7682] + k[7683] + k[7969] + k[7970] - - k[8295]*y_cur[IDX_GHI] + k[8448]*y_cur[IDX_GOI] - - k[8595]*y_cur[IDX_GHI]; - data[jistart + 9970] = 0.0 + k[7826] - k[8346]*y_cur[IDX_GHI] - - k[8347]*y_cur[IDX_GHI]; - data[jistart + 9971] = 0.0 + k[8103] + k[8103] - - k[8337]*y_cur[IDX_GHI] - k[8338]*y_cur[IDX_GHI]; - data[jistart + 9972] = 0.0 + k[7759] + k[8077]; - data[jistart + 9973] = 0.0 + k[7767] + k[8085] + k[8087] - - k[8335]*y_cur[IDX_GHI] - k[8627]*y_cur[IDX_GHI]; - data[jistart + 9974] = 0.0 + k[8047] + k[8049]; - data[jistart + 9975] = 0.0 + k[7713] + k[8018] + k[8019]; - data[jistart + 9976] = 0.0 + k[7640] + k[7926]; - data[jistart + 9977] = 0.0 + k[7650] + k[7937]; - data[jistart + 9978] = 0.0 + k[8122]; - data[jistart + 9979] = 0.0 + k[7694] + k[7992] - - k[8306]*y_cur[IDX_GHI]; - data[jistart + 9980] = 0.0 + k[7750] + k[8064]; - data[jistart + 9981] = 0.0 + k[7785] + k[8109]; - data[jistart + 9982] = 0.0 + k[7707] + k[8011] - - k[8312]*y_cur[IDX_GHI] + k[8414]*y_cur[IDX_GCI] + - k[8449]*y_cur[IDX_GOI] + k[8463]*y_cur[IDX_GNI] - - k[8608]*y_cur[IDX_GHI]; - data[jistart + 9983] = 0.0 + k[8174]; - data[jistart + 9984] = 0.0 - k[8279]*y_cur[IDX_GHI] + - k[8458]*y_cur[IDX_GNHI] + k[8463]*y_cur[IDX_GHSI] - - k[8580]*y_cur[IDX_GHI]; - data[jistart + 9985] = 0.0 + k[7623] + k[7624] + k[7900] + k[7901] - - k[8280]*y_cur[IDX_GHI] + k[8458]*y_cur[IDX_GNI] + - k[8475]*y_cur[IDX_GSI] + k[8479]*y_cur[IDX_GCHI] + - k[8480]*y_cur[IDX_GCHI] + k[8525]*y_cur[IDX_GNOI] - - k[8581]*y_cur[IDX_GHI]; - data[jistart + 9986] = 0.0 + k[7630] + k[7631] + k[7631] + k[7632] + - k[7907] + k[7908] + k[7908] + k[7909] - k[8281]*y_cur[IDX_GHI] + - k[8372]*y_cur[IDX_GH2I] + k[8404]*y_cur[IDX_GCI] + - k[8440]*y_cur[IDX_GOI] - k[8582]*y_cur[IDX_GHI]; - data[jistart + 9987] = 0.0 + k[7634] + k[7636] + k[7637] + k[7637] + - k[7915] + k[7917] + k[7918] + k[7918]; - data[jistart + 9988] = 0.0 - k[8305]*y_cur[IDX_GHI] + - k[8525]*y_cur[IDX_GNHI] - k[8604]*y_cur[IDX_GHI]; - data[jistart + 9989] = 0.0 - k[8282]*y_cur[IDX_GHI] + - k[8440]*y_cur[IDX_GNH2I] + k[8448]*y_cur[IDX_GHCOI] + - k[8449]*y_cur[IDX_GHSI] - k[8583]*y_cur[IDX_GHI]; - data[jistart + 9990] = 0.0 - k[8307]*y_cur[IDX_GHI] - - k[8605]*y_cur[IDX_GHI]; - data[jistart + 9991] = 0.0 + k[7705] + k[8005] - - k[8308]*y_cur[IDX_GHI] - k[8606]*y_cur[IDX_GHI]; - data[jistart + 9992] = 0.0 - k[8328]*y_cur[IDX_GHI] - - k[8329]*y_cur[IDX_GHI] - k[8623]*y_cur[IDX_GHI] - - k[8624]*y_cur[IDX_GHI]; - data[jistart + 9993] = 0.0 - k[8348]*y_cur[IDX_GHI]; - data[jistart + 9994] = 0.0 + k[7638] + k[7919] + k[7920] - - k[8283]*y_cur[IDX_GHI] + k[8373]*y_cur[IDX_GH2I] + - k[8408]*y_cur[IDX_GCI] + k[8509]*y_cur[IDX_GH2COI] + - k[8515]*y_cur[IDX_GCOI] - k[8584]*y_cur[IDX_GHI]; - data[jistart + 9995] = 0.0 + k[7696] + k[7996]; - data[jistart + 9996] = 0.0 + k[7706] + k[8007] + k[8009] + k[8009] + - k[8010]; - data[jistart + 9997] = 0.0 - k[8311]*y_cur[IDX_GHI] + - k[8474]*y_cur[IDX_GCH3I] + k[8475]*y_cur[IDX_GNHI] - - k[8607]*y_cur[IDX_GHI]; - data[jistart + 9998] = 0.0 - k[8349]*y_cur[IDX_GHI]; - data[jistart + 9999] = 0.0 - k[8301]*y_cur[IDX_GHI] - - k[8600]*y_cur[IDX_GHI]; - data[jistart + 10000] = 0.0 + k[7805] + k[8133]; - data[jistart + 10001] = 0.0 + k[8137]; - data[jistart + 10002] = 0.0 + k[7843] + k[8170]; - data[jistart + 10003] = 0.0 + k[8057] + k[8058]; - data[jistart + 10004] = 0.0 + k[7749] + k[8063]; - data[jistart + 10005] = 0.0 + k[7684] + k[7971] - - k[8302]*y_cur[IDX_GHI] - k[8601]*y_cur[IDX_GHI]; - data[jistart + 10006] = 0.0 + k[7686] + k[7973] + k[7975] + k[7975] - + k[7976] - k[8303]*y_cur[IDX_GHI] - k[8602]*y_cur[IDX_GHI]; - data[jistart + 10007] = 0.0 + k[7693] + k[7988] + k[7990] - - k[8304]*y_cur[IDX_GHI] - k[8603]*y_cur[IDX_GHI]; - data[jistart + 10008] = 0.0 + k[7994] + k[7995]; - data[jistart + 10009] = 0.0 + k[6888]; - data[jistart + 10010] = 0.0 - k[8369]*y_cur[IDX_GH2I] - - k[8653]*y_cur[IDX_GH2I]; - data[jistart + 10011] = 0.0 - k[8392]*y_cur[IDX_GH2I]; - data[jistart + 10012] = 0.0 - k[8393]*y_cur[IDX_GH2I]; - data[jistart + 10013] = 0.0 - k[8374]*y_cur[IDX_GH2I]; - data[jistart + 10014] = 0.0 - k[8375]*y_cur[IDX_GH2I]; - data[jistart + 10015] = 0.0 + k[7653] + k[7654] + k[7657] + k[7658] - + k[7940] + k[7941] + k[7944] + k[7945]; - data[jistart + 10016] = 0.0 + k[7667] + k[7668] + k[7671] + k[7954] - + k[7955] + k[7958]; - data[jistart + 10017] = 0.0 + k[7676] + k[7677] + k[7963] + k[7964]; - data[jistart + 10018] = 0.0 + k[7687] + k[7688] + k[7977] + k[7978] - + k[8291]*y_cur[IDX_GHI]; - data[jistart + 10019] = 0.0 - k[8377]*y_cur[IDX_GH2I]; - data[jistart + 10020] = 0.0 - k[8378]*y_cur[IDX_GH2I] - - k[8379]*y_cur[IDX_GH2I]; - data[jistart + 10021] = 0.0 - k[8380]*y_cur[IDX_GH2I]; - data[jistart + 10022] = 0.0 - k[8381]*y_cur[IDX_GH2I]; - data[jistart + 10023] = 0.0 + k[8119]; - data[jistart + 10024] = 0.0 - k[8382]*y_cur[IDX_GH2I]; - data[jistart + 10025] = 0.0 - k[8383]*y_cur[IDX_GH2I]; - data[jistart + 10026] = 0.0 - k[8384]*y_cur[IDX_GH2I]; - data[jistart + 10027] = 0.0 - k[8385]*y_cur[IDX_GH2I]; - data[jistart + 10028] = 0.0 + k[8184]; - data[jistart + 10029] = 0.0 + k[7858]; - data[jistart + 10030] = 0.0 - k[8386]*y_cur[IDX_GH2I]; - data[jistart + 10031] = 0.0 - k[8387]*y_cur[IDX_GH2I]; - data[jistart + 10032] = 0.0 + k[8201]; - data[jistart + 10033] = 0.0 - k[8388]*y_cur[IDX_GH2I]; - data[jistart + 10034] = 0.0 - k[8389]*y_cur[IDX_GH2I]; - data[jistart + 10035] = 0.0 + k[8214]; - data[jistart + 10036] = 0.0 - k[8390]*y_cur[IDX_GH2I]; - data[jistart + 10037] = 0.0 - k[8391]*y_cur[IDX_GH2I]; - data[jistart + 10038] = 0.0 + k[8226]; - data[jistart + 10039] = 0.0 + k[7620] + k[7897] - - k[8370]*y_cur[IDX_GH2I]; - data[jistart + 10040] = 0.0 + k[7720] + k[8027]; - data[jistart + 10041] = 0.0 + k[8029]; - data[jistart + 10042] = 0.0 + k[8132]; - data[jistart + 10043] = 0.0 + k[7972]; - data[jistart + 10044] = 0.0 + k[8367]*y_cur[IDX_GHI]; - data[jistart + 10045] = 0.0 + k[7775]; - data[jistart + 10046] = 0.0 + k[7626] + k[7628] + k[7903] + k[7905] - - k[8371]*y_cur[IDX_GH2I]; - data[jistart + 10047] = 0.0 + k[8038]; - data[jistart + 10048] = 0.0 + k[8332]*y_cur[IDX_GHI]; - data[jistart + 10049] = 0.0 + k[7633] + k[7910] + k[7912] + - k[8278]*y_cur[IDX_GHI]; - data[jistart + 10050] = 0.0 - k[8376]*y_cur[IDX_GH2I]; - data[jistart + 10051] = 0.0 + k[8278]*y_cur[IDX_GCH4I] + - k[8291]*y_cur[IDX_GC2H6I] + k[8298]*y_cur[IDX_GH2COI] + - k[8306]*y_cur[IDX_GHNOI] + k[8309]*y_cur[IDX_GH2O2I] + - k[8313]*y_cur[IDX_GH2SI] + k[8332]*y_cur[IDX_GCH3CHOI] + - k[8337]*y_cur[IDX_GHCOOHI] + k[8347]*y_cur[IDX_GHCOOCH3I] + - k[8367]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 10052] = 0.0 - k[7071] - k[7253] - k[7435] - k[7617] - - k[7893] - k[8369]*y_cur[IDX_GCI] - k[8370]*y_cur[IDX_GCH2I] - + data[jistart + 9397] = 0.0 + k[8274]*y_cur[IDX_GHI] - k[8395]*y_cur[IDX_GCHI] - + k[8655]*y_cur[IDX_GCHI]; + data[jistart + 9398] = 0.0 + k[6892]; + data[jistart + 9399] = 0.0 + k[8274]*y_cur[IDX_GCI] - k[8275]*y_cur[IDX_GCHI] - + k[8577]*y_cur[IDX_GCHI]; + data[jistart + 9400] = 0.0 + k[2556]*y_cur[IDX_H2OI]; + data[jistart + 9401] = 0.0 + k[2341]*y_cur[IDX_HII] + k[3231]*y_cur[IDX_HeII]; + data[jistart + 9402] = 0.0 + k[3757]*y_cur[IDX_OI] + k[3882]*y_cur[IDX_O2I]; + data[jistart + 9403] = 0.0 + k[3759]*y_cur[IDX_OI]; + data[jistart + 9404] = 0.0 + k[3859]*y_cur[IDX_SiII]; + data[jistart + 9405] = 0.0 - k[4795]*y_cur[IDX_SiOHII]; + data[jistart + 9406] = 0.0 - k[4654]*y_cur[IDX_SiOHII]; + data[jistart + 9407] = 0.0 - k[4865]*y_cur[IDX_SiOHII]; + data[jistart + 9408] = 0.0 - k[4059]*y_cur[IDX_SiOHII]; + data[jistart + 9409] = 0.0 - k[4234]*y_cur[IDX_SiOHII]; + data[jistart + 9410] = 0.0 - k[4830]*y_cur[IDX_SiOHII]; + data[jistart + 9411] = 0.0 - k[3989]*y_cur[IDX_SiOHII]; + data[jistart + 9412] = 0.0 - k[4129]*y_cur[IDX_SiOHII]; + data[jistart + 9413] = 0.0 - k[4409]*y_cur[IDX_SiOHII]; + data[jistart + 9414] = 0.0 - k[4549]*y_cur[IDX_SiOHII]; + data[jistart + 9415] = 0.0 - k[4479]*y_cur[IDX_SiOHII]; + data[jistart + 9416] = 0.0 - k[4619]*y_cur[IDX_SiOHII]; + data[jistart + 9417] = 0.0 - k[3954]*y_cur[IDX_SiOHII]; + data[jistart + 9418] = 0.0 - k[4304]*y_cur[IDX_SiOHII]; + data[jistart + 9419] = 0.0 - k[4339]*y_cur[IDX_SiOHII]; + data[jistart + 9420] = 0.0 - k[3919]*y_cur[IDX_SiOHII]; + data[jistart + 9421] = 0.0 - k[4760]*y_cur[IDX_SiOHII]; + data[jistart + 9422] = 0.0 - k[4584]*y_cur[IDX_SiOHII]; + data[jistart + 9423] = 0.0 + k[3867]*y_cur[IDX_SiII]; + data[jistart + 9424] = 0.0 - k[4725]*y_cur[IDX_SiOHII]; + data[jistart + 9425] = 0.0 - k[4514]*y_cur[IDX_SiOHII]; + data[jistart + 9426] = 0.0 - k[4024]*y_cur[IDX_SiOHII]; + data[jistart + 9427] = 0.0 - k[4094]*y_cur[IDX_SiOHII]; + data[jistart + 9428] = 0.0 - k[4199]*y_cur[IDX_SiOHII]; + data[jistart + 9429] = 0.0 - k[4374]*y_cur[IDX_SiOHII]; + data[jistart + 9430] = 0.0 - k[4269]*y_cur[IDX_SiOHII]; + data[jistart + 9431] = 0.0 - k[4444]*y_cur[IDX_SiOHII]; + data[jistart + 9432] = 0.0 + k[2475]*y_cur[IDX_H2I]; + data[jistart + 9433] = 0.0 - k[1267]*y_cur[IDX_eM] - k[1268]*y_cur[IDX_eM] - + k[3604]*y_cur[IDX_NH3I] - k[3919]*y_cur[IDX_CM] - + k[3954]*y_cur[IDX_C10M] - k[3989]*y_cur[IDX_C10HM] - + k[4024]*y_cur[IDX_C2M] - k[4059]*y_cur[IDX_C2HM] - + k[4094]*y_cur[IDX_C3M] - k[4129]*y_cur[IDX_C3HM] - + k[4164]*y_cur[IDX_C3NM] - k[4199]*y_cur[IDX_C4M] - + k[4234]*y_cur[IDX_C4HM] - k[4269]*y_cur[IDX_C5M] - + k[4304]*y_cur[IDX_C5HM] - k[4339]*y_cur[IDX_C5NM] - + k[4374]*y_cur[IDX_C6M] - k[4409]*y_cur[IDX_C6HM] - + k[4444]*y_cur[IDX_C7M] - k[4479]*y_cur[IDX_C7HM] - + k[4514]*y_cur[IDX_C8M] - k[4549]*y_cur[IDX_C8HM] - + k[4584]*y_cur[IDX_C9M] - k[4619]*y_cur[IDX_C9HM] - + k[4654]*y_cur[IDX_CHM] - k[4689]*y_cur[IDX_CNM] - + k[4725]*y_cur[IDX_HM] - k[4760]*y_cur[IDX_OM] - + k[4795]*y_cur[IDX_O2M] - k[4830]*y_cur[IDX_OHM] - + k[4865]*y_cur[IDX_SM] - k[6556]*y_cur[IDX_GRAINM] - + k[6557]*y_cur[IDX_GRAINM]; + data[jistart + 9434] = 0.0 + k[3794]*y_cur[IDX_SiOI]; + data[jistart + 9435] = 0.0 - k[4164]*y_cur[IDX_SiOHII]; + data[jistart + 9436] = 0.0 + k[2760]*y_cur[IDX_H3II] + k[2826]*y_cur[IDX_H3OII] + + k[3005]*y_cur[IDX_HCOII] + k[3794]*y_cur[IDX_OHII]; + data[jistart + 9437] = 0.0 - k[4689]*y_cur[IDX_SiOHII]; + data[jistart + 9438] = 0.0 + k[3882]*y_cur[IDX_SiH2II]; + data[jistart + 9439] = 0.0 + k[2569]*y_cur[IDX_H2OI] + k[3859]*y_cur[IDX_C2H5OHI] + + k[3867]*y_cur[IDX_CH3OHI]; + data[jistart + 9440] = 0.0 - k[3604]*y_cur[IDX_SiOHII]; + data[jistart + 9441] = 0.0 + k[2826]*y_cur[IDX_SiOI]; + data[jistart + 9442] = 0.0 + k[3757]*y_cur[IDX_SiH2II] + k[3759]*y_cur[IDX_SiH3II]; + data[jistart + 9443] = 0.0 + k[3231]*y_cur[IDX_H2SiOI]; + data[jistart + 9444] = 0.0 + k[2556]*y_cur[IDX_HSiSII] + k[2569]*y_cur[IDX_SiII]; + data[jistart + 9445] = 0.0 + k[2341]*y_cur[IDX_H2SiOI]; + data[jistart + 9446] = 0.0 + k[3005]*y_cur[IDX_SiOI]; + data[jistart + 9447] = 0.0 + k[2760]*y_cur[IDX_SiOI]; + data[jistart + 9448] = 0.0 - k[6556]*y_cur[IDX_SiOHII] - k[6557]*y_cur[IDX_SiOHII]; + data[jistart + 9449] = 0.0 + k[2475]*y_cur[IDX_SiOII]; + data[jistart + 9450] = 0.0 - k[1267]*y_cur[IDX_SiOHII] - k[1268]*y_cur[IDX_SiOHII]; + data[jistart + 9451] = 0.0 + k[1009]*y_cur[IDX_eM] + k[6539]*y_cur[IDX_GRAINM]; + data[jistart + 9452] = 0.0 + k[1161]*y_cur[IDX_eM] + k[6526]*y_cur[IDX_GRAINM]; + data[jistart + 9453] = 0.0 + k[1216]*y_cur[IDX_eM] + k[6618]*y_cur[IDX_GRAINM]; + data[jistart + 9454] = 0.0 + k[1212]*y_cur[IDX_eM] + k[6593]*y_cur[IDX_GRAINM]; + data[jistart + 9455] = 0.0 + k[922]*y_cur[IDX_eM] + k[6409]*y_cur[IDX_GRAINM]; + data[jistart + 9456] = 0.0 + k[5884] + k[6220]; + data[jistart + 9457] = 0.0 + k[7079] + k[7261] + k[7443]; + data[jistart + 9458] = 0.0 + k[2318]*y_cur[IDX_HII]; + data[jistart + 9459] = 0.0 + k[8581]*y_cur[IDX_GHI]; + data[jistart + 9460] = 0.0 + k[5175]*y_cur[IDX_HI]; + data[jistart + 9461] = 0.0 - k[3546]*y_cur[IDX_NH2I]; + data[jistart + 9462] = 0.0 - k[3543]*y_cur[IDX_NH2I]; + data[jistart + 9463] = 0.0 - k[586]*y_cur[IDX_NH2I]; + data[jistart + 9464] = 0.0 - k[589]*y_cur[IDX_NH2I]; + data[jistart + 9465] = 0.0 + k[2199]*y_cur[IDX_CH4I] - k[3539]*y_cur[IDX_NH2I] + + k[3581]*y_cur[IDX_NH3I]; + data[jistart + 9466] = 0.0 - k[585]*y_cur[IDX_NH2I] - k[3528]*y_cur[IDX_NH2I]; + data[jistart + 9467] = 0.0 + k[3488]*y_cur[IDX_H2COI] - k[3497]*y_cur[IDX_NH2I]; + data[jistart + 9468] = 0.0 - k[451]*y_cur[IDX_NH2I]; + data[jistart + 9469] = 0.0 + k[265]*y_cur[IDX_CH2I] + k[294]*y_cur[IDX_CHI] + + k[580]*y_cur[IDX_H2SI] + k[581]*y_cur[IDX_HCOI] + + k[582]*y_cur[IDX_NH3I] + k[583]*y_cur[IDX_NOI] + + k[584]*y_cur[IDX_SI] - k[3522]*y_cur[IDX_NH2I]; + data[jistart + 9470] = 0.0 - k[587]*y_cur[IDX_NH2I] - k[3534]*y_cur[IDX_NH2I] + + k[3573]*y_cur[IDX_NH3I]; + data[jistart + 9471] = 0.0 - k[3533]*y_cur[IDX_NH2I]; + data[jistart + 9472] = 0.0 - k[78]*y_cur[IDX_NH2I] + k[79]*y_cur[IDX_NHI]; + data[jistart + 9473] = 0.0 - k[3537]*y_cur[IDX_NH2I]; + data[jistart + 9474] = 0.0 - k[78]*y_cur[IDX_HM] - k[400]*y_cur[IDX_HII] - + k[451]*y_cur[IDX_H2II] - k[557]*y_cur[IDX_NII] - + k[585]*y_cur[IDX_C2II] - k[586]*y_cur[IDX_CNII] - + k[587]*y_cur[IDX_COII] - k[588]*y_cur[IDX_H2OII] - + k[589]*y_cur[IDX_N2II] - k[590]*y_cur[IDX_O2II] - + k[591]*y_cur[IDX_OHII] - k[660]*y_cur[IDX_OII] - + k[1417]*y_cur[IDX_CII] - k[1962]*y_cur[IDX_CHII] - + k[2086]*y_cur[IDX_CH3II] - k[2721]*y_cur[IDX_H3II] - + k[3280]*y_cur[IDX_HeII] - k[3281]*y_cur[IDX_HeII] - + k[3497]*y_cur[IDX_NHII] - k[3522]*y_cur[IDX_NH2II] - + k[3528]*y_cur[IDX_C2II] - k[3529]*y_cur[IDX_C2HII] - + k[3530]*y_cur[IDX_C2HII] - k[3531]*y_cur[IDX_C2H2II] - + k[3532]*y_cur[IDX_C2H2II] - k[3533]*y_cur[IDX_CH5II] - + k[3534]*y_cur[IDX_COII] - k[3535]*y_cur[IDX_H2COII] - + k[3536]*y_cur[IDX_H2OII] - k[3537]*y_cur[IDX_H3COII] - + k[3538]*y_cur[IDX_H3OII] - k[3539]*y_cur[IDX_HCNII] - + k[3540]*y_cur[IDX_HCNHII] - k[3541]*y_cur[IDX_HCNHII] - + k[3542]*y_cur[IDX_HCOII] - k[3543]*y_cur[IDX_HNOII] - + k[3544]*y_cur[IDX_N2HII] - k[3545]*y_cur[IDX_NH3II] - + k[3546]*y_cur[IDX_O2HII] - k[3547]*y_cur[IDX_OHII] - + k[4969]*y_cur[IDX_CI] - k[4970]*y_cur[IDX_CI] - + k[4971]*y_cur[IDX_CI] - k[5035]*y_cur[IDX_CH3I] - + k[5142]*y_cur[IDX_H2I] - k[5182]*y_cur[IDX_HI] - + k[5297]*y_cur[IDX_CH4I] - k[5298]*y_cur[IDX_NOI] - + k[5299]*y_cur[IDX_NOI] - k[5300]*y_cur[IDX_OHI] - + k[5301]*y_cur[IDX_OHI] - k[5420]*y_cur[IDX_OI] - + k[5421]*y_cur[IDX_OI] - k[5882] - k[5883] - k[6218] - k[6219] - + k[6897]; + data[jistart + 9475] = 0.0 - k[3529]*y_cur[IDX_NH2I] - k[3530]*y_cur[IDX_NH2I]; + data[jistart + 9476] = 0.0 - k[591]*y_cur[IDX_NH2I] - k[3547]*y_cur[IDX_NH2I]; + data[jistart + 9477] = 0.0 - k[588]*y_cur[IDX_NH2I] - k[3536]*y_cur[IDX_NH2I]; + data[jistart + 9478] = 0.0 - k[1962]*y_cur[IDX_NH2I]; + data[jistart + 9479] = 0.0 - k[590]*y_cur[IDX_NH2I]; + data[jistart + 9480] = 0.0 + k[79]*y_cur[IDX_HM] + k[5143]*y_cur[IDX_H2I] + + k[5304]*y_cur[IDX_CH4I] + k[5306]*y_cur[IDX_H2OI] + + k[5307]*y_cur[IDX_NH3I] + k[5307]*y_cur[IDX_NH3I] + + k[5310]*y_cur[IDX_NHI] + k[5310]*y_cur[IDX_NHI] + + k[5323]*y_cur[IDX_OHI]; + data[jistart + 9481] = 0.0 - k[3544]*y_cur[IDX_NH2I]; + data[jistart + 9482] = 0.0 - k[557]*y_cur[IDX_NH2I]; + data[jistart + 9483] = 0.0 - k[3535]*y_cur[IDX_NH2I]; + data[jistart + 9484] = 0.0 - k[660]*y_cur[IDX_NH2I]; + data[jistart + 9485] = 0.0 - k[3540]*y_cur[IDX_NH2I] - k[3541]*y_cur[IDX_NH2I]; + data[jistart + 9486] = 0.0 + k[265]*y_cur[IDX_NH2II] + k[2013]*y_cur[IDX_NH3II]; + data[jistart + 9487] = 0.0 + k[1163]*y_cur[IDX_eM] + k[2013]*y_cur[IDX_CH2I] - + k[3545]*y_cur[IDX_NH2I] + k[3553]*y_cur[IDX_NH3I] + + k[6330]*y_cur[IDX_GRAINM]; + data[jistart + 9488] = 0.0 + k[1165]*y_cur[IDX_eM] + k[1166]*y_cur[IDX_eM] + + k[6337]*y_cur[IDX_GRAINM] + k[6338]*y_cur[IDX_GRAINM]; + data[jistart + 9489] = 0.0 + k[580]*y_cur[IDX_NH2II]; + data[jistart + 9490] = 0.0 + k[583]*y_cur[IDX_NH2II] - k[5298]*y_cur[IDX_NH2I] - + k[5299]*y_cur[IDX_NH2I]; + data[jistart + 9491] = 0.0 + k[581]*y_cur[IDX_NH2II]; + data[jistart + 9492] = 0.0 + k[2199]*y_cur[IDX_HCNII] - k[5297]*y_cur[IDX_NH2I] + + k[5304]*y_cur[IDX_NHI]; + data[jistart + 9493] = 0.0 + k[3488]*y_cur[IDX_NHII]; + data[jistart + 9494] = 0.0 + k[5470]*y_cur[IDX_OHI]; + data[jistart + 9495] = 0.0 + k[294]*y_cur[IDX_NH2II]; + data[jistart + 9496] = 0.0 + k[584]*y_cur[IDX_NH2II]; + data[jistart + 9497] = 0.0 - k[5300]*y_cur[IDX_NH2I] - k[5301]*y_cur[IDX_NH2I] + + k[5323]*y_cur[IDX_NHI] + k[5470]*y_cur[IDX_HCNI] + + k[5476]*y_cur[IDX_NH3I]; + data[jistart + 9498] = 0.0 + k[582]*y_cur[IDX_NH2II] + k[3553]*y_cur[IDX_NH3II] + + k[3573]*y_cur[IDX_COII] + k[3581]*y_cur[IDX_HCNII] + + k[5036]*y_cur[IDX_CH3I] + k[5183]*y_cur[IDX_HI] + + k[5302]*y_cur[IDX_CNI] + k[5307]*y_cur[IDX_NHI] + + k[5307]*y_cur[IDX_NHI] + k[5422]*y_cur[IDX_OI] + + k[5476]*y_cur[IDX_OHI] + k[5885] + k[6221]; + data[jistart + 9499] = 0.0 - k[3531]*y_cur[IDX_NH2I] - k[3532]*y_cur[IDX_NH2I]; + data[jistart + 9500] = 0.0 - k[2086]*y_cur[IDX_NH2I]; + data[jistart + 9501] = 0.0 + k[5302]*y_cur[IDX_NH3I]; + data[jistart + 9502] = 0.0 + k[8581]*y_cur[IDX_GNHI]; + data[jistart + 9503] = 0.0 - k[5035]*y_cur[IDX_NH2I] + k[5036]*y_cur[IDX_NH3I]; + data[jistart + 9504] = 0.0 - k[3538]*y_cur[IDX_NH2I]; + data[jistart + 9505] = 0.0 - k[5420]*y_cur[IDX_NH2I] - k[5421]*y_cur[IDX_NH2I] + + k[5422]*y_cur[IDX_NH3I]; + data[jistart + 9506] = 0.0 - k[3280]*y_cur[IDX_NH2I] - k[3281]*y_cur[IDX_NH2I]; + data[jistart + 9507] = 0.0 - k[1417]*y_cur[IDX_NH2I]; + data[jistart + 9508] = 0.0 + k[5306]*y_cur[IDX_NHI]; + data[jistart + 9509] = 0.0 - k[400]*y_cur[IDX_NH2I] + k[2318]*y_cur[IDX_CH2NHI]; + data[jistart + 9510] = 0.0 - k[4969]*y_cur[IDX_NH2I] - k[4970]*y_cur[IDX_NH2I] - + k[4971]*y_cur[IDX_NH2I]; + data[jistart + 9511] = 0.0 - k[3542]*y_cur[IDX_NH2I]; + data[jistart + 9512] = 0.0 - k[2721]*y_cur[IDX_NH2I]; + data[jistart + 9513] = 0.0 + k[6330]*y_cur[IDX_NH3II] + k[6337]*y_cur[IDX_NH4II] + + k[6338]*y_cur[IDX_NH4II] + k[6409]*y_cur[IDX_CH2NH2II] + + k[6526]*y_cur[IDX_NH2CNHII] + k[6539]*y_cur[IDX_H2NCOII] + + k[6593]*y_cur[IDX_PNH2II] + k[6618]*y_cur[IDX_PNH3II]; + data[jistart + 9514] = 0.0 - k[5142]*y_cur[IDX_NH2I] + k[5143]*y_cur[IDX_NHI]; + data[jistart + 9515] = 0.0 + k[922]*y_cur[IDX_CH2NH2II] + k[1009]*y_cur[IDX_H2NCOII] + + k[1161]*y_cur[IDX_NH2CNHII] + k[1163]*y_cur[IDX_NH3II] + + k[1165]*y_cur[IDX_NH4II] + k[1166]*y_cur[IDX_NH4II] + + k[1212]*y_cur[IDX_PNH2II] + k[1216]*y_cur[IDX_PNH3II]; + data[jistart + 9516] = 0.0 + k[5175]*y_cur[IDX_HNOI] - k[5182]*y_cur[IDX_NH2I] + + k[5183]*y_cur[IDX_NH3I]; + data[jistart + 9517] = 0.0 + k[7184] + k[7366] + k[7548]; + data[jistart + 9518] = 0.0 + k[8631]*y_cur[IDX_GHI]; + data[jistart + 9519] = 0.0 + k[826]*y_cur[IDX_eM] + k[6641]*y_cur[IDX_GRAINM]; + data[jistart + 9520] = 0.0 + k[1328]*y_cur[IDX_CII]; + data[jistart + 9521] = 0.0 + k[4946]*y_cur[IDX_CI]; + data[jistart + 9522] = 0.0 + k[4954]*y_cur[IDX_CI]; + data[jistart + 9523] = 0.0 + k[4766]*y_cur[IDX_C4H3II]; + data[jistart + 9524] = 0.0 + k[4625]*y_cur[IDX_C4H3II]; + data[jistart + 9525] = 0.0 + k[4836]*y_cur[IDX_C4H3II]; + data[jistart + 9526] = 0.0 + k[4030]*y_cur[IDX_C4H3II]; + data[jistart + 9527] = 0.0 + k[4205]*y_cur[IDX_C4H3II]; + data[jistart + 9528] = 0.0 + k[4952]*y_cur[IDX_CI]; + data[jistart + 9529] = 0.0 + k[4801]*y_cur[IDX_C4H3II]; + data[jistart + 9530] = 0.0 + k[3960]*y_cur[IDX_C4H3II]; + data[jistart + 9531] = 0.0 + k[4100]*y_cur[IDX_C4H3II]; + data[jistart + 9532] = 0.0 + k[4380]*y_cur[IDX_C4H3II]; + data[jistart + 9533] = 0.0 + k[4520]*y_cur[IDX_C4H3II]; + data[jistart + 9534] = 0.0 + k[4450]*y_cur[IDX_C4H3II]; + data[jistart + 9535] = 0.0 + k[4590]*y_cur[IDX_C4H3II]; + data[jistart + 9536] = 0.0 + k[3925]*y_cur[IDX_C4H3II]; + data[jistart + 9537] = 0.0 + k[4275]*y_cur[IDX_C4H3II]; + data[jistart + 9538] = 0.0 + k[4310]*y_cur[IDX_C4H3II]; + data[jistart + 9539] = 0.0 + k[3890]*y_cur[IDX_C4H3II]; + data[jistart + 9540] = 0.0 + k[4731]*y_cur[IDX_C4H3II]; + data[jistart + 9541] = 0.0 + k[4555]*y_cur[IDX_C4H3II]; + data[jistart + 9542] = 0.0 + k[4695]*y_cur[IDX_C4H3II]; + data[jistart + 9543] = 0.0 + k[4485]*y_cur[IDX_C4H3II]; + data[jistart + 9544] = 0.0 + k[3995]*y_cur[IDX_C4H3II]; + data[jistart + 9545] = 0.0 + k[4065]*y_cur[IDX_C4H3II]; + data[jistart + 9546] = 0.0 + k[4170]*y_cur[IDX_C4H3II]; + data[jistart + 9547] = 0.0 + k[4345]*y_cur[IDX_C4H3II]; + data[jistart + 9548] = 0.0 + k[4240]*y_cur[IDX_C4H3II]; + data[jistart + 9549] = 0.0 + k[4415]*y_cur[IDX_C4H3II]; + data[jistart + 9550] = 0.0 - k[155]*y_cur[IDX_CII] - k[339]*y_cur[IDX_HII] - + k[1317]*y_cur[IDX_CII] - k[1318]*y_cur[IDX_CII] - + k[1319]*y_cur[IDX_CII] - k[2302]*y_cur[IDX_HII] - + k[2609]*y_cur[IDX_H3II] - k[2779]*y_cur[IDX_H3OII] - + k[2914]*y_cur[IDX_HCOII] - k[3108]*y_cur[IDX_HeII] - + k[3109]*y_cur[IDX_HeII] - k[3110]*y_cur[IDX_HeII] - + k[4924]*y_cur[IDX_CI] - k[5730] - k[6014] - k[6015] - k[7002]; + data[jistart + 9551] = 0.0 + k[4135]*y_cur[IDX_C4H3II]; + data[jistart + 9552] = 0.0 + k[4660]*y_cur[IDX_C4H3II]; + data[jistart + 9553] = 0.0 + k[3890]*y_cur[IDX_CM] + k[3925]*y_cur[IDX_C10M] + + k[3960]*y_cur[IDX_C10HM] + k[3995]*y_cur[IDX_C2M] + + k[4030]*y_cur[IDX_C2HM] + k[4065]*y_cur[IDX_C3M] + + k[4100]*y_cur[IDX_C3HM] + k[4135]*y_cur[IDX_C3NM] + + k[4170]*y_cur[IDX_C4M] + k[4205]*y_cur[IDX_C4HM] + + k[4240]*y_cur[IDX_C5M] + k[4275]*y_cur[IDX_C5HM] + + k[4310]*y_cur[IDX_C5NM] + k[4345]*y_cur[IDX_C6M] + + k[4380]*y_cur[IDX_C6HM] + k[4415]*y_cur[IDX_C7M] + + k[4450]*y_cur[IDX_C7HM] + k[4485]*y_cur[IDX_C8M] + + k[4520]*y_cur[IDX_C8HM] + k[4555]*y_cur[IDX_C9M] + + k[4590]*y_cur[IDX_C9HM] + k[4625]*y_cur[IDX_CHM] + + k[4660]*y_cur[IDX_CNM] + k[4695]*y_cur[IDX_HM] + + k[4731]*y_cur[IDX_OM] + k[4766]*y_cur[IDX_O2M] + + k[4801]*y_cur[IDX_OHM] + k[4836]*y_cur[IDX_SM]; + data[jistart + 9554] = 0.0 + k[4868]*y_cur[IDX_C2I]; + data[jistart + 9555] = 0.0 + k[4868]*y_cur[IDX_C2H4I]; + data[jistart + 9556] = 0.0 + k[8631]*y_cur[IDX_GC4H2I]; + data[jistart + 9557] = 0.0 - k[2779]*y_cur[IDX_C4H3I]; + data[jistart + 9558] = 0.0 - k[3108]*y_cur[IDX_C4H3I] - k[3109]*y_cur[IDX_C4H3I] - + k[3110]*y_cur[IDX_C4H3I]; + data[jistart + 9559] = 0.0 - k[155]*y_cur[IDX_C4H3I] - k[1317]*y_cur[IDX_C4H3I] - + k[1318]*y_cur[IDX_C4H3I] - k[1319]*y_cur[IDX_C4H3I] + + k[1328]*y_cur[IDX_C6H6I]; + data[jistart + 9560] = 0.0 - k[339]*y_cur[IDX_C4H3I] - k[2302]*y_cur[IDX_C4H3I]; + data[jistart + 9561] = 0.0 - k[4924]*y_cur[IDX_C4H3I] + k[4946]*y_cur[IDX_CH2CCH2I] + + k[4952]*y_cur[IDX_CH3CCHI] + k[4954]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 9562] = 0.0 - k[2914]*y_cur[IDX_C4H3I]; + data[jistart + 9563] = 0.0 - k[2609]*y_cur[IDX_C4H3I]; + data[jistart + 9564] = 0.0 + k[6641]*y_cur[IDX_C4H4II]; + data[jistart + 9565] = 0.0 + k[826]*y_cur[IDX_C4H4II]; + data[jistart + 9566] = 0.0 + k[3026]*y_cur[IDX_HII]; + data[jistart + 9567] = 0.0 + k[3241]*y_cur[IDX_HeII]; + data[jistart + 9568] = 0.0 + k[1463]*y_cur[IDX_C2I]; + data[jistart + 9569] = 0.0 + k[1460]*y_cur[IDX_C2I]; + data[jistart + 9570] = 0.0 + k[241]*y_cur[IDX_C2HI]; + data[jistart + 9571] = 0.0 + k[243]*y_cur[IDX_C2HI]; + data[jistart + 9572] = 0.0 + k[1458]*y_cur[IDX_C2I]; + data[jistart + 9573] = 0.0 + k[1454]*y_cur[IDX_HCOI] + k[2146]*y_cur[IDX_CH4I] + + k[2401]*y_cur[IDX_H2I] + k[2519]*y_cur[IDX_H2OI] + + k[3605]*y_cur[IDX_NHI]; + data[jistart + 9574] = 0.0 + k[3477]*y_cur[IDX_C2I]; + data[jistart + 9575] = 0.0 + k[439]*y_cur[IDX_C2HI] + k[2369]*y_cur[IDX_C2I]; + data[jistart + 9576] = 0.0 + k[3507]*y_cur[IDX_C2I]; + data[jistart + 9577] = 0.0 + k[242]*y_cur[IDX_C2HI]; + data[jistart + 9578] = 0.0 + k[2217]*y_cur[IDX_C2I]; + data[jistart + 9579] = 0.0 - k[1470]*y_cur[IDX_C2HII] - k[1471]*y_cur[IDX_C2HII] - + k[1472]*y_cur[IDX_C2HII] - k[1473]*y_cur[IDX_C2HII] + + k[3237]*y_cur[IDX_HeII]; + data[jistart + 9580] = 0.0 - k[3529]*y_cur[IDX_C2HII] - k[3530]*y_cur[IDX_C2HII]; + data[jistart + 9581] = 0.0 - k[212]*y_cur[IDX_NOI] - k[213]*y_cur[IDX_SI] - + k[740]*y_cur[IDX_eM] - k[741]*y_cur[IDX_eM] - + k[1466]*y_cur[IDX_C2H2I] - k[1467]*y_cur[IDX_CNI] - + k[1468]*y_cur[IDX_CO2I] - k[1469]*y_cur[IDX_H2COI] - + k[1470]*y_cur[IDX_HC3NI] - k[1471]*y_cur[IDX_HC3NI] - + k[1472]*y_cur[IDX_HC3NI] - k[1473]*y_cur[IDX_HC3NI] - + k[1474]*y_cur[IDX_HCNI] - k[1475]*y_cur[IDX_HCNI] - + k[1476]*y_cur[IDX_HCNI] - k[1477]*y_cur[IDX_HCOI] - + k[1478]*y_cur[IDX_HNCI] - k[1849]*y_cur[IDX_CI] - + k[1996]*y_cur[IDX_CH2I] - k[1997]*y_cur[IDX_CH2I] - + k[2151]*y_cur[IDX_CH4I] - k[2152]*y_cur[IDX_CH4I] - + k[2153]*y_cur[IDX_CH4I] - k[2240]*y_cur[IDX_CHI] - + k[2241]*y_cur[IDX_CHI] - k[2402]*y_cur[IDX_H2I] - + k[2521]*y_cur[IDX_H2OI] - k[3385]*y_cur[IDX_NI] - + k[3386]*y_cur[IDX_NI] - k[3529]*y_cur[IDX_NH2I] - + k[3530]*y_cur[IDX_NH2I] - k[3554]*y_cur[IDX_NH3I] - + k[3555]*y_cur[IDX_NH3I] - k[3686]*y_cur[IDX_OI] - k[5979] - + k[6354]*y_cur[IDX_GRAINM] - k[6355]*y_cur[IDX_GRAINM]; + data[jistart + 9582] = 0.0 + k[1891]*y_cur[IDX_CI]; + data[jistart + 9583] = 0.0 + k[686]*y_cur[IDX_C2HI] + k[3769]*y_cur[IDX_C2I]; + data[jistart + 9584] = 0.0 + k[465]*y_cur[IDX_C2HI] + k[2503]*y_cur[IDX_C2I]; + data[jistart + 9585] = 0.0 + k[1936]*y_cur[IDX_CH2I]; + data[jistart + 9586] = 0.0 - k[1468]*y_cur[IDX_C2HII]; + data[jistart + 9587] = 0.0 + k[3605]*y_cur[IDX_C2II]; + data[jistart + 9588] = 0.0 + k[1461]*y_cur[IDX_C2I]; + data[jistart + 9589] = 0.0 + k[543]*y_cur[IDX_C2HI]; + data[jistart + 9590] = 0.0 + k[1457]*y_cur[IDX_C2I]; + data[jistart + 9591] = 0.0 + k[3111]*y_cur[IDX_HeII]; + data[jistart + 9592] = 0.0 + k[649]*y_cur[IDX_C2HI]; + data[jistart + 9593] = 0.0 + k[3238]*y_cur[IDX_HeII]; + data[jistart + 9594] = 0.0 + k[1342]*y_cur[IDX_CII] + k[1936]*y_cur[IDX_CHII] - + k[1996]*y_cur[IDX_C2HII] - k[1997]*y_cur[IDX_C2HII]; + data[jistart + 9595] = 0.0 - k[1478]*y_cur[IDX_C2HII]; + data[jistart + 9596] = 0.0 + k[3079]*y_cur[IDX_HeII]; + data[jistart + 9597] = 0.0 + k[3077]*y_cur[IDX_HeII]; + data[jistart + 9598] = 0.0 - k[212]*y_cur[IDX_C2HII]; + data[jistart + 9599] = 0.0 + k[1454]*y_cur[IDX_C2II] - k[1477]*y_cur[IDX_C2HII]; + data[jistart + 9600] = 0.0 + k[2146]*y_cur[IDX_C2II] - k[2151]*y_cur[IDX_C2HII] - + k[2152]*y_cur[IDX_C2HII] - k[2153]*y_cur[IDX_C2HII]; + data[jistart + 9601] = 0.0 + k[241]*y_cur[IDX_CNII] + k[242]*y_cur[IDX_COII] + + k[243]*y_cur[IDX_N2II] + k[329]*y_cur[IDX_HII] + + k[439]*y_cur[IDX_H2II] + k[465]*y_cur[IDX_H2OII] + + k[543]*y_cur[IDX_NII] + k[649]*y_cur[IDX_OII] + + k[686]*y_cur[IDX_OHII] + k[5709] + k[5994]; + data[jistart + 9602] = 0.0 - k[1469]*y_cur[IDX_C2HII]; + data[jistart + 9603] = 0.0 - k[1474]*y_cur[IDX_C2HII] - k[1475]*y_cur[IDX_C2HII] - + k[1476]*y_cur[IDX_C2HII]; + data[jistart + 9604] = 0.0 - k[2240]*y_cur[IDX_C2HII] - k[2241]*y_cur[IDX_C2HII]; + data[jistart + 9605] = 0.0 - k[213]*y_cur[IDX_C2HII]; + data[jistart + 9606] = 0.0 + k[1457]*y_cur[IDX_H2COII] + k[1458]*y_cur[IDX_HCNII] + + k[1459]*y_cur[IDX_HCOII] + k[1460]*y_cur[IDX_HNOII] + + k[1461]*y_cur[IDX_N2HII] + k[1463]*y_cur[IDX_O2HII] + + k[2217]*y_cur[IDX_CH5II] + k[2369]*y_cur[IDX_H2II] + + k[2503]*y_cur[IDX_H2OII] + k[2586]*y_cur[IDX_H3II] + + k[2766]*y_cur[IDX_H3OII] + k[3477]*y_cur[IDX_NHII] + + k[3507]*y_cur[IDX_NH2II] + k[3769]*y_cur[IDX_OHII]; + data[jistart + 9607] = 0.0 - k[3554]*y_cur[IDX_C2HII] - k[3555]*y_cur[IDX_C2HII]; + data[jistart + 9608] = 0.0 + k[1894]*y_cur[IDX_CI]; + data[jistart + 9609] = 0.0 - k[1466]*y_cur[IDX_C2HII] + k[3075]*y_cur[IDX_HeII]; + data[jistart + 9610] = 0.0 - k[1467]*y_cur[IDX_C2HII]; + data[jistart + 9611] = 0.0 + k[1352]*y_cur[IDX_CII]; + data[jistart + 9612] = 0.0 - k[3385]*y_cur[IDX_C2HII] - k[3386]*y_cur[IDX_C2HII]; + data[jistart + 9613] = 0.0 + k[2766]*y_cur[IDX_C2I]; + data[jistart + 9614] = 0.0 - k[3686]*y_cur[IDX_C2HII]; + data[jistart + 9615] = 0.0 + k[3075]*y_cur[IDX_C2H2I] + k[3077]*y_cur[IDX_C2H3I] + + k[3079]*y_cur[IDX_C2H4I] + k[3111]*y_cur[IDX_C4HI] + + k[3237]*y_cur[IDX_HC3NI] + k[3238]*y_cur[IDX_C4H2I] + + k[3241]*y_cur[IDX_HC5NI]; + data[jistart + 9616] = 0.0 + k[1342]*y_cur[IDX_CH2I] + k[1352]*y_cur[IDX_CH3I]; + data[jistart + 9617] = 0.0 + k[2519]*y_cur[IDX_C2II] - k[2521]*y_cur[IDX_C2HII]; + data[jistart + 9618] = 0.0 + k[329]*y_cur[IDX_C2HI] + k[3026]*y_cur[IDX_HNC3I]; + data[jistart + 9619] = 0.0 - k[1849]*y_cur[IDX_C2HII] + k[1891]*y_cur[IDX_CH2II] + + k[1894]*y_cur[IDX_CH3II]; + data[jistart + 9620] = 0.0 + k[1459]*y_cur[IDX_C2I]; + data[jistart + 9621] = 0.0 + k[2586]*y_cur[IDX_C2I]; + data[jistart + 9622] = 0.0 - k[6354]*y_cur[IDX_C2HII] - k[6355]*y_cur[IDX_C2HII]; + data[jistart + 9623] = 0.0 + k[2401]*y_cur[IDX_C2II] - k[2402]*y_cur[IDX_C2HII]; + data[jistart + 9624] = 0.0 - k[740]*y_cur[IDX_C2HII] - k[741]*y_cur[IDX_C2HII]; + data[jistart + 9625] = 0.0 + k[1348]*y_cur[IDX_CII]; + data[jistart + 9626] = 0.0 + k[1549]*y_cur[IDX_C2H2I] + k[2164]*y_cur[IDX_CH4I]; + data[jistart + 9627] = 0.0 + k[1686]*y_cur[IDX_C2H4I]; + data[jistart + 9628] = 0.0 - k[1782]*y_cur[IDX_C3H2II] - k[1783]*y_cur[IDX_C3H2II] + + k[2336]*y_cur[IDX_HII]; + data[jistart + 9629] = 0.0 - k[1767]*y_cur[IDX_C3H2II] - k[1768]*y_cur[IDX_C3H2II]; + data[jistart + 9630] = 0.0 - k[1763]*y_cur[IDX_C3H2II] - k[1764]*y_cur[IDX_C3H2II]; + data[jistart + 9631] = 0.0 - k[1771]*y_cur[IDX_C3H2II] - k[1772]*y_cur[IDX_C3H2II] - + k[1773]*y_cur[IDX_C3H2II] - k[1774]*y_cur[IDX_C3H2II] - + k[1775]*y_cur[IDX_C3H2II]; + data[jistart + 9632] = 0.0 + k[1371]*y_cur[IDX_CII]; + data[jistart + 9633] = 0.0 + k[334]*y_cur[IDX_HII] - k[1759]*y_cur[IDX_C3H2II] - + k[1760]*y_cur[IDX_C3H2II]; + data[jistart + 9634] = 0.0 + k[2149]*y_cur[IDX_CH4I]; + data[jistart + 9635] = 0.0 - k[3814]*y_cur[IDX_C3H2II]; + data[jistart + 9636] = 0.0 - k[1777]*y_cur[IDX_C3H2II] - k[1778]*y_cur[IDX_C3H2II] - + k[1779]*y_cur[IDX_C3H2II] - k[1780]*y_cur[IDX_C3H2II] - + k[1781]*y_cur[IDX_C3H2II] + k[3186]*y_cur[IDX_HeII]; + data[jistart + 9637] = 0.0 + k[2407]*y_cur[IDX_H2I]; + data[jistart + 9638] = 0.0 + k[1317]*y_cur[IDX_CII] + k[3108]*y_cur[IDX_HeII]; + data[jistart + 9639] = 0.0 + k[1997]*y_cur[IDX_CH2I]; + data[jistart + 9640] = 0.0 - k[791]*y_cur[IDX_eM] - k[792]*y_cur[IDX_eM] - + k[793]*y_cur[IDX_eM] - k[794]*y_cur[IDX_eM] - k[795]*y_cur[IDX_eM] - + k[1545]*y_cur[IDX_C2H2I] - k[1629]*y_cur[IDX_C2H3I] - + k[1630]*y_cur[IDX_C2H3I] - k[1691]*y_cur[IDX_C2H4I] - + k[1692]*y_cur[IDX_C2H4I] - k[1731]*y_cur[IDX_C2HI] - + k[1759]*y_cur[IDX_C3H2I] - k[1760]*y_cur[IDX_C3H2I] - + k[1761]*y_cur[IDX_C4HI] - k[1762]*y_cur[IDX_C4HI] - + k[1763]*y_cur[IDX_C5H2I] - k[1764]*y_cur[IDX_C5H2I] - + k[1765]*y_cur[IDX_C5HI] - k[1766]*y_cur[IDX_C5HI] - + k[1767]*y_cur[IDX_C6H2I] - k[1768]*y_cur[IDX_C6H2I] - + k[1769]*y_cur[IDX_C6HI] - k[1770]*y_cur[IDX_C6HI] - + k[1771]*y_cur[IDX_CH2CCH2I] - k[1772]*y_cur[IDX_CH2CCH2I] - + k[1773]*y_cur[IDX_CH2CCH2I] - k[1774]*y_cur[IDX_CH2CCH2I] - + k[1775]*y_cur[IDX_CH2CCH2I] - k[1776]*y_cur[IDX_CH2CCHI] - + k[1777]*y_cur[IDX_CH3CCHI] - k[1778]*y_cur[IDX_CH3CCHI] - + k[1779]*y_cur[IDX_CH3CCHI] - k[1780]*y_cur[IDX_CH3CCHI] - + k[1781]*y_cur[IDX_CH3CCHI] - k[1782]*y_cur[IDX_H2CCCI] - + k[1783]*y_cur[IDX_H2CCCI] - k[1784]*y_cur[IDX_C4H2I] - + k[1785]*y_cur[IDX_C4H2I] - k[1819]*y_cur[IDX_C3HI] - + k[1855]*y_cur[IDX_CI] - k[1856]*y_cur[IDX_CI] - + k[2162]*y_cur[IDX_CH4I] - k[2408]*y_cur[IDX_H2I] - + k[2831]*y_cur[IDX_HI] - k[3397]*y_cur[IDX_NI] - + k[3398]*y_cur[IDX_NI] - k[3695]*y_cur[IDX_OI] - + k[3814]*y_cur[IDX_PI] - k[3834]*y_cur[IDX_SI] - + k[3873]*y_cur[IDX_SiI] - k[3874]*y_cur[IDX_SiI] - + k[6461]*y_cur[IDX_GRAINM] - k[6462]*y_cur[IDX_GRAINM] - + k[6463]*y_cur[IDX_GRAINM] - k[6464]*y_cur[IDX_GRAINM] - + k[6465]*y_cur[IDX_GRAINM]; + data[jistart + 9641] = 0.0 + k[1975]*y_cur[IDX_C2HI]; + data[jistart + 9642] = 0.0 + k[1934]*y_cur[IDX_C2H2I]; + data[jistart + 9643] = 0.0 + k[1853]*y_cur[IDX_CI]; + data[jistart + 9644] = 0.0 - k[1776]*y_cur[IDX_C3H2II] + k[2315]*y_cur[IDX_HII] + + k[3164]*y_cur[IDX_HeII]; + data[jistart + 9645] = 0.0 - k[1769]*y_cur[IDX_C3H2II] - k[1770]*y_cur[IDX_C3H2II]; + data[jistart + 9646] = 0.0 - k[1765]*y_cur[IDX_C3H2II] - k[1766]*y_cur[IDX_C3H2II]; + data[jistart + 9647] = 0.0 + k[1583]*y_cur[IDX_C2H3II] - k[1819]*y_cur[IDX_C3H2II] + + k[2603]*y_cur[IDX_H3II] + k[2773]*y_cur[IDX_H3OII] + + k[2908]*y_cur[IDX_HCOII]; + data[jistart + 9648] = 0.0 - k[1761]*y_cur[IDX_C3H2II] - k[1762]*y_cur[IDX_C3H2II]; + data[jistart + 9649] = 0.0 - k[1784]*y_cur[IDX_C3H2II] - k[1785]*y_cur[IDX_C3H2II] + + k[3831]*y_cur[IDX_SII]; + data[jistart + 9650] = 0.0 + k[3701]*y_cur[IDX_OI]; + data[jistart + 9651] = 0.0 + k[1997]*y_cur[IDX_C2HII]; + data[jistart + 9652] = 0.0 + k[1304]*y_cur[IDX_CII] + k[1686]*y_cur[IDX_C3II] - + k[1691]*y_cur[IDX_C3H2II] - k[1692]*y_cur[IDX_C3H2II]; + data[jistart + 9653] = 0.0 + k[1301]*y_cur[IDX_CII] - k[1629]*y_cur[IDX_C3H2II] - + k[1630]*y_cur[IDX_C3H2II]; + data[jistart + 9654] = 0.0 + k[3831]*y_cur[IDX_C4H2I]; + data[jistart + 9655] = 0.0 - k[3873]*y_cur[IDX_C3H2II] - k[3874]*y_cur[IDX_C3H2II]; + data[jistart + 9656] = 0.0 + k[1583]*y_cur[IDX_C3HI] + k[1852]*y_cur[IDX_CI]; + data[jistart + 9657] = 0.0 + k[2149]*y_cur[IDX_C2II] - k[2162]*y_cur[IDX_C3H2II] + + k[2164]*y_cur[IDX_C4II]; + data[jistart + 9658] = 0.0 - k[1731]*y_cur[IDX_C3H2II] + k[1975]*y_cur[IDX_CH2II] + + k[2048]*y_cur[IDX_CH3II]; + data[jistart + 9659] = 0.0 + k[2242]*y_cur[IDX_C2H2II]; + data[jistart + 9660] = 0.0 - k[3834]*y_cur[IDX_C3H2II]; + data[jistart + 9661] = 0.0 + k[2242]*y_cur[IDX_CHI]; + data[jistart + 9662] = 0.0 + k[2048]*y_cur[IDX_C2HI]; + data[jistart + 9663] = 0.0 - k[1545]*y_cur[IDX_C3H2II] + k[1549]*y_cur[IDX_C4II] + + k[1934]*y_cur[IDX_CHII]; + data[jistart + 9664] = 0.0 - k[3397]*y_cur[IDX_C3H2II] - k[3398]*y_cur[IDX_C3H2II]; + data[jistart + 9665] = 0.0 + k[2773]*y_cur[IDX_C3HI]; + data[jistart + 9666] = 0.0 - k[3695]*y_cur[IDX_C3H2II] + k[3701]*y_cur[IDX_C4H2II]; + data[jistart + 9667] = 0.0 + k[3108]*y_cur[IDX_C4H3I] + k[3164]*y_cur[IDX_CH2CCHI] + + k[3186]*y_cur[IDX_CH3CCHI]; + data[jistart + 9668] = 0.0 + k[1301]*y_cur[IDX_C2H3I] + k[1304]*y_cur[IDX_C2H4I] + + k[1317]*y_cur[IDX_C4H3I] + k[1348]*y_cur[IDX_CH2CHCNI] + + k[1371]*y_cur[IDX_C2H6I]; + data[jistart + 9669] = 0.0 + k[334]*y_cur[IDX_C3H2I] + k[2315]*y_cur[IDX_CH2CCHI] + + k[2336]*y_cur[IDX_H2CCCI]; + data[jistart + 9670] = 0.0 + k[1852]*y_cur[IDX_C2H3II] + k[1853]*y_cur[IDX_C2H4II] - + k[1855]*y_cur[IDX_C3H2II] - k[1856]*y_cur[IDX_C3H2II]; + data[jistart + 9671] = 0.0 + k[2908]*y_cur[IDX_C3HI]; + data[jistart + 9672] = 0.0 + k[2603]*y_cur[IDX_C3HI]; + data[jistart + 9673] = 0.0 - k[6461]*y_cur[IDX_C3H2II] - k[6462]*y_cur[IDX_C3H2II] - + k[6463]*y_cur[IDX_C3H2II] - k[6464]*y_cur[IDX_C3H2II] - + k[6465]*y_cur[IDX_C3H2II]; + data[jistart + 9674] = 0.0 + k[2407]*y_cur[IDX_C3HII] - k[2408]*y_cur[IDX_C3H2II]; + data[jistart + 9675] = 0.0 - k[791]*y_cur[IDX_C3H2II] - k[792]*y_cur[IDX_C3H2II] - + k[793]*y_cur[IDX_C3H2II] - k[794]*y_cur[IDX_C3H2II] - + k[795]*y_cur[IDX_C3H2II]; + data[jistart + 9676] = 0.0 - k[2831]*y_cur[IDX_C3H2II]; + data[jistart + 9677] = 0.0 + k[876]*y_cur[IDX_eM] + k[6840]*y_cur[IDX_GRAINM]; + data[jistart + 9678] = 0.0 + k[7226] + k[7408] + k[7590]; + data[jistart + 9679] = 0.0 + k[1028]*y_cur[IDX_eM] + k[6804]*y_cur[IDX_GRAINM]; + data[jistart + 9680] = 0.0 + k[8707]*y_cur[IDX_GNI]; + data[jistart + 9681] = 0.0 + k[1079]*y_cur[IDX_eM] + k[6791]*y_cur[IDX_GRAINM]; + data[jistart + 9682] = 0.0 + k[1078]*y_cur[IDX_eM] + k[6788]*y_cur[IDX_GRAINM]; + data[jistart + 9683] = 0.0 + k[3180]*y_cur[IDX_HeII] + k[5798] + k[6102]; + data[jistart + 9684] = 0.0 + k[5247]*y_cur[IDX_NI]; + data[jistart + 9685] = 0.0 + k[5851] + k[6176]; + data[jistart + 9686] = 0.0 + k[8707]*y_cur[IDX_GC5I]; + data[jistart + 9687] = 0.0 + k[4311]*y_cur[IDX_C5NM]; + data[jistart + 9688] = 0.0 + k[4314]*y_cur[IDX_C5NM]; + data[jistart + 9689] = 0.0 + k[4340]*y_cur[IDX_C5NM]; + data[jistart + 9690] = 0.0 + k[4321]*y_cur[IDX_C5NM]; + data[jistart + 9691] = 0.0 + k[4306]*y_cur[IDX_CII] + k[4307]*y_cur[IDX_C2H2II] + + k[4308]*y_cur[IDX_C2H3II] + k[4309]*y_cur[IDX_C4H2II] + + k[4310]*y_cur[IDX_C4H3II] + k[4311]*y_cur[IDX_C4SII] + + k[4312]*y_cur[IDX_CH2CCHII] + k[4313]*y_cur[IDX_CH3II] + + k[4314]*y_cur[IDX_CNCII] + k[4315]*y_cur[IDX_FeII] + + k[4316]*y_cur[IDX_HII] + k[4317]*y_cur[IDX_H2COII] + + k[4318]*y_cur[IDX_H2SII] + k[4319]*y_cur[IDX_H3II] + + k[4320]*y_cur[IDX_H3OII] + k[4321]*y_cur[IDX_HC2SII] + + k[4322]*y_cur[IDX_HCNHII] + k[4323]*y_cur[IDX_HCNHII] + + k[4324]*y_cur[IDX_HCOII] + k[4325]*y_cur[IDX_HCOII] + + k[4326]*y_cur[IDX_HeII] + k[4327]*y_cur[IDX_MgII] + + k[4328]*y_cur[IDX_NII] + k[4329]*y_cur[IDX_N2HII] + + k[4330]*y_cur[IDX_NH3II] + k[4331]*y_cur[IDX_NH4II] + + k[4332]*y_cur[IDX_NOII] + k[4333]*y_cur[IDX_NaII] + + k[4334]*y_cur[IDX_OII] + k[4335]*y_cur[IDX_SII] + + k[4336]*y_cur[IDX_SOII] + k[4337]*y_cur[IDX_SiII] + + k[4338]*y_cur[IDX_SiOII] + k[4339]*y_cur[IDX_SiOHII] + + k[4340]*y_cur[IDX_SiSII] + k[5745] + k[6030]; + data[jistart + 9692] = 0.0 + k[116]*y_cur[IDX_NI]; + data[jistart + 9693] = 0.0 + k[4338]*y_cur[IDX_C5NM]; + data[jistart + 9694] = 0.0 + k[4339]*y_cur[IDX_C5NM]; + data[jistart + 9695] = 0.0 - k[2616]*y_cur[IDX_H3II] - k[2921]*y_cur[IDX_HCOII] - + k[3124]*y_cur[IDX_HeII] - k[4929]*y_cur[IDX_CI] - + k[5241]*y_cur[IDX_NI] - k[5367]*y_cur[IDX_OI] - + k[5598]*y_cur[IDX_eM] - k[5746] - k[6031] - k[7044]; + data[jistart + 9696] = 0.0 + k[4315]*y_cur[IDX_C5NM]; + data[jistart + 9697] = 0.0 + k[4327]*y_cur[IDX_C5NM]; + data[jistart + 9698] = 0.0 + k[4333]*y_cur[IDX_C5NM]; + data[jistart + 9699] = 0.0 + k[4310]*y_cur[IDX_C5NM]; + data[jistart + 9700] = 0.0 + k[4329]*y_cur[IDX_C5NM]; + data[jistart + 9701] = 0.0 + k[4336]*y_cur[IDX_C5NM]; + data[jistart + 9702] = 0.0 + k[4312]*y_cur[IDX_C5NM]; + data[jistart + 9703] = 0.0 + k[5240]*y_cur[IDX_NI]; + data[jistart + 9704] = 0.0 + k[4318]*y_cur[IDX_C5NM]; + data[jistart + 9705] = 0.0 + k[4328]*y_cur[IDX_C5NM]; + data[jistart + 9706] = 0.0 + k[4317]*y_cur[IDX_C5NM]; + data[jistart + 9707] = 0.0 + k[4332]*y_cur[IDX_C5NM]; + data[jistart + 9708] = 0.0 + k[4334]*y_cur[IDX_C5NM]; + data[jistart + 9709] = 0.0 + k[4309]*y_cur[IDX_C5NM]; + data[jistart + 9710] = 0.0 + k[4322]*y_cur[IDX_C5NM] + k[4323]*y_cur[IDX_C5NM]; + data[jistart + 9711] = 0.0 + k[4330]*y_cur[IDX_C5NM]; + data[jistart + 9712] = 0.0 + k[4331]*y_cur[IDX_C5NM]; + data[jistart + 9713] = 0.0 + k[4337]*y_cur[IDX_C5NM]; + data[jistart + 9714] = 0.0 + k[4335]*y_cur[IDX_C5NM]; + data[jistart + 9715] = 0.0 + k[4308]*y_cur[IDX_C5NM]; + data[jistart + 9716] = 0.0 + k[4307]*y_cur[IDX_C5NM]; + data[jistart + 9717] = 0.0 + k[4313]*y_cur[IDX_C5NM]; + data[jistart + 9718] = 0.0 + k[116]*y_cur[IDX_C5M] + k[5240]*y_cur[IDX_C5HI] - + k[5241]*y_cur[IDX_C5NI] + k[5247]*y_cur[IDX_C7NI]; + data[jistart + 9719] = 0.0 + k[4320]*y_cur[IDX_C5NM]; + data[jistart + 9720] = 0.0 - k[5367]*y_cur[IDX_C5NI]; + data[jistart + 9721] = 0.0 - k[3124]*y_cur[IDX_C5NI] + k[3180]*y_cur[IDX_CH3C5NI] + + k[4326]*y_cur[IDX_C5NM]; + data[jistart + 9722] = 0.0 + k[4306]*y_cur[IDX_C5NM]; + data[jistart + 9723] = 0.0 + k[4316]*y_cur[IDX_C5NM]; + data[jistart + 9724] = 0.0 - k[4929]*y_cur[IDX_C5NI]; + data[jistart + 9725] = 0.0 - k[2921]*y_cur[IDX_C5NI] + k[4324]*y_cur[IDX_C5NM] + + k[4325]*y_cur[IDX_C5NM]; + data[jistart + 9726] = 0.0 - k[2616]*y_cur[IDX_C5NI] + k[4319]*y_cur[IDX_C5NM]; + data[jistart + 9727] = 0.0 + k[6788]*y_cur[IDX_HC5NII] + k[6791]*y_cur[IDX_HC5NHII] + + k[6804]*y_cur[IDX_H3C5NII] + k[6840]*y_cur[IDX_C7NII]; + data[jistart + 9728] = 0.0 + k[876]*y_cur[IDX_C7NII] + k[1028]*y_cur[IDX_H3C5NII] + + k[1078]*y_cur[IDX_HC5NII] + k[1079]*y_cur[IDX_HC5NHII] - + k[5598]*y_cur[IDX_C5NI]; + data[jistart + 9729] = 0.0 + k[2343]*y_cur[IDX_HII]; + data[jistart + 9730] = 0.0 + k[3175]*y_cur[IDX_HeII]; + data[jistart + 9731] = 0.0 + k[3170]*y_cur[IDX_HeII]; + data[jistart + 9732] = 0.0 + k[1392]*y_cur[IDX_CII] + k[3224]*y_cur[IDX_HeII]; + data[jistart + 9733] = 0.0 + k[2318]*y_cur[IDX_HII] + k[3173]*y_cur[IDX_HeII]; + data[jistart + 9734] = 0.0 + k[5633]*y_cur[IDX_CII] + k[5638]*y_cur[IDX_HeII]; + data[jistart + 9735] = 0.0 + k[3172]*y_cur[IDX_HeII]; + data[jistart + 9736] = 0.0 + k[2267]*y_cur[IDX_CHI]; + data[jistart + 9737] = 0.0 + k[2263]*y_cur[IDX_CHI]; + data[jistart + 9738] = 0.0 + k[6125]; + data[jistart + 9739] = 0.0 + k[2254]*y_cur[IDX_CHI]; + data[jistart + 9740] = 0.0 + k[260]*y_cur[IDX_CH2I]; + data[jistart + 9741] = 0.0 + k[264]*y_cur[IDX_CH2I] + k[2204]*y_cur[IDX_CH4I]; + data[jistart + 9742] = 0.0 + k[2250]*y_cur[IDX_CHI]; + data[jistart + 9743] = 0.0 + k[259]*y_cur[IDX_CH2I]; + data[jistart + 9744] = 0.0 + k[2255]*y_cur[IDX_CHI]; + data[jistart + 9745] = 0.0 + k[2258]*y_cur[IDX_CHI]; + data[jistart + 9746] = 0.0 + k[440]*y_cur[IDX_CH2I] + k[2380]*y_cur[IDX_CHI]; + data[jistart + 9747] = 0.0 - k[1992]*y_cur[IDX_CH2II] - k[1993]*y_cur[IDX_CH2II]; + data[jistart + 9748] = 0.0 + k[265]*y_cur[IDX_CH2I] + k[2259]*y_cur[IDX_CHI]; + data[jistart + 9749] = 0.0 + k[261]*y_cur[IDX_CH2I]; + data[jistart + 9750] = 0.0 + k[2244]*y_cur[IDX_CHI]; + data[jistart + 9751] = 0.0 + k[2248]*y_cur[IDX_CHI]; + data[jistart + 9752] = 0.0 + k[2240]*y_cur[IDX_CHI]; + data[jistart + 9753] = 0.0 - k[258]*y_cur[IDX_NOI] - k[907]*y_cur[IDX_eM] - + k[908]*y_cur[IDX_eM] - k[909]*y_cur[IDX_eM] - k[1891]*y_cur[IDX_CI] + - k[1975]*y_cur[IDX_C2HI] - k[1976]*y_cur[IDX_CH4I] - + k[1977]*y_cur[IDX_CH4I] - k[1978]*y_cur[IDX_CO2I] - + k[1979]*y_cur[IDX_H2COI] - k[1980]*y_cur[IDX_H2COI] - + k[1981]*y_cur[IDX_H2COI] - k[1982]*y_cur[IDX_H2OI] - + k[1983]*y_cur[IDX_H2SI] - k[1984]*y_cur[IDX_H2SI] - + k[1985]*y_cur[IDX_H2SI] - k[1986]*y_cur[IDX_HCNI] - + k[1987]*y_cur[IDX_HCOI] - k[1988]*y_cur[IDX_NH3I] - + k[1989]*y_cur[IDX_NH3I] - k[1990]*y_cur[IDX_O2I] - + k[1991]*y_cur[IDX_OI] - k[1992]*y_cur[IDX_OCSI] - + k[1993]*y_cur[IDX_OCSI] - k[1994]*y_cur[IDX_SI] - + k[2428]*y_cur[IDX_H2I] - k[2836]*y_cur[IDX_HI] - + k[3452]*y_cur[IDX_NI] - k[6075] - k[6076] - k[6077] - + k[6316]*y_cur[IDX_GRAINM] - k[6317]*y_cur[IDX_GRAINM] - + k[6318]*y_cur[IDX_GRAINM]; + data[jistart + 9754] = 0.0 + k[268]*y_cur[IDX_CH2I] + k[2264]*y_cur[IDX_CHI]; + data[jistart + 9755] = 0.0 + k[263]*y_cur[IDX_CH2I] + k[2247]*y_cur[IDX_CHI]; + data[jistart + 9756] = 0.0 + k[1959]*y_cur[IDX_HCOI] + k[2427]*y_cur[IDX_H2I]; + data[jistart + 9757] = 0.0 - k[1978]*y_cur[IDX_CH2II]; + data[jistart + 9758] = 0.0 + k[267]*y_cur[IDX_CH2I]; + data[jistart + 9759] = 0.0 + k[2257]*y_cur[IDX_CHI]; + data[jistart + 9760] = 0.0 + k[544]*y_cur[IDX_CH2I]; + data[jistart + 9761] = 0.0 + k[262]*y_cur[IDX_CH2I] + k[2246]*y_cur[IDX_CHI]; + data[jistart + 9762] = 0.0 + k[266]*y_cur[IDX_CH2I]; + data[jistart + 9763] = 0.0 + k[2251]*y_cur[IDX_CHI] + k[2252]*y_cur[IDX_CHI]; + data[jistart + 9764] = 0.0 + k[160]*y_cur[IDX_CII] + k[259]*y_cur[IDX_C2II] + + k[260]*y_cur[IDX_CNII] + k[261]*y_cur[IDX_COII] + + k[262]*y_cur[IDX_H2COII] + k[263]*y_cur[IDX_H2OII] + + k[264]*y_cur[IDX_N2II] + k[265]*y_cur[IDX_NH2II] + + k[266]*y_cur[IDX_OII] + k[267]*y_cur[IDX_O2II] + + k[268]*y_cur[IDX_OHII] + k[359]*y_cur[IDX_HII] + + k[440]*y_cur[IDX_H2II] + k[544]*y_cur[IDX_NII] + k[5778] + k[6078]; + data[jistart + 9765] = 0.0 + k[3082]*y_cur[IDX_HeII]; + data[jistart + 9766] = 0.0 - k[1990]*y_cur[IDX_CH2II]; + data[jistart + 9767] = 0.0 - k[1983]*y_cur[IDX_CH2II] - k[1984]*y_cur[IDX_CH2II] - + k[1985]*y_cur[IDX_CH2II]; + data[jistart + 9768] = 0.0 - k[258]*y_cur[IDX_CH2II]; + data[jistart + 9769] = 0.0 + k[1959]*y_cur[IDX_CHII] - k[1987]*y_cur[IDX_CH2II]; + data[jistart + 9770] = 0.0 - k[1976]*y_cur[IDX_CH2II] - k[1977]*y_cur[IDX_CH2II] + + k[2204]*y_cur[IDX_N2II] + k[3199]*y_cur[IDX_HeII]; + data[jistart + 9771] = 0.0 - k[1975]*y_cur[IDX_CH2II]; + data[jistart + 9772] = 0.0 + k[1390]*y_cur[IDX_CII] - k[1979]*y_cur[IDX_CH2II] - + k[1980]*y_cur[IDX_CH2II] - k[1981]*y_cur[IDX_CH2II] + + k[3221]*y_cur[IDX_HeII]; + data[jistart + 9773] = 0.0 - k[1986]*y_cur[IDX_CH2II]; + data[jistart + 9774] = 0.0 + k[2240]*y_cur[IDX_C2HII] + k[2244]*y_cur[IDX_CH5II] + + k[2246]*y_cur[IDX_H2COII] + k[2247]*y_cur[IDX_H2OII] + + k[2248]*y_cur[IDX_H3COII] + k[2249]*y_cur[IDX_H3OII] + + k[2250]*y_cur[IDX_HCNII] + k[2251]*y_cur[IDX_HCNHII] + + k[2252]*y_cur[IDX_HCNHII] + k[2253]*y_cur[IDX_HCOII] + + k[2254]*y_cur[IDX_HNOII] + k[2255]*y_cur[IDX_HSII] + + k[2257]*y_cur[IDX_N2HII] + k[2258]*y_cur[IDX_NHII] + + k[2259]*y_cur[IDX_NH2II] + k[2263]*y_cur[IDX_O2HII] + + k[2264]*y_cur[IDX_OHII] + k[2267]*y_cur[IDX_SiHII] + + k[2380]*y_cur[IDX_H2II] + k[2670]*y_cur[IDX_H3II]; + data[jistart + 9775] = 0.0 - k[1994]*y_cur[IDX_CH2II]; + data[jistart + 9776] = 0.0 - k[1988]*y_cur[IDX_CH2II] - k[1989]*y_cur[IDX_CH2II]; + data[jistart + 9777] = 0.0 + k[2837]*y_cur[IDX_HI] + k[6096]; + data[jistart + 9778] = 0.0 - k[3452]*y_cur[IDX_CH2II]; + data[jistart + 9779] = 0.0 + k[2249]*y_cur[IDX_CHI]; + data[jistart + 9780] = 0.0 - k[1991]*y_cur[IDX_CH2II]; + data[jistart + 9781] = 0.0 + k[3082]*y_cur[IDX_C2H4I] + k[3170]*y_cur[IDX_CH2CNI] + + k[3172]*y_cur[IDX_CH2COI] + k[3173]*y_cur[IDX_CH2NHI] + + k[3175]*y_cur[IDX_CH2PHI] + k[3199]*y_cur[IDX_CH4I] + + k[3221]*y_cur[IDX_H2COI] + k[3224]*y_cur[IDX_H2CSI] + + k[5638]*y_cur[IDX_CH2OHI]; + data[jistart + 9782] = 0.0 + k[160]*y_cur[IDX_CH2I] + k[1390]*y_cur[IDX_H2COI] + + k[1392]*y_cur[IDX_H2CSI] + k[5548]*y_cur[IDX_H2I] + + k[5633]*y_cur[IDX_CH2OHI]; + data[jistart + 9783] = 0.0 - k[1982]*y_cur[IDX_CH2II]; + data[jistart + 9784] = 0.0 + k[359]*y_cur[IDX_CH2I] + k[2318]*y_cur[IDX_CH2NHI] + + k[2343]*y_cur[IDX_HCNOI]; + data[jistart + 9785] = 0.0 - k[1891]*y_cur[IDX_CH2II]; + data[jistart + 9786] = 0.0 + k[2253]*y_cur[IDX_CHI]; + data[jistart + 9787] = 0.0 + k[2670]*y_cur[IDX_CHI]; + data[jistart + 9788] = 0.0 - k[6316]*y_cur[IDX_CH2II] - k[6317]*y_cur[IDX_CH2II] - + k[6318]*y_cur[IDX_CH2II]; + data[jistart + 9789] = 0.0 + k[2427]*y_cur[IDX_CHII] - k[2428]*y_cur[IDX_CH2II] + + k[5548]*y_cur[IDX_CII]; + data[jistart + 9790] = 0.0 - k[907]*y_cur[IDX_CH2II] - k[908]*y_cur[IDX_CH2II] - + k[909]*y_cur[IDX_CH2II]; + data[jistart + 9791] = 0.0 - k[2836]*y_cur[IDX_CH2II] + k[2837]*y_cur[IDX_CH3II]; + data[jistart + 9792] = 0.0 + k[5648]*y_cur[IDX_HeII]; + data[jistart + 9793] = 0.0 + k[5671]*y_cur[IDX_HeII]; + data[jistart + 9794] = 0.0 + k[5637]*y_cur[IDX_HeII]; + data[jistart + 9795] = 0.0 - k[3792]*y_cur[IDX_OHII]; + data[jistart + 9796] = 0.0 - k[3793]*y_cur[IDX_OHII]; + data[jistart + 9797] = 0.0 + k[3749]*y_cur[IDX_OI]; + data[jistart + 9798] = 0.0 + k[698]*y_cur[IDX_OHI]; + data[jistart + 9799] = 0.0 - k[687]*y_cur[IDX_OHII] - k[3771]*y_cur[IDX_OHII] - + k[3772]*y_cur[IDX_OHII] - k[3773]*y_cur[IDX_OHII] - + k[3774]*y_cur[IDX_OHII]; + data[jistart + 9800] = 0.0 + k[700]*y_cur[IDX_OHI]; + data[jistart + 9801] = 0.0 + k[697]*y_cur[IDX_OHI]; + data[jistart + 9802] = 0.0 + k[3503]*y_cur[IDX_OI]; + data[jistart + 9803] = 0.0 + k[456]*y_cur[IDX_OHI] + k[2396]*y_cur[IDX_OI]; + data[jistart + 9804] = 0.0 + k[699]*y_cur[IDX_OHI]; + data[jistart + 9805] = 0.0 + k[3196]*y_cur[IDX_HeII]; + data[jistart + 9806] = 0.0 - k[591]*y_cur[IDX_OHII] - k[3547]*y_cur[IDX_OHII]; + data[jistart + 9807] = 0.0 - k[268]*y_cur[IDX_CH2I] - k[297]*y_cur[IDX_CHI] - + k[591]*y_cur[IDX_NH2I] - k[685]*y_cur[IDX_C2I] - + k[686]*y_cur[IDX_C2HI] - k[687]*y_cur[IDX_C2H6I] - + k[688]*y_cur[IDX_H2COI] - k[689]*y_cur[IDX_H2OI] - + k[690]*y_cur[IDX_H2SI] - k[691]*y_cur[IDX_HCOI] - + k[692]*y_cur[IDX_NH3I] - k[693]*y_cur[IDX_NOI] - + k[694]*y_cur[IDX_O2I] - k[695]*y_cur[IDX_SI] - k[1180]*y_cur[IDX_eM] + - k[1914]*y_cur[IDX_CI] - k[2016]*y_cur[IDX_CH2I] - + k[2209]*y_cur[IDX_CH4I] - k[2210]*y_cur[IDX_CH4I] - + k[2264]*y_cur[IDX_CHI] - k[2469]*y_cur[IDX_H2I] - + k[3467]*y_cur[IDX_NI] - k[3547]*y_cur[IDX_NH2I] - + k[3623]*y_cur[IDX_NHI] - k[3750]*y_cur[IDX_OI] - + k[3769]*y_cur[IDX_C2I] - k[3770]*y_cur[IDX_C2HI] - + k[3771]*y_cur[IDX_C2H6I] - k[3772]*y_cur[IDX_C2H6I] - + k[3773]*y_cur[IDX_C2H6I] - k[3774]*y_cur[IDX_C2H6I] - + k[3775]*y_cur[IDX_CNI] - k[3776]*y_cur[IDX_CO2I] - + k[3777]*y_cur[IDX_COI] - k[3778]*y_cur[IDX_H2COI] - + k[3779]*y_cur[IDX_H2OI] - k[3780]*y_cur[IDX_H2SI] - + k[3781]*y_cur[IDX_HCNI] - k[3782]*y_cur[IDX_HCOI] - + k[3783]*y_cur[IDX_HCOI] - k[3784]*y_cur[IDX_HNCI] - + k[3785]*y_cur[IDX_N2I] - k[3786]*y_cur[IDX_NH3I] - + k[3787]*y_cur[IDX_NOI] - k[3788]*y_cur[IDX_OHI] - + k[3789]*y_cur[IDX_SI] - k[3790]*y_cur[IDX_SI] - + k[3791]*y_cur[IDX_SiI] - k[3792]*y_cur[IDX_SiCI] - + k[3793]*y_cur[IDX_SiHI] - k[3794]*y_cur[IDX_SiOI] - k[6242] - + k[6329]*y_cur[IDX_GRAINM]; + data[jistart + 9808] = 0.0 + k[6157]; + data[jistart + 9809] = 0.0 - k[3776]*y_cur[IDX_OHII]; + data[jistart + 9810] = 0.0 - k[3794]*y_cur[IDX_OHII]; + data[jistart + 9811] = 0.0 - k[3623]*y_cur[IDX_OHII]; + data[jistart + 9812] = 0.0 + k[3745]*y_cur[IDX_OI]; + data[jistart + 9813] = 0.0 + k[563]*y_cur[IDX_OHI]; + data[jistart + 9814] = 0.0 + k[664]*y_cur[IDX_OHI] + k[2466]*y_cur[IDX_H2I] + + k[3646]*y_cur[IDX_HCOI]; + data[jistart + 9815] = 0.0 - k[268]*y_cur[IDX_OHII] - k[2016]*y_cur[IDX_OHII]; + data[jistart + 9816] = 0.0 - k[3784]*y_cur[IDX_OHII]; + data[jistart + 9817] = 0.0 - k[3785]*y_cur[IDX_OHII]; + data[jistart + 9818] = 0.0 - k[694]*y_cur[IDX_OHII]; + data[jistart + 9819] = 0.0 - k[690]*y_cur[IDX_OHII] - k[3780]*y_cur[IDX_OHII]; + data[jistart + 9820] = 0.0 - k[3791]*y_cur[IDX_OHII]; + data[jistart + 9821] = 0.0 - k[693]*y_cur[IDX_OHII] - k[3787]*y_cur[IDX_OHII]; + data[jistart + 9822] = 0.0 - k[691]*y_cur[IDX_OHII] + k[3646]*y_cur[IDX_OII] - + k[3782]*y_cur[IDX_OHII] - k[3783]*y_cur[IDX_OHII]; + data[jistart + 9823] = 0.0 - k[2209]*y_cur[IDX_OHII] - k[2210]*y_cur[IDX_OHII]; + data[jistart + 9824] = 0.0 - k[686]*y_cur[IDX_OHII] - k[3770]*y_cur[IDX_OHII]; + data[jistart + 9825] = 0.0 - k[688]*y_cur[IDX_OHII] - k[3778]*y_cur[IDX_OHII]; + data[jistart + 9826] = 0.0 - k[3781]*y_cur[IDX_OHII]; + data[jistart + 9827] = 0.0 - k[297]*y_cur[IDX_OHII] - k[2264]*y_cur[IDX_OHII]; + data[jistart + 9828] = 0.0 - k[695]*y_cur[IDX_OHII] - k[3789]*y_cur[IDX_OHII] - + k[3790]*y_cur[IDX_OHII]; + data[jistart + 9829] = 0.0 - k[685]*y_cur[IDX_OHII] - k[3769]*y_cur[IDX_OHII]; + data[jistart + 9830] = 0.0 + k[408]*y_cur[IDX_HII] + k[456]*y_cur[IDX_H2II] + + k[563]*y_cur[IDX_NII] + k[664]*y_cur[IDX_OII] + + k[697]*y_cur[IDX_C2II] + k[698]*y_cur[IDX_CNII] + + k[699]*y_cur[IDX_COII] + k[700]*y_cur[IDX_N2II] - + k[3788]*y_cur[IDX_OHII] + k[6245]; + data[jistart + 9831] = 0.0 - k[692]*y_cur[IDX_OHII] - k[3786]*y_cur[IDX_OHII]; + data[jistart + 9832] = 0.0 - k[3775]*y_cur[IDX_OHII]; + data[jistart + 9833] = 0.0 - k[3467]*y_cur[IDX_OHII]; + data[jistart + 9834] = 0.0 + k[2396]*y_cur[IDX_H2II] + k[2731]*y_cur[IDX_H3II] + + k[3503]*y_cur[IDX_NHII] + k[3745]*y_cur[IDX_N2HII] + + k[3749]*y_cur[IDX_O2HII] - k[3750]*y_cur[IDX_OHII]; + data[jistart + 9835] = 0.0 + k[3196]*y_cur[IDX_CH3OHI] + k[3225]*y_cur[IDX_H2OI] + + k[5637]*y_cur[IDX_CH2OHI] + k[5648]*y_cur[IDX_COOHI] + + k[5671]*y_cur[IDX_CH3COOHI]; + data[jistart + 9836] = 0.0 - k[689]*y_cur[IDX_OHII] + k[3225]*y_cur[IDX_HeII] - + k[3779]*y_cur[IDX_OHII]; + data[jistart + 9837] = 0.0 + k[408]*y_cur[IDX_OHI]; + data[jistart + 9838] = 0.0 - k[1914]*y_cur[IDX_OHII]; + data[jistart + 9839] = 0.0 + k[2731]*y_cur[IDX_OI]; + data[jistart + 9840] = 0.0 - k[3777]*y_cur[IDX_OHII]; + data[jistart + 9841] = 0.0 - k[6329]*y_cur[IDX_OHII]; + data[jistart + 9842] = 0.0 + k[2466]*y_cur[IDX_OII] - k[2469]*y_cur[IDX_OHII]; + data[jistart + 9843] = 0.0 - k[1180]*y_cur[IDX_OHII]; + data[jistart + 9844] = 0.0 + k[482]*y_cur[IDX_H2OI]; + data[jistart + 9845] = 0.0 + k[2352]*y_cur[IDX_HII]; + data[jistart + 9846] = 0.0 + k[2351]*y_cur[IDX_HII]; + data[jistart + 9847] = 0.0 - k[2518]*y_cur[IDX_H2OII]; + data[jistart + 9848] = 0.0 + k[479]*y_cur[IDX_H2OI]; + data[jistart + 9849] = 0.0 + k[3806]*y_cur[IDX_OHI]; + data[jistart + 9850] = 0.0 + k[3803]*y_cur[IDX_OHI]; + data[jistart + 9851] = 0.0 - k[466]*y_cur[IDX_H2OII] - k[2505]*y_cur[IDX_H2OII] - + k[2506]*y_cur[IDX_H2OII]; + data[jistart + 9852] = 0.0 + k[481]*y_cur[IDX_H2OI]; + data[jistart + 9853] = 0.0 + k[480]*y_cur[IDX_H2OI] + k[3800]*y_cur[IDX_OHI]; + data[jistart + 9854] = 0.0 + k[575]*y_cur[IDX_H2OI] + k[3504]*y_cur[IDX_OHI]; + data[jistart + 9855] = 0.0 + k[447]*y_cur[IDX_H2OI] + k[2397]*y_cur[IDX_OHI]; + data[jistart + 9856] = 0.0 - k[475]*y_cur[IDX_H2OII]; + data[jistart + 9857] = 0.0 + k[478]*y_cur[IDX_H2OI]; + data[jistart + 9858] = 0.0 + k[3797]*y_cur[IDX_OHI]; + data[jistart + 9859] = 0.0 - k[588]*y_cur[IDX_H2OII] - k[3536]*y_cur[IDX_H2OII]; + data[jistart + 9860] = 0.0 + k[689]*y_cur[IDX_H2OI] + k[2469]*y_cur[IDX_H2I] + + k[3782]*y_cur[IDX_HCOI] + k[3788]*y_cur[IDX_OHI]; + data[jistart + 9861] = 0.0 - k[263]*y_cur[IDX_CH2I] - k[291]*y_cur[IDX_CHI] - + k[462]*y_cur[IDX_C2I] - k[463]*y_cur[IDX_C2H2I] - + k[464]*y_cur[IDX_C2H4I] - k[465]*y_cur[IDX_C2HI] - + k[466]*y_cur[IDX_C2H6I] - k[467]*y_cur[IDX_FeI] - + k[468]*y_cur[IDX_H2COI] - k[469]*y_cur[IDX_H2SI] - + k[470]*y_cur[IDX_HCOI] - k[471]*y_cur[IDX_MgI] - + k[472]*y_cur[IDX_NOI] - k[473]*y_cur[IDX_NaI] - + k[474]*y_cur[IDX_O2I] - k[475]*y_cur[IDX_OCSI] - + k[476]*y_cur[IDX_SI] - k[477]*y_cur[IDX_SiI] - + k[588]*y_cur[IDX_NH2I] - k[605]*y_cur[IDX_NH3I] - + k[1012]*y_cur[IDX_eM] - k[1013]*y_cur[IDX_eM] - + k[1014]*y_cur[IDX_eM] - k[1899]*y_cur[IDX_CI] - + k[2003]*y_cur[IDX_CH2I] - k[2195]*y_cur[IDX_CH4I] - + k[2247]*y_cur[IDX_CHI] - k[2442]*y_cur[IDX_H2I] - + k[2503]*y_cur[IDX_C2I] - k[2504]*y_cur[IDX_C2HI] - + k[2505]*y_cur[IDX_C2H6I] - k[2506]*y_cur[IDX_C2H6I] - + k[2507]*y_cur[IDX_COI] - k[2508]*y_cur[IDX_H2COI] - + k[2509]*y_cur[IDX_H2OI] - k[2510]*y_cur[IDX_H2SI] - + k[2511]*y_cur[IDX_H2SI] - k[2512]*y_cur[IDX_HCNI] - + k[2513]*y_cur[IDX_HCOI] - k[2514]*y_cur[IDX_HCOI] - + k[2515]*y_cur[IDX_HNCI] - k[2516]*y_cur[IDX_SI] - + k[2517]*y_cur[IDX_SI] - k[2518]*y_cur[IDX_SO2I] - + k[3457]*y_cur[IDX_NI] - k[3458]*y_cur[IDX_NI] - + k[3536]*y_cur[IDX_NH2I] - k[3575]*y_cur[IDX_NH3I] - + k[3612]*y_cur[IDX_NHI] - k[3733]*y_cur[IDX_OI] - + k[3799]*y_cur[IDX_OHI] - k[6157] - k[6340]*y_cur[IDX_GRAINM] - + k[6341]*y_cur[IDX_GRAINM] - k[6342]*y_cur[IDX_GRAINM]; + data[jistart + 9862] = 0.0 - k[467]*y_cur[IDX_H2OII]; + data[jistart + 9863] = 0.0 - k[471]*y_cur[IDX_H2OII]; + data[jistart + 9864] = 0.0 - k[473]*y_cur[IDX_H2OII]; + data[jistart + 9865] = 0.0 - k[3612]*y_cur[IDX_H2OII]; + data[jistart + 9866] = 0.0 + k[3804]*y_cur[IDX_OHI]; + data[jistart + 9867] = 0.0 + k[552]*y_cur[IDX_H2OI]; + data[jistart + 9868] = 0.0 + k[656]*y_cur[IDX_H2OI]; + data[jistart + 9869] = 0.0 - k[263]*y_cur[IDX_H2OII] - k[2003]*y_cur[IDX_H2OII]; + data[jistart + 9870] = 0.0 - k[2515]*y_cur[IDX_H2OII]; + data[jistart + 9871] = 0.0 - k[464]*y_cur[IDX_H2OII]; + data[jistart + 9872] = 0.0 - k[474]*y_cur[IDX_H2OII]; + data[jistart + 9873] = 0.0 - k[469]*y_cur[IDX_H2OII] - k[2510]*y_cur[IDX_H2OII] - + k[2511]*y_cur[IDX_H2OII]; + data[jistart + 9874] = 0.0 - k[477]*y_cur[IDX_H2OII]; + data[jistart + 9875] = 0.0 - k[472]*y_cur[IDX_H2OII]; + data[jistart + 9876] = 0.0 - k[470]*y_cur[IDX_H2OII] - k[2513]*y_cur[IDX_H2OII] - + k[2514]*y_cur[IDX_H2OII] + k[3782]*y_cur[IDX_OHII]; + data[jistart + 9877] = 0.0 - k[2195]*y_cur[IDX_H2OII]; + data[jistart + 9878] = 0.0 - k[465]*y_cur[IDX_H2OII] - k[2504]*y_cur[IDX_H2OII]; + data[jistart + 9879] = 0.0 - k[468]*y_cur[IDX_H2OII] - k[2508]*y_cur[IDX_H2OII]; + data[jistart + 9880] = 0.0 - k[2512]*y_cur[IDX_H2OII]; + data[jistart + 9881] = 0.0 - k[291]*y_cur[IDX_H2OII] - k[2247]*y_cur[IDX_H2OII]; + data[jistart + 9882] = 0.0 - k[476]*y_cur[IDX_H2OII] - k[2516]*y_cur[IDX_H2OII] - + k[2517]*y_cur[IDX_H2OII]; + data[jistart + 9883] = 0.0 - k[462]*y_cur[IDX_H2OII] - k[2503]*y_cur[IDX_H2OII]; + data[jistart + 9884] = 0.0 + k[2397]*y_cur[IDX_H2II] + k[2733]*y_cur[IDX_H3II] + + k[3504]*y_cur[IDX_NHII] + k[3788]*y_cur[IDX_OHII] + + k[3797]*y_cur[IDX_CH5II] - k[3799]*y_cur[IDX_H2OII] + + k[3800]*y_cur[IDX_HCNII] + k[3801]*y_cur[IDX_HCOII] + + k[3803]*y_cur[IDX_HNOII] + k[3804]*y_cur[IDX_N2HII] + + k[3806]*y_cur[IDX_O2HII]; + data[jistart + 9885] = 0.0 - k[605]*y_cur[IDX_H2OII] - k[3575]*y_cur[IDX_H2OII]; + data[jistart + 9886] = 0.0 - k[463]*y_cur[IDX_H2OII]; + data[jistart + 9887] = 0.0 - k[3457]*y_cur[IDX_H2OII] - k[3458]*y_cur[IDX_H2OII]; + data[jistart + 9888] = 0.0 + k[2730]*y_cur[IDX_H3II] - k[3733]*y_cur[IDX_H2OII]; + data[jistart + 9889] = 0.0 + k[518]*y_cur[IDX_H2OI]; + data[jistart + 9890] = 0.0 + k[378]*y_cur[IDX_HII] + k[447]*y_cur[IDX_H2II] + + k[478]*y_cur[IDX_COII] + k[479]*y_cur[IDX_CO2II] + + k[480]*y_cur[IDX_HCNII] + k[481]*y_cur[IDX_N2II] + + k[482]*y_cur[IDX_N2OII] + k[518]*y_cur[IDX_HeII] + + k[552]*y_cur[IDX_NII] + k[575]*y_cur[IDX_NHII] + + k[656]*y_cur[IDX_OII] + k[689]*y_cur[IDX_OHII] - + k[2509]*y_cur[IDX_H2OII] + k[6159]; + data[jistart + 9891] = 0.0 + k[378]*y_cur[IDX_H2OI] + k[2351]*y_cur[IDX_HOCNI] + + k[2352]*y_cur[IDX_HONCI]; + data[jistart + 9892] = 0.0 - k[1899]*y_cur[IDX_H2OII]; + data[jistart + 9893] = 0.0 + k[3801]*y_cur[IDX_OHI]; + data[jistart + 9894] = 0.0 + k[2730]*y_cur[IDX_OI] + k[2733]*y_cur[IDX_OHI]; + data[jistart + 9895] = 0.0 - k[2507]*y_cur[IDX_H2OII]; + data[jistart + 9896] = 0.0 - k[6340]*y_cur[IDX_H2OII] - k[6341]*y_cur[IDX_H2OII] - + k[6342]*y_cur[IDX_H2OII]; + data[jistart + 9897] = 0.0 - k[2442]*y_cur[IDX_H2OII] + k[2469]*y_cur[IDX_OHII]; + data[jistart + 9898] = 0.0 - k[1012]*y_cur[IDX_H2OII] - k[1013]*y_cur[IDX_H2OII] - + k[1014]*y_cur[IDX_H2OII]; + data[jistart + 9899] = 0.0 + k[1115]*y_cur[IDX_eM]; + data[jistart + 9900] = 0.0 - k[4136]*y_cur[IDX_C3NM]; + data[jistart + 9901] = 0.0 - k[4139]*y_cur[IDX_C3NM]; + data[jistart + 9902] = 0.0 - k[4165]*y_cur[IDX_C3NM]; + data[jistart + 9903] = 0.0 - k[4146]*y_cur[IDX_C3NM]; + data[jistart + 9904] = 0.0 + k[3381]*y_cur[IDX_NI]; + data[jistart + 9905] = 0.0 + k[3421]*y_cur[IDX_NI]; + data[jistart + 9906] = 0.0 + k[3440]*y_cur[IDX_NI]; + data[jistart + 9907] = 0.0 + k[3430]*y_cur[IDX_NI]; + data[jistart + 9908] = 0.0 + k[3447]*y_cur[IDX_NI]; + data[jistart + 9909] = 0.0 + k[3377]*y_cur[IDX_NI]; + data[jistart + 9910] = 0.0 + k[3442]*y_cur[IDX_NI]; + data[jistart + 9911] = 0.0 + k[3436]*y_cur[IDX_NI]; + data[jistart + 9912] = 0.0 + k[3418]*y_cur[IDX_NI]; + data[jistart + 9913] = 0.0 + k[3409]*y_cur[IDX_NI]; + data[jistart + 9914] = 0.0 + k[3425]*y_cur[IDX_NI]; + data[jistart + 9915] = 0.0 - k[4163]*y_cur[IDX_C3NM]; + data[jistart + 9916] = 0.0 - k[4164]*y_cur[IDX_C3NM]; + data[jistart + 9917] = 0.0 - k[42]*y_cur[IDX_CI] - k[91]*y_cur[IDX_HI] - + k[130]*y_cur[IDX_OI] - k[4131]*y_cur[IDX_CII] - + k[4132]*y_cur[IDX_C2H2II] - k[4133]*y_cur[IDX_C2H3II] - + k[4134]*y_cur[IDX_C4H2II] - k[4135]*y_cur[IDX_C4H3II] - + k[4136]*y_cur[IDX_C4SII] - k[4137]*y_cur[IDX_CH2CCHII] - + k[4138]*y_cur[IDX_CH3II] - k[4139]*y_cur[IDX_CNCII] - + k[4140]*y_cur[IDX_FeII] - k[4141]*y_cur[IDX_HII] - + k[4142]*y_cur[IDX_H2COII] - k[4143]*y_cur[IDX_H2SII] - + k[4144]*y_cur[IDX_H3II] - k[4145]*y_cur[IDX_H3OII] - + k[4146]*y_cur[IDX_HC2SII] - k[4147]*y_cur[IDX_HCNHII] - + k[4148]*y_cur[IDX_HCNHII] - k[4149]*y_cur[IDX_HCOII] - + k[4150]*y_cur[IDX_HCOII] - k[4151]*y_cur[IDX_HeII] - + k[4152]*y_cur[IDX_MgII] - k[4153]*y_cur[IDX_NII] - + k[4154]*y_cur[IDX_N2HII] - k[4155]*y_cur[IDX_NH3II] - + k[4156]*y_cur[IDX_NH4II] - k[4157]*y_cur[IDX_NOII] - + k[4158]*y_cur[IDX_NaII] - k[4159]*y_cur[IDX_OII] - + k[4160]*y_cur[IDX_SII] - k[4161]*y_cur[IDX_SOII] - + k[4162]*y_cur[IDX_SiII] - k[4163]*y_cur[IDX_SiOII] - + k[4164]*y_cur[IDX_SiOHII] - k[4165]*y_cur[IDX_SiSII] - k[5721] - + k[6005]; + data[jistart + 9918] = 0.0 + k[5593]*y_cur[IDX_eM]; + data[jistart + 9919] = 0.0 - k[4140]*y_cur[IDX_C3NM]; + data[jistart + 9920] = 0.0 - k[4152]*y_cur[IDX_C3NM]; + data[jistart + 9921] = 0.0 - k[4158]*y_cur[IDX_C3NM]; + data[jistart + 9922] = 0.0 - k[4135]*y_cur[IDX_C3NM]; + data[jistart + 9923] = 0.0 - k[4154]*y_cur[IDX_C3NM]; + data[jistart + 9924] = 0.0 - k[4161]*y_cur[IDX_C3NM]; + data[jistart + 9925] = 0.0 - k[4137]*y_cur[IDX_C3NM]; + data[jistart + 9926] = 0.0 - k[4143]*y_cur[IDX_C3NM]; + data[jistart + 9927] = 0.0 - k[4153]*y_cur[IDX_C3NM]; + data[jistart + 9928] = 0.0 - k[4142]*y_cur[IDX_C3NM]; + data[jistart + 9929] = 0.0 - k[4157]*y_cur[IDX_C3NM]; + data[jistart + 9930] = 0.0 - k[4159]*y_cur[IDX_C3NM]; + data[jistart + 9931] = 0.0 - k[4134]*y_cur[IDX_C3NM]; + data[jistart + 9932] = 0.0 - k[4147]*y_cur[IDX_C3NM] - k[4148]*y_cur[IDX_C3NM]; + data[jistart + 9933] = 0.0 - k[4155]*y_cur[IDX_C3NM]; + data[jistart + 9934] = 0.0 - k[4156]*y_cur[IDX_C3NM]; + data[jistart + 9935] = 0.0 - k[4162]*y_cur[IDX_C3NM]; + data[jistart + 9936] = 0.0 - k[4160]*y_cur[IDX_C3NM]; + data[jistart + 9937] = 0.0 - k[4133]*y_cur[IDX_C3NM]; + data[jistart + 9938] = 0.0 - k[4132]*y_cur[IDX_C3NM]; + data[jistart + 9939] = 0.0 - k[4138]*y_cur[IDX_C3NM]; + data[jistart + 9940] = 0.0 + k[3377]*y_cur[IDX_C10M] + k[3381]*y_cur[IDX_C10HM] + + k[3409]*y_cur[IDX_C5M] + k[3418]*y_cur[IDX_C6M] + + k[3421]*y_cur[IDX_C6HM] + k[3425]*y_cur[IDX_C7M] + + k[3430]*y_cur[IDX_C7HM] + k[3436]*y_cur[IDX_C8M] + + k[3440]*y_cur[IDX_C8HM] + k[3442]*y_cur[IDX_C9M] + + k[3447]*y_cur[IDX_C9HM]; + data[jistart + 9941] = 0.0 - k[4145]*y_cur[IDX_C3NM]; + data[jistart + 9942] = 0.0 - k[130]*y_cur[IDX_C3NM]; + data[jistart + 9943] = 0.0 - k[4151]*y_cur[IDX_C3NM]; + data[jistart + 9944] = 0.0 - k[4131]*y_cur[IDX_C3NM]; + data[jistart + 9945] = 0.0 - k[4141]*y_cur[IDX_C3NM]; + data[jistart + 9946] = 0.0 - k[42]*y_cur[IDX_C3NM]; + data[jistart + 9947] = 0.0 - k[4149]*y_cur[IDX_C3NM] - k[4150]*y_cur[IDX_C3NM]; + data[jistart + 9948] = 0.0 - k[4144]*y_cur[IDX_C3NM]; + data[jistart + 9949] = 0.0 + k[1115]*y_cur[IDX_HNC3I] + k[5593]*y_cur[IDX_C3NI]; + data[jistart + 9950] = 0.0 - k[91]*y_cur[IDX_C3NM]; + data[jistart + 9951] = 0.0 + k[7776] + k[8096]; + data[jistart + 9952] = 0.0 + k[7775]; + data[jistart + 9953] = 0.0 + k[7709] + k[8014] + k[8313]*y_cur[IDX_GHI]; + data[jistart + 9954] = 0.0 + k[8008]; + data[jistart + 9955] = 0.0 + k[7808]; + data[jistart + 9956] = 0.0 + k[7858]; + data[jistart + 9957] = 0.0 + k[8309]*y_cur[IDX_GHI]; + data[jistart + 9958] = 0.0 + k[7695] + k[7993] + k[7995]; + data[jistart + 9959] = 0.0 + k[8119]; + data[jistart + 9960] = 0.0 + k[8201]; + data[jistart + 9961] = 0.0 + k[8214]; + data[jistart + 9962] = 0.0 + k[8226]; + data[jistart + 9963] = 0.0 + k[7777] + k[8098]; + data[jistart + 9964] = 0.0 + k[7989] + k[7991]; + data[jistart + 9965] = 0.0 + k[7687] + k[7688] + k[7977] + k[7978] + k[8291]*y_cur[IDX_GHI]; + data[jistart + 9966] = 0.0 + k[7746] + k[8060]; + data[jistart + 9967] = 0.0 + k[7974]; + data[jistart + 9968] = 0.0 + k[8132]; + data[jistart + 9969] = 0.0 + k[8022]; + data[jistart + 9970] = 0.0 + k[8184]; + data[jistart + 9971] = 0.0 + k[8029]; + data[jistart + 9972] = 0.0 + k[7972]; + data[jistart + 9973] = 0.0 + k[8038]; + data[jistart + 9974] = 0.0 + k[7720] + k[8027]; + data[jistart + 9975] = 0.0 + k[8306]*y_cur[IDX_GHI]; + data[jistart + 9976] = 0.0 + k[7676] + k[7677] + k[7963] + k[7964]; + data[jistart + 9977] = 0.0 + k[7635] + k[7916]; + data[jistart + 9978] = 0.0 - k[8392]*y_cur[IDX_GH2I]; + data[jistart + 9979] = 0.0 - k[8393]*y_cur[IDX_GH2I]; + data[jistart + 9980] = 0.0 - k[8389]*y_cur[IDX_GH2I]; + data[jistart + 9981] = 0.0 + k[7667] + k[7668] + k[7671] + k[7954] + k[7955] + k[7958]; + data[jistart + 9982] = 0.0 - k[8390]*y_cur[IDX_GH2I]; + data[jistart + 9983] = 0.0 - k[8391]*y_cur[IDX_GH2I]; + data[jistart + 9984] = 0.0 + k[8367]*y_cur[IDX_GHI]; + data[jistart + 9985] = 0.0 + k[8337]*y_cur[IDX_GHI]; + data[jistart + 9986] = 0.0 - k[8382]*y_cur[IDX_GH2I]; + data[jistart + 9987] = 0.0 - k[8387]*y_cur[IDX_GH2I]; + data[jistart + 9988] = 0.0 + k[8347]*y_cur[IDX_GHI]; + data[jistart + 9989] = 0.0 - k[8384]*y_cur[IDX_GH2I]; + data[jistart + 9990] = 0.0 - k[8388]*y_cur[IDX_GH2I]; + data[jistart + 9991] = 0.0 - k[8378]*y_cur[IDX_GH2I] - k[8379]*y_cur[IDX_GH2I]; + data[jistart + 9992] = 0.0 - k[8381]*y_cur[IDX_GH2I]; + data[jistart + 9993] = 0.0 - k[8383]*y_cur[IDX_GH2I]; + data[jistart + 9994] = 0.0 - k[8385]*y_cur[IDX_GH2I]; + data[jistart + 9995] = 0.0 + k[7653] + k[7654] + k[7657] + k[7658] + k[7940] + k[7941] + + k[7944] + k[7945]; + data[jistart + 9996] = 0.0 + k[7922] + k[7923]; + data[jistart + 9997] = 0.0 - k[8386]*y_cur[IDX_GH2I]; + data[jistart + 9998] = 0.0 - k[8380]*y_cur[IDX_GH2I]; + data[jistart + 9999] = 0.0 + k[8332]*y_cur[IDX_GHI]; + data[jistart + 10000] = 0.0 + k[7692] + k[7982] + k[7985] + k[8298]*y_cur[IDX_GHI]; + data[jistart + 10001] = 0.0 + k[7633] + k[7910] + k[7912] + k[8278]*y_cur[IDX_GHI]; + data[jistart + 10002] = 0.0 - k[8375]*y_cur[IDX_GH2I]; + data[jistart + 10003] = 0.0 - k[8372]*y_cur[IDX_GH2I]; + data[jistart + 10004] = 0.0 + k[8524]*y_cur[IDX_GNHI] + k[8524]*y_cur[IDX_GNHI]; + data[jistart + 10005] = 0.0 - k[8377]*y_cur[IDX_GH2I]; + data[jistart + 10006] = 0.0 - k[8373]*y_cur[IDX_GH2I]; + data[jistart + 10007] = 0.0 + k[7620] + k[7897] - k[8370]*y_cur[IDX_GH2I]; + data[jistart + 10008] = 0.0 - k[8374]*y_cur[IDX_GH2I]; + data[jistart + 10009] = 0.0 - k[8376]*y_cur[IDX_GH2I]; + data[jistart + 10010] = 0.0 + k[7626] + k[7628] + k[7903] + k[7905] - + k[8371]*y_cur[IDX_GH2I]; + data[jistart + 10011] = 0.0 - k[7071] - k[7253] - k[7435] - k[7617] - k[7893] - + k[8369]*y_cur[IDX_GCI] - k[8370]*y_cur[IDX_GCH2I] - k[8371]*y_cur[IDX_GCH3I] - k[8372]*y_cur[IDX_GNH2I] - k[8373]*y_cur[IDX_GOHI] - k[8374]*y_cur[IDX_GC2I] - k[8375]*y_cur[IDX_GC2HI] - k[8376]*y_cur[IDX_GCNI] - @@ -20457,21947 +15855,20951 @@ __global__ void JacKernel(realtype *y, realtype *data, NaunetData *d_udata, k[8389]*y_cur[IDX_GC8HI] - k[8390]*y_cur[IDX_GC9I] - k[8391]*y_cur[IDX_GC9HI] - k[8392]*y_cur[IDX_GC10I] - k[8393]*y_cur[IDX_GC10HI] - k[8653]*y_cur[IDX_GCI]; - data[jistart + 10053] = 0.0 + k[8022]; - data[jistart + 10054] = 0.0 + k[7692] + k[7982] + k[7985] + - k[8298]*y_cur[IDX_GHI]; - data[jistart + 10055] = 0.0 + k[7777] + k[8098]; - data[jistart + 10056] = 0.0 + k[7922] + k[7923]; - data[jistart + 10057] = 0.0 + k[8309]*y_cur[IDX_GHI]; - data[jistart + 10058] = 0.0 + k[7709] + k[8014] + - k[8313]*y_cur[IDX_GHI]; - data[jistart + 10059] = 0.0 + k[7776] + k[8096]; - data[jistart + 10060] = 0.0 + k[8347]*y_cur[IDX_GHI]; - data[jistart + 10061] = 0.0 + k[8337]*y_cur[IDX_GHI]; - data[jistart + 10062] = 0.0 + k[8306]*y_cur[IDX_GHI]; - data[jistart + 10063] = 0.0 + k[8524]*y_cur[IDX_GNHI] + - k[8524]*y_cur[IDX_GNHI]; - data[jistart + 10064] = 0.0 - k[8372]*y_cur[IDX_GH2I]; - data[jistart + 10065] = 0.0 + k[7635] + k[7916]; - data[jistart + 10066] = 0.0 - k[8373]*y_cur[IDX_GH2I]; - data[jistart + 10067] = 0.0 + k[8008]; - data[jistart + 10068] = 0.0 + k[7808]; - data[jistart + 10069] = 0.0 + k[7746] + k[8060]; - data[jistart + 10070] = 0.0 + k[7974]; - data[jistart + 10071] = 0.0 + k[7989] + k[7991]; - data[jistart + 10072] = 0.0 + k[7695] + k[7993] + k[7995]; - data[jistart + 10073] = 0.0 + k[6889]; - data[jistart + 10074] = 0.0 + k[8378]*y_cur[IDX_GH2I]; - data[jistart + 10075] = 0.0 + k[7725] + k[8029] + k[8033]; - data[jistart + 10076] = 0.0 + k[7733] + k[8038] + k[8042]; - data[jistart + 10077] = 0.0 - k[8318]*y_cur[IDX_GH2CCCI] - - k[8613]*y_cur[IDX_GH2CCCI]; - data[jistart + 10078] = 0.0 + k[8378]*y_cur[IDX_GC3HI]; - data[jistart + 10079] = 0.0 - k[7128] - k[7310] - k[7492] - k[7716] - - k[8022] - k[8023] - k[8318]*y_cur[IDX_GHI] - - k[8613]*y_cur[IDX_GHI]; - data[jistart + 10080] = 0.0 + k[6946]; - data[jistart + 10081] = 0.0 + k[8456]*y_cur[IDX_GNI]; - data[jistart + 10082] = 0.0 - k[8293]*y_cur[IDX_GH2CNI] - - k[8593]*y_cur[IDX_GH2CNI]; - data[jistart + 10083] = 0.0 - k[7096] - k[7278] - k[7460] - k[7665] - - k[7952] - k[8293]*y_cur[IDX_GHI] - k[8593]*y_cur[IDX_GHI]; - data[jistart + 10084] = 0.0 + k[8456]*y_cur[IDX_GCH2I]; - data[jistart + 10085] = 0.0 + k[6914]; - data[jistart + 10086] = 0.0 + k[7774] + k[8094]; - data[jistart + 10087] = 0.0 + k[8438]*y_cur[IDX_GOI] + - k[8528]*y_cur[IDX_GO2I]; - data[jistart + 10088] = 0.0 - k[8570]*y_cur[IDX_GH2COI]; - data[jistart + 10089] = 0.0 - k[8544]*y_cur[IDX_GH2COI]; - data[jistart + 10090] = 0.0 + k[8334]*y_cur[IDX_GHI]; - data[jistart + 10091] = 0.0 - k[8560]*y_cur[IDX_GH2COI] - - k[8561]*y_cur[IDX_GH2COI]; - data[jistart + 10092] = 0.0 + k[7769] + k[8089]; - data[jistart + 10093] = 0.0 + k[7701] + k[8001]; - data[jistart + 10094] = 0.0 + k[8295]*y_cur[IDX_GHCOI] - - k[8296]*y_cur[IDX_GH2COI] - k[8297]*y_cur[IDX_GH2COI] - - k[8298]*y_cur[IDX_GH2COI] + k[8334]*y_cur[IDX_GCH3CHOI] - - k[8596]*y_cur[IDX_GH2COI] - k[8597]*y_cur[IDX_GH2COI]; - data[jistart + 10095] = 0.0 - k[7108] - k[7290] - k[7472] - k[7692] - - k[7982] - k[7983] - k[7984] - k[7985] - k[7986] - k[7987] - - k[8296]*y_cur[IDX_GHI] - k[8297]*y_cur[IDX_GHI] - - k[8298]*y_cur[IDX_GHI] - k[8508]*y_cur[IDX_GOHI] - - k[8509]*y_cur[IDX_GOHI] - k[8522]*y_cur[IDX_GNHI] - - k[8534]*y_cur[IDX_GNH2I] - k[8544]*y_cur[IDX_GCH3I] - - k[8560]*y_cur[IDX_GCH3OI] - k[8561]*y_cur[IDX_GCH3OI] - - k[8570]*y_cur[IDX_GCH2OHI] - k[8596]*y_cur[IDX_GHI] - - k[8597]*y_cur[IDX_GHI]; - data[jistart + 10096] = 0.0 + k[8295]*y_cur[IDX_GHI]; - data[jistart + 10097] = 0.0 + k[8150] + k[8150]; - data[jistart + 10098] = 0.0 - k[8522]*y_cur[IDX_GH2COI]; - data[jistart + 10099] = 0.0 - k[8534]*y_cur[IDX_GH2COI]; - data[jistart + 10100] = 0.0 + k[8438]*y_cur[IDX_GCH2I]; - data[jistart + 10101] = 0.0 + k[8528]*y_cur[IDX_GCH2I]; - data[jistart + 10102] = 0.0 - k[8508]*y_cur[IDX_GH2COI] - - k[8509]*y_cur[IDX_GH2COI]; - data[jistart + 10103] = 0.0 + k[6926]; - data[jistart + 10104] = 0.0 + k[8474]*y_cur[IDX_GSI]; - data[jistart + 10105] = 0.0 + k[8335]*y_cur[IDX_GHCSI]; - data[jistart + 10106] = 0.0 - k[7171] - k[7353] - k[7535] - k[7777] - - k[8098]; - data[jistart + 10107] = 0.0 + k[8335]*y_cur[IDX_GHI]; - data[jistart + 10108] = 0.0 + k[8474]*y_cur[IDX_GCH3I]; - data[jistart + 10109] = 0.0 + k[6989]; - data[jistart + 10110] = 0.0 + k[7743] + k[8054]; - data[jistart + 10111] = 0.0 + k[8519]*y_cur[IDX_GOHI]; - data[jistart + 10112] = 0.0 + k[8506]*y_cur[IDX_GOHI]; - data[jistart + 10113] = 0.0 + k[7700] + k[8000]; - data[jistart + 10114] = 0.0 + k[8283]*y_cur[IDX_GOHI] + - k[8310]*y_cur[IDX_GH2O2I] + k[8338]*y_cur[IDX_GHCOOHI]; - data[jistart + 10115] = 0.0 + k[8373]*y_cur[IDX_GOHI]; - data[jistart + 10116] = 0.0 + k[8508]*y_cur[IDX_GOHI]; - data[jistart + 10117] = 0.0 - k[7084] - k[7266] - k[7448] - k[7639] - - k[7921] - k[7922] - k[7923] - k[7924] - k[7925]; - data[jistart + 10118] = 0.0 + k[8310]*y_cur[IDX_GHI]; - data[jistart + 10119] = 0.0 + k[8512]*y_cur[IDX_GOHI]; - data[jistart + 10120] = 0.0 + k[8338]*y_cur[IDX_GHI] + - k[8510]*y_cur[IDX_GOHI]; - data[jistart + 10121] = 0.0 + k[8530]*y_cur[IDX_GNOI]; - data[jistart + 10122] = 0.0 + k[8530]*y_cur[IDX_GNH2I]; - data[jistart + 10123] = 0.0 + k[8283]*y_cur[IDX_GHI] + - k[8373]*y_cur[IDX_GH2I] + k[8506]*y_cur[IDX_GCH3CHOI] + - k[8508]*y_cur[IDX_GH2COI] + k[8510]*y_cur[IDX_GHCOOHI] + - k[8512]*y_cur[IDX_GHCOOCH3I] + k[8519]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 10124] = 0.0 + k[6902]; - data[jistart + 10125] = 0.0 + k[8308]*y_cur[IDX_GO2HI] - - k[8309]*y_cur[IDX_GH2O2I] - k[8310]*y_cur[IDX_GH2O2I]; - data[jistart + 10126] = 0.0 - k[7122] - k[7304] - k[7486] - k[7708] - - k[8012] - k[8309]*y_cur[IDX_GHI] - k[8310]*y_cur[IDX_GHI]; - data[jistart + 10127] = 0.0 + k[8308]*y_cur[IDX_GHI]; - data[jistart + 10128] = 0.0 + k[8514]*y_cur[IDX_GOHI] + - k[8514]*y_cur[IDX_GOHI]; - data[jistart + 10129] = 0.0 + k[6940]; - data[jistart + 10130] = 0.0 + k[8312]*y_cur[IDX_GHSI] - - k[8313]*y_cur[IDX_GH2SI]; - data[jistart + 10131] = 0.0 - k[7123] - k[7305] - k[7487] - k[7709] - - k[7710] - k[7711] - k[8013] - k[8014] - k[8015] - k[8016] - - k[8313]*y_cur[IDX_GHI]; - data[jistart + 10132] = 0.0 + k[8312]*y_cur[IDX_GHI]; - data[jistart + 10133] = 0.0 + k[6941]; - data[jistart + 10134] = 0.0 - k[7220] - k[7402] - k[7584] - k[7846] - - k[8175]; - data[jistart + 10135] = 0.0 + k[7038]; - data[jistart + 10136] = 0.0 - k[7170] - k[7352] - k[7534] - k[7776] - - k[8096] - k[8097]; - data[jistart + 10137] = 0.0 + k[6988]; - data[jistart + 10138] = 0.0 + k[8324]*y_cur[IDX_GHI]; - data[jistart + 10139] = 0.0 + k[8324]*y_cur[IDX_GC2OI] - - k[8325]*y_cur[IDX_GHC2OI] - k[8620]*y_cur[IDX_GHC2OI]; - data[jistart + 10140] = 0.0 - k[7140] - k[7322] - k[7504] - k[7887] - - k[8325]*y_cur[IDX_GHI] - k[8620]*y_cur[IDX_GHI]; - data[jistart + 10141] = 0.0 + k[6958]; - data[jistart + 10142] = 0.0 - k[7199] - k[7381] - k[7567] - k[7817] - - k[8145]; - data[jistart + 10143] = 0.0 + k[7017]; - data[jistart + 10144] = 0.0 + k[8466]*y_cur[IDX_GNI]; - data[jistart + 10145] = 0.0 + k[8343]*y_cur[IDX_GHI]; - data[jistart + 10146] = 0.0 + k[8132]; - data[jistart + 10147] = 0.0 + k[8343]*y_cur[IDX_GC3NI]; - data[jistart + 10148] = 0.0 - k[7183] - k[7365] - k[7547] - k[7798] - - k[8123]; - data[jistart + 10149] = 0.0 + k[8466]*y_cur[IDX_GC3HI]; - data[jistart + 10150] = 0.0 + k[7001]; - data[jistart + 10151] = 0.0 + k[8468]*y_cur[IDX_GNI]; - data[jistart + 10152] = 0.0 + k[8354]*y_cur[IDX_GHI]; - data[jistart + 10153] = 0.0 + k[8354]*y_cur[IDX_GC5NI]; - data[jistart + 10154] = 0.0 - k[7227] - k[7409] - k[7591] - k[7855] - - k[7856] - k[8187] - k[8188]; - data[jistart + 10155] = 0.0 + k[8468]*y_cur[IDX_GC5HI]; - data[jistart + 10156] = 0.0 + k[7045]; - data[jistart + 10157] = 0.0 + k[8470]*y_cur[IDX_GNI]; - data[jistart + 10158] = 0.0 + k[8359]*y_cur[IDX_GHI]; - data[jistart + 10159] = 0.0 + k[8359]*y_cur[IDX_GC7NI]; - data[jistart + 10160] = 0.0 - k[7241] - k[7423] - k[7605] - k[7870] - - k[8216] - k[8217] - k[8218]; - data[jistart + 10161] = 0.0 + k[8470]*y_cur[IDX_GC7HI]; - data[jistart + 10162] = 0.0 + k[7059]; - data[jistart + 10163] = 0.0 + k[8472]*y_cur[IDX_GNI]; - data[jistart + 10164] = 0.0 + k[8364]*y_cur[IDX_GHI]; - data[jistart + 10165] = 0.0 + k[8364]*y_cur[IDX_GC9NI]; - data[jistart + 10166] = 0.0 - k[7250] - k[7432] - k[7614] - k[7879] - - k[8252] - k[8253] - k[8254]; - data[jistart + 10167] = 0.0 + k[8472]*y_cur[IDX_GC9HI]; - data[jistart + 10168] = 0.0 + k[7068]; - data[jistart + 10169] = 0.0 + k[8321]*y_cur[IDX_GHI]; - data[jistart + 10170] = 0.0 + k[8488]*y_cur[IDX_GCNI]; - data[jistart + 10171] = 0.0 + k[8488]*y_cur[IDX_GCHI]; - data[jistart + 10172] = 0.0 + k[8321]*y_cur[IDX_GC2NI] - - k[8322]*y_cur[IDX_GHCCNI] - k[8617]*y_cur[IDX_GHCCNI]; - data[jistart + 10173] = 0.0 - k[7131] - k[7313] - k[7495] - k[7886] - - k[8322]*y_cur[IDX_GHI] - k[8617]*y_cur[IDX_GHI]; - data[jistart + 10174] = 0.0 + k[6949]; - data[jistart + 10175] = 0.0 + k[7810] + k[8139]; - data[jistart + 10176] = 0.0 + k[8455]*y_cur[IDX_GNI] + - k[8480]*y_cur[IDX_GNHI] + k[8481]*y_cur[IDX_GNOI]; - data[jistart + 10177] = 0.0 + k[7737] + k[8046]; - data[jistart + 10178] = 0.0 + k[8292]*y_cur[IDX_GHI] + - k[8376]*y_cur[IDX_GH2I]; - data[jistart + 10179] = 0.0 + k[8292]*y_cur[IDX_GCNI]; - data[jistart + 10180] = 0.0 + k[8376]*y_cur[IDX_GCNI]; - data[jistart + 10181] = 0.0 + k[7665] + k[7952]; - data[jistart + 10182] = 0.0 - k[7093] - k[7275] - k[7457] - k[7651] - - k[7938]; - data[jistart + 10183] = 0.0 + k[8455]*y_cur[IDX_GCHI]; - data[jistart + 10184] = 0.0 + k[8480]*y_cur[IDX_GCHI]; - data[jistart + 10185] = 0.0 + k[8481]*y_cur[IDX_GCHI]; - data[jistart + 10186] = 0.0 + k[6911]; - data[jistart + 10187] = 0.0 + k[8326]*y_cur[IDX_GHI]; - data[jistart + 10188] = 0.0 + k[8326]*y_cur[IDX_GCNOI]; - data[jistart + 10189] = 0.0 - k[7153] - k[7335] - k[7517] - k[7752] - - k[8066]; - data[jistart + 10190] = 0.0 + k[6971]; - data[jistart + 10191] = 0.0 + k[8437]*y_cur[IDX_GOI] + - k[8485]*y_cur[IDX_GO2I]; - data[jistart + 10192] = 0.0 - k[8569]*y_cur[IDX_GHCOI] + - k[8570]*y_cur[IDX_GH2COI] + k[8571]*y_cur[IDX_GCH3CHOI] - - k[8762]*y_cur[IDX_GHCOI]; - data[jistart + 10193] = 0.0 + k[7890] + k[8270] + - k[8368]*y_cur[IDX_GHI] + k[8557]*y_cur[IDX_GCH3I]; - data[jistart + 10194] = 0.0 - k[8543]*y_cur[IDX_GHCOI] + - k[8544]*y_cur[IDX_GH2COI] + k[8548]*y_cur[IDX_GCH3CHOI] + - k[8557]*y_cur[IDX_GCH2OHCHOI] - k[8751]*y_cur[IDX_GHCOI]; - data[jistart + 10195] = 0.0 + k[7761] + k[7763] + k[8079] + k[8081] - + k[8333]*y_cur[IDX_GHI] + k[8507]*y_cur[IDX_GOHI] + - k[8548]*y_cur[IDX_GCH3I] + k[8571]*y_cur[IDX_GCH2OHI]; - data[jistart + 10196] = 0.0 - k[8559]*y_cur[IDX_GHCOI] + - k[8560]*y_cur[IDX_GH2COI] - k[8759]*y_cur[IDX_GHCOI]; - data[jistart + 10197] = 0.0 + k[8294]*y_cur[IDX_GHI]; - data[jistart + 10198] = 0.0 + k[8294]*y_cur[IDX_GCOI] - - k[8295]*y_cur[IDX_GHCOI] + k[8298]*y_cur[IDX_GH2COI] + - k[8333]*y_cur[IDX_GCH3CHOI] + k[8338]*y_cur[IDX_GHCOOHI] + - k[8346]*y_cur[IDX_GHCOOCH3I] + k[8368]*y_cur[IDX_GCH2OHCHOI] - - k[8595]*y_cur[IDX_GHCOI]; - data[jistart + 10199] = 0.0 + k[7987] + k[8298]*y_cur[IDX_GHI] + - k[8508]*y_cur[IDX_GOHI] + k[8522]*y_cur[IDX_GNHI] + - k[8534]*y_cur[IDX_GNH2I] + k[8544]*y_cur[IDX_GCH3I] + - k[8560]*y_cur[IDX_GCH3OI] + k[8570]*y_cur[IDX_GCH2OHI]; - data[jistart + 10200] = 0.0 - k[7101] - k[7283] - k[7465] - k[7682] - - k[7683] - k[7969] - k[7970] - k[8295]*y_cur[IDX_GHI] - - k[8434]*y_cur[IDX_GOI] - k[8448]*y_cur[IDX_GOI] - - k[8517]*y_cur[IDX_GOHI] - k[8543]*y_cur[IDX_GCH3I] - - k[8559]*y_cur[IDX_GCH3OI] - k[8569]*y_cur[IDX_GCH2OHI] - - k[8595]*y_cur[IDX_GHI] - k[8740]*y_cur[IDX_GOHI] - - k[8751]*y_cur[IDX_GCH3I] - k[8759]*y_cur[IDX_GCH3OI] - - k[8762]*y_cur[IDX_GCH2OHI]; - data[jistart + 10201] = 0.0 + k[8346]*y_cur[IDX_GHI]; - data[jistart + 10202] = 0.0 + k[7780] + k[8102] + k[8104] + - k[8338]*y_cur[IDX_GHI]; - data[jistart + 10203] = 0.0 + k[8522]*y_cur[IDX_GH2COI]; - data[jistart + 10204] = 0.0 + k[8534]*y_cur[IDX_GH2COI]; - data[jistart + 10205] = 0.0 - k[8434]*y_cur[IDX_GHCOI] + - k[8437]*y_cur[IDX_GCHI] - k[8448]*y_cur[IDX_GHCOI]; - data[jistart + 10206] = 0.0 + k[8485]*y_cur[IDX_GCHI]; - data[jistart + 10207] = 0.0 + k[8507]*y_cur[IDX_GCH3CHOI] + - k[8508]*y_cur[IDX_GH2COI] - k[8517]*y_cur[IDX_GHCOI] - - k[8740]*y_cur[IDX_GHCOI]; - data[jistart + 10208] = 0.0 + k[6919]; - data[jistart + 10209] = 0.0 + k[8566]*y_cur[IDX_GCH3OI]; - data[jistart + 10210] = 0.0 - k[8555]*y_cur[IDX_GHCOOCH3I]; - data[jistart + 10211] = 0.0 + k[8563]*y_cur[IDX_GCH3OI]; - data[jistart + 10212] = 0.0 + k[8559]*y_cur[IDX_GHCOI] + - k[8561]*y_cur[IDX_GH2COI] + k[8563]*y_cur[IDX_GCH3CHOI] - - k[8565]*y_cur[IDX_GHCOOCH3I] + k[8566]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 10213] = 0.0 + k[8365]*y_cur[IDX_GHI]; - data[jistart + 10214] = 0.0 - k[8346]*y_cur[IDX_GHCOOCH3I] - - k[8347]*y_cur[IDX_GHCOOCH3I] + k[8365]*y_cur[IDX_GCOOCH3I]; - data[jistart + 10215] = 0.0 + k[8561]*y_cur[IDX_GCH3OI]; - data[jistart + 10216] = 0.0 + k[8559]*y_cur[IDX_GCH3OI]; - data[jistart + 10217] = 0.0 - k[7203] - k[7385] - k[7569] - k[7824] - - k[7825] - k[7826] - k[8150] - k[8346]*y_cur[IDX_GHI] - - k[8347]*y_cur[IDX_GHI] - k[8511]*y_cur[IDX_GOHI] - - k[8512]*y_cur[IDX_GOHI] - k[8537]*y_cur[IDX_GNH2I] - - k[8555]*y_cur[IDX_GCH3I] - k[8565]*y_cur[IDX_GCH3OI]; - data[jistart + 10218] = 0.0 - k[8537]*y_cur[IDX_GHCOOCH3I]; - data[jistart + 10219] = 0.0 - k[8511]*y_cur[IDX_GHCOOCH3I] - - k[8512]*y_cur[IDX_GHCOOCH3I]; - data[jistart + 10220] = 0.0 + k[7021]; - data[jistart + 10221] = 0.0 + k[8520]*y_cur[IDX_GOHI]; - data[jistart + 10222] = 0.0 - k[8550]*y_cur[IDX_GHCOOHI]; - data[jistart + 10223] = 0.0 + k[8505]*y_cur[IDX_GOHI]; - data[jistart + 10224] = 0.0 - k[8564]*y_cur[IDX_GHCOOHI]; - data[jistart + 10225] = 0.0 + k[8336]*y_cur[IDX_GHI]; - data[jistart + 10226] = 0.0 + k[8336]*y_cur[IDX_GCOOHI] - - k[8337]*y_cur[IDX_GHCOOHI] - k[8338]*y_cur[IDX_GHCOOHI]; - data[jistart + 10227] = 0.0 + k[8509]*y_cur[IDX_GOHI]; - data[jistart + 10228] = 0.0 + k[8517]*y_cur[IDX_GOHI]; - data[jistart + 10229] = 0.0 + k[8511]*y_cur[IDX_GOHI]; - data[jistart + 10230] = 0.0 - k[7168] - k[7350] - k[7532] - k[7780] - - k[8102] - k[8103] - k[8104] - k[8337]*y_cur[IDX_GHI] - - k[8338]*y_cur[IDX_GHI] - k[8510]*y_cur[IDX_GOHI] - - k[8536]*y_cur[IDX_GNH2I] - k[8550]*y_cur[IDX_GCH3I] - - k[8564]*y_cur[IDX_GCH3OI]; - data[jistart + 10231] = 0.0 - k[8536]*y_cur[IDX_GHCOOHI]; - data[jistart + 10232] = 0.0 + k[8505]*y_cur[IDX_GCH3CHOI] + - k[8509]*y_cur[IDX_GH2COI] - k[8510]*y_cur[IDX_GHCOOHI] + - k[8511]*y_cur[IDX_GHCOOCH3I] + k[8517]*y_cur[IDX_GHCOI] + - k[8520]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 10233] = 0.0 + k[6986]; - data[jistart + 10234] = 0.0 + k[7775]; - data[jistart + 10235] = 0.0 - k[7158] - k[7340] - k[7522] - k[7759] - - k[8077]; - data[jistart + 10236] = 0.0 + k[6976]; - data[jistart + 10237] = 0.0 + k[8473]*y_cur[IDX_GSI]; - data[jistart + 10238] = 0.0 + k[8330]*y_cur[IDX_GHI]; - data[jistart + 10239] = 0.0 + k[8330]*y_cur[IDX_GCSI] - - k[8335]*y_cur[IDX_GHCSI] - k[8627]*y_cur[IDX_GHCSI]; - data[jistart + 10240] = 0.0 - k[7162] - k[7344] - k[7526] - k[7766] - - k[7767] - k[8085] - k[8086] - k[8087] - k[8335]*y_cur[IDX_GHI] - - k[8627]*y_cur[IDX_GHI]; - data[jistart + 10241] = 0.0 + k[8473]*y_cur[IDX_GCHI]; - data[jistart + 10242] = 0.0 + k[6980]; - data[jistart + 10243] = 0.0 - k[7138] - k[7320] - k[7502] - k[7738] - - k[8047] - k[8048] - k[8049]; - data[jistart + 10244] = 0.0 + k[8057] + k[8058]; - data[jistart + 10245] = 0.0 + k[6956]; - data[jistart + 10246] = 0.0 + k[8314]*y_cur[IDX_GHI]; - data[jistart + 10247] = 0.0 + k[8314]*y_cur[IDX_GClI]; - data[jistart + 10248] = 0.0 - k[7126] - k[7308] - k[7490] - k[7713] - - k[8018] - k[8019]; - data[jistart + 10249] = 0.0 + k[6944]; - data[jistart + 10250] = 0.0 + k[8284]*y_cur[IDX_GHI]; - data[jistart + 10251] = 0.0 + k[8284]*y_cur[IDX_GFI]; - data[jistart + 10252] = 0.0 - k[7086] - k[7268] - k[7450] - k[7640] - - k[7926]; - data[jistart + 10253] = 0.0 + k[6904]; - data[jistart + 10254] = 0.0 + k[8403]*y_cur[IDX_GNHI] + - k[8404]*y_cur[IDX_GNH2I]; - data[jistart + 10255] = 0.0 + k[7811] + k[8140]; - data[jistart + 10256] = 0.0 + k[8479]*y_cur[IDX_GNHI]; - data[jistart + 10257] = 0.0 + k[7972]; - data[jistart + 10258] = 0.0 - k[7095] - k[7277] - k[7459] - k[7650] - - k[7937]; - data[jistart + 10259] = 0.0 + k[8403]*y_cur[IDX_GCI] + - k[8479]*y_cur[IDX_GCHI]; - data[jistart + 10260] = 0.0 + k[8404]*y_cur[IDX_GCI]; - data[jistart + 10261] = 0.0 + k[6913]; - data[jistart + 10262] = 0.0 - k[7182] - k[7364] - k[7546] - k[7797] - - k[8122]; - data[jistart + 10263] = 0.0 + k[7000]; - data[jistart + 10264] = 0.0 + k[8526]*y_cur[IDX_GNHI]; - data[jistart + 10265] = 0.0 + k[8329]*y_cur[IDX_GOCNI]; - data[jistart + 10266] = 0.0 - k[7150] - k[7332] - k[7514] - k[7751] - - k[8065]; - data[jistart + 10267] = 0.0 + k[8526]*y_cur[IDX_GCOI]; - data[jistart + 10268] = 0.0 + k[8329]*y_cur[IDX_GHI]; - data[jistart + 10269] = 0.0 + k[6968]; - data[jistart + 10270] = 0.0 - k[8477]*y_cur[IDX_GHNOI]; - data[jistart + 10271] = 0.0 - k[8533]*y_cur[IDX_GHNOI]; - data[jistart + 10272] = 0.0 - k[8541]*y_cur[IDX_GHNOI]; - data[jistart + 10273] = 0.0 + k[8305]*y_cur[IDX_GNOI] - - k[8306]*y_cur[IDX_GHNOI]; - data[jistart + 10274] = 0.0 - k[7112] - k[7294] - k[7476] - k[7694] - - k[7992] - k[8306]*y_cur[IDX_GHI] - k[8435]*y_cur[IDX_GOI] - - k[8477]*y_cur[IDX_GCHI] - k[8533]*y_cur[IDX_GCH2I] - - k[8541]*y_cur[IDX_GCH3I]; - data[jistart + 10275] = 0.0 + k[8439]*y_cur[IDX_GOI]; - data[jistart + 10276] = 0.0 + k[8440]*y_cur[IDX_GOI]; - data[jistart + 10277] = 0.0 + k[8305]*y_cur[IDX_GHI]; - data[jistart + 10278] = 0.0 - k[8435]*y_cur[IDX_GHNOI] + - k[8439]*y_cur[IDX_GNHI] + k[8440]*y_cur[IDX_GNH2I]; - data[jistart + 10279] = 0.0 + k[6930]; - data[jistart + 10280] = 0.0 - k[7149] - k[7331] - k[7513] - k[7750] - - k[8064]; - data[jistart + 10281] = 0.0 + k[6967]; - data[jistart + 10282] = 0.0 + k[8328]*y_cur[IDX_GOCNI]; - data[jistart + 10283] = 0.0 - k[7151] - k[7333] - k[7515] - k[7755] - - k[8069]; - data[jistart + 10284] = 0.0 + k[8328]*y_cur[IDX_GHI]; - data[jistart + 10285] = 0.0 + k[6969]; - data[jistart + 10286] = 0.0 + k[8327]*y_cur[IDX_GHI]; - data[jistart + 10287] = 0.0 + k[8327]*y_cur[IDX_GCNOI]; - data[jistart + 10288] = 0.0 - k[7155] - k[7337] - k[7519] - k[7754] - - k[8068]; - data[jistart + 10289] = 0.0 + k[6973]; - data[jistart + 10290] = 0.0 - k[7175] - k[7357] - k[7539] - k[7785] - - k[8109]; - data[jistart + 10291] = 0.0 + k[6993]; - data[jistart + 10292] = 0.0 - k[8414]*y_cur[IDX_GHSI]; - data[jistart + 10293] = 0.0 + k[8311]*y_cur[IDX_GSI] - - k[8312]*y_cur[IDX_GHSI] + k[8313]*y_cur[IDX_GH2SI] + - k[8348]*y_cur[IDX_GOCSI] + k[8349]*y_cur[IDX_GSO2I] - - k[8608]*y_cur[IDX_GHSI]; - data[jistart + 10294] = 0.0 + k[7710] + k[8013] + k[8015] + - k[8313]*y_cur[IDX_GHI]; - data[jistart + 10295] = 0.0 + k[7846] + k[7846] + k[8175] + k[8175]; - data[jistart + 10296] = 0.0 - k[7120] - k[7302] - k[7484] - k[7707] - - k[8011] - k[8312]*y_cur[IDX_GHI] - k[8414]*y_cur[IDX_GCI] - - k[8449]*y_cur[IDX_GOI] - k[8463]*y_cur[IDX_GNI] - - k[8608]*y_cur[IDX_GHI]; - data[jistart + 10297] = 0.0 + k[7845] + k[8172] + k[8173]; - data[jistart + 10298] = 0.0 - k[8463]*y_cur[IDX_GHSI]; - data[jistart + 10299] = 0.0 - k[8449]*y_cur[IDX_GHSI]; - data[jistart + 10300] = 0.0 + k[8348]*y_cur[IDX_GHI]; - data[jistart + 10301] = 0.0 + k[8311]*y_cur[IDX_GHI]; - data[jistart + 10302] = 0.0 + k[8349]*y_cur[IDX_GHI]; - data[jistart + 10303] = 0.0 + k[6938]; - data[jistart + 10304] = 0.0 - k[7219] - k[7401] - k[7583] - k[7845] - - k[8172] - k[8173] - k[8174]; - data[jistart + 10305] = 0.0 + k[7037]; - data[jistart + 10306] = 0.0 - k[7072] - k[7254] - k[7436]; - data[jistart + 10307] = 0.0 + k[6890]; - data[jistart + 10308] = 0.0 - k[7088] - k[7270] - k[7452]; - data[jistart + 10309] = 0.0 + k[6906]; - data[jistart + 10310] = 0.0 - k[8397]*y_cur[IDX_GNI] - - k[8657]*y_cur[IDX_GNI]; - data[jistart + 10311] = 0.0 - k[8462]*y_cur[IDX_GNI] - - k[8703]*y_cur[IDX_GNI]; - data[jistart + 10312] = 0.0 + k[7717] + k[8024]; - data[jistart + 10313] = 0.0 - k[8465]*y_cur[IDX_GNI] - - k[8705]*y_cur[IDX_GNI]; - data[jistart + 10314] = 0.0 - k[8466]*y_cur[IDX_GNI] - - k[8706]*y_cur[IDX_GNI]; - data[jistart + 10315] = 0.0 + k[8161]; - data[jistart + 10316] = 0.0 - k[8467]*y_cur[IDX_GNI] - - k[8707]*y_cur[IDX_GNI]; - data[jistart + 10317] = 0.0 - k[8468]*y_cur[IDX_GNI] - - k[8708]*y_cur[IDX_GNI]; - data[jistart + 10318] = 0.0 - k[8469]*y_cur[IDX_GNI] - - k[8709]*y_cur[IDX_GNI]; - data[jistart + 10319] = 0.0 - k[8470]*y_cur[IDX_GNI] - - k[8710]*y_cur[IDX_GNI]; - data[jistart + 10320] = 0.0 - k[8471]*y_cur[IDX_GNI] - - k[8711]*y_cur[IDX_GNI]; - data[jistart + 10321] = 0.0 - k[8472]*y_cur[IDX_GNI] - - k[8712]*y_cur[IDX_GNI]; - data[jistart + 10322] = 0.0 - k[8455]*y_cur[IDX_GNI] - - k[8698]*y_cur[IDX_GNI]; - data[jistart + 10323] = 0.0 - k[8456]*y_cur[IDX_GNI] - - k[8699]*y_cur[IDX_GNI]; - data[jistart + 10324] = 0.0 - k[8460]*y_cur[IDX_GNI] - - k[8701]*y_cur[IDX_GNI]; - data[jistart + 10325] = 0.0 + k[7649] + k[7936]; - data[jistart + 10326] = 0.0 - k[8279]*y_cur[IDX_GNI] - - k[8580]*y_cur[IDX_GNI]; - data[jistart + 10327] = 0.0 - k[8463]*y_cur[IDX_GNI]; - data[jistart + 10328] = 0.0 - k[7076] - k[7258] - k[7440] - - k[8279]*y_cur[IDX_GHI] - k[8397]*y_cur[IDX_GCI] - - k[8454]*y_cur[IDX_GO2HI] - k[8455]*y_cur[IDX_GCHI] - - k[8456]*y_cur[IDX_GCH2I] - k[8457]*y_cur[IDX_GNI] - - k[8457]*y_cur[IDX_GNI] - k[8457]*y_cur[IDX_GNI] - - k[8457]*y_cur[IDX_GNI] - k[8458]*y_cur[IDX_GNHI] - - k[8459]*y_cur[IDX_GNSI] - k[8460]*y_cur[IDX_GCH3I] - - k[8461]*y_cur[IDX_GOI] - k[8462]*y_cur[IDX_GC2I] - - k[8463]*y_cur[IDX_GHSI] - k[8464]*y_cur[IDX_GSI] - - k[8465]*y_cur[IDX_GC3I] - k[8466]*y_cur[IDX_GC3HI] - - k[8467]*y_cur[IDX_GC5I] - k[8468]*y_cur[IDX_GC5HI] - - k[8469]*y_cur[IDX_GC7I] - k[8470]*y_cur[IDX_GC7HI] - - k[8471]*y_cur[IDX_GC9I] - k[8472]*y_cur[IDX_GC9HI] - - k[8580]*y_cur[IDX_GHI] - k[8657]*y_cur[IDX_GCI] - - k[8698]*y_cur[IDX_GCHI] - k[8699]*y_cur[IDX_GCH2I] - - k[8700]*y_cur[IDX_GNI] - k[8700]*y_cur[IDX_GNI] - - k[8700]*y_cur[IDX_GNI] - k[8700]*y_cur[IDX_GNI] - - k[8701]*y_cur[IDX_GCH3I] - k[8702]*y_cur[IDX_GOI] - - k[8703]*y_cur[IDX_GC2I] - k[8704]*y_cur[IDX_GSI] - - k[8705]*y_cur[IDX_GC3I] - k[8706]*y_cur[IDX_GC3HI] - - k[8707]*y_cur[IDX_GC5I] - k[8708]*y_cur[IDX_GC5HI] - - k[8709]*y_cur[IDX_GC7I] - k[8710]*y_cur[IDX_GC7HI] - - k[8711]*y_cur[IDX_GC9I] - k[8712]*y_cur[IDX_GC9HI]; - data[jistart + 10329] = 0.0 + k[7666] + k[7666] + k[7953] + k[7953]; - data[jistart + 10330] = 0.0 + k[7756] + k[8071] + k[8073] + k[8074] - + k[8074]; - data[jistart + 10331] = 0.0 + k[8127]; - data[jistart + 10332] = 0.0 + k[7623] + k[7624] + k[7900] + k[7901] - - k[8458]*y_cur[IDX_GNI]; - data[jistart + 10333] = 0.0 + k[7631] + k[7908]; - data[jistart + 10334] = 0.0 + k[7690] + k[7691] + k[7980] + k[7981]; - data[jistart + 10335] = 0.0 + k[7779] + k[8101] - - k[8459]*y_cur[IDX_GNI]; - data[jistart + 10336] = 0.0 - k[8461]*y_cur[IDX_GNI] - - k[8702]*y_cur[IDX_GNI]; - data[jistart + 10337] = 0.0 - k[8454]*y_cur[IDX_GNI]; - data[jistart + 10338] = 0.0 + k[7768] + k[8088]; - data[jistart + 10339] = 0.0 - k[8464]*y_cur[IDX_GNI] - - k[8704]*y_cur[IDX_GNI]; - data[jistart + 10340] = 0.0 + k[7748] + k[8062]; - data[jistart + 10341] = 0.0 + k[6894]; - data[jistart + 10342] = 0.0 + k[8457]*y_cur[IDX_GNI] + - k[8457]*y_cur[IDX_GNI] + k[8458]*y_cur[IDX_GNHI] + - k[8459]*y_cur[IDX_GNSI]; - data[jistart + 10343] = 0.0 - k[7098] - k[7280] - k[7462] - k[7666] - - k[7953]; - data[jistart + 10344] = 0.0 + k[8070] + k[8072]; - data[jistart + 10345] = 0.0 + k[8458]*y_cur[IDX_GNI] + - k[8524]*y_cur[IDX_GNHI] + k[8524]*y_cur[IDX_GNHI] + - k[8525]*y_cur[IDX_GNOI]; - data[jistart + 10346] = 0.0 + k[8530]*y_cur[IDX_GNOI]; - data[jistart + 10347] = 0.0 + k[8525]*y_cur[IDX_GNHI] + - k[8530]*y_cur[IDX_GNH2I]; - data[jistart + 10348] = 0.0 + k[8459]*y_cur[IDX_GNI]; - data[jistart + 10349] = 0.0 + k[6916]; - data[jistart + 10350] = 0.0 - k[7156] - k[7338] - k[7520] - k[7756] - - k[8070] - k[8071] - k[8072] - k[8073] - k[8074]; - data[jistart + 10351] = 0.0 + k[6974]; - data[jistart + 10352] = 0.0 - k[7187] - k[7369] - k[7551] - k[7801] - - k[8126] - k[8127] - k[8128]; - data[jistart + 10353] = 0.0 + k[7005]; - data[jistart + 10354] = 0.0 - k[8403]*y_cur[IDX_GNHI] - - k[8659]*y_cur[IDX_GNHI]; - data[jistart + 10355] = 0.0 - k[8479]*y_cur[IDX_GNHI] - - k[8480]*y_cur[IDX_GNHI]; - data[jistart + 10356] = 0.0 - k[8523]*y_cur[IDX_GNHI] - - k[8743]*y_cur[IDX_GNHI]; - data[jistart + 10357] = 0.0 + k[7685]; - data[jistart + 10358] = 0.0 - k[8527]*y_cur[IDX_GNHI]; - data[jistart + 10359] = 0.0 - k[8521]*y_cur[IDX_GNHI]; - data[jistart + 10360] = 0.0 - k[8526]*y_cur[IDX_GNHI] - - k[8744]*y_cur[IDX_GNHI]; - data[jistart + 10361] = 0.0 + k[8279]*y_cur[IDX_GNI] - - k[8280]*y_cur[IDX_GNHI] - k[8581]*y_cur[IDX_GNHI]; - data[jistart + 10362] = 0.0 - k[8522]*y_cur[IDX_GNHI]; - data[jistart + 10363] = 0.0 + k[7751] + k[8065]; - data[jistart + 10364] = 0.0 + k[8279]*y_cur[IDX_GHI] + - k[8454]*y_cur[IDX_GO2HI] - k[8458]*y_cur[IDX_GNHI]; - data[jistart + 10365] = 0.0 - k[7078] - k[7260] - k[7442] - k[7623] - - k[7624] - k[7900] - k[7901] - k[8280]*y_cur[IDX_GHI] - - k[8403]*y_cur[IDX_GCI] - k[8439]*y_cur[IDX_GOI] - - k[8458]*y_cur[IDX_GNI] - k[8475]*y_cur[IDX_GSI] - - k[8479]*y_cur[IDX_GCHI] - k[8480]*y_cur[IDX_GCHI] - - k[8521]*y_cur[IDX_GCH3CHOI] - k[8522]*y_cur[IDX_GH2COI] - - k[8523]*y_cur[IDX_GCH2I] - k[8524]*y_cur[IDX_GNHI] - - k[8524]*y_cur[IDX_GNHI] - k[8524]*y_cur[IDX_GNHI] - - k[8524]*y_cur[IDX_GNHI] - k[8525]*y_cur[IDX_GNOI] - - k[8526]*y_cur[IDX_GCOI] - k[8527]*y_cur[IDX_GCH2OHCHOI] - - k[8581]*y_cur[IDX_GHI] - k[8659]*y_cur[IDX_GCI] - - k[8687]*y_cur[IDX_GOI] - k[8743]*y_cur[IDX_GCH2I] - - k[8744]*y_cur[IDX_GCOI]; - data[jistart + 10366] = 0.0 + k[7630] + k[7632] + k[7907] + k[7909]; - data[jistart + 10367] = 0.0 + k[7635] + k[7637] + k[7916] + k[7918]; - data[jistart + 10368] = 0.0 - k[8525]*y_cur[IDX_GNHI]; - data[jistart + 10369] = 0.0 - k[8439]*y_cur[IDX_GNHI] - - k[8687]*y_cur[IDX_GNHI]; - data[jistart + 10370] = 0.0 + k[8454]*y_cur[IDX_GNI]; - data[jistart + 10371] = 0.0 - k[8475]*y_cur[IDX_GNHI]; - data[jistart + 10372] = 0.0 + k[6896]; - data[jistart + 10373] = 0.0 - k[8404]*y_cur[IDX_GNH2I]; - data[jistart + 10374] = 0.0 - k[8483]*y_cur[IDX_GNH2I] - - k[8717]*y_cur[IDX_GNH2I]; - data[jistart + 10375] = 0.0 + k[8527]*y_cur[IDX_GNHI] - - k[8538]*y_cur[IDX_GNH2I]; - data[jistart + 10376] = 0.0 + k[8521]*y_cur[IDX_GNHI] - - k[8535]*y_cur[IDX_GNH2I]; - data[jistart + 10377] = 0.0 + k[8280]*y_cur[IDX_GNHI] - - k[8281]*y_cur[IDX_GNH2I] - k[8582]*y_cur[IDX_GNH2I]; - data[jistart + 10378] = 0.0 - k[8372]*y_cur[IDX_GNH2I]; - data[jistart + 10379] = 0.0 + k[8522]*y_cur[IDX_GNHI] - - k[8534]*y_cur[IDX_GNH2I]; - data[jistart + 10380] = 0.0 - k[8537]*y_cur[IDX_GNH2I]; - data[jistart + 10381] = 0.0 - k[8536]*y_cur[IDX_GNH2I]; - data[jistart + 10382] = 0.0 + k[8280]*y_cur[IDX_GHI] + - k[8521]*y_cur[IDX_GCH3CHOI] + k[8522]*y_cur[IDX_GH2COI] + - k[8527]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 10383] = 0.0 - k[7079] - k[7261] - k[7443] - k[7630] - - k[7631] - k[7632] - k[7907] - k[7908] - k[7909] - - k[8281]*y_cur[IDX_GHI] - k[8372]*y_cur[IDX_GH2I] - - k[8404]*y_cur[IDX_GCI] - k[8440]*y_cur[IDX_GOI] - - k[8483]*y_cur[IDX_GCHI] - k[8530]*y_cur[IDX_GNOI] - - k[8534]*y_cur[IDX_GH2COI] - k[8535]*y_cur[IDX_GCH3CHOI] - - k[8536]*y_cur[IDX_GHCOOHI] - k[8537]*y_cur[IDX_GHCOOCH3I] - - k[8538]*y_cur[IDX_GCH2OHCHOI] - k[8582]*y_cur[IDX_GHI] - - k[8717]*y_cur[IDX_GCHI]; - data[jistart + 10384] = 0.0 + k[7739] + k[8050]; - data[jistart + 10385] = 0.0 + k[7634] + k[7636] + k[7915] + k[7917]; - data[jistart + 10386] = 0.0 - k[8530]*y_cur[IDX_GNH2I]; - data[jistart + 10387] = 0.0 - k[8440]*y_cur[IDX_GNH2I]; - data[jistart + 10388] = 0.0 + k[6897]; - data[jistart + 10389] = 0.0 - k[7144] - k[7326] - k[7508] - k[7739] - - k[8050]; - data[jistart + 10390] = 0.0 + k[6962]; - data[jistart + 10391] = 0.0 + k[8538]*y_cur[IDX_GNH2I]; - data[jistart + 10392] = 0.0 + k[8535]*y_cur[IDX_GNH2I]; - data[jistart + 10393] = 0.0 + k[8281]*y_cur[IDX_GNH2I]; - data[jistart + 10394] = 0.0 + k[8372]*y_cur[IDX_GNH2I]; - data[jistart + 10395] = 0.0 + k[8534]*y_cur[IDX_GNH2I]; - data[jistart + 10396] = 0.0 + k[8537]*y_cur[IDX_GNH2I]; - data[jistart + 10397] = 0.0 + k[8536]*y_cur[IDX_GNH2I]; - data[jistart + 10398] = 0.0 + k[8281]*y_cur[IDX_GHI] + - k[8372]*y_cur[IDX_GH2I] + k[8534]*y_cur[IDX_GH2COI] + - k[8535]*y_cur[IDX_GCH3CHOI] + k[8536]*y_cur[IDX_GHCOOHI] + - k[8537]*y_cur[IDX_GHCOOCH3I] + k[8538]*y_cur[IDX_GCH2OHCHOI]; - data[jistart + 10399] = 0.0 - k[7082] - k[7264] - k[7446] - k[7634] - - k[7635] - k[7636] - k[7637] - k[7915] - k[7916] - k[7917] - - k[7918]; - data[jistart + 10400] = 0.0 + k[6900]; - data[jistart + 10401] = 0.0 - k[8398]*y_cur[IDX_GNOI] - - k[8399]*y_cur[IDX_GNOI] - k[8658]*y_cur[IDX_GNOI]; - data[jistart + 10402] = 0.0 + k[8477]*y_cur[IDX_GHNOI] - - k[8481]*y_cur[IDX_GNOI]; - data[jistart + 10403] = 0.0 + k[8533]*y_cur[IDX_GHNOI]; - data[jistart + 10404] = 0.0 + k[8541]*y_cur[IDX_GHNOI]; - data[jistart + 10405] = 0.0 - k[8305]*y_cur[IDX_GNOI] + - k[8306]*y_cur[IDX_GHNOI] - k[8604]*y_cur[IDX_GNOI]; - data[jistart + 10406] = 0.0 + k[7752] + k[8066]; - data[jistart + 10407] = 0.0 + k[7694] + k[7992] + - k[8306]*y_cur[IDX_GHI] + k[8435]*y_cur[IDX_GOI] + - k[8477]*y_cur[IDX_GCHI] + k[8533]*y_cur[IDX_GCH2I] + - k[8541]*y_cur[IDX_GCH3I]; - data[jistart + 10408] = 0.0 + k[8461]*y_cur[IDX_GOI]; - data[jistart + 10409] = 0.0 + k[7756] + k[8071] + k[8073]; - data[jistart + 10410] = 0.0 - k[8525]*y_cur[IDX_GNOI]; - data[jistart + 10411] = 0.0 - k[8530]*y_cur[IDX_GNOI]; - data[jistart + 10412] = 0.0 - k[7107] - k[7289] - k[7471] - k[7690] - - k[7691] - k[7980] - k[7981] - k[8305]*y_cur[IDX_GHI] - - k[8398]*y_cur[IDX_GCI] - k[8399]*y_cur[IDX_GCI] - - k[8481]*y_cur[IDX_GCHI] - k[8525]*y_cur[IDX_GNHI] - - k[8530]*y_cur[IDX_GNH2I] - k[8604]*y_cur[IDX_GHI] - + data[jistart + 10012] = 0.0 - k[8369]*y_cur[IDX_GH2I] - k[8653]*y_cur[IDX_GH2I]; + data[jistart + 10013] = 0.0 + k[8278]*y_cur[IDX_GCH4I] + k[8291]*y_cur[IDX_GC2H6I] + + k[8298]*y_cur[IDX_GH2COI] + k[8306]*y_cur[IDX_GHNOI] + + k[8309]*y_cur[IDX_GH2O2I] + k[8313]*y_cur[IDX_GH2SI] + + k[8332]*y_cur[IDX_GCH3CHOI] + k[8337]*y_cur[IDX_GHCOOHI] + + k[8347]*y_cur[IDX_GHCOOCH3I] + k[8367]*y_cur[IDX_GCH2OHCHOI]; + data[jistart + 10014] = 0.0 + k[6889]; + data[jistart + 10015] = 0.0 + k[847]*y_cur[IDX_eM] + k[6784]*y_cur[IDX_GRAINM]; + data[jistart + 10016] = 0.0 + k[8669]*y_cur[IDX_GCI]; + data[jistart + 10017] = 0.0 + k[1073]*y_cur[IDX_eM] + k[6744]*y_cur[IDX_GRAINM]; + data[jistart + 10018] = 0.0 + k[7179] + k[7361] + k[7543]; + data[jistart + 10019] = 0.0 + k[5237]*y_cur[IDX_NI] + k[5363]*y_cur[IDX_OI]; + data[jistart + 10020] = 0.0 + k[1077]*y_cur[IDX_eM] + k[6787]*y_cur[IDX_GRAINM]; + data[jistart + 10021] = 0.0 + k[832]*y_cur[IDX_eM] + k[6741]*y_cur[IDX_GRAINM]; + data[jistart + 10022] = 0.0 + k[1354]*y_cur[IDX_CII] + k[3177]*y_cur[IDX_HeII] + k[5796] + + k[6100]; + data[jistart + 10023] = 0.0 + k[8705]*y_cur[IDX_GNI]; + data[jistart + 10024] = 0.0 + k[6197]; + data[jistart + 10025] = 0.0 + k[1063]*y_cur[IDX_eM] + k[6629]*y_cur[IDX_GRAINM]; + data[jistart + 10026] = 0.0 + k[3241]*y_cur[IDX_HeII]; + data[jistart + 10027] = 0.0 + k[1067]*y_cur[IDX_eM] + k[6638]*y_cur[IDX_GRAINM]; + data[jistart + 10028] = 0.0 + k[8705]*y_cur[IDX_GC3I]; + data[jistart + 10029] = 0.0 + k[4136]*y_cur[IDX_C3NM]; + data[jistart + 10030] = 0.0 + k[4139]*y_cur[IDX_C3NM]; + data[jistart + 10031] = 0.0 + k[4165]*y_cur[IDX_C3NM]; + data[jistart + 10032] = 0.0 + k[4146]*y_cur[IDX_C3NM]; + data[jistart + 10033] = 0.0 + k[112]*y_cur[IDX_NI]; + data[jistart + 10034] = 0.0 + k[4163]*y_cur[IDX_C3NM]; + data[jistart + 10035] = 0.0 + k[4164]*y_cur[IDX_C3NM]; + data[jistart + 10036] = 0.0 + k[4131]*y_cur[IDX_CII] + k[4132]*y_cur[IDX_C2H2II] + + k[4133]*y_cur[IDX_C2H3II] + k[4134]*y_cur[IDX_C4H2II] + + k[4135]*y_cur[IDX_C4H3II] + k[4136]*y_cur[IDX_C4SII] + + k[4137]*y_cur[IDX_CH2CCHII] + k[4138]*y_cur[IDX_CH3II] + + k[4139]*y_cur[IDX_CNCII] + k[4140]*y_cur[IDX_FeII] + + k[4141]*y_cur[IDX_HII] + k[4142]*y_cur[IDX_H2COII] + + k[4143]*y_cur[IDX_H2SII] + k[4144]*y_cur[IDX_H3II] + + k[4145]*y_cur[IDX_H3OII] + k[4146]*y_cur[IDX_HC2SII] + + k[4147]*y_cur[IDX_HCNHII] + k[4148]*y_cur[IDX_HCNHII] + + k[4149]*y_cur[IDX_HCOII] + k[4150]*y_cur[IDX_HCOII] + + k[4151]*y_cur[IDX_HeII] + k[4152]*y_cur[IDX_MgII] + + k[4153]*y_cur[IDX_NII] + k[4154]*y_cur[IDX_N2HII] + + k[4155]*y_cur[IDX_NH3II] + k[4156]*y_cur[IDX_NH4II] + + k[4157]*y_cur[IDX_NOII] + k[4158]*y_cur[IDX_NaII] + + k[4159]*y_cur[IDX_OII] + k[4160]*y_cur[IDX_SII] + + k[4161]*y_cur[IDX_SOII] + k[4162]*y_cur[IDX_SiII] + + k[4163]*y_cur[IDX_SiOII] + k[4164]*y_cur[IDX_SiOHII] + + k[4165]*y_cur[IDX_SiSII] + k[5721] + k[6005]; + data[jistart + 10037] = 0.0 - k[512]*y_cur[IDX_HeII] - k[2604]*y_cur[IDX_H3II] - + k[2774]*y_cur[IDX_H3OII] - k[2909]*y_cur[IDX_HCOII] - + k[3098]*y_cur[IDX_HeII] - k[4921]*y_cur[IDX_CI] - + k[5234]*y_cur[IDX_NI] - k[5358]*y_cur[IDX_OI] - + k[5593]*y_cur[IDX_eM] - k[5722] - k[6006] - k[6997]; + data[jistart + 10038] = 0.0 + k[4140]*y_cur[IDX_C3NM]; + data[jistart + 10039] = 0.0 + k[4152]*y_cur[IDX_C3NM]; + data[jistart + 10040] = 0.0 + k[4158]*y_cur[IDX_C3NM]; + data[jistart + 10041] = 0.0 + k[8669]*y_cur[IDX_GC2NI]; + data[jistart + 10042] = 0.0 + k[4135]*y_cur[IDX_C3NM]; + data[jistart + 10043] = 0.0 + k[4154]*y_cur[IDX_C3NM]; + data[jistart + 10044] = 0.0 + k[4161]*y_cur[IDX_C3NM]; + data[jistart + 10045] = 0.0 + k[4137]*y_cur[IDX_C3NM]; + data[jistart + 10046] = 0.0 + k[4143]*y_cur[IDX_C3NM]; + data[jistart + 10047] = 0.0 + k[4153]*y_cur[IDX_C3NM]; + data[jistart + 10048] = 0.0 + k[5233]*y_cur[IDX_NI]; + data[jistart + 10049] = 0.0 + k[4142]*y_cur[IDX_C3NM]; + data[jistart + 10050] = 0.0 + k[4157]*y_cur[IDX_C3NM]; + data[jistart + 10051] = 0.0 + k[4159]*y_cur[IDX_C3NM]; + data[jistart + 10052] = 0.0 + k[4134]*y_cur[IDX_C3NM]; + data[jistart + 10053] = 0.0 + k[4147]*y_cur[IDX_C3NM] + k[4148]*y_cur[IDX_C3NM]; + data[jistart + 10054] = 0.0 + k[4155]*y_cur[IDX_C3NM]; + data[jistart + 10055] = 0.0 + k[4156]*y_cur[IDX_C3NM]; + data[jistart + 10056] = 0.0 + k[4162]*y_cur[IDX_C3NM]; + data[jistart + 10057] = 0.0 + k[4160]*y_cur[IDX_C3NM]; + data[jistart + 10058] = 0.0 + k[4133]*y_cur[IDX_C3NM]; + data[jistart + 10059] = 0.0 + k[4873]*y_cur[IDX_C2I]; + data[jistart + 10060] = 0.0 + k[4873]*y_cur[IDX_HCNI]; + data[jistart + 10061] = 0.0 + k[4132]*y_cur[IDX_C3NM]; + data[jistart + 10062] = 0.0 + k[4138]*y_cur[IDX_C3NM]; + data[jistart + 10063] = 0.0 + k[112]*y_cur[IDX_C3M] + k[5233]*y_cur[IDX_C3HI] - + k[5234]*y_cur[IDX_C3NI] + k[5237]*y_cur[IDX_C4NI]; + data[jistart + 10064] = 0.0 - k[2774]*y_cur[IDX_C3NI] + k[4145]*y_cur[IDX_C3NM]; + data[jistart + 10065] = 0.0 - k[5358]*y_cur[IDX_C3NI] + k[5363]*y_cur[IDX_C4NI]; + data[jistart + 10066] = 0.0 - k[512]*y_cur[IDX_C3NI] - k[3098]*y_cur[IDX_C3NI] + + k[3177]*y_cur[IDX_CH3C3NI] + k[3241]*y_cur[IDX_HC5NI] + + k[4151]*y_cur[IDX_C3NM]; + data[jistart + 10067] = 0.0 + k[1354]*y_cur[IDX_CH3C3NI] + k[4131]*y_cur[IDX_C3NM]; + data[jistart + 10068] = 0.0 + k[4141]*y_cur[IDX_C3NM]; + data[jistart + 10069] = 0.0 - k[4921]*y_cur[IDX_C3NI]; + data[jistart + 10070] = 0.0 - k[2909]*y_cur[IDX_C3NI] + k[4149]*y_cur[IDX_C3NM] + + k[4150]*y_cur[IDX_C3NM]; + data[jistart + 10071] = 0.0 - k[2604]*y_cur[IDX_C3NI] + k[4144]*y_cur[IDX_C3NM]; + data[jistart + 10072] = 0.0 + k[6629]*y_cur[IDX_HC3NII] + k[6638]*y_cur[IDX_HC3NHII] + + k[6741]*y_cur[IDX_C4NII] + k[6744]*y_cur[IDX_HC4NII] + + k[6784]*y_cur[IDX_C5NII] + k[6787]*y_cur[IDX_HC5NII]; + data[jistart + 10073] = 0.0 + k[832]*y_cur[IDX_C4NII] + k[847]*y_cur[IDX_C5NII] + + k[1063]*y_cur[IDX_HC3NII] + k[1067]*y_cur[IDX_HC3NHII] + + k[1073]*y_cur[IDX_HC4NII] + k[1077]*y_cur[IDX_HC5NII] - + k[5593]*y_cur[IDX_C3NI]; + data[jistart + 10074] = 0.0 + k[3233]*y_cur[IDX_HeII]; + data[jistart + 10075] = 0.0 + k[1905]*y_cur[IDX_CI]; + data[jistart + 10076] = 0.0 + k[1913]*y_cur[IDX_CI]; + data[jistart + 10077] = 0.0 + k[1907]*y_cur[IDX_CI]; + data[jistart + 10078] = 0.0 + k[288]*y_cur[IDX_CHI]; + data[jistart + 10079] = 0.0 + k[293]*y_cur[IDX_CHI]; + data[jistart + 10080] = 0.0 + k[1903]*y_cur[IDX_CI]; + data[jistart + 10081] = 0.0 + k[287]*y_cur[IDX_CHI]; + data[jistart + 10082] = 0.0 + k[1910]*y_cur[IDX_CI]; + data[jistart + 10083] = 0.0 + k[443]*y_cur[IDX_CHI] + k[2374]*y_cur[IDX_CI]; + data[jistart + 10084] = 0.0 - k[1970]*y_cur[IDX_CHII] - k[1971]*y_cur[IDX_CHII]; + data[jistart + 10085] = 0.0 + k[294]*y_cur[IDX_CHI]; + data[jistart + 10086] = 0.0 + k[289]*y_cur[IDX_CHI]; + data[jistart + 10087] = 0.0 + k[1898]*y_cur[IDX_CI]; + data[jistart + 10088] = 0.0 - k[1937]*y_cur[IDX_CHII] - k[1938]*y_cur[IDX_CHII] - + k[1939]*y_cur[IDX_CHII]; + data[jistart + 10089] = 0.0 - k[1962]*y_cur[IDX_CHII]; + data[jistart + 10090] = 0.0 + k[3386]*y_cur[IDX_NI]; + data[jistart + 10091] = 0.0 + k[2836]*y_cur[IDX_HI] + k[6076]; + data[jistart + 10092] = 0.0 + k[297]*y_cur[IDX_CHI] + k[1914]*y_cur[IDX_CI]; + data[jistart + 10093] = 0.0 + k[291]*y_cur[IDX_CHI] + k[1899]*y_cur[IDX_CI]; + data[jistart + 10094] = 0.0 - k[250]*y_cur[IDX_FeI] - k[251]*y_cur[IDX_HCOI] - + k[252]*y_cur[IDX_MgI] - k[253]*y_cur[IDX_NH3I] - + k[254]*y_cur[IDX_NOI] - k[255]*y_cur[IDX_NaI] - k[256]*y_cur[IDX_SI] + - k[257]*y_cur[IDX_SiI] - k[906]*y_cur[IDX_eM] - + k[1890]*y_cur[IDX_CI] - k[1933]*y_cur[IDX_C2I] - + k[1934]*y_cur[IDX_C2H2I] - k[1935]*y_cur[IDX_C2HI] - + k[1936]*y_cur[IDX_CH2I] - k[1937]*y_cur[IDX_CH3OHI] - + k[1938]*y_cur[IDX_CH3OHI] - k[1939]*y_cur[IDX_CH3OHI] - + k[1940]*y_cur[IDX_CH4I] - k[1941]*y_cur[IDX_CH4I] - + k[1942]*y_cur[IDX_CH4I] - k[1943]*y_cur[IDX_CHI] - + k[1944]*y_cur[IDX_CNI] - k[1945]*y_cur[IDX_CNI] - + k[1946]*y_cur[IDX_CO2I] - k[1947]*y_cur[IDX_H2COI] - + k[1948]*y_cur[IDX_H2COI] - k[1949]*y_cur[IDX_H2COI] - + k[1950]*y_cur[IDX_H2COI] - k[1951]*y_cur[IDX_H2OI] - + k[1952]*y_cur[IDX_H2OI] - k[1953]*y_cur[IDX_H2OI] - + k[1954]*y_cur[IDX_H2SI] - k[1955]*y_cur[IDX_H2SI] - + k[1956]*y_cur[IDX_HCNI] - k[1957]*y_cur[IDX_HCNI] - + k[1958]*y_cur[IDX_HCNI] - k[1959]*y_cur[IDX_HCOI] - + k[1960]*y_cur[IDX_HNCI] - k[1961]*y_cur[IDX_NI] - + k[1962]*y_cur[IDX_NH2I] - k[1963]*y_cur[IDX_NH3I] - + k[1964]*y_cur[IDX_NH3I] - k[1965]*y_cur[IDX_NHI] - + k[1966]*y_cur[IDX_O2I] - k[1967]*y_cur[IDX_O2I] - + k[1968]*y_cur[IDX_O2I] - k[1969]*y_cur[IDX_OI] - + k[1970]*y_cur[IDX_OCSI] - k[1971]*y_cur[IDX_OCSI] - + k[1972]*y_cur[IDX_OHI] - k[1973]*y_cur[IDX_SI] - + k[1974]*y_cur[IDX_SI] - k[2427]*y_cur[IDX_H2I] - + k[2835]*y_cur[IDX_HI] - k[5776] - k[6073] - + k[6315]*y_cur[IDX_GRAINM]; + data[jistart + 10095] = 0.0 - k[1946]*y_cur[IDX_CHII]; + data[jistart + 10096] = 0.0 + k[296]*y_cur[IDX_CHI]; + data[jistart + 10097] = 0.0 - k[250]*y_cur[IDX_CHII]; + data[jistart + 10098] = 0.0 - k[252]*y_cur[IDX_CHII]; + data[jistart + 10099] = 0.0 - k[255]*y_cur[IDX_CHII]; + data[jistart + 10100] = 0.0 - k[1965]*y_cur[IDX_CHII]; + data[jistart + 10101] = 0.0 + k[1909]*y_cur[IDX_CI]; + data[jistart + 10102] = 0.0 + k[292]*y_cur[IDX_CHI]; + data[jistart + 10103] = 0.0 + k[290]*y_cur[IDX_CHI]; + data[jistart + 10104] = 0.0 + k[295]*y_cur[IDX_CHI]; + data[jistart + 10105] = 0.0 - k[1936]*y_cur[IDX_CHII] + k[2314]*y_cur[IDX_HII] + + k[3161]*y_cur[IDX_HeII]; + data[jistart + 10106] = 0.0 - k[1960]*y_cur[IDX_CHII]; + data[jistart + 10107] = 0.0 - k[1966]*y_cur[IDX_CHII] - k[1967]*y_cur[IDX_CHII] - + k[1968]*y_cur[IDX_CHII]; + data[jistart + 10108] = 0.0 - k[1954]*y_cur[IDX_CHII] - k[1955]*y_cur[IDX_CHII]; + data[jistart + 10109] = 0.0 - k[257]*y_cur[IDX_CHII]; + data[jistart + 10110] = 0.0 - k[254]*y_cur[IDX_CHII]; + data[jistart + 10111] = 0.0 - k[251]*y_cur[IDX_CHII] + k[1408]*y_cur[IDX_CII] - + k[1959]*y_cur[IDX_CHII] + k[3251]*y_cur[IDX_HeII]; + data[jistart + 10112] = 0.0 - k[1940]*y_cur[IDX_CHII] - k[1941]*y_cur[IDX_CHII] - + k[1942]*y_cur[IDX_CHII] + k[3198]*y_cur[IDX_HeII]; + data[jistart + 10113] = 0.0 - k[1935]*y_cur[IDX_CHII] + k[3087]*y_cur[IDX_HeII]; + data[jistart + 10114] = 0.0 - k[1947]*y_cur[IDX_CHII] - k[1948]*y_cur[IDX_CHII] - + k[1949]*y_cur[IDX_CHII] - k[1950]*y_cur[IDX_CHII]; + data[jistart + 10115] = 0.0 - k[1956]*y_cur[IDX_CHII] - k[1957]*y_cur[IDX_CHII] - + k[1958]*y_cur[IDX_CHII] + k[3248]*y_cur[IDX_HeII]; + data[jistart + 10116] = 0.0 + k[170]*y_cur[IDX_CII] + k[287]*y_cur[IDX_C2II] + + k[288]*y_cur[IDX_CNII] + k[289]*y_cur[IDX_COII] + + k[290]*y_cur[IDX_H2COII] + k[291]*y_cur[IDX_H2OII] + + k[292]*y_cur[IDX_NII] + k[293]*y_cur[IDX_N2II] + + k[294]*y_cur[IDX_NH2II] + k[295]*y_cur[IDX_OII] + + k[296]*y_cur[IDX_O2II] + k[297]*y_cur[IDX_OHII] + + k[372]*y_cur[IDX_HII] + k[443]*y_cur[IDX_H2II] + + k[515]*y_cur[IDX_HeII] - k[1943]*y_cur[IDX_CHII] + k[6132]; + data[jistart + 10117] = 0.0 - k[256]*y_cur[IDX_CHII] - k[1973]*y_cur[IDX_CHII] - + k[1974]*y_cur[IDX_CHII]; + data[jistart + 10118] = 0.0 - k[1933]*y_cur[IDX_CHII]; + data[jistart + 10119] = 0.0 - k[1972]*y_cur[IDX_CHII]; + data[jistart + 10120] = 0.0 - k[253]*y_cur[IDX_CHII] - k[1963]*y_cur[IDX_CHII] - + k[1964]*y_cur[IDX_CHII]; + data[jistart + 10121] = 0.0 + k[3389]*y_cur[IDX_NI]; + data[jistart + 10122] = 0.0 + k[6095]; + data[jistart + 10123] = 0.0 - k[1934]*y_cur[IDX_CHII] + k[3076]*y_cur[IDX_HeII]; + data[jistart + 10124] = 0.0 - k[1944]*y_cur[IDX_CHII] - k[1945]*y_cur[IDX_CHII]; + data[jistart + 10125] = 0.0 + k[3176]*y_cur[IDX_HeII]; + data[jistart + 10126] = 0.0 - k[1961]*y_cur[IDX_CHII] + k[3386]*y_cur[IDX_C2HII] + + k[3389]*y_cur[IDX_C2H2II]; + data[jistart + 10127] = 0.0 - k[1969]*y_cur[IDX_CHII]; + data[jistart + 10128] = 0.0 + k[515]*y_cur[IDX_CHI] + k[3076]*y_cur[IDX_C2H2I] + + k[3087]*y_cur[IDX_C2HI] + k[3161]*y_cur[IDX_CH2I] + + k[3176]*y_cur[IDX_CH3I] + k[3198]*y_cur[IDX_CH4I] + + k[3233]*y_cur[IDX_HC2PI] + k[3248]*y_cur[IDX_HCNI] + + k[3251]*y_cur[IDX_HCOI]; + data[jistart + 10129] = 0.0 + k[170]*y_cur[IDX_CHI] + k[1408]*y_cur[IDX_HCOI] + + k[2398]*y_cur[IDX_H2I] + k[5569]*y_cur[IDX_HI]; + data[jistart + 10130] = 0.0 - k[1951]*y_cur[IDX_CHII] - k[1952]*y_cur[IDX_CHII] - + k[1953]*y_cur[IDX_CHII]; + data[jistart + 10131] = 0.0 + k[372]*y_cur[IDX_CHI] + k[2314]*y_cur[IDX_CH2I]; + data[jistart + 10132] = 0.0 - k[1890]*y_cur[IDX_CHII] + k[1898]*y_cur[IDX_CH5II] + + k[1899]*y_cur[IDX_H2OII] + k[1903]*y_cur[IDX_HCNII] + + k[1904]*y_cur[IDX_HCOII] + k[1905]*y_cur[IDX_HCO2II] + + k[1907]*y_cur[IDX_HNOII] + k[1909]*y_cur[IDX_N2HII] + + k[1910]*y_cur[IDX_NHII] + k[1913]*y_cur[IDX_O2HII] + + k[1914]*y_cur[IDX_OHII] + k[2374]*y_cur[IDX_H2II] + + k[2632]*y_cur[IDX_H3II]; + data[jistart + 10133] = 0.0 + k[1904]*y_cur[IDX_CI]; + data[jistart + 10134] = 0.0 + k[2632]*y_cur[IDX_CI]; + data[jistart + 10135] = 0.0 - k[6315]*y_cur[IDX_CHII]; + data[jistart + 10136] = 0.0 + k[2398]*y_cur[IDX_CII] - k[2427]*y_cur[IDX_CHII]; + data[jistart + 10137] = 0.0 - k[906]*y_cur[IDX_CHII]; + data[jistart + 10138] = 0.0 - k[2835]*y_cur[IDX_CHII] + k[2836]*y_cur[IDX_CH2II] + + k[5569]*y_cur[IDX_CII]; + data[jistart + 10139] = 0.0 + k[7160] + k[7342] + k[7524]; + data[jistart + 10140] = 0.0 + k[1286]*y_cur[IDX_eM] + k[6713]*y_cur[IDX_GRAINM]; + data[jistart + 10141] = 0.0 + k[1101]*y_cur[IDX_eM] + k[6574]*y_cur[IDX_GRAINM]; + data[jistart + 10142] = 0.0 + k[983]*y_cur[IDX_eM] + k[6700]*y_cur[IDX_GRAINM]; + data[jistart + 10143] = 0.0 + k[2290]*y_cur[IDX_COI]; + data[jistart + 10144] = 0.0 + k[5858]; + data[jistart + 10145] = 0.0 + k[5129]*y_cur[IDX_COI]; + data[jistart + 10146] = 0.0 + k[5131]*y_cur[IDX_COI]; + data[jistart + 10147] = 0.0 + k[315]*y_cur[IDX_CO2II] + k[2282]*y_cur[IDX_COII]; + data[jistart + 10148] = 0.0 + k[5127]*y_cur[IDX_COI]; + data[jistart + 10149] = 0.0 + k[5128]*y_cur[IDX_COI]; + data[jistart + 10150] = 0.0 + k[5331]*y_cur[IDX_NOI] + k[5335]*y_cur[IDX_O2I]; + data[jistart + 10151] = 0.0 + k[228]*y_cur[IDX_C2H2I] + k[238]*y_cur[IDX_C2H4I] + + k[286]*y_cur[IDX_CH4I] + k[314]*y_cur[IDX_OCSI] + + k[315]*y_cur[IDX_SO2I] + k[479]*y_cur[IDX_H2OI] + + k[484]*y_cur[IDX_H2SI] + k[603]*y_cur[IDX_NH3I] + + k[623]*y_cur[IDX_NOI] + k[678]*y_cur[IDX_O2I] + k[683]*y_cur[IDX_OI]; + data[jistart + 10152] = 0.0 + k[8693]*y_cur[IDX_GOI]; + data[jistart + 10153] = 0.0 + k[1098]*y_cur[IDX_eM] + k[1567]*y_cur[IDX_C2H2I] + + k[1905]*y_cur[IDX_CI] + k[2116]*y_cur[IDX_CH3CNI] + + k[2201]*y_cur[IDX_CH4I] + k[2285]*y_cur[IDX_COI] + + k[2548]*y_cur[IDX_H2OI] + k[3585]*y_cur[IDX_NH3I] + + k[6566]*y_cur[IDX_GRAINM]; + data[jistart + 10154] = 0.0 - k[3811]*y_cur[IDX_CO2I]; + data[jistart + 10155] = 0.0 + k[2116]*y_cur[IDX_HCO2II]; + data[jistart + 10156] = 0.0 - k[3677]*y_cur[IDX_CO2I]; + data[jistart + 10157] = 0.0 - k[2139]*y_cur[IDX_CO2I]; + data[jistart + 10158] = 0.0 - k[3049]*y_cur[IDX_CO2I]; + data[jistart + 10159] = 0.0 - k[298]*y_cur[IDX_CO2I] - k[2269]*y_cur[IDX_CO2I] - + k[2270]*y_cur[IDX_CO2I]; + data[jistart + 10160] = 0.0 + k[8693]*y_cur[IDX_GCOI]; + data[jistart + 10161] = 0.0 - k[564]*y_cur[IDX_CO2I]; + data[jistart + 10162] = 0.0 - k[2853]*y_cur[IDX_CO2I]; + data[jistart + 10163] = 0.0 - k[3482]*y_cur[IDX_CO2I] - k[3483]*y_cur[IDX_CO2I] - + k[3484]*y_cur[IDX_CO2I]; + data[jistart + 10164] = 0.0 - k[2382]*y_cur[IDX_CO2I]; + data[jistart + 10165] = 0.0 + k[314]*y_cur[IDX_CO2II] + k[3649]*y_cur[IDX_OII] + + k[3858]*y_cur[IDX_SOII] + k[5430]*y_cur[IDX_OI]; + data[jistart + 10166] = 0.0 - k[307]*y_cur[IDX_CO2I] + k[2282]*y_cur[IDX_SO2I]; + data[jistart + 10167] = 0.0 - k[2223]*y_cur[IDX_CO2I]; + data[jistart + 10168] = 0.0 - k[3]*y_cur[IDX_CO2I] + k[7]*y_cur[IDX_O2I]; + data[jistart + 10169] = 0.0 + k[124]*y_cur[IDX_COI]; + data[jistart + 10170] = 0.0 - k[1753]*y_cur[IDX_CO2I]; + data[jistart + 10171] = 0.0 + k[2292]*y_cur[IDX_COI]; + data[jistart + 10172] = 0.0 - k[1468]*y_cur[IDX_CO2I]; + data[jistart + 10173] = 0.0 - k[1978]*y_cur[IDX_CO2I]; + data[jistart + 10174] = 0.0 - k[3776]*y_cur[IDX_CO2I]; + data[jistart + 10175] = 0.0 - k[1946]*y_cur[IDX_CO2I]; + data[jistart + 10176] = 0.0 - k[3]*y_cur[IDX_CM] - k[298]*y_cur[IDX_CNII] - + k[307]*y_cur[IDX_COII] - k[516]*y_cur[IDX_HeII] - + k[548]*y_cur[IDX_NII] - k[564]*y_cur[IDX_N2II] - + k[1387]*y_cur[IDX_CII] - k[1468]*y_cur[IDX_C2HII] - + k[1753]*y_cur[IDX_C3HII] - k[1946]*y_cur[IDX_CHII] - + k[1978]*y_cur[IDX_CH2II] - k[2139]*y_cur[IDX_CH4II] - + k[2223]*y_cur[IDX_CH5II] - k[2269]*y_cur[IDX_CNII] - + k[2270]*y_cur[IDX_CNII] - k[2334]*y_cur[IDX_HII] - + k[2382]*y_cur[IDX_H2II] - k[2674]*y_cur[IDX_H3II] - + k[2853]*y_cur[IDX_HCNII] - k[3049]*y_cur[IDX_HNOII] - + k[3207]*y_cur[IDX_HeII] - k[3208]*y_cur[IDX_HeII] - + k[3209]*y_cur[IDX_HeII] - k[3210]*y_cur[IDX_HeII] - + k[3343]*y_cur[IDX_NII] - k[3372]*y_cur[IDX_N2HII] - + k[3482]*y_cur[IDX_NHII] - k[3483]*y_cur[IDX_NHII] - + k[3484]*y_cur[IDX_NHII] - k[3640]*y_cur[IDX_OII] - + k[3677]*y_cur[IDX_O2HII] - k[3776]*y_cur[IDX_OHII] - + k[3811]*y_cur[IDX_PII] - k[5075]*y_cur[IDX_CHI] - + k[5162]*y_cur[IDX_HI] - k[5262]*y_cur[IDX_NI] - + k[5390]*y_cur[IDX_OI] - k[5491]*y_cur[IDX_SiI] - k[5825] - k[6137] - + k[6978]; + data[jistart + 10177] = 0.0 - k[3372]*y_cur[IDX_CO2I]; + data[jistart + 10178] = 0.0 + k[3858]*y_cur[IDX_OCSI]; + data[jistart + 10179] = 0.0 - k[548]*y_cur[IDX_CO2I] - k[3343]*y_cur[IDX_CO2I]; + data[jistart + 10180] = 0.0 - k[3640]*y_cur[IDX_CO2I] + k[3649]*y_cur[IDX_OCSI]; + data[jistart + 10181] = 0.0 + k[5007]*y_cur[IDX_O2I] + k[5008]*y_cur[IDX_O2I]; + data[jistart + 10182] = 0.0 + k[238]*y_cur[IDX_CO2II]; + data[jistart + 10183] = 0.0 + k[7]*y_cur[IDX_CM] + k[678]*y_cur[IDX_CO2II] + + k[5007]*y_cur[IDX_CH2I] + k[5008]*y_cur[IDX_CH2I] + + k[5086]*y_cur[IDX_CHI] + k[5087]*y_cur[IDX_CHI] + + k[5130]*y_cur[IDX_COI] + k[5208]*y_cur[IDX_HCOI] + + k[5335]*y_cur[IDX_OCNI]; + data[jistart + 10184] = 0.0 + k[484]*y_cur[IDX_CO2II]; + data[jistart + 10185] = 0.0 - k[5491]*y_cur[IDX_CO2I]; + data[jistart + 10186] = 0.0 + k[623]*y_cur[IDX_CO2II] + k[5331]*y_cur[IDX_OCNI]; + data[jistart + 10187] = 0.0 + k[5208]*y_cur[IDX_O2I] + k[5405]*y_cur[IDX_OI]; + data[jistart + 10188] = 0.0 + k[286]*y_cur[IDX_CO2II] + k[2201]*y_cur[IDX_HCO2II]; + data[jistart + 10189] = 0.0 - k[5075]*y_cur[IDX_CO2I] + k[5086]*y_cur[IDX_O2I] + + k[5087]*y_cur[IDX_O2I]; + data[jistart + 10190] = 0.0 + k[5461]*y_cur[IDX_COI]; + data[jistart + 10191] = 0.0 + k[603]*y_cur[IDX_CO2II] + k[3585]*y_cur[IDX_HCO2II]; + data[jistart + 10192] = 0.0 + k[228]*y_cur[IDX_CO2II] + k[1567]*y_cur[IDX_HCO2II]; + data[jistart + 10193] = 0.0 - k[5262]*y_cur[IDX_CO2I]; + data[jistart + 10194] = 0.0 + k[683]*y_cur[IDX_CO2II] - k[5390]*y_cur[IDX_CO2I] + + k[5405]*y_cur[IDX_HCOI] + k[5430]*y_cur[IDX_OCSI]; + data[jistart + 10195] = 0.0 - k[516]*y_cur[IDX_CO2I] - k[3207]*y_cur[IDX_CO2I] - + k[3208]*y_cur[IDX_CO2I] - k[3209]*y_cur[IDX_CO2I] - + k[3210]*y_cur[IDX_CO2I]; + data[jistart + 10196] = 0.0 - k[1387]*y_cur[IDX_CO2I]; + data[jistart + 10197] = 0.0 + k[479]*y_cur[IDX_CO2II] + k[2548]*y_cur[IDX_HCO2II]; + data[jistart + 10198] = 0.0 - k[2334]*y_cur[IDX_CO2I]; + data[jistart + 10199] = 0.0 + k[1905]*y_cur[IDX_HCO2II]; + data[jistart + 10200] = 0.0 - k[2674]*y_cur[IDX_CO2I]; + data[jistart + 10201] = 0.0 + k[124]*y_cur[IDX_OM] + k[2285]*y_cur[IDX_HCO2II] + + k[2290]*y_cur[IDX_SO2II] + k[2292]*y_cur[IDX_SiOII] + + k[5127]*y_cur[IDX_HNOI] + k[5128]*y_cur[IDX_N2OI] + + k[5129]*y_cur[IDX_NO2I] + k[5130]*y_cur[IDX_O2I] + + k[5131]*y_cur[IDX_O2HI] + k[5461]*y_cur[IDX_OHI]; + data[jistart + 10202] = 0.0 + k[6566]*y_cur[IDX_HCO2II] + k[6574]*y_cur[IDX_HCOOHII] + + k[6700]*y_cur[IDX_HCOOCH3II] + k[6713]*y_cur[IDX_CH3COOHII]; + data[jistart + 10203] = 0.0 + k[983]*y_cur[IDX_HCOOCH3II] + k[1098]*y_cur[IDX_HCO2II] + + k[1101]*y_cur[IDX_HCOOHII] + k[1286]*y_cur[IDX_CH3COOHII]; + data[jistart + 10204] = 0.0 - k[5162]*y_cur[IDX_CO2I]; + data[jistart + 10205] = 0.0 + k[679]*y_cur[IDX_O2I]; + data[jistart + 10206] = 0.0 + k[680]*y_cur[IDX_O2I]; + data[jistart + 10207] = 0.0 - k[676]*y_cur[IDX_O2II]; + data[jistart + 10208] = 0.0 - k[671]*y_cur[IDX_O2II] - k[3664]*y_cur[IDX_O2II]; + data[jistart + 10209] = 0.0 - k[675]*y_cur[IDX_O2II] - k[3666]*y_cur[IDX_O2II]; + data[jistart + 10210] = 0.0 + k[678]*y_cur[IDX_O2I] + k[3730]*y_cur[IDX_OI]; + data[jistart + 10211] = 0.0 + k[283]*y_cur[IDX_O2I]; + data[jistart + 10212] = 0.0 - k[669]*y_cur[IDX_O2II] - k[3656]*y_cur[IDX_O2II] - + k[3657]*y_cur[IDX_O2II]; + data[jistart + 10213] = 0.0 + k[304]*y_cur[IDX_O2I]; + data[jistart + 10214] = 0.0 + k[570]*y_cur[IDX_O2I]; + data[jistart + 10215] = 0.0 + k[495]*y_cur[IDX_O2I]; + data[jistart + 10216] = 0.0 - k[670]*y_cur[IDX_O2II] - k[3658]*y_cur[IDX_O2II] - + k[3659]*y_cur[IDX_O2II] - k[3660]*y_cur[IDX_O2II] - + k[3661]*y_cur[IDX_O2II] - k[3662]*y_cur[IDX_O2II] - + k[3663]*y_cur[IDX_O2II]; + data[jistart + 10217] = 0.0 + k[578]*y_cur[IDX_O2I]; + data[jistart + 10218] = 0.0 + k[455]*y_cur[IDX_O2I]; + data[jistart + 10219] = 0.0 + k[312]*y_cur[IDX_O2I]; + data[jistart + 10220] = 0.0 - k[672]*y_cur[IDX_O2II] - k[3665]*y_cur[IDX_O2II]; + data[jistart + 10221] = 0.0 - k[590]*y_cur[IDX_O2II]; + data[jistart + 10222] = 0.0 + k[694]*y_cur[IDX_O2I] + k[3750]*y_cur[IDX_OI]; + data[jistart + 10223] = 0.0 + k[474]*y_cur[IDX_O2I] + k[3733]*y_cur[IDX_OI]; + data[jistart + 10224] = 0.0 + k[3209]*y_cur[IDX_HeII] + k[3640]*y_cur[IDX_OII]; + data[jistart + 10225] = 0.0 - k[211]*y_cur[IDX_C2I] - k[240]*y_cur[IDX_C2H4I] - + k[248]*y_cur[IDX_CI] - k[267]*y_cur[IDX_CH2I] - + k[296]*y_cur[IDX_CHI] - k[461]*y_cur[IDX_H2COI] - + k[502]*y_cur[IDX_HCOI] - k[537]*y_cur[IDX_MgI] - + k[590]*y_cur[IDX_NH2I] - k[611]*y_cur[IDX_NH3I] - + k[628]*y_cur[IDX_NOI] - k[642]*y_cur[IDX_NaI] - + k[668]*y_cur[IDX_C2H2I] - k[669]*y_cur[IDX_CH2CCH2I] - + k[670]*y_cur[IDX_CH3CHCH2I] - k[671]*y_cur[IDX_CH3OCH3I] - + k[672]*y_cur[IDX_CH3OHI] - k[673]*y_cur[IDX_FeI] - + k[674]*y_cur[IDX_H2SI] - k[675]*y_cur[IDX_HCOOHI] - + k[676]*y_cur[IDX_NO2I] - k[677]*y_cur[IDX_SI] - + k[722]*y_cur[IDX_SiI] - k[1174]*y_cur[IDX_eM] - + k[1462]*y_cur[IDX_C2I] - k[1912]*y_cur[IDX_CI] - + k[2014]*y_cur[IDX_CH2I] - k[2208]*y_cur[IDX_CH4I] - + k[2262]*y_cur[IDX_CHI] - k[2498]*y_cur[IDX_H2COI] - + k[3010]*y_cur[IDX_HCOI] - k[3465]*y_cur[IDX_NI] - + k[3620]*y_cur[IDX_NHI] - k[3621]*y_cur[IDX_NHI] - + k[3654]*y_cur[IDX_C2H2I] - k[3655]*y_cur[IDX_C2H2I] - + k[3656]*y_cur[IDX_CH2CCH2I] - k[3657]*y_cur[IDX_CH2CCH2I] - + k[3658]*y_cur[IDX_CH3CHCH2I] - k[3659]*y_cur[IDX_CH3CHCH2I] - + k[3660]*y_cur[IDX_CH3CHCH2I] - k[3661]*y_cur[IDX_CH3CHCH2I] - + k[3662]*y_cur[IDX_CH3CHCH2I] - k[3663]*y_cur[IDX_CH3CHCH2I] - + k[3664]*y_cur[IDX_CH3OCH3I] - k[3665]*y_cur[IDX_CH3OHI] - + k[3666]*y_cur[IDX_HCOOHI] - k[3667]*y_cur[IDX_SI] - k[6233] - + k[6425]*y_cur[IDX_GRAINM]; + data[jistart + 10226] = 0.0 - k[673]*y_cur[IDX_O2II]; + data[jistart + 10227] = 0.0 - k[537]*y_cur[IDX_O2II]; + data[jistart + 10228] = 0.0 - k[642]*y_cur[IDX_O2II]; + data[jistart + 10229] = 0.0 - k[3620]*y_cur[IDX_O2II] - k[3621]*y_cur[IDX_O2II]; + data[jistart + 10230] = 0.0 + k[561]*y_cur[IDX_O2I]; + data[jistart + 10231] = 0.0 + k[662]*y_cur[IDX_O2I] + k[3640]*y_cur[IDX_CO2I] + + k[3650]*y_cur[IDX_OHI]; + data[jistart + 10232] = 0.0 - k[267]*y_cur[IDX_O2II] - k[2014]*y_cur[IDX_O2II]; + data[jistart + 10233] = 0.0 - k[240]*y_cur[IDX_O2II]; + data[jistart + 10234] = 0.0 + k[283]*y_cur[IDX_CH4II] + k[304]*y_cur[IDX_CNII] + + k[312]*y_cur[IDX_COII] + k[405]*y_cur[IDX_HII] + + k[455]*y_cur[IDX_H2II] + k[474]*y_cur[IDX_H2OII] + + k[495]*y_cur[IDX_HCNII] + k[525]*y_cur[IDX_HeII] + + k[561]*y_cur[IDX_NII] + k[570]*y_cur[IDX_N2II] + + k[578]*y_cur[IDX_NHII] + k[662]*y_cur[IDX_OII] + + k[678]*y_cur[IDX_CO2II] + k[679]*y_cur[IDX_ClII] + + k[680]*y_cur[IDX_SO2II] + k[694]*y_cur[IDX_OHII] + k[5897] + k[6235]; + data[jistart + 10235] = 0.0 - k[674]*y_cur[IDX_O2II]; + data[jistart + 10236] = 0.0 - k[722]*y_cur[IDX_O2II]; + data[jistart + 10237] = 0.0 - k[628]*y_cur[IDX_O2II]; + data[jistart + 10238] = 0.0 - k[502]*y_cur[IDX_O2II] - k[3010]*y_cur[IDX_O2II]; + data[jistart + 10239] = 0.0 - k[2208]*y_cur[IDX_O2II]; + data[jistart + 10240] = 0.0 - k[461]*y_cur[IDX_O2II] - k[2498]*y_cur[IDX_O2II]; + data[jistart + 10241] = 0.0 - k[296]*y_cur[IDX_O2II] - k[2262]*y_cur[IDX_O2II]; + data[jistart + 10242] = 0.0 - k[677]*y_cur[IDX_O2II] - k[3667]*y_cur[IDX_O2II]; + data[jistart + 10243] = 0.0 - k[211]*y_cur[IDX_O2II] - k[1462]*y_cur[IDX_O2II]; + data[jistart + 10244] = 0.0 + k[3650]*y_cur[IDX_OII]; + data[jistart + 10245] = 0.0 - k[611]*y_cur[IDX_O2II]; + data[jistart + 10246] = 0.0 - k[668]*y_cur[IDX_O2II] - k[3654]*y_cur[IDX_O2II] - + k[3655]*y_cur[IDX_O2II]; + data[jistart + 10247] = 0.0 - k[3465]*y_cur[IDX_O2II]; + data[jistart + 10248] = 0.0 + k[3730]*y_cur[IDX_CO2II] + k[3733]*y_cur[IDX_H2OII] + + k[3750]*y_cur[IDX_OHII]; + data[jistart + 10249] = 0.0 + k[525]*y_cur[IDX_O2I] + k[3209]*y_cur[IDX_CO2I]; + data[jistart + 10250] = 0.0 + k[405]*y_cur[IDX_O2I]; + data[jistart + 10251] = 0.0 - k[248]*y_cur[IDX_O2II] - k[1912]*y_cur[IDX_O2II]; + data[jistart + 10252] = 0.0 - k[6425]*y_cur[IDX_O2II]; + data[jistart + 10253] = 0.0 - k[1174]*y_cur[IDX_O2II]; + data[jistart + 10254] = 0.0 + k[8648]*y_cur[IDX_GHI]; + data[jistart + 10255] = 0.0 + k[7247] + k[7429] + k[7611]; + data[jistart + 10256] = 0.0 + k[8683]*y_cur[IDX_GCI]; + data[jistart + 10257] = 0.0 + k[732]*y_cur[IDX_eM] + k[6874]*y_cur[IDX_GRAINM]; + data[jistart + 10258] = 0.0 + k[4941]*y_cur[IDX_CI]; + data[jistart + 10259] = 0.0 + k[5690] + k[5959]; + data[jistart + 10260] = 0.0 + k[3961]*y_cur[IDX_C10HM]; + data[jistart + 10261] = 0.0 + k[3964]*y_cur[IDX_C10HM]; + data[jistart + 10262] = 0.0 + k[3990]*y_cur[IDX_C10HM]; + data[jistart + 10263] = 0.0 + k[3971]*y_cur[IDX_C10HM]; + data[jistart + 10264] = 0.0 + k[3956]*y_cur[IDX_CII] + k[3957]*y_cur[IDX_C2H2II] + + k[3958]*y_cur[IDX_C2H3II] + k[3959]*y_cur[IDX_C4H2II] + + k[3960]*y_cur[IDX_C4H3II] + k[3961]*y_cur[IDX_C4SII] + + k[3962]*y_cur[IDX_CH2CCHII] + k[3963]*y_cur[IDX_CH3II] + + k[3964]*y_cur[IDX_CNCII] + k[3965]*y_cur[IDX_FeII] + + k[3966]*y_cur[IDX_HII] + k[3967]*y_cur[IDX_H2COII] + + k[3968]*y_cur[IDX_H2SII] + k[3969]*y_cur[IDX_H3II] + + k[3970]*y_cur[IDX_H3OII] + k[3971]*y_cur[IDX_HC2SII] + + k[3972]*y_cur[IDX_HCNHII] + k[3973]*y_cur[IDX_HCNHII] + + k[3974]*y_cur[IDX_HCOII] + k[3975]*y_cur[IDX_HCOII] + + k[3976]*y_cur[IDX_HeII] + k[3977]*y_cur[IDX_MgII] + + k[3978]*y_cur[IDX_NII] + k[3979]*y_cur[IDX_N2HII] + + k[3980]*y_cur[IDX_NH3II] + k[3981]*y_cur[IDX_NH4II] + + k[3982]*y_cur[IDX_NOII] + k[3983]*y_cur[IDX_NaII] + + k[3984]*y_cur[IDX_OII] + k[3985]*y_cur[IDX_SII] + + k[3986]*y_cur[IDX_SOII] + k[3987]*y_cur[IDX_SiII] + + k[3988]*y_cur[IDX_SiOII] + k[3989]*y_cur[IDX_SiOHII] + + k[3990]*y_cur[IDX_SiSII] + k[5689] + k[5956]; + data[jistart + 10265] = 0.0 + k[54]*y_cur[IDX_CI]; + data[jistart + 10266] = 0.0 + k[85]*y_cur[IDX_HI]; + data[jistart + 10267] = 0.0 + k[3988]*y_cur[IDX_C10HM]; + data[jistart + 10268] = 0.0 + k[3989]*y_cur[IDX_C10HM]; + data[jistart + 10269] = 0.0 - k[147]*y_cur[IDX_CII] - k[322]*y_cur[IDX_HII] - + k[507]*y_cur[IDX_HeII] - k[1298]*y_cur[IDX_CII] - + k[1299]*y_cur[IDX_CII] - k[2585]*y_cur[IDX_H3II] - + k[2901]*y_cur[IDX_HCOII] - k[3067]*y_cur[IDX_HeII] - + k[3068]*y_cur[IDX_HeII] - k[3069]*y_cur[IDX_HeII] - + k[3070]*y_cur[IDX_HeII] - k[3071]*y_cur[IDX_HeII] - + k[3072]*y_cur[IDX_HeII] - k[4910]*y_cur[IDX_CI] - + k[5341]*y_cur[IDX_OI] - k[5588]*y_cur[IDX_eM] - k[5691] - k[5961] - + k[5962] - k[5963] - k[5964] - k[5965] - k[5966] - k[5967] - k[5968] + - k[7065]; + data[jistart + 10270] = 0.0 + k[3965]*y_cur[IDX_C10HM]; + data[jistart + 10271] = 0.0 + k[3977]*y_cur[IDX_C10HM]; + data[jistart + 10272] = 0.0 + k[3983]*y_cur[IDX_C10HM]; + data[jistart + 10273] = 0.0 + k[8683]*y_cur[IDX_GC9HI]; + data[jistart + 10274] = 0.0 + k[3960]*y_cur[IDX_C10HM]; + data[jistart + 10275] = 0.0 + k[3979]*y_cur[IDX_C10HM]; + data[jistart + 10276] = 0.0 + k[3986]*y_cur[IDX_C10HM]; + data[jistart + 10277] = 0.0 + k[3962]*y_cur[IDX_C10HM]; + data[jistart + 10278] = 0.0 + k[3968]*y_cur[IDX_C10HM]; + data[jistart + 10279] = 0.0 + k[3978]*y_cur[IDX_C10HM]; + data[jistart + 10280] = 0.0 + k[3967]*y_cur[IDX_C10HM]; + data[jistart + 10281] = 0.0 + k[3982]*y_cur[IDX_C10HM]; + data[jistart + 10282] = 0.0 + k[3984]*y_cur[IDX_C10HM]; + data[jistart + 10283] = 0.0 + k[3959]*y_cur[IDX_C10HM]; + data[jistart + 10284] = 0.0 + k[3972]*y_cur[IDX_C10HM] + k[3973]*y_cur[IDX_C10HM]; + data[jistart + 10285] = 0.0 + k[3980]*y_cur[IDX_C10HM]; + data[jistart + 10286] = 0.0 + k[3981]*y_cur[IDX_C10HM]; + data[jistart + 10287] = 0.0 + k[3987]*y_cur[IDX_C10HM]; + data[jistart + 10288] = 0.0 + k[3985]*y_cur[IDX_C10HM]; + data[jistart + 10289] = 0.0 + k[3958]*y_cur[IDX_C10HM]; + data[jistart + 10290] = 0.0 + k[3957]*y_cur[IDX_C10HM]; + data[jistart + 10291] = 0.0 + k[3963]*y_cur[IDX_C10HM]; + data[jistart + 10292] = 0.0 + k[8648]*y_cur[IDX_GC10I]; + data[jistart + 10293] = 0.0 + k[3970]*y_cur[IDX_C10HM]; + data[jistart + 10294] = 0.0 - k[5341]*y_cur[IDX_C10HI]; + data[jistart + 10295] = 0.0 - k[507]*y_cur[IDX_C10HI] - k[3067]*y_cur[IDX_C10HI] - + k[3068]*y_cur[IDX_C10HI] - k[3069]*y_cur[IDX_C10HI] - + k[3070]*y_cur[IDX_C10HI] - k[3071]*y_cur[IDX_C10HI] - + k[3072]*y_cur[IDX_C10HI] + k[3976]*y_cur[IDX_C10HM]; + data[jistart + 10296] = 0.0 - k[147]*y_cur[IDX_C10HI] - k[1298]*y_cur[IDX_C10HI] - + k[1299]*y_cur[IDX_C10HI] + k[3956]*y_cur[IDX_C10HM]; + data[jistart + 10297] = 0.0 - k[322]*y_cur[IDX_C10HI] + k[3966]*y_cur[IDX_C10HM]; + data[jistart + 10298] = 0.0 + k[54]*y_cur[IDX_C9HM] - k[4910]*y_cur[IDX_C10HI] + + k[4941]*y_cur[IDX_C9H2I]; + data[jistart + 10299] = 0.0 - k[2901]*y_cur[IDX_C10HI] + k[3974]*y_cur[IDX_C10HM] + + k[3975]*y_cur[IDX_C10HM]; + data[jistart + 10300] = 0.0 - k[2585]*y_cur[IDX_C10HI] + k[3969]*y_cur[IDX_C10HM]; + data[jistart + 10301] = 0.0 + k[6874]*y_cur[IDX_C10H2II]; + data[jistart + 10302] = 0.0 + k[732]*y_cur[IDX_C10H2II] - k[5588]*y_cur[IDX_C10HI]; + data[jistart + 10303] = 0.0 + k[85]*y_cur[IDX_C10M]; + data[jistart + 10304] = 0.0 + k[900]*y_cur[IDX_eM] + k[6866]*y_cur[IDX_GRAINM]; + data[jistart + 10305] = 0.0 + k[8681]*y_cur[IDX_GCI]; + data[jistart + 10306] = 0.0 + k[8646]*y_cur[IDX_GHI]; + data[jistart + 10307] = 0.0 + k[7243] + k[7425] + k[7607]; + data[jistart + 10308] = 0.0 + k[3682]*y_cur[IDX_OI]; + data[jistart + 10309] = 0.0 + k[8734]*y_cur[IDX_GCHI]; + data[jistart + 10310] = 0.0 + k[898]*y_cur[IDX_eM] + k[6864]*y_cur[IDX_GRAINM]; + data[jistart + 10311] = 0.0 + k[5769] + k[6064]; + data[jistart + 10312] = 0.0 + k[896]*y_cur[IDX_eM] + k[6862]*y_cur[IDX_GRAINM]; + data[jistart + 10313] = 0.0 + k[4939]*y_cur[IDX_CI]; + data[jistart + 10314] = 0.0 + k[894]*y_cur[IDX_eM] + k[6860]*y_cur[IDX_GRAINM]; + data[jistart + 10315] = 0.0 + k[4591]*y_cur[IDX_C9HM]; + data[jistart + 10316] = 0.0 + k[4594]*y_cur[IDX_C9HM]; + data[jistart + 10317] = 0.0 + k[4620]*y_cur[IDX_C9HM]; + data[jistart + 10318] = 0.0 + k[4601]*y_cur[IDX_C9HM]; + data[jistart + 10319] = 0.0 + k[3382]*y_cur[IDX_NI]; + data[jistart + 10320] = 0.0 + k[52]*y_cur[IDX_CI]; + data[jistart + 10321] = 0.0 + k[4586]*y_cur[IDX_CII] + k[4587]*y_cur[IDX_C2H2II] + + k[4588]*y_cur[IDX_C2H3II] + k[4589]*y_cur[IDX_C4H2II] + + k[4590]*y_cur[IDX_C4H3II] + k[4591]*y_cur[IDX_C4SII] + + k[4592]*y_cur[IDX_CH2CCHII] + k[4593]*y_cur[IDX_CH3II] + + k[4594]*y_cur[IDX_CNCII] + k[4595]*y_cur[IDX_FeII] + + k[4596]*y_cur[IDX_HII] + k[4597]*y_cur[IDX_H2COII] + + k[4598]*y_cur[IDX_H2SII] + k[4599]*y_cur[IDX_H3II] + + k[4600]*y_cur[IDX_H3OII] + k[4601]*y_cur[IDX_HC2SII] + + k[4602]*y_cur[IDX_HCNHII] + k[4603]*y_cur[IDX_HCNHII] + + k[4604]*y_cur[IDX_HCOII] + k[4605]*y_cur[IDX_HCOII] + + k[4606]*y_cur[IDX_HeII] + k[4607]*y_cur[IDX_MgII] + + k[4608]*y_cur[IDX_NII] + k[4609]*y_cur[IDX_N2HII] + + k[4610]*y_cur[IDX_NH3II] + k[4611]*y_cur[IDX_NH4II] + + k[4612]*y_cur[IDX_NOII] + k[4613]*y_cur[IDX_NaII] + + k[4614]*y_cur[IDX_OII] + k[4615]*y_cur[IDX_SII] + + k[4616]*y_cur[IDX_SOII] + k[4617]*y_cur[IDX_SiII] + + k[4618]*y_cur[IDX_SiOII] + k[4619]*y_cur[IDX_SiOHII] + + k[4620]*y_cur[IDX_SiSII] + k[5768] + k[6062]; + data[jistart + 10322] = 0.0 + k[103]*y_cur[IDX_HI]; + data[jistart + 10323] = 0.0 + k[4618]*y_cur[IDX_C9HM]; + data[jistart + 10324] = 0.0 + k[8734]*y_cur[IDX_GC8I]; + data[jistart + 10325] = 0.0 + k[4619]*y_cur[IDX_C9HM]; + data[jistart + 10326] = 0.0 + k[5341]*y_cur[IDX_OI]; + data[jistart + 10327] = 0.0 - k[357]*y_cur[IDX_HII] - k[1340]*y_cur[IDX_CII] - + k[2313]*y_cur[IDX_HII] - k[2630]*y_cur[IDX_H3II] - + k[2935]*y_cur[IDX_HCOII] - k[3154]*y_cur[IDX_HeII] - + k[3155]*y_cur[IDX_HeII] - k[4942]*y_cur[IDX_CI] - + k[5251]*y_cur[IDX_NI] - k[5376]*y_cur[IDX_OI] - + k[5606]*y_cur[IDX_eM] - k[5770] - k[6065] - k[6066] - k[7061]; + data[jistart + 10328] = 0.0 + k[4595]*y_cur[IDX_C9HM]; + data[jistart + 10329] = 0.0 + k[4607]*y_cur[IDX_C9HM]; + data[jistart + 10330] = 0.0 + k[4613]*y_cur[IDX_C9HM]; + data[jistart + 10331] = 0.0 + k[8681]*y_cur[IDX_GC8HI]; + data[jistart + 10332] = 0.0 + k[4590]*y_cur[IDX_C9HM]; + data[jistart + 10333] = 0.0 + k[4609]*y_cur[IDX_C9HM]; + data[jistart + 10334] = 0.0 + k[4616]*y_cur[IDX_C9HM]; + data[jistart + 10335] = 0.0 + k[4592]*y_cur[IDX_C9HM]; + data[jistart + 10336] = 0.0 + k[4598]*y_cur[IDX_C9HM]; + data[jistart + 10337] = 0.0 + k[4608]*y_cur[IDX_C9HM]; + data[jistart + 10338] = 0.0 + k[4597]*y_cur[IDX_C9HM]; + data[jistart + 10339] = 0.0 + k[4612]*y_cur[IDX_C9HM]; + data[jistart + 10340] = 0.0 + k[4614]*y_cur[IDX_C9HM]; + data[jistart + 10341] = 0.0 + k[4589]*y_cur[IDX_C9HM]; + data[jistart + 10342] = 0.0 + k[4602]*y_cur[IDX_C9HM] + k[4603]*y_cur[IDX_C9HM]; + data[jistart + 10343] = 0.0 + k[4610]*y_cur[IDX_C9HM]; + data[jistart + 10344] = 0.0 + k[4611]*y_cur[IDX_C9HM]; + data[jistart + 10345] = 0.0 + k[4617]*y_cur[IDX_C9HM]; + data[jistart + 10346] = 0.0 + k[4615]*y_cur[IDX_C9HM]; + data[jistart + 10347] = 0.0 + k[4588]*y_cur[IDX_C9HM]; + data[jistart + 10348] = 0.0 + k[4587]*y_cur[IDX_C9HM]; + data[jistart + 10349] = 0.0 + k[4593]*y_cur[IDX_C9HM]; + data[jistart + 10350] = 0.0 + k[8646]*y_cur[IDX_GC9I]; + data[jistart + 10351] = 0.0 + k[3382]*y_cur[IDX_C10HM] - k[5251]*y_cur[IDX_C9HI]; + data[jistart + 10352] = 0.0 + k[4600]*y_cur[IDX_C9HM]; + data[jistart + 10353] = 0.0 + k[3682]*y_cur[IDX_C10H2II] + k[5341]*y_cur[IDX_C10HI] - + k[5376]*y_cur[IDX_C9HI]; + data[jistart + 10354] = 0.0 - k[3154]*y_cur[IDX_C9HI] - k[3155]*y_cur[IDX_C9HI] + + k[4606]*y_cur[IDX_C9HM]; + data[jistart + 10355] = 0.0 - k[1340]*y_cur[IDX_C9HI] + k[4586]*y_cur[IDX_C9HM]; + data[jistart + 10356] = 0.0 - k[357]*y_cur[IDX_C9HI] - k[2313]*y_cur[IDX_C9HI] + + k[4596]*y_cur[IDX_C9HM]; + data[jistart + 10357] = 0.0 + k[52]*y_cur[IDX_C8HM] + k[4939]*y_cur[IDX_C8H2I] - + k[4942]*y_cur[IDX_C9HI]; + data[jistart + 10358] = 0.0 - k[2935]*y_cur[IDX_C9HI] + k[4604]*y_cur[IDX_C9HM] + + k[4605]*y_cur[IDX_C9HM]; + data[jistart + 10359] = 0.0 - k[2630]*y_cur[IDX_C9HI] + k[4599]*y_cur[IDX_C9HM]; + data[jistart + 10360] = 0.0 + k[6860]*y_cur[IDX_C9H2II] + k[6862]*y_cur[IDX_C9H3II] + + k[6864]*y_cur[IDX_C9H4II] + k[6866]*y_cur[IDX_C9H5II]; + data[jistart + 10361] = 0.0 + k[894]*y_cur[IDX_C9H2II] + k[896]*y_cur[IDX_C9H3II] + + k[898]*y_cur[IDX_C9H4II] + k[900]*y_cur[IDX_C9H5II] - + k[5606]*y_cur[IDX_C9HI]; + data[jistart + 10362] = 0.0 + k[103]*y_cur[IDX_C9M]; + data[jistart + 10363] = 0.0 + k[7161] + k[7343] + k[7525]; + data[jistart + 10364] = 0.0 + k[1146]*y_cur[IDX_eM] + k[6724]*y_cur[IDX_GRAINM]; + data[jistart + 10365] = 0.0 + k[1024]*y_cur[IDX_eM] + k[6586]*y_cur[IDX_GRAINM]; + data[jistart + 10366] = 0.0 + k[1052]*y_cur[IDX_eM] + k[6591]*y_cur[IDX_GRAINM]; + data[jistart + 10367] = 0.0 + k[5933] + k[6285]; + data[jistart + 10368] = 0.0 + k[5843] + k[6166] + k[6167]; + data[jistart + 10369] = 0.0 + k[5410]*y_cur[IDX_OI]; + data[jistart + 10370] = 0.0 + k[5451]*y_cur[IDX_OI]; + data[jistart + 10371] = 0.0 + k[5445]*y_cur[IDX_OI] + k[5446]*y_cur[IDX_OI]; + data[jistart + 10372] = 0.0 + k[5444]*y_cur[IDX_OI]; + data[jistart + 10373] = 0.0 + k[5449]*y_cur[IDX_OI]; + data[jistart + 10374] = 0.0 + k[4794]*y_cur[IDX_SiOII] + k[4795]*y_cur[IDX_SiOHII]; + data[jistart + 10375] = 0.0 + k[4653]*y_cur[IDX_SiOII] + k[4654]*y_cur[IDX_SiOHII]; + data[jistart + 10376] = 0.0 + k[4864]*y_cur[IDX_SiOII] + k[4865]*y_cur[IDX_SiOHII]; + data[jistart + 10377] = 0.0 + k[3675]*y_cur[IDX_O2I]; + data[jistart + 10378] = 0.0 + k[4058]*y_cur[IDX_SiOII] + k[4059]*y_cur[IDX_SiOHII]; + data[jistart + 10379] = 0.0 + k[4233]*y_cur[IDX_SiOII] + k[4234]*y_cur[IDX_SiOHII]; + data[jistart + 10380] = 0.0 + k[4829]*y_cur[IDX_SiOII] + k[4830]*y_cur[IDX_SiOHII]; + data[jistart + 10381] = 0.0 + k[3988]*y_cur[IDX_SiOII] + k[3989]*y_cur[IDX_SiOHII]; + data[jistart + 10382] = 0.0 + k[4128]*y_cur[IDX_SiOII] + k[4129]*y_cur[IDX_SiOHII]; + data[jistart + 10383] = 0.0 + k[4408]*y_cur[IDX_SiOII] + k[4409]*y_cur[IDX_SiOHII]; + data[jistart + 10384] = 0.0 + k[4548]*y_cur[IDX_SiOII] + k[4549]*y_cur[IDX_SiOHII]; + data[jistart + 10385] = 0.0 + k[4478]*y_cur[IDX_SiOII] + k[4479]*y_cur[IDX_SiOHII]; + data[jistart + 10386] = 0.0 + k[4618]*y_cur[IDX_SiOII] + k[4619]*y_cur[IDX_SiOHII]; + data[jistart + 10387] = 0.0 + k[3953]*y_cur[IDX_SiOII] + k[3954]*y_cur[IDX_SiOHII]; + data[jistart + 10388] = 0.0 + k[4303]*y_cur[IDX_SiOII] + k[4304]*y_cur[IDX_SiOHII]; + data[jistart + 10389] = 0.0 + k[4338]*y_cur[IDX_SiOII] + k[4339]*y_cur[IDX_SiOHII]; + data[jistart + 10390] = 0.0 + k[3918]*y_cur[IDX_SiOII] + k[3919]*y_cur[IDX_SiOHII]; + data[jistart + 10391] = 0.0 + k[4759]*y_cur[IDX_SiOII] + k[4760]*y_cur[IDX_SiOHII]; + data[jistart + 10392] = 0.0 + k[4583]*y_cur[IDX_SiOII] + k[4584]*y_cur[IDX_SiOHII]; + data[jistart + 10393] = 0.0 + k[4724]*y_cur[IDX_SiOII] + k[4725]*y_cur[IDX_SiOHII]; + data[jistart + 10394] = 0.0 + k[4513]*y_cur[IDX_SiOII] + k[4514]*y_cur[IDX_SiOHII]; + data[jistart + 10395] = 0.0 + k[4023]*y_cur[IDX_SiOII] + k[4024]*y_cur[IDX_SiOHII]; + data[jistart + 10396] = 0.0 + k[4093]*y_cur[IDX_SiOII] + k[4094]*y_cur[IDX_SiOHII]; + data[jistart + 10397] = 0.0 + k[4198]*y_cur[IDX_SiOII] + k[4199]*y_cur[IDX_SiOHII]; + data[jistart + 10398] = 0.0 + k[4373]*y_cur[IDX_SiOII] + k[4374]*y_cur[IDX_SiOHII]; + data[jistart + 10399] = 0.0 + k[4268]*y_cur[IDX_SiOII] + k[4269]*y_cur[IDX_SiOHII]; + data[jistart + 10400] = 0.0 + k[4443]*y_cur[IDX_SiOII] + k[4444]*y_cur[IDX_SiOHII]; + data[jistart + 10401] = 0.0 + k[504]*y_cur[IDX_HCOI] + k[541]*y_cur[IDX_MgI] + + k[631]*y_cur[IDX_NOI] + k[726]*y_cur[IDX_FeI] + + k[3918]*y_cur[IDX_CM] + k[3953]*y_cur[IDX_C10M] + + k[3988]*y_cur[IDX_C10HM] + k[4023]*y_cur[IDX_C2M] + + k[4058]*y_cur[IDX_C2HM] + k[4093]*y_cur[IDX_C3M] + + k[4128]*y_cur[IDX_C3HM] + k[4163]*y_cur[IDX_C3NM] + + k[4198]*y_cur[IDX_C4M] + k[4233]*y_cur[IDX_C4HM] + + k[4268]*y_cur[IDX_C5M] + k[4303]*y_cur[IDX_C5HM] + + k[4338]*y_cur[IDX_C5NM] + k[4373]*y_cur[IDX_C6M] + + k[4408]*y_cur[IDX_C6HM] + k[4443]*y_cur[IDX_C7M] + + k[4478]*y_cur[IDX_C7HM] + k[4513]*y_cur[IDX_C8M] + + k[4548]*y_cur[IDX_C8HM] + k[4583]*y_cur[IDX_C9M] + + k[4618]*y_cur[IDX_C9HM] + k[4653]*y_cur[IDX_CHM] + + k[4688]*y_cur[IDX_CNM] + k[4724]*y_cur[IDX_HM] + + k[4759]*y_cur[IDX_OM] + k[4794]*y_cur[IDX_O2M] + + k[4829]*y_cur[IDX_OHM] + k[4864]*y_cur[IDX_SM]; + data[jistart + 10402] = 0.0 + k[1268]*y_cur[IDX_eM] + k[3604]*y_cur[IDX_NH3I] + + k[3919]*y_cur[IDX_CM] + k[3954]*y_cur[IDX_C10M] + + k[3989]*y_cur[IDX_C10HM] + k[4024]*y_cur[IDX_C2M] + + k[4059]*y_cur[IDX_C2HM] + k[4094]*y_cur[IDX_C3M] + + k[4129]*y_cur[IDX_C3HM] + k[4164]*y_cur[IDX_C3NM] + + k[4199]*y_cur[IDX_C4M] + k[4234]*y_cur[IDX_C4HM] + + k[4269]*y_cur[IDX_C5M] + k[4304]*y_cur[IDX_C5HM] + + k[4339]*y_cur[IDX_C5NM] + k[4374]*y_cur[IDX_C6M] + + k[4409]*y_cur[IDX_C6HM] + k[4444]*y_cur[IDX_C7M] + + k[4479]*y_cur[IDX_C7HM] + k[4514]*y_cur[IDX_C8M] + + k[4549]*y_cur[IDX_C8HM] + k[4584]*y_cur[IDX_C9M] + + k[4619]*y_cur[IDX_C9HM] + k[4654]*y_cur[IDX_CHM] + + k[4689]*y_cur[IDX_CNM] + k[4725]*y_cur[IDX_HM] + + k[4760]*y_cur[IDX_OM] + k[4795]*y_cur[IDX_O2M] + + k[4830]*y_cur[IDX_OHM] + k[4865]*y_cur[IDX_SM] + + k[6557]*y_cur[IDX_GRAINM]; + data[jistart + 10403] = 0.0 - k[3794]*y_cur[IDX_SiOI]; + data[jistart + 10404] = 0.0 + k[4163]*y_cur[IDX_SiOII] + k[4164]*y_cur[IDX_SiOHII]; + data[jistart + 10405] = 0.0 + k[5491]*y_cur[IDX_SiI]; + data[jistart + 10406] = 0.0 - k[434]*y_cur[IDX_HII] - k[1447]*y_cur[IDX_CII] - + k[2760]*y_cur[IDX_H3II] - k[2826]*y_cur[IDX_H3OII] - + k[3005]*y_cur[IDX_HCOII] - k[3332]*y_cur[IDX_HeII] - + k[3333]*y_cur[IDX_HeII] - k[3794]*y_cur[IDX_OHII] - + k[5483]*y_cur[IDX_OHI] - k[5934] - k[6286] - k[6287] - k[6979]; + data[jistart + 10407] = 0.0 + k[726]*y_cur[IDX_SiOII]; + data[jistart + 10408] = 0.0 + k[541]*y_cur[IDX_SiOII]; + data[jistart + 10409] = 0.0 + k[4688]*y_cur[IDX_SiOII] + k[4689]*y_cur[IDX_SiOHII]; + data[jistart + 10410] = 0.0 + k[3675]*y_cur[IDX_SiSII] + k[5494]*y_cur[IDX_SiI]; + data[jistart + 10411] = 0.0 + k[5482]*y_cur[IDX_OHI] + k[5491]*y_cur[IDX_CO2I] + + k[5492]*y_cur[IDX_COI] + k[5493]*y_cur[IDX_NOI] + + k[5494]*y_cur[IDX_O2I] + k[5585]*y_cur[IDX_OI]; + data[jistart + 10412] = 0.0 + k[631]*y_cur[IDX_SiOII] + k[5493]*y_cur[IDX_SiI]; + data[jistart + 10413] = 0.0 + k[504]*y_cur[IDX_SiOII]; + data[jistart + 10414] = 0.0 + k[5482]*y_cur[IDX_SiI] - k[5483]*y_cur[IDX_SiOI]; + data[jistart + 10415] = 0.0 + k[3604]*y_cur[IDX_SiOHII]; + data[jistart + 10416] = 0.0 - k[2826]*y_cur[IDX_SiOI]; + data[jistart + 10417] = 0.0 + k[5410]*y_cur[IDX_HCSiI] + k[5444]*y_cur[IDX_SiCI] + + k[5445]*y_cur[IDX_SiH2I] + k[5446]*y_cur[IDX_SiH2I] + + k[5449]*y_cur[IDX_SiHI] + k[5451]*y_cur[IDX_SiNI] + + k[5585]*y_cur[IDX_SiI]; + data[jistart + 10418] = 0.0 - k[3332]*y_cur[IDX_SiOI] - k[3333]*y_cur[IDX_SiOI]; + data[jistart + 10419] = 0.0 - k[1447]*y_cur[IDX_SiOI]; + data[jistart + 10420] = 0.0 - k[434]*y_cur[IDX_SiOI]; + data[jistart + 10421] = 0.0 - k[3005]*y_cur[IDX_SiOI]; + data[jistart + 10422] = 0.0 - k[2760]*y_cur[IDX_SiOI]; + data[jistart + 10423] = 0.0 + k[5492]*y_cur[IDX_SiI]; + data[jistart + 10424] = 0.0 + k[6557]*y_cur[IDX_SiOHII] + k[6586]*y_cur[IDX_H2SiOII] + + k[6591]*y_cur[IDX_H3SiOII] + k[6724]*y_cur[IDX_HSiO2II]; + data[jistart + 10425] = 0.0 + k[1024]*y_cur[IDX_H2SiOII] + k[1052]*y_cur[IDX_H3SiOII] + + k[1146]*y_cur[IDX_HSiO2II] + k[1268]*y_cur[IDX_SiOHII]; + data[jistart + 10426] = 0.0 + k[317]*y_cur[IDX_FeI]; + data[jistart + 10427] = 0.0 + k[565]*y_cur[IDX_FeI]; + data[jistart + 10428] = 0.0 + k[505]*y_cur[IDX_FeI]; + data[jistart + 10429] = 0.0 - k[4771]*y_cur[IDX_FeII]; + data[jistart + 10430] = 0.0 - k[4630]*y_cur[IDX_FeII]; + data[jistart + 10431] = 0.0 - k[4841]*y_cur[IDX_FeII]; + data[jistart + 10432] = 0.0 - k[4035]*y_cur[IDX_FeII]; + data[jistart + 10433] = 0.0 - k[4210]*y_cur[IDX_FeII]; + data[jistart + 10434] = 0.0 - k[4806]*y_cur[IDX_FeII]; + data[jistart + 10435] = 0.0 - k[3965]*y_cur[IDX_FeII]; + data[jistart + 10436] = 0.0 - k[4105]*y_cur[IDX_FeII]; + data[jistart + 10437] = 0.0 - k[4385]*y_cur[IDX_FeII]; + data[jistart + 10438] = 0.0 - k[4525]*y_cur[IDX_FeII]; + data[jistart + 10439] = 0.0 - k[4455]*y_cur[IDX_FeII]; + data[jistart + 10440] = 0.0 - k[4595]*y_cur[IDX_FeII]; + data[jistart + 10441] = 0.0 - k[3930]*y_cur[IDX_FeII]; + data[jistart + 10442] = 0.0 - k[4280]*y_cur[IDX_FeII]; + data[jistart + 10443] = 0.0 - k[4315]*y_cur[IDX_FeII]; + data[jistart + 10444] = 0.0 - k[3895]*y_cur[IDX_FeII]; + data[jistart + 10445] = 0.0 - k[4736]*y_cur[IDX_FeII]; + data[jistart + 10446] = 0.0 - k[4560]*y_cur[IDX_FeII]; + data[jistart + 10447] = 0.0 - k[4700]*y_cur[IDX_FeII]; + data[jistart + 10448] = 0.0 - k[4490]*y_cur[IDX_FeII]; + data[jistart + 10449] = 0.0 - k[4000]*y_cur[IDX_FeII]; + data[jistart + 10450] = 0.0 - k[4070]*y_cur[IDX_FeII]; + data[jistart + 10451] = 0.0 - k[4175]*y_cur[IDX_FeII]; + data[jistart + 10452] = 0.0 - k[4350]*y_cur[IDX_FeII]; + data[jistart + 10453] = 0.0 - k[4245]*y_cur[IDX_FeII]; + data[jistart + 10454] = 0.0 - k[4420]*y_cur[IDX_FeII]; + data[jistart + 10455] = 0.0 + k[726]*y_cur[IDX_FeI]; + data[jistart + 10456] = 0.0 + k[467]*y_cur[IDX_FeI]; + data[jistart + 10457] = 0.0 - k[4140]*y_cur[IDX_FeII]; + data[jistart + 10458] = 0.0 + k[250]*y_cur[IDX_FeI]; + data[jistart + 10459] = 0.0 + k[673]*y_cur[IDX_FeI]; + data[jistart + 10460] = 0.0 - k[634]*y_cur[IDX_NaI] - k[3895]*y_cur[IDX_CM] - + k[3930]*y_cur[IDX_C10M] - k[3965]*y_cur[IDX_C10HM] - + k[4000]*y_cur[IDX_C2M] - k[4035]*y_cur[IDX_C2HM] - + k[4070]*y_cur[IDX_C3M] - k[4105]*y_cur[IDX_C3HM] - + k[4140]*y_cur[IDX_C3NM] - k[4175]*y_cur[IDX_C4M] - + k[4210]*y_cur[IDX_C4HM] - k[4245]*y_cur[IDX_C5M] - + k[4280]*y_cur[IDX_C5HM] - k[4315]*y_cur[IDX_C5NM] - + k[4350]*y_cur[IDX_C6M] - k[4385]*y_cur[IDX_C6HM] - + k[4420]*y_cur[IDX_C7M] - k[4455]*y_cur[IDX_C7HM] - + k[4490]*y_cur[IDX_C8M] - k[4525]*y_cur[IDX_C8HM] - + k[4560]*y_cur[IDX_C9M] - k[4595]*y_cur[IDX_C9HM] - + k[4630]*y_cur[IDX_CHM] - k[4665]*y_cur[IDX_CNM] - + k[4700]*y_cur[IDX_HM] - k[4736]*y_cur[IDX_OM] - + k[4771]*y_cur[IDX_O2M] - k[4806]*y_cur[IDX_OHM] - + k[4841]*y_cur[IDX_SM] - k[5614]*y_cur[IDX_eM] - + k[6670]*y_cur[IDX_GRAINM]; + data[jistart + 10461] = 0.0 + k[173]*y_cur[IDX_CII] + k[221]*y_cur[IDX_C2H2II] + + k[250]*y_cur[IDX_CHII] + k[271]*y_cur[IDX_CH3II] + + k[317]*y_cur[IDX_CSII] + k[375]*y_cur[IDX_HII] + + k[459]*y_cur[IDX_H2COII] + k[467]*y_cur[IDX_H2OII] + + k[483]*y_cur[IDX_H2SII] + k[499]*y_cur[IDX_HCOII] + + k[505]*y_cur[IDX_HSII] + k[550]*y_cur[IDX_NII] + + k[565]*y_cur[IDX_N2II] + k[592]*y_cur[IDX_NH3II] + + k[620]*y_cur[IDX_NOII] + k[654]*y_cur[IDX_OII] + + k[673]*y_cur[IDX_O2II] + k[703]*y_cur[IDX_SII] + + k[715]*y_cur[IDX_SOII] + k[716]*y_cur[IDX_SiII] + + k[726]*y_cur[IDX_SiOII] + k[2680]*y_cur[IDX_H3II] + k[5832] + + k[6145] + k[6304]; + data[jistart + 10462] = 0.0 - k[634]*y_cur[IDX_FeII]; + data[jistart + 10463] = 0.0 - k[4665]*y_cur[IDX_FeII]; + data[jistart + 10464] = 0.0 + k[715]*y_cur[IDX_FeI]; + data[jistart + 10465] = 0.0 + k[483]*y_cur[IDX_FeI]; + data[jistart + 10466] = 0.0 + k[550]*y_cur[IDX_FeI]; + data[jistart + 10467] = 0.0 + k[459]*y_cur[IDX_FeI]; + data[jistart + 10468] = 0.0 + k[620]*y_cur[IDX_FeI]; + data[jistart + 10469] = 0.0 + k[654]*y_cur[IDX_FeI]; + data[jistart + 10470] = 0.0 + k[592]*y_cur[IDX_FeI]; + data[jistart + 10471] = 0.0 + k[716]*y_cur[IDX_FeI]; + data[jistart + 10472] = 0.0 + k[703]*y_cur[IDX_FeI]; + data[jistart + 10473] = 0.0 + k[221]*y_cur[IDX_FeI]; + data[jistart + 10474] = 0.0 + k[271]*y_cur[IDX_FeI]; + data[jistart + 10475] = 0.0 + k[173]*y_cur[IDX_FeI]; + data[jistart + 10476] = 0.0 + k[375]*y_cur[IDX_FeI]; + data[jistart + 10477] = 0.0 + k[499]*y_cur[IDX_FeI]; + data[jistart + 10478] = 0.0 + k[2680]*y_cur[IDX_FeI]; + data[jistart + 10479] = 0.0 - k[6670]*y_cur[IDX_FeII]; + data[jistart + 10480] = 0.0 - k[5614]*y_cur[IDX_FeII]; + data[jistart + 10481] = 0.0 + k[7198] + k[7380] + k[7564]; + data[jistart + 10482] = 0.0 - k[317]*y_cur[IDX_FeI]; + data[jistart + 10483] = 0.0 - k[565]*y_cur[IDX_FeI]; + data[jistart + 10484] = 0.0 - k[505]*y_cur[IDX_FeI]; + data[jistart + 10485] = 0.0 + k[4771]*y_cur[IDX_FeII]; + data[jistart + 10486] = 0.0 + k[4630]*y_cur[IDX_FeII]; + data[jistart + 10487] = 0.0 + k[4841]*y_cur[IDX_FeII]; + data[jistart + 10488] = 0.0 + k[4035]*y_cur[IDX_FeII]; + data[jistart + 10489] = 0.0 + k[4210]*y_cur[IDX_FeII]; + data[jistart + 10490] = 0.0 + k[4806]*y_cur[IDX_FeII]; + data[jistart + 10491] = 0.0 + k[3965]*y_cur[IDX_FeII]; + data[jistart + 10492] = 0.0 + k[4105]*y_cur[IDX_FeII]; + data[jistart + 10493] = 0.0 + k[4385]*y_cur[IDX_FeII]; + data[jistart + 10494] = 0.0 + k[4525]*y_cur[IDX_FeII]; + data[jistart + 10495] = 0.0 + k[4455]*y_cur[IDX_FeII]; + data[jistart + 10496] = 0.0 + k[4595]*y_cur[IDX_FeII]; + data[jistart + 10497] = 0.0 + k[3930]*y_cur[IDX_FeII]; + data[jistart + 10498] = 0.0 + k[4280]*y_cur[IDX_FeII]; + data[jistart + 10499] = 0.0 + k[4315]*y_cur[IDX_FeII]; + data[jistart + 10500] = 0.0 + k[3895]*y_cur[IDX_FeII]; + data[jistart + 10501] = 0.0 + k[4736]*y_cur[IDX_FeII]; + data[jistart + 10502] = 0.0 + k[4560]*y_cur[IDX_FeII]; + data[jistart + 10503] = 0.0 + k[4700]*y_cur[IDX_FeII]; + data[jistart + 10504] = 0.0 + k[4490]*y_cur[IDX_FeII]; + data[jistart + 10505] = 0.0 + k[4000]*y_cur[IDX_FeII]; + data[jistart + 10506] = 0.0 + k[4070]*y_cur[IDX_FeII]; + data[jistart + 10507] = 0.0 + k[4175]*y_cur[IDX_FeII]; + data[jistart + 10508] = 0.0 + k[4350]*y_cur[IDX_FeII]; + data[jistart + 10509] = 0.0 + k[4245]*y_cur[IDX_FeII]; + data[jistart + 10510] = 0.0 + k[4420]*y_cur[IDX_FeII]; + data[jistart + 10511] = 0.0 - k[726]*y_cur[IDX_FeI]; + data[jistart + 10512] = 0.0 - k[467]*y_cur[IDX_FeI]; + data[jistart + 10513] = 0.0 + k[4140]*y_cur[IDX_FeII]; + data[jistart + 10514] = 0.0 - k[250]*y_cur[IDX_FeI]; + data[jistart + 10515] = 0.0 - k[673]*y_cur[IDX_FeI]; + data[jistart + 10516] = 0.0 + k[634]*y_cur[IDX_NaI] + k[3895]*y_cur[IDX_CM] + + k[3930]*y_cur[IDX_C10M] + k[3965]*y_cur[IDX_C10HM] + + k[4000]*y_cur[IDX_C2M] + k[4035]*y_cur[IDX_C2HM] + + k[4070]*y_cur[IDX_C3M] + k[4105]*y_cur[IDX_C3HM] + + k[4140]*y_cur[IDX_C3NM] + k[4175]*y_cur[IDX_C4M] + + k[4210]*y_cur[IDX_C4HM] + k[4245]*y_cur[IDX_C5M] + + k[4280]*y_cur[IDX_C5HM] + k[4315]*y_cur[IDX_C5NM] + + k[4350]*y_cur[IDX_C6M] + k[4385]*y_cur[IDX_C6HM] + + k[4420]*y_cur[IDX_C7M] + k[4455]*y_cur[IDX_C7HM] + + k[4490]*y_cur[IDX_C8M] + k[4525]*y_cur[IDX_C8HM] + + k[4560]*y_cur[IDX_C9M] + k[4595]*y_cur[IDX_C9HM] + + k[4630]*y_cur[IDX_CHM] + k[4665]*y_cur[IDX_CNM] + + k[4700]*y_cur[IDX_HM] + k[4736]*y_cur[IDX_OM] + + k[4771]*y_cur[IDX_O2M] + k[4806]*y_cur[IDX_OHM] + + k[4841]*y_cur[IDX_SM] + k[5614]*y_cur[IDX_eM] + + k[6670]*y_cur[IDX_GRAINM]; + data[jistart + 10517] = 0.0 - k[173]*y_cur[IDX_CII] - k[221]*y_cur[IDX_C2H2II] - + k[250]*y_cur[IDX_CHII] - k[271]*y_cur[IDX_CH3II] - + k[317]*y_cur[IDX_CSII] - k[375]*y_cur[IDX_HII] - + k[459]*y_cur[IDX_H2COII] - k[467]*y_cur[IDX_H2OII] - + k[483]*y_cur[IDX_H2SII] - k[499]*y_cur[IDX_HCOII] - + k[505]*y_cur[IDX_HSII] - k[550]*y_cur[IDX_NII] - + k[565]*y_cur[IDX_N2II] - k[592]*y_cur[IDX_NH3II] - + k[620]*y_cur[IDX_NOII] - k[654]*y_cur[IDX_OII] - + k[673]*y_cur[IDX_O2II] - k[703]*y_cur[IDX_SII] - + k[715]*y_cur[IDX_SOII] - k[716]*y_cur[IDX_SiII] - + k[726]*y_cur[IDX_SiOII] - k[2680]*y_cur[IDX_H3II] - k[5832] - + k[6145] - k[6304] - k[7016]; + data[jistart + 10518] = 0.0 + k[634]*y_cur[IDX_FeII]; + data[jistart + 10519] = 0.0 + k[4665]*y_cur[IDX_FeII]; + data[jistart + 10520] = 0.0 - k[715]*y_cur[IDX_FeI]; + data[jistart + 10521] = 0.0 - k[483]*y_cur[IDX_FeI]; + data[jistart + 10522] = 0.0 - k[550]*y_cur[IDX_FeI]; + data[jistart + 10523] = 0.0 - k[459]*y_cur[IDX_FeI]; + data[jistart + 10524] = 0.0 - k[620]*y_cur[IDX_FeI]; + data[jistart + 10525] = 0.0 - k[654]*y_cur[IDX_FeI]; + data[jistart + 10526] = 0.0 - k[592]*y_cur[IDX_FeI]; + data[jistart + 10527] = 0.0 - k[716]*y_cur[IDX_FeI]; + data[jistart + 10528] = 0.0 - k[703]*y_cur[IDX_FeI]; + data[jistart + 10529] = 0.0 - k[221]*y_cur[IDX_FeI]; + data[jistart + 10530] = 0.0 - k[271]*y_cur[IDX_FeI]; + data[jistart + 10531] = 0.0 - k[173]*y_cur[IDX_FeI]; + data[jistart + 10532] = 0.0 - k[375]*y_cur[IDX_FeI]; + data[jistart + 10533] = 0.0 - k[499]*y_cur[IDX_FeI]; + data[jistart + 10534] = 0.0 - k[2680]*y_cur[IDX_FeI]; + data[jistart + 10535] = 0.0 + k[6670]*y_cur[IDX_FeII]; + data[jistart + 10536] = 0.0 + k[5614]*y_cur[IDX_FeII]; + data[jistart + 10537] = 0.0 + k[530]*y_cur[IDX_MgI]; + data[jistart + 10538] = 0.0 + k[535]*y_cur[IDX_MgI]; + data[jistart + 10539] = 0.0 + k[534]*y_cur[IDX_MgI]; + data[jistart + 10540] = 0.0 - k[4783]*y_cur[IDX_MgII]; + data[jistart + 10541] = 0.0 - k[4642]*y_cur[IDX_MgII]; + data[jistart + 10542] = 0.0 - k[4853]*y_cur[IDX_MgII]; + data[jistart + 10543] = 0.0 - k[4047]*y_cur[IDX_MgII]; + data[jistart + 10544] = 0.0 - k[4222]*y_cur[IDX_MgII]; + data[jistart + 10545] = 0.0 + k[2233]*y_cur[IDX_MgI]; + data[jistart + 10546] = 0.0 - k[4818]*y_cur[IDX_MgII]; + data[jistart + 10547] = 0.0 - k[3977]*y_cur[IDX_MgII]; + data[jistart + 10548] = 0.0 - k[4117]*y_cur[IDX_MgII]; + data[jistart + 10549] = 0.0 - k[4397]*y_cur[IDX_MgII]; + data[jistart + 10550] = 0.0 - k[4537]*y_cur[IDX_MgII]; + data[jistart + 10551] = 0.0 - k[4467]*y_cur[IDX_MgII]; + data[jistart + 10552] = 0.0 - k[4607]*y_cur[IDX_MgII]; + data[jistart + 10553] = 0.0 - k[3942]*y_cur[IDX_MgII]; + data[jistart + 10554] = 0.0 - k[4292]*y_cur[IDX_MgII]; + data[jistart + 10555] = 0.0 - k[4327]*y_cur[IDX_MgII]; + data[jistart + 10556] = 0.0 - k[3907]*y_cur[IDX_MgII]; + data[jistart + 10557] = 0.0 - k[4748]*y_cur[IDX_MgII]; + data[jistart + 10558] = 0.0 - k[4572]*y_cur[IDX_MgII]; + data[jistart + 10559] = 0.0 - k[4713]*y_cur[IDX_MgII]; + data[jistart + 10560] = 0.0 - k[4502]*y_cur[IDX_MgII]; + data[jistart + 10561] = 0.0 - k[4012]*y_cur[IDX_MgII]; + data[jistart + 10562] = 0.0 - k[4082]*y_cur[IDX_MgII]; + data[jistart + 10563] = 0.0 - k[4187]*y_cur[IDX_MgII]; + data[jistart + 10564] = 0.0 - k[4362]*y_cur[IDX_MgII]; + data[jistart + 10565] = 0.0 - k[4257]*y_cur[IDX_MgII]; + data[jistart + 10566] = 0.0 - k[4432]*y_cur[IDX_MgII]; + data[jistart + 10567] = 0.0 + k[541]*y_cur[IDX_MgI]; + data[jistart + 10568] = 0.0 + k[471]*y_cur[IDX_MgI]; + data[jistart + 10569] = 0.0 - k[4152]*y_cur[IDX_MgII]; + data[jistart + 10570] = 0.0 + k[252]*y_cur[IDX_MgI]; + data[jistart + 10571] = 0.0 + k[537]*y_cur[IDX_MgI]; + data[jistart + 10572] = 0.0 - k[639]*y_cur[IDX_NaI] - k[3907]*y_cur[IDX_CM] - + k[3942]*y_cur[IDX_C10M] - k[3977]*y_cur[IDX_C10HM] - + k[4012]*y_cur[IDX_C2M] - k[4047]*y_cur[IDX_C2HM] - + k[4082]*y_cur[IDX_C3M] - k[4117]*y_cur[IDX_C3HM] - + k[4152]*y_cur[IDX_C3NM] - k[4187]*y_cur[IDX_C4M] - + k[4222]*y_cur[IDX_C4HM] - k[4257]*y_cur[IDX_C5M] - + k[4292]*y_cur[IDX_C5HM] - k[4327]*y_cur[IDX_C5NM] - + k[4362]*y_cur[IDX_C6M] - k[4397]*y_cur[IDX_C6HM] - + k[4432]*y_cur[IDX_C7M] - k[4467]*y_cur[IDX_C7HM] - + k[4502]*y_cur[IDX_C8M] - k[4537]*y_cur[IDX_C8HM] - + k[4572]*y_cur[IDX_C9M] - k[4607]*y_cur[IDX_C9HM] - + k[4642]*y_cur[IDX_CHM] - k[4677]*y_cur[IDX_CNM] - + k[4713]*y_cur[IDX_HM] - k[4748]*y_cur[IDX_OM] - + k[4783]*y_cur[IDX_O2M] - k[4818]*y_cur[IDX_OHM] - + k[4853]*y_cur[IDX_SM] - k[5620]*y_cur[IDX_eM] - + k[6353]*y_cur[IDX_GRAINM]; + data[jistart + 10573] = 0.0 + k[182]*y_cur[IDX_CII] + k[252]*y_cur[IDX_CHII] + + k[273]*y_cur[IDX_CH3II] + k[398]*y_cur[IDX_HII] + + k[471]*y_cur[IDX_H2OII] + k[529]*y_cur[IDX_C2H2II] + + k[530]*y_cur[IDX_CSII] + k[531]*y_cur[IDX_H2COII] + + k[532]*y_cur[IDX_H2SII] + k[533]*y_cur[IDX_HCOII] + + k[534]*y_cur[IDX_HSII] + k[535]*y_cur[IDX_N2II] + + k[536]*y_cur[IDX_NOII] + k[537]*y_cur[IDX_O2II] + + k[538]*y_cur[IDX_SII] + k[539]*y_cur[IDX_SOII] + + k[540]*y_cur[IDX_SiII] + k[541]*y_cur[IDX_SiOII] + + k[556]*y_cur[IDX_NII] + k[594]*y_cur[IDX_NH3II] + + k[2233]*y_cur[IDX_CH5II] + k[2717]*y_cur[IDX_H3II] + k[5877] + + k[6210] + k[6306]; + data[jistart + 10574] = 0.0 - k[639]*y_cur[IDX_MgII]; + data[jistart + 10575] = 0.0 - k[4677]*y_cur[IDX_MgII]; + data[jistart + 10576] = 0.0 + k[539]*y_cur[IDX_MgI]; + data[jistart + 10577] = 0.0 + k[532]*y_cur[IDX_MgI]; + data[jistart + 10578] = 0.0 + k[556]*y_cur[IDX_MgI]; + data[jistart + 10579] = 0.0 + k[531]*y_cur[IDX_MgI]; + data[jistart + 10580] = 0.0 + k[536]*y_cur[IDX_MgI]; + data[jistart + 10581] = 0.0 + k[594]*y_cur[IDX_MgI]; + data[jistart + 10582] = 0.0 + k[540]*y_cur[IDX_MgI]; + data[jistart + 10583] = 0.0 + k[538]*y_cur[IDX_MgI]; + data[jistart + 10584] = 0.0 + k[529]*y_cur[IDX_MgI]; + data[jistart + 10585] = 0.0 + k[273]*y_cur[IDX_MgI]; + data[jistart + 10586] = 0.0 + k[182]*y_cur[IDX_MgI]; + data[jistart + 10587] = 0.0 + k[398]*y_cur[IDX_MgI]; + data[jistart + 10588] = 0.0 + k[533]*y_cur[IDX_MgI]; + data[jistart + 10589] = 0.0 + k[2717]*y_cur[IDX_MgI]; + data[jistart + 10590] = 0.0 - k[6353]*y_cur[IDX_MgII]; + data[jistart + 10591] = 0.0 - k[5620]*y_cur[IDX_MgII]; + data[jistart + 10592] = 0.0 + k[633]*y_cur[IDX_NaI]; + data[jistart + 10593] = 0.0 + k[640]*y_cur[IDX_NaI]; + data[jistart + 10594] = 0.0 + k[638]*y_cur[IDX_NaI]; + data[jistart + 10595] = 0.0 - k[4789]*y_cur[IDX_NaII]; + data[jistart + 10596] = 0.0 - k[4648]*y_cur[IDX_NaII]; + data[jistart + 10597] = 0.0 - k[4859]*y_cur[IDX_NaII]; + data[jistart + 10598] = 0.0 - k[4053]*y_cur[IDX_NaII]; + data[jistart + 10599] = 0.0 - k[4228]*y_cur[IDX_NaII]; + data[jistart + 10600] = 0.0 - k[4824]*y_cur[IDX_NaII]; + data[jistart + 10601] = 0.0 - k[3983]*y_cur[IDX_NaII]; + data[jistart + 10602] = 0.0 - k[4123]*y_cur[IDX_NaII]; + data[jistart + 10603] = 0.0 - k[4403]*y_cur[IDX_NaII]; + data[jistart + 10604] = 0.0 - k[4543]*y_cur[IDX_NaII]; + data[jistart + 10605] = 0.0 - k[4473]*y_cur[IDX_NaII]; + data[jistart + 10606] = 0.0 - k[4613]*y_cur[IDX_NaII]; + data[jistart + 10607] = 0.0 - k[3948]*y_cur[IDX_NaII]; + data[jistart + 10608] = 0.0 - k[4298]*y_cur[IDX_NaII]; + data[jistart + 10609] = 0.0 - k[4333]*y_cur[IDX_NaII]; + data[jistart + 10610] = 0.0 - k[3913]*y_cur[IDX_NaII]; + data[jistart + 10611] = 0.0 - k[4754]*y_cur[IDX_NaII]; + data[jistart + 10612] = 0.0 - k[4578]*y_cur[IDX_NaII]; + data[jistart + 10613] = 0.0 - k[4719]*y_cur[IDX_NaII]; + data[jistart + 10614] = 0.0 - k[4508]*y_cur[IDX_NaII]; + data[jistart + 10615] = 0.0 - k[4018]*y_cur[IDX_NaII]; + data[jistart + 10616] = 0.0 - k[4088]*y_cur[IDX_NaII]; + data[jistart + 10617] = 0.0 - k[4193]*y_cur[IDX_NaII]; + data[jistart + 10618] = 0.0 - k[4368]*y_cur[IDX_NaII]; + data[jistart + 10619] = 0.0 + k[3628]*y_cur[IDX_NaI]; + data[jistart + 10620] = 0.0 - k[4263]*y_cur[IDX_NaII]; + data[jistart + 10621] = 0.0 - k[4438]*y_cur[IDX_NaII]; + data[jistart + 10622] = 0.0 + k[473]*y_cur[IDX_NaI]; + data[jistart + 10623] = 0.0 - k[4158]*y_cur[IDX_NaII]; + data[jistart + 10624] = 0.0 + k[255]*y_cur[IDX_NaI]; + data[jistart + 10625] = 0.0 + k[642]*y_cur[IDX_NaI]; + data[jistart + 10626] = 0.0 + k[634]*y_cur[IDX_NaI]; + data[jistart + 10627] = 0.0 + k[639]*y_cur[IDX_NaI]; + data[jistart + 10628] = 0.0 - k[3913]*y_cur[IDX_CM] - k[3948]*y_cur[IDX_C10M] - + k[3983]*y_cur[IDX_C10HM] - k[4018]*y_cur[IDX_C2M] - + k[4053]*y_cur[IDX_C2HM] - k[4088]*y_cur[IDX_C3M] - + k[4123]*y_cur[IDX_C3HM] - k[4158]*y_cur[IDX_C3NM] - + k[4193]*y_cur[IDX_C4M] - k[4228]*y_cur[IDX_C4HM] - + k[4263]*y_cur[IDX_C5M] - k[4298]*y_cur[IDX_C5HM] - + k[4333]*y_cur[IDX_C5NM] - k[4368]*y_cur[IDX_C6M] - + k[4403]*y_cur[IDX_C6HM] - k[4438]*y_cur[IDX_C7M] - + k[4473]*y_cur[IDX_C7HM] - k[4508]*y_cur[IDX_C8M] - + k[4543]*y_cur[IDX_C8HM] - k[4578]*y_cur[IDX_C9M] - + k[4613]*y_cur[IDX_C9HM] - k[4648]*y_cur[IDX_CHM] - + k[4683]*y_cur[IDX_CNM] - k[4719]*y_cur[IDX_HM] - + k[4754]*y_cur[IDX_OM] - k[4789]*y_cur[IDX_O2M] - + k[4824]*y_cur[IDX_OHM] - k[4859]*y_cur[IDX_SM] - + k[5622]*y_cur[IDX_eM] - k[6351]*y_cur[IDX_GRAINM]; + data[jistart + 10629] = 0.0 + k[188]*y_cur[IDX_CII] + k[255]*y_cur[IDX_CHII] + + k[275]*y_cur[IDX_CH3II] + k[473]*y_cur[IDX_H2OII] + + k[596]*y_cur[IDX_NH3II] + k[632]*y_cur[IDX_C2H2II] + + k[633]*y_cur[IDX_CSII] + k[634]*y_cur[IDX_FeII] + + k[635]*y_cur[IDX_H2COII] + k[636]*y_cur[IDX_H2SII] + + k[637]*y_cur[IDX_HCOII] + k[638]*y_cur[IDX_HSII] + + k[639]*y_cur[IDX_MgII] + k[640]*y_cur[IDX_N2II] + + k[641]*y_cur[IDX_NOII] + k[642]*y_cur[IDX_O2II] + + k[643]*y_cur[IDX_SII] + k[644]*y_cur[IDX_SOII] + + k[645]*y_cur[IDX_SiII] + k[2728]*y_cur[IDX_H3II] + + k[2814]*y_cur[IDX_H3OII] + k[3628]*y_cur[IDX_H3COII] + + k[3629]*y_cur[IDX_HCNHII] + k[3630]*y_cur[IDX_HCNHII] + k[5894] + + k[6231] + k[6305]; + data[jistart + 10630] = 0.0 - k[4683]*y_cur[IDX_NaII]; + data[jistart + 10631] = 0.0 + k[644]*y_cur[IDX_NaI]; + data[jistart + 10632] = 0.0 + k[636]*y_cur[IDX_NaI]; + data[jistart + 10633] = 0.0 + k[635]*y_cur[IDX_NaI]; + data[jistart + 10634] = 0.0 + k[641]*y_cur[IDX_NaI]; + data[jistart + 10635] = 0.0 + k[3629]*y_cur[IDX_NaI] + k[3630]*y_cur[IDX_NaI]; + data[jistart + 10636] = 0.0 + k[596]*y_cur[IDX_NaI]; + data[jistart + 10637] = 0.0 + k[645]*y_cur[IDX_NaI]; + data[jistart + 10638] = 0.0 + k[643]*y_cur[IDX_NaI]; + data[jistart + 10639] = 0.0 + k[632]*y_cur[IDX_NaI]; + data[jistart + 10640] = 0.0 + k[275]*y_cur[IDX_NaI]; + data[jistart + 10641] = 0.0 + k[2814]*y_cur[IDX_NaI]; + data[jistart + 10642] = 0.0 + k[188]*y_cur[IDX_NaI]; + data[jistart + 10643] = 0.0 + k[637]*y_cur[IDX_NaI]; + data[jistart + 10644] = 0.0 + k[2728]*y_cur[IDX_NaI]; + data[jistart + 10645] = 0.0 - k[6351]*y_cur[IDX_NaII]; + data[jistart + 10646] = 0.0 - k[5622]*y_cur[IDX_NaII]; + data[jistart + 10647] = 0.0 + k[7088] + k[7270] + k[7452]; + data[jistart + 10648] = 0.0 - k[530]*y_cur[IDX_MgI]; + data[jistart + 10649] = 0.0 - k[535]*y_cur[IDX_MgI]; + data[jistart + 10650] = 0.0 - k[534]*y_cur[IDX_MgI]; + data[jistart + 10651] = 0.0 + k[4783]*y_cur[IDX_MgII]; + data[jistart + 10652] = 0.0 + k[4642]*y_cur[IDX_MgII]; + data[jistart + 10653] = 0.0 + k[4853]*y_cur[IDX_MgII]; + data[jistart + 10654] = 0.0 + k[4047]*y_cur[IDX_MgII]; + data[jistart + 10655] = 0.0 + k[4222]*y_cur[IDX_MgII]; + data[jistart + 10656] = 0.0 - k[2233]*y_cur[IDX_MgI]; + data[jistart + 10657] = 0.0 + k[4818]*y_cur[IDX_MgII]; + data[jistart + 10658] = 0.0 + k[3977]*y_cur[IDX_MgII]; + data[jistart + 10659] = 0.0 + k[4117]*y_cur[IDX_MgII]; + data[jistart + 10660] = 0.0 + k[4397]*y_cur[IDX_MgII]; + data[jistart + 10661] = 0.0 + k[4537]*y_cur[IDX_MgII]; + data[jistart + 10662] = 0.0 + k[4467]*y_cur[IDX_MgII]; + data[jistart + 10663] = 0.0 + k[4607]*y_cur[IDX_MgII]; + data[jistart + 10664] = 0.0 + k[3942]*y_cur[IDX_MgII]; + data[jistart + 10665] = 0.0 + k[4292]*y_cur[IDX_MgII]; + data[jistart + 10666] = 0.0 + k[4327]*y_cur[IDX_MgII]; + data[jistart + 10667] = 0.0 + k[3907]*y_cur[IDX_MgII]; + data[jistart + 10668] = 0.0 + k[4748]*y_cur[IDX_MgII]; + data[jistart + 10669] = 0.0 + k[4572]*y_cur[IDX_MgII]; + data[jistart + 10670] = 0.0 + k[4713]*y_cur[IDX_MgII]; + data[jistart + 10671] = 0.0 + k[4502]*y_cur[IDX_MgII]; + data[jistart + 10672] = 0.0 + k[4012]*y_cur[IDX_MgII]; + data[jistart + 10673] = 0.0 + k[4082]*y_cur[IDX_MgII]; + data[jistart + 10674] = 0.0 + k[4187]*y_cur[IDX_MgII]; + data[jistart + 10675] = 0.0 + k[4362]*y_cur[IDX_MgII]; + data[jistart + 10676] = 0.0 + k[4257]*y_cur[IDX_MgII]; + data[jistart + 10677] = 0.0 + k[4432]*y_cur[IDX_MgII]; + data[jistart + 10678] = 0.0 - k[541]*y_cur[IDX_MgI]; + data[jistart + 10679] = 0.0 - k[471]*y_cur[IDX_MgI]; + data[jistart + 10680] = 0.0 + k[4152]*y_cur[IDX_MgII]; + data[jistart + 10681] = 0.0 - k[252]*y_cur[IDX_MgI]; + data[jistart + 10682] = 0.0 - k[537]*y_cur[IDX_MgI]; + data[jistart + 10683] = 0.0 + k[639]*y_cur[IDX_NaI] + k[3907]*y_cur[IDX_CM] + + k[3942]*y_cur[IDX_C10M] + k[3977]*y_cur[IDX_C10HM] + + k[4012]*y_cur[IDX_C2M] + k[4047]*y_cur[IDX_C2HM] + + k[4082]*y_cur[IDX_C3M] + k[4117]*y_cur[IDX_C3HM] + + k[4152]*y_cur[IDX_C3NM] + k[4187]*y_cur[IDX_C4M] + + k[4222]*y_cur[IDX_C4HM] + k[4257]*y_cur[IDX_C5M] + + k[4292]*y_cur[IDX_C5HM] + k[4327]*y_cur[IDX_C5NM] + + k[4362]*y_cur[IDX_C6M] + k[4397]*y_cur[IDX_C6HM] + + k[4432]*y_cur[IDX_C7M] + k[4467]*y_cur[IDX_C7HM] + + k[4502]*y_cur[IDX_C8M] + k[4537]*y_cur[IDX_C8HM] + + k[4572]*y_cur[IDX_C9M] + k[4607]*y_cur[IDX_C9HM] + + k[4642]*y_cur[IDX_CHM] + k[4677]*y_cur[IDX_CNM] + + k[4713]*y_cur[IDX_HM] + k[4748]*y_cur[IDX_OM] + + k[4783]*y_cur[IDX_O2M] + k[4818]*y_cur[IDX_OHM] + + k[4853]*y_cur[IDX_SM] + k[5620]*y_cur[IDX_eM] + + k[6353]*y_cur[IDX_GRAINM]; + data[jistart + 10684] = 0.0 - k[182]*y_cur[IDX_CII] - k[252]*y_cur[IDX_CHII] - + k[273]*y_cur[IDX_CH3II] - k[398]*y_cur[IDX_HII] - + k[471]*y_cur[IDX_H2OII] - k[529]*y_cur[IDX_C2H2II] - + k[530]*y_cur[IDX_CSII] - k[531]*y_cur[IDX_H2COII] - + k[532]*y_cur[IDX_H2SII] - k[533]*y_cur[IDX_HCOII] - + k[534]*y_cur[IDX_HSII] - k[535]*y_cur[IDX_N2II] - + k[536]*y_cur[IDX_NOII] - k[537]*y_cur[IDX_O2II] - + k[538]*y_cur[IDX_SII] - k[539]*y_cur[IDX_SOII] - + k[540]*y_cur[IDX_SiII] - k[541]*y_cur[IDX_SiOII] - + k[556]*y_cur[IDX_NII] - k[594]*y_cur[IDX_NH3II] - + k[2233]*y_cur[IDX_CH5II] - k[2717]*y_cur[IDX_H3II] - k[5877] - + k[6210] - k[6306] - k[6906]; + data[jistart + 10685] = 0.0 + k[639]*y_cur[IDX_MgII]; + data[jistart + 10686] = 0.0 + k[4677]*y_cur[IDX_MgII]; + data[jistart + 10687] = 0.0 - k[539]*y_cur[IDX_MgI]; + data[jistart + 10688] = 0.0 - k[532]*y_cur[IDX_MgI]; + data[jistart + 10689] = 0.0 - k[556]*y_cur[IDX_MgI]; + data[jistart + 10690] = 0.0 - k[531]*y_cur[IDX_MgI]; + data[jistart + 10691] = 0.0 - k[536]*y_cur[IDX_MgI]; + data[jistart + 10692] = 0.0 - k[594]*y_cur[IDX_MgI]; + data[jistart + 10693] = 0.0 - k[540]*y_cur[IDX_MgI]; + data[jistart + 10694] = 0.0 - k[538]*y_cur[IDX_MgI]; + data[jistart + 10695] = 0.0 - k[529]*y_cur[IDX_MgI]; + data[jistart + 10696] = 0.0 - k[273]*y_cur[IDX_MgI]; + data[jistart + 10697] = 0.0 - k[182]*y_cur[IDX_MgI]; + data[jistart + 10698] = 0.0 - k[398]*y_cur[IDX_MgI]; + data[jistart + 10699] = 0.0 - k[533]*y_cur[IDX_MgI]; + data[jistart + 10700] = 0.0 - k[2717]*y_cur[IDX_MgI]; + data[jistart + 10701] = 0.0 + k[6353]*y_cur[IDX_MgII]; + data[jistart + 10702] = 0.0 + k[5620]*y_cur[IDX_MgII]; + data[jistart + 10703] = 0.0 + k[7087] + k[7269] + k[7451]; + data[jistart + 10704] = 0.0 - k[633]*y_cur[IDX_NaI]; + data[jistart + 10705] = 0.0 - k[640]*y_cur[IDX_NaI]; + data[jistart + 10706] = 0.0 - k[638]*y_cur[IDX_NaI]; + data[jistart + 10707] = 0.0 + k[4789]*y_cur[IDX_NaII]; + data[jistart + 10708] = 0.0 + k[4648]*y_cur[IDX_NaII]; + data[jistart + 10709] = 0.0 + k[4859]*y_cur[IDX_NaII]; + data[jistart + 10710] = 0.0 + k[4053]*y_cur[IDX_NaII]; + data[jistart + 10711] = 0.0 + k[4228]*y_cur[IDX_NaII]; + data[jistart + 10712] = 0.0 + k[4824]*y_cur[IDX_NaII]; + data[jistart + 10713] = 0.0 + k[3983]*y_cur[IDX_NaII]; + data[jistart + 10714] = 0.0 + k[4123]*y_cur[IDX_NaII]; + data[jistart + 10715] = 0.0 + k[4403]*y_cur[IDX_NaII]; + data[jistart + 10716] = 0.0 + k[4543]*y_cur[IDX_NaII]; + data[jistart + 10717] = 0.0 + k[4473]*y_cur[IDX_NaII]; + data[jistart + 10718] = 0.0 + k[4613]*y_cur[IDX_NaII]; + data[jistart + 10719] = 0.0 + k[3948]*y_cur[IDX_NaII]; + data[jistart + 10720] = 0.0 + k[4298]*y_cur[IDX_NaII]; + data[jistart + 10721] = 0.0 + k[4333]*y_cur[IDX_NaII]; + data[jistart + 10722] = 0.0 + k[3913]*y_cur[IDX_NaII]; + data[jistart + 10723] = 0.0 + k[4754]*y_cur[IDX_NaII]; + data[jistart + 10724] = 0.0 + k[4578]*y_cur[IDX_NaII]; + data[jistart + 10725] = 0.0 + k[4719]*y_cur[IDX_NaII]; + data[jistart + 10726] = 0.0 + k[4508]*y_cur[IDX_NaII]; + data[jistart + 10727] = 0.0 + k[4018]*y_cur[IDX_NaII]; + data[jistart + 10728] = 0.0 + k[4088]*y_cur[IDX_NaII]; + data[jistart + 10729] = 0.0 + k[4193]*y_cur[IDX_NaII]; + data[jistart + 10730] = 0.0 + k[4368]*y_cur[IDX_NaII]; + data[jistart + 10731] = 0.0 - k[3628]*y_cur[IDX_NaI]; + data[jistart + 10732] = 0.0 + k[4263]*y_cur[IDX_NaII]; + data[jistart + 10733] = 0.0 + k[4438]*y_cur[IDX_NaII]; + data[jistart + 10734] = 0.0 - k[473]*y_cur[IDX_NaI]; + data[jistart + 10735] = 0.0 + k[4158]*y_cur[IDX_NaII]; + data[jistart + 10736] = 0.0 - k[255]*y_cur[IDX_NaI]; + data[jistart + 10737] = 0.0 - k[642]*y_cur[IDX_NaI]; + data[jistart + 10738] = 0.0 - k[634]*y_cur[IDX_NaI]; + data[jistart + 10739] = 0.0 - k[639]*y_cur[IDX_NaI]; + data[jistart + 10740] = 0.0 + k[3913]*y_cur[IDX_CM] + k[3948]*y_cur[IDX_C10M] + + k[3983]*y_cur[IDX_C10HM] + k[4018]*y_cur[IDX_C2M] + + k[4053]*y_cur[IDX_C2HM] + k[4088]*y_cur[IDX_C3M] + + k[4123]*y_cur[IDX_C3HM] + k[4158]*y_cur[IDX_C3NM] + + k[4193]*y_cur[IDX_C4M] + k[4228]*y_cur[IDX_C4HM] + + k[4263]*y_cur[IDX_C5M] + k[4298]*y_cur[IDX_C5HM] + + k[4333]*y_cur[IDX_C5NM] + k[4368]*y_cur[IDX_C6M] + + k[4403]*y_cur[IDX_C6HM] + k[4438]*y_cur[IDX_C7M] + + k[4473]*y_cur[IDX_C7HM] + k[4508]*y_cur[IDX_C8M] + + k[4543]*y_cur[IDX_C8HM] + k[4578]*y_cur[IDX_C9M] + + k[4613]*y_cur[IDX_C9HM] + k[4648]*y_cur[IDX_CHM] + + k[4683]*y_cur[IDX_CNM] + k[4719]*y_cur[IDX_HM] + + k[4754]*y_cur[IDX_OM] + k[4789]*y_cur[IDX_O2M] + + k[4824]*y_cur[IDX_OHM] + k[4859]*y_cur[IDX_SM] + + k[5622]*y_cur[IDX_eM] + k[6351]*y_cur[IDX_GRAINM]; + data[jistart + 10741] = 0.0 - k[188]*y_cur[IDX_CII] - k[255]*y_cur[IDX_CHII] - + k[275]*y_cur[IDX_CH3II] - k[473]*y_cur[IDX_H2OII] - + k[596]*y_cur[IDX_NH3II] - k[632]*y_cur[IDX_C2H2II] - + k[633]*y_cur[IDX_CSII] - k[634]*y_cur[IDX_FeII] - + k[635]*y_cur[IDX_H2COII] - k[636]*y_cur[IDX_H2SII] - + k[637]*y_cur[IDX_HCOII] - k[638]*y_cur[IDX_HSII] - + k[639]*y_cur[IDX_MgII] - k[640]*y_cur[IDX_N2II] - + k[641]*y_cur[IDX_NOII] - k[642]*y_cur[IDX_O2II] - + k[643]*y_cur[IDX_SII] - k[644]*y_cur[IDX_SOII] - + k[645]*y_cur[IDX_SiII] - k[2728]*y_cur[IDX_H3II] - + k[2814]*y_cur[IDX_H3OII] - k[3628]*y_cur[IDX_H3COII] - + k[3629]*y_cur[IDX_HCNHII] - k[3630]*y_cur[IDX_HCNHII] - k[5894] - + k[6231] - k[6305] - k[6905]; + data[jistart + 10742] = 0.0 + k[4683]*y_cur[IDX_NaII]; + data[jistart + 10743] = 0.0 - k[644]*y_cur[IDX_NaI]; + data[jistart + 10744] = 0.0 - k[636]*y_cur[IDX_NaI]; + data[jistart + 10745] = 0.0 - k[635]*y_cur[IDX_NaI]; + data[jistart + 10746] = 0.0 - k[641]*y_cur[IDX_NaI]; + data[jistart + 10747] = 0.0 - k[3629]*y_cur[IDX_NaI] - k[3630]*y_cur[IDX_NaI]; + data[jistart + 10748] = 0.0 - k[596]*y_cur[IDX_NaI]; + data[jistart + 10749] = 0.0 - k[645]*y_cur[IDX_NaI]; + data[jistart + 10750] = 0.0 - k[643]*y_cur[IDX_NaI]; + data[jistart + 10751] = 0.0 - k[632]*y_cur[IDX_NaI]; + data[jistart + 10752] = 0.0 - k[275]*y_cur[IDX_NaI]; + data[jistart + 10753] = 0.0 - k[2814]*y_cur[IDX_NaI]; + data[jistart + 10754] = 0.0 - k[188]*y_cur[IDX_NaI]; + data[jistart + 10755] = 0.0 - k[637]*y_cur[IDX_NaI]; + data[jistart + 10756] = 0.0 - k[2728]*y_cur[IDX_NaI]; + data[jistart + 10757] = 0.0 + k[6351]*y_cur[IDX_NaII]; + data[jistart + 10758] = 0.0 + k[5622]*y_cur[IDX_NaII]; + data[jistart + 10759] = 0.0 + k[7246] + k[7428] + k[7610]; + data[jistart + 10760] = 0.0 + k[8682]*y_cur[IDX_GCI]; + data[jistart + 10761] = 0.0 + k[5342]*y_cur[IDX_OI] + k[5692]; + data[jistart + 10762] = 0.0 + k[729]*y_cur[IDX_eM] + k[6871]*y_cur[IDX_GRAINM]; + data[jistart + 10763] = 0.0 + k[5957]; + data[jistart + 10764] = 0.0 + k[3926]*y_cur[IDX_C10M]; + data[jistart + 10765] = 0.0 + k[3929]*y_cur[IDX_C10M]; + data[jistart + 10766] = 0.0 + k[3955]*y_cur[IDX_C10M]; + data[jistart + 10767] = 0.0 + k[3936]*y_cur[IDX_C10M]; + data[jistart + 10768] = 0.0 + k[3921]*y_cur[IDX_CII] + k[3922]*y_cur[IDX_C2H2II] + + k[3923]*y_cur[IDX_C2H3II] + k[3924]*y_cur[IDX_C4H2II] + + k[3925]*y_cur[IDX_C4H3II] + k[3926]*y_cur[IDX_C4SII] + + k[3927]*y_cur[IDX_CH2CCHII] + k[3928]*y_cur[IDX_CH3II] + + k[3929]*y_cur[IDX_CNCII] + k[3930]*y_cur[IDX_FeII] + + k[3931]*y_cur[IDX_HII] + k[3932]*y_cur[IDX_H2COII] + + k[3933]*y_cur[IDX_H2SII] + k[3934]*y_cur[IDX_H3II] + + k[3935]*y_cur[IDX_H3OII] + k[3936]*y_cur[IDX_HC2SII] + + k[3937]*y_cur[IDX_HCNHII] + k[3938]*y_cur[IDX_HCNHII] + + k[3939]*y_cur[IDX_HCOII] + k[3940]*y_cur[IDX_HCOII] + + k[3941]*y_cur[IDX_HeII] + k[3942]*y_cur[IDX_MgII] + + k[3943]*y_cur[IDX_NII] + k[3944]*y_cur[IDX_N2HII] + + k[3945]*y_cur[IDX_NH3II] + k[3946]*y_cur[IDX_NH4II] + + k[3947]*y_cur[IDX_NOII] + k[3948]*y_cur[IDX_NaII] + + k[3949]*y_cur[IDX_OII] + k[3950]*y_cur[IDX_SII] + + k[3951]*y_cur[IDX_SOII] + k[3952]*y_cur[IDX_SiII] + + k[3953]*y_cur[IDX_SiOII] + k[3954]*y_cur[IDX_SiOHII] + + k[3955]*y_cur[IDX_SiSII] + k[5687] + k[5949]; + data[jistart + 10769] = 0.0 + k[53]*y_cur[IDX_CI]; + data[jistart + 10770] = 0.0 + k[36]*y_cur[IDX_C2I]; + data[jistart + 10771] = 0.0 + k[16]*y_cur[IDX_C8I]; + data[jistart + 10772] = 0.0 + k[21]*y_cur[IDX_C7I]; + data[jistart + 10773] = 0.0 + k[26]*y_cur[IDX_C6I]; + data[jistart + 10774] = 0.0 + k[33]*y_cur[IDX_C4I]; + data[jistart + 10775] = 0.0 + k[30]*y_cur[IDX_C5I]; + data[jistart + 10776] = 0.0 + k[35]*y_cur[IDX_C3I]; + data[jistart + 10777] = 0.0 + k[3953]*y_cur[IDX_C10M]; + data[jistart + 10778] = 0.0 + k[3954]*y_cur[IDX_C10M]; + data[jistart + 10779] = 0.0 + k[5691] + k[5961]; + data[jistart + 10780] = 0.0 + k[4942]*y_cur[IDX_CI]; + data[jistart + 10781] = 0.0 + k[3930]*y_cur[IDX_C10M]; + data[jistart + 10782] = 0.0 + k[3942]*y_cur[IDX_C10M]; + data[jistart + 10783] = 0.0 + k[3948]*y_cur[IDX_C10M]; + data[jistart + 10784] = 0.0 - k[320]*y_cur[IDX_HII] - k[506]*y_cur[IDX_HeII] - + k[2293]*y_cur[IDX_HII] - k[2583]*y_cur[IDX_H3II] - + k[2899]*y_cur[IDX_HCOII] - k[3056]*y_cur[IDX_HeII] - + k[3057]*y_cur[IDX_HeII] - k[3058]*y_cur[IDX_HeII] - + k[3059]*y_cur[IDX_HeII] - k[3060]*y_cur[IDX_HeII] - + k[3061]*y_cur[IDX_HeII] - k[5221]*y_cur[IDX_NI] - + k[5340]*y_cur[IDX_OI] - k[5495]*y_cur[IDX_CII] - + k[5587]*y_cur[IDX_eM] - k[5688] - k[5950] - k[5951] - k[5952] - + k[5953] - k[5954] - k[5955] - k[7064]; + data[jistart + 10785] = 0.0 + k[21]*y_cur[IDX_C3M]; + data[jistart + 10786] = 0.0 + k[16]*y_cur[IDX_C2M]; + data[jistart + 10787] = 0.0 + k[8682]*y_cur[IDX_GC9I]; + data[jistart + 10788] = 0.0 + k[30]*y_cur[IDX_C5M]; + data[jistart + 10789] = 0.0 + k[26]*y_cur[IDX_C4M]; + data[jistart + 10790] = 0.0 + k[33]*y_cur[IDX_C6M]; + data[jistart + 10791] = 0.0 + k[3925]*y_cur[IDX_C10M]; + data[jistart + 10792] = 0.0 + k[3944]*y_cur[IDX_C10M]; + data[jistart + 10793] = 0.0 + k[3951]*y_cur[IDX_C10M]; + data[jistart + 10794] = 0.0 + k[3927]*y_cur[IDX_C10M]; + data[jistart + 10795] = 0.0 + k[3933]*y_cur[IDX_C10M]; + data[jistart + 10796] = 0.0 + k[3943]*y_cur[IDX_C10M]; + data[jistart + 10797] = 0.0 + k[3932]*y_cur[IDX_C10M]; + data[jistart + 10798] = 0.0 + k[35]*y_cur[IDX_C7M]; + data[jistart + 10799] = 0.0 + k[3947]*y_cur[IDX_C10M]; + data[jistart + 10800] = 0.0 + k[3949]*y_cur[IDX_C10M]; + data[jistart + 10801] = 0.0 + k[3924]*y_cur[IDX_C10M]; + data[jistart + 10802] = 0.0 + k[3937]*y_cur[IDX_C10M] + k[3938]*y_cur[IDX_C10M]; + data[jistart + 10803] = 0.0 + k[3945]*y_cur[IDX_C10M]; + data[jistart + 10804] = 0.0 + k[3946]*y_cur[IDX_C10M]; + data[jistart + 10805] = 0.0 + k[3952]*y_cur[IDX_C10M]; + data[jistart + 10806] = 0.0 + k[3950]*y_cur[IDX_C10M]; + data[jistart + 10807] = 0.0 + k[3923]*y_cur[IDX_C10M]; + data[jistart + 10808] = 0.0 + k[36]*y_cur[IDX_C8M]; + data[jistart + 10809] = 0.0 + k[3922]*y_cur[IDX_C10M]; + data[jistart + 10810] = 0.0 + k[3928]*y_cur[IDX_C10M]; + data[jistart + 10811] = 0.0 - k[5221]*y_cur[IDX_C10I]; + data[jistart + 10812] = 0.0 + k[3935]*y_cur[IDX_C10M]; + data[jistart + 10813] = 0.0 - k[5340]*y_cur[IDX_C10I] + k[5342]*y_cur[IDX_C11I]; + data[jistart + 10814] = 0.0 - k[506]*y_cur[IDX_C10I] - k[3056]*y_cur[IDX_C10I] - + k[3057]*y_cur[IDX_C10I] - k[3058]*y_cur[IDX_C10I] - + k[3059]*y_cur[IDX_C10I] - k[3060]*y_cur[IDX_C10I] - + k[3061]*y_cur[IDX_C10I] + k[3941]*y_cur[IDX_C10M]; + data[jistart + 10815] = 0.0 + k[3921]*y_cur[IDX_C10M] - k[5495]*y_cur[IDX_C10I]; + data[jistart + 10816] = 0.0 - k[320]*y_cur[IDX_C10I] - k[2293]*y_cur[IDX_C10I] + + k[3931]*y_cur[IDX_C10M]; + data[jistart + 10817] = 0.0 + k[53]*y_cur[IDX_C9M] + k[4942]*y_cur[IDX_C9HI]; + data[jistart + 10818] = 0.0 - k[2899]*y_cur[IDX_C10I] + k[3939]*y_cur[IDX_C10M] + + k[3940]*y_cur[IDX_C10M]; + data[jistart + 10819] = 0.0 - k[2583]*y_cur[IDX_C10I] + k[3934]*y_cur[IDX_C10M]; + data[jistart + 10820] = 0.0 + k[6871]*y_cur[IDX_C10HII]; + data[jistart + 10821] = 0.0 + k[729]*y_cur[IDX_C10HII] - k[5587]*y_cur[IDX_C10I]; + data[jistart + 10822] = 0.0 + k[888]*y_cur[IDX_eM] + k[6854]*y_cur[IDX_GRAINM]; + data[jistart + 10823] = 0.0 + k[7238] + k[7420] + k[7602]; + data[jistart + 10824] = 0.0 + k[1086]*y_cur[IDX_eM] + k[6876]*y_cur[IDX_GRAINM]; + data[jistart + 10825] = 0.0 + k[8679]*y_cur[IDX_GCI]; + data[jistart + 10826] = 0.0 + k[8643]*y_cur[IDX_GHI]; + data[jistart + 10827] = 0.0 + k[886]*y_cur[IDX_eM] + k[6848]*y_cur[IDX_GRAINM]; + data[jistart + 10828] = 0.0 + k[8732]*y_cur[IDX_GCHI]; + data[jistart + 10829] = 0.0 + k[5853] + k[6179]; + data[jistart + 10830] = 0.0 + k[884]*y_cur[IDX_eM] + k[6846]*y_cur[IDX_GRAINM]; + data[jistart + 10831] = 0.0 + k[891]*y_cur[IDX_eM] + k[6857]*y_cur[IDX_GRAINM]; + data[jistart + 10832] = 0.0 + k[5764] + k[6056]; + data[jistart + 10833] = 0.0 + k[3724]*y_cur[IDX_OI]; + data[jistart + 10834] = 0.0 + k[4935]*y_cur[IDX_CI]; + data[jistart + 10835] = 0.0 + k[882]*y_cur[IDX_eM] + k[6842]*y_cur[IDX_GRAINM]; + data[jistart + 10836] = 0.0 + k[4521]*y_cur[IDX_C8HM]; + data[jistart + 10837] = 0.0 + k[4524]*y_cur[IDX_C8HM]; + data[jistart + 10838] = 0.0 + k[4550]*y_cur[IDX_C8HM]; + data[jistart + 10839] = 0.0 + k[4531]*y_cur[IDX_C8HM]; + data[jistart + 10840] = 0.0 + k[4516]*y_cur[IDX_CII] + k[4517]*y_cur[IDX_C2H2II] + + k[4518]*y_cur[IDX_C2H3II] + k[4519]*y_cur[IDX_C4H2II] + + k[4520]*y_cur[IDX_C4H3II] + k[4521]*y_cur[IDX_C4SII] + + k[4522]*y_cur[IDX_CH2CCHII] + k[4523]*y_cur[IDX_CH3II] + + k[4524]*y_cur[IDX_CNCII] + k[4525]*y_cur[IDX_FeII] + + k[4526]*y_cur[IDX_HII] + k[4527]*y_cur[IDX_H2COII] + + k[4528]*y_cur[IDX_H2SII] + k[4529]*y_cur[IDX_H3II] + + k[4530]*y_cur[IDX_H3OII] + k[4531]*y_cur[IDX_HC2SII] + + k[4532]*y_cur[IDX_HCNHII] + k[4533]*y_cur[IDX_HCNHII] + + k[4534]*y_cur[IDX_HCOII] + k[4535]*y_cur[IDX_HCOII] + + k[4536]*y_cur[IDX_HeII] + k[4537]*y_cur[IDX_MgII] + + k[4538]*y_cur[IDX_NII] + k[4539]*y_cur[IDX_N2HII] + + k[4540]*y_cur[IDX_NH3II] + k[4541]*y_cur[IDX_NH4II] + + k[4542]*y_cur[IDX_NOII] + k[4543]*y_cur[IDX_NaII] + + k[4544]*y_cur[IDX_OII] + k[4545]*y_cur[IDX_SII] + + k[4546]*y_cur[IDX_SOII] + k[4547]*y_cur[IDX_SiII] + + k[4548]*y_cur[IDX_SiOII] + k[4549]*y_cur[IDX_SiOHII] + + k[4550]*y_cur[IDX_SiSII] + k[5763] + k[6054]; + data[jistart + 10841] = 0.0 + k[50]*y_cur[IDX_CI]; + data[jistart + 10842] = 0.0 + k[3448]*y_cur[IDX_NI]; + data[jistart + 10843] = 0.0 + k[101]*y_cur[IDX_HI]; + data[jistart + 10844] = 0.0 + k[4548]*y_cur[IDX_C8HM]; + data[jistart + 10845] = 0.0 + k[8732]*y_cur[IDX_GC7I]; + data[jistart + 10846] = 0.0 + k[4549]*y_cur[IDX_C8HM]; + data[jistart + 10847] = 0.0 + k[5376]*y_cur[IDX_OI]; + data[jistart + 10848] = 0.0 + k[4525]*y_cur[IDX_C8HM]; + data[jistart + 10849] = 0.0 + k[4537]*y_cur[IDX_C8HM]; + data[jistart + 10850] = 0.0 + k[4543]*y_cur[IDX_C8HM]; + data[jistart + 10851] = 0.0 - k[354]*y_cur[IDX_HII] - k[1337]*y_cur[IDX_CII] - + k[1505]*y_cur[IDX_C2H2II] - k[1506]*y_cur[IDX_C2H2II] - + k[2060]*y_cur[IDX_CH3II] - k[2311]*y_cur[IDX_HII] - + k[2627]*y_cur[IDX_H3II] - k[2932]*y_cur[IDX_HCOII] - + k[3147]*y_cur[IDX_HeII] - k[3148]*y_cur[IDX_HeII] - + k[4940]*y_cur[IDX_CI] - k[5249]*y_cur[IDX_NI] - + k[5374]*y_cur[IDX_OI] - k[5604]*y_cur[IDX_eM] - k[5765] - k[6057] - + k[6058] - k[7056]; + data[jistart + 10852] = 0.0 + k[8679]*y_cur[IDX_GC7HI]; + data[jistart + 10853] = 0.0 + k[4520]*y_cur[IDX_C8HM]; + data[jistart + 10854] = 0.0 + k[4539]*y_cur[IDX_C8HM]; + data[jistart + 10855] = 0.0 + k[4546]*y_cur[IDX_C8HM]; + data[jistart + 10856] = 0.0 + k[4522]*y_cur[IDX_C8HM]; + data[jistart + 10857] = 0.0 + k[4528]*y_cur[IDX_C8HM]; + data[jistart + 10858] = 0.0 + k[4538]*y_cur[IDX_C8HM]; + data[jistart + 10859] = 0.0 + k[4527]*y_cur[IDX_C8HM]; + data[jistart + 10860] = 0.0 + k[4542]*y_cur[IDX_C8HM]; + data[jistart + 10861] = 0.0 + k[4544]*y_cur[IDX_C8HM]; + data[jistart + 10862] = 0.0 + k[4519]*y_cur[IDX_C8HM]; + data[jistart + 10863] = 0.0 + k[4532]*y_cur[IDX_C8HM] + k[4533]*y_cur[IDX_C8HM]; + data[jistart + 10864] = 0.0 + k[4540]*y_cur[IDX_C8HM]; + data[jistart + 10865] = 0.0 + k[4541]*y_cur[IDX_C8HM]; + data[jistart + 10866] = 0.0 + k[4547]*y_cur[IDX_C8HM]; + data[jistart + 10867] = 0.0 + k[4545]*y_cur[IDX_C8HM]; + data[jistart + 10868] = 0.0 + k[4518]*y_cur[IDX_C8HM]; + data[jistart + 10869] = 0.0 - k[1505]*y_cur[IDX_C8HI] - k[1506]*y_cur[IDX_C8HI] + + k[4517]*y_cur[IDX_C8HM]; + data[jistart + 10870] = 0.0 - k[2060]*y_cur[IDX_C8HI] + k[4523]*y_cur[IDX_C8HM]; + data[jistart + 10871] = 0.0 + k[8643]*y_cur[IDX_GC8I]; + data[jistart + 10872] = 0.0 + k[3448]*y_cur[IDX_C9HM] - k[5249]*y_cur[IDX_C8HI]; + data[jistart + 10873] = 0.0 + k[4530]*y_cur[IDX_C8HM]; + data[jistart + 10874] = 0.0 + k[3724]*y_cur[IDX_C9H2II] - k[5374]*y_cur[IDX_C8HI] + + k[5376]*y_cur[IDX_C9HI]; + data[jistart + 10875] = 0.0 - k[3147]*y_cur[IDX_C8HI] - k[3148]*y_cur[IDX_C8HI] + + k[4536]*y_cur[IDX_C8HM]; + data[jistart + 10876] = 0.0 - k[1337]*y_cur[IDX_C8HI] + k[4516]*y_cur[IDX_C8HM]; + data[jistart + 10877] = 0.0 - k[354]*y_cur[IDX_C8HI] - k[2311]*y_cur[IDX_C8HI] + + k[4526]*y_cur[IDX_C8HM]; + data[jistart + 10878] = 0.0 + k[50]*y_cur[IDX_C7HM] + k[4935]*y_cur[IDX_C7H2I] - + k[4940]*y_cur[IDX_C8HI]; + data[jistart + 10879] = 0.0 - k[2932]*y_cur[IDX_C8HI] + k[4534]*y_cur[IDX_C8HM] + + k[4535]*y_cur[IDX_C8HM]; + data[jistart + 10880] = 0.0 - k[2627]*y_cur[IDX_C8HI] + k[4529]*y_cur[IDX_C8HM]; + data[jistart + 10881] = 0.0 + k[6842]*y_cur[IDX_C8H2II] + k[6846]*y_cur[IDX_C8H3II] + + k[6848]*y_cur[IDX_C8H4II] + k[6854]*y_cur[IDX_C8H5II] + + k[6857]*y_cur[IDX_C9HII] + k[6876]*y_cur[IDX_HC9NII]; + data[jistart + 10882] = 0.0 + k[882]*y_cur[IDX_C8H2II] + k[884]*y_cur[IDX_C8H3II] + + k[886]*y_cur[IDX_C8H4II] + k[888]*y_cur[IDX_C8H5II] + + k[891]*y_cur[IDX_C9HII] + k[1086]*y_cur[IDX_HC9NII] - + k[5604]*y_cur[IDX_C8HI]; + data[jistart + 10883] = 0.0 + k[101]*y_cur[IDX_C8M]; + data[jistart + 10884] = 0.0 + k[5972]; + data[jistart + 10885] = 0.0 + k[736]*y_cur[IDX_eM] + k[6885]*y_cur[IDX_GRAINM]; + data[jistart + 10886] = 0.0 + k[8676]*y_cur[IDX_GCI]; + data[jistart + 10887] = 0.0 + k[889]*y_cur[IDX_eM] + k[6855]*y_cur[IDX_GRAINM]; + data[jistart + 10888] = 0.0 + k[7232] + k[7414] + k[7596]; + data[jistart + 10889] = 0.0 + k[878]*y_cur[IDX_eM] + k[6837]*y_cur[IDX_GRAINM]; + data[jistart + 10890] = 0.0 + k[4937]*y_cur[IDX_CI]; + data[jistart + 10891] = 0.0 + k[867]*y_cur[IDX_eM] + k[6825]*y_cur[IDX_GRAINM]; + data[jistart + 10892] = 0.0 + k[868]*y_cur[IDX_eM] + k[6826]*y_cur[IDX_GRAINM]; + data[jistart + 10893] = 0.0 + k[4416]*y_cur[IDX_C7M]; + data[jistart + 10894] = 0.0 + k[4419]*y_cur[IDX_C7M]; + data[jistart + 10895] = 0.0 + k[4445]*y_cur[IDX_C7M]; + data[jistart + 10896] = 0.0 + k[4426]*y_cur[IDX_C7M]; + data[jistart + 10897] = 0.0 + k[3377]*y_cur[IDX_NI]; + data[jistart + 10898] = 0.0 + k[3438]*y_cur[IDX_NI]; + data[jistart + 10899] = 0.0 + k[13]*y_cur[IDX_C5I] - k[15]*y_cur[IDX_C7I]; + data[jistart + 10900] = 0.0 + k[18]*y_cur[IDX_C4I] - k[21]*y_cur[IDX_C7I]; + data[jistart + 10901] = 0.0 + k[23]*y_cur[IDX_C3I]; + data[jistart + 10902] = 0.0 + k[47]*y_cur[IDX_CI]; + data[jistart + 10903] = 0.0 + k[27]*y_cur[IDX_C2I]; + data[jistart + 10904] = 0.0 + k[4411]*y_cur[IDX_CII] + k[4412]*y_cur[IDX_C2H2II] + + k[4413]*y_cur[IDX_C2H3II] + k[4414]*y_cur[IDX_C4H2II] + + k[4415]*y_cur[IDX_C4H3II] + k[4416]*y_cur[IDX_C4SII] + + k[4417]*y_cur[IDX_CH2CCHII] + k[4418]*y_cur[IDX_CH3II] + + k[4419]*y_cur[IDX_CNCII] + k[4420]*y_cur[IDX_FeII] + + k[4421]*y_cur[IDX_HII] + k[4422]*y_cur[IDX_H2COII] + + k[4423]*y_cur[IDX_H2SII] + k[4424]*y_cur[IDX_H3II] + + k[4425]*y_cur[IDX_H3OII] + k[4426]*y_cur[IDX_HC2SII] + + k[4427]*y_cur[IDX_HCNHII] + k[4428]*y_cur[IDX_HCNHII] + + k[4429]*y_cur[IDX_HCOII] + k[4430]*y_cur[IDX_HCOII] + + k[4431]*y_cur[IDX_HeII] + k[4432]*y_cur[IDX_MgII] + + k[4433]*y_cur[IDX_NII] + k[4434]*y_cur[IDX_N2HII] + + k[4435]*y_cur[IDX_NH3II] + k[4436]*y_cur[IDX_NH4II] + + k[4437]*y_cur[IDX_NOII] + k[4438]*y_cur[IDX_NaII] + + k[4439]*y_cur[IDX_OII] + k[4440]*y_cur[IDX_SII] + + k[4441]*y_cur[IDX_SOII] + k[4442]*y_cur[IDX_SiII] + + k[4443]*y_cur[IDX_SiOII] + k[4444]*y_cur[IDX_SiOHII] + + k[4445]*y_cur[IDX_SiSII] + k[5755] + k[6041]; + data[jistart + 10905] = 0.0 + k[4443]*y_cur[IDX_C7M]; + data[jistart + 10906] = 0.0 + k[4444]*y_cur[IDX_C7M]; + data[jistart + 10907] = 0.0 + k[5965]; + data[jistart + 10908] = 0.0 + k[4420]*y_cur[IDX_C7M]; + data[jistart + 10909] = 0.0 + k[4432]*y_cur[IDX_C7M]; + data[jistart + 10910] = 0.0 + k[4438]*y_cur[IDX_C7M]; + data[jistart + 10911] = 0.0 + k[5953]; + data[jistart + 10912] = 0.0 - k[15]*y_cur[IDX_C2M] - k[21]*y_cur[IDX_C3M] - + k[349]*y_cur[IDX_HII] - k[2621]*y_cur[IDX_H3II] - + k[2926]*y_cur[IDX_HCOII] - k[3134]*y_cur[IDX_HeII] - + k[3135]*y_cur[IDX_HeII] - k[4934]*y_cur[IDX_CI] - + k[5244]*y_cur[IDX_NI] - k[5370]*y_cur[IDX_OI] - + k[5500]*y_cur[IDX_CII] - k[5601]*y_cur[IDX_eM] - k[5756] - k[6042] - + k[6043] - k[7050]; + data[jistart + 10913] = 0.0 + k[4938]*y_cur[IDX_CI] + k[5248]*y_cur[IDX_NI] + + k[5373]*y_cur[IDX_OI] + k[5762] + k[6052]; + data[jistart + 10914] = 0.0 + k[8676]*y_cur[IDX_GC6I]; + data[jistart + 10915] = 0.0 + k[13]*y_cur[IDX_C2M]; + data[jistart + 10916] = 0.0 + k[18]*y_cur[IDX_C3M]; + data[jistart + 10917] = 0.0 + k[5759] + k[6047]; + data[jistart + 10918] = 0.0 + k[4415]*y_cur[IDX_C7M]; + data[jistart + 10919] = 0.0 + k[4434]*y_cur[IDX_C7M]; + data[jistart + 10920] = 0.0 + k[4441]*y_cur[IDX_C7M]; + data[jistart + 10921] = 0.0 + k[4417]*y_cur[IDX_C7M]; + data[jistart + 10922] = 0.0 + k[4933]*y_cur[IDX_CI]; + data[jistart + 10923] = 0.0 + k[4423]*y_cur[IDX_C7M]; + data[jistart + 10924] = 0.0 + k[4433]*y_cur[IDX_C7M]; + data[jistart + 10925] = 0.0 + k[4422]*y_cur[IDX_C7M]; + data[jistart + 10926] = 0.0 + k[23]*y_cur[IDX_C4M]; + data[jistart + 10927] = 0.0 + k[4437]*y_cur[IDX_C7M]; + data[jistart + 10928] = 0.0 + k[4439]*y_cur[IDX_C7M]; + data[jistart + 10929] = 0.0 + k[4414]*y_cur[IDX_C7M]; + data[jistart + 10930] = 0.0 + k[4427]*y_cur[IDX_C7M] + k[4428]*y_cur[IDX_C7M]; + data[jistart + 10931] = 0.0 + k[4435]*y_cur[IDX_C7M]; + data[jistart + 10932] = 0.0 + k[4436]*y_cur[IDX_C7M]; + data[jistart + 10933] = 0.0 + k[4442]*y_cur[IDX_C7M]; + data[jistart + 10934] = 0.0 + k[4440]*y_cur[IDX_C7M]; + data[jistart + 10935] = 0.0 + k[4413]*y_cur[IDX_C7M]; + data[jistart + 10936] = 0.0 + k[27]*y_cur[IDX_C5M]; + data[jistart + 10937] = 0.0 + k[4412]*y_cur[IDX_C7M]; + data[jistart + 10938] = 0.0 + k[4418]*y_cur[IDX_C7M]; + data[jistart + 10939] = 0.0 + k[3377]*y_cur[IDX_C10M] + k[3438]*y_cur[IDX_C8M] - + k[5244]*y_cur[IDX_C7I] + k[5248]*y_cur[IDX_C8I]; + data[jistart + 10940] = 0.0 + k[4425]*y_cur[IDX_C7M]; + data[jistart + 10941] = 0.0 - k[5370]*y_cur[IDX_C7I] + k[5373]*y_cur[IDX_C8I]; + data[jistart + 10942] = 0.0 - k[3134]*y_cur[IDX_C7I] - k[3135]*y_cur[IDX_C7I] + + k[4431]*y_cur[IDX_C7M]; + data[jistart + 10943] = 0.0 + k[4411]*y_cur[IDX_C7M] - k[5500]*y_cur[IDX_C7I]; + data[jistart + 10944] = 0.0 - k[349]*y_cur[IDX_C7I] + k[4421]*y_cur[IDX_C7M]; + data[jistart + 10945] = 0.0 + k[47]*y_cur[IDX_C6M] + k[4933]*y_cur[IDX_C6HI] - + k[4934]*y_cur[IDX_C7I] + k[4937]*y_cur[IDX_C7NI] + + k[4938]*y_cur[IDX_C8I]; + data[jistart + 10946] = 0.0 - k[2926]*y_cur[IDX_C7I] + k[4429]*y_cur[IDX_C7M] + + k[4430]*y_cur[IDX_C7M]; + data[jistart + 10947] = 0.0 - k[2621]*y_cur[IDX_C7I] + k[4424]*y_cur[IDX_C7M]; + data[jistart + 10948] = 0.0 + k[6825]*y_cur[IDX_C7HII] + k[6826]*y_cur[IDX_C7H2II] + + k[6837]*y_cur[IDX_C8II] + k[6855]*y_cur[IDX_C9II] + + k[6885]*y_cur[IDX_C11II]; + data[jistart + 10949] = 0.0 + k[736]*y_cur[IDX_C11II] + k[867]*y_cur[IDX_C7HII] + + k[868]*y_cur[IDX_C7H2II] + k[878]*y_cur[IDX_C8II] + + k[889]*y_cur[IDX_C9II] - k[5601]*y_cur[IDX_C7I]; + data[jistart + 10950] = 0.0 + k[7242] + k[7424] + k[7606]; + data[jistart + 10951] = 0.0 + k[5974]; + data[jistart + 10952] = 0.0 + k[728]*y_cur[IDX_eM] + k[6870]*y_cur[IDX_GRAINM]; + data[jistart + 10953] = 0.0 + k[738]*y_cur[IDX_eM] + k[6887]*y_cur[IDX_GRAINM]; + data[jistart + 10954] = 0.0 + k[8680]*y_cur[IDX_GCI]; + data[jistart + 10955] = 0.0 + k[4943]*y_cur[IDX_CI]; + data[jistart + 10956] = 0.0 + k[3679]*y_cur[IDX_OI]; + data[jistart + 10957] = 0.0 + k[892]*y_cur[IDX_eM] + k[6858]*y_cur[IDX_GRAINM]; + data[jistart + 10958] = 0.0 + k[893]*y_cur[IDX_eM] + k[6859]*y_cur[IDX_GRAINM]; + data[jistart + 10959] = 0.0 + k[4556]*y_cur[IDX_C9M]; + data[jistart + 10960] = 0.0 + k[4559]*y_cur[IDX_C9M]; + data[jistart + 10961] = 0.0 + k[4585]*y_cur[IDX_C9M]; + data[jistart + 10962] = 0.0 + k[4566]*y_cur[IDX_C9M]; + data[jistart + 10963] = 0.0 + k[3379]*y_cur[IDX_NI]; + data[jistart + 10964] = 0.0 + k[4551]*y_cur[IDX_CII] + k[4552]*y_cur[IDX_C2H2II] + + k[4553]*y_cur[IDX_C2H3II] + k[4554]*y_cur[IDX_C4H2II] + + k[4555]*y_cur[IDX_C4H3II] + k[4556]*y_cur[IDX_C4SII] + + k[4557]*y_cur[IDX_CH2CCHII] + k[4558]*y_cur[IDX_CH3II] + + k[4559]*y_cur[IDX_CNCII] + k[4560]*y_cur[IDX_FeII] + + k[4561]*y_cur[IDX_HII] + k[4562]*y_cur[IDX_H2COII] + + k[4563]*y_cur[IDX_H2SII] + k[4564]*y_cur[IDX_H3II] + + k[4565]*y_cur[IDX_H3OII] + k[4566]*y_cur[IDX_HC2SII] + + k[4567]*y_cur[IDX_HCNHII] + k[4568]*y_cur[IDX_HCNHII] + + k[4569]*y_cur[IDX_HCOII] + k[4570]*y_cur[IDX_HCOII] + + k[4571]*y_cur[IDX_HeII] + k[4572]*y_cur[IDX_MgII] + + k[4573]*y_cur[IDX_NII] + k[4574]*y_cur[IDX_N2HII] + + k[4575]*y_cur[IDX_NH3II] + k[4576]*y_cur[IDX_NH4II] + + k[4577]*y_cur[IDX_NOII] + k[4578]*y_cur[IDX_NaII] + + k[4579]*y_cur[IDX_OII] + k[4580]*y_cur[IDX_SII] + + k[4581]*y_cur[IDX_SOII] + k[4582]*y_cur[IDX_SiII] + + k[4583]*y_cur[IDX_SiOII] + k[4584]*y_cur[IDX_SiOHII] + + k[4585]*y_cur[IDX_SiSII] + k[5766] + k[6059]; + data[jistart + 10965] = 0.0 + k[51]*y_cur[IDX_CI]; + data[jistart + 10966] = 0.0 + k[15]*y_cur[IDX_C7I]; + data[jistart + 10967] = 0.0 + k[20]*y_cur[IDX_C6I]; + data[jistart + 10968] = 0.0 + k[25]*y_cur[IDX_C5I]; + data[jistart + 10969] = 0.0 + k[32]*y_cur[IDX_C3I]; + data[jistart + 10970] = 0.0 + k[29]*y_cur[IDX_C4I]; + data[jistart + 10971] = 0.0 + k[34]*y_cur[IDX_C2I]; + data[jistart + 10972] = 0.0 + k[4583]*y_cur[IDX_C9M]; + data[jistart + 10973] = 0.0 + k[4584]*y_cur[IDX_C9M]; + data[jistart + 10974] = 0.0 + k[5968]; + data[jistart + 10975] = 0.0 + k[5770] + k[6065]; + data[jistart + 10976] = 0.0 + k[4560]*y_cur[IDX_C9M]; + data[jistart + 10977] = 0.0 + k[4572]*y_cur[IDX_C9M]; + data[jistart + 10978] = 0.0 + k[4578]*y_cur[IDX_C9M]; + data[jistart + 10979] = 0.0 + k[5221]*y_cur[IDX_NI] + k[5340]*y_cur[IDX_OI] + k[5688] + + k[5955]; + data[jistart + 10980] = 0.0 + k[4940]*y_cur[IDX_CI]; + data[jistart + 10981] = 0.0 + k[15]*y_cur[IDX_C2M]; + data[jistart + 10982] = 0.0 - k[355]*y_cur[IDX_HII] - k[2628]*y_cur[IDX_H3II] - + k[2933]*y_cur[IDX_HCOII] - k[3149]*y_cur[IDX_HeII] - + k[3150]*y_cur[IDX_HeII] - k[5250]*y_cur[IDX_NI] - + k[5375]*y_cur[IDX_OI] - k[5502]*y_cur[IDX_CII] - + k[5605]*y_cur[IDX_eM] - k[5767] - k[6060] - k[6061] - k[7060]; + data[jistart + 10983] = 0.0 + k[8680]*y_cur[IDX_GC8I]; + data[jistart + 10984] = 0.0 + k[25]*y_cur[IDX_C4M]; + data[jistart + 10985] = 0.0 + k[20]*y_cur[IDX_C3M]; + data[jistart + 10986] = 0.0 + k[29]*y_cur[IDX_C5M]; + data[jistart + 10987] = 0.0 + k[4555]*y_cur[IDX_C9M]; + data[jistart + 10988] = 0.0 + k[4574]*y_cur[IDX_C9M]; + data[jistart + 10989] = 0.0 + k[4581]*y_cur[IDX_C9M]; + data[jistart + 10990] = 0.0 + k[4557]*y_cur[IDX_C9M]; + data[jistart + 10991] = 0.0 + k[4563]*y_cur[IDX_C9M]; + data[jistart + 10992] = 0.0 + k[4573]*y_cur[IDX_C9M]; + data[jistart + 10993] = 0.0 + k[4562]*y_cur[IDX_C9M]; + data[jistart + 10994] = 0.0 + k[32]*y_cur[IDX_C6M]; + data[jistart + 10995] = 0.0 + k[4577]*y_cur[IDX_C9M]; + data[jistart + 10996] = 0.0 + k[4579]*y_cur[IDX_C9M]; + data[jistart + 10997] = 0.0 + k[4554]*y_cur[IDX_C9M]; + data[jistart + 10998] = 0.0 + k[4567]*y_cur[IDX_C9M] + k[4568]*y_cur[IDX_C9M]; + data[jistart + 10999] = 0.0 + k[4575]*y_cur[IDX_C9M]; + data[jistart + 11000] = 0.0 + k[4576]*y_cur[IDX_C9M]; + data[jistart + 11001] = 0.0 + k[4582]*y_cur[IDX_C9M]; + data[jistart + 11002] = 0.0 + k[4580]*y_cur[IDX_C9M]; + data[jistart + 11003] = 0.0 + k[4553]*y_cur[IDX_C9M]; + data[jistart + 11004] = 0.0 + k[34]*y_cur[IDX_C7M]; + data[jistart + 11005] = 0.0 + k[4552]*y_cur[IDX_C9M]; + data[jistart + 11006] = 0.0 + k[4558]*y_cur[IDX_C9M]; + data[jistart + 11007] = 0.0 + k[3379]*y_cur[IDX_C10M] + k[5221]*y_cur[IDX_C10I] - + k[5250]*y_cur[IDX_C9I]; + data[jistart + 11008] = 0.0 + k[4565]*y_cur[IDX_C9M]; + data[jistart + 11009] = 0.0 + k[3679]*y_cur[IDX_C10HII] + k[5340]*y_cur[IDX_C10I] - + k[5375]*y_cur[IDX_C9I]; + data[jistart + 11010] = 0.0 - k[3149]*y_cur[IDX_C9I] - k[3150]*y_cur[IDX_C9I] + + k[4571]*y_cur[IDX_C9M]; + data[jistart + 11011] = 0.0 + k[4551]*y_cur[IDX_C9M] - k[5502]*y_cur[IDX_C9I]; + data[jistart + 11012] = 0.0 - k[355]*y_cur[IDX_C9I] + k[4561]*y_cur[IDX_C9M]; + data[jistart + 11013] = 0.0 + k[51]*y_cur[IDX_C8M] + k[4940]*y_cur[IDX_C8HI] + + k[4943]*y_cur[IDX_C9NI]; + data[jistart + 11014] = 0.0 - k[2933]*y_cur[IDX_C9I] + k[4569]*y_cur[IDX_C9M] + + k[4570]*y_cur[IDX_C9M]; + data[jistart + 11015] = 0.0 - k[2628]*y_cur[IDX_C9I] + k[4564]*y_cur[IDX_C9M]; + data[jistart + 11016] = 0.0 + k[6858]*y_cur[IDX_C9HII] + k[6859]*y_cur[IDX_C9H2II] + + k[6870]*y_cur[IDX_C10II] + k[6887]*y_cur[IDX_C11II]; + data[jistart + 11017] = 0.0 + k[728]*y_cur[IDX_C10II] + k[738]*y_cur[IDX_C11II] + + k[892]*y_cur[IDX_C9HII] + k[893]*y_cur[IDX_C9H2II] - + k[5605]*y_cur[IDX_C9I]; + data[jistart + 11018] = 0.0 + k[5973]; + data[jistart + 11019] = 0.0 + k[727]*y_cur[IDX_eM] + k[6869]*y_cur[IDX_GRAINM]; + data[jistart + 11020] = 0.0 + k[737]*y_cur[IDX_eM] + k[6886]*y_cur[IDX_GRAINM]; + data[jistart + 11021] = 0.0 + k[7237] + k[7419] + k[7601]; + data[jistart + 11022] = 0.0 + k[890]*y_cur[IDX_eM] + k[6856]*y_cur[IDX_GRAINM]; + data[jistart + 11023] = 0.0 + k[8678]*y_cur[IDX_GCI]; + data[jistart + 11024] = 0.0 + k[5377]*y_cur[IDX_OI] + k[5771] + k[6067]; + data[jistart + 11025] = 0.0 + k[880]*y_cur[IDX_eM] + k[6839]*y_cur[IDX_GRAINM]; + data[jistart + 11026] = 0.0 + k[3722]*y_cur[IDX_OI]; + data[jistart + 11027] = 0.0 + k[881]*y_cur[IDX_eM] + k[6841]*y_cur[IDX_GRAINM]; + data[jistart + 11028] = 0.0 + k[4486]*y_cur[IDX_C8M]; + data[jistart + 11029] = 0.0 + k[4489]*y_cur[IDX_C8M]; + data[jistart + 11030] = 0.0 + k[4515]*y_cur[IDX_C8M]; + data[jistart + 11031] = 0.0 + k[4496]*y_cur[IDX_C8M]; + data[jistart + 11032] = 0.0 + k[3444]*y_cur[IDX_NI]; + data[jistart + 11033] = 0.0 + k[4481]*y_cur[IDX_CII] + k[4482]*y_cur[IDX_C2H2II] + + k[4483]*y_cur[IDX_C2H3II] + k[4484]*y_cur[IDX_C4H2II] + + k[4485]*y_cur[IDX_C4H3II] + k[4486]*y_cur[IDX_C4SII] + + k[4487]*y_cur[IDX_CH2CCHII] + k[4488]*y_cur[IDX_CH3II] + + k[4489]*y_cur[IDX_CNCII] + k[4490]*y_cur[IDX_FeII] + + k[4491]*y_cur[IDX_HII] + k[4492]*y_cur[IDX_H2COII] + + k[4493]*y_cur[IDX_H2SII] + k[4494]*y_cur[IDX_H3II] + + k[4495]*y_cur[IDX_H3OII] + k[4496]*y_cur[IDX_HC2SII] + + k[4497]*y_cur[IDX_HCNHII] + k[4498]*y_cur[IDX_HCNHII] + + k[4499]*y_cur[IDX_HCOII] + k[4500]*y_cur[IDX_HCOII] + + k[4501]*y_cur[IDX_HeII] + k[4502]*y_cur[IDX_MgII] + + k[4503]*y_cur[IDX_NII] + k[4504]*y_cur[IDX_N2HII] + + k[4505]*y_cur[IDX_NH3II] + k[4506]*y_cur[IDX_NH4II] + + k[4507]*y_cur[IDX_NOII] + k[4508]*y_cur[IDX_NaII] + + k[4509]*y_cur[IDX_OII] + k[4510]*y_cur[IDX_SII] + + k[4511]*y_cur[IDX_SOII] + k[4512]*y_cur[IDX_SiII] + + k[4513]*y_cur[IDX_SiOII] + k[4514]*y_cur[IDX_SiOHII] + + k[4515]*y_cur[IDX_SiSII] + k[5761] + k[6051]; + data[jistart + 11034] = 0.0 + k[14]*y_cur[IDX_C6I] - k[16]*y_cur[IDX_C8I]; + data[jistart + 11035] = 0.0 + k[19]*y_cur[IDX_C5I]; + data[jistart + 11036] = 0.0 + k[24]*y_cur[IDX_C4I]; + data[jistart + 11037] = 0.0 + k[31]*y_cur[IDX_C2I]; + data[jistart + 11038] = 0.0 + k[28]*y_cur[IDX_C3I]; + data[jistart + 11039] = 0.0 + k[49]*y_cur[IDX_CI]; + data[jistart + 11040] = 0.0 + k[4513]*y_cur[IDX_C8M]; + data[jistart + 11041] = 0.0 + k[4514]*y_cur[IDX_C8M]; + data[jistart + 11042] = 0.0 + k[5967]; + data[jistart + 11043] = 0.0 + k[4490]*y_cur[IDX_C8M]; + data[jistart + 11044] = 0.0 + k[4502]*y_cur[IDX_C8M]; + data[jistart + 11045] = 0.0 + k[4508]*y_cur[IDX_C8M]; + data[jistart + 11046] = 0.0 + k[5954]; + data[jistart + 11047] = 0.0 + k[5765] + k[6057]; + data[jistart + 11048] = 0.0 + k[5250]*y_cur[IDX_NI] + k[5375]*y_cur[IDX_OI] + k[5767] + + k[6060]; + data[jistart + 11049] = 0.0 - k[16]*y_cur[IDX_C2M] - k[352]*y_cur[IDX_HII] - + k[2625]*y_cur[IDX_H3II] - k[2930]*y_cur[IDX_HCOII] - + k[3142]*y_cur[IDX_HeII] - k[3143]*y_cur[IDX_HeII] - + k[4938]*y_cur[IDX_CI] - k[5248]*y_cur[IDX_NI] - + k[5373]*y_cur[IDX_OI] - k[5501]*y_cur[IDX_CII] - + k[5603]*y_cur[IDX_eM] - k[5762] - k[6052] - k[6053] - k[7055]; + data[jistart + 11050] = 0.0 + k[8678]*y_cur[IDX_GC7I]; + data[jistart + 11051] = 0.0 + k[19]*y_cur[IDX_C3M]; + data[jistart + 11052] = 0.0 + k[14]*y_cur[IDX_C2M]; + data[jistart + 11053] = 0.0 + k[24]*y_cur[IDX_C4M]; + data[jistart + 11054] = 0.0 + k[4936]*y_cur[IDX_CI]; + data[jistart + 11055] = 0.0 + k[4485]*y_cur[IDX_C8M]; + data[jistart + 11056] = 0.0 + k[4504]*y_cur[IDX_C8M]; + data[jistart + 11057] = 0.0 + k[4511]*y_cur[IDX_C8M]; + data[jistart + 11058] = 0.0 + k[4487]*y_cur[IDX_C8M]; + data[jistart + 11059] = 0.0 + k[4493]*y_cur[IDX_C8M]; + data[jistart + 11060] = 0.0 + k[4503]*y_cur[IDX_C8M]; + data[jistart + 11061] = 0.0 + k[4492]*y_cur[IDX_C8M]; + data[jistart + 11062] = 0.0 + k[28]*y_cur[IDX_C5M]; + data[jistart + 11063] = 0.0 + k[4507]*y_cur[IDX_C8M]; + data[jistart + 11064] = 0.0 + k[4509]*y_cur[IDX_C8M]; + data[jistart + 11065] = 0.0 + k[4484]*y_cur[IDX_C8M]; + data[jistart + 11066] = 0.0 + k[4497]*y_cur[IDX_C8M] + k[4498]*y_cur[IDX_C8M]; + data[jistart + 11067] = 0.0 + k[4505]*y_cur[IDX_C8M]; + data[jistart + 11068] = 0.0 + k[4506]*y_cur[IDX_C8M]; + data[jistart + 11069] = 0.0 + k[4512]*y_cur[IDX_C8M]; + data[jistart + 11070] = 0.0 + k[4510]*y_cur[IDX_C8M]; + data[jistart + 11071] = 0.0 + k[4483]*y_cur[IDX_C8M]; + data[jistart + 11072] = 0.0 + k[31]*y_cur[IDX_C6M]; + data[jistart + 11073] = 0.0 + k[4482]*y_cur[IDX_C8M]; + data[jistart + 11074] = 0.0 + k[4488]*y_cur[IDX_C8M]; + data[jistart + 11075] = 0.0 + k[3444]*y_cur[IDX_C9M] - k[5248]*y_cur[IDX_C8I] + + k[5250]*y_cur[IDX_C9I]; + data[jistart + 11076] = 0.0 + k[4495]*y_cur[IDX_C8M]; + data[jistart + 11077] = 0.0 + k[3722]*y_cur[IDX_C9HII] - k[5373]*y_cur[IDX_C8I] + + k[5375]*y_cur[IDX_C9I] + k[5377]*y_cur[IDX_C9NI]; + data[jistart + 11078] = 0.0 - k[3142]*y_cur[IDX_C8I] - k[3143]*y_cur[IDX_C8I] + + k[4501]*y_cur[IDX_C8M]; + data[jistart + 11079] = 0.0 + k[4481]*y_cur[IDX_C8M] - k[5501]*y_cur[IDX_C8I]; + data[jistart + 11080] = 0.0 - k[352]*y_cur[IDX_C8I] + k[4491]*y_cur[IDX_C8M]; + data[jistart + 11081] = 0.0 + k[49]*y_cur[IDX_C7M] + k[4936]*y_cur[IDX_C7HI] - + k[4938]*y_cur[IDX_C8I]; + data[jistart + 11082] = 0.0 - k[2930]*y_cur[IDX_C8I] + k[4499]*y_cur[IDX_C8M] + + k[4500]*y_cur[IDX_C8M]; + data[jistart + 11083] = 0.0 - k[2625]*y_cur[IDX_C8I] + k[4494]*y_cur[IDX_C8M]; + data[jistart + 11084] = 0.0 + k[6839]*y_cur[IDX_C8HII] + k[6841]*y_cur[IDX_C8H2II] + + k[6856]*y_cur[IDX_C9II] + k[6869]*y_cur[IDX_C10II] + + k[6886]*y_cur[IDX_C11II]; + data[jistart + 11085] = 0.0 + k[727]*y_cur[IDX_C10II] + k[737]*y_cur[IDX_C11II] + + k[880]*y_cur[IDX_C8HII] + k[881]*y_cur[IDX_C8H2II] + + k[890]*y_cur[IDX_C9II] - k[5603]*y_cur[IDX_C8I]; + data[jistart + 11086] = 0.0 + k[7807] + k[8136]; + data[jistart + 11087] = 0.0 + k[7781] + k[8105]; + data[jistart + 11088] = 0.0 + k[7859]; + data[jistart + 11089] = 0.0 + k[8134]; + data[jistart + 11090] = 0.0 + k[7847]; + data[jistart + 11091] = 0.0 + k[7815] - k[8422]*y_cur[IDX_GCI] - k[8673]*y_cur[IDX_GCI]; + data[jistart + 11092] = 0.0 + k[7842] + k[8169]; + data[jistart + 11093] = 0.0 + k[7814] + k[8143]; + data[jistart + 11094] = 0.0 + k[7799] + k[7800] + k[8124] + k[8125]; + data[jistart + 11095] = 0.0 + k[7828] + k[8152]; + data[jistart + 11096] = 0.0 + k[7728] + k[8036] - k[8419]*y_cur[IDX_GCI] - + k[8670]*y_cur[IDX_GCI]; + data[jistart + 11097] = 0.0 + k[7753] + k[8067]; + data[jistart + 11098] = 0.0 - k[8401]*y_cur[IDX_GCI]; + data[jistart + 11099] = 0.0 - k[8409]*y_cur[IDX_GCI]; + data[jistart + 11100] = 0.0 + k[7734] + k[8043]; + data[jistart + 11101] = 0.0 + k[7880]; + data[jistart + 11102] = 0.0 + k[7718] + k[8025] - k[8418]*y_cur[IDX_GCI] - + k[8669]*y_cur[IDX_GCI]; + data[jistart + 11103] = 0.0 - k[8402]*y_cur[IDX_GCI]; + data[jistart + 11104] = 0.0 - k[8400]*y_cur[IDX_GCI]; + data[jistart + 11105] = 0.0 + k[7802]; + data[jistart + 11106] = 0.0 + k[7875] + k[8229] + k[8231] + k[8233] + k[8235] - + k[8433]*y_cur[IDX_GCI] - k[8684]*y_cur[IDX_GCI]; + data[jistart + 11107] = 0.0 + k[8242]; + data[jistart + 11108] = 0.0 + k[8209] - k[8430]*y_cur[IDX_GCI] - k[8681]*y_cur[IDX_GCI]; + data[jistart + 11109] = 0.0 - k[8407]*y_cur[IDX_GCI]; + data[jistart + 11110] = 0.0 + k[7674] + k[7961]; + data[jistart + 11111] = 0.0 + k[7871] + k[8219] + k[8221] - k[8431]*y_cur[IDX_GCI] - + k[8682]*y_cur[IDX_GCI]; + data[jistart + 11112] = 0.0 + k[8223] - k[8432]*y_cur[IDX_GCI] - k[8683]*y_cur[IDX_GCI]; + data[jistart + 11113] = 0.0 + k[7757] + k[7758] + k[8075] + k[8076]; + data[jistart + 11114] = 0.0 - k[8414]*y_cur[IDX_GCI]; + data[jistart + 11115] = 0.0 + k[7823] - k[8423]*y_cur[IDX_GCI] - k[8674]*y_cur[IDX_GCI]; + data[jistart + 11116] = 0.0 + k[8198] - k[8428]*y_cur[IDX_GCI] - k[8679]*y_cur[IDX_GCI]; + data[jistart + 11117] = 0.0 + k[7849] + k[8178] + k[8180] - k[8425]*y_cur[IDX_GCI] - + k[8676]*y_cur[IDX_GCI]; + data[jistart + 11118] = 0.0 + k[7866] + k[8205] + k[8207] - k[8429]*y_cur[IDX_GCI] - + k[8680]*y_cur[IDX_GCI]; + data[jistart + 11119] = 0.0 - k[8417]*y_cur[IDX_GCI] - k[8668]*y_cur[IDX_GCI]; + data[jistart + 11120] = 0.0 - k[8421]*y_cur[IDX_GCI] - k[8672]*y_cur[IDX_GCI]; + data[jistart + 11121] = 0.0 - k[8424]*y_cur[IDX_GCI] - k[8675]*y_cur[IDX_GCI]; + data[jistart + 11122] = 0.0 - k[8426]*y_cur[IDX_GCI] - k[8677]*y_cur[IDX_GCI]; + data[jistart + 11123] = 0.0 + k[7663] + k[7664] + k[7950] + k[7951] - k[8413]*y_cur[IDX_GCI] + - k[8665]*y_cur[IDX_GCI]; + data[jistart + 11124] = 0.0 + k[7861] + k[8193] + k[8196] - k[8427]*y_cur[IDX_GCI] - + k[8678]*y_cur[IDX_GCI]; + data[jistart + 11125] = 0.0 + k[7784] + k[8108] - k[8420]*y_cur[IDX_GCI] - + k[8671]*y_cur[IDX_GCI]; + data[jistart + 11126] = 0.0 - k[8398]*y_cur[IDX_GCI] - k[8399]*y_cur[IDX_GCI] - k[8658]*y_cur[IDX_GCI]; - data[jistart + 10413] = 0.0 + k[7778] + k[8099] + k[8100]; - data[jistart + 10414] = 0.0 + k[8442]*y_cur[IDX_GOI]; - data[jistart + 10415] = 0.0 + k[8435]*y_cur[IDX_GHNOI] + - k[8442]*y_cur[IDX_GNSI] + k[8461]*y_cur[IDX_GNI]; - data[jistart + 10416] = 0.0 + k[6925]; - data[jistart + 10417] = 0.0 - k[7167] - k[7349] - k[7531] - k[7778] - - k[8099] - k[8100]; - data[jistart + 10418] = 0.0 + k[6985]; - data[jistart + 10419] = 0.0 - k[8400]*y_cur[IDX_GNSI]; - data[jistart + 10420] = 0.0 + k[8463]*y_cur[IDX_GNI]; - data[jistart + 10421] = 0.0 - k[8459]*y_cur[IDX_GNSI] + - k[8463]*y_cur[IDX_GHSI] + k[8464]*y_cur[IDX_GSI]; - data[jistart + 10422] = 0.0 + k[8475]*y_cur[IDX_GSI]; - data[jistart + 10423] = 0.0 - k[7172] - k[7354] - k[7536] - k[7779] - - k[8101] - k[8400]*y_cur[IDX_GCI] - k[8442]*y_cur[IDX_GOI] - - k[8459]*y_cur[IDX_GNI]; - data[jistart + 10424] = 0.0 - k[8442]*y_cur[IDX_GNSI]; - data[jistart + 10425] = 0.0 + k[8464]*y_cur[IDX_GNI] + - k[8475]*y_cur[IDX_GNHI]; - data[jistart + 10426] = 0.0 + k[6990]; - data[jistart + 10427] = 0.0 - k[7087] - k[7269] - k[7451]; - data[jistart + 10428] = 0.0 + k[6905]; - data[jistart + 10429] = 0.0 + k[8398]*y_cur[IDX_GNOI] - - k[8406]*y_cur[IDX_GOI] + k[8407]*y_cur[IDX_GO2I] - - k[8661]*y_cur[IDX_GOI]; - data[jistart + 10430] = 0.0 - k[8445]*y_cur[IDX_GOI] - - k[8691]*y_cur[IDX_GOI]; - data[jistart + 10431] = 0.0 + k[7727] + k[8035]; - data[jistart + 10432] = 0.0 - k[8451]*y_cur[IDX_GOI] - - k[8695]*y_cur[IDX_GOI]; - data[jistart + 10433] = 0.0 - k[8437]*y_cur[IDX_GOI] + - k[8481]*y_cur[IDX_GNOI] + k[8485]*y_cur[IDX_GO2I] - - k[8685]*y_cur[IDX_GOI]; - data[jistart + 10434] = 0.0 - k[8438]*y_cur[IDX_GOI] + - k[8528]*y_cur[IDX_GO2I] - k[8686]*y_cur[IDX_GOI]; - data[jistart + 10435] = 0.0 + k[7744] + k[8055]; - data[jistart + 10436] = 0.0 - k[8441]*y_cur[IDX_GOI] - - k[8688]*y_cur[IDX_GOI]; - data[jistart + 10437] = 0.0 + k[7881] + k[8264]; - data[jistart + 10438] = 0.0 + k[7771] + k[8091]; - data[jistart + 10439] = 0.0 - k[8446]*y_cur[IDX_GOI] - - k[8692]*y_cur[IDX_GOI]; - data[jistart + 10440] = 0.0 + k[7741] + k[8052]; - data[jistart + 10441] = 0.0 + k[7616] + k[7675] + k[7962] - - k[8447]*y_cur[IDX_GOI] - k[8693]*y_cur[IDX_GOI]; - data[jistart + 10442] = 0.0 + k[7764] + k[8082]; - data[jistart + 10443] = 0.0 - k[8452]*y_cur[IDX_GOI] - - k[8696]*y_cur[IDX_GOI]; - data[jistart + 10444] = 0.0 + k[7796] + k[8121]; - data[jistart + 10445] = 0.0 - k[8282]*y_cur[IDX_GOI] - - k[8583]*y_cur[IDX_GOI]; - data[jistart + 10446] = 0.0 + k[7984]; - data[jistart + 10447] = 0.0 + k[7922] + k[7923] + k[7924]; - data[jistart + 10448] = 0.0 - k[8434]*y_cur[IDX_GOI] - - k[8448]*y_cur[IDX_GOI]; - data[jistart + 10449] = 0.0 - k[8435]*y_cur[IDX_GOI]; - data[jistart + 10450] = 0.0 - k[8449]*y_cur[IDX_GOI]; - data[jistart + 10451] = 0.0 - k[8461]*y_cur[IDX_GOI] - - k[8702]*y_cur[IDX_GOI]; - data[jistart + 10452] = 0.0 + k[8070] + k[8072] + k[8074]; - data[jistart + 10453] = 0.0 - k[8439]*y_cur[IDX_GOI] + - k[8525]*y_cur[IDX_GNOI] - k[8687]*y_cur[IDX_GOI]; - data[jistart + 10454] = 0.0 - k[8440]*y_cur[IDX_GOI]; - data[jistart + 10455] = 0.0 + k[7690] + k[7691] + k[7980] + k[7981] - + k[8398]*y_cur[IDX_GCI] + k[8481]*y_cur[IDX_GCHI] + - k[8525]*y_cur[IDX_GNHI]; - data[jistart + 10456] = 0.0 + k[7778] + k[8099] + k[8100]; - data[jistart + 10457] = 0.0 - k[8442]*y_cur[IDX_GOI]; - data[jistart + 10458] = 0.0 - k[7081] - k[7263] - k[7445] - - k[8282]*y_cur[IDX_GHI] - k[8406]*y_cur[IDX_GCI] - - k[8434]*y_cur[IDX_GHCOI] - k[8435]*y_cur[IDX_GHNOI] - - k[8436]*y_cur[IDX_GO2HI] - k[8437]*y_cur[IDX_GCHI] - - k[8438]*y_cur[IDX_GCH2I] - k[8439]*y_cur[IDX_GNHI] - - k[8440]*y_cur[IDX_GNH2I] - k[8441]*y_cur[IDX_GCH3I] - - k[8442]*y_cur[IDX_GNSI] - k[8443]*y_cur[IDX_GOI] - - k[8443]*y_cur[IDX_GOI] - k[8443]*y_cur[IDX_GOI] - - k[8443]*y_cur[IDX_GOI] - k[8444]*y_cur[IDX_GOHI] - - k[8445]*y_cur[IDX_GC2I] - k[8446]*y_cur[IDX_GCNI] - - k[8447]*y_cur[IDX_GCOI] - k[8448]*y_cur[IDX_GHCOI] - - k[8449]*y_cur[IDX_GHSI] - k[8450]*y_cur[IDX_GSI] - - k[8451]*y_cur[IDX_GC3I] - k[8452]*y_cur[IDX_GCSI] - - k[8453]*y_cur[IDX_GSOI] - k[8461]*y_cur[IDX_GNI] - - k[8583]*y_cur[IDX_GHI] - k[8661]*y_cur[IDX_GCI] - - k[8685]*y_cur[IDX_GCHI] - k[8686]*y_cur[IDX_GCH2I] - - k[8687]*y_cur[IDX_GNHI] - k[8688]*y_cur[IDX_GCH3I] - - k[8689]*y_cur[IDX_GOI] - k[8689]*y_cur[IDX_GOI] - - k[8689]*y_cur[IDX_GOI] - k[8689]*y_cur[IDX_GOI] - - k[8690]*y_cur[IDX_GOHI] - k[8691]*y_cur[IDX_GC2I] - - k[8692]*y_cur[IDX_GCNI] - k[8693]*y_cur[IDX_GCOI] - - k[8694]*y_cur[IDX_GSI] - k[8695]*y_cur[IDX_GC3I] - - k[8696]*y_cur[IDX_GCSI] - k[8697]*y_cur[IDX_GSOI] - - k[8702]*y_cur[IDX_GNI]; - data[jistart + 10459] = 0.0 + k[7703] + k[7703] + k[7704] + k[7704] - + k[8003] + k[8003] + k[8004] + k[8004] + k[8407]*y_cur[IDX_GCI] + - k[8485]*y_cur[IDX_GCHI] + k[8528]*y_cur[IDX_GCH2I]; - data[jistart + 10460] = 0.0 + k[8006] - k[8436]*y_cur[IDX_GOI]; - data[jistart + 10461] = 0.0 + k[7747] + k[8061]; - data[jistart + 10462] = 0.0 + k[7829] + k[8153]; - data[jistart + 10463] = 0.0 + k[7638] + k[7919] + k[7920] - - k[8444]*y_cur[IDX_GOI] - k[8690]*y_cur[IDX_GOI]; - data[jistart + 10464] = 0.0 + k[7782] + k[8106]; - data[jistart + 10465] = 0.0 - k[8450]*y_cur[IDX_GOI] - - k[8694]*y_cur[IDX_GOI]; - data[jistart + 10466] = 0.0 + k[7786] + k[7787] + k[8110] + k[8111] - - k[8453]*y_cur[IDX_GOI] - k[8697]*y_cur[IDX_GOI]; - data[jistart + 10467] = 0.0 + k[7839] + k[8164]; - data[jistart + 10468] = 0.0 + k[7765] + k[8083] + k[8084]; - data[jistart + 10469] = 0.0 + k[7832] + k[8156]; - data[jistart + 10470] = 0.0 + k[6899]; - data[jistart + 10471] = 0.0 - k[8407]*y_cur[IDX_GO2I]; - data[jistart + 10472] = 0.0 - k[8485]*y_cur[IDX_GO2I]; - data[jistart + 10473] = 0.0 - k[8528]*y_cur[IDX_GO2I]; - data[jistart + 10474] = 0.0 - k[8307]*y_cur[IDX_GO2I] + - k[8349]*y_cur[IDX_GSO2I] - k[8605]*y_cur[IDX_GO2I]; - data[jistart + 10475] = 0.0 + k[8454]*y_cur[IDX_GO2HI]; - data[jistart + 10476] = 0.0 + k[8436]*y_cur[IDX_GO2HI] + - k[8443]*y_cur[IDX_GOI] + k[8443]*y_cur[IDX_GOI]; - data[jistart + 10477] = 0.0 - k[7116] - k[7298] - k[7480] - k[7703] - - k[7704] - k[8003] - k[8004] - k[8307]*y_cur[IDX_GHI] - - k[8407]*y_cur[IDX_GCI] - k[8485]*y_cur[IDX_GCHI] - - k[8528]*y_cur[IDX_GCH2I] - k[8605]*y_cur[IDX_GHI]; - data[jistart + 10478] = 0.0 + k[7705] + k[8005] + - k[8436]*y_cur[IDX_GOI] + k[8454]*y_cur[IDX_GNI]; - data[jistart + 10479] = 0.0 + k[8349]*y_cur[IDX_GHI]; - data[jistart + 10480] = 0.0 + k[6934]; - data[jistart + 10481] = 0.0 + k[8307]*y_cur[IDX_GO2I] - - k[8308]*y_cur[IDX_GO2HI] + k[8309]*y_cur[IDX_GH2O2I] - - k[8606]*y_cur[IDX_GO2HI]; - data[jistart + 10482] = 0.0 + k[8309]*y_cur[IDX_GHI]; - data[jistart + 10483] = 0.0 - k[8454]*y_cur[IDX_GO2HI]; - data[jistart + 10484] = 0.0 - k[8436]*y_cur[IDX_GO2HI] + - k[8444]*y_cur[IDX_GOHI]; - data[jistart + 10485] = 0.0 + k[8307]*y_cur[IDX_GHI]; - data[jistart + 10486] = 0.0 - k[7119] - k[7301] - k[7483] - k[7705] - - k[8005] - k[8006] - k[8308]*y_cur[IDX_GHI] - - k[8436]*y_cur[IDX_GOI] - k[8454]*y_cur[IDX_GNI] - - k[8606]*y_cur[IDX_GHI]; - data[jistart + 10487] = 0.0 + k[8444]*y_cur[IDX_GOI]; - data[jistart + 10488] = 0.0 + k[6937]; - data[jistart + 10489] = 0.0 - k[8401]*y_cur[IDX_GOCNI]; - data[jistart + 10490] = 0.0 + k[8446]*y_cur[IDX_GOI]; - data[jistart + 10491] = 0.0 - k[8328]*y_cur[IDX_GOCNI] - - k[8329]*y_cur[IDX_GOCNI] - k[8623]*y_cur[IDX_GOCNI] - - k[8624]*y_cur[IDX_GOCNI]; - data[jistart + 10492] = 0.0 + k[8446]*y_cur[IDX_GCNI]; - data[jistart + 10493] = 0.0 - k[7146] - k[7328] - k[7510] - k[7747] - - k[8061] - k[8328]*y_cur[IDX_GHI] - k[8329]*y_cur[IDX_GHI] - - k[8401]*y_cur[IDX_GCI] - k[8623]*y_cur[IDX_GHI] - - k[8624]*y_cur[IDX_GHI]; - data[jistart + 10494] = 0.0 + k[6964]; - data[jistart + 10495] = 0.0 + k[8476]*y_cur[IDX_GSI]; - data[jistart + 10496] = 0.0 + k[8452]*y_cur[IDX_GOI]; - data[jistart + 10497] = 0.0 - k[8348]*y_cur[IDX_GOCSI]; - data[jistart + 10498] = 0.0 + k[8452]*y_cur[IDX_GCSI]; - data[jistart + 10499] = 0.0 - k[7204] - k[7386] - k[7570] - k[7827] - - k[7828] - k[7829] - k[7830] - k[8151] - k[8152] - k[8153] - - k[8154] - k[8348]*y_cur[IDX_GHI]; - data[jistart + 10500] = 0.0 + k[8476]*y_cur[IDX_GCOI]; - data[jistart + 10501] = 0.0 + k[7022]; - data[jistart + 10502] = 0.0 - k[8408]*y_cur[IDX_GOHI]; - data[jistart + 10503] = 0.0 + k[7772] + k[7773] + k[8092] + k[8093]; - data[jistart + 10504] = 0.0 - k[8518]*y_cur[IDX_GOHI] - - k[8741]*y_cur[IDX_GOHI]; - data[jistart + 10505] = 0.0 + k[7882] + k[8265]; - data[jistart + 10506] = 0.0 - k[8519]*y_cur[IDX_GOHI] - - k[8520]*y_cur[IDX_GOHI]; - data[jistart + 10507] = 0.0 - k[8513]*y_cur[IDX_GOHI] - - k[8737]*y_cur[IDX_GOHI]; - data[jistart + 10508] = 0.0 - k[8505]*y_cur[IDX_GOHI] - - k[8506]*y_cur[IDX_GOHI] - k[8507]*y_cur[IDX_GOHI]; - data[jistart + 10509] = 0.0 - k[8504]*y_cur[IDX_GOHI] - - k[8742]*y_cur[IDX_GOHI]; - data[jistart + 10510] = 0.0 + k[7892] + k[8271]; - data[jistart + 10511] = 0.0 + k[7699] + k[7702] + k[7997] + k[8002]; - data[jistart + 10512] = 0.0 - k[8515]*y_cur[IDX_GOHI] - - k[8516]*y_cur[IDX_GOHI] - k[8739]*y_cur[IDX_GOHI]; - data[jistart + 10513] = 0.0 + k[7884] + k[8267]; - data[jistart + 10514] = 0.0 + k[8282]*y_cur[IDX_GOI] - - k[8283]*y_cur[IDX_GOHI] + k[8310]*y_cur[IDX_GH2O2I] - - k[8584]*y_cur[IDX_GOHI]; - data[jistart + 10515] = 0.0 - k[8373]*y_cur[IDX_GOHI]; - data[jistart + 10516] = 0.0 - k[8508]*y_cur[IDX_GOHI] - - k[8509]*y_cur[IDX_GOHI]; - data[jistart + 10517] = 0.0 + k[7639] + k[7921] + k[7925]; - data[jistart + 10518] = 0.0 + k[7708] + k[7708] + k[8012] + k[8012] - + k[8310]*y_cur[IDX_GHI]; - data[jistart + 10519] = 0.0 + k[8434]*y_cur[IDX_GOI] - - k[8517]*y_cur[IDX_GOHI] - k[8740]*y_cur[IDX_GOHI]; - data[jistart + 10520] = 0.0 - k[8511]*y_cur[IDX_GOHI] - - k[8512]*y_cur[IDX_GOHI]; - data[jistart + 10521] = 0.0 + k[7780] + k[8102] + k[8104] - - k[8510]*y_cur[IDX_GOHI]; - data[jistart + 10522] = 0.0 + k[8435]*y_cur[IDX_GOI]; - data[jistart + 10523] = 0.0 + k[7755] + k[8069]; - data[jistart + 10524] = 0.0 + k[7754] + k[8068]; - data[jistart + 10525] = 0.0 + k[8282]*y_cur[IDX_GHI] + - k[8434]*y_cur[IDX_GHCOI] + k[8435]*y_cur[IDX_GHNOI] + - k[8436]*y_cur[IDX_GO2HI] - k[8444]*y_cur[IDX_GOHI] - - k[8690]*y_cur[IDX_GOHI]; - data[jistart + 10526] = 0.0 + k[8006] + k[8436]*y_cur[IDX_GOI]; - data[jistart + 10527] = 0.0 - k[7083] - k[7265] - k[7447] - k[7638] - - k[7919] - k[7920] - k[8283]*y_cur[IDX_GHI] - - k[8373]*y_cur[IDX_GH2I] - k[8408]*y_cur[IDX_GCI] - - k[8444]*y_cur[IDX_GOI] - k[8504]*y_cur[IDX_GCH3COI] - - k[8505]*y_cur[IDX_GCH3CHOI] - k[8506]*y_cur[IDX_GCH3CHOI] - - k[8507]*y_cur[IDX_GCH3CHOI] - k[8508]*y_cur[IDX_GH2COI] - - k[8509]*y_cur[IDX_GH2COI] - k[8510]*y_cur[IDX_GHCOOHI] - - k[8511]*y_cur[IDX_GHCOOCH3I] - k[8512]*y_cur[IDX_GHCOOCH3I] - - k[8513]*y_cur[IDX_GCH3I] - k[8514]*y_cur[IDX_GOHI] - - k[8514]*y_cur[IDX_GOHI] - k[8514]*y_cur[IDX_GOHI] - - k[8514]*y_cur[IDX_GOHI] - k[8515]*y_cur[IDX_GCOI] - - k[8516]*y_cur[IDX_GCOI] - k[8517]*y_cur[IDX_GHCOI] - - k[8518]*y_cur[IDX_GCH2I] - k[8519]*y_cur[IDX_GCH2OHCHOI] - - k[8520]*y_cur[IDX_GCH2OHCHOI] - k[8584]*y_cur[IDX_GHI] - - k[8690]*y_cur[IDX_GOI] - k[8737]*y_cur[IDX_GCH3I] - - k[8738]*y_cur[IDX_GOHI] - k[8738]*y_cur[IDX_GOHI] - - k[8738]*y_cur[IDX_GOHI] - k[8738]*y_cur[IDX_GOHI] - - k[8739]*y_cur[IDX_GCOI] - k[8740]*y_cur[IDX_GHCOI] - - k[8741]*y_cur[IDX_GCH2I] - k[8742]*y_cur[IDX_GCH3COI]; - data[jistart + 10528] = 0.0 + k[6901]; - data[jistart + 10529] = 0.0 + k[7813] + k[8142]; - data[jistart + 10530] = 0.0 + k[7753] + k[8067]; - data[jistart + 10531] = 0.0 - k[7110] - k[7292] - k[7474]; - data[jistart + 10532] = 0.0 + k[7696] + k[7996]; - data[jistart + 10533] = 0.0 + k[8008] + k[8009]; - data[jistart + 10534] = 0.0 + k[7768] + k[8088]; - data[jistart + 10535] = 0.0 + k[7782] + k[8106]; - data[jistart + 10536] = 0.0 + k[6928]; - data[jistart + 10537] = 0.0 + k[8095]; - data[jistart + 10538] = 0.0 - k[7115] - k[7297] - k[7479] - k[7696] - - k[7996]; - data[jistart + 10539] = 0.0 + k[7706] + k[8007] + k[8010]; - data[jistart + 10540] = 0.0 + k[6933]; - data[jistart + 10541] = 0.0 - k[7121] - k[7303] - k[7485] - k[7706] - - k[8007] - k[8008] - k[8009] - k[8010]; - data[jistart + 10542] = 0.0 + k[6939]; - data[jistart + 10543] = 0.0 - k[7164] - k[7346] - k[7528] - k[7768] - - k[8088]; - data[jistart + 10544] = 0.0 + k[6982]; - data[jistart + 10545] = 0.0 + k[7785] + k[8109]; - data[jistart + 10546] = 0.0 - k[7174] - k[7356] - k[7538] - k[7782] - - k[8106]; - data[jistart + 10547] = 0.0 + k[6992]; - data[jistart + 10548] = 0.0 - k[6314]*y_cur[IDX_GRAINM]; - data[jistart + 10549] = 0.0 - k[6869]*y_cur[IDX_GRAINM] - - k[6870]*y_cur[IDX_GRAINM]; - data[jistart + 10550] = 0.0 - k[6871]*y_cur[IDX_GRAINM] - - k[6872]*y_cur[IDX_GRAINM] - k[6873]*y_cur[IDX_GRAINM]; - data[jistart + 10551] = 0.0 - k[6874]*y_cur[IDX_GRAINM]; - data[jistart + 10552] = 0.0 - k[6878]*y_cur[IDX_GRAINM] - - k[6879]*y_cur[IDX_GRAINM]; - data[jistart + 10553] = 0.0 - k[6884]*y_cur[IDX_GRAINM] - - k[6885]*y_cur[IDX_GRAINM] - k[6886]*y_cur[IDX_GRAINM] - - k[6887]*y_cur[IDX_GRAINM]; - data[jistart + 10554] = 0.0 - k[6352]*y_cur[IDX_GRAINM]; - data[jistart + 10555] = 0.0 - k[6354]*y_cur[IDX_GRAINM] - - k[6355]*y_cur[IDX_GRAINM]; - data[jistart + 10556] = 0.0 - k[6356]*y_cur[IDX_GRAINM] - - k[6357]*y_cur[IDX_GRAINM] - k[6358]*y_cur[IDX_GRAINM]; - data[jistart + 10557] = 0.0 - k[6360]*y_cur[IDX_GRAINM] - + data[jistart + 11127] = 0.0 + k[7644] + k[7931] - k[8411]*y_cur[IDX_GCI] - + k[8663]*y_cur[IDX_GCI]; + data[jistart + 11128] = 0.0 - k[8404]*y_cur[IDX_GCI]; + data[jistart + 11129] = 0.0 - k[8403]*y_cur[IDX_GCI] - k[8659]*y_cur[IDX_GCI]; + data[jistart + 11130] = 0.0 - k[8415]*y_cur[IDX_GCI] - k[8666]*y_cur[IDX_GCI]; + data[jistart + 11131] = 0.0 + k[7712] + k[8017] - k[8416]*y_cur[IDX_GCI] - + k[8667]*y_cur[IDX_GCI]; + data[jistart + 11132] = 0.0 - k[8408]*y_cur[IDX_GCI]; + data[jistart + 11133] = 0.0 + k[7616] + k[7675] + k[7962]; + data[jistart + 11134] = 0.0 + k[7620] + k[7621] + k[7897] + k[7898] - k[8396]*y_cur[IDX_GCI] + - k[8656]*y_cur[IDX_GCI]; + data[jistart + 11135] = 0.0 + k[7641] + k[7641] + k[7927] + k[7927] + k[7928] + k[7928] - + k[8410]*y_cur[IDX_GCI] - k[8662]*y_cur[IDX_GCI]; + data[jistart + 11136] = 0.0 + k[7649] + k[7936] - k[8412]*y_cur[IDX_GCI] - + k[8664]*y_cur[IDX_GCI]; + data[jistart + 11137] = 0.0 - k[8397]*y_cur[IDX_GCI] - k[8657]*y_cur[IDX_GCI]; + data[jistart + 11138] = 0.0 - k[8406]*y_cur[IDX_GCI] - k[8661]*y_cur[IDX_GCI]; + data[jistart + 11139] = 0.0 - k[8405]*y_cur[IDX_GCI] - k[8660]*y_cur[IDX_GCI]; + data[jistart + 11140] = 0.0 + k[7618] + k[7894] + k[7895] - k[8395]*y_cur[IDX_GCI] - + k[8655]*y_cur[IDX_GCI]; + data[jistart + 11141] = 0.0 - k[8369]*y_cur[IDX_GCI] - k[8653]*y_cur[IDX_GCI]; + data[jistart + 11142] = 0.0 - k[7073] - k[7255] - k[7437] - k[8274]*y_cur[IDX_GHI] - + k[8369]*y_cur[IDX_GH2I] - k[8394]*y_cur[IDX_GCI] - + k[8394]*y_cur[IDX_GCI] - k[8394]*y_cur[IDX_GCI] - + k[8394]*y_cur[IDX_GCI] - k[8395]*y_cur[IDX_GCHI] - + k[8396]*y_cur[IDX_GCH2I] - k[8397]*y_cur[IDX_GNI] - + k[8398]*y_cur[IDX_GNOI] - k[8399]*y_cur[IDX_GNOI] - + k[8400]*y_cur[IDX_GNSI] - k[8401]*y_cur[IDX_GOCNI] - + k[8402]*y_cur[IDX_GCNOI] - k[8403]*y_cur[IDX_GNHI] - + k[8404]*y_cur[IDX_GNH2I] - k[8405]*y_cur[IDX_GCH3I] - + k[8406]*y_cur[IDX_GOI] - k[8407]*y_cur[IDX_GO2I] - + k[8408]*y_cur[IDX_GOHI] - k[8409]*y_cur[IDX_GSOI] - + k[8410]*y_cur[IDX_GC2I] - k[8411]*y_cur[IDX_GC2HI] - + k[8412]*y_cur[IDX_GCNI] - k[8413]*y_cur[IDX_GC2H3I] - + k[8414]*y_cur[IDX_GHSI] - k[8415]*y_cur[IDX_GSI] - + k[8416]*y_cur[IDX_GC3I] - k[8417]*y_cur[IDX_GC3HI] - + k[8418]*y_cur[IDX_GC2NI] - k[8419]*y_cur[IDX_GC2OI] - + k[8420]*y_cur[IDX_GC4I] - k[8421]*y_cur[IDX_GC4HI] - + k[8422]*y_cur[IDX_GC2SI] - k[8423]*y_cur[IDX_GC5I] - + k[8424]*y_cur[IDX_GC5HI] - k[8425]*y_cur[IDX_GC6I] - + k[8426]*y_cur[IDX_GC6HI] - k[8427]*y_cur[IDX_GC7I] - + k[8428]*y_cur[IDX_GC7HI] - k[8429]*y_cur[IDX_GC8I] - + k[8430]*y_cur[IDX_GC8HI] - k[8431]*y_cur[IDX_GC9I] - + k[8432]*y_cur[IDX_GC9HI] - k[8433]*y_cur[IDX_GC10I] - + k[8576]*y_cur[IDX_GHI] - k[8653]*y_cur[IDX_GH2I] - + k[8654]*y_cur[IDX_GCI] - k[8654]*y_cur[IDX_GCI] - + k[8654]*y_cur[IDX_GCI] - k[8654]*y_cur[IDX_GCI] - + k[8655]*y_cur[IDX_GCHI] - k[8656]*y_cur[IDX_GCH2I] - + k[8657]*y_cur[IDX_GNI] - k[8658]*y_cur[IDX_GNOI] - + k[8659]*y_cur[IDX_GNHI] - k[8660]*y_cur[IDX_GCH3I] - + k[8661]*y_cur[IDX_GOI] - k[8662]*y_cur[IDX_GC2I] - + k[8663]*y_cur[IDX_GC2HI] - k[8664]*y_cur[IDX_GCNI] - + k[8665]*y_cur[IDX_GC2H3I] - k[8666]*y_cur[IDX_GSI] - + k[8667]*y_cur[IDX_GC3I] - k[8668]*y_cur[IDX_GC3HI] - + k[8669]*y_cur[IDX_GC2NI] - k[8670]*y_cur[IDX_GC2OI] - + k[8671]*y_cur[IDX_GC4I] - k[8672]*y_cur[IDX_GC4HI] - + k[8673]*y_cur[IDX_GC2SI] - k[8674]*y_cur[IDX_GC5I] - + k[8675]*y_cur[IDX_GC5HI] - k[8676]*y_cur[IDX_GC6I] - + k[8677]*y_cur[IDX_GC6HI] - k[8678]*y_cur[IDX_GC7I] - + k[8679]*y_cur[IDX_GC7HI] - k[8680]*y_cur[IDX_GC8I] - + k[8681]*y_cur[IDX_GC8HI] - k[8682]*y_cur[IDX_GC9I] - + k[8683]*y_cur[IDX_GC9HI] - k[8684]*y_cur[IDX_GC10I]; + data[jistart + 11143] = 0.0 - k[8274]*y_cur[IDX_GCI] - k[8576]*y_cur[IDX_GCI]; + data[jistart + 11144] = 0.0 + k[6891]; + data[jistart + 11145] = 0.0 + k[1120]*y_cur[IDX_eM] + k[6551]*y_cur[IDX_GRAINM]; + data[jistart + 11146] = 0.0 + k[1213]*y_cur[IDX_eM] + k[6594]*y_cur[IDX_GRAINM]; + data[jistart + 11147] = 0.0 + k[5264]*y_cur[IDX_NI]; + data[jistart + 11148] = 0.0 + k[1132]*y_cur[IDX_eM] + k[6571]*y_cur[IDX_GRAINM]; + data[jistart + 11149] = 0.0 + k[1116]*y_cur[IDX_eM] + k[6522]*y_cur[IDX_GRAINM]; + data[jistart + 11150] = 0.0 + k[1123]*y_cur[IDX_eM] + k[6512]*y_cur[IDX_GRAINM]; + data[jistart + 11151] = 0.0 - k[5311]*y_cur[IDX_NHI] - k[5312]*y_cur[IDX_NHI]; + data[jistart + 11152] = 0.0 + k[5868] + k[6199]; + data[jistart + 11153] = 0.0 + k[3173]*y_cur[IDX_HeII] + k[5791]; + data[jistart + 11154] = 0.0 + k[7078] + k[7260] + k[7442]; + data[jistart + 11155] = 0.0 + k[5189]*y_cur[IDX_HI]; + data[jistart + 11156] = 0.0 + k[5282]*y_cur[IDX_NI]; + data[jistart + 11157] = 0.0 + k[5127]*y_cur[IDX_COI] + k[5177]*y_cur[IDX_HI] + + k[5270]*y_cur[IDX_NI] + k[5413]*y_cur[IDX_OI]; + data[jistart + 11158] = 0.0 + k[5180]*y_cur[IDX_HI]; + data[jistart + 11159] = 0.0 + k[3021]*y_cur[IDX_HII] + k[3032]*y_cur[IDX_HeII]; + data[jistart + 11160] = 0.0 + k[5195]*y_cur[IDX_HI]; + data[jistart + 11161] = 0.0 - k[3622]*y_cur[IDX_NHI]; + data[jistart + 11162] = 0.0 - k[3615]*y_cur[IDX_NHI]; + data[jistart + 11163] = 0.0 - k[616]*y_cur[IDX_NHI] + k[2537]*y_cur[IDX_H2OI]; + data[jistart + 11164] = 0.0 + k[8580]*y_cur[IDX_GHI]; + data[jistart + 11165] = 0.0 + k[5226]*y_cur[IDX_NI]; + data[jistart + 11166] = 0.0 - k[618]*y_cur[IDX_NHI]; + data[jistart + 11167] = 0.0 - k[3613]*y_cur[IDX_NHI]; + data[jistart + 11168] = 0.0 - k[3605]*y_cur[IDX_NHI] - k[3606]*y_cur[IDX_NHI]; + data[jistart + 11169] = 0.0 + k[574]*y_cur[IDX_H2COI] + k[575]*y_cur[IDX_H2OI] + + k[576]*y_cur[IDX_NH3I] + k[577]*y_cur[IDX_NOI] + + k[578]*y_cur[IDX_O2I] + k[579]*y_cur[IDX_SI] - + k[3499]*y_cur[IDX_NHI]; + data[jistart + 11170] = 0.0 - k[453]*y_cur[IDX_NHI] - k[2393]*y_cur[IDX_NHI]; + data[jistart + 11171] = 0.0 + k[1160]*y_cur[IDX_eM] + k[2012]*y_cur[IDX_CH2I] + + k[2259]*y_cur[IDX_CHI] + k[3507]*y_cur[IDX_C2I] + + k[3508]*y_cur[IDX_C2HI] + k[3510]*y_cur[IDX_H2COI] + + k[3512]*y_cur[IDX_H2OI] + k[3515]*y_cur[IDX_H2SI] + + k[3519]*y_cur[IDX_HCNI] + k[3520]*y_cur[IDX_HCOI] + + k[3521]*y_cur[IDX_HNCI] + k[3522]*y_cur[IDX_NH2I] + + k[3523]*y_cur[IDX_NH3I] + k[3527]*y_cur[IDX_SI] - + k[3617]*y_cur[IDX_NHI] + k[6325]*y_cur[IDX_GRAINM]; + data[jistart + 11172] = 0.0 - k[617]*y_cur[IDX_NHI] + k[3534]*y_cur[IDX_NH2I] - + k[3610]*y_cur[IDX_NHI]; + data[jistart + 11173] = 0.0 - k[3609]*y_cur[IDX_NHI]; + data[jistart + 11174] = 0.0 + k[5272]*y_cur[IDX_NI]; + data[jistart + 11175] = 0.0 - k[6]*y_cur[IDX_NHI]; + data[jistart + 11176] = 0.0 + k[3336]*y_cur[IDX_NII] + k[3337]*y_cur[IDX_NII]; + data[jistart + 11177] = 0.0 + k[77]*y_cur[IDX_NI] - k[79]*y_cur[IDX_NHI]; + data[jistart + 11178] = 0.0 + k[3522]*y_cur[IDX_NH2II] + k[3534]*y_cur[IDX_COII] + + k[3545]*y_cur[IDX_NH3II] + k[4971]*y_cur[IDX_CI] + + k[5035]*y_cur[IDX_CH3I] + k[5182]*y_cur[IDX_HI] + + k[5300]*y_cur[IDX_OHI] + k[5421]*y_cur[IDX_OI] + k[5883] + k[6219]; + data[jistart + 11179] = 0.0 - k[3623]*y_cur[IDX_NHI]; + data[jistart + 11180] = 0.0 - k[3612]*y_cur[IDX_NHI]; + data[jistart + 11181] = 0.0 - k[1965]*y_cur[IDX_NHI]; + data[jistart + 11182] = 0.0 - k[3620]*y_cur[IDX_NHI] - k[3621]*y_cur[IDX_NHI]; + data[jistart + 11183] = 0.0 - k[6]*y_cur[IDX_CM] - k[79]*y_cur[IDX_HM] - + k[402]*y_cur[IDX_HII] - k[453]*y_cur[IDX_H2II] - + k[559]*y_cur[IDX_NII] - k[616]*y_cur[IDX_CNII] - + k[617]*y_cur[IDX_COII] - k[618]*y_cur[IDX_N2II] - + k[619]*y_cur[IDX_OII] - k[1420]*y_cur[IDX_CII] - + k[1965]*y_cur[IDX_CHII] - k[2393]*y_cur[IDX_H2II] - + k[2724]*y_cur[IDX_H3II] - k[3285]*y_cur[IDX_HeII] - + k[3355]*y_cur[IDX_NII] - k[3499]*y_cur[IDX_NHII] - + k[3605]*y_cur[IDX_C2II] - k[3606]*y_cur[IDX_C2II] - + k[3607]*y_cur[IDX_C2H2II] - k[3608]*y_cur[IDX_CH3II] - + k[3609]*y_cur[IDX_CH5II] - k[3610]*y_cur[IDX_COII] - + k[3611]*y_cur[IDX_H2COII] - k[3612]*y_cur[IDX_H2OII] - + k[3613]*y_cur[IDX_HCNII] - k[3614]*y_cur[IDX_HCOII] - + k[3615]*y_cur[IDX_HNOII] - k[3616]*y_cur[IDX_N2HII] - + k[3617]*y_cur[IDX_NH2II] - k[3618]*y_cur[IDX_NH3II] - + k[3619]*y_cur[IDX_OII] - k[3620]*y_cur[IDX_O2II] - + k[3621]*y_cur[IDX_O2II] - k[3622]*y_cur[IDX_O2HII] - + k[3623]*y_cur[IDX_OHII] - k[3624]*y_cur[IDX_SII] - + k[3625]*y_cur[IDX_SiII] - k[4972]*y_cur[IDX_CI] - + k[4973]*y_cur[IDX_CI] - k[5143]*y_cur[IDX_H2I] - + k[5184]*y_cur[IDX_HI] - k[5274]*y_cur[IDX_NI] - + k[5304]*y_cur[IDX_CH4I] - k[5305]*y_cur[IDX_CNI] - + k[5306]*y_cur[IDX_H2OI] - k[5307]*y_cur[IDX_NH3I] - + k[5308]*y_cur[IDX_NHI] - k[5308]*y_cur[IDX_NHI] - + k[5308]*y_cur[IDX_NHI] - k[5308]*y_cur[IDX_NHI] - + k[5309]*y_cur[IDX_NHI] - k[5309]*y_cur[IDX_NHI] - + k[5309]*y_cur[IDX_NHI] - k[5309]*y_cur[IDX_NHI] - + k[5310]*y_cur[IDX_NHI] - k[5310]*y_cur[IDX_NHI] - + k[5310]*y_cur[IDX_NHI] - k[5310]*y_cur[IDX_NHI] - + k[5311]*y_cur[IDX_NO2I] - k[5312]*y_cur[IDX_NO2I] - + k[5313]*y_cur[IDX_NOI] - k[5314]*y_cur[IDX_NOI] - + k[5315]*y_cur[IDX_NOI] - k[5316]*y_cur[IDX_O2I] - + k[5317]*y_cur[IDX_O2I] - k[5318]*y_cur[IDX_OI] - + k[5319]*y_cur[IDX_OI] - k[5320]*y_cur[IDX_OI] - + k[5321]*y_cur[IDX_OHI] - k[5322]*y_cur[IDX_OHI] - + k[5323]*y_cur[IDX_OHI] - k[5324]*y_cur[IDX_SI] - + k[5325]*y_cur[IDX_SI] - k[5888] - k[5889] - k[6224] - k[6225] - + k[6896]; + data[jistart + 11184] = 0.0 + k[1153]*y_cur[IDX_eM] + k[1154]*y_cur[IDX_eM] - + k[3616]*y_cur[IDX_NHI] + k[6397]*y_cur[IDX_GRAINM]; + data[jistart + 11185] = 0.0 - k[559]*y_cur[IDX_NHI] + k[3336]*y_cur[IDX_CH3OHI] + + k[3337]*y_cur[IDX_CH3OHI] + k[3345]*y_cur[IDX_H2COI] + + k[3347]*y_cur[IDX_H2SI] + k[3349]*y_cur[IDX_H2SI] + + k[3354]*y_cur[IDX_NH3I] - k[3355]*y_cur[IDX_NHI]; + data[jistart + 11186] = 0.0 - k[3611]*y_cur[IDX_NHI]; + data[jistart + 11187] = 0.0 - k[619]*y_cur[IDX_NHI] - k[3619]*y_cur[IDX_NHI]; + data[jistart + 11188] = 0.0 + k[2012]*y_cur[IDX_NH2II] + k[5001]*y_cur[IDX_N2I] + + k[5255]*y_cur[IDX_NI]; + data[jistart + 11189] = 0.0 + k[3521]*y_cur[IDX_NH2II]; + data[jistart + 11190] = 0.0 + k[1164]*y_cur[IDX_eM] + k[3545]*y_cur[IDX_NH2I] + + k[3548]*y_cur[IDX_C2I] - k[3618]*y_cur[IDX_NHI] + + k[6331]*y_cur[IDX_GRAINM]; + data[jistart + 11191] = 0.0 + k[5223]*y_cur[IDX_NI]; + data[jistart + 11192] = 0.0 + k[5001]*y_cur[IDX_CH2I]; + data[jistart + 11193] = 0.0 + k[578]*y_cur[IDX_NHII] - k[5316]*y_cur[IDX_NHI] - + k[5317]*y_cur[IDX_NHI]; + data[jistart + 11194] = 0.0 - k[3625]*y_cur[IDX_NHI]; + data[jistart + 11195] = 0.0 + k[3347]*y_cur[IDX_NII] + k[3349]*y_cur[IDX_NII] + + k[3515]*y_cur[IDX_NH2II]; + data[jistart + 11196] = 0.0 - k[3624]*y_cur[IDX_NHI]; + data[jistart + 11197] = 0.0 + k[577]*y_cur[IDX_NHII] + k[5186]*y_cur[IDX_HI] - + k[5313]*y_cur[IDX_NHI] - k[5314]*y_cur[IDX_NHI] - + k[5315]*y_cur[IDX_NHI]; + data[jistart + 11198] = 0.0 + k[3520]*y_cur[IDX_NH2II] + k[5265]*y_cur[IDX_NI]; + data[jistart + 11199] = 0.0 - k[5304]*y_cur[IDX_NHI]; + data[jistart + 11200] = 0.0 + k[3508]*y_cur[IDX_NH2II]; + data[jistart + 11201] = 0.0 + k[574]*y_cur[IDX_NHII] + k[3345]*y_cur[IDX_NII] + + k[3510]*y_cur[IDX_NH2II]; + data[jistart + 11202] = 0.0 + k[3519]*y_cur[IDX_NH2II] + k[5403]*y_cur[IDX_OI]; + data[jistart + 11203] = 0.0 + k[2259]*y_cur[IDX_NH2II] + k[5081]*y_cur[IDX_NI]; + data[jistart + 11204] = 0.0 + k[579]*y_cur[IDX_NHII] + k[3527]*y_cur[IDX_NH2II] - + k[5324]*y_cur[IDX_NHI] - k[5325]*y_cur[IDX_NHI]; + data[jistart + 11205] = 0.0 + k[3507]*y_cur[IDX_NH2II] + k[3548]*y_cur[IDX_NH3II]; + data[jistart + 11206] = 0.0 + k[5284]*y_cur[IDX_NI] + k[5300]*y_cur[IDX_NH2I] - + k[5321]*y_cur[IDX_NHI] - k[5322]*y_cur[IDX_NHI] - + k[5323]*y_cur[IDX_NHI]; + data[jistart + 11207] = 0.0 + k[576]*y_cur[IDX_NHII] + k[3354]*y_cur[IDX_NII] + + k[3523]*y_cur[IDX_NH2II] - k[5307]*y_cur[IDX_NHI] + k[5887] + + k[6223]; + data[jistart + 11208] = 0.0 - k[3607]*y_cur[IDX_NHI]; + data[jistart + 11209] = 0.0 - k[3608]*y_cur[IDX_NHI]; + data[jistart + 11210] = 0.0 - k[5305]*y_cur[IDX_NHI]; + data[jistart + 11211] = 0.0 + k[8580]*y_cur[IDX_GNI]; + data[jistart + 11212] = 0.0 + k[5035]*y_cur[IDX_NH2I]; + data[jistart + 11213] = 0.0 + k[77]*y_cur[IDX_HM] + k[5081]*y_cur[IDX_CHI] + + k[5141]*y_cur[IDX_H2I] + k[5223]*y_cur[IDX_C2H3I] + + k[5226]*y_cur[IDX_C2H5I] + k[5255]*y_cur[IDX_CH2I] + + k[5264]*y_cur[IDX_H2CNI] + k[5265]*y_cur[IDX_HCOI] + + k[5270]*y_cur[IDX_HNOI] + k[5272]*y_cur[IDX_HSI] - + k[5274]*y_cur[IDX_NHI] + k[5282]*y_cur[IDX_O2HI] + + k[5284]*y_cur[IDX_OHI]; + data[jistart + 11214] = 0.0 - k[5318]*y_cur[IDX_NHI] - k[5319]*y_cur[IDX_NHI] - + k[5320]*y_cur[IDX_NHI] + k[5403]*y_cur[IDX_HCNI] + + k[5413]*y_cur[IDX_HNOI] + k[5421]*y_cur[IDX_NH2I]; + data[jistart + 11215] = 0.0 + k[3032]*y_cur[IDX_HNC3I] + k[3173]*y_cur[IDX_CH2NHI] - + k[3285]*y_cur[IDX_NHI]; + data[jistart + 11216] = 0.0 - k[1420]*y_cur[IDX_NHI]; + data[jistart + 11217] = 0.0 + k[575]*y_cur[IDX_NHII] + k[2537]*y_cur[IDX_CNII] + + k[3512]*y_cur[IDX_NH2II] - k[5306]*y_cur[IDX_NHI]; + data[jistart + 11218] = 0.0 - k[402]*y_cur[IDX_NHI] + k[3021]*y_cur[IDX_HNC3I]; + data[jistart + 11219] = 0.0 + k[4971]*y_cur[IDX_NH2I] - k[4972]*y_cur[IDX_NHI] - + k[4973]*y_cur[IDX_NHI]; + data[jistart + 11220] = 0.0 - k[3614]*y_cur[IDX_NHI]; + data[jistart + 11221] = 0.0 - k[2724]*y_cur[IDX_NHI]; + data[jistart + 11222] = 0.0 + k[5127]*y_cur[IDX_HNOI]; + data[jistart + 11223] = 0.0 + k[6325]*y_cur[IDX_NH2II] + k[6331]*y_cur[IDX_NH3II] + + k[6397]*y_cur[IDX_N2HII] + k[6512]*y_cur[IDX_HNSiII] + + k[6522]*y_cur[IDX_HNCOII] + k[6551]*y_cur[IDX_HNCOHII] + + k[6571]*y_cur[IDX_HPNII] + k[6594]*y_cur[IDX_PNH2II]; + data[jistart + 11224] = 0.0 + k[5141]*y_cur[IDX_NI] - k[5143]*y_cur[IDX_NHI]; + data[jistart + 11225] = 0.0 + k[1116]*y_cur[IDX_HNCOII] + k[1120]*y_cur[IDX_HNCOHII] + + k[1123]*y_cur[IDX_HNSiII] + k[1132]*y_cur[IDX_HPNII] + + k[1153]*y_cur[IDX_N2HII] + k[1154]*y_cur[IDX_N2HII] + + k[1160]*y_cur[IDX_NH2II] + k[1164]*y_cur[IDX_NH3II] + + k[1213]*y_cur[IDX_PNH2II]; + data[jistart + 11226] = 0.0 + k[5177]*y_cur[IDX_HNOI] + k[5180]*y_cur[IDX_N2OI] + + k[5182]*y_cur[IDX_NH2I] - k[5184]*y_cur[IDX_NHI] + + k[5186]*y_cur[IDX_NOI] + k[5189]*y_cur[IDX_NSI] + + k[5195]*y_cur[IDX_OCNI]; + data[jistart + 11227] = 0.0 + k[5970] + k[5971]; + data[jistart + 11228] = 0.0 + k[7206] + k[7388] + k[7572]; + data[jistart + 11229] = 0.0 + k[735]*y_cur[IDX_eM] + k[6884]*y_cur[IDX_GRAINM]; + data[jistart + 11230] = 0.0 + k[8671]*y_cur[IDX_GCI]; + data[jistart + 11231] = 0.0 + k[864]*y_cur[IDX_eM] + k[6822]*y_cur[IDX_GRAINM]; + data[jistart + 11232] = 0.0 + k[730]*y_cur[IDX_eM] + k[6872]*y_cur[IDX_GRAINM]; + data[jistart + 11233] = 0.0 + k[849]*y_cur[IDX_eM] + k[6781]*y_cur[IDX_GRAINM]; + data[jistart + 11234] = 0.0 + k[236]*y_cur[IDX_C2H4I]; + data[jistart + 11235] = 0.0 + k[840]*y_cur[IDX_eM] + k[6722]*y_cur[IDX_GRAINM]; + data[jistart + 11236] = 0.0 + k[841]*y_cur[IDX_eM] + k[6738]*y_cur[IDX_GRAINM]; + data[jistart + 11237] = 0.0 + k[4241]*y_cur[IDX_C5M]; + data[jistart + 11238] = 0.0 + k[4244]*y_cur[IDX_C5M]; + data[jistart + 11239] = 0.0 + k[4270]*y_cur[IDX_C5M]; + data[jistart + 11240] = 0.0 + k[4251]*y_cur[IDX_C5M]; + data[jistart + 11241] = 0.0 + k[37]*y_cur[IDX_CI] + k[3378]*y_cur[IDX_NI]; + data[jistart + 11242] = 0.0 + k[3436]*y_cur[IDX_NI]; + data[jistart + 11243] = 0.0 + k[11]*y_cur[IDX_C3I] - k[13]*y_cur[IDX_C5I]; + data[jistart + 11244] = 0.0 - k[19]*y_cur[IDX_C5I]; + data[jistart + 11245] = 0.0 - k[25]*y_cur[IDX_C5I] + k[43]*y_cur[IDX_CI]; + data[jistart + 11246] = 0.0 + k[3419]*y_cur[IDX_NI]; + data[jistart + 11247] = 0.0 - k[30]*y_cur[IDX_C5I] + k[4236]*y_cur[IDX_CII] + + k[4237]*y_cur[IDX_C2H2II] + k[4238]*y_cur[IDX_C2H3II] + + k[4239]*y_cur[IDX_C4H2II] + k[4240]*y_cur[IDX_C4H3II] + + k[4241]*y_cur[IDX_C4SII] + k[4242]*y_cur[IDX_CH2CCHII] + + k[4243]*y_cur[IDX_CH3II] + k[4244]*y_cur[IDX_CNCII] + + k[4245]*y_cur[IDX_FeII] + k[4246]*y_cur[IDX_HII] + + k[4247]*y_cur[IDX_H2COII] + k[4248]*y_cur[IDX_H2SII] + + k[4249]*y_cur[IDX_H3II] + k[4250]*y_cur[IDX_H3OII] + + k[4251]*y_cur[IDX_HC2SII] + k[4252]*y_cur[IDX_HCNHII] + + k[4253]*y_cur[IDX_HCNHII] + k[4254]*y_cur[IDX_HCOII] + + k[4255]*y_cur[IDX_HCOII] + k[4256]*y_cur[IDX_HeII] + + k[4257]*y_cur[IDX_MgII] + k[4258]*y_cur[IDX_NII] + + k[4259]*y_cur[IDX_N2HII] + k[4260]*y_cur[IDX_NH3II] + + k[4261]*y_cur[IDX_NH4II] + k[4262]*y_cur[IDX_NOII] + + k[4263]*y_cur[IDX_NaII] + k[4264]*y_cur[IDX_OII] + + k[4265]*y_cur[IDX_SII] + k[4266]*y_cur[IDX_SOII] + + k[4267]*y_cur[IDX_SiII] + k[4268]*y_cur[IDX_SiOII] + + k[4269]*y_cur[IDX_SiOHII] + k[4270]*y_cur[IDX_SiSII] + k[5736] + + k[6022]; + data[jistart + 11248] = 0.0 + k[4268]*y_cur[IDX_C5M]; + data[jistart + 11249] = 0.0 + k[4269]*y_cur[IDX_C5M]; + data[jistart + 11250] = 0.0 + k[4929]*y_cur[IDX_CI]; + data[jistart + 11251] = 0.0 + k[3068]*y_cur[IDX_HeII] + k[5963] + k[5963] + k[5964]; + data[jistart + 11252] = 0.0 + k[4245]*y_cur[IDX_C5M]; + data[jistart + 11253] = 0.0 + k[4257]*y_cur[IDX_C5M]; + data[jistart + 11254] = 0.0 + k[4263]*y_cur[IDX_C5M]; + data[jistart + 11255] = 0.0 + k[3056]*y_cur[IDX_HeII]; + data[jistart + 11256] = 0.0 + k[4934]*y_cur[IDX_CI]; + data[jistart + 11257] = 0.0 + k[8671]*y_cur[IDX_GC4I]; + data[jistart + 11258] = 0.0 - k[13]*y_cur[IDX_C2M] - k[19]*y_cur[IDX_C3M] - + k[25]*y_cur[IDX_C4M] - k[30]*y_cur[IDX_C5M] - k[343]*y_cur[IDX_HII] + - k[2613]*y_cur[IDX_H3II] - k[2918]*y_cur[IDX_HCOII] - + k[3117]*y_cur[IDX_HeII] - k[3118]*y_cur[IDX_HeII] - + k[4926]*y_cur[IDX_CI] - k[5238]*y_cur[IDX_NI] - + k[5365]*y_cur[IDX_OI] - k[5498]*y_cur[IDX_CII] - + k[5596]*y_cur[IDX_eM] - k[5737] - k[5738] - k[6023] - k[7024]; + data[jistart + 11259] = 0.0 + k[4930]*y_cur[IDX_CI] + k[5242]*y_cur[IDX_NI] + + k[5368]*y_cur[IDX_OI] + k[5748] + k[6033]; + data[jistart + 11260] = 0.0 + k[4240]*y_cur[IDX_C5M]; + data[jistart + 11261] = 0.0 + k[4259]*y_cur[IDX_C5M]; + data[jistart + 11262] = 0.0 + k[4266]*y_cur[IDX_C5M]; + data[jistart + 11263] = 0.0 + k[4242]*y_cur[IDX_C5M]; + data[jistart + 11264] = 0.0 + k[5744] + k[6029]; + data[jistart + 11265] = 0.0 + k[4248]*y_cur[IDX_C5M]; + data[jistart + 11266] = 0.0 + k[4258]*y_cur[IDX_C5M]; + data[jistart + 11267] = 0.0 + k[4247]*y_cur[IDX_C5M]; + data[jistart + 11268] = 0.0 + k[11]*y_cur[IDX_C2M]; + data[jistart + 11269] = 0.0 + k[4925]*y_cur[IDX_CI]; + data[jistart + 11270] = 0.0 + k[4262]*y_cur[IDX_C5M]; + data[jistart + 11271] = 0.0 + k[4264]*y_cur[IDX_C5M]; + data[jistart + 11272] = 0.0 + k[4239]*y_cur[IDX_C5M]; + data[jistart + 11273] = 0.0 + k[4252]*y_cur[IDX_C5M] + k[4253]*y_cur[IDX_C5M]; + data[jistart + 11274] = 0.0 + k[4260]*y_cur[IDX_C5M]; + data[jistart + 11275] = 0.0 + k[236]*y_cur[IDX_C5II]; + data[jistart + 11276] = 0.0 + k[4261]*y_cur[IDX_C5M]; + data[jistart + 11277] = 0.0 + k[4267]*y_cur[IDX_C5M]; + data[jistart + 11278] = 0.0 + k[4265]*y_cur[IDX_C5M]; + data[jistart + 11279] = 0.0 + k[4238]*y_cur[IDX_C5M]; + data[jistart + 11280] = 0.0 + k[4237]*y_cur[IDX_C5M]; + data[jistart + 11281] = 0.0 + k[4243]*y_cur[IDX_C5M]; + data[jistart + 11282] = 0.0 + k[3378]*y_cur[IDX_C10M] + k[3419]*y_cur[IDX_C6M] + + k[3436]*y_cur[IDX_C8M] - k[5238]*y_cur[IDX_C5I] + + k[5242]*y_cur[IDX_C6I]; + data[jistart + 11283] = 0.0 + k[4250]*y_cur[IDX_C5M]; + data[jistart + 11284] = 0.0 - k[5365]*y_cur[IDX_C5I] + k[5368]*y_cur[IDX_C6I]; + data[jistart + 11285] = 0.0 + k[3056]*y_cur[IDX_C10I] + k[3068]*y_cur[IDX_C10HI] - + k[3117]*y_cur[IDX_C5I] - k[3118]*y_cur[IDX_C5I] + + k[4256]*y_cur[IDX_C5M]; + data[jistart + 11286] = 0.0 + k[4236]*y_cur[IDX_C5M] - k[5498]*y_cur[IDX_C5I]; + data[jistart + 11287] = 0.0 - k[343]*y_cur[IDX_C5I] + k[4246]*y_cur[IDX_C5M]; + data[jistart + 11288] = 0.0 + k[37]*y_cur[IDX_C10M] + k[43]*y_cur[IDX_C4M] + + k[4925]*y_cur[IDX_C4HI] - k[4926]*y_cur[IDX_C5I] + + k[4929]*y_cur[IDX_C5NI] + k[4930]*y_cur[IDX_C6I] + + k[4934]*y_cur[IDX_C7I]; + data[jistart + 11289] = 0.0 - k[2918]*y_cur[IDX_C5I] + k[4254]*y_cur[IDX_C5M] + + k[4255]*y_cur[IDX_C5M]; + data[jistart + 11290] = 0.0 - k[2613]*y_cur[IDX_C5I] + k[4249]*y_cur[IDX_C5M]; + data[jistart + 11291] = 0.0 + k[6722]*y_cur[IDX_C5HII] + k[6738]*y_cur[IDX_C5H2II] + + k[6781]*y_cur[IDX_C6II] + k[6822]*y_cur[IDX_C7II] + + k[6872]*y_cur[IDX_C10HII] + k[6884]*y_cur[IDX_C11II]; + data[jistart + 11292] = 0.0 + k[730]*y_cur[IDX_C10HII] + k[735]*y_cur[IDX_C11II] + + k[840]*y_cur[IDX_C5HII] + k[841]*y_cur[IDX_C5H2II] + + k[849]*y_cur[IDX_C6II] + k[864]*y_cur[IDX_C7II] - + k[5596]*y_cur[IDX_C5I]; + data[jistart + 11293] = 0.0 + k[5971]; + data[jistart + 11294] = 0.0 + k[8674]*y_cur[IDX_GCI]; + data[jistart + 11295] = 0.0 + k[735]*y_cur[IDX_eM] + k[6884]*y_cur[IDX_GRAINM]; + data[jistart + 11296] = 0.0 + k[7223] + k[7405] + k[7587]; + data[jistart + 11297] = 0.0 + k[877]*y_cur[IDX_eM] + k[6836]*y_cur[IDX_GRAINM]; + data[jistart + 11298] = 0.0 + k[865]*y_cur[IDX_eM] + k[6823]*y_cur[IDX_GRAINM]; + data[jistart + 11299] = 0.0 + k[851]*y_cur[IDX_eM] + k[6783]*y_cur[IDX_GRAINM]; + data[jistart + 11300] = 0.0 + k[5372]*y_cur[IDX_OI] + k[5760] + k[6049]; + data[jistart + 11301] = 0.0 + k[3713]*y_cur[IDX_OI]; + data[jistart + 11302] = 0.0 + k[852]*y_cur[IDX_eM] + k[6785]*y_cur[IDX_GRAINM]; + data[jistart + 11303] = 0.0 + k[4346]*y_cur[IDX_C6M]; + data[jistart + 11304] = 0.0 + k[4349]*y_cur[IDX_C6M]; + data[jistart + 11305] = 0.0 + k[4375]*y_cur[IDX_C6M]; + data[jistart + 11306] = 0.0 + k[4356]*y_cur[IDX_C6M]; + data[jistart + 11307] = 0.0 + k[1847]*y_cur[IDX_CI]; + data[jistart + 11308] = 0.0 + k[37]*y_cur[IDX_CI]; + data[jistart + 11309] = 0.0 + k[3442]*y_cur[IDX_NI]; + data[jistart + 11310] = 0.0 + k[12]*y_cur[IDX_C4I] - k[14]*y_cur[IDX_C6I]; + data[jistart + 11311] = 0.0 + k[17]*y_cur[IDX_C3I] - k[20]*y_cur[IDX_C6I]; + data[jistart + 11312] = 0.0 + k[22]*y_cur[IDX_C2I] - k[26]*y_cur[IDX_C6I]; + data[jistart + 11313] = 0.0 + k[4341]*y_cur[IDX_CII] + k[4342]*y_cur[IDX_C2H2II] + + k[4343]*y_cur[IDX_C2H3II] + k[4344]*y_cur[IDX_C4H2II] + + k[4345]*y_cur[IDX_C4H3II] + k[4346]*y_cur[IDX_C4SII] + + k[4347]*y_cur[IDX_CH2CCHII] + k[4348]*y_cur[IDX_CH3II] + + k[4349]*y_cur[IDX_CNCII] + k[4350]*y_cur[IDX_FeII] + + k[4351]*y_cur[IDX_HII] + k[4352]*y_cur[IDX_H2COII] + + k[4353]*y_cur[IDX_H2SII] + k[4354]*y_cur[IDX_H3II] + + k[4355]*y_cur[IDX_H3OII] + k[4356]*y_cur[IDX_HC2SII] + + k[4357]*y_cur[IDX_HCNHII] + k[4358]*y_cur[IDX_HCNHII] + + k[4359]*y_cur[IDX_HCOII] + k[4360]*y_cur[IDX_HCOII] + + k[4361]*y_cur[IDX_HeII] + k[4362]*y_cur[IDX_MgII] + + k[4363]*y_cur[IDX_NII] + k[4364]*y_cur[IDX_N2HII] + + k[4365]*y_cur[IDX_NH3II] + k[4366]*y_cur[IDX_NH4II] + + k[4367]*y_cur[IDX_NOII] + k[4368]*y_cur[IDX_NaII] + + k[4369]*y_cur[IDX_OII] + k[4370]*y_cur[IDX_SII] + + k[4371]*y_cur[IDX_SOII] + k[4372]*y_cur[IDX_SiII] + + k[4373]*y_cur[IDX_SiOII] + k[4374]*y_cur[IDX_SiOHII] + + k[4375]*y_cur[IDX_SiSII] + k[5747] + k[6032]; + data[jistart + 11314] = 0.0 + k[45]*y_cur[IDX_CI]; + data[jistart + 11315] = 0.0 + k[3427]*y_cur[IDX_NI]; + data[jistart + 11316] = 0.0 + k[4373]*y_cur[IDX_C6M]; + data[jistart + 11317] = 0.0 + k[4374]*y_cur[IDX_C6M]; + data[jistart + 11318] = 0.0 + k[4350]*y_cur[IDX_C6M]; + data[jistart + 11319] = 0.0 + k[4362]*y_cur[IDX_C6M]; + data[jistart + 11320] = 0.0 + k[4368]*y_cur[IDX_C6M]; + data[jistart + 11321] = 0.0 + k[5951] + k[5952]; + data[jistart + 11322] = 0.0 + k[5244]*y_cur[IDX_NI] + k[5370]*y_cur[IDX_OI] + k[5756] + + k[6042]; + data[jistart + 11323] = 0.0 + k[8674]*y_cur[IDX_GC5I]; + data[jistart + 11324] = 0.0 - k[14]*y_cur[IDX_C2M] - k[20]*y_cur[IDX_C3M] - + k[26]*y_cur[IDX_C4M] - k[346]*y_cur[IDX_HII] - + k[2617]*y_cur[IDX_H3II] - k[2922]*y_cur[IDX_HCOII] - + k[3125]*y_cur[IDX_HeII] - k[3126]*y_cur[IDX_HeII] - + k[4930]*y_cur[IDX_CI] - k[4931]*y_cur[IDX_CI] - + k[5242]*y_cur[IDX_NI] - k[5368]*y_cur[IDX_OI] - + k[5499]*y_cur[IDX_CII] - k[5599]*y_cur[IDX_eM] - k[5748] - k[6033] - + k[6034] - k[7041]; + data[jistart + 11325] = 0.0 + k[12]*y_cur[IDX_C2M]; + data[jistart + 11326] = 0.0 + k[4345]*y_cur[IDX_C6M]; + data[jistart + 11327] = 0.0 + k[4364]*y_cur[IDX_C6M]; + data[jistart + 11328] = 0.0 + k[4371]*y_cur[IDX_C6M]; + data[jistart + 11329] = 0.0 + k[4347]*y_cur[IDX_C6M]; + data[jistart + 11330] = 0.0 + k[5754]; + data[jistart + 11331] = 0.0 + k[4928]*y_cur[IDX_CI]; + data[jistart + 11332] = 0.0 + k[4353]*y_cur[IDX_C6M]; + data[jistart + 11333] = 0.0 + k[4363]*y_cur[IDX_C6M]; + data[jistart + 11334] = 0.0 + k[4352]*y_cur[IDX_C6M]; + data[jistart + 11335] = 0.0 + k[17]*y_cur[IDX_C3M]; + data[jistart + 11336] = 0.0 + k[4367]*y_cur[IDX_C6M]; + data[jistart + 11337] = 0.0 + k[4369]*y_cur[IDX_C6M]; + data[jistart + 11338] = 0.0 + k[4344]*y_cur[IDX_C6M]; + data[jistart + 11339] = 0.0 + k[4357]*y_cur[IDX_C6M] + k[4358]*y_cur[IDX_C6M]; + data[jistart + 11340] = 0.0 + k[4365]*y_cur[IDX_C6M]; + data[jistart + 11341] = 0.0 + k[4366]*y_cur[IDX_C6M]; + data[jistart + 11342] = 0.0 + k[4372]*y_cur[IDX_C6M]; + data[jistart + 11343] = 0.0 + k[4370]*y_cur[IDX_C6M]; + data[jistart + 11344] = 0.0 + k[4343]*y_cur[IDX_C6M]; + data[jistart + 11345] = 0.0 + k[22]*y_cur[IDX_C4M]; + data[jistart + 11346] = 0.0 + k[4342]*y_cur[IDX_C6M]; + data[jistart + 11347] = 0.0 + k[4348]*y_cur[IDX_C6M]; + data[jistart + 11348] = 0.0 + k[3427]*y_cur[IDX_C7M] + k[3442]*y_cur[IDX_C9M] - + k[5242]*y_cur[IDX_C6I] + k[5244]*y_cur[IDX_C7I]; + data[jistart + 11349] = 0.0 + k[4355]*y_cur[IDX_C6M]; + data[jistart + 11350] = 0.0 + k[3713]*y_cur[IDX_C7HII] - k[5368]*y_cur[IDX_C6I] + + k[5370]*y_cur[IDX_C7I] + k[5372]*y_cur[IDX_C7NI]; + data[jistart + 11351] = 0.0 - k[3125]*y_cur[IDX_C6I] - k[3126]*y_cur[IDX_C6I] + + k[4361]*y_cur[IDX_C6M]; + data[jistart + 11352] = 0.0 + k[4341]*y_cur[IDX_C6M] - k[5499]*y_cur[IDX_C6I]; + data[jistart + 11353] = 0.0 - k[346]*y_cur[IDX_C6I] + k[4351]*y_cur[IDX_C6M]; + data[jistart + 11354] = 0.0 + k[37]*y_cur[IDX_C10M] + k[45]*y_cur[IDX_C5M] + + k[1847]*y_cur[IDX_C10HM] + k[4928]*y_cur[IDX_C5HI] - + k[4930]*y_cur[IDX_C6I] - k[4931]*y_cur[IDX_C6I]; + data[jistart + 11355] = 0.0 - k[2922]*y_cur[IDX_C6I] + k[4359]*y_cur[IDX_C6M] + + k[4360]*y_cur[IDX_C6M]; + data[jistart + 11356] = 0.0 - k[2617]*y_cur[IDX_C6I] + k[4354]*y_cur[IDX_C6M]; + data[jistart + 11357] = 0.0 + k[6783]*y_cur[IDX_C6HII] + k[6785]*y_cur[IDX_C6H2II] + + k[6823]*y_cur[IDX_C7II] + k[6836]*y_cur[IDX_C8II] + + k[6884]*y_cur[IDX_C11II]; + data[jistart + 11358] = 0.0 + k[735]*y_cur[IDX_C11II] + k[851]*y_cur[IDX_C6HII] + + k[852]*y_cur[IDX_C6H2II] + k[865]*y_cur[IDX_C7II] + + k[877]*y_cur[IDX_C8II] - k[5599]*y_cur[IDX_C6I]; + data[jistart + 11359] = 0.0 - k[4661]*y_cur[IDX_CNM]; + data[jistart + 11360] = 0.0 - k[4664]*y_cur[IDX_CNM]; + data[jistart + 11361] = 0.0 - k[4690]*y_cur[IDX_CNM]; + data[jistart + 11362] = 0.0 + k[3404]*y_cur[IDX_NI]; + data[jistart + 11363] = 0.0 - k[4671]*y_cur[IDX_CNM]; + data[jistart + 11364] = 0.0 + k[696]*y_cur[IDX_CNI] + k[3795]*y_cur[IDX_HCNI]; + data[jistart + 11365] = 0.0 + k[3382]*y_cur[IDX_NI]; + data[jistart + 11366] = 0.0 + k[3395]*y_cur[IDX_NI]; + data[jistart + 11367] = 0.0 + k[3422]*y_cur[IDX_NI]; + data[jistart + 11368] = 0.0 + k[3441]*y_cur[IDX_NI]; + data[jistart + 11369] = 0.0 + k[3431]*y_cur[IDX_NI]; + data[jistart + 11370] = 0.0 + k[3448]*y_cur[IDX_NI]; + data[jistart + 11371] = 0.0 + k[3379]*y_cur[IDX_NI]; + data[jistart + 11372] = 0.0 + k[3413]*y_cur[IDX_NI]; + data[jistart + 11373] = 0.0 + k[1449]*y_cur[IDX_NOI]; + data[jistart + 11374] = 0.0 + k[666]*y_cur[IDX_CNI] + k[3653]*y_cur[IDX_HCNI]; + data[jistart + 11375] = 0.0 + k[3444]*y_cur[IDX_NI]; + data[jistart + 11376] = 0.0 + k[2368]*y_cur[IDX_HCNI]; + data[jistart + 11377] = 0.0 + k[3438]*y_cur[IDX_NI]; + data[jistart + 11378] = 0.0 + k[3384]*y_cur[IDX_NI]; + data[jistart + 11379] = 0.0 + k[3392]*y_cur[IDX_NI]; + data[jistart + 11380] = 0.0 + k[3402]*y_cur[IDX_NI]; + data[jistart + 11381] = 0.0 + k[3419]*y_cur[IDX_NI]; + data[jistart + 11382] = 0.0 + k[3410]*y_cur[IDX_NI]; + data[jistart + 11383] = 0.0 + k[3427]*y_cur[IDX_NI]; + data[jistart + 11384] = 0.0 - k[4688]*y_cur[IDX_CNM]; + data[jistart + 11385] = 0.0 - k[4689]*y_cur[IDX_CNM]; + data[jistart + 11386] = 0.0 - k[4665]*y_cur[IDX_CNM]; + data[jistart + 11387] = 0.0 - k[4677]*y_cur[IDX_CNM]; + data[jistart + 11388] = 0.0 - k[4683]*y_cur[IDX_CNM]; + data[jistart + 11389] = 0.0 - k[60]*y_cur[IDX_CH3I] - k[106]*y_cur[IDX_HI] - + k[4656]*y_cur[IDX_CII] - k[4657]*y_cur[IDX_C2H2II] - + k[4658]*y_cur[IDX_C2H3II] - k[4659]*y_cur[IDX_C4H2II] - + k[4660]*y_cur[IDX_C4H3II] - k[4661]*y_cur[IDX_C4SII] - + k[4662]*y_cur[IDX_CH2CCHII] - k[4663]*y_cur[IDX_CH3II] - + k[4664]*y_cur[IDX_CNCII] - k[4665]*y_cur[IDX_FeII] - + k[4666]*y_cur[IDX_HII] - k[4667]*y_cur[IDX_H2COII] - + k[4668]*y_cur[IDX_H2SII] - k[4669]*y_cur[IDX_H3II] - + k[4670]*y_cur[IDX_H3OII] - k[4671]*y_cur[IDX_HC2SII] - + k[4672]*y_cur[IDX_HCNHII] - k[4673]*y_cur[IDX_HCNHII] - + k[4674]*y_cur[IDX_HCOII] - k[4675]*y_cur[IDX_HCOII] - + k[4676]*y_cur[IDX_HeII] - k[4677]*y_cur[IDX_MgII] - + k[4678]*y_cur[IDX_NII] - k[4679]*y_cur[IDX_N2HII] - + k[4680]*y_cur[IDX_NH3II] - k[4681]*y_cur[IDX_NH4II] - + k[4682]*y_cur[IDX_NOII] - k[4683]*y_cur[IDX_NaII] - + k[4684]*y_cur[IDX_OII] - k[4685]*y_cur[IDX_SII] - + k[4686]*y_cur[IDX_SOII] - k[4687]*y_cur[IDX_SiII] - + k[4688]*y_cur[IDX_SiOII] - k[4689]*y_cur[IDX_SiOHII] - + k[4690]*y_cur[IDX_SiSII] - k[5822] - k[6133]; + data[jistart + 11390] = 0.0 - k[4660]*y_cur[IDX_CNM]; + data[jistart + 11391] = 0.0 - k[4679]*y_cur[IDX_CNM]; + data[jistart + 11392] = 0.0 - k[4686]*y_cur[IDX_CNM]; + data[jistart + 11393] = 0.0 - k[4662]*y_cur[IDX_CNM]; + data[jistart + 11394] = 0.0 - k[4668]*y_cur[IDX_CNM]; + data[jistart + 11395] = 0.0 - k[4678]*y_cur[IDX_CNM]; + data[jistart + 11396] = 0.0 - k[4667]*y_cur[IDX_CNM]; + data[jistart + 11397] = 0.0 - k[4682]*y_cur[IDX_CNM]; + data[jistart + 11398] = 0.0 - k[4684]*y_cur[IDX_CNM]; + data[jistart + 11399] = 0.0 - k[4659]*y_cur[IDX_CNM]; + data[jistart + 11400] = 0.0 - k[4672]*y_cur[IDX_CNM] - k[4673]*y_cur[IDX_CNM]; + data[jistart + 11401] = 0.0 - k[4680]*y_cur[IDX_CNM]; + data[jistart + 11402] = 0.0 - k[4681]*y_cur[IDX_CNM]; + data[jistart + 11403] = 0.0 - k[4687]*y_cur[IDX_CNM]; + data[jistart + 11404] = 0.0 - k[4685]*y_cur[IDX_CNM]; + data[jistart + 11405] = 0.0 - k[4658]*y_cur[IDX_CNM]; + data[jistart + 11406] = 0.0 + k[1449]*y_cur[IDX_CM]; + data[jistart + 11407] = 0.0 + k[2368]*y_cur[IDX_HM] + k[3653]*y_cur[IDX_OM] + + k[3795]*y_cur[IDX_OHM]; + data[jistart + 11408] = 0.0 - k[4657]*y_cur[IDX_CNM]; + data[jistart + 11409] = 0.0 - k[4663]*y_cur[IDX_CNM]; + data[jistart + 11410] = 0.0 + k[666]*y_cur[IDX_OM] + k[696]*y_cur[IDX_OHM]; + data[jistart + 11411] = 0.0 - k[60]*y_cur[IDX_CNM]; + data[jistart + 11412] = 0.0 + k[3379]*y_cur[IDX_C10M] + k[3382]*y_cur[IDX_C10HM] + + k[3384]*y_cur[IDX_C2M] + k[3392]*y_cur[IDX_C3M] + + k[3395]*y_cur[IDX_C3HM] + k[3402]*y_cur[IDX_C4M] + + k[3404]*y_cur[IDX_C4HM] + k[3410]*y_cur[IDX_C5M] + + k[3413]*y_cur[IDX_C5HM] + k[3419]*y_cur[IDX_C6M] + + k[3422]*y_cur[IDX_C6HM] + k[3427]*y_cur[IDX_C7M] + + k[3431]*y_cur[IDX_C7HM] + k[3438]*y_cur[IDX_C8M] + + k[3441]*y_cur[IDX_C8HM] + k[3444]*y_cur[IDX_C9M] + + k[3448]*y_cur[IDX_C9HM]; + data[jistart + 11413] = 0.0 - k[4670]*y_cur[IDX_CNM]; + data[jistart + 11414] = 0.0 - k[4676]*y_cur[IDX_CNM]; + data[jistart + 11415] = 0.0 - k[4656]*y_cur[IDX_CNM]; + data[jistart + 11416] = 0.0 - k[4666]*y_cur[IDX_CNM]; + data[jistart + 11417] = 0.0 - k[4674]*y_cur[IDX_CNM] - k[4675]*y_cur[IDX_CNM]; + data[jistart + 11418] = 0.0 - k[4669]*y_cur[IDX_CNM]; + data[jistart + 11419] = 0.0 - k[106]*y_cur[IDX_CNM]; + data[jistart + 11420] = 0.0 + k[6019]; + data[jistart + 11421] = 0.0 + k[5972]; + data[jistart + 11422] = 0.0 + k[736]*y_cur[IDX_eM] + k[6885]*y_cur[IDX_GRAINM]; + data[jistart + 11423] = 0.0 + k[6266]; + data[jistart + 11424] = 0.0 + k[7177] + k[7359] + k[7541]; + data[jistart + 11425] = 0.0 + k[863]*y_cur[IDX_eM] + k[6821]*y_cur[IDX_GRAINM]; + data[jistart + 11426] = 0.0 + k[848]*y_cur[IDX_eM] + k[6780]*y_cur[IDX_GRAINM]; + data[jistart + 11427] = 0.0 + k[8667]*y_cur[IDX_GCI]; + data[jistart + 11428] = 0.0 + k[3704]*y_cur[IDX_OI]; + data[jistart + 11429] = 0.0 + k[4171]*y_cur[IDX_C4M]; + data[jistart + 11430] = 0.0 + k[821]*y_cur[IDX_eM] + k[1830]*y_cur[IDX_C4HI] + + k[6621]*y_cur[IDX_GRAINM]; + data[jistart + 11431] = 0.0 + k[4174]*y_cur[IDX_C4M]; + data[jistart + 11432] = 0.0 + k[4200]*y_cur[IDX_C4M]; + data[jistart + 11433] = 0.0 + k[4181]*y_cur[IDX_C4M]; + data[jistart + 11434] = 0.0 + k[3443]*y_cur[IDX_NI]; + data[jistart + 11435] = 0.0 + k[10]*y_cur[IDX_C2I] - k[12]*y_cur[IDX_C4I]; + data[jistart + 11436] = 0.0 - k[18]*y_cur[IDX_C4I] + k[40]*y_cur[IDX_CI]; + data[jistart + 11437] = 0.0 - k[24]*y_cur[IDX_C4I] + k[4166]*y_cur[IDX_CII] + + k[4167]*y_cur[IDX_C2H2II] + k[4168]*y_cur[IDX_C2H3II] + + k[4169]*y_cur[IDX_C4H2II] + k[4170]*y_cur[IDX_C4H3II] + + k[4171]*y_cur[IDX_C4SII] + k[4172]*y_cur[IDX_CH2CCHII] + + k[4173]*y_cur[IDX_CH3II] + k[4174]*y_cur[IDX_CNCII] + + k[4175]*y_cur[IDX_FeII] + k[4176]*y_cur[IDX_HII] + + k[4177]*y_cur[IDX_H2COII] + k[4178]*y_cur[IDX_H2SII] + + k[4179]*y_cur[IDX_H3II] + k[4180]*y_cur[IDX_H3OII] + + k[4181]*y_cur[IDX_HC2SII] + k[4182]*y_cur[IDX_HCNHII] + + k[4183]*y_cur[IDX_HCNHII] + k[4184]*y_cur[IDX_HCOII] + + k[4185]*y_cur[IDX_HCOII] + k[4186]*y_cur[IDX_HeII] + + k[4187]*y_cur[IDX_MgII] + k[4188]*y_cur[IDX_NII] + + k[4189]*y_cur[IDX_N2HII] + k[4190]*y_cur[IDX_NH3II] + + k[4191]*y_cur[IDX_NH4II] + k[4192]*y_cur[IDX_NOII] + + k[4193]*y_cur[IDX_NaII] + k[4194]*y_cur[IDX_OII] + + k[4195]*y_cur[IDX_SII] + k[4196]*y_cur[IDX_SOII] + + k[4197]*y_cur[IDX_SiII] + k[4198]*y_cur[IDX_SiOII] + + k[4199]*y_cur[IDX_SiOHII] + k[4200]*y_cur[IDX_SiSII] + k[5726] + + k[6010]; + data[jistart + 11438] = 0.0 - k[33]*y_cur[IDX_C4I]; + data[jistart + 11439] = 0.0 - k[29]*y_cur[IDX_C4I] + k[3410]*y_cur[IDX_NI]; + data[jistart + 11440] = 0.0 + k[3425]*y_cur[IDX_NI]; + data[jistart + 11441] = 0.0 + k[4198]*y_cur[IDX_C4M]; + data[jistart + 11442] = 0.0 + k[4199]*y_cur[IDX_C4M]; + data[jistart + 11443] = 0.0 + k[5746] + k[6031]; + data[jistart + 11444] = 0.0 + k[4175]*y_cur[IDX_C4M]; + data[jistart + 11445] = 0.0 + k[4187]*y_cur[IDX_C4M]; + data[jistart + 11446] = 0.0 + k[4193]*y_cur[IDX_C4M]; + data[jistart + 11447] = 0.0 + k[3058]*y_cur[IDX_HeII] + k[5952]; + data[jistart + 11448] = 0.0 + k[8667]*y_cur[IDX_GC3I]; + data[jistart + 11449] = 0.0 + k[5238]*y_cur[IDX_NI] + k[5365]*y_cur[IDX_OI] + k[5738]; + data[jistart + 11450] = 0.0 + k[4931]*y_cur[IDX_CI]; + data[jistart + 11451] = 0.0 - k[12]*y_cur[IDX_C2M] - k[18]*y_cur[IDX_C3M] - + k[24]*y_cur[IDX_C4M] - k[29]*y_cur[IDX_C5M] - k[33]*y_cur[IDX_C6M] - + k[338]*y_cur[IDX_HII] - k[2608]*y_cur[IDX_H3II] - + k[2778]*y_cur[IDX_H3OII] - k[2913]*y_cur[IDX_HCOII] - + k[3105]*y_cur[IDX_HeII] - k[3106]*y_cur[IDX_HeII] - + k[3107]*y_cur[IDX_HeII] - k[4923]*y_cur[IDX_CI] - + k[5235]*y_cur[IDX_NI] - k[5361]*y_cur[IDX_OI] - + k[5497]*y_cur[IDX_CII] - k[5594]*y_cur[IDX_eM] - k[5727] - k[5728] - + k[6011] - k[6012] - k[6995]; + data[jistart + 11452] = 0.0 + k[4170]*y_cur[IDX_C4M]; + data[jistart + 11453] = 0.0 + k[4189]*y_cur[IDX_C4M]; + data[jistart + 11454] = 0.0 + k[4196]*y_cur[IDX_C4M]; + data[jistart + 11455] = 0.0 + k[4172]*y_cur[IDX_C4M]; + data[jistart + 11456] = 0.0 + k[5753] + k[6040]; + data[jistart + 11457] = 0.0 + k[4178]*y_cur[IDX_C4M]; + data[jistart + 11458] = 0.0 + k[4188]*y_cur[IDX_C4M]; + data[jistart + 11459] = 0.0 + k[4920]*y_cur[IDX_CI]; + data[jistart + 11460] = 0.0 + k[4177]*y_cur[IDX_C4M]; + data[jistart + 11461] = 0.0 + k[5522]*y_cur[IDX_CI]; + data[jistart + 11462] = 0.0 + k[1830]*y_cur[IDX_C4HII] + k[5732] + k[6017]; + data[jistart + 11463] = 0.0 + k[4192]*y_cur[IDX_C4M]; + data[jistart + 11464] = 0.0 + k[4194]*y_cur[IDX_C4M]; + data[jistart + 11465] = 0.0 + k[4169]*y_cur[IDX_C4M]; + data[jistart + 11466] = 0.0 + k[4182]*y_cur[IDX_C4M] + k[4183]*y_cur[IDX_C4M]; + data[jistart + 11467] = 0.0 + k[4190]*y_cur[IDX_C4M]; + data[jistart + 11468] = 0.0 + k[4191]*y_cur[IDX_C4M]; + data[jistart + 11469] = 0.0 + k[4197]*y_cur[IDX_C4M]; + data[jistart + 11470] = 0.0 + k[4195]*y_cur[IDX_C4M]; + data[jistart + 11471] = 0.0 + k[4168]*y_cur[IDX_C4M]; + data[jistart + 11472] = 0.0 + k[10]*y_cur[IDX_C2M]; + data[jistart + 11473] = 0.0 + k[4167]*y_cur[IDX_C4M]; + data[jistart + 11474] = 0.0 + k[4173]*y_cur[IDX_C4M]; + data[jistart + 11475] = 0.0 + k[3410]*y_cur[IDX_C5M] + k[3425]*y_cur[IDX_C7M] + + k[3443]*y_cur[IDX_C9M] - k[5235]*y_cur[IDX_C4I] + + k[5238]*y_cur[IDX_C5I]; + data[jistart + 11476] = 0.0 - k[2778]*y_cur[IDX_C4I] + k[4180]*y_cur[IDX_C4M]; + data[jistart + 11477] = 0.0 + k[3704]*y_cur[IDX_C5HII] - k[5361]*y_cur[IDX_C4I] + + k[5365]*y_cur[IDX_C5I]; + data[jistart + 11478] = 0.0 + k[3058]*y_cur[IDX_C10I] - k[3105]*y_cur[IDX_C4I] - + k[3106]*y_cur[IDX_C4I] - k[3107]*y_cur[IDX_C4I] + + k[4186]*y_cur[IDX_C4M]; + data[jistart + 11479] = 0.0 + k[4166]*y_cur[IDX_C4M] - k[5497]*y_cur[IDX_C4I]; + data[jistart + 11480] = 0.0 - k[338]*y_cur[IDX_C4I] + k[4176]*y_cur[IDX_C4M]; + data[jistart + 11481] = 0.0 + k[40]*y_cur[IDX_C3M] + k[4920]*y_cur[IDX_C3HI] - + k[4923]*y_cur[IDX_C4I] + k[4931]*y_cur[IDX_C6I] + + k[5522]*y_cur[IDX_C3I]; + data[jistart + 11482] = 0.0 - k[2913]*y_cur[IDX_C4I] + k[4184]*y_cur[IDX_C4M] + + k[4185]*y_cur[IDX_C4M]; + data[jistart + 11483] = 0.0 - k[2608]*y_cur[IDX_C4I] + k[4179]*y_cur[IDX_C4M]; + data[jistart + 11484] = 0.0 + k[6621]*y_cur[IDX_C4HII] + k[6780]*y_cur[IDX_C6II] + + k[6821]*y_cur[IDX_C7II] + k[6885]*y_cur[IDX_C11II]; + data[jistart + 11485] = 0.0 + k[736]*y_cur[IDX_C11II] + k[821]*y_cur[IDX_C4HII] + + k[848]*y_cur[IDX_C6II] + k[863]*y_cur[IDX_C7II] - + k[5594]*y_cur[IDX_C4I]; + data[jistart + 11486] = 0.0 + k[7176] + k[7358] + k[7540]; + data[jistart + 11487] = 0.0 + k[1141]*y_cur[IDX_eM] + k[6625]*y_cur[IDX_GRAINM]; + data[jistart + 11488] = 0.0 + k[1143]*y_cur[IDX_eM] + k[1144]*y_cur[IDX_eM] + + k[6756]*y_cur[IDX_GRAINM] + k[6757]*y_cur[IDX_GRAINM]; + data[jistart + 11489] = 0.0 + k[1222]*y_cur[IDX_eM] + k[6751]*y_cur[IDX_GRAINM]; + data[jistart + 11490] = 0.0 + k[714]*y_cur[IDX_SOII]; + data[jistart + 11491] = 0.0 + k[5437]*y_cur[IDX_OI]; + data[jistart + 11492] = 0.0 + k[1177]*y_cur[IDX_eM] + k[6706]*y_cur[IDX_GRAINM]; + data[jistart + 11493] = 0.0 + k[8694]*y_cur[IDX_GOI]; + data[jistart + 11494] = 0.0 + k[5426]*y_cur[IDX_OI]; + data[jistart + 11495] = 0.0 + k[4985]*y_cur[IDX_CI] + k[5438]*y_cur[IDX_OI] + + k[5489]*y_cur[IDX_SI] + k[5489]*y_cur[IDX_SI] + k[5914] + k[6256]; + data[jistart + 11496] = 0.0 + k[713]*y_cur[IDX_SOII]; + data[jistart + 11497] = 0.0 + k[711]*y_cur[IDX_SOII]; + data[jistart + 11498] = 0.0 + k[8694]*y_cur[IDX_GSI]; + data[jistart + 11499] = 0.0 + k[712]*y_cur[IDX_SOII]; + data[jistart + 11500] = 0.0 + k[4792]*y_cur[IDX_SOII]; + data[jistart + 11501] = 0.0 + k[4651]*y_cur[IDX_SOII]; + data[jistart + 11502] = 0.0 + k[5431]*y_cur[IDX_OI]; + data[jistart + 11503] = 0.0 + k[132]*y_cur[IDX_OI] + k[4862]*y_cur[IDX_SOII]; + data[jistart + 11504] = 0.0 + k[3676]*y_cur[IDX_O2I]; + data[jistart + 11505] = 0.0 + k[4056]*y_cur[IDX_SOII]; + data[jistart + 11506] = 0.0 + k[4231]*y_cur[IDX_SOII]; + data[jistart + 11507] = 0.0 + k[4827]*y_cur[IDX_SOII]; + data[jistart + 11508] = 0.0 + k[3986]*y_cur[IDX_SOII]; + data[jistart + 11509] = 0.0 + k[4126]*y_cur[IDX_SOII]; + data[jistart + 11510] = 0.0 + k[4406]*y_cur[IDX_SOII]; + data[jistart + 11511] = 0.0 + k[4546]*y_cur[IDX_SOII]; + data[jistart + 11512] = 0.0 + k[4476]*y_cur[IDX_SOII]; + data[jistart + 11513] = 0.0 + k[4616]*y_cur[IDX_SOII]; + data[jistart + 11514] = 0.0 + k[3951]*y_cur[IDX_SOII]; + data[jistart + 11515] = 0.0 + k[4301]*y_cur[IDX_SOII]; + data[jistart + 11516] = 0.0 + k[4336]*y_cur[IDX_SOII]; + data[jistart + 11517] = 0.0 + k[5416]*y_cur[IDX_OI]; + data[jistart + 11518] = 0.0 + k[3916]*y_cur[IDX_SOII]; + data[jistart + 11519] = 0.0 + k[5393]*y_cur[IDX_OI]; + data[jistart + 11520] = 0.0 + k[4757]*y_cur[IDX_SOII]; + data[jistart + 11521] = 0.0 + k[4581]*y_cur[IDX_SOII]; + data[jistart + 11522] = 0.0 + k[4722]*y_cur[IDX_SOII]; + data[jistart + 11523] = 0.0 + k[4511]*y_cur[IDX_SOII]; + data[jistart + 11524] = 0.0 + k[4021]*y_cur[IDX_SOII]; + data[jistart + 11525] = 0.0 + k[4091]*y_cur[IDX_SOII]; + data[jistart + 11526] = 0.0 + k[4196]*y_cur[IDX_SOII]; + data[jistart + 11527] = 0.0 + k[4371]*y_cur[IDX_SOII]; + data[jistart + 11528] = 0.0 + k[4266]*y_cur[IDX_SOII]; + data[jistart + 11529] = 0.0 + k[4441]*y_cur[IDX_SOII]; + data[jistart + 11530] = 0.0 + k[3842]*y_cur[IDX_SI]; + data[jistart + 11531] = 0.0 + k[4161]*y_cur[IDX_SOII]; + data[jistart + 11532] = 0.0 + k[715]*y_cur[IDX_SOII]; + data[jistart + 11533] = 0.0 + k[539]*y_cur[IDX_SOII]; + data[jistart + 11534] = 0.0 + k[644]*y_cur[IDX_SOII]; + data[jistart + 11535] = 0.0 + k[4686]*y_cur[IDX_SOII]; + data[jistart + 11536] = 0.0 - k[193]*y_cur[IDX_CII] - k[417]*y_cur[IDX_HII] - + k[1428]*y_cur[IDX_CII] - k[1429]*y_cur[IDX_CII] - + k[1430]*y_cur[IDX_CII] - k[2096]*y_cur[IDX_CH3II] - + k[2742]*y_cur[IDX_H3II] - k[2990]*y_cur[IDX_HCOII] - + k[3305]*y_cur[IDX_HeII] - k[3306]*y_cur[IDX_HeII] - + k[4986]*y_cur[IDX_CI] - k[4987]*y_cur[IDX_CI] - + k[5102]*y_cur[IDX_CHI] - k[5103]*y_cur[IDX_CHI] - + k[5200]*y_cur[IDX_HI] - k[5201]*y_cur[IDX_HI] - + k[5290]*y_cur[IDX_NI] - k[5291]*y_cur[IDX_NI] - + k[5338]*y_cur[IDX_O2I] - k[5439]*y_cur[IDX_OI] - + k[5481]*y_cur[IDX_OHI] - k[5490]*y_cur[IDX_SI] - + k[5583]*y_cur[IDX_OI] - k[5915] - k[5916] - k[6257] - k[6258] - + k[6994]; + data[jistart + 11537] = 0.0 + k[539]*y_cur[IDX_MgI] + k[615]*y_cur[IDX_NH3I] + + k[644]*y_cur[IDX_NaI] + k[711]*y_cur[IDX_CH2CCH2I] + + k[712]*y_cur[IDX_CH3CHCH2I] + k[713]*y_cur[IDX_CH3COCH3I] + + k[714]*y_cur[IDX_CH3OCH3I] + k[715]*y_cur[IDX_FeI] + + k[3916]*y_cur[IDX_CM] + k[3951]*y_cur[IDX_C10M] + + k[3986]*y_cur[IDX_C10HM] + k[4021]*y_cur[IDX_C2M] + + k[4056]*y_cur[IDX_C2HM] + k[4091]*y_cur[IDX_C3M] + + k[4126]*y_cur[IDX_C3HM] + k[4161]*y_cur[IDX_C3NM] + + k[4196]*y_cur[IDX_C4M] + k[4231]*y_cur[IDX_C4HM] + + k[4266]*y_cur[IDX_C5M] + k[4301]*y_cur[IDX_C5HM] + + k[4336]*y_cur[IDX_C5NM] + k[4371]*y_cur[IDX_C6M] + + k[4406]*y_cur[IDX_C6HM] + k[4441]*y_cur[IDX_C7M] + + k[4476]*y_cur[IDX_C7HM] + k[4511]*y_cur[IDX_C8M] + + k[4546]*y_cur[IDX_C8HM] + k[4581]*y_cur[IDX_C9M] + + k[4616]*y_cur[IDX_C9HM] + k[4651]*y_cur[IDX_CHM] + + k[4686]*y_cur[IDX_CNM] + k[4722]*y_cur[IDX_HM] + + k[4757]*y_cur[IDX_OM] + k[4792]*y_cur[IDX_O2M] + + k[4827]*y_cur[IDX_OHM] + k[4862]*y_cur[IDX_SM]; + data[jistart + 11538] = 0.0 + k[3676]*y_cur[IDX_SiSII] + k[5337]*y_cur[IDX_SI] - + k[5338]*y_cur[IDX_SOI]; + data[jistart + 11539] = 0.0 + k[5334]*y_cur[IDX_SI]; + data[jistart + 11540] = 0.0 - k[5102]*y_cur[IDX_SOI] - k[5103]*y_cur[IDX_SOI]; + data[jistart + 11541] = 0.0 + k[3842]*y_cur[IDX_SiOII] + k[5334]*y_cur[IDX_NOI] + + k[5337]*y_cur[IDX_O2I] + k[5480]*y_cur[IDX_OHI] + + k[5489]*y_cur[IDX_SO2I] + k[5489]*y_cur[IDX_SO2I] - + k[5490]*y_cur[IDX_SOI]; + data[jistart + 11542] = 0.0 + k[5480]*y_cur[IDX_SI] - k[5481]*y_cur[IDX_SOI]; + data[jistart + 11543] = 0.0 + k[615]*y_cur[IDX_SOII]; + data[jistart + 11544] = 0.0 - k[2096]*y_cur[IDX_SOI]; + data[jistart + 11545] = 0.0 - k[5290]*y_cur[IDX_SOI] - k[5291]*y_cur[IDX_SOI]; + data[jistart + 11546] = 0.0 + k[132]*y_cur[IDX_SM] + k[5393]*y_cur[IDX_CSI] + + k[5416]*y_cur[IDX_HSI] + k[5426]*y_cur[IDX_NSI] + + k[5431]*y_cur[IDX_OCSI] + k[5437]*y_cur[IDX_S2I] + + k[5438]*y_cur[IDX_SO2I] - k[5439]*y_cur[IDX_SOI] - + k[5583]*y_cur[IDX_SOI]; + data[jistart + 11547] = 0.0 - k[3305]*y_cur[IDX_SOI] - k[3306]*y_cur[IDX_SOI]; + data[jistart + 11548] = 0.0 - k[193]*y_cur[IDX_SOI] - k[1428]*y_cur[IDX_SOI] - + k[1429]*y_cur[IDX_SOI] - k[1430]*y_cur[IDX_SOI]; + data[jistart + 11549] = 0.0 - k[417]*y_cur[IDX_SOI]; + data[jistart + 11550] = 0.0 + k[4985]*y_cur[IDX_SO2I] - k[4986]*y_cur[IDX_SOI] - + k[4987]*y_cur[IDX_SOI]; + data[jistart + 11551] = 0.0 - k[2990]*y_cur[IDX_SOI]; + data[jistart + 11552] = 0.0 - k[2742]*y_cur[IDX_SOI]; + data[jistart + 11553] = 0.0 + k[6625]*y_cur[IDX_HSOII] + k[6706]*y_cur[IDX_OCSII] + + k[6751]*y_cur[IDX_SO2II] + k[6756]*y_cur[IDX_HSO2II] + + k[6757]*y_cur[IDX_HSO2II]; + data[jistart + 11554] = 0.0 + k[1141]*y_cur[IDX_HSOII] + k[1143]*y_cur[IDX_HSO2II] + + k[1144]*y_cur[IDX_HSO2II] + k[1177]*y_cur[IDX_OCSII] + + k[1222]*y_cur[IDX_SO2II]; + data[jistart + 11555] = 0.0 - k[5200]*y_cur[IDX_SOI] - k[5201]*y_cur[IDX_SOI]; + data[jistart + 11556] = 0.0 + k[7233] + k[7415] + k[7597]; + data[jistart + 11557] = 0.0 + k[8730]*y_cur[IDX_GCHI]; + data[jistart + 11558] = 0.0 + k[8677]*y_cur[IDX_GCI]; + data[jistart + 11559] = 0.0 + k[8641]*y_cur[IDX_GHI]; + data[jistart + 11560] = 0.0 + k[873]*y_cur[IDX_eM] + k[6831]*y_cur[IDX_GRAINM]; + data[jistart + 11561] = 0.0 + k[731]*y_cur[IDX_eM] + k[6873]*y_cur[IDX_GRAINM]; + data[jistart + 11562] = 0.0 + k[879]*y_cur[IDX_eM] + k[6838]*y_cur[IDX_GRAINM]; + data[jistart + 11563] = 0.0 + k[5960]; + data[jistart + 11564] = 0.0 + k[5758] + k[6046]; + data[jistart + 11565] = 0.0 + k[3719]*y_cur[IDX_OI]; + data[jistart + 11566] = 0.0 + k[871]*y_cur[IDX_eM] + k[6829]*y_cur[IDX_GRAINM]; + data[jistart + 11567] = 0.0 + k[869]*y_cur[IDX_eM] + k[6827]*y_cur[IDX_GRAINM]; + data[jistart + 11568] = 0.0 + k[4932]*y_cur[IDX_CI]; + data[jistart + 11569] = 0.0 + k[4451]*y_cur[IDX_C7HM]; + data[jistart + 11570] = 0.0 + k[4454]*y_cur[IDX_C7HM]; + data[jistart + 11571] = 0.0 + k[4480]*y_cur[IDX_C7HM]; + data[jistart + 11572] = 0.0 + k[4461]*y_cur[IDX_C7HM]; + data[jistart + 11573] = 0.0 + k[3381]*y_cur[IDX_NI]; + data[jistart + 11574] = 0.0 + k[48]*y_cur[IDX_CI]; + data[jistart + 11575] = 0.0 + k[3441]*y_cur[IDX_NI]; + data[jistart + 11576] = 0.0 + k[4446]*y_cur[IDX_CII] + k[4447]*y_cur[IDX_C2H2II] + + k[4448]*y_cur[IDX_C2H3II] + k[4449]*y_cur[IDX_C4H2II] + + k[4450]*y_cur[IDX_C4H3II] + k[4451]*y_cur[IDX_C4SII] + + k[4452]*y_cur[IDX_CH2CCHII] + k[4453]*y_cur[IDX_CH3II] + + k[4454]*y_cur[IDX_CNCII] + k[4455]*y_cur[IDX_FeII] + + k[4456]*y_cur[IDX_HII] + k[4457]*y_cur[IDX_H2COII] + + k[4458]*y_cur[IDX_H2SII] + k[4459]*y_cur[IDX_H3II] + + k[4460]*y_cur[IDX_H3OII] + k[4461]*y_cur[IDX_HC2SII] + + k[4462]*y_cur[IDX_HCNHII] + k[4463]*y_cur[IDX_HCNHII] + + k[4464]*y_cur[IDX_HCOII] + k[4465]*y_cur[IDX_HCOII] + + k[4466]*y_cur[IDX_HeII] + k[4467]*y_cur[IDX_MgII] + + k[4468]*y_cur[IDX_NII] + k[4469]*y_cur[IDX_N2HII] + + k[4470]*y_cur[IDX_NH3II] + k[4471]*y_cur[IDX_NH4II] + + k[4472]*y_cur[IDX_NOII] + k[4473]*y_cur[IDX_NaII] + + k[4474]*y_cur[IDX_OII] + k[4475]*y_cur[IDX_SII] + + k[4476]*y_cur[IDX_SOII] + k[4477]*y_cur[IDX_SiII] + + k[4478]*y_cur[IDX_SiOII] + k[4479]*y_cur[IDX_SiOHII] + + k[4480]*y_cur[IDX_SiSII] + k[5757] + k[6044]; + data[jistart + 11577] = 0.0 + k[99]*y_cur[IDX_HI]; + data[jistart + 11578] = 0.0 + k[4478]*y_cur[IDX_C7HM]; + data[jistart + 11579] = 0.0 + k[8730]*y_cur[IDX_GC6I]; + data[jistart + 11580] = 0.0 + k[4479]*y_cur[IDX_C7HM]; + data[jistart + 11581] = 0.0 + k[5966]; + data[jistart + 11582] = 0.0 + k[4455]*y_cur[IDX_C7HM]; + data[jistart + 11583] = 0.0 + k[4467]*y_cur[IDX_C7HM]; + data[jistart + 11584] = 0.0 + k[4473]*y_cur[IDX_C7HM]; + data[jistart + 11585] = 0.0 + k[5249]*y_cur[IDX_NI] + k[5374]*y_cur[IDX_OI]; + data[jistart + 11586] = 0.0 + k[8677]*y_cur[IDX_GC6HI]; + data[jistart + 11587] = 0.0 - k[351]*y_cur[IDX_HII] - k[1334]*y_cur[IDX_CII] - + k[1501]*y_cur[IDX_C2H2II] - k[1502]*y_cur[IDX_C2H2II] - + k[1605]*y_cur[IDX_C2H3II] - k[1606]*y_cur[IDX_C2H3II] - + k[1607]*y_cur[IDX_C2H3II] - k[1665]*y_cur[IDX_C2H4II] - + k[1666]*y_cur[IDX_C2H4II] - k[2058]*y_cur[IDX_CH3II] - + k[2309]*y_cur[IDX_HII] - k[2623]*y_cur[IDX_H3II] - + k[2928]*y_cur[IDX_HCOII] - k[3139]*y_cur[IDX_HeII] - + k[3140]*y_cur[IDX_HeII] - k[4936]*y_cur[IDX_CI] - + k[5246]*y_cur[IDX_NI] - k[5371]*y_cur[IDX_OI] - + k[5602]*y_cur[IDX_eM] - k[5759] - k[6047] - k[6048] - k[7051]; + data[jistart + 11588] = 0.0 - k[1665]*y_cur[IDX_C7HI] - k[1666]*y_cur[IDX_C7HI]; + data[jistart + 11589] = 0.0 + k[4450]*y_cur[IDX_C7HM]; + data[jistart + 11590] = 0.0 + k[4469]*y_cur[IDX_C7HM]; + data[jistart + 11591] = 0.0 + k[4476]*y_cur[IDX_C7HM]; + data[jistart + 11592] = 0.0 + k[4452]*y_cur[IDX_C7HM]; + data[jistart + 11593] = 0.0 + k[4458]*y_cur[IDX_C7HM]; + data[jistart + 11594] = 0.0 + k[4468]*y_cur[IDX_C7HM]; + data[jistart + 11595] = 0.0 + k[4457]*y_cur[IDX_C7HM]; + data[jistart + 11596] = 0.0 + k[4472]*y_cur[IDX_C7HM]; + data[jistart + 11597] = 0.0 + k[4474]*y_cur[IDX_C7HM]; + data[jistart + 11598] = 0.0 + k[4449]*y_cur[IDX_C7HM]; + data[jistart + 11599] = 0.0 + k[4462]*y_cur[IDX_C7HM] + k[4463]*y_cur[IDX_C7HM]; + data[jistart + 11600] = 0.0 + k[4470]*y_cur[IDX_C7HM]; + data[jistart + 11601] = 0.0 + k[4471]*y_cur[IDX_C7HM]; + data[jistart + 11602] = 0.0 + k[4477]*y_cur[IDX_C7HM]; + data[jistart + 11603] = 0.0 + k[4475]*y_cur[IDX_C7HM]; + data[jistart + 11604] = 0.0 - k[1605]*y_cur[IDX_C7HI] - k[1606]*y_cur[IDX_C7HI] - + k[1607]*y_cur[IDX_C7HI] + k[4448]*y_cur[IDX_C7HM]; + data[jistart + 11605] = 0.0 - k[1501]*y_cur[IDX_C7HI] - k[1502]*y_cur[IDX_C7HI] + + k[4447]*y_cur[IDX_C7HM]; + data[jistart + 11606] = 0.0 - k[2058]*y_cur[IDX_C7HI] + k[4453]*y_cur[IDX_C7HM]; + data[jistart + 11607] = 0.0 + k[8641]*y_cur[IDX_GC7I]; + data[jistart + 11608] = 0.0 + k[3381]*y_cur[IDX_C10HM] + k[3441]*y_cur[IDX_C8HM] - + k[5246]*y_cur[IDX_C7HI] + k[5249]*y_cur[IDX_C8HI]; + data[jistart + 11609] = 0.0 + k[4460]*y_cur[IDX_C7HM]; + data[jistart + 11610] = 0.0 + k[3719]*y_cur[IDX_C8H2II] - k[5371]*y_cur[IDX_C7HI] + + k[5374]*y_cur[IDX_C8HI]; + data[jistart + 11611] = 0.0 - k[3139]*y_cur[IDX_C7HI] - k[3140]*y_cur[IDX_C7HI] + + k[4466]*y_cur[IDX_C7HM]; + data[jistart + 11612] = 0.0 - k[1334]*y_cur[IDX_C7HI] + k[4446]*y_cur[IDX_C7HM]; + data[jistart + 11613] = 0.0 - k[351]*y_cur[IDX_C7HI] - k[2309]*y_cur[IDX_C7HI] + + k[4456]*y_cur[IDX_C7HM]; + data[jistart + 11614] = 0.0 + k[48]*y_cur[IDX_C6HM] + k[4932]*y_cur[IDX_C6H2I] - + k[4936]*y_cur[IDX_C7HI]; + data[jistart + 11615] = 0.0 - k[2928]*y_cur[IDX_C7HI] + k[4464]*y_cur[IDX_C7HM] + + k[4465]*y_cur[IDX_C7HM]; + data[jistart + 11616] = 0.0 - k[2623]*y_cur[IDX_C7HI] + k[4459]*y_cur[IDX_C7HM]; + data[jistart + 11617] = 0.0 + k[6827]*y_cur[IDX_C7H2II] + k[6829]*y_cur[IDX_C7H3II] + + k[6831]*y_cur[IDX_C7H4II] + k[6838]*y_cur[IDX_C8HII] + + k[6873]*y_cur[IDX_C10HII]; + data[jistart + 11618] = 0.0 + k[731]*y_cur[IDX_C10HII] + k[869]*y_cur[IDX_C7H2II] + + k[871]*y_cur[IDX_C7H3II] + k[873]*y_cur[IDX_C7H4II] + + k[879]*y_cur[IDX_C8HII] - k[5602]*y_cur[IDX_C7HI]; + data[jistart + 11619] = 0.0 + k[99]*y_cur[IDX_C7M]; + data[jistart + 11620] = 0.0 + k[234]*y_cur[IDX_C2H4I]; + data[jistart + 11621] = 0.0 + k[237]*y_cur[IDX_C2H4I]; + data[jistart + 11622] = 0.0 + k[236]*y_cur[IDX_C2H4I]; + data[jistart + 11623] = 0.0 + k[239]*y_cur[IDX_C2H4I]; + data[jistart + 11624] = 0.0 + k[238]*y_cur[IDX_C2H4I]; + data[jistart + 11625] = 0.0 - k[1682]*y_cur[IDX_C2H4II] - k[1683]*y_cur[IDX_C2H4II] - + k[1684]*y_cur[IDX_C2H4II]; + data[jistart + 11626] = 0.0 - k[1663]*y_cur[IDX_C2H4II] - k[1664]*y_cur[IDX_C2H4II]; + data[jistart + 11627] = 0.0 + k[3400]*y_cur[IDX_NI]; + data[jistart + 11628] = 0.0 + k[235]*y_cur[IDX_C2H4I]; + data[jistart + 11629] = 0.0 + k[278]*y_cur[IDX_C2H4I]; + data[jistart + 11630] = 0.0 - k[1672]*y_cur[IDX_C2H4II] - k[1673]*y_cur[IDX_C2H4II]; + data[jistart + 11631] = 0.0 - k[1659]*y_cur[IDX_C2H4II] - k[1660]*y_cur[IDX_C2H4II]; + data[jistart + 11632] = 0.0 + k[2829]*y_cur[IDX_HI]; + data[jistart + 11633] = 0.0 - k[1655]*y_cur[IDX_C2H4II] - k[1656]*y_cur[IDX_C2H4II]; + data[jistart + 11634] = 0.0 + k[1369]*y_cur[IDX_CII] + k[1511]*y_cur[IDX_C2H2II] - + k[1670]*y_cur[IDX_C2H4II] - k[1671]*y_cur[IDX_C2H4II] + + k[2327]*y_cur[IDX_HII] + k[2376]*y_cur[IDX_H2II] + + k[2505]*y_cur[IDX_H2OII] + k[3190]*y_cur[IDX_HeII] + + k[3771]*y_cur[IDX_OHII]; + data[jistart + 11635] = 0.0 - k[1649]*y_cur[IDX_C2H4II] - k[1650]*y_cur[IDX_C2H4II]; + data[jistart + 11636] = 0.0 + k[2298]*y_cur[IDX_HII] + k[3084]*y_cur[IDX_HeII]; + data[jistart + 11637] = 0.0 + k[3658]*y_cur[IDX_O2II]; + data[jistart + 11638] = 0.0 + k[438]*y_cur[IDX_C2H4I] + k[2376]*y_cur[IDX_C2H6I]; + data[jistart + 11639] = 0.0 - k[1669]*y_cur[IDX_C2H4II]; + data[jistart + 11640] = 0.0 - k[1676]*y_cur[IDX_C2H4II]; + data[jistart + 11641] = 0.0 + k[1976]*y_cur[IDX_CH4I]; + data[jistart + 11642] = 0.0 + k[3771]*y_cur[IDX_C2H6I]; + data[jistart + 11643] = 0.0 + k[464]*y_cur[IDX_C2H4I] + k[2505]*y_cur[IDX_C2H6I]; + data[jistart + 11644] = 0.0 + k[1942]*y_cur[IDX_CH4I]; + data[jistart + 11645] = 0.0 + k[240]*y_cur[IDX_C2H4I] + k[3658]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 11646] = 0.0 - k[1665]*y_cur[IDX_C2H4II] - k[1666]*y_cur[IDX_C2H4II]; + data[jistart + 11647] = 0.0 - k[231]*y_cur[IDX_C2H3I] - k[232]*y_cur[IDX_CH2CCHI] - + k[233]*y_cur[IDX_H2SI] - k[599]*y_cur[IDX_NH3I] - + k[757]*y_cur[IDX_eM] - k[758]*y_cur[IDX_eM] - k[759]*y_cur[IDX_eM] - + k[760]*y_cur[IDX_eM] - k[761]*y_cur[IDX_eM] - k[762]*y_cur[IDX_eM] - + k[763]*y_cur[IDX_eM] - k[1536]*y_cur[IDX_C2H2I] - + k[1537]*y_cur[IDX_C2H2I] - k[1628]*y_cur[IDX_C2H3I] - + k[1647]*y_cur[IDX_C2H4I] - k[1648]*y_cur[IDX_C2H4I] - + k[1649]*y_cur[IDX_C3H2I] - k[1650]*y_cur[IDX_C3H2I] - + k[1651]*y_cur[IDX_C3HI] - k[1652]*y_cur[IDX_C3HI] - + k[1653]*y_cur[IDX_C4HI] - k[1654]*y_cur[IDX_C4HI] - + k[1655]*y_cur[IDX_C5H2I] - k[1656]*y_cur[IDX_C5H2I] - + k[1657]*y_cur[IDX_C5HI] - k[1658]*y_cur[IDX_C5HI] - + k[1659]*y_cur[IDX_C6H2I] - k[1660]*y_cur[IDX_C6H2I] - + k[1661]*y_cur[IDX_C6HI] - k[1662]*y_cur[IDX_C6HI] - + k[1663]*y_cur[IDX_C7H2I] - k[1664]*y_cur[IDX_C7H2I] - + k[1665]*y_cur[IDX_C7HI] - k[1666]*y_cur[IDX_C7HI] - + k[1667]*y_cur[IDX_CH2CCHI] - k[1668]*y_cur[IDX_CH2CCHI] - + k[1669]*y_cur[IDX_CH3CCHI] - k[1670]*y_cur[IDX_C2H6I] - + k[1671]*y_cur[IDX_C2H6I] - k[1672]*y_cur[IDX_H2CCCI] - + k[1673]*y_cur[IDX_H2CCCI] - k[1674]*y_cur[IDX_H2SI] - + k[1675]*y_cur[IDX_H2SI] - k[1676]*y_cur[IDX_HC3NI] - + k[1677]*y_cur[IDX_C4H2I] - k[1678]*y_cur[IDX_C4H2I] - + k[1679]*y_cur[IDX_SI] - k[1680]*y_cur[IDX_SiI] - + k[1681]*y_cur[IDX_SiI] - k[1682]*y_cur[IDX_SiH4I] - + k[1683]*y_cur[IDX_SiH4I] - k[1684]*y_cur[IDX_SiH4I] - + k[1729]*y_cur[IDX_C2HI] - k[1730]*y_cur[IDX_C2HI] - + k[1853]*y_cur[IDX_CI] - k[1854]*y_cur[IDX_CI] - + k[2828]*y_cur[IDX_HI] - k[3391]*y_cur[IDX_NI] - + k[3691]*y_cur[IDX_OI] - k[3692]*y_cur[IDX_OI] - + k[6381]*y_cur[IDX_GRAINM] - k[6382]*y_cur[IDX_GRAINM] - + k[6383]*y_cur[IDX_GRAINM] - k[6384]*y_cur[IDX_GRAINM] - + k[6385]*y_cur[IDX_GRAINM] - k[6386]*y_cur[IDX_GRAINM] - + k[6387]*y_cur[IDX_GRAINM]; + data[jistart + 11648] = 0.0 - k[232]*y_cur[IDX_C2H4II] - k[1667]*y_cur[IDX_C2H4II] - + k[1668]*y_cur[IDX_C2H4II]; + data[jistart + 11649] = 0.0 - k[1661]*y_cur[IDX_C2H4II] - k[1662]*y_cur[IDX_C2H4II]; + data[jistart + 11650] = 0.0 - k[1657]*y_cur[IDX_C2H4II] - k[1658]*y_cur[IDX_C2H4II]; + data[jistart + 11651] = 0.0 - k[1651]*y_cur[IDX_C2H4II] - k[1652]*y_cur[IDX_C2H4II]; + data[jistart + 11652] = 0.0 - k[1653]*y_cur[IDX_C2H4II] - k[1654]*y_cur[IDX_C2H4II]; + data[jistart + 11653] = 0.0 + k[648]*y_cur[IDX_C2H4I]; + data[jistart + 11654] = 0.0 - k[1677]*y_cur[IDX_C2H4II] - k[1678]*y_cur[IDX_C2H4II]; + data[jistart + 11655] = 0.0 + k[148]*y_cur[IDX_CII] + k[215]*y_cur[IDX_C2H2II] + + k[234]*y_cur[IDX_C2N2II] + k[235]*y_cur[IDX_C3II] + + k[236]*y_cur[IDX_C5II] + k[237]*y_cur[IDX_C2H6II] + + k[238]*y_cur[IDX_CO2II] + k[239]*y_cur[IDX_HC3NII] + + k[240]*y_cur[IDX_O2II] + k[278]*y_cur[IDX_CH4II] + + k[326]*y_cur[IDX_HII] + k[438]*y_cur[IDX_H2II] + + k[464]*y_cur[IDX_H2OII] + k[510]*y_cur[IDX_HeII] + + k[648]*y_cur[IDX_OII] - k[1647]*y_cur[IDX_C2H4II] - + k[1648]*y_cur[IDX_C2H4II] + k[5701] + k[5986]; + data[jistart + 11656] = 0.0 - k[231]*y_cur[IDX_C2H4II] - k[1628]*y_cur[IDX_C2H4II] + + k[1644]*y_cur[IDX_HCOII] + k[2588]*y_cur[IDX_H3II] + + k[2767]*y_cur[IDX_H3OII]; + data[jistart + 11657] = 0.0 - k[233]*y_cur[IDX_C2H4II] - k[1674]*y_cur[IDX_C2H4II] - + k[1675]*y_cur[IDX_C2H4II]; + data[jistart + 11658] = 0.0 - k[1680]*y_cur[IDX_C2H4II] - k[1681]*y_cur[IDX_C2H4II]; + data[jistart + 11659] = 0.0 + k[1942]*y_cur[IDX_CHII] + k[1976]*y_cur[IDX_CH2II]; + data[jistart + 11660] = 0.0 - k[1729]*y_cur[IDX_C2H4II] - k[1730]*y_cur[IDX_C2H4II]; + data[jistart + 11661] = 0.0 - k[1679]*y_cur[IDX_C2H4II]; + data[jistart + 11662] = 0.0 - k[599]*y_cur[IDX_C2H4II]; + data[jistart + 11663] = 0.0 + k[215]*y_cur[IDX_C2H4I] + k[1511]*y_cur[IDX_C2H6I] + + k[5549]*y_cur[IDX_H2I]; + data[jistart + 11664] = 0.0 - k[1536]*y_cur[IDX_C2H4II] - k[1537]*y_cur[IDX_C2H4II]; + data[jistart + 11665] = 0.0 - k[3391]*y_cur[IDX_C2H4II] + k[3400]*y_cur[IDX_C3H5II]; + data[jistart + 11666] = 0.0 + k[2767]*y_cur[IDX_C2H3I]; + data[jistart + 11667] = 0.0 - k[3691]*y_cur[IDX_C2H4II] - k[3692]*y_cur[IDX_C2H4II]; + data[jistart + 11668] = 0.0 + k[510]*y_cur[IDX_C2H4I] + k[3084]*y_cur[IDX_C2H5I] + + k[3190]*y_cur[IDX_C2H6I]; + data[jistart + 11669] = 0.0 + k[148]*y_cur[IDX_C2H4I] + k[1369]*y_cur[IDX_C2H6I]; + data[jistart + 11670] = 0.0 + k[326]*y_cur[IDX_C2H4I] + k[2298]*y_cur[IDX_C2H5I] + + k[2327]*y_cur[IDX_C2H6I]; + data[jistart + 11671] = 0.0 - k[1853]*y_cur[IDX_C2H4II] - k[1854]*y_cur[IDX_C2H4II]; + data[jistart + 11672] = 0.0 + k[1644]*y_cur[IDX_C2H3I]; + data[jistart + 11673] = 0.0 + k[2588]*y_cur[IDX_C2H3I]; + data[jistart + 11674] = 0.0 - k[6381]*y_cur[IDX_C2H4II] - k[6382]*y_cur[IDX_C2H4II] - + k[6383]*y_cur[IDX_C2H4II] - k[6384]*y_cur[IDX_C2H4II] - + k[6385]*y_cur[IDX_C2H4II] - k[6386]*y_cur[IDX_C2H4II] - + k[6387]*y_cur[IDX_C2H4II]; + data[jistart + 11675] = 0.0 + k[5549]*y_cur[IDX_C2H2II]; + data[jistart + 11676] = 0.0 - k[757]*y_cur[IDX_C2H4II] - k[758]*y_cur[IDX_C2H4II] - + k[759]*y_cur[IDX_C2H4II] - k[760]*y_cur[IDX_C2H4II] - + k[761]*y_cur[IDX_C2H4II] - k[762]*y_cur[IDX_C2H4II] - + k[763]*y_cur[IDX_C2H4II]; + data[jistart + 11677] = 0.0 - k[2828]*y_cur[IDX_C2H4II] + k[2829]*y_cur[IDX_C2H5II]; + data[jistart + 11678] = 0.0 + k[2173]*y_cur[IDX_CH4I]; + data[jistart + 11679] = 0.0 + k[1355]*y_cur[IDX_CII]; + data[jistart + 11680] = 0.0 + k[1860]*y_cur[IDX_CI]; + data[jistart + 11681] = 0.0 + k[1861]*y_cur[IDX_CI]; + data[jistart + 11682] = 0.0 + k[2159]*y_cur[IDX_CH4I]; + data[jistart + 11683] = 0.0 + k[1672]*y_cur[IDX_C2H4II] + k[2076]*y_cur[IDX_CH3II] - + k[2480]*y_cur[IDX_C4H3II]; + data[jistart + 11684] = 0.0 - k[1839]*y_cur[IDX_C4H3II] - k[1840]*y_cur[IDX_C4H3II]; + data[jistart + 11685] = 0.0 + k[1772]*y_cur[IDX_C3H2II]; + data[jistart + 11686] = 0.0 + k[1649]*y_cur[IDX_C2H4II] - k[1789]*y_cur[IDX_C4H3II] + + k[2050]*y_cur[IDX_CH3II]; + data[jistart + 11687] = 0.0 + k[1377]*y_cur[IDX_CII]; + data[jistart + 11688] = 0.0 + k[1694]*y_cur[IDX_C2H4I]; + data[jistart + 11689] = 0.0 - k[4766]*y_cur[IDX_C4H3II]; + data[jistart + 11690] = 0.0 - k[4625]*y_cur[IDX_C4H3II]; + data[jistart + 11691] = 0.0 - k[4836]*y_cur[IDX_C4H3II]; + data[jistart + 11692] = 0.0 - k[4030]*y_cur[IDX_C4H3II]; + data[jistart + 11693] = 0.0 - k[4205]*y_cur[IDX_C4H3II]; + data[jistart + 11694] = 0.0 + k[1778]*y_cur[IDX_C3H2II] - k[2108]*y_cur[IDX_C4H3II]; + data[jistart + 11695] = 0.0 - k[4801]*y_cur[IDX_C4H3II]; + data[jistart + 11696] = 0.0 - k[3960]*y_cur[IDX_C4H3II]; + data[jistart + 11697] = 0.0 - k[4100]*y_cur[IDX_C4H3II]; + data[jistart + 11698] = 0.0 - k[4380]*y_cur[IDX_C4H3II]; + data[jistart + 11699] = 0.0 - k[4520]*y_cur[IDX_C4H3II]; + data[jistart + 11700] = 0.0 - k[4450]*y_cur[IDX_C4H3II]; + data[jistart + 11701] = 0.0 - k[4590]*y_cur[IDX_C4H3II]; + data[jistart + 11702] = 0.0 - k[3925]*y_cur[IDX_C4H3II]; + data[jistart + 11703] = 0.0 - k[4275]*y_cur[IDX_C4H3II]; + data[jistart + 11704] = 0.0 - k[4310]*y_cur[IDX_C4H3II]; + data[jistart + 11705] = 0.0 - k[3890]*y_cur[IDX_C4H3II]; + data[jistart + 11706] = 0.0 - k[4731]*y_cur[IDX_C4H3II]; + data[jistart + 11707] = 0.0 - k[4555]*y_cur[IDX_C4H3II]; + data[jistart + 11708] = 0.0 - k[2124]*y_cur[IDX_C4H3II]; + data[jistart + 11709] = 0.0 - k[4695]*y_cur[IDX_C4H3II]; + data[jistart + 11710] = 0.0 + k[2161]*y_cur[IDX_CH4I]; + data[jistart + 11711] = 0.0 - k[4485]*y_cur[IDX_C4H3II]; + data[jistart + 11712] = 0.0 - k[3995]*y_cur[IDX_C4H3II]; + data[jistart + 11713] = 0.0 - k[4065]*y_cur[IDX_C4H3II]; + data[jistart + 11714] = 0.0 - k[4170]*y_cur[IDX_C4H3II]; + data[jistart + 11715] = 0.0 - k[4345]*y_cur[IDX_C4H3II]; + data[jistart + 11716] = 0.0 + k[2764]*y_cur[IDX_C4H2I]; + data[jistart + 11717] = 0.0 - k[4240]*y_cur[IDX_C4H3II]; + data[jistart + 11718] = 0.0 - k[4415]*y_cur[IDX_C4H3II]; + data[jistart + 11719] = 0.0 + k[155]*y_cur[IDX_CII] + k[339]*y_cur[IDX_HII]; + data[jistart + 11720] = 0.0 + k[1772]*y_cur[IDX_CH2CCH2I] + k[1778]*y_cur[IDX_CH3CCHI]; + data[jistart + 11721] = 0.0 - k[4135]*y_cur[IDX_C4H3II]; + data[jistart + 11722] = 0.0 - k[4660]*y_cur[IDX_C4H3II]; + data[jistart + 11723] = 0.0 + k[1649]*y_cur[IDX_C3H2I] + k[1667]*y_cur[IDX_CH2CCHI] + + k[1672]*y_cur[IDX_H2CCCI] + k[1729]*y_cur[IDX_C2HI]; + data[jistart + 11724] = 0.0 - k[824]*y_cur[IDX_eM] - k[825]*y_cur[IDX_eM] - + k[1635]*y_cur[IDX_C2H3I] - k[1636]*y_cur[IDX_C2H3I] - + k[1737]*y_cur[IDX_C2HI] - k[1789]*y_cur[IDX_C3H2I] - + k[1825]*y_cur[IDX_C3HI] - k[1839]*y_cur[IDX_C5H2I] - + k[1840]*y_cur[IDX_C5H2I] - k[1841]*y_cur[IDX_C5HI] - + k[1844]*y_cur[IDX_C4HI] - k[1865]*y_cur[IDX_CI] - + k[1866]*y_cur[IDX_CI] - k[2035]*y_cur[IDX_CH2CCHI] - + k[2036]*y_cur[IDX_CH2CCHI] - k[2108]*y_cur[IDX_CH3CCHI] - + k[2124]*y_cur[IDX_CH3OHI] - k[2171]*y_cur[IDX_CH4I] - + k[2480]*y_cur[IDX_H2CCCI] - k[2850]*y_cur[IDX_C4H2I] - + k[3837]*y_cur[IDX_SI] - k[3890]*y_cur[IDX_CM] - + k[3925]*y_cur[IDX_C10M] - k[3960]*y_cur[IDX_C10HM] - + k[3995]*y_cur[IDX_C2M] - k[4030]*y_cur[IDX_C2HM] - + k[4065]*y_cur[IDX_C3M] - k[4100]*y_cur[IDX_C3HM] - + k[4135]*y_cur[IDX_C3NM] - k[4170]*y_cur[IDX_C4M] - + k[4205]*y_cur[IDX_C4HM] - k[4240]*y_cur[IDX_C5M] - + k[4275]*y_cur[IDX_C5HM] - k[4310]*y_cur[IDX_C5NM] - + k[4345]*y_cur[IDX_C6M] - k[4380]*y_cur[IDX_C6HM] - + k[4415]*y_cur[IDX_C7M] - k[4450]*y_cur[IDX_C7HM] - + k[4485]*y_cur[IDX_C8M] - k[4520]*y_cur[IDX_C8HM] - + k[4555]*y_cur[IDX_C9M] - k[4590]*y_cur[IDX_C9HM] - + k[4625]*y_cur[IDX_CHM] - k[4660]*y_cur[IDX_CNM] - + k[4695]*y_cur[IDX_HM] - k[4731]*y_cur[IDX_OM] - + k[4766]*y_cur[IDX_O2M] - k[4801]*y_cur[IDX_OHM] - + k[4836]*y_cur[IDX_SM] - k[5520]*y_cur[IDX_C2H2I] - + k[5571]*y_cur[IDX_HI] - k[5576]*y_cur[IDX_C4H2I] - + k[6633]*y_cur[IDX_GRAINM] - k[6634]*y_cur[IDX_GRAINM]; + data[jistart + 11725] = 0.0 + k[1667]*y_cur[IDX_C2H4II] - k[2035]*y_cur[IDX_C4H3II] - + k[2036]*y_cur[IDX_C4H3II]; + data[jistart + 11726] = 0.0 - k[1841]*y_cur[IDX_C4H3II]; + data[jistart + 11727] = 0.0 - k[1825]*y_cur[IDX_C4H3II]; + data[jistart + 11728] = 0.0 - k[1844]*y_cur[IDX_C4H3II]; + data[jistart + 11729] = 0.0 + k[1621]*y_cur[IDX_C2H3II] + k[2690]*y_cur[IDX_H3II] + + k[2764]*y_cur[IDX_H3COII] + k[2805]*y_cur[IDX_H3OII] - + k[2850]*y_cur[IDX_C4H3II] + k[2965]*y_cur[IDX_HCOII] - + k[5576]*y_cur[IDX_C4H3II]; + data[jistart + 11730] = 0.0 + k[5570]*y_cur[IDX_HI]; + data[jistart + 11731] = 0.0 + k[1694]*y_cur[IDX_C4HII]; + data[jistart + 11732] = 0.0 + k[1481]*y_cur[IDX_C2H2II] - k[1635]*y_cur[IDX_C4H3II] - + k[1636]*y_cur[IDX_C4H3II]; + data[jistart + 11733] = 0.0 + k[1535]*y_cur[IDX_C2H2I] + k[1621]*y_cur[IDX_C4H2I] + + k[1728]*y_cur[IDX_C2HI]; + data[jistart + 11734] = 0.0 + k[2159]*y_cur[IDX_C3II] + k[2161]*y_cur[IDX_C3HII] - + k[2171]*y_cur[IDX_C4H3II] + k[2173]*y_cur[IDX_C4NII]; + data[jistart + 11735] = 0.0 + k[1728]*y_cur[IDX_C2H3II] + k[1729]*y_cur[IDX_C2H4II] - + k[1737]*y_cur[IDX_C4H3II]; + data[jistart + 11736] = 0.0 - k[3837]*y_cur[IDX_C4H3II]; + data[jistart + 11737] = 0.0 + k[1480]*y_cur[IDX_C2H2I] + k[1481]*y_cur[IDX_C2H3I]; + data[jistart + 11738] = 0.0 + k[2050]*y_cur[IDX_C3H2I] + k[2076]*y_cur[IDX_H2CCCI]; + data[jistart + 11739] = 0.0 + k[1480]*y_cur[IDX_C2H2II] + k[1535]*y_cur[IDX_C2H3II] - + k[5520]*y_cur[IDX_C4H3II]; + data[jistart + 11740] = 0.0 + k[2805]*y_cur[IDX_C4H2I]; + data[jistart + 11741] = 0.0 + k[155]*y_cur[IDX_C4H3I] + k[1355]*y_cur[IDX_CH3C3NI] + + k[1377]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 11742] = 0.0 + k[339]*y_cur[IDX_C4H3I]; + data[jistart + 11743] = 0.0 + k[1860]*y_cur[IDX_C3H4II] + k[1861]*y_cur[IDX_C3H5II] - + k[1865]*y_cur[IDX_C4H3II] - k[1866]*y_cur[IDX_C4H3II]; + data[jistart + 11744] = 0.0 + k[2965]*y_cur[IDX_C4H2I]; + data[jistart + 11745] = 0.0 + k[2690]*y_cur[IDX_C4H2I]; + data[jistart + 11746] = 0.0 - k[6633]*y_cur[IDX_C4H3II] - k[6634]*y_cur[IDX_C4H3II]; + data[jistart + 11747] = 0.0 - k[824]*y_cur[IDX_C4H3II] - k[825]*y_cur[IDX_C4H3II]; + data[jistart + 11748] = 0.0 + k[5570]*y_cur[IDX_C4H2II] - k[5571]*y_cur[IDX_C4H3II]; + data[jistart + 11749] = 0.0 - k[3368]*y_cur[IDX_N2HII]; + data[jistart + 11750] = 0.0 + k[2354]*y_cur[IDX_HII]; + data[jistart + 11751] = 0.0 - k[3035]*y_cur[IDX_N2HII]; + data[jistart + 11752] = 0.0 - k[3371]*y_cur[IDX_N2HII]; + data[jistart + 11753] = 0.0 - k[3375]*y_cur[IDX_N2HII]; + data[jistart + 11754] = 0.0 + k[3367]*y_cur[IDX_N2I]; + data[jistart + 11755] = 0.0 + k[3366]*y_cur[IDX_N2I]; + data[jistart + 11756] = 0.0 + k[2460]*y_cur[IDX_H2I] + k[2557]*y_cur[IDX_H2OI] + + k[3364]*y_cur[IDX_HCOI]; + data[jistart + 11757] = 0.0 - k[3369]*y_cur[IDX_N2HII] - k[3370]*y_cur[IDX_N2HII]; + data[jistart + 11758] = 0.0 + k[3496]*y_cur[IDX_N2I] + k[3500]*y_cur[IDX_NOI]; + data[jistart + 11759] = 0.0 - k[4785]*y_cur[IDX_N2HII]; + data[jistart + 11760] = 0.0 - k[4644]*y_cur[IDX_N2HII]; + data[jistart + 11761] = 0.0 + k[2391]*y_cur[IDX_N2I]; + data[jistart + 11762] = 0.0 + k[3464]*y_cur[IDX_NI]; + data[jistart + 11763] = 0.0 - k[4855]*y_cur[IDX_N2HII]; + data[jistart + 11764] = 0.0 - k[4049]*y_cur[IDX_N2HII]; + data[jistart + 11765] = 0.0 - k[4224]*y_cur[IDX_N2HII]; + data[jistart + 11766] = 0.0 - k[4820]*y_cur[IDX_N2HII]; + data[jistart + 11767] = 0.0 - k[3979]*y_cur[IDX_N2HII]; + data[jistart + 11768] = 0.0 - k[4119]*y_cur[IDX_N2HII]; + data[jistart + 11769] = 0.0 - k[4399]*y_cur[IDX_N2HII]; + data[jistart + 11770] = 0.0 - k[4539]*y_cur[IDX_N2HII]; + data[jistart + 11771] = 0.0 - k[4469]*y_cur[IDX_N2HII]; + data[jistart + 11772] = 0.0 - k[4609]*y_cur[IDX_N2HII]; + data[jistart + 11773] = 0.0 - k[3944]*y_cur[IDX_N2HII]; + data[jistart + 11774] = 0.0 - k[4294]*y_cur[IDX_N2HII]; + data[jistart + 11775] = 0.0 - k[4329]*y_cur[IDX_N2HII]; + data[jistart + 11776] = 0.0 - k[3909]*y_cur[IDX_N2HII]; + data[jistart + 11777] = 0.0 - k[4750]*y_cur[IDX_N2HII]; + data[jistart + 11778] = 0.0 - k[4574]*y_cur[IDX_N2HII]; + data[jistart + 11779] = 0.0 - k[4715]*y_cur[IDX_N2HII]; + data[jistart + 11780] = 0.0 - k[3374]*y_cur[IDX_N2HII]; + data[jistart + 11781] = 0.0 - k[4504]*y_cur[IDX_N2HII]; + data[jistart + 11782] = 0.0 - k[4014]*y_cur[IDX_N2HII]; + data[jistart + 11783] = 0.0 - k[4084]*y_cur[IDX_N2HII]; + data[jistart + 11784] = 0.0 - k[4189]*y_cur[IDX_N2HII]; + data[jistart + 11785] = 0.0 - k[4364]*y_cur[IDX_N2HII]; + data[jistart + 11786] = 0.0 - k[4259]*y_cur[IDX_N2HII]; + data[jistart + 11787] = 0.0 - k[4434]*y_cur[IDX_N2HII]; + data[jistart + 11788] = 0.0 - k[3544]*y_cur[IDX_N2HII]; + data[jistart + 11789] = 0.0 + k[3785]*y_cur[IDX_N2I]; + data[jistart + 11790] = 0.0 - k[4154]*y_cur[IDX_N2HII]; + data[jistart + 11791] = 0.0 - k[3372]*y_cur[IDX_N2HII]; + data[jistart + 11792] = 0.0 - k[3616]*y_cur[IDX_N2HII]; + data[jistart + 11793] = 0.0 - k[4679]*y_cur[IDX_N2HII]; + data[jistart + 11794] = 0.0 - k[1151]*y_cur[IDX_eM] - k[1152]*y_cur[IDX_eM] - + k[1153]*y_cur[IDX_eM] - k[1154]*y_cur[IDX_eM] - + k[1461]*y_cur[IDX_C2I] - k[1568]*y_cur[IDX_C2H2I] - + k[1748]*y_cur[IDX_C2HI] - k[1909]*y_cur[IDX_CI] - + k[2010]*y_cur[IDX_CH2I] - k[2206]*y_cur[IDX_CH4I] - + k[2257]*y_cur[IDX_CHI] - k[2288]*y_cur[IDX_COI] - + k[2558]*y_cur[IDX_H2OI] - k[2881]*y_cur[IDX_HCNI] - + k[3009]*y_cur[IDX_HCOI] - k[3035]*y_cur[IDX_HNC3I] - + k[3044]*y_cur[IDX_HNCI] - k[3368]*y_cur[IDX_C6H6I] - + k[3369]*y_cur[IDX_CH3CHCH2I] - k[3370]*y_cur[IDX_CH3CHCH2I] - + k[3371]*y_cur[IDX_CH3CNI] - k[3372]*y_cur[IDX_CO2I] - + k[3373]*y_cur[IDX_H2COI] - k[3374]*y_cur[IDX_HC3NI] - + k[3375]*y_cur[IDX_NCCNI] - k[3376]*y_cur[IDX_SI] - + k[3544]*y_cur[IDX_NH2I] - k[3592]*y_cur[IDX_NH3I] - + k[3616]*y_cur[IDX_NHI] - k[3745]*y_cur[IDX_OI] - + k[3804]*y_cur[IDX_OHI] - k[3909]*y_cur[IDX_CM] - + k[3944]*y_cur[IDX_C10M] - k[3979]*y_cur[IDX_C10HM] - + k[4014]*y_cur[IDX_C2M] - k[4049]*y_cur[IDX_C2HM] - + k[4084]*y_cur[IDX_C3M] - k[4119]*y_cur[IDX_C3HM] - + k[4154]*y_cur[IDX_C3NM] - k[4189]*y_cur[IDX_C4M] - + k[4224]*y_cur[IDX_C4HM] - k[4259]*y_cur[IDX_C5M] - + k[4294]*y_cur[IDX_C5HM] - k[4329]*y_cur[IDX_C5NM] - + k[4364]*y_cur[IDX_C6M] - k[4399]*y_cur[IDX_C6HM] - + k[4434]*y_cur[IDX_C7M] - k[4469]*y_cur[IDX_C7HM] - + k[4504]*y_cur[IDX_C8M] - k[4539]*y_cur[IDX_C8HM] - + k[4574]*y_cur[IDX_C9M] - k[4609]*y_cur[IDX_C9HM] - + k[4644]*y_cur[IDX_CHM] - k[4679]*y_cur[IDX_CNM] - + k[4715]*y_cur[IDX_HM] - k[4750]*y_cur[IDX_OM] - + k[4785]*y_cur[IDX_O2M] - k[4820]*y_cur[IDX_OHM] - + k[4855]*y_cur[IDX_SM] - k[6396]*y_cur[IDX_GRAINM] - + k[6397]*y_cur[IDX_GRAINM]; + data[jistart + 11795] = 0.0 + k[3353]*y_cur[IDX_NH3I]; + data[jistart + 11796] = 0.0 - k[2010]*y_cur[IDX_N2HII]; + data[jistart + 11797] = 0.0 - k[3044]*y_cur[IDX_N2HII]; + data[jistart + 11798] = 0.0 + k[2391]*y_cur[IDX_H2II] + k[2718]*y_cur[IDX_H3II] + + k[3366]*y_cur[IDX_HNOII] + k[3367]*y_cur[IDX_O2HII] + + k[3496]*y_cur[IDX_NHII] + k[3785]*y_cur[IDX_OHII]; + data[jistart + 11799] = 0.0 + k[3500]*y_cur[IDX_NHII]; + data[jistart + 11800] = 0.0 - k[3009]*y_cur[IDX_N2HII] + k[3364]*y_cur[IDX_N2II]; + data[jistart + 11801] = 0.0 - k[2206]*y_cur[IDX_N2HII]; + data[jistart + 11802] = 0.0 - k[1748]*y_cur[IDX_N2HII]; + data[jistart + 11803] = 0.0 - k[3373]*y_cur[IDX_N2HII]; + data[jistart + 11804] = 0.0 - k[2881]*y_cur[IDX_N2HII]; + data[jistart + 11805] = 0.0 - k[2257]*y_cur[IDX_N2HII]; + data[jistart + 11806] = 0.0 - k[3376]*y_cur[IDX_N2HII]; + data[jistart + 11807] = 0.0 - k[1461]*y_cur[IDX_N2HII]; + data[jistart + 11808] = 0.0 - k[3804]*y_cur[IDX_N2HII]; + data[jistart + 11809] = 0.0 + k[3353]*y_cur[IDX_NII] - k[3592]*y_cur[IDX_N2HII]; + data[jistart + 11810] = 0.0 - k[1568]*y_cur[IDX_N2HII]; + data[jistart + 11811] = 0.0 + k[3464]*y_cur[IDX_NH2II]; + data[jistart + 11812] = 0.0 - k[3745]*y_cur[IDX_N2HII]; + data[jistart + 11813] = 0.0 + k[2557]*y_cur[IDX_N2II] - k[2558]*y_cur[IDX_N2HII]; + data[jistart + 11814] = 0.0 + k[2354]*y_cur[IDX_N2OI]; + data[jistart + 11815] = 0.0 - k[1909]*y_cur[IDX_N2HII]; + data[jistart + 11816] = 0.0 + k[2718]*y_cur[IDX_N2I]; + data[jistart + 11817] = 0.0 - k[2288]*y_cur[IDX_N2HII]; + data[jistart + 11818] = 0.0 - k[6396]*y_cur[IDX_N2HII] - k[6397]*y_cur[IDX_N2HII]; + data[jistart + 11819] = 0.0 + k[2460]*y_cur[IDX_N2II]; + data[jistart + 11820] = 0.0 - k[1151]*y_cur[IDX_N2HII] - k[1152]*y_cur[IDX_N2HII] - + k[1153]*y_cur[IDX_N2HII] - k[1154]*y_cur[IDX_N2HII]; + data[jistart + 11821] = 0.0 + k[8612]*y_cur[IDX_GHI]; + data[jistart + 11822] = 0.0 + k[8613]*y_cur[IDX_GHI]; + data[jistart + 11823] = 0.0 + k[7132] + k[7314] + k[7496]; + data[jistart + 11824] = 0.0 + k[8665]*y_cur[IDX_GCI]; + data[jistart + 11825] = 0.0 + k[805]*y_cur[IDX_eM] + k[6499]*y_cur[IDX_GRAINM]; + data[jistart + 11826] = 0.0 + k[800]*y_cur[IDX_eM] + k[1811]*y_cur[IDX_CH3CCHI] + + k[6478]*y_cur[IDX_GRAINM]; + data[jistart + 11827] = 0.0 + k[803]*y_cur[IDX_eM] + k[6482]*y_cur[IDX_GRAINM]; + data[jistart + 11828] = 0.0 - k[2039]*y_cur[IDX_CH2CCHI] - k[2040]*y_cur[IDX_CH2CCHI]; + data[jistart + 11829] = 0.0 - k[2037]*y_cur[IDX_CH2CCHI] - k[2038]*y_cur[IDX_CH2CCHI]; + data[jistart + 11830] = 0.0 + k[5781] + k[6081]; + data[jistart + 11831] = 0.0 - k[2032]*y_cur[IDX_CH2CCHI]; + data[jistart + 11832] = 0.0 + k[4768]*y_cur[IDX_CH2CCHII]; + data[jistart + 11833] = 0.0 + k[4627]*y_cur[IDX_CH2CCHII]; + data[jistart + 11834] = 0.0 + k[4838]*y_cur[IDX_CH2CCHII]; + data[jistart + 11835] = 0.0 + k[4032]*y_cur[IDX_CH2CCHII]; + data[jistart + 11836] = 0.0 + k[4207]*y_cur[IDX_CH2CCHII]; + data[jistart + 11837] = 0.0 + k[1811]*y_cur[IDX_C3H4II] + k[5802] + k[6106]; + data[jistart + 11838] = 0.0 + k[4803]*y_cur[IDX_CH2CCHII]; + data[jistart + 11839] = 0.0 + k[3962]*y_cur[IDX_CH2CCHII]; + data[jistart + 11840] = 0.0 + k[4102]*y_cur[IDX_CH2CCHII]; + data[jistart + 11841] = 0.0 + k[4382]*y_cur[IDX_CH2CCHII]; + data[jistart + 11842] = 0.0 + k[4522]*y_cur[IDX_CH2CCHII]; + data[jistart + 11843] = 0.0 + k[4452]*y_cur[IDX_CH2CCHII]; + data[jistart + 11844] = 0.0 + k[4592]*y_cur[IDX_CH2CCHII]; + data[jistart + 11845] = 0.0 + k[3927]*y_cur[IDX_CH2CCHII]; + data[jistart + 11846] = 0.0 + k[4277]*y_cur[IDX_CH2CCHII]; + data[jistart + 11847] = 0.0 + k[4312]*y_cur[IDX_CH2CCHII]; + data[jistart + 11848] = 0.0 + k[3892]*y_cur[IDX_CH2CCHII]; + data[jistart + 11849] = 0.0 + k[4733]*y_cur[IDX_CH2CCHII]; + data[jistart + 11850] = 0.0 + k[4557]*y_cur[IDX_CH2CCHII]; + data[jistart + 11851] = 0.0 + k[4697]*y_cur[IDX_CH2CCHII]; + data[jistart + 11852] = 0.0 - k[1805]*y_cur[IDX_CH2CCHI] - k[1806]*y_cur[IDX_CH2CCHI]; + data[jistart + 11853] = 0.0 + k[4487]*y_cur[IDX_CH2CCHII]; + data[jistart + 11854] = 0.0 + k[3997]*y_cur[IDX_CH2CCHII]; + data[jistart + 11855] = 0.0 + k[4067]*y_cur[IDX_CH2CCHII]; + data[jistart + 11856] = 0.0 + k[4172]*y_cur[IDX_CH2CCHII]; + data[jistart + 11857] = 0.0 + k[4347]*y_cur[IDX_CH2CCHII]; + data[jistart + 11858] = 0.0 + k[4242]*y_cur[IDX_CH2CCHII]; + data[jistart + 11859] = 0.0 + k[4417]*y_cur[IDX_CH2CCHII]; + data[jistart + 11860] = 0.0 - k[1776]*y_cur[IDX_CH2CCHI]; + data[jistart + 11861] = 0.0 + k[4137]*y_cur[IDX_CH2CCHII]; + data[jistart + 11862] = 0.0 + k[8665]*y_cur[IDX_GC2H3I]; + data[jistart + 11863] = 0.0 + k[4662]*y_cur[IDX_CH2CCHII]; + data[jistart + 11864] = 0.0 - k[232]*y_cur[IDX_CH2CCHI] - k[1667]*y_cur[IDX_CH2CCHI] - + k[1668]*y_cur[IDX_CH2CCHI]; + data[jistart + 11865] = 0.0 - k[2035]*y_cur[IDX_CH2CCHI] - k[2036]*y_cur[IDX_CH2CCHI]; + data[jistart + 11866] = 0.0 - k[162]*y_cur[IDX_CII] - k[219]*y_cur[IDX_C2H2II] - + k[232]*y_cur[IDX_C2H4II] - k[360]*y_cur[IDX_HII] - + k[1346]*y_cur[IDX_CII] - k[1347]*y_cur[IDX_CII] - + k[1507]*y_cur[IDX_C2H2II] - k[1508]*y_cur[IDX_C2H2II] - + k[1608]*y_cur[IDX_C2H3II] - k[1609]*y_cur[IDX_C2H3II] - + k[1610]*y_cur[IDX_C2H3II] - k[1667]*y_cur[IDX_C2H4II] - + k[1668]*y_cur[IDX_C2H4II] - k[1776]*y_cur[IDX_C3H2II] - + k[1805]*y_cur[IDX_C3H3II] - k[1806]*y_cur[IDX_C3H3II] - + k[2029]*y_cur[IDX_CH2CCHII] - k[2030]*y_cur[IDX_CH2CCHII] - + k[2032]*y_cur[IDX_C4HII] - k[2033]*y_cur[IDX_C4H2II] - + k[2034]*y_cur[IDX_C4H2II] - k[2035]*y_cur[IDX_C4H3II] - + k[2036]*y_cur[IDX_C4H3II] - k[2037]*y_cur[IDX_C5H2II] - + k[2038]*y_cur[IDX_C5H2II] - k[2039]*y_cur[IDX_C6H2II] - + k[2040]*y_cur[IDX_C6H2II] - k[2061]*y_cur[IDX_CH3II] - + k[2315]*y_cur[IDX_HII] - k[2636]*y_cur[IDX_H3II] - + k[2785]*y_cur[IDX_H3OII] - k[2938]*y_cur[IDX_HCOII] - + k[3162]*y_cur[IDX_HeII] - k[3163]*y_cur[IDX_HeII] - + k[3164]*y_cur[IDX_HeII] - k[3863]*y_cur[IDX_SiII] - + k[4947]*y_cur[IDX_CI] - k[5256]*y_cur[IDX_NI] - k[5782] - k[5783] - + k[6083] - k[6084] - k[6950]; + data[jistart + 11867] = 0.0 - k[2029]*y_cur[IDX_CH2CCHI] - k[2030]*y_cur[IDX_CH2CCHI] + + k[3892]*y_cur[IDX_CM] + k[3927]*y_cur[IDX_C10M] + + k[3962]*y_cur[IDX_C10HM] + k[3997]*y_cur[IDX_C2M] + + k[4032]*y_cur[IDX_C2HM] + k[4067]*y_cur[IDX_C3M] + + k[4102]*y_cur[IDX_C3HM] + k[4137]*y_cur[IDX_C3NM] + + k[4172]*y_cur[IDX_C4M] + k[4207]*y_cur[IDX_C4HM] + + k[4242]*y_cur[IDX_C5M] + k[4277]*y_cur[IDX_C5HM] + + k[4312]*y_cur[IDX_C5NM] + k[4347]*y_cur[IDX_C6M] + + k[4382]*y_cur[IDX_C6HM] + k[4417]*y_cur[IDX_C7M] + + k[4452]*y_cur[IDX_C7HM] + k[4487]*y_cur[IDX_C8M] + + k[4522]*y_cur[IDX_C8HM] + k[4557]*y_cur[IDX_C9M] + + k[4592]*y_cur[IDX_C9HM] + k[4627]*y_cur[IDX_CHM] + + k[4662]*y_cur[IDX_CNM] + k[4697]*y_cur[IDX_HM] + + k[4733]*y_cur[IDX_OM] + k[4768]*y_cur[IDX_O2M] + + k[4803]*y_cur[IDX_OHM] + k[4838]*y_cur[IDX_SM]; + data[jistart + 11868] = 0.0 - k[2033]*y_cur[IDX_CH2CCHI] - k[2034]*y_cur[IDX_CH2CCHI]; + data[jistart + 11869] = 0.0 + k[4991]*y_cur[IDX_C2H2I]; + data[jistart + 11870] = 0.0 + k[4914]*y_cur[IDX_CI]; + data[jistart + 11871] = 0.0 - k[3863]*y_cur[IDX_CH2CCHI]; + data[jistart + 11872] = 0.0 - k[1608]*y_cur[IDX_CH2CCHI] - k[1609]*y_cur[IDX_CH2CCHI] - + k[1610]*y_cur[IDX_CH2CCHI]; + data[jistart + 11873] = 0.0 + k[4871]*y_cur[IDX_C2I]; + data[jistart + 11874] = 0.0 + k[4871]*y_cur[IDX_CH4I]; + data[jistart + 11875] = 0.0 - k[219]*y_cur[IDX_CH2CCHI] - k[1507]*y_cur[IDX_CH2CCHI] - + k[1508]*y_cur[IDX_CH2CCHI]; + data[jistart + 11876] = 0.0 - k[2061]*y_cur[IDX_CH2CCHI]; + data[jistart + 11877] = 0.0 + k[4991]*y_cur[IDX_CH2I]; + data[jistart + 11878] = 0.0 + k[8612]*y_cur[IDX_GC3H2I] + k[8613]*y_cur[IDX_GH2CCCI]; + data[jistart + 11879] = 0.0 - k[5256]*y_cur[IDX_CH2CCHI]; + data[jistart + 11880] = 0.0 - k[2785]*y_cur[IDX_CH2CCHI]; + data[jistart + 11881] = 0.0 - k[3162]*y_cur[IDX_CH2CCHI] - k[3163]*y_cur[IDX_CH2CCHI] - + k[3164]*y_cur[IDX_CH2CCHI]; + data[jistart + 11882] = 0.0 - k[162]*y_cur[IDX_CH2CCHI] - k[1346]*y_cur[IDX_CH2CCHI] - + k[1347]*y_cur[IDX_CH2CCHI]; + data[jistart + 11883] = 0.0 - k[360]*y_cur[IDX_CH2CCHI] - k[2315]*y_cur[IDX_CH2CCHI]; + data[jistart + 11884] = 0.0 + k[4914]*y_cur[IDX_C2H4I] - k[4947]*y_cur[IDX_CH2CCHI]; + data[jistart + 11885] = 0.0 - k[2938]*y_cur[IDX_CH2CCHI]; + data[jistart + 11886] = 0.0 - k[2636]*y_cur[IDX_CH2CCHI]; + data[jistart + 11887] = 0.0 + k[6478]*y_cur[IDX_C3H4II] + k[6482]*y_cur[IDX_C3H5II] + + k[6499]*y_cur[IDX_C3H6II]; + data[jistart + 11888] = 0.0 + k[800]*y_cur[IDX_C3H4II] + k[803]*y_cur[IDX_C3H5II] + + k[805]*y_cur[IDX_C3H6II]; + data[jistart + 11889] = 0.0 + k[2290]*y_cur[IDX_COI] + k[2847]*y_cur[IDX_HI]; + data[jistart + 11890] = 0.0 - k[714]*y_cur[IDX_SOII]; + data[jistart + 11891] = 0.0 + k[1427]*y_cur[IDX_CII] + k[2282]*y_cur[IDX_COII] + + k[3304]*y_cur[IDX_HeII] + k[3651]*y_cur[IDX_OII]; + data[jistart + 11892] = 0.0 - k[713]*y_cur[IDX_SOII] - k[3857]*y_cur[IDX_SOII]; + data[jistart + 11893] = 0.0 - k[711]*y_cur[IDX_SOII] - k[3851]*y_cur[IDX_SOII] - + k[3852]*y_cur[IDX_SOII] - k[3853]*y_cur[IDX_SOII] - + k[3854]*y_cur[IDX_SOII] - k[3855]*y_cur[IDX_SOII]; + data[jistart + 11894] = 0.0 - k[712]*y_cur[IDX_SOII] - k[3856]*y_cur[IDX_SOII]; + data[jistart + 11895] = 0.0 + k[3743]*y_cur[IDX_OI]; + data[jistart + 11896] = 0.0 - k[4792]*y_cur[IDX_SOII]; + data[jistart + 11897] = 0.0 - k[4651]*y_cur[IDX_SOII]; + data[jistart + 11898] = 0.0 - k[3858]*y_cur[IDX_SOII]; + data[jistart + 11899] = 0.0 - k[4862]*y_cur[IDX_SOII]; + data[jistart + 11900] = 0.0 + k[3675]*y_cur[IDX_O2I]; + data[jistart + 11901] = 0.0 - k[4056]*y_cur[IDX_SOII]; + data[jistart + 11902] = 0.0 - k[4231]*y_cur[IDX_SOII]; + data[jistart + 11903] = 0.0 + k[2282]*y_cur[IDX_SO2I]; + data[jistart + 11904] = 0.0 - k[4827]*y_cur[IDX_SOII]; + data[jistart + 11905] = 0.0 - k[3986]*y_cur[IDX_SOII]; + data[jistart + 11906] = 0.0 - k[4126]*y_cur[IDX_SOII]; + data[jistart + 11907] = 0.0 - k[4406]*y_cur[IDX_SOII]; + data[jistart + 11908] = 0.0 - k[4546]*y_cur[IDX_SOII]; + data[jistart + 11909] = 0.0 - k[4476]*y_cur[IDX_SOII]; + data[jistart + 11910] = 0.0 - k[4616]*y_cur[IDX_SOII]; + data[jistart + 11911] = 0.0 - k[3951]*y_cur[IDX_SOII]; + data[jistart + 11912] = 0.0 - k[4301]*y_cur[IDX_SOII]; + data[jistart + 11913] = 0.0 - k[4336]*y_cur[IDX_SOII]; + data[jistart + 11914] = 0.0 - k[3916]*y_cur[IDX_SOII]; + data[jistart + 11915] = 0.0 - k[4757]*y_cur[IDX_SOII]; + data[jistart + 11916] = 0.0 - k[4581]*y_cur[IDX_SOII]; + data[jistart + 11917] = 0.0 - k[4722]*y_cur[IDX_SOII]; + data[jistart + 11918] = 0.0 - k[4511]*y_cur[IDX_SOII]; + data[jistart + 11919] = 0.0 - k[4021]*y_cur[IDX_SOII]; + data[jistart + 11920] = 0.0 - k[4091]*y_cur[IDX_SOII]; + data[jistart + 11921] = 0.0 - k[4196]*y_cur[IDX_SOII]; + data[jistart + 11922] = 0.0 - k[4371]*y_cur[IDX_SOII]; + data[jistart + 11923] = 0.0 - k[4266]*y_cur[IDX_SOII]; + data[jistart + 11924] = 0.0 - k[4441]*y_cur[IDX_SOII]; + data[jistart + 11925] = 0.0 + k[3790]*y_cur[IDX_SI]; + data[jistart + 11926] = 0.0 - k[4161]*y_cur[IDX_SOII]; + data[jistart + 11927] = 0.0 + k[3667]*y_cur[IDX_SI]; + data[jistart + 11928] = 0.0 - k[715]*y_cur[IDX_SOII]; + data[jistart + 11929] = 0.0 - k[539]*y_cur[IDX_SOII]; + data[jistart + 11930] = 0.0 - k[644]*y_cur[IDX_SOII]; + data[jistart + 11931] = 0.0 - k[4686]*y_cur[IDX_SOII]; + data[jistart + 11932] = 0.0 + k[193]*y_cur[IDX_CII] + k[417]*y_cur[IDX_HII] + k[5916] + + k[6258]; + data[jistart + 11933] = 0.0 - k[539]*y_cur[IDX_MgI] - k[615]*y_cur[IDX_NH3I] - + k[644]*y_cur[IDX_NaI] - k[711]*y_cur[IDX_CH2CCH2I] - + k[712]*y_cur[IDX_CH3CHCH2I] - k[713]*y_cur[IDX_CH3COCH3I] - + k[714]*y_cur[IDX_CH3OCH3I] - k[715]*y_cur[IDX_FeI] - + k[1220]*y_cur[IDX_eM] - k[2582]*y_cur[IDX_H2SI] - + k[3468]*y_cur[IDX_NI] - k[3843]*y_cur[IDX_C2H2I] - + k[3844]*y_cur[IDX_C2H2I] - k[3845]*y_cur[IDX_C2H2I] - + k[3846]*y_cur[IDX_C2H2I] - k[3847]*y_cur[IDX_C2H4I] - + k[3848]*y_cur[IDX_C2H4I] - k[3849]*y_cur[IDX_C2H4I] - + k[3850]*y_cur[IDX_C2H4I] - k[3851]*y_cur[IDX_CH2CCH2I] - + k[3852]*y_cur[IDX_CH2CCH2I] - k[3853]*y_cur[IDX_CH2CCH2I] - + k[3854]*y_cur[IDX_CH2CCH2I] - k[3855]*y_cur[IDX_CH2CCH2I] - + k[3856]*y_cur[IDX_CH3CHCH2I] - k[3857]*y_cur[IDX_CH3COCH3I] - + k[3858]*y_cur[IDX_OCSI] - k[3916]*y_cur[IDX_CM] - + k[3951]*y_cur[IDX_C10M] - k[3986]*y_cur[IDX_C10HM] - + k[4021]*y_cur[IDX_C2M] - k[4056]*y_cur[IDX_C2HM] - + k[4091]*y_cur[IDX_C3M] - k[4126]*y_cur[IDX_C3HM] - + k[4161]*y_cur[IDX_C3NM] - k[4196]*y_cur[IDX_C4M] - + k[4231]*y_cur[IDX_C4HM] - k[4266]*y_cur[IDX_C5M] - + k[4301]*y_cur[IDX_C5HM] - k[4336]*y_cur[IDX_C5NM] - + k[4371]*y_cur[IDX_C6M] - k[4406]*y_cur[IDX_C6HM] - + k[4441]*y_cur[IDX_C7M] - k[4476]*y_cur[IDX_C7HM] - + k[4511]*y_cur[IDX_C8M] - k[4546]*y_cur[IDX_C8HM] - + k[4581]*y_cur[IDX_C9M] - k[4616]*y_cur[IDX_C9HM] - + k[4651]*y_cur[IDX_CHM] - k[4686]*y_cur[IDX_CNM] - + k[4722]*y_cur[IDX_HM] - k[4757]*y_cur[IDX_OM] - + k[4792]*y_cur[IDX_O2M] - k[4827]*y_cur[IDX_OHM] - + k[4862]*y_cur[IDX_SM] - k[6620]*y_cur[IDX_GRAINM]; + data[jistart + 11934] = 0.0 + k[3735]*y_cur[IDX_OI]; + data[jistart + 11935] = 0.0 + k[3651]*y_cur[IDX_SO2I]; + data[jistart + 11936] = 0.0 - k[3847]*y_cur[IDX_SOII] - k[3848]*y_cur[IDX_SOII] - + k[3849]*y_cur[IDX_SOII] - k[3850]*y_cur[IDX_SOII]; + data[jistart + 11937] = 0.0 + k[3674]*y_cur[IDX_SII] + k[3675]*y_cur[IDX_SiSII]; + data[jistart + 11938] = 0.0 - k[2582]*y_cur[IDX_SOII]; + data[jistart + 11939] = 0.0 + k[3674]*y_cur[IDX_O2I] + k[3808]*y_cur[IDX_OHI]; + data[jistart + 11940] = 0.0 + k[3667]*y_cur[IDX_O2II] + k[3790]*y_cur[IDX_OHII]; + data[jistart + 11941] = 0.0 + k[3808]*y_cur[IDX_SII]; + data[jistart + 11942] = 0.0 - k[615]*y_cur[IDX_SOII]; + data[jistart + 11943] = 0.0 - k[3843]*y_cur[IDX_SOII] - k[3844]*y_cur[IDX_SOII] - + k[3845]*y_cur[IDX_SOII] - k[3846]*y_cur[IDX_SOII]; + data[jistart + 11944] = 0.0 - k[3468]*y_cur[IDX_SOII]; + data[jistart + 11945] = 0.0 + k[3735]*y_cur[IDX_H2SII] + k[3743]*y_cur[IDX_HSII]; + data[jistart + 11946] = 0.0 + k[3304]*y_cur[IDX_SO2I]; + data[jistart + 11947] = 0.0 + k[193]*y_cur[IDX_SOI] + k[1427]*y_cur[IDX_SO2I]; + data[jistart + 11948] = 0.0 + k[417]*y_cur[IDX_SOI]; + data[jistart + 11949] = 0.0 + k[2290]*y_cur[IDX_SO2II]; + data[jistart + 11950] = 0.0 - k[6620]*y_cur[IDX_SOII]; + data[jistart + 11951] = 0.0 - k[1220]*y_cur[IDX_SOII]; + data[jistart + 11952] = 0.0 + k[2847]*y_cur[IDX_SO2II]; + data[jistart + 11953] = 0.0 + k[3166]*y_cur[IDX_HeII]; + data[jistart + 11954] = 0.0 + k[2134]*y_cur[IDX_C2H2I]; + data[jistart + 11955] = 0.0 + k[1617]*y_cur[IDX_C2H3II] - k[2485]*y_cur[IDX_CH2CCHII] - + k[2486]*y_cur[IDX_CH2CCHII] + k[2681]*y_cur[IDX_H3II] + + k[2798]*y_cur[IDX_H3OII] + k[2957]*y_cur[IDX_HCOII]; + data[jistart + 11956] = 0.0 - k[2026]*y_cur[IDX_CH2CCHII]; + data[jistart + 11957] = 0.0 - k[2022]*y_cur[IDX_CH2CCHII] - k[2023]*y_cur[IDX_CH2CCHII]; + data[jistart + 11958] = 0.0 - k[1794]*y_cur[IDX_CH2CCHII] - k[1795]*y_cur[IDX_CH2CCHII]; + data[jistart + 11959] = 0.0 + k[1306]*y_cur[IDX_CII]; + data[jistart + 11960] = 0.0 + k[2150]*y_cur[IDX_CH4I]; + data[jistart + 11961] = 0.0 - k[4768]*y_cur[IDX_CH2CCHII]; + data[jistart + 11962] = 0.0 - k[4627]*y_cur[IDX_CH2CCHII]; + data[jistart + 11963] = 0.0 - k[4838]*y_cur[IDX_CH2CCHII]; + data[jistart + 11964] = 0.0 - k[4032]*y_cur[IDX_CH2CCHII]; + data[jistart + 11965] = 0.0 - k[4207]*y_cur[IDX_CH2CCHII]; + data[jistart + 11966] = 0.0 + k[1366]*y_cur[IDX_CII] + k[2325]*y_cur[IDX_HII] + + k[2647]*y_cur[IDX_H3II] + k[3187]*y_cur[IDX_HeII]; + data[jistart + 11967] = 0.0 - k[4803]*y_cur[IDX_CH2CCHII]; + data[jistart + 11968] = 0.0 - k[3962]*y_cur[IDX_CH2CCHII]; + data[jistart + 11969] = 0.0 - k[4102]*y_cur[IDX_CH2CCHII]; + data[jistart + 11970] = 0.0 - k[4382]*y_cur[IDX_CH2CCHII]; + data[jistart + 11971] = 0.0 - k[4522]*y_cur[IDX_CH2CCHII]; + data[jistart + 11972] = 0.0 - k[4452]*y_cur[IDX_CH2CCHII]; + data[jistart + 11973] = 0.0 - k[4592]*y_cur[IDX_CH2CCHII]; + data[jistart + 11974] = 0.0 - k[3927]*y_cur[IDX_CH2CCHII]; + data[jistart + 11975] = 0.0 - k[4277]*y_cur[IDX_CH2CCHII]; + data[jistart + 11976] = 0.0 - k[4312]*y_cur[IDX_CH2CCHII]; + data[jistart + 11977] = 0.0 - k[3892]*y_cur[IDX_CH2CCHII]; + data[jistart + 11978] = 0.0 - k[4733]*y_cur[IDX_CH2CCHII]; + data[jistart + 11979] = 0.0 - k[4557]*y_cur[IDX_CH2CCHII]; + data[jistart + 11980] = 0.0 - k[4697]*y_cur[IDX_CH2CCHII]; + data[jistart + 11981] = 0.0 + k[1690]*y_cur[IDX_C2H4I] + k[5551]*y_cur[IDX_H2I]; + data[jistart + 11982] = 0.0 - k[4487]*y_cur[IDX_CH2CCHII]; + data[jistart + 11983] = 0.0 - k[3997]*y_cur[IDX_CH2CCHII]; + data[jistart + 11984] = 0.0 - k[4067]*y_cur[IDX_CH2CCHII]; + data[jistart + 11985] = 0.0 - k[4172]*y_cur[IDX_CH2CCHII]; + data[jistart + 11986] = 0.0 - k[4347]*y_cur[IDX_CH2CCHII]; + data[jistart + 11987] = 0.0 - k[4242]*y_cur[IDX_CH2CCHII]; + data[jistart + 11988] = 0.0 - k[4417]*y_cur[IDX_CH2CCHII]; + data[jistart + 11989] = 0.0 + k[2153]*y_cur[IDX_CH4I]; + data[jistart + 11990] = 0.0 - k[4137]*y_cur[IDX_CH2CCHII]; + data[jistart + 11991] = 0.0 - k[4662]*y_cur[IDX_CH2CCHII]; + data[jistart + 11992] = 0.0 + k[1730]*y_cur[IDX_C2HI] + k[1854]*y_cur[IDX_CI]; + data[jistart + 11993] = 0.0 + k[162]*y_cur[IDX_CII] - k[2029]*y_cur[IDX_CH2CCHII] - + k[2030]*y_cur[IDX_CH2CCHII]; + data[jistart + 11994] = 0.0 - k[227]*y_cur[IDX_C2H2I] - k[910]*y_cur[IDX_eM] - + k[911]*y_cur[IDX_eM] - k[1643]*y_cur[IDX_C2H3I] - + k[1706]*y_cur[IDX_C2H4I] - k[1741]*y_cur[IDX_C2HI] - + k[1742]*y_cur[IDX_C2HI] - k[1794]*y_cur[IDX_C3H2I] - + k[1795]*y_cur[IDX_C3H2I] - k[1828]*y_cur[IDX_C3HI] - + k[1829]*y_cur[IDX_C3HI] - k[1892]*y_cur[IDX_CI] - + k[1893]*y_cur[IDX_CI] - k[2020]*y_cur[IDX_C4HI] - + k[2021]*y_cur[IDX_C4HI] - k[2022]*y_cur[IDX_C5H2I] - + k[2023]*y_cur[IDX_C5H2I] - k[2024]*y_cur[IDX_C5HI] - + k[2025]*y_cur[IDX_C5HI] - k[2026]*y_cur[IDX_C6H2I] - + k[2027]*y_cur[IDX_C6HI] - k[2028]*y_cur[IDX_C6HI] - + k[2029]*y_cur[IDX_CH2CCHI] - k[2030]*y_cur[IDX_CH2CCHI] - + k[2031]*y_cur[IDX_C4H2I] - k[2485]*y_cur[IDX_H2CCCI] - + k[2486]*y_cur[IDX_H2CCCI] - k[3453]*y_cur[IDX_NI] - + k[3726]*y_cur[IDX_OI] - k[3838]*y_cur[IDX_SI] - + k[3879]*y_cur[IDX_SiI] - k[3880]*y_cur[IDX_SiI] - + k[3892]*y_cur[IDX_CM] - k[3927]*y_cur[IDX_C10M] - + k[3962]*y_cur[IDX_C10HM] - k[3997]*y_cur[IDX_C2M] - + k[4032]*y_cur[IDX_C2HM] - k[4067]*y_cur[IDX_C3M] - + k[4102]*y_cur[IDX_C3HM] - k[4137]*y_cur[IDX_C3NM] - + k[4172]*y_cur[IDX_C4M] - k[4207]*y_cur[IDX_C4HM] - + k[4242]*y_cur[IDX_C5M] - k[4277]*y_cur[IDX_C5HM] - + k[4312]*y_cur[IDX_C5NM] - k[4347]*y_cur[IDX_C6M] - + k[4382]*y_cur[IDX_C6HM] - k[4417]*y_cur[IDX_C7M] - + k[4452]*y_cur[IDX_C7HM] - k[4487]*y_cur[IDX_C8M] - + k[4522]*y_cur[IDX_C8HM] - k[4557]*y_cur[IDX_C9M] - + k[4592]*y_cur[IDX_C9HM] - k[4627]*y_cur[IDX_CHM] - + k[4662]*y_cur[IDX_CNM] - k[4697]*y_cur[IDX_HM] - + k[4733]*y_cur[IDX_OM] - k[4768]*y_cur[IDX_O2M] - + k[4803]*y_cur[IDX_OHM] - k[4838]*y_cur[IDX_SM] - + k[5530]*y_cur[IDX_H2I] - k[5531]*y_cur[IDX_C4H2I] - + k[6470]*y_cur[IDX_GRAINM] - k[6471]*y_cur[IDX_GRAINM]; + data[jistart + 11995] = 0.0 - k[2027]*y_cur[IDX_CH2CCHII] - k[2028]*y_cur[IDX_CH2CCHII]; + data[jistart + 11996] = 0.0 - k[2024]*y_cur[IDX_CH2CCHII] - k[2025]*y_cur[IDX_CH2CCHII]; + data[jistart + 11997] = 0.0 - k[1828]*y_cur[IDX_CH2CCHII] - k[1829]*y_cur[IDX_CH2CCHII]; + data[jistart + 11998] = 0.0 - k[2020]*y_cur[IDX_CH2CCHII] - k[2021]*y_cur[IDX_CH2CCHII]; + data[jistart + 11999] = 0.0 - k[2031]*y_cur[IDX_CH2CCHII] + k[2081]*y_cur[IDX_CH3II] - + k[5531]*y_cur[IDX_CH2CCHII]; + data[jistart + 12000] = 0.0 + k[1998]*y_cur[IDX_C2H2II]; + data[jistart + 12001] = 0.0 + k[1305]*y_cur[IDX_CII] + k[1484]*y_cur[IDX_C2H2II] + + k[1690]*y_cur[IDX_C3HII] - k[1706]*y_cur[IDX_CH2CCHII] + + k[2047]*y_cur[IDX_CH3II]; + data[jistart + 12002] = 0.0 + k[1482]*y_cur[IDX_C2H2II] - k[1643]*y_cur[IDX_CH2CCHII]; + data[jistart + 12003] = 0.0 - k[3879]*y_cur[IDX_CH2CCHII] - k[3880]*y_cur[IDX_CH2CCHII]; + data[jistart + 12004] = 0.0 + k[1617]*y_cur[IDX_H2CCCI]; + data[jistart + 12005] = 0.0 + k[2150]*y_cur[IDX_C2II] + k[2153]*y_cur[IDX_C2HII]; + data[jistart + 12006] = 0.0 + k[1730]*y_cur[IDX_C2H4II] - k[1741]*y_cur[IDX_CH2CCHII] - + k[1742]*y_cur[IDX_CH2CCHII] + k[2049]*y_cur[IDX_CH3II]; + data[jistart + 12007] = 0.0 - k[3838]*y_cur[IDX_CH2CCHII]; + data[jistart + 12008] = 0.0 + k[1482]*y_cur[IDX_C2H3I] + k[1484]*y_cur[IDX_C2H4I] + + k[1998]*y_cur[IDX_CH2I]; + data[jistart + 12009] = 0.0 + k[2042]*y_cur[IDX_C2H2I] + k[2047]*y_cur[IDX_C2H4I] + + k[2049]*y_cur[IDX_C2HI] + k[2081]*y_cur[IDX_C4H2I]; + data[jistart + 12010] = 0.0 - k[227]*y_cur[IDX_CH2CCHII] + k[2042]*y_cur[IDX_CH3II] + + k[2134]*y_cur[IDX_CH4II]; + data[jistart + 12011] = 0.0 - k[3453]*y_cur[IDX_CH2CCHII]; + data[jistart + 12012] = 0.0 + k[2798]*y_cur[IDX_H2CCCI]; + data[jistart + 12013] = 0.0 - k[3726]*y_cur[IDX_CH2CCHII]; + data[jistart + 12014] = 0.0 + k[3166]*y_cur[IDX_CH2CHCNI] + k[3187]*y_cur[IDX_CH3CCHI]; + data[jistart + 12015] = 0.0 + k[162]*y_cur[IDX_CH2CCHI] + k[1305]*y_cur[IDX_C2H4I] + + k[1306]*y_cur[IDX_C2H5I] + k[1366]*y_cur[IDX_CH3CCHI]; + data[jistart + 12016] = 0.0 + k[2325]*y_cur[IDX_CH3CCHI]; + data[jistart + 12017] = 0.0 + k[1854]*y_cur[IDX_C2H4II] - k[1892]*y_cur[IDX_CH2CCHII] - + k[1893]*y_cur[IDX_CH2CCHII]; + data[jistart + 12018] = 0.0 + k[2957]*y_cur[IDX_H2CCCI]; + data[jistart + 12019] = 0.0 + k[2647]*y_cur[IDX_CH3CCHI] + k[2681]*y_cur[IDX_H2CCCI]; + data[jistart + 12020] = 0.0 - k[6470]*y_cur[IDX_CH2CCHII] - k[6471]*y_cur[IDX_CH2CCHII]; + data[jistart + 12021] = 0.0 - k[5530]*y_cur[IDX_CH2CCHII] + k[5551]*y_cur[IDX_C3HII]; + data[jistart + 12022] = 0.0 - k[910]*y_cur[IDX_CH2CCHII] - k[911]*y_cur[IDX_CH2CCHII]; + data[jistart + 12023] = 0.0 + k[1084]*y_cur[IDX_eM] + k[6843]*y_cur[IDX_GRAINM]; + data[jistart + 12024] = 0.0 + k[8728]*y_cur[IDX_GCHI]; + data[jistart + 12025] = 0.0 + k[8638]*y_cur[IDX_GHI]; + data[jistart + 12026] = 0.0 + k[8675]*y_cur[IDX_GCI]; + data[jistart + 12027] = 0.0 + k[7224] + k[7406] + k[7588]; + data[jistart + 12028] = 0.0 + k[857]*y_cur[IDX_eM] + k[6797]*y_cur[IDX_GRAINM]; + data[jistart + 12029] = 0.0 + k[5799] + k[6103]; + data[jistart + 12030] = 0.0 + k[859]*y_cur[IDX_eM] + k[6803]*y_cur[IDX_GRAINM]; + data[jistart + 12031] = 0.0 + k[5852] + k[6177]; + data[jistart + 12032] = 0.0 + k[4909]*y_cur[IDX_CI]; + data[jistart + 12033] = 0.0 + k[855]*y_cur[IDX_eM] + k[6790]*y_cur[IDX_GRAINM]; + data[jistart + 12034] = 0.0 + k[866]*y_cur[IDX_eM] + k[6824]*y_cur[IDX_GRAINM]; + data[jistart + 12035] = 0.0 + k[3715]*y_cur[IDX_OI]; + data[jistart + 12036] = 0.0 + k[853]*y_cur[IDX_eM] + k[6786]*y_cur[IDX_GRAINM]; + data[jistart + 12037] = 0.0 + k[6037]; + data[jistart + 12038] = 0.0 + k[4927]*y_cur[IDX_CI]; + data[jistart + 12039] = 0.0 + k[4381]*y_cur[IDX_C6HM]; + data[jistart + 12040] = 0.0 + k[4384]*y_cur[IDX_C6HM]; + data[jistart + 12041] = 0.0 + k[4410]*y_cur[IDX_C6HM]; + data[jistart + 12042] = 0.0 + k[4391]*y_cur[IDX_C6HM]; + data[jistart + 12043] = 0.0 + k[4376]*y_cur[IDX_CII] + k[4377]*y_cur[IDX_C2H2II] + + k[4378]*y_cur[IDX_C2H3II] + k[4379]*y_cur[IDX_C4H2II] + + k[4380]*y_cur[IDX_C4H3II] + k[4381]*y_cur[IDX_C4SII] + + k[4382]*y_cur[IDX_CH2CCHII] + k[4383]*y_cur[IDX_CH3II] + + k[4384]*y_cur[IDX_CNCII] + k[4385]*y_cur[IDX_FeII] + + k[4386]*y_cur[IDX_HII] + k[4387]*y_cur[IDX_H2COII] + + k[4388]*y_cur[IDX_H2SII] + k[4389]*y_cur[IDX_H3II] + + k[4390]*y_cur[IDX_H3OII] + k[4391]*y_cur[IDX_HC2SII] + + k[4392]*y_cur[IDX_HCNHII] + k[4393]*y_cur[IDX_HCNHII] + + k[4394]*y_cur[IDX_HCOII] + k[4395]*y_cur[IDX_HCOII] + + k[4396]*y_cur[IDX_HeII] + k[4397]*y_cur[IDX_MgII] + + k[4398]*y_cur[IDX_NII] + k[4399]*y_cur[IDX_N2HII] + + k[4400]*y_cur[IDX_NH3II] + k[4401]*y_cur[IDX_NH4II] + + k[4402]*y_cur[IDX_NOII] + k[4403]*y_cur[IDX_NaII] + + k[4404]*y_cur[IDX_OII] + k[4405]*y_cur[IDX_SII] + + k[4406]*y_cur[IDX_SOII] + k[4407]*y_cur[IDX_SiII] + + k[4408]*y_cur[IDX_SiOII] + k[4409]*y_cur[IDX_SiOHII] + + k[4410]*y_cur[IDX_SiSII] + k[5749] + k[6035]; + data[jistart + 12044] = 0.0 + k[3431]*y_cur[IDX_NI]; + data[jistart + 12045] = 0.0 + k[3447]*y_cur[IDX_NI]; + data[jistart + 12046] = 0.0 + k[46]*y_cur[IDX_CI]; + data[jistart + 12047] = 0.0 - k[1803]*y_cur[IDX_C6HI] - k[1804]*y_cur[IDX_C6HI]; + data[jistart + 12048] = 0.0 + k[97]*y_cur[IDX_HI]; + data[jistart + 12049] = 0.0 + k[4408]*y_cur[IDX_C6HM]; + data[jistart + 12050] = 0.0 + k[8728]*y_cur[IDX_GC5I]; + data[jistart + 12051] = 0.0 + k[4409]*y_cur[IDX_C6HM]; + data[jistart + 12052] = 0.0 - k[1769]*y_cur[IDX_C6HI] - k[1770]*y_cur[IDX_C6HI]; + data[jistart + 12053] = 0.0 + k[4385]*y_cur[IDX_C6HM]; + data[jistart + 12054] = 0.0 + k[4397]*y_cur[IDX_C6HM]; + data[jistart + 12055] = 0.0 + k[4403]*y_cur[IDX_C6HM]; + data[jistart + 12056] = 0.0 + k[8675]*y_cur[IDX_GC5HI]; + data[jistart + 12057] = 0.0 + k[5371]*y_cur[IDX_OI]; + data[jistart + 12058] = 0.0 - k[1661]*y_cur[IDX_C6HI] - k[1662]*y_cur[IDX_C6HI]; + data[jistart + 12059] = 0.0 + k[4380]*y_cur[IDX_C6HM]; + data[jistart + 12060] = 0.0 + k[4399]*y_cur[IDX_C6HM]; + data[jistart + 12061] = 0.0 + k[4406]*y_cur[IDX_C6HM]; + data[jistart + 12062] = 0.0 - k[2027]*y_cur[IDX_C6HI] - k[2028]*y_cur[IDX_C6HI] + + k[4382]*y_cur[IDX_C6HM]; + data[jistart + 12063] = 0.0 - k[348]*y_cur[IDX_HII] - k[1331]*y_cur[IDX_CII] - + k[1497]*y_cur[IDX_C2H2II] - k[1498]*y_cur[IDX_C2H2II] - + k[1599]*y_cur[IDX_C2H3II] - k[1600]*y_cur[IDX_C2H3II] - + k[1601]*y_cur[IDX_C2H3II] - k[1661]*y_cur[IDX_C2H4II] - + k[1662]*y_cur[IDX_C2H4II] - k[1769]*y_cur[IDX_C3H2II] - + k[1770]*y_cur[IDX_C3H2II] - k[1803]*y_cur[IDX_C3H3II] - + k[1804]*y_cur[IDX_C3H3II] - k[2027]*y_cur[IDX_CH2CCHII] - + k[2028]*y_cur[IDX_CH2CCHII] - k[2056]*y_cur[IDX_CH3II] - + k[2307]*y_cur[IDX_HII] - k[2620]*y_cur[IDX_H3II] - + k[2925]*y_cur[IDX_HCOII] - k[3132]*y_cur[IDX_HeII] - + k[3133]*y_cur[IDX_HeII] - k[4933]*y_cur[IDX_CI] - + k[5243]*y_cur[IDX_NI] - k[5369]*y_cur[IDX_OI] - + k[5600]*y_cur[IDX_eM] - k[5752] - k[5753] - k[5754] - k[6039] - + k[6040] - k[7042]; + data[jistart + 12064] = 0.0 + k[4388]*y_cur[IDX_C6HM]; + data[jistart + 12065] = 0.0 + k[4398]*y_cur[IDX_C6HM]; + data[jistart + 12066] = 0.0 + k[4387]*y_cur[IDX_C6HM]; + data[jistart + 12067] = 0.0 + k[4402]*y_cur[IDX_C6HM]; + data[jistart + 12068] = 0.0 + k[4404]*y_cur[IDX_C6HM]; + data[jistart + 12069] = 0.0 + k[4872]*y_cur[IDX_C2I]; + data[jistart + 12070] = 0.0 + k[4379]*y_cur[IDX_C6HM]; + data[jistart + 12071] = 0.0 + k[4392]*y_cur[IDX_C6HM] + k[4393]*y_cur[IDX_C6HM]; + data[jistart + 12072] = 0.0 + k[4400]*y_cur[IDX_C6HM]; + data[jistart + 12073] = 0.0 + k[4401]*y_cur[IDX_C6HM]; + data[jistart + 12074] = 0.0 + k[4407]*y_cur[IDX_C6HM]; + data[jistart + 12075] = 0.0 + k[4405]*y_cur[IDX_C6HM]; + data[jistart + 12076] = 0.0 - k[1599]*y_cur[IDX_C6HI] - k[1600]*y_cur[IDX_C6HI] - + k[1601]*y_cur[IDX_C6HI] + k[4378]*y_cur[IDX_C6HM]; + data[jistart + 12077] = 0.0 + k[4872]*y_cur[IDX_C4H2I]; + data[jistart + 12078] = 0.0 - k[1497]*y_cur[IDX_C6HI] - k[1498]*y_cur[IDX_C6HI] + + k[4377]*y_cur[IDX_C6HM]; + data[jistart + 12079] = 0.0 - k[2056]*y_cur[IDX_C6HI] + k[4383]*y_cur[IDX_C6HM]; + data[jistart + 12080] = 0.0 + k[8638]*y_cur[IDX_GC6I]; + data[jistart + 12081] = 0.0 + k[3431]*y_cur[IDX_C7HM] + k[3447]*y_cur[IDX_C9HM] - + k[5243]*y_cur[IDX_C6HI]; + data[jistart + 12082] = 0.0 + k[4390]*y_cur[IDX_C6HM]; + data[jistart + 12083] = 0.0 + k[3715]*y_cur[IDX_C7H2II] - k[5369]*y_cur[IDX_C6HI] + + k[5371]*y_cur[IDX_C7HI]; + data[jistart + 12084] = 0.0 - k[3132]*y_cur[IDX_C6HI] - k[3133]*y_cur[IDX_C6HI] + + k[4396]*y_cur[IDX_C6HM]; + data[jistart + 12085] = 0.0 - k[1331]*y_cur[IDX_C6HI] + k[4376]*y_cur[IDX_C6HM]; + data[jistart + 12086] = 0.0 - k[348]*y_cur[IDX_C6HI] - k[2307]*y_cur[IDX_C6HI] + + k[4386]*y_cur[IDX_C6HM]; + data[jistart + 12087] = 0.0 + k[46]*y_cur[IDX_C5HM] + k[4909]*y_cur[IDX_C10H2I] + + k[4927]*y_cur[IDX_C5H2I] - k[4933]*y_cur[IDX_C6HI]; + data[jistart + 12088] = 0.0 - k[2925]*y_cur[IDX_C6HI] + k[4394]*y_cur[IDX_C6HM] + + k[4395]*y_cur[IDX_C6HM]; + data[jistart + 12089] = 0.0 - k[2620]*y_cur[IDX_C6HI] + k[4389]*y_cur[IDX_C6HM]; + data[jistart + 12090] = 0.0 + k[6786]*y_cur[IDX_C6H2II] + k[6790]*y_cur[IDX_C6H3II] + + k[6797]*y_cur[IDX_C6H4II] + k[6803]*y_cur[IDX_C6H5II] + + k[6824]*y_cur[IDX_C7HII] + k[6843]*y_cur[IDX_HC7NII]; + data[jistart + 12091] = 0.0 + k[853]*y_cur[IDX_C6H2II] + k[855]*y_cur[IDX_C6H3II] + + k[857]*y_cur[IDX_C6H4II] + k[859]*y_cur[IDX_C6H5II] + + k[866]*y_cur[IDX_C7HII] + k[1084]*y_cur[IDX_HC7NII] - + k[5600]*y_cur[IDX_C6HI]; + data[jistart + 12092] = 0.0 + k[97]*y_cur[IDX_C6M]; + data[jistart + 12093] = 0.0 + k[8636]*y_cur[IDX_GHI]; + data[jistart + 12094] = 0.0 + k[8672]*y_cur[IDX_GCI]; + data[jistart + 12095] = 0.0 + k[7210] + k[7392] + k[7574]; + data[jistart + 12096] = 0.0 + k[8726]*y_cur[IDX_GCHI]; + data[jistart + 12097] = 0.0 + k[930]*y_cur[IDX_eM] + k[6749]*y_cur[IDX_GRAINM]; + data[jistart + 12098] = 0.0 + k[730]*y_cur[IDX_eM] + k[6872]*y_cur[IDX_GRAINM]; + data[jistart + 12099] = 0.0 + k[850]*y_cur[IDX_eM] + k[6782]*y_cur[IDX_GRAINM]; + data[jistart + 12100] = 0.0 + k[3063]*y_cur[IDX_HeII] + k[4909]*y_cur[IDX_CI]; + data[jistart + 12101] = 0.0 + k[844]*y_cur[IDX_eM] + k[6743]*y_cur[IDX_GRAINM]; + data[jistart + 12102] = 0.0 + k[3710]*y_cur[IDX_OI]; + data[jistart + 12103] = 0.0 + k[5741] + k[6026]; + data[jistart + 12104] = 0.0 + k[842]*y_cur[IDX_eM] + k[6739]*y_cur[IDX_GRAINM]; + data[jistart + 12105] = 0.0 + k[4276]*y_cur[IDX_C5HM]; + data[jistart + 12106] = 0.0 - k[1833]*y_cur[IDX_C5HI]; + data[jistart + 12107] = 0.0 + k[4279]*y_cur[IDX_C5HM]; + data[jistart + 12108] = 0.0 + k[4305]*y_cur[IDX_C5HM]; + data[jistart + 12109] = 0.0 + k[44]*y_cur[IDX_CI]; + data[jistart + 12110] = 0.0 + k[4286]*y_cur[IDX_C5HM]; + data[jistart + 12111] = 0.0 + k[3422]*y_cur[IDX_NI]; + data[jistart + 12112] = 0.0 + k[3440]*y_cur[IDX_NI]; + data[jistart + 12113] = 0.0 + k[4271]*y_cur[IDX_CII] + k[4272]*y_cur[IDX_C2H2II] + + k[4273]*y_cur[IDX_C2H3II] + k[4274]*y_cur[IDX_C4H2II] + + k[4275]*y_cur[IDX_C4H3II] + k[4276]*y_cur[IDX_C4SII] + + k[4277]*y_cur[IDX_CH2CCHII] + k[4278]*y_cur[IDX_CH3II] + + k[4279]*y_cur[IDX_CNCII] + k[4280]*y_cur[IDX_FeII] + + k[4281]*y_cur[IDX_HII] + k[4282]*y_cur[IDX_H2COII] + + k[4283]*y_cur[IDX_H2SII] + k[4284]*y_cur[IDX_H3II] + + k[4285]*y_cur[IDX_H3OII] + k[4286]*y_cur[IDX_HC2SII] + + k[4287]*y_cur[IDX_HCNHII] + k[4288]*y_cur[IDX_HCNHII] + + k[4289]*y_cur[IDX_HCOII] + k[4290]*y_cur[IDX_HCOII] + + k[4291]*y_cur[IDX_HeII] + k[4292]*y_cur[IDX_MgII] + + k[4293]*y_cur[IDX_NII] + k[4294]*y_cur[IDX_N2HII] + + k[4295]*y_cur[IDX_NH3II] + k[4296]*y_cur[IDX_NH4II] + + k[4297]*y_cur[IDX_NOII] + k[4298]*y_cur[IDX_NaII] + + k[4299]*y_cur[IDX_OII] + k[4300]*y_cur[IDX_SII] + + k[4301]*y_cur[IDX_SOII] + k[4302]*y_cur[IDX_SiII] + + k[4303]*y_cur[IDX_SiOII] + k[4304]*y_cur[IDX_SiOHII] + + k[4305]*y_cur[IDX_SiSII] + k[5739] + k[6024]; + data[jistart + 12114] = 0.0 - k[1800]*y_cur[IDX_C5HI] - k[1801]*y_cur[IDX_C5HI]; + data[jistart + 12115] = 0.0 + k[94]*y_cur[IDX_HI]; + data[jistart + 12116] = 0.0 + k[4303]*y_cur[IDX_C5HM]; + data[jistart + 12117] = 0.0 + k[8726]*y_cur[IDX_GC4I]; + data[jistart + 12118] = 0.0 + k[4304]*y_cur[IDX_C5HM]; + data[jistart + 12119] = 0.0 - k[1765]*y_cur[IDX_C5HI] - k[1766]*y_cur[IDX_C5HI]; + data[jistart + 12120] = 0.0 + k[5964]; + data[jistart + 12121] = 0.0 + k[4280]*y_cur[IDX_C5HM]; + data[jistart + 12122] = 0.0 + k[4292]*y_cur[IDX_C5HM]; + data[jistart + 12123] = 0.0 + k[4298]*y_cur[IDX_C5HM]; + data[jistart + 12124] = 0.0 + k[8672]*y_cur[IDX_GC4HI]; + data[jistart + 12125] = 0.0 - k[1657]*y_cur[IDX_C5HI] - k[1658]*y_cur[IDX_C5HI]; + data[jistart + 12126] = 0.0 - k[1841]*y_cur[IDX_C5HI] + k[4275]*y_cur[IDX_C5HM]; + data[jistart + 12127] = 0.0 + k[4294]*y_cur[IDX_C5HM]; + data[jistart + 12128] = 0.0 + k[4301]*y_cur[IDX_C5HM]; + data[jistart + 12129] = 0.0 - k[2024]*y_cur[IDX_C5HI] - k[2025]*y_cur[IDX_C5HI] + + k[4277]*y_cur[IDX_C5HM]; + data[jistart + 12130] = 0.0 + k[5243]*y_cur[IDX_NI] + k[5369]*y_cur[IDX_OI]; + data[jistart + 12131] = 0.0 - k[345]*y_cur[IDX_HII] - k[1325]*y_cur[IDX_CII] - + k[1493]*y_cur[IDX_C2H2II] - k[1494]*y_cur[IDX_C2H2II] - + k[1592]*y_cur[IDX_C2H3II] - k[1593]*y_cur[IDX_C2H3II] - + k[1594]*y_cur[IDX_C2H3II] - k[1657]*y_cur[IDX_C2H4II] - + k[1658]*y_cur[IDX_C2H4II] - k[1765]*y_cur[IDX_C3H2II] - + k[1766]*y_cur[IDX_C3H2II] - k[1800]*y_cur[IDX_C3H3II] - + k[1801]*y_cur[IDX_C3H3II] - k[1833]*y_cur[IDX_C4HII] - + k[1836]*y_cur[IDX_C4H2II] - k[1841]*y_cur[IDX_C4H3II] - + k[2024]*y_cur[IDX_CH2CCHII] - k[2025]*y_cur[IDX_CH2CCHII] - + k[2054]*y_cur[IDX_CH3II] - k[2305]*y_cur[IDX_HII] - + k[2615]*y_cur[IDX_H3II] - k[2920]*y_cur[IDX_HCOII] - + k[3122]*y_cur[IDX_HeII] - k[3123]*y_cur[IDX_HeII] - + k[4928]*y_cur[IDX_CI] - k[5240]*y_cur[IDX_NI] - + k[5366]*y_cur[IDX_OI] - k[5597]*y_cur[IDX_eM] - k[5742] - k[5743] - + k[5744] - k[6027] - k[6028] - k[6029] - k[7028]; + data[jistart + 12132] = 0.0 + k[4283]*y_cur[IDX_C5HM]; + data[jistart + 12133] = 0.0 + k[4293]*y_cur[IDX_C5HM]; + data[jistart + 12134] = 0.0 + k[4282]*y_cur[IDX_C5HM]; + data[jistart + 12135] = 0.0 + k[4297]*y_cur[IDX_C5HM]; + data[jistart + 12136] = 0.0 + k[4299]*y_cur[IDX_C5HM]; + data[jistart + 12137] = 0.0 + k[4961]*y_cur[IDX_CI]; + data[jistart + 12138] = 0.0 - k[1836]*y_cur[IDX_C5HI] + k[4274]*y_cur[IDX_C5HM]; + data[jistart + 12139] = 0.0 + k[4287]*y_cur[IDX_C5HM] + k[4288]*y_cur[IDX_C5HM]; + data[jistart + 12140] = 0.0 + k[4295]*y_cur[IDX_C5HM]; + data[jistart + 12141] = 0.0 + k[4296]*y_cur[IDX_C5HM]; + data[jistart + 12142] = 0.0 + k[4302]*y_cur[IDX_C5HM]; + data[jistart + 12143] = 0.0 + k[4300]*y_cur[IDX_C5HM]; + data[jistart + 12144] = 0.0 - k[1592]*y_cur[IDX_C5HI] - k[1593]*y_cur[IDX_C5HI] - + k[1594]*y_cur[IDX_C5HI] + k[4273]*y_cur[IDX_C5HM]; + data[jistart + 12145] = 0.0 - k[1493]*y_cur[IDX_C5HI] - k[1494]*y_cur[IDX_C5HI] + + k[4272]*y_cur[IDX_C5HM]; + data[jistart + 12146] = 0.0 - k[2054]*y_cur[IDX_C5HI] + k[4278]*y_cur[IDX_C5HM]; + data[jistart + 12147] = 0.0 + k[8636]*y_cur[IDX_GC5I]; + data[jistart + 12148] = 0.0 + k[3422]*y_cur[IDX_C6HM] + k[3440]*y_cur[IDX_C8HM] - + k[5240]*y_cur[IDX_C5HI] + k[5243]*y_cur[IDX_C6HI]; + data[jistart + 12149] = 0.0 + k[4285]*y_cur[IDX_C5HM]; + data[jistart + 12150] = 0.0 + k[3710]*y_cur[IDX_C6H2II] - k[5366]*y_cur[IDX_C5HI] + + k[5369]*y_cur[IDX_C6HI]; + data[jistart + 12151] = 0.0 + k[3063]*y_cur[IDX_C10H2I] - k[3122]*y_cur[IDX_C5HI] - + k[3123]*y_cur[IDX_C5HI] + k[4291]*y_cur[IDX_C5HM]; + data[jistart + 12152] = 0.0 - k[1325]*y_cur[IDX_C5HI] + k[4271]*y_cur[IDX_C5HM]; + data[jistart + 12153] = 0.0 - k[345]*y_cur[IDX_C5HI] - k[2305]*y_cur[IDX_C5HI] + + k[4281]*y_cur[IDX_C5HM]; + data[jistart + 12154] = 0.0 + k[44]*y_cur[IDX_C4HM] + k[4909]*y_cur[IDX_C10H2I] - + k[4928]*y_cur[IDX_C5HI] + k[4961]*y_cur[IDX_C4H2I]; + data[jistart + 12155] = 0.0 - k[2920]*y_cur[IDX_C5HI] + k[4289]*y_cur[IDX_C5HM] + + k[4290]*y_cur[IDX_C5HM]; + data[jistart + 12156] = 0.0 - k[2615]*y_cur[IDX_C5HI] + k[4284]*y_cur[IDX_C5HM]; + data[jistart + 12157] = 0.0 + k[6739]*y_cur[IDX_C5H2II] + k[6743]*y_cur[IDX_C5H3II] + + k[6749]*y_cur[IDX_CH3C4HII] + k[6782]*y_cur[IDX_C6HII] + + k[6872]*y_cur[IDX_C10HII]; + data[jistart + 12158] = 0.0 + k[730]*y_cur[IDX_C10HII] + k[842]*y_cur[IDX_C5H2II] + + k[844]*y_cur[IDX_C5H3II] + k[850]*y_cur[IDX_C6HII] + + k[930]*y_cur[IDX_CH3C4HII] - k[5597]*y_cur[IDX_C5HI]; + data[jistart + 12159] = 0.0 + k[94]*y_cur[IDX_C5M]; + data[jistart + 12160] = 0.0 + k[485]*y_cur[IDX_H2SI]; + data[jistart + 12161] = 0.0 + k[486]*y_cur[IDX_H2SI]; + data[jistart + 12162] = 0.0 + k[276]*y_cur[IDX_H2SI]; + data[jistart + 12163] = 0.0 + k[484]*y_cur[IDX_H2SI]; + data[jistart + 12164] = 0.0 + k[701]*y_cur[IDX_H2SI]; + data[jistart + 12165] = 0.0 + k[2843]*y_cur[IDX_HI]; + data[jistart + 12166] = 0.0 + k[281]*y_cur[IDX_H2SI]; + data[jistart + 12167] = 0.0 + k[567]*y_cur[IDX_H2SI]; + data[jistart + 12168] = 0.0 + k[2456]*y_cur[IDX_H2I]; + data[jistart + 12169] = 0.0 - k[4774]*y_cur[IDX_H2SII]; + data[jistart + 12170] = 0.0 - k[4633]*y_cur[IDX_H2SII]; + data[jistart + 12171] = 0.0 + k[448]*y_cur[IDX_H2SI]; + data[jistart + 12172] = 0.0 + k[580]*y_cur[IDX_H2SI]; + data[jistart + 12173] = 0.0 - k[4844]*y_cur[IDX_H2SII]; + data[jistart + 12174] = 0.0 - k[4038]*y_cur[IDX_H2SII]; + data[jistart + 12175] = 0.0 - k[4213]*y_cur[IDX_H2SII]; + data[jistart + 12176] = 0.0 + k[309]*y_cur[IDX_H2SI]; + data[jistart + 12177] = 0.0 - k[4809]*y_cur[IDX_H2SII]; + data[jistart + 12178] = 0.0 - k[3968]*y_cur[IDX_H2SII]; + data[jistart + 12179] = 0.0 - k[4108]*y_cur[IDX_H2SII]; + data[jistart + 12180] = 0.0 - k[4388]*y_cur[IDX_H2SII]; + data[jistart + 12181] = 0.0 - k[4528]*y_cur[IDX_H2SII]; + data[jistart + 12182] = 0.0 - k[4458]*y_cur[IDX_H2SII]; + data[jistart + 12183] = 0.0 - k[4598]*y_cur[IDX_H2SII]; + data[jistart + 12184] = 0.0 - k[3933]*y_cur[IDX_H2SII]; + data[jistart + 12185] = 0.0 - k[4283]*y_cur[IDX_H2SII]; + data[jistart + 12186] = 0.0 - k[4318]*y_cur[IDX_H2SII]; + data[jistart + 12187] = 0.0 + k[2716]*y_cur[IDX_H3II] + k[2977]*y_cur[IDX_HCOII]; + data[jistart + 12188] = 0.0 - k[3898]*y_cur[IDX_H2SII]; + data[jistart + 12189] = 0.0 - k[4739]*y_cur[IDX_H2SII]; + data[jistart + 12190] = 0.0 - k[4563]*y_cur[IDX_H2SII]; + data[jistart + 12191] = 0.0 - k[4704]*y_cur[IDX_H2SII]; + data[jistart + 12192] = 0.0 - k[4493]*y_cur[IDX_H2SII]; + data[jistart + 12193] = 0.0 - k[4003]*y_cur[IDX_H2SII]; + data[jistart + 12194] = 0.0 - k[4073]*y_cur[IDX_H2SII]; + data[jistart + 12195] = 0.0 - k[4178]*y_cur[IDX_H2SII]; + data[jistart + 12196] = 0.0 - k[4353]*y_cur[IDX_H2SII]; + data[jistart + 12197] = 0.0 - k[4248]*y_cur[IDX_H2SII]; + data[jistart + 12198] = 0.0 - k[4423]*y_cur[IDX_H2SII]; + data[jistart + 12199] = 0.0 + k[690]*y_cur[IDX_H2SI]; + data[jistart + 12200] = 0.0 + k[469]*y_cur[IDX_H2SI]; + data[jistart + 12201] = 0.0 - k[4143]*y_cur[IDX_H2SII]; + data[jistart + 12202] = 0.0 + k[674]*y_cur[IDX_H2SI]; + data[jistart + 12203] = 0.0 - k[483]*y_cur[IDX_H2SII]; + data[jistart + 12204] = 0.0 - k[532]*y_cur[IDX_H2SII]; + data[jistart + 12205] = 0.0 - k[636]*y_cur[IDX_H2SII]; + data[jistart + 12206] = 0.0 - k[4668]*y_cur[IDX_H2SII]; + data[jistart + 12207] = 0.0 + k[233]*y_cur[IDX_H2SI]; + data[jistart + 12208] = 0.0 - k[483]*y_cur[IDX_FeI] - k[501]*y_cur[IDX_HCOI] - + k[532]*y_cur[IDX_MgI] - k[606]*y_cur[IDX_NH3I] - + k[625]*y_cur[IDX_NOI] - k[636]*y_cur[IDX_NaI] - k[709]*y_cur[IDX_SI] + - k[719]*y_cur[IDX_SiI] - k[1019]*y_cur[IDX_eM] - + k[1020]*y_cur[IDX_eM] - k[1900]*y_cur[IDX_CI] - + k[2443]*y_cur[IDX_H2I] - k[2544]*y_cur[IDX_H2OI] - + k[2574]*y_cur[IDX_H2SI] - k[2842]*y_cur[IDX_HI] - + k[3459]*y_cur[IDX_NI] - k[3576]*y_cur[IDX_NH3I] - + k[3734]*y_cur[IDX_OI] - k[3735]*y_cur[IDX_OI] - + k[3898]*y_cur[IDX_CM] - k[3933]*y_cur[IDX_C10M] - + k[3968]*y_cur[IDX_C10HM] - k[4003]*y_cur[IDX_C2M] - + k[4038]*y_cur[IDX_C2HM] - k[4073]*y_cur[IDX_C3M] - + k[4108]*y_cur[IDX_C3HM] - k[4143]*y_cur[IDX_C3NM] - + k[4178]*y_cur[IDX_C4M] - k[4213]*y_cur[IDX_C4HM] - + k[4248]*y_cur[IDX_C5M] - k[4283]*y_cur[IDX_C5HM] - + k[4318]*y_cur[IDX_C5NM] - k[4353]*y_cur[IDX_C6M] - + k[4388]*y_cur[IDX_C6HM] - k[4423]*y_cur[IDX_C7M] - + k[4458]*y_cur[IDX_C7HM] - k[4493]*y_cur[IDX_C8M] - + k[4528]*y_cur[IDX_C8HM] - k[4563]*y_cur[IDX_C9M] - + k[4598]*y_cur[IDX_C9HM] - k[4633]*y_cur[IDX_CHM] - + k[4668]*y_cur[IDX_CNM] - k[4704]*y_cur[IDX_HM] - + k[4739]*y_cur[IDX_OM] - k[4774]*y_cur[IDX_O2M] - + k[4809]*y_cur[IDX_OHM] - k[4844]*y_cur[IDX_SM] - + k[5618]*y_cur[IDX_eM] - k[6446]*y_cur[IDX_GRAINM] - + k[6447]*y_cur[IDX_GRAINM]; + data[jistart + 12209] = 0.0 + k[553]*y_cur[IDX_H2SI]; + data[jistart + 12210] = 0.0 + k[657]*y_cur[IDX_H2SI]; + data[jistart + 12211] = 0.0 + k[175]*y_cur[IDX_CII] + k[223]*y_cur[IDX_C2H2II] + + k[233]*y_cur[IDX_C2H4II] + k[276]*y_cur[IDX_C2H6II] + + k[281]*y_cur[IDX_CH4II] + k[309]*y_cur[IDX_COII] + + k[380]*y_cur[IDX_HII] + k[448]*y_cur[IDX_H2II] + + k[469]*y_cur[IDX_H2OII] + k[484]*y_cur[IDX_CO2II] + + k[485]*y_cur[IDX_N2OII] + k[486]*y_cur[IDX_OCSII] + + k[519]*y_cur[IDX_HeII] + k[553]*y_cur[IDX_NII] + + k[567]*y_cur[IDX_N2II] + k[580]*y_cur[IDX_NH2II] + + k[657]*y_cur[IDX_OII] + k[674]*y_cur[IDX_O2II] + + k[690]*y_cur[IDX_OHII] + k[701]*y_cur[IDX_PII] - + k[2574]*y_cur[IDX_H2SII] + k[5841] + k[6163]; + data[jistart + 12212] = 0.0 + k[2500]*y_cur[IDX_H2COI] + k[5561]*y_cur[IDX_H2I]; + data[jistart + 12213] = 0.0 - k[719]*y_cur[IDX_H2SII]; + data[jistart + 12214] = 0.0 - k[625]*y_cur[IDX_H2SII]; + data[jistart + 12215] = 0.0 - k[501]*y_cur[IDX_H2SII]; + data[jistart + 12216] = 0.0 + k[2500]*y_cur[IDX_SII]; + data[jistart + 12217] = 0.0 - k[709]*y_cur[IDX_H2SII]; + data[jistart + 12218] = 0.0 - k[606]*y_cur[IDX_H2SII] - k[3576]*y_cur[IDX_H2SII]; + data[jistart + 12219] = 0.0 + k[223]*y_cur[IDX_H2SI]; + data[jistart + 12220] = 0.0 - k[3459]*y_cur[IDX_H2SII]; + data[jistart + 12221] = 0.0 - k[3734]*y_cur[IDX_H2SII] - k[3735]*y_cur[IDX_H2SII]; + data[jistart + 12222] = 0.0 + k[519]*y_cur[IDX_H2SI]; + data[jistart + 12223] = 0.0 + k[175]*y_cur[IDX_H2SI]; + data[jistart + 12224] = 0.0 - k[2544]*y_cur[IDX_H2SII]; + data[jistart + 12225] = 0.0 + k[380]*y_cur[IDX_H2SI]; + data[jistart + 12226] = 0.0 - k[1900]*y_cur[IDX_H2SII]; + data[jistart + 12227] = 0.0 + k[2977]*y_cur[IDX_HSI]; + data[jistart + 12228] = 0.0 + k[2716]*y_cur[IDX_HSI]; + data[jistart + 12229] = 0.0 - k[6446]*y_cur[IDX_H2SII] - k[6447]*y_cur[IDX_H2SII]; + data[jistart + 12230] = 0.0 - k[2443]*y_cur[IDX_H2SII] + k[2456]*y_cur[IDX_HSII] + + k[5561]*y_cur[IDX_SII]; + data[jistart + 12231] = 0.0 - k[1019]*y_cur[IDX_H2SII] - k[1020]*y_cur[IDX_H2SII] - + k[5618]*y_cur[IDX_H2SII]; + data[jistart + 12232] = 0.0 - k[2842]*y_cur[IDX_H2SII] + k[2843]*y_cur[IDX_H3SII]; + data[jistart + 12233] = 0.0 + k[3289]*y_cur[IDX_HeII]; + data[jistart + 12234] = 0.0 + k[3278]*y_cur[IDX_HeII]; + data[jistart + 12235] = 0.0 - k[3351]*y_cur[IDX_NII] - k[3352]*y_cur[IDX_NII]; + data[jistart + 12236] = 0.0 + k[573]*y_cur[IDX_NI]; + data[jistart + 12237] = 0.0 - k[4784]*y_cur[IDX_NII]; + data[jistart + 12238] = 0.0 - k[4643]*y_cur[IDX_NII]; + data[jistart + 12239] = 0.0 - k[562]*y_cur[IDX_NII] - k[3359]*y_cur[IDX_NII] - + k[3360]*y_cur[IDX_NII]; + data[jistart + 12240] = 0.0 - k[4854]*y_cur[IDX_NII]; + data[jistart + 12241] = 0.0 - k[4048]*y_cur[IDX_NII]; + data[jistart + 12242] = 0.0 - k[4223]*y_cur[IDX_NII]; + data[jistart + 12243] = 0.0 - k[4819]*y_cur[IDX_NII]; + data[jistart + 12244] = 0.0 - k[3978]*y_cur[IDX_NII]; + data[jistart + 12245] = 0.0 - k[4118]*y_cur[IDX_NII]; + data[jistart + 12246] = 0.0 - k[4398]*y_cur[IDX_NII]; + data[jistart + 12247] = 0.0 - k[4538]*y_cur[IDX_NII]; + data[jistart + 12248] = 0.0 - k[4468]*y_cur[IDX_NII]; + data[jistart + 12249] = 0.0 - k[4608]*y_cur[IDX_NII]; + data[jistart + 12250] = 0.0 - k[3943]*y_cur[IDX_NII]; + data[jistart + 12251] = 0.0 - k[4293]*y_cur[IDX_NII]; + data[jistart + 12252] = 0.0 - k[4328]*y_cur[IDX_NII]; + data[jistart + 12253] = 0.0 - k[3908]*y_cur[IDX_NII]; + data[jistart + 12254] = 0.0 - k[4749]*y_cur[IDX_NII]; + data[jistart + 12255] = 0.0 - k[4573]*y_cur[IDX_NII]; + data[jistart + 12256] = 0.0 - k[545]*y_cur[IDX_NII] - k[3336]*y_cur[IDX_NII] - + k[3337]*y_cur[IDX_NII] - k[3338]*y_cur[IDX_NII] - + k[3339]*y_cur[IDX_NII]; + data[jistart + 12257] = 0.0 - k[4714]*y_cur[IDX_NII]; + data[jistart + 12258] = 0.0 - k[4503]*y_cur[IDX_NII]; + data[jistart + 12259] = 0.0 - k[4013]*y_cur[IDX_NII]; + data[jistart + 12260] = 0.0 - k[4083]*y_cur[IDX_NII]; + data[jistart + 12261] = 0.0 - k[4188]*y_cur[IDX_NII]; + data[jistart + 12262] = 0.0 - k[4363]*y_cur[IDX_NII]; + data[jistart + 12263] = 0.0 - k[4258]*y_cur[IDX_NII]; + data[jistart + 12264] = 0.0 - k[4433]*y_cur[IDX_NII]; + data[jistart + 12265] = 0.0 - k[557]*y_cur[IDX_NII] + k[3280]*y_cur[IDX_HeII]; + data[jistart + 12266] = 0.0 - k[4153]*y_cur[IDX_NII]; + data[jistart + 12267] = 0.0 - k[548]*y_cur[IDX_NII] - k[3343]*y_cur[IDX_NII]; + data[jistart + 12268] = 0.0 - k[550]*y_cur[IDX_NII]; + data[jistart + 12269] = 0.0 - k[556]*y_cur[IDX_NII]; + data[jistart + 12270] = 0.0 - k[559]*y_cur[IDX_NII] + k[3285]*y_cur[IDX_HeII] - + k[3355]*y_cur[IDX_NII]; + data[jistart + 12271] = 0.0 - k[4678]*y_cur[IDX_NII]; + data[jistart + 12272] = 0.0 - k[292]*y_cur[IDX_CHI] - k[542]*y_cur[IDX_C2I] - + k[543]*y_cur[IDX_C2HI] - k[544]*y_cur[IDX_CH2I] - + k[545]*y_cur[IDX_CH3OHI] - k[546]*y_cur[IDX_CH4I] - + k[547]*y_cur[IDX_CNI] - k[548]*y_cur[IDX_CO2I] - + k[549]*y_cur[IDX_COI] - k[550]*y_cur[IDX_FeI] - + k[551]*y_cur[IDX_H2COI] - k[552]*y_cur[IDX_H2OI] - + k[553]*y_cur[IDX_H2SI] - k[554]*y_cur[IDX_HCNI] - + k[555]*y_cur[IDX_HCOI] - k[556]*y_cur[IDX_MgI] - + k[557]*y_cur[IDX_NH2I] - k[558]*y_cur[IDX_NH3I] - + k[559]*y_cur[IDX_NHI] - k[560]*y_cur[IDX_NOI] - + k[561]*y_cur[IDX_O2I] - k[562]*y_cur[IDX_OCSI] - + k[563]*y_cur[IDX_OHI] - k[2256]*y_cur[IDX_CHI] - + k[2459]*y_cur[IDX_H2I] - k[3336]*y_cur[IDX_CH3OHI] - + k[3337]*y_cur[IDX_CH3OHI] - k[3338]*y_cur[IDX_CH3OHI] - + k[3339]*y_cur[IDX_CH3OHI] - k[3340]*y_cur[IDX_CH4I] - + k[3341]*y_cur[IDX_CH4I] - k[3342]*y_cur[IDX_CH4I] - + k[3343]*y_cur[IDX_CO2I] - k[3344]*y_cur[IDX_COI] - + k[3345]*y_cur[IDX_H2COI] - k[3346]*y_cur[IDX_H2COI] - + k[3347]*y_cur[IDX_H2SI] - k[3348]*y_cur[IDX_H2SI] - + k[3349]*y_cur[IDX_H2SI] - k[3350]*y_cur[IDX_HCOI] - + k[3351]*y_cur[IDX_NCCNI] - k[3352]*y_cur[IDX_NCCNI] - + k[3353]*y_cur[IDX_NH3I] - k[3354]*y_cur[IDX_NH3I] - + k[3355]*y_cur[IDX_NHI] - k[3356]*y_cur[IDX_NOI] - + k[3357]*y_cur[IDX_O2I] - k[3358]*y_cur[IDX_O2I] - + k[3359]*y_cur[IDX_OCSI] - k[3360]*y_cur[IDX_OCSI] - + k[3908]*y_cur[IDX_CM] - k[3943]*y_cur[IDX_C10M] - + k[3978]*y_cur[IDX_C10HM] - k[4013]*y_cur[IDX_C2M] - + k[4048]*y_cur[IDX_C2HM] - k[4083]*y_cur[IDX_C3M] - + k[4118]*y_cur[IDX_C3HM] - k[4153]*y_cur[IDX_C3NM] - + k[4188]*y_cur[IDX_C4M] - k[4223]*y_cur[IDX_C4HM] - + k[4258]*y_cur[IDX_C5M] - k[4293]*y_cur[IDX_C5HM] - + k[4328]*y_cur[IDX_C5NM] - k[4363]*y_cur[IDX_C6M] - + k[4398]*y_cur[IDX_C6HM] - k[4433]*y_cur[IDX_C7M] - + k[4468]*y_cur[IDX_C7HM] - k[4503]*y_cur[IDX_C8M] - + k[4538]*y_cur[IDX_C8HM] - k[4573]*y_cur[IDX_C9M] - + k[4608]*y_cur[IDX_C9HM] - k[4643]*y_cur[IDX_CHM] - + k[4678]*y_cur[IDX_CNM] - k[4714]*y_cur[IDX_HM] - + k[4749]*y_cur[IDX_OM] - k[4784]*y_cur[IDX_O2M] - + k[4819]*y_cur[IDX_OHM] - k[4854]*y_cur[IDX_SM] - + k[5581]*y_cur[IDX_NI] - k[5621]*y_cur[IDX_eM] - + k[6319]*y_cur[IDX_GRAINM]; + data[jistart + 12273] = 0.0 - k[544]*y_cur[IDX_NII]; + data[jistart + 12274] = 0.0 + k[3274]*y_cur[IDX_HeII]; + data[jistart + 12275] = 0.0 - k[561]*y_cur[IDX_NII] - k[3357]*y_cur[IDX_NII] - + k[3358]*y_cur[IDX_NII]; + data[jistart + 12276] = 0.0 - k[553]*y_cur[IDX_NII] - k[3347]*y_cur[IDX_NII] - + k[3348]*y_cur[IDX_NII] - k[3349]*y_cur[IDX_NII]; + data[jistart + 12277] = 0.0 - k[560]*y_cur[IDX_NII] + k[3287]*y_cur[IDX_HeII] - + k[3356]*y_cur[IDX_NII]; + data[jistart + 12278] = 0.0 - k[555]*y_cur[IDX_NII] - k[3350]*y_cur[IDX_NII]; + data[jistart + 12279] = 0.0 - k[546]*y_cur[IDX_NII] - k[3340]*y_cur[IDX_NII] - + k[3341]*y_cur[IDX_NII] - k[3342]*y_cur[IDX_NII]; + data[jistart + 12280] = 0.0 - k[543]*y_cur[IDX_NII]; + data[jistart + 12281] = 0.0 - k[551]*y_cur[IDX_NII] - k[3345]*y_cur[IDX_NII] - + k[3346]*y_cur[IDX_NII]; + data[jistart + 12282] = 0.0 - k[554]*y_cur[IDX_NII] + k[3246]*y_cur[IDX_HeII]; + data[jistart + 12283] = 0.0 - k[292]*y_cur[IDX_NII] - k[2256]*y_cur[IDX_NII]; + data[jistart + 12284] = 0.0 - k[542]*y_cur[IDX_NII]; + data[jistart + 12285] = 0.0 - k[563]*y_cur[IDX_NII]; + data[jistart + 12286] = 0.0 - k[558]*y_cur[IDX_NII] - k[3353]*y_cur[IDX_NII] - + k[3354]*y_cur[IDX_NII]; + data[jistart + 12287] = 0.0 - k[547]*y_cur[IDX_NII] + k[3203]*y_cur[IDX_HeII]; + data[jistart + 12288] = 0.0 + k[573]*y_cur[IDX_N2II] - k[5581]*y_cur[IDX_NII] + k[5684] + + k[5880] + k[6300]; + data[jistart + 12289] = 0.0 + k[3203]*y_cur[IDX_CNI] + k[3246]*y_cur[IDX_HCNI] + + k[3274]*y_cur[IDX_N2I] + k[3278]*y_cur[IDX_N2OI] + + k[3280]*y_cur[IDX_NH2I] + k[3285]*y_cur[IDX_NHI] + + k[3287]*y_cur[IDX_NOI] + k[3289]*y_cur[IDX_NSI]; + data[jistart + 12290] = 0.0 - k[552]*y_cur[IDX_NII]; + data[jistart + 12291] = 0.0 - k[549]*y_cur[IDX_NII] - k[3344]*y_cur[IDX_NII]; + data[jistart + 12292] = 0.0 - k[6319]*y_cur[IDX_NII]; + data[jistart + 12293] = 0.0 - k[2459]*y_cur[IDX_NII]; + data[jistart + 12294] = 0.0 - k[5621]*y_cur[IDX_NII]; + data[jistart + 12295] = 0.0 + k[1196]*y_cur[IDX_eM] + k[6814]*y_cur[IDX_GRAINM]; + data[jistart + 12296] = 0.0 + k[3313]*y_cur[IDX_HeII]; + data[jistart + 12297] = 0.0 + k[7127] + k[7309] + k[7491]; + data[jistart + 12298] = 0.0 + k[1234]*y_cur[IDX_eM] + k[6761]*y_cur[IDX_GRAINM]; + data[jistart + 12299] = 0.0 + k[8663]*y_cur[IDX_GCI]; + data[jistart + 12300] = 0.0 + k[3065]*y_cur[IDX_HeII]; + data[jistart + 12301] = 0.0 + k[8610]*y_cur[IDX_GHI]; + data[jistart + 12302] = 0.0 + k[8719]*y_cur[IDX_GCHI]; + data[jistart + 12303] = 0.0 - k[1827]*y_cur[IDX_C3HI]; + data[jistart + 12304] = 0.0 + k[5834] + k[6150]; + data[jistart + 12305] = 0.0 + k[5740] + k[6025]; + data[jistart + 12306] = 0.0 - k[1826]*y_cur[IDX_C3HI]; + data[jistart + 12307] = 0.0 + k[5719] + k[6003]; + data[jistart + 12308] = 0.0 + k[4101]*y_cur[IDX_C3HM]; + data[jistart + 12309] = 0.0 - k[1822]*y_cur[IDX_C3HI] - k[1823]*y_cur[IDX_C3HI]; + data[jistart + 12310] = 0.0 + k[4104]*y_cur[IDX_C3HM]; + data[jistart + 12311] = 0.0 + k[4130]*y_cur[IDX_C3HM]; + data[jistart + 12312] = 0.0 + k[39]*y_cur[IDX_CI]; + data[jistart + 12313] = 0.0 + k[115]*y_cur[IDX_NI] + k[3404]*y_cur[IDX_NI]; + data[jistart + 12314] = 0.0 + k[4111]*y_cur[IDX_C3HM]; + data[jistart + 12315] = 0.0 + k[4096]*y_cur[IDX_CII] + k[4097]*y_cur[IDX_C2H2II] + + k[4098]*y_cur[IDX_C2H3II] + k[4099]*y_cur[IDX_C4H2II] + + k[4100]*y_cur[IDX_C4H3II] + k[4101]*y_cur[IDX_C4SII] + + k[4102]*y_cur[IDX_CH2CCHII] + k[4103]*y_cur[IDX_CH3II] + + k[4104]*y_cur[IDX_CNCII] + k[4105]*y_cur[IDX_FeII] + + k[4106]*y_cur[IDX_HII] + k[4107]*y_cur[IDX_H2COII] + + k[4108]*y_cur[IDX_H2SII] + k[4109]*y_cur[IDX_H3II] + + k[4110]*y_cur[IDX_H3OII] + k[4111]*y_cur[IDX_HC2SII] + + k[4112]*y_cur[IDX_HCNHII] + k[4113]*y_cur[IDX_HCNHII] + + k[4114]*y_cur[IDX_HCOII] + k[4115]*y_cur[IDX_HCOII] + + k[4116]*y_cur[IDX_HeII] + k[4117]*y_cur[IDX_MgII] + + k[4118]*y_cur[IDX_NII] + k[4119]*y_cur[IDX_N2HII] + + k[4120]*y_cur[IDX_NH3II] + k[4121]*y_cur[IDX_NH4II] + + k[4122]*y_cur[IDX_NOII] + k[4123]*y_cur[IDX_NaII] + + k[4124]*y_cur[IDX_OII] + k[4125]*y_cur[IDX_SII] + + k[4126]*y_cur[IDX_SOII] + k[4127]*y_cur[IDX_SiII] + + k[4128]*y_cur[IDX_SiOII] + k[4129]*y_cur[IDX_SiOHII] + + k[4130]*y_cur[IDX_SiSII] + k[5718] + k[6002]; + data[jistart + 12316] = 0.0 + k[3421]*y_cur[IDX_NI]; + data[jistart + 12317] = 0.0 + k[600]*y_cur[IDX_NH3I] + k[621]*y_cur[IDX_NOI]; + data[jistart + 12318] = 0.0 - k[1820]*y_cur[IDX_C3HI] - k[1821]*y_cur[IDX_C3HI]; + data[jistart + 12319] = 0.0 + k[89]*y_cur[IDX_HI]; + data[jistart + 12320] = 0.0 + k[4128]*y_cur[IDX_C3HM]; + data[jistart + 12321] = 0.0 + k[8719]*y_cur[IDX_GC2I]; + data[jistart + 12322] = 0.0 + k[4129]*y_cur[IDX_C3HM]; + data[jistart + 12323] = 0.0 + k[795]*y_cur[IDX_eM] - k[1819]*y_cur[IDX_C3HI] + + k[6465]*y_cur[IDX_GRAINM]; + data[jistart + 12324] = 0.0 + k[4105]*y_cur[IDX_C3HM]; + data[jistart + 12325] = 0.0 + k[4117]*y_cur[IDX_C3HM]; + data[jistart + 12326] = 0.0 + k[4123]*y_cur[IDX_C3HM]; + data[jistart + 12327] = 0.0 + k[8663]*y_cur[IDX_GC2HI]; + data[jistart + 12328] = 0.0 - k[1651]*y_cur[IDX_C3HI] - k[1652]*y_cur[IDX_C3HI]; + data[jistart + 12329] = 0.0 - k[1825]*y_cur[IDX_C3HI] + k[4100]*y_cur[IDX_C3HM]; + data[jistart + 12330] = 0.0 + k[4119]*y_cur[IDX_C3HM]; + data[jistart + 12331] = 0.0 + k[5783] + k[6084]; + data[jistart + 12332] = 0.0 + k[4126]*y_cur[IDX_C3HM]; + data[jistart + 12333] = 0.0 - k[1828]*y_cur[IDX_C3HI] - k[1829]*y_cur[IDX_C3HI] + + k[4102]*y_cur[IDX_C3HM]; + data[jistart + 12334] = 0.0 + k[5752] + k[6039]; + data[jistart + 12335] = 0.0 + k[5743] + k[6028]; + data[jistart + 12336] = 0.0 + k[4108]*y_cur[IDX_C3HM]; + data[jistart + 12337] = 0.0 + k[4118]*y_cur[IDX_C3HM]; + data[jistart + 12338] = 0.0 - k[335]*y_cur[IDX_HII] - k[1312]*y_cur[IDX_CII] - + k[1487]*y_cur[IDX_C2H2II] - k[1488]*y_cur[IDX_C2H2II] - + k[1583]*y_cur[IDX_C2H3II] - k[1584]*y_cur[IDX_C2H3II] - + k[1585]*y_cur[IDX_C2H3II] - k[1651]*y_cur[IDX_C2H4II] - + k[1652]*y_cur[IDX_C2H4II] - k[1819]*y_cur[IDX_C3H2II] - + k[1820]*y_cur[IDX_C3H3II] - k[1821]*y_cur[IDX_C3H3II] - + k[1822]*y_cur[IDX_C4HII] - k[1823]*y_cur[IDX_C4HII] - + k[1824]*y_cur[IDX_C4H2II] - k[1825]*y_cur[IDX_C4H3II] - + k[1826]*y_cur[IDX_C5H2II] - k[1827]*y_cur[IDX_C6H2II] - + k[1828]*y_cur[IDX_CH2CCHII] - k[1829]*y_cur[IDX_CH2CCHII] - + k[2051]*y_cur[IDX_CH3II] - k[2301]*y_cur[IDX_HII] - + k[2603]*y_cur[IDX_H3II] - k[2773]*y_cur[IDX_H3OII] - + k[2908]*y_cur[IDX_HCOII] - k[3097]*y_cur[IDX_HeII] - + k[3821]*y_cur[IDX_SII] - k[3861]*y_cur[IDX_SiII] - + k[4920]*y_cur[IDX_CI] - k[5233]*y_cur[IDX_NI] - + k[5357]*y_cur[IDX_OI] - k[5592]*y_cur[IDX_eM] - k[5720] - k[6004] - + k[6945]; + data[jistart + 12339] = 0.0 + k[4107]*y_cur[IDX_C3HM]; + data[jistart + 12340] = 0.0 + k[5362]*y_cur[IDX_OI]; + data[jistart + 12341] = 0.0 + k[4122]*y_cur[IDX_C3HM]; + data[jistart + 12342] = 0.0 + k[4124]*y_cur[IDX_C3HM]; + data[jistart + 12343] = 0.0 - k[1824]*y_cur[IDX_C3HI] + k[4099]*y_cur[IDX_C3HM]; + data[jistart + 12344] = 0.0 + k[4112]*y_cur[IDX_C3HM] + k[4113]*y_cur[IDX_C3HM]; + data[jistart + 12345] = 0.0 + k[4120]*y_cur[IDX_C3HM]; + data[jistart + 12346] = 0.0 + k[4121]*y_cur[IDX_C3HM]; + data[jistart + 12347] = 0.0 - k[3861]*y_cur[IDX_C3HI] + k[4127]*y_cur[IDX_C3HM]; + data[jistart + 12348] = 0.0 - k[3821]*y_cur[IDX_C3HI] + k[4125]*y_cur[IDX_C3HM]; + data[jistart + 12349] = 0.0 - k[1583]*y_cur[IDX_C3HI] - k[1584]*y_cur[IDX_C3HI] - + k[1585]*y_cur[IDX_C3HI] + k[4098]*y_cur[IDX_C3HM]; + data[jistart + 12350] = 0.0 + k[621]*y_cur[IDX_C3HII]; + data[jistart + 12351] = 0.0 + k[600]*y_cur[IDX_C3HII]; + data[jistart + 12352] = 0.0 - k[1487]*y_cur[IDX_C3HI] - k[1488]*y_cur[IDX_C3HI] + + k[4097]*y_cur[IDX_C3HM]; + data[jistart + 12353] = 0.0 - k[2051]*y_cur[IDX_C3HI] + k[4103]*y_cur[IDX_C3HM]; + data[jistart + 12354] = 0.0 + k[4912]*y_cur[IDX_CI]; + data[jistart + 12355] = 0.0 + k[8610]*y_cur[IDX_GC3I]; + data[jistart + 12356] = 0.0 + k[115]*y_cur[IDX_C4HM] + k[3404]*y_cur[IDX_C4HM] + + k[3421]*y_cur[IDX_C6HM] - k[5233]*y_cur[IDX_C3HI]; + data[jistart + 12357] = 0.0 - k[2773]*y_cur[IDX_C3HI] + k[4110]*y_cur[IDX_C3HM]; + data[jistart + 12358] = 0.0 - k[5357]*y_cur[IDX_C3HI] + k[5362]*y_cur[IDX_C4HI]; + data[jistart + 12359] = 0.0 + k[3065]*y_cur[IDX_C10H2I] - k[3097]*y_cur[IDX_C3HI] + + k[3313]*y_cur[IDX_SiC3HI] + k[4116]*y_cur[IDX_C3HM]; + data[jistart + 12360] = 0.0 - k[1312]*y_cur[IDX_C3HI] + k[4096]*y_cur[IDX_C3HM]; + data[jistart + 12361] = 0.0 - k[335]*y_cur[IDX_C3HI] - k[2301]*y_cur[IDX_C3HI] + + k[4106]*y_cur[IDX_C3HM]; + data[jistart + 12362] = 0.0 + k[39]*y_cur[IDX_C2HM] + k[4912]*y_cur[IDX_C2H2I] - + k[4920]*y_cur[IDX_C3HI]; + data[jistart + 12363] = 0.0 - k[2908]*y_cur[IDX_C3HI] + k[4114]*y_cur[IDX_C3HM] + + k[4115]*y_cur[IDX_C3HM]; + data[jistart + 12364] = 0.0 - k[2603]*y_cur[IDX_C3HI] + k[4109]*y_cur[IDX_C3HM]; + data[jistart + 12365] = 0.0 + k[6465]*y_cur[IDX_C3H2II] + k[6761]*y_cur[IDX_SiC3HII] + + k[6814]*y_cur[IDX_PC4HII]; + data[jistart + 12366] = 0.0 + k[795]*y_cur[IDX_C3H2II] + k[1196]*y_cur[IDX_PC4HII] + + k[1234]*y_cur[IDX_SiC3HII] - k[5592]*y_cur[IDX_C3HI]; + data[jistart + 12367] = 0.0 + k[89]*y_cur[IDX_C3M]; + data[jistart + 12368] = 0.0 + k[5632]*y_cur[IDX_HeII]; + data[jistart + 12369] = 0.0 + k[3011]*y_cur[IDX_HCOI]; + data[jistart + 12370] = 0.0 + k[280]*y_cur[IDX_H2COI]; + data[jistart + 12371] = 0.0 + k[3008]*y_cur[IDX_HCOI]; + data[jistart + 12372] = 0.0 + k[300]*y_cur[IDX_H2COI]; + data[jistart + 12373] = 0.0 + k[566]*y_cur[IDX_H2COI]; + data[jistart + 12374] = 0.0 + k[2857]*y_cur[IDX_HCOI]; + data[jistart + 12375] = 0.0 + k[574]*y_cur[IDX_H2COI] + k[3494]*y_cur[IDX_HCOI]; + data[jistart + 12376] = 0.0 - k[4773]*y_cur[IDX_H2COII]; + data[jistart + 12377] = 0.0 - k[4632]*y_cur[IDX_H2COII]; + data[jistart + 12378] = 0.0 + k[446]*y_cur[IDX_H2COI]; + data[jistart + 12379] = 0.0 + k[3520]*y_cur[IDX_HCOI]; + data[jistart + 12380] = 0.0 - k[4843]*y_cur[IDX_H2COII]; + data[jistart + 12381] = 0.0 - k[4037]*y_cur[IDX_H2COII]; + data[jistart + 12382] = 0.0 - k[4212]*y_cur[IDX_H2COII]; + data[jistart + 12383] = 0.0 + k[308]*y_cur[IDX_H2COI]; + data[jistart + 12384] = 0.0 + k[2230]*y_cur[IDX_HCOI]; + data[jistart + 12385] = 0.0 - k[4808]*y_cur[IDX_H2COII]; + data[jistart + 12386] = 0.0 - k[3967]*y_cur[IDX_H2COII]; + data[jistart + 12387] = 0.0 - k[4107]*y_cur[IDX_H2COII]; + data[jistart + 12388] = 0.0 - k[4387]*y_cur[IDX_H2COII]; + data[jistart + 12389] = 0.0 - k[4527]*y_cur[IDX_H2COII]; + data[jistart + 12390] = 0.0 - k[4457]*y_cur[IDX_H2COII]; + data[jistart + 12391] = 0.0 - k[4597]*y_cur[IDX_H2COII]; + data[jistart + 12392] = 0.0 - k[3932]*y_cur[IDX_H2COII]; + data[jistart + 12393] = 0.0 - k[4282]*y_cur[IDX_H2COII]; + data[jistart + 12394] = 0.0 - k[4317]*y_cur[IDX_H2COII]; + data[jistart + 12395] = 0.0 - k[3897]*y_cur[IDX_H2COII]; + data[jistart + 12396] = 0.0 - k[4738]*y_cur[IDX_H2COII]; + data[jistart + 12397] = 0.0 - k[4562]*y_cur[IDX_H2COII]; + data[jistart + 12398] = 0.0 - k[2487]*y_cur[IDX_H2COII] + k[3336]*y_cur[IDX_NII] + + k[3636]*y_cur[IDX_OII]; + data[jistart + 12399] = 0.0 - k[4703]*y_cur[IDX_H2COII]; + data[jistart + 12400] = 0.0 - k[4492]*y_cur[IDX_H2COII]; + data[jistart + 12401] = 0.0 - k[4002]*y_cur[IDX_H2COII]; + data[jistart + 12402] = 0.0 - k[4072]*y_cur[IDX_H2COII]; + data[jistart + 12403] = 0.0 - k[4177]*y_cur[IDX_H2COII]; + data[jistart + 12404] = 0.0 - k[4352]*y_cur[IDX_H2COII]; + data[jistart + 12405] = 0.0 - k[4247]*y_cur[IDX_H2COII]; + data[jistart + 12406] = 0.0 - k[4422]*y_cur[IDX_H2COII]; + data[jistart + 12407] = 0.0 - k[3535]*y_cur[IDX_H2COII]; + data[jistart + 12408] = 0.0 + k[1978]*y_cur[IDX_CO2I]; + data[jistart + 12409] = 0.0 + k[688]*y_cur[IDX_H2COI] + k[3783]*y_cur[IDX_HCOI]; + data[jistart + 12410] = 0.0 + k[468]*y_cur[IDX_H2COI] + k[2514]*y_cur[IDX_HCOI]; + data[jistart + 12411] = 0.0 - k[4142]*y_cur[IDX_H2COII]; + data[jistart + 12412] = 0.0 + k[1951]*y_cur[IDX_H2OI]; + data[jistart + 12413] = 0.0 + k[1978]*y_cur[IDX_CH2II]; + data[jistart + 12414] = 0.0 + k[461]*y_cur[IDX_H2COI] + k[2014]*y_cur[IDX_CH2I]; + data[jistart + 12415] = 0.0 - k[459]*y_cur[IDX_H2COII]; + data[jistart + 12416] = 0.0 - k[531]*y_cur[IDX_H2COII]; + data[jistart + 12417] = 0.0 - k[635]*y_cur[IDX_H2COII]; + data[jistart + 12418] = 0.0 - k[3611]*y_cur[IDX_H2COII]; + data[jistart + 12419] = 0.0 - k[4667]*y_cur[IDX_H2COII]; + data[jistart + 12420] = 0.0 + k[3009]*y_cur[IDX_HCOI]; + data[jistart + 12421] = 0.0 + k[551]*y_cur[IDX_H2COI] + k[3336]*y_cur[IDX_CH3OHI]; + data[jistart + 12422] = 0.0 - k[262]*y_cur[IDX_CH2I] - k[290]*y_cur[IDX_CHI] - + k[459]*y_cur[IDX_FeI] - k[460]*y_cur[IDX_SI] - + k[500]*y_cur[IDX_HCOI] - k[531]*y_cur[IDX_MgI] - + k[604]*y_cur[IDX_NH3I] - k[624]*y_cur[IDX_NOI] - + k[635]*y_cur[IDX_NaI] - k[718]*y_cur[IDX_SiI] - k[996]*y_cur[IDX_eM] + - k[997]*y_cur[IDX_eM] - k[998]*y_cur[IDX_eM] - k[999]*y_cur[IDX_eM] + - k[1457]*y_cur[IDX_C2I] - k[1744]*y_cur[IDX_C2HI] - + k[2002]*y_cur[IDX_CH2I] - k[2193]*y_cur[IDX_CH4I] - + k[2194]*y_cur[IDX_CH4I] - k[2246]*y_cur[IDX_CHI] - + k[2487]*y_cur[IDX_CH3OHI] - k[2488]*y_cur[IDX_H2COI] - + k[2489]*y_cur[IDX_O2I] - k[2490]*y_cur[IDX_SI] - + k[2542]*y_cur[IDX_H2OI] - k[2874]*y_cur[IDX_HCNI] - + k[3007]*y_cur[IDX_HCOI] - k[3038]*y_cur[IDX_HNCI] - + k[3535]*y_cur[IDX_NH2I] - k[3574]*y_cur[IDX_NH3I] - + k[3611]*y_cur[IDX_NHI] - k[3897]*y_cur[IDX_CM] - + k[3932]*y_cur[IDX_C10M] - k[3967]*y_cur[IDX_C10HM] - + k[4002]*y_cur[IDX_C2M] - k[4037]*y_cur[IDX_C2HM] - + k[4072]*y_cur[IDX_C3M] - k[4107]*y_cur[IDX_C3HM] - + k[4142]*y_cur[IDX_C3NM] - k[4177]*y_cur[IDX_C4M] - + k[4212]*y_cur[IDX_C4HM] - k[4247]*y_cur[IDX_C5M] - + k[4282]*y_cur[IDX_C5HM] - k[4317]*y_cur[IDX_C5NM] - + k[4352]*y_cur[IDX_C6M] - k[4387]*y_cur[IDX_C6HM] - + k[4422]*y_cur[IDX_C7M] - k[4457]*y_cur[IDX_C7HM] - + k[4492]*y_cur[IDX_C8M] - k[4527]*y_cur[IDX_C8HM] - + k[4562]*y_cur[IDX_C9M] - k[4597]*y_cur[IDX_C9HM] - + k[4632]*y_cur[IDX_CHM] - k[4667]*y_cur[IDX_CNM] - + k[4703]*y_cur[IDX_HM] - k[4738]*y_cur[IDX_OM] - + k[4773]*y_cur[IDX_O2M] - k[4808]*y_cur[IDX_OHM] - + k[4843]*y_cur[IDX_SM] - k[5616]*y_cur[IDX_eM] - + k[6398]*y_cur[IDX_GRAINM] - k[6399]*y_cur[IDX_GRAINM] - + k[6400]*y_cur[IDX_GRAINM] - k[6401]*y_cur[IDX_GRAINM]; + data[jistart + 12423] = 0.0 + k[655]*y_cur[IDX_H2COI] + k[3636]*y_cur[IDX_CH3OHI]; + data[jistart + 12424] = 0.0 - k[262]*y_cur[IDX_H2COII] - k[2002]*y_cur[IDX_H2COII] + + k[2014]*y_cur[IDX_O2II]; + data[jistart + 12425] = 0.0 - k[3038]*y_cur[IDX_H2COII]; + data[jistart + 12426] = 0.0 - k[2489]*y_cur[IDX_H2COII]; + data[jistart + 12427] = 0.0 - k[718]*y_cur[IDX_H2COII]; + data[jistart + 12428] = 0.0 - k[624]*y_cur[IDX_H2COII]; + data[jistart + 12429] = 0.0 - k[500]*y_cur[IDX_H2COII] + k[2230]*y_cur[IDX_CH5II] + + k[2514]*y_cur[IDX_H2OII] + k[2697]*y_cur[IDX_H3II] + + k[2857]*y_cur[IDX_HCNII] + k[2969]*y_cur[IDX_HCOII] - + k[3007]*y_cur[IDX_H2COII] + k[3008]*y_cur[IDX_HNOII] + + k[3009]*y_cur[IDX_N2HII] + k[3011]*y_cur[IDX_O2HII] + + k[3494]*y_cur[IDX_NHII] + k[3520]*y_cur[IDX_NH2II] + + k[3783]*y_cur[IDX_OHII]; + data[jistart + 12430] = 0.0 - k[2193]*y_cur[IDX_H2COII] - k[2194]*y_cur[IDX_H2COII]; + data[jistart + 12431] = 0.0 - k[1744]*y_cur[IDX_H2COII]; + data[jistart + 12432] = 0.0 + k[174]*y_cur[IDX_CII] + k[222]*y_cur[IDX_C2H2II] + + k[280]*y_cur[IDX_CH4II] + k[300]*y_cur[IDX_CNII] + + k[308]*y_cur[IDX_COII] + k[376]*y_cur[IDX_HII] + + k[446]*y_cur[IDX_H2II] + k[461]*y_cur[IDX_O2II] + + k[468]*y_cur[IDX_H2OII] + k[517]*y_cur[IDX_HeII] + + k[551]*y_cur[IDX_NII] + k[566]*y_cur[IDX_N2II] + + k[574]*y_cur[IDX_NHII] + k[655]*y_cur[IDX_OII] + + k[688]*y_cur[IDX_OHII] - k[2488]*y_cur[IDX_H2COII] + k[6154]; + data[jistart + 12433] = 0.0 - k[2874]*y_cur[IDX_H2COII]; + data[jistart + 12434] = 0.0 - k[290]*y_cur[IDX_H2COII] - k[2246]*y_cur[IDX_H2COII]; + data[jistart + 12435] = 0.0 - k[460]*y_cur[IDX_H2COII] - k[2490]*y_cur[IDX_H2COII]; + data[jistart + 12436] = 0.0 - k[1457]*y_cur[IDX_H2COII]; + data[jistart + 12437] = 0.0 + k[2093]*y_cur[IDX_CH3II]; + data[jistart + 12438] = 0.0 - k[604]*y_cur[IDX_H2COII] - k[3574]*y_cur[IDX_H2COII]; + data[jistart + 12439] = 0.0 + k[222]*y_cur[IDX_H2COI]; + data[jistart + 12440] = 0.0 + k[2090]*y_cur[IDX_OI] + k[2093]*y_cur[IDX_OHI]; + data[jistart + 12441] = 0.0 + k[2090]*y_cur[IDX_CH3II]; + data[jistart + 12442] = 0.0 + k[517]*y_cur[IDX_H2COI] + k[5632]*y_cur[IDX_CH3OI]; + data[jistart + 12443] = 0.0 + k[174]*y_cur[IDX_H2COI]; + data[jistart + 12444] = 0.0 + k[1951]*y_cur[IDX_CHII] - k[2542]*y_cur[IDX_H2COII]; + data[jistart + 12445] = 0.0 + k[376]*y_cur[IDX_H2COI]; + data[jistart + 12446] = 0.0 + k[2969]*y_cur[IDX_HCOI]; + data[jistart + 12447] = 0.0 + k[2697]*y_cur[IDX_HCOI]; + data[jistart + 12448] = 0.0 - k[6398]*y_cur[IDX_H2COII] - k[6399]*y_cur[IDX_H2COII] - + k[6400]*y_cur[IDX_H2COII] - k[6401]*y_cur[IDX_H2COII]; + data[jistart + 12449] = 0.0 - k[996]*y_cur[IDX_H2COII] - k[997]*y_cur[IDX_H2COII] - + k[998]*y_cur[IDX_H2COII] - k[999]*y_cur[IDX_H2COII] - + k[5616]*y_cur[IDX_H2COII]; + data[jistart + 12450] = 0.0 + k[817]*y_cur[IDX_eM] + k[6776]*y_cur[IDX_GRAINM]; + data[jistart + 12451] = 0.0 + k[5733] + k[6018]; + data[jistart + 12452] = 0.0 + k[5970] + k[5970] + k[5973]; + data[jistart + 12453] = 0.0 + k[737]*y_cur[IDX_eM] + k[6886]*y_cur[IDX_GRAINM]; + data[jistart + 12454] = 0.0 + k[6020]; + data[jistart + 12455] = 0.0 + k[863]*y_cur[IDX_eM] + k[6821]*y_cur[IDX_GRAINM]; + data[jistart + 12456] = 0.0 + k[3102]*y_cur[IDX_HeII]; + data[jistart + 12457] = 0.0 + k[731]*y_cur[IDX_eM] + k[6873]*y_cur[IDX_GRAINM]; + data[jistart + 12458] = 0.0 + k[4922]*y_cur[IDX_CI]; + data[jistart + 12459] = 0.0 + k[1557]*y_cur[IDX_C2H2I]; + data[jistart + 12460] = 0.0 + k[3064]*y_cur[IDX_HeII] + k[5960]; + data[jistart + 12461] = 0.0 + k[820]*y_cur[IDX_eM] + k[1549]*y_cur[IDX_C2H2I] + + k[6616]*y_cur[IDX_GRAINM]; + data[jistart + 12462] = 0.0 + k[7125] + k[7307] + k[7489]; + data[jistart + 12463] = 0.0 + k[838]*y_cur[IDX_eM] + k[6709]*y_cur[IDX_GRAINM]; + data[jistart + 12464] = 0.0 + k[3017]*y_cur[IDX_CII] + k[3033]*y_cur[IDX_HeII] + + k[5212]*y_cur[IDX_CI]; + data[jistart + 12465] = 0.0 + k[8662]*y_cur[IDX_GCI]; + data[jistart + 12466] = 0.0 + k[235]*y_cur[IDX_C2H4I]; + data[jistart + 12467] = 0.0 + k[6149]; + data[jistart + 12468] = 0.0 + k[837]*y_cur[IDX_eM] + k[4066]*y_cur[IDX_C3M] + + k[6817]*y_cur[IDX_GRAINM]; + data[jistart + 12469] = 0.0 + k[3699]*y_cur[IDX_OI]; + data[jistart + 12470] = 0.0 + k[4069]*y_cur[IDX_C3M]; + data[jistart + 12471] = 0.0 + k[4095]*y_cur[IDX_C3M]; + data[jistart + 12472] = 0.0 + k[4076]*y_cur[IDX_C3M]; + data[jistart + 12473] = 0.0 + k[3115]*y_cur[IDX_HeII] + k[5735] + k[6021]; + data[jistart + 12474] = 0.0 + k[790]*y_cur[IDX_eM] + k[3562]*y_cur[IDX_NH3I] + + k[6460]*y_cur[IDX_GRAINM]; + data[jistart + 12475] = 0.0 + k[3437]*y_cur[IDX_NI]; + data[jistart + 12476] = 0.0 - k[11]*y_cur[IDX_C3I] + k[38]*y_cur[IDX_CI]; + data[jistart + 12477] = 0.0 - k[17]*y_cur[IDX_C3I] + k[4061]*y_cur[IDX_CII] + + k[4062]*y_cur[IDX_C2H2II] + k[4063]*y_cur[IDX_C2H3II] + + k[4064]*y_cur[IDX_C4H2II] + k[4065]*y_cur[IDX_C4H3II] + + k[4066]*y_cur[IDX_C4SII] + k[4067]*y_cur[IDX_CH2CCHII] + + k[4068]*y_cur[IDX_CH3II] + k[4069]*y_cur[IDX_CNCII] + + k[4070]*y_cur[IDX_FeII] + k[4071]*y_cur[IDX_HII] + + k[4072]*y_cur[IDX_H2COII] + k[4073]*y_cur[IDX_H2SII] + + k[4074]*y_cur[IDX_H3II] + k[4075]*y_cur[IDX_H3OII] + + k[4076]*y_cur[IDX_HC2SII] + k[4077]*y_cur[IDX_HCNHII] + + k[4078]*y_cur[IDX_HCNHII] + k[4079]*y_cur[IDX_HCOII] + + k[4080]*y_cur[IDX_HCOII] + k[4081]*y_cur[IDX_HeII] + + k[4082]*y_cur[IDX_MgII] + k[4083]*y_cur[IDX_NII] + + k[4084]*y_cur[IDX_N2HII] + k[4085]*y_cur[IDX_NH3II] + + k[4086]*y_cur[IDX_NH4II] + k[4087]*y_cur[IDX_NOII] + + k[4088]*y_cur[IDX_NaII] + k[4089]*y_cur[IDX_OII] + + k[4090]*y_cur[IDX_SII] + k[4091]*y_cur[IDX_SOII] + + k[4092]*y_cur[IDX_SiII] + k[4093]*y_cur[IDX_SiOII] + + k[4094]*y_cur[IDX_SiOHII] + k[4095]*y_cur[IDX_SiSII] + k[5716] + + k[6000]; + data[jistart + 12478] = 0.0 - k[23]*y_cur[IDX_C3I] + k[3402]*y_cur[IDX_NI]; + data[jistart + 12479] = 0.0 - k[32]*y_cur[IDX_C3I] + k[3418]*y_cur[IDX_NI]; + data[jistart + 12480] = 0.0 - k[28]*y_cur[IDX_C3I]; + data[jistart + 12481] = 0.0 - k[35]*y_cur[IDX_C3I]; + data[jistart + 12482] = 0.0 + k[4093]*y_cur[IDX_C3M]; + data[jistart + 12483] = 0.0 + k[4094]*y_cur[IDX_C3M]; + data[jistart + 12484] = 0.0 + k[793]*y_cur[IDX_eM] + k[794]*y_cur[IDX_eM] + + k[6463]*y_cur[IDX_GRAINM] + k[6464]*y_cur[IDX_GRAINM]; + data[jistart + 12485] = 0.0 + k[4921]*y_cur[IDX_CI]; + data[jistart + 12486] = 0.0 + k[3067]*y_cur[IDX_HeII] + k[3069]*y_cur[IDX_HeII] + + k[3071]*y_cur[IDX_HeII] + k[5965] + k[5966]; + data[jistart + 12487] = 0.0 + k[4070]*y_cur[IDX_C3M]; + data[jistart + 12488] = 0.0 + k[4082]*y_cur[IDX_C3M]; + data[jistart + 12489] = 0.0 + k[4088]*y_cur[IDX_C3M]; + data[jistart + 12490] = 0.0 + k[3057]*y_cur[IDX_HeII] + k[3059]*y_cur[IDX_HeII] + k[5951]; + data[jistart + 12491] = 0.0 + k[4934]*y_cur[IDX_CI]; + data[jistart + 12492] = 0.0 + k[8662]*y_cur[IDX_GC2I]; + data[jistart + 12493] = 0.0 + k[4926]*y_cur[IDX_CI] + k[4926]*y_cur[IDX_CI] + k[5737] + + k[6023]; + data[jistart + 12494] = 0.0 + k[4931]*y_cur[IDX_CI]; + data[jistart + 12495] = 0.0 + k[3107]*y_cur[IDX_HeII] + k[4923]*y_cur[IDX_CI] + + k[5235]*y_cur[IDX_NI] + k[5361]*y_cur[IDX_OI] + k[5728] + k[6012]; + data[jistart + 12496] = 0.0 + k[4065]*y_cur[IDX_C3M]; + data[jistart + 12497] = 0.0 + k[4084]*y_cur[IDX_C3M]; + data[jistart + 12498] = 0.0 + k[4091]*y_cur[IDX_C3M]; + data[jistart + 12499] = 0.0 + k[4067]*y_cur[IDX_C3M]; + data[jistart + 12500] = 0.0 + k[5752] + k[6039]; + data[jistart + 12501] = 0.0 + k[5742] + k[6027]; + data[jistart + 12502] = 0.0 + k[4073]*y_cur[IDX_C3M]; + data[jistart + 12503] = 0.0 + k[4083]*y_cur[IDX_C3M]; + data[jistart + 12504] = 0.0 + k[5720] + k[6004]; + data[jistart + 12505] = 0.0 + k[4072]*y_cur[IDX_C3M]; + data[jistart + 12506] = 0.0 - k[11]*y_cur[IDX_C2M] - k[17]*y_cur[IDX_C3M] - + k[23]*y_cur[IDX_C4M] - k[28]*y_cur[IDX_C5M] - k[32]*y_cur[IDX_C6M] - + k[35]*y_cur[IDX_C7M] - k[333]*y_cur[IDX_HII] - + k[2601]*y_cur[IDX_H3II] - k[2771]*y_cur[IDX_H3OII] - + k[2906]*y_cur[IDX_HCOII] - k[3095]*y_cur[IDX_HeII] - + k[5231]*y_cur[IDX_NI] - k[5356]*y_cur[IDX_OI] - + k[5496]*y_cur[IDX_CII] - k[5522]*y_cur[IDX_CI] - + k[5591]*y_cur[IDX_eM] - k[5717] - k[6001] - k[6943]; + data[jistart + 12507] = 0.0 + k[4087]*y_cur[IDX_C3M]; + data[jistart + 12508] = 0.0 + k[4089]*y_cur[IDX_C3M]; + data[jistart + 12509] = 0.0 + k[3407]*y_cur[IDX_NI] + k[4064]*y_cur[IDX_C3M]; + data[jistart + 12510] = 0.0 + k[4077]*y_cur[IDX_C3M] + k[4078]*y_cur[IDX_C3M]; + data[jistart + 12511] = 0.0 + k[4085]*y_cur[IDX_C3M]; + data[jistart + 12512] = 0.0 + k[235]*y_cur[IDX_C3II]; + data[jistart + 12513] = 0.0 + k[4086]*y_cur[IDX_C3M]; + data[jistart + 12514] = 0.0 + k[4092]*y_cur[IDX_C3M]; + data[jistart + 12515] = 0.0 + k[4090]*y_cur[IDX_C3M]; + data[jistart + 12516] = 0.0 + k[4063]*y_cur[IDX_C3M]; + data[jistart + 12517] = 0.0 + k[4916]*y_cur[IDX_CI]; + data[jistart + 12518] = 0.0 + k[5521]*y_cur[IDX_CI]; + data[jistart + 12519] = 0.0 + k[3562]*y_cur[IDX_C3HII]; + data[jistart + 12520] = 0.0 + k[4062]*y_cur[IDX_C3M]; + data[jistart + 12521] = 0.0 + k[4068]*y_cur[IDX_C3M]; + data[jistart + 12522] = 0.0 + k[1549]*y_cur[IDX_C4II] + k[1557]*y_cur[IDX_C6II] + + k[4911]*y_cur[IDX_CI]; + data[jistart + 12523] = 0.0 + k[3402]*y_cur[IDX_C4M] + k[3407]*y_cur[IDX_C4H2II] + + k[3418]*y_cur[IDX_C6M] + k[3437]*y_cur[IDX_C8M] - + k[5231]*y_cur[IDX_C3I] + k[5235]*y_cur[IDX_C4I]; + data[jistart + 12524] = 0.0 - k[2771]*y_cur[IDX_C3I] + k[4075]*y_cur[IDX_C3M]; + data[jistart + 12525] = 0.0 + k[3699]*y_cur[IDX_C4HII] - k[5356]*y_cur[IDX_C3I] + + k[5361]*y_cur[IDX_C4I]; + data[jistart + 12526] = 0.0 + k[3033]*y_cur[IDX_HNC3I] + k[3057]*y_cur[IDX_C10I] + + k[3059]*y_cur[IDX_C10I] + k[3064]*y_cur[IDX_C10H2I] + + k[3067]*y_cur[IDX_C10HI] + k[3069]*y_cur[IDX_C10HI] + + k[3071]*y_cur[IDX_C10HI] - k[3095]*y_cur[IDX_C3I] + + k[3102]*y_cur[IDX_C3PI] + k[3107]*y_cur[IDX_C4I] + + k[3115]*y_cur[IDX_C4SI] + k[4081]*y_cur[IDX_C3M]; + data[jistart + 12527] = 0.0 + k[3017]*y_cur[IDX_HNC3I] + k[4061]*y_cur[IDX_C3M] - + k[5496]*y_cur[IDX_C3I]; + data[jistart + 12528] = 0.0 - k[333]*y_cur[IDX_C3I] + k[4071]*y_cur[IDX_C3M]; + data[jistart + 12529] = 0.0 + k[38]*y_cur[IDX_C2M] + k[4911]*y_cur[IDX_C2H2I] + + k[4916]*y_cur[IDX_C2HI] + k[4921]*y_cur[IDX_C3NI] + + k[4922]*y_cur[IDX_C3OI] + k[4923]*y_cur[IDX_C4I] + + k[4926]*y_cur[IDX_C5I] + k[4926]*y_cur[IDX_C5I] + + k[4931]*y_cur[IDX_C6I] + k[4934]*y_cur[IDX_C7I] + + k[5212]*y_cur[IDX_HNC3I] + k[5521]*y_cur[IDX_C2I] - + k[5522]*y_cur[IDX_C3I]; + data[jistart + 12530] = 0.0 - k[2906]*y_cur[IDX_C3I] + k[4079]*y_cur[IDX_C3M] + + k[4080]*y_cur[IDX_C3M]; + data[jistart + 12531] = 0.0 - k[2601]*y_cur[IDX_C3I] + k[4074]*y_cur[IDX_C3M]; + data[jistart + 12532] = 0.0 + k[6460]*y_cur[IDX_C3HII] + k[6463]*y_cur[IDX_C3H2II] + + k[6464]*y_cur[IDX_C3H2II] + k[6616]*y_cur[IDX_C4II] + + k[6709]*y_cur[IDX_C5II] + k[6776]*y_cur[IDX_C3SII] + + k[6817]*y_cur[IDX_C4SII] + k[6821]*y_cur[IDX_C7II] + + k[6873]*y_cur[IDX_C10HII] + k[6886]*y_cur[IDX_C11II]; + data[jistart + 12533] = 0.0 + k[731]*y_cur[IDX_C10HII] + k[737]*y_cur[IDX_C11II] + + k[790]*y_cur[IDX_C3HII] + k[793]*y_cur[IDX_C3H2II] + + k[794]*y_cur[IDX_C3H2II] + k[817]*y_cur[IDX_C3SII] + + k[820]*y_cur[IDX_C4II] + k[837]*y_cur[IDX_C4SII] + + k[838]*y_cur[IDX_C5II] + k[863]*y_cur[IDX_C7II] - + k[5591]*y_cur[IDX_C3I]; + data[jistart + 12534] = 0.0 + k[827]*y_cur[IDX_eM] + k[6645]*y_cur[IDX_GRAINM]; + data[jistart + 12535] = 0.0 + k[1082]*y_cur[IDX_eM] + k[1083]*y_cur[IDX_eM] + + k[6794]*y_cur[IDX_GRAINM] + k[6795]*y_cur[IDX_GRAINM]; + data[jistart + 12536] = 0.0 + k[8668]*y_cur[IDX_GCI]; + data[jistart + 12537] = 0.0 + k[7178] + k[7360] + k[7542]; + data[jistart + 12538] = 0.0 + k[8629]*y_cur[IDX_GHI]; + data[jistart + 12539] = 0.0 + k[5797] + k[6101]; + data[jistart + 12540] = 0.0 + k[8724]*y_cur[IDX_GCHI]; + data[jistart + 12541] = 0.0 + k[5850] + k[6175]; + data[jistart + 12542] = 0.0 + k[839]*y_cur[IDX_eM] + k[6721]*y_cur[IDX_GRAINM]; + data[jistart + 12543] = 0.0 - k[4908]*y_cur[IDX_C4HI]; + data[jistart + 12544] = 0.0 + k[4959]*y_cur[IDX_CI]; + data[jistart + 12545] = 0.0 + k[5750]; + data[jistart + 12546] = 0.0 - k[1845]*y_cur[IDX_C4HI] + k[3706]*y_cur[IDX_OI]; + data[jistart + 12547] = 0.0 - k[5022]*y_cur[IDX_C4HI] - k[5023]*y_cur[IDX_C4HI]; + data[jistart + 12548] = 0.0 - k[5052]*y_cur[IDX_C4HI]; + data[jistart + 12549] = 0.0 + k[4919]*y_cur[IDX_CI]; + data[jistart + 12550] = 0.0 + k[4206]*y_cur[IDX_C4HM]; + data[jistart + 12551] = 0.0 - k[5053]*y_cur[IDX_C4HI] - k[5054]*y_cur[IDX_C4HI]; + data[jistart + 12552] = 0.0 - k[1830]*y_cur[IDX_C4HI] - k[1831]*y_cur[IDX_C4HI]; + data[jistart + 12553] = 0.0 + k[4209]*y_cur[IDX_C4HM]; + data[jistart + 12554] = 0.0 + k[4235]*y_cur[IDX_C4HM]; + data[jistart + 12555] = 0.0 + k[4201]*y_cur[IDX_CII] + k[4202]*y_cur[IDX_C2H2II] + + k[4203]*y_cur[IDX_C2H3II] + k[4204]*y_cur[IDX_C4H2II] + + k[4205]*y_cur[IDX_C4H3II] + k[4206]*y_cur[IDX_C4SII] + + k[4207]*y_cur[IDX_CH2CCHII] + k[4208]*y_cur[IDX_CH3II] + + k[4209]*y_cur[IDX_CNCII] + k[4210]*y_cur[IDX_FeII] + + k[4211]*y_cur[IDX_HII] + k[4212]*y_cur[IDX_H2COII] + + k[4213]*y_cur[IDX_H2SII] + k[4214]*y_cur[IDX_H3II] + + k[4215]*y_cur[IDX_H3OII] + k[4216]*y_cur[IDX_HC2SII] + + k[4217]*y_cur[IDX_HCNHII] + k[4218]*y_cur[IDX_HCNHII] + + k[4219]*y_cur[IDX_HCOII] + k[4220]*y_cur[IDX_HCOII] + + k[4221]*y_cur[IDX_HeII] + k[4222]*y_cur[IDX_MgII] + + k[4223]*y_cur[IDX_NII] + k[4224]*y_cur[IDX_N2HII] + + k[4225]*y_cur[IDX_NH3II] + k[4226]*y_cur[IDX_NH4II] + + k[4227]*y_cur[IDX_NOII] + k[4228]*y_cur[IDX_NaII] + + k[4229]*y_cur[IDX_OII] + k[4230]*y_cur[IDX_SII] + + k[4231]*y_cur[IDX_SOII] + k[4232]*y_cur[IDX_SiII] + + k[4233]*y_cur[IDX_SiOII] + k[4234]*y_cur[IDX_SiOHII] + + k[4235]*y_cur[IDX_SiSII] + k[5729] + k[6013]; + data[jistart + 12556] = 0.0 - k[5050]*y_cur[IDX_C4HI] - k[5051]*y_cur[IDX_C4HI]; + data[jistart + 12557] = 0.0 + k[4216]*y_cur[IDX_C4HM]; + data[jistart + 12558] = 0.0 + k[41]*y_cur[IDX_CI]; + data[jistart + 12559] = 0.0 + k[3430]*y_cur[IDX_NI]; + data[jistart + 12560] = 0.0 + k[3413]*y_cur[IDX_NI]; + data[jistart + 12561] = 0.0 - k[1796]*y_cur[IDX_C4HI] - k[1797]*y_cur[IDX_C4HI]; + data[jistart + 12562] = 0.0 + k[92]*y_cur[IDX_HI]; + data[jistart + 12563] = 0.0 + k[4233]*y_cur[IDX_C4HM]; + data[jistart + 12564] = 0.0 + k[8724]*y_cur[IDX_GC3I]; + data[jistart + 12565] = 0.0 + k[4234]*y_cur[IDX_C4HM]; + data[jistart + 12566] = 0.0 + k[5730] + k[6014]; + data[jistart + 12567] = 0.0 - k[1761]*y_cur[IDX_C4HI] - k[1762]*y_cur[IDX_C4HI]; + data[jistart + 12568] = 0.0 + k[4210]*y_cur[IDX_C4HM]; + data[jistart + 12569] = 0.0 + k[4222]*y_cur[IDX_C4HM]; + data[jistart + 12570] = 0.0 + k[4228]*y_cur[IDX_C4HM]; + data[jistart + 12571] = 0.0 + k[8668]*y_cur[IDX_GC3HI]; + data[jistart + 12572] = 0.0 - k[1653]*y_cur[IDX_C4HI] - k[1654]*y_cur[IDX_C4HI]; + data[jistart + 12573] = 0.0 + k[824]*y_cur[IDX_eM] - k[1844]*y_cur[IDX_C4HI] + + k[4205]*y_cur[IDX_C4HM] + k[6633]*y_cur[IDX_GRAINM]; + data[jistart + 12574] = 0.0 + k[4224]*y_cur[IDX_C4HM]; + data[jistart + 12575] = 0.0 + k[4231]*y_cur[IDX_C4HM]; + data[jistart + 12576] = 0.0 - k[2020]*y_cur[IDX_C4HI] - k[2021]*y_cur[IDX_C4HI] + + k[4207]*y_cur[IDX_C4HM]; + data[jistart + 12577] = 0.0 + k[5366]*y_cur[IDX_OI]; + data[jistart + 12578] = 0.0 + k[4213]*y_cur[IDX_C4HM]; + data[jistart + 12579] = 0.0 + k[4223]*y_cur[IDX_C4HM]; + data[jistart + 12580] = 0.0 + k[4212]*y_cur[IDX_C4HM]; + data[jistart + 12581] = 0.0 - k[340]*y_cur[IDX_HII] - k[1320]*y_cur[IDX_CII] - + k[1489]*y_cur[IDX_C2H2II] - k[1490]*y_cur[IDX_C2H2II] - + k[1586]*y_cur[IDX_C2H3II] - k[1587]*y_cur[IDX_C2H3II] - + k[1588]*y_cur[IDX_C2H3II] - k[1653]*y_cur[IDX_C2H4II] - + k[1654]*y_cur[IDX_C2H4II] - k[1761]*y_cur[IDX_C3H2II] - + k[1762]*y_cur[IDX_C3H2II] - k[1796]*y_cur[IDX_C3H3II] - + k[1797]*y_cur[IDX_C3H3II] - k[1830]*y_cur[IDX_C4HII] - + k[1831]*y_cur[IDX_C4HII] - k[1843]*y_cur[IDX_C4H2II] - + k[1844]*y_cur[IDX_C4H3II] - k[1845]*y_cur[IDX_C5H2II] - + k[2020]*y_cur[IDX_CH2CCHII] - k[2021]*y_cur[IDX_CH2CCHII] - + k[2052]*y_cur[IDX_CH3II] - k[2303]*y_cur[IDX_HII] - + k[2610]*y_cur[IDX_H3II] - k[2780]*y_cur[IDX_H3OII] - + k[2915]*y_cur[IDX_HCOII] - k[3111]*y_cur[IDX_HeII] - + k[3112]*y_cur[IDX_HeII] - k[3822]*y_cur[IDX_SII] - + k[3862]*y_cur[IDX_SiII] - k[4877]*y_cur[IDX_C2H2I] - + k[4884]*y_cur[IDX_C2H4I] - k[4907]*y_cur[IDX_HNCI] - + k[4908]*y_cur[IDX_NCCNI] - k[4925]*y_cur[IDX_CI] - + k[5022]*y_cur[IDX_CH2CCH2I] - k[5023]*y_cur[IDX_CH2CCH2I] - + k[5050]*y_cur[IDX_CH3CCHI] - k[5051]*y_cur[IDX_CH3CCHI] - + k[5052]*y_cur[IDX_C2H6I] - k[5053]*y_cur[IDX_CH3CHCH2I] - + k[5054]*y_cur[IDX_CH3CHCH2I] - k[5057]*y_cur[IDX_CH4I] - + k[5058]*y_cur[IDX_CH4I] - k[5236]*y_cur[IDX_NI] - + k[5362]*y_cur[IDX_OI] - k[5595]*y_cur[IDX_eM] - k[5731] - k[5732] - + k[6016] - k[6017] - k[6996]; + data[jistart + 12582] = 0.0 + k[4227]*y_cur[IDX_C4HM]; + data[jistart + 12583] = 0.0 + k[4229]*y_cur[IDX_C4HM]; + data[jistart + 12584] = 0.0 + k[5849] + k[6174]; + data[jistart + 12585] = 0.0 + k[823]*y_cur[IDX_eM] - k[1843]*y_cur[IDX_C4HI] + + k[4204]*y_cur[IDX_C4HM] + k[6628]*y_cur[IDX_GRAINM]; + data[jistart + 12586] = 0.0 + k[4217]*y_cur[IDX_C4HM] + k[4218]*y_cur[IDX_C4HM]; + data[jistart + 12587] = 0.0 - k[4907]*y_cur[IDX_C4HI]; + data[jistart + 12588] = 0.0 + k[4225]*y_cur[IDX_C4HM]; + data[jistart + 12589] = 0.0 - k[4884]*y_cur[IDX_C4HI]; + data[jistart + 12590] = 0.0 + k[4226]*y_cur[IDX_C4HM]; + data[jistart + 12591] = 0.0 - k[3862]*y_cur[IDX_C4HI] + k[4232]*y_cur[IDX_C4HM]; + data[jistart + 12592] = 0.0 - k[3822]*y_cur[IDX_C4HI] + k[4230]*y_cur[IDX_C4HM]; + data[jistart + 12593] = 0.0 - k[1586]*y_cur[IDX_C4HI] - k[1587]*y_cur[IDX_C4HI] - + k[1588]*y_cur[IDX_C4HI] + k[4203]*y_cur[IDX_C4HM]; + data[jistart + 12594] = 0.0 - k[5057]*y_cur[IDX_C4HI] - k[5058]*y_cur[IDX_C4HI]; + data[jistart + 12595] = 0.0 + k[4867]*y_cur[IDX_C2H2I]; + data[jistart + 12596] = 0.0 - k[1489]*y_cur[IDX_C4HI] - k[1490]*y_cur[IDX_C4HI] + + k[4202]*y_cur[IDX_C4HM]; + data[jistart + 12597] = 0.0 - k[2052]*y_cur[IDX_C4HI] + k[4208]*y_cur[IDX_C4HM]; + data[jistart + 12598] = 0.0 + k[4867]*y_cur[IDX_C2I] - k[4877]*y_cur[IDX_C4HI]; + data[jistart + 12599] = 0.0 + k[8629]*y_cur[IDX_GC4I]; + data[jistart + 12600] = 0.0 + k[3413]*y_cur[IDX_C5HM] + k[3430]*y_cur[IDX_C7HM] - + k[5236]*y_cur[IDX_C4HI]; + data[jistart + 12601] = 0.0 - k[2780]*y_cur[IDX_C4HI] + k[4215]*y_cur[IDX_C4HM]; + data[jistart + 12602] = 0.0 + k[3706]*y_cur[IDX_C5H2II] - k[5362]*y_cur[IDX_C4HI] + + k[5366]*y_cur[IDX_C5HI]; + data[jistart + 12603] = 0.0 - k[3111]*y_cur[IDX_C4HI] - k[3112]*y_cur[IDX_C4HI] + + k[4221]*y_cur[IDX_C4HM]; + data[jistart + 12604] = 0.0 - k[1320]*y_cur[IDX_C4HI] + k[4201]*y_cur[IDX_C4HM]; + data[jistart + 12605] = 0.0 - k[340]*y_cur[IDX_C4HI] - k[2303]*y_cur[IDX_C4HI] + + k[4211]*y_cur[IDX_C4HM]; + data[jistart + 12606] = 0.0 + k[41]*y_cur[IDX_C3HM] + k[4919]*y_cur[IDX_C3H2I] - + k[4925]*y_cur[IDX_C4HI] + k[4959]*y_cur[IDX_H2CCCI]; + data[jistart + 12607] = 0.0 - k[2915]*y_cur[IDX_C4HI] + k[4219]*y_cur[IDX_C4HM] + + k[4220]*y_cur[IDX_C4HM]; + data[jistart + 12608] = 0.0 - k[2610]*y_cur[IDX_C4HI] + k[4214]*y_cur[IDX_C4HM]; + data[jistart + 12609] = 0.0 + k[6628]*y_cur[IDX_C4H2II] + k[6633]*y_cur[IDX_C4H3II] + + k[6645]*y_cur[IDX_C4H5II] + k[6721]*y_cur[IDX_C5HII] + + k[6794]*y_cur[IDX_HC5NHII] + k[6795]*y_cur[IDX_HC5NHII]; + data[jistart + 12610] = 0.0 + k[823]*y_cur[IDX_C4H2II] + k[824]*y_cur[IDX_C4H3II] + + k[827]*y_cur[IDX_C4H5II] + k[839]*y_cur[IDX_C5HII] + + k[1082]*y_cur[IDX_HC5NHII] + k[1083]*y_cur[IDX_HC5NHII] - + k[5595]*y_cur[IDX_C4HI]; + data[jistart + 12611] = 0.0 + k[92]*y_cur[IDX_C4M]; + data[jistart + 12612] = 0.0 + k[2465]*y_cur[IDX_H2I] + k[2846]*y_cur[IDX_HI]; + data[jistart + 12613] = 0.0 + k[3748]*y_cur[IDX_OI]; + data[jistart + 12614] = 0.0 + k[2355]*y_cur[IDX_HII] + k[2725]*y_cur[IDX_H3II] + + k[3648]*y_cur[IDX_OII]; + data[jistart + 12615] = 0.0 + k[630]*y_cur[IDX_NOI]; + data[jistart + 12616] = 0.0 + k[2349]*y_cur[IDX_HII] + k[3265]*y_cur[IDX_HeII]; + data[jistart + 12617] = 0.0 + k[1416]*y_cur[IDX_CII] + k[3277]*y_cur[IDX_HeII]; + data[jistart + 12618] = 0.0 + k[623]*y_cur[IDX_NOI]; + data[jistart + 12619] = 0.0 + k[626]*y_cur[IDX_NOI]; + data[jistart + 12620] = 0.0 + k[303]*y_cur[IDX_NOI] + k[2275]*y_cur[IDX_O2I]; + data[jistart + 12621] = 0.0 + k[569]*y_cur[IDX_NOI] + k[3744]*y_cur[IDX_OI]; + data[jistart + 12622] = 0.0 + k[494]*y_cur[IDX_NOI]; + data[jistart + 12623] = 0.0 + k[206]*y_cur[IDX_NOI]; + data[jistart + 12624] = 0.0 + k[627]*y_cur[IDX_NOI]; + data[jistart + 12625] = 0.0 + k[577]*y_cur[IDX_NOI] + k[3484]*y_cur[IDX_CO2I] + + k[3501]*y_cur[IDX_O2I]; + data[jistart + 12626] = 0.0 - k[4788]*y_cur[IDX_NOII]; + data[jistart + 12627] = 0.0 - k[4647]*y_cur[IDX_NOII]; + data[jistart + 12628] = 0.0 + k[454]*y_cur[IDX_NOI]; + data[jistart + 12629] = 0.0 + k[583]*y_cur[IDX_NOI]; + data[jistart + 12630] = 0.0 - k[4858]*y_cur[IDX_NOII]; + data[jistart + 12631] = 0.0 - k[4052]*y_cur[IDX_NOII]; + data[jistart + 12632] = 0.0 - k[4227]*y_cur[IDX_NOII]; + data[jistart + 12633] = 0.0 + k[311]*y_cur[IDX_NOI]; + data[jistart + 12634] = 0.0 - k[4823]*y_cur[IDX_NOII]; + data[jistart + 12635] = 0.0 - k[3982]*y_cur[IDX_NOII]; + data[jistart + 12636] = 0.0 - k[4122]*y_cur[IDX_NOII]; + data[jistart + 12637] = 0.0 - k[4402]*y_cur[IDX_NOII]; + data[jistart + 12638] = 0.0 - k[4542]*y_cur[IDX_NOII]; + data[jistart + 12639] = 0.0 - k[4472]*y_cur[IDX_NOII]; + data[jistart + 12640] = 0.0 - k[4612]*y_cur[IDX_NOII]; + data[jistart + 12641] = 0.0 - k[3947]*y_cur[IDX_NOII]; + data[jistart + 12642] = 0.0 - k[4297]*y_cur[IDX_NOII]; + data[jistart + 12643] = 0.0 - k[4332]*y_cur[IDX_NOII]; + data[jistart + 12644] = 0.0 - k[3912]*y_cur[IDX_NOII]; + data[jistart + 12645] = 0.0 - k[4753]*y_cur[IDX_NOII]; + data[jistart + 12646] = 0.0 - k[4577]*y_cur[IDX_NOII]; + data[jistart + 12647] = 0.0 + k[3338]*y_cur[IDX_NII]; + data[jistart + 12648] = 0.0 - k[4718]*y_cur[IDX_NOII]; + data[jistart + 12649] = 0.0 + k[621]*y_cur[IDX_NOI]; + data[jistart + 12650] = 0.0 - k[4507]*y_cur[IDX_NOII]; + data[jistart + 12651] = 0.0 - k[4017]*y_cur[IDX_NOII]; + data[jistart + 12652] = 0.0 - k[4087]*y_cur[IDX_NOII]; + data[jistart + 12653] = 0.0 - k[4192]*y_cur[IDX_NOII]; + data[jistart + 12654] = 0.0 - k[4367]*y_cur[IDX_NOII]; + data[jistart + 12655] = 0.0 - k[4262]*y_cur[IDX_NOII]; + data[jistart + 12656] = 0.0 - k[4437]*y_cur[IDX_NOII]; + data[jistart + 12657] = 0.0 + k[631]*y_cur[IDX_NOI] + k[3475]*y_cur[IDX_NI]; + data[jistart + 12658] = 0.0 + k[212]*y_cur[IDX_NOI]; + data[jistart + 12659] = 0.0 + k[258]*y_cur[IDX_NOI]; + data[jistart + 12660] = 0.0 + k[693]*y_cur[IDX_NOI] + k[3467]*y_cur[IDX_NI]; + data[jistart + 12661] = 0.0 + k[472]*y_cur[IDX_NOI] + k[3458]*y_cur[IDX_NI]; + data[jistart + 12662] = 0.0 - k[4157]*y_cur[IDX_NOII]; + data[jistart + 12663] = 0.0 + k[254]*y_cur[IDX_NOI]; + data[jistart + 12664] = 0.0 + k[3484]*y_cur[IDX_NHII]; + data[jistart + 12665] = 0.0 + k[628]*y_cur[IDX_NOI] + k[3465]*y_cur[IDX_NI]; + data[jistart + 12666] = 0.0 - k[620]*y_cur[IDX_NOII]; + data[jistart + 12667] = 0.0 - k[536]*y_cur[IDX_NOII]; + data[jistart + 12668] = 0.0 - k[641]*y_cur[IDX_NOII]; + data[jistart + 12669] = 0.0 + k[3619]*y_cur[IDX_OII]; + data[jistart + 12670] = 0.0 - k[4682]*y_cur[IDX_NOII]; + data[jistart + 12671] = 0.0 + k[625]*y_cur[IDX_NOI]; + data[jistart + 12672] = 0.0 + k[560]*y_cur[IDX_NOI] + k[3338]*y_cur[IDX_CH3OHI] + + k[3344]*y_cur[IDX_COI] + k[3346]*y_cur[IDX_H2COI] + + k[3357]*y_cur[IDX_O2I]; + data[jistart + 12673] = 0.0 + k[624]*y_cur[IDX_NOI]; + data[jistart + 12674] = 0.0 - k[536]*y_cur[IDX_MgI] - k[620]*y_cur[IDX_FeI] - + k[641]*y_cur[IDX_NaI] - k[721]*y_cur[IDX_SiI] - + k[1168]*y_cur[IDX_eM] - k[3912]*y_cur[IDX_CM] - + k[3947]*y_cur[IDX_C10M] - k[3982]*y_cur[IDX_C10HM] - + k[4017]*y_cur[IDX_C2M] - k[4052]*y_cur[IDX_C2HM] - + k[4087]*y_cur[IDX_C3M] - k[4122]*y_cur[IDX_C3HM] - + k[4157]*y_cur[IDX_C3NM] - k[4192]*y_cur[IDX_C4M] - + k[4227]*y_cur[IDX_C4HM] - k[4262]*y_cur[IDX_C5M] - + k[4297]*y_cur[IDX_C5HM] - k[4332]*y_cur[IDX_C5NM] - + k[4367]*y_cur[IDX_C6M] - k[4402]*y_cur[IDX_C6HM] - + k[4437]*y_cur[IDX_C7M] - k[4472]*y_cur[IDX_C7HM] - + k[4507]*y_cur[IDX_C8M] - k[4542]*y_cur[IDX_C8HM] - + k[4577]*y_cur[IDX_C9M] - k[4612]*y_cur[IDX_C9HM] - + k[4647]*y_cur[IDX_CHM] - k[4682]*y_cur[IDX_CNM] - + k[4718]*y_cur[IDX_HM] - k[4753]*y_cur[IDX_OM] - + k[4788]*y_cur[IDX_O2M] - k[4823]*y_cur[IDX_OHM] - + k[4858]*y_cur[IDX_SM] - k[6407]*y_cur[IDX_GRAINM]; + data[jistart + 12675] = 0.0 + k[3619]*y_cur[IDX_NHI] + k[3639]*y_cur[IDX_CNI] + + k[3645]*y_cur[IDX_HCNI] + k[3647]*y_cur[IDX_N2I] + + k[3648]*y_cur[IDX_NO2I]; + data[jistart + 12676] = 0.0 + k[622]*y_cur[IDX_NOI]; + data[jistart + 12677] = 0.0 + k[595]*y_cur[IDX_NOI]; + data[jistart + 12678] = 0.0 + k[3647]*y_cur[IDX_OII]; + data[jistart + 12679] = 0.0 + k[2275]*y_cur[IDX_CNII] + k[3357]*y_cur[IDX_NII] + + k[3501]*y_cur[IDX_NHII]; + data[jistart + 12680] = 0.0 + k[629]*y_cur[IDX_NOI]; + data[jistart + 12681] = 0.0 - k[721]*y_cur[IDX_NOII]; + data[jistart + 12682] = 0.0 + k[186]*y_cur[IDX_CII] + k[206]*y_cur[IDX_C2II] + + k[212]*y_cur[IDX_C2HII] + k[226]*y_cur[IDX_C2H2II] + + k[254]*y_cur[IDX_CHII] + k[258]*y_cur[IDX_CH2II] + + k[274]*y_cur[IDX_CH3II] + k[303]*y_cur[IDX_CNII] + + k[311]*y_cur[IDX_COII] + k[403]*y_cur[IDX_HII] + + k[454]*y_cur[IDX_H2II] + k[472]*y_cur[IDX_H2OII] + + k[494]*y_cur[IDX_HCNII] + k[560]*y_cur[IDX_NII] + + k[569]*y_cur[IDX_N2II] + k[577]*y_cur[IDX_NHII] + + k[583]*y_cur[IDX_NH2II] + k[595]*y_cur[IDX_NH3II] + + k[621]*y_cur[IDX_C3HII] + k[622]*y_cur[IDX_C4H2II] + + k[623]*y_cur[IDX_CO2II] + k[624]*y_cur[IDX_H2COII] + + k[625]*y_cur[IDX_H2SII] + k[626]*y_cur[IDX_HNOII] + + k[627]*y_cur[IDX_HSII] + k[628]*y_cur[IDX_O2II] + + k[629]*y_cur[IDX_SII] + k[630]*y_cur[IDX_S2II] + + k[631]*y_cur[IDX_SiOII] + k[693]*y_cur[IDX_OHII] + k[5891] + k[6228]; + data[jistart + 12683] = 0.0 + k[3346]*y_cur[IDX_NII]; + data[jistart + 12684] = 0.0 + k[3645]*y_cur[IDX_OII]; + data[jistart + 12685] = 0.0 + k[226]*y_cur[IDX_NOI]; + data[jistart + 12686] = 0.0 + k[274]*y_cur[IDX_NOI]; + data[jistart + 12687] = 0.0 + k[3639]*y_cur[IDX_OII]; + data[jistart + 12688] = 0.0 + k[3458]*y_cur[IDX_H2OII] + k[3465]*y_cur[IDX_O2II] + + k[3467]*y_cur[IDX_OHII] + k[3475]*y_cur[IDX_SiOII]; + data[jistart + 12689] = 0.0 + k[3744]*y_cur[IDX_N2II] + k[3748]*y_cur[IDX_NSII]; + data[jistart + 12690] = 0.0 + k[3265]*y_cur[IDX_HNOI] + k[3277]*y_cur[IDX_N2OI]; + data[jistart + 12691] = 0.0 + k[186]*y_cur[IDX_NOI] + k[1416]*y_cur[IDX_N2OI]; + data[jistart + 12692] = 0.0 + k[403]*y_cur[IDX_NOI] + k[2349]*y_cur[IDX_HNOI] + + k[2355]*y_cur[IDX_NO2I]; + data[jistart + 12693] = 0.0 + k[2725]*y_cur[IDX_NO2I]; + data[jistart + 12694] = 0.0 + k[3344]*y_cur[IDX_NII]; + data[jistart + 12695] = 0.0 - k[6407]*y_cur[IDX_NOII]; + data[jistart + 12696] = 0.0 + k[2465]*y_cur[IDX_NO2II]; + data[jistart + 12697] = 0.0 - k[1168]*y_cur[IDX_NOII]; + data[jistart + 12698] = 0.0 + k[2846]*y_cur[IDX_NO2II]; + data[jistart + 12699] = 0.0 + k[3206]*y_cur[IDX_HeII]; + data[jistart + 12700] = 0.0 - k[3648]*y_cur[IDX_OII]; + data[jistart + 12701] = 0.0 - k[665]*y_cur[IDX_OII] - k[3651]*y_cur[IDX_OII]; + data[jistart + 12702] = 0.0 - k[659]*y_cur[IDX_OII] + k[3276]*y_cur[IDX_HeII]; + data[jistart + 12703] = 0.0 + k[3292]*y_cur[IDX_HeII]; + data[jistart + 12704] = 0.0 + k[683]*y_cur[IDX_OI]; + data[jistart + 12705] = 0.0 - k[650]*y_cur[IDX_OII] - k[3635]*y_cur[IDX_OII]; + data[jistart + 12706] = 0.0 + k[681]*y_cur[IDX_OI]; + data[jistart + 12707] = 0.0 + k[684]*y_cur[IDX_OI]; + data[jistart + 12708] = 0.0 - k[4790]*y_cur[IDX_OII]; + data[jistart + 12709] = 0.0 - k[4649]*y_cur[IDX_OII]; + data[jistart + 12710] = 0.0 - k[663]*y_cur[IDX_OII] + k[3294]*y_cur[IDX_HeII] - + k[3649]*y_cur[IDX_OII]; + data[jistart + 12711] = 0.0 - k[4860]*y_cur[IDX_OII]; + data[jistart + 12712] = 0.0 - k[4054]*y_cur[IDX_OII]; + data[jistart + 12713] = 0.0 - k[4229]*y_cur[IDX_OII]; + data[jistart + 12714] = 0.0 + k[682]*y_cur[IDX_OI]; + data[jistart + 12715] = 0.0 - k[4825]*y_cur[IDX_OII]; + data[jistart + 12716] = 0.0 - k[3984]*y_cur[IDX_OII]; + data[jistart + 12717] = 0.0 - k[4124]*y_cur[IDX_OII]; + data[jistart + 12718] = 0.0 - k[4404]*y_cur[IDX_OII]; + data[jistart + 12719] = 0.0 - k[4544]*y_cur[IDX_OII]; + data[jistart + 12720] = 0.0 - k[4474]*y_cur[IDX_OII]; + data[jistart + 12721] = 0.0 - k[4614]*y_cur[IDX_OII]; + data[jistart + 12722] = 0.0 - k[3949]*y_cur[IDX_OII]; + data[jistart + 12723] = 0.0 - k[4299]*y_cur[IDX_OII]; + data[jistart + 12724] = 0.0 - k[4334]*y_cur[IDX_OII]; + data[jistart + 12725] = 0.0 - k[3914]*y_cur[IDX_OII]; + data[jistart + 12726] = 0.0 - k[4755]*y_cur[IDX_OII]; + data[jistart + 12727] = 0.0 - k[4579]*y_cur[IDX_OII]; + data[jistart + 12728] = 0.0 - k[651]*y_cur[IDX_OII] - k[3636]*y_cur[IDX_OII] - + k[3637]*y_cur[IDX_OII]; + data[jistart + 12729] = 0.0 - k[4720]*y_cur[IDX_OII]; + data[jistart + 12730] = 0.0 - k[4509]*y_cur[IDX_OII]; + data[jistart + 12731] = 0.0 - k[4019]*y_cur[IDX_OII]; + data[jistart + 12732] = 0.0 - k[4089]*y_cur[IDX_OII]; + data[jistart + 12733] = 0.0 - k[4194]*y_cur[IDX_OII]; + data[jistart + 12734] = 0.0 - k[4369]*y_cur[IDX_OII]; + data[jistart + 12735] = 0.0 - k[4264]*y_cur[IDX_OII]; + data[jistart + 12736] = 0.0 - k[4439]*y_cur[IDX_OII]; + data[jistart + 12737] = 0.0 - k[660]*y_cur[IDX_OII]; + data[jistart + 12738] = 0.0 + k[6242]; + data[jistart + 12739] = 0.0 - k[4159]*y_cur[IDX_OII]; + data[jistart + 12740] = 0.0 + k[1968]*y_cur[IDX_O2I]; + data[jistart + 12741] = 0.0 + k[3208]*y_cur[IDX_HeII] - k[3640]*y_cur[IDX_OII]; + data[jistart + 12742] = 0.0 + k[6233]; + data[jistart + 12743] = 0.0 + k[3333]*y_cur[IDX_HeII]; + data[jistart + 12744] = 0.0 - k[654]*y_cur[IDX_OII]; + data[jistart + 12745] = 0.0 - k[619]*y_cur[IDX_OII] - k[3619]*y_cur[IDX_OII]; + data[jistart + 12746] = 0.0 - k[4684]*y_cur[IDX_OII]; + data[jistart + 12747] = 0.0 + k[3306]*y_cur[IDX_HeII]; + data[jistart + 12748] = 0.0 + k[3358]*y_cur[IDX_O2I]; + data[jistart + 12749] = 0.0 - k[266]*y_cur[IDX_CH2I] - k[295]*y_cur[IDX_CHI] - + k[492]*y_cur[IDX_HI] - k[619]*y_cur[IDX_NHI] - k[646]*y_cur[IDX_C2I] + - k[647]*y_cur[IDX_C2H2I] - k[648]*y_cur[IDX_C2H4I] - + k[649]*y_cur[IDX_C2HI] - k[650]*y_cur[IDX_CH3CNI] - + k[651]*y_cur[IDX_CH3OHI] - k[652]*y_cur[IDX_CH4I] - + k[653]*y_cur[IDX_COI] - k[654]*y_cur[IDX_FeI] - + k[655]*y_cur[IDX_H2COI] - k[656]*y_cur[IDX_H2OI] - + k[657]*y_cur[IDX_H2SI] - k[658]*y_cur[IDX_HCOI] - + k[659]*y_cur[IDX_N2OI] - k[660]*y_cur[IDX_NH2I] - + k[661]*y_cur[IDX_NH3I] - k[662]*y_cur[IDX_O2I] - + k[663]*y_cur[IDX_OCSI] - k[664]*y_cur[IDX_OHI] - + k[665]*y_cur[IDX_SO2I] - k[2261]*y_cur[IDX_CHI] - + k[2466]*y_cur[IDX_H2I] - k[3619]*y_cur[IDX_NHI] - + k[3631]*y_cur[IDX_C2I] - k[3632]*y_cur[IDX_C2H4I] - + k[3633]*y_cur[IDX_C2H4I] - k[3634]*y_cur[IDX_C2HI] - + k[3635]*y_cur[IDX_CH3CNI] - k[3636]*y_cur[IDX_CH3OHI] - + k[3637]*y_cur[IDX_CH3OHI] - k[3638]*y_cur[IDX_CH4I] - + k[3639]*y_cur[IDX_CNI] - k[3640]*y_cur[IDX_CO2I] - + k[3641]*y_cur[IDX_H2COI] - k[3642]*y_cur[IDX_H2SI] - + k[3643]*y_cur[IDX_H2SI] - k[3644]*y_cur[IDX_HCNI] - + k[3645]*y_cur[IDX_HCNI] - k[3646]*y_cur[IDX_HCOI] - + k[3647]*y_cur[IDX_N2I] - k[3648]*y_cur[IDX_NO2I] - + k[3649]*y_cur[IDX_OCSI] - k[3650]*y_cur[IDX_OHI] - + k[3651]*y_cur[IDX_SO2I] - k[3914]*y_cur[IDX_CM] - + k[3949]*y_cur[IDX_C10M] - k[3984]*y_cur[IDX_C10HM] - + k[4019]*y_cur[IDX_C2M] - k[4054]*y_cur[IDX_C2HM] - + k[4089]*y_cur[IDX_C3M] - k[4124]*y_cur[IDX_C3HM] - + k[4159]*y_cur[IDX_C3NM] - k[4194]*y_cur[IDX_C4M] - + k[4229]*y_cur[IDX_C4HM] - k[4264]*y_cur[IDX_C5M] - + k[4299]*y_cur[IDX_C5HM] - k[4334]*y_cur[IDX_C5NM] - + k[4369]*y_cur[IDX_C6M] - k[4404]*y_cur[IDX_C6HM] - + k[4439]*y_cur[IDX_C7M] - k[4474]*y_cur[IDX_C7HM] - + k[4509]*y_cur[IDX_C8M] - k[4544]*y_cur[IDX_C8HM] - + k[4579]*y_cur[IDX_C9M] - k[4614]*y_cur[IDX_C9HM] - + k[4649]*y_cur[IDX_CHM] - k[4684]*y_cur[IDX_CNM] - + k[4720]*y_cur[IDX_HM] - k[4755]*y_cur[IDX_OM] - + k[4790]*y_cur[IDX_O2M] - k[4825]*y_cur[IDX_OHM] - + k[4860]*y_cur[IDX_SM] - k[5525]*y_cur[IDX_CI] - + k[5623]*y_cur[IDX_eM] - k[6326]*y_cur[IDX_GRAINM]; + data[jistart + 12750] = 0.0 - k[266]*y_cur[IDX_OII]; + data[jistart + 12751] = 0.0 - k[648]*y_cur[IDX_OII] - k[3632]*y_cur[IDX_OII] - + k[3633]*y_cur[IDX_OII]; + data[jistart + 12752] = 0.0 - k[3647]*y_cur[IDX_OII]; + data[jistart + 12753] = 0.0 - k[662]*y_cur[IDX_OII] + k[1423]*y_cur[IDX_CII] + + k[1968]*y_cur[IDX_CHII] + k[3290]*y_cur[IDX_HeII] + + k[3358]*y_cur[IDX_NII]; + data[jistart + 12754] = 0.0 - k[657]*y_cur[IDX_OII] - k[3642]*y_cur[IDX_OII] - + k[3643]*y_cur[IDX_OII]; + data[jistart + 12755] = 0.0 + k[3286]*y_cur[IDX_HeII]; + data[jistart + 12756] = 0.0 - k[658]*y_cur[IDX_OII] - k[3646]*y_cur[IDX_OII]; + data[jistart + 12757] = 0.0 - k[652]*y_cur[IDX_OII] - k[3638]*y_cur[IDX_OII]; + data[jistart + 12758] = 0.0 - k[649]*y_cur[IDX_OII] - k[3634]*y_cur[IDX_OII]; + data[jistart + 12759] = 0.0 - k[655]*y_cur[IDX_OII] - k[3641]*y_cur[IDX_OII]; + data[jistart + 12760] = 0.0 - k[3644]*y_cur[IDX_OII] - k[3645]*y_cur[IDX_OII]; + data[jistart + 12761] = 0.0 - k[295]*y_cur[IDX_OII] - k[2261]*y_cur[IDX_OII]; + data[jistart + 12762] = 0.0 - k[646]*y_cur[IDX_OII] - k[3631]*y_cur[IDX_OII]; + data[jistart + 12763] = 0.0 - k[664]*y_cur[IDX_OII] + k[3297]*y_cur[IDX_HeII] - + k[3650]*y_cur[IDX_OII]; + data[jistart + 12764] = 0.0 - k[661]*y_cur[IDX_OII]; + data[jistart + 12765] = 0.0 - k[647]*y_cur[IDX_OII]; + data[jistart + 12766] = 0.0 - k[3639]*y_cur[IDX_OII]; + data[jistart + 12767] = 0.0 + k[406]*y_cur[IDX_HII] + k[681]*y_cur[IDX_CNII] + + k[682]*y_cur[IDX_COII] + k[683]*y_cur[IDX_CO2II] + + k[684]*y_cur[IDX_N2II] + k[5685] + k[5900] + k[6301]; + data[jistart + 12768] = 0.0 + k[3206]*y_cur[IDX_CNOI] + k[3208]*y_cur[IDX_CO2I] + + k[3276]*y_cur[IDX_N2OI] + k[3286]*y_cur[IDX_NOI] + + k[3290]*y_cur[IDX_O2I] + k[3292]*y_cur[IDX_OCNI] + + k[3294]*y_cur[IDX_OCSI] + k[3297]*y_cur[IDX_OHI] + + k[3306]*y_cur[IDX_SOI] + k[3333]*y_cur[IDX_SiOI]; + data[jistart + 12769] = 0.0 + k[1423]*y_cur[IDX_O2I]; + data[jistart + 12770] = 0.0 - k[656]*y_cur[IDX_OII]; + data[jistart + 12771] = 0.0 + k[406]*y_cur[IDX_OI]; + data[jistart + 12772] = 0.0 - k[5525]*y_cur[IDX_OII]; + data[jistart + 12773] = 0.0 - k[653]*y_cur[IDX_OII]; + data[jistart + 12774] = 0.0 - k[6326]*y_cur[IDX_OII]; + data[jistart + 12775] = 0.0 - k[2466]*y_cur[IDX_OII]; + data[jistart + 12776] = 0.0 - k[5623]*y_cur[IDX_OII]; + data[jistart + 12777] = 0.0 - k[492]*y_cur[IDX_OII]; + data[jistart + 12778] = 0.0 + k[7180] + k[7362] + k[7544]; + data[jistart + 12779] = 0.0 + k[829]*y_cur[IDX_eM] + k[6647]*y_cur[IDX_GRAINM]; + data[jistart + 12780] = 0.0 + k[830]*y_cur[IDX_eM] + k[6667]*y_cur[IDX_GRAINM]; + data[jistart + 12781] = 0.0 - k[2851]*y_cur[IDX_C4H2I]; + data[jistart + 12782] = 0.0 + k[8725]*y_cur[IDX_GCHI]; + data[jistart + 12783] = 0.0 + k[8630]*y_cur[IDX_GHI]; + data[jistart + 12784] = 0.0 - k[493]*y_cur[IDX_C4H2I]; + data[jistart + 12785] = 0.0 + k[3707]*y_cur[IDX_OI] - k[5579]*y_cur[IDX_C4H2I]; + data[jistart + 12786] = 0.0 - k[5577]*y_cur[IDX_C4H2I]; + data[jistart + 12787] = 0.0 - k[2852]*y_cur[IDX_C4H2I] - k[5578]*y_cur[IDX_C4H2I]; + data[jistart + 12788] = 0.0 + k[5052]*y_cur[IDX_C4HI]; + data[jistart + 12789] = 0.0 - k[1834]*y_cur[IDX_C4H2I]; + data[jistart + 12790] = 0.0 + k[4765]*y_cur[IDX_C4H2II]; + data[jistart + 12791] = 0.0 + k[4624]*y_cur[IDX_C4H2II]; + data[jistart + 12792] = 0.0 + k[4835]*y_cur[IDX_C4H2II]; + data[jistart + 12793] = 0.0 + k[4029]*y_cur[IDX_C4H2II]; + data[jistart + 12794] = 0.0 + k[93]*y_cur[IDX_HI] + k[4204]*y_cur[IDX_C4H2II]; + data[jistart + 12795] = 0.0 + k[4953]*y_cur[IDX_CI]; + data[jistart + 12796] = 0.0 + k[4800]*y_cur[IDX_C4H2II]; + data[jistart + 12797] = 0.0 + k[3959]*y_cur[IDX_C4H2II]; + data[jistart + 12798] = 0.0 + k[4099]*y_cur[IDX_C4H2II]; + data[jistart + 12799] = 0.0 + k[4379]*y_cur[IDX_C4H2II]; + data[jistart + 12800] = 0.0 + k[4519]*y_cur[IDX_C4H2II]; + data[jistart + 12801] = 0.0 + k[4449]*y_cur[IDX_C4H2II]; + data[jistart + 12802] = 0.0 + k[4589]*y_cur[IDX_C4H2II]; + data[jistart + 12803] = 0.0 + k[3924]*y_cur[IDX_C4H2II]; + data[jistart + 12804] = 0.0 + k[4274]*y_cur[IDX_C4H2II]; + data[jistart + 12805] = 0.0 + k[4309]*y_cur[IDX_C4H2II]; + data[jistart + 12806] = 0.0 + k[3889]*y_cur[IDX_C4H2II]; + data[jistart + 12807] = 0.0 + k[4730]*y_cur[IDX_C4H2II]; + data[jistart + 12808] = 0.0 + k[4554]*y_cur[IDX_C4H2II]; + data[jistart + 12809] = 0.0 + k[2124]*y_cur[IDX_C4H3II]; + data[jistart + 12810] = 0.0 + k[4694]*y_cur[IDX_C4H2II]; + data[jistart + 12811] = 0.0 - k[1754]*y_cur[IDX_C4H2I] - k[1755]*y_cur[IDX_C4H2I]; + data[jistart + 12812] = 0.0 - k[1807]*y_cur[IDX_C4H2I] - k[5515]*y_cur[IDX_C4H2I]; + data[jistart + 12813] = 0.0 + k[4484]*y_cur[IDX_C4H2II]; + data[jistart + 12814] = 0.0 + k[3994]*y_cur[IDX_C4H2II]; + data[jistart + 12815] = 0.0 + k[4064]*y_cur[IDX_C4H2II]; + data[jistart + 12816] = 0.0 + k[4169]*y_cur[IDX_C4H2II]; + data[jistart + 12817] = 0.0 + k[4344]*y_cur[IDX_C4H2II]; + data[jistart + 12818] = 0.0 - k[2764]*y_cur[IDX_C4H2I]; + data[jistart + 12819] = 0.0 + k[4239]*y_cur[IDX_C4H2II]; + data[jistart + 12820] = 0.0 + k[4414]*y_cur[IDX_C4H2II]; + data[jistart + 12821] = 0.0 + k[8725]*y_cur[IDX_GC3HI]; + data[jistart + 12822] = 0.0 + k[6015]; + data[jistart + 12823] = 0.0 - k[1784]*y_cur[IDX_C4H2I] - k[1785]*y_cur[IDX_C4H2I]; + data[jistart + 12824] = 0.0 + k[4134]*y_cur[IDX_C4H2II]; + data[jistart + 12825] = 0.0 + k[4659]*y_cur[IDX_C4H2II]; + data[jistart + 12826] = 0.0 - k[1677]*y_cur[IDX_C4H2I] - k[1678]*y_cur[IDX_C4H2I]; + data[jistart + 12827] = 0.0 + k[825]*y_cur[IDX_eM] + k[2124]*y_cur[IDX_CH3OHI] - + k[2850]*y_cur[IDX_C4H2I] - k[5576]*y_cur[IDX_C4H2I] + + k[6634]*y_cur[IDX_GRAINM]; + data[jistart + 12828] = 0.0 + k[4947]*y_cur[IDX_CI]; + data[jistart + 12829] = 0.0 - k[2031]*y_cur[IDX_C4H2I] - k[5531]*y_cur[IDX_C4H2I]; + data[jistart + 12830] = 0.0 + k[5052]*y_cur[IDX_C2H6I] + k[5057]*y_cur[IDX_CH4I] + + k[5058]*y_cur[IDX_CH4I]; + data[jistart + 12831] = 0.0 - k[177]*y_cur[IDX_CII] - k[224]*y_cur[IDX_C2H2II] - + k[384]*y_cur[IDX_HII] - k[493]*y_cur[IDX_HC3NII] - + k[704]*y_cur[IDX_SII] - k[1402]*y_cur[IDX_CII] - + k[1403]*y_cur[IDX_CII] - k[1520]*y_cur[IDX_C2H2II] - + k[1521]*y_cur[IDX_C2H2II] - k[1621]*y_cur[IDX_C2H3II] - + k[1622]*y_cur[IDX_C2H3II] - k[1623]*y_cur[IDX_C2H3II] - + k[1677]*y_cur[IDX_C2H4II] - k[1678]*y_cur[IDX_C2H4II] - + k[1754]*y_cur[IDX_C3HII] - k[1755]*y_cur[IDX_C3HII] - + k[1784]*y_cur[IDX_C3H2II] - k[1785]*y_cur[IDX_C3H2II] - + k[1807]*y_cur[IDX_C3H3II] - k[1834]*y_cur[IDX_C4HII] - + k[1837]*y_cur[IDX_C4H2II] - k[1838]*y_cur[IDX_C4H2II] - + k[2031]*y_cur[IDX_CH2CCHII] - k[2080]*y_cur[IDX_CH3II] - + k[2081]*y_cur[IDX_CH3II] - k[2342]*y_cur[IDX_HII] - + k[2690]*y_cur[IDX_H3II] - k[2764]*y_cur[IDX_H3COII] - + k[2805]*y_cur[IDX_H3OII] - k[2850]*y_cur[IDX_C4H3II] - + k[2851]*y_cur[IDX_C4H4II] - k[2852]*y_cur[IDX_C5H2II] - + k[2965]*y_cur[IDX_HCOII] - k[3238]*y_cur[IDX_HeII] - + k[3239]*y_cur[IDX_HeII] - k[3240]*y_cur[IDX_HeII] - + k[3830]*y_cur[IDX_SII] - k[3831]*y_cur[IDX_SII] - + k[3832]*y_cur[IDX_SII] - k[3869]*y_cur[IDX_SiII] - + k[4872]*y_cur[IDX_C2I] - k[4900]*y_cur[IDX_C2HI] - + k[4961]*y_cur[IDX_CI] - k[5115]*y_cur[IDX_CNI] - + k[5515]*y_cur[IDX_C3H3II] - k[5518]*y_cur[IDX_C4H2II] - + k[5531]*y_cur[IDX_CH2CCHII] - k[5576]*y_cur[IDX_C4H3II] - + k[5577]*y_cur[IDX_C5HII] - k[5578]*y_cur[IDX_C5H2II] - + k[5579]*y_cur[IDX_C5H3II] - k[5847] - k[5848] - k[5849] - k[6172] - + k[6173] - k[6174] - k[6998]; + data[jistart + 12832] = 0.0 + k[622]*y_cur[IDX_NOI] - k[1837]*y_cur[IDX_C4H2I] - + k[1838]*y_cur[IDX_C4H2I] + k[3889]*y_cur[IDX_CM] + + k[3924]*y_cur[IDX_C10M] + k[3959]*y_cur[IDX_C10HM] + + k[3994]*y_cur[IDX_C2M] + k[4029]*y_cur[IDX_C2HM] + + k[4064]*y_cur[IDX_C3M] + k[4099]*y_cur[IDX_C3HM] + + k[4134]*y_cur[IDX_C3NM] + k[4169]*y_cur[IDX_C4M] + + k[4204]*y_cur[IDX_C4HM] + k[4239]*y_cur[IDX_C5M] + + k[4274]*y_cur[IDX_C5HM] + k[4309]*y_cur[IDX_C5NM] + + k[4344]*y_cur[IDX_C6M] + k[4379]*y_cur[IDX_C6HM] + + k[4414]*y_cur[IDX_C7M] + k[4449]*y_cur[IDX_C7HM] + + k[4484]*y_cur[IDX_C8M] + k[4519]*y_cur[IDX_C8HM] + + k[4554]*y_cur[IDX_C9M] + k[4589]*y_cur[IDX_C9HM] + + k[4624]*y_cur[IDX_CHM] + k[4659]*y_cur[IDX_CNM] + + k[4694]*y_cur[IDX_HM] + k[4730]*y_cur[IDX_OM] + + k[4765]*y_cur[IDX_O2M] + k[4800]*y_cur[IDX_OHM] + + k[4835]*y_cur[IDX_SM] - k[5518]*y_cur[IDX_C4H2I]; + data[jistart + 12833] = 0.0 - k[3869]*y_cur[IDX_C4H2I]; + data[jistart + 12834] = 0.0 - k[704]*y_cur[IDX_C4H2I] - k[3830]*y_cur[IDX_C4H2I] - + k[3831]*y_cur[IDX_C4H2I] - k[3832]*y_cur[IDX_C4H2I]; + data[jistart + 12835] = 0.0 - k[1621]*y_cur[IDX_C4H2I] - k[1622]*y_cur[IDX_C4H2I] - + k[1623]*y_cur[IDX_C4H2I]; + data[jistart + 12836] = 0.0 + k[622]*y_cur[IDX_C4H2II]; + data[jistart + 12837] = 0.0 + k[5057]*y_cur[IDX_C4HI] + k[5058]*y_cur[IDX_C4HI]; + data[jistart + 12838] = 0.0 + k[4888]*y_cur[IDX_C2H2I] - k[4900]*y_cur[IDX_C4H2I]; + data[jistart + 12839] = 0.0 - k[4872]*y_cur[IDX_C4H2I]; + data[jistart + 12840] = 0.0 - k[224]*y_cur[IDX_C4H2I] - k[1520]*y_cur[IDX_C4H2I] - + k[1521]*y_cur[IDX_C4H2I]; + data[jistart + 12841] = 0.0 - k[2080]*y_cur[IDX_C4H2I] - k[2081]*y_cur[IDX_C4H2I]; + data[jistart + 12842] = 0.0 + k[4888]*y_cur[IDX_C2HI]; + data[jistart + 12843] = 0.0 - k[5115]*y_cur[IDX_C4H2I]; + data[jistart + 12844] = 0.0 + k[8630]*y_cur[IDX_GC4HI]; + data[jistart + 12845] = 0.0 - k[2805]*y_cur[IDX_C4H2I]; + data[jistart + 12846] = 0.0 + k[3707]*y_cur[IDX_C5H3II]; + data[jistart + 12847] = 0.0 - k[3238]*y_cur[IDX_C4H2I] - k[3239]*y_cur[IDX_C4H2I] - + k[3240]*y_cur[IDX_C4H2I]; + data[jistart + 12848] = 0.0 - k[177]*y_cur[IDX_C4H2I] - k[1402]*y_cur[IDX_C4H2I] - + k[1403]*y_cur[IDX_C4H2I]; + data[jistart + 12849] = 0.0 - k[384]*y_cur[IDX_C4H2I] - k[2342]*y_cur[IDX_C4H2I]; + data[jistart + 12850] = 0.0 + k[4947]*y_cur[IDX_CH2CCHI] + k[4953]*y_cur[IDX_CH3CCHI] - + k[4961]*y_cur[IDX_C4H2I]; + data[jistart + 12851] = 0.0 - k[2965]*y_cur[IDX_C4H2I]; + data[jistart + 12852] = 0.0 - k[2690]*y_cur[IDX_C4H2I]; + data[jistart + 12853] = 0.0 + k[6634]*y_cur[IDX_C4H3II] + k[6647]*y_cur[IDX_C4H5II] + + k[6667]*y_cur[IDX_C4H7II]; + data[jistart + 12854] = 0.0 + k[825]*y_cur[IDX_C4H3II] + k[829]*y_cur[IDX_C4H5II] + + k[830]*y_cur[IDX_C4H7II]; + data[jistart + 12855] = 0.0 + k[93]*y_cur[IDX_C4HM]; + data[jistart + 12856] = 0.0 + k[2176]*y_cur[IDX_CH4I]; + data[jistart + 12857] = 0.0 + k[493]*y_cur[IDX_C4H2I] + k[1565]*y_cur[IDX_C2H2I]; + data[jistart + 12858] = 0.0 - k[5519]*y_cur[IDX_C4H2II]; + data[jistart + 12859] = 0.0 + k[1859]*y_cur[IDX_CI]; + data[jistart + 12860] = 0.0 + k[2158]*y_cur[IDX_CH4I]; + data[jistart + 12861] = 0.0 - k[2479]*y_cur[IDX_C4H2II]; + data[jistart + 12862] = 0.0 - k[1835]*y_cur[IDX_C4H2II]; + data[jistart + 12863] = 0.0 + k[1345]*y_cur[IDX_CII] + k[1771]*y_cur[IDX_C3H2II]; + data[jistart + 12864] = 0.0 - k[1788]*y_cur[IDX_C4H2II]; + data[jistart + 12865] = 0.0 + k[1830]*y_cur[IDX_C4HI] + k[2412]*y_cur[IDX_H2I] + + k[2869]*y_cur[IDX_HCNI]; + data[jistart + 12866] = 0.0 - k[4765]*y_cur[IDX_C4H2II]; + data[jistart + 12867] = 0.0 - k[4624]*y_cur[IDX_C4H2II]; + data[jistart + 12868] = 0.0 - k[3815]*y_cur[IDX_C4H2II]; + data[jistart + 12869] = 0.0 - k[4835]*y_cur[IDX_C4H2II]; + data[jistart + 12870] = 0.0 - k[4029]*y_cur[IDX_C4H2II]; + data[jistart + 12871] = 0.0 - k[4204]*y_cur[IDX_C4H2II]; + data[jistart + 12872] = 0.0 + k[1365]*y_cur[IDX_CII] + k[1777]*y_cur[IDX_C3H2II] - + k[2106]*y_cur[IDX_C4H2II] - k[2107]*y_cur[IDX_C4H2II]; + data[jistart + 12873] = 0.0 - k[4800]*y_cur[IDX_C4H2II]; + data[jistart + 12874] = 0.0 - k[3959]*y_cur[IDX_C4H2II]; + data[jistart + 12875] = 0.0 - k[4099]*y_cur[IDX_C4H2II]; + data[jistart + 12876] = 0.0 - k[4379]*y_cur[IDX_C4H2II]; + data[jistart + 12877] = 0.0 - k[4519]*y_cur[IDX_C4H2II]; + data[jistart + 12878] = 0.0 - k[4449]*y_cur[IDX_C4H2II]; + data[jistart + 12879] = 0.0 - k[4589]*y_cur[IDX_C4H2II]; + data[jistart + 12880] = 0.0 - k[3924]*y_cur[IDX_C4H2II]; + data[jistart + 12881] = 0.0 - k[4274]*y_cur[IDX_C4H2II]; + data[jistart + 12882] = 0.0 - k[4309]*y_cur[IDX_C4H2II]; + data[jistart + 12883] = 0.0 - k[3889]*y_cur[IDX_C4H2II]; + data[jistart + 12884] = 0.0 - k[4730]*y_cur[IDX_C4H2II]; + data[jistart + 12885] = 0.0 - k[4554]*y_cur[IDX_C4H2II]; + data[jistart + 12886] = 0.0 - k[4694]*y_cur[IDX_C4H2II]; + data[jistart + 12887] = 0.0 + k[1471]*y_cur[IDX_C2HII] - k[5517]*y_cur[IDX_C4H2II]; + data[jistart + 12888] = 0.0 + k[1858]*y_cur[IDX_CI]; + data[jistart + 12889] = 0.0 - k[4484]*y_cur[IDX_C4H2II]; + data[jistart + 12890] = 0.0 - k[3994]*y_cur[IDX_C4H2II]; + data[jistart + 12891] = 0.0 - k[4064]*y_cur[IDX_C4H2II]; + data[jistart + 12892] = 0.0 - k[4169]*y_cur[IDX_C4H2II]; + data[jistart + 12893] = 0.0 - k[4344]*y_cur[IDX_C4H2II]; + data[jistart + 12894] = 0.0 - k[4239]*y_cur[IDX_C4H2II]; + data[jistart + 12895] = 0.0 - k[4414]*y_cur[IDX_C4H2II]; + data[jistart + 12896] = 0.0 + k[2302]*y_cur[IDX_HII] + k[3110]*y_cur[IDX_HeII]; + data[jistart + 12897] = 0.0 + k[1466]*y_cur[IDX_C2H2I] + k[1471]*y_cur[IDX_HC3NI]; + data[jistart + 12898] = 0.0 + k[1771]*y_cur[IDX_CH2CCH2I] + k[1777]*y_cur[IDX_CH3CCHI]; + data[jistart + 12899] = 0.0 - k[4134]*y_cur[IDX_C4H2II]; + data[jistart + 12900] = 0.0 - k[4659]*y_cur[IDX_C4H2II]; + data[jistart + 12901] = 0.0 + k[1651]*y_cur[IDX_C3HI]; + data[jistart + 12902] = 0.0 + k[1347]*y_cur[IDX_CII] - k[2033]*y_cur[IDX_C4H2II] - + k[2034]*y_cur[IDX_C4H2II]; + data[jistart + 12903] = 0.0 + k[1893]*y_cur[IDX_CI]; + data[jistart + 12904] = 0.0 - k[1836]*y_cur[IDX_C4H2II]; + data[jistart + 12905] = 0.0 + k[1651]*y_cur[IDX_C2H4II] - k[1824]*y_cur[IDX_C4H2II] + + k[2051]*y_cur[IDX_CH3II]; + data[jistart + 12906] = 0.0 + k[1586]*y_cur[IDX_C2H3II] + k[1830]*y_cur[IDX_C4HII] - + k[1843]*y_cur[IDX_C4H2II] + k[2610]*y_cur[IDX_H3II] + + k[2780]*y_cur[IDX_H3OII] + k[2915]*y_cur[IDX_HCOII]; + data[jistart + 12907] = 0.0 + k[177]*y_cur[IDX_CII] + k[224]*y_cur[IDX_C2H2II] + + k[384]*y_cur[IDX_HII] + k[493]*y_cur[IDX_HC3NII] + + k[704]*y_cur[IDX_SII] - k[1837]*y_cur[IDX_C4H2II] - + k[1838]*y_cur[IDX_C4H2II] - k[5518]*y_cur[IDX_C4H2II] + k[5848] + + k[6173]; + data[jistart + 12908] = 0.0 - k[622]*y_cur[IDX_NOI] - k[822]*y_cur[IDX_eM] - + k[823]*y_cur[IDX_eM] - k[1552]*y_cur[IDX_C2H2I] - + k[1633]*y_cur[IDX_C2H3I] - k[1634]*y_cur[IDX_C2H3I] - + k[1696]*y_cur[IDX_C2H4I] - k[1697]*y_cur[IDX_C2H4I] - + k[1736]*y_cur[IDX_C2HI] - k[1788]*y_cur[IDX_C3H2I] - + k[1824]*y_cur[IDX_C3HI] - k[1835]*y_cur[IDX_C5H2I] - + k[1836]*y_cur[IDX_C5HI] - k[1837]*y_cur[IDX_C4H2I] - + k[1838]*y_cur[IDX_C4H2I] - k[1843]*y_cur[IDX_C4HI] - + k[1863]*y_cur[IDX_CI] - k[1864]*y_cur[IDX_CI] - + k[2033]*y_cur[IDX_CH2CCHI] - k[2034]*y_cur[IDX_CH2CCHI] - + k[2106]*y_cur[IDX_CH3CCHI] - k[2107]*y_cur[IDX_CH3CCHI] - + k[2169]*y_cur[IDX_CH4I] - k[2170]*y_cur[IDX_CH4I] - + k[2479]*y_cur[IDX_H2CCCI] - k[3405]*y_cur[IDX_NI] - + k[3406]*y_cur[IDX_NI] - k[3407]*y_cur[IDX_NI] - + k[3701]*y_cur[IDX_OI] - k[3702]*y_cur[IDX_OI] - + k[3815]*y_cur[IDX_PI] - k[3836]*y_cur[IDX_SI] - + k[3877]*y_cur[IDX_SiI] - k[3878]*y_cur[IDX_SiI] - + k[3889]*y_cur[IDX_CM] - k[3924]*y_cur[IDX_C10M] - + k[3959]*y_cur[IDX_C10HM] - k[3994]*y_cur[IDX_C2M] - + k[4029]*y_cur[IDX_C2HM] - k[4064]*y_cur[IDX_C3M] - + k[4099]*y_cur[IDX_C3HM] - k[4134]*y_cur[IDX_C3NM] - + k[4169]*y_cur[IDX_C4M] - k[4204]*y_cur[IDX_C4HM] - + k[4239]*y_cur[IDX_C5M] - k[4274]*y_cur[IDX_C5HM] - + k[4309]*y_cur[IDX_C5NM] - k[4344]*y_cur[IDX_C6M] - + k[4379]*y_cur[IDX_C6HM] - k[4414]*y_cur[IDX_C7M] - + k[4449]*y_cur[IDX_C7HM] - k[4484]*y_cur[IDX_C8M] - + k[4519]*y_cur[IDX_C8HM] - k[4554]*y_cur[IDX_C9M] - + k[4589]*y_cur[IDX_C9HM] - k[4624]*y_cur[IDX_CHM] - + k[4659]*y_cur[IDX_CNM] - k[4694]*y_cur[IDX_HM] - + k[4730]*y_cur[IDX_OM] - k[4765]*y_cur[IDX_O2M] - + k[4800]*y_cur[IDX_OHM] - k[4835]*y_cur[IDX_SM] - + k[5511]*y_cur[IDX_C2H2I] - k[5517]*y_cur[IDX_HC3NI] - + k[5518]*y_cur[IDX_C4H2I] - k[5519]*y_cur[IDX_HC5NI] - + k[5570]*y_cur[IDX_HI] - k[6627]*y_cur[IDX_GRAINM] - + k[6628]*y_cur[IDX_GRAINM]; + data[jistart + 12909] = 0.0 - k[1696]*y_cur[IDX_C4H2II] - k[1697]*y_cur[IDX_C4H2II]; + data[jistart + 12910] = 0.0 - k[1633]*y_cur[IDX_C4H2II] - k[1634]*y_cur[IDX_C4H2II]; + data[jistart + 12911] = 0.0 + k[704]*y_cur[IDX_C4H2I]; + data[jistart + 12912] = 0.0 - k[3877]*y_cur[IDX_C4H2II] - k[3878]*y_cur[IDX_C4H2II]; + data[jistart + 12913] = 0.0 + k[1586]*y_cur[IDX_C4HI] + k[1727]*y_cur[IDX_C2HI]; + data[jistart + 12914] = 0.0 - k[622]*y_cur[IDX_C4H2II]; + data[jistart + 12915] = 0.0 + k[2158]*y_cur[IDX_C3II] - k[2169]*y_cur[IDX_C4H2II] - + k[2170]*y_cur[IDX_C4H2II] + k[2176]*y_cur[IDX_C5II]; + data[jistart + 12916] = 0.0 + k[1725]*y_cur[IDX_C2H2II] + k[1727]*y_cur[IDX_C2H3II] - + k[1736]*y_cur[IDX_C4H2II]; + data[jistart + 12917] = 0.0 + k[2869]*y_cur[IDX_C4HII]; + data[jistart + 12918] = 0.0 - k[3836]*y_cur[IDX_C4H2II]; + data[jistart + 12919] = 0.0 + k[224]*y_cur[IDX_C4H2I] + k[1479]*y_cur[IDX_C2H2I] + + k[1725]*y_cur[IDX_C2HI]; + data[jistart + 12920] = 0.0 + k[2051]*y_cur[IDX_C3HI]; + data[jistart + 12921] = 0.0 + k[1466]*y_cur[IDX_C2HII] + k[1479]*y_cur[IDX_C2H2II] - + k[1552]*y_cur[IDX_C4H2II] + k[1565]*y_cur[IDX_HC3NII] - + k[5511]*y_cur[IDX_C4H2II]; + data[jistart + 12922] = 0.0 - k[3405]*y_cur[IDX_C4H2II] - k[3406]*y_cur[IDX_C4H2II] - + k[3407]*y_cur[IDX_C4H2II]; + data[jistart + 12923] = 0.0 + k[2780]*y_cur[IDX_C4HI]; + data[jistart + 12924] = 0.0 - k[3701]*y_cur[IDX_C4H2II] - k[3702]*y_cur[IDX_C4H2II]; + data[jistart + 12925] = 0.0 + k[3110]*y_cur[IDX_C4H3I]; + data[jistart + 12926] = 0.0 + k[177]*y_cur[IDX_C4H2I] + k[1345]*y_cur[IDX_CH2CCH2I] + + k[1347]*y_cur[IDX_CH2CCHI] + k[1365]*y_cur[IDX_CH3CCHI]; + data[jistart + 12927] = 0.0 + k[384]*y_cur[IDX_C4H2I] + k[2302]*y_cur[IDX_C4H3I]; + data[jistart + 12928] = 0.0 + k[1858]*y_cur[IDX_C3H3II] + k[1859]*y_cur[IDX_C3H4II] - + k[1863]*y_cur[IDX_C4H2II] - k[1864]*y_cur[IDX_C4H2II] + + k[1893]*y_cur[IDX_CH2CCHII]; + data[jistart + 12929] = 0.0 + k[2915]*y_cur[IDX_C4HI]; + data[jistart + 12930] = 0.0 + k[2610]*y_cur[IDX_C4HI]; + data[jistart + 12931] = 0.0 - k[6627]*y_cur[IDX_C4H2II] - k[6628]*y_cur[IDX_C4H2II]; + data[jistart + 12932] = 0.0 + k[2412]*y_cur[IDX_C4HII]; + data[jistart + 12933] = 0.0 - k[822]*y_cur[IDX_C4H2II] - k[823]*y_cur[IDX_C4H2II]; + data[jistart + 12934] = 0.0 - k[5570]*y_cur[IDX_C4H2II]; + data[jistart + 12935] = 0.0 + k[3566]*y_cur[IDX_NH3I]; + data[jistart + 12936] = 0.0 + k[2864]*y_cur[IDX_HCNI]; + data[jistart + 12937] = 0.0 + k[2880]*y_cur[IDX_HCNI]; + data[jistart + 12938] = 0.0 + k[2882]*y_cur[IDX_HCNI]; + data[jistart + 12939] = 0.0 + k[2872]*y_cur[IDX_HCNI]; + data[jistart + 12940] = 0.0 - k[2886]*y_cur[IDX_HCNHII] - k[2887]*y_cur[IDX_HCNHII]; + data[jistart + 12941] = 0.0 + k[3561]*y_cur[IDX_NH3I]; + data[jistart + 12942] = 0.0 + k[2884]*y_cur[IDX_HCNI]; + data[jistart + 12943] = 0.0 + k[2069]*y_cur[IDX_CH3II] - k[2888]*y_cur[IDX_HCNHII] - + k[2889]*y_cur[IDX_HCNHII]; + data[jistart + 12944] = 0.0 + k[2876]*y_cur[IDX_HCNI] + k[3040]*y_cur[IDX_HNCI]; + data[jistart + 12945] = 0.0 + k[2883]*y_cur[IDX_HCNI] + k[3045]*y_cur[IDX_HNCI]; + data[jistart + 12946] = 0.0 + k[2878]*y_cur[IDX_HCNI] + k[3042]*y_cur[IDX_HNCI]; + data[jistart + 12947] = 0.0 + k[2862]*y_cur[IDX_HCNI] + k[3037]*y_cur[IDX_HNCI]; + data[jistart + 12948] = 0.0 + k[2200]*y_cur[IDX_CH4I] + k[2450]*y_cur[IDX_H2I] + + k[2856]*y_cur[IDX_HCNI] + k[2858]*y_cur[IDX_HCOI] + + k[2859]*y_cur[IDX_HNCI] + k[3581]*y_cur[IDX_NH3I]; + data[jistart + 12949] = 0.0 + k[3572]*y_cur[IDX_NH3I]; + data[jistart + 12950] = 0.0 + k[2879]*y_cur[IDX_HCNI] + k[3043]*y_cur[IDX_HNCI]; + data[jistart + 12951] = 0.0 + k[3493]*y_cur[IDX_HCNI] + k[3495]*y_cur[IDX_HNCI]; + data[jistart + 12952] = 0.0 - k[4778]*y_cur[IDX_HCNHII] - k[4779]*y_cur[IDX_HCNHII]; + data[jistart + 12953] = 0.0 - k[4637]*y_cur[IDX_HCNHII] - k[4638]*y_cur[IDX_HCNHII]; + data[jistart + 12954] = 0.0 + k[3519]*y_cur[IDX_HCNI] + k[3521]*y_cur[IDX_HNCI]; + data[jistart + 12955] = 0.0 - k[4848]*y_cur[IDX_HCNHII] - k[4849]*y_cur[IDX_HCNHII]; + data[jistart + 12956] = 0.0 - k[4042]*y_cur[IDX_HCNHII] - k[4043]*y_cur[IDX_HCNHII]; + data[jistart + 12957] = 0.0 - k[4217]*y_cur[IDX_HCNHII] - k[4218]*y_cur[IDX_HCNHII]; + data[jistart + 12958] = 0.0 + k[2229]*y_cur[IDX_HCNI] + k[2232]*y_cur[IDX_HNCI]; + data[jistart + 12959] = 0.0 - k[4813]*y_cur[IDX_HCNHII] - k[4814]*y_cur[IDX_HCNHII]; + data[jistart + 12960] = 0.0 - k[3972]*y_cur[IDX_HCNHII] - k[3973]*y_cur[IDX_HCNHII]; + data[jistart + 12961] = 0.0 - k[4112]*y_cur[IDX_HCNHII] - k[4113]*y_cur[IDX_HCNHII]; + data[jistart + 12962] = 0.0 - k[4392]*y_cur[IDX_HCNHII] - k[4393]*y_cur[IDX_HCNHII]; + data[jistart + 12963] = 0.0 - k[4532]*y_cur[IDX_HCNHII] - k[4533]*y_cur[IDX_HCNHII]; + data[jistart + 12964] = 0.0 - k[4462]*y_cur[IDX_HCNHII] - k[4463]*y_cur[IDX_HCNHII]; + data[jistart + 12965] = 0.0 - k[4602]*y_cur[IDX_HCNHII] - k[4603]*y_cur[IDX_HCNHII]; + data[jistart + 12966] = 0.0 - k[3937]*y_cur[IDX_HCNHII] - k[3938]*y_cur[IDX_HCNHII]; + data[jistart + 12967] = 0.0 - k[4287]*y_cur[IDX_HCNHII] - k[4288]*y_cur[IDX_HCNHII]; + data[jistart + 12968] = 0.0 - k[4322]*y_cur[IDX_HCNHII] - k[4323]*y_cur[IDX_HCNHII]; + data[jistart + 12969] = 0.0 - k[3902]*y_cur[IDX_HCNHII] - k[3903]*y_cur[IDX_HCNHII]; + data[jistart + 12970] = 0.0 - k[4743]*y_cur[IDX_HCNHII] - k[4744]*y_cur[IDX_HCNHII]; + data[jistart + 12971] = 0.0 - k[4567]*y_cur[IDX_HCNHII] - k[4568]*y_cur[IDX_HCNHII]; + data[jistart + 12972] = 0.0 - k[4708]*y_cur[IDX_HCNHII] - k[4709]*y_cur[IDX_HCNHII]; + data[jistart + 12973] = 0.0 - k[2894]*y_cur[IDX_HCNHII] - k[2895]*y_cur[IDX_HCNHII]; + data[jistart + 12974] = 0.0 + k[3564]*y_cur[IDX_NH3I]; + data[jistart + 12975] = 0.0 - k[4497]*y_cur[IDX_HCNHII] - k[4498]*y_cur[IDX_HCNHII]; + data[jistart + 12976] = 0.0 - k[4007]*y_cur[IDX_HCNHII] - k[4008]*y_cur[IDX_HCNHII]; + data[jistart + 12977] = 0.0 - k[4077]*y_cur[IDX_HCNHII] - k[4078]*y_cur[IDX_HCNHII]; + data[jistart + 12978] = 0.0 - k[4182]*y_cur[IDX_HCNHII] - k[4183]*y_cur[IDX_HCNHII]; + data[jistart + 12979] = 0.0 - k[4357]*y_cur[IDX_HCNHII] - k[4358]*y_cur[IDX_HCNHII]; + data[jistart + 12980] = 0.0 + k[2875]*y_cur[IDX_HCNI] + k[3039]*y_cur[IDX_HNCI]; + data[jistart + 12981] = 0.0 - k[4252]*y_cur[IDX_HCNHII] - k[4253]*y_cur[IDX_HCNHII]; + data[jistart + 12982] = 0.0 - k[4427]*y_cur[IDX_HCNHII] - k[4428]*y_cur[IDX_HCNHII]; + data[jistart + 12983] = 0.0 - k[3540]*y_cur[IDX_HCNHII] - k[3541]*y_cur[IDX_HCNHII]; + data[jistart + 12984] = 0.0 + k[1476]*y_cur[IDX_HCNI] + k[1478]*y_cur[IDX_HNCI]; + data[jistart + 12985] = 0.0 + k[3398]*y_cur[IDX_NI]; + data[jistart + 12986] = 0.0 + k[3781]*y_cur[IDX_HCNI] + k[3784]*y_cur[IDX_HNCI]; + data[jistart + 12987] = 0.0 + k[2512]*y_cur[IDX_HCNI] + k[2515]*y_cur[IDX_HNCI]; + data[jistart + 12988] = 0.0 - k[4147]*y_cur[IDX_HCNHII] - k[4148]*y_cur[IDX_HCNHII]; + data[jistart + 12989] = 0.0 + k[1958]*y_cur[IDX_HCNI] + k[1960]*y_cur[IDX_HNCI]; + data[jistart + 12990] = 0.0 - k[3629]*y_cur[IDX_HCNHII] - k[3630]*y_cur[IDX_HCNHII]; + data[jistart + 12991] = 0.0 + k[3608]*y_cur[IDX_CH3II]; + data[jistart + 12992] = 0.0 - k[4672]*y_cur[IDX_HCNHII] - k[4673]*y_cur[IDX_HCNHII]; + data[jistart + 12993] = 0.0 + k[2881]*y_cur[IDX_HCNI] + k[3044]*y_cur[IDX_HNCI]; + data[jistart + 12994] = 0.0 + k[3342]*y_cur[IDX_CH4I]; + data[jistart + 12995] = 0.0 + k[2874]*y_cur[IDX_HCNI] + k[3038]*y_cur[IDX_HNCI]; + data[jistart + 12996] = 0.0 + k[3407]*y_cur[IDX_NI]; + data[jistart + 12997] = 0.0 - k[1089]*y_cur[IDX_eM] - k[1090]*y_cur[IDX_eM] - + k[1091]*y_cur[IDX_eM] - k[2006]*y_cur[IDX_CH2I] - + k[2007]*y_cur[IDX_CH2I] - k[2251]*y_cur[IDX_CHI] - + k[2252]*y_cur[IDX_CHI] - k[2886]*y_cur[IDX_CH2CHCNI] - + k[2887]*y_cur[IDX_CH2CHCNI] - k[2888]*y_cur[IDX_CH3CNI] - + k[2889]*y_cur[IDX_CH3CNI] - k[2890]*y_cur[IDX_H2COI] - + k[2891]*y_cur[IDX_H2COI] - k[2892]*y_cur[IDX_H2SI] - + k[2893]*y_cur[IDX_H2SI] - k[2894]*y_cur[IDX_HC3NI] - + k[2895]*y_cur[IDX_HC3NI] - k[2896]*y_cur[IDX_SiI] - + k[3540]*y_cur[IDX_NH2I] - k[3541]*y_cur[IDX_NH2I] - + k[3582]*y_cur[IDX_NH3I] - k[3583]*y_cur[IDX_NH3I] - + k[3629]*y_cur[IDX_NaI] - k[3630]*y_cur[IDX_NaI] - + k[3902]*y_cur[IDX_CM] - k[3903]*y_cur[IDX_CM] - + k[3937]*y_cur[IDX_C10M] - k[3938]*y_cur[IDX_C10M] - + k[3972]*y_cur[IDX_C10HM] - k[3973]*y_cur[IDX_C10HM] - + k[4007]*y_cur[IDX_C2M] - k[4008]*y_cur[IDX_C2M] - + k[4042]*y_cur[IDX_C2HM] - k[4043]*y_cur[IDX_C2HM] - + k[4077]*y_cur[IDX_C3M] - k[4078]*y_cur[IDX_C3M] - + k[4112]*y_cur[IDX_C3HM] - k[4113]*y_cur[IDX_C3HM] - + k[4147]*y_cur[IDX_C3NM] - k[4148]*y_cur[IDX_C3NM] - + k[4182]*y_cur[IDX_C4M] - k[4183]*y_cur[IDX_C4M] - + k[4217]*y_cur[IDX_C4HM] - k[4218]*y_cur[IDX_C4HM] - + k[4252]*y_cur[IDX_C5M] - k[4253]*y_cur[IDX_C5M] - + k[4287]*y_cur[IDX_C5HM] - k[4288]*y_cur[IDX_C5HM] - + k[4322]*y_cur[IDX_C5NM] - k[4323]*y_cur[IDX_C5NM] - + k[4357]*y_cur[IDX_C6M] - k[4358]*y_cur[IDX_C6M] - + k[4392]*y_cur[IDX_C6HM] - k[4393]*y_cur[IDX_C6HM] - + k[4427]*y_cur[IDX_C7M] - k[4428]*y_cur[IDX_C7M] - + k[4462]*y_cur[IDX_C7HM] - k[4463]*y_cur[IDX_C7HM] - + k[4497]*y_cur[IDX_C8M] - k[4498]*y_cur[IDX_C8M] - + k[4532]*y_cur[IDX_C8HM] - k[4533]*y_cur[IDX_C8HM] - + k[4567]*y_cur[IDX_C9M] - k[4568]*y_cur[IDX_C9M] - + k[4602]*y_cur[IDX_C9HM] - k[4603]*y_cur[IDX_C9HM] - + k[4637]*y_cur[IDX_CHM] - k[4638]*y_cur[IDX_CHM] - + k[4672]*y_cur[IDX_CNM] - k[4673]*y_cur[IDX_CNM] - + k[4708]*y_cur[IDX_HM] - k[4709]*y_cur[IDX_HM] - + k[4743]*y_cur[IDX_OM] - k[4744]*y_cur[IDX_OM] - + k[4778]*y_cur[IDX_O2M] - k[4779]*y_cur[IDX_O2M] - + k[4813]*y_cur[IDX_OHM] - k[4814]*y_cur[IDX_OHM] - + k[4848]*y_cur[IDX_SM] - k[4849]*y_cur[IDX_SM] - + k[6378]*y_cur[IDX_GRAINM] - k[6379]*y_cur[IDX_GRAINM] - + k[6380]*y_cur[IDX_GRAINM]; + data[jistart + 12998] = 0.0 - k[2006]*y_cur[IDX_HCNHII] - k[2007]*y_cur[IDX_HCNHII]; + data[jistart + 12999] = 0.0 + k[1478]*y_cur[IDX_C2HII] + k[1525]*y_cur[IDX_C2H2II] + + k[1960]*y_cur[IDX_CHII] + k[2232]*y_cur[IDX_CH5II] + + k[2515]*y_cur[IDX_H2OII] + k[2706]*y_cur[IDX_H3II] + + k[2810]*y_cur[IDX_H3OII] + k[2859]*y_cur[IDX_HCNII] + + k[3036]*y_cur[IDX_C2H3II] + k[3037]*y_cur[IDX_C2H5II] + + k[3038]*y_cur[IDX_H2COII] + k[3039]*y_cur[IDX_H3COII] + + k[3040]*y_cur[IDX_H3SII] + k[3041]*y_cur[IDX_HCOII] + + k[3042]*y_cur[IDX_HNOII] + k[3043]*y_cur[IDX_HSII] + + k[3044]*y_cur[IDX_N2HII] + k[3045]*y_cur[IDX_O2HII] + + k[3495]*y_cur[IDX_NHII] + k[3521]*y_cur[IDX_NH2II] + + k[3784]*y_cur[IDX_OHII]; + data[jistart + 13000] = 0.0 - k[2892]*y_cur[IDX_HCNHII] - k[2893]*y_cur[IDX_HCNHII]; + data[jistart + 13001] = 0.0 - k[2896]*y_cur[IDX_HCNHII]; + data[jistart + 13002] = 0.0 + k[2861]*y_cur[IDX_HCNI] + k[3036]*y_cur[IDX_HNCI]; + data[jistart + 13003] = 0.0 + k[2858]*y_cur[IDX_HCNII]; + data[jistart + 13004] = 0.0 + k[2200]*y_cur[IDX_HCNII] + k[3342]*y_cur[IDX_NII]; + data[jistart + 13005] = 0.0 - k[2890]*y_cur[IDX_HCNHII] - k[2891]*y_cur[IDX_HCNHII]; + data[jistart + 13006] = 0.0 + k[1476]*y_cur[IDX_C2HII] + k[1523]*y_cur[IDX_C2H2II] + + k[1958]*y_cur[IDX_CHII] + k[2229]*y_cur[IDX_CH5II] + + k[2512]*y_cur[IDX_H2OII] + k[2694]*y_cur[IDX_H3II] + + k[2806]*y_cur[IDX_H3OII] + k[2856]*y_cur[IDX_HCNII] + + k[2861]*y_cur[IDX_C2H3II] + k[2862]*y_cur[IDX_C2H5II] + + k[2864]*y_cur[IDX_C2H7II] + k[2872]*y_cur[IDX_C2H6II] + + k[2874]*y_cur[IDX_H2COII] + k[2875]*y_cur[IDX_H3COII] + + k[2876]*y_cur[IDX_H3SII] + k[2877]*y_cur[IDX_HCOII] + + k[2878]*y_cur[IDX_HNOII] + k[2879]*y_cur[IDX_HSII] + + k[2880]*y_cur[IDX_HSiSII] + k[2881]*y_cur[IDX_N2HII] + + k[2882]*y_cur[IDX_NCCNHII] + k[2883]*y_cur[IDX_O2HII] + + k[2884]*y_cur[IDX_PHII] + k[3493]*y_cur[IDX_NHII] + + k[3519]*y_cur[IDX_NH2II] + k[3781]*y_cur[IDX_OHII]; + data[jistart + 13007] = 0.0 - k[2251]*y_cur[IDX_HCNHII] - k[2252]*y_cur[IDX_HCNHII]; + data[jistart + 13008] = 0.0 + k[3561]*y_cur[IDX_C2NII] + k[3564]*y_cur[IDX_C3H3II] + + k[3566]*y_cur[IDX_CClII] + k[3572]*y_cur[IDX_CNCII] + + k[3581]*y_cur[IDX_HCNII] - k[3582]*y_cur[IDX_HCNHII] - + k[3583]*y_cur[IDX_HCNHII]; + data[jistart + 13009] = 0.0 + k[1523]*y_cur[IDX_HCNI] + k[1525]*y_cur[IDX_HNCI]; + data[jistart + 13010] = 0.0 + k[2069]*y_cur[IDX_CH3CNI] + k[3608]*y_cur[IDX_NHI]; + data[jistart + 13011] = 0.0 + k[3398]*y_cur[IDX_C3H2II] + k[3407]*y_cur[IDX_C4H2II]; + data[jistart + 13012] = 0.0 + k[2806]*y_cur[IDX_HCNI] + k[2810]*y_cur[IDX_HNCI]; + data[jistart + 13013] = 0.0 + k[2877]*y_cur[IDX_HCNI] + k[3041]*y_cur[IDX_HNCI]; + data[jistart + 13014] = 0.0 + k[2694]*y_cur[IDX_HCNI] + k[2706]*y_cur[IDX_HNCI]; + data[jistart + 13015] = 0.0 - k[6378]*y_cur[IDX_HCNHII] - k[6379]*y_cur[IDX_HCNHII] - + k[6380]*y_cur[IDX_HCNHII]; + data[jistart + 13016] = 0.0 + k[2450]*y_cur[IDX_HCNII]; + data[jistart + 13017] = 0.0 - k[1089]*y_cur[IDX_HCNHII] - k[1090]*y_cur[IDX_HCNHII] - + k[1091]*y_cur[IDX_HCNHII]; + data[jistart + 13018] = 0.0 + k[926]*y_cur[IDX_eM] + k[6760]*y_cur[IDX_GRAINM]; + data[jistart + 13019] = 0.0 + k[994]*y_cur[IDX_eM] + k[6536]*y_cur[IDX_GRAINM]; + data[jistart + 13020] = 0.0 + k[1272]*y_cur[IDX_eM] + k[6696]*y_cur[IDX_GRAINM]; + data[jistart + 13021] = 0.0 + k[922]*y_cur[IDX_eM] + k[6409]*y_cur[IDX_GRAINM]; + data[jistart + 13022] = 0.0 + k[1285]*y_cur[IDX_eM] + k[6712]*y_cur[IDX_GRAINM]; + data[jistart + 13023] = 0.0 + k[955]*y_cur[IDX_eM] + k[6587]*y_cur[IDX_GRAINM]; + data[jistart + 13024] = 0.0 + k[1275]*y_cur[IDX_eM] + k[6701]*y_cur[IDX_GRAINM]; + data[jistart + 13025] = 0.0 + k[945]*y_cur[IDX_eM] + k[6485]*y_cur[IDX_GRAINM]; + data[jistart + 13026] = 0.0 + k[916]*y_cur[IDX_eM] + k[6475]*y_cur[IDX_GRAINM]; + data[jistart + 13027] = 0.0 + k[950]*y_cur[IDX_eM] + k[6683]*y_cur[IDX_GRAINM]; + data[jistart + 13028] = 0.0 + k[3321]*y_cur[IDX_HeII]; + data[jistart + 13029] = 0.0 + k[809]*y_cur[IDX_eM] + k[6506]*y_cur[IDX_GRAINM]; + data[jistart + 13030] = 0.0 + k[920]*y_cur[IDX_eM] + k[6494]*y_cur[IDX_GRAINM]; + data[jistart + 13031] = 0.0 + k[3174]*y_cur[IDX_HeII] + k[6094]; + data[jistart + 13032] = 0.0 - k[5002]*y_cur[IDX_CH2I]; + data[jistart + 13033] = 0.0 + k[5788] + k[6090]; + data[jistart + 13034] = 0.0 + k[3223]*y_cur[IDX_HeII]; + data[jistart + 13035] = 0.0 + k[2317]*y_cur[IDX_HII] + k[5791]; + data[jistart + 13036] = 0.0 + k[5637]*y_cur[IDX_HeII] + k[5937] + k[6290]; + data[jistart + 13037] = 0.0 + k[939]*y_cur[IDX_eM] + k[6561]*y_cur[IDX_GRAINM]; + data[jistart + 13038] = 0.0 + k[5095]*y_cur[IDX_CHI]; + data[jistart + 13039] = 0.0 - k[5000]*y_cur[IDX_CH2I] + k[5078]*y_cur[IDX_CHI]; + data[jistart + 13040] = 0.0 + k[963]*y_cur[IDX_eM] + k[6440]*y_cur[IDX_GRAINM]; + data[jistart + 13041] = 0.0 + k[3171]*y_cur[IDX_HeII] + k[5790] + k[6092]; + data[jistart + 13042] = 0.0 + k[1243]*y_cur[IDX_eM] + k[6497]*y_cur[IDX_GRAINM]; + data[jistart + 13043] = 0.0 + k[2071]*y_cur[IDX_CH3II]; + data[jistart + 13044] = 0.0 + k[7075] + k[7257] + k[7439]; + data[jistart + 13045] = 0.0 - k[2015]*y_cur[IDX_CH2I]; + data[jistart + 13046] = 0.0 + k[968]*y_cur[IDX_eM] + k[6327]*y_cur[IDX_GRAINM]; + data[jistart + 13047] = 0.0 - k[2009]*y_cur[IDX_CH2I]; + data[jistart + 13048] = 0.0 + k[768]*y_cur[IDX_eM] + k[6395]*y_cur[IDX_GRAINM]; + data[jistart + 13049] = 0.0 + k[5381]*y_cur[IDX_OI]; + data[jistart + 13050] = 0.0 - k[260]*y_cur[IDX_CH2I]; + data[jistart + 13051] = 0.0 + k[1369]*y_cur[IDX_CII]; + data[jistart + 13052] = 0.0 - k[264]*y_cur[IDX_CH2I]; + data[jistart + 13053] = 0.0 - k[2005]*y_cur[IDX_CH2I]; + data[jistart + 13054] = 0.0 + k[5805] + k[6110]; + data[jistart + 13055] = 0.0 - k[259]*y_cur[IDX_CH2I] - k[1995]*y_cur[IDX_CH2I] + + k[2147]*y_cur[IDX_CH4I]; + data[jistart + 13056] = 0.0 - k[2011]*y_cur[IDX_CH2I]; + data[jistart + 13057] = 0.0 + k[105]*y_cur[IDX_HI]; + data[jistart + 13058] = 0.0 - k[440]*y_cur[IDX_CH2I] - k[2375]*y_cur[IDX_CH2I]; + data[jistart + 13059] = 0.0 - k[265]*y_cur[IDX_CH2I] - k[2012]*y_cur[IDX_CH2I]; + data[jistart + 13060] = 0.0 - k[261]*y_cur[IDX_CH2I] - k[2001]*y_cur[IDX_CH2I]; + data[jistart + 13061] = 0.0 + k[972]*y_cur[IDX_eM] - k[2000]*y_cur[IDX_CH2I] + + k[3729]*y_cur[IDX_OI] + k[6332]*y_cur[IDX_GRAINM]; + data[jistart + 13062] = 0.0 - k[1]*y_cur[IDX_CH2I] + k[82]*y_cur[IDX_H2I]; + data[jistart + 13063] = 0.0 - k[59]*y_cur[IDX_CH2I]; + data[jistart + 13064] = 0.0 + k[1939]*y_cur[IDX_CHII]; + data[jistart + 13065] = 0.0 - k[69]*y_cur[IDX_CH2I] + k[71]*y_cur[IDX_CHI]; + data[jistart + 13066] = 0.0 + k[1034]*y_cur[IDX_eM] + k[6414]*y_cur[IDX_GRAINM]; + data[jistart + 13067] = 0.0 - k[2019]*y_cur[IDX_CH2I]; + data[jistart + 13068] = 0.0 + k[8577]*y_cur[IDX_GHI]; + data[jistart + 13069] = 0.0 - k[1996]*y_cur[IDX_CH2I] - k[1997]*y_cur[IDX_CH2I]; + data[jistart + 13070] = 0.0 + k[791]*y_cur[IDX_eM] + k[6461]*y_cur[IDX_GRAINM]; + data[jistart + 13071] = 0.0 + k[258]*y_cur[IDX_NOI]; + data[jistart + 13072] = 0.0 - k[268]*y_cur[IDX_CH2I] - k[2016]*y_cur[IDX_CH2I] + + k[2210]*y_cur[IDX_CH4I]; + data[jistart + 13073] = 0.0 - k[263]*y_cur[IDX_CH2I] - k[2003]*y_cur[IDX_CH2I]; + data[jistart + 13074] = 0.0 + k[8653]*y_cur[IDX_GCI]; + data[jistart + 13075] = 0.0 - k[1936]*y_cur[IDX_CH2I] + k[1939]*y_cur[IDX_CH3OHI] + + k[1950]*y_cur[IDX_H2COI]; + data[jistart + 13076] = 0.0 - k[267]*y_cur[IDX_CH2I] - k[2014]*y_cur[IDX_CH2I]; + data[jistart + 13077] = 0.0 + k[8653]*y_cur[IDX_GH2I]; + data[jistart + 13078] = 0.0 + k[761]*y_cur[IDX_eM] + k[761]*y_cur[IDX_eM] + + k[1730]*y_cur[IDX_C2HI] + k[6385]*y_cur[IDX_GRAINM] + + k[6385]*y_cur[IDX_GRAINM]; + data[jistart + 13079] = 0.0 - k[2010]*y_cur[IDX_CH2I]; + data[jistart + 13080] = 0.0 - k[544]*y_cur[IDX_CH2I] + k[3346]*y_cur[IDX_H2COI]; + data[jistart + 13081] = 0.0 - k[262]*y_cur[IDX_CH2I] + k[996]*y_cur[IDX_eM] - + k[2002]*y_cur[IDX_CH2I] + k[6398]*y_cur[IDX_GRAINM]; + data[jistart + 13082] = 0.0 - k[266]*y_cur[IDX_CH2I]; + data[jistart + 13083] = 0.0 - k[2006]*y_cur[IDX_CH2I] - k[2007]*y_cur[IDX_CH2I]; + data[jistart + 13084] = 0.0 - k[1]*y_cur[IDX_CM] - k[59]*y_cur[IDX_OM] - k[69]*y_cur[IDX_HM] + - k[160]*y_cur[IDX_CII] - k[259]*y_cur[IDX_C2II] - + k[260]*y_cur[IDX_CNII] - k[261]*y_cur[IDX_COII] - + k[262]*y_cur[IDX_H2COII] - k[263]*y_cur[IDX_H2OII] - + k[264]*y_cur[IDX_N2II] - k[265]*y_cur[IDX_NH2II] - + k[266]*y_cur[IDX_OII] - k[267]*y_cur[IDX_O2II] - + k[268]*y_cur[IDX_OHII] - k[359]*y_cur[IDX_HII] - + k[440]*y_cur[IDX_H2II] - k[544]*y_cur[IDX_NII] - + k[1342]*y_cur[IDX_CII] - k[1936]*y_cur[IDX_CHII] - + k[1995]*y_cur[IDX_C2II] - k[1996]*y_cur[IDX_C2HII] - + k[1997]*y_cur[IDX_C2HII] - k[1998]*y_cur[IDX_C2H2II] - + k[1999]*y_cur[IDX_CH3II] - k[2000]*y_cur[IDX_CH5II] - + k[2001]*y_cur[IDX_COII] - k[2002]*y_cur[IDX_H2COII] - + k[2003]*y_cur[IDX_H2OII] - k[2004]*y_cur[IDX_H3OII] - + k[2005]*y_cur[IDX_HCNII] - k[2006]*y_cur[IDX_HCNHII] - + k[2007]*y_cur[IDX_HCNHII] - k[2008]*y_cur[IDX_HCOII] - + k[2009]*y_cur[IDX_HNOII] - k[2010]*y_cur[IDX_N2HII] - + k[2011]*y_cur[IDX_NHII] - k[2012]*y_cur[IDX_NH2II] - + k[2013]*y_cur[IDX_NH3II] - k[2014]*y_cur[IDX_O2II] - + k[2015]*y_cur[IDX_O2HII] - k[2016]*y_cur[IDX_OHII] - + k[2017]*y_cur[IDX_SII] - k[2018]*y_cur[IDX_SiII] - + k[2019]*y_cur[IDX_SiOII] - k[2314]*y_cur[IDX_HII] - + k[2375]*y_cur[IDX_H2II] - k[2634]*y_cur[IDX_H3II] - + k[3160]*y_cur[IDX_HeII] - k[3161]*y_cur[IDX_HeII] - + k[4944]*y_cur[IDX_CI] - k[4945]*y_cur[IDX_CI] - + k[4991]*y_cur[IDX_C2H2I] - k[4992]*y_cur[IDX_CH2I] - + k[4992]*y_cur[IDX_CH2I] - k[4992]*y_cur[IDX_CH2I] - + k[4992]*y_cur[IDX_CH2I] - k[4993]*y_cur[IDX_CH2I] - + k[4993]*y_cur[IDX_CH2I] - k[4993]*y_cur[IDX_CH2I] - + k[4993]*y_cur[IDX_CH2I] - k[4994]*y_cur[IDX_CH2I] - + k[4994]*y_cur[IDX_CH2I] - k[4994]*y_cur[IDX_CH2I] - + k[4994]*y_cur[IDX_CH2I] - k[4995]*y_cur[IDX_CH2I] - + k[4995]*y_cur[IDX_CH2I] - k[4995]*y_cur[IDX_CH2I] - + k[4995]*y_cur[IDX_CH2I] - k[4996]*y_cur[IDX_CH4I] - + k[4997]*y_cur[IDX_CNI] - k[4998]*y_cur[IDX_H2COI] - + k[4999]*y_cur[IDX_HCOI] - k[5000]*y_cur[IDX_HNOI] - + k[5001]*y_cur[IDX_N2I] - k[5002]*y_cur[IDX_NO2I] - + k[5003]*y_cur[IDX_NOI] - k[5004]*y_cur[IDX_NOI] - + k[5005]*y_cur[IDX_NOI] - k[5006]*y_cur[IDX_NOI] - + k[5007]*y_cur[IDX_O2I] - k[5008]*y_cur[IDX_O2I] - + k[5009]*y_cur[IDX_O2I] - k[5010]*y_cur[IDX_O2I] - + k[5011]*y_cur[IDX_O2I] - k[5012]*y_cur[IDX_OI] - + k[5013]*y_cur[IDX_OI] - k[5014]*y_cur[IDX_OI] - + k[5015]*y_cur[IDX_OI] - k[5016]*y_cur[IDX_OHI] - + k[5017]*y_cur[IDX_OHI] - k[5018]*y_cur[IDX_OHI] - + k[5019]*y_cur[IDX_SI] - k[5020]*y_cur[IDX_SI] - + k[5021]*y_cur[IDX_SiI] - k[5135]*y_cur[IDX_H2I] - + k[5156]*y_cur[IDX_HI] - k[5253]*y_cur[IDX_NI] - + k[5254]*y_cur[IDX_NI] - k[5255]*y_cur[IDX_NI] - k[5778] - k[5779] - + k[6078] - k[6079] - k[6893]; + data[jistart + 13085] = 0.0 - k[2013]*y_cur[IDX_CH2I]; + data[jistart + 13086] = 0.0 + k[3082]*y_cur[IDX_HeII] + k[5348]*y_cur[IDX_OI]; + data[jistart + 13087] = 0.0 + k[1482]*y_cur[IDX_C2H2II]; + data[jistart + 13088] = 0.0 - k[5001]*y_cur[IDX_CH2I]; + data[jistart + 13089] = 0.0 - k[5007]*y_cur[IDX_CH2I] - k[5008]*y_cur[IDX_CH2I] - + k[5009]*y_cur[IDX_CH2I] - k[5010]*y_cur[IDX_CH2I] - + k[5011]*y_cur[IDX_CH2I] + k[5041]*y_cur[IDX_CH3I]; + data[jistart + 13090] = 0.0 - k[2018]*y_cur[IDX_CH2I]; + data[jistart + 13091] = 0.0 - k[2017]*y_cur[IDX_CH2I]; + data[jistart + 13092] = 0.0 - k[5021]*y_cur[IDX_CH2I]; + data[jistart + 13093] = 0.0 + k[753]*y_cur[IDX_eM] + k[754]*y_cur[IDX_eM] + + k[6368]*y_cur[IDX_GRAINM] + k[6369]*y_cur[IDX_GRAINM]; + data[jistart + 13094] = 0.0 + k[258]*y_cur[IDX_CH2II] - k[5003]*y_cur[IDX_CH2I] - + k[5004]*y_cur[IDX_CH2I] - k[5005]*y_cur[IDX_CH2I] - + k[5006]*y_cur[IDX_CH2I]; + data[jistart + 13095] = 0.0 - k[4999]*y_cur[IDX_CH2I] + k[5077]*y_cur[IDX_CHI] + + k[5172]*y_cur[IDX_HI]; + data[jistart + 13096] = 0.0 + k[2147]*y_cur[IDX_C2II] + k[2210]*y_cur[IDX_OHII] - + k[4996]*y_cur[IDX_CH2I] + k[5820] + k[6127]; + data[jistart + 13097] = 0.0 + k[1730]*y_cur[IDX_C2H4II]; + data[jistart + 13098] = 0.0 + k[1950]*y_cur[IDX_CHII] + k[3346]*y_cur[IDX_NII] - + k[4998]*y_cur[IDX_CH2I] + k[5076]*y_cur[IDX_CHI]; + data[jistart + 13099] = 0.0 + k[71]*y_cur[IDX_HM] + k[5076]*y_cur[IDX_H2COI] + + k[5077]*y_cur[IDX_HCOI] + k[5078]*y_cur[IDX_HNOI] + + k[5095]*y_cur[IDX_O2HI] + k[5137]*y_cur[IDX_H2I]; + data[jistart + 13100] = 0.0 - k[5019]*y_cur[IDX_CH2I] - k[5020]*y_cur[IDX_CH2I]; + data[jistart + 13101] = 0.0 - k[5016]*y_cur[IDX_CH2I] - k[5017]*y_cur[IDX_CH2I] - + k[5018]*y_cur[IDX_CH2I] + k[5047]*y_cur[IDX_CH3I]; + data[jistart + 13102] = 0.0 + k[2088]*y_cur[IDX_CH3II]; + data[jistart + 13103] = 0.0 + k[1482]*y_cur[IDX_C2H3I] - k[1998]*y_cur[IDX_CH2I]; + data[jistart + 13104] = 0.0 + k[923]*y_cur[IDX_eM] - k[1999]*y_cur[IDX_CH2I] + + k[2071]*y_cur[IDX_CH3COCH3I] + k[2088]*y_cur[IDX_NH3I] + + k[6321]*y_cur[IDX_GRAINM]; + data[jistart + 13105] = 0.0 - k[4991]*y_cur[IDX_CH2I] + k[5344]*y_cur[IDX_OI]; + data[jistart + 13106] = 0.0 - k[4997]*y_cur[IDX_CH2I] + k[5029]*y_cur[IDX_CH3I]; + data[jistart + 13107] = 0.0 + k[8577]*y_cur[IDX_GCHI]; + data[jistart + 13108] = 0.0 + k[5028]*y_cur[IDX_CH3I] + k[5028]*y_cur[IDX_CH3I] + + k[5029]*y_cur[IDX_CNI] + k[5041]*y_cur[IDX_O2I] + + k[5047]*y_cur[IDX_OHI] + k[5158]*y_cur[IDX_HI] + k[5793] + k[6097]; + data[jistart + 13109] = 0.0 - k[5253]*y_cur[IDX_CH2I] - k[5254]*y_cur[IDX_CH2I] - + k[5255]*y_cur[IDX_CH2I]; + data[jistart + 13110] = 0.0 - k[2004]*y_cur[IDX_CH2I]; + data[jistart + 13111] = 0.0 + k[3729]*y_cur[IDX_CH5II] - k[5012]*y_cur[IDX_CH2I] - + k[5013]*y_cur[IDX_CH2I] - k[5014]*y_cur[IDX_CH2I] - + k[5015]*y_cur[IDX_CH2I] + k[5344]*y_cur[IDX_C2H2I] + + k[5348]*y_cur[IDX_C2H4I] + k[5381]*y_cur[IDX_CH2CCH2I]; + data[jistart + 13112] = 0.0 + k[3082]*y_cur[IDX_C2H4I] - k[3160]*y_cur[IDX_CH2I] - + k[3161]*y_cur[IDX_CH2I] + k[3171]*y_cur[IDX_CH2COI] + + k[3174]*y_cur[IDX_CH2PHI] + k[3223]*y_cur[IDX_H2CSI] + + k[3321]*y_cur[IDX_SiCH3I] + k[5637]*y_cur[IDX_CH2OHI]; + data[jistart + 13113] = 0.0 - k[160]*y_cur[IDX_CH2I] - k[1342]*y_cur[IDX_CH2I] + + k[1369]*y_cur[IDX_C2H6I]; + data[jistart + 13114] = 0.0 - k[359]*y_cur[IDX_CH2I] - k[2314]*y_cur[IDX_CH2I] + + k[2317]*y_cur[IDX_CH2NHI]; + data[jistart + 13115] = 0.0 - k[4944]*y_cur[IDX_CH2I] - k[4945]*y_cur[IDX_CH2I] + + k[5554]*y_cur[IDX_H2I]; + data[jistart + 13116] = 0.0 - k[2008]*y_cur[IDX_CH2I]; + data[jistart + 13117] = 0.0 - k[2634]*y_cur[IDX_CH2I]; + data[jistart + 13118] = 0.0 + k[6321]*y_cur[IDX_CH3II] + k[6327]*y_cur[IDX_CH4II] + + k[6332]*y_cur[IDX_CH5II] + k[6368]*y_cur[IDX_C2H3II] + + k[6369]*y_cur[IDX_C2H3II] + k[6385]*y_cur[IDX_C2H4II] + + k[6385]*y_cur[IDX_C2H4II] + k[6395]*y_cur[IDX_C2H5II] + + k[6398]*y_cur[IDX_H2COII] + k[6409]*y_cur[IDX_CH2NH2II] + + k[6414]*y_cur[IDX_H3COII] + k[6440]*y_cur[IDX_CH3OH2II] + + k[6461]*y_cur[IDX_C3H2II] + k[6475]*y_cur[IDX_CH2CNII] + + k[6485]*y_cur[IDX_CH3CNII] + k[6494]*y_cur[IDX_CH2COII] + + k[6497]*y_cur[IDX_SiCH2II] + k[6506]*y_cur[IDX_C3H7II] + + k[6536]*y_cur[IDX_H2CNOII] + k[6561]*y_cur[IDX_CH3CHOHII] + + k[6587]*y_cur[IDX_CH3OCH3II] + k[6683]*y_cur[IDX_CH3COCH3II] + + k[6696]*y_cur[IDX_CH2OHCOII] + k[6701]*y_cur[IDX_CH2OHCHOII] + + k[6712]*y_cur[IDX_CH3COOHII] + k[6760]*y_cur[IDX_CH3C3NII]; + data[jistart + 13119] = 0.0 + k[82]*y_cur[IDX_CM] - k[5135]*y_cur[IDX_CH2I] + + k[5137]*y_cur[IDX_CHI] + k[5554]*y_cur[IDX_CI]; + data[jistart + 13120] = 0.0 + k[753]*y_cur[IDX_C2H3II] + k[754]*y_cur[IDX_C2H3II] + + k[761]*y_cur[IDX_C2H4II] + k[761]*y_cur[IDX_C2H4II] + + k[768]*y_cur[IDX_C2H5II] + k[791]*y_cur[IDX_C3H2II] + + k[809]*y_cur[IDX_C3H7II] + k[916]*y_cur[IDX_CH2CNII] + + k[920]*y_cur[IDX_CH2COII] + k[922]*y_cur[IDX_CH2NH2II] + + k[923]*y_cur[IDX_CH3II] + k[926]*y_cur[IDX_CH3C3NII] + + k[939]*y_cur[IDX_CH3CHOHII] + k[945]*y_cur[IDX_CH3CNII] + + k[950]*y_cur[IDX_CH3COCH3II] + k[955]*y_cur[IDX_CH3OCH3II] + + k[963]*y_cur[IDX_CH3OH2II] + k[968]*y_cur[IDX_CH4II] + + k[972]*y_cur[IDX_CH5II] + k[994]*y_cur[IDX_H2CNOII] + + k[996]*y_cur[IDX_H2COII] + k[1034]*y_cur[IDX_H3COII] + + k[1243]*y_cur[IDX_SiCH2II] + k[1272]*y_cur[IDX_CH2OHCOII] + + k[1275]*y_cur[IDX_CH2OHCHOII] + k[1285]*y_cur[IDX_CH3COOHII]; + data[jistart + 13121] = 0.0 + k[105]*y_cur[IDX_CHM] - k[5156]*y_cur[IDX_CH2I] + + k[5158]*y_cur[IDX_CH3I] + k[5172]*y_cur[IDX_HCOI]; + data[jistart + 13122] = 0.0 + k[7095] + k[7277] + k[7459]; + data[jistart + 13123] = 0.0 + k[769]*y_cur[IDX_eM] + k[6671]*y_cur[IDX_GRAINM]; + data[jistart + 13124] = 0.0 + k[914]*y_cur[IDX_eM] + k[6658]*y_cur[IDX_GRAINM]; + data[jistart + 13125] = 0.0 + k[1083]*y_cur[IDX_eM] + k[6795]*y_cur[IDX_GRAINM]; + data[jistart + 13126] = 0.0 + k[1007]*y_cur[IDX_eM] + k[6377]*y_cur[IDX_GRAINM]; + data[jistart + 13127] = 0.0 + k[1156]*y_cur[IDX_eM] + k[6652]*y_cur[IDX_GRAINM]; + data[jistart + 13128] = 0.0 + k[5214]*y_cur[IDX_CI]; + data[jistart + 13129] = 0.0 + k[6093]; + data[jistart + 13130] = 0.0 + k[8659]*y_cur[IDX_GCI]; + data[jistart + 13131] = 0.0 + k[2887]*y_cur[IDX_HCNHII]; + data[jistart + 13132] = 0.0 + k[947]*y_cur[IDX_eM] + k[6503]*y_cur[IDX_GRAINM]; + data[jistart + 13133] = 0.0 + k[3016]*y_cur[IDX_CII] + k[3020]*y_cur[IDX_CH3II] + + k[3026]*y_cur[IDX_HII] + k[3030]*y_cur[IDX_HeII] + + k[5212]*y_cur[IDX_CI]; + data[jistart + 13134] = 0.0 + k[2889]*y_cur[IDX_HCNHII]; + data[jistart + 13135] = 0.0 - k[3040]*y_cur[IDX_HNCI]; + data[jistart + 13136] = 0.0 - k[3045]*y_cur[IDX_HNCI]; + data[jistart + 13137] = 0.0 - k[3042]*y_cur[IDX_HNCI]; + data[jistart + 13138] = 0.0 - k[3037]*y_cur[IDX_HNCI]; + data[jistart + 13139] = 0.0 - k[2859]*y_cur[IDX_HNCI]; + data[jistart + 13140] = 0.0 - k[3043]*y_cur[IDX_HNCI]; + data[jistart + 13141] = 0.0 - k[3495]*y_cur[IDX_HNCI]; + data[jistart + 13142] = 0.0 + k[4779]*y_cur[IDX_HCNHII]; + data[jistart + 13143] = 0.0 + k[4638]*y_cur[IDX_HCNHII]; + data[jistart + 13144] = 0.0 - k[3521]*y_cur[IDX_HNCI]; + data[jistart + 13145] = 0.0 + k[4849]*y_cur[IDX_HCNHII]; + data[jistart + 13146] = 0.0 + k[4043]*y_cur[IDX_HCNHII]; + data[jistart + 13147] = 0.0 + k[4218]*y_cur[IDX_HCNHII]; + data[jistart + 13148] = 0.0 - k[2232]*y_cur[IDX_HNCI]; + data[jistart + 13149] = 0.0 + k[4814]*y_cur[IDX_HCNHII]; + data[jistart + 13150] = 0.0 + k[3973]*y_cur[IDX_HCNHII]; + data[jistart + 13151] = 0.0 + k[4113]*y_cur[IDX_HCNHII]; + data[jistart + 13152] = 0.0 + k[4393]*y_cur[IDX_HCNHII]; + data[jistart + 13153] = 0.0 + k[4533]*y_cur[IDX_HCNHII]; + data[jistart + 13154] = 0.0 + k[4463]*y_cur[IDX_HCNHII]; + data[jistart + 13155] = 0.0 + k[4603]*y_cur[IDX_HCNHII]; + data[jistart + 13156] = 0.0 + k[3938]*y_cur[IDX_HCNHII]; + data[jistart + 13157] = 0.0 + k[4288]*y_cur[IDX_HCNHII]; + data[jistart + 13158] = 0.0 + k[4323]*y_cur[IDX_HCNHII]; + data[jistart + 13159] = 0.0 + k[3903]*y_cur[IDX_HCNHII]; + data[jistart + 13160] = 0.0 + k[4744]*y_cur[IDX_HCNHII]; + data[jistart + 13161] = 0.0 + k[4568]*y_cur[IDX_HCNHII]; + data[jistart + 13162] = 0.0 + k[4709]*y_cur[IDX_HCNHII]; + data[jistart + 13163] = 0.0 + k[2895]*y_cur[IDX_HCNHII]; + data[jistart + 13164] = 0.0 + k[4498]*y_cur[IDX_HCNHII]; + data[jistart + 13165] = 0.0 + k[4008]*y_cur[IDX_HCNHII]; + data[jistart + 13166] = 0.0 + k[4078]*y_cur[IDX_HCNHII]; + data[jistart + 13167] = 0.0 + k[4183]*y_cur[IDX_HCNHII]; + data[jistart + 13168] = 0.0 + k[4358]*y_cur[IDX_HCNHII]; + data[jistart + 13169] = 0.0 - k[3039]*y_cur[IDX_HNCI]; + data[jistart + 13170] = 0.0 + k[4253]*y_cur[IDX_HCNHII]; + data[jistart + 13171] = 0.0 + k[4428]*y_cur[IDX_HCNHII]; + data[jistart + 13172] = 0.0 + k[3541]*y_cur[IDX_HCNHII] + k[4970]*y_cur[IDX_CI]; + data[jistart + 13173] = 0.0 - k[1478]*y_cur[IDX_HNCI]; + data[jistart + 13174] = 0.0 - k[3784]*y_cur[IDX_HNCI]; + data[jistart + 13175] = 0.0 - k[2515]*y_cur[IDX_HNCI]; + data[jistart + 13176] = 0.0 + k[4148]*y_cur[IDX_HCNHII]; + data[jistart + 13177] = 0.0 - k[1960]*y_cur[IDX_HNCI]; + data[jistart + 13178] = 0.0 + k[3630]*y_cur[IDX_HCNHII]; + data[jistart + 13179] = 0.0 + k[8659]*y_cur[IDX_GNHI]; + data[jistart + 13180] = 0.0 + k[4673]*y_cur[IDX_HCNHII]; + data[jistart + 13181] = 0.0 - k[3044]*y_cur[IDX_HNCI]; + data[jistart + 13182] = 0.0 - k[3038]*y_cur[IDX_HNCI]; + data[jistart + 13183] = 0.0 - k[4907]*y_cur[IDX_HNCI]; + data[jistart + 13184] = 0.0 + k[1091]*y_cur[IDX_eM] + k[2007]*y_cur[IDX_CH2I] + + k[2252]*y_cur[IDX_CHI] + k[2887]*y_cur[IDX_CH2CHCNI] + + k[2889]*y_cur[IDX_CH3CNI] + k[2891]*y_cur[IDX_H2COI] + + k[2893]*y_cur[IDX_H2SI] + k[2895]*y_cur[IDX_HC3NI] + + k[3541]*y_cur[IDX_NH2I] + k[3583]*y_cur[IDX_NH3I] + + k[3630]*y_cur[IDX_NaI] + k[3903]*y_cur[IDX_CM] + + k[3938]*y_cur[IDX_C10M] + k[3973]*y_cur[IDX_C10HM] + + k[4008]*y_cur[IDX_C2M] + k[4043]*y_cur[IDX_C2HM] + + k[4078]*y_cur[IDX_C3M] + k[4113]*y_cur[IDX_C3HM] + + k[4148]*y_cur[IDX_C3NM] + k[4183]*y_cur[IDX_C4M] + + k[4218]*y_cur[IDX_C4HM] + k[4253]*y_cur[IDX_C5M] + + k[4288]*y_cur[IDX_C5HM] + k[4323]*y_cur[IDX_C5NM] + + k[4358]*y_cur[IDX_C6M] + k[4393]*y_cur[IDX_C6HM] + + k[4428]*y_cur[IDX_C7M] + k[4463]*y_cur[IDX_C7HM] + + k[4498]*y_cur[IDX_C8M] + k[4533]*y_cur[IDX_C8HM] + + k[4568]*y_cur[IDX_C9M] + k[4603]*y_cur[IDX_C9HM] + + k[4638]*y_cur[IDX_CHM] + k[4673]*y_cur[IDX_CNM] + + k[4709]*y_cur[IDX_HM] + k[4744]*y_cur[IDX_OM] + + k[4779]*y_cur[IDX_O2M] + k[4814]*y_cur[IDX_OHM] + + k[4849]*y_cur[IDX_SM] + k[6380]*y_cur[IDX_GRAINM]; + data[jistart + 13185] = 0.0 + k[2007]*y_cur[IDX_HCNHII] + k[5254]*y_cur[IDX_NI]; + data[jistart + 13186] = 0.0 - k[133]*y_cur[IDX_HII] - k[1413]*y_cur[IDX_CII] - + k[1478]*y_cur[IDX_C2HII] - k[1525]*y_cur[IDX_C2H2II] - + k[1960]*y_cur[IDX_CHII] - k[2232]*y_cur[IDX_CH5II] - + k[2515]*y_cur[IDX_H2OII] - k[2706]*y_cur[IDX_H3II] - + k[2810]*y_cur[IDX_H3OII] - k[2859]*y_cur[IDX_HCNII] - + k[3036]*y_cur[IDX_C2H3II] - k[3037]*y_cur[IDX_C2H5II] - + k[3038]*y_cur[IDX_H2COII] - k[3039]*y_cur[IDX_H3COII] - + k[3040]*y_cur[IDX_H3SII] - k[3041]*y_cur[IDX_HCOII] - + k[3042]*y_cur[IDX_HNOII] - k[3043]*y_cur[IDX_HSII] - + k[3044]*y_cur[IDX_N2HII] - k[3045]*y_cur[IDX_O2HII] - + k[3046]*y_cur[IDX_SiII] - k[3261]*y_cur[IDX_HeII] - + k[3262]*y_cur[IDX_HeII] - k[3263]*y_cur[IDX_HeII] - + k[3495]*y_cur[IDX_NHII] - k[3521]*y_cur[IDX_NH2II] - + k[3784]*y_cur[IDX_OHII] - k[4902]*y_cur[IDX_C2HI] - + k[4907]*y_cur[IDX_C4HI] - k[5118]*y_cur[IDX_CNI] - + k[5174]*y_cur[IDX_HI] - k[5867] - k[6198] - k[6913]; + data[jistart + 13187] = 0.0 - k[3046]*y_cur[IDX_HNCI]; + data[jistart + 13188] = 0.0 + k[2893]*y_cur[IDX_HCNHII]; + data[jistart + 13189] = 0.0 - k[3036]*y_cur[IDX_HNCI]; + data[jistart + 13190] = 0.0 - k[4902]*y_cur[IDX_HNCI]; + data[jistart + 13191] = 0.0 + k[2891]*y_cur[IDX_HCNHII]; + data[jistart + 13192] = 0.0 + k[2252]*y_cur[IDX_HCNHII]; + data[jistart + 13193] = 0.0 + k[3583]*y_cur[IDX_HCNHII]; + data[jistart + 13194] = 0.0 - k[1525]*y_cur[IDX_HNCI]; + data[jistart + 13195] = 0.0 + k[3020]*y_cur[IDX_HNC3I]; + data[jistart + 13196] = 0.0 - k[5118]*y_cur[IDX_HNCI]; + data[jistart + 13197] = 0.0 + k[5254]*y_cur[IDX_CH2I]; + data[jistart + 13198] = 0.0 - k[2810]*y_cur[IDX_HNCI]; + data[jistart + 13199] = 0.0 + k[3030]*y_cur[IDX_HNC3I] - k[3261]*y_cur[IDX_HNCI] - + k[3262]*y_cur[IDX_HNCI] - k[3263]*y_cur[IDX_HNCI]; + data[jistart + 13200] = 0.0 - k[1413]*y_cur[IDX_HNCI] + k[3016]*y_cur[IDX_HNC3I]; + data[jistart + 13201] = 0.0 - k[133]*y_cur[IDX_HNCI] + k[3026]*y_cur[IDX_HNC3I]; + data[jistart + 13202] = 0.0 + k[4970]*y_cur[IDX_NH2I] + k[5212]*y_cur[IDX_HNC3I] + + k[5214]*y_cur[IDX_HNCOI]; + data[jistart + 13203] = 0.0 - k[3041]*y_cur[IDX_HNCI]; + data[jistart + 13204] = 0.0 - k[2706]*y_cur[IDX_HNCI]; + data[jistart + 13205] = 0.0 + k[6377]*y_cur[IDX_H2NCII] + k[6380]*y_cur[IDX_HCNHII] + + k[6503]*y_cur[IDX_CH3CNHII] + k[6652]*y_cur[IDX_NCCNHII] + + k[6658]*y_cur[IDX_CH2CHCNHII] + k[6671]*y_cur[IDX_C2H5CNHII] + + k[6795]*y_cur[IDX_HC5NHII]; + data[jistart + 13206] = 0.0 + k[769]*y_cur[IDX_C2H5CNHII] + k[914]*y_cur[IDX_CH2CHCNHII] + + k[947]*y_cur[IDX_CH3CNHII] + k[1007]*y_cur[IDX_H2NCII] + + k[1083]*y_cur[IDX_HC5NHII] + k[1091]*y_cur[IDX_HCNHII] + + k[1156]*y_cur[IDX_NCCNHII]; + data[jistart + 13207] = 0.0 - k[5174]*y_cur[IDX_HNCI]; + data[jistart + 13208] = 0.0 + k[612]*y_cur[IDX_NH3I]; + data[jistart + 13209] = 0.0 + k[601]*y_cur[IDX_NH3I]; + data[jistart + 13210] = 0.0 + k[607]*y_cur[IDX_NH3I]; + data[jistart + 13211] = 0.0 + k[603]*y_cur[IDX_NH3I]; + data[jistart + 13212] = 0.0 + k[613]*y_cur[IDX_NH3I]; + data[jistart + 13213] = 0.0 + k[3546]*y_cur[IDX_NH2I]; + data[jistart + 13214] = 0.0 + k[282]*y_cur[IDX_NH3I]; + data[jistart + 13215] = 0.0 + k[3543]*y_cur[IDX_NH2I]; + data[jistart + 13216] = 0.0 + k[610]*y_cur[IDX_NH3I]; + data[jistart + 13217] = 0.0 + k[608]*y_cur[IDX_NH3I] + k[3539]*y_cur[IDX_NH2I]; + data[jistart + 13218] = 0.0 + k[609]*y_cur[IDX_NH3I]; + data[jistart + 13219] = 0.0 + k[576]*y_cur[IDX_NH3I] + k[3491]*y_cur[IDX_H2OI] + + k[3497]*y_cur[IDX_NH2I]; + data[jistart + 13220] = 0.0 - k[4786]*y_cur[IDX_NH3II]; + data[jistart + 13221] = 0.0 - k[4645]*y_cur[IDX_NH3II]; + data[jistart + 13222] = 0.0 + k[452]*y_cur[IDX_NH3I]; + data[jistart + 13223] = 0.0 + k[582]*y_cur[IDX_NH3I] + k[2463]*y_cur[IDX_H2I] + + k[3511]*y_cur[IDX_H2COI] + k[3513]*y_cur[IDX_H2OI] + + k[3517]*y_cur[IDX_H2SI] + k[3522]*y_cur[IDX_NH2I] + + k[3617]*y_cur[IDX_NHI]; + data[jistart + 13224] = 0.0 - k[4856]*y_cur[IDX_NH3II]; + data[jistart + 13225] = 0.0 - k[4050]*y_cur[IDX_NH3II]; + data[jistart + 13226] = 0.0 - k[4225]*y_cur[IDX_NH3II]; + data[jistart + 13227] = 0.0 + k[602]*y_cur[IDX_NH3I]; + data[jistart + 13228] = 0.0 + k[3533]*y_cur[IDX_NH2I]; + data[jistart + 13229] = 0.0 - k[4821]*y_cur[IDX_NH3II]; + data[jistart + 13230] = 0.0 - k[3980]*y_cur[IDX_NH3II]; + data[jistart + 13231] = 0.0 - k[4120]*y_cur[IDX_NH3II]; + data[jistart + 13232] = 0.0 - k[4400]*y_cur[IDX_NH3II]; + data[jistart + 13233] = 0.0 - k[4540]*y_cur[IDX_NH3II]; + data[jistart + 13234] = 0.0 - k[4470]*y_cur[IDX_NH3II]; + data[jistart + 13235] = 0.0 - k[4610]*y_cur[IDX_NH3II]; + data[jistart + 13236] = 0.0 - k[3945]*y_cur[IDX_NH3II]; + data[jistart + 13237] = 0.0 - k[4295]*y_cur[IDX_NH3II]; + data[jistart + 13238] = 0.0 - k[4330]*y_cur[IDX_NH3II]; + data[jistart + 13239] = 0.0 - k[3910]*y_cur[IDX_NH3II]; + data[jistart + 13240] = 0.0 - k[4751]*y_cur[IDX_NH3II]; + data[jistart + 13241] = 0.0 - k[4575]*y_cur[IDX_NH3II]; + data[jistart + 13242] = 0.0 - k[4716]*y_cur[IDX_NH3II]; + data[jistart + 13243] = 0.0 + k[600]*y_cur[IDX_NH3I]; + data[jistart + 13244] = 0.0 - k[4505]*y_cur[IDX_NH3II]; + data[jistart + 13245] = 0.0 - k[4015]*y_cur[IDX_NH3II]; + data[jistart + 13246] = 0.0 - k[4085]*y_cur[IDX_NH3II]; + data[jistart + 13247] = 0.0 - k[4190]*y_cur[IDX_NH3II]; + data[jistart + 13248] = 0.0 - k[4365]*y_cur[IDX_NH3II]; + data[jistart + 13249] = 0.0 + k[3537]*y_cur[IDX_NH2I]; + data[jistart + 13250] = 0.0 - k[4260]*y_cur[IDX_NH3II]; + data[jistart + 13251] = 0.0 - k[4435]*y_cur[IDX_NH3II]; + data[jistart + 13252] = 0.0 + k[2721]*y_cur[IDX_H3II] + k[3497]*y_cur[IDX_NHII] + + k[3522]*y_cur[IDX_NH2II] + k[3529]*y_cur[IDX_C2HII] + + k[3531]*y_cur[IDX_C2H2II] + k[3533]*y_cur[IDX_CH5II] + + k[3535]*y_cur[IDX_H2COII] + k[3536]*y_cur[IDX_H2OII] + + k[3537]*y_cur[IDX_H3COII] + k[3538]*y_cur[IDX_H3OII] + + k[3539]*y_cur[IDX_HCNII] + k[3540]*y_cur[IDX_HCNHII] + + k[3541]*y_cur[IDX_HCNHII] + k[3542]*y_cur[IDX_HCOII] + + k[3543]*y_cur[IDX_HNOII] + k[3544]*y_cur[IDX_N2HII] - + k[3545]*y_cur[IDX_NH3II] + k[3546]*y_cur[IDX_O2HII] + + k[3547]*y_cur[IDX_OHII]; + data[jistart + 13253] = 0.0 + k[3529]*y_cur[IDX_NH2I]; + data[jistart + 13254] = 0.0 + k[692]*y_cur[IDX_NH3I] + k[3547]*y_cur[IDX_NH2I]; + data[jistart + 13255] = 0.0 + k[605]*y_cur[IDX_NH3I] + k[3536]*y_cur[IDX_NH2I]; + data[jistart + 13256] = 0.0 - k[4155]*y_cur[IDX_NH3II]; + data[jistart + 13257] = 0.0 + k[253]*y_cur[IDX_NH3I]; + data[jistart + 13258] = 0.0 + k[611]*y_cur[IDX_NH3I]; + data[jistart + 13259] = 0.0 - k[592]*y_cur[IDX_NH3II]; + data[jistart + 13260] = 0.0 - k[594]*y_cur[IDX_NH3II]; + data[jistart + 13261] = 0.0 - k[596]*y_cur[IDX_NH3II]; + data[jistart + 13262] = 0.0 + k[3617]*y_cur[IDX_NH2II] - k[3618]*y_cur[IDX_NH3II]; + data[jistart + 13263] = 0.0 - k[4680]*y_cur[IDX_NH3II]; + data[jistart + 13264] = 0.0 + k[599]*y_cur[IDX_NH3I]; + data[jistart + 13265] = 0.0 + k[3544]*y_cur[IDX_NH2I]; + data[jistart + 13266] = 0.0 + k[615]*y_cur[IDX_NH3I]; + data[jistart + 13267] = 0.0 + k[606]*y_cur[IDX_NH3I]; + data[jistart + 13268] = 0.0 + k[558]*y_cur[IDX_NH3I]; + data[jistart + 13269] = 0.0 + k[604]*y_cur[IDX_NH3I] + k[3535]*y_cur[IDX_NH2I]; + data[jistart + 13270] = 0.0 + k[661]*y_cur[IDX_NH3I]; + data[jistart + 13271] = 0.0 + k[3540]*y_cur[IDX_NH2I] + k[3541]*y_cur[IDX_NH2I]; + data[jistart + 13272] = 0.0 - k[2013]*y_cur[IDX_NH3II]; + data[jistart + 13273] = 0.0 - k[592]*y_cur[IDX_FeI] - k[593]*y_cur[IDX_HCOI] - + k[594]*y_cur[IDX_MgI] - k[595]*y_cur[IDX_NOI] - + k[596]*y_cur[IDX_NaI] - k[597]*y_cur[IDX_SiI] - + k[1163]*y_cur[IDX_eM] - k[1164]*y_cur[IDX_eM] - + k[2013]*y_cur[IDX_CH2I] - k[2207]*y_cur[IDX_CH4I] - + k[2260]*y_cur[IDX_CHI] - k[2464]*y_cur[IDX_H2I] - + k[3545]*y_cur[IDX_NH2I] - k[3548]*y_cur[IDX_C2I] - + k[3549]*y_cur[IDX_H2COI] - k[3550]*y_cur[IDX_H2OI] - + k[3551]*y_cur[IDX_H2SI] - k[3552]*y_cur[IDX_HCOI] - + k[3553]*y_cur[IDX_NH3I] - k[3618]*y_cur[IDX_NHI] - + k[3747]*y_cur[IDX_OI] - k[3805]*y_cur[IDX_OHI] - + k[3910]*y_cur[IDX_CM] - k[3945]*y_cur[IDX_C10M] - + k[3980]*y_cur[IDX_C10HM] - k[4015]*y_cur[IDX_C2M] - + k[4050]*y_cur[IDX_C2HM] - k[4085]*y_cur[IDX_C3M] - + k[4120]*y_cur[IDX_C3HM] - k[4155]*y_cur[IDX_C3NM] - + k[4190]*y_cur[IDX_C4M] - k[4225]*y_cur[IDX_C4HM] - + k[4260]*y_cur[IDX_C5M] - k[4295]*y_cur[IDX_C5HM] - + k[4330]*y_cur[IDX_C5NM] - k[4365]*y_cur[IDX_C6M] - + k[4400]*y_cur[IDX_C6HM] - k[4435]*y_cur[IDX_C7M] - + k[4470]*y_cur[IDX_C7HM] - k[4505]*y_cur[IDX_C8M] - + k[4540]*y_cur[IDX_C8HM] - k[4575]*y_cur[IDX_C9M] - + k[4610]*y_cur[IDX_C9HM] - k[4645]*y_cur[IDX_CHM] - + k[4680]*y_cur[IDX_CNM] - k[4716]*y_cur[IDX_HM] - + k[4751]*y_cur[IDX_OM] - k[4786]*y_cur[IDX_O2M] - + k[4821]*y_cur[IDX_OHM] - k[4856]*y_cur[IDX_SM] - + k[6330]*y_cur[IDX_GRAINM] - k[6331]*y_cur[IDX_GRAINM]; + data[jistart + 13274] = 0.0 + k[3517]*y_cur[IDX_NH2II] - k[3551]*y_cur[IDX_NH3II]; + data[jistart + 13275] = 0.0 + k[614]*y_cur[IDX_NH3I]; + data[jistart + 13276] = 0.0 - k[597]*y_cur[IDX_NH3II]; + data[jistart + 13277] = 0.0 - k[595]*y_cur[IDX_NH3II]; + data[jistart + 13278] = 0.0 - k[593]*y_cur[IDX_NH3II] - k[3552]*y_cur[IDX_NH3II]; + data[jistart + 13279] = 0.0 - k[2207]*y_cur[IDX_NH3II]; + data[jistart + 13280] = 0.0 + k[3511]*y_cur[IDX_NH2II] - k[3549]*y_cur[IDX_NH3II]; + data[jistart + 13281] = 0.0 - k[2260]*y_cur[IDX_NH3II]; + data[jistart + 13282] = 0.0 - k[3548]*y_cur[IDX_NH3II]; + data[jistart + 13283] = 0.0 - k[3805]*y_cur[IDX_NH3II]; + data[jistart + 13284] = 0.0 + k[185]*y_cur[IDX_CII] + k[253]*y_cur[IDX_CHII] + + k[282]*y_cur[IDX_CH4II] + k[401]*y_cur[IDX_HII] + + k[452]*y_cur[IDX_H2II] + k[524]*y_cur[IDX_HeII] + + k[558]*y_cur[IDX_NII] + k[576]*y_cur[IDX_NHII] + + k[582]*y_cur[IDX_NH2II] + k[598]*y_cur[IDX_C2H2II] + + k[599]*y_cur[IDX_C2H4II] + k[600]*y_cur[IDX_C3HII] + + k[601]*y_cur[IDX_C2H6II] + k[602]*y_cur[IDX_COII] + + k[603]*y_cur[IDX_CO2II] + k[604]*y_cur[IDX_H2COII] + + k[605]*y_cur[IDX_H2OII] + k[606]*y_cur[IDX_H2SII] + + k[607]*y_cur[IDX_HC3NII] + k[608]*y_cur[IDX_HCNII] + + k[609]*y_cur[IDX_HSII] + k[610]*y_cur[IDX_N2II] + + k[611]*y_cur[IDX_O2II] + k[612]*y_cur[IDX_OCSII] + + k[613]*y_cur[IDX_PII] + k[614]*y_cur[IDX_SII] + + k[615]*y_cur[IDX_SOII] + k[661]*y_cur[IDX_OII] + + k[692]*y_cur[IDX_OHII] - k[3553]*y_cur[IDX_NH3II] + k[5886] + + k[6222]; + data[jistart + 13285] = 0.0 + k[598]*y_cur[IDX_NH3I] + k[3531]*y_cur[IDX_NH2I]; + data[jistart + 13286] = 0.0 + k[3538]*y_cur[IDX_NH2I]; + data[jistart + 13287] = 0.0 - k[3747]*y_cur[IDX_NH3II]; + data[jistart + 13288] = 0.0 + k[524]*y_cur[IDX_NH3I]; + data[jistart + 13289] = 0.0 + k[185]*y_cur[IDX_NH3I]; + data[jistart + 13290] = 0.0 + k[3491]*y_cur[IDX_NHII] + k[3513]*y_cur[IDX_NH2II] - + k[3550]*y_cur[IDX_NH3II]; + data[jistart + 13291] = 0.0 + k[401]*y_cur[IDX_NH3I]; + data[jistart + 13292] = 0.0 + k[3542]*y_cur[IDX_NH2I]; + data[jistart + 13293] = 0.0 + k[2721]*y_cur[IDX_NH2I]; + data[jistart + 13294] = 0.0 - k[6330]*y_cur[IDX_NH3II] - k[6331]*y_cur[IDX_NH3II]; + data[jistart + 13295] = 0.0 + k[2463]*y_cur[IDX_NH2II] - k[2464]*y_cur[IDX_NH3II]; + data[jistart + 13296] = 0.0 - k[1163]*y_cur[IDX_NH3II] - k[1164]*y_cur[IDX_NH3II]; + data[jistart + 13297] = 0.0 + k[5941]; + data[jistart + 13298] = 0.0 + k[5024]*y_cur[IDX_HI]; + data[jistart + 13299] = 0.0 + k[1189]*y_cur[IDX_eM] + k[6691]*y_cur[IDX_GRAINM]; + data[jistart + 13300] = 0.0 + k[769]*y_cur[IDX_eM] + k[6671]*y_cur[IDX_GRAINM]; + data[jistart + 13301] = 0.0 + k[7099] + k[7281] + k[7463]; + data[jistart + 13302] = 0.0 + k[774]*y_cur[IDX_eM] + k[6606]*y_cur[IDX_GRAINM]; + data[jistart + 13303] = 0.0 - k[234]*y_cur[IDX_C2H4I]; + data[jistart + 13304] = 0.0 + k[8589]*y_cur[IDX_GHI]; + data[jistart + 13305] = 0.0 + k[809]*y_cur[IDX_eM] + k[6506]*y_cur[IDX_GRAINM]; + data[jistart + 13306] = 0.0 - k[1709]*y_cur[IDX_C2H4I]; + data[jistart + 13307] = 0.0 - k[1713]*y_cur[IDX_C2H4I] - k[1714]*y_cur[IDX_C2H4I]; + data[jistart + 13308] = 0.0 + k[2112]*y_cur[IDX_C2H6I]; + data[jistart + 13309] = 0.0 - k[1704]*y_cur[IDX_C2H4I]; + data[jistart + 13310] = 0.0 - k[237]*y_cur[IDX_C2H4I] + k[935]*y_cur[IDX_eM] + + k[6410]*y_cur[IDX_GRAINM]; + data[jistart + 13311] = 0.0 - k[236]*y_cur[IDX_C2H4I] - k[1698]*y_cur[IDX_C2H4I] - + k[1699]*y_cur[IDX_C2H4I] - k[1700]*y_cur[IDX_C2H4I]; + data[jistart + 13312] = 0.0 - k[239]*y_cur[IDX_C2H4I] - k[1707]*y_cur[IDX_C2H4I]; + data[jistart + 13313] = 0.0 - k[238]*y_cur[IDX_C2H4I]; + data[jistart + 13314] = 0.0 + k[1531]*y_cur[IDX_C2H2II] + k[1533]*y_cur[IDX_C2H2II]; + data[jistart + 13315] = 0.0 - k[1711]*y_cur[IDX_C2H4I] - k[1712]*y_cur[IDX_C2H4I]; + data[jistart + 13316] = 0.0 + k[1808]*y_cur[IDX_CH2CCH2I]; + data[jistart + 13317] = 0.0 + k[8745]*y_cur[IDX_GCH2I] + k[8745]*y_cur[IDX_GCH2I]; + data[jistart + 13318] = 0.0 + k[2067]*y_cur[IDX_CH3II] + k[2657]*y_cur[IDX_H3II]; + data[jistart + 13319] = 0.0 + k[1815]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 13320] = 0.0 - k[1710]*y_cur[IDX_C2H4I]; + data[jistart + 13321] = 0.0 + k[1719]*y_cur[IDX_C2H5II] + k[2069]*y_cur[IDX_CH3II]; + data[jistart + 13322] = 0.0 - k[1705]*y_cur[IDX_C2H4I]; + data[jistart + 13323] = 0.0 - k[235]*y_cur[IDX_C2H4I] - k[1686]*y_cur[IDX_C2H4I] - + k[1687]*y_cur[IDX_C2H4I] - k[1688]*y_cur[IDX_C2H4I]; + data[jistart + 13324] = 0.0 - k[1703]*y_cur[IDX_C2H4I]; + data[jistart + 13325] = 0.0 - k[278]*y_cur[IDX_C2H4I] - k[2135]*y_cur[IDX_C2H4I]; + data[jistart + 13326] = 0.0 + k[767]*y_cur[IDX_eM] - k[1685]*y_cur[IDX_C2H4I] + + k[1719]*y_cur[IDX_CH3CNI] + k[1720]*y_cur[IDX_H2COI] + + k[1721]*y_cur[IDX_H2SI] + k[1722]*y_cur[IDX_HC3NI] + + k[2524]*y_cur[IDX_H2OI] + k[2862]*y_cur[IDX_HCNI] + + k[3037]*y_cur[IDX_HNCI] + k[3558]*y_cur[IDX_NH3I] + + k[6394]*y_cur[IDX_GRAINM]; + data[jistart + 13327] = 0.0 - k[1701]*y_cur[IDX_C2H4I] - k[1702]*y_cur[IDX_C2H4I]; + data[jistart + 13328] = 0.0 + k[1771]*y_cur[IDX_C3H2II] + k[1808]*y_cur[IDX_C3H4II] + + k[5382]*y_cur[IDX_OI]; + data[jistart + 13329] = 0.0 + k[1511]*y_cur[IDX_C2H2II] + k[1613]*y_cur[IDX_C2H3II] + + k[2112]*y_cur[IDX_S2II] + k[3772]*y_cur[IDX_OHII] + + k[5069]*y_cur[IDX_CHI] + k[5803] + k[6108]; + data[jistart + 13330] = 0.0 + k[5226]*y_cur[IDX_NI] + k[5457]*y_cur[IDX_OHI]; + data[jistart + 13331] = 0.0 + k[1373]*y_cur[IDX_CII] + k[1815]*y_cur[IDX_C3H5II] + + k[3825]*y_cur[IDX_SII] + k[5805] + k[6110]; + data[jistart + 13332] = 0.0 - k[1694]*y_cur[IDX_C2H4I] - k[1695]*y_cur[IDX_C2H4I]; + data[jistart + 13333] = 0.0 - k[438]*y_cur[IDX_C2H4I] - k[2371]*y_cur[IDX_C2H4I] - + k[2372]*y_cur[IDX_C2H4I]; + data[jistart + 13334] = 0.0 + k[8718]*y_cur[IDX_GCHI]; + data[jistart + 13335] = 0.0 + k[1777]*y_cur[IDX_C3H2II]; + data[jistart + 13336] = 0.0 - k[2219]*y_cur[IDX_C2H4I]; + data[jistart + 13337] = 0.0 + k[1722]*y_cur[IDX_C2H5II]; + data[jistart + 13338] = 0.0 - k[1689]*y_cur[IDX_C2H4I] - k[1690]*y_cur[IDX_C2H4I]; + data[jistart + 13339] = 0.0 - k[1693]*y_cur[IDX_C2H4I] + k[3564]*y_cur[IDX_NH3I]; + data[jistart + 13340] = 0.0 + k[8718]*y_cur[IDX_GCH3I]; + data[jistart + 13341] = 0.0 - k[1691]*y_cur[IDX_C2H4I] - k[1692]*y_cur[IDX_C2H4I] + + k[1771]*y_cur[IDX_CH2CCH2I] + k[1777]*y_cur[IDX_CH3CCHI]; + data[jistart + 13342] = 0.0 + k[3772]*y_cur[IDX_C2H6I]; + data[jistart + 13343] = 0.0 - k[464]*y_cur[IDX_C2H4I]; + data[jistart + 13344] = 0.0 - k[240]*y_cur[IDX_C2H4I]; + data[jistart + 13345] = 0.0 + k[231]*y_cur[IDX_C2H3I] + k[232]*y_cur[IDX_CH2CCHI] + + k[233]*y_cur[IDX_H2SI] + k[599]*y_cur[IDX_NH3I] - + k[1647]*y_cur[IDX_C2H4I] - k[1648]*y_cur[IDX_C2H4I]; + data[jistart + 13346] = 0.0 + k[232]*y_cur[IDX_C2H4II]; + data[jistart + 13347] = 0.0 - k[3847]*y_cur[IDX_C2H4I] - k[3848]*y_cur[IDX_C2H4I] - + k[3849]*y_cur[IDX_C2H4I] - k[3850]*y_cur[IDX_C2H4I]; + data[jistart + 13348] = 0.0 - k[1706]*y_cur[IDX_C2H4I]; + data[jistart + 13349] = 0.0 - k[4884]*y_cur[IDX_C2H4I]; + data[jistart + 13350] = 0.0 - k[648]*y_cur[IDX_C2H4I] - k[3632]*y_cur[IDX_C2H4I] - + k[3633]*y_cur[IDX_C2H4I]; + data[jistart + 13351] = 0.0 - k[1696]*y_cur[IDX_C2H4I] - k[1697]*y_cur[IDX_C2H4I]; + data[jistart + 13352] = 0.0 + k[3037]*y_cur[IDX_C2H5II]; + data[jistart + 13353] = 0.0 - k[148]*y_cur[IDX_CII] - k[215]*y_cur[IDX_C2H2II] - + k[234]*y_cur[IDX_C2N2II] - k[235]*y_cur[IDX_C3II] - + k[236]*y_cur[IDX_C5II] - k[237]*y_cur[IDX_C2H6II] - + k[238]*y_cur[IDX_CO2II] - k[239]*y_cur[IDX_HC3NII] - + k[240]*y_cur[IDX_O2II] - k[278]*y_cur[IDX_CH4II] - + k[326]*y_cur[IDX_HII] - k[438]*y_cur[IDX_H2II] - + k[464]*y_cur[IDX_H2OII] - k[510]*y_cur[IDX_HeII] - + k[648]*y_cur[IDX_OII] - k[1302]*y_cur[IDX_CII] - + k[1303]*y_cur[IDX_CII] - k[1304]*y_cur[IDX_CII] - + k[1305]*y_cur[IDX_CII] - k[1483]*y_cur[IDX_C2H2II] - + k[1484]*y_cur[IDX_C2H2II] - k[1579]*y_cur[IDX_C2H3II] - + k[1647]*y_cur[IDX_C2H4II] - k[1648]*y_cur[IDX_C2H4II] - + k[1685]*y_cur[IDX_C2H5II] - k[1686]*y_cur[IDX_C3II] - + k[1687]*y_cur[IDX_C3II] - k[1688]*y_cur[IDX_C3II] - + k[1689]*y_cur[IDX_C3HII] - k[1690]*y_cur[IDX_C3HII] - + k[1691]*y_cur[IDX_C3H2II] - k[1692]*y_cur[IDX_C3H2II] - + k[1693]*y_cur[IDX_C3H3II] - k[1694]*y_cur[IDX_C4HII] - + k[1695]*y_cur[IDX_C4HII] - k[1696]*y_cur[IDX_C4H2II] - + k[1697]*y_cur[IDX_C4H2II] - k[1698]*y_cur[IDX_C5II] - + k[1699]*y_cur[IDX_C5II] - k[1700]*y_cur[IDX_C5II] - + k[1701]*y_cur[IDX_C5H2II] - k[1702]*y_cur[IDX_C5H2II] - + k[1703]*y_cur[IDX_C6H2II] - k[1704]*y_cur[IDX_C6H5II] - + k[1705]*y_cur[IDX_C7H2II] - k[1706]*y_cur[IDX_CH2CCHII] - + k[1707]*y_cur[IDX_HC3NII] - k[1708]*y_cur[IDX_HCOII] - + k[1709]*y_cur[IDX_NCCNHII] - k[1710]*y_cur[IDX_PII] - + k[1711]*y_cur[IDX_PHII] - k[1712]*y_cur[IDX_PHII] - + k[1713]*y_cur[IDX_PH2II] - k[1714]*y_cur[IDX_PH2II] - + k[1715]*y_cur[IDX_SII] - k[1716]*y_cur[IDX_SII] - + k[1717]*y_cur[IDX_SII] - k[1718]*y_cur[IDX_SiII] - + k[2045]*y_cur[IDX_CH3II] - k[2046]*y_cur[IDX_CH3II] - + k[2047]*y_cur[IDX_CH3II] - k[2135]*y_cur[IDX_CH4II] - + k[2219]*y_cur[IDX_CH5II] - k[2296]*y_cur[IDX_HII] - + k[2297]*y_cur[IDX_HII] - k[2371]*y_cur[IDX_H2II] - + k[2372]*y_cur[IDX_H2II] - k[2589]*y_cur[IDX_H3II] - + k[2590]*y_cur[IDX_H3II] - k[3079]*y_cur[IDX_HeII] - + k[3080]*y_cur[IDX_HeII] - k[3081]*y_cur[IDX_HeII] - + k[3082]*y_cur[IDX_HeII] - k[3632]*y_cur[IDX_OII] - + k[3633]*y_cur[IDX_OII] - k[3847]*y_cur[IDX_SOII] - + k[3848]*y_cur[IDX_SOII] - k[3849]*y_cur[IDX_SOII] - + k[3850]*y_cur[IDX_SOII] - k[4868]*y_cur[IDX_C2I] - + k[4883]*y_cur[IDX_C2H3I] - k[4884]*y_cur[IDX_C4HI] - + k[4885]*y_cur[IDX_SiI] - k[4914]*y_cur[IDX_CI] - + k[5065]*y_cur[IDX_CHI] - k[5066]*y_cur[IDX_CHI] - + k[5105]*y_cur[IDX_CNI] - k[5106]*y_cur[IDX_CNI] - + k[5225]*y_cur[IDX_NI] - k[5346]*y_cur[IDX_OI] - + k[5347]*y_cur[IDX_OI] - k[5348]*y_cur[IDX_OI] - + k[5349]*y_cur[IDX_OI] - k[5568]*y_cur[IDX_H3OII] - k[5700] - k[5701] + - k[5985] - k[5986] - k[6917]; + data[jistart + 13354] = 0.0 + k[231]*y_cur[IDX_C2H4II] - k[4883]*y_cur[IDX_C2H4I]; + data[jistart + 13355] = 0.0 - k[1718]*y_cur[IDX_C2H4I]; + data[jistart + 13356] = 0.0 + k[233]*y_cur[IDX_C2H4II] + k[1721]*y_cur[IDX_C2H5II]; + data[jistart + 13357] = 0.0 - k[1715]*y_cur[IDX_C2H4I] - k[1716]*y_cur[IDX_C2H4I] - + k[1717]*y_cur[IDX_C2H4I] + k[3825]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 13358] = 0.0 - k[4885]*y_cur[IDX_C2H4I]; + data[jistart + 13359] = 0.0 - k[1579]*y_cur[IDX_C2H4I] + k[1613]*y_cur[IDX_C2H6I]; + data[jistart + 13360] = 0.0 + k[5074]*y_cur[IDX_CHI]; + data[jistart + 13361] = 0.0 + k[1720]*y_cur[IDX_C2H5II]; + data[jistart + 13362] = 0.0 + k[2862]*y_cur[IDX_C2H5II]; + data[jistart + 13363] = 0.0 - k[5065]*y_cur[IDX_C2H4I] - k[5066]*y_cur[IDX_C2H4I] + + k[5069]*y_cur[IDX_C2H6I] + k[5074]*y_cur[IDX_CH4I]; + data[jistart + 13364] = 0.0 - k[4868]*y_cur[IDX_C2H4I]; + data[jistart + 13365] = 0.0 + k[5457]*y_cur[IDX_C2H5I]; + data[jistart + 13366] = 0.0 + k[599]*y_cur[IDX_C2H4II] + k[3558]*y_cur[IDX_C2H5II] + + k[3564]*y_cur[IDX_C3H3II]; + data[jistart + 13367] = 0.0 - k[215]*y_cur[IDX_C2H4I] - k[1483]*y_cur[IDX_C2H4I] - + k[1484]*y_cur[IDX_C2H4I] + k[1511]*y_cur[IDX_C2H6I] + + k[1531]*y_cur[IDX_SiH4I] + k[1533]*y_cur[IDX_SiH4I]; + data[jistart + 13368] = 0.0 - k[2045]*y_cur[IDX_C2H4I] - k[2046]*y_cur[IDX_C2H4I] - + k[2047]*y_cur[IDX_C2H4I] + k[2067]*y_cur[IDX_CH3CHOI] + + k[2069]*y_cur[IDX_CH3CNI]; + data[jistart + 13369] = 0.0 - k[5105]*y_cur[IDX_C2H4I] - k[5106]*y_cur[IDX_C2H4I]; + data[jistart + 13370] = 0.0 + k[8589]*y_cur[IDX_GC2H3I]; + data[jistart + 13371] = 0.0 + k[5026]*y_cur[IDX_CH3I] + k[5026]*y_cur[IDX_CH3I]; + data[jistart + 13372] = 0.0 - k[5225]*y_cur[IDX_C2H4I] + k[5226]*y_cur[IDX_C2H5I]; + data[jistart + 13373] = 0.0 - k[5568]*y_cur[IDX_C2H4I]; + data[jistart + 13374] = 0.0 - k[5346]*y_cur[IDX_C2H4I] - k[5347]*y_cur[IDX_C2H4I] - + k[5348]*y_cur[IDX_C2H4I] - k[5349]*y_cur[IDX_C2H4I] + + k[5382]*y_cur[IDX_CH2CCH2I]; + data[jistart + 13375] = 0.0 - k[510]*y_cur[IDX_C2H4I] - k[3079]*y_cur[IDX_C2H4I] - + k[3080]*y_cur[IDX_C2H4I] - k[3081]*y_cur[IDX_C2H4I] - + k[3082]*y_cur[IDX_C2H4I]; + data[jistart + 13376] = 0.0 - k[148]*y_cur[IDX_C2H4I] - k[1302]*y_cur[IDX_C2H4I] - + k[1303]*y_cur[IDX_C2H4I] - k[1304]*y_cur[IDX_C2H4I] - + k[1305]*y_cur[IDX_C2H4I] + k[1373]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 13377] = 0.0 + k[2524]*y_cur[IDX_C2H5II]; + data[jistart + 13378] = 0.0 - k[326]*y_cur[IDX_C2H4I] - k[2296]*y_cur[IDX_C2H4I] - + k[2297]*y_cur[IDX_C2H4I]; + data[jistart + 13379] = 0.0 - k[4914]*y_cur[IDX_C2H4I]; + data[jistart + 13380] = 0.0 - k[1708]*y_cur[IDX_C2H4I]; + data[jistart + 13381] = 0.0 - k[2589]*y_cur[IDX_C2H4I] - k[2590]*y_cur[IDX_C2H4I] + + k[2657]*y_cur[IDX_CH3CHOI]; + data[jistart + 13382] = 0.0 + k[6394]*y_cur[IDX_C2H5II] + k[6410]*y_cur[IDX_C2H6II] + + k[6506]*y_cur[IDX_C3H7II] + k[6606]*y_cur[IDX_C2H5OH2II] + + k[6671]*y_cur[IDX_C2H5CNHII] + k[6691]*y_cur[IDX_PC2H4II]; + data[jistart + 13383] = 0.0 + k[767]*y_cur[IDX_C2H5II] + k[769]*y_cur[IDX_C2H5CNHII] + + k[774]*y_cur[IDX_C2H5OH2II] + k[809]*y_cur[IDX_C3H7II] + + k[935]*y_cur[IDX_C2H6II] + k[1189]*y_cur[IDX_PC2H4II]; + data[jistart + 13384] = 0.0 + k[5024]*y_cur[IDX_C4H6I]; + data[jistart + 13385] = 0.0 + k[5024]*y_cur[IDX_HI]; + data[jistart + 13386] = 0.0 + k[914]*y_cur[IDX_eM] + k[6658]*y_cur[IDX_GRAINM]; + data[jistart + 13387] = 0.0 + k[8588]*y_cur[IDX_GHI]; + data[jistart + 13388] = 0.0 + k[7094] + k[7276] + k[7458]; + data[jistart + 13389] = 0.0 + k[808]*y_cur[IDX_eM] + k[6505]*y_cur[IDX_GRAINM]; + data[jistart + 13390] = 0.0 + k[1562]*y_cur[IDX_C2H2I]; + data[jistart + 13391] = 0.0 + k[5787] + k[6088]; + data[jistart + 13392] = 0.0 + k[1329]*y_cur[IDX_CII]; + data[jistart + 13393] = 0.0 + k[1307]*y_cur[IDX_CII]; + data[jistart + 13394] = 0.0 + k[1380]*y_cur[IDX_CII]; + data[jistart + 13395] = 0.0 + k[1707]*y_cur[IDX_C2H4I]; + data[jistart + 13396] = 0.0 + k[1534]*y_cur[IDX_C2H2II]; + data[jistart + 13397] = 0.0 + k[799]*y_cur[IDX_eM] + k[3697]*y_cur[IDX_OI] + + k[6477]*y_cur[IDX_GRAINM]; + data[jistart + 13398] = 0.0 + k[8716]*y_cur[IDX_GCHI]; + data[jistart + 13399] = 0.0 - k[1641]*y_cur[IDX_C2H3I] - k[1642]*y_cur[IDX_C2H3I]; + data[jistart + 13400] = 0.0 - k[1639]*y_cur[IDX_C2H3I] - k[1640]*y_cur[IDX_C2H3I]; + data[jistart + 13401] = 0.0 + k[766]*y_cur[IDX_eM] + k[6393]*y_cur[IDX_GRAINM]; + data[jistart + 13402] = 0.0 - k[1637]*y_cur[IDX_C2H3I] - k[1638]*y_cur[IDX_C2H3I]; + data[jistart + 13403] = 0.0 + k[1772]*y_cur[IDX_C3H2II] + k[5383]*y_cur[IDX_OI]; + data[jistart + 13404] = 0.0 + k[5702] + k[5987]; + data[jistart + 13405] = 0.0 + k[1374]*y_cur[IDX_CII] + k[4898]*y_cur[IDX_C2HI]; + data[jistart + 13406] = 0.0 - k[1632]*y_cur[IDX_C2H3I]; + data[jistart + 13407] = 0.0 + k[4764]*y_cur[IDX_C2H3II]; + data[jistart + 13408] = 0.0 + k[4623]*y_cur[IDX_C2H3II]; + data[jistart + 13409] = 0.0 + k[8660]*y_cur[IDX_GCI]; + data[jistart + 13410] = 0.0 + k[4834]*y_cur[IDX_C2H3II]; + data[jistart + 13411] = 0.0 + k[4028]*y_cur[IDX_C2H3II]; + data[jistart + 13412] = 0.0 + k[4203]*y_cur[IDX_C2H3II]; + data[jistart + 13413] = 0.0 + k[1778]*y_cur[IDX_C3H2II]; + data[jistart + 13414] = 0.0 + k[4799]*y_cur[IDX_C2H3II]; + data[jistart + 13415] = 0.0 + k[3958]*y_cur[IDX_C2H3II]; + data[jistart + 13416] = 0.0 + k[4098]*y_cur[IDX_C2H3II]; + data[jistart + 13417] = 0.0 + k[4378]*y_cur[IDX_C2H3II]; + data[jistart + 13418] = 0.0 + k[4518]*y_cur[IDX_C2H3II]; + data[jistart + 13419] = 0.0 + k[4448]*y_cur[IDX_C2H3II]; + data[jistart + 13420] = 0.0 + k[4588]*y_cur[IDX_C2H3II]; + data[jistart + 13421] = 0.0 + k[3923]*y_cur[IDX_C2H3II]; + data[jistart + 13422] = 0.0 + k[4273]*y_cur[IDX_C2H3II]; + data[jistart + 13423] = 0.0 + k[4308]*y_cur[IDX_C2H3II]; + data[jistart + 13424] = 0.0 + k[3888]*y_cur[IDX_C2H3II]; + data[jistart + 13425] = 0.0 + k[4729]*y_cur[IDX_C2H3II]; + data[jistart + 13426] = 0.0 + k[4553]*y_cur[IDX_C2H3II]; + data[jistart + 13427] = 0.0 + k[4693]*y_cur[IDX_C2H3II]; + data[jistart + 13428] = 0.0 + k[1676]*y_cur[IDX_C2H4II]; + data[jistart + 13429] = 0.0 - k[1631]*y_cur[IDX_C2H3I]; + data[jistart + 13430] = 0.0 + k[4483]*y_cur[IDX_C2H3II]; + data[jistart + 13431] = 0.0 + k[3993]*y_cur[IDX_C2H3II]; + data[jistart + 13432] = 0.0 + k[4063]*y_cur[IDX_C2H3II]; + data[jistart + 13433] = 0.0 + k[4168]*y_cur[IDX_C2H3II]; + data[jistart + 13434] = 0.0 + k[4343]*y_cur[IDX_C2H3II]; + data[jistart + 13435] = 0.0 + k[4238]*y_cur[IDX_C2H3II]; + data[jistart + 13436] = 0.0 + k[4413]*y_cur[IDX_C2H3II]; + data[jistart + 13437] = 0.0 + k[8716]*y_cur[IDX_GCH2I]; + data[jistart + 13438] = 0.0 - k[1629]*y_cur[IDX_C2H3I] - k[1630]*y_cur[IDX_C2H3I] + + k[1772]*y_cur[IDX_CH2CCH2I] + k[1778]*y_cur[IDX_CH3CCHI]; + data[jistart + 13439] = 0.0 + k[4133]*y_cur[IDX_C2H3II]; + data[jistart + 13440] = 0.0 + k[8660]*y_cur[IDX_GCH3I]; + data[jistart + 13441] = 0.0 + k[4658]*y_cur[IDX_C2H3II]; + data[jistart + 13442] = 0.0 - k[231]*y_cur[IDX_C2H3I] + k[759]*y_cur[IDX_eM] - + k[1628]*y_cur[IDX_C2H3I] + k[1676]*y_cur[IDX_HC3NI] + + k[6383]*y_cur[IDX_GRAINM]; + data[jistart + 13443] = 0.0 - k[1635]*y_cur[IDX_C2H3I] - k[1636]*y_cur[IDX_C2H3I]; + data[jistart + 13444] = 0.0 - k[1643]*y_cur[IDX_C2H3I]; + data[jistart + 13445] = 0.0 - k[1633]*y_cur[IDX_C2H3I] - k[1634]*y_cur[IDX_C2H3I]; + data[jistart + 13446] = 0.0 + k[4994]*y_cur[IDX_CH2I] + k[4994]*y_cur[IDX_CH2I]; + data[jistart + 13447] = 0.0 + k[1707]*y_cur[IDX_HC3NII] - k[4883]*y_cur[IDX_C2H3I] + + k[5105]*y_cur[IDX_CNI] + k[5346]*y_cur[IDX_OI]; + data[jistart + 13448] = 0.0 - k[214]*y_cur[IDX_C2H2II] - k[231]*y_cur[IDX_C2H4II] - + k[269]*y_cur[IDX_CH3II] - k[325]*y_cur[IDX_HII] - + k[1301]*y_cur[IDX_CII] - k[1481]*y_cur[IDX_C2H2II] - + k[1482]*y_cur[IDX_C2H2II] - k[1577]*y_cur[IDX_C2H3II] - + k[1578]*y_cur[IDX_C2H3II] - k[1628]*y_cur[IDX_C2H4II] - + k[1629]*y_cur[IDX_C3H2II] - k[1630]*y_cur[IDX_C3H2II] - + k[1631]*y_cur[IDX_C3H3II] - k[1632]*y_cur[IDX_C4HII] - + k[1633]*y_cur[IDX_C4H2II] - k[1634]*y_cur[IDX_C4H2II] - + k[1635]*y_cur[IDX_C4H3II] - k[1636]*y_cur[IDX_C4H3II] - + k[1637]*y_cur[IDX_C5H2II] - k[1638]*y_cur[IDX_C5H2II] - + k[1639]*y_cur[IDX_C6H2II] - k[1640]*y_cur[IDX_C6H2II] - + k[1641]*y_cur[IDX_C7H2II] - k[1642]*y_cur[IDX_C7H2II] - + k[1643]*y_cur[IDX_CH2CCHII] - k[1644]*y_cur[IDX_HCOII] - + k[1645]*y_cur[IDX_SII] - k[1646]*y_cur[IDX_SiII] - + k[2043]*y_cur[IDX_CH3II] - k[2044]*y_cur[IDX_CH3II] - + k[2295]*y_cur[IDX_HII] - k[2588]*y_cur[IDX_H3II] - + k[2767]*y_cur[IDX_H3OII] - k[3077]*y_cur[IDX_HeII] - + k[3078]*y_cur[IDX_HeII] - k[4881]*y_cur[IDX_O2I] - + k[4882]*y_cur[IDX_O2I] - k[4883]*y_cur[IDX_C2H4I] - + k[4913]*y_cur[IDX_CI] - k[5025]*y_cur[IDX_CH3I] - + k[5155]*y_cur[IDX_HI] - k[5223]*y_cur[IDX_NI] - + k[5224]*y_cur[IDX_NI] - k[5345]*y_cur[IDX_OI] - + k[5456]*y_cur[IDX_OHI] - k[5586]*y_cur[IDX_OHI] - k[5698] - k[5699] + - k[5983] - k[5984] - k[6912]; + data[jistart + 13449] = 0.0 - k[4881]*y_cur[IDX_C2H3I] - k[4882]*y_cur[IDX_C2H3I]; + data[jistart + 13450] = 0.0 - k[1646]*y_cur[IDX_C2H3I]; + data[jistart + 13451] = 0.0 - k[1645]*y_cur[IDX_C2H3I]; + data[jistart + 13452] = 0.0 - k[1577]*y_cur[IDX_C2H3I] - k[1578]*y_cur[IDX_C2H3I] + + k[3888]*y_cur[IDX_CM] + k[3923]*y_cur[IDX_C10M] + + k[3958]*y_cur[IDX_C10HM] + k[3993]*y_cur[IDX_C2M] + + k[4028]*y_cur[IDX_C2HM] + k[4063]*y_cur[IDX_C3M] + + k[4098]*y_cur[IDX_C3HM] + k[4133]*y_cur[IDX_C3NM] + + k[4168]*y_cur[IDX_C4M] + k[4203]*y_cur[IDX_C4HM] + + k[4238]*y_cur[IDX_C5M] + k[4273]*y_cur[IDX_C5HM] + + k[4308]*y_cur[IDX_C5NM] + k[4343]*y_cur[IDX_C6M] + + k[4378]*y_cur[IDX_C6HM] + k[4413]*y_cur[IDX_C7M] + + k[4448]*y_cur[IDX_C7HM] + k[4483]*y_cur[IDX_C8M] + + k[4518]*y_cur[IDX_C8HM] + k[4553]*y_cur[IDX_C9M] + + k[4588]*y_cur[IDX_C9HM] + k[4623]*y_cur[IDX_CHM] + + k[4658]*y_cur[IDX_CNM] + k[4693]*y_cur[IDX_HM] + + k[4729]*y_cur[IDX_OM] + k[4764]*y_cur[IDX_O2M] + + k[4799]*y_cur[IDX_OHM] + k[4834]*y_cur[IDX_SM]; + data[jistart + 13453] = 0.0 + k[4898]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 13454] = 0.0 - k[5456]*y_cur[IDX_C2H3I] - k[5586]*y_cur[IDX_C2H3I]; + data[jistart + 13455] = 0.0 - k[214]*y_cur[IDX_C2H3I] - k[1481]*y_cur[IDX_C2H3I] - + k[1482]*y_cur[IDX_C2H3I] + k[1534]*y_cur[IDX_SiH4I]; + data[jistart + 13456] = 0.0 - k[269]*y_cur[IDX_C2H3I] - k[2043]*y_cur[IDX_C2H3I] - + k[2044]*y_cur[IDX_C2H3I]; + data[jistart + 13457] = 0.0 + k[1562]*y_cur[IDX_C2H6II]; + data[jistart + 13458] = 0.0 + k[5105]*y_cur[IDX_C2H4I]; + data[jistart + 13459] = 0.0 + k[8588]*y_cur[IDX_GC2H2I]; + data[jistart + 13460] = 0.0 - k[5025]*y_cur[IDX_C2H3I]; + data[jistart + 13461] = 0.0 - k[5223]*y_cur[IDX_C2H3I] - k[5224]*y_cur[IDX_C2H3I]; + data[jistart + 13462] = 0.0 - k[2767]*y_cur[IDX_C2H3I]; + data[jistart + 13463] = 0.0 + k[3697]*y_cur[IDX_C3H4II] - k[5345]*y_cur[IDX_C2H3I] + + k[5346]*y_cur[IDX_C2H4I] + k[5383]*y_cur[IDX_CH2CCH2I]; + data[jistart + 13464] = 0.0 - k[3077]*y_cur[IDX_C2H3I] - k[3078]*y_cur[IDX_C2H3I]; + data[jistart + 13465] = 0.0 - k[1301]*y_cur[IDX_C2H3I] + k[1307]*y_cur[IDX_C2H5OHI] + + k[1329]*y_cur[IDX_C6H6I] + k[1374]*y_cur[IDX_CH3CHCH2I] + + k[1380]*y_cur[IDX_CH3COCH3I]; + data[jistart + 13466] = 0.0 - k[325]*y_cur[IDX_C2H3I] - k[2295]*y_cur[IDX_C2H3I]; + data[jistart + 13467] = 0.0 - k[4913]*y_cur[IDX_C2H3I]; + data[jistart + 13468] = 0.0 - k[1644]*y_cur[IDX_C2H3I]; + data[jistart + 13469] = 0.0 - k[2588]*y_cur[IDX_C2H3I]; + data[jistart + 13470] = 0.0 + k[6383]*y_cur[IDX_C2H4II] + k[6393]*y_cur[IDX_C2H5II] + + k[6477]*y_cur[IDX_C3H4II] + k[6505]*y_cur[IDX_C3H7II] + + k[6658]*y_cur[IDX_CH2CHCNHII]; + data[jistart + 13471] = 0.0 + k[759]*y_cur[IDX_C2H4II] + k[766]*y_cur[IDX_C2H5II] + + k[799]*y_cur[IDX_C3H4II] + k[808]*y_cur[IDX_C3H7II] + + k[914]*y_cur[IDX_CH2CHCNHII]; + data[jistart + 13472] = 0.0 + k[5024]*y_cur[IDX_C4H6I] - k[5155]*y_cur[IDX_C2H3I]; + data[jistart + 13473] = 0.0 + k[3590]*y_cur[IDX_NH3I]; + data[jistart + 13474] = 0.0 + k[3559]*y_cur[IDX_NH3I]; + data[jistart + 13475] = 0.0 + k[3560]*y_cur[IDX_NH3I]; + data[jistart + 13476] = 0.0 + k[3567]*y_cur[IDX_NH3I]; + data[jistart + 13477] = 0.0 + k[3601]*y_cur[IDX_NH3I]; + data[jistart + 13478] = 0.0 + k[3591]*y_cur[IDX_NH3I]; + data[jistart + 13479] = 0.0 + k[3586]*y_cur[IDX_NH3I]; + data[jistart + 13480] = 0.0 + k[1818]*y_cur[IDX_NH3I]; + data[jistart + 13481] = 0.0 + k[3593]*y_cur[IDX_NH3I]; + data[jistart + 13482] = 0.0 + k[3599]*y_cur[IDX_NH3I]; + data[jistart + 13483] = 0.0 + k[3568]*y_cur[IDX_NH3I]; + data[jistart + 13484] = 0.0 + k[3569]*y_cur[IDX_NH3I]; + data[jistart + 13485] = 0.0 + k[2121]*y_cur[IDX_NH3I]; + data[jistart + 13486] = 0.0 + k[3603]*y_cur[IDX_NH3I]; + data[jistart + 13487] = 0.0 + k[3587]*y_cur[IDX_NH3I]; + data[jistart + 13488] = 0.0 + k[3596]*y_cur[IDX_NH3I]; + data[jistart + 13489] = 0.0 + k[3585]*y_cur[IDX_NH3I]; + data[jistart + 13490] = 0.0 + k[3580]*y_cur[IDX_NH3I]; + data[jistart + 13491] = 0.0 + k[3579]*y_cur[IDX_NH3I]; + data[jistart + 13492] = 0.0 + k[3594]*y_cur[IDX_NH3I]; + data[jistart + 13493] = 0.0 + k[2144]*y_cur[IDX_NH3I]; + data[jistart + 13494] = 0.0 + k[3588]*y_cur[IDX_NH3I]; + data[jistart + 13495] = 0.0 + k[3558]*y_cur[IDX_NH3I]; + data[jistart + 13496] = 0.0 + k[3589]*y_cur[IDX_NH3I]; + data[jistart + 13497] = 0.0 + k[3498]*y_cur[IDX_NH3I]; + data[jistart + 13498] = 0.0 - k[4787]*y_cur[IDX_NH4II]; + data[jistart + 13499] = 0.0 - k[4646]*y_cur[IDX_NH4II]; + data[jistart + 13500] = 0.0 + k[3514]*y_cur[IDX_H2OI] + k[3518]*y_cur[IDX_H2SI] + + k[3523]*y_cur[IDX_NH3I]; + data[jistart + 13501] = 0.0 - k[4857]*y_cur[IDX_NH4II]; + data[jistart + 13502] = 0.0 - k[4051]*y_cur[IDX_NH4II]; + data[jistart + 13503] = 0.0 - k[4226]*y_cur[IDX_NH4II]; + data[jistart + 13504] = 0.0 + k[3571]*y_cur[IDX_NH3I]; + data[jistart + 13505] = 0.0 - k[4822]*y_cur[IDX_NH4II]; + data[jistart + 13506] = 0.0 - k[3981]*y_cur[IDX_NH4II]; + data[jistart + 13507] = 0.0 - k[4121]*y_cur[IDX_NH4II]; + data[jistart + 13508] = 0.0 - k[4401]*y_cur[IDX_NH4II]; + data[jistart + 13509] = 0.0 - k[4541]*y_cur[IDX_NH4II]; + data[jistart + 13510] = 0.0 - k[4471]*y_cur[IDX_NH4II]; + data[jistart + 13511] = 0.0 - k[4611]*y_cur[IDX_NH4II]; + data[jistart + 13512] = 0.0 - k[3946]*y_cur[IDX_NH4II]; + data[jistart + 13513] = 0.0 - k[4296]*y_cur[IDX_NH4II]; + data[jistart + 13514] = 0.0 - k[4331]*y_cur[IDX_NH4II]; + data[jistart + 13515] = 0.0 - k[3911]*y_cur[IDX_NH4II]; + data[jistart + 13516] = 0.0 - k[4752]*y_cur[IDX_NH4II]; + data[jistart + 13517] = 0.0 - k[4576]*y_cur[IDX_NH4II]; + data[jistart + 13518] = 0.0 - k[4717]*y_cur[IDX_NH4II]; + data[jistart + 13519] = 0.0 + k[3562]*y_cur[IDX_NH3I]; + data[jistart + 13520] = 0.0 + k[3565]*y_cur[IDX_NH3I]; + data[jistart + 13521] = 0.0 - k[4506]*y_cur[IDX_NH4II]; + data[jistart + 13522] = 0.0 - k[4016]*y_cur[IDX_NH4II]; + data[jistart + 13523] = 0.0 - k[4086]*y_cur[IDX_NH4II]; + data[jistart + 13524] = 0.0 - k[4191]*y_cur[IDX_NH4II]; + data[jistart + 13525] = 0.0 - k[4366]*y_cur[IDX_NH4II]; + data[jistart + 13526] = 0.0 + k[3577]*y_cur[IDX_NH3I]; + data[jistart + 13527] = 0.0 - k[4261]*y_cur[IDX_NH4II]; + data[jistart + 13528] = 0.0 - k[4436]*y_cur[IDX_NH4II]; + data[jistart + 13529] = 0.0 + k[3604]*y_cur[IDX_NH3I]; + data[jistart + 13530] = 0.0 + k[3545]*y_cur[IDX_NH3II]; + data[jistart + 13531] = 0.0 + k[3554]*y_cur[IDX_NH3I]; + data[jistart + 13532] = 0.0 + k[1989]*y_cur[IDX_NH3I]; + data[jistart + 13533] = 0.0 + k[3786]*y_cur[IDX_NH3I]; + data[jistart + 13534] = 0.0 + k[3575]*y_cur[IDX_NH3I]; + data[jistart + 13535] = 0.0 - k[4156]*y_cur[IDX_NH4II]; + data[jistart + 13536] = 0.0 + k[1964]*y_cur[IDX_NH3I]; + data[jistart + 13537] = 0.0 + k[3618]*y_cur[IDX_NH3II]; + data[jistart + 13538] = 0.0 - k[4681]*y_cur[IDX_NH4II]; + data[jistart + 13539] = 0.0 + k[3592]*y_cur[IDX_NH3I]; + data[jistart + 13540] = 0.0 + k[3576]*y_cur[IDX_NH3I]; + data[jistart + 13541] = 0.0 + k[3574]*y_cur[IDX_NH3I]; + data[jistart + 13542] = 0.0 + k[3582]*y_cur[IDX_NH3I] + k[3583]*y_cur[IDX_NH3I]; + data[jistart + 13543] = 0.0 + k[2207]*y_cur[IDX_CH4I] + k[2260]*y_cur[IDX_CHI] + + k[2464]*y_cur[IDX_H2I] + k[3545]*y_cur[IDX_NH2I] + + k[3549]*y_cur[IDX_H2COI] + k[3550]*y_cur[IDX_H2OI] + + k[3551]*y_cur[IDX_H2SI] + k[3552]*y_cur[IDX_HCOI] + + k[3553]*y_cur[IDX_NH3I] + k[3618]*y_cur[IDX_NHI] + + k[3805]*y_cur[IDX_OHI]; + data[jistart + 13544] = 0.0 - k[1165]*y_cur[IDX_eM] - k[1166]*y_cur[IDX_eM] - + k[1167]*y_cur[IDX_eM] - k[1911]*y_cur[IDX_CI] - + k[3911]*y_cur[IDX_CM] - k[3946]*y_cur[IDX_C10M] - + k[3981]*y_cur[IDX_C10HM] - k[4016]*y_cur[IDX_C2M] - + k[4051]*y_cur[IDX_C2HM] - k[4086]*y_cur[IDX_C3M] - + k[4121]*y_cur[IDX_C3HM] - k[4156]*y_cur[IDX_C3NM] - + k[4191]*y_cur[IDX_C4M] - k[4226]*y_cur[IDX_C4HM] - + k[4261]*y_cur[IDX_C5M] - k[4296]*y_cur[IDX_C5HM] - + k[4331]*y_cur[IDX_C5NM] - k[4366]*y_cur[IDX_C6M] - + k[4401]*y_cur[IDX_C6HM] - k[4436]*y_cur[IDX_C7M] - + k[4471]*y_cur[IDX_C7HM] - k[4506]*y_cur[IDX_C8M] - + k[4541]*y_cur[IDX_C8HM] - k[4576]*y_cur[IDX_C9M] - + k[4611]*y_cur[IDX_C9HM] - k[4646]*y_cur[IDX_CHM] - + k[4681]*y_cur[IDX_CNM] - k[4717]*y_cur[IDX_HM] - + k[4752]*y_cur[IDX_OM] - k[4787]*y_cur[IDX_O2M] - + k[4822]*y_cur[IDX_OHM] - k[4857]*y_cur[IDX_SM] - + k[6337]*y_cur[IDX_GRAINM] - k[6338]*y_cur[IDX_GRAINM] - + k[6339]*y_cur[IDX_GRAINM]; + data[jistart + 13545] = 0.0 + k[3518]*y_cur[IDX_NH2II] + k[3551]*y_cur[IDX_NH3II]; + data[jistart + 13546] = 0.0 + k[3557]*y_cur[IDX_NH3I]; + data[jistart + 13547] = 0.0 + k[3552]*y_cur[IDX_NH3II]; + data[jistart + 13548] = 0.0 + k[2207]*y_cur[IDX_NH3II]; + data[jistart + 13549] = 0.0 + k[3549]*y_cur[IDX_NH3II]; + data[jistart + 13550] = 0.0 + k[2260]*y_cur[IDX_NH3II]; + data[jistart + 13551] = 0.0 + k[3805]*y_cur[IDX_NH3II]; + data[jistart + 13552] = 0.0 + k[1818]*y_cur[IDX_C3H7II] + k[1964]*y_cur[IDX_CHII] + + k[1989]*y_cur[IDX_CH2II] + k[2088]*y_cur[IDX_CH3II] + + k[2121]*y_cur[IDX_CH3OH2II] + k[2144]*y_cur[IDX_CH4II] + + k[2723]*y_cur[IDX_H3II] + k[3498]*y_cur[IDX_NHII] + + k[3523]*y_cur[IDX_NH2II] + k[3553]*y_cur[IDX_NH3II] + + k[3554]*y_cur[IDX_C2HII] + k[3556]*y_cur[IDX_C2H2II] + + k[3557]*y_cur[IDX_C2H3II] + k[3558]*y_cur[IDX_C2H5II] + + k[3559]*y_cur[IDX_C2H5OH2II] + k[3560]*y_cur[IDX_C2H7II] + + k[3562]*y_cur[IDX_C3HII] + k[3565]*y_cur[IDX_C3H3II] + + k[3567]*y_cur[IDX_CH2CHCNHII] + k[3568]*y_cur[IDX_C2H6II] + + k[3569]*y_cur[IDX_CH3CHOHII] + k[3571]*y_cur[IDX_CH5II] + + k[3574]*y_cur[IDX_H2COII] + k[3575]*y_cur[IDX_H2OII] + + k[3576]*y_cur[IDX_H2SII] + k[3577]*y_cur[IDX_H3COII] + + k[3578]*y_cur[IDX_H3OII] + k[3579]*y_cur[IDX_H3SII] + + k[3580]*y_cur[IDX_HC3NHII] + k[3582]*y_cur[IDX_HCNHII] + + k[3583]*y_cur[IDX_HCNHII] + k[3584]*y_cur[IDX_HCOII] + + k[3585]*y_cur[IDX_HCO2II] + k[3586]*y_cur[IDX_HCOOH2II] + + k[3587]*y_cur[IDX_HCSII] + k[3588]*y_cur[IDX_HNOII] + + k[3589]*y_cur[IDX_HSII] + k[3590]*y_cur[IDX_HSO2II] + + k[3591]*y_cur[IDX_HSiSII] + k[3592]*y_cur[IDX_N2HII] + + k[3593]*y_cur[IDX_NCCNHII] + k[3594]*y_cur[IDX_O2HII] + + k[3596]*y_cur[IDX_PHII] + k[3599]*y_cur[IDX_PH2II] + + k[3601]*y_cur[IDX_PH3II] + k[3603]*y_cur[IDX_SiHII] + + k[3604]*y_cur[IDX_SiOHII] + k[3786]*y_cur[IDX_OHII]; + data[jistart + 13553] = 0.0 + k[3556]*y_cur[IDX_NH3I]; + data[jistart + 13554] = 0.0 + k[2088]*y_cur[IDX_NH3I]; + data[jistart + 13555] = 0.0 + k[3578]*y_cur[IDX_NH3I]; + data[jistart + 13556] = 0.0 + k[3514]*y_cur[IDX_NH2II] + k[3550]*y_cur[IDX_NH3II]; + data[jistart + 13557] = 0.0 - k[1911]*y_cur[IDX_NH4II]; + data[jistart + 13558] = 0.0 + k[3584]*y_cur[IDX_NH3I]; + data[jistart + 13559] = 0.0 + k[2723]*y_cur[IDX_NH3I]; + data[jistart + 13560] = 0.0 - k[6337]*y_cur[IDX_NH4II] - k[6338]*y_cur[IDX_NH4II] - + k[6339]*y_cur[IDX_NH4II]; + data[jistart + 13561] = 0.0 + k[2464]*y_cur[IDX_NH3II]; + data[jistart + 13562] = 0.0 - k[1165]*y_cur[IDX_NH4II] - k[1166]*y_cur[IDX_NH4II] - + k[1167]*y_cur[IDX_NH4II]; + data[jistart + 13563] = 0.0 + k[7098] + k[7280] + k[7462]; + data[jistart + 13564] = 0.0 + k[1113]*y_cur[IDX_eM] + k[1114]*y_cur[IDX_eM] + + k[6558]*y_cur[IDX_GRAINM] + k[6559]*y_cur[IDX_GRAINM]; + data[jistart + 13565] = 0.0 + k[1170]*y_cur[IDX_eM] + k[6528]*y_cur[IDX_GRAINM]; + data[jistart + 13566] = 0.0 + k[5275]*y_cur[IDX_NI] + k[5278]*y_cur[IDX_NI]; + data[jistart + 13567] = 0.0 + k[5286]*y_cur[IDX_NI]; + data[jistart + 13568] = 0.0 + k[5280]*y_cur[IDX_NI]; + data[jistart + 13569] = 0.0 + k[3368]*y_cur[IDX_N2HII]; + data[jistart + 13570] = 0.0 + k[2085]*y_cur[IDX_CH3II] + k[3276]*y_cur[IDX_HeII] + + k[5128]*y_cur[IDX_COI] + k[5179]*y_cur[IDX_HI] + + k[5327]*y_cur[IDX_NOI] + k[5419]*y_cur[IDX_OI] + + k[5474]*y_cur[IDX_OHI] + k[6212]; + data[jistart + 13571] = 0.0 + k[3035]*y_cur[IDX_N2HII]; + data[jistart + 13572] = 0.0 + k[5331]*y_cur[IDX_NOI]; + data[jistart + 13573] = 0.0 + k[3461]*y_cur[IDX_NI]; + data[jistart + 13574] = 0.0 + k[3371]*y_cur[IDX_N2HII]; + data[jistart + 13575] = 0.0 + k[3351]*y_cur[IDX_NII] + k[3375]*y_cur[IDX_N2HII] + + k[5273]*y_cur[IDX_NI]; + data[jistart + 13576] = 0.0 - k[3367]*y_cur[IDX_N2I]; + data[jistart + 13577] = 0.0 - k[3366]*y_cur[IDX_N2I]; + data[jistart + 13578] = 0.0 + k[8700]*y_cur[IDX_GNI] + k[8700]*y_cur[IDX_GNI]; + data[jistart + 13579] = 0.0 + k[210]*y_cur[IDX_C2I] + k[243]*y_cur[IDX_C2HI] + + k[247]*y_cur[IDX_CI] + k[264]*y_cur[IDX_CH2I] + + k[293]*y_cur[IDX_CHI] + k[306]*y_cur[IDX_CNI] + + k[316]*y_cur[IDX_COI] + k[481]*y_cur[IDX_H2OI] + + k[498]*y_cur[IDX_HCNI] + k[535]*y_cur[IDX_MgI] + + k[564]*y_cur[IDX_CO2I] + k[565]*y_cur[IDX_FeI] + + k[566]*y_cur[IDX_H2COI] + k[567]*y_cur[IDX_H2SI] + + k[568]*y_cur[IDX_HCOI] + k[569]*y_cur[IDX_NOI] + + k[570]*y_cur[IDX_O2I] + k[571]*y_cur[IDX_OCSI] + + k[572]*y_cur[IDX_SI] + k[573]*y_cur[IDX_NI] + k[589]*y_cur[IDX_NH2I] + + k[610]*y_cur[IDX_NH3I] + k[618]*y_cur[IDX_NHI] + + k[640]*y_cur[IDX_NaI] + k[684]*y_cur[IDX_OI] + k[700]*y_cur[IDX_OHI] + + k[2204]*y_cur[IDX_CH4I] + k[2205]*y_cur[IDX_CH4I] + + k[3361]*y_cur[IDX_H2COI] + k[3362]*y_cur[IDX_H2SI] + + k[3363]*y_cur[IDX_H2SI] + k[3365]*y_cur[IDX_OCSI]; + data[jistart + 13580] = 0.0 + k[3369]*y_cur[IDX_N2HII] + k[3370]*y_cur[IDX_N2HII]; + data[jistart + 13581] = 0.0 - k[3496]*y_cur[IDX_N2I]; + data[jistart + 13582] = 0.0 + k[4785]*y_cur[IDX_N2HII]; + data[jistart + 13583] = 0.0 + k[4644]*y_cur[IDX_N2HII]; + data[jistart + 13584] = 0.0 - k[2391]*y_cur[IDX_N2I]; + data[jistart + 13585] = 0.0 + k[571]*y_cur[IDX_N2II] + k[3365]*y_cur[IDX_N2II]; + data[jistart + 13586] = 0.0 + k[4855]*y_cur[IDX_N2HII]; + data[jistart + 13587] = 0.0 + k[4049]*y_cur[IDX_N2HII]; + data[jistart + 13588] = 0.0 + k[4224]*y_cur[IDX_N2HII]; + data[jistart + 13589] = 0.0 + k[4820]*y_cur[IDX_N2HII]; + data[jistart + 13590] = 0.0 + k[3979]*y_cur[IDX_N2HII]; + data[jistart + 13591] = 0.0 + k[4119]*y_cur[IDX_N2HII]; + data[jistart + 13592] = 0.0 + k[4399]*y_cur[IDX_N2HII]; + data[jistart + 13593] = 0.0 + k[4539]*y_cur[IDX_N2HII]; + data[jistart + 13594] = 0.0 + k[4469]*y_cur[IDX_N2HII]; + data[jistart + 13595] = 0.0 + k[4609]*y_cur[IDX_N2HII]; + data[jistart + 13596] = 0.0 + k[3944]*y_cur[IDX_N2HII]; + data[jistart + 13597] = 0.0 + k[4294]*y_cur[IDX_N2HII]; + data[jistart + 13598] = 0.0 + k[4329]*y_cur[IDX_N2HII]; + data[jistart + 13599] = 0.0 + k[3909]*y_cur[IDX_N2HII]; + data[jistart + 13600] = 0.0 + k[4750]*y_cur[IDX_N2HII]; + data[jistart + 13601] = 0.0 + k[4574]*y_cur[IDX_N2HII]; + data[jistart + 13602] = 0.0 + k[4715]*y_cur[IDX_N2HII]; + data[jistart + 13603] = 0.0 + k[3374]*y_cur[IDX_N2HII]; + data[jistart + 13604] = 0.0 + k[4504]*y_cur[IDX_N2HII]; + data[jistart + 13605] = 0.0 + k[4014]*y_cur[IDX_N2HII]; + data[jistart + 13606] = 0.0 + k[4084]*y_cur[IDX_N2HII]; + data[jistart + 13607] = 0.0 + k[4189]*y_cur[IDX_N2HII]; + data[jistart + 13608] = 0.0 + k[4364]*y_cur[IDX_N2HII]; + data[jistart + 13609] = 0.0 + k[4259]*y_cur[IDX_N2HII]; + data[jistart + 13610] = 0.0 + k[4434]*y_cur[IDX_N2HII]; + data[jistart + 13611] = 0.0 + k[589]*y_cur[IDX_N2II] + k[3544]*y_cur[IDX_N2HII] + + k[5298]*y_cur[IDX_NOI] + k[5299]*y_cur[IDX_NOI]; + data[jistart + 13612] = 0.0 - k[3785]*y_cur[IDX_N2I]; + data[jistart + 13613] = 0.0 + k[4154]*y_cur[IDX_N2HII]; + data[jistart + 13614] = 0.0 + k[564]*y_cur[IDX_N2II] + k[3372]*y_cur[IDX_N2HII]; + data[jistart + 13615] = 0.0 + k[565]*y_cur[IDX_N2II]; + data[jistart + 13616] = 0.0 + k[535]*y_cur[IDX_N2II]; + data[jistart + 13617] = 0.0 + k[640]*y_cur[IDX_N2II]; + data[jistart + 13618] = 0.0 + k[618]*y_cur[IDX_N2II] + k[3616]*y_cur[IDX_N2HII] + + k[5274]*y_cur[IDX_NI] + k[5308]*y_cur[IDX_NHI] + + k[5308]*y_cur[IDX_NHI] + k[5309]*y_cur[IDX_NHI] + + k[5309]*y_cur[IDX_NHI] + k[5313]*y_cur[IDX_NOI] + + k[5314]*y_cur[IDX_NOI]; + data[jistart + 13619] = 0.0 + k[4679]*y_cur[IDX_N2HII]; + data[jistart + 13620] = 0.0 + k[1151]*y_cur[IDX_eM] + k[1152]*y_cur[IDX_eM] + + k[1461]*y_cur[IDX_C2I] + k[1568]*y_cur[IDX_C2H2I] + + k[1748]*y_cur[IDX_C2HI] + k[1909]*y_cur[IDX_CI] + + k[2010]*y_cur[IDX_CH2I] + k[2206]*y_cur[IDX_CH4I] + + k[2257]*y_cur[IDX_CHI] + k[2288]*y_cur[IDX_COI] + + k[2558]*y_cur[IDX_H2OI] + k[2881]*y_cur[IDX_HCNI] + + k[3009]*y_cur[IDX_HCOI] + k[3035]*y_cur[IDX_HNC3I] + + k[3044]*y_cur[IDX_HNCI] + k[3368]*y_cur[IDX_C6H6I] + + k[3369]*y_cur[IDX_CH3CHCH2I] + k[3370]*y_cur[IDX_CH3CHCH2I] + + k[3371]*y_cur[IDX_CH3CNI] + k[3372]*y_cur[IDX_CO2I] + + k[3373]*y_cur[IDX_H2COI] + k[3374]*y_cur[IDX_HC3NI] + + k[3375]*y_cur[IDX_NCCNI] + k[3376]*y_cur[IDX_SI] + + k[3544]*y_cur[IDX_NH2I] + k[3592]*y_cur[IDX_NH3I] + + k[3616]*y_cur[IDX_NHI] + k[3745]*y_cur[IDX_OI] + + k[3804]*y_cur[IDX_OHI] + k[3909]*y_cur[IDX_CM] + + k[3944]*y_cur[IDX_C10M] + k[3979]*y_cur[IDX_C10HM] + + k[4014]*y_cur[IDX_C2M] + k[4049]*y_cur[IDX_C2HM] + + k[4084]*y_cur[IDX_C3M] + k[4119]*y_cur[IDX_C3HM] + + k[4154]*y_cur[IDX_C3NM] + k[4189]*y_cur[IDX_C4M] + + k[4224]*y_cur[IDX_C4HM] + k[4259]*y_cur[IDX_C5M] + + k[4294]*y_cur[IDX_C5HM] + k[4329]*y_cur[IDX_C5NM] + + k[4364]*y_cur[IDX_C6M] + k[4399]*y_cur[IDX_C6HM] + + k[4434]*y_cur[IDX_C7M] + k[4469]*y_cur[IDX_C7HM] + + k[4504]*y_cur[IDX_C8M] + k[4539]*y_cur[IDX_C8HM] + + k[4574]*y_cur[IDX_C9M] + k[4609]*y_cur[IDX_C9HM] + + k[4644]*y_cur[IDX_CHM] + k[4679]*y_cur[IDX_CNM] + + k[4715]*y_cur[IDX_HM] + k[4750]*y_cur[IDX_OM] + + k[4785]*y_cur[IDX_O2M] + k[4820]*y_cur[IDX_OHM] + + k[4855]*y_cur[IDX_SM] + k[6396]*y_cur[IDX_GRAINM]; + data[jistart + 13621] = 0.0 + k[3351]*y_cur[IDX_NCCNI]; + data[jistart + 13622] = 0.0 - k[3647]*y_cur[IDX_N2I]; + data[jistart + 13623] = 0.0 + k[264]*y_cur[IDX_N2II] + k[2010]*y_cur[IDX_N2HII] - + k[5001]*y_cur[IDX_N2I]; + data[jistart + 13624] = 0.0 + k[3044]*y_cur[IDX_N2HII]; + data[jistart + 13625] = 0.0 - k[523]*y_cur[IDX_HeII] - k[2391]*y_cur[IDX_H2II] - + k[2718]*y_cur[IDX_H3II] - k[3274]*y_cur[IDX_HeII] - + k[3366]*y_cur[IDX_HNOII] - k[3367]*y_cur[IDX_O2HII] - + k[3496]*y_cur[IDX_NHII] - k[3647]*y_cur[IDX_OII] - + k[3785]*y_cur[IDX_OHII] - k[4967]*y_cur[IDX_CI] - + k[5001]*y_cur[IDX_CH2I] - k[5079]*y_cur[IDX_CHI] - + k[5220]*y_cur[IDX_O2I] - k[5417]*y_cur[IDX_OI] - k[5878] - k[6211] - + k[6916]; + data[jistart + 13626] = 0.0 + k[570]*y_cur[IDX_N2II] - k[5220]*y_cur[IDX_N2I]; + data[jistart + 13627] = 0.0 + k[567]*y_cur[IDX_N2II] + k[3362]*y_cur[IDX_N2II] + + k[3363]*y_cur[IDX_N2II]; + data[jistart + 13628] = 0.0 + k[569]*y_cur[IDX_N2II] + k[5121]*y_cur[IDX_CNI] + + k[5279]*y_cur[IDX_NI] + k[5298]*y_cur[IDX_NH2I] + + k[5299]*y_cur[IDX_NH2I] + k[5313]*y_cur[IDX_NHI] + + k[5314]*y_cur[IDX_NHI] + k[5327]*y_cur[IDX_N2OI] + + k[5329]*y_cur[IDX_NOI] + k[5329]*y_cur[IDX_NOI] + + k[5331]*y_cur[IDX_OCNI]; + data[jistart + 13629] = 0.0 + k[568]*y_cur[IDX_N2II] + k[3009]*y_cur[IDX_N2HII]; + data[jistart + 13630] = 0.0 + k[2204]*y_cur[IDX_N2II] + k[2205]*y_cur[IDX_N2II] + + k[2206]*y_cur[IDX_N2HII]; + data[jistart + 13631] = 0.0 + k[243]*y_cur[IDX_N2II] + k[1748]*y_cur[IDX_N2HII]; + data[jistart + 13632] = 0.0 + k[566]*y_cur[IDX_N2II] + k[3361]*y_cur[IDX_N2II] + + k[3373]*y_cur[IDX_N2HII]; + data[jistart + 13633] = 0.0 + k[498]*y_cur[IDX_N2II] + k[2881]*y_cur[IDX_N2HII]; + data[jistart + 13634] = 0.0 + k[293]*y_cur[IDX_N2II] + k[2257]*y_cur[IDX_N2HII] - + k[5079]*y_cur[IDX_N2I]; + data[jistart + 13635] = 0.0 + k[572]*y_cur[IDX_N2II] + k[3376]*y_cur[IDX_N2HII]; + data[jistart + 13636] = 0.0 + k[210]*y_cur[IDX_N2II] + k[1461]*y_cur[IDX_N2HII]; + data[jistart + 13637] = 0.0 + k[700]*y_cur[IDX_N2II] + k[3804]*y_cur[IDX_N2HII] + + k[5474]*y_cur[IDX_N2OI]; + data[jistart + 13638] = 0.0 + k[610]*y_cur[IDX_N2II] + k[3592]*y_cur[IDX_N2HII]; + data[jistart + 13639] = 0.0 + k[2085]*y_cur[IDX_N2OI]; + data[jistart + 13640] = 0.0 + k[1568]*y_cur[IDX_N2HII]; + data[jistart + 13641] = 0.0 + k[306]*y_cur[IDX_N2II] + k[5113]*y_cur[IDX_CNI] + + k[5113]*y_cur[IDX_CNI] + k[5121]*y_cur[IDX_NOI] + + k[5260]*y_cur[IDX_NI] + k[5261]*y_cur[IDX_NI]; + data[jistart + 13642] = 0.0 + k[573]*y_cur[IDX_N2II] + k[3461]*y_cur[IDX_HC3NII] + + k[5260]*y_cur[IDX_CNI] + k[5261]*y_cur[IDX_CNI] + + k[5273]*y_cur[IDX_NCCNI] + k[5274]*y_cur[IDX_NHI] + + k[5275]*y_cur[IDX_NO2I] + k[5278]*y_cur[IDX_NO2I] + + k[5279]*y_cur[IDX_NOI] + k[5280]*y_cur[IDX_NSI] + + k[5286]*y_cur[IDX_PNI]; + data[jistart + 13643] = 0.0 + k[684]*y_cur[IDX_N2II] + k[3745]*y_cur[IDX_N2HII] - + k[5417]*y_cur[IDX_N2I] + k[5419]*y_cur[IDX_N2OI]; + data[jistart + 13644] = 0.0 - k[523]*y_cur[IDX_N2I] - k[3274]*y_cur[IDX_N2I] + + k[3276]*y_cur[IDX_N2OI]; + data[jistart + 13645] = 0.0 + k[481]*y_cur[IDX_N2II] + k[2558]*y_cur[IDX_N2HII]; + data[jistart + 13646] = 0.0 + k[247]*y_cur[IDX_N2II] + k[1909]*y_cur[IDX_N2HII] - + k[4967]*y_cur[IDX_N2I]; + data[jistart + 13647] = 0.0 - k[2718]*y_cur[IDX_N2I]; + data[jistart + 13648] = 0.0 + k[316]*y_cur[IDX_N2II] + k[2288]*y_cur[IDX_N2HII] + + k[5128]*y_cur[IDX_N2OI]; + data[jistart + 13649] = 0.0 + k[6396]*y_cur[IDX_N2HII] + k[6528]*y_cur[IDX_N2OII] + + k[6558]*y_cur[IDX_HN2OII] + k[6559]*y_cur[IDX_HN2OII]; + data[jistart + 13650] = 0.0 + k[1113]*y_cur[IDX_HN2OII] + k[1114]*y_cur[IDX_HN2OII] + + k[1151]*y_cur[IDX_N2HII] + k[1152]*y_cur[IDX_N2HII] + + k[1170]*y_cur[IDX_N2OII]; + data[jistart + 13651] = 0.0 + k[5179]*y_cur[IDX_N2OI]; + data[jistart + 13652] = 0.0 + k[5394]*y_cur[IDX_OI]; + data[jistart + 13653] = 0.0 - k[679]*y_cur[IDX_O2I]; + data[jistart + 13654] = 0.0 + k[7116] + k[7298] + k[7480]; + data[jistart + 13655] = 0.0 + k[3331]*y_cur[IDX_HeII]; + data[jistart + 13656] = 0.0 - k[680]*y_cur[IDX_O2I]; + data[jistart + 13657] = 0.0 + k[3741]*y_cur[IDX_OI]; + data[jistart + 13658] = 0.0 + k[676]*y_cur[IDX_O2II] + k[3648]*y_cur[IDX_OII] + + k[5278]*y_cur[IDX_NI] + k[5423]*y_cur[IDX_OI]; + data[jistart + 13659] = 0.0 + k[671]*y_cur[IDX_O2II]; + data[jistart + 13660] = 0.0 - k[3673]*y_cur[IDX_O2I]; + data[jistart + 13661] = 0.0 + k[675]*y_cur[IDX_O2II]; + data[jistart + 13662] = 0.0 - k[3882]*y_cur[IDX_O2I]; + data[jistart + 13663] = 0.0 - k[3884]*y_cur[IDX_O2I]; + data[jistart + 13664] = 0.0 + k[5042]*y_cur[IDX_CH3I] + k[5095]*y_cur[IDX_CHI] + + k[5192]*y_cur[IDX_HI] + k[5210]*y_cur[IDX_HCOI] + + k[5282]*y_cur[IDX_NI] + k[5339]*y_cur[IDX_O2HI] + + k[5339]*y_cur[IDX_O2HI] + k[5427]*y_cur[IDX_OI] + + k[5478]*y_cur[IDX_OHI] + k[5899] + k[6237]; + data[jistart + 13665] = 0.0 + k[3303]*y_cur[IDX_HeII] + k[3651]*y_cur[IDX_OII] + + k[5438]*y_cur[IDX_OI]; + data[jistart + 13666] = 0.0 + k[5413]*y_cur[IDX_OI]; + data[jistart + 13667] = 0.0 + k[5419]*y_cur[IDX_OI]; + data[jistart + 13668] = 0.0 - k[5335]*y_cur[IDX_O2I] - k[5336]*y_cur[IDX_O2I] + + k[5429]*y_cur[IDX_OI]; + data[jistart + 13669] = 0.0 - k[678]*y_cur[IDX_O2I]; + data[jistart + 13670] = 0.0 - k[3818]*y_cur[IDX_O2I]; + data[jistart + 13671] = 0.0 + k[3736]*y_cur[IDX_OI]; + data[jistart + 13672] = 0.0 - k[3672]*y_cur[IDX_O2I]; + data[jistart + 13673] = 0.0 - k[3812]*y_cur[IDX_O2I]; + data[jistart + 13674] = 0.0 - k[3668]*y_cur[IDX_O2I]; + data[jistart + 13675] = 0.0 + k[1175]*y_cur[IDX_eM] + k[1463]*y_cur[IDX_C2I] + + k[1749]*y_cur[IDX_C2HI] + k[1913]*y_cur[IDX_CI] + + k[2015]*y_cur[IDX_CH2I] + k[2263]*y_cur[IDX_CHI] + + k[2279]*y_cur[IDX_CNI] + k[2289]*y_cur[IDX_COI] + + k[2468]*y_cur[IDX_H2I] + k[2499]*y_cur[IDX_H2COI] + + k[2561]*y_cur[IDX_H2OI] + k[2883]*y_cur[IDX_HCNI] + + k[3011]*y_cur[IDX_HCOI] + k[3045]*y_cur[IDX_HNCI] + + k[3367]*y_cur[IDX_N2I] + k[3546]*y_cur[IDX_NH2I] + + k[3594]*y_cur[IDX_NH3I] + k[3622]*y_cur[IDX_NHI] + + k[3627]*y_cur[IDX_NOI] + k[3677]*y_cur[IDX_CO2I] + + k[3749]*y_cur[IDX_OI] + k[3806]*y_cur[IDX_OHI] + + k[3840]*y_cur[IDX_SI] + k[6437]*y_cur[IDX_GRAINM]; + data[jistart + 13676] = 0.0 - k[283]*y_cur[IDX_O2I]; + data[jistart + 13677] = 0.0 + k[669]*y_cur[IDX_O2II]; + data[jistart + 13678] = 0.0 - k[304]*y_cur[IDX_O2I] - k[2275]*y_cur[IDX_O2I] - + k[2276]*y_cur[IDX_O2I]; + data[jistart + 13679] = 0.0 + k[8689]*y_cur[IDX_GOI] + k[8689]*y_cur[IDX_GOI]; + data[jistart + 13680] = 0.0 - k[570]*y_cur[IDX_O2I]; + data[jistart + 13681] = 0.0 + k[4767]*y_cur[IDX_O2M]; + data[jistart + 13682] = 0.0 - k[495]*y_cur[IDX_O2I]; + data[jistart + 13683] = 0.0 + k[670]*y_cur[IDX_O2II]; + data[jistart + 13684] = 0.0 - k[1455]*y_cur[IDX_O2I]; + data[jistart + 13685] = 0.0 + k[4770]*y_cur[IDX_O2M]; + data[jistart + 13686] = 0.0 - k[578]*y_cur[IDX_O2I] - k[3501]*y_cur[IDX_O2I] - + k[3502]*y_cur[IDX_O2I]; + data[jistart + 13687] = 0.0 - k[146]*y_cur[IDX_O2I] + k[146]*y_cur[IDX_O2I] + + k[146]*y_cur[IDX_O2I] + k[4762]*y_cur[IDX_CII] + + k[4763]*y_cur[IDX_C2H2II] + k[4764]*y_cur[IDX_C2H3II] + + k[4765]*y_cur[IDX_C4H2II] + k[4766]*y_cur[IDX_C4H3II] + + k[4767]*y_cur[IDX_C4SII] + k[4768]*y_cur[IDX_CH2CCHII] + + k[4769]*y_cur[IDX_CH3II] + k[4770]*y_cur[IDX_CNCII] + + k[4771]*y_cur[IDX_FeII] + k[4772]*y_cur[IDX_HII] + + k[4773]*y_cur[IDX_H2COII] + k[4774]*y_cur[IDX_H2SII] + + k[4775]*y_cur[IDX_H3II] + k[4776]*y_cur[IDX_H3OII] + + k[4777]*y_cur[IDX_HC2SII] + k[4778]*y_cur[IDX_HCNHII] + + k[4779]*y_cur[IDX_HCNHII] + k[4780]*y_cur[IDX_HCOII] + + k[4781]*y_cur[IDX_HCOII] + k[4782]*y_cur[IDX_HeII] + + k[4783]*y_cur[IDX_MgII] + k[4784]*y_cur[IDX_NII] + + k[4785]*y_cur[IDX_N2HII] + k[4786]*y_cur[IDX_NH3II] + + k[4787]*y_cur[IDX_NH4II] + k[4788]*y_cur[IDX_NOII] + + k[4789]*y_cur[IDX_NaII] + k[4790]*y_cur[IDX_OII] + + k[4791]*y_cur[IDX_SII] + k[4792]*y_cur[IDX_SOII] + + k[4793]*y_cur[IDX_SiII] + k[4794]*y_cur[IDX_SiOII] + + k[4795]*y_cur[IDX_SiOHII] + k[4796]*y_cur[IDX_SiSII] + k[5896] + + k[6234]; + data[jistart + 13688] = 0.0 - k[455]*y_cur[IDX_O2I] - k[2395]*y_cur[IDX_O2I]; + data[jistart + 13689] = 0.0 - k[3524]*y_cur[IDX_O2I] - k[3525]*y_cur[IDX_O2I]; + data[jistart + 13690] = 0.0 - k[5484]*y_cur[IDX_O2I]; + data[jistart + 13691] = 0.0 - k[127]*y_cur[IDX_O2I]; + data[jistart + 13692] = 0.0 - k[3675]*y_cur[IDX_O2I] - k[3676]*y_cur[IDX_O2I] + + k[4796]*y_cur[IDX_O2M]; + data[jistart + 13693] = 0.0 - k[312]*y_cur[IDX_O2I]; + data[jistart + 13694] = 0.0 + k[4777]*y_cur[IDX_O2M]; + data[jistart + 13695] = 0.0 - k[7]*y_cur[IDX_O2I] - k[1450]*y_cur[IDX_O2I]; + data[jistart + 13696] = 0.0 + k[126]*y_cur[IDX_OI] - k[667]*y_cur[IDX_O2I]; + data[jistart + 13697] = 0.0 + k[672]*y_cur[IDX_O2II] + k[3665]*y_cur[IDX_O2II]; + data[jistart + 13698] = 0.0 - k[3669]*y_cur[IDX_O2I] - k[3670]*y_cur[IDX_O2I] - + k[3671]*y_cur[IDX_O2I]; + data[jistart + 13699] = 0.0 + k[3764]*y_cur[IDX_OI] + k[4794]*y_cur[IDX_O2M]; + data[jistart + 13700] = 0.0 + k[4795]*y_cur[IDX_O2M]; + data[jistart + 13701] = 0.0 + k[590]*y_cur[IDX_O2II] + k[3546]*y_cur[IDX_O2HII]; + data[jistart + 13702] = 0.0 - k[1990]*y_cur[IDX_O2I]; + data[jistart + 13703] = 0.0 - k[694]*y_cur[IDX_O2I]; + data[jistart + 13704] = 0.0 - k[474]*y_cur[IDX_O2I]; + data[jistart + 13705] = 0.0 - k[1966]*y_cur[IDX_O2I] - k[1967]*y_cur[IDX_O2I] - + k[1968]*y_cur[IDX_O2I]; + data[jistart + 13706] = 0.0 + k[3210]*y_cur[IDX_HeII] + k[3677]*y_cur[IDX_O2HII] + + k[5390]*y_cur[IDX_OI]; + data[jistart + 13707] = 0.0 + k[211]*y_cur[IDX_C2I] + k[240]*y_cur[IDX_C2H4I] + + k[248]*y_cur[IDX_CI] + k[267]*y_cur[IDX_CH2I] + + k[296]*y_cur[IDX_CHI] + k[461]*y_cur[IDX_H2COI] + + k[502]*y_cur[IDX_HCOI] + k[537]*y_cur[IDX_MgI] + + k[590]*y_cur[IDX_NH2I] + k[611]*y_cur[IDX_NH3I] + + k[628]*y_cur[IDX_NOI] + k[642]*y_cur[IDX_NaI] + + k[668]*y_cur[IDX_C2H2I] + k[669]*y_cur[IDX_CH2CCH2I] + + k[670]*y_cur[IDX_CH3CHCH2I] + k[671]*y_cur[IDX_CH3OCH3I] + + k[672]*y_cur[IDX_CH3OHI] + k[673]*y_cur[IDX_FeI] + + k[674]*y_cur[IDX_H2SI] + k[675]*y_cur[IDX_HCOOHI] + + k[676]*y_cur[IDX_NO2I] + k[677]*y_cur[IDX_SI] + + k[722]*y_cur[IDX_SiI] + k[2498]*y_cur[IDX_H2COI] + + k[3665]*y_cur[IDX_CH3OHI]; + data[jistart + 13708] = 0.0 + k[4771]*y_cur[IDX_O2M]; + data[jistart + 13709] = 0.0 + k[673]*y_cur[IDX_O2II]; + data[jistart + 13710] = 0.0 + k[4783]*y_cur[IDX_O2M]; + data[jistart + 13711] = 0.0 + k[4789]*y_cur[IDX_O2M]; + data[jistart + 13712] = 0.0 + k[537]*y_cur[IDX_O2II]; + data[jistart + 13713] = 0.0 + k[642]*y_cur[IDX_O2II]; + data[jistart + 13714] = 0.0 + k[3622]*y_cur[IDX_O2HII] - k[5316]*y_cur[IDX_O2I] - + k[5317]*y_cur[IDX_O2I]; + data[jistart + 13715] = 0.0 - k[5338]*y_cur[IDX_O2I] + k[5439]*y_cur[IDX_OI]; + data[jistart + 13716] = 0.0 + k[4766]*y_cur[IDX_O2M]; + data[jistart + 13717] = 0.0 + k[4785]*y_cur[IDX_O2M]; + data[jistart + 13718] = 0.0 + k[4792]*y_cur[IDX_O2M]; + data[jistart + 13719] = 0.0 + k[4768]*y_cur[IDX_O2M]; + data[jistart + 13720] = 0.0 + k[4774]*y_cur[IDX_O2M]; + data[jistart + 13721] = 0.0 - k[561]*y_cur[IDX_O2I] - k[3357]*y_cur[IDX_O2I] - + k[3358]*y_cur[IDX_O2I] + k[4784]*y_cur[IDX_O2M]; + data[jistart + 13722] = 0.0 - k[2489]*y_cur[IDX_O2I] + k[4773]*y_cur[IDX_O2M]; + data[jistart + 13723] = 0.0 + k[4788]*y_cur[IDX_O2M]; + data[jistart + 13724] = 0.0 - k[662]*y_cur[IDX_O2I] + k[3648]*y_cur[IDX_NO2I] + + k[3651]*y_cur[IDX_SO2I] + k[4790]*y_cur[IDX_O2M]; + data[jistart + 13725] = 0.0 + k[4765]*y_cur[IDX_O2M]; + data[jistart + 13726] = 0.0 + k[4778]*y_cur[IDX_O2M] + k[4779]*y_cur[IDX_O2M]; + data[jistart + 13727] = 0.0 + k[267]*y_cur[IDX_O2II] + k[2015]*y_cur[IDX_O2HII] - + k[5007]*y_cur[IDX_O2I] - k[5008]*y_cur[IDX_O2I] - + k[5009]*y_cur[IDX_O2I] - k[5010]*y_cur[IDX_O2I] - + k[5011]*y_cur[IDX_O2I]; + data[jistart + 13728] = 0.0 + k[3045]*y_cur[IDX_O2HII]; + data[jistart + 13729] = 0.0 + k[4786]*y_cur[IDX_O2M]; + data[jistart + 13730] = 0.0 + k[240]*y_cur[IDX_O2II]; + data[jistart + 13731] = 0.0 - k[4881]*y_cur[IDX_O2I] - k[4882]*y_cur[IDX_O2I]; + data[jistart + 13732] = 0.0 + k[4787]*y_cur[IDX_O2M]; + data[jistart + 13733] = 0.0 + k[3367]*y_cur[IDX_O2HII] - k[5220]*y_cur[IDX_O2I]; + data[jistart + 13734] = 0.0 - k[7]*y_cur[IDX_CM] - k[127]*y_cur[IDX_SM] - + k[138]*y_cur[IDX_H2I] - k[144]*y_cur[IDX_HI] - k[146]*y_cur[IDX_O2M] + + k[146]*y_cur[IDX_O2M] + k[146]*y_cur[IDX_O2M] - + k[283]*y_cur[IDX_CH4II] - k[304]*y_cur[IDX_CNII] - + k[312]*y_cur[IDX_COII] - k[405]*y_cur[IDX_HII] - + k[455]*y_cur[IDX_H2II] - k[474]*y_cur[IDX_H2OII] - + k[495]*y_cur[IDX_HCNII] - k[525]*y_cur[IDX_HeII] - + k[561]*y_cur[IDX_NII] - k[570]*y_cur[IDX_N2II] - + k[578]*y_cur[IDX_NHII] - k[662]*y_cur[IDX_OII] - + k[667]*y_cur[IDX_OM] - k[678]*y_cur[IDX_CO2II] - + k[679]*y_cur[IDX_ClII] - k[680]*y_cur[IDX_SO2II] - + k[694]*y_cur[IDX_OHII] - k[1422]*y_cur[IDX_CII] - + k[1423]*y_cur[IDX_CII] - k[1450]*y_cur[IDX_CM] - + k[1455]*y_cur[IDX_C2II] - k[1966]*y_cur[IDX_CHII] - + k[1967]*y_cur[IDX_CHII] - k[1968]*y_cur[IDX_CHII] - + k[1990]*y_cur[IDX_CH2II] - k[2089]*y_cur[IDX_CH3II] - + k[2275]*y_cur[IDX_CNII] - k[2276]*y_cur[IDX_CNII] - + k[2395]*y_cur[IDX_H2II] - k[2489]*y_cur[IDX_H2COII] - + k[2729]*y_cur[IDX_H3II] - k[3290]*y_cur[IDX_HeII] - + k[3357]*y_cur[IDX_NII] - k[3358]*y_cur[IDX_NII] - + k[3501]*y_cur[IDX_NHII] - k[3502]*y_cur[IDX_NHII] - + k[3524]*y_cur[IDX_NH2II] - k[3525]*y_cur[IDX_NH2II] - + k[3668]*y_cur[IDX_C3II] - k[3669]*y_cur[IDX_C3HII] - + k[3670]*y_cur[IDX_C3HII] - k[3671]*y_cur[IDX_C3HII] - + k[3672]*y_cur[IDX_CSII] - k[3673]*y_cur[IDX_PH2II] - + k[3674]*y_cur[IDX_SII] - k[3675]*y_cur[IDX_SiSII] - + k[3676]*y_cur[IDX_SiSII] - k[3812]*y_cur[IDX_PII] - + k[3818]*y_cur[IDX_PHII] - k[3882]*y_cur[IDX_SiH2II] - + k[3884]*y_cur[IDX_SiH3II] - k[4874]*y_cur[IDX_C2I] - + k[4881]*y_cur[IDX_C2H3I] - k[4882]*y_cur[IDX_C2H3I] - + k[4904]*y_cur[IDX_C2HI] - k[4978]*y_cur[IDX_CI] - + k[5007]*y_cur[IDX_CH2I] - k[5008]*y_cur[IDX_CH2I] - + k[5009]*y_cur[IDX_CH2I] - k[5010]*y_cur[IDX_CH2I] - + k[5011]*y_cur[IDX_CH2I] - k[5039]*y_cur[IDX_CH3I] - + k[5040]*y_cur[IDX_CH3I] - k[5041]*y_cur[IDX_CH3I] - + k[5060]*y_cur[IDX_CH4I] - k[5086]*y_cur[IDX_CHI] - + k[5087]*y_cur[IDX_CHI] - k[5088]*y_cur[IDX_CHI] - + k[5089]*y_cur[IDX_CHI] - k[5090]*y_cur[IDX_CHI] - + k[5091]*y_cur[IDX_CHI] - k[5092]*y_cur[IDX_CHI] - + k[5093]*y_cur[IDX_CHI] - k[5123]*y_cur[IDX_CNI] - + k[5124]*y_cur[IDX_CNI] - k[5130]*y_cur[IDX_COI] - + k[5144]*y_cur[IDX_H2I] - k[5145]*y_cur[IDX_H2I] - + k[5190]*y_cur[IDX_HI] - k[5208]*y_cur[IDX_HCOI] - + k[5209]*y_cur[IDX_HCOI] - k[5220]*y_cur[IDX_N2I] - + k[5281]*y_cur[IDX_NI] - k[5316]*y_cur[IDX_NHI] - + k[5317]*y_cur[IDX_NHI] - k[5330]*y_cur[IDX_NOI] - + k[5335]*y_cur[IDX_OCNI] - k[5336]*y_cur[IDX_OCNI] - + k[5337]*y_cur[IDX_SI] - k[5338]*y_cur[IDX_SOI] - + k[5484]*y_cur[IDX_PI] - k[5494]*y_cur[IDX_SiI] - k[5897] - k[5898] - + k[6235] - k[6236] - k[6934]; + data[jistart + 13735] = 0.0 + k[4793]*y_cur[IDX_O2M]; + data[jistart + 13736] = 0.0 + k[674]*y_cur[IDX_O2II]; + data[jistart + 13737] = 0.0 - k[3674]*y_cur[IDX_O2I] + k[4791]*y_cur[IDX_O2M]; + data[jistart + 13738] = 0.0 + k[722]*y_cur[IDX_O2II] - k[5494]*y_cur[IDX_O2I]; + data[jistart + 13739] = 0.0 + k[4764]*y_cur[IDX_O2M]; + data[jistart + 13740] = 0.0 + k[628]*y_cur[IDX_O2II] + k[3627]*y_cur[IDX_O2HII] + + k[5329]*y_cur[IDX_NOI] + k[5329]*y_cur[IDX_NOI] - + k[5330]*y_cur[IDX_O2I] + k[5424]*y_cur[IDX_OI]; + data[jistart + 13741] = 0.0 + k[502]*y_cur[IDX_O2II] + k[3011]*y_cur[IDX_O2HII] - + k[5208]*y_cur[IDX_O2I] - k[5209]*y_cur[IDX_O2I] + + k[5210]*y_cur[IDX_O2HI]; + data[jistart + 13742] = 0.0 - k[5060]*y_cur[IDX_O2I]; + data[jistart + 13743] = 0.0 + k[1749]*y_cur[IDX_O2HII] - k[4904]*y_cur[IDX_O2I]; + data[jistart + 13744] = 0.0 + k[461]*y_cur[IDX_O2II] + k[2498]*y_cur[IDX_O2II] + + k[2499]*y_cur[IDX_O2HII]; + data[jistart + 13745] = 0.0 + k[2883]*y_cur[IDX_O2HII]; + data[jistart + 13746] = 0.0 + k[296]*y_cur[IDX_O2II] + k[2263]*y_cur[IDX_O2HII] - + k[5086]*y_cur[IDX_O2I] - k[5087]*y_cur[IDX_O2I] - + k[5088]*y_cur[IDX_O2I] - k[5089]*y_cur[IDX_O2I] - + k[5090]*y_cur[IDX_O2I] - k[5091]*y_cur[IDX_O2I] - + k[5092]*y_cur[IDX_O2I] - k[5093]*y_cur[IDX_O2I] + + k[5095]*y_cur[IDX_O2HI]; + data[jistart + 13747] = 0.0 + k[677]*y_cur[IDX_O2II] + k[3840]*y_cur[IDX_O2HII] - + k[5337]*y_cur[IDX_O2I]; + data[jistart + 13748] = 0.0 + k[211]*y_cur[IDX_O2II] + k[1463]*y_cur[IDX_O2HII] - + k[4874]*y_cur[IDX_O2I]; + data[jistart + 13749] = 0.0 + k[3806]*y_cur[IDX_O2HII] + k[5432]*y_cur[IDX_OI] + + k[5478]*y_cur[IDX_O2HI]; + data[jistart + 13750] = 0.0 + k[611]*y_cur[IDX_O2II] + k[3594]*y_cur[IDX_O2HII]; + data[jistart + 13751] = 0.0 + k[4763]*y_cur[IDX_O2M]; + data[jistart + 13752] = 0.0 - k[2089]*y_cur[IDX_O2I] + k[4769]*y_cur[IDX_O2M]; + data[jistart + 13753] = 0.0 + k[668]*y_cur[IDX_O2II]; + data[jistart + 13754] = 0.0 + k[2279]*y_cur[IDX_O2HII] - k[5123]*y_cur[IDX_O2I] - + k[5124]*y_cur[IDX_O2I]; + data[jistart + 13755] = 0.0 - k[5039]*y_cur[IDX_O2I] - k[5040]*y_cur[IDX_O2I] - + k[5041]*y_cur[IDX_O2I] + k[5042]*y_cur[IDX_O2HI]; + data[jistart + 13756] = 0.0 + k[5278]*y_cur[IDX_NO2I] - k[5281]*y_cur[IDX_O2I] + + k[5282]*y_cur[IDX_O2HI]; + data[jistart + 13757] = 0.0 + k[4776]*y_cur[IDX_O2M]; + data[jistart + 13758] = 0.0 + k[126]*y_cur[IDX_OM] + k[3736]*y_cur[IDX_HCO2II] + + k[3741]*y_cur[IDX_HPOII] + k[3749]*y_cur[IDX_O2HII] + + k[3764]*y_cur[IDX_SiOII] + k[5390]*y_cur[IDX_CO2I] + + k[5394]*y_cur[IDX_ClOI] + k[5413]*y_cur[IDX_HNOI] + + k[5419]*y_cur[IDX_N2OI] + k[5423]*y_cur[IDX_NO2I] + + k[5424]*y_cur[IDX_NOI] + k[5427]*y_cur[IDX_O2HI] + + k[5429]*y_cur[IDX_OCNI] + k[5432]*y_cur[IDX_OHI] + + k[5438]*y_cur[IDX_SO2I] + k[5439]*y_cur[IDX_SOI] + + k[5582]*y_cur[IDX_OI] + k[5582]*y_cur[IDX_OI]; + data[jistart + 13759] = 0.0 - k[525]*y_cur[IDX_O2I] + k[3210]*y_cur[IDX_CO2I] - + k[3290]*y_cur[IDX_O2I] + k[3303]*y_cur[IDX_SO2I] + + k[3331]*y_cur[IDX_SiO2I] + k[4782]*y_cur[IDX_O2M]; + data[jistart + 13760] = 0.0 - k[1422]*y_cur[IDX_O2I] - k[1423]*y_cur[IDX_O2I] + + k[4762]*y_cur[IDX_O2M]; + data[jistart + 13761] = 0.0 + k[2561]*y_cur[IDX_O2HII]; + data[jistart + 13762] = 0.0 - k[405]*y_cur[IDX_O2I] + k[4772]*y_cur[IDX_O2M]; + data[jistart + 13763] = 0.0 + k[248]*y_cur[IDX_O2II] + k[1913]*y_cur[IDX_O2HII] - + k[4978]*y_cur[IDX_O2I]; + data[jistart + 13764] = 0.0 + k[4780]*y_cur[IDX_O2M] + k[4781]*y_cur[IDX_O2M]; + data[jistart + 13765] = 0.0 - k[2729]*y_cur[IDX_O2I] + k[4775]*y_cur[IDX_O2M]; + data[jistart + 13766] = 0.0 + k[2289]*y_cur[IDX_O2HII] - k[5130]*y_cur[IDX_O2I]; + data[jistart + 13767] = 0.0 + k[6437]*y_cur[IDX_O2HII]; + data[jistart + 13768] = 0.0 - k[138]*y_cur[IDX_O2I] + k[2468]*y_cur[IDX_O2HII] - + k[5144]*y_cur[IDX_O2I] - k[5145]*y_cur[IDX_O2I]; + data[jistart + 13769] = 0.0 + k[1175]*y_cur[IDX_O2HII]; + data[jistart + 13770] = 0.0 - k[144]*y_cur[IDX_O2I] - k[5190]*y_cur[IDX_O2I] + + k[5192]*y_cur[IDX_O2HI]; + data[jistart + 13771] = 0.0 + k[3331]*y_cur[IDX_HeII]; + data[jistart + 13772] = 0.0 + k[3313]*y_cur[IDX_HeII]; + data[jistart + 13773] = 0.0 - k[3015]*y_cur[IDX_SiII]; + data[jistart + 13774] = 0.0 + k[3310]*y_cur[IDX_HeII]; + data[jistart + 13775] = 0.0 + k[3469]*y_cur[IDX_NI]; + data[jistart + 13776] = 0.0 + k[3257]*y_cur[IDX_HeII]; + data[jistart + 13777] = 0.0 + k[3307]*y_cur[IDX_HeII]; + data[jistart + 13778] = 0.0 + k[3329]*y_cur[IDX_HeII]; + data[jistart + 13779] = 0.0 + k[3322]*y_cur[IDX_HeII]; + data[jistart + 13780] = 0.0 + k[1434]*y_cur[IDX_CII] + k[3316]*y_cur[IDX_HeII]; + data[jistart + 13781] = 0.0 - k[3859]*y_cur[IDX_SiII]; + data[jistart + 13782] = 0.0 + k[1920]*y_cur[IDX_CI] + k[3470]*y_cur[IDX_NI] + + k[3754]*y_cur[IDX_OI] + k[3841]*y_cur[IDX_SI]; + data[jistart + 13783] = 0.0 + k[2848]*y_cur[IDX_HI] + k[6271]; + data[jistart + 13784] = 0.0 + k[2365]*y_cur[IDX_HII] + k[3328]*y_cur[IDX_HeII]; + data[jistart + 13785] = 0.0 + k[1531]*y_cur[IDX_C2H2II] + k[3326]*y_cur[IDX_HeII]; + data[jistart + 13786] = 0.0 + k[717]*y_cur[IDX_SiI]; + data[jistart + 13787] = 0.0 + k[723]*y_cur[IDX_SiI]; + data[jistart + 13788] = 0.0 - k[3870]*y_cur[IDX_SiII]; + data[jistart + 13789] = 0.0 - k[3868]*y_cur[IDX_SiII]; + data[jistart + 13790] = 0.0 - k[3860]*y_cur[IDX_SiII]; + data[jistart + 13791] = 0.0 + k[720]*y_cur[IDX_SiI]; + data[jistart + 13792] = 0.0 - k[4793]*y_cur[IDX_SiII]; + data[jistart + 13793] = 0.0 - k[4652]*y_cur[IDX_SiII]; + data[jistart + 13794] = 0.0 - k[3871]*y_cur[IDX_SiII]; + data[jistart + 13795] = 0.0 - k[4863]*y_cur[IDX_SiII]; + data[jistart + 13796] = 0.0 + k[2849]*y_cur[IDX_HI]; + data[jistart + 13797] = 0.0 - k[4057]*y_cur[IDX_SiII]; + data[jistart + 13798] = 0.0 - k[4232]*y_cur[IDX_SiII]; + data[jistart + 13799] = 0.0 - k[3864]*y_cur[IDX_SiII] - k[3865]*y_cur[IDX_SiII] - + k[3866]*y_cur[IDX_SiII]; + data[jistart + 13800] = 0.0 - k[4828]*y_cur[IDX_SiII]; + data[jistart + 13801] = 0.0 - k[3987]*y_cur[IDX_SiII]; + data[jistart + 13802] = 0.0 - k[4127]*y_cur[IDX_SiII]; + data[jistart + 13803] = 0.0 - k[4407]*y_cur[IDX_SiII]; + data[jistart + 13804] = 0.0 - k[4547]*y_cur[IDX_SiII]; + data[jistart + 13805] = 0.0 - k[4477]*y_cur[IDX_SiII]; + data[jistart + 13806] = 0.0 - k[4617]*y_cur[IDX_SiII]; + data[jistart + 13807] = 0.0 - k[3952]*y_cur[IDX_SiII]; + data[jistart + 13808] = 0.0 - k[4302]*y_cur[IDX_SiII]; + data[jistart + 13809] = 0.0 - k[4337]*y_cur[IDX_SiII]; + data[jistart + 13810] = 0.0 - k[3917]*y_cur[IDX_SiII]; + data[jistart + 13811] = 0.0 - k[4758]*y_cur[IDX_SiII]; + data[jistart + 13812] = 0.0 - k[4582]*y_cur[IDX_SiII]; + data[jistart + 13813] = 0.0 - k[3867]*y_cur[IDX_SiII]; + data[jistart + 13814] = 0.0 - k[4723]*y_cur[IDX_SiII]; + data[jistart + 13815] = 0.0 + k[3335]*y_cur[IDX_HeII]; + data[jistart + 13816] = 0.0 - k[4512]*y_cur[IDX_SiII]; + data[jistart + 13817] = 0.0 - k[4022]*y_cur[IDX_SiII]; + data[jistart + 13818] = 0.0 - k[4092]*y_cur[IDX_SiII]; + data[jistart + 13819] = 0.0 - k[4197]*y_cur[IDX_SiII]; + data[jistart + 13820] = 0.0 - k[4372]*y_cur[IDX_SiII]; + data[jistart + 13821] = 0.0 - k[4267]*y_cur[IDX_SiII]; + data[jistart + 13822] = 0.0 - k[4442]*y_cur[IDX_SiII]; + data[jistart + 13823] = 0.0 + k[1932]*y_cur[IDX_CI] + k[2019]*y_cur[IDX_CH2I] + + k[2292]*y_cur[IDX_COI] + k[3476]*y_cur[IDX_NI] + + k[3764]*y_cur[IDX_OI] + k[3842]*y_cur[IDX_SI] + k[6284]; + data[jistart + 13824] = 0.0 + k[477]*y_cur[IDX_SiI]; + data[jistart + 13825] = 0.0 - k[4162]*y_cur[IDX_SiII]; + data[jistart + 13826] = 0.0 + k[257]*y_cur[IDX_SiI]; + data[jistart + 13827] = 0.0 + k[722]*y_cur[IDX_SiI]; + data[jistart + 13828] = 0.0 + k[1447]*y_cur[IDX_CII] + k[3332]*y_cur[IDX_HeII]; + data[jistart + 13829] = 0.0 - k[716]*y_cur[IDX_SiII]; + data[jistart + 13830] = 0.0 - k[540]*y_cur[IDX_SiII]; + data[jistart + 13831] = 0.0 - k[645]*y_cur[IDX_SiII]; + data[jistart + 13832] = 0.0 - k[3625]*y_cur[IDX_SiII]; + data[jistart + 13833] = 0.0 - k[4687]*y_cur[IDX_SiII]; + data[jistart + 13834] = 0.0 - k[3863]*y_cur[IDX_SiII]; + data[jistart + 13835] = 0.0 + k[719]*y_cur[IDX_SiI]; + data[jistart + 13836] = 0.0 - k[3861]*y_cur[IDX_SiII]; + data[jistart + 13837] = 0.0 + k[718]*y_cur[IDX_SiI]; + data[jistart + 13838] = 0.0 - k[3862]*y_cur[IDX_SiII]; + data[jistart + 13839] = 0.0 + k[721]*y_cur[IDX_SiI]; + data[jistart + 13840] = 0.0 - k[3869]*y_cur[IDX_SiII]; + data[jistart + 13841] = 0.0 - k[2018]*y_cur[IDX_SiII] + k[2019]*y_cur[IDX_SiOII]; + data[jistart + 13842] = 0.0 - k[3046]*y_cur[IDX_SiII]; + data[jistart + 13843] = 0.0 + k[597]*y_cur[IDX_SiI]; + data[jistart + 13844] = 0.0 - k[1718]*y_cur[IDX_SiII]; + data[jistart + 13845] = 0.0 - k[1646]*y_cur[IDX_SiII]; + data[jistart + 13846] = 0.0 - k[540]*y_cur[IDX_MgI] - k[645]*y_cur[IDX_NaI] - + k[716]*y_cur[IDX_FeI] - k[1574]*y_cur[IDX_C2H2I] - + k[1646]*y_cur[IDX_C2H3I] - k[1718]*y_cur[IDX_C2H4I] - + k[1751]*y_cur[IDX_C2HI] - k[2018]*y_cur[IDX_CH2I] - + k[2102]*y_cur[IDX_CH3I] - k[2103]*y_cur[IDX_CH3I] - + k[2266]*y_cur[IDX_CHI] - k[2569]*y_cur[IDX_H2OI] - + k[2885]*y_cur[IDX_HCNI] - k[3015]*y_cur[IDX_HFI] - + k[3046]*y_cur[IDX_HNCI] - k[3602]*y_cur[IDX_NH3I] - + k[3625]*y_cur[IDX_NHI] - k[3809]*y_cur[IDX_OHI] - + k[3859]*y_cur[IDX_C2H5OHI] - k[3860]*y_cur[IDX_C3H2I] - + k[3861]*y_cur[IDX_C3HI] - k[3862]*y_cur[IDX_C4HI] - + k[3863]*y_cur[IDX_CH2CCHI] - k[3864]*y_cur[IDX_CH3CCHI] - + k[3865]*y_cur[IDX_CH3CCHI] - k[3866]*y_cur[IDX_CH3CCHI] - + k[3867]*y_cur[IDX_CH3OHI] - k[3868]*y_cur[IDX_H2CCCI] - + k[3869]*y_cur[IDX_C4H2I] - k[3870]*y_cur[IDX_NCCNI] - + k[3871]*y_cur[IDX_OCSI] - k[3917]*y_cur[IDX_CM] - + k[3952]*y_cur[IDX_C10M] - k[3987]*y_cur[IDX_C10HM] - + k[4022]*y_cur[IDX_C2M] - k[4057]*y_cur[IDX_C2HM] - + k[4092]*y_cur[IDX_C3M] - k[4127]*y_cur[IDX_C3HM] - + k[4162]*y_cur[IDX_C3NM] - k[4197]*y_cur[IDX_C4M] - + k[4232]*y_cur[IDX_C4HM] - k[4267]*y_cur[IDX_C5M] - + k[4302]*y_cur[IDX_C5HM] - k[4337]*y_cur[IDX_C5NM] - + k[4372]*y_cur[IDX_C6M] - k[4407]*y_cur[IDX_C6HM] - + k[4442]*y_cur[IDX_C7M] - k[4477]*y_cur[IDX_C7HM] - + k[4512]*y_cur[IDX_C8M] - k[4547]*y_cur[IDX_C8HM] - + k[4582]*y_cur[IDX_C9M] - k[4617]*y_cur[IDX_C9HM] - + k[4652]*y_cur[IDX_CHM] - k[4687]*y_cur[IDX_CNM] - + k[4723]*y_cur[IDX_HM] - k[4758]*y_cur[IDX_OM] - + k[4793]*y_cur[IDX_O2M] - k[4828]*y_cur[IDX_OHM] - + k[4863]*y_cur[IDX_SM] - k[5512]*y_cur[IDX_C2H2I] - + k[5544]*y_cur[IDX_CH4I] - k[5562]*y_cur[IDX_H2I] - + k[5575]*y_cur[IDX_HI] - k[5580]*y_cur[IDX_HCNI] - + k[5584]*y_cur[IDX_OI] - k[5626]*y_cur[IDX_eM] - + k[6374]*y_cur[IDX_GRAINM]; + data[jistart + 13847] = 0.0 + k[724]*y_cur[IDX_SiI]; + data[jistart + 13848] = 0.0 + k[194]*y_cur[IDX_CII] + k[257]*y_cur[IDX_CHII] + + k[418]*y_cur[IDX_HII] + k[477]*y_cur[IDX_H2OII] + + k[528]*y_cur[IDX_HeII] + k[597]*y_cur[IDX_NH3II] + + k[717]*y_cur[IDX_CSII] + k[718]*y_cur[IDX_H2COII] + + k[719]*y_cur[IDX_H2SII] + k[720]*y_cur[IDX_HSII] + + k[721]*y_cur[IDX_NOII] + k[722]*y_cur[IDX_O2II] + + k[723]*y_cur[IDX_PII] + k[724]*y_cur[IDX_SII] + k[5917] + k[6259] + + k[6302]; + data[jistart + 13849] = 0.0 - k[5544]*y_cur[IDX_SiII]; + data[jistart + 13850] = 0.0 - k[1751]*y_cur[IDX_SiII]; + data[jistart + 13851] = 0.0 - k[2885]*y_cur[IDX_SiII] - k[5580]*y_cur[IDX_SiII]; + data[jistart + 13852] = 0.0 - k[2266]*y_cur[IDX_SiII]; + data[jistart + 13853] = 0.0 + k[3841]*y_cur[IDX_SiCH2II] + k[3842]*y_cur[IDX_SiOII]; + data[jistart + 13854] = 0.0 - k[3809]*y_cur[IDX_SiII]; + data[jistart + 13855] = 0.0 - k[3602]*y_cur[IDX_SiII]; + data[jistart + 13856] = 0.0 + k[1531]*y_cur[IDX_SiH4I]; + data[jistart + 13857] = 0.0 - k[1574]*y_cur[IDX_SiII] - k[5512]*y_cur[IDX_SiII]; + data[jistart + 13858] = 0.0 - k[2102]*y_cur[IDX_SiII] - k[2103]*y_cur[IDX_SiII]; + data[jistart + 13859] = 0.0 + k[3469]*y_cur[IDX_SiCII] + k[3470]*y_cur[IDX_SiCH2II] + + k[3476]*y_cur[IDX_SiOII]; + data[jistart + 13860] = 0.0 + k[3754]*y_cur[IDX_SiCH2II] + k[3764]*y_cur[IDX_SiOII] - + k[5584]*y_cur[IDX_SiII]; + data[jistart + 13861] = 0.0 + k[528]*y_cur[IDX_SiI] + k[3257]*y_cur[IDX_HCSiI] + + k[3307]*y_cur[IDX_SiC2I] + k[3310]*y_cur[IDX_SiC2HI] + + k[3313]*y_cur[IDX_SiC3HI] + k[3316]*y_cur[IDX_SiCI] + + k[3322]*y_cur[IDX_SiH2I] + k[3326]*y_cur[IDX_SiH4I] + + k[3328]*y_cur[IDX_SiHI] + k[3329]*y_cur[IDX_SiNI] + + k[3331]*y_cur[IDX_SiO2I] + k[3332]*y_cur[IDX_SiOI] + + k[3335]*y_cur[IDX_SiSI]; + data[jistart + 13862] = 0.0 + k[194]*y_cur[IDX_SiI] + k[1434]*y_cur[IDX_SiCI] + + k[1447]*y_cur[IDX_SiOI]; + data[jistart + 13863] = 0.0 - k[2569]*y_cur[IDX_SiII]; + data[jistart + 13864] = 0.0 + k[418]*y_cur[IDX_SiI] + k[2365]*y_cur[IDX_SiHI]; + data[jistart + 13865] = 0.0 + k[1920]*y_cur[IDX_SiCH2II] + k[1932]*y_cur[IDX_SiOII]; + data[jistart + 13866] = 0.0 + k[2292]*y_cur[IDX_SiOII]; + data[jistart + 13867] = 0.0 - k[6374]*y_cur[IDX_SiII]; + data[jistart + 13868] = 0.0 - k[5562]*y_cur[IDX_SiII]; + data[jistart + 13869] = 0.0 - k[5626]*y_cur[IDX_SiII]; + data[jistart + 13870] = 0.0 + k[2848]*y_cur[IDX_SiHII] + k[2849]*y_cur[IDX_SiSII] - + k[5575]*y_cur[IDX_SiII]; + data[jistart + 13871] = 0.0 + k[7123] + k[7305] + k[7487]; + data[jistart + 13872] = 0.0 + k[8608]*y_cur[IDX_GHI]; + data[jistart + 13873] = 0.0 - k[485]*y_cur[IDX_H2SI] - k[2581]*y_cur[IDX_H2SI]; + data[jistart + 13874] = 0.0 - k[3819]*y_cur[IDX_H2SI]; + data[jistart + 13875] = 0.0 + k[2556]*y_cur[IDX_H2OI] - k[2580]*y_cur[IDX_H2SI]; + data[jistart + 13876] = 0.0 - k[2579]*y_cur[IDX_H2SI]; + data[jistart + 13877] = 0.0 - k[486]*y_cur[IDX_H2SI]; + data[jistart + 13878] = 0.0 - k[276]*y_cur[IDX_H2SI] - k[2111]*y_cur[IDX_H2SI]; + data[jistart + 13879] = 0.0 - k[2575]*y_cur[IDX_H2SI]; + data[jistart + 13880] = 0.0 - k[484]*y_cur[IDX_H2SI]; + data[jistart + 13881] = 0.0 - k[3817]*y_cur[IDX_H2SI]; + data[jistart + 13882] = 0.0 - k[701]*y_cur[IDX_H2SI]; + data[jistart + 13883] = 0.0 + k[1045]*y_cur[IDX_eM] + k[2496]*y_cur[IDX_H2COI] + + k[2876]*y_cur[IDX_HCNI] + k[3040]*y_cur[IDX_HNCI] + + k[3579]*y_cur[IDX_NH3I] + k[6450]*y_cur[IDX_GRAINM]; + data[jistart + 13884] = 0.0 - k[281]*y_cur[IDX_H2SI] - k[2143]*y_cur[IDX_H2SI]; + data[jistart + 13885] = 0.0 - k[1721]*y_cur[IDX_H2SI]; + data[jistart + 13886] = 0.0 - k[567]*y_cur[IDX_H2SI] - k[3362]*y_cur[IDX_H2SI] - + k[3363]*y_cur[IDX_H2SI]; + data[jistart + 13887] = 0.0 - k[3054]*y_cur[IDX_H2SI] - k[3055]*y_cur[IDX_H2SI]; + data[jistart + 13888] = 0.0 + k[4774]*y_cur[IDX_H2SII]; + data[jistart + 13889] = 0.0 + k[4633]*y_cur[IDX_H2SII]; + data[jistart + 13890] = 0.0 - k[448]*y_cur[IDX_H2SI] - k[2387]*y_cur[IDX_H2SI] - + k[2388]*y_cur[IDX_H2SI]; + data[jistart + 13891] = 0.0 - k[580]*y_cur[IDX_H2SI] - k[3515]*y_cur[IDX_H2SI] - + k[3516]*y_cur[IDX_H2SI] - k[3517]*y_cur[IDX_H2SI] - + k[3518]*y_cur[IDX_H2SI]; + data[jistart + 13892] = 0.0 + k[4844]*y_cur[IDX_H2SII]; + data[jistart + 13893] = 0.0 + k[4038]*y_cur[IDX_H2SII]; + data[jistart + 13894] = 0.0 + k[4213]*y_cur[IDX_H2SII]; + data[jistart + 13895] = 0.0 - k[309]*y_cur[IDX_H2SI] - k[2281]*y_cur[IDX_H2SI]; + data[jistart + 13896] = 0.0 - k[2227]*y_cur[IDX_H2SI]; + data[jistart + 13897] = 0.0 + k[4809]*y_cur[IDX_H2SII]; + data[jistart + 13898] = 0.0 + k[3968]*y_cur[IDX_H2SII]; + data[jistart + 13899] = 0.0 + k[4108]*y_cur[IDX_H2SII]; + data[jistart + 13900] = 0.0 + k[4388]*y_cur[IDX_H2SII]; + data[jistart + 13901] = 0.0 + k[4528]*y_cur[IDX_H2SII]; + data[jistart + 13902] = 0.0 + k[4458]*y_cur[IDX_H2SII]; + data[jistart + 13903] = 0.0 + k[4598]*y_cur[IDX_H2SII]; + data[jistart + 13904] = 0.0 + k[3933]*y_cur[IDX_H2SII]; + data[jistart + 13905] = 0.0 + k[4283]*y_cur[IDX_H2SII]; + data[jistart + 13906] = 0.0 + k[4318]*y_cur[IDX_H2SII]; + data[jistart + 13907] = 0.0 + k[5140]*y_cur[IDX_H2I] + k[5219]*y_cur[IDX_HSI] + + k[5219]*y_cur[IDX_HSI]; + data[jistart + 13908] = 0.0 + k[3898]*y_cur[IDX_H2SII]; + data[jistart + 13909] = 0.0 + k[4739]*y_cur[IDX_H2SII]; + data[jistart + 13910] = 0.0 + k[4563]*y_cur[IDX_H2SII]; + data[jistart + 13911] = 0.0 + k[4704]*y_cur[IDX_H2SII]; + data[jistart + 13912] = 0.0 - k[2576]*y_cur[IDX_H2SI] - k[2577]*y_cur[IDX_H2SI] - + k[2578]*y_cur[IDX_H2SI]; + data[jistart + 13913] = 0.0 + k[4493]*y_cur[IDX_H2SII]; + data[jistart + 13914] = 0.0 + k[4003]*y_cur[IDX_H2SII]; + data[jistart + 13915] = 0.0 + k[4073]*y_cur[IDX_H2SII]; + data[jistart + 13916] = 0.0 + k[4178]*y_cur[IDX_H2SII]; + data[jistart + 13917] = 0.0 + k[4353]*y_cur[IDX_H2SII]; + data[jistart + 13918] = 0.0 - k[2763]*y_cur[IDX_H2SI]; + data[jistart + 13919] = 0.0 + k[4248]*y_cur[IDX_H2SII]; + data[jistart + 13920] = 0.0 + k[4423]*y_cur[IDX_H2SII]; + data[jistart + 13921] = 0.0 - k[1983]*y_cur[IDX_H2SI] - k[1984]*y_cur[IDX_H2SI] - + k[1985]*y_cur[IDX_H2SI]; + data[jistart + 13922] = 0.0 - k[690]*y_cur[IDX_H2SI] - k[3780]*y_cur[IDX_H2SI]; + data[jistart + 13923] = 0.0 - k[469]*y_cur[IDX_H2SI] - k[2510]*y_cur[IDX_H2SI] - + k[2511]*y_cur[IDX_H2SI]; + data[jistart + 13924] = 0.0 + k[4143]*y_cur[IDX_H2SII]; + data[jistart + 13925] = 0.0 - k[1954]*y_cur[IDX_H2SI] - k[1955]*y_cur[IDX_H2SI]; + data[jistart + 13926] = 0.0 - k[674]*y_cur[IDX_H2SI]; + data[jistart + 13927] = 0.0 + k[483]*y_cur[IDX_H2SII]; + data[jistart + 13928] = 0.0 + k[532]*y_cur[IDX_H2SII]; + data[jistart + 13929] = 0.0 + k[636]*y_cur[IDX_H2SII]; + data[jistart + 13930] = 0.0 + k[4668]*y_cur[IDX_H2SII]; + data[jistart + 13931] = 0.0 - k[233]*y_cur[IDX_H2SI] - k[1674]*y_cur[IDX_H2SI] - + k[1675]*y_cur[IDX_H2SI]; + data[jistart + 13932] = 0.0 - k[2582]*y_cur[IDX_H2SI]; + data[jistart + 13933] = 0.0 + k[483]*y_cur[IDX_FeI] + k[501]*y_cur[IDX_HCOI] + + k[532]*y_cur[IDX_MgI] + k[606]*y_cur[IDX_NH3I] + + k[625]*y_cur[IDX_NOI] + k[636]*y_cur[IDX_NaI] + k[709]*y_cur[IDX_SI] + + k[719]*y_cur[IDX_SiI] - k[2574]*y_cur[IDX_H2SI] + + k[3898]*y_cur[IDX_CM] + k[3933]*y_cur[IDX_C10M] + + k[3968]*y_cur[IDX_C10HM] + k[4003]*y_cur[IDX_C2M] + + k[4038]*y_cur[IDX_C2HM] + k[4073]*y_cur[IDX_C3M] + + k[4108]*y_cur[IDX_C3HM] + k[4143]*y_cur[IDX_C3NM] + + k[4178]*y_cur[IDX_C4M] + k[4213]*y_cur[IDX_C4HM] + + k[4248]*y_cur[IDX_C5M] + k[4283]*y_cur[IDX_C5HM] + + k[4318]*y_cur[IDX_C5NM] + k[4353]*y_cur[IDX_C6M] + + k[4388]*y_cur[IDX_C6HM] + k[4423]*y_cur[IDX_C7M] + + k[4458]*y_cur[IDX_C7HM] + k[4493]*y_cur[IDX_C8M] + + k[4528]*y_cur[IDX_C8HM] + k[4563]*y_cur[IDX_C9M] + + k[4598]*y_cur[IDX_C9HM] + k[4633]*y_cur[IDX_CHM] + + k[4668]*y_cur[IDX_CNM] + k[4704]*y_cur[IDX_HM] + + k[4739]*y_cur[IDX_OM] + k[4774]*y_cur[IDX_O2M] + + k[4809]*y_cur[IDX_OHM] + k[4844]*y_cur[IDX_SM] + + k[5618]*y_cur[IDX_eM]; + data[jistart + 13934] = 0.0 - k[553]*y_cur[IDX_H2SI] - k[3347]*y_cur[IDX_H2SI] - + k[3348]*y_cur[IDX_H2SI] - k[3349]*y_cur[IDX_H2SI]; + data[jistart + 13935] = 0.0 - k[657]*y_cur[IDX_H2SI] - k[3642]*y_cur[IDX_H2SI] - + k[3643]*y_cur[IDX_H2SI]; + data[jistart + 13936] = 0.0 - k[2892]*y_cur[IDX_H2SI] - k[2893]*y_cur[IDX_H2SI]; + data[jistart + 13937] = 0.0 + k[3040]*y_cur[IDX_H3SII]; + data[jistart + 13938] = 0.0 - k[3551]*y_cur[IDX_H2SI]; + data[jistart + 13939] = 0.0 - k[175]*y_cur[IDX_CII] - k[223]*y_cur[IDX_C2H2II] - + k[233]*y_cur[IDX_C2H4II] - k[276]*y_cur[IDX_C2H6II] - + k[281]*y_cur[IDX_CH4II] - k[309]*y_cur[IDX_COII] - + k[380]*y_cur[IDX_HII] - k[448]*y_cur[IDX_H2II] - + k[469]*y_cur[IDX_H2OII] - k[484]*y_cur[IDX_CO2II] - + k[485]*y_cur[IDX_N2OII] - k[486]*y_cur[IDX_OCSII] - + k[519]*y_cur[IDX_HeII] - k[553]*y_cur[IDX_NII] - + k[567]*y_cur[IDX_N2II] - k[580]*y_cur[IDX_NH2II] - + k[657]*y_cur[IDX_OII] - k[674]*y_cur[IDX_O2II] - + k[690]*y_cur[IDX_OHII] - k[701]*y_cur[IDX_PII] - + k[1395]*y_cur[IDX_CII] - k[1518]*y_cur[IDX_C2H2II] - + k[1519]*y_cur[IDX_C2H2II] - k[1619]*y_cur[IDX_C2H3II] - + k[1674]*y_cur[IDX_C2H4II] - k[1675]*y_cur[IDX_C2H4II] - + k[1721]*y_cur[IDX_C2H5II] - k[1954]*y_cur[IDX_CHII] - + k[1955]*y_cur[IDX_CHII] - k[1983]*y_cur[IDX_CH2II] - + k[1984]*y_cur[IDX_CH2II] - k[1985]*y_cur[IDX_CH2II] - + k[2078]*y_cur[IDX_CH3II] - k[2111]*y_cur[IDX_C2H6II] - + k[2143]*y_cur[IDX_CH4II] - k[2227]*y_cur[IDX_CH5II] - + k[2281]*y_cur[IDX_COII] - k[2339]*y_cur[IDX_HII] - + k[2340]*y_cur[IDX_HII] - k[2387]*y_cur[IDX_H2II] - + k[2388]*y_cur[IDX_H2II] - k[2510]*y_cur[IDX_H2OII] - + k[2511]*y_cur[IDX_H2OII] - k[2574]*y_cur[IDX_H2SII] - + k[2575]*y_cur[IDX_C2NII] - k[2576]*y_cur[IDX_C3HII] - + k[2577]*y_cur[IDX_C3HII] - k[2578]*y_cur[IDX_C3HII] - + k[2579]*y_cur[IDX_HS2II] - k[2580]*y_cur[IDX_HSiSII] - + k[2581]*y_cur[IDX_N2OII] - k[2582]*y_cur[IDX_SOII] - + k[2686]*y_cur[IDX_H3II] - k[2763]*y_cur[IDX_H3COII] - + k[2801]*y_cur[IDX_H3OII] - k[2892]*y_cur[IDX_HCNHII] - + k[2893]*y_cur[IDX_HCNHII] - k[2961]*y_cur[IDX_HCOII] - + k[3054]*y_cur[IDX_HSII] - k[3055]*y_cur[IDX_HSII] - + k[3229]*y_cur[IDX_HeII] - k[3230]*y_cur[IDX_HeII] - + k[3347]*y_cur[IDX_NII] - k[3348]*y_cur[IDX_NII] - + k[3349]*y_cur[IDX_NII] - k[3362]*y_cur[IDX_N2II] - + k[3363]*y_cur[IDX_N2II] - k[3515]*y_cur[IDX_NH2II] - + k[3516]*y_cur[IDX_NH2II] - k[3517]*y_cur[IDX_NH2II] - + k[3518]*y_cur[IDX_NH2II] - k[3551]*y_cur[IDX_NH3II] - + k[3642]*y_cur[IDX_OII] - k[3643]*y_cur[IDX_OII] - + k[3780]*y_cur[IDX_OHII] - k[3817]*y_cur[IDX_PHII] - + k[3819]*y_cur[IDX_PH3II] - k[3828]*y_cur[IDX_SII] - + k[3829]*y_cur[IDX_SII] - k[5032]*y_cur[IDX_CH3I] - + k[5169]*y_cur[IDX_HI] - k[5400]*y_cur[IDX_OI] - + k[5468]*y_cur[IDX_OHI] - k[5841] - k[5842] - k[6163] - k[6164] - + k[6165] - k[6941]; + data[jistart + 13940] = 0.0 - k[3828]*y_cur[IDX_H2SI] - k[3829]*y_cur[IDX_H2SI]; + data[jistart + 13941] = 0.0 + k[719]*y_cur[IDX_H2SII]; + data[jistart + 13942] = 0.0 - k[1619]*y_cur[IDX_H2SI]; + data[jistart + 13943] = 0.0 + k[625]*y_cur[IDX_H2SII]; + data[jistart + 13944] = 0.0 + k[501]*y_cur[IDX_H2SII]; + data[jistart + 13945] = 0.0 + k[2496]*y_cur[IDX_H3SII]; + data[jistart + 13946] = 0.0 + k[2876]*y_cur[IDX_H3SII]; + data[jistart + 13947] = 0.0 + k[709]*y_cur[IDX_H2SII]; + data[jistart + 13948] = 0.0 - k[5468]*y_cur[IDX_H2SI]; + data[jistart + 13949] = 0.0 + k[606]*y_cur[IDX_H2SII] + k[3579]*y_cur[IDX_H3SII]; + data[jistart + 13950] = 0.0 - k[223]*y_cur[IDX_H2SI] - k[1518]*y_cur[IDX_H2SI] - + k[1519]*y_cur[IDX_H2SI]; + data[jistart + 13951] = 0.0 - k[2078]*y_cur[IDX_H2SI]; + data[jistart + 13952] = 0.0 + k[8608]*y_cur[IDX_GHSI]; + data[jistart + 13953] = 0.0 - k[5032]*y_cur[IDX_H2SI]; + data[jistart + 13954] = 0.0 - k[2801]*y_cur[IDX_H2SI]; + data[jistart + 13955] = 0.0 - k[5400]*y_cur[IDX_H2SI]; + data[jistart + 13956] = 0.0 - k[519]*y_cur[IDX_H2SI] - k[3229]*y_cur[IDX_H2SI] - + k[3230]*y_cur[IDX_H2SI]; + data[jistart + 13957] = 0.0 - k[175]*y_cur[IDX_H2SI] - k[1395]*y_cur[IDX_H2SI]; + data[jistart + 13958] = 0.0 + k[2556]*y_cur[IDX_HSiSII]; + data[jistart + 13959] = 0.0 - k[380]*y_cur[IDX_H2SI] - k[2339]*y_cur[IDX_H2SI] - + k[2340]*y_cur[IDX_H2SI]; + data[jistart + 13960] = 0.0 - k[2961]*y_cur[IDX_H2SI]; + data[jistart + 13961] = 0.0 - k[2686]*y_cur[IDX_H2SI]; + data[jistart + 13962] = 0.0 + k[6450]*y_cur[IDX_H3SII]; + data[jistart + 13963] = 0.0 + k[5140]*y_cur[IDX_HSI]; + data[jistart + 13964] = 0.0 + k[1045]*y_cur[IDX_H3SII] + k[5618]*y_cur[IDX_H2SII]; + data[jistart + 13965] = 0.0 - k[5169]*y_cur[IDX_H2SI]; + data[jistart + 13966] = 0.0 + k[3271]*y_cur[IDX_HeII]; + data[jistart + 13967] = 0.0 + k[3223]*y_cur[IDX_HeII]; + data[jistart + 13968] = 0.0 + k[3302]*y_cur[IDX_HeII]; + data[jistart + 13969] = 0.0 + k[3288]*y_cur[IDX_HeII]; + data[jistart + 13970] = 0.0 + k[3303]*y_cur[IDX_HeII]; + data[jistart + 13971] = 0.0 - k[705]*y_cur[IDX_SII]; + data[jistart + 13972] = 0.0 - k[725]*y_cur[IDX_SII] - k[3885]*y_cur[IDX_SII]; + data[jistart + 13973] = 0.0 + k[6140]; + data[jistart + 13974] = 0.0 - k[3827]*y_cur[IDX_SII]; + data[jistart + 13975] = 0.0 + k[305]*y_cur[IDX_SI]; + data[jistart + 13976] = 0.0 - k[3820]*y_cur[IDX_SII]; + data[jistart + 13977] = 0.0 + k[572]*y_cur[IDX_SI] + k[3363]*y_cur[IDX_H2SI] + + k[3365]*y_cur[IDX_OCSI]; + data[jistart + 13978] = 0.0 + k[496]*y_cur[IDX_SI]; + data[jistart + 13979] = 0.0 - k[702]*y_cur[IDX_SII] - k[3823]*y_cur[IDX_SII] - + k[3824]*y_cur[IDX_SII] - k[3825]*y_cur[IDX_SII] - + k[3826]*y_cur[IDX_SII]; + data[jistart + 13980] = 0.0 + k[207]*y_cur[IDX_SI]; + data[jistart + 13981] = 0.0 + k[710]*y_cur[IDX_SI] + k[2844]*y_cur[IDX_HI] + + k[3742]*y_cur[IDX_OI] + k[6205]; + data[jistart + 13982] = 0.0 + k[579]*y_cur[IDX_SI]; + data[jistart + 13983] = 0.0 - k[4791]*y_cur[IDX_SII]; + data[jistart + 13984] = 0.0 - k[4650]*y_cur[IDX_SII]; + data[jistart + 13985] = 0.0 + k[2388]*y_cur[IDX_H2SI]; + data[jistart + 13986] = 0.0 + k[3295]*y_cur[IDX_HeII] + k[3360]*y_cur[IDX_NII] + + k[3365]*y_cur[IDX_N2II] + k[3649]*y_cur[IDX_OII] - + k[3833]*y_cur[IDX_SII]; + data[jistart + 13987] = 0.0 + k[584]*y_cur[IDX_SI]; + data[jistart + 13988] = 0.0 - k[4861]*y_cur[IDX_SII]; + data[jistart + 13989] = 0.0 - k[4055]*y_cur[IDX_SII]; + data[jistart + 13990] = 0.0 - k[4230]*y_cur[IDX_SII]; + data[jistart + 13991] = 0.0 + k[313]*y_cur[IDX_SI]; + data[jistart + 13992] = 0.0 - k[4826]*y_cur[IDX_SII]; + data[jistart + 13993] = 0.0 - k[3985]*y_cur[IDX_SII]; + data[jistart + 13994] = 0.0 - k[4125]*y_cur[IDX_SII]; + data[jistart + 13995] = 0.0 - k[4405]*y_cur[IDX_SII]; + data[jistart + 13996] = 0.0 - k[4545]*y_cur[IDX_SII]; + data[jistart + 13997] = 0.0 - k[4475]*y_cur[IDX_SII]; + data[jistart + 13998] = 0.0 - k[4615]*y_cur[IDX_SII]; + data[jistart + 13999] = 0.0 - k[3950]*y_cur[IDX_SII]; + data[jistart + 14000] = 0.0 - k[4300]*y_cur[IDX_SII]; + data[jistart + 14001] = 0.0 - k[4335]*y_cur[IDX_SII]; + data[jistart + 14002] = 0.0 + k[2353]*y_cur[IDX_HII] + k[3273]*y_cur[IDX_HeII]; + data[jistart + 14003] = 0.0 - k[3915]*y_cur[IDX_SII]; + data[jistart + 14004] = 0.0 + k[3214]*y_cur[IDX_HeII]; + data[jistart + 14005] = 0.0 - k[4756]*y_cur[IDX_SII]; + data[jistart + 14006] = 0.0 - k[4580]*y_cur[IDX_SII]; + data[jistart + 14007] = 0.0 - k[4721]*y_cur[IDX_SII]; + data[jistart + 14008] = 0.0 - k[706]*y_cur[IDX_SII] + k[3334]*y_cur[IDX_HeII]; + data[jistart + 14009] = 0.0 - k[4510]*y_cur[IDX_SII]; + data[jistart + 14010] = 0.0 - k[4020]*y_cur[IDX_SII]; + data[jistart + 14011] = 0.0 + k[3093]*y_cur[IDX_HeII]; + data[jistart + 14012] = 0.0 - k[4090]*y_cur[IDX_SII]; + data[jistart + 14013] = 0.0 - k[4195]*y_cur[IDX_SII]; + data[jistart + 14014] = 0.0 - k[4370]*y_cur[IDX_SII]; + data[jistart + 14015] = 0.0 - k[4265]*y_cur[IDX_SII]; + data[jistart + 14016] = 0.0 - k[4440]*y_cur[IDX_SII]; + data[jistart + 14017] = 0.0 + k[213]*y_cur[IDX_SI]; + data[jistart + 14018] = 0.0 + k[695]*y_cur[IDX_SI]; + data[jistart + 14019] = 0.0 + k[476]*y_cur[IDX_SI]; + data[jistart + 14020] = 0.0 - k[4160]*y_cur[IDX_SII]; + data[jistart + 14021] = 0.0 + k[256]*y_cur[IDX_SI]; + data[jistart + 14022] = 0.0 + k[677]*y_cur[IDX_SI]; + data[jistart + 14023] = 0.0 - k[703]*y_cur[IDX_SII]; + data[jistart + 14024] = 0.0 - k[538]*y_cur[IDX_SII]; + data[jistart + 14025] = 0.0 - k[643]*y_cur[IDX_SII]; + data[jistart + 14026] = 0.0 - k[3624]*y_cur[IDX_SII]; + data[jistart + 14027] = 0.0 - k[4685]*y_cur[IDX_SII]; + data[jistart + 14028] = 0.0 + k[1429]*y_cur[IDX_CII] + k[3305]*y_cur[IDX_HeII]; + data[jistart + 14029] = 0.0 + k[709]*y_cur[IDX_SI]; + data[jistart + 14030] = 0.0 + k[3349]*y_cur[IDX_H2SI] + k[3360]*y_cur[IDX_OCSI]; + data[jistart + 14031] = 0.0 - k[3821]*y_cur[IDX_SII]; + data[jistart + 14032] = 0.0 + k[460]*y_cur[IDX_SI]; + data[jistart + 14033] = 0.0 - k[3822]*y_cur[IDX_SII]; + data[jistart + 14034] = 0.0 + k[3643]*y_cur[IDX_H2SI] + k[3649]*y_cur[IDX_OCSI]; + data[jistart + 14035] = 0.0 - k[704]*y_cur[IDX_SII] - k[3830]*y_cur[IDX_SII] - + k[3831]*y_cur[IDX_SII] - k[3832]*y_cur[IDX_SII]; + data[jistart + 14036] = 0.0 - k[2017]*y_cur[IDX_SII]; + data[jistart + 14037] = 0.0 - k[1715]*y_cur[IDX_SII] - k[1716]*y_cur[IDX_SII] - + k[1717]*y_cur[IDX_SII]; + data[jistart + 14038] = 0.0 - k[1645]*y_cur[IDX_SII]; + data[jistart + 14039] = 0.0 - k[3674]*y_cur[IDX_SII]; + data[jistart + 14040] = 0.0 + k[2340]*y_cur[IDX_HII] + k[2388]*y_cur[IDX_H2II] + + k[3230]*y_cur[IDX_HeII] + k[3349]*y_cur[IDX_NII] + + k[3363]*y_cur[IDX_N2II] + k[3643]*y_cur[IDX_OII] - + k[3828]*y_cur[IDX_SII] - k[3829]*y_cur[IDX_SII]; + data[jistart + 14041] = 0.0 - k[503]*y_cur[IDX_HCOI] - k[538]*y_cur[IDX_MgI] - + k[614]*y_cur[IDX_NH3I] - k[629]*y_cur[IDX_NOI] - + k[643]*y_cur[IDX_NaI] - k[702]*y_cur[IDX_CH3CHCH2I] - + k[703]*y_cur[IDX_FeI] - k[704]*y_cur[IDX_C4H2I] - + k[705]*y_cur[IDX_SiCI] - k[706]*y_cur[IDX_SiSI] - + k[724]*y_cur[IDX_SiI] - k[725]*y_cur[IDX_SiHI] - + k[1464]*y_cur[IDX_C2I] - k[1573]*y_cur[IDX_C2H2I] - + k[1645]*y_cur[IDX_C2H3I] - k[1715]*y_cur[IDX_C2H4I] - + k[1716]*y_cur[IDX_C2H4I] - k[1717]*y_cur[IDX_C2H4I] - + k[1750]*y_cur[IDX_C2HI] - k[2017]*y_cur[IDX_CH2I] - + k[2101]*y_cur[IDX_CH3I] - k[2215]*y_cur[IDX_CH4I] - + k[2216]*y_cur[IDX_CH4I] - k[2265]*y_cur[IDX_CHI] - + k[2470]*y_cur[IDX_H2I] - k[2500]*y_cur[IDX_H2COI] - + k[2501]*y_cur[IDX_H2COI] - k[3012]*y_cur[IDX_HCOI] - + k[3624]*y_cur[IDX_NHI] - k[3674]*y_cur[IDX_O2I] - + k[3808]*y_cur[IDX_OHI] - k[3820]*y_cur[IDX_C3H2I] - + k[3821]*y_cur[IDX_C3HI] - k[3822]*y_cur[IDX_C4HI] - + k[3823]*y_cur[IDX_CH3CHCH2I] - k[3824]*y_cur[IDX_CH3CHCH2I] - + k[3825]*y_cur[IDX_CH3CHCH2I] - k[3826]*y_cur[IDX_CH3CHCH2I] - + k[3827]*y_cur[IDX_H2CCCI] - k[3828]*y_cur[IDX_H2SI] - + k[3829]*y_cur[IDX_H2SI] - k[3830]*y_cur[IDX_C4H2I] - + k[3831]*y_cur[IDX_C4H2I] - k[3832]*y_cur[IDX_C4H2I] - + k[3833]*y_cur[IDX_OCSI] - k[3885]*y_cur[IDX_SiHI] - + k[3915]*y_cur[IDX_CM] - k[3950]*y_cur[IDX_C10M] - + k[3985]*y_cur[IDX_C10HM] - k[4020]*y_cur[IDX_C2M] - + k[4055]*y_cur[IDX_C2HM] - k[4090]*y_cur[IDX_C3M] - + k[4125]*y_cur[IDX_C3HM] - k[4160]*y_cur[IDX_C3NM] - + k[4195]*y_cur[IDX_C4M] - k[4230]*y_cur[IDX_C4HM] - + k[4265]*y_cur[IDX_C5M] - k[4300]*y_cur[IDX_C5HM] - + k[4335]*y_cur[IDX_C5NM] - k[4370]*y_cur[IDX_C6M] - + k[4405]*y_cur[IDX_C6HM] - k[4440]*y_cur[IDX_C7M] - + k[4475]*y_cur[IDX_C7HM] - k[4510]*y_cur[IDX_C8M] - + k[4545]*y_cur[IDX_C8HM] - k[4580]*y_cur[IDX_C9M] - + k[4615]*y_cur[IDX_C9HM] - k[4650]*y_cur[IDX_CHM] - + k[4685]*y_cur[IDX_CNM] - k[4721]*y_cur[IDX_HM] - + k[4756]*y_cur[IDX_OM] - k[4791]*y_cur[IDX_O2M] - + k[4826]*y_cur[IDX_OHM] - k[4861]*y_cur[IDX_SM] - + k[5528]*y_cur[IDX_CI] - k[5561]*y_cur[IDX_H2I] - + k[5625]*y_cur[IDX_eM] - k[6424]*y_cur[IDX_GRAINM]; + data[jistart + 14042] = 0.0 - k[724]*y_cur[IDX_SII]; + data[jistart + 14043] = 0.0 - k[629]*y_cur[IDX_SII]; + data[jistart + 14044] = 0.0 - k[503]*y_cur[IDX_SII] - k[3012]*y_cur[IDX_SII]; + data[jistart + 14045] = 0.0 - k[2215]*y_cur[IDX_SII] - k[2216]*y_cur[IDX_SII]; + data[jistart + 14046] = 0.0 - k[1750]*y_cur[IDX_SII]; + data[jistart + 14047] = 0.0 - k[2500]*y_cur[IDX_SII] - k[2501]*y_cur[IDX_SII]; + data[jistart + 14048] = 0.0 - k[2265]*y_cur[IDX_SII]; + data[jistart + 14049] = 0.0 + k[207]*y_cur[IDX_C2II] + k[213]*y_cur[IDX_C2HII] + + k[256]*y_cur[IDX_CHII] + k[305]*y_cur[IDX_CNII] + + k[313]*y_cur[IDX_COII] + k[415]*y_cur[IDX_HII] + + k[460]*y_cur[IDX_H2COII] + k[476]*y_cur[IDX_H2OII] + + k[496]*y_cur[IDX_HCNII] + k[572]*y_cur[IDX_N2II] + + k[579]*y_cur[IDX_NHII] + k[584]*y_cur[IDX_NH2II] + + k[677]*y_cur[IDX_O2II] + k[695]*y_cur[IDX_OHII] + + k[707]*y_cur[IDX_CII] + k[708]*y_cur[IDX_CII] + + k[709]*y_cur[IDX_H2SII] + k[710]*y_cur[IDX_HSII] + k[5913] + k[6255] + + k[6303]; + data[jistart + 14050] = 0.0 - k[1464]*y_cur[IDX_SII]; + data[jistart + 14051] = 0.0 - k[3808]*y_cur[IDX_SII]; + data[jistart + 14052] = 0.0 - k[614]*y_cur[IDX_SII]; + data[jistart + 14053] = 0.0 - k[1573]*y_cur[IDX_SII]; + data[jistart + 14054] = 0.0 - k[2101]*y_cur[IDX_SII]; + data[jistart + 14055] = 0.0 + k[3742]*y_cur[IDX_HSII]; + data[jistart + 14056] = 0.0 + k[3093]*y_cur[IDX_C2SI] + k[3214]*y_cur[IDX_CSI] + + k[3223]*y_cur[IDX_H2CSI] + k[3230]*y_cur[IDX_H2SI] + + k[3271]*y_cur[IDX_HS2I] + k[3273]*y_cur[IDX_HSI] + + k[3288]*y_cur[IDX_NSI] + k[3295]*y_cur[IDX_OCSI] + + k[3302]*y_cur[IDX_S2I] + k[3303]*y_cur[IDX_SO2I] + + k[3305]*y_cur[IDX_SOI] + k[3334]*y_cur[IDX_SiSI]; + data[jistart + 14057] = 0.0 + k[707]*y_cur[IDX_SI] + k[708]*y_cur[IDX_SI] + + k[1429]*y_cur[IDX_SOI]; + data[jistart + 14058] = 0.0 + k[415]*y_cur[IDX_SI] + k[2340]*y_cur[IDX_H2SI] + + k[2353]*y_cur[IDX_HSI]; + data[jistart + 14059] = 0.0 - k[5528]*y_cur[IDX_SII]; + data[jistart + 14060] = 0.0 - k[6424]*y_cur[IDX_SII]; + data[jistart + 14061] = 0.0 - k[2470]*y_cur[IDX_SII] - k[5561]*y_cur[IDX_SII]; + data[jistart + 14062] = 0.0 - k[5625]*y_cur[IDX_SII]; + data[jistart + 14063] = 0.0 + k[2844]*y_cur[IDX_HSII]; + data[jistart + 14064] = 0.0 + k[1249]*y_cur[IDX_eM] + k[6592]*y_cur[IDX_GRAINM]; + data[jistart + 14065] = 0.0 + k[1123]*y_cur[IDX_eM] + k[6512]*y_cur[IDX_GRAINM]; + data[jistart + 14066] = 0.0 + k[1147]*y_cur[IDX_eM] + k[6719]*y_cur[IDX_GRAINM]; + data[jistart + 14067] = 0.0 + k[1260]*y_cur[IDX_eM] + k[6501]*y_cur[IDX_GRAINM]; + data[jistart + 14068] = 0.0 - k[2502]*y_cur[IDX_SiI]; + data[jistart + 14069] = 0.0 + k[6266]; + data[jistart + 14070] = 0.0 + k[3330]*y_cur[IDX_HeII] + k[5932] + k[6283]; + data[jistart + 14071] = 0.0 + k[1261]*y_cur[IDX_eM] + k[6654]*y_cur[IDX_GRAINM]; + data[jistart + 14072] = 0.0 + k[7097] + k[7279] + k[7461]; + data[jistart + 14073] = 0.0 + k[1234]*y_cur[IDX_eM] + k[6761]*y_cur[IDX_GRAINM]; + data[jistart + 14074] = 0.0 + k[1224]*y_cur[IDX_eM] + k[6642]*y_cur[IDX_GRAINM]; + data[jistart + 14075] = 0.0 + k[1223]*y_cur[IDX_eM] + k[6481]*y_cur[IDX_GRAINM]; + data[jistart + 14076] = 0.0 + k[5863]; + data[jistart + 14077] = 0.0 + k[1109]*y_cur[IDX_eM] + k[6490]*y_cur[IDX_GRAINM]; + data[jistart + 14078] = 0.0 + k[6260]; + data[jistart + 14079] = 0.0 + k[5450]*y_cur[IDX_OI] + k[5931] + k[6281]; + data[jistart + 14080] = 0.0 + k[1226]*y_cur[IDX_eM] + k[6649]*y_cur[IDX_GRAINM]; + data[jistart + 14081] = 0.0 + k[1251]*y_cur[IDX_eM] + k[1252]*y_cur[IDX_eM] + + k[6402]*y_cur[IDX_GRAINM] + k[6403]*y_cur[IDX_GRAINM]; + data[jistart + 14082] = 0.0 + k[3317]*y_cur[IDX_HeII] + k[5292]*y_cur[IDX_NI] + + k[5443]*y_cur[IDX_OI] + k[5924] + k[6267]; + data[jistart + 14083] = 0.0 + k[1243]*y_cur[IDX_eM] + k[6497]*y_cur[IDX_GRAINM]; + data[jistart + 14084] = 0.0 + k[1250]*y_cur[IDX_eM] + k[2267]*y_cur[IDX_CHI] + + k[2571]*y_cur[IDX_H2OI] + k[3603]*y_cur[IDX_NH3I] + + k[6388]*y_cur[IDX_GRAINM]; + data[jistart + 14085] = 0.0 + k[5930] + k[6280]; + data[jistart + 14086] = 0.0 - k[717]*y_cur[IDX_SiI]; + data[jistart + 14087] = 0.0 - k[723]*y_cur[IDX_SiI]; + data[jistart + 14088] = 0.0 - k[720]*y_cur[IDX_SiI]; + data[jistart + 14089] = 0.0 + k[4793]*y_cur[IDX_SiII]; + data[jistart + 14090] = 0.0 + k[4652]*y_cur[IDX_SiII]; + data[jistart + 14091] = 0.0 + k[4863]*y_cur[IDX_SiII]; + data[jistart + 14092] = 0.0 + k[1269]*y_cur[IDX_eM] + k[6710]*y_cur[IDX_GRAINM]; + data[jistart + 14093] = 0.0 + k[4057]*y_cur[IDX_SiII]; + data[jistart + 14094] = 0.0 + k[4232]*y_cur[IDX_SiII]; + data[jistart + 14095] = 0.0 - k[2236]*y_cur[IDX_SiI] - k[2237]*y_cur[IDX_SiI]; + data[jistart + 14096] = 0.0 + k[4828]*y_cur[IDX_SiII]; + data[jistart + 14097] = 0.0 + k[3987]*y_cur[IDX_SiII]; + data[jistart + 14098] = 0.0 + k[4127]*y_cur[IDX_SiII]; + data[jistart + 14099] = 0.0 + k[4407]*y_cur[IDX_SiII]; + data[jistart + 14100] = 0.0 + k[4547]*y_cur[IDX_SiII]; + data[jistart + 14101] = 0.0 + k[4477]*y_cur[IDX_SiII]; + data[jistart + 14102] = 0.0 + k[4617]*y_cur[IDX_SiII]; + data[jistart + 14103] = 0.0 + k[3952]*y_cur[IDX_SiII]; + data[jistart + 14104] = 0.0 + k[4302]*y_cur[IDX_SiII]; + data[jistart + 14105] = 0.0 + k[4337]*y_cur[IDX_SiII]; + data[jistart + 14106] = 0.0 + k[3917]*y_cur[IDX_SiII]; + data[jistart + 14107] = 0.0 + k[4758]*y_cur[IDX_SiII]; + data[jistart + 14108] = 0.0 + k[4582]*y_cur[IDX_SiII]; + data[jistart + 14109] = 0.0 + k[4723]*y_cur[IDX_SiII]; + data[jistart + 14110] = 0.0 + k[3334]*y_cur[IDX_HeII] + k[5935] + k[6288]; + data[jistart + 14111] = 0.0 - k[3872]*y_cur[IDX_SiI]; + data[jistart + 14112] = 0.0 - k[3875]*y_cur[IDX_SiI] - k[3876]*y_cur[IDX_SiI]; + data[jistart + 14113] = 0.0 + k[4512]*y_cur[IDX_SiII]; + data[jistart + 14114] = 0.0 + k[4022]*y_cur[IDX_SiII]; + data[jistart + 14115] = 0.0 + k[4092]*y_cur[IDX_SiII]; + data[jistart + 14116] = 0.0 + k[4197]*y_cur[IDX_SiII]; + data[jistart + 14117] = 0.0 + k[4372]*y_cur[IDX_SiII]; + data[jistart + 14118] = 0.0 + k[4267]*y_cur[IDX_SiII]; + data[jistart + 14119] = 0.0 + k[4442]*y_cur[IDX_SiII]; + data[jistart + 14120] = 0.0 + k[1266]*y_cur[IDX_eM] + k[2268]*y_cur[IDX_CHI] + + k[3475]*y_cur[IDX_NI] + k[6531]*y_cur[IDX_GRAINM]; + data[jistart + 14121] = 0.0 + k[1267]*y_cur[IDX_eM] + k[6556]*y_cur[IDX_GRAINM]; + data[jistart + 14122] = 0.0 - k[3873]*y_cur[IDX_SiI] - k[3874]*y_cur[IDX_SiI]; + data[jistart + 14123] = 0.0 - k[3791]*y_cur[IDX_SiI]; + data[jistart + 14124] = 0.0 - k[477]*y_cur[IDX_SiI]; + data[jistart + 14125] = 0.0 + k[4162]*y_cur[IDX_SiII]; + data[jistart + 14126] = 0.0 - k[257]*y_cur[IDX_SiI]; + data[jistart + 14127] = 0.0 - k[5491]*y_cur[IDX_SiI]; + data[jistart + 14128] = 0.0 - k[722]*y_cur[IDX_SiI]; + data[jistart + 14129] = 0.0 + k[3333]*y_cur[IDX_HeII] + k[5934] + k[6286]; + data[jistart + 14130] = 0.0 + k[716]*y_cur[IDX_SiII]; + data[jistart + 14131] = 0.0 + k[540]*y_cur[IDX_SiII]; + data[jistart + 14132] = 0.0 + k[645]*y_cur[IDX_SiII]; + data[jistart + 14133] = 0.0 + k[4687]*y_cur[IDX_SiII]; + data[jistart + 14134] = 0.0 - k[1680]*y_cur[IDX_SiI] - k[1681]*y_cur[IDX_SiI]; + data[jistart + 14135] = 0.0 - k[3879]*y_cur[IDX_SiI] - k[3880]*y_cur[IDX_SiI]; + data[jistart + 14136] = 0.0 - k[719]*y_cur[IDX_SiI]; + data[jistart + 14137] = 0.0 - k[718]*y_cur[IDX_SiI]; + data[jistart + 14138] = 0.0 - k[721]*y_cur[IDX_SiI]; + data[jistart + 14139] = 0.0 - k[3877]*y_cur[IDX_SiI] - k[3878]*y_cur[IDX_SiI]; + data[jistart + 14140] = 0.0 - k[2896]*y_cur[IDX_SiI]; + data[jistart + 14141] = 0.0 - k[5021]*y_cur[IDX_SiI]; + data[jistart + 14142] = 0.0 - k[597]*y_cur[IDX_SiI]; + data[jistart + 14143] = 0.0 - k[4885]*y_cur[IDX_SiI]; + data[jistart + 14144] = 0.0 - k[5494]*y_cur[IDX_SiI]; + data[jistart + 14145] = 0.0 + k[540]*y_cur[IDX_MgI] + k[645]*y_cur[IDX_NaI] + + k[716]*y_cur[IDX_FeI] + k[3917]*y_cur[IDX_CM] + + k[3952]*y_cur[IDX_C10M] + k[3987]*y_cur[IDX_C10HM] + + k[4022]*y_cur[IDX_C2M] + k[4057]*y_cur[IDX_C2HM] + + k[4092]*y_cur[IDX_C3M] + k[4127]*y_cur[IDX_C3HM] + + k[4162]*y_cur[IDX_C3NM] + k[4197]*y_cur[IDX_C4M] + + k[4232]*y_cur[IDX_C4HM] + k[4267]*y_cur[IDX_C5M] + + k[4302]*y_cur[IDX_C5HM] + k[4337]*y_cur[IDX_C5NM] + + k[4372]*y_cur[IDX_C6M] + k[4407]*y_cur[IDX_C6HM] + + k[4442]*y_cur[IDX_C7M] + k[4477]*y_cur[IDX_C7HM] + + k[4512]*y_cur[IDX_C8M] + k[4547]*y_cur[IDX_C8HM] + + k[4582]*y_cur[IDX_C9M] + k[4617]*y_cur[IDX_C9HM] + + k[4652]*y_cur[IDX_CHM] + k[4687]*y_cur[IDX_CNM] + + k[4723]*y_cur[IDX_HM] + k[4758]*y_cur[IDX_OM] + + k[4793]*y_cur[IDX_O2M] + k[4828]*y_cur[IDX_OHM] + + k[4863]*y_cur[IDX_SM] + k[5626]*y_cur[IDX_eM] + + k[6374]*y_cur[IDX_GRAINM]; + data[jistart + 14146] = 0.0 - k[724]*y_cur[IDX_SiI]; + data[jistart + 14147] = 0.0 - k[194]*y_cur[IDX_CII] - k[257]*y_cur[IDX_CHII] - + k[418]*y_cur[IDX_HII] - k[477]*y_cur[IDX_H2OII] - + k[528]*y_cur[IDX_HeII] - k[597]*y_cur[IDX_NH3II] - + k[717]*y_cur[IDX_CSII] - k[718]*y_cur[IDX_H2COII] - + k[719]*y_cur[IDX_H2SII] - k[720]*y_cur[IDX_HSII] - + k[721]*y_cur[IDX_NOII] - k[722]*y_cur[IDX_O2II] - + k[723]*y_cur[IDX_PII] - k[724]*y_cur[IDX_SII] - + k[1529]*y_cur[IDX_C2H2II] - k[1530]*y_cur[IDX_C2H2II] - + k[1626]*y_cur[IDX_C2H3II] - k[1627]*y_cur[IDX_C2H3II] - + k[1680]*y_cur[IDX_C2H4II] - k[1681]*y_cur[IDX_C2H4II] - + k[2097]*y_cur[IDX_CH3II] - k[2098]*y_cur[IDX_CH3II] - + k[2236]*y_cur[IDX_CH5II] - k[2237]*y_cur[IDX_CH5II] - + k[2502]*y_cur[IDX_H2NCII] - k[2743]*y_cur[IDX_H3II] - + k[2818]*y_cur[IDX_H3OII] - k[2896]*y_cur[IDX_HCNHII] - + k[3791]*y_cur[IDX_OHII] - k[3872]*y_cur[IDX_C3HII] - + k[3873]*y_cur[IDX_C3H2II] - k[3874]*y_cur[IDX_C3H2II] - + k[3875]*y_cur[IDX_C3H3II] - k[3876]*y_cur[IDX_C3H3II] - + k[3877]*y_cur[IDX_C4H2II] - k[3878]*y_cur[IDX_C4H2II] - + k[3879]*y_cur[IDX_CH2CCHII] - k[3880]*y_cur[IDX_CH2CCHII] - + k[3881]*y_cur[IDX_HCOII] - k[4879]*y_cur[IDX_C2H2I] - + k[4880]*y_cur[IDX_C2H2I] - k[4885]*y_cur[IDX_C2H4I] - + k[5021]*y_cur[IDX_CH2I] - k[5049]*y_cur[IDX_CH3I] - + k[5482]*y_cur[IDX_OHI] - k[5491]*y_cur[IDX_CO2I] - + k[5492]*y_cur[IDX_COI] - k[5493]*y_cur[IDX_NOI] - + k[5494]*y_cur[IDX_O2I] - k[5585]*y_cur[IDX_OI] - k[5917] - k[6259] - + k[6302] - k[6915]; + data[jistart + 14148] = 0.0 - k[1626]*y_cur[IDX_SiI] - k[1627]*y_cur[IDX_SiI]; + data[jistart + 14149] = 0.0 - k[5493]*y_cur[IDX_SiI]; + data[jistart + 14150] = 0.0 + k[2267]*y_cur[IDX_SiHII] + k[2268]*y_cur[IDX_SiOII]; + data[jistart + 14151] = 0.0 - k[5482]*y_cur[IDX_SiI]; + data[jistart + 14152] = 0.0 + k[3603]*y_cur[IDX_SiHII]; + data[jistart + 14153] = 0.0 - k[1529]*y_cur[IDX_SiI] - k[1530]*y_cur[IDX_SiI]; + data[jistart + 14154] = 0.0 - k[2097]*y_cur[IDX_SiI] - k[2098]*y_cur[IDX_SiI]; + data[jistart + 14155] = 0.0 - k[4879]*y_cur[IDX_SiI] - k[4880]*y_cur[IDX_SiI]; + data[jistart + 14156] = 0.0 - k[5049]*y_cur[IDX_SiI]; + data[jistart + 14157] = 0.0 + k[3475]*y_cur[IDX_SiOII] + k[5292]*y_cur[IDX_SiCI]; + data[jistart + 14158] = 0.0 - k[2818]*y_cur[IDX_SiI]; + data[jistart + 14159] = 0.0 + k[5443]*y_cur[IDX_SiCI] + k[5450]*y_cur[IDX_SiNI] - + k[5585]*y_cur[IDX_SiI]; + data[jistart + 14160] = 0.0 - k[528]*y_cur[IDX_SiI] + k[3317]*y_cur[IDX_SiCI] + + k[3330]*y_cur[IDX_SiNCI] + k[3333]*y_cur[IDX_SiOI] + + k[3334]*y_cur[IDX_SiSI]; + data[jistart + 14161] = 0.0 - k[194]*y_cur[IDX_SiI]; + data[jistart + 14162] = 0.0 + k[2571]*y_cur[IDX_SiHII]; + data[jistart + 14163] = 0.0 - k[418]*y_cur[IDX_SiI]; + data[jistart + 14164] = 0.0 - k[3881]*y_cur[IDX_SiI]; + data[jistart + 14165] = 0.0 - k[2743]*y_cur[IDX_SiI]; + data[jistart + 14166] = 0.0 - k[5492]*y_cur[IDX_SiI]; + data[jistart + 14167] = 0.0 + k[6374]*y_cur[IDX_SiII] + k[6388]*y_cur[IDX_SiHII] + + k[6402]*y_cur[IDX_SiH2II] + k[6403]*y_cur[IDX_SiH2II] + + k[6481]*y_cur[IDX_SiCII] + k[6490]*y_cur[IDX_HCSiII] + + k[6497]*y_cur[IDX_SiCH2II] + k[6501]*y_cur[IDX_SiNII] + + k[6512]*y_cur[IDX_HNSiII] + k[6531]*y_cur[IDX_SiOII] + + k[6556]*y_cur[IDX_SiOHII] + k[6592]*y_cur[IDX_SiFII] + + k[6642]*y_cur[IDX_SiC2II] + k[6649]*y_cur[IDX_SiC2HII] + + k[6654]*y_cur[IDX_SiNCII] + k[6710]*y_cur[IDX_SiSII] + + k[6719]*y_cur[IDX_HSiSII] + k[6761]*y_cur[IDX_SiC3HII]; + data[jistart + 14168] = 0.0 + k[1109]*y_cur[IDX_HCSiII] + k[1123]*y_cur[IDX_HNSiII] + + k[1147]*y_cur[IDX_HSiSII] + k[1223]*y_cur[IDX_SiCII] + + k[1224]*y_cur[IDX_SiC2II] + k[1226]*y_cur[IDX_SiC2HII] + + k[1234]*y_cur[IDX_SiC3HII] + k[1243]*y_cur[IDX_SiCH2II] + + k[1249]*y_cur[IDX_SiFII] + k[1250]*y_cur[IDX_SiHII] + + k[1251]*y_cur[IDX_SiH2II] + k[1252]*y_cur[IDX_SiH2II] + + k[1260]*y_cur[IDX_SiNII] + k[1261]*y_cur[IDX_SiNCII] + + k[1266]*y_cur[IDX_SiOII] + k[1267]*y_cur[IDX_SiOHII] + + k[1269]*y_cur[IDX_SiSII] + k[5626]*y_cur[IDX_SiII]; + data[jistart + 14169] = 0.0 + k[2172]*y_cur[IDX_CH4I]; + data[jistart + 14170] = 0.0 + k[1354]*y_cur[IDX_CII]; + data[jistart + 14171] = 0.0 + k[3165]*y_cur[IDX_HeII]; + data[jistart + 14172] = 0.0 - k[1598]*y_cur[IDX_C2H3II]; + data[jistart + 14173] = 0.0 + k[2592]*y_cur[IDX_H3II]; + data[jistart + 14174] = 0.0 + k[2659]*y_cur[IDX_H3II]; + data[jistart + 14175] = 0.0 - k[1602]*y_cur[IDX_C2H3II] - k[1603]*y_cur[IDX_C2H3II] - + k[1604]*y_cur[IDX_C2H3II]; + data[jistart + 14176] = 0.0 + k[1567]*y_cur[IDX_C2H2I]; + data[jistart + 14177] = 0.0 + k[2651]*y_cur[IDX_H3II]; + data[jistart + 14178] = 0.0 + k[1379]*y_cur[IDX_CII] + k[3635]*y_cur[IDX_OII]; + data[jistart + 14179] = 0.0 - k[1624]*y_cur[IDX_C2H3II]; + data[jistart + 14180] = 0.0 + k[2133]*y_cur[IDX_C2H2I]; + data[jistart + 14181] = 0.0 - k[1616]*y_cur[IDX_C2H3II] - k[1617]*y_cur[IDX_C2H3II] - + k[1618]*y_cur[IDX_C2H3II]; + data[jistart + 14182] = 0.0 - k[1595]*y_cur[IDX_C2H3II] - k[1596]*y_cur[IDX_C2H3II] - + k[1597]*y_cur[IDX_C2H3II]; + data[jistart + 14183] = 0.0 - k[1589]*y_cur[IDX_C2H3II] - k[1590]*y_cur[IDX_C2H3II] - + k[1591]*y_cur[IDX_C2H3II]; + data[jistart + 14184] = 0.0 + k[1368]*y_cur[IDX_CII] - k[1613]*y_cur[IDX_C2H3II] - + k[1614]*y_cur[IDX_C2H3II] - k[1615]*y_cur[IDX_C2H3II] + + k[2326]*y_cur[IDX_HII] + k[3189]*y_cur[IDX_HeII]; + data[jistart + 14185] = 0.0 - k[1580]*y_cur[IDX_C2H3II] - k[1581]*y_cur[IDX_C2H3II] - + k[1582]*y_cur[IDX_C2H3II]; + data[jistart + 14186] = 0.0 + k[327]*y_cur[IDX_HII] + k[3083]*y_cur[IDX_HeII]; + data[jistart + 14187] = 0.0 + k[2199]*y_cur[IDX_CH4I]; + data[jistart + 14188] = 0.0 + k[1374]*y_cur[IDX_CII] + k[2649]*y_cur[IDX_H3II]; + data[jistart + 14189] = 0.0 - k[4764]*y_cur[IDX_C2H3II]; + data[jistart + 14190] = 0.0 - k[4623]*y_cur[IDX_C2H3II]; + data[jistart + 14191] = 0.0 + k[2370]*y_cur[IDX_C2H2I] + k[2372]*y_cur[IDX_C2H4I]; + data[jistart + 14192] = 0.0 - k[4834]*y_cur[IDX_C2H3II]; + data[jistart + 14193] = 0.0 - k[4028]*y_cur[IDX_C2H3II]; + data[jistart + 14194] = 0.0 - k[4203]*y_cur[IDX_C2H3II]; + data[jistart + 14195] = 0.0 + k[1364]*y_cur[IDX_CII] - k[1611]*y_cur[IDX_C2H3II] - + k[1612]*y_cur[IDX_C2H3II]; + data[jistart + 14196] = 0.0 + k[2218]*y_cur[IDX_C2H2I]; + data[jistart + 14197] = 0.0 - k[4799]*y_cur[IDX_C2H3II]; + data[jistart + 14198] = 0.0 - k[3958]*y_cur[IDX_C2H3II]; + data[jistart + 14199] = 0.0 - k[4098]*y_cur[IDX_C2H3II]; + data[jistart + 14200] = 0.0 - k[4378]*y_cur[IDX_C2H3II]; + data[jistart + 14201] = 0.0 - k[4518]*y_cur[IDX_C2H3II]; + data[jistart + 14202] = 0.0 - k[4448]*y_cur[IDX_C2H3II]; + data[jistart + 14203] = 0.0 - k[4588]*y_cur[IDX_C2H3II]; + data[jistart + 14204] = 0.0 - k[3923]*y_cur[IDX_C2H3II]; + data[jistart + 14205] = 0.0 - k[4273]*y_cur[IDX_C2H3II]; + data[jistart + 14206] = 0.0 - k[4308]*y_cur[IDX_C2H3II]; + data[jistart + 14207] = 0.0 - k[3888]*y_cur[IDX_C2H3II]; + data[jistart + 14208] = 0.0 - k[4729]*y_cur[IDX_C2H3II]; + data[jistart + 14209] = 0.0 - k[4553]*y_cur[IDX_C2H3II]; + data[jistart + 14210] = 0.0 - k[4693]*y_cur[IDX_C2H3II]; + data[jistart + 14211] = 0.0 - k[1620]*y_cur[IDX_C2H3II]; + data[jistart + 14212] = 0.0 + k[2160]*y_cur[IDX_CH4I] + k[2528]*y_cur[IDX_H2OI] + + k[2576]*y_cur[IDX_H2SI]; + data[jistart + 14213] = 0.0 - k[4483]*y_cur[IDX_C2H3II]; + data[jistart + 14214] = 0.0 - k[3993]*y_cur[IDX_C2H3II]; + data[jistart + 14215] = 0.0 - k[4063]*y_cur[IDX_C2H3II]; + data[jistart + 14216] = 0.0 - k[4168]*y_cur[IDX_C2H3II]; + data[jistart + 14217] = 0.0 - k[4343]*y_cur[IDX_C2H3II]; + data[jistart + 14218] = 0.0 - k[4238]*y_cur[IDX_C2H3II]; + data[jistart + 14219] = 0.0 - k[4413]*y_cur[IDX_C2H3II]; + data[jistart + 14220] = 0.0 - k[4133]*y_cur[IDX_C2H3II]; + data[jistart + 14221] = 0.0 + k[1941]*y_cur[IDX_CH4I]; + data[jistart + 14222] = 0.0 - k[4658]*y_cur[IDX_C2H3II]; + data[jistart + 14223] = 0.0 - k[1605]*y_cur[IDX_C2H3II] - k[1606]*y_cur[IDX_C2H3II] - + k[1607]*y_cur[IDX_C2H3II]; + data[jistart + 14224] = 0.0 + k[231]*y_cur[IDX_C2H3I] + k[2828]*y_cur[IDX_HI]; + data[jistart + 14225] = 0.0 + k[1568]*y_cur[IDX_C2H2I]; + data[jistart + 14226] = 0.0 - k[1608]*y_cur[IDX_C2H3II] - k[1609]*y_cur[IDX_C2H3II] - + k[1610]*y_cur[IDX_C2H3II]; + data[jistart + 14227] = 0.0 - k[1599]*y_cur[IDX_C2H3II] - k[1600]*y_cur[IDX_C2H3II] - + k[1601]*y_cur[IDX_C2H3II]; + data[jistart + 14228] = 0.0 - k[1592]*y_cur[IDX_C2H3II] - k[1593]*y_cur[IDX_C2H3II] - + k[1594]*y_cur[IDX_C2H3II]; + data[jistart + 14229] = 0.0 - k[1583]*y_cur[IDX_C2H3II] - k[1584]*y_cur[IDX_C2H3II] - + k[1585]*y_cur[IDX_C2H3II]; + data[jistart + 14230] = 0.0 - k[1586]*y_cur[IDX_C2H3II] - k[1587]*y_cur[IDX_C2H3II] - + k[1588]*y_cur[IDX_C2H3II]; + data[jistart + 14231] = 0.0 + k[3633]*y_cur[IDX_C2H4I] + k[3635]*y_cur[IDX_CH3CNI]; + data[jistart + 14232] = 0.0 - k[1621]*y_cur[IDX_C2H3II] - k[1622]*y_cur[IDX_C2H3II] - + k[1623]*y_cur[IDX_C2H3II]; + data[jistart + 14233] = 0.0 + k[1999]*y_cur[IDX_CH3II]; + data[jistart + 14234] = 0.0 - k[3036]*y_cur[IDX_C2H3II]; + data[jistart + 14235] = 0.0 + k[1302]*y_cur[IDX_CII] - k[1579]*y_cur[IDX_C2H3II] + + k[1715]*y_cur[IDX_SII] + k[2045]*y_cur[IDX_CH3II] + + k[2297]*y_cur[IDX_HII] + k[2372]*y_cur[IDX_H2II] + + k[2589]*y_cur[IDX_H3II] + k[3081]*y_cur[IDX_HeII] + + k[3633]*y_cur[IDX_OII]; + data[jistart + 14236] = 0.0 + k[214]*y_cur[IDX_C2H2II] + k[231]*y_cur[IDX_C2H4II] + + k[269]*y_cur[IDX_CH3II] + k[325]*y_cur[IDX_HII] - + k[1577]*y_cur[IDX_C2H3II] - k[1578]*y_cur[IDX_C2H3II] + k[5699] + + k[5984]; + data[jistart + 14237] = 0.0 + k[1519]*y_cur[IDX_C2H2II] - k[1619]*y_cur[IDX_C2H3II] + + k[2576]*y_cur[IDX_C3HII]; + data[jistart + 14238] = 0.0 + k[1715]*y_cur[IDX_C2H4I]; + data[jistart + 14239] = 0.0 - k[1626]*y_cur[IDX_C2H3II] - k[1627]*y_cur[IDX_C2H3II]; + data[jistart + 14240] = 0.0 - k[745]*y_cur[IDX_eM] - k[746]*y_cur[IDX_eM] - + k[747]*y_cur[IDX_eM] - k[748]*y_cur[IDX_eM] - k[749]*y_cur[IDX_eM] - + k[750]*y_cur[IDX_eM] - k[751]*y_cur[IDX_eM] - k[752]*y_cur[IDX_eM] - + k[753]*y_cur[IDX_eM] - k[754]*y_cur[IDX_eM] - k[755]*y_cur[IDX_eM] - + k[756]*y_cur[IDX_eM] - k[1535]*y_cur[IDX_C2H2I] - + k[1577]*y_cur[IDX_C2H3I] - k[1578]*y_cur[IDX_C2H3I] - + k[1579]*y_cur[IDX_C2H4I] - k[1580]*y_cur[IDX_C3H2I] - + k[1581]*y_cur[IDX_C3H2I] - k[1582]*y_cur[IDX_C3H2I] - + k[1583]*y_cur[IDX_C3HI] - k[1584]*y_cur[IDX_C3HI] - + k[1585]*y_cur[IDX_C3HI] - k[1586]*y_cur[IDX_C4HI] - + k[1587]*y_cur[IDX_C4HI] - k[1588]*y_cur[IDX_C4HI] - + k[1589]*y_cur[IDX_C5H2I] - k[1590]*y_cur[IDX_C5H2I] - + k[1591]*y_cur[IDX_C5H2I] - k[1592]*y_cur[IDX_C5HI] - + k[1593]*y_cur[IDX_C5HI] - k[1594]*y_cur[IDX_C5HI] - + k[1595]*y_cur[IDX_C6H2I] - k[1596]*y_cur[IDX_C6H2I] - + k[1597]*y_cur[IDX_C6H2I] - k[1598]*y_cur[IDX_C6H6I] - + k[1599]*y_cur[IDX_C6HI] - k[1600]*y_cur[IDX_C6HI] - + k[1601]*y_cur[IDX_C6HI] - k[1602]*y_cur[IDX_C7H2I] - + k[1603]*y_cur[IDX_C7H2I] - k[1604]*y_cur[IDX_C7H2I] - + k[1605]*y_cur[IDX_C7HI] - k[1606]*y_cur[IDX_C7HI] - + k[1607]*y_cur[IDX_C7HI] - k[1608]*y_cur[IDX_CH2CCHI] - + k[1609]*y_cur[IDX_CH2CCHI] - k[1610]*y_cur[IDX_CH2CCHI] - + k[1611]*y_cur[IDX_CH3CCHI] - k[1612]*y_cur[IDX_CH3CCHI] - + k[1613]*y_cur[IDX_C2H6I] - k[1614]*y_cur[IDX_C2H6I] - + k[1615]*y_cur[IDX_C2H6I] - k[1616]*y_cur[IDX_H2CCCI] - + k[1617]*y_cur[IDX_H2CCCI] - k[1618]*y_cur[IDX_H2CCCI] - + k[1619]*y_cur[IDX_H2SI] - k[1620]*y_cur[IDX_HC3NI] - + k[1621]*y_cur[IDX_C4H2I] - k[1622]*y_cur[IDX_C4H2I] - + k[1623]*y_cur[IDX_C4H2I] - k[1624]*y_cur[IDX_NCCNI] - + k[1625]*y_cur[IDX_SI] - k[1626]*y_cur[IDX_SiI] - + k[1627]*y_cur[IDX_SiI] - k[1726]*y_cur[IDX_C2HI] - + k[1727]*y_cur[IDX_C2HI] - k[1728]*y_cur[IDX_C2HI] - + k[1851]*y_cur[IDX_CI] - k[1852]*y_cur[IDX_CI] - + k[2156]*y_cur[IDX_CH4I] - k[2523]*y_cur[IDX_H2OI] - + k[2827]*y_cur[IDX_HI] - k[2861]*y_cur[IDX_HCNI] - + k[3036]*y_cur[IDX_HNCI] - k[3390]*y_cur[IDX_NI] - + k[3557]*y_cur[IDX_NH3I] - k[3690]*y_cur[IDX_OI] - + k[3888]*y_cur[IDX_CM] - k[3923]*y_cur[IDX_C10M] - + k[3958]*y_cur[IDX_C10HM] - k[3993]*y_cur[IDX_C2M] - + k[4028]*y_cur[IDX_C2HM] - k[4063]*y_cur[IDX_C3M] - + k[4098]*y_cur[IDX_C3HM] - k[4133]*y_cur[IDX_C3NM] - + k[4168]*y_cur[IDX_C4M] - k[4203]*y_cur[IDX_C4HM] - + k[4238]*y_cur[IDX_C5M] - k[4273]*y_cur[IDX_C5HM] - + k[4308]*y_cur[IDX_C5NM] - k[4343]*y_cur[IDX_C6M] - + k[4378]*y_cur[IDX_C6HM] - k[4413]*y_cur[IDX_C7M] - + k[4448]*y_cur[IDX_C7HM] - k[4483]*y_cur[IDX_C8M] - + k[4518]*y_cur[IDX_C8HM] - k[4553]*y_cur[IDX_C9M] - + k[4588]*y_cur[IDX_C9HM] - k[4623]*y_cur[IDX_CHM] - + k[4658]*y_cur[IDX_CNM] - k[4693]*y_cur[IDX_HM] - + k[4729]*y_cur[IDX_OM] - k[4764]*y_cur[IDX_O2M] - + k[4799]*y_cur[IDX_OHM] - k[4834]*y_cur[IDX_SM] - + k[5513]*y_cur[IDX_COI] - k[6360]*y_cur[IDX_GRAINM] - k[6361]*y_cur[IDX_GRAINM] - k[6362]*y_cur[IDX_GRAINM] - k[6363]*y_cur[IDX_GRAINM] - k[6364]*y_cur[IDX_GRAINM] - k[6365]*y_cur[IDX_GRAINM] - k[6366]*y_cur[IDX_GRAINM] - k[6367]*y_cur[IDX_GRAINM] - k[6368]*y_cur[IDX_GRAINM] - k[6369]*y_cur[IDX_GRAINM] - k[6370]*y_cur[IDX_GRAINM] - k[6371]*y_cur[IDX_GRAINM]; - data[jistart + 10558] = 0.0 - k[6381]*y_cur[IDX_GRAINM] - - k[6382]*y_cur[IDX_GRAINM] - k[6383]*y_cur[IDX_GRAINM] - - k[6384]*y_cur[IDX_GRAINM] - k[6385]*y_cur[IDX_GRAINM] - - k[6386]*y_cur[IDX_GRAINM] - k[6387]*y_cur[IDX_GRAINM]; - data[jistart + 10559] = 0.0 - k[6391]*y_cur[IDX_GRAINM] - - k[6392]*y_cur[IDX_GRAINM] - k[6393]*y_cur[IDX_GRAINM] - - k[6394]*y_cur[IDX_GRAINM] - k[6395]*y_cur[IDX_GRAINM]; - data[jistart + 10560] = 0.0 - k[6671]*y_cur[IDX_GRAINM] - - k[6672]*y_cur[IDX_GRAINM] - k[6673]*y_cur[IDX_GRAINM]; - data[jistart + 10561] = 0.0 - k[6576]*y_cur[IDX_GRAINM] - - k[6577]*y_cur[IDX_GRAINM]; - data[jistart + 10562] = 0.0 - k[6606]*y_cur[IDX_GRAINM] - - k[6607]*y_cur[IDX_GRAINM] - k[6608]*y_cur[IDX_GRAINM] - - k[6609]*y_cur[IDX_GRAINM]; - data[jistart + 10563] = 0.0 - k[6410]*y_cur[IDX_GRAINM] - - k[6411]*y_cur[IDX_GRAINM]; - data[jistart + 10564] = 0.0 - k[6419]*y_cur[IDX_GRAINM] - - k[6420]*y_cur[IDX_GRAINM]; - data[jistart + 10565] = 0.0 - k[6466]*y_cur[IDX_GRAINM] - - k[6467]*y_cur[IDX_GRAINM]; - data[jistart + 10566] = 0.0 - k[6635]*y_cur[IDX_GRAINM] - - k[6636]*y_cur[IDX_GRAINM]; - data[jistart + 10567] = 0.0 - k[6472]*y_cur[IDX_GRAINM]; - data[jistart + 10568] = 0.0 - k[6474]*y_cur[IDX_GRAINM]; - data[jistart + 10569] = 0.0 - k[6674]*y_cur[IDX_GRAINM] - - k[6675]*y_cur[IDX_GRAINM]; - data[jistart + 10570] = 0.0 - k[6455]*y_cur[IDX_GRAINM]; - data[jistart + 10571] = 0.0 - k[6459]*y_cur[IDX_GRAINM] - - k[6460]*y_cur[IDX_GRAINM]; - data[jistart + 10572] = 0.0 - k[6461]*y_cur[IDX_GRAINM] - - k[6462]*y_cur[IDX_GRAINM] - k[6463]*y_cur[IDX_GRAINM] - - k[6464]*y_cur[IDX_GRAINM] - k[6465]*y_cur[IDX_GRAINM]; - data[jistart + 10573] = 0.0 - k[6655]*y_cur[IDX_GRAINM] - - k[6656]*y_cur[IDX_GRAINM]; - data[jistart + 10574] = 0.0 - k[6473]*y_cur[IDX_GRAINM]; - data[jistart + 10575] = 0.0 - k[6477]*y_cur[IDX_GRAINM] - - k[6478]*y_cur[IDX_GRAINM] - k[6479]*y_cur[IDX_GRAINM] - - k[6480]*y_cur[IDX_GRAINM]; - data[jistart + 10576] = 0.0 - k[6482]*y_cur[IDX_GRAINM] - - k[6483]*y_cur[IDX_GRAINM]; - data[jistart + 10577] = 0.0 - k[6499]*y_cur[IDX_GRAINM] - - k[6500]*y_cur[IDX_GRAINM]; - data[jistart + 10578] = 0.0 - k[6504]*y_cur[IDX_GRAINM] - - k[6505]*y_cur[IDX_GRAINM] - k[6506]*y_cur[IDX_GRAINM] - - k[6507]*y_cur[IDX_GRAINM] - k[6508]*y_cur[IDX_GRAINM] - - k[6509]*y_cur[IDX_GRAINM] - k[6510]*y_cur[IDX_GRAINM]; - data[jistart + 10579] = 0.0 - k[6626]*y_cur[IDX_GRAINM]; - data[jistart + 10580] = 0.0 - k[6644]*y_cur[IDX_GRAINM]; - data[jistart + 10581] = 0.0 - k[6775]*y_cur[IDX_GRAINM] - - k[6776]*y_cur[IDX_GRAINM] - k[6777]*y_cur[IDX_GRAINM]; - data[jistart + 10582] = 0.0 - k[6615]*y_cur[IDX_GRAINM] - - k[6616]*y_cur[IDX_GRAINM]; - data[jistart + 10583] = 0.0 - k[6621]*y_cur[IDX_GRAINM]; - data[jistart + 10584] = 0.0 - k[6627]*y_cur[IDX_GRAINM] - - k[6628]*y_cur[IDX_GRAINM]; - data[jistart + 10585] = 0.0 - k[6633]*y_cur[IDX_GRAINM] - - k[6634]*y_cur[IDX_GRAINM]; - data[jistart + 10586] = 0.0 - k[6641]*y_cur[IDX_GRAINM]; - data[jistart + 10587] = 0.0 - k[6645]*y_cur[IDX_GRAINM] - - k[6646]*y_cur[IDX_GRAINM] - k[6647]*y_cur[IDX_GRAINM]; - data[jistart + 10588] = 0.0 - k[6667]*y_cur[IDX_GRAINM]; - data[jistart + 10589] = 0.0 - k[6740]*y_cur[IDX_GRAINM] - - k[6741]*y_cur[IDX_GRAINM]; - data[jistart + 10590] = 0.0 - k[6809]*y_cur[IDX_GRAINM] - - k[6810]*y_cur[IDX_GRAINM]; - data[jistart + 10591] = 0.0 - k[6815]*y_cur[IDX_GRAINM] - - k[6816]*y_cur[IDX_GRAINM] - k[6817]*y_cur[IDX_GRAINM]; - data[jistart + 10592] = 0.0 - k[6709]*y_cur[IDX_GRAINM]; - data[jistart + 10593] = 0.0 - k[6721]*y_cur[IDX_GRAINM] - - k[6722]*y_cur[IDX_GRAINM]; - data[jistart + 10594] = 0.0 - k[6738]*y_cur[IDX_GRAINM] - - k[6739]*y_cur[IDX_GRAINM]; - data[jistart + 10595] = 0.0 - k[6742]*y_cur[IDX_GRAINM] - - k[6743]*y_cur[IDX_GRAINM]; - data[jistart + 10596] = 0.0 - k[6753]*y_cur[IDX_GRAINM] - - k[6754]*y_cur[IDX_GRAINM]; - data[jistart + 10597] = 0.0 - k[6784]*y_cur[IDX_GRAINM]; - data[jistart + 10598] = 0.0 - k[6780]*y_cur[IDX_GRAINM] - - k[6781]*y_cur[IDX_GRAINM]; - data[jistart + 10599] = 0.0 - k[6782]*y_cur[IDX_GRAINM] - - k[6783]*y_cur[IDX_GRAINM]; - data[jistart + 10600] = 0.0 - k[6785]*y_cur[IDX_GRAINM] - - k[6786]*y_cur[IDX_GRAINM]; - data[jistart + 10601] = 0.0 - k[6789]*y_cur[IDX_GRAINM] - - k[6790]*y_cur[IDX_GRAINM]; - data[jistart + 10602] = 0.0 - k[6796]*y_cur[IDX_GRAINM] - - k[6797]*y_cur[IDX_GRAINM]; - data[jistart + 10603] = 0.0 - k[6802]*y_cur[IDX_GRAINM] - - k[6803]*y_cur[IDX_GRAINM]; - data[jistart + 10604] = 0.0 - k[6806]*y_cur[IDX_GRAINM]; - data[jistart + 10605] = 0.0 - k[6807]*y_cur[IDX_GRAINM] - - k[6808]*y_cur[IDX_GRAINM]; - data[jistart + 10606] = 0.0 - k[6821]*y_cur[IDX_GRAINM] - - k[6822]*y_cur[IDX_GRAINM] - k[6823]*y_cur[IDX_GRAINM]; - data[jistart + 10607] = 0.0 - k[6824]*y_cur[IDX_GRAINM] - - k[6825]*y_cur[IDX_GRAINM]; - data[jistart + 10608] = 0.0 - k[6826]*y_cur[IDX_GRAINM] - - k[6827]*y_cur[IDX_GRAINM]; - data[jistart + 10609] = 0.0 - k[6828]*y_cur[IDX_GRAINM] - - k[6829]*y_cur[IDX_GRAINM]; - data[jistart + 10610] = 0.0 - k[6830]*y_cur[IDX_GRAINM] - - k[6831]*y_cur[IDX_GRAINM]; - data[jistart + 10611] = 0.0 - k[6832]*y_cur[IDX_GRAINM] - - k[6833]*y_cur[IDX_GRAINM]; - data[jistart + 10612] = 0.0 - k[6840]*y_cur[IDX_GRAINM]; - data[jistart + 10613] = 0.0 - k[6836]*y_cur[IDX_GRAINM] - - k[6837]*y_cur[IDX_GRAINM]; - data[jistart + 10614] = 0.0 - k[6838]*y_cur[IDX_GRAINM] - - k[6839]*y_cur[IDX_GRAINM]; - data[jistart + 10615] = 0.0 - k[6841]*y_cur[IDX_GRAINM] - - k[6842]*y_cur[IDX_GRAINM]; - data[jistart + 10616] = 0.0 - k[6845]*y_cur[IDX_GRAINM] - - k[6846]*y_cur[IDX_GRAINM]; - data[jistart + 10617] = 0.0 - k[6847]*y_cur[IDX_GRAINM] - - k[6848]*y_cur[IDX_GRAINM]; - data[jistart + 10618] = 0.0 - k[6853]*y_cur[IDX_GRAINM] - - k[6854]*y_cur[IDX_GRAINM]; - data[jistart + 10619] = 0.0 - k[6855]*y_cur[IDX_GRAINM] - - k[6856]*y_cur[IDX_GRAINM]; - data[jistart + 10620] = 0.0 - k[6857]*y_cur[IDX_GRAINM] - - k[6858]*y_cur[IDX_GRAINM]; - data[jistart + 10621] = 0.0 - k[6859]*y_cur[IDX_GRAINM] - - k[6860]*y_cur[IDX_GRAINM]; - data[jistart + 10622] = 0.0 - k[6861]*y_cur[IDX_GRAINM] - - k[6862]*y_cur[IDX_GRAINM]; - data[jistart + 10623] = 0.0 - k[6863]*y_cur[IDX_GRAINM] - - k[6864]*y_cur[IDX_GRAINM]; - data[jistart + 10624] = 0.0 - k[6865]*y_cur[IDX_GRAINM] - - k[6866]*y_cur[IDX_GRAINM]; - data[jistart + 10625] = 0.0 - k[6875]*y_cur[IDX_GRAINM]; - data[jistart + 10626] = 0.0 - k[6662]*y_cur[IDX_GRAINM] - - k[6663]*y_cur[IDX_GRAINM]; - data[jistart + 10627] = 0.0 - k[6599]*y_cur[IDX_GRAINM]; - data[jistart + 10628] = 0.0 - k[6423]*y_cur[IDX_GRAINM]; - data[jistart + 10629] = 0.0 - k[6315]*y_cur[IDX_GRAINM]; - data[jistart + 10630] = 0.0 - k[6316]*y_cur[IDX_GRAINM] - - k[6317]*y_cur[IDX_GRAINM] - k[6318]*y_cur[IDX_GRAINM]; - data[jistart + 10631] = 0.0 - k[6470]*y_cur[IDX_GRAINM] - - k[6471]*y_cur[IDX_GRAINM]; - data[jistart + 10632] = 0.0 - k[6651]*y_cur[IDX_GRAINM]; - data[jistart + 10633] = 0.0 - k[6657]*y_cur[IDX_GRAINM] - - k[6658]*y_cur[IDX_GRAINM] - k[6659]*y_cur[IDX_GRAINM]; - data[jistart + 10634] = 0.0 - k[6475]*y_cur[IDX_GRAINM] - - k[6476]*y_cur[IDX_GRAINM]; - data[jistart + 10635] = 0.0 - k[6492]*y_cur[IDX_GRAINM] - - k[6493]*y_cur[IDX_GRAINM] - k[6494]*y_cur[IDX_GRAINM]; - data[jistart + 10636] = 0.0 - k[6408]*y_cur[IDX_GRAINM] - - k[6409]*y_cur[IDX_GRAINM]; - data[jistart + 10637] = 0.0 - k[6727]*y_cur[IDX_GRAINM] - - k[6728]*y_cur[IDX_GRAINM] - k[6729]*y_cur[IDX_GRAINM] - - k[6730]*y_cur[IDX_GRAINM]; - data[jistart + 10638] = 0.0 - k[6701]*y_cur[IDX_GRAINM] - - k[6702]*y_cur[IDX_GRAINM] - k[6703]*y_cur[IDX_GRAINM] - - k[6704]*y_cur[IDX_GRAINM] - k[6705]*y_cur[IDX_GRAINM]; - data[jistart + 10639] = 0.0 - k[6696]*y_cur[IDX_GRAINM] - - k[6697]*y_cur[IDX_GRAINM] - k[6698]*y_cur[IDX_GRAINM]; - data[jistart + 10640] = 0.0 - k[6321]*y_cur[IDX_GRAINM] - - k[6322]*y_cur[IDX_GRAINM] - k[6323]*y_cur[IDX_GRAINM]; - data[jistart + 10641] = 0.0 - k[6760]*y_cur[IDX_GRAINM]; - data[jistart + 10642] = 0.0 - k[6765]*y_cur[IDX_GRAINM] - - k[6766]*y_cur[IDX_GRAINM]; - data[jistart + 10643] = 0.0 - k[6748]*y_cur[IDX_GRAINM] - - k[6749]*y_cur[IDX_GRAINM]; - data[jistart + 10644] = 0.0 - k[6834]*y_cur[IDX_GRAINM] - - k[6835]*y_cur[IDX_GRAINM]; - data[jistart + 10645] = 0.0 - k[6867]*y_cur[IDX_GRAINM] - - k[6868]*y_cur[IDX_GRAINM]; - data[jistart + 10646] = 0.0 - k[6547]*y_cur[IDX_GRAINM] - - k[6548]*y_cur[IDX_GRAINM]; - data[jistart + 10647] = 0.0 - k[6561]*y_cur[IDX_GRAINM] - - k[6562]*y_cur[IDX_GRAINM] - k[6563]*y_cur[IDX_GRAINM] - - k[6564]*y_cur[IDX_GRAINM] - k[6565]*y_cur[IDX_GRAINM]; - data[jistart + 10648] = 0.0 - k[6484]*y_cur[IDX_GRAINM] - - k[6485]*y_cur[IDX_GRAINM]; - data[jistart + 10649] = 0.0 - k[6502]*y_cur[IDX_GRAINM] - - k[6503]*y_cur[IDX_GRAINM]; - data[jistart + 10650] = 0.0 - k[6518]*y_cur[IDX_GRAINM] - - k[6519]*y_cur[IDX_GRAINM]; - data[jistart + 10651] = 0.0 - k[6683]*y_cur[IDX_GRAINM] - - k[6684]*y_cur[IDX_GRAINM]; - data[jistart + 10652] = 0.0 - k[6692]*y_cur[IDX_GRAINM] - - k[6693]*y_cur[IDX_GRAINM]; - data[jistart + 10653] = 0.0 - k[6711]*y_cur[IDX_GRAINM] - - k[6712]*y_cur[IDX_GRAINM] - k[6713]*y_cur[IDX_GRAINM] - - k[6714]*y_cur[IDX_GRAINM] - k[6715]*y_cur[IDX_GRAINM] - - k[6716]*y_cur[IDX_GRAINM]; - data[jistart + 10654] = 0.0 - k[6731]*y_cur[IDX_GRAINM] - - k[6732]*y_cur[IDX_GRAINM] - k[6733]*y_cur[IDX_GRAINM] - - k[6734]*y_cur[IDX_GRAINM] - k[6735]*y_cur[IDX_GRAINM] - - k[6736]*y_cur[IDX_GRAINM] - k[6737]*y_cur[IDX_GRAINM]; - data[jistart + 10655] = 0.0 - k[6688]*y_cur[IDX_GRAINM]; - data[jistart + 10656] = 0.0 - k[6405]*y_cur[IDX_GRAINM] - - k[6406]*y_cur[IDX_GRAINM]; - data[jistart + 10657] = 0.0 - k[6587]*y_cur[IDX_GRAINM] - - k[6588]*y_cur[IDX_GRAINM]; - data[jistart + 10658] = 0.0 - k[6603]*y_cur[IDX_GRAINM] - - k[6604]*y_cur[IDX_GRAINM] - k[6605]*y_cur[IDX_GRAINM]; - data[jistart + 10659] = 0.0 - k[6428]*y_cur[IDX_GRAINM] - - k[6429]*y_cur[IDX_GRAINM] - k[6430]*y_cur[IDX_GRAINM]; - data[jistart + 10660] = 0.0 - k[6440]*y_cur[IDX_GRAINM] - - k[6441]*y_cur[IDX_GRAINM] - k[6442]*y_cur[IDX_GRAINM] - - k[6443]*y_cur[IDX_GRAINM] - k[6444]*y_cur[IDX_GRAINM]; - data[jistart + 10661] = 0.0 - k[6327]*y_cur[IDX_GRAINM] - - k[6328]*y_cur[IDX_GRAINM]; - data[jistart + 10662] = 0.0 - k[6332]*y_cur[IDX_GRAINM] - - k[6333]*y_cur[IDX_GRAINM] - k[6334]*y_cur[IDX_GRAINM] - - k[6335]*y_cur[IDX_GRAINM] - k[6336]*y_cur[IDX_GRAINM]; - data[jistart + 10663] = 0.0 - k[6359]*y_cur[IDX_GRAINM]; - data[jistart + 10664] = 0.0 - k[6468]*y_cur[IDX_GRAINM] - - k[6469]*y_cur[IDX_GRAINM]; - data[jistart + 10665] = 0.0 - k[6373]*y_cur[IDX_GRAINM]; - data[jistart + 10666] = 0.0 - k[6540]*y_cur[IDX_GRAINM]; - data[jistart + 10667] = 0.0 - k[6694]*y_cur[IDX_GRAINM] - - k[6695]*y_cur[IDX_GRAINM]; - data[jistart + 10668] = 0.0 - k[6511]*y_cur[IDX_GRAINM]; - data[jistart + 10669] = 0.0 - k[6535]*y_cur[IDX_GRAINM]; - data[jistart + 10670] = 0.0 - k[6454]*y_cur[IDX_GRAINM]; - data[jistart + 10671] = 0.0 - k[6632]*y_cur[IDX_GRAINM]; - data[jistart + 10672] = 0.0 - k[6347]*y_cur[IDX_GRAINM]; - data[jistart + 10673] = 0.0 - k[6670]*y_cur[IDX_GRAINM]; - data[jistart + 10674] = 0.0 - k[6308]*y_cur[IDX_HII] - - k[6309]*y_cur[IDX_H2II] - k[6310]*y_cur[IDX_H3II] - - k[6311]*y_cur[IDX_H3II] - k[6312]*y_cur[IDX_HeII] - - k[6313]*y_cur[IDX_HeHII] - k[6314]*y_cur[IDX_CII] - - k[6315]*y_cur[IDX_CHII] - k[6316]*y_cur[IDX_CH2II] - - k[6317]*y_cur[IDX_CH2II] - k[6318]*y_cur[IDX_CH2II] - - k[6319]*y_cur[IDX_NII] - k[6320]*y_cur[IDX_NHII] - - k[6321]*y_cur[IDX_CH3II] - k[6322]*y_cur[IDX_CH3II] - - k[6323]*y_cur[IDX_CH3II] - k[6324]*y_cur[IDX_NH2II] - - k[6325]*y_cur[IDX_NH2II] - k[6326]*y_cur[IDX_OII] - - k[6327]*y_cur[IDX_CH4II] - k[6328]*y_cur[IDX_CH4II] - - k[6329]*y_cur[IDX_OHII] - k[6330]*y_cur[IDX_NH3II] - - k[6331]*y_cur[IDX_NH3II] - k[6332]*y_cur[IDX_CH5II] - - k[6333]*y_cur[IDX_CH5II] - k[6334]*y_cur[IDX_CH5II] - - k[6335]*y_cur[IDX_CH5II] - k[6336]*y_cur[IDX_CH5II] - - k[6337]*y_cur[IDX_NH4II] - k[6338]*y_cur[IDX_NH4II] - - k[6339]*y_cur[IDX_NH4II] - k[6340]*y_cur[IDX_H2OII] - - k[6341]*y_cur[IDX_H2OII] - k[6342]*y_cur[IDX_H2OII] - - k[6343]*y_cur[IDX_H3OII] - k[6344]*y_cur[IDX_H3OII] - - k[6345]*y_cur[IDX_H3OII] - k[6346]*y_cur[IDX_H3OII] - - k[6347]*y_cur[IDX_FII] - k[6348]*y_cur[IDX_HFII] - - k[6349]*y_cur[IDX_H2FII] - k[6350]*y_cur[IDX_H2FII] - - k[6351]*y_cur[IDX_NaII] - k[6352]*y_cur[IDX_C2II] - - k[6353]*y_cur[IDX_MgII] - k[6354]*y_cur[IDX_C2HII] - - k[6355]*y_cur[IDX_C2HII] - k[6356]*y_cur[IDX_C2H2II] - - k[6357]*y_cur[IDX_C2H2II] - k[6358]*y_cur[IDX_C2H2II] - - k[6359]*y_cur[IDX_CNII] - k[6360]*y_cur[IDX_C2H3II] - - k[6361]*y_cur[IDX_C2H3II] - k[6362]*y_cur[IDX_C2H3II] - - k[6363]*y_cur[IDX_C2H3II] - k[6364]*y_cur[IDX_C2H3II] - - k[6365]*y_cur[IDX_C2H3II] - k[6366]*y_cur[IDX_C2H3II] - - k[6367]*y_cur[IDX_C2H3II] - k[6368]*y_cur[IDX_C2H3II] - - k[6369]*y_cur[IDX_C2H3II] - k[6370]*y_cur[IDX_C2H3II] - - k[6371]*y_cur[IDX_C2H3II] - k[6372]*y_cur[IDX_HCNII] - - k[6373]*y_cur[IDX_COII] - k[6374]*y_cur[IDX_SiII] - - k[6375]*y_cur[IDX_N2II] - k[6376]*y_cur[IDX_H2NCII] - - k[6377]*y_cur[IDX_H2NCII] - k[6378]*y_cur[IDX_HCNHII] - - k[6379]*y_cur[IDX_HCNHII] - k[6380]*y_cur[IDX_HCNHII] - - k[6381]*y_cur[IDX_C2H4II] - k[6382]*y_cur[IDX_C2H4II] - - k[6383]*y_cur[IDX_C2H4II] - k[6384]*y_cur[IDX_C2H4II] - - k[6385]*y_cur[IDX_C2H4II] - k[6386]*y_cur[IDX_C2H4II] - - k[6387]*y_cur[IDX_C2H4II] - k[6388]*y_cur[IDX_SiHII] - - k[6389]*y_cur[IDX_HCOII] - k[6390]*y_cur[IDX_HOCII] - - k[6391]*y_cur[IDX_C2H5II] - k[6392]*y_cur[IDX_C2H5II] - - k[6393]*y_cur[IDX_C2H5II] - k[6394]*y_cur[IDX_C2H5II] - - k[6395]*y_cur[IDX_C2H5II] - k[6396]*y_cur[IDX_N2HII] - - k[6397]*y_cur[IDX_N2HII] - k[6398]*y_cur[IDX_H2COII] - - k[6399]*y_cur[IDX_H2COII] - k[6400]*y_cur[IDX_H2COII] - - k[6401]*y_cur[IDX_H2COII] - k[6402]*y_cur[IDX_SiH2II] - - k[6403]*y_cur[IDX_SiH2II] - k[6404]*y_cur[IDX_SiH2II] - - k[6405]*y_cur[IDX_CH3NHII] - k[6406]*y_cur[IDX_CH3NHII] - - k[6407]*y_cur[IDX_NOII] - k[6408]*y_cur[IDX_CH2NH2II] - - k[6409]*y_cur[IDX_CH2NH2II] - k[6410]*y_cur[IDX_C2H6II] - - k[6411]*y_cur[IDX_C2H6II] - k[6412]*y_cur[IDX_SiH3II] - - k[6413]*y_cur[IDX_SiH3II] - k[6414]*y_cur[IDX_H3COII] - - k[6415]*y_cur[IDX_H3COII] - k[6416]*y_cur[IDX_H3COII] - - k[6417]*y_cur[IDX_H3COII] - k[6418]*y_cur[IDX_H3COII] - - k[6419]*y_cur[IDX_C2H7II] - k[6420]*y_cur[IDX_C2H7II] - - k[6421]*y_cur[IDX_PII] - k[6422]*y_cur[IDX_HNOII] - - k[6423]*y_cur[IDX_CFII] - k[6424]*y_cur[IDX_SII] - - k[6425]*y_cur[IDX_O2II] - k[6426]*y_cur[IDX_SiH4II] - - k[6427]*y_cur[IDX_SiH4II] - k[6428]*y_cur[IDX_CH3OHII] - - k[6429]*y_cur[IDX_CH3OHII] - k[6430]*y_cur[IDX_CH3OHII] - - k[6431]*y_cur[IDX_H2NOII] - k[6432]*y_cur[IDX_H2NOII] - - k[6433]*y_cur[IDX_PHII] - k[6434]*y_cur[IDX_PH2II] - - k[6435]*y_cur[IDX_PH2II] - k[6436]*y_cur[IDX_PH2II] - - k[6437]*y_cur[IDX_O2HII] - k[6438]*y_cur[IDX_SiH5II] - - k[6439]*y_cur[IDX_SiH5II] - k[6440]*y_cur[IDX_CH3OH2II] - - k[6441]*y_cur[IDX_CH3OH2II] - k[6442]*y_cur[IDX_CH3OH2II] - - k[6443]*y_cur[IDX_CH3OH2II] - k[6444]*y_cur[IDX_CH3OH2II] - - k[6445]*y_cur[IDX_HSII] - k[6446]*y_cur[IDX_H2SII] - - k[6447]*y_cur[IDX_H2SII] - k[6448]*y_cur[IDX_PH3II] - - k[6449]*y_cur[IDX_PH3II] - k[6450]*y_cur[IDX_H3SII] - - k[6451]*y_cur[IDX_H3SII] - k[6452]*y_cur[IDX_H3SII] - - k[6453]*y_cur[IDX_H3SII] - k[6454]*y_cur[IDX_ClII] - - k[6455]*y_cur[IDX_C3II] - k[6456]*y_cur[IDX_HClII] - - k[6457]*y_cur[IDX_H2ClII] - k[6458]*y_cur[IDX_H2ClII] - - k[6459]*y_cur[IDX_C3HII] - k[6460]*y_cur[IDX_C3HII] - - k[6461]*y_cur[IDX_C3H2II] - k[6462]*y_cur[IDX_C3H2II] - - k[6463]*y_cur[IDX_C3H2II] - k[6464]*y_cur[IDX_C3H2II] - - k[6465]*y_cur[IDX_C3H2II] - k[6466]*y_cur[IDX_C2NII] - - k[6467]*y_cur[IDX_C2NII] - k[6468]*y_cur[IDX_CNCII] - - k[6469]*y_cur[IDX_CNCII] - k[6470]*y_cur[IDX_CH2CCHII] - - k[6471]*y_cur[IDX_CH2CCHII] - k[6472]*y_cur[IDX_C2NHII] - - k[6473]*y_cur[IDX_C3H3II] - k[6474]*y_cur[IDX_C2OII] - - k[6475]*y_cur[IDX_CH2CNII] - k[6476]*y_cur[IDX_CH2CNII] - - k[6477]*y_cur[IDX_C3H4II] - k[6478]*y_cur[IDX_C3H4II] - - k[6479]*y_cur[IDX_C3H4II] - k[6480]*y_cur[IDX_C3H4II] - - k[6481]*y_cur[IDX_SiCII] - k[6482]*y_cur[IDX_C3H5II] - - k[6483]*y_cur[IDX_C3H5II] - k[6484]*y_cur[IDX_CH3CNII] - - k[6485]*y_cur[IDX_CH3CNII] - k[6486]*y_cur[IDX_HC2OII] - - k[6487]*y_cur[IDX_HC2OII] - k[6488]*y_cur[IDX_HC2OII] - - k[6489]*y_cur[IDX_HC2OII] - k[6490]*y_cur[IDX_HCSiII] - - k[6491]*y_cur[IDX_HCSiII] - k[6492]*y_cur[IDX_CH2COII] - - k[6493]*y_cur[IDX_CH2COII] - k[6494]*y_cur[IDX_CH2COII] - - k[6495]*y_cur[IDX_OCNII] - k[6496]*y_cur[IDX_SiCH2II] - - k[6497]*y_cur[IDX_SiCH2II] - k[6498]*y_cur[IDX_SiCH2II] - - k[6499]*y_cur[IDX_C3H6II] - k[6500]*y_cur[IDX_C3H6II] - - k[6501]*y_cur[IDX_SiNII] - k[6502]*y_cur[IDX_CH3CNHII] - - k[6503]*y_cur[IDX_CH3CNHII] - k[6504]*y_cur[IDX_C3H7II] - - k[6505]*y_cur[IDX_C3H7II] - k[6506]*y_cur[IDX_C3H7II] - - k[6507]*y_cur[IDX_C3H7II] - k[6508]*y_cur[IDX_C3H7II] - - k[6509]*y_cur[IDX_C3H7II] - k[6510]*y_cur[IDX_C3H7II] - - k[6511]*y_cur[IDX_CPII] - k[6512]*y_cur[IDX_HNSiII] - - k[6513]*y_cur[IDX_HNSiII] - k[6514]*y_cur[IDX_HCNOII] - - k[6515]*y_cur[IDX_HCNOII] - k[6516]*y_cur[IDX_SiCH3II] - - k[6517]*y_cur[IDX_SiCH3II] - k[6518]*y_cur[IDX_CH3COII] - - k[6519]*y_cur[IDX_CH3COII] - k[6520]*y_cur[IDX_HONCII] - - k[6521]*y_cur[IDX_HONCII] - k[6522]*y_cur[IDX_HNCOII] - - k[6523]*y_cur[IDX_HNCOII] - k[6524]*y_cur[IDX_HOCNII] - - k[6525]*y_cur[IDX_HOCNII] - k[6526]*y_cur[IDX_NH2CNHII] - - k[6527]*y_cur[IDX_NH2CNHII] - k[6528]*y_cur[IDX_N2OII] - - k[6529]*y_cur[IDX_N2OII] - k[6530]*y_cur[IDX_N2OII] - - k[6531]*y_cur[IDX_SiOII] - k[6532]*y_cur[IDX_HCNOHII] - - k[6533]*y_cur[IDX_HCNOHII] - k[6534]*y_cur[IDX_HCNOHII] - - k[6535]*y_cur[IDX_CSII] - k[6536]*y_cur[IDX_H2CNOII] - - k[6537]*y_cur[IDX_H2CNOII] - k[6538]*y_cur[IDX_H2NCOII] - - k[6539]*y_cur[IDX_H2NCOII] - k[6540]*y_cur[IDX_CO2II] - - k[6541]*y_cur[IDX_SiCH4II] - k[6542]*y_cur[IDX_SiCH4II] - - k[6543]*y_cur[IDX_HCPII] - k[6544]*y_cur[IDX_HCPII] - - k[6545]*y_cur[IDX_H2OCNII] - k[6546]*y_cur[IDX_H2OCNII] - - k[6547]*y_cur[IDX_CH3CHOII] - k[6548]*y_cur[IDX_CH3CHOII] - - k[6549]*y_cur[IDX_HNCOHII] - k[6550]*y_cur[IDX_HNCOHII] - - k[6551]*y_cur[IDX_HNCOHII] - k[6552]*y_cur[IDX_SiNH2II] - - k[6553]*y_cur[IDX_SiNH2II] - k[6554]*y_cur[IDX_HCSII] - - k[6555]*y_cur[IDX_HCSII] - k[6556]*y_cur[IDX_SiOHII] - - k[6557]*y_cur[IDX_SiOHII] - k[6558]*y_cur[IDX_HN2OII] - - k[6559]*y_cur[IDX_HN2OII] - k[6560]*y_cur[IDX_PNII] - - k[6561]*y_cur[IDX_CH3CHOHII] - k[6562]*y_cur[IDX_CH3CHOHII] - - k[6563]*y_cur[IDX_CH3CHOHII] - k[6564]*y_cur[IDX_CH3CHOHII] - - k[6565]*y_cur[IDX_CH3CHOHII] - k[6566]*y_cur[IDX_HCO2II] - - k[6567]*y_cur[IDX_HCO2II] - k[6568]*y_cur[IDX_HCO2II] - - k[6569]*y_cur[IDX_PCH2II] - k[6570]*y_cur[IDX_PCH2II] - - k[6571]*y_cur[IDX_HPNII] - k[6572]*y_cur[IDX_HPNII] - - k[6573]*y_cur[IDX_HPNII] - k[6574]*y_cur[IDX_HCOOHII] - - k[6575]*y_cur[IDX_HCOOHII] - k[6576]*y_cur[IDX_C2H5OHII] - - k[6577]*y_cur[IDX_C2H5OHII] - k[6578]*y_cur[IDX_PCH3II] - - k[6579]*y_cur[IDX_PCH3II] - k[6580]*y_cur[IDX_PCH3II] - - k[6581]*y_cur[IDX_NSII] - k[6582]*y_cur[IDX_H2CSII] - - k[6583]*y_cur[IDX_H2CSII] - k[6584]*y_cur[IDX_NO2II] - - k[6585]*y_cur[IDX_H2SiOII] - k[6586]*y_cur[IDX_H2SiOII] - - k[6587]*y_cur[IDX_CH3OCH3II] - k[6588]*y_cur[IDX_CH3OCH3II] - - k[6589]*y_cur[IDX_HNSII] - k[6590]*y_cur[IDX_H3SiOII] - - k[6591]*y_cur[IDX_H3SiOII] - k[6592]*y_cur[IDX_SiFII] - - k[6593]*y_cur[IDX_PNH2II] - k[6594]*y_cur[IDX_PNH2II] - - k[6595]*y_cur[IDX_PNH2II] - k[6596]*y_cur[IDX_PCH4II] - - k[6597]*y_cur[IDX_PCH4II] - k[6598]*y_cur[IDX_PCH4II] - - k[6599]*y_cur[IDX_CClII] - k[6600]*y_cur[IDX_POII] - - k[6601]*y_cur[IDX_H3CSII] - k[6602]*y_cur[IDX_H3CSII] - - k[6603]*y_cur[IDX_CH3OCH4II] - k[6604]*y_cur[IDX_CH3OCH4II] - - k[6605]*y_cur[IDX_CH3OCH4II] - k[6606]*y_cur[IDX_C2H5OH2II] - - k[6607]*y_cur[IDX_C2H5OH2II] - k[6608]*y_cur[IDX_C2H5OH2II] - - k[6609]*y_cur[IDX_C2H5OH2II] - k[6610]*y_cur[IDX_HCOOH2II] - - k[6611]*y_cur[IDX_HCOOH2II] - k[6612]*y_cur[IDX_HPOII] - - k[6613]*y_cur[IDX_HPOII] - k[6614]*y_cur[IDX_HPOII] - - k[6615]*y_cur[IDX_C4II] - k[6616]*y_cur[IDX_C4II] - - k[6617]*y_cur[IDX_PNH3II] - k[6618]*y_cur[IDX_PNH3II] - - k[6619]*y_cur[IDX_PNH3II] - k[6620]*y_cur[IDX_SOII] - - k[6621]*y_cur[IDX_C4HII] - k[6622]*y_cur[IDX_H2POII] - - k[6623]*y_cur[IDX_H2POII] - k[6624]*y_cur[IDX_H2CClII] - - k[6625]*y_cur[IDX_HSOII] - k[6626]*y_cur[IDX_C3NII] - - k[6627]*y_cur[IDX_C4H2II] - k[6628]*y_cur[IDX_C4H2II] - - k[6629]*y_cur[IDX_HC3NII] - k[6630]*y_cur[IDX_HC3NII] - - k[6631]*y_cur[IDX_HC3NII] - k[6632]*y_cur[IDX_ClOII] - - k[6633]*y_cur[IDX_C4H3II] - k[6634]*y_cur[IDX_C4H3II] - - k[6635]*y_cur[IDX_C2N2II] - k[6636]*y_cur[IDX_C2N2II] - - k[6637]*y_cur[IDX_HC3NHII] - k[6638]*y_cur[IDX_HC3NHII] - - k[6639]*y_cur[IDX_HC3NHII] - k[6640]*y_cur[IDX_HC3NHII] - - k[6641]*y_cur[IDX_C4H4II] - k[6642]*y_cur[IDX_SiC2II] - - k[6643]*y_cur[IDX_SiC2II] - k[6644]*y_cur[IDX_C3OII] - - k[6645]*y_cur[IDX_C4H5II] - k[6646]*y_cur[IDX_C4H5II] - - k[6647]*y_cur[IDX_C4H5II] - k[6648]*y_cur[IDX_HC3OII] - - k[6649]*y_cur[IDX_SiC2HII] - k[6650]*y_cur[IDX_SiC2HII] - - k[6651]*y_cur[IDX_CH2CHCNII] - k[6652]*y_cur[IDX_NCCNHII] - - k[6653]*y_cur[IDX_NCCNHII] - k[6654]*y_cur[IDX_SiNCII] - - k[6655]*y_cur[IDX_C3H2OII] - k[6656]*y_cur[IDX_C3H2OII] - - k[6657]*y_cur[IDX_CH2CHCNHII] - k[6658]*y_cur[IDX_CH2CHCNHII] - - k[6659]*y_cur[IDX_CH2CHCNHII] - k[6660]*y_cur[IDX_SiC2H2II] - - k[6661]*y_cur[IDX_SiC2H2II] - k[6662]*y_cur[IDX_CCPII] - - k[6663]*y_cur[IDX_CCPII] - k[6664]*y_cur[IDX_SiC2H3II] - - k[6665]*y_cur[IDX_SiC2H3II] - k[6666]*y_cur[IDX_H3C3OII] - - k[6667]*y_cur[IDX_C4H7II] - k[6668]*y_cur[IDX_SiNCHII] - - k[6669]*y_cur[IDX_SiNCHII] - k[6670]*y_cur[IDX_FeII] - - k[6671]*y_cur[IDX_C2H5CNHII] - k[6672]*y_cur[IDX_C2H5CNHII] - - k[6673]*y_cur[IDX_C2H5CNHII] - k[6674]*y_cur[IDX_C2SII] - - k[6675]*y_cur[IDX_C2SII] - k[6676]*y_cur[IDX_HC2PII] - - k[6677]*y_cur[IDX_HC2PII] - k[6678]*y_cur[IDX_HC2SII] - - k[6679]*y_cur[IDX_HC2SII] - k[6680]*y_cur[IDX_PC2H2II] - - k[6681]*y_cur[IDX_PC2H2II] - k[6682]*y_cur[IDX_PC2H2II] - - k[6683]*y_cur[IDX_CH3COCH3II] - k[6684]*y_cur[IDX_CH3COCH3II] - - k[6685]*y_cur[IDX_PC2H3II] - k[6686]*y_cur[IDX_PC2H3II] - - k[6687]*y_cur[IDX_PC2H3II] - k[6688]*y_cur[IDX_CH3CSII] - - k[6689]*y_cur[IDX_PC2H4II] - k[6690]*y_cur[IDX_PC2H4II] - - k[6691]*y_cur[IDX_PC2H4II] - k[6692]*y_cur[IDX_CH3COCH4II] - - k[6693]*y_cur[IDX_CH3COCH4II] - k[6694]*y_cur[IDX_COOCH3II] - - k[6695]*y_cur[IDX_COOCH3II] - k[6696]*y_cur[IDX_CH2OHCOII] - - k[6697]*y_cur[IDX_CH2OHCOII] - k[6698]*y_cur[IDX_CH2OHCOII] - - k[6699]*y_cur[IDX_HCOOCH3II] - k[6700]*y_cur[IDX_HCOOCH3II] - - k[6701]*y_cur[IDX_CH2OHCHOII] - k[6702]*y_cur[IDX_CH2OHCHOII] - - k[6703]*y_cur[IDX_CH2OHCHOII] - k[6704]*y_cur[IDX_CH2OHCHOII] - - k[6705]*y_cur[IDX_CH2OHCHOII] - k[6706]*y_cur[IDX_OCSII] - - k[6707]*y_cur[IDX_OCSII] - k[6708]*y_cur[IDX_OCSII] - - k[6709]*y_cur[IDX_C5II] - k[6710]*y_cur[IDX_SiSII] - - k[6711]*y_cur[IDX_CH3COOHII] - k[6712]*y_cur[IDX_CH3COOHII] - - k[6713]*y_cur[IDX_CH3COOHII] - k[6714]*y_cur[IDX_CH3COOHII] - - k[6715]*y_cur[IDX_CH3COOHII] - k[6716]*y_cur[IDX_CH3COOHII] - - k[6717]*y_cur[IDX_HOCSII] - k[6718]*y_cur[IDX_HOCSII] - - k[6719]*y_cur[IDX_HSiSII] - k[6720]*y_cur[IDX_HSiSII] - - k[6721]*y_cur[IDX_C5HII] - k[6722]*y_cur[IDX_C5HII] - - k[6723]*y_cur[IDX_HSiO2II] - k[6724]*y_cur[IDX_HSiO2II] - - k[6725]*y_cur[IDX_H5C2O2II] - k[6726]*y_cur[IDX_H5C2O2II] - - k[6727]*y_cur[IDX_CH2OHCH2OII] - k[6728]*y_cur[IDX_CH2OHCH2OII] - - k[6729]*y_cur[IDX_CH2OHCH2OII] - k[6730]*y_cur[IDX_CH2OHCH2OII] - - k[6731]*y_cur[IDX_CH3COOH2II] - k[6732]*y_cur[IDX_CH3COOH2II] - - k[6733]*y_cur[IDX_CH3COOH2II] - k[6734]*y_cur[IDX_CH3COOH2II] - - k[6735]*y_cur[IDX_CH3COOH2II] - k[6736]*y_cur[IDX_CH3COOH2II] - - k[6737]*y_cur[IDX_CH3COOH2II] - k[6738]*y_cur[IDX_C5H2II] - - k[6739]*y_cur[IDX_C5H2II] - k[6740]*y_cur[IDX_C4NII] - - k[6741]*y_cur[IDX_C4NII] - k[6742]*y_cur[IDX_C5H3II] - - k[6743]*y_cur[IDX_C5H3II] - k[6744]*y_cur[IDX_HC4NII] - - k[6745]*y_cur[IDX_H2C4NII] - k[6746]*y_cur[IDX_SiC3II] - - k[6747]*y_cur[IDX_SiC3II] - k[6748]*y_cur[IDX_CH3C4HII] - - k[6749]*y_cur[IDX_CH3C4HII] - k[6750]*y_cur[IDX_SO2II] - - k[6751]*y_cur[IDX_SO2II] - k[6752]*y_cur[IDX_S2II] - - k[6753]*y_cur[IDX_C5H5II] - k[6754]*y_cur[IDX_C5H5II] - - k[6755]*y_cur[IDX_HSO2II] - k[6756]*y_cur[IDX_HSO2II] - - k[6757]*y_cur[IDX_HSO2II] - k[6758]*y_cur[IDX_HS2II] - - k[6759]*y_cur[IDX_HS2II] - k[6760]*y_cur[IDX_CH3C3NII] - - k[6761]*y_cur[IDX_SiC3HII] - k[6762]*y_cur[IDX_SiC3HII] - - k[6763]*y_cur[IDX_H2S2II] - k[6764]*y_cur[IDX_H2S2II] - - k[6765]*y_cur[IDX_CH3C3NHII] - k[6766]*y_cur[IDX_CH3C3NHII] - - k[6767]*y_cur[IDX_SiC3H2II] - k[6768]*y_cur[IDX_SiC3H2II] - - k[6769]*y_cur[IDX_NCCNCH3II] - k[6770]*y_cur[IDX_H3S2II] - - k[6771]*y_cur[IDX_H3S2II] - k[6772]*y_cur[IDX_PC3HII] - - k[6773]*y_cur[IDX_PC3HII] - k[6774]*y_cur[IDX_PC3HII] - - k[6775]*y_cur[IDX_C3SII] - k[6776]*y_cur[IDX_C3SII] - - k[6777]*y_cur[IDX_C3SII] - k[6778]*y_cur[IDX_HC3SII] - - k[6779]*y_cur[IDX_HC3SII] - k[6780]*y_cur[IDX_C6II] - - k[6781]*y_cur[IDX_C6II] - k[6782]*y_cur[IDX_C6HII] - - k[6783]*y_cur[IDX_C6HII] - k[6784]*y_cur[IDX_C5NII] - - k[6785]*y_cur[IDX_C6H2II] - k[6786]*y_cur[IDX_C6H2II] - - k[6787]*y_cur[IDX_HC5NII] - k[6788]*y_cur[IDX_HC5NII] - - k[6789]*y_cur[IDX_C6H3II] - k[6790]*y_cur[IDX_C6H3II] - - k[6791]*y_cur[IDX_HC5NHII] - k[6792]*y_cur[IDX_HC5NHII] - - k[6793]*y_cur[IDX_HC5NHII] - k[6794]*y_cur[IDX_HC5NHII] - - k[6795]*y_cur[IDX_HC5NHII] - k[6796]*y_cur[IDX_C6H4II] - - k[6797]*y_cur[IDX_C6H4II] - k[6798]*y_cur[IDX_SiC4II] - - k[6799]*y_cur[IDX_SiC4II] - k[6800]*y_cur[IDX_SiC4HII] - - k[6801]*y_cur[IDX_SiC4HII] - k[6802]*y_cur[IDX_C6H5II] - - k[6803]*y_cur[IDX_C6H5II] - k[6804]*y_cur[IDX_H3C5NII] - - k[6805]*y_cur[IDX_H3C5NII] - k[6806]*y_cur[IDX_C6H6II] - - k[6807]*y_cur[IDX_C6H7II] - k[6808]*y_cur[IDX_C6H7II] - - k[6809]*y_cur[IDX_C4PII] - k[6810]*y_cur[IDX_C4PII] - - k[6811]*y_cur[IDX_PC4HII] - k[6812]*y_cur[IDX_PC4HII] - - k[6813]*y_cur[IDX_PC4HII] - k[6814]*y_cur[IDX_PC4HII] - - k[6815]*y_cur[IDX_C4SII] - k[6816]*y_cur[IDX_C4SII] - - k[6817]*y_cur[IDX_C4SII] - k[6818]*y_cur[IDX_HC4SII] - - k[6819]*y_cur[IDX_HC4SII] - k[6820]*y_cur[IDX_HC4SII] - - k[6821]*y_cur[IDX_C7II] - k[6822]*y_cur[IDX_C7II] - - k[6823]*y_cur[IDX_C7II] - k[6824]*y_cur[IDX_C7HII] - - k[6825]*y_cur[IDX_C7HII] - k[6826]*y_cur[IDX_C7H2II] - - k[6827]*y_cur[IDX_C7H2II] - k[6828]*y_cur[IDX_C7H3II] - - k[6829]*y_cur[IDX_C7H3II] - k[6830]*y_cur[IDX_C7H4II] - - k[6831]*y_cur[IDX_C7H4II] - k[6832]*y_cur[IDX_C7H5II] - - k[6833]*y_cur[IDX_C7H5II] - k[6834]*y_cur[IDX_CH3C5NHII] - - k[6835]*y_cur[IDX_CH3C5NHII] - k[6836]*y_cur[IDX_C8II] - - k[6837]*y_cur[IDX_C8II] - k[6838]*y_cur[IDX_C8HII] - - k[6839]*y_cur[IDX_C8HII] - k[6840]*y_cur[IDX_C7NII] - - k[6841]*y_cur[IDX_C8H2II] - k[6842]*y_cur[IDX_C8H2II] - - k[6843]*y_cur[IDX_HC7NII] - k[6844]*y_cur[IDX_HC7NII] - - k[6845]*y_cur[IDX_C8H3II] - k[6846]*y_cur[IDX_C8H3II] - - k[6847]*y_cur[IDX_C8H4II] - k[6848]*y_cur[IDX_C8H4II] - - k[6849]*y_cur[IDX_H2C7NII] - k[6850]*y_cur[IDX_H2C7NII] - - k[6851]*y_cur[IDX_H3C7NII] - k[6852]*y_cur[IDX_H3C7NII] - - k[6853]*y_cur[IDX_C8H5II] - k[6854]*y_cur[IDX_C8H5II] - - k[6855]*y_cur[IDX_C9II] - k[6856]*y_cur[IDX_C9II] - - k[6857]*y_cur[IDX_C9HII] - k[6858]*y_cur[IDX_C9HII] - - k[6859]*y_cur[IDX_C9H2II] - k[6860]*y_cur[IDX_C9H2II] - - k[6861]*y_cur[IDX_C9H3II] - k[6862]*y_cur[IDX_C9H3II] - - k[6863]*y_cur[IDX_C9H4II] - k[6864]*y_cur[IDX_C9H4II] - - k[6865]*y_cur[IDX_C9H5II] - k[6866]*y_cur[IDX_C9H5II] - - k[6867]*y_cur[IDX_CH3C7NHII] - k[6868]*y_cur[IDX_CH3C7NHII] - - k[6869]*y_cur[IDX_C10II] - k[6870]*y_cur[IDX_C10II] - - k[6871]*y_cur[IDX_C10HII] - k[6872]*y_cur[IDX_C10HII] - - k[6873]*y_cur[IDX_C10HII] - k[6874]*y_cur[IDX_C10H2II] - - k[6875]*y_cur[IDX_C9NII] - k[6876]*y_cur[IDX_HC9NII] - - k[6877]*y_cur[IDX_HC9NII] - k[6878]*y_cur[IDX_C10H3II] - - k[6879]*y_cur[IDX_C10H3II] - k[6880]*y_cur[IDX_H2C9NII] - - k[6881]*y_cur[IDX_H2C9NII] - k[6882]*y_cur[IDX_H3C9NII] - - k[6883]*y_cur[IDX_H3C9NII] - k[6884]*y_cur[IDX_C11II] - - k[6885]*y_cur[IDX_C11II] - k[6886]*y_cur[IDX_C11II] - - k[6887]*y_cur[IDX_C11II]; - data[jistart + 10675] = 0.0 + k[8763]*y_cur[IDX_eM]; - data[jistart + 10676] = 0.0 - k[6308]*y_cur[IDX_GRAINM]; - data[jistart + 10677] = 0.0 - k[6309]*y_cur[IDX_GRAINM]; - data[jistart + 10678] = 0.0 - k[6745]*y_cur[IDX_GRAINM]; - data[jistart + 10679] = 0.0 - k[6849]*y_cur[IDX_GRAINM] - - k[6850]*y_cur[IDX_GRAINM]; - data[jistart + 10680] = 0.0 - k[6880]*y_cur[IDX_GRAINM] - - k[6881]*y_cur[IDX_GRAINM]; - data[jistart + 10681] = 0.0 - k[6624]*y_cur[IDX_GRAINM]; - data[jistart + 10682] = 0.0 - k[6536]*y_cur[IDX_GRAINM] - - k[6537]*y_cur[IDX_GRAINM]; - data[jistart + 10683] = 0.0 - k[6398]*y_cur[IDX_GRAINM] - - k[6399]*y_cur[IDX_GRAINM] - k[6400]*y_cur[IDX_GRAINM] - - k[6401]*y_cur[IDX_GRAINM]; - data[jistart + 10684] = 0.0 - k[6582]*y_cur[IDX_GRAINM] - - k[6583]*y_cur[IDX_GRAINM]; - data[jistart + 10685] = 0.0 - k[6457]*y_cur[IDX_GRAINM] - - k[6458]*y_cur[IDX_GRAINM]; - data[jistart + 10686] = 0.0 - k[6349]*y_cur[IDX_GRAINM] - - k[6350]*y_cur[IDX_GRAINM]; - data[jistart + 10687] = 0.0 - k[6376]*y_cur[IDX_GRAINM] - - k[6377]*y_cur[IDX_GRAINM]; - data[jistart + 10688] = 0.0 - k[6538]*y_cur[IDX_GRAINM] - - k[6539]*y_cur[IDX_GRAINM]; - data[jistart + 10689] = 0.0 - k[6431]*y_cur[IDX_GRAINM] - - k[6432]*y_cur[IDX_GRAINM]; - data[jistart + 10690] = 0.0 - k[6340]*y_cur[IDX_GRAINM] - - k[6341]*y_cur[IDX_GRAINM] - k[6342]*y_cur[IDX_GRAINM]; - data[jistart + 10691] = 0.0 - k[6545]*y_cur[IDX_GRAINM] - - k[6546]*y_cur[IDX_GRAINM]; - data[jistart + 10692] = 0.0 - k[6622]*y_cur[IDX_GRAINM] - - k[6623]*y_cur[IDX_GRAINM]; - data[jistart + 10693] = 0.0 - k[6446]*y_cur[IDX_GRAINM] - - k[6447]*y_cur[IDX_GRAINM]; - data[jistart + 10694] = 0.0 - k[6763]*y_cur[IDX_GRAINM] - - k[6764]*y_cur[IDX_GRAINM]; - data[jistart + 10695] = 0.0 - k[6585]*y_cur[IDX_GRAINM] - - k[6586]*y_cur[IDX_GRAINM]; - data[jistart + 10696] = 0.0 - k[6310]*y_cur[IDX_GRAINM] - - k[6311]*y_cur[IDX_GRAINM]; - data[jistart + 10697] = 0.0 - k[6666]*y_cur[IDX_GRAINM]; - data[jistart + 10698] = 0.0 - k[6804]*y_cur[IDX_GRAINM] - - k[6805]*y_cur[IDX_GRAINM]; - data[jistart + 10699] = 0.0 - k[6851]*y_cur[IDX_GRAINM] - - k[6852]*y_cur[IDX_GRAINM]; - data[jistart + 10700] = 0.0 - k[6882]*y_cur[IDX_GRAINM] - - k[6883]*y_cur[IDX_GRAINM]; - data[jistart + 10701] = 0.0 - k[6414]*y_cur[IDX_GRAINM] - - k[6415]*y_cur[IDX_GRAINM] - k[6416]*y_cur[IDX_GRAINM] - - k[6417]*y_cur[IDX_GRAINM] - k[6418]*y_cur[IDX_GRAINM]; - data[jistart + 10702] = 0.0 - k[6601]*y_cur[IDX_GRAINM] - - k[6602]*y_cur[IDX_GRAINM]; - data[jistart + 10703] = 0.0 - k[6343]*y_cur[IDX_GRAINM] - - k[6344]*y_cur[IDX_GRAINM] - k[6345]*y_cur[IDX_GRAINM] - - k[6346]*y_cur[IDX_GRAINM]; - data[jistart + 10704] = 0.0 - k[6450]*y_cur[IDX_GRAINM] - - k[6451]*y_cur[IDX_GRAINM] - k[6452]*y_cur[IDX_GRAINM] - - k[6453]*y_cur[IDX_GRAINM]; - data[jistart + 10705] = 0.0 - k[6770]*y_cur[IDX_GRAINM] - - k[6771]*y_cur[IDX_GRAINM]; - data[jistart + 10706] = 0.0 - k[6590]*y_cur[IDX_GRAINM] - - k[6591]*y_cur[IDX_GRAINM]; - data[jistart + 10707] = 0.0 - k[6725]*y_cur[IDX_GRAINM] - - k[6726]*y_cur[IDX_GRAINM]; - data[jistart + 10708] = 0.0 - k[6486]*y_cur[IDX_GRAINM] - - k[6487]*y_cur[IDX_GRAINM] - k[6488]*y_cur[IDX_GRAINM] - - k[6489]*y_cur[IDX_GRAINM]; - data[jistart + 10709] = 0.0 - k[6676]*y_cur[IDX_GRAINM] - - k[6677]*y_cur[IDX_GRAINM]; - data[jistart + 10710] = 0.0 - k[6678]*y_cur[IDX_GRAINM] - - k[6679]*y_cur[IDX_GRAINM]; - data[jistart + 10711] = 0.0 - k[6629]*y_cur[IDX_GRAINM] - - k[6630]*y_cur[IDX_GRAINM] - k[6631]*y_cur[IDX_GRAINM]; - data[jistart + 10712] = 0.0 - k[6637]*y_cur[IDX_GRAINM] - - k[6638]*y_cur[IDX_GRAINM] - k[6639]*y_cur[IDX_GRAINM] - - k[6640]*y_cur[IDX_GRAINM]; - data[jistart + 10713] = 0.0 - k[6648]*y_cur[IDX_GRAINM]; - data[jistart + 10714] = 0.0 - k[6778]*y_cur[IDX_GRAINM] - - k[6779]*y_cur[IDX_GRAINM]; - data[jistart + 10715] = 0.0 - k[6744]*y_cur[IDX_GRAINM]; - data[jistart + 10716] = 0.0 - k[6818]*y_cur[IDX_GRAINM] - - k[6819]*y_cur[IDX_GRAINM] - k[6820]*y_cur[IDX_GRAINM]; - data[jistart + 10717] = 0.0 - k[6787]*y_cur[IDX_GRAINM] - - k[6788]*y_cur[IDX_GRAINM]; - data[jistart + 10718] = 0.0 - k[6791]*y_cur[IDX_GRAINM] - - k[6792]*y_cur[IDX_GRAINM] - k[6793]*y_cur[IDX_GRAINM] - - k[6794]*y_cur[IDX_GRAINM] - k[6795]*y_cur[IDX_GRAINM]; - data[jistart + 10719] = 0.0 - k[6843]*y_cur[IDX_GRAINM] - - k[6844]*y_cur[IDX_GRAINM]; - data[jistart + 10720] = 0.0 - k[6876]*y_cur[IDX_GRAINM] - - k[6877]*y_cur[IDX_GRAINM]; - data[jistart + 10721] = 0.0 - k[6372]*y_cur[IDX_GRAINM]; - data[jistart + 10722] = 0.0 - k[6378]*y_cur[IDX_GRAINM] - - k[6379]*y_cur[IDX_GRAINM] - k[6380]*y_cur[IDX_GRAINM]; - data[jistart + 10723] = 0.0 - k[6514]*y_cur[IDX_GRAINM] - - k[6515]*y_cur[IDX_GRAINM]; - data[jistart + 10724] = 0.0 - k[6532]*y_cur[IDX_GRAINM] - - k[6533]*y_cur[IDX_GRAINM] - k[6534]*y_cur[IDX_GRAINM]; - data[jistart + 10725] = 0.0 - k[6389]*y_cur[IDX_GRAINM]; - data[jistart + 10726] = 0.0 - k[6566]*y_cur[IDX_GRAINM] - - k[6567]*y_cur[IDX_GRAINM] - k[6568]*y_cur[IDX_GRAINM]; - data[jistart + 10727] = 0.0 - k[6699]*y_cur[IDX_GRAINM] - - k[6700]*y_cur[IDX_GRAINM]; - data[jistart + 10728] = 0.0 - k[6574]*y_cur[IDX_GRAINM] - - k[6575]*y_cur[IDX_GRAINM]; - data[jistart + 10729] = 0.0 - k[6610]*y_cur[IDX_GRAINM] - - k[6611]*y_cur[IDX_GRAINM]; - data[jistart + 10730] = 0.0 - k[6543]*y_cur[IDX_GRAINM] - - k[6544]*y_cur[IDX_GRAINM]; - data[jistart + 10731] = 0.0 - k[6554]*y_cur[IDX_GRAINM] - - k[6555]*y_cur[IDX_GRAINM]; - data[jistart + 10732] = 0.0 - k[6490]*y_cur[IDX_GRAINM] - - k[6491]*y_cur[IDX_GRAINM]; - data[jistart + 10733] = 0.0 - k[6456]*y_cur[IDX_GRAINM]; - data[jistart + 10734] = 0.0 - k[6348]*y_cur[IDX_GRAINM]; - data[jistart + 10735] = 0.0 - k[6558]*y_cur[IDX_GRAINM] - - k[6559]*y_cur[IDX_GRAINM]; - data[jistart + 10736] = 0.0 - k[6522]*y_cur[IDX_GRAINM] - - k[6523]*y_cur[IDX_GRAINM]; - data[jistart + 10737] = 0.0 - k[6549]*y_cur[IDX_GRAINM] - - k[6550]*y_cur[IDX_GRAINM] - k[6551]*y_cur[IDX_GRAINM]; - data[jistart + 10738] = 0.0 - k[6422]*y_cur[IDX_GRAINM]; - data[jistart + 10739] = 0.0 - k[6589]*y_cur[IDX_GRAINM]; - data[jistart + 10740] = 0.0 - k[6512]*y_cur[IDX_GRAINM] - - k[6513]*y_cur[IDX_GRAINM]; - data[jistart + 10741] = 0.0 - k[6390]*y_cur[IDX_GRAINM]; - data[jistart + 10742] = 0.0 - k[6524]*y_cur[IDX_GRAINM] - - k[6525]*y_cur[IDX_GRAINM]; - data[jistart + 10743] = 0.0 - k[6717]*y_cur[IDX_GRAINM] - - k[6718]*y_cur[IDX_GRAINM]; - data[jistart + 10744] = 0.0 - k[6520]*y_cur[IDX_GRAINM] - - k[6521]*y_cur[IDX_GRAINM]; - data[jistart + 10745] = 0.0 - k[6571]*y_cur[IDX_GRAINM] - - k[6572]*y_cur[IDX_GRAINM] - k[6573]*y_cur[IDX_GRAINM]; - data[jistart + 10746] = 0.0 - k[6612]*y_cur[IDX_GRAINM] - - k[6613]*y_cur[IDX_GRAINM] - k[6614]*y_cur[IDX_GRAINM]; - data[jistart + 10747] = 0.0 - k[6445]*y_cur[IDX_GRAINM]; - data[jistart + 10748] = 0.0 - k[6758]*y_cur[IDX_GRAINM] - - k[6759]*y_cur[IDX_GRAINM]; - data[jistart + 10749] = 0.0 - k[6625]*y_cur[IDX_GRAINM]; - data[jistart + 10750] = 0.0 - k[6755]*y_cur[IDX_GRAINM] - - k[6756]*y_cur[IDX_GRAINM] - k[6757]*y_cur[IDX_GRAINM]; - data[jistart + 10751] = 0.0 - k[6723]*y_cur[IDX_GRAINM] - - k[6724]*y_cur[IDX_GRAINM]; - data[jistart + 10752] = 0.0 - k[6719]*y_cur[IDX_GRAINM] - - k[6720]*y_cur[IDX_GRAINM]; - data[jistart + 10753] = 0.0 - k[6312]*y_cur[IDX_GRAINM]; - data[jistart + 10754] = 0.0 - k[6313]*y_cur[IDX_GRAINM]; - data[jistart + 10755] = 0.0 - k[6353]*y_cur[IDX_GRAINM]; - data[jistart + 10756] = 0.0 - k[6319]*y_cur[IDX_GRAINM]; - data[jistart + 10757] = 0.0 - k[6375]*y_cur[IDX_GRAINM]; - data[jistart + 10758] = 0.0 - k[6396]*y_cur[IDX_GRAINM] - - k[6397]*y_cur[IDX_GRAINM]; - data[jistart + 10759] = 0.0 - k[6528]*y_cur[IDX_GRAINM] - - k[6529]*y_cur[IDX_GRAINM] - k[6530]*y_cur[IDX_GRAINM]; - data[jistart + 10760] = 0.0 - k[6769]*y_cur[IDX_GRAINM]; - data[jistart + 10761] = 0.0 - k[6652]*y_cur[IDX_GRAINM] - - k[6653]*y_cur[IDX_GRAINM]; - data[jistart + 10762] = 0.0 - k[6320]*y_cur[IDX_GRAINM]; - data[jistart + 10763] = 0.0 - k[6324]*y_cur[IDX_GRAINM] - - k[6325]*y_cur[IDX_GRAINM]; - data[jistart + 10764] = 0.0 - k[6526]*y_cur[IDX_GRAINM] - - k[6527]*y_cur[IDX_GRAINM]; - data[jistart + 10765] = 0.0 - k[6330]*y_cur[IDX_GRAINM] - - k[6331]*y_cur[IDX_GRAINM]; - data[jistart + 10766] = 0.0 - k[6337]*y_cur[IDX_GRAINM] - - k[6338]*y_cur[IDX_GRAINM] - k[6339]*y_cur[IDX_GRAINM]; - data[jistart + 10767] = 0.0 - k[6407]*y_cur[IDX_GRAINM]; - data[jistart + 10768] = 0.0 - k[6584]*y_cur[IDX_GRAINM]; - data[jistart + 10769] = 0.0 - k[6581]*y_cur[IDX_GRAINM]; - data[jistart + 10770] = 0.0 - k[6351]*y_cur[IDX_GRAINM]; - data[jistart + 10771] = 0.0 - k[6326]*y_cur[IDX_GRAINM]; - data[jistart + 10772] = 0.0 - k[6425]*y_cur[IDX_GRAINM]; - data[jistart + 10773] = 0.0 - k[6437]*y_cur[IDX_GRAINM]; - data[jistart + 10774] = 0.0 - k[6495]*y_cur[IDX_GRAINM]; - data[jistart + 10775] = 0.0 - k[6706]*y_cur[IDX_GRAINM] - - k[6707]*y_cur[IDX_GRAINM] - k[6708]*y_cur[IDX_GRAINM]; - data[jistart + 10776] = 0.0 - k[6329]*y_cur[IDX_GRAINM]; - data[jistart + 10777] = 0.0 - k[6421]*y_cur[IDX_GRAINM]; - data[jistart + 10778] = 0.0 - k[6680]*y_cur[IDX_GRAINM] - - k[6681]*y_cur[IDX_GRAINM] - k[6682]*y_cur[IDX_GRAINM]; - data[jistart + 10779] = 0.0 - k[6685]*y_cur[IDX_GRAINM] - - k[6686]*y_cur[IDX_GRAINM] - k[6687]*y_cur[IDX_GRAINM]; - data[jistart + 10780] = 0.0 - k[6689]*y_cur[IDX_GRAINM] - - k[6690]*y_cur[IDX_GRAINM] - k[6691]*y_cur[IDX_GRAINM]; - data[jistart + 10781] = 0.0 - k[6772]*y_cur[IDX_GRAINM] - - k[6773]*y_cur[IDX_GRAINM] - k[6774]*y_cur[IDX_GRAINM]; - data[jistart + 10782] = 0.0 - k[6811]*y_cur[IDX_GRAINM] - - k[6812]*y_cur[IDX_GRAINM] - k[6813]*y_cur[IDX_GRAINM] - - k[6814]*y_cur[IDX_GRAINM]; - data[jistart + 10783] = 0.0 - k[6569]*y_cur[IDX_GRAINM] - - k[6570]*y_cur[IDX_GRAINM]; - data[jistart + 10784] = 0.0 - k[6578]*y_cur[IDX_GRAINM] - - k[6579]*y_cur[IDX_GRAINM] - k[6580]*y_cur[IDX_GRAINM]; - data[jistart + 10785] = 0.0 - k[6596]*y_cur[IDX_GRAINM] - - k[6597]*y_cur[IDX_GRAINM] - k[6598]*y_cur[IDX_GRAINM]; - data[jistart + 10786] = 0.0 - k[6433]*y_cur[IDX_GRAINM]; - data[jistart + 10787] = 0.0 - k[6434]*y_cur[IDX_GRAINM] - - k[6435]*y_cur[IDX_GRAINM] - k[6436]*y_cur[IDX_GRAINM]; - data[jistart + 10788] = 0.0 - k[6448]*y_cur[IDX_GRAINM] - - k[6449]*y_cur[IDX_GRAINM]; - data[jistart + 10789] = 0.0 - k[6560]*y_cur[IDX_GRAINM]; - data[jistart + 10790] = 0.0 - k[6593]*y_cur[IDX_GRAINM] - - k[6594]*y_cur[IDX_GRAINM] - k[6595]*y_cur[IDX_GRAINM]; - data[jistart + 10791] = 0.0 - k[6617]*y_cur[IDX_GRAINM] - - k[6618]*y_cur[IDX_GRAINM] - k[6619]*y_cur[IDX_GRAINM]; - data[jistart + 10792] = 0.0 - k[6600]*y_cur[IDX_GRAINM]; - data[jistart + 10793] = 0.0 - k[6424]*y_cur[IDX_GRAINM]; - data[jistart + 10794] = 0.0 - k[6752]*y_cur[IDX_GRAINM]; - data[jistart + 10795] = 0.0 - k[6620]*y_cur[IDX_GRAINM]; - data[jistart + 10796] = 0.0 - k[6750]*y_cur[IDX_GRAINM] - - k[6751]*y_cur[IDX_GRAINM]; - data[jistart + 10797] = 0.0 - k[6374]*y_cur[IDX_GRAINM]; - data[jistart + 10798] = 0.0 - k[6481]*y_cur[IDX_GRAINM]; - data[jistart + 10799] = 0.0 - k[6642]*y_cur[IDX_GRAINM] - - k[6643]*y_cur[IDX_GRAINM]; - data[jistart + 10800] = 0.0 - k[6649]*y_cur[IDX_GRAINM] - - k[6650]*y_cur[IDX_GRAINM]; - data[jistart + 10801] = 0.0 - k[6660]*y_cur[IDX_GRAINM] - - k[6661]*y_cur[IDX_GRAINM]; - data[jistart + 10802] = 0.0 - k[6664]*y_cur[IDX_GRAINM] - - k[6665]*y_cur[IDX_GRAINM]; - data[jistart + 10803] = 0.0 - k[6746]*y_cur[IDX_GRAINM] - - k[6747]*y_cur[IDX_GRAINM]; - data[jistart + 10804] = 0.0 - k[6761]*y_cur[IDX_GRAINM] - - k[6762]*y_cur[IDX_GRAINM]; - data[jistart + 10805] = 0.0 - k[6767]*y_cur[IDX_GRAINM] - - k[6768]*y_cur[IDX_GRAINM]; - data[jistart + 10806] = 0.0 - k[6798]*y_cur[IDX_GRAINM] - - k[6799]*y_cur[IDX_GRAINM]; - data[jistart + 10807] = 0.0 - k[6800]*y_cur[IDX_GRAINM] - - k[6801]*y_cur[IDX_GRAINM]; - data[jistart + 10808] = 0.0 - k[6496]*y_cur[IDX_GRAINM] - - k[6497]*y_cur[IDX_GRAINM] - k[6498]*y_cur[IDX_GRAINM]; - data[jistart + 10809] = 0.0 - k[6516]*y_cur[IDX_GRAINM] - - k[6517]*y_cur[IDX_GRAINM]; - data[jistart + 10810] = 0.0 - k[6541]*y_cur[IDX_GRAINM] - - k[6542]*y_cur[IDX_GRAINM]; - data[jistart + 10811] = 0.0 - k[6592]*y_cur[IDX_GRAINM]; - data[jistart + 10812] = 0.0 - k[6388]*y_cur[IDX_GRAINM]; - data[jistart + 10813] = 0.0 - k[6402]*y_cur[IDX_GRAINM] - - k[6403]*y_cur[IDX_GRAINM] - k[6404]*y_cur[IDX_GRAINM]; - data[jistart + 10814] = 0.0 - k[6412]*y_cur[IDX_GRAINM] - - k[6413]*y_cur[IDX_GRAINM]; - data[jistart + 10815] = 0.0 - k[6426]*y_cur[IDX_GRAINM] - - k[6427]*y_cur[IDX_GRAINM]; - data[jistart + 10816] = 0.0 - k[6438]*y_cur[IDX_GRAINM] - - k[6439]*y_cur[IDX_GRAINM]; - data[jistart + 10817] = 0.0 - k[6501]*y_cur[IDX_GRAINM]; - data[jistart + 10818] = 0.0 - k[6654]*y_cur[IDX_GRAINM]; - data[jistart + 10819] = 0.0 - k[6668]*y_cur[IDX_GRAINM] - - k[6669]*y_cur[IDX_GRAINM]; - data[jistart + 10820] = 0.0 - k[6552]*y_cur[IDX_GRAINM] - - k[6553]*y_cur[IDX_GRAINM]; - data[jistart + 10821] = 0.0 - k[6531]*y_cur[IDX_GRAINM]; - data[jistart + 10822] = 0.0 - k[6556]*y_cur[IDX_GRAINM] - - k[6557]*y_cur[IDX_GRAINM]; - data[jistart + 10823] = 0.0 - k[6710]*y_cur[IDX_GRAINM]; - data[jistart + 10824] = 0.0 + k[8763]*y_cur[IDX_GRAIN0I]; - data[jistart + 10825] = 0.0 + k[6314]*y_cur[IDX_GRAINM]; - data[jistart + 10826] = 0.0 + k[6869]*y_cur[IDX_GRAINM] + - k[6870]*y_cur[IDX_GRAINM]; - data[jistart + 10827] = 0.0 + k[6871]*y_cur[IDX_GRAINM] + - k[6872]*y_cur[IDX_GRAINM] + k[6873]*y_cur[IDX_GRAINM]; - data[jistart + 10828] = 0.0 + k[6874]*y_cur[IDX_GRAINM]; - data[jistart + 10829] = 0.0 + k[6878]*y_cur[IDX_GRAINM] + - k[6879]*y_cur[IDX_GRAINM]; - data[jistart + 10830] = 0.0 + k[6884]*y_cur[IDX_GRAINM] + - k[6885]*y_cur[IDX_GRAINM] + k[6886]*y_cur[IDX_GRAINM] + - k[6887]*y_cur[IDX_GRAINM]; - data[jistart + 10831] = 0.0 + k[6352]*y_cur[IDX_GRAINM]; - data[jistart + 10832] = 0.0 + k[6354]*y_cur[IDX_GRAINM] + - k[6355]*y_cur[IDX_GRAINM]; - data[jistart + 10833] = 0.0 + k[6356]*y_cur[IDX_GRAINM] + - k[6357]*y_cur[IDX_GRAINM] + k[6358]*y_cur[IDX_GRAINM]; - data[jistart + 10834] = 0.0 + k[6360]*y_cur[IDX_GRAINM] + - k[6361]*y_cur[IDX_GRAINM] + k[6362]*y_cur[IDX_GRAINM] + - k[6363]*y_cur[IDX_GRAINM] + k[6364]*y_cur[IDX_GRAINM] + + data[jistart + 14241] = 0.0 + k[1524]*y_cur[IDX_C2H2II]; + data[jistart + 14242] = 0.0 + k[1384]*y_cur[IDX_CII] + k[1941]*y_cur[IDX_CHII] - + k[2156]*y_cur[IDX_C2H3II] + k[2160]*y_cur[IDX_C3HII] + + k[2172]*y_cur[IDX_C4NII] + k[2199]*y_cur[IDX_HCNII]; + data[jistart + 14243] = 0.0 - k[1726]*y_cur[IDX_C2H3II] - k[1727]*y_cur[IDX_C2H3II] - + k[1728]*y_cur[IDX_C2H3II]; + data[jistart + 14244] = 0.0 - k[2861]*y_cur[IDX_C2H3II]; + data[jistart + 14245] = 0.0 - k[1625]*y_cur[IDX_C2H3II]; + data[jistart + 14246] = 0.0 - k[3557]*y_cur[IDX_C2H3II]; + data[jistart + 14247] = 0.0 + k[214]*y_cur[IDX_C2H3I] + k[1519]*y_cur[IDX_H2SI] + + k[1524]*y_cur[IDX_HCOI] + k[2403]*y_cur[IDX_H2I]; + data[jistart + 14248] = 0.0 + k[269]*y_cur[IDX_C2H3I] + k[1999]*y_cur[IDX_CH2I] + + k[2045]*y_cur[IDX_C2H4I]; + data[jistart + 14249] = 0.0 - k[1535]*y_cur[IDX_C2H3II] + k[1566]*y_cur[IDX_HCOII] + + k[1567]*y_cur[IDX_HCO2II] + k[1568]*y_cur[IDX_N2HII] + + k[2133]*y_cur[IDX_CH4II] + k[2218]*y_cur[IDX_CH5II] + + k[2370]*y_cur[IDX_H2II] + k[2587]*y_cur[IDX_H3II]; + data[jistart + 14250] = 0.0 - k[3390]*y_cur[IDX_C2H3II]; + data[jistart + 14251] = 0.0 - k[3690]*y_cur[IDX_C2H3II]; + data[jistart + 14252] = 0.0 + k[3081]*y_cur[IDX_C2H4I] + k[3083]*y_cur[IDX_C2H5I] + + k[3165]*y_cur[IDX_CH2CHCNI] + k[3189]*y_cur[IDX_C2H6I]; + data[jistart + 14253] = 0.0 + k[1302]*y_cur[IDX_C2H4I] + k[1354]*y_cur[IDX_CH3C3NI] + + k[1364]*y_cur[IDX_CH3CCHI] + k[1368]*y_cur[IDX_C2H6I] + + k[1374]*y_cur[IDX_CH3CHCH2I] + k[1379]*y_cur[IDX_CH3CNI] + + k[1384]*y_cur[IDX_CH4I]; + data[jistart + 14254] = 0.0 - k[2523]*y_cur[IDX_C2H3II] + k[2528]*y_cur[IDX_C3HII]; + data[jistart + 14255] = 0.0 + k[325]*y_cur[IDX_C2H3I] + k[327]*y_cur[IDX_C2H5I] + + k[2297]*y_cur[IDX_C2H4I] + k[2326]*y_cur[IDX_C2H6I]; + data[jistart + 14256] = 0.0 - k[1851]*y_cur[IDX_C2H3II] - k[1852]*y_cur[IDX_C2H3II]; + data[jistart + 14257] = 0.0 + k[1566]*y_cur[IDX_C2H2I]; + data[jistart + 14258] = 0.0 + k[2587]*y_cur[IDX_C2H2I] + k[2589]*y_cur[IDX_C2H4I] + + k[2592]*y_cur[IDX_C2H5OHI] + k[2649]*y_cur[IDX_CH3CHCH2I] + + k[2651]*y_cur[IDX_CH3CHOI] + k[2659]*y_cur[IDX_CH3COCH3I]; + data[jistart + 14259] = 0.0 - k[5513]*y_cur[IDX_C2H3II]; + data[jistart + 14260] = 0.0 - k[6360]*y_cur[IDX_C2H3II] - k[6361]*y_cur[IDX_C2H3II] - + k[6362]*y_cur[IDX_C2H3II] - k[6363]*y_cur[IDX_C2H3II] - + k[6364]*y_cur[IDX_C2H3II] - k[6365]*y_cur[IDX_C2H3II] - + k[6366]*y_cur[IDX_C2H3II] - k[6367]*y_cur[IDX_C2H3II] - + k[6368]*y_cur[IDX_C2H3II] - k[6369]*y_cur[IDX_C2H3II] - + k[6370]*y_cur[IDX_C2H3II] - k[6371]*y_cur[IDX_C2H3II]; + data[jistart + 14261] = 0.0 + k[2403]*y_cur[IDX_C2H2II]; + data[jistart + 14262] = 0.0 - k[745]*y_cur[IDX_C2H3II] - k[746]*y_cur[IDX_C2H3II] - + k[747]*y_cur[IDX_C2H3II] - k[748]*y_cur[IDX_C2H3II] - + k[749]*y_cur[IDX_C2H3II] - k[750]*y_cur[IDX_C2H3II] - + k[751]*y_cur[IDX_C2H3II] - k[752]*y_cur[IDX_C2H3II] - + k[753]*y_cur[IDX_C2H3II] - k[754]*y_cur[IDX_C2H3II] - + k[755]*y_cur[IDX_C2H3II] - k[756]*y_cur[IDX_C2H3II]; + data[jistart + 14263] = 0.0 - k[2827]*y_cur[IDX_C2H3II] + k[2828]*y_cur[IDX_C2H4II]; + data[jistart + 14264] = 0.0 + k[994]*y_cur[IDX_eM] + k[6536]*y_cur[IDX_GRAINM]; + data[jistart + 14265] = 0.0 + k[1011]*y_cur[IDX_eM] + k[6432]*y_cur[IDX_GRAINM]; + data[jistart + 14266] = 0.0 + k[1092]*y_cur[IDX_eM] + k[6514]*y_cur[IDX_GRAINM]; + data[jistart + 14267] = 0.0 + k[1169]*y_cur[IDX_eM] + k[6584]*y_cur[IDX_GRAINM]; + data[jistart + 14268] = 0.0 + k[1171]*y_cur[IDX_eM] + k[6529]*y_cur[IDX_GRAINM]; + data[jistart + 14269] = 0.0 + k[5389]*y_cur[IDX_OI]; + data[jistart + 14270] = 0.0 + k[2343]*y_cur[IDX_HII] + k[5202]*y_cur[IDX_CI] + k[5855] + + k[6182]; + data[jistart + 14271] = 0.0 + k[7107] + k[7289] + k[7471]; + data[jistart + 14272] = 0.0 + k[5002]*y_cur[IDX_CH2I] + k[5120]*y_cur[IDX_CNI] + + k[5129]*y_cur[IDX_COI] + k[5185]*y_cur[IDX_HI] + + k[5277]*y_cur[IDX_NI] + k[5277]*y_cur[IDX_NI] + + k[5311]*y_cur[IDX_NHI] + k[5423]*y_cur[IDX_OI] + k[5890] + k[6227]; + data[jistart + 14273] = 0.0 + k[5287]*y_cur[IDX_NI]; + data[jistart + 14274] = 0.0 - k[630]*y_cur[IDX_NOI]; + data[jistart + 14275] = 0.0 + k[5450]*y_cur[IDX_OI]; + data[jistart + 14276] = 0.0 + k[5425]*y_cur[IDX_OI]; + data[jistart + 14277] = 0.0 + k[3266]*y_cur[IDX_HeII] + k[5000]*y_cur[IDX_CH2I] + + k[5034]*y_cur[IDX_CH3I] + k[5078]*y_cur[IDX_CHI] + + k[5119]*y_cur[IDX_CNI] + k[5176]*y_cur[IDX_HI] + + k[5206]*y_cur[IDX_HCOI] + k[5270]*y_cur[IDX_NI] - + k[5326]*y_cur[IDX_NOI] + k[5412]*y_cur[IDX_OI] + + k[5472]*y_cur[IDX_OHI] + k[5869] + k[6200]; + data[jistart + 14278] = 0.0 + k[3278]*y_cur[IDX_HeII] + k[5180]*y_cur[IDX_HI] - + k[5327]*y_cur[IDX_NOI] + k[5418]*y_cur[IDX_OI] + + k[5418]*y_cur[IDX_OI] + k[5473]*y_cur[IDX_OHI] + k[5879] + k[6214]; + data[jistart + 14279] = 0.0 - k[5331]*y_cur[IDX_NOI] - k[5332]*y_cur[IDX_NOI] + + k[5335]*y_cur[IDX_O2I] + k[5428]*y_cur[IDX_OI]; + data[jistart + 14280] = 0.0 - k[623]*y_cur[IDX_NOI]; + data[jistart + 14281] = 0.0 + k[3635]*y_cur[IDX_OII]; + data[jistart + 14282] = 0.0 - k[3627]*y_cur[IDX_NOI]; + data[jistart + 14283] = 0.0 - k[626]*y_cur[IDX_NOI] + k[1121]*y_cur[IDX_eM] + + k[1460]*y_cur[IDX_C2I] + k[1747]*y_cur[IDX_C2HI] + + k[1907]*y_cur[IDX_CI] + k[2009]*y_cur[IDX_CH2I] + + k[2202]*y_cur[IDX_CH4I] + k[2254]*y_cur[IDX_CHI] + + k[2278]*y_cur[IDX_CNI] + k[2286]*y_cur[IDX_COI] + + k[2497]*y_cur[IDX_H2COI] + k[2550]*y_cur[IDX_H2OI] + + k[2878]*y_cur[IDX_HCNI] + k[3008]*y_cur[IDX_HCOI] + + k[3042]*y_cur[IDX_HNCI] + k[3049]*y_cur[IDX_CO2I] + + k[3050]*y_cur[IDX_SI] + k[3366]*y_cur[IDX_N2I] + + k[3543]*y_cur[IDX_NH2I] + k[3588]*y_cur[IDX_NH3I] + + k[3615]*y_cur[IDX_NHI] + k[3803]*y_cur[IDX_OHI] + + k[6422]*y_cur[IDX_GRAINM]; + data[jistart + 14284] = 0.0 - k[303]*y_cur[IDX_NOI] + k[2269]*y_cur[IDX_CO2I] - + k[2274]*y_cur[IDX_NOI]; + data[jistart + 14285] = 0.0 + k[8702]*y_cur[IDX_GOI]; + data[jistart + 14286] = 0.0 + k[8702]*y_cur[IDX_GNI]; + data[jistart + 14287] = 0.0 - k[569]*y_cur[IDX_NOI]; + data[jistart + 14288] = 0.0 - k[494]*y_cur[IDX_NOI]; + data[jistart + 14289] = 0.0 - k[206]*y_cur[IDX_NOI]; + data[jistart + 14290] = 0.0 - k[627]*y_cur[IDX_NOI]; + data[jistart + 14291] = 0.0 - k[577]*y_cur[IDX_NOI] - k[3500]*y_cur[IDX_NOI]; + data[jistart + 14292] = 0.0 + k[4788]*y_cur[IDX_NOII]; + data[jistart + 14293] = 0.0 + k[4647]*y_cur[IDX_NOII]; + data[jistart + 14294] = 0.0 - k[454]*y_cur[IDX_NOI] - k[2394]*y_cur[IDX_NOI]; + data[jistart + 14295] = 0.0 + k[3359]*y_cur[IDX_NII]; + data[jistart + 14296] = 0.0 - k[583]*y_cur[IDX_NOI]; + data[jistart + 14297] = 0.0 + k[4858]*y_cur[IDX_NOII]; + data[jistart + 14298] = 0.0 + k[4052]*y_cur[IDX_NOII]; + data[jistart + 14299] = 0.0 + k[4227]*y_cur[IDX_NOII]; + data[jistart + 14300] = 0.0 - k[311]*y_cur[IDX_NOI]; + data[jistart + 14301] = 0.0 + k[4823]*y_cur[IDX_NOII]; + data[jistart + 14302] = 0.0 + k[3982]*y_cur[IDX_NOII]; + data[jistart + 14303] = 0.0 + k[4122]*y_cur[IDX_NOII]; + data[jistart + 14304] = 0.0 + k[4402]*y_cur[IDX_NOII]; + data[jistart + 14305] = 0.0 + k[4542]*y_cur[IDX_NOII]; + data[jistart + 14306] = 0.0 + k[4472]*y_cur[IDX_NOII]; + data[jistart + 14307] = 0.0 + k[4612]*y_cur[IDX_NOII]; + data[jistart + 14308] = 0.0 + k[3947]*y_cur[IDX_NOII]; + data[jistart + 14309] = 0.0 + k[4297]*y_cur[IDX_NOII]; + data[jistart + 14310] = 0.0 + k[4332]*y_cur[IDX_NOII]; + data[jistart + 14311] = 0.0 - k[1449]*y_cur[IDX_NOI] + k[3912]*y_cur[IDX_NOII]; + data[jistart + 14312] = 0.0 + k[122]*y_cur[IDX_NI] - k[125]*y_cur[IDX_NOI] + + k[4753]*y_cur[IDX_NOII]; + data[jistart + 14313] = 0.0 + k[4577]*y_cur[IDX_NOII]; + data[jistart + 14314] = 0.0 + k[3339]*y_cur[IDX_NII]; + data[jistart + 14315] = 0.0 + k[4718]*y_cur[IDX_NOII]; + data[jistart + 14316] = 0.0 - k[621]*y_cur[IDX_NOI] - k[3626]*y_cur[IDX_NOI]; + data[jistart + 14317] = 0.0 + k[4507]*y_cur[IDX_NOII]; + data[jistart + 14318] = 0.0 + k[4017]*y_cur[IDX_NOII]; + data[jistart + 14319] = 0.0 + k[4087]*y_cur[IDX_NOII]; + data[jistart + 14320] = 0.0 + k[4192]*y_cur[IDX_NOII]; + data[jistart + 14321] = 0.0 + k[4367]*y_cur[IDX_NOII]; + data[jistart + 14322] = 0.0 + k[4262]*y_cur[IDX_NOII]; + data[jistart + 14323] = 0.0 + k[4437]*y_cur[IDX_NOII]; + data[jistart + 14324] = 0.0 - k[631]*y_cur[IDX_NOI] + k[3476]*y_cur[IDX_NI]; + data[jistart + 14325] = 0.0 + k[3543]*y_cur[IDX_HNOII] - k[5298]*y_cur[IDX_NOI] - + k[5299]*y_cur[IDX_NOI]; + data[jistart + 14326] = 0.0 - k[212]*y_cur[IDX_NOI]; + data[jistart + 14327] = 0.0 - k[258]*y_cur[IDX_NOI]; + data[jistart + 14328] = 0.0 - k[693]*y_cur[IDX_NOI] - k[3787]*y_cur[IDX_NOI]; + data[jistart + 14329] = 0.0 - k[472]*y_cur[IDX_NOI]; + data[jistart + 14330] = 0.0 + k[4157]*y_cur[IDX_NOII]; + data[jistart + 14331] = 0.0 - k[254]*y_cur[IDX_NOI]; + data[jistart + 14332] = 0.0 + k[2269]*y_cur[IDX_CNII] + k[3049]*y_cur[IDX_HNOII] + + k[3343]*y_cur[IDX_NII] + k[5262]*y_cur[IDX_NI]; + data[jistart + 14333] = 0.0 - k[628]*y_cur[IDX_NOI]; + data[jistart + 14334] = 0.0 + k[620]*y_cur[IDX_NOII]; + data[jistart + 14335] = 0.0 + k[536]*y_cur[IDX_NOII]; + data[jistart + 14336] = 0.0 + k[641]*y_cur[IDX_NOII]; + data[jistart + 14337] = 0.0 + k[3615]*y_cur[IDX_HNOII] + k[5311]*y_cur[IDX_NO2I] - + k[5313]*y_cur[IDX_NOI] - k[5314]*y_cur[IDX_NOI] - + k[5315]*y_cur[IDX_NOI] + k[5317]*y_cur[IDX_O2I] + + k[5318]*y_cur[IDX_OI] + k[5319]*y_cur[IDX_OI]; + data[jistart + 14338] = 0.0 + k[4682]*y_cur[IDX_NOII]; + data[jistart + 14339] = 0.0 + k[5291]*y_cur[IDX_NI]; + data[jistart + 14340] = 0.0 - k[625]*y_cur[IDX_NOI]; + data[jistart + 14341] = 0.0 - k[560]*y_cur[IDX_NOI] + k[3339]*y_cur[IDX_CH3OHI] + + k[3343]*y_cur[IDX_CO2I] - k[3356]*y_cur[IDX_NOI] + + k[3358]*y_cur[IDX_O2I] + k[3359]*y_cur[IDX_OCSI]; + data[jistart + 14342] = 0.0 - k[624]*y_cur[IDX_NOI]; + data[jistart + 14343] = 0.0 + k[536]*y_cur[IDX_MgI] + k[620]*y_cur[IDX_FeI] + + k[641]*y_cur[IDX_NaI] + k[721]*y_cur[IDX_SiI] + + k[3912]*y_cur[IDX_CM] + k[3947]*y_cur[IDX_C10M] + + k[3982]*y_cur[IDX_C10HM] + k[4017]*y_cur[IDX_C2M] + + k[4052]*y_cur[IDX_C2HM] + k[4087]*y_cur[IDX_C3M] + + k[4122]*y_cur[IDX_C3HM] + k[4157]*y_cur[IDX_C3NM] + + k[4192]*y_cur[IDX_C4M] + k[4227]*y_cur[IDX_C4HM] + + k[4262]*y_cur[IDX_C5M] + k[4297]*y_cur[IDX_C5HM] + + k[4332]*y_cur[IDX_C5NM] + k[4367]*y_cur[IDX_C6M] + + k[4402]*y_cur[IDX_C6HM] + k[4437]*y_cur[IDX_C7M] + + k[4472]*y_cur[IDX_C7HM] + k[4507]*y_cur[IDX_C8M] + + k[4542]*y_cur[IDX_C8HM] + k[4577]*y_cur[IDX_C9M] + + k[4612]*y_cur[IDX_C9HM] + k[4647]*y_cur[IDX_CHM] + + k[4682]*y_cur[IDX_CNM] + k[4718]*y_cur[IDX_HM] + + k[4753]*y_cur[IDX_OM] + k[4788]*y_cur[IDX_O2M] + + k[4823]*y_cur[IDX_OHM] + k[4858]*y_cur[IDX_SM]; + data[jistart + 14344] = 0.0 + k[3635]*y_cur[IDX_CH3CNI]; + data[jistart + 14345] = 0.0 - k[622]*y_cur[IDX_NOI]; + data[jistart + 14346] = 0.0 + k[2009]*y_cur[IDX_HNOII] + k[5000]*y_cur[IDX_HNOI] + + k[5002]*y_cur[IDX_NO2I] - k[5003]*y_cur[IDX_NOI] - + k[5004]*y_cur[IDX_NOI] - k[5005]*y_cur[IDX_NOI] - + k[5006]*y_cur[IDX_NOI]; + data[jistart + 14347] = 0.0 + k[3042]*y_cur[IDX_HNOII]; + data[jistart + 14348] = 0.0 - k[595]*y_cur[IDX_NOI]; + data[jistart + 14349] = 0.0 + k[3366]*y_cur[IDX_HNOII] + k[5417]*y_cur[IDX_OI]; + data[jistart + 14350] = 0.0 + k[3358]*y_cur[IDX_NII] + k[5123]*y_cur[IDX_CNI] + + k[5281]*y_cur[IDX_NI] + k[5317]*y_cur[IDX_NHI] - + k[5330]*y_cur[IDX_NOI] + k[5335]*y_cur[IDX_OCNI]; + data[jistart + 14351] = 0.0 - k[629]*y_cur[IDX_NOI]; + data[jistart + 14352] = 0.0 + k[721]*y_cur[IDX_NOII] - k[5493]*y_cur[IDX_NOI]; + data[jistart + 14353] = 0.0 - k[125]*y_cur[IDX_OM] - k[186]*y_cur[IDX_CII] - + k[206]*y_cur[IDX_C2II] - k[212]*y_cur[IDX_C2HII] - + k[226]*y_cur[IDX_C2H2II] - k[254]*y_cur[IDX_CHII] - + k[258]*y_cur[IDX_CH2II] - k[274]*y_cur[IDX_CH3II] - + k[303]*y_cur[IDX_CNII] - k[311]*y_cur[IDX_COII] - + k[403]*y_cur[IDX_HII] - k[454]*y_cur[IDX_H2II] - + k[472]*y_cur[IDX_H2OII] - k[494]*y_cur[IDX_HCNII] - + k[560]*y_cur[IDX_NII] - k[569]*y_cur[IDX_N2II] - + k[577]*y_cur[IDX_NHII] - k[583]*y_cur[IDX_NH2II] - + k[595]*y_cur[IDX_NH3II] - k[621]*y_cur[IDX_C3HII] - + k[622]*y_cur[IDX_C4H2II] - k[623]*y_cur[IDX_CO2II] - + k[624]*y_cur[IDX_H2COII] - k[625]*y_cur[IDX_H2SII] - + k[626]*y_cur[IDX_HNOII] - k[627]*y_cur[IDX_HSII] - + k[628]*y_cur[IDX_O2II] - k[629]*y_cur[IDX_SII] - + k[630]*y_cur[IDX_S2II] - k[631]*y_cur[IDX_SiOII] - + k[693]*y_cur[IDX_OHII] - k[1449]*y_cur[IDX_CM] - + k[2274]*y_cur[IDX_CNII] - k[2394]*y_cur[IDX_H2II] - + k[2726]*y_cur[IDX_H3II] - k[3286]*y_cur[IDX_HeII] - + k[3287]*y_cur[IDX_HeII] - k[3356]*y_cur[IDX_NII] - + k[3500]*y_cur[IDX_NHII] - k[3626]*y_cur[IDX_C3HII] - + k[3627]*y_cur[IDX_O2HII] - k[3787]*y_cur[IDX_OHII] - + k[4878]*y_cur[IDX_C2H2I] - k[4974]*y_cur[IDX_CI] - + k[4975]*y_cur[IDX_CI] - k[5003]*y_cur[IDX_CH2I] - + k[5004]*y_cur[IDX_CH2I] - k[5005]*y_cur[IDX_CH2I] - + k[5006]*y_cur[IDX_CH2I] - k[5038]*y_cur[IDX_CH3I] - + k[5083]*y_cur[IDX_CHI] - k[5084]*y_cur[IDX_CHI] - + k[5085]*y_cur[IDX_CHI] - k[5121]*y_cur[IDX_CNI] - + k[5122]*y_cur[IDX_CNI] - k[5186]*y_cur[IDX_HI] - + k[5187]*y_cur[IDX_HI] - k[5207]*y_cur[IDX_HCOI] - + k[5279]*y_cur[IDX_NI] - k[5298]*y_cur[IDX_NH2I] - + k[5299]*y_cur[IDX_NH2I] - k[5313]*y_cur[IDX_NHI] - + k[5314]*y_cur[IDX_NHI] - k[5315]*y_cur[IDX_NHI] - + k[5326]*y_cur[IDX_HNOI] - k[5327]*y_cur[IDX_N2OI] - + k[5328]*y_cur[IDX_NOI] - k[5328]*y_cur[IDX_NOI] - + k[5328]*y_cur[IDX_NOI] - k[5328]*y_cur[IDX_NOI] - + k[5329]*y_cur[IDX_NOI] - k[5329]*y_cur[IDX_NOI] - + k[5329]*y_cur[IDX_NOI] - k[5329]*y_cur[IDX_NOI] - + k[5330]*y_cur[IDX_O2I] - k[5331]*y_cur[IDX_OCNI] - + k[5332]*y_cur[IDX_OCNI] - k[5333]*y_cur[IDX_SI] - + k[5334]*y_cur[IDX_SI] - k[5424]*y_cur[IDX_OI] - + k[5477]*y_cur[IDX_OHI] - k[5493]*y_cur[IDX_SiI] - k[5891] - k[5892] + - k[6228] - k[6229] - k[6925]; + data[jistart + 14354] = 0.0 + k[3008]*y_cur[IDX_HNOII] + k[5206]*y_cur[IDX_HNOI] - + k[5207]*y_cur[IDX_NOI]; + data[jistart + 14355] = 0.0 + k[2202]*y_cur[IDX_HNOII]; + data[jistart + 14356] = 0.0 + k[1747]*y_cur[IDX_HNOII]; + data[jistart + 14357] = 0.0 + k[2497]*y_cur[IDX_HNOII]; + data[jistart + 14358] = 0.0 + k[2878]*y_cur[IDX_HNOII]; + data[jistart + 14359] = 0.0 + k[2254]*y_cur[IDX_HNOII] + k[5078]*y_cur[IDX_HNOI] - + k[5083]*y_cur[IDX_NOI] - k[5084]*y_cur[IDX_NOI] - + k[5085]*y_cur[IDX_NOI]; + data[jistart + 14360] = 0.0 + k[3050]*y_cur[IDX_HNOII] - k[5333]*y_cur[IDX_NOI] - + k[5334]*y_cur[IDX_NOI]; + data[jistart + 14361] = 0.0 + k[1460]*y_cur[IDX_HNOII]; + data[jistart + 14362] = 0.0 + k[3803]*y_cur[IDX_HNOII] + k[5283]*y_cur[IDX_NI] + + k[5472]*y_cur[IDX_HNOI] + k[5473]*y_cur[IDX_N2OI] - + k[5477]*y_cur[IDX_NOI]; + data[jistart + 14363] = 0.0 + k[3588]*y_cur[IDX_HNOII]; + data[jistart + 14364] = 0.0 - k[226]*y_cur[IDX_NOI]; + data[jistart + 14365] = 0.0 - k[274]*y_cur[IDX_NOI]; + data[jistart + 14366] = 0.0 - k[4878]*y_cur[IDX_NOI]; + data[jistart + 14367] = 0.0 + k[2278]*y_cur[IDX_HNOII] + k[5119]*y_cur[IDX_HNOI] + + k[5120]*y_cur[IDX_NO2I] - k[5121]*y_cur[IDX_NOI] - + k[5122]*y_cur[IDX_NOI] + k[5123]*y_cur[IDX_O2I] + + k[5388]*y_cur[IDX_OI]; + data[jistart + 14368] = 0.0 + k[5034]*y_cur[IDX_HNOI] - k[5038]*y_cur[IDX_NOI]; + data[jistart + 14369] = 0.0 + k[122]*y_cur[IDX_OM] + k[3476]*y_cur[IDX_SiOII] + + k[5262]*y_cur[IDX_CO2I] + k[5270]*y_cur[IDX_HNOI] + + k[5277]*y_cur[IDX_NO2I] + k[5277]*y_cur[IDX_NO2I] - + k[5279]*y_cur[IDX_NOI] + k[5281]*y_cur[IDX_O2I] + + k[5283]*y_cur[IDX_OHI] + k[5287]*y_cur[IDX_POI] + + k[5291]*y_cur[IDX_SOI]; + data[jistart + 14370] = 0.0 + k[5318]*y_cur[IDX_NHI] + k[5319]*y_cur[IDX_NHI] + + k[5388]*y_cur[IDX_CNI] + k[5389]*y_cur[IDX_CNOI] + + k[5412]*y_cur[IDX_HNOI] + k[5417]*y_cur[IDX_N2I] + + k[5418]*y_cur[IDX_N2OI] + k[5418]*y_cur[IDX_N2OI] + + k[5423]*y_cur[IDX_NO2I] - k[5424]*y_cur[IDX_NOI] + + k[5425]*y_cur[IDX_NSI] + k[5428]*y_cur[IDX_OCNI] + + k[5450]*y_cur[IDX_SiNI]; + data[jistart + 14371] = 0.0 + k[3266]*y_cur[IDX_HNOI] + k[3278]*y_cur[IDX_N2OI] - + k[3286]*y_cur[IDX_NOI] - k[3287]*y_cur[IDX_NOI]; + data[jistart + 14372] = 0.0 - k[186]*y_cur[IDX_NOI]; + data[jistart + 14373] = 0.0 + k[2550]*y_cur[IDX_HNOII]; + data[jistart + 14374] = 0.0 - k[403]*y_cur[IDX_NOI] + k[2343]*y_cur[IDX_HCNOI]; + data[jistart + 14375] = 0.0 + k[1907]*y_cur[IDX_HNOII] - k[4974]*y_cur[IDX_NOI] - + k[4975]*y_cur[IDX_NOI] + k[5202]*y_cur[IDX_HCNOI]; + data[jistart + 14376] = 0.0 - k[2726]*y_cur[IDX_NOI]; + data[jistart + 14377] = 0.0 + k[2286]*y_cur[IDX_HNOII] + k[5129]*y_cur[IDX_NO2I]; + data[jistart + 14378] = 0.0 + k[6422]*y_cur[IDX_HNOII] + k[6432]*y_cur[IDX_H2NOII] + + k[6514]*y_cur[IDX_HCNOII] + k[6529]*y_cur[IDX_N2OII] + + k[6536]*y_cur[IDX_H2CNOII] + k[6584]*y_cur[IDX_NO2II]; + data[jistart + 14379] = 0.0 + k[994]*y_cur[IDX_H2CNOII] + k[1011]*y_cur[IDX_H2NOII] + + k[1092]*y_cur[IDX_HCNOII] + k[1121]*y_cur[IDX_HNOII] + + k[1169]*y_cur[IDX_NO2II] + k[1171]*y_cur[IDX_N2OII]; + data[jistart + 14380] = 0.0 + k[5176]*y_cur[IDX_HNOI] + k[5180]*y_cur[IDX_N2OI] + + k[5185]*y_cur[IDX_NO2I] - k[5186]*y_cur[IDX_NOI] - + k[5187]*y_cur[IDX_NOI]; + data[jistart + 14381] = 0.0 + k[1120]*y_cur[IDX_eM] + k[6551]*y_cur[IDX_GRAINM]; + data[jistart + 14382] = 0.0 + k[1280]*y_cur[IDX_eM] + k[6727]*y_cur[IDX_GRAINM]; + data[jistart + 14383] = 0.0 + k[1053]*y_cur[IDX_eM] + k[6725]*y_cur[IDX_GRAINM]; + data[jistart + 14384] = 0.0 + k[1102]*y_cur[IDX_eM] + k[6575]*y_cur[IDX_GRAINM]; + data[jistart + 14385] = 0.0 + k[1275]*y_cur[IDX_eM] + k[1277]*y_cur[IDX_eM] + + k[1278]*y_cur[IDX_eM] + k[6701]*y_cur[IDX_GRAINM] + + k[6703]*y_cur[IDX_GRAINM] + k[6704]*y_cur[IDX_GRAINM]; + data[jistart + 14386] = 0.0 + k[938]*y_cur[IDX_eM] + k[6548]*y_cur[IDX_GRAINM]; + data[jistart + 14387] = 0.0 + k[2493]*y_cur[IDX_H2COI]; + data[jistart + 14388] = 0.0 + k[1103]*y_cur[IDX_eM] + k[6610]*y_cur[IDX_GRAINM]; + data[jistart + 14389] = 0.0 + k[5665]*y_cur[IDX_HeII] + k[5945] + k[6295]; + data[jistart + 14390] = 0.0 + k[7101] + k[7283] + k[7465]; + data[jistart + 14391] = 0.0 + k[5633]*y_cur[IDX_CII]; + data[jistart + 14392] = 0.0 + k[940]*y_cur[IDX_eM] + k[6562]*y_cur[IDX_GRAINM]; + data[jistart + 14393] = 0.0 + k[5860] + k[6187]; + data[jistart + 14394] = 0.0 + k[5094]*y_cur[IDX_CHI] + k[5150]*y_cur[IDX_H2COI] - + k[5210]*y_cur[IDX_HCOI]; + data[jistart + 14395] = 0.0 - k[5206]*y_cur[IDX_HCOI]; + data[jistart + 14396] = 0.0 + k[8594]*y_cur[IDX_GHI]; + data[jistart + 14397] = 0.0 + k[3191]*y_cur[IDX_HeII] + k[5808] + k[6113]; + data[jistart + 14398] = 0.0 - k[3011]*y_cur[IDX_HCOI]; + data[jistart + 14399] = 0.0 - k[3008]*y_cur[IDX_HCOI]; + data[jistart + 14400] = 0.0 + k[3853]*y_cur[IDX_SOII] + k[5383]*y_cur[IDX_OI]; + data[jistart + 14401] = 0.0 - k[302]*y_cur[IDX_HCOI] - k[2273]*y_cur[IDX_HCOI]; + data[jistart + 14402] = 0.0 + k[8685]*y_cur[IDX_GCHI]; + data[jistart + 14403] = 0.0 - k[568]*y_cur[IDX_HCOI] - k[3364]*y_cur[IDX_HCOI]; + data[jistart + 14404] = 0.0 - k[2857]*y_cur[IDX_HCOI] - k[2858]*y_cur[IDX_HCOI]; + data[jistart + 14405] = 0.0 - k[205]*y_cur[IDX_HCOI] - k[1454]*y_cur[IDX_HCOI]; + data[jistart + 14406] = 0.0 + k[3484]*y_cur[IDX_CO2I] - k[3494]*y_cur[IDX_HCOI]; + data[jistart + 14407] = 0.0 + k[4781]*y_cur[IDX_HCOII]; + data[jistart + 14408] = 0.0 + k[4640]*y_cur[IDX_HCOII]; + data[jistart + 14409] = 0.0 - k[450]*y_cur[IDX_HCOI] - k[2389]*y_cur[IDX_HCOI]; + data[jistart + 14410] = 0.0 + k[1993]*y_cur[IDX_CH2II]; + data[jistart + 14411] = 0.0 - k[581]*y_cur[IDX_HCOI] + k[3511]*y_cur[IDX_H2COI] - + k[3520]*y_cur[IDX_HCOI]; + data[jistart + 14412] = 0.0 + k[4851]*y_cur[IDX_HCOII]; + data[jistart + 14413] = 0.0 + k[4045]*y_cur[IDX_HCOII]; + data[jistart + 14414] = 0.0 + k[4220]*y_cur[IDX_HCOII]; + data[jistart + 14415] = 0.0 - k[310]*y_cur[IDX_HCOI] + k[2280]*y_cur[IDX_H2COI]; + data[jistart + 14416] = 0.0 - k[2230]*y_cur[IDX_HCOI]; + data[jistart + 14417] = 0.0 + k[57]*y_cur[IDX_CI] + k[4816]*y_cur[IDX_HCOII]; + data[jistart + 14418] = 0.0 + k[3975]*y_cur[IDX_HCOII]; + data[jistart + 14419] = 0.0 + k[4115]*y_cur[IDX_HCOII]; + data[jistart + 14420] = 0.0 + k[4395]*y_cur[IDX_HCOII]; + data[jistart + 14421] = 0.0 + k[4535]*y_cur[IDX_HCOII]; + data[jistart + 14422] = 0.0 + k[4465]*y_cur[IDX_HCOII]; + data[jistart + 14423] = 0.0 + k[4605]*y_cur[IDX_HCOII]; + data[jistart + 14424] = 0.0 + k[3940]*y_cur[IDX_HCOII]; + data[jistart + 14425] = 0.0 + k[4290]*y_cur[IDX_HCOII]; + data[jistart + 14426] = 0.0 + k[4325]*y_cur[IDX_HCOII]; + data[jistart + 14427] = 0.0 + k[9]*y_cur[IDX_OHI] + k[3905]*y_cur[IDX_HCOII]; + data[jistart + 14428] = 0.0 + k[62]*y_cur[IDX_CHI] + k[4746]*y_cur[IDX_HCOII]; + data[jistart + 14429] = 0.0 + k[4570]*y_cur[IDX_HCOII]; + data[jistart + 14430] = 0.0 + k[1382]*y_cur[IDX_CII] + k[2487]*y_cur[IDX_H2COII]; + data[jistart + 14431] = 0.0 + k[73]*y_cur[IDX_COI] - k[76]*y_cur[IDX_HCOI] + + k[4711]*y_cur[IDX_HCOII]; + data[jistart + 14432] = 0.0 + k[4500]*y_cur[IDX_HCOII]; + data[jistart + 14433] = 0.0 + k[4010]*y_cur[IDX_HCOII]; + data[jistart + 14434] = 0.0 + k[4080]*y_cur[IDX_HCOII]; + data[jistart + 14435] = 0.0 + k[4185]*y_cur[IDX_HCOII]; + data[jistart + 14436] = 0.0 + k[4360]*y_cur[IDX_HCOII]; + data[jistart + 14437] = 0.0 + k[1038]*y_cur[IDX_eM] + k[6418]*y_cur[IDX_GRAINM]; + data[jistart + 14438] = 0.0 + k[4255]*y_cur[IDX_HCOII]; + data[jistart + 14439] = 0.0 + k[4430]*y_cur[IDX_HCOII]; + data[jistart + 14440] = 0.0 - k[504]*y_cur[IDX_HCOI]; + data[jistart + 14441] = 0.0 + k[8685]*y_cur[IDX_GOI]; + data[jistart + 14442] = 0.0 + k[3535]*y_cur[IDX_H2COII]; + data[jistart + 14443] = 0.0 - k[1477]*y_cur[IDX_HCOI]; + data[jistart + 14444] = 0.0 - k[1987]*y_cur[IDX_HCOI] + k[1993]*y_cur[IDX_OCSI]; + data[jistart + 14445] = 0.0 - k[691]*y_cur[IDX_HCOI] - k[3782]*y_cur[IDX_HCOI] - + k[3783]*y_cur[IDX_HCOI]; + data[jistart + 14446] = 0.0 - k[470]*y_cur[IDX_HCOI] - k[2513]*y_cur[IDX_HCOI] - + k[2514]*y_cur[IDX_HCOI]; + data[jistart + 14447] = 0.0 + k[4150]*y_cur[IDX_HCOII]; + data[jistart + 14448] = 0.0 - k[251]*y_cur[IDX_HCOI] - k[1959]*y_cur[IDX_HCOI] + + k[1968]*y_cur[IDX_O2I]; + data[jistart + 14449] = 0.0 + k[3484]*y_cur[IDX_NHII] + k[5075]*y_cur[IDX_CHI]; + data[jistart + 14450] = 0.0 - k[502]*y_cur[IDX_HCOI] - k[3010]*y_cur[IDX_HCOI]; + data[jistart + 14451] = 0.0 + k[499]*y_cur[IDX_HCOII]; + data[jistart + 14452] = 0.0 + k[533]*y_cur[IDX_HCOII]; + data[jistart + 14453] = 0.0 + k[637]*y_cur[IDX_HCOII]; + data[jistart + 14454] = 0.0 + k[4675]*y_cur[IDX_HCOII]; + data[jistart + 14455] = 0.0 + k[3691]*y_cur[IDX_OI]; + data[jistart + 14456] = 0.0 - k[3009]*y_cur[IDX_HCOI]; + data[jistart + 14457] = 0.0 + k[3846]*y_cur[IDX_C2H2I] + k[3850]*y_cur[IDX_C2H4I] + + k[3853]*y_cur[IDX_CH2CCH2I]; + data[jistart + 14458] = 0.0 - k[501]*y_cur[IDX_HCOI]; + data[jistart + 14459] = 0.0 - k[555]*y_cur[IDX_HCOI] - k[3350]*y_cur[IDX_HCOI]; + data[jistart + 14460] = 0.0 - k[500]*y_cur[IDX_HCOI] + k[999]*y_cur[IDX_eM] + + k[1457]*y_cur[IDX_C2I] + k[1744]*y_cur[IDX_C2HI] + + k[2002]*y_cur[IDX_CH2I] + k[2246]*y_cur[IDX_CHI] + + k[2487]*y_cur[IDX_CH3OHI] + k[2488]*y_cur[IDX_H2COI] + + k[2490]*y_cur[IDX_SI] + k[2542]*y_cur[IDX_H2OI] + + k[2874]*y_cur[IDX_HCNI] - k[3007]*y_cur[IDX_HCOI] + + k[3038]*y_cur[IDX_HNCI] + k[3535]*y_cur[IDX_NH2I] + + k[3574]*y_cur[IDX_NH3I] + k[6401]*y_cur[IDX_GRAINM]; + data[jistart + 14461] = 0.0 - k[658]*y_cur[IDX_HCOI] - k[3646]*y_cur[IDX_HCOI]; + data[jistart + 14462] = 0.0 + k[2002]*y_cur[IDX_H2COII] + k[4998]*y_cur[IDX_H2COI] - + k[4999]*y_cur[IDX_HCOI] + k[5011]*y_cur[IDX_O2I] + + k[5014]*y_cur[IDX_OI]; + data[jistart + 14463] = 0.0 + k[3038]*y_cur[IDX_H2COII]; + data[jistart + 14464] = 0.0 - k[593]*y_cur[IDX_HCOI] + k[3549]*y_cur[IDX_H2COI] - + k[3552]*y_cur[IDX_HCOI]; + data[jistart + 14465] = 0.0 + k[3850]*y_cur[IDX_SOII] + k[5349]*y_cur[IDX_OI]; + data[jistart + 14466] = 0.0 + k[4881]*y_cur[IDX_O2I]; + data[jistart + 14467] = 0.0 + k[1968]*y_cur[IDX_CHII] + k[4881]*y_cur[IDX_C2H3I] + + k[4904]*y_cur[IDX_C2HI] + k[5011]*y_cur[IDX_CH2I] + + k[5040]*y_cur[IDX_CH3I] + k[5092]*y_cur[IDX_CHI] + + k[5093]*y_cur[IDX_CHI] - k[5208]*y_cur[IDX_HCOI] - + k[5209]*y_cur[IDX_HCOI]; + data[jistart + 14468] = 0.0 - k[503]*y_cur[IDX_HCOI] - k[3012]*y_cur[IDX_HCOI]; + data[jistart + 14469] = 0.0 + k[5084]*y_cur[IDX_CHI] - k[5207]*y_cur[IDX_HCOI]; + data[jistart + 14470] = 0.0 - k[76]*y_cur[IDX_HM] - k[178]*y_cur[IDX_CII] - + k[205]*y_cur[IDX_C2II] - k[225]*y_cur[IDX_C2H2II] - + k[251]*y_cur[IDX_CHII] - k[272]*y_cur[IDX_CH3II] - + k[302]*y_cur[IDX_CNII] - k[310]*y_cur[IDX_COII] - + k[389]*y_cur[IDX_HII] - k[450]*y_cur[IDX_H2II] - + k[470]*y_cur[IDX_H2OII] - k[500]*y_cur[IDX_H2COII] - + k[501]*y_cur[IDX_H2SII] - k[502]*y_cur[IDX_O2II] - + k[503]*y_cur[IDX_SII] - k[504]*y_cur[IDX_SiOII] - + k[555]*y_cur[IDX_NII] - k[568]*y_cur[IDX_N2II] - + k[581]*y_cur[IDX_NH2II] - k[593]*y_cur[IDX_NH3II] - + k[658]*y_cur[IDX_OII] - k[691]*y_cur[IDX_OHII] - + k[1408]*y_cur[IDX_CII] - k[1454]*y_cur[IDX_C2II] - + k[1477]*y_cur[IDX_C2HII] - k[1524]*y_cur[IDX_C2H2II] - + k[1959]*y_cur[IDX_CHII] - k[1987]*y_cur[IDX_CH2II] - + k[2082]*y_cur[IDX_CH3II] - k[2230]*y_cur[IDX_CH5II] - + k[2273]*y_cur[IDX_CNII] - k[2344]*y_cur[IDX_HII] - + k[2345]*y_cur[IDX_HII] - k[2389]*y_cur[IDX_H2II] - + k[2513]*y_cur[IDX_H2OII] - k[2514]*y_cur[IDX_H2OII] - + k[2697]*y_cur[IDX_H3II] - k[2857]*y_cur[IDX_HCNII] - + k[2858]*y_cur[IDX_HCNII] - k[2969]*y_cur[IDX_HCOII] - + k[3007]*y_cur[IDX_H2COII] - k[3008]*y_cur[IDX_HNOII] - + k[3009]*y_cur[IDX_N2HII] - k[3010]*y_cur[IDX_O2II] - + k[3011]*y_cur[IDX_O2HII] - k[3012]*y_cur[IDX_SII] - + k[3249]*y_cur[IDX_HeII] - k[3250]*y_cur[IDX_HeII] - + k[3251]*y_cur[IDX_HeII] - k[3350]*y_cur[IDX_NII] - + k[3364]*y_cur[IDX_N2II] - k[3494]*y_cur[IDX_NHII] - + k[3520]*y_cur[IDX_NH2II] - k[3552]*y_cur[IDX_NH3II] - + k[3646]*y_cur[IDX_OII] - k[3782]*y_cur[IDX_OHII] - + k[3783]*y_cur[IDX_OHII] - k[4962]*y_cur[IDX_CI] - + k[4963]*y_cur[IDX_CI] - k[4999]*y_cur[IDX_CH2I] - + k[5033]*y_cur[IDX_CH3I] - k[5077]*y_cur[IDX_CHI] - + k[5117]*y_cur[IDX_CNI] - k[5171]*y_cur[IDX_HI] - + k[5172]*y_cur[IDX_HI] - k[5204]*y_cur[IDX_HCOI] - + k[5204]*y_cur[IDX_HCOI] - k[5204]*y_cur[IDX_HCOI] - + k[5204]*y_cur[IDX_HCOI] - k[5205]*y_cur[IDX_HCOI] - + k[5205]*y_cur[IDX_HCOI] - k[5205]*y_cur[IDX_HCOI] - + k[5205]*y_cur[IDX_HCOI] - k[5206]*y_cur[IDX_HNOI] - + k[5207]*y_cur[IDX_NOI] - k[5208]*y_cur[IDX_O2I] - + k[5209]*y_cur[IDX_O2I] - k[5210]*y_cur[IDX_O2HI] - + k[5265]*y_cur[IDX_NI] - k[5266]*y_cur[IDX_NI] - + k[5267]*y_cur[IDX_NI] - k[5405]*y_cur[IDX_OI] - + k[5406]*y_cur[IDX_OI] - k[5471]*y_cur[IDX_OHI] - + k[5486]*y_cur[IDX_SI] - k[5487]*y_cur[IDX_SI] - k[5856] - k[5857] - + k[6184] - k[6185] - k[6919]; + data[jistart + 14471] = 0.0 + k[1744]*y_cur[IDX_H2COII] + k[4904]*y_cur[IDX_O2I]; + data[jistart + 14472] = 0.0 + k[2280]*y_cur[IDX_COII] + k[2488]*y_cur[IDX_H2COII] + + k[2493]*y_cur[IDX_CH3COCH3II] + k[3511]*y_cur[IDX_NH2II] + + k[3549]*y_cur[IDX_NH3II] + k[4998]*y_cur[IDX_CH2I] + + k[5030]*y_cur[IDX_CH3I] + k[5076]*y_cur[IDX_CHI] + + k[5114]*y_cur[IDX_CNI] + k[5150]*y_cur[IDX_O2HI] + + k[5165]*y_cur[IDX_HI] + k[5397]*y_cur[IDX_OI] + + k[5465]*y_cur[IDX_OHI]; + data[jistart + 14473] = 0.0 + k[2874]*y_cur[IDX_H2COII]; + data[jistart + 14474] = 0.0 + k[62]*y_cur[IDX_OM] + k[2246]*y_cur[IDX_H2COII] + + k[5075]*y_cur[IDX_CO2I] + k[5076]*y_cur[IDX_H2COI] - + k[5077]*y_cur[IDX_HCOI] + k[5084]*y_cur[IDX_NOI] + + k[5092]*y_cur[IDX_O2I] + k[5093]*y_cur[IDX_O2I] + + k[5094]*y_cur[IDX_O2HI] + k[5099]*y_cur[IDX_OHI]; + data[jistart + 14475] = 0.0 + k[2490]*y_cur[IDX_H2COII] - k[5486]*y_cur[IDX_HCOI] - + k[5487]*y_cur[IDX_HCOI]; + data[jistart + 14476] = 0.0 + k[1457]*y_cur[IDX_H2COII]; + data[jistart + 14477] = 0.0 + k[9]*y_cur[IDX_CM] + k[5099]*y_cur[IDX_CHI] + + k[5465]*y_cur[IDX_H2COI] - k[5471]*y_cur[IDX_HCOI]; + data[jistart + 14478] = 0.0 + k[3574]*y_cur[IDX_H2COII]; + data[jistart + 14479] = 0.0 - k[225]*y_cur[IDX_HCOI] - k[1524]*y_cur[IDX_HCOI]; + data[jistart + 14480] = 0.0 - k[272]*y_cur[IDX_HCOI] - k[2082]*y_cur[IDX_HCOI]; + data[jistart + 14481] = 0.0 + k[3846]*y_cur[IDX_SOII]; + data[jistart + 14482] = 0.0 + k[5114]*y_cur[IDX_H2COI] - k[5117]*y_cur[IDX_HCOI]; + data[jistart + 14483] = 0.0 + k[8594]*y_cur[IDX_GCOI]; + data[jistart + 14484] = 0.0 + k[5030]*y_cur[IDX_H2COI] - k[5033]*y_cur[IDX_HCOI] + + k[5040]*y_cur[IDX_O2I]; + data[jistart + 14485] = 0.0 - k[5265]*y_cur[IDX_HCOI] - k[5266]*y_cur[IDX_HCOI] - + k[5267]*y_cur[IDX_HCOI]; + data[jistart + 14486] = 0.0 + k[3691]*y_cur[IDX_C2H4II] + k[5014]*y_cur[IDX_CH2I] + + k[5349]*y_cur[IDX_C2H4I] + k[5383]*y_cur[IDX_CH2CCH2I] + + k[5397]*y_cur[IDX_H2COI] - k[5405]*y_cur[IDX_HCOI] - + k[5406]*y_cur[IDX_HCOI]; + data[jistart + 14487] = 0.0 + k[3191]*y_cur[IDX_CH3CHOI] - k[3249]*y_cur[IDX_HCOI] - + k[3250]*y_cur[IDX_HCOI] - k[3251]*y_cur[IDX_HCOI] + + k[5665]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 14488] = 0.0 - k[178]*y_cur[IDX_HCOI] + k[1382]*y_cur[IDX_CH3OHI] - + k[1408]*y_cur[IDX_HCOI] + k[5633]*y_cur[IDX_CH2OHI]; + data[jistart + 14489] = 0.0 + k[2542]*y_cur[IDX_H2COII]; + data[jistart + 14490] = 0.0 - k[389]*y_cur[IDX_HCOI] - k[2344]*y_cur[IDX_HCOI] - + k[2345]*y_cur[IDX_HCOI]; + data[jistart + 14491] = 0.0 + k[57]*y_cur[IDX_OHM] - k[4962]*y_cur[IDX_HCOI] - + k[4963]*y_cur[IDX_HCOI]; + data[jistart + 14492] = 0.0 + k[499]*y_cur[IDX_FeI] + k[533]*y_cur[IDX_MgI] + + k[637]*y_cur[IDX_NaI] - k[2969]*y_cur[IDX_HCOI] + + k[3905]*y_cur[IDX_CM] + k[3940]*y_cur[IDX_C10M] + + k[3975]*y_cur[IDX_C10HM] + k[4010]*y_cur[IDX_C2M] + + k[4045]*y_cur[IDX_C2HM] + k[4080]*y_cur[IDX_C3M] + + k[4115]*y_cur[IDX_C3HM] + k[4150]*y_cur[IDX_C3NM] + + k[4185]*y_cur[IDX_C4M] + k[4220]*y_cur[IDX_C4HM] + + k[4255]*y_cur[IDX_C5M] + k[4290]*y_cur[IDX_C5HM] + + k[4325]*y_cur[IDX_C5NM] + k[4360]*y_cur[IDX_C6M] + + k[4395]*y_cur[IDX_C6HM] + k[4430]*y_cur[IDX_C7M] + + k[4465]*y_cur[IDX_C7HM] + k[4500]*y_cur[IDX_C8M] + + k[4535]*y_cur[IDX_C8HM] + k[4570]*y_cur[IDX_C9M] + + k[4605]*y_cur[IDX_C9HM] + k[4640]*y_cur[IDX_CHM] + + k[4675]*y_cur[IDX_CNM] + k[4711]*y_cur[IDX_HM] + + k[4746]*y_cur[IDX_OM] + k[4781]*y_cur[IDX_O2M] + + k[4816]*y_cur[IDX_OHM] + k[4851]*y_cur[IDX_SM]; + data[jistart + 14493] = 0.0 - k[2697]*y_cur[IDX_HCOI]; + data[jistart + 14494] = 0.0 + k[73]*y_cur[IDX_HM]; + data[jistart + 14495] = 0.0 + k[6401]*y_cur[IDX_H2COII] + k[6418]*y_cur[IDX_H3COII] + + k[6548]*y_cur[IDX_CH3CHOII] + k[6551]*y_cur[IDX_HNCOHII] + + k[6562]*y_cur[IDX_CH3CHOHII] + k[6575]*y_cur[IDX_HCOOHII] + + k[6610]*y_cur[IDX_HCOOH2II] + k[6701]*y_cur[IDX_CH2OHCHOII] + + k[6703]*y_cur[IDX_CH2OHCHOII] + k[6704]*y_cur[IDX_CH2OHCHOII] + + k[6725]*y_cur[IDX_H5C2O2II] + k[6727]*y_cur[IDX_CH2OHCH2OII]; + data[jistart + 14496] = 0.0 + k[938]*y_cur[IDX_CH3CHOII] + k[940]*y_cur[IDX_CH3CHOHII] + + k[999]*y_cur[IDX_H2COII] + k[1038]*y_cur[IDX_H3COII] + + k[1053]*y_cur[IDX_H5C2O2II] + k[1102]*y_cur[IDX_HCOOHII] + + k[1103]*y_cur[IDX_HCOOH2II] + k[1120]*y_cur[IDX_HNCOHII] + + k[1275]*y_cur[IDX_CH2OHCHOII] + k[1277]*y_cur[IDX_CH2OHCHOII] + + k[1278]*y_cur[IDX_CH2OHCHOII] + k[1280]*y_cur[IDX_CH2OHCH2OII]; + data[jistart + 14497] = 0.0 + k[5165]*y_cur[IDX_H2COI] - k[5171]*y_cur[IDX_HCOI] - + k[5172]*y_cur[IDX_HCOI]; + data[jistart + 14498] = 0.0 + k[773]*y_cur[IDX_eM] + k[6577]*y_cur[IDX_GRAINM]; + data[jistart + 14499] = 0.0 + k[957]*y_cur[IDX_eM] + k[6603]*y_cur[IDX_GRAINM]; + data[jistart + 14500] = 0.0 + k[1204]*y_cur[IDX_eM] + k[6598]*y_cur[IDX_GRAINM]; + data[jistart + 14501] = 0.0 + k[2863]*y_cur[IDX_HCNI]; + data[jistart + 14502] = 0.0 - k[2163]*y_cur[IDX_CH4I]; + data[jistart + 14503] = 0.0 - k[2172]*y_cur[IDX_CH4I] - k[2173]*y_cur[IDX_CH4I] - + k[2174]*y_cur[IDX_CH4I] - k[2175]*y_cur[IDX_CH4I]; + data[jistart + 14504] = 0.0 + k[5858]; + data[jistart + 14505] = 0.0 + k[7080] + k[7262] + k[7444]; + data[jistart + 14506] = 0.0 + k[2231]*y_cur[IDX_CH5II]; + data[jistart + 14507] = 0.0 + k[2072]*y_cur[IDX_CH3II] + k[5815] + k[6119]; + data[jistart + 14508] = 0.0 + k[1714]*y_cur[IDX_C2H4I] + k[2129]*y_cur[IDX_CH3OHI] - + k[2214]*y_cur[IDX_CH4I]; + data[jistart + 14509] = 0.0 + k[942]*y_cur[IDX_eM] + k[6564]*y_cur[IDX_GRAINM]; + data[jistart + 14510] = 0.0 - k[2182]*y_cur[IDX_CH4I] - k[2183]*y_cur[IDX_CH4I] - + k[2184]*y_cur[IDX_CH4I]; + data[jistart + 14511] = 0.0 + k[2221]*y_cur[IDX_CH5II]; + data[jistart + 14512] = 0.0 - k[2164]*y_cur[IDX_CH4I] - k[2165]*y_cur[IDX_CH4I] - + k[2166]*y_cur[IDX_CH4I] - k[2167]*y_cur[IDX_CH4I]; + data[jistart + 14513] = 0.0 + k[5042]*y_cur[IDX_CH3I]; + data[jistart + 14514] = 0.0 + k[2594]*y_cur[IDX_H3II] + k[2596]*y_cur[IDX_H3II]; + data[jistart + 14515] = 0.0 + k[5034]*y_cur[IDX_CH3I]; + data[jistart + 14516] = 0.0 + k[2234]*y_cur[IDX_CH5II]; + data[jistart + 14517] = 0.0 - k[2176]*y_cur[IDX_CH4I] - k[2177]*y_cur[IDX_CH4I] - + k[2178]*y_cur[IDX_CH4I] - k[2179]*y_cur[IDX_CH4I]; + data[jistart + 14518] = 0.0 + k[2659]*y_cur[IDX_H3II] + k[2662]*y_cur[IDX_H3II] + + k[2664]*y_cur[IDX_H3II] + k[5811]; + data[jistart + 14519] = 0.0 - k[2196]*y_cur[IDX_CH4I] - k[2197]*y_cur[IDX_CH4I] - + k[2198]*y_cur[IDX_CH4I]; + data[jistart + 14520] = 0.0 - k[286]*y_cur[IDX_CH4I] - k[2191]*y_cur[IDX_CH4I]; + data[jistart + 14521] = 0.0 + k[2099]*y_cur[IDX_CH3II] + k[2238]*y_cur[IDX_CH5II]; + data[jistart + 14522] = 0.0 - k[2212]*y_cur[IDX_CH4I] - k[2213]*y_cur[IDX_CH4I]; + data[jistart + 14523] = 0.0 - k[2188]*y_cur[IDX_CH4I]; + data[jistart + 14524] = 0.0 - k[2201]*y_cur[IDX_CH4I]; + data[jistart + 14525] = 0.0 + k[2065]*y_cur[IDX_CH3II] + k[5807] + k[6112]; + data[jistart + 14526] = 0.0 - k[2192]*y_cur[IDX_CH4I]; + data[jistart + 14527] = 0.0 - k[2211]*y_cur[IDX_CH4I]; + data[jistart + 14528] = 0.0 - k[2187]*y_cur[IDX_CH4I]; + data[jistart + 14529] = 0.0 - k[2157]*y_cur[IDX_CH4I] - k[2158]*y_cur[IDX_CH4I] - + k[2159]*y_cur[IDX_CH4I]; + data[jistart + 14530] = 0.0 - k[2185]*y_cur[IDX_CH4I] - k[2186]*y_cur[IDX_CH4I]; + data[jistart + 14531] = 0.0 + k[277]*y_cur[IDX_C2H2I] + k[278]*y_cur[IDX_C2H4I] + + k[279]*y_cur[IDX_CH3OHI] + k[280]*y_cur[IDX_H2COI] + + k[281]*y_cur[IDX_H2SI] + k[282]*y_cur[IDX_NH3I] + + k[283]*y_cur[IDX_O2I] + k[284]*y_cur[IDX_OCSI] - + k[2138]*y_cur[IDX_CH4I]; + data[jistart + 14532] = 0.0 - k[2202]*y_cur[IDX_CH4I]; + data[jistart + 14533] = 0.0 + k[1538]*y_cur[IDX_C2H2I] + k[1685]*y_cur[IDX_C2H4I]; + data[jistart + 14534] = 0.0 - k[2180]*y_cur[IDX_CH4I] - k[2181]*y_cur[IDX_CH4I]; + data[jistart + 14535] = 0.0 + k[1367]*y_cur[IDX_CII] + k[1614]*y_cur[IDX_C2H3II] + + k[1670]*y_cur[IDX_C2H4II] + k[2062]*y_cur[IDX_CH3II] + + k[2222]*y_cur[IDX_CH5II]; + data[jistart + 14536] = 0.0 - k[2204]*y_cur[IDX_CH4I] - k[2205]*y_cur[IDX_CH4I]; + data[jistart + 14537] = 0.0 - k[2199]*y_cur[IDX_CH4I] - k[2200]*y_cur[IDX_CH4I]; + data[jistart + 14538] = 0.0 + k[2649]*y_cur[IDX_H3II]; + data[jistart + 14539] = 0.0 - k[2146]*y_cur[IDX_CH4I] - k[2147]*y_cur[IDX_CH4I] - + k[2148]*y_cur[IDX_CH4I] - k[2149]*y_cur[IDX_CH4I] - + k[2150]*y_cur[IDX_CH4I]; + data[jistart + 14540] = 0.0 - k[2168]*y_cur[IDX_CH4I]; + data[jistart + 14541] = 0.0 - k[2203]*y_cur[IDX_CH4I]; + data[jistart + 14542] = 0.0 - k[442]*y_cur[IDX_CH4I] - k[2378]*y_cur[IDX_CH4I] - + k[2379]*y_cur[IDX_CH4I]; + data[jistart + 14543] = 0.0 + k[284]*y_cur[IDX_CH4II]; + data[jistart + 14544] = 0.0 + k[8579]*y_cur[IDX_GHI]; + data[jistart + 14545] = 0.0 - k[285]*y_cur[IDX_CH4I] - k[2189]*y_cur[IDX_CH4I] - + k[2190]*y_cur[IDX_CH4I]; + data[jistart + 14546] = 0.0 + k[975]*y_cur[IDX_eM] + k[1898]*y_cur[IDX_CI] + + k[2000]*y_cur[IDX_CH2I] + k[2217]*y_cur[IDX_C2I] + + k[2218]*y_cur[IDX_C2H2I] + k[2219]*y_cur[IDX_C2H4I] + + k[2220]*y_cur[IDX_C2HI] + k[2221]*y_cur[IDX_C6H6I] + + k[2222]*y_cur[IDX_C2H6I] + k[2223]*y_cur[IDX_CO2I] + + k[2224]*y_cur[IDX_COI] + k[2225]*y_cur[IDX_H2COI] + + k[2226]*y_cur[IDX_H2OI] + k[2227]*y_cur[IDX_H2SI] + + k[2228]*y_cur[IDX_HC3NI] + k[2229]*y_cur[IDX_HCNI] + + k[2230]*y_cur[IDX_HCOI] + k[2231]*y_cur[IDX_HClI] + + k[2232]*y_cur[IDX_HNCI] + k[2233]*y_cur[IDX_MgI] + + k[2234]*y_cur[IDX_N2OI] + k[2235]*y_cur[IDX_SI] + + k[2238]*y_cur[IDX_SiH4I] + k[2244]*y_cur[IDX_CHI] + + k[3533]*y_cur[IDX_NH2I] + k[3571]*y_cur[IDX_NH3I] + + k[3609]*y_cur[IDX_NHI] + k[3797]*y_cur[IDX_OHI] + + k[6335]*y_cur[IDX_GRAINM]; + data[jistart + 14547] = 0.0 - k[3652]*y_cur[IDX_CH4I]; + data[jistart + 14548] = 0.0 + k[279]*y_cur[IDX_CH4II] + k[2073]*y_cur[IDX_CH3II] + + k[2123]*y_cur[IDX_C3HII] + k[2129]*y_cur[IDX_PH2II]; + data[jistart + 14549] = 0.0 + k[70]*y_cur[IDX_CH3I]; + data[jistart + 14550] = 0.0 + k[2228]*y_cur[IDX_CH5II]; + data[jistart + 14551] = 0.0 + k[2123]*y_cur[IDX_CH3OHI] - k[2160]*y_cur[IDX_CH4I] - + k[2161]*y_cur[IDX_CH4I]; + data[jistart + 14552] = 0.0 + k[3533]*y_cur[IDX_CH5II] + k[5035]*y_cur[IDX_CH3I] - + k[5297]*y_cur[IDX_CH4I]; + data[jistart + 14553] = 0.0 - k[2151]*y_cur[IDX_CH4I] - k[2152]*y_cur[IDX_CH4I] - + k[2153]*y_cur[IDX_CH4I]; + data[jistart + 14554] = 0.0 - k[2162]*y_cur[IDX_CH4I]; + data[jistart + 14555] = 0.0 - k[1976]*y_cur[IDX_CH4I] - k[1977]*y_cur[IDX_CH4I]; + data[jistart + 14556] = 0.0 - k[2209]*y_cur[IDX_CH4I] - k[2210]*y_cur[IDX_CH4I]; + data[jistart + 14557] = 0.0 - k[2195]*y_cur[IDX_CH4I]; + data[jistart + 14558] = 0.0 - k[1940]*y_cur[IDX_CH4I] - k[1941]*y_cur[IDX_CH4I] - + k[1942]*y_cur[IDX_CH4I]; + data[jistart + 14559] = 0.0 + k[2223]*y_cur[IDX_CH5II]; + data[jistart + 14560] = 0.0 - k[2208]*y_cur[IDX_CH4I]; + data[jistart + 14561] = 0.0 + k[2233]*y_cur[IDX_CH5II]; + data[jistart + 14562] = 0.0 + k[3609]*y_cur[IDX_CH5II] - k[5304]*y_cur[IDX_CH4I]; + data[jistart + 14563] = 0.0 + k[763]*y_cur[IDX_eM] + k[1667]*y_cur[IDX_CH2CCHI] + + k[1670]*y_cur[IDX_C2H6I] + k[1674]*y_cur[IDX_H2SI] + + k[6387]*y_cur[IDX_GRAINM]; + data[jistart + 14564] = 0.0 - k[2171]*y_cur[IDX_CH4I]; + data[jistart + 14565] = 0.0 - k[2206]*y_cur[IDX_CH4I]; + data[jistart + 14566] = 0.0 + k[1667]*y_cur[IDX_C2H4II]; + data[jistart + 14567] = 0.0 - k[546]*y_cur[IDX_CH4I] - k[3340]*y_cur[IDX_CH4I] - + k[3341]*y_cur[IDX_CH4I] - k[3342]*y_cur[IDX_CH4I]; + data[jistart + 14568] = 0.0 - k[2193]*y_cur[IDX_CH4I] - k[2194]*y_cur[IDX_CH4I]; + data[jistart + 14569] = 0.0 - k[5057]*y_cur[IDX_CH4I] - k[5058]*y_cur[IDX_CH4I]; + data[jistart + 14570] = 0.0 - k[652]*y_cur[IDX_CH4I] - k[3638]*y_cur[IDX_CH4I]; + data[jistart + 14571] = 0.0 - k[2169]*y_cur[IDX_CH4I] - k[2170]*y_cur[IDX_CH4I]; + data[jistart + 14572] = 0.0 + k[2000]*y_cur[IDX_CH5II] - k[4996]*y_cur[IDX_CH4I]; + data[jistart + 14573] = 0.0 + k[2232]*y_cur[IDX_CH5II]; + data[jistart + 14574] = 0.0 - k[2207]*y_cur[IDX_CH4I]; + data[jistart + 14575] = 0.0 + k[278]*y_cur[IDX_CH4II] + k[1685]*y_cur[IDX_C2H5II] + + k[1714]*y_cur[IDX_PH2II] + k[2045]*y_cur[IDX_CH3II] + + k[2219]*y_cur[IDX_CH5II]; + data[jistart + 14576] = 0.0 + k[5025]*y_cur[IDX_CH3I]; + data[jistart + 14577] = 0.0 + k[283]*y_cur[IDX_CH4II] - k[5060]*y_cur[IDX_CH4I]; + data[jistart + 14578] = 0.0 - k[5544]*y_cur[IDX_CH4I]; + data[jistart + 14579] = 0.0 + k[281]*y_cur[IDX_CH4II] + k[1674]*y_cur[IDX_C2H4II] + + k[2227]*y_cur[IDX_CH5II] + k[5032]*y_cur[IDX_CH3I]; + data[jistart + 14580] = 0.0 - k[2215]*y_cur[IDX_CH4I] - k[2216]*y_cur[IDX_CH4I]; + data[jistart + 14581] = 0.0 + k[1614]*y_cur[IDX_C2H6I] - k[2156]*y_cur[IDX_CH4I]; + data[jistart + 14582] = 0.0 + k[2230]*y_cur[IDX_CH5II] + k[5033]*y_cur[IDX_CH3I]; + data[jistart + 14583] = 0.0 - k[285]*y_cur[IDX_COII] - k[286]*y_cur[IDX_CO2II] - + k[371]*y_cur[IDX_HII] - k[442]*y_cur[IDX_H2II] - + k[514]*y_cur[IDX_HeII] - k[546]*y_cur[IDX_NII] - + k[652]*y_cur[IDX_OII] - k[1383]*y_cur[IDX_CII] - + k[1384]*y_cur[IDX_CII] - k[1940]*y_cur[IDX_CHII] - + k[1941]*y_cur[IDX_CHII] - k[1942]*y_cur[IDX_CHII] - + k[1976]*y_cur[IDX_CH2II] - k[1977]*y_cur[IDX_CH2II] - + k[2074]*y_cur[IDX_CH3II] - k[2138]*y_cur[IDX_CH4II] - + k[2146]*y_cur[IDX_C2II] - k[2147]*y_cur[IDX_C2II] - + k[2148]*y_cur[IDX_C2II] - k[2149]*y_cur[IDX_C2II] - + k[2150]*y_cur[IDX_C2II] - k[2151]*y_cur[IDX_C2HII] - + k[2152]*y_cur[IDX_C2HII] - k[2153]*y_cur[IDX_C2HII] - + k[2154]*y_cur[IDX_C2H2II] - k[2155]*y_cur[IDX_C2H2II] - + k[2156]*y_cur[IDX_C2H3II] - k[2157]*y_cur[IDX_C3II] - + k[2158]*y_cur[IDX_C3II] - k[2159]*y_cur[IDX_C3II] - + k[2160]*y_cur[IDX_C3HII] - k[2161]*y_cur[IDX_C3HII] - + k[2162]*y_cur[IDX_C3H2II] - k[2163]*y_cur[IDX_C3OII] - + k[2164]*y_cur[IDX_C4II] - k[2165]*y_cur[IDX_C4II] - + k[2166]*y_cur[IDX_C4II] - k[2167]*y_cur[IDX_C4II] - + k[2168]*y_cur[IDX_C4HII] - k[2169]*y_cur[IDX_C4H2II] - + k[2170]*y_cur[IDX_C4H2II] - k[2171]*y_cur[IDX_C4H3II] - + k[2172]*y_cur[IDX_C4NII] - k[2173]*y_cur[IDX_C4NII] - + k[2174]*y_cur[IDX_C4NII] - k[2175]*y_cur[IDX_C4NII] - + k[2176]*y_cur[IDX_C5II] - k[2177]*y_cur[IDX_C5II] - + k[2178]*y_cur[IDX_C5II] - k[2179]*y_cur[IDX_C5II] - + k[2180]*y_cur[IDX_C5H2II] - k[2181]*y_cur[IDX_C5H2II] - + k[2182]*y_cur[IDX_C6II] - k[2183]*y_cur[IDX_C6II] - + k[2184]*y_cur[IDX_C6II] - k[2185]*y_cur[IDX_C6H2II] - + k[2186]*y_cur[IDX_C6H2II] - k[2187]*y_cur[IDX_C7H2II] - + k[2188]*y_cur[IDX_C8H2II] - k[2189]*y_cur[IDX_COII] - + k[2190]*y_cur[IDX_COII] - k[2191]*y_cur[IDX_CO2II] - + k[2192]*y_cur[IDX_CSII] - k[2193]*y_cur[IDX_H2COII] - + k[2194]*y_cur[IDX_H2COII] - k[2195]*y_cur[IDX_H2OII] - + k[2196]*y_cur[IDX_HC3NII] - k[2197]*y_cur[IDX_HC3NII] - + k[2198]*y_cur[IDX_HC3NII] - k[2199]*y_cur[IDX_HCNII] - + k[2200]*y_cur[IDX_HCNII] - k[2201]*y_cur[IDX_HCO2II] - + k[2202]*y_cur[IDX_HNOII] - k[2203]*y_cur[IDX_HSII] - + k[2204]*y_cur[IDX_N2II] - k[2205]*y_cur[IDX_N2II] - + k[2206]*y_cur[IDX_N2HII] - k[2207]*y_cur[IDX_NH3II] - + k[2208]*y_cur[IDX_O2II] - k[2209]*y_cur[IDX_OHII] - + k[2210]*y_cur[IDX_OHII] - k[2211]*y_cur[IDX_PII] - + k[2212]*y_cur[IDX_PHII] - k[2213]*y_cur[IDX_PHII] - + k[2214]*y_cur[IDX_PH2II] - k[2215]*y_cur[IDX_SII] - + k[2216]*y_cur[IDX_SII] - k[2333]*y_cur[IDX_HII] - + k[2378]*y_cur[IDX_H2II] - k[2379]*y_cur[IDX_H2II] - + k[2669]*y_cur[IDX_H3II] - k[3198]*y_cur[IDX_HeII] - + k[3199]*y_cur[IDX_HeII] - k[3200]*y_cur[IDX_HeII] - + k[3201]*y_cur[IDX_HeII] - k[3340]*y_cur[IDX_NII] - + k[3341]*y_cur[IDX_NII] - k[3342]*y_cur[IDX_NII] - + k[3638]*y_cur[IDX_OII] - k[3652]*y_cur[IDX_OM] - + k[4871]*y_cur[IDX_C2I] - k[4996]*y_cur[IDX_CH2I] - + k[5057]*y_cur[IDX_C4HI] - k[5058]*y_cur[IDX_C4HI] - + k[5059]*y_cur[IDX_CNI] - k[5060]*y_cur[IDX_O2I] - + k[5061]*y_cur[IDX_OHI] - k[5062]*y_cur[IDX_SI] - + k[5074]*y_cur[IDX_CHI] - k[5159]*y_cur[IDX_HI] - + k[5297]*y_cur[IDX_NH2I] - k[5304]*y_cur[IDX_NHI] - + k[5385]*y_cur[IDX_OI] - k[5543]*y_cur[IDX_HCOII] - + k[5544]*y_cur[IDX_SiII] - k[5820] - k[6127] - k[6128] - k[6129] - + k[6130] - k[6898]; + data[jistart + 14584] = 0.0 + k[2220]*y_cur[IDX_CH5II]; + data[jistart + 14585] = 0.0 + k[280]*y_cur[IDX_CH4II] + k[2077]*y_cur[IDX_CH3II] + + k[2225]*y_cur[IDX_CH5II] + k[5030]*y_cur[IDX_CH3I]; + data[jistart + 14586] = 0.0 + k[2229]*y_cur[IDX_CH5II] + k[2863]*y_cur[IDX_C2H7II]; + data[jistart + 14587] = 0.0 + k[2244]*y_cur[IDX_CH5II] - k[5074]*y_cur[IDX_CH4I]; + data[jistart + 14588] = 0.0 + k[2235]*y_cur[IDX_CH5II] - k[5062]*y_cur[IDX_CH4I]; + data[jistart + 14589] = 0.0 + k[2217]*y_cur[IDX_CH5II] - k[4871]*y_cur[IDX_CH4I]; + data[jistart + 14590] = 0.0 + k[3797]*y_cur[IDX_CH5II] + k[5045]*y_cur[IDX_CH3I] - + k[5061]*y_cur[IDX_CH4I]; + data[jistart + 14591] = 0.0 + k[282]*y_cur[IDX_CH4II] + k[3571]*y_cur[IDX_CH5II] + + k[5036]*y_cur[IDX_CH3I]; + data[jistart + 14592] = 0.0 - k[2154]*y_cur[IDX_CH4I] - k[2155]*y_cur[IDX_CH4I]; + data[jistart + 14593] = 0.0 + k[2045]*y_cur[IDX_C2H4I] + k[2062]*y_cur[IDX_C2H6I] + + k[2065]*y_cur[IDX_CH3CHOI] + k[2072]*y_cur[IDX_CH3OCH3I] + + k[2073]*y_cur[IDX_CH3OHI] - k[2074]*y_cur[IDX_CH4I] + + k[2077]*y_cur[IDX_H2COI] + k[2099]*y_cur[IDX_SiH4I]; + data[jistart + 14594] = 0.0 + k[277]*y_cur[IDX_CH4II] + k[1538]*y_cur[IDX_C2H5II] + + k[2218]*y_cur[IDX_CH5II]; + data[jistart + 14595] = 0.0 - k[5059]*y_cur[IDX_CH4I]; + data[jistart + 14596] = 0.0 + k[8579]*y_cur[IDX_GCH3I]; + data[jistart + 14597] = 0.0 + k[70]*y_cur[IDX_HM] + k[5025]*y_cur[IDX_C2H3I] + + k[5028]*y_cur[IDX_CH3I] + k[5028]*y_cur[IDX_CH3I] + + k[5030]*y_cur[IDX_H2COI] + k[5031]*y_cur[IDX_H2OI] + + k[5032]*y_cur[IDX_H2SI] + k[5033]*y_cur[IDX_HCOI] + + k[5034]*y_cur[IDX_HNOI] + k[5035]*y_cur[IDX_NH2I] + + k[5036]*y_cur[IDX_NH3I] + k[5042]*y_cur[IDX_O2HI] + + k[5045]*y_cur[IDX_OHI] + k[5136]*y_cur[IDX_H2I]; + data[jistart + 14598] = 0.0 - k[5385]*y_cur[IDX_CH4I]; + data[jistart + 14599] = 0.0 - k[514]*y_cur[IDX_CH4I] - k[3198]*y_cur[IDX_CH4I] - + k[3199]*y_cur[IDX_CH4I] - k[3200]*y_cur[IDX_CH4I] - + k[3201]*y_cur[IDX_CH4I]; + data[jistart + 14600] = 0.0 + k[1367]*y_cur[IDX_C2H6I] - k[1383]*y_cur[IDX_CH4I] - + k[1384]*y_cur[IDX_CH4I]; + data[jistart + 14601] = 0.0 + k[2226]*y_cur[IDX_CH5II] + k[5031]*y_cur[IDX_CH3I]; + data[jistart + 14602] = 0.0 - k[371]*y_cur[IDX_CH4I] - k[2333]*y_cur[IDX_CH4I]; + data[jistart + 14603] = 0.0 + k[1898]*y_cur[IDX_CH5II]; + data[jistart + 14604] = 0.0 - k[5543]*y_cur[IDX_CH4I]; + data[jistart + 14605] = 0.0 + k[2594]*y_cur[IDX_C2H5OHI] + k[2596]*y_cur[IDX_C2H5OHI] + + k[2649]*y_cur[IDX_CH3CHCH2I] + k[2659]*y_cur[IDX_CH3COCH3I] + + k[2662]*y_cur[IDX_CH3COCH3I] + k[2664]*y_cur[IDX_CH3COCH3I] - + k[2669]*y_cur[IDX_CH4I]; + data[jistart + 14606] = 0.0 + k[2224]*y_cur[IDX_CH5II]; + data[jistart + 14607] = 0.0 + k[6335]*y_cur[IDX_CH5II] + k[6387]*y_cur[IDX_C2H4II] + + k[6564]*y_cur[IDX_CH3CHOHII] + k[6577]*y_cur[IDX_C2H5OHII] + + k[6598]*y_cur[IDX_PCH4II] + k[6603]*y_cur[IDX_CH3OCH4II]; + data[jistart + 14608] = 0.0 + k[5136]*y_cur[IDX_CH3I]; + data[jistart + 14609] = 0.0 + k[763]*y_cur[IDX_C2H4II] + k[773]*y_cur[IDX_C2H5OHII] + + k[942]*y_cur[IDX_CH3CHOHII] + k[957]*y_cur[IDX_CH3OCH4II] + + k[975]*y_cur[IDX_CH5II] + k[1204]*y_cur[IDX_PCH4II]; + data[jistart + 14610] = 0.0 - k[5159]*y_cur[IDX_CH4I]; + data[jistart + 14611] = 0.0 + k[1195]*y_cur[IDX_eM] + k[6813]*y_cur[IDX_GRAINM]; + data[jistart + 14612] = 0.0 + k[1074]*y_cur[IDX_eM] + k[6818]*y_cur[IDX_GRAINM]; + data[jistart + 14613] = 0.0 + k[1080]*y_cur[IDX_eM] + k[6792]*y_cur[IDX_GRAINM]; + data[jistart + 14614] = 0.0 + k[1077]*y_cur[IDX_eM] + k[6787]*y_cur[IDX_GRAINM]; + data[jistart + 14615] = 0.0 + k[1055]*y_cur[IDX_eM] + k[6486]*y_cur[IDX_GRAINM]; + data[jistart + 14616] = 0.0 + k[3309]*y_cur[IDX_HeII]; + data[jistart + 14617] = 0.0 + k[5202]*y_cur[IDX_CI]; + data[jistart + 14618] = 0.0 + k[3310]*y_cur[IDX_HeII]; + data[jistart + 14619] = 0.0 + k[7090] + k[7272] + k[7454]; + data[jistart + 14620] = 0.0 + k[1397]*y_cur[IDX_CII]; + data[jistart + 14621] = 0.0 + k[1226]*y_cur[IDX_eM] + k[6649]*y_cur[IDX_GRAINM]; + data[jistart + 14622] = 0.0 + k[3151]*y_cur[IDX_HeII]; + data[jistart + 14623] = 0.0 + k[3025]*y_cur[IDX_HII] + k[5866]; + data[jistart + 14624] = 0.0 + k[1064]*y_cur[IDX_eM] + k[6630]*y_cur[IDX_GRAINM]; + data[jistart + 14625] = 0.0 + k[3144]*y_cur[IDX_HeII] - k[4893]*y_cur[IDX_C2HI]; + data[jistart + 14626] = 0.0 + k[3136]*y_cur[IDX_HeII] - k[4892]*y_cur[IDX_C2HI]; + data[jistart + 14627] = 0.0 + k[801]*y_cur[IDX_eM] + k[6479]*y_cur[IDX_GRAINM]; + data[jistart + 14628] = 0.0 + k[1515]*y_cur[IDX_C2H2II]; + data[jistart + 14629] = 0.0 - k[4903]*y_cur[IDX_C2HI]; + data[jistart + 14630] = 0.0 - k[1740]*y_cur[IDX_C2HI]; + data[jistart + 14631] = 0.0 + k[8586]*y_cur[IDX_GHI]; + data[jistart + 14632] = 0.0 - k[1749]*y_cur[IDX_C2HI]; + data[jistart + 14633] = 0.0 - k[1739]*y_cur[IDX_C2HI]; + data[jistart + 14634] = 0.0 - k[1747]*y_cur[IDX_C2HI]; + data[jistart + 14635] = 0.0 + k[3127]*y_cur[IDX_HeII] - k[4891]*y_cur[IDX_C2HI] + k[5750]; + data[jistart + 14636] = 0.0 + k[3119]*y_cur[IDX_HeII] - k[4890]*y_cur[IDX_C2HI] + k[5740] + + k[6025]; + data[jistart + 14637] = 0.0 - k[1738]*y_cur[IDX_C2HI] + k[2852]*y_cur[IDX_C4H2I]; + data[jistart + 14638] = 0.0 - k[4894]*y_cur[IDX_C2HI] - k[4895]*y_cur[IDX_C2HI]; + data[jistart + 14639] = 0.0 - k[241]*y_cur[IDX_C2HI]; + data[jistart + 14640] = 0.0 - k[4889]*y_cur[IDX_C2HI]; + data[jistart + 14641] = 0.0 - k[243]*y_cur[IDX_C2HI]; + data[jistart + 14642] = 0.0 + k[4031]*y_cur[IDX_C2HM]; + data[jistart + 14643] = 0.0 - k[1745]*y_cur[IDX_C2HI]; + data[jistart + 14644] = 0.0 - k[4898]*y_cur[IDX_C2HI]; + data[jistart + 14645] = 0.0 - k[1734]*y_cur[IDX_C2HI] - k[1735]*y_cur[IDX_C2HI]; + data[jistart + 14646] = 0.0 + k[4034]*y_cur[IDX_C2HM]; + data[jistart + 14647] = 0.0 - k[3480]*y_cur[IDX_C2HI]; + data[jistart + 14648] = 0.0 + k[55]*y_cur[IDX_CI]; + data[jistart + 14649] = 0.0 - k[439]*y_cur[IDX_C2HI] - k[2373]*y_cur[IDX_C2HI]; + data[jistart + 14650] = 0.0 - k[4905]*y_cur[IDX_C2HI]; + data[jistart + 14651] = 0.0 - k[3508]*y_cur[IDX_C2HI]; + data[jistart + 14652] = 0.0 + k[4060]*y_cur[IDX_C2HM]; + data[jistart + 14653] = 0.0 + k[4026]*y_cur[IDX_CII] + k[4027]*y_cur[IDX_C2H2II] + + k[4028]*y_cur[IDX_C2H3II] + k[4029]*y_cur[IDX_C4H2II] + + k[4030]*y_cur[IDX_C4H3II] + k[4031]*y_cur[IDX_C4SII] + + k[4032]*y_cur[IDX_CH2CCHII] + k[4033]*y_cur[IDX_CH3II] + + k[4034]*y_cur[IDX_CNCII] + k[4035]*y_cur[IDX_FeII] + + k[4036]*y_cur[IDX_HII] + k[4037]*y_cur[IDX_H2COII] + + k[4038]*y_cur[IDX_H2SII] + k[4039]*y_cur[IDX_H3II] + + k[4040]*y_cur[IDX_H3OII] + k[4041]*y_cur[IDX_HC2SII] + + k[4042]*y_cur[IDX_HCNHII] + k[4043]*y_cur[IDX_HCNHII] + + k[4044]*y_cur[IDX_HCOII] + k[4045]*y_cur[IDX_HCOII] + + k[4046]*y_cur[IDX_HeII] + k[4047]*y_cur[IDX_MgII] + + k[4048]*y_cur[IDX_NII] + k[4049]*y_cur[IDX_N2HII] + + k[4050]*y_cur[IDX_NH3II] + k[4051]*y_cur[IDX_NH4II] + + k[4052]*y_cur[IDX_NOII] + k[4053]*y_cur[IDX_NaII] + + k[4054]*y_cur[IDX_OII] + k[4055]*y_cur[IDX_SII] + + k[4056]*y_cur[IDX_SOII] + k[4057]*y_cur[IDX_SiII] + + k[4058]*y_cur[IDX_SiOII] + k[4059]*y_cur[IDX_SiOHII] + + k[4060]*y_cur[IDX_SiSII] + k[5695] + k[5980]; + data[jistart + 14654] = 0.0 - k[242]*y_cur[IDX_C2HI] - k[1743]*y_cur[IDX_C2HI]; + data[jistart + 14655] = 0.0 + k[1364]*y_cur[IDX_CII] - k[4896]*y_cur[IDX_C2HI] - + k[4897]*y_cur[IDX_C2HI]; + data[jistart + 14656] = 0.0 - k[2220]*y_cur[IDX_C2HI]; + data[jistart + 14657] = 0.0 + k[4041]*y_cur[IDX_C2HM]; + data[jistart + 14658] = 0.0 + k[3395]*y_cur[IDX_NI]; + data[jistart + 14659] = 0.0 + k[2]*y_cur[IDX_CHI]; + data[jistart + 14660] = 0.0 - k[4899]*y_cur[IDX_C2HI]; + data[jistart + 14661] = 0.0 + k[66]*y_cur[IDX_C2I] - k[67]*y_cur[IDX_C2HI]; + data[jistart + 14662] = 0.0 + k[1398]*y_cur[IDX_CII] + k[5846] + k[6171]; + data[jistart + 14663] = 0.0 + k[789]*y_cur[IDX_eM] + k[1755]*y_cur[IDX_C4H2I] + + k[6459]*y_cur[IDX_GRAINM]; + data[jistart + 14664] = 0.0 - k[1732]*y_cur[IDX_C2HI] - k[1733]*y_cur[IDX_C2HI]; + data[jistart + 14665] = 0.0 + k[87]*y_cur[IDX_HI]; + data[jistart + 14666] = 0.0 + k[4058]*y_cur[IDX_C2HM]; + data[jistart + 14667] = 0.0 + k[8655]*y_cur[IDX_GCI]; + data[jistart + 14668] = 0.0 + k[4059]*y_cur[IDX_C2HM]; + data[jistart + 14669] = 0.0 + k[3531]*y_cur[IDX_C2H2II]; + data[jistart + 14670] = 0.0 + k[1317]*y_cur[IDX_CII]; + data[jistart + 14671] = 0.0 + k[212]*y_cur[IDX_NOI] + k[213]*y_cur[IDX_SI]; + data[jistart + 14672] = 0.0 - k[1731]*y_cur[IDX_C2HI] + k[3695]*y_cur[IDX_OI]; + data[jistart + 14673] = 0.0 - k[1975]*y_cur[IDX_C2HI]; + data[jistart + 14674] = 0.0 - k[686]*y_cur[IDX_C2HI] - k[3770]*y_cur[IDX_C2HI]; + data[jistart + 14675] = 0.0 - k[465]*y_cur[IDX_C2HI] - k[2504]*y_cur[IDX_C2HI]; + data[jistart + 14676] = 0.0 - k[1935]*y_cur[IDX_C2HI]; + data[jistart + 14677] = 0.0 + k[4035]*y_cur[IDX_C2HM]; + data[jistart + 14678] = 0.0 + k[4047]*y_cur[IDX_C2HM]; + data[jistart + 14679] = 0.0 + k[4053]*y_cur[IDX_C2HM]; + data[jistart + 14680] = 0.0 + k[8655]*y_cur[IDX_GCHI]; + data[jistart + 14681] = 0.0 + k[760]*y_cur[IDX_eM] - k[1729]*y_cur[IDX_C2HI] - + k[1730]*y_cur[IDX_C2HI] + k[6384]*y_cur[IDX_GRAINM]; + data[jistart + 14682] = 0.0 - k[1737]*y_cur[IDX_C2HI] + k[4030]*y_cur[IDX_C2HM]; + data[jistart + 14683] = 0.0 - k[1748]*y_cur[IDX_C2HI] + k[4049]*y_cur[IDX_C2HM]; + data[jistart + 14684] = 0.0 + k[4056]*y_cur[IDX_C2HM]; + data[jistart + 14685] = 0.0 - k[1741]*y_cur[IDX_C2HI] - k[1742]*y_cur[IDX_C2HI] + + k[4032]*y_cur[IDX_C2HM]; + data[jistart + 14686] = 0.0 + k[5753] + k[6040]; + data[jistart + 14687] = 0.0 + k[5742] + k[6027]; + data[jistart + 14688] = 0.0 + k[4038]*y_cur[IDX_C2HM]; + data[jistart + 14689] = 0.0 - k[543]*y_cur[IDX_C2HI] + k[4048]*y_cur[IDX_C2HM]; + data[jistart + 14690] = 0.0 + k[5357]*y_cur[IDX_OI]; + data[jistart + 14691] = 0.0 - k[1744]*y_cur[IDX_C2HI] + k[4037]*y_cur[IDX_C2HM]; + data[jistart + 14692] = 0.0 + k[5731] + k[6016]; + data[jistart + 14693] = 0.0 + k[4052]*y_cur[IDX_C2HM]; + data[jistart + 14694] = 0.0 - k[649]*y_cur[IDX_C2HI] - k[3634]*y_cur[IDX_C2HI] + + k[4054]*y_cur[IDX_C2HM]; + data[jistart + 14695] = 0.0 + k[1402]*y_cur[IDX_CII] + k[1755]*y_cur[IDX_C3HII] + + k[2852]*y_cur[IDX_C5H2II] + k[3238]*y_cur[IDX_HeII] - + k[4900]*y_cur[IDX_C2HI] + k[5847] + k[5847] + k[6172] + k[6172]; + data[jistart + 14696] = 0.0 + k[822]*y_cur[IDX_eM] + k[822]*y_cur[IDX_eM] - + k[1736]*y_cur[IDX_C2HI] + k[4029]*y_cur[IDX_C2HM] + + k[6627]*y_cur[IDX_GRAINM] + k[6627]*y_cur[IDX_GRAINM]; + data[jistart + 14697] = 0.0 + k[4042]*y_cur[IDX_C2HM] + k[4043]*y_cur[IDX_C2HM]; + data[jistart + 14698] = 0.0 + k[4944]*y_cur[IDX_CI]; + data[jistart + 14699] = 0.0 + k[1525]*y_cur[IDX_C2H2II] - k[4902]*y_cur[IDX_C2HI]; + data[jistart + 14700] = 0.0 + k[4050]*y_cur[IDX_C2HM]; + data[jistart + 14701] = 0.0 + k[1577]*y_cur[IDX_C2H3II]; + data[jistart + 14702] = 0.0 + k[4051]*y_cur[IDX_C2HM]; + data[jistart + 14703] = 0.0 - k[4904]*y_cur[IDX_C2HI]; + data[jistart + 14704] = 0.0 - k[1751]*y_cur[IDX_C2HI] + k[4057]*y_cur[IDX_C2HM]; + data[jistart + 14705] = 0.0 + k[1518]*y_cur[IDX_C2H2II]; + data[jistart + 14706] = 0.0 - k[1750]*y_cur[IDX_C2HI] + k[4055]*y_cur[IDX_C2HM]; + data[jistart + 14707] = 0.0 + k[749]*y_cur[IDX_eM] + k[750]*y_cur[IDX_eM] + + k[751]*y_cur[IDX_eM] + k[752]*y_cur[IDX_eM] + + k[1577]*y_cur[IDX_C2H3I] - k[1726]*y_cur[IDX_C2HI] - + k[1727]*y_cur[IDX_C2HI] - k[1728]*y_cur[IDX_C2HI] + + k[4028]*y_cur[IDX_C2HM] + k[6364]*y_cur[IDX_GRAINM] + k[6365]*y_cur[IDX_GRAINM] + k[6366]*y_cur[IDX_GRAINM] + - k[6367]*y_cur[IDX_GRAINM] + k[6368]*y_cur[IDX_GRAINM] + - k[6369]*y_cur[IDX_GRAINM] + k[6370]*y_cur[IDX_GRAINM] + - k[6371]*y_cur[IDX_GRAINM]; - data[jistart + 10835] = 0.0 + k[6381]*y_cur[IDX_GRAINM] + - k[6382]*y_cur[IDX_GRAINM] + k[6383]*y_cur[IDX_GRAINM] + - k[6384]*y_cur[IDX_GRAINM] + k[6385]*y_cur[IDX_GRAINM] + - k[6386]*y_cur[IDX_GRAINM] + k[6387]*y_cur[IDX_GRAINM]; - data[jistart + 10836] = 0.0 + k[6391]*y_cur[IDX_GRAINM] + - k[6392]*y_cur[IDX_GRAINM] + k[6393]*y_cur[IDX_GRAINM] + - k[6394]*y_cur[IDX_GRAINM] + k[6395]*y_cur[IDX_GRAINM]; - data[jistart + 10837] = 0.0 + k[6671]*y_cur[IDX_GRAINM] + - k[6672]*y_cur[IDX_GRAINM] + k[6673]*y_cur[IDX_GRAINM]; - data[jistart + 10838] = 0.0 + k[6576]*y_cur[IDX_GRAINM] + - k[6577]*y_cur[IDX_GRAINM]; - data[jistart + 10839] = 0.0 + k[6606]*y_cur[IDX_GRAINM] + - k[6607]*y_cur[IDX_GRAINM] + k[6608]*y_cur[IDX_GRAINM] + - k[6609]*y_cur[IDX_GRAINM]; - data[jistart + 10840] = 0.0 + k[6410]*y_cur[IDX_GRAINM] + - k[6411]*y_cur[IDX_GRAINM]; - data[jistart + 10841] = 0.0 + k[6419]*y_cur[IDX_GRAINM] + - k[6420]*y_cur[IDX_GRAINM]; - data[jistart + 10842] = 0.0 + k[6466]*y_cur[IDX_GRAINM] + - k[6467]*y_cur[IDX_GRAINM]; - data[jistart + 10843] = 0.0 + k[6635]*y_cur[IDX_GRAINM] + - k[6636]*y_cur[IDX_GRAINM]; - data[jistart + 10844] = 0.0 + k[6472]*y_cur[IDX_GRAINM]; - data[jistart + 10845] = 0.0 + k[6474]*y_cur[IDX_GRAINM]; - data[jistart + 10846] = 0.0 + k[6674]*y_cur[IDX_GRAINM] + - k[6675]*y_cur[IDX_GRAINM]; - data[jistart + 10847] = 0.0 + k[6455]*y_cur[IDX_GRAINM]; - data[jistart + 10848] = 0.0 + k[6459]*y_cur[IDX_GRAINM] + - k[6460]*y_cur[IDX_GRAINM]; - data[jistart + 10849] = 0.0 + k[6461]*y_cur[IDX_GRAINM] + - k[6462]*y_cur[IDX_GRAINM] + k[6463]*y_cur[IDX_GRAINM] + - k[6464]*y_cur[IDX_GRAINM] + k[6465]*y_cur[IDX_GRAINM]; - data[jistart + 10850] = 0.0 + k[6655]*y_cur[IDX_GRAINM] + - k[6656]*y_cur[IDX_GRAINM]; - data[jistart + 10851] = 0.0 + k[6473]*y_cur[IDX_GRAINM]; - data[jistart + 10852] = 0.0 + k[6477]*y_cur[IDX_GRAINM] + - k[6478]*y_cur[IDX_GRAINM] + k[6479]*y_cur[IDX_GRAINM] + - k[6480]*y_cur[IDX_GRAINM]; - data[jistart + 10853] = 0.0 + k[6482]*y_cur[IDX_GRAINM] + - k[6483]*y_cur[IDX_GRAINM]; - data[jistart + 10854] = 0.0 + k[6499]*y_cur[IDX_GRAINM] + - k[6500]*y_cur[IDX_GRAINM]; - data[jistart + 10855] = 0.0 + k[6504]*y_cur[IDX_GRAINM] + - k[6505]*y_cur[IDX_GRAINM] + k[6506]*y_cur[IDX_GRAINM] + - k[6507]*y_cur[IDX_GRAINM] + k[6508]*y_cur[IDX_GRAINM] + - k[6509]*y_cur[IDX_GRAINM] + k[6510]*y_cur[IDX_GRAINM]; - data[jistart + 10856] = 0.0 + k[6626]*y_cur[IDX_GRAINM]; - data[jistart + 10857] = 0.0 + k[6644]*y_cur[IDX_GRAINM]; - data[jistart + 10858] = 0.0 + k[6775]*y_cur[IDX_GRAINM] + - k[6776]*y_cur[IDX_GRAINM] + k[6777]*y_cur[IDX_GRAINM]; - data[jistart + 10859] = 0.0 + k[6615]*y_cur[IDX_GRAINM] + - k[6616]*y_cur[IDX_GRAINM]; - data[jistart + 10860] = 0.0 + k[6621]*y_cur[IDX_GRAINM]; - data[jistart + 10861] = 0.0 + k[6627]*y_cur[IDX_GRAINM] + - k[6628]*y_cur[IDX_GRAINM]; - data[jistart + 10862] = 0.0 + k[6633]*y_cur[IDX_GRAINM] + - k[6634]*y_cur[IDX_GRAINM]; - data[jistart + 10863] = 0.0 + k[6641]*y_cur[IDX_GRAINM]; - data[jistart + 10864] = 0.0 + k[6645]*y_cur[IDX_GRAINM] + - k[6646]*y_cur[IDX_GRAINM] + k[6647]*y_cur[IDX_GRAINM]; - data[jistart + 10865] = 0.0 + k[6667]*y_cur[IDX_GRAINM]; - data[jistart + 10866] = 0.0 + k[6740]*y_cur[IDX_GRAINM] + - k[6741]*y_cur[IDX_GRAINM]; - data[jistart + 10867] = 0.0 + k[6809]*y_cur[IDX_GRAINM] + - k[6810]*y_cur[IDX_GRAINM]; - data[jistart + 10868] = 0.0 + k[6815]*y_cur[IDX_GRAINM] + - k[6816]*y_cur[IDX_GRAINM] + k[6817]*y_cur[IDX_GRAINM]; - data[jistart + 10869] = 0.0 + k[6709]*y_cur[IDX_GRAINM]; - data[jistart + 10870] = 0.0 + k[6721]*y_cur[IDX_GRAINM] + - k[6722]*y_cur[IDX_GRAINM]; - data[jistart + 10871] = 0.0 + k[6738]*y_cur[IDX_GRAINM] + - k[6739]*y_cur[IDX_GRAINM]; - data[jistart + 10872] = 0.0 + k[6742]*y_cur[IDX_GRAINM] + - k[6743]*y_cur[IDX_GRAINM]; - data[jistart + 10873] = 0.0 + k[6753]*y_cur[IDX_GRAINM] + - k[6754]*y_cur[IDX_GRAINM]; - data[jistart + 10874] = 0.0 + k[6784]*y_cur[IDX_GRAINM]; - data[jistart + 10875] = 0.0 + k[6780]*y_cur[IDX_GRAINM] + - k[6781]*y_cur[IDX_GRAINM]; - data[jistart + 10876] = 0.0 + k[6782]*y_cur[IDX_GRAINM] + - k[6783]*y_cur[IDX_GRAINM]; - data[jistart + 10877] = 0.0 + k[6785]*y_cur[IDX_GRAINM] + - k[6786]*y_cur[IDX_GRAINM]; - data[jistart + 10878] = 0.0 + k[6789]*y_cur[IDX_GRAINM] + - k[6790]*y_cur[IDX_GRAINM]; - data[jistart + 10879] = 0.0 + k[6796]*y_cur[IDX_GRAINM] + - k[6797]*y_cur[IDX_GRAINM]; - data[jistart + 10880] = 0.0 + k[6802]*y_cur[IDX_GRAINM] + - k[6803]*y_cur[IDX_GRAINM]; - data[jistart + 10881] = 0.0 + k[6806]*y_cur[IDX_GRAINM]; - data[jistart + 10882] = 0.0 + k[6807]*y_cur[IDX_GRAINM] + - k[6808]*y_cur[IDX_GRAINM]; - data[jistart + 10883] = 0.0 + k[6821]*y_cur[IDX_GRAINM] + - k[6822]*y_cur[IDX_GRAINM] + k[6823]*y_cur[IDX_GRAINM]; - data[jistart + 10884] = 0.0 + k[6824]*y_cur[IDX_GRAINM] + - k[6825]*y_cur[IDX_GRAINM]; - data[jistart + 10885] = 0.0 + k[6826]*y_cur[IDX_GRAINM] + - k[6827]*y_cur[IDX_GRAINM]; - data[jistart + 10886] = 0.0 + k[6828]*y_cur[IDX_GRAINM] + - k[6829]*y_cur[IDX_GRAINM]; - data[jistart + 10887] = 0.0 + k[6830]*y_cur[IDX_GRAINM] + - k[6831]*y_cur[IDX_GRAINM]; - data[jistart + 10888] = 0.0 + k[6832]*y_cur[IDX_GRAINM] + - k[6833]*y_cur[IDX_GRAINM]; - data[jistart + 10889] = 0.0 + k[6840]*y_cur[IDX_GRAINM]; - data[jistart + 10890] = 0.0 + k[6836]*y_cur[IDX_GRAINM] + - k[6837]*y_cur[IDX_GRAINM]; - data[jistart + 10891] = 0.0 + k[6838]*y_cur[IDX_GRAINM] + - k[6839]*y_cur[IDX_GRAINM]; - data[jistart + 10892] = 0.0 + k[6841]*y_cur[IDX_GRAINM] + - k[6842]*y_cur[IDX_GRAINM]; - data[jistart + 10893] = 0.0 + k[6845]*y_cur[IDX_GRAINM] + - k[6846]*y_cur[IDX_GRAINM]; - data[jistart + 10894] = 0.0 + k[6847]*y_cur[IDX_GRAINM] + - k[6848]*y_cur[IDX_GRAINM]; - data[jistart + 10895] = 0.0 + k[6853]*y_cur[IDX_GRAINM] + - k[6854]*y_cur[IDX_GRAINM]; - data[jistart + 10896] = 0.0 + k[6855]*y_cur[IDX_GRAINM] + - k[6856]*y_cur[IDX_GRAINM]; - data[jistart + 10897] = 0.0 + k[6857]*y_cur[IDX_GRAINM] + - k[6858]*y_cur[IDX_GRAINM]; - data[jistart + 10898] = 0.0 + k[6859]*y_cur[IDX_GRAINM] + - k[6860]*y_cur[IDX_GRAINM]; - data[jistart + 10899] = 0.0 + k[6861]*y_cur[IDX_GRAINM] + - k[6862]*y_cur[IDX_GRAINM]; - data[jistart + 10900] = 0.0 + k[6863]*y_cur[IDX_GRAINM] + - k[6864]*y_cur[IDX_GRAINM]; - data[jistart + 10901] = 0.0 + k[6865]*y_cur[IDX_GRAINM] + - k[6866]*y_cur[IDX_GRAINM]; - data[jistart + 10902] = 0.0 + k[6875]*y_cur[IDX_GRAINM]; - data[jistart + 10903] = 0.0 + k[6662]*y_cur[IDX_GRAINM] + - k[6663]*y_cur[IDX_GRAINM]; - data[jistart + 10904] = 0.0 + k[6599]*y_cur[IDX_GRAINM]; - data[jistart + 10905] = 0.0 + k[6423]*y_cur[IDX_GRAINM]; - data[jistart + 10906] = 0.0 + k[6315]*y_cur[IDX_GRAINM]; - data[jistart + 10907] = 0.0 + k[6316]*y_cur[IDX_GRAINM] + - k[6317]*y_cur[IDX_GRAINM] + k[6318]*y_cur[IDX_GRAINM]; - data[jistart + 10908] = 0.0 + k[6470]*y_cur[IDX_GRAINM] + - k[6471]*y_cur[IDX_GRAINM]; - data[jistart + 10909] = 0.0 + k[6651]*y_cur[IDX_GRAINM]; - data[jistart + 10910] = 0.0 + k[6657]*y_cur[IDX_GRAINM] + - k[6658]*y_cur[IDX_GRAINM] + k[6659]*y_cur[IDX_GRAINM]; - data[jistart + 10911] = 0.0 + k[6475]*y_cur[IDX_GRAINM] + - k[6476]*y_cur[IDX_GRAINM]; - data[jistart + 10912] = 0.0 + k[6492]*y_cur[IDX_GRAINM] + - k[6493]*y_cur[IDX_GRAINM] + k[6494]*y_cur[IDX_GRAINM]; - data[jistart + 10913] = 0.0 + k[6408]*y_cur[IDX_GRAINM] + - k[6409]*y_cur[IDX_GRAINM]; - data[jistart + 10914] = 0.0 + k[6727]*y_cur[IDX_GRAINM] + - k[6728]*y_cur[IDX_GRAINM] + k[6729]*y_cur[IDX_GRAINM] + - k[6730]*y_cur[IDX_GRAINM]; - data[jistart + 10915] = 0.0 + k[6701]*y_cur[IDX_GRAINM] + - k[6702]*y_cur[IDX_GRAINM] + k[6703]*y_cur[IDX_GRAINM] + - k[6704]*y_cur[IDX_GRAINM] + k[6705]*y_cur[IDX_GRAINM]; - data[jistart + 10916] = 0.0 + k[6696]*y_cur[IDX_GRAINM] + - k[6697]*y_cur[IDX_GRAINM] + k[6698]*y_cur[IDX_GRAINM]; - data[jistart + 10917] = 0.0 + k[6321]*y_cur[IDX_GRAINM] + - k[6322]*y_cur[IDX_GRAINM] + k[6323]*y_cur[IDX_GRAINM]; - data[jistart + 10918] = 0.0 + k[6760]*y_cur[IDX_GRAINM]; - data[jistart + 10919] = 0.0 + k[6765]*y_cur[IDX_GRAINM] + - k[6766]*y_cur[IDX_GRAINM]; - data[jistart + 10920] = 0.0 + k[6748]*y_cur[IDX_GRAINM] + - k[6749]*y_cur[IDX_GRAINM]; - data[jistart + 10921] = 0.0 + k[6834]*y_cur[IDX_GRAINM] + - k[6835]*y_cur[IDX_GRAINM]; - data[jistart + 10922] = 0.0 + k[6867]*y_cur[IDX_GRAINM] + - k[6868]*y_cur[IDX_GRAINM]; - data[jistart + 10923] = 0.0 + k[6547]*y_cur[IDX_GRAINM] + - k[6548]*y_cur[IDX_GRAINM]; - data[jistart + 10924] = 0.0 + k[6561]*y_cur[IDX_GRAINM] + - k[6562]*y_cur[IDX_GRAINM] + k[6563]*y_cur[IDX_GRAINM] + - k[6564]*y_cur[IDX_GRAINM] + k[6565]*y_cur[IDX_GRAINM]; - data[jistart + 10925] = 0.0 + k[6484]*y_cur[IDX_GRAINM] + - k[6485]*y_cur[IDX_GRAINM]; - data[jistart + 10926] = 0.0 + k[6502]*y_cur[IDX_GRAINM] + - k[6503]*y_cur[IDX_GRAINM]; - data[jistart + 10927] = 0.0 + k[6518]*y_cur[IDX_GRAINM] + - k[6519]*y_cur[IDX_GRAINM]; - data[jistart + 10928] = 0.0 + k[6683]*y_cur[IDX_GRAINM] + - k[6684]*y_cur[IDX_GRAINM]; - data[jistart + 10929] = 0.0 + k[6692]*y_cur[IDX_GRAINM] + - k[6693]*y_cur[IDX_GRAINM]; - data[jistart + 10930] = 0.0 + k[6711]*y_cur[IDX_GRAINM] + - k[6712]*y_cur[IDX_GRAINM] + k[6713]*y_cur[IDX_GRAINM] + - k[6714]*y_cur[IDX_GRAINM] + k[6715]*y_cur[IDX_GRAINM] + - k[6716]*y_cur[IDX_GRAINM]; - data[jistart + 10931] = 0.0 + k[6731]*y_cur[IDX_GRAINM] + - k[6732]*y_cur[IDX_GRAINM] + k[6733]*y_cur[IDX_GRAINM] + - k[6734]*y_cur[IDX_GRAINM] + k[6735]*y_cur[IDX_GRAINM] + - k[6736]*y_cur[IDX_GRAINM] + k[6737]*y_cur[IDX_GRAINM]; - data[jistart + 10932] = 0.0 + k[6688]*y_cur[IDX_GRAINM]; - data[jistart + 10933] = 0.0 + k[6405]*y_cur[IDX_GRAINM] + - k[6406]*y_cur[IDX_GRAINM]; - data[jistart + 10934] = 0.0 + k[6587]*y_cur[IDX_GRAINM] + - k[6588]*y_cur[IDX_GRAINM]; - data[jistart + 10935] = 0.0 + k[6603]*y_cur[IDX_GRAINM] + - k[6604]*y_cur[IDX_GRAINM] + k[6605]*y_cur[IDX_GRAINM]; - data[jistart + 10936] = 0.0 + k[6428]*y_cur[IDX_GRAINM] + - k[6429]*y_cur[IDX_GRAINM] + k[6430]*y_cur[IDX_GRAINM]; - data[jistart + 10937] = 0.0 + k[6440]*y_cur[IDX_GRAINM] + - k[6441]*y_cur[IDX_GRAINM] + k[6442]*y_cur[IDX_GRAINM] + - k[6443]*y_cur[IDX_GRAINM] + k[6444]*y_cur[IDX_GRAINM]; - data[jistart + 10938] = 0.0 + k[6327]*y_cur[IDX_GRAINM] + - k[6328]*y_cur[IDX_GRAINM]; - data[jistart + 10939] = 0.0 + k[6332]*y_cur[IDX_GRAINM] + - k[6333]*y_cur[IDX_GRAINM] + k[6334]*y_cur[IDX_GRAINM] + - k[6335]*y_cur[IDX_GRAINM] + k[6336]*y_cur[IDX_GRAINM]; - data[jistart + 10940] = 0.0 + k[6359]*y_cur[IDX_GRAINM]; - data[jistart + 10941] = 0.0 + k[6468]*y_cur[IDX_GRAINM] + - k[6469]*y_cur[IDX_GRAINM]; - data[jistart + 10942] = 0.0 + k[6373]*y_cur[IDX_GRAINM]; - data[jistart + 10943] = 0.0 + k[6540]*y_cur[IDX_GRAINM]; - data[jistart + 10944] = 0.0 + k[6694]*y_cur[IDX_GRAINM] + - k[6695]*y_cur[IDX_GRAINM]; - data[jistart + 10945] = 0.0 + k[6511]*y_cur[IDX_GRAINM]; - data[jistart + 10946] = 0.0 + k[6535]*y_cur[IDX_GRAINM]; - data[jistart + 10947] = 0.0 + k[6454]*y_cur[IDX_GRAINM]; - data[jistart + 10948] = 0.0 + k[6632]*y_cur[IDX_GRAINM]; - data[jistart + 10949] = 0.0 + k[6347]*y_cur[IDX_GRAINM]; - data[jistart + 10950] = 0.0 + k[6670]*y_cur[IDX_GRAINM]; - data[jistart + 10951] = 0.0 + k[6308]*y_cur[IDX_HII] + - k[6309]*y_cur[IDX_H2II] + k[6310]*y_cur[IDX_H3II] + - k[6311]*y_cur[IDX_H3II] + k[6312]*y_cur[IDX_HeII] + - k[6313]*y_cur[IDX_HeHII] + k[6314]*y_cur[IDX_CII] + - k[6315]*y_cur[IDX_CHII] + k[6316]*y_cur[IDX_CH2II] + - k[6317]*y_cur[IDX_CH2II] + k[6318]*y_cur[IDX_CH2II] + - k[6319]*y_cur[IDX_NII] + k[6320]*y_cur[IDX_NHII] + - k[6321]*y_cur[IDX_CH3II] + k[6322]*y_cur[IDX_CH3II] + - k[6323]*y_cur[IDX_CH3II] + k[6324]*y_cur[IDX_NH2II] + - k[6325]*y_cur[IDX_NH2II] + k[6326]*y_cur[IDX_OII] + - k[6327]*y_cur[IDX_CH4II] + k[6328]*y_cur[IDX_CH4II] + - k[6329]*y_cur[IDX_OHII] + k[6330]*y_cur[IDX_NH3II] + - k[6331]*y_cur[IDX_NH3II] + k[6332]*y_cur[IDX_CH5II] + - k[6333]*y_cur[IDX_CH5II] + k[6334]*y_cur[IDX_CH5II] + - k[6335]*y_cur[IDX_CH5II] + k[6336]*y_cur[IDX_CH5II] + - k[6337]*y_cur[IDX_NH4II] + k[6338]*y_cur[IDX_NH4II] + - k[6339]*y_cur[IDX_NH4II] + k[6340]*y_cur[IDX_H2OII] + - k[6341]*y_cur[IDX_H2OII] + k[6342]*y_cur[IDX_H2OII] + - k[6343]*y_cur[IDX_H3OII] + k[6344]*y_cur[IDX_H3OII] + - k[6345]*y_cur[IDX_H3OII] + k[6346]*y_cur[IDX_H3OII] + - k[6347]*y_cur[IDX_FII] + k[6348]*y_cur[IDX_HFII] + - k[6349]*y_cur[IDX_H2FII] + k[6350]*y_cur[IDX_H2FII] + - k[6351]*y_cur[IDX_NaII] + k[6352]*y_cur[IDX_C2II] + - k[6353]*y_cur[IDX_MgII] + k[6354]*y_cur[IDX_C2HII] + - k[6355]*y_cur[IDX_C2HII] + k[6356]*y_cur[IDX_C2H2II] + - k[6357]*y_cur[IDX_C2H2II] + k[6358]*y_cur[IDX_C2H2II] + - k[6359]*y_cur[IDX_CNII] + k[6360]*y_cur[IDX_C2H3II] + - k[6361]*y_cur[IDX_C2H3II] + k[6362]*y_cur[IDX_C2H3II] + - k[6363]*y_cur[IDX_C2H3II] + k[6364]*y_cur[IDX_C2H3II] + + k[6367]*y_cur[IDX_GRAINM]; + data[jistart + 14708] = 0.0 + k[212]*y_cur[IDX_C2HII]; + data[jistart + 14709] = 0.0 - k[67]*y_cur[IDX_HM] - k[241]*y_cur[IDX_CNII] - + k[242]*y_cur[IDX_COII] - k[243]*y_cur[IDX_N2II] - + k[329]*y_cur[IDX_HII] - k[439]*y_cur[IDX_H2II] - + k[465]*y_cur[IDX_H2OII] - k[543]*y_cur[IDX_NII] - + k[649]*y_cur[IDX_OII] - k[686]*y_cur[IDX_OHII] - + k[1308]*y_cur[IDX_CII] - k[1725]*y_cur[IDX_C2H2II] - + k[1726]*y_cur[IDX_C2H3II] - k[1727]*y_cur[IDX_C2H3II] - + k[1728]*y_cur[IDX_C2H3II] - k[1729]*y_cur[IDX_C2H4II] - + k[1730]*y_cur[IDX_C2H4II] - k[1731]*y_cur[IDX_C3H2II] - + k[1732]*y_cur[IDX_C3H3II] - k[1733]*y_cur[IDX_C3H3II] - + k[1734]*y_cur[IDX_C4HII] - k[1735]*y_cur[IDX_C4HII] - + k[1736]*y_cur[IDX_C4H2II] - k[1737]*y_cur[IDX_C4H3II] - + k[1738]*y_cur[IDX_C5H2II] - k[1739]*y_cur[IDX_C6H2II] - + k[1740]*y_cur[IDX_C7H2II] - k[1741]*y_cur[IDX_CH2CCHII] - + k[1742]*y_cur[IDX_CH2CCHII] - k[1743]*y_cur[IDX_COII] - + k[1744]*y_cur[IDX_H2COII] - k[1745]*y_cur[IDX_HCNII] - + k[1746]*y_cur[IDX_HCOII] - k[1747]*y_cur[IDX_HNOII] - + k[1748]*y_cur[IDX_N2HII] - k[1749]*y_cur[IDX_O2HII] - + k[1750]*y_cur[IDX_SII] - k[1751]*y_cur[IDX_SiII] - + k[1935]*y_cur[IDX_CHII] - k[1975]*y_cur[IDX_CH2II] - + k[2048]*y_cur[IDX_CH3II] - k[2049]*y_cur[IDX_CH3II] - + k[2220]*y_cur[IDX_CH5II] - k[2299]*y_cur[IDX_HII] - + k[2373]*y_cur[IDX_H2II] - k[2504]*y_cur[IDX_H2OII] - + k[2597]*y_cur[IDX_H3II] - k[3086]*y_cur[IDX_HeII] - + k[3087]*y_cur[IDX_HeII] - k[3088]*y_cur[IDX_HeII] - + k[3480]*y_cur[IDX_NHII] - k[3508]*y_cur[IDX_NH2II] - + k[3634]*y_cur[IDX_OII] - k[3770]*y_cur[IDX_OHII] - + k[4888]*y_cur[IDX_C2H2I] - k[4889]*y_cur[IDX_C3H2I] - + k[4890]*y_cur[IDX_C5H2I] - k[4891]*y_cur[IDX_C6H2I] - + k[4892]*y_cur[IDX_C7H2I] - k[4893]*y_cur[IDX_C8H2I] - + k[4894]*y_cur[IDX_CH2CCH2I] - k[4895]*y_cur[IDX_CH2CCH2I] - + k[4896]*y_cur[IDX_CH3CCHI] - k[4897]*y_cur[IDX_CH3CCHI] - + k[4898]*y_cur[IDX_CH3CHCH2I] - k[4899]*y_cur[IDX_CSI] - + k[4900]*y_cur[IDX_C4H2I] - k[4901]*y_cur[IDX_HCNI] - + k[4902]*y_cur[IDX_HNCI] - k[4903]*y_cur[IDX_NCCNI] - + k[4904]*y_cur[IDX_O2I] - k[4905]*y_cur[IDX_OCSI] - + k[4906]*y_cur[IDX_SI] - k[4916]*y_cur[IDX_CI] - + k[5133]*y_cur[IDX_H2I] - k[5228]*y_cur[IDX_NI] - + k[5352]*y_cur[IDX_OI] - k[5514]*y_cur[IDX_CNI] - + k[5590]*y_cur[IDX_eM] - k[5708] - k[5709] - k[5993] - k[5994] - + k[6908]; + data[jistart + 14710] = 0.0 + k[1523]*y_cur[IDX_C2H2II] - k[4901]*y_cur[IDX_C2HI]; + data[jistart + 14711] = 0.0 + k[2]*y_cur[IDX_CM]; + data[jistart + 14712] = 0.0 + k[213]*y_cur[IDX_C2HII] - k[4906]*y_cur[IDX_C2HI]; + data[jistart + 14713] = 0.0 + k[66]*y_cur[IDX_HM]; + data[jistart + 14714] = 0.0 + k[5453]*y_cur[IDX_C2H2I]; + data[jistart + 14715] = 0.0 + k[3556]*y_cur[IDX_C2H2II]; + data[jistart + 14716] = 0.0 + k[743]*y_cur[IDX_eM] + k[1515]*y_cur[IDX_CH3CNI] + + k[1518]*y_cur[IDX_H2SI] + k[1523]*y_cur[IDX_HCNI] + + k[1525]*y_cur[IDX_HNCI] - k[1725]*y_cur[IDX_C2HI] + + k[2522]*y_cur[IDX_H2OI] + k[3531]*y_cur[IDX_NH2I] + + k[3556]*y_cur[IDX_NH3I] + k[4027]*y_cur[IDX_C2HM] + + k[6357]*y_cur[IDX_GRAINM]; + data[jistart + 14717] = 0.0 - k[2048]*y_cur[IDX_C2HI] - k[2049]*y_cur[IDX_C2HI] + + k[4033]*y_cur[IDX_C2HM]; + data[jistart + 14718] = 0.0 - k[4888]*y_cur[IDX_C2HI] + k[5154]*y_cur[IDX_HI] + + k[5453]*y_cur[IDX_OHI] + k[5697] + k[5982]; + data[jistart + 14719] = 0.0 - k[5514]*y_cur[IDX_C2HI]; + data[jistart + 14720] = 0.0 + k[8586]*y_cur[IDX_GC2I]; + data[jistart + 14721] = 0.0 + k[3395]*y_cur[IDX_C3HM] - k[5228]*y_cur[IDX_C2HI]; + data[jistart + 14722] = 0.0 + k[4040]*y_cur[IDX_C2HM]; + data[jistart + 14723] = 0.0 + k[3695]*y_cur[IDX_C3H2II] - k[5352]*y_cur[IDX_C2HI] + + k[5357]*y_cur[IDX_C3HI]; + data[jistart + 14724] = 0.0 - k[3086]*y_cur[IDX_C2HI] - k[3087]*y_cur[IDX_C2HI] - + k[3088]*y_cur[IDX_C2HI] + k[3119]*y_cur[IDX_C5H2I] + + k[3127]*y_cur[IDX_C6H2I] + k[3136]*y_cur[IDX_C7H2I] + + k[3144]*y_cur[IDX_C8H2I] + k[3151]*y_cur[IDX_C9H2I] + + k[3238]*y_cur[IDX_C4H2I] + k[3309]*y_cur[IDX_SiC2H2I] + + k[3310]*y_cur[IDX_SiC2HI] + k[4046]*y_cur[IDX_C2HM]; + data[jistart + 14725] = 0.0 - k[1308]*y_cur[IDX_C2HI] + k[1317]*y_cur[IDX_C4H3I] + + k[1364]*y_cur[IDX_CH3CCHI] + k[1397]*y_cur[IDX_HC2PI] + + k[1398]*y_cur[IDX_HC3NI] + k[1402]*y_cur[IDX_C4H2I] + + k[4026]*y_cur[IDX_C2HM]; + data[jistart + 14726] = 0.0 + k[2522]*y_cur[IDX_C2H2II]; + data[jistart + 14727] = 0.0 - k[329]*y_cur[IDX_C2HI] - k[2299]*y_cur[IDX_C2HI] + + k[3025]*y_cur[IDX_HNC3I] + k[4036]*y_cur[IDX_C2HM]; + data[jistart + 14728] = 0.0 + k[55]*y_cur[IDX_CHM] - k[4916]*y_cur[IDX_C2HI] + + k[4944]*y_cur[IDX_CH2I] + k[5202]*y_cur[IDX_HCNOI]; + data[jistart + 14729] = 0.0 - k[1746]*y_cur[IDX_C2HI] + k[4044]*y_cur[IDX_C2HM] + + k[4045]*y_cur[IDX_C2HM]; + data[jistart + 14730] = 0.0 - k[2597]*y_cur[IDX_C2HI] + k[4039]*y_cur[IDX_C2HM]; + data[jistart + 14731] = 0.0 + k[6357]*y_cur[IDX_C2H2II] + k[6364]*y_cur[IDX_C2H3II] + k[6365]*y_cur[IDX_C2H3II] + k[6366]*y_cur[IDX_C2H3II] + - k[6367]*y_cur[IDX_C2H3II] + k[6368]*y_cur[IDX_C2H3II] + - k[6369]*y_cur[IDX_C2H3II] + k[6370]*y_cur[IDX_C2H3II] + - k[6371]*y_cur[IDX_C2H3II] + k[6372]*y_cur[IDX_HCNII] + - k[6373]*y_cur[IDX_COII] + k[6374]*y_cur[IDX_SiII] + - k[6375]*y_cur[IDX_N2II] + k[6376]*y_cur[IDX_H2NCII] + - k[6377]*y_cur[IDX_H2NCII] + k[6378]*y_cur[IDX_HCNHII] + - k[6379]*y_cur[IDX_HCNHII] + k[6380]*y_cur[IDX_HCNHII] + - k[6381]*y_cur[IDX_C2H4II] + k[6382]*y_cur[IDX_C2H4II] + - k[6383]*y_cur[IDX_C2H4II] + k[6384]*y_cur[IDX_C2H4II] + - k[6385]*y_cur[IDX_C2H4II] + k[6386]*y_cur[IDX_C2H4II] + - k[6387]*y_cur[IDX_C2H4II] + k[6388]*y_cur[IDX_SiHII] + - k[6389]*y_cur[IDX_HCOII] + k[6390]*y_cur[IDX_HOCII] + - k[6391]*y_cur[IDX_C2H5II] + k[6392]*y_cur[IDX_C2H5II] + - k[6393]*y_cur[IDX_C2H5II] + k[6394]*y_cur[IDX_C2H5II] + - k[6395]*y_cur[IDX_C2H5II] + k[6396]*y_cur[IDX_N2HII] + - k[6397]*y_cur[IDX_N2HII] + k[6398]*y_cur[IDX_H2COII] + - k[6399]*y_cur[IDX_H2COII] + k[6400]*y_cur[IDX_H2COII] + - k[6401]*y_cur[IDX_H2COII] + k[6402]*y_cur[IDX_SiH2II] + - k[6403]*y_cur[IDX_SiH2II] + k[6404]*y_cur[IDX_SiH2II] + - k[6405]*y_cur[IDX_CH3NHII] + k[6406]*y_cur[IDX_CH3NHII] + - k[6407]*y_cur[IDX_NOII] + k[6408]*y_cur[IDX_CH2NH2II] + - k[6409]*y_cur[IDX_CH2NH2II] + k[6410]*y_cur[IDX_C2H6II] + - k[6411]*y_cur[IDX_C2H6II] + k[6412]*y_cur[IDX_SiH3II] + - k[6413]*y_cur[IDX_SiH3II] + k[6414]*y_cur[IDX_H3COII] + - k[6415]*y_cur[IDX_H3COII] + k[6416]*y_cur[IDX_H3COII] + - k[6417]*y_cur[IDX_H3COII] + k[6418]*y_cur[IDX_H3COII] + - k[6419]*y_cur[IDX_C2H7II] + k[6420]*y_cur[IDX_C2H7II] + - k[6421]*y_cur[IDX_PII] + k[6422]*y_cur[IDX_HNOII] + - k[6423]*y_cur[IDX_CFII] + k[6424]*y_cur[IDX_SII] + - k[6425]*y_cur[IDX_O2II] + k[6426]*y_cur[IDX_SiH4II] + - k[6427]*y_cur[IDX_SiH4II] + k[6428]*y_cur[IDX_CH3OHII] + - k[6429]*y_cur[IDX_CH3OHII] + k[6430]*y_cur[IDX_CH3OHII] + - k[6431]*y_cur[IDX_H2NOII] + k[6432]*y_cur[IDX_H2NOII] + - k[6433]*y_cur[IDX_PHII] + k[6434]*y_cur[IDX_PH2II] + - k[6435]*y_cur[IDX_PH2II] + k[6436]*y_cur[IDX_PH2II] + - k[6437]*y_cur[IDX_O2HII] + k[6438]*y_cur[IDX_SiH5II] + - k[6439]*y_cur[IDX_SiH5II] + k[6440]*y_cur[IDX_CH3OH2II] + - k[6441]*y_cur[IDX_CH3OH2II] + k[6442]*y_cur[IDX_CH3OH2II] + - k[6443]*y_cur[IDX_CH3OH2II] + k[6444]*y_cur[IDX_CH3OH2II] + - k[6445]*y_cur[IDX_HSII] + k[6446]*y_cur[IDX_H2SII] + - k[6447]*y_cur[IDX_H2SII] + k[6448]*y_cur[IDX_PH3II] + - k[6449]*y_cur[IDX_PH3II] + k[6450]*y_cur[IDX_H3SII] + - k[6451]*y_cur[IDX_H3SII] + k[6452]*y_cur[IDX_H3SII] + - k[6453]*y_cur[IDX_H3SII] + k[6454]*y_cur[IDX_ClII] + - k[6455]*y_cur[IDX_C3II] + k[6456]*y_cur[IDX_HClII] + - k[6457]*y_cur[IDX_H2ClII] + k[6458]*y_cur[IDX_H2ClII] + - k[6459]*y_cur[IDX_C3HII] + k[6460]*y_cur[IDX_C3HII] + - k[6461]*y_cur[IDX_C3H2II] + k[6462]*y_cur[IDX_C3H2II] + - k[6463]*y_cur[IDX_C3H2II] + k[6464]*y_cur[IDX_C3H2II] + - k[6465]*y_cur[IDX_C3H2II] + k[6466]*y_cur[IDX_C2NII] + - k[6467]*y_cur[IDX_C2NII] + k[6468]*y_cur[IDX_CNCII] + - k[6469]*y_cur[IDX_CNCII] + k[6470]*y_cur[IDX_CH2CCHII] + - k[6471]*y_cur[IDX_CH2CCHII] + k[6472]*y_cur[IDX_C2NHII] + - k[6473]*y_cur[IDX_C3H3II] + k[6474]*y_cur[IDX_C2OII] + - k[6475]*y_cur[IDX_CH2CNII] + k[6476]*y_cur[IDX_CH2CNII] + - k[6477]*y_cur[IDX_C3H4II] + k[6478]*y_cur[IDX_C3H4II] + - k[6479]*y_cur[IDX_C3H4II] + k[6480]*y_cur[IDX_C3H4II] + - k[6481]*y_cur[IDX_SiCII] + k[6482]*y_cur[IDX_C3H5II] + - k[6483]*y_cur[IDX_C3H5II] + k[6484]*y_cur[IDX_CH3CNII] + - k[6485]*y_cur[IDX_CH3CNII] + k[6486]*y_cur[IDX_HC2OII] + - k[6487]*y_cur[IDX_HC2OII] + k[6488]*y_cur[IDX_HC2OII] + - k[6489]*y_cur[IDX_HC2OII] + k[6490]*y_cur[IDX_HCSiII] + - k[6491]*y_cur[IDX_HCSiII] + k[6492]*y_cur[IDX_CH2COII] + - k[6493]*y_cur[IDX_CH2COII] + k[6494]*y_cur[IDX_CH2COII] + - k[6495]*y_cur[IDX_OCNII] + k[6496]*y_cur[IDX_SiCH2II] + - k[6497]*y_cur[IDX_SiCH2II] + k[6498]*y_cur[IDX_SiCH2II] + - k[6499]*y_cur[IDX_C3H6II] + k[6500]*y_cur[IDX_C3H6II] + - k[6501]*y_cur[IDX_SiNII] + k[6502]*y_cur[IDX_CH3CNHII] + - k[6503]*y_cur[IDX_CH3CNHII] + k[6504]*y_cur[IDX_C3H7II] + - k[6505]*y_cur[IDX_C3H7II] + k[6506]*y_cur[IDX_C3H7II] + - k[6507]*y_cur[IDX_C3H7II] + k[6508]*y_cur[IDX_C3H7II] + - k[6509]*y_cur[IDX_C3H7II] + k[6510]*y_cur[IDX_C3H7II] + - k[6511]*y_cur[IDX_CPII] + k[6512]*y_cur[IDX_HNSiII] + - k[6513]*y_cur[IDX_HNSiII] + k[6514]*y_cur[IDX_HCNOII] + - k[6515]*y_cur[IDX_HCNOII] + k[6516]*y_cur[IDX_SiCH3II] + - k[6517]*y_cur[IDX_SiCH3II] + k[6518]*y_cur[IDX_CH3COII] + - k[6519]*y_cur[IDX_CH3COII] + k[6520]*y_cur[IDX_HONCII] + - k[6521]*y_cur[IDX_HONCII] + k[6522]*y_cur[IDX_HNCOII] + - k[6523]*y_cur[IDX_HNCOII] + k[6524]*y_cur[IDX_HOCNII] + - k[6525]*y_cur[IDX_HOCNII] + k[6526]*y_cur[IDX_NH2CNHII] + - k[6527]*y_cur[IDX_NH2CNHII] + k[6528]*y_cur[IDX_N2OII] + - k[6529]*y_cur[IDX_N2OII] + k[6530]*y_cur[IDX_N2OII] + - k[6531]*y_cur[IDX_SiOII] + k[6532]*y_cur[IDX_HCNOHII] + - k[6533]*y_cur[IDX_HCNOHII] + k[6534]*y_cur[IDX_HCNOHII] + - k[6535]*y_cur[IDX_CSII] + k[6536]*y_cur[IDX_H2CNOII] + - k[6537]*y_cur[IDX_H2CNOII] + k[6538]*y_cur[IDX_H2NCOII] + - k[6539]*y_cur[IDX_H2NCOII] + k[6540]*y_cur[IDX_CO2II] + - k[6541]*y_cur[IDX_SiCH4II] + k[6542]*y_cur[IDX_SiCH4II] + - k[6543]*y_cur[IDX_HCPII] + k[6544]*y_cur[IDX_HCPII] + - k[6545]*y_cur[IDX_H2OCNII] + k[6546]*y_cur[IDX_H2OCNII] + - k[6547]*y_cur[IDX_CH3CHOII] + k[6548]*y_cur[IDX_CH3CHOII] + - k[6549]*y_cur[IDX_HNCOHII] + k[6550]*y_cur[IDX_HNCOHII] + - k[6551]*y_cur[IDX_HNCOHII] + k[6552]*y_cur[IDX_SiNH2II] + - k[6553]*y_cur[IDX_SiNH2II] + k[6554]*y_cur[IDX_HCSII] + - k[6555]*y_cur[IDX_HCSII] + k[6556]*y_cur[IDX_SiOHII] + - k[6557]*y_cur[IDX_SiOHII] + k[6558]*y_cur[IDX_HN2OII] + - k[6559]*y_cur[IDX_HN2OII] + k[6560]*y_cur[IDX_PNII] + - k[6561]*y_cur[IDX_CH3CHOHII] + k[6562]*y_cur[IDX_CH3CHOHII] + - k[6563]*y_cur[IDX_CH3CHOHII] + k[6564]*y_cur[IDX_CH3CHOHII] + - k[6565]*y_cur[IDX_CH3CHOHII] + k[6566]*y_cur[IDX_HCO2II] + - k[6567]*y_cur[IDX_HCO2II] + k[6568]*y_cur[IDX_HCO2II] + - k[6569]*y_cur[IDX_PCH2II] + k[6570]*y_cur[IDX_PCH2II] + - k[6571]*y_cur[IDX_HPNII] + k[6572]*y_cur[IDX_HPNII] + - k[6573]*y_cur[IDX_HPNII] + k[6574]*y_cur[IDX_HCOOHII] + - k[6575]*y_cur[IDX_HCOOHII] + k[6576]*y_cur[IDX_C2H5OHII] + - k[6577]*y_cur[IDX_C2H5OHII] + k[6578]*y_cur[IDX_PCH3II] + - k[6579]*y_cur[IDX_PCH3II] + k[6580]*y_cur[IDX_PCH3II] + - k[6581]*y_cur[IDX_NSII] + k[6582]*y_cur[IDX_H2CSII] + - k[6583]*y_cur[IDX_H2CSII] + k[6584]*y_cur[IDX_NO2II] + - k[6585]*y_cur[IDX_H2SiOII] + k[6586]*y_cur[IDX_H2SiOII] + - k[6587]*y_cur[IDX_CH3OCH3II] + k[6588]*y_cur[IDX_CH3OCH3II] + - k[6589]*y_cur[IDX_HNSII] + k[6590]*y_cur[IDX_H3SiOII] + - k[6591]*y_cur[IDX_H3SiOII] + k[6592]*y_cur[IDX_SiFII] + - k[6593]*y_cur[IDX_PNH2II] + k[6594]*y_cur[IDX_PNH2II] + - k[6595]*y_cur[IDX_PNH2II] + k[6596]*y_cur[IDX_PCH4II] + - k[6597]*y_cur[IDX_PCH4II] + k[6598]*y_cur[IDX_PCH4II] + - k[6599]*y_cur[IDX_CClII] + k[6600]*y_cur[IDX_POII] + - k[6601]*y_cur[IDX_H3CSII] + k[6602]*y_cur[IDX_H3CSII] + - k[6603]*y_cur[IDX_CH3OCH4II] + k[6604]*y_cur[IDX_CH3OCH4II] + - k[6605]*y_cur[IDX_CH3OCH4II] + k[6606]*y_cur[IDX_C2H5OH2II] + - k[6607]*y_cur[IDX_C2H5OH2II] + k[6608]*y_cur[IDX_C2H5OH2II] + - k[6609]*y_cur[IDX_C2H5OH2II] + k[6610]*y_cur[IDX_HCOOH2II] + - k[6611]*y_cur[IDX_HCOOH2II] + k[6612]*y_cur[IDX_HPOII] + - k[6613]*y_cur[IDX_HPOII] + k[6614]*y_cur[IDX_HPOII] + - k[6615]*y_cur[IDX_C4II] + k[6616]*y_cur[IDX_C4II] + - k[6617]*y_cur[IDX_PNH3II] + k[6618]*y_cur[IDX_PNH3II] + - k[6619]*y_cur[IDX_PNH3II] + k[6620]*y_cur[IDX_SOII] + - k[6621]*y_cur[IDX_C4HII] + k[6622]*y_cur[IDX_H2POII] + - k[6623]*y_cur[IDX_H2POII] + k[6624]*y_cur[IDX_H2CClII] + - k[6625]*y_cur[IDX_HSOII] + k[6626]*y_cur[IDX_C3NII] + - k[6627]*y_cur[IDX_C4H2II] + k[6628]*y_cur[IDX_C4H2II] + - k[6629]*y_cur[IDX_HC3NII] + k[6630]*y_cur[IDX_HC3NII] + - k[6631]*y_cur[IDX_HC3NII] + k[6632]*y_cur[IDX_ClOII] + - k[6633]*y_cur[IDX_C4H3II] + k[6634]*y_cur[IDX_C4H3II] + - k[6635]*y_cur[IDX_C2N2II] + k[6636]*y_cur[IDX_C2N2II] + - k[6637]*y_cur[IDX_HC3NHII] + k[6638]*y_cur[IDX_HC3NHII] + - k[6639]*y_cur[IDX_HC3NHII] + k[6640]*y_cur[IDX_HC3NHII] + - k[6641]*y_cur[IDX_C4H4II] + k[6642]*y_cur[IDX_SiC2II] + - k[6643]*y_cur[IDX_SiC2II] + k[6644]*y_cur[IDX_C3OII] + - k[6645]*y_cur[IDX_C4H5II] + k[6646]*y_cur[IDX_C4H5II] + - k[6647]*y_cur[IDX_C4H5II] + k[6648]*y_cur[IDX_HC3OII] + - k[6649]*y_cur[IDX_SiC2HII] + k[6650]*y_cur[IDX_SiC2HII] + - k[6651]*y_cur[IDX_CH2CHCNII] + k[6652]*y_cur[IDX_NCCNHII] + - k[6653]*y_cur[IDX_NCCNHII] + k[6654]*y_cur[IDX_SiNCII] + - k[6655]*y_cur[IDX_C3H2OII] + k[6656]*y_cur[IDX_C3H2OII] + - k[6657]*y_cur[IDX_CH2CHCNHII] + k[6658]*y_cur[IDX_CH2CHCNHII] + - k[6659]*y_cur[IDX_CH2CHCNHII] + k[6660]*y_cur[IDX_SiC2H2II] + - k[6661]*y_cur[IDX_SiC2H2II] + k[6662]*y_cur[IDX_CCPII] + - k[6663]*y_cur[IDX_CCPII] + k[6664]*y_cur[IDX_SiC2H3II] + - k[6665]*y_cur[IDX_SiC2H3II] + k[6666]*y_cur[IDX_H3C3OII] + - k[6667]*y_cur[IDX_C4H7II] + k[6668]*y_cur[IDX_SiNCHII] + - k[6669]*y_cur[IDX_SiNCHII] + k[6670]*y_cur[IDX_FeII] + - k[6671]*y_cur[IDX_C2H5CNHII] + k[6672]*y_cur[IDX_C2H5CNHII] + - k[6673]*y_cur[IDX_C2H5CNHII] + k[6674]*y_cur[IDX_C2SII] + - k[6675]*y_cur[IDX_C2SII] + k[6676]*y_cur[IDX_HC2PII] + - k[6677]*y_cur[IDX_HC2PII] + k[6678]*y_cur[IDX_HC2SII] + - k[6679]*y_cur[IDX_HC2SII] + k[6680]*y_cur[IDX_PC2H2II] + - k[6681]*y_cur[IDX_PC2H2II] + k[6682]*y_cur[IDX_PC2H2II] + - k[6683]*y_cur[IDX_CH3COCH3II] + k[6684]*y_cur[IDX_CH3COCH3II] + - k[6685]*y_cur[IDX_PC2H3II] + k[6686]*y_cur[IDX_PC2H3II] + - k[6687]*y_cur[IDX_PC2H3II] + k[6688]*y_cur[IDX_CH3CSII] + - k[6689]*y_cur[IDX_PC2H4II] + k[6690]*y_cur[IDX_PC2H4II] + - k[6691]*y_cur[IDX_PC2H4II] + k[6692]*y_cur[IDX_CH3COCH4II] + - k[6693]*y_cur[IDX_CH3COCH4II] + k[6694]*y_cur[IDX_COOCH3II] + - k[6695]*y_cur[IDX_COOCH3II] + k[6696]*y_cur[IDX_CH2OHCOII] + - k[6697]*y_cur[IDX_CH2OHCOII] + k[6698]*y_cur[IDX_CH2OHCOII] + - k[6699]*y_cur[IDX_HCOOCH3II] + k[6700]*y_cur[IDX_HCOOCH3II] + - k[6701]*y_cur[IDX_CH2OHCHOII] + k[6702]*y_cur[IDX_CH2OHCHOII] + - k[6703]*y_cur[IDX_CH2OHCHOII] + k[6704]*y_cur[IDX_CH2OHCHOII] + - k[6705]*y_cur[IDX_CH2OHCHOII] + k[6706]*y_cur[IDX_OCSII] + - k[6707]*y_cur[IDX_OCSII] + k[6708]*y_cur[IDX_OCSII] + - k[6709]*y_cur[IDX_C5II] + k[6710]*y_cur[IDX_SiSII] + - k[6711]*y_cur[IDX_CH3COOHII] + k[6712]*y_cur[IDX_CH3COOHII] + - k[6713]*y_cur[IDX_CH3COOHII] + k[6714]*y_cur[IDX_CH3COOHII] + - k[6715]*y_cur[IDX_CH3COOHII] + k[6716]*y_cur[IDX_CH3COOHII] + - k[6717]*y_cur[IDX_HOCSII] + k[6718]*y_cur[IDX_HOCSII] + - k[6719]*y_cur[IDX_HSiSII] + k[6720]*y_cur[IDX_HSiSII] + - k[6721]*y_cur[IDX_C5HII] + k[6722]*y_cur[IDX_C5HII] + - k[6723]*y_cur[IDX_HSiO2II] + k[6724]*y_cur[IDX_HSiO2II] + - k[6725]*y_cur[IDX_H5C2O2II] + k[6726]*y_cur[IDX_H5C2O2II] + - k[6727]*y_cur[IDX_CH2OHCH2OII] + k[6728]*y_cur[IDX_CH2OHCH2OII] + - k[6729]*y_cur[IDX_CH2OHCH2OII] + k[6730]*y_cur[IDX_CH2OHCH2OII] + - k[6731]*y_cur[IDX_CH3COOH2II] + k[6732]*y_cur[IDX_CH3COOH2II] + - k[6733]*y_cur[IDX_CH3COOH2II] + k[6734]*y_cur[IDX_CH3COOH2II] + - k[6735]*y_cur[IDX_CH3COOH2II] + k[6736]*y_cur[IDX_CH3COOH2II] + - k[6737]*y_cur[IDX_CH3COOH2II] + k[6738]*y_cur[IDX_C5H2II] + - k[6739]*y_cur[IDX_C5H2II] + k[6740]*y_cur[IDX_C4NII] + - k[6741]*y_cur[IDX_C4NII] + k[6742]*y_cur[IDX_C5H3II] + - k[6743]*y_cur[IDX_C5H3II] + k[6744]*y_cur[IDX_HC4NII] + - k[6745]*y_cur[IDX_H2C4NII] + k[6746]*y_cur[IDX_SiC3II] + - k[6747]*y_cur[IDX_SiC3II] + k[6748]*y_cur[IDX_CH3C4HII] + - k[6749]*y_cur[IDX_CH3C4HII] + k[6750]*y_cur[IDX_SO2II] + - k[6751]*y_cur[IDX_SO2II] + k[6752]*y_cur[IDX_S2II] + - k[6753]*y_cur[IDX_C5H5II] + k[6754]*y_cur[IDX_C5H5II] + - k[6755]*y_cur[IDX_HSO2II] + k[6756]*y_cur[IDX_HSO2II] + - k[6757]*y_cur[IDX_HSO2II] + k[6758]*y_cur[IDX_HS2II] + - k[6759]*y_cur[IDX_HS2II] + k[6760]*y_cur[IDX_CH3C3NII] + - k[6761]*y_cur[IDX_SiC3HII] + k[6762]*y_cur[IDX_SiC3HII] + - k[6763]*y_cur[IDX_H2S2II] + k[6764]*y_cur[IDX_H2S2II] + - k[6765]*y_cur[IDX_CH3C3NHII] + k[6766]*y_cur[IDX_CH3C3NHII] + - k[6767]*y_cur[IDX_SiC3H2II] + k[6768]*y_cur[IDX_SiC3H2II] + - k[6769]*y_cur[IDX_NCCNCH3II] + k[6770]*y_cur[IDX_H3S2II] + - k[6771]*y_cur[IDX_H3S2II] + k[6772]*y_cur[IDX_PC3HII] + - k[6773]*y_cur[IDX_PC3HII] + k[6774]*y_cur[IDX_PC3HII] + - k[6775]*y_cur[IDX_C3SII] + k[6776]*y_cur[IDX_C3SII] + - k[6777]*y_cur[IDX_C3SII] + k[6778]*y_cur[IDX_HC3SII] + - k[6779]*y_cur[IDX_HC3SII] + k[6780]*y_cur[IDX_C6II] + - k[6781]*y_cur[IDX_C6II] + k[6782]*y_cur[IDX_C6HII] + - k[6783]*y_cur[IDX_C6HII] + k[6784]*y_cur[IDX_C5NII] + - k[6785]*y_cur[IDX_C6H2II] + k[6786]*y_cur[IDX_C6H2II] + - k[6787]*y_cur[IDX_HC5NII] + k[6788]*y_cur[IDX_HC5NII] + - k[6789]*y_cur[IDX_C6H3II] + k[6790]*y_cur[IDX_C6H3II] + - k[6791]*y_cur[IDX_HC5NHII] + k[6792]*y_cur[IDX_HC5NHII] + - k[6793]*y_cur[IDX_HC5NHII] + k[6794]*y_cur[IDX_HC5NHII] + - k[6795]*y_cur[IDX_HC5NHII] + k[6796]*y_cur[IDX_C6H4II] + - k[6797]*y_cur[IDX_C6H4II] + k[6798]*y_cur[IDX_SiC4II] + - k[6799]*y_cur[IDX_SiC4II] + k[6800]*y_cur[IDX_SiC4HII] + - k[6801]*y_cur[IDX_SiC4HII] + k[6802]*y_cur[IDX_C6H5II] + - k[6803]*y_cur[IDX_C6H5II] + k[6804]*y_cur[IDX_H3C5NII] + - k[6805]*y_cur[IDX_H3C5NII] + k[6806]*y_cur[IDX_C6H6II] + - k[6807]*y_cur[IDX_C6H7II] + k[6808]*y_cur[IDX_C6H7II] + - k[6809]*y_cur[IDX_C4PII] + k[6810]*y_cur[IDX_C4PII] + - k[6811]*y_cur[IDX_PC4HII] + k[6812]*y_cur[IDX_PC4HII] + - k[6813]*y_cur[IDX_PC4HII] + k[6814]*y_cur[IDX_PC4HII] + - k[6815]*y_cur[IDX_C4SII] + k[6816]*y_cur[IDX_C4SII] + - k[6817]*y_cur[IDX_C4SII] + k[6818]*y_cur[IDX_HC4SII] + - k[6819]*y_cur[IDX_HC4SII] + k[6820]*y_cur[IDX_HC4SII] + - k[6821]*y_cur[IDX_C7II] + k[6822]*y_cur[IDX_C7II] + - k[6823]*y_cur[IDX_C7II] + k[6824]*y_cur[IDX_C7HII] + - k[6825]*y_cur[IDX_C7HII] + k[6826]*y_cur[IDX_C7H2II] + - k[6827]*y_cur[IDX_C7H2II] + k[6828]*y_cur[IDX_C7H3II] + - k[6829]*y_cur[IDX_C7H3II] + k[6830]*y_cur[IDX_C7H4II] + - k[6831]*y_cur[IDX_C7H4II] + k[6832]*y_cur[IDX_C7H5II] + - k[6833]*y_cur[IDX_C7H5II] + k[6834]*y_cur[IDX_CH3C5NHII] + - k[6835]*y_cur[IDX_CH3C5NHII] + k[6836]*y_cur[IDX_C8II] + - k[6837]*y_cur[IDX_C8II] + k[6838]*y_cur[IDX_C8HII] + - k[6839]*y_cur[IDX_C8HII] + k[6840]*y_cur[IDX_C7NII] + - k[6841]*y_cur[IDX_C8H2II] + k[6842]*y_cur[IDX_C8H2II] + - k[6843]*y_cur[IDX_HC7NII] + k[6844]*y_cur[IDX_HC7NII] + - k[6845]*y_cur[IDX_C8H3II] + k[6846]*y_cur[IDX_C8H3II] + - k[6847]*y_cur[IDX_C8H4II] + k[6848]*y_cur[IDX_C8H4II] + - k[6849]*y_cur[IDX_H2C7NII] + k[6850]*y_cur[IDX_H2C7NII] + - k[6851]*y_cur[IDX_H3C7NII] + k[6852]*y_cur[IDX_H3C7NII] + - k[6853]*y_cur[IDX_C8H5II] + k[6854]*y_cur[IDX_C8H5II] + - k[6855]*y_cur[IDX_C9II] + k[6856]*y_cur[IDX_C9II] + - k[6857]*y_cur[IDX_C9HII] + k[6858]*y_cur[IDX_C9HII] + - k[6859]*y_cur[IDX_C9H2II] + k[6860]*y_cur[IDX_C9H2II] + - k[6861]*y_cur[IDX_C9H3II] + k[6862]*y_cur[IDX_C9H3II] + - k[6863]*y_cur[IDX_C9H4II] + k[6864]*y_cur[IDX_C9H4II] + - k[6865]*y_cur[IDX_C9H5II] + k[6866]*y_cur[IDX_C9H5II] + - k[6867]*y_cur[IDX_CH3C7NHII] + k[6868]*y_cur[IDX_CH3C7NHII] + - k[6869]*y_cur[IDX_C10II] + k[6870]*y_cur[IDX_C10II] + - k[6871]*y_cur[IDX_C10HII] + k[6872]*y_cur[IDX_C10HII] + - k[6873]*y_cur[IDX_C10HII] + k[6874]*y_cur[IDX_C10H2II] + - k[6875]*y_cur[IDX_C9NII] + k[6876]*y_cur[IDX_HC9NII] + - k[6877]*y_cur[IDX_HC9NII] + k[6878]*y_cur[IDX_C10H3II] + - k[6879]*y_cur[IDX_C10H3II] + k[6880]*y_cur[IDX_H2C9NII] + - k[6881]*y_cur[IDX_H2C9NII] + k[6882]*y_cur[IDX_H3C9NII] + - k[6883]*y_cur[IDX_H3C9NII] + k[6884]*y_cur[IDX_C11II] + - k[6885]*y_cur[IDX_C11II] + k[6886]*y_cur[IDX_C11II] + - k[6887]*y_cur[IDX_C11II]; - data[jistart + 10952] = 0.0 - k[8763]*y_cur[IDX_eM]; - data[jistart + 10953] = 0.0 + k[6308]*y_cur[IDX_GRAINM]; - data[jistart + 10954] = 0.0 + k[6309]*y_cur[IDX_GRAINM]; - data[jistart + 10955] = 0.0 + k[6745]*y_cur[IDX_GRAINM]; - data[jistart + 10956] = 0.0 + k[6849]*y_cur[IDX_GRAINM] + - k[6850]*y_cur[IDX_GRAINM]; - data[jistart + 10957] = 0.0 + k[6880]*y_cur[IDX_GRAINM] + - k[6881]*y_cur[IDX_GRAINM]; - data[jistart + 10958] = 0.0 + k[6624]*y_cur[IDX_GRAINM]; - data[jistart + 10959] = 0.0 + k[6536]*y_cur[IDX_GRAINM] + - k[6537]*y_cur[IDX_GRAINM]; - data[jistart + 10960] = 0.0 + k[6398]*y_cur[IDX_GRAINM] + - k[6399]*y_cur[IDX_GRAINM] + k[6400]*y_cur[IDX_GRAINM] + - k[6401]*y_cur[IDX_GRAINM]; - data[jistart + 10961] = 0.0 + k[6582]*y_cur[IDX_GRAINM] + - k[6583]*y_cur[IDX_GRAINM]; - data[jistart + 10962] = 0.0 + k[6457]*y_cur[IDX_GRAINM] + - k[6458]*y_cur[IDX_GRAINM]; - data[jistart + 10963] = 0.0 + k[6349]*y_cur[IDX_GRAINM] + - k[6350]*y_cur[IDX_GRAINM]; - data[jistart + 10964] = 0.0 + k[6376]*y_cur[IDX_GRAINM] + - k[6377]*y_cur[IDX_GRAINM]; - data[jistart + 10965] = 0.0 + k[6538]*y_cur[IDX_GRAINM] + - k[6539]*y_cur[IDX_GRAINM]; - data[jistart + 10966] = 0.0 + k[6431]*y_cur[IDX_GRAINM] + - k[6432]*y_cur[IDX_GRAINM]; - data[jistart + 10967] = 0.0 + k[6340]*y_cur[IDX_GRAINM] + - k[6341]*y_cur[IDX_GRAINM] + k[6342]*y_cur[IDX_GRAINM]; - data[jistart + 10968] = 0.0 + k[6545]*y_cur[IDX_GRAINM] + - k[6546]*y_cur[IDX_GRAINM]; - data[jistart + 10969] = 0.0 + k[6622]*y_cur[IDX_GRAINM] + - k[6623]*y_cur[IDX_GRAINM]; - data[jistart + 10970] = 0.0 + k[6446]*y_cur[IDX_GRAINM] + - k[6447]*y_cur[IDX_GRAINM]; - data[jistart + 10971] = 0.0 + k[6763]*y_cur[IDX_GRAINM] + - k[6764]*y_cur[IDX_GRAINM]; - data[jistart + 10972] = 0.0 + k[6585]*y_cur[IDX_GRAINM] + - k[6586]*y_cur[IDX_GRAINM]; - data[jistart + 10973] = 0.0 + k[6310]*y_cur[IDX_GRAINM] + - k[6311]*y_cur[IDX_GRAINM]; - data[jistart + 10974] = 0.0 + k[6666]*y_cur[IDX_GRAINM]; - data[jistart + 10975] = 0.0 + k[6804]*y_cur[IDX_GRAINM] + - k[6805]*y_cur[IDX_GRAINM]; - data[jistart + 10976] = 0.0 + k[6851]*y_cur[IDX_GRAINM] + - k[6852]*y_cur[IDX_GRAINM]; - data[jistart + 10977] = 0.0 + k[6882]*y_cur[IDX_GRAINM] + - k[6883]*y_cur[IDX_GRAINM]; - data[jistart + 10978] = 0.0 + k[6414]*y_cur[IDX_GRAINM] + - k[6415]*y_cur[IDX_GRAINM] + k[6416]*y_cur[IDX_GRAINM] + - k[6417]*y_cur[IDX_GRAINM] + k[6418]*y_cur[IDX_GRAINM]; - data[jistart + 10979] = 0.0 + k[6601]*y_cur[IDX_GRAINM] + - k[6602]*y_cur[IDX_GRAINM]; - data[jistart + 10980] = 0.0 + k[6343]*y_cur[IDX_GRAINM] + - k[6344]*y_cur[IDX_GRAINM] + k[6345]*y_cur[IDX_GRAINM] + - k[6346]*y_cur[IDX_GRAINM]; - data[jistart + 10981] = 0.0 + k[6450]*y_cur[IDX_GRAINM] + - k[6451]*y_cur[IDX_GRAINM] + k[6452]*y_cur[IDX_GRAINM] + - k[6453]*y_cur[IDX_GRAINM]; - data[jistart + 10982] = 0.0 + k[6770]*y_cur[IDX_GRAINM] + - k[6771]*y_cur[IDX_GRAINM]; - data[jistart + 10983] = 0.0 + k[6590]*y_cur[IDX_GRAINM] + - k[6591]*y_cur[IDX_GRAINM]; - data[jistart + 10984] = 0.0 + k[6725]*y_cur[IDX_GRAINM] + - k[6726]*y_cur[IDX_GRAINM]; - data[jistart + 10985] = 0.0 + k[6486]*y_cur[IDX_GRAINM] + - k[6487]*y_cur[IDX_GRAINM] + k[6488]*y_cur[IDX_GRAINM] + - k[6489]*y_cur[IDX_GRAINM]; - data[jistart + 10986] = 0.0 + k[6676]*y_cur[IDX_GRAINM] + - k[6677]*y_cur[IDX_GRAINM]; - data[jistart + 10987] = 0.0 + k[6678]*y_cur[IDX_GRAINM] + - k[6679]*y_cur[IDX_GRAINM]; - data[jistart + 10988] = 0.0 + k[6629]*y_cur[IDX_GRAINM] + - k[6630]*y_cur[IDX_GRAINM] + k[6631]*y_cur[IDX_GRAINM]; - data[jistart + 10989] = 0.0 + k[6637]*y_cur[IDX_GRAINM] + - k[6638]*y_cur[IDX_GRAINM] + k[6639]*y_cur[IDX_GRAINM] + - k[6640]*y_cur[IDX_GRAINM]; - data[jistart + 10990] = 0.0 + k[6648]*y_cur[IDX_GRAINM]; - data[jistart + 10991] = 0.0 + k[6778]*y_cur[IDX_GRAINM] + - k[6779]*y_cur[IDX_GRAINM]; - data[jistart + 10992] = 0.0 + k[6744]*y_cur[IDX_GRAINM]; - data[jistart + 10993] = 0.0 + k[6818]*y_cur[IDX_GRAINM] + - k[6819]*y_cur[IDX_GRAINM] + k[6820]*y_cur[IDX_GRAINM]; - data[jistart + 10994] = 0.0 + k[6787]*y_cur[IDX_GRAINM] + - k[6788]*y_cur[IDX_GRAINM]; - data[jistart + 10995] = 0.0 + k[6791]*y_cur[IDX_GRAINM] + - k[6792]*y_cur[IDX_GRAINM] + k[6793]*y_cur[IDX_GRAINM] + - k[6794]*y_cur[IDX_GRAINM] + k[6795]*y_cur[IDX_GRAINM]; - data[jistart + 10996] = 0.0 + k[6843]*y_cur[IDX_GRAINM] + - k[6844]*y_cur[IDX_GRAINM]; - data[jistart + 10997] = 0.0 + k[6876]*y_cur[IDX_GRAINM] + - k[6877]*y_cur[IDX_GRAINM]; - data[jistart + 10998] = 0.0 + k[6372]*y_cur[IDX_GRAINM]; - data[jistart + 10999] = 0.0 + k[6378]*y_cur[IDX_GRAINM] + - k[6379]*y_cur[IDX_GRAINM] + k[6380]*y_cur[IDX_GRAINM]; - data[jistart + 11000] = 0.0 + k[6514]*y_cur[IDX_GRAINM] + - k[6515]*y_cur[IDX_GRAINM]; - data[jistart + 11001] = 0.0 + k[6532]*y_cur[IDX_GRAINM] + - k[6533]*y_cur[IDX_GRAINM] + k[6534]*y_cur[IDX_GRAINM]; - data[jistart + 11002] = 0.0 + k[6389]*y_cur[IDX_GRAINM]; - data[jistart + 11003] = 0.0 + k[6566]*y_cur[IDX_GRAINM] + - k[6567]*y_cur[IDX_GRAINM] + k[6568]*y_cur[IDX_GRAINM]; - data[jistart + 11004] = 0.0 + k[6699]*y_cur[IDX_GRAINM] + - k[6700]*y_cur[IDX_GRAINM]; - data[jistart + 11005] = 0.0 + k[6574]*y_cur[IDX_GRAINM] + - k[6575]*y_cur[IDX_GRAINM]; - data[jistart + 11006] = 0.0 + k[6610]*y_cur[IDX_GRAINM] + - k[6611]*y_cur[IDX_GRAINM]; - data[jistart + 11007] = 0.0 + k[6543]*y_cur[IDX_GRAINM] + - k[6544]*y_cur[IDX_GRAINM]; - data[jistart + 11008] = 0.0 + k[6554]*y_cur[IDX_GRAINM] + - k[6555]*y_cur[IDX_GRAINM]; - data[jistart + 11009] = 0.0 + k[6490]*y_cur[IDX_GRAINM] + - k[6491]*y_cur[IDX_GRAINM]; - data[jistart + 11010] = 0.0 + k[6456]*y_cur[IDX_GRAINM]; - data[jistart + 11011] = 0.0 + k[6348]*y_cur[IDX_GRAINM]; - data[jistart + 11012] = 0.0 + k[6558]*y_cur[IDX_GRAINM] + - k[6559]*y_cur[IDX_GRAINM]; - data[jistart + 11013] = 0.0 + k[6522]*y_cur[IDX_GRAINM] + - k[6523]*y_cur[IDX_GRAINM]; - data[jistart + 11014] = 0.0 + k[6549]*y_cur[IDX_GRAINM] + - k[6550]*y_cur[IDX_GRAINM] + k[6551]*y_cur[IDX_GRAINM]; - data[jistart + 11015] = 0.0 + k[6422]*y_cur[IDX_GRAINM]; - data[jistart + 11016] = 0.0 + k[6589]*y_cur[IDX_GRAINM]; - data[jistart + 11017] = 0.0 + k[6512]*y_cur[IDX_GRAINM] + - k[6513]*y_cur[IDX_GRAINM]; - data[jistart + 11018] = 0.0 + k[6390]*y_cur[IDX_GRAINM]; - data[jistart + 11019] = 0.0 + k[6524]*y_cur[IDX_GRAINM] + - k[6525]*y_cur[IDX_GRAINM]; - data[jistart + 11020] = 0.0 + k[6717]*y_cur[IDX_GRAINM] + - k[6718]*y_cur[IDX_GRAINM]; - data[jistart + 11021] = 0.0 + k[6520]*y_cur[IDX_GRAINM] + - k[6521]*y_cur[IDX_GRAINM]; - data[jistart + 11022] = 0.0 + k[6571]*y_cur[IDX_GRAINM] + - k[6572]*y_cur[IDX_GRAINM] + k[6573]*y_cur[IDX_GRAINM]; - data[jistart + 11023] = 0.0 + k[6612]*y_cur[IDX_GRAINM] + - k[6613]*y_cur[IDX_GRAINM] + k[6614]*y_cur[IDX_GRAINM]; - data[jistart + 11024] = 0.0 + k[6445]*y_cur[IDX_GRAINM]; - data[jistart + 11025] = 0.0 + k[6758]*y_cur[IDX_GRAINM] + - k[6759]*y_cur[IDX_GRAINM]; - data[jistart + 11026] = 0.0 + k[6625]*y_cur[IDX_GRAINM]; - data[jistart + 11027] = 0.0 + k[6755]*y_cur[IDX_GRAINM] + - k[6756]*y_cur[IDX_GRAINM] + k[6757]*y_cur[IDX_GRAINM]; - data[jistart + 11028] = 0.0 + k[6723]*y_cur[IDX_GRAINM] + - k[6724]*y_cur[IDX_GRAINM]; - data[jistart + 11029] = 0.0 + k[6719]*y_cur[IDX_GRAINM] + - k[6720]*y_cur[IDX_GRAINM]; - data[jistart + 11030] = 0.0 + k[6312]*y_cur[IDX_GRAINM]; - data[jistart + 11031] = 0.0 + k[6313]*y_cur[IDX_GRAINM]; - data[jistart + 11032] = 0.0 + k[6353]*y_cur[IDX_GRAINM]; - data[jistart + 11033] = 0.0 + k[6319]*y_cur[IDX_GRAINM]; - data[jistart + 11034] = 0.0 + k[6375]*y_cur[IDX_GRAINM]; - data[jistart + 11035] = 0.0 + k[6396]*y_cur[IDX_GRAINM] + - k[6397]*y_cur[IDX_GRAINM]; - data[jistart + 11036] = 0.0 + k[6528]*y_cur[IDX_GRAINM] + - k[6529]*y_cur[IDX_GRAINM] + k[6530]*y_cur[IDX_GRAINM]; - data[jistart + 11037] = 0.0 + k[6769]*y_cur[IDX_GRAINM]; - data[jistart + 11038] = 0.0 + k[6652]*y_cur[IDX_GRAINM] + - k[6653]*y_cur[IDX_GRAINM]; - data[jistart + 11039] = 0.0 + k[6320]*y_cur[IDX_GRAINM]; - data[jistart + 11040] = 0.0 + k[6324]*y_cur[IDX_GRAINM] + - k[6325]*y_cur[IDX_GRAINM]; - data[jistart + 11041] = 0.0 + k[6526]*y_cur[IDX_GRAINM] + - k[6527]*y_cur[IDX_GRAINM]; - data[jistart + 11042] = 0.0 + k[6330]*y_cur[IDX_GRAINM] + - k[6331]*y_cur[IDX_GRAINM]; - data[jistart + 11043] = 0.0 + k[6337]*y_cur[IDX_GRAINM] + - k[6338]*y_cur[IDX_GRAINM] + k[6339]*y_cur[IDX_GRAINM]; - data[jistart + 11044] = 0.0 + k[6407]*y_cur[IDX_GRAINM]; - data[jistart + 11045] = 0.0 + k[6584]*y_cur[IDX_GRAINM]; - data[jistart + 11046] = 0.0 + k[6581]*y_cur[IDX_GRAINM]; - data[jistart + 11047] = 0.0 + k[6351]*y_cur[IDX_GRAINM]; - data[jistart + 11048] = 0.0 + k[6326]*y_cur[IDX_GRAINM]; - data[jistart + 11049] = 0.0 + k[6425]*y_cur[IDX_GRAINM]; - data[jistart + 11050] = 0.0 + k[6437]*y_cur[IDX_GRAINM]; - data[jistart + 11051] = 0.0 + k[6495]*y_cur[IDX_GRAINM]; - data[jistart + 11052] = 0.0 + k[6706]*y_cur[IDX_GRAINM] + - k[6707]*y_cur[IDX_GRAINM] + k[6708]*y_cur[IDX_GRAINM]; - data[jistart + 11053] = 0.0 + k[6329]*y_cur[IDX_GRAINM]; - data[jistart + 11054] = 0.0 + k[6421]*y_cur[IDX_GRAINM]; - data[jistart + 11055] = 0.0 + k[6680]*y_cur[IDX_GRAINM] + - k[6681]*y_cur[IDX_GRAINM] + k[6682]*y_cur[IDX_GRAINM]; - data[jistart + 11056] = 0.0 + k[6685]*y_cur[IDX_GRAINM] + - k[6686]*y_cur[IDX_GRAINM] + k[6687]*y_cur[IDX_GRAINM]; - data[jistart + 11057] = 0.0 + k[6689]*y_cur[IDX_GRAINM] + - k[6690]*y_cur[IDX_GRAINM] + k[6691]*y_cur[IDX_GRAINM]; - data[jistart + 11058] = 0.0 + k[6772]*y_cur[IDX_GRAINM] + - k[6773]*y_cur[IDX_GRAINM] + k[6774]*y_cur[IDX_GRAINM]; - data[jistart + 11059] = 0.0 + k[6811]*y_cur[IDX_GRAINM] + - k[6812]*y_cur[IDX_GRAINM] + k[6813]*y_cur[IDX_GRAINM] + - k[6814]*y_cur[IDX_GRAINM]; - data[jistart + 11060] = 0.0 + k[6569]*y_cur[IDX_GRAINM] + - k[6570]*y_cur[IDX_GRAINM]; - data[jistart + 11061] = 0.0 + k[6578]*y_cur[IDX_GRAINM] + - k[6579]*y_cur[IDX_GRAINM] + k[6580]*y_cur[IDX_GRAINM]; - data[jistart + 11062] = 0.0 + k[6596]*y_cur[IDX_GRAINM] + - k[6597]*y_cur[IDX_GRAINM] + k[6598]*y_cur[IDX_GRAINM]; - data[jistart + 11063] = 0.0 + k[6433]*y_cur[IDX_GRAINM]; - data[jistart + 11064] = 0.0 + k[6434]*y_cur[IDX_GRAINM] + - k[6435]*y_cur[IDX_GRAINM] + k[6436]*y_cur[IDX_GRAINM]; - data[jistart + 11065] = 0.0 + k[6448]*y_cur[IDX_GRAINM] + - k[6449]*y_cur[IDX_GRAINM]; - data[jistart + 11066] = 0.0 + k[6560]*y_cur[IDX_GRAINM]; - data[jistart + 11067] = 0.0 + k[6593]*y_cur[IDX_GRAINM] + - k[6594]*y_cur[IDX_GRAINM] + k[6595]*y_cur[IDX_GRAINM]; - data[jistart + 11068] = 0.0 + k[6617]*y_cur[IDX_GRAINM] + - k[6618]*y_cur[IDX_GRAINM] + k[6619]*y_cur[IDX_GRAINM]; - data[jistart + 11069] = 0.0 + k[6600]*y_cur[IDX_GRAINM]; - data[jistart + 11070] = 0.0 + k[6424]*y_cur[IDX_GRAINM]; - data[jistart + 11071] = 0.0 + k[6752]*y_cur[IDX_GRAINM]; - data[jistart + 11072] = 0.0 + k[6620]*y_cur[IDX_GRAINM]; - data[jistart + 11073] = 0.0 + k[6750]*y_cur[IDX_GRAINM] + - k[6751]*y_cur[IDX_GRAINM]; - data[jistart + 11074] = 0.0 + k[6374]*y_cur[IDX_GRAINM]; - data[jistart + 11075] = 0.0 + k[6481]*y_cur[IDX_GRAINM]; - data[jistart + 11076] = 0.0 + k[6642]*y_cur[IDX_GRAINM] + - k[6643]*y_cur[IDX_GRAINM]; - data[jistart + 11077] = 0.0 + k[6649]*y_cur[IDX_GRAINM] + - k[6650]*y_cur[IDX_GRAINM]; - data[jistart + 11078] = 0.0 + k[6660]*y_cur[IDX_GRAINM] + - k[6661]*y_cur[IDX_GRAINM]; - data[jistart + 11079] = 0.0 + k[6664]*y_cur[IDX_GRAINM] + - k[6665]*y_cur[IDX_GRAINM]; - data[jistart + 11080] = 0.0 + k[6746]*y_cur[IDX_GRAINM] + - k[6747]*y_cur[IDX_GRAINM]; - data[jistart + 11081] = 0.0 + k[6761]*y_cur[IDX_GRAINM] + - k[6762]*y_cur[IDX_GRAINM]; - data[jistart + 11082] = 0.0 + k[6767]*y_cur[IDX_GRAINM] + - k[6768]*y_cur[IDX_GRAINM]; - data[jistart + 11083] = 0.0 + k[6798]*y_cur[IDX_GRAINM] + - k[6799]*y_cur[IDX_GRAINM]; - data[jistart + 11084] = 0.0 + k[6800]*y_cur[IDX_GRAINM] + - k[6801]*y_cur[IDX_GRAINM]; - data[jistart + 11085] = 0.0 + k[6496]*y_cur[IDX_GRAINM] + - k[6497]*y_cur[IDX_GRAINM] + k[6498]*y_cur[IDX_GRAINM]; - data[jistart + 11086] = 0.0 + k[6516]*y_cur[IDX_GRAINM] + - k[6517]*y_cur[IDX_GRAINM]; - data[jistart + 11087] = 0.0 + k[6541]*y_cur[IDX_GRAINM] + - k[6542]*y_cur[IDX_GRAINM]; - data[jistart + 11088] = 0.0 + k[6592]*y_cur[IDX_GRAINM]; - data[jistart + 11089] = 0.0 + k[6388]*y_cur[IDX_GRAINM]; - data[jistart + 11090] = 0.0 + k[6402]*y_cur[IDX_GRAINM] + - k[6403]*y_cur[IDX_GRAINM] + k[6404]*y_cur[IDX_GRAINM]; - data[jistart + 11091] = 0.0 + k[6412]*y_cur[IDX_GRAINM] + - k[6413]*y_cur[IDX_GRAINM]; - data[jistart + 11092] = 0.0 + k[6426]*y_cur[IDX_GRAINM] + - k[6427]*y_cur[IDX_GRAINM]; - data[jistart + 11093] = 0.0 + k[6438]*y_cur[IDX_GRAINM] + - k[6439]*y_cur[IDX_GRAINM]; - data[jistart + 11094] = 0.0 + k[6501]*y_cur[IDX_GRAINM]; - data[jistart + 11095] = 0.0 + k[6654]*y_cur[IDX_GRAINM]; - data[jistart + 11096] = 0.0 + k[6668]*y_cur[IDX_GRAINM] + - k[6669]*y_cur[IDX_GRAINM]; - data[jistart + 11097] = 0.0 + k[6552]*y_cur[IDX_GRAINM] + - k[6553]*y_cur[IDX_GRAINM]; - data[jistart + 11098] = 0.0 + k[6531]*y_cur[IDX_GRAINM]; - data[jistart + 11099] = 0.0 + k[6556]*y_cur[IDX_GRAINM] + - k[6557]*y_cur[IDX_GRAINM]; - data[jistart + 11100] = 0.0 + k[6710]*y_cur[IDX_GRAINM]; - data[jistart + 11101] = 0.0 - k[8763]*y_cur[IDX_GRAIN0I]; - data[jistart + 11102] = 0.0 + k[8400]*y_cur[IDX_GNSI] + - k[8409]*y_cur[IDX_GSOI] - k[8415]*y_cur[IDX_GSI] - - k[8666]*y_cur[IDX_GSI]; - data[jistart + 11103] = 0.0 + k[7816] + k[8144]; - data[jistart + 11104] = 0.0 - k[8473]*y_cur[IDX_GSI] - - k[8713]*y_cur[IDX_GSI]; - data[jistart + 11105] = 0.0 - k[8474]*y_cur[IDX_GSI]; - data[jistart + 11106] = 0.0 - k[8476]*y_cur[IDX_GSI] - - k[8714]*y_cur[IDX_GSI]; - data[jistart + 11107] = 0.0 + k[7757] + k[7758] + k[8075] + k[8076]; - data[jistart + 11108] = 0.0 - k[8311]*y_cur[IDX_GSI] - - k[8607]*y_cur[IDX_GSI]; - data[jistart + 11109] = 0.0 + k[7709] + k[7711] + k[8014] + k[8016]; - data[jistart + 11110] = 0.0 + k[7766] + k[8086]; - data[jistart + 11111] = 0.0 + k[7707] + k[8011]; - data[jistart + 11112] = 0.0 + k[7845] + k[8172] + k[8173]; - data[jistart + 11113] = 0.0 + k[8459]*y_cur[IDX_GNSI] - - k[8464]*y_cur[IDX_GSI] - k[8704]*y_cur[IDX_GSI]; - data[jistart + 11114] = 0.0 - k[8475]*y_cur[IDX_GSI]; - data[jistart + 11115] = 0.0 + k[7779] + k[8101] + - k[8400]*y_cur[IDX_GCI] + k[8442]*y_cur[IDX_GOI] + - k[8459]*y_cur[IDX_GNI]; - data[jistart + 11116] = 0.0 + k[8442]*y_cur[IDX_GNSI] - - k[8450]*y_cur[IDX_GSI] - k[8694]*y_cur[IDX_GSI]; - data[jistart + 11117] = 0.0 + k[7827] + k[7830] + k[8151] + k[8154]; - data[jistart + 11118] = 0.0 - k[7114] - k[7296] - k[7478] - - k[8311]*y_cur[IDX_GHI] - k[8415]*y_cur[IDX_GCI] - - k[8450]*y_cur[IDX_GOI] - k[8464]*y_cur[IDX_GNI] - - k[8473]*y_cur[IDX_GCHI] - k[8474]*y_cur[IDX_GCH3I] - - k[8475]*y_cur[IDX_GNHI] - k[8476]*y_cur[IDX_GCOI] - - k[8607]*y_cur[IDX_GHI] - k[8666]*y_cur[IDX_GCI] - - k[8694]*y_cur[IDX_GOI] - k[8704]*y_cur[IDX_GNI] - - k[8713]*y_cur[IDX_GCHI] - k[8714]*y_cur[IDX_GCOI]; - data[jistart + 11119] = 0.0 + k[7840] + k[7840] + k[8165] + k[8165] - + k[8166] + k[8166]; - data[jistart + 11120] = 0.0 + k[7786] + k[7787] + k[8110] + k[8111] - + k[8409]*y_cur[IDX_GCI]; - data[jistart + 11121] = 0.0 + k[7831] + k[8155]; - data[jistart + 11122] = 0.0 + k[6932]; - data[jistart + 11123] = 0.0 + k[8174]; - data[jistart + 11124] = 0.0 - k[7215] - k[7397] - k[7579] - k[7840] - - k[8165] - k[8166]; - data[jistart + 11125] = 0.0 + k[7033]; - data[jistart + 11126] = 0.0 - k[8409]*y_cur[IDX_GSOI]; - data[jistart + 11127] = 0.0 + k[8449]*y_cur[IDX_GOI]; - data[jistart + 11128] = 0.0 + k[8449]*y_cur[IDX_GHSI] + - k[8450]*y_cur[IDX_GSI] - k[8453]*y_cur[IDX_GSOI] - - k[8697]*y_cur[IDX_GSOI]; - data[jistart + 11129] = 0.0 + k[7828] + k[8152]; - data[jistart + 11130] = 0.0 + k[8450]*y_cur[IDX_GOI]; - data[jistart + 11131] = 0.0 - k[7176] - k[7358] - k[7540] - k[7786] - - k[7787] - k[8110] - k[8111] - k[8409]*y_cur[IDX_GCI] - - k[8453]*y_cur[IDX_GOI] - k[8697]*y_cur[IDX_GOI]; - data[jistart + 11132] = 0.0 + k[7839] + k[8164]; - data[jistart + 11133] = 0.0 + k[6994]; - data[jistart + 11134] = 0.0 - k[8349]*y_cur[IDX_GSO2I]; - data[jistart + 11135] = 0.0 + k[8453]*y_cur[IDX_GSOI]; - data[jistart + 11136] = 0.0 + k[8453]*y_cur[IDX_GOI]; - data[jistart + 11137] = 0.0 - k[7214] - k[7396] - k[7578] - k[7839] - - k[8164] - k[8349]*y_cur[IDX_GHI]; - data[jistart + 11138] = 0.0 + k[7032]; - data[jistart + 11139] = 0.0 - k[8301]*y_cur[IDX_GSiI] - - k[8600]*y_cur[IDX_GSiI]; - data[jistart + 11140] = 0.0 + k[7738] + k[8048]; - data[jistart + 11141] = 0.0 - k[7097] - k[7279] - k[7461] - - k[8301]*y_cur[IDX_GHI] - k[8600]*y_cur[IDX_GHI]; - data[jistart + 11142] = 0.0 + k[7734] + k[8043]; - data[jistart + 11143] = 0.0 + k[8129]; - data[jistart + 11144] = 0.0 + k[8189]; - data[jistart + 11145] = 0.0 + k[8059]; - data[jistart + 11146] = 0.0 + k[7684] + k[7971]; - data[jistart + 11147] = 0.0 + k[7974] + k[7975]; - data[jistart + 11148] = 0.0 + k[7748] + k[8062]; - data[jistart + 11149] = 0.0 + k[7806] + k[8135]; - data[jistart + 11150] = 0.0 + k[7765] + k[8083] + k[8084]; - data[jistart + 11151] = 0.0 + k[7831] + k[8155]; - data[jistart + 11152] = 0.0 + k[6915]; - data[jistart + 11153] = 0.0 + k[8047] + k[8049]; - data[jistart + 11154] = 0.0 - k[7137] - k[7319] - k[7501] - k[7734] - - k[8043]; - data[jistart + 11155] = 0.0 + k[7802]; - data[jistart + 11156] = 0.0 + k[8168]; - data[jistart + 11157] = 0.0 + k[7746] + k[8060]; - data[jistart + 11158] = 0.0 + k[6955]; - data[jistart + 11159] = 0.0 - k[7185] - k[7367] - k[7549] - k[7802] - - k[8129]; - data[jistart + 11160] = 0.0 + k[7805] + k[8133]; - data[jistart + 11161] = 0.0 + k[7808]; - data[jistart + 11162] = 0.0 + k[7842] + k[8169]; - data[jistart + 11163] = 0.0 + k[7857]; - data[jistart + 11164] = 0.0 + k[7003]; - data[jistart + 11165] = 0.0 - k[7190] - k[7372] - k[7554] - k[7805] - - k[8133]; - data[jistart + 11166] = 0.0 + k[8137]; - data[jistart + 11167] = 0.0 + k[7008]; - data[jistart + 11168] = 0.0 - k[7192] - k[7374] - k[7556] - k[7808] - - k[8137]; - data[jistart + 11169] = 0.0 + k[7010]; - data[jistart + 11170] = 0.0 - k[7213] - k[7395] - k[7577] - k[7842] - - k[8168] - k[8169]; - data[jistart + 11171] = 0.0 + k[7843] + k[8170]; - data[jistart + 11172] = 0.0 + k[7031]; - data[jistart + 11173] = 0.0 - k[7217] - k[7399] - k[7581] - k[7843] - - k[8170]; - data[jistart + 11174] = 0.0 + k[7035]; - data[jistart + 11175] = 0.0 - k[7228] - k[7410] - k[7592] - k[7857] - - k[8189]; - data[jistart + 11176] = 0.0 + k[7046]; - data[jistart + 11177] = 0.0 - k[7145] - k[7327] - k[7509] - k[7746] - - k[8057] - k[8058] - k[8059] - k[8060]; - data[jistart + 11178] = 0.0 + k[7749] + k[8063]; - data[jistart + 11179] = 0.0 + k[6963]; - data[jistart + 11180] = 0.0 - k[7152] - k[7334] - k[7516] - k[7749] - - k[8063]; - data[jistart + 11181] = 0.0 + k[6970]; - data[jistart + 11182] = 0.0 + k[8301]*y_cur[IDX_GSiI] - - k[8302]*y_cur[IDX_GSiHI] - k[8601]*y_cur[IDX_GSiHI]; - data[jistart + 11183] = 0.0 + k[8301]*y_cur[IDX_GHI]; - data[jistart + 11184] = 0.0 - k[7102] - k[7284] - k[7466] - k[7684] - - k[7971] - k[8302]*y_cur[IDX_GHI] - k[8601]*y_cur[IDX_GHI]; - data[jistart + 11185] = 0.0 + k[7686] + k[7973] + k[7976]; - data[jistart + 11186] = 0.0 + k[7989] + k[7991]; - data[jistart + 11187] = 0.0 + k[7995]; - data[jistart + 11188] = 0.0 + k[6920]; - data[jistart + 11189] = 0.0 + k[8302]*y_cur[IDX_GSiHI] - - k[8303]*y_cur[IDX_GSiH2I] - k[8602]*y_cur[IDX_GSiH2I]; - data[jistart + 11190] = 0.0 + k[8302]*y_cur[IDX_GHI]; - data[jistart + 11191] = 0.0 - k[7106] - k[7288] - k[7470] - k[7686] - - k[7973] - k[7974] - k[7975] - k[7976] - k[8303]*y_cur[IDX_GHI] - - k[8602]*y_cur[IDX_GHI]; - data[jistart + 11192] = 0.0 + k[7693] + k[7988] + k[7990]; - data[jistart + 11193] = 0.0 + k[7695] + k[7993]; - data[jistart + 11194] = 0.0 + k[6924]; - data[jistart + 11195] = 0.0 + k[8303]*y_cur[IDX_GSiH2I] - - k[8304]*y_cur[IDX_GSiH3I] - k[8603]*y_cur[IDX_GSiH3I]; - data[jistart + 11196] = 0.0 + k[8303]*y_cur[IDX_GHI]; - data[jistart + 11197] = 0.0 - k[7109] - k[7291] - k[7473] - k[7693] - - k[7988] - k[7989] - k[7990] - k[7991] - k[8304]*y_cur[IDX_GHI] - - k[8603]*y_cur[IDX_GHI]; - data[jistart + 11198] = 0.0 + k[7994]; - data[jistart + 11199] = 0.0 + k[6927]; - data[jistart + 11200] = 0.0 + k[8304]*y_cur[IDX_GSiH3I]; - data[jistart + 11201] = 0.0 + k[8304]*y_cur[IDX_GHI]; - data[jistart + 11202] = 0.0 - k[7117] - k[7299] - k[7481] - k[7695] - - k[7993] - k[7994] - k[7995]; - data[jistart + 11203] = 0.0 + k[6935]; - data[jistart + 11204] = 0.0 + k[7750] + k[8064]; - data[jistart + 11205] = 0.0 - k[7147] - k[7329] - k[7511] - k[7748] - - k[8062]; - data[jistart + 11206] = 0.0 + k[8134]; - data[jistart + 11207] = 0.0 + k[6965]; - data[jistart + 11208] = 0.0 - k[7194] - k[7376] - k[7560] - k[7806] - - k[8134] - k[8135]; - data[jistart + 11209] = 0.0 + k[7012]; - data[jistart + 11210] = 0.0 + k[7776] + k[8096] + k[8097]; - data[jistart + 11211] = 0.0 - k[7161] - k[7343] - k[7525] - k[7765] - - k[8083] - k[8084]; - data[jistart + 11212] = 0.0 + k[7832] + k[8156]; - data[jistart + 11213] = 0.0 + k[6979]; - data[jistart + 11214] = 0.0 - k[7207] - k[7389] - k[7573] - k[7832] - - k[8156]; - data[jistart + 11215] = 0.0 + k[7025]; - data[jistart + 11216] = 0.0 - k[7205] - k[7387] - k[7571] - k[7831] - - k[8155]; - data[jistart + 11217] = 0.0 + k[7023]; - data[jistart + 11218] = 0.0 + k[1846]*y_cur[IDX_C10HII] + - k[1849]*y_cur[IDX_C2HII] + k[1850]*y_cur[IDX_C2H2II] + - k[1852]*y_cur[IDX_C2H3II] + k[1854]*y_cur[IDX_C2H4II] + - k[1856]*y_cur[IDX_C3H2II] + k[1858]*y_cur[IDX_C3H3II] + - k[1860]*y_cur[IDX_C3H4II] + k[1862]*y_cur[IDX_C4HII] + - k[1864]*y_cur[IDX_C4H2II] + k[1866]*y_cur[IDX_C4H3II] + - k[1867]*y_cur[IDX_C5HII] + k[1869]*y_cur[IDX_C5H2II] + - k[1871]*y_cur[IDX_C5H3II] + k[1873]*y_cur[IDX_C6H2II] + - k[1875]*y_cur[IDX_C6H3II] + k[1876]*y_cur[IDX_C7HII] + - k[1878]*y_cur[IDX_C7H2II] + k[1880]*y_cur[IDX_C7H3II] + - k[1882]*y_cur[IDX_C8H2II] + k[1884]*y_cur[IDX_C8H3II] + - k[1885]*y_cur[IDX_C9HII] + k[1887]*y_cur[IDX_C9H2II] + - k[1889]*y_cur[IDX_C9H3II] + k[1890]*y_cur[IDX_CHII] + - k[1891]*y_cur[IDX_CH2II] + k[1893]*y_cur[IDX_CH2CCHII] + - k[1895]*y_cur[IDX_CH3C3NHII] + k[1896]*y_cur[IDX_CH3C5NHII] + - k[1897]*y_cur[IDX_CH3C7NHII] + k[1900]*y_cur[IDX_H2SII] + - k[1902]*y_cur[IDX_HC2SII] + k[1906]*y_cur[IDX_HCPII] + - k[1908]*y_cur[IDX_HSII] + k[1915]*y_cur[IDX_SiC2HII] + - k[1916]*y_cur[IDX_SiC2H2II] + k[1917]*y_cur[IDX_SiC2H3II] + - k[1918]*y_cur[IDX_SiC3HII] + k[1919]*y_cur[IDX_SiC3H2II] + - k[1922]*y_cur[IDX_SiCH2II] + k[1923]*y_cur[IDX_SiCH3II] + - k[1924]*y_cur[IDX_SiCH4II] + k[1925]*y_cur[IDX_SiHII] + - k[1926]*y_cur[IDX_SiH2II] + k[1927]*y_cur[IDX_SiH3II] + - k[1929]*y_cur[IDX_SiH5II] + k[1931]*y_cur[IDX_SiNH2II] + - k[2374]*y_cur[IDX_H2II] + k[4910]*y_cur[IDX_C10HI] + - k[4912]*y_cur[IDX_C2H2I] + k[4913]*y_cur[IDX_C2H3I] + - k[4914]*y_cur[IDX_C2H4I] + k[4915]*y_cur[IDX_C2H5I] + - k[4916]*y_cur[IDX_C2HI] + k[4919]*y_cur[IDX_C3H2I] + - k[4920]*y_cur[IDX_C3HI] + k[4924]*y_cur[IDX_C4H3I] + - k[4925]*y_cur[IDX_C4HI] + k[4927]*y_cur[IDX_C5H2I] + - k[4928]*y_cur[IDX_C5HI] + k[4932]*y_cur[IDX_C6H2I] + - k[4933]*y_cur[IDX_C6HI] + k[4935]*y_cur[IDX_C7H2I] + - k[4936]*y_cur[IDX_C7HI] + k[4939]*y_cur[IDX_C8H2I] + - k[4940]*y_cur[IDX_C8HI] + k[4941]*y_cur[IDX_C9H2I] + - k[4942]*y_cur[IDX_C9HI] + k[4944]*y_cur[IDX_CH2I] + - k[4946]*y_cur[IDX_CH2CCH2I] + k[4947]*y_cur[IDX_CH2CCHI] + - k[4948]*y_cur[IDX_CH2CNI] + k[4949]*y_cur[IDX_CH3I] + - k[4952]*y_cur[IDX_CH3CCHI] + k[4954]*y_cur[IDX_CH3CHCH2I] + - k[4955]*y_cur[IDX_CHI] + k[4959]*y_cur[IDX_H2CCCI] + - k[4961]*y_cur[IDX_C4H2I] + k[4962]*y_cur[IDX_HCOI] + - k[4965]*y_cur[IDX_HSI] + k[4969]*y_cur[IDX_NH2I] + - k[4970]*y_cur[IDX_NH2I] + k[4972]*y_cur[IDX_NHI] + - k[4981]*y_cur[IDX_OHI] + k[4983]*y_cur[IDX_PHI] + - k[4988]*y_cur[IDX_SiH2I] + k[4989]*y_cur[IDX_SiH3I] + - k[4990]*y_cur[IDX_SiHI] + k[5134]*y_cur[IDX_H2I] - - k[5572]*y_cur[IDX_HI]; - data[jistart + 11219] = 0.0 + k[1298]*y_cur[IDX_C10HI] + - k[1300]*y_cur[IDX_C2H2I] + k[1301]*y_cur[IDX_C2H3I] + - k[1303]*y_cur[IDX_C2H4I] + k[1305]*y_cur[IDX_C2H4I] + - k[1308]*y_cur[IDX_C2HI] + k[1311]*y_cur[IDX_C3H2I] + - k[1312]*y_cur[IDX_C3HI] + k[1319]*y_cur[IDX_C4H3I] + - k[1320]*y_cur[IDX_C4HI] + k[1324]*y_cur[IDX_C5H2I] + - k[1325]*y_cur[IDX_C5HI] + k[1327]*y_cur[IDX_C6H2I] + - k[1330]*y_cur[IDX_C6H6I] + k[1331]*y_cur[IDX_C6HI] + - k[1333]*y_cur[IDX_C7H2I] + k[1334]*y_cur[IDX_C7HI] + - k[1336]*y_cur[IDX_C8H2I] + k[1337]*y_cur[IDX_C8HI] + - k[1339]*y_cur[IDX_C9H2I] + k[1340]*y_cur[IDX_C9HI] + - k[1342]*y_cur[IDX_CH2I] + k[1347]*y_cur[IDX_CH2CCHI] + - k[1350]*y_cur[IDX_CH2CHCNI] + k[1353]*y_cur[IDX_CH3I] + - k[1358]*y_cur[IDX_CH3C4HI] + k[1372]*y_cur[IDX_C2H6I] + - k[1377]*y_cur[IDX_CH3CHCH2I] + k[1384]*y_cur[IDX_CH4I] + - k[1385]*y_cur[IDX_CHI] + k[1389]*y_cur[IDX_H2CCCI] + - k[1393]*y_cur[IDX_H2OI] + k[1394]*y_cur[IDX_H2OI] + - k[1395]*y_cur[IDX_H2SI] + k[1401]*y_cur[IDX_HC3NI] + - k[1403]*y_cur[IDX_C4H2I] + k[1407]*y_cur[IDX_HCNI] + - k[1409]*y_cur[IDX_HCPI] + k[1410]*y_cur[IDX_HCSiI] + - k[1411]*y_cur[IDX_HClI] + k[1412]*y_cur[IDX_HFI] + - k[1413]*y_cur[IDX_HNCI] + k[1414]*y_cur[IDX_HNSiI] + - k[1415]*y_cur[IDX_HSI] + k[1417]*y_cur[IDX_NH2I] + - k[1418]*y_cur[IDX_NH3I] + k[1420]*y_cur[IDX_NHI] + - k[1426]*y_cur[IDX_OHI] + k[1431]*y_cur[IDX_SiC2H2I] + - k[1432]*y_cur[IDX_SiC2HI] + k[1433]*y_cur[IDX_SiC3HI] + - k[1436]*y_cur[IDX_SiCH2I] + k[1438]*y_cur[IDX_SiCH3I] + - k[1439]*y_cur[IDX_SiH2I] + k[1442]*y_cur[IDX_SiH3I] + - k[1444]*y_cur[IDX_SiH4I] + k[1445]*y_cur[IDX_SiHI] + - k[2398]*y_cur[IDX_H2I] + k[3019]*y_cur[IDX_HNC3I] + - k[4691]*y_cur[IDX_HM] - k[5569]*y_cur[IDX_HI]; - data[jistart + 11220] = 0.0 - k[84]*y_cur[IDX_HI] + - k[3896]*y_cur[IDX_HII] + k[3899]*y_cur[IDX_H3II] + - k[3900]*y_cur[IDX_H3OII] + k[3901]*y_cur[IDX_HC2SII] + - k[3902]*y_cur[IDX_HCNHII] + k[3903]*y_cur[IDX_HCNHII] + - k[3904]*y_cur[IDX_HCOII] + k[3909]*y_cur[IDX_N2HII] + - k[3911]*y_cur[IDX_NH4II] + k[3919]*y_cur[IDX_SiOHII]; - data[jistart + 11221] = 0.0 + k[320]*y_cur[IDX_HII]; - data[jistart + 11222] = 0.0 + k[2399]*y_cur[IDX_H2I]; - data[jistart + 11223] = 0.0 - k[85]*y_cur[IDX_HI] + - k[3931]*y_cur[IDX_HII] + k[3934]*y_cur[IDX_H3II] + - k[3935]*y_cur[IDX_H3OII] + k[3936]*y_cur[IDX_HC2SII] + - k[3937]*y_cur[IDX_HCNHII] + k[3938]*y_cur[IDX_HCNHII] + - k[3939]*y_cur[IDX_HCOII] + k[3944]*y_cur[IDX_N2HII] + - k[3946]*y_cur[IDX_NH4II] + k[3954]*y_cur[IDX_SiOHII]; - data[jistart + 11224] = 0.0 + k[322]*y_cur[IDX_HII] + - k[1298]*y_cur[IDX_CII] + k[3069]*y_cur[IDX_HeII] + - k[3072]*y_cur[IDX_HeII] + k[4910]*y_cur[IDX_CI] + k[5691] + k[5961] - + k[5963] + k[5965] + k[5967] + k[5968]; - data[jistart + 11225] = 0.0 + k[729]*y_cur[IDX_eM] + - k[1846]*y_cur[IDX_CI] + k[2400]*y_cur[IDX_H2I] + - k[6871]*y_cur[IDX_GRAINM]; - data[jistart + 11226] = 0.0 - k[86]*y_cur[IDX_HI] + - k[3966]*y_cur[IDX_HII] + k[3969]*y_cur[IDX_H3II] + - k[3970]*y_cur[IDX_H3OII] + k[3971]*y_cur[IDX_HC2SII] + - k[3972]*y_cur[IDX_HCNHII] + k[3973]*y_cur[IDX_HCNHII] + - k[3974]*y_cur[IDX_HCOII] + k[3979]*y_cur[IDX_N2HII] + - k[3981]*y_cur[IDX_NH4II] + k[3989]*y_cur[IDX_SiOHII]; - data[jistart + 11227] = 0.0 + k[321]*y_cur[IDX_HII] + - k[3062]*y_cur[IDX_HeII] + k[3062]*y_cur[IDX_HeII] + - k[3064]*y_cur[IDX_HeII] + k[3066]*y_cur[IDX_HeII] + k[5690] + - k[5957] + k[5957] + k[5959] + k[5960]; - data[jistart + 11228] = 0.0 + k[732]*y_cur[IDX_eM] + - k[6874]*y_cur[IDX_GRAINM]; - data[jistart + 11229] = 0.0 + k[733]*y_cur[IDX_eM] + - k[734]*y_cur[IDX_eM] + k[6878]*y_cur[IDX_GRAINM] + - k[6879]*y_cur[IDX_GRAINM]; - data[jistart + 11230] = 0.0 + k[323]*y_cur[IDX_HII] + - k[1933]*y_cur[IDX_CHII] + k[2369]*y_cur[IDX_H2II] + - k[3478]*y_cur[IDX_NHII] + k[4867]*y_cur[IDX_C2H2I] + - k[4868]*y_cur[IDX_C2H4I] + k[4869]*y_cur[IDX_C2H6I] + - k[4869]*y_cur[IDX_C2H6I] + k[4870]*y_cur[IDX_CH3CHCH2I] + - k[4870]*y_cur[IDX_CH3CHCH2I] + k[4871]*y_cur[IDX_CH4I] + - k[4872]*y_cur[IDX_C4H2I] + k[4873]*y_cur[IDX_HCNI] - - k[5153]*y_cur[IDX_HI]; - data[jistart + 11231] = 0.0 + k[1452]*y_cur[IDX_C2H2I] + - k[1453]*y_cur[IDX_HCNI] + k[1995]*y_cur[IDX_CH2I] + - k[2148]*y_cur[IDX_CH4I] + k[2150]*y_cur[IDX_CH4I] + - k[2239]*y_cur[IDX_CHI] + k[2401]*y_cur[IDX_H2I] + - k[2520]*y_cur[IDX_H2OI] + k[3528]*y_cur[IDX_NH2I] + - k[3606]*y_cur[IDX_NHI]; - data[jistart + 11232] = 0.0 - k[87]*y_cur[IDX_HI] + - k[4001]*y_cur[IDX_HII] + k[4004]*y_cur[IDX_H3II] + - k[4005]*y_cur[IDX_H3OII] + k[4006]*y_cur[IDX_HC2SII] + - k[4007]*y_cur[IDX_HCNHII] + k[4008]*y_cur[IDX_HCNHII] + - k[4009]*y_cur[IDX_HCOII] + k[4014]*y_cur[IDX_N2HII] + - k[4016]*y_cur[IDX_NH4II] + k[4024]*y_cur[IDX_SiOHII]; - data[jistart + 11233] = 0.0 + k[329]*y_cur[IDX_HII] + - k[1308]*y_cur[IDX_CII] + k[1725]*y_cur[IDX_C2H2II] + - k[1728]*y_cur[IDX_C2H3II] + k[1731]*y_cur[IDX_C3H2II] + - k[1733]*y_cur[IDX_C3H3II] + k[1735]*y_cur[IDX_C4HII] + - k[1736]*y_cur[IDX_C4H2II] + k[1737]*y_cur[IDX_C4H3II] + - k[1738]*y_cur[IDX_C5H2II] + k[1739]*y_cur[IDX_C6H2II] + - k[1740]*y_cur[IDX_C7H2II] + k[1742]*y_cur[IDX_CH2CCHII] + - k[1750]*y_cur[IDX_SII] + k[1751]*y_cur[IDX_SiII] + - k[1975]*y_cur[IDX_CH2II] + k[2049]*y_cur[IDX_CH3II] + - k[2373]*y_cur[IDX_H2II] + k[3086]*y_cur[IDX_HeII] + - k[4888]*y_cur[IDX_C2H2I] + k[4889]*y_cur[IDX_C3H2I] + - k[4890]*y_cur[IDX_C5H2I] + k[4891]*y_cur[IDX_C6H2I] + - k[4892]*y_cur[IDX_C7H2I] + k[4893]*y_cur[IDX_C8H2I] + - k[4894]*y_cur[IDX_CH2CCH2I] + k[4895]*y_cur[IDX_CH2CCH2I] + - k[4896]*y_cur[IDX_CH3CCHI] + k[4897]*y_cur[IDX_CH3CCHI] + - k[4899]*y_cur[IDX_CSI] + k[4900]*y_cur[IDX_C4H2I] + - k[4901]*y_cur[IDX_HCNI] + k[4902]*y_cur[IDX_HNCI] + - k[4905]*y_cur[IDX_OCSI] + k[4906]*y_cur[IDX_SI] + - k[4916]*y_cur[IDX_CI] + k[5133]*y_cur[IDX_H2I] + - k[5228]*y_cur[IDX_NI] + k[5708] + k[5993]; - data[jistart + 11234] = 0.0 + k[740]*y_cur[IDX_eM] + - k[1466]*y_cur[IDX_C2H2I] + k[1467]*y_cur[IDX_CNI] + - k[1473]*y_cur[IDX_HC3NI] + k[1475]*y_cur[IDX_HCNI] + - k[1849]*y_cur[IDX_CI] + k[1997]*y_cur[IDX_CH2I] + - k[2152]*y_cur[IDX_CH4I] + k[2241]*y_cur[IDX_CHI] + - k[2402]*y_cur[IDX_H2I] + k[2521]*y_cur[IDX_H2OI] + - k[3385]*y_cur[IDX_NI] + k[3530]*y_cur[IDX_NH2I] + k[5979] + - k[6354]*y_cur[IDX_GRAINM]; - data[jistart + 11235] = 0.0 - k[88]*y_cur[IDX_HI] + - k[111]*y_cur[IDX_NI] + k[129]*y_cur[IDX_OI] + k[4036]*y_cur[IDX_HII] - + k[4039]*y_cur[IDX_H3II] + k[4040]*y_cur[IDX_H3OII] + - k[4041]*y_cur[IDX_HC2SII] + k[4042]*y_cur[IDX_HCNHII] + - k[4043]*y_cur[IDX_HCNHII] + k[4044]*y_cur[IDX_HCOII] + - k[4049]*y_cur[IDX_N2HII] + k[4051]*y_cur[IDX_NH4II] + - k[4059]*y_cur[IDX_SiOHII]; - data[jistart + 11236] = 0.0 + k[324]*y_cur[IDX_HII] + - k[1300]*y_cur[IDX_CII] + k[1452]*y_cur[IDX_C2II] + - k[1466]*y_cur[IDX_C2HII] + k[1480]*y_cur[IDX_C2H2II] + - k[1537]*y_cur[IDX_C2H4II] + k[1541]*y_cur[IDX_C2NII] + - k[1543]*y_cur[IDX_C3II] + k[1544]*y_cur[IDX_C3HII] + - k[1545]*y_cur[IDX_C3H2II] + k[1547]*y_cur[IDX_C3H4II] + - k[1550]*y_cur[IDX_C4II] + k[1551]*y_cur[IDX_C4HII] + - k[1552]*y_cur[IDX_C4H2II] + k[1554]*y_cur[IDX_C4H4II] + - k[1556]*y_cur[IDX_C5II] + k[1558]*y_cur[IDX_C6II] + - k[1559]*y_cur[IDX_C6HII] + k[1561]*y_cur[IDX_C7H2II] + - k[1564]*y_cur[IDX_C2H6II] + k[1569]*y_cur[IDX_PII] + - k[1570]*y_cur[IDX_PHII] + k[1573]*y_cur[IDX_SII] + - k[1574]*y_cur[IDX_SiII] + k[1575]*y_cur[IDX_SiC2II] + - k[1934]*y_cur[IDX_CHII] + k[2134]*y_cur[IDX_CH4II] + - k[2370]*y_cur[IDX_H2II] + k[3075]*y_cur[IDX_HeII] + - k[3655]*y_cur[IDX_O2II] + k[4867]*y_cur[IDX_C2I] + - k[4877]*y_cur[IDX_C4HI] + k[4878]*y_cur[IDX_NOI] + - k[4880]*y_cur[IDX_SiI] + k[4888]*y_cur[IDX_C2HI] + - k[4912]*y_cur[IDX_CI] + k[4991]*y_cur[IDX_CH2I] + - k[5063]*y_cur[IDX_CHI] + k[5064]*y_cur[IDX_CHI] + - k[5104]*y_cur[IDX_CNI] - k[5154]*y_cur[IDX_HI] + - k[5454]*y_cur[IDX_OHI] + k[5697] + k[5982]; - data[jistart + 11237] = 0.0 + k[742]*y_cur[IDX_eM] + - k[742]*y_cur[IDX_eM] + k[743]*y_cur[IDX_eM] + - k[1480]*y_cur[IDX_C2H2I] + k[1483]*y_cur[IDX_C2H4I] + - k[1486]*y_cur[IDX_C3H2I] + k[1488]*y_cur[IDX_C3HI] + - k[1490]*y_cur[IDX_C4HI] + k[1492]*y_cur[IDX_C5H2I] + - k[1494]*y_cur[IDX_C5HI] + k[1496]*y_cur[IDX_C6H2I] + - k[1498]*y_cur[IDX_C6HI] + k[1500]*y_cur[IDX_C7H2I] + - k[1502]*y_cur[IDX_C7HI] + k[1504]*y_cur[IDX_C8H2I] + - k[1506]*y_cur[IDX_C8HI] + k[1508]*y_cur[IDX_CH2CCHI] + - k[1509]*y_cur[IDX_CH3CCHI] + k[1517]*y_cur[IDX_H2CCCI] + - k[1521]*y_cur[IDX_C4H2I] + k[1522]*y_cur[IDX_HCNI] + - k[1526]*y_cur[IDX_PI] + k[1528]*y_cur[IDX_SI] + - k[1530]*y_cur[IDX_SiI] + k[1725]*y_cur[IDX_C2HI] + - k[1850]*y_cur[IDX_CI] + k[1998]*y_cur[IDX_CH2I] + - k[2155]*y_cur[IDX_CH4I] + k[2242]*y_cur[IDX_CHI] + - k[2277]*y_cur[IDX_CNI] + k[2403]*y_cur[IDX_H2I] + - k[3388]*y_cur[IDX_NI] + k[3532]*y_cur[IDX_NH2I] + - k[3607]*y_cur[IDX_NHI] + k[3688]*y_cur[IDX_OI] + - k[3796]*y_cur[IDX_OHI] + k[4692]*y_cur[IDX_HM] + - k[6356]*y_cur[IDX_GRAINM] + k[6356]*y_cur[IDX_GRAINM] + - k[6357]*y_cur[IDX_GRAINM]; - data[jistart + 11238] = 0.0 + k[325]*y_cur[IDX_HII] + - k[1301]*y_cur[IDX_CII] + k[1630]*y_cur[IDX_C3H2II] + - k[1632]*y_cur[IDX_C4HII] + k[1634]*y_cur[IDX_C4H2II] + - k[1636]*y_cur[IDX_C4H3II] + k[1638]*y_cur[IDX_C5H2II] + - k[1640]*y_cur[IDX_C6H2II] + k[1642]*y_cur[IDX_C7H2II] + - k[1646]*y_cur[IDX_SiII] + k[2043]*y_cur[IDX_CH3II] + - k[3078]*y_cur[IDX_HeII] + k[4883]*y_cur[IDX_C2H4I] + - k[4913]*y_cur[IDX_CI] - k[5155]*y_cur[IDX_HI] + - k[5224]*y_cur[IDX_NI] + k[5345]*y_cur[IDX_OI] + k[5698] + k[5983]; - data[jistart + 11239] = 0.0 + k[745]*y_cur[IDX_eM] + - k[746]*y_cur[IDX_eM] + k[747]*y_cur[IDX_eM] + k[748]*y_cur[IDX_eM] + - k[751]*y_cur[IDX_eM] + k[751]*y_cur[IDX_eM] + k[752]*y_cur[IDX_eM] + - k[752]*y_cur[IDX_eM] + k[1582]*y_cur[IDX_C3H2I] + - k[1585]*y_cur[IDX_C3HI] + k[1588]*y_cur[IDX_C4HI] + - k[1591]*y_cur[IDX_C5H2I] + k[1594]*y_cur[IDX_C5HI] + - k[1597]*y_cur[IDX_C6H2I] + k[1601]*y_cur[IDX_C6HI] + - k[1604]*y_cur[IDX_C7H2I] + k[1607]*y_cur[IDX_C7HI] + - k[1609]*y_cur[IDX_CH2CCHI] + k[1618]*y_cur[IDX_H2CCCI] + - k[1623]*y_cur[IDX_C4H2I] + k[1627]*y_cur[IDX_SiI] + - k[1728]*y_cur[IDX_C2HI] + k[1852]*y_cur[IDX_CI] - - k[2827]*y_cur[IDX_HI] + k[4693]*y_cur[IDX_HM] + - k[6360]*y_cur[IDX_GRAINM] + k[6361]*y_cur[IDX_GRAINM] + - k[6362]*y_cur[IDX_GRAINM] + k[6363]*y_cur[IDX_GRAINM] + - k[6366]*y_cur[IDX_GRAINM] + k[6366]*y_cur[IDX_GRAINM] + - k[6367]*y_cur[IDX_GRAINM] + k[6367]*y_cur[IDX_GRAINM]; - data[jistart + 11240] = 0.0 + k[326]*y_cur[IDX_HII] + - k[1303]*y_cur[IDX_CII] + k[1305]*y_cur[IDX_CII] + - k[1483]*y_cur[IDX_C2H2II] + k[1648]*y_cur[IDX_C2H4II] + - k[1688]*y_cur[IDX_C3II] + k[1692]*y_cur[IDX_C3H2II] + - k[1695]*y_cur[IDX_C4HII] + k[1697]*y_cur[IDX_C4H2II] + - k[1700]*y_cur[IDX_C5II] + k[1702]*y_cur[IDX_C5H2II] + - k[1716]*y_cur[IDX_SII] + k[1718]*y_cur[IDX_SiII] + - k[2296]*y_cur[IDX_HII] + k[2372]*y_cur[IDX_H2II] + - k[3079]*y_cur[IDX_HeII] + k[3081]*y_cur[IDX_HeII] + - k[4868]*y_cur[IDX_C2I] + k[4883]*y_cur[IDX_C2H3I] + - k[4884]*y_cur[IDX_C4HI] + k[4914]*y_cur[IDX_CI] + - k[5065]*y_cur[IDX_CHI] + k[5066]*y_cur[IDX_CHI] + - k[5106]*y_cur[IDX_CNI]; - data[jistart + 11241] = 0.0 + k[758]*y_cur[IDX_eM] + - k[758]*y_cur[IDX_eM] + k[759]*y_cur[IDX_eM] + k[760]*y_cur[IDX_eM] + - k[1537]*y_cur[IDX_C2H2I] + k[1648]*y_cur[IDX_C2H4I] + - k[1650]*y_cur[IDX_C3H2I] + k[1652]*y_cur[IDX_C3HI] + - k[1654]*y_cur[IDX_C4HI] + k[1656]*y_cur[IDX_C5H2I] + - k[1658]*y_cur[IDX_C5HI] + k[1662]*y_cur[IDX_C6HI] + - k[1666]*y_cur[IDX_C7HI] + k[1673]*y_cur[IDX_H2CCCI] + - k[1679]*y_cur[IDX_SI] + k[1681]*y_cur[IDX_SiI] + - k[1854]*y_cur[IDX_CI] - k[2828]*y_cur[IDX_HI] + - k[3391]*y_cur[IDX_NI] + k[6382]*y_cur[IDX_GRAINM] + - k[6382]*y_cur[IDX_GRAINM] + k[6383]*y_cur[IDX_GRAINM] + - k[6384]*y_cur[IDX_GRAINM]; - data[jistart + 11242] = 0.0 + k[327]*y_cur[IDX_HII] + - k[3084]*y_cur[IDX_HeII] + k[4915]*y_cur[IDX_CI] + - k[5350]*y_cur[IDX_OI]; - data[jistart + 11243] = 0.0 + k[764]*y_cur[IDX_eM] + - k[765]*y_cur[IDX_eM] + k[765]*y_cur[IDX_eM] + k[765]*y_cur[IDX_eM] + - k[766]*y_cur[IDX_eM] + k[766]*y_cur[IDX_eM] + k[767]*y_cur[IDX_eM] - - k[2829]*y_cur[IDX_HI] + k[6391]*y_cur[IDX_GRAINM] + - k[6392]*y_cur[IDX_GRAINM] + k[6392]*y_cur[IDX_GRAINM] + - k[6392]*y_cur[IDX_GRAINM] + k[6393]*y_cur[IDX_GRAINM] + - k[6393]*y_cur[IDX_GRAINM] + k[6394]*y_cur[IDX_GRAINM]; - data[jistart + 11244] = 0.0 + k[5704] + k[5989]; - data[jistart + 11245] = 0.0 + k[769]*y_cur[IDX_eM] + - k[770]*y_cur[IDX_eM] + k[771]*y_cur[IDX_eM] + - k[6671]*y_cur[IDX_GRAINM] + k[6672]*y_cur[IDX_GRAINM] + - k[6673]*y_cur[IDX_GRAINM]; - data[jistart + 11246] = 0.0 + k[328]*y_cur[IDX_HII]; - data[jistart + 11247] = 0.0 + k[774]*y_cur[IDX_eM] + - k[776]*y_cur[IDX_eM] + k[777]*y_cur[IDX_eM] + - k[6606]*y_cur[IDX_GRAINM] + k[6608]*y_cur[IDX_GRAINM] + - k[6609]*y_cur[IDX_GRAINM]; - data[jistart + 11248] = 0.0 + k[1372]*y_cur[IDX_CII] + - k[2327]*y_cur[IDX_HII] + k[2377]*y_cur[IDX_H2II] + - k[3189]*y_cur[IDX_HeII] + k[4869]*y_cur[IDX_C2I] + - k[4869]*y_cur[IDX_C2I] + k[5070]*y_cur[IDX_CHI]; - data[jistart + 11249] = 0.0 + k[936]*y_cur[IDX_eM] + - k[1564]*y_cur[IDX_C2H2I] - k[2838]*y_cur[IDX_HI] + - k[6411]*y_cur[IDX_GRAINM]; - data[jistart + 11250] = 0.0 + k[779]*y_cur[IDX_eM] + - k[6420]*y_cur[IDX_GRAINM]; - data[jistart + 11251] = 0.0 + k[330]*y_cur[IDX_HII]; - data[jistart + 11252] = 0.0 + k[1541]*y_cur[IDX_C2H2I]; - data[jistart + 11253] = 0.0 + k[2404]*y_cur[IDX_H2I] - - k[2830]*y_cur[IDX_HI]; - data[jistart + 11254] = 0.0 + k[784]*y_cur[IDX_eM] + - k[6472]*y_cur[IDX_GRAINM]; - data[jistart + 11255] = 0.0 + k[331]*y_cur[IDX_HII]; - data[jistart + 11256] = 0.0 + k[332]*y_cur[IDX_HII]; - data[jistart + 11257] = 0.0 + k[2405]*y_cur[IDX_H2I]; - data[jistart + 11258] = 0.0 + k[333]*y_cur[IDX_HII]; - data[jistart + 11259] = 0.0 + k[1543]*y_cur[IDX_C2H2I] + - k[1688]*y_cur[IDX_C2H4I] + k[2159]*y_cur[IDX_CH4I] + - k[2406]*y_cur[IDX_H2I] + k[2868]*y_cur[IDX_HCNI]; - data[jistart + 11260] = 0.0 - k[89]*y_cur[IDX_HI] + - k[4071]*y_cur[IDX_HII] + k[4074]*y_cur[IDX_H3II] + - k[4075]*y_cur[IDX_H3OII] + k[4076]*y_cur[IDX_HC2SII] + - k[4077]*y_cur[IDX_HCNHII] + k[4078]*y_cur[IDX_HCNHII] + - k[4079]*y_cur[IDX_HCOII] + k[4084]*y_cur[IDX_N2HII] + - k[4086]*y_cur[IDX_NH4II] + k[4094]*y_cur[IDX_SiOHII]; - data[jistart + 11261] = 0.0 + k[335]*y_cur[IDX_HII] + - k[1312]*y_cur[IDX_CII] + k[1488]*y_cur[IDX_C2H2II] + - k[1585]*y_cur[IDX_C2H3II] + k[1652]*y_cur[IDX_C2H4II] + - k[1819]*y_cur[IDX_C3H2II] + k[1821]*y_cur[IDX_C3H3II] + - k[1823]*y_cur[IDX_C4HII] + k[1824]*y_cur[IDX_C4H2II] + - k[1825]*y_cur[IDX_C4H3II] + k[1826]*y_cur[IDX_C5H2II] + - k[1827]*y_cur[IDX_C6H2II] + k[1829]*y_cur[IDX_CH2CCHII] + - k[3097]*y_cur[IDX_HeII] + k[3821]*y_cur[IDX_SII] + - k[3861]*y_cur[IDX_SiII] + k[4920]*y_cur[IDX_CI] + - k[5233]*y_cur[IDX_NI] + k[5720] + k[6004]; - data[jistart + 11262] = 0.0 + k[790]*y_cur[IDX_eM] + - k[1544]*y_cur[IDX_C2H2I] + k[1756]*y_cur[IDX_OCSI] + - k[2407]*y_cur[IDX_H2I] + k[3394]*y_cur[IDX_NI] + - k[3872]*y_cur[IDX_SiI] + k[6460]*y_cur[IDX_GRAINM]; - data[jistart + 11263] = 0.0 - k[90]*y_cur[IDX_HI] + - k[4106]*y_cur[IDX_HII] + k[4109]*y_cur[IDX_H3II] + - k[4110]*y_cur[IDX_H3OII] + k[4111]*y_cur[IDX_HC2SII] + - k[4112]*y_cur[IDX_HCNHII] + k[4113]*y_cur[IDX_HCNHII] + - k[4114]*y_cur[IDX_HCOII] + k[4119]*y_cur[IDX_N2HII] + - k[4121]*y_cur[IDX_NH4II] + k[4129]*y_cur[IDX_SiOHII]; - data[jistart + 11264] = 0.0 + k[334]*y_cur[IDX_HII] + - k[1311]*y_cur[IDX_CII] + k[1486]*y_cur[IDX_C2H2II] + - k[1582]*y_cur[IDX_C2H3II] + k[1650]*y_cur[IDX_C2H4II] + - k[1760]*y_cur[IDX_C3H2II] + k[1787]*y_cur[IDX_C3H3II] + - k[1788]*y_cur[IDX_C4H2II] + k[1789]*y_cur[IDX_C4H3II] + - k[1791]*y_cur[IDX_C5H2II] + k[1793]*y_cur[IDX_C6H2II] + - k[1795]*y_cur[IDX_CH2CCHII] + k[3096]*y_cur[IDX_HeII] + - k[3820]*y_cur[IDX_SII] + k[3860]*y_cur[IDX_SiII] + - k[4889]*y_cur[IDX_C2HI] + k[4919]*y_cur[IDX_CI] + - k[5232]*y_cur[IDX_NI] + k[5719] + k[6003]; - data[jistart + 11265] = 0.0 + k[794]*y_cur[IDX_eM] + - k[794]*y_cur[IDX_eM] + k[795]*y_cur[IDX_eM] + - k[1545]*y_cur[IDX_C2H2I] + k[1630]*y_cur[IDX_C2H3I] + - k[1692]*y_cur[IDX_C2H4I] + k[1731]*y_cur[IDX_C2HI] + - k[1760]*y_cur[IDX_C3H2I] + k[1762]*y_cur[IDX_C4HI] + - k[1764]*y_cur[IDX_C5H2I] + k[1766]*y_cur[IDX_C5HI] + - k[1768]*y_cur[IDX_C6H2I] + k[1770]*y_cur[IDX_C6HI] + - k[1775]*y_cur[IDX_CH2CCH2I] + k[1776]*y_cur[IDX_CH2CCHI] + - k[1781]*y_cur[IDX_CH3CCHI] + k[1783]*y_cur[IDX_H2CCCI] + - k[1785]*y_cur[IDX_C4H2I] + k[1819]*y_cur[IDX_C3HI] + - k[1856]*y_cur[IDX_CI] + k[2408]*y_cur[IDX_H2I] - - k[2831]*y_cur[IDX_HI] + k[3814]*y_cur[IDX_PI] + - k[3834]*y_cur[IDX_SI] + k[3874]*y_cur[IDX_SiI] + - k[6464]*y_cur[IDX_GRAINM] + k[6464]*y_cur[IDX_GRAINM] + - k[6465]*y_cur[IDX_GRAINM]; - data[jistart + 11266] = 0.0 + k[796]*y_cur[IDX_eM] + - k[796]*y_cur[IDX_eM] + k[6655]*y_cur[IDX_GRAINM] + - k[6655]*y_cur[IDX_GRAINM]; - data[jistart + 11267] = 0.0 + k[798]*y_cur[IDX_eM] + - k[1733]*y_cur[IDX_C2HI] + k[1787]*y_cur[IDX_C3H2I] + - k[1797]*y_cur[IDX_C4HI] + k[1799]*y_cur[IDX_C5H2I] + - k[1801]*y_cur[IDX_C5HI] + k[1804]*y_cur[IDX_C6HI] + - k[1806]*y_cur[IDX_CH2CCHI] + k[1821]*y_cur[IDX_C3HI] + - k[1858]*y_cur[IDX_CI] + k[2477]*y_cur[IDX_H2CCCI] + - k[3876]*y_cur[IDX_SiI] + k[6473]*y_cur[IDX_GRAINM]; - data[jistart + 11268] = 0.0 + k[800]*y_cur[IDX_eM] + - k[802]*y_cur[IDX_eM] + k[802]*y_cur[IDX_eM] + - k[1547]*y_cur[IDX_C2H2I] + k[1809]*y_cur[IDX_CH2CCH2I] + - k[1810]*y_cur[IDX_CH2CCH2I] + k[1812]*y_cur[IDX_CH3CCHI] + - k[1813]*y_cur[IDX_CH3CCHI] + k[1860]*y_cur[IDX_CI] - - k[2832]*y_cur[IDX_HI] + k[6478]*y_cur[IDX_GRAINM] + - k[6480]*y_cur[IDX_GRAINM] + k[6480]*y_cur[IDX_GRAINM]; - data[jistart + 11269] = 0.0 + k[804]*y_cur[IDX_eM] + - k[6483]*y_cur[IDX_GRAINM]; - data[jistart + 11270] = 0.0 + k[805]*y_cur[IDX_eM] + - k[6499]*y_cur[IDX_GRAINM]; - data[jistart + 11271] = 0.0 + k[808]*y_cur[IDX_eM] + - k[809]*y_cur[IDX_eM] + k[810]*y_cur[IDX_eM] + k[811]*y_cur[IDX_eM] + - k[813]*y_cur[IDX_eM] - k[2833]*y_cur[IDX_HI] + - k[6505]*y_cur[IDX_GRAINM] + k[6506]*y_cur[IDX_GRAINM] + - k[6507]*y_cur[IDX_GRAINM] + k[6508]*y_cur[IDX_GRAINM] + - k[6510]*y_cur[IDX_GRAINM]; - data[jistart + 11272] = 0.0 + k[2409]*y_cur[IDX_H2I]; - data[jistart + 11273] = 0.0 - k[91]*y_cur[IDX_HI] + - k[4141]*y_cur[IDX_HII] + k[4144]*y_cur[IDX_H3II] + - k[4145]*y_cur[IDX_H3OII] + k[4146]*y_cur[IDX_HC2SII] + - k[4147]*y_cur[IDX_HCNHII] + k[4148]*y_cur[IDX_HCNHII] + - k[4149]*y_cur[IDX_HCOII] + k[4154]*y_cur[IDX_N2HII] + - k[4156]*y_cur[IDX_NH4II] + k[4164]*y_cur[IDX_SiOHII]; - data[jistart + 11274] = 0.0 + k[336]*y_cur[IDX_HII]; - data[jistart + 11275] = 0.0 + k[2410]*y_cur[IDX_H2I]; - data[jistart + 11276] = 0.0 + k[337]*y_cur[IDX_HII]; - data[jistart + 11277] = 0.0 + k[338]*y_cur[IDX_HII]; - data[jistart + 11278] = 0.0 + k[1550]*y_cur[IDX_C2H2I] + - k[2167]*y_cur[IDX_CH4I] + k[2411]*y_cur[IDX_H2I]; - data[jistart + 11279] = 0.0 - k[92]*y_cur[IDX_HI] + - k[4176]*y_cur[IDX_HII] + k[4179]*y_cur[IDX_H3II] + - k[4180]*y_cur[IDX_H3OII] + k[4181]*y_cur[IDX_HC2SII] + - k[4182]*y_cur[IDX_HCNHII] + k[4183]*y_cur[IDX_HCNHII] + - k[4184]*y_cur[IDX_HCOII] + k[4189]*y_cur[IDX_N2HII] + - k[4191]*y_cur[IDX_NH4II] + k[4199]*y_cur[IDX_SiOHII]; - data[jistart + 11280] = 0.0 + k[340]*y_cur[IDX_HII] + - k[1320]*y_cur[IDX_CII] + k[1490]*y_cur[IDX_C2H2II] + - k[1588]*y_cur[IDX_C2H3II] + k[1654]*y_cur[IDX_C2H4II] + - k[1762]*y_cur[IDX_C3H2II] + k[1797]*y_cur[IDX_C3H3II] + - k[1831]*y_cur[IDX_C4HII] + k[1843]*y_cur[IDX_C4H2II] + - k[1844]*y_cur[IDX_C4H3II] + k[1845]*y_cur[IDX_C5H2II] + - k[2021]*y_cur[IDX_CH2CCHII] + k[3112]*y_cur[IDX_HeII] + - k[3822]*y_cur[IDX_SII] + k[3862]*y_cur[IDX_SiII] + - k[4877]*y_cur[IDX_C2H2I] + k[4884]*y_cur[IDX_C2H4I] + - k[4907]*y_cur[IDX_HNCI] + k[4925]*y_cur[IDX_CI] + - k[5023]*y_cur[IDX_CH2CCH2I] + k[5051]*y_cur[IDX_CH3CCHI] + - k[5054]*y_cur[IDX_CH3CHCH2I] + k[5236]*y_cur[IDX_NI] + k[5732] + - k[6017]; - data[jistart + 11281] = 0.0 + k[821]*y_cur[IDX_eM] + - k[1551]*y_cur[IDX_C2H2I] + k[1632]*y_cur[IDX_C2H3I] + - k[1695]*y_cur[IDX_C2H4I] + k[1735]*y_cur[IDX_C2HI] + - k[1823]*y_cur[IDX_C3HI] + k[1831]*y_cur[IDX_C4HI] + - k[1832]*y_cur[IDX_C5H2I] + k[1833]*y_cur[IDX_C5HI] + - k[1834]*y_cur[IDX_C4H2I] + k[1862]*y_cur[IDX_CI] + - k[2032]*y_cur[IDX_CH2CCHI] + k[2105]*y_cur[IDX_CH3CCHI] + - k[2412]*y_cur[IDX_H2I] + k[2478]*y_cur[IDX_H2CCCI] + - k[2870]*y_cur[IDX_HCNI] + k[6621]*y_cur[IDX_GRAINM]; - data[jistart + 11282] = 0.0 - k[93]*y_cur[IDX_HI] + - k[4211]*y_cur[IDX_HII] + k[4214]*y_cur[IDX_H3II] + - k[4215]*y_cur[IDX_H3OII] + k[4216]*y_cur[IDX_HC2SII] + - k[4217]*y_cur[IDX_HCNHII] + k[4218]*y_cur[IDX_HCNHII] + - k[4219]*y_cur[IDX_HCOII] + k[4224]*y_cur[IDX_N2HII] + - k[4226]*y_cur[IDX_NH4II] + k[4234]*y_cur[IDX_SiOHII]; - data[jistart + 11283] = 0.0 + k[384]*y_cur[IDX_HII] + - k[1403]*y_cur[IDX_CII] + k[1521]*y_cur[IDX_C2H2II] + - k[1623]*y_cur[IDX_C2H3II] + k[1785]*y_cur[IDX_C3H2II] + - k[1834]*y_cur[IDX_C4HII] + k[1838]*y_cur[IDX_C4H2II] + - k[3240]*y_cur[IDX_HeII] + k[3832]*y_cur[IDX_SII] + - k[4872]*y_cur[IDX_C2I] + k[4900]*y_cur[IDX_C2HI] + - k[4961]*y_cur[IDX_CI] + k[5115]*y_cur[IDX_CNI] + k[5849] + k[6174]; - data[jistart + 11284] = 0.0 + k[823]*y_cur[IDX_eM] + - k[1552]*y_cur[IDX_C2H2I] + k[1634]*y_cur[IDX_C2H3I] + - k[1697]*y_cur[IDX_C2H4I] + k[1736]*y_cur[IDX_C2HI] + - k[1788]*y_cur[IDX_C3H2I] + k[1824]*y_cur[IDX_C3HI] + - k[1835]*y_cur[IDX_C5H2I] + k[1836]*y_cur[IDX_C5HI] + - k[1838]*y_cur[IDX_C4H2I] + k[1843]*y_cur[IDX_C4HI] + - k[1864]*y_cur[IDX_CI] + k[2034]*y_cur[IDX_CH2CCHI] + - k[2106]*y_cur[IDX_CH3CCHI] + k[2169]*y_cur[IDX_CH4I] + - k[2479]*y_cur[IDX_H2CCCI] + k[3406]*y_cur[IDX_NI] + - k[3815]*y_cur[IDX_PI] + k[3836]*y_cur[IDX_SI] + - k[3878]*y_cur[IDX_SiI] + k[4694]*y_cur[IDX_HM] - - k[5570]*y_cur[IDX_HI] + k[6628]*y_cur[IDX_GRAINM]; - data[jistart + 11285] = 0.0 + k[339]*y_cur[IDX_HII] + - k[1319]*y_cur[IDX_CII] + k[3110]*y_cur[IDX_HeII] + - k[4924]*y_cur[IDX_CI] + k[5730] + k[5730] + k[6015]; - data[jistart + 11286] = 0.0 + k[825]*y_cur[IDX_eM] + - k[1636]*y_cur[IDX_C2H3I] + k[1737]*y_cur[IDX_C2HI] + - k[1789]*y_cur[IDX_C3H2I] + k[1825]*y_cur[IDX_C3HI] + - k[1840]*y_cur[IDX_C5H2I] + k[1841]*y_cur[IDX_C5HI] + - k[1844]*y_cur[IDX_C4HI] + k[1866]*y_cur[IDX_CI] + - k[2036]*y_cur[IDX_CH2CCHI] + k[2480]*y_cur[IDX_H2CCCI] + - k[4695]*y_cur[IDX_HM] - k[5571]*y_cur[IDX_HI] + - k[6634]*y_cur[IDX_GRAINM]; - data[jistart + 11287] = 0.0 + k[826]*y_cur[IDX_eM] + - k[1554]*y_cur[IDX_C2H2I] + k[6641]*y_cur[IDX_GRAINM]; - data[jistart + 11288] = 0.0 + k[829]*y_cur[IDX_eM] + - k[3408]*y_cur[IDX_NI] + k[6647]*y_cur[IDX_GRAINM]; - data[jistart + 11289] = 0.0 - k[5024]*y_cur[IDX_HI]; - data[jistart + 11290] = 0.0 + k[830]*y_cur[IDX_eM] + - k[6667]*y_cur[IDX_GRAINM]; - data[jistart + 11291] = 0.0 + k[341]*y_cur[IDX_HII]; - data[jistart + 11292] = 0.0 + k[342]*y_cur[IDX_HII]; - data[jistart + 11293] = 0.0 + k[4696]*y_cur[IDX_HM]; - data[jistart + 11294] = 0.0 + k[343]*y_cur[IDX_HII]; - data[jistart + 11295] = 0.0 + k[1556]*y_cur[IDX_C2H2I] + - k[1700]*y_cur[IDX_C2H4I] + k[2179]*y_cur[IDX_CH4I] + - k[2414]*y_cur[IDX_H2I]; - data[jistart + 11296] = 0.0 - k[94]*y_cur[IDX_HI] + - k[4246]*y_cur[IDX_HII] + k[4249]*y_cur[IDX_H3II] + - k[4250]*y_cur[IDX_H3OII] + k[4251]*y_cur[IDX_HC2SII] + - k[4252]*y_cur[IDX_HCNHII] + k[4253]*y_cur[IDX_HCNHII] + - k[4254]*y_cur[IDX_HCOII] + k[4259]*y_cur[IDX_N2HII] + - k[4261]*y_cur[IDX_NH4II] + k[4269]*y_cur[IDX_SiOHII]; - data[jistart + 11297] = 0.0 + k[345]*y_cur[IDX_HII] + - k[1325]*y_cur[IDX_CII] + k[1494]*y_cur[IDX_C2H2II] + - k[1594]*y_cur[IDX_C2H3II] + k[1658]*y_cur[IDX_C2H4II] + - k[1766]*y_cur[IDX_C3H2II] + k[1801]*y_cur[IDX_C3H3II] + - k[1833]*y_cur[IDX_C4HII] + k[1836]*y_cur[IDX_C4H2II] + - k[1841]*y_cur[IDX_C4H3II] + k[2025]*y_cur[IDX_CH2CCHII] + - k[3123]*y_cur[IDX_HeII] + k[4928]*y_cur[IDX_CI] + - k[5240]*y_cur[IDX_NI] + k[5744] + k[6029]; - data[jistart + 11298] = 0.0 + k[840]*y_cur[IDX_eM] + - k[1867]*y_cur[IDX_CI] + k[2415]*y_cur[IDX_H2I] + - k[3412]*y_cur[IDX_NI] + k[6722]*y_cur[IDX_GRAINM]; - data[jistart + 11299] = 0.0 - k[95]*y_cur[IDX_HI] + - k[4281]*y_cur[IDX_HII] + k[4284]*y_cur[IDX_H3II] + - k[4285]*y_cur[IDX_H3OII] + k[4286]*y_cur[IDX_HC2SII] + - k[4287]*y_cur[IDX_HCNHII] + k[4288]*y_cur[IDX_HCNHII] + - k[4289]*y_cur[IDX_HCOII] + k[4294]*y_cur[IDX_N2HII] + - k[4296]*y_cur[IDX_NH4II] + k[4304]*y_cur[IDX_SiOHII]; - data[jistart + 11300] = 0.0 + k[344]*y_cur[IDX_HII] + - k[1324]*y_cur[IDX_CII] + k[1492]*y_cur[IDX_C2H2II] + - k[1591]*y_cur[IDX_C2H3II] + k[1656]*y_cur[IDX_C2H4II] + - k[1764]*y_cur[IDX_C3H2II] + k[1799]*y_cur[IDX_C3H3II] + - k[1832]*y_cur[IDX_C4HII] + k[1835]*y_cur[IDX_C4H2II] + - k[1840]*y_cur[IDX_C4H3II] + k[2023]*y_cur[IDX_CH2CCHII] + - k[3121]*y_cur[IDX_HeII] + k[4890]*y_cur[IDX_C2HI] + - k[4927]*y_cur[IDX_CI] + k[5239]*y_cur[IDX_NI] + k[5741] + k[6026]; - data[jistart + 11301] = 0.0 + k[842]*y_cur[IDX_eM] + - k[1638]*y_cur[IDX_C2H3I] + k[1702]*y_cur[IDX_C2H4I] + - k[1738]*y_cur[IDX_C2HI] + k[1791]*y_cur[IDX_C3H2I] + - k[1826]*y_cur[IDX_C3HI] + k[1845]*y_cur[IDX_C4HI] + - k[1869]*y_cur[IDX_CI] + k[2038]*y_cur[IDX_CH2CCHI] + - k[2181]*y_cur[IDX_CH4I] + k[2482]*y_cur[IDX_H2CCCI] + - k[3415]*y_cur[IDX_NI] + k[6739]*y_cur[IDX_GRAINM]; - data[jistart + 11302] = 0.0 + k[843]*y_cur[IDX_eM] + - k[1871]*y_cur[IDX_CI] + k[3416]*y_cur[IDX_NI] + - k[6742]*y_cur[IDX_GRAINM]; - data[jistart + 11303] = 0.0 + k[845]*y_cur[IDX_eM] + - k[846]*y_cur[IDX_eM] + k[6753]*y_cur[IDX_GRAINM] + - k[6754]*y_cur[IDX_GRAINM]; - data[jistart + 11304] = 0.0 + k[2416]*y_cur[IDX_H2I]; - data[jistart + 11305] = 0.0 - k[96]*y_cur[IDX_HI] + - k[4316]*y_cur[IDX_HII] + k[4319]*y_cur[IDX_H3II] + - k[4320]*y_cur[IDX_H3OII] + k[4321]*y_cur[IDX_HC2SII] + - k[4322]*y_cur[IDX_HCNHII] + k[4323]*y_cur[IDX_HCNHII] + - k[4324]*y_cur[IDX_HCOII] + k[4329]*y_cur[IDX_N2HII] + - k[4331]*y_cur[IDX_NH4II] + k[4339]*y_cur[IDX_SiOHII]; - data[jistart + 11306] = 0.0 + k[346]*y_cur[IDX_HII]; - data[jistart + 11307] = 0.0 + k[1558]*y_cur[IDX_C2H2I] + - k[2184]*y_cur[IDX_CH4I] + k[2417]*y_cur[IDX_H2I]; - data[jistart + 11308] = 0.0 - k[97]*y_cur[IDX_HI] + - k[4351]*y_cur[IDX_HII] + k[4354]*y_cur[IDX_H3II] + - k[4355]*y_cur[IDX_H3OII] + k[4356]*y_cur[IDX_HC2SII] + - k[4357]*y_cur[IDX_HCNHII] + k[4358]*y_cur[IDX_HCNHII] + - k[4359]*y_cur[IDX_HCOII] + k[4364]*y_cur[IDX_N2HII] + - k[4366]*y_cur[IDX_NH4II] + k[4374]*y_cur[IDX_SiOHII]; - data[jistart + 11309] = 0.0 + k[348]*y_cur[IDX_HII] + - k[1331]*y_cur[IDX_CII] + k[1498]*y_cur[IDX_C2H2II] + - k[1601]*y_cur[IDX_C2H3II] + k[1662]*y_cur[IDX_C2H4II] + - k[1770]*y_cur[IDX_C3H2II] + k[1804]*y_cur[IDX_C3H3II] + - k[2028]*y_cur[IDX_CH2CCHII] + k[3133]*y_cur[IDX_HeII] + - k[4933]*y_cur[IDX_CI] + k[5754]; - data[jistart + 11310] = 0.0 + k[851]*y_cur[IDX_eM] + - k[1559]*y_cur[IDX_C2H2I] + k[2418]*y_cur[IDX_H2I] + - k[6783]*y_cur[IDX_GRAINM]; - data[jistart + 11311] = 0.0 - k[98]*y_cur[IDX_HI] + - k[4386]*y_cur[IDX_HII] + k[4389]*y_cur[IDX_H3II] + - k[4390]*y_cur[IDX_H3OII] + k[4391]*y_cur[IDX_HC2SII] + - k[4392]*y_cur[IDX_HCNHII] + k[4393]*y_cur[IDX_HCNHII] + - k[4394]*y_cur[IDX_HCOII] + k[4399]*y_cur[IDX_N2HII] + - k[4401]*y_cur[IDX_NH4II] + k[4409]*y_cur[IDX_SiOHII]; - data[jistart + 11312] = 0.0 + k[347]*y_cur[IDX_HII] + - k[1327]*y_cur[IDX_CII] + k[1496]*y_cur[IDX_C2H2II] + - k[1597]*y_cur[IDX_C2H3II] + k[1768]*y_cur[IDX_C3H2II] + - k[3129]*y_cur[IDX_HeII] + k[4891]*y_cur[IDX_C2HI] + - k[4932]*y_cur[IDX_CI] + k[5107]*y_cur[IDX_CNI] + k[6037]; - data[jistart + 11313] = 0.0 + k[853]*y_cur[IDX_eM] + - k[1640]*y_cur[IDX_C2H3I] + k[1739]*y_cur[IDX_C2HI] + - k[1793]*y_cur[IDX_C3H2I] + k[1827]*y_cur[IDX_C3HI] + - k[1873]*y_cur[IDX_CI] + k[2040]*y_cur[IDX_CH2CCHI] + - k[2186]*y_cur[IDX_CH4I] + k[2484]*y_cur[IDX_H2CCCI] + - k[6786]*y_cur[IDX_GRAINM]; - data[jistart + 11314] = 0.0 + k[854]*y_cur[IDX_eM] + - k[1875]*y_cur[IDX_CI] + k[6789]*y_cur[IDX_GRAINM]; - data[jistart + 11315] = 0.0 + k[857]*y_cur[IDX_eM] + - k[6797]*y_cur[IDX_GRAINM]; - data[jistart + 11316] = 0.0 + k[858]*y_cur[IDX_eM] + - k[6802]*y_cur[IDX_GRAINM]; - data[jistart + 11317] = 0.0 + k[1330]*y_cur[IDX_CII] + - k[3131]*y_cur[IDX_HeII] + k[5751] + k[5751]; - data[jistart + 11318] = 0.0 - k[2834]*y_cur[IDX_HI]; - data[jistart + 11319] = 0.0 + k[861]*y_cur[IDX_eM] + - k[862]*y_cur[IDX_eM] + k[6807]*y_cur[IDX_GRAINM] + - k[6808]*y_cur[IDX_GRAINM]; - data[jistart + 11320] = 0.0 + k[349]*y_cur[IDX_HII]; - data[jistart + 11321] = 0.0 + k[2419]*y_cur[IDX_H2I]; - data[jistart + 11322] = 0.0 - k[99]*y_cur[IDX_HI] + - k[4421]*y_cur[IDX_HII] + k[4424]*y_cur[IDX_H3II] + - k[4425]*y_cur[IDX_H3OII] + k[4426]*y_cur[IDX_HC2SII] + - k[4427]*y_cur[IDX_HCNHII] + k[4428]*y_cur[IDX_HCNHII] + - k[4429]*y_cur[IDX_HCOII] + k[4434]*y_cur[IDX_N2HII] + - k[4436]*y_cur[IDX_NH4II] + k[4444]*y_cur[IDX_SiOHII]; - data[jistart + 11323] = 0.0 + k[351]*y_cur[IDX_HII] + - k[1334]*y_cur[IDX_CII] + k[1502]*y_cur[IDX_C2H2II] + - k[1607]*y_cur[IDX_C2H3II] + k[1666]*y_cur[IDX_C2H4II] + - k[3140]*y_cur[IDX_HeII] + k[4936]*y_cur[IDX_CI] + - k[5246]*y_cur[IDX_NI] + k[5759] + k[6047]; - data[jistart + 11324] = 0.0 + k[867]*y_cur[IDX_eM] + - k[1876]*y_cur[IDX_CI] + k[2420]*y_cur[IDX_H2I] + - k[3429]*y_cur[IDX_NI] + k[6825]*y_cur[IDX_GRAINM]; - data[jistart + 11325] = 0.0 - k[100]*y_cur[IDX_HI] + - k[4456]*y_cur[IDX_HII] + k[4459]*y_cur[IDX_H3II] + - k[4460]*y_cur[IDX_H3OII] + k[4461]*y_cur[IDX_HC2SII] + - k[4462]*y_cur[IDX_HCNHII] + k[4463]*y_cur[IDX_HCNHII] + - k[4464]*y_cur[IDX_HCOII] + k[4469]*y_cur[IDX_N2HII] + - k[4471]*y_cur[IDX_NH4II] + k[4479]*y_cur[IDX_SiOHII]; - data[jistart + 11326] = 0.0 + k[350]*y_cur[IDX_HII] + - k[1333]*y_cur[IDX_CII] + k[1500]*y_cur[IDX_C2H2II] + - k[1604]*y_cur[IDX_C2H3II] + k[3138]*y_cur[IDX_HeII] + - k[4892]*y_cur[IDX_C2HI] + k[4935]*y_cur[IDX_CI] + - k[5245]*y_cur[IDX_NI] + k[5758] + k[6046]; - data[jistart + 11327] = 0.0 + k[869]*y_cur[IDX_eM] + - k[1561]*y_cur[IDX_C2H2I] + k[1642]*y_cur[IDX_C2H3I] + - k[1740]*y_cur[IDX_C2HI] + k[1878]*y_cur[IDX_CI] + - k[3432]*y_cur[IDX_NI] + k[6827]*y_cur[IDX_GRAINM]; - data[jistart + 11328] = 0.0 + k[870]*y_cur[IDX_eM] + - k[1880]*y_cur[IDX_CI] + k[3433]*y_cur[IDX_NI] + - k[6828]*y_cur[IDX_GRAINM]; - data[jistart + 11329] = 0.0 + k[873]*y_cur[IDX_eM] + - k[3434]*y_cur[IDX_NI] + k[6831]*y_cur[IDX_GRAINM]; - data[jistart + 11330] = 0.0 + k[874]*y_cur[IDX_eM] + - k[875]*y_cur[IDX_eM] + k[6832]*y_cur[IDX_GRAINM] + - k[6833]*y_cur[IDX_GRAINM]; - data[jistart + 11331] = 0.0 + k[2421]*y_cur[IDX_H2I]; - data[jistart + 11332] = 0.0 + k[352]*y_cur[IDX_HII]; - data[jistart + 11333] = 0.0 + k[2422]*y_cur[IDX_H2I]; - data[jistart + 11334] = 0.0 - k[101]*y_cur[IDX_HI] + - k[4491]*y_cur[IDX_HII] + k[4494]*y_cur[IDX_H3II] + - k[4495]*y_cur[IDX_H3OII] + k[4496]*y_cur[IDX_HC2SII] + - k[4497]*y_cur[IDX_HCNHII] + k[4498]*y_cur[IDX_HCNHII] + - k[4499]*y_cur[IDX_HCOII] + k[4504]*y_cur[IDX_N2HII] + - k[4506]*y_cur[IDX_NH4II] + k[4514]*y_cur[IDX_SiOHII]; - data[jistart + 11335] = 0.0 + k[354]*y_cur[IDX_HII] + - k[1337]*y_cur[IDX_CII] + k[1506]*y_cur[IDX_C2H2II] + - k[3148]*y_cur[IDX_HeII] + k[4940]*y_cur[IDX_CI] + k[5765] + k[6057]; - data[jistart + 11336] = 0.0 + k[880]*y_cur[IDX_eM] + - k[2423]*y_cur[IDX_H2I] + k[6839]*y_cur[IDX_GRAINM]; - data[jistart + 11337] = 0.0 - k[102]*y_cur[IDX_HI] + - k[4526]*y_cur[IDX_HII] + k[4529]*y_cur[IDX_H3II] + - k[4530]*y_cur[IDX_H3OII] + k[4531]*y_cur[IDX_HC2SII] + - k[4532]*y_cur[IDX_HCNHII] + k[4533]*y_cur[IDX_HCNHII] + - k[4534]*y_cur[IDX_HCOII] + k[4539]*y_cur[IDX_N2HII] + - k[4541]*y_cur[IDX_NH4II] + k[4549]*y_cur[IDX_SiOHII]; - data[jistart + 11338] = 0.0 + k[353]*y_cur[IDX_HII] + - k[1336]*y_cur[IDX_CII] + k[1504]*y_cur[IDX_C2H2II] + - k[3146]*y_cur[IDX_HeII] + k[4893]*y_cur[IDX_C2HI] + - k[4939]*y_cur[IDX_CI] + k[5108]*y_cur[IDX_CNI] + k[5764] + k[6056]; - data[jistart + 11339] = 0.0 + k[882]*y_cur[IDX_eM] + - k[1882]*y_cur[IDX_CI] + k[6842]*y_cur[IDX_GRAINM]; - data[jistart + 11340] = 0.0 + k[883]*y_cur[IDX_eM] + - k[1884]*y_cur[IDX_CI] + k[6845]*y_cur[IDX_GRAINM]; - data[jistart + 11341] = 0.0 + k[886]*y_cur[IDX_eM] + - k[6848]*y_cur[IDX_GRAINM]; - data[jistart + 11342] = 0.0 + k[887]*y_cur[IDX_eM] + - k[6853]*y_cur[IDX_GRAINM]; - data[jistart + 11343] = 0.0 + k[355]*y_cur[IDX_HII]; - data[jistart + 11344] = 0.0 + k[2424]*y_cur[IDX_H2I]; - data[jistart + 11345] = 0.0 - k[103]*y_cur[IDX_HI] + - k[4561]*y_cur[IDX_HII] + k[4564]*y_cur[IDX_H3II] + - k[4565]*y_cur[IDX_H3OII] + k[4566]*y_cur[IDX_HC2SII] + - k[4567]*y_cur[IDX_HCNHII] + k[4568]*y_cur[IDX_HCNHII] + - k[4569]*y_cur[IDX_HCOII] + k[4574]*y_cur[IDX_N2HII] + - k[4576]*y_cur[IDX_NH4II] + k[4584]*y_cur[IDX_SiOHII]; - data[jistart + 11346] = 0.0 + k[357]*y_cur[IDX_HII] + - k[1340]*y_cur[IDX_CII] + k[3155]*y_cur[IDX_HeII] + - k[4942]*y_cur[IDX_CI] + k[5251]*y_cur[IDX_NI] + k[5770] + k[6065]; - data[jistart + 11347] = 0.0 + k[892]*y_cur[IDX_eM] + - k[1885]*y_cur[IDX_CI] + k[2425]*y_cur[IDX_H2I] + - k[3446]*y_cur[IDX_NI] + k[6858]*y_cur[IDX_GRAINM]; - data[jistart + 11348] = 0.0 - k[104]*y_cur[IDX_HI] + - k[4596]*y_cur[IDX_HII] + k[4599]*y_cur[IDX_H3II] + - k[4600]*y_cur[IDX_H3OII] + k[4601]*y_cur[IDX_HC2SII] + - k[4602]*y_cur[IDX_HCNHII] + k[4603]*y_cur[IDX_HCNHII] + - k[4604]*y_cur[IDX_HCOII] + k[4609]*y_cur[IDX_N2HII] + - k[4611]*y_cur[IDX_NH4II] + k[4619]*y_cur[IDX_SiOHII]; - data[jistart + 11349] = 0.0 + k[356]*y_cur[IDX_HII] + - k[1339]*y_cur[IDX_CII] + k[3153]*y_cur[IDX_HeII] + - k[4941]*y_cur[IDX_CI] + k[5769] + k[6064]; - data[jistart + 11350] = 0.0 + k[894]*y_cur[IDX_eM] + - k[1887]*y_cur[IDX_CI] + k[3449]*y_cur[IDX_NI] + - k[6860]*y_cur[IDX_GRAINM]; - data[jistart + 11351] = 0.0 + k[895]*y_cur[IDX_eM] + - k[1889]*y_cur[IDX_CI] + k[3450]*y_cur[IDX_NI] + - k[6861]*y_cur[IDX_GRAINM]; - data[jistart + 11352] = 0.0 + k[898]*y_cur[IDX_eM] + - k[3451]*y_cur[IDX_NI] + k[6864]*y_cur[IDX_GRAINM]; - data[jistart + 11353] = 0.0 + k[899]*y_cur[IDX_eM] + - k[6865]*y_cur[IDX_GRAINM]; - data[jistart + 11354] = 0.0 + k[2426]*y_cur[IDX_H2I]; - data[jistart + 11355] = 0.0 + k[358]*y_cur[IDX_HII]; - data[jistart + 11356] = 0.0 + k[134]*y_cur[IDX_H2I] - - k[141]*y_cur[IDX_HI] + k[141]*y_cur[IDX_HI] + k[141]*y_cur[IDX_HI] + - k[372]*y_cur[IDX_HII] + k[1385]*y_cur[IDX_CII] + - k[2239]*y_cur[IDX_C2II] + k[2241]*y_cur[IDX_C2HII] + - k[2242]*y_cur[IDX_C2H2II] + k[2256]*y_cur[IDX_NII] + - k[2261]*y_cur[IDX_OII] + k[2265]*y_cur[IDX_SII] + - k[2266]*y_cur[IDX_SiII] + k[2380]*y_cur[IDX_H2II] + - k[3202]*y_cur[IDX_HeII] + k[4955]*y_cur[IDX_CI] + - k[5063]*y_cur[IDX_C2H2I] + k[5064]*y_cur[IDX_C2H2I] + - k[5065]*y_cur[IDX_C2H4I] + k[5066]*y_cur[IDX_C2H4I] + - k[5067]*y_cur[IDX_CH2CCH2I] + k[5068]*y_cur[IDX_CH3CCHI] + - k[5070]*y_cur[IDX_C2H6I] + k[5072]*y_cur[IDX_CH3CHCH2I] + - k[5073]*y_cur[IDX_CH3OHI] + k[5074]*y_cur[IDX_CH4I] + - k[5080]*y_cur[IDX_NI] + k[5082]*y_cur[IDX_NH3I] + - k[5085]*y_cur[IDX_NOI] + k[5086]*y_cur[IDX_O2I] + - k[5087]*y_cur[IDX_O2I] + k[5088]*y_cur[IDX_O2I] + - k[5089]*y_cur[IDX_O2I] + k[5096]*y_cur[IDX_OI] + - k[5098]*y_cur[IDX_OCSI] + k[5099]*y_cur[IDX_OHI] + - k[5100]*y_cur[IDX_SI] + k[5103]*y_cur[IDX_SOI] + - k[5137]*y_cur[IDX_H2I] - k[5160]*y_cur[IDX_HI] + k[5821] + k[6131]; - data[jistart + 11357] = 0.0 + k[906]*y_cur[IDX_eM] + - k[1890]*y_cur[IDX_CI] + k[1933]*y_cur[IDX_C2I] + - k[1934]*y_cur[IDX_C2H2I] + k[1940]*y_cur[IDX_CH4I] + - k[1942]*y_cur[IDX_CH4I] + k[1944]*y_cur[IDX_CNI] + - k[1945]*y_cur[IDX_CNI] + k[1947]*y_cur[IDX_H2COI] + - k[1951]*y_cur[IDX_H2OI] + k[1957]*y_cur[IDX_HCNI] + - k[1961]*y_cur[IDX_NI] + k[1969]*y_cur[IDX_OI] + - k[1973]*y_cur[IDX_SI] + k[2427]*y_cur[IDX_H2I] - - k[2835]*y_cur[IDX_HI] + k[5776] + k[6315]*y_cur[IDX_GRAINM]; - data[jistart + 11358] = 0.0 - k[105]*y_cur[IDX_HI] + - k[4631]*y_cur[IDX_HII] + k[4634]*y_cur[IDX_H3II] + + k[6367]*y_cur[IDX_C2H3II] + k[6384]*y_cur[IDX_C2H4II] + + k[6459]*y_cur[IDX_C3HII] + k[6479]*y_cur[IDX_C3H4II] + + k[6486]*y_cur[IDX_HC2OII] + k[6627]*y_cur[IDX_C4H2II] + + k[6627]*y_cur[IDX_C4H2II] + k[6630]*y_cur[IDX_HC3NII] + + k[6649]*y_cur[IDX_SiC2HII] + k[6787]*y_cur[IDX_HC5NII] + + k[6792]*y_cur[IDX_HC5NHII] + k[6813]*y_cur[IDX_PC4HII] + + k[6818]*y_cur[IDX_HC4SII]; + data[jistart + 14732] = 0.0 - k[5133]*y_cur[IDX_C2HI]; + data[jistart + 14733] = 0.0 + k[743]*y_cur[IDX_C2H2II] + k[749]*y_cur[IDX_C2H3II] + + k[750]*y_cur[IDX_C2H3II] + k[751]*y_cur[IDX_C2H3II] + + k[752]*y_cur[IDX_C2H3II] + k[760]*y_cur[IDX_C2H4II] + + k[789]*y_cur[IDX_C3HII] + k[801]*y_cur[IDX_C3H4II] + + k[822]*y_cur[IDX_C4H2II] + k[822]*y_cur[IDX_C4H2II] + + k[1055]*y_cur[IDX_HC2OII] + k[1064]*y_cur[IDX_HC3NII] + + k[1074]*y_cur[IDX_HC4SII] + k[1077]*y_cur[IDX_HC5NII] + + k[1080]*y_cur[IDX_HC5NHII] + k[1195]*y_cur[IDX_PC4HII] + + k[1226]*y_cur[IDX_SiC2HII] - k[5590]*y_cur[IDX_C2HI]; + data[jistart + 14734] = 0.0 + k[87]*y_cur[IDX_C2M] + k[5154]*y_cur[IDX_C2H2I]; + data[jistart + 14735] = 0.0 + k[1270]*y_cur[IDX_eM] + k[6694]*y_cur[IDX_GRAINM]; + data[jistart + 14736] = 0.0 + k[773]*y_cur[IDX_eM] + k[6577]*y_cur[IDX_GRAINM]; + data[jistart + 14737] = 0.0 + k[1273]*y_cur[IDX_eM] + k[6697]*y_cur[IDX_GRAINM]; + data[jistart + 14738] = 0.0 - k[2492]*y_cur[IDX_H2COI]; + data[jistart + 14739] = 0.0 + k[1281]*y_cur[IDX_eM] + k[1281]*y_cur[IDX_eM] + + k[1282]*y_cur[IDX_eM] + k[6728]*y_cur[IDX_GRAINM] + + k[6728]*y_cur[IDX_GRAINM] + k[6729]*y_cur[IDX_GRAINM]; + data[jistart + 14740] = 0.0 - k[2491]*y_cur[IDX_H2COI]; + data[jistart + 14741] = 0.0 + k[1277]*y_cur[IDX_eM] + k[6703]*y_cur[IDX_GRAINM]; + data[jistart + 14742] = 0.0 - k[2493]*y_cur[IDX_H2COI]; + data[jistart + 14743] = 0.0 + k[7108] + k[7290] + k[7472]; + data[jistart + 14744] = 0.0 + k[961]*y_cur[IDX_eM] + k[6429]*y_cur[IDX_GRAINM]; + data[jistart + 14745] = 0.0 + k[6186] + k[6186]; + data[jistart + 14746] = 0.0 + k[5002]*y_cur[IDX_CH2I] + k[5037]*y_cur[IDX_CH3I]; + data[jistart + 14747] = 0.0 + k[3195]*y_cur[IDX_HeII] + k[5815] + k[6119]; + data[jistart + 14748] = 0.0 + k[2132]*y_cur[IDX_CH3OHI]; + data[jistart + 14749] = 0.0 + k[5631]*y_cur[IDX_HeII]; + data[jistart + 14750] = 0.0 + k[8595]*y_cur[IDX_GHI]; + data[jistart + 14751] = 0.0 + k[939]*y_cur[IDX_eM] + k[943]*y_cur[IDX_eM] + + k[6561]*y_cur[IDX_GRAINM] + k[6565]*y_cur[IDX_GRAINM]; + data[jistart + 14752] = 0.0 + k[2765]*y_cur[IDX_H3COII]; + data[jistart + 14753] = 0.0 - k[5150]*y_cur[IDX_H2COI] + k[5210]*y_cur[IDX_HCOI]; + data[jistart + 14754] = 0.0 + k[5206]*y_cur[IDX_HCOI]; + data[jistart + 14755] = 0.0 + k[967]*y_cur[IDX_eM] - k[2494]*y_cur[IDX_H2COI] - + k[2495]*y_cur[IDX_H2COI] + k[6444]*y_cur[IDX_GRAINM]; + data[jistart + 14756] = 0.0 + k[3754]*y_cur[IDX_OI]; + data[jistart + 14757] = 0.0 + k[8686]*y_cur[IDX_GOI]; + data[jistart + 14758] = 0.0 + k[2066]*y_cur[IDX_CH3II] + k[2656]*y_cur[IDX_H3II]; + data[jistart + 14759] = 0.0 - k[2496]*y_cur[IDX_H2COI]; + data[jistart + 14760] = 0.0 - k[2499]*y_cur[IDX_H2COI]; + data[jistart + 14761] = 0.0 - k[280]*y_cur[IDX_H2COI] - k[2141]*y_cur[IDX_H2COI]; + data[jistart + 14762] = 0.0 - k[2497]*y_cur[IDX_H2COI]; + data[jistart + 14763] = 0.0 - k[1720]*y_cur[IDX_H2COI]; + data[jistart + 14764] = 0.0 + k[3657]*y_cur[IDX_O2II]; + data[jistart + 14765] = 0.0 - k[300]*y_cur[IDX_H2COI] - k[2271]*y_cur[IDX_H2COI]; + data[jistart + 14766] = 0.0 + k[5351]*y_cur[IDX_OI]; + data[jistart + 14767] = 0.0 + k[8686]*y_cur[IDX_GCH2I]; + data[jistart + 14768] = 0.0 - k[566]*y_cur[IDX_H2COI] - k[3361]*y_cur[IDX_H2COI]; + data[jistart + 14769] = 0.0 - k[2855]*y_cur[IDX_H2COI]; + data[jistart + 14770] = 0.0 + k[3661]*y_cur[IDX_O2II] + k[5056]*y_cur[IDX_OHI]; + data[jistart + 14771] = 0.0 - k[574]*y_cur[IDX_H2COI] - k[3487]*y_cur[IDX_H2COI] - + k[3488]*y_cur[IDX_H2COI]; + data[jistart + 14772] = 0.0 + k[4773]*y_cur[IDX_H2COII]; + data[jistart + 14773] = 0.0 + k[4632]*y_cur[IDX_H2COII]; + data[jistart + 14774] = 0.0 - k[446]*y_cur[IDX_H2COI] - k[2385]*y_cur[IDX_H2COI]; + data[jistart + 14775] = 0.0 - k[3510]*y_cur[IDX_H2COI] - k[3511]*y_cur[IDX_H2COI]; + data[jistart + 14776] = 0.0 + k[4843]*y_cur[IDX_H2COII]; + data[jistart + 14777] = 0.0 + k[4037]*y_cur[IDX_H2COII]; + data[jistart + 14778] = 0.0 + k[4212]*y_cur[IDX_H2COII]; + data[jistart + 14779] = 0.0 - k[308]*y_cur[IDX_H2COI] - k[2280]*y_cur[IDX_H2COI]; + data[jistart + 14780] = 0.0 - k[2225]*y_cur[IDX_H2COI]; + data[jistart + 14781] = 0.0 + k[64]*y_cur[IDX_CHI] + k[4808]*y_cur[IDX_H2COII]; + data[jistart + 14782] = 0.0 + k[3967]*y_cur[IDX_H2COII]; + data[jistart + 14783] = 0.0 + k[4107]*y_cur[IDX_H2COII]; + data[jistart + 14784] = 0.0 + k[4387]*y_cur[IDX_H2COII]; + data[jistart + 14785] = 0.0 + k[4527]*y_cur[IDX_H2COII]; + data[jistart + 14786] = 0.0 + k[4457]*y_cur[IDX_H2COII]; + data[jistart + 14787] = 0.0 + k[4597]*y_cur[IDX_H2COII]; + data[jistart + 14788] = 0.0 + k[3932]*y_cur[IDX_H2COII]; + data[jistart + 14789] = 0.0 + k[4282]*y_cur[IDX_H2COII]; + data[jistart + 14790] = 0.0 + k[4317]*y_cur[IDX_H2COII]; + data[jistart + 14791] = 0.0 + k[4]*y_cur[IDX_H2OI] + k[3897]*y_cur[IDX_H2COII]; + data[jistart + 14792] = 0.0 + k[59]*y_cur[IDX_CH2I] + k[4738]*y_cur[IDX_H2COII]; + data[jistart + 14793] = 0.0 + k[4562]*y_cur[IDX_H2COII]; + data[jistart + 14794] = 0.0 + k[1938]*y_cur[IDX_CHII] + k[2132]*y_cur[IDX_S2II] + + k[2762]*y_cur[IDX_H3COII]; + data[jistart + 14795] = 0.0 + k[76]*y_cur[IDX_HCOI] + k[4703]*y_cur[IDX_H2COII]; + data[jistart + 14796] = 0.0 + k[4492]*y_cur[IDX_H2COII]; + data[jistart + 14797] = 0.0 + k[4002]*y_cur[IDX_H2COII]; + data[jistart + 14798] = 0.0 + k[4072]*y_cur[IDX_H2COII]; + data[jistart + 14799] = 0.0 + k[4177]*y_cur[IDX_H2COII]; + data[jistart + 14800] = 0.0 + k[4352]*y_cur[IDX_H2COII]; + data[jistart + 14801] = 0.0 + k[1037]*y_cur[IDX_eM] + k[2248]*y_cur[IDX_CHI] + + k[2545]*y_cur[IDX_H2OI] + k[2762]*y_cur[IDX_CH3OHI] + + k[2763]*y_cur[IDX_H2SI] + k[2764]*y_cur[IDX_C4H2I] + + k[2765]*y_cur[IDX_HCOOHI] + k[2875]*y_cur[IDX_HCNI] + + k[3039]*y_cur[IDX_HNCI] + k[3537]*y_cur[IDX_NH2I] + + k[3577]*y_cur[IDX_NH3I] + k[3628]*y_cur[IDX_NaI] + + k[6417]*y_cur[IDX_GRAINM]; + data[jistart + 14802] = 0.0 + k[4247]*y_cur[IDX_H2COII]; + data[jistart + 14803] = 0.0 + k[4422]*y_cur[IDX_H2COII]; + data[jistart + 14804] = 0.0 + k[2019]*y_cur[IDX_CH2I]; + data[jistart + 14805] = 0.0 + k[3537]*y_cur[IDX_H3COII]; + data[jistart + 14806] = 0.0 - k[1469]*y_cur[IDX_H2COI]; + data[jistart + 14807] = 0.0 - k[1979]*y_cur[IDX_H2COI] - k[1980]*y_cur[IDX_H2COI] - + k[1981]*y_cur[IDX_H2COI]; + data[jistart + 14808] = 0.0 - k[688]*y_cur[IDX_H2COI] - k[3778]*y_cur[IDX_H2COI]; + data[jistart + 14809] = 0.0 - k[468]*y_cur[IDX_H2COI] - k[2508]*y_cur[IDX_H2COI]; + data[jistart + 14810] = 0.0 + k[4142]*y_cur[IDX_H2COII]; + data[jistart + 14811] = 0.0 + k[1938]*y_cur[IDX_CH3OHI] - k[1947]*y_cur[IDX_H2COI] - + k[1948]*y_cur[IDX_H2COI] - k[1949]*y_cur[IDX_H2COI] - + k[1950]*y_cur[IDX_H2COI]; + data[jistart + 14812] = 0.0 - k[461]*y_cur[IDX_H2COI] - k[2498]*y_cur[IDX_H2COI] + + k[3657]*y_cur[IDX_CH2CCH2I] + k[3661]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 14813] = 0.0 + k[459]*y_cur[IDX_H2COII]; + data[jistart + 14814] = 0.0 + k[531]*y_cur[IDX_H2COII]; + data[jistart + 14815] = 0.0 + k[635]*y_cur[IDX_H2COII] + k[3628]*y_cur[IDX_H3COII]; + data[jistart + 14816] = 0.0 + k[4667]*y_cur[IDX_H2COII]; + data[jistart + 14817] = 0.0 - k[3373]*y_cur[IDX_H2COI]; + data[jistart + 14818] = 0.0 + k[3848]*y_cur[IDX_C2H4I]; + data[jistart + 14819] = 0.0 - k[551]*y_cur[IDX_H2COI] - k[3345]*y_cur[IDX_H2COI] - + k[3346]*y_cur[IDX_H2COI]; + data[jistart + 14820] = 0.0 + k[262]*y_cur[IDX_CH2I] + k[290]*y_cur[IDX_CHI] + + k[459]*y_cur[IDX_FeI] + k[460]*y_cur[IDX_SI] + + k[500]*y_cur[IDX_HCOI] + k[531]*y_cur[IDX_MgI] + + k[604]*y_cur[IDX_NH3I] + k[624]*y_cur[IDX_NOI] + + k[635]*y_cur[IDX_NaI] + k[718]*y_cur[IDX_SiI] - + k[2488]*y_cur[IDX_H2COI] + k[3897]*y_cur[IDX_CM] + + k[3932]*y_cur[IDX_C10M] + k[3967]*y_cur[IDX_C10HM] + + k[4002]*y_cur[IDX_C2M] + k[4037]*y_cur[IDX_C2HM] + + k[4072]*y_cur[IDX_C3M] + k[4107]*y_cur[IDX_C3HM] + + k[4142]*y_cur[IDX_C3NM] + k[4177]*y_cur[IDX_C4M] + + k[4212]*y_cur[IDX_C4HM] + k[4247]*y_cur[IDX_C5M] + + k[4282]*y_cur[IDX_C5HM] + k[4317]*y_cur[IDX_C5NM] + + k[4352]*y_cur[IDX_C6M] + k[4387]*y_cur[IDX_C6HM] + + k[4422]*y_cur[IDX_C7M] + k[4457]*y_cur[IDX_C7HM] + + k[4492]*y_cur[IDX_C8M] + k[4527]*y_cur[IDX_C8HM] + + k[4562]*y_cur[IDX_C9M] + k[4597]*y_cur[IDX_C9HM] + + k[4632]*y_cur[IDX_CHM] + k[4667]*y_cur[IDX_CNM] + + k[4703]*y_cur[IDX_HM] + k[4738]*y_cur[IDX_OM] + + k[4773]*y_cur[IDX_O2M] + k[4808]*y_cur[IDX_OHM] + + k[4843]*y_cur[IDX_SM] + k[5616]*y_cur[IDX_eM]; + data[jistart + 14821] = 0.0 - k[655]*y_cur[IDX_H2COI] - k[3641]*y_cur[IDX_H2COI]; + data[jistart + 14822] = 0.0 + k[2764]*y_cur[IDX_H3COII]; + data[jistart + 14823] = 0.0 - k[2890]*y_cur[IDX_H2COI] - k[2891]*y_cur[IDX_H2COI]; + data[jistart + 14824] = 0.0 + k[59]*y_cur[IDX_OM] + k[262]*y_cur[IDX_H2COII] + + k[2019]*y_cur[IDX_SiOII] - k[4998]*y_cur[IDX_H2COI] + + k[5002]*y_cur[IDX_NO2I] + k[5003]*y_cur[IDX_NOI] + + k[5010]*y_cur[IDX_O2I] + k[5016]*y_cur[IDX_OHI]; + data[jistart + 14825] = 0.0 + k[3039]*y_cur[IDX_H3COII]; + data[jistart + 14826] = 0.0 - k[3549]*y_cur[IDX_H2COI]; + data[jistart + 14827] = 0.0 + k[3848]*y_cur[IDX_SOII] + k[5348]*y_cur[IDX_OI]; + data[jistart + 14828] = 0.0 + k[4881]*y_cur[IDX_O2I]; + data[jistart + 14829] = 0.0 + k[4881]*y_cur[IDX_C2H3I] + k[5010]*y_cur[IDX_CH2I] + + k[5039]*y_cur[IDX_CH3I]; + data[jistart + 14830] = 0.0 + k[2763]*y_cur[IDX_H3COII]; + data[jistart + 14831] = 0.0 - k[2500]*y_cur[IDX_H2COI] - k[2501]*y_cur[IDX_H2COI]; + data[jistart + 14832] = 0.0 + k[718]*y_cur[IDX_H2COII]; + data[jistart + 14833] = 0.0 + k[624]*y_cur[IDX_H2COII] + k[5003]*y_cur[IDX_CH2I]; + data[jistart + 14834] = 0.0 + k[76]*y_cur[IDX_HM] + k[500]*y_cur[IDX_H2COII] + + k[5205]*y_cur[IDX_HCOI] + k[5205]*y_cur[IDX_HCOI] + + k[5206]*y_cur[IDX_HNOI] + k[5210]*y_cur[IDX_O2HI]; + data[jistart + 14835] = 0.0 - k[174]*y_cur[IDX_CII] - k[222]*y_cur[IDX_C2H2II] - + k[280]*y_cur[IDX_CH4II] - k[300]*y_cur[IDX_CNII] - + k[308]*y_cur[IDX_COII] - k[376]*y_cur[IDX_HII] - + k[446]*y_cur[IDX_H2II] - k[461]*y_cur[IDX_O2II] - + k[468]*y_cur[IDX_H2OII] - k[517]*y_cur[IDX_HeII] - + k[551]*y_cur[IDX_NII] - k[566]*y_cur[IDX_N2II] - + k[574]*y_cur[IDX_NHII] - k[655]*y_cur[IDX_OII] - + k[688]*y_cur[IDX_OHII] - k[1390]*y_cur[IDX_CII] - + k[1391]*y_cur[IDX_CII] - k[1469]*y_cur[IDX_C2HII] - + k[1720]*y_cur[IDX_C2H5II] - k[1947]*y_cur[IDX_CHII] - + k[1948]*y_cur[IDX_CHII] - k[1949]*y_cur[IDX_CHII] - + k[1950]*y_cur[IDX_CHII] - k[1979]*y_cur[IDX_CH2II] - + k[1980]*y_cur[IDX_CH2II] - k[1981]*y_cur[IDX_CH2II] - + k[2077]*y_cur[IDX_CH3II] - k[2141]*y_cur[IDX_CH4II] - + k[2225]*y_cur[IDX_CH5II] - k[2271]*y_cur[IDX_CNII] - + k[2280]*y_cur[IDX_COII] - k[2337]*y_cur[IDX_HII] - + k[2338]*y_cur[IDX_HII] - k[2385]*y_cur[IDX_H2II] - + k[2488]*y_cur[IDX_H2COII] - k[2491]*y_cur[IDX_C2H5OH2II] - + k[2492]*y_cur[IDX_CClII] - k[2493]*y_cur[IDX_CH3COCH3II] - + k[2494]*y_cur[IDX_CH3OH2II] - k[2495]*y_cur[IDX_CH3OH2II] - + k[2496]*y_cur[IDX_H3SII] - k[2497]*y_cur[IDX_HNOII] - + k[2498]*y_cur[IDX_O2II] - k[2499]*y_cur[IDX_O2HII] - + k[2500]*y_cur[IDX_SII] - k[2501]*y_cur[IDX_SII] - + k[2508]*y_cur[IDX_H2OII] - k[2682]*y_cur[IDX_H3II] - + k[2799]*y_cur[IDX_H3OII] - k[2855]*y_cur[IDX_HCNII] - + k[2890]*y_cur[IDX_HCNHII] - k[2891]*y_cur[IDX_HCNHII] - + k[2958]*y_cur[IDX_HCOII] - k[3219]*y_cur[IDX_HeII] - + k[3220]*y_cur[IDX_HeII] - k[3221]*y_cur[IDX_HeII] - + k[3345]*y_cur[IDX_NII] - k[3346]*y_cur[IDX_NII] - + k[3361]*y_cur[IDX_N2II] - k[3373]*y_cur[IDX_N2HII] - + k[3487]*y_cur[IDX_NHII] - k[3488]*y_cur[IDX_NHII] - + k[3510]*y_cur[IDX_NH2II] - k[3511]*y_cur[IDX_NH2II] - + k[3549]*y_cur[IDX_NH3II] - k[3641]*y_cur[IDX_OII] - + k[3778]*y_cur[IDX_OHII] - k[4998]*y_cur[IDX_CH2I] - + k[5030]*y_cur[IDX_CH3I] - k[5076]*y_cur[IDX_CHI] - + k[5114]*y_cur[IDX_CNI] - k[5150]*y_cur[IDX_O2HI] - + k[5165]*y_cur[IDX_HI] - k[5397]*y_cur[IDX_OI] - + k[5465]*y_cur[IDX_OHI] - k[5466]*y_cur[IDX_OHI] - k[5836] - k[6152] + - k[6153] - k[6154] - k[6155] - k[6926]; + data[jistart + 14836] = 0.0 + k[2875]*y_cur[IDX_H3COII]; + data[jistart + 14837] = 0.0 + k[64]*y_cur[IDX_OHM] + k[290]*y_cur[IDX_H2COII] + + k[2248]*y_cur[IDX_H3COII] - k[5076]*y_cur[IDX_H2COI]; + data[jistart + 14838] = 0.0 + k[460]*y_cur[IDX_H2COII]; + data[jistart + 14839] = 0.0 + k[5016]*y_cur[IDX_CH2I] + k[5046]*y_cur[IDX_CH3I] + + k[5056]*y_cur[IDX_CH3CHCH2I] - k[5465]*y_cur[IDX_H2COI] - + k[5466]*y_cur[IDX_H2COI]; + data[jistart + 14840] = 0.0 + k[604]*y_cur[IDX_H2COII] + k[3577]*y_cur[IDX_H3COII]; + data[jistart + 14841] = 0.0 - k[222]*y_cur[IDX_H2COI]; + data[jistart + 14842] = 0.0 + k[2066]*y_cur[IDX_CH3CHOI] - k[2077]*y_cur[IDX_H2COI]; + data[jistart + 14843] = 0.0 - k[5114]*y_cur[IDX_H2COI]; + data[jistart + 14844] = 0.0 + k[8595]*y_cur[IDX_GHCOI]; + data[jistart + 14845] = 0.0 - k[5030]*y_cur[IDX_H2COI] + k[5037]*y_cur[IDX_NO2I] + + k[5039]*y_cur[IDX_O2I] + k[5044]*y_cur[IDX_OI] + + k[5046]*y_cur[IDX_OHI]; + data[jistart + 14846] = 0.0 - k[2799]*y_cur[IDX_H2COI]; + data[jistart + 14847] = 0.0 + k[3754]*y_cur[IDX_SiCH2II] + k[5044]*y_cur[IDX_CH3I] + + k[5348]*y_cur[IDX_C2H4I] + k[5351]*y_cur[IDX_C2H5I] - + k[5397]*y_cur[IDX_H2COI]; + data[jistart + 14848] = 0.0 - k[517]*y_cur[IDX_H2COI] + k[3195]*y_cur[IDX_CH3OCH3I] - + k[3219]*y_cur[IDX_H2COI] - k[3220]*y_cur[IDX_H2COI] - + k[3221]*y_cur[IDX_H2COI] + k[5631]*y_cur[IDX_CH3OI]; + data[jistart + 14849] = 0.0 - k[174]*y_cur[IDX_H2COI] - k[1390]*y_cur[IDX_H2COI] - + k[1391]*y_cur[IDX_H2COI]; + data[jistart + 14850] = 0.0 + k[4]*y_cur[IDX_CM] + k[2545]*y_cur[IDX_H3COII]; + data[jistart + 14851] = 0.0 - k[376]*y_cur[IDX_H2COI] - k[2337]*y_cur[IDX_H2COI] - + k[2338]*y_cur[IDX_H2COI]; + data[jistart + 14852] = 0.0 - k[2958]*y_cur[IDX_H2COI]; + data[jistart + 14853] = 0.0 + k[2656]*y_cur[IDX_CH3CHOI] - k[2682]*y_cur[IDX_H2COI]; + data[jistart + 14854] = 0.0 + k[6417]*y_cur[IDX_H3COII] + k[6429]*y_cur[IDX_CH3OHII] + + k[6444]*y_cur[IDX_CH3OH2II] + k[6561]*y_cur[IDX_CH3CHOHII] + + k[6565]*y_cur[IDX_CH3CHOHII] + k[6577]*y_cur[IDX_C2H5OHII] + + k[6694]*y_cur[IDX_COOCH3II] + k[6697]*y_cur[IDX_CH2OHCOII] + + k[6703]*y_cur[IDX_CH2OHCHOII] + k[6728]*y_cur[IDX_CH2OHCH2OII] + + k[6728]*y_cur[IDX_CH2OHCH2OII] + k[6729]*y_cur[IDX_CH2OHCH2OII]; + data[jistart + 14855] = 0.0 + k[773]*y_cur[IDX_C2H5OHII] + k[939]*y_cur[IDX_CH3CHOHII] + + k[943]*y_cur[IDX_CH3CHOHII] + k[961]*y_cur[IDX_CH3OHII] + + k[967]*y_cur[IDX_CH3OH2II] + k[1037]*y_cur[IDX_H3COII] + + k[1270]*y_cur[IDX_COOCH3II] + k[1273]*y_cur[IDX_CH2OHCOII] + + k[1277]*y_cur[IDX_CH2OHCHOII] + k[1281]*y_cur[IDX_CH2OHCH2OII] + + k[1281]*y_cur[IDX_CH2OHCH2OII] + k[1282]*y_cur[IDX_CH2OHCH2OII] + + k[5616]*y_cur[IDX_H2COII]; + data[jistart + 14856] = 0.0 - k[5165]*y_cur[IDX_H2COI]; + data[jistart + 14857] = 0.0 + k[971]*y_cur[IDX_eM] + k[6406]*y_cur[IDX_GRAINM]; + data[jistart + 14858] = 0.0 + k[1161]*y_cur[IDX_eM] + k[6526]*y_cur[IDX_GRAINM]; + data[jistart + 14859] = 0.0 + k[1094]*y_cur[IDX_eM] + k[6532]*y_cur[IDX_GRAINM]; + data[jistart + 14860] = 0.0 + k[7093] + k[7275] + k[7457]; + data[jistart + 14861] = 0.0 + k[5164]*y_cur[IDX_HI] + k[5264]*y_cur[IDX_NI] + k[5835] + + k[6151]; + data[jistart + 14862] = 0.0 - k[2863]*y_cur[IDX_HCNI] - k[2864]*y_cur[IDX_HCNI]; + data[jistart + 14863] = 0.0 + k[913]*y_cur[IDX_eM] + k[6657]*y_cur[IDX_GRAINM]; + data[jistart + 14864] = 0.0 - k[2865]*y_cur[IDX_HCNI] - k[2866]*y_cur[IDX_HCNI]; + data[jistart + 14865] = 0.0 + k[945]*y_cur[IDX_eM] + k[6485]*y_cur[IDX_GRAINM]; + data[jistart + 14866] = 0.0 + k[1082]*y_cur[IDX_eM] + k[6794]*y_cur[IDX_GRAINM]; + data[jistart + 14867] = 0.0 + k[917]*y_cur[IDX_eM] + k[6476]*y_cur[IDX_GRAINM]; + data[jistart + 14868] = 0.0 - k[2880]*y_cur[IDX_HCNI]; + data[jistart + 14869] = 0.0 + k[1555]*y_cur[IDX_C2H2I] + k[2173]*y_cur[IDX_CH4I] + + k[2413]*y_cur[IDX_H2I]; + data[jistart + 14870] = 0.0 + k[5215]*y_cur[IDX_CI]; + data[jistart + 14871] = 0.0 - k[2882]*y_cur[IDX_HCNI]; + data[jistart + 14872] = 0.0 + k[3424]*y_cur[IDX_NI]; + data[jistart + 14873] = 0.0 - k[2872]*y_cur[IDX_HCNI]; + data[jistart + 14874] = 0.0 + k[5268]*y_cur[IDX_NI]; + data[jistart + 14875] = 0.0 + k[1348]*y_cur[IDX_CII] + k[2886]*y_cur[IDX_HCNHII] + + k[3169]*y_cur[IDX_HeII]; + data[jistart + 14876] = 0.0 + k[5119]*y_cur[IDX_CNI]; + data[jistart + 14877] = 0.0 - k[2873]*y_cur[IDX_HCNI]; + data[jistart + 14878] = 0.0 + k[1540]*y_cur[IDX_C2H2I] + k[2526]*y_cur[IDX_H2OI] + + k[2575]*y_cur[IDX_H2SI] + k[3561]*y_cur[IDX_NH3I]; + data[jistart + 14879] = 0.0 - k[2871]*y_cur[IDX_HCNI]; + data[jistart + 14880] = 0.0 + k[5194]*y_cur[IDX_HI]; + data[jistart + 14881] = 0.0 + k[3470]*y_cur[IDX_NI]; + data[jistart + 14882] = 0.0 + k[1065]*y_cur[IDX_eM] + k[1565]*y_cur[IDX_C2H2I] + + k[2196]*y_cur[IDX_CH4I] + k[2445]*y_cur[IDX_H2I] + + k[3460]*y_cur[IDX_NI] + k[6631]*y_cur[IDX_GRAINM]; + data[jistart + 14883] = 0.0 + k[5126]*y_cur[IDX_CNI]; + data[jistart + 14884] = 0.0 - k[2884]*y_cur[IDX_HCNI]; + data[jistart + 14885] = 0.0 + k[3400]*y_cur[IDX_NI]; + data[jistart + 14886] = 0.0 + k[1513]*y_cur[IDX_C2H2II] + k[2068]*y_cur[IDX_CH3II] + + k[2329]*y_cur[IDX_HII] + k[2888]*y_cur[IDX_HCNHII]; + data[jistart + 14887] = 0.0 + k[5181]*y_cur[IDX_HI] + k[5475]*y_cur[IDX_OHI]; + data[jistart + 14888] = 0.0 - k[2867]*y_cur[IDX_HCNI] - k[2868]*y_cur[IDX_HCNI]; + data[jistart + 14889] = 0.0 - k[2876]*y_cur[IDX_HCNI]; + data[jistart + 14890] = 0.0 - k[2883]*y_cur[IDX_HCNI]; + data[jistart + 14891] = 0.0 + k[3423]*y_cur[IDX_NI]; + data[jistart + 14892] = 0.0 - k[2878]*y_cur[IDX_HCNI]; + data[jistart + 14893] = 0.0 + k[8592]*y_cur[IDX_GHI]; + data[jistart + 14894] = 0.0 - k[2862]*y_cur[IDX_HCNI]; + data[jistart + 14895] = 0.0 - k[301]*y_cur[IDX_HCNI] + k[2271]*y_cur[IDX_H2COI] - + k[2272]*y_cur[IDX_HCNI]; + data[jistart + 14896] = 0.0 + k[5111]*y_cur[IDX_CNI]; + data[jistart + 14897] = 0.0 + k[8698]*y_cur[IDX_GCHI]; + data[jistart + 14898] = 0.0 - k[498]*y_cur[IDX_HCNI]; + data[jistart + 14899] = 0.0 + k[230]*y_cur[IDX_C2H2I] + k[480]*y_cur[IDX_H2OI] + + k[490]*y_cur[IDX_HI] + k[494]*y_cur[IDX_NOI] + k[495]*y_cur[IDX_O2I] + + k[496]*y_cur[IDX_SI] + k[608]*y_cur[IDX_NH3I] - + k[2856]*y_cur[IDX_HCNI]; + data[jistart + 14900] = 0.0 - k[1453]*y_cur[IDX_HCNI]; + data[jistart + 14901] = 0.0 - k[2869]*y_cur[IDX_HCNI] - k[2870]*y_cur[IDX_HCNI]; + data[jistart + 14902] = 0.0 + k[2539]*y_cur[IDX_H2OI] + k[3572]*y_cur[IDX_NH3I]; + data[jistart + 14903] = 0.0 - k[2879]*y_cur[IDX_HCNI]; + data[jistart + 14904] = 0.0 - k[3493]*y_cur[IDX_HCNI]; + data[jistart + 14905] = 0.0 + k[4778]*y_cur[IDX_HCNHII]; + data[jistart + 14906] = 0.0 + k[4637]*y_cur[IDX_HCNHII]; + data[jistart + 14907] = 0.0 - k[449]*y_cur[IDX_HCNI]; + data[jistart + 14908] = 0.0 - k[3519]*y_cur[IDX_HCNI]; + data[jistart + 14909] = 0.0 + k[4848]*y_cur[IDX_HCNHII]; + data[jistart + 14910] = 0.0 + k[4042]*y_cur[IDX_HCNHII]; + data[jistart + 14911] = 0.0 + k[4217]*y_cur[IDX_HCNHII]; + data[jistart + 14912] = 0.0 - k[497]*y_cur[IDX_HCNI]; + data[jistart + 14913] = 0.0 - k[2229]*y_cur[IDX_HCNI]; + data[jistart + 14914] = 0.0 - k[3795]*y_cur[IDX_HCNI] + k[4813]*y_cur[IDX_HCNHII]; + data[jistart + 14915] = 0.0 + k[3972]*y_cur[IDX_HCNHII]; + data[jistart + 14916] = 0.0 + k[4112]*y_cur[IDX_HCNHII]; + data[jistart + 14917] = 0.0 + k[4392]*y_cur[IDX_HCNHII]; + data[jistart + 14918] = 0.0 + k[4532]*y_cur[IDX_HCNHII]; + data[jistart + 14919] = 0.0 + k[4462]*y_cur[IDX_HCNHII]; + data[jistart + 14920] = 0.0 + k[4602]*y_cur[IDX_HCNHII]; + data[jistart + 14921] = 0.0 + k[3937]*y_cur[IDX_HCNHII]; + data[jistart + 14922] = 0.0 + k[4287]*y_cur[IDX_HCNHII]; + data[jistart + 14923] = 0.0 + k[4322]*y_cur[IDX_HCNHII]; + data[jistart + 14924] = 0.0 + k[6]*y_cur[IDX_NHI] + k[3902]*y_cur[IDX_HCNHII]; + data[jistart + 14925] = 0.0 - k[3653]*y_cur[IDX_HCNI] + k[4743]*y_cur[IDX_HCNHII]; + data[jistart + 14926] = 0.0 + k[4567]*y_cur[IDX_HCNHII]; + data[jistart + 14927] = 0.0 + k[72]*y_cur[IDX_CNI] - k[2368]*y_cur[IDX_HCNI] + + k[4708]*y_cur[IDX_HCNHII]; + data[jistart + 14928] = 0.0 + k[1399]*y_cur[IDX_CII] + k[1470]*y_cur[IDX_C2HII] + + k[2079]*y_cur[IDX_CH3II] + k[2894]*y_cur[IDX_HCNHII]; + data[jistart + 14929] = 0.0 + k[4497]*y_cur[IDX_HCNHII]; + data[jistart + 14930] = 0.0 + k[4007]*y_cur[IDX_HCNHII]; + data[jistart + 14931] = 0.0 + k[4077]*y_cur[IDX_HCNHII]; + data[jistart + 14932] = 0.0 + k[4182]*y_cur[IDX_HCNHII]; + data[jistart + 14933] = 0.0 + k[4357]*y_cur[IDX_HCNHII]; + data[jistart + 14934] = 0.0 - k[2875]*y_cur[IDX_HCNI]; + data[jistart + 14935] = 0.0 + k[4252]*y_cur[IDX_HCNHII]; + data[jistart + 14936] = 0.0 + k[4427]*y_cur[IDX_HCNHII]; + data[jistart + 14937] = 0.0 + k[8698]*y_cur[IDX_GNI]; + data[jistart + 14938] = 0.0 + k[3540]*y_cur[IDX_HCNHII] + k[4969]*y_cur[IDX_CI]; + data[jistart + 14939] = 0.0 + k[1470]*y_cur[IDX_HC3NI] - k[1474]*y_cur[IDX_HCNI] - + k[1475]*y_cur[IDX_HCNI] - k[1476]*y_cur[IDX_HCNI]; + data[jistart + 14940] = 0.0 - k[1986]*y_cur[IDX_HCNI]; + data[jistart + 14941] = 0.0 - k[3781]*y_cur[IDX_HCNI]; + data[jistart + 14942] = 0.0 - k[2512]*y_cur[IDX_HCNI]; + data[jistart + 14943] = 0.0 + k[4147]*y_cur[IDX_HCNHII]; + data[jistart + 14944] = 0.0 - k[1956]*y_cur[IDX_HCNI] - k[1957]*y_cur[IDX_HCNI] - + k[1958]*y_cur[IDX_HCNI]; + data[jistart + 14945] = 0.0 + k[3629]*y_cur[IDX_HCNHII]; + data[jistart + 14946] = 0.0 + k[6]*y_cur[IDX_CM] + k[5305]*y_cur[IDX_CNI]; + data[jistart + 14947] = 0.0 + k[106]*y_cur[IDX_HI] + k[4672]*y_cur[IDX_HCNHII]; + data[jistart + 14948] = 0.0 - k[2881]*y_cur[IDX_HCNI]; + data[jistart + 14949] = 0.0 - k[554]*y_cur[IDX_HCNI]; + data[jistart + 14950] = 0.0 - k[2874]*y_cur[IDX_HCNI]; + data[jistart + 14951] = 0.0 - k[3644]*y_cur[IDX_HCNI] - k[3645]*y_cur[IDX_HCNI]; + data[jistart + 14952] = 0.0 + k[3405]*y_cur[IDX_NI]; + data[jistart + 14953] = 0.0 + k[1090]*y_cur[IDX_eM] + k[2006]*y_cur[IDX_CH2I] + + k[2251]*y_cur[IDX_CHI] + k[2886]*y_cur[IDX_CH2CHCNI] + + k[2888]*y_cur[IDX_CH3CNI] + k[2890]*y_cur[IDX_H2COI] + + k[2892]*y_cur[IDX_H2SI] + k[2894]*y_cur[IDX_HC3NI] + + k[3540]*y_cur[IDX_NH2I] + k[3582]*y_cur[IDX_NH3I] + + k[3629]*y_cur[IDX_NaI] + k[3902]*y_cur[IDX_CM] + + k[3937]*y_cur[IDX_C10M] + k[3972]*y_cur[IDX_C10HM] + + k[4007]*y_cur[IDX_C2M] + k[4042]*y_cur[IDX_C2HM] + + k[4077]*y_cur[IDX_C3M] + k[4112]*y_cur[IDX_C3HM] + + k[4147]*y_cur[IDX_C3NM] + k[4182]*y_cur[IDX_C4M] + + k[4217]*y_cur[IDX_C4HM] + k[4252]*y_cur[IDX_C5M] + + k[4287]*y_cur[IDX_C5HM] + k[4322]*y_cur[IDX_C5NM] + + k[4357]*y_cur[IDX_C6M] + k[4392]*y_cur[IDX_C6HM] + + k[4427]*y_cur[IDX_C7M] + k[4462]*y_cur[IDX_C7HM] + + k[4497]*y_cur[IDX_C8M] + k[4532]*y_cur[IDX_C8HM] + + k[4567]*y_cur[IDX_C9M] + k[4602]*y_cur[IDX_C9HM] + + k[4637]*y_cur[IDX_CHM] + k[4672]*y_cur[IDX_CNM] + + k[4708]*y_cur[IDX_HM] + k[4743]*y_cur[IDX_OM] + + k[4778]*y_cur[IDX_O2M] + k[4813]*y_cur[IDX_OHM] + + k[4848]*y_cur[IDX_SM] + k[6379]*y_cur[IDX_GRAINM]; + data[jistart + 14954] = 0.0 + k[2006]*y_cur[IDX_HCNHII] + k[4997]*y_cur[IDX_CNI] + + k[5001]*y_cur[IDX_N2I] + k[5004]*y_cur[IDX_NOI] + + k[5253]*y_cur[IDX_NI]; + data[jistart + 14955] = 0.0 + k[133]*y_cur[IDX_HII] + k[5174]*y_cur[IDX_HI]; + data[jistart + 14956] = 0.0 + k[5105]*y_cur[IDX_CNI] + k[5225]*y_cur[IDX_NI]; + data[jistart + 14957] = 0.0 + k[5001]*y_cur[IDX_CH2I] + k[5079]*y_cur[IDX_CHI]; + data[jistart + 14958] = 0.0 + k[495]*y_cur[IDX_HCNII]; + data[jistart + 14959] = 0.0 - k[2885]*y_cur[IDX_HCNI] - k[5580]*y_cur[IDX_HCNI]; + data[jistart + 14960] = 0.0 + k[2575]*y_cur[IDX_C2NII] + k[2892]*y_cur[IDX_HCNHII]; + data[jistart + 14961] = 0.0 - k[2861]*y_cur[IDX_HCNI]; + data[jistart + 14962] = 0.0 + k[494]*y_cur[IDX_HCNII] + k[4878]*y_cur[IDX_C2H2I] + + k[5004]*y_cur[IDX_CH2I] + k[5038]*y_cur[IDX_CH3I] + + k[5083]*y_cur[IDX_CHI]; + data[jistart + 14963] = 0.0 + k[5117]*y_cur[IDX_CNI] + k[5266]*y_cur[IDX_NI]; + data[jistart + 14964] = 0.0 + k[2173]*y_cur[IDX_C4NII] + k[2196]*y_cur[IDX_HC3NII] + + k[5059]*y_cur[IDX_CNI]; + data[jistart + 14965] = 0.0 - k[4901]*y_cur[IDX_HCNI]; + data[jistart + 14966] = 0.0 + k[2271]*y_cur[IDX_CNII] + k[2890]*y_cur[IDX_HCNHII] + + k[5114]*y_cur[IDX_CNI]; + data[jistart + 14967] = 0.0 - k[301]*y_cur[IDX_CNII] - k[388]*y_cur[IDX_HII] - + k[449]*y_cur[IDX_H2II] - k[497]*y_cur[IDX_COII] - + k[498]*y_cur[IDX_N2II] - k[554]*y_cur[IDX_NII] - + k[1407]*y_cur[IDX_CII] - k[1453]*y_cur[IDX_C2II] - + k[1474]*y_cur[IDX_C2HII] - k[1475]*y_cur[IDX_C2HII] - + k[1476]*y_cur[IDX_C2HII] - k[1522]*y_cur[IDX_C2H2II] - + k[1523]*y_cur[IDX_C2H2II] - k[1956]*y_cur[IDX_CHII] - + k[1957]*y_cur[IDX_CHII] - k[1958]*y_cur[IDX_CHII] - + k[1986]*y_cur[IDX_CH2II] - k[2229]*y_cur[IDX_CH5II] - + k[2272]*y_cur[IDX_CNII] - k[2368]*y_cur[IDX_HM] - + k[2512]*y_cur[IDX_H2OII] - k[2694]*y_cur[IDX_H3II] - + k[2806]*y_cur[IDX_H3OII] - k[2856]*y_cur[IDX_HCNII] - + k[2861]*y_cur[IDX_C2H3II] - k[2862]*y_cur[IDX_C2H5II] - + k[2863]*y_cur[IDX_C2H7II] - k[2864]*y_cur[IDX_C2H7II] - + k[2865]*y_cur[IDX_C2N2II] - k[2866]*y_cur[IDX_C2N2II] - + k[2867]*y_cur[IDX_C3II] - k[2868]*y_cur[IDX_C3II] - + k[2869]*y_cur[IDX_C4HII] - k[2870]*y_cur[IDX_C4HII] - + k[2871]*y_cur[IDX_C5II] - k[2872]*y_cur[IDX_C2H6II] - + k[2873]*y_cur[IDX_CH3OH2II] - k[2874]*y_cur[IDX_H2COII] - + k[2875]*y_cur[IDX_H3COII] - k[2876]*y_cur[IDX_H3SII] - + k[2877]*y_cur[IDX_HCOII] - k[2878]*y_cur[IDX_HNOII] - + k[2879]*y_cur[IDX_HSII] - k[2880]*y_cur[IDX_HSiSII] - + k[2881]*y_cur[IDX_N2HII] - k[2882]*y_cur[IDX_NCCNHII] - + k[2883]*y_cur[IDX_O2HII] - k[2884]*y_cur[IDX_PHII] - + k[2885]*y_cur[IDX_SiII] - k[3245]*y_cur[IDX_HeII] - + k[3246]*y_cur[IDX_HeII] - k[3247]*y_cur[IDX_HeII] - + k[3248]*y_cur[IDX_HeII] - k[3493]*y_cur[IDX_NHII] - + k[3519]*y_cur[IDX_NH2II] - k[3644]*y_cur[IDX_OII] - + k[3645]*y_cur[IDX_OII] - k[3653]*y_cur[IDX_OM] - + k[3781]*y_cur[IDX_OHII] - k[3795]*y_cur[IDX_OHM] - + k[4873]*y_cur[IDX_C2I] - k[4901]*y_cur[IDX_C2HI] - + k[5116]*y_cur[IDX_CNI] - k[5170]*y_cur[IDX_HI] - + k[5402]*y_cur[IDX_OI] - k[5403]*y_cur[IDX_OI] - + k[5404]*y_cur[IDX_OI] - k[5469]*y_cur[IDX_OHI] - + k[5470]*y_cur[IDX_OHI] - k[5540]*y_cur[IDX_CH3II] - + k[5580]*y_cur[IDX_SiII] - k[5854] - k[6181] - k[6911]; + data[jistart + 14968] = 0.0 + k[2251]*y_cur[IDX_HCNHII] + k[5079]*y_cur[IDX_N2I] + + k[5083]*y_cur[IDX_NOI]; + data[jistart + 14969] = 0.0 + k[496]*y_cur[IDX_HCNII]; + data[jistart + 14970] = 0.0 - k[4873]*y_cur[IDX_HCNI]; + data[jistart + 14971] = 0.0 + k[5459]*y_cur[IDX_CNI] - k[5469]*y_cur[IDX_HCNI] - + k[5470]*y_cur[IDX_HCNI] + k[5475]*y_cur[IDX_NCCNI]; + data[jistart + 14972] = 0.0 + k[608]*y_cur[IDX_HCNII] + k[3561]*y_cur[IDX_C2NII] + + k[3572]*y_cur[IDX_CNCII] + k[3582]*y_cur[IDX_HCNHII] + + k[5302]*y_cur[IDX_CNI]; + data[jistart + 14973] = 0.0 + k[1513]*y_cur[IDX_CH3CNI] - k[1522]*y_cur[IDX_HCNI] - + k[1523]*y_cur[IDX_HCNI] + k[3389]*y_cur[IDX_NI]; + data[jistart + 14974] = 0.0 + k[2068]*y_cur[IDX_CH3CNI] + k[2079]*y_cur[IDX_HC3NI] - + k[5540]*y_cur[IDX_HCNI]; + data[jistart + 14975] = 0.0 + k[230]*y_cur[IDX_HCNII] + k[1540]*y_cur[IDX_C2NII] + + k[1555]*y_cur[IDX_C4NII] + k[1565]*y_cur[IDX_HC3NII] + + k[4878]*y_cur[IDX_NOI]; + data[jistart + 14976] = 0.0 + k[72]*y_cur[IDX_HM] + k[4997]*y_cur[IDX_CH2I] + + k[5029]*y_cur[IDX_CH3I] + k[5059]*y_cur[IDX_CH4I] + + k[5105]*y_cur[IDX_C2H4I] + k[5111]*y_cur[IDX_C2H6I] + + k[5114]*y_cur[IDX_H2COI] - k[5116]*y_cur[IDX_HCNI] + + k[5117]*y_cur[IDX_HCOI] + k[5119]*y_cur[IDX_HNOI] + + k[5126]*y_cur[IDX_SiH4I] + k[5138]*y_cur[IDX_H2I] + + k[5302]*y_cur[IDX_NH3I] + k[5305]*y_cur[IDX_NHI] + + k[5459]*y_cur[IDX_OHI]; + data[jistart + 14977] = 0.0 + k[8592]*y_cur[IDX_GCNI]; + data[jistart + 14978] = 0.0 + k[5029]*y_cur[IDX_CNI] + k[5038]*y_cur[IDX_NOI] + + k[5258]*y_cur[IDX_NI] + k[5259]*y_cur[IDX_NI]; + data[jistart + 14979] = 0.0 + k[3389]*y_cur[IDX_C2H2II] + k[3400]*y_cur[IDX_C3H5II] + + k[3405]*y_cur[IDX_C4H2II] + k[3423]*y_cur[IDX_C6H2II] + + k[3424]*y_cur[IDX_C6H5II] + k[3460]*y_cur[IDX_HC3NII] + + k[3470]*y_cur[IDX_SiCH2II] + k[5225]*y_cur[IDX_C2H4I] + + k[5253]*y_cur[IDX_CH2I] + k[5258]*y_cur[IDX_CH3I] + + k[5259]*y_cur[IDX_CH3I] + k[5264]*y_cur[IDX_H2CNI] + + k[5266]*y_cur[IDX_HCOI] + k[5268]*y_cur[IDX_HCSI]; + data[jistart + 14980] = 0.0 - k[2806]*y_cur[IDX_HCNI]; + data[jistart + 14981] = 0.0 - k[5402]*y_cur[IDX_HCNI] - k[5403]*y_cur[IDX_HCNI] - + k[5404]*y_cur[IDX_HCNI]; + data[jistart + 14982] = 0.0 + k[3169]*y_cur[IDX_CH2CHCNI] - k[3245]*y_cur[IDX_HCNI] - + k[3246]*y_cur[IDX_HCNI] - k[3247]*y_cur[IDX_HCNI] - + k[3248]*y_cur[IDX_HCNI]; + data[jistart + 14983] = 0.0 + k[1348]*y_cur[IDX_CH2CHCNI] + k[1399]*y_cur[IDX_HC3NI] - + k[1407]*y_cur[IDX_HCNI]; + data[jistart + 14984] = 0.0 + k[480]*y_cur[IDX_HCNII] + k[2526]*y_cur[IDX_C2NII] + + k[2539]*y_cur[IDX_CNCII]; + data[jistart + 14985] = 0.0 + k[133]*y_cur[IDX_HNCI] - k[388]*y_cur[IDX_HCNI] + + k[2329]*y_cur[IDX_CH3CNI]; + data[jistart + 14986] = 0.0 + k[4969]*y_cur[IDX_NH2I] + k[5215]*y_cur[IDX_HOCNI]; + data[jistart + 14987] = 0.0 - k[2877]*y_cur[IDX_HCNI]; + data[jistart + 14988] = 0.0 - k[2694]*y_cur[IDX_HCNI]; + data[jistart + 14989] = 0.0 + k[6379]*y_cur[IDX_HCNHII] + k[6406]*y_cur[IDX_CH3NHII] + + k[6476]*y_cur[IDX_CH2CNII] + k[6485]*y_cur[IDX_CH3CNII] + + k[6526]*y_cur[IDX_NH2CNHII] + k[6532]*y_cur[IDX_HCNOHII] + + k[6631]*y_cur[IDX_HC3NII] + k[6657]*y_cur[IDX_CH2CHCNHII] + + k[6794]*y_cur[IDX_HC5NHII]; + data[jistart + 14990] = 0.0 + k[2413]*y_cur[IDX_C4NII] + k[2445]*y_cur[IDX_HC3NII] + + k[5138]*y_cur[IDX_CNI]; + data[jistart + 14991] = 0.0 + k[913]*y_cur[IDX_CH2CHCNHII] + k[917]*y_cur[IDX_CH2CNII] + + k[945]*y_cur[IDX_CH3CNII] + k[971]*y_cur[IDX_CH3NHII] + + k[1065]*y_cur[IDX_HC3NII] + k[1082]*y_cur[IDX_HC5NHII] + + k[1090]*y_cur[IDX_HCNHII] + k[1094]*y_cur[IDX_HCNOHII] + + k[1161]*y_cur[IDX_NH2CNHII]; + data[jistart + 14992] = 0.0 + k[106]*y_cur[IDX_CNM] + k[490]*y_cur[IDX_HCNII] + + k[5164]*y_cur[IDX_H2CNI] - k[5170]*y_cur[IDX_HCNI] + + k[5174]*y_cur[IDX_HNCI] + k[5181]*y_cur[IDX_NCCNI] + + k[5194]*y_cur[IDX_OCNI]; + data[jistart + 14993] = 0.0 + k[5942]; + data[jistart + 14994] = 0.0 + k[988]*y_cur[IDX_eM] + k[6745]*y_cur[IDX_GRAINM]; + data[jistart + 14995] = 0.0 + k[1073]*y_cur[IDX_eM] + k[6744]*y_cur[IDX_GRAINM]; + data[jistart + 14996] = 0.0 + k[1092]*y_cur[IDX_eM] + k[6514]*y_cur[IDX_GRAINM]; + data[jistart + 14997] = 0.0 + k[1191]*y_cur[IDX_eM] + k[6773]*y_cur[IDX_GRAINM]; + data[jistart + 14998] = 0.0 + k[1240]*y_cur[IDX_eM] + k[6800]*y_cur[IDX_GRAINM]; + data[jistart + 14999] = 0.0 + k[1262]*y_cur[IDX_eM] + k[6668]*y_cur[IDX_GRAINM]; + data[jistart + 15000] = 0.0 + k[828]*y_cur[IDX_eM] + k[6646]*y_cur[IDX_GRAINM]; + data[jistart + 15001] = 0.0 + k[1193]*y_cur[IDX_eM] + k[6811]*y_cur[IDX_GRAINM]; + data[jistart + 15002] = 0.0 + k[1075]*y_cur[IDX_eM] + k[6819]*y_cur[IDX_GRAINM]; + data[jistart + 15003] = 0.0 + k[917]*y_cur[IDX_eM] + k[6476]*y_cur[IDX_GRAINM]; + data[jistart + 15004] = 0.0 + k[1060]*y_cur[IDX_eM] + k[6677]*y_cur[IDX_GRAINM]; + data[jistart + 15005] = 0.0 + k[1058]*y_cur[IDX_eM] + k[6489]*y_cur[IDX_GRAINM]; + data[jistart + 15006] = 0.0 + k[1106]*y_cur[IDX_eM] + k[6544]*y_cur[IDX_GRAINM]; + data[jistart + 15007] = 0.0 + k[1071]*y_cur[IDX_eM] + k[6778]*y_cur[IDX_GRAINM]; + data[jistart + 15008] = 0.0 + k[5855] + k[6182]; + data[jistart + 15009] = 0.0 + k[812]*y_cur[IDX_eM] + k[6509]*y_cur[IDX_GRAINM]; + data[jistart + 15010] = 0.0 + k[960]*y_cur[IDX_eM] + k[6428]*y_cur[IDX_GRAINM]; + data[jistart + 15011] = 0.0 + k[1360]*y_cur[IDX_CII]; + data[jistart + 15012] = 0.0 + k[3253]*y_cur[IDX_HeII]; + data[jistart + 15013] = 0.0 + k[1356]*y_cur[IDX_CII]; + data[jistart + 15014] = 0.0 + k[1396]*y_cur[IDX_CII] + k[3232]*y_cur[IDX_HeII]; + data[jistart + 15015] = 0.0 + k[3257]*y_cur[IDX_HeII] + k[5410]*y_cur[IDX_OI] + k[5863]; + data[jistart + 15016] = 0.0 + k[3319]*y_cur[IDX_HeII]; + data[jistart + 15017] = 0.0 + k[1109]*y_cur[IDX_eM] + k[6490]*y_cur[IDX_GRAINM]; + data[jistart + 15018] = 0.0 + k[3130]*y_cur[IDX_HeII]; + data[jistart + 15019] = 0.0 - k[5094]*y_cur[IDX_CHI] - k[5095]*y_cur[IDX_CHI]; + data[jistart + 15020] = 0.0 - k[5078]*y_cur[IDX_CHI]; + data[jistart + 15021] = 0.0 + k[3018]*y_cur[IDX_CII]; + data[jistart + 15022] = 0.0 - k[2267]*y_cur[IDX_CHI]; + data[jistart + 15023] = 0.0 + k[1107]*y_cur[IDX_eM] + k[6554]*y_cur[IDX_GRAINM]; + data[jistart + 15024] = 0.0 + k[799]*y_cur[IDX_eM] + k[6477]*y_cur[IDX_GRAINM]; + data[jistart + 15025] = 0.0 + k[1378]*y_cur[IDX_CII]; + data[jistart + 15026] = 0.0 - k[2263]*y_cur[IDX_CHI]; + data[jistart + 15027] = 0.0 - k[2254]*y_cur[IDX_CHI]; + data[jistart + 15028] = 0.0 + k[1344]*y_cur[IDX_CII] - k[5067]*y_cur[IDX_CHI]; + data[jistart + 15029] = 0.0 - k[288]*y_cur[IDX_CHI]; + data[jistart + 15030] = 0.0 + k[1370]*y_cur[IDX_CII] - k[5069]*y_cur[IDX_CHI] - + k[5070]*y_cur[IDX_CHI]; + data[jistart + 15031] = 0.0 - k[293]*y_cur[IDX_CHI]; + data[jistart + 15032] = 0.0 + k[4626]*y_cur[IDX_CHM]; + data[jistart + 15033] = 0.0 - k[2250]*y_cur[IDX_CHI]; + data[jistart + 15034] = 0.0 + k[1376]*y_cur[IDX_CII] - k[5071]*y_cur[IDX_CHI] - + k[5072]*y_cur[IDX_CHI]; + data[jistart + 15035] = 0.0 - k[287]*y_cur[IDX_CHI] - k[2239]*y_cur[IDX_CHI]; + data[jistart + 15036] = 0.0 + k[4629]*y_cur[IDX_CHM]; + data[jistart + 15037] = 0.0 - k[2255]*y_cur[IDX_CHI]; + data[jistart + 15038] = 0.0 - k[2258]*y_cur[IDX_CHI]; + data[jistart + 15039] = 0.0 + k[4621]*y_cur[IDX_CII] + k[4622]*y_cur[IDX_C2H2II] + + k[4623]*y_cur[IDX_C2H3II] + k[4624]*y_cur[IDX_C4H2II] + + k[4625]*y_cur[IDX_C4H3II] + k[4626]*y_cur[IDX_C4SII] + + k[4627]*y_cur[IDX_CH2CCHII] + k[4628]*y_cur[IDX_CH3II] + + k[4629]*y_cur[IDX_CNCII] + k[4630]*y_cur[IDX_FeII] + + k[4631]*y_cur[IDX_HII] + k[4632]*y_cur[IDX_H2COII] + + k[4633]*y_cur[IDX_H2SII] + k[4634]*y_cur[IDX_H3II] + k[4635]*y_cur[IDX_H3OII] + k[4636]*y_cur[IDX_HC2SII] + k[4637]*y_cur[IDX_HCNHII] + k[4638]*y_cur[IDX_HCNHII] + - k[4639]*y_cur[IDX_HCOII] + k[4644]*y_cur[IDX_N2HII] + - k[4646]*y_cur[IDX_NH4II] + k[4654]*y_cur[IDX_SiOHII]; - data[jistart + 11359] = 0.0 + k[359]*y_cur[IDX_HII] + - k[1342]*y_cur[IDX_CII] + k[1995]*y_cur[IDX_C2II] + - k[1997]*y_cur[IDX_C2HII] + k[1998]*y_cur[IDX_C2H2II] + - k[2017]*y_cur[IDX_SII] + k[2018]*y_cur[IDX_SiII] + - k[2375]*y_cur[IDX_H2II] + k[3161]*y_cur[IDX_HeII] + - k[4944]*y_cur[IDX_CI] + k[4991]*y_cur[IDX_C2H2I] + - k[4993]*y_cur[IDX_CH2I] + k[4993]*y_cur[IDX_CH2I] + - k[4993]*y_cur[IDX_CH2I] + k[4993]*y_cur[IDX_CH2I] + - k[4994]*y_cur[IDX_CH2I] + k[4994]*y_cur[IDX_CH2I] + - k[5005]*y_cur[IDX_NOI] + k[5006]*y_cur[IDX_NOI] + - k[5008]*y_cur[IDX_O2I] + k[5008]*y_cur[IDX_O2I] + - k[5013]*y_cur[IDX_OI] + k[5013]*y_cur[IDX_OI] + - k[5014]*y_cur[IDX_OI] + k[5016]*y_cur[IDX_OHI] + - k[5020]*y_cur[IDX_SI] + k[5021]*y_cur[IDX_SiI] + - k[5135]*y_cur[IDX_H2I] - k[5156]*y_cur[IDX_HI] + - k[5253]*y_cur[IDX_NI] + k[5254]*y_cur[IDX_NI] + k[5779] + k[6079]; - data[jistart + 11360] = 0.0 + k[908]*y_cur[IDX_eM] + - k[908]*y_cur[IDX_eM] + k[909]*y_cur[IDX_eM] + k[1891]*y_cur[IDX_CI] - + k[1975]*y_cur[IDX_C2HI] + k[1977]*y_cur[IDX_CH4I] + - k[1980]*y_cur[IDX_H2COI] + k[1982]*y_cur[IDX_H2OI] + - k[1983]*y_cur[IDX_H2SI] + k[1985]*y_cur[IDX_H2SI] + - k[1986]*y_cur[IDX_HCNI] + k[1988]*y_cur[IDX_NH3I] + - k[1991]*y_cur[IDX_OI] + k[1994]*y_cur[IDX_SI] + - k[2428]*y_cur[IDX_H2I] - k[2836]*y_cur[IDX_HI] + - k[3452]*y_cur[IDX_NI] + k[6076] + k[6317]*y_cur[IDX_GRAINM] + - k[6317]*y_cur[IDX_GRAINM] + k[6318]*y_cur[IDX_GRAINM]; - data[jistart + 11361] = 0.0 + k[360]*y_cur[IDX_HII] + - k[1347]*y_cur[IDX_CII] + k[1508]*y_cur[IDX_C2H2II] + - k[1609]*y_cur[IDX_C2H3II] + k[1776]*y_cur[IDX_C3H2II] + - k[1806]*y_cur[IDX_C3H3II] + k[2030]*y_cur[IDX_CH2CCHII] + - k[2032]*y_cur[IDX_C4HII] + k[2034]*y_cur[IDX_C4H2II] + - k[2036]*y_cur[IDX_C4H3II] + k[2038]*y_cur[IDX_C5H2II] + - k[2040]*y_cur[IDX_C6H2II] + k[2061]*y_cur[IDX_CH3II] + - k[3162]*y_cur[IDX_HeII] + k[3164]*y_cur[IDX_HeII] + - k[3863]*y_cur[IDX_SiII] + k[4947]*y_cur[IDX_CI] + k[5782] + k[6083]; - data[jistart + 11362] = 0.0 + k[911]*y_cur[IDX_eM] + - k[1742]*y_cur[IDX_C2HI] + k[1795]*y_cur[IDX_C3H2I] + - k[1829]*y_cur[IDX_C3HI] + k[1893]*y_cur[IDX_CI] + - k[2021]*y_cur[IDX_C4HI] + k[2023]*y_cur[IDX_C5H2I] + - k[2025]*y_cur[IDX_C5HI] + k[2028]*y_cur[IDX_C6HI] + - k[2030]*y_cur[IDX_CH2CCHI] + k[2486]*y_cur[IDX_H2CCCI] + - k[3453]*y_cur[IDX_NI] + k[3880]*y_cur[IDX_SiI] + - k[4697]*y_cur[IDX_HM] + k[6471]*y_cur[IDX_GRAINM]; - data[jistart + 11363] = 0.0 + k[1775]*y_cur[IDX_C3H2II] + - k[1809]*y_cur[IDX_C3H4II] + k[1810]*y_cur[IDX_C3H4II] + - k[3855]*y_cur[IDX_SOII] + k[4894]*y_cur[IDX_C2HI] + - k[4895]*y_cur[IDX_C2HI] + k[4946]*y_cur[IDX_CI] + - k[5023]*y_cur[IDX_C4HI] + k[5067]*y_cur[IDX_CHI] + - k[5109]*y_cur[IDX_CNI] + k[5781] + k[6081]; - data[jistart + 11364] = 0.0 + k[1350]*y_cur[IDX_CII] + - k[3168]*y_cur[IDX_HeII]; - data[jistart + 11365] = 0.0 + k[2429]*y_cur[IDX_H2I]; - data[jistart + 11366] = 0.0 + k[913]*y_cur[IDX_eM] + - k[915]*y_cur[IDX_eM] + k[6657]*y_cur[IDX_GRAINM] + - k[6659]*y_cur[IDX_GRAINM]; - data[jistart + 11367] = 0.0 + k[361]*y_cur[IDX_HII] + - k[4948]*y_cur[IDX_CI]; - data[jistart + 11368] = 0.0 - k[5157]*y_cur[IDX_HI]; - data[jistart + 11369] = 0.0 + k[921]*y_cur[IDX_eM] + - k[6408]*y_cur[IDX_GRAINM]; - data[jistart + 11370] = 0.0 + k[1280]*y_cur[IDX_eM] + - k[1281]*y_cur[IDX_eM] + k[1283]*y_cur[IDX_eM] + - k[6727]*y_cur[IDX_GRAINM] + k[6728]*y_cur[IDX_GRAINM] + - k[6730]*y_cur[IDX_GRAINM]; - data[jistart + 11371] = 0.0 + k[1276]*y_cur[IDX_eM] + - k[1277]*y_cur[IDX_eM] + k[1279]*y_cur[IDX_eM] + - k[6702]*y_cur[IDX_GRAINM] + k[6703]*y_cur[IDX_GRAINM] + - k[6705]*y_cur[IDX_GRAINM]; - data[jistart + 11372] = 0.0 + k[1273]*y_cur[IDX_eM] + - k[6697]*y_cur[IDX_GRAINM]; - data[jistart + 11373] = 0.0 + k[2319]*y_cur[IDX_HII] + - k[5384]*y_cur[IDX_OI]; - data[jistart + 11374] = 0.0 + k[362]*y_cur[IDX_HII] + - k[1353]*y_cur[IDX_CII] + k[2101]*y_cur[IDX_SII] + - k[2103]*y_cur[IDX_SiII] + k[4949]*y_cur[IDX_CI] + - k[5027]*y_cur[IDX_CH3I] + k[5027]*y_cur[IDX_CH3I] + - k[5043]*y_cur[IDX_OI] + k[5044]*y_cur[IDX_OI] + - k[5048]*y_cur[IDX_SI] + k[5049]*y_cur[IDX_SiI] + - k[5136]*y_cur[IDX_H2I] - k[5158]*y_cur[IDX_HI] + - k[5257]*y_cur[IDX_NI] + k[5259]*y_cur[IDX_NI] + - k[5259]*y_cur[IDX_NI] + k[5793] + k[6097]; - data[jistart + 11375] = 0.0 + k[923]*y_cur[IDX_eM] + - k[925]*y_cur[IDX_eM] + k[925]*y_cur[IDX_eM] + - k[2043]*y_cur[IDX_C2H3I] + k[2049]*y_cur[IDX_C2HI] + - k[2061]*y_cur[IDX_CH2CCHI] + k[2075]*y_cur[IDX_CNI] + - k[2086]*y_cur[IDX_NH2I] + k[2090]*y_cur[IDX_OI] + - k[2094]*y_cur[IDX_PI] + k[2098]*y_cur[IDX_SiI] - - k[2837]*y_cur[IDX_HI] + k[3454]*y_cur[IDX_NI] + - k[4698]*y_cur[IDX_HM] + k[6096] + k[6321]*y_cur[IDX_GRAINM] + - k[6323]*y_cur[IDX_GRAINM] + k[6323]*y_cur[IDX_GRAINM]; - data[jistart + 11376] = 0.0 + k[2430]*y_cur[IDX_H2I]; - data[jistart + 11377] = 0.0 + k[927]*y_cur[IDX_eM] + - k[1895]*y_cur[IDX_CI] + k[6765]*y_cur[IDX_GRAINM]; - data[jistart + 11378] = 0.0 + k[363]*y_cur[IDX_HII] + - k[1358]*y_cur[IDX_CII] + k[3179]*y_cur[IDX_HeII]; - data[jistart + 11379] = 0.0 + k[930]*y_cur[IDX_eM] + - k[3455]*y_cur[IDX_NI] + k[6749]*y_cur[IDX_GRAINM]; - data[jistart + 11380] = 0.0 + k[931]*y_cur[IDX_eM] + - k[1896]*y_cur[IDX_CI] + k[6834]*y_cur[IDX_GRAINM]; - data[jistart + 11381] = 0.0 + k[364]*y_cur[IDX_HII] + - k[3182]*y_cur[IDX_HeII]; - data[jistart + 11382] = 0.0 + k[933]*y_cur[IDX_eM] + - k[1897]*y_cur[IDX_CI] + k[6867]*y_cur[IDX_GRAINM]; - data[jistart + 11383] = 0.0 + k[365]*y_cur[IDX_HII] + - k[1509]*y_cur[IDX_C2H2II] + k[1781]*y_cur[IDX_C3H2II] + - k[1812]*y_cur[IDX_C3H4II] + k[1813]*y_cur[IDX_C3H4II] + - k[2105]*y_cur[IDX_C4HII] + k[2106]*y_cur[IDX_C4H2II] + - k[3185]*y_cur[IDX_HeII] + k[3187]*y_cur[IDX_HeII] + - k[4896]*y_cur[IDX_C2HI] + k[4897]*y_cur[IDX_C2HI] + - k[4952]*y_cur[IDX_CI] + k[5051]*y_cur[IDX_C4HI] + - k[5068]*y_cur[IDX_CHI] + k[5110]*y_cur[IDX_CNI] + k[5802] + k[6106]; - data[jistart + 11384] = 0.0 + k[1377]*y_cur[IDX_CII] + - k[2118]*y_cur[IDX_CH3COCH3II] + k[2119]*y_cur[IDX_CH3COCH3II] + - k[3662]*y_cur[IDX_O2II] + k[3663]*y_cur[IDX_O2II] + - k[4870]*y_cur[IDX_C2I] + k[4870]*y_cur[IDX_C2I] + - k[4954]*y_cur[IDX_CI] + k[5054]*y_cur[IDX_C4HI] + - k[5072]*y_cur[IDX_CHI]; - data[jistart + 11385] = 0.0 + k[366]*y_cur[IDX_HII]; - data[jistart + 11386] = 0.0 + k[937]*y_cur[IDX_eM] + - k[937]*y_cur[IDX_eM] + k[6547]*y_cur[IDX_GRAINM] + - k[6547]*y_cur[IDX_GRAINM]; - data[jistart + 11387] = 0.0 + k[939]*y_cur[IDX_eM] + - k[940]*y_cur[IDX_eM] + k[941]*y_cur[IDX_eM] + k[942]*y_cur[IDX_eM] + - k[6561]*y_cur[IDX_GRAINM] + k[6562]*y_cur[IDX_GRAINM] + - k[6563]*y_cur[IDX_GRAINM] + k[6564]*y_cur[IDX_GRAINM]; - data[jistart + 11388] = 0.0 + k[367]*y_cur[IDX_HII]; - data[jistart + 11389] = 0.0 + k[944]*y_cur[IDX_eM] + - k[2431]*y_cur[IDX_H2I] + k[6484]*y_cur[IDX_GRAINM]; - data[jistart + 11390] = 0.0 + k[946]*y_cur[IDX_eM] + - k[6502]*y_cur[IDX_GRAINM]; - data[jistart + 11391] = 0.0 + k[948]*y_cur[IDX_eM] + - k[6518]*y_cur[IDX_GRAINM]; - data[jistart + 11392] = 0.0 + k[368]*y_cur[IDX_HII]; - data[jistart + 11393] = 0.0 + k[2118]*y_cur[IDX_CH3CHCH2I] + - k[2119]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 11394] = 0.0 + k[953]*y_cur[IDX_eM] + - k[6693]*y_cur[IDX_GRAINM]; - data[jistart + 11395] = 0.0 + k[1285]*y_cur[IDX_eM] + - k[1286]*y_cur[IDX_eM] + k[1287]*y_cur[IDX_eM] + - k[6712]*y_cur[IDX_GRAINM] + k[6713]*y_cur[IDX_GRAINM] + - k[6714]*y_cur[IDX_GRAINM]; - data[jistart + 11396] = 0.0 + k[1290]*y_cur[IDX_eM] + - k[1292]*y_cur[IDX_eM] + k[1293]*y_cur[IDX_eM] + - k[1294]*y_cur[IDX_eM] + k[1296]*y_cur[IDX_eM] + - k[6731]*y_cur[IDX_GRAINM] + k[6733]*y_cur[IDX_GRAINM] + - k[6734]*y_cur[IDX_GRAINM] + k[6735]*y_cur[IDX_GRAINM] + - k[6737]*y_cur[IDX_GRAINM]; - data[jistart + 11397] = 0.0 + k[971]*y_cur[IDX_eM] + - k[6406]*y_cur[IDX_GRAINM]; - data[jistart + 11398] = 0.0 + k[5632]*y_cur[IDX_HeII]; - data[jistart + 11399] = 0.0 + k[369]*y_cur[IDX_HII] + - k[3195]*y_cur[IDX_HeII]; - data[jistart + 11400] = 0.0 + k[958]*y_cur[IDX_eM] + - k[6604]*y_cur[IDX_GRAINM]; - data[jistart + 11401] = 0.0 + k[370]*y_cur[IDX_HII] + - k[3336]*y_cur[IDX_NII] + k[3338]*y_cur[IDX_NII] + - k[3339]*y_cur[IDX_NII] + k[3665]*y_cur[IDX_O2II] + - k[5073]*y_cur[IDX_CHI] + k[5817] + k[5818] + k[6121] + k[6122] + - k[6123]; - data[jistart + 11402] = 0.0 + k[960]*y_cur[IDX_eM] + - k[961]*y_cur[IDX_eM] + k[961]*y_cur[IDX_eM] + - k[6428]*y_cur[IDX_GRAINM] + k[6429]*y_cur[IDX_GRAINM] + - k[6429]*y_cur[IDX_GRAINM]; - data[jistart + 11403] = 0.0 + k[963]*y_cur[IDX_eM] + - k[965]*y_cur[IDX_eM] + k[966]*y_cur[IDX_eM] + k[967]*y_cur[IDX_eM] + - k[6440]*y_cur[IDX_GRAINM] + k[6442]*y_cur[IDX_GRAINM] + - k[6443]*y_cur[IDX_GRAINM] + k[6444]*y_cur[IDX_GRAINM]; - data[jistart + 11404] = 0.0 + k[371]*y_cur[IDX_HII] + - k[1384]*y_cur[IDX_CII] + k[1940]*y_cur[IDX_CHII] + - k[1942]*y_cur[IDX_CHII] + k[1977]*y_cur[IDX_CH2II] + - k[2148]*y_cur[IDX_C2II] + k[2150]*y_cur[IDX_C2II] + - k[2152]*y_cur[IDX_C2HII] + k[2155]*y_cur[IDX_C2H2II] + - k[2159]*y_cur[IDX_C3II] + k[2167]*y_cur[IDX_C4II] + - k[2169]*y_cur[IDX_C4H2II] + k[2179]*y_cur[IDX_C5II] + - k[2181]*y_cur[IDX_C5H2II] + k[2184]*y_cur[IDX_C6II] + - k[2186]*y_cur[IDX_C6H2II] + k[2189]*y_cur[IDX_COII] + - k[2193]*y_cur[IDX_H2COII] + k[2205]*y_cur[IDX_N2II] + - k[2208]*y_cur[IDX_O2II] + k[2213]*y_cur[IDX_PHII] + - k[2215]*y_cur[IDX_SII] + k[2216]*y_cur[IDX_SII] + - k[2378]*y_cur[IDX_H2II] + k[2379]*y_cur[IDX_H2II] + - k[3198]*y_cur[IDX_HeII] + k[3200]*y_cur[IDX_HeII] + - k[3340]*y_cur[IDX_NII] + k[3341]*y_cur[IDX_NII] + - k[3342]*y_cur[IDX_NII] + k[3342]*y_cur[IDX_NII] + - k[4871]*y_cur[IDX_C2I] + k[5074]*y_cur[IDX_CHI] - - k[5159]*y_cur[IDX_HI] + k[6128] + k[6130]; - data[jistart + 11405] = 0.0 + k[968]*y_cur[IDX_eM] + - k[968]*y_cur[IDX_eM] + k[969]*y_cur[IDX_eM] + - k[2134]*y_cur[IDX_C2H2I] + k[2432]*y_cur[IDX_H2I] - - k[2839]*y_cur[IDX_HI] + k[6126] + k[6327]*y_cur[IDX_GRAINM] + - k[6327]*y_cur[IDX_GRAINM] + k[6328]*y_cur[IDX_GRAINM]; - data[jistart + 11406] = 0.0 + k[972]*y_cur[IDX_eM] + - k[974]*y_cur[IDX_eM] + k[974]*y_cur[IDX_eM] + k[975]*y_cur[IDX_eM] + - k[2233]*y_cur[IDX_MgI] + k[2237]*y_cur[IDX_SiI] - - k[2840]*y_cur[IDX_HI] + k[6332]*y_cur[IDX_GRAINM] + - k[6334]*y_cur[IDX_GRAINM] + k[6334]*y_cur[IDX_GRAINM] + - k[6335]*y_cur[IDX_GRAINM]; - data[jistart + 11407] = 0.0 + k[1467]*y_cur[IDX_C2HII] + - k[1944]*y_cur[IDX_CHII] + k[1945]*y_cur[IDX_CHII] + - k[2075]*y_cur[IDX_CH3II] + k[2277]*y_cur[IDX_C2H2II] + - k[2381]*y_cur[IDX_H2II] + k[5104]*y_cur[IDX_C2H2I] + - k[5106]*y_cur[IDX_C2H4I] + k[5107]*y_cur[IDX_C6H2I] + - k[5108]*y_cur[IDX_C8H2I] + k[5109]*y_cur[IDX_CH2CCH2I] + - k[5110]*y_cur[IDX_CH3CCHI] + k[5115]*y_cur[IDX_C4H2I] + - k[5116]*y_cur[IDX_HCNI] + k[5118]*y_cur[IDX_HNCI] + - k[5138]*y_cur[IDX_H2I] + k[5303]*y_cur[IDX_NH3I] + + k[4639]*y_cur[IDX_HCOII] + k[4640]*y_cur[IDX_HCOII] + + k[4641]*y_cur[IDX_HeII] + k[4642]*y_cur[IDX_MgII] + + k[4643]*y_cur[IDX_NII] + k[4644]*y_cur[IDX_N2HII] + + k[4645]*y_cur[IDX_NH3II] + k[4646]*y_cur[IDX_NH4II] + + k[4647]*y_cur[IDX_NOII] + k[4648]*y_cur[IDX_NaII] + + k[4649]*y_cur[IDX_OII] + k[4650]*y_cur[IDX_SII] + + k[4651]*y_cur[IDX_SOII] + k[4652]*y_cur[IDX_SiII] + + k[4653]*y_cur[IDX_SiOII] + k[4654]*y_cur[IDX_SiOHII] + + k[4655]*y_cur[IDX_SiSII] + k[5777] + k[6074]; + data[jistart + 15040] = 0.0 - k[443]*y_cur[IDX_CHI] - k[2380]*y_cur[IDX_CHI]; + data[jistart + 15041] = 0.0 - k[5098]*y_cur[IDX_CHI]; + data[jistart + 15042] = 0.0 - k[294]*y_cur[IDX_CHI] - k[2259]*y_cur[IDX_CHI]; + data[jistart + 15043] = 0.0 + k[4655]*y_cur[IDX_CHM]; + data[jistart + 15044] = 0.0 - k[289]*y_cur[IDX_CHI] + k[2001]*y_cur[IDX_CH2I] - + k[2245]*y_cur[IDX_CHI]; + data[jistart + 15045] = 0.0 + k[1366]*y_cur[IDX_CII] + k[3865]*y_cur[IDX_SiII] - + k[5068]*y_cur[IDX_CHI]; + data[jistart + 15046] = 0.0 + k[976]*y_cur[IDX_eM] - k[2244]*y_cur[IDX_CHI] + + k[6336]*y_cur[IDX_GRAINM]; + data[jistart + 15047] = 0.0 + k[1062]*y_cur[IDX_eM] + k[4636]*y_cur[IDX_CHM] + + k[6679]*y_cur[IDX_GRAINM]; + data[jistart + 15048] = 0.0 - k[64]*y_cur[IDX_CHI]; + data[jistart + 15049] = 0.0 + k[4966]*y_cur[IDX_CI]; + data[jistart + 15050] = 0.0 - k[2]*y_cur[IDX_CHI] + k[84]*y_cur[IDX_HI]; + data[jistart + 15051] = 0.0 - k[62]*y_cur[IDX_CHI]; + data[jistart + 15052] = 0.0 + k[1381]*y_cur[IDX_CII] - k[5073]*y_cur[IDX_CHI]; + data[jistart + 15053] = 0.0 + k[68]*y_cur[IDX_CI] - k[71]*y_cur[IDX_CHI]; + data[jistart + 15054] = 0.0 + k[3234]*y_cur[IDX_HeII]; + data[jistart + 15055] = 0.0 + k[1035]*y_cur[IDX_eM] - k[2248]*y_cur[IDX_CHI] + + k[6415]*y_cur[IDX_GRAINM]; + data[jistart + 15056] = 0.0 - k[2268]*y_cur[IDX_CHI] + k[4653]*y_cur[IDX_CHM]; + data[jistart + 15057] = 0.0 + k[7074] + k[7256] + k[7438]; + data[jistart + 15058] = 0.0 + k[4654]*y_cur[IDX_CHM]; + data[jistart + 15059] = 0.0 + k[4971]*y_cur[IDX_CI]; + data[jistart + 15060] = 0.0 + k[3108]*y_cur[IDX_HeII]; + data[jistart + 15061] = 0.0 + k[741]*y_cur[IDX_eM] - k[2240]*y_cur[IDX_CHI] - + k[2241]*y_cur[IDX_CHI] + k[6355]*y_cur[IDX_GRAINM]; + data[jistart + 15062] = 0.0 + k[909]*y_cur[IDX_eM] + k[1984]*y_cur[IDX_H2SI] + + k[1989]*y_cur[IDX_NH3I] + k[6077] + k[6318]*y_cur[IDX_GRAINM]; + data[jistart + 15063] = 0.0 - k[297]*y_cur[IDX_CHI] - k[2264]*y_cur[IDX_CHI]; + data[jistart + 15064] = 0.0 - k[291]*y_cur[IDX_CHI] - k[2247]*y_cur[IDX_CHI]; + data[jistart + 15065] = 0.0 + k[250]*y_cur[IDX_FeI] + k[251]*y_cur[IDX_HCOI] + + k[252]*y_cur[IDX_MgI] + k[253]*y_cur[IDX_NH3I] + + k[254]*y_cur[IDX_NOI] + k[255]*y_cur[IDX_NaI] + k[256]*y_cur[IDX_SI] + + k[257]*y_cur[IDX_SiI] - k[1943]*y_cur[IDX_CHI]; + data[jistart + 15066] = 0.0 - k[5075]*y_cur[IDX_CHI]; + data[jistart + 15067] = 0.0 - k[296]*y_cur[IDX_CHI] - k[2262]*y_cur[IDX_CHI]; + data[jistart + 15068] = 0.0 + k[4630]*y_cur[IDX_CHM]; + data[jistart + 15069] = 0.0 + k[250]*y_cur[IDX_CHII]; + data[jistart + 15070] = 0.0 + k[4642]*y_cur[IDX_CHM]; + data[jistart + 15071] = 0.0 + k[4648]*y_cur[IDX_CHM]; + data[jistart + 15072] = 0.0 + k[252]*y_cur[IDX_CHII]; + data[jistart + 15073] = 0.0 + k[255]*y_cur[IDX_CHII]; + data[jistart + 15074] = 0.0 + k[8576]*y_cur[IDX_GHI]; + data[jistart + 15075] = 0.0 + k[4973]*y_cur[IDX_CI]; + data[jistart + 15076] = 0.0 - k[5102]*y_cur[IDX_CHI] - k[5103]*y_cur[IDX_CHI]; + data[jistart + 15077] = 0.0 + k[762]*y_cur[IDX_eM] + k[6386]*y_cur[IDX_GRAINM]; + data[jistart + 15078] = 0.0 + k[4625]*y_cur[IDX_CHM]; + data[jistart + 15079] = 0.0 - k[2257]*y_cur[IDX_CHI] + k[4644]*y_cur[IDX_CHM]; + data[jistart + 15080] = 0.0 + k[4651]*y_cur[IDX_CHM]; + data[jistart + 15081] = 0.0 + k[910]*y_cur[IDX_eM] + k[4627]*y_cur[IDX_CHM] + + k[6470]*y_cur[IDX_GRAINM]; + data[jistart + 15082] = 0.0 + k[4633]*y_cur[IDX_CHM]; + data[jistart + 15083] = 0.0 - k[292]*y_cur[IDX_CHI] - k[2256]*y_cur[IDX_CHI] + + k[4643]*y_cur[IDX_CHM]; + data[jistart + 15084] = 0.0 - k[290]*y_cur[IDX_CHI] - k[2246]*y_cur[IDX_CHI] + + k[4632]*y_cur[IDX_CHM]; + data[jistart + 15085] = 0.0 + k[4647]*y_cur[IDX_CHM]; + data[jistart + 15086] = 0.0 - k[295]*y_cur[IDX_CHI] - k[2261]*y_cur[IDX_CHI] + + k[3634]*y_cur[IDX_C2HI] + k[3645]*y_cur[IDX_HCNI] + + k[4649]*y_cur[IDX_CHM]; + data[jistart + 15087] = 0.0 + k[3702]*y_cur[IDX_OI] + k[4624]*y_cur[IDX_CHM]; + data[jistart + 15088] = 0.0 - k[2251]*y_cur[IDX_CHI] - k[2252]*y_cur[IDX_CHI] + + k[4637]*y_cur[IDX_CHM] + k[4638]*y_cur[IDX_CHM]; + data[jistart + 15089] = 0.0 + k[2001]*y_cur[IDX_COII] + k[4945]*y_cur[IDX_CI] + + k[4945]*y_cur[IDX_CI] + k[4995]*y_cur[IDX_CH2I] + + k[4995]*y_cur[IDX_CH2I] + k[4997]*y_cur[IDX_CNI] + + k[5015]*y_cur[IDX_OI] + k[5017]*y_cur[IDX_OHI] + + k[5156]*y_cur[IDX_HI] + k[5255]*y_cur[IDX_NI] + k[5779] + k[6079]; + data[jistart + 15090] = 0.0 - k[2260]*y_cur[IDX_CHI] + k[4645]*y_cur[IDX_CHM]; + data[jistart + 15091] = 0.0 + k[1302]*y_cur[IDX_CII] - k[5065]*y_cur[IDX_CHI] - + k[5066]*y_cur[IDX_CHI]; + data[jistart + 15092] = 0.0 + k[4646]*y_cur[IDX_CHM]; + data[jistart + 15093] = 0.0 - k[5079]*y_cur[IDX_CHI]; + data[jistart + 15094] = 0.0 - k[5086]*y_cur[IDX_CHI] - k[5087]*y_cur[IDX_CHI] - + k[5088]*y_cur[IDX_CHI] - k[5089]*y_cur[IDX_CHI] - + k[5090]*y_cur[IDX_CHI] - k[5091]*y_cur[IDX_CHI] - + k[5092]*y_cur[IDX_CHI] - k[5093]*y_cur[IDX_CHI]; + data[jistart + 15095] = 0.0 - k[2266]*y_cur[IDX_CHI] + k[3865]*y_cur[IDX_CH3CCHI] + + k[4652]*y_cur[IDX_CHM]; + data[jistart + 15096] = 0.0 + k[1984]*y_cur[IDX_CH2II]; + data[jistart + 15097] = 0.0 - k[2265]*y_cur[IDX_CHI] + k[4650]*y_cur[IDX_CHM]; + data[jistart + 15098] = 0.0 + k[257]*y_cur[IDX_CHII]; + data[jistart + 15099] = 0.0 + k[753]*y_cur[IDX_eM] + k[754]*y_cur[IDX_eM] + + k[4623]*y_cur[IDX_CHM] + k[6368]*y_cur[IDX_GRAINM] + + k[6369]*y_cur[IDX_GRAINM]; + data[jistart + 15100] = 0.0 + k[254]*y_cur[IDX_CHII] - k[5083]*y_cur[IDX_CHI] - + k[5084]*y_cur[IDX_CHI] - k[5085]*y_cur[IDX_CHI]; + data[jistart + 15101] = 0.0 + k[251]*y_cur[IDX_CHII] + k[4963]*y_cur[IDX_CI] - + k[5077]*y_cur[IDX_CHI]; + data[jistart + 15102] = 0.0 - k[5074]*y_cur[IDX_CHI] + k[6130]; + data[jistart + 15103] = 0.0 + k[3088]*y_cur[IDX_HeII] + k[3634]*y_cur[IDX_OII] + + k[5352]*y_cur[IDX_OI]; + data[jistart + 15104] = 0.0 + k[1391]*y_cur[IDX_CII] - k[5076]*y_cur[IDX_CHI]; + data[jistart + 15105] = 0.0 + k[3246]*y_cur[IDX_HeII] + k[3645]*y_cur[IDX_OII]; + data[jistart + 15106] = 0.0 - k[2]*y_cur[IDX_CM] - k[62]*y_cur[IDX_OM] - k[63]*y_cur[IDX_OI] + - k[64]*y_cur[IDX_OHM] - k[71]*y_cur[IDX_HM] - k[134]*y_cur[IDX_H2I] + - k[141]*y_cur[IDX_HI] - k[170]*y_cur[IDX_CII] - + k[287]*y_cur[IDX_C2II] - k[288]*y_cur[IDX_CNII] - + k[289]*y_cur[IDX_COII] - k[290]*y_cur[IDX_H2COII] - + k[291]*y_cur[IDX_H2OII] - k[292]*y_cur[IDX_NII] - + k[293]*y_cur[IDX_N2II] - k[294]*y_cur[IDX_NH2II] - + k[295]*y_cur[IDX_OII] - k[296]*y_cur[IDX_O2II] - + k[297]*y_cur[IDX_OHII] - k[372]*y_cur[IDX_HII] - + k[443]*y_cur[IDX_H2II] - k[515]*y_cur[IDX_HeII] - + k[1385]*y_cur[IDX_CII] - k[1943]*y_cur[IDX_CHII] - + k[2239]*y_cur[IDX_C2II] - k[2240]*y_cur[IDX_C2HII] - + k[2241]*y_cur[IDX_C2HII] - k[2242]*y_cur[IDX_C2H2II] - + k[2243]*y_cur[IDX_CH3II] - k[2244]*y_cur[IDX_CH5II] - + k[2245]*y_cur[IDX_COII] - k[2246]*y_cur[IDX_H2COII] - + k[2247]*y_cur[IDX_H2OII] - k[2248]*y_cur[IDX_H3COII] - + k[2249]*y_cur[IDX_H3OII] - k[2250]*y_cur[IDX_HCNII] - + k[2251]*y_cur[IDX_HCNHII] - k[2252]*y_cur[IDX_HCNHII] - + k[2253]*y_cur[IDX_HCOII] - k[2254]*y_cur[IDX_HNOII] - + k[2255]*y_cur[IDX_HSII] - k[2256]*y_cur[IDX_NII] - + k[2257]*y_cur[IDX_N2HII] - k[2258]*y_cur[IDX_NHII] - + k[2259]*y_cur[IDX_NH2II] - k[2260]*y_cur[IDX_NH3II] - + k[2261]*y_cur[IDX_OII] - k[2262]*y_cur[IDX_O2II] - + k[2263]*y_cur[IDX_O2HII] - k[2264]*y_cur[IDX_OHII] - + k[2265]*y_cur[IDX_SII] - k[2266]*y_cur[IDX_SiII] - + k[2267]*y_cur[IDX_SiHII] - k[2268]*y_cur[IDX_SiOII] - + k[2380]*y_cur[IDX_H2II] - k[2670]*y_cur[IDX_H3II] - + k[3202]*y_cur[IDX_HeII] - k[4955]*y_cur[IDX_CI] - + k[5063]*y_cur[IDX_C2H2I] - k[5064]*y_cur[IDX_C2H2I] - + k[5065]*y_cur[IDX_C2H4I] - k[5066]*y_cur[IDX_C2H4I] - + k[5067]*y_cur[IDX_CH2CCH2I] - k[5068]*y_cur[IDX_CH3CCHI] - + k[5069]*y_cur[IDX_C2H6I] - k[5070]*y_cur[IDX_C2H6I] - + k[5071]*y_cur[IDX_CH3CHCH2I] - k[5072]*y_cur[IDX_CH3CHCH2I] - + k[5073]*y_cur[IDX_CH3OHI] - k[5074]*y_cur[IDX_CH4I] - + k[5075]*y_cur[IDX_CO2I] - k[5076]*y_cur[IDX_H2COI] - + k[5077]*y_cur[IDX_HCOI] - k[5078]*y_cur[IDX_HNOI] - + k[5079]*y_cur[IDX_N2I] - k[5080]*y_cur[IDX_NI] - + k[5081]*y_cur[IDX_NI] - k[5082]*y_cur[IDX_NH3I] - + k[5083]*y_cur[IDX_NOI] - k[5084]*y_cur[IDX_NOI] - + k[5085]*y_cur[IDX_NOI] - k[5086]*y_cur[IDX_O2I] - + k[5087]*y_cur[IDX_O2I] - k[5088]*y_cur[IDX_O2I] - + k[5089]*y_cur[IDX_O2I] - k[5090]*y_cur[IDX_O2I] - + k[5091]*y_cur[IDX_O2I] - k[5092]*y_cur[IDX_O2I] - + k[5093]*y_cur[IDX_O2I] - k[5094]*y_cur[IDX_O2HI] - + k[5095]*y_cur[IDX_O2HI] - k[5096]*y_cur[IDX_OI] - + k[5097]*y_cur[IDX_OI] - k[5098]*y_cur[IDX_OCSI] - + k[5099]*y_cur[IDX_OHI] - k[5100]*y_cur[IDX_SI] - + k[5101]*y_cur[IDX_SI] - k[5102]*y_cur[IDX_SOI] - + k[5103]*y_cur[IDX_SOI] - k[5137]*y_cur[IDX_H2I] - + k[5160]*y_cur[IDX_HI] - k[5556]*y_cur[IDX_H2I] - k[5821] - k[6131] - + k[6132] - k[6892]; + data[jistart + 15107] = 0.0 + k[256]*y_cur[IDX_CHII] - k[5100]*y_cur[IDX_CHI] - + k[5101]*y_cur[IDX_CHI]; + data[jistart + 15108] = 0.0 + k[5153]*y_cur[IDX_HI]; + data[jistart + 15109] = 0.0 + k[4982]*y_cur[IDX_CI] + k[5017]*y_cur[IDX_CH2I] - + k[5099]*y_cur[IDX_CHI]; + data[jistart + 15110] = 0.0 + k[253]*y_cur[IDX_CHII] + k[1989]*y_cur[IDX_CH2II] - + k[5082]*y_cur[IDX_CHI]; + data[jistart + 15111] = 0.0 + k[744]*y_cur[IDX_eM] + k[744]*y_cur[IDX_eM] - + k[2242]*y_cur[IDX_CHI] + k[3689]*y_cur[IDX_OI] + + k[4622]*y_cur[IDX_CHM] + k[6358]*y_cur[IDX_GRAINM] + + k[6358]*y_cur[IDX_GRAINM]; + data[jistart + 15112] = 0.0 + k[924]*y_cur[IDX_eM] + k[925]*y_cur[IDX_eM] - + k[2243]*y_cur[IDX_CHI] + k[4628]*y_cur[IDX_CHM] + + k[6322]*y_cur[IDX_GRAINM] + k[6323]*y_cur[IDX_GRAINM]; + data[jistart + 15113] = 0.0 + k[3076]*y_cur[IDX_HeII] - k[5063]*y_cur[IDX_CHI] - + k[5064]*y_cur[IDX_CHI]; + data[jistart + 15114] = 0.0 + k[4997]*y_cur[IDX_CH2I]; + data[jistart + 15115] = 0.0 + k[8576]*y_cur[IDX_GCI]; + data[jistart + 15116] = 0.0 + k[5795] + k[6099]; + data[jistart + 15117] = 0.0 - k[5080]*y_cur[IDX_CHI] - k[5081]*y_cur[IDX_CHI] + + k[5255]*y_cur[IDX_CH2I]; + data[jistart + 15118] = 0.0 - k[2249]*y_cur[IDX_CHI] + k[4635]*y_cur[IDX_CHM]; + data[jistart + 15119] = 0.0 - k[63]*y_cur[IDX_CHI] + k[3689]*y_cur[IDX_C2H2II] + + k[3702]*y_cur[IDX_C4H2II] + k[5015]*y_cur[IDX_CH2I] - + k[5096]*y_cur[IDX_CHI] - k[5097]*y_cur[IDX_CHI] + + k[5352]*y_cur[IDX_C2HI] + k[5410]*y_cur[IDX_HCSiI]; + data[jistart + 15120] = 0.0 - k[515]*y_cur[IDX_CHI] + k[3076]*y_cur[IDX_C2H2I] + + k[3088]*y_cur[IDX_C2HI] + k[3108]*y_cur[IDX_C4H3I] + + k[3130]*y_cur[IDX_C6H6I] - k[3202]*y_cur[IDX_CHI] + + k[3232]*y_cur[IDX_HC2PI] + k[3234]*y_cur[IDX_HC3NI] + + k[3246]*y_cur[IDX_HCNI] + k[3253]*y_cur[IDX_HCPI] + + k[3257]*y_cur[IDX_HCSiI] + k[3319]*y_cur[IDX_SiCH2I] + + k[4641]*y_cur[IDX_CHM]; + data[jistart + 15121] = 0.0 - k[170]*y_cur[IDX_CHI] + k[1302]*y_cur[IDX_C2H4I] + + k[1344]*y_cur[IDX_CH2CCH2I] + k[1356]*y_cur[IDX_CH3C4HI] + + k[1360]*y_cur[IDX_CH3C6HI] + k[1366]*y_cur[IDX_CH3CCHI] + + k[1370]*y_cur[IDX_C2H6I] + k[1376]*y_cur[IDX_CH3CHCH2I] + + k[1378]*y_cur[IDX_CH3CHOI] + k[1381]*y_cur[IDX_CH3OHI] - + k[1385]*y_cur[IDX_CHI] + k[1391]*y_cur[IDX_H2COI] + + k[1396]*y_cur[IDX_HC2PI] + k[3018]*y_cur[IDX_HNC3I] + + k[4621]*y_cur[IDX_CHM]; + data[jistart + 15122] = 0.0 - k[372]*y_cur[IDX_CHI] + k[4631]*y_cur[IDX_CHM]; + data[jistart + 15123] = 0.0 + k[68]*y_cur[IDX_HM] + k[4945]*y_cur[IDX_CH2I] + + k[4945]*y_cur[IDX_CH2I] - k[4955]*y_cur[IDX_CHI] + + k[4963]*y_cur[IDX_HCOI] + k[4966]*y_cur[IDX_HSI] + + k[4971]*y_cur[IDX_NH2I] + k[4973]*y_cur[IDX_NHI] + + k[4982]*y_cur[IDX_OHI] + k[5134]*y_cur[IDX_H2I] + + k[5572]*y_cur[IDX_HI]; + data[jistart + 15124] = 0.0 - k[2253]*y_cur[IDX_CHI] + k[4639]*y_cur[IDX_CHM] + + k[4640]*y_cur[IDX_CHM]; + data[jistart + 15125] = 0.0 - k[2670]*y_cur[IDX_CHI] + k[4634]*y_cur[IDX_CHM]; + data[jistart + 15126] = 0.0 + k[6318]*y_cur[IDX_CH2II] + k[6322]*y_cur[IDX_CH3II] + + k[6323]*y_cur[IDX_CH3II] + k[6336]*y_cur[IDX_CH5II] + + k[6355]*y_cur[IDX_C2HII] + k[6358]*y_cur[IDX_C2H2II] + + k[6358]*y_cur[IDX_C2H2II] + k[6368]*y_cur[IDX_C2H3II] + + k[6369]*y_cur[IDX_C2H3II] + k[6386]*y_cur[IDX_C2H4II] + + k[6415]*y_cur[IDX_H3COII] + k[6428]*y_cur[IDX_CH3OHII] + + k[6470]*y_cur[IDX_CH2CCHII] + k[6476]*y_cur[IDX_CH2CNII] + + k[6477]*y_cur[IDX_C3H4II] + k[6489]*y_cur[IDX_HC2OII] + + k[6490]*y_cur[IDX_HCSiII] + k[6509]*y_cur[IDX_C3H7II] + + k[6514]*y_cur[IDX_HCNOII] + k[6544]*y_cur[IDX_HCPII] + + k[6554]*y_cur[IDX_HCSII] + k[6646]*y_cur[IDX_C4H5II] + + k[6668]*y_cur[IDX_SiNCHII] + k[6677]*y_cur[IDX_HC2PII] + + k[6679]*y_cur[IDX_HC2SII] + k[6744]*y_cur[IDX_HC4NII] + + k[6745]*y_cur[IDX_H2C4NII] + k[6773]*y_cur[IDX_PC3HII] + + k[6778]*y_cur[IDX_HC3SII] + k[6800]*y_cur[IDX_SiC4HII] + + k[6811]*y_cur[IDX_PC4HII] + k[6819]*y_cur[IDX_HC4SII]; + data[jistart + 15127] = 0.0 - k[134]*y_cur[IDX_CHI] + k[5134]*y_cur[IDX_CI] - + k[5137]*y_cur[IDX_CHI] - k[5556]*y_cur[IDX_CHI]; + data[jistart + 15128] = 0.0 + k[741]*y_cur[IDX_C2HII] + k[744]*y_cur[IDX_C2H2II] + + k[744]*y_cur[IDX_C2H2II] + k[753]*y_cur[IDX_C2H3II] + + k[754]*y_cur[IDX_C2H3II] + k[762]*y_cur[IDX_C2H4II] + + k[799]*y_cur[IDX_C3H4II] + k[812]*y_cur[IDX_C3H7II] + + k[828]*y_cur[IDX_C4H5II] + k[909]*y_cur[IDX_CH2II] + + k[910]*y_cur[IDX_CH2CCHII] + k[917]*y_cur[IDX_CH2CNII] + + k[924]*y_cur[IDX_CH3II] + k[925]*y_cur[IDX_CH3II] + + k[960]*y_cur[IDX_CH3OHII] + k[976]*y_cur[IDX_CH5II] + + k[988]*y_cur[IDX_H2C4NII] + k[1035]*y_cur[IDX_H3COII] + + k[1058]*y_cur[IDX_HC2OII] + k[1060]*y_cur[IDX_HC2PII] + + k[1062]*y_cur[IDX_HC2SII] + k[1071]*y_cur[IDX_HC3SII] + + k[1073]*y_cur[IDX_HC4NII] + k[1075]*y_cur[IDX_HC4SII] + + k[1092]*y_cur[IDX_HCNOII] + k[1106]*y_cur[IDX_HCPII] + + k[1107]*y_cur[IDX_HCSII] + k[1109]*y_cur[IDX_HCSiII] + + k[1191]*y_cur[IDX_PC3HII] + k[1193]*y_cur[IDX_PC4HII] + + k[1240]*y_cur[IDX_SiC4HII] + k[1262]*y_cur[IDX_SiNCHII]; + data[jistart + 15129] = 0.0 + k[84]*y_cur[IDX_CM] - k[141]*y_cur[IDX_CHI] + + k[5153]*y_cur[IDX_C2I] + k[5156]*y_cur[IDX_CH2I] - + k[5160]*y_cur[IDX_CHI] + k[5572]*y_cur[IDX_CI]; + data[jistart + 15130] = 0.0 + k[787]*y_cur[IDX_eM] + k[6675]*y_cur[IDX_GRAINM]; + data[jistart + 15131] = 0.0 + k[817]*y_cur[IDX_eM] + k[6776]*y_cur[IDX_GRAINM]; + data[jistart + 15132] = 0.0 + k[1173]*y_cur[IDX_eM] + k[3748]*y_cur[IDX_OI] + + k[6581]*y_cur[IDX_GRAINM]; + data[jistart + 15133] = 0.0 + k[1221]*y_cur[IDX_eM] + k[6750]*y_cur[IDX_GRAINM]; + data[jistart + 15134] = 0.0 + k[1139]*y_cur[IDX_eM] + k[6758]*y_cur[IDX_GRAINM]; + data[jistart + 15135] = 0.0 + k[5874] + k[6208]; + data[jistart + 15136] = 0.0 + k[3224]*y_cur[IDX_HeII]; + data[jistart + 15137] = 0.0 + k[3302]*y_cur[IDX_HeII] + k[4984]*y_cur[IDX_CI] + + k[5199]*y_cur[IDX_HI] + k[5289]*y_cur[IDX_NI] + + k[5437]*y_cur[IDX_OI] + k[5912] + k[5912] + k[6254] + k[6254]; + data[jistart + 15138] = 0.0 + k[1219]*y_cur[IDX_eM] + k[1219]*y_cur[IDX_eM] + + k[6752]*y_cur[IDX_GRAINM] + k[6752]*y_cur[IDX_GRAINM]; + data[jistart + 15139] = 0.0 + k[1316]*y_cur[IDX_CII]; + data[jistart + 15140] = 0.0 + k[1179]*y_cur[IDX_eM] + k[6708]*y_cur[IDX_GRAINM]; + data[jistart + 15141] = 0.0 - k[5485]*y_cur[IDX_SI]; + data[jistart + 15142] = 0.0 + k[7114] + k[7296] + k[7478]; + data[jistart + 15143] = 0.0 + k[5268]*y_cur[IDX_NI]; + data[jistart + 15144] = 0.0 + k[3289]*y_cur[IDX_HeII] + k[4977]*y_cur[IDX_CI] + + k[5189]*y_cur[IDX_HI] + k[5280]*y_cur[IDX_NI] + + k[5425]*y_cur[IDX_OI] + k[5893] + k[6230]; + data[jistart + 15145] = 0.0 - k[3883]*y_cur[IDX_SI]; + data[jistart + 15146] = 0.0 - k[5489]*y_cur[IDX_SI]; + data[jistart + 15147] = 0.0 + k[705]*y_cur[IDX_SII]; + data[jistart + 15148] = 0.0 - k[3841]*y_cur[IDX_SI]; + data[jistart + 15149] = 0.0 + k[725]*y_cur[IDX_SII]; + data[jistart + 15150] = 0.0 + k[1107]*y_cur[IDX_eM] + k[3739]*y_cur[IDX_OI] + + k[6554]*y_cur[IDX_GRAINM]; + data[jistart + 15151] = 0.0 + k[985]*y_cur[IDX_eM] + k[3732]*y_cur[IDX_OI] + + k[6535]*y_cur[IDX_GRAINM]; + data[jistart + 15152] = 0.0 + k[1048]*y_cur[IDX_eM] - k[3839]*y_cur[IDX_SI] + + k[6453]*y_cur[IDX_GRAINM]; + data[jistart + 15153] = 0.0 - k[3840]*y_cur[IDX_SI]; + data[jistart + 15154] = 0.0 - k[3050]*y_cur[IDX_SI]; + data[jistart + 15155] = 0.0 - k[305]*y_cur[IDX_SI]; + data[jistart + 15156] = 0.0 - k[572]*y_cur[IDX_SI]; + data[jistart + 15157] = 0.0 + k[4837]*y_cur[IDX_SM]; + data[jistart + 15158] = 0.0 - k[496]*y_cur[IDX_SI] - k[2860]*y_cur[IDX_SI]; + data[jistart + 15159] = 0.0 + k[702]*y_cur[IDX_SII]; + data[jistart + 15160] = 0.0 - k[207]*y_cur[IDX_SI] - k[1456]*y_cur[IDX_SI]; + data[jistart + 15161] = 0.0 + k[4840]*y_cur[IDX_SM]; + data[jistart + 15162] = 0.0 - k[710]*y_cur[IDX_SI] + k[1138]*y_cur[IDX_eM] + + k[2255]*y_cur[IDX_CHI] + k[2554]*y_cur[IDX_H2OI] + + k[2879]*y_cur[IDX_HCNI] + k[3043]*y_cur[IDX_HNCI] + + k[3054]*y_cur[IDX_H2SI] + k[3589]*y_cur[IDX_NH3I] + k[6206] + + k[6445]*y_cur[IDX_GRAINM]; + data[jistart + 15163] = 0.0 - k[579]*y_cur[IDX_SI] - k[3505]*y_cur[IDX_SI] - + k[3506]*y_cur[IDX_SI]; + data[jistart + 15164] = 0.0 + k[4791]*y_cur[IDX_SII]; + data[jistart + 15165] = 0.0 + k[4650]*y_cur[IDX_SII]; + data[jistart + 15166] = 0.0 + k[3296]*y_cur[IDX_HeII] + k[5430]*y_cur[IDX_OI] + k[5903] + + k[6241]; + data[jistart + 15167] = 0.0 - k[584]*y_cur[IDX_SI] + k[3518]*y_cur[IDX_H2SI] - + k[3526]*y_cur[IDX_SI] - k[3527]*y_cur[IDX_SI]; + data[jistart + 15168] = 0.0 + k[4832]*y_cur[IDX_CII] + k[4833]*y_cur[IDX_C2H2II] + + k[4834]*y_cur[IDX_C2H3II] + k[4835]*y_cur[IDX_C4H2II] + + k[4836]*y_cur[IDX_C4H3II] + k[4837]*y_cur[IDX_C4SII] + + k[4838]*y_cur[IDX_CH2CCHII] + k[4839]*y_cur[IDX_CH3II] + + k[4840]*y_cur[IDX_CNCII] + k[4841]*y_cur[IDX_FeII] + + k[4842]*y_cur[IDX_HII] + k[4843]*y_cur[IDX_H2COII] + + k[4844]*y_cur[IDX_H2SII] + k[4845]*y_cur[IDX_H3II] + + k[4846]*y_cur[IDX_H3OII] + k[4847]*y_cur[IDX_HC2SII] + + k[4848]*y_cur[IDX_HCNHII] + k[4849]*y_cur[IDX_HCNHII] + + k[4850]*y_cur[IDX_HCOII] + k[4851]*y_cur[IDX_HCOII] + + k[4852]*y_cur[IDX_HeII] + k[4853]*y_cur[IDX_MgII] + + k[4854]*y_cur[IDX_NII] + k[4855]*y_cur[IDX_N2HII] + + k[4856]*y_cur[IDX_NH3II] + k[4857]*y_cur[IDX_NH4II] + + k[4858]*y_cur[IDX_NOII] + k[4859]*y_cur[IDX_NaII] + + k[4860]*y_cur[IDX_OII] + k[4861]*y_cur[IDX_SII] + + k[4861]*y_cur[IDX_SII] + k[4862]*y_cur[IDX_SOII] + + k[4863]*y_cur[IDX_SiII] + k[4864]*y_cur[IDX_SiOII] + + k[4865]*y_cur[IDX_SiOHII] + k[4866]*y_cur[IDX_SiSII] + k[5911] + + k[6252]; + data[jistart + 15169] = 0.0 + k[1269]*y_cur[IDX_eM] + k[4866]*y_cur[IDX_SM] + + k[6710]*y_cur[IDX_GRAINM]; + data[jistart + 15170] = 0.0 + k[4055]*y_cur[IDX_SII]; + data[jistart + 15171] = 0.0 + k[4230]*y_cur[IDX_SII]; + data[jistart + 15172] = 0.0 - k[313]*y_cur[IDX_SI]; + data[jistart + 15173] = 0.0 - k[2235]*y_cur[IDX_SI]; + data[jistart + 15174] = 0.0 + k[4847]*y_cur[IDX_SM]; + data[jistart + 15175] = 0.0 + k[4826]*y_cur[IDX_SII]; + data[jistart + 15176] = 0.0 + k[3985]*y_cur[IDX_SII]; + data[jistart + 15177] = 0.0 + k[4125]*y_cur[IDX_SII]; + data[jistart + 15178] = 0.0 + k[1322]*y_cur[IDX_CII]; + data[jistart + 15179] = 0.0 + k[4405]*y_cur[IDX_SII]; + data[jistart + 15180] = 0.0 + k[4545]*y_cur[IDX_SII]; + data[jistart + 15181] = 0.0 + k[4475]*y_cur[IDX_SII]; + data[jistart + 15182] = 0.0 + k[4615]*y_cur[IDX_SII]; + data[jistart + 15183] = 0.0 + k[3950]*y_cur[IDX_SII]; + data[jistart + 15184] = 0.0 + k[4300]*y_cur[IDX_SII]; + data[jistart + 15185] = 0.0 + k[4335]*y_cur[IDX_SII]; + data[jistart + 15186] = 0.0 + k[4966]*y_cur[IDX_CI] + k[5178]*y_cur[IDX_HI] + + k[5219]*y_cur[IDX_HSI] + k[5219]*y_cur[IDX_HSI] + + k[5272]*y_cur[IDX_NI] + k[5415]*y_cur[IDX_OI] - + k[5488]*y_cur[IDX_SI] + k[5875] + k[6209]; + data[jistart + 15187] = 0.0 + k[3915]*y_cur[IDX_SII]; + data[jistart + 15188] = 0.0 + k[3215]*y_cur[IDX_HeII] + k[4958]*y_cur[IDX_CI] + + k[5263]*y_cur[IDX_NI] + k[5392]*y_cur[IDX_OI] + k[5829] + k[6142]; + data[jistart + 15189] = 0.0 + k[4756]*y_cur[IDX_SII]; + data[jistart + 15190] = 0.0 + k[4580]*y_cur[IDX_SII]; + data[jistart + 15191] = 0.0 + k[4721]*y_cur[IDX_SII]; + data[jistart + 15192] = 0.0 + k[706]*y_cur[IDX_SII] + k[1448]*y_cur[IDX_CII] + + k[3335]*y_cur[IDX_HeII] + k[5935] + k[6288]; + data[jistart + 15193] = 0.0 - k[3835]*y_cur[IDX_SI]; + data[jistart + 15194] = 0.0 + k[4510]*y_cur[IDX_SII]; + data[jistart + 15195] = 0.0 + k[4020]*y_cur[IDX_SII]; + data[jistart + 15196] = 0.0 + k[1309]*y_cur[IDX_CII] + k[3094]*y_cur[IDX_HeII] + k[5715] + + k[5999]; + data[jistart + 15197] = 0.0 + k[4090]*y_cur[IDX_SII]; + data[jistart + 15198] = 0.0 + k[4195]*y_cur[IDX_SII]; + data[jistart + 15199] = 0.0 + k[4370]*y_cur[IDX_SII]; + data[jistart + 15200] = 0.0 + k[4265]*y_cur[IDX_SII]; + data[jistart + 15201] = 0.0 + k[4440]*y_cur[IDX_SII]; + data[jistart + 15202] = 0.0 - k[3842]*y_cur[IDX_SI] + k[4864]*y_cur[IDX_SM]; + data[jistart + 15203] = 0.0 + k[4865]*y_cur[IDX_SM]; + data[jistart + 15204] = 0.0 - k[213]*y_cur[IDX_SI]; + data[jistart + 15205] = 0.0 - k[3834]*y_cur[IDX_SI]; + data[jistart + 15206] = 0.0 - k[1994]*y_cur[IDX_SI]; + data[jistart + 15207] = 0.0 - k[695]*y_cur[IDX_SI] - k[3789]*y_cur[IDX_SI] - + k[3790]*y_cur[IDX_SI]; + data[jistart + 15208] = 0.0 - k[476]*y_cur[IDX_SI] - k[2516]*y_cur[IDX_SI] - + k[2517]*y_cur[IDX_SI]; + data[jistart + 15209] = 0.0 + k[4160]*y_cur[IDX_SII]; + data[jistart + 15210] = 0.0 - k[256]*y_cur[IDX_SI] - k[1973]*y_cur[IDX_SI] - + k[1974]*y_cur[IDX_SI]; + data[jistart + 15211] = 0.0 - k[677]*y_cur[IDX_SI] - k[3667]*y_cur[IDX_SI]; + data[jistart + 15212] = 0.0 + k[4841]*y_cur[IDX_SM]; + data[jistart + 15213] = 0.0 + k[703]*y_cur[IDX_SII]; + data[jistart + 15214] = 0.0 + k[4853]*y_cur[IDX_SM]; + data[jistart + 15215] = 0.0 + k[4859]*y_cur[IDX_SM]; + data[jistart + 15216] = 0.0 + k[538]*y_cur[IDX_SII]; + data[jistart + 15217] = 0.0 + k[643]*y_cur[IDX_SII]; + data[jistart + 15218] = 0.0 - k[5324]*y_cur[IDX_SI] - k[5325]*y_cur[IDX_SI]; + data[jistart + 15219] = 0.0 + k[4685]*y_cur[IDX_SII]; + data[jistart + 15220] = 0.0 + k[1430]*y_cur[IDX_CII] + k[3306]*y_cur[IDX_HeII] + + k[4987]*y_cur[IDX_CI] + k[5201]*y_cur[IDX_HI] + + k[5291]*y_cur[IDX_NI] + k[5439]*y_cur[IDX_OI] - + k[5490]*y_cur[IDX_SI] + k[5915] + k[6257]; + data[jistart + 15221] = 0.0 - k[1679]*y_cur[IDX_SI]; + data[jistart + 15222] = 0.0 - k[3837]*y_cur[IDX_SI] + k[4836]*y_cur[IDX_SM]; + data[jistart + 15223] = 0.0 - k[3376]*y_cur[IDX_SI] + k[4855]*y_cur[IDX_SM]; + data[jistart + 15224] = 0.0 + k[1220]*y_cur[IDX_eM] + k[3843]*y_cur[IDX_C2H2I] + + k[4862]*y_cur[IDX_SM] + k[6620]*y_cur[IDX_GRAINM]; + data[jistart + 15225] = 0.0 - k[3838]*y_cur[IDX_SI] + k[4838]*y_cur[IDX_SM]; + data[jistart + 15226] = 0.0 - k[709]*y_cur[IDX_SI] + k[1020]*y_cur[IDX_eM] + + k[4844]*y_cur[IDX_SM] + k[6447]*y_cur[IDX_GRAINM]; + data[jistart + 15227] = 0.0 + k[4854]*y_cur[IDX_SM]; + data[jistart + 15228] = 0.0 - k[460]*y_cur[IDX_SI] - k[2490]*y_cur[IDX_SI] + + k[4843]*y_cur[IDX_SM]; + data[jistart + 15229] = 0.0 + k[4858]*y_cur[IDX_SM]; + data[jistart + 15230] = 0.0 + k[4860]*y_cur[IDX_SM]; + data[jistart + 15231] = 0.0 + k[704]*y_cur[IDX_SII]; + data[jistart + 15232] = 0.0 - k[3836]*y_cur[IDX_SI] + k[4835]*y_cur[IDX_SM]; + data[jistart + 15233] = 0.0 + k[4848]*y_cur[IDX_SM] + k[4849]*y_cur[IDX_SM]; + data[jistart + 15234] = 0.0 - k[5019]*y_cur[IDX_SI] - k[5020]*y_cur[IDX_SI]; + data[jistart + 15235] = 0.0 + k[3043]*y_cur[IDX_HSII]; + data[jistart + 15236] = 0.0 + k[4856]*y_cur[IDX_SM]; + data[jistart + 15237] = 0.0 + k[4857]*y_cur[IDX_SM]; + data[jistart + 15238] = 0.0 - k[5337]*y_cur[IDX_SI]; + data[jistart + 15239] = 0.0 + k[4863]*y_cur[IDX_SM]; + data[jistart + 15240] = 0.0 + k[3054]*y_cur[IDX_HSII] + k[3518]*y_cur[IDX_NH2II] + k[5842] + + k[6165]; + data[jistart + 15241] = 0.0 + k[503]*y_cur[IDX_HCOI] + k[538]*y_cur[IDX_MgI] + + k[614]*y_cur[IDX_NH3I] + k[629]*y_cur[IDX_NOI] + + k[643]*y_cur[IDX_NaI] + k[702]*y_cur[IDX_CH3CHCH2I] + + k[703]*y_cur[IDX_FeI] + k[704]*y_cur[IDX_C4H2I] + + k[705]*y_cur[IDX_SiCI] + k[706]*y_cur[IDX_SiSI] + + k[724]*y_cur[IDX_SiI] + k[725]*y_cur[IDX_SiHI] + + k[3915]*y_cur[IDX_CM] + k[3950]*y_cur[IDX_C10M] + + k[3985]*y_cur[IDX_C10HM] + k[4020]*y_cur[IDX_C2M] + + k[4055]*y_cur[IDX_C2HM] + k[4090]*y_cur[IDX_C3M] + + k[4125]*y_cur[IDX_C3HM] + k[4160]*y_cur[IDX_C3NM] + + k[4195]*y_cur[IDX_C4M] + k[4230]*y_cur[IDX_C4HM] + + k[4265]*y_cur[IDX_C5M] + k[4300]*y_cur[IDX_C5HM] + + k[4335]*y_cur[IDX_C5NM] + k[4370]*y_cur[IDX_C6M] + + k[4405]*y_cur[IDX_C6HM] + k[4440]*y_cur[IDX_C7M] + + k[4475]*y_cur[IDX_C7HM] + k[4510]*y_cur[IDX_C8M] + + k[4545]*y_cur[IDX_C8HM] + k[4580]*y_cur[IDX_C9M] + + k[4615]*y_cur[IDX_C9HM] + k[4650]*y_cur[IDX_CHM] + + k[4685]*y_cur[IDX_CNM] + k[4721]*y_cur[IDX_HM] + + k[4756]*y_cur[IDX_OM] + k[4791]*y_cur[IDX_O2M] + + k[4826]*y_cur[IDX_OHM] + k[4861]*y_cur[IDX_SM] + + k[4861]*y_cur[IDX_SM] + k[5625]*y_cur[IDX_eM] + + k[6424]*y_cur[IDX_GRAINM]; + data[jistart + 15242] = 0.0 + k[724]*y_cur[IDX_SII]; + data[jistart + 15243] = 0.0 - k[1625]*y_cur[IDX_SI] + k[4834]*y_cur[IDX_SM]; + data[jistart + 15244] = 0.0 + k[629]*y_cur[IDX_SII] - k[5333]*y_cur[IDX_SI] - + k[5334]*y_cur[IDX_SI]; + data[jistart + 15245] = 0.0 + k[503]*y_cur[IDX_SII] - k[5486]*y_cur[IDX_SI] - + k[5487]*y_cur[IDX_SI]; + data[jistart + 15246] = 0.0 - k[5062]*y_cur[IDX_SI]; + data[jistart + 15247] = 0.0 - k[4906]*y_cur[IDX_SI]; + data[jistart + 15248] = 0.0 + k[2879]*y_cur[IDX_HSII]; + data[jistart + 15249] = 0.0 + k[2255]*y_cur[IDX_HSII] - k[5100]*y_cur[IDX_SI] - + k[5101]*y_cur[IDX_SI]; + data[jistart + 15250] = 0.0 - k[207]*y_cur[IDX_C2II] - k[213]*y_cur[IDX_C2HII] - + k[256]*y_cur[IDX_CHII] - k[305]*y_cur[IDX_CNII] - + k[313]*y_cur[IDX_COII] - k[415]*y_cur[IDX_HII] - + k[460]*y_cur[IDX_H2COII] - k[476]*y_cur[IDX_H2OII] - + k[496]*y_cur[IDX_HCNII] - k[572]*y_cur[IDX_N2II] - + k[579]*y_cur[IDX_NHII] - k[584]*y_cur[IDX_NH2II] - + k[677]*y_cur[IDX_O2II] - k[695]*y_cur[IDX_OHII] - + k[707]*y_cur[IDX_CII] - k[708]*y_cur[IDX_CII] - + k[709]*y_cur[IDX_H2SII] - k[710]*y_cur[IDX_HSII] - + k[1456]*y_cur[IDX_C2II] - k[1527]*y_cur[IDX_C2H2II] - + k[1528]*y_cur[IDX_C2H2II] - k[1625]*y_cur[IDX_C2H3II] - + k[1679]*y_cur[IDX_C2H4II] - k[1973]*y_cur[IDX_CHII] - + k[1974]*y_cur[IDX_CHII] - k[1994]*y_cur[IDX_CH2II] - + k[2095]*y_cur[IDX_CH3II] - k[2235]*y_cur[IDX_CH5II] - + k[2490]*y_cur[IDX_H2COII] - k[2516]*y_cur[IDX_H2OII] - + k[2517]*y_cur[IDX_H2OII] - k[2740]*y_cur[IDX_H3II] - + k[2860]*y_cur[IDX_HCNII] - k[2989]*y_cur[IDX_HCOII] - + k[3050]*y_cur[IDX_HNOII] - k[3376]*y_cur[IDX_N2HII] - + k[3505]*y_cur[IDX_NHII] - k[3506]*y_cur[IDX_NHII] - + k[3526]*y_cur[IDX_NH2II] - k[3527]*y_cur[IDX_NH2II] - + k[3667]*y_cur[IDX_O2II] - k[3789]*y_cur[IDX_OHII] - + k[3790]*y_cur[IDX_OHII] - k[3834]*y_cur[IDX_C3H2II] - + k[3835]*y_cur[IDX_C3H3II] - k[3836]*y_cur[IDX_C4H2II] - + k[3837]*y_cur[IDX_C4H3II] - k[3838]*y_cur[IDX_CH2CCHII] - + k[3839]*y_cur[IDX_H3SII] - k[3840]*y_cur[IDX_O2HII] - + k[3841]*y_cur[IDX_SiCH2II] - k[3842]*y_cur[IDX_SiOII] - + k[3883]*y_cur[IDX_SiH2II] - k[4876]*y_cur[IDX_C2I] - + k[4906]*y_cur[IDX_C2HI] - k[5019]*y_cur[IDX_CH2I] - + k[5020]*y_cur[IDX_CH2I] - k[5048]*y_cur[IDX_CH3I] - + k[5062]*y_cur[IDX_CH4I] - k[5100]*y_cur[IDX_CHI] - + k[5101]*y_cur[IDX_CHI] - k[5125]*y_cur[IDX_CNI] - + k[5149]*y_cur[IDX_H2I] - k[5324]*y_cur[IDX_NHI] - + k[5325]*y_cur[IDX_NHI] - k[5333]*y_cur[IDX_NOI] - + k[5334]*y_cur[IDX_NOI] - k[5337]*y_cur[IDX_O2I] - + k[5480]*y_cur[IDX_OHI] - k[5485]*y_cur[IDX_C2OI] - + k[5486]*y_cur[IDX_HCOI] - k[5487]*y_cur[IDX_HCOI] - + k[5488]*y_cur[IDX_HSI] - k[5489]*y_cur[IDX_SO2I] - + k[5490]*y_cur[IDX_SOI] - k[5506]*y_cur[IDX_CII] - + k[5529]*y_cur[IDX_CI] - k[5610]*y_cur[IDX_eM] - k[5913] - k[6255] - + k[6303] - k[6932]; + data[jistart + 15251] = 0.0 - k[4876]*y_cur[IDX_SI]; + data[jistart + 15252] = 0.0 - k[5480]*y_cur[IDX_SI]; + data[jistart + 15253] = 0.0 + k[614]*y_cur[IDX_SII] + k[3589]*y_cur[IDX_HSII]; + data[jistart + 15254] = 0.0 - k[1527]*y_cur[IDX_SI] - k[1528]*y_cur[IDX_SI] + + k[4833]*y_cur[IDX_SM]; + data[jistart + 15255] = 0.0 - k[2095]*y_cur[IDX_SI] + k[4839]*y_cur[IDX_SM]; + data[jistart + 15256] = 0.0 + k[3843]*y_cur[IDX_SOII]; + data[jistart + 15257] = 0.0 - k[5125]*y_cur[IDX_SI]; + data[jistart + 15258] = 0.0 - k[5048]*y_cur[IDX_SI]; + data[jistart + 15259] = 0.0 + k[5263]*y_cur[IDX_CSI] + k[5268]*y_cur[IDX_HCSI] + + k[5272]*y_cur[IDX_HSI] + k[5280]*y_cur[IDX_NSI] + + k[5289]*y_cur[IDX_S2I] + k[5291]*y_cur[IDX_SOI]; + data[jistart + 15260] = 0.0 + k[4846]*y_cur[IDX_SM]; + data[jistart + 15261] = 0.0 + k[3732]*y_cur[IDX_CSII] + k[3739]*y_cur[IDX_HCSII] + + k[3748]*y_cur[IDX_NSII] + k[5392]*y_cur[IDX_CSI] + + k[5415]*y_cur[IDX_HSI] + k[5425]*y_cur[IDX_NSI] + + k[5430]*y_cur[IDX_OCSI] + k[5437]*y_cur[IDX_S2I] + + k[5439]*y_cur[IDX_SOI]; + data[jistart + 15262] = 0.0 + k[3094]*y_cur[IDX_C2SI] + k[3215]*y_cur[IDX_CSI] + + k[3224]*y_cur[IDX_H2CSI] + k[3289]*y_cur[IDX_NSI] + + k[3296]*y_cur[IDX_OCSI] + k[3302]*y_cur[IDX_S2I] + + k[3306]*y_cur[IDX_SOI] + k[3335]*y_cur[IDX_SiSI] + + k[4852]*y_cur[IDX_SM]; + data[jistart + 15263] = 0.0 - k[707]*y_cur[IDX_SI] - k[708]*y_cur[IDX_SI] + + k[1309]*y_cur[IDX_C2SI] + k[1316]*y_cur[IDX_C3SI] + + k[1322]*y_cur[IDX_C4SI] + k[1430]*y_cur[IDX_SOI] + + k[1448]*y_cur[IDX_SiSI] + k[4832]*y_cur[IDX_SM] - + k[5506]*y_cur[IDX_SI]; + data[jistart + 15264] = 0.0 + k[2554]*y_cur[IDX_HSII]; + data[jistart + 15265] = 0.0 - k[415]*y_cur[IDX_SI] + k[4842]*y_cur[IDX_SM]; + data[jistart + 15266] = 0.0 + k[4958]*y_cur[IDX_CSI] + k[4966]*y_cur[IDX_HSI] + + k[4977]*y_cur[IDX_NSI] + k[4984]*y_cur[IDX_S2I] + + k[4987]*y_cur[IDX_SOI] - k[5529]*y_cur[IDX_SI]; + data[jistart + 15267] = 0.0 - k[2989]*y_cur[IDX_SI] + k[4850]*y_cur[IDX_SM] + + k[4851]*y_cur[IDX_SM]; + data[jistart + 15268] = 0.0 - k[2740]*y_cur[IDX_SI] + k[4845]*y_cur[IDX_SM]; + data[jistart + 15269] = 0.0 + k[6424]*y_cur[IDX_SII] + k[6445]*y_cur[IDX_HSII] + + k[6447]*y_cur[IDX_H2SII] + k[6453]*y_cur[IDX_H3SII] + + k[6535]*y_cur[IDX_CSII] + k[6554]*y_cur[IDX_HCSII] + + k[6581]*y_cur[IDX_NSII] + k[6620]*y_cur[IDX_SOII] + + k[6675]*y_cur[IDX_C2SII] + k[6708]*y_cur[IDX_OCSII] + + k[6710]*y_cur[IDX_SiSII] + k[6750]*y_cur[IDX_SO2II] + + k[6752]*y_cur[IDX_S2II] + k[6752]*y_cur[IDX_S2II] + + k[6758]*y_cur[IDX_HS2II] + k[6776]*y_cur[IDX_C3SII]; + data[jistart + 15270] = 0.0 - k[5149]*y_cur[IDX_SI]; + data[jistart + 15271] = 0.0 + k[787]*y_cur[IDX_C2SII] + k[817]*y_cur[IDX_C3SII] + + k[985]*y_cur[IDX_CSII] + k[1020]*y_cur[IDX_H2SII] + + k[1048]*y_cur[IDX_H3SII] + k[1107]*y_cur[IDX_HCSII] + + k[1138]*y_cur[IDX_HSII] + k[1139]*y_cur[IDX_HS2II] + + k[1173]*y_cur[IDX_NSII] + k[1179]*y_cur[IDX_OCSII] + + k[1219]*y_cur[IDX_S2II] + k[1219]*y_cur[IDX_S2II] + + k[1220]*y_cur[IDX_SOII] + k[1221]*y_cur[IDX_SO2II] + + k[1269]*y_cur[IDX_SiSII] - k[5610]*y_cur[IDX_SI] + + k[5625]*y_cur[IDX_SII]; + data[jistart + 15272] = 0.0 + k[5178]*y_cur[IDX_HSI] + k[5189]*y_cur[IDX_NSI] + + k[5199]*y_cur[IDX_S2I] + k[5201]*y_cur[IDX_SOI]; + data[jistart + 15273] = 0.0 + k[834]*y_cur[IDX_eM] + k[6810]*y_cur[IDX_GRAINM]; + data[jistart + 15274] = 0.0 + k[847]*y_cur[IDX_eM] + k[6784]*y_cur[IDX_GRAINM]; + data[jistart + 15275] = 0.0 + k[876]*y_cur[IDX_eM] + k[6840]*y_cur[IDX_GRAINM]; + data[jistart + 15276] = 0.0 + k[901]*y_cur[IDX_eM] + k[6875]*y_cur[IDX_GRAINM]; + data[jistart + 15277] = 0.0 + k[787]*y_cur[IDX_eM] + k[6675]*y_cur[IDX_GRAINM]; + data[jistart + 15278] = 0.0 + k[818]*y_cur[IDX_eM] + k[6777]*y_cur[IDX_GRAINM]; + data[jistart + 15279] = 0.0 + k[903]*y_cur[IDX_eM] + k[6663]*y_cur[IDX_GRAINM]; + data[jistart + 15280] = 0.0 + k[1238]*y_cur[IDX_eM] + k[6798]*y_cur[IDX_GRAINM]; + data[jistart + 15281] = 0.0 + k[5974]; + data[jistart + 15282] = 0.0 + k[815]*y_cur[IDX_eM] + k[6644]*y_cur[IDX_GRAINM]; + data[jistart + 15283] = 0.0 + k[727]*y_cur[IDX_eM] + k[6869]*y_cur[IDX_GRAINM]; + data[jistart + 15284] = 0.0 + k[738]*y_cur[IDX_eM] + k[6887]*y_cur[IDX_GRAINM]; + data[jistart + 15285] = 0.0 + k[814]*y_cur[IDX_eM] + k[6626]*y_cur[IDX_GRAINM]; + data[jistart + 15286] = 0.0 + k[889]*y_cur[IDX_eM] + k[6855]*y_cur[IDX_GRAINM]; + data[jistart + 15287] = 0.0 + k[5923]; + data[jistart + 15288] = 0.0 + k[1233]*y_cur[IDX_eM] + k[6747]*y_cur[IDX_GRAINM]; + data[jistart + 15289] = 0.0 + k[831]*y_cur[IDX_eM] + k[6740]*y_cur[IDX_GRAINM]; + data[jistart + 15290] = 0.0 + k[877]*y_cur[IDX_eM] + k[6836]*y_cur[IDX_GRAINM]; + data[jistart + 15291] = 0.0 + k[918]*y_cur[IDX_eM] + k[6492]*y_cur[IDX_GRAINM]; + data[jistart + 15292] = 0.0 + k[1224]*y_cur[IDX_eM] + k[6642]*y_cur[IDX_GRAINM]; + data[jistart + 15293] = 0.0 + k[6263]; + data[jistart + 15294] = 0.0 + k[3113]*y_cur[IDX_HeII]; + data[jistart + 15295] = 0.0 + k[864]*y_cur[IDX_eM] + k[6822]*y_cur[IDX_GRAINM]; + data[jistart + 15296] = 0.0 + k[6008]; + data[jistart + 15297] = 0.0 + k[3103]*y_cur[IDX_HeII] + k[5725] + k[6009]; + data[jistart + 15298] = 0.0 + k[3307]*y_cur[IDX_HeII] + k[6260]; + data[jistart + 15299] = 0.0 + k[4918]*y_cur[IDX_CI] + k[5712] + k[5997]; + data[jistart + 15300] = 0.0 + k[5723] + k[6007]; + data[jistart + 15301] = 0.0 + k[848]*y_cur[IDX_eM] + k[6780]*y_cur[IDX_GRAINM]; + data[jistart + 15302] = 0.0 + k[819]*y_cur[IDX_eM] + k[819]*y_cur[IDX_eM] + + k[6615]*y_cur[IDX_GRAINM] + k[6615]*y_cur[IDX_GRAINM]; + data[jistart + 15303] = 0.0 + k[1341]*y_cur[IDX_CII] + k[3158]*y_cur[IDX_HeII] + k[5773] + + k[6070]; + data[jistart + 15304] = 0.0 + k[1434]*y_cur[IDX_CII]; + data[jistart + 15305] = 0.0 + k[780]*y_cur[IDX_eM] + k[6466]*y_cur[IDX_GRAINM]; + data[jistart + 15306] = 0.0 + k[838]*y_cur[IDX_eM] + k[6709]*y_cur[IDX_GRAINM]; + data[jistart + 15307] = 0.0 + k[1065]*y_cur[IDX_eM] + k[6631]*y_cur[IDX_GRAINM]; + data[jistart + 15308] = 0.0 + k[7089] + k[7271] + k[7453]; + data[jistart + 15309] = 0.0 + k[788]*y_cur[IDX_eM] + k[6455]*y_cur[IDX_GRAINM]; + data[jistart + 15310] = 0.0 - k[1463]*y_cur[IDX_C2I]; + data[jistart + 15311] = 0.0 - k[1460]*y_cur[IDX_C2I]; + data[jistart + 15312] = 0.0 - k[208]*y_cur[IDX_C2I]; + data[jistart + 15313] = 0.0 - k[4869]*y_cur[IDX_C2I]; + data[jistart + 15314] = 0.0 - k[210]*y_cur[IDX_C2I]; + data[jistart + 15315] = 0.0 + k[835]*y_cur[IDX_eM] + k[3996]*y_cur[IDX_C2M] + + k[6815]*y_cur[IDX_GRAINM]; + data[jistart + 15316] = 0.0 - k[1458]*y_cur[IDX_C2I]; + data[jistart + 15317] = 0.0 - k[4870]*y_cur[IDX_C2I]; + data[jistart + 15318] = 0.0 + k[205]*y_cur[IDX_HCOI] + k[206]*y_cur[IDX_NOI] + + k[207]*y_cur[IDX_SI] + k[244]*y_cur[IDX_CI] + k[259]*y_cur[IDX_CH2I] + + k[287]*y_cur[IDX_CHI] + k[585]*y_cur[IDX_NH2I] + + k[697]*y_cur[IDX_OHI] - k[1451]*y_cur[IDX_C2I]; + data[jistart + 15319] = 0.0 + k[978]*y_cur[IDX_eM] + k[3999]*y_cur[IDX_C2M] + + k[6468]*y_cur[IDX_GRAINM]; + data[jistart + 15320] = 0.0 - k[3477]*y_cur[IDX_C2I] - k[3478]*y_cur[IDX_C2I] - + k[3479]*y_cur[IDX_C2I]; + data[jistart + 15321] = 0.0 - k[436]*y_cur[IDX_C2I] - k[2369]*y_cur[IDX_C2I]; + data[jistart + 15322] = 0.0 - k[4875]*y_cur[IDX_C2I]; + data[jistart + 15323] = 0.0 - k[3507]*y_cur[IDX_C2I]; + data[jistart + 15324] = 0.0 + k[4025]*y_cur[IDX_C2M]; + data[jistart + 15325] = 0.0 - k[209]*y_cur[IDX_C2I] + k[1743]*y_cur[IDX_C2HI]; + data[jistart + 15326] = 0.0 - k[2217]*y_cur[IDX_C2I]; + data[jistart + 15327] = 0.0 + k[4006]*y_cur[IDX_C2M]; + data[jistart + 15328] = 0.0 + k[0]*y_cur[IDX_CI]; + data[jistart + 15329] = 0.0 + k[4958]*y_cur[IDX_CI]; + data[jistart + 15330] = 0.0 - k[66]*y_cur[IDX_C2I]; + data[jistart + 15331] = 0.0 + k[1472]*y_cur[IDX_C2HII]; + data[jistart + 15332] = 0.0 - k[36]*y_cur[IDX_C2I]; + data[jistart + 15333] = 0.0 - k[10]*y_cur[IDX_C2I] + k[3991]*y_cur[IDX_CII] + + k[3992]*y_cur[IDX_C2H2II] + k[3993]*y_cur[IDX_C2H3II] + + k[3994]*y_cur[IDX_C4H2II] + k[3995]*y_cur[IDX_C4H3II] + + k[3996]*y_cur[IDX_C4SII] + k[3997]*y_cur[IDX_CH2CCHII] + + k[3998]*y_cur[IDX_CH3II] + k[3999]*y_cur[IDX_CNCII] + + k[4000]*y_cur[IDX_FeII] + k[4001]*y_cur[IDX_HII] + + k[4002]*y_cur[IDX_H2COII] + k[4003]*y_cur[IDX_H2SII] + + k[4004]*y_cur[IDX_H3II] + k[4005]*y_cur[IDX_H3OII] + + k[4006]*y_cur[IDX_HC2SII] + k[4007]*y_cur[IDX_HCNHII] + + k[4008]*y_cur[IDX_HCNHII] + k[4009]*y_cur[IDX_HCOII] + + k[4010]*y_cur[IDX_HCOII] + k[4011]*y_cur[IDX_HeII] + + k[4012]*y_cur[IDX_MgII] + k[4013]*y_cur[IDX_NII] + + k[4014]*y_cur[IDX_N2HII] + k[4015]*y_cur[IDX_NH3II] + + k[4016]*y_cur[IDX_NH4II] + k[4017]*y_cur[IDX_NOII] + + k[4018]*y_cur[IDX_NaII] + k[4019]*y_cur[IDX_OII] + + k[4020]*y_cur[IDX_SII] + k[4021]*y_cur[IDX_SOII] + + k[4022]*y_cur[IDX_SiII] + k[4023]*y_cur[IDX_SiOII] + + k[4024]*y_cur[IDX_SiOHII] + k[4025]*y_cur[IDX_SiSII] + k[5693] + + k[5976]; + data[jistart + 15334] = 0.0 + k[3093]*y_cur[IDX_HeII] + k[5715] + k[5999]; + data[jistart + 15335] = 0.0 + k[3392]*y_cur[IDX_NI]; + data[jistart + 15336] = 0.0 - k[22]*y_cur[IDX_C2I]; + data[jistart + 15337] = 0.0 - k[31]*y_cur[IDX_C2I]; + data[jistart + 15338] = 0.0 - k[27]*y_cur[IDX_C2I] + k[3409]*y_cur[IDX_NI]; + data[jistart + 15339] = 0.0 - k[34]*y_cur[IDX_C2I] + k[3426]*y_cur[IDX_NI]; + data[jistart + 15340] = 0.0 - k[1465]*y_cur[IDX_C2I] + k[4023]*y_cur[IDX_C2M]; + data[jistart + 15341] = 0.0 + k[4917]*y_cur[IDX_CI] + k[5710] + k[5995]; + data[jistart + 15342] = 0.0 + k[4024]*y_cur[IDX_C2M]; + data[jistart + 15343] = 0.0 + k[585]*y_cur[IDX_C2II] + k[3529]*y_cur[IDX_C2HII]; + data[jistart + 15344] = 0.0 + k[740]*y_cur[IDX_eM] + k[1469]*y_cur[IDX_H2COI] + + k[1472]*y_cur[IDX_HC3NI] + k[1476]*y_cur[IDX_HCNI] + + k[1478]*y_cur[IDX_HNCI] + k[1996]*y_cur[IDX_CH2I] + + k[2240]*y_cur[IDX_CHI] + k[3529]*y_cur[IDX_NH2I] + + k[3554]*y_cur[IDX_NH3I] + k[6354]*y_cur[IDX_GRAINM]; + data[jistart + 15345] = 0.0 + k[791]*y_cur[IDX_eM] + k[3398]*y_cur[IDX_NI] + + k[6461]*y_cur[IDX_GRAINM]; + data[jistart + 15346] = 0.0 - k[685]*y_cur[IDX_C2I] - k[3769]*y_cur[IDX_C2I]; + data[jistart + 15347] = 0.0 - k[462]*y_cur[IDX_C2I] - k[2503]*y_cur[IDX_C2I]; + data[jistart + 15348] = 0.0 + k[5722] + k[6006]; + data[jistart + 15349] = 0.0 - k[1933]*y_cur[IDX_C2I]; + data[jistart + 15350] = 0.0 - k[211]*y_cur[IDX_C2I] - k[1462]*y_cur[IDX_C2I]; + data[jistart + 15351] = 0.0 + k[1299]*y_cur[IDX_CII] + k[3067]*y_cur[IDX_HeII] + + k[3070]*y_cur[IDX_HeII] + k[5967]; + data[jistart + 15352] = 0.0 + k[3154]*y_cur[IDX_HeII]; + data[jistart + 15353] = 0.0 + k[4000]*y_cur[IDX_C2M]; + data[jistart + 15354] = 0.0 + k[4012]*y_cur[IDX_C2M]; + data[jistart + 15355] = 0.0 + k[4018]*y_cur[IDX_C2M]; + data[jistart + 15356] = 0.0 + k[3060]*y_cur[IDX_HeII] + k[5953] + k[5954]; + data[jistart + 15357] = 0.0 + k[3147]*y_cur[IDX_HeII]; + data[jistart + 15358] = 0.0 + k[3134]*y_cur[IDX_HeII]; + data[jistart + 15359] = 0.0 + k[3149]*y_cur[IDX_HeII]; + data[jistart + 15360] = 0.0 + k[3142]*y_cur[IDX_HeII] + k[4938]*y_cur[IDX_CI]; + data[jistart + 15361] = 0.0 + k[8654]*y_cur[IDX_GCI] + k[8654]*y_cur[IDX_GCI]; + data[jistart + 15362] = 0.0 + k[3117]*y_cur[IDX_HeII] + k[5737] + k[6023]; + data[jistart + 15363] = 0.0 + k[3125]*y_cur[IDX_HeII] + k[4930]*y_cur[IDX_CI]; + data[jistart + 15364] = 0.0 + k[3105]*y_cur[IDX_HeII] + k[4923]*y_cur[IDX_CI] + k[5727] + + k[5727] + k[6011] + k[6011]; + data[jistart + 15365] = 0.0 + k[3139]*y_cur[IDX_HeII]; + data[jistart + 15366] = 0.0 + k[3995]*y_cur[IDX_C2M]; + data[jistart + 15367] = 0.0 - k[1461]*y_cur[IDX_C2I] + k[4014]*y_cur[IDX_C2M]; + data[jistart + 15368] = 0.0 + k[4021]*y_cur[IDX_C2M]; + data[jistart + 15369] = 0.0 + k[3997]*y_cur[IDX_C2M]; + data[jistart + 15370] = 0.0 + k[3132]*y_cur[IDX_HeII]; + data[jistart + 15371] = 0.0 + k[3122]*y_cur[IDX_HeII] + k[5743] + k[6028]; + data[jistart + 15372] = 0.0 + k[4003]*y_cur[IDX_C2M]; + data[jistart + 15373] = 0.0 - k[542]*y_cur[IDX_C2I] + k[4013]*y_cur[IDX_C2M]; + data[jistart + 15374] = 0.0 - k[1457]*y_cur[IDX_C2I] + k[4002]*y_cur[IDX_C2M]; + data[jistart + 15375] = 0.0 + k[3095]*y_cur[IDX_HeII] + k[5231]*y_cur[IDX_NI] + + k[5356]*y_cur[IDX_OI] + k[5717] + k[6001]; + data[jistart + 15376] = 0.0 + k[3111]*y_cur[IDX_HeII] + k[5731] + k[6016]; + data[jistart + 15377] = 0.0 + k[4017]*y_cur[IDX_C2M]; + data[jistart + 15378] = 0.0 - k[646]*y_cur[IDX_C2I] - k[3631]*y_cur[IDX_C2I] + + k[4019]*y_cur[IDX_C2M]; + data[jistart + 15379] = 0.0 - k[4872]*y_cur[IDX_C2I]; + data[jistart + 15380] = 0.0 + k[3994]*y_cur[IDX_C2M]; + data[jistart + 15381] = 0.0 + k[4007]*y_cur[IDX_C2M] + k[4008]*y_cur[IDX_C2M]; + data[jistart + 15382] = 0.0 + k[259]*y_cur[IDX_C2II] + k[1996]*y_cur[IDX_C2HII]; + data[jistart + 15383] = 0.0 + k[1478]*y_cur[IDX_C2HII]; + data[jistart + 15384] = 0.0 - k[3548]*y_cur[IDX_C2I] + k[4015]*y_cur[IDX_C2M]; + data[jistart + 15385] = 0.0 - k[4868]*y_cur[IDX_C2I]; + data[jistart + 15386] = 0.0 + k[4016]*y_cur[IDX_C2M]; + data[jistart + 15387] = 0.0 - k[4874]*y_cur[IDX_C2I]; + data[jistart + 15388] = 0.0 + k[4022]*y_cur[IDX_C2M]; + data[jistart + 15389] = 0.0 - k[1464]*y_cur[IDX_C2I] + k[4020]*y_cur[IDX_C2M]; + data[jistart + 15390] = 0.0 + k[745]*y_cur[IDX_eM] + k[746]*y_cur[IDX_eM] + + k[3993]*y_cur[IDX_C2M] + k[6360]*y_cur[IDX_GRAINM] + + k[6361]*y_cur[IDX_GRAINM]; + data[jistart + 15391] = 0.0 + k[206]*y_cur[IDX_C2II]; + data[jistart + 15392] = 0.0 + k[205]*y_cur[IDX_C2II]; + data[jistart + 15393] = 0.0 - k[4871]*y_cur[IDX_C2I]; + data[jistart + 15394] = 0.0 + k[1743]*y_cur[IDX_COII] + k[5708] + k[5993]; + data[jistart + 15395] = 0.0 + k[1469]*y_cur[IDX_C2HII]; + data[jistart + 15396] = 0.0 + k[1476]*y_cur[IDX_C2HII] - k[4873]*y_cur[IDX_C2I]; + data[jistart + 15397] = 0.0 + k[287]*y_cur[IDX_C2II] + k[2240]*y_cur[IDX_C2HII] + + k[4955]*y_cur[IDX_CI]; + data[jistart + 15398] = 0.0 + k[207]*y_cur[IDX_C2II] - k[4876]*y_cur[IDX_C2I]; + data[jistart + 15399] = 0.0 - k[10]*y_cur[IDX_C2M] - k[22]*y_cur[IDX_C4M] - + k[27]*y_cur[IDX_C5M] - k[31]*y_cur[IDX_C6M] - k[34]*y_cur[IDX_C7M] - + k[36]*y_cur[IDX_C8M] - k[66]*y_cur[IDX_HM] - k[208]*y_cur[IDX_CNII] + - k[209]*y_cur[IDX_COII] - k[210]*y_cur[IDX_N2II] - + k[211]*y_cur[IDX_O2II] - k[323]*y_cur[IDX_HII] - + k[436]*y_cur[IDX_H2II] - k[462]*y_cur[IDX_H2OII] - + k[508]*y_cur[IDX_HeII] - k[542]*y_cur[IDX_NII] - + k[646]*y_cur[IDX_OII] - k[685]*y_cur[IDX_OHII] - + k[1451]*y_cur[IDX_C2II] - k[1457]*y_cur[IDX_H2COII] - + k[1458]*y_cur[IDX_HCNII] - k[1459]*y_cur[IDX_HCOII] - + k[1460]*y_cur[IDX_HNOII] - k[1461]*y_cur[IDX_N2HII] - + k[1462]*y_cur[IDX_O2II] - k[1463]*y_cur[IDX_O2HII] - + k[1464]*y_cur[IDX_SII] - k[1465]*y_cur[IDX_SiOII] - + k[1933]*y_cur[IDX_CHII] - k[2041]*y_cur[IDX_CH3II] - + k[2217]*y_cur[IDX_CH5II] - k[2369]*y_cur[IDX_H2II] - + k[2503]*y_cur[IDX_H2OII] - k[2586]*y_cur[IDX_H3II] - + k[2766]*y_cur[IDX_H3OII] - k[3073]*y_cur[IDX_HeII] - + k[3477]*y_cur[IDX_NHII] - k[3478]*y_cur[IDX_NHII] - + k[3479]*y_cur[IDX_NHII] - k[3507]*y_cur[IDX_NH2II] - + k[3548]*y_cur[IDX_NH3II] - k[3631]*y_cur[IDX_OII] - + k[3769]*y_cur[IDX_OHII] - k[4867]*y_cur[IDX_C2H2I] - + k[4868]*y_cur[IDX_C2H4I] - k[4869]*y_cur[IDX_C2H6I] - + k[4870]*y_cur[IDX_CH3CHCH2I] - k[4871]*y_cur[IDX_CH4I] - + k[4872]*y_cur[IDX_C4H2I] - k[4873]*y_cur[IDX_HCNI] - + k[4874]*y_cur[IDX_O2I] - k[4875]*y_cur[IDX_OCSI] - + k[4876]*y_cur[IDX_SI] - k[5153]*y_cur[IDX_HI] - + k[5222]*y_cur[IDX_NI] - k[5343]*y_cur[IDX_OI] - + k[5521]*y_cur[IDX_CI] - k[5589]*y_cur[IDX_eM] - k[5694] - k[5977] - + k[5978] - k[6907]; + data[jistart + 15400] = 0.0 + k[697]*y_cur[IDX_C2II]; + data[jistart + 15401] = 0.0 + k[3554]*y_cur[IDX_C2HII]; + data[jistart + 15402] = 0.0 + k[742]*y_cur[IDX_eM] + k[3992]*y_cur[IDX_C2M] + + k[6356]*y_cur[IDX_GRAINM]; + data[jistart + 15403] = 0.0 - k[2041]*y_cur[IDX_C2I] + k[3998]*y_cur[IDX_C2M]; + data[jistart + 15404] = 0.0 - k[4867]*y_cur[IDX_C2I]; + data[jistart + 15405] = 0.0 + k[4956]*y_cur[IDX_CI] + k[5113]*y_cur[IDX_CNI] + + k[5113]*y_cur[IDX_CNI]; + data[jistart + 15406] = 0.0 + k[3392]*y_cur[IDX_C3M] + k[3398]*y_cur[IDX_C3H2II] + + k[3409]*y_cur[IDX_C5M] + k[3426]*y_cur[IDX_C7M] - + k[5222]*y_cur[IDX_C2I] + k[5231]*y_cur[IDX_C3I]; + data[jistart + 15407] = 0.0 - k[2766]*y_cur[IDX_C2I] + k[4005]*y_cur[IDX_C2M]; + data[jistart + 15408] = 0.0 - k[5343]*y_cur[IDX_C2I] + k[5356]*y_cur[IDX_C3I]; + data[jistart + 15409] = 0.0 - k[508]*y_cur[IDX_C2I] + k[3060]*y_cur[IDX_C10I] + + k[3067]*y_cur[IDX_C10HI] + k[3070]*y_cur[IDX_C10HI] - + k[3073]*y_cur[IDX_C2I] + k[3093]*y_cur[IDX_C2SI] + + k[3095]*y_cur[IDX_C3I] + k[3103]*y_cur[IDX_C3SI] + + k[3105]*y_cur[IDX_C4I] + k[3111]*y_cur[IDX_C4HI] + + k[3113]*y_cur[IDX_C4PI] + k[3117]*y_cur[IDX_C5I] + + k[3122]*y_cur[IDX_C5HI] + k[3125]*y_cur[IDX_C6I] + + k[3132]*y_cur[IDX_C6HI] + k[3134]*y_cur[IDX_C7I] + + k[3139]*y_cur[IDX_C7HI] + k[3142]*y_cur[IDX_C8I] + + k[3147]*y_cur[IDX_C8HI] + k[3149]*y_cur[IDX_C9I] + + k[3154]*y_cur[IDX_C9HI] + k[3158]*y_cur[IDX_CCPI] + + k[3307]*y_cur[IDX_SiC2I] + k[4011]*y_cur[IDX_C2M]; + data[jistart + 15410] = 0.0 + k[1299]*y_cur[IDX_C10HI] + k[1341]*y_cur[IDX_CCPI] + + k[1434]*y_cur[IDX_SiCI] + k[3991]*y_cur[IDX_C2M]; + data[jistart + 15411] = 0.0 - k[323]*y_cur[IDX_C2I] + k[4001]*y_cur[IDX_C2M]; + data[jistart + 15412] = 0.0 + k[0]*y_cur[IDX_CM] + k[244]*y_cur[IDX_C2II] + + k[4917]*y_cur[IDX_C2NI] + k[4918]*y_cur[IDX_C2OI] + + k[4923]*y_cur[IDX_C4I] + k[4930]*y_cur[IDX_C6I] + + k[4938]*y_cur[IDX_C8I] + k[4955]*y_cur[IDX_CHI] + + k[4956]*y_cur[IDX_CNI] + k[4957]*y_cur[IDX_COI] + + k[4958]*y_cur[IDX_CSI] - k[5521]*y_cur[IDX_C2I] + + k[5523]*y_cur[IDX_CI] + k[5523]*y_cur[IDX_CI]; + data[jistart + 15413] = 0.0 - k[1459]*y_cur[IDX_C2I] + k[4009]*y_cur[IDX_C2M] + + k[4010]*y_cur[IDX_C2M]; + data[jistart + 15414] = 0.0 - k[2586]*y_cur[IDX_C2I] + k[4004]*y_cur[IDX_C2M]; + data[jistart + 15415] = 0.0 + k[4957]*y_cur[IDX_CI]; + data[jistart + 15416] = 0.0 + k[6354]*y_cur[IDX_C2HII] + k[6356]*y_cur[IDX_C2H2II] + + k[6360]*y_cur[IDX_C2H3II] + k[6361]*y_cur[IDX_C2H3II] + + k[6455]*y_cur[IDX_C3II] + k[6461]*y_cur[IDX_C3H2II] + + k[6466]*y_cur[IDX_C2NII] + k[6468]*y_cur[IDX_CNCII] + + k[6492]*y_cur[IDX_CH2COII] + k[6615]*y_cur[IDX_C4II] + + k[6615]*y_cur[IDX_C4II] + k[6626]*y_cur[IDX_C3NII] + + k[6631]*y_cur[IDX_HC3NII] + k[6642]*y_cur[IDX_SiC2II] + + k[6644]*y_cur[IDX_C3OII] + k[6663]*y_cur[IDX_CCPII] + + k[6675]*y_cur[IDX_C2SII] + k[6709]*y_cur[IDX_C5II] + + k[6740]*y_cur[IDX_C4NII] + k[6747]*y_cur[IDX_SiC3II] + + k[6777]*y_cur[IDX_C3SII] + k[6780]*y_cur[IDX_C6II] + + k[6784]*y_cur[IDX_C5NII] + k[6798]*y_cur[IDX_SiC4II] + + k[6810]*y_cur[IDX_C4PII] + k[6815]*y_cur[IDX_C4SII] + + k[6822]*y_cur[IDX_C7II] + k[6836]*y_cur[IDX_C8II] + + k[6840]*y_cur[IDX_C7NII] + k[6855]*y_cur[IDX_C9II] + + k[6869]*y_cur[IDX_C10II] + k[6875]*y_cur[IDX_C9NII] + + k[6887]*y_cur[IDX_C11II]; + data[jistart + 15417] = 0.0 + k[727]*y_cur[IDX_C10II] + k[738]*y_cur[IDX_C11II] + + k[740]*y_cur[IDX_C2HII] + k[742]*y_cur[IDX_C2H2II] + + k[745]*y_cur[IDX_C2H3II] + k[746]*y_cur[IDX_C2H3II] + + k[780]*y_cur[IDX_C2NII] + k[787]*y_cur[IDX_C2SII] + + k[788]*y_cur[IDX_C3II] + k[791]*y_cur[IDX_C3H2II] + + k[814]*y_cur[IDX_C3NII] + k[815]*y_cur[IDX_C3OII] + + k[818]*y_cur[IDX_C3SII] + k[819]*y_cur[IDX_C4II] + + k[819]*y_cur[IDX_C4II] + k[831]*y_cur[IDX_C4NII] + + k[834]*y_cur[IDX_C4PII] + k[835]*y_cur[IDX_C4SII] + + k[838]*y_cur[IDX_C5II] + k[847]*y_cur[IDX_C5NII] + + k[848]*y_cur[IDX_C6II] + k[864]*y_cur[IDX_C7II] + + k[876]*y_cur[IDX_C7NII] + k[877]*y_cur[IDX_C8II] + + k[889]*y_cur[IDX_C9II] + k[901]*y_cur[IDX_C9NII] + + k[903]*y_cur[IDX_CCPII] + k[918]*y_cur[IDX_CH2COII] + + k[978]*y_cur[IDX_CNCII] + k[1065]*y_cur[IDX_HC3NII] + + k[1224]*y_cur[IDX_SiC2II] + k[1233]*y_cur[IDX_SiC3II] + + k[1238]*y_cur[IDX_SiC4II] - k[5589]*y_cur[IDX_C2I]; + data[jistart + 15418] = 0.0 - k[5153]*y_cur[IDX_C2I]; + data[jistart + 15419] = 0.0 + k[1146]*y_cur[IDX_eM] + k[6724]*y_cur[IDX_GRAINM]; + data[jistart + 15420] = 0.0 + k[772]*y_cur[IDX_eM] + k[6576]*y_cur[IDX_GRAINM]; + data[jistart + 15421] = 0.0 + k[1272]*y_cur[IDX_eM] + k[6696]*y_cur[IDX_GRAINM]; + data[jistart + 15422] = 0.0 + k[1094]*y_cur[IDX_eM] + k[6532]*y_cur[IDX_GRAINM]; + data[jistart + 15423] = 0.0 + k[1127]*y_cur[IDX_eM] + k[6525]*y_cur[IDX_GRAINM]; + data[jistart + 15424] = 0.0 + k[5166]*y_cur[IDX_HI] + k[5398]*y_cur[IDX_OI] - + k[5467]*y_cur[IDX_OHI] + k[5838] + k[5838] + k[6158] + k[6158]; + data[jistart + 15425] = 0.0 + k[1131]*y_cur[IDX_eM] + k[6521]*y_cur[IDX_GRAINM]; + data[jistart + 15426] = 0.0 + k[1023]*y_cur[IDX_eM] + k[6585]*y_cur[IDX_GRAINM]; + data[jistart + 15427] = 0.0 + k[1284]*y_cur[IDX_eM] + k[1287]*y_cur[IDX_eM] + + k[1289]*y_cur[IDX_eM] + k[6711]*y_cur[IDX_GRAINM] + + k[6714]*y_cur[IDX_GRAINM] + k[6716]*y_cur[IDX_GRAINM]; + data[jistart + 15428] = 0.0 + k[1102]*y_cur[IDX_eM] + k[6575]*y_cur[IDX_GRAINM]; + data[jistart + 15429] = 0.0 + k[1290]*y_cur[IDX_eM] + k[1292]*y_cur[IDX_eM] + + k[6731]*y_cur[IDX_GRAINM] + k[6733]*y_cur[IDX_GRAINM]; + data[jistart + 15430] = 0.0 + k[1144]*y_cur[IDX_eM] + k[6757]*y_cur[IDX_GRAINM]; + data[jistart + 15431] = 0.0 + k[2846]*y_cur[IDX_HI]; + data[jistart + 15432] = 0.0 - k[4886]*y_cur[IDX_OHI] - k[4887]*y_cur[IDX_OHI]; + data[jistart + 15433] = 0.0 + k[776]*y_cur[IDX_eM] + k[6608]*y_cur[IDX_GRAINM]; + data[jistart + 15434] = 0.0 + k[5151]*y_cur[IDX_H2OI] - k[5464]*y_cur[IDX_OHI]; + data[jistart + 15435] = 0.0 + k[1018]*y_cur[IDX_eM] + k[6623]*y_cur[IDX_GRAINM]; + data[jistart + 15436] = 0.0 + k[1114]*y_cur[IDX_eM] + k[6559]*y_cur[IDX_GRAINM]; + data[jistart + 15437] = 0.0 + k[2559]*y_cur[IDX_H2OI]; + data[jistart + 15438] = 0.0 + k[2531]*y_cur[IDX_H2OI]; + data[jistart + 15439] = 0.0 + k[1275]*y_cur[IDX_eM] + k[6701]*y_cur[IDX_GRAINM]; + data[jistart + 15440] = 0.0 + k[1128]*y_cur[IDX_eM] + k[6717]*y_cur[IDX_GRAINM]; + data[jistart + 15441] = 0.0 + k[2527]*y_cur[IDX_H2OI]; + data[jistart + 15442] = 0.0 + k[5217]*y_cur[IDX_CI] + k[5218]*y_cur[IDX_OI] + k[5872] + + k[6203]; + data[jistart + 15443] = 0.0 + k[2847]*y_cur[IDX_HI]; + data[jistart + 15444] = 0.0 + k[5161]*y_cur[IDX_HI]; + data[jistart + 15445] = 0.0 + k[1103]*y_cur[IDX_eM] + k[6610]*y_cur[IDX_GRAINM]; + data[jistart + 15446] = 0.0 + k[5216]*y_cur[IDX_OI] + k[5871] + k[6202]; + data[jistart + 15447] = 0.0 + k[5414]*y_cur[IDX_OI]; + data[jistart + 15448] = 0.0 + k[962]*y_cur[IDX_eM] + k[6430]*y_cur[IDX_GRAINM]; + data[jistart + 15449] = 0.0 + k[5647]*y_cur[IDX_HeII] + k[5939] + k[6292]; + data[jistart + 15450] = 0.0 + k[2355]*y_cur[IDX_HII] + k[2725]*y_cur[IDX_H3II] + + k[5185]*y_cur[IDX_HI] + k[5312]*y_cur[IDX_NHI]; + data[jistart + 15451] = 0.0 + k[5434]*y_cur[IDX_OI]; + data[jistart + 15452] = 0.0 + k[5674]*y_cur[IDX_HeII] + k[5947] + k[6296]; + data[jistart + 15453] = 0.0 + k[5638]*y_cur[IDX_HeII] + k[5937] + k[6290]; + data[jistart + 15454] = 0.0 + k[5860] + k[6187]; + data[jistart + 15455] = 0.0 + k[3882]*y_cur[IDX_O2I]; + data[jistart + 15456] = 0.0 + k[5094]*y_cur[IDX_CHI] + k[5131]*y_cur[IDX_COI] + + k[5152]*y_cur[IDX_H2OI] + k[5193]*y_cur[IDX_HI] + + k[5193]*y_cur[IDX_HI] + k[5427]*y_cur[IDX_OI] - + k[5478]*y_cur[IDX_OHI] + k[6238]; + data[jistart + 15457] = 0.0 + k[2518]*y_cur[IDX_H2OII]; + data[jistart + 15458] = 0.0 + k[3085]*y_cur[IDX_HeII] + k[5706] + k[5991]; + data[jistart + 15459] = 0.0 + k[5177]*y_cur[IDX_HI] + k[5326]*y_cur[IDX_NOI] + + k[5412]*y_cur[IDX_OI] - k[5472]*y_cur[IDX_OHI]; + data[jistart + 15460] = 0.0 + k[5179]*y_cur[IDX_HI] - k[5473]*y_cur[IDX_OHI] - + k[5474]*y_cur[IDX_OHI]; + data[jistart + 15461] = 0.0 + k[965]*y_cur[IDX_eM] + k[6442]*y_cur[IDX_GRAINM]; + data[jistart + 15462] = 0.0 + k[2525]*y_cur[IDX_H2OI]; + data[jistart + 15463] = 0.0 + k[5196]*y_cur[IDX_HI]; + data[jistart + 15464] = 0.0 + k[2541]*y_cur[IDX_H2OI]; + data[jistart + 15465] = 0.0 + k[7083] + k[7265] + k[7447]; + data[jistart + 15466] = 0.0 + k[5448]*y_cur[IDX_OI]; + data[jistart + 15467] = 0.0 + k[3818]*y_cur[IDX_O2I]; + data[jistart + 15468] = 0.0 + k[1100]*y_cur[IDX_eM] + k[6568]*y_cur[IDX_GRAINM]; + data[jistart + 15469] = 0.0 - k[3807]*y_cur[IDX_OHI]; + data[jistart + 15470] = 0.0 - k[5475]*y_cur[IDX_OHI]; + data[jistart + 15471] = 0.0 - k[3806]*y_cur[IDX_OHI]; + data[jistart + 15472] = 0.0 + k[3727]*y_cur[IDX_OI]; + data[jistart + 15473] = 0.0 - k[3803]*y_cur[IDX_OHI]; + data[jistart + 15474] = 0.0 - k[698]*y_cur[IDX_OHI] + k[2536]*y_cur[IDX_H2OI]; + data[jistart + 15475] = 0.0 + k[687]*y_cur[IDX_OHII] + k[3771]*y_cur[IDX_OHII]; + data[jistart + 15476] = 0.0 - k[5457]*y_cur[IDX_OHI] - k[5458]*y_cur[IDX_OHI]; + data[jistart + 15477] = 0.0 + k[8583]*y_cur[IDX_GHI]; + data[jistart + 15478] = 0.0 - k[700]*y_cur[IDX_OHI] + k[2557]*y_cur[IDX_H2OI]; + data[jistart + 15479] = 0.0 + k[4802]*y_cur[IDX_OHM]; + data[jistart + 15480] = 0.0 - k[3800]*y_cur[IDX_OHI]; + data[jistart + 15481] = 0.0 + k[3659]*y_cur[IDX_O2II] - k[5055]*y_cur[IDX_OHI] - + k[5056]*y_cur[IDX_OHI]; + data[jistart + 15482] = 0.0 - k[697]*y_cur[IDX_OHI] + k[2519]*y_cur[IDX_H2OI]; + data[jistart + 15483] = 0.0 + k[4805]*y_cur[IDX_OHM]; + data[jistart + 15484] = 0.0 + k[3742]*y_cur[IDX_OI]; + data[jistart + 15485] = 0.0 + k[3492]*y_cur[IDX_H2OI] + k[3501]*y_cur[IDX_O2I] - + k[3504]*y_cur[IDX_OHI]; + data[jistart + 15486] = 0.0 - k[456]*y_cur[IDX_OHI] - k[2397]*y_cur[IDX_OHI]; + data[jistart + 15487] = 0.0 + k[3513]*y_cur[IDX_H2OI] + k[3525]*y_cur[IDX_O2I]; + data[jistart + 15488] = 0.0 + k[4831]*y_cur[IDX_OHM]; + data[jistart + 15489] = 0.0 - k[699]*y_cur[IDX_OHI] + k[2540]*y_cur[IDX_H2OI] - + k[3798]*y_cur[IDX_OHI]; + data[jistart + 15490] = 0.0 - k[3797]*y_cur[IDX_OHI]; + data[jistart + 15491] = 0.0 + k[4812]*y_cur[IDX_OHM]; + data[jistart + 15492] = 0.0 + k[696]*y_cur[IDX_CNI] + k[4797]*y_cur[IDX_CII] + + k[4798]*y_cur[IDX_C2H2II] + k[4799]*y_cur[IDX_C2H3II] + + k[4800]*y_cur[IDX_C4H2II] + k[4801]*y_cur[IDX_C4H3II] + + k[4802]*y_cur[IDX_C4SII] + k[4803]*y_cur[IDX_CH2CCHII] + + k[4804]*y_cur[IDX_CH3II] + k[4805]*y_cur[IDX_CNCII] + + k[4806]*y_cur[IDX_FeII] + k[4807]*y_cur[IDX_HII] + + k[4808]*y_cur[IDX_H2COII] + k[4809]*y_cur[IDX_H2SII] + + k[4810]*y_cur[IDX_H3II] + k[4811]*y_cur[IDX_H3OII] + + k[4812]*y_cur[IDX_HC2SII] + k[4813]*y_cur[IDX_HCNHII] + + k[4814]*y_cur[IDX_HCNHII] + k[4815]*y_cur[IDX_HCOII] + + k[4816]*y_cur[IDX_HCOII] + k[4817]*y_cur[IDX_HeII] + + k[4818]*y_cur[IDX_MgII] + k[4819]*y_cur[IDX_NII] + + k[4820]*y_cur[IDX_N2HII] + k[4821]*y_cur[IDX_NH3II] + + k[4822]*y_cur[IDX_NH4II] + k[4823]*y_cur[IDX_NOII] + + k[4824]*y_cur[IDX_NaII] + k[4825]*y_cur[IDX_OII] + + k[4826]*y_cur[IDX_SII] + k[4827]*y_cur[IDX_SOII] + + k[4828]*y_cur[IDX_SiII] + k[4829]*y_cur[IDX_SiOII] + + k[4830]*y_cur[IDX_SiOHII] + k[4831]*y_cur[IDX_SiSII] + k[5904] + + k[6243]; + data[jistart + 15493] = 0.0 + k[5415]*y_cur[IDX_OI]; + data[jistart + 15494] = 0.0 - k[9]*y_cur[IDX_OHI]; + data[jistart + 15495] = 0.0 - k[5462]*y_cur[IDX_OHI] - k[5463]*y_cur[IDX_OHI]; + data[jistart + 15496] = 0.0 + k[107]*y_cur[IDX_HI] + k[3653]*y_cur[IDX_HCNI]; + data[jistart + 15497] = 0.0 + k[3197]*y_cur[IDX_HeII] + k[3637]*y_cur[IDX_OII] + k[5819] + + k[6124]; + data[jistart + 15498] = 0.0 + k[80]*y_cur[IDX_OI] - k[81]*y_cur[IDX_OHI]; + data[jistart + 15499] = 0.0 + k[1034]*y_cur[IDX_eM] + k[6414]*y_cur[IDX_GRAINM]; + data[jistart + 15500] = 0.0 + k[4829]*y_cur[IDX_OHM]; + data[jistart + 15501] = 0.0 + k[1267]*y_cur[IDX_eM] + k[4830]*y_cur[IDX_OHM] + + k[6556]*y_cur[IDX_GRAINM]; + data[jistart + 15502] = 0.0 + k[591]*y_cur[IDX_OHII] + k[3536]*y_cur[IDX_H2OII] + + k[5299]*y_cur[IDX_NOI] - k[5300]*y_cur[IDX_OHI] - + k[5301]*y_cur[IDX_OHI] + k[5421]*y_cur[IDX_OI]; + data[jistart + 15503] = 0.0 + k[1990]*y_cur[IDX_O2I]; + data[jistart + 15504] = 0.0 + k[268]*y_cur[IDX_CH2I] + k[297]*y_cur[IDX_CHI] + + k[591]*y_cur[IDX_NH2I] + k[685]*y_cur[IDX_C2I] + + k[686]*y_cur[IDX_C2HI] + k[687]*y_cur[IDX_C2H6I] + + k[688]*y_cur[IDX_H2COI] + k[689]*y_cur[IDX_H2OI] + + k[690]*y_cur[IDX_H2SI] + k[691]*y_cur[IDX_HCOI] + + k[692]*y_cur[IDX_NH3I] + k[693]*y_cur[IDX_NOI] + + k[694]*y_cur[IDX_O2I] + k[695]*y_cur[IDX_SI] + + k[3771]*y_cur[IDX_C2H6I] - k[3788]*y_cur[IDX_OHI]; + data[jistart + 15505] = 0.0 + k[1014]*y_cur[IDX_eM] + k[1899]*y_cur[IDX_CI] + + k[2003]*y_cur[IDX_CH2I] + k[2247]*y_cur[IDX_CHI] + + k[2503]*y_cur[IDX_C2I] + k[2504]*y_cur[IDX_C2HI] + + k[2507]*y_cur[IDX_COI] + k[2508]*y_cur[IDX_H2COI] + + k[2509]*y_cur[IDX_H2OI] + k[2510]*y_cur[IDX_H2SI] + + k[2512]*y_cur[IDX_HCNI] + k[2514]*y_cur[IDX_HCOI] + + k[2515]*y_cur[IDX_HNCI] + k[2516]*y_cur[IDX_SI] + + k[2518]*y_cur[IDX_SO2I] + k[3536]*y_cur[IDX_NH2I] + + k[3575]*y_cur[IDX_NH3I] - k[3799]*y_cur[IDX_OHI] + + k[6342]*y_cur[IDX_GRAINM]; + data[jistart + 15506] = 0.0 + k[1966]*y_cur[IDX_O2I] - k[1972]*y_cur[IDX_OHI]; + data[jistart + 15507] = 0.0 + k[5162]*y_cur[IDX_HI]; + data[jistart + 15508] = 0.0 + k[3659]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 15509] = 0.0 - k[5483]*y_cur[IDX_OHI]; + data[jistart + 15510] = 0.0 + k[4806]*y_cur[IDX_OHM]; + data[jistart + 15511] = 0.0 + k[4818]*y_cur[IDX_OHM]; + data[jistart + 15512] = 0.0 + k[4824]*y_cur[IDX_OHM]; + data[jistart + 15513] = 0.0 + k[5306]*y_cur[IDX_H2OI] + k[5312]*y_cur[IDX_NO2I] + + k[5314]*y_cur[IDX_NOI] + k[5317]*y_cur[IDX_O2I] + + k[5320]*y_cur[IDX_OI] - k[5321]*y_cur[IDX_OHI] - + k[5322]*y_cur[IDX_OHI] - k[5323]*y_cur[IDX_OHI]; + data[jistart + 15514] = 0.0 + k[5201]*y_cur[IDX_HI] - k[5481]*y_cur[IDX_OHI]; + data[jistart + 15515] = 0.0 + k[4801]*y_cur[IDX_OHM]; + data[jistart + 15516] = 0.0 - k[3804]*y_cur[IDX_OHI] + k[4820]*y_cur[IDX_OHM]; + data[jistart + 15517] = 0.0 + k[3847]*y_cur[IDX_C2H4I] + k[4827]*y_cur[IDX_OHM]; + data[jistart + 15518] = 0.0 + k[4803]*y_cur[IDX_OHM]; + data[jistart + 15519] = 0.0 + k[3734]*y_cur[IDX_OI] + k[4809]*y_cur[IDX_OHM]; + data[jistart + 15520] = 0.0 - k[563]*y_cur[IDX_OHI] + k[4819]*y_cur[IDX_OHM]; + data[jistart + 15521] = 0.0 + k[4808]*y_cur[IDX_OHM]; + data[jistart + 15522] = 0.0 + k[4823]*y_cur[IDX_OHM]; + data[jistart + 15523] = 0.0 - k[664]*y_cur[IDX_OHI] + k[3633]*y_cur[IDX_C2H4I] + + k[3637]*y_cur[IDX_CH3OHI] + k[3638]*y_cur[IDX_CH4I] + + k[3641]*y_cur[IDX_H2COI] + k[3642]*y_cur[IDX_H2SI] - + k[3650]*y_cur[IDX_OHI] + k[4825]*y_cur[IDX_OHM]; + data[jistart + 15524] = 0.0 + k[4800]*y_cur[IDX_OHM]; + data[jistart + 15525] = 0.0 + k[4813]*y_cur[IDX_OHM] + k[4814]*y_cur[IDX_OHM]; + data[jistart + 15526] = 0.0 + k[268]*y_cur[IDX_OHII] + k[2003]*y_cur[IDX_H2OII] + + k[5004]*y_cur[IDX_NOI] + k[5011]*y_cur[IDX_O2I] + + k[5015]*y_cur[IDX_OI] - k[5016]*y_cur[IDX_OHI] - + k[5017]*y_cur[IDX_OHI] - k[5018]*y_cur[IDX_OHI]; + data[jistart + 15527] = 0.0 + k[2515]*y_cur[IDX_H2OII]; + data[jistart + 15528] = 0.0 + k[3550]*y_cur[IDX_H2OI] - k[3805]*y_cur[IDX_OHI] + + k[4821]*y_cur[IDX_OHM]; + data[jistart + 15529] = 0.0 + k[3633]*y_cur[IDX_OII] + k[3847]*y_cur[IDX_SOII] + + k[5346]*y_cur[IDX_OI]; + data[jistart + 15530] = 0.0 - k[5456]*y_cur[IDX_OHI] - k[5586]*y_cur[IDX_OHI]; + data[jistart + 15531] = 0.0 + k[4822]*y_cur[IDX_OHM]; + data[jistart + 15532] = 0.0 + k[694]*y_cur[IDX_OHII] + k[1966]*y_cur[IDX_CHII] + + k[1990]*y_cur[IDX_CH2II] + k[3501]*y_cur[IDX_NHII] + + k[3525]*y_cur[IDX_NH2II] + k[3818]*y_cur[IDX_PHII] + + k[3882]*y_cur[IDX_SiH2II] + k[5011]*y_cur[IDX_CH2I] + + k[5039]*y_cur[IDX_CH3I] + k[5090]*y_cur[IDX_CHI] + + k[5091]*y_cur[IDX_CHI] + k[5145]*y_cur[IDX_H2I] + + k[5145]*y_cur[IDX_H2I] + k[5190]*y_cur[IDX_HI] + + k[5208]*y_cur[IDX_HCOI] + k[5317]*y_cur[IDX_NHI]; + data[jistart + 15533] = 0.0 - k[3809]*y_cur[IDX_OHI] + k[4828]*y_cur[IDX_OHM]; + data[jistart + 15534] = 0.0 + k[690]*y_cur[IDX_OHII] + k[2510]*y_cur[IDX_H2OII] + + k[3642]*y_cur[IDX_OII] + k[5400]*y_cur[IDX_OI] - + k[5468]*y_cur[IDX_OHI]; + data[jistart + 15535] = 0.0 - k[3808]*y_cur[IDX_OHI] + k[4826]*y_cur[IDX_OHM]; + data[jistart + 15536] = 0.0 - k[5482]*y_cur[IDX_OHI]; + data[jistart + 15537] = 0.0 + k[4799]*y_cur[IDX_OHM]; + data[jistart + 15538] = 0.0 + k[693]*y_cur[IDX_OHII] + k[5004]*y_cur[IDX_CH2I] + + k[5187]*y_cur[IDX_HI] + k[5299]*y_cur[IDX_NH2I] + + k[5314]*y_cur[IDX_NHI] + k[5326]*y_cur[IDX_HNOI] - + k[5477]*y_cur[IDX_OHI]; + data[jistart + 15539] = 0.0 + k[691]*y_cur[IDX_OHII] + k[2514]*y_cur[IDX_H2OII] + + k[5208]*y_cur[IDX_O2I] + k[5406]*y_cur[IDX_OI] - + k[5471]*y_cur[IDX_OHI]; + data[jistart + 15540] = 0.0 + k[3638]*y_cur[IDX_OII] - k[5061]*y_cur[IDX_OHI] + + k[5385]*y_cur[IDX_OI]; + data[jistart + 15541] = 0.0 + k[686]*y_cur[IDX_OHII] + k[2504]*y_cur[IDX_H2OII]; + data[jistart + 15542] = 0.0 + k[688]*y_cur[IDX_OHII] + k[2508]*y_cur[IDX_H2OII] + + k[3641]*y_cur[IDX_OII] + k[5397]*y_cur[IDX_OI] - + k[5465]*y_cur[IDX_OHI] - k[5466]*y_cur[IDX_OHI]; + data[jistart + 15543] = 0.0 + k[2512]*y_cur[IDX_H2OII] + k[3653]*y_cur[IDX_OM] + + k[5402]*y_cur[IDX_OI] - k[5469]*y_cur[IDX_OHI] - + k[5470]*y_cur[IDX_OHI]; + data[jistart + 15544] = 0.0 + k[297]*y_cur[IDX_OHII] + k[2247]*y_cur[IDX_H2OII] + + k[5090]*y_cur[IDX_O2I] + k[5091]*y_cur[IDX_O2I] + + k[5094]*y_cur[IDX_O2HI] + k[5097]*y_cur[IDX_OI] - + k[5099]*y_cur[IDX_OHI]; + data[jistart + 15545] = 0.0 + k[695]*y_cur[IDX_OHII] + k[2516]*y_cur[IDX_H2OII] - + k[5480]*y_cur[IDX_OHI]; + data[jistart + 15546] = 0.0 + k[685]*y_cur[IDX_OHII] + k[2503]*y_cur[IDX_H2OII]; + data[jistart + 15547] = 0.0 - k[9]*y_cur[IDX_CM] - k[81]*y_cur[IDX_HM] - + k[139]*y_cur[IDX_H2I] - k[145]*y_cur[IDX_HI] - k[408]*y_cur[IDX_HII] + - k[456]*y_cur[IDX_H2II] - k[563]*y_cur[IDX_NII] - + k[664]*y_cur[IDX_OII] - k[697]*y_cur[IDX_C2II] - + k[698]*y_cur[IDX_CNII] - k[699]*y_cur[IDX_COII] - + k[700]*y_cur[IDX_N2II] - k[1426]*y_cur[IDX_CII] - + k[1972]*y_cur[IDX_CHII] - k[2093]*y_cur[IDX_CH3II] - + k[2397]*y_cur[IDX_H2II] - k[2733]*y_cur[IDX_H3II] - + k[3297]*y_cur[IDX_HeII] - k[3504]*y_cur[IDX_NHII] - + k[3650]*y_cur[IDX_OII] - k[3788]*y_cur[IDX_OHII] - + k[3796]*y_cur[IDX_C2H2II] - k[3797]*y_cur[IDX_CH5II] - + k[3798]*y_cur[IDX_COII] - k[3799]*y_cur[IDX_H2OII] - + k[3800]*y_cur[IDX_HCNII] - k[3801]*y_cur[IDX_HCOII] - + k[3802]*y_cur[IDX_HCOII] - k[3803]*y_cur[IDX_HNOII] - + k[3804]*y_cur[IDX_N2HII] - k[3805]*y_cur[IDX_NH3II] - + k[3806]*y_cur[IDX_O2HII] - k[3807]*y_cur[IDX_PII] - + k[3808]*y_cur[IDX_SII] - k[3809]*y_cur[IDX_SiII] - + k[4886]*y_cur[IDX_C2H5CNI] - k[4887]*y_cur[IDX_C2H5CNI] - + k[4981]*y_cur[IDX_CI] - k[4982]*y_cur[IDX_CI] - + k[5016]*y_cur[IDX_CH2I] - k[5017]*y_cur[IDX_CH2I] - + k[5018]*y_cur[IDX_CH2I] - k[5045]*y_cur[IDX_CH3I] - + k[5046]*y_cur[IDX_CH3I] - k[5047]*y_cur[IDX_CH3I] - + k[5055]*y_cur[IDX_CH3CHCH2I] - k[5056]*y_cur[IDX_CH3CHCH2I] - + k[5061]*y_cur[IDX_CH4I] - k[5099]*y_cur[IDX_CHI] - + k[5148]*y_cur[IDX_H2I] - k[5198]*y_cur[IDX_HI] - + k[5283]*y_cur[IDX_NI] - k[5284]*y_cur[IDX_NI] - + k[5300]*y_cur[IDX_NH2I] - k[5301]*y_cur[IDX_NH2I] - + k[5321]*y_cur[IDX_NHI] - k[5322]*y_cur[IDX_NHI] - + k[5323]*y_cur[IDX_NHI] - k[5432]*y_cur[IDX_OI] - + k[5453]*y_cur[IDX_C2H2I] - k[5454]*y_cur[IDX_C2H2I] - + k[5455]*y_cur[IDX_C2H2I] - k[5456]*y_cur[IDX_C2H3I] - + k[5457]*y_cur[IDX_C2H5I] - k[5458]*y_cur[IDX_C2H5I] - + k[5459]*y_cur[IDX_CNI] - k[5460]*y_cur[IDX_CNI] - + k[5461]*y_cur[IDX_COI] - k[5462]*y_cur[IDX_CSI] - + k[5463]*y_cur[IDX_CSI] - k[5464]*y_cur[IDX_FI] - + k[5465]*y_cur[IDX_H2COI] - k[5466]*y_cur[IDX_H2COI] - + k[5467]*y_cur[IDX_H2O2I] - k[5468]*y_cur[IDX_H2SI] - + k[5469]*y_cur[IDX_HCNI] - k[5470]*y_cur[IDX_HCNI] - + k[5471]*y_cur[IDX_HCOI] - k[5472]*y_cur[IDX_HNOI] - + k[5473]*y_cur[IDX_N2OI] - k[5474]*y_cur[IDX_N2OI] - + k[5475]*y_cur[IDX_NCCNI] - k[5476]*y_cur[IDX_NH3I] - + k[5477]*y_cur[IDX_NOI] - k[5478]*y_cur[IDX_O2HI] - + k[5479]*y_cur[IDX_OHI] - k[5479]*y_cur[IDX_OHI] - + k[5479]*y_cur[IDX_OHI] - k[5479]*y_cur[IDX_OHI] - + k[5480]*y_cur[IDX_SI] - k[5481]*y_cur[IDX_SOI] - + k[5482]*y_cur[IDX_SiI] - k[5483]*y_cur[IDX_SiOI] - + k[5574]*y_cur[IDX_HI] - k[5586]*y_cur[IDX_C2H3I] - k[5905] - k[6244] + - k[6245] - k[6901]; + data[jistart + 15548] = 0.0 + k[692]*y_cur[IDX_OHII] + k[3575]*y_cur[IDX_H2OII] + + k[5422]*y_cur[IDX_OI] - k[5476]*y_cur[IDX_OHI]; + data[jistart + 15549] = 0.0 - k[3796]*y_cur[IDX_OHI] + k[4798]*y_cur[IDX_OHM]; + data[jistart + 15550] = 0.0 - k[2093]*y_cur[IDX_OHI] + k[4804]*y_cur[IDX_OHM]; + data[jistart + 15551] = 0.0 - k[5453]*y_cur[IDX_OHI] - k[5454]*y_cur[IDX_OHI] - + k[5455]*y_cur[IDX_OHI]; + data[jistart + 15552] = 0.0 + k[696]*y_cur[IDX_OHM] - k[5459]*y_cur[IDX_OHI] - k[5460]*y_cur[IDX_OHI]; - data[jistart + 11408] = 0.0 - k[487]*y_cur[IDX_HI] + - k[2272]*y_cur[IDX_HCNI] + k[2433]*y_cur[IDX_H2I] + - k[2538]*y_cur[IDX_H2OI]; - data[jistart + 11409] = 0.0 - k[106]*y_cur[IDX_HI] + - k[4666]*y_cur[IDX_HII] + k[4669]*y_cur[IDX_H3II] + + data[jistart + 15553] = 0.0 + k[8583]*y_cur[IDX_GOI]; + data[jistart + 15554] = 0.0 + k[5031]*y_cur[IDX_H2OI] + k[5039]*y_cur[IDX_O2I] - + k[5045]*y_cur[IDX_OHI] - k[5046]*y_cur[IDX_OHI] - + k[5047]*y_cur[IDX_OHI]; + data[jistart + 15555] = 0.0 - k[5283]*y_cur[IDX_OHI] - k[5284]*y_cur[IDX_OHI]; + data[jistart + 15556] = 0.0 + k[1043]*y_cur[IDX_eM] + k[1044]*y_cur[IDX_eM] + + k[4811]*y_cur[IDX_OHM] + k[6345]*y_cur[IDX_GRAINM] + + k[6346]*y_cur[IDX_GRAINM]; + data[jistart + 15557] = 0.0 + k[80]*y_cur[IDX_HM] + k[3727]*y_cur[IDX_CH4II] + + k[3734]*y_cur[IDX_H2SII] + k[3742]*y_cur[IDX_HSII] + + k[5015]*y_cur[IDX_CH2I] + k[5097]*y_cur[IDX_CHI] + + k[5147]*y_cur[IDX_H2I] + k[5216]*y_cur[IDX_HOCNI] + + k[5218]*y_cur[IDX_HONCI] + k[5320]*y_cur[IDX_NHI] + + k[5346]*y_cur[IDX_C2H4I] + k[5385]*y_cur[IDX_CH4I] + + k[5397]*y_cur[IDX_H2COI] + k[5398]*y_cur[IDX_H2O2I] + + k[5399]*y_cur[IDX_H2OI] + k[5399]*y_cur[IDX_H2OI] + + k[5400]*y_cur[IDX_H2SI] + k[5402]*y_cur[IDX_HCNI] + + k[5406]*y_cur[IDX_HCOI] + k[5412]*y_cur[IDX_HNOI] + + k[5414]*y_cur[IDX_HPOI] + k[5415]*y_cur[IDX_HSI] + + k[5421]*y_cur[IDX_NH2I] + k[5422]*y_cur[IDX_NH3I] + + k[5427]*y_cur[IDX_O2HI] - k[5432]*y_cur[IDX_OHI] + + k[5434]*y_cur[IDX_PH2I] + k[5448]*y_cur[IDX_SiH4I] + + k[5573]*y_cur[IDX_HI]; + data[jistart + 15558] = 0.0 + k[3085]*y_cur[IDX_C2H5OHI] + k[3197]*y_cur[IDX_CH3OHI] + + k[3226]*y_cur[IDX_H2OI] - k[3297]*y_cur[IDX_OHI] + + k[4817]*y_cur[IDX_OHM] + k[5638]*y_cur[IDX_CH2OHI] + + k[5647]*y_cur[IDX_COOHI] + k[5674]*y_cur[IDX_CH3COOHI]; + data[jistart + 15559] = 0.0 - k[1426]*y_cur[IDX_OHI] + k[4797]*y_cur[IDX_OHM]; + data[jistart + 15560] = 0.0 + k[136]*y_cur[IDX_H2I] + k[143]*y_cur[IDX_HI] + + k[689]*y_cur[IDX_OHII] + k[2509]*y_cur[IDX_H2OII] + + k[2519]*y_cur[IDX_C2II] + k[2525]*y_cur[IDX_C2NII] + + k[2527]*y_cur[IDX_C2N2II] + k[2531]*y_cur[IDX_C3OII] + + k[2536]*y_cur[IDX_CNII] + k[2540]*y_cur[IDX_COII] + + k[2541]*y_cur[IDX_CO2II] + k[2557]*y_cur[IDX_N2II] + + k[2559]*y_cur[IDX_N2OII] + k[3226]*y_cur[IDX_HeII] + + k[3492]*y_cur[IDX_NHII] + k[3513]*y_cur[IDX_NH2II] + + k[3550]*y_cur[IDX_NH3II] + k[5031]*y_cur[IDX_CH3I] + + k[5151]*y_cur[IDX_FI] + k[5152]*y_cur[IDX_O2HI] + + k[5168]*y_cur[IDX_HI] + k[5306]*y_cur[IDX_NHI] + + k[5399]*y_cur[IDX_OI] + k[5399]*y_cur[IDX_OI] + k[5839] + k[6160]; + data[jistart + 15561] = 0.0 - k[408]*y_cur[IDX_OHI] + k[2355]*y_cur[IDX_NO2I] + + k[4807]*y_cur[IDX_OHM]; + data[jistart + 15562] = 0.0 + k[1899]*y_cur[IDX_H2OII] - k[4981]*y_cur[IDX_OHI] - + k[4982]*y_cur[IDX_OHI] + k[5217]*y_cur[IDX_HONCI]; + data[jistart + 15563] = 0.0 - k[3801]*y_cur[IDX_OHI] - k[3802]*y_cur[IDX_OHI] + + k[4815]*y_cur[IDX_OHM] + k[4816]*y_cur[IDX_OHM]; + data[jistart + 15564] = 0.0 + k[2725]*y_cur[IDX_NO2I] - k[2733]*y_cur[IDX_OHI] + + k[4810]*y_cur[IDX_OHM]; + data[jistart + 15565] = 0.0 + k[2507]*y_cur[IDX_H2OII] + k[5131]*y_cur[IDX_O2HI] + + k[5163]*y_cur[IDX_HI] - k[5461]*y_cur[IDX_OHI]; + data[jistart + 15566] = 0.0 + k[6342]*y_cur[IDX_H2OII] + k[6345]*y_cur[IDX_H3OII] + + k[6346]*y_cur[IDX_H3OII] + k[6414]*y_cur[IDX_H3COII] + + k[6430]*y_cur[IDX_CH3OHII] + k[6442]*y_cur[IDX_CH3OH2II] + + k[6521]*y_cur[IDX_HONCII] + k[6525]*y_cur[IDX_HOCNII] + + k[6532]*y_cur[IDX_HCNOHII] + k[6556]*y_cur[IDX_SiOHII] + + k[6559]*y_cur[IDX_HN2OII] + k[6568]*y_cur[IDX_HCO2II] + + k[6575]*y_cur[IDX_HCOOHII] + k[6576]*y_cur[IDX_C2H5OHII] + + k[6585]*y_cur[IDX_H2SiOII] + k[6608]*y_cur[IDX_C2H5OH2II] + + k[6610]*y_cur[IDX_HCOOH2II] + k[6623]*y_cur[IDX_H2POII] + + k[6696]*y_cur[IDX_CH2OHCOII] + k[6701]*y_cur[IDX_CH2OHCHOII] + + k[6711]*y_cur[IDX_CH3COOHII] + k[6714]*y_cur[IDX_CH3COOHII] + + k[6716]*y_cur[IDX_CH3COOHII] + k[6717]*y_cur[IDX_HOCSII] + + k[6724]*y_cur[IDX_HSiO2II] + k[6731]*y_cur[IDX_CH3COOH2II] + + k[6733]*y_cur[IDX_CH3COOH2II] + k[6757]*y_cur[IDX_HSO2II]; + data[jistart + 15567] = 0.0 + k[136]*y_cur[IDX_H2OI] - k[139]*y_cur[IDX_OHI] + + k[5145]*y_cur[IDX_O2I] + k[5145]*y_cur[IDX_O2I] + + k[5147]*y_cur[IDX_OI] - k[5148]*y_cur[IDX_OHI]; + data[jistart + 15568] = 0.0 + k[772]*y_cur[IDX_C2H5OHII] + k[776]*y_cur[IDX_C2H5OH2II] + + k[962]*y_cur[IDX_CH3OHII] + k[965]*y_cur[IDX_CH3OH2II] + + k[1014]*y_cur[IDX_H2OII] + k[1018]*y_cur[IDX_H2POII] + + k[1023]*y_cur[IDX_H2SiOII] + k[1034]*y_cur[IDX_H3COII] + + k[1043]*y_cur[IDX_H3OII] + k[1044]*y_cur[IDX_H3OII] + + k[1094]*y_cur[IDX_HCNOHII] + k[1100]*y_cur[IDX_HCO2II] + + k[1102]*y_cur[IDX_HCOOHII] + k[1103]*y_cur[IDX_HCOOH2II] + + k[1114]*y_cur[IDX_HN2OII] + k[1127]*y_cur[IDX_HOCNII] + + k[1128]*y_cur[IDX_HOCSII] + k[1131]*y_cur[IDX_HONCII] + + k[1144]*y_cur[IDX_HSO2II] + k[1146]*y_cur[IDX_HSiO2II] + + k[1267]*y_cur[IDX_SiOHII] + k[1272]*y_cur[IDX_CH2OHCOII] + + k[1275]*y_cur[IDX_CH2OHCHOII] + k[1284]*y_cur[IDX_CH3COOHII] + + k[1287]*y_cur[IDX_CH3COOHII] + k[1289]*y_cur[IDX_CH3COOHII] + + k[1290]*y_cur[IDX_CH3COOH2II] + k[1292]*y_cur[IDX_CH3COOH2II]; + data[jistart + 15569] = 0.0 + k[107]*y_cur[IDX_OM] + k[143]*y_cur[IDX_H2OI] - + k[145]*y_cur[IDX_OHI] + k[2846]*y_cur[IDX_NO2II] + + k[2847]*y_cur[IDX_SO2II] + k[5161]*y_cur[IDX_CNOI] + + k[5162]*y_cur[IDX_CO2I] + k[5163]*y_cur[IDX_COI] + + k[5166]*y_cur[IDX_H2O2I] + k[5168]*y_cur[IDX_H2OI] + + k[5177]*y_cur[IDX_HNOI] + k[5179]*y_cur[IDX_N2OI] + + k[5185]*y_cur[IDX_NO2I] + k[5187]*y_cur[IDX_NOI] + + k[5190]*y_cur[IDX_O2I] + k[5193]*y_cur[IDX_O2HI] + + k[5193]*y_cur[IDX_O2HI] + k[5196]*y_cur[IDX_OCNI] - + k[5198]*y_cur[IDX_OHI] + k[5201]*y_cur[IDX_SOI] + + k[5573]*y_cur[IDX_OI] - k[5574]*y_cur[IDX_OHI]; + data[jistart + 15570] = 0.0 + k[1215]*y_cur[IDX_eM] + k[6617]*y_cur[IDX_GRAINM]; + data[jistart + 15571] = 0.0 - k[3566]*y_cur[IDX_NH3I]; + data[jistart + 15572] = 0.0 + k[7082] + k[7264] + k[7446]; + data[jistart + 15573] = 0.0 - k[3590]*y_cur[IDX_NH3I]; + data[jistart + 15574] = 0.0 - k[3559]*y_cur[IDX_NH3I]; + data[jistart + 15575] = 0.0 - k[3560]*y_cur[IDX_NH3I]; + data[jistart + 15576] = 0.0 - k[3567]*y_cur[IDX_NH3I]; + data[jistart + 15577] = 0.0 - k[3601]*y_cur[IDX_NH3I]; + data[jistart + 15578] = 0.0 - k[3591]*y_cur[IDX_NH3I]; + data[jistart + 15579] = 0.0 - k[3586]*y_cur[IDX_NH3I]; + data[jistart + 15580] = 0.0 - k[1818]*y_cur[IDX_NH3I]; + data[jistart + 15581] = 0.0 - k[3593]*y_cur[IDX_NH3I]; + data[jistart + 15582] = 0.0 + k[8582]*y_cur[IDX_GHI]; + data[jistart + 15583] = 0.0 - k[3599]*y_cur[IDX_NH3I] - k[3600]*y_cur[IDX_NH3I]; + data[jistart + 15584] = 0.0 - k[612]*y_cur[IDX_NH3I]; + data[jistart + 15585] = 0.0 - k[601]*y_cur[IDX_NH3I] - k[3568]*y_cur[IDX_NH3I]; + data[jistart + 15586] = 0.0 - k[3569]*y_cur[IDX_NH3I] - k[3570]*y_cur[IDX_NH3I]; + data[jistart + 15587] = 0.0 - k[2121]*y_cur[IDX_NH3I]; + data[jistart + 15588] = 0.0 - k[3561]*y_cur[IDX_NH3I]; + data[jistart + 15589] = 0.0 - k[3603]*y_cur[IDX_NH3I]; + data[jistart + 15590] = 0.0 - k[607]*y_cur[IDX_NH3I]; + data[jistart + 15591] = 0.0 - k[603]*y_cur[IDX_NH3I]; + data[jistart + 15592] = 0.0 - k[3587]*y_cur[IDX_NH3I]; + data[jistart + 15593] = 0.0 - k[3596]*y_cur[IDX_NH3I] - k[3597]*y_cur[IDX_NH3I] - + k[3598]*y_cur[IDX_NH3I]; + data[jistart + 15594] = 0.0 - k[3585]*y_cur[IDX_NH3I]; + data[jistart + 15595] = 0.0 - k[3580]*y_cur[IDX_NH3I]; + data[jistart + 15596] = 0.0 - k[613]*y_cur[IDX_NH3I] - k[3595]*y_cur[IDX_NH3I]; + data[jistart + 15597] = 0.0 - k[3579]*y_cur[IDX_NH3I]; + data[jistart + 15598] = 0.0 - k[3594]*y_cur[IDX_NH3I]; + data[jistart + 15599] = 0.0 - k[282]*y_cur[IDX_NH3I] - k[2144]*y_cur[IDX_NH3I]; + data[jistart + 15600] = 0.0 - k[3588]*y_cur[IDX_NH3I]; + data[jistart + 15601] = 0.0 - k[3558]*y_cur[IDX_NH3I]; + data[jistart + 15602] = 0.0 - k[610]*y_cur[IDX_NH3I]; + data[jistart + 15603] = 0.0 - k[608]*y_cur[IDX_NH3I] - k[3581]*y_cur[IDX_NH3I]; + data[jistart + 15604] = 0.0 - k[3572]*y_cur[IDX_NH3I]; + data[jistart + 15605] = 0.0 - k[609]*y_cur[IDX_NH3I] - k[3589]*y_cur[IDX_NH3I]; + data[jistart + 15606] = 0.0 - k[576]*y_cur[IDX_NH3I] - k[3498]*y_cur[IDX_NH3I]; + data[jistart + 15607] = 0.0 + k[4786]*y_cur[IDX_NH3II] + k[4787]*y_cur[IDX_NH4II]; + data[jistart + 15608] = 0.0 + k[4645]*y_cur[IDX_NH3II] + k[4646]*y_cur[IDX_NH4II]; + data[jistart + 15609] = 0.0 - k[452]*y_cur[IDX_NH3I]; + data[jistart + 15610] = 0.0 - k[582]*y_cur[IDX_NH3I] + k[3516]*y_cur[IDX_H2SI] - + k[3523]*y_cur[IDX_NH3I]; + data[jistart + 15611] = 0.0 + k[4856]*y_cur[IDX_NH3II] + k[4857]*y_cur[IDX_NH4II]; + data[jistart + 15612] = 0.0 + k[4050]*y_cur[IDX_NH3II] + k[4051]*y_cur[IDX_NH4II]; + data[jistart + 15613] = 0.0 + k[4225]*y_cur[IDX_NH3II] + k[4226]*y_cur[IDX_NH4II]; + data[jistart + 15614] = 0.0 - k[602]*y_cur[IDX_NH3I] - k[3573]*y_cur[IDX_NH3I]; + data[jistart + 15615] = 0.0 - k[3571]*y_cur[IDX_NH3I]; + data[jistart + 15616] = 0.0 + k[4821]*y_cur[IDX_NH3II] + k[4822]*y_cur[IDX_NH4II]; + data[jistart + 15617] = 0.0 + k[3980]*y_cur[IDX_NH3II] + k[3981]*y_cur[IDX_NH4II]; + data[jistart + 15618] = 0.0 + k[4120]*y_cur[IDX_NH3II] + k[4121]*y_cur[IDX_NH4II]; + data[jistart + 15619] = 0.0 + k[4400]*y_cur[IDX_NH3II] + k[4401]*y_cur[IDX_NH4II]; + data[jistart + 15620] = 0.0 + k[4540]*y_cur[IDX_NH3II] + k[4541]*y_cur[IDX_NH4II]; + data[jistart + 15621] = 0.0 + k[4470]*y_cur[IDX_NH3II] + k[4471]*y_cur[IDX_NH4II]; + data[jistart + 15622] = 0.0 + k[4610]*y_cur[IDX_NH3II] + k[4611]*y_cur[IDX_NH4II]; + data[jistart + 15623] = 0.0 + k[3945]*y_cur[IDX_NH3II] + k[3946]*y_cur[IDX_NH4II]; + data[jistart + 15624] = 0.0 + k[4295]*y_cur[IDX_NH3II] + k[4296]*y_cur[IDX_NH4II]; + data[jistart + 15625] = 0.0 + k[4330]*y_cur[IDX_NH3II] + k[4331]*y_cur[IDX_NH4II]; + data[jistart + 15626] = 0.0 + k[3910]*y_cur[IDX_NH3II] + k[3911]*y_cur[IDX_NH4II]; + data[jistart + 15627] = 0.0 + k[4751]*y_cur[IDX_NH3II] + k[4752]*y_cur[IDX_NH4II]; + data[jistart + 15628] = 0.0 + k[4575]*y_cur[IDX_NH3II] + k[4576]*y_cur[IDX_NH4II]; + data[jistart + 15629] = 0.0 + k[78]*y_cur[IDX_NH2I] + k[4716]*y_cur[IDX_NH3II] + + k[4717]*y_cur[IDX_NH4II]; + data[jistart + 15630] = 0.0 - k[600]*y_cur[IDX_NH3I] - k[3562]*y_cur[IDX_NH3I] - + k[3563]*y_cur[IDX_NH3I]; + data[jistart + 15631] = 0.0 - k[3564]*y_cur[IDX_NH3I] - k[3565]*y_cur[IDX_NH3I]; + data[jistart + 15632] = 0.0 + k[4505]*y_cur[IDX_NH3II] + k[4506]*y_cur[IDX_NH4II]; + data[jistart + 15633] = 0.0 + k[4015]*y_cur[IDX_NH3II] + k[4016]*y_cur[IDX_NH4II]; + data[jistart + 15634] = 0.0 + k[4085]*y_cur[IDX_NH3II] + k[4086]*y_cur[IDX_NH4II]; + data[jistart + 15635] = 0.0 + k[4190]*y_cur[IDX_NH3II] + k[4191]*y_cur[IDX_NH4II]; + data[jistart + 15636] = 0.0 + k[4365]*y_cur[IDX_NH3II] + k[4366]*y_cur[IDX_NH4II]; + data[jistart + 15637] = 0.0 - k[3577]*y_cur[IDX_NH3I]; + data[jistart + 15638] = 0.0 + k[4260]*y_cur[IDX_NH3II] + k[4261]*y_cur[IDX_NH4II]; + data[jistart + 15639] = 0.0 + k[4435]*y_cur[IDX_NH3II] + k[4436]*y_cur[IDX_NH4II]; + data[jistart + 15640] = 0.0 - k[3604]*y_cur[IDX_NH3I]; + data[jistart + 15641] = 0.0 + k[78]*y_cur[IDX_HM] + k[5142]*y_cur[IDX_H2I] + + k[5297]*y_cur[IDX_CH4I] + k[5301]*y_cur[IDX_OHI]; + data[jistart + 15642] = 0.0 - k[3554]*y_cur[IDX_NH3I] - k[3555]*y_cur[IDX_NH3I]; + data[jistart + 15643] = 0.0 - k[1988]*y_cur[IDX_NH3I] - k[1989]*y_cur[IDX_NH3I]; + data[jistart + 15644] = 0.0 - k[692]*y_cur[IDX_NH3I] - k[3786]*y_cur[IDX_NH3I]; + data[jistart + 15645] = 0.0 - k[605]*y_cur[IDX_NH3I] - k[3575]*y_cur[IDX_NH3I]; + data[jistart + 15646] = 0.0 + k[4155]*y_cur[IDX_NH3II] + k[4156]*y_cur[IDX_NH4II]; + data[jistart + 15647] = 0.0 - k[253]*y_cur[IDX_NH3I] - k[1963]*y_cur[IDX_NH3I] - + k[1964]*y_cur[IDX_NH3I]; + data[jistart + 15648] = 0.0 - k[611]*y_cur[IDX_NH3I]; + data[jistart + 15649] = 0.0 + k[592]*y_cur[IDX_NH3II]; + data[jistart + 15650] = 0.0 + k[594]*y_cur[IDX_NH3II]; + data[jistart + 15651] = 0.0 + k[596]*y_cur[IDX_NH3II]; + data[jistart + 15652] = 0.0 - k[5307]*y_cur[IDX_NH3I]; + data[jistart + 15653] = 0.0 + k[4680]*y_cur[IDX_NH3II] + k[4681]*y_cur[IDX_NH4II]; + data[jistart + 15654] = 0.0 - k[599]*y_cur[IDX_NH3I]; + data[jistart + 15655] = 0.0 - k[3592]*y_cur[IDX_NH3I]; + data[jistart + 15656] = 0.0 - k[615]*y_cur[IDX_NH3I]; + data[jistart + 15657] = 0.0 - k[606]*y_cur[IDX_NH3I] - k[3576]*y_cur[IDX_NH3I]; + data[jistart + 15658] = 0.0 - k[558]*y_cur[IDX_NH3I] - k[3353]*y_cur[IDX_NH3I] - + k[3354]*y_cur[IDX_NH3I]; + data[jistart + 15659] = 0.0 - k[604]*y_cur[IDX_NH3I] - k[3574]*y_cur[IDX_NH3I]; + data[jistart + 15660] = 0.0 - k[661]*y_cur[IDX_NH3I]; + data[jistart + 15661] = 0.0 - k[3582]*y_cur[IDX_NH3I] - k[3583]*y_cur[IDX_NH3I]; + data[jistart + 15662] = 0.0 + k[592]*y_cur[IDX_FeI] + k[593]*y_cur[IDX_HCOI] + + k[594]*y_cur[IDX_MgI] + k[595]*y_cur[IDX_NOI] + + k[596]*y_cur[IDX_NaI] + k[597]*y_cur[IDX_SiI] - + k[3553]*y_cur[IDX_NH3I] + k[3910]*y_cur[IDX_CM] + + k[3945]*y_cur[IDX_C10M] + k[3980]*y_cur[IDX_C10HM] + + k[4015]*y_cur[IDX_C2M] + k[4050]*y_cur[IDX_C2HM] + + k[4085]*y_cur[IDX_C3M] + k[4120]*y_cur[IDX_C3HM] + + k[4155]*y_cur[IDX_C3NM] + k[4190]*y_cur[IDX_C4M] + + k[4225]*y_cur[IDX_C4HM] + k[4260]*y_cur[IDX_C5M] + + k[4295]*y_cur[IDX_C5HM] + k[4330]*y_cur[IDX_C5NM] + + k[4365]*y_cur[IDX_C6M] + k[4400]*y_cur[IDX_C6HM] + + k[4435]*y_cur[IDX_C7M] + k[4470]*y_cur[IDX_C7HM] + + k[4505]*y_cur[IDX_C8M] + k[4540]*y_cur[IDX_C8HM] + + k[4575]*y_cur[IDX_C9M] + k[4610]*y_cur[IDX_C9HM] + + k[4645]*y_cur[IDX_CHM] + k[4680]*y_cur[IDX_CNM] + + k[4716]*y_cur[IDX_HM] + k[4751]*y_cur[IDX_OM] + + k[4786]*y_cur[IDX_O2M] + k[4821]*y_cur[IDX_OHM] + + k[4856]*y_cur[IDX_SM]; + data[jistart + 15663] = 0.0 + k[1167]*y_cur[IDX_eM] + k[3911]*y_cur[IDX_CM] + + k[3946]*y_cur[IDX_C10M] + k[3981]*y_cur[IDX_C10HM] + + k[4016]*y_cur[IDX_C2M] + k[4051]*y_cur[IDX_C2HM] + + k[4086]*y_cur[IDX_C3M] + k[4121]*y_cur[IDX_C3HM] + + k[4156]*y_cur[IDX_C3NM] + k[4191]*y_cur[IDX_C4M] + + k[4226]*y_cur[IDX_C4HM] + k[4261]*y_cur[IDX_C5M] + + k[4296]*y_cur[IDX_C5HM] + k[4331]*y_cur[IDX_C5NM] + + k[4366]*y_cur[IDX_C6M] + k[4401]*y_cur[IDX_C6HM] + + k[4436]*y_cur[IDX_C7M] + k[4471]*y_cur[IDX_C7HM] + + k[4506]*y_cur[IDX_C8M] + k[4541]*y_cur[IDX_C8HM] + + k[4576]*y_cur[IDX_C9M] + k[4611]*y_cur[IDX_C9HM] + + k[4646]*y_cur[IDX_CHM] + k[4681]*y_cur[IDX_CNM] + + k[4717]*y_cur[IDX_HM] + k[4752]*y_cur[IDX_OM] + + k[4787]*y_cur[IDX_O2M] + k[4822]*y_cur[IDX_OHM] + + k[4857]*y_cur[IDX_SM] + k[6339]*y_cur[IDX_GRAINM]; + data[jistart + 15664] = 0.0 - k[3602]*y_cur[IDX_NH3I]; + data[jistart + 15665] = 0.0 + k[3516]*y_cur[IDX_NH2II]; + data[jistart + 15666] = 0.0 - k[614]*y_cur[IDX_NH3I]; + data[jistart + 15667] = 0.0 + k[597]*y_cur[IDX_NH3II]; + data[jistart + 15668] = 0.0 - k[3557]*y_cur[IDX_NH3I]; + data[jistart + 15669] = 0.0 + k[595]*y_cur[IDX_NH3II]; + data[jistart + 15670] = 0.0 + k[593]*y_cur[IDX_NH3II]; + data[jistart + 15671] = 0.0 + k[5297]*y_cur[IDX_NH2I]; + data[jistart + 15672] = 0.0 - k[5082]*y_cur[IDX_NH3I]; + data[jistart + 15673] = 0.0 + k[5301]*y_cur[IDX_NH2I] - k[5476]*y_cur[IDX_NH3I]; + data[jistart + 15674] = 0.0 - k[185]*y_cur[IDX_CII] - k[253]*y_cur[IDX_CHII] - + k[282]*y_cur[IDX_CH4II] - k[401]*y_cur[IDX_HII] - + k[452]*y_cur[IDX_H2II] - k[524]*y_cur[IDX_HeII] - + k[558]*y_cur[IDX_NII] - k[576]*y_cur[IDX_NHII] - + k[582]*y_cur[IDX_NH2II] - k[598]*y_cur[IDX_C2H2II] - + k[599]*y_cur[IDX_C2H4II] - k[600]*y_cur[IDX_C3HII] - + k[601]*y_cur[IDX_C2H6II] - k[602]*y_cur[IDX_COII] - + k[603]*y_cur[IDX_CO2II] - k[604]*y_cur[IDX_H2COII] - + k[605]*y_cur[IDX_H2OII] - k[606]*y_cur[IDX_H2SII] - + k[607]*y_cur[IDX_HC3NII] - k[608]*y_cur[IDX_HCNII] - + k[609]*y_cur[IDX_HSII] - k[610]*y_cur[IDX_N2II] - + k[611]*y_cur[IDX_O2II] - k[612]*y_cur[IDX_OCSII] - + k[613]*y_cur[IDX_PII] - k[614]*y_cur[IDX_SII] - + k[615]*y_cur[IDX_SOII] - k[661]*y_cur[IDX_OII] - + k[692]*y_cur[IDX_OHII] - k[1418]*y_cur[IDX_CII] - + k[1419]*y_cur[IDX_CII] - k[1818]*y_cur[IDX_C3H7II] - + k[1963]*y_cur[IDX_CHII] - k[1964]*y_cur[IDX_CHII] - + k[1988]*y_cur[IDX_CH2II] - k[1989]*y_cur[IDX_CH2II] - + k[2087]*y_cur[IDX_CH3II] - k[2088]*y_cur[IDX_CH3II] - + k[2121]*y_cur[IDX_CH3OH2II] - k[2144]*y_cur[IDX_CH4II] - + k[2723]*y_cur[IDX_H3II] - k[3283]*y_cur[IDX_HeII] - + k[3284]*y_cur[IDX_HeII] - k[3353]*y_cur[IDX_NII] - + k[3354]*y_cur[IDX_NII] - k[3498]*y_cur[IDX_NHII] - + k[3523]*y_cur[IDX_NH2II] - k[3553]*y_cur[IDX_NH3II] - + k[3554]*y_cur[IDX_C2HII] - k[3555]*y_cur[IDX_C2HII] - + k[3556]*y_cur[IDX_C2H2II] - k[3557]*y_cur[IDX_C2H3II] - + k[3558]*y_cur[IDX_C2H5II] - k[3559]*y_cur[IDX_C2H5OH2II] - + k[3560]*y_cur[IDX_C2H7II] - k[3561]*y_cur[IDX_C2NII] - + k[3562]*y_cur[IDX_C3HII] - k[3563]*y_cur[IDX_C3HII] - + k[3564]*y_cur[IDX_C3H3II] - k[3565]*y_cur[IDX_C3H3II] - + k[3566]*y_cur[IDX_CClII] - k[3567]*y_cur[IDX_CH2CHCNHII] - + k[3568]*y_cur[IDX_C2H6II] - k[3569]*y_cur[IDX_CH3CHOHII] - + k[3570]*y_cur[IDX_CH3CHOHII] - k[3571]*y_cur[IDX_CH5II] - + k[3572]*y_cur[IDX_CNCII] - k[3573]*y_cur[IDX_COII] - + k[3574]*y_cur[IDX_H2COII] - k[3575]*y_cur[IDX_H2OII] - + k[3576]*y_cur[IDX_H2SII] - k[3577]*y_cur[IDX_H3COII] - + k[3578]*y_cur[IDX_H3OII] - k[3579]*y_cur[IDX_H3SII] - + k[3580]*y_cur[IDX_HC3NHII] - k[3581]*y_cur[IDX_HCNII] - + k[3582]*y_cur[IDX_HCNHII] - k[3583]*y_cur[IDX_HCNHII] - + k[3584]*y_cur[IDX_HCOII] - k[3585]*y_cur[IDX_HCO2II] - + k[3586]*y_cur[IDX_HCOOH2II] - k[3587]*y_cur[IDX_HCSII] - + k[3588]*y_cur[IDX_HNOII] - k[3589]*y_cur[IDX_HSII] - + k[3590]*y_cur[IDX_HSO2II] - k[3591]*y_cur[IDX_HSiSII] - + k[3592]*y_cur[IDX_N2HII] - k[3593]*y_cur[IDX_NCCNHII] - + k[3594]*y_cur[IDX_O2HII] - k[3595]*y_cur[IDX_PII] - + k[3596]*y_cur[IDX_PHII] - k[3597]*y_cur[IDX_PHII] - + k[3598]*y_cur[IDX_PHII] - k[3599]*y_cur[IDX_PH2II] - + k[3600]*y_cur[IDX_PH2II] - k[3601]*y_cur[IDX_PH3II] - + k[3602]*y_cur[IDX_SiII] - k[3603]*y_cur[IDX_SiHII] - + k[3604]*y_cur[IDX_SiOHII] - k[3786]*y_cur[IDX_OHII] - + k[5036]*y_cur[IDX_CH3I] - k[5082]*y_cur[IDX_CHI] - + k[5183]*y_cur[IDX_HI] - k[5302]*y_cur[IDX_CNI] - + k[5303]*y_cur[IDX_CNI] - k[5307]*y_cur[IDX_NHI] - + k[5422]*y_cur[IDX_OI] - k[5476]*y_cur[IDX_OHI] - k[5885] - k[5886] - + k[5887] - k[6221] - k[6222] - k[6223] - k[6900]; + data[jistart + 15675] = 0.0 - k[598]*y_cur[IDX_NH3I] - k[3556]*y_cur[IDX_NH3I]; + data[jistart + 15676] = 0.0 - k[2087]*y_cur[IDX_NH3I] - k[2088]*y_cur[IDX_NH3I]; + data[jistart + 15677] = 0.0 - k[5302]*y_cur[IDX_NH3I] - k[5303]*y_cur[IDX_NH3I]; + data[jistart + 15678] = 0.0 + k[8582]*y_cur[IDX_GNH2I]; + data[jistart + 15679] = 0.0 - k[5036]*y_cur[IDX_NH3I]; + data[jistart + 15680] = 0.0 - k[3578]*y_cur[IDX_NH3I]; + data[jistart + 15681] = 0.0 - k[5422]*y_cur[IDX_NH3I]; + data[jistart + 15682] = 0.0 - k[524]*y_cur[IDX_NH3I] - k[3283]*y_cur[IDX_NH3I] - + k[3284]*y_cur[IDX_NH3I]; + data[jistart + 15683] = 0.0 - k[185]*y_cur[IDX_NH3I] - k[1418]*y_cur[IDX_NH3I] - + k[1419]*y_cur[IDX_NH3I]; + data[jistart + 15684] = 0.0 - k[401]*y_cur[IDX_NH3I]; + data[jistart + 15685] = 0.0 - k[3584]*y_cur[IDX_NH3I]; + data[jistart + 15686] = 0.0 - k[2723]*y_cur[IDX_NH3I]; + data[jistart + 15687] = 0.0 + k[6339]*y_cur[IDX_NH4II] + k[6617]*y_cur[IDX_PNH3II]; + data[jistart + 15688] = 0.0 + k[5142]*y_cur[IDX_NH2I]; + data[jistart + 15689] = 0.0 + k[1167]*y_cur[IDX_NH4II] + k[1215]*y_cur[IDX_PNH3II]; + data[jistart + 15690] = 0.0 - k[5183]*y_cur[IDX_NH3I]; + data[jistart + 15691] = 0.0 + k[1542]*y_cur[IDX_C2H2I]; + data[jistart + 15692] = 0.0 + k[3169]*y_cur[IDX_HeII]; + data[jistart + 15693] = 0.0 - k[5510]*y_cur[IDX_C2H2II]; + data[jistart + 15694] = 0.0 + k[229]*y_cur[IDX_C2H2I] + k[2445]*y_cur[IDX_H2I]; + data[jistart + 15695] = 0.0 - k[1503]*y_cur[IDX_C2H2II] - k[1504]*y_cur[IDX_C2H2II]; + data[jistart + 15696] = 0.0 + k[228]*y_cur[IDX_C2H2I]; + data[jistart + 15697] = 0.0 - k[5509]*y_cur[IDX_C2H2II]; + data[jistart + 15698] = 0.0 - k[1531]*y_cur[IDX_C2H2II] - k[1532]*y_cur[IDX_C2H2II] - + k[1533]*y_cur[IDX_C2H2II] - k[1534]*y_cur[IDX_C2H2II]; + data[jistart + 15699] = 0.0 - k[218]*y_cur[IDX_C2H2II] - k[1499]*y_cur[IDX_C2H2II] - + k[1500]*y_cur[IDX_C2H2II]; + data[jistart + 15700] = 0.0 - k[1513]*y_cur[IDX_C2H2II] - k[1514]*y_cur[IDX_C2H2II] - + k[1515]*y_cur[IDX_C2H2II]; + data[jistart + 15701] = 0.0 + k[1749]*y_cur[IDX_C2HI]; + data[jistart + 15702] = 0.0 + k[277]*y_cur[IDX_C2H2I]; + data[jistart + 15703] = 0.0 + k[1747]*y_cur[IDX_C2HI]; + data[jistart + 15704] = 0.0 - k[1516]*y_cur[IDX_C2H2II] - k[1517]*y_cur[IDX_C2H2II]; + data[jistart + 15705] = 0.0 - k[217]*y_cur[IDX_C2H2II] - k[1495]*y_cur[IDX_C2H2II] - + k[1496]*y_cur[IDX_C2H2II]; + data[jistart + 15706] = 0.0 - k[216]*y_cur[IDX_C2H2II] - k[1491]*y_cur[IDX_C2H2II] - + k[1492]*y_cur[IDX_C2H2II]; + data[jistart + 15707] = 0.0 + k[1343]*y_cur[IDX_CII]; + data[jistart + 15708] = 0.0 + k[1367]*y_cur[IDX_CII] - k[1511]*y_cur[IDX_C2H2II] - + k[1512]*y_cur[IDX_C2H2II] + k[3188]*y_cur[IDX_HeII]; + data[jistart + 15709] = 0.0 - k[1485]*y_cur[IDX_C2H2II] - k[1486]*y_cur[IDX_C2H2II]; + data[jistart + 15710] = 0.0 + k[230]*y_cur[IDX_C2H2I] + k[1745]*y_cur[IDX_C2HI]; + data[jistart + 15711] = 0.0 + k[1373]*y_cur[IDX_CII]; + data[jistart + 15712] = 0.0 + k[2147]*y_cur[IDX_CH4I]; + data[jistart + 15713] = 0.0 + k[3480]*y_cur[IDX_C2HI]; + data[jistart + 15714] = 0.0 - k[4763]*y_cur[IDX_C2H2II]; + data[jistart + 15715] = 0.0 - k[4622]*y_cur[IDX_C2H2II]; + data[jistart + 15716] = 0.0 + k[437]*y_cur[IDX_C2H2I] + k[2371]*y_cur[IDX_C2H4I] + + k[2373]*y_cur[IDX_C2HI]; + data[jistart + 15717] = 0.0 + k[3508]*y_cur[IDX_C2HI]; + data[jistart + 15718] = 0.0 - k[1526]*y_cur[IDX_C2H2II]; + data[jistart + 15719] = 0.0 - k[4833]*y_cur[IDX_C2H2II]; + data[jistart + 15720] = 0.0 - k[4027]*y_cur[IDX_C2H2II]; + data[jistart + 15721] = 0.0 - k[4202]*y_cur[IDX_C2H2II]; + data[jistart + 15722] = 0.0 - k[220]*y_cur[IDX_C2H2II] + k[1363]*y_cur[IDX_CII] - + k[1509]*y_cur[IDX_C2H2II] - k[1510]*y_cur[IDX_C2H2II]; + data[jistart + 15723] = 0.0 + k[2220]*y_cur[IDX_C2HI]; + data[jistart + 15724] = 0.0 - k[4798]*y_cur[IDX_C2H2II]; + data[jistart + 15725] = 0.0 - k[3957]*y_cur[IDX_C2H2II]; + data[jistart + 15726] = 0.0 - k[4097]*y_cur[IDX_C2H2II]; + data[jistart + 15727] = 0.0 - k[4377]*y_cur[IDX_C2H2II]; + data[jistart + 15728] = 0.0 - k[4517]*y_cur[IDX_C2H2II]; + data[jistart + 15729] = 0.0 - k[4447]*y_cur[IDX_C2H2II]; + data[jistart + 15730] = 0.0 - k[4587]*y_cur[IDX_C2H2II]; + data[jistart + 15731] = 0.0 - k[3922]*y_cur[IDX_C2H2II]; + data[jistart + 15732] = 0.0 - k[4272]*y_cur[IDX_C2H2II]; + data[jistart + 15733] = 0.0 - k[4307]*y_cur[IDX_C2H2II]; + data[jistart + 15734] = 0.0 - k[3887]*y_cur[IDX_C2H2II]; + data[jistart + 15735] = 0.0 - k[4728]*y_cur[IDX_C2H2II]; + data[jistart + 15736] = 0.0 - k[4552]*y_cur[IDX_C2H2II]; + data[jistart + 15737] = 0.0 - k[4692]*y_cur[IDX_C2H2II]; + data[jistart + 15738] = 0.0 - k[5508]*y_cur[IDX_C2H2II]; + data[jistart + 15739] = 0.0 - k[4482]*y_cur[IDX_C2H2II]; + data[jistart + 15740] = 0.0 - k[3992]*y_cur[IDX_C2H2II]; + data[jistart + 15741] = 0.0 - k[4062]*y_cur[IDX_C2H2II]; + data[jistart + 15742] = 0.0 - k[4167]*y_cur[IDX_C2H2II]; + data[jistart + 15743] = 0.0 - k[4342]*y_cur[IDX_C2H2II]; + data[jistart + 15744] = 0.0 - k[4237]*y_cur[IDX_C2H2II]; + data[jistart + 15745] = 0.0 - k[4412]*y_cur[IDX_C2H2II]; + data[jistart + 15746] = 0.0 - k[3531]*y_cur[IDX_C2H2II] - k[3532]*y_cur[IDX_C2H2II]; + data[jistart + 15747] = 0.0 + k[1474]*y_cur[IDX_HCNI] + k[1477]*y_cur[IDX_HCOI] + + k[2151]*y_cur[IDX_CH4I] + k[2402]*y_cur[IDX_H2I]; + data[jistart + 15748] = 0.0 + k[3397]*y_cur[IDX_NI]; + data[jistart + 15749] = 0.0 + k[3770]*y_cur[IDX_C2HI]; + data[jistart + 15750] = 0.0 + k[463]*y_cur[IDX_C2H2I] + k[2504]*y_cur[IDX_C2HI]; + data[jistart + 15751] = 0.0 - k[4132]*y_cur[IDX_C2H2II]; + data[jistart + 15752] = 0.0 + k[1940]*y_cur[IDX_CH4I]; + data[jistart + 15753] = 0.0 + k[668]*y_cur[IDX_C2H2I]; + data[jistart + 15754] = 0.0 - k[221]*y_cur[IDX_C2H2II]; + data[jistart + 15755] = 0.0 - k[529]*y_cur[IDX_C2H2II]; + data[jistart + 15756] = 0.0 - k[632]*y_cur[IDX_C2H2II]; + data[jistart + 15757] = 0.0 - k[1505]*y_cur[IDX_C2H2II] - k[1506]*y_cur[IDX_C2H2II]; + data[jistart + 15758] = 0.0 - k[3607]*y_cur[IDX_C2H2II]; + data[jistart + 15759] = 0.0 - k[4657]*y_cur[IDX_C2H2II]; + data[jistart + 15760] = 0.0 - k[1501]*y_cur[IDX_C2H2II] - k[1502]*y_cur[IDX_C2H2II]; + data[jistart + 15761] = 0.0 + k[1748]*y_cur[IDX_C2HI]; + data[jistart + 15762] = 0.0 - k[219]*y_cur[IDX_C2H2II] - k[1507]*y_cur[IDX_C2H2II] - + k[1508]*y_cur[IDX_C2H2II]; + data[jistart + 15763] = 0.0 - k[1497]*y_cur[IDX_C2H2II] - k[1498]*y_cur[IDX_C2H2II]; + data[jistart + 15764] = 0.0 - k[1493]*y_cur[IDX_C2H2II] - k[1494]*y_cur[IDX_C2H2II]; + data[jistart + 15765] = 0.0 - k[1487]*y_cur[IDX_C2H2II] - k[1488]*y_cur[IDX_C2H2II]; + data[jistart + 15766] = 0.0 + k[1744]*y_cur[IDX_C2HI]; + data[jistart + 15767] = 0.0 - k[1489]*y_cur[IDX_C2H2II] - k[1490]*y_cur[IDX_C2H2II]; + data[jistart + 15768] = 0.0 + k[647]*y_cur[IDX_C2H2I] + k[3632]*y_cur[IDX_C2H4I]; + data[jistart + 15769] = 0.0 - k[224]*y_cur[IDX_C2H2II] - k[1520]*y_cur[IDX_C2H2II] - + k[1521]*y_cur[IDX_C2H2II]; + data[jistart + 15770] = 0.0 - k[1998]*y_cur[IDX_C2H2II]; + data[jistart + 15771] = 0.0 - k[1525]*y_cur[IDX_C2H2II]; + data[jistart + 15772] = 0.0 + k[3548]*y_cur[IDX_C2I]; + data[jistart + 15773] = 0.0 - k[215]*y_cur[IDX_C2H2II] - k[1483]*y_cur[IDX_C2H2II] - + k[1484]*y_cur[IDX_C2H2II] + k[2296]*y_cur[IDX_HII] + + k[2371]*y_cur[IDX_H2II] + k[3080]*y_cur[IDX_HeII] + + k[3632]*y_cur[IDX_OII]; + data[jistart + 15774] = 0.0 - k[214]*y_cur[IDX_C2H2II] - k[1481]*y_cur[IDX_C2H2II] - + k[1482]*y_cur[IDX_C2H2II] + k[2295]*y_cur[IDX_HII] + + k[3078]*y_cur[IDX_HeII]; + data[jistart + 15775] = 0.0 - k[223]*y_cur[IDX_C2H2II] - k[1518]*y_cur[IDX_C2H2II] - + k[1519]*y_cur[IDX_C2H2II]; + data[jistart + 15776] = 0.0 - k[1529]*y_cur[IDX_C2H2II] - k[1530]*y_cur[IDX_C2H2II]; + data[jistart + 15777] = 0.0 + k[1726]*y_cur[IDX_C2HI] + k[2827]*y_cur[IDX_HI]; + data[jistart + 15778] = 0.0 - k[226]*y_cur[IDX_C2H2II]; + data[jistart + 15779] = 0.0 - k[225]*y_cur[IDX_C2H2II] + k[1477]*y_cur[IDX_C2HII] - + k[1524]*y_cur[IDX_C2H2II]; + data[jistart + 15780] = 0.0 + k[1383]*y_cur[IDX_CII] + k[1940]*y_cur[IDX_CHII] + + k[2147]*y_cur[IDX_C2II] + k[2151]*y_cur[IDX_C2HII] - + k[2154]*y_cur[IDX_C2H2II] - k[2155]*y_cur[IDX_C2H2II]; + data[jistart + 15781] = 0.0 - k[1725]*y_cur[IDX_C2H2II] + k[1726]*y_cur[IDX_C2H3II] + + k[1744]*y_cur[IDX_H2COII] + k[1745]*y_cur[IDX_HCNII] + + k[1746]*y_cur[IDX_HCOII] + k[1747]*y_cur[IDX_HNOII] + + k[1748]*y_cur[IDX_N2HII] + k[1749]*y_cur[IDX_O2HII] + + k[2220]*y_cur[IDX_CH5II] + k[2373]*y_cur[IDX_H2II] + + k[2504]*y_cur[IDX_H2OII] + k[2597]*y_cur[IDX_H3II] + + k[3480]*y_cur[IDX_NHII] + k[3508]*y_cur[IDX_NH2II] + + k[3770]*y_cur[IDX_OHII]; + data[jistart + 15782] = 0.0 - k[222]*y_cur[IDX_C2H2II]; + data[jistart + 15783] = 0.0 + k[1474]*y_cur[IDX_C2HII] - k[1522]*y_cur[IDX_C2H2II] - + k[1523]*y_cur[IDX_C2H2II]; + data[jistart + 15784] = 0.0 - k[2242]*y_cur[IDX_C2H2II] + k[2243]*y_cur[IDX_CH3II]; + data[jistart + 15785] = 0.0 - k[1527]*y_cur[IDX_C2H2II] - k[1528]*y_cur[IDX_C2H2II]; + data[jistart + 15786] = 0.0 + k[3548]*y_cur[IDX_NH3II]; + data[jistart + 15787] = 0.0 - k[3796]*y_cur[IDX_C2H2II]; + data[jistart + 15788] = 0.0 - k[598]*y_cur[IDX_C2H2II] - k[3556]*y_cur[IDX_C2H2II]; + data[jistart + 15789] = 0.0 - k[214]*y_cur[IDX_C2H3I] - k[215]*y_cur[IDX_C2H4I] - + k[216]*y_cur[IDX_C5H2I] - k[217]*y_cur[IDX_C6H2I] - + k[218]*y_cur[IDX_C7H2I] - k[219]*y_cur[IDX_CH2CCHI] - + k[220]*y_cur[IDX_CH3CCHI] - k[221]*y_cur[IDX_FeI] - + k[222]*y_cur[IDX_H2COI] - k[223]*y_cur[IDX_H2SI] - + k[224]*y_cur[IDX_C4H2I] - k[225]*y_cur[IDX_HCOI] - + k[226]*y_cur[IDX_NOI] - k[529]*y_cur[IDX_MgI] - + k[598]*y_cur[IDX_NH3I] - k[632]*y_cur[IDX_NaI] - + k[742]*y_cur[IDX_eM] - k[743]*y_cur[IDX_eM] - k[744]*y_cur[IDX_eM] - + k[1479]*y_cur[IDX_C2H2I] - k[1480]*y_cur[IDX_C2H2I] - + k[1481]*y_cur[IDX_C2H3I] - k[1482]*y_cur[IDX_C2H3I] - + k[1483]*y_cur[IDX_C2H4I] - k[1484]*y_cur[IDX_C2H4I] - + k[1485]*y_cur[IDX_C3H2I] - k[1486]*y_cur[IDX_C3H2I] - + k[1487]*y_cur[IDX_C3HI] - k[1488]*y_cur[IDX_C3HI] - + k[1489]*y_cur[IDX_C4HI] - k[1490]*y_cur[IDX_C4HI] - + k[1491]*y_cur[IDX_C5H2I] - k[1492]*y_cur[IDX_C5H2I] - + k[1493]*y_cur[IDX_C5HI] - k[1494]*y_cur[IDX_C5HI] - + k[1495]*y_cur[IDX_C6H2I] - k[1496]*y_cur[IDX_C6H2I] - + k[1497]*y_cur[IDX_C6HI] - k[1498]*y_cur[IDX_C6HI] - + k[1499]*y_cur[IDX_C7H2I] - k[1500]*y_cur[IDX_C7H2I] - + k[1501]*y_cur[IDX_C7HI] - k[1502]*y_cur[IDX_C7HI] - + k[1503]*y_cur[IDX_C8H2I] - k[1504]*y_cur[IDX_C8H2I] - + k[1505]*y_cur[IDX_C8HI] - k[1506]*y_cur[IDX_C8HI] - + k[1507]*y_cur[IDX_CH2CCHI] - k[1508]*y_cur[IDX_CH2CCHI] - + k[1509]*y_cur[IDX_CH3CCHI] - k[1510]*y_cur[IDX_CH3CCHI] - + k[1511]*y_cur[IDX_C2H6I] - k[1512]*y_cur[IDX_C2H6I] - + k[1513]*y_cur[IDX_CH3CNI] - k[1514]*y_cur[IDX_CH3CNI] - + k[1515]*y_cur[IDX_CH3CNI] - k[1516]*y_cur[IDX_H2CCCI] - + k[1517]*y_cur[IDX_H2CCCI] - k[1518]*y_cur[IDX_H2SI] - + k[1519]*y_cur[IDX_H2SI] - k[1520]*y_cur[IDX_C4H2I] - + k[1521]*y_cur[IDX_C4H2I] - k[1522]*y_cur[IDX_HCNI] - + k[1523]*y_cur[IDX_HCNI] - k[1524]*y_cur[IDX_HCOI] - + k[1525]*y_cur[IDX_HNCI] - k[1526]*y_cur[IDX_PI] - + k[1527]*y_cur[IDX_SI] - k[1528]*y_cur[IDX_SI] - + k[1529]*y_cur[IDX_SiI] - k[1530]*y_cur[IDX_SiI] - + k[1531]*y_cur[IDX_SiH4I] - k[1532]*y_cur[IDX_SiH4I] - + k[1533]*y_cur[IDX_SiH4I] - k[1534]*y_cur[IDX_SiH4I] - + k[1725]*y_cur[IDX_C2HI] - k[1850]*y_cur[IDX_CI] - + k[1998]*y_cur[IDX_CH2I] - k[2154]*y_cur[IDX_CH4I] - + k[2155]*y_cur[IDX_CH4I] - k[2242]*y_cur[IDX_CHI] - + k[2277]*y_cur[IDX_CNI] - k[2403]*y_cur[IDX_H2I] - + k[2522]*y_cur[IDX_H2OI] - k[3387]*y_cur[IDX_NI] - + k[3388]*y_cur[IDX_NI] - k[3389]*y_cur[IDX_NI] - + k[3531]*y_cur[IDX_NH2I] - k[3532]*y_cur[IDX_NH2I] - + k[3556]*y_cur[IDX_NH3I] - k[3607]*y_cur[IDX_NHI] - + k[3688]*y_cur[IDX_OI] - k[3689]*y_cur[IDX_OI] - + k[3796]*y_cur[IDX_OHI] - k[3887]*y_cur[IDX_CM] - + k[3922]*y_cur[IDX_C10M] - k[3957]*y_cur[IDX_C10HM] - + k[3992]*y_cur[IDX_C2M] - k[4027]*y_cur[IDX_C2HM] - + k[4062]*y_cur[IDX_C3M] - k[4097]*y_cur[IDX_C3HM] - + k[4132]*y_cur[IDX_C3NM] - k[4167]*y_cur[IDX_C4M] - + k[4202]*y_cur[IDX_C4HM] - k[4237]*y_cur[IDX_C5M] - + k[4272]*y_cur[IDX_C5HM] - k[4307]*y_cur[IDX_C5NM] - + k[4342]*y_cur[IDX_C6M] - k[4377]*y_cur[IDX_C6HM] - + k[4412]*y_cur[IDX_C7M] - k[4447]*y_cur[IDX_C7HM] - + k[4482]*y_cur[IDX_C8M] - k[4517]*y_cur[IDX_C8HM] - + k[4552]*y_cur[IDX_C9M] - k[4587]*y_cur[IDX_C9HM] - + k[4622]*y_cur[IDX_CHM] - k[4657]*y_cur[IDX_CNM] - + k[4692]*y_cur[IDX_HM] - k[4728]*y_cur[IDX_OM] - + k[4763]*y_cur[IDX_O2M] - k[4798]*y_cur[IDX_OHM] - + k[4833]*y_cur[IDX_SM] - k[5507]*y_cur[IDX_COI] - + k[5508]*y_cur[IDX_HC3NI] - k[5509]*y_cur[IDX_HC5NI] - + k[5510]*y_cur[IDX_HC7NI] - k[5549]*y_cur[IDX_H2I] - + k[6356]*y_cur[IDX_GRAINM] - k[6357]*y_cur[IDX_GRAINM] - + k[6358]*y_cur[IDX_GRAINM]; + data[jistart + 15790] = 0.0 + k[2243]*y_cur[IDX_CHI]; + data[jistart + 15791] = 0.0 + k[228]*y_cur[IDX_CO2II] + k[229]*y_cur[IDX_HC3NII] + + k[230]*y_cur[IDX_HCNII] + k[277]*y_cur[IDX_CH4II] + + k[324]*y_cur[IDX_HII] + k[437]*y_cur[IDX_H2II] + + k[463]*y_cur[IDX_H2OII] + k[509]*y_cur[IDX_HeII] + + k[647]*y_cur[IDX_OII] + k[668]*y_cur[IDX_O2II] - + k[1479]*y_cur[IDX_C2H2II] - k[1480]*y_cur[IDX_C2H2II] + + k[1542]*y_cur[IDX_C2N2II] + k[5696] + k[5981]; + data[jistart + 15792] = 0.0 - k[2277]*y_cur[IDX_C2H2II]; + data[jistart + 15793] = 0.0 + k[1353]*y_cur[IDX_CII]; + data[jistart + 15794] = 0.0 - k[3387]*y_cur[IDX_C2H2II] - k[3388]*y_cur[IDX_C2H2II] - + k[3389]*y_cur[IDX_C2H2II] + k[3397]*y_cur[IDX_C3H2II]; + data[jistart + 15795] = 0.0 - k[3688]*y_cur[IDX_C2H2II] - k[3689]*y_cur[IDX_C2H2II]; + data[jistart + 15796] = 0.0 + k[509]*y_cur[IDX_C2H2I] + k[3078]*y_cur[IDX_C2H3I] + + k[3080]*y_cur[IDX_C2H4I] + k[3169]*y_cur[IDX_CH2CHCNI] + + k[3188]*y_cur[IDX_C2H6I]; + data[jistart + 15797] = 0.0 + k[1343]*y_cur[IDX_CH2CCH2I] + k[1353]*y_cur[IDX_CH3I] + + k[1363]*y_cur[IDX_CH3CCHI] + k[1367]*y_cur[IDX_C2H6I] + + k[1373]*y_cur[IDX_CH3CHCH2I] + k[1383]*y_cur[IDX_CH4I]; + data[jistart + 15798] = 0.0 - k[2522]*y_cur[IDX_C2H2II]; + data[jistart + 15799] = 0.0 + k[324]*y_cur[IDX_C2H2I] + k[2295]*y_cur[IDX_C2H3I] + + k[2296]*y_cur[IDX_C2H4I]; + data[jistart + 15800] = 0.0 - k[1850]*y_cur[IDX_C2H2II]; + data[jistart + 15801] = 0.0 + k[1746]*y_cur[IDX_C2HI]; + data[jistart + 15802] = 0.0 + k[2597]*y_cur[IDX_C2HI]; + data[jistart + 15803] = 0.0 - k[5507]*y_cur[IDX_C2H2II]; + data[jistart + 15804] = 0.0 - k[6356]*y_cur[IDX_C2H2II] - k[6357]*y_cur[IDX_C2H2II] - + k[6358]*y_cur[IDX_C2H2II]; + data[jistart + 15805] = 0.0 + k[2402]*y_cur[IDX_C2HII] - k[2403]*y_cur[IDX_C2H2II] + + k[2445]*y_cur[IDX_HC3NII] - k[5549]*y_cur[IDX_C2H2II]; + data[jistart + 15806] = 0.0 - k[742]*y_cur[IDX_C2H2II] - k[743]*y_cur[IDX_C2H2II] - + k[744]*y_cur[IDX_C2H2II]; + data[jistart + 15807] = 0.0 + k[2827]*y_cur[IDX_C2H3II]; + data[jistart + 15808] = 0.0 + k[2322]*y_cur[IDX_HII] + k[3180]*y_cur[IDX_HeII]; + data[jistart + 15809] = 0.0 + k[2324]*y_cur[IDX_HII] + k[3183]*y_cur[IDX_HeII]; + data[jistart + 15810] = 0.0 + k[2320]*y_cur[IDX_HII] + k[3177]*y_cur[IDX_HeII]; + data[jistart + 15811] = 0.0 + k[5642]*y_cur[IDX_HeII]; + data[jistart + 15812] = 0.0 - k[2083]*y_cur[IDX_CH3II]; + data[jistart + 15813] = 0.0 + k[5672]*y_cur[IDX_HeII]; + data[jistart + 15814] = 0.0 - k[2072]*y_cur[IDX_CH3II] + k[3195]*y_cur[IDX_HeII]; + data[jistart + 15815] = 0.0 - k[5539]*y_cur[IDX_CH3II]; + data[jistart + 15816] = 0.0 + k[2594]*y_cur[IDX_H3II]; + data[jistart + 15817] = 0.0 - k[2085]*y_cur[IDX_CH3II]; + data[jistart + 15818] = 0.0 - k[3020]*y_cur[IDX_CH3II]; + data[jistart + 15819] = 0.0 - k[270]*y_cur[IDX_CH3II] - k[2070]*y_cur[IDX_CH3II] - + k[2071]*y_cur[IDX_CH3II] + k[2661]*y_cur[IDX_H3II]; + data[jistart + 15820] = 0.0 - k[2059]*y_cur[IDX_CH3II]; + data[jistart + 15821] = 0.0 - k[5538]*y_cur[IDX_CH3II]; + data[jistart + 15822] = 0.0 - k[2100]*y_cur[IDX_CH3II]; + data[jistart + 15823] = 0.0 - k[2099]*y_cur[IDX_CH3II]; + data[jistart + 15824] = 0.0 - k[2057]*y_cur[IDX_CH3II]; + data[jistart + 15825] = 0.0 - k[2065]*y_cur[IDX_CH3II] - k[2066]*y_cur[IDX_CH3II] - + k[2067]*y_cur[IDX_CH3II] + k[2653]*y_cur[IDX_H3II] + + k[3191]*y_cur[IDX_HeII] - k[5532]*y_cur[IDX_CH3II]; + data[jistart + 15826] = 0.0 - k[2068]*y_cur[IDX_CH3II] - k[2069]*y_cur[IDX_CH3II] + + k[2329]*y_cur[IDX_HII] + k[3193]*y_cur[IDX_HeII] - + k[5533]*y_cur[IDX_CH3II]; + data[jistart + 15827] = 0.0 - k[5541]*y_cur[IDX_CH3II]; + data[jistart + 15828] = 0.0 + k[2015]*y_cur[IDX_CH2I]; + data[jistart + 15829] = 0.0 + k[2839]*y_cur[IDX_HI] + k[3727]*y_cur[IDX_OI] + k[6126]; + data[jistart + 15830] = 0.0 + k[2009]*y_cur[IDX_CH2I]; + data[jistart + 15831] = 0.0 - k[2076]*y_cur[IDX_CH3II]; + data[jistart + 15832] = 0.0 - k[2055]*y_cur[IDX_CH3II]; + data[jistart + 15833] = 0.0 - k[2053]*y_cur[IDX_CH3II]; + data[jistart + 15834] = 0.0 - k[2062]*y_cur[IDX_CH3II] - k[2063]*y_cur[IDX_CH3II] - + k[2064]*y_cur[IDX_CH3II]; + data[jistart + 15835] = 0.0 - k[2050]*y_cur[IDX_CH3II]; + data[jistart + 15836] = 0.0 + k[2205]*y_cur[IDX_CH4I]; + data[jistart + 15837] = 0.0 + k[2005]*y_cur[IDX_CH2I]; + data[jistart + 15838] = 0.0 + k[2011]*y_cur[IDX_CH2I]; + data[jistart + 15839] = 0.0 - k[4769]*y_cur[IDX_CH3II]; + data[jistart + 15840] = 0.0 - k[4628]*y_cur[IDX_CH3II]; + data[jistart + 15841] = 0.0 + k[2375]*y_cur[IDX_CH2I] + k[2378]*y_cur[IDX_CH4I]; + data[jistart + 15842] = 0.0 - k[2092]*y_cur[IDX_CH3II]; + data[jistart + 15843] = 0.0 + k[2012]*y_cur[IDX_CH2I]; + data[jistart + 15844] = 0.0 - k[2094]*y_cur[IDX_CH3II]; + data[jistart + 15845] = 0.0 - k[4839]*y_cur[IDX_CH3II]; + data[jistart + 15846] = 0.0 - k[4033]*y_cur[IDX_CH3II]; + data[jistart + 15847] = 0.0 - k[4208]*y_cur[IDX_CH3II]; + data[jistart + 15848] = 0.0 + k[2000]*y_cur[IDX_CH2I]; + data[jistart + 15849] = 0.0 - k[4804]*y_cur[IDX_CH3II]; + data[jistart + 15850] = 0.0 - k[3963]*y_cur[IDX_CH3II]; + data[jistart + 15851] = 0.0 - k[4103]*y_cur[IDX_CH3II]; + data[jistart + 15852] = 0.0 - k[4383]*y_cur[IDX_CH3II]; + data[jistart + 15853] = 0.0 - k[4523]*y_cur[IDX_CH3II]; + data[jistart + 15854] = 0.0 - k[4453]*y_cur[IDX_CH3II]; + data[jistart + 15855] = 0.0 - k[4593]*y_cur[IDX_CH3II]; + data[jistart + 15856] = 0.0 - k[3928]*y_cur[IDX_CH3II]; + data[jistart + 15857] = 0.0 - k[4278]*y_cur[IDX_CH3II]; + data[jistart + 15858] = 0.0 - k[4313]*y_cur[IDX_CH3II]; + data[jistart + 15859] = 0.0 - k[2084]*y_cur[IDX_CH3II]; + data[jistart + 15860] = 0.0 - k[3893]*y_cur[IDX_CH3II]; + data[jistart + 15861] = 0.0 - k[4734]*y_cur[IDX_CH3II]; + data[jistart + 15862] = 0.0 - k[4558]*y_cur[IDX_CH3II]; + data[jistart + 15863] = 0.0 + k[1382]*y_cur[IDX_CII] + k[1938]*y_cur[IDX_CHII] - + k[2073]*y_cur[IDX_CH3II] + k[2330]*y_cur[IDX_HII] + + k[2667]*y_cur[IDX_H3II] + k[3197]*y_cur[IDX_HeII] + + k[3339]*y_cur[IDX_NII] - k[5534]*y_cur[IDX_CH3II]; + data[jistart + 15864] = 0.0 - k[4698]*y_cur[IDX_CH3II]; + data[jistart + 15865] = 0.0 - k[2079]*y_cur[IDX_CH3II] - k[5537]*y_cur[IDX_CH3II]; + data[jistart + 15866] = 0.0 - k[4488]*y_cur[IDX_CH3II]; + data[jistart + 15867] = 0.0 - k[3998]*y_cur[IDX_CH3II]; + data[jistart + 15868] = 0.0 - k[4068]*y_cur[IDX_CH3II]; + data[jistart + 15869] = 0.0 - k[4173]*y_cur[IDX_CH3II]; + data[jistart + 15870] = 0.0 - k[4348]*y_cur[IDX_CH3II]; + data[jistart + 15871] = 0.0 - k[4243]*y_cur[IDX_CH3II]; + data[jistart + 15872] = 0.0 - k[4418]*y_cur[IDX_CH3II]; + data[jistart + 15873] = 0.0 - k[2086]*y_cur[IDX_CH3II]; + data[jistart + 15874] = 0.0 + k[1996]*y_cur[IDX_CH2I]; + data[jistart + 15875] = 0.0 + k[1987]*y_cur[IDX_HCOI] + k[2428]*y_cur[IDX_H2I]; + data[jistart + 15876] = 0.0 + k[2016]*y_cur[IDX_CH2I]; + data[jistart + 15877] = 0.0 + k[2003]*y_cur[IDX_CH2I]; + data[jistart + 15878] = 0.0 - k[4138]*y_cur[IDX_CH3II]; + data[jistart + 15879] = 0.0 + k[1938]*y_cur[IDX_CH3OHI] + k[1948]*y_cur[IDX_H2COI]; + data[jistart + 15880] = 0.0 - k[271]*y_cur[IDX_CH3II]; + data[jistart + 15881] = 0.0 - k[273]*y_cur[IDX_CH3II]; + data[jistart + 15882] = 0.0 - k[275]*y_cur[IDX_CH3II]; + data[jistart + 15883] = 0.0 - k[2060]*y_cur[IDX_CH3II]; + data[jistart + 15884] = 0.0 - k[3608]*y_cur[IDX_CH3II]; + data[jistart + 15885] = 0.0 - k[4663]*y_cur[IDX_CH3II]; + data[jistart + 15886] = 0.0 - k[2096]*y_cur[IDX_CH3II]; + data[jistart + 15887] = 0.0 - k[2058]*y_cur[IDX_CH3II]; + data[jistart + 15888] = 0.0 + k[3691]*y_cur[IDX_OI]; + data[jistart + 15889] = 0.0 + k[2010]*y_cur[IDX_CH2I]; + data[jistart + 15890] = 0.0 - k[2061]*y_cur[IDX_CH3II]; + data[jistart + 15891] = 0.0 - k[2056]*y_cur[IDX_CH3II]; + data[jistart + 15892] = 0.0 - k[2054]*y_cur[IDX_CH3II]; + data[jistart + 15893] = 0.0 + k[3339]*y_cur[IDX_CH3OHI] + k[3340]*y_cur[IDX_CH4I]; + data[jistart + 15894] = 0.0 - k[2051]*y_cur[IDX_CH3II]; + data[jistart + 15895] = 0.0 + k[2002]*y_cur[IDX_CH2I]; + data[jistart + 15896] = 0.0 - k[2052]*y_cur[IDX_CH3II]; + data[jistart + 15897] = 0.0 + k[3638]*y_cur[IDX_CH4I]; + data[jistart + 15898] = 0.0 - k[2080]*y_cur[IDX_CH3II] - k[2081]*y_cur[IDX_CH3II]; + data[jistart + 15899] = 0.0 + k[2006]*y_cur[IDX_CH2I] + k[2007]*y_cur[IDX_CH2I]; + data[jistart + 15900] = 0.0 + k[1996]*y_cur[IDX_C2HII] - k[1999]*y_cur[IDX_CH3II] + + k[2000]*y_cur[IDX_CH5II] + k[2002]*y_cur[IDX_H2COII] + + k[2003]*y_cur[IDX_H2OII] + k[2004]*y_cur[IDX_H3OII] + + k[2005]*y_cur[IDX_HCNII] + k[2006]*y_cur[IDX_HCNHII] + + k[2007]*y_cur[IDX_HCNHII] + k[2008]*y_cur[IDX_HCOII] + + k[2009]*y_cur[IDX_HNOII] + k[2010]*y_cur[IDX_N2HII] + + k[2011]*y_cur[IDX_NHII] + k[2012]*y_cur[IDX_NH2II] + + k[2013]*y_cur[IDX_NH3II] + k[2015]*y_cur[IDX_O2HII] + + k[2016]*y_cur[IDX_OHII] + k[2375]*y_cur[IDX_H2II] + + k[2634]*y_cur[IDX_H3II]; + data[jistart + 15901] = 0.0 + k[2013]*y_cur[IDX_CH2I]; + data[jistart + 15902] = 0.0 - k[2045]*y_cur[IDX_CH3II] - k[2046]*y_cur[IDX_CH3II] - + k[2047]*y_cur[IDX_CH3II]; + data[jistart + 15903] = 0.0 - k[269]*y_cur[IDX_CH3II] - k[2043]*y_cur[IDX_CH3II] - + k[2044]*y_cur[IDX_CH3II]; + data[jistart + 15904] = 0.0 - k[2089]*y_cur[IDX_CH3II]; + data[jistart + 15905] = 0.0 - k[2078]*y_cur[IDX_CH3II]; + data[jistart + 15906] = 0.0 - k[2097]*y_cur[IDX_CH3II] - k[2098]*y_cur[IDX_CH3II]; + data[jistart + 15907] = 0.0 - k[274]*y_cur[IDX_CH3II]; + data[jistart + 15908] = 0.0 - k[272]*y_cur[IDX_CH3II] + k[1987]*y_cur[IDX_CH2II] - + k[2082]*y_cur[IDX_CH3II]; + data[jistart + 15909] = 0.0 - k[2074]*y_cur[IDX_CH3II] + k[2205]*y_cur[IDX_N2II] + + k[2333]*y_cur[IDX_HII] + k[2378]*y_cur[IDX_H2II] + + k[3200]*y_cur[IDX_HeII] + k[3340]*y_cur[IDX_NII] + + k[3638]*y_cur[IDX_OII]; + data[jistart + 15910] = 0.0 - k[2048]*y_cur[IDX_CH3II] - k[2049]*y_cur[IDX_CH3II]; + data[jistart + 15911] = 0.0 + k[1948]*y_cur[IDX_CHII] - k[2077]*y_cur[IDX_CH3II]; + data[jistart + 15912] = 0.0 - k[5540]*y_cur[IDX_CH3II]; + data[jistart + 15913] = 0.0 - k[2243]*y_cur[IDX_CH3II]; + data[jistart + 15914] = 0.0 - k[2095]*y_cur[IDX_CH3II]; + data[jistart + 15915] = 0.0 - k[2041]*y_cur[IDX_CH3II]; + data[jistart + 15916] = 0.0 - k[2093]*y_cur[IDX_CH3II]; + data[jistart + 15917] = 0.0 - k[2087]*y_cur[IDX_CH3II] - k[2088]*y_cur[IDX_CH3II]; + data[jistart + 15918] = 0.0 - k[269]*y_cur[IDX_C2H3I] - k[270]*y_cur[IDX_CH3COCH3I] - + k[271]*y_cur[IDX_FeI] - k[272]*y_cur[IDX_HCOI] - + k[273]*y_cur[IDX_MgI] - k[274]*y_cur[IDX_NOI] - + k[275]*y_cur[IDX_NaI] - k[923]*y_cur[IDX_eM] - k[924]*y_cur[IDX_eM] + - k[925]*y_cur[IDX_eM] - k[1894]*y_cur[IDX_CI] - + k[1999]*y_cur[IDX_CH2I] - k[2041]*y_cur[IDX_C2I] - + k[2042]*y_cur[IDX_C2H2I] - k[2043]*y_cur[IDX_C2H3I] - + k[2044]*y_cur[IDX_C2H3I] - k[2045]*y_cur[IDX_C2H4I] - + k[2046]*y_cur[IDX_C2H4I] - k[2047]*y_cur[IDX_C2H4I] - + k[2048]*y_cur[IDX_C2HI] - k[2049]*y_cur[IDX_C2HI] - + k[2050]*y_cur[IDX_C3H2I] - k[2051]*y_cur[IDX_C3HI] - + k[2052]*y_cur[IDX_C4HI] - k[2053]*y_cur[IDX_C5H2I] - + k[2054]*y_cur[IDX_C5HI] - k[2055]*y_cur[IDX_C6H2I] - + k[2056]*y_cur[IDX_C6HI] - k[2057]*y_cur[IDX_C7H2I] - + k[2058]*y_cur[IDX_C7HI] - k[2059]*y_cur[IDX_C8H2I] - + k[2060]*y_cur[IDX_C8HI] - k[2061]*y_cur[IDX_CH2CCHI] - + k[2062]*y_cur[IDX_C2H6I] - k[2063]*y_cur[IDX_C2H6I] - + k[2064]*y_cur[IDX_C2H6I] - k[2065]*y_cur[IDX_CH3CHOI] - + k[2066]*y_cur[IDX_CH3CHOI] - k[2067]*y_cur[IDX_CH3CHOI] - + k[2068]*y_cur[IDX_CH3CNI] - k[2069]*y_cur[IDX_CH3CNI] - + k[2070]*y_cur[IDX_CH3COCH3I] - k[2071]*y_cur[IDX_CH3COCH3I] - + k[2072]*y_cur[IDX_CH3OCH3I] - k[2073]*y_cur[IDX_CH3OHI] - + k[2074]*y_cur[IDX_CH4I] - k[2075]*y_cur[IDX_CNI] - + k[2076]*y_cur[IDX_H2CCCI] - k[2077]*y_cur[IDX_H2COI] - + k[2078]*y_cur[IDX_H2SI] - k[2079]*y_cur[IDX_HC3NI] - + k[2080]*y_cur[IDX_C4H2I] - k[2081]*y_cur[IDX_C4H2I] - + k[2082]*y_cur[IDX_HCOI] - k[2083]*y_cur[IDX_HClI] - + k[2084]*y_cur[IDX_HSI] - k[2085]*y_cur[IDX_N2OI] - + k[2086]*y_cur[IDX_NH2I] - k[2087]*y_cur[IDX_NH3I] - + k[2088]*y_cur[IDX_NH3I] - k[2089]*y_cur[IDX_O2I] - + k[2090]*y_cur[IDX_OI] - k[2091]*y_cur[IDX_OI] - + k[2092]*y_cur[IDX_OCSI] - k[2093]*y_cur[IDX_OHI] - + k[2094]*y_cur[IDX_PI] - k[2095]*y_cur[IDX_SI] - + k[2096]*y_cur[IDX_SOI] - k[2097]*y_cur[IDX_SiI] - + k[2098]*y_cur[IDX_SiI] - k[2099]*y_cur[IDX_SiH4I] - + k[2100]*y_cur[IDX_SiHI] - k[2243]*y_cur[IDX_CHI] - + k[2837]*y_cur[IDX_HI] - k[3020]*y_cur[IDX_HNC3I] - + k[3454]*y_cur[IDX_NI] - k[3608]*y_cur[IDX_NHI] - + k[3893]*y_cur[IDX_CM] - k[3928]*y_cur[IDX_C10M] - + k[3963]*y_cur[IDX_C10HM] - k[3998]*y_cur[IDX_C2M] - + k[4033]*y_cur[IDX_C2HM] - k[4068]*y_cur[IDX_C3M] - + k[4103]*y_cur[IDX_C3HM] - k[4138]*y_cur[IDX_C3NM] - + k[4173]*y_cur[IDX_C4M] - k[4208]*y_cur[IDX_C4HM] - + k[4243]*y_cur[IDX_C5M] - k[4278]*y_cur[IDX_C5HM] - + k[4313]*y_cur[IDX_C5NM] - k[4348]*y_cur[IDX_C6M] - + k[4383]*y_cur[IDX_C6HM] - k[4418]*y_cur[IDX_C7M] - + k[4453]*y_cur[IDX_C7HM] - k[4488]*y_cur[IDX_C8M] - + k[4523]*y_cur[IDX_C8HM] - k[4558]*y_cur[IDX_C9M] - + k[4593]*y_cur[IDX_C9HM] - k[4628]*y_cur[IDX_CHM] - + k[4663]*y_cur[IDX_CNM] - k[4698]*y_cur[IDX_HM] - + k[4734]*y_cur[IDX_OM] - k[4769]*y_cur[IDX_O2M] - + k[4804]*y_cur[IDX_OHM] - k[4839]*y_cur[IDX_SM] - + k[5532]*y_cur[IDX_CH3CHOI] - k[5533]*y_cur[IDX_CH3CNI] - + k[5534]*y_cur[IDX_CH3OHI] - k[5535]*y_cur[IDX_COI] - + k[5536]*y_cur[IDX_H2OI] - k[5537]*y_cur[IDX_HC3NI] - + k[5538]*y_cur[IDX_HC5NI] - k[5539]*y_cur[IDX_HC7NI] - + k[5540]*y_cur[IDX_HCNI] - k[5541]*y_cur[IDX_NCCNI] - + k[5555]*y_cur[IDX_H2I] - k[5612]*y_cur[IDX_eM] - k[6095] - k[6096] - + k[6321]*y_cur[IDX_GRAINM] - k[6322]*y_cur[IDX_GRAINM] - + k[6323]*y_cur[IDX_GRAINM]; + data[jistart + 15919] = 0.0 - k[2042]*y_cur[IDX_CH3II]; + data[jistart + 15920] = 0.0 - k[2075]*y_cur[IDX_CH3II]; + data[jistart + 15921] = 0.0 + k[362]*y_cur[IDX_HII] + k[5794] + k[6098]; + data[jistart + 15922] = 0.0 - k[3454]*y_cur[IDX_CH3II]; + data[jistart + 15923] = 0.0 + k[2004]*y_cur[IDX_CH2I]; + data[jistart + 15924] = 0.0 - k[2090]*y_cur[IDX_CH3II] - k[2091]*y_cur[IDX_CH3II] + + k[3691]*y_cur[IDX_C2H4II] + k[3727]*y_cur[IDX_CH4II]; + data[jistart + 15925] = 0.0 + k[3177]*y_cur[IDX_CH3C3NI] + k[3180]*y_cur[IDX_CH3C5NI] + + k[3183]*y_cur[IDX_CH3C7NI] + k[3191]*y_cur[IDX_CH3CHOI] + + k[3193]*y_cur[IDX_CH3CNI] + k[3195]*y_cur[IDX_CH3OCH3I] + + k[3197]*y_cur[IDX_CH3OHI] + k[3200]*y_cur[IDX_CH4I] + + k[5642]*y_cur[IDX_CH3COI] + k[5672]*y_cur[IDX_CH3COOHI]; + data[jistart + 15926] = 0.0 + k[1382]*y_cur[IDX_CH3OHI]; + data[jistart + 15927] = 0.0 - k[5536]*y_cur[IDX_CH3II]; + data[jistart + 15928] = 0.0 + k[362]*y_cur[IDX_CH3I] + k[2320]*y_cur[IDX_CH3C3NI] + + k[2322]*y_cur[IDX_CH3C5NI] + k[2324]*y_cur[IDX_CH3C7NI] + + k[2329]*y_cur[IDX_CH3CNI] + k[2330]*y_cur[IDX_CH3OHI] + + k[2333]*y_cur[IDX_CH4I]; + data[jistart + 15929] = 0.0 - k[1894]*y_cur[IDX_CH3II]; + data[jistart + 15930] = 0.0 + k[2008]*y_cur[IDX_CH2I]; + data[jistart + 15931] = 0.0 + k[2594]*y_cur[IDX_C2H5OHI] + k[2634]*y_cur[IDX_CH2I] + + k[2653]*y_cur[IDX_CH3CHOI] + k[2661]*y_cur[IDX_CH3COCH3I] + + k[2667]*y_cur[IDX_CH3OHI]; + data[jistart + 15932] = 0.0 - k[5535]*y_cur[IDX_CH3II]; + data[jistart + 15933] = 0.0 - k[6321]*y_cur[IDX_CH3II] - k[6322]*y_cur[IDX_CH3II] - + k[6323]*y_cur[IDX_CH3II]; + data[jistart + 15934] = 0.0 + k[2428]*y_cur[IDX_CH2II] - k[5555]*y_cur[IDX_CH3II]; + data[jistart + 15935] = 0.0 - k[923]*y_cur[IDX_CH3II] - k[924]*y_cur[IDX_CH3II] - + k[925]*y_cur[IDX_CH3II] - k[5612]*y_cur[IDX_CH3II]; + data[jistart + 15936] = 0.0 - k[2837]*y_cur[IDX_CH3II] + k[2839]*y_cur[IDX_CH4II]; + data[jistart + 15937] = 0.0 + k[797]*y_cur[IDX_eM] + k[6656]*y_cur[IDX_GRAINM]; + data[jistart + 15938] = 0.0 + k[1186]*y_cur[IDX_eM] + k[6687]*y_cur[IDX_GRAINM]; + data[jistart + 15939] = 0.0 + k[913]*y_cur[IDX_eM] + k[6657]*y_cur[IDX_GRAINM]; + data[jistart + 15940] = 0.0 + k[1183]*y_cur[IDX_eM] + k[6682]*y_cur[IDX_GRAINM]; + data[jistart + 15941] = 0.0 - k[1572]*y_cur[IDX_C2H2I]; + data[jistart + 15942] = 0.0 - k[1542]*y_cur[IDX_C2H2I]; + data[jistart + 15943] = 0.0 + k[7092] + k[7274] + k[7456]; + data[jistart + 15944] = 0.0 - k[1553]*y_cur[IDX_C2H2I] - k[1554]*y_cur[IDX_C2H2I] + + k[2851]*y_cur[IDX_C4H2I]; + data[jistart + 15945] = 0.0 + k[807]*y_cur[IDX_eM] + k[6504]*y_cur[IDX_GRAINM]; + data[jistart + 15946] = 0.0 - k[1555]*y_cur[IDX_C2H2I] + k[2174]*y_cur[IDX_CH4I]; + data[jistart + 15947] = 0.0 + k[919]*y_cur[IDX_eM] + k[6493]*y_cur[IDX_GRAINM]; + data[jistart + 15948] = 0.0 - k[1575]*y_cur[IDX_C2H2I]; + data[jistart + 15949] = 0.0 + k[8587]*y_cur[IDX_GHI]; + data[jistart + 15950] = 0.0 - k[1571]*y_cur[IDX_C2H2I]; + data[jistart + 15951] = 0.0 + k[1704]*y_cur[IDX_C2H4I]; + data[jistart + 15952] = 0.0 - k[1562]*y_cur[IDX_C2H2I] - k[1563]*y_cur[IDX_C2H2I] - + k[1564]*y_cur[IDX_C2H2I]; + data[jistart + 15953] = 0.0 - k[1576]*y_cur[IDX_C2H2I]; + data[jistart + 15954] = 0.0 - k[1559]*y_cur[IDX_C2H2I]; + data[jistart + 15955] = 0.0 - k[1557]*y_cur[IDX_C2H2I] - k[1558]*y_cur[IDX_C2H2I] + + k[2182]*y_cur[IDX_CH4I]; + data[jistart + 15956] = 0.0 + k[1598]*y_cur[IDX_C2H3II] + k[6038]; + data[jistart + 15957] = 0.0 - k[1549]*y_cur[IDX_C2H2I] - k[1550]*y_cur[IDX_C2H2I] + + k[2164]*y_cur[IDX_CH4I]; + data[jistart + 15958] = 0.0 - k[1540]*y_cur[IDX_C2H2I] - k[1541]*y_cur[IDX_C2H2I]; + data[jistart + 15959] = 0.0 - k[1556]*y_cur[IDX_C2H2I] + k[1698]*y_cur[IDX_C2H4I] + + k[2176]*y_cur[IDX_CH4I]; + data[jistart + 15960] = 0.0 + k[1920]*y_cur[IDX_CI]; + data[jistart + 15961] = 0.0 - k[229]*y_cur[IDX_C2H2I] - k[1565]*y_cur[IDX_C2H2I]; + data[jistart + 15962] = 0.0 - k[228]*y_cur[IDX_C2H2I]; + data[jistart + 15963] = 0.0 + k[218]*y_cur[IDX_C2H2II] + k[1602]*y_cur[IDX_C2H3II]; + data[jistart + 15964] = 0.0 - k[1570]*y_cur[IDX_C2H2I]; + data[jistart + 15965] = 0.0 - k[1547]*y_cur[IDX_C2H2I]; + data[jistart + 15966] = 0.0 + k[8656]*y_cur[IDX_GCI]; + data[jistart + 15967] = 0.0 - k[1567]*y_cur[IDX_C2H2I]; + data[jistart + 15968] = 0.0 + k[1066]*y_cur[IDX_eM] + k[6637]*y_cur[IDX_GRAINM]; + data[jistart + 15969] = 0.0 - k[1548]*y_cur[IDX_C2H2I]; + data[jistart + 15970] = 0.0 - k[1569]*y_cur[IDX_C2H2I]; + data[jistart + 15971] = 0.0 + k[1624]*y_cur[IDX_C2H3II]; + data[jistart + 15972] = 0.0 - k[1560]*y_cur[IDX_C2H2I] - k[1561]*y_cur[IDX_C2H2I]; + data[jistart + 15973] = 0.0 - k[1543]*y_cur[IDX_C2H2I] + k[1686]*y_cur[IDX_C2H4I]; + data[jistart + 15974] = 0.0 - k[277]*y_cur[IDX_C2H2I] - k[2133]*y_cur[IDX_C2H2I] - + k[2134]*y_cur[IDX_C2H2I]; + data[jistart + 15975] = 0.0 + k[1617]*y_cur[IDX_C2H3II] + k[5395]*y_cur[IDX_OI]; + data[jistart + 15976] = 0.0 + k[217]*y_cur[IDX_C2H2II] + k[1595]*y_cur[IDX_C2H3II]; + data[jistart + 15977] = 0.0 + k[764]*y_cur[IDX_eM] + k[765]*y_cur[IDX_eM] - + k[1538]*y_cur[IDX_C2H2I] - k[1539]*y_cur[IDX_C2H2I] + + k[6391]*y_cur[IDX_GRAINM] + k[6392]*y_cur[IDX_GRAINM]; + data[jistart + 15978] = 0.0 + k[216]*y_cur[IDX_C2H2II] + k[1589]*y_cur[IDX_C2H3II]; + data[jistart + 15979] = 0.0 + k[1343]*y_cur[IDX_CII] + k[1773]*y_cur[IDX_C3H2II]; + data[jistart + 15980] = 0.0 + k[1580]*y_cur[IDX_C2H3II]; + data[jistart + 15981] = 0.0 - k[230]*y_cur[IDX_C2H2I]; + data[jistart + 15982] = 0.0 - k[1452]*y_cur[IDX_C2H2I]; + data[jistart + 15983] = 0.0 - k[1551]*y_cur[IDX_C2H2I] + k[1694]*y_cur[IDX_C2H4I]; + data[jistart + 15984] = 0.0 + k[4763]*y_cur[IDX_C2H2II]; + data[jistart + 15985] = 0.0 + k[4622]*y_cur[IDX_C2H2II]; + data[jistart + 15986] = 0.0 - k[437]*y_cur[IDX_C2H2I] - k[2370]*y_cur[IDX_C2H2I]; + data[jistart + 15987] = 0.0 + k[4833]*y_cur[IDX_C2H2II]; + data[jistart + 15988] = 0.0 + k[88]*y_cur[IDX_HI] + k[4027]*y_cur[IDX_C2H2II]; + data[jistart + 15989] = 0.0 + k[4202]*y_cur[IDX_C2H2II]; + data[jistart + 15990] = 0.0 + k[220]*y_cur[IDX_C2H2II] + k[1363]*y_cur[IDX_CII] + + k[1611]*y_cur[IDX_C2H3II] + k[1779]*y_cur[IDX_C3H2II] + + k[2107]*y_cur[IDX_C4H2II] + k[3866]*y_cur[IDX_SiII]; + data[jistart + 15991] = 0.0 - k[2218]*y_cur[IDX_C2H2I]; + data[jistart + 15992] = 0.0 + k[4798]*y_cur[IDX_C2H2II]; + data[jistart + 15993] = 0.0 + k[3957]*y_cur[IDX_C2H2II]; + data[jistart + 15994] = 0.0 + k[4097]*y_cur[IDX_C2H2II]; + data[jistart + 15995] = 0.0 + k[4377]*y_cur[IDX_C2H2II]; + data[jistart + 15996] = 0.0 + k[4517]*y_cur[IDX_C2H2II]; + data[jistart + 15997] = 0.0 + k[4447]*y_cur[IDX_C2H2II]; + data[jistart + 15998] = 0.0 + k[4587]*y_cur[IDX_C2H2II]; + data[jistart + 15999] = 0.0 + k[3922]*y_cur[IDX_C2H2II]; + data[jistart + 16000] = 0.0 + k[4272]*y_cur[IDX_C2H2II]; + data[jistart + 16001] = 0.0 + k[4307]*y_cur[IDX_C2H2II]; + data[jistart + 16002] = 0.0 + k[1]*y_cur[IDX_CH2I] + k[3887]*y_cur[IDX_C2H2II]; + data[jistart + 16003] = 0.0 + k[4728]*y_cur[IDX_C2H2II]; + data[jistart + 16004] = 0.0 + k[4552]*y_cur[IDX_C2H2II]; + data[jistart + 16005] = 0.0 + k[67]*y_cur[IDX_C2HI] - k[2366]*y_cur[IDX_C2H2I] + + k[4692]*y_cur[IDX_C2H2II]; + data[jistart + 16006] = 0.0 + k[1620]*y_cur[IDX_C2H3II]; + data[jistart + 16007] = 0.0 - k[1544]*y_cur[IDX_C2H2I] + k[1690]*y_cur[IDX_C2H4I] + + k[1754]*y_cur[IDX_C4H2I] + k[2160]*y_cur[IDX_CH4I] + + k[2530]*y_cur[IDX_H2OI] + k[2578]*y_cur[IDX_H2SI] + + k[3563]*y_cur[IDX_NH3I]; + data[jistart + 16008] = 0.0 - k[1546]*y_cur[IDX_C2H2I] + k[1807]*y_cur[IDX_C4H2I] + + k[3696]*y_cur[IDX_OI]; + data[jistart + 16009] = 0.0 + k[4482]*y_cur[IDX_C2H2II]; + data[jistart + 16010] = 0.0 + k[3992]*y_cur[IDX_C2H2II]; + data[jistart + 16011] = 0.0 + k[4062]*y_cur[IDX_C2H2II]; + data[jistart + 16012] = 0.0 + k[4167]*y_cur[IDX_C2H2II]; + data[jistart + 16013] = 0.0 + k[4342]*y_cur[IDX_C2H2II]; + data[jistart + 16014] = 0.0 + k[4237]*y_cur[IDX_C2H2II]; + data[jistart + 16015] = 0.0 + k[4412]*y_cur[IDX_C2H2II]; + data[jistart + 16016] = 0.0 + k[8715]*y_cur[IDX_GCHI] + k[8715]*y_cur[IDX_GCHI]; + data[jistart + 16017] = 0.0 - k[1466]*y_cur[IDX_C2H2I]; + data[jistart + 16018] = 0.0 + k[792]*y_cur[IDX_eM] - k[1545]*y_cur[IDX_C2H2I] + + k[1691]*y_cur[IDX_C2H4I] + k[1773]*y_cur[IDX_CH2CCH2I] + + k[1779]*y_cur[IDX_CH3CCHI] + k[6462]*y_cur[IDX_GRAINM]; + data[jistart + 16019] = 0.0 - k[463]*y_cur[IDX_C2H2I]; + data[jistart + 16020] = 0.0 + k[4132]*y_cur[IDX_C2H2II]; + data[jistart + 16021] = 0.0 - k[1934]*y_cur[IDX_C2H2I]; + data[jistart + 16022] = 0.0 - k[668]*y_cur[IDX_C2H2I] - k[3654]*y_cur[IDX_C2H2I] - + k[3655]*y_cur[IDX_C2H2I]; + data[jistart + 16023] = 0.0 + k[221]*y_cur[IDX_C2H2II]; + data[jistart + 16024] = 0.0 + k[529]*y_cur[IDX_C2H2II]; + data[jistart + 16025] = 0.0 + k[632]*y_cur[IDX_C2H2II]; + data[jistart + 16026] = 0.0 + k[8656]*y_cur[IDX_GCH2I]; + data[jistart + 16027] = 0.0 + k[4657]*y_cur[IDX_C2H2II]; + data[jistart + 16028] = 0.0 + k[1605]*y_cur[IDX_C2H3II]; + data[jistart + 16029] = 0.0 + k[757]*y_cur[IDX_eM] + k[758]*y_cur[IDX_eM] - + k[1536]*y_cur[IDX_C2H2I] - k[1537]*y_cur[IDX_C2H2I] + + k[1628]*y_cur[IDX_C2H3I] + k[6381]*y_cur[IDX_GRAINM] + + k[6382]*y_cur[IDX_GRAINM]; + data[jistart + 16030] = 0.0 + k[2850]*y_cur[IDX_C4H2I] - k[5520]*y_cur[IDX_C2H2I]; + data[jistart + 16031] = 0.0 - k[1568]*y_cur[IDX_C2H2I]; + data[jistart + 16032] = 0.0 + k[219]*y_cur[IDX_C2H2II] + k[1608]*y_cur[IDX_C2H3II]; + data[jistart + 16033] = 0.0 - k[3843]*y_cur[IDX_C2H2I] - k[3844]*y_cur[IDX_C2H2I] - + k[3845]*y_cur[IDX_C2H2I] - k[3846]*y_cur[IDX_C2H2I]; + data[jistart + 16034] = 0.0 - k[227]*y_cur[IDX_C2H2I] + k[227]*y_cur[IDX_C2H2I] + + k[910]*y_cur[IDX_eM] + k[2031]*y_cur[IDX_C4H2I] + + k[3726]*y_cur[IDX_OI] + k[6470]*y_cur[IDX_GRAINM]; + data[jistart + 16035] = 0.0 + k[1599]*y_cur[IDX_C2H3II]; + data[jistart + 16036] = 0.0 + k[1592]*y_cur[IDX_C2H3II]; + data[jistart + 16037] = 0.0 + k[1583]*y_cur[IDX_C2H3II]; + data[jistart + 16038] = 0.0 + k[1586]*y_cur[IDX_C2H3II] - k[4877]*y_cur[IDX_C2H2I]; + data[jistart + 16039] = 0.0 - k[647]*y_cur[IDX_C2H2I]; + data[jistart + 16040] = 0.0 + k[224]*y_cur[IDX_C2H2II] + k[1621]*y_cur[IDX_C2H3II] + + k[1754]*y_cur[IDX_C3HII] + k[1807]*y_cur[IDX_C3H3II] + + k[1837]*y_cur[IDX_C4H2II] + k[2031]*y_cur[IDX_CH2CCHII] + + k[2081]*y_cur[IDX_CH3II] + k[2850]*y_cur[IDX_C4H3II] + + k[2851]*y_cur[IDX_C4H4II]; + data[jistart + 16041] = 0.0 - k[1552]*y_cur[IDX_C2H2I] + k[1837]*y_cur[IDX_C4H2I] + + k[2107]*y_cur[IDX_CH3CCHI] - k[5511]*y_cur[IDX_C2H2I]; + data[jistart + 16042] = 0.0 + k[1]*y_cur[IDX_CM] - k[4991]*y_cur[IDX_C2H2I] + + k[4992]*y_cur[IDX_CH2I] + k[4992]*y_cur[IDX_CH2I] + + k[4993]*y_cur[IDX_CH2I] + k[4993]*y_cur[IDX_CH2I]; + data[jistart + 16043] = 0.0 + k[3036]*y_cur[IDX_C2H3II]; + data[jistart + 16044] = 0.0 + k[215]*y_cur[IDX_C2H2II] + k[1579]*y_cur[IDX_C2H3II] + + k[1686]*y_cur[IDX_C3II] + k[1690]*y_cur[IDX_C3HII] + + k[1691]*y_cur[IDX_C3H2II] + k[1694]*y_cur[IDX_C4HII] + + k[1698]*y_cur[IDX_C5II] + k[1704]*y_cur[IDX_C6H5II] + k[5700] + + k[5985]; + data[jistart + 16045] = 0.0 + k[214]*y_cur[IDX_C2H2II] + k[1628]*y_cur[IDX_C2H4II] + + k[4882]*y_cur[IDX_O2I] + k[5025]*y_cur[IDX_CH3I] + + k[5155]*y_cur[IDX_HI] + k[5223]*y_cur[IDX_NI] + + k[5456]*y_cur[IDX_OHI] + k[5698] + k[5983]; + data[jistart + 16046] = 0.0 + k[4882]*y_cur[IDX_C2H3I]; + data[jistart + 16047] = 0.0 - k[1574]*y_cur[IDX_C2H2I] + k[3866]*y_cur[IDX_CH3CCHI] - + k[5512]*y_cur[IDX_C2H2I]; + data[jistart + 16048] = 0.0 + k[223]*y_cur[IDX_C2H2II] + k[1619]*y_cur[IDX_C2H3II] + + k[2578]*y_cur[IDX_C3HII]; + data[jistart + 16049] = 0.0 - k[1573]*y_cur[IDX_C2H2I]; + data[jistart + 16050] = 0.0 - k[4879]*y_cur[IDX_C2H2I] - k[4880]*y_cur[IDX_C2H2I]; + data[jistart + 16051] = 0.0 + k[747]*y_cur[IDX_eM] + k[748]*y_cur[IDX_eM] - + k[1535]*y_cur[IDX_C2H2I] + k[1579]*y_cur[IDX_C2H4I] + + k[1580]*y_cur[IDX_C3H2I] + k[1583]*y_cur[IDX_C3HI] + + k[1586]*y_cur[IDX_C4HI] + k[1589]*y_cur[IDX_C5H2I] + + k[1592]*y_cur[IDX_C5HI] + k[1595]*y_cur[IDX_C6H2I] + + k[1598]*y_cur[IDX_C6H6I] + k[1599]*y_cur[IDX_C6HI] + + k[1602]*y_cur[IDX_C7H2I] + k[1605]*y_cur[IDX_C7HI] + + k[1608]*y_cur[IDX_CH2CCHI] + k[1611]*y_cur[IDX_CH3CCHI] + + k[1617]*y_cur[IDX_H2CCCI] + k[1619]*y_cur[IDX_H2SI] + + k[1620]*y_cur[IDX_HC3NI] + k[1621]*y_cur[IDX_C4H2I] + + k[1624]*y_cur[IDX_NCCNI] + k[1726]*y_cur[IDX_C2HI] + + k[2523]*y_cur[IDX_H2OI] + k[2861]*y_cur[IDX_HCNI] + + k[3036]*y_cur[IDX_HNCI] + k[3557]*y_cur[IDX_NH3I] + + k[6362]*y_cur[IDX_GRAINM] + k[6363]*y_cur[IDX_GRAINM]; + data[jistart + 16052] = 0.0 + k[226]*y_cur[IDX_C2H2II] - k[4878]*y_cur[IDX_C2H2I]; + data[jistart + 16053] = 0.0 + k[225]*y_cur[IDX_C2H2II]; + data[jistart + 16054] = 0.0 + k[2160]*y_cur[IDX_C3HII] + k[2164]*y_cur[IDX_C4II] + + k[2174]*y_cur[IDX_C4NII] + k[2176]*y_cur[IDX_C5II] + + k[2182]*y_cur[IDX_C6II]; + data[jistart + 16055] = 0.0 + k[67]*y_cur[IDX_HM] + k[1726]*y_cur[IDX_C2H3II] - + k[4888]*y_cur[IDX_C2H2I] + k[5133]*y_cur[IDX_H2I]; + data[jistart + 16056] = 0.0 + k[222]*y_cur[IDX_C2H2II]; + data[jistart + 16057] = 0.0 + k[2861]*y_cur[IDX_C2H3II]; + data[jistart + 16058] = 0.0 - k[5063]*y_cur[IDX_C2H2I] - k[5064]*y_cur[IDX_C2H2I]; + data[jistart + 16059] = 0.0 - k[4867]*y_cur[IDX_C2H2I]; + data[jistart + 16060] = 0.0 - k[5453]*y_cur[IDX_C2H2I] - k[5454]*y_cur[IDX_C2H2I] - + k[5455]*y_cur[IDX_C2H2I] + k[5456]*y_cur[IDX_C2H3I]; + data[jistart + 16061] = 0.0 + k[598]*y_cur[IDX_C2H2II] + k[3557]*y_cur[IDX_C2H3II] + + k[3563]*y_cur[IDX_C3HII]; + data[jistart + 16062] = 0.0 + k[214]*y_cur[IDX_C2H3I] + k[215]*y_cur[IDX_C2H4I] + + k[216]*y_cur[IDX_C5H2I] + k[217]*y_cur[IDX_C6H2I] + + k[218]*y_cur[IDX_C7H2I] + k[219]*y_cur[IDX_CH2CCHI] + + k[220]*y_cur[IDX_CH3CCHI] + k[221]*y_cur[IDX_FeI] + + k[222]*y_cur[IDX_H2COI] + k[223]*y_cur[IDX_H2SI] + + k[224]*y_cur[IDX_C4H2I] + k[225]*y_cur[IDX_HCOI] + + k[226]*y_cur[IDX_NOI] + k[529]*y_cur[IDX_MgI] + + k[598]*y_cur[IDX_NH3I] + k[632]*y_cur[IDX_NaI] - + k[1479]*y_cur[IDX_C2H2I] - k[1480]*y_cur[IDX_C2H2I] + + k[3887]*y_cur[IDX_CM] + k[3922]*y_cur[IDX_C10M] + + k[3957]*y_cur[IDX_C10HM] + k[3992]*y_cur[IDX_C2M] + + k[4027]*y_cur[IDX_C2HM] + k[4062]*y_cur[IDX_C3M] + + k[4097]*y_cur[IDX_C3HM] + k[4132]*y_cur[IDX_C3NM] + + k[4167]*y_cur[IDX_C4M] + k[4202]*y_cur[IDX_C4HM] + + k[4237]*y_cur[IDX_C5M] + k[4272]*y_cur[IDX_C5HM] + + k[4307]*y_cur[IDX_C5NM] + k[4342]*y_cur[IDX_C6M] + + k[4377]*y_cur[IDX_C6HM] + k[4412]*y_cur[IDX_C7M] + + k[4447]*y_cur[IDX_C7HM] + k[4482]*y_cur[IDX_C8M] + + k[4517]*y_cur[IDX_C8HM] + k[4552]*y_cur[IDX_C9M] + + k[4587]*y_cur[IDX_C9HM] + k[4622]*y_cur[IDX_CHM] + + k[4657]*y_cur[IDX_CNM] + k[4692]*y_cur[IDX_HM] + + k[4728]*y_cur[IDX_OM] + k[4763]*y_cur[IDX_O2M] + + k[4798]*y_cur[IDX_OHM] + k[4833]*y_cur[IDX_SM]; + data[jistart + 16063] = 0.0 - k[2042]*y_cur[IDX_C2H2I] + k[2081]*y_cur[IDX_C4H2I]; + data[jistart + 16064] = 0.0 - k[227]*y_cur[IDX_CH2CCHII] + k[227]*y_cur[IDX_CH2CCHII] - + k[228]*y_cur[IDX_CO2II] - k[229]*y_cur[IDX_HC3NII] - + k[230]*y_cur[IDX_HCNII] - k[277]*y_cur[IDX_CH4II] - + k[324]*y_cur[IDX_HII] - k[437]*y_cur[IDX_H2II] - + k[463]*y_cur[IDX_H2OII] - k[509]*y_cur[IDX_HeII] - + k[647]*y_cur[IDX_OII] - k[668]*y_cur[IDX_O2II] - + k[1300]*y_cur[IDX_CII] - k[1452]*y_cur[IDX_C2II] - + k[1466]*y_cur[IDX_C2HII] - k[1479]*y_cur[IDX_C2H2II] - + k[1480]*y_cur[IDX_C2H2II] - k[1535]*y_cur[IDX_C2H3II] - + k[1536]*y_cur[IDX_C2H4II] - k[1537]*y_cur[IDX_C2H4II] - + k[1538]*y_cur[IDX_C2H5II] - k[1539]*y_cur[IDX_C2H5II] - + k[1540]*y_cur[IDX_C2NII] - k[1541]*y_cur[IDX_C2NII] - + k[1542]*y_cur[IDX_C2N2II] - k[1543]*y_cur[IDX_C3II] - + k[1544]*y_cur[IDX_C3HII] - k[1545]*y_cur[IDX_C3H2II] - + k[1546]*y_cur[IDX_C3H3II] - k[1547]*y_cur[IDX_C3H4II] - + k[1548]*y_cur[IDX_C3H5II] - k[1549]*y_cur[IDX_C4II] - + k[1550]*y_cur[IDX_C4II] - k[1551]*y_cur[IDX_C4HII] - + k[1552]*y_cur[IDX_C4H2II] - k[1553]*y_cur[IDX_C4H4II] - + k[1554]*y_cur[IDX_C4H4II] - k[1555]*y_cur[IDX_C4NII] - + k[1556]*y_cur[IDX_C5II] - k[1557]*y_cur[IDX_C6II] - + k[1558]*y_cur[IDX_C6II] - k[1559]*y_cur[IDX_C6HII] - + k[1560]*y_cur[IDX_C7H2II] - k[1561]*y_cur[IDX_C7H2II] - + k[1562]*y_cur[IDX_C2H6II] - k[1563]*y_cur[IDX_C2H6II] - + k[1564]*y_cur[IDX_C2H6II] - k[1565]*y_cur[IDX_HC3NII] - + k[1566]*y_cur[IDX_HCOII] - k[1567]*y_cur[IDX_HCO2II] - + k[1568]*y_cur[IDX_N2HII] - k[1569]*y_cur[IDX_PII] - + k[1570]*y_cur[IDX_PHII] - k[1571]*y_cur[IDX_PH2II] - + k[1572]*y_cur[IDX_PH3II] - k[1573]*y_cur[IDX_SII] - + k[1574]*y_cur[IDX_SiII] - k[1575]*y_cur[IDX_SiC2II] - + k[1576]*y_cur[IDX_SiC2HII] - k[1934]*y_cur[IDX_CHII] - + k[2042]*y_cur[IDX_CH3II] - k[2133]*y_cur[IDX_CH4II] - + k[2134]*y_cur[IDX_CH4II] - k[2218]*y_cur[IDX_CH5II] - + k[2366]*y_cur[IDX_HM] - k[2370]*y_cur[IDX_H2II] - + k[2587]*y_cur[IDX_H3II] - k[3074]*y_cur[IDX_HeII] - + k[3075]*y_cur[IDX_HeII] - k[3076]*y_cur[IDX_HeII] - + k[3654]*y_cur[IDX_O2II] - k[3655]*y_cur[IDX_O2II] - + k[3843]*y_cur[IDX_SOII] - k[3844]*y_cur[IDX_SOII] - + k[3845]*y_cur[IDX_SOII] - k[3846]*y_cur[IDX_SOII] - + k[4867]*y_cur[IDX_C2I] - k[4877]*y_cur[IDX_C4HI] - + k[4878]*y_cur[IDX_NOI] - k[4879]*y_cur[IDX_SiI] - + k[4880]*y_cur[IDX_SiI] - k[4888]*y_cur[IDX_C2HI] - + k[4911]*y_cur[IDX_CI] - k[4912]*y_cur[IDX_CI] - + k[4991]*y_cur[IDX_CH2I] - k[5063]*y_cur[IDX_CHI] - + k[5064]*y_cur[IDX_CHI] - k[5104]*y_cur[IDX_CNI] - + k[5154]*y_cur[IDX_HI] - k[5344]*y_cur[IDX_OI] - + k[5453]*y_cur[IDX_OHI] - k[5454]*y_cur[IDX_OHI] - + k[5455]*y_cur[IDX_OHI] - k[5511]*y_cur[IDX_C4H2II] - + k[5512]*y_cur[IDX_SiII] - k[5520]*y_cur[IDX_C4H3II] - + k[5567]*y_cur[IDX_H3OII] - k[5696] - k[5697] - k[5981] - k[5982] - + k[6910]; + data[jistart + 16065] = 0.0 - k[5104]*y_cur[IDX_C2H2I]; + data[jistart + 16066] = 0.0 + k[8587]*y_cur[IDX_GC2HI]; + data[jistart + 16067] = 0.0 + k[4949]*y_cur[IDX_CI] + k[5025]*y_cur[IDX_C2H3I]; + data[jistart + 16068] = 0.0 + k[5223]*y_cur[IDX_C2H3I]; + data[jistart + 16069] = 0.0 - k[5567]*y_cur[IDX_C2H2I]; + data[jistart + 16070] = 0.0 + k[3696]*y_cur[IDX_C3H3II] + k[3726]*y_cur[IDX_CH2CCHII] - + k[5344]*y_cur[IDX_C2H2I] + k[5395]*y_cur[IDX_H2CCCI]; + data[jistart + 16071] = 0.0 - k[509]*y_cur[IDX_C2H2I] - k[3074]*y_cur[IDX_C2H2I] - + k[3075]*y_cur[IDX_C2H2I] - k[3076]*y_cur[IDX_C2H2I]; + data[jistart + 16072] = 0.0 - k[1300]*y_cur[IDX_C2H2I] + k[1343]*y_cur[IDX_CH2CCH2I] + + k[1363]*y_cur[IDX_CH3CCHI]; + data[jistart + 16073] = 0.0 + k[2523]*y_cur[IDX_C2H3II] + k[2530]*y_cur[IDX_C3HII]; + data[jistart + 16074] = 0.0 - k[324]*y_cur[IDX_C2H2I]; + data[jistart + 16075] = 0.0 + k[1920]*y_cur[IDX_SiCH2II] - k[4911]*y_cur[IDX_C2H2I] - + k[4912]*y_cur[IDX_C2H2I] + k[4949]*y_cur[IDX_CH3I]; + data[jistart + 16076] = 0.0 - k[1566]*y_cur[IDX_C2H2I]; + data[jistart + 16077] = 0.0 - k[2587]*y_cur[IDX_C2H2I]; + data[jistart + 16078] = 0.0 + k[6362]*y_cur[IDX_C2H3II] + k[6363]*y_cur[IDX_C2H3II] + + k[6381]*y_cur[IDX_C2H4II] + k[6382]*y_cur[IDX_C2H4II] + + k[6391]*y_cur[IDX_C2H5II] + k[6392]*y_cur[IDX_C2H5II] + + k[6462]*y_cur[IDX_C3H2II] + k[6470]*y_cur[IDX_CH2CCHII] + + k[6493]*y_cur[IDX_CH2COII] + k[6504]*y_cur[IDX_C3H7II] + + k[6637]*y_cur[IDX_HC3NHII] + k[6656]*y_cur[IDX_C3H2OII] + + k[6657]*y_cur[IDX_CH2CHCNHII] + k[6682]*y_cur[IDX_PC2H2II] + + k[6687]*y_cur[IDX_PC2H3II]; + data[jistart + 16079] = 0.0 + k[5133]*y_cur[IDX_C2HI]; + data[jistart + 16080] = 0.0 + k[747]*y_cur[IDX_C2H3II] + k[748]*y_cur[IDX_C2H3II] + + k[757]*y_cur[IDX_C2H4II] + k[758]*y_cur[IDX_C2H4II] + + k[764]*y_cur[IDX_C2H5II] + k[765]*y_cur[IDX_C2H5II] + + k[792]*y_cur[IDX_C3H2II] + k[797]*y_cur[IDX_C3H2OII] + + k[807]*y_cur[IDX_C3H7II] + k[910]*y_cur[IDX_CH2CCHII] + + k[913]*y_cur[IDX_CH2CHCNHII] + k[919]*y_cur[IDX_CH2COII] + + k[1066]*y_cur[IDX_HC3NHII] + k[1183]*y_cur[IDX_PC2H2II] + + k[1186]*y_cur[IDX_PC2H3II]; + data[jistart + 16081] = 0.0 + k[88]*y_cur[IDX_C2HM] - k[5154]*y_cur[IDX_C2H2I] + + k[5155]*y_cur[IDX_C2H3I]; + data[jistart + 16082] = 0.0 + k[5941]; + data[jistart + 16083] = 0.0 + k[1015]*y_cur[IDX_eM] + k[6545]*y_cur[IDX_GRAINM]; + data[jistart + 16084] = 0.0 + k[970]*y_cur[IDX_eM] + k[6405]*y_cur[IDX_GRAINM]; + data[jistart + 16085] = 0.0 + k[1127]*y_cur[IDX_eM] + k[6525]*y_cur[IDX_GRAINM]; + data[jistart + 16086] = 0.0 + k[1131]*y_cur[IDX_eM] + k[6521]*y_cur[IDX_GRAINM]; + data[jistart + 16087] = 0.0 + k[5237]*y_cur[IDX_NI] + k[5733] + k[6018]; + data[jistart + 16088] = 0.0 + k[3282]*y_cur[IDX_HeII] + k[5884] + k[6220]; + data[jistart + 16089] = 0.0 + k[1084]*y_cur[IDX_eM] + k[6843]*y_cur[IDX_GRAINM]; + data[jistart + 16090] = 0.0 + k[1086]*y_cur[IDX_eM] + k[6876]*y_cur[IDX_GRAINM]; + data[jistart + 16091] = 0.0 + k[5705] + k[5990]; + data[jistart + 16092] = 0.0 + k[783]*y_cur[IDX_eM] + k[783]*y_cur[IDX_eM] + + k[2830]*y_cur[IDX_HI] + k[2866]*y_cur[IDX_HCNI] + + k[6636]*y_cur[IDX_GRAINM] + k[6636]*y_cur[IDX_GRAINM]; + data[jistart + 16093] = 0.0 + k[814]*y_cur[IDX_eM] + k[6626]*y_cur[IDX_GRAINM]; + data[jistart + 16094] = 0.0 + k[916]*y_cur[IDX_eM] + k[6475]*y_cur[IDX_GRAINM]; + data[jistart + 16095] = 0.0 + k[2352]*y_cur[IDX_HII] + k[5872] + k[6203]; + data[jistart + 16096] = 0.0 + k[1359]*y_cur[IDX_CII]; + data[jistart + 16097] = 0.0 + k[1362]*y_cur[IDX_CII]; + data[jistart + 16098] = 0.0 + k[1006]*y_cur[IDX_eM] + k[6376]*y_cur[IDX_GRAINM]; + data[jistart + 16099] = 0.0 + k[5932] + k[6283]; + data[jistart + 16100] = 0.0 + k[1261]*y_cur[IDX_eM] + k[6654]*y_cur[IDX_GRAINM]; + data[jistart + 16101] = 0.0 + k[1386]*y_cur[IDX_CII] + k[3206]*y_cur[IDX_HeII] + + k[5161]*y_cur[IDX_HI] + k[5824] + k[6135]; + data[jistart + 16102] = 0.0 + k[1355]*y_cur[IDX_CII]; + data[jistart + 16103] = 0.0 + k[2351]*y_cur[IDX_HII] + k[5871] + k[6202]; + data[jistart + 16104] = 0.0 + k[1406]*y_cur[IDX_CII] + k[3244]*y_cur[IDX_HeII] + k[5853] + + k[6179]; + data[jistart + 16105] = 0.0 + k[1156]*y_cur[IDX_eM] + k[6652]*y_cur[IDX_GRAINM]; + data[jistart + 16106] = 0.0 - k[5120]*y_cur[IDX_CNI]; + data[jistart + 16107] = 0.0 + k[3170]*y_cur[IDX_HeII] + k[5788] + k[6090]; + data[jistart + 16108] = 0.0 + k[3156]*y_cur[IDX_HeII] + k[4943]*y_cur[IDX_CI] + k[5771] + + k[6067]; + data[jistart + 16109] = 0.0 + k[3469]*y_cur[IDX_NI]; + data[jistart + 16110] = 0.0 + k[5230]*y_cur[IDX_NI]; + data[jistart + 16111] = 0.0 + k[4977]*y_cur[IDX_CI]; + data[jistart + 16112] = 0.0 + k[1349]*y_cur[IDX_CII] + k[3165]*y_cur[IDX_HeII] + k[5787] + + k[6088]; + data[jistart + 16113] = 0.0 + k[1405]*y_cur[IDX_CII] + k[3243]*y_cur[IDX_HeII] + k[5852] + + k[6177]; + data[jistart + 16114] = 0.0 + k[3141]*y_cur[IDX_HeII] + k[4937]*y_cur[IDX_CI] + k[5760] + + k[6049]; + data[jistart + 16115] = 0.0 + k[5292]*y_cur[IDX_NI]; + data[jistart + 16116] = 0.0 - k[5119]*y_cur[IDX_CNI]; + data[jistart + 16117] = 0.0 + k[1416]*y_cur[IDX_CII]; + data[jistart + 16118] = 0.0 + k[781]*y_cur[IDX_eM] + k[6467]*y_cur[IDX_GRAINM]; + data[jistart + 16119] = 0.0 + k[2871]*y_cur[IDX_HCNI]; + data[jistart + 16120] = 0.0 + k[5866]; + data[jistart + 16121] = 0.0 + k[1424]*y_cur[IDX_CII] + k[3292]*y_cur[IDX_HeII] + + k[4979]*y_cur[IDX_CI] + k[5196]*y_cur[IDX_HI] + + k[5429]*y_cur[IDX_OI] + k[5901] + k[6239]; + data[jistart + 16122] = 0.0 + k[1064]*y_cur[IDX_eM] + k[2197]*y_cur[IDX_CH4I] + + k[6630]*y_cur[IDX_GRAINM]; + data[jistart + 16123] = 0.0 - k[5108]*y_cur[IDX_CNI]; + data[jistart + 16124] = 0.0 + k[1404]*y_cur[IDX_CII] + k[3242]*y_cur[IDX_HeII] + k[5850] + + k[6175]; + data[jistart + 16125] = 0.0 - k[5126]*y_cur[IDX_CNI]; + data[jistart + 16126] = 0.0 + k[1066]*y_cur[IDX_eM] + k[6637]*y_cur[IDX_GRAINM]; + data[jistart + 16127] = 0.0 + k[1379]*y_cur[IDX_CII] + k[1514]*y_cur[IDX_C2H2II] + + k[3193]*y_cur[IDX_HeII] + k[5810] + k[6115]; + data[jistart + 16128] = 0.0 + k[183]*y_cur[IDX_CII] + k[184]*y_cur[IDX_CII] + + k[3279]*y_cur[IDX_HeII] + k[3870]*y_cur[IDX_SiII] + + k[4903]*y_cur[IDX_C2HI] + k[4908]*y_cur[IDX_C4HI] + + k[4968]*y_cur[IDX_CI] + k[5181]*y_cur[IDX_HI] + k[5881] + k[5881] + + k[6216] + k[6216]; + data[jistart + 16129] = 0.0 + k[1752]*y_cur[IDX_HC3NI] + k[2867]*y_cur[IDX_HCNI]; + data[jistart + 16130] = 0.0 - k[2279]*y_cur[IDX_CNI]; + data[jistart + 16131] = 0.0 - k[2278]*y_cur[IDX_CNI]; + data[jistart + 16132] = 0.0 - k[5107]*y_cur[IDX_CNI]; + data[jistart + 16133] = 0.0 + k[7091] + k[7273] + k[7455]; + data[jistart + 16134] = 0.0 - k[5109]*y_cur[IDX_CNI]; + data[jistart + 16135] = 0.0 + k[208]*y_cur[IDX_C2I] + k[241]*y_cur[IDX_C2HI] + + k[245]*y_cur[IDX_CI] + k[260]*y_cur[IDX_CH2I] + + k[288]*y_cur[IDX_CHI] + k[298]*y_cur[IDX_CO2I] + + k[299]*y_cur[IDX_COI] + k[300]*y_cur[IDX_H2COI] + + k[301]*y_cur[IDX_HCNI] + k[302]*y_cur[IDX_HCOI] + + k[303]*y_cur[IDX_NOI] + k[304]*y_cur[IDX_O2I] + k[305]*y_cur[IDX_SI] + + k[487]*y_cur[IDX_HI] + k[586]*y_cur[IDX_NH2I] + + k[616]*y_cur[IDX_NHI] + k[681]*y_cur[IDX_OI] + k[698]*y_cur[IDX_OHI]; + data[jistart + 16136] = 0.0 - k[5111]*y_cur[IDX_CNI]; + data[jistart + 16137] = 0.0 + k[8657]*y_cur[IDX_GCI]; + data[jistart + 16138] = 0.0 - k[306]*y_cur[IDX_CNI]; + data[jistart + 16139] = 0.0 + k[4661]*y_cur[IDX_CNM]; + data[jistart + 16140] = 0.0 + k[1088]*y_cur[IDX_eM] + k[1458]*y_cur[IDX_C2I] + + k[1745]*y_cur[IDX_C2HI] + k[1903]*y_cur[IDX_CI] + + k[2005]*y_cur[IDX_CH2I] + k[2250]*y_cur[IDX_CHI] + + k[2546]*y_cur[IDX_H2OI] + k[2853]*y_cur[IDX_CO2I] + + k[2854]*y_cur[IDX_COI] + k[2855]*y_cur[IDX_H2COI] + + k[2856]*y_cur[IDX_HCNI] + k[2857]*y_cur[IDX_HCOI] + + k[2859]*y_cur[IDX_HNCI] + k[2860]*y_cur[IDX_SI] + + k[3539]*y_cur[IDX_NH2I] + k[3613]*y_cur[IDX_NHI] + + k[3800]*y_cur[IDX_OHI] + k[6372]*y_cur[IDX_GRAINM]; + data[jistart + 16141] = 0.0 - k[5112]*y_cur[IDX_CNI]; + data[jistart + 16142] = 0.0 + k[3383]*y_cur[IDX_NI]; + data[jistart + 16143] = 0.0 + k[2869]*y_cur[IDX_HCNI]; + data[jistart + 16144] = 0.0 + k[979]*y_cur[IDX_eM] + k[4664]*y_cur[IDX_CNM] + + k[6469]*y_cur[IDX_GRAINM]; + data[jistart + 16145] = 0.0 - k[3481]*y_cur[IDX_CNI]; + data[jistart + 16146] = 0.0 - k[444]*y_cur[IDX_CNI] - k[2381]*y_cur[IDX_CNI]; + data[jistart + 16147] = 0.0 - k[3509]*y_cur[IDX_CNI]; + data[jistart + 16148] = 0.0 + k[4690]*y_cur[IDX_CNM]; + data[jistart + 16149] = 0.0 + k[115]*y_cur[IDX_NI]; + data[jistart + 16150] = 0.0 - k[5110]*y_cur[IDX_CNI]; + data[jistart + 16151] = 0.0 + k[4671]*y_cur[IDX_CNM]; + data[jistart + 16152] = 0.0 - k[696]*y_cur[IDX_CNI]; + data[jistart + 16153] = 0.0 + k[3396]*y_cur[IDX_NI]; + data[jistart + 16154] = 0.0 + k[3380]*y_cur[IDX_NI]; + data[jistart + 16155] = 0.0 + k[3414]*y_cur[IDX_NI]; + data[jistart + 16156] = 0.0 + k[5]*y_cur[IDX_NI]; + data[jistart + 16157] = 0.0 + k[5263]*y_cur[IDX_NI]; + data[jistart + 16158] = 0.0 - k[666]*y_cur[IDX_CNI]; + data[jistart + 16159] = 0.0 + k[3445]*y_cur[IDX_NI]; + data[jistart + 16160] = 0.0 - k[72]*y_cur[IDX_CNI]; + data[jistart + 16161] = 0.0 + k[1400]*y_cur[IDX_CII] + k[1471]*y_cur[IDX_C2HII] + + k[1752]*y_cur[IDX_C3II] + k[3237]*y_cur[IDX_HeII] + k[5846] + + k[6171]; + data[jistart + 16162] = 0.0 + k[3439]*y_cur[IDX_NI]; + data[jistart + 16163] = 0.0 + k[3393]*y_cur[IDX_NI]; + data[jistart + 16164] = 0.0 + k[3403]*y_cur[IDX_NI]; + data[jistart + 16165] = 0.0 + k[3420]*y_cur[IDX_NI]; + data[jistart + 16166] = 0.0 + k[3411]*y_cur[IDX_NI]; + data[jistart + 16167] = 0.0 + k[3428]*y_cur[IDX_NI]; + data[jistart + 16168] = 0.0 + k[4688]*y_cur[IDX_CNM]; + data[jistart + 16169] = 0.0 + k[3089]*y_cur[IDX_HeII] + k[4917]*y_cur[IDX_CI] + + k[5229]*y_cur[IDX_NI] + k[5229]*y_cur[IDX_NI] + + k[5353]*y_cur[IDX_OI] + k[5711] + k[5996]; + data[jistart + 16170] = 0.0 + k[4689]*y_cur[IDX_CNM]; + data[jistart + 16171] = 0.0 + k[586]*y_cur[IDX_CNII] + k[3539]*y_cur[IDX_HCNII]; + data[jistart + 16172] = 0.0 - k[1467]*y_cur[IDX_CNI] + k[1471]*y_cur[IDX_HC3NI] + + k[1474]*y_cur[IDX_HCNI] + k[3386]*y_cur[IDX_NI]; + data[jistart + 16173] = 0.0 + k[3397]*y_cur[IDX_NI]; + data[jistart + 16174] = 0.0 + k[3124]*y_cur[IDX_HeII] + k[4929]*y_cur[IDX_CI] + + k[5241]*y_cur[IDX_NI] + k[5746] + k[6031]; + data[jistart + 16175] = 0.0 - k[3775]*y_cur[IDX_CNI]; + data[jistart + 16176] = 0.0 + k[3098]*y_cur[IDX_HeII] + k[4921]*y_cur[IDX_CI] + + k[5234]*y_cur[IDX_NI] + k[5722] + k[6006]; + data[jistart + 16177] = 0.0 - k[1944]*y_cur[IDX_CNI] - k[1945]*y_cur[IDX_CNI]; + data[jistart + 16178] = 0.0 + k[298]*y_cur[IDX_CNII] + k[2853]*y_cur[IDX_HCNII]; + data[jistart + 16179] = 0.0 + k[4665]*y_cur[IDX_CNM]; + data[jistart + 16180] = 0.0 + k[4677]*y_cur[IDX_CNM]; + data[jistart + 16181] = 0.0 + k[4683]*y_cur[IDX_CNM]; + data[jistart + 16182] = 0.0 + k[5221]*y_cur[IDX_NI]; + data[jistart + 16183] = 0.0 + k[5249]*y_cur[IDX_NI]; + data[jistart + 16184] = 0.0 + k[5244]*y_cur[IDX_NI]; + data[jistart + 16185] = 0.0 + k[5250]*y_cur[IDX_NI]; + data[jistart + 16186] = 0.0 + k[5248]*y_cur[IDX_NI]; + data[jistart + 16187] = 0.0 + k[8657]*y_cur[IDX_GNI]; + data[jistart + 16188] = 0.0 + k[616]*y_cur[IDX_CNII] + k[3613]*y_cur[IDX_HCNII] + + k[4972]*y_cur[IDX_CI] - k[5305]*y_cur[IDX_CNI]; + data[jistart + 16189] = 0.0 + k[5238]*y_cur[IDX_NI]; + data[jistart + 16190] = 0.0 + k[5242]*y_cur[IDX_NI]; + data[jistart + 16191] = 0.0 + k[4656]*y_cur[IDX_CII] + k[4657]*y_cur[IDX_C2H2II] + + k[4658]*y_cur[IDX_C2H3II] + k[4659]*y_cur[IDX_C4H2II] + + k[4660]*y_cur[IDX_C4H3II] + k[4661]*y_cur[IDX_C4SII] + + k[4662]*y_cur[IDX_CH2CCHII] + k[4663]*y_cur[IDX_CH3II] + + k[4664]*y_cur[IDX_CNCII] + k[4665]*y_cur[IDX_FeII] + + k[4666]*y_cur[IDX_HII] + k[4667]*y_cur[IDX_H2COII] + + k[4668]*y_cur[IDX_H2SII] + k[4669]*y_cur[IDX_H3II] + k[4670]*y_cur[IDX_H3OII] + k[4671]*y_cur[IDX_HC2SII] + k[4672]*y_cur[IDX_HCNHII] + k[4673]*y_cur[IDX_HCNHII] + - k[4674]*y_cur[IDX_HCOII] + k[4679]*y_cur[IDX_N2HII] + - k[4681]*y_cur[IDX_NH4II] + k[4689]*y_cur[IDX_SiOHII]; - data[jistart + 11410] = 0.0 + k[4699]*y_cur[IDX_HM]; - data[jistart + 11411] = 0.0 - k[5161]*y_cur[IDX_HI]; - data[jistart + 11412] = 0.0 + k[2383]*y_cur[IDX_H2II] + - k[3486]*y_cur[IDX_NHII] - k[5163]*y_cur[IDX_HI] + - k[5461]*y_cur[IDX_OHI]; - data[jistart + 11413] = 0.0 - k[488]*y_cur[IDX_HI] + - k[2189]*y_cur[IDX_CH4I] + k[2434]*y_cur[IDX_H2I] + - k[2435]*y_cur[IDX_H2I]; - data[jistart + 11414] = 0.0 + k[2382]*y_cur[IDX_H2II] - - k[5162]*y_cur[IDX_HI]; - data[jistart + 11415] = 0.0 + k[2436]*y_cur[IDX_H2I] - - k[2841]*y_cur[IDX_HI]; - data[jistart + 11416] = 0.0 + k[1270]*y_cur[IDX_eM] + - k[6694]*y_cur[IDX_GRAINM]; - data[jistart + 11417] = 0.0 + k[373]*y_cur[IDX_HII]; - data[jistart + 11418] = 0.0 + k[2437]*y_cur[IDX_H2I]; - data[jistart + 11419] = 0.0 + k[374]*y_cur[IDX_HII] + - k[4899]*y_cur[IDX_C2HI] + k[5463]*y_cur[IDX_OHI]; - data[jistart + 11420] = 0.0 + k[2438]*y_cur[IDX_H2I]; - data[jistart + 11421] = 0.0 + k[319]*y_cur[IDX_HII] + - k[5132]*y_cur[IDX_H2I]; - data[jistart + 11422] = 0.0 - k[318]*y_cur[IDX_HI] + - k[2439]*y_cur[IDX_H2I]; - data[jistart + 11423] = 0.0 + k[5139]*y_cur[IDX_H2I]; - data[jistart + 11424] = 0.0 + k[2440]*y_cur[IDX_H2I]; - data[jistart + 11425] = 0.0 + k[375]*y_cur[IDX_HII] + - k[2680]*y_cur[IDX_H3II]; - data[jistart + 11426] = 0.0 + k[4700]*y_cur[IDX_HM]; - data[jistart + 11427] = 0.0 + k[7070] + k[7252] + k[7434]; - data[jistart + 11428] = 0.0 + k[6308]*y_cur[IDX_HII] + - k[6309]*y_cur[IDX_H2II] + k[6309]*y_cur[IDX_H2II] + - k[6310]*y_cur[IDX_H3II] + k[6311]*y_cur[IDX_H3II] + - k[6311]*y_cur[IDX_H3II] + k[6311]*y_cur[IDX_H3II] + - k[6313]*y_cur[IDX_HeHII] + k[6315]*y_cur[IDX_CHII] + - k[6317]*y_cur[IDX_CH2II] + k[6317]*y_cur[IDX_CH2II] + - k[6318]*y_cur[IDX_CH2II] + k[6320]*y_cur[IDX_NHII] + - k[6321]*y_cur[IDX_CH3II] + k[6323]*y_cur[IDX_CH3II] + - k[6323]*y_cur[IDX_CH3II] + k[6324]*y_cur[IDX_NH2II] + - k[6324]*y_cur[IDX_NH2II] + k[6325]*y_cur[IDX_NH2II] + - k[6327]*y_cur[IDX_CH4II] + k[6327]*y_cur[IDX_CH4II] + - k[6328]*y_cur[IDX_CH4II] + k[6329]*y_cur[IDX_OHII] + - k[6330]*y_cur[IDX_NH3II] + k[6331]*y_cur[IDX_NH3II] + - k[6331]*y_cur[IDX_NH3II] + k[6332]*y_cur[IDX_CH5II] + - k[6334]*y_cur[IDX_CH5II] + k[6334]*y_cur[IDX_CH5II] + - k[6335]*y_cur[IDX_CH5II] + k[6338]*y_cur[IDX_NH4II] + - k[6338]*y_cur[IDX_NH4II] + k[6339]*y_cur[IDX_NH4II] + - k[6341]*y_cur[IDX_H2OII] + k[6341]*y_cur[IDX_H2OII] + - k[6342]*y_cur[IDX_H2OII] + k[6343]*y_cur[IDX_H3OII] + - k[6344]*y_cur[IDX_H3OII] + k[6346]*y_cur[IDX_H3OII] + - k[6346]*y_cur[IDX_H3OII] + k[6348]*y_cur[IDX_HFII] + - k[6350]*y_cur[IDX_H2FII] + k[6354]*y_cur[IDX_C2HII] + - k[6356]*y_cur[IDX_C2H2II] + k[6356]*y_cur[IDX_C2H2II] + - k[6357]*y_cur[IDX_C2H2II] + k[6360]*y_cur[IDX_C2H3II] + - k[6361]*y_cur[IDX_C2H3II] + k[6362]*y_cur[IDX_C2H3II] + - k[6363]*y_cur[IDX_C2H3II] + k[6366]*y_cur[IDX_C2H3II] + - k[6366]*y_cur[IDX_C2H3II] + k[6367]*y_cur[IDX_C2H3II] + - k[6367]*y_cur[IDX_C2H3II] + k[6372]*y_cur[IDX_HCNII] + - k[6377]*y_cur[IDX_H2NCII] + k[6378]*y_cur[IDX_HCNHII] + - k[6378]*y_cur[IDX_HCNHII] + k[6379]*y_cur[IDX_HCNHII] + - k[6380]*y_cur[IDX_HCNHII] + k[6382]*y_cur[IDX_C2H4II] + - k[6382]*y_cur[IDX_C2H4II] + k[6383]*y_cur[IDX_C2H4II] + - k[6384]*y_cur[IDX_C2H4II] + k[6388]*y_cur[IDX_SiHII] + - k[6389]*y_cur[IDX_HCOII] + k[6390]*y_cur[IDX_HOCII] + - k[6391]*y_cur[IDX_C2H5II] + k[6392]*y_cur[IDX_C2H5II] + - k[6392]*y_cur[IDX_C2H5II] + k[6392]*y_cur[IDX_C2H5II] + - k[6393]*y_cur[IDX_C2H5II] + k[6393]*y_cur[IDX_C2H5II] + - k[6394]*y_cur[IDX_C2H5II] + k[6396]*y_cur[IDX_N2HII] + - k[6400]*y_cur[IDX_H2COII] + k[6400]*y_cur[IDX_H2COII] + - k[6401]*y_cur[IDX_H2COII] + k[6403]*y_cur[IDX_SiH2II] + - k[6403]*y_cur[IDX_SiH2II] + k[6404]*y_cur[IDX_SiH2II] + - k[6406]*y_cur[IDX_CH3NHII] + k[6408]*y_cur[IDX_CH2NH2II] + - k[6411]*y_cur[IDX_C2H6II] + k[6412]*y_cur[IDX_SiH3II] + - k[6416]*y_cur[IDX_H3COII] + k[6417]*y_cur[IDX_H3COII] + - k[6418]*y_cur[IDX_H3COII] + k[6418]*y_cur[IDX_H3COII] + - k[6420]*y_cur[IDX_C2H7II] + k[6422]*y_cur[IDX_HNOII] + - k[6427]*y_cur[IDX_SiH4II] + k[6428]*y_cur[IDX_CH3OHII] + - k[6429]*y_cur[IDX_CH3OHII] + k[6429]*y_cur[IDX_CH3OHII] + - k[6431]*y_cur[IDX_H2NOII] + k[6433]*y_cur[IDX_PHII] + - k[6435]*y_cur[IDX_PH2II] + k[6435]*y_cur[IDX_PH2II] + - k[6436]*y_cur[IDX_PH2II] + k[6437]*y_cur[IDX_O2HII] + - k[6439]*y_cur[IDX_SiH5II] + k[6440]*y_cur[IDX_CH3OH2II] + - k[6442]*y_cur[IDX_CH3OH2II] + k[6443]*y_cur[IDX_CH3OH2II] + - k[6444]*y_cur[IDX_CH3OH2II] + k[6445]*y_cur[IDX_HSII] + - k[6446]*y_cur[IDX_H2SII] + k[6447]*y_cur[IDX_H2SII] + - k[6447]*y_cur[IDX_H2SII] + k[6448]*y_cur[IDX_PH3II] + - k[6450]*y_cur[IDX_H3SII] + k[6452]*y_cur[IDX_H3SII] + - k[6452]*y_cur[IDX_H3SII] + k[6453]*y_cur[IDX_H3SII] + - k[6456]*y_cur[IDX_HClII] + k[6457]*y_cur[IDX_H2ClII] + - k[6457]*y_cur[IDX_H2ClII] + k[6458]*y_cur[IDX_H2ClII] + - k[6460]*y_cur[IDX_C3HII] + k[6464]*y_cur[IDX_C3H2II] + - k[6464]*y_cur[IDX_C3H2II] + k[6465]*y_cur[IDX_C3H2II] + - k[6471]*y_cur[IDX_CH2CCHII] + k[6472]*y_cur[IDX_C2NHII] + - k[6473]*y_cur[IDX_C3H3II] + k[6478]*y_cur[IDX_C3H4II] + - k[6480]*y_cur[IDX_C3H4II] + k[6480]*y_cur[IDX_C3H4II] + - k[6483]*y_cur[IDX_C3H5II] + k[6484]*y_cur[IDX_CH3CNII] + - k[6487]*y_cur[IDX_HC2OII] + k[6488]*y_cur[IDX_HC2OII] + - k[6491]*y_cur[IDX_HCSiII] + k[6496]*y_cur[IDX_SiCH2II] + - k[6499]*y_cur[IDX_C3H6II] + k[6502]*y_cur[IDX_CH3CNHII] + - k[6505]*y_cur[IDX_C3H7II] + k[6506]*y_cur[IDX_C3H7II] + - k[6507]*y_cur[IDX_C3H7II] + k[6508]*y_cur[IDX_C3H7II] + - k[6510]*y_cur[IDX_C3H7II] + k[6513]*y_cur[IDX_HNSiII] + - k[6515]*y_cur[IDX_HCNOII] + k[6517]*y_cur[IDX_SiCH3II] + - k[6518]*y_cur[IDX_CH3COII] + k[6520]*y_cur[IDX_HONCII] + - k[6523]*y_cur[IDX_HNCOII] + k[6524]*y_cur[IDX_HOCNII] + - k[6527]*y_cur[IDX_NH2CNHII] + k[6533]*y_cur[IDX_HCNOHII] + - k[6534]*y_cur[IDX_HCNOHII] + k[6537]*y_cur[IDX_H2CNOII] + - k[6538]*y_cur[IDX_H2NCOII] + k[6542]*y_cur[IDX_SiCH4II] + - k[6543]*y_cur[IDX_HCPII] + k[6546]*y_cur[IDX_H2OCNII] + - k[6547]*y_cur[IDX_CH3CHOII] + k[6547]*y_cur[IDX_CH3CHOII] + - k[6549]*y_cur[IDX_HNCOHII] + k[6550]*y_cur[IDX_HNCOHII] + - k[6552]*y_cur[IDX_SiNH2II] + k[6555]*y_cur[IDX_HCSII] + - k[6557]*y_cur[IDX_SiOHII] + k[6558]*y_cur[IDX_HN2OII] + - k[6561]*y_cur[IDX_CH3CHOHII] + k[6562]*y_cur[IDX_CH3CHOHII] + - k[6563]*y_cur[IDX_CH3CHOHII] + k[6564]*y_cur[IDX_CH3CHOHII] + - k[6566]*y_cur[IDX_HCO2II] + k[6567]*y_cur[IDX_HCO2II] + - k[6570]*y_cur[IDX_PCH2II] + k[6573]*y_cur[IDX_HPNII] + - k[6574]*y_cur[IDX_HCOOHII] + k[6574]*y_cur[IDX_HCOOHII] + - k[6578]*y_cur[IDX_PCH3II] + k[6582]*y_cur[IDX_H2CSII] + - k[6582]*y_cur[IDX_H2CSII] + k[6583]*y_cur[IDX_H2CSII] + - k[6589]*y_cur[IDX_HNSII] + k[6590]*y_cur[IDX_H3SiOII] + - k[6591]*y_cur[IDX_H3SiOII] + k[6596]*y_cur[IDX_PCH4II] + - k[6597]*y_cur[IDX_PCH4II] + k[6601]*y_cur[IDX_H3CSII] + - k[6602]*y_cur[IDX_H3CSII] + k[6604]*y_cur[IDX_CH3OCH4II] + - k[6606]*y_cur[IDX_C2H5OH2II] + k[6608]*y_cur[IDX_C2H5OH2II] + - k[6609]*y_cur[IDX_C2H5OH2II] + k[6610]*y_cur[IDX_HCOOH2II] + - k[6611]*y_cur[IDX_HCOOH2II] + k[6612]*y_cur[IDX_HPOII] + - k[6614]*y_cur[IDX_HPOII] + k[6619]*y_cur[IDX_PNH3II] + - k[6621]*y_cur[IDX_C4HII] + k[6622]*y_cur[IDX_H2POII] + - k[6624]*y_cur[IDX_H2CClII] + k[6624]*y_cur[IDX_H2CClII] + - k[6625]*y_cur[IDX_HSOII] + k[6628]*y_cur[IDX_C4H2II] + - k[6629]*y_cur[IDX_HC3NII] + k[6634]*y_cur[IDX_C4H3II] + - k[6639]*y_cur[IDX_HC3NHII] + k[6640]*y_cur[IDX_HC3NHII] + - k[6641]*y_cur[IDX_C4H4II] + k[6647]*y_cur[IDX_C4H5II] + - k[6648]*y_cur[IDX_HC3OII] + k[6650]*y_cur[IDX_SiC2HII] + - k[6653]*y_cur[IDX_NCCNHII] + k[6655]*y_cur[IDX_C3H2OII] + - k[6655]*y_cur[IDX_C3H2OII] + k[6657]*y_cur[IDX_CH2CHCNHII] + - k[6659]*y_cur[IDX_CH2CHCNHII] + k[6661]*y_cur[IDX_SiC2H2II] + - k[6664]*y_cur[IDX_SiC2H3II] + k[6666]*y_cur[IDX_H3C3OII] + - k[6667]*y_cur[IDX_C4H7II] + k[6669]*y_cur[IDX_SiNCHII] + - k[6671]*y_cur[IDX_C2H5CNHII] + k[6672]*y_cur[IDX_C2H5CNHII] + - k[6673]*y_cur[IDX_C2H5CNHII] + k[6676]*y_cur[IDX_HC2PII] + - k[6678]*y_cur[IDX_HC2SII] + k[6681]*y_cur[IDX_PC2H2II] + - k[6685]*y_cur[IDX_PC2H3II] + k[6690]*y_cur[IDX_PC2H4II] + - k[6693]*y_cur[IDX_CH3COCH4II] + k[6694]*y_cur[IDX_COOCH3II] + - k[6697]*y_cur[IDX_CH2OHCOII] + k[6700]*y_cur[IDX_HCOOCH3II] + - k[6702]*y_cur[IDX_CH2OHCHOII] + k[6703]*y_cur[IDX_CH2OHCHOII] + - k[6705]*y_cur[IDX_CH2OHCHOII] + k[6712]*y_cur[IDX_CH3COOHII] + - k[6713]*y_cur[IDX_CH3COOHII] + k[6714]*y_cur[IDX_CH3COOHII] + - k[6718]*y_cur[IDX_HOCSII] + k[6720]*y_cur[IDX_HSiSII] + - k[6722]*y_cur[IDX_C5HII] + k[6723]*y_cur[IDX_HSiO2II] + - k[6726]*y_cur[IDX_H5C2O2II] + k[6727]*y_cur[IDX_CH2OHCH2OII] + - k[6728]*y_cur[IDX_CH2OHCH2OII] + k[6730]*y_cur[IDX_CH2OHCH2OII] + - k[6731]*y_cur[IDX_CH3COOH2II] + k[6733]*y_cur[IDX_CH3COOH2II] + - k[6734]*y_cur[IDX_CH3COOH2II] + k[6735]*y_cur[IDX_CH3COOH2II] + - k[6737]*y_cur[IDX_CH3COOH2II] + k[6739]*y_cur[IDX_C5H2II] + - k[6742]*y_cur[IDX_C5H3II] + k[6749]*y_cur[IDX_CH3C4HII] + - k[6753]*y_cur[IDX_C5H5II] + k[6754]*y_cur[IDX_C5H5II] + - k[6755]*y_cur[IDX_HSO2II] + k[6756]*y_cur[IDX_HSO2II] + - k[6759]*y_cur[IDX_HS2II] + k[6762]*y_cur[IDX_SiC3HII] + - k[6763]*y_cur[IDX_H2S2II] + k[6765]*y_cur[IDX_CH3C3NHII] + - k[6768]*y_cur[IDX_SiC3H2II] + k[6770]*y_cur[IDX_H3S2II] + - k[6772]*y_cur[IDX_PC3HII] + k[6779]*y_cur[IDX_HC3SII] + - k[6783]*y_cur[IDX_C6HII] + k[6786]*y_cur[IDX_C6H2II] + - k[6788]*y_cur[IDX_HC5NII] + k[6789]*y_cur[IDX_C6H3II] + - k[6793]*y_cur[IDX_HC5NHII] + k[6797]*y_cur[IDX_C6H4II] + - k[6801]*y_cur[IDX_SiC4HII] + k[6802]*y_cur[IDX_C6H5II] + - k[6804]*y_cur[IDX_H3C5NII] + k[6807]*y_cur[IDX_C6H7II] + - k[6808]*y_cur[IDX_C6H7II] + k[6812]*y_cur[IDX_PC4HII] + - k[6820]*y_cur[IDX_HC4SII] + k[6825]*y_cur[IDX_C7HII] + - k[6827]*y_cur[IDX_C7H2II] + k[6828]*y_cur[IDX_C7H3II] + - k[6831]*y_cur[IDX_C7H4II] + k[6832]*y_cur[IDX_C7H5II] + - k[6833]*y_cur[IDX_C7H5II] + k[6834]*y_cur[IDX_CH3C5NHII] + - k[6839]*y_cur[IDX_C8HII] + k[6842]*y_cur[IDX_C8H2II] + - k[6844]*y_cur[IDX_HC7NII] + k[6845]*y_cur[IDX_C8H3II] + - k[6848]*y_cur[IDX_C8H4II] + k[6850]*y_cur[IDX_H2C7NII] + - k[6851]*y_cur[IDX_H3C7NII] + k[6853]*y_cur[IDX_C8H5II] + - k[6858]*y_cur[IDX_C9HII] + k[6860]*y_cur[IDX_C9H2II] + - k[6861]*y_cur[IDX_C9H3II] + k[6864]*y_cur[IDX_C9H4II] + - k[6865]*y_cur[IDX_C9H5II] + k[6867]*y_cur[IDX_CH3C7NHII] + - k[6871]*y_cur[IDX_C10HII] + k[6874]*y_cur[IDX_C10H2II] + - k[6877]*y_cur[IDX_HC9NII] + k[6878]*y_cur[IDX_C10H3II] + - k[6879]*y_cur[IDX_C10H3II] + k[6881]*y_cur[IDX_H2C9NII] + - k[6882]*y_cur[IDX_H3C9NII]; - data[jistart + 11429] = 0.0 - k[74]*y_cur[IDX_HM] - - k[75]*y_cur[IDX_HM] - k[84]*y_cur[IDX_CM] - k[85]*y_cur[IDX_C10M] - - k[86]*y_cur[IDX_C10HM] - k[87]*y_cur[IDX_C2M] - - k[88]*y_cur[IDX_C2HM] - k[89]*y_cur[IDX_C3M] - k[90]*y_cur[IDX_C3HM] - - k[91]*y_cur[IDX_C3NM] - k[92]*y_cur[IDX_C4M] - - k[93]*y_cur[IDX_C4HM] - k[94]*y_cur[IDX_C5M] - k[95]*y_cur[IDX_C5HM] - - k[96]*y_cur[IDX_C5NM] - k[97]*y_cur[IDX_C6M] - - k[98]*y_cur[IDX_C6HM] - k[99]*y_cur[IDX_C7M] - - k[100]*y_cur[IDX_C7HM] - k[101]*y_cur[IDX_C8M] - - k[102]*y_cur[IDX_C8HM] - k[103]*y_cur[IDX_C9M] - - k[104]*y_cur[IDX_C9HM] - k[105]*y_cur[IDX_CHM] - - k[106]*y_cur[IDX_CNM] - k[107]*y_cur[IDX_OM] - k[108]*y_cur[IDX_OHM] - - k[109]*y_cur[IDX_SM] - k[141]*y_cur[IDX_CHI] + - k[141]*y_cur[IDX_CHI] + k[141]*y_cur[IDX_CHI] - - k[142]*y_cur[IDX_H2I] + k[142]*y_cur[IDX_H2I] + - k[142]*y_cur[IDX_H2I] + k[142]*y_cur[IDX_H2I] - - k[143]*y_cur[IDX_H2OI] + k[143]*y_cur[IDX_H2OI] + - k[143]*y_cur[IDX_H2OI] - k[144]*y_cur[IDX_O2I] + - k[144]*y_cur[IDX_O2I] - k[145]*y_cur[IDX_OHI] + - k[145]*y_cur[IDX_OHI] + k[145]*y_cur[IDX_OHI] - - k[318]*y_cur[IDX_ClII] - k[487]*y_cur[IDX_CNII] - - k[488]*y_cur[IDX_COII] - k[489]*y_cur[IDX_H2II] - - k[490]*y_cur[IDX_HCNII] - k[491]*y_cur[IDX_HeII] - - k[492]*y_cur[IDX_OII] - k[2827]*y_cur[IDX_C2H3II] - - k[2828]*y_cur[IDX_C2H4II] - k[2829]*y_cur[IDX_C2H5II] - - k[2830]*y_cur[IDX_C2N2II] - k[2831]*y_cur[IDX_C3H2II] - - k[2832]*y_cur[IDX_C3H4II] - k[2833]*y_cur[IDX_C3H7II] - - k[2834]*y_cur[IDX_C6H6II] - k[2835]*y_cur[IDX_CHII] - - k[2836]*y_cur[IDX_CH2II] - k[2837]*y_cur[IDX_CH3II] - - k[2838]*y_cur[IDX_C2H6II] - k[2839]*y_cur[IDX_CH4II] - - k[2840]*y_cur[IDX_CH5II] - k[2841]*y_cur[IDX_CO2II] - - k[2842]*y_cur[IDX_H2SII] - k[2843]*y_cur[IDX_H3SII] - - k[2844]*y_cur[IDX_HSII] - k[2845]*y_cur[IDX_HeHII] - - k[2846]*y_cur[IDX_NO2II] - k[2847]*y_cur[IDX_SO2II] - - k[2848]*y_cur[IDX_SiHII] - k[2849]*y_cur[IDX_SiSII] - - k[5024]*y_cur[IDX_C4H6I] - k[5153]*y_cur[IDX_C2I] - - k[5154]*y_cur[IDX_C2H2I] - k[5155]*y_cur[IDX_C2H3I] - - k[5156]*y_cur[IDX_CH2I] - k[5157]*y_cur[IDX_CH2COI] - - k[5158]*y_cur[IDX_CH3I] - k[5159]*y_cur[IDX_CH4I] - - k[5160]*y_cur[IDX_CHI] - k[5161]*y_cur[IDX_CNOI] - - k[5162]*y_cur[IDX_CO2I] - k[5163]*y_cur[IDX_COI] - - k[5164]*y_cur[IDX_H2CNI] - k[5165]*y_cur[IDX_H2COI] - - k[5166]*y_cur[IDX_H2O2I] - k[5167]*y_cur[IDX_H2O2I] - - k[5168]*y_cur[IDX_H2OI] - k[5169]*y_cur[IDX_H2SI] - - k[5170]*y_cur[IDX_HCNI] - k[5171]*y_cur[IDX_HCOI] - - k[5172]*y_cur[IDX_HCOI] - k[5173]*y_cur[IDX_HCSI] - - k[5174]*y_cur[IDX_HNCI] + k[5174]*y_cur[IDX_HNCI] - - k[5175]*y_cur[IDX_HNOI] - k[5176]*y_cur[IDX_HNOI] - - k[5177]*y_cur[IDX_HNOI] - k[5178]*y_cur[IDX_HSI] - - k[5179]*y_cur[IDX_N2OI] - k[5180]*y_cur[IDX_N2OI] - - k[5181]*y_cur[IDX_NCCNI] - k[5182]*y_cur[IDX_NH2I] - - k[5183]*y_cur[IDX_NH3I] - k[5184]*y_cur[IDX_NHI] - - k[5185]*y_cur[IDX_NO2I] - k[5186]*y_cur[IDX_NOI] - - k[5187]*y_cur[IDX_NOI] - k[5188]*y_cur[IDX_NSI] - - k[5189]*y_cur[IDX_NSI] - k[5190]*y_cur[IDX_O2I] - - k[5191]*y_cur[IDX_O2HI] - k[5192]*y_cur[IDX_O2HI] - - k[5193]*y_cur[IDX_O2HI] - k[5194]*y_cur[IDX_OCNI] - - k[5195]*y_cur[IDX_OCNI] - k[5196]*y_cur[IDX_OCNI] - - k[5197]*y_cur[IDX_OCSI] - k[5198]*y_cur[IDX_OHI] - - k[5199]*y_cur[IDX_S2I] - k[5200]*y_cur[IDX_SOI] - - k[5201]*y_cur[IDX_SOI] - k[5211]*y_cur[IDX_HClI] - - k[5213]*y_cur[IDX_HNC3I] + k[5213]*y_cur[IDX_HNC3I] - - k[5546]*y_cur[IDX_HII] - k[5569]*y_cur[IDX_CII] - - k[5570]*y_cur[IDX_C4H2II] - k[5571]*y_cur[IDX_C4H3II] - - k[5572]*y_cur[IDX_CI] - k[5573]*y_cur[IDX_OI] - - k[5574]*y_cur[IDX_OHI] - k[5575]*y_cur[IDX_SiII] - - k[5608]*y_cur[IDX_eM] - k[5682] - k[5844] - k[6888]; - data[jistart + 11430] = 0.0 + k[319]*y_cur[IDX_ClI] + - k[320]*y_cur[IDX_C10I] + k[321]*y_cur[IDX_C10H2I] + - k[322]*y_cur[IDX_C10HI] + k[323]*y_cur[IDX_C2I] + - k[324]*y_cur[IDX_C2H2I] + k[325]*y_cur[IDX_C2H3I] + - k[326]*y_cur[IDX_C2H4I] + k[327]*y_cur[IDX_C2H5I] + - k[328]*y_cur[IDX_C2H5OHI] + k[329]*y_cur[IDX_C2HI] + - k[330]*y_cur[IDX_C2NI] + k[331]*y_cur[IDX_C2OI] + - k[332]*y_cur[IDX_C2SI] + k[333]*y_cur[IDX_C3I] + - k[334]*y_cur[IDX_C3H2I] + k[335]*y_cur[IDX_C3HI] + - k[336]*y_cur[IDX_C3OI] + k[337]*y_cur[IDX_C3SI] + - k[338]*y_cur[IDX_C4I] + k[339]*y_cur[IDX_C4H3I] + - k[340]*y_cur[IDX_C4HI] + k[341]*y_cur[IDX_C4PI] + - k[342]*y_cur[IDX_C4SI] + k[343]*y_cur[IDX_C5I] + - k[344]*y_cur[IDX_C5H2I] + k[345]*y_cur[IDX_C5HI] + - k[346]*y_cur[IDX_C6I] + k[347]*y_cur[IDX_C6H2I] + - k[348]*y_cur[IDX_C6HI] + k[349]*y_cur[IDX_C7I] + - k[350]*y_cur[IDX_C7H2I] + k[351]*y_cur[IDX_C7HI] + - k[352]*y_cur[IDX_C8I] + k[353]*y_cur[IDX_C8H2I] + - k[354]*y_cur[IDX_C8HI] + k[355]*y_cur[IDX_C9I] + - k[356]*y_cur[IDX_C9H2I] + k[357]*y_cur[IDX_C9HI] + - k[358]*y_cur[IDX_CCPI] + k[359]*y_cur[IDX_CH2I] + - k[360]*y_cur[IDX_CH2CCHI] + k[361]*y_cur[IDX_CH2CNI] + - k[362]*y_cur[IDX_CH3I] + k[363]*y_cur[IDX_CH3C4HI] + - k[364]*y_cur[IDX_CH3C6HI] + k[365]*y_cur[IDX_CH3CCHI] + - k[366]*y_cur[IDX_CH3CHOI] + k[367]*y_cur[IDX_CH3CNI] + - k[368]*y_cur[IDX_CH3COCH3I] + k[369]*y_cur[IDX_CH3OCH3I] + - k[370]*y_cur[IDX_CH3OHI] + k[371]*y_cur[IDX_CH4I] + - k[372]*y_cur[IDX_CHI] + k[373]*y_cur[IDX_CPI] + - k[374]*y_cur[IDX_CSI] + k[375]*y_cur[IDX_FeI] + - k[376]*y_cur[IDX_H2COI] + k[377]*y_cur[IDX_H2CSI] + - k[378]*y_cur[IDX_H2OI] + k[379]*y_cur[IDX_H2S2I] + - k[380]*y_cur[IDX_H2SI] + k[381]*y_cur[IDX_H2SiOI] + - k[382]*y_cur[IDX_HC2PI] + k[383]*y_cur[IDX_HC3NI] + - k[384]*y_cur[IDX_C4H2I] + k[385]*y_cur[IDX_HC5NI] + - k[386]*y_cur[IDX_HC7NI] + k[387]*y_cur[IDX_HC9NI] + - k[388]*y_cur[IDX_HCNI] + k[389]*y_cur[IDX_HCOI] + - k[390]*y_cur[IDX_HCOOCH3I] + k[391]*y_cur[IDX_HCPI] + - k[392]*y_cur[IDX_HCSiI] + k[393]*y_cur[IDX_HClI] + - k[394]*y_cur[IDX_HNSiI] + k[395]*y_cur[IDX_HPOI] + - k[396]*y_cur[IDX_HS2I] + k[397]*y_cur[IDX_HSI] + - k[398]*y_cur[IDX_MgI] + k[399]*y_cur[IDX_N2OI] + - k[400]*y_cur[IDX_NH2I] + k[401]*y_cur[IDX_NH3I] + - k[402]*y_cur[IDX_NHI] + k[403]*y_cur[IDX_NOI] + - k[404]*y_cur[IDX_NSI] + k[405]*y_cur[IDX_O2I] + k[406]*y_cur[IDX_OI] - + k[407]*y_cur[IDX_OCSI] + k[408]*y_cur[IDX_OHI] + - k[409]*y_cur[IDX_PI] + k[410]*y_cur[IDX_PH2I] + - k[411]*y_cur[IDX_PHI] + k[412]*y_cur[IDX_PNI] + - k[413]*y_cur[IDX_POI] + k[414]*y_cur[IDX_S2I] + k[415]*y_cur[IDX_SI] - + k[416]*y_cur[IDX_SO2I] + k[417]*y_cur[IDX_SOI] + - k[418]*y_cur[IDX_SiI] + k[419]*y_cur[IDX_SiC2I] + - k[420]*y_cur[IDX_SiC2H2I] + k[421]*y_cur[IDX_SiC2HI] + - k[422]*y_cur[IDX_SiC3I] + k[423]*y_cur[IDX_SiC3HI] + - k[424]*y_cur[IDX_SiC4I] + k[425]*y_cur[IDX_SiCI] + - k[426]*y_cur[IDX_SiCH2I] + k[427]*y_cur[IDX_SiCH3I] + - k[428]*y_cur[IDX_SiH2I] + k[429]*y_cur[IDX_SiH3I] + - k[430]*y_cur[IDX_SiH4I] + k[431]*y_cur[IDX_SiHI] + - k[432]*y_cur[IDX_SiNI] + k[433]*y_cur[IDX_SiNCI] + - k[434]*y_cur[IDX_SiOI] + k[435]*y_cur[IDX_SiSI] + - k[2296]*y_cur[IDX_C2H4I] + k[2319]*y_cur[IDX_CH2PHI] + - k[2327]*y_cur[IDX_C2H6I] + k[2336]*y_cur[IDX_H2CCCI] + - k[2337]*y_cur[IDX_H2COI] + k[2340]*y_cur[IDX_H2SI] + - k[3023]*y_cur[IDX_HNC3I] + k[3896]*y_cur[IDX_CM] + - k[3931]*y_cur[IDX_C10M] + k[3966]*y_cur[IDX_C10HM] + - k[4001]*y_cur[IDX_C2M] + k[4036]*y_cur[IDX_C2HM] + - k[4071]*y_cur[IDX_C3M] + k[4106]*y_cur[IDX_C3HM] + - k[4141]*y_cur[IDX_C3NM] + k[4176]*y_cur[IDX_C4M] + - k[4211]*y_cur[IDX_C4HM] + k[4246]*y_cur[IDX_C5M] + - k[4281]*y_cur[IDX_C5HM] + k[4316]*y_cur[IDX_C5NM] + - k[4351]*y_cur[IDX_C6M] + k[4386]*y_cur[IDX_C6HM] + - k[4421]*y_cur[IDX_C7M] + k[4456]*y_cur[IDX_C7HM] + - k[4491]*y_cur[IDX_C8M] + k[4526]*y_cur[IDX_C8HM] + - k[4561]*y_cur[IDX_C9M] + k[4596]*y_cur[IDX_C9HM] + - k[4631]*y_cur[IDX_CHM] + k[4666]*y_cur[IDX_CNM] + - k[4701]*y_cur[IDX_HM] + k[4701]*y_cur[IDX_HM] + - k[4737]*y_cur[IDX_OM] + k[4772]*y_cur[IDX_O2M] + - k[4807]*y_cur[IDX_OHM] + k[4842]*y_cur[IDX_SM] - - k[5546]*y_cur[IDX_HI] + k[5615]*y_cur[IDX_eM] + - k[6308]*y_cur[IDX_GRAINM]; - data[jistart + 11431] = 0.0 - k[74]*y_cur[IDX_HI] - - k[75]*y_cur[IDX_HI] + k[4691]*y_cur[IDX_CII] + - k[4692]*y_cur[IDX_C2H2II] + k[4693]*y_cur[IDX_C2H3II] + - k[4694]*y_cur[IDX_C4H2II] + k[4695]*y_cur[IDX_C4H3II] + - k[4696]*y_cur[IDX_C4SII] + k[4697]*y_cur[IDX_CH2CCHII] + - k[4698]*y_cur[IDX_CH3II] + k[4699]*y_cur[IDX_CNCII] + - k[4700]*y_cur[IDX_FeII] + k[4701]*y_cur[IDX_HII] + - k[4701]*y_cur[IDX_HII] + k[4702]*y_cur[IDX_H2II] + - k[4703]*y_cur[IDX_H2COII] + k[4704]*y_cur[IDX_H2SII] + - k[4705]*y_cur[IDX_H3II] + k[4705]*y_cur[IDX_H3II] + - k[4706]*y_cur[IDX_H3OII] + k[4706]*y_cur[IDX_H3OII] + - k[4707]*y_cur[IDX_HC2SII] + k[4707]*y_cur[IDX_HC2SII] + - k[4708]*y_cur[IDX_HCNHII] + k[4708]*y_cur[IDX_HCNHII] + - k[4709]*y_cur[IDX_HCNHII] + k[4709]*y_cur[IDX_HCNHII] + - k[4710]*y_cur[IDX_HCOII] + k[4710]*y_cur[IDX_HCOII] + - k[4711]*y_cur[IDX_HCOII] + k[4712]*y_cur[IDX_HeII] + - k[4713]*y_cur[IDX_MgII] + k[4714]*y_cur[IDX_NII] + - k[4715]*y_cur[IDX_N2HII] + k[4715]*y_cur[IDX_N2HII] + - k[4716]*y_cur[IDX_NH3II] + k[4717]*y_cur[IDX_NH4II] + - k[4717]*y_cur[IDX_NH4II] + k[4718]*y_cur[IDX_NOII] + - k[4719]*y_cur[IDX_NaII] + k[4720]*y_cur[IDX_OII] + - k[4721]*y_cur[IDX_SII] + k[4722]*y_cur[IDX_SOII] + - k[4723]*y_cur[IDX_SiII] + k[4724]*y_cur[IDX_SiOII] + - k[4725]*y_cur[IDX_SiOHII] + k[4725]*y_cur[IDX_SiOHII] + - k[4726]*y_cur[IDX_SiSII] + k[5833] + k[6146]; - data[jistart + 11432] = 0.0 + k[134]*y_cur[IDX_CHI] + - k[135]*y_cur[IDX_H2I] + k[135]*y_cur[IDX_H2I] + - k[135]*y_cur[IDX_H2I] + k[135]*y_cur[IDX_H2I] + - k[136]*y_cur[IDX_H2OI] + k[139]*y_cur[IDX_OHI] + - k[140]*y_cur[IDX_eM] + k[140]*y_cur[IDX_eM] - k[142]*y_cur[IDX_HI] + - k[142]*y_cur[IDX_HI] + k[142]*y_cur[IDX_HI] + k[142]*y_cur[IDX_HI] + - k[2384]*y_cur[IDX_H2II] + k[2398]*y_cur[IDX_CII] + - k[2399]*y_cur[IDX_C10II] + k[2400]*y_cur[IDX_C10HII] + - k[2401]*y_cur[IDX_C2II] + k[2402]*y_cur[IDX_C2HII] + - k[2403]*y_cur[IDX_C2H2II] + k[2404]*y_cur[IDX_C2N2II] + - k[2405]*y_cur[IDX_C2SII] + k[2406]*y_cur[IDX_C3II] + - k[2407]*y_cur[IDX_C3HII] + k[2408]*y_cur[IDX_C3H2II] + - k[2409]*y_cur[IDX_C3NII] + k[2410]*y_cur[IDX_C3OII] + - k[2411]*y_cur[IDX_C4II] + k[2412]*y_cur[IDX_C4HII] + - k[2414]*y_cur[IDX_C5II] + k[2415]*y_cur[IDX_C5HII] + - k[2416]*y_cur[IDX_C5NII] + k[2417]*y_cur[IDX_C6II] + - k[2418]*y_cur[IDX_C6HII] + k[2419]*y_cur[IDX_C7II] + - k[2420]*y_cur[IDX_C7HII] + k[2421]*y_cur[IDX_C7NII] + - k[2422]*y_cur[IDX_C8II] + k[2423]*y_cur[IDX_C8HII] + - k[2424]*y_cur[IDX_C9II] + k[2425]*y_cur[IDX_C9HII] + - k[2426]*y_cur[IDX_C9NII] + k[2427]*y_cur[IDX_CHII] + - k[2428]*y_cur[IDX_CH2II] + k[2429]*y_cur[IDX_CH2CHCNII] + - k[2430]*y_cur[IDX_CH3C3NII] + k[2431]*y_cur[IDX_CH3CNII] + - k[2432]*y_cur[IDX_CH4II] + k[2433]*y_cur[IDX_CNII] + - k[2434]*y_cur[IDX_COII] + k[2435]*y_cur[IDX_COII] + - k[2436]*y_cur[IDX_CO2II] + k[2437]*y_cur[IDX_CPII] + - k[2438]*y_cur[IDX_CSII] + k[2439]*y_cur[IDX_ClII] + - k[2440]*y_cur[IDX_FII] + k[2441]*y_cur[IDX_H2C4NII] + - k[2442]*y_cur[IDX_H2OII] + k[2443]*y_cur[IDX_H2SII] + - k[2444]*y_cur[IDX_HC3NII] + k[2446]*y_cur[IDX_HC4NII] + - k[2447]*y_cur[IDX_HC5NII] + k[2448]*y_cur[IDX_HC7NII] + - k[2449]*y_cur[IDX_HC9NII] + k[2450]*y_cur[IDX_HCNII] + - k[2451]*y_cur[IDX_HCPII] + k[2452]*y_cur[IDX_HCSiII] + - k[2453]*y_cur[IDX_HClII] + k[2454]*y_cur[IDX_HFII] + - k[2455]*y_cur[IDX_HNSiII] + k[2456]*y_cur[IDX_HSII] + - k[2457]*y_cur[IDX_HeII] + k[2459]*y_cur[IDX_NII] + - k[2460]*y_cur[IDX_N2II] + k[2462]*y_cur[IDX_NHII] + - k[2463]*y_cur[IDX_NH2II] + k[2464]*y_cur[IDX_NH3II] + - k[2466]*y_cur[IDX_OII] + k[2467]*y_cur[IDX_OM] + - k[2469]*y_cur[IDX_OHII] + k[2470]*y_cur[IDX_SII] + - k[2471]*y_cur[IDX_SO2II] + k[2472]*y_cur[IDX_SiCII] + - k[2473]*y_cur[IDX_SiC2II] + k[2474]*y_cur[IDX_SiH4II] + - k[2475]*y_cur[IDX_SiOII] + k[2897]*y_cur[IDX_HCNOII] + - k[2898]*y_cur[IDX_HCNOII] + k[3047]*y_cur[IDX_HNCOII] + - k[3048]*y_cur[IDX_HNCOII] + k[3051]*y_cur[IDX_HOCNII] + - k[3052]*y_cur[IDX_HOCNII] + k[3053]*y_cur[IDX_HONCII] + - k[3765]*y_cur[IDX_OCNII] + k[3766]*y_cur[IDX_OCNII] + - k[5132]*y_cur[IDX_ClI] + k[5133]*y_cur[IDX_C2HI] + - k[5134]*y_cur[IDX_CI] + k[5135]*y_cur[IDX_CH2I] + - k[5136]*y_cur[IDX_CH3I] + k[5137]*y_cur[IDX_CHI] + - k[5138]*y_cur[IDX_CNI] + k[5139]*y_cur[IDX_FI] + - k[5140]*y_cur[IDX_HSI] + k[5141]*y_cur[IDX_NI] + - k[5142]*y_cur[IDX_NH2I] + k[5143]*y_cur[IDX_NHI] + - k[5144]*y_cur[IDX_O2I] + k[5146]*y_cur[IDX_O2HI] + - k[5147]*y_cur[IDX_OI] + k[5148]*y_cur[IDX_OHI] + - k[5149]*y_cur[IDX_SI] + k[5679] + k[5681] + k[5681] + k[6147] + - k[6147]; - data[jistart + 11433] = 0.0 - k[489]*y_cur[IDX_HI] + - k[987]*y_cur[IDX_eM] + k[987]*y_cur[IDX_eM] + k[2369]*y_cur[IDX_C2I] - + k[2370]*y_cur[IDX_C2H2I] + k[2372]*y_cur[IDX_C2H4I] + - k[2373]*y_cur[IDX_C2HI] + k[2374]*y_cur[IDX_CI] + - k[2375]*y_cur[IDX_CH2I] + k[2377]*y_cur[IDX_C2H6I] + - k[2378]*y_cur[IDX_CH4I] + k[2379]*y_cur[IDX_CH4I] + - k[2380]*y_cur[IDX_CHI] + k[2381]*y_cur[IDX_CNI] + - k[2382]*y_cur[IDX_CO2I] + k[2383]*y_cur[IDX_COI] + - k[2384]*y_cur[IDX_H2I] + k[2385]*y_cur[IDX_H2COI] + - k[2386]*y_cur[IDX_H2OI] + k[2387]*y_cur[IDX_H2SI] + - k[2390]*y_cur[IDX_HeI] + k[2391]*y_cur[IDX_N2I] + - k[2392]*y_cur[IDX_NI] + k[2393]*y_cur[IDX_NHI] + - k[2394]*y_cur[IDX_NOI] + k[2395]*y_cur[IDX_O2I] + - k[2396]*y_cur[IDX_OI] + k[2397]*y_cur[IDX_OHI] + - k[4702]*y_cur[IDX_HM] + k[6148] + k[6309]*y_cur[IDX_GRAINM] + - k[6309]*y_cur[IDX_GRAINM]; - data[jistart + 11434] = 0.0 + k[2441]*y_cur[IDX_H2I]; - data[jistart + 11435] = 0.0 + k[990]*y_cur[IDX_eM] + - k[6850]*y_cur[IDX_GRAINM]; - data[jistart + 11436] = 0.0 + k[992]*y_cur[IDX_eM] + - k[6881]*y_cur[IDX_GRAINM]; - data[jistart + 11437] = 0.0 + k[1389]*y_cur[IDX_CII] + - k[1517]*y_cur[IDX_C2H2II] + k[1618]*y_cur[IDX_C2H3II] + - k[1673]*y_cur[IDX_C2H4II] + k[1783]*y_cur[IDX_C3H2II] + - k[2336]*y_cur[IDX_HII] + k[2477]*y_cur[IDX_C3H3II] + - k[2478]*y_cur[IDX_C4HII] + k[2479]*y_cur[IDX_C4H2II] + - k[2480]*y_cur[IDX_C4H3II] + k[2482]*y_cur[IDX_C5H2II] + - k[2484]*y_cur[IDX_C6H2II] + k[2486]*y_cur[IDX_CH2CCHII] + - k[3218]*y_cur[IDX_HeII] + k[3827]*y_cur[IDX_SII] + - k[3868]*y_cur[IDX_SiII] + k[4959]*y_cur[IDX_CI] + k[5834] + k[6150]; - data[jistart + 11438] = 0.0 + k[993]*y_cur[IDX_eM] + - k[993]*y_cur[IDX_eM] + k[6624]*y_cur[IDX_GRAINM] + - k[6624]*y_cur[IDX_GRAINM]; - data[jistart + 11439] = 0.0 - k[5164]*y_cur[IDX_HI] + k[5835] + - k[6151]; - data[jistart + 11440] = 0.0 + k[995]*y_cur[IDX_eM] + - k[6537]*y_cur[IDX_GRAINM]; - data[jistart + 11441] = 0.0 + k[376]*y_cur[IDX_HII] + - k[1947]*y_cur[IDX_CHII] + k[1980]*y_cur[IDX_CH2II] + - k[2337]*y_cur[IDX_HII] + k[2385]*y_cur[IDX_H2II] + - k[2498]*y_cur[IDX_O2II] + k[3220]*y_cur[IDX_HeII] + - k[3361]*y_cur[IDX_N2II] - k[5165]*y_cur[IDX_HI] + - k[5466]*y_cur[IDX_OHI] + k[6153] + k[6153] + k[6155]; - data[jistart + 11442] = 0.0 + k[998]*y_cur[IDX_eM] + - k[998]*y_cur[IDX_eM] + k[999]*y_cur[IDX_eM] + - k[2193]*y_cur[IDX_CH4I] + k[4703]*y_cur[IDX_HM] + - k[6400]*y_cur[IDX_GRAINM] + k[6400]*y_cur[IDX_GRAINM] + - k[6401]*y_cur[IDX_GRAINM]; - data[jistart + 11443] = 0.0 + k[377]*y_cur[IDX_HII]; - data[jistart + 11444] = 0.0 + k[1000]*y_cur[IDX_eM] + - k[1000]*y_cur[IDX_eM] + k[1001]*y_cur[IDX_eM] + - k[6582]*y_cur[IDX_GRAINM] + k[6582]*y_cur[IDX_GRAINM] + - k[6583]*y_cur[IDX_GRAINM]; - data[jistart + 11445] = 0.0 + k[1002]*y_cur[IDX_eM] + - k[1002]*y_cur[IDX_eM] + k[1003]*y_cur[IDX_eM] + - k[6457]*y_cur[IDX_GRAINM] + k[6457]*y_cur[IDX_GRAINM] + - k[6458]*y_cur[IDX_GRAINM]; - data[jistart + 11446] = 0.0 + k[1005]*y_cur[IDX_eM] + - k[6350]*y_cur[IDX_GRAINM]; - data[jistart + 11447] = 0.0 + k[1007]*y_cur[IDX_eM] + - k[6377]*y_cur[IDX_GRAINM]; - data[jistart + 11448] = 0.0 + k[1008]*y_cur[IDX_eM] + - k[6538]*y_cur[IDX_GRAINM]; - data[jistart + 11449] = 0.0 + k[1010]*y_cur[IDX_eM] + - k[6431]*y_cur[IDX_GRAINM]; - data[jistart + 11450] = 0.0 + k[136]*y_cur[IDX_H2I] - - k[143]*y_cur[IDX_HI] + k[143]*y_cur[IDX_HI] + k[143]*y_cur[IDX_HI] + - k[378]*y_cur[IDX_HII] + k[1393]*y_cur[IDX_CII] + - k[1394]*y_cur[IDX_CII] + k[1951]*y_cur[IDX_CHII] + - k[1982]*y_cur[IDX_CH2II] + k[2386]*y_cur[IDX_H2II] + - k[2520]*y_cur[IDX_C2II] + k[2521]*y_cur[IDX_C2HII] + - k[2538]*y_cur[IDX_CNII] + k[2562]*y_cur[IDX_PII] + - k[2564]*y_cur[IDX_PHII] + k[2569]*y_cur[IDX_SiII] + - k[3225]*y_cur[IDX_HeII] - k[5168]*y_cur[IDX_HI] + k[5839] + k[6160]; - data[jistart + 11451] = 0.0 + k[1013]*y_cur[IDX_eM] + - k[1013]*y_cur[IDX_eM] + k[1014]*y_cur[IDX_eM] + - k[2442]*y_cur[IDX_H2I] + k[2517]*y_cur[IDX_SI] + - k[3457]*y_cur[IDX_NI] + k[6157] + k[6341]*y_cur[IDX_GRAINM] + - k[6341]*y_cur[IDX_GRAINM] + k[6342]*y_cur[IDX_GRAINM]; - data[jistart + 11452] = 0.0 - k[5166]*y_cur[IDX_HI] - - k[5167]*y_cur[IDX_HI]; - data[jistart + 11453] = 0.0 + k[1016]*y_cur[IDX_eM] + - k[6546]*y_cur[IDX_GRAINM]; - data[jistart + 11454] = 0.0 + k[1017]*y_cur[IDX_eM] + - k[6622]*y_cur[IDX_GRAINM]; - data[jistart + 11455] = 0.0 + k[380]*y_cur[IDX_HII] + - k[1395]*y_cur[IDX_CII] + k[1983]*y_cur[IDX_CH2II] + - k[1985]*y_cur[IDX_CH2II] + k[2340]*y_cur[IDX_HII] + - k[2387]*y_cur[IDX_H2II] + k[3229]*y_cur[IDX_HeII] + - k[3349]*y_cur[IDX_NII] + k[3362]*y_cur[IDX_N2II] + - k[3828]*y_cur[IDX_SII] - k[5169]*y_cur[IDX_HI] + k[6164]; - data[jistart + 11456] = 0.0 + k[1019]*y_cur[IDX_eM] + - k[1020]*y_cur[IDX_eM] + k[1020]*y_cur[IDX_eM] + - k[1900]*y_cur[IDX_CI] + k[2443]*y_cur[IDX_H2I] - - k[2842]*y_cur[IDX_HI] + k[4704]*y_cur[IDX_HM] + - k[6446]*y_cur[IDX_GRAINM] + k[6447]*y_cur[IDX_GRAINM] + - k[6447]*y_cur[IDX_GRAINM]; - data[jistart + 11457] = 0.0 + k[379]*y_cur[IDX_HII] + - k[3228]*y_cur[IDX_HeII]; - data[jistart + 11458] = 0.0 + k[1021]*y_cur[IDX_eM] + - k[6763]*y_cur[IDX_GRAINM]; - data[jistart + 11459] = 0.0 + k[381]*y_cur[IDX_HII] + - k[3231]*y_cur[IDX_HeII] + k[6167] + k[6167]; - data[jistart + 11460] = 0.0 + k[1025]*y_cur[IDX_eM] + - k[1026]*y_cur[IDX_eM] + k[1026]*y_cur[IDX_eM] + - k[1026]*y_cur[IDX_eM] + k[2680]*y_cur[IDX_FeI] + - k[2717]*y_cur[IDX_MgI] + k[2728]*y_cur[IDX_NaI] + - k[2730]*y_cur[IDX_OI] + k[3899]*y_cur[IDX_CM] + - k[3934]*y_cur[IDX_C10M] + k[3969]*y_cur[IDX_C10HM] + - k[4004]*y_cur[IDX_C2M] + k[4039]*y_cur[IDX_C2HM] + - k[4074]*y_cur[IDX_C3M] + k[4109]*y_cur[IDX_C3HM] + - k[4144]*y_cur[IDX_C3NM] + k[4179]*y_cur[IDX_C4M] + - k[4214]*y_cur[IDX_C4HM] + k[4249]*y_cur[IDX_C5M] + - k[4284]*y_cur[IDX_C5HM] + k[4319]*y_cur[IDX_C5NM] + - k[4354]*y_cur[IDX_C6M] + k[4389]*y_cur[IDX_C6HM] + - k[4424]*y_cur[IDX_C7M] + k[4459]*y_cur[IDX_C7HM] + - k[4494]*y_cur[IDX_C8M] + k[4529]*y_cur[IDX_C8HM] + - k[4564]*y_cur[IDX_C9M] + k[4599]*y_cur[IDX_C9HM] + - k[4634]*y_cur[IDX_CHM] + k[4669]*y_cur[IDX_CNM] + - k[4705]*y_cur[IDX_HM] + k[4705]*y_cur[IDX_HM] + - k[4740]*y_cur[IDX_OM] + k[4775]*y_cur[IDX_O2M] + - k[4810]*y_cur[IDX_OHM] + k[4845]*y_cur[IDX_SM] + k[6168] + - k[6310]*y_cur[IDX_GRAINM] + k[6311]*y_cur[IDX_GRAINM] + - k[6311]*y_cur[IDX_GRAINM] + k[6311]*y_cur[IDX_GRAINM]; - data[jistart + 11461] = 0.0 + k[1027]*y_cur[IDX_eM] + - k[6666]*y_cur[IDX_GRAINM]; - data[jistart + 11462] = 0.0 + k[1028]*y_cur[IDX_eM] + - k[6804]*y_cur[IDX_GRAINM]; - data[jistart + 11463] = 0.0 + k[1030]*y_cur[IDX_eM] + - k[6851]*y_cur[IDX_GRAINM]; - data[jistart + 11464] = 0.0 + k[1032]*y_cur[IDX_eM] + - k[6882]*y_cur[IDX_GRAINM]; - data[jistart + 11465] = 0.0 + k[1036]*y_cur[IDX_eM] + - k[1037]*y_cur[IDX_eM] + k[1038]*y_cur[IDX_eM] + - k[1038]*y_cur[IDX_eM] + k[3628]*y_cur[IDX_NaI] + - k[6416]*y_cur[IDX_GRAINM] + k[6417]*y_cur[IDX_GRAINM] + - k[6418]*y_cur[IDX_GRAINM] + k[6418]*y_cur[IDX_GRAINM]; - data[jistart + 11466] = 0.0 + k[1039]*y_cur[IDX_eM] + - k[1040]*y_cur[IDX_eM] + k[6601]*y_cur[IDX_GRAINM] + - k[6602]*y_cur[IDX_GRAINM]; - data[jistart + 11467] = 0.0 + k[1041]*y_cur[IDX_eM] + - k[1042]*y_cur[IDX_eM] + k[1044]*y_cur[IDX_eM] + - k[1044]*y_cur[IDX_eM] + k[2814]*y_cur[IDX_NaI] + - k[3900]*y_cur[IDX_CM] + k[3935]*y_cur[IDX_C10M] + - k[3970]*y_cur[IDX_C10HM] + k[4005]*y_cur[IDX_C2M] + - k[4040]*y_cur[IDX_C2HM] + k[4075]*y_cur[IDX_C3M] + - k[4110]*y_cur[IDX_C3HM] + k[4145]*y_cur[IDX_C3NM] + - k[4180]*y_cur[IDX_C4M] + k[4215]*y_cur[IDX_C4HM] + - k[4250]*y_cur[IDX_C5M] + k[4285]*y_cur[IDX_C5HM] + - k[4320]*y_cur[IDX_C5NM] + k[4355]*y_cur[IDX_C6M] + - k[4390]*y_cur[IDX_C6HM] + k[4425]*y_cur[IDX_C7M] + - k[4460]*y_cur[IDX_C7HM] + k[4495]*y_cur[IDX_C8M] + - k[4530]*y_cur[IDX_C8HM] + k[4565]*y_cur[IDX_C9M] + - k[4600]*y_cur[IDX_C9HM] + k[4635]*y_cur[IDX_CHM] + - k[4670]*y_cur[IDX_CNM] + k[4706]*y_cur[IDX_HM] + - k[4706]*y_cur[IDX_HM] + k[4741]*y_cur[IDX_OM] + - k[4776]*y_cur[IDX_O2M] + k[4811]*y_cur[IDX_OHM] + - k[4846]*y_cur[IDX_SM] + k[6343]*y_cur[IDX_GRAINM] + - k[6344]*y_cur[IDX_GRAINM] + k[6346]*y_cur[IDX_GRAINM] + - k[6346]*y_cur[IDX_GRAINM]; - data[jistart + 11468] = 0.0 + k[1045]*y_cur[IDX_eM] + - k[1047]*y_cur[IDX_eM] + k[1047]*y_cur[IDX_eM] + - k[1048]*y_cur[IDX_eM] - k[2843]*y_cur[IDX_HI] + - k[3839]*y_cur[IDX_SI] + k[6450]*y_cur[IDX_GRAINM] + - k[6452]*y_cur[IDX_GRAINM] + k[6452]*y_cur[IDX_GRAINM] + - k[6453]*y_cur[IDX_GRAINM]; - data[jistart + 11469] = 0.0 + k[1049]*y_cur[IDX_eM] + - k[6770]*y_cur[IDX_GRAINM]; - data[jistart + 11470] = 0.0 + k[1051]*y_cur[IDX_eM] + - k[1052]*y_cur[IDX_eM] + k[6590]*y_cur[IDX_GRAINM] + - k[6591]*y_cur[IDX_GRAINM]; - data[jistart + 11471] = 0.0 + k[1054]*y_cur[IDX_eM] + - k[6726]*y_cur[IDX_GRAINM]; - data[jistart + 11472] = 0.0 + k[1056]*y_cur[IDX_eM] + - k[1057]*y_cur[IDX_eM] + k[6487]*y_cur[IDX_GRAINM] + - k[6488]*y_cur[IDX_GRAINM]; - data[jistart + 11473] = 0.0 + k[382]*y_cur[IDX_HII] + k[5845] + - k[6170]; - data[jistart + 11474] = 0.0 + k[1059]*y_cur[IDX_eM] + - k[6676]*y_cur[IDX_GRAINM]; - data[jistart + 11475] = 0.0 + k[1061]*y_cur[IDX_eM] + - k[1902]*y_cur[IDX_CI] + k[3901]*y_cur[IDX_CM] + - k[3936]*y_cur[IDX_C10M] + k[3971]*y_cur[IDX_C10HM] + - k[4006]*y_cur[IDX_C2M] + k[4041]*y_cur[IDX_C2HM] + - k[4076]*y_cur[IDX_C3M] + k[4111]*y_cur[IDX_C3HM] + - k[4146]*y_cur[IDX_C3NM] + k[4181]*y_cur[IDX_C4M] + - k[4216]*y_cur[IDX_C4HM] + k[4251]*y_cur[IDX_C5M] + - k[4286]*y_cur[IDX_C5HM] + k[4321]*y_cur[IDX_C5NM] + - k[4356]*y_cur[IDX_C6M] + k[4391]*y_cur[IDX_C6HM] + - k[4426]*y_cur[IDX_C7M] + k[4461]*y_cur[IDX_C7HM] + - k[4496]*y_cur[IDX_C8M] + k[4531]*y_cur[IDX_C8HM] + - k[4566]*y_cur[IDX_C9M] + k[4601]*y_cur[IDX_C9HM] + - k[4636]*y_cur[IDX_CHM] + k[4671]*y_cur[IDX_CNM] + - k[4707]*y_cur[IDX_HM] + k[4707]*y_cur[IDX_HM] + - k[4742]*y_cur[IDX_OM] + k[4777]*y_cur[IDX_O2M] + - k[4812]*y_cur[IDX_OHM] + k[4847]*y_cur[IDX_SM] + - k[6678]*y_cur[IDX_GRAINM]; - data[jistart + 11476] = 0.0 + k[383]*y_cur[IDX_HII] + - k[1401]*y_cur[IDX_CII] + k[1473]*y_cur[IDX_C2HII] + - k[3236]*y_cur[IDX_HeII]; - data[jistart + 11477] = 0.0 + k[1063]*y_cur[IDX_eM] + - k[2444]*y_cur[IDX_H2I] + k[6629]*y_cur[IDX_GRAINM]; - data[jistart + 11478] = 0.0 + k[1068]*y_cur[IDX_eM] + - k[1069]*y_cur[IDX_eM] + k[6639]*y_cur[IDX_GRAINM] + - k[6640]*y_cur[IDX_GRAINM]; - data[jistart + 11479] = 0.0 + k[1070]*y_cur[IDX_eM] + - k[6648]*y_cur[IDX_GRAINM]; - data[jistart + 11480] = 0.0 + k[1072]*y_cur[IDX_eM] + - k[6779]*y_cur[IDX_GRAINM]; - data[jistart + 11481] = 0.0 + k[2446]*y_cur[IDX_H2I]; - data[jistart + 11482] = 0.0 + k[1076]*y_cur[IDX_eM] + - k[6820]*y_cur[IDX_GRAINM]; - data[jistart + 11483] = 0.0 + k[385]*y_cur[IDX_HII] + k[5851] + - k[6176]; - data[jistart + 11484] = 0.0 + k[1078]*y_cur[IDX_eM] + - k[2447]*y_cur[IDX_H2I] + k[6788]*y_cur[IDX_GRAINM]; - data[jistart + 11485] = 0.0 + k[1081]*y_cur[IDX_eM] + - k[6793]*y_cur[IDX_GRAINM]; - data[jistart + 11486] = 0.0 + k[386]*y_cur[IDX_HII]; - data[jistart + 11487] = 0.0 + k[1085]*y_cur[IDX_eM] + - k[2448]*y_cur[IDX_H2I] + k[6844]*y_cur[IDX_GRAINM]; - data[jistart + 11488] = 0.0 + k[387]*y_cur[IDX_HII]; - data[jistart + 11489] = 0.0 + k[1087]*y_cur[IDX_eM] + - k[2449]*y_cur[IDX_H2I] + k[6877]*y_cur[IDX_GRAINM]; - data[jistart + 11490] = 0.0 + k[5940]; - data[jistart + 11491] = 0.0 + k[388]*y_cur[IDX_HII] + - k[1407]*y_cur[IDX_CII] + k[1453]*y_cur[IDX_C2II] + - k[1475]*y_cur[IDX_C2HII] + k[1522]*y_cur[IDX_C2H2II] + - k[1957]*y_cur[IDX_CHII] + k[1986]*y_cur[IDX_CH2II] + - k[2272]*y_cur[IDX_CNII] + k[2868]*y_cur[IDX_C3II] + - k[2870]*y_cur[IDX_C4HII] + k[2885]*y_cur[IDX_SiII] + - k[3245]*y_cur[IDX_HeII] + k[3247]*y_cur[IDX_HeII] + - k[4873]*y_cur[IDX_C2I] + k[4901]*y_cur[IDX_C2HI] + - k[5116]*y_cur[IDX_CNI] - k[5170]*y_cur[IDX_HI] + - k[5404]*y_cur[IDX_OI] + k[5854] + k[6181]; - data[jistart + 11492] = 0.0 - k[490]*y_cur[IDX_HI] + - k[1088]*y_cur[IDX_eM] + k[2450]*y_cur[IDX_H2I] + - k[6372]*y_cur[IDX_GRAINM]; - data[jistart + 11493] = 0.0 + k[1089]*y_cur[IDX_eM] + - k[1089]*y_cur[IDX_eM] + k[1090]*y_cur[IDX_eM] + - k[1091]*y_cur[IDX_eM] + k[3629]*y_cur[IDX_NaI] + - k[3630]*y_cur[IDX_NaI] + k[3902]*y_cur[IDX_CM] + - k[3903]*y_cur[IDX_CM] + k[3937]*y_cur[IDX_C10M] + - k[3938]*y_cur[IDX_C10M] + k[3972]*y_cur[IDX_C10HM] + - k[3973]*y_cur[IDX_C10HM] + k[4007]*y_cur[IDX_C2M] + - k[4008]*y_cur[IDX_C2M] + k[4042]*y_cur[IDX_C2HM] + - k[4043]*y_cur[IDX_C2HM] + k[4077]*y_cur[IDX_C3M] + - k[4078]*y_cur[IDX_C3M] + k[4112]*y_cur[IDX_C3HM] + - k[4113]*y_cur[IDX_C3HM] + k[4147]*y_cur[IDX_C3NM] + - k[4148]*y_cur[IDX_C3NM] + k[4182]*y_cur[IDX_C4M] + - k[4183]*y_cur[IDX_C4M] + k[4217]*y_cur[IDX_C4HM] + - k[4218]*y_cur[IDX_C4HM] + k[4252]*y_cur[IDX_C5M] + - k[4253]*y_cur[IDX_C5M] + k[4287]*y_cur[IDX_C5HM] + - k[4288]*y_cur[IDX_C5HM] + k[4322]*y_cur[IDX_C5NM] + - k[4323]*y_cur[IDX_C5NM] + k[4357]*y_cur[IDX_C6M] + - k[4358]*y_cur[IDX_C6M] + k[4392]*y_cur[IDX_C6HM] + - k[4393]*y_cur[IDX_C6HM] + k[4427]*y_cur[IDX_C7M] + - k[4428]*y_cur[IDX_C7M] + k[4462]*y_cur[IDX_C7HM] + - k[4463]*y_cur[IDX_C7HM] + k[4497]*y_cur[IDX_C8M] + - k[4498]*y_cur[IDX_C8M] + k[4532]*y_cur[IDX_C8HM] + - k[4533]*y_cur[IDX_C8HM] + k[4567]*y_cur[IDX_C9M] + - k[4568]*y_cur[IDX_C9M] + k[4602]*y_cur[IDX_C9HM] + - k[4603]*y_cur[IDX_C9HM] + k[4637]*y_cur[IDX_CHM] + - k[4638]*y_cur[IDX_CHM] + k[4672]*y_cur[IDX_CNM] + - k[4673]*y_cur[IDX_CNM] + k[4708]*y_cur[IDX_HM] + - k[4708]*y_cur[IDX_HM] + k[4709]*y_cur[IDX_HM] + - k[4709]*y_cur[IDX_HM] + k[4743]*y_cur[IDX_OM] + - k[4744]*y_cur[IDX_OM] + k[4778]*y_cur[IDX_O2M] + - k[4779]*y_cur[IDX_O2M] + k[4813]*y_cur[IDX_OHM] + - k[4814]*y_cur[IDX_OHM] + k[4848]*y_cur[IDX_SM] + - k[4849]*y_cur[IDX_SM] + k[6378]*y_cur[IDX_GRAINM] + - k[6378]*y_cur[IDX_GRAINM] + k[6379]*y_cur[IDX_GRAINM] + - k[6380]*y_cur[IDX_GRAINM]; - data[jistart + 11494] = 0.0 + k[1093]*y_cur[IDX_eM] + - k[2897]*y_cur[IDX_H2I] + k[2898]*y_cur[IDX_H2I] + - k[6515]*y_cur[IDX_GRAINM]; - data[jistart + 11495] = 0.0 + k[1095]*y_cur[IDX_eM] + - k[1096]*y_cur[IDX_eM] + k[6533]*y_cur[IDX_GRAINM] + - k[6534]*y_cur[IDX_GRAINM]; - data[jistart + 11496] = 0.0 + k[389]*y_cur[IDX_HII] + - k[3249]*y_cur[IDX_HeII] + k[4962]*y_cur[IDX_CI] - - k[5171]*y_cur[IDX_HI] - k[5172]*y_cur[IDX_HI] + - k[5267]*y_cur[IDX_NI] + k[5405]*y_cur[IDX_OI] + - k[5486]*y_cur[IDX_SI] + k[5856] + k[6184]; - data[jistart + 11497] = 0.0 + k[1097]*y_cur[IDX_eM] + - k[3802]*y_cur[IDX_OHI] + k[3904]*y_cur[IDX_CM] + - k[3939]*y_cur[IDX_C10M] + k[3974]*y_cur[IDX_C10HM] + - k[4009]*y_cur[IDX_C2M] + k[4044]*y_cur[IDX_C2HM] + - k[4079]*y_cur[IDX_C3M] + k[4114]*y_cur[IDX_C3HM] + - k[4149]*y_cur[IDX_C3NM] + k[4184]*y_cur[IDX_C4M] + - k[4219]*y_cur[IDX_C4HM] + k[4254]*y_cur[IDX_C5M] + - k[4289]*y_cur[IDX_C5HM] + k[4324]*y_cur[IDX_C5NM] + - k[4359]*y_cur[IDX_C6M] + k[4394]*y_cur[IDX_C6HM] + - k[4429]*y_cur[IDX_C7M] + k[4464]*y_cur[IDX_C7HM] + - k[4499]*y_cur[IDX_C8M] + k[4534]*y_cur[IDX_C8HM] + - k[4569]*y_cur[IDX_C9M] + k[4604]*y_cur[IDX_C9HM] + - k[4639]*y_cur[IDX_CHM] + k[4674]*y_cur[IDX_CNM] + - k[4710]*y_cur[IDX_HM] + k[4710]*y_cur[IDX_HM] + - k[4711]*y_cur[IDX_HM] + k[4745]*y_cur[IDX_OM] + - k[4780]*y_cur[IDX_O2M] + k[4815]*y_cur[IDX_OHM] + - k[4850]*y_cur[IDX_SM] + k[6183] + k[6389]*y_cur[IDX_GRAINM]; - data[jistart + 11498] = 0.0 + k[1098]*y_cur[IDX_eM] + - k[1099]*y_cur[IDX_eM] + k[6566]*y_cur[IDX_GRAINM] + - k[6567]*y_cur[IDX_GRAINM]; - data[jistart + 11499] = 0.0 + k[390]*y_cur[IDX_HII]; - data[jistart + 11500] = 0.0 + k[983]*y_cur[IDX_eM] + - k[6700]*y_cur[IDX_GRAINM]; - data[jistart + 11501] = 0.0 + k[1101]*y_cur[IDX_eM] + - k[1101]*y_cur[IDX_eM] + k[6574]*y_cur[IDX_GRAINM] + - k[6574]*y_cur[IDX_GRAINM]; - data[jistart + 11502] = 0.0 + k[1103]*y_cur[IDX_eM] + - k[1104]*y_cur[IDX_eM] + k[6610]*y_cur[IDX_GRAINM] + - k[6611]*y_cur[IDX_GRAINM]; - data[jistart + 11503] = 0.0 + k[391]*y_cur[IDX_HII] + - k[1409]*y_cur[IDX_CII] + k[5861] + k[6189]; - data[jistart + 11504] = 0.0 + k[1105]*y_cur[IDX_eM] + - k[1906]*y_cur[IDX_CI] + k[2451]*y_cur[IDX_H2I] + - k[6543]*y_cur[IDX_GRAINM]; - data[jistart + 11505] = 0.0 + k[3255]*y_cur[IDX_HeII] - - k[5173]*y_cur[IDX_HI] + k[5409]*y_cur[IDX_OI] + k[6190]; - data[jistart + 11506] = 0.0 + k[1108]*y_cur[IDX_eM] + - k[3738]*y_cur[IDX_OI] + k[6555]*y_cur[IDX_GRAINM]; - data[jistart + 11507] = 0.0 + k[392]*y_cur[IDX_HII] + - k[1410]*y_cur[IDX_CII] + k[3258]*y_cur[IDX_HeII] + k[6193]; - data[jistart + 11508] = 0.0 + k[1110]*y_cur[IDX_eM] + - k[2452]*y_cur[IDX_H2I] + k[6491]*y_cur[IDX_GRAINM]; - data[jistart + 11509] = 0.0 + k[393]*y_cur[IDX_HII] + - k[1411]*y_cur[IDX_CII] + k[3259]*y_cur[IDX_HeII] - - k[5211]*y_cur[IDX_HI] + k[5864] + k[6194]; - data[jistart + 11510] = 0.0 + k[1111]*y_cur[IDX_eM] + - k[2453]*y_cur[IDX_H2I] + k[6456]*y_cur[IDX_GRAINM]; - data[jistart + 11511] = 0.0 + k[1412]*y_cur[IDX_CII] + - k[3015]*y_cur[IDX_SiII] + k[3260]*y_cur[IDX_HeII] + k[5865] + - k[6196]; - data[jistart + 11512] = 0.0 + k[1112]*y_cur[IDX_eM] + - k[2454]*y_cur[IDX_H2I] + k[6348]*y_cur[IDX_GRAINM]; - data[jistart + 11513] = 0.0 + k[1113]*y_cur[IDX_eM] + - k[6558]*y_cur[IDX_GRAINM]; - data[jistart + 11514] = 0.0 + k[1413]*y_cur[IDX_CII] + - k[3046]*y_cur[IDX_SiII] + k[3261]*y_cur[IDX_HeII] + - k[3262]*y_cur[IDX_HeII] + k[4902]*y_cur[IDX_C2HI] + - k[4907]*y_cur[IDX_C4HI] + k[5118]*y_cur[IDX_CNI] - - k[5174]*y_cur[IDX_HI] + k[5174]*y_cur[IDX_HI] + k[5867] + k[6198]; - data[jistart + 11515] = 0.0 + k[1115]*y_cur[IDX_eM] + - k[3019]*y_cur[IDX_CII] + k[3023]*y_cur[IDX_HII] + - k[3034]*y_cur[IDX_HeII] - k[5213]*y_cur[IDX_HI] + - k[5213]*y_cur[IDX_HI] + k[6197]; - data[jistart + 11516] = 0.0 + k[3264]*y_cur[IDX_HeII]; - data[jistart + 11517] = 0.0 + k[1117]*y_cur[IDX_eM] + - k[3047]*y_cur[IDX_H2I] + k[3048]*y_cur[IDX_H2I] + - k[6523]*y_cur[IDX_GRAINM]; - data[jistart + 11518] = 0.0 + k[1118]*y_cur[IDX_eM] + - k[1119]*y_cur[IDX_eM] + k[6549]*y_cur[IDX_GRAINM] + - k[6550]*y_cur[IDX_GRAINM]; - data[jistart + 11519] = 0.0 + k[3265]*y_cur[IDX_HeII] - - k[5175]*y_cur[IDX_HI] - k[5176]*y_cur[IDX_HI] - - k[5177]*y_cur[IDX_HI] + k[5269]*y_cur[IDX_NI] + - k[5411]*y_cur[IDX_OI] + k[5869] + k[6200]; - data[jistart + 11520] = 0.0 + k[1121]*y_cur[IDX_eM] + - k[3740]*y_cur[IDX_OI] + k[6422]*y_cur[IDX_GRAINM]; - data[jistart + 11521] = 0.0 + k[1122]*y_cur[IDX_eM] + - k[6589]*y_cur[IDX_GRAINM]; - data[jistart + 11522] = 0.0 + k[394]*y_cur[IDX_HII] + - k[1414]*y_cur[IDX_CII] + k[3267]*y_cur[IDX_HeII] + k[5870] + - k[6201]; - data[jistart + 11523] = 0.0 + k[1124]*y_cur[IDX_eM] + - k[2455]*y_cur[IDX_H2I] + k[6513]*y_cur[IDX_GRAINM]; - data[jistart + 11524] = 0.0 + k[1125]*y_cur[IDX_eM] + - k[6390]*y_cur[IDX_GRAINM]; - data[jistart + 11525] = 0.0 + k[3268]*y_cur[IDX_HeII]; - data[jistart + 11526] = 0.0 + k[1126]*y_cur[IDX_eM] + - k[3051]*y_cur[IDX_H2I] + k[3052]*y_cur[IDX_H2I] + - k[6524]*y_cur[IDX_GRAINM]; - data[jistart + 11527] = 0.0 + k[1129]*y_cur[IDX_eM] + - k[6718]*y_cur[IDX_GRAINM]; - data[jistart + 11528] = 0.0 + k[1130]*y_cur[IDX_eM] + - k[3053]*y_cur[IDX_H2I] + k[6520]*y_cur[IDX_GRAINM]; - data[jistart + 11529] = 0.0 + k[1134]*y_cur[IDX_eM] + - k[6573]*y_cur[IDX_GRAINM]; - data[jistart + 11530] = 0.0 + k[395]*y_cur[IDX_HII] + - k[3270]*y_cur[IDX_HeII] + k[5873] + k[6204]; - data[jistart + 11531] = 0.0 + k[1135]*y_cur[IDX_eM] + - k[1137]*y_cur[IDX_eM] + k[6612]*y_cur[IDX_GRAINM] + - k[6614]*y_cur[IDX_GRAINM]; - data[jistart + 11532] = 0.0 + k[397]*y_cur[IDX_HII] + - k[1415]*y_cur[IDX_CII] + k[3273]*y_cur[IDX_HeII] + - k[4965]*y_cur[IDX_CI] + k[5140]*y_cur[IDX_H2I] - - k[5178]*y_cur[IDX_HI] + k[5271]*y_cur[IDX_NI] + - k[5416]*y_cur[IDX_OI] + k[5488]*y_cur[IDX_SI] + k[5875] + k[6209]; - data[jistart + 11533] = 0.0 + k[1138]*y_cur[IDX_eM] + - k[1908]*y_cur[IDX_CI] + k[2456]*y_cur[IDX_H2I] - - k[2844]*y_cur[IDX_HI] + k[3462]*y_cur[IDX_NI] + - k[3743]*y_cur[IDX_OI] + k[6205] + k[6445]*y_cur[IDX_GRAINM]; - data[jistart + 11534] = 0.0 + k[396]*y_cur[IDX_HII] + - k[3272]*y_cur[IDX_HeII]; - data[jistart + 11535] = 0.0 + k[1140]*y_cur[IDX_eM] + - k[6759]*y_cur[IDX_GRAINM]; - data[jistart + 11536] = 0.0 + k[1141]*y_cur[IDX_eM] + - k[6625]*y_cur[IDX_GRAINM]; - data[jistart + 11537] = 0.0 + k[1142]*y_cur[IDX_eM] + - k[1143]*y_cur[IDX_eM] + k[6755]*y_cur[IDX_GRAINM] + - k[6756]*y_cur[IDX_GRAINM]; - data[jistart + 11538] = 0.0 + k[1145]*y_cur[IDX_eM] + - k[6723]*y_cur[IDX_GRAINM]; - data[jistart + 11539] = 0.0 + k[1148]*y_cur[IDX_eM] + - k[6720]*y_cur[IDX_GRAINM]; - data[jistart + 11540] = 0.0 + k[2390]*y_cur[IDX_H2II]; - data[jistart + 11541] = 0.0 - k[491]*y_cur[IDX_HI] + - k[2457]*y_cur[IDX_H2I] + k[3034]*y_cur[IDX_HNC3I] + - k[3062]*y_cur[IDX_C10H2I] + k[3062]*y_cur[IDX_C10H2I] + - k[3064]*y_cur[IDX_C10H2I] + k[3066]*y_cur[IDX_C10H2I] + - k[3069]*y_cur[IDX_C10HI] + k[3072]*y_cur[IDX_C10HI] + - k[3075]*y_cur[IDX_C2H2I] + k[3078]*y_cur[IDX_C2H3I] + - k[3079]*y_cur[IDX_C2H4I] + k[3081]*y_cur[IDX_C2H4I] + - k[3084]*y_cur[IDX_C2H5I] + k[3086]*y_cur[IDX_C2HI] + - k[3096]*y_cur[IDX_C3H2I] + k[3097]*y_cur[IDX_C3HI] + - k[3110]*y_cur[IDX_C4H3I] + k[3112]*y_cur[IDX_C4HI] + - k[3121]*y_cur[IDX_C5H2I] + k[3123]*y_cur[IDX_C5HI] + - k[3129]*y_cur[IDX_C6H2I] + k[3131]*y_cur[IDX_C6H6I] + - k[3133]*y_cur[IDX_C6HI] + k[3138]*y_cur[IDX_C7H2I] + - k[3140]*y_cur[IDX_C7HI] + k[3146]*y_cur[IDX_C8H2I] + - k[3148]*y_cur[IDX_C8HI] + k[3153]*y_cur[IDX_C9H2I] + - k[3155]*y_cur[IDX_C9HI] + k[3161]*y_cur[IDX_CH2I] + - k[3162]*y_cur[IDX_CH2CCHI] + k[3164]*y_cur[IDX_CH2CCHI] + - k[3168]*y_cur[IDX_CH2CHCNI] + k[3179]*y_cur[IDX_CH3C4HI] + - k[3182]*y_cur[IDX_CH3C6HI] + k[3185]*y_cur[IDX_CH3CCHI] + - k[3187]*y_cur[IDX_CH3CCHI] + k[3189]*y_cur[IDX_C2H6I] + - k[3195]*y_cur[IDX_CH3OCH3I] + k[3198]*y_cur[IDX_CH4I] + - k[3200]*y_cur[IDX_CH4I] + k[3202]*y_cur[IDX_CHI] + - k[3218]*y_cur[IDX_H2CCCI] + k[3220]*y_cur[IDX_H2COI] + - k[3225]*y_cur[IDX_H2OI] + k[3228]*y_cur[IDX_H2S2I] + - k[3229]*y_cur[IDX_H2SI] + k[3231]*y_cur[IDX_H2SiOI] + - k[3236]*y_cur[IDX_HC3NI] + k[3240]*y_cur[IDX_C4H2I] + - k[3245]*y_cur[IDX_HCNI] + k[3247]*y_cur[IDX_HCNI] + - k[3249]*y_cur[IDX_HCOI] + k[3255]*y_cur[IDX_HCSI] + - k[3258]*y_cur[IDX_HCSiI] + k[3259]*y_cur[IDX_HClI] + - k[3260]*y_cur[IDX_HFI] + k[3261]*y_cur[IDX_HNCI] + - k[3262]*y_cur[IDX_HNCI] + k[3264]*y_cur[IDX_HNCOI] + - k[3265]*y_cur[IDX_HNOI] + k[3267]*y_cur[IDX_HNSiI] + - k[3268]*y_cur[IDX_HOCNI] + k[3270]*y_cur[IDX_HPOI] + - k[3272]*y_cur[IDX_HS2I] + k[3273]*y_cur[IDX_HSI] + - k[3281]*y_cur[IDX_NH2I] + k[3284]*y_cur[IDX_NH3I] + - k[3285]*y_cur[IDX_NHI] + k[3297]*y_cur[IDX_OHI] + - k[3299]*y_cur[IDX_PHI] + k[3308]*y_cur[IDX_SiC2H2I] + - k[3311]*y_cur[IDX_SiC2HI] + k[3314]*y_cur[IDX_SiC3HI] + - k[3318]*y_cur[IDX_SiCH2I] + k[3320]*y_cur[IDX_SiCH3I] + - k[3323]*y_cur[IDX_SiH2I] + k[3325]*y_cur[IDX_SiH3I] + - k[3327]*y_cur[IDX_SiH4I] + k[3328]*y_cur[IDX_SiHI] + - k[4712]*y_cur[IDX_HM] + k[5632]*y_cur[IDX_CH3OI]; - data[jistart + 11542] = 0.0 + k[1149]*y_cur[IDX_eM] - - k[2845]*y_cur[IDX_HI] + k[6313]*y_cur[IDX_GRAINM]; - data[jistart + 11543] = 0.0 + k[398]*y_cur[IDX_HII] + - k[2233]*y_cur[IDX_CH5II] + k[2717]*y_cur[IDX_H3II]; - data[jistart + 11544] = 0.0 + k[4713]*y_cur[IDX_HM]; - data[jistart + 11545] = 0.0 + k[111]*y_cur[IDX_C2HM] + - k[1961]*y_cur[IDX_CHII] + k[2392]*y_cur[IDX_H2II] + - k[3385]*y_cur[IDX_C2HII] + k[3388]*y_cur[IDX_C2H2II] + - k[3391]*y_cur[IDX_C2H4II] + k[3394]*y_cur[IDX_C3HII] + - k[3406]*y_cur[IDX_C4H2II] + k[3408]*y_cur[IDX_C4H5II] + - k[3412]*y_cur[IDX_C5HII] + k[3415]*y_cur[IDX_C5H2II] + - k[3416]*y_cur[IDX_C5H3II] + k[3429]*y_cur[IDX_C7HII] + - k[3432]*y_cur[IDX_C7H2II] + k[3433]*y_cur[IDX_C7H3II] + - k[3434]*y_cur[IDX_C7H4II] + k[3446]*y_cur[IDX_C9HII] + - k[3449]*y_cur[IDX_C9H2II] + k[3450]*y_cur[IDX_C9H3II] + - k[3451]*y_cur[IDX_C9H4II] + k[3452]*y_cur[IDX_CH2II] + - k[3453]*y_cur[IDX_CH2CCHII] + k[3454]*y_cur[IDX_CH3II] + - k[3455]*y_cur[IDX_CH3C4HII] + k[3457]*y_cur[IDX_H2OII] + - k[3462]*y_cur[IDX_HSII] + k[3463]*y_cur[IDX_NHII] + - k[3464]*y_cur[IDX_NH2II] + k[3466]*y_cur[IDX_O2HII] + - k[3467]*y_cur[IDX_OHII] + k[3470]*y_cur[IDX_SiCH2II] + - k[3471]*y_cur[IDX_SiHII] + k[3472]*y_cur[IDX_SiH2II] + - k[3474]*y_cur[IDX_SiH3II] + k[5080]*y_cur[IDX_CHI] + - k[5141]*y_cur[IDX_H2I] + k[5224]*y_cur[IDX_C2H3I] + - k[5228]*y_cur[IDX_C2HI] + k[5232]*y_cur[IDX_C3H2I] + - k[5233]*y_cur[IDX_C3HI] + k[5236]*y_cur[IDX_C4HI] + - k[5239]*y_cur[IDX_C5H2I] + k[5240]*y_cur[IDX_C5HI] + - k[5245]*y_cur[IDX_C7H2I] + k[5246]*y_cur[IDX_C7HI] + - k[5251]*y_cur[IDX_C9HI] + k[5253]*y_cur[IDX_CH2I] + - k[5254]*y_cur[IDX_CH2I] + k[5257]*y_cur[IDX_CH3I] + - k[5259]*y_cur[IDX_CH3I] + k[5259]*y_cur[IDX_CH3I] + - k[5267]*y_cur[IDX_HCOI] + k[5269]*y_cur[IDX_HNOI] + - k[5271]*y_cur[IDX_HSI] + k[5274]*y_cur[IDX_NHI] + - k[5283]*y_cur[IDX_OHI] + k[5285]*y_cur[IDX_PHI] + - k[5294]*y_cur[IDX_SiH2I] + k[5296]*y_cur[IDX_SiHI]; - data[jistart + 11546] = 0.0 + k[2256]*y_cur[IDX_CHI] + - k[2459]*y_cur[IDX_H2I] + k[3336]*y_cur[IDX_CH3OHI] + - k[3338]*y_cur[IDX_CH3OHI] + k[3339]*y_cur[IDX_CH3OHI] + - k[3340]*y_cur[IDX_CH4I] + k[3341]*y_cur[IDX_CH4I] + - k[3342]*y_cur[IDX_CH4I] + k[3342]*y_cur[IDX_CH4I] + - k[3349]*y_cur[IDX_H2SI] + k[3355]*y_cur[IDX_NHI] + - k[4714]*y_cur[IDX_HM]; - data[jistart + 11547] = 0.0 + k[2391]*y_cur[IDX_H2II]; - data[jistart + 11548] = 0.0 + k[2205]*y_cur[IDX_CH4I] + - k[2460]*y_cur[IDX_H2I] + k[3361]*y_cur[IDX_H2COI] + - k[3362]*y_cur[IDX_H2SI]; - data[jistart + 11549] = 0.0 + k[1151]*y_cur[IDX_eM] + - k[1152]*y_cur[IDX_eM] + k[3909]*y_cur[IDX_CM] + - k[3944]*y_cur[IDX_C10M] + k[3979]*y_cur[IDX_C10HM] + - k[4014]*y_cur[IDX_C2M] + k[4049]*y_cur[IDX_C2HM] + - k[4084]*y_cur[IDX_C3M] + k[4119]*y_cur[IDX_C3HM] + - k[4154]*y_cur[IDX_C3NM] + k[4189]*y_cur[IDX_C4M] + - k[4224]*y_cur[IDX_C4HM] + k[4259]*y_cur[IDX_C5M] + - k[4294]*y_cur[IDX_C5HM] + k[4329]*y_cur[IDX_C5NM] + - k[4364]*y_cur[IDX_C6M] + k[4399]*y_cur[IDX_C6HM] + - k[4434]*y_cur[IDX_C7M] + k[4469]*y_cur[IDX_C7HM] + - k[4504]*y_cur[IDX_C8M] + k[4539]*y_cur[IDX_C8HM] + - k[4574]*y_cur[IDX_C9M] + k[4609]*y_cur[IDX_C9HM] + - k[4644]*y_cur[IDX_CHM] + k[4679]*y_cur[IDX_CNM] + - k[4715]*y_cur[IDX_HM] + k[4715]*y_cur[IDX_HM] + - k[4750]*y_cur[IDX_OM] + k[4785]*y_cur[IDX_O2M] + - k[4820]*y_cur[IDX_OHM] + k[4855]*y_cur[IDX_SM] + - k[6396]*y_cur[IDX_GRAINM]; - data[jistart + 11550] = 0.0 + k[399]*y_cur[IDX_HII] - - k[5179]*y_cur[IDX_HI] - k[5180]*y_cur[IDX_HI]; - data[jistart + 11551] = 0.0 - k[5181]*y_cur[IDX_HI]; - data[jistart + 11552] = 0.0 + k[1157]*y_cur[IDX_eM] + - k[6653]*y_cur[IDX_GRAINM]; - data[jistart + 11553] = 0.0 + k[402]*y_cur[IDX_HII] + - k[1420]*y_cur[IDX_CII] + k[2393]*y_cur[IDX_H2II] + - k[3285]*y_cur[IDX_HeII] + k[3355]*y_cur[IDX_NII] + - k[3606]*y_cur[IDX_C2II] + k[3607]*y_cur[IDX_C2H2II] + - k[3619]*y_cur[IDX_OII] + k[3621]*y_cur[IDX_O2II] + - k[3624]*y_cur[IDX_SII] + k[3625]*y_cur[IDX_SiII] + - k[4972]*y_cur[IDX_CI] + k[5143]*y_cur[IDX_H2I] - - k[5184]*y_cur[IDX_HI] + k[5274]*y_cur[IDX_NI] + - k[5309]*y_cur[IDX_NHI] + k[5309]*y_cur[IDX_NHI] + - k[5309]*y_cur[IDX_NHI] + k[5309]*y_cur[IDX_NHI] + - k[5313]*y_cur[IDX_NOI] + k[5315]*y_cur[IDX_NOI] + - k[5318]*y_cur[IDX_OI] + k[5319]*y_cur[IDX_OI] + - k[5322]*y_cur[IDX_OHI] + k[5325]*y_cur[IDX_SI] + k[5888] + k[6224]; - data[jistart + 11554] = 0.0 + k[1158]*y_cur[IDX_eM] + - k[2462]*y_cur[IDX_H2I] + k[3463]*y_cur[IDX_NI] + - k[3478]*y_cur[IDX_C2I] + k[3486]*y_cur[IDX_COI] + - k[3506]*y_cur[IDX_SI] + k[6320]*y_cur[IDX_GRAINM]; - data[jistart + 11555] = 0.0 + k[400]*y_cur[IDX_HII] + - k[1417]*y_cur[IDX_CII] + k[2086]*y_cur[IDX_CH3II] + - k[3281]*y_cur[IDX_HeII] + k[3528]*y_cur[IDX_C2II] + - k[3530]*y_cur[IDX_C2HII] + k[3532]*y_cur[IDX_C2H2II] + - k[4969]*y_cur[IDX_CI] + k[4970]*y_cur[IDX_CI] + - k[5142]*y_cur[IDX_H2I] - k[5182]*y_cur[IDX_HI] + - k[5299]*y_cur[IDX_NOI] + k[5420]*y_cur[IDX_OI] + k[5883] + k[6219]; - data[jistart + 11556] = 0.0 + k[1159]*y_cur[IDX_eM] + - k[1159]*y_cur[IDX_eM] + k[1160]*y_cur[IDX_eM] + - k[2463]*y_cur[IDX_H2I] + k[3464]*y_cur[IDX_NI] + - k[3526]*y_cur[IDX_SI] + k[3746]*y_cur[IDX_OI] + - k[6324]*y_cur[IDX_GRAINM] + k[6324]*y_cur[IDX_GRAINM] + - k[6325]*y_cur[IDX_GRAINM]; - data[jistart + 11557] = 0.0 + k[1162]*y_cur[IDX_eM] + - k[6527]*y_cur[IDX_GRAINM]; - data[jistart + 11558] = 0.0 + k[401]*y_cur[IDX_HII] + - k[1418]*y_cur[IDX_CII] + k[1988]*y_cur[IDX_CH2II] + - k[3284]*y_cur[IDX_HeII] + k[3595]*y_cur[IDX_PII] + - k[3598]*y_cur[IDX_PHII] + k[3602]*y_cur[IDX_SiII] + - k[5082]*y_cur[IDX_CHI] - k[5183]*y_cur[IDX_HI] + - k[5303]*y_cur[IDX_CNI] + k[5885] + k[6221]; - data[jistart + 11559] = 0.0 + k[1163]*y_cur[IDX_eM] + - k[1164]*y_cur[IDX_eM] + k[1164]*y_cur[IDX_eM] + - k[2464]*y_cur[IDX_H2I] + k[4716]*y_cur[IDX_HM] + - k[6330]*y_cur[IDX_GRAINM] + k[6331]*y_cur[IDX_GRAINM] + - k[6331]*y_cur[IDX_GRAINM]; - data[jistart + 11560] = 0.0 + k[1166]*y_cur[IDX_eM] + - k[1166]*y_cur[IDX_eM] + k[1167]*y_cur[IDX_eM] + - k[3911]*y_cur[IDX_CM] + k[3946]*y_cur[IDX_C10M] + - k[3981]*y_cur[IDX_C10HM] + k[4016]*y_cur[IDX_C2M] + - k[4051]*y_cur[IDX_C2HM] + k[4086]*y_cur[IDX_C3M] + - k[4121]*y_cur[IDX_C3HM] + k[4156]*y_cur[IDX_C3NM] + - k[4191]*y_cur[IDX_C4M] + k[4226]*y_cur[IDX_C4HM] + - k[4261]*y_cur[IDX_C5M] + k[4296]*y_cur[IDX_C5HM] + - k[4331]*y_cur[IDX_C5NM] + k[4366]*y_cur[IDX_C6M] + - k[4401]*y_cur[IDX_C6HM] + k[4436]*y_cur[IDX_C7M] + - k[4471]*y_cur[IDX_C7HM] + k[4506]*y_cur[IDX_C8M] + - k[4541]*y_cur[IDX_C8HM] + k[4576]*y_cur[IDX_C9M] + - k[4611]*y_cur[IDX_C9HM] + k[4646]*y_cur[IDX_CHM] + - k[4681]*y_cur[IDX_CNM] + k[4717]*y_cur[IDX_HM] + - k[4717]*y_cur[IDX_HM] + k[4752]*y_cur[IDX_OM] + - k[4787]*y_cur[IDX_O2M] + k[4822]*y_cur[IDX_OHM] + - k[4857]*y_cur[IDX_SM] + k[6338]*y_cur[IDX_GRAINM] + - k[6338]*y_cur[IDX_GRAINM] + k[6339]*y_cur[IDX_GRAINM]; - data[jistart + 11561] = 0.0 + k[403]*y_cur[IDX_HII] + - k[2394]*y_cur[IDX_H2II] + k[4878]*y_cur[IDX_C2H2I] + - k[5005]*y_cur[IDX_CH2I] + k[5006]*y_cur[IDX_CH2I] + - k[5085]*y_cur[IDX_CHI] - k[5186]*y_cur[IDX_HI] - - k[5187]*y_cur[IDX_HI] + k[5299]*y_cur[IDX_NH2I] + - k[5313]*y_cur[IDX_NHI] + k[5315]*y_cur[IDX_NHI] + - k[5477]*y_cur[IDX_OHI]; - data[jistart + 11562] = 0.0 + k[4718]*y_cur[IDX_HM]; - data[jistart + 11563] = 0.0 - k[5185]*y_cur[IDX_HI]; - data[jistart + 11564] = 0.0 - k[2846]*y_cur[IDX_HI]; - data[jistart + 11565] = 0.0 + k[404]*y_cur[IDX_HII] - - k[5188]*y_cur[IDX_HI] - k[5189]*y_cur[IDX_HI]; - data[jistart + 11566] = 0.0 + k[2728]*y_cur[IDX_H3II] + - k[2814]*y_cur[IDX_H3OII] + k[3628]*y_cur[IDX_H3COII] + - k[3629]*y_cur[IDX_HCNHII] + k[3630]*y_cur[IDX_HCNHII]; - data[jistart + 11567] = 0.0 + k[4719]*y_cur[IDX_HM]; - data[jistart + 11568] = 0.0 + k[129]*y_cur[IDX_C2HM] + - k[406]*y_cur[IDX_HII] + k[1969]*y_cur[IDX_CHII] + - k[1991]*y_cur[IDX_CH2II] + k[2090]*y_cur[IDX_CH3II] + - k[2396]*y_cur[IDX_H2II] + k[2730]*y_cur[IDX_H3II] + - k[3688]*y_cur[IDX_C2H2II] + k[3738]*y_cur[IDX_HCSII] + - k[3740]*y_cur[IDX_HNOII] + k[3743]*y_cur[IDX_HSII] + - k[3746]*y_cur[IDX_NH2II] + k[3750]*y_cur[IDX_OHII] + - k[3751]*y_cur[IDX_PHII] + k[3756]*y_cur[IDX_SiHII] + - k[3757]*y_cur[IDX_SiH2II] + k[3758]*y_cur[IDX_SiH3II] + - k[5013]*y_cur[IDX_CH2I] + k[5013]*y_cur[IDX_CH2I] + - k[5014]*y_cur[IDX_CH2I] + k[5043]*y_cur[IDX_CH3I] + - k[5044]*y_cur[IDX_CH3I] + k[5096]*y_cur[IDX_CHI] + - k[5147]*y_cur[IDX_H2I] + k[5318]*y_cur[IDX_NHI] + - k[5319]*y_cur[IDX_NHI] + k[5345]*y_cur[IDX_C2H3I] + - k[5350]*y_cur[IDX_C2H5I] + k[5384]*y_cur[IDX_CH2PHI] + - k[5404]*y_cur[IDX_HCNI] + k[5405]*y_cur[IDX_HCOI] + - k[5409]*y_cur[IDX_HCSI] + k[5411]*y_cur[IDX_HNOI] + - k[5416]*y_cur[IDX_HSI] + k[5420]*y_cur[IDX_NH2I] + - k[5432]*y_cur[IDX_OHI] + k[5433]*y_cur[IDX_PH2I] + - k[5436]*y_cur[IDX_PHI] + k[5446]*y_cur[IDX_SiH2I] + - k[5446]*y_cur[IDX_SiH2I] + k[5447]*y_cur[IDX_SiH3I] + - k[5449]*y_cur[IDX_SiHI] - k[5573]*y_cur[IDX_HI]; - data[jistart + 11569] = 0.0 - k[492]*y_cur[IDX_HI] + - k[2261]*y_cur[IDX_CHI] + k[2466]*y_cur[IDX_H2I] + - k[3619]*y_cur[IDX_NHI] + k[3650]*y_cur[IDX_OHI] + - k[4720]*y_cur[IDX_HM]; - data[jistart + 11570] = 0.0 - k[107]*y_cur[IDX_HI] + - k[2467]*y_cur[IDX_H2I] + k[4737]*y_cur[IDX_HII] + - k[4740]*y_cur[IDX_H3II] + k[4741]*y_cur[IDX_H3OII] + - k[4742]*y_cur[IDX_HC2SII] + k[4743]*y_cur[IDX_HCNHII] + - k[4744]*y_cur[IDX_HCNHII] + k[4745]*y_cur[IDX_HCOII] + - k[4750]*y_cur[IDX_N2HII] + k[4752]*y_cur[IDX_NH4II] + - k[4760]*y_cur[IDX_SiOHII]; - data[jistart + 11571] = 0.0 - k[144]*y_cur[IDX_HI] + - k[144]*y_cur[IDX_HI] + k[405]*y_cur[IDX_HII] + - k[2395]*y_cur[IDX_H2II] + k[5008]*y_cur[IDX_CH2I] + - k[5008]*y_cur[IDX_CH2I] + k[5086]*y_cur[IDX_CHI] + - k[5087]*y_cur[IDX_CHI] + k[5088]*y_cur[IDX_CHI] + - k[5089]*y_cur[IDX_CHI] + k[5144]*y_cur[IDX_H2I] - - k[5190]*y_cur[IDX_HI]; - data[jistart + 11572] = 0.0 + k[2208]*y_cur[IDX_CH4I] + - k[2498]*y_cur[IDX_H2COI] + k[3621]*y_cur[IDX_NHI] + - k[3655]*y_cur[IDX_C2H2I] + k[3662]*y_cur[IDX_CH3CHCH2I] + - k[3663]*y_cur[IDX_CH3CHCH2I] + k[3665]*y_cur[IDX_CH3OHI]; - data[jistart + 11573] = 0.0 + k[4772]*y_cur[IDX_HII] + - k[4775]*y_cur[IDX_H3II] + k[4776]*y_cur[IDX_H3OII] + - k[4777]*y_cur[IDX_HC2SII] + k[4778]*y_cur[IDX_HCNHII] + - k[4779]*y_cur[IDX_HCNHII] + k[4780]*y_cur[IDX_HCOII] + - k[4785]*y_cur[IDX_N2HII] + k[4787]*y_cur[IDX_NH4II] + - k[4795]*y_cur[IDX_SiOHII]; - data[jistart + 11574] = 0.0 + k[5146]*y_cur[IDX_H2I] - - k[5191]*y_cur[IDX_HI] - k[5192]*y_cur[IDX_HI] - - k[5193]*y_cur[IDX_HI] + k[5899] + k[6237]; - data[jistart + 11575] = 0.0 + k[1175]*y_cur[IDX_eM] + - k[3466]*y_cur[IDX_NI] + k[6437]*y_cur[IDX_GRAINM]; - data[jistart + 11576] = 0.0 - k[5194]*y_cur[IDX_HI] - - k[5195]*y_cur[IDX_HI] - k[5196]*y_cur[IDX_HI]; - data[jistart + 11577] = 0.0 + k[3765]*y_cur[IDX_H2I] + - k[3766]*y_cur[IDX_H2I]; - data[jistart + 11578] = 0.0 + k[407]*y_cur[IDX_HII] + - k[1756]*y_cur[IDX_C3HII] + k[4905]*y_cur[IDX_C2HI] + - k[5098]*y_cur[IDX_CHI] - k[5197]*y_cur[IDX_HI]; - data[jistart + 11579] = 0.0 + k[139]*y_cur[IDX_H2I] - - k[145]*y_cur[IDX_HI] + k[145]*y_cur[IDX_HI] + k[145]*y_cur[IDX_HI] + - k[408]*y_cur[IDX_HII] + k[1426]*y_cur[IDX_CII] + - k[2397]*y_cur[IDX_H2II] + k[3297]*y_cur[IDX_HeII] + - k[3650]*y_cur[IDX_OII] + k[3796]*y_cur[IDX_C2H2II] + - k[3802]*y_cur[IDX_HCOII] + k[3807]*y_cur[IDX_PII] + - k[3808]*y_cur[IDX_SII] + k[3809]*y_cur[IDX_SiII] + - k[4981]*y_cur[IDX_CI] + k[5016]*y_cur[IDX_CH2I] + - k[5099]*y_cur[IDX_CHI] + k[5148]*y_cur[IDX_H2I] - - k[5198]*y_cur[IDX_HI] + k[5283]*y_cur[IDX_NI] + - k[5322]*y_cur[IDX_NHI] + k[5432]*y_cur[IDX_OI] + - k[5454]*y_cur[IDX_C2H2I] + k[5460]*y_cur[IDX_CNI] + - k[5461]*y_cur[IDX_COI] + k[5463]*y_cur[IDX_CSI] + - k[5466]*y_cur[IDX_H2COI] + k[5477]*y_cur[IDX_NOI] + - k[5480]*y_cur[IDX_SI] + k[5481]*y_cur[IDX_SOI] + - k[5482]*y_cur[IDX_SiI] + k[5483]*y_cur[IDX_SiOI] - - k[5574]*y_cur[IDX_HI] + k[5905] + k[6244]; - data[jistart + 11580] = 0.0 + k[1180]*y_cur[IDX_eM] + - k[2469]*y_cur[IDX_H2I] + k[3467]*y_cur[IDX_NI] + - k[3750]*y_cur[IDX_OI] + k[3790]*y_cur[IDX_SI] + k[6242] + - k[6329]*y_cur[IDX_GRAINM]; - data[jistart + 11581] = 0.0 - k[108]*y_cur[IDX_HI] + - k[4807]*y_cur[IDX_HII] + k[4810]*y_cur[IDX_H3II] + - k[4811]*y_cur[IDX_H3OII] + k[4812]*y_cur[IDX_HC2SII] + - k[4813]*y_cur[IDX_HCNHII] + k[4814]*y_cur[IDX_HCNHII] + - k[4815]*y_cur[IDX_HCOII] + k[4820]*y_cur[IDX_N2HII] + - k[4822]*y_cur[IDX_NH4II] + k[4830]*y_cur[IDX_SiOHII]; - data[jistart + 11582] = 0.0 + k[409]*y_cur[IDX_HII] + - k[1526]*y_cur[IDX_C2H2II] + k[2094]*y_cur[IDX_CH3II] + - k[3814]*y_cur[IDX_C3H2II] + k[3815]*y_cur[IDX_C4H2II]; - data[jistart + 11583] = 0.0 + k[1569]*y_cur[IDX_C2H2I] + - k[2562]*y_cur[IDX_H2OI] + k[3595]*y_cur[IDX_NH3I] + - k[3807]*y_cur[IDX_OHI]; - data[jistart + 11584] = 0.0 + k[1182]*y_cur[IDX_eM] + - k[6681]*y_cur[IDX_GRAINM]; - data[jistart + 11585] = 0.0 + k[1184]*y_cur[IDX_eM] + - k[6685]*y_cur[IDX_GRAINM]; - data[jistart + 11586] = 0.0 + k[1188]*y_cur[IDX_eM] + - k[6690]*y_cur[IDX_GRAINM]; - data[jistart + 11587] = 0.0 + k[1190]*y_cur[IDX_eM] + - k[6772]*y_cur[IDX_GRAINM]; - data[jistart + 11588] = 0.0 + k[1194]*y_cur[IDX_eM] + - k[6812]*y_cur[IDX_GRAINM]; - data[jistart + 11589] = 0.0 + k[1198]*y_cur[IDX_eM] + - k[6570]*y_cur[IDX_GRAINM]; - data[jistart + 11590] = 0.0 + k[1199]*y_cur[IDX_eM] + - k[6578]*y_cur[IDX_GRAINM]; - data[jistart + 11591] = 0.0 + k[1202]*y_cur[IDX_eM] + - k[1203]*y_cur[IDX_eM] + k[6596]*y_cur[IDX_GRAINM] + - k[6597]*y_cur[IDX_GRAINM]; - data[jistart + 11592] = 0.0 + k[411]*y_cur[IDX_HII] + - k[3299]*y_cur[IDX_HeII] + k[4983]*y_cur[IDX_CI] + - k[5285]*y_cur[IDX_NI] + k[5436]*y_cur[IDX_OI] + k[5908] + k[6249]; - data[jistart + 11593] = 0.0 + k[1205]*y_cur[IDX_eM] + - k[1570]*y_cur[IDX_C2H2I] + k[2213]*y_cur[IDX_CH4I] + - k[2564]*y_cur[IDX_H2OI] + k[3598]*y_cur[IDX_NH3I] + - k[3751]*y_cur[IDX_OI] + k[6433]*y_cur[IDX_GRAINM]; - data[jistart + 11594] = 0.0 + k[410]*y_cur[IDX_HII] + - k[5433]*y_cur[IDX_OI] + k[5907] + k[6248]; - data[jistart + 11595] = 0.0 + k[1207]*y_cur[IDX_eM] + - k[1207]*y_cur[IDX_eM] + k[1208]*y_cur[IDX_eM] + - k[6435]*y_cur[IDX_GRAINM] + k[6435]*y_cur[IDX_GRAINM] + - k[6436]*y_cur[IDX_GRAINM]; - data[jistart + 11596] = 0.0 + k[1209]*y_cur[IDX_eM] + - k[6448]*y_cur[IDX_GRAINM]; - data[jistart + 11597] = 0.0 + k[412]*y_cur[IDX_HII]; - data[jistart + 11598] = 0.0 + k[1217]*y_cur[IDX_eM] + - k[6619]*y_cur[IDX_GRAINM]; - data[jistart + 11599] = 0.0 + k[413]*y_cur[IDX_HII]; - data[jistart + 11600] = 0.0 + k[415]*y_cur[IDX_HII] + - k[1528]*y_cur[IDX_C2H2II] + k[1679]*y_cur[IDX_C2H4II] + - k[1973]*y_cur[IDX_CHII] + k[1994]*y_cur[IDX_CH2II] + - k[2517]*y_cur[IDX_H2OII] + k[3506]*y_cur[IDX_NHII] + - k[3526]*y_cur[IDX_NH2II] + k[3790]*y_cur[IDX_OHII] + - k[3834]*y_cur[IDX_C3H2II] + k[3836]*y_cur[IDX_C4H2II] + - k[3839]*y_cur[IDX_H3SII] + k[3883]*y_cur[IDX_SiH2II] + - k[4906]*y_cur[IDX_C2HI] + k[5020]*y_cur[IDX_CH2I] + - k[5048]*y_cur[IDX_CH3I] + k[5100]*y_cur[IDX_CHI] + - k[5149]*y_cur[IDX_H2I] + k[5325]*y_cur[IDX_NHI] + - k[5480]*y_cur[IDX_OHI] + k[5486]*y_cur[IDX_HCOI] + - k[5488]*y_cur[IDX_HSI]; - data[jistart + 11601] = 0.0 + k[1573]*y_cur[IDX_C2H2I] + - k[1716]*y_cur[IDX_C2H4I] + k[1750]*y_cur[IDX_C2HI] + - k[2017]*y_cur[IDX_CH2I] + k[2101]*y_cur[IDX_CH3I] + - k[2215]*y_cur[IDX_CH4I] + k[2216]*y_cur[IDX_CH4I] + - k[2265]*y_cur[IDX_CHI] + k[2470]*y_cur[IDX_H2I] + - k[3624]*y_cur[IDX_NHI] + k[3808]*y_cur[IDX_OHI] + - k[3820]*y_cur[IDX_C3H2I] + k[3821]*y_cur[IDX_C3HI] + - k[3822]*y_cur[IDX_C4HI] + k[3827]*y_cur[IDX_H2CCCI] + - k[3828]*y_cur[IDX_H2SI] + k[3832]*y_cur[IDX_C4H2I] + - k[3885]*y_cur[IDX_SiHI] + k[4721]*y_cur[IDX_HM]; - data[jistart + 11602] = 0.0 - k[109]*y_cur[IDX_HI] + - k[4842]*y_cur[IDX_HII] + k[4845]*y_cur[IDX_H3II] + - k[4846]*y_cur[IDX_H3OII] + k[4847]*y_cur[IDX_HC2SII] + - k[4848]*y_cur[IDX_HCNHII] + k[4849]*y_cur[IDX_HCNHII] + - k[4850]*y_cur[IDX_HCOII] + k[4855]*y_cur[IDX_N2HII] + - k[4857]*y_cur[IDX_NH4II] + k[4865]*y_cur[IDX_SiOHII]; - data[jistart + 11603] = 0.0 + k[414]*y_cur[IDX_HII] - - k[5199]*y_cur[IDX_HI]; - data[jistart + 11604] = 0.0 + k[417]*y_cur[IDX_HII] + - k[5103]*y_cur[IDX_CHI] - k[5200]*y_cur[IDX_HI] - - k[5201]*y_cur[IDX_HI] + k[5481]*y_cur[IDX_OHI]; - data[jistart + 11605] = 0.0 + k[3855]*y_cur[IDX_CH2CCH2I] + - k[4722]*y_cur[IDX_HM]; - data[jistart + 11606] = 0.0 + k[416]*y_cur[IDX_HII]; - data[jistart + 11607] = 0.0 + k[2471]*y_cur[IDX_H2I] - - k[2847]*y_cur[IDX_HI]; - data[jistart + 11608] = 0.0 + k[418]*y_cur[IDX_HII] + - k[1530]*y_cur[IDX_C2H2II] + k[1627]*y_cur[IDX_C2H3II] + - k[1681]*y_cur[IDX_C2H4II] + k[2098]*y_cur[IDX_CH3II] + - k[2237]*y_cur[IDX_CH5II] + k[3872]*y_cur[IDX_C3HII] + - k[3874]*y_cur[IDX_C3H2II] + k[3876]*y_cur[IDX_C3H3II] + - k[3878]*y_cur[IDX_C4H2II] + k[3880]*y_cur[IDX_CH2CCHII] + - k[4880]*y_cur[IDX_C2H2I] + k[5021]*y_cur[IDX_CH2I] + - k[5049]*y_cur[IDX_CH3I] + k[5482]*y_cur[IDX_OHI]; - data[jistart + 11609] = 0.0 + k[1574]*y_cur[IDX_C2H2I] + - k[1646]*y_cur[IDX_C2H3I] + k[1718]*y_cur[IDX_C2H4I] + - k[1751]*y_cur[IDX_C2HI] + k[2018]*y_cur[IDX_CH2I] + - k[2103]*y_cur[IDX_CH3I] + k[2266]*y_cur[IDX_CHI] + - k[2569]*y_cur[IDX_H2OI] + k[2885]*y_cur[IDX_HCNI] + - k[3015]*y_cur[IDX_HFI] + k[3046]*y_cur[IDX_HNCI] + - k[3602]*y_cur[IDX_NH3I] + k[3625]*y_cur[IDX_NHI] + - k[3809]*y_cur[IDX_OHI] + k[3860]*y_cur[IDX_C3H2I] + - k[3861]*y_cur[IDX_C3HI] + k[3862]*y_cur[IDX_C4HI] + - k[3863]*y_cur[IDX_CH2CCHI] + k[3868]*y_cur[IDX_H2CCCI] + - k[4723]*y_cur[IDX_HM] - k[5575]*y_cur[IDX_HI]; - data[jistart + 11610] = 0.0 + k[425]*y_cur[IDX_HII]; - data[jistart + 11611] = 0.0 + k[2472]*y_cur[IDX_H2I]; - data[jistart + 11612] = 0.0 + k[419]*y_cur[IDX_HII]; - data[jistart + 11613] = 0.0 + k[1575]*y_cur[IDX_C2H2I] + - k[2473]*y_cur[IDX_H2I]; - data[jistart + 11614] = 0.0 + k[421]*y_cur[IDX_HII] + - k[1432]*y_cur[IDX_CII] + k[3311]*y_cur[IDX_HeII] + k[5920] + - k[6262]; - data[jistart + 11615] = 0.0 + k[1227]*y_cur[IDX_eM] + - k[1915]*y_cur[IDX_CI] + k[6650]*y_cur[IDX_GRAINM]; - data[jistart + 11616] = 0.0 + k[420]*y_cur[IDX_HII] + - k[1431]*y_cur[IDX_CII] + k[3308]*y_cur[IDX_HeII] + k[6261]; - data[jistart + 11617] = 0.0 + k[1229]*y_cur[IDX_eM] + - k[1916]*y_cur[IDX_CI] + k[6661]*y_cur[IDX_GRAINM]; - data[jistart + 11618] = 0.0 + k[1230]*y_cur[IDX_eM] + - k[1917]*y_cur[IDX_CI] + k[6664]*y_cur[IDX_GRAINM]; - data[jistart + 11619] = 0.0 + k[422]*y_cur[IDX_HII]; - data[jistart + 11620] = 0.0 + k[423]*y_cur[IDX_HII] + - k[1433]*y_cur[IDX_CII] + k[3314]*y_cur[IDX_HeII] + k[5922] + - k[6265]; - data[jistart + 11621] = 0.0 + k[1235]*y_cur[IDX_eM] + - k[1918]*y_cur[IDX_CI] + k[6762]*y_cur[IDX_GRAINM]; - data[jistart + 11622] = 0.0 + k[1237]*y_cur[IDX_eM] + - k[1919]*y_cur[IDX_CI] + k[6768]*y_cur[IDX_GRAINM]; - data[jistart + 11623] = 0.0 + k[424]*y_cur[IDX_HII]; - data[jistart + 11624] = 0.0 + k[1241]*y_cur[IDX_eM] + - k[6801]*y_cur[IDX_GRAINM]; - data[jistart + 11625] = 0.0 + k[426]*y_cur[IDX_HII] + - k[1436]*y_cur[IDX_CII] + k[3318]*y_cur[IDX_HeII] + k[6268]; - data[jistart + 11626] = 0.0 + k[1242]*y_cur[IDX_eM] + - k[1922]*y_cur[IDX_CI] + k[3470]*y_cur[IDX_NI] + - k[6496]*y_cur[IDX_GRAINM]; - data[jistart + 11627] = 0.0 + k[427]*y_cur[IDX_HII] + - k[1438]*y_cur[IDX_CII] + k[3320]*y_cur[IDX_HeII] + k[5926] + - k[6270]; - data[jistart + 11628] = 0.0 + k[1246]*y_cur[IDX_eM] + - k[1923]*y_cur[IDX_CI] + k[6517]*y_cur[IDX_GRAINM]; - data[jistart + 11629] = 0.0 + k[1248]*y_cur[IDX_eM] + - k[1924]*y_cur[IDX_CI] + k[6542]*y_cur[IDX_GRAINM]; - data[jistart + 11630] = 0.0 + k[431]*y_cur[IDX_HII] + - k[1445]*y_cur[IDX_CII] + k[3328]*y_cur[IDX_HeII] + - k[3885]*y_cur[IDX_SII] + k[4990]*y_cur[IDX_CI] + - k[5296]*y_cur[IDX_NI] + k[5449]*y_cur[IDX_OI] + k[5930] + k[6280]; - data[jistart + 11631] = 0.0 + k[1250]*y_cur[IDX_eM] + - k[1925]*y_cur[IDX_CI] - k[2848]*y_cur[IDX_HI] + - k[3471]*y_cur[IDX_NI] + k[3756]*y_cur[IDX_OI] + k[6271] + - k[6388]*y_cur[IDX_GRAINM]; - data[jistart + 11632] = 0.0 + k[428]*y_cur[IDX_HII] + - k[1439]*y_cur[IDX_CII] + k[3323]*y_cur[IDX_HeII] + - k[4988]*y_cur[IDX_CI] + k[5294]*y_cur[IDX_NI] + - k[5446]*y_cur[IDX_OI] + k[5446]*y_cur[IDX_OI] + k[5927] + k[6273]; - data[jistart + 11633] = 0.0 + k[1252]*y_cur[IDX_eM] + - k[1252]*y_cur[IDX_eM] + k[1253]*y_cur[IDX_eM] + - k[1926]*y_cur[IDX_CI] + k[3472]*y_cur[IDX_NI] + - k[3757]*y_cur[IDX_OI] + k[3883]*y_cur[IDX_SI] + - k[6403]*y_cur[IDX_GRAINM] + k[6403]*y_cur[IDX_GRAINM] + - k[6404]*y_cur[IDX_GRAINM]; - data[jistart + 11634] = 0.0 + k[429]*y_cur[IDX_HII] + - k[1442]*y_cur[IDX_CII] + k[3325]*y_cur[IDX_HeII] + - k[4989]*y_cur[IDX_CI] + k[5447]*y_cur[IDX_OI] + k[5928] + k[6274]; - data[jistart + 11635] = 0.0 + k[1254]*y_cur[IDX_eM] + - k[1927]*y_cur[IDX_CI] + k[3474]*y_cur[IDX_NI] + - k[3758]*y_cur[IDX_OI] + k[6412]*y_cur[IDX_GRAINM]; - data[jistart + 11636] = 0.0 + k[430]*y_cur[IDX_HII] + - k[1444]*y_cur[IDX_CII] + k[3327]*y_cur[IDX_HeII] + k[6278] + - k[6279]; - data[jistart + 11637] = 0.0 + k[1257]*y_cur[IDX_eM] + - k[2474]*y_cur[IDX_H2I] + k[6427]*y_cur[IDX_GRAINM]; - data[jistart + 11638] = 0.0 + k[1259]*y_cur[IDX_eM] + - k[1929]*y_cur[IDX_CI] + k[6439]*y_cur[IDX_GRAINM]; - data[jistart + 11639] = 0.0 + k[432]*y_cur[IDX_HII]; - data[jistart + 11640] = 0.0 + k[433]*y_cur[IDX_HII]; - data[jistart + 11641] = 0.0 + k[1263]*y_cur[IDX_eM] + - k[6669]*y_cur[IDX_GRAINM]; - data[jistart + 11642] = 0.0 + k[1264]*y_cur[IDX_eM] + - k[1931]*y_cur[IDX_CI] + k[6552]*y_cur[IDX_GRAINM]; - data[jistart + 11643] = 0.0 + k[434]*y_cur[IDX_HII] + - k[5483]*y_cur[IDX_OHI]; - data[jistart + 11644] = 0.0 + k[2475]*y_cur[IDX_H2I] + - k[4724]*y_cur[IDX_HM]; - data[jistart + 11645] = 0.0 + k[1268]*y_cur[IDX_eM] + - k[3919]*y_cur[IDX_CM] + k[3954]*y_cur[IDX_C10M] + - k[3989]*y_cur[IDX_C10HM] + k[4024]*y_cur[IDX_C2M] + - k[4059]*y_cur[IDX_C2HM] + k[4094]*y_cur[IDX_C3M] + - k[4129]*y_cur[IDX_C3HM] + k[4164]*y_cur[IDX_C3NM] + - k[4199]*y_cur[IDX_C4M] + k[4234]*y_cur[IDX_C4HM] + - k[4269]*y_cur[IDX_C5M] + k[4304]*y_cur[IDX_C5HM] + - k[4339]*y_cur[IDX_C5NM] + k[4374]*y_cur[IDX_C6M] + - k[4409]*y_cur[IDX_C6HM] + k[4444]*y_cur[IDX_C7M] + - k[4479]*y_cur[IDX_C7HM] + k[4514]*y_cur[IDX_C8M] + - k[4549]*y_cur[IDX_C8HM] + k[4584]*y_cur[IDX_C9M] + - k[4619]*y_cur[IDX_C9HM] + k[4654]*y_cur[IDX_CHM] + - k[4689]*y_cur[IDX_CNM] + k[4725]*y_cur[IDX_HM] + - k[4725]*y_cur[IDX_HM] + k[4760]*y_cur[IDX_OM] + - k[4795]*y_cur[IDX_O2M] + k[4830]*y_cur[IDX_OHM] + - k[4865]*y_cur[IDX_SM] + k[6557]*y_cur[IDX_GRAINM]; - data[jistart + 11646] = 0.0 + k[435]*y_cur[IDX_HII]; - data[jistart + 11647] = 0.0 - k[2849]*y_cur[IDX_HI] + - k[4726]*y_cur[IDX_HM]; - data[jistart + 11648] = 0.0 + k[140]*y_cur[IDX_H2I] + - k[140]*y_cur[IDX_H2I] + k[729]*y_cur[IDX_C10HII] + - k[732]*y_cur[IDX_C10H2II] + k[733]*y_cur[IDX_C10H3II] + - k[734]*y_cur[IDX_C10H3II] + k[740]*y_cur[IDX_C2HII] + - k[742]*y_cur[IDX_C2H2II] + k[742]*y_cur[IDX_C2H2II] + - k[743]*y_cur[IDX_C2H2II] + k[745]*y_cur[IDX_C2H3II] + - k[746]*y_cur[IDX_C2H3II] + k[747]*y_cur[IDX_C2H3II] + - k[748]*y_cur[IDX_C2H3II] + k[751]*y_cur[IDX_C2H3II] + - k[751]*y_cur[IDX_C2H3II] + k[752]*y_cur[IDX_C2H3II] + - k[752]*y_cur[IDX_C2H3II] + k[758]*y_cur[IDX_C2H4II] + - k[758]*y_cur[IDX_C2H4II] + k[759]*y_cur[IDX_C2H4II] + - k[760]*y_cur[IDX_C2H4II] + k[764]*y_cur[IDX_C2H5II] + - k[765]*y_cur[IDX_C2H5II] + k[765]*y_cur[IDX_C2H5II] + - k[765]*y_cur[IDX_C2H5II] + k[766]*y_cur[IDX_C2H5II] + - k[766]*y_cur[IDX_C2H5II] + k[767]*y_cur[IDX_C2H5II] + - k[769]*y_cur[IDX_C2H5CNHII] + k[770]*y_cur[IDX_C2H5CNHII] + - k[771]*y_cur[IDX_C2H5CNHII] + k[774]*y_cur[IDX_C2H5OH2II] + - k[776]*y_cur[IDX_C2H5OH2II] + k[777]*y_cur[IDX_C2H5OH2II] + - k[779]*y_cur[IDX_C2H7II] + k[784]*y_cur[IDX_C2NHII] + - k[790]*y_cur[IDX_C3HII] + k[794]*y_cur[IDX_C3H2II] + - k[794]*y_cur[IDX_C3H2II] + k[795]*y_cur[IDX_C3H2II] + - k[796]*y_cur[IDX_C3H2OII] + k[796]*y_cur[IDX_C3H2OII] + - k[798]*y_cur[IDX_C3H3II] + k[800]*y_cur[IDX_C3H4II] + - k[802]*y_cur[IDX_C3H4II] + k[802]*y_cur[IDX_C3H4II] + - k[804]*y_cur[IDX_C3H5II] + k[805]*y_cur[IDX_C3H6II] + - k[808]*y_cur[IDX_C3H7II] + k[809]*y_cur[IDX_C3H7II] + - k[810]*y_cur[IDX_C3H7II] + k[811]*y_cur[IDX_C3H7II] + - k[813]*y_cur[IDX_C3H7II] + k[821]*y_cur[IDX_C4HII] + - k[823]*y_cur[IDX_C4H2II] + k[825]*y_cur[IDX_C4H3II] + - k[826]*y_cur[IDX_C4H4II] + k[829]*y_cur[IDX_C4H5II] + - k[830]*y_cur[IDX_C4H7II] + k[840]*y_cur[IDX_C5HII] + - k[842]*y_cur[IDX_C5H2II] + k[843]*y_cur[IDX_C5H3II] + - k[845]*y_cur[IDX_C5H5II] + k[846]*y_cur[IDX_C5H5II] + - k[851]*y_cur[IDX_C6HII] + k[853]*y_cur[IDX_C6H2II] + - k[854]*y_cur[IDX_C6H3II] + k[857]*y_cur[IDX_C6H4II] + - k[858]*y_cur[IDX_C6H5II] + k[861]*y_cur[IDX_C6H7II] + - k[862]*y_cur[IDX_C6H7II] + k[867]*y_cur[IDX_C7HII] + - k[869]*y_cur[IDX_C7H2II] + k[870]*y_cur[IDX_C7H3II] + - k[873]*y_cur[IDX_C7H4II] + k[874]*y_cur[IDX_C7H5II] + - k[875]*y_cur[IDX_C7H5II] + k[880]*y_cur[IDX_C8HII] + - k[882]*y_cur[IDX_C8H2II] + k[883]*y_cur[IDX_C8H3II] + - k[886]*y_cur[IDX_C8H4II] + k[887]*y_cur[IDX_C8H5II] + - k[892]*y_cur[IDX_C9HII] + k[894]*y_cur[IDX_C9H2II] + - k[895]*y_cur[IDX_C9H3II] + k[898]*y_cur[IDX_C9H4II] + - k[899]*y_cur[IDX_C9H5II] + k[906]*y_cur[IDX_CHII] + - k[908]*y_cur[IDX_CH2II] + k[908]*y_cur[IDX_CH2II] + - k[909]*y_cur[IDX_CH2II] + k[911]*y_cur[IDX_CH2CCHII] + - k[913]*y_cur[IDX_CH2CHCNHII] + k[915]*y_cur[IDX_CH2CHCNHII] + - k[921]*y_cur[IDX_CH2NH2II] + k[923]*y_cur[IDX_CH3II] + - k[925]*y_cur[IDX_CH3II] + k[925]*y_cur[IDX_CH3II] + - k[927]*y_cur[IDX_CH3C3NHII] + k[930]*y_cur[IDX_CH3C4HII] + - k[931]*y_cur[IDX_CH3C5NHII] + k[933]*y_cur[IDX_CH3C7NHII] + - k[936]*y_cur[IDX_C2H6II] + k[937]*y_cur[IDX_CH3CHOII] + - k[937]*y_cur[IDX_CH3CHOII] + k[939]*y_cur[IDX_CH3CHOHII] + - k[940]*y_cur[IDX_CH3CHOHII] + k[941]*y_cur[IDX_CH3CHOHII] + - k[942]*y_cur[IDX_CH3CHOHII] + k[944]*y_cur[IDX_CH3CNII] + - k[946]*y_cur[IDX_CH3CNHII] + k[948]*y_cur[IDX_CH3COII] + - k[953]*y_cur[IDX_CH3COCH4II] + k[958]*y_cur[IDX_CH3OCH4II] + - k[960]*y_cur[IDX_CH3OHII] + k[961]*y_cur[IDX_CH3OHII] + - k[961]*y_cur[IDX_CH3OHII] + k[963]*y_cur[IDX_CH3OH2II] + - k[965]*y_cur[IDX_CH3OH2II] + k[966]*y_cur[IDX_CH3OH2II] + - k[967]*y_cur[IDX_CH3OH2II] + k[968]*y_cur[IDX_CH4II] + - k[968]*y_cur[IDX_CH4II] + k[969]*y_cur[IDX_CH4II] + - k[971]*y_cur[IDX_CH3NHII] + k[972]*y_cur[IDX_CH5II] + - k[974]*y_cur[IDX_CH5II] + k[974]*y_cur[IDX_CH5II] + - k[975]*y_cur[IDX_CH5II] + k[983]*y_cur[IDX_HCOOCH3II] + - k[987]*y_cur[IDX_H2II] + k[987]*y_cur[IDX_H2II] + - k[990]*y_cur[IDX_H2C7NII] + k[992]*y_cur[IDX_H2C9NII] + - k[993]*y_cur[IDX_H2CClII] + k[993]*y_cur[IDX_H2CClII] + - k[995]*y_cur[IDX_H2CNOII] + k[998]*y_cur[IDX_H2COII] + - k[998]*y_cur[IDX_H2COII] + k[999]*y_cur[IDX_H2COII] + - k[1000]*y_cur[IDX_H2CSII] + k[1000]*y_cur[IDX_H2CSII] + - k[1001]*y_cur[IDX_H2CSII] + k[1002]*y_cur[IDX_H2ClII] + - k[1002]*y_cur[IDX_H2ClII] + k[1003]*y_cur[IDX_H2ClII] + - k[1005]*y_cur[IDX_H2FII] + k[1007]*y_cur[IDX_H2NCII] + - k[1008]*y_cur[IDX_H2NCOII] + k[1010]*y_cur[IDX_H2NOII] + - k[1013]*y_cur[IDX_H2OII] + k[1013]*y_cur[IDX_H2OII] + - k[1014]*y_cur[IDX_H2OII] + k[1016]*y_cur[IDX_H2OCNII] + - k[1017]*y_cur[IDX_H2POII] + k[1019]*y_cur[IDX_H2SII] + - k[1020]*y_cur[IDX_H2SII] + k[1020]*y_cur[IDX_H2SII] + - k[1021]*y_cur[IDX_H2S2II] + k[1025]*y_cur[IDX_H3II] + - k[1026]*y_cur[IDX_H3II] + k[1026]*y_cur[IDX_H3II] + - k[1026]*y_cur[IDX_H3II] + k[1027]*y_cur[IDX_H3C3OII] + - k[1028]*y_cur[IDX_H3C5NII] + k[1030]*y_cur[IDX_H3C7NII] + - k[1032]*y_cur[IDX_H3C9NII] + k[1036]*y_cur[IDX_H3COII] + - k[1037]*y_cur[IDX_H3COII] + k[1038]*y_cur[IDX_H3COII] + - k[1038]*y_cur[IDX_H3COII] + k[1039]*y_cur[IDX_H3CSII] + - k[1040]*y_cur[IDX_H3CSII] + k[1041]*y_cur[IDX_H3OII] + - k[1042]*y_cur[IDX_H3OII] + k[1044]*y_cur[IDX_H3OII] + - k[1044]*y_cur[IDX_H3OII] + k[1045]*y_cur[IDX_H3SII] + - k[1047]*y_cur[IDX_H3SII] + k[1047]*y_cur[IDX_H3SII] + - k[1048]*y_cur[IDX_H3SII] + k[1049]*y_cur[IDX_H3S2II] + - k[1051]*y_cur[IDX_H3SiOII] + k[1052]*y_cur[IDX_H3SiOII] + - k[1054]*y_cur[IDX_H5C2O2II] + k[1056]*y_cur[IDX_HC2OII] + - k[1057]*y_cur[IDX_HC2OII] + k[1059]*y_cur[IDX_HC2PII] + - k[1061]*y_cur[IDX_HC2SII] + k[1063]*y_cur[IDX_HC3NII] + - k[1068]*y_cur[IDX_HC3NHII] + k[1069]*y_cur[IDX_HC3NHII] + - k[1070]*y_cur[IDX_HC3OII] + k[1072]*y_cur[IDX_HC3SII] + - k[1076]*y_cur[IDX_HC4SII] + k[1078]*y_cur[IDX_HC5NII] + - k[1081]*y_cur[IDX_HC5NHII] + k[1085]*y_cur[IDX_HC7NII] + - k[1087]*y_cur[IDX_HC9NII] + k[1088]*y_cur[IDX_HCNII] + - k[1089]*y_cur[IDX_HCNHII] + k[1089]*y_cur[IDX_HCNHII] + - k[1090]*y_cur[IDX_HCNHII] + k[1091]*y_cur[IDX_HCNHII] + - k[1093]*y_cur[IDX_HCNOII] + k[1095]*y_cur[IDX_HCNOHII] + - k[1096]*y_cur[IDX_HCNOHII] + k[1097]*y_cur[IDX_HCOII] + - k[1098]*y_cur[IDX_HCO2II] + k[1099]*y_cur[IDX_HCO2II] + - k[1101]*y_cur[IDX_HCOOHII] + k[1101]*y_cur[IDX_HCOOHII] + - k[1103]*y_cur[IDX_HCOOH2II] + k[1104]*y_cur[IDX_HCOOH2II] + - k[1105]*y_cur[IDX_HCPII] + k[1108]*y_cur[IDX_HCSII] + - k[1110]*y_cur[IDX_HCSiII] + k[1111]*y_cur[IDX_HClII] + - k[1112]*y_cur[IDX_HFII] + k[1113]*y_cur[IDX_HN2OII] + - k[1115]*y_cur[IDX_HNC3I] + k[1117]*y_cur[IDX_HNCOII] + - k[1118]*y_cur[IDX_HNCOHII] + k[1119]*y_cur[IDX_HNCOHII] + - k[1121]*y_cur[IDX_HNOII] + k[1122]*y_cur[IDX_HNSII] + - k[1124]*y_cur[IDX_HNSiII] + k[1125]*y_cur[IDX_HOCII] + - k[1126]*y_cur[IDX_HOCNII] + k[1129]*y_cur[IDX_HOCSII] + - k[1130]*y_cur[IDX_HONCII] + k[1134]*y_cur[IDX_HPNII] + - k[1135]*y_cur[IDX_HPOII] + k[1137]*y_cur[IDX_HPOII] + - k[1138]*y_cur[IDX_HSII] + k[1140]*y_cur[IDX_HS2II] + - k[1141]*y_cur[IDX_HSOII] + k[1142]*y_cur[IDX_HSO2II] + - k[1143]*y_cur[IDX_HSO2II] + k[1145]*y_cur[IDX_HSiO2II] + - k[1148]*y_cur[IDX_HSiSII] + k[1149]*y_cur[IDX_HeHII] + - k[1151]*y_cur[IDX_N2HII] + k[1152]*y_cur[IDX_N2HII] + - k[1157]*y_cur[IDX_NCCNHII] + k[1158]*y_cur[IDX_NHII] + - k[1159]*y_cur[IDX_NH2II] + k[1159]*y_cur[IDX_NH2II] + - k[1160]*y_cur[IDX_NH2II] + k[1162]*y_cur[IDX_NH2CNHII] + - k[1163]*y_cur[IDX_NH3II] + k[1164]*y_cur[IDX_NH3II] + - k[1164]*y_cur[IDX_NH3II] + k[1166]*y_cur[IDX_NH4II] + - k[1166]*y_cur[IDX_NH4II] + k[1167]*y_cur[IDX_NH4II] + - k[1175]*y_cur[IDX_O2HII] + k[1180]*y_cur[IDX_OHII] + - k[1182]*y_cur[IDX_PC2H2II] + k[1184]*y_cur[IDX_PC2H3II] + - k[1188]*y_cur[IDX_PC2H4II] + k[1190]*y_cur[IDX_PC3HII] + - k[1194]*y_cur[IDX_PC4HII] + k[1198]*y_cur[IDX_PCH2II] + - k[1199]*y_cur[IDX_PCH3II] + k[1202]*y_cur[IDX_PCH4II] + - k[1203]*y_cur[IDX_PCH4II] + k[1205]*y_cur[IDX_PHII] + - k[1207]*y_cur[IDX_PH2II] + k[1207]*y_cur[IDX_PH2II] + - k[1208]*y_cur[IDX_PH2II] + k[1209]*y_cur[IDX_PH3II] + - k[1217]*y_cur[IDX_PNH3II] + k[1227]*y_cur[IDX_SiC2HII] + - k[1229]*y_cur[IDX_SiC2H2II] + k[1230]*y_cur[IDX_SiC2H3II] + - k[1235]*y_cur[IDX_SiC3HII] + k[1237]*y_cur[IDX_SiC3H2II] + - k[1241]*y_cur[IDX_SiC4HII] + k[1242]*y_cur[IDX_SiCH2II] + - k[1246]*y_cur[IDX_SiCH3II] + k[1248]*y_cur[IDX_SiCH4II] + - k[1250]*y_cur[IDX_SiHII] + k[1252]*y_cur[IDX_SiH2II] + - k[1252]*y_cur[IDX_SiH2II] + k[1253]*y_cur[IDX_SiH2II] + - k[1254]*y_cur[IDX_SiH3II] + k[1257]*y_cur[IDX_SiH4II] + - k[1259]*y_cur[IDX_SiH5II] + k[1263]*y_cur[IDX_SiNCHII] + - k[1264]*y_cur[IDX_SiNH2II] + k[1268]*y_cur[IDX_SiOHII] + - k[1270]*y_cur[IDX_COOCH3II] + k[1273]*y_cur[IDX_CH2OHCOII] + - k[1276]*y_cur[IDX_CH2OHCHOII] + k[1277]*y_cur[IDX_CH2OHCHOII] + - k[1279]*y_cur[IDX_CH2OHCHOII] + k[1280]*y_cur[IDX_CH2OHCH2OII] + - k[1281]*y_cur[IDX_CH2OHCH2OII] + k[1283]*y_cur[IDX_CH2OHCH2OII] + - k[1285]*y_cur[IDX_CH3COOHII] + k[1286]*y_cur[IDX_CH3COOHII] + - k[1287]*y_cur[IDX_CH3COOHII] + k[1290]*y_cur[IDX_CH3COOH2II] + - k[1292]*y_cur[IDX_CH3COOH2II] + k[1293]*y_cur[IDX_CH3COOH2II] + - k[1294]*y_cur[IDX_CH3COOH2II] + k[1296]*y_cur[IDX_CH3COOH2II] - - k[5608]*y_cur[IDX_HI] + k[5615]*y_cur[IDX_HII]; - data[jistart + 11649] = 0.0 - k[3896]*y_cur[IDX_HII]; - data[jistart + 11650] = 0.0 - k[320]*y_cur[IDX_HII] - - k[2293]*y_cur[IDX_HII]; - data[jistart + 11651] = 0.0 - k[3931]*y_cur[IDX_HII]; - data[jistart + 11652] = 0.0 - k[322]*y_cur[IDX_HII]; - data[jistart + 11653] = 0.0 - k[3966]*y_cur[IDX_HII]; - data[jistart + 11654] = 0.0 - k[321]*y_cur[IDX_HII] - - k[2294]*y_cur[IDX_HII]; - data[jistart + 11655] = 0.0 - k[323]*y_cur[IDX_HII]; - data[jistart + 11656] = 0.0 - k[4001]*y_cur[IDX_HII]; - data[jistart + 11657] = 0.0 - k[329]*y_cur[IDX_HII] - - k[2299]*y_cur[IDX_HII]; - data[jistart + 11658] = 0.0 - k[4036]*y_cur[IDX_HII]; - data[jistart + 11659] = 0.0 - k[324]*y_cur[IDX_HII]; - data[jistart + 11660] = 0.0 - k[325]*y_cur[IDX_HII] - - k[2295]*y_cur[IDX_HII]; - data[jistart + 11661] = 0.0 - k[326]*y_cur[IDX_HII] - - k[2296]*y_cur[IDX_HII] - k[2297]*y_cur[IDX_HII]; - data[jistart + 11662] = 0.0 - k[327]*y_cur[IDX_HII] - - k[2298]*y_cur[IDX_HII]; - data[jistart + 11663] = 0.0 - k[328]*y_cur[IDX_HII]; - data[jistart + 11664] = 0.0 - k[2326]*y_cur[IDX_HII] - - k[2327]*y_cur[IDX_HII]; - data[jistart + 11665] = 0.0 - k[330]*y_cur[IDX_HII]; - data[jistart + 11666] = 0.0 - k[331]*y_cur[IDX_HII]; - data[jistart + 11667] = 0.0 - k[332]*y_cur[IDX_HII]; - data[jistart + 11668] = 0.0 - k[333]*y_cur[IDX_HII]; - data[jistart + 11669] = 0.0 - k[4071]*y_cur[IDX_HII]; - data[jistart + 11670] = 0.0 - k[335]*y_cur[IDX_HII] - - k[2301]*y_cur[IDX_HII]; - data[jistart + 11671] = 0.0 - k[4106]*y_cur[IDX_HII]; - data[jistart + 11672] = 0.0 - k[334]*y_cur[IDX_HII] - - k[2300]*y_cur[IDX_HII]; - data[jistart + 11673] = 0.0 - k[4141]*y_cur[IDX_HII]; - data[jistart + 11674] = 0.0 - k[336]*y_cur[IDX_HII]; - data[jistart + 11675] = 0.0 - k[337]*y_cur[IDX_HII]; - data[jistart + 11676] = 0.0 - k[338]*y_cur[IDX_HII]; - data[jistart + 11677] = 0.0 - k[4176]*y_cur[IDX_HII]; - data[jistart + 11678] = 0.0 - k[340]*y_cur[IDX_HII] - - k[2303]*y_cur[IDX_HII]; - data[jistart + 11679] = 0.0 - k[4211]*y_cur[IDX_HII]; - data[jistart + 11680] = 0.0 - k[384]*y_cur[IDX_HII] - - k[2342]*y_cur[IDX_HII]; - data[jistart + 11681] = 0.0 - k[339]*y_cur[IDX_HII] - - k[2302]*y_cur[IDX_HII]; - data[jistart + 11682] = 0.0 - k[341]*y_cur[IDX_HII]; - data[jistart + 11683] = 0.0 - k[342]*y_cur[IDX_HII]; - data[jistart + 11684] = 0.0 - k[343]*y_cur[IDX_HII]; - data[jistart + 11685] = 0.0 - k[4246]*y_cur[IDX_HII]; - data[jistart + 11686] = 0.0 - k[345]*y_cur[IDX_HII] - - k[2305]*y_cur[IDX_HII]; - data[jistart + 11687] = 0.0 - k[4281]*y_cur[IDX_HII]; - data[jistart + 11688] = 0.0 - k[344]*y_cur[IDX_HII] - - k[2304]*y_cur[IDX_HII]; - data[jistart + 11689] = 0.0 - k[4316]*y_cur[IDX_HII]; - data[jistart + 11690] = 0.0 - k[346]*y_cur[IDX_HII]; - data[jistart + 11691] = 0.0 - k[4351]*y_cur[IDX_HII]; - data[jistart + 11692] = 0.0 - k[348]*y_cur[IDX_HII] - - k[2307]*y_cur[IDX_HII]; - data[jistart + 11693] = 0.0 - k[4386]*y_cur[IDX_HII]; - data[jistart + 11694] = 0.0 - k[347]*y_cur[IDX_HII] - - k[2306]*y_cur[IDX_HII]; - data[jistart + 11695] = 0.0 - k[349]*y_cur[IDX_HII]; - data[jistart + 11696] = 0.0 - k[4421]*y_cur[IDX_HII]; - data[jistart + 11697] = 0.0 - k[351]*y_cur[IDX_HII] - - k[2309]*y_cur[IDX_HII]; - data[jistart + 11698] = 0.0 - k[4456]*y_cur[IDX_HII]; - data[jistart + 11699] = 0.0 - k[350]*y_cur[IDX_HII] - - k[2308]*y_cur[IDX_HII]; - data[jistart + 11700] = 0.0 - k[352]*y_cur[IDX_HII]; - data[jistart + 11701] = 0.0 - k[4491]*y_cur[IDX_HII]; - data[jistart + 11702] = 0.0 - k[354]*y_cur[IDX_HII] - - k[2311]*y_cur[IDX_HII]; - data[jistart + 11703] = 0.0 - k[4526]*y_cur[IDX_HII]; - data[jistart + 11704] = 0.0 - k[353]*y_cur[IDX_HII] - - k[2310]*y_cur[IDX_HII]; - data[jistart + 11705] = 0.0 - k[355]*y_cur[IDX_HII]; - data[jistart + 11706] = 0.0 - k[4561]*y_cur[IDX_HII]; - data[jistart + 11707] = 0.0 - k[357]*y_cur[IDX_HII] - - k[2313]*y_cur[IDX_HII]; - data[jistart + 11708] = 0.0 - k[4596]*y_cur[IDX_HII]; - data[jistart + 11709] = 0.0 - k[356]*y_cur[IDX_HII] - - k[2312]*y_cur[IDX_HII]; - data[jistart + 11710] = 0.0 - k[358]*y_cur[IDX_HII]; - data[jistart + 11711] = 0.0 - k[372]*y_cur[IDX_HII]; - data[jistart + 11712] = 0.0 + k[6073]; - data[jistart + 11713] = 0.0 - k[4631]*y_cur[IDX_HII]; - data[jistart + 11714] = 0.0 - k[359]*y_cur[IDX_HII] - - k[2314]*y_cur[IDX_HII]; - data[jistart + 11715] = 0.0 + k[6077]; - data[jistart + 11716] = 0.0 - k[360]*y_cur[IDX_HII] - - k[2315]*y_cur[IDX_HII]; - data[jistart + 11717] = 0.0 - k[2316]*y_cur[IDX_HII]; - data[jistart + 11718] = 0.0 - k[361]*y_cur[IDX_HII]; - data[jistart + 11719] = 0.0 - k[2317]*y_cur[IDX_HII] - - k[2318]*y_cur[IDX_HII]; - data[jistart + 11720] = 0.0 - k[2319]*y_cur[IDX_HII]; - data[jistart + 11721] = 0.0 - k[362]*y_cur[IDX_HII]; - data[jistart + 11722] = 0.0 - k[2320]*y_cur[IDX_HII]; - data[jistart + 11723] = 0.0 - k[363]*y_cur[IDX_HII] - - k[2321]*y_cur[IDX_HII]; - data[jistart + 11724] = 0.0 - k[2322]*y_cur[IDX_HII]; - data[jistart + 11725] = 0.0 - k[364]*y_cur[IDX_HII] - - k[2323]*y_cur[IDX_HII]; - data[jistart + 11726] = 0.0 - k[2324]*y_cur[IDX_HII]; - data[jistart + 11727] = 0.0 - k[365]*y_cur[IDX_HII] - - k[2325]*y_cur[IDX_HII]; - data[jistart + 11728] = 0.0 - k[366]*y_cur[IDX_HII]; - data[jistart + 11729] = 0.0 - k[367]*y_cur[IDX_HII] - - k[2328]*y_cur[IDX_HII] - k[2329]*y_cur[IDX_HII]; - data[jistart + 11730] = 0.0 - k[368]*y_cur[IDX_HII]; - data[jistart + 11731] = 0.0 + k[5631]*y_cur[IDX_HeII]; - data[jistart + 11732] = 0.0 - k[369]*y_cur[IDX_HII]; - data[jistart + 11733] = 0.0 - k[370]*y_cur[IDX_HII] - - k[2330]*y_cur[IDX_HII] - k[2331]*y_cur[IDX_HII] - - k[2332]*y_cur[IDX_HII]; - data[jistart + 11734] = 0.0 - k[371]*y_cur[IDX_HII] - - k[2333]*y_cur[IDX_HII] + k[3201]*y_cur[IDX_HeII]; - data[jistart + 11735] = 0.0 + k[487]*y_cur[IDX_HI]; - data[jistart + 11736] = 0.0 - k[4666]*y_cur[IDX_HII]; - data[jistart + 11737] = 0.0 + k[488]*y_cur[IDX_HI]; - data[jistart + 11738] = 0.0 - k[2334]*y_cur[IDX_HII]; - data[jistart + 11739] = 0.0 - k[373]*y_cur[IDX_HII]; - data[jistart + 11740] = 0.0 - k[374]*y_cur[IDX_HII]; - data[jistart + 11741] = 0.0 - k[319]*y_cur[IDX_HII]; - data[jistart + 11742] = 0.0 + k[318]*y_cur[IDX_HI]; - data[jistart + 11743] = 0.0 - k[375]*y_cur[IDX_HII]; - data[jistart + 11744] = 0.0 - k[6308]*y_cur[IDX_HII]; - data[jistart + 11745] = 0.0 + k[318]*y_cur[IDX_ClII] + - k[487]*y_cur[IDX_CNII] + k[488]*y_cur[IDX_COII] + - k[489]*y_cur[IDX_H2II] + k[490]*y_cur[IDX_HCNII] + - k[491]*y_cur[IDX_HeII] + k[492]*y_cur[IDX_OII] - - k[5546]*y_cur[IDX_HII] + k[5682] + k[5844]; - data[jistart + 11746] = 0.0 - k[133]*y_cur[IDX_HNCI] + - k[133]*y_cur[IDX_HNCI] - k[319]*y_cur[IDX_ClI] - - k[320]*y_cur[IDX_C10I] - k[321]*y_cur[IDX_C10H2I] - - k[322]*y_cur[IDX_C10HI] - k[323]*y_cur[IDX_C2I] - - k[324]*y_cur[IDX_C2H2I] - k[325]*y_cur[IDX_C2H3I] - - k[326]*y_cur[IDX_C2H4I] - k[327]*y_cur[IDX_C2H5I] - - k[328]*y_cur[IDX_C2H5OHI] - k[329]*y_cur[IDX_C2HI] - - k[330]*y_cur[IDX_C2NI] - k[331]*y_cur[IDX_C2OI] - - k[332]*y_cur[IDX_C2SI] - k[333]*y_cur[IDX_C3I] - - k[334]*y_cur[IDX_C3H2I] - k[335]*y_cur[IDX_C3HI] - - k[336]*y_cur[IDX_C3OI] - k[337]*y_cur[IDX_C3SI] - - k[338]*y_cur[IDX_C4I] - k[339]*y_cur[IDX_C4H3I] - - k[340]*y_cur[IDX_C4HI] - k[341]*y_cur[IDX_C4PI] - - k[342]*y_cur[IDX_C4SI] - k[343]*y_cur[IDX_C5I] - - k[344]*y_cur[IDX_C5H2I] - k[345]*y_cur[IDX_C5HI] - - k[346]*y_cur[IDX_C6I] - k[347]*y_cur[IDX_C6H2I] - - k[348]*y_cur[IDX_C6HI] - k[349]*y_cur[IDX_C7I] - - k[350]*y_cur[IDX_C7H2I] - k[351]*y_cur[IDX_C7HI] - - k[352]*y_cur[IDX_C8I] - k[353]*y_cur[IDX_C8H2I] - - k[354]*y_cur[IDX_C8HI] - k[355]*y_cur[IDX_C9I] - - k[356]*y_cur[IDX_C9H2I] - k[357]*y_cur[IDX_C9HI] - - k[358]*y_cur[IDX_CCPI] - k[359]*y_cur[IDX_CH2I] - - k[360]*y_cur[IDX_CH2CCHI] - k[361]*y_cur[IDX_CH2CNI] - - k[362]*y_cur[IDX_CH3I] - k[363]*y_cur[IDX_CH3C4HI] - - k[364]*y_cur[IDX_CH3C6HI] - k[365]*y_cur[IDX_CH3CCHI] - - k[366]*y_cur[IDX_CH3CHOI] - k[367]*y_cur[IDX_CH3CNI] - - k[368]*y_cur[IDX_CH3COCH3I] - k[369]*y_cur[IDX_CH3OCH3I] - - k[370]*y_cur[IDX_CH3OHI] - k[371]*y_cur[IDX_CH4I] - - k[372]*y_cur[IDX_CHI] - k[373]*y_cur[IDX_CPI] - - k[374]*y_cur[IDX_CSI] - k[375]*y_cur[IDX_FeI] - - k[376]*y_cur[IDX_H2COI] - k[377]*y_cur[IDX_H2CSI] - - k[378]*y_cur[IDX_H2OI] - k[379]*y_cur[IDX_H2S2I] - - k[380]*y_cur[IDX_H2SI] - k[381]*y_cur[IDX_H2SiOI] - - k[382]*y_cur[IDX_HC2PI] - k[383]*y_cur[IDX_HC3NI] - - k[384]*y_cur[IDX_C4H2I] - k[385]*y_cur[IDX_HC5NI] - - k[386]*y_cur[IDX_HC7NI] - k[387]*y_cur[IDX_HC9NI] - - k[388]*y_cur[IDX_HCNI] - k[389]*y_cur[IDX_HCOI] - - k[390]*y_cur[IDX_HCOOCH3I] - k[391]*y_cur[IDX_HCPI] - - k[392]*y_cur[IDX_HCSiI] - k[393]*y_cur[IDX_HClI] - - k[394]*y_cur[IDX_HNSiI] - k[395]*y_cur[IDX_HPOI] - - k[396]*y_cur[IDX_HS2I] - k[397]*y_cur[IDX_HSI] - - k[398]*y_cur[IDX_MgI] - k[399]*y_cur[IDX_N2OI] - - k[400]*y_cur[IDX_NH2I] - k[401]*y_cur[IDX_NH3I] - - k[402]*y_cur[IDX_NHI] - k[403]*y_cur[IDX_NOI] - - k[404]*y_cur[IDX_NSI] - k[405]*y_cur[IDX_O2I] - k[406]*y_cur[IDX_OI] - - k[407]*y_cur[IDX_OCSI] - k[408]*y_cur[IDX_OHI] - - k[409]*y_cur[IDX_PI] - k[410]*y_cur[IDX_PH2I] - - k[411]*y_cur[IDX_PHI] - k[412]*y_cur[IDX_PNI] - - k[413]*y_cur[IDX_POI] - k[414]*y_cur[IDX_S2I] - k[415]*y_cur[IDX_SI] - - k[416]*y_cur[IDX_SO2I] - k[417]*y_cur[IDX_SOI] - - k[418]*y_cur[IDX_SiI] - k[419]*y_cur[IDX_SiC2I] - - k[420]*y_cur[IDX_SiC2H2I] - k[421]*y_cur[IDX_SiC2HI] - - k[422]*y_cur[IDX_SiC3I] - k[423]*y_cur[IDX_SiC3HI] - - k[424]*y_cur[IDX_SiC4I] - k[425]*y_cur[IDX_SiCI] - - k[426]*y_cur[IDX_SiCH2I] - k[427]*y_cur[IDX_SiCH3I] - - k[428]*y_cur[IDX_SiH2I] - k[429]*y_cur[IDX_SiH3I] - - k[430]*y_cur[IDX_SiH4I] - k[431]*y_cur[IDX_SiHI] - - k[432]*y_cur[IDX_SiNI] - k[433]*y_cur[IDX_SiNCI] - - k[434]*y_cur[IDX_SiOI] - k[435]*y_cur[IDX_SiSI] - - k[2293]*y_cur[IDX_C10I] - k[2294]*y_cur[IDX_C10H2I] - - k[2295]*y_cur[IDX_C2H3I] - k[2296]*y_cur[IDX_C2H4I] - - k[2297]*y_cur[IDX_C2H4I] - k[2298]*y_cur[IDX_C2H5I] - - k[2299]*y_cur[IDX_C2HI] - k[2300]*y_cur[IDX_C3H2I] - - k[2301]*y_cur[IDX_C3HI] - k[2302]*y_cur[IDX_C4H3I] - - k[2303]*y_cur[IDX_C4HI] - k[2304]*y_cur[IDX_C5H2I] - - k[2305]*y_cur[IDX_C5HI] - k[2306]*y_cur[IDX_C6H2I] - - k[2307]*y_cur[IDX_C6HI] - k[2308]*y_cur[IDX_C7H2I] - - k[2309]*y_cur[IDX_C7HI] - k[2310]*y_cur[IDX_C8H2I] - - k[2311]*y_cur[IDX_C8HI] - k[2312]*y_cur[IDX_C9H2I] - - k[2313]*y_cur[IDX_C9HI] - k[2314]*y_cur[IDX_CH2I] - - k[2315]*y_cur[IDX_CH2CCHI] - k[2316]*y_cur[IDX_CH2CHCNI] - - k[2317]*y_cur[IDX_CH2NHI] - k[2318]*y_cur[IDX_CH2NHI] - - k[2319]*y_cur[IDX_CH2PHI] - k[2320]*y_cur[IDX_CH3C3NI] - - k[2321]*y_cur[IDX_CH3C4HI] - k[2322]*y_cur[IDX_CH3C5NI] - - k[2323]*y_cur[IDX_CH3C6HI] - k[2324]*y_cur[IDX_CH3C7NI] - - k[2325]*y_cur[IDX_CH3CCHI] - k[2326]*y_cur[IDX_C2H6I] - - k[2327]*y_cur[IDX_C2H6I] - k[2328]*y_cur[IDX_CH3CNI] - - k[2329]*y_cur[IDX_CH3CNI] - k[2330]*y_cur[IDX_CH3OHI] - - k[2331]*y_cur[IDX_CH3OHI] - k[2332]*y_cur[IDX_CH3OHI] - - k[2333]*y_cur[IDX_CH4I] - k[2334]*y_cur[IDX_CO2I] - - k[2335]*y_cur[IDX_H2CCCI] - k[2336]*y_cur[IDX_H2CCCI] - - k[2337]*y_cur[IDX_H2COI] - k[2338]*y_cur[IDX_H2COI] - - k[2339]*y_cur[IDX_H2SI] - k[2340]*y_cur[IDX_H2SI] - - k[2341]*y_cur[IDX_H2SiOI] - k[2342]*y_cur[IDX_C4H2I] - - k[2343]*y_cur[IDX_HCNOI] - k[2344]*y_cur[IDX_HCOI] - - k[2345]*y_cur[IDX_HCOI] - k[2346]*y_cur[IDX_HCSI] - - k[2347]*y_cur[IDX_HCSiI] - k[2348]*y_cur[IDX_HNCOI] - - k[2349]*y_cur[IDX_HNOI] - k[2350]*y_cur[IDX_HNSiI] - - k[2351]*y_cur[IDX_HOCNI] - k[2352]*y_cur[IDX_HONCI] - - k[2353]*y_cur[IDX_HSI] - k[2354]*y_cur[IDX_N2OI] - - k[2355]*y_cur[IDX_NO2I] - k[2356]*y_cur[IDX_OCSI] - - k[2357]*y_cur[IDX_SiC2H2I] - k[2358]*y_cur[IDX_SiC2HI] - - k[2359]*y_cur[IDX_SiC3HI] - k[2360]*y_cur[IDX_SiCH2I] - - k[2361]*y_cur[IDX_SiCH3I] - k[2362]*y_cur[IDX_SiH2I] - - k[2363]*y_cur[IDX_SiH3I] - k[2364]*y_cur[IDX_SiH4I] - - k[2365]*y_cur[IDX_SiHI] - k[3021]*y_cur[IDX_HNC3I] - - k[3022]*y_cur[IDX_HNC3I] - k[3023]*y_cur[IDX_HNC3I] - - k[3024]*y_cur[IDX_HNC3I] + k[3024]*y_cur[IDX_HNC3I] - - k[3025]*y_cur[IDX_HNC3I] - k[3026]*y_cur[IDX_HNC3I] - - k[3896]*y_cur[IDX_CM] - k[3931]*y_cur[IDX_C10M] - - k[3966]*y_cur[IDX_C10HM] - k[4001]*y_cur[IDX_C2M] - - k[4036]*y_cur[IDX_C2HM] - k[4071]*y_cur[IDX_C3M] - - k[4106]*y_cur[IDX_C3HM] - k[4141]*y_cur[IDX_C3NM] - - k[4176]*y_cur[IDX_C4M] - k[4211]*y_cur[IDX_C4HM] - - k[4246]*y_cur[IDX_C5M] - k[4281]*y_cur[IDX_C5HM] - - k[4316]*y_cur[IDX_C5NM] - k[4351]*y_cur[IDX_C6M] - - k[4386]*y_cur[IDX_C6HM] - k[4421]*y_cur[IDX_C7M] - - k[4456]*y_cur[IDX_C7HM] - k[4491]*y_cur[IDX_C8M] - - k[4526]*y_cur[IDX_C8HM] - k[4561]*y_cur[IDX_C9M] - - k[4596]*y_cur[IDX_C9HM] - k[4631]*y_cur[IDX_CHM] - - k[4666]*y_cur[IDX_CNM] - k[4701]*y_cur[IDX_HM] - - k[4737]*y_cur[IDX_OM] - k[4772]*y_cur[IDX_O2M] - - k[4807]*y_cur[IDX_OHM] - k[4842]*y_cur[IDX_SM] - - k[5546]*y_cur[IDX_HI] - k[5547]*y_cur[IDX_HeI] - - k[5615]*y_cur[IDX_eM] - k[6308]*y_cur[IDX_GRAINM]; - data[jistart + 11747] = 0.0 - k[4701]*y_cur[IDX_HII]; - data[jistart + 11748] = 0.0 + k[2457]*y_cur[IDX_HeII] + k[5678] + - k[5679]; - data[jistart + 11749] = 0.0 + k[489]*y_cur[IDX_HI] + k[6148]; - data[jistart + 11750] = 0.0 - k[2335]*y_cur[IDX_HII] - - k[2336]*y_cur[IDX_HII]; - data[jistart + 11751] = 0.0 - k[376]*y_cur[IDX_HII] - - k[2337]*y_cur[IDX_HII] - k[2338]*y_cur[IDX_HII]; - data[jistart + 11752] = 0.0 - k[377]*y_cur[IDX_HII]; - data[jistart + 11753] = 0.0 - k[378]*y_cur[IDX_HII] + - k[3226]*y_cur[IDX_HeII]; - data[jistart + 11754] = 0.0 - k[380]*y_cur[IDX_HII] - - k[2339]*y_cur[IDX_HII] - k[2340]*y_cur[IDX_HII]; - data[jistart + 11755] = 0.0 - k[379]*y_cur[IDX_HII]; - data[jistart + 11756] = 0.0 - k[381]*y_cur[IDX_HII] - - k[2341]*y_cur[IDX_HII]; - data[jistart + 11757] = 0.0 + k[6169]; - data[jistart + 11758] = 0.0 - k[382]*y_cur[IDX_HII]; - data[jistart + 11759] = 0.0 - k[383]*y_cur[IDX_HII]; - data[jistart + 11760] = 0.0 - k[385]*y_cur[IDX_HII]; - data[jistart + 11761] = 0.0 - k[386]*y_cur[IDX_HII]; - data[jistart + 11762] = 0.0 - k[387]*y_cur[IDX_HII]; - data[jistart + 11763] = 0.0 - k[388]*y_cur[IDX_HII]; - data[jistart + 11764] = 0.0 + k[490]*y_cur[IDX_HI]; - data[jistart + 11765] = 0.0 - k[2343]*y_cur[IDX_HII]; - data[jistart + 11766] = 0.0 - k[389]*y_cur[IDX_HII] - - k[2344]*y_cur[IDX_HII] - k[2345]*y_cur[IDX_HII]; - data[jistart + 11767] = 0.0 - k[390]*y_cur[IDX_HII]; - data[jistart + 11768] = 0.0 - k[391]*y_cur[IDX_HII]; - data[jistart + 11769] = 0.0 - k[2346]*y_cur[IDX_HII] + - k[3256]*y_cur[IDX_HeII]; - data[jistart + 11770] = 0.0 - k[392]*y_cur[IDX_HII] - - k[2347]*y_cur[IDX_HII]; - data[jistart + 11771] = 0.0 - k[393]*y_cur[IDX_HII]; - data[jistart + 11772] = 0.0 - k[133]*y_cur[IDX_HII] + - k[133]*y_cur[IDX_HII]; - data[jistart + 11773] = 0.0 - k[3021]*y_cur[IDX_HII] - - k[3022]*y_cur[IDX_HII] - k[3023]*y_cur[IDX_HII] - - k[3024]*y_cur[IDX_HII] + k[3024]*y_cur[IDX_HII] - - k[3025]*y_cur[IDX_HII] - k[3026]*y_cur[IDX_HII]; - data[jistart + 11774] = 0.0 - k[2348]*y_cur[IDX_HII]; - data[jistart + 11775] = 0.0 - k[2349]*y_cur[IDX_HII] + - k[3266]*y_cur[IDX_HeII]; - data[jistart + 11776] = 0.0 - k[394]*y_cur[IDX_HII] - - k[2350]*y_cur[IDX_HII]; - data[jistart + 11777] = 0.0 - k[2351]*y_cur[IDX_HII]; - data[jistart + 11778] = 0.0 - k[2352]*y_cur[IDX_HII]; - data[jistart + 11779] = 0.0 - k[395]*y_cur[IDX_HII]; - data[jistart + 11780] = 0.0 - k[397]*y_cur[IDX_HII] - - k[2353]*y_cur[IDX_HII]; - data[jistart + 11781] = 0.0 + k[6206]; - data[jistart + 11782] = 0.0 - k[396]*y_cur[IDX_HII]; - data[jistart + 11783] = 0.0 - k[5547]*y_cur[IDX_HII]; - data[jistart + 11784] = 0.0 + k[491]*y_cur[IDX_HI] + - k[2457]*y_cur[IDX_H2I] + k[3201]*y_cur[IDX_CH4I] + - k[3226]*y_cur[IDX_H2OI] + k[3256]*y_cur[IDX_HCSI] + - k[3266]*y_cur[IDX_HNOI] + k[5631]*y_cur[IDX_CH3OI]; - data[jistart + 11785] = 0.0 - k[398]*y_cur[IDX_HII]; - data[jistart + 11786] = 0.0 - k[399]*y_cur[IDX_HII] - - k[2354]*y_cur[IDX_HII]; - data[jistart + 11787] = 0.0 - k[402]*y_cur[IDX_HII]; - data[jistart + 11788] = 0.0 + k[6217]; - data[jistart + 11789] = 0.0 - k[400]*y_cur[IDX_HII]; - data[jistart + 11790] = 0.0 - k[401]*y_cur[IDX_HII]; - data[jistart + 11791] = 0.0 - k[403]*y_cur[IDX_HII]; - data[jistart + 11792] = 0.0 - k[2355]*y_cur[IDX_HII]; - data[jistart + 11793] = 0.0 - k[404]*y_cur[IDX_HII]; - data[jistart + 11794] = 0.0 - k[406]*y_cur[IDX_HII]; - data[jistart + 11795] = 0.0 + k[492]*y_cur[IDX_HI]; - data[jistart + 11796] = 0.0 - k[4737]*y_cur[IDX_HII]; - data[jistart + 11797] = 0.0 - k[405]*y_cur[IDX_HII]; - data[jistart + 11798] = 0.0 - k[4772]*y_cur[IDX_HII]; - data[jistart + 11799] = 0.0 - k[407]*y_cur[IDX_HII] - - k[2356]*y_cur[IDX_HII]; - data[jistart + 11800] = 0.0 - k[408]*y_cur[IDX_HII]; - data[jistart + 11801] = 0.0 - k[4807]*y_cur[IDX_HII]; - data[jistart + 11802] = 0.0 - k[409]*y_cur[IDX_HII]; - data[jistart + 11803] = 0.0 - k[411]*y_cur[IDX_HII]; - data[jistart + 11804] = 0.0 - k[410]*y_cur[IDX_HII]; - data[jistart + 11805] = 0.0 - k[412]*y_cur[IDX_HII]; - data[jistart + 11806] = 0.0 - k[413]*y_cur[IDX_HII]; - data[jistart + 11807] = 0.0 - k[415]*y_cur[IDX_HII]; - data[jistart + 11808] = 0.0 - k[4842]*y_cur[IDX_HII]; - data[jistart + 11809] = 0.0 - k[414]*y_cur[IDX_HII]; - data[jistart + 11810] = 0.0 - k[417]*y_cur[IDX_HII]; - data[jistart + 11811] = 0.0 - k[416]*y_cur[IDX_HII]; - data[jistart + 11812] = 0.0 - k[418]*y_cur[IDX_HII]; - data[jistart + 11813] = 0.0 - k[425]*y_cur[IDX_HII]; - data[jistart + 11814] = 0.0 - k[419]*y_cur[IDX_HII]; - data[jistart + 11815] = 0.0 - k[421]*y_cur[IDX_HII] - - k[2358]*y_cur[IDX_HII]; - data[jistart + 11816] = 0.0 - k[420]*y_cur[IDX_HII] - - k[2357]*y_cur[IDX_HII]; - data[jistart + 11817] = 0.0 - k[422]*y_cur[IDX_HII]; - data[jistart + 11818] = 0.0 - k[423]*y_cur[IDX_HII] - - k[2359]*y_cur[IDX_HII]; - data[jistart + 11819] = 0.0 - k[424]*y_cur[IDX_HII]; - data[jistart + 11820] = 0.0 - k[426]*y_cur[IDX_HII] - - k[2360]*y_cur[IDX_HII]; - data[jistart + 11821] = 0.0 - k[427]*y_cur[IDX_HII] - - k[2361]*y_cur[IDX_HII]; - data[jistart + 11822] = 0.0 - k[431]*y_cur[IDX_HII] - - k[2365]*y_cur[IDX_HII]; - data[jistart + 11823] = 0.0 - k[428]*y_cur[IDX_HII] - - k[2362]*y_cur[IDX_HII]; - data[jistart + 11824] = 0.0 - k[429]*y_cur[IDX_HII] - - k[2363]*y_cur[IDX_HII]; - data[jistart + 11825] = 0.0 - k[430]*y_cur[IDX_HII] - - k[2364]*y_cur[IDX_HII]; - data[jistart + 11826] = 0.0 - k[432]*y_cur[IDX_HII]; - data[jistart + 11827] = 0.0 - k[433]*y_cur[IDX_HII]; - data[jistart + 11828] = 0.0 - k[434]*y_cur[IDX_HII]; - data[jistart + 11829] = 0.0 - k[435]*y_cur[IDX_HII]; - data[jistart + 11830] = 0.0 - k[5615]*y_cur[IDX_HII]; - data[jistart + 11831] = 0.0 - k[68]*y_cur[IDX_HM]; - data[jistart + 11832] = 0.0 - k[4691]*y_cur[IDX_HM]; - data[jistart + 11833] = 0.0 - k[66]*y_cur[IDX_HM]; - data[jistart + 11834] = 0.0 - k[67]*y_cur[IDX_HM]; - data[jistart + 11835] = 0.0 - k[2366]*y_cur[IDX_HM]; - data[jistart + 11836] = 0.0 - k[4692]*y_cur[IDX_HM]; - data[jistart + 11837] = 0.0 - k[4693]*y_cur[IDX_HM]; - data[jistart + 11838] = 0.0 - k[4694]*y_cur[IDX_HM]; - data[jistart + 11839] = 0.0 - k[4695]*y_cur[IDX_HM]; - data[jistart + 11840] = 0.0 - k[4696]*y_cur[IDX_HM]; - data[jistart + 11841] = 0.0 - k[71]*y_cur[IDX_HM]; - data[jistart + 11842] = 0.0 - k[69]*y_cur[IDX_HM]; - data[jistart + 11843] = 0.0 - k[4697]*y_cur[IDX_HM]; - data[jistart + 11844] = 0.0 - k[70]*y_cur[IDX_HM]; - data[jistart + 11845] = 0.0 - k[4698]*y_cur[IDX_HM]; - data[jistart + 11846] = 0.0 - k[72]*y_cur[IDX_HM]; - data[jistart + 11847] = 0.0 - k[4699]*y_cur[IDX_HM]; - data[jistart + 11848] = 0.0 - k[73]*y_cur[IDX_HM]; - data[jistart + 11849] = 0.0 - k[4700]*y_cur[IDX_HM]; - data[jistart + 11850] = 0.0 - k[74]*y_cur[IDX_HM] - - k[75]*y_cur[IDX_HM] + k[5608]*y_cur[IDX_eM]; - data[jistart + 11851] = 0.0 - k[4701]*y_cur[IDX_HM]; - data[jistart + 11852] = 0.0 - k[66]*y_cur[IDX_C2I] - - k[67]*y_cur[IDX_C2HI] - k[68]*y_cur[IDX_CI] - k[69]*y_cur[IDX_CH2I] - - k[70]*y_cur[IDX_CH3I] - k[71]*y_cur[IDX_CHI] - - k[72]*y_cur[IDX_CNI] - k[73]*y_cur[IDX_COI] - k[74]*y_cur[IDX_HI] - - k[75]*y_cur[IDX_HI] - k[76]*y_cur[IDX_HCOI] - k[77]*y_cur[IDX_NI] - - k[78]*y_cur[IDX_NH2I] - k[79]*y_cur[IDX_NHI] - k[80]*y_cur[IDX_OI] - - k[81]*y_cur[IDX_OHI] - k[2366]*y_cur[IDX_C2H2I] - - k[2367]*y_cur[IDX_H2OI] - k[2368]*y_cur[IDX_HCNI] - - k[4691]*y_cur[IDX_CII] - k[4692]*y_cur[IDX_C2H2II] - - k[4693]*y_cur[IDX_C2H3II] - k[4694]*y_cur[IDX_C4H2II] - - k[4695]*y_cur[IDX_C4H3II] - k[4696]*y_cur[IDX_C4SII] - - k[4697]*y_cur[IDX_CH2CCHII] - k[4698]*y_cur[IDX_CH3II] - - k[4699]*y_cur[IDX_CNCII] - k[4700]*y_cur[IDX_FeII] - - k[4701]*y_cur[IDX_HII] - k[4702]*y_cur[IDX_H2II] - - k[4703]*y_cur[IDX_H2COII] - k[4704]*y_cur[IDX_H2SII] - - k[4705]*y_cur[IDX_H3II] - k[4706]*y_cur[IDX_H3OII] - - k[4707]*y_cur[IDX_HC2SII] - k[4708]*y_cur[IDX_HCNHII] - - k[4709]*y_cur[IDX_HCNHII] - k[4710]*y_cur[IDX_HCOII] - - k[4711]*y_cur[IDX_HCOII] - k[4712]*y_cur[IDX_HeII] - - k[4713]*y_cur[IDX_MgII] - k[4714]*y_cur[IDX_NII] - - k[4715]*y_cur[IDX_N2HII] - k[4716]*y_cur[IDX_NH3II] - - k[4717]*y_cur[IDX_NH4II] - k[4718]*y_cur[IDX_NOII] - - k[4719]*y_cur[IDX_NaII] - k[4720]*y_cur[IDX_OII] - - k[4721]*y_cur[IDX_SII] - k[4722]*y_cur[IDX_SOII] - - k[4723]*y_cur[IDX_SiII] - k[4724]*y_cur[IDX_SiOII] - - k[4725]*y_cur[IDX_SiOHII] - k[4726]*y_cur[IDX_SiSII] - k[5833] - - k[6146]; - data[jistart + 11853] = 0.0 + k[5678]; - data[jistart + 11854] = 0.0 - k[4702]*y_cur[IDX_HM]; - data[jistart + 11855] = 0.0 - k[4703]*y_cur[IDX_HM]; - data[jistart + 11856] = 0.0 - k[2367]*y_cur[IDX_HM]; - data[jistart + 11857] = 0.0 - k[4704]*y_cur[IDX_HM]; - data[jistart + 11858] = 0.0 - k[4705]*y_cur[IDX_HM]; - data[jistart + 11859] = 0.0 - k[4706]*y_cur[IDX_HM]; - data[jistart + 11860] = 0.0 - k[4707]*y_cur[IDX_HM]; - data[jistart + 11861] = 0.0 - k[2368]*y_cur[IDX_HM]; - data[jistart + 11862] = 0.0 - k[4708]*y_cur[IDX_HM] - - k[4709]*y_cur[IDX_HM]; - data[jistart + 11863] = 0.0 - k[76]*y_cur[IDX_HM]; - data[jistart + 11864] = 0.0 - k[4710]*y_cur[IDX_HM] - - k[4711]*y_cur[IDX_HM]; - data[jistart + 11865] = 0.0 - k[4712]*y_cur[IDX_HM]; - data[jistart + 11866] = 0.0 - k[4713]*y_cur[IDX_HM]; - data[jistart + 11867] = 0.0 - k[77]*y_cur[IDX_HM]; - data[jistart + 11868] = 0.0 - k[4714]*y_cur[IDX_HM]; - data[jistart + 11869] = 0.0 - k[4715]*y_cur[IDX_HM]; - data[jistart + 11870] = 0.0 - k[79]*y_cur[IDX_HM]; - data[jistart + 11871] = 0.0 - k[78]*y_cur[IDX_HM]; - data[jistart + 11872] = 0.0 - k[4716]*y_cur[IDX_HM]; - data[jistart + 11873] = 0.0 - k[4717]*y_cur[IDX_HM]; - data[jistart + 11874] = 0.0 - k[4718]*y_cur[IDX_HM]; - data[jistart + 11875] = 0.0 - k[4719]*y_cur[IDX_HM]; - data[jistart + 11876] = 0.0 - k[80]*y_cur[IDX_HM]; - data[jistart + 11877] = 0.0 - k[4720]*y_cur[IDX_HM]; - data[jistart + 11878] = 0.0 - k[81]*y_cur[IDX_HM]; - data[jistart + 11879] = 0.0 - k[4721]*y_cur[IDX_HM]; - data[jistart + 11880] = 0.0 - k[4722]*y_cur[IDX_HM]; - data[jistart + 11881] = 0.0 - k[4723]*y_cur[IDX_HM]; - data[jistart + 11882] = 0.0 - k[4724]*y_cur[IDX_HM]; - data[jistart + 11883] = 0.0 - k[4725]*y_cur[IDX_HM]; - data[jistart + 11884] = 0.0 - k[4726]*y_cur[IDX_HM]; - data[jistart + 11885] = 0.0 + k[5608]*y_cur[IDX_HI]; - data[jistart + 11886] = 0.0 + k[1848]*y_cur[IDX_C10H2II] + - k[1851]*y_cur[IDX_C2H3II] + k[1853]*y_cur[IDX_C2H4II] + - k[1855]*y_cur[IDX_C3H2II] + k[1857]*y_cur[IDX_C3H3II] + - k[1859]*y_cur[IDX_C3H4II] + k[1861]*y_cur[IDX_C3H5II] + - k[1863]*y_cur[IDX_C4H2II] + k[1865]*y_cur[IDX_C4H3II] + - k[1868]*y_cur[IDX_C5H2II] + k[1870]*y_cur[IDX_C5H3II] + - k[1872]*y_cur[IDX_C6H2II] + k[1874]*y_cur[IDX_C6H3II] + - k[1877]*y_cur[IDX_C7H2II] + k[1879]*y_cur[IDX_C7H3II] + - k[1881]*y_cur[IDX_C8H2II] + k[1883]*y_cur[IDX_C8H3II] + - k[1886]*y_cur[IDX_C9H2II] + k[1888]*y_cur[IDX_C9H3II] + - k[1892]*y_cur[IDX_CH2CCHII] + k[1894]*y_cur[IDX_CH3II] + - k[1901]*y_cur[IDX_H3OII] + k[1911]*y_cur[IDX_NH4II] + - k[1921]*y_cur[IDX_SiCH2II] + k[1928]*y_cur[IDX_SiH4II] + - k[1930]*y_cur[IDX_SiNH2II] + k[2632]*y_cur[IDX_H3II] + - k[4911]*y_cur[IDX_C2H2I] + k[4950]*y_cur[IDX_CH3C4HI] + - k[4951]*y_cur[IDX_CH3C6HI] + k[4953]*y_cur[IDX_CH3CCHI] + - k[4954]*y_cur[IDX_CH3CHCH2I] + k[4960]*y_cur[IDX_H2CNI] - - k[5134]*y_cur[IDX_H2I] - k[5554]*y_cur[IDX_H2I]; - data[jistart + 11887] = 0.0 + k[1297]*y_cur[IDX_C10H2I] + - k[1303]*y_cur[IDX_C2H4I] + k[1304]*y_cur[IDX_C2H4I] + - k[1306]*y_cur[IDX_C2H5I] + k[1310]*y_cur[IDX_C3H2I] + - k[1318]*y_cur[IDX_C4H3I] + k[1323]*y_cur[IDX_C5H2I] + - k[1326]*y_cur[IDX_C6H2I] + k[1332]*y_cur[IDX_C7H2I] + - k[1335]*y_cur[IDX_C8H2I] + k[1338]*y_cur[IDX_C9H2I] + - k[1345]*y_cur[IDX_CH2CCH2I] + k[1346]*y_cur[IDX_CH2CCHI] + - k[1351]*y_cur[IDX_CH2PHI] + k[1352]*y_cur[IDX_CH3I] + - k[1357]*y_cur[IDX_CH3C4HI] + k[1361]*y_cur[IDX_CH3C6HI] + - k[1365]*y_cur[IDX_CH3CCHI] + k[1371]*y_cur[IDX_C2H6I] + - k[1371]*y_cur[IDX_C2H6I] + k[1372]*y_cur[IDX_C2H6I] + - k[1377]*y_cur[IDX_CH3CHCH2I] + k[1383]*y_cur[IDX_CH4I] + - k[1388]*y_cur[IDX_H2CCCI] + k[1419]*y_cur[IDX_NH3I] + - k[1435]*y_cur[IDX_SiCH2I] + k[1437]*y_cur[IDX_SiCH3I] + - k[1440]*y_cur[IDX_SiH2I] + k[1441]*y_cur[IDX_SiH3I] + - k[1443]*y_cur[IDX_SiH4I] - k[2398]*y_cur[IDX_H2I] - - k[5548]*y_cur[IDX_H2I]; - data[jistart + 11888] = 0.0 - k[82]*y_cur[IDX_H2I] + - k[3899]*y_cur[IDX_H3II]; - data[jistart + 11889] = 0.0 + k[2583]*y_cur[IDX_H3II]; - data[jistart + 11890] = 0.0 - k[2399]*y_cur[IDX_H2I]; - data[jistart + 11891] = 0.0 + k[3934]*y_cur[IDX_H3II]; - data[jistart + 11892] = 0.0 + k[2585]*y_cur[IDX_H3II]; - data[jistart + 11893] = 0.0 - k[2400]*y_cur[IDX_H2I]; - data[jistart + 11894] = 0.0 + k[3969]*y_cur[IDX_H3II]; - data[jistart + 11895] = 0.0 + k[1297]*y_cur[IDX_CII] + - k[2294]*y_cur[IDX_HII] + k[2584]*y_cur[IDX_H3II]; - data[jistart + 11896] = 0.0 + k[1848]*y_cur[IDX_CI]; - data[jistart + 11897] = 0.0 + k[436]*y_cur[IDX_H2II] + - k[2041]*y_cur[IDX_CH3II] + k[2586]*y_cur[IDX_H3II]; - data[jistart + 11898] = 0.0 + k[2148]*y_cur[IDX_CH4I] + - k[2149]*y_cur[IDX_CH4I] - k[2401]*y_cur[IDX_H2I]; - data[jistart + 11899] = 0.0 + k[4004]*y_cur[IDX_H3II]; - data[jistart + 11900] = 0.0 + k[439]*y_cur[IDX_H2II] + - k[1727]*y_cur[IDX_C2H3II] + k[1729]*y_cur[IDX_C2H4II] + - k[1732]*y_cur[IDX_C3H3II] + k[1734]*y_cur[IDX_C4HII] + - k[1741]*y_cur[IDX_CH2CCHII] + k[1935]*y_cur[IDX_CHII] + - k[2048]*y_cur[IDX_CH3II] + k[2299]*y_cur[IDX_HII] + - k[2597]*y_cur[IDX_H3II] - k[5133]*y_cur[IDX_H2I]; - data[jistart + 11901] = 0.0 + k[2153]*y_cur[IDX_CH4I] - - k[2402]*y_cur[IDX_H2I] + k[3555]*y_cur[IDX_NH3I]; - data[jistart + 11902] = 0.0 + k[4039]*y_cur[IDX_H3II]; - data[jistart + 11903] = 0.0 + k[437]*y_cur[IDX_H2II] + - k[1479]*y_cur[IDX_C2H2II] + k[1535]*y_cur[IDX_C2H3II] + - k[1539]*y_cur[IDX_C2H5II] + k[1546]*y_cur[IDX_C3H3II] + - k[1548]*y_cur[IDX_C3H5II] + k[1553]*y_cur[IDX_C4H4II] + - k[1560]*y_cur[IDX_C7H2II] + k[1571]*y_cur[IDX_PH2II] + - k[1572]*y_cur[IDX_PH3II] + k[1576]*y_cur[IDX_SiC2HII] + - k[2042]*y_cur[IDX_CH3II] + k[2134]*y_cur[IDX_CH4II] + - k[2366]*y_cur[IDX_HM] + k[2587]*y_cur[IDX_H3II] + - k[3074]*y_cur[IDX_HeII] + k[4879]*y_cur[IDX_SiI] + - k[4911]*y_cur[IDX_CI] + k[5154]*y_cur[IDX_HI]; - data[jistart + 11904] = 0.0 + k[1479]*y_cur[IDX_C2H2I] + - k[1481]*y_cur[IDX_C2H3I] + k[1485]*y_cur[IDX_C3H2I] + - k[1487]*y_cur[IDX_C3HI] + k[1489]*y_cur[IDX_C4HI] + - k[1491]*y_cur[IDX_C5H2I] + k[1493]*y_cur[IDX_C5HI] + - k[1495]*y_cur[IDX_C6H2I] + k[1497]*y_cur[IDX_C6HI] + - k[1499]*y_cur[IDX_C7H2I] + k[1501]*y_cur[IDX_C7HI] + - k[1503]*y_cur[IDX_C8H2I] + k[1505]*y_cur[IDX_C8HI] + - k[1507]*y_cur[IDX_CH2CCHI] + k[1510]*y_cur[IDX_CH3CCHI] + - k[1516]*y_cur[IDX_H2CCCI] + k[1520]*y_cur[IDX_C4H2I] + - k[1527]*y_cur[IDX_SI] + k[1529]*y_cur[IDX_SiI] + - k[1531]*y_cur[IDX_SiH4I] + k[2154]*y_cur[IDX_CH4I] - - k[2403]*y_cur[IDX_H2I] + k[3387]*y_cur[IDX_NI] - - k[5549]*y_cur[IDX_H2I]; - data[jistart + 11905] = 0.0 + k[1481]*y_cur[IDX_C2H2II] + - k[1629]*y_cur[IDX_C3H2II] + k[1631]*y_cur[IDX_C3H3II] + - k[1633]*y_cur[IDX_C4H2II] + k[1635]*y_cur[IDX_C4H3II] + - k[1637]*y_cur[IDX_C5H2II] + k[1639]*y_cur[IDX_C6H2II] + - k[1641]*y_cur[IDX_C7H2II] + k[1643]*y_cur[IDX_CH2CCHII] + - k[1645]*y_cur[IDX_SII] + k[2043]*y_cur[IDX_CH3II] + - k[2044]*y_cur[IDX_CH3II] + k[2295]*y_cur[IDX_HII] + - k[2588]*y_cur[IDX_H3II] + k[3077]*y_cur[IDX_HeII] + - k[5155]*y_cur[IDX_HI]; - data[jistart + 11906] = 0.0 + k[745]*y_cur[IDX_eM] + - k[746]*y_cur[IDX_eM] + k[749]*y_cur[IDX_eM] + k[750]*y_cur[IDX_eM] + - k[1535]*y_cur[IDX_C2H2I] + k[1581]*y_cur[IDX_C3H2I] + - k[1584]*y_cur[IDX_C3HI] + k[1587]*y_cur[IDX_C4HI] + - k[1590]*y_cur[IDX_C5H2I] + k[1593]*y_cur[IDX_C5HI] + - k[1596]*y_cur[IDX_C6H2I] + k[1600]*y_cur[IDX_C6HI] + - k[1603]*y_cur[IDX_C7H2I] + k[1606]*y_cur[IDX_C7HI] + - k[1610]*y_cur[IDX_CH2CCHI] + k[1612]*y_cur[IDX_CH3CCHI] + - k[1615]*y_cur[IDX_C2H6I] + k[1616]*y_cur[IDX_H2CCCI] + - k[1622]*y_cur[IDX_C4H2I] + k[1625]*y_cur[IDX_SI] + - k[1626]*y_cur[IDX_SiI] + k[1727]*y_cur[IDX_C2HI] + - k[1851]*y_cur[IDX_CI] + k[2156]*y_cur[IDX_CH4I] + - k[2827]*y_cur[IDX_HI] + k[3390]*y_cur[IDX_NI] + - k[3690]*y_cur[IDX_OI] + k[6360]*y_cur[IDX_GRAINM] + - k[6361]*y_cur[IDX_GRAINM] + k[6364]*y_cur[IDX_GRAINM] + - k[6365]*y_cur[IDX_GRAINM]; - data[jistart + 11907] = 0.0 + k[438]*y_cur[IDX_H2II] + - k[1303]*y_cur[IDX_CII] + k[1304]*y_cur[IDX_CII] + - k[1687]*y_cur[IDX_C3II] + k[1689]*y_cur[IDX_C3HII] + - k[1693]*y_cur[IDX_C3H3II] + k[1696]*y_cur[IDX_C4H2II] + - k[1699]*y_cur[IDX_C5II] + k[1701]*y_cur[IDX_C5H2II] + - k[1703]*y_cur[IDX_C6H2II] + k[1705]*y_cur[IDX_C7H2II] + - k[1706]*y_cur[IDX_CH2CCHII] + k[1710]*y_cur[IDX_PII] + - k[1711]*y_cur[IDX_PHII] + k[1713]*y_cur[IDX_PH2II] + - k[2046]*y_cur[IDX_CH3II] + k[2047]*y_cur[IDX_CH3II] + - k[2047]*y_cur[IDX_CH3II] + k[2296]*y_cur[IDX_HII] + - k[2297]*y_cur[IDX_HII] + k[2371]*y_cur[IDX_H2II] + - k[2371]*y_cur[IDX_H2II] + k[2372]*y_cur[IDX_H2II] + - k[2589]*y_cur[IDX_H3II] + k[2589]*y_cur[IDX_H3II] + - k[2590]*y_cur[IDX_H3II] + k[3079]*y_cur[IDX_HeII] + - k[3080]*y_cur[IDX_HeII] + k[4884]*y_cur[IDX_C4HI] + - k[4885]*y_cur[IDX_SiI] + k[5347]*y_cur[IDX_OI] + k[5700] + k[5985]; - data[jistart + 11908] = 0.0 + k[757]*y_cur[IDX_eM] + - k[760]*y_cur[IDX_eM] + k[1660]*y_cur[IDX_C6H2I] + - k[1664]*y_cur[IDX_C7H2I] + k[1668]*y_cur[IDX_CH2CCHI] + - k[1678]*y_cur[IDX_C4H2I] + k[1679]*y_cur[IDX_SI] + - k[1680]*y_cur[IDX_SiI] + k[1729]*y_cur[IDX_C2HI] + - k[1853]*y_cur[IDX_CI] + k[2828]*y_cur[IDX_HI] + - k[6381]*y_cur[IDX_GRAINM] + k[6384]*y_cur[IDX_GRAINM]; - data[jistart + 11909] = 0.0 + k[327]*y_cur[IDX_HII] + - k[1306]*y_cur[IDX_CII] + k[2298]*y_cur[IDX_HII] + - k[2591]*y_cur[IDX_H3II] + k[3083]*y_cur[IDX_HeII] + k[5702] + - k[5987]; - data[jistart + 11910] = 0.0 + k[764]*y_cur[IDX_eM] + - k[1539]*y_cur[IDX_C2H2I] + k[2829]*y_cur[IDX_HI] + - k[6391]*y_cur[IDX_GRAINM]; - data[jistart + 11911] = 0.0 + k[2592]*y_cur[IDX_H3II] + - k[2592]*y_cur[IDX_H3II] + k[2593]*y_cur[IDX_H3II] + - k[2595]*y_cur[IDX_H3II] + k[2595]*y_cur[IDX_H3II] + - k[2596]*y_cur[IDX_H3II]; - data[jistart + 11912] = 0.0 + k[441]*y_cur[IDX_H2II] + - k[1371]*y_cur[IDX_CII] + k[1371]*y_cur[IDX_CII] + - k[1372]*y_cur[IDX_CII] + k[1615]*y_cur[IDX_C2H3II] + - k[2063]*y_cur[IDX_CH3II] + k[2063]*y_cur[IDX_CH3II] + - k[2064]*y_cur[IDX_CH3II] + k[2326]*y_cur[IDX_HII] + - k[2326]*y_cur[IDX_HII] + k[2327]*y_cur[IDX_HII] + - k[2376]*y_cur[IDX_H2II] + k[2376]*y_cur[IDX_H2II] + - k[2377]*y_cur[IDX_H2II] + k[2505]*y_cur[IDX_H2OII] + - k[2648]*y_cur[IDX_H3II] + k[2648]*y_cur[IDX_H3II] + - k[3188]*y_cur[IDX_HeII] + k[3188]*y_cur[IDX_HeII] + - k[3189]*y_cur[IDX_HeII] + k[3190]*y_cur[IDX_HeII] + - k[3771]*y_cur[IDX_OHII] + k[3773]*y_cur[IDX_OHII] + k[5803] + - k[6108]; - data[jistart + 11913] = 0.0 + k[935]*y_cur[IDX_eM] + - k[2838]*y_cur[IDX_HI] + k[6410]*y_cur[IDX_GRAINM]; - data[jistart + 11914] = 0.0 + k[778]*y_cur[IDX_eM] + - k[6419]*y_cur[IDX_GRAINM]; - data[jistart + 11915] = 0.0 + k[2598]*y_cur[IDX_H3II]; - data[jistart + 11916] = 0.0 - k[2404]*y_cur[IDX_H2I]; - data[jistart + 11917] = 0.0 + k[2599]*y_cur[IDX_H3II]; - data[jistart + 11918] = 0.0 + k[2600]*y_cur[IDX_H3II]; - data[jistart + 11919] = 0.0 - k[2405]*y_cur[IDX_H2I]; - data[jistart + 11920] = 0.0 + k[2601]*y_cur[IDX_H3II]; - data[jistart + 11921] = 0.0 + k[1687]*y_cur[IDX_C2H4I] + - k[2158]*y_cur[IDX_CH4I] - k[2406]*y_cur[IDX_H2I]; - data[jistart + 11922] = 0.0 + k[4074]*y_cur[IDX_H3II]; - data[jistart + 11923] = 0.0 + k[1487]*y_cur[IDX_C2H2II] + - k[1584]*y_cur[IDX_C2H3II] + k[1820]*y_cur[IDX_C3H3II] + - k[1822]*y_cur[IDX_C4HII] + k[1828]*y_cur[IDX_CH2CCHII] + - k[2051]*y_cur[IDX_CH3II] + k[2301]*y_cur[IDX_HII] + - k[2603]*y_cur[IDX_H3II]; - data[jistart + 11924] = 0.0 + k[1689]*y_cur[IDX_C2H4I] + - k[2161]*y_cur[IDX_CH4I] - k[2407]*y_cur[IDX_H2I] + - k[2529]*y_cur[IDX_H2OI] + k[2577]*y_cur[IDX_H2SI] - - k[5550]*y_cur[IDX_H2I] - k[5551]*y_cur[IDX_H2I]; - data[jistart + 11925] = 0.0 + k[4109]*y_cur[IDX_H3II]; - data[jistart + 11926] = 0.0 + k[1310]*y_cur[IDX_CII] + - k[1485]*y_cur[IDX_C2H2II] + k[1581]*y_cur[IDX_C2H3II] + - k[1759]*y_cur[IDX_C3H2II] + k[1786]*y_cur[IDX_C3H3II] + - k[1790]*y_cur[IDX_C5H2II] + k[1792]*y_cur[IDX_C6H2II] + - k[1794]*y_cur[IDX_CH2CCHII] + k[2050]*y_cur[IDX_CH3II] + - k[2300]*y_cur[IDX_HII] + k[2602]*y_cur[IDX_H3II]; - data[jistart + 11927] = 0.0 + k[793]*y_cur[IDX_eM] + - k[1629]*y_cur[IDX_C2H3I] + k[1759]*y_cur[IDX_C3H2I] + - k[1761]*y_cur[IDX_C4HI] + k[1763]*y_cur[IDX_C5H2I] + - k[1765]*y_cur[IDX_C5HI] + k[1767]*y_cur[IDX_C6H2I] + - k[1769]*y_cur[IDX_C6HI] + k[1782]*y_cur[IDX_H2CCCI] + - k[1784]*y_cur[IDX_C4H2I] + k[1855]*y_cur[IDX_CI] - - k[2408]*y_cur[IDX_H2I] + k[2831]*y_cur[IDX_HI] + - k[3873]*y_cur[IDX_SiI] + k[6463]*y_cur[IDX_GRAINM]; - data[jistart + 11928] = 0.0 + k[1546]*y_cur[IDX_C2H2I] + - k[1631]*y_cur[IDX_C2H3I] + k[1693]*y_cur[IDX_C2H4I] + - k[1732]*y_cur[IDX_C2HI] + k[1786]*y_cur[IDX_C3H2I] + - k[1796]*y_cur[IDX_C4HI] + k[1798]*y_cur[IDX_C5H2I] + - k[1800]*y_cur[IDX_C5HI] + k[1802]*y_cur[IDX_C6H2I] + - k[1803]*y_cur[IDX_C6HI] + k[1805]*y_cur[IDX_CH2CCHI] + - k[1820]*y_cur[IDX_C3HI] + k[1857]*y_cur[IDX_CI] + - k[2476]*y_cur[IDX_H2CCCI] + k[3835]*y_cur[IDX_SI] + - k[3875]*y_cur[IDX_SiI]; - data[jistart + 11929] = 0.0 + k[1809]*y_cur[IDX_CH2CCH2I] + - k[1812]*y_cur[IDX_CH3CCHI] + k[1859]*y_cur[IDX_CI] + - k[2832]*y_cur[IDX_HI] + k[3399]*y_cur[IDX_NI]; - data[jistart + 11930] = 0.0 + k[803]*y_cur[IDX_eM] + - k[1548]*y_cur[IDX_C2H2I] + k[1861]*y_cur[IDX_CI] + - k[2104]*y_cur[IDX_CH3CCHI] + k[3401]*y_cur[IDX_NI] - - k[5516]*y_cur[IDX_H2I] + k[6482]*y_cur[IDX_GRAINM]; - data[jistart + 11931] = 0.0 + k[805]*y_cur[IDX_eM] + - k[806]*y_cur[IDX_eM] + k[6499]*y_cur[IDX_GRAINM] + - k[6500]*y_cur[IDX_GRAINM]; - data[jistart + 11932] = 0.0 + k[807]*y_cur[IDX_eM] + - k[810]*y_cur[IDX_eM] + k[811]*y_cur[IDX_eM] + k[2833]*y_cur[IDX_HI] - + k[6504]*y_cur[IDX_GRAINM] + k[6507]*y_cur[IDX_GRAINM] + - k[6508]*y_cur[IDX_GRAINM]; - data[jistart + 11933] = 0.0 + k[2604]*y_cur[IDX_H3II]; - data[jistart + 11934] = 0.0 - k[2409]*y_cur[IDX_H2I]; - data[jistart + 11935] = 0.0 + k[4144]*y_cur[IDX_H3II]; - data[jistart + 11936] = 0.0 + k[2605]*y_cur[IDX_H3II]; - data[jistart + 11937] = 0.0 - k[2410]*y_cur[IDX_H2I]; - data[jistart + 11938] = 0.0 + k[2606]*y_cur[IDX_H3II]; - data[jistart + 11939] = 0.0 + k[2607]*y_cur[IDX_H3II]; - data[jistart + 11940] = 0.0 + k[2608]*y_cur[IDX_H3II]; - data[jistart + 11941] = 0.0 + k[2166]*y_cur[IDX_CH4I] - - k[2411]*y_cur[IDX_H2I]; - data[jistart + 11942] = 0.0 + k[4179]*y_cur[IDX_H3II]; - data[jistart + 11943] = 0.0 + k[1489]*y_cur[IDX_C2H2II] + - k[1587]*y_cur[IDX_C2H3II] + k[1761]*y_cur[IDX_C3H2II] + - k[1796]*y_cur[IDX_C3H3II] + k[2020]*y_cur[IDX_CH2CCHII] + - k[2052]*y_cur[IDX_CH3II] + k[2303]*y_cur[IDX_HII] + - k[2610]*y_cur[IDX_H3II] + k[4884]*y_cur[IDX_C2H4I] + - k[5053]*y_cur[IDX_CH3CHCH2I] + k[5054]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 11944] = 0.0 + k[1734]*y_cur[IDX_C2HI] + - k[1822]*y_cur[IDX_C3HI] + k[2168]*y_cur[IDX_CH4I] - - k[2412]*y_cur[IDX_H2I]; - data[jistart + 11945] = 0.0 + k[4214]*y_cur[IDX_H3II]; - data[jistart + 11946] = 0.0 + k[1520]*y_cur[IDX_C2H2II] + - k[1622]*y_cur[IDX_C2H3II] + k[1678]*y_cur[IDX_C2H4II] + - k[1784]*y_cur[IDX_C3H2II] + k[2080]*y_cur[IDX_CH3II] + - k[2342]*y_cur[IDX_HII] + k[2690]*y_cur[IDX_H3II] + - k[3239]*y_cur[IDX_HeII]; - data[jistart + 11947] = 0.0 + k[1633]*y_cur[IDX_C2H3I] + - k[1696]*y_cur[IDX_C2H4I] + k[1863]*y_cur[IDX_CI] + - k[2033]*y_cur[IDX_CH2CCHI] + k[2170]*y_cur[IDX_CH4I] + - k[3877]*y_cur[IDX_SiI]; - data[jistart + 11948] = 0.0 + k[1318]*y_cur[IDX_CII] + - k[2302]*y_cur[IDX_HII] + k[2609]*y_cur[IDX_H3II] + k[6014]; - data[jistart + 11949] = 0.0 + k[824]*y_cur[IDX_eM] + - k[1635]*y_cur[IDX_C2H3I] + k[1839]*y_cur[IDX_C5H2I] + - k[1865]*y_cur[IDX_CI] + k[2035]*y_cur[IDX_CH2CCHI] + - k[2108]*y_cur[IDX_CH3CCHI] + k[2171]*y_cur[IDX_CH4I] + - k[3837]*y_cur[IDX_SI] + k[6633]*y_cur[IDX_GRAINM]; - data[jistart + 11950] = 0.0 + k[1553]*y_cur[IDX_C2H2I]; - data[jistart + 11951] = 0.0 + k[827]*y_cur[IDX_eM] + - k[827]*y_cur[IDX_eM] + k[829]*y_cur[IDX_eM] + - k[6645]*y_cur[IDX_GRAINM] + k[6645]*y_cur[IDX_GRAINM] + - k[6647]*y_cur[IDX_GRAINM]; - data[jistart + 11952] = 0.0 + k[830]*y_cur[IDX_eM] + - k[830]*y_cur[IDX_eM] + k[6667]*y_cur[IDX_GRAINM] + - k[6667]*y_cur[IDX_GRAINM]; - data[jistart + 11953] = 0.0 + k[2175]*y_cur[IDX_CH4I] - - k[2413]*y_cur[IDX_H2I]; - data[jistart + 11954] = 0.0 + k[2611]*y_cur[IDX_H3II]; - data[jistart + 11955] = 0.0 + k[2612]*y_cur[IDX_H3II]; - data[jistart + 11956] = 0.0 + k[2613]*y_cur[IDX_H3II]; - data[jistart + 11957] = 0.0 + k[1699]*y_cur[IDX_C2H4I] + - k[2178]*y_cur[IDX_CH4I] - k[2414]*y_cur[IDX_H2I]; - data[jistart + 11958] = 0.0 + k[4249]*y_cur[IDX_H3II]; - data[jistart + 11959] = 0.0 + k[1493]*y_cur[IDX_C2H2II] + - k[1593]*y_cur[IDX_C2H3II] + k[1765]*y_cur[IDX_C3H2II] + - k[1800]*y_cur[IDX_C3H3II] + k[2024]*y_cur[IDX_CH2CCHII] + - k[2054]*y_cur[IDX_CH3II] + k[2305]*y_cur[IDX_HII] + - k[2615]*y_cur[IDX_H3II]; - data[jistart + 11960] = 0.0 - k[2415]*y_cur[IDX_H2I]; - data[jistart + 11961] = 0.0 + k[4284]*y_cur[IDX_H3II]; - data[jistart + 11962] = 0.0 + k[1323]*y_cur[IDX_CII] + - k[1491]*y_cur[IDX_C2H2II] + k[1590]*y_cur[IDX_C2H3II] + - k[1763]*y_cur[IDX_C3H2II] + k[1798]*y_cur[IDX_C3H3II] + - k[1839]*y_cur[IDX_C4H3II] + k[2022]*y_cur[IDX_CH2CCHII] + - k[2053]*y_cur[IDX_CH3II] + k[2304]*y_cur[IDX_HII] + - k[2614]*y_cur[IDX_H3II] + k[3120]*y_cur[IDX_HeII]; - data[jistart + 11963] = 0.0 + k[841]*y_cur[IDX_eM] + - k[1637]*y_cur[IDX_C2H3I] + k[1701]*y_cur[IDX_C2H4I] + - k[1790]*y_cur[IDX_C3H2I] + k[1868]*y_cur[IDX_CI] + - k[2037]*y_cur[IDX_CH2CCHI] + k[2109]*y_cur[IDX_CH3CCHI] + - k[2180]*y_cur[IDX_CH4I] + k[2481]*y_cur[IDX_H2CCCI] + - k[6738]*y_cur[IDX_GRAINM]; - data[jistart + 11964] = 0.0 + k[844]*y_cur[IDX_eM] + - k[1870]*y_cur[IDX_CI] + k[6743]*y_cur[IDX_GRAINM]; - data[jistart + 11965] = 0.0 + k[845]*y_cur[IDX_eM] + - k[3417]*y_cur[IDX_NI] + k[6753]*y_cur[IDX_GRAINM]; - data[jistart + 11966] = 0.0 + k[2616]*y_cur[IDX_H3II]; - data[jistart + 11967] = 0.0 - k[2416]*y_cur[IDX_H2I]; - data[jistart + 11968] = 0.0 + k[4319]*y_cur[IDX_H3II]; - data[jistart + 11969] = 0.0 + k[2617]*y_cur[IDX_H3II]; - data[jistart + 11970] = 0.0 + k[2183]*y_cur[IDX_CH4I] - - k[2417]*y_cur[IDX_H2I] - k[5552]*y_cur[IDX_H2I]; - data[jistart + 11971] = 0.0 + k[4354]*y_cur[IDX_H3II]; - data[jistart + 11972] = 0.0 + k[1497]*y_cur[IDX_C2H2II] + - k[1600]*y_cur[IDX_C2H3II] + k[1769]*y_cur[IDX_C3H2II] + - k[1803]*y_cur[IDX_C3H3II] + k[2027]*y_cur[IDX_CH2CCHII] + - k[2056]*y_cur[IDX_CH3II] + k[2307]*y_cur[IDX_HII] + - k[2620]*y_cur[IDX_H3II]; - data[jistart + 11973] = 0.0 - k[2418]*y_cur[IDX_H2I]; - data[jistart + 11974] = 0.0 + k[4389]*y_cur[IDX_H3II]; - data[jistart + 11975] = 0.0 + k[1326]*y_cur[IDX_CII] + - k[1495]*y_cur[IDX_C2H2II] + k[1596]*y_cur[IDX_C2H3II] + - k[1660]*y_cur[IDX_C2H4II] + k[1767]*y_cur[IDX_C3H2II] + - k[1802]*y_cur[IDX_C3H3II] + k[2026]*y_cur[IDX_CH2CCHII] + - k[2055]*y_cur[IDX_CH3II] + k[2306]*y_cur[IDX_HII] + - k[2618]*y_cur[IDX_H3II] + k[3128]*y_cur[IDX_HeII]; - data[jistart + 11976] = 0.0 + k[852]*y_cur[IDX_eM] + - k[1639]*y_cur[IDX_C2H3I] + k[1703]*y_cur[IDX_C2H4I] + - k[1792]*y_cur[IDX_C3H2I] + k[1872]*y_cur[IDX_CI] + - k[2039]*y_cur[IDX_CH2CCHI] + k[2110]*y_cur[IDX_CH3CCHI] + - k[2185]*y_cur[IDX_CH4I] + k[2483]*y_cur[IDX_H2CCCI] + - k[6785]*y_cur[IDX_GRAINM]; - data[jistart + 11977] = 0.0 + k[855]*y_cur[IDX_eM] + - k[1874]*y_cur[IDX_CI] + k[6790]*y_cur[IDX_GRAINM]; - data[jistart + 11978] = 0.0 + k[856]*y_cur[IDX_eM] + - k[857]*y_cur[IDX_eM] + k[6796]*y_cur[IDX_GRAINM] + - k[6797]*y_cur[IDX_GRAINM]; - data[jistart + 11979] = 0.0 + k[858]*y_cur[IDX_eM] + - k[859]*y_cur[IDX_eM] + k[859]*y_cur[IDX_eM] - k[5553]*y_cur[IDX_H2I] - + k[6802]*y_cur[IDX_GRAINM] + k[6803]*y_cur[IDX_GRAINM] + - k[6803]*y_cur[IDX_GRAINM]; - data[jistart + 11980] = 0.0 + k[2619]*y_cur[IDX_H3II] + k[5751]; - data[jistart + 11981] = 0.0 + k[860]*y_cur[IDX_eM] + - k[860]*y_cur[IDX_eM] + k[2834]*y_cur[IDX_HI] + - k[6806]*y_cur[IDX_GRAINM] + k[6806]*y_cur[IDX_GRAINM]; - data[jistart + 11982] = 0.0 + k[861]*y_cur[IDX_eM] + - k[861]*y_cur[IDX_eM] + k[6807]*y_cur[IDX_GRAINM] + - k[6807]*y_cur[IDX_GRAINM]; - data[jistart + 11983] = 0.0 + k[2621]*y_cur[IDX_H3II]; - data[jistart + 11984] = 0.0 - k[2419]*y_cur[IDX_H2I]; - data[jistart + 11985] = 0.0 + k[4424]*y_cur[IDX_H3II]; - data[jistart + 11986] = 0.0 + k[1501]*y_cur[IDX_C2H2II] + - k[1606]*y_cur[IDX_C2H3II] + k[2058]*y_cur[IDX_CH3II] + - k[2309]*y_cur[IDX_HII] + k[2623]*y_cur[IDX_H3II]; - data[jistart + 11987] = 0.0 - k[2420]*y_cur[IDX_H2I]; - data[jistart + 11988] = 0.0 + k[4459]*y_cur[IDX_H3II]; - data[jistart + 11989] = 0.0 + k[1332]*y_cur[IDX_CII] + - k[1499]*y_cur[IDX_C2H2II] + k[1603]*y_cur[IDX_C2H3II] + - k[1664]*y_cur[IDX_C2H4II] + k[2057]*y_cur[IDX_CH3II] + - k[2308]*y_cur[IDX_HII] + k[2622]*y_cur[IDX_H3II] + - k[3137]*y_cur[IDX_HeII]; - data[jistart + 11990] = 0.0 + k[868]*y_cur[IDX_eM] + - k[1560]*y_cur[IDX_C2H2I] + k[1641]*y_cur[IDX_C2H3I] + - k[1705]*y_cur[IDX_C2H4I] + k[1877]*y_cur[IDX_CI] + - k[2187]*y_cur[IDX_CH4I] + k[6826]*y_cur[IDX_GRAINM]; - data[jistart + 11991] = 0.0 + k[871]*y_cur[IDX_eM] + - k[1879]*y_cur[IDX_CI] + k[6829]*y_cur[IDX_GRAINM]; - data[jistart + 11992] = 0.0 + k[872]*y_cur[IDX_eM] + - k[873]*y_cur[IDX_eM] + k[6830]*y_cur[IDX_GRAINM] + - k[6831]*y_cur[IDX_GRAINM]; - data[jistart + 11993] = 0.0 + k[874]*y_cur[IDX_eM] + - k[3435]*y_cur[IDX_NI] + k[6832]*y_cur[IDX_GRAINM]; - data[jistart + 11994] = 0.0 + k[2624]*y_cur[IDX_H3II]; - data[jistart + 11995] = 0.0 - k[2421]*y_cur[IDX_H2I]; - data[jistart + 11996] = 0.0 + k[2625]*y_cur[IDX_H3II]; - data[jistart + 11997] = 0.0 - k[2422]*y_cur[IDX_H2I]; - data[jistart + 11998] = 0.0 + k[4494]*y_cur[IDX_H3II]; - data[jistart + 11999] = 0.0 + k[1505]*y_cur[IDX_C2H2II] + - k[2060]*y_cur[IDX_CH3II] + k[2311]*y_cur[IDX_HII] + - k[2627]*y_cur[IDX_H3II]; - data[jistart + 12000] = 0.0 - k[2423]*y_cur[IDX_H2I]; - data[jistart + 12001] = 0.0 + k[4529]*y_cur[IDX_H3II]; - data[jistart + 12002] = 0.0 + k[1335]*y_cur[IDX_CII] + - k[1503]*y_cur[IDX_C2H2II] + k[2059]*y_cur[IDX_CH3II] + - k[2310]*y_cur[IDX_HII] + k[2626]*y_cur[IDX_H3II] + - k[3145]*y_cur[IDX_HeII]; - data[jistart + 12003] = 0.0 + k[881]*y_cur[IDX_eM] + - k[1881]*y_cur[IDX_CI] + k[2188]*y_cur[IDX_CH4I] + - k[6841]*y_cur[IDX_GRAINM]; - data[jistart + 12004] = 0.0 + k[884]*y_cur[IDX_eM] + - k[1883]*y_cur[IDX_CI] + k[6846]*y_cur[IDX_GRAINM]; - data[jistart + 12005] = 0.0 + k[885]*y_cur[IDX_eM] + - k[886]*y_cur[IDX_eM] + k[6847]*y_cur[IDX_GRAINM] + - k[6848]*y_cur[IDX_GRAINM]; - data[jistart + 12006] = 0.0 + k[887]*y_cur[IDX_eM] + - k[888]*y_cur[IDX_eM] + k[888]*y_cur[IDX_eM] + - k[6853]*y_cur[IDX_GRAINM] + k[6854]*y_cur[IDX_GRAINM] + - k[6854]*y_cur[IDX_GRAINM]; - data[jistart + 12007] = 0.0 + k[2628]*y_cur[IDX_H3II]; - data[jistart + 12008] = 0.0 - k[2424]*y_cur[IDX_H2I]; - data[jistart + 12009] = 0.0 + k[4564]*y_cur[IDX_H3II]; - data[jistart + 12010] = 0.0 + k[2313]*y_cur[IDX_HII] + - k[2630]*y_cur[IDX_H3II]; - data[jistart + 12011] = 0.0 - k[2425]*y_cur[IDX_H2I]; - data[jistart + 12012] = 0.0 + k[4599]*y_cur[IDX_H3II]; - data[jistart + 12013] = 0.0 + k[1338]*y_cur[IDX_CII] + - k[2312]*y_cur[IDX_HII] + k[2629]*y_cur[IDX_H3II] + - k[3152]*y_cur[IDX_HeII]; - data[jistart + 12014] = 0.0 + k[893]*y_cur[IDX_eM] + - k[1886]*y_cur[IDX_CI] + k[6859]*y_cur[IDX_GRAINM]; - data[jistart + 12015] = 0.0 + k[896]*y_cur[IDX_eM] + - k[1888]*y_cur[IDX_CI] + k[6862]*y_cur[IDX_GRAINM]; - data[jistart + 12016] = 0.0 + k[897]*y_cur[IDX_eM] + - k[898]*y_cur[IDX_eM] + k[6863]*y_cur[IDX_GRAINM] + - k[6864]*y_cur[IDX_GRAINM]; - data[jistart + 12017] = 0.0 + k[899]*y_cur[IDX_eM] + - k[900]*y_cur[IDX_eM] + k[900]*y_cur[IDX_eM] + - k[6865]*y_cur[IDX_GRAINM] + k[6866]*y_cur[IDX_GRAINM] + - k[6866]*y_cur[IDX_GRAINM]; - data[jistart + 12018] = 0.0 + k[2631]*y_cur[IDX_H3II]; - data[jistart + 12019] = 0.0 - k[2426]*y_cur[IDX_H2I]; - data[jistart + 12020] = 0.0 + k[2633]*y_cur[IDX_H3II]; - data[jistart + 12021] = 0.0 - k[134]*y_cur[IDX_H2I] + - k[134]*y_cur[IDX_H2I] + k[443]*y_cur[IDX_H2II] + - k[1943]*y_cur[IDX_CHII] + k[2243]*y_cur[IDX_CH3II] + - k[2670]*y_cur[IDX_H3II] - k[5137]*y_cur[IDX_H2I] + - k[5160]*y_cur[IDX_HI] - k[5556]*y_cur[IDX_H2I]; - data[jistart + 12022] = 0.0 + k[1935]*y_cur[IDX_C2HI] + - k[1936]*y_cur[IDX_CH2I] + k[1940]*y_cur[IDX_CH4I] + - k[1941]*y_cur[IDX_CH4I] + k[1943]*y_cur[IDX_CHI] + - k[1953]*y_cur[IDX_H2OI] + k[1955]*y_cur[IDX_H2SI] + - k[1956]*y_cur[IDX_HCNI] + k[1962]*y_cur[IDX_NH2I] + - k[1963]*y_cur[IDX_NH3I] + k[1965]*y_cur[IDX_NHI] + - k[1972]*y_cur[IDX_OHI] - k[2427]*y_cur[IDX_H2I] + - k[2835]*y_cur[IDX_HI]; - data[jistart + 12023] = 0.0 + k[4634]*y_cur[IDX_H3II]; - data[jistart + 12024] = 0.0 + k[440]*y_cur[IDX_H2II] + - k[1936]*y_cur[IDX_CHII] + k[1999]*y_cur[IDX_CH3II] + - k[2314]*y_cur[IDX_HII] + k[2634]*y_cur[IDX_H3II] + - k[3160]*y_cur[IDX_HeII] + k[4992]*y_cur[IDX_CH2I] + - k[4992]*y_cur[IDX_CH2I] + k[5007]*y_cur[IDX_O2I] + - k[5012]*y_cur[IDX_OI] + k[5019]*y_cur[IDX_SI] - - k[5135]*y_cur[IDX_H2I] + k[5156]*y_cur[IDX_HI]; - data[jistart + 12025] = 0.0 + k[907]*y_cur[IDX_eM] + - k[1976]*y_cur[IDX_CH4I] + k[1979]*y_cur[IDX_H2COI] + - k[1985]*y_cur[IDX_H2SI] - k[2428]*y_cur[IDX_H2I] + - k[2836]*y_cur[IDX_HI] + k[6075] + k[6316]*y_cur[IDX_GRAINM]; - data[jistart + 12026] = 0.0 + k[1346]*y_cur[IDX_CII] + - k[1507]*y_cur[IDX_C2H2II] + k[1610]*y_cur[IDX_C2H3II] + - k[1668]*y_cur[IDX_C2H4II] + k[1805]*y_cur[IDX_C3H3II] + - k[2029]*y_cur[IDX_CH2CCHII] + k[2033]*y_cur[IDX_C4H2II] + - k[2035]*y_cur[IDX_C4H3II] + k[2037]*y_cur[IDX_C5H2II] + - k[2039]*y_cur[IDX_C6H2II] + k[2315]*y_cur[IDX_HII] + - k[2636]*y_cur[IDX_H3II] + k[3162]*y_cur[IDX_HeII] + - k[3163]*y_cur[IDX_HeII] + k[5256]*y_cur[IDX_NI] + k[5783] + k[6084]; - data[jistart + 12027] = 0.0 + k[1643]*y_cur[IDX_C2H3I] + - k[1706]*y_cur[IDX_C2H4I] + k[1741]*y_cur[IDX_C2HI] + - k[1794]*y_cur[IDX_C3H2I] + k[1828]*y_cur[IDX_C3HI] + - k[1892]*y_cur[IDX_CI] + k[2020]*y_cur[IDX_C4HI] + - k[2022]*y_cur[IDX_C5H2I] + k[2024]*y_cur[IDX_C5HI] + - k[2026]*y_cur[IDX_C6H2I] + k[2027]*y_cur[IDX_C6HI] + - k[2029]*y_cur[IDX_CH2CCHI] + k[2485]*y_cur[IDX_H2CCCI] + - k[3838]*y_cur[IDX_SI] + k[3879]*y_cur[IDX_SiI] - - k[5530]*y_cur[IDX_H2I]; - data[jistart + 12028] = 0.0 + k[1345]*y_cur[IDX_CII] + - k[1809]*y_cur[IDX_C3H4II] + k[2635]*y_cur[IDX_H3II] + - k[2635]*y_cur[IDX_H3II] + k[6082]; - data[jistart + 12029] = 0.0 + k[2316]*y_cur[IDX_HII] + - k[2637]*y_cur[IDX_H3II] + k[3167]*y_cur[IDX_HeII]; - data[jistart + 12030] = 0.0 + k[912]*y_cur[IDX_eM] - - k[2429]*y_cur[IDX_H2I] + k[6651]*y_cur[IDX_GRAINM]; - data[jistart + 12031] = 0.0 + k[2638]*y_cur[IDX_H3II]; - data[jistart + 12032] = 0.0 + k[2639]*y_cur[IDX_H3II]; - data[jistart + 12033] = 0.0 + k[6093]; - data[jistart + 12034] = 0.0 + k[5634]*y_cur[IDX_H3II]; - data[jistart + 12035] = 0.0 + k[5662]*y_cur[IDX_H3II]; - data[jistart + 12036] = 0.0 + k[5656]*y_cur[IDX_H3II]; - data[jistart + 12037] = 0.0 + k[1351]*y_cur[IDX_CII] + - k[2640]*y_cur[IDX_H3II] + k[5792]; - data[jistart + 12038] = 0.0 + k[1352]*y_cur[IDX_CII] + - k[2102]*y_cur[IDX_SiII] + k[2641]*y_cur[IDX_H3II] + - k[3176]*y_cur[IDX_HeII] + k[5026]*y_cur[IDX_CH3I] + - k[5026]*y_cur[IDX_CH3I] + k[5043]*y_cur[IDX_OI] + - k[5046]*y_cur[IDX_OHI] - k[5136]*y_cur[IDX_H2I] + - k[5158]*y_cur[IDX_HI] + k[5258]*y_cur[IDX_NI] + k[5795] + k[6099]; - data[jistart + 12039] = 0.0 + k[924]*y_cur[IDX_eM] + - k[1894]*y_cur[IDX_CI] + k[1999]*y_cur[IDX_CH2I] + - k[2041]*y_cur[IDX_C2I] + k[2042]*y_cur[IDX_C2H2I] + - k[2043]*y_cur[IDX_C2H3I] + k[2044]*y_cur[IDX_C2H3I] + - k[2046]*y_cur[IDX_C2H4I] + k[2047]*y_cur[IDX_C2H4I] + - k[2047]*y_cur[IDX_C2H4I] + k[2048]*y_cur[IDX_C2HI] + - k[2050]*y_cur[IDX_C3H2I] + k[2051]*y_cur[IDX_C3HI] + - k[2052]*y_cur[IDX_C4HI] + k[2053]*y_cur[IDX_C5H2I] + - k[2054]*y_cur[IDX_C5HI] + k[2055]*y_cur[IDX_C6H2I] + - k[2056]*y_cur[IDX_C6HI] + k[2057]*y_cur[IDX_C7H2I] + - k[2058]*y_cur[IDX_C7HI] + k[2059]*y_cur[IDX_C8H2I] + - k[2060]*y_cur[IDX_C8HI] + k[2063]*y_cur[IDX_C2H6I] + - k[2063]*y_cur[IDX_C2H6I] + k[2064]*y_cur[IDX_C2H6I] + - k[2074]*y_cur[IDX_CH4I] + k[2076]*y_cur[IDX_H2CCCI] + - k[2078]*y_cur[IDX_H2SI] + k[2080]*y_cur[IDX_C4H2I] + - k[2083]*y_cur[IDX_HClI] + k[2084]*y_cur[IDX_HSI] + - k[2085]*y_cur[IDX_N2OI] + k[2087]*y_cur[IDX_NH3I] + - k[2091]*y_cur[IDX_OI] + k[2093]*y_cur[IDX_OHI] + - k[2095]*y_cur[IDX_SI] + k[2096]*y_cur[IDX_SOI] + - k[2097]*y_cur[IDX_SiI] + k[2100]*y_cur[IDX_SiHI] + - k[2243]*y_cur[IDX_CHI] + k[2837]*y_cur[IDX_HI] + - k[3608]*y_cur[IDX_NHI] - k[5555]*y_cur[IDX_H2I] + k[6095] + - k[6322]*y_cur[IDX_GRAINM]; - data[jistart + 12040] = 0.0 + k[2642]*y_cur[IDX_H3II]; - data[jistart + 12041] = 0.0 - k[2430]*y_cur[IDX_H2I]; - data[jistart + 12042] = 0.0 + k[1357]*y_cur[IDX_CII] + - k[2321]*y_cur[IDX_HII] + k[2643]*y_cur[IDX_H3II] + - k[3178]*y_cur[IDX_HeII] + k[4950]*y_cur[IDX_CI]; - data[jistart + 12043] = 0.0 + k[929]*y_cur[IDX_eM] + - k[930]*y_cur[IDX_eM] + k[6748]*y_cur[IDX_GRAINM] + - k[6749]*y_cur[IDX_GRAINM]; - data[jistart + 12044] = 0.0 + k[2644]*y_cur[IDX_H3II]; - data[jistart + 12045] = 0.0 + k[1361]*y_cur[IDX_CII] + - k[2323]*y_cur[IDX_HII] + k[2645]*y_cur[IDX_H3II] + - k[3181]*y_cur[IDX_HeII] + k[4951]*y_cur[IDX_CI]; - data[jistart + 12046] = 0.0 + k[2646]*y_cur[IDX_H3II]; - data[jistart + 12047] = 0.0 + k[1365]*y_cur[IDX_CII] + - k[1510]*y_cur[IDX_C2H2II] + k[1612]*y_cur[IDX_C2H3II] + - k[1812]*y_cur[IDX_C3H4II] + k[2104]*y_cur[IDX_C3H5II] + - k[2108]*y_cur[IDX_C4H3II] + k[2109]*y_cur[IDX_C5H2II] + - k[2110]*y_cur[IDX_C6H2II] + k[2325]*y_cur[IDX_HII] + - k[2647]*y_cur[IDX_H3II] + k[2647]*y_cur[IDX_H3II] + - k[3184]*y_cur[IDX_HeII] + k[3184]*y_cur[IDX_HeII] + - k[3185]*y_cur[IDX_HeII] + k[3186]*y_cur[IDX_HeII] + - k[4953]*y_cur[IDX_CI] + k[6107]; - data[jistart + 12048] = 0.0 + k[1377]*y_cur[IDX_CII] + - k[2649]*y_cur[IDX_H3II] + k[2650]*y_cur[IDX_H3II] + - k[2650]*y_cur[IDX_H3II] + k[3369]*y_cur[IDX_N2HII] + - k[4954]*y_cur[IDX_CI] + k[5053]*y_cur[IDX_C4HI] + - k[5054]*y_cur[IDX_C4HI]; - data[jistart + 12049] = 0.0 + k[2651]*y_cur[IDX_H3II] + - k[2654]*y_cur[IDX_H3II] + k[2655]*y_cur[IDX_H3II] + - k[2655]*y_cur[IDX_H3II]; - data[jistart + 12050] = 0.0 + k[2328]*y_cur[IDX_HII] + - k[2658]*y_cur[IDX_H3II]; - data[jistart + 12051] = 0.0 - k[2431]*y_cur[IDX_H2I]; - data[jistart + 12052] = 0.0 + k[5640]*y_cur[IDX_H3II]; - data[jistart + 12053] = 0.0 + k[2660]*y_cur[IDX_H3II] + - k[2662]*y_cur[IDX_H3II] + k[2663]*y_cur[IDX_H3II]; - data[jistart + 12054] = 0.0 + k[5668]*y_cur[IDX_H3II]; - data[jistart + 12055] = 0.0 + k[970]*y_cur[IDX_eM] + - k[970]*y_cur[IDX_eM] + k[971]*y_cur[IDX_eM] + - k[6405]*y_cur[IDX_GRAINM] + k[6405]*y_cur[IDX_GRAINM] + - k[6406]*y_cur[IDX_GRAINM]; - data[jistart + 12056] = 0.0 + k[5628]*y_cur[IDX_H3II]; - data[jistart + 12057] = 0.0 + k[2666]*y_cur[IDX_H3II]; - data[jistart + 12058] = 0.0 + k[2331]*y_cur[IDX_HII] + - k[2332]*y_cur[IDX_HII] + k[2332]*y_cur[IDX_HII] + - k[2667]*y_cur[IDX_H3II] + k[2668]*y_cur[IDX_H3II]; - data[jistart + 12059] = 0.0 + k[967]*y_cur[IDX_eM] + - k[2495]*y_cur[IDX_H2COI] + k[6444]*y_cur[IDX_GRAINM]; - data[jistart + 12060] = 0.0 + k[442]*y_cur[IDX_H2II] + - k[1383]*y_cur[IDX_CII] + k[1940]*y_cur[IDX_CHII] + - k[1941]*y_cur[IDX_CHII] + k[1976]*y_cur[IDX_CH2II] + - k[2074]*y_cur[IDX_CH3II] + k[2148]*y_cur[IDX_C2II] + - k[2149]*y_cur[IDX_C2II] + k[2153]*y_cur[IDX_C2HII] + - k[2154]*y_cur[IDX_C2H2II] + k[2156]*y_cur[IDX_C2H3II] + - k[2158]*y_cur[IDX_C3II] + k[2161]*y_cur[IDX_C3HII] + - k[2166]*y_cur[IDX_C4II] + k[2168]*y_cur[IDX_C4HII] + - k[2170]*y_cur[IDX_C4H2II] + k[2171]*y_cur[IDX_C4H3II] + - k[2175]*y_cur[IDX_C4NII] + k[2178]*y_cur[IDX_C5II] + - k[2180]*y_cur[IDX_C5H2II] + k[2183]*y_cur[IDX_C6II] + - k[2185]*y_cur[IDX_C6H2II] + k[2187]*y_cur[IDX_C7H2II] + - k[2188]*y_cur[IDX_C8H2II] + k[2203]*y_cur[IDX_HSII] + - k[2204]*y_cur[IDX_N2II] + k[2211]*y_cur[IDX_PII] + - k[2212]*y_cur[IDX_PHII] + k[2214]*y_cur[IDX_PH2II] + - k[2216]*y_cur[IDX_SII] + k[2333]*y_cur[IDX_HII] + - k[2378]*y_cur[IDX_H2II] + k[2669]*y_cur[IDX_H3II] + - k[3198]*y_cur[IDX_HeII] + k[3199]*y_cur[IDX_HeII] + - k[3341]*y_cur[IDX_NII] + k[5159]*y_cur[IDX_HI] + k[5820] + k[6127] + - k[6130]; - data[jistart + 12061] = 0.0 + k[2134]*y_cur[IDX_C2H2I] - - k[2432]*y_cur[IDX_H2I] + k[2839]*y_cur[IDX_HI] + k[6125]; - data[jistart + 12062] = 0.0 + k[972]*y_cur[IDX_eM] + - k[973]*y_cur[IDX_eM] + k[976]*y_cur[IDX_eM] + k[976]*y_cur[IDX_eM] + - k[2236]*y_cur[IDX_SiI] + k[2238]*y_cur[IDX_SiH4I] + - k[2840]*y_cur[IDX_HI] + k[3728]*y_cur[IDX_OI] + - k[6332]*y_cur[IDX_GRAINM] + k[6333]*y_cur[IDX_GRAINM] + - k[6336]*y_cur[IDX_GRAINM] + k[6336]*y_cur[IDX_GRAINM]; - data[jistart + 12063] = 0.0 + k[444]*y_cur[IDX_H2II] + - k[2671]*y_cur[IDX_H3II] - k[5138]*y_cur[IDX_H2I]; - data[jistart + 12064] = 0.0 - k[2433]*y_cur[IDX_H2I]; - data[jistart + 12065] = 0.0 + k[4669]*y_cur[IDX_H3II]; - data[jistart + 12066] = 0.0 + k[2672]*y_cur[IDX_H3II] + - k[2673]*y_cur[IDX_H3II]; - data[jistart + 12067] = 0.0 + k[445]*y_cur[IDX_H2II] + - k[2675]*y_cur[IDX_H3II] + k[2676]*y_cur[IDX_H3II]; - data[jistart + 12068] = 0.0 - k[2434]*y_cur[IDX_H2I] - - k[2435]*y_cur[IDX_H2I]; - data[jistart + 12069] = 0.0 + k[2674]*y_cur[IDX_H3II]; - data[jistart + 12070] = 0.0 - k[2436]*y_cur[IDX_H2I]; - data[jistart + 12071] = 0.0 + k[5650]*y_cur[IDX_H3II]; - data[jistart + 12072] = 0.0 + k[5645]*y_cur[IDX_H3II]; - data[jistart + 12073] = 0.0 + k[2677]*y_cur[IDX_H3II]; - data[jistart + 12074] = 0.0 - k[2437]*y_cur[IDX_H2I]; - data[jistart + 12075] = 0.0 + k[2678]*y_cur[IDX_H3II]; - data[jistart + 12076] = 0.0 - k[2438]*y_cur[IDX_H2I]; - data[jistart + 12077] = 0.0 + k[2679]*y_cur[IDX_H3II] - - k[5132]*y_cur[IDX_H2I]; - data[jistart + 12078] = 0.0 - k[2439]*y_cur[IDX_H2I]; - data[jistart + 12079] = 0.0 - k[5139]*y_cur[IDX_H2I]; - data[jistart + 12080] = 0.0 - k[457]*y_cur[IDX_H2I] - - k[2440]*y_cur[IDX_H2I]; - data[jistart + 12081] = 0.0 + k[2680]*y_cur[IDX_H3II]; - data[jistart + 12082] = 0.0 + k[8273]*y_cur[IDX_GHI] + - k[8273]*y_cur[IDX_GHI]; - data[jistart + 12083] = 0.0 + k[7071] + k[7253] + k[7435]; - data[jistart + 12084] = 0.0 + k[6310]*y_cur[IDX_H3II] + - k[6316]*y_cur[IDX_CH2II] + k[6322]*y_cur[IDX_CH3II] + - k[6332]*y_cur[IDX_CH5II] + k[6333]*y_cur[IDX_CH5II] + - k[6336]*y_cur[IDX_CH5II] + k[6336]*y_cur[IDX_CH5II] + - k[6337]*y_cur[IDX_NH4II] + k[6340]*y_cur[IDX_H2OII] + - k[6344]*y_cur[IDX_H3OII] + k[6345]*y_cur[IDX_H3OII] + - k[6349]*y_cur[IDX_H2FII] + k[6360]*y_cur[IDX_C2H3II] + - k[6361]*y_cur[IDX_C2H3II] + k[6364]*y_cur[IDX_C2H3II] + - k[6365]*y_cur[IDX_C2H3II] + k[6376]*y_cur[IDX_H2NCII] + - k[6381]*y_cur[IDX_C2H4II] + k[6384]*y_cur[IDX_C2H4II] + - k[6391]*y_cur[IDX_C2H5II] + k[6399]*y_cur[IDX_H2COII] + - k[6402]*y_cur[IDX_SiH2II] + k[6405]*y_cur[IDX_CH3NHII] + - k[6405]*y_cur[IDX_CH3NHII] + k[6406]*y_cur[IDX_CH3NHII] + - k[6410]*y_cur[IDX_C2H6II] + k[6413]*y_cur[IDX_SiH3II] + - k[6416]*y_cur[IDX_H3COII] + k[6419]*y_cur[IDX_C2H7II] + - k[6426]*y_cur[IDX_SiH4II] + k[6432]*y_cur[IDX_H2NOII] + - k[6434]*y_cur[IDX_PH2II] + k[6438]*y_cur[IDX_SiH5II] + - k[6444]*y_cur[IDX_CH3OH2II] + k[6449]*y_cur[IDX_PH3II] + - k[6451]*y_cur[IDX_H3SII] + k[6453]*y_cur[IDX_H3SII] + - k[6463]*y_cur[IDX_C3H2II] + k[6482]*y_cur[IDX_C3H5II] + - k[6498]*y_cur[IDX_SiCH2II] + k[6499]*y_cur[IDX_C3H6II] + - k[6500]*y_cur[IDX_C3H6II] + k[6504]*y_cur[IDX_C3H7II] + - k[6507]*y_cur[IDX_C3H7II] + k[6508]*y_cur[IDX_C3H7II] + - k[6516]*y_cur[IDX_SiCH3II] + k[6541]*y_cur[IDX_SiCH4II] + - k[6553]*y_cur[IDX_SiNH2II] + k[6569]*y_cur[IDX_PCH2II] + - k[6578]*y_cur[IDX_PCH3II] + k[6579]*y_cur[IDX_PCH3II] + - k[6586]*y_cur[IDX_H2SiOII] + k[6591]*y_cur[IDX_H3SiOII] + - k[6595]*y_cur[IDX_PNH2II] + k[6597]*y_cur[IDX_PCH4II] + - k[6601]*y_cur[IDX_H3CSII] + k[6619]*y_cur[IDX_PNH3II] + - k[6633]*y_cur[IDX_C4H3II] + k[6638]*y_cur[IDX_HC3NHII] + - k[6645]*y_cur[IDX_C4H5II] + k[6645]*y_cur[IDX_C4H5II] + - k[6647]*y_cur[IDX_C4H5II] + k[6651]*y_cur[IDX_CH2CHCNII] + - k[6660]*y_cur[IDX_SiC2H2II] + k[6665]*y_cur[IDX_SiC2H3II] + - k[6666]*y_cur[IDX_H3C3OII] + k[6667]*y_cur[IDX_C4H7II] + - k[6667]*y_cur[IDX_C4H7II] + k[6680]*y_cur[IDX_PC2H2II] + - k[6685]*y_cur[IDX_PC2H3II] + k[6686]*y_cur[IDX_PC2H3II] + - k[6689]*y_cur[IDX_PC2H4II] + k[6689]*y_cur[IDX_PC2H4II] + - k[6690]*y_cur[IDX_PC2H4II] + k[6738]*y_cur[IDX_C5H2II] + - k[6743]*y_cur[IDX_C5H3II] + k[6748]*y_cur[IDX_CH3C4HII] + - k[6749]*y_cur[IDX_CH3C4HII] + k[6753]*y_cur[IDX_C5H5II] + - k[6767]*y_cur[IDX_SiC3H2II] + k[6771]*y_cur[IDX_H3S2II] + - k[6785]*y_cur[IDX_C6H2II] + k[6790]*y_cur[IDX_C6H3II] + - k[6791]*y_cur[IDX_HC5NHII] + k[6796]*y_cur[IDX_C6H4II] + - k[6797]*y_cur[IDX_C6H4II] + k[6802]*y_cur[IDX_C6H5II] + - k[6803]*y_cur[IDX_C6H5II] + k[6803]*y_cur[IDX_C6H5II] + - k[6804]*y_cur[IDX_H3C5NII] + k[6805]*y_cur[IDX_H3C5NII] + - k[6806]*y_cur[IDX_C6H6II] + k[6806]*y_cur[IDX_C6H6II] + - k[6807]*y_cur[IDX_C6H7II] + k[6807]*y_cur[IDX_C6H7II] + - k[6826]*y_cur[IDX_C7H2II] + k[6829]*y_cur[IDX_C7H3II] + - k[6830]*y_cur[IDX_C7H4II] + k[6831]*y_cur[IDX_C7H4II] + - k[6832]*y_cur[IDX_C7H5II] + k[6841]*y_cur[IDX_C8H2II] + - k[6846]*y_cur[IDX_C8H3II] + k[6847]*y_cur[IDX_C8H4II] + - k[6848]*y_cur[IDX_C8H4II] + k[6849]*y_cur[IDX_H2C7NII] + - k[6851]*y_cur[IDX_H3C7NII] + k[6852]*y_cur[IDX_H3C7NII] + - k[6853]*y_cur[IDX_C8H5II] + k[6854]*y_cur[IDX_C8H5II] + - k[6854]*y_cur[IDX_C8H5II] + k[6859]*y_cur[IDX_C9H2II] + - k[6862]*y_cur[IDX_C9H3II] + k[6863]*y_cur[IDX_C9H4II] + - k[6864]*y_cur[IDX_C9H4II] + k[6865]*y_cur[IDX_C9H5II] + - k[6866]*y_cur[IDX_C9H5II] + k[6866]*y_cur[IDX_C9H5II] + - k[6880]*y_cur[IDX_H2C9NII] + k[6882]*y_cur[IDX_H3C9NII] + - k[6883]*y_cur[IDX_H3C9NII]; - data[jistart + 12085] = 0.0 + k[74]*y_cur[IDX_HM] + - k[75]*y_cur[IDX_HM] - k[142]*y_cur[IDX_H2I] + k[489]*y_cur[IDX_H2II] - + k[2827]*y_cur[IDX_C2H3II] + k[2828]*y_cur[IDX_C2H4II] + - k[2829]*y_cur[IDX_C2H5II] + k[2831]*y_cur[IDX_C3H2II] + - k[2832]*y_cur[IDX_C3H4II] + k[2833]*y_cur[IDX_C3H7II] + - k[2834]*y_cur[IDX_C6H6II] + k[2835]*y_cur[IDX_CHII] + - k[2836]*y_cur[IDX_CH2II] + k[2837]*y_cur[IDX_CH3II] + - k[2838]*y_cur[IDX_C2H6II] + k[2839]*y_cur[IDX_CH4II] + - k[2840]*y_cur[IDX_CH5II] + k[2842]*y_cur[IDX_H2SII] + - k[2843]*y_cur[IDX_H3SII] + k[2844]*y_cur[IDX_HSII] + - k[2848]*y_cur[IDX_SiHII] + k[5154]*y_cur[IDX_C2H2I] + - k[5155]*y_cur[IDX_C2H3I] + k[5156]*y_cur[IDX_CH2I] + - k[5158]*y_cur[IDX_CH3I] + k[5159]*y_cur[IDX_CH4I] + - k[5160]*y_cur[IDX_CHI] + k[5164]*y_cur[IDX_H2CNI] + - k[5165]*y_cur[IDX_H2COI] + k[5167]*y_cur[IDX_H2O2I] + - k[5168]*y_cur[IDX_H2OI] + k[5169]*y_cur[IDX_H2SI] + - k[5170]*y_cur[IDX_HCNI] + k[5171]*y_cur[IDX_HCOI] + - k[5173]*y_cur[IDX_HCSI] + k[5176]*y_cur[IDX_HNOI] + - k[5178]*y_cur[IDX_HSI] + k[5182]*y_cur[IDX_NH2I] + - k[5183]*y_cur[IDX_NH3I] + k[5184]*y_cur[IDX_NHI] + - k[5192]*y_cur[IDX_O2HI] + k[5198]*y_cur[IDX_OHI] + - k[5211]*y_cur[IDX_HClI]; - data[jistart + 12086] = 0.0 + k[327]*y_cur[IDX_C2H5I] + - k[2294]*y_cur[IDX_C10H2I] + k[2295]*y_cur[IDX_C2H3I] + - k[2296]*y_cur[IDX_C2H4I] + k[2297]*y_cur[IDX_C2H4I] + - k[2298]*y_cur[IDX_C2H5I] + k[2299]*y_cur[IDX_C2HI] + - k[2300]*y_cur[IDX_C3H2I] + k[2301]*y_cur[IDX_C3HI] + - k[2302]*y_cur[IDX_C4H3I] + k[2303]*y_cur[IDX_C4HI] + - k[2304]*y_cur[IDX_C5H2I] + k[2305]*y_cur[IDX_C5HI] + - k[2306]*y_cur[IDX_C6H2I] + k[2307]*y_cur[IDX_C6HI] + - k[2308]*y_cur[IDX_C7H2I] + k[2309]*y_cur[IDX_C7HI] + - k[2310]*y_cur[IDX_C8H2I] + k[2311]*y_cur[IDX_C8HI] + - k[2312]*y_cur[IDX_C9H2I] + k[2313]*y_cur[IDX_C9HI] + - k[2314]*y_cur[IDX_CH2I] + k[2315]*y_cur[IDX_CH2CCHI] + - k[2316]*y_cur[IDX_CH2CHCNI] + k[2321]*y_cur[IDX_CH3C4HI] + - k[2323]*y_cur[IDX_CH3C6HI] + k[2325]*y_cur[IDX_CH3CCHI] + - k[2326]*y_cur[IDX_C2H6I] + k[2326]*y_cur[IDX_C2H6I] + - k[2327]*y_cur[IDX_C2H6I] + k[2328]*y_cur[IDX_CH3CNI] + - k[2331]*y_cur[IDX_CH3OHI] + k[2332]*y_cur[IDX_CH3OHI] + - k[2332]*y_cur[IDX_CH3OHI] + k[2333]*y_cur[IDX_CH4I] + - k[2335]*y_cur[IDX_H2CCCI] + k[2337]*y_cur[IDX_H2COI] + - k[2338]*y_cur[IDX_H2COI] + k[2339]*y_cur[IDX_H2SI] + - k[2340]*y_cur[IDX_H2SI] + k[2341]*y_cur[IDX_H2SiOI] + - k[2342]*y_cur[IDX_C4H2I] + k[2344]*y_cur[IDX_HCOI] + - k[2346]*y_cur[IDX_HCSI] + k[2347]*y_cur[IDX_HCSiI] + - k[2349]*y_cur[IDX_HNOI] + k[2350]*y_cur[IDX_HNSiI] + - k[2353]*y_cur[IDX_HSI] + k[2357]*y_cur[IDX_SiC2H2I] + - k[2358]*y_cur[IDX_SiC2HI] + k[2359]*y_cur[IDX_SiC3HI] + - k[2360]*y_cur[IDX_SiCH2I] + k[2361]*y_cur[IDX_SiCH3I] + - k[2362]*y_cur[IDX_SiH2I] + k[2363]*y_cur[IDX_SiH3I] + - k[2364]*y_cur[IDX_SiH4I] + k[2365]*y_cur[IDX_SiHI] + - k[3022]*y_cur[IDX_HNC3I]; - data[jistart + 12087] = 0.0 + k[74]*y_cur[IDX_HI] + - k[75]*y_cur[IDX_HI] + k[2366]*y_cur[IDX_C2H2I] + - k[2367]*y_cur[IDX_H2OI] + k[2368]*y_cur[IDX_HCNI] + - k[4702]*y_cur[IDX_H2II] + k[4705]*y_cur[IDX_H3II]; - data[jistart + 12088] = 0.0 - k[82]*y_cur[IDX_CM] - - k[83]*y_cur[IDX_OM] - k[134]*y_cur[IDX_CHI] + k[134]*y_cur[IDX_CHI] - - k[135]*y_cur[IDX_H2I] - k[135]*y_cur[IDX_H2I] - - k[135]*y_cur[IDX_H2I] - k[135]*y_cur[IDX_H2I] + - k[135]*y_cur[IDX_H2I] + k[135]*y_cur[IDX_H2I] - - k[136]*y_cur[IDX_H2OI] + k[136]*y_cur[IDX_H2OI] - - k[137]*y_cur[IDX_HOCII] + k[137]*y_cur[IDX_HOCII] - - k[138]*y_cur[IDX_O2I] + k[138]*y_cur[IDX_O2I] - - k[139]*y_cur[IDX_OHI] + k[139]*y_cur[IDX_OHI] - k[140]*y_cur[IDX_eM] - - k[142]*y_cur[IDX_HI] - k[457]*y_cur[IDX_FII] - - k[458]*y_cur[IDX_HeII] - k[2384]*y_cur[IDX_H2II] - - k[2398]*y_cur[IDX_CII] - k[2399]*y_cur[IDX_C10II] - - k[2400]*y_cur[IDX_C10HII] - k[2401]*y_cur[IDX_C2II] - - k[2402]*y_cur[IDX_C2HII] - k[2403]*y_cur[IDX_C2H2II] - - k[2404]*y_cur[IDX_C2N2II] - k[2405]*y_cur[IDX_C2SII] - - k[2406]*y_cur[IDX_C3II] - k[2407]*y_cur[IDX_C3HII] - - k[2408]*y_cur[IDX_C3H2II] - k[2409]*y_cur[IDX_C3NII] - - k[2410]*y_cur[IDX_C3OII] - k[2411]*y_cur[IDX_C4II] - - k[2412]*y_cur[IDX_C4HII] - k[2413]*y_cur[IDX_C4NII] - - k[2414]*y_cur[IDX_C5II] - k[2415]*y_cur[IDX_C5HII] - - k[2416]*y_cur[IDX_C5NII] - k[2417]*y_cur[IDX_C6II] - - k[2418]*y_cur[IDX_C6HII] - k[2419]*y_cur[IDX_C7II] - - k[2420]*y_cur[IDX_C7HII] - k[2421]*y_cur[IDX_C7NII] - - k[2422]*y_cur[IDX_C8II] - k[2423]*y_cur[IDX_C8HII] - - k[2424]*y_cur[IDX_C9II] - k[2425]*y_cur[IDX_C9HII] - - k[2426]*y_cur[IDX_C9NII] - k[2427]*y_cur[IDX_CHII] - - k[2428]*y_cur[IDX_CH2II] - k[2429]*y_cur[IDX_CH2CHCNII] - - k[2430]*y_cur[IDX_CH3C3NII] - k[2431]*y_cur[IDX_CH3CNII] - - k[2432]*y_cur[IDX_CH4II] - k[2433]*y_cur[IDX_CNII] - - k[2434]*y_cur[IDX_COII] - k[2435]*y_cur[IDX_COII] - - k[2436]*y_cur[IDX_CO2II] - k[2437]*y_cur[IDX_CPII] - - k[2438]*y_cur[IDX_CSII] - k[2439]*y_cur[IDX_ClII] - - k[2440]*y_cur[IDX_FII] - k[2441]*y_cur[IDX_H2C4NII] - - k[2442]*y_cur[IDX_H2OII] - k[2443]*y_cur[IDX_H2SII] - - k[2444]*y_cur[IDX_HC3NII] - k[2445]*y_cur[IDX_HC3NII] - - k[2446]*y_cur[IDX_HC4NII] - k[2447]*y_cur[IDX_HC5NII] - - k[2448]*y_cur[IDX_HC7NII] - k[2449]*y_cur[IDX_HC9NII] - - k[2450]*y_cur[IDX_HCNII] - k[2451]*y_cur[IDX_HCPII] - - k[2452]*y_cur[IDX_HCSiII] - k[2453]*y_cur[IDX_HClII] - - k[2454]*y_cur[IDX_HFII] - k[2455]*y_cur[IDX_HNSiII] - - k[2456]*y_cur[IDX_HSII] - k[2457]*y_cur[IDX_HeII] - - k[2458]*y_cur[IDX_HeHII] - k[2459]*y_cur[IDX_NII] - - k[2460]*y_cur[IDX_N2II] - k[2461]*y_cur[IDX_NHII] - - k[2462]*y_cur[IDX_NHII] - k[2463]*y_cur[IDX_NH2II] - - k[2464]*y_cur[IDX_NH3II] - k[2465]*y_cur[IDX_NO2II] - - k[2466]*y_cur[IDX_OII] - k[2467]*y_cur[IDX_OM] - - k[2468]*y_cur[IDX_O2HII] - k[2469]*y_cur[IDX_OHII] - - k[2470]*y_cur[IDX_SII] - k[2471]*y_cur[IDX_SO2II] - - k[2472]*y_cur[IDX_SiCII] - k[2473]*y_cur[IDX_SiC2II] - - k[2474]*y_cur[IDX_SiH4II] - k[2475]*y_cur[IDX_SiOII] - - k[2897]*y_cur[IDX_HCNOII] - k[2898]*y_cur[IDX_HCNOII] - - k[3047]*y_cur[IDX_HNCOII] - k[3048]*y_cur[IDX_HNCOII] - - k[3051]*y_cur[IDX_HOCNII] - k[3052]*y_cur[IDX_HOCNII] - - k[3053]*y_cur[IDX_HONCII] - k[3765]*y_cur[IDX_OCNII] - - k[3766]*y_cur[IDX_OCNII] - k[5132]*y_cur[IDX_ClI] - - k[5133]*y_cur[IDX_C2HI] - k[5134]*y_cur[IDX_CI] - - k[5135]*y_cur[IDX_CH2I] - k[5136]*y_cur[IDX_CH3I] - - k[5137]*y_cur[IDX_CHI] - k[5138]*y_cur[IDX_CNI] - - k[5139]*y_cur[IDX_FI] - k[5140]*y_cur[IDX_HSI] - - k[5141]*y_cur[IDX_NI] - k[5142]*y_cur[IDX_NH2I] - - k[5143]*y_cur[IDX_NHI] - k[5144]*y_cur[IDX_O2I] - - k[5145]*y_cur[IDX_O2I] - k[5146]*y_cur[IDX_O2HI] - - k[5147]*y_cur[IDX_OI] - k[5148]*y_cur[IDX_OHI] - - k[5149]*y_cur[IDX_SI] - k[5516]*y_cur[IDX_C3H5II] - - k[5530]*y_cur[IDX_CH2CCHII] - k[5548]*y_cur[IDX_CII] - - k[5549]*y_cur[IDX_C2H2II] - k[5550]*y_cur[IDX_C3HII] - - k[5551]*y_cur[IDX_C3HII] - k[5552]*y_cur[IDX_C6II] - - k[5553]*y_cur[IDX_C6H5II] - k[5554]*y_cur[IDX_CI] - - k[5555]*y_cur[IDX_CH3II] - k[5556]*y_cur[IDX_CHI] - - k[5557]*y_cur[IDX_HSII] - k[5558]*y_cur[IDX_HS2II] - - k[5559]*y_cur[IDX_PII] - k[5560]*y_cur[IDX_PHII] - - k[5561]*y_cur[IDX_SII] - k[5562]*y_cur[IDX_SiII] - - k[5563]*y_cur[IDX_SiC2HII] - k[5564]*y_cur[IDX_SiHII] - - k[5565]*y_cur[IDX_SiH3II] - k[5678] - k[5679] - k[5680] - k[5681] - - k[6147] - k[6889]; - data[jistart + 12089] = 0.0 + k[436]*y_cur[IDX_C2I] + - k[437]*y_cur[IDX_C2H2I] + k[438]*y_cur[IDX_C2H4I] + - k[439]*y_cur[IDX_C2HI] + k[440]*y_cur[IDX_CH2I] + - k[441]*y_cur[IDX_C2H6I] + k[442]*y_cur[IDX_CH4I] + - k[443]*y_cur[IDX_CHI] + k[444]*y_cur[IDX_CNI] + - k[445]*y_cur[IDX_COI] + k[446]*y_cur[IDX_H2COI] + - k[447]*y_cur[IDX_H2OI] + k[448]*y_cur[IDX_H2SI] + - k[449]*y_cur[IDX_HCNI] + k[450]*y_cur[IDX_HCOI] + - k[451]*y_cur[IDX_NH2I] + k[452]*y_cur[IDX_NH3I] + - k[453]*y_cur[IDX_NHI] + k[454]*y_cur[IDX_NOI] + - k[455]*y_cur[IDX_O2I] + k[456]*y_cur[IDX_OHI] + k[489]*y_cur[IDX_HI] - + k[2371]*y_cur[IDX_C2H4I] + k[2371]*y_cur[IDX_C2H4I] + - k[2372]*y_cur[IDX_C2H4I] + k[2376]*y_cur[IDX_C2H6I] + - k[2376]*y_cur[IDX_C2H6I] + k[2377]*y_cur[IDX_C2H6I] + - k[2378]*y_cur[IDX_CH4I] - k[2384]*y_cur[IDX_H2I] + - k[2385]*y_cur[IDX_H2COI] + k[2387]*y_cur[IDX_H2SI] + - k[2388]*y_cur[IDX_H2SI] + k[2388]*y_cur[IDX_H2SI] + - k[4702]*y_cur[IDX_HM]; - data[jistart + 12090] = 0.0 - k[2441]*y_cur[IDX_H2I]; - data[jistart + 12091] = 0.0 + k[989]*y_cur[IDX_eM] + - k[6849]*y_cur[IDX_GRAINM]; - data[jistart + 12092] = 0.0 + k[991]*y_cur[IDX_eM] + - k[6880]*y_cur[IDX_GRAINM]; - data[jistart + 12093] = 0.0 + k[1388]*y_cur[IDX_CII] + - k[1516]*y_cur[IDX_C2H2II] + k[1616]*y_cur[IDX_C2H3II] + - k[1782]*y_cur[IDX_C3H2II] + k[2076]*y_cur[IDX_CH3II] + - k[2335]*y_cur[IDX_HII] + k[2476]*y_cur[IDX_C3H3II] + - k[2481]*y_cur[IDX_C5H2II] + k[2483]*y_cur[IDX_C6H2II] + - k[2485]*y_cur[IDX_CH2CCHII] + k[2681]*y_cur[IDX_H3II] + - k[3217]*y_cur[IDX_HeII] + k[6149]; - data[jistart + 12094] = 0.0 + k[4960]*y_cur[IDX_CI] + - k[5164]*y_cur[IDX_HI] + k[5396]*y_cur[IDX_OI]; - data[jistart + 12095] = 0.0 + k[446]*y_cur[IDX_H2II] + - k[1979]*y_cur[IDX_CH2II] + k[2337]*y_cur[IDX_HII] + - k[2338]*y_cur[IDX_HII] + k[2385]*y_cur[IDX_H2II] + - k[2495]*y_cur[IDX_CH3OH2II] + k[2682]*y_cur[IDX_H3II] + - k[3219]*y_cur[IDX_HeII] + k[5165]*y_cur[IDX_HI] + k[5836] + k[6152]; - data[jistart + 12096] = 0.0 + k[997]*y_cur[IDX_eM] + - k[6399]*y_cur[IDX_GRAINM]; - data[jistart + 12097] = 0.0 + k[2683]*y_cur[IDX_H3II] + - k[3222]*y_cur[IDX_HeII] + k[5837] + k[6156]; - data[jistart + 12098] = 0.0 + k[1004]*y_cur[IDX_eM] + - k[6349]*y_cur[IDX_GRAINM]; - data[jistart + 12099] = 0.0 + k[1006]*y_cur[IDX_eM] + - k[2502]*y_cur[IDX_SiI] + k[6376]*y_cur[IDX_GRAINM]; - data[jistart + 12100] = 0.0 + k[1011]*y_cur[IDX_eM] + - k[6432]*y_cur[IDX_GRAINM]; - data[jistart + 12101] = 0.0 - k[136]*y_cur[IDX_H2I] + - k[136]*y_cur[IDX_H2I] + k[447]*y_cur[IDX_H2II] + - k[1953]*y_cur[IDX_CHII] + k[2367]*y_cur[IDX_HM] + - k[2529]*y_cur[IDX_C3HII] + k[2563]*y_cur[IDX_PII] + - k[2565]*y_cur[IDX_PHII] + k[2567]*y_cur[IDX_PH2II] + - k[2684]*y_cur[IDX_H3II] + k[3490]*y_cur[IDX_NHII] + - k[5168]*y_cur[IDX_HI] + k[6161]; - data[jistart + 12102] = 0.0 + k[1012]*y_cur[IDX_eM] - - k[2442]*y_cur[IDX_H2I] + k[2505]*y_cur[IDX_C2H6I] + - k[3458]*y_cur[IDX_NI] + k[3733]*y_cur[IDX_OI] + - k[6340]*y_cur[IDX_GRAINM]; - data[jistart + 12103] = 0.0 + k[5167]*y_cur[IDX_HI]; - data[jistart + 12104] = 0.0 + k[448]*y_cur[IDX_H2II] + - k[1955]*y_cur[IDX_CHII] + k[1985]*y_cur[IDX_CH2II] + - k[2078]*y_cur[IDX_CH3II] + k[2339]*y_cur[IDX_HII] + - k[2340]*y_cur[IDX_HII] + k[2387]*y_cur[IDX_H2II] + - k[2388]*y_cur[IDX_H2II] + k[2388]*y_cur[IDX_H2II] + - k[2577]*y_cur[IDX_C3HII] + k[2686]*y_cur[IDX_H3II] + - k[3055]*y_cur[IDX_HSII] + k[3230]*y_cur[IDX_HeII] + - k[3363]*y_cur[IDX_N2II] + k[3829]*y_cur[IDX_SII] + - k[5169]*y_cur[IDX_HI] + k[5842] + k[6165]; - data[jistart + 12105] = 0.0 - k[2443]*y_cur[IDX_H2I] + - k[2842]*y_cur[IDX_HI] + k[3459]*y_cur[IDX_NI] + - k[3735]*y_cur[IDX_OI]; - data[jistart + 12106] = 0.0 + k[2685]*y_cur[IDX_H3II]; - data[jistart + 12107] = 0.0 + k[2341]*y_cur[IDX_HII] + - k[2687]*y_cur[IDX_H3II] + k[5843] + k[6166]; - data[jistart + 12108] = 0.0 + k[1024]*y_cur[IDX_eM] + - k[6586]*y_cur[IDX_GRAINM]; - data[jistart + 12109] = 0.0 + k[1025]*y_cur[IDX_eM] + - k[2583]*y_cur[IDX_C10I] + k[2584]*y_cur[IDX_C10H2I] + - k[2585]*y_cur[IDX_C10HI] + k[2586]*y_cur[IDX_C2I] + - k[2587]*y_cur[IDX_C2H2I] + k[2588]*y_cur[IDX_C2H3I] + - k[2589]*y_cur[IDX_C2H4I] + k[2589]*y_cur[IDX_C2H4I] + - k[2590]*y_cur[IDX_C2H4I] + k[2591]*y_cur[IDX_C2H5I] + - k[2592]*y_cur[IDX_C2H5OHI] + k[2592]*y_cur[IDX_C2H5OHI] + - k[2593]*y_cur[IDX_C2H5OHI] + k[2595]*y_cur[IDX_C2H5OHI] + - k[2595]*y_cur[IDX_C2H5OHI] + k[2596]*y_cur[IDX_C2H5OHI] + - k[2597]*y_cur[IDX_C2HI] + k[2598]*y_cur[IDX_C2NI] + - k[2599]*y_cur[IDX_C2OI] + k[2600]*y_cur[IDX_C2SI] + - k[2601]*y_cur[IDX_C3I] + k[2602]*y_cur[IDX_C3H2I] + - k[2603]*y_cur[IDX_C3HI] + k[2604]*y_cur[IDX_C3NI] + - k[2605]*y_cur[IDX_C3OI] + k[2606]*y_cur[IDX_C3PI] + - k[2607]*y_cur[IDX_C3SI] + k[2608]*y_cur[IDX_C4I] + - k[2609]*y_cur[IDX_C4H3I] + k[2610]*y_cur[IDX_C4HI] + - k[2611]*y_cur[IDX_C4PI] + k[2612]*y_cur[IDX_C4SI] + - k[2613]*y_cur[IDX_C5I] + k[2614]*y_cur[IDX_C5H2I] + - k[2615]*y_cur[IDX_C5HI] + k[2616]*y_cur[IDX_C5NI] + - k[2617]*y_cur[IDX_C6I] + k[2618]*y_cur[IDX_C6H2I] + - k[2619]*y_cur[IDX_C6H6I] + k[2620]*y_cur[IDX_C6HI] + - k[2621]*y_cur[IDX_C7I] + k[2622]*y_cur[IDX_C7H2I] + - k[2623]*y_cur[IDX_C7HI] + k[2624]*y_cur[IDX_C7NI] + - k[2625]*y_cur[IDX_C8I] + k[2626]*y_cur[IDX_C8H2I] + - k[2627]*y_cur[IDX_C8HI] + k[2628]*y_cur[IDX_C9I] + - k[2629]*y_cur[IDX_C9H2I] + k[2630]*y_cur[IDX_C9HI] + - k[2631]*y_cur[IDX_C9NI] + k[2632]*y_cur[IDX_CI] + - k[2633]*y_cur[IDX_CCPI] + k[2634]*y_cur[IDX_CH2I] + - k[2635]*y_cur[IDX_CH2CCH2I] + k[2635]*y_cur[IDX_CH2CCH2I] + - k[2636]*y_cur[IDX_CH2CCHI] + k[2637]*y_cur[IDX_CH2CHCNI] + - k[2638]*y_cur[IDX_CH2CNI] + k[2639]*y_cur[IDX_CH2COI] + - k[2640]*y_cur[IDX_CH2PHI] + k[2641]*y_cur[IDX_CH3I] + - k[2642]*y_cur[IDX_CH3C3NI] + k[2643]*y_cur[IDX_CH3C4HI] + - k[2644]*y_cur[IDX_CH3C5NI] + k[2645]*y_cur[IDX_CH3C6HI] + - k[2646]*y_cur[IDX_CH3C7NI] + k[2647]*y_cur[IDX_CH3CCHI] + - k[2647]*y_cur[IDX_CH3CCHI] + k[2648]*y_cur[IDX_C2H6I] + - k[2648]*y_cur[IDX_C2H6I] + k[2649]*y_cur[IDX_CH3CHCH2I] + - k[2650]*y_cur[IDX_CH3CHCH2I] + k[2650]*y_cur[IDX_CH3CHCH2I] + - k[2651]*y_cur[IDX_CH3CHOI] + k[2654]*y_cur[IDX_CH3CHOI] + - k[2655]*y_cur[IDX_CH3CHOI] + k[2655]*y_cur[IDX_CH3CHOI] + - k[2658]*y_cur[IDX_CH3CNI] + k[2660]*y_cur[IDX_CH3COCH3I] + - k[2662]*y_cur[IDX_CH3COCH3I] + k[2663]*y_cur[IDX_CH3COCH3I] + - k[2666]*y_cur[IDX_CH3OCH3I] + k[2667]*y_cur[IDX_CH3OHI] + - k[2668]*y_cur[IDX_CH3OHI] + k[2669]*y_cur[IDX_CH4I] + - k[2670]*y_cur[IDX_CHI] + k[2671]*y_cur[IDX_CNI] + - k[2672]*y_cur[IDX_CNOI] + k[2673]*y_cur[IDX_CNOI] + - k[2674]*y_cur[IDX_CO2I] + k[2675]*y_cur[IDX_COI] + - k[2676]*y_cur[IDX_COI] + k[2677]*y_cur[IDX_CPI] + - k[2678]*y_cur[IDX_CSI] + k[2679]*y_cur[IDX_ClI] + - k[2680]*y_cur[IDX_FeI] + k[2681]*y_cur[IDX_H2CCCI] + - k[2682]*y_cur[IDX_H2COI] + k[2683]*y_cur[IDX_H2CSI] + - k[2684]*y_cur[IDX_H2OI] + k[2685]*y_cur[IDX_H2S2I] + - k[2686]*y_cur[IDX_H2SI] + k[2687]*y_cur[IDX_H2SiOI] + - k[2688]*y_cur[IDX_HC2PI] + k[2689]*y_cur[IDX_HC3NI] + - k[2690]*y_cur[IDX_C4H2I] + k[2691]*y_cur[IDX_HC5NI] + - k[2692]*y_cur[IDX_HC7NI] + k[2693]*y_cur[IDX_HC9NI] + - k[2694]*y_cur[IDX_HCNI] + k[2695]*y_cur[IDX_HCNOI] + - k[2696]*y_cur[IDX_HCNOI] + k[2697]*y_cur[IDX_HCOI] + - k[2698]*y_cur[IDX_HCOOCH3I] + k[2699]*y_cur[IDX_HCOOHI] + - k[2700]*y_cur[IDX_HCOOHI] + k[2701]*y_cur[IDX_HCPI] + - k[2702]*y_cur[IDX_HCSI] + k[2703]*y_cur[IDX_HCSiI] + - k[2704]*y_cur[IDX_HClI] + k[2705]*y_cur[IDX_HFI] + - k[2706]*y_cur[IDX_HNCI] + k[2707]*y_cur[IDX_HNCOI] + - k[2708]*y_cur[IDX_HNCOI] + k[2709]*y_cur[IDX_HNOI] + - k[2710]*y_cur[IDX_HNSiI] + k[2711]*y_cur[IDX_HOCNI] + - k[2712]*y_cur[IDX_HOCNI] + k[2713]*y_cur[IDX_HONCI] + - k[2714]*y_cur[IDX_HPOI] + k[2715]*y_cur[IDX_HS2I] + - k[2716]*y_cur[IDX_HSI] + k[2717]*y_cur[IDX_MgI] + - k[2718]*y_cur[IDX_N2I] + k[2719]*y_cur[IDX_N2OI] + - k[2720]*y_cur[IDX_NCCNI] + k[2721]*y_cur[IDX_NH2I] + - k[2722]*y_cur[IDX_NH2CNI] + k[2723]*y_cur[IDX_NH3I] + - k[2724]*y_cur[IDX_NHI] + k[2725]*y_cur[IDX_NO2I] + - k[2726]*y_cur[IDX_NOI] + k[2727]*y_cur[IDX_NSI] + - k[2728]*y_cur[IDX_NaI] + k[2729]*y_cur[IDX_O2I] + - k[2731]*y_cur[IDX_OI] + k[2732]*y_cur[IDX_OCSI] + - k[2733]*y_cur[IDX_OHI] + k[2734]*y_cur[IDX_PI] + - k[2735]*y_cur[IDX_PH2I] + k[2736]*y_cur[IDX_PHI] + - k[2737]*y_cur[IDX_PNI] + k[2738]*y_cur[IDX_POI] + - k[2739]*y_cur[IDX_S2I] + k[2740]*y_cur[IDX_SI] + - k[2741]*y_cur[IDX_SO2I] + k[2742]*y_cur[IDX_SOI] + - k[2743]*y_cur[IDX_SiI] + k[2744]*y_cur[IDX_SiC2I] + - k[2745]*y_cur[IDX_SiC2H2I] + k[2746]*y_cur[IDX_SiC2HI] + - k[2747]*y_cur[IDX_SiC3I] + k[2748]*y_cur[IDX_SiC3HI] + - k[2749]*y_cur[IDX_SiC4I] + k[2750]*y_cur[IDX_SiCI] + - k[2751]*y_cur[IDX_SiCH2I] + k[2752]*y_cur[IDX_SiCH3I] + - k[2753]*y_cur[IDX_SiH2I] + k[2754]*y_cur[IDX_SiH3I] + - k[2755]*y_cur[IDX_SiH4I] + k[2756]*y_cur[IDX_SiHI] + - k[2757]*y_cur[IDX_SiNI] + k[2758]*y_cur[IDX_SiNCI] + - k[2759]*y_cur[IDX_SiO2I] + k[2760]*y_cur[IDX_SiOI] + - k[2761]*y_cur[IDX_SiSI] + k[3027]*y_cur[IDX_HNC3I] + - k[3767]*y_cur[IDX_OCNI] + k[3768]*y_cur[IDX_OCNI] + - k[3899]*y_cur[IDX_CM] + k[3934]*y_cur[IDX_C10M] + - k[3969]*y_cur[IDX_C10HM] + k[4004]*y_cur[IDX_C2M] + - k[4039]*y_cur[IDX_C2HM] + k[4074]*y_cur[IDX_C3M] + - k[4109]*y_cur[IDX_C3HM] + k[4144]*y_cur[IDX_C3NM] + - k[4179]*y_cur[IDX_C4M] + k[4214]*y_cur[IDX_C4HM] + - k[4249]*y_cur[IDX_C5M] + k[4284]*y_cur[IDX_C5HM] + - k[4319]*y_cur[IDX_C5NM] + k[4354]*y_cur[IDX_C6M] + - k[4389]*y_cur[IDX_C6HM] + k[4424]*y_cur[IDX_C7M] + - k[4459]*y_cur[IDX_C7HM] + k[4494]*y_cur[IDX_C8M] + - k[4529]*y_cur[IDX_C8HM] + k[4564]*y_cur[IDX_C9M] + - k[4599]*y_cur[IDX_C9HM] + k[4634]*y_cur[IDX_CHM] + - k[4669]*y_cur[IDX_CNM] + k[4705]*y_cur[IDX_HM] + - k[4740]*y_cur[IDX_OM] + k[4775]*y_cur[IDX_O2M] + - k[4810]*y_cur[IDX_OHM] + k[4845]*y_cur[IDX_SM] + - k[5628]*y_cur[IDX_CH3OI] + k[5634]*y_cur[IDX_CH2OHI] + - k[5640]*y_cur[IDX_CH3COI] + k[5645]*y_cur[IDX_COOHI] + - k[5650]*y_cur[IDX_COOCH3I] + k[5656]*y_cur[IDX_CH2OHCOI] + - k[5662]*y_cur[IDX_CH2OHCHOI] + k[5668]*y_cur[IDX_CH3COOHI] + k[6169] - + k[6310]*y_cur[IDX_GRAINM]; - data[jistart + 12110] = 0.0 + k[1027]*y_cur[IDX_eM] + - k[6666]*y_cur[IDX_GRAINM]; - data[jistart + 12111] = 0.0 + k[1028]*y_cur[IDX_eM] + - k[1029]*y_cur[IDX_eM] + k[6804]*y_cur[IDX_GRAINM] + - k[6805]*y_cur[IDX_GRAINM]; - data[jistart + 12112] = 0.0 + k[1030]*y_cur[IDX_eM] + - k[1031]*y_cur[IDX_eM] + k[6851]*y_cur[IDX_GRAINM] + - k[6852]*y_cur[IDX_GRAINM]; - data[jistart + 12113] = 0.0 + k[1032]*y_cur[IDX_eM] + - k[1033]*y_cur[IDX_eM] + k[6882]*y_cur[IDX_GRAINM] + - k[6883]*y_cur[IDX_GRAINM]; - data[jistart + 12114] = 0.0 + k[1036]*y_cur[IDX_eM] + - k[6416]*y_cur[IDX_GRAINM]; - data[jistart + 12115] = 0.0 + k[1039]*y_cur[IDX_eM] + - k[6601]*y_cur[IDX_GRAINM]; - data[jistart + 12116] = 0.0 + k[1042]*y_cur[IDX_eM] + - k[1043]*y_cur[IDX_eM] + k[1901]*y_cur[IDX_CI] + - k[2815]*y_cur[IDX_PI] + k[6344]*y_cur[IDX_GRAINM] + - k[6345]*y_cur[IDX_GRAINM]; - data[jistart + 12117] = 0.0 + k[1046]*y_cur[IDX_eM] + - k[1048]*y_cur[IDX_eM] + k[2843]*y_cur[IDX_HI] + - k[6451]*y_cur[IDX_GRAINM] + k[6453]*y_cur[IDX_GRAINM]; - data[jistart + 12118] = 0.0 + k[1050]*y_cur[IDX_eM] + - k[6771]*y_cur[IDX_GRAINM]; - data[jistart + 12119] = 0.0 + k[1052]*y_cur[IDX_eM] + - k[6591]*y_cur[IDX_GRAINM]; - data[jistart + 12120] = 0.0 + k[2688]*y_cur[IDX_H3II]; - data[jistart + 12121] = 0.0 + k[2689]*y_cur[IDX_H3II]; - data[jistart + 12122] = 0.0 - k[2444]*y_cur[IDX_H2I] - - k[2445]*y_cur[IDX_H2I]; - data[jistart + 12123] = 0.0 + k[1067]*y_cur[IDX_eM] + - k[6638]*y_cur[IDX_GRAINM]; - data[jistart + 12124] = 0.0 - k[2446]*y_cur[IDX_H2I]; - data[jistart + 12125] = 0.0 + k[2691]*y_cur[IDX_H3II]; - data[jistart + 12126] = 0.0 - k[2447]*y_cur[IDX_H2I]; - data[jistart + 12127] = 0.0 + k[1079]*y_cur[IDX_eM] + - k[6791]*y_cur[IDX_GRAINM]; - data[jistart + 12128] = 0.0 + k[2692]*y_cur[IDX_H3II]; - data[jistart + 12129] = 0.0 - k[2448]*y_cur[IDX_H2I]; - data[jistart + 12130] = 0.0 + k[2693]*y_cur[IDX_H3II]; - data[jistart + 12131] = 0.0 - k[2449]*y_cur[IDX_H2I]; - data[jistart + 12132] = 0.0 + k[449]*y_cur[IDX_H2II] + - k[1956]*y_cur[IDX_CHII] + k[2368]*y_cur[IDX_HM] + - k[2694]*y_cur[IDX_H3II] + k[5170]*y_cur[IDX_HI]; - data[jistart + 12133] = 0.0 - k[2450]*y_cur[IDX_H2I]; - data[jistart + 12134] = 0.0 + k[2896]*y_cur[IDX_SiI]; - data[jistart + 12135] = 0.0 + k[2695]*y_cur[IDX_H3II] + - k[2696]*y_cur[IDX_H3II]; - data[jistart + 12136] = 0.0 - k[2897]*y_cur[IDX_H2I] - - k[2898]*y_cur[IDX_H2I]; - data[jistart + 12137] = 0.0 + k[450]*y_cur[IDX_H2II] + - k[2344]*y_cur[IDX_HII] + k[2697]*y_cur[IDX_H3II] + - k[5171]*y_cur[IDX_HI] + k[5204]*y_cur[IDX_HCOI] + - k[5204]*y_cur[IDX_HCOI]; - data[jistart + 12138] = 0.0 + k[2698]*y_cur[IDX_H3II]; - data[jistart + 12139] = 0.0 + k[2699]*y_cur[IDX_H3II] + - k[2700]*y_cur[IDX_H3II]; - data[jistart + 12140] = 0.0 + k[2701]*y_cur[IDX_H3II]; - data[jistart + 12141] = 0.0 - k[2451]*y_cur[IDX_H2I]; - data[jistart + 12142] = 0.0 + k[2346]*y_cur[IDX_HII] + - k[2702]*y_cur[IDX_H3II] + k[5173]*y_cur[IDX_HI]; - data[jistart + 12143] = 0.0 + k[2347]*y_cur[IDX_HII] + - k[2703]*y_cur[IDX_H3II]; - data[jistart + 12144] = 0.0 - k[2452]*y_cur[IDX_H2I]; - data[jistart + 12145] = 0.0 + k[2083]*y_cur[IDX_CH3II] + - k[2704]*y_cur[IDX_H3II] + k[5211]*y_cur[IDX_HI]; - data[jistart + 12146] = 0.0 - k[2453]*y_cur[IDX_H2I]; - data[jistart + 12147] = 0.0 + k[2705]*y_cur[IDX_H3II]; - data[jistart + 12148] = 0.0 - k[2454]*y_cur[IDX_H2I]; - data[jistart + 12149] = 0.0 + k[2706]*y_cur[IDX_H3II]; - data[jistart + 12150] = 0.0 + k[3022]*y_cur[IDX_HII] + - k[3027]*y_cur[IDX_H3II]; - data[jistart + 12151] = 0.0 + k[2707]*y_cur[IDX_H3II] + - k[2708]*y_cur[IDX_H3II]; - data[jistart + 12152] = 0.0 - k[3047]*y_cur[IDX_H2I] - - k[3048]*y_cur[IDX_H2I]; - data[jistart + 12153] = 0.0 + k[2349]*y_cur[IDX_HII] + - k[2709]*y_cur[IDX_H3II] + k[5176]*y_cur[IDX_HI]; - data[jistart + 12154] = 0.0 + k[2350]*y_cur[IDX_HII] + - k[2710]*y_cur[IDX_H3II]; - data[jistart + 12155] = 0.0 - k[2455]*y_cur[IDX_H2I]; - data[jistart + 12156] = 0.0 - k[137]*y_cur[IDX_H2I] + - k[137]*y_cur[IDX_H2I]; - data[jistart + 12157] = 0.0 + k[2711]*y_cur[IDX_H3II] + - k[2712]*y_cur[IDX_H3II]; - data[jistart + 12158] = 0.0 - k[3051]*y_cur[IDX_H2I] - - k[3052]*y_cur[IDX_H2I]; - data[jistart + 12159] = 0.0 + k[2713]*y_cur[IDX_H3II]; - data[jistart + 12160] = 0.0 - k[3053]*y_cur[IDX_H2I]; - data[jistart + 12161] = 0.0 + k[2714]*y_cur[IDX_H3II]; - data[jistart + 12162] = 0.0 + k[2084]*y_cur[IDX_CH3II] + - k[2353]*y_cur[IDX_HII] + k[2716]*y_cur[IDX_H3II] - - k[5140]*y_cur[IDX_H2I] + k[5178]*y_cur[IDX_HI]; - data[jistart + 12163] = 0.0 + k[2203]*y_cur[IDX_CH4I] - - k[2456]*y_cur[IDX_H2I] + k[2844]*y_cur[IDX_HI] + - k[3055]*y_cur[IDX_H2SI] - k[5557]*y_cur[IDX_H2I]; - data[jistart + 12164] = 0.0 + k[2715]*y_cur[IDX_H3II]; - data[jistart + 12165] = 0.0 - k[5558]*y_cur[IDX_H2I]; - data[jistart + 12166] = 0.0 - k[458]*y_cur[IDX_H2I] - - k[2457]*y_cur[IDX_H2I] + k[3074]*y_cur[IDX_C2H2I] + - k[3077]*y_cur[IDX_C2H3I] + k[3079]*y_cur[IDX_C2H4I] + - k[3080]*y_cur[IDX_C2H4I] + k[3083]*y_cur[IDX_C2H5I] + - k[3120]*y_cur[IDX_C5H2I] + k[3128]*y_cur[IDX_C6H2I] + - k[3137]*y_cur[IDX_C7H2I] + k[3145]*y_cur[IDX_C8H2I] + - k[3152]*y_cur[IDX_C9H2I] + k[3160]*y_cur[IDX_CH2I] + - k[3162]*y_cur[IDX_CH2CCHI] + k[3163]*y_cur[IDX_CH2CCHI] + - k[3167]*y_cur[IDX_CH2CHCNI] + k[3176]*y_cur[IDX_CH3I] + - k[3178]*y_cur[IDX_CH3C4HI] + k[3181]*y_cur[IDX_CH3C6HI] + - k[3184]*y_cur[IDX_CH3CCHI] + k[3184]*y_cur[IDX_CH3CCHI] + - k[3185]*y_cur[IDX_CH3CCHI] + k[3186]*y_cur[IDX_CH3CCHI] + - k[3188]*y_cur[IDX_C2H6I] + k[3188]*y_cur[IDX_C2H6I] + - k[3189]*y_cur[IDX_C2H6I] + k[3190]*y_cur[IDX_C2H6I] + - k[3198]*y_cur[IDX_CH4I] + k[3199]*y_cur[IDX_CH4I] + - k[3217]*y_cur[IDX_H2CCCI] + k[3219]*y_cur[IDX_H2COI] + - k[3222]*y_cur[IDX_H2CSI] + k[3230]*y_cur[IDX_H2SI] + - k[3239]*y_cur[IDX_C4H2I] + k[3280]*y_cur[IDX_NH2I] + - k[3283]*y_cur[IDX_NH3I] + k[3298]*y_cur[IDX_PH2I] + - k[3322]*y_cur[IDX_SiH2I] + k[3324]*y_cur[IDX_SiH3I] + - k[3326]*y_cur[IDX_SiH4I] + k[3326]*y_cur[IDX_SiH4I] + - k[3327]*y_cur[IDX_SiH4I]; - data[jistart + 12167] = 0.0 - k[2458]*y_cur[IDX_H2I]; - data[jistart + 12168] = 0.0 + k[2717]*y_cur[IDX_H3II]; - data[jistart + 12169] = 0.0 + k[3387]*y_cur[IDX_C2H2II] + - k[3390]*y_cur[IDX_C2H3II] + k[3399]*y_cur[IDX_C3H4II] + - k[3401]*y_cur[IDX_C3H5II] + k[3417]*y_cur[IDX_C5H5II] + - k[3435]*y_cur[IDX_C7H5II] + k[3458]*y_cur[IDX_H2OII] + - k[3459]*y_cur[IDX_H2SII] + k[3473]*y_cur[IDX_SiH3II] - - k[5141]*y_cur[IDX_H2I] + k[5256]*y_cur[IDX_CH2CCHI] + - k[5258]*y_cur[IDX_CH3I] + k[5295]*y_cur[IDX_SiH3I]; - data[jistart + 12170] = 0.0 - k[2459]*y_cur[IDX_H2I] + - k[3341]*y_cur[IDX_CH4I] + k[3353]*y_cur[IDX_NH3I]; - data[jistart + 12171] = 0.0 + k[2718]*y_cur[IDX_H3II]; - data[jistart + 12172] = 0.0 + k[2204]*y_cur[IDX_CH4I] - - k[2460]*y_cur[IDX_H2I] + k[3363]*y_cur[IDX_H2SI]; - data[jistart + 12173] = 0.0 + k[3369]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 12174] = 0.0 + k[2085]*y_cur[IDX_CH3II] + - k[2719]*y_cur[IDX_H3II]; - data[jistart + 12175] = 0.0 + k[2720]*y_cur[IDX_H3II]; - data[jistart + 12176] = 0.0 + k[453]*y_cur[IDX_H2II] + - k[1965]*y_cur[IDX_CHII] + k[2724]*y_cur[IDX_H3II] + - k[3608]*y_cur[IDX_CH3II] - k[5143]*y_cur[IDX_H2I] + - k[5184]*y_cur[IDX_HI] + k[5308]*y_cur[IDX_NHI] + - k[5308]*y_cur[IDX_NHI]; - data[jistart + 12177] = 0.0 - k[2461]*y_cur[IDX_H2I] - - k[2462]*y_cur[IDX_H2I] + k[3490]*y_cur[IDX_H2OI]; - data[jistart + 12178] = 0.0 + k[451]*y_cur[IDX_H2II] + - k[1962]*y_cur[IDX_CHII] + k[2721]*y_cur[IDX_H3II] + - k[3280]*y_cur[IDX_HeII] - k[5142]*y_cur[IDX_H2I] + - k[5182]*y_cur[IDX_HI]; - data[jistart + 12179] = 0.0 - k[2463]*y_cur[IDX_H2I]; - data[jistart + 12180] = 0.0 + k[2722]*y_cur[IDX_H3II]; - data[jistart + 12181] = 0.0 + k[452]*y_cur[IDX_H2II] + - k[1419]*y_cur[IDX_CII] + k[1963]*y_cur[IDX_CHII] + - k[2087]*y_cur[IDX_CH3II] + k[2723]*y_cur[IDX_H3II] + - k[3283]*y_cur[IDX_HeII] + k[3353]*y_cur[IDX_NII] + - k[3555]*y_cur[IDX_C2HII] + k[3597]*y_cur[IDX_PHII] + - k[3600]*y_cur[IDX_PH2II] + k[5183]*y_cur[IDX_HI] + k[5887] + - k[6223]; - data[jistart + 12182] = 0.0 - k[2464]*y_cur[IDX_H2I] + - k[3747]*y_cur[IDX_OI]; - data[jistart + 12183] = 0.0 + k[1165]*y_cur[IDX_eM] + - k[1911]*y_cur[IDX_CI] + k[6337]*y_cur[IDX_GRAINM]; - data[jistart + 12184] = 0.0 + k[454]*y_cur[IDX_H2II] + - k[2726]*y_cur[IDX_H3II]; - data[jistart + 12185] = 0.0 + k[2725]*y_cur[IDX_H3II]; - data[jistart + 12186] = 0.0 - k[2465]*y_cur[IDX_H2I]; - data[jistart + 12187] = 0.0 + k[2727]*y_cur[IDX_H3II]; - data[jistart + 12188] = 0.0 + k[2728]*y_cur[IDX_H3II]; - data[jistart + 12189] = 0.0 + k[2091]*y_cur[IDX_CH3II] + - k[2731]*y_cur[IDX_H3II] + k[3690]*y_cur[IDX_C2H3II] + - k[3728]*y_cur[IDX_CH5II] + k[3733]*y_cur[IDX_H2OII] + - k[3735]*y_cur[IDX_H2SII] + k[3747]*y_cur[IDX_NH3II] + - k[3759]*y_cur[IDX_SiH3II] + k[3760]*y_cur[IDX_SiH5II] + - k[5012]*y_cur[IDX_CH2I] + k[5043]*y_cur[IDX_CH3I] - - k[5147]*y_cur[IDX_H2I] + k[5347]*y_cur[IDX_C2H4I] + - k[5396]*y_cur[IDX_H2CNI] + k[5435]*y_cur[IDX_PH2I] + - k[5445]*y_cur[IDX_SiH2I]; - data[jistart + 12190] = 0.0 - k[2466]*y_cur[IDX_H2I]; - data[jistart + 12191] = 0.0 - k[83]*y_cur[IDX_H2I] - - k[2467]*y_cur[IDX_H2I] + k[4740]*y_cur[IDX_H3II]; - data[jistart + 12192] = 0.0 - k[138]*y_cur[IDX_H2I] + - k[138]*y_cur[IDX_H2I] + k[455]*y_cur[IDX_H2II] + - k[2729]*y_cur[IDX_H3II] + k[5007]*y_cur[IDX_CH2I] - - k[5144]*y_cur[IDX_H2I] - k[5145]*y_cur[IDX_H2I]; - data[jistart + 12193] = 0.0 + k[4775]*y_cur[IDX_H3II]; - data[jistart + 12194] = 0.0 - k[5146]*y_cur[IDX_H2I] + - k[5192]*y_cur[IDX_HI]; - data[jistart + 12195] = 0.0 - k[2468]*y_cur[IDX_H2I]; - data[jistart + 12196] = 0.0 + k[3767]*y_cur[IDX_H3II] + - k[3768]*y_cur[IDX_H3II]; - data[jistart + 12197] = 0.0 - k[3765]*y_cur[IDX_H2I] - - k[3766]*y_cur[IDX_H2I]; - data[jistart + 12198] = 0.0 + k[2732]*y_cur[IDX_H3II]; - data[jistart + 12199] = 0.0 - k[139]*y_cur[IDX_H2I] + - k[139]*y_cur[IDX_H2I] + k[456]*y_cur[IDX_H2II] + - k[1972]*y_cur[IDX_CHII] + k[2093]*y_cur[IDX_CH3II] + - k[2733]*y_cur[IDX_H3II] + k[5046]*y_cur[IDX_CH3I] - - k[5148]*y_cur[IDX_H2I] + k[5198]*y_cur[IDX_HI]; - data[jistart + 12200] = 0.0 - k[2469]*y_cur[IDX_H2I] + - k[3771]*y_cur[IDX_C2H6I] + k[3773]*y_cur[IDX_C2H6I]; - data[jistart + 12201] = 0.0 + k[4810]*y_cur[IDX_H3II]; - data[jistart + 12202] = 0.0 + k[2734]*y_cur[IDX_H3II] + - k[2815]*y_cur[IDX_H3OII]; - data[jistart + 12203] = 0.0 + k[1710]*y_cur[IDX_C2H4I] + - k[2211]*y_cur[IDX_CH4I] + k[2563]*y_cur[IDX_H2OI] - - k[5559]*y_cur[IDX_H2I]; - data[jistart + 12204] = 0.0 + k[1181]*y_cur[IDX_eM] + - k[6680]*y_cur[IDX_GRAINM]; - data[jistart + 12205] = 0.0 + k[1184]*y_cur[IDX_eM] + - k[1185]*y_cur[IDX_eM] + k[6685]*y_cur[IDX_GRAINM] + - k[6686]*y_cur[IDX_GRAINM]; - data[jistart + 12206] = 0.0 + k[1187]*y_cur[IDX_eM] + - k[1187]*y_cur[IDX_eM] + k[1188]*y_cur[IDX_eM] + - k[6689]*y_cur[IDX_GRAINM] + k[6689]*y_cur[IDX_GRAINM] + - k[6690]*y_cur[IDX_GRAINM]; - data[jistart + 12207] = 0.0 + k[1197]*y_cur[IDX_eM] + - k[6569]*y_cur[IDX_GRAINM]; - data[jistart + 12208] = 0.0 + k[1199]*y_cur[IDX_eM] + - k[1200]*y_cur[IDX_eM] + k[6578]*y_cur[IDX_GRAINM] + - k[6579]*y_cur[IDX_GRAINM]; - data[jistart + 12209] = 0.0 + k[1203]*y_cur[IDX_eM] + - k[6597]*y_cur[IDX_GRAINM]; - data[jistart + 12210] = 0.0 + k[2736]*y_cur[IDX_H3II]; - data[jistart + 12211] = 0.0 + k[1711]*y_cur[IDX_C2H4I] + - k[2212]*y_cur[IDX_CH4I] + k[2565]*y_cur[IDX_H2OI] + - k[3597]*y_cur[IDX_NH3I] - k[5560]*y_cur[IDX_H2I]; - data[jistart + 12212] = 0.0 + k[2735]*y_cur[IDX_H3II] + - k[3298]*y_cur[IDX_HeII] + k[5435]*y_cur[IDX_OI]; - data[jistart + 12213] = 0.0 + k[1206]*y_cur[IDX_eM] + - k[1571]*y_cur[IDX_C2H2I] + k[1713]*y_cur[IDX_C2H4I] + - k[2214]*y_cur[IDX_CH4I] + k[2567]*y_cur[IDX_H2OI] + - k[3600]*y_cur[IDX_NH3I] + k[6434]*y_cur[IDX_GRAINM]; - data[jistart + 12214] = 0.0 + k[1210]*y_cur[IDX_eM] + - k[1572]*y_cur[IDX_C2H2I] + k[6449]*y_cur[IDX_GRAINM]; - data[jistart + 12215] = 0.0 + k[2737]*y_cur[IDX_H3II]; - data[jistart + 12216] = 0.0 + k[1214]*y_cur[IDX_eM] + - k[6595]*y_cur[IDX_GRAINM]; - data[jistart + 12217] = 0.0 + k[1217]*y_cur[IDX_eM] + - k[6619]*y_cur[IDX_GRAINM]; - data[jistart + 12218] = 0.0 + k[2738]*y_cur[IDX_H3II]; - data[jistart + 12219] = 0.0 + k[1527]*y_cur[IDX_C2H2II] + - k[1625]*y_cur[IDX_C2H3II] + k[1679]*y_cur[IDX_C2H4II] + - k[2095]*y_cur[IDX_CH3II] + k[2740]*y_cur[IDX_H3II] + - k[3835]*y_cur[IDX_C3H3II] + k[3837]*y_cur[IDX_C4H3II] + - k[3838]*y_cur[IDX_CH2CCHII] + k[5019]*y_cur[IDX_CH2I] - - k[5149]*y_cur[IDX_H2I]; - data[jistart + 12220] = 0.0 + k[1645]*y_cur[IDX_C2H3I] + - k[2216]*y_cur[IDX_CH4I] - k[2470]*y_cur[IDX_H2I] + - k[3829]*y_cur[IDX_H2SI] - k[5561]*y_cur[IDX_H2I]; - data[jistart + 12221] = 0.0 + k[4845]*y_cur[IDX_H3II]; - data[jistart + 12222] = 0.0 + k[2739]*y_cur[IDX_H3II]; - data[jistart + 12223] = 0.0 + k[2096]*y_cur[IDX_CH3II] + - k[2742]*y_cur[IDX_H3II]; - data[jistart + 12224] = 0.0 + k[2741]*y_cur[IDX_H3II]; - data[jistart + 12225] = 0.0 - k[2471]*y_cur[IDX_H2I]; - data[jistart + 12226] = 0.0 + k[1529]*y_cur[IDX_C2H2II] + - k[1626]*y_cur[IDX_C2H3II] + k[1680]*y_cur[IDX_C2H4II] + - k[2097]*y_cur[IDX_CH3II] + k[2236]*y_cur[IDX_CH5II] + - k[2502]*y_cur[IDX_H2NCII] + k[2743]*y_cur[IDX_H3II] + - k[2896]*y_cur[IDX_HCNHII] + k[3873]*y_cur[IDX_C3H2II] + - k[3875]*y_cur[IDX_C3H3II] + k[3877]*y_cur[IDX_C4H2II] + - k[3879]*y_cur[IDX_CH2CCHII] + k[4879]*y_cur[IDX_C2H2I] + - k[4885]*y_cur[IDX_C2H4I]; - data[jistart + 12227] = 0.0 + k[2102]*y_cur[IDX_CH3I] - - k[5562]*y_cur[IDX_H2I]; - data[jistart + 12228] = 0.0 + k[2750]*y_cur[IDX_H3II]; - data[jistart + 12229] = 0.0 - k[2472]*y_cur[IDX_H2I]; - data[jistart + 12230] = 0.0 + k[2744]*y_cur[IDX_H3II]; - data[jistart + 12231] = 0.0 - k[2473]*y_cur[IDX_H2I]; - data[jistart + 12232] = 0.0 + k[2358]*y_cur[IDX_HII] + - k[2746]*y_cur[IDX_H3II]; - data[jistart + 12233] = 0.0 + k[1576]*y_cur[IDX_C2H2I] - - k[5563]*y_cur[IDX_H2I]; - data[jistart + 12234] = 0.0 + k[2357]*y_cur[IDX_HII] + - k[2745]*y_cur[IDX_H3II] + k[5919]; - data[jistart + 12235] = 0.0 + k[1228]*y_cur[IDX_eM] + - k[6660]*y_cur[IDX_GRAINM]; - data[jistart + 12236] = 0.0 + k[1231]*y_cur[IDX_eM] + - k[6665]*y_cur[IDX_GRAINM]; - data[jistart + 12237] = 0.0 + k[2747]*y_cur[IDX_H3II]; - data[jistart + 12238] = 0.0 + k[2359]*y_cur[IDX_HII] + - k[2748]*y_cur[IDX_H3II]; - data[jistart + 12239] = 0.0 + k[1236]*y_cur[IDX_eM] + - k[6767]*y_cur[IDX_GRAINM]; - data[jistart + 12240] = 0.0 + k[2749]*y_cur[IDX_H3II]; - data[jistart + 12241] = 0.0 + k[1435]*y_cur[IDX_CII] + - k[2360]*y_cur[IDX_HII] + k[2751]*y_cur[IDX_H3II] + k[5925]; - data[jistart + 12242] = 0.0 + k[1244]*y_cur[IDX_eM] + - k[1921]*y_cur[IDX_CI] + k[6498]*y_cur[IDX_GRAINM]; - data[jistart + 12243] = 0.0 + k[1437]*y_cur[IDX_CII] + - k[2361]*y_cur[IDX_HII] + k[2752]*y_cur[IDX_H3II]; - data[jistart + 12244] = 0.0 + k[1245]*y_cur[IDX_eM] + - k[6516]*y_cur[IDX_GRAINM]; - data[jistart + 12245] = 0.0 + k[1247]*y_cur[IDX_eM] + - k[6541]*y_cur[IDX_GRAINM]; - data[jistart + 12246] = 0.0 + k[2100]*y_cur[IDX_CH3II] + - k[2365]*y_cur[IDX_HII] + k[2756]*y_cur[IDX_H3II]; - data[jistart + 12247] = 0.0 + k[2848]*y_cur[IDX_HI] - - k[5564]*y_cur[IDX_H2I]; - data[jistart + 12248] = 0.0 + k[1440]*y_cur[IDX_CII] + - k[2362]*y_cur[IDX_HII] + k[2753]*y_cur[IDX_H3II] + - k[3322]*y_cur[IDX_HeII] + k[5445]*y_cur[IDX_OI]; - data[jistart + 12249] = 0.0 + k[1251]*y_cur[IDX_eM] + - k[6402]*y_cur[IDX_GRAINM]; - data[jistart + 12250] = 0.0 + k[1441]*y_cur[IDX_CII] + - k[2363]*y_cur[IDX_HII] + k[2754]*y_cur[IDX_H3II] + - k[3324]*y_cur[IDX_HeII] + k[5295]*y_cur[IDX_NI] + k[6276]; - data[jistart + 12251] = 0.0 + k[1255]*y_cur[IDX_eM] + - k[3473]*y_cur[IDX_NI] + k[3759]*y_cur[IDX_OI] - - k[5565]*y_cur[IDX_H2I] + k[6413]*y_cur[IDX_GRAINM]; - data[jistart + 12252] = 0.0 + k[1443]*y_cur[IDX_CII] + - k[1531]*y_cur[IDX_C2H2II] + k[2238]*y_cur[IDX_CH5II] + - k[2364]*y_cur[IDX_HII] + k[2755]*y_cur[IDX_H3II] + - k[3326]*y_cur[IDX_HeII] + k[3326]*y_cur[IDX_HeII] + - k[3327]*y_cur[IDX_HeII] + k[5929] + k[6277] + k[6279]; - data[jistart + 12253] = 0.0 + k[1256]*y_cur[IDX_eM] + - k[1928]*y_cur[IDX_CI] - k[2474]*y_cur[IDX_H2I] + - k[6426]*y_cur[IDX_GRAINM]; - data[jistart + 12254] = 0.0 + k[1258]*y_cur[IDX_eM] + - k[3760]*y_cur[IDX_OI] + k[6438]*y_cur[IDX_GRAINM]; - data[jistart + 12255] = 0.0 + k[2757]*y_cur[IDX_H3II]; - data[jistart + 12256] = 0.0 + k[2758]*y_cur[IDX_H3II]; - data[jistart + 12257] = 0.0 + k[1265]*y_cur[IDX_eM] + - k[1930]*y_cur[IDX_CI] + k[6553]*y_cur[IDX_GRAINM]; - data[jistart + 12258] = 0.0 + k[2760]*y_cur[IDX_H3II]; - data[jistart + 12259] = 0.0 - k[2475]*y_cur[IDX_H2I]; - data[jistart + 12260] = 0.0 + k[2759]*y_cur[IDX_H3II]; - data[jistart + 12261] = 0.0 + k[2761]*y_cur[IDX_H3II]; - data[jistart + 12262] = 0.0 - k[140]*y_cur[IDX_H2I] + - k[745]*y_cur[IDX_C2H3II] + k[746]*y_cur[IDX_C2H3II] + - k[749]*y_cur[IDX_C2H3II] + k[750]*y_cur[IDX_C2H3II] + - k[757]*y_cur[IDX_C2H4II] + k[760]*y_cur[IDX_C2H4II] + - k[764]*y_cur[IDX_C2H5II] + k[778]*y_cur[IDX_C2H7II] + - k[793]*y_cur[IDX_C3H2II] + k[803]*y_cur[IDX_C3H5II] + - k[805]*y_cur[IDX_C3H6II] + k[806]*y_cur[IDX_C3H6II] + - k[807]*y_cur[IDX_C3H7II] + k[810]*y_cur[IDX_C3H7II] + - k[811]*y_cur[IDX_C3H7II] + k[824]*y_cur[IDX_C4H3II] + - k[827]*y_cur[IDX_C4H5II] + k[827]*y_cur[IDX_C4H5II] + - k[829]*y_cur[IDX_C4H5II] + k[830]*y_cur[IDX_C4H7II] + - k[830]*y_cur[IDX_C4H7II] + k[841]*y_cur[IDX_C5H2II] + - k[844]*y_cur[IDX_C5H3II] + k[845]*y_cur[IDX_C5H5II] + - k[852]*y_cur[IDX_C6H2II] + k[855]*y_cur[IDX_C6H3II] + - k[856]*y_cur[IDX_C6H4II] + k[857]*y_cur[IDX_C6H4II] + - k[858]*y_cur[IDX_C6H5II] + k[859]*y_cur[IDX_C6H5II] + - k[859]*y_cur[IDX_C6H5II] + k[860]*y_cur[IDX_C6H6II] + - k[860]*y_cur[IDX_C6H6II] + k[861]*y_cur[IDX_C6H7II] + - k[861]*y_cur[IDX_C6H7II] + k[868]*y_cur[IDX_C7H2II] + - k[871]*y_cur[IDX_C7H3II] + k[872]*y_cur[IDX_C7H4II] + - k[873]*y_cur[IDX_C7H4II] + k[874]*y_cur[IDX_C7H5II] + - k[881]*y_cur[IDX_C8H2II] + k[884]*y_cur[IDX_C8H3II] + - k[885]*y_cur[IDX_C8H4II] + k[886]*y_cur[IDX_C8H4II] + - k[887]*y_cur[IDX_C8H5II] + k[888]*y_cur[IDX_C8H5II] + - k[888]*y_cur[IDX_C8H5II] + k[893]*y_cur[IDX_C9H2II] + - k[896]*y_cur[IDX_C9H3II] + k[897]*y_cur[IDX_C9H4II] + - k[898]*y_cur[IDX_C9H4II] + k[899]*y_cur[IDX_C9H5II] + - k[900]*y_cur[IDX_C9H5II] + k[900]*y_cur[IDX_C9H5II] + - k[907]*y_cur[IDX_CH2II] + k[912]*y_cur[IDX_CH2CHCNII] + - k[924]*y_cur[IDX_CH3II] + k[929]*y_cur[IDX_CH3C4HII] + - k[930]*y_cur[IDX_CH3C4HII] + k[935]*y_cur[IDX_C2H6II] + - k[967]*y_cur[IDX_CH3OH2II] + k[970]*y_cur[IDX_CH3NHII] + - k[970]*y_cur[IDX_CH3NHII] + k[971]*y_cur[IDX_CH3NHII] + - k[972]*y_cur[IDX_CH5II] + k[973]*y_cur[IDX_CH5II] + - k[976]*y_cur[IDX_CH5II] + k[976]*y_cur[IDX_CH5II] + - k[989]*y_cur[IDX_H2C7NII] + k[991]*y_cur[IDX_H2C9NII] + - k[997]*y_cur[IDX_H2COII] + k[1004]*y_cur[IDX_H2FII] + - k[1006]*y_cur[IDX_H2NCII] + k[1011]*y_cur[IDX_H2NOII] + - k[1012]*y_cur[IDX_H2OII] + k[1024]*y_cur[IDX_H2SiOII] + - k[1025]*y_cur[IDX_H3II] + k[1027]*y_cur[IDX_H3C3OII] + - k[1028]*y_cur[IDX_H3C5NII] + k[1029]*y_cur[IDX_H3C5NII] + - k[1030]*y_cur[IDX_H3C7NII] + k[1031]*y_cur[IDX_H3C7NII] + - k[1032]*y_cur[IDX_H3C9NII] + k[1033]*y_cur[IDX_H3C9NII] + - k[1036]*y_cur[IDX_H3COII] + k[1039]*y_cur[IDX_H3CSII] + - k[1042]*y_cur[IDX_H3OII] + k[1043]*y_cur[IDX_H3OII] + - k[1046]*y_cur[IDX_H3SII] + k[1048]*y_cur[IDX_H3SII] + - k[1050]*y_cur[IDX_H3S2II] + k[1052]*y_cur[IDX_H3SiOII] + - k[1067]*y_cur[IDX_HC3NHII] + k[1079]*y_cur[IDX_HC5NHII] + - k[1165]*y_cur[IDX_NH4II] + k[1181]*y_cur[IDX_PC2H2II] + - k[1184]*y_cur[IDX_PC2H3II] + k[1185]*y_cur[IDX_PC2H3II] + - k[1187]*y_cur[IDX_PC2H4II] + k[1187]*y_cur[IDX_PC2H4II] + - k[1188]*y_cur[IDX_PC2H4II] + k[1197]*y_cur[IDX_PCH2II] + - k[1199]*y_cur[IDX_PCH3II] + k[1200]*y_cur[IDX_PCH3II] + - k[1203]*y_cur[IDX_PCH4II] + k[1206]*y_cur[IDX_PH2II] + - k[1210]*y_cur[IDX_PH3II] + k[1214]*y_cur[IDX_PNH2II] + - k[1217]*y_cur[IDX_PNH3II] + k[1228]*y_cur[IDX_SiC2H2II] + - k[1231]*y_cur[IDX_SiC2H3II] + k[1236]*y_cur[IDX_SiC3H2II] + - k[1244]*y_cur[IDX_SiCH2II] + k[1245]*y_cur[IDX_SiCH3II] + - k[1247]*y_cur[IDX_SiCH4II] + k[1251]*y_cur[IDX_SiH2II] + - k[1255]*y_cur[IDX_SiH3II] + k[1256]*y_cur[IDX_SiH4II] + - k[1258]*y_cur[IDX_SiH5II] + k[1265]*y_cur[IDX_SiNH2II]; - data[jistart + 12263] = 0.0 - k[2374]*y_cur[IDX_H2II]; - data[jistart + 12264] = 0.0 - k[436]*y_cur[IDX_H2II] - - k[2369]*y_cur[IDX_H2II]; - data[jistart + 12265] = 0.0 - k[439]*y_cur[IDX_H2II] - - k[2373]*y_cur[IDX_H2II]; - data[jistart + 12266] = 0.0 - k[437]*y_cur[IDX_H2II] - - k[2370]*y_cur[IDX_H2II]; - data[jistart + 12267] = 0.0 - k[438]*y_cur[IDX_H2II] - - k[2371]*y_cur[IDX_H2II] - k[2372]*y_cur[IDX_H2II]; - data[jistart + 12268] = 0.0 - k[441]*y_cur[IDX_H2II] - - k[2376]*y_cur[IDX_H2II] - k[2377]*y_cur[IDX_H2II]; - data[jistart + 12269] = 0.0 - k[443]*y_cur[IDX_H2II] - - k[2380]*y_cur[IDX_H2II]; - data[jistart + 12270] = 0.0 - k[440]*y_cur[IDX_H2II] - - k[2375]*y_cur[IDX_H2II]; - data[jistart + 12271] = 0.0 - k[442]*y_cur[IDX_H2II] - - k[2378]*y_cur[IDX_H2II] - k[2379]*y_cur[IDX_H2II]; - data[jistart + 12272] = 0.0 - k[444]*y_cur[IDX_H2II] - - k[2381]*y_cur[IDX_H2II]; - data[jistart + 12273] = 0.0 - k[445]*y_cur[IDX_H2II] - - k[2383]*y_cur[IDX_H2II]; - data[jistart + 12274] = 0.0 - k[2382]*y_cur[IDX_H2II]; - data[jistart + 12275] = 0.0 + k[457]*y_cur[IDX_H2I]; - data[jistart + 12276] = 0.0 - k[6309]*y_cur[IDX_H2II]; - data[jistart + 12277] = 0.0 - k[489]*y_cur[IDX_H2II] + - k[2845]*y_cur[IDX_HeHII] + k[5546]*y_cur[IDX_HII]; - data[jistart + 12278] = 0.0 + k[2345]*y_cur[IDX_HCOI] + - k[5546]*y_cur[IDX_HI]; - data[jistart + 12279] = 0.0 - k[4702]*y_cur[IDX_H2II]; - data[jistart + 12280] = 0.0 + k[457]*y_cur[IDX_FII] + - k[458]*y_cur[IDX_HeII] - k[2384]*y_cur[IDX_H2II] + k[5680]; - data[jistart + 12281] = 0.0 - k[436]*y_cur[IDX_C2I] - - k[437]*y_cur[IDX_C2H2I] - k[438]*y_cur[IDX_C2H4I] - - k[439]*y_cur[IDX_C2HI] - k[440]*y_cur[IDX_CH2I] - - k[441]*y_cur[IDX_C2H6I] - k[442]*y_cur[IDX_CH4I] - - k[443]*y_cur[IDX_CHI] - k[444]*y_cur[IDX_CNI] - - k[445]*y_cur[IDX_COI] - k[446]*y_cur[IDX_H2COI] - - k[447]*y_cur[IDX_H2OI] - k[448]*y_cur[IDX_H2SI] - - k[449]*y_cur[IDX_HCNI] - k[450]*y_cur[IDX_HCOI] - - k[451]*y_cur[IDX_NH2I] - k[452]*y_cur[IDX_NH3I] - - k[453]*y_cur[IDX_NHI] - k[454]*y_cur[IDX_NOI] - - k[455]*y_cur[IDX_O2I] - k[456]*y_cur[IDX_OHI] - k[489]*y_cur[IDX_HI] - - k[987]*y_cur[IDX_eM] - k[2369]*y_cur[IDX_C2I] - - k[2370]*y_cur[IDX_C2H2I] - k[2371]*y_cur[IDX_C2H4I] - - k[2372]*y_cur[IDX_C2H4I] - k[2373]*y_cur[IDX_C2HI] - - k[2374]*y_cur[IDX_CI] - k[2375]*y_cur[IDX_CH2I] - - k[2376]*y_cur[IDX_C2H6I] - k[2377]*y_cur[IDX_C2H6I] - - k[2378]*y_cur[IDX_CH4I] - k[2379]*y_cur[IDX_CH4I] - - k[2380]*y_cur[IDX_CHI] - k[2381]*y_cur[IDX_CNI] - - k[2382]*y_cur[IDX_CO2I] - k[2383]*y_cur[IDX_COI] - - k[2384]*y_cur[IDX_H2I] - k[2385]*y_cur[IDX_H2COI] - - k[2386]*y_cur[IDX_H2OI] - k[2387]*y_cur[IDX_H2SI] - - k[2388]*y_cur[IDX_H2SI] - k[2389]*y_cur[IDX_HCOI] - - k[2390]*y_cur[IDX_HeI] - k[2391]*y_cur[IDX_N2I] - - k[2392]*y_cur[IDX_NI] - k[2393]*y_cur[IDX_NHI] - - k[2394]*y_cur[IDX_NOI] - k[2395]*y_cur[IDX_O2I] - - k[2396]*y_cur[IDX_OI] - k[2397]*y_cur[IDX_OHI] - - k[4702]*y_cur[IDX_HM] - k[6148] - k[6309]*y_cur[IDX_GRAINM]; - data[jistart + 12282] = 0.0 - k[446]*y_cur[IDX_H2II] - - k[2385]*y_cur[IDX_H2II]; - data[jistart + 12283] = 0.0 - k[447]*y_cur[IDX_H2II] - - k[2386]*y_cur[IDX_H2II]; - data[jistart + 12284] = 0.0 - k[448]*y_cur[IDX_H2II] - - k[2387]*y_cur[IDX_H2II] - k[2388]*y_cur[IDX_H2II]; - data[jistart + 12285] = 0.0 + k[6168]; - data[jistart + 12286] = 0.0 - k[449]*y_cur[IDX_H2II]; - data[jistart + 12287] = 0.0 - k[450]*y_cur[IDX_H2II] + - k[2345]*y_cur[IDX_HII] - k[2389]*y_cur[IDX_H2II]; - data[jistart + 12288] = 0.0 - k[2390]*y_cur[IDX_H2II]; - data[jistart + 12289] = 0.0 + k[458]*y_cur[IDX_H2I]; - data[jistart + 12290] = 0.0 + k[2845]*y_cur[IDX_HI]; - data[jistart + 12291] = 0.0 - k[2392]*y_cur[IDX_H2II]; - data[jistart + 12292] = 0.0 - k[2391]*y_cur[IDX_H2II]; - data[jistart + 12293] = 0.0 - k[453]*y_cur[IDX_H2II] - - k[2393]*y_cur[IDX_H2II]; - data[jistart + 12294] = 0.0 - k[451]*y_cur[IDX_H2II]; - data[jistart + 12295] = 0.0 - k[452]*y_cur[IDX_H2II]; - data[jistart + 12296] = 0.0 - k[454]*y_cur[IDX_H2II] - - k[2394]*y_cur[IDX_H2II]; - data[jistart + 12297] = 0.0 - k[2396]*y_cur[IDX_H2II]; - data[jistart + 12298] = 0.0 - k[455]*y_cur[IDX_H2II] - - k[2395]*y_cur[IDX_H2II]; - data[jistart + 12299] = 0.0 - k[456]*y_cur[IDX_H2II] - - k[2397]*y_cur[IDX_H2II]; - data[jistart + 12300] = 0.0 - k[987]*y_cur[IDX_H2II]; - data[jistart + 12301] = 0.0 + k[1350]*y_cur[IDX_CH2CHCNI]; - data[jistart + 12302] = 0.0 + k[1350]*y_cur[IDX_CII]; - data[jistart + 12303] = 0.0 - k[6745]*y_cur[IDX_H2C4NII]; - data[jistart + 12304] = 0.0 - k[2441]*y_cur[IDX_H2C4NII] + - k[2446]*y_cur[IDX_HC4NII]; - data[jistart + 12305] = 0.0 - k[988]*y_cur[IDX_eM] - - k[2441]*y_cur[IDX_H2I] - k[6745]*y_cur[IDX_GRAINM]; - data[jistart + 12306] = 0.0 + k[2446]*y_cur[IDX_H2I]; - data[jistart + 12307] = 0.0 - k[988]*y_cur[IDX_H2C4NII]; - data[jistart + 12308] = 0.0 + k[3433]*y_cur[IDX_NI]; - data[jistart + 12309] = 0.0 - k[6849]*y_cur[IDX_H2C7NII] - - k[6850]*y_cur[IDX_H2C7NII]; - data[jistart + 12310] = 0.0 + k[2448]*y_cur[IDX_HC7NII]; - data[jistart + 12311] = 0.0 - k[989]*y_cur[IDX_eM] - - k[990]*y_cur[IDX_eM] - k[6849]*y_cur[IDX_GRAINM] - - k[6850]*y_cur[IDX_GRAINM]; - data[jistart + 12312] = 0.0 + k[2692]*y_cur[IDX_HC7NI]; - data[jistart + 12313] = 0.0 + k[2692]*y_cur[IDX_H3II] + - k[2967]*y_cur[IDX_HCOII]; - data[jistart + 12314] = 0.0 + k[2448]*y_cur[IDX_H2I]; - data[jistart + 12315] = 0.0 + k[2967]*y_cur[IDX_HC7NI]; - data[jistart + 12316] = 0.0 + k[3433]*y_cur[IDX_C7H3II]; - data[jistart + 12317] = 0.0 - k[989]*y_cur[IDX_H2C7NII] - - k[990]*y_cur[IDX_H2C7NII]; - data[jistart + 12318] = 0.0 + k[3450]*y_cur[IDX_NI]; - data[jistart + 12319] = 0.0 - k[6880]*y_cur[IDX_H2C9NII] - - k[6881]*y_cur[IDX_H2C9NII]; - data[jistart + 12320] = 0.0 + k[2449]*y_cur[IDX_HC9NII]; - data[jistart + 12321] = 0.0 - k[991]*y_cur[IDX_eM] - - k[992]*y_cur[IDX_eM] - k[6880]*y_cur[IDX_GRAINM] - - k[6881]*y_cur[IDX_GRAINM]; - data[jistart + 12322] = 0.0 + k[2693]*y_cur[IDX_HC9NI]; - data[jistart + 12323] = 0.0 + k[2693]*y_cur[IDX_H3II] + - k[2968]*y_cur[IDX_HCOII]; - data[jistart + 12324] = 0.0 + k[2449]*y_cur[IDX_H2I]; - data[jistart + 12325] = 0.0 + k[2968]*y_cur[IDX_HC9NI]; - data[jistart + 12326] = 0.0 + k[3450]*y_cur[IDX_C9H3II]; - data[jistart + 12327] = 0.0 - k[991]*y_cur[IDX_H2C9NII] - - k[992]*y_cur[IDX_H2C9NII]; - data[jistart + 12328] = 0.0 - k[4959]*y_cur[IDX_H2CCCI]; - data[jistart + 12329] = 0.0 - k[1388]*y_cur[IDX_H2CCCI] - - k[1389]*y_cur[IDX_H2CCCI]; - data[jistart + 12330] = 0.0 + k[5064]*y_cur[IDX_CHI]; - data[jistart + 12331] = 0.0 - k[1516]*y_cur[IDX_H2CCCI] - - k[1517]*y_cur[IDX_H2CCCI]; - data[jistart + 12332] = 0.0 - k[1616]*y_cur[IDX_H2CCCI] - - k[1617]*y_cur[IDX_H2CCCI] - k[1618]*y_cur[IDX_H2CCCI]; - data[jistart + 12333] = 0.0 - k[1672]*y_cur[IDX_H2CCCI] - - k[1673]*y_cur[IDX_H2CCCI]; - data[jistart + 12334] = 0.0 + k[90]*y_cur[IDX_HI]; - data[jistart + 12335] = 0.0 - k[1782]*y_cur[IDX_H2CCCI] - - k[1783]*y_cur[IDX_H2CCCI]; - data[jistart + 12336] = 0.0 - k[2476]*y_cur[IDX_H2CCCI] - - k[2477]*y_cur[IDX_H2CCCI]; - data[jistart + 12337] = 0.0 + k[802]*y_cur[IDX_eM] + - k[6480]*y_cur[IDX_GRAINM]; - data[jistart + 12338] = 0.0 - k[2478]*y_cur[IDX_H2CCCI]; - data[jistart + 12339] = 0.0 - k[2479]*y_cur[IDX_H2CCCI]; - data[jistart + 12340] = 0.0 - k[2480]*y_cur[IDX_H2CCCI]; - data[jistart + 12341] = 0.0 - k[2481]*y_cur[IDX_H2CCCI] - - k[2482]*y_cur[IDX_H2CCCI]; - data[jistart + 12342] = 0.0 - k[2483]*y_cur[IDX_H2CCCI] - - k[2484]*y_cur[IDX_H2CCCI]; - data[jistart + 12343] = 0.0 + k[5064]*y_cur[IDX_C2H2I]; - data[jistart + 12344] = 0.0 + k[911]*y_cur[IDX_eM] - - k[2485]*y_cur[IDX_H2CCCI] - k[2486]*y_cur[IDX_H2CCCI] + - k[6471]*y_cur[IDX_GRAINM]; - data[jistart + 12345] = 0.0 + k[6082]; - data[jistart + 12346] = 0.0 - k[2076]*y_cur[IDX_H2CCCI]; - data[jistart + 12347] = 0.0 + k[6107]; - data[jistart + 12348] = 0.0 + k[7128] + k[7310] + k[7492]; - data[jistart + 12349] = 0.0 + k[6471]*y_cur[IDX_CH2CCHII] + - k[6480]*y_cur[IDX_C3H4II]; - data[jistart + 12350] = 0.0 + k[90]*y_cur[IDX_C3HM]; - data[jistart + 12351] = 0.0 - k[2335]*y_cur[IDX_H2CCCI] - - k[2336]*y_cur[IDX_H2CCCI]; - data[jistart + 12352] = 0.0 - k[1388]*y_cur[IDX_CII] - - k[1389]*y_cur[IDX_CII] - k[1516]*y_cur[IDX_C2H2II] - - k[1517]*y_cur[IDX_C2H2II] - k[1616]*y_cur[IDX_C2H3II] - - k[1617]*y_cur[IDX_C2H3II] - k[1618]*y_cur[IDX_C2H3II] - - k[1672]*y_cur[IDX_C2H4II] - k[1673]*y_cur[IDX_C2H4II] - - k[1782]*y_cur[IDX_C3H2II] - k[1783]*y_cur[IDX_C3H2II] - - k[2076]*y_cur[IDX_CH3II] - k[2335]*y_cur[IDX_HII] - - k[2336]*y_cur[IDX_HII] - k[2476]*y_cur[IDX_C3H3II] - - k[2477]*y_cur[IDX_C3H3II] - k[2478]*y_cur[IDX_C4HII] - - k[2479]*y_cur[IDX_C4H2II] - k[2480]*y_cur[IDX_C4H3II] - - k[2481]*y_cur[IDX_C5H2II] - k[2482]*y_cur[IDX_C5H2II] - - k[2483]*y_cur[IDX_C6H2II] - k[2484]*y_cur[IDX_C6H2II] - - k[2485]*y_cur[IDX_CH2CCHII] - k[2486]*y_cur[IDX_CH2CCHII] - - k[2681]*y_cur[IDX_H3II] - k[2798]*y_cur[IDX_H3OII] - - k[2957]*y_cur[IDX_HCOII] - k[3217]*y_cur[IDX_HeII] - - k[3218]*y_cur[IDX_HeII] - k[3827]*y_cur[IDX_SII] - - k[3868]*y_cur[IDX_SiII] - k[4959]*y_cur[IDX_CI] - - k[5395]*y_cur[IDX_OI] - k[5834] - k[6149] - k[6150] - k[6946]; - data[jistart + 12353] = 0.0 - k[2681]*y_cur[IDX_H2CCCI]; - data[jistart + 12354] = 0.0 - k[2798]*y_cur[IDX_H2CCCI]; - data[jistart + 12355] = 0.0 - k[2957]*y_cur[IDX_H2CCCI]; - data[jistart + 12356] = 0.0 - k[3217]*y_cur[IDX_H2CCCI] - - k[3218]*y_cur[IDX_H2CCCI]; - data[jistart + 12357] = 0.0 - k[5395]*y_cur[IDX_H2CCCI]; - data[jistart + 12358] = 0.0 - k[3827]*y_cur[IDX_H2CCCI]; - data[jistart + 12359] = 0.0 - k[3868]*y_cur[IDX_H2CCCI]; - data[jistart + 12360] = 0.0 + k[802]*y_cur[IDX_C3H4II] + - k[911]*y_cur[IDX_CH2CCHII]; - data[jistart + 12361] = 0.0 + k[2492]*y_cur[IDX_H2COI]; - data[jistart + 12362] = 0.0 + k[2083]*y_cur[IDX_HClI]; - data[jistart + 12363] = 0.0 - k[6624]*y_cur[IDX_H2CClII]; - data[jistart + 12364] = 0.0 - k[993]*y_cur[IDX_eM] - - k[6624]*y_cur[IDX_GRAINM]; - data[jistart + 12365] = 0.0 + k[2492]*y_cur[IDX_CClII]; - data[jistart + 12366] = 0.0 + k[2083]*y_cur[IDX_CH3II]; - data[jistart + 12367] = 0.0 - k[993]*y_cur[IDX_H2CClII]; - data[jistart + 12368] = 0.0 - k[4960]*y_cur[IDX_H2CNI]; - data[jistart + 12369] = 0.0 + k[5227]*y_cur[IDX_NI]; - data[jistart + 12370] = 0.0 + k[5257]*y_cur[IDX_NI]; - data[jistart + 12371] = 0.0 + k[8699]*y_cur[IDX_GNI]; - data[jistart + 12372] = 0.0 + k[7096] + k[7278] + k[7460]; - data[jistart + 12373] = 0.0 + k[8699]*y_cur[IDX_GCH2I]; - data[jistart + 12374] = 0.0 - k[5164]*y_cur[IDX_H2CNI]; - data[jistart + 12375] = 0.0 - k[4960]*y_cur[IDX_CI] - - k[5164]*y_cur[IDX_HI] - k[5264]*y_cur[IDX_NI] - - k[5396]*y_cur[IDX_OI] - k[5835] - k[6151] - k[6914]; - data[jistart + 12376] = 0.0 + k[5227]*y_cur[IDX_C2H5I] + - k[5257]*y_cur[IDX_CH3I] - k[5264]*y_cur[IDX_H2CNI]; - data[jistart + 12377] = 0.0 - k[5396]*y_cur[IDX_H2CNI]; - data[jistart + 12378] = 0.0 - k[6536]*y_cur[IDX_H2CNOII] - - k[6537]*y_cur[IDX_H2CNOII]; - data[jistart + 12379] = 0.0 + k[2897]*y_cur[IDX_HCNOII]; - data[jistart + 12380] = 0.0 - k[994]*y_cur[IDX_eM] - - k[995]*y_cur[IDX_eM] - k[6536]*y_cur[IDX_GRAINM] - - k[6537]*y_cur[IDX_GRAINM]; - data[jistart + 12381] = 0.0 + k[2695]*y_cur[IDX_HCNOI]; - data[jistart + 12382] = 0.0 + k[2695]*y_cur[IDX_H3II]; - data[jistart + 12383] = 0.0 + k[2897]*y_cur[IDX_H2I]; - data[jistart + 12384] = 0.0 - k[994]*y_cur[IDX_H2CNOII] - - k[995]*y_cur[IDX_H2CNOII]; - data[jistart + 12385] = 0.0 - k[174]*y_cur[IDX_H2COI] - - k[1390]*y_cur[IDX_H2COI] - k[1391]*y_cur[IDX_H2COI]; - data[jistart + 12386] = 0.0 + k[4]*y_cur[IDX_H2OI] + - k[3897]*y_cur[IDX_H2COII]; - data[jistart + 12387] = 0.0 + k[3932]*y_cur[IDX_H2COII]; - data[jistart + 12388] = 0.0 + k[3967]*y_cur[IDX_H2COII]; - data[jistart + 12389] = 0.0 + k[4002]*y_cur[IDX_H2COII]; - data[jistart + 12390] = 0.0 - k[1469]*y_cur[IDX_H2COI]; - data[jistart + 12391] = 0.0 + k[4037]*y_cur[IDX_H2COII]; - data[jistart + 12392] = 0.0 - k[222]*y_cur[IDX_H2COI]; - data[jistart + 12393] = 0.0 + k[4881]*y_cur[IDX_O2I]; - data[jistart + 12394] = 0.0 + k[3848]*y_cur[IDX_SOII] + - k[5348]*y_cur[IDX_OI]; - data[jistart + 12395] = 0.0 + k[5351]*y_cur[IDX_OI]; - data[jistart + 12396] = 0.0 - k[1720]*y_cur[IDX_H2COI]; - data[jistart + 12397] = 0.0 + k[773]*y_cur[IDX_eM] + - k[6577]*y_cur[IDX_GRAINM]; - data[jistart + 12398] = 0.0 - k[2491]*y_cur[IDX_H2COI]; - data[jistart + 12399] = 0.0 + k[4072]*y_cur[IDX_H2COII]; - data[jistart + 12400] = 0.0 + k[4107]*y_cur[IDX_H2COII]; - data[jistart + 12401] = 0.0 + k[4142]*y_cur[IDX_H2COII]; - data[jistart + 12402] = 0.0 + k[4177]*y_cur[IDX_H2COII]; - data[jistart + 12403] = 0.0 + k[4212]*y_cur[IDX_H2COII]; - data[jistart + 12404] = 0.0 + k[2764]*y_cur[IDX_H3COII]; - data[jistart + 12405] = 0.0 + k[4247]*y_cur[IDX_H2COII]; - data[jistart + 12406] = 0.0 + k[4282]*y_cur[IDX_H2COII]; - data[jistart + 12407] = 0.0 + k[4317]*y_cur[IDX_H2COII]; - data[jistart + 12408] = 0.0 + k[4352]*y_cur[IDX_H2COII]; - data[jistart + 12409] = 0.0 + k[4387]*y_cur[IDX_H2COII]; - data[jistart + 12410] = 0.0 + k[4422]*y_cur[IDX_H2COII]; - data[jistart + 12411] = 0.0 + k[4457]*y_cur[IDX_H2COII]; - data[jistart + 12412] = 0.0 + k[4492]*y_cur[IDX_H2COII]; - data[jistart + 12413] = 0.0 + k[4527]*y_cur[IDX_H2COII]; - data[jistart + 12414] = 0.0 + k[4562]*y_cur[IDX_H2COII]; - data[jistart + 12415] = 0.0 + k[4597]*y_cur[IDX_H2COII]; - data[jistart + 12416] = 0.0 - k[2492]*y_cur[IDX_H2COI]; - data[jistart + 12417] = 0.0 + k[64]*y_cur[IDX_OHM] + - k[290]*y_cur[IDX_H2COII] + k[2248]*y_cur[IDX_H3COII] - - k[5076]*y_cur[IDX_H2COI]; - data[jistart + 12418] = 0.0 + k[1938]*y_cur[IDX_CH3OHI] - - k[1947]*y_cur[IDX_H2COI] - k[1948]*y_cur[IDX_H2COI] - - k[1949]*y_cur[IDX_H2COI] - k[1950]*y_cur[IDX_H2COI]; - data[jistart + 12419] = 0.0 + k[4632]*y_cur[IDX_H2COII]; - data[jistart + 12420] = 0.0 + k[59]*y_cur[IDX_OM] + - k[262]*y_cur[IDX_H2COII] + k[2019]*y_cur[IDX_SiOII] - - k[4998]*y_cur[IDX_H2COI] + k[5002]*y_cur[IDX_NO2I] + - k[5003]*y_cur[IDX_NOI] + k[5010]*y_cur[IDX_O2I] + - k[5016]*y_cur[IDX_OHI]; - data[jistart + 12421] = 0.0 - k[1979]*y_cur[IDX_H2COI] - - k[1980]*y_cur[IDX_H2COI] - k[1981]*y_cur[IDX_H2COI]; - data[jistart + 12422] = 0.0 + k[3657]*y_cur[IDX_O2II]; - data[jistart + 12423] = 0.0 + k[1281]*y_cur[IDX_eM] + - k[1281]*y_cur[IDX_eM] + k[1282]*y_cur[IDX_eM] + - k[6728]*y_cur[IDX_GRAINM] + k[6728]*y_cur[IDX_GRAINM] + - k[6729]*y_cur[IDX_GRAINM]; - data[jistart + 12424] = 0.0 + k[1277]*y_cur[IDX_eM] + - k[6703]*y_cur[IDX_GRAINM]; - data[jistart + 12425] = 0.0 + k[1273]*y_cur[IDX_eM] + - k[6697]*y_cur[IDX_GRAINM]; - data[jistart + 12426] = 0.0 - k[5030]*y_cur[IDX_H2COI] + - k[5037]*y_cur[IDX_NO2I] + k[5039]*y_cur[IDX_O2I] + - k[5044]*y_cur[IDX_OI] + k[5046]*y_cur[IDX_OHI]; - data[jistart + 12427] = 0.0 + k[2066]*y_cur[IDX_CH3CHOI] - - k[2077]*y_cur[IDX_H2COI]; - data[jistart + 12428] = 0.0 + k[3661]*y_cur[IDX_O2II] + - k[5056]*y_cur[IDX_OHI]; - data[jistart + 12429] = 0.0 + k[2066]*y_cur[IDX_CH3II] + - k[2656]*y_cur[IDX_H3II]; - data[jistart + 12430] = 0.0 + k[939]*y_cur[IDX_eM] + - k[943]*y_cur[IDX_eM] + k[6561]*y_cur[IDX_GRAINM] + - k[6565]*y_cur[IDX_GRAINM]; - data[jistart + 12431] = 0.0 - k[2493]*y_cur[IDX_H2COI]; - data[jistart + 12432] = 0.0 + k[5631]*y_cur[IDX_HeII]; - data[jistart + 12433] = 0.0 + k[3195]*y_cur[IDX_HeII] + k[5815] + - k[6119]; - data[jistart + 12434] = 0.0 + k[1938]*y_cur[IDX_CHII] + - k[2132]*y_cur[IDX_S2II] + k[2762]*y_cur[IDX_H3COII]; - data[jistart + 12435] = 0.0 + k[961]*y_cur[IDX_eM] + - k[6429]*y_cur[IDX_GRAINM]; - data[jistart + 12436] = 0.0 + k[967]*y_cur[IDX_eM] - - k[2494]*y_cur[IDX_H2COI] - k[2495]*y_cur[IDX_H2COI] + - k[6444]*y_cur[IDX_GRAINM]; - data[jistart + 12437] = 0.0 - k[280]*y_cur[IDX_H2COI] - - k[2141]*y_cur[IDX_H2COI]; - data[jistart + 12438] = 0.0 - k[2225]*y_cur[IDX_H2COI]; - data[jistart + 12439] = 0.0 - k[5114]*y_cur[IDX_H2COI]; - data[jistart + 12440] = 0.0 - k[300]*y_cur[IDX_H2COI] - - k[2271]*y_cur[IDX_H2COI]; - data[jistart + 12441] = 0.0 + k[4667]*y_cur[IDX_H2COII]; - data[jistart + 12442] = 0.0 - k[308]*y_cur[IDX_H2COI] - - k[2280]*y_cur[IDX_H2COI]; - data[jistart + 12443] = 0.0 + k[1270]*y_cur[IDX_eM] + - k[6694]*y_cur[IDX_GRAINM]; - data[jistart + 12444] = 0.0 + k[459]*y_cur[IDX_H2COII]; - data[jistart + 12445] = 0.0 + k[8686]*y_cur[IDX_GOI]; - data[jistart + 12446] = 0.0 + k[8595]*y_cur[IDX_GHCOI]; - data[jistart + 12447] = 0.0 + k[7108] + k[7290] + k[7472]; - data[jistart + 12448] = 0.0 + k[8595]*y_cur[IDX_GHI]; - data[jistart + 12449] = 0.0 + k[8686]*y_cur[IDX_GCH2I]; - data[jistart + 12450] = 0.0 + k[6417]*y_cur[IDX_H3COII] + - k[6429]*y_cur[IDX_CH3OHII] + k[6444]*y_cur[IDX_CH3OH2II] + - k[6561]*y_cur[IDX_CH3CHOHII] + k[6565]*y_cur[IDX_CH3CHOHII] + - k[6577]*y_cur[IDX_C2H5OHII] + k[6694]*y_cur[IDX_COOCH3II] + - k[6697]*y_cur[IDX_CH2OHCOII] + k[6703]*y_cur[IDX_CH2OHCHOII] + - k[6728]*y_cur[IDX_CH2OHCH2OII] + k[6728]*y_cur[IDX_CH2OHCH2OII] + - k[6729]*y_cur[IDX_CH2OHCH2OII]; - data[jistart + 12451] = 0.0 - k[5165]*y_cur[IDX_H2COI]; - data[jistart + 12452] = 0.0 - k[376]*y_cur[IDX_H2COI] - - k[2337]*y_cur[IDX_H2COI] - k[2338]*y_cur[IDX_H2COI]; - data[jistart + 12453] = 0.0 + k[76]*y_cur[IDX_HCOI] + - k[4703]*y_cur[IDX_H2COII]; - data[jistart + 12454] = 0.0 - k[446]*y_cur[IDX_H2COI] - - k[2385]*y_cur[IDX_H2COI]; - data[jistart + 12455] = 0.0 - k[174]*y_cur[IDX_CII] - - k[222]*y_cur[IDX_C2H2II] - k[280]*y_cur[IDX_CH4II] - - k[300]*y_cur[IDX_CNII] - k[308]*y_cur[IDX_COII] - - k[376]*y_cur[IDX_HII] - k[446]*y_cur[IDX_H2II] - - k[461]*y_cur[IDX_O2II] - k[468]*y_cur[IDX_H2OII] - - k[517]*y_cur[IDX_HeII] - k[551]*y_cur[IDX_NII] - - k[566]*y_cur[IDX_N2II] - k[574]*y_cur[IDX_NHII] - - k[655]*y_cur[IDX_OII] - k[688]*y_cur[IDX_OHII] - - k[1390]*y_cur[IDX_CII] - k[1391]*y_cur[IDX_CII] - - k[1469]*y_cur[IDX_C2HII] - k[1720]*y_cur[IDX_C2H5II] - - k[1947]*y_cur[IDX_CHII] - k[1948]*y_cur[IDX_CHII] - - k[1949]*y_cur[IDX_CHII] - k[1950]*y_cur[IDX_CHII] - - k[1979]*y_cur[IDX_CH2II] - k[1980]*y_cur[IDX_CH2II] - - k[1981]*y_cur[IDX_CH2II] - k[2077]*y_cur[IDX_CH3II] - - k[2141]*y_cur[IDX_CH4II] - k[2225]*y_cur[IDX_CH5II] - - k[2271]*y_cur[IDX_CNII] - k[2280]*y_cur[IDX_COII] - - k[2337]*y_cur[IDX_HII] - k[2338]*y_cur[IDX_HII] - - k[2385]*y_cur[IDX_H2II] - k[2488]*y_cur[IDX_H2COII] - - k[2491]*y_cur[IDX_C2H5OH2II] - k[2492]*y_cur[IDX_CClII] - - k[2493]*y_cur[IDX_CH3COCH3II] - k[2494]*y_cur[IDX_CH3OH2II] - - k[2495]*y_cur[IDX_CH3OH2II] - k[2496]*y_cur[IDX_H3SII] - - k[2497]*y_cur[IDX_HNOII] - k[2498]*y_cur[IDX_O2II] - - k[2499]*y_cur[IDX_O2HII] - k[2500]*y_cur[IDX_SII] - - k[2501]*y_cur[IDX_SII] - k[2508]*y_cur[IDX_H2OII] - - k[2682]*y_cur[IDX_H3II] - k[2799]*y_cur[IDX_H3OII] - - k[2855]*y_cur[IDX_HCNII] - k[2890]*y_cur[IDX_HCNHII] - - k[2891]*y_cur[IDX_HCNHII] - k[2958]*y_cur[IDX_HCOII] - - k[3219]*y_cur[IDX_HeII] - k[3220]*y_cur[IDX_HeII] - - k[3221]*y_cur[IDX_HeII] - k[3345]*y_cur[IDX_NII] - - k[3346]*y_cur[IDX_NII] - k[3361]*y_cur[IDX_N2II] - - k[3373]*y_cur[IDX_N2HII] - k[3487]*y_cur[IDX_NHII] - - k[3488]*y_cur[IDX_NHII] - k[3510]*y_cur[IDX_NH2II] - - k[3511]*y_cur[IDX_NH2II] - k[3549]*y_cur[IDX_NH3II] - - k[3641]*y_cur[IDX_OII] - k[3778]*y_cur[IDX_OHII] - - k[4998]*y_cur[IDX_CH2I] - k[5030]*y_cur[IDX_CH3I] - - k[5076]*y_cur[IDX_CHI] - k[5114]*y_cur[IDX_CNI] - - k[5150]*y_cur[IDX_O2HI] - k[5165]*y_cur[IDX_HI] - - k[5397]*y_cur[IDX_OI] - k[5465]*y_cur[IDX_OHI] - - k[5466]*y_cur[IDX_OHI] - k[5836] - k[6152] - k[6153] - k[6154] - - k[6155] - k[6926]; - data[jistart + 12456] = 0.0 + k[262]*y_cur[IDX_CH2I] + - k[290]*y_cur[IDX_CHI] + k[459]*y_cur[IDX_FeI] + k[460]*y_cur[IDX_SI] - + k[500]*y_cur[IDX_HCOI] + k[531]*y_cur[IDX_MgI] + - k[604]*y_cur[IDX_NH3I] + k[624]*y_cur[IDX_NOI] + - k[635]*y_cur[IDX_NaI] + k[718]*y_cur[IDX_SiI] - - k[2488]*y_cur[IDX_H2COI] + k[3897]*y_cur[IDX_CM] + - k[3932]*y_cur[IDX_C10M] + k[3967]*y_cur[IDX_C10HM] + - k[4002]*y_cur[IDX_C2M] + k[4037]*y_cur[IDX_C2HM] + - k[4072]*y_cur[IDX_C3M] + k[4107]*y_cur[IDX_C3HM] + - k[4142]*y_cur[IDX_C3NM] + k[4177]*y_cur[IDX_C4M] + - k[4212]*y_cur[IDX_C4HM] + k[4247]*y_cur[IDX_C5M] + - k[4282]*y_cur[IDX_C5HM] + k[4317]*y_cur[IDX_C5NM] + - k[4352]*y_cur[IDX_C6M] + k[4387]*y_cur[IDX_C6HM] + - k[4422]*y_cur[IDX_C7M] + k[4457]*y_cur[IDX_C7HM] + - k[4492]*y_cur[IDX_C8M] + k[4527]*y_cur[IDX_C8HM] + - k[4562]*y_cur[IDX_C9M] + k[4597]*y_cur[IDX_C9HM] + - k[4632]*y_cur[IDX_CHM] + k[4667]*y_cur[IDX_CNM] + - k[4703]*y_cur[IDX_HM] + k[4738]*y_cur[IDX_OM] + - k[4773]*y_cur[IDX_O2M] + k[4808]*y_cur[IDX_OHM] + - k[4843]*y_cur[IDX_SM] + k[5616]*y_cur[IDX_eM]; - data[jistart + 12457] = 0.0 + k[4]*y_cur[IDX_CM] + - k[2545]*y_cur[IDX_H3COII]; - data[jistart + 12458] = 0.0 - k[468]*y_cur[IDX_H2COI] - - k[2508]*y_cur[IDX_H2COI]; - data[jistart + 12459] = 0.0 + k[2763]*y_cur[IDX_H3COII]; - data[jistart + 12460] = 0.0 + k[2656]*y_cur[IDX_CH3CHOI] - - k[2682]*y_cur[IDX_H2COI]; - data[jistart + 12461] = 0.0 + k[1037]*y_cur[IDX_eM] + - k[2248]*y_cur[IDX_CHI] + k[2545]*y_cur[IDX_H2OI] + - k[2762]*y_cur[IDX_CH3OHI] + k[2763]*y_cur[IDX_H2SI] + - k[2764]*y_cur[IDX_C4H2I] + k[2765]*y_cur[IDX_HCOOHI] + - k[2875]*y_cur[IDX_HCNI] + k[3039]*y_cur[IDX_HNCI] + - k[3537]*y_cur[IDX_NH2I] + k[3577]*y_cur[IDX_NH3I] + - k[3628]*y_cur[IDX_NaI] + k[6417]*y_cur[IDX_GRAINM]; - data[jistart + 12462] = 0.0 - k[2799]*y_cur[IDX_H2COI]; - data[jistart + 12463] = 0.0 - k[2496]*y_cur[IDX_H2COI]; - data[jistart + 12464] = 0.0 + k[2875]*y_cur[IDX_H3COII]; - data[jistart + 12465] = 0.0 - k[2855]*y_cur[IDX_H2COI]; - data[jistart + 12466] = 0.0 - k[2890]*y_cur[IDX_H2COI] - - k[2891]*y_cur[IDX_H2COI]; - data[jistart + 12467] = 0.0 + k[76]*y_cur[IDX_HM] + - k[500]*y_cur[IDX_H2COII] + k[5205]*y_cur[IDX_HCOI] + - k[5205]*y_cur[IDX_HCOI] + k[5206]*y_cur[IDX_HNOI] + - k[5210]*y_cur[IDX_O2HI]; - data[jistart + 12468] = 0.0 - k[2958]*y_cur[IDX_H2COI]; - data[jistart + 12469] = 0.0 + k[6186] + k[6186]; - data[jistart + 12470] = 0.0 + k[2765]*y_cur[IDX_H3COII]; - data[jistart + 12471] = 0.0 + k[3039]*y_cur[IDX_H3COII]; - data[jistart + 12472] = 0.0 + k[5206]*y_cur[IDX_HCOI]; - data[jistart + 12473] = 0.0 - k[2497]*y_cur[IDX_H2COI]; - data[jistart + 12474] = 0.0 - k[517]*y_cur[IDX_H2COI] + - k[3195]*y_cur[IDX_CH3OCH3I] - k[3219]*y_cur[IDX_H2COI] - - k[3220]*y_cur[IDX_H2COI] - k[3221]*y_cur[IDX_H2COI] + - k[5631]*y_cur[IDX_CH3OI]; - data[jistart + 12475] = 0.0 + k[531]*y_cur[IDX_H2COII]; - data[jistart + 12476] = 0.0 - k[551]*y_cur[IDX_H2COI] - - k[3345]*y_cur[IDX_H2COI] - k[3346]*y_cur[IDX_H2COI]; - data[jistart + 12477] = 0.0 - k[566]*y_cur[IDX_H2COI] - - k[3361]*y_cur[IDX_H2COI]; - data[jistart + 12478] = 0.0 - k[3373]*y_cur[IDX_H2COI]; - data[jistart + 12479] = 0.0 - k[574]*y_cur[IDX_H2COI] - - k[3487]*y_cur[IDX_H2COI] - k[3488]*y_cur[IDX_H2COI]; - data[jistart + 12480] = 0.0 + k[3537]*y_cur[IDX_H3COII]; - data[jistart + 12481] = 0.0 - k[3510]*y_cur[IDX_H2COI] - - k[3511]*y_cur[IDX_H2COI]; - data[jistart + 12482] = 0.0 + k[604]*y_cur[IDX_H2COII] + - k[3577]*y_cur[IDX_H3COII]; - data[jistart + 12483] = 0.0 - k[3549]*y_cur[IDX_H2COI]; - data[jistart + 12484] = 0.0 + k[624]*y_cur[IDX_H2COII] + - k[5003]*y_cur[IDX_CH2I]; - data[jistart + 12485] = 0.0 + k[5002]*y_cur[IDX_CH2I] + - k[5037]*y_cur[IDX_CH3I]; - data[jistart + 12486] = 0.0 + k[635]*y_cur[IDX_H2COII] + - k[3628]*y_cur[IDX_H3COII]; - data[jistart + 12487] = 0.0 + k[3754]*y_cur[IDX_SiCH2II] + - k[5044]*y_cur[IDX_CH3I] + k[5348]*y_cur[IDX_C2H4I] + - k[5351]*y_cur[IDX_C2H5I] - k[5397]*y_cur[IDX_H2COI]; - data[jistart + 12488] = 0.0 - k[655]*y_cur[IDX_H2COI] - - k[3641]*y_cur[IDX_H2COI]; - data[jistart + 12489] = 0.0 + k[59]*y_cur[IDX_CH2I] + - k[4738]*y_cur[IDX_H2COII]; - data[jistart + 12490] = 0.0 + k[4881]*y_cur[IDX_C2H3I] + - k[5010]*y_cur[IDX_CH2I] + k[5039]*y_cur[IDX_CH3I]; - data[jistart + 12491] = 0.0 - k[461]*y_cur[IDX_H2COI] - - k[2498]*y_cur[IDX_H2COI] + k[3657]*y_cur[IDX_CH2CCH2I] + - k[3661]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 12492] = 0.0 + k[4773]*y_cur[IDX_H2COII]; - data[jistart + 12493] = 0.0 - k[5150]*y_cur[IDX_H2COI] + - k[5210]*y_cur[IDX_HCOI]; - data[jistart + 12494] = 0.0 - k[2499]*y_cur[IDX_H2COI]; - data[jistart + 12495] = 0.0 + k[5016]*y_cur[IDX_CH2I] + - k[5046]*y_cur[IDX_CH3I] + k[5056]*y_cur[IDX_CH3CHCH2I] - - k[5465]*y_cur[IDX_H2COI] - k[5466]*y_cur[IDX_H2COI]; - data[jistart + 12496] = 0.0 - k[688]*y_cur[IDX_H2COI] - - k[3778]*y_cur[IDX_H2COI]; - data[jistart + 12497] = 0.0 + k[64]*y_cur[IDX_CHI] + - k[4808]*y_cur[IDX_H2COII]; - data[jistart + 12498] = 0.0 + k[460]*y_cur[IDX_H2COII]; - data[jistart + 12499] = 0.0 - k[2500]*y_cur[IDX_H2COI] - - k[2501]*y_cur[IDX_H2COI]; - data[jistart + 12500] = 0.0 + k[4843]*y_cur[IDX_H2COII]; - data[jistart + 12501] = 0.0 + k[2132]*y_cur[IDX_CH3OHI]; - data[jistart + 12502] = 0.0 + k[3848]*y_cur[IDX_C2H4I]; - data[jistart + 12503] = 0.0 + k[718]*y_cur[IDX_H2COII]; - data[jistart + 12504] = 0.0 + k[3754]*y_cur[IDX_OI]; - data[jistart + 12505] = 0.0 + k[2019]*y_cur[IDX_CH2I]; - data[jistart + 12506] = 0.0 + k[773]*y_cur[IDX_C2H5OHII] + - k[939]*y_cur[IDX_CH3CHOHII] + k[943]*y_cur[IDX_CH3CHOHII] + - k[961]*y_cur[IDX_CH3OHII] + k[967]*y_cur[IDX_CH3OH2II] + - k[1037]*y_cur[IDX_H3COII] + k[1270]*y_cur[IDX_COOCH3II] + - k[1273]*y_cur[IDX_CH2OHCOII] + k[1277]*y_cur[IDX_CH2OHCHOII] + - k[1281]*y_cur[IDX_CH2OHCH2OII] + k[1281]*y_cur[IDX_CH2OHCH2OII] + - k[1282]*y_cur[IDX_CH2OHCH2OII] + k[5616]*y_cur[IDX_H2COII]; - data[jistart + 12507] = 0.0 + k[174]*y_cur[IDX_H2COI]; - data[jistart + 12508] = 0.0 - k[3897]*y_cur[IDX_H2COII]; - data[jistart + 12509] = 0.0 - k[3932]*y_cur[IDX_H2COII]; - data[jistart + 12510] = 0.0 - k[3967]*y_cur[IDX_H2COII]; - data[jistart + 12511] = 0.0 - k[1457]*y_cur[IDX_H2COII]; - data[jistart + 12512] = 0.0 - k[4002]*y_cur[IDX_H2COII]; - data[jistart + 12513] = 0.0 - k[1744]*y_cur[IDX_H2COII]; - data[jistart + 12514] = 0.0 - k[4037]*y_cur[IDX_H2COII]; - data[jistart + 12515] = 0.0 + k[222]*y_cur[IDX_H2COI]; - data[jistart + 12516] = 0.0 - k[4072]*y_cur[IDX_H2COII]; - data[jistart + 12517] = 0.0 - k[4107]*y_cur[IDX_H2COII]; - data[jistart + 12518] = 0.0 - k[4142]*y_cur[IDX_H2COII]; - data[jistart + 12519] = 0.0 - k[4177]*y_cur[IDX_H2COII]; - data[jistart + 12520] = 0.0 - k[4212]*y_cur[IDX_H2COII]; - data[jistart + 12521] = 0.0 - k[4247]*y_cur[IDX_H2COII]; - data[jistart + 12522] = 0.0 - k[4282]*y_cur[IDX_H2COII]; - data[jistart + 12523] = 0.0 - k[4317]*y_cur[IDX_H2COII]; - data[jistart + 12524] = 0.0 - k[4352]*y_cur[IDX_H2COII]; - data[jistart + 12525] = 0.0 - k[4387]*y_cur[IDX_H2COII]; - data[jistart + 12526] = 0.0 - k[4422]*y_cur[IDX_H2COII]; - data[jistart + 12527] = 0.0 - k[4457]*y_cur[IDX_H2COII]; - data[jistart + 12528] = 0.0 - k[4492]*y_cur[IDX_H2COII]; - data[jistart + 12529] = 0.0 - k[4527]*y_cur[IDX_H2COII]; - data[jistart + 12530] = 0.0 - k[4562]*y_cur[IDX_H2COII]; - data[jistart + 12531] = 0.0 - k[4597]*y_cur[IDX_H2COII]; - data[jistart + 12532] = 0.0 - k[290]*y_cur[IDX_H2COII] - - k[2246]*y_cur[IDX_H2COII]; - data[jistart + 12533] = 0.0 + k[1951]*y_cur[IDX_H2OI]; - data[jistart + 12534] = 0.0 - k[4632]*y_cur[IDX_H2COII]; - data[jistart + 12535] = 0.0 - k[262]*y_cur[IDX_H2COII] - - k[2002]*y_cur[IDX_H2COII] + k[2014]*y_cur[IDX_O2II]; - data[jistart + 12536] = 0.0 + k[1978]*y_cur[IDX_CO2I]; - data[jistart + 12537] = 0.0 + k[2090]*y_cur[IDX_OI] + - k[2093]*y_cur[IDX_OHI]; - data[jistart + 12538] = 0.0 + k[5632]*y_cur[IDX_HeII]; - data[jistart + 12539] = 0.0 - k[2487]*y_cur[IDX_H2COII] + - k[3336]*y_cur[IDX_NII] + k[3636]*y_cur[IDX_OII]; - data[jistart + 12540] = 0.0 - k[2193]*y_cur[IDX_H2COII] - - k[2194]*y_cur[IDX_H2COII]; - data[jistart + 12541] = 0.0 + k[280]*y_cur[IDX_H2COI]; - data[jistart + 12542] = 0.0 + k[2230]*y_cur[IDX_HCOI]; - data[jistart + 12543] = 0.0 + k[300]*y_cur[IDX_H2COI]; - data[jistart + 12544] = 0.0 - k[4667]*y_cur[IDX_H2COII]; - data[jistart + 12545] = 0.0 + k[308]*y_cur[IDX_H2COI]; - data[jistart + 12546] = 0.0 + k[1978]*y_cur[IDX_CH2II]; - data[jistart + 12547] = 0.0 - k[459]*y_cur[IDX_H2COII]; - data[jistart + 12548] = 0.0 - k[6398]*y_cur[IDX_H2COII] - - k[6399]*y_cur[IDX_H2COII] - k[6400]*y_cur[IDX_H2COII] - - k[6401]*y_cur[IDX_H2COII]; - data[jistart + 12549] = 0.0 + k[376]*y_cur[IDX_H2COI]; - data[jistart + 12550] = 0.0 - k[4703]*y_cur[IDX_H2COII]; - data[jistart + 12551] = 0.0 + k[446]*y_cur[IDX_H2COI]; - data[jistart + 12552] = 0.0 + k[174]*y_cur[IDX_CII] + - k[222]*y_cur[IDX_C2H2II] + k[280]*y_cur[IDX_CH4II] + - k[300]*y_cur[IDX_CNII] + k[308]*y_cur[IDX_COII] + - k[376]*y_cur[IDX_HII] + k[446]*y_cur[IDX_H2II] + - k[461]*y_cur[IDX_O2II] + k[468]*y_cur[IDX_H2OII] + - k[517]*y_cur[IDX_HeII] + k[551]*y_cur[IDX_NII] + - k[566]*y_cur[IDX_N2II] + k[574]*y_cur[IDX_NHII] + - k[655]*y_cur[IDX_OII] + k[688]*y_cur[IDX_OHII] - - k[2488]*y_cur[IDX_H2COII] + k[6154]; - data[jistart + 12553] = 0.0 - k[262]*y_cur[IDX_CH2I] - - k[290]*y_cur[IDX_CHI] - k[459]*y_cur[IDX_FeI] - k[460]*y_cur[IDX_SI] - - k[500]*y_cur[IDX_HCOI] - k[531]*y_cur[IDX_MgI] - - k[604]*y_cur[IDX_NH3I] - k[624]*y_cur[IDX_NOI] - - k[635]*y_cur[IDX_NaI] - k[718]*y_cur[IDX_SiI] - k[996]*y_cur[IDX_eM] - - k[997]*y_cur[IDX_eM] - k[998]*y_cur[IDX_eM] - k[999]*y_cur[IDX_eM] - - k[1457]*y_cur[IDX_C2I] - k[1744]*y_cur[IDX_C2HI] - - k[2002]*y_cur[IDX_CH2I] - k[2193]*y_cur[IDX_CH4I] - - k[2194]*y_cur[IDX_CH4I] - k[2246]*y_cur[IDX_CHI] - - k[2487]*y_cur[IDX_CH3OHI] - k[2488]*y_cur[IDX_H2COI] - - k[2489]*y_cur[IDX_O2I] - k[2490]*y_cur[IDX_SI] - - k[2542]*y_cur[IDX_H2OI] - k[2874]*y_cur[IDX_HCNI] - - k[3007]*y_cur[IDX_HCOI] - k[3038]*y_cur[IDX_HNCI] - - k[3535]*y_cur[IDX_NH2I] - k[3574]*y_cur[IDX_NH3I] - - k[3611]*y_cur[IDX_NHI] - k[3897]*y_cur[IDX_CM] - - k[3932]*y_cur[IDX_C10M] - k[3967]*y_cur[IDX_C10HM] - - k[4002]*y_cur[IDX_C2M] - k[4037]*y_cur[IDX_C2HM] - - k[4072]*y_cur[IDX_C3M] - k[4107]*y_cur[IDX_C3HM] - - k[4142]*y_cur[IDX_C3NM] - k[4177]*y_cur[IDX_C4M] - - k[4212]*y_cur[IDX_C4HM] - k[4247]*y_cur[IDX_C5M] - - k[4282]*y_cur[IDX_C5HM] - k[4317]*y_cur[IDX_C5NM] - - k[4352]*y_cur[IDX_C6M] - k[4387]*y_cur[IDX_C6HM] - - k[4422]*y_cur[IDX_C7M] - k[4457]*y_cur[IDX_C7HM] - - k[4492]*y_cur[IDX_C8M] - k[4527]*y_cur[IDX_C8HM] - - k[4562]*y_cur[IDX_C9M] - k[4597]*y_cur[IDX_C9HM] - - k[4632]*y_cur[IDX_CHM] - k[4667]*y_cur[IDX_CNM] - - k[4703]*y_cur[IDX_HM] - k[4738]*y_cur[IDX_OM] - - k[4773]*y_cur[IDX_O2M] - k[4808]*y_cur[IDX_OHM] - - k[4843]*y_cur[IDX_SM] - k[5616]*y_cur[IDX_eM] - - k[6398]*y_cur[IDX_GRAINM] - k[6399]*y_cur[IDX_GRAINM] - - k[6400]*y_cur[IDX_GRAINM] - k[6401]*y_cur[IDX_GRAINM]; - data[jistart + 12554] = 0.0 + k[1951]*y_cur[IDX_CHII] - - k[2542]*y_cur[IDX_H2COII]; - data[jistart + 12555] = 0.0 + k[468]*y_cur[IDX_H2COI] + - k[2514]*y_cur[IDX_HCOI]; - data[jistart + 12556] = 0.0 + k[2697]*y_cur[IDX_HCOI]; - data[jistart + 12557] = 0.0 - k[2874]*y_cur[IDX_H2COII]; - data[jistart + 12558] = 0.0 + k[2857]*y_cur[IDX_HCOI]; - data[jistart + 12559] = 0.0 - k[500]*y_cur[IDX_H2COII] + - k[2230]*y_cur[IDX_CH5II] + k[2514]*y_cur[IDX_H2OII] + - k[2697]*y_cur[IDX_H3II] + k[2857]*y_cur[IDX_HCNII] + - k[2969]*y_cur[IDX_HCOII] - k[3007]*y_cur[IDX_H2COII] + - k[3008]*y_cur[IDX_HNOII] + k[3009]*y_cur[IDX_N2HII] + - k[3011]*y_cur[IDX_O2HII] + k[3494]*y_cur[IDX_NHII] + - k[3520]*y_cur[IDX_NH2II] + k[3783]*y_cur[IDX_OHII]; - data[jistart + 12560] = 0.0 + k[2969]*y_cur[IDX_HCOI]; - data[jistart + 12561] = 0.0 - k[3038]*y_cur[IDX_H2COII]; - data[jistart + 12562] = 0.0 + k[3008]*y_cur[IDX_HCOI]; - data[jistart + 12563] = 0.0 + k[517]*y_cur[IDX_H2COI] + - k[5632]*y_cur[IDX_CH3OI]; - data[jistart + 12564] = 0.0 - k[531]*y_cur[IDX_H2COII]; - data[jistart + 12565] = 0.0 + k[551]*y_cur[IDX_H2COI] + - k[3336]*y_cur[IDX_CH3OHI]; - data[jistart + 12566] = 0.0 + k[566]*y_cur[IDX_H2COI]; - data[jistart + 12567] = 0.0 + k[3009]*y_cur[IDX_HCOI]; - data[jistart + 12568] = 0.0 - k[3611]*y_cur[IDX_H2COII]; - data[jistart + 12569] = 0.0 + k[574]*y_cur[IDX_H2COI] + - k[3494]*y_cur[IDX_HCOI]; - data[jistart + 12570] = 0.0 - k[3535]*y_cur[IDX_H2COII]; - data[jistart + 12571] = 0.0 + k[3520]*y_cur[IDX_HCOI]; - data[jistart + 12572] = 0.0 - k[604]*y_cur[IDX_H2COII] - - k[3574]*y_cur[IDX_H2COII]; - data[jistart + 12573] = 0.0 - k[624]*y_cur[IDX_H2COII]; - data[jistart + 12574] = 0.0 - k[635]*y_cur[IDX_H2COII]; - data[jistart + 12575] = 0.0 + k[2090]*y_cur[IDX_CH3II]; - data[jistart + 12576] = 0.0 + k[655]*y_cur[IDX_H2COI] + - k[3636]*y_cur[IDX_CH3OHI]; - data[jistart + 12577] = 0.0 - k[4738]*y_cur[IDX_H2COII]; - data[jistart + 12578] = 0.0 - k[2489]*y_cur[IDX_H2COII]; - data[jistart + 12579] = 0.0 + k[461]*y_cur[IDX_H2COI] + - k[2014]*y_cur[IDX_CH2I]; - data[jistart + 12580] = 0.0 - k[4773]*y_cur[IDX_H2COII]; - data[jistart + 12581] = 0.0 + k[3011]*y_cur[IDX_HCOI]; - data[jistart + 12582] = 0.0 + k[2093]*y_cur[IDX_CH3II]; - data[jistart + 12583] = 0.0 + k[688]*y_cur[IDX_H2COI] + - k[3783]*y_cur[IDX_HCOI]; - data[jistart + 12584] = 0.0 - k[4808]*y_cur[IDX_H2COII]; - data[jistart + 12585] = 0.0 - k[460]*y_cur[IDX_H2COII] - - k[2490]*y_cur[IDX_H2COII]; - data[jistart + 12586] = 0.0 - k[4843]*y_cur[IDX_H2COII]; - data[jistart + 12587] = 0.0 - k[718]*y_cur[IDX_H2COII]; - data[jistart + 12588] = 0.0 - k[996]*y_cur[IDX_H2COII] - - k[997]*y_cur[IDX_H2COII] - k[998]*y_cur[IDX_H2COII] - - k[999]*y_cur[IDX_H2COII] - k[5616]*y_cur[IDX_H2COII]; - data[jistart + 12589] = 0.0 - k[1392]*y_cur[IDX_H2CSI]; - data[jistart + 12590] = 0.0 + k[3851]*y_cur[IDX_SOII]; - data[jistart + 12591] = 0.0 + k[5048]*y_cur[IDX_SI]; - data[jistart + 12592] = 0.0 + k[8627]*y_cur[IDX_GHCSI]; - data[jistart + 12593] = 0.0 + k[7171] + k[7353] + k[7535]; - data[jistart + 12594] = 0.0 + k[8627]*y_cur[IDX_GHI]; - data[jistart + 12595] = 0.0 + k[6602]*y_cur[IDX_H3CSII]; - data[jistart + 12596] = 0.0 - k[377]*y_cur[IDX_H2CSI]; - data[jistart + 12597] = 0.0 - k[377]*y_cur[IDX_HII] - - k[1392]*y_cur[IDX_CII] - k[2683]*y_cur[IDX_H3II] - - k[2959]*y_cur[IDX_HCOII] - k[3222]*y_cur[IDX_HeII] - - k[3223]*y_cur[IDX_HeII] - k[3224]*y_cur[IDX_HeII] - k[5837] - - k[6156] - k[6989]; - data[jistart + 12598] = 0.0 + k[5617]*y_cur[IDX_eM]; - data[jistart + 12599] = 0.0 - k[2683]*y_cur[IDX_H2CSI]; - data[jistart + 12600] = 0.0 + k[1040]*y_cur[IDX_eM] + - k[6602]*y_cur[IDX_GRAINM]; - data[jistart + 12601] = 0.0 - k[2959]*y_cur[IDX_H2CSI]; - data[jistart + 12602] = 0.0 - k[3222]*y_cur[IDX_H2CSI] - - k[3223]*y_cur[IDX_H2CSI] - k[3224]*y_cur[IDX_H2CSI]; - data[jistart + 12603] = 0.0 + k[3841]*y_cur[IDX_SiCH2II] + - k[5048]*y_cur[IDX_CH3I]; - data[jistart + 12604] = 0.0 + k[3851]*y_cur[IDX_CH2CCH2I]; - data[jistart + 12605] = 0.0 + k[3841]*y_cur[IDX_SI]; - data[jistart + 12606] = 0.0 + k[1040]*y_cur[IDX_H3CSII] + - k[5617]*y_cur[IDX_H2CSII]; - data[jistart + 12607] = 0.0 + k[3844]*y_cur[IDX_SOII]; - data[jistart + 12608] = 0.0 + k[3848]*y_cur[IDX_SOII]; - data[jistart + 12609] = 0.0 + k[1674]*y_cur[IDX_H2SI]; - data[jistart + 12610] = 0.0 + k[1992]*y_cur[IDX_OCSI]; - data[jistart + 12611] = 0.0 + k[3854]*y_cur[IDX_SOII]; - data[jistart + 12612] = 0.0 + k[2101]*y_cur[IDX_SII]; - data[jistart + 12613] = 0.0 + k[2084]*y_cur[IDX_HSI]; - data[jistart + 12614] = 0.0 + k[3825]*y_cur[IDX_SII]; - data[jistart + 12615] = 0.0 - k[6582]*y_cur[IDX_H2CSII] - - k[6583]*y_cur[IDX_H2CSII]; - data[jistart + 12616] = 0.0 + k[377]*y_cur[IDX_H2CSI]; - data[jistart + 12617] = 0.0 + k[377]*y_cur[IDX_HII]; - data[jistart + 12618] = 0.0 - k[1000]*y_cur[IDX_eM] - - k[1001]*y_cur[IDX_eM] - k[5617]*y_cur[IDX_eM] - - k[6582]*y_cur[IDX_GRAINM] - k[6583]*y_cur[IDX_GRAINM]; - data[jistart + 12619] = 0.0 + k[1674]*y_cur[IDX_C2H4II]; - data[jistart + 12620] = 0.0 + k[2702]*y_cur[IDX_HCSI]; - data[jistart + 12621] = 0.0 + k[2702]*y_cur[IDX_H3II]; - data[jistart + 12622] = 0.0 + k[2084]*y_cur[IDX_CH3II]; - data[jistart + 12623] = 0.0 + k[1992]*y_cur[IDX_CH2II]; - data[jistart + 12624] = 0.0 + k[2101]*y_cur[IDX_CH3I] + - k[3825]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 12625] = 0.0 + k[3844]*y_cur[IDX_C2H2I] + - k[3848]*y_cur[IDX_C2H4I] + k[3854]*y_cur[IDX_CH2CCH2I]; - data[jistart + 12626] = 0.0 - k[1000]*y_cur[IDX_H2CSII] - - k[1001]*y_cur[IDX_H2CSII] - k[5617]*y_cur[IDX_H2CSII]; - data[jistart + 12627] = 0.0 + k[2231]*y_cur[IDX_HClI]; - data[jistart + 12628] = 0.0 - k[2284]*y_cur[IDX_H2ClII]; - data[jistart + 12629] = 0.0 - k[6457]*y_cur[IDX_H2ClII] - - k[6458]*y_cur[IDX_H2ClII]; - data[jistart + 12630] = 0.0 + k[2453]*y_cur[IDX_HClII]; - data[jistart + 12631] = 0.0 - k[1002]*y_cur[IDX_eM] - - k[1003]*y_cur[IDX_eM] - k[2284]*y_cur[IDX_COI] - - k[2543]*y_cur[IDX_H2OI] - k[6457]*y_cur[IDX_GRAINM] - - k[6458]*y_cur[IDX_GRAINM]; - data[jistart + 12632] = 0.0 - k[2543]*y_cur[IDX_H2ClII]; - data[jistart + 12633] = 0.0 + k[2704]*y_cur[IDX_HClI]; - data[jistart + 12634] = 0.0 + k[2231]*y_cur[IDX_CH5II] + - k[2704]*y_cur[IDX_H3II]; - data[jistart + 12635] = 0.0 + k[2453]*y_cur[IDX_H2I]; - data[jistart + 12636] = 0.0 - k[1002]*y_cur[IDX_H2ClII] - - k[1003]*y_cur[IDX_H2ClII]; - data[jistart + 12637] = 0.0 - k[6349]*y_cur[IDX_H2FII] - - k[6350]*y_cur[IDX_H2FII]; - data[jistart + 12638] = 0.0 + k[2454]*y_cur[IDX_HFII]; - data[jistart + 12639] = 0.0 - k[1004]*y_cur[IDX_eM] - - k[1005]*y_cur[IDX_eM] - k[6349]*y_cur[IDX_GRAINM] - - k[6350]*y_cur[IDX_GRAINM]; - data[jistart + 12640] = 0.0 + k[2705]*y_cur[IDX_HFI]; - data[jistart + 12641] = 0.0 + k[2705]*y_cur[IDX_H3II]; - data[jistart + 12642] = 0.0 + k[2454]*y_cur[IDX_H2I]; - data[jistart + 12643] = 0.0 - k[1004]*y_cur[IDX_H2FII] - - k[1005]*y_cur[IDX_H2FII]; - data[jistart + 12644] = 0.0 + k[1911]*y_cur[IDX_NH4II]; - data[jistart + 12645] = 0.0 + k[1418]*y_cur[IDX_NH3I]; - data[jistart + 12646] = 0.0 + k[3563]*y_cur[IDX_NH3I]; - data[jistart + 12647] = 0.0 + k[1963]*y_cur[IDX_NH3I]; - data[jistart + 12648] = 0.0 + k[3454]*y_cur[IDX_NI]; - data[jistart + 12649] = 0.0 + k[3509]*y_cur[IDX_NH2II]; - data[jistart + 12650] = 0.0 + k[2535]*y_cur[IDX_H2OI]; - data[jistart + 12651] = 0.0 - k[6376]*y_cur[IDX_H2NCII] - - k[6377]*y_cur[IDX_H2NCII]; - data[jistart + 12652] = 0.0 - k[1006]*y_cur[IDX_eM] - - k[1007]*y_cur[IDX_eM] - k[2502]*y_cur[IDX_SiI] - - k[6376]*y_cur[IDX_GRAINM] - k[6377]*y_cur[IDX_GRAINM]; - data[jistart + 12653] = 0.0 + k[2535]*y_cur[IDX_CNII]; - data[jistart + 12654] = 0.0 + k[3454]*y_cur[IDX_CH3II]; - data[jistart + 12655] = 0.0 + k[3509]*y_cur[IDX_CNI]; - data[jistart + 12656] = 0.0 + k[1418]*y_cur[IDX_CII] + - k[1963]*y_cur[IDX_CHII] + k[3563]*y_cur[IDX_C3HII]; - data[jistart + 12657] = 0.0 + k[1911]*y_cur[IDX_CI]; - data[jistart + 12658] = 0.0 - k[2502]*y_cur[IDX_H2NCII]; - data[jistart + 12659] = 0.0 - k[1006]*y_cur[IDX_H2NCII] - - k[1007]*y_cur[IDX_H2NCII]; - data[jistart + 12660] = 0.0 - k[6538]*y_cur[IDX_H2NCOII] - - k[6539]*y_cur[IDX_H2NCOII]; - data[jistart + 12661] = 0.0 + k[3047]*y_cur[IDX_HNCOII]; - data[jistart + 12662] = 0.0 - k[1008]*y_cur[IDX_eM] - - k[1009]*y_cur[IDX_eM] - k[6538]*y_cur[IDX_GRAINM] - - k[6539]*y_cur[IDX_GRAINM]; - data[jistart + 12663] = 0.0 + k[2707]*y_cur[IDX_HNCOI]; - data[jistart + 12664] = 0.0 + k[2707]*y_cur[IDX_H3II]; - data[jistart + 12665] = 0.0 + k[3047]*y_cur[IDX_H2I]; - data[jistart + 12666] = 0.0 - k[1008]*y_cur[IDX_H2NCOII] - - k[1009]*y_cur[IDX_H2NCOII]; - data[jistart + 12667] = 0.0 - k[6431]*y_cur[IDX_H2NOII] - - k[6432]*y_cur[IDX_H2NOII]; - data[jistart + 12668] = 0.0 - k[1010]*y_cur[IDX_eM] - - k[1011]*y_cur[IDX_eM] - k[6431]*y_cur[IDX_GRAINM] - - k[6432]*y_cur[IDX_GRAINM]; - data[jistart + 12669] = 0.0 + k[2709]*y_cur[IDX_HNOI]; - data[jistart + 12670] = 0.0 + k[2709]*y_cur[IDX_H3II]; - data[jistart + 12671] = 0.0 + k[3524]*y_cur[IDX_O2I]; - data[jistart + 12672] = 0.0 + k[3524]*y_cur[IDX_NH2II]; - data[jistart + 12673] = 0.0 - k[1010]*y_cur[IDX_H2NOII] - - k[1011]*y_cur[IDX_H2NOII]; - data[jistart + 12674] = 0.0 - k[1393]*y_cur[IDX_H2OI] - - k[1394]*y_cur[IDX_H2OI]; - data[jistart + 12675] = 0.0 - k[4]*y_cur[IDX_H2OI] + - k[3900]*y_cur[IDX_H3OII]; - data[jistart + 12676] = 0.0 + k[3935]*y_cur[IDX_H3OII]; - data[jistart + 12677] = 0.0 + k[3970]*y_cur[IDX_H3OII]; - data[jistart + 12678] = 0.0 + k[462]*y_cur[IDX_H2OII] + - k[2766]*y_cur[IDX_H3OII]; - data[jistart + 12679] = 0.0 - k[2519]*y_cur[IDX_H2OI] - - k[2520]*y_cur[IDX_H2OI]; - data[jistart + 12680] = 0.0 + k[4005]*y_cur[IDX_H3OII]; - data[jistart + 12681] = 0.0 + k[465]*y_cur[IDX_H2OII]; - data[jistart + 12682] = 0.0 - k[2521]*y_cur[IDX_H2OI]; - data[jistart + 12683] = 0.0 + k[4040]*y_cur[IDX_H3OII]; - data[jistart + 12684] = 0.0 + k[463]*y_cur[IDX_H2OII] + - k[5453]*y_cur[IDX_OHI]; - data[jistart + 12685] = 0.0 - k[2522]*y_cur[IDX_H2OI]; - data[jistart + 12686] = 0.0 + k[2767]*y_cur[IDX_H3OII] + - k[5456]*y_cur[IDX_OHI]; - data[jistart + 12687] = 0.0 - k[2523]*y_cur[IDX_H2OI]; - data[jistart + 12688] = 0.0 + k[464]*y_cur[IDX_H2OII] + - k[3632]*y_cur[IDX_OII]; - data[jistart + 12689] = 0.0 + k[5457]*y_cur[IDX_OHI]; - data[jistart + 12690] = 0.0 - k[2524]*y_cur[IDX_H2OI]; - data[jistart + 12691] = 0.0 + k[2592]*y_cur[IDX_H3II] + - k[2593]*y_cur[IDX_H3II] + k[2594]*y_cur[IDX_H3II] + - k[2768]*y_cur[IDX_H3OII]; - data[jistart + 12692] = 0.0 + k[774]*y_cur[IDX_eM] + - k[775]*y_cur[IDX_eM] + k[2491]*y_cur[IDX_H2COI] + - k[6606]*y_cur[IDX_GRAINM] + k[6607]*y_cur[IDX_GRAINM]; - data[jistart + 12693] = 0.0 + k[466]*y_cur[IDX_H2OII] + - k[2505]*y_cur[IDX_H2OII]; - data[jistart + 12694] = 0.0 - k[2534]*y_cur[IDX_H2OI]; - data[jistart + 12695] = 0.0 - k[2525]*y_cur[IDX_H2OI] - - k[2526]*y_cur[IDX_H2OI]; - data[jistart + 12696] = 0.0 - k[2527]*y_cur[IDX_H2OI]; - data[jistart + 12697] = 0.0 + k[2769]*y_cur[IDX_H3OII]; - data[jistart + 12698] = 0.0 + k[2770]*y_cur[IDX_H3OII]; - data[jistart + 12699] = 0.0 + k[2771]*y_cur[IDX_H3OII]; - data[jistart + 12700] = 0.0 + k[4075]*y_cur[IDX_H3OII]; - data[jistart + 12701] = 0.0 + k[2773]*y_cur[IDX_H3OII]; - data[jistart + 12702] = 0.0 - k[2528]*y_cur[IDX_H2OI] - - k[2529]*y_cur[IDX_H2OI] - k[2530]*y_cur[IDX_H2OI]; - data[jistart + 12703] = 0.0 + k[4110]*y_cur[IDX_H3OII]; - data[jistart + 12704] = 0.0 + k[2772]*y_cur[IDX_H3OII]; - data[jistart + 12705] = 0.0 + k[2774]*y_cur[IDX_H3OII]; - data[jistart + 12706] = 0.0 + k[4145]*y_cur[IDX_H3OII]; - data[jistart + 12707] = 0.0 + k[2775]*y_cur[IDX_H3OII]; - data[jistart + 12708] = 0.0 - k[2531]*y_cur[IDX_H2OI]; - data[jistart + 12709] = 0.0 + k[2776]*y_cur[IDX_H3OII]; - data[jistart + 12710] = 0.0 + k[2777]*y_cur[IDX_H3OII]; - data[jistart + 12711] = 0.0 + k[2778]*y_cur[IDX_H3OII]; - data[jistart + 12712] = 0.0 + k[4180]*y_cur[IDX_H3OII]; - data[jistart + 12713] = 0.0 + k[2780]*y_cur[IDX_H3OII]; - data[jistart + 12714] = 0.0 + k[4215]*y_cur[IDX_H3OII]; - data[jistart + 12715] = 0.0 + k[2805]*y_cur[IDX_H3OII]; - data[jistart + 12716] = 0.0 + k[2779]*y_cur[IDX_H3OII]; - data[jistart + 12717] = 0.0 - k[2532]*y_cur[IDX_H2OI] - - k[2533]*y_cur[IDX_H2OI]; - data[jistart + 12718] = 0.0 + k[2781]*y_cur[IDX_H3OII]; - data[jistart + 12719] = 0.0 + k[2782]*y_cur[IDX_H3OII]; - data[jistart + 12720] = 0.0 + k[4250]*y_cur[IDX_H3OII]; - data[jistart + 12721] = 0.0 + k[4285]*y_cur[IDX_H3OII]; - data[jistart + 12722] = 0.0 + k[4320]*y_cur[IDX_H3OII]; - data[jistart + 12723] = 0.0 + k[4355]*y_cur[IDX_H3OII]; - data[jistart + 12724] = 0.0 + k[4390]*y_cur[IDX_H3OII]; - data[jistart + 12725] = 0.0 + k[2783]*y_cur[IDX_H3OII]; - data[jistart + 12726] = 0.0 + k[4425]*y_cur[IDX_H3OII]; - data[jistart + 12727] = 0.0 + k[4460]*y_cur[IDX_H3OII]; - data[jistart + 12728] = 0.0 + k[4495]*y_cur[IDX_H3OII]; - data[jistart + 12729] = 0.0 + k[4530]*y_cur[IDX_H3OII]; - data[jistart + 12730] = 0.0 + k[4565]*y_cur[IDX_H3OII]; - data[jistart + 12731] = 0.0 + k[4600]*y_cur[IDX_H3OII]; - data[jistart + 12732] = 0.0 + k[2784]*y_cur[IDX_H3OII]; - data[jistart + 12733] = 0.0 + k[291]*y_cur[IDX_H2OII] + - k[2249]*y_cur[IDX_H3OII]; - data[jistart + 12734] = 0.0 - k[1951]*y_cur[IDX_H2OI] - - k[1952]*y_cur[IDX_H2OI] - k[1953]*y_cur[IDX_H2OI]; - data[jistart + 12735] = 0.0 + k[4635]*y_cur[IDX_H3OII]; - data[jistart + 12736] = 0.0 + k[263]*y_cur[IDX_H2OII] + - k[2004]*y_cur[IDX_H3OII] + k[5009]*y_cur[IDX_O2I] + - k[5017]*y_cur[IDX_OHI]; - data[jistart + 12737] = 0.0 - k[1982]*y_cur[IDX_H2OI]; - data[jistart + 12738] = 0.0 + k[2785]*y_cur[IDX_H3OII]; - data[jistart + 12739] = 0.0 + k[2786]*y_cur[IDX_H3OII]; - data[jistart + 12740] = 0.0 + k[918]*y_cur[IDX_eM] + - k[6492]*y_cur[IDX_GRAINM]; - data[jistart + 12741] = 0.0 + k[2787]*y_cur[IDX_H3OII]; - data[jistart + 12742] = 0.0 + k[5635]*y_cur[IDX_H3OII]; - data[jistart + 12743] = 0.0 + k[5663]*y_cur[IDX_H3OII]; - data[jistart + 12744] = 0.0 + k[5657]*y_cur[IDX_H3OII]; - data[jistart + 12745] = 0.0 + k[2788]*y_cur[IDX_H3OII]; - data[jistart + 12746] = 0.0 - k[5031]*y_cur[IDX_H2OI] + - k[5038]*y_cur[IDX_NOI] + k[5040]*y_cur[IDX_O2I] + - k[5047]*y_cur[IDX_OHI]; - data[jistart + 12747] = 0.0 - k[5536]*y_cur[IDX_H2OI]; - data[jistart + 12748] = 0.0 + k[2789]*y_cur[IDX_H3OII]; - data[jistart + 12749] = 0.0 + k[2790]*y_cur[IDX_H3OII]; - data[jistart + 12750] = 0.0 + k[2651]*y_cur[IDX_H3II] + - k[2652]*y_cur[IDX_H3II] + k[2791]*y_cur[IDX_H3OII]; - data[jistart + 12751] = 0.0 + k[2792]*y_cur[IDX_H3OII]; - data[jistart + 12752] = 0.0 + k[2659]*y_cur[IDX_H3II] + - k[2660]*y_cur[IDX_H3II] + k[2793]*y_cur[IDX_H3OII]; - data[jistart + 12753] = 0.0 + k[5669]*y_cur[IDX_H3OII]; - data[jistart + 12754] = 0.0 + k[1291]*y_cur[IDX_eM] + - k[1293]*y_cur[IDX_eM] + k[1295]*y_cur[IDX_eM] + - k[6732]*y_cur[IDX_GRAINM] + k[6734]*y_cur[IDX_GRAINM] + - k[6736]*y_cur[IDX_GRAINM]; - data[jistart + 12755] = 0.0 + k[5629]*y_cur[IDX_H3OII]; - data[jistart + 12756] = 0.0 + k[2794]*y_cur[IDX_H3OII]; - data[jistart + 12757] = 0.0 + k[2125]*y_cur[IDX_CH3OH2II] + - k[2130]*y_cur[IDX_PH2II] + k[2330]*y_cur[IDX_HII] + - k[2667]*y_cur[IDX_H3II] + k[2795]*y_cur[IDX_H3OII] + - k[3636]*y_cur[IDX_OII]; - data[jistart + 12758] = 0.0 + k[960]*y_cur[IDX_eM] + - k[6428]*y_cur[IDX_GRAINM]; - data[jistart + 12759] = 0.0 + k[963]*y_cur[IDX_eM] + - k[964]*y_cur[IDX_eM] + k[2125]*y_cur[IDX_CH3OHI] + - k[2494]*y_cur[IDX_H2COI] + k[2873]*y_cur[IDX_HCNI] + - k[6440]*y_cur[IDX_GRAINM] + k[6441]*y_cur[IDX_GRAINM]; - data[jistart + 12760] = 0.0 + k[5061]*y_cur[IDX_OHI]; - data[jistart + 12761] = 0.0 - k[2142]*y_cur[IDX_H2OI]; - data[jistart + 12762] = 0.0 - k[2226]*y_cur[IDX_H2OI]; - data[jistart + 12763] = 0.0 - k[2535]*y_cur[IDX_H2OI] - - k[2536]*y_cur[IDX_H2OI] - k[2537]*y_cur[IDX_H2OI] - - k[2538]*y_cur[IDX_H2OI]; - data[jistart + 12764] = 0.0 + k[4670]*y_cur[IDX_H3OII]; - data[jistart + 12765] = 0.0 - k[2539]*y_cur[IDX_H2OI]; - data[jistart + 12766] = 0.0 - k[478]*y_cur[IDX_H2OI] - - k[2540]*y_cur[IDX_H2OI]; - data[jistart + 12767] = 0.0 - k[479]*y_cur[IDX_H2OI] - - k[2541]*y_cur[IDX_H2OI]; - data[jistart + 12768] = 0.0 + k[5651]*y_cur[IDX_H3OII]; - data[jistart + 12769] = 0.0 + k[2796]*y_cur[IDX_H3OII]; - data[jistart + 12770] = 0.0 + k[2797]*y_cur[IDX_H3OII]; - data[jistart + 12771] = 0.0 - k[5151]*y_cur[IDX_H2OI]; - data[jistart + 12772] = 0.0 + k[467]*y_cur[IDX_H2OII]; - data[jistart + 12773] = 0.0 + k[8584]*y_cur[IDX_GOHI]; - data[jistart + 12774] = 0.0 + k[7084] + k[7266] + k[7448]; - data[jistart + 12775] = 0.0 + k[8584]*y_cur[IDX_GHI]; - data[jistart + 12776] = 0.0 + k[6343]*y_cur[IDX_H3OII] + - k[6415]*y_cur[IDX_H3COII] + k[6428]*y_cur[IDX_CH3OHII] + - k[6440]*y_cur[IDX_CH3OH2II] + k[6441]*y_cur[IDX_CH3OH2II] + - k[6492]*y_cur[IDX_CH2COII] + k[6545]*y_cur[IDX_H2OCNII] + - k[6606]*y_cur[IDX_C2H5OH2II] + k[6607]*y_cur[IDX_C2H5OH2II] + - k[6732]*y_cur[IDX_CH3COOH2II] + k[6734]*y_cur[IDX_CH3COOH2II] + - k[6736]*y_cur[IDX_CH3COOH2II]; - data[jistart + 12777] = 0.0 + k[108]*y_cur[IDX_OHM] - - k[143]*y_cur[IDX_H2OI] + k[5166]*y_cur[IDX_H2O2I] - - k[5168]*y_cur[IDX_H2OI] + k[5191]*y_cur[IDX_O2HI] + - k[5574]*y_cur[IDX_OHI]; - data[jistart + 12778] = 0.0 - k[378]*y_cur[IDX_H2OI] + - k[2330]*y_cur[IDX_CH3OHI]; - data[jistart + 12779] = 0.0 + k[81]*y_cur[IDX_OHI] - - k[2367]*y_cur[IDX_H2OI] + k[4706]*y_cur[IDX_H3OII]; - data[jistart + 12780] = 0.0 + k[83]*y_cur[IDX_OM] - - k[136]*y_cur[IDX_H2OI] + k[2465]*y_cur[IDX_NO2II] + - k[5148]*y_cur[IDX_OHI]; - data[jistart + 12781] = 0.0 - k[447]*y_cur[IDX_H2OI] - - k[2386]*y_cur[IDX_H2OI]; - data[jistart + 12782] = 0.0 + k[2798]*y_cur[IDX_H3OII]; - data[jistart + 12783] = 0.0 + k[468]*y_cur[IDX_H2OII] + - k[2491]*y_cur[IDX_C2H5OH2II] + k[2494]*y_cur[IDX_CH3OH2II] + - k[2799]*y_cur[IDX_H3OII] + k[5465]*y_cur[IDX_OHI]; - data[jistart + 12784] = 0.0 - k[2542]*y_cur[IDX_H2OI]; - data[jistart + 12785] = 0.0 - k[2543]*y_cur[IDX_H2OI]; - data[jistart + 12786] = 0.0 - k[4]*y_cur[IDX_CM] - - k[136]*y_cur[IDX_H2I] - k[143]*y_cur[IDX_HI] - k[378]*y_cur[IDX_HII] - - k[447]*y_cur[IDX_H2II] - k[478]*y_cur[IDX_COII] - - k[479]*y_cur[IDX_CO2II] - k[480]*y_cur[IDX_HCNII] - - k[481]*y_cur[IDX_N2II] - k[482]*y_cur[IDX_N2OII] - - k[518]*y_cur[IDX_HeII] - k[552]*y_cur[IDX_NII] - - k[575]*y_cur[IDX_NHII] - k[656]*y_cur[IDX_OII] - - k[689]*y_cur[IDX_OHII] - k[1393]*y_cur[IDX_CII] - - k[1394]*y_cur[IDX_CII] - k[1951]*y_cur[IDX_CHII] - - k[1952]*y_cur[IDX_CHII] - k[1953]*y_cur[IDX_CHII] - - k[1982]*y_cur[IDX_CH2II] - k[2142]*y_cur[IDX_CH4II] - - k[2226]*y_cur[IDX_CH5II] - k[2367]*y_cur[IDX_HM] - - k[2386]*y_cur[IDX_H2II] - k[2509]*y_cur[IDX_H2OII] - - k[2519]*y_cur[IDX_C2II] - k[2520]*y_cur[IDX_C2II] - - k[2521]*y_cur[IDX_C2HII] - k[2522]*y_cur[IDX_C2H2II] - - k[2523]*y_cur[IDX_C2H3II] - k[2524]*y_cur[IDX_C2H5II] - - k[2525]*y_cur[IDX_C2NII] - k[2526]*y_cur[IDX_C2NII] - - k[2527]*y_cur[IDX_C2N2II] - k[2528]*y_cur[IDX_C3HII] - - k[2529]*y_cur[IDX_C3HII] - k[2530]*y_cur[IDX_C3HII] - - k[2531]*y_cur[IDX_C3OII] - k[2532]*y_cur[IDX_C4NII] - - k[2533]*y_cur[IDX_C4NII] - k[2534]*y_cur[IDX_C2H6II] - - k[2535]*y_cur[IDX_CNII] - k[2536]*y_cur[IDX_CNII] - - k[2537]*y_cur[IDX_CNII] - k[2538]*y_cur[IDX_CNII] - - k[2539]*y_cur[IDX_CNCII] - k[2540]*y_cur[IDX_COII] - - k[2541]*y_cur[IDX_CO2II] - k[2542]*y_cur[IDX_H2COII] - - k[2543]*y_cur[IDX_H2ClII] - k[2544]*y_cur[IDX_H2SII] - - k[2545]*y_cur[IDX_H3COII] - k[2546]*y_cur[IDX_HCNII] - - k[2547]*y_cur[IDX_HCOII] - k[2548]*y_cur[IDX_HCO2II] - - k[2549]*y_cur[IDX_HCOOH2II] - k[2550]*y_cur[IDX_HNOII] - - k[2551]*y_cur[IDX_HNSiII] - k[2552]*y_cur[IDX_HOCSII] - - k[2553]*y_cur[IDX_HPOII] - k[2554]*y_cur[IDX_HSII] - - k[2555]*y_cur[IDX_HSO2II] - k[2556]*y_cur[IDX_HSiSII] - - k[2557]*y_cur[IDX_N2II] - k[2558]*y_cur[IDX_N2HII] - - k[2559]*y_cur[IDX_N2OII] - k[2560]*y_cur[IDX_NCCNHII] - - k[2561]*y_cur[IDX_O2HII] - k[2562]*y_cur[IDX_PII] - - k[2563]*y_cur[IDX_PII] - k[2564]*y_cur[IDX_PHII] - - k[2565]*y_cur[IDX_PHII] - k[2566]*y_cur[IDX_PHII] - - k[2567]*y_cur[IDX_PH2II] - k[2568]*y_cur[IDX_PH2II] - - k[2569]*y_cur[IDX_SiII] - k[2570]*y_cur[IDX_SiCH3II] - - k[2571]*y_cur[IDX_SiHII] - k[2572]*y_cur[IDX_SiH4II] - - k[2573]*y_cur[IDX_SiH5II] - k[2684]*y_cur[IDX_H3II] - - k[3225]*y_cur[IDX_HeII] - k[3226]*y_cur[IDX_HeII] - - k[3489]*y_cur[IDX_NHII] - k[3490]*y_cur[IDX_NHII] - - k[3491]*y_cur[IDX_NHII] - k[3492]*y_cur[IDX_NHII] - - k[3512]*y_cur[IDX_NH2II] - k[3513]*y_cur[IDX_NH2II] - - k[3514]*y_cur[IDX_NH2II] - k[3550]*y_cur[IDX_NH3II] - - k[3779]*y_cur[IDX_OHII] - k[5031]*y_cur[IDX_CH3I] - - k[5151]*y_cur[IDX_FI] - k[5152]*y_cur[IDX_O2HI] - - k[5168]*y_cur[IDX_HI] - k[5306]*y_cur[IDX_NHI] - - k[5399]*y_cur[IDX_OI] - k[5536]*y_cur[IDX_CH3II] - - k[5566]*y_cur[IDX_HCOII] - k[5839] - k[6159] - k[6160] - k[6161] - - k[6902]; - data[jistart + 12787] = 0.0 + k[263]*y_cur[IDX_CH2I] + - k[291]*y_cur[IDX_CHI] + k[462]*y_cur[IDX_C2I] + - k[463]*y_cur[IDX_C2H2I] + k[464]*y_cur[IDX_C2H4I] + - k[465]*y_cur[IDX_C2HI] + k[466]*y_cur[IDX_C2H6I] + - k[467]*y_cur[IDX_FeI] + k[468]*y_cur[IDX_H2COI] + - k[469]*y_cur[IDX_H2SI] + k[470]*y_cur[IDX_HCOI] + - k[471]*y_cur[IDX_MgI] + k[472]*y_cur[IDX_NOI] + - k[473]*y_cur[IDX_NaI] + k[474]*y_cur[IDX_O2I] + - k[475]*y_cur[IDX_OCSI] + k[476]*y_cur[IDX_SI] + - k[477]*y_cur[IDX_SiI] + k[588]*y_cur[IDX_NH2I] + - k[605]*y_cur[IDX_NH3I] + k[2505]*y_cur[IDX_C2H6I] - - k[2509]*y_cur[IDX_H2OI]; - data[jistart + 12788] = 0.0 + k[5166]*y_cur[IDX_HI] + - k[5467]*y_cur[IDX_OHI]; - data[jistart + 12789] = 0.0 + k[1015]*y_cur[IDX_eM] + - k[6545]*y_cur[IDX_GRAINM]; - data[jistart + 12790] = 0.0 + k[469]*y_cur[IDX_H2OII] + - k[2582]*y_cur[IDX_SOII] + k[2801]*y_cur[IDX_H3OII] + - k[3643]*y_cur[IDX_OII] + k[5468]*y_cur[IDX_OHI]; - data[jistart + 12791] = 0.0 - k[2544]*y_cur[IDX_H2OI]; - data[jistart + 12792] = 0.0 + k[2800]*y_cur[IDX_H3OII]; - data[jistart + 12793] = 0.0 + k[2802]*y_cur[IDX_H3OII]; - data[jistart + 12794] = 0.0 + k[2592]*y_cur[IDX_C2H5OHI] + - k[2593]*y_cur[IDX_C2H5OHI] + k[2594]*y_cur[IDX_C2H5OHI] + - k[2651]*y_cur[IDX_CH3CHOI] + k[2652]*y_cur[IDX_CH3CHOI] + - k[2659]*y_cur[IDX_CH3COCH3I] + k[2660]*y_cur[IDX_CH3COCH3I] + - k[2667]*y_cur[IDX_CH3OHI] - k[2684]*y_cur[IDX_H2OI] + - k[2700]*y_cur[IDX_HCOOHI]; - data[jistart + 12795] = 0.0 + k[1035]*y_cur[IDX_eM] - - k[2545]*y_cur[IDX_H2OI] + k[6415]*y_cur[IDX_GRAINM]; - data[jistart + 12796] = 0.0 + k[1041]*y_cur[IDX_eM] + - k[2004]*y_cur[IDX_CH2I] + k[2249]*y_cur[IDX_CHI] + - k[2766]*y_cur[IDX_C2I] + k[2767]*y_cur[IDX_C2H3I] + - k[2768]*y_cur[IDX_C2H5OHI] + k[2769]*y_cur[IDX_C2OI] + - k[2770]*y_cur[IDX_C2SI] + k[2771]*y_cur[IDX_C3I] + - k[2772]*y_cur[IDX_C3H2I] + k[2773]*y_cur[IDX_C3HI] + - k[2774]*y_cur[IDX_C3NI] + k[2775]*y_cur[IDX_C3OI] + - k[2776]*y_cur[IDX_C3PI] + k[2777]*y_cur[IDX_C3SI] + - k[2778]*y_cur[IDX_C4I] + k[2779]*y_cur[IDX_C4H3I] + - k[2780]*y_cur[IDX_C4HI] + k[2781]*y_cur[IDX_C4PI] + - k[2782]*y_cur[IDX_C4SI] + k[2783]*y_cur[IDX_C6H6I] + - k[2784]*y_cur[IDX_CCPI] + k[2785]*y_cur[IDX_CH2CCHI] + - k[2786]*y_cur[IDX_CH2COI] + k[2787]*y_cur[IDX_CH2NHI] + - k[2788]*y_cur[IDX_CH2PHI] + k[2789]*y_cur[IDX_CH3CCHI] + - k[2790]*y_cur[IDX_CH3CHCH2I] + k[2791]*y_cur[IDX_CH3CHOI] + - k[2792]*y_cur[IDX_CH3CNI] + k[2793]*y_cur[IDX_CH3COCH3I] + - k[2794]*y_cur[IDX_CH3OCH3I] + k[2795]*y_cur[IDX_CH3OHI] + - k[2796]*y_cur[IDX_CPI] + k[2797]*y_cur[IDX_CSI] + - k[2798]*y_cur[IDX_H2CCCI] + k[2799]*y_cur[IDX_H2COI] + - k[2800]*y_cur[IDX_H2S2I] + k[2801]*y_cur[IDX_H2SI] + - k[2802]*y_cur[IDX_H2SiOI] + k[2803]*y_cur[IDX_HC2PI] + - k[2804]*y_cur[IDX_HC3NI] + k[2805]*y_cur[IDX_C4H2I] + - k[2806]*y_cur[IDX_HCNI] + k[2807]*y_cur[IDX_HCOOCH3I] + - k[2808]*y_cur[IDX_HCPI] + k[2809]*y_cur[IDX_HCSiI] + - k[2810]*y_cur[IDX_HNCI] + k[2811]*y_cur[IDX_HNSiI] + - k[2812]*y_cur[IDX_HPOI] + k[2813]*y_cur[IDX_HS2I] + - k[2814]*y_cur[IDX_NaI] + k[2816]*y_cur[IDX_PNI] + - k[2817]*y_cur[IDX_S2I] + k[2818]*y_cur[IDX_SiI] + - k[2819]*y_cur[IDX_SiC2I] + k[2820]*y_cur[IDX_SiC2HI] + - k[2821]*y_cur[IDX_SiCI] + k[2822]*y_cur[IDX_SiCH3I] + - k[2823]*y_cur[IDX_SiH2I] + k[2824]*y_cur[IDX_SiHI] + - k[2825]*y_cur[IDX_SiNCI] + k[2826]*y_cur[IDX_SiOI] + - k[3028]*y_cur[IDX_HNC3I] + k[3538]*y_cur[IDX_NH2I] + - k[3578]*y_cur[IDX_NH3I] + k[3900]*y_cur[IDX_CM] + - k[3935]*y_cur[IDX_C10M] + k[3970]*y_cur[IDX_C10HM] + - k[4005]*y_cur[IDX_C2M] + k[4040]*y_cur[IDX_C2HM] + - k[4075]*y_cur[IDX_C3M] + k[4110]*y_cur[IDX_C3HM] + - k[4145]*y_cur[IDX_C3NM] + k[4180]*y_cur[IDX_C4M] + - k[4215]*y_cur[IDX_C4HM] + k[4250]*y_cur[IDX_C5M] + - k[4285]*y_cur[IDX_C5HM] + k[4320]*y_cur[IDX_C5NM] + - k[4355]*y_cur[IDX_C6M] + k[4390]*y_cur[IDX_C6HM] + - k[4425]*y_cur[IDX_C7M] + k[4460]*y_cur[IDX_C7HM] + - k[4495]*y_cur[IDX_C8M] + k[4530]*y_cur[IDX_C8HM] + - k[4565]*y_cur[IDX_C9M] + k[4600]*y_cur[IDX_C9HM] + - k[4635]*y_cur[IDX_CHM] + k[4670]*y_cur[IDX_CNM] + - k[4706]*y_cur[IDX_HM] + k[4741]*y_cur[IDX_OM] + - k[4776]*y_cur[IDX_O2M] + k[4811]*y_cur[IDX_OHM] + - k[4846]*y_cur[IDX_SM] + k[5629]*y_cur[IDX_CH3OI] + - k[5635]*y_cur[IDX_CH2OHI] + k[5651]*y_cur[IDX_COOCH3I] + - k[5657]*y_cur[IDX_CH2OHCOI] + k[5663]*y_cur[IDX_CH2OHCHOI] + - k[5669]*y_cur[IDX_CH3COOHI] + k[6343]*y_cur[IDX_GRAINM]; - data[jistart + 12797] = 0.0 + k[2803]*y_cur[IDX_H3OII]; - data[jistart + 12798] = 0.0 + k[2804]*y_cur[IDX_H3OII]; - data[jistart + 12799] = 0.0 + k[2806]*y_cur[IDX_H3OII] + - k[2873]*y_cur[IDX_CH3OH2II] + k[3795]*y_cur[IDX_OHM] + - k[5469]*y_cur[IDX_OHI]; - data[jistart + 12800] = 0.0 - k[480]*y_cur[IDX_H2OI] - - k[2546]*y_cur[IDX_H2OI]; - data[jistart + 12801] = 0.0 + k[470]*y_cur[IDX_H2OII] + - k[5471]*y_cur[IDX_OHI]; - data[jistart + 12802] = 0.0 - k[2547]*y_cur[IDX_H2OI] - - k[5566]*y_cur[IDX_H2OI]; - data[jistart + 12803] = 0.0 - k[2548]*y_cur[IDX_H2OI]; - data[jistart + 12804] = 0.0 + k[2807]*y_cur[IDX_H3OII]; - data[jistart + 12805] = 0.0 + k[2700]*y_cur[IDX_H3II]; - data[jistart + 12806] = 0.0 - k[2549]*y_cur[IDX_H2OI]; - data[jistart + 12807] = 0.0 + k[2808]*y_cur[IDX_H3OII]; - data[jistart + 12808] = 0.0 + k[2809]*y_cur[IDX_H3OII]; - data[jistart + 12809] = 0.0 + k[2810]*y_cur[IDX_H3OII]; - data[jistart + 12810] = 0.0 + k[3028]*y_cur[IDX_H3OII]; - data[jistart + 12811] = 0.0 + k[5472]*y_cur[IDX_OHI]; - data[jistart + 12812] = 0.0 - k[2550]*y_cur[IDX_H2OI]; - data[jistart + 12813] = 0.0 + k[2811]*y_cur[IDX_H3OII]; - data[jistart + 12814] = 0.0 - k[2551]*y_cur[IDX_H2OI]; - data[jistart + 12815] = 0.0 - k[2552]*y_cur[IDX_H2OI]; - data[jistart + 12816] = 0.0 + k[2812]*y_cur[IDX_H3OII]; - data[jistart + 12817] = 0.0 - k[2553]*y_cur[IDX_H2OI]; - data[jistart + 12818] = 0.0 - k[2554]*y_cur[IDX_H2OI]; - data[jistart + 12819] = 0.0 + k[2813]*y_cur[IDX_H3OII]; - data[jistart + 12820] = 0.0 - k[2555]*y_cur[IDX_H2OI]; - data[jistart + 12821] = 0.0 - k[2556]*y_cur[IDX_H2OI]; - data[jistart + 12822] = 0.0 - k[518]*y_cur[IDX_H2OI] - - k[3225]*y_cur[IDX_H2OI] - k[3226]*y_cur[IDX_H2OI]; - data[jistart + 12823] = 0.0 + k[471]*y_cur[IDX_H2OII]; - data[jistart + 12824] = 0.0 - k[552]*y_cur[IDX_H2OI]; - data[jistart + 12825] = 0.0 - k[481]*y_cur[IDX_H2OI] - - k[2557]*y_cur[IDX_H2OI]; - data[jistart + 12826] = 0.0 - k[2558]*y_cur[IDX_H2OI]; - data[jistart + 12827] = 0.0 - k[482]*y_cur[IDX_H2OI] - - k[2559]*y_cur[IDX_H2OI]; - data[jistart + 12828] = 0.0 - k[2560]*y_cur[IDX_H2OI]; - data[jistart + 12829] = 0.0 - k[5306]*y_cur[IDX_H2OI] + - k[5321]*y_cur[IDX_OHI]; - data[jistart + 12830] = 0.0 - k[575]*y_cur[IDX_H2OI] - - k[3489]*y_cur[IDX_H2OI] - k[3490]*y_cur[IDX_H2OI] - - k[3491]*y_cur[IDX_H2OI] - k[3492]*y_cur[IDX_H2OI]; - data[jistart + 12831] = 0.0 + k[588]*y_cur[IDX_H2OII] + - k[3538]*y_cur[IDX_H3OII] + k[5298]*y_cur[IDX_NOI] + - k[5300]*y_cur[IDX_OHI]; - data[jistart + 12832] = 0.0 - k[3512]*y_cur[IDX_H2OI] - - k[3513]*y_cur[IDX_H2OI] - k[3514]*y_cur[IDX_H2OI]; - data[jistart + 12833] = 0.0 + k[605]*y_cur[IDX_H2OII] + - k[3578]*y_cur[IDX_H3OII] + k[5476]*y_cur[IDX_OHI]; - data[jistart + 12834] = 0.0 - k[3550]*y_cur[IDX_H2OI]; - data[jistart + 12835] = 0.0 + k[472]*y_cur[IDX_H2OII] + - k[5038]*y_cur[IDX_CH3I] + k[5298]*y_cur[IDX_NH2I]; - data[jistart + 12836] = 0.0 + k[2465]*y_cur[IDX_H2I]; - data[jistart + 12837] = 0.0 + k[473]*y_cur[IDX_H2OII] + - k[2814]*y_cur[IDX_H3OII]; - data[jistart + 12838] = 0.0 - k[5399]*y_cur[IDX_H2OI]; - data[jistart + 12839] = 0.0 - k[656]*y_cur[IDX_H2OI] + - k[3632]*y_cur[IDX_C2H4I] + k[3636]*y_cur[IDX_CH3OHI] + - k[3643]*y_cur[IDX_H2SI]; - data[jistart + 12840] = 0.0 + k[83]*y_cur[IDX_H2I] + - k[4741]*y_cur[IDX_H3OII]; - data[jistart + 12841] = 0.0 + k[474]*y_cur[IDX_H2OII] + - k[3673]*y_cur[IDX_PH2II] + k[5009]*y_cur[IDX_CH2I] + - k[5040]*y_cur[IDX_CH3I]; - data[jistart + 12842] = 0.0 + k[4776]*y_cur[IDX_H3OII]; - data[jistart + 12843] = 0.0 - k[5152]*y_cur[IDX_H2OI] + - k[5191]*y_cur[IDX_HI] + k[5478]*y_cur[IDX_OHI]; - data[jistart + 12844] = 0.0 - k[2561]*y_cur[IDX_H2OI]; - data[jistart + 12845] = 0.0 + k[475]*y_cur[IDX_H2OII]; - data[jistart + 12846] = 0.0 + k[81]*y_cur[IDX_HM] + - k[5017]*y_cur[IDX_CH2I] + k[5047]*y_cur[IDX_CH3I] + - k[5061]*y_cur[IDX_CH4I] + k[5148]*y_cur[IDX_H2I] + - k[5300]*y_cur[IDX_NH2I] + k[5321]*y_cur[IDX_NHI] + - k[5453]*y_cur[IDX_C2H2I] + k[5456]*y_cur[IDX_C2H3I] + - k[5457]*y_cur[IDX_C2H5I] + k[5465]*y_cur[IDX_H2COI] + - k[5467]*y_cur[IDX_H2O2I] + k[5468]*y_cur[IDX_H2SI] + - k[5469]*y_cur[IDX_HCNI] + k[5471]*y_cur[IDX_HCOI] + - k[5472]*y_cur[IDX_HNOI] + k[5476]*y_cur[IDX_NH3I] + - k[5478]*y_cur[IDX_O2HI] + k[5479]*y_cur[IDX_OHI] + - k[5479]*y_cur[IDX_OHI] + k[5574]*y_cur[IDX_HI]; - data[jistart + 12847] = 0.0 - k[689]*y_cur[IDX_H2OI] - + k[4674]*y_cur[IDX_HCOII] + k[4675]*y_cur[IDX_HCOII] + + k[4676]*y_cur[IDX_HeII] + k[4677]*y_cur[IDX_MgII] + + k[4678]*y_cur[IDX_NII] + k[4679]*y_cur[IDX_N2HII] + + k[4680]*y_cur[IDX_NH3II] + k[4681]*y_cur[IDX_NH4II] + + k[4682]*y_cur[IDX_NOII] + k[4683]*y_cur[IDX_NaII] + + k[4684]*y_cur[IDX_OII] + k[4685]*y_cur[IDX_SII] + + k[4686]*y_cur[IDX_SOII] + k[4687]*y_cur[IDX_SiII] + + k[4688]*y_cur[IDX_SiOII] + k[4689]*y_cur[IDX_SiOHII] + + k[4690]*y_cur[IDX_SiSII] + k[5822] + k[6133]; + data[jistart + 16192] = 0.0 + k[5235]*y_cur[IDX_NI]; + data[jistart + 16193] = 0.0 + k[4660]*y_cur[IDX_CNM]; + data[jistart + 16194] = 0.0 + k[4679]*y_cur[IDX_CNM]; + data[jistart + 16195] = 0.0 + k[4686]*y_cur[IDX_CNM]; + data[jistart + 16196] = 0.0 + k[4662]*y_cur[IDX_CNM]; + data[jistart + 16197] = 0.0 + k[5243]*y_cur[IDX_NI]; + data[jistart + 16198] = 0.0 + k[4668]*y_cur[IDX_CNM]; + data[jistart + 16199] = 0.0 - k[547]*y_cur[IDX_CNI] + k[4678]*y_cur[IDX_CNM]; + data[jistart + 16200] = 0.0 + k[4667]*y_cur[IDX_CNM]; + data[jistart + 16201] = 0.0 + k[5231]*y_cur[IDX_NI]; + data[jistart + 16202] = 0.0 + k[4908]*y_cur[IDX_NCCNI]; + data[jistart + 16203] = 0.0 + k[4682]*y_cur[IDX_CNM]; + data[jistart + 16204] = 0.0 - k[3639]*y_cur[IDX_CNI] + k[4684]*y_cur[IDX_CNM]; + data[jistart + 16205] = 0.0 - k[5115]*y_cur[IDX_CNI]; + data[jistart + 16206] = 0.0 + k[4659]*y_cur[IDX_CNM]; + data[jistart + 16207] = 0.0 + k[1089]*y_cur[IDX_eM] + k[4672]*y_cur[IDX_CNM] + + k[4673]*y_cur[IDX_CNM] + k[6378]*y_cur[IDX_GRAINM]; + data[jistart + 16208] = 0.0 + k[260]*y_cur[IDX_CNII] + k[2005]*y_cur[IDX_HCNII] - + k[4997]*y_cur[IDX_CNI]; + data[jistart + 16209] = 0.0 + k[2859]*y_cur[IDX_HCNII] - k[5118]*y_cur[IDX_CNI] + k[5867] + + k[6198]; + data[jistart + 16210] = 0.0 + k[4680]*y_cur[IDX_CNM]; + data[jistart + 16211] = 0.0 - k[5105]*y_cur[IDX_CNI] - k[5106]*y_cur[IDX_CNI]; + data[jistart + 16212] = 0.0 + k[4681]*y_cur[IDX_CNM]; + data[jistart + 16213] = 0.0 + k[4967]*y_cur[IDX_CI]; + data[jistart + 16214] = 0.0 + k[304]*y_cur[IDX_CNII] - k[5123]*y_cur[IDX_CNI] - + k[5124]*y_cur[IDX_CNI]; + data[jistart + 16215] = 0.0 + k[3870]*y_cur[IDX_NCCNI] + k[4687]*y_cur[IDX_CNM]; + data[jistart + 16216] = 0.0 + k[4685]*y_cur[IDX_CNM]; + data[jistart + 16217] = 0.0 + k[4658]*y_cur[IDX_CNM]; + data[jistart + 16218] = 0.0 + k[303]*y_cur[IDX_CNII] + k[4974]*y_cur[IDX_CI] - + k[5121]*y_cur[IDX_CNI] - k[5122]*y_cur[IDX_CNI]; + data[jistart + 16219] = 0.0 + k[302]*y_cur[IDX_CNII] + k[2857]*y_cur[IDX_HCNII] - + k[5117]*y_cur[IDX_CNI]; + data[jistart + 16220] = 0.0 + k[2197]*y_cur[IDX_HC3NII] - k[5059]*y_cur[IDX_CNI]; + data[jistart + 16221] = 0.0 + k[241]*y_cur[IDX_CNII] + k[1745]*y_cur[IDX_HCNII] + + k[4903]*y_cur[IDX_NCCNI] - k[5514]*y_cur[IDX_CNI]; + data[jistart + 16222] = 0.0 + k[300]*y_cur[IDX_CNII] + k[2855]*y_cur[IDX_HCNII] - + k[5114]*y_cur[IDX_CNI]; + data[jistart + 16223] = 0.0 + k[301]*y_cur[IDX_CNII] + k[1474]*y_cur[IDX_C2HII] + + k[2856]*y_cur[IDX_HCNII] + k[2866]*y_cur[IDX_C2N2II] + + k[2867]*y_cur[IDX_C3II] + k[2869]*y_cur[IDX_C4HII] + + k[2871]*y_cur[IDX_C5II] - k[5116]*y_cur[IDX_CNI] + + k[5170]*y_cur[IDX_HI] + k[5402]*y_cur[IDX_OI] + + k[5469]*y_cur[IDX_OHI] + k[5854] + k[6181]; + data[jistart + 16224] = 0.0 + k[288]*y_cur[IDX_CNII] + k[2250]*y_cur[IDX_HCNII] + + k[5080]*y_cur[IDX_NI]; + data[jistart + 16225] = 0.0 + k[305]*y_cur[IDX_CNII] + k[2860]*y_cur[IDX_HCNII] - + k[5125]*y_cur[IDX_CNI]; + data[jistart + 16226] = 0.0 + k[208]*y_cur[IDX_CNII] + k[1458]*y_cur[IDX_HCNII] + + k[5222]*y_cur[IDX_NI]; + data[jistart + 16227] = 0.0 + k[698]*y_cur[IDX_CNII] + k[3800]*y_cur[IDX_HCNII] - + k[5459]*y_cur[IDX_CNI] - k[5460]*y_cur[IDX_CNI] + + k[5469]*y_cur[IDX_HCNI]; + data[jistart + 16228] = 0.0 - k[5302]*y_cur[IDX_CNI] - k[5303]*y_cur[IDX_CNI]; + data[jistart + 16229] = 0.0 + k[1514]*y_cur[IDX_CH3CNI] - k[2277]*y_cur[IDX_CNI] + + k[4657]*y_cur[IDX_CNM]; + data[jistart + 16230] = 0.0 - k[2075]*y_cur[IDX_CNI] + k[4663]*y_cur[IDX_CNM]; + data[jistart + 16231] = 0.0 - k[5104]*y_cur[IDX_CNI]; + data[jistart + 16232] = 0.0 - k[72]*y_cur[IDX_HM] - k[306]*y_cur[IDX_N2II] - + k[444]*y_cur[IDX_H2II] - k[547]*y_cur[IDX_NII] - + k[666]*y_cur[IDX_OM] - k[696]*y_cur[IDX_OHM] - + k[1467]*y_cur[IDX_C2HII] - k[1944]*y_cur[IDX_CHII] - + k[1945]*y_cur[IDX_CHII] - k[2075]*y_cur[IDX_CH3II] - + k[2277]*y_cur[IDX_C2H2II] - k[2278]*y_cur[IDX_HNOII] - + k[2279]*y_cur[IDX_O2HII] - k[2381]*y_cur[IDX_H2II] - + k[2671]*y_cur[IDX_H3II] - k[3203]*y_cur[IDX_HeII] - + k[3204]*y_cur[IDX_HeII] - k[3481]*y_cur[IDX_NHII] - + k[3509]*y_cur[IDX_NH2II] - k[3639]*y_cur[IDX_OII] - + k[3775]*y_cur[IDX_OHII] - k[4956]*y_cur[IDX_CI] - + k[4997]*y_cur[IDX_CH2I] - k[5029]*y_cur[IDX_CH3I] - + k[5059]*y_cur[IDX_CH4I] - k[5104]*y_cur[IDX_C2H2I] - + k[5105]*y_cur[IDX_C2H4I] - k[5106]*y_cur[IDX_C2H4I] - + k[5107]*y_cur[IDX_C6H2I] - k[5108]*y_cur[IDX_C8H2I] - + k[5109]*y_cur[IDX_CH2CCH2I] - k[5110]*y_cur[IDX_CH3CCHI] - + k[5111]*y_cur[IDX_C2H6I] - k[5112]*y_cur[IDX_CH3CHCH2I] - + k[5113]*y_cur[IDX_CNI] - k[5113]*y_cur[IDX_CNI] - + k[5113]*y_cur[IDX_CNI] - k[5113]*y_cur[IDX_CNI] - + k[5114]*y_cur[IDX_H2COI] - k[5115]*y_cur[IDX_C4H2I] - + k[5116]*y_cur[IDX_HCNI] - k[5117]*y_cur[IDX_HCOI] - + k[5118]*y_cur[IDX_HNCI] - k[5119]*y_cur[IDX_HNOI] - + k[5120]*y_cur[IDX_NO2I] - k[5121]*y_cur[IDX_NOI] - + k[5122]*y_cur[IDX_NOI] - k[5123]*y_cur[IDX_O2I] - + k[5124]*y_cur[IDX_O2I] - k[5125]*y_cur[IDX_SI] - + k[5126]*y_cur[IDX_SiH4I] - k[5138]*y_cur[IDX_H2I] - + k[5260]*y_cur[IDX_NI] - k[5261]*y_cur[IDX_NI] - + k[5302]*y_cur[IDX_NH3I] - k[5303]*y_cur[IDX_NH3I] - + k[5305]*y_cur[IDX_NHI] - k[5386]*y_cur[IDX_OI] - + k[5387]*y_cur[IDX_OI] - k[5388]*y_cur[IDX_OI] - + k[5459]*y_cur[IDX_OHI] - k[5460]*y_cur[IDX_OHI] - + k[5514]*y_cur[IDX_C2HI] - k[5542]*y_cur[IDX_CH3I] - k[5823] - + k[6134] - k[6909]; + data[jistart + 16233] = 0.0 - k[5029]*y_cur[IDX_CNI] - k[5542]*y_cur[IDX_CNI]; + data[jistart + 16234] = 0.0 + k[5]*y_cur[IDX_CM] + k[115]*y_cur[IDX_C4HM] + + k[3380]*y_cur[IDX_C10M] + k[3383]*y_cur[IDX_C2II] + + k[3386]*y_cur[IDX_C2HII] + k[3393]*y_cur[IDX_C3M] + + k[3396]*y_cur[IDX_C3HM] + k[3397]*y_cur[IDX_C3H2II] + + k[3403]*y_cur[IDX_C4M] + k[3411]*y_cur[IDX_C5M] + + k[3414]*y_cur[IDX_C5HM] + k[3420]*y_cur[IDX_C6M] + + k[3428]*y_cur[IDX_C7M] + k[3439]*y_cur[IDX_C8M] + + k[3445]*y_cur[IDX_C9M] + k[3469]*y_cur[IDX_SiCII] + + k[5080]*y_cur[IDX_CHI] + k[5221]*y_cur[IDX_C10I] + + k[5222]*y_cur[IDX_C2I] + k[5229]*y_cur[IDX_C2NI] + + k[5229]*y_cur[IDX_C2NI] + k[5230]*y_cur[IDX_C2OI] + + k[5231]*y_cur[IDX_C3I] + k[5234]*y_cur[IDX_C3NI] + + k[5235]*y_cur[IDX_C4I] + k[5237]*y_cur[IDX_C4NI] + + k[5238]*y_cur[IDX_C5I] + k[5241]*y_cur[IDX_C5NI] + + k[5242]*y_cur[IDX_C6I] + k[5243]*y_cur[IDX_C6HI] + + k[5244]*y_cur[IDX_C7I] + k[5248]*y_cur[IDX_C8I] + + k[5249]*y_cur[IDX_C8HI] + k[5250]*y_cur[IDX_C9I] - + k[5260]*y_cur[IDX_CNI] - k[5261]*y_cur[IDX_CNI] + + k[5263]*y_cur[IDX_CSI] + k[5292]*y_cur[IDX_SiCI] + + k[5524]*y_cur[IDX_CI]; + data[jistart + 16235] = 0.0 + k[4670]*y_cur[IDX_CNM]; + data[jistart + 16236] = 0.0 + k[681]*y_cur[IDX_CNII] + k[5353]*y_cur[IDX_C2NI] - + k[5386]*y_cur[IDX_CNI] - k[5387]*y_cur[IDX_CNI] - + k[5388]*y_cur[IDX_CNI] + k[5402]*y_cur[IDX_HCNI] + + k[5429]*y_cur[IDX_OCNI]; + data[jistart + 16237] = 0.0 + k[3089]*y_cur[IDX_C2NI] + k[3098]*y_cur[IDX_C3NI] + + k[3124]*y_cur[IDX_C5NI] + k[3141]*y_cur[IDX_C7NI] + + k[3156]*y_cur[IDX_C9NI] + k[3165]*y_cur[IDX_CH2CHCNI] + + k[3170]*y_cur[IDX_CH2CNI] + k[3193]*y_cur[IDX_CH3CNI] - + k[3203]*y_cur[IDX_CNI] - k[3204]*y_cur[IDX_CNI] + + k[3206]*y_cur[IDX_CNOI] + k[3237]*y_cur[IDX_HC3NI] + + k[3242]*y_cur[IDX_HC5NI] + k[3243]*y_cur[IDX_HC7NI] + + k[3244]*y_cur[IDX_HC9NI] + k[3279]*y_cur[IDX_NCCNI] + + k[3282]*y_cur[IDX_NH2CNI] + k[3292]*y_cur[IDX_OCNI] + + k[4676]*y_cur[IDX_CNM]; + data[jistart + 16238] = 0.0 + k[183]*y_cur[IDX_NCCNI] + k[184]*y_cur[IDX_NCCNI] + + k[1349]*y_cur[IDX_CH2CHCNI] + k[1355]*y_cur[IDX_CH3C3NI] + + k[1359]*y_cur[IDX_CH3C5NI] + k[1362]*y_cur[IDX_CH3C7NI] + + k[1379]*y_cur[IDX_CH3CNI] + k[1386]*y_cur[IDX_CNOI] + + k[1400]*y_cur[IDX_HC3NI] + k[1404]*y_cur[IDX_HC5NI] + + k[1405]*y_cur[IDX_HC7NI] + k[1406]*y_cur[IDX_HC9NI] + + k[1416]*y_cur[IDX_N2OI] + k[1424]*y_cur[IDX_OCNI] + + k[4656]*y_cur[IDX_CNM]; + data[jistart + 16239] = 0.0 + k[2546]*y_cur[IDX_HCNII]; + data[jistart + 16240] = 0.0 + k[2351]*y_cur[IDX_HOCNI] + k[2352]*y_cur[IDX_HONCI] + + k[4666]*y_cur[IDX_CNM]; + data[jistart + 16241] = 0.0 + k[245]*y_cur[IDX_CNII] + k[1903]*y_cur[IDX_HCNII] + + k[4917]*y_cur[IDX_C2NI] + k[4921]*y_cur[IDX_C3NI] + + k[4929]*y_cur[IDX_C5NI] + k[4937]*y_cur[IDX_C7NI] + + k[4943]*y_cur[IDX_C9NI] - k[4956]*y_cur[IDX_CNI] + + k[4967]*y_cur[IDX_N2I] + k[4968]*y_cur[IDX_NCCNI] + + k[4972]*y_cur[IDX_NHI] + k[4974]*y_cur[IDX_NOI] + + k[4977]*y_cur[IDX_NSI] + k[4979]*y_cur[IDX_OCNI] + + k[5524]*y_cur[IDX_NI]; + data[jistart + 16242] = 0.0 + k[4674]*y_cur[IDX_CNM] + k[4675]*y_cur[IDX_CNM]; + data[jistart + 16243] = 0.0 - k[2671]*y_cur[IDX_CNI] + k[4669]*y_cur[IDX_CNM]; + data[jistart + 16244] = 0.0 + k[299]*y_cur[IDX_CNII] + k[2854]*y_cur[IDX_HCNII]; + data[jistart + 16245] = 0.0 + k[6372]*y_cur[IDX_HCNII] + k[6376]*y_cur[IDX_H2NCII] + + k[6378]*y_cur[IDX_HCNHII] + k[6405]*y_cur[IDX_CH3NHII] + + k[6467]*y_cur[IDX_C2NII] + k[6469]*y_cur[IDX_CNCII] + + k[6475]*y_cur[IDX_CH2CNII] + k[6521]*y_cur[IDX_HONCII] + + k[6525]*y_cur[IDX_HOCNII] + k[6545]*y_cur[IDX_H2OCNII] + + k[6626]*y_cur[IDX_C3NII] + k[6630]*y_cur[IDX_HC3NII] + + k[6636]*y_cur[IDX_C2N2II] + k[6636]*y_cur[IDX_C2N2II] + + k[6637]*y_cur[IDX_HC3NHII] + k[6652]*y_cur[IDX_NCCNHII] + + k[6654]*y_cur[IDX_SiNCII] + k[6843]*y_cur[IDX_HC7NII] + + k[6876]*y_cur[IDX_HC9NII]; + data[jistart + 16246] = 0.0 - k[5138]*y_cur[IDX_CNI]; + data[jistart + 16247] = 0.0 + k[781]*y_cur[IDX_C2NII] + k[783]*y_cur[IDX_C2N2II] + + k[783]*y_cur[IDX_C2N2II] + k[814]*y_cur[IDX_C3NII] + + k[916]*y_cur[IDX_CH2CNII] + k[970]*y_cur[IDX_CH3NHII] + + k[979]*y_cur[IDX_CNCII] + k[1006]*y_cur[IDX_H2NCII] + + k[1015]*y_cur[IDX_H2OCNII] + k[1064]*y_cur[IDX_HC3NII] + + k[1066]*y_cur[IDX_HC3NHII] + k[1084]*y_cur[IDX_HC7NII] + + k[1086]*y_cur[IDX_HC9NII] + k[1088]*y_cur[IDX_HCNII] + + k[1089]*y_cur[IDX_HCNHII] + k[1127]*y_cur[IDX_HOCNII] + + k[1131]*y_cur[IDX_HONCII] + k[1156]*y_cur[IDX_NCCNHII] + + k[1261]*y_cur[IDX_SiNCII]; + data[jistart + 16248] = 0.0 + k[487]*y_cur[IDX_CNII] + k[2830]*y_cur[IDX_C2N2II] + + k[5161]*y_cur[IDX_CNOI] + k[5170]*y_cur[IDX_HCNI] + + k[5181]*y_cur[IDX_NCCNI] + k[5196]*y_cur[IDX_OCNI]; + data[jistart + 16249] = 0.0 + k[7817] + k[8145]; + data[jistart + 16250] = 0.0 + k[7713] + k[8018] + k[8019]; + data[jistart + 16251] = 0.0 + k[7640] + k[7926]; + data[jistart + 16252] = 0.0 + k[7750] + k[8064]; + data[jistart + 16253] = 0.0 + k[7785] + k[8109]; + data[jistart + 16254] = 0.0 + k[7843] + k[8170]; + data[jistart + 16255] = 0.0 + k[7749] + k[8063]; + data[jistart + 16256] = 0.0 - k[8284]*y_cur[IDX_GHI] - k[8585]*y_cur[IDX_GHI]; + data[jistart + 16257] = 0.0 + k[8097] + k[8097]; + data[jistart + 16258] = 0.0 + k[7805] + k[8133]; + data[jistart + 16259] = 0.0 + k[7710] + k[7711] + k[7711] + k[8013] + k[8015] + k[8016] + + k[8016] - k[8313]*y_cur[IDX_GHI]; + data[jistart + 16260] = 0.0 + k[7759] + k[8077]; + data[jistart + 16261] = 0.0 + k[8122]; + data[jistart + 16262] = 0.0 + k[8174]; + data[jistart + 16263] = 0.0 + k[7706] + k[8007] + k[8009] + k[8009] + k[8010]; + data[jistart + 16264] = 0.0 + k[8137]; + data[jistart + 16265] = 0.0 + k[7858] + k[7858]; + data[jistart + 16266] = 0.0 - k[8309]*y_cur[IDX_GHI] - k[8310]*y_cur[IDX_GHI]; + data[jistart + 16267] = 0.0 + k[8047] + k[8049]; + data[jistart + 16268] = 0.0 + k[7696] + k[7996]; + data[jistart + 16269] = 0.0 - k[8349]*y_cur[IDX_GHI]; + data[jistart + 16270] = 0.0 + k[7994] + k[7995]; + data[jistart + 16271] = 0.0 - k[8345]*y_cur[IDX_GHI] - k[8635]*y_cur[IDX_GHI]; + data[jistart + 16272] = 0.0 + k[7795] + k[7795] + k[8120] - k[8342]*y_cur[IDX_GHI] - + k[8632]*y_cur[IDX_GHI]; + data[jistart + 16273] = 0.0 + k[7863] + k[8200] + k[8202]; + data[jistart + 16274] = 0.0 + k[7869] + k[8213] + k[8215]; + data[jistart + 16275] = 0.0 + k[7873] + k[8225] + k[8227]; + data[jistart + 16276] = 0.0 - k[8323]*y_cur[IDX_GHI] - k[8618]*y_cur[IDX_GHI]; + data[jistart + 16277] = 0.0 + k[7736] + k[8045]; + data[jistart + 16278] = 0.0 + k[7665] + k[7952] - k[8293]*y_cur[IDX_GHI] - + k[8593]*y_cur[IDX_GHI]; + data[jistart + 16279] = 0.0 - k[8325]*y_cur[IDX_GHI] - k[8620]*y_cur[IDX_GHI]; + data[jistart + 16280] = 0.0 + k[7856] + k[8188]; + data[jistart + 16281] = 0.0 + k[8218]; + data[jistart + 16282] = 0.0 + k[8254]; + data[jistart + 16283] = 0.0 + k[7886] - k[8322]*y_cur[IDX_GHI] - k[8617]*y_cur[IDX_GHI]; + data[jistart + 16284] = 0.0 + k[7767] + k[8085] + k[8087] - k[8335]*y_cur[IDX_GHI] - + k[8627]*y_cur[IDX_GHI]; + data[jistart + 16285] = 0.0 + k[7693] + k[7988] + k[7990] - k[8304]*y_cur[IDX_GHI] - + k[8603]*y_cur[IDX_GHI]; + data[jistart + 16286] = 0.0 + k[7689] + k[7979] - k[8291]*y_cur[IDX_GHI]; + data[jistart + 16287] = 0.0 + k[7715] + k[8021] - k[8317]*y_cur[IDX_GHI] - + k[8612]*y_cur[IDX_GHI]; + data[jistart + 16288] = 0.0 + k[7838] + k[8163]; + data[jistart + 16289] = 0.0 - k[8314]*y_cur[IDX_GHI] - k[8609]*y_cur[IDX_GHI]; + data[jistart + 16290] = 0.0 + k[8057] + k[8058]; + data[jistart + 16291] = 0.0 + k[7684] + k[7971] - k[8302]*y_cur[IDX_GHI] - + k[8601]*y_cur[IDX_GHI]; + data[jistart + 16292] = 0.0 + k[7686] + k[7973] + k[7975] + k[7975] + k[7976] - + k[8303]*y_cur[IDX_GHI] - k[8602]*y_cur[IDX_GHI]; + data[jistart + 16293] = 0.0 + k[7878] + k[8248] + k[8248] + k[8249] + k[8250] + k[8251]; + data[jistart + 16294] = 0.0 + k[7792] + k[7794] + k[8116] + k[8118] - k[8341]*y_cur[IDX_GHI] + - k[8631]*y_cur[IDX_GHI]; + data[jistart + 16295] = 0.0 - k[8344]*y_cur[IDX_GHI] - k[8634]*y_cur[IDX_GHI]; + data[jistart + 16296] = 0.0 + k[7716] + k[8023] - k[8318]*y_cur[IDX_GHI] - + k[8613]*y_cur[IDX_GHI]; + data[jistart + 16297] = 0.0 - k[8348]*y_cur[IDX_GHI]; + data[jistart + 16298] = 0.0 + k[7810] + k[7810] + k[7811] + k[7812] + k[7812] + k[8139] + + k[8139] + k[8140] + k[8141] + k[8141]; + data[jistart + 16299] = 0.0 - k[8324]*y_cur[IDX_GHI] - k[8619]*y_cur[IDX_GHI]; + data[jistart + 16300] = 0.0 + k[8183] + k[8185]; + data[jistart + 16301] = 0.0 - k[8364]*y_cur[IDX_GHI] - k[8650]*y_cur[IDX_GHI]; + data[jistart + 16302] = 0.0 + k[7705] + k[8005] - k[8308]*y_cur[IDX_GHI] - + k[8606]*y_cur[IDX_GHI]; + data[jistart + 16303] = 0.0 - k[8328]*y_cur[IDX_GHI] - k[8329]*y_cur[IDX_GHI] - + k[8623]*y_cur[IDX_GHI] - k[8624]*y_cur[IDX_GHI]; + data[jistart + 16304] = 0.0 - k[8321]*y_cur[IDX_GHI] - k[8616]*y_cur[IDX_GHI]; + data[jistart + 16305] = 0.0 + k[7721] + k[7723] + k[7725] + k[7725] + k[8028] + k[8031] + + k[8033] + k[8033]; + data[jistart + 16306] = 0.0 + k[7729] + k[7731] + k[7733] + k[7733] + k[8037] + k[8040] + + k[8042] + k[8042]; + data[jistart + 16307] = 0.0 - k[8326]*y_cur[IDX_GHI] - k[8327]*y_cur[IDX_GHI] - + k[8621]*y_cur[IDX_GHI] - k[8622]*y_cur[IDX_GHI]; + data[jistart + 16308] = 0.0 + k[7650] + k[7937]; + data[jistart + 16309] = 0.0 + k[7719] + k[8026] - k[8319]*y_cur[IDX_GHI] - + k[8320]*y_cur[IDX_GHI] - k[8614]*y_cur[IDX_GHI] - + k[8615]*y_cur[IDX_GHI]; + data[jistart + 16310] = 0.0 + k[7694] + k[7992] - k[8306]*y_cur[IDX_GHI]; + data[jistart + 16311] = 0.0 - k[8354]*y_cur[IDX_GHI] - k[8640]*y_cur[IDX_GHI]; + data[jistart + 16312] = 0.0 + k[7677] + k[7678] + k[7678] + k[7678] + k[7679] + k[7679] + + k[7680] + k[7964] + k[7965] + k[7965] + k[7965] + k[7966] + k[7966] + + k[7967] - k[8290]*y_cur[IDX_GHI] - k[8591]*y_cur[IDX_GHI]; + data[jistart + 16313] = 0.0 - k[8343]*y_cur[IDX_GHI] - k[8633]*y_cur[IDX_GHI]; + data[jistart + 16314] = 0.0 - k[8359]*y_cur[IDX_GHI] - k[8645]*y_cur[IDX_GHI]; + data[jistart + 16315] = 0.0 - k[8365]*y_cur[IDX_GHI] - k[8651]*y_cur[IDX_GHI]; + data[jistart + 16316] = 0.0 + k[7651] + k[7938]; + data[jistart + 16317] = 0.0 + k[7634] + k[7636] + k[7637] + k[7637] + k[7915] + k[7917] + + k[7918] + k[7918]; + data[jistart + 16318] = 0.0 - k[8362]*y_cur[IDX_GHI] + k[8392]*y_cur[IDX_GH2I] - + k[8648]*y_cur[IDX_GHI]; + data[jistart + 16319] = 0.0 + k[7876] + k[8236] + k[8237] + k[8239] + k[8241] + k[8242] + + k[8243] - k[8363]*y_cur[IDX_GHI] + k[8393]*y_cur[IDX_GH2I] - + k[8649]*y_cur[IDX_GHI]; + data[jistart + 16320] = 0.0 + k[7867] + k[8208] + k[8210] - k[8358]*y_cur[IDX_GHI] + + k[8389]*y_cur[IDX_GH2I] - k[8644]*y_cur[IDX_GHI]; + data[jistart + 16321] = 0.0 - k[8366]*y_cur[IDX_GHI] - k[8652]*y_cur[IDX_GHI]; + data[jistart + 16322] = 0.0 - k[8336]*y_cur[IDX_GHI] - k[8628]*y_cur[IDX_GHI]; + data[jistart + 16323] = 0.0 - k[8307]*y_cur[IDX_GHI] - k[8605]*y_cur[IDX_GHI]; + data[jistart + 16324] = 0.0 + k[7669] + k[7669] + k[7670] + k[7671] + k[7956] + k[7956] + + k[7957] + k[7958] - k[8289]*y_cur[IDX_GHI] - k[8590]*y_cur[IDX_GHI]; + data[jistart + 16325] = 0.0 - k[8360]*y_cur[IDX_GHI] + k[8390]*y_cur[IDX_GH2I] - + k[8646]*y_cur[IDX_GHI]; + data[jistart + 16326] = 0.0 + k[7872] + k[8222] + k[8224] - k[8361]*y_cur[IDX_GHI] + + k[8391]*y_cur[IDX_GH2I] - k[8647]*y_cur[IDX_GHI]; + data[jistart + 16327] = 0.0 - k[8330]*y_cur[IDX_GHI] - k[8625]*y_cur[IDX_GHI]; + data[jistart + 16328] = 0.0 + k[7707] + k[8011] - k[8312]*y_cur[IDX_GHI] + + k[8414]*y_cur[IDX_GCI] + k[8449]*y_cur[IDX_GOI] + + k[8463]*y_cur[IDX_GNI] - k[8608]*y_cur[IDX_GHI]; + data[jistart + 16329] = 0.0 - k[8367]*y_cur[IDX_GHI] - k[8368]*y_cur[IDX_GHI]; + data[jistart + 16330] = 0.0 + k[8103] + k[8103] - k[8337]*y_cur[IDX_GHI] - + k[8338]*y_cur[IDX_GHI]; + data[jistart + 16331] = 0.0 + k[7645] + k[7646] + k[7646] + k[7647] + k[7932] + k[7933] + + k[7933] + k[7934] - k[8287]*y_cur[IDX_GHI] - k[8588]*y_cur[IDX_GHI]; + data[jistart + 16332] = 0.0 - k[8350]*y_cur[IDX_GHI] + k[8382]*y_cur[IDX_GH2I] - + k[8636]*y_cur[IDX_GHI]; + data[jistart + 16333] = 0.0 + k[7862] + k[8197] + k[8199] - k[8356]*y_cur[IDX_GHI] + + k[8387]*y_cur[IDX_GH2I] - k[8642]*y_cur[IDX_GHI]; + data[jistart + 16334] = 0.0 - k[8331]*y_cur[IDX_GHI] - k[8626]*y_cur[IDX_GHI]; + data[jistart + 16335] = 0.0 + k[7826] - k[8346]*y_cur[IDX_GHI] - k[8347]*y_cur[IDX_GHI]; + data[jistart + 16336] = 0.0 - k[8352]*y_cur[IDX_GHI] + k[8384]*y_cur[IDX_GH2I] - + k[8638]*y_cur[IDX_GHI]; + data[jistart + 16337] = 0.0 - k[8357]*y_cur[IDX_GHI] + k[8388]*y_cur[IDX_GH2I] - + k[8643]*y_cur[IDX_GHI]; + data[jistart + 16338] = 0.0 - k[8300]*y_cur[IDX_GHI] - k[8599]*y_cur[IDX_GHI]; + data[jistart + 16339] = 0.0 + k[7697] + k[7698] + k[7700] + k[7701] + k[7701] + k[7998] + + k[7999] + k[8000] + k[8001] + k[8001]; + data[jistart + 16340] = 0.0 + k[7714] + k[8020] - k[8316]*y_cur[IDX_GHI] + + k[8378]*y_cur[IDX_GH2I] + k[8379]*y_cur[IDX_GH2I] - + k[8611]*y_cur[IDX_GHI]; + data[jistart + 16341] = 0.0 + k[7789] + k[8113] - k[8340]*y_cur[IDX_GHI] + + k[8381]*y_cur[IDX_GH2I] - k[8630]*y_cur[IDX_GHI]; + data[jistart + 16342] = 0.0 + k[7835] + k[8159] - k[8351]*y_cur[IDX_GHI] + + k[8383]*y_cur[IDX_GH2I] - k[8637]*y_cur[IDX_GHI]; + data[jistart + 16343] = 0.0 + k[7852] - k[8353]*y_cur[IDX_GHI] + k[8385]*y_cur[IDX_GH2I] - + k[8639]*y_cur[IDX_GHI]; + data[jistart + 16344] = 0.0 + k[7652] + k[7653] + k[7654] + k[7655] + k[7656] + k[7659] + + k[7659] + k[7660] + k[7660] + k[7939] + k[7940] + k[7941] + k[7942] + + k[7943] + k[7946] + k[7946] + k[7947] + k[7947] - + k[8288]*y_cur[IDX_GHI] - k[8589]*y_cur[IDX_GHI]; + data[jistart + 16345] = 0.0 - k[8299]*y_cur[IDX_GHI] + k[8561]*y_cur[IDX_GH2COI] - + k[8598]*y_cur[IDX_GHI]; + data[jistart + 16346] = 0.0 + k[7639] + k[7921] + k[7924] + k[7924] + k[7925]; + data[jistart + 16347] = 0.0 - k[8355]*y_cur[IDX_GHI] + k[8386]*y_cur[IDX_GH2I] - + k[8641]*y_cur[IDX_GHI]; + data[jistart + 16348] = 0.0 - k[8301]*y_cur[IDX_GHI] - k[8600]*y_cur[IDX_GHI]; + data[jistart + 16349] = 0.0 - k[8339]*y_cur[IDX_GHI] + k[8380]*y_cur[IDX_GH2I] - + k[8629]*y_cur[IDX_GHI]; + data[jistart + 16350] = 0.0 + k[7762] + k[7762] + k[8080] + k[8080] - k[8332]*y_cur[IDX_GHI] + - k[8333]*y_cur[IDX_GHI] - k[8334]*y_cur[IDX_GHI]; + data[jistart + 16351] = 0.0 + k[7983] + k[7983] + k[7986] + k[7986] + k[7987] - + k[8296]*y_cur[IDX_GHI] - k[8297]*y_cur[IDX_GHI] - + k[8298]*y_cur[IDX_GHI] + k[8509]*y_cur[IDX_GOHI] + + k[8561]*y_cur[IDX_GCH3OI] - k[8596]*y_cur[IDX_GHI] - + k[8597]*y_cur[IDX_GHI]; + data[jistart + 16352] = 0.0 - k[8305]*y_cur[IDX_GHI] + k[8525]*y_cur[IDX_GNHI] - + k[8604]*y_cur[IDX_GHI]; + data[jistart + 16353] = 0.0 + k[7911] + k[7912] + k[7913] + k[7913] + k[7914] - + k[8278]*y_cur[IDX_GHI]; + data[jistart + 16354] = 0.0 + k[7642] + k[7643] + k[7929] + k[7930] - k[8286]*y_cur[IDX_GHI] + + k[8375]*y_cur[IDX_GH2I] - k[8587]*y_cur[IDX_GHI]; + data[jistart + 16355] = 0.0 + k[7630] + k[7631] + k[7631] + k[7632] + k[7907] + k[7908] + + k[7908] + k[7909] - k[8281]*y_cur[IDX_GHI] + k[8372]*y_cur[IDX_GH2I] + + k[8404]*y_cur[IDX_GCI] + k[8440]*y_cur[IDX_GOI] - + k[8582]*y_cur[IDX_GHI]; + data[jistart + 16356] = 0.0 + k[7682] + k[7683] + k[7969] + k[7970] - k[8295]*y_cur[IDX_GHI] + + k[8448]*y_cur[IDX_GOI] - k[8595]*y_cur[IDX_GHI]; + data[jistart + 16357] = 0.0 + k[7623] + k[7624] + k[7900] + k[7901] - k[8280]*y_cur[IDX_GHI] + + k[8458]*y_cur[IDX_GNI] + k[8475]*y_cur[IDX_GSI] + + k[8479]*y_cur[IDX_GCHI] + k[8480]*y_cur[IDX_GCHI] + + k[8525]*y_cur[IDX_GNOI] - k[8581]*y_cur[IDX_GHI]; + data[jistart + 16358] = 0.0 - k[8311]*y_cur[IDX_GHI] + k[8474]*y_cur[IDX_GCH3I] + + k[8475]*y_cur[IDX_GNHI] - k[8607]*y_cur[IDX_GHI]; + data[jistart + 16359] = 0.0 - k[8315]*y_cur[IDX_GHI] + k[8377]*y_cur[IDX_GH2I] - + k[8610]*y_cur[IDX_GHI]; + data[jistart + 16360] = 0.0 + k[7638] + k[7919] + k[7920] - k[8283]*y_cur[IDX_GHI] + + k[8373]*y_cur[IDX_GH2I] + k[8408]*y_cur[IDX_GCI] + + k[8509]*y_cur[IDX_GH2COI] + k[8515]*y_cur[IDX_GCOI] - + k[8584]*y_cur[IDX_GHI]; + data[jistart + 16361] = 0.0 - k[8294]*y_cur[IDX_GHI] + k[8515]*y_cur[IDX_GOHI] - + k[8594]*y_cur[IDX_GHI]; + data[jistart + 16362] = 0.0 + k[7619] + k[7621] + k[7621] + k[7622] + k[7896] + k[7898] + + k[7898] + k[7899] - k[8276]*y_cur[IDX_GHI] + k[8370]*y_cur[IDX_GH2I] + - k[8578]*y_cur[IDX_GHI]; + data[jistart + 16363] = 0.0 - k[8285]*y_cur[IDX_GHI] + k[8374]*y_cur[IDX_GH2I] - + k[8586]*y_cur[IDX_GHI]; + data[jistart + 16364] = 0.0 - k[8292]*y_cur[IDX_GHI] + k[8376]*y_cur[IDX_GH2I] - + k[8592]*y_cur[IDX_GHI]; + data[jistart + 16365] = 0.0 - k[8279]*y_cur[IDX_GHI] + k[8458]*y_cur[IDX_GNHI] + + k[8463]*y_cur[IDX_GHSI] - k[8580]*y_cur[IDX_GHI]; + data[jistart + 16366] = 0.0 - k[8282]*y_cur[IDX_GHI] + k[8440]*y_cur[IDX_GNH2I] + + k[8448]*y_cur[IDX_GHCOI] + k[8449]*y_cur[IDX_GHSI] - + k[8583]*y_cur[IDX_GHI]; + data[jistart + 16367] = 0.0 + k[7625] + k[7627] + k[7629] + k[7629] + k[7902] + k[7904] + + k[7906] + k[7906] - k[8277]*y_cur[IDX_GHI] + k[8371]*y_cur[IDX_GH2I] + + k[8474]*y_cur[IDX_GSI] - k[8579]*y_cur[IDX_GHI]; + data[jistart + 16368] = 0.0 + k[7618] + k[7894] + k[7895] - k[8275]*y_cur[IDX_GHI] + + k[8479]*y_cur[IDX_GNHI] + k[8480]*y_cur[IDX_GNHI] - + k[8577]*y_cur[IDX_GHI]; + data[jistart + 16369] = 0.0 + k[7617] + k[7617] + k[7893] + k[7893] + + k[8370]*y_cur[IDX_GCH2I] + k[8371]*y_cur[IDX_GCH3I] + + k[8372]*y_cur[IDX_GNH2I] + k[8373]*y_cur[IDX_GOHI] + + k[8374]*y_cur[IDX_GC2I] + k[8375]*y_cur[IDX_GC2HI] + + k[8376]*y_cur[IDX_GCNI] + k[8377]*y_cur[IDX_GC3I] + + k[8378]*y_cur[IDX_GC3HI] + k[8379]*y_cur[IDX_GC3HI] + + k[8380]*y_cur[IDX_GC4I] + k[8381]*y_cur[IDX_GC4HI] + + k[8382]*y_cur[IDX_GC5I] + k[8383]*y_cur[IDX_GC5HI] + + k[8384]*y_cur[IDX_GC6I] + k[8385]*y_cur[IDX_GC6HI] + + k[8386]*y_cur[IDX_GC7I] + k[8387]*y_cur[IDX_GC7HI] + + k[8388]*y_cur[IDX_GC8I] + k[8389]*y_cur[IDX_GC8HI] + + k[8390]*y_cur[IDX_GC9I] + k[8391]*y_cur[IDX_GC9HI] + + k[8392]*y_cur[IDX_GC10I] + k[8393]*y_cur[IDX_GC10HI]; + data[jistart + 16370] = 0.0 - k[8274]*y_cur[IDX_GHI] + k[8404]*y_cur[IDX_GNH2I] + + k[8408]*y_cur[IDX_GOHI] + k[8414]*y_cur[IDX_GHSI] - + k[8576]*y_cur[IDX_GHI]; + data[jistart + 16371] = 0.0 - k[7070] - k[7252] - k[7434] - k[8273]*y_cur[IDX_GHI] - + k[8273]*y_cur[IDX_GHI] - k[8273]*y_cur[IDX_GHI] - + k[8273]*y_cur[IDX_GHI] - k[8274]*y_cur[IDX_GCI] - + k[8275]*y_cur[IDX_GCHI] - k[8276]*y_cur[IDX_GCH2I] - + k[8277]*y_cur[IDX_GCH3I] - k[8278]*y_cur[IDX_GCH4I] - + k[8279]*y_cur[IDX_GNI] - k[8280]*y_cur[IDX_GNHI] - + k[8281]*y_cur[IDX_GNH2I] - k[8282]*y_cur[IDX_GOI] - + k[8283]*y_cur[IDX_GOHI] - k[8284]*y_cur[IDX_GFI] - + k[8285]*y_cur[IDX_GC2I] - k[8286]*y_cur[IDX_GC2HI] - + k[8287]*y_cur[IDX_GC2H2I] - k[8288]*y_cur[IDX_GC2H3I] - + k[8289]*y_cur[IDX_GC2H4I] - k[8290]*y_cur[IDX_GC2H5I] - + k[8291]*y_cur[IDX_GC2H6I] - k[8292]*y_cur[IDX_GCNI] - + k[8293]*y_cur[IDX_GH2CNI] - k[8294]*y_cur[IDX_GCOI] - + k[8295]*y_cur[IDX_GHCOI] - k[8296]*y_cur[IDX_GH2COI] - + k[8297]*y_cur[IDX_GH2COI] - k[8298]*y_cur[IDX_GH2COI] - + k[8299]*y_cur[IDX_GCH3OI] - k[8300]*y_cur[IDX_GCH2OHI] - + k[8301]*y_cur[IDX_GSiI] - k[8302]*y_cur[IDX_GSiHI] - + k[8303]*y_cur[IDX_GSiH2I] - k[8304]*y_cur[IDX_GSiH3I] - + k[8305]*y_cur[IDX_GNOI] - k[8306]*y_cur[IDX_GHNOI] - + k[8307]*y_cur[IDX_GO2I] - k[8308]*y_cur[IDX_GO2HI] - + k[8309]*y_cur[IDX_GH2O2I] - k[8310]*y_cur[IDX_GH2O2I] - + k[8311]*y_cur[IDX_GSI] - k[8312]*y_cur[IDX_GHSI] - + k[8313]*y_cur[IDX_GH2SI] - k[8314]*y_cur[IDX_GClI] - + k[8315]*y_cur[IDX_GC3I] - k[8316]*y_cur[IDX_GC3HI] - + k[8317]*y_cur[IDX_GC3H2I] - k[8318]*y_cur[IDX_GH2CCCI] - + k[8319]*y_cur[IDX_GCH2CCHI] - k[8320]*y_cur[IDX_GCH2CCHI] - + k[8321]*y_cur[IDX_GC2NI] - k[8322]*y_cur[IDX_GHCCNI] - + k[8323]*y_cur[IDX_GCH2CNI] - k[8324]*y_cur[IDX_GC2OI] - + k[8325]*y_cur[IDX_GHC2OI] - k[8326]*y_cur[IDX_GCNOI] - + k[8327]*y_cur[IDX_GCNOI] - k[8328]*y_cur[IDX_GOCNI] - + k[8329]*y_cur[IDX_GOCNI] - k[8330]*y_cur[IDX_GCSI] - + k[8331]*y_cur[IDX_GCH3COI] - k[8332]*y_cur[IDX_GCH3CHOI] - + k[8333]*y_cur[IDX_GCH3CHOI] - k[8334]*y_cur[IDX_GCH3CHOI] - + k[8335]*y_cur[IDX_GHCSI] - k[8336]*y_cur[IDX_GCOOHI] - + k[8337]*y_cur[IDX_GHCOOHI] - k[8338]*y_cur[IDX_GHCOOHI] - + k[8339]*y_cur[IDX_GC4I] - k[8340]*y_cur[IDX_GC4HI] - + k[8341]*y_cur[IDX_GC4H2I] - k[8342]*y_cur[IDX_GC4H3I] - + k[8343]*y_cur[IDX_GC3NI] - k[8344]*y_cur[IDX_GCH2CHCNI] - + k[8345]*y_cur[IDX_GC2H4CNI] - k[8346]*y_cur[IDX_GHCOOCH3I] - + k[8347]*y_cur[IDX_GHCOOCH3I] - k[8348]*y_cur[IDX_GOCSI] - + k[8349]*y_cur[IDX_GSO2I] - k[8350]*y_cur[IDX_GC5I] - + k[8351]*y_cur[IDX_GC5HI] - k[8352]*y_cur[IDX_GC6I] - + k[8353]*y_cur[IDX_GC6HI] - k[8354]*y_cur[IDX_GC5NI] - + k[8355]*y_cur[IDX_GC7I] - k[8356]*y_cur[IDX_GC7HI] - + k[8357]*y_cur[IDX_GC8I] - k[8358]*y_cur[IDX_GC8HI] - + k[8359]*y_cur[IDX_GC7NI] - k[8360]*y_cur[IDX_GC9I] - + k[8361]*y_cur[IDX_GC9HI] - k[8362]*y_cur[IDX_GC10I] - + k[8363]*y_cur[IDX_GC10HI] - k[8364]*y_cur[IDX_GC9NI] - + k[8365]*y_cur[IDX_GCOOCH3I] - k[8366]*y_cur[IDX_GCH2OHCOI] - + k[8367]*y_cur[IDX_GCH2OHCHOI] - k[8368]*y_cur[IDX_GCH2OHCHOI] - + k[8576]*y_cur[IDX_GCI] - k[8577]*y_cur[IDX_GCHI] - + k[8578]*y_cur[IDX_GCH2I] - k[8579]*y_cur[IDX_GCH3I] - + k[8580]*y_cur[IDX_GNI] - k[8581]*y_cur[IDX_GNHI] - + k[8582]*y_cur[IDX_GNH2I] - k[8583]*y_cur[IDX_GOI] - + k[8584]*y_cur[IDX_GOHI] - k[8585]*y_cur[IDX_GFI] - + k[8586]*y_cur[IDX_GC2I] - k[8587]*y_cur[IDX_GC2HI] - + k[8588]*y_cur[IDX_GC2H2I] - k[8589]*y_cur[IDX_GC2H3I] - + k[8590]*y_cur[IDX_GC2H4I] - k[8591]*y_cur[IDX_GC2H5I] - + k[8592]*y_cur[IDX_GCNI] - k[8593]*y_cur[IDX_GH2CNI] - + k[8594]*y_cur[IDX_GCOI] - k[8595]*y_cur[IDX_GHCOI] - + k[8596]*y_cur[IDX_GH2COI] - k[8597]*y_cur[IDX_GH2COI] - + k[8598]*y_cur[IDX_GCH3OI] - k[8599]*y_cur[IDX_GCH2OHI] - + k[8600]*y_cur[IDX_GSiI] - k[8601]*y_cur[IDX_GSiHI] - + k[8602]*y_cur[IDX_GSiH2I] - k[8603]*y_cur[IDX_GSiH3I] - + k[8604]*y_cur[IDX_GNOI] - k[8605]*y_cur[IDX_GO2I] - + k[8606]*y_cur[IDX_GO2HI] - k[8607]*y_cur[IDX_GSI] - + k[8608]*y_cur[IDX_GHSI] - k[8609]*y_cur[IDX_GClI] - + k[8610]*y_cur[IDX_GC3I] - k[8611]*y_cur[IDX_GC3HI] - + k[8612]*y_cur[IDX_GC3H2I] - k[8613]*y_cur[IDX_GH2CCCI] - + k[8614]*y_cur[IDX_GCH2CCHI] - k[8615]*y_cur[IDX_GCH2CCHI] - + k[8616]*y_cur[IDX_GC2NI] - k[8617]*y_cur[IDX_GHCCNI] - + k[8618]*y_cur[IDX_GCH2CNI] - k[8619]*y_cur[IDX_GC2OI] - + k[8620]*y_cur[IDX_GHC2OI] - k[8621]*y_cur[IDX_GCNOI] - + k[8622]*y_cur[IDX_GCNOI] - k[8623]*y_cur[IDX_GOCNI] - + k[8624]*y_cur[IDX_GOCNI] - k[8625]*y_cur[IDX_GCSI] - + k[8626]*y_cur[IDX_GCH3COI] - k[8627]*y_cur[IDX_GHCSI] - + k[8628]*y_cur[IDX_GCOOHI] - k[8629]*y_cur[IDX_GC4I] - + k[8630]*y_cur[IDX_GC4HI] - k[8631]*y_cur[IDX_GC4H2I] - + k[8632]*y_cur[IDX_GC4H3I] - k[8633]*y_cur[IDX_GC3NI] - + k[8634]*y_cur[IDX_GCH2CHCNI] - k[8635]*y_cur[IDX_GC2H4CNI] - + k[8636]*y_cur[IDX_GC5I] - k[8637]*y_cur[IDX_GC5HI] - + k[8638]*y_cur[IDX_GC6I] - k[8639]*y_cur[IDX_GC6HI] - + k[8640]*y_cur[IDX_GC5NI] - k[8641]*y_cur[IDX_GC7I] - + k[8642]*y_cur[IDX_GC7HI] - k[8643]*y_cur[IDX_GC8I] - + k[8644]*y_cur[IDX_GC8HI] - k[8645]*y_cur[IDX_GC7NI] - + k[8646]*y_cur[IDX_GC9I] - k[8647]*y_cur[IDX_GC9HI] - + k[8648]*y_cur[IDX_GC10I] - k[8649]*y_cur[IDX_GC10HI] - + k[8650]*y_cur[IDX_GC9NI] - k[8651]*y_cur[IDX_GCOOCH3I] - + k[8652]*y_cur[IDX_GCH2OHCOI]; + data[jistart + 16372] = 0.0 + k[6888]; + data[jistart + 16373] = 0.0 + k[1155]*y_cur[IDX_eM] + k[6769]*y_cur[IDX_GRAINM]; + data[jistart + 16374] = 0.0 + k[954]*y_cur[IDX_eM] + k[6688]*y_cur[IDX_GRAINM]; + data[jistart + 16375] = 0.0 + k[1201]*y_cur[IDX_eM] + k[6580]*y_cur[IDX_GRAINM]; + data[jistart + 16376] = 0.0 + k[771]*y_cur[IDX_eM] + k[6673]*y_cur[IDX_GRAINM]; + data[jistart + 16377] = 0.0 + k[932]*y_cur[IDX_eM] + k[6835]*y_cur[IDX_GRAINM]; + data[jistart + 16378] = 0.0 + k[934]*y_cur[IDX_eM] + k[6868]*y_cur[IDX_GRAINM]; + data[jistart + 16379] = 0.0 + k[1284]*y_cur[IDX_eM] + k[1286]*y_cur[IDX_eM] + + k[1288]*y_cur[IDX_eM] + k[6711]*y_cur[IDX_GRAINM] + + k[6713]*y_cur[IDX_GRAINM] + k[6715]*y_cur[IDX_GRAINM]; + data[jistart + 16380] = 0.0 + k[1290]*y_cur[IDX_eM] + k[1291]*y_cur[IDX_eM] + + k[1294]*y_cur[IDX_eM] + k[6731]*y_cur[IDX_GRAINM] + + k[6732]*y_cur[IDX_GRAINM] + k[6735]*y_cur[IDX_GRAINM]; + data[jistart + 16381] = 0.0 + k[956]*y_cur[IDX_eM] + k[956]*y_cur[IDX_eM] + + k[6588]*y_cur[IDX_GRAINM] + k[6588]*y_cur[IDX_GRAINM]; + data[jistart + 16382] = 0.0 + k[928]*y_cur[IDX_eM] + k[6766]*y_cur[IDX_GRAINM]; + data[jistart + 16383] = 0.0 + k[957]*y_cur[IDX_eM] + k[959]*y_cur[IDX_eM] + + k[6603]*y_cur[IDX_GRAINM] + k[6605]*y_cur[IDX_GRAINM]; + data[jistart + 16384] = 0.0 + k[2136]*y_cur[IDX_CH4II]; + data[jistart + 16385] = 0.0 + k[983]*y_cur[IDX_eM] + k[6700]*y_cur[IDX_GRAINM]; + data[jistart + 16386] = 0.0 + k[2163]*y_cur[IDX_CH4I]; + data[jistart + 16387] = 0.0 + k[938]*y_cur[IDX_eM] + k[6548]*y_cur[IDX_GRAINM]; + data[jistart + 16388] = 0.0 + k[951]*y_cur[IDX_eM] + k[951]*y_cur[IDX_eM] + + k[6684]*y_cur[IDX_GRAINM] + k[6684]*y_cur[IDX_GRAINM]; + data[jistart + 16389] = 0.0 + k[5798] + k[6102]; + data[jistart + 16390] = 0.0 + k[5800] + k[6104]; + data[jistart + 16391] = 0.0 + k[807]*y_cur[IDX_eM] + k[808]*y_cur[IDX_eM] + + k[6504]*y_cur[IDX_GRAINM] + k[6505]*y_cur[IDX_GRAINM]; + data[jistart + 16392] = 0.0 + k[5796] + k[6100]; + data[jistart + 16393] = 0.0 + k[5643]*y_cur[IDX_HeII] + k[5938] + k[6291]; + data[jistart + 16394] = 0.0 + k[952]*y_cur[IDX_eM] + k[6692]*y_cur[IDX_GRAINM]; + data[jistart + 16395] = 0.0 + k[962]*y_cur[IDX_eM] + k[6430]*y_cur[IDX_GRAINM]; + data[jistart + 16396] = 0.0 + k[5799] + k[6103]; + data[jistart + 16397] = 0.0 + k[3252]*y_cur[IDX_HeII]; + data[jistart + 16398] = 0.0 - k[5037]*y_cur[IDX_CH3I]; + data[jistart + 16399] = 0.0 + k[5797] + k[6101]; + data[jistart + 16400] = 0.0 + k[5673]*y_cur[IDX_HeII] + k[5946] + k[6297]; + data[jistart + 16401] = 0.0 + k[5936] + k[6289]; + data[jistart + 16402] = 0.0 + k[1563]*y_cur[IDX_C2H2I]; + data[jistart + 16403] = 0.0 + k[940]*y_cur[IDX_eM] + k[943]*y_cur[IDX_eM] + + k[6562]*y_cur[IDX_GRAINM] + k[6565]*y_cur[IDX_GRAINM]; + data[jistart + 16404] = 0.0 + k[947]*y_cur[IDX_eM] + k[6503]*y_cur[IDX_GRAINM]; + data[jistart + 16405] = 0.0 + k[949]*y_cur[IDX_eM] + k[6519]*y_cur[IDX_GRAINM]; + data[jistart + 16406] = 0.0 + k[2165]*y_cur[IDX_CH4I]; + data[jistart + 16407] = 0.0 - k[5042]*y_cur[IDX_CH3I]; + data[jistart + 16408] = 0.0 + k[5000]*y_cur[IDX_CH2I] - k[5034]*y_cur[IDX_CH3I]; + data[jistart + 16409] = 0.0 + k[964]*y_cur[IDX_eM] + k[965]*y_cur[IDX_eM] + + k[6441]*y_cur[IDX_GRAINM] + k[6442]*y_cur[IDX_GRAINM]; + data[jistart + 16410] = 0.0 + k[2177]*y_cur[IDX_CH4I]; + data[jistart + 16411] = 0.0 + k[5157]*y_cur[IDX_HI]; + data[jistart + 16412] = 0.0 + k[270]*y_cur[IDX_CH3II] + k[3194]*y_cur[IDX_HeII] + k[5813] + + k[5813] + k[6117] + k[6117]; + data[jistart + 16413] = 0.0 + k[2198]*y_cur[IDX_CH4I]; + data[jistart + 16414] = 0.0 + k[2191]*y_cur[IDX_CH4I]; + data[jistart + 16415] = 0.0 + k[1663]*y_cur[IDX_C2H4II]; + data[jistart + 16416] = 0.0 + k[1712]*y_cur[IDX_C2H4I] + k[3816]*y_cur[IDX_CH3OHI]; + data[jistart + 16417] = 0.0 + k[801]*y_cur[IDX_eM] + k[6479]*y_cur[IDX_GRAINM]; + data[jistart + 16418] = 0.0 + k[8578]*y_cur[IDX_GHI]; + data[jistart + 16419] = 0.0 + k[5808] + k[6113]; + data[jistart + 16420] = 0.0 + k[2192]*y_cur[IDX_CH4I]; + data[jistart + 16421] = 0.0 + k[3810]*y_cur[IDX_CH3OHI]; + data[jistart + 16422] = 0.0 + k[3192]*y_cur[IDX_HeII] + k[5810] + k[6115]; + data[jistart + 16423] = 0.0 + k[2157]*y_cur[IDX_CH4I]; + data[jistart + 16424] = 0.0 + k[969]*y_cur[IDX_eM] + k[2133]*y_cur[IDX_C2H2I] + + k[2135]*y_cur[IDX_C2H4I] + k[2136]*y_cur[IDX_C2H5CNI] + + k[2137]*y_cur[IDX_CH3OHI] + k[2138]*y_cur[IDX_CH4I] + + k[2139]*y_cur[IDX_CO2I] + k[2140]*y_cur[IDX_COI] + + k[2141]*y_cur[IDX_H2COI] + k[2142]*y_cur[IDX_H2OI] + + k[2143]*y_cur[IDX_H2SI] + k[2144]*y_cur[IDX_NH3I] + + k[2145]*y_cur[IDX_OCSI] + k[6328]*y_cur[IDX_GRAINM]; + data[jistart + 16425] = 0.0 + k[1672]*y_cur[IDX_C2H4II]; + data[jistart + 16426] = 0.0 + k[1659]*y_cur[IDX_C2H4II]; + data[jistart + 16427] = 0.0 + k[768]*y_cur[IDX_eM] + k[6395]*y_cur[IDX_GRAINM]; + data[jistart + 16428] = 0.0 + k[1655]*y_cur[IDX_C2H4II]; + data[jistart + 16429] = 0.0 + k[1774]*y_cur[IDX_C3H2II] + k[5022]*y_cur[IDX_C4HI]; + data[jistart + 16430] = 0.0 + k[1368]*y_cur[IDX_CII] + k[1512]*y_cur[IDX_C2H2II] + + k[1671]*y_cur[IDX_C2H4II] + k[5069]*y_cur[IDX_CHI]; + data[jistart + 16431] = 0.0 + k[1649]*y_cur[IDX_C2H4II]; + data[jistart + 16432] = 0.0 + k[5227]*y_cur[IDX_NI] + k[5351]*y_cur[IDX_OI]; + data[jistart + 16433] = 0.0 + k[2200]*y_cur[IDX_CH4I]; + data[jistart + 16434] = 0.0 + k[1375]*y_cur[IDX_CII] + k[3824]*y_cur[IDX_SII] + + k[5053]*y_cur[IDX_C4HI] + k[5055]*y_cur[IDX_OHI] + + k[5071]*y_cur[IDX_CHI] + k[5112]*y_cur[IDX_CNI]; + data[jistart + 16435] = 0.0 + k[2146]*y_cur[IDX_CH4I]; + data[jistart + 16436] = 0.0 + k[4769]*y_cur[IDX_CH3II]; + data[jistart + 16437] = 0.0 + k[4628]*y_cur[IDX_CH3II]; + data[jistart + 16438] = 0.0 + k[2145]*y_cur[IDX_CH4II]; + data[jistart + 16439] = 0.0 + k[7077] + k[7259] + k[7441]; + data[jistart + 16440] = 0.0 + k[4839]*y_cur[IDX_CH3II]; + data[jistart + 16441] = 0.0 + k[4033]*y_cur[IDX_CH3II]; + data[jistart + 16442] = 0.0 + k[4208]*y_cur[IDX_CH3II]; + data[jistart + 16443] = 0.0 + k[2190]*y_cur[IDX_CH4I]; + data[jistart + 16444] = 0.0 + k[1669]*y_cur[IDX_C2H4II] + k[1780]*y_cur[IDX_C3H2II] + + k[3864]*y_cur[IDX_SiII] + k[5050]*y_cur[IDX_C4HI]; + data[jistart + 16445] = 0.0 + k[973]*y_cur[IDX_eM] + k[974]*y_cur[IDX_eM] + + k[6333]*y_cur[IDX_GRAINM] + k[6334]*y_cur[IDX_GRAINM]; + data[jistart + 16446] = 0.0 - k[61]*y_cur[IDX_CH3I] + k[4804]*y_cur[IDX_CH3II]; + data[jistart + 16447] = 0.0 + k[3963]*y_cur[IDX_CH3II]; + data[jistart + 16448] = 0.0 + k[4103]*y_cur[IDX_CH3II]; + data[jistart + 16449] = 0.0 + k[4383]*y_cur[IDX_CH3II]; + data[jistart + 16450] = 0.0 + k[4523]*y_cur[IDX_CH3II]; + data[jistart + 16451] = 0.0 + k[4453]*y_cur[IDX_CH3II]; + data[jistart + 16452] = 0.0 + k[4593]*y_cur[IDX_CH3II]; + data[jistart + 16453] = 0.0 + k[3928]*y_cur[IDX_CH3II]; + data[jistart + 16454] = 0.0 + k[4278]*y_cur[IDX_CH3II]; + data[jistart + 16455] = 0.0 + k[4313]*y_cur[IDX_CH3II]; + data[jistart + 16456] = 0.0 + k[3893]*y_cur[IDX_CH3II]; + data[jistart + 16457] = 0.0 + k[3652]*y_cur[IDX_CH4I] + k[4734]*y_cur[IDX_CH3II]; + data[jistart + 16458] = 0.0 + k[4558]*y_cur[IDX_CH3II]; + data[jistart + 16459] = 0.0 + k[2137]*y_cur[IDX_CH4II] + k[3196]*y_cur[IDX_HeII] + + k[3338]*y_cur[IDX_NII] + k[3810]*y_cur[IDX_PII] + + k[3816]*y_cur[IDX_PHII] + k[3867]*y_cur[IDX_SiII] + k[5819] + + k[6124]; + data[jistart + 16460] = 0.0 + k[69]*y_cur[IDX_CH2I] - k[70]*y_cur[IDX_CH3I] + + k[4698]*y_cur[IDX_CH3II]; + data[jistart + 16461] = 0.0 + k[4488]*y_cur[IDX_CH3II]; + data[jistart + 16462] = 0.0 + k[3998]*y_cur[IDX_CH3II]; + data[jistart + 16463] = 0.0 + k[4068]*y_cur[IDX_CH3II]; + data[jistart + 16464] = 0.0 + k[4173]*y_cur[IDX_CH3II]; + data[jistart + 16465] = 0.0 + k[4348]*y_cur[IDX_CH3II]; + data[jistart + 16466] = 0.0 + k[4243]*y_cur[IDX_CH3II]; + data[jistart + 16467] = 0.0 + k[4418]*y_cur[IDX_CH3II]; + data[jistart + 16468] = 0.0 - k[5035]*y_cur[IDX_CH3I] + k[5297]*y_cur[IDX_CH4I]; + data[jistart + 16469] = 0.0 + k[2151]*y_cur[IDX_CH4I]; + data[jistart + 16470] = 0.0 + k[1774]*y_cur[IDX_CH2CCH2I] + k[1780]*y_cur[IDX_CH3CCHI] + + k[2162]*y_cur[IDX_CH4I]; + data[jistart + 16471] = 0.0 + k[1981]*y_cur[IDX_H2COI]; + data[jistart + 16472] = 0.0 + k[2195]*y_cur[IDX_CH4I]; + data[jistart + 16473] = 0.0 + k[4138]*y_cur[IDX_CH3II]; + data[jistart + 16474] = 0.0 + k[2139]*y_cur[IDX_CH4II]; + data[jistart + 16475] = 0.0 + k[271]*y_cur[IDX_CH3II]; + data[jistart + 16476] = 0.0 + k[273]*y_cur[IDX_CH3II]; + data[jistart + 16477] = 0.0 + k[275]*y_cur[IDX_CH3II]; + data[jistart + 16478] = 0.0 + k[5304]*y_cur[IDX_CH4I]; + data[jistart + 16479] = 0.0 - k[60]*y_cur[IDX_CH3I] + k[4663]*y_cur[IDX_CH3II]; + data[jistart + 16480] = 0.0 + k[1665]*y_cur[IDX_C2H4II]; + data[jistart + 16481] = 0.0 + k[762]*y_cur[IDX_eM] + k[1536]*y_cur[IDX_C2H2I] + + k[1647]*y_cur[IDX_C2H4I] + k[1649]*y_cur[IDX_C3H2I] + + k[1651]*y_cur[IDX_C3HI] + k[1653]*y_cur[IDX_C4HI] + + k[1655]*y_cur[IDX_C5H2I] + k[1657]*y_cur[IDX_C5HI] + + k[1659]*y_cur[IDX_C6H2I] + k[1661]*y_cur[IDX_C6HI] + + k[1663]*y_cur[IDX_C7H2I] + k[1665]*y_cur[IDX_C7HI] + + k[1669]*y_cur[IDX_CH3CCHI] + k[1671]*y_cur[IDX_C2H6I] + + k[1672]*y_cur[IDX_H2CCCI] + k[1675]*y_cur[IDX_H2SI] + + k[1677]*y_cur[IDX_C4H2I] + k[3692]*y_cur[IDX_OI] + + k[6386]*y_cur[IDX_GRAINM]; + data[jistart + 16482] = 0.0 + k[1661]*y_cur[IDX_C2H4II]; + data[jistart + 16483] = 0.0 + k[1657]*y_cur[IDX_C2H4II]; + data[jistart + 16484] = 0.0 + k[3338]*y_cur[IDX_CH3OHI]; + data[jistart + 16485] = 0.0 + k[1651]*y_cur[IDX_C2H4II]; + data[jistart + 16486] = 0.0 + k[2194]*y_cur[IDX_CH4I]; + data[jistart + 16487] = 0.0 + k[1653]*y_cur[IDX_C2H4II] + k[5022]*y_cur[IDX_CH2CCH2I] + + k[5050]*y_cur[IDX_CH3CCHI] + k[5053]*y_cur[IDX_CH3CHCH2I] + + k[5057]*y_cur[IDX_CH4I] + k[5058]*y_cur[IDX_CH4I]; + data[jistart + 16488] = 0.0 + k[1677]*y_cur[IDX_C2H4II]; + data[jistart + 16489] = 0.0 + k[69]*y_cur[IDX_HM] + k[4995]*y_cur[IDX_CH2I] + + k[4995]*y_cur[IDX_CH2I] + k[4996]*y_cur[IDX_CH4I] + + k[4996]*y_cur[IDX_CH4I] + k[4998]*y_cur[IDX_H2COI] + + k[4999]*y_cur[IDX_HCOI] + k[5000]*y_cur[IDX_HNOI] + + k[5018]*y_cur[IDX_OHI] + k[5135]*y_cur[IDX_H2I]; + data[jistart + 16490] = 0.0 + k[2207]*y_cur[IDX_CH4I]; + data[jistart + 16491] = 0.0 + k[1484]*y_cur[IDX_C2H2II] + k[1647]*y_cur[IDX_C2H4II] + + k[1712]*y_cur[IDX_PHII] + k[1717]*y_cur[IDX_SII] + + k[2135]*y_cur[IDX_CH4II] + k[5225]*y_cur[IDX_NI] + + k[5349]*y_cur[IDX_OI]; + data[jistart + 16492] = 0.0 + k[269]*y_cur[IDX_CH3II] + k[1578]*y_cur[IDX_C2H3II] - + k[5025]*y_cur[IDX_CH3I]; + data[jistart + 16493] = 0.0 - k[5039]*y_cur[IDX_CH3I] - k[5040]*y_cur[IDX_CH3I] - + k[5041]*y_cur[IDX_CH3I] + k[5060]*y_cur[IDX_CH4I]; + data[jistart + 16494] = 0.0 - k[2102]*y_cur[IDX_CH3I] - k[2103]*y_cur[IDX_CH3I] + + k[3864]*y_cur[IDX_CH3CCHI] + k[3867]*y_cur[IDX_CH3OHI]; + data[jistart + 16495] = 0.0 + k[1675]*y_cur[IDX_C2H4II] + k[2143]*y_cur[IDX_CH4II] - + k[5032]*y_cur[IDX_CH3I]; + data[jistart + 16496] = 0.0 + k[1717]*y_cur[IDX_C2H4I] - k[2101]*y_cur[IDX_CH3I] + + k[3824]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 16497] = 0.0 - k[5049]*y_cur[IDX_CH3I]; + data[jistart + 16498] = 0.0 + k[755]*y_cur[IDX_eM] + k[756]*y_cur[IDX_eM] + + k[1578]*y_cur[IDX_C2H3I] + k[6370]*y_cur[IDX_GRAINM] + + k[6371]*y_cur[IDX_GRAINM]; + data[jistart + 16499] = 0.0 + k[274]*y_cur[IDX_CH3II] - k[5038]*y_cur[IDX_CH3I]; + data[jistart + 16500] = 0.0 + k[272]*y_cur[IDX_CH3II] + k[4999]*y_cur[IDX_CH2I] - + k[5033]*y_cur[IDX_CH3I]; + data[jistart + 16501] = 0.0 + k[2138]*y_cur[IDX_CH4II] + k[2146]*y_cur[IDX_C2II] + + k[2151]*y_cur[IDX_C2HII] + k[2157]*y_cur[IDX_C3II] + + k[2162]*y_cur[IDX_C3H2II] + k[2163]*y_cur[IDX_C3OII] + + k[2165]*y_cur[IDX_C4II] + k[2177]*y_cur[IDX_C5II] + + k[2190]*y_cur[IDX_COII] + k[2191]*y_cur[IDX_CO2II] + + k[2192]*y_cur[IDX_CSII] + k[2194]*y_cur[IDX_H2COII] + + k[2195]*y_cur[IDX_H2OII] + k[2198]*y_cur[IDX_HC3NII] + + k[2200]*y_cur[IDX_HCNII] + k[2207]*y_cur[IDX_NH3II] + + k[3201]*y_cur[IDX_HeII] + k[3652]*y_cur[IDX_OM] + + k[4996]*y_cur[IDX_CH2I] + k[4996]*y_cur[IDX_CH2I] + + k[5057]*y_cur[IDX_C4HI] + k[5058]*y_cur[IDX_C4HI] + + k[5059]*y_cur[IDX_CNI] + k[5060]*y_cur[IDX_O2I] + + k[5061]*y_cur[IDX_OHI] + k[5062]*y_cur[IDX_SI] + + k[5159]*y_cur[IDX_HI] + k[5297]*y_cur[IDX_NH2I] + + k[5304]*y_cur[IDX_NHI] + k[5385]*y_cur[IDX_OI] + k[6128]; + data[jistart + 16502] = 0.0 + k[1981]*y_cur[IDX_CH2II] + k[2141]*y_cur[IDX_CH4II] + + k[4998]*y_cur[IDX_CH2I] - k[5030]*y_cur[IDX_CH3I]; + data[jistart + 16503] = 0.0 + k[5069]*y_cur[IDX_C2H6I] + k[5071]*y_cur[IDX_CH3CHCH2I] + + k[5556]*y_cur[IDX_H2I]; + data[jistart + 16504] = 0.0 - k[5048]*y_cur[IDX_CH3I] + k[5062]*y_cur[IDX_CH4I]; + data[jistart + 16505] = 0.0 + k[5018]*y_cur[IDX_CH2I] - k[5045]*y_cur[IDX_CH3I] - + k[5046]*y_cur[IDX_CH3I] - k[5047]*y_cur[IDX_CH3I] + + k[5055]*y_cur[IDX_CH3CHCH2I] + k[5061]*y_cur[IDX_CH4I] + + k[5455]*y_cur[IDX_C2H2I]; + data[jistart + 16506] = 0.0 + k[2144]*y_cur[IDX_CH4II] - k[5036]*y_cur[IDX_CH3I]; + data[jistart + 16507] = 0.0 + k[1484]*y_cur[IDX_C2H4I] + k[1512]*y_cur[IDX_C2H6I]; + data[jistart + 16508] = 0.0 + k[269]*y_cur[IDX_C2H3I] + k[270]*y_cur[IDX_CH3COCH3I] + + k[271]*y_cur[IDX_FeI] + k[272]*y_cur[IDX_HCOI] + + k[273]*y_cur[IDX_MgI] + k[274]*y_cur[IDX_NOI] + + k[275]*y_cur[IDX_NaI] + k[3893]*y_cur[IDX_CM] + + k[3928]*y_cur[IDX_C10M] + k[3963]*y_cur[IDX_C10HM] + + k[3998]*y_cur[IDX_C2M] + k[4033]*y_cur[IDX_C2HM] + + k[4068]*y_cur[IDX_C3M] + k[4103]*y_cur[IDX_C3HM] + + k[4138]*y_cur[IDX_C3NM] + k[4173]*y_cur[IDX_C4M] + + k[4208]*y_cur[IDX_C4HM] + k[4243]*y_cur[IDX_C5M] + + k[4278]*y_cur[IDX_C5HM] + k[4313]*y_cur[IDX_C5NM] + + k[4348]*y_cur[IDX_C6M] + k[4383]*y_cur[IDX_C6HM] + + k[4418]*y_cur[IDX_C7M] + k[4453]*y_cur[IDX_C7HM] + + k[4488]*y_cur[IDX_C8M] + k[4523]*y_cur[IDX_C8HM] + + k[4558]*y_cur[IDX_C9M] + k[4593]*y_cur[IDX_C9HM] + + k[4628]*y_cur[IDX_CHM] + k[4663]*y_cur[IDX_CNM] + + k[4698]*y_cur[IDX_HM] + k[4734]*y_cur[IDX_OM] + + k[4769]*y_cur[IDX_O2M] + k[4804]*y_cur[IDX_OHM] + + k[4839]*y_cur[IDX_SM] + k[5612]*y_cur[IDX_eM]; + data[jistart + 16509] = 0.0 + k[1536]*y_cur[IDX_C2H4II] + k[1563]*y_cur[IDX_C2H6II] + + k[2133]*y_cur[IDX_CH4II] + k[5455]*y_cur[IDX_OHI]; + data[jistart + 16510] = 0.0 - k[5029]*y_cur[IDX_CH3I] + k[5059]*y_cur[IDX_CH4I] + + k[5112]*y_cur[IDX_CH3CHCH2I] - k[5542]*y_cur[IDX_CH3I]; + data[jistart + 16511] = 0.0 + k[8578]*y_cur[IDX_GCH2I]; + data[jistart + 16512] = 0.0 - k[60]*y_cur[IDX_CNM] - k[61]*y_cur[IDX_OHM] - + k[70]*y_cur[IDX_HM] - k[362]*y_cur[IDX_HII] - k[1352]*y_cur[IDX_CII] + - k[1353]*y_cur[IDX_CII] - k[2101]*y_cur[IDX_SII] - + k[2102]*y_cur[IDX_SiII] - k[2103]*y_cur[IDX_SiII] - + k[2641]*y_cur[IDX_H3II] - k[3176]*y_cur[IDX_HeII] - + k[4949]*y_cur[IDX_CI] - k[5025]*y_cur[IDX_C2H3I] - + k[5026]*y_cur[IDX_CH3I] - k[5026]*y_cur[IDX_CH3I] - + k[5026]*y_cur[IDX_CH3I] - k[5026]*y_cur[IDX_CH3I] - + k[5027]*y_cur[IDX_CH3I] - k[5027]*y_cur[IDX_CH3I] - + k[5027]*y_cur[IDX_CH3I] - k[5027]*y_cur[IDX_CH3I] - + k[5028]*y_cur[IDX_CH3I] - k[5028]*y_cur[IDX_CH3I] - + k[5028]*y_cur[IDX_CH3I] - k[5028]*y_cur[IDX_CH3I] - + k[5029]*y_cur[IDX_CNI] - k[5030]*y_cur[IDX_H2COI] - + k[5031]*y_cur[IDX_H2OI] - k[5032]*y_cur[IDX_H2SI] - + k[5033]*y_cur[IDX_HCOI] - k[5034]*y_cur[IDX_HNOI] - + k[5035]*y_cur[IDX_NH2I] - k[5036]*y_cur[IDX_NH3I] - + k[5037]*y_cur[IDX_NO2I] - k[5038]*y_cur[IDX_NOI] - + k[5039]*y_cur[IDX_O2I] - k[5040]*y_cur[IDX_O2I] - + k[5041]*y_cur[IDX_O2I] - k[5042]*y_cur[IDX_O2HI] - + k[5043]*y_cur[IDX_OI] - k[5044]*y_cur[IDX_OI] - + k[5045]*y_cur[IDX_OHI] - k[5046]*y_cur[IDX_OHI] - + k[5047]*y_cur[IDX_OHI] - k[5048]*y_cur[IDX_SI] - + k[5049]*y_cur[IDX_SiI] - k[5136]*y_cur[IDX_H2I] - + k[5158]*y_cur[IDX_HI] - k[5257]*y_cur[IDX_NI] - + k[5258]*y_cur[IDX_NI] - k[5259]*y_cur[IDX_NI] - + k[5542]*y_cur[IDX_CNI] - k[5793] - k[5794] - k[5795] - k[6097] - + k[6098] - k[6099] - k[6895]; + data[jistart + 16513] = 0.0 + k[5225]*y_cur[IDX_C2H4I] + k[5227]*y_cur[IDX_C2H5I] - + k[5257]*y_cur[IDX_CH3I] - k[5258]*y_cur[IDX_CH3I] - + k[5259]*y_cur[IDX_CH3I]; + data[jistart + 16514] = 0.0 + k[3692]*y_cur[IDX_C2H4II] - k[5043]*y_cur[IDX_CH3I] - + k[5044]*y_cur[IDX_CH3I] + k[5349]*y_cur[IDX_C2H4I] + + k[5351]*y_cur[IDX_C2H5I] + k[5385]*y_cur[IDX_CH4I]; + data[jistart + 16515] = 0.0 - k[3176]*y_cur[IDX_CH3I] + k[3192]*y_cur[IDX_CH3CNI] + + k[3194]*y_cur[IDX_CH3COCH3I] + k[3196]*y_cur[IDX_CH3OHI] + + k[3201]*y_cur[IDX_CH4I] + k[3252]*y_cur[IDX_HCOOCH3I] + + k[5643]*y_cur[IDX_CH3COI] + k[5673]*y_cur[IDX_CH3COOHI]; + data[jistart + 16516] = 0.0 - k[1352]*y_cur[IDX_CH3I] - k[1353]*y_cur[IDX_CH3I] + + k[1368]*y_cur[IDX_C2H6I] + k[1375]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 16517] = 0.0 + k[2142]*y_cur[IDX_CH4II] - k[5031]*y_cur[IDX_CH3I]; + data[jistart + 16518] = 0.0 - k[362]*y_cur[IDX_CH3I]; + data[jistart + 16519] = 0.0 - k[4949]*y_cur[IDX_CH3I]; + data[jistart + 16520] = 0.0 - k[2641]*y_cur[IDX_CH3I]; + data[jistart + 16521] = 0.0 + k[2140]*y_cur[IDX_CH4II]; + data[jistart + 16522] = 0.0 + k[6328]*y_cur[IDX_CH4II] + k[6333]*y_cur[IDX_CH5II] + + k[6334]*y_cur[IDX_CH5II] + k[6370]*y_cur[IDX_C2H3II] + + k[6371]*y_cur[IDX_C2H3II] + k[6386]*y_cur[IDX_C2H4II] + + k[6395]*y_cur[IDX_C2H5II] + k[6430]*y_cur[IDX_CH3OHII] + + k[6441]*y_cur[IDX_CH3OH2II] + k[6442]*y_cur[IDX_CH3OH2II] + + k[6479]*y_cur[IDX_C3H4II] + k[6503]*y_cur[IDX_CH3CNHII] + + k[6504]*y_cur[IDX_C3H7II] + k[6505]*y_cur[IDX_C3H7II] + + k[6519]*y_cur[IDX_CH3COII] + k[6548]*y_cur[IDX_CH3CHOII] + + k[6562]*y_cur[IDX_CH3CHOHII] + k[6565]*y_cur[IDX_CH3CHOHII] + + k[6580]*y_cur[IDX_PCH3II] + k[6588]*y_cur[IDX_CH3OCH3II] + + k[6588]*y_cur[IDX_CH3OCH3II] + k[6603]*y_cur[IDX_CH3OCH4II] + + k[6605]*y_cur[IDX_CH3OCH4II] + k[6673]*y_cur[IDX_C2H5CNHII] + + k[6684]*y_cur[IDX_CH3COCH3II] + k[6684]*y_cur[IDX_CH3COCH3II] + + k[6688]*y_cur[IDX_CH3CSII] + k[6692]*y_cur[IDX_CH3COCH4II] + + k[6700]*y_cur[IDX_HCOOCH3II] + k[6711]*y_cur[IDX_CH3COOHII] + + k[6713]*y_cur[IDX_CH3COOHII] + k[6715]*y_cur[IDX_CH3COOHII] + + k[6731]*y_cur[IDX_CH3COOH2II] + k[6732]*y_cur[IDX_CH3COOH2II] + + k[6735]*y_cur[IDX_CH3COOH2II] + k[6766]*y_cur[IDX_CH3C3NHII] + + k[6769]*y_cur[IDX_NCCNCH3II] + k[6835]*y_cur[IDX_CH3C5NHII] + + k[6868]*y_cur[IDX_CH3C7NHII]; + data[jistart + 16523] = 0.0 + k[5135]*y_cur[IDX_CH2I] - k[5136]*y_cur[IDX_CH3I] + + k[5556]*y_cur[IDX_CHI]; + data[jistart + 16524] = 0.0 + k[755]*y_cur[IDX_C2H3II] + k[756]*y_cur[IDX_C2H3II] + + k[762]*y_cur[IDX_C2H4II] + k[768]*y_cur[IDX_C2H5II] + + k[771]*y_cur[IDX_C2H5CNHII] + k[801]*y_cur[IDX_C3H4II] + + k[807]*y_cur[IDX_C3H7II] + k[808]*y_cur[IDX_C3H7II] + + k[928]*y_cur[IDX_CH3C3NHII] + k[932]*y_cur[IDX_CH3C5NHII] + + k[934]*y_cur[IDX_CH3C7NHII] + k[938]*y_cur[IDX_CH3CHOII] + + k[940]*y_cur[IDX_CH3CHOHII] + k[943]*y_cur[IDX_CH3CHOHII] + + k[947]*y_cur[IDX_CH3CNHII] + k[949]*y_cur[IDX_CH3COII] + + k[951]*y_cur[IDX_CH3COCH3II] + k[951]*y_cur[IDX_CH3COCH3II] + + k[952]*y_cur[IDX_CH3COCH4II] + k[954]*y_cur[IDX_CH3CSII] + + k[956]*y_cur[IDX_CH3OCH3II] + k[956]*y_cur[IDX_CH3OCH3II] + + k[957]*y_cur[IDX_CH3OCH4II] + k[959]*y_cur[IDX_CH3OCH4II] + + k[962]*y_cur[IDX_CH3OHII] + k[964]*y_cur[IDX_CH3OH2II] + + k[965]*y_cur[IDX_CH3OH2II] + k[969]*y_cur[IDX_CH4II] + + k[973]*y_cur[IDX_CH5II] + k[974]*y_cur[IDX_CH5II] + + k[983]*y_cur[IDX_HCOOCH3II] + k[1155]*y_cur[IDX_NCCNCH3II] + + k[1201]*y_cur[IDX_PCH3II] + k[1284]*y_cur[IDX_CH3COOHII] + + k[1286]*y_cur[IDX_CH3COOHII] + k[1288]*y_cur[IDX_CH3COOHII] + + k[1290]*y_cur[IDX_CH3COOH2II] + k[1291]*y_cur[IDX_CH3COOH2II] + + k[1294]*y_cur[IDX_CH3COOH2II] + k[5612]*y_cur[IDX_CH3II]; + data[jistart + 16525] = 0.0 + k[5157]*y_cur[IDX_CH2COI] - k[5158]*y_cur[IDX_CH3I] + + k[5159]*y_cur[IDX_CH4I]; + data[jistart + 16526] = 0.0 + k[1211]*y_cur[IDX_eM] + k[3752]*y_cur[IDX_OI] + + k[6560]*y_cur[IDX_GRAINM]; + data[jistart + 16527] = 0.0 - k[5264]*y_cur[IDX_NI]; + data[jistart + 16528] = 0.0 + k[1133]*y_cur[IDX_eM] + k[6572]*y_cur[IDX_GRAINM]; + data[jistart + 16529] = 0.0 - k[5237]*y_cur[IDX_NI] + k[6019]; + data[jistart + 16530] = 0.0 + k[1171]*y_cur[IDX_eM] + k[1172]*y_cur[IDX_eM] + + k[1172]*y_cur[IDX_eM] + k[6529]*y_cur[IDX_GRAINM] + + k[6530]*y_cur[IDX_GRAINM] + k[6530]*y_cur[IDX_GRAINM]; + data[jistart + 16531] = 0.0 - k[3408]*y_cur[IDX_NI]; + data[jistart + 16532] = 0.0 + k[1173]*y_cur[IDX_eM] + k[6581]*y_cur[IDX_GRAINM]; + data[jistart + 16533] = 0.0 + k[1176]*y_cur[IDX_eM] + k[6495]*y_cur[IDX_GRAINM]; + data[jistart + 16534] = 0.0 + k[782]*y_cur[IDX_eM] + k[6635]*y_cur[IDX_GRAINM]; + data[jistart + 16535] = 0.0 + k[1260]*y_cur[IDX_eM] + k[3761]*y_cur[IDX_OI] + + k[6501]*y_cur[IDX_GRAINM]; + data[jistart + 16536] = 0.0 - k[3451]*y_cur[IDX_NI]; + data[jistart + 16537] = 0.0 - k[3434]*y_cur[IDX_NI]; + data[jistart + 16538] = 0.0 - k[3435]*y_cur[IDX_NI]; + data[jistart + 16539] = 0.0 - k[5275]*y_cur[IDX_NI] - k[5276]*y_cur[IDX_NI] - + k[5277]*y_cur[IDX_NI] - k[5278]*y_cur[IDX_NI]; + data[jistart + 16540] = 0.0 + k[3300]*y_cur[IDX_HeII] - k[5286]*y_cur[IDX_NI] + k[5909] + + k[6250]; + data[jistart + 16541] = 0.0 - k[3455]*y_cur[IDX_NI]; + data[jistart + 16542] = 0.0 - k[5252]*y_cur[IDX_NI]; + data[jistart + 16543] = 0.0 - k[5287]*y_cur[IDX_NI] - k[5288]*y_cur[IDX_NI]; + data[jistart + 16544] = 0.0 - k[5289]*y_cur[IDX_NI]; + data[jistart + 16545] = 0.0 - k[3469]*y_cur[IDX_NI]; + data[jistart + 16546] = 0.0 - k[3424]*y_cur[IDX_NI]; + data[jistart + 16547] = 0.0 - k[5230]*y_cur[IDX_NI]; + data[jistart + 16548] = 0.0 + k[1446]*y_cur[IDX_CII] + k[3329]*y_cur[IDX_HeII] + + k[5451]*y_cur[IDX_OI] + k[5931] + k[6281]; + data[jistart + 16549] = 0.0 - k[3417]*y_cur[IDX_NI]; + data[jistart + 16550] = 0.0 - k[5268]*y_cur[IDX_NI]; + data[jistart + 16551] = 0.0 + k[1421]*y_cur[IDX_CII] + k[3288]*y_cur[IDX_HeII] + + k[4976]*y_cur[IDX_CI] + k[5188]*y_cur[IDX_HI] - + k[5280]*y_cur[IDX_NI] + k[5426]*y_cur[IDX_OI] + k[5893] + k[6230]; + data[jistart + 16552] = 0.0 - k[5294]*y_cur[IDX_NI]; + data[jistart + 16553] = 0.0 + k[3166]*y_cur[IDX_HeII]; + data[jistart + 16554] = 0.0 - k[5247]*y_cur[IDX_NI]; + data[jistart + 16555] = 0.0 - k[3472]*y_cur[IDX_NI]; + data[jistart + 16556] = 0.0 - k[3473]*y_cur[IDX_NI] - k[3474]*y_cur[IDX_NI]; + data[jistart + 16557] = 0.0 - k[5282]*y_cur[IDX_NI]; + data[jistart + 16558] = 0.0 - k[5292]*y_cur[IDX_NI] - k[5293]*y_cur[IDX_NI]; + data[jistart + 16559] = 0.0 - k[5269]*y_cur[IDX_NI] - k[5270]*y_cur[IDX_NI]; + data[jistart + 16560] = 0.0 + k[3277]*y_cur[IDX_HeII] + k[5879] + k[6214]; + data[jistart + 16561] = 0.0 - k[5295]*y_cur[IDX_NI]; + data[jistart + 16562] = 0.0 + k[780]*y_cur[IDX_eM] + k[6466]*y_cur[IDX_GRAINM]; + data[jistart + 16563] = 0.0 - k[3446]*y_cur[IDX_NI]; + data[jistart + 16564] = 0.0 - k[3450]*y_cur[IDX_NI]; + data[jistart + 16565] = 0.0 - k[3470]*y_cur[IDX_NI]; + data[jistart + 16566] = 0.0 - k[3471]*y_cur[IDX_NI]; + data[jistart + 16567] = 0.0 - k[3460]*y_cur[IDX_NI] - k[3461]*y_cur[IDX_NI]; + data[jistart + 16568] = 0.0 - k[5296]*y_cur[IDX_NI]; + data[jistart + 16569] = 0.0 - k[3429]*y_cur[IDX_NI]; + data[jistart + 16570] = 0.0 - k[3449]*y_cur[IDX_NI]; + data[jistart + 16571] = 0.0 - k[5285]*y_cur[IDX_NI]; + data[jistart + 16572] = 0.0 - k[5245]*y_cur[IDX_NI]; + data[jistart + 16573] = 0.0 - k[3399]*y_cur[IDX_NI]; + data[jistart + 16574] = 0.0 - k[3416]*y_cur[IDX_NI]; + data[jistart + 16575] = 0.0 - k[3412]*y_cur[IDX_NI]; + data[jistart + 16576] = 0.0 - k[3400]*y_cur[IDX_NI] - k[3401]*y_cur[IDX_NI]; + data[jistart + 16577] = 0.0 - k[3433]*y_cur[IDX_NI]; + data[jistart + 16578] = 0.0 + k[3352]*y_cur[IDX_NII] - k[5273]*y_cur[IDX_NI]; + data[jistart + 16579] = 0.0 - k[3432]*y_cur[IDX_NI]; + data[jistart + 16580] = 0.0 - k[3466]*y_cur[IDX_NI]; + data[jistart + 16581] = 0.0 - k[3423]*y_cur[IDX_NI]; + data[jistart + 16582] = 0.0 - k[5239]*y_cur[IDX_NI]; + data[jistart + 16583] = 0.0 - k[3415]*y_cur[IDX_NI]; + data[jistart + 16584] = 0.0 + k[977]*y_cur[IDX_eM] + k[2274]*y_cur[IDX_NOI] - + k[3456]*y_cur[IDX_NI] + k[6359]*y_cur[IDX_GRAINM]; + data[jistart + 16585] = 0.0 + k[7076] + k[7258] + k[7440]; + data[jistart + 16586] = 0.0 - k[5232]*y_cur[IDX_NI]; + data[jistart + 16587] = 0.0 - k[5226]*y_cur[IDX_NI] - k[5227]*y_cur[IDX_NI]; + data[jistart + 16588] = 0.0 - k[573]*y_cur[IDX_NI] + k[1150]*y_cur[IDX_eM] + + k[1150]*y_cur[IDX_eM] + k[3744]*y_cur[IDX_OI] + + k[6375]*y_cur[IDX_GRAINM] + k[6375]*y_cur[IDX_GRAINM]; + data[jistart + 16589] = 0.0 - k[3383]*y_cur[IDX_NI] + k[3605]*y_cur[IDX_NHI]; + data[jistart + 16590] = 0.0 + k[978]*y_cur[IDX_eM] + k[6468]*y_cur[IDX_GRAINM]; + data[jistart + 16591] = 0.0 - k[3462]*y_cur[IDX_NI]; + data[jistart + 16592] = 0.0 + k[1158]*y_cur[IDX_eM] + k[1910]*y_cur[IDX_CI] + + k[2011]*y_cur[IDX_CH2I] + k[2258]*y_cur[IDX_CHI] + + k[2461]*y_cur[IDX_H2I] - k[3463]*y_cur[IDX_NI] + + k[3477]*y_cur[IDX_C2I] + k[3480]*y_cur[IDX_C2HI] + + k[3481]*y_cur[IDX_CNI] + k[3482]*y_cur[IDX_CO2I] + + k[3485]*y_cur[IDX_COI] + k[3487]*y_cur[IDX_H2COI] + + k[3489]*y_cur[IDX_H2OI] + k[3493]*y_cur[IDX_HCNI] + + k[3494]*y_cur[IDX_HCOI] + k[3495]*y_cur[IDX_HNCI] + + k[3496]*y_cur[IDX_N2I] + k[3497]*y_cur[IDX_NH2I] + + k[3498]*y_cur[IDX_NH3I] + k[3499]*y_cur[IDX_NHI] + + k[3502]*y_cur[IDX_O2I] + k[3503]*y_cur[IDX_OI] + + k[3504]*y_cur[IDX_OHI] + k[3505]*y_cur[IDX_SI] + k[6217] + + k[6320]*y_cur[IDX_GRAINM]; + data[jistart + 16593] = 0.0 + k[4784]*y_cur[IDX_NII]; + data[jistart + 16594] = 0.0 + k[4643]*y_cur[IDX_NII]; + data[jistart + 16595] = 0.0 - k[2392]*y_cur[IDX_NI]; + data[jistart + 16596] = 0.0 + k[562]*y_cur[IDX_NII] + k[3360]*y_cur[IDX_NII]; + data[jistart + 16597] = 0.0 + k[1159]*y_cur[IDX_eM] - k[3464]*y_cur[IDX_NI] + + k[3509]*y_cur[IDX_CNI] + k[3617]*y_cur[IDX_NHI] + + k[6324]*y_cur[IDX_GRAINM]; + data[jistart + 16598] = 0.0 - k[123]*y_cur[IDX_NI] + k[4854]*y_cur[IDX_NII]; + data[jistart + 16599] = 0.0 - k[111]*y_cur[IDX_NI] + k[4048]*y_cur[IDX_NII]; + data[jistart + 16600] = 0.0 - k[115]*y_cur[IDX_NI] - k[3404]*y_cur[IDX_NI] + + k[4223]*y_cur[IDX_NII]; + data[jistart + 16601] = 0.0 + k[3610]*y_cur[IDX_NHI]; + data[jistart + 16602] = 0.0 + k[4819]*y_cur[IDX_NII]; + data[jistart + 16603] = 0.0 - k[3381]*y_cur[IDX_NI] - k[3382]*y_cur[IDX_NI] + + k[3978]*y_cur[IDX_NII]; + data[jistart + 16604] = 0.0 - k[113]*y_cur[IDX_NI] - k[3395]*y_cur[IDX_NI] - + k[3396]*y_cur[IDX_NI] + k[4118]*y_cur[IDX_NII]; + data[jistart + 16605] = 0.0 - k[3421]*y_cur[IDX_NI] - k[3422]*y_cur[IDX_NI] + + k[4398]*y_cur[IDX_NII]; + data[jistart + 16606] = 0.0 - k[3440]*y_cur[IDX_NI] - k[3441]*y_cur[IDX_NI] + + k[4538]*y_cur[IDX_NII]; + data[jistart + 16607] = 0.0 - k[119]*y_cur[IDX_NI] - k[3430]*y_cur[IDX_NI] - + k[3431]*y_cur[IDX_NI] + k[4468]*y_cur[IDX_NII]; + data[jistart + 16608] = 0.0 - k[121]*y_cur[IDX_NI] - k[3447]*y_cur[IDX_NI] - + k[3448]*y_cur[IDX_NI] + k[4608]*y_cur[IDX_NII]; + data[jistart + 16609] = 0.0 - k[3377]*y_cur[IDX_NI] - k[3378]*y_cur[IDX_NI] - + k[3379]*y_cur[IDX_NI] - k[3380]*y_cur[IDX_NI] + + k[3943]*y_cur[IDX_NII]; + data[jistart + 16610] = 0.0 - k[117]*y_cur[IDX_NI] - k[3413]*y_cur[IDX_NI] - + k[3414]*y_cur[IDX_NI] + k[4293]*y_cur[IDX_NII]; + data[jistart + 16611] = 0.0 + k[4328]*y_cur[IDX_NII]; + data[jistart + 16612] = 0.0 - k[5271]*y_cur[IDX_NI] - k[5272]*y_cur[IDX_NI]; + data[jistart + 16613] = 0.0 - k[5]*y_cur[IDX_NI] + k[3908]*y_cur[IDX_NII]; + data[jistart + 16614] = 0.0 - k[5263]*y_cur[IDX_NI]; + data[jistart + 16615] = 0.0 - k[122]*y_cur[IDX_NI] + k[4749]*y_cur[IDX_NII]; + data[jistart + 16616] = 0.0 - k[120]*y_cur[IDX_NI] - k[3442]*y_cur[IDX_NI] - + k[3443]*y_cur[IDX_NI] - k[3444]*y_cur[IDX_NI] - + k[3445]*y_cur[IDX_NI] + k[4573]*y_cur[IDX_NII]; + data[jistart + 16617] = 0.0 + k[545]*y_cur[IDX_NII]; + data[jistart + 16618] = 0.0 - k[77]*y_cur[IDX_NI] + k[4714]*y_cur[IDX_NII]; + data[jistart + 16619] = 0.0 + k[3235]*y_cur[IDX_HeII]; + data[jistart + 16620] = 0.0 - k[3394]*y_cur[IDX_NI]; + data[jistart + 16621] = 0.0 - k[3436]*y_cur[IDX_NI] - k[3437]*y_cur[IDX_NI] - + k[3438]*y_cur[IDX_NI] - k[3439]*y_cur[IDX_NI] + + k[4503]*y_cur[IDX_NII]; + data[jistart + 16622] = 0.0 - k[110]*y_cur[IDX_NI] - k[3384]*y_cur[IDX_NI] + + k[4013]*y_cur[IDX_NII]; + data[jistart + 16623] = 0.0 - k[112]*y_cur[IDX_NI] - k[3392]*y_cur[IDX_NI] - + k[3393]*y_cur[IDX_NI] + k[4083]*y_cur[IDX_NII]; + data[jistart + 16624] = 0.0 - k[114]*y_cur[IDX_NI] - k[3402]*y_cur[IDX_NI] - + k[3403]*y_cur[IDX_NI] + k[4188]*y_cur[IDX_NII]; + data[jistart + 16625] = 0.0 - k[3418]*y_cur[IDX_NI] - k[3419]*y_cur[IDX_NI] - + k[3420]*y_cur[IDX_NI] + k[4363]*y_cur[IDX_NII]; + data[jistart + 16626] = 0.0 - k[116]*y_cur[IDX_NI] - k[3409]*y_cur[IDX_NI] - + k[3410]*y_cur[IDX_NI] - k[3411]*y_cur[IDX_NI] + + k[4258]*y_cur[IDX_NII]; + data[jistart + 16627] = 0.0 - k[118]*y_cur[IDX_NI] - k[3425]*y_cur[IDX_NI] - + k[3426]*y_cur[IDX_NI] - k[3427]*y_cur[IDX_NI] - + k[3428]*y_cur[IDX_NI] + k[4433]*y_cur[IDX_NII]; + data[jistart + 16628] = 0.0 - k[3475]*y_cur[IDX_NI] - k[3476]*y_cur[IDX_NI]; + data[jistart + 16629] = 0.0 - k[5229]*y_cur[IDX_NI] + k[5710] + k[5995]; + data[jistart + 16630] = 0.0 + k[557]*y_cur[IDX_NII] + k[3497]*y_cur[IDX_NHII]; + data[jistart + 16631] = 0.0 - k[3385]*y_cur[IDX_NI] - k[3386]*y_cur[IDX_NI]; + data[jistart + 16632] = 0.0 - k[3397]*y_cur[IDX_NI] - k[3398]*y_cur[IDX_NI]; + data[jistart + 16633] = 0.0 - k[5241]*y_cur[IDX_NI]; + data[jistart + 16634] = 0.0 - k[3452]*y_cur[IDX_NI]; + data[jistart + 16635] = 0.0 - k[3467]*y_cur[IDX_NI]; + data[jistart + 16636] = 0.0 - k[3457]*y_cur[IDX_NI] - k[3458]*y_cur[IDX_NI] + + k[3612]*y_cur[IDX_NHI]; + data[jistart + 16637] = 0.0 + k[4153]*y_cur[IDX_NII]; + data[jistart + 16638] = 0.0 - k[5234]*y_cur[IDX_NI]; + data[jistart + 16639] = 0.0 - k[1961]*y_cur[IDX_NI]; + data[jistart + 16640] = 0.0 + k[548]*y_cur[IDX_NII] + k[3482]*y_cur[IDX_NHII] - + k[5262]*y_cur[IDX_NI]; + data[jistart + 16641] = 0.0 - k[3465]*y_cur[IDX_NI]; + data[jistart + 16642] = 0.0 - k[5251]*y_cur[IDX_NI]; + data[jistart + 16643] = 0.0 + k[550]*y_cur[IDX_NII]; + data[jistart + 16644] = 0.0 + k[556]*y_cur[IDX_NII]; + data[jistart + 16645] = 0.0 - k[5221]*y_cur[IDX_NI]; + data[jistart + 16646] = 0.0 - k[5249]*y_cur[IDX_NI]; + data[jistart + 16647] = 0.0 - k[5244]*y_cur[IDX_NI]; + data[jistart + 16648] = 0.0 - k[5250]*y_cur[IDX_NI]; + data[jistart + 16649] = 0.0 - k[5248]*y_cur[IDX_NI]; + data[jistart + 16650] = 0.0 + k[559]*y_cur[IDX_NII] + k[3499]*y_cur[IDX_NHII] + + k[3605]*y_cur[IDX_C2II] + k[3610]*y_cur[IDX_COII] + + k[3611]*y_cur[IDX_H2COII] + k[3612]*y_cur[IDX_H2OII] + + k[3617]*y_cur[IDX_NH2II] + k[3618]*y_cur[IDX_NH3II] + + k[4973]*y_cur[IDX_CI] + k[5184]*y_cur[IDX_HI] - + k[5274]*y_cur[IDX_NI] + k[5305]*y_cur[IDX_CNI] + + k[5310]*y_cur[IDX_NHI] + k[5310]*y_cur[IDX_NHI] + + k[5320]*y_cur[IDX_OI] + k[5321]*y_cur[IDX_OHI] + + k[5324]*y_cur[IDX_SI] + k[5888] + k[6224]; + data[jistart + 16651] = 0.0 - k[5238]*y_cur[IDX_NI]; + data[jistart + 16652] = 0.0 - k[5242]*y_cur[IDX_NI]; + data[jistart + 16653] = 0.0 + k[4678]*y_cur[IDX_NII]; + data[jistart + 16654] = 0.0 - k[5235]*y_cur[IDX_NI]; + data[jistart + 16655] = 0.0 - k[5290]*y_cur[IDX_NI] - k[5291]*y_cur[IDX_NI]; + data[jistart + 16656] = 0.0 - k[5246]*y_cur[IDX_NI]; + data[jistart + 16657] = 0.0 - k[3391]*y_cur[IDX_NI]; + data[jistart + 16658] = 0.0 + k[1153]*y_cur[IDX_eM] + k[1154]*y_cur[IDX_eM] + + k[6397]*y_cur[IDX_GRAINM]; + data[jistart + 16659] = 0.0 - k[5256]*y_cur[IDX_NI]; + data[jistart + 16660] = 0.0 - k[3468]*y_cur[IDX_NI]; + data[jistart + 16661] = 0.0 - k[3453]*y_cur[IDX_NI]; + data[jistart + 16662] = 0.0 - k[5243]*y_cur[IDX_NI]; + data[jistart + 16663] = 0.0 - k[5240]*y_cur[IDX_NI]; + data[jistart + 16664] = 0.0 - k[3459]*y_cur[IDX_NI]; + data[jistart + 16665] = 0.0 + k[292]*y_cur[IDX_CHI] + k[542]*y_cur[IDX_C2I] + + k[543]*y_cur[IDX_C2HI] + k[544]*y_cur[IDX_CH2I] + + k[545]*y_cur[IDX_CH3OHI] + k[546]*y_cur[IDX_CH4I] + + k[547]*y_cur[IDX_CNI] + k[548]*y_cur[IDX_CO2I] + + k[549]*y_cur[IDX_COI] + k[550]*y_cur[IDX_FeI] + + k[551]*y_cur[IDX_H2COI] + k[552]*y_cur[IDX_H2OI] + + k[553]*y_cur[IDX_H2SI] + k[554]*y_cur[IDX_HCNI] + + k[555]*y_cur[IDX_HCOI] + k[556]*y_cur[IDX_MgI] + + k[557]*y_cur[IDX_NH2I] + k[558]*y_cur[IDX_NH3I] + + k[559]*y_cur[IDX_NHI] + k[560]*y_cur[IDX_NOI] + + k[561]*y_cur[IDX_O2I] + k[562]*y_cur[IDX_OCSI] + + k[563]*y_cur[IDX_OHI] + k[3340]*y_cur[IDX_CH4I] + + k[3352]*y_cur[IDX_NCCNI] + k[3360]*y_cur[IDX_OCSI] + + k[3908]*y_cur[IDX_CM] + k[3943]*y_cur[IDX_C10M] + + k[3978]*y_cur[IDX_C10HM] + k[4013]*y_cur[IDX_C2M] + + k[4048]*y_cur[IDX_C2HM] + k[4083]*y_cur[IDX_C3M] + + k[4118]*y_cur[IDX_C3HM] + k[4153]*y_cur[IDX_C3NM] + + k[4188]*y_cur[IDX_C4M] + k[4223]*y_cur[IDX_C4HM] + + k[4258]*y_cur[IDX_C5M] + k[4293]*y_cur[IDX_C5HM] + + k[4328]*y_cur[IDX_C5NM] + k[4363]*y_cur[IDX_C6M] + + k[4398]*y_cur[IDX_C6HM] + k[4433]*y_cur[IDX_C7M] + + k[4468]*y_cur[IDX_C7HM] + k[4503]*y_cur[IDX_C8M] + + k[4538]*y_cur[IDX_C8HM] + k[4573]*y_cur[IDX_C9M] + + k[4608]*y_cur[IDX_C9HM] + k[4643]*y_cur[IDX_CHM] + + k[4678]*y_cur[IDX_CNM] + k[4714]*y_cur[IDX_HM] + + k[4749]*y_cur[IDX_OM] + k[4784]*y_cur[IDX_O2M] + + k[4819]*y_cur[IDX_OHM] + k[4854]*y_cur[IDX_SM] - + k[5581]*y_cur[IDX_NI] + k[5621]*y_cur[IDX_eM] + + k[6319]*y_cur[IDX_GRAINM]; + data[jistart + 16666] = 0.0 - k[5233]*y_cur[IDX_NI]; + data[jistart + 16667] = 0.0 + k[3611]*y_cur[IDX_NHI]; + data[jistart + 16668] = 0.0 - k[5231]*y_cur[IDX_NI]; + data[jistart + 16669] = 0.0 - k[5236]*y_cur[IDX_NI]; + data[jistart + 16670] = 0.0 + k[1168]*y_cur[IDX_eM] + k[6407]*y_cur[IDX_GRAINM]; + data[jistart + 16671] = 0.0 + k[3644]*y_cur[IDX_HCNI] + k[3647]*y_cur[IDX_N2I]; + data[jistart + 16672] = 0.0 - k[3405]*y_cur[IDX_NI] - k[3406]*y_cur[IDX_NI] - + k[3407]*y_cur[IDX_NI]; + data[jistart + 16673] = 0.0 + k[544]*y_cur[IDX_NII] + k[2011]*y_cur[IDX_NHII] + + k[5003]*y_cur[IDX_NOI] - k[5253]*y_cur[IDX_NI] - + k[5254]*y_cur[IDX_NI] - k[5255]*y_cur[IDX_NI]; + data[jistart + 16674] = 0.0 + k[3262]*y_cur[IDX_HeII] + k[3495]*y_cur[IDX_NHII]; + data[jistart + 16675] = 0.0 + k[3618]*y_cur[IDX_NHI]; + data[jistart + 16676] = 0.0 - k[5225]*y_cur[IDX_NI]; + data[jistart + 16677] = 0.0 - k[5223]*y_cur[IDX_NI] - k[5224]*y_cur[IDX_NI]; + data[jistart + 16678] = 0.0 + k[3274]*y_cur[IDX_HeII] + k[3496]*y_cur[IDX_NHII] + + k[3647]*y_cur[IDX_OII] + k[4967]*y_cur[IDX_CI] + + k[5079]*y_cur[IDX_CHI] + k[5417]*y_cur[IDX_OI] + k[5878] + k[5878] + + k[6211] + k[6211]; + data[jistart + 16679] = 0.0 + k[561]*y_cur[IDX_NII] + k[3502]*y_cur[IDX_NHII] - + k[5281]*y_cur[IDX_NI]; + data[jistart + 16680] = 0.0 + k[553]*y_cur[IDX_NII]; + data[jistart + 16681] = 0.0 + k[5493]*y_cur[IDX_NOI]; + data[jistart + 16682] = 0.0 - k[3390]*y_cur[IDX_NI]; + data[jistart + 16683] = 0.0 + k[560]*y_cur[IDX_NII] + k[2274]*y_cur[IDX_CNII] + + k[3286]*y_cur[IDX_HeII] + k[4975]*y_cur[IDX_CI] + + k[5003]*y_cur[IDX_CH2I] + k[5084]*y_cur[IDX_CHI] + + k[5122]*y_cur[IDX_CNI] + k[5187]*y_cur[IDX_HI] - + k[5279]*y_cur[IDX_NI] + k[5334]*y_cur[IDX_SI] + + k[5424]*y_cur[IDX_OI] + k[5493]*y_cur[IDX_SiI] + k[5892] + k[6229]; + data[jistart + 16684] = 0.0 + k[555]*y_cur[IDX_NII] + k[3494]*y_cur[IDX_NHII] - + k[5265]*y_cur[IDX_NI] - k[5266]*y_cur[IDX_NI] - + k[5267]*y_cur[IDX_NI]; + data[jistart + 16685] = 0.0 + k[546]*y_cur[IDX_NII] + k[3340]*y_cur[IDX_NII]; + data[jistart + 16686] = 0.0 + k[543]*y_cur[IDX_NII] + k[3480]*y_cur[IDX_NHII] - + k[5228]*y_cur[IDX_NI]; + data[jistart + 16687] = 0.0 + k[551]*y_cur[IDX_NII] + k[3487]*y_cur[IDX_NHII]; + data[jistart + 16688] = 0.0 + k[554]*y_cur[IDX_NII] + k[3247]*y_cur[IDX_HeII] + + k[3248]*y_cur[IDX_HeII] + k[3493]*y_cur[IDX_NHII] + + k[3644]*y_cur[IDX_OII]; + data[jistart + 16689] = 0.0 + k[292]*y_cur[IDX_NII] + k[2258]*y_cur[IDX_NHII] + + k[5079]*y_cur[IDX_N2I] - k[5080]*y_cur[IDX_NI] - + k[5081]*y_cur[IDX_NI] + k[5084]*y_cur[IDX_NOI]; + data[jistart + 16690] = 0.0 + k[3505]*y_cur[IDX_NHII] + k[5324]*y_cur[IDX_NHI] + + k[5334]*y_cur[IDX_NOI]; + data[jistart + 16691] = 0.0 + k[542]*y_cur[IDX_NII] + k[3477]*y_cur[IDX_NHII] - + k[5222]*y_cur[IDX_NI]; + data[jistart + 16692] = 0.0 + k[563]*y_cur[IDX_NII] + k[3504]*y_cur[IDX_NHII] - + k[5283]*y_cur[IDX_NI] - k[5284]*y_cur[IDX_NI] + + k[5321]*y_cur[IDX_NHI]; + data[jistart + 16693] = 0.0 + k[558]*y_cur[IDX_NII] + k[3498]*y_cur[IDX_NHII]; + data[jistart + 16694] = 0.0 - k[3387]*y_cur[IDX_NI] - k[3388]*y_cur[IDX_NI] - + k[3389]*y_cur[IDX_NI]; + data[jistart + 16695] = 0.0 - k[3454]*y_cur[IDX_NI]; + data[jistart + 16696] = 0.0 + k[547]*y_cur[IDX_NII] + k[3204]*y_cur[IDX_HeII] + + k[3481]*y_cur[IDX_NHII] + k[3509]*y_cur[IDX_NH2II] + + k[4956]*y_cur[IDX_CI] + k[5122]*y_cur[IDX_NOI] - + k[5260]*y_cur[IDX_NI] - k[5261]*y_cur[IDX_NI] + + k[5305]*y_cur[IDX_NHI] + k[5386]*y_cur[IDX_OI] + + k[5387]*y_cur[IDX_OI] + k[5823] + k[6134]; + data[jistart + 16697] = 0.0 - k[5257]*y_cur[IDX_NI] - k[5258]*y_cur[IDX_NI] - + k[5259]*y_cur[IDX_NI]; + data[jistart + 16698] = 0.0 - k[5]*y_cur[IDX_CM] - k[77]*y_cur[IDX_HM] - + k[110]*y_cur[IDX_C2M] - k[111]*y_cur[IDX_C2HM] - + k[112]*y_cur[IDX_C3M] - k[113]*y_cur[IDX_C3HM] - + k[114]*y_cur[IDX_C4M] - k[115]*y_cur[IDX_C4HM] - + k[116]*y_cur[IDX_C5M] - k[117]*y_cur[IDX_C5HM] - + k[118]*y_cur[IDX_C7M] - k[119]*y_cur[IDX_C7HM] - + k[120]*y_cur[IDX_C9M] - k[121]*y_cur[IDX_C9HM] - + k[122]*y_cur[IDX_OM] - k[123]*y_cur[IDX_SM] - k[573]*y_cur[IDX_N2II] + - k[1961]*y_cur[IDX_CHII] - k[2392]*y_cur[IDX_H2II] - + k[3377]*y_cur[IDX_C10M] - k[3378]*y_cur[IDX_C10M] - + k[3379]*y_cur[IDX_C10M] - k[3380]*y_cur[IDX_C10M] - + k[3381]*y_cur[IDX_C10HM] - k[3382]*y_cur[IDX_C10HM] - + k[3383]*y_cur[IDX_C2II] - k[3384]*y_cur[IDX_C2M] - + k[3385]*y_cur[IDX_C2HII] - k[3386]*y_cur[IDX_C2HII] - + k[3387]*y_cur[IDX_C2H2II] - k[3388]*y_cur[IDX_C2H2II] - + k[3389]*y_cur[IDX_C2H2II] - k[3390]*y_cur[IDX_C2H3II] - + k[3391]*y_cur[IDX_C2H4II] - k[3392]*y_cur[IDX_C3M] - + k[3393]*y_cur[IDX_C3M] - k[3394]*y_cur[IDX_C3HII] - + k[3395]*y_cur[IDX_C3HM] - k[3396]*y_cur[IDX_C3HM] - + k[3397]*y_cur[IDX_C3H2II] - k[3398]*y_cur[IDX_C3H2II] - + k[3399]*y_cur[IDX_C3H4II] - k[3400]*y_cur[IDX_C3H5II] - + k[3401]*y_cur[IDX_C3H5II] - k[3402]*y_cur[IDX_C4M] - + k[3403]*y_cur[IDX_C4M] - k[3404]*y_cur[IDX_C4HM] - + k[3405]*y_cur[IDX_C4H2II] - k[3406]*y_cur[IDX_C4H2II] - + k[3407]*y_cur[IDX_C4H2II] - k[3408]*y_cur[IDX_C4H5II] - + k[3409]*y_cur[IDX_C5M] - k[3410]*y_cur[IDX_C5M] - + k[3411]*y_cur[IDX_C5M] - k[3412]*y_cur[IDX_C5HII] - + k[3413]*y_cur[IDX_C5HM] - k[3414]*y_cur[IDX_C5HM] - + k[3415]*y_cur[IDX_C5H2II] - k[3416]*y_cur[IDX_C5H3II] - + k[3417]*y_cur[IDX_C5H5II] - k[3418]*y_cur[IDX_C6M] - + k[3419]*y_cur[IDX_C6M] - k[3420]*y_cur[IDX_C6M] - + k[3421]*y_cur[IDX_C6HM] - k[3422]*y_cur[IDX_C6HM] - + k[3423]*y_cur[IDX_C6H2II] - k[3424]*y_cur[IDX_C6H5II] - + k[3425]*y_cur[IDX_C7M] - k[3426]*y_cur[IDX_C7M] - + k[3427]*y_cur[IDX_C7M] - k[3428]*y_cur[IDX_C7M] - + k[3429]*y_cur[IDX_C7HII] - k[3430]*y_cur[IDX_C7HM] - + k[3431]*y_cur[IDX_C7HM] - k[3432]*y_cur[IDX_C7H2II] - + k[3433]*y_cur[IDX_C7H3II] - k[3434]*y_cur[IDX_C7H4II] - + k[3435]*y_cur[IDX_C7H5II] - k[3436]*y_cur[IDX_C8M] - + k[3437]*y_cur[IDX_C8M] - k[3438]*y_cur[IDX_C8M] - + k[3439]*y_cur[IDX_C8M] - k[3440]*y_cur[IDX_C8HM] - + k[3441]*y_cur[IDX_C8HM] - k[3442]*y_cur[IDX_C9M] - + k[3443]*y_cur[IDX_C9M] - k[3444]*y_cur[IDX_C9M] - + k[3445]*y_cur[IDX_C9M] - k[3446]*y_cur[IDX_C9HII] - + k[3447]*y_cur[IDX_C9HM] - k[3448]*y_cur[IDX_C9HM] - + k[3449]*y_cur[IDX_C9H2II] - k[3450]*y_cur[IDX_C9H3II] - + k[3451]*y_cur[IDX_C9H4II] - k[3452]*y_cur[IDX_CH2II] - + k[3453]*y_cur[IDX_CH2CCHII] - k[3454]*y_cur[IDX_CH3II] - + k[3455]*y_cur[IDX_CH3C4HII] - k[3456]*y_cur[IDX_CNII] - + k[3457]*y_cur[IDX_H2OII] - k[3458]*y_cur[IDX_H2OII] - + k[3459]*y_cur[IDX_H2SII] - k[3460]*y_cur[IDX_HC3NII] - + k[3461]*y_cur[IDX_HC3NII] - k[3462]*y_cur[IDX_HSII] - + k[3463]*y_cur[IDX_NHII] - k[3464]*y_cur[IDX_NH2II] - + k[3465]*y_cur[IDX_O2II] - k[3466]*y_cur[IDX_O2HII] - + k[3467]*y_cur[IDX_OHII] - k[3468]*y_cur[IDX_SOII] - + k[3469]*y_cur[IDX_SiCII] - k[3470]*y_cur[IDX_SiCH2II] - + k[3471]*y_cur[IDX_SiHII] - k[3472]*y_cur[IDX_SiH2II] - + k[3473]*y_cur[IDX_SiH3II] - k[3474]*y_cur[IDX_SiH3II] - + k[3475]*y_cur[IDX_SiOII] - k[3476]*y_cur[IDX_SiOII] - + k[5080]*y_cur[IDX_CHI] - k[5081]*y_cur[IDX_CHI] - + k[5141]*y_cur[IDX_H2I] - k[5221]*y_cur[IDX_C10I] - + k[5222]*y_cur[IDX_C2I] - k[5223]*y_cur[IDX_C2H3I] - + k[5224]*y_cur[IDX_C2H3I] - k[5225]*y_cur[IDX_C2H4I] - + k[5226]*y_cur[IDX_C2H5I] - k[5227]*y_cur[IDX_C2H5I] - + k[5228]*y_cur[IDX_C2HI] - k[5229]*y_cur[IDX_C2NI] - + k[5230]*y_cur[IDX_C2OI] - k[5231]*y_cur[IDX_C3I] - + k[5232]*y_cur[IDX_C3H2I] - k[5233]*y_cur[IDX_C3HI] - + k[5234]*y_cur[IDX_C3NI] - k[5235]*y_cur[IDX_C4I] - + k[5236]*y_cur[IDX_C4HI] - k[5237]*y_cur[IDX_C4NI] - + k[5238]*y_cur[IDX_C5I] - k[5239]*y_cur[IDX_C5H2I] - + k[5240]*y_cur[IDX_C5HI] - k[5241]*y_cur[IDX_C5NI] - + k[5242]*y_cur[IDX_C6I] - k[5243]*y_cur[IDX_C6HI] - + k[5244]*y_cur[IDX_C7I] - k[5245]*y_cur[IDX_C7H2I] - + k[5246]*y_cur[IDX_C7HI] - k[5247]*y_cur[IDX_C7NI] - + k[5248]*y_cur[IDX_C8I] - k[5249]*y_cur[IDX_C8HI] - + k[5250]*y_cur[IDX_C9I] - k[5251]*y_cur[IDX_C9HI] - + k[5252]*y_cur[IDX_C9NI] - k[5253]*y_cur[IDX_CH2I] - + k[5254]*y_cur[IDX_CH2I] - k[5255]*y_cur[IDX_CH2I] - + k[5256]*y_cur[IDX_CH2CCHI] - k[5257]*y_cur[IDX_CH3I] - + k[5258]*y_cur[IDX_CH3I] - k[5259]*y_cur[IDX_CH3I] - + k[5260]*y_cur[IDX_CNI] - k[5261]*y_cur[IDX_CNI] - + k[5262]*y_cur[IDX_CO2I] - k[5263]*y_cur[IDX_CSI] - + k[5264]*y_cur[IDX_H2CNI] - k[5265]*y_cur[IDX_HCOI] - + k[5266]*y_cur[IDX_HCOI] - k[5267]*y_cur[IDX_HCOI] - + k[5268]*y_cur[IDX_HCSI] - k[5269]*y_cur[IDX_HNOI] - + k[5270]*y_cur[IDX_HNOI] - k[5271]*y_cur[IDX_HSI] - + k[5272]*y_cur[IDX_HSI] - k[5273]*y_cur[IDX_NCCNI] - + k[5274]*y_cur[IDX_NHI] - k[5275]*y_cur[IDX_NO2I] - + k[5276]*y_cur[IDX_NO2I] - k[5277]*y_cur[IDX_NO2I] - + k[5278]*y_cur[IDX_NO2I] - k[5279]*y_cur[IDX_NOI] - + k[5280]*y_cur[IDX_NSI] - k[5281]*y_cur[IDX_O2I] - + k[5282]*y_cur[IDX_O2HI] - k[5283]*y_cur[IDX_OHI] - + k[5284]*y_cur[IDX_OHI] - k[5285]*y_cur[IDX_PHI] - + k[5286]*y_cur[IDX_PNI] - k[5287]*y_cur[IDX_POI] - + k[5288]*y_cur[IDX_POI] - k[5289]*y_cur[IDX_S2I] - + k[5290]*y_cur[IDX_SOI] - k[5291]*y_cur[IDX_SOI] - + k[5292]*y_cur[IDX_SiCI] - k[5293]*y_cur[IDX_SiCI] - + k[5294]*y_cur[IDX_SiH2I] - k[5295]*y_cur[IDX_SiH3I] - + k[5296]*y_cur[IDX_SiHI] - k[5504]*y_cur[IDX_CII] - + k[5524]*y_cur[IDX_CI] - k[5581]*y_cur[IDX_NII] - k[5684] - k[5880] - + k[6300] - k[6894]; + data[jistart + 16699] = 0.0 + k[3503]*y_cur[IDX_NHII] + k[3744]*y_cur[IDX_N2II] + + k[3752]*y_cur[IDX_PNII] + k[3761]*y_cur[IDX_SiNII] + + k[5320]*y_cur[IDX_NHI] + k[5386]*y_cur[IDX_CNI] + + k[5387]*y_cur[IDX_CNI] + k[5417]*y_cur[IDX_N2I] + + k[5424]*y_cur[IDX_NOI] + k[5426]*y_cur[IDX_NSI] + + k[5451]*y_cur[IDX_SiNI]; + data[jistart + 16700] = 0.0 + k[3166]*y_cur[IDX_CH2CHCNI] + k[3204]*y_cur[IDX_CNI] + + k[3235]*y_cur[IDX_HC3NI] + k[3247]*y_cur[IDX_HCNI] + + k[3248]*y_cur[IDX_HCNI] + k[3262]*y_cur[IDX_HNCI] + + k[3274]*y_cur[IDX_N2I] + k[3277]*y_cur[IDX_N2OI] + + k[3286]*y_cur[IDX_NOI] + k[3288]*y_cur[IDX_NSI] + + k[3300]*y_cur[IDX_PNI] + k[3329]*y_cur[IDX_SiNI]; + data[jistart + 16701] = 0.0 + k[1421]*y_cur[IDX_NSI] + k[1446]*y_cur[IDX_SiNI] - + k[5504]*y_cur[IDX_NI]; + data[jistart + 16702] = 0.0 + k[552]*y_cur[IDX_NII] + k[3489]*y_cur[IDX_NHII]; + data[jistart + 16703] = 0.0 + k[1910]*y_cur[IDX_NHII] + k[4956]*y_cur[IDX_CNI] + + k[4967]*y_cur[IDX_N2I] + k[4973]*y_cur[IDX_NHI] + + k[4975]*y_cur[IDX_NOI] + k[4976]*y_cur[IDX_NSI] - + k[5524]*y_cur[IDX_NI]; + data[jistart + 16704] = 0.0 + k[549]*y_cur[IDX_NII] + k[3485]*y_cur[IDX_NHII]; + data[jistart + 16705] = 0.0 + k[6319]*y_cur[IDX_NII] + k[6320]*y_cur[IDX_NHII] + + k[6324]*y_cur[IDX_NH2II] + k[6359]*y_cur[IDX_CNII] + + k[6375]*y_cur[IDX_N2II] + k[6375]*y_cur[IDX_N2II] + + k[6397]*y_cur[IDX_N2HII] + k[6407]*y_cur[IDX_NOII] + + k[6466]*y_cur[IDX_C2NII] + k[6468]*y_cur[IDX_CNCII] + + k[6495]*y_cur[IDX_OCNII] + k[6501]*y_cur[IDX_SiNII] + + k[6529]*y_cur[IDX_N2OII] + k[6530]*y_cur[IDX_N2OII] + + k[6530]*y_cur[IDX_N2OII] + k[6560]*y_cur[IDX_PNII] + + k[6572]*y_cur[IDX_HPNII] + k[6581]*y_cur[IDX_NSII] + + k[6635]*y_cur[IDX_C2N2II]; + data[jistart + 16706] = 0.0 + k[2461]*y_cur[IDX_NHII] - k[5141]*y_cur[IDX_NI]; + data[jistart + 16707] = 0.0 + k[780]*y_cur[IDX_C2NII] + k[782]*y_cur[IDX_C2N2II] + + k[977]*y_cur[IDX_CNII] + k[978]*y_cur[IDX_CNCII] + + k[1133]*y_cur[IDX_HPNII] + k[1150]*y_cur[IDX_N2II] + + k[1150]*y_cur[IDX_N2II] + k[1153]*y_cur[IDX_N2HII] + + k[1154]*y_cur[IDX_N2HII] + k[1158]*y_cur[IDX_NHII] + + k[1159]*y_cur[IDX_NH2II] + k[1168]*y_cur[IDX_NOII] + + k[1171]*y_cur[IDX_N2OII] + k[1172]*y_cur[IDX_N2OII] + + k[1172]*y_cur[IDX_N2OII] + k[1173]*y_cur[IDX_NSII] + + k[1176]*y_cur[IDX_OCNII] + k[1211]*y_cur[IDX_PNII] + + k[1260]*y_cur[IDX_SiNII] + k[5621]*y_cur[IDX_NII]; + data[jistart + 16708] = 0.0 + k[5184]*y_cur[IDX_NHI] + k[5187]*y_cur[IDX_NOI] + + k[5188]*y_cur[IDX_NSI]; + data[jistart + 16709] = 0.0 + k[2543]*y_cur[IDX_H2OI]; + data[jistart + 16710] = 0.0 + k[2555]*y_cur[IDX_H2OI]; + data[jistart + 16711] = 0.0 + k[2572]*y_cur[IDX_H2OI]; + data[jistart + 16712] = 0.0 - k[5651]*y_cur[IDX_H3OII]; + data[jistart + 16713] = 0.0 + k[2573]*y_cur[IDX_H2OI]; + data[jistart + 16714] = 0.0 - k[2800]*y_cur[IDX_H3OII]; + data[jistart + 16715] = 0.0 + k[2551]*y_cur[IDX_H2OI]; + data[jistart + 16716] = 0.0 + k[2552]*y_cur[IDX_H2OI]; + data[jistart + 16717] = 0.0 + k[2570]*y_cur[IDX_H2OI]; + data[jistart + 16718] = 0.0 - k[5657]*y_cur[IDX_H3OII]; + data[jistart + 16719] = 0.0 - k[2802]*y_cur[IDX_H3OII]; + data[jistart + 16720] = 0.0 - k[2825]*y_cur[IDX_H3OII]; + data[jistart + 16721] = 0.0 + k[2549]*y_cur[IDX_H2OI]; + data[jistart + 16722] = 0.0 - k[2811]*y_cur[IDX_H3OII]; + data[jistart + 16723] = 0.0 + k[2553]*y_cur[IDX_H2OI]; + data[jistart + 16724] = 0.0 - k[5663]*y_cur[IDX_H3OII]; + data[jistart + 16725] = 0.0 - k[2822]*y_cur[IDX_H3OII]; + data[jistart + 16726] = 0.0 - k[2788]*y_cur[IDX_H3OII]; + data[jistart + 16727] = 0.0 - k[2812]*y_cur[IDX_H3OII]; + data[jistart + 16728] = 0.0 - k[2813]*y_cur[IDX_H3OII]; + data[jistart + 16729] = 0.0 - k[2807]*y_cur[IDX_H3OII]; + data[jistart + 16730] = 0.0 + k[2560]*y_cur[IDX_H2OI]; + data[jistart + 16731] = 0.0 - k[2816]*y_cur[IDX_H3OII]; + data[jistart + 16732] = 0.0 - k[2820]*y_cur[IDX_H3OII]; + data[jistart + 16733] = 0.0 - k[2781]*y_cur[IDX_H3OII]; + data[jistart + 16734] = 0.0 - k[2808]*y_cur[IDX_H3OII]; + data[jistart + 16735] = 0.0 - k[2776]*y_cur[IDX_H3OII]; + data[jistart + 16736] = 0.0 - k[5669]*y_cur[IDX_H3OII]; + data[jistart + 16737] = 0.0 - k[2794]*y_cur[IDX_H3OII]; + data[jistart + 16738] = 0.0 + k[2568]*y_cur[IDX_H2OI]; + data[jistart + 16739] = 0.0 - k[2817]*y_cur[IDX_H3OII]; + data[jistart + 16740] = 0.0 - k[2777]*y_cur[IDX_H3OII]; + data[jistart + 16741] = 0.0 - k[2787]*y_cur[IDX_H3OII]; + data[jistart + 16742] = 0.0 - k[5629]*y_cur[IDX_H3OII]; + data[jistart + 16743] = 0.0 - k[2803]*y_cur[IDX_H3OII]; + data[jistart + 16744] = 0.0 - k[2809]*y_cur[IDX_H3OII]; + data[jistart + 16745] = 0.0 - k[2819]*y_cur[IDX_H3OII]; + data[jistart + 16746] = 0.0 + k[2534]*y_cur[IDX_H2OI]; + data[jistart + 16747] = 0.0 - k[2769]*y_cur[IDX_H3OII]; + data[jistart + 16748] = 0.0 - k[5635]*y_cur[IDX_H3OII]; + data[jistart + 16749] = 0.0 - k[2823]*y_cur[IDX_H3OII]; + data[jistart + 16750] = 0.0 - k[2775]*y_cur[IDX_H3OII]; + data[jistart + 16751] = 0.0 - k[2783]*y_cur[IDX_H3OII]; + data[jistart + 16752] = 0.0 + k[2699]*y_cur[IDX_H3II]; + data[jistart + 16753] = 0.0 - k[2784]*y_cur[IDX_H3OII]; + data[jistart + 16754] = 0.0 - k[2796]*y_cur[IDX_H3OII]; + data[jistart + 16755] = 0.0 - k[2821]*y_cur[IDX_H3OII]; + data[jistart + 16756] = 0.0 - k[2768]*y_cur[IDX_H3OII]; + data[jistart + 16757] = 0.0 - k[2786]*y_cur[IDX_H3OII]; + data[jistart + 16758] = 0.0 - k[3028]*y_cur[IDX_H3OII]; + data[jistart + 16759] = 0.0 + k[2571]*y_cur[IDX_H2OI]; + data[jistart + 16760] = 0.0 - k[2793]*y_cur[IDX_H3OII]; + data[jistart + 16761] = 0.0 - k[2824]*y_cur[IDX_H3OII]; + data[jistart + 16762] = 0.0 + k[2566]*y_cur[IDX_H2OI]; + data[jistart + 16763] = 0.0 + k[2548]*y_cur[IDX_H2OI]; + data[jistart + 16764] = 0.0 + k[2657]*y_cur[IDX_H3II] - k[2791]*y_cur[IDX_H3OII]; + data[jistart + 16765] = 0.0 - k[2792]*y_cur[IDX_H3OII]; + data[jistart + 16766] = 0.0 + k[2561]*y_cur[IDX_H2OI]; + data[jistart + 16767] = 0.0 + k[2142]*y_cur[IDX_H2OI]; + data[jistart + 16768] = 0.0 + k[2550]*y_cur[IDX_H2OI]; + data[jistart + 16769] = 0.0 - k[2798]*y_cur[IDX_H3OII]; + data[jistart + 16770] = 0.0 + k[2524]*y_cur[IDX_H2OI]; + data[jistart + 16771] = 0.0 + k[2506]*y_cur[IDX_H2OII] + k[3772]*y_cur[IDX_OHII]; + data[jistart + 16772] = 0.0 - k[2772]*y_cur[IDX_H3OII]; + data[jistart + 16773] = 0.0 + k[2546]*y_cur[IDX_H2OI]; + data[jistart + 16774] = 0.0 - k[2790]*y_cur[IDX_H3OII]; + data[jistart + 16775] = 0.0 + k[2554]*y_cur[IDX_H2OI]; + data[jistart + 16776] = 0.0 + k[3489]*y_cur[IDX_H2OI]; + data[jistart + 16777] = 0.0 - k[4776]*y_cur[IDX_H3OII]; + data[jistart + 16778] = 0.0 - k[4635]*y_cur[IDX_H3OII]; + data[jistart + 16779] = 0.0 + k[2386]*y_cur[IDX_H2OI]; + data[jistart + 16780] = 0.0 + k[3512]*y_cur[IDX_H2OI]; + data[jistart + 16781] = 0.0 - k[2815]*y_cur[IDX_H3OII]; + data[jistart + 16782] = 0.0 - k[4846]*y_cur[IDX_H3OII]; + data[jistart + 16783] = 0.0 - k[4040]*y_cur[IDX_H3OII]; + data[jistart + 16784] = 0.0 - k[4215]*y_cur[IDX_H3OII]; + data[jistart + 16785] = 0.0 - k[2789]*y_cur[IDX_H3OII]; + data[jistart + 16786] = 0.0 + k[2226]*y_cur[IDX_H2OI] + k[3729]*y_cur[IDX_OI]; + data[jistart + 16787] = 0.0 - k[4811]*y_cur[IDX_H3OII]; + data[jistart + 16788] = 0.0 - k[3970]*y_cur[IDX_H3OII]; + data[jistart + 16789] = 0.0 - k[4110]*y_cur[IDX_H3OII]; + data[jistart + 16790] = 0.0 - k[2782]*y_cur[IDX_H3OII]; + data[jistart + 16791] = 0.0 - k[4390]*y_cur[IDX_H3OII]; + data[jistart + 16792] = 0.0 - k[4530]*y_cur[IDX_H3OII]; + data[jistart + 16793] = 0.0 - k[4460]*y_cur[IDX_H3OII]; + data[jistart + 16794] = 0.0 - k[4600]*y_cur[IDX_H3OII]; + data[jistart + 16795] = 0.0 - k[3935]*y_cur[IDX_H3OII]; + data[jistart + 16796] = 0.0 - k[4285]*y_cur[IDX_H3OII]; + data[jistart + 16797] = 0.0 - k[4320]*y_cur[IDX_H3OII]; + data[jistart + 16798] = 0.0 - k[3900]*y_cur[IDX_H3OII]; + data[jistart + 16799] = 0.0 - k[2797]*y_cur[IDX_H3OII]; + data[jistart + 16800] = 0.0 - k[4741]*y_cur[IDX_H3OII]; + data[jistart + 16801] = 0.0 - k[4565]*y_cur[IDX_H3OII]; + data[jistart + 16802] = 0.0 - k[2795]*y_cur[IDX_H3OII]; + data[jistart + 16803] = 0.0 - k[4706]*y_cur[IDX_H3OII]; + data[jistart + 16804] = 0.0 - k[2804]*y_cur[IDX_H3OII]; + data[jistart + 16805] = 0.0 - k[4495]*y_cur[IDX_H3OII]; + data[jistart + 16806] = 0.0 - k[4005]*y_cur[IDX_H3OII]; + data[jistart + 16807] = 0.0 - k[2770]*y_cur[IDX_H3OII]; + data[jistart + 16808] = 0.0 - k[4075]*y_cur[IDX_H3OII]; + data[jistart + 16809] = 0.0 - k[4180]*y_cur[IDX_H3OII]; + data[jistart + 16810] = 0.0 - k[4355]*y_cur[IDX_H3OII]; + data[jistart + 16811] = 0.0 + k[2545]*y_cur[IDX_H2OI]; + data[jistart + 16812] = 0.0 - k[4250]*y_cur[IDX_H3OII]; + data[jistart + 16813] = 0.0 - k[4425]*y_cur[IDX_H3OII]; + data[jistart + 16814] = 0.0 - k[3538]*y_cur[IDX_H3OII]; + data[jistart + 16815] = 0.0 - k[2779]*y_cur[IDX_H3OII]; + data[jistart + 16816] = 0.0 + k[2210]*y_cur[IDX_CH4I] + k[3772]*y_cur[IDX_C2H6I] + k[3779]*y_cur[IDX_H2OI]; - data[jistart + 12848] = 0.0 + k[108]*y_cur[IDX_HI] + - k[3795]*y_cur[IDX_HCNI] + k[4811]*y_cur[IDX_H3OII]; - data[jistart + 12849] = 0.0 - k[2562]*y_cur[IDX_H2OI] - - k[2563]*y_cur[IDX_H2OI]; - data[jistart + 12850] = 0.0 - k[2564]*y_cur[IDX_H2OI] - - k[2565]*y_cur[IDX_H2OI] - k[2566]*y_cur[IDX_H2OI]; - data[jistart + 12851] = 0.0 + k[2130]*y_cur[IDX_CH3OHI] - - k[2567]*y_cur[IDX_H2OI] - k[2568]*y_cur[IDX_H2OI] + - k[3673]*y_cur[IDX_O2I]; - data[jistart + 12852] = 0.0 + k[2816]*y_cur[IDX_H3OII]; - data[jistart + 12853] = 0.0 + k[476]*y_cur[IDX_H2OII]; - data[jistart + 12854] = 0.0 + k[4846]*y_cur[IDX_H3OII]; - data[jistart + 12855] = 0.0 + k[2817]*y_cur[IDX_H3OII]; - data[jistart + 12856] = 0.0 + k[2582]*y_cur[IDX_H2SI]; - data[jistart + 12857] = 0.0 + k[477]*y_cur[IDX_H2OII] + - k[2818]*y_cur[IDX_H3OII]; - data[jistart + 12858] = 0.0 - k[2569]*y_cur[IDX_H2OI]; - data[jistart + 12859] = 0.0 + k[2821]*y_cur[IDX_H3OII]; - data[jistart + 12860] = 0.0 + k[2819]*y_cur[IDX_H3OII]; - data[jistart + 12861] = 0.0 + k[2820]*y_cur[IDX_H3OII]; - data[jistart + 12862] = 0.0 + k[2822]*y_cur[IDX_H3OII]; - data[jistart + 12863] = 0.0 - k[2570]*y_cur[IDX_H2OI]; - data[jistart + 12864] = 0.0 + k[2824]*y_cur[IDX_H3OII]; - data[jistart + 12865] = 0.0 - k[2571]*y_cur[IDX_H2OI]; - data[jistart + 12866] = 0.0 + k[2823]*y_cur[IDX_H3OII]; - data[jistart + 12867] = 0.0 - k[2572]*y_cur[IDX_H2OI]; - data[jistart + 12868] = 0.0 - k[2573]*y_cur[IDX_H2OI]; - data[jistart + 12869] = 0.0 + k[2825]*y_cur[IDX_H3OII]; - data[jistart + 12870] = 0.0 + k[2826]*y_cur[IDX_H3OII]; - data[jistart + 12871] = 0.0 + k[774]*y_cur[IDX_C2H5OH2II] + - k[775]*y_cur[IDX_C2H5OH2II] + k[918]*y_cur[IDX_CH2COII] + - k[960]*y_cur[IDX_CH3OHII] + k[963]*y_cur[IDX_CH3OH2II] + - k[964]*y_cur[IDX_CH3OH2II] + k[1015]*y_cur[IDX_H2OCNII] + - k[1035]*y_cur[IDX_H3COII] + k[1041]*y_cur[IDX_H3OII] + - k[1291]*y_cur[IDX_CH3COOH2II] + k[1293]*y_cur[IDX_CH3COOH2II] + - k[1295]*y_cur[IDX_CH3COOH2II]; - data[jistart + 12872] = 0.0 - k[1899]*y_cur[IDX_H2OII]; - data[jistart + 12873] = 0.0 - k[462]*y_cur[IDX_H2OII] - - k[2503]*y_cur[IDX_H2OII]; - data[jistart + 12874] = 0.0 - k[465]*y_cur[IDX_H2OII] - - k[2504]*y_cur[IDX_H2OII]; - data[jistart + 12875] = 0.0 - k[463]*y_cur[IDX_H2OII]; - data[jistart + 12876] = 0.0 - k[464]*y_cur[IDX_H2OII]; - data[jistart + 12877] = 0.0 - k[466]*y_cur[IDX_H2OII] - - k[2505]*y_cur[IDX_H2OII] - k[2506]*y_cur[IDX_H2OII]; - data[jistart + 12878] = 0.0 - k[291]*y_cur[IDX_H2OII] - - k[2247]*y_cur[IDX_H2OII]; - data[jistart + 12879] = 0.0 - k[263]*y_cur[IDX_H2OII] - - k[2003]*y_cur[IDX_H2OII]; - data[jistart + 12880] = 0.0 - k[2195]*y_cur[IDX_H2OII]; - data[jistart + 12881] = 0.0 + k[3797]*y_cur[IDX_OHI]; - data[jistart + 12882] = 0.0 - k[2507]*y_cur[IDX_H2OII]; - data[jistart + 12883] = 0.0 + k[478]*y_cur[IDX_H2OI]; - data[jistart + 12884] = 0.0 + k[479]*y_cur[IDX_H2OI]; - data[jistart + 12885] = 0.0 - k[467]*y_cur[IDX_H2OII]; - data[jistart + 12886] = 0.0 - k[6340]*y_cur[IDX_H2OII] - - k[6341]*y_cur[IDX_H2OII] - k[6342]*y_cur[IDX_H2OII]; - data[jistart + 12887] = 0.0 + k[378]*y_cur[IDX_H2OI] + - k[2351]*y_cur[IDX_HOCNI] + k[2352]*y_cur[IDX_HONCI]; - data[jistart + 12888] = 0.0 - k[2442]*y_cur[IDX_H2OII] + - k[2469]*y_cur[IDX_OHII]; - data[jistart + 12889] = 0.0 + k[447]*y_cur[IDX_H2OI] + - k[2397]*y_cur[IDX_OHI]; - data[jistart + 12890] = 0.0 - k[468]*y_cur[IDX_H2OII] - - k[2508]*y_cur[IDX_H2OII]; - data[jistart + 12891] = 0.0 + k[378]*y_cur[IDX_HII] + - k[447]*y_cur[IDX_H2II] + k[478]*y_cur[IDX_COII] + - k[479]*y_cur[IDX_CO2II] + k[480]*y_cur[IDX_HCNII] + - k[481]*y_cur[IDX_N2II] + k[482]*y_cur[IDX_N2OII] + - k[518]*y_cur[IDX_HeII] + k[552]*y_cur[IDX_NII] + - k[575]*y_cur[IDX_NHII] + k[656]*y_cur[IDX_OII] + - k[689]*y_cur[IDX_OHII] - k[2509]*y_cur[IDX_H2OII] + k[6159]; - data[jistart + 12892] = 0.0 - k[263]*y_cur[IDX_CH2I] - - k[291]*y_cur[IDX_CHI] - k[462]*y_cur[IDX_C2I] - - k[463]*y_cur[IDX_C2H2I] - k[464]*y_cur[IDX_C2H4I] - - k[465]*y_cur[IDX_C2HI] - k[466]*y_cur[IDX_C2H6I] - - k[467]*y_cur[IDX_FeI] - k[468]*y_cur[IDX_H2COI] - - k[469]*y_cur[IDX_H2SI] - k[470]*y_cur[IDX_HCOI] - - k[471]*y_cur[IDX_MgI] - k[472]*y_cur[IDX_NOI] - - k[473]*y_cur[IDX_NaI] - k[474]*y_cur[IDX_O2I] - - k[475]*y_cur[IDX_OCSI] - k[476]*y_cur[IDX_SI] - - k[477]*y_cur[IDX_SiI] - k[588]*y_cur[IDX_NH2I] - - k[605]*y_cur[IDX_NH3I] - k[1012]*y_cur[IDX_eM] - - k[1013]*y_cur[IDX_eM] - k[1014]*y_cur[IDX_eM] - - k[1899]*y_cur[IDX_CI] - k[2003]*y_cur[IDX_CH2I] - - k[2195]*y_cur[IDX_CH4I] - k[2247]*y_cur[IDX_CHI] - - k[2442]*y_cur[IDX_H2I] - k[2503]*y_cur[IDX_C2I] - - k[2504]*y_cur[IDX_C2HI] - k[2505]*y_cur[IDX_C2H6I] - - k[2506]*y_cur[IDX_C2H6I] - k[2507]*y_cur[IDX_COI] - - k[2508]*y_cur[IDX_H2COI] - k[2509]*y_cur[IDX_H2OI] - - k[2510]*y_cur[IDX_H2SI] - k[2511]*y_cur[IDX_H2SI] - - k[2512]*y_cur[IDX_HCNI] - k[2513]*y_cur[IDX_HCOI] - - k[2514]*y_cur[IDX_HCOI] - k[2515]*y_cur[IDX_HNCI] - - k[2516]*y_cur[IDX_SI] - k[2517]*y_cur[IDX_SI] - - k[2518]*y_cur[IDX_SO2I] - k[3457]*y_cur[IDX_NI] - - k[3458]*y_cur[IDX_NI] - k[3536]*y_cur[IDX_NH2I] - - k[3575]*y_cur[IDX_NH3I] - k[3612]*y_cur[IDX_NHI] - - k[3733]*y_cur[IDX_OI] - k[3799]*y_cur[IDX_OHI] - k[6157] - - k[6340]*y_cur[IDX_GRAINM] - k[6341]*y_cur[IDX_GRAINM] - - k[6342]*y_cur[IDX_GRAINM]; - data[jistart + 12893] = 0.0 - k[469]*y_cur[IDX_H2OII] - - k[2510]*y_cur[IDX_H2OII] - k[2511]*y_cur[IDX_H2OII]; - data[jistart + 12894] = 0.0 + k[2730]*y_cur[IDX_OI] + - k[2733]*y_cur[IDX_OHI]; - data[jistart + 12895] = 0.0 - k[2512]*y_cur[IDX_H2OII]; - data[jistart + 12896] = 0.0 + k[480]*y_cur[IDX_H2OI] + - k[3800]*y_cur[IDX_OHI]; - data[jistart + 12897] = 0.0 - k[470]*y_cur[IDX_H2OII] - - k[2513]*y_cur[IDX_H2OII] - k[2514]*y_cur[IDX_H2OII] + - k[3782]*y_cur[IDX_OHII]; - data[jistart + 12898] = 0.0 + k[3801]*y_cur[IDX_OHI]; - data[jistart + 12899] = 0.0 - k[2515]*y_cur[IDX_H2OII]; - data[jistart + 12900] = 0.0 + k[3803]*y_cur[IDX_OHI]; - data[jistart + 12901] = 0.0 + k[2351]*y_cur[IDX_HII]; - data[jistart + 12902] = 0.0 + k[2352]*y_cur[IDX_HII]; - data[jistart + 12903] = 0.0 + k[518]*y_cur[IDX_H2OI]; - data[jistart + 12904] = 0.0 - k[471]*y_cur[IDX_H2OII]; - data[jistart + 12905] = 0.0 - k[3457]*y_cur[IDX_H2OII] - - k[3458]*y_cur[IDX_H2OII]; - data[jistart + 12906] = 0.0 + k[552]*y_cur[IDX_H2OI]; - data[jistart + 12907] = 0.0 + k[481]*y_cur[IDX_H2OI]; - data[jistart + 12908] = 0.0 + k[3804]*y_cur[IDX_OHI]; - data[jistart + 12909] = 0.0 + k[482]*y_cur[IDX_H2OI]; - data[jistart + 12910] = 0.0 - k[3612]*y_cur[IDX_H2OII]; - data[jistart + 12911] = 0.0 + k[575]*y_cur[IDX_H2OI] + - k[3504]*y_cur[IDX_OHI]; - data[jistart + 12912] = 0.0 - k[588]*y_cur[IDX_H2OII] - - k[3536]*y_cur[IDX_H2OII]; - data[jistart + 12913] = 0.0 - k[605]*y_cur[IDX_H2OII] - - k[3575]*y_cur[IDX_H2OII]; - data[jistart + 12914] = 0.0 - k[472]*y_cur[IDX_H2OII]; - data[jistart + 12915] = 0.0 - k[473]*y_cur[IDX_H2OII]; - data[jistart + 12916] = 0.0 + k[2730]*y_cur[IDX_H3II] - - k[3733]*y_cur[IDX_H2OII]; - data[jistart + 12917] = 0.0 + k[656]*y_cur[IDX_H2OI]; - data[jistart + 12918] = 0.0 - k[474]*y_cur[IDX_H2OII]; - data[jistart + 12919] = 0.0 + k[3806]*y_cur[IDX_OHI]; - data[jistart + 12920] = 0.0 - k[475]*y_cur[IDX_H2OII]; - data[jistart + 12921] = 0.0 + k[2397]*y_cur[IDX_H2II] + - k[2733]*y_cur[IDX_H3II] + k[3504]*y_cur[IDX_NHII] + - k[3788]*y_cur[IDX_OHII] + k[3797]*y_cur[IDX_CH5II] - - k[3799]*y_cur[IDX_H2OII] + k[3800]*y_cur[IDX_HCNII] + - k[3801]*y_cur[IDX_HCOII] + k[3803]*y_cur[IDX_HNOII] + - k[3804]*y_cur[IDX_N2HII] + k[3806]*y_cur[IDX_O2HII]; - data[jistart + 12922] = 0.0 + k[689]*y_cur[IDX_H2OI] + - k[2469]*y_cur[IDX_H2I] + k[3782]*y_cur[IDX_HCOI] + - k[3788]*y_cur[IDX_OHI]; - data[jistart + 12923] = 0.0 - k[476]*y_cur[IDX_H2OII] - - k[2516]*y_cur[IDX_H2OII] - k[2517]*y_cur[IDX_H2OII]; - data[jistart + 12924] = 0.0 - k[2518]*y_cur[IDX_H2OII]; - data[jistart + 12925] = 0.0 - k[477]*y_cur[IDX_H2OII]; - data[jistart + 12926] = 0.0 - k[1012]*y_cur[IDX_H2OII] - - k[1013]*y_cur[IDX_H2OII] - k[1014]*y_cur[IDX_H2OII]; - data[jistart + 12927] = 0.0 + k[8606]*y_cur[IDX_GO2HI]; - data[jistart + 12928] = 0.0 + k[7122] + k[7304] + k[7486]; - data[jistart + 12929] = 0.0 + k[8606]*y_cur[IDX_GHI]; - data[jistart + 12930] = 0.0 + k[8738]*y_cur[IDX_GOHI] + - k[8738]*y_cur[IDX_GOHI]; - data[jistart + 12931] = 0.0 - k[5166]*y_cur[IDX_H2O2I] - - k[5167]*y_cur[IDX_H2O2I]; - data[jistart + 12932] = 0.0 + k[5146]*y_cur[IDX_O2HI]; - data[jistart + 12933] = 0.0 + k[5150]*y_cur[IDX_O2HI]; - data[jistart + 12934] = 0.0 + k[5152]*y_cur[IDX_O2HI]; - data[jistart + 12935] = 0.0 - k[5166]*y_cur[IDX_HI] - - k[5167]*y_cur[IDX_HI] - k[5398]*y_cur[IDX_OI] - - k[5467]*y_cur[IDX_OHI] - k[5838] - k[6158] - k[6940]; - data[jistart + 12936] = 0.0 - k[5398]*y_cur[IDX_H2O2I]; - data[jistart + 12937] = 0.0 + k[5146]*y_cur[IDX_H2I] + - k[5150]*y_cur[IDX_H2COI] + k[5152]*y_cur[IDX_H2OI] + - k[5339]*y_cur[IDX_O2HI] + k[5339]*y_cur[IDX_O2HI]; - data[jistart + 12938] = 0.0 - k[5467]*y_cur[IDX_H2O2I]; - data[jistart + 12939] = 0.0 - k[6545]*y_cur[IDX_H2OCNII] - - k[6546]*y_cur[IDX_H2OCNII]; - data[jistart + 12940] = 0.0 + k[3051]*y_cur[IDX_HOCNII]; - data[jistart + 12941] = 0.0 - k[1015]*y_cur[IDX_eM] - - k[1016]*y_cur[IDX_eM] - k[6545]*y_cur[IDX_GRAINM] - - k[6546]*y_cur[IDX_GRAINM]; - data[jistart + 12942] = 0.0 + k[2711]*y_cur[IDX_HOCNI]; - data[jistart + 12943] = 0.0 + k[2711]*y_cur[IDX_H3II]; - data[jistart + 12944] = 0.0 + k[3051]*y_cur[IDX_H2I]; - data[jistart + 12945] = 0.0 - k[1015]*y_cur[IDX_H2OCNII] - - k[1016]*y_cur[IDX_H2OCNII]; - data[jistart + 12946] = 0.0 + k[2129]*y_cur[IDX_PH2II] + - k[3816]*y_cur[IDX_PHII]; - data[jistart + 12947] = 0.0 - k[6622]*y_cur[IDX_H2POII] - - k[6623]*y_cur[IDX_H2POII]; - data[jistart + 12948] = 0.0 + k[2564]*y_cur[IDX_PHII] + - k[2567]*y_cur[IDX_PH2II]; - data[jistart + 12949] = 0.0 - k[1017]*y_cur[IDX_eM] - - k[1018]*y_cur[IDX_eM] - k[6622]*y_cur[IDX_GRAINM] - - k[6623]*y_cur[IDX_GRAINM]; - data[jistart + 12950] = 0.0 + k[2714]*y_cur[IDX_HPOI]; - data[jistart + 12951] = 0.0 + k[2812]*y_cur[IDX_HPOI]; - data[jistart + 12952] = 0.0 + k[2975]*y_cur[IDX_HPOI]; - data[jistart + 12953] = 0.0 + k[2714]*y_cur[IDX_H3II] + - k[2812]*y_cur[IDX_H3OII] + k[2975]*y_cur[IDX_HCOII]; - data[jistart + 12954] = 0.0 + k[2564]*y_cur[IDX_H2OI] + - k[3816]*y_cur[IDX_CH3OHI]; - data[jistart + 12955] = 0.0 + k[2129]*y_cur[IDX_CH3OHI] + - k[2567]*y_cur[IDX_H2OI]; - data[jistart + 12956] = 0.0 - k[1017]*y_cur[IDX_H2POII] - - k[1018]*y_cur[IDX_H2POII]; - data[jistart + 12957] = 0.0 - k[175]*y_cur[IDX_H2SI] - - k[1395]*y_cur[IDX_H2SI]; - data[jistart + 12958] = 0.0 + k[3898]*y_cur[IDX_H2SII]; - data[jistart + 12959] = 0.0 + k[3933]*y_cur[IDX_H2SII]; - data[jistart + 12960] = 0.0 + k[3968]*y_cur[IDX_H2SII]; - data[jistart + 12961] = 0.0 + k[4003]*y_cur[IDX_H2SII]; - data[jistart + 12962] = 0.0 + k[4038]*y_cur[IDX_H2SII]; - data[jistart + 12963] = 0.0 - k[223]*y_cur[IDX_H2SI] - - k[1518]*y_cur[IDX_H2SI] - k[1519]*y_cur[IDX_H2SI]; - data[jistart + 12964] = 0.0 - k[1619]*y_cur[IDX_H2SI]; - data[jistart + 12965] = 0.0 - k[233]*y_cur[IDX_H2SI] - - k[1674]*y_cur[IDX_H2SI] - k[1675]*y_cur[IDX_H2SI]; - data[jistart + 12966] = 0.0 - k[1721]*y_cur[IDX_H2SI]; - data[jistart + 12967] = 0.0 - k[276]*y_cur[IDX_H2SI] - - k[2111]*y_cur[IDX_H2SI]; - data[jistart + 12968] = 0.0 - k[2575]*y_cur[IDX_H2SI]; - data[jistart + 12969] = 0.0 + k[4073]*y_cur[IDX_H2SII]; - data[jistart + 12970] = 0.0 - k[2576]*y_cur[IDX_H2SI] - - k[2577]*y_cur[IDX_H2SI] - k[2578]*y_cur[IDX_H2SI]; - data[jistart + 12971] = 0.0 + k[4108]*y_cur[IDX_H2SII]; - data[jistart + 12972] = 0.0 + k[4143]*y_cur[IDX_H2SII]; - data[jistart + 12973] = 0.0 + k[4178]*y_cur[IDX_H2SII]; - data[jistart + 12974] = 0.0 + k[4213]*y_cur[IDX_H2SII]; - data[jistart + 12975] = 0.0 + k[4248]*y_cur[IDX_H2SII]; - data[jistart + 12976] = 0.0 + k[4283]*y_cur[IDX_H2SII]; - data[jistart + 12977] = 0.0 + k[4318]*y_cur[IDX_H2SII]; - data[jistart + 12978] = 0.0 + k[4353]*y_cur[IDX_H2SII]; - data[jistart + 12979] = 0.0 + k[4388]*y_cur[IDX_H2SII]; - data[jistart + 12980] = 0.0 + k[4423]*y_cur[IDX_H2SII]; - data[jistart + 12981] = 0.0 + k[4458]*y_cur[IDX_H2SII]; - data[jistart + 12982] = 0.0 + k[4493]*y_cur[IDX_H2SII]; - data[jistart + 12983] = 0.0 + k[4528]*y_cur[IDX_H2SII]; - data[jistart + 12984] = 0.0 + k[4563]*y_cur[IDX_H2SII]; - data[jistart + 12985] = 0.0 + k[4598]*y_cur[IDX_H2SII]; - data[jistart + 12986] = 0.0 - k[1954]*y_cur[IDX_H2SI] - - k[1955]*y_cur[IDX_H2SI]; - data[jistart + 12987] = 0.0 + k[4633]*y_cur[IDX_H2SII]; - data[jistart + 12988] = 0.0 - k[1983]*y_cur[IDX_H2SI] - - k[1984]*y_cur[IDX_H2SI] - k[1985]*y_cur[IDX_H2SI]; - data[jistart + 12989] = 0.0 - k[5032]*y_cur[IDX_H2SI]; - data[jistart + 12990] = 0.0 - k[2078]*y_cur[IDX_H2SI]; - data[jistart + 12991] = 0.0 - k[281]*y_cur[IDX_H2SI] - - k[2143]*y_cur[IDX_H2SI]; - data[jistart + 12992] = 0.0 - k[2227]*y_cur[IDX_H2SI]; - data[jistart + 12993] = 0.0 + k[4668]*y_cur[IDX_H2SII]; - data[jistart + 12994] = 0.0 - k[309]*y_cur[IDX_H2SI] - - k[2281]*y_cur[IDX_H2SI]; - data[jistart + 12995] = 0.0 - k[484]*y_cur[IDX_H2SI]; - data[jistart + 12996] = 0.0 + k[483]*y_cur[IDX_H2SII]; - data[jistart + 12997] = 0.0 + k[8608]*y_cur[IDX_GHSI]; - data[jistart + 12998] = 0.0 + k[7123] + k[7305] + k[7487]; - data[jistart + 12999] = 0.0 + k[8608]*y_cur[IDX_GHI]; - data[jistart + 13000] = 0.0 + k[6450]*y_cur[IDX_H3SII]; - data[jistart + 13001] = 0.0 - k[5169]*y_cur[IDX_H2SI]; - data[jistart + 13002] = 0.0 - k[380]*y_cur[IDX_H2SI] - - k[2339]*y_cur[IDX_H2SI] - k[2340]*y_cur[IDX_H2SI]; - data[jistart + 13003] = 0.0 + k[4704]*y_cur[IDX_H2SII]; - data[jistart + 13004] = 0.0 + k[5140]*y_cur[IDX_HSI]; - data[jistart + 13005] = 0.0 - k[448]*y_cur[IDX_H2SI] - - k[2387]*y_cur[IDX_H2SI] - k[2388]*y_cur[IDX_H2SI]; - data[jistart + 13006] = 0.0 + k[2496]*y_cur[IDX_H3SII]; - data[jistart + 13007] = 0.0 + k[2556]*y_cur[IDX_HSiSII]; - data[jistart + 13008] = 0.0 - k[469]*y_cur[IDX_H2SI] - - k[2510]*y_cur[IDX_H2SI] - k[2511]*y_cur[IDX_H2SI]; - data[jistart + 13009] = 0.0 - k[175]*y_cur[IDX_CII] - - k[223]*y_cur[IDX_C2H2II] - k[233]*y_cur[IDX_C2H4II] - - k[276]*y_cur[IDX_C2H6II] - k[281]*y_cur[IDX_CH4II] - - k[309]*y_cur[IDX_COII] - k[380]*y_cur[IDX_HII] - - k[448]*y_cur[IDX_H2II] - k[469]*y_cur[IDX_H2OII] - - k[484]*y_cur[IDX_CO2II] - k[485]*y_cur[IDX_N2OII] - - k[486]*y_cur[IDX_OCSII] - k[519]*y_cur[IDX_HeII] - - k[553]*y_cur[IDX_NII] - k[567]*y_cur[IDX_N2II] - - k[580]*y_cur[IDX_NH2II] - k[657]*y_cur[IDX_OII] - - k[674]*y_cur[IDX_O2II] - k[690]*y_cur[IDX_OHII] - - k[701]*y_cur[IDX_PII] - k[1395]*y_cur[IDX_CII] - - k[1518]*y_cur[IDX_C2H2II] - k[1519]*y_cur[IDX_C2H2II] - - k[1619]*y_cur[IDX_C2H3II] - k[1674]*y_cur[IDX_C2H4II] - - k[1675]*y_cur[IDX_C2H4II] - k[1721]*y_cur[IDX_C2H5II] - - k[1954]*y_cur[IDX_CHII] - k[1955]*y_cur[IDX_CHII] - - k[1983]*y_cur[IDX_CH2II] - k[1984]*y_cur[IDX_CH2II] - - k[1985]*y_cur[IDX_CH2II] - k[2078]*y_cur[IDX_CH3II] - - k[2111]*y_cur[IDX_C2H6II] - k[2143]*y_cur[IDX_CH4II] - - k[2227]*y_cur[IDX_CH5II] - k[2281]*y_cur[IDX_COII] - - k[2339]*y_cur[IDX_HII] - k[2340]*y_cur[IDX_HII] - - k[2387]*y_cur[IDX_H2II] - k[2388]*y_cur[IDX_H2II] - - k[2510]*y_cur[IDX_H2OII] - k[2511]*y_cur[IDX_H2OII] - - k[2574]*y_cur[IDX_H2SII] - k[2575]*y_cur[IDX_C2NII] - - k[2576]*y_cur[IDX_C3HII] - k[2577]*y_cur[IDX_C3HII] - - k[2578]*y_cur[IDX_C3HII] - k[2579]*y_cur[IDX_HS2II] - - k[2580]*y_cur[IDX_HSiSII] - k[2581]*y_cur[IDX_N2OII] - - k[2582]*y_cur[IDX_SOII] - k[2686]*y_cur[IDX_H3II] - - k[2763]*y_cur[IDX_H3COII] - k[2801]*y_cur[IDX_H3OII] - - k[2892]*y_cur[IDX_HCNHII] - k[2893]*y_cur[IDX_HCNHII] - - k[2961]*y_cur[IDX_HCOII] - k[3054]*y_cur[IDX_HSII] - - k[3055]*y_cur[IDX_HSII] - k[3229]*y_cur[IDX_HeII] - - k[3230]*y_cur[IDX_HeII] - k[3347]*y_cur[IDX_NII] - - k[3348]*y_cur[IDX_NII] - k[3349]*y_cur[IDX_NII] - - k[3362]*y_cur[IDX_N2II] - k[3363]*y_cur[IDX_N2II] - - k[3515]*y_cur[IDX_NH2II] - k[3516]*y_cur[IDX_NH2II] - - k[3517]*y_cur[IDX_NH2II] - k[3518]*y_cur[IDX_NH2II] - - k[3551]*y_cur[IDX_NH3II] - k[3642]*y_cur[IDX_OII] - - k[3643]*y_cur[IDX_OII] - k[3780]*y_cur[IDX_OHII] - - k[3817]*y_cur[IDX_PHII] - k[3819]*y_cur[IDX_PH3II] - - k[3828]*y_cur[IDX_SII] - k[3829]*y_cur[IDX_SII] - - k[5032]*y_cur[IDX_CH3I] - k[5169]*y_cur[IDX_HI] - - k[5400]*y_cur[IDX_OI] - k[5468]*y_cur[IDX_OHI] - k[5841] - k[5842] - - k[6163] - k[6164] - k[6165] - k[6941]; - data[jistart + 13010] = 0.0 + k[483]*y_cur[IDX_FeI] + - k[501]*y_cur[IDX_HCOI] + k[532]*y_cur[IDX_MgI] + - k[606]*y_cur[IDX_NH3I] + k[625]*y_cur[IDX_NOI] + - k[636]*y_cur[IDX_NaI] + k[709]*y_cur[IDX_SI] + k[719]*y_cur[IDX_SiI] - - k[2574]*y_cur[IDX_H2SI] + k[3898]*y_cur[IDX_CM] + - k[3933]*y_cur[IDX_C10M] + k[3968]*y_cur[IDX_C10HM] + - k[4003]*y_cur[IDX_C2M] + k[4038]*y_cur[IDX_C2HM] + - k[4073]*y_cur[IDX_C3M] + k[4108]*y_cur[IDX_C3HM] + - k[4143]*y_cur[IDX_C3NM] + k[4178]*y_cur[IDX_C4M] + - k[4213]*y_cur[IDX_C4HM] + k[4248]*y_cur[IDX_C5M] + - k[4283]*y_cur[IDX_C5HM] + k[4318]*y_cur[IDX_C5NM] + - k[4353]*y_cur[IDX_C6M] + k[4388]*y_cur[IDX_C6HM] + - k[4423]*y_cur[IDX_C7M] + k[4458]*y_cur[IDX_C7HM] + - k[4493]*y_cur[IDX_C8M] + k[4528]*y_cur[IDX_C8HM] + - k[4563]*y_cur[IDX_C9M] + k[4598]*y_cur[IDX_C9HM] + - k[4633]*y_cur[IDX_CHM] + k[4668]*y_cur[IDX_CNM] + - k[4704]*y_cur[IDX_HM] + k[4739]*y_cur[IDX_OM] + - k[4774]*y_cur[IDX_O2M] + k[4809]*y_cur[IDX_OHM] + - k[4844]*y_cur[IDX_SM] + k[5618]*y_cur[IDX_eM]; - data[jistart + 13011] = 0.0 - k[2686]*y_cur[IDX_H2SI]; - data[jistart + 13012] = 0.0 - k[2763]*y_cur[IDX_H2SI]; - data[jistart + 13013] = 0.0 - k[2801]*y_cur[IDX_H2SI]; - data[jistart + 13014] = 0.0 + k[1045]*y_cur[IDX_eM] + - k[2496]*y_cur[IDX_H2COI] + k[2876]*y_cur[IDX_HCNI] + - k[3040]*y_cur[IDX_HNCI] + k[3579]*y_cur[IDX_NH3I] + - k[6450]*y_cur[IDX_GRAINM]; - data[jistart + 13015] = 0.0 + k[2876]*y_cur[IDX_H3SII]; - data[jistart + 13016] = 0.0 - k[2892]*y_cur[IDX_H2SI] - - k[2893]*y_cur[IDX_H2SI]; - data[jistart + 13017] = 0.0 + k[501]*y_cur[IDX_H2SII]; - data[jistart + 13018] = 0.0 - k[2961]*y_cur[IDX_H2SI]; - data[jistart + 13019] = 0.0 + k[3040]*y_cur[IDX_H3SII]; - data[jistart + 13020] = 0.0 + k[5140]*y_cur[IDX_H2I] + - k[5219]*y_cur[IDX_HSI] + k[5219]*y_cur[IDX_HSI]; - data[jistart + 13021] = 0.0 - k[3054]*y_cur[IDX_H2SI] - - k[3055]*y_cur[IDX_H2SI]; - data[jistart + 13022] = 0.0 - k[2579]*y_cur[IDX_H2SI]; - data[jistart + 13023] = 0.0 + k[2556]*y_cur[IDX_H2OI] - - k[2580]*y_cur[IDX_H2SI]; - data[jistart + 13024] = 0.0 - k[519]*y_cur[IDX_H2SI] - - k[3229]*y_cur[IDX_H2SI] - k[3230]*y_cur[IDX_H2SI]; - data[jistart + 13025] = 0.0 + k[532]*y_cur[IDX_H2SII]; - data[jistart + 13026] = 0.0 - k[553]*y_cur[IDX_H2SI] - - k[3347]*y_cur[IDX_H2SI] - k[3348]*y_cur[IDX_H2SI] - - k[3349]*y_cur[IDX_H2SI]; - data[jistart + 13027] = 0.0 - k[567]*y_cur[IDX_H2SI] - - k[3362]*y_cur[IDX_H2SI] - k[3363]*y_cur[IDX_H2SI]; - data[jistart + 13028] = 0.0 - k[485]*y_cur[IDX_H2SI] - - k[2581]*y_cur[IDX_H2SI]; - data[jistart + 13029] = 0.0 - k[580]*y_cur[IDX_H2SI] - - k[3515]*y_cur[IDX_H2SI] - k[3516]*y_cur[IDX_H2SI] - - k[3517]*y_cur[IDX_H2SI] - k[3518]*y_cur[IDX_H2SI]; - data[jistart + 13030] = 0.0 + k[606]*y_cur[IDX_H2SII] + - k[3579]*y_cur[IDX_H3SII]; - data[jistart + 13031] = 0.0 - k[3551]*y_cur[IDX_H2SI]; - data[jistart + 13032] = 0.0 + k[625]*y_cur[IDX_H2SII]; - data[jistart + 13033] = 0.0 + k[636]*y_cur[IDX_H2SII]; - data[jistart + 13034] = 0.0 - k[5400]*y_cur[IDX_H2SI]; - data[jistart + 13035] = 0.0 - k[657]*y_cur[IDX_H2SI] - - k[3642]*y_cur[IDX_H2SI] - k[3643]*y_cur[IDX_H2SI]; - data[jistart + 13036] = 0.0 + k[4739]*y_cur[IDX_H2SII]; - data[jistart + 13037] = 0.0 - k[674]*y_cur[IDX_H2SI]; - data[jistart + 13038] = 0.0 + k[4774]*y_cur[IDX_H2SII]; - data[jistart + 13039] = 0.0 - k[486]*y_cur[IDX_H2SI]; - data[jistart + 13040] = 0.0 - k[5468]*y_cur[IDX_H2SI]; - data[jistart + 13041] = 0.0 - k[690]*y_cur[IDX_H2SI] - - k[3780]*y_cur[IDX_H2SI]; - data[jistart + 13042] = 0.0 + k[4809]*y_cur[IDX_H2SII]; - data[jistart + 13043] = 0.0 - k[701]*y_cur[IDX_H2SI]; - data[jistart + 13044] = 0.0 - k[3817]*y_cur[IDX_H2SI]; - data[jistart + 13045] = 0.0 - k[3819]*y_cur[IDX_H2SI]; - data[jistart + 13046] = 0.0 + k[709]*y_cur[IDX_H2SII]; - data[jistart + 13047] = 0.0 - k[3828]*y_cur[IDX_H2SI] - - k[3829]*y_cur[IDX_H2SI]; - data[jistart + 13048] = 0.0 + k[4844]*y_cur[IDX_H2SII]; - data[jistart + 13049] = 0.0 - k[2582]*y_cur[IDX_H2SI]; - data[jistart + 13050] = 0.0 + k[719]*y_cur[IDX_H2SII]; - data[jistart + 13051] = 0.0 + k[1045]*y_cur[IDX_H3SII] + - k[5618]*y_cur[IDX_H2SII]; - data[jistart + 13052] = 0.0 - k[1900]*y_cur[IDX_H2SII]; - data[jistart + 13053] = 0.0 + k[175]*y_cur[IDX_H2SI]; - data[jistart + 13054] = 0.0 - k[3898]*y_cur[IDX_H2SII]; - data[jistart + 13055] = 0.0 - k[3933]*y_cur[IDX_H2SII]; - data[jistart + 13056] = 0.0 - k[3968]*y_cur[IDX_H2SII]; - data[jistart + 13057] = 0.0 - k[4003]*y_cur[IDX_H2SII]; - data[jistart + 13058] = 0.0 - k[4038]*y_cur[IDX_H2SII]; - data[jistart + 13059] = 0.0 + k[223]*y_cur[IDX_H2SI]; - data[jistart + 13060] = 0.0 + k[233]*y_cur[IDX_H2SI]; - data[jistart + 13061] = 0.0 + k[276]*y_cur[IDX_H2SI]; - data[jistart + 13062] = 0.0 - k[4073]*y_cur[IDX_H2SII]; - data[jistart + 13063] = 0.0 - k[4108]*y_cur[IDX_H2SII]; - data[jistart + 13064] = 0.0 - k[4143]*y_cur[IDX_H2SII]; - data[jistart + 13065] = 0.0 - k[4178]*y_cur[IDX_H2SII]; - data[jistart + 13066] = 0.0 - k[4213]*y_cur[IDX_H2SII]; - data[jistart + 13067] = 0.0 - k[4248]*y_cur[IDX_H2SII]; - data[jistart + 13068] = 0.0 - k[4283]*y_cur[IDX_H2SII]; - data[jistart + 13069] = 0.0 - k[4318]*y_cur[IDX_H2SII]; - data[jistart + 13070] = 0.0 - k[4353]*y_cur[IDX_H2SII]; - data[jistart + 13071] = 0.0 - k[4388]*y_cur[IDX_H2SII]; - data[jistart + 13072] = 0.0 - k[4423]*y_cur[IDX_H2SII]; - data[jistart + 13073] = 0.0 - k[4458]*y_cur[IDX_H2SII]; - data[jistart + 13074] = 0.0 - k[4493]*y_cur[IDX_H2SII]; - data[jistart + 13075] = 0.0 - k[4528]*y_cur[IDX_H2SII]; - data[jistart + 13076] = 0.0 - k[4563]*y_cur[IDX_H2SII]; - data[jistart + 13077] = 0.0 - k[4598]*y_cur[IDX_H2SII]; - data[jistart + 13078] = 0.0 - k[4633]*y_cur[IDX_H2SII]; - data[jistart + 13079] = 0.0 + k[281]*y_cur[IDX_H2SI]; - data[jistart + 13080] = 0.0 - k[4668]*y_cur[IDX_H2SII]; - data[jistart + 13081] = 0.0 + k[309]*y_cur[IDX_H2SI]; - data[jistart + 13082] = 0.0 + k[484]*y_cur[IDX_H2SI]; - data[jistart + 13083] = 0.0 - k[483]*y_cur[IDX_H2SII]; - data[jistart + 13084] = 0.0 - k[6446]*y_cur[IDX_H2SII] - - k[6447]*y_cur[IDX_H2SII]; - data[jistart + 13085] = 0.0 - k[2842]*y_cur[IDX_H2SII] + - k[2843]*y_cur[IDX_H3SII]; - data[jistart + 13086] = 0.0 + k[380]*y_cur[IDX_H2SI]; - data[jistart + 13087] = 0.0 - k[4704]*y_cur[IDX_H2SII]; - data[jistart + 13088] = 0.0 - k[2443]*y_cur[IDX_H2SII] + - k[2456]*y_cur[IDX_HSII] + k[5561]*y_cur[IDX_SII]; - data[jistart + 13089] = 0.0 + k[448]*y_cur[IDX_H2SI]; - data[jistart + 13090] = 0.0 + k[2500]*y_cur[IDX_SII]; - data[jistart + 13091] = 0.0 - k[2544]*y_cur[IDX_H2SII]; - data[jistart + 13092] = 0.0 + k[469]*y_cur[IDX_H2SI]; - data[jistart + 13093] = 0.0 + k[175]*y_cur[IDX_CII] + - k[223]*y_cur[IDX_C2H2II] + k[233]*y_cur[IDX_C2H4II] + - k[276]*y_cur[IDX_C2H6II] + k[281]*y_cur[IDX_CH4II] + - k[309]*y_cur[IDX_COII] + k[380]*y_cur[IDX_HII] + - k[448]*y_cur[IDX_H2II] + k[469]*y_cur[IDX_H2OII] + - k[484]*y_cur[IDX_CO2II] + k[485]*y_cur[IDX_N2OII] + - k[486]*y_cur[IDX_OCSII] + k[519]*y_cur[IDX_HeII] + - k[553]*y_cur[IDX_NII] + k[567]*y_cur[IDX_N2II] + - k[580]*y_cur[IDX_NH2II] + k[657]*y_cur[IDX_OII] + - k[674]*y_cur[IDX_O2II] + k[690]*y_cur[IDX_OHII] + - k[701]*y_cur[IDX_PII] - k[2574]*y_cur[IDX_H2SII] + k[5841] + - k[6163]; - data[jistart + 13094] = 0.0 - k[483]*y_cur[IDX_FeI] - - k[501]*y_cur[IDX_HCOI] - k[532]*y_cur[IDX_MgI] - - k[606]*y_cur[IDX_NH3I] - k[625]*y_cur[IDX_NOI] - - k[636]*y_cur[IDX_NaI] - k[709]*y_cur[IDX_SI] - k[719]*y_cur[IDX_SiI] - - k[1019]*y_cur[IDX_eM] - k[1020]*y_cur[IDX_eM] - - k[1900]*y_cur[IDX_CI] - k[2443]*y_cur[IDX_H2I] - - k[2544]*y_cur[IDX_H2OI] - k[2574]*y_cur[IDX_H2SI] - - k[2842]*y_cur[IDX_HI] - k[3459]*y_cur[IDX_NI] - - k[3576]*y_cur[IDX_NH3I] - k[3734]*y_cur[IDX_OI] - - k[3735]*y_cur[IDX_OI] - k[3898]*y_cur[IDX_CM] - - k[3933]*y_cur[IDX_C10M] - k[3968]*y_cur[IDX_C10HM] - - k[4003]*y_cur[IDX_C2M] - k[4038]*y_cur[IDX_C2HM] - - k[4073]*y_cur[IDX_C3M] - k[4108]*y_cur[IDX_C3HM] - - k[4143]*y_cur[IDX_C3NM] - k[4178]*y_cur[IDX_C4M] - - k[4213]*y_cur[IDX_C4HM] - k[4248]*y_cur[IDX_C5M] - - k[4283]*y_cur[IDX_C5HM] - k[4318]*y_cur[IDX_C5NM] - - k[4353]*y_cur[IDX_C6M] - k[4388]*y_cur[IDX_C6HM] - - k[4423]*y_cur[IDX_C7M] - k[4458]*y_cur[IDX_C7HM] - - k[4493]*y_cur[IDX_C8M] - k[4528]*y_cur[IDX_C8HM] - - k[4563]*y_cur[IDX_C9M] - k[4598]*y_cur[IDX_C9HM] - - k[4633]*y_cur[IDX_CHM] - k[4668]*y_cur[IDX_CNM] - - k[4704]*y_cur[IDX_HM] - k[4739]*y_cur[IDX_OM] - - k[4774]*y_cur[IDX_O2M] - k[4809]*y_cur[IDX_OHM] - - k[4844]*y_cur[IDX_SM] - k[5618]*y_cur[IDX_eM] - - k[6446]*y_cur[IDX_GRAINM] - k[6447]*y_cur[IDX_GRAINM]; - data[jistart + 13095] = 0.0 + k[2716]*y_cur[IDX_HSI]; - data[jistart + 13096] = 0.0 + k[2843]*y_cur[IDX_HI]; - data[jistart + 13097] = 0.0 - k[501]*y_cur[IDX_H2SII]; - data[jistart + 13098] = 0.0 + k[2977]*y_cur[IDX_HSI]; - data[jistart + 13099] = 0.0 + k[2716]*y_cur[IDX_H3II] + - k[2977]*y_cur[IDX_HCOII]; - data[jistart + 13100] = 0.0 + k[2456]*y_cur[IDX_H2I]; - data[jistart + 13101] = 0.0 + k[519]*y_cur[IDX_H2SI]; - data[jistart + 13102] = 0.0 - k[532]*y_cur[IDX_H2SII]; - data[jistart + 13103] = 0.0 - k[3459]*y_cur[IDX_H2SII]; - data[jistart + 13104] = 0.0 + k[553]*y_cur[IDX_H2SI]; - data[jistart + 13105] = 0.0 + k[567]*y_cur[IDX_H2SI]; - data[jistart + 13106] = 0.0 + k[485]*y_cur[IDX_H2SI]; - data[jistart + 13107] = 0.0 + k[580]*y_cur[IDX_H2SI]; - data[jistart + 13108] = 0.0 - k[606]*y_cur[IDX_H2SII] - - k[3576]*y_cur[IDX_H2SII]; - data[jistart + 13109] = 0.0 - k[625]*y_cur[IDX_H2SII]; - data[jistart + 13110] = 0.0 - k[636]*y_cur[IDX_H2SII]; - data[jistart + 13111] = 0.0 - k[3734]*y_cur[IDX_H2SII] - - k[3735]*y_cur[IDX_H2SII]; - data[jistart + 13112] = 0.0 + k[657]*y_cur[IDX_H2SI]; - data[jistart + 13113] = 0.0 - k[4739]*y_cur[IDX_H2SII]; - data[jistart + 13114] = 0.0 + k[674]*y_cur[IDX_H2SI]; - data[jistart + 13115] = 0.0 - k[4774]*y_cur[IDX_H2SII]; - data[jistart + 13116] = 0.0 + k[486]*y_cur[IDX_H2SI]; - data[jistart + 13117] = 0.0 + k[690]*y_cur[IDX_H2SI]; - data[jistart + 13118] = 0.0 - k[4809]*y_cur[IDX_H2SII]; - data[jistart + 13119] = 0.0 + k[701]*y_cur[IDX_H2SI]; - data[jistart + 13120] = 0.0 - k[709]*y_cur[IDX_H2SII]; - data[jistart + 13121] = 0.0 + k[2500]*y_cur[IDX_H2COI] + - k[5561]*y_cur[IDX_H2I]; - data[jistart + 13122] = 0.0 - k[4844]*y_cur[IDX_H2SII]; - data[jistart + 13123] = 0.0 - k[719]*y_cur[IDX_H2SII]; - data[jistart + 13124] = 0.0 - k[1019]*y_cur[IDX_H2SII] - - k[1020]*y_cur[IDX_H2SII] - k[5618]*y_cur[IDX_H2SII]; - data[jistart + 13125] = 0.0 + k[7220] + k[7402] + k[7584]; - data[jistart + 13126] = 0.0 + k[6770]*y_cur[IDX_H3S2II]; - data[jistart + 13127] = 0.0 - k[379]*y_cur[IDX_H2S2I]; - data[jistart + 13128] = 0.0 - k[379]*y_cur[IDX_HII] - - k[2685]*y_cur[IDX_H3II] - k[2800]*y_cur[IDX_H3OII] - - k[2960]*y_cur[IDX_HCOII] - k[3227]*y_cur[IDX_HeII] - - k[3228]*y_cur[IDX_HeII] - k[5840] - k[6162] - k[7038]; - data[jistart + 13129] = 0.0 - k[2685]*y_cur[IDX_H2S2I]; - data[jistart + 13130] = 0.0 - k[2800]*y_cur[IDX_H2S2I]; - data[jistart + 13131] = 0.0 + k[1049]*y_cur[IDX_eM] + - k[6770]*y_cur[IDX_GRAINM]; - data[jistart + 13132] = 0.0 - k[2960]*y_cur[IDX_H2S2I]; - data[jistart + 13133] = 0.0 - k[3227]*y_cur[IDX_H2S2I] - - k[3228]*y_cur[IDX_H2S2I]; - data[jistart + 13134] = 0.0 + k[1049]*y_cur[IDX_H3S2II]; - data[jistart + 13135] = 0.0 + k[2112]*y_cur[IDX_S2II]; - data[jistart + 13136] = 0.0 + k[2132]*y_cur[IDX_S2II]; - data[jistart + 13137] = 0.0 - k[6763]*y_cur[IDX_H2S2II] - - k[6764]*y_cur[IDX_H2S2II]; - data[jistart + 13138] = 0.0 + k[379]*y_cur[IDX_H2S2I]; - data[jistart + 13139] = 0.0 + k[379]*y_cur[IDX_HII]; - data[jistart + 13140] = 0.0 - k[1021]*y_cur[IDX_eM] - - k[1022]*y_cur[IDX_eM] - k[6763]*y_cur[IDX_GRAINM] - - k[6764]*y_cur[IDX_GRAINM]; - data[jistart + 13141] = 0.0 + k[2715]*y_cur[IDX_HS2I]; - data[jistart + 13142] = 0.0 + k[2813]*y_cur[IDX_HS2I]; - data[jistart + 13143] = 0.0 + k[3839]*y_cur[IDX_SI]; - data[jistart + 13144] = 0.0 + k[2976]*y_cur[IDX_HS2I]; - data[jistart + 13145] = 0.0 + k[2715]*y_cur[IDX_H3II] + - k[2813]*y_cur[IDX_H3OII] + k[2976]*y_cur[IDX_HCOII]; - data[jistart + 13146] = 0.0 + k[3839]*y_cur[IDX_H3SII]; - data[jistart + 13147] = 0.0 + k[2112]*y_cur[IDX_C2H6I] + - k[2132]*y_cur[IDX_CH3OHI]; - data[jistart + 13148] = 0.0 - k[1021]*y_cur[IDX_H2S2II] - - k[1022]*y_cur[IDX_H2S2II]; - data[jistart + 13149] = 0.0 - k[176]*y_cur[IDX_H2SiOI]; - data[jistart + 13150] = 0.0 + k[7170] + k[7352] + k[7534]; - data[jistart + 13151] = 0.0 + k[6590]*y_cur[IDX_H3SiOII]; - data[jistart + 13152] = 0.0 - k[381]*y_cur[IDX_H2SiOI] - - k[2341]*y_cur[IDX_H2SiOI]; - data[jistart + 13153] = 0.0 - k[176]*y_cur[IDX_CII] - - k[381]*y_cur[IDX_HII] - k[2341]*y_cur[IDX_HII] - - k[2687]*y_cur[IDX_H3II] - k[2802]*y_cur[IDX_H3OII] - - k[2962]*y_cur[IDX_HCOII] - k[3231]*y_cur[IDX_HeII] - k[5843] - - k[6166] - k[6167] - k[6988]; - data[jistart + 13154] = 0.0 - k[2687]*y_cur[IDX_H2SiOI]; - data[jistart + 13155] = 0.0 - k[2802]*y_cur[IDX_H2SiOI]; - data[jistart + 13156] = 0.0 + k[1051]*y_cur[IDX_eM] + - k[6590]*y_cur[IDX_GRAINM]; - data[jistart + 13157] = 0.0 - k[2962]*y_cur[IDX_H2SiOI]; - data[jistart + 13158] = 0.0 - k[3231]*y_cur[IDX_H2SiOI]; - data[jistart + 13159] = 0.0 + k[5447]*y_cur[IDX_SiH3I]; - data[jistart + 13160] = 0.0 + k[5447]*y_cur[IDX_OI]; - data[jistart + 13161] = 0.0 + k[1051]*y_cur[IDX_H3SiOII]; - data[jistart + 13162] = 0.0 + k[176]*y_cur[IDX_H2SiOI]; - data[jistart + 13163] = 0.0 - k[6585]*y_cur[IDX_H2SiOII] - - k[6586]*y_cur[IDX_H2SiOII]; - data[jistart + 13164] = 0.0 + k[381]*y_cur[IDX_H2SiOI]; - data[jistart + 13165] = 0.0 + k[176]*y_cur[IDX_CII] + - k[381]*y_cur[IDX_HII]; - data[jistart + 13166] = 0.0 - k[1023]*y_cur[IDX_eM] - - k[1024]*y_cur[IDX_eM] - k[6585]*y_cur[IDX_GRAINM] - - k[6586]*y_cur[IDX_GRAINM]; - data[jistart + 13167] = 0.0 + k[3758]*y_cur[IDX_SiH3II]; - data[jistart + 13168] = 0.0 + k[3758]*y_cur[IDX_OI]; - data[jistart + 13169] = 0.0 - k[1023]*y_cur[IDX_H2SiOII] - - k[1024]*y_cur[IDX_H2SiOII]; - data[jistart + 13170] = 0.0 - k[2632]*y_cur[IDX_H3II]; - data[jistart + 13171] = 0.0 - k[3899]*y_cur[IDX_H3II]; - data[jistart + 13172] = 0.0 - k[2583]*y_cur[IDX_H3II]; - data[jistart + 13173] = 0.0 - k[3934]*y_cur[IDX_H3II]; - data[jistart + 13174] = 0.0 - k[2585]*y_cur[IDX_H3II]; - data[jistart + 13175] = 0.0 - k[3969]*y_cur[IDX_H3II]; - data[jistart + 13176] = 0.0 - k[2584]*y_cur[IDX_H3II]; - data[jistart + 13177] = 0.0 - k[2586]*y_cur[IDX_H3II]; - data[jistart + 13178] = 0.0 - k[4004]*y_cur[IDX_H3II]; - data[jistart + 13179] = 0.0 - k[2597]*y_cur[IDX_H3II]; - data[jistart + 13180] = 0.0 - k[4039]*y_cur[IDX_H3II]; - data[jistart + 13181] = 0.0 - k[2587]*y_cur[IDX_H3II]; - data[jistart + 13182] = 0.0 - k[2588]*y_cur[IDX_H3II]; - data[jistart + 13183] = 0.0 - k[2589]*y_cur[IDX_H3II] - - k[2590]*y_cur[IDX_H3II]; - data[jistart + 13184] = 0.0 - k[2591]*y_cur[IDX_H3II]; - data[jistart + 13185] = 0.0 - k[2592]*y_cur[IDX_H3II] - - k[2593]*y_cur[IDX_H3II] - k[2594]*y_cur[IDX_H3II] - - k[2595]*y_cur[IDX_H3II] - k[2596]*y_cur[IDX_H3II]; - data[jistart + 13186] = 0.0 - k[2648]*y_cur[IDX_H3II]; - data[jistart + 13187] = 0.0 - k[2598]*y_cur[IDX_H3II]; - data[jistart + 13188] = 0.0 - k[2599]*y_cur[IDX_H3II]; - data[jistart + 13189] = 0.0 - k[2600]*y_cur[IDX_H3II]; - data[jistart + 13190] = 0.0 - k[2601]*y_cur[IDX_H3II]; - data[jistart + 13191] = 0.0 - k[4074]*y_cur[IDX_H3II]; - data[jistart + 13192] = 0.0 - k[2603]*y_cur[IDX_H3II]; - data[jistart + 13193] = 0.0 - k[4109]*y_cur[IDX_H3II]; - data[jistart + 13194] = 0.0 - k[2602]*y_cur[IDX_H3II]; - data[jistart + 13195] = 0.0 - k[2604]*y_cur[IDX_H3II]; - data[jistart + 13196] = 0.0 - k[4144]*y_cur[IDX_H3II]; - data[jistart + 13197] = 0.0 - k[2605]*y_cur[IDX_H3II]; - data[jistart + 13198] = 0.0 - k[2606]*y_cur[IDX_H3II]; - data[jistart + 13199] = 0.0 - k[2607]*y_cur[IDX_H3II]; - data[jistart + 13200] = 0.0 - k[2608]*y_cur[IDX_H3II]; - data[jistart + 13201] = 0.0 - k[4179]*y_cur[IDX_H3II]; - data[jistart + 13202] = 0.0 - k[2610]*y_cur[IDX_H3II]; - data[jistart + 13203] = 0.0 - k[4214]*y_cur[IDX_H3II]; - data[jistart + 13204] = 0.0 - k[2690]*y_cur[IDX_H3II]; - data[jistart + 13205] = 0.0 - k[2609]*y_cur[IDX_H3II]; - data[jistart + 13206] = 0.0 - k[2611]*y_cur[IDX_H3II]; - data[jistart + 13207] = 0.0 - k[2612]*y_cur[IDX_H3II]; - data[jistart + 13208] = 0.0 - k[2613]*y_cur[IDX_H3II]; - data[jistart + 13209] = 0.0 - k[4249]*y_cur[IDX_H3II]; - data[jistart + 13210] = 0.0 - k[2615]*y_cur[IDX_H3II]; - data[jistart + 13211] = 0.0 - k[4284]*y_cur[IDX_H3II]; - data[jistart + 13212] = 0.0 - k[2614]*y_cur[IDX_H3II]; - data[jistart + 13213] = 0.0 - k[2616]*y_cur[IDX_H3II]; - data[jistart + 13214] = 0.0 - k[4319]*y_cur[IDX_H3II]; - data[jistart + 13215] = 0.0 - k[2617]*y_cur[IDX_H3II]; - data[jistart + 13216] = 0.0 - k[4354]*y_cur[IDX_H3II]; - data[jistart + 13217] = 0.0 - k[2620]*y_cur[IDX_H3II]; - data[jistart + 13218] = 0.0 - k[4389]*y_cur[IDX_H3II]; - data[jistart + 13219] = 0.0 - k[2618]*y_cur[IDX_H3II]; - data[jistart + 13220] = 0.0 - k[2619]*y_cur[IDX_H3II]; - data[jistart + 13221] = 0.0 - k[2621]*y_cur[IDX_H3II]; - data[jistart + 13222] = 0.0 - k[4424]*y_cur[IDX_H3II]; - data[jistart + 13223] = 0.0 - k[2623]*y_cur[IDX_H3II]; - data[jistart + 13224] = 0.0 - k[4459]*y_cur[IDX_H3II]; - data[jistart + 13225] = 0.0 - k[2622]*y_cur[IDX_H3II]; - data[jistart + 13226] = 0.0 - k[2624]*y_cur[IDX_H3II]; - data[jistart + 13227] = 0.0 - k[2625]*y_cur[IDX_H3II]; - data[jistart + 13228] = 0.0 - k[4494]*y_cur[IDX_H3II]; - data[jistart + 13229] = 0.0 - k[2627]*y_cur[IDX_H3II]; - data[jistart + 13230] = 0.0 - k[4529]*y_cur[IDX_H3II]; - data[jistart + 13231] = 0.0 - k[2626]*y_cur[IDX_H3II]; - data[jistart + 13232] = 0.0 - k[2628]*y_cur[IDX_H3II]; - data[jistart + 13233] = 0.0 - k[4564]*y_cur[IDX_H3II]; - data[jistart + 13234] = 0.0 - k[2630]*y_cur[IDX_H3II]; - data[jistart + 13235] = 0.0 - k[4599]*y_cur[IDX_H3II]; - data[jistart + 13236] = 0.0 - k[2629]*y_cur[IDX_H3II]; - data[jistart + 13237] = 0.0 - k[2631]*y_cur[IDX_H3II]; - data[jistart + 13238] = 0.0 - k[2633]*y_cur[IDX_H3II]; - data[jistart + 13239] = 0.0 - k[2670]*y_cur[IDX_H3II]; - data[jistart + 13240] = 0.0 - k[4634]*y_cur[IDX_H3II]; - data[jistart + 13241] = 0.0 - k[2634]*y_cur[IDX_H3II]; - data[jistart + 13242] = 0.0 - k[2636]*y_cur[IDX_H3II]; - data[jistart + 13243] = 0.0 - k[2635]*y_cur[IDX_H3II]; - data[jistart + 13244] = 0.0 - k[2637]*y_cur[IDX_H3II]; - data[jistart + 13245] = 0.0 - k[2638]*y_cur[IDX_H3II]; - data[jistart + 13246] = 0.0 - k[2639]*y_cur[IDX_H3II]; - data[jistart + 13247] = 0.0 - k[5634]*y_cur[IDX_H3II]; - data[jistart + 13248] = 0.0 - k[5662]*y_cur[IDX_H3II]; - data[jistart + 13249] = 0.0 - k[5656]*y_cur[IDX_H3II]; - data[jistart + 13250] = 0.0 - k[2640]*y_cur[IDX_H3II]; - data[jistart + 13251] = 0.0 - k[2641]*y_cur[IDX_H3II]; - data[jistart + 13252] = 0.0 - k[2642]*y_cur[IDX_H3II]; - data[jistart + 13253] = 0.0 - k[2643]*y_cur[IDX_H3II]; - data[jistart + 13254] = 0.0 - k[2644]*y_cur[IDX_H3II]; - data[jistart + 13255] = 0.0 - k[2645]*y_cur[IDX_H3II]; - data[jistart + 13256] = 0.0 - k[2646]*y_cur[IDX_H3II]; - data[jistart + 13257] = 0.0 - k[2647]*y_cur[IDX_H3II]; - data[jistart + 13258] = 0.0 - k[2649]*y_cur[IDX_H3II] - - k[2650]*y_cur[IDX_H3II]; - data[jistart + 13259] = 0.0 - k[2651]*y_cur[IDX_H3II] - - k[2652]*y_cur[IDX_H3II] - k[2653]*y_cur[IDX_H3II] - - k[2654]*y_cur[IDX_H3II] - k[2655]*y_cur[IDX_H3II] - - k[2656]*y_cur[IDX_H3II] - k[2657]*y_cur[IDX_H3II]; - data[jistart + 13260] = 0.0 - k[2658]*y_cur[IDX_H3II]; - data[jistart + 13261] = 0.0 - k[5640]*y_cur[IDX_H3II]; - data[jistart + 13262] = 0.0 - k[2659]*y_cur[IDX_H3II] - - k[2660]*y_cur[IDX_H3II] - k[2661]*y_cur[IDX_H3II] - - k[2662]*y_cur[IDX_H3II] - k[2663]*y_cur[IDX_H3II] - - k[2664]*y_cur[IDX_H3II] - k[2665]*y_cur[IDX_H3II]; - data[jistart + 13263] = 0.0 - k[5668]*y_cur[IDX_H3II]; - data[jistart + 13264] = 0.0 - k[5628]*y_cur[IDX_H3II]; - data[jistart + 13265] = 0.0 - k[2666]*y_cur[IDX_H3II]; - data[jistart + 13266] = 0.0 - k[2667]*y_cur[IDX_H3II] - - k[2668]*y_cur[IDX_H3II]; - data[jistart + 13267] = 0.0 - k[2669]*y_cur[IDX_H3II]; - data[jistart + 13268] = 0.0 - k[2671]*y_cur[IDX_H3II]; - data[jistart + 13269] = 0.0 - k[4669]*y_cur[IDX_H3II]; - data[jistart + 13270] = 0.0 - k[2672]*y_cur[IDX_H3II] - - k[2673]*y_cur[IDX_H3II]; - data[jistart + 13271] = 0.0 - k[2675]*y_cur[IDX_H3II] - - k[2676]*y_cur[IDX_H3II]; - data[jistart + 13272] = 0.0 - k[2674]*y_cur[IDX_H3II]; - data[jistart + 13273] = 0.0 - k[5650]*y_cur[IDX_H3II]; - data[jistart + 13274] = 0.0 - k[5645]*y_cur[IDX_H3II]; - data[jistart + 13275] = 0.0 - k[2677]*y_cur[IDX_H3II]; - data[jistart + 13276] = 0.0 - k[2678]*y_cur[IDX_H3II]; - data[jistart + 13277] = 0.0 - k[2679]*y_cur[IDX_H3II]; - data[jistart + 13278] = 0.0 - k[2680]*y_cur[IDX_H3II]; - data[jistart + 13279] = 0.0 - k[6310]*y_cur[IDX_H3II] - - k[6311]*y_cur[IDX_H3II]; - data[jistart + 13280] = 0.0 - k[4705]*y_cur[IDX_H3II]; - data[jistart + 13281] = 0.0 + k[2384]*y_cur[IDX_H2II] + - k[2458]*y_cur[IDX_HeHII] + k[2461]*y_cur[IDX_NHII] + - k[2468]*y_cur[IDX_O2HII]; - data[jistart + 13282] = 0.0 + k[2384]*y_cur[IDX_H2I] + - k[2389]*y_cur[IDX_HCOI]; - data[jistart + 13283] = 0.0 - k[2681]*y_cur[IDX_H3II]; - data[jistart + 13284] = 0.0 - k[2682]*y_cur[IDX_H3II]; - data[jistart + 13285] = 0.0 - k[2683]*y_cur[IDX_H3II]; - data[jistart + 13286] = 0.0 - k[2684]*y_cur[IDX_H3II]; - data[jistart + 13287] = 0.0 - k[2686]*y_cur[IDX_H3II]; - data[jistart + 13288] = 0.0 - k[2685]*y_cur[IDX_H3II]; - data[jistart + 13289] = 0.0 - k[2687]*y_cur[IDX_H3II]; - data[jistart + 13290] = 0.0 - k[1025]*y_cur[IDX_eM] - - k[1026]*y_cur[IDX_eM] - k[2583]*y_cur[IDX_C10I] - - k[2584]*y_cur[IDX_C10H2I] - k[2585]*y_cur[IDX_C10HI] - - k[2586]*y_cur[IDX_C2I] - k[2587]*y_cur[IDX_C2H2I] - - k[2588]*y_cur[IDX_C2H3I] - k[2589]*y_cur[IDX_C2H4I] - - k[2590]*y_cur[IDX_C2H4I] - k[2591]*y_cur[IDX_C2H5I] - - k[2592]*y_cur[IDX_C2H5OHI] - k[2593]*y_cur[IDX_C2H5OHI] - - k[2594]*y_cur[IDX_C2H5OHI] - k[2595]*y_cur[IDX_C2H5OHI] - - k[2596]*y_cur[IDX_C2H5OHI] - k[2597]*y_cur[IDX_C2HI] - - k[2598]*y_cur[IDX_C2NI] - k[2599]*y_cur[IDX_C2OI] - - k[2600]*y_cur[IDX_C2SI] - k[2601]*y_cur[IDX_C3I] - - k[2602]*y_cur[IDX_C3H2I] - k[2603]*y_cur[IDX_C3HI] - - k[2604]*y_cur[IDX_C3NI] - k[2605]*y_cur[IDX_C3OI] - - k[2606]*y_cur[IDX_C3PI] - k[2607]*y_cur[IDX_C3SI] - - k[2608]*y_cur[IDX_C4I] - k[2609]*y_cur[IDX_C4H3I] - - k[2610]*y_cur[IDX_C4HI] - k[2611]*y_cur[IDX_C4PI] - - k[2612]*y_cur[IDX_C4SI] - k[2613]*y_cur[IDX_C5I] - - k[2614]*y_cur[IDX_C5H2I] - k[2615]*y_cur[IDX_C5HI] - - k[2616]*y_cur[IDX_C5NI] - k[2617]*y_cur[IDX_C6I] - - k[2618]*y_cur[IDX_C6H2I] - k[2619]*y_cur[IDX_C6H6I] - - k[2620]*y_cur[IDX_C6HI] - k[2621]*y_cur[IDX_C7I] - - k[2622]*y_cur[IDX_C7H2I] - k[2623]*y_cur[IDX_C7HI] - - k[2624]*y_cur[IDX_C7NI] - k[2625]*y_cur[IDX_C8I] - - k[2626]*y_cur[IDX_C8H2I] - k[2627]*y_cur[IDX_C8HI] - - k[2628]*y_cur[IDX_C9I] - k[2629]*y_cur[IDX_C9H2I] - - k[2630]*y_cur[IDX_C9HI] - k[2631]*y_cur[IDX_C9NI] - - k[2632]*y_cur[IDX_CI] - k[2633]*y_cur[IDX_CCPI] - - k[2634]*y_cur[IDX_CH2I] - k[2635]*y_cur[IDX_CH2CCH2I] - - k[2636]*y_cur[IDX_CH2CCHI] - k[2637]*y_cur[IDX_CH2CHCNI] - - k[2638]*y_cur[IDX_CH2CNI] - k[2639]*y_cur[IDX_CH2COI] - - k[2640]*y_cur[IDX_CH2PHI] - k[2641]*y_cur[IDX_CH3I] - - k[2642]*y_cur[IDX_CH3C3NI] - k[2643]*y_cur[IDX_CH3C4HI] - - k[2644]*y_cur[IDX_CH3C5NI] - k[2645]*y_cur[IDX_CH3C6HI] - - k[2646]*y_cur[IDX_CH3C7NI] - k[2647]*y_cur[IDX_CH3CCHI] - - k[2648]*y_cur[IDX_C2H6I] - k[2649]*y_cur[IDX_CH3CHCH2I] - - k[2650]*y_cur[IDX_CH3CHCH2I] - k[2651]*y_cur[IDX_CH3CHOI] - - k[2652]*y_cur[IDX_CH3CHOI] - k[2653]*y_cur[IDX_CH3CHOI] - - k[2654]*y_cur[IDX_CH3CHOI] - k[2655]*y_cur[IDX_CH3CHOI] - - k[2656]*y_cur[IDX_CH3CHOI] - k[2657]*y_cur[IDX_CH3CHOI] - - k[2658]*y_cur[IDX_CH3CNI] - k[2659]*y_cur[IDX_CH3COCH3I] - - k[2660]*y_cur[IDX_CH3COCH3I] - k[2661]*y_cur[IDX_CH3COCH3I] - - k[2662]*y_cur[IDX_CH3COCH3I] - k[2663]*y_cur[IDX_CH3COCH3I] - - k[2664]*y_cur[IDX_CH3COCH3I] - k[2665]*y_cur[IDX_CH3COCH3I] - - k[2666]*y_cur[IDX_CH3OCH3I] - k[2667]*y_cur[IDX_CH3OHI] - - k[2668]*y_cur[IDX_CH3OHI] - k[2669]*y_cur[IDX_CH4I] - - k[2670]*y_cur[IDX_CHI] - k[2671]*y_cur[IDX_CNI] - - k[2672]*y_cur[IDX_CNOI] - k[2673]*y_cur[IDX_CNOI] - - k[2674]*y_cur[IDX_CO2I] - k[2675]*y_cur[IDX_COI] - - k[2676]*y_cur[IDX_COI] - k[2677]*y_cur[IDX_CPI] - - k[2678]*y_cur[IDX_CSI] - k[2679]*y_cur[IDX_ClI] - - k[2680]*y_cur[IDX_FeI] - k[2681]*y_cur[IDX_H2CCCI] - - k[2682]*y_cur[IDX_H2COI] - k[2683]*y_cur[IDX_H2CSI] - - k[2684]*y_cur[IDX_H2OI] - k[2685]*y_cur[IDX_H2S2I] - - k[2686]*y_cur[IDX_H2SI] - k[2687]*y_cur[IDX_H2SiOI] - - k[2688]*y_cur[IDX_HC2PI] - k[2689]*y_cur[IDX_HC3NI] - - k[2690]*y_cur[IDX_C4H2I] - k[2691]*y_cur[IDX_HC5NI] - - k[2692]*y_cur[IDX_HC7NI] - k[2693]*y_cur[IDX_HC9NI] - - k[2694]*y_cur[IDX_HCNI] - k[2695]*y_cur[IDX_HCNOI] - - k[2696]*y_cur[IDX_HCNOI] - k[2697]*y_cur[IDX_HCOI] - - k[2698]*y_cur[IDX_HCOOCH3I] - k[2699]*y_cur[IDX_HCOOHI] - - k[2700]*y_cur[IDX_HCOOHI] - k[2701]*y_cur[IDX_HCPI] - - k[2702]*y_cur[IDX_HCSI] - k[2703]*y_cur[IDX_HCSiI] - - k[2704]*y_cur[IDX_HClI] - k[2705]*y_cur[IDX_HFI] - - k[2706]*y_cur[IDX_HNCI] - k[2707]*y_cur[IDX_HNCOI] - - k[2708]*y_cur[IDX_HNCOI] - k[2709]*y_cur[IDX_HNOI] - - k[2710]*y_cur[IDX_HNSiI] - k[2711]*y_cur[IDX_HOCNI] - - k[2712]*y_cur[IDX_HOCNI] - k[2713]*y_cur[IDX_HONCI] - - k[2714]*y_cur[IDX_HPOI] - k[2715]*y_cur[IDX_HS2I] - - k[2716]*y_cur[IDX_HSI] - k[2717]*y_cur[IDX_MgI] - - k[2718]*y_cur[IDX_N2I] - k[2719]*y_cur[IDX_N2OI] - - k[2720]*y_cur[IDX_NCCNI] - k[2721]*y_cur[IDX_NH2I] - - k[2722]*y_cur[IDX_NH2CNI] - k[2723]*y_cur[IDX_NH3I] - - k[2724]*y_cur[IDX_NHI] - k[2725]*y_cur[IDX_NO2I] - - k[2726]*y_cur[IDX_NOI] - k[2727]*y_cur[IDX_NSI] - - k[2728]*y_cur[IDX_NaI] - k[2729]*y_cur[IDX_O2I] - - k[2730]*y_cur[IDX_OI] - k[2731]*y_cur[IDX_OI] - - k[2732]*y_cur[IDX_OCSI] - k[2733]*y_cur[IDX_OHI] - - k[2734]*y_cur[IDX_PI] - k[2735]*y_cur[IDX_PH2I] - - k[2736]*y_cur[IDX_PHI] - k[2737]*y_cur[IDX_PNI] - - k[2738]*y_cur[IDX_POI] - k[2739]*y_cur[IDX_S2I] - - k[2740]*y_cur[IDX_SI] - k[2741]*y_cur[IDX_SO2I] - - k[2742]*y_cur[IDX_SOI] - k[2743]*y_cur[IDX_SiI] - - k[2744]*y_cur[IDX_SiC2I] - k[2745]*y_cur[IDX_SiC2H2I] - - k[2746]*y_cur[IDX_SiC2HI] - k[2747]*y_cur[IDX_SiC3I] - - k[2748]*y_cur[IDX_SiC3HI] - k[2749]*y_cur[IDX_SiC4I] - - k[2750]*y_cur[IDX_SiCI] - k[2751]*y_cur[IDX_SiCH2I] - - k[2752]*y_cur[IDX_SiCH3I] - k[2753]*y_cur[IDX_SiH2I] - - k[2754]*y_cur[IDX_SiH3I] - k[2755]*y_cur[IDX_SiH4I] - - k[2756]*y_cur[IDX_SiHI] - k[2757]*y_cur[IDX_SiNI] - - k[2758]*y_cur[IDX_SiNCI] - k[2759]*y_cur[IDX_SiO2I] - - k[2760]*y_cur[IDX_SiOI] - k[2761]*y_cur[IDX_SiSI] - - k[3027]*y_cur[IDX_HNC3I] - k[3767]*y_cur[IDX_OCNI] - - k[3768]*y_cur[IDX_OCNI] - k[3899]*y_cur[IDX_CM] - - k[3934]*y_cur[IDX_C10M] - k[3969]*y_cur[IDX_C10HM] - - k[4004]*y_cur[IDX_C2M] - k[4039]*y_cur[IDX_C2HM] - - k[4074]*y_cur[IDX_C3M] - k[4109]*y_cur[IDX_C3HM] - - k[4144]*y_cur[IDX_C3NM] - k[4179]*y_cur[IDX_C4M] - - k[4214]*y_cur[IDX_C4HM] - k[4249]*y_cur[IDX_C5M] - - k[4284]*y_cur[IDX_C5HM] - k[4319]*y_cur[IDX_C5NM] - - k[4354]*y_cur[IDX_C6M] - k[4389]*y_cur[IDX_C6HM] - - k[4424]*y_cur[IDX_C7M] - k[4459]*y_cur[IDX_C7HM] - - k[4494]*y_cur[IDX_C8M] - k[4529]*y_cur[IDX_C8HM] - - k[4564]*y_cur[IDX_C9M] - k[4599]*y_cur[IDX_C9HM] - - k[4634]*y_cur[IDX_CHM] - k[4669]*y_cur[IDX_CNM] - - k[4705]*y_cur[IDX_HM] - k[4740]*y_cur[IDX_OM] - - k[4775]*y_cur[IDX_O2M] - k[4810]*y_cur[IDX_OHM] - - k[4845]*y_cur[IDX_SM] - k[5628]*y_cur[IDX_CH3OI] - - k[5634]*y_cur[IDX_CH2OHI] - k[5640]*y_cur[IDX_CH3COI] - - k[5645]*y_cur[IDX_COOHI] - k[5650]*y_cur[IDX_COOCH3I] - - k[5656]*y_cur[IDX_CH2OHCOI] - k[5662]*y_cur[IDX_CH2OHCHOI] - - k[5668]*y_cur[IDX_CH3COOHI] - k[6168] - k[6169] - - k[6310]*y_cur[IDX_GRAINM] - k[6311]*y_cur[IDX_GRAINM]; - data[jistart + 13291] = 0.0 - k[2688]*y_cur[IDX_H3II]; - data[jistart + 13292] = 0.0 - k[2689]*y_cur[IDX_H3II]; - data[jistart + 13293] = 0.0 - k[2691]*y_cur[IDX_H3II]; - data[jistart + 13294] = 0.0 - k[2692]*y_cur[IDX_H3II]; - data[jistart + 13295] = 0.0 - k[2693]*y_cur[IDX_H3II]; - data[jistart + 13296] = 0.0 - k[2694]*y_cur[IDX_H3II]; - data[jistart + 13297] = 0.0 - k[2695]*y_cur[IDX_H3II] - - k[2696]*y_cur[IDX_H3II]; - data[jistart + 13298] = 0.0 + k[2389]*y_cur[IDX_H2II] - - k[2697]*y_cur[IDX_H3II]; - data[jistart + 13299] = 0.0 - k[2698]*y_cur[IDX_H3II]; - data[jistart + 13300] = 0.0 - k[2699]*y_cur[IDX_H3II] - - k[2700]*y_cur[IDX_H3II]; - data[jistart + 13301] = 0.0 - k[2701]*y_cur[IDX_H3II]; - data[jistart + 13302] = 0.0 - k[2702]*y_cur[IDX_H3II]; - data[jistart + 13303] = 0.0 - k[2703]*y_cur[IDX_H3II]; - data[jistart + 13304] = 0.0 - k[2704]*y_cur[IDX_H3II]; - data[jistart + 13305] = 0.0 - k[2705]*y_cur[IDX_H3II]; - data[jistart + 13306] = 0.0 - k[2706]*y_cur[IDX_H3II]; - data[jistart + 13307] = 0.0 - k[3027]*y_cur[IDX_H3II]; - data[jistart + 13308] = 0.0 - k[2707]*y_cur[IDX_H3II] - - k[2708]*y_cur[IDX_H3II]; - data[jistart + 13309] = 0.0 - k[2709]*y_cur[IDX_H3II]; - data[jistart + 13310] = 0.0 - k[2710]*y_cur[IDX_H3II]; - data[jistart + 13311] = 0.0 - k[2711]*y_cur[IDX_H3II] - - k[2712]*y_cur[IDX_H3II]; - data[jistart + 13312] = 0.0 - k[2713]*y_cur[IDX_H3II]; - data[jistart + 13313] = 0.0 - k[2714]*y_cur[IDX_H3II]; - data[jistart + 13314] = 0.0 - k[2716]*y_cur[IDX_H3II]; - data[jistart + 13315] = 0.0 - k[2715]*y_cur[IDX_H3II]; - data[jistart + 13316] = 0.0 + k[2458]*y_cur[IDX_H2I]; - data[jistart + 13317] = 0.0 - k[2717]*y_cur[IDX_H3II]; - data[jistart + 13318] = 0.0 - k[2718]*y_cur[IDX_H3II]; - data[jistart + 13319] = 0.0 - k[2719]*y_cur[IDX_H3II]; - data[jistart + 13320] = 0.0 - k[2720]*y_cur[IDX_H3II]; - data[jistart + 13321] = 0.0 - k[2724]*y_cur[IDX_H3II]; - data[jistart + 13322] = 0.0 + k[2461]*y_cur[IDX_H2I]; - data[jistart + 13323] = 0.0 - k[2721]*y_cur[IDX_H3II]; - data[jistart + 13324] = 0.0 - k[2722]*y_cur[IDX_H3II]; - data[jistart + 13325] = 0.0 - k[2723]*y_cur[IDX_H3II]; - data[jistart + 13326] = 0.0 - k[2726]*y_cur[IDX_H3II]; - data[jistart + 13327] = 0.0 - k[2725]*y_cur[IDX_H3II]; - data[jistart + 13328] = 0.0 - k[2727]*y_cur[IDX_H3II]; - data[jistart + 13329] = 0.0 - k[2728]*y_cur[IDX_H3II]; - data[jistart + 13330] = 0.0 - k[2730]*y_cur[IDX_H3II] - - k[2731]*y_cur[IDX_H3II]; - data[jistart + 13331] = 0.0 - k[4740]*y_cur[IDX_H3II]; - data[jistart + 13332] = 0.0 - k[2729]*y_cur[IDX_H3II]; - data[jistart + 13333] = 0.0 - k[4775]*y_cur[IDX_H3II]; - data[jistart + 13334] = 0.0 + k[2468]*y_cur[IDX_H2I]; - data[jistart + 13335] = 0.0 - k[3767]*y_cur[IDX_H3II] - - k[3768]*y_cur[IDX_H3II]; - data[jistart + 13336] = 0.0 - k[2732]*y_cur[IDX_H3II]; - data[jistart + 13337] = 0.0 - k[2733]*y_cur[IDX_H3II]; - data[jistart + 13338] = 0.0 - k[4810]*y_cur[IDX_H3II]; - data[jistart + 13339] = 0.0 - k[2734]*y_cur[IDX_H3II]; - data[jistart + 13340] = 0.0 - k[2736]*y_cur[IDX_H3II]; - data[jistart + 13341] = 0.0 - k[2735]*y_cur[IDX_H3II]; - data[jistart + 13342] = 0.0 - k[2737]*y_cur[IDX_H3II]; - data[jistart + 13343] = 0.0 - k[2738]*y_cur[IDX_H3II]; - data[jistart + 13344] = 0.0 - k[2740]*y_cur[IDX_H3II]; - data[jistart + 13345] = 0.0 - k[4845]*y_cur[IDX_H3II]; - data[jistart + 13346] = 0.0 - k[2739]*y_cur[IDX_H3II]; - data[jistart + 13347] = 0.0 - k[2742]*y_cur[IDX_H3II]; - data[jistart + 13348] = 0.0 - k[2741]*y_cur[IDX_H3II]; - data[jistart + 13349] = 0.0 - k[2743]*y_cur[IDX_H3II]; - data[jistart + 13350] = 0.0 - k[2750]*y_cur[IDX_H3II]; - data[jistart + 13351] = 0.0 - k[2744]*y_cur[IDX_H3II]; - data[jistart + 13352] = 0.0 - k[2746]*y_cur[IDX_H3II]; - data[jistart + 13353] = 0.0 - k[2745]*y_cur[IDX_H3II]; - data[jistart + 13354] = 0.0 - k[2747]*y_cur[IDX_H3II]; - data[jistart + 13355] = 0.0 - k[2748]*y_cur[IDX_H3II]; - data[jistart + 13356] = 0.0 - k[2749]*y_cur[IDX_H3II]; - data[jistart + 13357] = 0.0 - k[2751]*y_cur[IDX_H3II]; - data[jistart + 13358] = 0.0 - k[2752]*y_cur[IDX_H3II]; - data[jistart + 13359] = 0.0 - k[2756]*y_cur[IDX_H3II]; - data[jistart + 13360] = 0.0 - k[2753]*y_cur[IDX_H3II]; - data[jistart + 13361] = 0.0 - k[2754]*y_cur[IDX_H3II]; - data[jistart + 13362] = 0.0 - k[2755]*y_cur[IDX_H3II]; - data[jistart + 13363] = 0.0 - k[2757]*y_cur[IDX_H3II]; - data[jistart + 13364] = 0.0 - k[2758]*y_cur[IDX_H3II]; - data[jistart + 13365] = 0.0 - k[2760]*y_cur[IDX_H3II]; - data[jistart + 13366] = 0.0 - k[2759]*y_cur[IDX_H3II]; - data[jistart + 13367] = 0.0 - k[2761]*y_cur[IDX_H3II]; - data[jistart + 13368] = 0.0 - k[1025]*y_cur[IDX_H3II] - - k[1026]*y_cur[IDX_H3II]; - data[jistart + 13369] = 0.0 + k[5513]*y_cur[IDX_COI]; - data[jistart + 13370] = 0.0 + k[5513]*y_cur[IDX_C2H3II]; - data[jistart + 13371] = 0.0 - k[6666]*y_cur[IDX_H3C3OII]; - data[jistart + 13372] = 0.0 - k[1027]*y_cur[IDX_eM] - - k[6666]*y_cur[IDX_GRAINM]; - data[jistart + 13373] = 0.0 - k[1027]*y_cur[IDX_H3C3OII]; - data[jistart + 13374] = 0.0 + k[1895]*y_cur[IDX_CH3C3NHII]; - data[jistart + 13375] = 0.0 + k[5508]*y_cur[IDX_HC3NI]; - data[jistart + 13376] = 0.0 + k[3417]*y_cur[IDX_NI]; - data[jistart + 13377] = 0.0 + k[1895]*y_cur[IDX_CI]; - data[jistart + 13378] = 0.0 + k[3455]*y_cur[IDX_NI]; - data[jistart + 13379] = 0.0 - k[6804]*y_cur[IDX_H3C5NII] - - k[6805]*y_cur[IDX_H3C5NII]; - data[jistart + 13380] = 0.0 - k[1028]*y_cur[IDX_eM] - - k[1029]*y_cur[IDX_eM] - k[6804]*y_cur[IDX_GRAINM] - - k[6805]*y_cur[IDX_GRAINM]; - data[jistart + 13381] = 0.0 + k[5508]*y_cur[IDX_C2H2II]; - data[jistart + 13382] = 0.0 + k[3417]*y_cur[IDX_C5H5II] + - k[3455]*y_cur[IDX_CH3C4HII]; - data[jistart + 13383] = 0.0 - k[1028]*y_cur[IDX_H3C5NII] - - k[1029]*y_cur[IDX_H3C5NII]; - data[jistart + 13384] = 0.0 + k[1896]*y_cur[IDX_CH3C5NHII]; - data[jistart + 13385] = 0.0 + k[5509]*y_cur[IDX_HC5NI]; - data[jistart + 13386] = 0.0 + k[5517]*y_cur[IDX_HC3NI]; - data[jistart + 13387] = 0.0 + k[3434]*y_cur[IDX_NI]; - data[jistart + 13388] = 0.0 + k[3435]*y_cur[IDX_NI]; - data[jistart + 13389] = 0.0 + k[1896]*y_cur[IDX_CI]; - data[jistart + 13390] = 0.0 - k[6851]*y_cur[IDX_H3C7NII] - - k[6852]*y_cur[IDX_H3C7NII]; - data[jistart + 13391] = 0.0 - k[1030]*y_cur[IDX_eM] - - k[1031]*y_cur[IDX_eM] - k[6851]*y_cur[IDX_GRAINM] - - k[6852]*y_cur[IDX_GRAINM]; - data[jistart + 13392] = 0.0 + k[5517]*y_cur[IDX_C4H2II]; - data[jistart + 13393] = 0.0 + k[5509]*y_cur[IDX_C2H2II]; - data[jistart + 13394] = 0.0 + k[3434]*y_cur[IDX_C7H4II] + - k[3435]*y_cur[IDX_C7H5II]; - data[jistart + 13395] = 0.0 - k[1030]*y_cur[IDX_H3C7NII] - - k[1031]*y_cur[IDX_H3C7NII]; - data[jistart + 13396] = 0.0 + k[1897]*y_cur[IDX_CH3C7NHII]; - data[jistart + 13397] = 0.0 + k[5510]*y_cur[IDX_HC7NI]; - data[jistart + 13398] = 0.0 + k[5519]*y_cur[IDX_HC5NI]; - data[jistart + 13399] = 0.0 + k[3451]*y_cur[IDX_NI]; - data[jistart + 13400] = 0.0 + k[1897]*y_cur[IDX_CI]; - data[jistart + 13401] = 0.0 - k[6882]*y_cur[IDX_H3C9NII] - - k[6883]*y_cur[IDX_H3C9NII]; - data[jistart + 13402] = 0.0 - k[1032]*y_cur[IDX_eM] - - k[1033]*y_cur[IDX_eM] - k[6882]*y_cur[IDX_GRAINM] - - k[6883]*y_cur[IDX_GRAINM]; - data[jistart + 13403] = 0.0 + k[5519]*y_cur[IDX_C4H2II]; - data[jistart + 13404] = 0.0 + k[5510]*y_cur[IDX_C2H2II]; - data[jistart + 13405] = 0.0 + k[3451]*y_cur[IDX_C9H4II]; - data[jistart + 13406] = 0.0 - k[1032]*y_cur[IDX_H3C9NII] - - k[1033]*y_cur[IDX_H3C9NII]; - data[jistart + 13407] = 0.0 + k[1307]*y_cur[IDX_C2H5OHI] + - k[1381]*y_cur[IDX_CH3OHI] + k[5627]*y_cur[IDX_CH3OI]; - data[jistart + 13408] = 0.0 + k[1469]*y_cur[IDX_H2COI]; - data[jistart + 13409] = 0.0 + k[3849]*y_cur[IDX_SOII]; - data[jistart + 13410] = 0.0 + k[1720]*y_cur[IDX_H2COI]; - data[jistart + 13411] = 0.0 + k[1307]*y_cur[IDX_CII] + - k[2596]*y_cur[IDX_H3II]; - data[jistart + 13412] = 0.0 + k[2122]*y_cur[IDX_CH3OHI]; - data[jistart + 13413] = 0.0 - k[2764]*y_cur[IDX_H3COII]; - data[jistart + 13414] = 0.0 - k[2248]*y_cur[IDX_H3COII]; - data[jistart + 13415] = 0.0 + k[1939]*y_cur[IDX_CH3OHI] + - k[1949]*y_cur[IDX_H2COI]; - data[jistart + 13416] = 0.0 + k[1982]*y_cur[IDX_H2OI]; - data[jistart + 13417] = 0.0 + k[5665]*y_cur[IDX_HeII]; - data[jistart + 13418] = 0.0 + k[5659]*y_cur[IDX_HeII]; - data[jistart + 13419] = 0.0 + k[2067]*y_cur[IDX_CH3CHOI] + - k[2073]*y_cur[IDX_CH3OHI] + k[2089]*y_cur[IDX_O2I]; - data[jistart + 13420] = 0.0 + k[3663]*y_cur[IDX_O2II]; - data[jistart + 13421] = 0.0 + k[2067]*y_cur[IDX_CH3II]; - data[jistart + 13422] = 0.0 + k[2665]*y_cur[IDX_H3II]; - data[jistart + 13423] = 0.0 + k[5627]*y_cur[IDX_CII]; - data[jistart + 13424] = 0.0 + k[1381]*y_cur[IDX_CII] + - k[1939]*y_cur[IDX_CHII] + k[2073]*y_cur[IDX_CH3II] + - k[2122]*y_cur[IDX_C3HII] + k[2331]*y_cur[IDX_HII] - - k[2762]*y_cur[IDX_H3COII] + k[3337]*y_cur[IDX_NII] + - k[3637]*y_cur[IDX_OII] + k[3665]*y_cur[IDX_O2II] + k[6123]; - data[jistart + 13425] = 0.0 + k[2194]*y_cur[IDX_H2COII]; - data[jistart + 13426] = 0.0 + k[2141]*y_cur[IDX_H2COI]; - data[jistart + 13427] = 0.0 + k[2225]*y_cur[IDX_H2COI] + - k[3728]*y_cur[IDX_OI]; - data[jistart + 13428] = 0.0 + k[5654]*y_cur[IDX_HeII]; - data[jistart + 13429] = 0.0 - k[6414]*y_cur[IDX_H3COII] - - k[6415]*y_cur[IDX_H3COII] - k[6416]*y_cur[IDX_H3COII] - - k[6417]*y_cur[IDX_H3COII] - k[6418]*y_cur[IDX_H3COII]; - data[jistart + 13430] = 0.0 + k[2331]*y_cur[IDX_CH3OHI]; - data[jistart + 13431] = 0.0 + k[1469]*y_cur[IDX_C2HII] + - k[1720]*y_cur[IDX_C2H5II] + k[1949]*y_cur[IDX_CHII] + - k[2141]*y_cur[IDX_CH4II] + k[2225]*y_cur[IDX_CH5II] + - k[2488]*y_cur[IDX_H2COII] + k[2496]*y_cur[IDX_H3SII] + - k[2497]*y_cur[IDX_HNOII] + k[2499]*y_cur[IDX_O2HII] + - k[2508]*y_cur[IDX_H2OII] + k[2682]*y_cur[IDX_H3II] + - k[2799]*y_cur[IDX_H3OII] + k[2855]*y_cur[IDX_HCNII] + - k[2890]*y_cur[IDX_HCNHII] + k[2891]*y_cur[IDX_HCNHII] + - k[2958]*y_cur[IDX_HCOII] + k[3373]*y_cur[IDX_N2HII] + - k[3487]*y_cur[IDX_NHII] + k[3510]*y_cur[IDX_NH2II] + - k[3778]*y_cur[IDX_OHII]; - data[jistart + 13432] = 0.0 + k[2194]*y_cur[IDX_CH4I] + - k[2488]*y_cur[IDX_H2COI] + k[3007]*y_cur[IDX_HCOI] + - k[3611]*y_cur[IDX_NHI]; - data[jistart + 13433] = 0.0 + k[1982]*y_cur[IDX_CH2II] - - k[2545]*y_cur[IDX_H3COII]; - data[jistart + 13434] = 0.0 + k[2508]*y_cur[IDX_H2COI]; - data[jistart + 13435] = 0.0 - k[2763]*y_cur[IDX_H3COII]; - data[jistart + 13436] = 0.0 + k[2596]*y_cur[IDX_C2H5OHI] + - k[2665]*y_cur[IDX_CH3COCH3I] + k[2682]*y_cur[IDX_H2COI]; - data[jistart + 13437] = 0.0 - k[1034]*y_cur[IDX_eM] - - k[1035]*y_cur[IDX_eM] - k[1036]*y_cur[IDX_eM] - - k[1037]*y_cur[IDX_eM] - k[1038]*y_cur[IDX_eM] - - k[2248]*y_cur[IDX_CHI] - k[2545]*y_cur[IDX_H2OI] - - k[2762]*y_cur[IDX_CH3OHI] - k[2763]*y_cur[IDX_H2SI] - - k[2764]*y_cur[IDX_C4H2I] - k[2765]*y_cur[IDX_HCOOHI] - - k[2875]*y_cur[IDX_HCNI] - k[3039]*y_cur[IDX_HNCI] - - k[3537]*y_cur[IDX_NH2I] - k[3577]*y_cur[IDX_NH3I] - - k[3628]*y_cur[IDX_NaI] - k[6414]*y_cur[IDX_GRAINM] - - k[6415]*y_cur[IDX_GRAINM] - k[6416]*y_cur[IDX_GRAINM] - - k[6417]*y_cur[IDX_GRAINM] - k[6418]*y_cur[IDX_GRAINM]; - data[jistart + 13438] = 0.0 + k[2799]*y_cur[IDX_H2COI]; - data[jistart + 13439] = 0.0 + k[2496]*y_cur[IDX_H2COI]; - data[jistart + 13440] = 0.0 - k[2875]*y_cur[IDX_H3COII]; - data[jistart + 13441] = 0.0 + k[2855]*y_cur[IDX_H2COI]; - data[jistart + 13442] = 0.0 + k[2890]*y_cur[IDX_H2COI] + - k[2891]*y_cur[IDX_H2COI]; - data[jistart + 13443] = 0.0 + k[3007]*y_cur[IDX_H2COII]; - data[jistart + 13444] = 0.0 + k[2958]*y_cur[IDX_H2COI]; - data[jistart + 13445] = 0.0 - k[2765]*y_cur[IDX_H3COII]; - data[jistart + 13446] = 0.0 - k[3039]*y_cur[IDX_H3COII]; - data[jistart + 13447] = 0.0 + k[2497]*y_cur[IDX_H2COI]; - data[jistart + 13448] = 0.0 + k[5654]*y_cur[IDX_COOCH3I] + - k[5659]*y_cur[IDX_CH2OHCOI] + k[5665]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 13449] = 0.0 + k[3337]*y_cur[IDX_CH3OHI]; - data[jistart + 13450] = 0.0 + k[3373]*y_cur[IDX_H2COI]; - data[jistart + 13451] = 0.0 + k[3611]*y_cur[IDX_H2COII]; - data[jistart + 13452] = 0.0 + k[3487]*y_cur[IDX_H2COI]; - data[jistart + 13453] = 0.0 - k[3537]*y_cur[IDX_H3COII]; - data[jistart + 13454] = 0.0 + k[3510]*y_cur[IDX_H2COI]; - data[jistart + 13455] = 0.0 - k[3577]*y_cur[IDX_H3COII]; - data[jistart + 13456] = 0.0 - k[3628]*y_cur[IDX_H3COII]; - data[jistart + 13457] = 0.0 + k[3728]*y_cur[IDX_CH5II]; - data[jistart + 13458] = 0.0 + k[3637]*y_cur[IDX_CH3OHI]; - data[jistart + 13459] = 0.0 + k[2089]*y_cur[IDX_CH3II]; - data[jistart + 13460] = 0.0 + k[3663]*y_cur[IDX_CH3CHCH2I] + - k[3665]*y_cur[IDX_CH3OHI]; - data[jistart + 13461] = 0.0 + k[2499]*y_cur[IDX_H2COI]; - data[jistart + 13462] = 0.0 + k[3778]*y_cur[IDX_H2COI]; - data[jistart + 13463] = 0.0 + k[3849]*y_cur[IDX_C2H4I]; - data[jistart + 13464] = 0.0 - k[1034]*y_cur[IDX_H3COII] - - k[1035]*y_cur[IDX_H3COII] - k[1036]*y_cur[IDX_H3COII] - - k[1037]*y_cur[IDX_H3COII] - k[1038]*y_cur[IDX_H3COII]; - data[jistart + 13465] = 0.0 + k[3850]*y_cur[IDX_SOII]; - data[jistart + 13466] = 0.0 + k[1675]*y_cur[IDX_H2SI]; - data[jistart + 13467] = 0.0 + k[1983]*y_cur[IDX_H2SI]; - data[jistart + 13468] = 0.0 + k[2078]*y_cur[IDX_H2SI] + - k[2092]*y_cur[IDX_OCSI]; - data[jistart + 13469] = 0.0 + k[2203]*y_cur[IDX_HSII] + - k[2215]*y_cur[IDX_SII]; - data[jistart + 13470] = 0.0 - k[6601]*y_cur[IDX_H3CSII] - - k[6602]*y_cur[IDX_H3CSII]; - data[jistart + 13471] = 0.0 + k[2683]*y_cur[IDX_H3II] + - k[2959]*y_cur[IDX_HCOII]; - data[jistart + 13472] = 0.0 + k[1675]*y_cur[IDX_C2H4II] + - k[1983]*y_cur[IDX_CH2II] + k[2078]*y_cur[IDX_CH3II]; - data[jistart + 13473] = 0.0 + k[2683]*y_cur[IDX_H2CSI]; - data[jistart + 13474] = 0.0 - k[1039]*y_cur[IDX_eM] - - k[1040]*y_cur[IDX_eM] - k[6601]*y_cur[IDX_GRAINM] - - k[6602]*y_cur[IDX_GRAINM]; - data[jistart + 13475] = 0.0 + k[2959]*y_cur[IDX_H2CSI]; - data[jistart + 13476] = 0.0 + k[2203]*y_cur[IDX_CH4I]; - data[jistart + 13477] = 0.0 + k[2092]*y_cur[IDX_CH3II]; - data[jistart + 13478] = 0.0 + k[2215]*y_cur[IDX_CH4I]; - data[jistart + 13479] = 0.0 + k[3850]*y_cur[IDX_C2H4I]; - data[jistart + 13480] = 0.0 - k[1039]*y_cur[IDX_H3CSII] - - k[1040]*y_cur[IDX_H3CSII]; - data[jistart + 13481] = 0.0 - k[1901]*y_cur[IDX_H3OII]; - data[jistart + 13482] = 0.0 - k[3900]*y_cur[IDX_H3OII]; - data[jistart + 13483] = 0.0 - k[3935]*y_cur[IDX_H3OII]; - data[jistart + 13484] = 0.0 - k[3970]*y_cur[IDX_H3OII]; - data[jistart + 13485] = 0.0 - k[2766]*y_cur[IDX_H3OII]; - data[jistart + 13486] = 0.0 - k[4005]*y_cur[IDX_H3OII]; - data[jistart + 13487] = 0.0 - k[4040]*y_cur[IDX_H3OII]; - data[jistart + 13488] = 0.0 - k[5567]*y_cur[IDX_H3OII]; - data[jistart + 13489] = 0.0 + k[2522]*y_cur[IDX_H2OI]; - data[jistart + 13490] = 0.0 - k[2767]*y_cur[IDX_H3OII]; - data[jistart + 13491] = 0.0 + k[2523]*y_cur[IDX_H2OI]; - data[jistart + 13492] = 0.0 - k[5568]*y_cur[IDX_H3OII]; - data[jistart + 13493] = 0.0 + k[2524]*y_cur[IDX_H2OI]; - data[jistart + 13494] = 0.0 - k[2768]*y_cur[IDX_H3OII]; - data[jistart + 13495] = 0.0 + k[2506]*y_cur[IDX_H2OII] + - k[3772]*y_cur[IDX_OHII]; - data[jistart + 13496] = 0.0 + k[2534]*y_cur[IDX_H2OI]; - data[jistart + 13497] = 0.0 - k[2769]*y_cur[IDX_H3OII]; - data[jistart + 13498] = 0.0 - k[2770]*y_cur[IDX_H3OII]; - data[jistart + 13499] = 0.0 - k[2771]*y_cur[IDX_H3OII]; - data[jistart + 13500] = 0.0 - k[4075]*y_cur[IDX_H3OII]; - data[jistart + 13501] = 0.0 - k[2773]*y_cur[IDX_H3OII]; - data[jistart + 13502] = 0.0 - k[4110]*y_cur[IDX_H3OII]; - data[jistart + 13503] = 0.0 - k[2772]*y_cur[IDX_H3OII]; - data[jistart + 13504] = 0.0 - k[2774]*y_cur[IDX_H3OII]; - data[jistart + 13505] = 0.0 - k[4145]*y_cur[IDX_H3OII]; - data[jistart + 13506] = 0.0 - k[2775]*y_cur[IDX_H3OII]; - data[jistart + 13507] = 0.0 - k[2776]*y_cur[IDX_H3OII]; - data[jistart + 13508] = 0.0 - k[2777]*y_cur[IDX_H3OII]; - data[jistart + 13509] = 0.0 - k[2778]*y_cur[IDX_H3OII]; - data[jistart + 13510] = 0.0 - k[4180]*y_cur[IDX_H3OII]; - data[jistart + 13511] = 0.0 - k[2780]*y_cur[IDX_H3OII]; - data[jistart + 13512] = 0.0 - k[4215]*y_cur[IDX_H3OII]; - data[jistart + 13513] = 0.0 - k[2805]*y_cur[IDX_H3OII]; - data[jistart + 13514] = 0.0 - k[2779]*y_cur[IDX_H3OII]; - data[jistart + 13515] = 0.0 - k[2781]*y_cur[IDX_H3OII]; - data[jistart + 13516] = 0.0 - k[2782]*y_cur[IDX_H3OII]; - data[jistart + 13517] = 0.0 - k[4250]*y_cur[IDX_H3OII]; - data[jistart + 13518] = 0.0 - k[4285]*y_cur[IDX_H3OII]; - data[jistart + 13519] = 0.0 - k[4320]*y_cur[IDX_H3OII]; - data[jistart + 13520] = 0.0 - k[4355]*y_cur[IDX_H3OII]; - data[jistart + 13521] = 0.0 - k[4390]*y_cur[IDX_H3OII]; - data[jistart + 13522] = 0.0 - k[2783]*y_cur[IDX_H3OII]; - data[jistart + 13523] = 0.0 - k[4425]*y_cur[IDX_H3OII]; - data[jistart + 13524] = 0.0 - k[4460]*y_cur[IDX_H3OII]; - data[jistart + 13525] = 0.0 - k[4495]*y_cur[IDX_H3OII]; - data[jistart + 13526] = 0.0 - k[4530]*y_cur[IDX_H3OII]; - data[jistart + 13527] = 0.0 - k[4565]*y_cur[IDX_H3OII]; - data[jistart + 13528] = 0.0 - k[4600]*y_cur[IDX_H3OII]; - data[jistart + 13529] = 0.0 - k[2784]*y_cur[IDX_H3OII]; - data[jistart + 13530] = 0.0 - k[2249]*y_cur[IDX_H3OII]; - data[jistart + 13531] = 0.0 + k[1952]*y_cur[IDX_H2OI]; - data[jistart + 13532] = 0.0 - k[4635]*y_cur[IDX_H3OII]; - data[jistart + 13533] = 0.0 - k[2004]*y_cur[IDX_H3OII]; - data[jistart + 13534] = 0.0 - k[2785]*y_cur[IDX_H3OII]; - data[jistart + 13535] = 0.0 - k[2786]*y_cur[IDX_H3OII]; - data[jistart + 13536] = 0.0 - k[2787]*y_cur[IDX_H3OII]; - data[jistart + 13537] = 0.0 - k[5635]*y_cur[IDX_H3OII]; - data[jistart + 13538] = 0.0 - k[5663]*y_cur[IDX_H3OII]; - data[jistart + 13539] = 0.0 - k[5657]*y_cur[IDX_H3OII]; - data[jistart + 13540] = 0.0 - k[2788]*y_cur[IDX_H3OII]; - data[jistart + 13541] = 0.0 - k[2789]*y_cur[IDX_H3OII]; - data[jistart + 13542] = 0.0 - k[2790]*y_cur[IDX_H3OII]; - data[jistart + 13543] = 0.0 + k[2657]*y_cur[IDX_H3II] - - k[2791]*y_cur[IDX_H3OII]; - data[jistart + 13544] = 0.0 - k[2792]*y_cur[IDX_H3OII]; - data[jistart + 13545] = 0.0 - k[2793]*y_cur[IDX_H3OII]; - data[jistart + 13546] = 0.0 - k[5669]*y_cur[IDX_H3OII]; - data[jistart + 13547] = 0.0 - k[5629]*y_cur[IDX_H3OII]; - data[jistart + 13548] = 0.0 - k[2794]*y_cur[IDX_H3OII]; - data[jistart + 13549] = 0.0 - k[2795]*y_cur[IDX_H3OII]; - data[jistart + 13550] = 0.0 + k[2195]*y_cur[IDX_H2OII] + - k[2210]*y_cur[IDX_OHII]; - data[jistart + 13551] = 0.0 + k[2142]*y_cur[IDX_H2OI]; - data[jistart + 13552] = 0.0 + k[2226]*y_cur[IDX_H2OI] + - k[3729]*y_cur[IDX_OI]; - data[jistart + 13553] = 0.0 - k[4670]*y_cur[IDX_H3OII]; - data[jistart + 13554] = 0.0 - k[5651]*y_cur[IDX_H3OII]; - data[jistart + 13555] = 0.0 - k[2796]*y_cur[IDX_H3OII]; - data[jistart + 13556] = 0.0 - k[2797]*y_cur[IDX_H3OII]; - data[jistart + 13557] = 0.0 - k[6343]*y_cur[IDX_H3OII] - - k[6344]*y_cur[IDX_H3OII] - k[6345]*y_cur[IDX_H3OII] - - k[6346]*y_cur[IDX_H3OII]; - data[jistart + 13558] = 0.0 - k[4706]*y_cur[IDX_H3OII]; - data[jistart + 13559] = 0.0 + k[2442]*y_cur[IDX_H2OII]; - data[jistart + 13560] = 0.0 + k[2386]*y_cur[IDX_H2OI]; - data[jistart + 13561] = 0.0 - k[2798]*y_cur[IDX_H3OII]; - data[jistart + 13562] = 0.0 - k[2799]*y_cur[IDX_H3OII]; - data[jistart + 13563] = 0.0 + k[2542]*y_cur[IDX_H2OI]; - data[jistart + 13564] = 0.0 + k[2543]*y_cur[IDX_H2OI]; - data[jistart + 13565] = 0.0 + k[1952]*y_cur[IDX_CHII] + - k[2142]*y_cur[IDX_CH4II] + k[2226]*y_cur[IDX_CH5II] + - k[2386]*y_cur[IDX_H2II] + k[2509]*y_cur[IDX_H2OII] + - k[2522]*y_cur[IDX_C2H2II] + k[2523]*y_cur[IDX_C2H3II] + - k[2524]*y_cur[IDX_C2H5II] + k[2534]*y_cur[IDX_C2H6II] + - k[2542]*y_cur[IDX_H2COII] + k[2543]*y_cur[IDX_H2ClII] + - k[2544]*y_cur[IDX_H2SII] + k[2545]*y_cur[IDX_H3COII] + - k[2546]*y_cur[IDX_HCNII] + k[2547]*y_cur[IDX_HCOII] + - k[2548]*y_cur[IDX_HCO2II] + k[2549]*y_cur[IDX_HCOOH2II] + - k[2550]*y_cur[IDX_HNOII] + k[2551]*y_cur[IDX_HNSiII] + - k[2552]*y_cur[IDX_HOCSII] + k[2553]*y_cur[IDX_HPOII] + - k[2554]*y_cur[IDX_HSII] + k[2555]*y_cur[IDX_HSO2II] + - k[2558]*y_cur[IDX_N2HII] + k[2560]*y_cur[IDX_NCCNHII] + - k[2561]*y_cur[IDX_O2HII] + k[2566]*y_cur[IDX_PHII] + - k[2568]*y_cur[IDX_PH2II] + k[2570]*y_cur[IDX_SiCH3II] + - k[2571]*y_cur[IDX_SiHII] + k[2572]*y_cur[IDX_SiH4II] + - k[2573]*y_cur[IDX_SiH5II] + k[2684]*y_cur[IDX_H3II] + - k[3489]*y_cur[IDX_NHII] + k[3512]*y_cur[IDX_NH2II] + - k[3779]*y_cur[IDX_OHII]; - data[jistart + 13566] = 0.0 + k[2195]*y_cur[IDX_CH4I] + - k[2442]*y_cur[IDX_H2I] + k[2506]*y_cur[IDX_C2H6I] + - k[2509]*y_cur[IDX_H2OI] + k[2511]*y_cur[IDX_H2SI] + - k[2513]*y_cur[IDX_HCOI] + k[3612]*y_cur[IDX_NHI] + - k[3799]*y_cur[IDX_OHI]; - data[jistart + 13567] = 0.0 + k[2511]*y_cur[IDX_H2OII] - - k[2801]*y_cur[IDX_H3OII]; - data[jistart + 13568] = 0.0 + k[2544]*y_cur[IDX_H2OI]; - data[jistart + 13569] = 0.0 - k[2800]*y_cur[IDX_H3OII]; - data[jistart + 13570] = 0.0 - k[2802]*y_cur[IDX_H3OII]; - data[jistart + 13571] = 0.0 + k[2657]*y_cur[IDX_CH3CHOI] + - k[2684]*y_cur[IDX_H2OI] + k[2699]*y_cur[IDX_HCOOHI]; - data[jistart + 13572] = 0.0 + k[2545]*y_cur[IDX_H2OI]; - data[jistart + 13573] = 0.0 - k[1041]*y_cur[IDX_eM] - - k[1042]*y_cur[IDX_eM] - k[1043]*y_cur[IDX_eM] - - k[1044]*y_cur[IDX_eM] - k[1901]*y_cur[IDX_CI] - - k[2004]*y_cur[IDX_CH2I] - k[2249]*y_cur[IDX_CHI] - - k[2766]*y_cur[IDX_C2I] - k[2767]*y_cur[IDX_C2H3I] - - k[2768]*y_cur[IDX_C2H5OHI] - k[2769]*y_cur[IDX_C2OI] - - k[2770]*y_cur[IDX_C2SI] - k[2771]*y_cur[IDX_C3I] - - k[2772]*y_cur[IDX_C3H2I] - k[2773]*y_cur[IDX_C3HI] - - k[2774]*y_cur[IDX_C3NI] - k[2775]*y_cur[IDX_C3OI] - - k[2776]*y_cur[IDX_C3PI] - k[2777]*y_cur[IDX_C3SI] - - k[2778]*y_cur[IDX_C4I] - k[2779]*y_cur[IDX_C4H3I] - - k[2780]*y_cur[IDX_C4HI] - k[2781]*y_cur[IDX_C4PI] - - k[2782]*y_cur[IDX_C4SI] - k[2783]*y_cur[IDX_C6H6I] - - k[2784]*y_cur[IDX_CCPI] - k[2785]*y_cur[IDX_CH2CCHI] - - k[2786]*y_cur[IDX_CH2COI] - k[2787]*y_cur[IDX_CH2NHI] - - k[2788]*y_cur[IDX_CH2PHI] - k[2789]*y_cur[IDX_CH3CCHI] - - k[2790]*y_cur[IDX_CH3CHCH2I] - k[2791]*y_cur[IDX_CH3CHOI] - - k[2792]*y_cur[IDX_CH3CNI] - k[2793]*y_cur[IDX_CH3COCH3I] - - k[2794]*y_cur[IDX_CH3OCH3I] - k[2795]*y_cur[IDX_CH3OHI] - - k[2796]*y_cur[IDX_CPI] - k[2797]*y_cur[IDX_CSI] - - k[2798]*y_cur[IDX_H2CCCI] - k[2799]*y_cur[IDX_H2COI] - - k[2800]*y_cur[IDX_H2S2I] - k[2801]*y_cur[IDX_H2SI] - - k[2802]*y_cur[IDX_H2SiOI] - k[2803]*y_cur[IDX_HC2PI] - - k[2804]*y_cur[IDX_HC3NI] - k[2805]*y_cur[IDX_C4H2I] - - k[2806]*y_cur[IDX_HCNI] - k[2807]*y_cur[IDX_HCOOCH3I] - - k[2808]*y_cur[IDX_HCPI] - k[2809]*y_cur[IDX_HCSiI] - - k[2810]*y_cur[IDX_HNCI] - k[2811]*y_cur[IDX_HNSiI] - - k[2812]*y_cur[IDX_HPOI] - k[2813]*y_cur[IDX_HS2I] - - k[2814]*y_cur[IDX_NaI] - k[2815]*y_cur[IDX_PI] - - k[2816]*y_cur[IDX_PNI] - k[2817]*y_cur[IDX_S2I] - - k[2818]*y_cur[IDX_SiI] - k[2819]*y_cur[IDX_SiC2I] - - k[2820]*y_cur[IDX_SiC2HI] - k[2821]*y_cur[IDX_SiCI] - - k[2822]*y_cur[IDX_SiCH3I] - k[2823]*y_cur[IDX_SiH2I] - - k[2824]*y_cur[IDX_SiHI] - k[2825]*y_cur[IDX_SiNCI] - - k[2826]*y_cur[IDX_SiOI] - k[3028]*y_cur[IDX_HNC3I] - - k[3538]*y_cur[IDX_NH2I] - k[3578]*y_cur[IDX_NH3I] - - k[3900]*y_cur[IDX_CM] - k[3935]*y_cur[IDX_C10M] - - k[3970]*y_cur[IDX_C10HM] - k[4005]*y_cur[IDX_C2M] - - k[4040]*y_cur[IDX_C2HM] - k[4075]*y_cur[IDX_C3M] - - k[4110]*y_cur[IDX_C3HM] - k[4145]*y_cur[IDX_C3NM] - - k[4180]*y_cur[IDX_C4M] - k[4215]*y_cur[IDX_C4HM] - - k[4250]*y_cur[IDX_C5M] - k[4285]*y_cur[IDX_C5HM] - - k[4320]*y_cur[IDX_C5NM] - k[4355]*y_cur[IDX_C6M] - - k[4390]*y_cur[IDX_C6HM] - k[4425]*y_cur[IDX_C7M] - - k[4460]*y_cur[IDX_C7HM] - k[4495]*y_cur[IDX_C8M] - - k[4530]*y_cur[IDX_C8HM] - k[4565]*y_cur[IDX_C9M] - - k[4600]*y_cur[IDX_C9HM] - k[4635]*y_cur[IDX_CHM] - - k[4670]*y_cur[IDX_CNM] - k[4706]*y_cur[IDX_HM] - - k[4741]*y_cur[IDX_OM] - k[4776]*y_cur[IDX_O2M] - - k[4811]*y_cur[IDX_OHM] - k[4846]*y_cur[IDX_SM] - - k[5567]*y_cur[IDX_C2H2I] - k[5568]*y_cur[IDX_C2H4I] - - k[5629]*y_cur[IDX_CH3OI] - k[5635]*y_cur[IDX_CH2OHI] - - k[5651]*y_cur[IDX_COOCH3I] - k[5657]*y_cur[IDX_CH2OHCOI] - - k[5663]*y_cur[IDX_CH2OHCHOI] - k[5669]*y_cur[IDX_CH3COOHI] - - k[6343]*y_cur[IDX_GRAINM] - k[6344]*y_cur[IDX_GRAINM] - - k[6345]*y_cur[IDX_GRAINM] - k[6346]*y_cur[IDX_GRAINM]; - data[jistart + 13574] = 0.0 - k[2803]*y_cur[IDX_H3OII]; - data[jistart + 13575] = 0.0 - k[2804]*y_cur[IDX_H3OII]; - data[jistart + 13576] = 0.0 - k[2806]*y_cur[IDX_H3OII]; - data[jistart + 13577] = 0.0 + k[2546]*y_cur[IDX_H2OI]; - data[jistart + 13578] = 0.0 + k[2513]*y_cur[IDX_H2OII]; - data[jistart + 13579] = 0.0 + k[2547]*y_cur[IDX_H2OI]; - data[jistart + 13580] = 0.0 + k[2548]*y_cur[IDX_H2OI]; - data[jistart + 13581] = 0.0 - k[2807]*y_cur[IDX_H3OII]; - data[jistart + 13582] = 0.0 + k[2699]*y_cur[IDX_H3II]; - data[jistart + 13583] = 0.0 + k[2549]*y_cur[IDX_H2OI]; - data[jistart + 13584] = 0.0 - k[2808]*y_cur[IDX_H3OII]; - data[jistart + 13585] = 0.0 - k[2809]*y_cur[IDX_H3OII]; - data[jistart + 13586] = 0.0 - k[2810]*y_cur[IDX_H3OII]; - data[jistart + 13587] = 0.0 - k[3028]*y_cur[IDX_H3OII]; - data[jistart + 13588] = 0.0 + k[2550]*y_cur[IDX_H2OI]; - data[jistart + 13589] = 0.0 - k[2811]*y_cur[IDX_H3OII]; - data[jistart + 13590] = 0.0 + k[2551]*y_cur[IDX_H2OI]; - data[jistart + 13591] = 0.0 + k[2552]*y_cur[IDX_H2OI]; - data[jistart + 13592] = 0.0 - k[2812]*y_cur[IDX_H3OII]; - data[jistart + 13593] = 0.0 + k[2553]*y_cur[IDX_H2OI]; - data[jistart + 13594] = 0.0 + k[2554]*y_cur[IDX_H2OI]; - data[jistart + 13595] = 0.0 - k[2813]*y_cur[IDX_H3OII]; - data[jistart + 13596] = 0.0 + k[2555]*y_cur[IDX_H2OI]; - data[jistart + 13597] = 0.0 + k[2558]*y_cur[IDX_H2OI]; - data[jistart + 13598] = 0.0 + k[2560]*y_cur[IDX_H2OI]; - data[jistart + 13599] = 0.0 + k[3612]*y_cur[IDX_H2OII]; - data[jistart + 13600] = 0.0 + k[3489]*y_cur[IDX_H2OI]; - data[jistart + 13601] = 0.0 - k[3538]*y_cur[IDX_H3OII]; - data[jistart + 13602] = 0.0 + k[3512]*y_cur[IDX_H2OI]; - data[jistart + 13603] = 0.0 - k[3578]*y_cur[IDX_H3OII]; - data[jistart + 13604] = 0.0 - k[2814]*y_cur[IDX_H3OII]; - data[jistart + 13605] = 0.0 + k[3729]*y_cur[IDX_CH5II]; - data[jistart + 13606] = 0.0 - k[4741]*y_cur[IDX_H3OII]; - data[jistart + 13607] = 0.0 - k[4776]*y_cur[IDX_H3OII]; - data[jistart + 13608] = 0.0 + k[2561]*y_cur[IDX_H2OI]; - data[jistart + 13609] = 0.0 + k[3799]*y_cur[IDX_H2OII]; - data[jistart + 13610] = 0.0 + k[2210]*y_cur[IDX_CH4I] + - k[3772]*y_cur[IDX_C2H6I] + k[3779]*y_cur[IDX_H2OI]; - data[jistart + 13611] = 0.0 - k[4811]*y_cur[IDX_H3OII]; - data[jistart + 13612] = 0.0 - k[2815]*y_cur[IDX_H3OII]; - data[jistart + 13613] = 0.0 + k[2566]*y_cur[IDX_H2OI]; - data[jistart + 13614] = 0.0 + k[2568]*y_cur[IDX_H2OI]; - data[jistart + 13615] = 0.0 - k[2816]*y_cur[IDX_H3OII]; - data[jistart + 13616] = 0.0 - k[4846]*y_cur[IDX_H3OII]; - data[jistart + 13617] = 0.0 - k[2817]*y_cur[IDX_H3OII]; - data[jistart + 13618] = 0.0 - k[2818]*y_cur[IDX_H3OII]; - data[jistart + 13619] = 0.0 - k[2821]*y_cur[IDX_H3OII]; - data[jistart + 13620] = 0.0 - k[2819]*y_cur[IDX_H3OII]; - data[jistart + 13621] = 0.0 - k[2820]*y_cur[IDX_H3OII]; - data[jistart + 13622] = 0.0 - k[2822]*y_cur[IDX_H3OII]; - data[jistart + 13623] = 0.0 + k[2570]*y_cur[IDX_H2OI]; - data[jistart + 13624] = 0.0 - k[2824]*y_cur[IDX_H3OII]; - data[jistart + 13625] = 0.0 + k[2571]*y_cur[IDX_H2OI]; - data[jistart + 13626] = 0.0 - k[2823]*y_cur[IDX_H3OII]; - data[jistart + 13627] = 0.0 + k[2572]*y_cur[IDX_H2OI]; - data[jistart + 13628] = 0.0 + k[2573]*y_cur[IDX_H2OI]; - data[jistart + 13629] = 0.0 - k[2825]*y_cur[IDX_H3OII]; - data[jistart + 13630] = 0.0 - k[2826]*y_cur[IDX_H3OII]; - data[jistart + 13631] = 0.0 - k[1041]*y_cur[IDX_H3OII] - - k[1042]*y_cur[IDX_H3OII] - k[1043]*y_cur[IDX_H3OII] - - k[1044]*y_cur[IDX_H3OII]; - data[jistart + 13632] = 0.0 + k[1518]*y_cur[IDX_H2SI]; - data[jistart + 13633] = 0.0 + k[1619]*y_cur[IDX_H2SI]; - data[jistart + 13634] = 0.0 + k[1721]*y_cur[IDX_H2SI]; - data[jistart + 13635] = 0.0 + k[2111]*y_cur[IDX_H2SI]; - data[jistart + 13636] = 0.0 + k[1954]*y_cur[IDX_H2SI]; - data[jistart + 13637] = 0.0 + k[1984]*y_cur[IDX_H2SI]; - data[jistart + 13638] = 0.0 + k[2143]*y_cur[IDX_H2SI]; - data[jistart + 13639] = 0.0 + k[2227]*y_cur[IDX_H2SI]; - data[jistart + 13640] = 0.0 - k[6450]*y_cur[IDX_H3SII] - - k[6451]*y_cur[IDX_H3SII] - k[6452]*y_cur[IDX_H3SII] - - k[6453]*y_cur[IDX_H3SII]; - data[jistart + 13641] = 0.0 - k[2843]*y_cur[IDX_H3SII]; - data[jistart + 13642] = 0.0 + k[2443]*y_cur[IDX_H2SII] + - k[5557]*y_cur[IDX_HSII]; - data[jistart + 13643] = 0.0 - k[2496]*y_cur[IDX_H3SII]; - data[jistart + 13644] = 0.0 + k[2510]*y_cur[IDX_H2SI]; - data[jistart + 13645] = 0.0 + k[1518]*y_cur[IDX_C2H2II] + - k[1619]*y_cur[IDX_C2H3II] + k[1721]*y_cur[IDX_C2H5II] + - k[1954]*y_cur[IDX_CHII] + k[1984]*y_cur[IDX_CH2II] + - k[2111]*y_cur[IDX_C2H6II] + k[2143]*y_cur[IDX_CH4II] + - k[2227]*y_cur[IDX_CH5II] + k[2510]*y_cur[IDX_H2OII] + - k[2574]*y_cur[IDX_H2SII] + k[2579]*y_cur[IDX_HS2II] + - k[2580]*y_cur[IDX_HSiSII] + k[2686]*y_cur[IDX_H3II] + - k[2763]*y_cur[IDX_H3COII] + k[2801]*y_cur[IDX_H3OII] + - k[2892]*y_cur[IDX_HCNHII] + k[2893]*y_cur[IDX_HCNHII] + - k[2961]*y_cur[IDX_HCOII] + k[3054]*y_cur[IDX_HSII] + - k[3515]*y_cur[IDX_NH2II] + k[3780]*y_cur[IDX_OHII] + - k[3817]*y_cur[IDX_PHII] + k[3819]*y_cur[IDX_PH3II]; - data[jistart + 13646] = 0.0 + k[2443]*y_cur[IDX_H2I] + - k[2574]*y_cur[IDX_H2SI]; - data[jistart + 13647] = 0.0 + k[2686]*y_cur[IDX_H2SI]; - data[jistart + 13648] = 0.0 + k[2763]*y_cur[IDX_H2SI]; - data[jistart + 13649] = 0.0 + k[2801]*y_cur[IDX_H2SI]; - data[jistart + 13650] = 0.0 - k[1045]*y_cur[IDX_eM] - - k[1046]*y_cur[IDX_eM] - k[1047]*y_cur[IDX_eM] - - k[1048]*y_cur[IDX_eM] - k[2496]*y_cur[IDX_H2COI] - - k[2843]*y_cur[IDX_HI] - k[2876]*y_cur[IDX_HCNI] - - k[3040]*y_cur[IDX_HNCI] - k[3579]*y_cur[IDX_NH3I] - - k[3839]*y_cur[IDX_SI] - k[6450]*y_cur[IDX_GRAINM] - - k[6451]*y_cur[IDX_GRAINM] - k[6452]*y_cur[IDX_GRAINM] - - k[6453]*y_cur[IDX_GRAINM]; - data[jistart + 13651] = 0.0 - k[2876]*y_cur[IDX_H3SII]; - data[jistart + 13652] = 0.0 + k[2892]*y_cur[IDX_H2SI] + - k[2893]*y_cur[IDX_H2SI]; - data[jistart + 13653] = 0.0 + k[2961]*y_cur[IDX_H2SI]; - data[jistart + 13654] = 0.0 - k[3040]*y_cur[IDX_H3SII]; - data[jistart + 13655] = 0.0 + k[3054]*y_cur[IDX_H2SI] + - k[5557]*y_cur[IDX_H2I]; - data[jistart + 13656] = 0.0 + k[2579]*y_cur[IDX_H2SI]; - data[jistart + 13657] = 0.0 + k[2580]*y_cur[IDX_H2SI]; - data[jistart + 13658] = 0.0 + k[3515]*y_cur[IDX_H2SI]; - data[jistart + 13659] = 0.0 - k[3579]*y_cur[IDX_H3SII]; - data[jistart + 13660] = 0.0 + k[3780]*y_cur[IDX_H2SI]; - data[jistart + 13661] = 0.0 + k[3817]*y_cur[IDX_H2SI]; - data[jistart + 13662] = 0.0 + k[3819]*y_cur[IDX_H2SI]; - data[jistart + 13663] = 0.0 - k[3839]*y_cur[IDX_H3SII]; - data[jistart + 13664] = 0.0 - k[1045]*y_cur[IDX_H3SII] - - k[1046]*y_cur[IDX_H3SII] - k[1047]*y_cur[IDX_H3SII] - - k[1048]*y_cur[IDX_H3SII]; - data[jistart + 13665] = 0.0 - k[6770]*y_cur[IDX_H3S2II] - - k[6771]*y_cur[IDX_H3S2II]; - data[jistart + 13666] = 0.0 + k[5558]*y_cur[IDX_HS2II]; - data[jistart + 13667] = 0.0 + k[2685]*y_cur[IDX_H3II] + - k[2800]*y_cur[IDX_H3OII] + k[2960]*y_cur[IDX_HCOII]; - data[jistart + 13668] = 0.0 + k[2685]*y_cur[IDX_H2S2I]; - data[jistart + 13669] = 0.0 + k[2800]*y_cur[IDX_H2S2I]; - data[jistart + 13670] = 0.0 - k[1049]*y_cur[IDX_eM] - - k[1050]*y_cur[IDX_eM] - k[6770]*y_cur[IDX_GRAINM] - - k[6771]*y_cur[IDX_GRAINM]; - data[jistart + 13671] = 0.0 + k[2960]*y_cur[IDX_H2S2I]; - data[jistart + 13672] = 0.0 + k[5558]*y_cur[IDX_H2I]; - data[jistart + 13673] = 0.0 - k[1049]*y_cur[IDX_H3S2II] - - k[1050]*y_cur[IDX_H3S2II]; - data[jistart + 13674] = 0.0 - k[6590]*y_cur[IDX_H3SiOII] - - k[6591]*y_cur[IDX_H3SiOII]; - data[jistart + 13675] = 0.0 + k[2687]*y_cur[IDX_H3II] + - k[2802]*y_cur[IDX_H3OII] + k[2962]*y_cur[IDX_HCOII]; - data[jistart + 13676] = 0.0 + k[2687]*y_cur[IDX_H2SiOI]; - data[jistart + 13677] = 0.0 + k[2802]*y_cur[IDX_H2SiOI]; - data[jistart + 13678] = 0.0 - k[1051]*y_cur[IDX_eM] - - k[1052]*y_cur[IDX_eM] - k[6590]*y_cur[IDX_GRAINM] - - k[6591]*y_cur[IDX_GRAINM]; - data[jistart + 13679] = 0.0 + k[2962]*y_cur[IDX_H2SiOI]; - data[jistart + 13680] = 0.0 + k[3760]*y_cur[IDX_SiH5II]; - data[jistart + 13681] = 0.0 + k[3884]*y_cur[IDX_SiH3II]; - data[jistart + 13682] = 0.0 + k[3884]*y_cur[IDX_O2I]; - data[jistart + 13683] = 0.0 + k[3760]*y_cur[IDX_OI]; - data[jistart + 13684] = 0.0 - k[1051]*y_cur[IDX_H3SiOII] - - k[1052]*y_cur[IDX_H3SiOII]; - data[jistart + 13685] = 0.0 + k[2495]*y_cur[IDX_H2COI]; - data[jistart + 13686] = 0.0 - k[6725]*y_cur[IDX_H5C2O2II] - - k[6726]*y_cur[IDX_H5C2O2II]; - data[jistart + 13687] = 0.0 + k[2495]*y_cur[IDX_CH3OH2II]; - data[jistart + 13688] = 0.0 + k[2698]*y_cur[IDX_HCOOCH3I]; - data[jistart + 13689] = 0.0 + k[2807]*y_cur[IDX_HCOOCH3I]; - data[jistart + 13690] = 0.0 - k[1053]*y_cur[IDX_eM] - - k[1054]*y_cur[IDX_eM] - k[6725]*y_cur[IDX_GRAINM] - - k[6726]*y_cur[IDX_GRAINM]; - data[jistart + 13691] = 0.0 + k[2970]*y_cur[IDX_HCOOCH3I]; - data[jistart + 13692] = 0.0 + k[2698]*y_cur[IDX_H3II] + - k[2807]*y_cur[IDX_H3OII] + k[2970]*y_cur[IDX_HCOII]; - data[jistart + 13693] = 0.0 - k[1053]*y_cur[IDX_H5C2O2II] - - k[1054]*y_cur[IDX_H5C2O2II]; - data[jistart + 13694] = 0.0 + k[8619]*y_cur[IDX_GHI]; - data[jistart + 13695] = 0.0 + k[8619]*y_cur[IDX_GC2OI]; - data[jistart + 13696] = 0.0 + k[7140] + k[7322] + k[7504]; - data[jistart + 13697] = 0.0 - k[5942] - k[6958]; - data[jistart + 13698] = 0.0 + k[2520]*y_cur[IDX_H2OI]; - data[jistart + 13699] = 0.0 + k[1468]*y_cur[IDX_CO2I]; - data[jistart + 13700] = 0.0 + k[3688]*y_cur[IDX_OI]; - data[jistart + 13701] = 0.0 + k[3690]*y_cur[IDX_OI]; - data[jistart + 13702] = 0.0 + k[2599]*y_cur[IDX_H3II] + - k[2769]*y_cur[IDX_H3OII] + k[2904]*y_cur[IDX_HCOII]; - data[jistart + 13703] = 0.0 + k[3670]*y_cur[IDX_O2I]; - data[jistart + 13704] = 0.0 + k[1468]*y_cur[IDX_C2HII]; - data[jistart + 13705] = 0.0 - k[6486]*y_cur[IDX_HC2OII] - - k[6487]*y_cur[IDX_HC2OII] - k[6488]*y_cur[IDX_HC2OII] - - k[6489]*y_cur[IDX_HC2OII]; - data[jistart + 13706] = 0.0 + k[2520]*y_cur[IDX_C2II]; - data[jistart + 13707] = 0.0 + k[2599]*y_cur[IDX_C2OI]; - data[jistart + 13708] = 0.0 + k[2769]*y_cur[IDX_C2OI]; - data[jistart + 13709] = 0.0 - k[1055]*y_cur[IDX_eM] - - k[1056]*y_cur[IDX_eM] - k[1057]*y_cur[IDX_eM] - - k[1058]*y_cur[IDX_eM] - k[6486]*y_cur[IDX_GRAINM] - - k[6487]*y_cur[IDX_GRAINM] - k[6488]*y_cur[IDX_GRAINM] - - k[6489]*y_cur[IDX_GRAINM]; - data[jistart + 13710] = 0.0 + k[2904]*y_cur[IDX_C2OI]; - data[jistart + 13711] = 0.0 + k[3688]*y_cur[IDX_C2H2II] + - k[3690]*y_cur[IDX_C2H3II]; - data[jistart + 13712] = 0.0 + k[3670]*y_cur[IDX_C3HII]; - data[jistart + 13713] = 0.0 - k[1055]*y_cur[IDX_HC2OII] - - k[1056]*y_cur[IDX_HC2OII] - k[1057]*y_cur[IDX_HC2OII] - - k[1058]*y_cur[IDX_HC2OII]; - data[jistart + 13714] = 0.0 - k[1396]*y_cur[IDX_HC2PI] - - k[1397]*y_cur[IDX_HC2PI]; - data[jistart + 13715] = 0.0 + k[7199] + k[7381] + k[7567]; - data[jistart + 13716] = 0.0 + k[6681]*y_cur[IDX_PC2H2II] + - k[6686]*y_cur[IDX_PC2H3II] + k[6690]*y_cur[IDX_PC2H4II] + - k[6774]*y_cur[IDX_PC3HII]; - data[jistart + 13717] = 0.0 - k[382]*y_cur[IDX_HC2PI]; - data[jistart + 13718] = 0.0 - k[2688]*y_cur[IDX_HC2PI]; - data[jistart + 13719] = 0.0 - k[2803]*y_cur[IDX_HC2PI]; - data[jistart + 13720] = 0.0 - k[382]*y_cur[IDX_HII] - - k[1396]*y_cur[IDX_CII] - k[1397]*y_cur[IDX_CII] - - k[2688]*y_cur[IDX_H3II] - k[2803]*y_cur[IDX_H3OII] - - k[2963]*y_cur[IDX_HCOII] - k[3232]*y_cur[IDX_HeII] - - k[3233]*y_cur[IDX_HeII] - k[5401]*y_cur[IDX_OI] - k[5845] - k[6170] - - k[7017]; - data[jistart + 13721] = 0.0 - k[2963]*y_cur[IDX_HC2PI]; - data[jistart + 13722] = 0.0 - k[3232]*y_cur[IDX_HC2PI] - - k[3233]*y_cur[IDX_HC2PI]; - data[jistart + 13723] = 0.0 - k[5401]*y_cur[IDX_HC2PI]; - data[jistart + 13724] = 0.0 + k[1182]*y_cur[IDX_eM] + - k[6681]*y_cur[IDX_GRAINM]; - data[jistart + 13725] = 0.0 + k[1185]*y_cur[IDX_eM] + - k[6686]*y_cur[IDX_GRAINM]; - data[jistart + 13726] = 0.0 + k[1188]*y_cur[IDX_eM] + - k[6690]*y_cur[IDX_GRAINM]; - data[jistart + 13727] = 0.0 + k[1192]*y_cur[IDX_eM] + - k[6774]*y_cur[IDX_GRAINM]; - data[jistart + 13728] = 0.0 + k[1182]*y_cur[IDX_PC2H2II] + - k[1185]*y_cur[IDX_PC2H3II] + k[1188]*y_cur[IDX_PC2H4II] + - k[1192]*y_cur[IDX_PC3HII]; - data[jistart + 13729] = 0.0 + k[1351]*y_cur[IDX_CH2PHI]; - data[jistart + 13730] = 0.0 + k[1569]*y_cur[IDX_PII]; - data[jistart + 13731] = 0.0 + k[1526]*y_cur[IDX_PI]; - data[jistart + 13732] = 0.0 + k[2633]*y_cur[IDX_H3II] + - k[2784]*y_cur[IDX_H3OII] + k[2937]*y_cur[IDX_HCOII]; - data[jistart + 13733] = 0.0 + k[1351]*y_cur[IDX_CII]; - data[jistart + 13734] = 0.0 - k[6676]*y_cur[IDX_HC2PII] - - k[6677]*y_cur[IDX_HC2PII]; - data[jistart + 13735] = 0.0 + k[382]*y_cur[IDX_HC2PI]; - data[jistart + 13736] = 0.0 + k[2633]*y_cur[IDX_CCPI]; - data[jistart + 13737] = 0.0 + k[2784]*y_cur[IDX_CCPI]; - data[jistart + 13738] = 0.0 + k[382]*y_cur[IDX_HII]; - data[jistart + 13739] = 0.0 - k[1059]*y_cur[IDX_eM] - - k[1060]*y_cur[IDX_eM] - k[6676]*y_cur[IDX_GRAINM] - - k[6677]*y_cur[IDX_GRAINM]; - data[jistart + 13740] = 0.0 + k[2937]*y_cur[IDX_CCPI]; - data[jistart + 13741] = 0.0 + k[1526]*y_cur[IDX_C2H2II]; - data[jistart + 13742] = 0.0 + k[1569]*y_cur[IDX_C2H2I]; - data[jistart + 13743] = 0.0 - k[1059]*y_cur[IDX_HC2PII] - - k[1060]*y_cur[IDX_HC2PII]; - data[jistart + 13744] = 0.0 - k[1902]*y_cur[IDX_HC2SII]; - data[jistart + 13745] = 0.0 - k[3901]*y_cur[IDX_HC2SII]; - data[jistart + 13746] = 0.0 - k[3936]*y_cur[IDX_HC2SII]; - data[jistart + 13747] = 0.0 - k[3971]*y_cur[IDX_HC2SII]; - data[jistart + 13748] = 0.0 - k[4006]*y_cur[IDX_HC2SII]; - data[jistart + 13749] = 0.0 - k[4041]*y_cur[IDX_HC2SII]; - data[jistart + 13750] = 0.0 + k[1573]*y_cur[IDX_SII]; - data[jistart + 13751] = 0.0 + k[1528]*y_cur[IDX_SI]; - data[jistart + 13752] = 0.0 + k[1645]*y_cur[IDX_SII]; - data[jistart + 13753] = 0.0 + k[1625]*y_cur[IDX_SI]; - data[jistart + 13754] = 0.0 + k[1679]*y_cur[IDX_SI]; - data[jistart + 13755] = 0.0 + k[2600]*y_cur[IDX_H3II] + - k[2770]*y_cur[IDX_H3OII] + k[2905]*y_cur[IDX_HCOII]; - data[jistart + 13756] = 0.0 + k[2405]*y_cur[IDX_H2I]; - data[jistart + 13757] = 0.0 - k[4076]*y_cur[IDX_HC2SII]; - data[jistart + 13758] = 0.0 - k[4111]*y_cur[IDX_HC2SII]; - data[jistart + 13759] = 0.0 - k[4146]*y_cur[IDX_HC2SII]; - data[jistart + 13760] = 0.0 - k[4181]*y_cur[IDX_HC2SII]; - data[jistart + 13761] = 0.0 - k[4216]*y_cur[IDX_HC2SII]; - data[jistart + 13762] = 0.0 - k[4251]*y_cur[IDX_HC2SII]; - data[jistart + 13763] = 0.0 - k[4286]*y_cur[IDX_HC2SII]; - data[jistart + 13764] = 0.0 - k[4321]*y_cur[IDX_HC2SII]; - data[jistart + 13765] = 0.0 - k[4356]*y_cur[IDX_HC2SII]; - data[jistart + 13766] = 0.0 - k[4391]*y_cur[IDX_HC2SII]; - data[jistart + 13767] = 0.0 - k[4426]*y_cur[IDX_HC2SII]; - data[jistart + 13768] = 0.0 - k[4461]*y_cur[IDX_HC2SII]; - data[jistart + 13769] = 0.0 - k[4496]*y_cur[IDX_HC2SII]; - data[jistart + 13770] = 0.0 - k[4531]*y_cur[IDX_HC2SII]; - data[jistart + 13771] = 0.0 - k[4566]*y_cur[IDX_HC2SII]; - data[jistart + 13772] = 0.0 - k[4601]*y_cur[IDX_HC2SII]; - data[jistart + 13773] = 0.0 - k[4636]*y_cur[IDX_HC2SII]; - data[jistart + 13774] = 0.0 - k[4671]*y_cur[IDX_HC2SII]; - data[jistart + 13775] = 0.0 - k[6678]*y_cur[IDX_HC2SII] - - k[6679]*y_cur[IDX_HC2SII]; - data[jistart + 13776] = 0.0 - k[4707]*y_cur[IDX_HC2SII]; - data[jistart + 13777] = 0.0 + k[2405]*y_cur[IDX_C2SII]; - data[jistart + 13778] = 0.0 + k[2600]*y_cur[IDX_C2SI]; - data[jistart + 13779] = 0.0 + k[2770]*y_cur[IDX_C2SI]; - data[jistart + 13780] = 0.0 - k[1061]*y_cur[IDX_eM] - - k[1062]*y_cur[IDX_eM] - k[1902]*y_cur[IDX_CI] - - k[3901]*y_cur[IDX_CM] - k[3936]*y_cur[IDX_C10M] - - k[3971]*y_cur[IDX_C10HM] - k[4006]*y_cur[IDX_C2M] - - k[4041]*y_cur[IDX_C2HM] - k[4076]*y_cur[IDX_C3M] - - k[4111]*y_cur[IDX_C3HM] - k[4146]*y_cur[IDX_C3NM] - - k[4181]*y_cur[IDX_C4M] - k[4216]*y_cur[IDX_C4HM] - - k[4251]*y_cur[IDX_C5M] - k[4286]*y_cur[IDX_C5HM] - - k[4321]*y_cur[IDX_C5NM] - k[4356]*y_cur[IDX_C6M] - - k[4391]*y_cur[IDX_C6HM] - k[4426]*y_cur[IDX_C7M] - - k[4461]*y_cur[IDX_C7HM] - k[4496]*y_cur[IDX_C8M] - - k[4531]*y_cur[IDX_C8HM] - k[4566]*y_cur[IDX_C9M] - - k[4601]*y_cur[IDX_C9HM] - k[4636]*y_cur[IDX_CHM] - - k[4671]*y_cur[IDX_CNM] - k[4707]*y_cur[IDX_HM] - - k[4742]*y_cur[IDX_OM] - k[4777]*y_cur[IDX_O2M] - - k[4812]*y_cur[IDX_OHM] - k[4847]*y_cur[IDX_SM] - - k[6678]*y_cur[IDX_GRAINM] - k[6679]*y_cur[IDX_GRAINM]; - data[jistart + 13781] = 0.0 + k[2905]*y_cur[IDX_C2SI]; - data[jistart + 13782] = 0.0 - k[4742]*y_cur[IDX_HC2SII]; - data[jistart + 13783] = 0.0 - k[4777]*y_cur[IDX_HC2SII]; - data[jistart + 13784] = 0.0 - k[4812]*y_cur[IDX_HC2SII]; - data[jistart + 13785] = 0.0 + k[1528]*y_cur[IDX_C2H2II] + - k[1625]*y_cur[IDX_C2H3II] + k[1679]*y_cur[IDX_C2H4II]; - data[jistart + 13786] = 0.0 + k[1573]*y_cur[IDX_C2H2I] + - k[1645]*y_cur[IDX_C2H3I]; - data[jistart + 13787] = 0.0 - k[4847]*y_cur[IDX_HC2SII]; - data[jistart + 13788] = 0.0 - k[1061]*y_cur[IDX_HC2SII] - - k[1062]*y_cur[IDX_HC2SII]; - data[jistart + 13789] = 0.0 + k[4948]*y_cur[IDX_CH2CNI]; - data[jistart + 13790] = 0.0 - k[1398]*y_cur[IDX_HC3NI] - - k[1399]*y_cur[IDX_HC3NI] - k[1400]*y_cur[IDX_HC3NI] - - k[1401]*y_cur[IDX_HC3NI]; - data[jistart + 13791] = 0.0 + k[4901]*y_cur[IDX_HCNI] + - k[4902]*y_cur[IDX_HNCI] + k[4903]*y_cur[IDX_NCCNI] + - k[5514]*y_cur[IDX_CNI]; - data[jistart + 13792] = 0.0 - k[1470]*y_cur[IDX_HC3NI] - - k[1471]*y_cur[IDX_HC3NI] - k[1472]*y_cur[IDX_HC3NI] - - k[1473]*y_cur[IDX_HC3NI]; - data[jistart + 13793] = 0.0 + k[229]*y_cur[IDX_HC3NII] + - k[5104]*y_cur[IDX_CNI]; - data[jistart + 13794] = 0.0 - k[5508]*y_cur[IDX_HC3NI]; - data[jistart + 13795] = 0.0 - k[1620]*y_cur[IDX_HC3NI]; - data[jistart + 13796] = 0.0 + k[239]*y_cur[IDX_HC3NII]; - data[jistart + 13797] = 0.0 - k[1676]*y_cur[IDX_HC3NI]; - data[jistart + 13798] = 0.0 - k[1722]*y_cur[IDX_HC3NI]; - data[jistart + 13799] = 0.0 - k[1752]*y_cur[IDX_HC3NI]; - data[jistart + 13800] = 0.0 + k[113]*y_cur[IDX_NI]; - data[jistart + 13801] = 0.0 + k[5232]*y_cur[IDX_NI]; - data[jistart + 13802] = 0.0 - k[1816]*y_cur[IDX_HC3NI]; - data[jistart + 13803] = 0.0 + k[91]*y_cur[IDX_HI]; - data[jistart + 13804] = 0.0 + k[493]*y_cur[IDX_HC3NII]; - data[jistart + 13805] = 0.0 - k[5517]*y_cur[IDX_HC3NI]; - data[jistart + 13806] = 0.0 + k[2172]*y_cur[IDX_CH4I] + - k[2532]*y_cur[IDX_H2OI]; - data[jistart + 13807] = 0.0 + k[5256]*y_cur[IDX_NI]; - data[jistart + 13808] = 0.0 + k[912]*y_cur[IDX_eM] + - k[6651]*y_cur[IDX_GRAINM]; - data[jistart + 13809] = 0.0 + k[4948]*y_cur[IDX_CI]; - data[jistart + 13810] = 0.0 - k[2079]*y_cur[IDX_HC3NI] - - k[5537]*y_cur[IDX_HC3NI]; - data[jistart + 13811] = 0.0 + k[2320]*y_cur[IDX_HII]; - data[jistart + 13812] = 0.0 + k[926]*y_cur[IDX_eM] + - k[6760]*y_cur[IDX_GRAINM]; - data[jistart + 13813] = 0.0 + k[928]*y_cur[IDX_eM] + - k[6766]*y_cur[IDX_GRAINM]; - data[jistart + 13814] = 0.0 + k[2115]*y_cur[IDX_HC3NHII]; - data[jistart + 13815] = 0.0 + k[2126]*y_cur[IDX_HC3NHII]; - data[jistart + 13816] = 0.0 + k[2172]*y_cur[IDX_C4NII]; - data[jistart + 13817] = 0.0 - k[2228]*y_cur[IDX_HC3NI]; - data[jistart + 13818] = 0.0 + k[5104]*y_cur[IDX_C2H2I] + - k[5514]*y_cur[IDX_C2HI]; - data[jistart + 13819] = 0.0 + k[8706]*y_cur[IDX_GNI]; - data[jistart + 13820] = 0.0 + k[8633]*y_cur[IDX_GHI]; - data[jistart + 13821] = 0.0 + k[8633]*y_cur[IDX_GC3NI]; - data[jistart + 13822] = 0.0 + k[7183] + k[7365] + k[7547]; - data[jistart + 13823] = 0.0 + k[8706]*y_cur[IDX_GC3HI]; - data[jistart + 13824] = 0.0 + k[6639]*y_cur[IDX_HC3NHII] + - k[6651]*y_cur[IDX_CH2CHCNII] + k[6745]*y_cur[IDX_H2C4NII] + - k[6760]*y_cur[IDX_CH3C3NII] + k[6766]*y_cur[IDX_CH3C3NHII] + - k[6792]*y_cur[IDX_HC5NHII]; - data[jistart + 13825] = 0.0 + k[91]*y_cur[IDX_C3NM] + - k[5213]*y_cur[IDX_HNC3I]; - data[jistart + 13826] = 0.0 - k[383]*y_cur[IDX_HC3NI] + - k[2320]*y_cur[IDX_CH3C3NI] + k[3024]*y_cur[IDX_HNC3I]; - data[jistart + 13827] = 0.0 + k[988]*y_cur[IDX_eM] + - k[6745]*y_cur[IDX_GRAINM]; - data[jistart + 13828] = 0.0 + k[2532]*y_cur[IDX_C4NII]; - data[jistart + 13829] = 0.0 - k[2689]*y_cur[IDX_HC3NI]; - data[jistart + 13830] = 0.0 - k[2804]*y_cur[IDX_HC3NI]; - data[jistart + 13831] = 0.0 - k[383]*y_cur[IDX_HII] - - k[1398]*y_cur[IDX_CII] - k[1399]*y_cur[IDX_CII] - - k[1400]*y_cur[IDX_CII] - k[1401]*y_cur[IDX_CII] - - k[1470]*y_cur[IDX_C2HII] - k[1471]*y_cur[IDX_C2HII] - - k[1472]*y_cur[IDX_C2HII] - k[1473]*y_cur[IDX_C2HII] - - k[1620]*y_cur[IDX_C2H3II] - k[1676]*y_cur[IDX_C2H4II] - - k[1722]*y_cur[IDX_C2H5II] - k[1752]*y_cur[IDX_C3II] - - k[1816]*y_cur[IDX_C3H5II] - k[2079]*y_cur[IDX_CH3II] - - k[2228]*y_cur[IDX_CH5II] - k[2689]*y_cur[IDX_H3II] - - k[2804]*y_cur[IDX_H3OII] - k[2894]*y_cur[IDX_HCNHII] - - k[2895]*y_cur[IDX_HCNHII] - k[2964]*y_cur[IDX_HCOII] - - k[3234]*y_cur[IDX_HeII] - k[3235]*y_cur[IDX_HeII] - - k[3236]*y_cur[IDX_HeII] - k[3237]*y_cur[IDX_HeII] - - k[3374]*y_cur[IDX_N2HII] - k[5508]*y_cur[IDX_C2H2II] - - k[5517]*y_cur[IDX_C4H2II] - k[5537]*y_cur[IDX_CH3II] - k[5846] - - k[6171] - k[7001]; - data[jistart + 13832] = 0.0 + k[229]*y_cur[IDX_C2H2I] + - k[239]*y_cur[IDX_C2H4I] + k[493]*y_cur[IDX_C4H2I] + - k[607]*y_cur[IDX_NH3I]; - data[jistart + 13833] = 0.0 + k[1068]*y_cur[IDX_eM] + - k[2115]*y_cur[IDX_CH3CNI] + k[2126]*y_cur[IDX_CH3OHI] + - k[3580]*y_cur[IDX_NH3I] + k[6639]*y_cur[IDX_GRAINM]; - data[jistart + 13834] = 0.0 + k[1080]*y_cur[IDX_eM] + - k[6792]*y_cur[IDX_GRAINM]; - data[jistart + 13835] = 0.0 + k[4901]*y_cur[IDX_C2HI]; - data[jistart + 13836] = 0.0 - k[2894]*y_cur[IDX_HC3NI] - - k[2895]*y_cur[IDX_HC3NI]; - data[jistart + 13837] = 0.0 - k[2964]*y_cur[IDX_HC3NI]; - data[jistart + 13838] = 0.0 + k[4902]*y_cur[IDX_C2HI]; - data[jistart + 13839] = 0.0 + k[3024]*y_cur[IDX_HII] + - k[5213]*y_cur[IDX_HI]; - data[jistart + 13840] = 0.0 - k[3234]*y_cur[IDX_HC3NI] - + data[jistart + 16817] = 0.0 + k[2195]*y_cur[IDX_CH4I] + k[2442]*y_cur[IDX_H2I] + + k[2506]*y_cur[IDX_C2H6I] + k[2509]*y_cur[IDX_H2OI] + + k[2511]*y_cur[IDX_H2SI] + k[2513]*y_cur[IDX_HCOI] + + k[3612]*y_cur[IDX_NHI] + k[3799]*y_cur[IDX_OHI]; + data[jistart + 16818] = 0.0 - k[4145]*y_cur[IDX_H3OII]; + data[jistart + 16819] = 0.0 - k[2774]*y_cur[IDX_H3OII]; + data[jistart + 16820] = 0.0 + k[1952]*y_cur[IDX_H2OI]; + data[jistart + 16821] = 0.0 - k[2826]*y_cur[IDX_H3OII]; + data[jistart + 16822] = 0.0 - k[2814]*y_cur[IDX_H3OII]; + data[jistart + 16823] = 0.0 + k[3612]*y_cur[IDX_H2OII]; + data[jistart + 16824] = 0.0 - k[4670]*y_cur[IDX_H3OII]; + data[jistart + 16825] = 0.0 - k[2778]*y_cur[IDX_H3OII]; + data[jistart + 16826] = 0.0 + k[2558]*y_cur[IDX_H2OI]; + data[jistart + 16827] = 0.0 - k[2785]*y_cur[IDX_H3OII]; + data[jistart + 16828] = 0.0 + k[2544]*y_cur[IDX_H2OI]; + data[jistart + 16829] = 0.0 - k[2773]*y_cur[IDX_H3OII]; + data[jistart + 16830] = 0.0 + k[2542]*y_cur[IDX_H2OI]; + data[jistart + 16831] = 0.0 - k[2771]*y_cur[IDX_H3OII]; + data[jistart + 16832] = 0.0 - k[2780]*y_cur[IDX_H3OII]; + data[jistart + 16833] = 0.0 - k[2805]*y_cur[IDX_H3OII]; + data[jistart + 16834] = 0.0 - k[2004]*y_cur[IDX_H3OII]; + data[jistart + 16835] = 0.0 - k[2810]*y_cur[IDX_H3OII]; + data[jistart + 16836] = 0.0 - k[5568]*y_cur[IDX_H3OII]; + data[jistart + 16837] = 0.0 - k[2767]*y_cur[IDX_H3OII]; + data[jistart + 16838] = 0.0 + k[2511]*y_cur[IDX_H2OII] - k[2801]*y_cur[IDX_H3OII]; + data[jistart + 16839] = 0.0 - k[2818]*y_cur[IDX_H3OII]; + data[jistart + 16840] = 0.0 + k[2523]*y_cur[IDX_H2OI]; + data[jistart + 16841] = 0.0 + k[2513]*y_cur[IDX_H2OII]; + data[jistart + 16842] = 0.0 + k[2195]*y_cur[IDX_H2OII] + k[2210]*y_cur[IDX_OHII]; + data[jistart + 16843] = 0.0 - k[2799]*y_cur[IDX_H3OII]; + data[jistart + 16844] = 0.0 - k[2806]*y_cur[IDX_H3OII]; + data[jistart + 16845] = 0.0 - k[2249]*y_cur[IDX_H3OII]; + data[jistart + 16846] = 0.0 - k[2766]*y_cur[IDX_H3OII]; + data[jistart + 16847] = 0.0 + k[3799]*y_cur[IDX_H2OII]; + data[jistart + 16848] = 0.0 - k[3578]*y_cur[IDX_H3OII]; + data[jistart + 16849] = 0.0 + k[2522]*y_cur[IDX_H2OI]; + data[jistart + 16850] = 0.0 - k[5567]*y_cur[IDX_H3OII]; + data[jistart + 16851] = 0.0 - k[1041]*y_cur[IDX_eM] - k[1042]*y_cur[IDX_eM] - + k[1043]*y_cur[IDX_eM] - k[1044]*y_cur[IDX_eM] - + k[1901]*y_cur[IDX_CI] - k[2004]*y_cur[IDX_CH2I] - + k[2249]*y_cur[IDX_CHI] - k[2766]*y_cur[IDX_C2I] - + k[2767]*y_cur[IDX_C2H3I] - k[2768]*y_cur[IDX_C2H5OHI] - + k[2769]*y_cur[IDX_C2OI] - k[2770]*y_cur[IDX_C2SI] - + k[2771]*y_cur[IDX_C3I] - k[2772]*y_cur[IDX_C3H2I] - + k[2773]*y_cur[IDX_C3HI] - k[2774]*y_cur[IDX_C3NI] - + k[2775]*y_cur[IDX_C3OI] - k[2776]*y_cur[IDX_C3PI] - + k[2777]*y_cur[IDX_C3SI] - k[2778]*y_cur[IDX_C4I] - + k[2779]*y_cur[IDX_C4H3I] - k[2780]*y_cur[IDX_C4HI] - + k[2781]*y_cur[IDX_C4PI] - k[2782]*y_cur[IDX_C4SI] - + k[2783]*y_cur[IDX_C6H6I] - k[2784]*y_cur[IDX_CCPI] - + k[2785]*y_cur[IDX_CH2CCHI] - k[2786]*y_cur[IDX_CH2COI] - + k[2787]*y_cur[IDX_CH2NHI] - k[2788]*y_cur[IDX_CH2PHI] - + k[2789]*y_cur[IDX_CH3CCHI] - k[2790]*y_cur[IDX_CH3CHCH2I] - + k[2791]*y_cur[IDX_CH3CHOI] - k[2792]*y_cur[IDX_CH3CNI] - + k[2793]*y_cur[IDX_CH3COCH3I] - k[2794]*y_cur[IDX_CH3OCH3I] - + k[2795]*y_cur[IDX_CH3OHI] - k[2796]*y_cur[IDX_CPI] - + k[2797]*y_cur[IDX_CSI] - k[2798]*y_cur[IDX_H2CCCI] - + k[2799]*y_cur[IDX_H2COI] - k[2800]*y_cur[IDX_H2S2I] - + k[2801]*y_cur[IDX_H2SI] - k[2802]*y_cur[IDX_H2SiOI] - + k[2803]*y_cur[IDX_HC2PI] - k[2804]*y_cur[IDX_HC3NI] - + k[2805]*y_cur[IDX_C4H2I] - k[2806]*y_cur[IDX_HCNI] - + k[2807]*y_cur[IDX_HCOOCH3I] - k[2808]*y_cur[IDX_HCPI] - + k[2809]*y_cur[IDX_HCSiI] - k[2810]*y_cur[IDX_HNCI] - + k[2811]*y_cur[IDX_HNSiI] - k[2812]*y_cur[IDX_HPOI] - + k[2813]*y_cur[IDX_HS2I] - k[2814]*y_cur[IDX_NaI] - + k[2815]*y_cur[IDX_PI] - k[2816]*y_cur[IDX_PNI] - + k[2817]*y_cur[IDX_S2I] - k[2818]*y_cur[IDX_SiI] - + k[2819]*y_cur[IDX_SiC2I] - k[2820]*y_cur[IDX_SiC2HI] - + k[2821]*y_cur[IDX_SiCI] - k[2822]*y_cur[IDX_SiCH3I] - + k[2823]*y_cur[IDX_SiH2I] - k[2824]*y_cur[IDX_SiHI] - + k[2825]*y_cur[IDX_SiNCI] - k[2826]*y_cur[IDX_SiOI] - + k[3028]*y_cur[IDX_HNC3I] - k[3538]*y_cur[IDX_NH2I] - + k[3578]*y_cur[IDX_NH3I] - k[3900]*y_cur[IDX_CM] - + k[3935]*y_cur[IDX_C10M] - k[3970]*y_cur[IDX_C10HM] - + k[4005]*y_cur[IDX_C2M] - k[4040]*y_cur[IDX_C2HM] - + k[4075]*y_cur[IDX_C3M] - k[4110]*y_cur[IDX_C3HM] - + k[4145]*y_cur[IDX_C3NM] - k[4180]*y_cur[IDX_C4M] - + k[4215]*y_cur[IDX_C4HM] - k[4250]*y_cur[IDX_C5M] - + k[4285]*y_cur[IDX_C5HM] - k[4320]*y_cur[IDX_C5NM] - + k[4355]*y_cur[IDX_C6M] - k[4390]*y_cur[IDX_C6HM] - + k[4425]*y_cur[IDX_C7M] - k[4460]*y_cur[IDX_C7HM] - + k[4495]*y_cur[IDX_C8M] - k[4530]*y_cur[IDX_C8HM] - + k[4565]*y_cur[IDX_C9M] - k[4600]*y_cur[IDX_C9HM] - + k[4635]*y_cur[IDX_CHM] - k[4670]*y_cur[IDX_CNM] - + k[4706]*y_cur[IDX_HM] - k[4741]*y_cur[IDX_OM] - + k[4776]*y_cur[IDX_O2M] - k[4811]*y_cur[IDX_OHM] - + k[4846]*y_cur[IDX_SM] - k[5567]*y_cur[IDX_C2H2I] - + k[5568]*y_cur[IDX_C2H4I] - k[5629]*y_cur[IDX_CH3OI] - + k[5635]*y_cur[IDX_CH2OHI] - k[5651]*y_cur[IDX_COOCH3I] - + k[5657]*y_cur[IDX_CH2OHCOI] - k[5663]*y_cur[IDX_CH2OHCHOI] - + k[5669]*y_cur[IDX_CH3COOHI] - k[6343]*y_cur[IDX_GRAINM] - + k[6344]*y_cur[IDX_GRAINM] - k[6345]*y_cur[IDX_GRAINM] - + k[6346]*y_cur[IDX_GRAINM]; + data[jistart + 16852] = 0.0 + k[3729]*y_cur[IDX_CH5II]; + data[jistart + 16853] = 0.0 + k[1952]*y_cur[IDX_CHII] + k[2142]*y_cur[IDX_CH4II] + + k[2226]*y_cur[IDX_CH5II] + k[2386]*y_cur[IDX_H2II] + + k[2509]*y_cur[IDX_H2OII] + k[2522]*y_cur[IDX_C2H2II] + + k[2523]*y_cur[IDX_C2H3II] + k[2524]*y_cur[IDX_C2H5II] + + k[2534]*y_cur[IDX_C2H6II] + k[2542]*y_cur[IDX_H2COII] + + k[2543]*y_cur[IDX_H2ClII] + k[2544]*y_cur[IDX_H2SII] + + k[2545]*y_cur[IDX_H3COII] + k[2546]*y_cur[IDX_HCNII] + + k[2547]*y_cur[IDX_HCOII] + k[2548]*y_cur[IDX_HCO2II] + + k[2549]*y_cur[IDX_HCOOH2II] + k[2550]*y_cur[IDX_HNOII] + + k[2551]*y_cur[IDX_HNSiII] + k[2552]*y_cur[IDX_HOCSII] + + k[2553]*y_cur[IDX_HPOII] + k[2554]*y_cur[IDX_HSII] + + k[2555]*y_cur[IDX_HSO2II] + k[2558]*y_cur[IDX_N2HII] + + k[2560]*y_cur[IDX_NCCNHII] + k[2561]*y_cur[IDX_O2HII] + + k[2566]*y_cur[IDX_PHII] + k[2568]*y_cur[IDX_PH2II] + + k[2570]*y_cur[IDX_SiCH3II] + k[2571]*y_cur[IDX_SiHII] + + k[2572]*y_cur[IDX_SiH4II] + k[2573]*y_cur[IDX_SiH5II] + + k[2684]*y_cur[IDX_H3II] + k[3489]*y_cur[IDX_NHII] + + k[3512]*y_cur[IDX_NH2II] + k[3779]*y_cur[IDX_OHII]; + data[jistart + 16854] = 0.0 - k[1901]*y_cur[IDX_H3OII]; + data[jistart + 16855] = 0.0 + k[2547]*y_cur[IDX_H2OI]; + data[jistart + 16856] = 0.0 + k[2657]*y_cur[IDX_CH3CHOI] + k[2684]*y_cur[IDX_H2OI] + + k[2699]*y_cur[IDX_HCOOHI]; + data[jistart + 16857] = 0.0 - k[6343]*y_cur[IDX_H3OII] - k[6344]*y_cur[IDX_H3OII] - + k[6345]*y_cur[IDX_H3OII] - k[6346]*y_cur[IDX_H3OII]; + data[jistart + 16858] = 0.0 + k[2442]*y_cur[IDX_H2OII]; + data[jistart + 16859] = 0.0 - k[1041]*y_cur[IDX_H3OII] - k[1042]*y_cur[IDX_H3OII] - + k[1043]*y_cur[IDX_H3OII] - k[1044]*y_cur[IDX_H3OII]; + data[jistart + 16860] = 0.0 + k[986]*y_cur[IDX_eM] + k[6632]*y_cur[IDX_GRAINM]; + data[jistart + 16861] = 0.0 + k[3216]*y_cur[IDX_HeII] - k[5394]*y_cur[IDX_OI] + k[5831] + + k[6144]; + data[jistart + 16862] = 0.0 - k[3752]*y_cur[IDX_OI]; + data[jistart + 16863] = 0.0 - k[5398]*y_cur[IDX_OI]; + data[jistart + 16864] = 0.0 - k[3683]*y_cur[IDX_OI]; + data[jistart + 16865] = 0.0 - k[5396]*y_cur[IDX_OI]; + data[jistart + 16866] = 0.0 - k[5379]*y_cur[IDX_OI] - k[5380]*y_cur[IDX_OI]; + data[jistart + 16867] = 0.0 - k[5363]*y_cur[IDX_OI]; + data[jistart + 16868] = 0.0 + k[956]*y_cur[IDX_eM] + k[6588]*y_cur[IDX_GRAINM]; + data[jistart + 16869] = 0.0 + k[1143]*y_cur[IDX_eM] + k[6756]*y_cur[IDX_GRAINM]; + data[jistart + 16870] = 0.0 + k[957]*y_cur[IDX_eM] + k[6603]*y_cur[IDX_GRAINM]; + data[jistart + 16871] = 0.0 + k[1169]*y_cur[IDX_eM] + k[6584]*y_cur[IDX_GRAINM]; + data[jistart + 16872] = 0.0 + k[5933] + k[6285]; + data[jistart + 16873] = 0.0 + k[5464]*y_cur[IDX_OHI]; + data[jistart + 16874] = 0.0 + k[1113]*y_cur[IDX_eM] + k[6558]*y_cur[IDX_GRAINM]; + data[jistart + 16875] = 0.0 + k[1170]*y_cur[IDX_eM] + k[1172]*y_cur[IDX_eM] + + k[6528]*y_cur[IDX_GRAINM] + k[6530]*y_cur[IDX_GRAINM]; + data[jistart + 16876] = 0.0 - k[3760]*y_cur[IDX_OI]; + data[jistart + 16877] = 0.0 - k[3763]*y_cur[IDX_OI]; + data[jistart + 16878] = 0.0 - k[5342]*y_cur[IDX_OI]; + data[jistart + 16879] = 0.0 - k[3748]*y_cur[IDX_OI]; + data[jistart + 16880] = 0.0 - k[3682]*y_cur[IDX_OI]; + data[jistart + 16881] = 0.0 - k[3731]*y_cur[IDX_OI]; + data[jistart + 16882] = 0.0 - k[5218]*y_cur[IDX_OI]; + data[jistart + 16883] = 0.0 + k[1221]*y_cur[IDX_eM] + k[1221]*y_cur[IDX_eM] + + k[1222]*y_cur[IDX_eM] + k[6750]*y_cur[IDX_GRAINM] + + k[6750]*y_cur[IDX_GRAINM] + k[6751]*y_cur[IDX_GRAINM]; + data[jistart + 16884] = 0.0 - k[3761]*y_cur[IDX_OI]; + data[jistart + 16885] = 0.0 + k[1055]*y_cur[IDX_eM] + k[6486]*y_cur[IDX_GRAINM]; + data[jistart + 16886] = 0.0 - k[3737]*y_cur[IDX_OI]; + data[jistart + 16887] = 0.0 - k[5442]*y_cur[IDX_OI]; + data[jistart + 16888] = 0.0 - k[5452]*y_cur[IDX_OI]; + data[jistart + 16889] = 0.0 - k[3762]*y_cur[IDX_OI]; + data[jistart + 16890] = 0.0 + k[3205]*y_cur[IDX_HeII] - k[5389]*y_cur[IDX_OI] + k[5824] + + k[6135]; + data[jistart + 16891] = 0.0 + k[1135]*y_cur[IDX_eM] + k[1136]*y_cur[IDX_eM] - + k[3741]*y_cur[IDX_OI] + k[6612]*y_cur[IDX_GRAINM] + + k[6613]*y_cur[IDX_GRAINM]; + data[jistart + 16892] = 0.0 - k[5203]*y_cur[IDX_OI]; + data[jistart + 16893] = 0.0 + k[919]*y_cur[IDX_eM] + k[6493]*y_cur[IDX_GRAINM]; + data[jistart + 16894] = 0.0 - k[5384]*y_cur[IDX_OI]; + data[jistart + 16895] = 0.0 - k[5216]*y_cur[IDX_OI]; + data[jistart + 16896] = 0.0 + k[3269]*y_cur[IDX_HeII] - k[5414]*y_cur[IDX_OI]; + data[jistart + 16897] = 0.0 + k[1218]*y_cur[IDX_eM] + k[6600]*y_cur[IDX_GRAINM]; + data[jistart + 16898] = 0.0 + k[5275]*y_cur[IDX_NI] + k[5275]*y_cur[IDX_NI] + + k[5276]*y_cur[IDX_NI] - k[5423]*y_cur[IDX_OI] + k[5890] + k[6227]; + data[jistart + 16899] = 0.0 - k[5433]*y_cur[IDX_OI] - k[5434]*y_cur[IDX_OI] - + k[5435]*y_cur[IDX_OI]; + data[jistart + 16900] = 0.0 - k[5441]*y_cur[IDX_OI]; + data[jistart + 16901] = 0.0 - k[5364]*y_cur[IDX_OI]; + data[jistart + 16902] = 0.0 - k[5407]*y_cur[IDX_OI]; + data[jistart + 16903] = 0.0 - k[5360]*y_cur[IDX_OI]; + data[jistart + 16904] = 0.0 - k[5377]*y_cur[IDX_OI]; + data[jistart + 16905] = 0.0 + k[3301]*y_cur[IDX_HeII] + k[5288]*y_cur[IDX_NI] + k[5910] + + k[6251]; + data[jistart + 16906] = 0.0 - k[5437]*y_cur[IDX_OI]; + data[jistart + 16907] = 0.0 - k[3753]*y_cur[IDX_OI]; + data[jistart + 16908] = 0.0 + k[5936] + k[6289]; + data[jistart + 16909] = 0.0 - k[5401]*y_cur[IDX_OI]; + data[jistart + 16910] = 0.0 - k[5410]*y_cur[IDX_OI]; + data[jistart + 16911] = 0.0 - k[3679]*y_cur[IDX_OI] - k[3680]*y_cur[IDX_OI]; + data[jistart + 16912] = 0.0 + k[1178]*y_cur[IDX_eM] + k[6707]*y_cur[IDX_GRAINM]; + data[jistart + 16913] = 0.0 - k[5440]*y_cur[IDX_OI]; + data[jistart + 16914] = 0.0 - k[5354]*y_cur[IDX_OI] + k[5712] + k[5997]; + data[jistart + 16915] = 0.0 - k[5450]*y_cur[IDX_OI] - k[5451]*y_cur[IDX_OI]; + data[jistart + 16916] = 0.0 - k[5408]*y_cur[IDX_OI] - k[5409]*y_cur[IDX_OI]; + data[jistart + 16917] = 0.0 - k[5425]*y_cur[IDX_OI] - k[5426]*y_cur[IDX_OI]; + data[jistart + 16918] = 0.0 - k[5445]*y_cur[IDX_OI] - k[5446]*y_cur[IDX_OI]; + data[jistart + 16919] = 0.0 + k[1314]*y_cur[IDX_CII] + k[3099]*y_cur[IDX_HeII] - + k[5359]*y_cur[IDX_OI]; + data[jistart + 16920] = 0.0 - k[5372]*y_cur[IDX_OI]; + data[jistart + 16921] = 0.0 - k[3757]*y_cur[IDX_OI]; + data[jistart + 16922] = 0.0 - k[3758]*y_cur[IDX_OI] - k[3759]*y_cur[IDX_OI] + + k[3884]*y_cur[IDX_O2I]; + data[jistart + 16923] = 0.0 - k[5378]*y_cur[IDX_OI]; + data[jistart + 16924] = 0.0 - k[5391]*y_cur[IDX_OI]; + data[jistart + 16925] = 0.0 + k[5191]*y_cur[IDX_HI] - k[5427]*y_cur[IDX_OI] + k[6238]; + data[jistart + 16926] = 0.0 + k[665]*y_cur[IDX_OII] + k[3304]*y_cur[IDX_HeII] - + k[5438]*y_cur[IDX_OI] + k[5914] + k[6256]; + data[jistart + 16927] = 0.0 + k[3792]*y_cur[IDX_OHII] - k[5443]*y_cur[IDX_OI] - + k[5444]*y_cur[IDX_OI]; + data[jistart + 16928] = 0.0 + k[5175]*y_cur[IDX_HI] - k[5411]*y_cur[IDX_OI] - + k[5412]*y_cur[IDX_OI] - k[5413]*y_cur[IDX_OI]; + data[jistart + 16929] = 0.0 + k[659]*y_cur[IDX_OII] + k[2354]*y_cur[IDX_HII] + + k[3275]*y_cur[IDX_HeII] - k[5418]*y_cur[IDX_OI] - + k[5419]*y_cur[IDX_OI] + k[6212]; + data[jistart + 16930] = 0.0 - k[5447]*y_cur[IDX_OI]; + data[jistart + 16931] = 0.0 - k[3711]*y_cur[IDX_OI]; + data[jistart + 16932] = 0.0 - k[3720]*y_cur[IDX_OI]; + data[jistart + 16933] = 0.0 - k[3722]*y_cur[IDX_OI]; + data[jistart + 16934] = 0.0 - k[3725]*y_cur[IDX_OI]; + data[jistart + 16935] = 0.0 + k[3291]*y_cur[IDX_HeII] + k[5194]*y_cur[IDX_HI] - + k[5428]*y_cur[IDX_OI] - k[5429]*y_cur[IDX_OI] + k[5901] + k[6239]; + data[jistart + 16936] = 0.0 - k[3754]*y_cur[IDX_OI] - k[3755]*y_cur[IDX_OI]; + data[jistart + 16937] = 0.0 - k[3756]*y_cur[IDX_OI]; + data[jistart + 16938] = 0.0 - k[683]*y_cur[IDX_OI] + k[981]*y_cur[IDX_eM] + + k[2841]*y_cur[IDX_HI] - k[3730]*y_cur[IDX_OI] + + k[6540]*y_cur[IDX_GRAINM]; + data[jistart + 16939] = 0.0 + k[3793]*y_cur[IDX_OHII] - k[5449]*y_cur[IDX_OI]; + data[jistart + 16940] = 0.0 - k[5448]*y_cur[IDX_OI]; + data[jistart + 16941] = 0.0 - k[3713]*y_cur[IDX_OI]; + data[jistart + 16942] = 0.0 - k[3724]*y_cur[IDX_OI]; + data[jistart + 16943] = 0.0 - k[5436]*y_cur[IDX_OI]; + data[jistart + 16944] = 0.0 - k[3738]*y_cur[IDX_OI] - k[3739]*y_cur[IDX_OI]; + data[jistart + 16945] = 0.0 - k[3751]*y_cur[IDX_OI]; + data[jistart + 16946] = 0.0 - k[3697]*y_cur[IDX_OI]; + data[jistart + 16947] = 0.0 - k[3719]*y_cur[IDX_OI]; + data[jistart + 16948] = 0.0 + k[1099]*y_cur[IDX_eM] - k[3736]*y_cur[IDX_OI] + + k[6567]*y_cur[IDX_GRAINM]; + data[jistart + 16949] = 0.0 - k[3707]*y_cur[IDX_OI]; + data[jistart + 16950] = 0.0 - k[3704]*y_cur[IDX_OI]; + data[jistart + 16951] = 0.0 + k[3672]*y_cur[IDX_O2I] - k[3732]*y_cur[IDX_OI]; + data[jistart + 16952] = 0.0 - k[3716]*y_cur[IDX_OI]; + data[jistart + 16953] = 0.0 + k[3812]*y_cur[IDX_O2I]; + data[jistart + 16954] = 0.0 + k[650]*y_cur[IDX_OII]; + data[jistart + 16955] = 0.0 - k[3715]*y_cur[IDX_OI]; + data[jistart + 16956] = 0.0 + k[3668]*y_cur[IDX_O2I]; + data[jistart + 16957] = 0.0 - k[3749]*y_cur[IDX_OI]; + data[jistart + 16958] = 0.0 - k[3710]*y_cur[IDX_OI]; + data[jistart + 16959] = 0.0 - k[3727]*y_cur[IDX_OI]; + data[jistart + 16960] = 0.0 - k[3740]*y_cur[IDX_OI]; + data[jistart + 16961] = 0.0 - k[5395]*y_cur[IDX_OI]; + data[jistart + 16962] = 0.0 - k[3706]*y_cur[IDX_OI]; + data[jistart + 16963] = 0.0 - k[5381]*y_cur[IDX_OI] - k[5382]*y_cur[IDX_OI] - + k[5383]*y_cur[IDX_OI]; + data[jistart + 16964] = 0.0 - k[681]*y_cur[IDX_OI] + k[2276]*y_cur[IDX_O2I] + + k[2535]*y_cur[IDX_H2OI]; + data[jistart + 16965] = 0.0 + k[3773]*y_cur[IDX_OHII] + k[3774]*y_cur[IDX_OHII]; + data[jistart + 16966] = 0.0 - k[5350]*y_cur[IDX_OI] - k[5351]*y_cur[IDX_OI] + + k[5458]*y_cur[IDX_OHI]; + data[jistart + 16967] = 0.0 + k[7081] + k[7263] + k[7445]; + data[jistart + 16968] = 0.0 - k[684]*y_cur[IDX_OI] - k[3744]*y_cur[IDX_OI]; + data[jistart + 16969] = 0.0 + k[4732]*y_cur[IDX_OM]; + data[jistart + 16970] = 0.0 - k[3684]*y_cur[IDX_OI]; + data[jistart + 16971] = 0.0 - k[3699]*y_cur[IDX_OI]; + data[jistart + 16972] = 0.0 + k[4735]*y_cur[IDX_OM]; + data[jistart + 16973] = 0.0 - k[3742]*y_cur[IDX_OI] - k[3743]*y_cur[IDX_OI]; + data[jistart + 16974] = 0.0 + k[3491]*y_cur[IDX_H2OI] + k[3500]*y_cur[IDX_NOI] - + k[3503]*y_cur[IDX_OI]; + data[jistart + 16975] = 0.0 + k[4790]*y_cur[IDX_OII]; + data[jistart + 16976] = 0.0 + k[4649]*y_cur[IDX_OII]; + data[jistart + 16977] = 0.0 - k[2396]*y_cur[IDX_OI]; + data[jistart + 16978] = 0.0 + k[663]*y_cur[IDX_OII] + k[3293]*y_cur[IDX_HeII] - + k[5430]*y_cur[IDX_OI] - k[5431]*y_cur[IDX_OI]; + data[jistart + 16979] = 0.0 + k[3514]*y_cur[IDX_H2OI] + k[3524]*y_cur[IDX_O2I] - + k[3746]*y_cur[IDX_OI]; + data[jistart + 16980] = 0.0 + k[5484]*y_cur[IDX_O2I]; + data[jistart + 16981] = 0.0 - k[132]*y_cur[IDX_OI] + k[4860]*y_cur[IDX_OII]; + data[jistart + 16982] = 0.0 + k[4761]*y_cur[IDX_OM]; + data[jistart + 16983] = 0.0 - k[129]*y_cur[IDX_OI] - k[3687]*y_cur[IDX_OI] + + k[4054]*y_cur[IDX_OII]; + data[jistart + 16984] = 0.0 - k[3700]*y_cur[IDX_OI] + k[4229]*y_cur[IDX_OII]; + data[jistart + 16985] = 0.0 - k[682]*y_cur[IDX_OI] + k[980]*y_cur[IDX_eM] + + k[3798]*y_cur[IDX_OHI] + k[6136] + k[6373]*y_cur[IDX_GRAINM]; + data[jistart + 16986] = 0.0 - k[3728]*y_cur[IDX_OI] - k[3729]*y_cur[IDX_OI]; + data[jistart + 16987] = 0.0 + k[4742]*y_cur[IDX_OM]; + data[jistart + 16988] = 0.0 + k[4825]*y_cur[IDX_OII]; + data[jistart + 16989] = 0.0 - k[3681]*y_cur[IDX_OI] + k[3984]*y_cur[IDX_OII]; + data[jistart + 16990] = 0.0 - k[3694]*y_cur[IDX_OI] + k[4124]*y_cur[IDX_OII]; + data[jistart + 16991] = 0.0 - k[3709]*y_cur[IDX_OI] + k[4404]*y_cur[IDX_OII]; + data[jistart + 16992] = 0.0 - k[3718]*y_cur[IDX_OI] + k[4544]*y_cur[IDX_OII]; + data[jistart + 16993] = 0.0 - k[3714]*y_cur[IDX_OI] + k[4474]*y_cur[IDX_OII]; + data[jistart + 16994] = 0.0 - k[3723]*y_cur[IDX_OI] + k[4614]*y_cur[IDX_OII]; + data[jistart + 16995] = 0.0 - k[3678]*y_cur[IDX_OI] + k[3949]*y_cur[IDX_OII]; + data[jistart + 16996] = 0.0 - k[3705]*y_cur[IDX_OI] + k[4299]*y_cur[IDX_OII]; + data[jistart + 16997] = 0.0 - k[131]*y_cur[IDX_OI] + k[4334]*y_cur[IDX_OII]; + data[jistart + 16998] = 0.0 - k[5415]*y_cur[IDX_OI] - k[5416]*y_cur[IDX_OI]; + data[jistart + 16999] = 0.0 - k[8]*y_cur[IDX_OI] + k[1449]*y_cur[IDX_NOI] + + k[3914]*y_cur[IDX_OII]; + data[jistart + 17000] = 0.0 - k[5392]*y_cur[IDX_OI] - k[5393]*y_cur[IDX_OI]; + data[jistart + 17001] = 0.0 - k[126]*y_cur[IDX_OI] + k[666]*y_cur[IDX_CNI] + + k[667]*y_cur[IDX_O2I] + k[4727]*y_cur[IDX_CII] + + k[4728]*y_cur[IDX_C2H2II] + k[4729]*y_cur[IDX_C2H3II] + + k[4730]*y_cur[IDX_C4H2II] + k[4731]*y_cur[IDX_C4H3II] + + k[4732]*y_cur[IDX_C4SII] + k[4733]*y_cur[IDX_CH2CCHII] + + k[4734]*y_cur[IDX_CH3II] + k[4735]*y_cur[IDX_CNCII] + + k[4736]*y_cur[IDX_FeII] + k[4737]*y_cur[IDX_HII] + + k[4738]*y_cur[IDX_H2COII] + k[4739]*y_cur[IDX_H2SII] + + k[4740]*y_cur[IDX_H3II] + k[4741]*y_cur[IDX_H3OII] + + k[4742]*y_cur[IDX_HC2SII] + k[4743]*y_cur[IDX_HCNHII] + + k[4744]*y_cur[IDX_HCNHII] + k[4745]*y_cur[IDX_HCOII] + + k[4746]*y_cur[IDX_HCOII] + k[4747]*y_cur[IDX_HeII] + + k[4748]*y_cur[IDX_MgII] + k[4749]*y_cur[IDX_NII] + + k[4750]*y_cur[IDX_N2HII] + k[4751]*y_cur[IDX_NH3II] + + k[4752]*y_cur[IDX_NH4II] + k[4753]*y_cur[IDX_NOII] + + k[4754]*y_cur[IDX_NaII] + k[4755]*y_cur[IDX_OII] + + k[4755]*y_cur[IDX_OII] + k[4756]*y_cur[IDX_SII] + + k[4757]*y_cur[IDX_SOII] + k[4758]*y_cur[IDX_SiII] + + k[4759]*y_cur[IDX_SiOII] + k[4760]*y_cur[IDX_SiOHII] + + k[4761]*y_cur[IDX_SiSII] + k[5895] + k[6232]; + data[jistart + 17002] = 0.0 - k[3721]*y_cur[IDX_OI] + k[4579]*y_cur[IDX_OII]; + data[jistart + 17003] = 0.0 + k[651]*y_cur[IDX_OII]; + data[jistart + 17004] = 0.0 - k[80]*y_cur[IDX_OI] + k[4720]*y_cur[IDX_OII]; + data[jistart + 17005] = 0.0 + k[3671]*y_cur[IDX_O2I]; + data[jistart + 17006] = 0.0 - k[3696]*y_cur[IDX_OI]; + data[jistart + 17007] = 0.0 - k[3717]*y_cur[IDX_OI] + k[4509]*y_cur[IDX_OII]; + data[jistart + 17008] = 0.0 - k[128]*y_cur[IDX_OI] - k[3685]*y_cur[IDX_OI] + + k[4019]*y_cur[IDX_OII]; + data[jistart + 17009] = 0.0 - k[5355]*y_cur[IDX_OI]; + data[jistart + 17010] = 0.0 - k[3693]*y_cur[IDX_OI] + k[4089]*y_cur[IDX_OII]; + data[jistart + 17011] = 0.0 - k[3698]*y_cur[IDX_OI] + k[4194]*y_cur[IDX_OII]; + data[jistart + 17012] = 0.0 - k[3708]*y_cur[IDX_OI] + k[4369]*y_cur[IDX_OII]; + data[jistart + 17013] = 0.0 - k[3703]*y_cur[IDX_OI] + k[4264]*y_cur[IDX_OII]; + data[jistart + 17014] = 0.0 - k[3712]*y_cur[IDX_OI] + k[4439]*y_cur[IDX_OII]; + data[jistart + 17015] = 0.0 + k[1266]*y_cur[IDX_eM] - k[3764]*y_cur[IDX_OI] + + k[4759]*y_cur[IDX_OM] + k[6284] + k[6531]*y_cur[IDX_GRAINM]; + data[jistart + 17016] = 0.0 - k[5353]*y_cur[IDX_OI]; + data[jistart + 17017] = 0.0 + k[4760]*y_cur[IDX_OM]; + data[jistart + 17018] = 0.0 + k[660]*y_cur[IDX_OII] + k[3547]*y_cur[IDX_OHII] + + k[5301]*y_cur[IDX_OHI] - k[5420]*y_cur[IDX_OI] - + k[5421]*y_cur[IDX_OI]; + data[jistart + 17019] = 0.0 - k[3686]*y_cur[IDX_OI]; + data[jistart + 17020] = 0.0 - k[3695]*y_cur[IDX_OI]; + data[jistart + 17021] = 0.0 - k[5367]*y_cur[IDX_OI]; + data[jistart + 17022] = 0.0 - k[1991]*y_cur[IDX_OI]; + data[jistart + 17023] = 0.0 + k[1180]*y_cur[IDX_eM] + k[1914]*y_cur[IDX_CI] + + k[2016]*y_cur[IDX_CH2I] + k[2209]*y_cur[IDX_CH4I] + + k[2264]*y_cur[IDX_CHI] + k[3547]*y_cur[IDX_NH2I] + + k[3623]*y_cur[IDX_NHI] - k[3750]*y_cur[IDX_OI] + + k[3769]*y_cur[IDX_C2I] + k[3770]*y_cur[IDX_C2HI] + + k[3773]*y_cur[IDX_C2H6I] + k[3774]*y_cur[IDX_C2H6I] + + k[3775]*y_cur[IDX_CNI] + k[3776]*y_cur[IDX_CO2I] + + k[3777]*y_cur[IDX_COI] + k[3778]*y_cur[IDX_H2COI] + + k[3779]*y_cur[IDX_H2OI] + k[3780]*y_cur[IDX_H2SI] + + k[3781]*y_cur[IDX_HCNI] + k[3783]*y_cur[IDX_HCOI] + + k[3784]*y_cur[IDX_HNCI] + k[3785]*y_cur[IDX_N2I] + + k[3786]*y_cur[IDX_NH3I] + k[3787]*y_cur[IDX_NOI] + + k[3788]*y_cur[IDX_OHI] + k[3789]*y_cur[IDX_SI] + + k[3791]*y_cur[IDX_SiI] + k[3792]*y_cur[IDX_SiCI] + + k[3793]*y_cur[IDX_SiHI] + k[3794]*y_cur[IDX_SiOI] + + k[6329]*y_cur[IDX_GRAINM]; + data[jistart + 17024] = 0.0 + k[1012]*y_cur[IDX_eM] + k[1013]*y_cur[IDX_eM] - + k[3733]*y_cur[IDX_OI] + k[3799]*y_cur[IDX_OHI] + + k[6340]*y_cur[IDX_GRAINM] + k[6341]*y_cur[IDX_GRAINM]; + data[jistart + 17025] = 0.0 - k[130]*y_cur[IDX_OI] + k[4159]*y_cur[IDX_OII]; + data[jistart + 17026] = 0.0 - k[5358]*y_cur[IDX_OI]; + data[jistart + 17027] = 0.0 + k[1967]*y_cur[IDX_O2I] - k[1969]*y_cur[IDX_OI]; + data[jistart + 17028] = 0.0 + k[2334]*y_cur[IDX_HII] + k[3207]*y_cur[IDX_HeII] + + k[3776]*y_cur[IDX_OHII] - k[5390]*y_cur[IDX_OI] + k[5825] + k[6137]; + data[jistart + 17029] = 0.0 + k[1174]*y_cur[IDX_eM] + k[1174]*y_cur[IDX_eM] + + k[1912]*y_cur[IDX_CI] + k[2014]*y_cur[IDX_CH2I] + + k[2262]*y_cur[IDX_CHI] + k[3465]*y_cur[IDX_NI] + + k[3620]*y_cur[IDX_NHI] + k[3654]*y_cur[IDX_C2H2I] + + k[3667]*y_cur[IDX_SI] + k[6233] + k[6425]*y_cur[IDX_GRAINM] + + k[6425]*y_cur[IDX_GRAINM]; + data[jistart + 17030] = 0.0 - k[5341]*y_cur[IDX_OI]; + data[jistart + 17031] = 0.0 - k[5376]*y_cur[IDX_OI]; + data[jistart + 17032] = 0.0 + k[3332]*y_cur[IDX_HeII] + k[3794]*y_cur[IDX_OHII] + k[5934] + + k[6286]; + data[jistart + 17033] = 0.0 + k[4736]*y_cur[IDX_OM]; + data[jistart + 17034] = 0.0 + k[654]*y_cur[IDX_OII]; + data[jistart + 17035] = 0.0 + k[4748]*y_cur[IDX_OM]; + data[jistart + 17036] = 0.0 + k[4754]*y_cur[IDX_OM]; + data[jistart + 17037] = 0.0 - k[5340]*y_cur[IDX_OI]; + data[jistart + 17038] = 0.0 - k[5374]*y_cur[IDX_OI]; + data[jistart + 17039] = 0.0 - k[5370]*y_cur[IDX_OI]; + data[jistart + 17040] = 0.0 - k[5375]*y_cur[IDX_OI]; + data[jistart + 17041] = 0.0 - k[5373]*y_cur[IDX_OI]; + data[jistart + 17042] = 0.0 + k[619]*y_cur[IDX_OII] + k[3620]*y_cur[IDX_O2II] + + k[3623]*y_cur[IDX_OHII] + k[5313]*y_cur[IDX_NOI] + + k[5316]*y_cur[IDX_O2I] - k[5318]*y_cur[IDX_OI] - + k[5319]*y_cur[IDX_OI] - k[5320]*y_cur[IDX_OI] + + k[5323]*y_cur[IDX_OHI]; + data[jistart + 17043] = 0.0 - k[5365]*y_cur[IDX_OI]; + data[jistart + 17044] = 0.0 - k[5368]*y_cur[IDX_OI]; + data[jistart + 17045] = 0.0 + k[4684]*y_cur[IDX_OII]; + data[jistart + 17046] = 0.0 - k[5361]*y_cur[IDX_OI]; + data[jistart + 17047] = 0.0 + k[1428]*y_cur[IDX_CII] + k[3305]*y_cur[IDX_HeII] + + k[4986]*y_cur[IDX_CI] + k[5200]*y_cur[IDX_HI] + + k[5290]*y_cur[IDX_NI] + k[5338]*y_cur[IDX_O2I] - + k[5439]*y_cur[IDX_OI] + k[5490]*y_cur[IDX_SI] - + k[5583]*y_cur[IDX_OI] + k[5915] + k[6257]; + data[jistart + 17048] = 0.0 - k[5371]*y_cur[IDX_OI]; + data[jistart + 17049] = 0.0 - k[3691]*y_cur[IDX_OI] - k[3692]*y_cur[IDX_OI]; + data[jistart + 17050] = 0.0 + k[4731]*y_cur[IDX_OM]; + data[jistart + 17051] = 0.0 - k[3745]*y_cur[IDX_OI] + k[4750]*y_cur[IDX_OM]; + data[jistart + 17052] = 0.0 + k[1220]*y_cur[IDX_eM] + k[3468]*y_cur[IDX_NI] + + k[4757]*y_cur[IDX_OM] + k[6620]*y_cur[IDX_GRAINM]; + data[jistart + 17053] = 0.0 - k[3726]*y_cur[IDX_OI] + k[4733]*y_cur[IDX_OM]; + data[jistart + 17054] = 0.0 - k[5369]*y_cur[IDX_OI]; + data[jistart + 17055] = 0.0 - k[5366]*y_cur[IDX_OI]; + data[jistart + 17056] = 0.0 - k[3734]*y_cur[IDX_OI] - k[3735]*y_cur[IDX_OI] + + k[4739]*y_cur[IDX_OM]; + data[jistart + 17057] = 0.0 + k[3356]*y_cur[IDX_NOI] + k[3357]*y_cur[IDX_O2I] + + k[4749]*y_cur[IDX_OM]; + data[jistart + 17058] = 0.0 - k[5357]*y_cur[IDX_OI]; + data[jistart + 17059] = 0.0 + k[996]*y_cur[IDX_eM] + k[4738]*y_cur[IDX_OM] + + k[6398]*y_cur[IDX_GRAINM]; + data[jistart + 17060] = 0.0 - k[5356]*y_cur[IDX_OI]; + data[jistart + 17061] = 0.0 - k[5362]*y_cur[IDX_OI]; + data[jistart + 17062] = 0.0 + k[1168]*y_cur[IDX_eM] + k[4753]*y_cur[IDX_OM] + + k[6407]*y_cur[IDX_GRAINM]; + data[jistart + 17063] = 0.0 + k[266]*y_cur[IDX_CH2I] + k[295]*y_cur[IDX_CHI] + + k[492]*y_cur[IDX_HI] + k[619]*y_cur[IDX_NHI] + k[646]*y_cur[IDX_C2I] + + k[647]*y_cur[IDX_C2H2I] + k[648]*y_cur[IDX_C2H4I] + + k[649]*y_cur[IDX_C2HI] + k[650]*y_cur[IDX_CH3CNI] + + k[651]*y_cur[IDX_CH3OHI] + k[652]*y_cur[IDX_CH4I] + + k[653]*y_cur[IDX_COI] + k[654]*y_cur[IDX_FeI] + + k[655]*y_cur[IDX_H2COI] + k[656]*y_cur[IDX_H2OI] + + k[657]*y_cur[IDX_H2SI] + k[658]*y_cur[IDX_HCOI] + + k[659]*y_cur[IDX_N2OI] + k[660]*y_cur[IDX_NH2I] + + k[661]*y_cur[IDX_NH3I] + k[662]*y_cur[IDX_O2I] + + k[663]*y_cur[IDX_OCSI] + k[664]*y_cur[IDX_OHI] + + k[665]*y_cur[IDX_SO2I] + k[3914]*y_cur[IDX_CM] + + k[3949]*y_cur[IDX_C10M] + k[3984]*y_cur[IDX_C10HM] + + k[4019]*y_cur[IDX_C2M] + k[4054]*y_cur[IDX_C2HM] + + k[4089]*y_cur[IDX_C3M] + k[4124]*y_cur[IDX_C3HM] + + k[4159]*y_cur[IDX_C3NM] + k[4194]*y_cur[IDX_C4M] + + k[4229]*y_cur[IDX_C4HM] + k[4264]*y_cur[IDX_C5M] + + k[4299]*y_cur[IDX_C5HM] + k[4334]*y_cur[IDX_C5NM] + + k[4369]*y_cur[IDX_C6M] + k[4404]*y_cur[IDX_C6HM] + + k[4439]*y_cur[IDX_C7M] + k[4474]*y_cur[IDX_C7HM] + + k[4509]*y_cur[IDX_C8M] + k[4544]*y_cur[IDX_C8HM] + + k[4579]*y_cur[IDX_C9M] + k[4614]*y_cur[IDX_C9HM] + + k[4649]*y_cur[IDX_CHM] + k[4684]*y_cur[IDX_CNM] + + k[4720]*y_cur[IDX_HM] + k[4755]*y_cur[IDX_OM] + + k[4755]*y_cur[IDX_OM] + k[4790]*y_cur[IDX_O2M] + + k[4825]*y_cur[IDX_OHM] + k[4860]*y_cur[IDX_SM] + + k[5623]*y_cur[IDX_eM] + k[6326]*y_cur[IDX_GRAINM]; + data[jistart + 17064] = 0.0 - k[3701]*y_cur[IDX_OI] - k[3702]*y_cur[IDX_OI] + + k[4730]*y_cur[IDX_OM]; + data[jistart + 17065] = 0.0 + k[4743]*y_cur[IDX_OM] + k[4744]*y_cur[IDX_OM]; + data[jistart + 17066] = 0.0 + k[266]*y_cur[IDX_OII] + k[2014]*y_cur[IDX_O2II] + + k[2016]*y_cur[IDX_OHII] + k[5010]*y_cur[IDX_O2I] - + k[5012]*y_cur[IDX_OI] - k[5013]*y_cur[IDX_OI] - + k[5014]*y_cur[IDX_OI] - k[5015]*y_cur[IDX_OI] + + k[5018]*y_cur[IDX_OHI]; + data[jistart + 17067] = 0.0 + k[3784]*y_cur[IDX_OHII]; + data[jistart + 17068] = 0.0 - k[3747]*y_cur[IDX_OI] + k[3805]*y_cur[IDX_OHI] + + k[4751]*y_cur[IDX_OM]; + data[jistart + 17069] = 0.0 + k[648]*y_cur[IDX_OII] - k[5346]*y_cur[IDX_OI] - + k[5347]*y_cur[IDX_OI] - k[5348]*y_cur[IDX_OI] - + k[5349]*y_cur[IDX_OI]; + data[jistart + 17070] = 0.0 - k[5345]*y_cur[IDX_OI]; + data[jistart + 17071] = 0.0 + k[4752]*y_cur[IDX_OM]; + data[jistart + 17072] = 0.0 + k[3785]*y_cur[IDX_OHII] + k[5220]*y_cur[IDX_O2I] - + k[5417]*y_cur[IDX_OI]; + data[jistart + 17073] = 0.0 + k[138]*y_cur[IDX_H2I] + k[138]*y_cur[IDX_H2I] + + k[144]*y_cur[IDX_HI] + k[144]*y_cur[IDX_HI] + k[662]*y_cur[IDX_OII] + + k[667]*y_cur[IDX_OM] + k[1422]*y_cur[IDX_CII] + + k[1967]*y_cur[IDX_CHII] + k[2089]*y_cur[IDX_CH3II] + + k[2276]*y_cur[IDX_CNII] + k[3290]*y_cur[IDX_HeII] + + k[3357]*y_cur[IDX_NII] + k[3524]*y_cur[IDX_NH2II] + + k[3668]*y_cur[IDX_C3II] + k[3671]*y_cur[IDX_C3HII] + + k[3672]*y_cur[IDX_CSII] + k[3674]*y_cur[IDX_SII] + + k[3812]*y_cur[IDX_PII] + k[3884]*y_cur[IDX_SiH3II] + + k[4978]*y_cur[IDX_CI] + k[5010]*y_cur[IDX_CH2I] + + k[5088]*y_cur[IDX_CHI] + k[5089]*y_cur[IDX_CHI] + + k[5092]*y_cur[IDX_CHI] + k[5093]*y_cur[IDX_CHI] + + k[5124]*y_cur[IDX_CNI] + k[5130]*y_cur[IDX_COI] + + k[5190]*y_cur[IDX_HI] + k[5220]*y_cur[IDX_N2I] + + k[5281]*y_cur[IDX_NI] + k[5316]*y_cur[IDX_NHI] + + k[5330]*y_cur[IDX_NOI] + k[5337]*y_cur[IDX_SI] + + k[5338]*y_cur[IDX_SOI] + k[5484]*y_cur[IDX_PI] + + k[5494]*y_cur[IDX_SiI] + k[5898] + k[5898] + k[6236] + k[6236]; + data[jistart + 17074] = 0.0 + k[4758]*y_cur[IDX_OM] - k[5584]*y_cur[IDX_OI]; + data[jistart + 17075] = 0.0 + k[657]*y_cur[IDX_OII] + k[3780]*y_cur[IDX_OHII] - + k[5400]*y_cur[IDX_OI]; + data[jistart + 17076] = 0.0 + k[3674]*y_cur[IDX_O2I] + k[4756]*y_cur[IDX_OM]; + data[jistart + 17077] = 0.0 + k[3791]*y_cur[IDX_OHII] + k[5494]*y_cur[IDX_O2I] - + k[5585]*y_cur[IDX_OI]; + data[jistart + 17078] = 0.0 - k[3690]*y_cur[IDX_OI] + k[4729]*y_cur[IDX_OM]; + data[jistart + 17079] = 0.0 + k[1449]*y_cur[IDX_CM] + k[3287]*y_cur[IDX_HeII] + + k[3356]*y_cur[IDX_NII] + k[3500]*y_cur[IDX_NHII] + + k[3787]*y_cur[IDX_OHII] + k[4974]*y_cur[IDX_CI] + + k[5083]*y_cur[IDX_CHI] + k[5186]*y_cur[IDX_HI] + + k[5279]*y_cur[IDX_NI] + k[5313]*y_cur[IDX_NHI] + + k[5328]*y_cur[IDX_NOI] + k[5328]*y_cur[IDX_NOI] + + k[5330]*y_cur[IDX_O2I] + k[5333]*y_cur[IDX_SI] - + k[5424]*y_cur[IDX_OI] + k[5892] + k[6229]; + data[jistart + 17080] = 0.0 + k[658]*y_cur[IDX_OII] + k[3251]*y_cur[IDX_HeII] + + k[3783]*y_cur[IDX_OHII] + k[5172]*y_cur[IDX_HI] + + k[5266]*y_cur[IDX_NI] - k[5405]*y_cur[IDX_OI] - + k[5406]*y_cur[IDX_OI]; + data[jistart + 17081] = 0.0 + k[652]*y_cur[IDX_OII] + k[2209]*y_cur[IDX_OHII] - + k[5385]*y_cur[IDX_OI]; + data[jistart + 17082] = 0.0 + k[649]*y_cur[IDX_OII] + k[3770]*y_cur[IDX_OHII] - + k[5352]*y_cur[IDX_OI]; + data[jistart + 17083] = 0.0 + k[655]*y_cur[IDX_OII] + k[3221]*y_cur[IDX_HeII] + + k[3778]*y_cur[IDX_OHII] - k[5397]*y_cur[IDX_OI]; + data[jistart + 17084] = 0.0 + k[3781]*y_cur[IDX_OHII] - k[5402]*y_cur[IDX_OI] - + k[5403]*y_cur[IDX_OI] - k[5404]*y_cur[IDX_OI]; + data[jistart + 17085] = 0.0 - k[63]*y_cur[IDX_OI] + k[295]*y_cur[IDX_OII] + + k[2262]*y_cur[IDX_O2II] + k[2264]*y_cur[IDX_OHII] + + k[5083]*y_cur[IDX_NOI] + k[5088]*y_cur[IDX_O2I] + + k[5089]*y_cur[IDX_O2I] + k[5092]*y_cur[IDX_O2I] + + k[5093]*y_cur[IDX_O2I] - k[5096]*y_cur[IDX_OI] - + k[5097]*y_cur[IDX_OI]; + data[jistart + 17086] = 0.0 + k[3667]*y_cur[IDX_O2II] + k[3789]*y_cur[IDX_OHII] + + k[5333]*y_cur[IDX_NOI] + k[5337]*y_cur[IDX_O2I] + + k[5490]*y_cur[IDX_SOI]; + data[jistart + 17087] = 0.0 + k[646]*y_cur[IDX_OII] + k[3769]*y_cur[IDX_OHII] - + k[5343]*y_cur[IDX_OI]; + data[jistart + 17088] = 0.0 + k[139]*y_cur[IDX_H2I] + k[145]*y_cur[IDX_HI] + + k[664]*y_cur[IDX_OII] + k[3788]*y_cur[IDX_OHII] + + k[3798]*y_cur[IDX_COII] + k[3799]*y_cur[IDX_H2OII] + + k[3805]*y_cur[IDX_NH3II] + k[4982]*y_cur[IDX_CI] + + k[5018]*y_cur[IDX_CH2I] + k[5045]*y_cur[IDX_CH3I] + + k[5198]*y_cur[IDX_HI] + k[5284]*y_cur[IDX_NI] + + k[5301]*y_cur[IDX_NH2I] + k[5323]*y_cur[IDX_NHI] - + k[5432]*y_cur[IDX_OI] + k[5458]*y_cur[IDX_C2H5I] + + k[5459]*y_cur[IDX_CNI] + k[5464]*y_cur[IDX_FI] + + k[5479]*y_cur[IDX_OHI] + k[5479]*y_cur[IDX_OHI] + k[5905] + k[6244]; + data[jistart + 17089] = 0.0 + k[661]*y_cur[IDX_OII] + k[3786]*y_cur[IDX_OHII] - + k[5422]*y_cur[IDX_OI]; + data[jistart + 17090] = 0.0 - k[3688]*y_cur[IDX_OI] - k[3689]*y_cur[IDX_OI] + + k[4728]*y_cur[IDX_OM]; + data[jistart + 17091] = 0.0 + k[2089]*y_cur[IDX_O2I] - k[2090]*y_cur[IDX_OI] - + k[2091]*y_cur[IDX_OI] + k[4734]*y_cur[IDX_OM]; + data[jistart + 17092] = 0.0 + k[647]*y_cur[IDX_OII] + k[3654]*y_cur[IDX_O2II] - + k[5344]*y_cur[IDX_OI]; + data[jistart + 17093] = 0.0 + k[666]*y_cur[IDX_OM] + k[3775]*y_cur[IDX_OHII] + + k[5124]*y_cur[IDX_O2I] - k[5386]*y_cur[IDX_OI] - + k[5387]*y_cur[IDX_OI] - k[5388]*y_cur[IDX_OI] + + k[5459]*y_cur[IDX_OHI]; + data[jistart + 17094] = 0.0 - k[5043]*y_cur[IDX_OI] - k[5044]*y_cur[IDX_OI] + + k[5045]*y_cur[IDX_OHI]; + data[jistart + 17095] = 0.0 + k[3465]*y_cur[IDX_O2II] + k[3468]*y_cur[IDX_SOII] + + k[5266]*y_cur[IDX_HCOI] + k[5275]*y_cur[IDX_NO2I] + + k[5275]*y_cur[IDX_NO2I] + k[5276]*y_cur[IDX_NO2I] + + k[5279]*y_cur[IDX_NOI] + k[5281]*y_cur[IDX_O2I] + + k[5284]*y_cur[IDX_OHI] + k[5288]*y_cur[IDX_POI] + + k[5290]*y_cur[IDX_SOI]; + data[jistart + 17096] = 0.0 + k[1042]*y_cur[IDX_eM] + k[4741]*y_cur[IDX_OM] + + k[6344]*y_cur[IDX_GRAINM]; + data[jistart + 17097] = 0.0 - k[8]*y_cur[IDX_CM] - k[63]*y_cur[IDX_CHI] - + k[80]*y_cur[IDX_HM] - k[126]*y_cur[IDX_OM] - k[128]*y_cur[IDX_C2M] - + k[129]*y_cur[IDX_C2HM] - k[130]*y_cur[IDX_C3NM] - + k[131]*y_cur[IDX_C5NM] - k[132]*y_cur[IDX_SM] - + k[406]*y_cur[IDX_HII] - k[681]*y_cur[IDX_CNII] - + k[682]*y_cur[IDX_COII] - k[683]*y_cur[IDX_CO2II] - + k[684]*y_cur[IDX_N2II] - k[1969]*y_cur[IDX_CHII] - + k[1991]*y_cur[IDX_CH2II] - k[2090]*y_cur[IDX_CH3II] - + k[2091]*y_cur[IDX_CH3II] - k[2396]*y_cur[IDX_H2II] - + k[2730]*y_cur[IDX_H3II] - k[2731]*y_cur[IDX_H3II] - + k[3503]*y_cur[IDX_NHII] - k[3678]*y_cur[IDX_C10M] - + k[3679]*y_cur[IDX_C10HII] - k[3680]*y_cur[IDX_C10HII] - + k[3681]*y_cur[IDX_C10HM] - k[3682]*y_cur[IDX_C10H2II] - + k[3683]*y_cur[IDX_C10H3II] - k[3684]*y_cur[IDX_C2II] - + k[3685]*y_cur[IDX_C2M] - k[3686]*y_cur[IDX_C2HII] - + k[3687]*y_cur[IDX_C2HM] - k[3688]*y_cur[IDX_C2H2II] - + k[3689]*y_cur[IDX_C2H2II] - k[3690]*y_cur[IDX_C2H3II] - + k[3691]*y_cur[IDX_C2H4II] - k[3692]*y_cur[IDX_C2H4II] - + k[3693]*y_cur[IDX_C3M] - k[3694]*y_cur[IDX_C3HM] - + k[3695]*y_cur[IDX_C3H2II] - k[3696]*y_cur[IDX_C3H3II] - + k[3697]*y_cur[IDX_C3H4II] - k[3698]*y_cur[IDX_C4M] - + k[3699]*y_cur[IDX_C4HII] - k[3700]*y_cur[IDX_C4HM] - + k[3701]*y_cur[IDX_C4H2II] - k[3702]*y_cur[IDX_C4H2II] - + k[3703]*y_cur[IDX_C5M] - k[3704]*y_cur[IDX_C5HII] - + k[3705]*y_cur[IDX_C5HM] - k[3706]*y_cur[IDX_C5H2II] - + k[3707]*y_cur[IDX_C5H3II] - k[3708]*y_cur[IDX_C6M] - + k[3709]*y_cur[IDX_C6HM] - k[3710]*y_cur[IDX_C6H2II] - + k[3711]*y_cur[IDX_C6H3II] - k[3712]*y_cur[IDX_C7M] - + k[3713]*y_cur[IDX_C7HII] - k[3714]*y_cur[IDX_C7HM] - + k[3715]*y_cur[IDX_C7H2II] - k[3716]*y_cur[IDX_C7H3II] - + k[3717]*y_cur[IDX_C8M] - k[3718]*y_cur[IDX_C8HM] - + k[3719]*y_cur[IDX_C8H2II] - k[3720]*y_cur[IDX_C8H3II] - + k[3721]*y_cur[IDX_C9M] - k[3722]*y_cur[IDX_C9HII] - + k[3723]*y_cur[IDX_C9HM] - k[3724]*y_cur[IDX_C9H2II] - + k[3725]*y_cur[IDX_C9H3II] - k[3726]*y_cur[IDX_CH2CCHII] - + k[3727]*y_cur[IDX_CH4II] - k[3728]*y_cur[IDX_CH5II] - + k[3729]*y_cur[IDX_CH5II] - k[3730]*y_cur[IDX_CO2II] - + k[3731]*y_cur[IDX_CPII] - k[3732]*y_cur[IDX_CSII] - + k[3733]*y_cur[IDX_H2OII] - k[3734]*y_cur[IDX_H2SII] - + k[3735]*y_cur[IDX_H2SII] - k[3736]*y_cur[IDX_HCO2II] - + k[3737]*y_cur[IDX_HCPII] - k[3738]*y_cur[IDX_HCSII] - + k[3739]*y_cur[IDX_HCSII] - k[3740]*y_cur[IDX_HNOII] - + k[3741]*y_cur[IDX_HPOII] - k[3742]*y_cur[IDX_HSII] - + k[3743]*y_cur[IDX_HSII] - k[3744]*y_cur[IDX_N2II] - + k[3745]*y_cur[IDX_N2HII] - k[3746]*y_cur[IDX_NH2II] - + k[3747]*y_cur[IDX_NH3II] - k[3748]*y_cur[IDX_NSII] - + k[3749]*y_cur[IDX_O2HII] - k[3750]*y_cur[IDX_OHII] - + k[3751]*y_cur[IDX_PHII] - k[3752]*y_cur[IDX_PNII] - + k[3753]*y_cur[IDX_SiCII] - k[3754]*y_cur[IDX_SiCH2II] - + k[3755]*y_cur[IDX_SiCH2II] - k[3756]*y_cur[IDX_SiHII] - + k[3757]*y_cur[IDX_SiH2II] - k[3758]*y_cur[IDX_SiH3II] - + k[3759]*y_cur[IDX_SiH3II] - k[3760]*y_cur[IDX_SiH5II] - + k[3761]*y_cur[IDX_SiNII] - k[3762]*y_cur[IDX_SiNCII] - + k[3763]*y_cur[IDX_SiNCHII] - k[3764]*y_cur[IDX_SiOII] - + k[5012]*y_cur[IDX_CH2I] - k[5013]*y_cur[IDX_CH2I] - + k[5014]*y_cur[IDX_CH2I] - k[5015]*y_cur[IDX_CH2I] - + k[5043]*y_cur[IDX_CH3I] - k[5044]*y_cur[IDX_CH3I] - + k[5096]*y_cur[IDX_CHI] - k[5097]*y_cur[IDX_CHI] - + k[5147]*y_cur[IDX_H2I] - k[5203]*y_cur[IDX_HCNOI] - + k[5216]*y_cur[IDX_HOCNI] - k[5218]*y_cur[IDX_HONCI] - + k[5318]*y_cur[IDX_NHI] - k[5319]*y_cur[IDX_NHI] - + k[5320]*y_cur[IDX_NHI] - k[5340]*y_cur[IDX_C10I] - + k[5341]*y_cur[IDX_C10HI] - k[5342]*y_cur[IDX_C11I] - + k[5343]*y_cur[IDX_C2I] - k[5344]*y_cur[IDX_C2H2I] - + k[5345]*y_cur[IDX_C2H3I] - k[5346]*y_cur[IDX_C2H4I] - + k[5347]*y_cur[IDX_C2H4I] - k[5348]*y_cur[IDX_C2H4I] - + k[5349]*y_cur[IDX_C2H4I] - k[5350]*y_cur[IDX_C2H5I] - + k[5351]*y_cur[IDX_C2H5I] - k[5352]*y_cur[IDX_C2HI] - + k[5353]*y_cur[IDX_C2NI] - k[5354]*y_cur[IDX_C2OI] - + k[5355]*y_cur[IDX_C2SI] - k[5356]*y_cur[IDX_C3I] - + k[5357]*y_cur[IDX_C3HI] - k[5358]*y_cur[IDX_C3NI] - + k[5359]*y_cur[IDX_C3OI] - k[5360]*y_cur[IDX_C3PI] - + k[5361]*y_cur[IDX_C4I] - k[5362]*y_cur[IDX_C4HI] - + k[5363]*y_cur[IDX_C4NI] - k[5364]*y_cur[IDX_C4PI] - + k[5365]*y_cur[IDX_C5I] - k[5366]*y_cur[IDX_C5HI] - + k[5367]*y_cur[IDX_C5NI] - k[5368]*y_cur[IDX_C6I] - + k[5369]*y_cur[IDX_C6HI] - k[5370]*y_cur[IDX_C7I] - + k[5371]*y_cur[IDX_C7HI] - k[5372]*y_cur[IDX_C7NI] - + k[5373]*y_cur[IDX_C8I] - k[5374]*y_cur[IDX_C8HI] - + k[5375]*y_cur[IDX_C9I] - k[5376]*y_cur[IDX_C9HI] - + k[5377]*y_cur[IDX_C9NI] - k[5378]*y_cur[IDX_CCPI] - + k[5379]*y_cur[IDX_CClI] - k[5380]*y_cur[IDX_CClI] - + k[5381]*y_cur[IDX_CH2CCH2I] - k[5382]*y_cur[IDX_CH2CCH2I] - + k[5383]*y_cur[IDX_CH2CCH2I] - k[5384]*y_cur[IDX_CH2PHI] - + k[5385]*y_cur[IDX_CH4I] - k[5386]*y_cur[IDX_CNI] - + k[5387]*y_cur[IDX_CNI] - k[5388]*y_cur[IDX_CNI] - + k[5389]*y_cur[IDX_CNOI] - k[5390]*y_cur[IDX_CO2I] - + k[5391]*y_cur[IDX_CPI] - k[5392]*y_cur[IDX_CSI] - + k[5393]*y_cur[IDX_CSI] - k[5394]*y_cur[IDX_ClOI] - + k[5395]*y_cur[IDX_H2CCCI] - k[5396]*y_cur[IDX_H2CNI] - + k[5397]*y_cur[IDX_H2COI] - k[5398]*y_cur[IDX_H2O2I] - + k[5399]*y_cur[IDX_H2OI] - k[5400]*y_cur[IDX_H2SI] - + k[5401]*y_cur[IDX_HC2PI] - k[5402]*y_cur[IDX_HCNI] - + k[5403]*y_cur[IDX_HCNI] - k[5404]*y_cur[IDX_HCNI] - + k[5405]*y_cur[IDX_HCOI] - k[5406]*y_cur[IDX_HCOI] - + k[5407]*y_cur[IDX_HCPI] - k[5408]*y_cur[IDX_HCSI] - + k[5409]*y_cur[IDX_HCSI] - k[5410]*y_cur[IDX_HCSiI] - + k[5411]*y_cur[IDX_HNOI] - k[5412]*y_cur[IDX_HNOI] - + k[5413]*y_cur[IDX_HNOI] - k[5414]*y_cur[IDX_HPOI] - + k[5415]*y_cur[IDX_HSI] - k[5416]*y_cur[IDX_HSI] - + k[5417]*y_cur[IDX_N2I] - k[5418]*y_cur[IDX_N2OI] - + k[5419]*y_cur[IDX_N2OI] - k[5420]*y_cur[IDX_NH2I] - + k[5421]*y_cur[IDX_NH2I] - k[5422]*y_cur[IDX_NH3I] - + k[5423]*y_cur[IDX_NO2I] - k[5424]*y_cur[IDX_NOI] - + k[5425]*y_cur[IDX_NSI] - k[5426]*y_cur[IDX_NSI] - + k[5427]*y_cur[IDX_O2HI] - k[5428]*y_cur[IDX_OCNI] - + k[5429]*y_cur[IDX_OCNI] - k[5430]*y_cur[IDX_OCSI] - + k[5431]*y_cur[IDX_OCSI] - k[5432]*y_cur[IDX_OHI] - + k[5433]*y_cur[IDX_PH2I] - k[5434]*y_cur[IDX_PH2I] - + k[5435]*y_cur[IDX_PH2I] - k[5436]*y_cur[IDX_PHI] - + k[5437]*y_cur[IDX_S2I] - k[5438]*y_cur[IDX_SO2I] - + k[5439]*y_cur[IDX_SOI] - k[5440]*y_cur[IDX_SiC2I] - + k[5441]*y_cur[IDX_SiC3I] - k[5442]*y_cur[IDX_SiC4I] - + k[5443]*y_cur[IDX_SiCI] - k[5444]*y_cur[IDX_SiCI] - + k[5445]*y_cur[IDX_SiH2I] - k[5446]*y_cur[IDX_SiH2I] - + k[5447]*y_cur[IDX_SiH3I] - k[5448]*y_cur[IDX_SiH4I] - + k[5449]*y_cur[IDX_SiHI] - k[5450]*y_cur[IDX_SiNI] - + k[5451]*y_cur[IDX_SiNI] - k[5452]*y_cur[IDX_SiNCI] - + k[5505]*y_cur[IDX_CII] - k[5526]*y_cur[IDX_CI] - + k[5573]*y_cur[IDX_HI] - k[5582]*y_cur[IDX_OI] - + k[5582]*y_cur[IDX_OI] - k[5582]*y_cur[IDX_OI] - + k[5582]*y_cur[IDX_OI] - k[5583]*y_cur[IDX_SOI] - + k[5584]*y_cur[IDX_SiII] - k[5585]*y_cur[IDX_SiI] - + k[5609]*y_cur[IDX_eM] - k[5685] - k[5900] - k[6301] - k[6899]; + data[jistart + 17098] = 0.0 + k[3099]*y_cur[IDX_C3OI] + k[3205]*y_cur[IDX_CNOI] + + k[3207]*y_cur[IDX_CO2I] + k[3211]*y_cur[IDX_COI] + + k[3216]*y_cur[IDX_ClOI] + k[3221]*y_cur[IDX_H2COI] + + k[3251]*y_cur[IDX_HCOI] + k[3269]*y_cur[IDX_HPOI] + + k[3275]*y_cur[IDX_N2OI] + k[3287]*y_cur[IDX_NOI] + + k[3290]*y_cur[IDX_O2I] + k[3291]*y_cur[IDX_OCNI] + + k[3293]*y_cur[IDX_OCSI] + k[3301]*y_cur[IDX_POI] + + k[3304]*y_cur[IDX_SO2I] + k[3305]*y_cur[IDX_SOI] + + k[3332]*y_cur[IDX_SiOI] + k[4747]*y_cur[IDX_OM]; + data[jistart + 17099] = 0.0 + k[1314]*y_cur[IDX_C3OI] + k[1422]*y_cur[IDX_O2I] + + k[1428]*y_cur[IDX_SOI] + k[4727]*y_cur[IDX_OM] - + k[5505]*y_cur[IDX_OI]; + data[jistart + 17100] = 0.0 + k[656]*y_cur[IDX_OII] + k[2535]*y_cur[IDX_CNII] + + k[3491]*y_cur[IDX_NHII] + k[3514]*y_cur[IDX_NH2II] + + k[3779]*y_cur[IDX_OHII] - k[5399]*y_cur[IDX_OI] + k[6161]; + data[jistart + 17101] = 0.0 - k[406]*y_cur[IDX_OI] + k[2334]*y_cur[IDX_CO2I] + + k[2354]*y_cur[IDX_N2OI] + k[4737]*y_cur[IDX_OM]; + data[jistart + 17102] = 0.0 + k[1912]*y_cur[IDX_O2II] + k[1914]*y_cur[IDX_OHII] + + k[4957]*y_cur[IDX_COI] + k[4974]*y_cur[IDX_NOI] + + k[4978]*y_cur[IDX_O2I] + k[4982]*y_cur[IDX_OHI] + + k[4986]*y_cur[IDX_SOI] - k[5526]*y_cur[IDX_OI]; + data[jistart + 17103] = 0.0 + k[4745]*y_cur[IDX_OM] + k[4746]*y_cur[IDX_OM]; + data[jistart + 17104] = 0.0 - k[2730]*y_cur[IDX_OI] - k[2731]*y_cur[IDX_OI] + + k[4740]*y_cur[IDX_OM]; + data[jistart + 17105] = 0.0 + k[653]*y_cur[IDX_OII] + k[3211]*y_cur[IDX_HeII] + + k[3777]*y_cur[IDX_OHII] + k[4957]*y_cur[IDX_CI] + + k[5130]*y_cur[IDX_O2I] + k[5826] + k[6138]; + data[jistart + 17106] = 0.0 + k[6326]*y_cur[IDX_OII] + k[6329]*y_cur[IDX_OHII] + + k[6340]*y_cur[IDX_H2OII] + k[6341]*y_cur[IDX_H2OII] + + k[6344]*y_cur[IDX_H3OII] + k[6373]*y_cur[IDX_COII] + + k[6398]*y_cur[IDX_H2COII] + k[6407]*y_cur[IDX_NOII] + + k[6425]*y_cur[IDX_O2II] + k[6425]*y_cur[IDX_O2II] + + k[6486]*y_cur[IDX_HC2OII] + k[6493]*y_cur[IDX_CH2COII] + + k[6528]*y_cur[IDX_N2OII] + k[6530]*y_cur[IDX_N2OII] + + k[6531]*y_cur[IDX_SiOII] + k[6540]*y_cur[IDX_CO2II] + + k[6558]*y_cur[IDX_HN2OII] + k[6567]*y_cur[IDX_HCO2II] + + k[6584]*y_cur[IDX_NO2II] + k[6588]*y_cur[IDX_CH3OCH3II] + + k[6600]*y_cur[IDX_POII] + k[6603]*y_cur[IDX_CH3OCH4II] + + k[6612]*y_cur[IDX_HPOII] + k[6613]*y_cur[IDX_HPOII] + + k[6620]*y_cur[IDX_SOII] + k[6632]*y_cur[IDX_ClOII] + + k[6707]*y_cur[IDX_OCSII] + k[6750]*y_cur[IDX_SO2II] + + k[6750]*y_cur[IDX_SO2II] + k[6751]*y_cur[IDX_SO2II] + + k[6756]*y_cur[IDX_HSO2II]; + data[jistart + 17107] = 0.0 + k[138]*y_cur[IDX_O2I] + k[138]*y_cur[IDX_O2I] + + k[139]*y_cur[IDX_OHI] - k[5147]*y_cur[IDX_OI]; + data[jistart + 17108] = 0.0 + k[919]*y_cur[IDX_CH2COII] + k[956]*y_cur[IDX_CH3OCH3II] + + k[957]*y_cur[IDX_CH3OCH4II] + k[980]*y_cur[IDX_COII] + + k[981]*y_cur[IDX_CO2II] + k[986]*y_cur[IDX_ClOII] + + k[996]*y_cur[IDX_H2COII] + k[1012]*y_cur[IDX_H2OII] + + k[1013]*y_cur[IDX_H2OII] + k[1042]*y_cur[IDX_H3OII] + + k[1055]*y_cur[IDX_HC2OII] + k[1099]*y_cur[IDX_HCO2II] + + k[1113]*y_cur[IDX_HN2OII] + k[1135]*y_cur[IDX_HPOII] + + k[1136]*y_cur[IDX_HPOII] + k[1143]*y_cur[IDX_HSO2II] + + k[1168]*y_cur[IDX_NOII] + k[1169]*y_cur[IDX_NO2II] + + k[1170]*y_cur[IDX_N2OII] + k[1172]*y_cur[IDX_N2OII] + + k[1174]*y_cur[IDX_O2II] + k[1174]*y_cur[IDX_O2II] + + k[1178]*y_cur[IDX_OCSII] + k[1180]*y_cur[IDX_OHII] + + k[1218]*y_cur[IDX_POII] + k[1220]*y_cur[IDX_SOII] + + k[1221]*y_cur[IDX_SO2II] + k[1221]*y_cur[IDX_SO2II] + + k[1222]*y_cur[IDX_SO2II] + k[1266]*y_cur[IDX_SiOII] - + k[5609]*y_cur[IDX_OI] + k[5623]*y_cur[IDX_OII]; + data[jistart + 17109] = 0.0 + k[144]*y_cur[IDX_O2I] + k[144]*y_cur[IDX_O2I] + + k[145]*y_cur[IDX_OHI] + k[492]*y_cur[IDX_OII] + + k[2841]*y_cur[IDX_CO2II] + k[5172]*y_cur[IDX_HCOI] + + k[5175]*y_cur[IDX_HNOI] + k[5186]*y_cur[IDX_NOI] + + k[5190]*y_cur[IDX_O2I] + k[5191]*y_cur[IDX_O2HI] + + k[5194]*y_cur[IDX_OCNI] + k[5198]*y_cur[IDX_OHI] + + k[5200]*y_cur[IDX_SOI] - k[5573]*y_cur[IDX_OI]; + data[jistart + 17110] = 0.0 - k[3216]*y_cur[IDX_HeII]; + data[jistart + 17111] = 0.0 - k[3159]*y_cur[IDX_HeII]; + data[jistart + 17112] = 0.0 - k[3282]*y_cur[IDX_HeII]; + data[jistart + 17113] = 0.0 - k[3331]*y_cur[IDX_HeII]; + data[jistart + 17114] = 0.0 - k[5653]*y_cur[IDX_HeII] - k[5654]*y_cur[IDX_HeII]; + data[jistart + 17115] = 0.0 - k[3227]*y_cur[IDX_HeII] - k[3228]*y_cur[IDX_HeII]; + data[jistart + 17116] = 0.0 - k[3313]*y_cur[IDX_HeII] - k[3314]*y_cur[IDX_HeII]; + data[jistart + 17117] = 0.0 - k[3260]*y_cur[IDX_HeII]; + data[jistart + 17118] = 0.0 - k[522]*y_cur[IDX_HeII]; + data[jistart + 17119] = 0.0 - k[5659]*y_cur[IDX_HeII] - k[5660]*y_cur[IDX_HeII]; + data[jistart + 17120] = 0.0 - k[3180]*y_cur[IDX_HeII]; + data[jistart + 17121] = 0.0 - k[3183]*y_cur[IDX_HeII]; + data[jistart + 17122] = 0.0 - k[3231]*y_cur[IDX_HeII]; + data[jistart + 17123] = 0.0 - k[3315]*y_cur[IDX_HeII]; + data[jistart + 17124] = 0.0 - k[3330]*y_cur[IDX_HeII]; + data[jistart + 17125] = 0.0 - k[3205]*y_cur[IDX_HeII] - k[3206]*y_cur[IDX_HeII]; + data[jistart + 17126] = 0.0 - k[3267]*y_cur[IDX_HeII]; + data[jistart + 17127] = 0.0 - k[3308]*y_cur[IDX_HeII] - k[3309]*y_cur[IDX_HeII]; + data[jistart + 17128] = 0.0 - k[5665]*y_cur[IDX_HeII] - k[5666]*y_cur[IDX_HeII]; + data[jistart + 17129] = 0.0 - k[520]*y_cur[IDX_HeII]; + data[jistart + 17130] = 0.0 - k[3320]*y_cur[IDX_HeII] - k[3321]*y_cur[IDX_HeII]; + data[jistart + 17131] = 0.0 - k[3174]*y_cur[IDX_HeII] - k[3175]*y_cur[IDX_HeII]; + data[jistart + 17132] = 0.0 - k[3177]*y_cur[IDX_HeII]; + data[jistart + 17133] = 0.0 - k[3268]*y_cur[IDX_HeII]; + data[jistart + 17134] = 0.0 - k[3269]*y_cur[IDX_HeII] - k[3270]*y_cur[IDX_HeII]; + data[jistart + 17135] = 0.0 - k[3271]*y_cur[IDX_HeII] - k[3272]*y_cur[IDX_HeII]; + data[jistart + 17136] = 0.0 - k[5642]*y_cur[IDX_HeII] - k[5643]*y_cur[IDX_HeII]; + data[jistart + 17137] = 0.0 - k[5647]*y_cur[IDX_HeII] - k[5648]*y_cur[IDX_HeII]; + data[jistart + 17138] = 0.0 - k[3181]*y_cur[IDX_HeII] - k[3182]*y_cur[IDX_HeII]; + data[jistart + 17139] = 0.0 - k[3244]*y_cur[IDX_HeII]; + data[jistart + 17140] = 0.0 - k[3252]*y_cur[IDX_HeII]; + data[jistart + 17141] = 0.0 - k[3298]*y_cur[IDX_HeII]; + data[jistart + 17142] = 0.0 - k[3300]*y_cur[IDX_HeII]; + data[jistart + 17143] = 0.0 - k[3310]*y_cur[IDX_HeII] - k[3311]*y_cur[IDX_HeII]; + data[jistart + 17144] = 0.0 - k[3312]*y_cur[IDX_HeII]; + data[jistart + 17145] = 0.0 - k[3113]*y_cur[IDX_HeII] - k[3114]*y_cur[IDX_HeII]; + data[jistart + 17146] = 0.0 - k[3170]*y_cur[IDX_HeII]; + data[jistart + 17147] = 0.0 - k[3253]*y_cur[IDX_HeII] - k[3254]*y_cur[IDX_HeII]; + data[jistart + 17148] = 0.0 - k[3259]*y_cur[IDX_HeII]; + data[jistart + 17149] = 0.0 - k[521]*y_cur[IDX_HeII] - k[3264]*y_cur[IDX_HeII]; + data[jistart + 17150] = 0.0 - k[3101]*y_cur[IDX_HeII] - k[3102]*y_cur[IDX_HeII]; + data[jistart + 17151] = 0.0 - k[3156]*y_cur[IDX_HeII]; + data[jistart + 17152] = 0.0 - k[3178]*y_cur[IDX_HeII] - k[3179]*y_cur[IDX_HeII]; + data[jistart + 17153] = 0.0 - k[5671]*y_cur[IDX_HeII] - k[5672]*y_cur[IDX_HeII] - + k[5673]*y_cur[IDX_HeII] - k[5674]*y_cur[IDX_HeII]; + data[jistart + 17154] = 0.0 - k[3195]*y_cur[IDX_HeII]; + data[jistart + 17155] = 0.0 - k[3222]*y_cur[IDX_HeII] - k[3223]*y_cur[IDX_HeII] - + k[3224]*y_cur[IDX_HeII]; + data[jistart + 17156] = 0.0 - k[3301]*y_cur[IDX_HeII]; + data[jistart + 17157] = 0.0 - k[3302]*y_cur[IDX_HeII]; + data[jistart + 17158] = 0.0 - k[3103]*y_cur[IDX_HeII] - k[3104]*y_cur[IDX_HeII]; + data[jistart + 17159] = 0.0 - k[3173]*y_cur[IDX_HeII]; + data[jistart + 17160] = 0.0 - k[5631]*y_cur[IDX_HeII] - k[5632]*y_cur[IDX_HeII]; + data[jistart + 17161] = 0.0 - k[3232]*y_cur[IDX_HeII] - k[3233]*y_cur[IDX_HeII]; + data[jistart + 17162] = 0.0 - k[3257]*y_cur[IDX_HeII] - k[3258]*y_cur[IDX_HeII]; + data[jistart + 17163] = 0.0 - k[3318]*y_cur[IDX_HeII] - k[3319]*y_cur[IDX_HeII]; + data[jistart + 17164] = 0.0 - k[3307]*y_cur[IDX_HeII]; + data[jistart + 17165] = 0.0 - k[3090]*y_cur[IDX_HeII]; + data[jistart + 17166] = 0.0 - k[5637]*y_cur[IDX_HeII] - k[5638]*y_cur[IDX_HeII]; + data[jistart + 17167] = 0.0 - k[3329]*y_cur[IDX_HeII]; + data[jistart + 17168] = 0.0 - k[3255]*y_cur[IDX_HeII] - k[3256]*y_cur[IDX_HeII]; + data[jistart + 17169] = 0.0 - k[3288]*y_cur[IDX_HeII] - k[3289]*y_cur[IDX_HeII]; + data[jistart + 17170] = 0.0 - k[3322]*y_cur[IDX_HeII] - k[3323]*y_cur[IDX_HeII]; + data[jistart + 17171] = 0.0 - k[3099]*y_cur[IDX_HeII] - k[3100]*y_cur[IDX_HeII]; + data[jistart + 17172] = 0.0 - k[3151]*y_cur[IDX_HeII] - k[3152]*y_cur[IDX_HeII] - + k[3153]*y_cur[IDX_HeII]; + data[jistart + 17173] = 0.0 - k[3165]*y_cur[IDX_HeII] - k[3166]*y_cur[IDX_HeII] - + k[3167]*y_cur[IDX_HeII] - k[3168]*y_cur[IDX_HeII] - + k[3169]*y_cur[IDX_HeII]; + data[jistart + 17174] = 0.0 - k[3243]*y_cur[IDX_HeII]; + data[jistart + 17175] = 0.0 - k[3130]*y_cur[IDX_HeII] - k[3131]*y_cur[IDX_HeII]; + data[jistart + 17176] = 0.0 - k[3141]*y_cur[IDX_HeII]; + data[jistart + 17177] = 0.0 - k[3062]*y_cur[IDX_HeII] - k[3063]*y_cur[IDX_HeII] - + k[3064]*y_cur[IDX_HeII] - k[3065]*y_cur[IDX_HeII] - + k[3066]*y_cur[IDX_HeII]; + data[jistart + 17178] = 0.0 - k[3157]*y_cur[IDX_HeII] - k[3158]*y_cur[IDX_HeII]; + data[jistart + 17179] = 0.0 - k[3212]*y_cur[IDX_HeII] - k[3213]*y_cur[IDX_HeII]; + data[jistart + 17180] = 0.0 - k[527]*y_cur[IDX_HeII] - k[3303]*y_cur[IDX_HeII] - + k[3304]*y_cur[IDX_HeII]; + data[jistart + 17181] = 0.0 - k[3316]*y_cur[IDX_HeII] - k[3317]*y_cur[IDX_HeII]; + data[jistart + 17182] = 0.0 - k[3085]*y_cur[IDX_HeII]; + data[jistart + 17183] = 0.0 - k[3265]*y_cur[IDX_HeII] - k[3266]*y_cur[IDX_HeII]; + data[jistart + 17184] = 0.0 - k[3275]*y_cur[IDX_HeII] - k[3276]*y_cur[IDX_HeII] - + k[3277]*y_cur[IDX_HeII] - k[3278]*y_cur[IDX_HeII]; + data[jistart + 17185] = 0.0 - k[3324]*y_cur[IDX_HeII] - k[3325]*y_cur[IDX_HeII]; + data[jistart + 17186] = 0.0 - k[3171]*y_cur[IDX_HeII] - k[3172]*y_cur[IDX_HeII]; + data[jistart + 17187] = 0.0 - k[3030]*y_cur[IDX_HeII] - k[3031]*y_cur[IDX_HeII] - + k[3032]*y_cur[IDX_HeII] - k[3033]*y_cur[IDX_HeII] - + k[3034]*y_cur[IDX_HeII]; + data[jistart + 17188] = 0.0 - k[3291]*y_cur[IDX_HeII] - k[3292]*y_cur[IDX_HeII]; + data[jistart + 17189] = 0.0 - k[3194]*y_cur[IDX_HeII]; + data[jistart + 17190] = 0.0 - k[3144]*y_cur[IDX_HeII] - k[3145]*y_cur[IDX_HeII] - + k[3146]*y_cur[IDX_HeII]; + data[jistart + 17191] = 0.0 - k[3241]*y_cur[IDX_HeII] - k[3242]*y_cur[IDX_HeII]; + data[jistart + 17192] = 0.0 - k[3328]*y_cur[IDX_HeII]; + data[jistart + 17193] = 0.0 - k[3326]*y_cur[IDX_HeII] - k[3327]*y_cur[IDX_HeII]; + data[jistart + 17194] = 0.0 - k[3299]*y_cur[IDX_HeII]; + data[jistart + 17195] = 0.0 - k[3136]*y_cur[IDX_HeII] - k[3137]*y_cur[IDX_HeII] - + k[3138]*y_cur[IDX_HeII]; + data[jistart + 17196] = 0.0 - k[3191]*y_cur[IDX_HeII]; + data[jistart + 17197] = 0.0 - k[3192]*y_cur[IDX_HeII] - k[3193]*y_cur[IDX_HeII]; + data[jistart + 17198] = 0.0 - k[3279]*y_cur[IDX_HeII]; + data[jistart + 17199] = 0.0 - k[3217]*y_cur[IDX_HeII] - k[3218]*y_cur[IDX_HeII]; + data[jistart + 17200] = 0.0 - k[3127]*y_cur[IDX_HeII] - k[3128]*y_cur[IDX_HeII] - + k[3129]*y_cur[IDX_HeII]; + data[jistart + 17201] = 0.0 - k[3119]*y_cur[IDX_HeII] - k[3120]*y_cur[IDX_HeII] - + k[3121]*y_cur[IDX_HeII]; + data[jistart + 17202] = 0.0 - k[3188]*y_cur[IDX_HeII] - k[3189]*y_cur[IDX_HeII] - + k[3190]*y_cur[IDX_HeII]; + data[jistart + 17203] = 0.0 - k[3096]*y_cur[IDX_HeII]; + data[jistart + 17204] = 0.0 - k[511]*y_cur[IDX_HeII] - k[3083]*y_cur[IDX_HeII] - + k[3084]*y_cur[IDX_HeII]; + data[jistart + 17205] = 0.0 - k[4782]*y_cur[IDX_HeII]; + data[jistart + 17206] = 0.0 - k[4641]*y_cur[IDX_HeII]; + data[jistart + 17207] = 0.0 - k[3293]*y_cur[IDX_HeII] - k[3294]*y_cur[IDX_HeII] - + k[3295]*y_cur[IDX_HeII] - k[3296]*y_cur[IDX_HeII]; + data[jistart + 17208] = 0.0 - k[526]*y_cur[IDX_HeII]; + data[jistart + 17209] = 0.0 - k[4852]*y_cur[IDX_HeII]; + data[jistart + 17210] = 0.0 - k[4046]*y_cur[IDX_HeII]; + data[jistart + 17211] = 0.0 - k[4221]*y_cur[IDX_HeII]; + data[jistart + 17212] = 0.0 - k[3184]*y_cur[IDX_HeII] - k[3185]*y_cur[IDX_HeII] - + k[3186]*y_cur[IDX_HeII] - k[3187]*y_cur[IDX_HeII]; + data[jistart + 17213] = 0.0 - k[4817]*y_cur[IDX_HeII]; + data[jistart + 17214] = 0.0 - k[3976]*y_cur[IDX_HeII]; + data[jistart + 17215] = 0.0 - k[4116]*y_cur[IDX_HeII]; + data[jistart + 17216] = 0.0 - k[3115]*y_cur[IDX_HeII] - k[3116]*y_cur[IDX_HeII]; + data[jistart + 17217] = 0.0 - k[4396]*y_cur[IDX_HeII]; + data[jistart + 17218] = 0.0 - k[4536]*y_cur[IDX_HeII]; + data[jistart + 17219] = 0.0 - k[4466]*y_cur[IDX_HeII]; + data[jistart + 17220] = 0.0 - k[4606]*y_cur[IDX_HeII]; + data[jistart + 17221] = 0.0 - k[3941]*y_cur[IDX_HeII]; + data[jistart + 17222] = 0.0 - k[4291]*y_cur[IDX_HeII]; + data[jistart + 17223] = 0.0 - k[4326]*y_cur[IDX_HeII]; + data[jistart + 17224] = 0.0 - k[3273]*y_cur[IDX_HeII]; + data[jistart + 17225] = 0.0 - k[3906]*y_cur[IDX_HeII]; + data[jistart + 17226] = 0.0 - k[3214]*y_cur[IDX_HeII] - k[3215]*y_cur[IDX_HeII]; + data[jistart + 17227] = 0.0 - k[4747]*y_cur[IDX_HeII]; + data[jistart + 17228] = 0.0 - k[4571]*y_cur[IDX_HeII]; + data[jistart + 17229] = 0.0 - k[3196]*y_cur[IDX_HeII] - k[3197]*y_cur[IDX_HeII]; + data[jistart + 17230] = 0.0 - k[4712]*y_cur[IDX_HeII]; + data[jistart + 17231] = 0.0 - k[3234]*y_cur[IDX_HeII] - k[3235]*y_cur[IDX_HeII] - + k[3236]*y_cur[IDX_HeII] - k[3237]*y_cur[IDX_HeII]; + data[jistart + 17232] = 0.0 - k[3334]*y_cur[IDX_HeII] - k[3335]*y_cur[IDX_HeII]; + data[jistart + 17233] = 0.0 - k[4501]*y_cur[IDX_HeII]; + data[jistart + 17234] = 0.0 - k[4011]*y_cur[IDX_HeII]; + data[jistart + 17235] = 0.0 - k[3091]*y_cur[IDX_HeII] - k[3092]*y_cur[IDX_HeII] - + k[3093]*y_cur[IDX_HeII] - k[3094]*y_cur[IDX_HeII]; + data[jistart + 17236] = 0.0 - k[4081]*y_cur[IDX_HeII]; + data[jistart + 17237] = 0.0 - k[4186]*y_cur[IDX_HeII]; + data[jistart + 17238] = 0.0 - k[4361]*y_cur[IDX_HeII]; + data[jistart + 17239] = 0.0 - k[4256]*y_cur[IDX_HeII]; + data[jistart + 17240] = 0.0 - k[4431]*y_cur[IDX_HeII]; + data[jistart + 17241] = 0.0 - k[3089]*y_cur[IDX_HeII]; + data[jistart + 17242] = 0.0 - k[3280]*y_cur[IDX_HeII] - k[3281]*y_cur[IDX_HeII]; + data[jistart + 17243] = 0.0 - k[3108]*y_cur[IDX_HeII] - k[3109]*y_cur[IDX_HeII] - + k[3110]*y_cur[IDX_HeII]; + data[jistart + 17244] = 0.0 - k[3124]*y_cur[IDX_HeII]; + data[jistart + 17245] = 0.0 - k[4151]*y_cur[IDX_HeII]; + data[jistart + 17246] = 0.0 - k[512]*y_cur[IDX_HeII] - k[3098]*y_cur[IDX_HeII]; + data[jistart + 17247] = 0.0 - k[516]*y_cur[IDX_HeII] - k[3207]*y_cur[IDX_HeII] - + k[3208]*y_cur[IDX_HeII] - k[3209]*y_cur[IDX_HeII] - + k[3210]*y_cur[IDX_HeII]; + data[jistart + 17248] = 0.0 - k[507]*y_cur[IDX_HeII] - k[3067]*y_cur[IDX_HeII] - + k[3068]*y_cur[IDX_HeII] - k[3069]*y_cur[IDX_HeII] - + k[3070]*y_cur[IDX_HeII] - k[3071]*y_cur[IDX_HeII] - + k[3072]*y_cur[IDX_HeII]; + data[jistart + 17249] = 0.0 - k[3154]*y_cur[IDX_HeII] - k[3155]*y_cur[IDX_HeII]; + data[jistart + 17250] = 0.0 - k[3332]*y_cur[IDX_HeII] - k[3333]*y_cur[IDX_HeII]; + data[jistart + 17251] = 0.0 - k[506]*y_cur[IDX_HeII] - k[3056]*y_cur[IDX_HeII] - + k[3057]*y_cur[IDX_HeII] - k[3058]*y_cur[IDX_HeII] - + k[3059]*y_cur[IDX_HeII] - k[3060]*y_cur[IDX_HeII] - + k[3061]*y_cur[IDX_HeII]; + data[jistart + 17252] = 0.0 - k[3147]*y_cur[IDX_HeII] - k[3148]*y_cur[IDX_HeII]; + data[jistart + 17253] = 0.0 - k[3134]*y_cur[IDX_HeII] - k[3135]*y_cur[IDX_HeII]; + data[jistart + 17254] = 0.0 - k[3149]*y_cur[IDX_HeII] - k[3150]*y_cur[IDX_HeII]; + data[jistart + 17255] = 0.0 - k[3142]*y_cur[IDX_HeII] - k[3143]*y_cur[IDX_HeII]; + data[jistart + 17256] = 0.0 - k[3285]*y_cur[IDX_HeII]; + data[jistart + 17257] = 0.0 - k[3117]*y_cur[IDX_HeII] - k[3118]*y_cur[IDX_HeII]; + data[jistart + 17258] = 0.0 - k[3125]*y_cur[IDX_HeII] - k[3126]*y_cur[IDX_HeII]; + data[jistart + 17259] = 0.0 - k[4676]*y_cur[IDX_HeII]; + data[jistart + 17260] = 0.0 - k[3105]*y_cur[IDX_HeII] - k[3106]*y_cur[IDX_HeII] - + k[3107]*y_cur[IDX_HeII]; + data[jistart + 17261] = 0.0 - k[3305]*y_cur[IDX_HeII] - k[3306]*y_cur[IDX_HeII]; + data[jistart + 17262] = 0.0 - k[3139]*y_cur[IDX_HeII] - k[3140]*y_cur[IDX_HeII]; + data[jistart + 17263] = 0.0 - k[3162]*y_cur[IDX_HeII] - k[3163]*y_cur[IDX_HeII] - + k[3164]*y_cur[IDX_HeII]; + data[jistart + 17264] = 0.0 - k[3132]*y_cur[IDX_HeII] - k[3133]*y_cur[IDX_HeII]; + data[jistart + 17265] = 0.0 - k[3122]*y_cur[IDX_HeII] - k[3123]*y_cur[IDX_HeII]; + data[jistart + 17266] = 0.0 - k[3097]*y_cur[IDX_HeII]; + data[jistart + 17267] = 0.0 - k[3095]*y_cur[IDX_HeII]; + data[jistart + 17268] = 0.0 - k[3111]*y_cur[IDX_HeII] - k[3112]*y_cur[IDX_HeII]; + data[jistart + 17269] = 0.0 - k[3238]*y_cur[IDX_HeII] - k[3239]*y_cur[IDX_HeII] - + k[3240]*y_cur[IDX_HeII]; + data[jistart + 17270] = 0.0 - k[3160]*y_cur[IDX_HeII] - k[3161]*y_cur[IDX_HeII]; + data[jistart + 17271] = 0.0 - k[3261]*y_cur[IDX_HeII] - k[3262]*y_cur[IDX_HeII] - + k[3263]*y_cur[IDX_HeII]; + data[jistart + 17272] = 0.0 - k[510]*y_cur[IDX_HeII] - k[3079]*y_cur[IDX_HeII] - + k[3080]*y_cur[IDX_HeII] - k[3081]*y_cur[IDX_HeII] - + k[3082]*y_cur[IDX_HeII]; + data[jistart + 17273] = 0.0 - k[3077]*y_cur[IDX_HeII] - k[3078]*y_cur[IDX_HeII]; + data[jistart + 17274] = 0.0 - k[523]*y_cur[IDX_HeII] - k[3274]*y_cur[IDX_HeII]; + data[jistart + 17275] = 0.0 - k[525]*y_cur[IDX_HeII] - k[3290]*y_cur[IDX_HeII]; + data[jistart + 17276] = 0.0 - k[519]*y_cur[IDX_HeII] - k[3229]*y_cur[IDX_HeII] - + k[3230]*y_cur[IDX_HeII]; + data[jistart + 17277] = 0.0 - k[528]*y_cur[IDX_HeII]; + data[jistart + 17278] = 0.0 - k[3286]*y_cur[IDX_HeII] - k[3287]*y_cur[IDX_HeII]; + data[jistart + 17279] = 0.0 - k[3249]*y_cur[IDX_HeII] - k[3250]*y_cur[IDX_HeII] - + k[3251]*y_cur[IDX_HeII]; + data[jistart + 17280] = 0.0 - k[514]*y_cur[IDX_HeII] - k[3198]*y_cur[IDX_HeII] - + k[3199]*y_cur[IDX_HeII] - k[3200]*y_cur[IDX_HeII] - + k[3201]*y_cur[IDX_HeII]; + data[jistart + 17281] = 0.0 - k[3086]*y_cur[IDX_HeII] - k[3087]*y_cur[IDX_HeII] - + k[3088]*y_cur[IDX_HeII]; + data[jistart + 17282] = 0.0 - k[517]*y_cur[IDX_HeII] - k[3219]*y_cur[IDX_HeII] - + k[3220]*y_cur[IDX_HeII] - k[3221]*y_cur[IDX_HeII]; + data[jistart + 17283] = 0.0 - k[3245]*y_cur[IDX_HeII] - k[3246]*y_cur[IDX_HeII] - + k[3247]*y_cur[IDX_HeII] - k[3248]*y_cur[IDX_HeII]; + data[jistart + 17284] = 0.0 - k[515]*y_cur[IDX_HeII] - k[3202]*y_cur[IDX_HeII]; + data[jistart + 17285] = 0.0 - k[508]*y_cur[IDX_HeII] - k[3073]*y_cur[IDX_HeII]; + data[jistart + 17286] = 0.0 - k[3297]*y_cur[IDX_HeII]; + data[jistart + 17287] = 0.0 - k[524]*y_cur[IDX_HeII] - k[3283]*y_cur[IDX_HeII] - + k[3284]*y_cur[IDX_HeII]; + data[jistart + 17288] = 0.0 - k[509]*y_cur[IDX_HeII] - k[3074]*y_cur[IDX_HeII] - + k[3075]*y_cur[IDX_HeII] - k[3076]*y_cur[IDX_HeII]; + data[jistart + 17289] = 0.0 - k[3203]*y_cur[IDX_HeII] - k[3204]*y_cur[IDX_HeII]; + data[jistart + 17290] = 0.0 - k[3176]*y_cur[IDX_HeII]; + data[jistart + 17291] = 0.0 - k[458]*y_cur[IDX_H2I] - k[491]*y_cur[IDX_HI] - + k[506]*y_cur[IDX_C10I] - k[507]*y_cur[IDX_C10HI] - + k[508]*y_cur[IDX_C2I] - k[509]*y_cur[IDX_C2H2I] - + k[510]*y_cur[IDX_C2H4I] - k[511]*y_cur[IDX_C2H5I] - + k[512]*y_cur[IDX_C3NI] - k[513]*y_cur[IDX_CI] - + k[514]*y_cur[IDX_CH4I] - k[515]*y_cur[IDX_CHI] - + k[516]*y_cur[IDX_CO2I] - k[517]*y_cur[IDX_H2COI] - + k[518]*y_cur[IDX_H2OI] - k[519]*y_cur[IDX_H2SI] - + k[520]*y_cur[IDX_HCNOI] - k[521]*y_cur[IDX_HNCOI] - + k[522]*y_cur[IDX_HONCI] - k[523]*y_cur[IDX_N2I] - + k[524]*y_cur[IDX_NH3I] - k[525]*y_cur[IDX_O2I] - + k[526]*y_cur[IDX_PI] - k[527]*y_cur[IDX_SO2I] - + k[528]*y_cur[IDX_SiI] - k[2457]*y_cur[IDX_H2I] - + k[3030]*y_cur[IDX_HNC3I] - k[3031]*y_cur[IDX_HNC3I] - + k[3032]*y_cur[IDX_HNC3I] - k[3033]*y_cur[IDX_HNC3I] - + k[3034]*y_cur[IDX_HNC3I] - k[3056]*y_cur[IDX_C10I] - + k[3057]*y_cur[IDX_C10I] - k[3058]*y_cur[IDX_C10I] - + k[3059]*y_cur[IDX_C10I] - k[3060]*y_cur[IDX_C10I] - + k[3061]*y_cur[IDX_C10I] - k[3062]*y_cur[IDX_C10H2I] - + k[3063]*y_cur[IDX_C10H2I] - k[3064]*y_cur[IDX_C10H2I] - + k[3065]*y_cur[IDX_C10H2I] - k[3066]*y_cur[IDX_C10H2I] - + k[3067]*y_cur[IDX_C10HI] - k[3068]*y_cur[IDX_C10HI] - + k[3069]*y_cur[IDX_C10HI] - k[3070]*y_cur[IDX_C10HI] - + k[3071]*y_cur[IDX_C10HI] - k[3072]*y_cur[IDX_C10HI] - + k[3073]*y_cur[IDX_C2I] - k[3074]*y_cur[IDX_C2H2I] - + k[3075]*y_cur[IDX_C2H2I] - k[3076]*y_cur[IDX_C2H2I] - + k[3077]*y_cur[IDX_C2H3I] - k[3078]*y_cur[IDX_C2H3I] - + k[3079]*y_cur[IDX_C2H4I] - k[3080]*y_cur[IDX_C2H4I] - + k[3081]*y_cur[IDX_C2H4I] - k[3082]*y_cur[IDX_C2H4I] - + k[3083]*y_cur[IDX_C2H5I] - k[3084]*y_cur[IDX_C2H5I] - + k[3085]*y_cur[IDX_C2H5OHI] - k[3086]*y_cur[IDX_C2HI] - + k[3087]*y_cur[IDX_C2HI] - k[3088]*y_cur[IDX_C2HI] - + k[3089]*y_cur[IDX_C2NI] - k[3090]*y_cur[IDX_C2OI] - + k[3091]*y_cur[IDX_C2SI] - k[3092]*y_cur[IDX_C2SI] - + k[3093]*y_cur[IDX_C2SI] - k[3094]*y_cur[IDX_C2SI] - + k[3095]*y_cur[IDX_C3I] - k[3096]*y_cur[IDX_C3H2I] - + k[3097]*y_cur[IDX_C3HI] - k[3098]*y_cur[IDX_C3NI] - + k[3099]*y_cur[IDX_C3OI] - k[3100]*y_cur[IDX_C3OI] - + k[3101]*y_cur[IDX_C3PI] - k[3102]*y_cur[IDX_C3PI] - + k[3103]*y_cur[IDX_C3SI] - k[3104]*y_cur[IDX_C3SI] - + k[3105]*y_cur[IDX_C4I] - k[3106]*y_cur[IDX_C4I] - + k[3107]*y_cur[IDX_C4I] - k[3108]*y_cur[IDX_C4H3I] - + k[3109]*y_cur[IDX_C4H3I] - k[3110]*y_cur[IDX_C4H3I] - + k[3111]*y_cur[IDX_C4HI] - k[3112]*y_cur[IDX_C4HI] - + k[3113]*y_cur[IDX_C4PI] - k[3114]*y_cur[IDX_C4PI] - + k[3115]*y_cur[IDX_C4SI] - k[3116]*y_cur[IDX_C4SI] - + k[3117]*y_cur[IDX_C5I] - k[3118]*y_cur[IDX_C5I] - + k[3119]*y_cur[IDX_C5H2I] - k[3120]*y_cur[IDX_C5H2I] - + k[3121]*y_cur[IDX_C5H2I] - k[3122]*y_cur[IDX_C5HI] - + k[3123]*y_cur[IDX_C5HI] - k[3124]*y_cur[IDX_C5NI] - + k[3125]*y_cur[IDX_C6I] - k[3126]*y_cur[IDX_C6I] - + k[3127]*y_cur[IDX_C6H2I] - k[3128]*y_cur[IDX_C6H2I] - + k[3129]*y_cur[IDX_C6H2I] - k[3130]*y_cur[IDX_C6H6I] - + k[3131]*y_cur[IDX_C6H6I] - k[3132]*y_cur[IDX_C6HI] - + k[3133]*y_cur[IDX_C6HI] - k[3134]*y_cur[IDX_C7I] - + k[3135]*y_cur[IDX_C7I] - k[3136]*y_cur[IDX_C7H2I] - + k[3137]*y_cur[IDX_C7H2I] - k[3138]*y_cur[IDX_C7H2I] - + k[3139]*y_cur[IDX_C7HI] - k[3140]*y_cur[IDX_C7HI] - + k[3141]*y_cur[IDX_C7NI] - k[3142]*y_cur[IDX_C8I] - + k[3143]*y_cur[IDX_C8I] - k[3144]*y_cur[IDX_C8H2I] - + k[3145]*y_cur[IDX_C8H2I] - k[3146]*y_cur[IDX_C8H2I] - + k[3147]*y_cur[IDX_C8HI] - k[3148]*y_cur[IDX_C8HI] - + k[3149]*y_cur[IDX_C9I] - k[3150]*y_cur[IDX_C9I] - + k[3151]*y_cur[IDX_C9H2I] - k[3152]*y_cur[IDX_C9H2I] - + k[3153]*y_cur[IDX_C9H2I] - k[3154]*y_cur[IDX_C9HI] - + k[3155]*y_cur[IDX_C9HI] - k[3156]*y_cur[IDX_C9NI] - + k[3157]*y_cur[IDX_CCPI] - k[3158]*y_cur[IDX_CCPI] - + k[3159]*y_cur[IDX_CClI] - k[3160]*y_cur[IDX_CH2I] - + k[3161]*y_cur[IDX_CH2I] - k[3162]*y_cur[IDX_CH2CCHI] - + k[3163]*y_cur[IDX_CH2CCHI] - k[3164]*y_cur[IDX_CH2CCHI] - + k[3165]*y_cur[IDX_CH2CHCNI] - k[3166]*y_cur[IDX_CH2CHCNI] - + k[3167]*y_cur[IDX_CH2CHCNI] - k[3168]*y_cur[IDX_CH2CHCNI] - + k[3169]*y_cur[IDX_CH2CHCNI] - k[3170]*y_cur[IDX_CH2CNI] - + k[3171]*y_cur[IDX_CH2COI] - k[3172]*y_cur[IDX_CH2COI] - + k[3173]*y_cur[IDX_CH2NHI] - k[3174]*y_cur[IDX_CH2PHI] - + k[3175]*y_cur[IDX_CH2PHI] - k[3176]*y_cur[IDX_CH3I] - + k[3177]*y_cur[IDX_CH3C3NI] - k[3178]*y_cur[IDX_CH3C4HI] - + k[3179]*y_cur[IDX_CH3C4HI] - k[3180]*y_cur[IDX_CH3C5NI] - + k[3181]*y_cur[IDX_CH3C6HI] - k[3182]*y_cur[IDX_CH3C6HI] - + k[3183]*y_cur[IDX_CH3C7NI] - k[3184]*y_cur[IDX_CH3CCHI] - + k[3185]*y_cur[IDX_CH3CCHI] - k[3186]*y_cur[IDX_CH3CCHI] - + k[3187]*y_cur[IDX_CH3CCHI] - k[3188]*y_cur[IDX_C2H6I] - + k[3189]*y_cur[IDX_C2H6I] - k[3190]*y_cur[IDX_C2H6I] - + k[3191]*y_cur[IDX_CH3CHOI] - k[3192]*y_cur[IDX_CH3CNI] - + k[3193]*y_cur[IDX_CH3CNI] - k[3194]*y_cur[IDX_CH3COCH3I] - + k[3195]*y_cur[IDX_CH3OCH3I] - k[3196]*y_cur[IDX_CH3OHI] - + k[3197]*y_cur[IDX_CH3OHI] - k[3198]*y_cur[IDX_CH4I] - + k[3199]*y_cur[IDX_CH4I] - k[3200]*y_cur[IDX_CH4I] - + k[3201]*y_cur[IDX_CH4I] - k[3202]*y_cur[IDX_CHI] - + k[3203]*y_cur[IDX_CNI] - k[3204]*y_cur[IDX_CNI] - + k[3205]*y_cur[IDX_CNOI] - k[3206]*y_cur[IDX_CNOI] - + k[3207]*y_cur[IDX_CO2I] - k[3208]*y_cur[IDX_CO2I] - + k[3209]*y_cur[IDX_CO2I] - k[3210]*y_cur[IDX_CO2I] - + k[3211]*y_cur[IDX_COI] - k[3212]*y_cur[IDX_CPI] - + k[3213]*y_cur[IDX_CPI] - k[3214]*y_cur[IDX_CSI] - + k[3215]*y_cur[IDX_CSI] - k[3216]*y_cur[IDX_ClOI] - + k[3217]*y_cur[IDX_H2CCCI] - k[3218]*y_cur[IDX_H2CCCI] - + k[3219]*y_cur[IDX_H2COI] - k[3220]*y_cur[IDX_H2COI] - + k[3221]*y_cur[IDX_H2COI] - k[3222]*y_cur[IDX_H2CSI] - + k[3223]*y_cur[IDX_H2CSI] - k[3224]*y_cur[IDX_H2CSI] - + k[3225]*y_cur[IDX_H2OI] - k[3226]*y_cur[IDX_H2OI] - + k[3227]*y_cur[IDX_H2S2I] - k[3228]*y_cur[IDX_H2S2I] - + k[3229]*y_cur[IDX_H2SI] - k[3230]*y_cur[IDX_H2SI] - + k[3231]*y_cur[IDX_H2SiOI] - k[3232]*y_cur[IDX_HC2PI] - + k[3233]*y_cur[IDX_HC2PI] - k[3234]*y_cur[IDX_HC3NI] - k[3235]*y_cur[IDX_HC3NI] - k[3236]*y_cur[IDX_HC3NI] - - k[3237]*y_cur[IDX_HC3NI]; - data[jistart + 13841] = 0.0 + k[113]*y_cur[IDX_C3HM] + - k[5232]*y_cur[IDX_C3H2I] + k[5256]*y_cur[IDX_CH2CCHI]; - data[jistart + 13842] = 0.0 - k[3374]*y_cur[IDX_HC3NI]; - data[jistart + 13843] = 0.0 + k[4903]*y_cur[IDX_C2HI]; - data[jistart + 13844] = 0.0 + k[607]*y_cur[IDX_HC3NII] + - k[3580]*y_cur[IDX_HC3NHII]; - data[jistart + 13845] = 0.0 + k[912]*y_cur[IDX_CH2CHCNII] + - k[926]*y_cur[IDX_CH3C3NII] + k[928]*y_cur[IDX_CH3C3NHII] + - k[988]*y_cur[IDX_H2C4NII] + k[1068]*y_cur[IDX_HC3NHII] + - k[1080]*y_cur[IDX_HC5NHII]; - data[jistart + 13846] = 0.0 + k[1475]*y_cur[IDX_HCNI]; - data[jistart + 13847] = 0.0 - k[229]*y_cur[IDX_HC3NII] - - k[1565]*y_cur[IDX_HC3NII]; - data[jistart + 13848] = 0.0 + k[2277]*y_cur[IDX_CNI]; - data[jistart + 13849] = 0.0 - k[239]*y_cur[IDX_HC3NII] - - k[1707]*y_cur[IDX_HC3NII]; - data[jistart + 13850] = 0.0 + k[2604]*y_cur[IDX_H3II] + - k[2774]*y_cur[IDX_H3OII] + k[2909]*y_cur[IDX_HCOII]; - data[jistart + 13851] = 0.0 + k[2409]*y_cur[IDX_H2I]; - data[jistart + 13852] = 0.0 - k[493]*y_cur[IDX_HC3NII]; - data[jistart + 13853] = 0.0 + k[3167]*y_cur[IDX_HeII]; - data[jistart + 13854] = 0.0 - k[2196]*y_cur[IDX_HC3NII] - - k[2197]*y_cur[IDX_HC3NII] - k[2198]*y_cur[IDX_HC3NII]; - data[jistart + 13855] = 0.0 + k[2277]*y_cur[IDX_C2H2II]; - data[jistart + 13856] = 0.0 - k[6629]*y_cur[IDX_HC3NII] - - k[6630]*y_cur[IDX_HC3NII] - k[6631]*y_cur[IDX_HC3NII]; - data[jistart + 13857] = 0.0 + k[383]*y_cur[IDX_HC3NI] + - k[3023]*y_cur[IDX_HNC3I]; - data[jistart + 13858] = 0.0 + k[2409]*y_cur[IDX_C3NII] - - k[2444]*y_cur[IDX_HC3NII] - k[2445]*y_cur[IDX_HC3NII]; - data[jistart + 13859] = 0.0 + k[2604]*y_cur[IDX_C3NI]; - data[jistart + 13860] = 0.0 + k[2774]*y_cur[IDX_C3NI]; - data[jistart + 13861] = 0.0 + k[383]*y_cur[IDX_HII]; - data[jistart + 13862] = 0.0 - k[229]*y_cur[IDX_C2H2I] - - k[239]*y_cur[IDX_C2H4I] - k[493]*y_cur[IDX_C4H2I] - - k[607]*y_cur[IDX_NH3I] - k[1063]*y_cur[IDX_eM] - - k[1064]*y_cur[IDX_eM] - k[1065]*y_cur[IDX_eM] - - k[1565]*y_cur[IDX_C2H2I] - k[1707]*y_cur[IDX_C2H4I] - - k[2196]*y_cur[IDX_CH4I] - k[2197]*y_cur[IDX_CH4I] - - k[2198]*y_cur[IDX_CH4I] - k[2444]*y_cur[IDX_H2I] - - k[2445]*y_cur[IDX_H2I] - k[3460]*y_cur[IDX_NI] - - k[3461]*y_cur[IDX_NI] - k[6629]*y_cur[IDX_GRAINM] - - k[6630]*y_cur[IDX_GRAINM] - k[6631]*y_cur[IDX_GRAINM]; - data[jistart + 13863] = 0.0 + k[1475]*y_cur[IDX_C2HII]; - data[jistart + 13864] = 0.0 + k[2909]*y_cur[IDX_C3NI]; - data[jistart + 13865] = 0.0 + k[3023]*y_cur[IDX_HII]; - data[jistart + 13866] = 0.0 + k[3167]*y_cur[IDX_CH2CHCNI]; - data[jistart + 13867] = 0.0 - k[3460]*y_cur[IDX_HC3NII] - - k[3461]*y_cur[IDX_HC3NII]; - data[jistart + 13868] = 0.0 - k[607]*y_cur[IDX_HC3NII]; - data[jistart + 13869] = 0.0 - k[1063]*y_cur[IDX_HC3NII] - - k[1064]*y_cur[IDX_HC3NII] - k[1065]*y_cur[IDX_HC3NII]; - data[jistart + 13870] = 0.0 + k[1472]*y_cur[IDX_HC3NI]; - data[jistart + 13871] = 0.0 + k[1522]*y_cur[IDX_HCNI]; - data[jistart + 13872] = 0.0 + k[1620]*y_cur[IDX_HC3NI]; - data[jistart + 13873] = 0.0 + k[1707]*y_cur[IDX_HC3NII]; - data[jistart + 13874] = 0.0 + k[1676]*y_cur[IDX_HC3NI]; - data[jistart + 13875] = 0.0 + k[1722]*y_cur[IDX_HC3NI]; - data[jistart + 13876] = 0.0 + k[3399]*y_cur[IDX_NI]; - data[jistart + 13877] = 0.0 + k[1816]*y_cur[IDX_HC3NI]; - data[jistart + 13878] = 0.0 + k[2174]*y_cur[IDX_CH4I] + - k[2533]*y_cur[IDX_H2OI]; - data[jistart + 13879] = 0.0 + k[3453]*y_cur[IDX_NI]; - data[jistart + 13880] = 0.0 + k[2316]*y_cur[IDX_HII] + - k[3168]*y_cur[IDX_HeII]; - data[jistart + 13881] = 0.0 - k[2115]*y_cur[IDX_HC3NHII]; - data[jistart + 13882] = 0.0 - k[2126]*y_cur[IDX_HC3NHII]; - data[jistart + 13883] = 0.0 + k[2174]*y_cur[IDX_C4NII] + - k[2198]*y_cur[IDX_HC3NII]; - data[jistart + 13884] = 0.0 + k[2228]*y_cur[IDX_HC3NI]; - data[jistart + 13885] = 0.0 - k[6637]*y_cur[IDX_HC3NHII] - - k[6638]*y_cur[IDX_HC3NHII] - k[6639]*y_cur[IDX_HC3NHII] - - k[6640]*y_cur[IDX_HC3NHII]; - data[jistart + 13886] = 0.0 + k[2316]*y_cur[IDX_CH2CHCNI]; - data[jistart + 13887] = 0.0 + k[2444]*y_cur[IDX_HC3NII]; - data[jistart + 13888] = 0.0 + k[2533]*y_cur[IDX_C4NII]; - data[jistart + 13889] = 0.0 + k[2689]*y_cur[IDX_HC3NI] + - k[3027]*y_cur[IDX_HNC3I]; - data[jistart + 13890] = 0.0 + k[2804]*y_cur[IDX_HC3NI] + - k[3028]*y_cur[IDX_HNC3I]; - data[jistart + 13891] = 0.0 + k[1472]*y_cur[IDX_C2HII] + - k[1620]*y_cur[IDX_C2H3II] + k[1676]*y_cur[IDX_C2H4II] + - k[1722]*y_cur[IDX_C2H5II] + k[1816]*y_cur[IDX_C3H5II] + - k[2228]*y_cur[IDX_CH5II] + k[2689]*y_cur[IDX_H3II] + - k[2804]*y_cur[IDX_H3OII] + k[2894]*y_cur[IDX_HCNHII] + - k[2895]*y_cur[IDX_HCNHII] + k[2964]*y_cur[IDX_HCOII] + - k[3374]*y_cur[IDX_N2HII]; - data[jistart + 13892] = 0.0 + k[1707]*y_cur[IDX_C2H4I] + - k[2198]*y_cur[IDX_CH4I] + k[2444]*y_cur[IDX_H2I]; - data[jistart + 13893] = 0.0 - k[1066]*y_cur[IDX_eM] - - k[1067]*y_cur[IDX_eM] - k[1068]*y_cur[IDX_eM] - - k[1069]*y_cur[IDX_eM] - k[2115]*y_cur[IDX_CH3CNI] - - k[2126]*y_cur[IDX_CH3OHI] - k[3580]*y_cur[IDX_NH3I] - - k[6637]*y_cur[IDX_GRAINM] - k[6638]*y_cur[IDX_GRAINM] - - k[6639]*y_cur[IDX_GRAINM] - k[6640]*y_cur[IDX_GRAINM]; - data[jistart + 13894] = 0.0 + k[1522]*y_cur[IDX_C2H2II]; - data[jistart + 13895] = 0.0 + k[2894]*y_cur[IDX_HC3NI] + - k[2895]*y_cur[IDX_HC3NI]; - data[jistart + 13896] = 0.0 + k[2964]*y_cur[IDX_HC3NI] + - k[3029]*y_cur[IDX_HNC3I]; - data[jistart + 13897] = 0.0 + k[3027]*y_cur[IDX_H3II] + - k[3028]*y_cur[IDX_H3OII] + k[3029]*y_cur[IDX_HCOII] + - k[3035]*y_cur[IDX_N2HII]; - data[jistart + 13898] = 0.0 + k[3168]*y_cur[IDX_CH2CHCNI]; - data[jistart + 13899] = 0.0 + k[3399]*y_cur[IDX_C3H4II] + - k[3453]*y_cur[IDX_CH2CCHII]; - data[jistart + 13900] = 0.0 + k[3035]*y_cur[IDX_HNC3I] + - k[3374]*y_cur[IDX_HC3NI]; - data[jistart + 13901] = 0.0 - k[3580]*y_cur[IDX_HC3NHII]; - data[jistart + 13902] = 0.0 - k[1066]*y_cur[IDX_HC3NHII] - - k[1067]*y_cur[IDX_HC3NHII] - k[1068]*y_cur[IDX_HC3NHII] - - k[1069]*y_cur[IDX_HC3NHII]; - data[jistart + 13903] = 0.0 + k[1753]*y_cur[IDX_CO2I] + - k[1757]*y_cur[IDX_OCSI] + k[2123]*y_cur[IDX_CH3OHI] + - k[2529]*y_cur[IDX_H2OI] + k[3671]*y_cur[IDX_O2I]; - data[jistart + 13904] = 0.0 + k[2605]*y_cur[IDX_H3II] + - k[2775]*y_cur[IDX_H3OII] + k[2910]*y_cur[IDX_HCOII]; - data[jistart + 13905] = 0.0 + k[2163]*y_cur[IDX_CH4I] + - k[2410]*y_cur[IDX_H2I] + k[2531]*y_cur[IDX_H2OI]; - data[jistart + 13906] = 0.0 + k[3702]*y_cur[IDX_OI]; - data[jistart + 13907] = 0.0 + k[2123]*y_cur[IDX_C3HII]; - data[jistart + 13908] = 0.0 + k[2163]*y_cur[IDX_C3OII]; - data[jistart + 13909] = 0.0 + k[1753]*y_cur[IDX_C3HII]; - data[jistart + 13910] = 0.0 - k[6648]*y_cur[IDX_HC3OII]; - data[jistart + 13911] = 0.0 + k[2410]*y_cur[IDX_C3OII]; - data[jistart + 13912] = 0.0 + k[2529]*y_cur[IDX_C3HII] + - k[2531]*y_cur[IDX_C3OII]; - data[jistart + 13913] = 0.0 + k[2605]*y_cur[IDX_C3OI]; - data[jistart + 13914] = 0.0 + k[2775]*y_cur[IDX_C3OI]; - data[jistart + 13915] = 0.0 - k[1070]*y_cur[IDX_eM] - - k[6648]*y_cur[IDX_GRAINM]; - data[jistart + 13916] = 0.0 + k[2910]*y_cur[IDX_C3OI]; - data[jistart + 13917] = 0.0 + k[3702]*y_cur[IDX_C4H2II]; - data[jistart + 13918] = 0.0 + k[3671]*y_cur[IDX_C3HII]; - data[jistart + 13919] = 0.0 + k[1757]*y_cur[IDX_C3HII]; - data[jistart + 13920] = 0.0 - k[1070]*y_cur[IDX_HC3OII]; - data[jistart + 13921] = 0.0 + k[1758]*y_cur[IDX_OCSI] + - k[2577]*y_cur[IDX_H2SI]; - data[jistart + 13922] = 0.0 + k[3820]*y_cur[IDX_SII]; - data[jistart + 13923] = 0.0 + k[3834]*y_cur[IDX_SI]; - data[jistart + 13924] = 0.0 + k[3835]*y_cur[IDX_SI]; - data[jistart + 13925] = 0.0 + k[2607]*y_cur[IDX_H3II] + - k[2777]*y_cur[IDX_H3OII] + k[2912]*y_cur[IDX_HCOII]; - data[jistart + 13926] = 0.0 + k[3838]*y_cur[IDX_SI]; - data[jistart + 13927] = 0.0 - k[6778]*y_cur[IDX_HC3SII] - - k[6779]*y_cur[IDX_HC3SII]; - data[jistart + 13928] = 0.0 + k[3827]*y_cur[IDX_SII]; - data[jistart + 13929] = 0.0 + k[2577]*y_cur[IDX_C3HII]; - data[jistart + 13930] = 0.0 + k[2607]*y_cur[IDX_C3SI]; - data[jistart + 13931] = 0.0 + k[2777]*y_cur[IDX_C3SI]; - data[jistart + 13932] = 0.0 - k[1071]*y_cur[IDX_eM] - - k[1072]*y_cur[IDX_eM] - k[6778]*y_cur[IDX_GRAINM] - - k[6779]*y_cur[IDX_GRAINM]; - data[jistart + 13933] = 0.0 + k[2912]*y_cur[IDX_C3SI]; - data[jistart + 13934] = 0.0 + k[1758]*y_cur[IDX_C3HII]; - data[jistart + 13935] = 0.0 + k[3834]*y_cur[IDX_C3H2II] + - k[3835]*y_cur[IDX_C3H3II] + k[3838]*y_cur[IDX_CH2CCHII]; - data[jistart + 13936] = 0.0 + k[3820]*y_cur[IDX_C3H2I] + - k[3827]*y_cur[IDX_H2CCCI]; - data[jistart + 13937] = 0.0 - k[1071]*y_cur[IDX_HC3SII] - - k[1072]*y_cur[IDX_HC3SII]; - data[jistart + 13938] = 0.0 + k[1541]*y_cur[IDX_C2NII]; - data[jistart + 13939] = 0.0 + k[1541]*y_cur[IDX_C2H2I]; - data[jistart + 13940] = 0.0 + k[3406]*y_cur[IDX_NI]; - data[jistart + 13941] = 0.0 - k[6744]*y_cur[IDX_HC4NII]; - data[jistart + 13942] = 0.0 - k[2446]*y_cur[IDX_HC4NII]; - data[jistart + 13943] = 0.0 - k[1073]*y_cur[IDX_eM] - - k[2446]*y_cur[IDX_H2I] - k[6744]*y_cur[IDX_GRAINM]; - data[jistart + 13944] = 0.0 + k[3406]*y_cur[IDX_C4H2II]; - data[jistart + 13945] = 0.0 - k[1073]*y_cur[IDX_HC4NII]; - data[jistart + 13946] = 0.0 + k[3832]*y_cur[IDX_SII]; - data[jistart + 13947] = 0.0 + k[3836]*y_cur[IDX_SI]; - data[jistart + 13948] = 0.0 + k[3837]*y_cur[IDX_SI]; - data[jistart + 13949] = 0.0 + k[2612]*y_cur[IDX_H3II] + - k[2782]*y_cur[IDX_H3OII] + k[2917]*y_cur[IDX_HCOII]; - data[jistart + 13950] = 0.0 - k[6818]*y_cur[IDX_HC4SII] - - k[6819]*y_cur[IDX_HC4SII] - k[6820]*y_cur[IDX_HC4SII]; - data[jistart + 13951] = 0.0 + k[2612]*y_cur[IDX_C4SI]; - data[jistart + 13952] = 0.0 + k[2782]*y_cur[IDX_C4SI]; - data[jistart + 13953] = 0.0 - k[1074]*y_cur[IDX_eM] - - k[1075]*y_cur[IDX_eM] - k[1076]*y_cur[IDX_eM] - - k[6818]*y_cur[IDX_GRAINM] - k[6819]*y_cur[IDX_GRAINM] - - k[6820]*y_cur[IDX_GRAINM]; - data[jistart + 13954] = 0.0 + k[2917]*y_cur[IDX_C4SI]; - data[jistart + 13955] = 0.0 + k[3836]*y_cur[IDX_C4H2II] + - k[3837]*y_cur[IDX_C4H3II]; - data[jistart + 13956] = 0.0 + k[3832]*y_cur[IDX_C4H2I]; - data[jistart + 13957] = 0.0 - k[1074]*y_cur[IDX_HC4SII] - - k[1075]*y_cur[IDX_HC4SII] - k[1076]*y_cur[IDX_HC4SII]; - data[jistart + 13958] = 0.0 - k[1404]*y_cur[IDX_HC5NI]; - data[jistart + 13959] = 0.0 - k[5509]*y_cur[IDX_HC5NI]; - data[jistart + 13960] = 0.0 + k[4907]*y_cur[IDX_HNCI] + - k[4908]*y_cur[IDX_NCCNI]; - data[jistart + 13961] = 0.0 + k[5115]*y_cur[IDX_CNI]; - data[jistart + 13962] = 0.0 - k[5519]*y_cur[IDX_HC5NI]; - data[jistart + 13963] = 0.0 + k[117]*y_cur[IDX_NI]; - data[jistart + 13964] = 0.0 + k[5239]*y_cur[IDX_NI]; - data[jistart + 13965] = 0.0 + k[96]*y_cur[IDX_HI]; - data[jistart + 13966] = 0.0 - k[5538]*y_cur[IDX_HC5NI]; - data[jistart + 13967] = 0.0 + k[2322]*y_cur[IDX_HII]; - data[jistart + 13968] = 0.0 + k[932]*y_cur[IDX_eM] + - k[6835]*y_cur[IDX_GRAINM]; - data[jistart + 13969] = 0.0 + k[5115]*y_cur[IDX_C4H2I]; - data[jistart + 13970] = 0.0 + k[8708]*y_cur[IDX_GNI]; - data[jistart + 13971] = 0.0 + k[8640]*y_cur[IDX_GHI]; - data[jistart + 13972] = 0.0 + k[8640]*y_cur[IDX_GC5NI]; - data[jistart + 13973] = 0.0 + k[7227] + k[7409] + k[7591]; - data[jistart + 13974] = 0.0 + k[8708]*y_cur[IDX_GC5HI]; - data[jistart + 13975] = 0.0 + k[6793]*y_cur[IDX_HC5NHII] + - k[6805]*y_cur[IDX_H3C5NII] + k[6835]*y_cur[IDX_CH3C5NHII]; - data[jistart + 13976] = 0.0 + k[96]*y_cur[IDX_C5NM]; - data[jistart + 13977] = 0.0 - k[385]*y_cur[IDX_HC5NI] + - k[2322]*y_cur[IDX_CH3C5NI]; - data[jistart + 13978] = 0.0 - k[2691]*y_cur[IDX_HC5NI]; - data[jistart + 13979] = 0.0 + k[1029]*y_cur[IDX_eM] + - k[6805]*y_cur[IDX_GRAINM]; - data[jistart + 13980] = 0.0 - k[385]*y_cur[IDX_HII] - - k[1404]*y_cur[IDX_CII] - k[2691]*y_cur[IDX_H3II] - - k[2966]*y_cur[IDX_HCOII] - k[3241]*y_cur[IDX_HeII] - - k[3242]*y_cur[IDX_HeII] - k[5509]*y_cur[IDX_C2H2II] - - k[5519]*y_cur[IDX_C4H2II] - k[5538]*y_cur[IDX_CH3II] - k[5850] - - k[5851] - k[6175] - k[6176] - k[7045]; - data[jistart + 13981] = 0.0 + k[1081]*y_cur[IDX_eM] + - k[6793]*y_cur[IDX_GRAINM]; - data[jistart + 13982] = 0.0 - k[2966]*y_cur[IDX_HC5NI]; - data[jistart + 13983] = 0.0 + k[4907]*y_cur[IDX_C4HI]; - data[jistart + 13984] = 0.0 - k[3241]*y_cur[IDX_HC5NI] - - k[3242]*y_cur[IDX_HC5NI]; - data[jistart + 13985] = 0.0 + k[117]*y_cur[IDX_C5HM] + - k[5239]*y_cur[IDX_C5H2I]; - data[jistart + 13986] = 0.0 + k[4908]*y_cur[IDX_C4HI]; - data[jistart + 13987] = 0.0 + k[932]*y_cur[IDX_CH3C5NHII] + - k[1029]*y_cur[IDX_H3C5NII] + k[1081]*y_cur[IDX_HC5NHII]; - data[jistart + 13988] = 0.0 + k[1473]*y_cur[IDX_HC3NI]; - data[jistart + 13989] = 0.0 + k[2870]*y_cur[IDX_HCNI]; - data[jistart + 13990] = 0.0 + k[3415]*y_cur[IDX_NI]; - data[jistart + 13991] = 0.0 + k[2616]*y_cur[IDX_H3II] + - k[2921]*y_cur[IDX_HCOII]; - data[jistart + 13992] = 0.0 + k[2416]*y_cur[IDX_H2I]; - data[jistart + 13993] = 0.0 - k[6787]*y_cur[IDX_HC5NII] - - k[6788]*y_cur[IDX_HC5NII]; - data[jistart + 13994] = 0.0 + k[385]*y_cur[IDX_HC5NI]; - data[jistart + 13995] = 0.0 + k[2416]*y_cur[IDX_C5NII] - - k[2447]*y_cur[IDX_HC5NII]; - data[jistart + 13996] = 0.0 + k[2616]*y_cur[IDX_C5NI]; - data[jistart + 13997] = 0.0 + k[1473]*y_cur[IDX_C2HII]; - data[jistart + 13998] = 0.0 + k[385]*y_cur[IDX_HII]; - data[jistart + 13999] = 0.0 - k[1077]*y_cur[IDX_eM] - - k[1078]*y_cur[IDX_eM] - k[2447]*y_cur[IDX_H2I] - - k[6787]*y_cur[IDX_GRAINM] - k[6788]*y_cur[IDX_GRAINM]; - data[jistart + 14000] = 0.0 + k[2870]*y_cur[IDX_C4HII]; - data[jistart + 14001] = 0.0 + k[2921]*y_cur[IDX_C5NI]; - data[jistart + 14002] = 0.0 + k[3415]*y_cur[IDX_C5H2II]; - data[jistart + 14003] = 0.0 - k[1077]*y_cur[IDX_HC5NII] - - k[1078]*y_cur[IDX_HC5NII]; - data[jistart + 14004] = 0.0 + k[2175]*y_cur[IDX_CH4I]; - data[jistart + 14005] = 0.0 + k[3416]*y_cur[IDX_NI]; - data[jistart + 14006] = 0.0 + k[2175]*y_cur[IDX_C4NII]; - data[jistart + 14007] = 0.0 - k[6791]*y_cur[IDX_HC5NHII] - - k[6792]*y_cur[IDX_HC5NHII] - k[6793]*y_cur[IDX_HC5NHII] - - k[6794]*y_cur[IDX_HC5NHII] - k[6795]*y_cur[IDX_HC5NHII]; - data[jistart + 14008] = 0.0 + k[2447]*y_cur[IDX_HC5NII]; - data[jistart + 14009] = 0.0 + k[2691]*y_cur[IDX_HC5NI]; - data[jistart + 14010] = 0.0 + k[2691]*y_cur[IDX_H3II] + - k[2966]*y_cur[IDX_HCOII]; - data[jistart + 14011] = 0.0 + k[2447]*y_cur[IDX_H2I]; - data[jistart + 14012] = 0.0 - k[1079]*y_cur[IDX_eM] - - k[1080]*y_cur[IDX_eM] - k[1081]*y_cur[IDX_eM] - - k[1082]*y_cur[IDX_eM] - k[1083]*y_cur[IDX_eM] - - k[6791]*y_cur[IDX_GRAINM] - k[6792]*y_cur[IDX_GRAINM] - - k[6793]*y_cur[IDX_GRAINM] - k[6794]*y_cur[IDX_GRAINM] - - k[6795]*y_cur[IDX_GRAINM]; - data[jistart + 14013] = 0.0 + k[2966]*y_cur[IDX_HC5NI]; - data[jistart + 14014] = 0.0 + k[3416]*y_cur[IDX_C5H3II]; - data[jistart + 14015] = 0.0 - k[1079]*y_cur[IDX_HC5NHII] - - k[1080]*y_cur[IDX_HC5NHII] - k[1081]*y_cur[IDX_HC5NHII] - - k[1082]*y_cur[IDX_HC5NHII] - k[1083]*y_cur[IDX_HC5NHII]; - data[jistart + 14016] = 0.0 - k[1405]*y_cur[IDX_HC7NI]; - data[jistart + 14017] = 0.0 - k[5510]*y_cur[IDX_HC7NI]; - data[jistart + 14018] = 0.0 + k[5107]*y_cur[IDX_CNI]; - data[jistart + 14019] = 0.0 + k[119]*y_cur[IDX_NI]; - data[jistart + 14020] = 0.0 + k[5245]*y_cur[IDX_NI]; - data[jistart + 14021] = 0.0 - k[5539]*y_cur[IDX_HC7NI]; - data[jistart + 14022] = 0.0 + k[2324]*y_cur[IDX_HII]; - data[jistart + 14023] = 0.0 + k[934]*y_cur[IDX_eM] + - k[6868]*y_cur[IDX_GRAINM]; - data[jistart + 14024] = 0.0 + k[5107]*y_cur[IDX_C6H2I]; - data[jistart + 14025] = 0.0 + k[8710]*y_cur[IDX_GNI]; - data[jistart + 14026] = 0.0 + k[8645]*y_cur[IDX_GHI]; - data[jistart + 14027] = 0.0 + k[8645]*y_cur[IDX_GC7NI]; - data[jistart + 14028] = 0.0 + k[7241] + k[7423] + k[7605]; - data[jistart + 14029] = 0.0 + k[8710]*y_cur[IDX_GC7HI]; - data[jistart + 14030] = 0.0 + k[6850]*y_cur[IDX_H2C7NII] + - k[6852]*y_cur[IDX_H3C7NII] + k[6868]*y_cur[IDX_CH3C7NHII]; - data[jistart + 14031] = 0.0 - k[386]*y_cur[IDX_HC7NI] + - k[2324]*y_cur[IDX_CH3C7NI]; - data[jistart + 14032] = 0.0 + k[990]*y_cur[IDX_eM] + - k[6850]*y_cur[IDX_GRAINM]; - data[jistart + 14033] = 0.0 - k[2692]*y_cur[IDX_HC7NI]; - data[jistart + 14034] = 0.0 + k[1031]*y_cur[IDX_eM] + - k[6852]*y_cur[IDX_GRAINM]; - data[jistart + 14035] = 0.0 - k[386]*y_cur[IDX_HII] - - k[1405]*y_cur[IDX_CII] - k[2692]*y_cur[IDX_H3II] - - k[2967]*y_cur[IDX_HCOII] - k[3243]*y_cur[IDX_HeII] - - k[5510]*y_cur[IDX_C2H2II] - k[5539]*y_cur[IDX_CH3II] - k[5852] - - k[6177] - k[6178] - k[7059]; - data[jistart + 14036] = 0.0 - k[2967]*y_cur[IDX_HC7NI]; - data[jistart + 14037] = 0.0 - k[3243]*y_cur[IDX_HC7NI]; - data[jistart + 14038] = 0.0 + k[119]*y_cur[IDX_C7HM] + - k[5245]*y_cur[IDX_C7H2I]; - data[jistart + 14039] = 0.0 + k[934]*y_cur[IDX_CH3C7NHII] + - k[990]*y_cur[IDX_H2C7NII] + k[1031]*y_cur[IDX_H3C7NII]; - data[jistart + 14040] = 0.0 + k[3432]*y_cur[IDX_NI]; - data[jistart + 14041] = 0.0 + k[2624]*y_cur[IDX_H3II] + - k[2929]*y_cur[IDX_HCOII]; - data[jistart + 14042] = 0.0 + k[2421]*y_cur[IDX_H2I]; - data[jistart + 14043] = 0.0 - k[6843]*y_cur[IDX_HC7NII] - - k[6844]*y_cur[IDX_HC7NII]; - data[jistart + 14044] = 0.0 + k[386]*y_cur[IDX_HC7NI]; - data[jistart + 14045] = 0.0 + k[2421]*y_cur[IDX_C7NII] - - k[2448]*y_cur[IDX_HC7NII]; - data[jistart + 14046] = 0.0 + k[2624]*y_cur[IDX_C7NI]; - data[jistart + 14047] = 0.0 + k[386]*y_cur[IDX_HII] + k[6178]; - data[jistart + 14048] = 0.0 - k[1084]*y_cur[IDX_eM] - - k[1085]*y_cur[IDX_eM] - k[2448]*y_cur[IDX_H2I] - - k[6843]*y_cur[IDX_GRAINM] - k[6844]*y_cur[IDX_GRAINM]; - data[jistart + 14049] = 0.0 + k[2929]*y_cur[IDX_C7NI]; - data[jistart + 14050] = 0.0 + k[3432]*y_cur[IDX_C7H2II]; - data[jistart + 14051] = 0.0 - k[1084]*y_cur[IDX_HC7NII] - - k[1085]*y_cur[IDX_HC7NII]; - data[jistart + 14052] = 0.0 - k[1406]*y_cur[IDX_HC9NI]; - data[jistart + 14053] = 0.0 + k[5108]*y_cur[IDX_CNI]; - data[jistart + 14054] = 0.0 + k[121]*y_cur[IDX_NI]; - data[jistart + 14055] = 0.0 + k[5108]*y_cur[IDX_C8H2I]; - data[jistart + 14056] = 0.0 + k[8712]*y_cur[IDX_GNI]; - data[jistart + 14057] = 0.0 + k[8650]*y_cur[IDX_GHI]; - data[jistart + 14058] = 0.0 + k[8650]*y_cur[IDX_GC9NI]; - data[jistart + 14059] = 0.0 + k[7250] + k[7432] + k[7614]; - data[jistart + 14060] = 0.0 + k[8712]*y_cur[IDX_GC9HI]; - data[jistart + 14061] = 0.0 + k[6881]*y_cur[IDX_H2C9NII] + - k[6883]*y_cur[IDX_H3C9NII]; - data[jistart + 14062] = 0.0 - k[387]*y_cur[IDX_HC9NI]; - data[jistart + 14063] = 0.0 + k[992]*y_cur[IDX_eM] + - k[6881]*y_cur[IDX_GRAINM]; - data[jistart + 14064] = 0.0 - k[2693]*y_cur[IDX_HC9NI]; - data[jistart + 14065] = 0.0 + k[1033]*y_cur[IDX_eM] + - k[6883]*y_cur[IDX_GRAINM]; - data[jistart + 14066] = 0.0 - k[387]*y_cur[IDX_HII] - - k[1406]*y_cur[IDX_CII] - k[2693]*y_cur[IDX_H3II] - - k[2968]*y_cur[IDX_HCOII] - k[3244]*y_cur[IDX_HeII] - k[5853] - - k[6179] - k[6180] - k[7068]; - data[jistart + 14067] = 0.0 - k[2968]*y_cur[IDX_HC9NI]; - data[jistart + 14068] = 0.0 - k[3244]*y_cur[IDX_HC9NI]; - data[jistart + 14069] = 0.0 + k[121]*y_cur[IDX_C9HM]; - data[jistart + 14070] = 0.0 + k[992]*y_cur[IDX_H2C9NII] + - k[1033]*y_cur[IDX_H3C9NII]; - data[jistart + 14071] = 0.0 + k[3449]*y_cur[IDX_NI]; - data[jistart + 14072] = 0.0 + k[2631]*y_cur[IDX_H3II] + - k[2936]*y_cur[IDX_HCOII]; - data[jistart + 14073] = 0.0 + k[2426]*y_cur[IDX_H2I]; - data[jistart + 14074] = 0.0 - k[6876]*y_cur[IDX_HC9NII] - - k[6877]*y_cur[IDX_HC9NII]; - data[jistart + 14075] = 0.0 + k[387]*y_cur[IDX_HC9NI]; - data[jistart + 14076] = 0.0 + k[2426]*y_cur[IDX_C9NII] - - k[2449]*y_cur[IDX_HC9NII]; - data[jistart + 14077] = 0.0 + k[2631]*y_cur[IDX_C9NI]; - data[jistart + 14078] = 0.0 + k[387]*y_cur[IDX_HII] + k[6180]; - data[jistart + 14079] = 0.0 - k[1086]*y_cur[IDX_eM] - - k[1087]*y_cur[IDX_eM] - k[2449]*y_cur[IDX_H2I] - - k[6876]*y_cur[IDX_GRAINM] - k[6877]*y_cur[IDX_GRAINM]; - data[jistart + 14080] = 0.0 + k[2936]*y_cur[IDX_C9NI]; - data[jistart + 14081] = 0.0 + k[3449]*y_cur[IDX_C9H2II]; - data[jistart + 14082] = 0.0 - k[1086]*y_cur[IDX_HC9NII] - - k[1087]*y_cur[IDX_HC9NII]; - data[jistart + 14083] = 0.0 + k[8616]*y_cur[IDX_GHI]; - data[jistart + 14084] = 0.0 + k[8721]*y_cur[IDX_GCNI]; - data[jistart + 14085] = 0.0 + k[8721]*y_cur[IDX_GCHI]; - data[jistart + 14086] = 0.0 + k[8616]*y_cur[IDX_GC2NI]; - data[jistart + 14087] = 0.0 + k[7131] + k[7313] + k[7495]; - data[jistart + 14088] = 0.0 - k[5940] - k[6949]; - data[jistart + 14089] = 0.0 + k[4969]*y_cur[IDX_NH2I] + - k[5215]*y_cur[IDX_HOCNI]; - data[jistart + 14090] = 0.0 + k[1348]*y_cur[IDX_CH2CHCNI] + - k[1399]*y_cur[IDX_HC3NI] - k[1407]*y_cur[IDX_HCNI]; - data[jistart + 14091] = 0.0 + k[6]*y_cur[IDX_NHI] + - k[3902]*y_cur[IDX_HCNHII]; - data[jistart + 14092] = 0.0 + k[3937]*y_cur[IDX_HCNHII]; - data[jistart + 14093] = 0.0 + k[3972]*y_cur[IDX_HCNHII]; - data[jistart + 14094] = 0.0 - k[4873]*y_cur[IDX_HCNI]; - data[jistart + 14095] = 0.0 - k[1453]*y_cur[IDX_HCNI]; - data[jistart + 14096] = 0.0 + k[4007]*y_cur[IDX_HCNHII]; - data[jistart + 14097] = 0.0 - k[4901]*y_cur[IDX_HCNI]; - data[jistart + 14098] = 0.0 + k[1470]*y_cur[IDX_HC3NI] - - k[1474]*y_cur[IDX_HCNI] - k[1475]*y_cur[IDX_HCNI] - - k[1476]*y_cur[IDX_HCNI]; - data[jistart + 14099] = 0.0 + k[4042]*y_cur[IDX_HCNHII]; - data[jistart + 14100] = 0.0 + k[230]*y_cur[IDX_HCNII] + - k[1540]*y_cur[IDX_C2NII] + k[1555]*y_cur[IDX_C4NII] + - k[1565]*y_cur[IDX_HC3NII] + k[4878]*y_cur[IDX_NOI]; - data[jistart + 14101] = 0.0 + k[1513]*y_cur[IDX_CH3CNI] - - k[1522]*y_cur[IDX_HCNI] - k[1523]*y_cur[IDX_HCNI] + - k[3389]*y_cur[IDX_NI]; - data[jistart + 14102] = 0.0 - k[2861]*y_cur[IDX_HCNI]; - data[jistart + 14103] = 0.0 + k[5105]*y_cur[IDX_CNI] + - k[5225]*y_cur[IDX_NI]; - data[jistart + 14104] = 0.0 - k[2862]*y_cur[IDX_HCNI]; - data[jistart + 14105] = 0.0 + k[5111]*y_cur[IDX_CNI]; - data[jistart + 14106] = 0.0 - k[2872]*y_cur[IDX_HCNI]; - data[jistart + 14107] = 0.0 - k[2863]*y_cur[IDX_HCNI] - - k[2864]*y_cur[IDX_HCNI]; - data[jistart + 14108] = 0.0 + k[1540]*y_cur[IDX_C2H2I] + - k[2526]*y_cur[IDX_H2OI] + k[2575]*y_cur[IDX_H2SI] + - k[3561]*y_cur[IDX_NH3I]; - data[jistart + 14109] = 0.0 - k[2865]*y_cur[IDX_HCNI] - - k[2866]*y_cur[IDX_HCNI]; - data[jistart + 14110] = 0.0 - k[2867]*y_cur[IDX_HCNI] - - k[2868]*y_cur[IDX_HCNI]; - data[jistart + 14111] = 0.0 + k[4077]*y_cur[IDX_HCNHII]; - data[jistart + 14112] = 0.0 + k[4112]*y_cur[IDX_HCNHII]; - data[jistart + 14113] = 0.0 + k[3400]*y_cur[IDX_NI]; - data[jistart + 14114] = 0.0 + k[4147]*y_cur[IDX_HCNHII]; - data[jistart + 14115] = 0.0 + k[4182]*y_cur[IDX_HCNHII]; - data[jistart + 14116] = 0.0 - k[2869]*y_cur[IDX_HCNI] - - k[2870]*y_cur[IDX_HCNI]; - data[jistart + 14117] = 0.0 + k[4217]*y_cur[IDX_HCNHII]; - data[jistart + 14118] = 0.0 + k[3405]*y_cur[IDX_NI]; - data[jistart + 14119] = 0.0 + k[1555]*y_cur[IDX_C2H2I] + - k[2173]*y_cur[IDX_CH4I] + k[2413]*y_cur[IDX_H2I]; - data[jistart + 14120] = 0.0 - k[2871]*y_cur[IDX_HCNI]; - data[jistart + 14121] = 0.0 + k[4252]*y_cur[IDX_HCNHII]; - data[jistart + 14122] = 0.0 + k[4287]*y_cur[IDX_HCNHII]; - data[jistart + 14123] = 0.0 + k[4322]*y_cur[IDX_HCNHII]; - data[jistart + 14124] = 0.0 + k[4357]*y_cur[IDX_HCNHII]; - data[jistart + 14125] = 0.0 + k[4392]*y_cur[IDX_HCNHII]; - data[jistart + 14126] = 0.0 + k[3423]*y_cur[IDX_NI]; - data[jistart + 14127] = 0.0 + k[3424]*y_cur[IDX_NI]; - data[jistart + 14128] = 0.0 + k[4427]*y_cur[IDX_HCNHII]; - data[jistart + 14129] = 0.0 + k[4462]*y_cur[IDX_HCNHII]; - data[jistart + 14130] = 0.0 + k[4497]*y_cur[IDX_HCNHII]; - data[jistart + 14131] = 0.0 + k[4532]*y_cur[IDX_HCNHII]; - data[jistart + 14132] = 0.0 + k[4567]*y_cur[IDX_HCNHII]; - data[jistart + 14133] = 0.0 + k[4602]*y_cur[IDX_HCNHII]; - data[jistart + 14134] = 0.0 + k[2251]*y_cur[IDX_HCNHII] + - k[5079]*y_cur[IDX_N2I] + k[5083]*y_cur[IDX_NOI]; - data[jistart + 14135] = 0.0 - k[1956]*y_cur[IDX_HCNI] - - k[1957]*y_cur[IDX_HCNI] - k[1958]*y_cur[IDX_HCNI]; - data[jistart + 14136] = 0.0 + k[4637]*y_cur[IDX_HCNHII]; - data[jistart + 14137] = 0.0 + k[2006]*y_cur[IDX_HCNHII] + - k[4997]*y_cur[IDX_CNI] + k[5001]*y_cur[IDX_N2I] + - k[5004]*y_cur[IDX_NOI] + k[5253]*y_cur[IDX_NI]; - data[jistart + 14138] = 0.0 - k[1986]*y_cur[IDX_HCNI]; - data[jistart + 14139] = 0.0 + k[1348]*y_cur[IDX_CII] + - k[2886]*y_cur[IDX_HCNHII] + k[3169]*y_cur[IDX_HeII]; - data[jistart + 14140] = 0.0 + k[913]*y_cur[IDX_eM] + - k[6657]*y_cur[IDX_GRAINM]; - data[jistart + 14141] = 0.0 + k[917]*y_cur[IDX_eM] + - k[6476]*y_cur[IDX_GRAINM]; - data[jistart + 14142] = 0.0 + k[5029]*y_cur[IDX_CNI] + - k[5038]*y_cur[IDX_NOI] + k[5258]*y_cur[IDX_NI] + - k[5259]*y_cur[IDX_NI]; - data[jistart + 14143] = 0.0 + k[2068]*y_cur[IDX_CH3CNI] + - k[2079]*y_cur[IDX_HC3NI] - k[5540]*y_cur[IDX_HCNI]; - data[jistart + 14144] = 0.0 + k[1513]*y_cur[IDX_C2H2II] + - k[2068]*y_cur[IDX_CH3II] + k[2329]*y_cur[IDX_HII] + - k[2888]*y_cur[IDX_HCNHII]; - data[jistart + 14145] = 0.0 + k[945]*y_cur[IDX_eM] + - k[6485]*y_cur[IDX_GRAINM]; - data[jistart + 14146] = 0.0 + k[971]*y_cur[IDX_eM] + - k[6406]*y_cur[IDX_GRAINM]; - data[jistart + 14147] = 0.0 - k[2873]*y_cur[IDX_HCNI]; - data[jistart + 14148] = 0.0 + k[2173]*y_cur[IDX_C4NII] + - k[2196]*y_cur[IDX_HC3NII] + k[5059]*y_cur[IDX_CNI]; - data[jistart + 14149] = 0.0 - k[2229]*y_cur[IDX_HCNI]; - data[jistart + 14150] = 0.0 + k[72]*y_cur[IDX_HM] + - k[4997]*y_cur[IDX_CH2I] + k[5029]*y_cur[IDX_CH3I] + - k[5059]*y_cur[IDX_CH4I] + k[5105]*y_cur[IDX_C2H4I] + - k[5111]*y_cur[IDX_C2H6I] + k[5114]*y_cur[IDX_H2COI] - - k[5116]*y_cur[IDX_HCNI] + k[5117]*y_cur[IDX_HCOI] + - k[5119]*y_cur[IDX_HNOI] + k[5126]*y_cur[IDX_SiH4I] + - k[5138]*y_cur[IDX_H2I] + k[5302]*y_cur[IDX_NH3I] + - k[5305]*y_cur[IDX_NHI] + k[5459]*y_cur[IDX_OHI]; - data[jistart + 14151] = 0.0 - k[301]*y_cur[IDX_HCNI] + - k[2271]*y_cur[IDX_H2COI] - k[2272]*y_cur[IDX_HCNI]; - data[jistart + 14152] = 0.0 + k[106]*y_cur[IDX_HI] + - k[4672]*y_cur[IDX_HCNHII]; - data[jistart + 14153] = 0.0 + k[2539]*y_cur[IDX_H2OI] + - k[3572]*y_cur[IDX_NH3I]; - data[jistart + 14154] = 0.0 - k[497]*y_cur[IDX_HCNI]; - data[jistart + 14155] = 0.0 + k[8698]*y_cur[IDX_GNI]; - data[jistart + 14156] = 0.0 + k[8592]*y_cur[IDX_GHI]; - data[jistart + 14157] = 0.0 + k[8592]*y_cur[IDX_GCNI]; - data[jistart + 14158] = 0.0 + k[7093] + k[7275] + k[7457]; - data[jistart + 14159] = 0.0 + k[8698]*y_cur[IDX_GCHI]; - data[jistart + 14160] = 0.0 + k[6379]*y_cur[IDX_HCNHII] + - k[6406]*y_cur[IDX_CH3NHII] + k[6476]*y_cur[IDX_CH2CNII] + - k[6485]*y_cur[IDX_CH3CNII] + k[6526]*y_cur[IDX_NH2CNHII] + - k[6532]*y_cur[IDX_HCNOHII] + k[6631]*y_cur[IDX_HC3NII] + - k[6657]*y_cur[IDX_CH2CHCNHII] + k[6794]*y_cur[IDX_HC5NHII]; - data[jistart + 14161] = 0.0 + k[106]*y_cur[IDX_CNM] + - k[490]*y_cur[IDX_HCNII] + k[5164]*y_cur[IDX_H2CNI] - - k[5170]*y_cur[IDX_HCNI] + k[5174]*y_cur[IDX_HNCI] + - k[5181]*y_cur[IDX_NCCNI] + k[5194]*y_cur[IDX_OCNI]; - data[jistart + 14162] = 0.0 + k[133]*y_cur[IDX_HNCI] - - k[388]*y_cur[IDX_HCNI] + k[2329]*y_cur[IDX_CH3CNI]; - data[jistart + 14163] = 0.0 + k[72]*y_cur[IDX_CNI] - - k[2368]*y_cur[IDX_HCNI] + k[4708]*y_cur[IDX_HCNHII]; - data[jistart + 14164] = 0.0 + k[2413]*y_cur[IDX_C4NII] + - k[2445]*y_cur[IDX_HC3NII] + k[5138]*y_cur[IDX_CNI]; - data[jistart + 14165] = 0.0 - k[449]*y_cur[IDX_HCNI]; - data[jistart + 14166] = 0.0 + k[5164]*y_cur[IDX_HI] + - k[5264]*y_cur[IDX_NI] + k[5835] + k[6151]; - data[jistart + 14167] = 0.0 + k[2271]*y_cur[IDX_CNII] + - k[2890]*y_cur[IDX_HCNHII] + k[5114]*y_cur[IDX_CNI]; - data[jistart + 14168] = 0.0 - k[2874]*y_cur[IDX_HCNI]; - data[jistart + 14169] = 0.0 + k[480]*y_cur[IDX_HCNII] + - k[2526]*y_cur[IDX_C2NII] + k[2539]*y_cur[IDX_CNCII]; - data[jistart + 14170] = 0.0 - k[2512]*y_cur[IDX_HCNI]; - data[jistart + 14171] = 0.0 + k[2575]*y_cur[IDX_C2NII] + - k[2892]*y_cur[IDX_HCNHII]; - data[jistart + 14172] = 0.0 - k[2694]*y_cur[IDX_HCNI]; - data[jistart + 14173] = 0.0 - k[2875]*y_cur[IDX_HCNI]; - data[jistart + 14174] = 0.0 - k[2806]*y_cur[IDX_HCNI]; - data[jistart + 14175] = 0.0 - k[2876]*y_cur[IDX_HCNI]; - data[jistart + 14176] = 0.0 + k[1399]*y_cur[IDX_CII] + - k[1470]*y_cur[IDX_C2HII] + k[2079]*y_cur[IDX_CH3II] + - k[2894]*y_cur[IDX_HCNHII]; - data[jistart + 14177] = 0.0 + k[1065]*y_cur[IDX_eM] + - k[1565]*y_cur[IDX_C2H2I] + k[2196]*y_cur[IDX_CH4I] + - k[2445]*y_cur[IDX_H2I] + k[3460]*y_cur[IDX_NI] + - k[6631]*y_cur[IDX_GRAINM]; - data[jistart + 14178] = 0.0 + k[1082]*y_cur[IDX_eM] + - k[6794]*y_cur[IDX_GRAINM]; - data[jistart + 14179] = 0.0 - k[301]*y_cur[IDX_CNII] - - k[388]*y_cur[IDX_HII] - k[449]*y_cur[IDX_H2II] - - k[497]*y_cur[IDX_COII] - k[498]*y_cur[IDX_N2II] - - k[554]*y_cur[IDX_NII] - k[1407]*y_cur[IDX_CII] - - k[1453]*y_cur[IDX_C2II] - k[1474]*y_cur[IDX_C2HII] - - k[1475]*y_cur[IDX_C2HII] - k[1476]*y_cur[IDX_C2HII] - - k[1522]*y_cur[IDX_C2H2II] - k[1523]*y_cur[IDX_C2H2II] - - k[1956]*y_cur[IDX_CHII] - k[1957]*y_cur[IDX_CHII] - - k[1958]*y_cur[IDX_CHII] - k[1986]*y_cur[IDX_CH2II] - - k[2229]*y_cur[IDX_CH5II] - k[2272]*y_cur[IDX_CNII] - - k[2368]*y_cur[IDX_HM] - k[2512]*y_cur[IDX_H2OII] - - k[2694]*y_cur[IDX_H3II] - k[2806]*y_cur[IDX_H3OII] - - k[2856]*y_cur[IDX_HCNII] - k[2861]*y_cur[IDX_C2H3II] - - k[2862]*y_cur[IDX_C2H5II] - k[2863]*y_cur[IDX_C2H7II] - - k[2864]*y_cur[IDX_C2H7II] - k[2865]*y_cur[IDX_C2N2II] - - k[2866]*y_cur[IDX_C2N2II] - k[2867]*y_cur[IDX_C3II] - - k[2868]*y_cur[IDX_C3II] - k[2869]*y_cur[IDX_C4HII] - - k[2870]*y_cur[IDX_C4HII] - k[2871]*y_cur[IDX_C5II] - - k[2872]*y_cur[IDX_C2H6II] - k[2873]*y_cur[IDX_CH3OH2II] - - k[2874]*y_cur[IDX_H2COII] - k[2875]*y_cur[IDX_H3COII] - - k[2876]*y_cur[IDX_H3SII] - k[2877]*y_cur[IDX_HCOII] - - k[2878]*y_cur[IDX_HNOII] - k[2879]*y_cur[IDX_HSII] - - k[2880]*y_cur[IDX_HSiSII] - k[2881]*y_cur[IDX_N2HII] - - k[2882]*y_cur[IDX_NCCNHII] - k[2883]*y_cur[IDX_O2HII] - - k[2884]*y_cur[IDX_PHII] - k[2885]*y_cur[IDX_SiII] - - k[3245]*y_cur[IDX_HeII] - k[3246]*y_cur[IDX_HeII] - - k[3247]*y_cur[IDX_HeII] - k[3248]*y_cur[IDX_HeII] - - k[3493]*y_cur[IDX_NHII] - k[3519]*y_cur[IDX_NH2II] - - k[3644]*y_cur[IDX_OII] - k[3645]*y_cur[IDX_OII] - - k[3653]*y_cur[IDX_OM] - k[3781]*y_cur[IDX_OHII] - - k[3795]*y_cur[IDX_OHM] - k[4873]*y_cur[IDX_C2I] - - k[4901]*y_cur[IDX_C2HI] - k[5116]*y_cur[IDX_CNI] - - k[5170]*y_cur[IDX_HI] - k[5402]*y_cur[IDX_OI] - - k[5403]*y_cur[IDX_OI] - k[5404]*y_cur[IDX_OI] - - k[5469]*y_cur[IDX_OHI] - k[5470]*y_cur[IDX_OHI] - - k[5540]*y_cur[IDX_CH3II] - k[5580]*y_cur[IDX_SiII] - k[5854] - - k[6181] - k[6911]; - data[jistart + 14180] = 0.0 + k[230]*y_cur[IDX_C2H2I] + - k[480]*y_cur[IDX_H2OI] + k[490]*y_cur[IDX_HI] + - k[494]*y_cur[IDX_NOI] + k[495]*y_cur[IDX_O2I] + k[496]*y_cur[IDX_SI] - + k[608]*y_cur[IDX_NH3I] - k[2856]*y_cur[IDX_HCNI]; - data[jistart + 14181] = 0.0 + k[1090]*y_cur[IDX_eM] + - k[2006]*y_cur[IDX_CH2I] + k[2251]*y_cur[IDX_CHI] + - k[2886]*y_cur[IDX_CH2CHCNI] + k[2888]*y_cur[IDX_CH3CNI] + - k[2890]*y_cur[IDX_H2COI] + k[2892]*y_cur[IDX_H2SI] + - k[2894]*y_cur[IDX_HC3NI] + k[3540]*y_cur[IDX_NH2I] + - k[3582]*y_cur[IDX_NH3I] + k[3629]*y_cur[IDX_NaI] + - k[3902]*y_cur[IDX_CM] + k[3937]*y_cur[IDX_C10M] + - k[3972]*y_cur[IDX_C10HM] + k[4007]*y_cur[IDX_C2M] + - k[4042]*y_cur[IDX_C2HM] + k[4077]*y_cur[IDX_C3M] + - k[4112]*y_cur[IDX_C3HM] + k[4147]*y_cur[IDX_C3NM] + - k[4182]*y_cur[IDX_C4M] + k[4217]*y_cur[IDX_C4HM] + - k[4252]*y_cur[IDX_C5M] + k[4287]*y_cur[IDX_C5HM] + - k[4322]*y_cur[IDX_C5NM] + k[4357]*y_cur[IDX_C6M] + - k[4392]*y_cur[IDX_C6HM] + k[4427]*y_cur[IDX_C7M] + - k[4462]*y_cur[IDX_C7HM] + k[4497]*y_cur[IDX_C8M] + - k[4532]*y_cur[IDX_C8HM] + k[4567]*y_cur[IDX_C9M] + - k[4602]*y_cur[IDX_C9HM] + k[4637]*y_cur[IDX_CHM] + - k[4672]*y_cur[IDX_CNM] + k[4708]*y_cur[IDX_HM] + - k[4743]*y_cur[IDX_OM] + k[4778]*y_cur[IDX_O2M] + - k[4813]*y_cur[IDX_OHM] + k[4848]*y_cur[IDX_SM] + - k[6379]*y_cur[IDX_GRAINM]; - data[jistart + 14182] = 0.0 + k[1094]*y_cur[IDX_eM] + - k[6532]*y_cur[IDX_GRAINM]; - data[jistart + 14183] = 0.0 + k[5117]*y_cur[IDX_CNI] + - k[5266]*y_cur[IDX_NI]; - data[jistart + 14184] = 0.0 - k[2877]*y_cur[IDX_HCNI]; - data[jistart + 14185] = 0.0 + k[5268]*y_cur[IDX_NI]; - data[jistart + 14186] = 0.0 + k[133]*y_cur[IDX_HII] + - k[5174]*y_cur[IDX_HI]; - data[jistart + 14187] = 0.0 + k[5119]*y_cur[IDX_CNI]; - data[jistart + 14188] = 0.0 - k[2878]*y_cur[IDX_HCNI]; - data[jistart + 14189] = 0.0 + k[5215]*y_cur[IDX_CI]; - data[jistart + 14190] = 0.0 - k[2879]*y_cur[IDX_HCNI]; - data[jistart + 14191] = 0.0 - k[2880]*y_cur[IDX_HCNI]; - data[jistart + 14192] = 0.0 + k[3169]*y_cur[IDX_CH2CHCNI] - + k[3237]*y_cur[IDX_HC3NI] - k[3238]*y_cur[IDX_C4H2I] - + k[3239]*y_cur[IDX_C4H2I] - k[3240]*y_cur[IDX_C4H2I] - + k[3241]*y_cur[IDX_HC5NI] - k[3242]*y_cur[IDX_HC5NI] - + k[3243]*y_cur[IDX_HC7NI] - k[3244]*y_cur[IDX_HC9NI] - k[3245]*y_cur[IDX_HCNI] - k[3246]*y_cur[IDX_HCNI] - - k[3247]*y_cur[IDX_HCNI] - k[3248]*y_cur[IDX_HCNI]; - data[jistart + 14193] = 0.0 + k[3389]*y_cur[IDX_C2H2II] + - k[3400]*y_cur[IDX_C3H5II] + k[3405]*y_cur[IDX_C4H2II] + - k[3423]*y_cur[IDX_C6H2II] + k[3424]*y_cur[IDX_C6H5II] + - k[3460]*y_cur[IDX_HC3NII] + k[3470]*y_cur[IDX_SiCH2II] + - k[5225]*y_cur[IDX_C2H4I] + k[5253]*y_cur[IDX_CH2I] + - k[5258]*y_cur[IDX_CH3I] + k[5259]*y_cur[IDX_CH3I] + - k[5264]*y_cur[IDX_H2CNI] + k[5266]*y_cur[IDX_HCOI] + - k[5268]*y_cur[IDX_HCSI]; - data[jistart + 14194] = 0.0 - k[554]*y_cur[IDX_HCNI]; - data[jistart + 14195] = 0.0 + k[5001]*y_cur[IDX_CH2I] + - k[5079]*y_cur[IDX_CHI]; - data[jistart + 14196] = 0.0 - k[498]*y_cur[IDX_HCNI]; - data[jistart + 14197] = 0.0 - k[2881]*y_cur[IDX_HCNI]; - data[jistart + 14198] = 0.0 + k[5181]*y_cur[IDX_HI] + - k[5475]*y_cur[IDX_OHI]; - data[jistart + 14199] = 0.0 - k[2882]*y_cur[IDX_HCNI]; - data[jistart + 14200] = 0.0 + k[6]*y_cur[IDX_CM] + - k[5305]*y_cur[IDX_CNI]; - data[jistart + 14201] = 0.0 - k[3493]*y_cur[IDX_HCNI]; - data[jistart + 14202] = 0.0 + k[3540]*y_cur[IDX_HCNHII] + - k[4969]*y_cur[IDX_CI]; - data[jistart + 14203] = 0.0 - k[3519]*y_cur[IDX_HCNI]; - data[jistart + 14204] = 0.0 + k[1161]*y_cur[IDX_eM] + - k[6526]*y_cur[IDX_GRAINM]; - data[jistart + 14205] = 0.0 + k[608]*y_cur[IDX_HCNII] + - k[3561]*y_cur[IDX_C2NII] + k[3572]*y_cur[IDX_CNCII] + - k[3582]*y_cur[IDX_HCNHII] + k[5302]*y_cur[IDX_CNI]; - data[jistart + 14206] = 0.0 + k[494]*y_cur[IDX_HCNII] + - k[4878]*y_cur[IDX_C2H2I] + k[5004]*y_cur[IDX_CH2I] + - k[5038]*y_cur[IDX_CH3I] + k[5083]*y_cur[IDX_CHI]; - data[jistart + 14207] = 0.0 + k[3629]*y_cur[IDX_HCNHII]; - data[jistart + 14208] = 0.0 - k[5402]*y_cur[IDX_HCNI] - - k[5403]*y_cur[IDX_HCNI] - k[5404]*y_cur[IDX_HCNI]; - data[jistart + 14209] = 0.0 - k[3644]*y_cur[IDX_HCNI] - - k[3645]*y_cur[IDX_HCNI]; - data[jistart + 14210] = 0.0 - k[3653]*y_cur[IDX_HCNI] + - k[4743]*y_cur[IDX_HCNHII]; - data[jistart + 14211] = 0.0 + k[495]*y_cur[IDX_HCNII]; - data[jistart + 14212] = 0.0 + k[4778]*y_cur[IDX_HCNHII]; - data[jistart + 14213] = 0.0 - k[2883]*y_cur[IDX_HCNI]; - data[jistart + 14214] = 0.0 + k[5194]*y_cur[IDX_HI]; - data[jistart + 14215] = 0.0 + k[5459]*y_cur[IDX_CNI] - - k[5469]*y_cur[IDX_HCNI] - k[5470]*y_cur[IDX_HCNI] + - k[5475]*y_cur[IDX_NCCNI]; - data[jistart + 14216] = 0.0 - k[3781]*y_cur[IDX_HCNI]; - data[jistart + 14217] = 0.0 - k[3795]*y_cur[IDX_HCNI] + - k[4813]*y_cur[IDX_HCNHII]; - data[jistart + 14218] = 0.0 - k[2884]*y_cur[IDX_HCNI]; - data[jistart + 14219] = 0.0 + k[496]*y_cur[IDX_HCNII]; - data[jistart + 14220] = 0.0 + k[4848]*y_cur[IDX_HCNHII]; - data[jistart + 14221] = 0.0 - k[2885]*y_cur[IDX_HCNI] - - k[5580]*y_cur[IDX_HCNI]; - data[jistart + 14222] = 0.0 + k[3470]*y_cur[IDX_NI]; - data[jistart + 14223] = 0.0 + k[5126]*y_cur[IDX_CNI]; - data[jistart + 14224] = 0.0 + k[913]*y_cur[IDX_CH2CHCNHII] + - k[917]*y_cur[IDX_CH2CNII] + k[945]*y_cur[IDX_CH3CNII] + - k[971]*y_cur[IDX_CH3NHII] + k[1065]*y_cur[IDX_HC3NII] + - k[1082]*y_cur[IDX_HC5NHII] + k[1090]*y_cur[IDX_HCNHII] + - k[1094]*y_cur[IDX_HCNOHII] + k[1161]*y_cur[IDX_NH2CNHII]; - data[jistart + 14225] = 0.0 - k[1903]*y_cur[IDX_HCNII]; - data[jistart + 14226] = 0.0 + k[1417]*y_cur[IDX_NH2I] + - k[1419]*y_cur[IDX_NH3I] + k[3017]*y_cur[IDX_HNC3I]; - data[jistart + 14227] = 0.0 - k[1458]*y_cur[IDX_HCNII] + - k[3479]*y_cur[IDX_NHII]; - data[jistart + 14228] = 0.0 - k[1745]*y_cur[IDX_HCNII]; - data[jistart + 14229] = 0.0 - k[230]*y_cur[IDX_HCNII]; - data[jistart + 14230] = 0.0 + k[2830]*y_cur[IDX_HI] + - k[2865]*y_cur[IDX_HCNI]; - data[jistart + 14231] = 0.0 - k[2250]*y_cur[IDX_HCNII]; - data[jistart + 14232] = 0.0 + k[1962]*y_cur[IDX_NH2I]; - data[jistart + 14233] = 0.0 - k[2005]*y_cur[IDX_HCNII]; - data[jistart + 14234] = 0.0 + k[3452]*y_cur[IDX_NI]; - data[jistart + 14235] = 0.0 - k[2199]*y_cur[IDX_HCNII] - - k[2200]*y_cur[IDX_HCNII] + k[3341]*y_cur[IDX_NII]; - data[jistart + 14236] = 0.0 + k[2278]*y_cur[IDX_HNOII] + - k[2279]*y_cur[IDX_O2HII] + k[2381]*y_cur[IDX_H2II] + - k[2671]*y_cur[IDX_H3II] + k[3481]*y_cur[IDX_NHII] + - k[3775]*y_cur[IDX_OHII]; - data[jistart + 14237] = 0.0 + k[301]*y_cur[IDX_HCNI] + - k[2273]*y_cur[IDX_HCOI] + k[2433]*y_cur[IDX_H2I] + - k[2536]*y_cur[IDX_H2OI]; - data[jistart + 14238] = 0.0 - k[2854]*y_cur[IDX_HCNII]; - data[jistart + 14239] = 0.0 + k[497]*y_cur[IDX_HCNI]; - data[jistart + 14240] = 0.0 - k[2853]*y_cur[IDX_HCNII]; - data[jistart + 14241] = 0.0 - k[6372]*y_cur[IDX_HCNII]; - data[jistart + 14242] = 0.0 - k[490]*y_cur[IDX_HCNII] + - k[2830]*y_cur[IDX_C2N2II]; - data[jistart + 14243] = 0.0 + k[388]*y_cur[IDX_HCNI] + - k[3025]*y_cur[IDX_HNC3I]; - data[jistart + 14244] = 0.0 + k[2433]*y_cur[IDX_CNII] - - k[2450]*y_cur[IDX_HCNII]; - data[jistart + 14245] = 0.0 + k[449]*y_cur[IDX_HCNI] + - k[2381]*y_cur[IDX_CNI]; - data[jistart + 14246] = 0.0 - k[2855]*y_cur[IDX_HCNII]; - data[jistart + 14247] = 0.0 - k[480]*y_cur[IDX_HCNII] + - k[2536]*y_cur[IDX_CNII] - k[2546]*y_cur[IDX_HCNII]; - data[jistart + 14248] = 0.0 + k[2671]*y_cur[IDX_CNI]; - data[jistart + 14249] = 0.0 + k[301]*y_cur[IDX_CNII] + - k[388]*y_cur[IDX_HII] + k[449]*y_cur[IDX_H2II] + - k[497]*y_cur[IDX_COII] + k[498]*y_cur[IDX_N2II] + - k[554]*y_cur[IDX_NII] - k[2856]*y_cur[IDX_HCNII] + - k[2865]*y_cur[IDX_C2N2II]; - data[jistart + 14250] = 0.0 - k[230]*y_cur[IDX_C2H2I] - - k[480]*y_cur[IDX_H2OI] - k[490]*y_cur[IDX_HI] - - k[494]*y_cur[IDX_NOI] - k[495]*y_cur[IDX_O2I] - k[496]*y_cur[IDX_SI] - - k[608]*y_cur[IDX_NH3I] - k[1088]*y_cur[IDX_eM] - - k[1458]*y_cur[IDX_C2I] - k[1745]*y_cur[IDX_C2HI] - - k[1903]*y_cur[IDX_CI] - k[2005]*y_cur[IDX_CH2I] - - k[2199]*y_cur[IDX_CH4I] - k[2200]*y_cur[IDX_CH4I] - - k[2250]*y_cur[IDX_CHI] - k[2450]*y_cur[IDX_H2I] - - k[2546]*y_cur[IDX_H2OI] - k[2853]*y_cur[IDX_CO2I] - - k[2854]*y_cur[IDX_COI] - k[2855]*y_cur[IDX_H2COI] - - k[2856]*y_cur[IDX_HCNI] - k[2857]*y_cur[IDX_HCOI] - - k[2858]*y_cur[IDX_HCOI] - k[2859]*y_cur[IDX_HNCI] - - k[2860]*y_cur[IDX_SI] - k[3539]*y_cur[IDX_NH2I] - - k[3581]*y_cur[IDX_NH3I] - k[3613]*y_cur[IDX_NHI] - - k[3800]*y_cur[IDX_OHI] - k[6372]*y_cur[IDX_GRAINM]; - data[jistart + 14251] = 0.0 + k[2273]*y_cur[IDX_CNII] - - k[2857]*y_cur[IDX_HCNII] - k[2858]*y_cur[IDX_HCNII]; - data[jistart + 14252] = 0.0 - k[2859]*y_cur[IDX_HCNII]; - data[jistart + 14253] = 0.0 + k[3017]*y_cur[IDX_CII] + - k[3025]*y_cur[IDX_HII]; - data[jistart + 14254] = 0.0 + k[2278]*y_cur[IDX_CNI]; - data[jistart + 14255] = 0.0 + k[3452]*y_cur[IDX_CH2II]; - data[jistart + 14256] = 0.0 + k[554]*y_cur[IDX_HCNI] + - k[3341]*y_cur[IDX_CH4I]; - data[jistart + 14257] = 0.0 + k[498]*y_cur[IDX_HCNI]; - data[jistart + 14258] = 0.0 - k[3613]*y_cur[IDX_HCNII]; - data[jistart + 14259] = 0.0 + k[3479]*y_cur[IDX_C2I] + - k[3481]*y_cur[IDX_CNI]; - data[jistart + 14260] = 0.0 + k[1417]*y_cur[IDX_CII] + - k[1962]*y_cur[IDX_CHII] - k[3539]*y_cur[IDX_HCNII]; - data[jistart + 14261] = 0.0 - k[608]*y_cur[IDX_HCNII] + - k[1419]*y_cur[IDX_CII] - k[3581]*y_cur[IDX_HCNII]; - data[jistart + 14262] = 0.0 - k[494]*y_cur[IDX_HCNII]; - data[jistart + 14263] = 0.0 - k[495]*y_cur[IDX_HCNII]; - data[jistart + 14264] = 0.0 + k[2279]*y_cur[IDX_CNI]; - data[jistart + 14265] = 0.0 - k[3800]*y_cur[IDX_HCNII]; - data[jistart + 14266] = 0.0 + k[3775]*y_cur[IDX_CNI]; - data[jistart + 14267] = 0.0 - k[496]*y_cur[IDX_HCNII] - - k[2860]*y_cur[IDX_HCNII]; - data[jistart + 14268] = 0.0 - k[1088]*y_cur[IDX_HCNII]; - data[jistart + 14269] = 0.0 - k[3902]*y_cur[IDX_HCNHII] - - k[3903]*y_cur[IDX_HCNHII]; - data[jistart + 14270] = 0.0 - k[3937]*y_cur[IDX_HCNHII] - - k[3938]*y_cur[IDX_HCNHII]; - data[jistart + 14271] = 0.0 - k[3972]*y_cur[IDX_HCNHII] - - k[3973]*y_cur[IDX_HCNHII]; - data[jistart + 14272] = 0.0 - k[4007]*y_cur[IDX_HCNHII] - - k[4008]*y_cur[IDX_HCNHII]; - data[jistart + 14273] = 0.0 + k[1476]*y_cur[IDX_HCNI] + - k[1478]*y_cur[IDX_HNCI]; - data[jistart + 14274] = 0.0 - k[4042]*y_cur[IDX_HCNHII] - - k[4043]*y_cur[IDX_HCNHII]; - data[jistart + 14275] = 0.0 + k[1523]*y_cur[IDX_HCNI] + - k[1525]*y_cur[IDX_HNCI]; - data[jistart + 14276] = 0.0 + k[2861]*y_cur[IDX_HCNI] + - k[3036]*y_cur[IDX_HNCI]; - data[jistart + 14277] = 0.0 + k[2862]*y_cur[IDX_HCNI] + - k[3037]*y_cur[IDX_HNCI]; - data[jistart + 14278] = 0.0 + k[2872]*y_cur[IDX_HCNI]; - data[jistart + 14279] = 0.0 + k[2864]*y_cur[IDX_HCNI]; - data[jistart + 14280] = 0.0 + k[3561]*y_cur[IDX_NH3I]; - data[jistart + 14281] = 0.0 - k[4077]*y_cur[IDX_HCNHII] - - k[4078]*y_cur[IDX_HCNHII]; - data[jistart + 14282] = 0.0 - k[4112]*y_cur[IDX_HCNHII] - - k[4113]*y_cur[IDX_HCNHII]; - data[jistart + 14283] = 0.0 + k[3398]*y_cur[IDX_NI]; - data[jistart + 14284] = 0.0 + k[3564]*y_cur[IDX_NH3I]; - data[jistart + 14285] = 0.0 - k[4147]*y_cur[IDX_HCNHII] - - k[4148]*y_cur[IDX_HCNHII]; - data[jistart + 14286] = 0.0 - k[4182]*y_cur[IDX_HCNHII] - - k[4183]*y_cur[IDX_HCNHII]; - data[jistart + 14287] = 0.0 - k[4217]*y_cur[IDX_HCNHII] - - k[4218]*y_cur[IDX_HCNHII]; - data[jistart + 14288] = 0.0 + k[3407]*y_cur[IDX_NI]; - data[jistart + 14289] = 0.0 - k[4252]*y_cur[IDX_HCNHII] - - k[4253]*y_cur[IDX_HCNHII]; - data[jistart + 14290] = 0.0 - k[4287]*y_cur[IDX_HCNHII] - - k[4288]*y_cur[IDX_HCNHII]; - data[jistart + 14291] = 0.0 - k[4322]*y_cur[IDX_HCNHII] - - k[4323]*y_cur[IDX_HCNHII]; - data[jistart + 14292] = 0.0 - k[4357]*y_cur[IDX_HCNHII] - - k[4358]*y_cur[IDX_HCNHII]; - data[jistart + 14293] = 0.0 - k[4392]*y_cur[IDX_HCNHII] - - k[4393]*y_cur[IDX_HCNHII]; - data[jistart + 14294] = 0.0 - k[4427]*y_cur[IDX_HCNHII] - - k[4428]*y_cur[IDX_HCNHII]; - data[jistart + 14295] = 0.0 - k[4462]*y_cur[IDX_HCNHII] - - k[4463]*y_cur[IDX_HCNHII]; - data[jistart + 14296] = 0.0 - k[4497]*y_cur[IDX_HCNHII] - - k[4498]*y_cur[IDX_HCNHII]; - data[jistart + 14297] = 0.0 - k[4532]*y_cur[IDX_HCNHII] - - k[4533]*y_cur[IDX_HCNHII]; - data[jistart + 14298] = 0.0 - k[4567]*y_cur[IDX_HCNHII] - - k[4568]*y_cur[IDX_HCNHII]; - data[jistart + 14299] = 0.0 - k[4602]*y_cur[IDX_HCNHII] - - k[4603]*y_cur[IDX_HCNHII]; - data[jistart + 14300] = 0.0 + k[3566]*y_cur[IDX_NH3I]; - data[jistart + 14301] = 0.0 - k[2251]*y_cur[IDX_HCNHII] - - k[2252]*y_cur[IDX_HCNHII]; - data[jistart + 14302] = 0.0 + k[1958]*y_cur[IDX_HCNI] + - k[1960]*y_cur[IDX_HNCI]; - data[jistart + 14303] = 0.0 - k[4637]*y_cur[IDX_HCNHII] - - k[4638]*y_cur[IDX_HCNHII]; - data[jistart + 14304] = 0.0 - k[2006]*y_cur[IDX_HCNHII] - - k[2007]*y_cur[IDX_HCNHII]; - data[jistart + 14305] = 0.0 - k[2886]*y_cur[IDX_HCNHII] - - k[2887]*y_cur[IDX_HCNHII]; - data[jistart + 14306] = 0.0 + k[2069]*y_cur[IDX_CH3CNI] + - k[3608]*y_cur[IDX_NHI]; - data[jistart + 14307] = 0.0 + k[2069]*y_cur[IDX_CH3II] - - k[2888]*y_cur[IDX_HCNHII] - k[2889]*y_cur[IDX_HCNHII]; - data[jistart + 14308] = 0.0 + k[2200]*y_cur[IDX_HCNII] + - k[3342]*y_cur[IDX_NII]; - data[jistart + 14309] = 0.0 + k[2229]*y_cur[IDX_HCNI] + - k[2232]*y_cur[IDX_HNCI]; - data[jistart + 14310] = 0.0 - k[4672]*y_cur[IDX_HCNHII] - - k[4673]*y_cur[IDX_HCNHII]; - data[jistart + 14311] = 0.0 + k[3572]*y_cur[IDX_NH3I]; - data[jistart + 14312] = 0.0 - k[6378]*y_cur[IDX_HCNHII] - - k[6379]*y_cur[IDX_HCNHII] - k[6380]*y_cur[IDX_HCNHII]; - data[jistart + 14313] = 0.0 - k[4708]*y_cur[IDX_HCNHII] - - k[4709]*y_cur[IDX_HCNHII]; - data[jistart + 14314] = 0.0 + k[2450]*y_cur[IDX_HCNII]; - data[jistart + 14315] = 0.0 - k[2890]*y_cur[IDX_HCNHII] - - k[2891]*y_cur[IDX_HCNHII]; - data[jistart + 14316] = 0.0 + k[2874]*y_cur[IDX_HCNI] + - k[3038]*y_cur[IDX_HNCI]; - data[jistart + 14317] = 0.0 + k[2512]*y_cur[IDX_HCNI] + - k[2515]*y_cur[IDX_HNCI]; - data[jistart + 14318] = 0.0 - k[2892]*y_cur[IDX_HCNHII] - - k[2893]*y_cur[IDX_HCNHII]; - data[jistart + 14319] = 0.0 + k[2694]*y_cur[IDX_HCNI] + - k[2706]*y_cur[IDX_HNCI]; - data[jistart + 14320] = 0.0 + k[2875]*y_cur[IDX_HCNI] + - k[3039]*y_cur[IDX_HNCI]; - data[jistart + 14321] = 0.0 + k[2806]*y_cur[IDX_HCNI] + - k[2810]*y_cur[IDX_HNCI]; - data[jistart + 14322] = 0.0 + k[2876]*y_cur[IDX_HCNI] + - k[3040]*y_cur[IDX_HNCI]; - data[jistart + 14323] = 0.0 - k[2894]*y_cur[IDX_HCNHII] - - k[2895]*y_cur[IDX_HCNHII]; - data[jistart + 14324] = 0.0 + k[1476]*y_cur[IDX_C2HII] + - k[1523]*y_cur[IDX_C2H2II] + k[1958]*y_cur[IDX_CHII] + - k[2229]*y_cur[IDX_CH5II] + k[2512]*y_cur[IDX_H2OII] + - k[2694]*y_cur[IDX_H3II] + k[2806]*y_cur[IDX_H3OII] + - k[2856]*y_cur[IDX_HCNII] + k[2861]*y_cur[IDX_C2H3II] + - k[2862]*y_cur[IDX_C2H5II] + k[2864]*y_cur[IDX_C2H7II] + - k[2872]*y_cur[IDX_C2H6II] + k[2874]*y_cur[IDX_H2COII] + - k[2875]*y_cur[IDX_H3COII] + k[2876]*y_cur[IDX_H3SII] + - k[2877]*y_cur[IDX_HCOII] + k[2878]*y_cur[IDX_HNOII] + - k[2879]*y_cur[IDX_HSII] + k[2880]*y_cur[IDX_HSiSII] + - k[2881]*y_cur[IDX_N2HII] + k[2882]*y_cur[IDX_NCCNHII] + - k[2883]*y_cur[IDX_O2HII] + k[2884]*y_cur[IDX_PHII] + - k[3493]*y_cur[IDX_NHII] + k[3519]*y_cur[IDX_NH2II] + - k[3781]*y_cur[IDX_OHII]; - data[jistart + 14325] = 0.0 + k[2200]*y_cur[IDX_CH4I] + - k[2450]*y_cur[IDX_H2I] + k[2856]*y_cur[IDX_HCNI] + - k[2858]*y_cur[IDX_HCOI] + k[2859]*y_cur[IDX_HNCI] + - k[3581]*y_cur[IDX_NH3I]; - data[jistart + 14326] = 0.0 - k[1089]*y_cur[IDX_eM] - - k[1090]*y_cur[IDX_eM] - k[1091]*y_cur[IDX_eM] - - k[2006]*y_cur[IDX_CH2I] - k[2007]*y_cur[IDX_CH2I] - - k[2251]*y_cur[IDX_CHI] - k[2252]*y_cur[IDX_CHI] - - k[2886]*y_cur[IDX_CH2CHCNI] - k[2887]*y_cur[IDX_CH2CHCNI] - - k[2888]*y_cur[IDX_CH3CNI] - k[2889]*y_cur[IDX_CH3CNI] - - k[2890]*y_cur[IDX_H2COI] - k[2891]*y_cur[IDX_H2COI] - - k[2892]*y_cur[IDX_H2SI] - k[2893]*y_cur[IDX_H2SI] - - k[2894]*y_cur[IDX_HC3NI] - k[2895]*y_cur[IDX_HC3NI] - - k[2896]*y_cur[IDX_SiI] - k[3540]*y_cur[IDX_NH2I] - - k[3541]*y_cur[IDX_NH2I] - k[3582]*y_cur[IDX_NH3I] - - k[3583]*y_cur[IDX_NH3I] - k[3629]*y_cur[IDX_NaI] - - k[3630]*y_cur[IDX_NaI] - k[3902]*y_cur[IDX_CM] - - k[3903]*y_cur[IDX_CM] - k[3937]*y_cur[IDX_C10M] - - k[3938]*y_cur[IDX_C10M] - k[3972]*y_cur[IDX_C10HM] - - k[3973]*y_cur[IDX_C10HM] - k[4007]*y_cur[IDX_C2M] - - k[4008]*y_cur[IDX_C2M] - k[4042]*y_cur[IDX_C2HM] - - k[4043]*y_cur[IDX_C2HM] - k[4077]*y_cur[IDX_C3M] - - k[4078]*y_cur[IDX_C3M] - k[4112]*y_cur[IDX_C3HM] - - k[4113]*y_cur[IDX_C3HM] - k[4147]*y_cur[IDX_C3NM] - - k[4148]*y_cur[IDX_C3NM] - k[4182]*y_cur[IDX_C4M] - - k[4183]*y_cur[IDX_C4M] - k[4217]*y_cur[IDX_C4HM] - - k[4218]*y_cur[IDX_C4HM] - k[4252]*y_cur[IDX_C5M] - - k[4253]*y_cur[IDX_C5M] - k[4287]*y_cur[IDX_C5HM] - - k[4288]*y_cur[IDX_C5HM] - k[4322]*y_cur[IDX_C5NM] - - k[4323]*y_cur[IDX_C5NM] - k[4357]*y_cur[IDX_C6M] - - k[4358]*y_cur[IDX_C6M] - k[4392]*y_cur[IDX_C6HM] - - k[4393]*y_cur[IDX_C6HM] - k[4427]*y_cur[IDX_C7M] - - k[4428]*y_cur[IDX_C7M] - k[4462]*y_cur[IDX_C7HM] - - k[4463]*y_cur[IDX_C7HM] - k[4497]*y_cur[IDX_C8M] - - k[4498]*y_cur[IDX_C8M] - k[4532]*y_cur[IDX_C8HM] - - k[4533]*y_cur[IDX_C8HM] - k[4567]*y_cur[IDX_C9M] - - k[4568]*y_cur[IDX_C9M] - k[4602]*y_cur[IDX_C9HM] - - k[4603]*y_cur[IDX_C9HM] - k[4637]*y_cur[IDX_CHM] - - k[4638]*y_cur[IDX_CHM] - k[4672]*y_cur[IDX_CNM] - - k[4673]*y_cur[IDX_CNM] - k[4708]*y_cur[IDX_HM] - - k[4709]*y_cur[IDX_HM] - k[4743]*y_cur[IDX_OM] - - k[4744]*y_cur[IDX_OM] - k[4778]*y_cur[IDX_O2M] - - k[4779]*y_cur[IDX_O2M] - k[4813]*y_cur[IDX_OHM] - - k[4814]*y_cur[IDX_OHM] - k[4848]*y_cur[IDX_SM] - - k[4849]*y_cur[IDX_SM] - k[6378]*y_cur[IDX_GRAINM] - - k[6379]*y_cur[IDX_GRAINM] - k[6380]*y_cur[IDX_GRAINM]; - data[jistart + 14327] = 0.0 + k[2858]*y_cur[IDX_HCNII]; - data[jistart + 14328] = 0.0 + k[2877]*y_cur[IDX_HCNI] + - k[3041]*y_cur[IDX_HNCI]; - data[jistart + 14329] = 0.0 + k[1478]*y_cur[IDX_C2HII] + - k[1525]*y_cur[IDX_C2H2II] + k[1960]*y_cur[IDX_CHII] + - k[2232]*y_cur[IDX_CH5II] + k[2515]*y_cur[IDX_H2OII] + - k[2706]*y_cur[IDX_H3II] + k[2810]*y_cur[IDX_H3OII] + - k[2859]*y_cur[IDX_HCNII] + k[3036]*y_cur[IDX_C2H3II] + - k[3037]*y_cur[IDX_C2H5II] + k[3038]*y_cur[IDX_H2COII] + - k[3039]*y_cur[IDX_H3COII] + k[3040]*y_cur[IDX_H3SII] + - k[3041]*y_cur[IDX_HCOII] + k[3042]*y_cur[IDX_HNOII] + - k[3043]*y_cur[IDX_HSII] + k[3044]*y_cur[IDX_N2HII] + - k[3045]*y_cur[IDX_O2HII] + k[3495]*y_cur[IDX_NHII] + - k[3521]*y_cur[IDX_NH2II] + k[3784]*y_cur[IDX_OHII]; - data[jistart + 14330] = 0.0 + k[2878]*y_cur[IDX_HCNI] + - k[3042]*y_cur[IDX_HNCI]; - data[jistart + 14331] = 0.0 + k[2879]*y_cur[IDX_HCNI] + - k[3043]*y_cur[IDX_HNCI]; - data[jistart + 14332] = 0.0 + k[2880]*y_cur[IDX_HCNI]; - data[jistart + 14333] = 0.0 + k[3398]*y_cur[IDX_C3H2II] + - k[3407]*y_cur[IDX_C4H2II]; - data[jistart + 14334] = 0.0 + k[3342]*y_cur[IDX_CH4I]; - data[jistart + 14335] = 0.0 + k[2881]*y_cur[IDX_HCNI] + - k[3044]*y_cur[IDX_HNCI]; - data[jistart + 14336] = 0.0 + k[2882]*y_cur[IDX_HCNI]; - data[jistart + 14337] = 0.0 + k[3608]*y_cur[IDX_CH3II]; - data[jistart + 14338] = 0.0 + k[3493]*y_cur[IDX_HCNI] + - k[3495]*y_cur[IDX_HNCI]; - data[jistart + 14339] = 0.0 - k[3540]*y_cur[IDX_HCNHII] - - k[3541]*y_cur[IDX_HCNHII]; - data[jistart + 14340] = 0.0 + k[3519]*y_cur[IDX_HCNI] + - k[3521]*y_cur[IDX_HNCI]; - data[jistart + 14341] = 0.0 + k[3561]*y_cur[IDX_C2NII] + - k[3564]*y_cur[IDX_C3H3II] + k[3566]*y_cur[IDX_CClII] + - k[3572]*y_cur[IDX_CNCII] + k[3581]*y_cur[IDX_HCNII] - - k[3582]*y_cur[IDX_HCNHII] - k[3583]*y_cur[IDX_HCNHII]; - data[jistart + 14342] = 0.0 - k[3629]*y_cur[IDX_HCNHII] - - k[3630]*y_cur[IDX_HCNHII]; - data[jistart + 14343] = 0.0 - k[4743]*y_cur[IDX_HCNHII] - - k[4744]*y_cur[IDX_HCNHII]; - data[jistart + 14344] = 0.0 - k[4778]*y_cur[IDX_HCNHII] - - k[4779]*y_cur[IDX_HCNHII]; - data[jistart + 14345] = 0.0 + k[2883]*y_cur[IDX_HCNI] + - k[3045]*y_cur[IDX_HNCI]; - data[jistart + 14346] = 0.0 + k[3781]*y_cur[IDX_HCNI] + - k[3784]*y_cur[IDX_HNCI]; - data[jistart + 14347] = 0.0 - k[4813]*y_cur[IDX_HCNHII] - - k[4814]*y_cur[IDX_HCNHII]; - data[jistart + 14348] = 0.0 + k[2884]*y_cur[IDX_HCNI]; - data[jistart + 14349] = 0.0 - k[4848]*y_cur[IDX_HCNHII] - - k[4849]*y_cur[IDX_HCNHII]; - data[jistart + 14350] = 0.0 - k[2896]*y_cur[IDX_HCNHII]; - data[jistart + 14351] = 0.0 - k[1089]*y_cur[IDX_HCNHII] - - k[1090]*y_cur[IDX_HCNHII] - k[1091]*y_cur[IDX_HCNHII]; - data[jistart + 14352] = 0.0 - k[5202]*y_cur[IDX_HCNOI]; - data[jistart + 14353] = 0.0 + k[5005]*y_cur[IDX_NOI]; - data[jistart + 14354] = 0.0 + k[8621]*y_cur[IDX_GHI]; - data[jistart + 14355] = 0.0 + k[8621]*y_cur[IDX_GCNOI]; - data[jistart + 14356] = 0.0 + k[7153] + k[7335] + k[7517]; - data[jistart + 14357] = 0.0 + k[6533]*y_cur[IDX_HCNOHII] + - k[6537]*y_cur[IDX_H2CNOII]; - data[jistart + 14358] = 0.0 - k[2343]*y_cur[IDX_HCNOI]; - data[jistart + 14359] = 0.0 + k[995]*y_cur[IDX_eM] + - k[6537]*y_cur[IDX_GRAINM]; - data[jistart + 14360] = 0.0 - k[2695]*y_cur[IDX_HCNOI] - - k[2696]*y_cur[IDX_HCNOI]; - data[jistart + 14361] = 0.0 - k[520]*y_cur[IDX_HeII] - - k[2343]*y_cur[IDX_HII] - k[2695]*y_cur[IDX_H3II] - - k[2696]*y_cur[IDX_H3II] - k[5202]*y_cur[IDX_CI] - - k[5203]*y_cur[IDX_OI] - k[5855] - k[6182] - k[6971]; - data[jistart + 14362] = 0.0 + k[1095]*y_cur[IDX_eM] + - k[6533]*y_cur[IDX_GRAINM]; - data[jistart + 14363] = 0.0 - k[520]*y_cur[IDX_HCNOI]; - data[jistart + 14364] = 0.0 + k[5005]*y_cur[IDX_CH2I]; - data[jistart + 14365] = 0.0 - k[5203]*y_cur[IDX_HCNOI]; - data[jistart + 14366] = 0.0 + k[995]*y_cur[IDX_H2CNOII] + - k[1095]*y_cur[IDX_HCNOHII]; - data[jistart + 14367] = 0.0 + k[2672]*y_cur[IDX_H3II]; - data[jistart + 14368] = 0.0 - k[6514]*y_cur[IDX_HCNOII] - - k[6515]*y_cur[IDX_HCNOII]; - data[jistart + 14369] = 0.0 - k[2897]*y_cur[IDX_HCNOII] - - k[2898]*y_cur[IDX_HCNOII]; - data[jistart + 14370] = 0.0 + k[2672]*y_cur[IDX_CNOI]; - data[jistart + 14371] = 0.0 + k[520]*y_cur[IDX_HeII]; - data[jistart + 14372] = 0.0 - k[1092]*y_cur[IDX_eM] - - k[1093]*y_cur[IDX_eM] - k[2897]*y_cur[IDX_H2I] - - k[2898]*y_cur[IDX_H2I] - k[6514]*y_cur[IDX_GRAINM] - - k[6515]*y_cur[IDX_GRAINM]; - data[jistart + 14373] = 0.0 + k[520]*y_cur[IDX_HCNOI]; - data[jistart + 14374] = 0.0 - k[1092]*y_cur[IDX_HCNOII] - - k[1093]*y_cur[IDX_HCNOII]; - data[jistart + 14375] = 0.0 - k[6532]*y_cur[IDX_HCNOHII] - - k[6533]*y_cur[IDX_HCNOHII] - k[6534]*y_cur[IDX_HCNOHII]; - data[jistart + 14376] = 0.0 + k[2898]*y_cur[IDX_HCNOII] + - k[3053]*y_cur[IDX_HONCII]; - data[jistart + 14377] = 0.0 + k[2696]*y_cur[IDX_HCNOI] + - k[2713]*y_cur[IDX_HONCI]; - data[jistart + 14378] = 0.0 + k[2696]*y_cur[IDX_H3II]; - data[jistart + 14379] = 0.0 + k[2898]*y_cur[IDX_H2I]; - data[jistart + 14380] = 0.0 - k[1094]*y_cur[IDX_eM] - - k[1095]*y_cur[IDX_eM] - k[1096]*y_cur[IDX_eM] - - k[6532]*y_cur[IDX_GRAINM] - k[6533]*y_cur[IDX_GRAINM] - - k[6534]*y_cur[IDX_GRAINM]; - data[jistart + 14381] = 0.0 + k[2713]*y_cur[IDX_H3II]; - data[jistart + 14382] = 0.0 + k[3053]*y_cur[IDX_H2I]; - data[jistart + 14383] = 0.0 - k[1094]*y_cur[IDX_HCNOHII] - - k[1095]*y_cur[IDX_HCNOHII] - k[1096]*y_cur[IDX_HCNOHII]; - data[jistart + 14384] = 0.0 + k[57]*y_cur[IDX_OHM] - - k[4962]*y_cur[IDX_HCOI] - k[4963]*y_cur[IDX_HCOI]; - data[jistart + 14385] = 0.0 - k[178]*y_cur[IDX_HCOI] + - k[1382]*y_cur[IDX_CH3OHI] - k[1408]*y_cur[IDX_HCOI] + - k[5633]*y_cur[IDX_CH2OHI]; - data[jistart + 14386] = 0.0 + k[9]*y_cur[IDX_OHI] + - k[3905]*y_cur[IDX_HCOII]; - data[jistart + 14387] = 0.0 + k[3940]*y_cur[IDX_HCOII]; - data[jistart + 14388] = 0.0 + k[3975]*y_cur[IDX_HCOII]; - data[jistart + 14389] = 0.0 + k[1457]*y_cur[IDX_H2COII]; - data[jistart + 14390] = 0.0 - k[205]*y_cur[IDX_HCOI] - - k[1454]*y_cur[IDX_HCOI]; - data[jistart + 14391] = 0.0 + k[4010]*y_cur[IDX_HCOII]; - data[jistart + 14392] = 0.0 + k[1744]*y_cur[IDX_H2COII] + - k[4904]*y_cur[IDX_O2I]; - data[jistart + 14393] = 0.0 - k[1477]*y_cur[IDX_HCOI]; - data[jistart + 14394] = 0.0 + k[4045]*y_cur[IDX_HCOII]; - data[jistart + 14395] = 0.0 + k[3846]*y_cur[IDX_SOII]; - data[jistart + 14396] = 0.0 - k[225]*y_cur[IDX_HCOI] - - k[1524]*y_cur[IDX_HCOI]; - data[jistart + 14397] = 0.0 + k[4881]*y_cur[IDX_O2I]; - data[jistart + 14398] = 0.0 + k[3850]*y_cur[IDX_SOII] + - k[5349]*y_cur[IDX_OI]; - data[jistart + 14399] = 0.0 + k[3691]*y_cur[IDX_OI]; - data[jistart + 14400] = 0.0 + k[4080]*y_cur[IDX_HCOII]; - data[jistart + 14401] = 0.0 + k[4115]*y_cur[IDX_HCOII]; - data[jistart + 14402] = 0.0 + k[4150]*y_cur[IDX_HCOII]; - data[jistart + 14403] = 0.0 + k[4185]*y_cur[IDX_HCOII]; - data[jistart + 14404] = 0.0 + k[4220]*y_cur[IDX_HCOII]; - data[jistart + 14405] = 0.0 + k[4255]*y_cur[IDX_HCOII]; - data[jistart + 14406] = 0.0 + k[4290]*y_cur[IDX_HCOII]; - data[jistart + 14407] = 0.0 + k[4325]*y_cur[IDX_HCOII]; - data[jistart + 14408] = 0.0 + k[4360]*y_cur[IDX_HCOII]; - data[jistart + 14409] = 0.0 + k[4395]*y_cur[IDX_HCOII]; - data[jistart + 14410] = 0.0 + k[4430]*y_cur[IDX_HCOII]; - data[jistart + 14411] = 0.0 + k[4465]*y_cur[IDX_HCOII]; - data[jistart + 14412] = 0.0 + k[4500]*y_cur[IDX_HCOII]; - data[jistart + 14413] = 0.0 + k[4535]*y_cur[IDX_HCOII]; - data[jistart + 14414] = 0.0 + k[4570]*y_cur[IDX_HCOII]; - data[jistart + 14415] = 0.0 + k[4605]*y_cur[IDX_HCOII]; - data[jistart + 14416] = 0.0 + k[62]*y_cur[IDX_OM] + - k[2246]*y_cur[IDX_H2COII] + k[5075]*y_cur[IDX_CO2I] + - k[5076]*y_cur[IDX_H2COI] - k[5077]*y_cur[IDX_HCOI] + - k[5084]*y_cur[IDX_NOI] + k[5092]*y_cur[IDX_O2I] + - k[5093]*y_cur[IDX_O2I] + k[5094]*y_cur[IDX_O2HI] + - k[5099]*y_cur[IDX_OHI]; - data[jistart + 14417] = 0.0 - k[251]*y_cur[IDX_HCOI] - - k[1959]*y_cur[IDX_HCOI] + k[1968]*y_cur[IDX_O2I]; - data[jistart + 14418] = 0.0 + k[4640]*y_cur[IDX_HCOII]; - data[jistart + 14419] = 0.0 + k[2002]*y_cur[IDX_H2COII] + - k[4998]*y_cur[IDX_H2COI] - k[4999]*y_cur[IDX_HCOI] + - k[5011]*y_cur[IDX_O2I] + k[5014]*y_cur[IDX_OI]; - data[jistart + 14420] = 0.0 - k[1987]*y_cur[IDX_HCOI] + - k[1993]*y_cur[IDX_OCSI]; - data[jistart + 14421] = 0.0 + k[3853]*y_cur[IDX_SOII] + - k[5383]*y_cur[IDX_OI]; - data[jistart + 14422] = 0.0 + k[5633]*y_cur[IDX_CII]; - data[jistart + 14423] = 0.0 + k[1280]*y_cur[IDX_eM] + - k[6727]*y_cur[IDX_GRAINM]; - data[jistart + 14424] = 0.0 + k[5665]*y_cur[IDX_HeII] + k[5945] + - k[6295]; - data[jistart + 14425] = 0.0 + k[1275]*y_cur[IDX_eM] + - k[1277]*y_cur[IDX_eM] + k[1278]*y_cur[IDX_eM] + - k[6701]*y_cur[IDX_GRAINM] + k[6703]*y_cur[IDX_GRAINM] + - k[6704]*y_cur[IDX_GRAINM]; - data[jistart + 14426] = 0.0 + k[5030]*y_cur[IDX_H2COI] - - k[5033]*y_cur[IDX_HCOI] + k[5040]*y_cur[IDX_O2I]; - data[jistart + 14427] = 0.0 - k[272]*y_cur[IDX_HCOI] - - k[2082]*y_cur[IDX_HCOI]; - data[jistart + 14428] = 0.0 + k[3191]*y_cur[IDX_HeII] + k[5808] + - k[6113]; - data[jistart + 14429] = 0.0 + k[938]*y_cur[IDX_eM] + - k[6548]*y_cur[IDX_GRAINM]; - data[jistart + 14430] = 0.0 + k[940]*y_cur[IDX_eM] + - k[6562]*y_cur[IDX_GRAINM]; - data[jistart + 14431] = 0.0 + k[2493]*y_cur[IDX_H2COI]; - data[jistart + 14432] = 0.0 + k[1382]*y_cur[IDX_CII] + - k[2487]*y_cur[IDX_H2COII]; - data[jistart + 14433] = 0.0 - k[2230]*y_cur[IDX_HCOI]; - data[jistart + 14434] = 0.0 + k[5114]*y_cur[IDX_H2COI] - - k[5117]*y_cur[IDX_HCOI]; - data[jistart + 14435] = 0.0 - k[302]*y_cur[IDX_HCOI] - - k[2273]*y_cur[IDX_HCOI]; - data[jistart + 14436] = 0.0 + k[4675]*y_cur[IDX_HCOII]; - data[jistart + 14437] = 0.0 + k[73]*y_cur[IDX_HM]; - data[jistart + 14438] = 0.0 - k[310]*y_cur[IDX_HCOI] + - k[2280]*y_cur[IDX_H2COI]; - data[jistart + 14439] = 0.0 + k[3484]*y_cur[IDX_NHII] + - k[5075]*y_cur[IDX_CHI]; - data[jistart + 14440] = 0.0 + k[499]*y_cur[IDX_HCOII]; - data[jistart + 14441] = 0.0 + k[8685]*y_cur[IDX_GOI]; - data[jistart + 14442] = 0.0 + k[8594]*y_cur[IDX_GHI]; - data[jistart + 14443] = 0.0 + k[8594]*y_cur[IDX_GCOI]; - data[jistart + 14444] = 0.0 + k[7101] + k[7283] + k[7465]; - data[jistart + 14445] = 0.0 + k[8685]*y_cur[IDX_GCHI]; - data[jistart + 14446] = 0.0 + k[6401]*y_cur[IDX_H2COII] + - k[6418]*y_cur[IDX_H3COII] + k[6548]*y_cur[IDX_CH3CHOII] + - k[6551]*y_cur[IDX_HNCOHII] + k[6562]*y_cur[IDX_CH3CHOHII] + - k[6575]*y_cur[IDX_HCOOHII] + k[6610]*y_cur[IDX_HCOOH2II] + - k[6701]*y_cur[IDX_CH2OHCHOII] + k[6703]*y_cur[IDX_CH2OHCHOII] + - k[6704]*y_cur[IDX_CH2OHCHOII] + k[6725]*y_cur[IDX_H5C2O2II] + - k[6727]*y_cur[IDX_CH2OHCH2OII]; - data[jistart + 14447] = 0.0 + k[5165]*y_cur[IDX_H2COI] - - k[5171]*y_cur[IDX_HCOI] - k[5172]*y_cur[IDX_HCOI]; - data[jistart + 14448] = 0.0 - k[389]*y_cur[IDX_HCOI] - - k[2344]*y_cur[IDX_HCOI] - k[2345]*y_cur[IDX_HCOI]; - data[jistart + 14449] = 0.0 + k[73]*y_cur[IDX_COI] - - k[76]*y_cur[IDX_HCOI] + k[4711]*y_cur[IDX_HCOII]; - data[jistart + 14450] = 0.0 - k[450]*y_cur[IDX_HCOI] - - k[2389]*y_cur[IDX_HCOI]; - data[jistart + 14451] = 0.0 + k[2280]*y_cur[IDX_COII] + - k[2488]*y_cur[IDX_H2COII] + k[2493]*y_cur[IDX_CH3COCH3II] + - k[3511]*y_cur[IDX_NH2II] + k[3549]*y_cur[IDX_NH3II] + - k[4998]*y_cur[IDX_CH2I] + k[5030]*y_cur[IDX_CH3I] + - k[5076]*y_cur[IDX_CHI] + k[5114]*y_cur[IDX_CNI] + - k[5150]*y_cur[IDX_O2HI] + k[5165]*y_cur[IDX_HI] + - k[5397]*y_cur[IDX_OI] + k[5465]*y_cur[IDX_OHI]; - data[jistart + 14452] = 0.0 - k[500]*y_cur[IDX_HCOI] + - k[999]*y_cur[IDX_eM] + k[1457]*y_cur[IDX_C2I] + - k[1744]*y_cur[IDX_C2HI] + k[2002]*y_cur[IDX_CH2I] + - k[2246]*y_cur[IDX_CHI] + k[2487]*y_cur[IDX_CH3OHI] + - k[2488]*y_cur[IDX_H2COI] + k[2490]*y_cur[IDX_SI] + - k[2542]*y_cur[IDX_H2OI] + k[2874]*y_cur[IDX_HCNI] - - k[3007]*y_cur[IDX_HCOI] + k[3038]*y_cur[IDX_HNCI] + - k[3535]*y_cur[IDX_NH2I] + k[3574]*y_cur[IDX_NH3I] + - k[6401]*y_cur[IDX_GRAINM]; - data[jistart + 14453] = 0.0 + k[2542]*y_cur[IDX_H2COII]; - data[jistart + 14454] = 0.0 - k[470]*y_cur[IDX_HCOI] - - k[2513]*y_cur[IDX_HCOI] - k[2514]*y_cur[IDX_HCOI]; - data[jistart + 14455] = 0.0 - k[501]*y_cur[IDX_HCOI]; - data[jistart + 14456] = 0.0 - k[2697]*y_cur[IDX_HCOI]; - data[jistart + 14457] = 0.0 + k[1038]*y_cur[IDX_eM] + - k[6418]*y_cur[IDX_GRAINM]; - data[jistart + 14458] = 0.0 + k[1053]*y_cur[IDX_eM] + - k[6725]*y_cur[IDX_GRAINM]; - data[jistart + 14459] = 0.0 + k[2874]*y_cur[IDX_H2COII]; - data[jistart + 14460] = 0.0 - k[2857]*y_cur[IDX_HCOI] - - k[2858]*y_cur[IDX_HCOI]; - data[jistart + 14461] = 0.0 - k[76]*y_cur[IDX_HM] - - k[178]*y_cur[IDX_CII] - k[205]*y_cur[IDX_C2II] - - k[225]*y_cur[IDX_C2H2II] - k[251]*y_cur[IDX_CHII] - - k[272]*y_cur[IDX_CH3II] - k[302]*y_cur[IDX_CNII] - - k[310]*y_cur[IDX_COII] - k[389]*y_cur[IDX_HII] - - k[450]*y_cur[IDX_H2II] - k[470]*y_cur[IDX_H2OII] - - k[500]*y_cur[IDX_H2COII] - k[501]*y_cur[IDX_H2SII] - - k[502]*y_cur[IDX_O2II] - k[503]*y_cur[IDX_SII] - - k[504]*y_cur[IDX_SiOII] - k[555]*y_cur[IDX_NII] - - k[568]*y_cur[IDX_N2II] - k[581]*y_cur[IDX_NH2II] - - k[593]*y_cur[IDX_NH3II] - k[658]*y_cur[IDX_OII] - - k[691]*y_cur[IDX_OHII] - k[1408]*y_cur[IDX_CII] - - k[1454]*y_cur[IDX_C2II] - k[1477]*y_cur[IDX_C2HII] - - k[1524]*y_cur[IDX_C2H2II] - k[1959]*y_cur[IDX_CHII] - - k[1987]*y_cur[IDX_CH2II] - k[2082]*y_cur[IDX_CH3II] - - k[2230]*y_cur[IDX_CH5II] - k[2273]*y_cur[IDX_CNII] - - k[2344]*y_cur[IDX_HII] - k[2345]*y_cur[IDX_HII] - - k[2389]*y_cur[IDX_H2II] - k[2513]*y_cur[IDX_H2OII] - - k[2514]*y_cur[IDX_H2OII] - k[2697]*y_cur[IDX_H3II] - - k[2857]*y_cur[IDX_HCNII] - k[2858]*y_cur[IDX_HCNII] - - k[2969]*y_cur[IDX_HCOII] - k[3007]*y_cur[IDX_H2COII] - - k[3008]*y_cur[IDX_HNOII] - k[3009]*y_cur[IDX_N2HII] - - k[3010]*y_cur[IDX_O2II] - k[3011]*y_cur[IDX_O2HII] - - k[3012]*y_cur[IDX_SII] - k[3249]*y_cur[IDX_HeII] - - k[3250]*y_cur[IDX_HeII] - k[3251]*y_cur[IDX_HeII] - - k[3350]*y_cur[IDX_NII] - k[3364]*y_cur[IDX_N2II] - - k[3494]*y_cur[IDX_NHII] - k[3520]*y_cur[IDX_NH2II] - - k[3552]*y_cur[IDX_NH3II] - k[3646]*y_cur[IDX_OII] - - k[3782]*y_cur[IDX_OHII] - k[3783]*y_cur[IDX_OHII] - - k[4962]*y_cur[IDX_CI] - k[4963]*y_cur[IDX_CI] - - k[4999]*y_cur[IDX_CH2I] - k[5033]*y_cur[IDX_CH3I] - - k[5077]*y_cur[IDX_CHI] - k[5117]*y_cur[IDX_CNI] - - k[5171]*y_cur[IDX_HI] - k[5172]*y_cur[IDX_HI] - - k[5204]*y_cur[IDX_HCOI] - k[5204]*y_cur[IDX_HCOI] - - k[5204]*y_cur[IDX_HCOI] - k[5204]*y_cur[IDX_HCOI] - - k[5205]*y_cur[IDX_HCOI] - k[5205]*y_cur[IDX_HCOI] - - k[5205]*y_cur[IDX_HCOI] - k[5205]*y_cur[IDX_HCOI] - - k[5206]*y_cur[IDX_HNOI] - k[5207]*y_cur[IDX_NOI] - - k[5208]*y_cur[IDX_O2I] - k[5209]*y_cur[IDX_O2I] - - k[5210]*y_cur[IDX_O2HI] - k[5265]*y_cur[IDX_NI] - - k[5266]*y_cur[IDX_NI] - k[5267]*y_cur[IDX_NI] - - k[5405]*y_cur[IDX_OI] - k[5406]*y_cur[IDX_OI] - - k[5471]*y_cur[IDX_OHI] - k[5486]*y_cur[IDX_SI] - - k[5487]*y_cur[IDX_SI] - k[5856] - k[5857] - k[6184] - k[6185] - - k[6919]; - data[jistart + 14462] = 0.0 + k[499]*y_cur[IDX_FeI] + - k[533]*y_cur[IDX_MgI] + k[637]*y_cur[IDX_NaI] - - k[2969]*y_cur[IDX_HCOI] + k[3905]*y_cur[IDX_CM] + - k[3940]*y_cur[IDX_C10M] + k[3975]*y_cur[IDX_C10HM] + - k[4010]*y_cur[IDX_C2M] + k[4045]*y_cur[IDX_C2HM] + - k[4080]*y_cur[IDX_C3M] + k[4115]*y_cur[IDX_C3HM] + - k[4150]*y_cur[IDX_C3NM] + k[4185]*y_cur[IDX_C4M] + - k[4220]*y_cur[IDX_C4HM] + k[4255]*y_cur[IDX_C5M] + - k[4290]*y_cur[IDX_C5HM] + k[4325]*y_cur[IDX_C5NM] + - k[4360]*y_cur[IDX_C6M] + k[4395]*y_cur[IDX_C6HM] + - k[4430]*y_cur[IDX_C7M] + k[4465]*y_cur[IDX_C7HM] + - k[4500]*y_cur[IDX_C8M] + k[4535]*y_cur[IDX_C8HM] + - k[4570]*y_cur[IDX_C9M] + k[4605]*y_cur[IDX_C9HM] + - k[4640]*y_cur[IDX_CHM] + k[4675]*y_cur[IDX_CNM] + - k[4711]*y_cur[IDX_HM] + k[4746]*y_cur[IDX_OM] + - k[4781]*y_cur[IDX_O2M] + k[4816]*y_cur[IDX_OHM] + - k[4851]*y_cur[IDX_SM]; - data[jistart + 14463] = 0.0 + k[5860] + k[6187]; - data[jistart + 14464] = 0.0 + k[1102]*y_cur[IDX_eM] + - k[6575]*y_cur[IDX_GRAINM]; - data[jistart + 14465] = 0.0 + k[1103]*y_cur[IDX_eM] + - k[6610]*y_cur[IDX_GRAINM]; - data[jistart + 14466] = 0.0 + k[3038]*y_cur[IDX_H2COII]; - data[jistart + 14467] = 0.0 + k[1120]*y_cur[IDX_eM] + - k[6551]*y_cur[IDX_GRAINM]; - data[jistart + 14468] = 0.0 - k[5206]*y_cur[IDX_HCOI]; - data[jistart + 14469] = 0.0 - k[3008]*y_cur[IDX_HCOI]; - data[jistart + 14470] = 0.0 + k[3191]*y_cur[IDX_CH3CHOI] - + k[3247]*y_cur[IDX_HCNI] - k[3248]*y_cur[IDX_HCNI] - k[3249]*y_cur[IDX_HCOI] - k[3250]*y_cur[IDX_HCOI] - - k[3251]*y_cur[IDX_HCOI] + k[5665]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 14471] = 0.0 + k[533]*y_cur[IDX_HCOII]; - data[jistart + 14472] = 0.0 - k[5265]*y_cur[IDX_HCOI] - - k[5266]*y_cur[IDX_HCOI] - k[5267]*y_cur[IDX_HCOI]; - data[jistart + 14473] = 0.0 - k[555]*y_cur[IDX_HCOI] - - k[3350]*y_cur[IDX_HCOI]; - data[jistart + 14474] = 0.0 - k[568]*y_cur[IDX_HCOI] - - k[3364]*y_cur[IDX_HCOI]; - data[jistart + 14475] = 0.0 - k[3009]*y_cur[IDX_HCOI]; - data[jistart + 14476] = 0.0 + k[3484]*y_cur[IDX_CO2I] - - k[3494]*y_cur[IDX_HCOI]; - data[jistart + 14477] = 0.0 + k[3535]*y_cur[IDX_H2COII]; - data[jistart + 14478] = 0.0 - k[581]*y_cur[IDX_HCOI] + - k[3511]*y_cur[IDX_H2COI] - k[3520]*y_cur[IDX_HCOI]; - data[jistart + 14479] = 0.0 + k[3574]*y_cur[IDX_H2COII]; - data[jistart + 14480] = 0.0 - k[593]*y_cur[IDX_HCOI] + - k[3549]*y_cur[IDX_H2COI] - k[3552]*y_cur[IDX_HCOI]; - data[jistart + 14481] = 0.0 + k[5084]*y_cur[IDX_CHI] - - k[5207]*y_cur[IDX_HCOI]; - data[jistart + 14482] = 0.0 + k[637]*y_cur[IDX_HCOII]; - data[jistart + 14483] = 0.0 + k[3691]*y_cur[IDX_C2H4II] + - k[5014]*y_cur[IDX_CH2I] + k[5349]*y_cur[IDX_C2H4I] + - k[5383]*y_cur[IDX_CH2CCH2I] + k[5397]*y_cur[IDX_H2COI] - - k[5405]*y_cur[IDX_HCOI] - k[5406]*y_cur[IDX_HCOI]; - data[jistart + 14484] = 0.0 - k[658]*y_cur[IDX_HCOI] - - k[3646]*y_cur[IDX_HCOI]; - data[jistart + 14485] = 0.0 + k[62]*y_cur[IDX_CHI] + - k[4746]*y_cur[IDX_HCOII]; - data[jistart + 14486] = 0.0 + k[1968]*y_cur[IDX_CHII] + - k[4881]*y_cur[IDX_C2H3I] + k[4904]*y_cur[IDX_C2HI] + - k[5011]*y_cur[IDX_CH2I] + k[5040]*y_cur[IDX_CH3I] + - k[5092]*y_cur[IDX_CHI] + k[5093]*y_cur[IDX_CHI] - - k[5208]*y_cur[IDX_HCOI] - k[5209]*y_cur[IDX_HCOI]; - data[jistart + 14487] = 0.0 - k[502]*y_cur[IDX_HCOI] - - k[3010]*y_cur[IDX_HCOI]; - data[jistart + 14488] = 0.0 + k[4781]*y_cur[IDX_HCOII]; - data[jistart + 14489] = 0.0 + k[5094]*y_cur[IDX_CHI] + - k[5150]*y_cur[IDX_H2COI] - k[5210]*y_cur[IDX_HCOI]; - data[jistart + 14490] = 0.0 - k[3011]*y_cur[IDX_HCOI]; - data[jistart + 14491] = 0.0 + k[1993]*y_cur[IDX_CH2II]; - data[jistart + 14492] = 0.0 + k[9]*y_cur[IDX_CM] + - k[5099]*y_cur[IDX_CHI] + k[5465]*y_cur[IDX_H2COI] - - k[5471]*y_cur[IDX_HCOI]; - data[jistart + 14493] = 0.0 - k[691]*y_cur[IDX_HCOI] - - k[3782]*y_cur[IDX_HCOI] - k[3783]*y_cur[IDX_HCOI]; - data[jistart + 14494] = 0.0 + k[57]*y_cur[IDX_CI] + - k[4816]*y_cur[IDX_HCOII]; - data[jistart + 14495] = 0.0 + k[2490]*y_cur[IDX_H2COII] - - k[5486]*y_cur[IDX_HCOI] - k[5487]*y_cur[IDX_HCOI]; - data[jistart + 14496] = 0.0 - k[503]*y_cur[IDX_HCOI] - - k[3012]*y_cur[IDX_HCOI]; - data[jistart + 14497] = 0.0 + k[4851]*y_cur[IDX_HCOII]; - data[jistart + 14498] = 0.0 + k[3846]*y_cur[IDX_C2H2I] + - k[3850]*y_cur[IDX_C2H4I] + k[3853]*y_cur[IDX_CH2CCH2I]; - data[jistart + 14499] = 0.0 - k[504]*y_cur[IDX_HCOI]; - data[jistart + 14500] = 0.0 + k[938]*y_cur[IDX_CH3CHOII] + - k[940]*y_cur[IDX_CH3CHOHII] + k[999]*y_cur[IDX_H2COII] + - k[1038]*y_cur[IDX_H3COII] + k[1053]*y_cur[IDX_H5C2O2II] + - k[1102]*y_cur[IDX_HCOOHII] + k[1103]*y_cur[IDX_HCOOH2II] + - k[1120]*y_cur[IDX_HNCOHII] + k[1275]*y_cur[IDX_CH2OHCHOII] + - k[1277]*y_cur[IDX_CH2OHCHOII] + k[1278]*y_cur[IDX_CH2OHCHOII] + - k[1280]*y_cur[IDX_CH2OHCH2OII]; - data[jistart + 14501] = 0.0 + k[1901]*y_cur[IDX_H3OII] - - k[1904]*y_cur[IDX_HCOII]; - data[jistart + 14502] = 0.0 + k[178]*y_cur[IDX_HCOI] + - k[1391]*y_cur[IDX_H2COI] + k[1393]*y_cur[IDX_H2OI]; - data[jistart + 14503] = 0.0 - k[3904]*y_cur[IDX_HCOII] - - k[3905]*y_cur[IDX_HCOII]; - data[jistart + 14504] = 0.0 - k[2899]*y_cur[IDX_HCOII]; - data[jistart + 14505] = 0.0 - k[3939]*y_cur[IDX_HCOII] - - k[3940]*y_cur[IDX_HCOII]; - data[jistart + 14506] = 0.0 - k[2901]*y_cur[IDX_HCOII]; - data[jistart + 14507] = 0.0 + k[3679]*y_cur[IDX_OI]; - data[jistart + 14508] = 0.0 - k[3974]*y_cur[IDX_HCOII] - - k[3975]*y_cur[IDX_HCOII]; - data[jistart + 14509] = 0.0 - k[2900]*y_cur[IDX_HCOII]; - data[jistart + 14510] = 0.0 + k[3682]*y_cur[IDX_OI]; - data[jistart + 14511] = 0.0 + k[3683]*y_cur[IDX_OI]; - data[jistart + 14512] = 0.0 - k[1459]*y_cur[IDX_HCOII]; - data[jistart + 14513] = 0.0 + k[205]*y_cur[IDX_HCOI]; - data[jistart + 14514] = 0.0 - k[4009]*y_cur[IDX_HCOII] - - k[4010]*y_cur[IDX_HCOII]; - data[jistart + 14515] = 0.0 + k[1743]*y_cur[IDX_COII] - - k[1746]*y_cur[IDX_HCOII]; - data[jistart + 14516] = 0.0 + k[3686]*y_cur[IDX_OI]; - data[jistart + 14517] = 0.0 - k[4044]*y_cur[IDX_HCOII] - - k[4045]*y_cur[IDX_HCOII]; - data[jistart + 14518] = 0.0 - k[1566]*y_cur[IDX_HCOII] + - k[3655]*y_cur[IDX_O2II] + k[3845]*y_cur[IDX_SOII]; - data[jistart + 14519] = 0.0 + k[225]*y_cur[IDX_HCOI] + - k[3689]*y_cur[IDX_OI]; - data[jistart + 14520] = 0.0 - k[1644]*y_cur[IDX_HCOII]; - data[jistart + 14521] = 0.0 - k[1708]*y_cur[IDX_HCOII]; - data[jistart + 14522] = 0.0 + k[3692]*y_cur[IDX_OI]; - data[jistart + 14523] = 0.0 - k[2902]*y_cur[IDX_HCOII]; - data[jistart + 14524] = 0.0 - k[2903]*y_cur[IDX_HCOII]; - data[jistart + 14525] = 0.0 - k[2949]*y_cur[IDX_HCOII]; - data[jistart + 14526] = 0.0 + k[2526]*y_cur[IDX_H2OI]; - data[jistart + 14527] = 0.0 - k[2904]*y_cur[IDX_HCOII]; - data[jistart + 14528] = 0.0 - k[2905]*y_cur[IDX_HCOII]; - data[jistart + 14529] = 0.0 - k[2906]*y_cur[IDX_HCOII]; - data[jistart + 14530] = 0.0 - k[4079]*y_cur[IDX_HCOII] - - k[4080]*y_cur[IDX_HCOII]; - data[jistart + 14531] = 0.0 - k[2908]*y_cur[IDX_HCOII]; - data[jistart + 14532] = 0.0 + k[2530]*y_cur[IDX_H2OI] + - k[3669]*y_cur[IDX_O2I]; - data[jistart + 14533] = 0.0 - k[4114]*y_cur[IDX_HCOII] - - k[4115]*y_cur[IDX_HCOII]; - data[jistart + 14534] = 0.0 - k[2907]*y_cur[IDX_HCOII]; - data[jistart + 14535] = 0.0 + k[3695]*y_cur[IDX_OI]; - data[jistart + 14536] = 0.0 + k[3696]*y_cur[IDX_OI]; - data[jistart + 14537] = 0.0 + k[3697]*y_cur[IDX_OI]; - data[jistart + 14538] = 0.0 - k[2909]*y_cur[IDX_HCOII]; - data[jistart + 14539] = 0.0 - k[4149]*y_cur[IDX_HCOII] - - k[4150]*y_cur[IDX_HCOII]; - data[jistart + 14540] = 0.0 - k[2910]*y_cur[IDX_HCOII]; - data[jistart + 14541] = 0.0 - k[2911]*y_cur[IDX_HCOII]; - data[jistart + 14542] = 0.0 - k[2912]*y_cur[IDX_HCOII]; - data[jistart + 14543] = 0.0 - k[2913]*y_cur[IDX_HCOII]; - data[jistart + 14544] = 0.0 - k[4184]*y_cur[IDX_HCOII] - - k[4185]*y_cur[IDX_HCOII]; - data[jistart + 14545] = 0.0 - k[2915]*y_cur[IDX_HCOII]; - data[jistart + 14546] = 0.0 + k[3699]*y_cur[IDX_OI]; - data[jistart + 14547] = 0.0 - k[4219]*y_cur[IDX_HCOII] - - k[4220]*y_cur[IDX_HCOII]; - data[jistart + 14548] = 0.0 - k[2965]*y_cur[IDX_HCOII]; - data[jistart + 14549] = 0.0 - k[2914]*y_cur[IDX_HCOII]; - data[jistart + 14550] = 0.0 + k[2532]*y_cur[IDX_H2OI]; - data[jistart + 14551] = 0.0 - k[2916]*y_cur[IDX_HCOII]; - data[jistart + 14552] = 0.0 - k[2917]*y_cur[IDX_HCOII]; - data[jistart + 14553] = 0.0 - k[2918]*y_cur[IDX_HCOII]; - data[jistart + 14554] = 0.0 - k[4254]*y_cur[IDX_HCOII] - - k[4255]*y_cur[IDX_HCOII]; - data[jistart + 14555] = 0.0 - k[2920]*y_cur[IDX_HCOII]; - data[jistart + 14556] = 0.0 + k[3704]*y_cur[IDX_OI]; - data[jistart + 14557] = 0.0 - k[4289]*y_cur[IDX_HCOII] - - k[4290]*y_cur[IDX_HCOII]; - data[jistart + 14558] = 0.0 - k[2919]*y_cur[IDX_HCOII]; - data[jistart + 14559] = 0.0 + k[3706]*y_cur[IDX_OI]; - data[jistart + 14560] = 0.0 + k[3707]*y_cur[IDX_OI]; - data[jistart + 14561] = 0.0 - k[2921]*y_cur[IDX_HCOII]; - data[jistart + 14562] = 0.0 - k[4324]*y_cur[IDX_HCOII] - - k[4325]*y_cur[IDX_HCOII]; - data[jistart + 14563] = 0.0 - k[2922]*y_cur[IDX_HCOII]; - data[jistart + 14564] = 0.0 - k[4359]*y_cur[IDX_HCOII] - - k[4360]*y_cur[IDX_HCOII]; - data[jistart + 14565] = 0.0 - k[2925]*y_cur[IDX_HCOII]; - data[jistart + 14566] = 0.0 - k[4394]*y_cur[IDX_HCOII] - - k[4395]*y_cur[IDX_HCOII]; - data[jistart + 14567] = 0.0 - k[2923]*y_cur[IDX_HCOII]; - data[jistart + 14568] = 0.0 + k[3710]*y_cur[IDX_OI]; - data[jistart + 14569] = 0.0 + k[3711]*y_cur[IDX_OI]; - data[jistart + 14570] = 0.0 - k[2924]*y_cur[IDX_HCOII]; - data[jistart + 14571] = 0.0 - k[2926]*y_cur[IDX_HCOII]; - data[jistart + 14572] = 0.0 - k[4429]*y_cur[IDX_HCOII] - - k[4430]*y_cur[IDX_HCOII]; - data[jistart + 14573] = 0.0 - k[2928]*y_cur[IDX_HCOII]; - data[jistart + 14574] = 0.0 + k[3713]*y_cur[IDX_OI]; - data[jistart + 14575] = 0.0 - k[4464]*y_cur[IDX_HCOII] - - k[4465]*y_cur[IDX_HCOII]; - data[jistart + 14576] = 0.0 - k[2927]*y_cur[IDX_HCOII]; - data[jistart + 14577] = 0.0 + k[3715]*y_cur[IDX_OI]; - data[jistart + 14578] = 0.0 + k[3716]*y_cur[IDX_OI]; - data[jistart + 14579] = 0.0 - k[2929]*y_cur[IDX_HCOII]; - data[jistart + 14580] = 0.0 - k[2930]*y_cur[IDX_HCOII]; - data[jistart + 14581] = 0.0 - k[4499]*y_cur[IDX_HCOII] - - k[4500]*y_cur[IDX_HCOII]; - data[jistart + 14582] = 0.0 - k[2932]*y_cur[IDX_HCOII]; - data[jistart + 14583] = 0.0 - k[4534]*y_cur[IDX_HCOII] - - k[4535]*y_cur[IDX_HCOII]; - data[jistart + 14584] = 0.0 - k[2931]*y_cur[IDX_HCOII]; - data[jistart + 14585] = 0.0 + k[3719]*y_cur[IDX_OI]; - data[jistart + 14586] = 0.0 + k[3720]*y_cur[IDX_OI]; - data[jistart + 14587] = 0.0 - k[2933]*y_cur[IDX_HCOII]; - data[jistart + 14588] = 0.0 - k[4569]*y_cur[IDX_HCOII] - - k[4570]*y_cur[IDX_HCOII]; - data[jistart + 14589] = 0.0 - k[2935]*y_cur[IDX_HCOII]; - data[jistart + 14590] = 0.0 + k[3722]*y_cur[IDX_OI]; - data[jistart + 14591] = 0.0 - k[4604]*y_cur[IDX_HCOII] - - k[4605]*y_cur[IDX_HCOII]; - data[jistart + 14592] = 0.0 - k[2934]*y_cur[IDX_HCOII]; - data[jistart + 14593] = 0.0 + k[3724]*y_cur[IDX_OI]; - data[jistart + 14594] = 0.0 + k[3725]*y_cur[IDX_OI]; - data[jistart + 14595] = 0.0 - k[2936]*y_cur[IDX_HCOII]; - data[jistart + 14596] = 0.0 - k[2937]*y_cur[IDX_HCOII]; - data[jistart + 14597] = 0.0 + k[63]*y_cur[IDX_OI] + - k[2245]*y_cur[IDX_COII] - k[2253]*y_cur[IDX_HCOII] + - k[2262]*y_cur[IDX_O2II] + k[2268]*y_cur[IDX_SiOII]; - data[jistart + 14598] = 0.0 + k[251]*y_cur[IDX_HCOI] + - k[1946]*y_cur[IDX_CO2I] + k[1950]*y_cur[IDX_H2COI] + - k[1953]*y_cur[IDX_H2OI] + k[1967]*y_cur[IDX_O2I]; - data[jistart + 14599] = 0.0 - k[4639]*y_cur[IDX_HCOII] - - k[4640]*y_cur[IDX_HCOII]; - data[jistart + 14600] = 0.0 + k[2001]*y_cur[IDX_COII] - - k[2008]*y_cur[IDX_HCOII]; - data[jistart + 14601] = 0.0 + k[1981]*y_cur[IDX_H2COI] + - k[1990]*y_cur[IDX_O2I] + k[1991]*y_cur[IDX_OI]; - data[jistart + 14602] = 0.0 - k[2938]*y_cur[IDX_HCOII]; - data[jistart + 14603] = 0.0 + k[3726]*y_cur[IDX_OI]; - data[jistart + 14604] = 0.0 - k[2939]*y_cur[IDX_HCOII]; - data[jistart + 14605] = 0.0 - k[2940]*y_cur[IDX_HCOII]; - data[jistart + 14606] = 0.0 - k[2941]*y_cur[IDX_HCOII]; - data[jistart + 14607] = 0.0 - k[5636]*y_cur[IDX_HCOII]; - data[jistart + 14608] = 0.0 - k[5664]*y_cur[IDX_HCOII] + - k[5666]*y_cur[IDX_HeII]; - data[jistart + 14609] = 0.0 - k[5658]*y_cur[IDX_HCOII]; - data[jistart + 14610] = 0.0 - k[2942]*y_cur[IDX_HCOII]; - data[jistart + 14611] = 0.0 + k[272]*y_cur[IDX_HCOI] + - k[2077]*y_cur[IDX_H2COI] + k[2085]*y_cur[IDX_N2OI] + - k[2091]*y_cur[IDX_OI]; - data[jistart + 14612] = 0.0 - k[2943]*y_cur[IDX_HCOII]; - data[jistart + 14613] = 0.0 - k[2944]*y_cur[IDX_HCOII]; - data[jistart + 14614] = 0.0 - k[2945]*y_cur[IDX_HCOII]; - data[jistart + 14615] = 0.0 - k[2946]*y_cur[IDX_HCOII]; - data[jistart + 14616] = 0.0 - k[2947]*y_cur[IDX_HCOII]; - data[jistart + 14617] = 0.0 - k[2948]*y_cur[IDX_HCOII]; - data[jistart + 14618] = 0.0 - k[2950]*y_cur[IDX_HCOII]; - data[jistart + 14619] = 0.0 - k[2951]*y_cur[IDX_HCOII]; - data[jistart + 14620] = 0.0 + k[2283]*y_cur[IDX_COI]; - data[jistart + 14621] = 0.0 - k[5641]*y_cur[IDX_HCOII]; - data[jistart + 14622] = 0.0 - k[2952]*y_cur[IDX_HCOII]; - data[jistart + 14623] = 0.0 - k[5670]*y_cur[IDX_HCOII]; - data[jistart + 14624] = 0.0 - k[5630]*y_cur[IDX_HCOII]; - data[jistart + 14625] = 0.0 - k[2953]*y_cur[IDX_HCOII]; - data[jistart + 14626] = 0.0 + k[2332]*y_cur[IDX_HII] - - k[2954]*y_cur[IDX_HCOII]; - data[jistart + 14627] = 0.0 + k[2190]*y_cur[IDX_COII] - - k[5543]*y_cur[IDX_HCOII]; - data[jistart + 14628] = 0.0 + k[2140]*y_cur[IDX_COI]; - data[jistart + 14629] = 0.0 + k[2224]*y_cur[IDX_COI]; - data[jistart + 14630] = 0.0 + k[302]*y_cur[IDX_HCOI] + - k[2271]*y_cur[IDX_H2COI] + k[2537]*y_cur[IDX_H2OI]; - data[jistart + 14631] = 0.0 - k[4674]*y_cur[IDX_HCOII] - - k[4675]*y_cur[IDX_HCOII]; - data[jistart + 14632] = 0.0 + k[2539]*y_cur[IDX_H2OI]; - data[jistart + 14633] = 0.0 + k[2140]*y_cur[IDX_CH4II] + - k[2224]*y_cur[IDX_CH5II] + k[2283]*y_cur[IDX_CH3CNII] + - k[2284]*y_cur[IDX_H2ClII] + k[2285]*y_cur[IDX_HCO2II] + - k[2286]*y_cur[IDX_HNOII] + k[2287]*y_cur[IDX_HNSiII] + - k[2288]*y_cur[IDX_N2HII] + k[2289]*y_cur[IDX_O2HII] + - k[2291]*y_cur[IDX_SiH4II] + k[2383]*y_cur[IDX_H2II] + - k[2507]*y_cur[IDX_H2OII] + k[2675]*y_cur[IDX_H3II] + - k[2854]*y_cur[IDX_HCNII] + k[3485]*y_cur[IDX_NHII] + - k[3777]*y_cur[IDX_OHII]; - data[jistart + 14634] = 0.0 + k[310]*y_cur[IDX_HCOI] + - k[1743]*y_cur[IDX_C2HI] + k[2001]*y_cur[IDX_CH2I] + - k[2190]*y_cur[IDX_CH4I] + k[2245]*y_cur[IDX_CHI] + - k[2280]*y_cur[IDX_H2COI] + k[2281]*y_cur[IDX_H2SI] + - k[2434]*y_cur[IDX_H2I] + k[2540]*y_cur[IDX_H2OI] + - k[3534]*y_cur[IDX_NH2I] + k[3573]*y_cur[IDX_NH3I] + - k[3610]*y_cur[IDX_NHI] + k[3798]*y_cur[IDX_OHI]; - data[jistart + 14635] = 0.0 + k[1946]*y_cur[IDX_CHII] + - k[2334]*y_cur[IDX_HII]; - data[jistart + 14636] = 0.0 + k[2841]*y_cur[IDX_HI]; - data[jistart + 14637] = 0.0 - k[5652]*y_cur[IDX_HCOII]; - data[jistart + 14638] = 0.0 - k[5646]*y_cur[IDX_HCOII]; - data[jistart + 14639] = 0.0 - k[2955]*y_cur[IDX_HCOII]; - data[jistart + 14640] = 0.0 - k[2956]*y_cur[IDX_HCOII]; - data[jistart + 14641] = 0.0 - k[499]*y_cur[IDX_HCOII]; - data[jistart + 14642] = 0.0 - k[6389]*y_cur[IDX_HCOII]; - data[jistart + 14643] = 0.0 + k[2841]*y_cur[IDX_CO2II]; - data[jistart + 14644] = 0.0 + k[389]*y_cur[IDX_HCOI] + - k[2332]*y_cur[IDX_CH3OHI] + k[2334]*y_cur[IDX_CO2I] + - k[2338]*y_cur[IDX_H2COI]; - data[jistart + 14645] = 0.0 - k[4710]*y_cur[IDX_HCOII] - - k[4711]*y_cur[IDX_HCOII]; - data[jistart + 14646] = 0.0 + k[137]*y_cur[IDX_HOCII] + - k[2434]*y_cur[IDX_COII]; - data[jistart + 14647] = 0.0 + k[450]*y_cur[IDX_HCOI] + - k[2383]*y_cur[IDX_COI] + k[2385]*y_cur[IDX_H2COI]; - data[jistart + 14648] = 0.0 - k[2957]*y_cur[IDX_HCOII]; - data[jistart + 14649] = 0.0 + k[1391]*y_cur[IDX_CII] + - k[1950]*y_cur[IDX_CHII] + k[1981]*y_cur[IDX_CH2II] + - k[2077]*y_cur[IDX_CH3II] + k[2271]*y_cur[IDX_CNII] + - k[2280]*y_cur[IDX_COII] + k[2338]*y_cur[IDX_HII] + - k[2385]*y_cur[IDX_H2II] + k[2498]*y_cur[IDX_O2II] + - k[2501]*y_cur[IDX_SII] - k[2958]*y_cur[IDX_HCOII] + - k[3220]*y_cur[IDX_HeII] + k[3345]*y_cur[IDX_NII] + - k[3361]*y_cur[IDX_N2II] + k[3488]*y_cur[IDX_NHII] + - k[3641]*y_cur[IDX_OII] + k[6155]; - data[jistart + 14650] = 0.0 + k[500]*y_cur[IDX_HCOI] + - k[2489]*y_cur[IDX_O2I]; - data[jistart + 14651] = 0.0 - k[2959]*y_cur[IDX_HCOII]; - data[jistart + 14652] = 0.0 + k[2284]*y_cur[IDX_COI]; - data[jistart + 14653] = 0.0 + k[1393]*y_cur[IDX_CII] + - k[1953]*y_cur[IDX_CHII] + k[2526]*y_cur[IDX_C2NII] + - k[2530]*y_cur[IDX_C3HII] + k[2532]*y_cur[IDX_C4NII] + - k[2537]*y_cur[IDX_CNII] + k[2539]*y_cur[IDX_CNCII] + - k[2540]*y_cur[IDX_COII] - k[2547]*y_cur[IDX_HCOII] - - k[5566]*y_cur[IDX_HCOII]; - data[jistart + 14654] = 0.0 + k[470]*y_cur[IDX_HCOI] + - k[2507]*y_cur[IDX_COI]; - data[jistart + 14655] = 0.0 + k[2281]*y_cur[IDX_COII] - - k[2961]*y_cur[IDX_HCOII]; - data[jistart + 14656] = 0.0 + k[501]*y_cur[IDX_HCOI]; - data[jistart + 14657] = 0.0 - k[2960]*y_cur[IDX_HCOII]; - data[jistart + 14658] = 0.0 - k[2962]*y_cur[IDX_HCOII]; - data[jistart + 14659] = 0.0 + k[2675]*y_cur[IDX_COI] + - k[2700]*y_cur[IDX_HCOOHI]; - data[jistart + 14660] = 0.0 + k[1901]*y_cur[IDX_CI]; - data[jistart + 14661] = 0.0 - k[2963]*y_cur[IDX_HCOII]; - data[jistart + 14662] = 0.0 - k[2964]*y_cur[IDX_HCOII]; - data[jistart + 14663] = 0.0 - k[2966]*y_cur[IDX_HCOII]; - data[jistart + 14664] = 0.0 - k[2967]*y_cur[IDX_HCOII]; - data[jistart + 14665] = 0.0 - k[2968]*y_cur[IDX_HCOII]; - data[jistart + 14666] = 0.0 - k[2877]*y_cur[IDX_HCOII] + - k[3644]*y_cur[IDX_OII]; - data[jistart + 14667] = 0.0 + k[2854]*y_cur[IDX_COI]; - data[jistart + 14668] = 0.0 + k[178]*y_cur[IDX_CII] + - k[205]*y_cur[IDX_C2II] + k[225]*y_cur[IDX_C2H2II] + - k[251]*y_cur[IDX_CHII] + k[272]*y_cur[IDX_CH3II] + - k[302]*y_cur[IDX_CNII] + k[310]*y_cur[IDX_COII] + - k[389]*y_cur[IDX_HII] + k[450]*y_cur[IDX_H2II] + - k[470]*y_cur[IDX_H2OII] + k[500]*y_cur[IDX_H2COII] + - k[501]*y_cur[IDX_H2SII] + k[502]*y_cur[IDX_O2II] + - k[503]*y_cur[IDX_SII] + k[504]*y_cur[IDX_SiOII] + - k[555]*y_cur[IDX_NII] + k[568]*y_cur[IDX_N2II] + - k[581]*y_cur[IDX_NH2II] + k[593]*y_cur[IDX_NH3II] + - k[658]*y_cur[IDX_OII] + k[691]*y_cur[IDX_OHII] - - k[2969]*y_cur[IDX_HCOII] + k[5857] + k[6185]; - data[jistart + 14669] = 0.0 - k[499]*y_cur[IDX_FeI] - - k[533]*y_cur[IDX_MgI] - k[637]*y_cur[IDX_NaI] - - k[1097]*y_cur[IDX_eM] - k[1459]*y_cur[IDX_C2I] - - k[1566]*y_cur[IDX_C2H2I] - k[1644]*y_cur[IDX_C2H3I] - - k[1708]*y_cur[IDX_C2H4I] - k[1746]*y_cur[IDX_C2HI] - - k[1904]*y_cur[IDX_CI] - k[2008]*y_cur[IDX_CH2I] - - k[2253]*y_cur[IDX_CHI] - k[2547]*y_cur[IDX_H2OI] - - k[2877]*y_cur[IDX_HCNI] - k[2899]*y_cur[IDX_C10I] - - k[2900]*y_cur[IDX_C10H2I] - k[2901]*y_cur[IDX_C10HI] - - k[2902]*y_cur[IDX_C2H5I] - k[2903]*y_cur[IDX_C2H5OHI] - - k[2904]*y_cur[IDX_C2OI] - k[2905]*y_cur[IDX_C2SI] - - k[2906]*y_cur[IDX_C3I] - k[2907]*y_cur[IDX_C3H2I] - - k[2908]*y_cur[IDX_C3HI] - k[2909]*y_cur[IDX_C3NI] - - k[2910]*y_cur[IDX_C3OI] - k[2911]*y_cur[IDX_C3PI] - - k[2912]*y_cur[IDX_C3SI] - k[2913]*y_cur[IDX_C4I] - - k[2914]*y_cur[IDX_C4H3I] - k[2915]*y_cur[IDX_C4HI] - - k[2916]*y_cur[IDX_C4PI] - k[2917]*y_cur[IDX_C4SI] - - k[2918]*y_cur[IDX_C5I] - k[2919]*y_cur[IDX_C5H2I] - - k[2920]*y_cur[IDX_C5HI] - k[2921]*y_cur[IDX_C5NI] - - k[2922]*y_cur[IDX_C6I] - k[2923]*y_cur[IDX_C6H2I] - - k[2924]*y_cur[IDX_C6H6I] - k[2925]*y_cur[IDX_C6HI] - - k[2926]*y_cur[IDX_C7I] - k[2927]*y_cur[IDX_C7H2I] - - k[2928]*y_cur[IDX_C7HI] - k[2929]*y_cur[IDX_C7NI] - - k[2930]*y_cur[IDX_C8I] - k[2931]*y_cur[IDX_C8H2I] - - k[2932]*y_cur[IDX_C8HI] - k[2933]*y_cur[IDX_C9I] - - k[2934]*y_cur[IDX_C9H2I] - k[2935]*y_cur[IDX_C9HI] - - k[2936]*y_cur[IDX_C9NI] - k[2937]*y_cur[IDX_CCPI] - - k[2938]*y_cur[IDX_CH2CCHI] - k[2939]*y_cur[IDX_CH2CHCNI] - - k[2940]*y_cur[IDX_CH2COI] - k[2941]*y_cur[IDX_CH2NHI] - - k[2942]*y_cur[IDX_CH2PHI] - k[2943]*y_cur[IDX_CH3C3NI] - - k[2944]*y_cur[IDX_CH3C4HI] - k[2945]*y_cur[IDX_CH3C5NI] - - k[2946]*y_cur[IDX_CH3C6HI] - k[2947]*y_cur[IDX_CH3C7NI] - - k[2948]*y_cur[IDX_CH3CCHI] - k[2949]*y_cur[IDX_C2H6I] - - k[2950]*y_cur[IDX_CH3CHOI] - k[2951]*y_cur[IDX_CH3CNI] - - k[2952]*y_cur[IDX_CH3COCH3I] - k[2953]*y_cur[IDX_CH3OCH3I] - - k[2954]*y_cur[IDX_CH3OHI] - k[2955]*y_cur[IDX_CPI] - - k[2956]*y_cur[IDX_CSI] - k[2957]*y_cur[IDX_H2CCCI] - - k[2958]*y_cur[IDX_H2COI] - k[2959]*y_cur[IDX_H2CSI] - - k[2960]*y_cur[IDX_H2S2I] - k[2961]*y_cur[IDX_H2SI] - - k[2962]*y_cur[IDX_H2SiOI] - k[2963]*y_cur[IDX_HC2PI] - - k[2964]*y_cur[IDX_HC3NI] - k[2965]*y_cur[IDX_C4H2I] - - k[2966]*y_cur[IDX_HC5NI] - k[2967]*y_cur[IDX_HC7NI] - - k[2968]*y_cur[IDX_HC9NI] - k[2969]*y_cur[IDX_HCOI] - - k[2970]*y_cur[IDX_HCOOCH3I] - k[2971]*y_cur[IDX_HCOOHI] - - k[2972]*y_cur[IDX_HCPI] - k[2973]*y_cur[IDX_HCSiI] - - k[2974]*y_cur[IDX_HNSiI] - k[2975]*y_cur[IDX_HPOI] - - k[2976]*y_cur[IDX_HS2I] - k[2977]*y_cur[IDX_HSI] - - k[2978]*y_cur[IDX_N2OI] - k[2979]*y_cur[IDX_NCCNI] - - k[2980]*y_cur[IDX_NH2CNI] - k[2981]*y_cur[IDX_NSI] - - k[2982]*y_cur[IDX_OCSI] - k[2983]*y_cur[IDX_PI] - - k[2984]*y_cur[IDX_PH2I] - k[2985]*y_cur[IDX_PHI] - - k[2986]*y_cur[IDX_PNI] - k[2987]*y_cur[IDX_POI] - - k[2988]*y_cur[IDX_S2I] - k[2989]*y_cur[IDX_SI] - - k[2990]*y_cur[IDX_SOI] - k[2991]*y_cur[IDX_SiC2I] - - k[2992]*y_cur[IDX_SiC2H2I] - k[2993]*y_cur[IDX_SiC2HI] - - k[2994]*y_cur[IDX_SiC3I] - k[2995]*y_cur[IDX_SiC3HI] - - k[2996]*y_cur[IDX_SiC4I] - k[2997]*y_cur[IDX_SiCI] - - k[2998]*y_cur[IDX_SiCH2I] - k[2999]*y_cur[IDX_SiCH3I] - - k[3000]*y_cur[IDX_SiH2I] - k[3001]*y_cur[IDX_SiH4I] - - k[3002]*y_cur[IDX_SiHI] - k[3003]*y_cur[IDX_SiNCI] - - k[3004]*y_cur[IDX_SiO2I] - k[3005]*y_cur[IDX_SiOI] - - k[3006]*y_cur[IDX_SiSI] - k[3029]*y_cur[IDX_HNC3I] - - k[3041]*y_cur[IDX_HNCI] - k[3542]*y_cur[IDX_NH2I] - - k[3584]*y_cur[IDX_NH3I] - k[3614]*y_cur[IDX_NHI] - - k[3801]*y_cur[IDX_OHI] - k[3802]*y_cur[IDX_OHI] - - k[3881]*y_cur[IDX_SiI] - k[3904]*y_cur[IDX_CM] - - k[3905]*y_cur[IDX_CM] - k[3939]*y_cur[IDX_C10M] - - k[3940]*y_cur[IDX_C10M] - k[3974]*y_cur[IDX_C10HM] - - k[3975]*y_cur[IDX_C10HM] - k[4009]*y_cur[IDX_C2M] - - k[4010]*y_cur[IDX_C2M] - k[4044]*y_cur[IDX_C2HM] - - k[4045]*y_cur[IDX_C2HM] - k[4079]*y_cur[IDX_C3M] - - k[4080]*y_cur[IDX_C3M] - k[4114]*y_cur[IDX_C3HM] - - k[4115]*y_cur[IDX_C3HM] - k[4149]*y_cur[IDX_C3NM] - - k[4150]*y_cur[IDX_C3NM] - k[4184]*y_cur[IDX_C4M] - - k[4185]*y_cur[IDX_C4M] - k[4219]*y_cur[IDX_C4HM] - - k[4220]*y_cur[IDX_C4HM] - k[4254]*y_cur[IDX_C5M] - - k[4255]*y_cur[IDX_C5M] - k[4289]*y_cur[IDX_C5HM] - - k[4290]*y_cur[IDX_C5HM] - k[4324]*y_cur[IDX_C5NM] - - k[4325]*y_cur[IDX_C5NM] - k[4359]*y_cur[IDX_C6M] - - k[4360]*y_cur[IDX_C6M] - k[4394]*y_cur[IDX_C6HM] - - k[4395]*y_cur[IDX_C6HM] - k[4429]*y_cur[IDX_C7M] - - k[4430]*y_cur[IDX_C7M] - k[4464]*y_cur[IDX_C7HM] - - k[4465]*y_cur[IDX_C7HM] - k[4499]*y_cur[IDX_C8M] - - k[4500]*y_cur[IDX_C8M] - k[4534]*y_cur[IDX_C8HM] - - k[4535]*y_cur[IDX_C8HM] - k[4569]*y_cur[IDX_C9M] - - k[4570]*y_cur[IDX_C9M] - k[4604]*y_cur[IDX_C9HM] - - k[4605]*y_cur[IDX_C9HM] - k[4639]*y_cur[IDX_CHM] - - k[4640]*y_cur[IDX_CHM] - k[4674]*y_cur[IDX_CNM] - - k[4675]*y_cur[IDX_CNM] - k[4710]*y_cur[IDX_HM] - - k[4711]*y_cur[IDX_HM] - k[4745]*y_cur[IDX_OM] - - k[4746]*y_cur[IDX_OM] - k[4780]*y_cur[IDX_O2M] - - k[4781]*y_cur[IDX_O2M] - k[4815]*y_cur[IDX_OHM] - - k[4816]*y_cur[IDX_OHM] - k[4850]*y_cur[IDX_SM] - - k[4851]*y_cur[IDX_SM] - k[5543]*y_cur[IDX_CH4I] - - k[5566]*y_cur[IDX_H2OI] - k[5630]*y_cur[IDX_CH3OI] - - k[5636]*y_cur[IDX_CH2OHI] - k[5641]*y_cur[IDX_CH3COI] - - k[5646]*y_cur[IDX_COOHI] - k[5652]*y_cur[IDX_COOCH3I] - - k[5658]*y_cur[IDX_CH2OHCOI] - k[5664]*y_cur[IDX_CH2OHCHOI] - - k[5670]*y_cur[IDX_CH3COOHI] - k[6183] - k[6389]*y_cur[IDX_GRAINM]; - data[jistart + 14670] = 0.0 + k[2285]*y_cur[IDX_COI] + - k[3736]*y_cur[IDX_OI]; - data[jistart + 14671] = 0.0 - k[2970]*y_cur[IDX_HCOII]; - data[jistart + 14672] = 0.0 + k[2700]*y_cur[IDX_H3II] - - k[2971]*y_cur[IDX_HCOII]; - data[jistart + 14673] = 0.0 - k[2972]*y_cur[IDX_HCOII]; - data[jistart + 14674] = 0.0 + k[3739]*y_cur[IDX_OI]; - data[jistart + 14675] = 0.0 - k[2973]*y_cur[IDX_HCOII]; - data[jistart + 14676] = 0.0 - k[3041]*y_cur[IDX_HCOII]; - data[jistart + 14677] = 0.0 - k[3029]*y_cur[IDX_HCOII]; - data[jistart + 14678] = 0.0 + k[2286]*y_cur[IDX_COI]; - data[jistart + 14679] = 0.0 - k[2974]*y_cur[IDX_HCOII]; - data[jistart + 14680] = 0.0 + k[2287]*y_cur[IDX_COI]; - data[jistart + 14681] = 0.0 + k[137]*y_cur[IDX_H2I]; - data[jistart + 14682] = 0.0 - k[2975]*y_cur[IDX_HCOII]; - data[jistart + 14683] = 0.0 - k[2977]*y_cur[IDX_HCOII]; - data[jistart + 14684] = 0.0 - k[2976]*y_cur[IDX_HCOII]; - data[jistart + 14685] = 0.0 + k[3220]*y_cur[IDX_H2COI] + - k[5666]*y_cur[IDX_CH2OHCHOI]; - data[jistart + 14686] = 0.0 - k[533]*y_cur[IDX_HCOII]; - data[jistart + 14687] = 0.0 + k[555]*y_cur[IDX_HCOI] + - k[3345]*y_cur[IDX_H2COI]; - data[jistart + 14688] = 0.0 + k[568]*y_cur[IDX_HCOI] + - k[3361]*y_cur[IDX_H2COI]; - data[jistart + 14689] = 0.0 + k[2288]*y_cur[IDX_COI]; - data[jistart + 14690] = 0.0 + k[2085]*y_cur[IDX_CH3II] - - k[2978]*y_cur[IDX_HCOII]; - data[jistart + 14691] = 0.0 - k[2979]*y_cur[IDX_HCOII]; - data[jistart + 14692] = 0.0 + k[3610]*y_cur[IDX_COII] - - k[3614]*y_cur[IDX_HCOII]; - data[jistart + 14693] = 0.0 + k[3485]*y_cur[IDX_COI] + - k[3488]*y_cur[IDX_H2COI]; - data[jistart + 14694] = 0.0 + k[3534]*y_cur[IDX_COII] - - k[3542]*y_cur[IDX_HCOII]; - data[jistart + 14695] = 0.0 + k[581]*y_cur[IDX_HCOI]; - data[jistart + 14696] = 0.0 - k[2980]*y_cur[IDX_HCOII]; - data[jistart + 14697] = 0.0 + k[3573]*y_cur[IDX_COII] - - k[3584]*y_cur[IDX_HCOII]; - data[jistart + 14698] = 0.0 + k[593]*y_cur[IDX_HCOI]; - data[jistart + 14699] = 0.0 - k[2981]*y_cur[IDX_HCOII]; - data[jistart + 14700] = 0.0 - k[637]*y_cur[IDX_HCOII]; - data[jistart + 14701] = 0.0 + k[63]*y_cur[IDX_CHI] + - k[1991]*y_cur[IDX_CH2II] + k[2091]*y_cur[IDX_CH3II] + - k[3679]*y_cur[IDX_C10HII] + k[3682]*y_cur[IDX_C10H2II] + - k[3683]*y_cur[IDX_C10H3II] + k[3686]*y_cur[IDX_C2HII] + - k[3689]*y_cur[IDX_C2H2II] + k[3692]*y_cur[IDX_C2H4II] + - k[3695]*y_cur[IDX_C3H2II] + k[3696]*y_cur[IDX_C3H3II] + - k[3697]*y_cur[IDX_C3H4II] + k[3699]*y_cur[IDX_C4HII] + - k[3704]*y_cur[IDX_C5HII] + k[3706]*y_cur[IDX_C5H2II] + - k[3707]*y_cur[IDX_C5H3II] + k[3710]*y_cur[IDX_C6H2II] + - k[3711]*y_cur[IDX_C6H3II] + k[3713]*y_cur[IDX_C7HII] + - k[3715]*y_cur[IDX_C7H2II] + k[3716]*y_cur[IDX_C7H3II] + - k[3719]*y_cur[IDX_C8H2II] + k[3720]*y_cur[IDX_C8H3II] + - k[3722]*y_cur[IDX_C9HII] + k[3724]*y_cur[IDX_C9H2II] + - k[3725]*y_cur[IDX_C9H3II] + k[3726]*y_cur[IDX_CH2CCHII] + - k[3736]*y_cur[IDX_HCO2II] + k[3739]*y_cur[IDX_HCSII] + - k[3755]*y_cur[IDX_SiCH2II] + k[3763]*y_cur[IDX_SiNCHII]; - data[jistart + 14702] = 0.0 + k[658]*y_cur[IDX_HCOI] + - k[3641]*y_cur[IDX_H2COI] + k[3644]*y_cur[IDX_HCNI]; - data[jistart + 14703] = 0.0 - k[4745]*y_cur[IDX_HCOII] - - k[4746]*y_cur[IDX_HCOII]; - data[jistart + 14704] = 0.0 + k[1967]*y_cur[IDX_CHII] + - k[1990]*y_cur[IDX_CH2II] + k[2489]*y_cur[IDX_H2COII] + - k[3669]*y_cur[IDX_C3HII]; - data[jistart + 14705] = 0.0 + k[502]*y_cur[IDX_HCOI] + - k[2262]*y_cur[IDX_CHI] + k[2498]*y_cur[IDX_H2COI] + - k[3655]*y_cur[IDX_C2H2I]; - data[jistart + 14706] = 0.0 - k[4780]*y_cur[IDX_HCOII] - - k[4781]*y_cur[IDX_HCOII]; - data[jistart + 14707] = 0.0 + k[2289]*y_cur[IDX_COI]; - data[jistart + 14708] = 0.0 - k[2982]*y_cur[IDX_HCOII]; - data[jistart + 14709] = 0.0 + k[3798]*y_cur[IDX_COII] - - k[3801]*y_cur[IDX_HCOII] - k[3802]*y_cur[IDX_HCOII]; - data[jistart + 14710] = 0.0 + k[691]*y_cur[IDX_HCOI] + - k[3777]*y_cur[IDX_COI]; - data[jistart + 14711] = 0.0 - k[4815]*y_cur[IDX_HCOII] - - k[4816]*y_cur[IDX_HCOII]; - data[jistart + 14712] = 0.0 - k[2983]*y_cur[IDX_HCOII]; - data[jistart + 14713] = 0.0 - k[2985]*y_cur[IDX_HCOII]; - data[jistart + 14714] = 0.0 - k[2984]*y_cur[IDX_HCOII]; - data[jistart + 14715] = 0.0 - k[2986]*y_cur[IDX_HCOII]; - data[jistart + 14716] = 0.0 - k[2987]*y_cur[IDX_HCOII]; - data[jistart + 14717] = 0.0 - k[2989]*y_cur[IDX_HCOII]; - data[jistart + 14718] = 0.0 + k[503]*y_cur[IDX_HCOI] + - k[2501]*y_cur[IDX_H2COI]; - data[jistart + 14719] = 0.0 - k[4850]*y_cur[IDX_HCOII] - - k[4851]*y_cur[IDX_HCOII]; - data[jistart + 14720] = 0.0 - k[2988]*y_cur[IDX_HCOII]; - data[jistart + 14721] = 0.0 - k[2990]*y_cur[IDX_HCOII]; - data[jistart + 14722] = 0.0 + k[3845]*y_cur[IDX_C2H2I]; - data[jistart + 14723] = 0.0 - k[3881]*y_cur[IDX_HCOII]; - data[jistart + 14724] = 0.0 - k[2997]*y_cur[IDX_HCOII]; - data[jistart + 14725] = 0.0 - k[2991]*y_cur[IDX_HCOII]; - data[jistart + 14726] = 0.0 - k[2993]*y_cur[IDX_HCOII]; - data[jistart + 14727] = 0.0 - k[2992]*y_cur[IDX_HCOII]; - data[jistart + 14728] = 0.0 - k[2994]*y_cur[IDX_HCOII]; - data[jistart + 14729] = 0.0 - k[2995]*y_cur[IDX_HCOII]; - data[jistart + 14730] = 0.0 - k[2996]*y_cur[IDX_HCOII]; - data[jistart + 14731] = 0.0 - k[2998]*y_cur[IDX_HCOII]; - data[jistart + 14732] = 0.0 + k[3755]*y_cur[IDX_OI]; - data[jistart + 14733] = 0.0 - k[2999]*y_cur[IDX_HCOII]; - data[jistart + 14734] = 0.0 - k[3002]*y_cur[IDX_HCOII]; - data[jistart + 14735] = 0.0 - k[3000]*y_cur[IDX_HCOII]; - data[jistart + 14736] = 0.0 - k[3001]*y_cur[IDX_HCOII]; - data[jistart + 14737] = 0.0 + k[2291]*y_cur[IDX_COI]; - data[jistart + 14738] = 0.0 - k[3003]*y_cur[IDX_HCOII]; - data[jistart + 14739] = 0.0 + k[3763]*y_cur[IDX_OI]; - data[jistart + 14740] = 0.0 - k[3005]*y_cur[IDX_HCOII]; - data[jistart + 14741] = 0.0 + k[504]*y_cur[IDX_HCOI] + - k[2268]*y_cur[IDX_CHI]; - data[jistart + 14742] = 0.0 - k[3004]*y_cur[IDX_HCOII]; - data[jistart + 14743] = 0.0 - k[3006]*y_cur[IDX_HCOII]; - data[jistart + 14744] = 0.0 - k[1097]*y_cur[IDX_HCOII]; - data[jistart + 14745] = 0.0 - k[1905]*y_cur[IDX_HCO2II]; - data[jistart + 14746] = 0.0 + k[5644]*y_cur[IDX_COOHI]; - data[jistart + 14747] = 0.0 - k[1567]*y_cur[IDX_HCO2II]; - data[jistart + 14748] = 0.0 - k[2116]*y_cur[IDX_HCO2II]; - data[jistart + 14749] = 0.0 + k[5673]*y_cur[IDX_HeII]; - data[jistart + 14750] = 0.0 + k[2191]*y_cur[IDX_CO2II] - - k[2201]*y_cur[IDX_HCO2II]; - data[jistart + 14751] = 0.0 + k[2139]*y_cur[IDX_CO2I]; - data[jistart + 14752] = 0.0 + k[2223]*y_cur[IDX_CO2I]; - data[jistart + 14753] = 0.0 - k[2285]*y_cur[IDX_HCO2II]; - data[jistart + 14754] = 0.0 + k[2139]*y_cur[IDX_CH4II] + - k[2223]*y_cur[IDX_CH5II] + k[2382]*y_cur[IDX_H2II] + - k[2674]*y_cur[IDX_H3II] + k[2853]*y_cur[IDX_HCNII] + - k[3049]*y_cur[IDX_HNOII] + k[3372]*y_cur[IDX_N2HII] + - k[3482]*y_cur[IDX_NHII] + k[3677]*y_cur[IDX_O2HII] + - k[3776]*y_cur[IDX_OHII]; - data[jistart + 14755] = 0.0 + k[2191]*y_cur[IDX_CH4I] + - k[2436]*y_cur[IDX_H2I] + k[2541]*y_cur[IDX_H2OI]; - data[jistart + 14756] = 0.0 + k[5644]*y_cur[IDX_CII]; - data[jistart + 14757] = 0.0 - k[6566]*y_cur[IDX_HCO2II] - - k[6567]*y_cur[IDX_HCO2II] - k[6568]*y_cur[IDX_HCO2II]; - data[jistart + 14758] = 0.0 + k[2436]*y_cur[IDX_CO2II]; - data[jistart + 14759] = 0.0 + k[2382]*y_cur[IDX_CO2I]; - data[jistart + 14760] = 0.0 + k[2541]*y_cur[IDX_CO2II] - - k[2548]*y_cur[IDX_HCO2II]; - data[jistart + 14761] = 0.0 + k[2674]*y_cur[IDX_CO2I]; - data[jistart + 14762] = 0.0 + k[2853]*y_cur[IDX_CO2I]; - data[jistart + 14763] = 0.0 + k[3802]*y_cur[IDX_OHI]; - data[jistart + 14764] = 0.0 - k[1098]*y_cur[IDX_eM] - - k[1099]*y_cur[IDX_eM] - k[1100]*y_cur[IDX_eM] - - k[1567]*y_cur[IDX_C2H2I] - k[1905]*y_cur[IDX_CI] - - k[2116]*y_cur[IDX_CH3CNI] - k[2201]*y_cur[IDX_CH4I] - - k[2285]*y_cur[IDX_COI] - k[2548]*y_cur[IDX_H2OI] - - k[3585]*y_cur[IDX_NH3I] - k[3736]*y_cur[IDX_OI] - - k[6566]*y_cur[IDX_GRAINM] - k[6567]*y_cur[IDX_GRAINM] - + k[3251]*y_cur[IDX_HCOI] - k[3252]*y_cur[IDX_HCOOCH3I] - + k[3253]*y_cur[IDX_HCPI] - k[3254]*y_cur[IDX_HCPI] - + k[3255]*y_cur[IDX_HCSI] - k[3256]*y_cur[IDX_HCSI] - + k[3257]*y_cur[IDX_HCSiI] - k[3258]*y_cur[IDX_HCSiI] - + k[3259]*y_cur[IDX_HClI] - k[3260]*y_cur[IDX_HFI] - + k[3261]*y_cur[IDX_HNCI] - k[3262]*y_cur[IDX_HNCI] - + k[3263]*y_cur[IDX_HNCI] - k[3264]*y_cur[IDX_HNCOI] - + k[3265]*y_cur[IDX_HNOI] - k[3266]*y_cur[IDX_HNOI] - + k[3267]*y_cur[IDX_HNSiI] - k[3268]*y_cur[IDX_HOCNI] - + k[3269]*y_cur[IDX_HPOI] - k[3270]*y_cur[IDX_HPOI] - + k[3271]*y_cur[IDX_HS2I] - k[3272]*y_cur[IDX_HS2I] - + k[3273]*y_cur[IDX_HSI] - k[3274]*y_cur[IDX_N2I] - + k[3275]*y_cur[IDX_N2OI] - k[3276]*y_cur[IDX_N2OI] - + k[3277]*y_cur[IDX_N2OI] - k[3278]*y_cur[IDX_N2OI] - + k[3279]*y_cur[IDX_NCCNI] - k[3280]*y_cur[IDX_NH2I] - + k[3281]*y_cur[IDX_NH2I] - k[3282]*y_cur[IDX_NH2CNI] - + k[3283]*y_cur[IDX_NH3I] - k[3284]*y_cur[IDX_NH3I] - + k[3285]*y_cur[IDX_NHI] - k[3286]*y_cur[IDX_NOI] - + k[3287]*y_cur[IDX_NOI] - k[3288]*y_cur[IDX_NSI] - + k[3289]*y_cur[IDX_NSI] - k[3290]*y_cur[IDX_O2I] - + k[3291]*y_cur[IDX_OCNI] - k[3292]*y_cur[IDX_OCNI] - + k[3293]*y_cur[IDX_OCSI] - k[3294]*y_cur[IDX_OCSI] - + k[3295]*y_cur[IDX_OCSI] - k[3296]*y_cur[IDX_OCSI] - + k[3297]*y_cur[IDX_OHI] - k[3298]*y_cur[IDX_PH2I] - + k[3299]*y_cur[IDX_PHI] - k[3300]*y_cur[IDX_PNI] - + k[3301]*y_cur[IDX_POI] - k[3302]*y_cur[IDX_S2I] - + k[3303]*y_cur[IDX_SO2I] - k[3304]*y_cur[IDX_SO2I] - + k[3305]*y_cur[IDX_SOI] - k[3306]*y_cur[IDX_SOI] - + k[3307]*y_cur[IDX_SiC2I] - k[3308]*y_cur[IDX_SiC2H2I] - + k[3309]*y_cur[IDX_SiC2H2I] - k[3310]*y_cur[IDX_SiC2HI] - + k[3311]*y_cur[IDX_SiC2HI] - k[3312]*y_cur[IDX_SiC3I] - + k[3313]*y_cur[IDX_SiC3HI] - k[3314]*y_cur[IDX_SiC3HI] - + k[3315]*y_cur[IDX_SiC4I] - k[3316]*y_cur[IDX_SiCI] - + k[3317]*y_cur[IDX_SiCI] - k[3318]*y_cur[IDX_SiCH2I] - + k[3319]*y_cur[IDX_SiCH2I] - k[3320]*y_cur[IDX_SiCH3I] - + k[3321]*y_cur[IDX_SiCH3I] - k[3322]*y_cur[IDX_SiH2I] - + k[3323]*y_cur[IDX_SiH2I] - k[3324]*y_cur[IDX_SiH3I] - + k[3325]*y_cur[IDX_SiH3I] - k[3326]*y_cur[IDX_SiH4I] - + k[3327]*y_cur[IDX_SiH4I] - k[3328]*y_cur[IDX_SiHI] - + k[3329]*y_cur[IDX_SiNI] - k[3330]*y_cur[IDX_SiNCI] - + k[3331]*y_cur[IDX_SiO2I] - k[3332]*y_cur[IDX_SiOI] - + k[3333]*y_cur[IDX_SiOI] - k[3334]*y_cur[IDX_SiSI] - + k[3335]*y_cur[IDX_SiSI] - k[3906]*y_cur[IDX_CM] - + k[3941]*y_cur[IDX_C10M] - k[3976]*y_cur[IDX_C10HM] - + k[4011]*y_cur[IDX_C2M] - k[4046]*y_cur[IDX_C2HM] - + k[4081]*y_cur[IDX_C3M] - k[4116]*y_cur[IDX_C3HM] - + k[4151]*y_cur[IDX_C3NM] - k[4186]*y_cur[IDX_C4M] - + k[4221]*y_cur[IDX_C4HM] - k[4256]*y_cur[IDX_C5M] - + k[4291]*y_cur[IDX_C5HM] - k[4326]*y_cur[IDX_C5NM] - + k[4361]*y_cur[IDX_C6M] - k[4396]*y_cur[IDX_C6HM] - + k[4431]*y_cur[IDX_C7M] - k[4466]*y_cur[IDX_C7HM] - + k[4501]*y_cur[IDX_C8M] - k[4536]*y_cur[IDX_C8HM] - + k[4571]*y_cur[IDX_C9M] - k[4606]*y_cur[IDX_C9HM] - + k[4641]*y_cur[IDX_CHM] - k[4676]*y_cur[IDX_CNM] - + k[4712]*y_cur[IDX_HM] - k[4747]*y_cur[IDX_OM] - + k[4782]*y_cur[IDX_O2M] - k[4817]*y_cur[IDX_OHM] - + k[4852]*y_cur[IDX_SM] - k[5619]*y_cur[IDX_eM] - + k[5631]*y_cur[IDX_CH3OI] - k[5632]*y_cur[IDX_CH3OI] - + k[5637]*y_cur[IDX_CH2OHI] - k[5638]*y_cur[IDX_CH2OHI] - + k[5642]*y_cur[IDX_CH3COI] - k[5643]*y_cur[IDX_CH3COI] - + k[5647]*y_cur[IDX_COOHI] - k[5648]*y_cur[IDX_COOHI] - + k[5653]*y_cur[IDX_COOCH3I] - k[5654]*y_cur[IDX_COOCH3I] - + k[5659]*y_cur[IDX_CH2OHCOI] - k[5660]*y_cur[IDX_CH2OHCOI] - + k[5665]*y_cur[IDX_CH2OHCHOI] - k[5666]*y_cur[IDX_CH2OHCHOI] - + k[5671]*y_cur[IDX_CH3COOHI] - k[5672]*y_cur[IDX_CH3COOHI] - + k[5673]*y_cur[IDX_CH3COOHI] - k[5674]*y_cur[IDX_CH3COOHI] - + k[6312]*y_cur[IDX_GRAINM]; + data[jistart + 17292] = 0.0 + k[5683] + k[5876] + k[6298]; + data[jistart + 17293] = 0.0 - k[518]*y_cur[IDX_HeII] - k[3225]*y_cur[IDX_HeII] - + k[3226]*y_cur[IDX_HeII]; + data[jistart + 17294] = 0.0 - k[513]*y_cur[IDX_HeII]; + data[jistart + 17295] = 0.0 - k[3211]*y_cur[IDX_HeII]; + data[jistart + 17296] = 0.0 - k[6312]*y_cur[IDX_HeII]; + data[jistart + 17297] = 0.0 - k[458]*y_cur[IDX_HeII] - k[2457]*y_cur[IDX_HeII]; + data[jistart + 17298] = 0.0 - k[5619]*y_cur[IDX_HeII]; + data[jistart + 17299] = 0.0 - k[491]*y_cur[IDX_HeII]; + data[jistart + 17300] = 0.0 + k[7072] + k[7254] + k[7436]; + data[jistart + 17301] = 0.0 + k[3216]*y_cur[IDX_HeII]; + data[jistart + 17302] = 0.0 + k[1149]*y_cur[IDX_eM] + k[2458]*y_cur[IDX_H2I] + + k[2845]*y_cur[IDX_HI] + k[6313]*y_cur[IDX_GRAINM]; + data[jistart + 17303] = 0.0 + k[3159]*y_cur[IDX_HeII]; + data[jistart + 17304] = 0.0 + k[3282]*y_cur[IDX_HeII]; + data[jistart + 17305] = 0.0 + k[3331]*y_cur[IDX_HeII]; + data[jistart + 17306] = 0.0 + k[5653]*y_cur[IDX_HeII] + k[5654]*y_cur[IDX_HeII]; + data[jistart + 17307] = 0.0 + k[3227]*y_cur[IDX_HeII] + k[3228]*y_cur[IDX_HeII]; + data[jistart + 17308] = 0.0 + k[3313]*y_cur[IDX_HeII] + k[3314]*y_cur[IDX_HeII]; + data[jistart + 17309] = 0.0 + k[3260]*y_cur[IDX_HeII]; + data[jistart + 17310] = 0.0 + k[522]*y_cur[IDX_HeII]; + data[jistart + 17311] = 0.0 + k[5659]*y_cur[IDX_HeII] + k[5660]*y_cur[IDX_HeII]; + data[jistart + 17312] = 0.0 + k[3180]*y_cur[IDX_HeII]; + data[jistart + 17313] = 0.0 + k[3183]*y_cur[IDX_HeII]; + data[jistart + 17314] = 0.0 + k[3231]*y_cur[IDX_HeII]; + data[jistart + 17315] = 0.0 + k[3315]*y_cur[IDX_HeII]; + data[jistart + 17316] = 0.0 + k[3330]*y_cur[IDX_HeII]; + data[jistart + 17317] = 0.0 + k[3205]*y_cur[IDX_HeII] + k[3206]*y_cur[IDX_HeII]; + data[jistart + 17318] = 0.0 + k[3267]*y_cur[IDX_HeII]; + data[jistart + 17319] = 0.0 + k[3308]*y_cur[IDX_HeII] + k[3309]*y_cur[IDX_HeII]; + data[jistart + 17320] = 0.0 + k[5665]*y_cur[IDX_HeII] + k[5666]*y_cur[IDX_HeII]; + data[jistart + 17321] = 0.0 + k[520]*y_cur[IDX_HeII]; + data[jistart + 17322] = 0.0 + k[3320]*y_cur[IDX_HeII] + k[3321]*y_cur[IDX_HeII]; + data[jistart + 17323] = 0.0 + k[3174]*y_cur[IDX_HeII] + k[3175]*y_cur[IDX_HeII]; + data[jistart + 17324] = 0.0 + k[3177]*y_cur[IDX_HeII]; + data[jistart + 17325] = 0.0 + k[3268]*y_cur[IDX_HeII]; + data[jistart + 17326] = 0.0 + k[3269]*y_cur[IDX_HeII] + k[3270]*y_cur[IDX_HeII]; + data[jistart + 17327] = 0.0 + k[3271]*y_cur[IDX_HeII] + k[3272]*y_cur[IDX_HeII]; + data[jistart + 17328] = 0.0 + k[5642]*y_cur[IDX_HeII] + k[5643]*y_cur[IDX_HeII]; + data[jistart + 17329] = 0.0 + k[5647]*y_cur[IDX_HeII] + k[5648]*y_cur[IDX_HeII]; + data[jistart + 17330] = 0.0 + k[3181]*y_cur[IDX_HeII] + k[3182]*y_cur[IDX_HeII]; + data[jistart + 17331] = 0.0 + k[3244]*y_cur[IDX_HeII]; + data[jistart + 17332] = 0.0 + k[3252]*y_cur[IDX_HeII]; + data[jistart + 17333] = 0.0 + k[3298]*y_cur[IDX_HeII]; + data[jistart + 17334] = 0.0 + k[3300]*y_cur[IDX_HeII]; + data[jistart + 17335] = 0.0 + k[3310]*y_cur[IDX_HeII] + k[3311]*y_cur[IDX_HeII]; + data[jistart + 17336] = 0.0 + k[3312]*y_cur[IDX_HeII]; + data[jistart + 17337] = 0.0 + k[3113]*y_cur[IDX_HeII] + k[3114]*y_cur[IDX_HeII]; + data[jistart + 17338] = 0.0 + k[3170]*y_cur[IDX_HeII]; + data[jistart + 17339] = 0.0 + k[3253]*y_cur[IDX_HeII] + k[3254]*y_cur[IDX_HeII]; + data[jistart + 17340] = 0.0 + k[3259]*y_cur[IDX_HeII]; + data[jistart + 17341] = 0.0 + k[521]*y_cur[IDX_HeII] + k[3264]*y_cur[IDX_HeII]; + data[jistart + 17342] = 0.0 + k[3101]*y_cur[IDX_HeII] + k[3102]*y_cur[IDX_HeII]; + data[jistart + 17343] = 0.0 + k[3156]*y_cur[IDX_HeII]; + data[jistart + 17344] = 0.0 + k[3178]*y_cur[IDX_HeII] + k[3179]*y_cur[IDX_HeII]; + data[jistart + 17345] = 0.0 + k[5671]*y_cur[IDX_HeII] + k[5672]*y_cur[IDX_HeII] + + k[5673]*y_cur[IDX_HeII] + k[5674]*y_cur[IDX_HeII]; + data[jistart + 17346] = 0.0 + k[3195]*y_cur[IDX_HeII]; + data[jistart + 17347] = 0.0 + k[3222]*y_cur[IDX_HeII] + k[3223]*y_cur[IDX_HeII] + + k[3224]*y_cur[IDX_HeII]; + data[jistart + 17348] = 0.0 + k[3301]*y_cur[IDX_HeII]; + data[jistart + 17349] = 0.0 + k[3302]*y_cur[IDX_HeII]; + data[jistart + 17350] = 0.0 + k[3103]*y_cur[IDX_HeII] + k[3104]*y_cur[IDX_HeII]; + data[jistart + 17351] = 0.0 + k[3173]*y_cur[IDX_HeII]; + data[jistart + 17352] = 0.0 + k[5631]*y_cur[IDX_HeII] + k[5632]*y_cur[IDX_HeII]; + data[jistart + 17353] = 0.0 + k[3232]*y_cur[IDX_HeII] + k[3233]*y_cur[IDX_HeII]; + data[jistart + 17354] = 0.0 + k[3257]*y_cur[IDX_HeII] + k[3258]*y_cur[IDX_HeII]; + data[jistart + 17355] = 0.0 + k[3318]*y_cur[IDX_HeII] + k[3319]*y_cur[IDX_HeII]; + data[jistart + 17356] = 0.0 + k[3307]*y_cur[IDX_HeII]; + data[jistart + 17357] = 0.0 + k[3090]*y_cur[IDX_HeII]; + data[jistart + 17358] = 0.0 + k[5637]*y_cur[IDX_HeII] + k[5638]*y_cur[IDX_HeII]; + data[jistart + 17359] = 0.0 + k[3329]*y_cur[IDX_HeII]; + data[jistart + 17360] = 0.0 + k[3255]*y_cur[IDX_HeII] + k[3256]*y_cur[IDX_HeII]; + data[jistart + 17361] = 0.0 + k[3288]*y_cur[IDX_HeII] + k[3289]*y_cur[IDX_HeII]; + data[jistart + 17362] = 0.0 + k[3322]*y_cur[IDX_HeII] + k[3323]*y_cur[IDX_HeII]; + data[jistart + 17363] = 0.0 + k[3099]*y_cur[IDX_HeII] + k[3100]*y_cur[IDX_HeII]; + data[jistart + 17364] = 0.0 + k[3151]*y_cur[IDX_HeII] + k[3152]*y_cur[IDX_HeII] + + k[3153]*y_cur[IDX_HeII]; + data[jistart + 17365] = 0.0 + k[3165]*y_cur[IDX_HeII] + k[3166]*y_cur[IDX_HeII] + + k[3167]*y_cur[IDX_HeII] + k[3168]*y_cur[IDX_HeII] + + k[3169]*y_cur[IDX_HeII]; + data[jistart + 17366] = 0.0 + k[3243]*y_cur[IDX_HeII]; + data[jistart + 17367] = 0.0 + k[3130]*y_cur[IDX_HeII] + k[3131]*y_cur[IDX_HeII]; + data[jistart + 17368] = 0.0 + k[3141]*y_cur[IDX_HeII]; + data[jistart + 17369] = 0.0 + k[3062]*y_cur[IDX_HeII] + k[3063]*y_cur[IDX_HeII] + + k[3064]*y_cur[IDX_HeII] + k[3065]*y_cur[IDX_HeII] + + k[3066]*y_cur[IDX_HeII]; + data[jistart + 17370] = 0.0 + k[3157]*y_cur[IDX_HeII] + k[3158]*y_cur[IDX_HeII]; + data[jistart + 17371] = 0.0 + k[3212]*y_cur[IDX_HeII] + k[3213]*y_cur[IDX_HeII]; + data[jistart + 17372] = 0.0 + k[527]*y_cur[IDX_HeII] + k[3303]*y_cur[IDX_HeII] + + k[3304]*y_cur[IDX_HeII]; + data[jistart + 17373] = 0.0 + k[3316]*y_cur[IDX_HeII] + k[3317]*y_cur[IDX_HeII]; + data[jistart + 17374] = 0.0 + k[3085]*y_cur[IDX_HeII]; + data[jistart + 17375] = 0.0 + k[3265]*y_cur[IDX_HeII] + k[3266]*y_cur[IDX_HeII]; + data[jistart + 17376] = 0.0 + k[3275]*y_cur[IDX_HeII] + k[3276]*y_cur[IDX_HeII] + + k[3277]*y_cur[IDX_HeII] + k[3278]*y_cur[IDX_HeII]; + data[jistart + 17377] = 0.0 + k[3324]*y_cur[IDX_HeII] + k[3325]*y_cur[IDX_HeII]; + data[jistart + 17378] = 0.0 + k[3171]*y_cur[IDX_HeII] + k[3172]*y_cur[IDX_HeII]; + data[jistart + 17379] = 0.0 + k[3030]*y_cur[IDX_HeII] + k[3031]*y_cur[IDX_HeII] + + k[3032]*y_cur[IDX_HeII] + k[3033]*y_cur[IDX_HeII] + + k[3034]*y_cur[IDX_HeII]; + data[jistart + 17380] = 0.0 + k[3291]*y_cur[IDX_HeII] + k[3292]*y_cur[IDX_HeII]; + data[jistart + 17381] = 0.0 + k[3194]*y_cur[IDX_HeII]; + data[jistart + 17382] = 0.0 + k[3144]*y_cur[IDX_HeII] + k[3145]*y_cur[IDX_HeII] + + k[3146]*y_cur[IDX_HeII]; + data[jistart + 17383] = 0.0 + k[3241]*y_cur[IDX_HeII] + k[3242]*y_cur[IDX_HeII]; + data[jistart + 17384] = 0.0 + k[3328]*y_cur[IDX_HeII]; + data[jistart + 17385] = 0.0 + k[3326]*y_cur[IDX_HeII] + k[3327]*y_cur[IDX_HeII]; + data[jistart + 17386] = 0.0 + k[3299]*y_cur[IDX_HeII]; + data[jistart + 17387] = 0.0 + k[3136]*y_cur[IDX_HeII] + k[3137]*y_cur[IDX_HeII] + + k[3138]*y_cur[IDX_HeII]; + data[jistart + 17388] = 0.0 + k[3191]*y_cur[IDX_HeII]; + data[jistart + 17389] = 0.0 + k[3192]*y_cur[IDX_HeII] + k[3193]*y_cur[IDX_HeII]; + data[jistart + 17390] = 0.0 + k[3279]*y_cur[IDX_HeII]; + data[jistart + 17391] = 0.0 + k[3217]*y_cur[IDX_HeII] + k[3218]*y_cur[IDX_HeII]; + data[jistart + 17392] = 0.0 + k[3127]*y_cur[IDX_HeII] + k[3128]*y_cur[IDX_HeII] + + k[3129]*y_cur[IDX_HeII]; + data[jistart + 17393] = 0.0 + k[3119]*y_cur[IDX_HeII] + k[3120]*y_cur[IDX_HeII] + + k[3121]*y_cur[IDX_HeII]; + data[jistart + 17394] = 0.0 + k[3188]*y_cur[IDX_HeII] + k[3189]*y_cur[IDX_HeII] + + k[3190]*y_cur[IDX_HeII]; + data[jistart + 17395] = 0.0 + k[3096]*y_cur[IDX_HeII]; + data[jistart + 17396] = 0.0 + k[511]*y_cur[IDX_HeII] + k[3083]*y_cur[IDX_HeII] + + k[3084]*y_cur[IDX_HeII]; + data[jistart + 17397] = 0.0 + k[4782]*y_cur[IDX_HeII]; + data[jistart + 17398] = 0.0 + k[4641]*y_cur[IDX_HeII]; + data[jistart + 17399] = 0.0 - k[2390]*y_cur[IDX_HeI]; + data[jistart + 17400] = 0.0 + k[3293]*y_cur[IDX_HeII] + k[3294]*y_cur[IDX_HeII] + + k[3295]*y_cur[IDX_HeII] + k[3296]*y_cur[IDX_HeII]; + data[jistart + 17401] = 0.0 + k[526]*y_cur[IDX_HeII]; + data[jistart + 17402] = 0.0 + k[4852]*y_cur[IDX_HeII]; + data[jistart + 17403] = 0.0 + k[4046]*y_cur[IDX_HeII]; + data[jistart + 17404] = 0.0 + k[4221]*y_cur[IDX_HeII]; + data[jistart + 17405] = 0.0 + k[3184]*y_cur[IDX_HeII] + k[3185]*y_cur[IDX_HeII] + + k[3186]*y_cur[IDX_HeII] + k[3187]*y_cur[IDX_HeII]; + data[jistart + 17406] = 0.0 + k[4817]*y_cur[IDX_HeII]; + data[jistart + 17407] = 0.0 + k[3976]*y_cur[IDX_HeII]; + data[jistart + 17408] = 0.0 + k[4116]*y_cur[IDX_HeII]; + data[jistart + 17409] = 0.0 + k[3115]*y_cur[IDX_HeII] + k[3116]*y_cur[IDX_HeII]; + data[jistart + 17410] = 0.0 + k[4396]*y_cur[IDX_HeII]; + data[jistart + 17411] = 0.0 + k[4536]*y_cur[IDX_HeII]; + data[jistart + 17412] = 0.0 + k[4466]*y_cur[IDX_HeII]; + data[jistart + 17413] = 0.0 + k[4606]*y_cur[IDX_HeII]; + data[jistart + 17414] = 0.0 + k[3941]*y_cur[IDX_HeII]; + data[jistart + 17415] = 0.0 + k[4291]*y_cur[IDX_HeII]; + data[jistart + 17416] = 0.0 + k[4326]*y_cur[IDX_HeII]; + data[jistart + 17417] = 0.0 + k[3273]*y_cur[IDX_HeII]; + data[jistart + 17418] = 0.0 + k[3906]*y_cur[IDX_HeII]; + data[jistart + 17419] = 0.0 + k[3214]*y_cur[IDX_HeII] + k[3215]*y_cur[IDX_HeII]; + data[jistart + 17420] = 0.0 + k[4747]*y_cur[IDX_HeII]; + data[jistart + 17421] = 0.0 + k[4571]*y_cur[IDX_HeII]; + data[jistart + 17422] = 0.0 + k[3196]*y_cur[IDX_HeII] + k[3197]*y_cur[IDX_HeII]; + data[jistart + 17423] = 0.0 + k[4712]*y_cur[IDX_HeII]; + data[jistart + 17424] = 0.0 + k[3234]*y_cur[IDX_HeII] + k[3235]*y_cur[IDX_HeII] + + k[3236]*y_cur[IDX_HeII] + k[3237]*y_cur[IDX_HeII]; + data[jistart + 17425] = 0.0 + k[3334]*y_cur[IDX_HeII] + k[3335]*y_cur[IDX_HeII]; + data[jistart + 17426] = 0.0 + k[4501]*y_cur[IDX_HeII]; + data[jistart + 17427] = 0.0 + k[4011]*y_cur[IDX_HeII]; + data[jistart + 17428] = 0.0 + k[3091]*y_cur[IDX_HeII] + k[3092]*y_cur[IDX_HeII] + + k[3093]*y_cur[IDX_HeII] + k[3094]*y_cur[IDX_HeII]; + data[jistart + 17429] = 0.0 + k[4081]*y_cur[IDX_HeII]; + data[jistart + 17430] = 0.0 + k[4186]*y_cur[IDX_HeII]; + data[jistart + 17431] = 0.0 + k[4361]*y_cur[IDX_HeII]; + data[jistart + 17432] = 0.0 + k[4256]*y_cur[IDX_HeII]; + data[jistart + 17433] = 0.0 + k[4431]*y_cur[IDX_HeII]; + data[jistart + 17434] = 0.0 + k[3089]*y_cur[IDX_HeII]; + data[jistart + 17435] = 0.0 + k[3280]*y_cur[IDX_HeII] + k[3281]*y_cur[IDX_HeII]; + data[jistart + 17436] = 0.0 + k[3108]*y_cur[IDX_HeII] + k[3109]*y_cur[IDX_HeII] + + k[3110]*y_cur[IDX_HeII]; + data[jistart + 17437] = 0.0 + k[3124]*y_cur[IDX_HeII]; + data[jistart + 17438] = 0.0 + k[4151]*y_cur[IDX_HeII]; + data[jistart + 17439] = 0.0 + k[512]*y_cur[IDX_HeII] + k[3098]*y_cur[IDX_HeII]; + data[jistart + 17440] = 0.0 + k[516]*y_cur[IDX_HeII] + k[3207]*y_cur[IDX_HeII] + + k[3208]*y_cur[IDX_HeII] + k[3209]*y_cur[IDX_HeII] + + k[3210]*y_cur[IDX_HeII]; + data[jistart + 17441] = 0.0 + k[507]*y_cur[IDX_HeII] + k[3067]*y_cur[IDX_HeII] + + k[3068]*y_cur[IDX_HeII] + k[3069]*y_cur[IDX_HeII] + + k[3070]*y_cur[IDX_HeII] + k[3071]*y_cur[IDX_HeII] + + k[3072]*y_cur[IDX_HeII]; + data[jistart + 17442] = 0.0 + k[3154]*y_cur[IDX_HeII] + k[3155]*y_cur[IDX_HeII]; + data[jistart + 17443] = 0.0 + k[3332]*y_cur[IDX_HeII] + k[3333]*y_cur[IDX_HeII]; + data[jistart + 17444] = 0.0 + k[506]*y_cur[IDX_HeII] + k[3056]*y_cur[IDX_HeII] + + k[3057]*y_cur[IDX_HeII] + k[3058]*y_cur[IDX_HeII] + + k[3059]*y_cur[IDX_HeII] + k[3060]*y_cur[IDX_HeII] + + k[3061]*y_cur[IDX_HeII]; + data[jistart + 17445] = 0.0 + k[3147]*y_cur[IDX_HeII] + k[3148]*y_cur[IDX_HeII]; + data[jistart + 17446] = 0.0 + k[3134]*y_cur[IDX_HeII] + k[3135]*y_cur[IDX_HeII]; + data[jistart + 17447] = 0.0 + k[3149]*y_cur[IDX_HeII] + k[3150]*y_cur[IDX_HeII]; + data[jistart + 17448] = 0.0 + k[3142]*y_cur[IDX_HeII] + k[3143]*y_cur[IDX_HeII]; + data[jistart + 17449] = 0.0 + k[3285]*y_cur[IDX_HeII]; + data[jistart + 17450] = 0.0 + k[3117]*y_cur[IDX_HeII] + k[3118]*y_cur[IDX_HeII]; + data[jistart + 17451] = 0.0 + k[3125]*y_cur[IDX_HeII] + k[3126]*y_cur[IDX_HeII]; + data[jistart + 17452] = 0.0 + k[4676]*y_cur[IDX_HeII]; + data[jistart + 17453] = 0.0 + k[3105]*y_cur[IDX_HeII] + k[3106]*y_cur[IDX_HeII] + + k[3107]*y_cur[IDX_HeII]; + data[jistart + 17454] = 0.0 + k[3305]*y_cur[IDX_HeII] + k[3306]*y_cur[IDX_HeII]; + data[jistart + 17455] = 0.0 + k[3139]*y_cur[IDX_HeII] + k[3140]*y_cur[IDX_HeII]; + data[jistart + 17456] = 0.0 + k[3162]*y_cur[IDX_HeII] + k[3163]*y_cur[IDX_HeII] + + k[3164]*y_cur[IDX_HeII]; + data[jistart + 17457] = 0.0 + k[3132]*y_cur[IDX_HeII] + k[3133]*y_cur[IDX_HeII]; + data[jistart + 17458] = 0.0 + k[3122]*y_cur[IDX_HeII] + k[3123]*y_cur[IDX_HeII]; + data[jistart + 17459] = 0.0 + k[3097]*y_cur[IDX_HeII]; + data[jistart + 17460] = 0.0 + k[3095]*y_cur[IDX_HeII]; + data[jistart + 17461] = 0.0 + k[3111]*y_cur[IDX_HeII] + k[3112]*y_cur[IDX_HeII]; + data[jistart + 17462] = 0.0 + k[3238]*y_cur[IDX_HeII] + k[3239]*y_cur[IDX_HeII] + + k[3240]*y_cur[IDX_HeII]; + data[jistart + 17463] = 0.0 + k[3160]*y_cur[IDX_HeII] + k[3161]*y_cur[IDX_HeII]; + data[jistart + 17464] = 0.0 + k[3261]*y_cur[IDX_HeII] + k[3262]*y_cur[IDX_HeII] + + k[3263]*y_cur[IDX_HeII]; + data[jistart + 17465] = 0.0 + k[510]*y_cur[IDX_HeII] + k[3079]*y_cur[IDX_HeII] + + k[3080]*y_cur[IDX_HeII] + k[3081]*y_cur[IDX_HeII] + + k[3082]*y_cur[IDX_HeII]; + data[jistart + 17466] = 0.0 + k[3077]*y_cur[IDX_HeII] + k[3078]*y_cur[IDX_HeII]; + data[jistart + 17467] = 0.0 + k[523]*y_cur[IDX_HeII] + k[3274]*y_cur[IDX_HeII]; + data[jistart + 17468] = 0.0 + k[525]*y_cur[IDX_HeII] + k[3290]*y_cur[IDX_HeII]; + data[jistart + 17469] = 0.0 + k[519]*y_cur[IDX_HeII] + k[3229]*y_cur[IDX_HeII] + + k[3230]*y_cur[IDX_HeII]; + data[jistart + 17470] = 0.0 + k[528]*y_cur[IDX_HeII]; + data[jistart + 17471] = 0.0 + k[3286]*y_cur[IDX_HeII] + k[3287]*y_cur[IDX_HeII]; + data[jistart + 17472] = 0.0 + k[3249]*y_cur[IDX_HeII] + k[3251]*y_cur[IDX_HeII]; + data[jistart + 17473] = 0.0 + k[514]*y_cur[IDX_HeII] + k[3198]*y_cur[IDX_HeII] + + k[3199]*y_cur[IDX_HeII] + k[3200]*y_cur[IDX_HeII] + + k[3201]*y_cur[IDX_HeII]; + data[jistart + 17474] = 0.0 + k[3086]*y_cur[IDX_HeII] + k[3087]*y_cur[IDX_HeII] + + k[3088]*y_cur[IDX_HeII]; + data[jistart + 17475] = 0.0 + k[517]*y_cur[IDX_HeII] + k[3219]*y_cur[IDX_HeII] + + k[3220]*y_cur[IDX_HeII] + k[3221]*y_cur[IDX_HeII]; + data[jistart + 17476] = 0.0 + k[3245]*y_cur[IDX_HeII] + k[3246]*y_cur[IDX_HeII] + + k[3247]*y_cur[IDX_HeII] + k[3248]*y_cur[IDX_HeII]; + data[jistart + 17477] = 0.0 + k[515]*y_cur[IDX_HeII] + k[3202]*y_cur[IDX_HeII]; + data[jistart + 17478] = 0.0 + k[508]*y_cur[IDX_HeII] + k[3073]*y_cur[IDX_HeII]; + data[jistart + 17479] = 0.0 + k[3297]*y_cur[IDX_HeII]; + data[jistart + 17480] = 0.0 + k[524]*y_cur[IDX_HeII] + k[3283]*y_cur[IDX_HeII] + + k[3284]*y_cur[IDX_HeII]; + data[jistart + 17481] = 0.0 + k[509]*y_cur[IDX_HeII] + k[3074]*y_cur[IDX_HeII] + + k[3075]*y_cur[IDX_HeII] + k[3076]*y_cur[IDX_HeII]; + data[jistart + 17482] = 0.0 + k[3203]*y_cur[IDX_HeII] + k[3204]*y_cur[IDX_HeII]; + data[jistart + 17483] = 0.0 + k[3176]*y_cur[IDX_HeII]; + data[jistart + 17484] = 0.0 + k[458]*y_cur[IDX_H2I] + k[491]*y_cur[IDX_HI] + + k[506]*y_cur[IDX_C10I] + k[507]*y_cur[IDX_C10HI] + + k[508]*y_cur[IDX_C2I] + k[509]*y_cur[IDX_C2H2I] + + k[510]*y_cur[IDX_C2H4I] + k[511]*y_cur[IDX_C2H5I] + + k[512]*y_cur[IDX_C3NI] + k[513]*y_cur[IDX_CI] + + k[514]*y_cur[IDX_CH4I] + k[515]*y_cur[IDX_CHI] + + k[516]*y_cur[IDX_CO2I] + k[517]*y_cur[IDX_H2COI] + + k[518]*y_cur[IDX_H2OI] + k[519]*y_cur[IDX_H2SI] + + k[520]*y_cur[IDX_HCNOI] + k[521]*y_cur[IDX_HNCOI] + + k[522]*y_cur[IDX_HONCI] + k[523]*y_cur[IDX_N2I] + + k[524]*y_cur[IDX_NH3I] + k[525]*y_cur[IDX_O2I] + + k[526]*y_cur[IDX_PI] + k[527]*y_cur[IDX_SO2I] + + k[528]*y_cur[IDX_SiI] + k[2457]*y_cur[IDX_H2I] + + k[3030]*y_cur[IDX_HNC3I] + k[3031]*y_cur[IDX_HNC3I] + + k[3032]*y_cur[IDX_HNC3I] + k[3033]*y_cur[IDX_HNC3I] + + k[3034]*y_cur[IDX_HNC3I] + k[3056]*y_cur[IDX_C10I] + + k[3057]*y_cur[IDX_C10I] + k[3058]*y_cur[IDX_C10I] + + k[3059]*y_cur[IDX_C10I] + k[3060]*y_cur[IDX_C10I] + + k[3061]*y_cur[IDX_C10I] + k[3062]*y_cur[IDX_C10H2I] + + k[3063]*y_cur[IDX_C10H2I] + k[3064]*y_cur[IDX_C10H2I] + + k[3065]*y_cur[IDX_C10H2I] + k[3066]*y_cur[IDX_C10H2I] + + k[3067]*y_cur[IDX_C10HI] + k[3068]*y_cur[IDX_C10HI] + + k[3069]*y_cur[IDX_C10HI] + k[3070]*y_cur[IDX_C10HI] + + k[3071]*y_cur[IDX_C10HI] + k[3072]*y_cur[IDX_C10HI] + + k[3073]*y_cur[IDX_C2I] + k[3074]*y_cur[IDX_C2H2I] + + k[3075]*y_cur[IDX_C2H2I] + k[3076]*y_cur[IDX_C2H2I] + + k[3077]*y_cur[IDX_C2H3I] + k[3078]*y_cur[IDX_C2H3I] + + k[3079]*y_cur[IDX_C2H4I] + k[3080]*y_cur[IDX_C2H4I] + + k[3081]*y_cur[IDX_C2H4I] + k[3082]*y_cur[IDX_C2H4I] + + k[3083]*y_cur[IDX_C2H5I] + k[3084]*y_cur[IDX_C2H5I] + + k[3085]*y_cur[IDX_C2H5OHI] + k[3086]*y_cur[IDX_C2HI] + + k[3087]*y_cur[IDX_C2HI] + k[3088]*y_cur[IDX_C2HI] + + k[3089]*y_cur[IDX_C2NI] + k[3090]*y_cur[IDX_C2OI] + + k[3091]*y_cur[IDX_C2SI] + k[3092]*y_cur[IDX_C2SI] + + k[3093]*y_cur[IDX_C2SI] + k[3094]*y_cur[IDX_C2SI] + + k[3095]*y_cur[IDX_C3I] + k[3096]*y_cur[IDX_C3H2I] + + k[3097]*y_cur[IDX_C3HI] + k[3098]*y_cur[IDX_C3NI] + + k[3099]*y_cur[IDX_C3OI] + k[3100]*y_cur[IDX_C3OI] + + k[3101]*y_cur[IDX_C3PI] + k[3102]*y_cur[IDX_C3PI] + + k[3103]*y_cur[IDX_C3SI] + k[3104]*y_cur[IDX_C3SI] + + k[3105]*y_cur[IDX_C4I] + k[3106]*y_cur[IDX_C4I] + + k[3107]*y_cur[IDX_C4I] + k[3108]*y_cur[IDX_C4H3I] + + k[3109]*y_cur[IDX_C4H3I] + k[3110]*y_cur[IDX_C4H3I] + + k[3111]*y_cur[IDX_C4HI] + k[3112]*y_cur[IDX_C4HI] + + k[3113]*y_cur[IDX_C4PI] + k[3114]*y_cur[IDX_C4PI] + + k[3115]*y_cur[IDX_C4SI] + k[3116]*y_cur[IDX_C4SI] + + k[3117]*y_cur[IDX_C5I] + k[3118]*y_cur[IDX_C5I] + + k[3119]*y_cur[IDX_C5H2I] + k[3120]*y_cur[IDX_C5H2I] + + k[3121]*y_cur[IDX_C5H2I] + k[3122]*y_cur[IDX_C5HI] + + k[3123]*y_cur[IDX_C5HI] + k[3124]*y_cur[IDX_C5NI] + + k[3125]*y_cur[IDX_C6I] + k[3126]*y_cur[IDX_C6I] + + k[3127]*y_cur[IDX_C6H2I] + k[3128]*y_cur[IDX_C6H2I] + + k[3129]*y_cur[IDX_C6H2I] + k[3130]*y_cur[IDX_C6H6I] + + k[3131]*y_cur[IDX_C6H6I] + k[3132]*y_cur[IDX_C6HI] + + k[3133]*y_cur[IDX_C6HI] + k[3134]*y_cur[IDX_C7I] + + k[3135]*y_cur[IDX_C7I] + k[3136]*y_cur[IDX_C7H2I] + + k[3137]*y_cur[IDX_C7H2I] + k[3138]*y_cur[IDX_C7H2I] + + k[3139]*y_cur[IDX_C7HI] + k[3140]*y_cur[IDX_C7HI] + + k[3141]*y_cur[IDX_C7NI] + k[3142]*y_cur[IDX_C8I] + + k[3143]*y_cur[IDX_C8I] + k[3144]*y_cur[IDX_C8H2I] + + k[3145]*y_cur[IDX_C8H2I] + k[3146]*y_cur[IDX_C8H2I] + + k[3147]*y_cur[IDX_C8HI] + k[3148]*y_cur[IDX_C8HI] + + k[3149]*y_cur[IDX_C9I] + k[3150]*y_cur[IDX_C9I] + + k[3151]*y_cur[IDX_C9H2I] + k[3152]*y_cur[IDX_C9H2I] + + k[3153]*y_cur[IDX_C9H2I] + k[3154]*y_cur[IDX_C9HI] + + k[3155]*y_cur[IDX_C9HI] + k[3156]*y_cur[IDX_C9NI] + + k[3157]*y_cur[IDX_CCPI] + k[3158]*y_cur[IDX_CCPI] + + k[3159]*y_cur[IDX_CClI] + k[3160]*y_cur[IDX_CH2I] + + k[3161]*y_cur[IDX_CH2I] + k[3162]*y_cur[IDX_CH2CCHI] + + k[3163]*y_cur[IDX_CH2CCHI] + k[3164]*y_cur[IDX_CH2CCHI] + + k[3165]*y_cur[IDX_CH2CHCNI] + k[3166]*y_cur[IDX_CH2CHCNI] + + k[3167]*y_cur[IDX_CH2CHCNI] + k[3168]*y_cur[IDX_CH2CHCNI] + + k[3169]*y_cur[IDX_CH2CHCNI] + k[3170]*y_cur[IDX_CH2CNI] + + k[3171]*y_cur[IDX_CH2COI] + k[3172]*y_cur[IDX_CH2COI] + + k[3173]*y_cur[IDX_CH2NHI] + k[3174]*y_cur[IDX_CH2PHI] + + k[3175]*y_cur[IDX_CH2PHI] + k[3176]*y_cur[IDX_CH3I] + + k[3177]*y_cur[IDX_CH3C3NI] + k[3178]*y_cur[IDX_CH3C4HI] + + k[3179]*y_cur[IDX_CH3C4HI] + k[3180]*y_cur[IDX_CH3C5NI] + + k[3181]*y_cur[IDX_CH3C6HI] + k[3182]*y_cur[IDX_CH3C6HI] + + k[3183]*y_cur[IDX_CH3C7NI] + k[3184]*y_cur[IDX_CH3CCHI] + + k[3185]*y_cur[IDX_CH3CCHI] + k[3186]*y_cur[IDX_CH3CCHI] + + k[3187]*y_cur[IDX_CH3CCHI] + k[3188]*y_cur[IDX_C2H6I] + + k[3189]*y_cur[IDX_C2H6I] + k[3190]*y_cur[IDX_C2H6I] + + k[3191]*y_cur[IDX_CH3CHOI] + k[3192]*y_cur[IDX_CH3CNI] + + k[3193]*y_cur[IDX_CH3CNI] + k[3194]*y_cur[IDX_CH3COCH3I] + + k[3195]*y_cur[IDX_CH3OCH3I] + k[3196]*y_cur[IDX_CH3OHI] + + k[3197]*y_cur[IDX_CH3OHI] + k[3198]*y_cur[IDX_CH4I] + + k[3199]*y_cur[IDX_CH4I] + k[3200]*y_cur[IDX_CH4I] + + k[3201]*y_cur[IDX_CH4I] + k[3202]*y_cur[IDX_CHI] + + k[3203]*y_cur[IDX_CNI] + k[3204]*y_cur[IDX_CNI] + + k[3205]*y_cur[IDX_CNOI] + k[3206]*y_cur[IDX_CNOI] + + k[3207]*y_cur[IDX_CO2I] + k[3208]*y_cur[IDX_CO2I] + + k[3209]*y_cur[IDX_CO2I] + k[3210]*y_cur[IDX_CO2I] + + k[3211]*y_cur[IDX_COI] + k[3212]*y_cur[IDX_CPI] + + k[3213]*y_cur[IDX_CPI] + k[3214]*y_cur[IDX_CSI] + + k[3215]*y_cur[IDX_CSI] + k[3216]*y_cur[IDX_ClOI] + + k[3217]*y_cur[IDX_H2CCCI] + k[3218]*y_cur[IDX_H2CCCI] + + k[3219]*y_cur[IDX_H2COI] + k[3220]*y_cur[IDX_H2COI] + + k[3221]*y_cur[IDX_H2COI] + k[3222]*y_cur[IDX_H2CSI] + + k[3223]*y_cur[IDX_H2CSI] + k[3224]*y_cur[IDX_H2CSI] + + k[3225]*y_cur[IDX_H2OI] + k[3226]*y_cur[IDX_H2OI] + + k[3227]*y_cur[IDX_H2S2I] + k[3228]*y_cur[IDX_H2S2I] + + k[3229]*y_cur[IDX_H2SI] + k[3230]*y_cur[IDX_H2SI] + + k[3231]*y_cur[IDX_H2SiOI] + k[3232]*y_cur[IDX_HC2PI] + + k[3233]*y_cur[IDX_HC2PI] + k[3234]*y_cur[IDX_HC3NI] + + k[3235]*y_cur[IDX_HC3NI] + k[3236]*y_cur[IDX_HC3NI] + + k[3237]*y_cur[IDX_HC3NI] + k[3238]*y_cur[IDX_C4H2I] + + k[3239]*y_cur[IDX_C4H2I] + k[3240]*y_cur[IDX_C4H2I] + + k[3241]*y_cur[IDX_HC5NI] + k[3242]*y_cur[IDX_HC5NI] + + k[3243]*y_cur[IDX_HC7NI] + k[3244]*y_cur[IDX_HC9NI] + + k[3245]*y_cur[IDX_HCNI] + k[3246]*y_cur[IDX_HCNI] + + k[3247]*y_cur[IDX_HCNI] + k[3248]*y_cur[IDX_HCNI] + + k[3249]*y_cur[IDX_HCOI] + k[3251]*y_cur[IDX_HCOI] + + k[3252]*y_cur[IDX_HCOOCH3I] + k[3253]*y_cur[IDX_HCPI] + + k[3254]*y_cur[IDX_HCPI] + k[3255]*y_cur[IDX_HCSI] + + k[3256]*y_cur[IDX_HCSI] + k[3257]*y_cur[IDX_HCSiI] + + k[3258]*y_cur[IDX_HCSiI] + k[3259]*y_cur[IDX_HClI] + + k[3260]*y_cur[IDX_HFI] + k[3261]*y_cur[IDX_HNCI] + + k[3262]*y_cur[IDX_HNCI] + k[3263]*y_cur[IDX_HNCI] + + k[3264]*y_cur[IDX_HNCOI] + k[3265]*y_cur[IDX_HNOI] + + k[3266]*y_cur[IDX_HNOI] + k[3267]*y_cur[IDX_HNSiI] + + k[3268]*y_cur[IDX_HOCNI] + k[3269]*y_cur[IDX_HPOI] + + k[3270]*y_cur[IDX_HPOI] + k[3271]*y_cur[IDX_HS2I] + + k[3272]*y_cur[IDX_HS2I] + k[3273]*y_cur[IDX_HSI] + + k[3274]*y_cur[IDX_N2I] + k[3275]*y_cur[IDX_N2OI] + + k[3276]*y_cur[IDX_N2OI] + k[3277]*y_cur[IDX_N2OI] + + k[3278]*y_cur[IDX_N2OI] + k[3279]*y_cur[IDX_NCCNI] + + k[3280]*y_cur[IDX_NH2I] + k[3281]*y_cur[IDX_NH2I] + + k[3282]*y_cur[IDX_NH2CNI] + k[3283]*y_cur[IDX_NH3I] + + k[3284]*y_cur[IDX_NH3I] + k[3285]*y_cur[IDX_NHI] + + k[3286]*y_cur[IDX_NOI] + k[3287]*y_cur[IDX_NOI] + + k[3288]*y_cur[IDX_NSI] + k[3289]*y_cur[IDX_NSI] + + k[3290]*y_cur[IDX_O2I] + k[3291]*y_cur[IDX_OCNI] + + k[3292]*y_cur[IDX_OCNI] + k[3293]*y_cur[IDX_OCSI] + + k[3294]*y_cur[IDX_OCSI] + k[3295]*y_cur[IDX_OCSI] + + k[3296]*y_cur[IDX_OCSI] + k[3297]*y_cur[IDX_OHI] + + k[3298]*y_cur[IDX_PH2I] + k[3299]*y_cur[IDX_PHI] + + k[3300]*y_cur[IDX_PNI] + k[3301]*y_cur[IDX_POI] + + k[3302]*y_cur[IDX_S2I] + k[3303]*y_cur[IDX_SO2I] + + k[3304]*y_cur[IDX_SO2I] + k[3305]*y_cur[IDX_SOI] + + k[3306]*y_cur[IDX_SOI] + k[3307]*y_cur[IDX_SiC2I] + + k[3308]*y_cur[IDX_SiC2H2I] + k[3309]*y_cur[IDX_SiC2H2I] + + k[3310]*y_cur[IDX_SiC2HI] + k[3311]*y_cur[IDX_SiC2HI] + + k[3312]*y_cur[IDX_SiC3I] + k[3313]*y_cur[IDX_SiC3HI] + + k[3314]*y_cur[IDX_SiC3HI] + k[3315]*y_cur[IDX_SiC4I] + + k[3316]*y_cur[IDX_SiCI] + k[3317]*y_cur[IDX_SiCI] + + k[3318]*y_cur[IDX_SiCH2I] + k[3319]*y_cur[IDX_SiCH2I] + + k[3320]*y_cur[IDX_SiCH3I] + k[3321]*y_cur[IDX_SiCH3I] + + k[3322]*y_cur[IDX_SiH2I] + k[3323]*y_cur[IDX_SiH2I] + + k[3324]*y_cur[IDX_SiH3I] + k[3325]*y_cur[IDX_SiH3I] + + k[3326]*y_cur[IDX_SiH4I] + k[3327]*y_cur[IDX_SiH4I] + + k[3328]*y_cur[IDX_SiHI] + k[3329]*y_cur[IDX_SiNI] + + k[3330]*y_cur[IDX_SiNCI] + k[3331]*y_cur[IDX_SiO2I] + + k[3332]*y_cur[IDX_SiOI] + k[3333]*y_cur[IDX_SiOI] + + k[3334]*y_cur[IDX_SiSI] + k[3335]*y_cur[IDX_SiSI] + + k[3906]*y_cur[IDX_CM] + k[3941]*y_cur[IDX_C10M] + + k[3976]*y_cur[IDX_C10HM] + k[4011]*y_cur[IDX_C2M] + + k[4046]*y_cur[IDX_C2HM] + k[4081]*y_cur[IDX_C3M] + + k[4116]*y_cur[IDX_C3HM] + k[4151]*y_cur[IDX_C3NM] + + k[4186]*y_cur[IDX_C4M] + k[4221]*y_cur[IDX_C4HM] + + k[4256]*y_cur[IDX_C5M] + k[4291]*y_cur[IDX_C5HM] + + k[4326]*y_cur[IDX_C5NM] + k[4361]*y_cur[IDX_C6M] + + k[4396]*y_cur[IDX_C6HM] + k[4431]*y_cur[IDX_C7M] + + k[4466]*y_cur[IDX_C7HM] + k[4501]*y_cur[IDX_C8M] + + k[4536]*y_cur[IDX_C8HM] + k[4571]*y_cur[IDX_C9M] + + k[4606]*y_cur[IDX_C9HM] + k[4641]*y_cur[IDX_CHM] + + k[4676]*y_cur[IDX_CNM] + k[4712]*y_cur[IDX_HM] + + k[4747]*y_cur[IDX_OM] + k[4782]*y_cur[IDX_O2M] + + k[4817]*y_cur[IDX_OHM] + k[4852]*y_cur[IDX_SM] + + k[5619]*y_cur[IDX_eM] + k[5631]*y_cur[IDX_CH3OI] + + k[5632]*y_cur[IDX_CH3OI] + k[5637]*y_cur[IDX_CH2OHI] + + k[5638]*y_cur[IDX_CH2OHI] + k[5642]*y_cur[IDX_CH3COI] + + k[5643]*y_cur[IDX_CH3COI] + k[5647]*y_cur[IDX_COOHI] + + k[5648]*y_cur[IDX_COOHI] + k[5653]*y_cur[IDX_COOCH3I] + + k[5654]*y_cur[IDX_COOCH3I] + k[5659]*y_cur[IDX_CH2OHCOI] + + k[5660]*y_cur[IDX_CH2OHCOI] + k[5665]*y_cur[IDX_CH2OHCHOI] + + k[5666]*y_cur[IDX_CH2OHCHOI] + k[5671]*y_cur[IDX_CH3COOHI] + + k[5672]*y_cur[IDX_CH3COOHI] + k[5673]*y_cur[IDX_CH3COOHI] + + k[5674]*y_cur[IDX_CH3COOHI] + k[6312]*y_cur[IDX_GRAINM]; + data[jistart + 17485] = 0.0 - k[2390]*y_cur[IDX_H2II] - k[5547]*y_cur[IDX_HII] - k[5683] - + k[5876] - k[6298] - k[6890]; + data[jistart + 17486] = 0.0 + k[518]*y_cur[IDX_HeII] + k[3225]*y_cur[IDX_HeII] + + k[3226]*y_cur[IDX_HeII]; + data[jistart + 17487] = 0.0 - k[5547]*y_cur[IDX_HeI]; + data[jistart + 17488] = 0.0 + k[513]*y_cur[IDX_HeII]; + data[jistart + 17489] = 0.0 + k[3211]*y_cur[IDX_HeII]; + data[jistart + 17490] = 0.0 + k[6312]*y_cur[IDX_HeII] + k[6313]*y_cur[IDX_HeHII]; + data[jistart + 17491] = 0.0 + k[458]*y_cur[IDX_HeII] + k[2457]*y_cur[IDX_HeII] + + k[2458]*y_cur[IDX_HeHII]; + data[jistart + 17492] = 0.0 + k[1149]*y_cur[IDX_HeHII] + k[5619]*y_cur[IDX_HeII]; + data[jistart + 17493] = 0.0 + k[491]*y_cur[IDX_HeII] + k[2845]*y_cur[IDX_HeHII]; + data[jistart + 17494] = 0.0 - k[172]*y_cur[IDX_CII]; + data[jistart + 17495] = 0.0 + k[249]*y_cur[IDX_CI]; + data[jistart + 17496] = 0.0 - k[159]*y_cur[IDX_CII] + k[3159]*y_cur[IDX_HeII]; + data[jistart + 17497] = 0.0 - k[5649]*y_cur[IDX_CII]; + data[jistart + 17498] = 0.0 - k[1433]*y_cur[IDX_CII]; + data[jistart + 17499] = 0.0 - k[1412]*y_cur[IDX_CII]; + data[jistart + 17500] = 0.0 - k[5655]*y_cur[IDX_CII]; + data[jistart + 17501] = 0.0 - k[1359]*y_cur[IDX_CII]; + data[jistart + 17502] = 0.0 - k[1362]*y_cur[IDX_CII]; + data[jistart + 17503] = 0.0 - k[176]*y_cur[IDX_CII]; + data[jistart + 17504] = 0.0 - k[1386]*y_cur[IDX_CII]; + data[jistart + 17505] = 0.0 - k[1414]*y_cur[IDX_CII]; + data[jistart + 17506] = 0.0 - k[1431]*y_cur[IDX_CII]; + data[jistart + 17507] = 0.0 - k[5661]*y_cur[IDX_CII]; + data[jistart + 17508] = 0.0 - k[200]*y_cur[IDX_CII] - k[1437]*y_cur[IDX_CII] - + k[1438]*y_cur[IDX_CII]; + data[jistart + 17509] = 0.0 - k[1351]*y_cur[IDX_CII]; + data[jistart + 17510] = 0.0 - k[1354]*y_cur[IDX_CII] - k[1355]*y_cur[IDX_CII]; + data[jistart + 17511] = 0.0 - k[181]*y_cur[IDX_CII]; + data[jistart + 17512] = 0.0 - k[5639]*y_cur[IDX_CII]; + data[jistart + 17513] = 0.0 - k[5644]*y_cur[IDX_CII]; + data[jistart + 17514] = 0.0 - k[1360]*y_cur[IDX_CII] - k[1361]*y_cur[IDX_CII]; + data[jistart + 17515] = 0.0 - k[1406]*y_cur[IDX_CII]; + data[jistart + 17516] = 0.0 - k[179]*y_cur[IDX_CII]; + data[jistart + 17517] = 0.0 - k[196]*y_cur[IDX_CII] - k[1432]*y_cur[IDX_CII]; + data[jistart + 17518] = 0.0 - k[197]*y_cur[IDX_CII]; + data[jistart + 17519] = 0.0 - k[1321]*y_cur[IDX_CII]; + data[jistart + 17520] = 0.0 - k[163]*y_cur[IDX_CII]; + data[jistart + 17521] = 0.0 - k[180]*y_cur[IDX_CII] - k[1409]*y_cur[IDX_CII] + + k[3254]*y_cur[IDX_HeII]; + data[jistart + 17522] = 0.0 - k[1411]*y_cur[IDX_CII]; + data[jistart + 17523] = 0.0 - k[1315]*y_cur[IDX_CII]; + data[jistart + 17524] = 0.0 - k[1356]*y_cur[IDX_CII] - k[1357]*y_cur[IDX_CII] - + k[1358]*y_cur[IDX_CII]; + data[jistart + 17525] = 0.0 - k[5667]*y_cur[IDX_CII]; + data[jistart + 17526] = 0.0 - k[169]*y_cur[IDX_CII]; + data[jistart + 17527] = 0.0 - k[1392]*y_cur[IDX_CII]; + data[jistart + 17528] = 0.0 - k[192]*y_cur[IDX_CII]; + data[jistart + 17529] = 0.0 - k[154]*y_cur[IDX_CII] - k[1316]*y_cur[IDX_CII]; + data[jistart + 17530] = 0.0 - k[5627]*y_cur[IDX_CII]; + data[jistart + 17531] = 0.0 - k[1396]*y_cur[IDX_CII] - k[1397]*y_cur[IDX_CII]; + data[jistart + 17532] = 0.0 - k[1410]*y_cur[IDX_CII]; + data[jistart + 17533] = 0.0 - k[199]*y_cur[IDX_CII] - k[1435]*y_cur[IDX_CII] - + k[1436]*y_cur[IDX_CII]; + data[jistart + 17534] = 0.0 - k[195]*y_cur[IDX_CII]; + data[jistart + 17535] = 0.0 - k[151]*y_cur[IDX_CII] + k[3090]*y_cur[IDX_HeII]; + data[jistart + 17536] = 0.0 - k[5633]*y_cur[IDX_CII]; + data[jistart + 17537] = 0.0 - k[203]*y_cur[IDX_CII] - k[1446]*y_cur[IDX_CII]; + data[jistart + 17538] = 0.0 - k[187]*y_cur[IDX_CII] - k[1421]*y_cur[IDX_CII]; + data[jistart + 17539] = 0.0 - k[201]*y_cur[IDX_CII] - k[1439]*y_cur[IDX_CII] - + k[1440]*y_cur[IDX_CII]; + data[jistart + 17540] = 0.0 - k[153]*y_cur[IDX_CII] - k[1313]*y_cur[IDX_CII] - + k[1314]*y_cur[IDX_CII]; + data[jistart + 17541] = 0.0 - k[1338]*y_cur[IDX_CII] - k[1339]*y_cur[IDX_CII]; + data[jistart + 17542] = 0.0 - k[1348]*y_cur[IDX_CII] - k[1349]*y_cur[IDX_CII] - + k[1350]*y_cur[IDX_CII]; + data[jistart + 17543] = 0.0 - k[1405]*y_cur[IDX_CII]; + data[jistart + 17544] = 0.0 - k[157]*y_cur[IDX_CII] - k[1328]*y_cur[IDX_CII] - + k[1329]*y_cur[IDX_CII] - k[1330]*y_cur[IDX_CII]; + data[jistart + 17545] = 0.0 - k[1297]*y_cur[IDX_CII]; + data[jistart + 17546] = 0.0 - k[158]*y_cur[IDX_CII] - k[1341]*y_cur[IDX_CII] + + k[3157]*y_cur[IDX_HeII]; + data[jistart + 17547] = 0.0 - k[171]*y_cur[IDX_CII] + k[3213]*y_cur[IDX_HeII]; + data[jistart + 17548] = 0.0 - k[1427]*y_cur[IDX_CII]; + data[jistart + 17549] = 0.0 - k[198]*y_cur[IDX_CII] - k[1434]*y_cur[IDX_CII] + + k[3317]*y_cur[IDX_HeII]; + data[jistart + 17550] = 0.0 - k[150]*y_cur[IDX_CII] - k[1307]*y_cur[IDX_CII]; + data[jistart + 17551] = 0.0 - k[1416]*y_cur[IDX_CII]; + data[jistart + 17552] = 0.0 - k[202]*y_cur[IDX_CII] - k[1441]*y_cur[IDX_CII] - + k[1442]*y_cur[IDX_CII]; + data[jistart + 17553] = 0.0 - k[164]*y_cur[IDX_CII]; + data[jistart + 17554] = 0.0 - k[3016]*y_cur[IDX_CII] - k[3017]*y_cur[IDX_CII] - + k[3018]*y_cur[IDX_CII] - k[3019]*y_cur[IDX_CII]; + data[jistart + 17555] = 0.0 - k[1424]*y_cur[IDX_CII]; + data[jistart + 17556] = 0.0 - k[168]*y_cur[IDX_CII] - k[1380]*y_cur[IDX_CII]; + data[jistart + 17557] = 0.0 - k[1335]*y_cur[IDX_CII] - k[1336]*y_cur[IDX_CII]; + data[jistart + 17558] = 0.0 - k[1404]*y_cur[IDX_CII]; + data[jistart + 17559] = 0.0 - k[1445]*y_cur[IDX_CII]; + data[jistart + 17560] = 0.0 - k[1443]*y_cur[IDX_CII] - k[1444]*y_cur[IDX_CII]; + data[jistart + 17561] = 0.0 - k[191]*y_cur[IDX_CII]; + data[jistart + 17562] = 0.0 - k[1332]*y_cur[IDX_CII] - k[1333]*y_cur[IDX_CII]; + data[jistart + 17563] = 0.0 - k[167]*y_cur[IDX_CII] - k[1378]*y_cur[IDX_CII]; + data[jistart + 17564] = 0.0 - k[1379]*y_cur[IDX_CII]; + data[jistart + 17565] = 0.0 - k[183]*y_cur[IDX_CII] - k[184]*y_cur[IDX_CII]; + data[jistart + 17566] = 0.0 - k[1388]*y_cur[IDX_CII] - k[1389]*y_cur[IDX_CII]; + data[jistart + 17567] = 0.0 - k[1326]*y_cur[IDX_CII] - k[1327]*y_cur[IDX_CII]; + data[jistart + 17568] = 0.0 - k[1323]*y_cur[IDX_CII] - k[1324]*y_cur[IDX_CII]; + data[jistart + 17569] = 0.0 - k[161]*y_cur[IDX_CII] - k[1343]*y_cur[IDX_CII] - + k[1344]*y_cur[IDX_CII] - k[1345]*y_cur[IDX_CII]; + data[jistart + 17570] = 0.0 + k[245]*y_cur[IDX_CI]; + data[jistart + 17571] = 0.0 - k[1367]*y_cur[IDX_CII] - k[1368]*y_cur[IDX_CII] - + k[1369]*y_cur[IDX_CII] - k[1370]*y_cur[IDX_CII] - + k[1371]*y_cur[IDX_CII] - k[1372]*y_cur[IDX_CII]; + data[jistart + 17572] = 0.0 - k[1310]*y_cur[IDX_CII] - k[1311]*y_cur[IDX_CII]; + data[jistart + 17573] = 0.0 - k[149]*y_cur[IDX_CII] - k[1306]*y_cur[IDX_CII]; + data[jistart + 17574] = 0.0 + k[247]*y_cur[IDX_CI]; + data[jistart + 17575] = 0.0 - k[166]*y_cur[IDX_CII] - k[1373]*y_cur[IDX_CII] - + k[1374]*y_cur[IDX_CII] - k[1375]*y_cur[IDX_CII] - + k[1376]*y_cur[IDX_CII] - k[1377]*y_cur[IDX_CII]; + data[jistart + 17576] = 0.0 + k[244]*y_cur[IDX_CI] + k[3383]*y_cur[IDX_NI] + k[5975]; + data[jistart + 17577] = 0.0 - k[4762]*y_cur[IDX_CII]; + data[jistart + 17578] = 0.0 - k[4621]*y_cur[IDX_CII]; + data[jistart + 17579] = 0.0 - k[189]*y_cur[IDX_CII] - k[1425]*y_cur[IDX_CII]; + data[jistart + 17580] = 0.0 - k[190]*y_cur[IDX_CII]; + data[jistart + 17581] = 0.0 - k[4832]*y_cur[IDX_CII]; + data[jistart + 17582] = 0.0 - k[4026]*y_cur[IDX_CII]; + data[jistart + 17583] = 0.0 - k[4201]*y_cur[IDX_CII]; + data[jistart + 17584] = 0.0 + k[246]*y_cur[IDX_CI] + k[6136]; + data[jistart + 17585] = 0.0 - k[165]*y_cur[IDX_CII] - k[1363]*y_cur[IDX_CII] - + k[1364]*y_cur[IDX_CII] - k[1365]*y_cur[IDX_CII] - + k[1366]*y_cur[IDX_CII]; + data[jistart + 17586] = 0.0 - k[4797]*y_cur[IDX_CII]; + data[jistart + 17587] = 0.0 - k[3956]*y_cur[IDX_CII]; + data[jistart + 17588] = 0.0 - k[4096]*y_cur[IDX_CII]; + data[jistart + 17589] = 0.0 - k[156]*y_cur[IDX_CII] - k[1322]*y_cur[IDX_CII]; + data[jistart + 17590] = 0.0 - k[4376]*y_cur[IDX_CII]; + data[jistart + 17591] = 0.0 - k[4516]*y_cur[IDX_CII]; + data[jistart + 17592] = 0.0 - k[4446]*y_cur[IDX_CII]; + data[jistart + 17593] = 0.0 - k[4586]*y_cur[IDX_CII]; + data[jistart + 17594] = 0.0 - k[3921]*y_cur[IDX_CII]; + data[jistart + 17595] = 0.0 - k[4271]*y_cur[IDX_CII]; + data[jistart + 17596] = 0.0 - k[4306]*y_cur[IDX_CII]; + data[jistart + 17597] = 0.0 - k[1415]*y_cur[IDX_CII]; + data[jistart + 17598] = 0.0 - k[3886]*y_cur[IDX_CII]; + data[jistart + 17599] = 0.0 + k[3215]*y_cur[IDX_HeII]; + data[jistart + 17600] = 0.0 - k[4727]*y_cur[IDX_CII]; + data[jistart + 17601] = 0.0 - k[4551]*y_cur[IDX_CII]; + data[jistart + 17602] = 0.0 - k[1381]*y_cur[IDX_CII] - k[1382]*y_cur[IDX_CII]; + data[jistart + 17603] = 0.0 - k[4691]*y_cur[IDX_CII]; + data[jistart + 17604] = 0.0 - k[1398]*y_cur[IDX_CII] - k[1399]*y_cur[IDX_CII] - + k[1400]*y_cur[IDX_CII] - k[1401]*y_cur[IDX_CII]; + data[jistart + 17605] = 0.0 - k[204]*y_cur[IDX_CII] - k[1448]*y_cur[IDX_CII]; + data[jistart + 17606] = 0.0 - k[4481]*y_cur[IDX_CII]; + data[jistart + 17607] = 0.0 - k[3991]*y_cur[IDX_CII]; + data[jistart + 17608] = 0.0 - k[152]*y_cur[IDX_CII] - k[1309]*y_cur[IDX_CII] + + k[3092]*y_cur[IDX_HeII]; + data[jistart + 17609] = 0.0 - k[4061]*y_cur[IDX_CII]; + data[jistart + 17610] = 0.0 - k[4166]*y_cur[IDX_CII]; + data[jistart + 17611] = 0.0 - k[4341]*y_cur[IDX_CII]; + data[jistart + 17612] = 0.0 - k[4236]*y_cur[IDX_CII]; + data[jistart + 17613] = 0.0 - k[4411]*y_cur[IDX_CII]; + data[jistart + 17614] = 0.0 + k[3089]*y_cur[IDX_HeII]; + data[jistart + 17615] = 0.0 - k[1417]*y_cur[IDX_CII]; + data[jistart + 17616] = 0.0 - k[155]*y_cur[IDX_CII] - k[1317]*y_cur[IDX_CII] - + k[1318]*y_cur[IDX_CII] - k[1319]*y_cur[IDX_CII]; + data[jistart + 17617] = 0.0 + k[6075]; + data[jistart + 17618] = 0.0 - k[4131]*y_cur[IDX_CII]; + data[jistart + 17619] = 0.0 + k[2835]*y_cur[IDX_HI] + k[5776]; + data[jistart + 17620] = 0.0 - k[1387]*y_cur[IDX_CII] + k[3210]*y_cur[IDX_HeII]; + data[jistart + 17621] = 0.0 + k[248]*y_cur[IDX_CI]; + data[jistart + 17622] = 0.0 - k[147]*y_cur[IDX_CII] - k[1298]*y_cur[IDX_CII] - + k[1299]*y_cur[IDX_CII]; + data[jistart + 17623] = 0.0 - k[1340]*y_cur[IDX_CII]; + data[jistart + 17624] = 0.0 - k[1447]*y_cur[IDX_CII]; + data[jistart + 17625] = 0.0 - k[173]*y_cur[IDX_CII]; + data[jistart + 17626] = 0.0 - k[182]*y_cur[IDX_CII]; + data[jistart + 17627] = 0.0 - k[188]*y_cur[IDX_CII]; + data[jistart + 17628] = 0.0 - k[5495]*y_cur[IDX_CII]; + data[jistart + 17629] = 0.0 - k[1337]*y_cur[IDX_CII]; + data[jistart + 17630] = 0.0 - k[5500]*y_cur[IDX_CII]; + data[jistart + 17631] = 0.0 - k[5502]*y_cur[IDX_CII]; + data[jistart + 17632] = 0.0 - k[5501]*y_cur[IDX_CII]; + data[jistart + 17633] = 0.0 - k[1420]*y_cur[IDX_CII]; + data[jistart + 17634] = 0.0 - k[5498]*y_cur[IDX_CII]; + data[jistart + 17635] = 0.0 - k[5499]*y_cur[IDX_CII]; + data[jistart + 17636] = 0.0 - k[4656]*y_cur[IDX_CII]; + data[jistart + 17637] = 0.0 + k[3107]*y_cur[IDX_HeII] - k[5497]*y_cur[IDX_CII]; + data[jistart + 17638] = 0.0 - k[193]*y_cur[IDX_CII] - k[1428]*y_cur[IDX_CII] - + k[1429]*y_cur[IDX_CII] - k[1430]*y_cur[IDX_CII]; + data[jistart + 17639] = 0.0 - k[1334]*y_cur[IDX_CII]; + data[jistart + 17640] = 0.0 - k[162]*y_cur[IDX_CII] - k[1346]*y_cur[IDX_CII] - + k[1347]*y_cur[IDX_CII]; + data[jistart + 17641] = 0.0 - k[1331]*y_cur[IDX_CII]; + data[jistart + 17642] = 0.0 - k[1325]*y_cur[IDX_CII]; + data[jistart + 17643] = 0.0 - k[1312]*y_cur[IDX_CII]; + data[jistart + 17644] = 0.0 + k[3095]*y_cur[IDX_HeII] - k[5496]*y_cur[IDX_CII]; + data[jistart + 17645] = 0.0 - k[1320]*y_cur[IDX_CII]; + data[jistart + 17646] = 0.0 - k[177]*y_cur[IDX_CII] - k[1402]*y_cur[IDX_CII] - + k[1403]*y_cur[IDX_CII]; + data[jistart + 17647] = 0.0 - k[160]*y_cur[IDX_CII] - k[1342]*y_cur[IDX_CII] + + k[3160]*y_cur[IDX_HeII]; + data[jistart + 17648] = 0.0 - k[1413]*y_cur[IDX_CII] + k[3262]*y_cur[IDX_HeII]; + data[jistart + 17649] = 0.0 - k[148]*y_cur[IDX_CII] - k[1302]*y_cur[IDX_CII] - + k[1303]*y_cur[IDX_CII] - k[1304]*y_cur[IDX_CII] - + k[1305]*y_cur[IDX_CII]; + data[jistart + 17650] = 0.0 - k[1301]*y_cur[IDX_CII]; + data[jistart + 17651] = 0.0 - k[1422]*y_cur[IDX_CII] - k[1423]*y_cur[IDX_CII]; + data[jistart + 17652] = 0.0 - k[175]*y_cur[IDX_CII] - k[1395]*y_cur[IDX_CII]; + data[jistart + 17653] = 0.0 - k[194]*y_cur[IDX_CII]; + data[jistart + 17654] = 0.0 - k[186]*y_cur[IDX_CII]; + data[jistart + 17655] = 0.0 - k[178]*y_cur[IDX_CII] - k[1408]*y_cur[IDX_CII]; + data[jistart + 17656] = 0.0 - k[1383]*y_cur[IDX_CII] - k[1384]*y_cur[IDX_CII]; + data[jistart + 17657] = 0.0 - k[1308]*y_cur[IDX_CII] + k[3088]*y_cur[IDX_HeII]; + data[jistart + 17658] = 0.0 - k[174]*y_cur[IDX_CII] - k[1390]*y_cur[IDX_CII] - + k[1391]*y_cur[IDX_CII]; + data[jistart + 17659] = 0.0 - k[1407]*y_cur[IDX_CII] + k[3247]*y_cur[IDX_HeII]; + data[jistart + 17660] = 0.0 - k[170]*y_cur[IDX_CII] - k[1385]*y_cur[IDX_CII] + + k[3202]*y_cur[IDX_HeII]; + data[jistart + 17661] = 0.0 - k[707]*y_cur[IDX_CII] - k[708]*y_cur[IDX_CII] - + k[5506]*y_cur[IDX_CII]; + data[jistart + 17662] = 0.0 + k[3073]*y_cur[IDX_HeII]; + data[jistart + 17663] = 0.0 - k[1426]*y_cur[IDX_CII]; + data[jistart + 17664] = 0.0 - k[185]*y_cur[IDX_CII] - k[1418]*y_cur[IDX_CII] - + k[1419]*y_cur[IDX_CII]; + data[jistart + 17665] = 0.0 - k[1300]*y_cur[IDX_CII]; + data[jistart + 17666] = 0.0 + k[3204]*y_cur[IDX_HeII]; + data[jistart + 17667] = 0.0 - k[1352]*y_cur[IDX_CII] - k[1353]*y_cur[IDX_CII]; + data[jistart + 17668] = 0.0 + k[3383]*y_cur[IDX_C2II] - k[5504]*y_cur[IDX_CII]; + data[jistart + 17669] = 0.0 - k[5505]*y_cur[IDX_CII]; + data[jistart + 17670] = 0.0 + k[513]*y_cur[IDX_CI] + k[3073]*y_cur[IDX_C2I] + + k[3088]*y_cur[IDX_C2HI] + k[3089]*y_cur[IDX_C2NI] + + k[3090]*y_cur[IDX_C2OI] + k[3092]*y_cur[IDX_C2SI] + + k[3095]*y_cur[IDX_C3I] + k[3107]*y_cur[IDX_C4I] + + k[3157]*y_cur[IDX_CCPI] + k[3159]*y_cur[IDX_CClI] + + k[3160]*y_cur[IDX_CH2I] + k[3202]*y_cur[IDX_CHI] + + k[3204]*y_cur[IDX_CNI] + k[3210]*y_cur[IDX_CO2I] + + k[3211]*y_cur[IDX_COI] + k[3213]*y_cur[IDX_CPI] + + k[3215]*y_cur[IDX_CSI] + k[3247]*y_cur[IDX_HCNI] + + k[3254]*y_cur[IDX_HCPI] + k[3262]*y_cur[IDX_HNCI] + + k[3317]*y_cur[IDX_SiCI]; + data[jistart + 17671] = 0.0 - k[147]*y_cur[IDX_C10HI] - k[148]*y_cur[IDX_C2H4I] - + k[149]*y_cur[IDX_C2H5I] - k[150]*y_cur[IDX_C2H5OHI] - + k[151]*y_cur[IDX_C2OI] - k[152]*y_cur[IDX_C2SI] - + k[153]*y_cur[IDX_C3OI] - k[154]*y_cur[IDX_C3SI] - + k[155]*y_cur[IDX_C4H3I] - k[156]*y_cur[IDX_C4SI] - + k[157]*y_cur[IDX_C6H6I] - k[158]*y_cur[IDX_CCPI] - + k[159]*y_cur[IDX_CClI] - k[160]*y_cur[IDX_CH2I] - + k[161]*y_cur[IDX_CH2CCH2I] - k[162]*y_cur[IDX_CH2CCHI] - + k[163]*y_cur[IDX_CH2CNI] - k[164]*y_cur[IDX_CH2COI] - + k[165]*y_cur[IDX_CH3CCHI] - k[166]*y_cur[IDX_CH3CHCH2I] - + k[167]*y_cur[IDX_CH3CHOI] - k[168]*y_cur[IDX_CH3COCH3I] - + k[169]*y_cur[IDX_CH3OCH3I] - k[170]*y_cur[IDX_CHI] - + k[171]*y_cur[IDX_CPI] - k[172]*y_cur[IDX_ClOI] - + k[173]*y_cur[IDX_FeI] - k[174]*y_cur[IDX_H2COI] - + k[175]*y_cur[IDX_H2SI] - k[176]*y_cur[IDX_H2SiOI] - + k[177]*y_cur[IDX_C4H2I] - k[178]*y_cur[IDX_HCOI] - + k[179]*y_cur[IDX_HCOOCH3I] - k[180]*y_cur[IDX_HCPI] - + k[181]*y_cur[IDX_HPOI] - k[182]*y_cur[IDX_MgI] - + k[183]*y_cur[IDX_NCCNI] - k[184]*y_cur[IDX_NCCNI] - + k[185]*y_cur[IDX_NH3I] - k[186]*y_cur[IDX_NOI] - + k[187]*y_cur[IDX_NSI] - k[188]*y_cur[IDX_NaI] - + k[189]*y_cur[IDX_OCSI] - k[190]*y_cur[IDX_PI] - + k[191]*y_cur[IDX_PHI] - k[192]*y_cur[IDX_POI] - + k[193]*y_cur[IDX_SOI] - k[194]*y_cur[IDX_SiI] - + k[195]*y_cur[IDX_SiC2I] - k[196]*y_cur[IDX_SiC2HI] - + k[197]*y_cur[IDX_SiC3I] - k[198]*y_cur[IDX_SiCI] - + k[199]*y_cur[IDX_SiCH2I] - k[200]*y_cur[IDX_SiCH3I] - + k[201]*y_cur[IDX_SiH2I] - k[202]*y_cur[IDX_SiH3I] - + k[203]*y_cur[IDX_SiNI] - k[204]*y_cur[IDX_SiSI] - + k[707]*y_cur[IDX_SI] - k[708]*y_cur[IDX_SI] - + k[1297]*y_cur[IDX_C10H2I] - k[1298]*y_cur[IDX_C10HI] - + k[1299]*y_cur[IDX_C10HI] - k[1300]*y_cur[IDX_C2H2I] - + k[1301]*y_cur[IDX_C2H3I] - k[1302]*y_cur[IDX_C2H4I] - + k[1303]*y_cur[IDX_C2H4I] - k[1304]*y_cur[IDX_C2H4I] - + k[1305]*y_cur[IDX_C2H4I] - k[1306]*y_cur[IDX_C2H5I] - + k[1307]*y_cur[IDX_C2H5OHI] - k[1308]*y_cur[IDX_C2HI] - + k[1309]*y_cur[IDX_C2SI] - k[1310]*y_cur[IDX_C3H2I] - + k[1311]*y_cur[IDX_C3H2I] - k[1312]*y_cur[IDX_C3HI] - + k[1313]*y_cur[IDX_C3OI] - k[1314]*y_cur[IDX_C3OI] - + k[1315]*y_cur[IDX_C3PI] - k[1316]*y_cur[IDX_C3SI] - + k[1317]*y_cur[IDX_C4H3I] - k[1318]*y_cur[IDX_C4H3I] - + k[1319]*y_cur[IDX_C4H3I] - k[1320]*y_cur[IDX_C4HI] - + k[1321]*y_cur[IDX_C4PI] - k[1322]*y_cur[IDX_C4SI] - + k[1323]*y_cur[IDX_C5H2I] - k[1324]*y_cur[IDX_C5H2I] - + k[1325]*y_cur[IDX_C5HI] - k[1326]*y_cur[IDX_C6H2I] - + k[1327]*y_cur[IDX_C6H2I] - k[1328]*y_cur[IDX_C6H6I] - + k[1329]*y_cur[IDX_C6H6I] - k[1330]*y_cur[IDX_C6H6I] - + k[1331]*y_cur[IDX_C6HI] - k[1332]*y_cur[IDX_C7H2I] - + k[1333]*y_cur[IDX_C7H2I] - k[1334]*y_cur[IDX_C7HI] - + k[1335]*y_cur[IDX_C8H2I] - k[1336]*y_cur[IDX_C8H2I] - + k[1337]*y_cur[IDX_C8HI] - k[1338]*y_cur[IDX_C9H2I] - + k[1339]*y_cur[IDX_C9H2I] - k[1340]*y_cur[IDX_C9HI] - + k[1341]*y_cur[IDX_CCPI] - k[1342]*y_cur[IDX_CH2I] - + k[1343]*y_cur[IDX_CH2CCH2I] - k[1344]*y_cur[IDX_CH2CCH2I] - + k[1345]*y_cur[IDX_CH2CCH2I] - k[1346]*y_cur[IDX_CH2CCHI] - + k[1347]*y_cur[IDX_CH2CCHI] - k[1348]*y_cur[IDX_CH2CHCNI] - + k[1349]*y_cur[IDX_CH2CHCNI] - k[1350]*y_cur[IDX_CH2CHCNI] - + k[1351]*y_cur[IDX_CH2PHI] - k[1352]*y_cur[IDX_CH3I] - + k[1353]*y_cur[IDX_CH3I] - k[1354]*y_cur[IDX_CH3C3NI] - + k[1355]*y_cur[IDX_CH3C3NI] - k[1356]*y_cur[IDX_CH3C4HI] - + k[1357]*y_cur[IDX_CH3C4HI] - k[1358]*y_cur[IDX_CH3C4HI] - + k[1359]*y_cur[IDX_CH3C5NI] - k[1360]*y_cur[IDX_CH3C6HI] - + k[1361]*y_cur[IDX_CH3C6HI] - k[1362]*y_cur[IDX_CH3C7NI] - + k[1363]*y_cur[IDX_CH3CCHI] - k[1364]*y_cur[IDX_CH3CCHI] - + k[1365]*y_cur[IDX_CH3CCHI] - k[1366]*y_cur[IDX_CH3CCHI] - + k[1367]*y_cur[IDX_C2H6I] - k[1368]*y_cur[IDX_C2H6I] - + k[1369]*y_cur[IDX_C2H6I] - k[1370]*y_cur[IDX_C2H6I] - + k[1371]*y_cur[IDX_C2H6I] - k[1372]*y_cur[IDX_C2H6I] - + k[1373]*y_cur[IDX_CH3CHCH2I] - k[1374]*y_cur[IDX_CH3CHCH2I] - + k[1375]*y_cur[IDX_CH3CHCH2I] - k[1376]*y_cur[IDX_CH3CHCH2I] - + k[1377]*y_cur[IDX_CH3CHCH2I] - k[1378]*y_cur[IDX_CH3CHOI] - + k[1379]*y_cur[IDX_CH3CNI] - k[1380]*y_cur[IDX_CH3COCH3I] - + k[1381]*y_cur[IDX_CH3OHI] - k[1382]*y_cur[IDX_CH3OHI] - + k[1383]*y_cur[IDX_CH4I] - k[1384]*y_cur[IDX_CH4I] - + k[1385]*y_cur[IDX_CHI] - k[1386]*y_cur[IDX_CNOI] - + k[1387]*y_cur[IDX_CO2I] - k[1388]*y_cur[IDX_H2CCCI] - + k[1389]*y_cur[IDX_H2CCCI] - k[1390]*y_cur[IDX_H2COI] - + k[1391]*y_cur[IDX_H2COI] - k[1392]*y_cur[IDX_H2CSI] - + k[1393]*y_cur[IDX_H2OI] - k[1394]*y_cur[IDX_H2OI] - + k[1395]*y_cur[IDX_H2SI] - k[1396]*y_cur[IDX_HC2PI] - + k[1397]*y_cur[IDX_HC2PI] - k[1398]*y_cur[IDX_HC3NI] - + k[1399]*y_cur[IDX_HC3NI] - k[1400]*y_cur[IDX_HC3NI] - + k[1401]*y_cur[IDX_HC3NI] - k[1402]*y_cur[IDX_C4H2I] - + k[1403]*y_cur[IDX_C4H2I] - k[1404]*y_cur[IDX_HC5NI] - + k[1405]*y_cur[IDX_HC7NI] - k[1406]*y_cur[IDX_HC9NI] - + k[1407]*y_cur[IDX_HCNI] - k[1408]*y_cur[IDX_HCOI] - + k[1409]*y_cur[IDX_HCPI] - k[1410]*y_cur[IDX_HCSiI] - + k[1411]*y_cur[IDX_HClI] - k[1412]*y_cur[IDX_HFI] - + k[1413]*y_cur[IDX_HNCI] - k[1414]*y_cur[IDX_HNSiI] - + k[1415]*y_cur[IDX_HSI] - k[1416]*y_cur[IDX_N2OI] - + k[1417]*y_cur[IDX_NH2I] - k[1418]*y_cur[IDX_NH3I] - + k[1419]*y_cur[IDX_NH3I] - k[1420]*y_cur[IDX_NHI] - + k[1421]*y_cur[IDX_NSI] - k[1422]*y_cur[IDX_O2I] - + k[1423]*y_cur[IDX_O2I] - k[1424]*y_cur[IDX_OCNI] - + k[1425]*y_cur[IDX_OCSI] - k[1426]*y_cur[IDX_OHI] - + k[1427]*y_cur[IDX_SO2I] - k[1428]*y_cur[IDX_SOI] - + k[1429]*y_cur[IDX_SOI] - k[1430]*y_cur[IDX_SOI] - + k[1431]*y_cur[IDX_SiC2H2I] - k[1432]*y_cur[IDX_SiC2HI] - + k[1433]*y_cur[IDX_SiC3HI] - k[1434]*y_cur[IDX_SiCI] - + k[1435]*y_cur[IDX_SiCH2I] - k[1436]*y_cur[IDX_SiCH2I] - + k[1437]*y_cur[IDX_SiCH3I] - k[1438]*y_cur[IDX_SiCH3I] - + k[1439]*y_cur[IDX_SiH2I] - k[1440]*y_cur[IDX_SiH2I] - + k[1441]*y_cur[IDX_SiH3I] - k[1442]*y_cur[IDX_SiH3I] - + k[1443]*y_cur[IDX_SiH4I] - k[1444]*y_cur[IDX_SiH4I] - + k[1445]*y_cur[IDX_SiHI] - k[1446]*y_cur[IDX_SiNI] - + k[1447]*y_cur[IDX_SiOI] - k[1448]*y_cur[IDX_SiSI] - + k[2398]*y_cur[IDX_H2I] - k[3016]*y_cur[IDX_HNC3I] - + k[3017]*y_cur[IDX_HNC3I] - k[3018]*y_cur[IDX_HNC3I] - + k[3019]*y_cur[IDX_HNC3I] - k[3886]*y_cur[IDX_CM] - + k[3921]*y_cur[IDX_C10M] - k[3956]*y_cur[IDX_C10HM] - + k[3991]*y_cur[IDX_C2M] - k[4026]*y_cur[IDX_C2HM] - + k[4061]*y_cur[IDX_C3M] - k[4096]*y_cur[IDX_C3HM] - + k[4131]*y_cur[IDX_C3NM] - k[4166]*y_cur[IDX_C4M] - + k[4201]*y_cur[IDX_C4HM] - k[4236]*y_cur[IDX_C5M] - + k[4271]*y_cur[IDX_C5HM] - k[4306]*y_cur[IDX_C5NM] - + k[4341]*y_cur[IDX_C6M] - k[4376]*y_cur[IDX_C6HM] - + k[4411]*y_cur[IDX_C7M] - k[4446]*y_cur[IDX_C7HM] - + k[4481]*y_cur[IDX_C8M] - k[4516]*y_cur[IDX_C8HM] - + k[4551]*y_cur[IDX_C9M] - k[4586]*y_cur[IDX_C9HM] - + k[4621]*y_cur[IDX_CHM] - k[4656]*y_cur[IDX_CNM] - + k[4691]*y_cur[IDX_HM] - k[4727]*y_cur[IDX_OM] - + k[4762]*y_cur[IDX_O2M] - k[4797]*y_cur[IDX_OHM] - + k[4832]*y_cur[IDX_SM] - k[5495]*y_cur[IDX_C10I] - + k[5496]*y_cur[IDX_C3I] - k[5497]*y_cur[IDX_C4I] - + k[5498]*y_cur[IDX_C5I] - k[5499]*y_cur[IDX_C6I] - + k[5500]*y_cur[IDX_C7I] - k[5501]*y_cur[IDX_C8I] - + k[5502]*y_cur[IDX_C9I] - k[5503]*y_cur[IDX_CI] - + k[5504]*y_cur[IDX_NI] - k[5505]*y_cur[IDX_OI] - + k[5506]*y_cur[IDX_SI] - k[5548]*y_cur[IDX_H2I] - + k[5569]*y_cur[IDX_HI] - k[5611]*y_cur[IDX_eM] - + k[5627]*y_cur[IDX_CH3OI] - k[5633]*y_cur[IDX_CH2OHI] - + k[5639]*y_cur[IDX_CH3COI] - k[5644]*y_cur[IDX_COOHI] - + k[5649]*y_cur[IDX_COOCH3I] - k[5655]*y_cur[IDX_CH2OHCOI] - + k[5661]*y_cur[IDX_CH2OHCHOI] - k[5667]*y_cur[IDX_CH3COOHI] - + k[6314]*y_cur[IDX_GRAINM]; + data[jistart + 17672] = 0.0 - k[1393]*y_cur[IDX_CII] - k[1394]*y_cur[IDX_CII]; + data[jistart + 17673] = 0.0 + k[244]*y_cur[IDX_C2II] + k[245]*y_cur[IDX_CNII] + + k[246]*y_cur[IDX_COII] + k[247]*y_cur[IDX_N2II] + + k[248]*y_cur[IDX_O2II] + k[249]*y_cur[IDX_PNII] + + k[513]*y_cur[IDX_HeII] - k[5503]*y_cur[IDX_CII] + k[5675] + k[5772] + + k[6069] + k[6299]; + data[jistart + 17674] = 0.0 + k[3211]*y_cur[IDX_HeII]; + data[jistart + 17675] = 0.0 - k[6314]*y_cur[IDX_CII]; + data[jistart + 17676] = 0.0 - k[2398]*y_cur[IDX_CII] - k[5548]*y_cur[IDX_CII]; + data[jistart + 17677] = 0.0 - k[5611]*y_cur[IDX_CII]; + data[jistart + 17678] = 0.0 + k[2835]*y_cur[IDX_CHII] - k[5569]*y_cur[IDX_CII]; + data[jistart + 17679] = 0.0 + k[1015]*y_cur[IDX_eM] + k[6545]*y_cur[IDX_GRAINM]; + data[jistart + 17680] = 0.0 + k[5166]*y_cur[IDX_HI] + k[5467]*y_cur[IDX_OHI]; + data[jistart + 17681] = 0.0 - k[2543]*y_cur[IDX_H2OI]; + data[jistart + 17682] = 0.0 + k[1291]*y_cur[IDX_eM] + k[1293]*y_cur[IDX_eM] + + k[1295]*y_cur[IDX_eM] + k[6732]*y_cur[IDX_GRAINM] + + k[6734]*y_cur[IDX_GRAINM] + k[6736]*y_cur[IDX_GRAINM]; + data[jistart + 17683] = 0.0 - k[2555]*y_cur[IDX_H2OI]; + data[jistart + 17684] = 0.0 + k[2465]*y_cur[IDX_H2I]; + data[jistart + 17685] = 0.0 - k[2572]*y_cur[IDX_H2OI]; + data[jistart + 17686] = 0.0 + k[774]*y_cur[IDX_eM] + k[775]*y_cur[IDX_eM] + + k[2491]*y_cur[IDX_H2COI] + k[6606]*y_cur[IDX_GRAINM] + + k[6607]*y_cur[IDX_GRAINM]; + data[jistart + 17687] = 0.0 + k[5651]*y_cur[IDX_H3OII]; + data[jistart + 17688] = 0.0 - k[5151]*y_cur[IDX_H2OI]; + data[jistart + 17689] = 0.0 - k[482]*y_cur[IDX_H2OI] - k[2559]*y_cur[IDX_H2OI]; + data[jistart + 17690] = 0.0 - k[2573]*y_cur[IDX_H2OI]; + data[jistart + 17691] = 0.0 - k[2531]*y_cur[IDX_H2OI]; + data[jistart + 17692] = 0.0 + k[2800]*y_cur[IDX_H3OII]; + data[jistart + 17693] = 0.0 - k[2551]*y_cur[IDX_H2OI]; + data[jistart + 17694] = 0.0 - k[2552]*y_cur[IDX_H2OI]; + data[jistart + 17695] = 0.0 - k[2527]*y_cur[IDX_H2OI]; + data[jistart + 17696] = 0.0 - k[2570]*y_cur[IDX_H2OI]; + data[jistart + 17697] = 0.0 - k[2556]*y_cur[IDX_H2OI]; + data[jistart + 17698] = 0.0 + k[5657]*y_cur[IDX_H3OII]; + data[jistart + 17699] = 0.0 + k[2802]*y_cur[IDX_H3OII]; + data[jistart + 17700] = 0.0 + k[2825]*y_cur[IDX_H3OII]; + data[jistart + 17701] = 0.0 + k[7084] + k[7266] + k[7448]; + data[jistart + 17702] = 0.0 - k[2549]*y_cur[IDX_H2OI]; + data[jistart + 17703] = 0.0 + k[2811]*y_cur[IDX_H3OII]; + data[jistart + 17704] = 0.0 - k[2553]*y_cur[IDX_H2OI]; + data[jistart + 17705] = 0.0 + k[5663]*y_cur[IDX_H3OII]; + data[jistart + 17706] = 0.0 + k[2822]*y_cur[IDX_H3OII]; + data[jistart + 17707] = 0.0 - k[2532]*y_cur[IDX_H2OI] - k[2533]*y_cur[IDX_H2OI]; + data[jistart + 17708] = 0.0 + k[918]*y_cur[IDX_eM] + k[6492]*y_cur[IDX_GRAINM]; + data[jistart + 17709] = 0.0 + k[2788]*y_cur[IDX_H3OII]; + data[jistart + 17710] = 0.0 + k[2812]*y_cur[IDX_H3OII]; + data[jistart + 17711] = 0.0 + k[2813]*y_cur[IDX_H3OII]; + data[jistart + 17712] = 0.0 + k[960]*y_cur[IDX_eM] + k[6428]*y_cur[IDX_GRAINM]; + data[jistart + 17713] = 0.0 + k[2807]*y_cur[IDX_H3OII]; + data[jistart + 17714] = 0.0 - k[2560]*y_cur[IDX_H2OI]; + data[jistart + 17715] = 0.0 + k[2816]*y_cur[IDX_H3OII]; + data[jistart + 17716] = 0.0 + k[2820]*y_cur[IDX_H3OII]; + data[jistart + 17717] = 0.0 + k[2781]*y_cur[IDX_H3OII]; + data[jistart + 17718] = 0.0 + k[2808]*y_cur[IDX_H3OII]; + data[jistart + 17719] = 0.0 + k[2776]*y_cur[IDX_H3OII]; + data[jistart + 17720] = 0.0 + k[5669]*y_cur[IDX_H3OII]; + data[jistart + 17721] = 0.0 + k[2794]*y_cur[IDX_H3OII]; + data[jistart + 17722] = 0.0 + k[2130]*y_cur[IDX_CH3OHI] - k[2567]*y_cur[IDX_H2OI] - + k[2568]*y_cur[IDX_H2OI] + k[3673]*y_cur[IDX_O2I]; + data[jistart + 17723] = 0.0 + k[2817]*y_cur[IDX_H3OII]; + data[jistart + 17724] = 0.0 + k[2777]*y_cur[IDX_H3OII]; + data[jistart + 17725] = 0.0 + k[2787]*y_cur[IDX_H3OII]; + data[jistart + 17726] = 0.0 + k[5629]*y_cur[IDX_H3OII]; + data[jistart + 17727] = 0.0 + k[2803]*y_cur[IDX_H3OII]; + data[jistart + 17728] = 0.0 + k[2809]*y_cur[IDX_H3OII]; + data[jistart + 17729] = 0.0 + k[2819]*y_cur[IDX_H3OII]; + data[jistart + 17730] = 0.0 - k[2534]*y_cur[IDX_H2OI]; + data[jistart + 17731] = 0.0 + k[2769]*y_cur[IDX_H3OII]; + data[jistart + 17732] = 0.0 + k[5635]*y_cur[IDX_H3OII]; + data[jistart + 17733] = 0.0 + k[2823]*y_cur[IDX_H3OII]; + data[jistart + 17734] = 0.0 + k[2775]*y_cur[IDX_H3OII]; + data[jistart + 17735] = 0.0 + k[2783]*y_cur[IDX_H3OII]; + data[jistart + 17736] = 0.0 + k[2700]*y_cur[IDX_H3II]; + data[jistart + 17737] = 0.0 + k[2784]*y_cur[IDX_H3OII]; + data[jistart + 17738] = 0.0 + k[2796]*y_cur[IDX_H3OII]; + data[jistart + 17739] = 0.0 - k[5152]*y_cur[IDX_H2OI] + k[5191]*y_cur[IDX_HI] + + k[5478]*y_cur[IDX_OHI]; + data[jistart + 17740] = 0.0 + k[2821]*y_cur[IDX_H3OII]; + data[jistart + 17741] = 0.0 + k[2592]*y_cur[IDX_H3II] + k[2593]*y_cur[IDX_H3II] + + k[2594]*y_cur[IDX_H3II] + k[2768]*y_cur[IDX_H3OII]; + data[jistart + 17742] = 0.0 + k[5472]*y_cur[IDX_OHI]; + data[jistart + 17743] = 0.0 + k[963]*y_cur[IDX_eM] + k[964]*y_cur[IDX_eM] + + k[2125]*y_cur[IDX_CH3OHI] + k[2494]*y_cur[IDX_H2COI] + + k[2873]*y_cur[IDX_HCNI] + k[6440]*y_cur[IDX_GRAINM] + + k[6441]*y_cur[IDX_GRAINM]; + data[jistart + 17744] = 0.0 - k[2525]*y_cur[IDX_H2OI] - k[2526]*y_cur[IDX_H2OI]; + data[jistart + 17745] = 0.0 + k[2786]*y_cur[IDX_H3OII]; + data[jistart + 17746] = 0.0 + k[3028]*y_cur[IDX_H3OII]; + data[jistart + 17747] = 0.0 - k[2571]*y_cur[IDX_H2OI]; + data[jistart + 17748] = 0.0 + k[2659]*y_cur[IDX_H3II] + k[2660]*y_cur[IDX_H3II] + + k[2793]*y_cur[IDX_H3OII]; + data[jistart + 17749] = 0.0 - k[479]*y_cur[IDX_H2OI] - k[2541]*y_cur[IDX_H2OI]; + data[jistart + 17750] = 0.0 + k[8584]*y_cur[IDX_GHI]; + data[jistart + 17751] = 0.0 + k[2824]*y_cur[IDX_H3OII]; + data[jistart + 17752] = 0.0 - k[2564]*y_cur[IDX_H2OI] - k[2565]*y_cur[IDX_H2OI] - + k[2566]*y_cur[IDX_H2OI]; + data[jistart + 17753] = 0.0 - k[2548]*y_cur[IDX_H2OI]; + data[jistart + 17754] = 0.0 + k[2651]*y_cur[IDX_H3II] + k[2652]*y_cur[IDX_H3II] + + k[2791]*y_cur[IDX_H3OII]; + data[jistart + 17755] = 0.0 - k[2562]*y_cur[IDX_H2OI] - k[2563]*y_cur[IDX_H2OI]; + data[jistart + 17756] = 0.0 + k[2792]*y_cur[IDX_H3OII]; + data[jistart + 17757] = 0.0 - k[2561]*y_cur[IDX_H2OI]; + data[jistart + 17758] = 0.0 - k[2142]*y_cur[IDX_H2OI]; + data[jistart + 17759] = 0.0 - k[2550]*y_cur[IDX_H2OI]; + data[jistart + 17760] = 0.0 + k[2798]*y_cur[IDX_H3OII]; + data[jistart + 17761] = 0.0 - k[2524]*y_cur[IDX_H2OI]; + data[jistart + 17762] = 0.0 - k[2535]*y_cur[IDX_H2OI] - k[2536]*y_cur[IDX_H2OI] - + k[2537]*y_cur[IDX_H2OI] - k[2538]*y_cur[IDX_H2OI]; + data[jistart + 17763] = 0.0 + k[466]*y_cur[IDX_H2OII] + k[2505]*y_cur[IDX_H2OII]; + data[jistart + 17764] = 0.0 + k[2772]*y_cur[IDX_H3OII]; + data[jistart + 17765] = 0.0 + k[5457]*y_cur[IDX_OHI]; + data[jistart + 17766] = 0.0 - k[481]*y_cur[IDX_H2OI] - k[2557]*y_cur[IDX_H2OI]; + data[jistart + 17767] = 0.0 - k[480]*y_cur[IDX_H2OI] - k[2546]*y_cur[IDX_H2OI]; + data[jistart + 17768] = 0.0 + k[2790]*y_cur[IDX_H3OII]; + data[jistart + 17769] = 0.0 - k[2519]*y_cur[IDX_H2OI] - k[2520]*y_cur[IDX_H2OI]; + data[jistart + 17770] = 0.0 - k[2539]*y_cur[IDX_H2OI]; + data[jistart + 17771] = 0.0 - k[2554]*y_cur[IDX_H2OI]; + data[jistart + 17772] = 0.0 - k[575]*y_cur[IDX_H2OI] - k[3489]*y_cur[IDX_H2OI] - + k[3490]*y_cur[IDX_H2OI] - k[3491]*y_cur[IDX_H2OI] - + k[3492]*y_cur[IDX_H2OI]; + data[jistart + 17773] = 0.0 + k[4776]*y_cur[IDX_H3OII]; + data[jistart + 17774] = 0.0 + k[4635]*y_cur[IDX_H3OII]; + data[jistart + 17775] = 0.0 - k[447]*y_cur[IDX_H2OI] - k[2386]*y_cur[IDX_H2OI]; + data[jistart + 17776] = 0.0 + k[475]*y_cur[IDX_H2OII]; + data[jistart + 17777] = 0.0 - k[3512]*y_cur[IDX_H2OI] - k[3513]*y_cur[IDX_H2OI] - + k[3514]*y_cur[IDX_H2OI]; + data[jistart + 17778] = 0.0 + k[4846]*y_cur[IDX_H3OII]; + data[jistart + 17779] = 0.0 + k[4040]*y_cur[IDX_H3OII]; + data[jistart + 17780] = 0.0 + k[4215]*y_cur[IDX_H3OII]; + data[jistart + 17781] = 0.0 - k[478]*y_cur[IDX_H2OI] - k[2540]*y_cur[IDX_H2OI]; + data[jistart + 17782] = 0.0 + k[2789]*y_cur[IDX_H3OII]; + data[jistart + 17783] = 0.0 - k[2226]*y_cur[IDX_H2OI]; + data[jistart + 17784] = 0.0 + k[108]*y_cur[IDX_HI] + k[3795]*y_cur[IDX_HCNI] + + k[4811]*y_cur[IDX_H3OII]; + data[jistart + 17785] = 0.0 + k[3970]*y_cur[IDX_H3OII]; + data[jistart + 17786] = 0.0 + k[4110]*y_cur[IDX_H3OII]; + data[jistart + 17787] = 0.0 + k[2782]*y_cur[IDX_H3OII]; + data[jistart + 17788] = 0.0 + k[4390]*y_cur[IDX_H3OII]; + data[jistart + 17789] = 0.0 + k[4530]*y_cur[IDX_H3OII]; + data[jistart + 17790] = 0.0 + k[4460]*y_cur[IDX_H3OII]; + data[jistart + 17791] = 0.0 + k[4600]*y_cur[IDX_H3OII]; + data[jistart + 17792] = 0.0 + k[3935]*y_cur[IDX_H3OII]; + data[jistart + 17793] = 0.0 + k[4285]*y_cur[IDX_H3OII]; + data[jistart + 17794] = 0.0 + k[4320]*y_cur[IDX_H3OII]; + data[jistart + 17795] = 0.0 - k[4]*y_cur[IDX_H2OI] + k[3900]*y_cur[IDX_H3OII]; + data[jistart + 17796] = 0.0 + k[2797]*y_cur[IDX_H3OII]; + data[jistart + 17797] = 0.0 + k[83]*y_cur[IDX_H2I] + k[4741]*y_cur[IDX_H3OII]; + data[jistart + 17798] = 0.0 + k[4565]*y_cur[IDX_H3OII]; + data[jistart + 17799] = 0.0 + k[2125]*y_cur[IDX_CH3OH2II] + k[2130]*y_cur[IDX_PH2II] + + k[2330]*y_cur[IDX_HII] + k[2667]*y_cur[IDX_H3II] + + k[2795]*y_cur[IDX_H3OII] + k[3636]*y_cur[IDX_OII]; + data[jistart + 17800] = 0.0 + k[81]*y_cur[IDX_OHI] - k[2367]*y_cur[IDX_H2OI] + + k[4706]*y_cur[IDX_H3OII]; + data[jistart + 17801] = 0.0 + k[2804]*y_cur[IDX_H3OII]; + data[jistart + 17802] = 0.0 - k[2528]*y_cur[IDX_H2OI] - k[2529]*y_cur[IDX_H2OI] - + k[2530]*y_cur[IDX_H2OI]; + data[jistart + 17803] = 0.0 + k[4495]*y_cur[IDX_H3OII]; + data[jistart + 17804] = 0.0 + k[4005]*y_cur[IDX_H3OII]; + data[jistart + 17805] = 0.0 + k[2770]*y_cur[IDX_H3OII]; + data[jistart + 17806] = 0.0 + k[4075]*y_cur[IDX_H3OII]; + data[jistart + 17807] = 0.0 + k[4180]*y_cur[IDX_H3OII]; + data[jistart + 17808] = 0.0 + k[4355]*y_cur[IDX_H3OII]; + data[jistart + 17809] = 0.0 + k[1035]*y_cur[IDX_eM] - k[2545]*y_cur[IDX_H2OI] + + k[6415]*y_cur[IDX_GRAINM]; + data[jistart + 17810] = 0.0 + k[4250]*y_cur[IDX_H3OII]; + data[jistart + 17811] = 0.0 + k[4425]*y_cur[IDX_H3OII]; + data[jistart + 17812] = 0.0 + k[588]*y_cur[IDX_H2OII] + k[3538]*y_cur[IDX_H3OII] + + k[5298]*y_cur[IDX_NOI] + k[5300]*y_cur[IDX_OHI]; + data[jistart + 17813] = 0.0 + k[2779]*y_cur[IDX_H3OII]; + data[jistart + 17814] = 0.0 - k[2521]*y_cur[IDX_H2OI]; + data[jistart + 17815] = 0.0 - k[1982]*y_cur[IDX_H2OI]; + data[jistart + 17816] = 0.0 - k[689]*y_cur[IDX_H2OI] - k[3779]*y_cur[IDX_H2OI]; + data[jistart + 17817] = 0.0 + k[263]*y_cur[IDX_CH2I] + k[291]*y_cur[IDX_CHI] + + k[462]*y_cur[IDX_C2I] + k[463]*y_cur[IDX_C2H2I] + + k[464]*y_cur[IDX_C2H4I] + k[465]*y_cur[IDX_C2HI] + + k[466]*y_cur[IDX_C2H6I] + k[467]*y_cur[IDX_FeI] + + k[468]*y_cur[IDX_H2COI] + k[469]*y_cur[IDX_H2SI] + + k[470]*y_cur[IDX_HCOI] + k[471]*y_cur[IDX_MgI] + + k[472]*y_cur[IDX_NOI] + k[473]*y_cur[IDX_NaI] + + k[474]*y_cur[IDX_O2I] + k[475]*y_cur[IDX_OCSI] + + k[476]*y_cur[IDX_SI] + k[477]*y_cur[IDX_SiI] + + k[588]*y_cur[IDX_NH2I] + k[605]*y_cur[IDX_NH3I] + + k[2505]*y_cur[IDX_C2H6I] - k[2509]*y_cur[IDX_H2OI]; + data[jistart + 17818] = 0.0 + k[4145]*y_cur[IDX_H3OII]; + data[jistart + 17819] = 0.0 + k[2774]*y_cur[IDX_H3OII]; + data[jistart + 17820] = 0.0 - k[1951]*y_cur[IDX_H2OI] - k[1952]*y_cur[IDX_H2OI] - + k[1953]*y_cur[IDX_H2OI]; + data[jistart + 17821] = 0.0 + k[2826]*y_cur[IDX_H3OII]; + data[jistart + 17822] = 0.0 + k[467]*y_cur[IDX_H2OII]; + data[jistart + 17823] = 0.0 + k[471]*y_cur[IDX_H2OII]; + data[jistart + 17824] = 0.0 + k[473]*y_cur[IDX_H2OII] + k[2814]*y_cur[IDX_H3OII]; + data[jistart + 17825] = 0.0 - k[5306]*y_cur[IDX_H2OI] + k[5321]*y_cur[IDX_OHI]; + data[jistart + 17826] = 0.0 + k[4670]*y_cur[IDX_H3OII]; + data[jistart + 17827] = 0.0 + k[2778]*y_cur[IDX_H3OII]; + data[jistart + 17828] = 0.0 - k[2558]*y_cur[IDX_H2OI]; + data[jistart + 17829] = 0.0 + k[2785]*y_cur[IDX_H3OII]; + data[jistart + 17830] = 0.0 + k[2582]*y_cur[IDX_H2SI]; + data[jistart + 17831] = 0.0 - k[2544]*y_cur[IDX_H2OI]; + data[jistart + 17832] = 0.0 - k[552]*y_cur[IDX_H2OI]; + data[jistart + 17833] = 0.0 + k[2773]*y_cur[IDX_H3OII]; + data[jistart + 17834] = 0.0 - k[2542]*y_cur[IDX_H2OI]; + data[jistart + 17835] = 0.0 + k[2771]*y_cur[IDX_H3OII]; + data[jistart + 17836] = 0.0 + k[2780]*y_cur[IDX_H3OII]; + data[jistart + 17837] = 0.0 - k[656]*y_cur[IDX_H2OI] + k[3632]*y_cur[IDX_C2H4I] + + k[3636]*y_cur[IDX_CH3OHI] + k[3643]*y_cur[IDX_H2SI]; + data[jistart + 17838] = 0.0 + k[2805]*y_cur[IDX_H3OII]; + data[jistart + 17839] = 0.0 + k[263]*y_cur[IDX_H2OII] + k[2004]*y_cur[IDX_H3OII] + + k[5009]*y_cur[IDX_O2I] + k[5017]*y_cur[IDX_OHI]; + data[jistart + 17840] = 0.0 + k[2810]*y_cur[IDX_H3OII]; + data[jistart + 17841] = 0.0 - k[3550]*y_cur[IDX_H2OI]; + data[jistart + 17842] = 0.0 + k[464]*y_cur[IDX_H2OII] + k[3632]*y_cur[IDX_OII]; + data[jistart + 17843] = 0.0 + k[2767]*y_cur[IDX_H3OII] + k[5456]*y_cur[IDX_OHI]; + data[jistart + 17844] = 0.0 + k[474]*y_cur[IDX_H2OII] + k[3673]*y_cur[IDX_PH2II] + + k[5009]*y_cur[IDX_CH2I] + k[5040]*y_cur[IDX_CH3I]; + data[jistart + 17845] = 0.0 - k[2569]*y_cur[IDX_H2OI]; + data[jistart + 17846] = 0.0 + k[469]*y_cur[IDX_H2OII] + k[2582]*y_cur[IDX_SOII] + + k[2801]*y_cur[IDX_H3OII] + k[3643]*y_cur[IDX_OII] + + k[5468]*y_cur[IDX_OHI]; + data[jistart + 17847] = 0.0 + k[477]*y_cur[IDX_H2OII] + k[2818]*y_cur[IDX_H3OII]; + data[jistart + 17848] = 0.0 - k[2523]*y_cur[IDX_H2OI]; + data[jistart + 17849] = 0.0 + k[472]*y_cur[IDX_H2OII] + k[5038]*y_cur[IDX_CH3I] + + k[5298]*y_cur[IDX_NH2I]; + data[jistart + 17850] = 0.0 + k[470]*y_cur[IDX_H2OII] + k[5471]*y_cur[IDX_OHI]; + data[jistart + 17851] = 0.0 + k[5061]*y_cur[IDX_OHI]; + data[jistart + 17852] = 0.0 + k[465]*y_cur[IDX_H2OII]; + data[jistart + 17853] = 0.0 + k[468]*y_cur[IDX_H2OII] + k[2491]*y_cur[IDX_C2H5OH2II] + + k[2494]*y_cur[IDX_CH3OH2II] + k[2799]*y_cur[IDX_H3OII] + + k[5465]*y_cur[IDX_OHI]; + data[jistart + 17854] = 0.0 + k[2806]*y_cur[IDX_H3OII] + k[2873]*y_cur[IDX_CH3OH2II] + + k[3795]*y_cur[IDX_OHM] + k[5469]*y_cur[IDX_OHI]; + data[jistart + 17855] = 0.0 + k[291]*y_cur[IDX_H2OII] + k[2249]*y_cur[IDX_H3OII]; + data[jistart + 17856] = 0.0 + k[476]*y_cur[IDX_H2OII]; + data[jistart + 17857] = 0.0 + k[462]*y_cur[IDX_H2OII] + k[2766]*y_cur[IDX_H3OII]; + data[jistart + 17858] = 0.0 + k[81]*y_cur[IDX_HM] + k[5017]*y_cur[IDX_CH2I] + + k[5047]*y_cur[IDX_CH3I] + k[5061]*y_cur[IDX_CH4I] + + k[5148]*y_cur[IDX_H2I] + k[5300]*y_cur[IDX_NH2I] + + k[5321]*y_cur[IDX_NHI] + k[5453]*y_cur[IDX_C2H2I] + + k[5456]*y_cur[IDX_C2H3I] + k[5457]*y_cur[IDX_C2H5I] + + k[5465]*y_cur[IDX_H2COI] + k[5467]*y_cur[IDX_H2O2I] + + k[5468]*y_cur[IDX_H2SI] + k[5469]*y_cur[IDX_HCNI] + + k[5471]*y_cur[IDX_HCOI] + k[5472]*y_cur[IDX_HNOI] + + k[5476]*y_cur[IDX_NH3I] + k[5478]*y_cur[IDX_O2HI] + + k[5479]*y_cur[IDX_OHI] + k[5479]*y_cur[IDX_OHI] + + k[5574]*y_cur[IDX_HI]; + data[jistart + 17859] = 0.0 + k[605]*y_cur[IDX_H2OII] + k[3578]*y_cur[IDX_H3OII] + + k[5476]*y_cur[IDX_OHI]; + data[jistart + 17860] = 0.0 - k[2522]*y_cur[IDX_H2OI]; + data[jistart + 17861] = 0.0 - k[5536]*y_cur[IDX_H2OI]; + data[jistart + 17862] = 0.0 + k[463]*y_cur[IDX_H2OII] + k[5453]*y_cur[IDX_OHI]; + data[jistart + 17863] = 0.0 + k[8584]*y_cur[IDX_GOHI]; + data[jistart + 17864] = 0.0 - k[5031]*y_cur[IDX_H2OI] + k[5038]*y_cur[IDX_NOI] + + k[5040]*y_cur[IDX_O2I] + k[5047]*y_cur[IDX_OHI]; + data[jistart + 17865] = 0.0 + k[1041]*y_cur[IDX_eM] + k[2004]*y_cur[IDX_CH2I] + + k[2249]*y_cur[IDX_CHI] + k[2766]*y_cur[IDX_C2I] + + k[2767]*y_cur[IDX_C2H3I] + k[2768]*y_cur[IDX_C2H5OHI] + + k[2769]*y_cur[IDX_C2OI] + k[2770]*y_cur[IDX_C2SI] + + k[2771]*y_cur[IDX_C3I] + k[2772]*y_cur[IDX_C3H2I] + + k[2773]*y_cur[IDX_C3HI] + k[2774]*y_cur[IDX_C3NI] + + k[2775]*y_cur[IDX_C3OI] + k[2776]*y_cur[IDX_C3PI] + + k[2777]*y_cur[IDX_C3SI] + k[2778]*y_cur[IDX_C4I] + + k[2779]*y_cur[IDX_C4H3I] + k[2780]*y_cur[IDX_C4HI] + + k[2781]*y_cur[IDX_C4PI] + k[2782]*y_cur[IDX_C4SI] + + k[2783]*y_cur[IDX_C6H6I] + k[2784]*y_cur[IDX_CCPI] + + k[2785]*y_cur[IDX_CH2CCHI] + k[2786]*y_cur[IDX_CH2COI] + + k[2787]*y_cur[IDX_CH2NHI] + k[2788]*y_cur[IDX_CH2PHI] + + k[2789]*y_cur[IDX_CH3CCHI] + k[2790]*y_cur[IDX_CH3CHCH2I] + + k[2791]*y_cur[IDX_CH3CHOI] + k[2792]*y_cur[IDX_CH3CNI] + + k[2793]*y_cur[IDX_CH3COCH3I] + k[2794]*y_cur[IDX_CH3OCH3I] + + k[2795]*y_cur[IDX_CH3OHI] + k[2796]*y_cur[IDX_CPI] + + k[2797]*y_cur[IDX_CSI] + k[2798]*y_cur[IDX_H2CCCI] + + k[2799]*y_cur[IDX_H2COI] + k[2800]*y_cur[IDX_H2S2I] + + k[2801]*y_cur[IDX_H2SI] + k[2802]*y_cur[IDX_H2SiOI] + + k[2803]*y_cur[IDX_HC2PI] + k[2804]*y_cur[IDX_HC3NI] + + k[2805]*y_cur[IDX_C4H2I] + k[2806]*y_cur[IDX_HCNI] + + k[2807]*y_cur[IDX_HCOOCH3I] + k[2808]*y_cur[IDX_HCPI] + + k[2809]*y_cur[IDX_HCSiI] + k[2810]*y_cur[IDX_HNCI] + + k[2811]*y_cur[IDX_HNSiI] + k[2812]*y_cur[IDX_HPOI] + + k[2813]*y_cur[IDX_HS2I] + k[2814]*y_cur[IDX_NaI] + + k[2816]*y_cur[IDX_PNI] + k[2817]*y_cur[IDX_S2I] + + k[2818]*y_cur[IDX_SiI] + k[2819]*y_cur[IDX_SiC2I] + + k[2820]*y_cur[IDX_SiC2HI] + k[2821]*y_cur[IDX_SiCI] + + k[2822]*y_cur[IDX_SiCH3I] + k[2823]*y_cur[IDX_SiH2I] + + k[2824]*y_cur[IDX_SiHI] + k[2825]*y_cur[IDX_SiNCI] + + k[2826]*y_cur[IDX_SiOI] + k[3028]*y_cur[IDX_HNC3I] + + k[3538]*y_cur[IDX_NH2I] + k[3578]*y_cur[IDX_NH3I] + + k[3900]*y_cur[IDX_CM] + k[3935]*y_cur[IDX_C10M] + + k[3970]*y_cur[IDX_C10HM] + k[4005]*y_cur[IDX_C2M] + + k[4040]*y_cur[IDX_C2HM] + k[4075]*y_cur[IDX_C3M] + + k[4110]*y_cur[IDX_C3HM] + k[4145]*y_cur[IDX_C3NM] + + k[4180]*y_cur[IDX_C4M] + k[4215]*y_cur[IDX_C4HM] + + k[4250]*y_cur[IDX_C5M] + k[4285]*y_cur[IDX_C5HM] + + k[4320]*y_cur[IDX_C5NM] + k[4355]*y_cur[IDX_C6M] + + k[4390]*y_cur[IDX_C6HM] + k[4425]*y_cur[IDX_C7M] + + k[4460]*y_cur[IDX_C7HM] + k[4495]*y_cur[IDX_C8M] + + k[4530]*y_cur[IDX_C8HM] + k[4565]*y_cur[IDX_C9M] + + k[4600]*y_cur[IDX_C9HM] + k[4635]*y_cur[IDX_CHM] + + k[4670]*y_cur[IDX_CNM] + k[4706]*y_cur[IDX_HM] + + k[4741]*y_cur[IDX_OM] + k[4776]*y_cur[IDX_O2M] + + k[4811]*y_cur[IDX_OHM] + k[4846]*y_cur[IDX_SM] + + k[5629]*y_cur[IDX_CH3OI] + k[5635]*y_cur[IDX_CH2OHI] + + k[5651]*y_cur[IDX_COOCH3I] + k[5657]*y_cur[IDX_CH2OHCOI] + + k[5663]*y_cur[IDX_CH2OHCHOI] + k[5669]*y_cur[IDX_CH3COOHI] + + k[6343]*y_cur[IDX_GRAINM]; + data[jistart + 17866] = 0.0 - k[5399]*y_cur[IDX_H2OI]; + data[jistart + 17867] = 0.0 - k[518]*y_cur[IDX_H2OI] - k[3225]*y_cur[IDX_H2OI] - + k[3226]*y_cur[IDX_H2OI]; + data[jistart + 17868] = 0.0 - k[1393]*y_cur[IDX_H2OI] - k[1394]*y_cur[IDX_H2OI]; + data[jistart + 17869] = 0.0 - k[4]*y_cur[IDX_CM] - k[136]*y_cur[IDX_H2I] - + k[143]*y_cur[IDX_HI] - k[378]*y_cur[IDX_HII] - + k[447]*y_cur[IDX_H2II] - k[478]*y_cur[IDX_COII] - + k[479]*y_cur[IDX_CO2II] - k[480]*y_cur[IDX_HCNII] - + k[481]*y_cur[IDX_N2II] - k[482]*y_cur[IDX_N2OII] - + k[518]*y_cur[IDX_HeII] - k[552]*y_cur[IDX_NII] - + k[575]*y_cur[IDX_NHII] - k[656]*y_cur[IDX_OII] - + k[689]*y_cur[IDX_OHII] - k[1393]*y_cur[IDX_CII] - + k[1394]*y_cur[IDX_CII] - k[1951]*y_cur[IDX_CHII] - + k[1952]*y_cur[IDX_CHII] - k[1953]*y_cur[IDX_CHII] - + k[1982]*y_cur[IDX_CH2II] - k[2142]*y_cur[IDX_CH4II] - + k[2226]*y_cur[IDX_CH5II] - k[2367]*y_cur[IDX_HM] - + k[2386]*y_cur[IDX_H2II] - k[2509]*y_cur[IDX_H2OII] - + k[2519]*y_cur[IDX_C2II] - k[2520]*y_cur[IDX_C2II] - + k[2521]*y_cur[IDX_C2HII] - k[2522]*y_cur[IDX_C2H2II] - + k[2523]*y_cur[IDX_C2H3II] - k[2524]*y_cur[IDX_C2H5II] - + k[2525]*y_cur[IDX_C2NII] - k[2526]*y_cur[IDX_C2NII] - + k[2527]*y_cur[IDX_C2N2II] - k[2528]*y_cur[IDX_C3HII] - + k[2529]*y_cur[IDX_C3HII] - k[2530]*y_cur[IDX_C3HII] - + k[2531]*y_cur[IDX_C3OII] - k[2532]*y_cur[IDX_C4NII] - + k[2533]*y_cur[IDX_C4NII] - k[2534]*y_cur[IDX_C2H6II] - + k[2535]*y_cur[IDX_CNII] - k[2536]*y_cur[IDX_CNII] - + k[2537]*y_cur[IDX_CNII] - k[2538]*y_cur[IDX_CNII] - + k[2539]*y_cur[IDX_CNCII] - k[2540]*y_cur[IDX_COII] - + k[2541]*y_cur[IDX_CO2II] - k[2542]*y_cur[IDX_H2COII] - + k[2543]*y_cur[IDX_H2ClII] - k[2544]*y_cur[IDX_H2SII] - + k[2545]*y_cur[IDX_H3COII] - k[2546]*y_cur[IDX_HCNII] - + k[2547]*y_cur[IDX_HCOII] - k[2548]*y_cur[IDX_HCO2II] - + k[2549]*y_cur[IDX_HCOOH2II] - k[2550]*y_cur[IDX_HNOII] - + k[2551]*y_cur[IDX_HNSiII] - k[2552]*y_cur[IDX_HOCSII] - + k[2553]*y_cur[IDX_HPOII] - k[2554]*y_cur[IDX_HSII] - + k[2555]*y_cur[IDX_HSO2II] - k[2556]*y_cur[IDX_HSiSII] - + k[2557]*y_cur[IDX_N2II] - k[2558]*y_cur[IDX_N2HII] - + k[2559]*y_cur[IDX_N2OII] - k[2560]*y_cur[IDX_NCCNHII] - + k[2561]*y_cur[IDX_O2HII] - k[2562]*y_cur[IDX_PII] - + k[2563]*y_cur[IDX_PII] - k[2564]*y_cur[IDX_PHII] - + k[2565]*y_cur[IDX_PHII] - k[2566]*y_cur[IDX_PHII] - + k[2567]*y_cur[IDX_PH2II] - k[2568]*y_cur[IDX_PH2II] - + k[2569]*y_cur[IDX_SiII] - k[2570]*y_cur[IDX_SiCH3II] - + k[2571]*y_cur[IDX_SiHII] - k[2572]*y_cur[IDX_SiH4II] - + k[2573]*y_cur[IDX_SiH5II] - k[2684]*y_cur[IDX_H3II] - + k[3225]*y_cur[IDX_HeII] - k[3226]*y_cur[IDX_HeII] - + k[3489]*y_cur[IDX_NHII] - k[3490]*y_cur[IDX_NHII] - + k[3491]*y_cur[IDX_NHII] - k[3492]*y_cur[IDX_NHII] - + k[3512]*y_cur[IDX_NH2II] - k[3513]*y_cur[IDX_NH2II] - + k[3514]*y_cur[IDX_NH2II] - k[3550]*y_cur[IDX_NH3II] - + k[3779]*y_cur[IDX_OHII] - k[5031]*y_cur[IDX_CH3I] - + k[5151]*y_cur[IDX_FI] - k[5152]*y_cur[IDX_O2HI] - + k[5168]*y_cur[IDX_HI] - k[5306]*y_cur[IDX_NHI] - + k[5399]*y_cur[IDX_OI] - k[5536]*y_cur[IDX_CH3II] - + k[5566]*y_cur[IDX_HCOII] - k[5839] - k[6159] - k[6160] - k[6161] - + k[6902]; + data[jistart + 17870] = 0.0 - k[378]*y_cur[IDX_H2OI] + k[2330]*y_cur[IDX_CH3OHI]; + data[jistart + 17871] = 0.0 - k[2547]*y_cur[IDX_H2OI] - k[5566]*y_cur[IDX_H2OI]; + data[jistart + 17872] = 0.0 + k[2592]*y_cur[IDX_C2H5OHI] + k[2593]*y_cur[IDX_C2H5OHI] + + k[2594]*y_cur[IDX_C2H5OHI] + k[2651]*y_cur[IDX_CH3CHOI] + + k[2652]*y_cur[IDX_CH3CHOI] + k[2659]*y_cur[IDX_CH3COCH3I] + + k[2660]*y_cur[IDX_CH3COCH3I] + k[2667]*y_cur[IDX_CH3OHI] - + k[2684]*y_cur[IDX_H2OI] + k[2700]*y_cur[IDX_HCOOHI]; + data[jistart + 17873] = 0.0 + k[6343]*y_cur[IDX_H3OII] + k[6415]*y_cur[IDX_H3COII] + + k[6428]*y_cur[IDX_CH3OHII] + k[6440]*y_cur[IDX_CH3OH2II] + + k[6441]*y_cur[IDX_CH3OH2II] + k[6492]*y_cur[IDX_CH2COII] + + k[6545]*y_cur[IDX_H2OCNII] + k[6606]*y_cur[IDX_C2H5OH2II] + + k[6607]*y_cur[IDX_C2H5OH2II] + k[6732]*y_cur[IDX_CH3COOH2II] + + k[6734]*y_cur[IDX_CH3COOH2II] + k[6736]*y_cur[IDX_CH3COOH2II]; + data[jistart + 17874] = 0.0 + k[83]*y_cur[IDX_OM] - k[136]*y_cur[IDX_H2OI] + + k[2465]*y_cur[IDX_NO2II] + k[5148]*y_cur[IDX_OHI]; + data[jistart + 17875] = 0.0 + k[774]*y_cur[IDX_C2H5OH2II] + k[775]*y_cur[IDX_C2H5OH2II] + + k[918]*y_cur[IDX_CH2COII] + k[960]*y_cur[IDX_CH3OHII] + + k[963]*y_cur[IDX_CH3OH2II] + k[964]*y_cur[IDX_CH3OH2II] + + k[1015]*y_cur[IDX_H2OCNII] + k[1035]*y_cur[IDX_H3COII] + + k[1041]*y_cur[IDX_H3OII] + k[1291]*y_cur[IDX_CH3COOH2II] + + k[1293]*y_cur[IDX_CH3COOH2II] + k[1295]*y_cur[IDX_CH3COOH2II]; + data[jistart + 17876] = 0.0 + k[108]*y_cur[IDX_OHM] - k[143]*y_cur[IDX_H2OI] + + k[5166]*y_cur[IDX_H2O2I] - k[5168]*y_cur[IDX_H2OI] + + k[5191]*y_cur[IDX_O2HI] + k[5574]*y_cur[IDX_OHI]; + data[jistart + 17877] = 0.0 + k[318]*y_cur[IDX_HI]; + data[jistart + 17878] = 0.0 - k[379]*y_cur[IDX_HII]; + data[jistart + 17879] = 0.0 - k[423]*y_cur[IDX_HII] - k[2359]*y_cur[IDX_HII]; + data[jistart + 17880] = 0.0 - k[2352]*y_cur[IDX_HII]; + data[jistart + 17881] = 0.0 - k[2322]*y_cur[IDX_HII]; + data[jistart + 17882] = 0.0 - k[2324]*y_cur[IDX_HII]; + data[jistart + 17883] = 0.0 - k[381]*y_cur[IDX_HII] - k[2341]*y_cur[IDX_HII]; + data[jistart + 17884] = 0.0 - k[424]*y_cur[IDX_HII]; + data[jistart + 17885] = 0.0 - k[433]*y_cur[IDX_HII]; + data[jistart + 17886] = 0.0 - k[394]*y_cur[IDX_HII] - k[2350]*y_cur[IDX_HII]; + data[jistart + 17887] = 0.0 - k[420]*y_cur[IDX_HII] - k[2357]*y_cur[IDX_HII]; + data[jistart + 17888] = 0.0 - k[319]*y_cur[IDX_HII]; + data[jistart + 17889] = 0.0 - k[2343]*y_cur[IDX_HII]; + data[jistart + 17890] = 0.0 - k[427]*y_cur[IDX_HII] - k[2361]*y_cur[IDX_HII]; + data[jistart + 17891] = 0.0 - k[2319]*y_cur[IDX_HII]; + data[jistart + 17892] = 0.0 - k[2320]*y_cur[IDX_HII]; + data[jistart + 17893] = 0.0 - k[2351]*y_cur[IDX_HII]; + data[jistart + 17894] = 0.0 - k[395]*y_cur[IDX_HII]; + data[jistart + 17895] = 0.0 - k[396]*y_cur[IDX_HII]; + data[jistart + 17896] = 0.0 - k[364]*y_cur[IDX_HII] - k[2323]*y_cur[IDX_HII]; + data[jistart + 17897] = 0.0 - k[387]*y_cur[IDX_HII]; + data[jistart + 17898] = 0.0 - k[390]*y_cur[IDX_HII]; + data[jistart + 17899] = 0.0 - k[2355]*y_cur[IDX_HII]; + data[jistart + 17900] = 0.0 - k[410]*y_cur[IDX_HII]; + data[jistart + 17901] = 0.0 - k[412]*y_cur[IDX_HII]; + data[jistart + 17902] = 0.0 - k[421]*y_cur[IDX_HII] - k[2358]*y_cur[IDX_HII]; + data[jistart + 17903] = 0.0 - k[422]*y_cur[IDX_HII]; + data[jistart + 17904] = 0.0 - k[341]*y_cur[IDX_HII]; + data[jistart + 17905] = 0.0 - k[361]*y_cur[IDX_HII]; + data[jistart + 17906] = 0.0 - k[391]*y_cur[IDX_HII]; + data[jistart + 17907] = 0.0 - k[393]*y_cur[IDX_HII]; + data[jistart + 17908] = 0.0 - k[2348]*y_cur[IDX_HII]; + data[jistart + 17909] = 0.0 - k[363]*y_cur[IDX_HII] - k[2321]*y_cur[IDX_HII]; + data[jistart + 17910] = 0.0 - k[369]*y_cur[IDX_HII]; + data[jistart + 17911] = 0.0 - k[377]*y_cur[IDX_HII]; + data[jistart + 17912] = 0.0 - k[413]*y_cur[IDX_HII]; + data[jistart + 17913] = 0.0 - k[414]*y_cur[IDX_HII]; + data[jistart + 17914] = 0.0 - k[337]*y_cur[IDX_HII]; + data[jistart + 17915] = 0.0 - k[2317]*y_cur[IDX_HII] - k[2318]*y_cur[IDX_HII]; + data[jistart + 17916] = 0.0 + k[5631]*y_cur[IDX_HeII]; + data[jistart + 17917] = 0.0 - k[382]*y_cur[IDX_HII]; + data[jistart + 17918] = 0.0 - k[392]*y_cur[IDX_HII] - k[2347]*y_cur[IDX_HII]; + data[jistart + 17919] = 0.0 - k[426]*y_cur[IDX_HII] - k[2360]*y_cur[IDX_HII]; + data[jistart + 17920] = 0.0 - k[419]*y_cur[IDX_HII]; + data[jistart + 17921] = 0.0 - k[331]*y_cur[IDX_HII]; + data[jistart + 17922] = 0.0 - k[432]*y_cur[IDX_HII]; + data[jistart + 17923] = 0.0 - k[2346]*y_cur[IDX_HII] + k[3256]*y_cur[IDX_HeII]; + data[jistart + 17924] = 0.0 - k[404]*y_cur[IDX_HII]; + data[jistart + 17925] = 0.0 - k[428]*y_cur[IDX_HII] - k[2362]*y_cur[IDX_HII]; + data[jistart + 17926] = 0.0 - k[336]*y_cur[IDX_HII]; + data[jistart + 17927] = 0.0 - k[356]*y_cur[IDX_HII] - k[2312]*y_cur[IDX_HII]; + data[jistart + 17928] = 0.0 - k[2316]*y_cur[IDX_HII]; + data[jistart + 17929] = 0.0 - k[386]*y_cur[IDX_HII]; + data[jistart + 17930] = 0.0 - k[321]*y_cur[IDX_HII] - k[2294]*y_cur[IDX_HII]; + data[jistart + 17931] = 0.0 - k[358]*y_cur[IDX_HII]; + data[jistart + 17932] = 0.0 - k[373]*y_cur[IDX_HII]; + data[jistart + 17933] = 0.0 - k[416]*y_cur[IDX_HII]; + data[jistart + 17934] = 0.0 - k[425]*y_cur[IDX_HII]; + data[jistart + 17935] = 0.0 - k[328]*y_cur[IDX_HII]; + data[jistart + 17936] = 0.0 - k[2349]*y_cur[IDX_HII] + k[3266]*y_cur[IDX_HeII]; + data[jistart + 17937] = 0.0 - k[399]*y_cur[IDX_HII] - k[2354]*y_cur[IDX_HII]; + data[jistart + 17938] = 0.0 - k[429]*y_cur[IDX_HII] - k[2363]*y_cur[IDX_HII]; + data[jistart + 17939] = 0.0 - k[3021]*y_cur[IDX_HII] - k[3022]*y_cur[IDX_HII] - + k[3023]*y_cur[IDX_HII] - k[3024]*y_cur[IDX_HII] + + k[3024]*y_cur[IDX_HII] - k[3025]*y_cur[IDX_HII] - + k[3026]*y_cur[IDX_HII]; + data[jistart + 17940] = 0.0 - k[368]*y_cur[IDX_HII]; + data[jistart + 17941] = 0.0 - k[353]*y_cur[IDX_HII] - k[2310]*y_cur[IDX_HII]; + data[jistart + 17942] = 0.0 - k[385]*y_cur[IDX_HII]; + data[jistart + 17943] = 0.0 - k[431]*y_cur[IDX_HII] - k[2365]*y_cur[IDX_HII]; + data[jistart + 17944] = 0.0 - k[430]*y_cur[IDX_HII] - k[2364]*y_cur[IDX_HII]; + data[jistart + 17945] = 0.0 - k[411]*y_cur[IDX_HII]; + data[jistart + 17946] = 0.0 - k[350]*y_cur[IDX_HII] - k[2308]*y_cur[IDX_HII]; + data[jistart + 17947] = 0.0 - k[366]*y_cur[IDX_HII]; + data[jistart + 17948] = 0.0 - k[367]*y_cur[IDX_HII] - k[2328]*y_cur[IDX_HII] - + k[2329]*y_cur[IDX_HII]; + data[jistart + 17949] = 0.0 - k[2335]*y_cur[IDX_HII] - k[2336]*y_cur[IDX_HII]; + data[jistart + 17950] = 0.0 - k[347]*y_cur[IDX_HII] - k[2306]*y_cur[IDX_HII]; + data[jistart + 17951] = 0.0 - k[344]*y_cur[IDX_HII] - k[2304]*y_cur[IDX_HII]; + data[jistart + 17952] = 0.0 + k[487]*y_cur[IDX_HI]; + data[jistart + 17953] = 0.0 - k[2326]*y_cur[IDX_HII] - k[2327]*y_cur[IDX_HII]; + data[jistart + 17954] = 0.0 - k[334]*y_cur[IDX_HII] - k[2300]*y_cur[IDX_HII]; + data[jistart + 17955] = 0.0 - k[327]*y_cur[IDX_HII] - k[2298]*y_cur[IDX_HII]; + data[jistart + 17956] = 0.0 + k[490]*y_cur[IDX_HI]; + data[jistart + 17957] = 0.0 + k[6206]; + data[jistart + 17958] = 0.0 + k[6217]; + data[jistart + 17959] = 0.0 - k[4772]*y_cur[IDX_HII]; + data[jistart + 17960] = 0.0 - k[4631]*y_cur[IDX_HII]; + data[jistart + 17961] = 0.0 + k[489]*y_cur[IDX_HI] + k[6148]; + data[jistart + 17962] = 0.0 - k[407]*y_cur[IDX_HII] - k[2356]*y_cur[IDX_HII]; + data[jistart + 17963] = 0.0 - k[409]*y_cur[IDX_HII]; + data[jistart + 17964] = 0.0 - k[4842]*y_cur[IDX_HII]; + data[jistart + 17965] = 0.0 - k[4036]*y_cur[IDX_HII]; + data[jistart + 17966] = 0.0 - k[4211]*y_cur[IDX_HII]; + data[jistart + 17967] = 0.0 + k[488]*y_cur[IDX_HI]; + data[jistart + 17968] = 0.0 - k[365]*y_cur[IDX_HII] - k[2325]*y_cur[IDX_HII]; + data[jistart + 17969] = 0.0 - k[4807]*y_cur[IDX_HII]; + data[jistart + 17970] = 0.0 - k[3966]*y_cur[IDX_HII]; + data[jistart + 17971] = 0.0 - k[4106]*y_cur[IDX_HII]; + data[jistart + 17972] = 0.0 - k[342]*y_cur[IDX_HII]; + data[jistart + 17973] = 0.0 - k[4386]*y_cur[IDX_HII]; + data[jistart + 17974] = 0.0 - k[4526]*y_cur[IDX_HII]; + data[jistart + 17975] = 0.0 - k[4456]*y_cur[IDX_HII]; + data[jistart + 17976] = 0.0 - k[4596]*y_cur[IDX_HII]; + data[jistart + 17977] = 0.0 - k[3931]*y_cur[IDX_HII]; + data[jistart + 17978] = 0.0 - k[4281]*y_cur[IDX_HII]; + data[jistart + 17979] = 0.0 - k[4316]*y_cur[IDX_HII]; + data[jistart + 17980] = 0.0 - k[397]*y_cur[IDX_HII] - k[2353]*y_cur[IDX_HII]; + data[jistart + 17981] = 0.0 - k[3896]*y_cur[IDX_HII]; + data[jistart + 17982] = 0.0 - k[374]*y_cur[IDX_HII]; + data[jistart + 17983] = 0.0 - k[4737]*y_cur[IDX_HII]; + data[jistart + 17984] = 0.0 - k[4561]*y_cur[IDX_HII]; + data[jistart + 17985] = 0.0 - k[370]*y_cur[IDX_HII] - k[2330]*y_cur[IDX_HII] - + k[2331]*y_cur[IDX_HII] - k[2332]*y_cur[IDX_HII]; + data[jistart + 17986] = 0.0 - k[4701]*y_cur[IDX_HII]; + data[jistart + 17987] = 0.0 - k[383]*y_cur[IDX_HII]; + data[jistart + 17988] = 0.0 - k[435]*y_cur[IDX_HII]; + data[jistart + 17989] = 0.0 - k[4491]*y_cur[IDX_HII]; + data[jistart + 17990] = 0.0 - k[4001]*y_cur[IDX_HII]; + data[jistart + 17991] = 0.0 - k[332]*y_cur[IDX_HII]; + data[jistart + 17992] = 0.0 - k[4071]*y_cur[IDX_HII]; + data[jistart + 17993] = 0.0 - k[4176]*y_cur[IDX_HII]; + data[jistart + 17994] = 0.0 - k[4351]*y_cur[IDX_HII]; + data[jistart + 17995] = 0.0 - k[4246]*y_cur[IDX_HII]; + data[jistart + 17996] = 0.0 - k[4421]*y_cur[IDX_HII]; + data[jistart + 17997] = 0.0 - k[330]*y_cur[IDX_HII]; + data[jistart + 17998] = 0.0 - k[400]*y_cur[IDX_HII]; + data[jistart + 17999] = 0.0 - k[339]*y_cur[IDX_HII] - k[2302]*y_cur[IDX_HII]; + data[jistart + 18000] = 0.0 + k[6077]; + data[jistart + 18001] = 0.0 - k[4141]*y_cur[IDX_HII]; + data[jistart + 18002] = 0.0 + k[6073]; + data[jistart + 18003] = 0.0 - k[2334]*y_cur[IDX_HII]; + data[jistart + 18004] = 0.0 - k[322]*y_cur[IDX_HII]; + data[jistart + 18005] = 0.0 - k[357]*y_cur[IDX_HII] - k[2313]*y_cur[IDX_HII]; + data[jistart + 18006] = 0.0 - k[434]*y_cur[IDX_HII]; + data[jistart + 18007] = 0.0 - k[375]*y_cur[IDX_HII]; + data[jistart + 18008] = 0.0 - k[398]*y_cur[IDX_HII]; + data[jistart + 18009] = 0.0 - k[320]*y_cur[IDX_HII] - k[2293]*y_cur[IDX_HII]; + data[jistart + 18010] = 0.0 - k[354]*y_cur[IDX_HII] - k[2311]*y_cur[IDX_HII]; + data[jistart + 18011] = 0.0 - k[349]*y_cur[IDX_HII]; + data[jistart + 18012] = 0.0 - k[355]*y_cur[IDX_HII]; + data[jistart + 18013] = 0.0 - k[352]*y_cur[IDX_HII]; + data[jistart + 18014] = 0.0 - k[402]*y_cur[IDX_HII]; + data[jistart + 18015] = 0.0 - k[343]*y_cur[IDX_HII]; + data[jistart + 18016] = 0.0 - k[346]*y_cur[IDX_HII]; + data[jistart + 18017] = 0.0 - k[4666]*y_cur[IDX_HII]; + data[jistart + 18018] = 0.0 - k[338]*y_cur[IDX_HII]; + data[jistart + 18019] = 0.0 - k[417]*y_cur[IDX_HII]; + data[jistart + 18020] = 0.0 - k[351]*y_cur[IDX_HII] - k[2309]*y_cur[IDX_HII]; + data[jistart + 18021] = 0.0 - k[360]*y_cur[IDX_HII] - k[2315]*y_cur[IDX_HII]; + data[jistart + 18022] = 0.0 - k[348]*y_cur[IDX_HII] - k[2307]*y_cur[IDX_HII]; + data[jistart + 18023] = 0.0 - k[345]*y_cur[IDX_HII] - k[2305]*y_cur[IDX_HII]; + data[jistart + 18024] = 0.0 - k[335]*y_cur[IDX_HII] - k[2301]*y_cur[IDX_HII]; + data[jistart + 18025] = 0.0 - k[333]*y_cur[IDX_HII]; + data[jistart + 18026] = 0.0 - k[340]*y_cur[IDX_HII] - k[2303]*y_cur[IDX_HII]; + data[jistart + 18027] = 0.0 + k[492]*y_cur[IDX_HI]; + data[jistart + 18028] = 0.0 - k[384]*y_cur[IDX_HII] - k[2342]*y_cur[IDX_HII]; + data[jistart + 18029] = 0.0 - k[359]*y_cur[IDX_HII] - k[2314]*y_cur[IDX_HII]; + data[jistart + 18030] = 0.0 - k[133]*y_cur[IDX_HII] + k[133]*y_cur[IDX_HII]; + data[jistart + 18031] = 0.0 - k[326]*y_cur[IDX_HII] - k[2296]*y_cur[IDX_HII] - + k[2297]*y_cur[IDX_HII]; + data[jistart + 18032] = 0.0 - k[325]*y_cur[IDX_HII] - k[2295]*y_cur[IDX_HII]; + data[jistart + 18033] = 0.0 - k[405]*y_cur[IDX_HII]; + data[jistart + 18034] = 0.0 - k[380]*y_cur[IDX_HII] - k[2339]*y_cur[IDX_HII] - + k[2340]*y_cur[IDX_HII]; + data[jistart + 18035] = 0.0 - k[418]*y_cur[IDX_HII]; + data[jistart + 18036] = 0.0 - k[403]*y_cur[IDX_HII]; + data[jistart + 18037] = 0.0 - k[389]*y_cur[IDX_HII] - k[2344]*y_cur[IDX_HII] - + k[2345]*y_cur[IDX_HII]; + data[jistart + 18038] = 0.0 - k[371]*y_cur[IDX_HII] - k[2333]*y_cur[IDX_HII] + + k[3201]*y_cur[IDX_HeII]; + data[jistart + 18039] = 0.0 - k[329]*y_cur[IDX_HII] - k[2299]*y_cur[IDX_HII]; + data[jistart + 18040] = 0.0 - k[376]*y_cur[IDX_HII] - k[2337]*y_cur[IDX_HII] - + k[2338]*y_cur[IDX_HII]; + data[jistart + 18041] = 0.0 - k[388]*y_cur[IDX_HII]; + data[jistart + 18042] = 0.0 - k[372]*y_cur[IDX_HII]; + data[jistart + 18043] = 0.0 - k[415]*y_cur[IDX_HII]; + data[jistart + 18044] = 0.0 - k[323]*y_cur[IDX_HII]; + data[jistart + 18045] = 0.0 - k[408]*y_cur[IDX_HII]; + data[jistart + 18046] = 0.0 - k[401]*y_cur[IDX_HII]; + data[jistart + 18047] = 0.0 - k[324]*y_cur[IDX_HII]; + data[jistart + 18048] = 0.0 - k[362]*y_cur[IDX_HII]; + data[jistart + 18049] = 0.0 - k[406]*y_cur[IDX_HII]; + data[jistart + 18050] = 0.0 + k[491]*y_cur[IDX_HI] + k[2457]*y_cur[IDX_H2I] + + k[3201]*y_cur[IDX_CH4I] + k[3226]*y_cur[IDX_H2OI] + + k[3256]*y_cur[IDX_HCSI] + k[3266]*y_cur[IDX_HNOI] + + k[5631]*y_cur[IDX_CH3OI]; + data[jistart + 18051] = 0.0 - k[5547]*y_cur[IDX_HII]; + data[jistart + 18052] = 0.0 - k[378]*y_cur[IDX_HII] + k[3226]*y_cur[IDX_HeII]; + data[jistart + 18053] = 0.0 - k[133]*y_cur[IDX_HNCI] + k[133]*y_cur[IDX_HNCI] - + k[319]*y_cur[IDX_ClI] - k[320]*y_cur[IDX_C10I] - + k[321]*y_cur[IDX_C10H2I] - k[322]*y_cur[IDX_C10HI] - + k[323]*y_cur[IDX_C2I] - k[324]*y_cur[IDX_C2H2I] - + k[325]*y_cur[IDX_C2H3I] - k[326]*y_cur[IDX_C2H4I] - + k[327]*y_cur[IDX_C2H5I] - k[328]*y_cur[IDX_C2H5OHI] - + k[329]*y_cur[IDX_C2HI] - k[330]*y_cur[IDX_C2NI] - + k[331]*y_cur[IDX_C2OI] - k[332]*y_cur[IDX_C2SI] - + k[333]*y_cur[IDX_C3I] - k[334]*y_cur[IDX_C3H2I] - + k[335]*y_cur[IDX_C3HI] - k[336]*y_cur[IDX_C3OI] - + k[337]*y_cur[IDX_C3SI] - k[338]*y_cur[IDX_C4I] - + k[339]*y_cur[IDX_C4H3I] - k[340]*y_cur[IDX_C4HI] - + k[341]*y_cur[IDX_C4PI] - k[342]*y_cur[IDX_C4SI] - + k[343]*y_cur[IDX_C5I] - k[344]*y_cur[IDX_C5H2I] - + k[345]*y_cur[IDX_C5HI] - k[346]*y_cur[IDX_C6I] - + k[347]*y_cur[IDX_C6H2I] - k[348]*y_cur[IDX_C6HI] - + k[349]*y_cur[IDX_C7I] - k[350]*y_cur[IDX_C7H2I] - + k[351]*y_cur[IDX_C7HI] - k[352]*y_cur[IDX_C8I] - + k[353]*y_cur[IDX_C8H2I] - k[354]*y_cur[IDX_C8HI] - + k[355]*y_cur[IDX_C9I] - k[356]*y_cur[IDX_C9H2I] - + k[357]*y_cur[IDX_C9HI] - k[358]*y_cur[IDX_CCPI] - + k[359]*y_cur[IDX_CH2I] - k[360]*y_cur[IDX_CH2CCHI] - + k[361]*y_cur[IDX_CH2CNI] - k[362]*y_cur[IDX_CH3I] - + k[363]*y_cur[IDX_CH3C4HI] - k[364]*y_cur[IDX_CH3C6HI] - + k[365]*y_cur[IDX_CH3CCHI] - k[366]*y_cur[IDX_CH3CHOI] - + k[367]*y_cur[IDX_CH3CNI] - k[368]*y_cur[IDX_CH3COCH3I] - + k[369]*y_cur[IDX_CH3OCH3I] - k[370]*y_cur[IDX_CH3OHI] - + k[371]*y_cur[IDX_CH4I] - k[372]*y_cur[IDX_CHI] - + k[373]*y_cur[IDX_CPI] - k[374]*y_cur[IDX_CSI] - + k[375]*y_cur[IDX_FeI] - k[376]*y_cur[IDX_H2COI] - + k[377]*y_cur[IDX_H2CSI] - k[378]*y_cur[IDX_H2OI] - + k[379]*y_cur[IDX_H2S2I] - k[380]*y_cur[IDX_H2SI] - + k[381]*y_cur[IDX_H2SiOI] - k[382]*y_cur[IDX_HC2PI] - + k[383]*y_cur[IDX_HC3NI] - k[384]*y_cur[IDX_C4H2I] - + k[385]*y_cur[IDX_HC5NI] - k[386]*y_cur[IDX_HC7NI] - + k[387]*y_cur[IDX_HC9NI] - k[388]*y_cur[IDX_HCNI] - + k[389]*y_cur[IDX_HCOI] - k[390]*y_cur[IDX_HCOOCH3I] - + k[391]*y_cur[IDX_HCPI] - k[392]*y_cur[IDX_HCSiI] - + k[393]*y_cur[IDX_HClI] - k[394]*y_cur[IDX_HNSiI] - + k[395]*y_cur[IDX_HPOI] - k[396]*y_cur[IDX_HS2I] - + k[397]*y_cur[IDX_HSI] - k[398]*y_cur[IDX_MgI] - + k[399]*y_cur[IDX_N2OI] - k[400]*y_cur[IDX_NH2I] - + k[401]*y_cur[IDX_NH3I] - k[402]*y_cur[IDX_NHI] - + k[403]*y_cur[IDX_NOI] - k[404]*y_cur[IDX_NSI] - + k[405]*y_cur[IDX_O2I] - k[406]*y_cur[IDX_OI] - + k[407]*y_cur[IDX_OCSI] - k[408]*y_cur[IDX_OHI] - + k[409]*y_cur[IDX_PI] - k[410]*y_cur[IDX_PH2I] - + k[411]*y_cur[IDX_PHI] - k[412]*y_cur[IDX_PNI] - + k[413]*y_cur[IDX_POI] - k[414]*y_cur[IDX_S2I] - k[415]*y_cur[IDX_SI] + - k[416]*y_cur[IDX_SO2I] - k[417]*y_cur[IDX_SOI] - + k[418]*y_cur[IDX_SiI] - k[419]*y_cur[IDX_SiC2I] - + k[420]*y_cur[IDX_SiC2H2I] - k[421]*y_cur[IDX_SiC2HI] - + k[422]*y_cur[IDX_SiC3I] - k[423]*y_cur[IDX_SiC3HI] - + k[424]*y_cur[IDX_SiC4I] - k[425]*y_cur[IDX_SiCI] - + k[426]*y_cur[IDX_SiCH2I] - k[427]*y_cur[IDX_SiCH3I] - + k[428]*y_cur[IDX_SiH2I] - k[429]*y_cur[IDX_SiH3I] - + k[430]*y_cur[IDX_SiH4I] - k[431]*y_cur[IDX_SiHI] - + k[432]*y_cur[IDX_SiNI] - k[433]*y_cur[IDX_SiNCI] - + k[434]*y_cur[IDX_SiOI] - k[435]*y_cur[IDX_SiSI] - + k[2293]*y_cur[IDX_C10I] - k[2294]*y_cur[IDX_C10H2I] - + k[2295]*y_cur[IDX_C2H3I] - k[2296]*y_cur[IDX_C2H4I] - + k[2297]*y_cur[IDX_C2H4I] - k[2298]*y_cur[IDX_C2H5I] - + k[2299]*y_cur[IDX_C2HI] - k[2300]*y_cur[IDX_C3H2I] - + k[2301]*y_cur[IDX_C3HI] - k[2302]*y_cur[IDX_C4H3I] - + k[2303]*y_cur[IDX_C4HI] - k[2304]*y_cur[IDX_C5H2I] - + k[2305]*y_cur[IDX_C5HI] - k[2306]*y_cur[IDX_C6H2I] - + k[2307]*y_cur[IDX_C6HI] - k[2308]*y_cur[IDX_C7H2I] - + k[2309]*y_cur[IDX_C7HI] - k[2310]*y_cur[IDX_C8H2I] - + k[2311]*y_cur[IDX_C8HI] - k[2312]*y_cur[IDX_C9H2I] - + k[2313]*y_cur[IDX_C9HI] - k[2314]*y_cur[IDX_CH2I] - + k[2315]*y_cur[IDX_CH2CCHI] - k[2316]*y_cur[IDX_CH2CHCNI] - + k[2317]*y_cur[IDX_CH2NHI] - k[2318]*y_cur[IDX_CH2NHI] - + k[2319]*y_cur[IDX_CH2PHI] - k[2320]*y_cur[IDX_CH3C3NI] - + k[2321]*y_cur[IDX_CH3C4HI] - k[2322]*y_cur[IDX_CH3C5NI] - + k[2323]*y_cur[IDX_CH3C6HI] - k[2324]*y_cur[IDX_CH3C7NI] - + k[2325]*y_cur[IDX_CH3CCHI] - k[2326]*y_cur[IDX_C2H6I] - + k[2327]*y_cur[IDX_C2H6I] - k[2328]*y_cur[IDX_CH3CNI] - + k[2329]*y_cur[IDX_CH3CNI] - k[2330]*y_cur[IDX_CH3OHI] - + k[2331]*y_cur[IDX_CH3OHI] - k[2332]*y_cur[IDX_CH3OHI] - + k[2333]*y_cur[IDX_CH4I] - k[2334]*y_cur[IDX_CO2I] - + k[2335]*y_cur[IDX_H2CCCI] - k[2336]*y_cur[IDX_H2CCCI] - + k[2337]*y_cur[IDX_H2COI] - k[2338]*y_cur[IDX_H2COI] - + k[2339]*y_cur[IDX_H2SI] - k[2340]*y_cur[IDX_H2SI] - + k[2341]*y_cur[IDX_H2SiOI] - k[2342]*y_cur[IDX_C4H2I] - + k[2343]*y_cur[IDX_HCNOI] - k[2344]*y_cur[IDX_HCOI] - + k[2345]*y_cur[IDX_HCOI] - k[2346]*y_cur[IDX_HCSI] - + k[2347]*y_cur[IDX_HCSiI] - k[2348]*y_cur[IDX_HNCOI] - + k[2349]*y_cur[IDX_HNOI] - k[2350]*y_cur[IDX_HNSiI] - + k[2351]*y_cur[IDX_HOCNI] - k[2352]*y_cur[IDX_HONCI] - + k[2353]*y_cur[IDX_HSI] - k[2354]*y_cur[IDX_N2OI] - + k[2355]*y_cur[IDX_NO2I] - k[2356]*y_cur[IDX_OCSI] - + k[2357]*y_cur[IDX_SiC2H2I] - k[2358]*y_cur[IDX_SiC2HI] - + k[2359]*y_cur[IDX_SiC3HI] - k[2360]*y_cur[IDX_SiCH2I] - + k[2361]*y_cur[IDX_SiCH3I] - k[2362]*y_cur[IDX_SiH2I] - + k[2363]*y_cur[IDX_SiH3I] - k[2364]*y_cur[IDX_SiH4I] - + k[2365]*y_cur[IDX_SiHI] - k[3021]*y_cur[IDX_HNC3I] - + k[3022]*y_cur[IDX_HNC3I] - k[3023]*y_cur[IDX_HNC3I] - + k[3024]*y_cur[IDX_HNC3I] + k[3024]*y_cur[IDX_HNC3I] - + k[3025]*y_cur[IDX_HNC3I] - k[3026]*y_cur[IDX_HNC3I] - + k[3896]*y_cur[IDX_CM] - k[3931]*y_cur[IDX_C10M] - + k[3966]*y_cur[IDX_C10HM] - k[4001]*y_cur[IDX_C2M] - + k[4036]*y_cur[IDX_C2HM] - k[4071]*y_cur[IDX_C3M] - + k[4106]*y_cur[IDX_C3HM] - k[4141]*y_cur[IDX_C3NM] - + k[4176]*y_cur[IDX_C4M] - k[4211]*y_cur[IDX_C4HM] - + k[4246]*y_cur[IDX_C5M] - k[4281]*y_cur[IDX_C5HM] - + k[4316]*y_cur[IDX_C5NM] - k[4351]*y_cur[IDX_C6M] - + k[4386]*y_cur[IDX_C6HM] - k[4421]*y_cur[IDX_C7M] - + k[4456]*y_cur[IDX_C7HM] - k[4491]*y_cur[IDX_C8M] - + k[4526]*y_cur[IDX_C8HM] - k[4561]*y_cur[IDX_C9M] - + k[4596]*y_cur[IDX_C9HM] - k[4631]*y_cur[IDX_CHM] - + k[4666]*y_cur[IDX_CNM] - k[4701]*y_cur[IDX_HM] - + k[4737]*y_cur[IDX_OM] - k[4772]*y_cur[IDX_O2M] - + k[4807]*y_cur[IDX_OHM] - k[4842]*y_cur[IDX_SM] - + k[5546]*y_cur[IDX_HI] - k[5547]*y_cur[IDX_HeI] - + k[5615]*y_cur[IDX_eM] - k[6308]*y_cur[IDX_GRAINM]; + data[jistart + 18054] = 0.0 + k[6169]; + data[jistart + 18055] = 0.0 - k[6308]*y_cur[IDX_HII]; + data[jistart + 18056] = 0.0 + k[2457]*y_cur[IDX_HeII] + k[5678] + k[5679]; + data[jistart + 18057] = 0.0 - k[5615]*y_cur[IDX_HII]; + data[jistart + 18058] = 0.0 + k[318]*y_cur[IDX_ClII] + k[487]*y_cur[IDX_CNII] + + k[488]*y_cur[IDX_COII] + k[489]*y_cur[IDX_H2II] + + k[490]*y_cur[IDX_HCNII] + k[491]*y_cur[IDX_HeII] + + k[492]*y_cur[IDX_OII] - k[5546]*y_cur[IDX_HII] + k[5682] + k[5844]; + data[jistart + 18059] = 0.0 + k[905]*y_cur[IDX_eM] + k[6423]*y_cur[IDX_GRAINM]; + data[jistart + 18060] = 0.0 + k[5786] + k[6087]; + data[jistart + 18061] = 0.0 + k[833]*y_cur[IDX_eM] + k[6809]*y_cur[IDX_GRAINM]; + data[jistart + 18062] = 0.0 + k[172]*y_cur[IDX_CII]; + data[jistart + 18063] = 0.0 + k[785]*y_cur[IDX_eM] + k[6474]*y_cur[IDX_GRAINM]; + data[jistart + 18064] = 0.0 + k[5784] + k[5785] + k[6085] + k[6086]; + data[jistart + 18065] = 0.0 - k[249]*y_cur[IDX_CI]; + data[jistart + 18066] = 0.0 + k[734]*y_cur[IDX_eM] + k[6879]*y_cur[IDX_GRAINM]; + data[jistart + 18067] = 0.0 + k[904]*y_cur[IDX_eM] + k[6599]*y_cur[IDX_GRAINM]; + data[jistart + 18068] = 0.0 - k[1896]*y_cur[IDX_CI]; + data[jistart + 18069] = 0.0 - k[1897]*y_cur[IDX_CI]; + data[jistart + 18070] = 0.0 - k[4960]*y_cur[IDX_CI]; + data[jistart + 18071] = 0.0 + k[159]*y_cur[IDX_CII] + k[5380]*y_cur[IDX_OI] + k[5775] + + k[6072]; + data[jistart + 18072] = 0.0 + k[786]*y_cur[IDX_eM] + k[6674]*y_cur[IDX_GRAINM]; + data[jistart + 18073] = 0.0 + k[816]*y_cur[IDX_eM] + k[6775]*y_cur[IDX_GRAINM]; + data[jistart + 18074] = 0.0 - k[1895]*y_cur[IDX_CI]; + data[jistart + 18075] = 0.0 + k[1192]*y_cur[IDX_eM] + k[6774]*y_cur[IDX_GRAINM]; + data[jistart + 18076] = 0.0 - k[1928]*y_cur[IDX_CI]; + data[jistart + 18077] = 0.0 + k[902]*y_cur[IDX_eM] + k[6662]*y_cur[IDX_GRAINM]; + data[jistart + 18078] = 0.0 + k[5649]*y_cur[IDX_CII]; + data[jistart + 18079] = 0.0 - k[1919]*y_cur[IDX_CI]; + data[jistart + 18080] = 0.0 + k[1239]*y_cur[IDX_eM] + k[6799]*y_cur[IDX_GRAINM]; + data[jistart + 18081] = 0.0 - k[1929]*y_cur[IDX_CI]; + data[jistart + 18082] = 0.0 + k[5692]; + data[jistart + 18083] = 0.0 - k[1924]*y_cur[IDX_CI]; + data[jistart + 18084] = 0.0 + k[728]*y_cur[IDX_eM] + k[6870]*y_cur[IDX_GRAINM]; + data[jistart + 18085] = 0.0 - k[1848]*y_cur[IDX_CI]; + data[jistart + 18086] = 0.0 - k[1917]*y_cur[IDX_CI]; + data[jistart + 18087] = 0.0 - k[1923]*y_cur[IDX_CI]; + data[jistart + 18088] = 0.0 - k[1930]*y_cur[IDX_CI] - k[1931]*y_cur[IDX_CI]; + data[jistart + 18089] = 0.0 + k[984]*y_cur[IDX_eM] + k[6511]*y_cur[IDX_GRAINM]; + data[jistart + 18090] = 0.0 - k[5217]*y_cur[IDX_CI]; + data[jistart + 18091] = 0.0 + k[890]*y_cur[IDX_eM] + k[6856]*y_cur[IDX_GRAINM]; + data[jistart + 18092] = 0.0 + k[5655]*y_cur[IDX_CII]; + data[jistart + 18093] = 0.0 + k[176]*y_cur[IDX_CII]; + data[jistart + 18094] = 0.0 + k[1057]*y_cur[IDX_eM] + k[6488]*y_cur[IDX_GRAINM]; + data[jistart + 18095] = 0.0 - k[1906]*y_cur[IDX_CI]; + data[jistart + 18096] = 0.0 + k[3315]*y_cur[IDX_HeII]; + data[jistart + 18097] = 0.0 + k[6282]; + data[jistart + 18098] = 0.0 + k[1232]*y_cur[IDX_eM] + k[6746]*y_cur[IDX_GRAINM]; + data[jistart + 18099] = 0.0 + k[5661]*y_cur[IDX_CII]; + data[jistart + 18100] = 0.0 - k[5202]*y_cur[IDX_CI]; + data[jistart + 18101] = 0.0 - k[1918]*y_cur[IDX_CI]; + data[jistart + 18102] = 0.0 + k[200]*y_cur[IDX_CII]; + data[jistart + 18103] = 0.0 + k[832]*y_cur[IDX_eM] + k[6741]*y_cur[IDX_GRAINM]; + data[jistart + 18104] = 0.0 + k[878]*y_cur[IDX_eM] + k[6837]*y_cur[IDX_GRAINM]; + data[jistart + 18105] = 0.0 - k[5215]*y_cur[IDX_CI]; + data[jistart + 18106] = 0.0 + k[181]*y_cur[IDX_CII] - k[4964]*y_cur[IDX_CI]; + data[jistart + 18107] = 0.0 + k[1225]*y_cur[IDX_eM] + k[6643]*y_cur[IDX_GRAINM]; + data[jistart + 18108] = 0.0 - k[1916]*y_cur[IDX_CI]; + data[jistart + 18109] = 0.0 + k[5639]*y_cur[IDX_CII]; + data[jistart + 18110] = 0.0 + k[5644]*y_cur[IDX_CII]; + data[jistart + 18111] = 0.0 - k[4951]*y_cur[IDX_CI]; + data[jistart + 18112] = 0.0 + k[179]*y_cur[IDX_CII]; + data[jistart + 18113] = 0.0 + k[196]*y_cur[IDX_CII]; + data[jistart + 18114] = 0.0 + k[197]*y_cur[IDX_CII] + k[3312]*y_cur[IDX_HeII] + k[5921] + + k[6264]; + data[jistart + 18115] = 0.0 + k[5734]; + data[jistart + 18116] = 0.0 + k[865]*y_cur[IDX_eM] + k[6823]*y_cur[IDX_GRAINM]; + data[jistart + 18117] = 0.0 + k[163]*y_cur[IDX_CII] - k[4948]*y_cur[IDX_CI]; + data[jistart + 18118] = 0.0 + k[180]*y_cur[IDX_CII]; + data[jistart + 18119] = 0.0 - k[5214]*y_cur[IDX_CI]; + data[jistart + 18120] = 0.0 + k[5724]; + data[jistart + 18121] = 0.0 - k[4943]*y_cur[IDX_CI]; + data[jistart + 18122] = 0.0 - k[4950]*y_cur[IDX_CI]; + data[jistart + 18123] = 0.0 + k[5667]*y_cur[IDX_CII]; + data[jistart + 18124] = 0.0 + k[169]*y_cur[IDX_CII]; + data[jistart + 18125] = 0.0 + k[192]*y_cur[IDX_CII]; + data[jistart + 18126] = 0.0 - k[4984]*y_cur[IDX_CI]; + data[jistart + 18127] = 0.0 + k[1223]*y_cur[IDX_eM] + k[3753]*y_cur[IDX_OI] + + k[6481]*y_cur[IDX_GRAINM]; + data[jistart + 18128] = 0.0 + k[154]*y_cur[IDX_CII]; + data[jistart + 18129] = 0.0 + k[5627]*y_cur[IDX_CII]; + data[jistart + 18130] = 0.0 + k[199]*y_cur[IDX_CII]; + data[jistart + 18131] = 0.0 - k[1846]*y_cur[IDX_CI]; + data[jistart + 18132] = 0.0 + k[1177]*y_cur[IDX_eM] + k[6706]*y_cur[IDX_GRAINM]; + data[jistart + 18133] = 0.0 + k[195]*y_cur[IDX_CII] + k[5918]; + data[jistart + 18134] = 0.0 + k[151]*y_cur[IDX_CII] - k[4918]*y_cur[IDX_CI] + k[5713] + + k[5998]; + data[jistart + 18135] = 0.0 + k[879]*y_cur[IDX_eM] + k[6838]*y_cur[IDX_GRAINM]; + data[jistart + 18136] = 0.0 + k[203]*y_cur[IDX_CII]; + data[jistart + 18137] = 0.0 + k[187]*y_cur[IDX_CII] - k[4976]*y_cur[IDX_CI] - + k[4977]*y_cur[IDX_CI]; + data[jistart + 18138] = 0.0 - k[1915]*y_cur[IDX_CI]; + data[jistart + 18139] = 0.0 + k[201]*y_cur[IDX_CII] - k[4988]*y_cur[IDX_CI]; + data[jistart + 18140] = 0.0 + k[153]*y_cur[IDX_CII] - k[4922]*y_cur[IDX_CI]; + data[jistart + 18141] = 0.0 + k[850]*y_cur[IDX_eM] + k[6782]*y_cur[IDX_GRAINM]; + data[jistart + 18142] = 0.0 - k[4941]*y_cur[IDX_CI]; + data[jistart + 18143] = 0.0 + k[849]*y_cur[IDX_eM] + k[6781]*y_cur[IDX_GRAINM]; + data[jistart + 18144] = 0.0 + k[157]*y_cur[IDX_CII]; + data[jistart + 18145] = 0.0 - k[4937]*y_cur[IDX_CI]; + data[jistart + 18146] = 0.0 - k[1926]*y_cur[IDX_CI]; + data[jistart + 18147] = 0.0 - k[1927]*y_cur[IDX_CI]; + data[jistart + 18148] = 0.0 + k[3066]*y_cur[IDX_HeII] - k[4909]*y_cur[IDX_CI]; + data[jistart + 18149] = 0.0 + k[820]*y_cur[IDX_eM] + k[6616]*y_cur[IDX_GRAINM]; + data[jistart + 18150] = 0.0 + k[158]*y_cur[IDX_CII] + k[5774] + k[6071]; + data[jistart + 18151] = 0.0 + k[171]*y_cur[IDX_CII] + k[3212]*y_cur[IDX_HeII] + k[5827] + + k[6139]; + data[jistart + 18152] = 0.0 - k[4985]*y_cur[IDX_CI]; + data[jistart + 18153] = 0.0 + k[198]*y_cur[IDX_CII] + k[3316]*y_cur[IDX_HeII] + + k[5293]*y_cur[IDX_NI] + k[5444]*y_cur[IDX_OI] + k[5924] + k[6267]; + data[jistart + 18154] = 0.0 + k[150]*y_cur[IDX_CII]; + data[jistart + 18155] = 0.0 + k[202]*y_cur[IDX_CII] - k[4989]*y_cur[IDX_CI]; + data[jistart + 18156] = 0.0 + k[781]*y_cur[IDX_eM] + k[6467]*y_cur[IDX_GRAINM]; + data[jistart + 18157] = 0.0 - k[1874]*y_cur[IDX_CI] - k[1875]*y_cur[IDX_CI]; + data[jistart + 18158] = 0.0 - k[1883]*y_cur[IDX_CI] - k[1884]*y_cur[IDX_CI]; + data[jistart + 18159] = 0.0 + k[891]*y_cur[IDX_eM] - k[1885]*y_cur[IDX_CI] + + k[6857]*y_cur[IDX_GRAINM]; + data[jistart + 18160] = 0.0 - k[1888]*y_cur[IDX_CI] - k[1889]*y_cur[IDX_CI]; + data[jistart + 18161] = 0.0 + k[164]*y_cur[IDX_CII]; + data[jistart + 18162] = 0.0 + k[3031]*y_cur[IDX_HeII] - k[5212]*y_cur[IDX_CI]; + data[jistart + 18163] = 0.0 - k[4979]*y_cur[IDX_CI]; + data[jistart + 18164] = 0.0 - k[1920]*y_cur[IDX_CI] - k[1921]*y_cur[IDX_CI] - + k[1922]*y_cur[IDX_CI]; + data[jistart + 18165] = 0.0 - k[1925]*y_cur[IDX_CI]; + data[jistart + 18166] = 0.0 + k[168]*y_cur[IDX_CII]; + data[jistart + 18167] = 0.0 - k[4939]*y_cur[IDX_CI]; + data[jistart + 18168] = 0.0 - k[4990]*y_cur[IDX_CI]; + data[jistart + 18169] = 0.0 + k[866]*y_cur[IDX_eM] - k[1876]*y_cur[IDX_CI] + + k[6824]*y_cur[IDX_GRAINM]; + data[jistart + 18170] = 0.0 - k[1886]*y_cur[IDX_CI] - k[1887]*y_cur[IDX_CI]; + data[jistart + 18171] = 0.0 + k[191]*y_cur[IDX_CII] - k[4983]*y_cur[IDX_CI]; + data[jistart + 18172] = 0.0 - k[4935]*y_cur[IDX_CI]; + data[jistart + 18173] = 0.0 - k[1859]*y_cur[IDX_CI] - k[1860]*y_cur[IDX_CI]; + data[jistart + 18174] = 0.0 - k[1881]*y_cur[IDX_CI] - k[1882]*y_cur[IDX_CI]; + data[jistart + 18175] = 0.0 - k[1905]*y_cur[IDX_CI]; + data[jistart + 18176] = 0.0 - k[1870]*y_cur[IDX_CI] - k[1871]*y_cur[IDX_CI]; + data[jistart + 18177] = 0.0 + k[839]*y_cur[IDX_eM] - k[1867]*y_cur[IDX_CI] + + k[6721]*y_cur[IDX_GRAINM]; + data[jistart + 18178] = 0.0 + k[167]*y_cur[IDX_CII]; + data[jistart + 18179] = 0.0 + k[985]*y_cur[IDX_eM] + k[6140] + k[6535]*y_cur[IDX_GRAINM]; + data[jistart + 18180] = 0.0 - k[1861]*y_cur[IDX_CI]; + data[jistart + 18181] = 0.0 - k[1879]*y_cur[IDX_CI] - k[1880]*y_cur[IDX_CI]; + data[jistart + 18182] = 0.0 - k[4968]*y_cur[IDX_CI]; + data[jistart + 18183] = 0.0 - k[1877]*y_cur[IDX_CI] - k[1878]*y_cur[IDX_CI]; + data[jistart + 18184] = 0.0 + k[788]*y_cur[IDX_eM] + k[6455]*y_cur[IDX_GRAINM]; + data[jistart + 18185] = 0.0 - k[1913]*y_cur[IDX_CI]; + data[jistart + 18186] = 0.0 - k[1872]*y_cur[IDX_CI] - k[1873]*y_cur[IDX_CI]; + data[jistart + 18187] = 0.0 - k[1907]*y_cur[IDX_CI]; + data[jistart + 18188] = 0.0 - k[4959]*y_cur[IDX_CI]; + data[jistart + 18189] = 0.0 - k[4932]*y_cur[IDX_CI]; + data[jistart + 18190] = 0.0 - k[4927]*y_cur[IDX_CI]; + data[jistart + 18191] = 0.0 - k[1868]*y_cur[IDX_CI] - k[1869]*y_cur[IDX_CI]; + data[jistart + 18192] = 0.0 + k[161]*y_cur[IDX_CII] - k[4946]*y_cur[IDX_CI]; + data[jistart + 18193] = 0.0 - k[245]*y_cur[IDX_CI] + k[977]*y_cur[IDX_eM] + + k[3456]*y_cur[IDX_NI] + k[6359]*y_cur[IDX_GRAINM]; + data[jistart + 18194] = 0.0 - k[4919]*y_cur[IDX_CI]; + data[jistart + 18195] = 0.0 + k[149]*y_cur[IDX_CII] - k[4915]*y_cur[IDX_CI]; + data[jistart + 18196] = 0.0 - k[247]*y_cur[IDX_CI]; + data[jistart + 18197] = 0.0 + k[836]*y_cur[IDX_eM] + k[3891]*y_cur[IDX_CM] + + k[6816]*y_cur[IDX_GRAINM]; + data[jistart + 18198] = 0.0 - k[1903]*y_cur[IDX_CI]; + data[jistart + 18199] = 0.0 + k[166]*y_cur[IDX_CII] - k[4954]*y_cur[IDX_CI]; + data[jistart + 18200] = 0.0 - k[244]*y_cur[IDX_CI] + k[739]*y_cur[IDX_eM] + + k[739]*y_cur[IDX_eM] + k[1451]*y_cur[IDX_C2I] + + k[1456]*y_cur[IDX_SI] + k[3684]*y_cur[IDX_OI] + k[5975] + + k[6352]*y_cur[IDX_GRAINM] + k[6352]*y_cur[IDX_GRAINM]; + data[jistart + 18201] = 0.0 - k[1862]*y_cur[IDX_CI]; + data[jistart + 18202] = 0.0 + k[979]*y_cur[IDX_eM] + k[3894]*y_cur[IDX_CM] + + k[6469]*y_cur[IDX_GRAINM]; + data[jistart + 18203] = 0.0 - k[1908]*y_cur[IDX_CI]; + data[jistart + 18204] = 0.0 - k[1910]*y_cur[IDX_CI] + k[3479]*y_cur[IDX_C2I]; + data[jistart + 18205] = 0.0 + k[4762]*y_cur[IDX_CII]; + data[jistart + 18206] = 0.0 - k[55]*y_cur[IDX_CI] + k[4621]*y_cur[IDX_CII]; + data[jistart + 18207] = 0.0 - k[2374]*y_cur[IDX_CI]; + data[jistart + 18208] = 0.0 + k[189]*y_cur[IDX_CII] + k[1971]*y_cur[IDX_CHII] - + k[4980]*y_cur[IDX_CI]; + data[jistart + 18209] = 0.0 + k[190]*y_cur[IDX_CII] - k[5527]*y_cur[IDX_CI]; + data[jistart + 18210] = 0.0 - k[58]*y_cur[IDX_CI] + k[4832]*y_cur[IDX_CII]; + data[jistart + 18211] = 0.0 + k[3920]*y_cur[IDX_CM]; + data[jistart + 18212] = 0.0 - k[39]*y_cur[IDX_CI] + k[4026]*y_cur[IDX_CII]; + data[jistart + 18213] = 0.0 - k[44]*y_cur[IDX_CI] + k[4201]*y_cur[IDX_CII]; + data[jistart + 18214] = 0.0 - k[246]*y_cur[IDX_CI] + k[980]*y_cur[IDX_eM] + + k[2245]*y_cur[IDX_CHI] + k[6373]*y_cur[IDX_GRAINM]; + data[jistart + 18215] = 0.0 + k[165]*y_cur[IDX_CII] - k[4952]*y_cur[IDX_CI] - + k[4953]*y_cur[IDX_CI]; + data[jistart + 18216] = 0.0 - k[1898]*y_cur[IDX_CI]; + data[jistart + 18217] = 0.0 - k[1902]*y_cur[IDX_CI] + k[3901]*y_cur[IDX_CM]; + data[jistart + 18218] = 0.0 - k[57]*y_cur[IDX_CI] + k[4797]*y_cur[IDX_CII]; + data[jistart + 18219] = 0.0 - k[1847]*y_cur[IDX_CI] + k[3956]*y_cur[IDX_CII]; + data[jistart + 18220] = 0.0 - k[41]*y_cur[IDX_CI] + k[4096]*y_cur[IDX_CII]; + data[jistart + 18221] = 0.0 + k[156]*y_cur[IDX_CII]; + data[jistart + 18222] = 0.0 - k[48]*y_cur[IDX_CI] + k[4376]*y_cur[IDX_CII]; + data[jistart + 18223] = 0.0 - k[52]*y_cur[IDX_CI] + k[4516]*y_cur[IDX_CII]; + data[jistart + 18224] = 0.0 - k[50]*y_cur[IDX_CI] + k[4446]*y_cur[IDX_CII]; + data[jistart + 18225] = 0.0 - k[54]*y_cur[IDX_CI] + k[4586]*y_cur[IDX_CII]; + data[jistart + 18226] = 0.0 - k[37]*y_cur[IDX_CI] + k[3921]*y_cur[IDX_CII]; + data[jistart + 18227] = 0.0 - k[46]*y_cur[IDX_CI] + k[4271]*y_cur[IDX_CII]; + data[jistart + 18228] = 0.0 + k[4306]*y_cur[IDX_CII]; + data[jistart + 18229] = 0.0 - k[4965]*y_cur[IDX_CI] - k[4966]*y_cur[IDX_CI]; + data[jistart + 18230] = 0.0 - k[0]*y_cur[IDX_CI] + k[3886]*y_cur[IDX_CII] + + k[3886]*y_cur[IDX_CII] + k[3887]*y_cur[IDX_C2H2II] + + k[3888]*y_cur[IDX_C2H3II] + k[3889]*y_cur[IDX_C4H2II] + + k[3890]*y_cur[IDX_C4H3II] + k[3891]*y_cur[IDX_C4SII] + + k[3892]*y_cur[IDX_CH2CCHII] + k[3893]*y_cur[IDX_CH3II] + + k[3894]*y_cur[IDX_CNCII] + k[3895]*y_cur[IDX_FeII] + + k[3896]*y_cur[IDX_HII] + k[3897]*y_cur[IDX_H2COII] + + k[3898]*y_cur[IDX_H2SII] + k[3899]*y_cur[IDX_H3II] + + k[3900]*y_cur[IDX_H3OII] + k[3901]*y_cur[IDX_HC2SII] + + k[3902]*y_cur[IDX_HCNHII] + k[3903]*y_cur[IDX_HCNHII] + + k[3904]*y_cur[IDX_HCOII] + k[3905]*y_cur[IDX_HCOII] + + k[3906]*y_cur[IDX_HeII] + k[3907]*y_cur[IDX_MgII] + + k[3908]*y_cur[IDX_NII] + k[3909]*y_cur[IDX_N2HII] + + k[3910]*y_cur[IDX_NH3II] + k[3911]*y_cur[IDX_NH4II] + + k[3912]*y_cur[IDX_NOII] + k[3913]*y_cur[IDX_NaII] + + k[3914]*y_cur[IDX_OII] + k[3915]*y_cur[IDX_SII] + + k[3916]*y_cur[IDX_SOII] + k[3917]*y_cur[IDX_SiII] + + k[3918]*y_cur[IDX_SiOII] + k[3919]*y_cur[IDX_SiOHII] + + k[3920]*y_cur[IDX_SiSII] + k[5686] + k[5948]; + data[jistart + 18231] = 0.0 + k[3214]*y_cur[IDX_HeII] - k[4958]*y_cur[IDX_CI] + + k[5393]*y_cur[IDX_OI] + k[5829] + k[6142]; + data[jistart + 18232] = 0.0 - k[56]*y_cur[IDX_CI] + k[4727]*y_cur[IDX_CII]; + data[jistart + 18233] = 0.0 - k[53]*y_cur[IDX_CI] + k[4551]*y_cur[IDX_CII]; + data[jistart + 18234] = 0.0 + k[1937]*y_cur[IDX_CHII]; + data[jistart + 18235] = 0.0 - k[68]*y_cur[IDX_CI] + k[4691]*y_cur[IDX_CII]; + data[jistart + 18236] = 0.0 + k[204]*y_cur[IDX_CII]; + data[jistart + 18237] = 0.0 + k[789]*y_cur[IDX_eM] + k[6459]*y_cur[IDX_GRAINM]; + data[jistart + 18238] = 0.0 - k[1857]*y_cur[IDX_CI] - k[1858]*y_cur[IDX_CI]; + data[jistart + 18239] = 0.0 - k[51]*y_cur[IDX_CI] + k[4481]*y_cur[IDX_CII]; + data[jistart + 18240] = 0.0 - k[38]*y_cur[IDX_CI] + k[3384]*y_cur[IDX_NI] + + k[3991]*y_cur[IDX_CII]; + data[jistart + 18241] = 0.0 + k[152]*y_cur[IDX_CII] + k[3091]*y_cur[IDX_HeII] + k[5714]; + data[jistart + 18242] = 0.0 - k[40]*y_cur[IDX_CI] + k[4061]*y_cur[IDX_CII]; + data[jistart + 18243] = 0.0 - k[43]*y_cur[IDX_CI] + k[4166]*y_cur[IDX_CII]; + data[jistart + 18244] = 0.0 - k[47]*y_cur[IDX_CI] + k[4341]*y_cur[IDX_CII]; + data[jistart + 18245] = 0.0 - k[45]*y_cur[IDX_CI] + k[4236]*y_cur[IDX_CII]; + data[jistart + 18246] = 0.0 - k[49]*y_cur[IDX_CI] + k[4411]*y_cur[IDX_CII]; + data[jistart + 18247] = 0.0 - k[1932]*y_cur[IDX_CI] + k[3918]*y_cur[IDX_CM]; + data[jistart + 18248] = 0.0 - k[4917]*y_cur[IDX_CI] + k[5711] + k[5996]; + data[jistart + 18249] = 0.0 + k[3919]*y_cur[IDX_CM]; + data[jistart + 18250] = 0.0 - k[4969]*y_cur[IDX_CI] - k[4970]*y_cur[IDX_CI] - + k[4971]*y_cur[IDX_CI]; + data[jistart + 18251] = 0.0 + k[155]*y_cur[IDX_CII] + k[3109]*y_cur[IDX_HeII] - + k[4924]*y_cur[IDX_CI]; + data[jistart + 18252] = 0.0 + k[741]*y_cur[IDX_eM] - k[1849]*y_cur[IDX_CI] + + k[3686]*y_cur[IDX_OI] + k[6355]*y_cur[IDX_GRAINM]; + data[jistart + 18253] = 0.0 + k[792]*y_cur[IDX_eM] - k[1855]*y_cur[IDX_CI] - + k[1856]*y_cur[IDX_CI] + k[6462]*y_cur[IDX_GRAINM]; + data[jistart + 18254] = 0.0 - k[4929]*y_cur[IDX_CI]; + data[jistart + 18255] = 0.0 + k[907]*y_cur[IDX_eM] + k[908]*y_cur[IDX_eM] - + k[1891]*y_cur[IDX_CI] + k[6316]*y_cur[IDX_GRAINM] + + k[6317]*y_cur[IDX_GRAINM]; + data[jistart + 18256] = 0.0 - k[1914]*y_cur[IDX_CI]; + data[jistart + 18257] = 0.0 - k[1899]*y_cur[IDX_CI]; + data[jistart + 18258] = 0.0 - k[42]*y_cur[IDX_CI] + k[4131]*y_cur[IDX_CII]; + data[jistart + 18259] = 0.0 - k[4921]*y_cur[IDX_CI]; + data[jistart + 18260] = 0.0 + k[906]*y_cur[IDX_eM] - k[1890]*y_cur[IDX_CI] + + k[1937]*y_cur[IDX_CH3OHI] + k[1949]*y_cur[IDX_H2COI] + + k[1952]*y_cur[IDX_H2OI] + k[1954]*y_cur[IDX_H2SI] + + k[1958]*y_cur[IDX_HCNI] + k[1960]*y_cur[IDX_HNCI] + + k[1964]*y_cur[IDX_NH3I] + k[1971]*y_cur[IDX_OCSI] + + k[1974]*y_cur[IDX_SI] + k[6073] + k[6315]*y_cur[IDX_GRAINM]; + data[jistart + 18261] = 0.0 + k[3209]*y_cur[IDX_HeII]; + data[jistart + 18262] = 0.0 - k[248]*y_cur[IDX_CI] - k[1912]*y_cur[IDX_CI]; + data[jistart + 18263] = 0.0 + k[147]*y_cur[IDX_CII] + k[3070]*y_cur[IDX_HeII] + + k[3072]*y_cur[IDX_HeII] - k[4910]*y_cur[IDX_CI] + k[5968]; + data[jistart + 18264] = 0.0 - k[4942]*y_cur[IDX_CI]; + data[jistart + 18265] = 0.0 + k[3895]*y_cur[IDX_CM]; + data[jistart + 18266] = 0.0 + k[173]*y_cur[IDX_CII]; + data[jistart + 18267] = 0.0 + k[3907]*y_cur[IDX_CM]; + data[jistart + 18268] = 0.0 + k[3913]*y_cur[IDX_CM]; + data[jistart + 18269] = 0.0 + k[182]*y_cur[IDX_CII]; + data[jistart + 18270] = 0.0 + k[188]*y_cur[IDX_CII]; + data[jistart + 18271] = 0.0 + k[2293]*y_cur[IDX_HII] + k[3057]*y_cur[IDX_HeII] + + k[3061]*y_cur[IDX_HeII] + k[5688] + k[5951] + k[5953] + k[5955]; + data[jistart + 18272] = 0.0 - k[4940]*y_cur[IDX_CI]; + data[jistart + 18273] = 0.0 + k[3135]*y_cur[IDX_HeII] - k[4934]*y_cur[IDX_CI] + k[5756] + + k[6042]; + data[jistart + 18274] = 0.0 + k[3150]*y_cur[IDX_HeII] + k[5767] + k[6060]; + data[jistart + 18275] = 0.0 + k[3143]*y_cur[IDX_HeII] - k[4938]*y_cur[IDX_CI] + k[5762] + + k[6052]; + data[jistart + 18276] = 0.0 + k[7073] + k[7255] + k[7437]; + data[jistart + 18277] = 0.0 - k[4972]*y_cur[IDX_CI] - k[4973]*y_cur[IDX_CI]; + data[jistart + 18278] = 0.0 + k[3118]*y_cur[IDX_HeII] - k[4926]*y_cur[IDX_CI] + k[5738]; + data[jistart + 18279] = 0.0 + k[3126]*y_cur[IDX_HeII] - k[4930]*y_cur[IDX_CI] - + k[4931]*y_cur[IDX_CI] + k[5748] + k[6033]; + data[jistart + 18280] = 0.0 + k[4656]*y_cur[IDX_CII]; + data[jistart + 18281] = 0.0 + k[3106]*y_cur[IDX_HeII] - k[4923]*y_cur[IDX_CI] + k[5728] + + k[6012]; + data[jistart + 18282] = 0.0 + k[193]*y_cur[IDX_CII] - k[4986]*y_cur[IDX_CI] - + k[4987]*y_cur[IDX_CI]; + data[jistart + 18283] = 0.0 - k[4936]*y_cur[IDX_CI]; + data[jistart + 18284] = 0.0 + k[763]*y_cur[IDX_eM] - k[1853]*y_cur[IDX_CI] - + k[1854]*y_cur[IDX_CI] + k[6387]*y_cur[IDX_GRAINM]; + data[jistart + 18285] = 0.0 - k[1865]*y_cur[IDX_CI] - k[1866]*y_cur[IDX_CI] + + k[3890]*y_cur[IDX_CM]; + data[jistart + 18286] = 0.0 - k[1909]*y_cur[IDX_CI] + k[3909]*y_cur[IDX_CM]; + data[jistart + 18287] = 0.0 + k[162]*y_cur[IDX_CII] - k[4947]*y_cur[IDX_CI]; + data[jistart + 18288] = 0.0 + k[3916]*y_cur[IDX_CM]; + data[jistart + 18289] = 0.0 - k[1892]*y_cur[IDX_CI] - k[1893]*y_cur[IDX_CI] + + k[3892]*y_cur[IDX_CM]; + data[jistart + 18290] = 0.0 - k[4933]*y_cur[IDX_CI]; + data[jistart + 18291] = 0.0 - k[4928]*y_cur[IDX_CI]; + data[jistart + 18292] = 0.0 - k[1900]*y_cur[IDX_CI] + k[3898]*y_cur[IDX_CM]; + data[jistart + 18293] = 0.0 + k[3344]*y_cur[IDX_COI] + k[3908]*y_cur[IDX_CM]; + data[jistart + 18294] = 0.0 - k[4920]*y_cur[IDX_CI]; + data[jistart + 18295] = 0.0 + k[3897]*y_cur[IDX_CM]; + data[jistart + 18296] = 0.0 - k[5522]*y_cur[IDX_CI] + k[5717] + k[6001]; + data[jistart + 18297] = 0.0 - k[4925]*y_cur[IDX_CI]; + data[jistart + 18298] = 0.0 + k[3912]*y_cur[IDX_CM]; + data[jistart + 18299] = 0.0 + k[3631]*y_cur[IDX_C2I] + k[3639]*y_cur[IDX_CNI] + + k[3914]*y_cur[IDX_CM] - k[5525]*y_cur[IDX_CI]; + data[jistart + 18300] = 0.0 + k[177]*y_cur[IDX_CII] - k[4961]*y_cur[IDX_CI]; + data[jistart + 18301] = 0.0 - k[1863]*y_cur[IDX_CI] - k[1864]*y_cur[IDX_CI] + + k[3889]*y_cur[IDX_CM]; + data[jistart + 18302] = 0.0 + k[3902]*y_cur[IDX_CM] + k[3903]*y_cur[IDX_CM]; + data[jistart + 18303] = 0.0 + k[160]*y_cur[IDX_CII] - k[4944]*y_cur[IDX_CI] - + k[4945]*y_cur[IDX_CI]; + data[jistart + 18304] = 0.0 + k[1960]*y_cur[IDX_CHII] + k[3263]*y_cur[IDX_HeII]; + data[jistart + 18305] = 0.0 + k[2260]*y_cur[IDX_CHI] + k[3910]*y_cur[IDX_CM]; + data[jistart + 18306] = 0.0 + k[148]*y_cur[IDX_CII] - k[4914]*y_cur[IDX_CI]; + data[jistart + 18307] = 0.0 - k[4913]*y_cur[IDX_CI]; + data[jistart + 18308] = 0.0 - k[1911]*y_cur[IDX_CI] + k[3911]*y_cur[IDX_CM]; + data[jistart + 18309] = 0.0 - k[4967]*y_cur[IDX_CI]; + data[jistart + 18310] = 0.0 - k[4978]*y_cur[IDX_CI]; + data[jistart + 18311] = 0.0 + k[3917]*y_cur[IDX_CM]; + data[jistart + 18312] = 0.0 + k[175]*y_cur[IDX_CII] + k[1954]*y_cur[IDX_CHII]; + data[jistart + 18313] = 0.0 + k[1464]*y_cur[IDX_C2I] + k[3915]*y_cur[IDX_CM] - + k[5528]*y_cur[IDX_CI]; + data[jistart + 18314] = 0.0 + k[194]*y_cur[IDX_CII] + k[5492]*y_cur[IDX_COI]; + data[jistart + 18315] = 0.0 + k[755]*y_cur[IDX_eM] + k[756]*y_cur[IDX_eM] - + k[1851]*y_cur[IDX_CI] - k[1852]*y_cur[IDX_CI] + + k[3888]*y_cur[IDX_CM] + k[6370]*y_cur[IDX_GRAINM] + + k[6371]*y_cur[IDX_GRAINM]; + data[jistart + 18316] = 0.0 + k[186]*y_cur[IDX_CII] - k[4974]*y_cur[IDX_CI] - + k[4975]*y_cur[IDX_CI]; + data[jistart + 18317] = 0.0 + k[178]*y_cur[IDX_CII] - k[4962]*y_cur[IDX_CI] - + k[4963]*y_cur[IDX_CI]; + data[jistart + 18318] = 0.0 + k[3087]*y_cur[IDX_HeII] - k[4916]*y_cur[IDX_CI]; + data[jistart + 18319] = 0.0 + k[174]*y_cur[IDX_CII] + k[1949]*y_cur[IDX_CHII]; + data[jistart + 18320] = 0.0 + k[1958]*y_cur[IDX_CHII]; + data[jistart + 18321] = 0.0 + k[134]*y_cur[IDX_H2I] + k[141]*y_cur[IDX_HI] + + k[170]*y_cur[IDX_CII] + k[2245]*y_cur[IDX_COII] + + k[2260]*y_cur[IDX_NH3II] - k[4955]*y_cur[IDX_CI] + + k[5081]*y_cur[IDX_NI] + k[5097]*y_cur[IDX_OI] + + k[5101]*y_cur[IDX_SI] + k[5160]*y_cur[IDX_HI] + k[5821] + k[6131]; + data[jistart + 18322] = 0.0 + k[707]*y_cur[IDX_CII] + k[708]*y_cur[IDX_CII] + + k[1456]*y_cur[IDX_C2II] + k[1974]*y_cur[IDX_CHII] + + k[4876]*y_cur[IDX_C2I] + k[5101]*y_cur[IDX_CHI] + + k[5125]*y_cur[IDX_CNI] - k[5529]*y_cur[IDX_CI]; + data[jistart + 18323] = 0.0 + k[1451]*y_cur[IDX_C2II] + k[1464]*y_cur[IDX_SII] + + k[3073]*y_cur[IDX_HeII] + k[3479]*y_cur[IDX_NHII] + + k[3631]*y_cur[IDX_OII] + k[4876]*y_cur[IDX_SI] + + k[5153]*y_cur[IDX_HI] + k[5222]*y_cur[IDX_NI] + + k[5343]*y_cur[IDX_OI] - k[5521]*y_cur[IDX_CI] + k[5694] + k[5694] + + k[5978] + k[5978]; + data[jistart + 18324] = 0.0 - k[4981]*y_cur[IDX_CI] - k[4982]*y_cur[IDX_CI]; + data[jistart + 18325] = 0.0 + k[185]*y_cur[IDX_CII] + k[1964]*y_cur[IDX_CHII]; + data[jistart + 18326] = 0.0 - k[1850]*y_cur[IDX_CI] + k[3887]*y_cur[IDX_CM]; + data[jistart + 18327] = 0.0 - k[1894]*y_cur[IDX_CI] + k[3893]*y_cur[IDX_CM]; + data[jistart + 18328] = 0.0 - k[4911]*y_cur[IDX_CI] - k[4912]*y_cur[IDX_CI]; + data[jistart + 18329] = 0.0 + k[3203]*y_cur[IDX_HeII] + k[3639]*y_cur[IDX_OII] - + k[4956]*y_cur[IDX_CI] + k[5125]*y_cur[IDX_SI] + + k[5260]*y_cur[IDX_NI] + k[5261]*y_cur[IDX_NI] + + k[5388]*y_cur[IDX_OI] + k[5823] + k[6134]; + data[jistart + 18330] = 0.0 - k[4949]*y_cur[IDX_CI]; + data[jistart + 18331] = 0.0 + k[3384]*y_cur[IDX_C2M] + k[3456]*y_cur[IDX_CNII] + + k[5081]*y_cur[IDX_CHI] + k[5222]*y_cur[IDX_C2I] + + k[5260]*y_cur[IDX_CNI] + k[5261]*y_cur[IDX_CNI] + + k[5293]*y_cur[IDX_SiCI] - k[5524]*y_cur[IDX_CI]; + data[jistart + 18332] = 0.0 - k[1901]*y_cur[IDX_CI] + k[3900]*y_cur[IDX_CM]; + data[jistart + 18333] = 0.0 + k[3684]*y_cur[IDX_C2II] + k[3686]*y_cur[IDX_C2HII] + + k[3753]*y_cur[IDX_SiCII] + k[5097]*y_cur[IDX_CHI] + + k[5343]*y_cur[IDX_C2I] + k[5380]*y_cur[IDX_CClI] + + k[5388]*y_cur[IDX_CNI] + k[5393]*y_cur[IDX_CSI] + + k[5444]*y_cur[IDX_SiCI] - k[5526]*y_cur[IDX_CI]; + data[jistart + 18334] = 0.0 - k[513]*y_cur[IDX_CI] + k[3031]*y_cur[IDX_HNC3I] + + k[3057]*y_cur[IDX_C10I] + k[3061]*y_cur[IDX_C10I] + + k[3066]*y_cur[IDX_C10H2I] + k[3070]*y_cur[IDX_C10HI] + + k[3072]*y_cur[IDX_C10HI] + k[3073]*y_cur[IDX_C2I] + + k[3087]*y_cur[IDX_C2HI] + k[3091]*y_cur[IDX_C2SI] + + k[3106]*y_cur[IDX_C4I] + k[3109]*y_cur[IDX_C4H3I] + + k[3118]*y_cur[IDX_C5I] + k[3126]*y_cur[IDX_C6I] + + k[3135]*y_cur[IDX_C7I] + k[3143]*y_cur[IDX_C8I] + + k[3150]*y_cur[IDX_C9I] + k[3203]*y_cur[IDX_CNI] + + k[3209]*y_cur[IDX_CO2I] + k[3212]*y_cur[IDX_CPI] + + k[3214]*y_cur[IDX_CSI] + k[3263]*y_cur[IDX_HNCI] + + k[3312]*y_cur[IDX_SiC3I] + k[3315]*y_cur[IDX_SiC4I] + + k[3316]*y_cur[IDX_SiCI] + k[3906]*y_cur[IDX_CM]; + data[jistart + 18335] = 0.0 + k[147]*y_cur[IDX_C10HI] + k[148]*y_cur[IDX_C2H4I] + + k[149]*y_cur[IDX_C2H5I] + k[150]*y_cur[IDX_C2H5OHI] + + k[151]*y_cur[IDX_C2OI] + k[152]*y_cur[IDX_C2SI] + + k[153]*y_cur[IDX_C3OI] + k[154]*y_cur[IDX_C3SI] + + k[155]*y_cur[IDX_C4H3I] + k[156]*y_cur[IDX_C4SI] + + k[157]*y_cur[IDX_C6H6I] + k[158]*y_cur[IDX_CCPI] + + k[159]*y_cur[IDX_CClI] + k[160]*y_cur[IDX_CH2I] + + k[161]*y_cur[IDX_CH2CCH2I] + k[162]*y_cur[IDX_CH2CCHI] + + k[163]*y_cur[IDX_CH2CNI] + k[164]*y_cur[IDX_CH2COI] + + k[165]*y_cur[IDX_CH3CCHI] + k[166]*y_cur[IDX_CH3CHCH2I] + + k[167]*y_cur[IDX_CH3CHOI] + k[168]*y_cur[IDX_CH3COCH3I] + + k[169]*y_cur[IDX_CH3OCH3I] + k[170]*y_cur[IDX_CHI] + + k[171]*y_cur[IDX_CPI] + k[172]*y_cur[IDX_ClOI] + + k[173]*y_cur[IDX_FeI] + k[174]*y_cur[IDX_H2COI] + + k[175]*y_cur[IDX_H2SI] + k[176]*y_cur[IDX_H2SiOI] + + k[177]*y_cur[IDX_C4H2I] + k[178]*y_cur[IDX_HCOI] + + k[179]*y_cur[IDX_HCOOCH3I] + k[180]*y_cur[IDX_HCPI] + + k[181]*y_cur[IDX_HPOI] + k[182]*y_cur[IDX_MgI] + + k[185]*y_cur[IDX_NH3I] + k[186]*y_cur[IDX_NOI] + + k[187]*y_cur[IDX_NSI] + k[188]*y_cur[IDX_NaI] + + k[189]*y_cur[IDX_OCSI] + k[190]*y_cur[IDX_PI] + + k[191]*y_cur[IDX_PHI] + k[192]*y_cur[IDX_POI] + + k[193]*y_cur[IDX_SOI] + k[194]*y_cur[IDX_SiI] + + k[195]*y_cur[IDX_SiC2I] + k[196]*y_cur[IDX_SiC2HI] + + k[197]*y_cur[IDX_SiC3I] + k[198]*y_cur[IDX_SiCI] + + k[199]*y_cur[IDX_SiCH2I] + k[200]*y_cur[IDX_SiCH3I] + + k[201]*y_cur[IDX_SiH2I] + k[202]*y_cur[IDX_SiH3I] + + k[203]*y_cur[IDX_SiNI] + k[204]*y_cur[IDX_SiSI] + + k[707]*y_cur[IDX_SI] + k[708]*y_cur[IDX_SI] + k[3886]*y_cur[IDX_CM] + + k[3886]*y_cur[IDX_CM] + k[3921]*y_cur[IDX_C10M] + + k[3956]*y_cur[IDX_C10HM] + k[3991]*y_cur[IDX_C2M] + + k[4026]*y_cur[IDX_C2HM] + k[4061]*y_cur[IDX_C3M] + + k[4096]*y_cur[IDX_C3HM] + k[4131]*y_cur[IDX_C3NM] + + k[4166]*y_cur[IDX_C4M] + k[4201]*y_cur[IDX_C4HM] + + k[4236]*y_cur[IDX_C5M] + k[4271]*y_cur[IDX_C5HM] + + k[4306]*y_cur[IDX_C5NM] + k[4341]*y_cur[IDX_C6M] + + k[4376]*y_cur[IDX_C6HM] + k[4411]*y_cur[IDX_C7M] + + k[4446]*y_cur[IDX_C7HM] + k[4481]*y_cur[IDX_C8M] + + k[4516]*y_cur[IDX_C8HM] + k[4551]*y_cur[IDX_C9M] + + k[4586]*y_cur[IDX_C9HM] + k[4621]*y_cur[IDX_CHM] + + k[4656]*y_cur[IDX_CNM] + k[4691]*y_cur[IDX_HM] + + k[4727]*y_cur[IDX_OM] + k[4762]*y_cur[IDX_O2M] + + k[4797]*y_cur[IDX_OHM] + k[4832]*y_cur[IDX_SM] - + k[5503]*y_cur[IDX_CI] + k[5611]*y_cur[IDX_eM] + + k[5627]*y_cur[IDX_CH3OI] + k[5639]*y_cur[IDX_CH3COI] + + k[5644]*y_cur[IDX_COOHI] + k[5649]*y_cur[IDX_COOCH3I] + + k[5655]*y_cur[IDX_CH2OHCOI] + k[5661]*y_cur[IDX_CH2OHCHOI] + + k[5667]*y_cur[IDX_CH3COOHI] + k[6314]*y_cur[IDX_GRAINM]; + data[jistart + 18336] = 0.0 + k[1952]*y_cur[IDX_CHII]; + data[jistart + 18337] = 0.0 + k[2293]*y_cur[IDX_C10I] + k[3896]*y_cur[IDX_CM]; + data[jistart + 18338] = 0.0 - k[0]*y_cur[IDX_CM] - k[37]*y_cur[IDX_C10M] - + k[38]*y_cur[IDX_C2M] - k[39]*y_cur[IDX_C2HM] - k[40]*y_cur[IDX_C3M] + - k[41]*y_cur[IDX_C3HM] - k[42]*y_cur[IDX_C3NM] - + k[43]*y_cur[IDX_C4M] - k[44]*y_cur[IDX_C4HM] - k[45]*y_cur[IDX_C5M] + - k[46]*y_cur[IDX_C5HM] - k[47]*y_cur[IDX_C6M] - + k[48]*y_cur[IDX_C6HM] - k[49]*y_cur[IDX_C7M] - k[50]*y_cur[IDX_C7HM] + - k[51]*y_cur[IDX_C8M] - k[52]*y_cur[IDX_C8HM] - + k[53]*y_cur[IDX_C9M] - k[54]*y_cur[IDX_C9HM] - k[55]*y_cur[IDX_CHM] + - k[56]*y_cur[IDX_OM] - k[57]*y_cur[IDX_OHM] - k[58]*y_cur[IDX_SM] - + k[68]*y_cur[IDX_HM] - k[244]*y_cur[IDX_C2II] - + k[245]*y_cur[IDX_CNII] - k[246]*y_cur[IDX_COII] - + k[247]*y_cur[IDX_N2II] - k[248]*y_cur[IDX_O2II] - + k[249]*y_cur[IDX_PNII] - k[513]*y_cur[IDX_HeII] - + k[1846]*y_cur[IDX_C10HII] - k[1847]*y_cur[IDX_C10HM] - + k[1848]*y_cur[IDX_C10H2II] - k[1849]*y_cur[IDX_C2HII] - + k[1850]*y_cur[IDX_C2H2II] - k[1851]*y_cur[IDX_C2H3II] - + k[1852]*y_cur[IDX_C2H3II] - k[1853]*y_cur[IDX_C2H4II] - + k[1854]*y_cur[IDX_C2H4II] - k[1855]*y_cur[IDX_C3H2II] - + k[1856]*y_cur[IDX_C3H2II] - k[1857]*y_cur[IDX_C3H3II] - + k[1858]*y_cur[IDX_C3H3II] - k[1859]*y_cur[IDX_C3H4II] - + k[1860]*y_cur[IDX_C3H4II] - k[1861]*y_cur[IDX_C3H5II] - + k[1862]*y_cur[IDX_C4HII] - k[1863]*y_cur[IDX_C4H2II] - + k[1864]*y_cur[IDX_C4H2II] - k[1865]*y_cur[IDX_C4H3II] - + k[1866]*y_cur[IDX_C4H3II] - k[1867]*y_cur[IDX_C5HII] - + k[1868]*y_cur[IDX_C5H2II] - k[1869]*y_cur[IDX_C5H2II] - + k[1870]*y_cur[IDX_C5H3II] - k[1871]*y_cur[IDX_C5H3II] - + k[1872]*y_cur[IDX_C6H2II] - k[1873]*y_cur[IDX_C6H2II] - + k[1874]*y_cur[IDX_C6H3II] - k[1875]*y_cur[IDX_C6H3II] - + k[1876]*y_cur[IDX_C7HII] - k[1877]*y_cur[IDX_C7H2II] - + k[1878]*y_cur[IDX_C7H2II] - k[1879]*y_cur[IDX_C7H3II] - + k[1880]*y_cur[IDX_C7H3II] - k[1881]*y_cur[IDX_C8H2II] - + k[1882]*y_cur[IDX_C8H2II] - k[1883]*y_cur[IDX_C8H3II] - + k[1884]*y_cur[IDX_C8H3II] - k[1885]*y_cur[IDX_C9HII] - + k[1886]*y_cur[IDX_C9H2II] - k[1887]*y_cur[IDX_C9H2II] - + k[1888]*y_cur[IDX_C9H3II] - k[1889]*y_cur[IDX_C9H3II] - + k[1890]*y_cur[IDX_CHII] - k[1891]*y_cur[IDX_CH2II] - + k[1892]*y_cur[IDX_CH2CCHII] - k[1893]*y_cur[IDX_CH2CCHII] - + k[1894]*y_cur[IDX_CH3II] - k[1895]*y_cur[IDX_CH3C3NHII] - + k[1896]*y_cur[IDX_CH3C5NHII] - k[1897]*y_cur[IDX_CH3C7NHII] - + k[1898]*y_cur[IDX_CH5II] - k[1899]*y_cur[IDX_H2OII] - + k[1900]*y_cur[IDX_H2SII] - k[1901]*y_cur[IDX_H3OII] - + k[1902]*y_cur[IDX_HC2SII] - k[1903]*y_cur[IDX_HCNII] - + k[1904]*y_cur[IDX_HCOII] - k[1905]*y_cur[IDX_HCO2II] - + k[1906]*y_cur[IDX_HCPII] - k[1907]*y_cur[IDX_HNOII] - + k[1908]*y_cur[IDX_HSII] - k[1909]*y_cur[IDX_N2HII] - + k[1910]*y_cur[IDX_NHII] - k[1911]*y_cur[IDX_NH4II] - + k[1912]*y_cur[IDX_O2II] - k[1913]*y_cur[IDX_O2HII] - + k[1914]*y_cur[IDX_OHII] - k[1915]*y_cur[IDX_SiC2HII] - + k[1916]*y_cur[IDX_SiC2H2II] - k[1917]*y_cur[IDX_SiC2H3II] - + k[1918]*y_cur[IDX_SiC3HII] - k[1919]*y_cur[IDX_SiC3H2II] - + k[1920]*y_cur[IDX_SiCH2II] - k[1921]*y_cur[IDX_SiCH2II] - + k[1922]*y_cur[IDX_SiCH2II] - k[1923]*y_cur[IDX_SiCH3II] - + k[1924]*y_cur[IDX_SiCH4II] - k[1925]*y_cur[IDX_SiHII] - + k[1926]*y_cur[IDX_SiH2II] - k[1927]*y_cur[IDX_SiH3II] - + k[1928]*y_cur[IDX_SiH4II] - k[1929]*y_cur[IDX_SiH5II] - + k[1930]*y_cur[IDX_SiNH2II] - k[1931]*y_cur[IDX_SiNH2II] - + k[1932]*y_cur[IDX_SiOII] - k[2374]*y_cur[IDX_H2II] - + k[2632]*y_cur[IDX_H3II] - k[4909]*y_cur[IDX_C10H2I] - + k[4910]*y_cur[IDX_C10HI] - k[4911]*y_cur[IDX_C2H2I] - + k[4912]*y_cur[IDX_C2H2I] - k[4913]*y_cur[IDX_C2H3I] - + k[4914]*y_cur[IDX_C2H4I] - k[4915]*y_cur[IDX_C2H5I] - + k[4916]*y_cur[IDX_C2HI] - k[4917]*y_cur[IDX_C2NI] - + k[4918]*y_cur[IDX_C2OI] - k[4919]*y_cur[IDX_C3H2I] - + k[4920]*y_cur[IDX_C3HI] - k[4921]*y_cur[IDX_C3NI] - + k[4922]*y_cur[IDX_C3OI] - k[4923]*y_cur[IDX_C4I] - + k[4924]*y_cur[IDX_C4H3I] - k[4925]*y_cur[IDX_C4HI] - + k[4926]*y_cur[IDX_C5I] - k[4927]*y_cur[IDX_C5H2I] - + k[4928]*y_cur[IDX_C5HI] - k[4929]*y_cur[IDX_C5NI] - + k[4930]*y_cur[IDX_C6I] - k[4931]*y_cur[IDX_C6I] - + k[4932]*y_cur[IDX_C6H2I] - k[4933]*y_cur[IDX_C6HI] - + k[4934]*y_cur[IDX_C7I] - k[4935]*y_cur[IDX_C7H2I] - + k[4936]*y_cur[IDX_C7HI] - k[4937]*y_cur[IDX_C7NI] - + k[4938]*y_cur[IDX_C8I] - k[4939]*y_cur[IDX_C8H2I] - + k[4940]*y_cur[IDX_C8HI] - k[4941]*y_cur[IDX_C9H2I] - + k[4942]*y_cur[IDX_C9HI] - k[4943]*y_cur[IDX_C9NI] - + k[4944]*y_cur[IDX_CH2I] - k[4945]*y_cur[IDX_CH2I] - + k[4946]*y_cur[IDX_CH2CCH2I] - k[4947]*y_cur[IDX_CH2CCHI] - + k[4948]*y_cur[IDX_CH2CNI] - k[4949]*y_cur[IDX_CH3I] - + k[4950]*y_cur[IDX_CH3C4HI] - k[4951]*y_cur[IDX_CH3C6HI] - + k[4952]*y_cur[IDX_CH3CCHI] - k[4953]*y_cur[IDX_CH3CCHI] - + k[4954]*y_cur[IDX_CH3CHCH2I] - k[4955]*y_cur[IDX_CHI] - + k[4956]*y_cur[IDX_CNI] - k[4957]*y_cur[IDX_COI] - + k[4958]*y_cur[IDX_CSI] - k[4959]*y_cur[IDX_H2CCCI] - + k[4960]*y_cur[IDX_H2CNI] - k[4961]*y_cur[IDX_C4H2I] - + k[4962]*y_cur[IDX_HCOI] - k[4963]*y_cur[IDX_HCOI] - + k[4964]*y_cur[IDX_HPOI] - k[4965]*y_cur[IDX_HSI] - + k[4966]*y_cur[IDX_HSI] - k[4967]*y_cur[IDX_N2I] - + k[4968]*y_cur[IDX_NCCNI] - k[4969]*y_cur[IDX_NH2I] - + k[4970]*y_cur[IDX_NH2I] - k[4971]*y_cur[IDX_NH2I] - + k[4972]*y_cur[IDX_NHI] - k[4973]*y_cur[IDX_NHI] - + k[4974]*y_cur[IDX_NOI] - k[4975]*y_cur[IDX_NOI] - + k[4976]*y_cur[IDX_NSI] - k[4977]*y_cur[IDX_NSI] - + k[4978]*y_cur[IDX_O2I] - k[4979]*y_cur[IDX_OCNI] - + k[4980]*y_cur[IDX_OCSI] - k[4981]*y_cur[IDX_OHI] - + k[4982]*y_cur[IDX_OHI] - k[4983]*y_cur[IDX_PHI] - + k[4984]*y_cur[IDX_S2I] - k[4985]*y_cur[IDX_SO2I] - + k[4986]*y_cur[IDX_SOI] - k[4987]*y_cur[IDX_SOI] - + k[4988]*y_cur[IDX_SiH2I] - k[4989]*y_cur[IDX_SiH3I] - + k[4990]*y_cur[IDX_SiHI] - k[5134]*y_cur[IDX_H2I] - + k[5202]*y_cur[IDX_HCNOI] - k[5212]*y_cur[IDX_HNC3I] - + k[5214]*y_cur[IDX_HNCOI] - k[5215]*y_cur[IDX_HOCNI] - + k[5217]*y_cur[IDX_HONCI] - k[5503]*y_cur[IDX_CII] - + k[5521]*y_cur[IDX_C2I] - k[5522]*y_cur[IDX_C3I] - + k[5523]*y_cur[IDX_CI] - k[5523]*y_cur[IDX_CI] - + k[5523]*y_cur[IDX_CI] - k[5523]*y_cur[IDX_CI] - + k[5524]*y_cur[IDX_NI] - k[5525]*y_cur[IDX_OII] - + k[5526]*y_cur[IDX_OI] - k[5527]*y_cur[IDX_PI] - + k[5528]*y_cur[IDX_SII] - k[5529]*y_cur[IDX_SI] - + k[5554]*y_cur[IDX_H2I] - k[5572]*y_cur[IDX_HI] - + k[5607]*y_cur[IDX_eM] - k[5675] - k[5772] - k[6069] - k[6299] - + k[6891]; + data[jistart + 18339] = 0.0 - k[1904]*y_cur[IDX_CI] + k[3904]*y_cur[IDX_CM] + + k[3905]*y_cur[IDX_CM]; + data[jistart + 18340] = 0.0 - k[2632]*y_cur[IDX_CI] + k[3899]*y_cur[IDX_CM]; + data[jistart + 18341] = 0.0 + k[3344]*y_cur[IDX_NII] - k[4957]*y_cur[IDX_CI] + + k[5163]*y_cur[IDX_HI] + k[5492]*y_cur[IDX_SiI] + k[5826] + k[6138]; + data[jistart + 18342] = 0.0 + k[6314]*y_cur[IDX_CII] + k[6315]*y_cur[IDX_CHII] + + k[6316]*y_cur[IDX_CH2II] + k[6317]*y_cur[IDX_CH2II] + + k[6352]*y_cur[IDX_C2II] + k[6352]*y_cur[IDX_C2II] + + k[6355]*y_cur[IDX_C2HII] + k[6359]*y_cur[IDX_CNII] + + k[6370]*y_cur[IDX_C2H3II] + k[6371]*y_cur[IDX_C2H3II] + + k[6373]*y_cur[IDX_COII] + k[6387]*y_cur[IDX_C2H4II] + + k[6423]*y_cur[IDX_CFII] + k[6455]*y_cur[IDX_C3II] + + k[6459]*y_cur[IDX_C3HII] + k[6462]*y_cur[IDX_C3H2II] + + k[6467]*y_cur[IDX_C2NII] + k[6469]*y_cur[IDX_CNCII] + + k[6474]*y_cur[IDX_C2OII] + k[6481]*y_cur[IDX_SiCII] + + k[6488]*y_cur[IDX_HC2OII] + k[6511]*y_cur[IDX_CPII] + + k[6535]*y_cur[IDX_CSII] + k[6599]*y_cur[IDX_CClII] + + k[6616]*y_cur[IDX_C4II] + k[6643]*y_cur[IDX_SiC2II] + + k[6662]*y_cur[IDX_CCPII] + k[6674]*y_cur[IDX_C2SII] + + k[6706]*y_cur[IDX_OCSII] + k[6721]*y_cur[IDX_C5HII] + + k[6741]*y_cur[IDX_C4NII] + k[6746]*y_cur[IDX_SiC3II] + + k[6774]*y_cur[IDX_PC3HII] + k[6775]*y_cur[IDX_C3SII] + + k[6781]*y_cur[IDX_C6II] + k[6782]*y_cur[IDX_C6HII] + + k[6799]*y_cur[IDX_SiC4II] + k[6809]*y_cur[IDX_C4PII] + + k[6816]*y_cur[IDX_C4SII] + k[6823]*y_cur[IDX_C7II] + + k[6824]*y_cur[IDX_C7HII] + k[6837]*y_cur[IDX_C8II] + + k[6838]*y_cur[IDX_C8HII] + k[6856]*y_cur[IDX_C9II] + + k[6857]*y_cur[IDX_C9HII] + k[6870]*y_cur[IDX_C10II] + + k[6879]*y_cur[IDX_C10H3II]; + data[jistart + 18343] = 0.0 + k[134]*y_cur[IDX_CHI] - k[5134]*y_cur[IDX_CI] - + k[5554]*y_cur[IDX_CI]; + data[jistart + 18344] = 0.0 + k[728]*y_cur[IDX_C10II] + k[734]*y_cur[IDX_C10H3II] + + k[739]*y_cur[IDX_C2II] + k[739]*y_cur[IDX_C2II] + + k[741]*y_cur[IDX_C2HII] + k[755]*y_cur[IDX_C2H3II] + + k[756]*y_cur[IDX_C2H3II] + k[763]*y_cur[IDX_C2H4II] + + k[781]*y_cur[IDX_C2NII] + k[785]*y_cur[IDX_C2OII] + + k[786]*y_cur[IDX_C2SII] + k[788]*y_cur[IDX_C3II] + + k[789]*y_cur[IDX_C3HII] + k[792]*y_cur[IDX_C3H2II] + + k[816]*y_cur[IDX_C3SII] + k[820]*y_cur[IDX_C4II] + + k[832]*y_cur[IDX_C4NII] + k[833]*y_cur[IDX_C4PII] + + k[836]*y_cur[IDX_C4SII] + k[839]*y_cur[IDX_C5HII] + + k[849]*y_cur[IDX_C6II] + k[850]*y_cur[IDX_C6HII] + + k[865]*y_cur[IDX_C7II] + k[866]*y_cur[IDX_C7HII] + + k[878]*y_cur[IDX_C8II] + k[879]*y_cur[IDX_C8HII] + + k[890]*y_cur[IDX_C9II] + k[891]*y_cur[IDX_C9HII] + + k[902]*y_cur[IDX_CCPII] + k[904]*y_cur[IDX_CClII] + + k[905]*y_cur[IDX_CFII] + k[906]*y_cur[IDX_CHII] + + k[907]*y_cur[IDX_CH2II] + k[908]*y_cur[IDX_CH2II] + + k[977]*y_cur[IDX_CNII] + k[979]*y_cur[IDX_CNCII] + + k[980]*y_cur[IDX_COII] + k[984]*y_cur[IDX_CPII] + + k[985]*y_cur[IDX_CSII] + k[1057]*y_cur[IDX_HC2OII] + + k[1177]*y_cur[IDX_OCSII] + k[1192]*y_cur[IDX_PC3HII] + + k[1223]*y_cur[IDX_SiCII] + k[1225]*y_cur[IDX_SiC2II] + + k[1232]*y_cur[IDX_SiC3II] + k[1239]*y_cur[IDX_SiC4II] - + k[5607]*y_cur[IDX_CI] + k[5611]*y_cur[IDX_CII]; + data[jistart + 18345] = 0.0 + k[141]*y_cur[IDX_CHI] + k[5153]*y_cur[IDX_C2I] + + k[5160]*y_cur[IDX_CHI] + k[5163]*y_cur[IDX_COI] - + k[5572]*y_cur[IDX_CI]; + data[jistart + 18346] = 0.0 + k[137]*y_cur[IDX_H2I]; + data[jistart + 18347] = 0.0 + k[3683]*y_cur[IDX_OI]; + data[jistart + 18348] = 0.0 + k[2284]*y_cur[IDX_COI]; + data[jistart + 18349] = 0.0 - k[2980]*y_cur[IDX_HCOII]; + data[jistart + 18350] = 0.0 + k[2291]*y_cur[IDX_COI]; + data[jistart + 18351] = 0.0 - k[3004]*y_cur[IDX_HCOII]; + data[jistart + 18352] = 0.0 - k[5652]*y_cur[IDX_HCOII]; + data[jistart + 18353] = 0.0 + k[3763]*y_cur[IDX_OI]; + data[jistart + 18354] = 0.0 - k[2960]*y_cur[IDX_HCOII]; + data[jistart + 18355] = 0.0 + k[2287]*y_cur[IDX_COI]; + data[jistart + 18356] = 0.0 + k[3682]*y_cur[IDX_OI]; + data[jistart + 18357] = 0.0 + k[2283]*y_cur[IDX_COI]; + data[jistart + 18358] = 0.0 - k[2995]*y_cur[IDX_HCOII]; + data[jistart + 18359] = 0.0 - k[5658]*y_cur[IDX_HCOII]; + data[jistart + 18360] = 0.0 - k[2945]*y_cur[IDX_HCOII]; + data[jistart + 18361] = 0.0 - k[2947]*y_cur[IDX_HCOII]; + data[jistart + 18362] = 0.0 - k[2962]*y_cur[IDX_HCOII]; + data[jistart + 18363] = 0.0 - k[2996]*y_cur[IDX_HCOII]; + data[jistart + 18364] = 0.0 - k[3003]*y_cur[IDX_HCOII]; + data[jistart + 18365] = 0.0 - k[2974]*y_cur[IDX_HCOII]; + data[jistart + 18366] = 0.0 - k[2992]*y_cur[IDX_HCOII]; + data[jistart + 18367] = 0.0 - k[5664]*y_cur[IDX_HCOII] + k[5666]*y_cur[IDX_HeII]; + data[jistart + 18368] = 0.0 - k[2999]*y_cur[IDX_HCOII]; + data[jistart + 18369] = 0.0 + k[2532]*y_cur[IDX_H2OI]; + data[jistart + 18370] = 0.0 - k[2942]*y_cur[IDX_HCOII]; + data[jistart + 18371] = 0.0 - k[2943]*y_cur[IDX_HCOII]; + data[jistart + 18372] = 0.0 - k[2975]*y_cur[IDX_HCOII]; + data[jistart + 18373] = 0.0 - k[2976]*y_cur[IDX_HCOII]; + data[jistart + 18374] = 0.0 - k[5641]*y_cur[IDX_HCOII]; + data[jistart + 18375] = 0.0 - k[5646]*y_cur[IDX_HCOII]; + data[jistart + 18376] = 0.0 - k[2946]*y_cur[IDX_HCOII]; + data[jistart + 18377] = 0.0 - k[2968]*y_cur[IDX_HCOII]; + data[jistart + 18378] = 0.0 - k[2970]*y_cur[IDX_HCOII]; + data[jistart + 18379] = 0.0 - k[2984]*y_cur[IDX_HCOII]; + data[jistart + 18380] = 0.0 - k[2986]*y_cur[IDX_HCOII]; + data[jistart + 18381] = 0.0 - k[2993]*y_cur[IDX_HCOII]; + data[jistart + 18382] = 0.0 - k[2994]*y_cur[IDX_HCOII]; + data[jistart + 18383] = 0.0 - k[2916]*y_cur[IDX_HCOII]; + data[jistart + 18384] = 0.0 - k[2972]*y_cur[IDX_HCOII]; + data[jistart + 18385] = 0.0 - k[2911]*y_cur[IDX_HCOII]; + data[jistart + 18386] = 0.0 - k[2936]*y_cur[IDX_HCOII]; + data[jistart + 18387] = 0.0 - k[2944]*y_cur[IDX_HCOII]; + data[jistart + 18388] = 0.0 - k[5670]*y_cur[IDX_HCOII]; + data[jistart + 18389] = 0.0 - k[2953]*y_cur[IDX_HCOII]; + data[jistart + 18390] = 0.0 - k[2959]*y_cur[IDX_HCOII]; + data[jistart + 18391] = 0.0 - k[2987]*y_cur[IDX_HCOII]; + data[jistart + 18392] = 0.0 - k[2988]*y_cur[IDX_HCOII]; + data[jistart + 18393] = 0.0 - k[2912]*y_cur[IDX_HCOII]; + data[jistart + 18394] = 0.0 - k[2941]*y_cur[IDX_HCOII]; + data[jistart + 18395] = 0.0 - k[5630]*y_cur[IDX_HCOII]; + data[jistart + 18396] = 0.0 - k[2963]*y_cur[IDX_HCOII]; + data[jistart + 18397] = 0.0 - k[2973]*y_cur[IDX_HCOII]; + data[jistart + 18398] = 0.0 - k[2998]*y_cur[IDX_HCOII]; + data[jistart + 18399] = 0.0 + k[3679]*y_cur[IDX_OI]; + data[jistart + 18400] = 0.0 - k[2991]*y_cur[IDX_HCOII]; + data[jistart + 18401] = 0.0 - k[2904]*y_cur[IDX_HCOII]; + data[jistart + 18402] = 0.0 - k[5636]*y_cur[IDX_HCOII]; + data[jistart + 18403] = 0.0 - k[2981]*y_cur[IDX_HCOII]; + data[jistart + 18404] = 0.0 - k[3000]*y_cur[IDX_HCOII]; + data[jistart + 18405] = 0.0 - k[2910]*y_cur[IDX_HCOII]; + data[jistart + 18406] = 0.0 - k[2934]*y_cur[IDX_HCOII]; + data[jistart + 18407] = 0.0 - k[2939]*y_cur[IDX_HCOII]; + data[jistart + 18408] = 0.0 - k[2967]*y_cur[IDX_HCOII]; + data[jistart + 18409] = 0.0 - k[2924]*y_cur[IDX_HCOII]; + data[jistart + 18410] = 0.0 - k[2929]*y_cur[IDX_HCOII]; + data[jistart + 18411] = 0.0 + k[2700]*y_cur[IDX_H3II] - k[2971]*y_cur[IDX_HCOII]; + data[jistart + 18412] = 0.0 - k[2900]*y_cur[IDX_HCOII]; + data[jistart + 18413] = 0.0 - k[2937]*y_cur[IDX_HCOII]; + data[jistart + 18414] = 0.0 - k[2955]*y_cur[IDX_HCOII]; + data[jistart + 18415] = 0.0 - k[2997]*y_cur[IDX_HCOII]; + data[jistart + 18416] = 0.0 - k[2903]*y_cur[IDX_HCOII]; + data[jistart + 18417] = 0.0 + k[2085]*y_cur[IDX_CH3II] - k[2978]*y_cur[IDX_HCOII]; + data[jistart + 18418] = 0.0 + k[2526]*y_cur[IDX_H2OI]; + data[jistart + 18419] = 0.0 + k[3711]*y_cur[IDX_OI]; + data[jistart + 18420] = 0.0 + k[3720]*y_cur[IDX_OI]; + data[jistart + 18421] = 0.0 + k[3722]*y_cur[IDX_OI]; + data[jistart + 18422] = 0.0 + k[3725]*y_cur[IDX_OI]; + data[jistart + 18423] = 0.0 - k[2940]*y_cur[IDX_HCOII]; + data[jistart + 18424] = 0.0 - k[3029]*y_cur[IDX_HCOII]; + data[jistart + 18425] = 0.0 + k[3755]*y_cur[IDX_OI]; + data[jistart + 18426] = 0.0 - k[2952]*y_cur[IDX_HCOII]; + data[jistart + 18427] = 0.0 - k[2931]*y_cur[IDX_HCOII]; + data[jistart + 18428] = 0.0 + k[2841]*y_cur[IDX_HI]; + data[jistart + 18429] = 0.0 - k[2966]*y_cur[IDX_HCOII]; + data[jistart + 18430] = 0.0 - k[3002]*y_cur[IDX_HCOII]; + data[jistart + 18431] = 0.0 - k[3001]*y_cur[IDX_HCOII]; + data[jistart + 18432] = 0.0 + k[3713]*y_cur[IDX_OI]; + data[jistart + 18433] = 0.0 + k[3724]*y_cur[IDX_OI]; + data[jistart + 18434] = 0.0 - k[2985]*y_cur[IDX_HCOII]; + data[jistart + 18435] = 0.0 - k[2927]*y_cur[IDX_HCOII]; + data[jistart + 18436] = 0.0 + k[3739]*y_cur[IDX_OI]; + data[jistart + 18437] = 0.0 + k[3697]*y_cur[IDX_OI]; + data[jistart + 18438] = 0.0 + k[3719]*y_cur[IDX_OI]; + data[jistart + 18439] = 0.0 + k[2285]*y_cur[IDX_COI] + k[3736]*y_cur[IDX_OI]; + data[jistart + 18440] = 0.0 + k[3707]*y_cur[IDX_OI]; + data[jistart + 18441] = 0.0 + k[3704]*y_cur[IDX_OI]; + data[jistart + 18442] = 0.0 - k[2950]*y_cur[IDX_HCOII]; + data[jistart + 18443] = 0.0 + k[3716]*y_cur[IDX_OI]; + data[jistart + 18444] = 0.0 - k[2951]*y_cur[IDX_HCOII]; + data[jistart + 18445] = 0.0 - k[2979]*y_cur[IDX_HCOII]; + data[jistart + 18446] = 0.0 + k[3715]*y_cur[IDX_OI]; + data[jistart + 18447] = 0.0 + k[2289]*y_cur[IDX_COI]; + data[jistart + 18448] = 0.0 + k[3710]*y_cur[IDX_OI]; + data[jistart + 18449] = 0.0 + k[2140]*y_cur[IDX_COI]; + data[jistart + 18450] = 0.0 + k[2286]*y_cur[IDX_COI]; + data[jistart + 18451] = 0.0 - k[2957]*y_cur[IDX_HCOII]; + data[jistart + 18452] = 0.0 - k[2923]*y_cur[IDX_HCOII]; + data[jistart + 18453] = 0.0 - k[2919]*y_cur[IDX_HCOII]; + data[jistart + 18454] = 0.0 + k[3706]*y_cur[IDX_OI]; + data[jistart + 18455] = 0.0 + k[302]*y_cur[IDX_HCOI] + k[2271]*y_cur[IDX_H2COI] + + k[2537]*y_cur[IDX_H2OI]; + data[jistart + 18456] = 0.0 - k[2949]*y_cur[IDX_HCOII]; + data[jistart + 18457] = 0.0 - k[2907]*y_cur[IDX_HCOII]; + data[jistart + 18458] = 0.0 - k[2902]*y_cur[IDX_HCOII]; + data[jistart + 18459] = 0.0 + k[568]*y_cur[IDX_HCOI] + k[3361]*y_cur[IDX_H2COI]; + data[jistart + 18460] = 0.0 + k[2854]*y_cur[IDX_COI]; + data[jistart + 18461] = 0.0 + k[205]*y_cur[IDX_HCOI]; + data[jistart + 18462] = 0.0 + k[3699]*y_cur[IDX_OI]; + data[jistart + 18463] = 0.0 + k[2539]*y_cur[IDX_H2OI]; + data[jistart + 18464] = 0.0 + k[3485]*y_cur[IDX_COI] + k[3488]*y_cur[IDX_H2COI]; + data[jistart + 18465] = 0.0 - k[4780]*y_cur[IDX_HCOII] - k[4781]*y_cur[IDX_HCOII]; + data[jistart + 18466] = 0.0 - k[4639]*y_cur[IDX_HCOII] - k[4640]*y_cur[IDX_HCOII]; + data[jistart + 18467] = 0.0 + k[450]*y_cur[IDX_HCOI] + k[2383]*y_cur[IDX_COI] + + k[2385]*y_cur[IDX_H2COI]; + data[jistart + 18468] = 0.0 - k[2982]*y_cur[IDX_HCOII]; + data[jistart + 18469] = 0.0 + k[581]*y_cur[IDX_HCOI]; + data[jistart + 18470] = 0.0 - k[2983]*y_cur[IDX_HCOII]; + data[jistart + 18471] = 0.0 - k[4850]*y_cur[IDX_HCOII] - k[4851]*y_cur[IDX_HCOII]; + data[jistart + 18472] = 0.0 - k[4044]*y_cur[IDX_HCOII] - k[4045]*y_cur[IDX_HCOII]; + data[jistart + 18473] = 0.0 - k[4219]*y_cur[IDX_HCOII] - k[4220]*y_cur[IDX_HCOII]; + data[jistart + 18474] = 0.0 + k[310]*y_cur[IDX_HCOI] + k[1743]*y_cur[IDX_C2HI] + + k[2001]*y_cur[IDX_CH2I] + k[2190]*y_cur[IDX_CH4I] + + k[2245]*y_cur[IDX_CHI] + k[2280]*y_cur[IDX_H2COI] + + k[2281]*y_cur[IDX_H2SI] + k[2434]*y_cur[IDX_H2I] + + k[2540]*y_cur[IDX_H2OI] + k[3534]*y_cur[IDX_NH2I] + + k[3573]*y_cur[IDX_NH3I] + k[3610]*y_cur[IDX_NHI] + + k[3798]*y_cur[IDX_OHI]; + data[jistart + 18475] = 0.0 - k[2948]*y_cur[IDX_HCOII]; + data[jistart + 18476] = 0.0 + k[2224]*y_cur[IDX_COI]; + data[jistart + 18477] = 0.0 - k[4815]*y_cur[IDX_HCOII] - k[4816]*y_cur[IDX_HCOII]; + data[jistart + 18478] = 0.0 - k[3974]*y_cur[IDX_HCOII] - k[3975]*y_cur[IDX_HCOII]; + data[jistart + 18479] = 0.0 - k[4114]*y_cur[IDX_HCOII] - k[4115]*y_cur[IDX_HCOII]; + data[jistart + 18480] = 0.0 - k[2917]*y_cur[IDX_HCOII]; + data[jistart + 18481] = 0.0 - k[4394]*y_cur[IDX_HCOII] - k[4395]*y_cur[IDX_HCOII]; + data[jistart + 18482] = 0.0 - k[4534]*y_cur[IDX_HCOII] - k[4535]*y_cur[IDX_HCOII]; + data[jistart + 18483] = 0.0 - k[4464]*y_cur[IDX_HCOII] - k[4465]*y_cur[IDX_HCOII]; + data[jistart + 18484] = 0.0 - k[4604]*y_cur[IDX_HCOII] - k[4605]*y_cur[IDX_HCOII]; + data[jistart + 18485] = 0.0 - k[3939]*y_cur[IDX_HCOII] - k[3940]*y_cur[IDX_HCOII]; + data[jistart + 18486] = 0.0 - k[4289]*y_cur[IDX_HCOII] - k[4290]*y_cur[IDX_HCOII]; + data[jistart + 18487] = 0.0 - k[4324]*y_cur[IDX_HCOII] - k[4325]*y_cur[IDX_HCOII]; + data[jistart + 18488] = 0.0 - k[2977]*y_cur[IDX_HCOII]; + data[jistart + 18489] = 0.0 - k[3904]*y_cur[IDX_HCOII] - k[3905]*y_cur[IDX_HCOII]; + data[jistart + 18490] = 0.0 - k[2956]*y_cur[IDX_HCOII]; + data[jistart + 18491] = 0.0 - k[4745]*y_cur[IDX_HCOII] - k[4746]*y_cur[IDX_HCOII]; + data[jistart + 18492] = 0.0 - k[4569]*y_cur[IDX_HCOII] - k[4570]*y_cur[IDX_HCOII]; + data[jistart + 18493] = 0.0 + k[2332]*y_cur[IDX_HII] - k[2954]*y_cur[IDX_HCOII]; + data[jistart + 18494] = 0.0 - k[4710]*y_cur[IDX_HCOII] - k[4711]*y_cur[IDX_HCOII]; + data[jistart + 18495] = 0.0 - k[2964]*y_cur[IDX_HCOII]; + data[jistart + 18496] = 0.0 - k[3006]*y_cur[IDX_HCOII]; + data[jistart + 18497] = 0.0 + k[2530]*y_cur[IDX_H2OI] + k[3669]*y_cur[IDX_O2I]; + data[jistart + 18498] = 0.0 + k[3696]*y_cur[IDX_OI]; + data[jistart + 18499] = 0.0 - k[4499]*y_cur[IDX_HCOII] - k[4500]*y_cur[IDX_HCOII]; + data[jistart + 18500] = 0.0 - k[4009]*y_cur[IDX_HCOII] - k[4010]*y_cur[IDX_HCOII]; + data[jistart + 18501] = 0.0 - k[2905]*y_cur[IDX_HCOII]; + data[jistart + 18502] = 0.0 - k[4079]*y_cur[IDX_HCOII] - k[4080]*y_cur[IDX_HCOII]; + data[jistart + 18503] = 0.0 - k[4184]*y_cur[IDX_HCOII] - k[4185]*y_cur[IDX_HCOII]; + data[jistart + 18504] = 0.0 - k[4359]*y_cur[IDX_HCOII] - k[4360]*y_cur[IDX_HCOII]; + data[jistart + 18505] = 0.0 - k[4254]*y_cur[IDX_HCOII] - k[4255]*y_cur[IDX_HCOII]; + data[jistart + 18506] = 0.0 - k[4429]*y_cur[IDX_HCOII] - k[4430]*y_cur[IDX_HCOII]; + data[jistart + 18507] = 0.0 + k[504]*y_cur[IDX_HCOI] + k[2268]*y_cur[IDX_CHI]; + data[jistart + 18508] = 0.0 + k[3534]*y_cur[IDX_COII] - k[3542]*y_cur[IDX_HCOII]; + data[jistart + 18509] = 0.0 - k[2914]*y_cur[IDX_HCOII]; + data[jistart + 18510] = 0.0 + k[3686]*y_cur[IDX_OI]; + data[jistart + 18511] = 0.0 + k[3695]*y_cur[IDX_OI]; + data[jistart + 18512] = 0.0 - k[2921]*y_cur[IDX_HCOII]; + data[jistart + 18513] = 0.0 + k[1981]*y_cur[IDX_H2COI] + k[1990]*y_cur[IDX_O2I] + + k[1991]*y_cur[IDX_OI]; + data[jistart + 18514] = 0.0 + k[691]*y_cur[IDX_HCOI] + k[3777]*y_cur[IDX_COI]; + data[jistart + 18515] = 0.0 + k[470]*y_cur[IDX_HCOI] + k[2507]*y_cur[IDX_COI]; + data[jistart + 18516] = 0.0 - k[4149]*y_cur[IDX_HCOII] - k[4150]*y_cur[IDX_HCOII]; + data[jistart + 18517] = 0.0 - k[2909]*y_cur[IDX_HCOII]; + data[jistart + 18518] = 0.0 + k[251]*y_cur[IDX_HCOI] + k[1946]*y_cur[IDX_CO2I] + + k[1950]*y_cur[IDX_H2COI] + k[1953]*y_cur[IDX_H2OI] + + k[1967]*y_cur[IDX_O2I]; + data[jistart + 18519] = 0.0 + k[1946]*y_cur[IDX_CHII] + k[2334]*y_cur[IDX_HII]; + data[jistart + 18520] = 0.0 + k[502]*y_cur[IDX_HCOI] + k[2262]*y_cur[IDX_CHI] + + k[2498]*y_cur[IDX_H2COI] + k[3655]*y_cur[IDX_C2H2I]; + data[jistart + 18521] = 0.0 - k[2901]*y_cur[IDX_HCOII]; + data[jistart + 18522] = 0.0 - k[2935]*y_cur[IDX_HCOII]; + data[jistart + 18523] = 0.0 - k[3005]*y_cur[IDX_HCOII]; + data[jistart + 18524] = 0.0 - k[499]*y_cur[IDX_HCOII]; + data[jistart + 18525] = 0.0 - k[533]*y_cur[IDX_HCOII]; + data[jistart + 18526] = 0.0 - k[637]*y_cur[IDX_HCOII]; + data[jistart + 18527] = 0.0 - k[2899]*y_cur[IDX_HCOII]; + data[jistart + 18528] = 0.0 - k[2932]*y_cur[IDX_HCOII]; + data[jistart + 18529] = 0.0 - k[2926]*y_cur[IDX_HCOII]; + data[jistart + 18530] = 0.0 - k[2933]*y_cur[IDX_HCOII]; + data[jistart + 18531] = 0.0 - k[2930]*y_cur[IDX_HCOII]; + data[jistart + 18532] = 0.0 + k[3610]*y_cur[IDX_COII] - k[3614]*y_cur[IDX_HCOII]; + data[jistart + 18533] = 0.0 - k[2918]*y_cur[IDX_HCOII]; + data[jistart + 18534] = 0.0 - k[2922]*y_cur[IDX_HCOII]; + data[jistart + 18535] = 0.0 - k[4674]*y_cur[IDX_HCOII] - k[4675]*y_cur[IDX_HCOII]; + data[jistart + 18536] = 0.0 - k[2913]*y_cur[IDX_HCOII]; + data[jistart + 18537] = 0.0 - k[2990]*y_cur[IDX_HCOII]; + data[jistart + 18538] = 0.0 - k[2928]*y_cur[IDX_HCOII]; + data[jistart + 18539] = 0.0 + k[3692]*y_cur[IDX_OI]; + data[jistart + 18540] = 0.0 + k[2288]*y_cur[IDX_COI]; + data[jistart + 18541] = 0.0 - k[2938]*y_cur[IDX_HCOII]; + data[jistart + 18542] = 0.0 + k[3845]*y_cur[IDX_C2H2I]; + data[jistart + 18543] = 0.0 + k[3726]*y_cur[IDX_OI]; + data[jistart + 18544] = 0.0 - k[2925]*y_cur[IDX_HCOII]; + data[jistart + 18545] = 0.0 - k[2920]*y_cur[IDX_HCOII]; + data[jistart + 18546] = 0.0 + k[501]*y_cur[IDX_HCOI]; + data[jistart + 18547] = 0.0 + k[555]*y_cur[IDX_HCOI] + k[3345]*y_cur[IDX_H2COI]; + data[jistart + 18548] = 0.0 - k[2908]*y_cur[IDX_HCOII]; + data[jistart + 18549] = 0.0 + k[500]*y_cur[IDX_HCOI] + k[2489]*y_cur[IDX_O2I]; + data[jistart + 18550] = 0.0 - k[2906]*y_cur[IDX_HCOII]; + data[jistart + 18551] = 0.0 - k[2915]*y_cur[IDX_HCOII]; + data[jistart + 18552] = 0.0 + k[658]*y_cur[IDX_HCOI] + k[3641]*y_cur[IDX_H2COI] + + k[3644]*y_cur[IDX_HCNI]; + data[jistart + 18553] = 0.0 - k[2965]*y_cur[IDX_HCOII]; + data[jistart + 18554] = 0.0 + k[2001]*y_cur[IDX_COII] - k[2008]*y_cur[IDX_HCOII]; + data[jistart + 18555] = 0.0 - k[3041]*y_cur[IDX_HCOII]; + data[jistart + 18556] = 0.0 + k[593]*y_cur[IDX_HCOI]; + data[jistart + 18557] = 0.0 - k[1708]*y_cur[IDX_HCOII]; + data[jistart + 18558] = 0.0 - k[1644]*y_cur[IDX_HCOII]; + data[jistart + 18559] = 0.0 + k[1967]*y_cur[IDX_CHII] + k[1990]*y_cur[IDX_CH2II] + + k[2489]*y_cur[IDX_H2COII] + k[3669]*y_cur[IDX_C3HII]; + data[jistart + 18560] = 0.0 + k[2281]*y_cur[IDX_COII] - k[2961]*y_cur[IDX_HCOII]; + data[jistart + 18561] = 0.0 + k[503]*y_cur[IDX_HCOI] + k[2501]*y_cur[IDX_H2COI]; + data[jistart + 18562] = 0.0 - k[3881]*y_cur[IDX_HCOII]; + data[jistart + 18563] = 0.0 + k[178]*y_cur[IDX_CII] + k[205]*y_cur[IDX_C2II] + + k[225]*y_cur[IDX_C2H2II] + k[251]*y_cur[IDX_CHII] + + k[272]*y_cur[IDX_CH3II] + k[302]*y_cur[IDX_CNII] + + k[310]*y_cur[IDX_COII] + k[389]*y_cur[IDX_HII] + + k[450]*y_cur[IDX_H2II] + k[470]*y_cur[IDX_H2OII] + + k[500]*y_cur[IDX_H2COII] + k[501]*y_cur[IDX_H2SII] + + k[502]*y_cur[IDX_O2II] + k[503]*y_cur[IDX_SII] + + k[504]*y_cur[IDX_SiOII] + k[555]*y_cur[IDX_NII] + + k[568]*y_cur[IDX_N2II] + k[581]*y_cur[IDX_NH2II] + + k[593]*y_cur[IDX_NH3II] + k[658]*y_cur[IDX_OII] + + k[691]*y_cur[IDX_OHII] - k[2969]*y_cur[IDX_HCOII] + k[5857] + + k[6185]; + data[jistart + 18564] = 0.0 + k[2190]*y_cur[IDX_COII] - k[5543]*y_cur[IDX_HCOII]; + data[jistart + 18565] = 0.0 + k[1743]*y_cur[IDX_COII] - k[1746]*y_cur[IDX_HCOII]; + data[jistart + 18566] = 0.0 + k[1391]*y_cur[IDX_CII] + k[1950]*y_cur[IDX_CHII] + + k[1981]*y_cur[IDX_CH2II] + k[2077]*y_cur[IDX_CH3II] + + k[2271]*y_cur[IDX_CNII] + k[2280]*y_cur[IDX_COII] + + k[2338]*y_cur[IDX_HII] + k[2385]*y_cur[IDX_H2II] + + k[2498]*y_cur[IDX_O2II] + k[2501]*y_cur[IDX_SII] - + k[2958]*y_cur[IDX_HCOII] + k[3220]*y_cur[IDX_HeII] + + k[3345]*y_cur[IDX_NII] + k[3361]*y_cur[IDX_N2II] + + k[3488]*y_cur[IDX_NHII] + k[3641]*y_cur[IDX_OII] + k[6155]; + data[jistart + 18567] = 0.0 - k[2877]*y_cur[IDX_HCOII] + k[3644]*y_cur[IDX_OII]; + data[jistart + 18568] = 0.0 + k[63]*y_cur[IDX_OI] + k[2245]*y_cur[IDX_COII] - + k[2253]*y_cur[IDX_HCOII] + k[2262]*y_cur[IDX_O2II] + + k[2268]*y_cur[IDX_SiOII]; + data[jistart + 18569] = 0.0 - k[2989]*y_cur[IDX_HCOII]; + data[jistart + 18570] = 0.0 - k[1459]*y_cur[IDX_HCOII]; + data[jistart + 18571] = 0.0 + k[3798]*y_cur[IDX_COII] - k[3801]*y_cur[IDX_HCOII] - + k[3802]*y_cur[IDX_HCOII]; + data[jistart + 18572] = 0.0 + k[3573]*y_cur[IDX_COII] - k[3584]*y_cur[IDX_HCOII]; + data[jistart + 18573] = 0.0 + k[225]*y_cur[IDX_HCOI] + k[3689]*y_cur[IDX_OI]; + data[jistart + 18574] = 0.0 + k[272]*y_cur[IDX_HCOI] + k[2077]*y_cur[IDX_H2COI] + + k[2085]*y_cur[IDX_N2OI] + k[2091]*y_cur[IDX_OI]; + data[jistart + 18575] = 0.0 - k[1566]*y_cur[IDX_HCOII] + k[3655]*y_cur[IDX_O2II] + + k[3845]*y_cur[IDX_SOII]; + data[jistart + 18576] = 0.0 + k[1901]*y_cur[IDX_CI]; + data[jistart + 18577] = 0.0 + k[63]*y_cur[IDX_CHI] + k[1991]*y_cur[IDX_CH2II] + + k[2091]*y_cur[IDX_CH3II] + k[3679]*y_cur[IDX_C10HII] + + k[3682]*y_cur[IDX_C10H2II] + k[3683]*y_cur[IDX_C10H3II] + + k[3686]*y_cur[IDX_C2HII] + k[3689]*y_cur[IDX_C2H2II] + + k[3692]*y_cur[IDX_C2H4II] + k[3695]*y_cur[IDX_C3H2II] + + k[3696]*y_cur[IDX_C3H3II] + k[3697]*y_cur[IDX_C3H4II] + + k[3699]*y_cur[IDX_C4HII] + k[3704]*y_cur[IDX_C5HII] + + k[3706]*y_cur[IDX_C5H2II] + k[3707]*y_cur[IDX_C5H3II] + + k[3710]*y_cur[IDX_C6H2II] + k[3711]*y_cur[IDX_C6H3II] + + k[3713]*y_cur[IDX_C7HII] + k[3715]*y_cur[IDX_C7H2II] + + k[3716]*y_cur[IDX_C7H3II] + k[3719]*y_cur[IDX_C8H2II] + + k[3720]*y_cur[IDX_C8H3II] + k[3722]*y_cur[IDX_C9HII] + + k[3724]*y_cur[IDX_C9H2II] + k[3725]*y_cur[IDX_C9H3II] + + k[3726]*y_cur[IDX_CH2CCHII] + k[3736]*y_cur[IDX_HCO2II] + + k[3739]*y_cur[IDX_HCSII] + k[3755]*y_cur[IDX_SiCH2II] + + k[3763]*y_cur[IDX_SiNCHII]; + data[jistart + 18578] = 0.0 + k[3220]*y_cur[IDX_H2COI] + k[5666]*y_cur[IDX_CH2OHCHOI]; + data[jistart + 18579] = 0.0 + k[178]*y_cur[IDX_HCOI] + k[1391]*y_cur[IDX_H2COI] + + k[1393]*y_cur[IDX_H2OI]; + data[jistart + 18580] = 0.0 + k[1393]*y_cur[IDX_CII] + k[1953]*y_cur[IDX_CHII] + + k[2526]*y_cur[IDX_C2NII] + k[2530]*y_cur[IDX_C3HII] + + k[2532]*y_cur[IDX_C4NII] + k[2537]*y_cur[IDX_CNII] + + k[2539]*y_cur[IDX_CNCII] + k[2540]*y_cur[IDX_COII] - + k[2547]*y_cur[IDX_HCOII] - k[5566]*y_cur[IDX_HCOII]; + data[jistart + 18581] = 0.0 + k[389]*y_cur[IDX_HCOI] + k[2332]*y_cur[IDX_CH3OHI] + + k[2334]*y_cur[IDX_CO2I] + k[2338]*y_cur[IDX_H2COI]; + data[jistart + 18582] = 0.0 + k[1901]*y_cur[IDX_H3OII] - k[1904]*y_cur[IDX_HCOII]; + data[jistart + 18583] = 0.0 - k[499]*y_cur[IDX_FeI] - k[533]*y_cur[IDX_MgI] - + k[637]*y_cur[IDX_NaI] - k[1097]*y_cur[IDX_eM] - + k[1459]*y_cur[IDX_C2I] - k[1566]*y_cur[IDX_C2H2I] - + k[1644]*y_cur[IDX_C2H3I] - k[1708]*y_cur[IDX_C2H4I] - + k[1746]*y_cur[IDX_C2HI] - k[1904]*y_cur[IDX_CI] - + k[2008]*y_cur[IDX_CH2I] - k[2253]*y_cur[IDX_CHI] - + k[2547]*y_cur[IDX_H2OI] - k[2877]*y_cur[IDX_HCNI] - + k[2899]*y_cur[IDX_C10I] - k[2900]*y_cur[IDX_C10H2I] - + k[2901]*y_cur[IDX_C10HI] - k[2902]*y_cur[IDX_C2H5I] - + k[2903]*y_cur[IDX_C2H5OHI] - k[2904]*y_cur[IDX_C2OI] - + k[2905]*y_cur[IDX_C2SI] - k[2906]*y_cur[IDX_C3I] - + k[2907]*y_cur[IDX_C3H2I] - k[2908]*y_cur[IDX_C3HI] - + k[2909]*y_cur[IDX_C3NI] - k[2910]*y_cur[IDX_C3OI] - + k[2911]*y_cur[IDX_C3PI] - k[2912]*y_cur[IDX_C3SI] - + k[2913]*y_cur[IDX_C4I] - k[2914]*y_cur[IDX_C4H3I] - + k[2915]*y_cur[IDX_C4HI] - k[2916]*y_cur[IDX_C4PI] - + k[2917]*y_cur[IDX_C4SI] - k[2918]*y_cur[IDX_C5I] - + k[2919]*y_cur[IDX_C5H2I] - k[2920]*y_cur[IDX_C5HI] - + k[2921]*y_cur[IDX_C5NI] - k[2922]*y_cur[IDX_C6I] - + k[2923]*y_cur[IDX_C6H2I] - k[2924]*y_cur[IDX_C6H6I] - + k[2925]*y_cur[IDX_C6HI] - k[2926]*y_cur[IDX_C7I] - + k[2927]*y_cur[IDX_C7H2I] - k[2928]*y_cur[IDX_C7HI] - + k[2929]*y_cur[IDX_C7NI] - k[2930]*y_cur[IDX_C8I] - + k[2931]*y_cur[IDX_C8H2I] - k[2932]*y_cur[IDX_C8HI] - + k[2933]*y_cur[IDX_C9I] - k[2934]*y_cur[IDX_C9H2I] - + k[2935]*y_cur[IDX_C9HI] - k[2936]*y_cur[IDX_C9NI] - + k[2937]*y_cur[IDX_CCPI] - k[2938]*y_cur[IDX_CH2CCHI] - + k[2939]*y_cur[IDX_CH2CHCNI] - k[2940]*y_cur[IDX_CH2COI] - + k[2941]*y_cur[IDX_CH2NHI] - k[2942]*y_cur[IDX_CH2PHI] - + k[2943]*y_cur[IDX_CH3C3NI] - k[2944]*y_cur[IDX_CH3C4HI] - + k[2945]*y_cur[IDX_CH3C5NI] - k[2946]*y_cur[IDX_CH3C6HI] - + k[2947]*y_cur[IDX_CH3C7NI] - k[2948]*y_cur[IDX_CH3CCHI] - + k[2949]*y_cur[IDX_C2H6I] - k[2950]*y_cur[IDX_CH3CHOI] - + k[2951]*y_cur[IDX_CH3CNI] - k[2952]*y_cur[IDX_CH3COCH3I] - + k[2953]*y_cur[IDX_CH3OCH3I] - k[2954]*y_cur[IDX_CH3OHI] - + k[2955]*y_cur[IDX_CPI] - k[2956]*y_cur[IDX_CSI] - + k[2957]*y_cur[IDX_H2CCCI] - k[2958]*y_cur[IDX_H2COI] - + k[2959]*y_cur[IDX_H2CSI] - k[2960]*y_cur[IDX_H2S2I] - + k[2961]*y_cur[IDX_H2SI] - k[2962]*y_cur[IDX_H2SiOI] - + k[2963]*y_cur[IDX_HC2PI] - k[2964]*y_cur[IDX_HC3NI] - + k[2965]*y_cur[IDX_C4H2I] - k[2966]*y_cur[IDX_HC5NI] - + k[2967]*y_cur[IDX_HC7NI] - k[2968]*y_cur[IDX_HC9NI] - + k[2969]*y_cur[IDX_HCOI] - k[2970]*y_cur[IDX_HCOOCH3I] - + k[2971]*y_cur[IDX_HCOOHI] - k[2972]*y_cur[IDX_HCPI] - + k[2973]*y_cur[IDX_HCSiI] - k[2974]*y_cur[IDX_HNSiI] - + k[2975]*y_cur[IDX_HPOI] - k[2976]*y_cur[IDX_HS2I] - + k[2977]*y_cur[IDX_HSI] - k[2978]*y_cur[IDX_N2OI] - + k[2979]*y_cur[IDX_NCCNI] - k[2980]*y_cur[IDX_NH2CNI] - + k[2981]*y_cur[IDX_NSI] - k[2982]*y_cur[IDX_OCSI] - + k[2983]*y_cur[IDX_PI] - k[2984]*y_cur[IDX_PH2I] - + k[2985]*y_cur[IDX_PHI] - k[2986]*y_cur[IDX_PNI] - + k[2987]*y_cur[IDX_POI] - k[2988]*y_cur[IDX_S2I] - + k[2989]*y_cur[IDX_SI] - k[2990]*y_cur[IDX_SOI] - + k[2991]*y_cur[IDX_SiC2I] - k[2992]*y_cur[IDX_SiC2H2I] - + k[2993]*y_cur[IDX_SiC2HI] - k[2994]*y_cur[IDX_SiC3I] - + k[2995]*y_cur[IDX_SiC3HI] - k[2996]*y_cur[IDX_SiC4I] - + k[2997]*y_cur[IDX_SiCI] - k[2998]*y_cur[IDX_SiCH2I] - + k[2999]*y_cur[IDX_SiCH3I] - k[3000]*y_cur[IDX_SiH2I] - + k[3001]*y_cur[IDX_SiH4I] - k[3002]*y_cur[IDX_SiHI] - + k[3003]*y_cur[IDX_SiNCI] - k[3004]*y_cur[IDX_SiO2I] - + k[3005]*y_cur[IDX_SiOI] - k[3006]*y_cur[IDX_SiSI] - + k[3029]*y_cur[IDX_HNC3I] - k[3041]*y_cur[IDX_HNCI] - + k[3542]*y_cur[IDX_NH2I] - k[3584]*y_cur[IDX_NH3I] - + k[3614]*y_cur[IDX_NHI] - k[3801]*y_cur[IDX_OHI] - + k[3802]*y_cur[IDX_OHI] - k[3881]*y_cur[IDX_SiI] - + k[3904]*y_cur[IDX_CM] - k[3905]*y_cur[IDX_CM] - + k[3939]*y_cur[IDX_C10M] - k[3940]*y_cur[IDX_C10M] - + k[3974]*y_cur[IDX_C10HM] - k[3975]*y_cur[IDX_C10HM] - + k[4009]*y_cur[IDX_C2M] - k[4010]*y_cur[IDX_C2M] - + k[4044]*y_cur[IDX_C2HM] - k[4045]*y_cur[IDX_C2HM] - + k[4079]*y_cur[IDX_C3M] - k[4080]*y_cur[IDX_C3M] - + k[4114]*y_cur[IDX_C3HM] - k[4115]*y_cur[IDX_C3HM] - + k[4149]*y_cur[IDX_C3NM] - k[4150]*y_cur[IDX_C3NM] - + k[4184]*y_cur[IDX_C4M] - k[4185]*y_cur[IDX_C4M] - + k[4219]*y_cur[IDX_C4HM] - k[4220]*y_cur[IDX_C4HM] - + k[4254]*y_cur[IDX_C5M] - k[4255]*y_cur[IDX_C5M] - + k[4289]*y_cur[IDX_C5HM] - k[4290]*y_cur[IDX_C5HM] - + k[4324]*y_cur[IDX_C5NM] - k[4325]*y_cur[IDX_C5NM] - + k[4359]*y_cur[IDX_C6M] - k[4360]*y_cur[IDX_C6M] - + k[4394]*y_cur[IDX_C6HM] - k[4395]*y_cur[IDX_C6HM] - + k[4429]*y_cur[IDX_C7M] - k[4430]*y_cur[IDX_C7M] - + k[4464]*y_cur[IDX_C7HM] - k[4465]*y_cur[IDX_C7HM] - + k[4499]*y_cur[IDX_C8M] - k[4500]*y_cur[IDX_C8M] - + k[4534]*y_cur[IDX_C8HM] - k[4535]*y_cur[IDX_C8HM] - + k[4569]*y_cur[IDX_C9M] - k[4570]*y_cur[IDX_C9M] - + k[4604]*y_cur[IDX_C9HM] - k[4605]*y_cur[IDX_C9HM] - + k[4639]*y_cur[IDX_CHM] - k[4640]*y_cur[IDX_CHM] - + k[4674]*y_cur[IDX_CNM] - k[4675]*y_cur[IDX_CNM] - + k[4710]*y_cur[IDX_HM] - k[4711]*y_cur[IDX_HM] - + k[4745]*y_cur[IDX_OM] - k[4746]*y_cur[IDX_OM] - + k[4780]*y_cur[IDX_O2M] - k[4781]*y_cur[IDX_O2M] - + k[4815]*y_cur[IDX_OHM] - k[4816]*y_cur[IDX_OHM] - + k[4850]*y_cur[IDX_SM] - k[4851]*y_cur[IDX_SM] - + k[5543]*y_cur[IDX_CH4I] - k[5566]*y_cur[IDX_H2OI] - + k[5630]*y_cur[IDX_CH3OI] - k[5636]*y_cur[IDX_CH2OHI] - + k[5641]*y_cur[IDX_CH3COI] - k[5646]*y_cur[IDX_COOHI] - + k[5652]*y_cur[IDX_COOCH3I] - k[5658]*y_cur[IDX_CH2OHCOI] - + k[5664]*y_cur[IDX_CH2OHCHOI] - k[5670]*y_cur[IDX_CH3COOHI] - k[6183] + - k[6389]*y_cur[IDX_GRAINM]; + data[jistart + 18584] = 0.0 + k[2675]*y_cur[IDX_COI] + k[2700]*y_cur[IDX_HCOOHI]; + data[jistart + 18585] = 0.0 + k[2140]*y_cur[IDX_CH4II] + k[2224]*y_cur[IDX_CH5II] + + k[2283]*y_cur[IDX_CH3CNII] + k[2284]*y_cur[IDX_H2ClII] + + k[2285]*y_cur[IDX_HCO2II] + k[2286]*y_cur[IDX_HNOII] + + k[2287]*y_cur[IDX_HNSiII] + k[2288]*y_cur[IDX_N2HII] + + k[2289]*y_cur[IDX_O2HII] + k[2291]*y_cur[IDX_SiH4II] + + k[2383]*y_cur[IDX_H2II] + k[2507]*y_cur[IDX_H2OII] + + k[2675]*y_cur[IDX_H3II] + k[2854]*y_cur[IDX_HCNII] + + k[3485]*y_cur[IDX_NHII] + k[3777]*y_cur[IDX_OHII]; + data[jistart + 18586] = 0.0 - k[6389]*y_cur[IDX_HCOII]; + data[jistart + 18587] = 0.0 + k[137]*y_cur[IDX_HOCII] + k[2434]*y_cur[IDX_COII]; + data[jistart + 18588] = 0.0 - k[1097]*y_cur[IDX_HCOII]; + data[jistart + 18589] = 0.0 + k[2841]*y_cur[IDX_CO2II]; + data[jistart + 18590] = 0.0 + k[2458]*y_cur[IDX_H2I]; + data[jistart + 18591] = 0.0 - k[2722]*y_cur[IDX_H3II]; + data[jistart + 18592] = 0.0 - k[2759]*y_cur[IDX_H3II]; + data[jistart + 18593] = 0.0 - k[5650]*y_cur[IDX_H3II]; + data[jistart + 18594] = 0.0 - k[2685]*y_cur[IDX_H3II]; + data[jistart + 18595] = 0.0 - k[2748]*y_cur[IDX_H3II]; + data[jistart + 18596] = 0.0 - k[2705]*y_cur[IDX_H3II]; + data[jistart + 18597] = 0.0 - k[2713]*y_cur[IDX_H3II]; + data[jistart + 18598] = 0.0 - k[5656]*y_cur[IDX_H3II]; + data[jistart + 18599] = 0.0 - k[2644]*y_cur[IDX_H3II]; + data[jistart + 18600] = 0.0 - k[2646]*y_cur[IDX_H3II]; + data[jistart + 18601] = 0.0 - k[2687]*y_cur[IDX_H3II]; + data[jistart + 18602] = 0.0 - k[2749]*y_cur[IDX_H3II]; + data[jistart + 18603] = 0.0 - k[2758]*y_cur[IDX_H3II]; + data[jistart + 18604] = 0.0 - k[2672]*y_cur[IDX_H3II] - k[2673]*y_cur[IDX_H3II]; + data[jistart + 18605] = 0.0 - k[2710]*y_cur[IDX_H3II]; + data[jistart + 18606] = 0.0 - k[2745]*y_cur[IDX_H3II]; + data[jistart + 18607] = 0.0 - k[5662]*y_cur[IDX_H3II]; + data[jistart + 18608] = 0.0 - k[2679]*y_cur[IDX_H3II]; + data[jistart + 18609] = 0.0 - k[2695]*y_cur[IDX_H3II] - k[2696]*y_cur[IDX_H3II]; + data[jistart + 18610] = 0.0 - k[2752]*y_cur[IDX_H3II]; + data[jistart + 18611] = 0.0 - k[2640]*y_cur[IDX_H3II]; + data[jistart + 18612] = 0.0 - k[2642]*y_cur[IDX_H3II]; + data[jistart + 18613] = 0.0 - k[2711]*y_cur[IDX_H3II] - k[2712]*y_cur[IDX_H3II]; + data[jistart + 18614] = 0.0 - k[2714]*y_cur[IDX_H3II]; + data[jistart + 18615] = 0.0 - k[2715]*y_cur[IDX_H3II]; + data[jistart + 18616] = 0.0 - k[5640]*y_cur[IDX_H3II]; + data[jistart + 18617] = 0.0 - k[5645]*y_cur[IDX_H3II]; + data[jistart + 18618] = 0.0 - k[2645]*y_cur[IDX_H3II]; + data[jistart + 18619] = 0.0 - k[2693]*y_cur[IDX_H3II]; + data[jistart + 18620] = 0.0 - k[2698]*y_cur[IDX_H3II]; + data[jistart + 18621] = 0.0 - k[2725]*y_cur[IDX_H3II]; + data[jistart + 18622] = 0.0 - k[2735]*y_cur[IDX_H3II]; + data[jistart + 18623] = 0.0 - k[2737]*y_cur[IDX_H3II]; + data[jistart + 18624] = 0.0 - k[2746]*y_cur[IDX_H3II]; + data[jistart + 18625] = 0.0 - k[2747]*y_cur[IDX_H3II]; + data[jistart + 18626] = 0.0 - k[2611]*y_cur[IDX_H3II]; + data[jistart + 18627] = 0.0 - k[2638]*y_cur[IDX_H3II]; + data[jistart + 18628] = 0.0 - k[2701]*y_cur[IDX_H3II]; + data[jistart + 18629] = 0.0 - k[2704]*y_cur[IDX_H3II]; + data[jistart + 18630] = 0.0 - k[2707]*y_cur[IDX_H3II] - k[2708]*y_cur[IDX_H3II]; + data[jistart + 18631] = 0.0 - k[2606]*y_cur[IDX_H3II]; + data[jistart + 18632] = 0.0 - k[2631]*y_cur[IDX_H3II]; + data[jistart + 18633] = 0.0 - k[2643]*y_cur[IDX_H3II]; + data[jistart + 18634] = 0.0 - k[5668]*y_cur[IDX_H3II]; + data[jistart + 18635] = 0.0 - k[2666]*y_cur[IDX_H3II]; + data[jistart + 18636] = 0.0 - k[2683]*y_cur[IDX_H3II]; + data[jistart + 18637] = 0.0 - k[2738]*y_cur[IDX_H3II]; + data[jistart + 18638] = 0.0 - k[2739]*y_cur[IDX_H3II]; + data[jistart + 18639] = 0.0 - k[2607]*y_cur[IDX_H3II]; + data[jistart + 18640] = 0.0 - k[5628]*y_cur[IDX_H3II]; + data[jistart + 18641] = 0.0 - k[2688]*y_cur[IDX_H3II]; + data[jistart + 18642] = 0.0 - k[2703]*y_cur[IDX_H3II]; + data[jistart + 18643] = 0.0 - k[2751]*y_cur[IDX_H3II]; + data[jistart + 18644] = 0.0 - k[2744]*y_cur[IDX_H3II]; + data[jistart + 18645] = 0.0 - k[2599]*y_cur[IDX_H3II]; + data[jistart + 18646] = 0.0 - k[5634]*y_cur[IDX_H3II]; + data[jistart + 18647] = 0.0 - k[2757]*y_cur[IDX_H3II]; + data[jistart + 18648] = 0.0 - k[2702]*y_cur[IDX_H3II]; + data[jistart + 18649] = 0.0 - k[2727]*y_cur[IDX_H3II]; + data[jistart + 18650] = 0.0 - k[2753]*y_cur[IDX_H3II]; + data[jistart + 18651] = 0.0 - k[2605]*y_cur[IDX_H3II]; + data[jistart + 18652] = 0.0 - k[2629]*y_cur[IDX_H3II]; + data[jistart + 18653] = 0.0 - k[2637]*y_cur[IDX_H3II]; + data[jistart + 18654] = 0.0 - k[2692]*y_cur[IDX_H3II]; + data[jistart + 18655] = 0.0 - k[2619]*y_cur[IDX_H3II]; + data[jistart + 18656] = 0.0 - k[2624]*y_cur[IDX_H3II]; + data[jistart + 18657] = 0.0 - k[2699]*y_cur[IDX_H3II] - k[2700]*y_cur[IDX_H3II]; + data[jistart + 18658] = 0.0 - k[2584]*y_cur[IDX_H3II]; + data[jistart + 18659] = 0.0 - k[2633]*y_cur[IDX_H3II]; + data[jistart + 18660] = 0.0 - k[2677]*y_cur[IDX_H3II]; + data[jistart + 18661] = 0.0 - k[2741]*y_cur[IDX_H3II]; + data[jistart + 18662] = 0.0 - k[2750]*y_cur[IDX_H3II]; + data[jistart + 18663] = 0.0 - k[2592]*y_cur[IDX_H3II] - k[2593]*y_cur[IDX_H3II] - + k[2594]*y_cur[IDX_H3II] - k[2595]*y_cur[IDX_H3II] - + k[2596]*y_cur[IDX_H3II]; + data[jistart + 18664] = 0.0 - k[2709]*y_cur[IDX_H3II]; + data[jistart + 18665] = 0.0 - k[2719]*y_cur[IDX_H3II]; + data[jistart + 18666] = 0.0 - k[2754]*y_cur[IDX_H3II]; + data[jistart + 18667] = 0.0 - k[2639]*y_cur[IDX_H3II]; + data[jistart + 18668] = 0.0 - k[3027]*y_cur[IDX_H3II]; + data[jistart + 18669] = 0.0 - k[3767]*y_cur[IDX_H3II] - k[3768]*y_cur[IDX_H3II]; + data[jistart + 18670] = 0.0 - k[2659]*y_cur[IDX_H3II] - k[2660]*y_cur[IDX_H3II] - + k[2661]*y_cur[IDX_H3II] - k[2662]*y_cur[IDX_H3II] - + k[2663]*y_cur[IDX_H3II] - k[2664]*y_cur[IDX_H3II] - + k[2665]*y_cur[IDX_H3II]; + data[jistart + 18671] = 0.0 - k[2626]*y_cur[IDX_H3II]; + data[jistart + 18672] = 0.0 - k[2691]*y_cur[IDX_H3II]; + data[jistart + 18673] = 0.0 - k[2756]*y_cur[IDX_H3II]; + data[jistart + 18674] = 0.0 - k[2755]*y_cur[IDX_H3II]; + data[jistart + 18675] = 0.0 - k[2736]*y_cur[IDX_H3II]; + data[jistart + 18676] = 0.0 - k[2622]*y_cur[IDX_H3II]; + data[jistart + 18677] = 0.0 - k[2651]*y_cur[IDX_H3II] - k[2652]*y_cur[IDX_H3II] - + k[2653]*y_cur[IDX_H3II] - k[2654]*y_cur[IDX_H3II] - + k[2655]*y_cur[IDX_H3II] - k[2656]*y_cur[IDX_H3II] - + k[2657]*y_cur[IDX_H3II]; + data[jistart + 18678] = 0.0 - k[2658]*y_cur[IDX_H3II]; + data[jistart + 18679] = 0.0 - k[2720]*y_cur[IDX_H3II]; + data[jistart + 18680] = 0.0 + k[2468]*y_cur[IDX_H2I]; + data[jistart + 18681] = 0.0 - k[2681]*y_cur[IDX_H3II]; + data[jistart + 18682] = 0.0 - k[2618]*y_cur[IDX_H3II]; + data[jistart + 18683] = 0.0 - k[2614]*y_cur[IDX_H3II]; + data[jistart + 18684] = 0.0 - k[2635]*y_cur[IDX_H3II]; + data[jistart + 18685] = 0.0 - k[2648]*y_cur[IDX_H3II]; + data[jistart + 18686] = 0.0 - k[2602]*y_cur[IDX_H3II]; + data[jistart + 18687] = 0.0 - k[2591]*y_cur[IDX_H3II]; + data[jistart + 18688] = 0.0 - k[2649]*y_cur[IDX_H3II] - k[2650]*y_cur[IDX_H3II]; + data[jistart + 18689] = 0.0 + k[2461]*y_cur[IDX_H2I]; + data[jistart + 18690] = 0.0 - k[4775]*y_cur[IDX_H3II]; + data[jistart + 18691] = 0.0 - k[4634]*y_cur[IDX_H3II]; + data[jistart + 18692] = 0.0 + k[2384]*y_cur[IDX_H2I] + k[2389]*y_cur[IDX_HCOI]; + data[jistart + 18693] = 0.0 - k[2732]*y_cur[IDX_H3II]; + data[jistart + 18694] = 0.0 - k[2734]*y_cur[IDX_H3II]; + data[jistart + 18695] = 0.0 - k[4845]*y_cur[IDX_H3II]; + data[jistart + 18696] = 0.0 - k[4039]*y_cur[IDX_H3II]; + data[jistart + 18697] = 0.0 - k[4214]*y_cur[IDX_H3II]; + data[jistart + 18698] = 0.0 - k[2647]*y_cur[IDX_H3II]; + data[jistart + 18699] = 0.0 - k[4810]*y_cur[IDX_H3II]; + data[jistart + 18700] = 0.0 - k[3969]*y_cur[IDX_H3II]; + data[jistart + 18701] = 0.0 - k[4109]*y_cur[IDX_H3II]; + data[jistart + 18702] = 0.0 - k[2612]*y_cur[IDX_H3II]; + data[jistart + 18703] = 0.0 - k[4389]*y_cur[IDX_H3II]; + data[jistart + 18704] = 0.0 - k[4529]*y_cur[IDX_H3II]; + data[jistart + 18705] = 0.0 - k[4459]*y_cur[IDX_H3II]; + data[jistart + 18706] = 0.0 - k[4599]*y_cur[IDX_H3II]; + data[jistart + 18707] = 0.0 - k[3934]*y_cur[IDX_H3II]; + data[jistart + 18708] = 0.0 - k[4284]*y_cur[IDX_H3II]; + data[jistart + 18709] = 0.0 - k[4319]*y_cur[IDX_H3II]; + data[jistart + 18710] = 0.0 - k[2716]*y_cur[IDX_H3II]; + data[jistart + 18711] = 0.0 - k[3899]*y_cur[IDX_H3II]; + data[jistart + 18712] = 0.0 - k[2678]*y_cur[IDX_H3II]; + data[jistart + 18713] = 0.0 - k[4740]*y_cur[IDX_H3II]; + data[jistart + 18714] = 0.0 - k[4564]*y_cur[IDX_H3II]; + data[jistart + 18715] = 0.0 - k[2667]*y_cur[IDX_H3II] - k[2668]*y_cur[IDX_H3II]; + data[jistart + 18716] = 0.0 - k[4705]*y_cur[IDX_H3II]; + data[jistart + 18717] = 0.0 - k[2689]*y_cur[IDX_H3II]; + data[jistart + 18718] = 0.0 - k[2761]*y_cur[IDX_H3II]; + data[jistart + 18719] = 0.0 - k[4494]*y_cur[IDX_H3II]; + data[jistart + 18720] = 0.0 - k[4004]*y_cur[IDX_H3II]; + data[jistart + 18721] = 0.0 - k[2600]*y_cur[IDX_H3II]; + data[jistart + 18722] = 0.0 - k[4074]*y_cur[IDX_H3II]; + data[jistart + 18723] = 0.0 - k[4179]*y_cur[IDX_H3II]; + data[jistart + 18724] = 0.0 - k[4354]*y_cur[IDX_H3II]; + data[jistart + 18725] = 0.0 - k[4249]*y_cur[IDX_H3II]; + data[jistart + 18726] = 0.0 - k[4424]*y_cur[IDX_H3II]; + data[jistart + 18727] = 0.0 - k[2598]*y_cur[IDX_H3II]; + data[jistart + 18728] = 0.0 - k[2721]*y_cur[IDX_H3II]; + data[jistart + 18729] = 0.0 - k[2609]*y_cur[IDX_H3II]; + data[jistart + 18730] = 0.0 - k[2616]*y_cur[IDX_H3II]; + data[jistart + 18731] = 0.0 - k[4144]*y_cur[IDX_H3II]; + data[jistart + 18732] = 0.0 - k[2604]*y_cur[IDX_H3II]; + data[jistart + 18733] = 0.0 - k[2674]*y_cur[IDX_H3II]; + data[jistart + 18734] = 0.0 - k[2585]*y_cur[IDX_H3II]; + data[jistart + 18735] = 0.0 - k[2630]*y_cur[IDX_H3II]; + data[jistart + 18736] = 0.0 - k[2760]*y_cur[IDX_H3II]; + data[jistart + 18737] = 0.0 - k[2680]*y_cur[IDX_H3II]; + data[jistart + 18738] = 0.0 - k[2717]*y_cur[IDX_H3II]; + data[jistart + 18739] = 0.0 - k[2728]*y_cur[IDX_H3II]; + data[jistart + 18740] = 0.0 - k[2583]*y_cur[IDX_H3II]; + data[jistart + 18741] = 0.0 - k[2627]*y_cur[IDX_H3II]; + data[jistart + 18742] = 0.0 - k[2621]*y_cur[IDX_H3II]; + data[jistart + 18743] = 0.0 - k[2628]*y_cur[IDX_H3II]; + data[jistart + 18744] = 0.0 - k[2625]*y_cur[IDX_H3II]; + data[jistart + 18745] = 0.0 - k[2724]*y_cur[IDX_H3II]; + data[jistart + 18746] = 0.0 - k[2613]*y_cur[IDX_H3II]; + data[jistart + 18747] = 0.0 - k[2617]*y_cur[IDX_H3II]; + data[jistart + 18748] = 0.0 - k[4669]*y_cur[IDX_H3II]; + data[jistart + 18749] = 0.0 - k[2608]*y_cur[IDX_H3II]; + data[jistart + 18750] = 0.0 - k[2742]*y_cur[IDX_H3II]; + data[jistart + 18751] = 0.0 - k[2623]*y_cur[IDX_H3II]; + data[jistart + 18752] = 0.0 - k[2636]*y_cur[IDX_H3II]; + data[jistart + 18753] = 0.0 - k[2620]*y_cur[IDX_H3II]; + data[jistart + 18754] = 0.0 - k[2615]*y_cur[IDX_H3II]; + data[jistart + 18755] = 0.0 - k[2603]*y_cur[IDX_H3II]; + data[jistart + 18756] = 0.0 - k[2601]*y_cur[IDX_H3II]; + data[jistart + 18757] = 0.0 - k[2610]*y_cur[IDX_H3II]; + data[jistart + 18758] = 0.0 - k[2690]*y_cur[IDX_H3II]; + data[jistart + 18759] = 0.0 - k[2634]*y_cur[IDX_H3II]; + data[jistart + 18760] = 0.0 - k[2706]*y_cur[IDX_H3II]; + data[jistart + 18761] = 0.0 - k[2589]*y_cur[IDX_H3II] - k[2590]*y_cur[IDX_H3II]; + data[jistart + 18762] = 0.0 - k[2588]*y_cur[IDX_H3II]; + data[jistart + 18763] = 0.0 - k[2718]*y_cur[IDX_H3II]; + data[jistart + 18764] = 0.0 - k[2729]*y_cur[IDX_H3II]; + data[jistart + 18765] = 0.0 - k[2686]*y_cur[IDX_H3II]; + data[jistart + 18766] = 0.0 - k[2743]*y_cur[IDX_H3II]; + data[jistart + 18767] = 0.0 - k[2726]*y_cur[IDX_H3II]; + data[jistart + 18768] = 0.0 + k[2389]*y_cur[IDX_H2II] - k[2697]*y_cur[IDX_H3II]; + data[jistart + 18769] = 0.0 - k[2669]*y_cur[IDX_H3II]; + data[jistart + 18770] = 0.0 - k[2597]*y_cur[IDX_H3II]; + data[jistart + 18771] = 0.0 - k[2682]*y_cur[IDX_H3II]; + data[jistart + 18772] = 0.0 - k[2694]*y_cur[IDX_H3II]; + data[jistart + 18773] = 0.0 - k[2670]*y_cur[IDX_H3II]; + data[jistart + 18774] = 0.0 - k[2740]*y_cur[IDX_H3II]; + data[jistart + 18775] = 0.0 - k[2586]*y_cur[IDX_H3II]; + data[jistart + 18776] = 0.0 - k[2733]*y_cur[IDX_H3II]; + data[jistart + 18777] = 0.0 - k[2723]*y_cur[IDX_H3II]; + data[jistart + 18778] = 0.0 - k[2587]*y_cur[IDX_H3II]; + data[jistart + 18779] = 0.0 - k[2671]*y_cur[IDX_H3II]; + data[jistart + 18780] = 0.0 - k[2641]*y_cur[IDX_H3II]; + data[jistart + 18781] = 0.0 - k[2730]*y_cur[IDX_H3II] - k[2731]*y_cur[IDX_H3II]; + data[jistart + 18782] = 0.0 - k[2684]*y_cur[IDX_H3II]; + data[jistart + 18783] = 0.0 - k[2632]*y_cur[IDX_H3II]; + data[jistart + 18784] = 0.0 - k[1025]*y_cur[IDX_eM] - k[1026]*y_cur[IDX_eM] - + k[2583]*y_cur[IDX_C10I] - k[2584]*y_cur[IDX_C10H2I] - + k[2585]*y_cur[IDX_C10HI] - k[2586]*y_cur[IDX_C2I] - + k[2587]*y_cur[IDX_C2H2I] - k[2588]*y_cur[IDX_C2H3I] - + k[2589]*y_cur[IDX_C2H4I] - k[2590]*y_cur[IDX_C2H4I] - + k[2591]*y_cur[IDX_C2H5I] - k[2592]*y_cur[IDX_C2H5OHI] - + k[2593]*y_cur[IDX_C2H5OHI] - k[2594]*y_cur[IDX_C2H5OHI] - + k[2595]*y_cur[IDX_C2H5OHI] - k[2596]*y_cur[IDX_C2H5OHI] - + k[2597]*y_cur[IDX_C2HI] - k[2598]*y_cur[IDX_C2NI] - + k[2599]*y_cur[IDX_C2OI] - k[2600]*y_cur[IDX_C2SI] - + k[2601]*y_cur[IDX_C3I] - k[2602]*y_cur[IDX_C3H2I] - + k[2603]*y_cur[IDX_C3HI] - k[2604]*y_cur[IDX_C3NI] - + k[2605]*y_cur[IDX_C3OI] - k[2606]*y_cur[IDX_C3PI] - + k[2607]*y_cur[IDX_C3SI] - k[2608]*y_cur[IDX_C4I] - + k[2609]*y_cur[IDX_C4H3I] - k[2610]*y_cur[IDX_C4HI] - + k[2611]*y_cur[IDX_C4PI] - k[2612]*y_cur[IDX_C4SI] - + k[2613]*y_cur[IDX_C5I] - k[2614]*y_cur[IDX_C5H2I] - + k[2615]*y_cur[IDX_C5HI] - k[2616]*y_cur[IDX_C5NI] - + k[2617]*y_cur[IDX_C6I] - k[2618]*y_cur[IDX_C6H2I] - + k[2619]*y_cur[IDX_C6H6I] - k[2620]*y_cur[IDX_C6HI] - + k[2621]*y_cur[IDX_C7I] - k[2622]*y_cur[IDX_C7H2I] - + k[2623]*y_cur[IDX_C7HI] - k[2624]*y_cur[IDX_C7NI] - + k[2625]*y_cur[IDX_C8I] - k[2626]*y_cur[IDX_C8H2I] - + k[2627]*y_cur[IDX_C8HI] - k[2628]*y_cur[IDX_C9I] - + k[2629]*y_cur[IDX_C9H2I] - k[2630]*y_cur[IDX_C9HI] - + k[2631]*y_cur[IDX_C9NI] - k[2632]*y_cur[IDX_CI] - + k[2633]*y_cur[IDX_CCPI] - k[2634]*y_cur[IDX_CH2I] - + k[2635]*y_cur[IDX_CH2CCH2I] - k[2636]*y_cur[IDX_CH2CCHI] - + k[2637]*y_cur[IDX_CH2CHCNI] - k[2638]*y_cur[IDX_CH2CNI] - + k[2639]*y_cur[IDX_CH2COI] - k[2640]*y_cur[IDX_CH2PHI] - + k[2641]*y_cur[IDX_CH3I] - k[2642]*y_cur[IDX_CH3C3NI] - + k[2643]*y_cur[IDX_CH3C4HI] - k[2644]*y_cur[IDX_CH3C5NI] - + k[2645]*y_cur[IDX_CH3C6HI] - k[2646]*y_cur[IDX_CH3C7NI] - + k[2647]*y_cur[IDX_CH3CCHI] - k[2648]*y_cur[IDX_C2H6I] - + k[2649]*y_cur[IDX_CH3CHCH2I] - k[2650]*y_cur[IDX_CH3CHCH2I] - + k[2651]*y_cur[IDX_CH3CHOI] - k[2652]*y_cur[IDX_CH3CHOI] - + k[2653]*y_cur[IDX_CH3CHOI] - k[2654]*y_cur[IDX_CH3CHOI] - + k[2655]*y_cur[IDX_CH3CHOI] - k[2656]*y_cur[IDX_CH3CHOI] - + k[2657]*y_cur[IDX_CH3CHOI] - k[2658]*y_cur[IDX_CH3CNI] - + k[2659]*y_cur[IDX_CH3COCH3I] - k[2660]*y_cur[IDX_CH3COCH3I] - + k[2661]*y_cur[IDX_CH3COCH3I] - k[2662]*y_cur[IDX_CH3COCH3I] - + k[2663]*y_cur[IDX_CH3COCH3I] - k[2664]*y_cur[IDX_CH3COCH3I] - + k[2665]*y_cur[IDX_CH3COCH3I] - k[2666]*y_cur[IDX_CH3OCH3I] - + k[2667]*y_cur[IDX_CH3OHI] - k[2668]*y_cur[IDX_CH3OHI] - + k[2669]*y_cur[IDX_CH4I] - k[2670]*y_cur[IDX_CHI] - + k[2671]*y_cur[IDX_CNI] - k[2672]*y_cur[IDX_CNOI] - + k[2673]*y_cur[IDX_CNOI] - k[2674]*y_cur[IDX_CO2I] - + k[2675]*y_cur[IDX_COI] - k[2676]*y_cur[IDX_COI] - + k[2677]*y_cur[IDX_CPI] - k[2678]*y_cur[IDX_CSI] - + k[2679]*y_cur[IDX_ClI] - k[2680]*y_cur[IDX_FeI] - + k[2681]*y_cur[IDX_H2CCCI] - k[2682]*y_cur[IDX_H2COI] - + k[2683]*y_cur[IDX_H2CSI] - k[2684]*y_cur[IDX_H2OI] - + k[2685]*y_cur[IDX_H2S2I] - k[2686]*y_cur[IDX_H2SI] - + k[2687]*y_cur[IDX_H2SiOI] - k[2688]*y_cur[IDX_HC2PI] - + k[2689]*y_cur[IDX_HC3NI] - k[2690]*y_cur[IDX_C4H2I] - + k[2691]*y_cur[IDX_HC5NI] - k[2692]*y_cur[IDX_HC7NI] - + k[2693]*y_cur[IDX_HC9NI] - k[2694]*y_cur[IDX_HCNI] - + k[2695]*y_cur[IDX_HCNOI] - k[2696]*y_cur[IDX_HCNOI] - + k[2697]*y_cur[IDX_HCOI] - k[2698]*y_cur[IDX_HCOOCH3I] - + k[2699]*y_cur[IDX_HCOOHI] - k[2700]*y_cur[IDX_HCOOHI] - + k[2701]*y_cur[IDX_HCPI] - k[2702]*y_cur[IDX_HCSI] - + k[2703]*y_cur[IDX_HCSiI] - k[2704]*y_cur[IDX_HClI] - + k[2705]*y_cur[IDX_HFI] - k[2706]*y_cur[IDX_HNCI] - + k[2707]*y_cur[IDX_HNCOI] - k[2708]*y_cur[IDX_HNCOI] - + k[2709]*y_cur[IDX_HNOI] - k[2710]*y_cur[IDX_HNSiI] - + k[2711]*y_cur[IDX_HOCNI] - k[2712]*y_cur[IDX_HOCNI] - + k[2713]*y_cur[IDX_HONCI] - k[2714]*y_cur[IDX_HPOI] - + k[2715]*y_cur[IDX_HS2I] - k[2716]*y_cur[IDX_HSI] - + k[2717]*y_cur[IDX_MgI] - k[2718]*y_cur[IDX_N2I] - + k[2719]*y_cur[IDX_N2OI] - k[2720]*y_cur[IDX_NCCNI] - + k[2721]*y_cur[IDX_NH2I] - k[2722]*y_cur[IDX_NH2CNI] - + k[2723]*y_cur[IDX_NH3I] - k[2724]*y_cur[IDX_NHI] - + k[2725]*y_cur[IDX_NO2I] - k[2726]*y_cur[IDX_NOI] - + k[2727]*y_cur[IDX_NSI] - k[2728]*y_cur[IDX_NaI] - + k[2729]*y_cur[IDX_O2I] - k[2730]*y_cur[IDX_OI] - + k[2731]*y_cur[IDX_OI] - k[2732]*y_cur[IDX_OCSI] - + k[2733]*y_cur[IDX_OHI] - k[2734]*y_cur[IDX_PI] - + k[2735]*y_cur[IDX_PH2I] - k[2736]*y_cur[IDX_PHI] - + k[2737]*y_cur[IDX_PNI] - k[2738]*y_cur[IDX_POI] - + k[2739]*y_cur[IDX_S2I] - k[2740]*y_cur[IDX_SI] - + k[2741]*y_cur[IDX_SO2I] - k[2742]*y_cur[IDX_SOI] - + k[2743]*y_cur[IDX_SiI] - k[2744]*y_cur[IDX_SiC2I] - + k[2745]*y_cur[IDX_SiC2H2I] - k[2746]*y_cur[IDX_SiC2HI] - + k[2747]*y_cur[IDX_SiC3I] - k[2748]*y_cur[IDX_SiC3HI] - + k[2749]*y_cur[IDX_SiC4I] - k[2750]*y_cur[IDX_SiCI] - + k[2751]*y_cur[IDX_SiCH2I] - k[2752]*y_cur[IDX_SiCH3I] - + k[2753]*y_cur[IDX_SiH2I] - k[2754]*y_cur[IDX_SiH3I] - + k[2755]*y_cur[IDX_SiH4I] - k[2756]*y_cur[IDX_SiHI] - + k[2757]*y_cur[IDX_SiNI] - k[2758]*y_cur[IDX_SiNCI] - + k[2759]*y_cur[IDX_SiO2I] - k[2760]*y_cur[IDX_SiOI] - + k[2761]*y_cur[IDX_SiSI] - k[3027]*y_cur[IDX_HNC3I] - + k[3767]*y_cur[IDX_OCNI] - k[3768]*y_cur[IDX_OCNI] - + k[3899]*y_cur[IDX_CM] - k[3934]*y_cur[IDX_C10M] - + k[3969]*y_cur[IDX_C10HM] - k[4004]*y_cur[IDX_C2M] - + k[4039]*y_cur[IDX_C2HM] - k[4074]*y_cur[IDX_C3M] - + k[4109]*y_cur[IDX_C3HM] - k[4144]*y_cur[IDX_C3NM] - + k[4179]*y_cur[IDX_C4M] - k[4214]*y_cur[IDX_C4HM] - + k[4249]*y_cur[IDX_C5M] - k[4284]*y_cur[IDX_C5HM] - + k[4319]*y_cur[IDX_C5NM] - k[4354]*y_cur[IDX_C6M] - + k[4389]*y_cur[IDX_C6HM] - k[4424]*y_cur[IDX_C7M] - + k[4459]*y_cur[IDX_C7HM] - k[4494]*y_cur[IDX_C8M] - + k[4529]*y_cur[IDX_C8HM] - k[4564]*y_cur[IDX_C9M] - + k[4599]*y_cur[IDX_C9HM] - k[4634]*y_cur[IDX_CHM] - + k[4669]*y_cur[IDX_CNM] - k[4705]*y_cur[IDX_HM] - + k[4740]*y_cur[IDX_OM] - k[4775]*y_cur[IDX_O2M] - + k[4810]*y_cur[IDX_OHM] - k[4845]*y_cur[IDX_SM] - + k[5628]*y_cur[IDX_CH3OI] - k[5634]*y_cur[IDX_CH2OHI] - + k[5640]*y_cur[IDX_CH3COI] - k[5645]*y_cur[IDX_COOHI] - + k[5650]*y_cur[IDX_COOCH3I] - k[5656]*y_cur[IDX_CH2OHCOI] - + k[5662]*y_cur[IDX_CH2OHCHOI] - k[5668]*y_cur[IDX_CH3COOHI] - k[6168] + - k[6169] - k[6310]*y_cur[IDX_GRAINM] - k[6311]*y_cur[IDX_GRAINM]; + data[jistart + 18785] = 0.0 - k[2675]*y_cur[IDX_H3II] - k[2676]*y_cur[IDX_H3II]; + data[jistart + 18786] = 0.0 - k[6310]*y_cur[IDX_H3II] - k[6311]*y_cur[IDX_H3II]; + data[jistart + 18787] = 0.0 + k[2384]*y_cur[IDX_H2II] + k[2458]*y_cur[IDX_HeHII] + + k[2461]*y_cur[IDX_NHII] + k[2468]*y_cur[IDX_O2HII]; + data[jistart + 18788] = 0.0 - k[1025]*y_cur[IDX_H3II] - k[1026]*y_cur[IDX_H3II]; + data[jistart + 18789] = 0.0 + k[5942]; + data[jistart + 18790] = 0.0 + k[797]*y_cur[IDX_eM] + k[6656]*y_cur[IDX_GRAINM]; + data[jistart + 18791] = 0.0 + k[1270]*y_cur[IDX_eM] + k[1271]*y_cur[IDX_eM] + + k[6694]*y_cur[IDX_GRAINM] + k[6695]*y_cur[IDX_GRAINM]; + data[jistart + 18792] = 0.0 + k[1009]*y_cur[IDX_eM] + k[6539]*y_cur[IDX_GRAINM]; + data[jistart + 18793] = 0.0 + k[1125]*y_cur[IDX_eM] + k[6390]*y_cur[IDX_GRAINM]; + data[jistart + 18794] = 0.0 + k[785]*y_cur[IDX_eM] + k[6474]*y_cur[IDX_GRAINM]; + data[jistart + 18795] = 0.0 + k[1272]*y_cur[IDX_eM] + k[1273]*y_cur[IDX_eM] + + k[1274]*y_cur[IDX_eM] + k[6696]*y_cur[IDX_GRAINM] + + k[6697]*y_cur[IDX_GRAINM] + k[6698]*y_cur[IDX_GRAINM]; + data[jistart + 18796] = 0.0 + k[2492]*y_cur[IDX_H2COI]; + data[jistart + 18797] = 0.0 + k[5379]*y_cur[IDX_OI]; + data[jistart + 18798] = 0.0 + k[1284]*y_cur[IDX_eM] + k[6711]*y_cur[IDX_GRAINM]; + data[jistart + 18799] = 0.0 - k[2284]*y_cur[IDX_COI]; + data[jistart + 18800] = 0.0 + k[5363]*y_cur[IDX_OI]; + data[jistart + 18801] = 0.0 + k[1290]*y_cur[IDX_eM] + k[1291]*y_cur[IDX_eM] + + k[6731]*y_cur[IDX_GRAINM] + k[6732]*y_cur[IDX_GRAINM]; + data[jistart + 18802] = 0.0 + k[2980]*y_cur[IDX_HCOII]; + data[jistart + 18803] = 0.0 + k[1116]*y_cur[IDX_eM] + k[6522]*y_cur[IDX_GRAINM]; + data[jistart + 18804] = 0.0 - k[2291]*y_cur[IDX_COI]; + data[jistart + 18805] = 0.0 + k[3004]*y_cur[IDX_HCOII]; + data[jistart + 18806] = 0.0 + k[5652]*y_cur[IDX_HCOII] + k[5654]*y_cur[IDX_HeII] + k[5943] + + k[6293]; + data[jistart + 18807] = 0.0 + k[982]*y_cur[IDX_eM] + k[6699]*y_cur[IDX_GRAINM]; + data[jistart + 18808] = 0.0 + k[5342]*y_cur[IDX_OI]; + data[jistart + 18809] = 0.0 + k[815]*y_cur[IDX_eM] + k[6644]*y_cur[IDX_GRAINM]; + data[jistart + 18810] = 0.0 + k[1276]*y_cur[IDX_eM] + k[6702]*y_cur[IDX_GRAINM]; + data[jistart + 18811] = 0.0 + k[2960]*y_cur[IDX_HCOII]; + data[jistart + 18812] = 0.0 - k[2287]*y_cur[IDX_COI]; + data[jistart + 18813] = 0.0 + k[1176]*y_cur[IDX_eM] + k[6495]*y_cur[IDX_GRAINM]; + data[jistart + 18814] = 0.0 - k[2283]*y_cur[IDX_COI]; + data[jistart + 18815] = 0.0 + k[2995]*y_cur[IDX_HCOII]; + data[jistart + 18816] = 0.0 + k[951]*y_cur[IDX_eM] + k[6684]*y_cur[IDX_GRAINM]; + data[jistart + 18817] = 0.0 + k[3731]*y_cur[IDX_OI]; + data[jistart + 18818] = 0.0 - k[2290]*y_cur[IDX_COI]; + data[jistart + 18819] = 0.0 + k[5658]*y_cur[IDX_HCOII] + k[5659]*y_cur[IDX_HeII] + k[5944] + + k[6294]; + data[jistart + 18820] = 0.0 + k[2945]*y_cur[IDX_HCOII]; + data[jistart + 18821] = 0.0 + k[2947]*y_cur[IDX_HCOII]; + data[jistart + 18822] = 0.0 + k[2962]*y_cur[IDX_HCOII]; + data[jistart + 18823] = 0.0 + k[1057]*y_cur[IDX_eM] + k[1058]*y_cur[IDX_eM] + + k[6488]*y_cur[IDX_GRAINM] + k[6489]*y_cur[IDX_GRAINM]; + data[jistart + 18824] = 0.0 + k[3737]*y_cur[IDX_OI]; + data[jistart + 18825] = 0.0 + k[2996]*y_cur[IDX_HCOII] + k[5442]*y_cur[IDX_OI]; + data[jistart + 18826] = 0.0 + k[3003]*y_cur[IDX_HCOII] + k[5452]*y_cur[IDX_OI]; + data[jistart + 18827] = 0.0 + k[3762]*y_cur[IDX_OI]; + data[jistart + 18828] = 0.0 + k[5389]*y_cur[IDX_OI]; + data[jistart + 18829] = 0.0 + k[2974]*y_cur[IDX_HCOII]; + data[jistart + 18830] = 0.0 + k[2992]*y_cur[IDX_HCOII]; + data[jistart + 18831] = 0.0 + k[5664]*y_cur[IDX_HCOII]; + data[jistart + 18832] = 0.0 + k[5203]*y_cur[IDX_OI]; + data[jistart + 18833] = 0.0 + k[2999]*y_cur[IDX_HCOII]; + data[jistart + 18834] = 0.0 + k[2533]*y_cur[IDX_H2OI]; + data[jistart + 18835] = 0.0 + k[920]*y_cur[IDX_eM] + k[6494]*y_cur[IDX_GRAINM]; + data[jistart + 18836] = 0.0 + k[2942]*y_cur[IDX_HCOII] + k[5384]*y_cur[IDX_OI]; + data[jistart + 18837] = 0.0 + k[2943]*y_cur[IDX_HCOII]; + data[jistart + 18838] = 0.0 + k[5215]*y_cur[IDX_CI]; + data[jistart + 18839] = 0.0 + k[2975]*y_cur[IDX_HCOII] + k[4964]*y_cur[IDX_CI]; + data[jistart + 18840] = 0.0 + k[2976]*y_cur[IDX_HCOII]; + data[jistart + 18841] = 0.0 + k[5641]*y_cur[IDX_HCOII] + k[5642]*y_cur[IDX_HeII] + k[5938] + + k[6291]; + data[jistart + 18842] = 0.0 + k[5646]*y_cur[IDX_HCOII] + k[5648]*y_cur[IDX_HeII] + k[5939] + + k[6292]; + data[jistart + 18843] = 0.0 + k[2946]*y_cur[IDX_HCOII]; + data[jistart + 18844] = 0.0 + k[2968]*y_cur[IDX_HCOII]; + data[jistart + 18845] = 0.0 + k[2970]*y_cur[IDX_HCOII]; + data[jistart + 18846] = 0.0 - k[5129]*y_cur[IDX_COI]; + data[jistart + 18847] = 0.0 + k[2984]*y_cur[IDX_HCOII]; + data[jistart + 18848] = 0.0 + k[2986]*y_cur[IDX_HCOII]; + data[jistart + 18849] = 0.0 + k[2993]*y_cur[IDX_HCOII]; + data[jistart + 18850] = 0.0 + k[2994]*y_cur[IDX_HCOII] + k[5441]*y_cur[IDX_OI]; + data[jistart + 18851] = 0.0 + k[2916]*y_cur[IDX_HCOII] + k[5364]*y_cur[IDX_OI]; + data[jistart + 18852] = 0.0 + k[2972]*y_cur[IDX_HCOII] + k[5407]*y_cur[IDX_OI]; + data[jistart + 18853] = 0.0 + k[2348]*y_cur[IDX_HII] + k[5214]*y_cur[IDX_CI] + k[5868] + + k[6199]; + data[jistart + 18854] = 0.0 + k[2911]*y_cur[IDX_HCOII] + k[5360]*y_cur[IDX_OI]; + data[jistart + 18855] = 0.0 + k[2936]*y_cur[IDX_HCOII]; + data[jistart + 18856] = 0.0 + k[2944]*y_cur[IDX_HCOII]; + data[jistart + 18857] = 0.0 + k[5670]*y_cur[IDX_HCOII]; + data[jistart + 18858] = 0.0 + k[2953]*y_cur[IDX_HCOII]; + data[jistart + 18859] = 0.0 + k[2959]*y_cur[IDX_HCOII]; + data[jistart + 18860] = 0.0 + k[2987]*y_cur[IDX_HCOII]; + data[jistart + 18861] = 0.0 + k[2988]*y_cur[IDX_HCOII]; + data[jistart + 18862] = 0.0 + k[2912]*y_cur[IDX_HCOII]; + data[jistart + 18863] = 0.0 + k[2941]*y_cur[IDX_HCOII]; + data[jistart + 18864] = 0.0 + k[5630]*y_cur[IDX_HCOII]; + data[jistart + 18865] = 0.0 + k[2963]*y_cur[IDX_HCOII] + k[5401]*y_cur[IDX_OI]; + data[jistart + 18866] = 0.0 + k[2973]*y_cur[IDX_HCOII]; + data[jistart + 18867] = 0.0 + k[2998]*y_cur[IDX_HCOII]; + data[jistart + 18868] = 0.0 + k[3680]*y_cur[IDX_OI]; + data[jistart + 18869] = 0.0 + k[1179]*y_cur[IDX_eM] + k[6708]*y_cur[IDX_GRAINM]; + data[jistart + 18870] = 0.0 + k[2991]*y_cur[IDX_HCOII] + k[5440]*y_cur[IDX_OI]; + data[jistart + 18871] = 0.0 + k[2904]*y_cur[IDX_HCOII] + k[3090]*y_cur[IDX_HeII] + + k[4918]*y_cur[IDX_CI] + k[5230]*y_cur[IDX_NI] + + k[5354]*y_cur[IDX_OI] + k[5354]*y_cur[IDX_OI] + + k[5485]*y_cur[IDX_SI] + k[5713] + k[5998]; + data[jistart + 18872] = 0.0 + k[5636]*y_cur[IDX_HCOII]; + data[jistart + 18873] = 0.0 + k[5408]*y_cur[IDX_OI]; + data[jistart + 18874] = 0.0 + k[2981]*y_cur[IDX_HCOII]; + data[jistart + 18875] = 0.0 + k[3000]*y_cur[IDX_HCOII]; + data[jistart + 18876] = 0.0 + k[1313]*y_cur[IDX_CII] + k[2910]*y_cur[IDX_HCOII] + + k[3100]*y_cur[IDX_HeII] + k[4922]*y_cur[IDX_CI] + + k[5359]*y_cur[IDX_OI] + k[5723] + k[6007]; + data[jistart + 18877] = 0.0 + k[2934]*y_cur[IDX_HCOII]; + data[jistart + 18878] = 0.0 + k[2939]*y_cur[IDX_HCOII]; + data[jistart + 18879] = 0.0 + k[942]*y_cur[IDX_eM] + k[6564]*y_cur[IDX_GRAINM]; + data[jistart + 18880] = 0.0 + k[949]*y_cur[IDX_eM] + k[6519]*y_cur[IDX_GRAINM]; + data[jistart + 18881] = 0.0 + k[2967]*y_cur[IDX_HCOII]; + data[jistart + 18882] = 0.0 + k[2924]*y_cur[IDX_HCOII]; + data[jistart + 18883] = 0.0 + k[2929]*y_cur[IDX_HCOII]; + data[jistart + 18884] = 0.0 + k[2699]*y_cur[IDX_H3II] + k[2971]*y_cur[IDX_HCOII]; + data[jistart + 18885] = 0.0 + k[2900]*y_cur[IDX_HCOII]; + data[jistart + 18886] = 0.0 + k[2937]*y_cur[IDX_HCOII] + k[5378]*y_cur[IDX_OI]; + data[jistart + 18887] = 0.0 + k[2955]*y_cur[IDX_HCOII] + k[5391]*y_cur[IDX_OI]; + data[jistart + 18888] = 0.0 - k[5131]*y_cur[IDX_COI]; + data[jistart + 18889] = 0.0 + k[1427]*y_cur[IDX_CII] + k[4985]*y_cur[IDX_CI]; + data[jistart + 18890] = 0.0 + k[2997]*y_cur[IDX_HCOII] + k[5443]*y_cur[IDX_OI]; + data[jistart + 18891] = 0.0 + k[2903]*y_cur[IDX_HCOII]; + data[jistart + 18892] = 0.0 - k[5127]*y_cur[IDX_COI]; + data[jistart + 18893] = 0.0 + k[2978]*y_cur[IDX_HCOII] - k[5128]*y_cur[IDX_COI]; + data[jistart + 18894] = 0.0 + k[2940]*y_cur[IDX_HCOII] + k[3172]*y_cur[IDX_HeII] + + k[5157]*y_cur[IDX_HI] + k[5790] + k[6092]; + data[jistart + 18895] = 0.0 + k[3029]*y_cur[IDX_HCOII]; + data[jistart + 18896] = 0.0 + k[4979]*y_cur[IDX_CI] + k[5195]*y_cur[IDX_HI] + + k[5332]*y_cur[IDX_NOI] + k[5336]*y_cur[IDX_O2I] + + k[5428]*y_cur[IDX_OI]; + data[jistart + 18897] = 0.0 + k[2664]*y_cur[IDX_H3II] + k[2952]*y_cur[IDX_HCOII] + k[5813] + + k[6117]; + data[jistart + 18898] = 0.0 + k[2931]*y_cur[IDX_HCOII]; + data[jistart + 18899] = 0.0 + k[981]*y_cur[IDX_eM] + k[3730]*y_cur[IDX_OI] + + k[6540]*y_cur[IDX_GRAINM]; + data[jistart + 18900] = 0.0 + k[2966]*y_cur[IDX_HCOII]; + data[jistart + 18901] = 0.0 + k[3002]*y_cur[IDX_HCOII]; + data[jistart + 18902] = 0.0 + k[3001]*y_cur[IDX_HCOII]; + data[jistart + 18903] = 0.0 + k[2985]*y_cur[IDX_HCOII]; + data[jistart + 18904] = 0.0 + k[2927]*y_cur[IDX_HCOII]; + data[jistart + 18905] = 0.0 + k[7100] + k[7282] + k[7464]; + data[jistart + 18906] = 0.0 + k[1099]*y_cur[IDX_eM] + k[1100]*y_cur[IDX_eM] - + k[2285]*y_cur[IDX_COI] + k[6567]*y_cur[IDX_GRAINM] + k[6568]*y_cur[IDX_GRAINM]; - data[jistart + 14765] = 0.0 + k[3252]*y_cur[IDX_HeII]; - data[jistart + 14766] = 0.0 + k[3666]*y_cur[IDX_O2II]; - data[jistart + 14767] = 0.0 + k[3049]*y_cur[IDX_CO2I]; - data[jistart + 14768] = 0.0 + k[3252]*y_cur[IDX_HCOOCH3I] + - k[5673]*y_cur[IDX_CH3COOHI]; - data[jistart + 14769] = 0.0 + k[3372]*y_cur[IDX_CO2I]; - data[jistart + 14770] = 0.0 + k[3482]*y_cur[IDX_CO2I]; - data[jistart + 14771] = 0.0 - k[3585]*y_cur[IDX_HCO2II]; - data[jistart + 14772] = 0.0 - k[3736]*y_cur[IDX_HCO2II]; - data[jistart + 14773] = 0.0 + k[3666]*y_cur[IDX_HCOOHI]; - data[jistart + 14774] = 0.0 + k[3677]*y_cur[IDX_CO2I]; - data[jistart + 14775] = 0.0 + k[3802]*y_cur[IDX_HCOII]; - data[jistart + 14776] = 0.0 + k[3776]*y_cur[IDX_CO2I]; - data[jistart + 14777] = 0.0 - k[1098]*y_cur[IDX_HCO2II] - - k[1099]*y_cur[IDX_HCO2II] - k[1100]*y_cur[IDX_HCO2II]; - data[jistart + 14778] = 0.0 - k[179]*y_cur[IDX_HCOOCH3I]; - data[jistart + 14779] = 0.0 + k[8759]*y_cur[IDX_GHCOI]; - data[jistart + 14780] = 0.0 + k[8651]*y_cur[IDX_GHI]; - data[jistart + 14781] = 0.0 + k[8651]*y_cur[IDX_GCOOCH3I]; - data[jistart + 14782] = 0.0 + k[8759]*y_cur[IDX_GCH3OI]; - data[jistart + 14783] = 0.0 + k[7203] + k[7385] + k[7569]; - data[jistart + 14784] = 0.0 + k[6726]*y_cur[IDX_H5C2O2II]; - data[jistart + 14785] = 0.0 - k[390]*y_cur[IDX_HCOOCH3I]; - data[jistart + 14786] = 0.0 - k[2698]*y_cur[IDX_HCOOCH3I]; - data[jistart + 14787] = 0.0 - k[2807]*y_cur[IDX_HCOOCH3I]; - data[jistart + 14788] = 0.0 + k[1054]*y_cur[IDX_eM] + - k[6726]*y_cur[IDX_GRAINM]; - data[jistart + 14789] = 0.0 - k[2970]*y_cur[IDX_HCOOCH3I]; - data[jistart + 14790] = 0.0 - k[179]*y_cur[IDX_CII] - - k[390]*y_cur[IDX_HII] - k[2698]*y_cur[IDX_H3II] - - k[2807]*y_cur[IDX_H3OII] - k[2970]*y_cur[IDX_HCOII] - - k[3252]*y_cur[IDX_HeII] - k[5858] - k[5859] - k[6186] - k[7021]; - data[jistart + 14791] = 0.0 - k[3252]*y_cur[IDX_HCOOCH3I]; - data[jistart + 14792] = 0.0 + k[1054]*y_cur[IDX_H5C2O2II]; - data[jistart + 14793] = 0.0 + k[179]*y_cur[IDX_HCOOCH3I]; - data[jistart + 14794] = 0.0 + k[5650]*y_cur[IDX_H3II] + - k[5651]*y_cur[IDX_H3OII] + k[5652]*y_cur[IDX_HCOII]; - data[jistart + 14795] = 0.0 - k[6699]*y_cur[IDX_HCOOCH3II] - - k[6700]*y_cur[IDX_HCOOCH3II]; - data[jistart + 14796] = 0.0 + k[390]*y_cur[IDX_HCOOCH3I]; - data[jistart + 14797] = 0.0 + k[5650]*y_cur[IDX_COOCH3I]; - data[jistart + 14798] = 0.0 + k[5651]*y_cur[IDX_COOCH3I]; - data[jistart + 14799] = 0.0 + k[5652]*y_cur[IDX_COOCH3I]; - data[jistart + 14800] = 0.0 + k[179]*y_cur[IDX_CII] + - k[390]*y_cur[IDX_HII] + k[5859]; - data[jistart + 14801] = 0.0 - k[982]*y_cur[IDX_eM] - - k[983]*y_cur[IDX_eM] - k[6699]*y_cur[IDX_GRAINM] - - k[6700]*y_cur[IDX_GRAINM]; - data[jistart + 14802] = 0.0 - k[982]*y_cur[IDX_HCOOCH3II] - - k[983]*y_cur[IDX_HCOOCH3II]; - data[jistart + 14803] = 0.0 + k[3658]*y_cur[IDX_O2II]; - data[jistart + 14804] = 0.0 + k[2113]*y_cur[IDX_HCOOH2II]; - data[jistart + 14805] = 0.0 + k[2117]*y_cur[IDX_HCOOH2II]; - data[jistart + 14806] = 0.0 + k[2127]*y_cur[IDX_HCOOH2II]; - data[jistart + 14807] = 0.0 - k[2120]*y_cur[IDX_HCOOHI]; - data[jistart + 14808] = 0.0 + k[8628]*y_cur[IDX_GHI]; - data[jistart + 14809] = 0.0 + k[8628]*y_cur[IDX_GCOOHI]; - data[jistart + 14810] = 0.0 + k[8740]*y_cur[IDX_GOHI]; - data[jistart + 14811] = 0.0 + k[7168] + k[7350] + k[7532]; - data[jistart + 14812] = 0.0 + k[8740]*y_cur[IDX_GHCOI]; - data[jistart + 14813] = 0.0 + k[6611]*y_cur[IDX_HCOOH2II]; - data[jistart + 14814] = 0.0 + k[5466]*y_cur[IDX_OHI]; - data[jistart + 14815] = 0.0 + k[2549]*y_cur[IDX_HCOOH2II]; - data[jistart + 14816] = 0.0 - k[2699]*y_cur[IDX_HCOOHI] - - k[2700]*y_cur[IDX_HCOOHI]; - data[jistart + 14817] = 0.0 - k[2765]*y_cur[IDX_HCOOHI]; - data[jistart + 14818] = 0.0 - k[2971]*y_cur[IDX_HCOOHI]; - data[jistart + 14819] = 0.0 - k[675]*y_cur[IDX_O2II] - - k[2120]*y_cur[IDX_CH3OH2II] - k[2699]*y_cur[IDX_H3II] - - k[2700]*y_cur[IDX_H3II] - k[2765]*y_cur[IDX_H3COII] - - k[2971]*y_cur[IDX_HCOII] - k[3666]*y_cur[IDX_O2II] - k[5860] - - k[6187] - k[6188] - k[6986]; - data[jistart + 14820] = 0.0 + k[1104]*y_cur[IDX_eM] + - k[2113]*y_cur[IDX_CH3CHOI] + k[2117]*y_cur[IDX_CH3CNI] + - k[2127]*y_cur[IDX_CH3OHI] + k[2549]*y_cur[IDX_H2OI] + - k[3586]*y_cur[IDX_NH3I] + k[6611]*y_cur[IDX_GRAINM]; - data[jistart + 14821] = 0.0 + k[3586]*y_cur[IDX_HCOOH2II]; - data[jistart + 14822] = 0.0 - k[675]*y_cur[IDX_HCOOHI] + - k[3658]*y_cur[IDX_CH3CHCH2I] - k[3666]*y_cur[IDX_HCOOHI]; - data[jistart + 14823] = 0.0 + k[5466]*y_cur[IDX_H2COI]; - data[jistart + 14824] = 0.0 + k[1104]*y_cur[IDX_HCOOH2II]; - data[jistart + 14825] = 0.0 + k[5645]*y_cur[IDX_H3II] + - k[5646]*y_cur[IDX_HCOII]; - data[jistart + 14826] = 0.0 - k[6574]*y_cur[IDX_HCOOHII] - - k[6575]*y_cur[IDX_HCOOHII]; - data[jistart + 14827] = 0.0 + k[5645]*y_cur[IDX_COOHI]; - data[jistart + 14828] = 0.0 + k[5646]*y_cur[IDX_COOHI]; - data[jistart + 14829] = 0.0 + k[675]*y_cur[IDX_O2II] + k[6188]; - data[jistart + 14830] = 0.0 - k[1101]*y_cur[IDX_eM] - - k[1102]*y_cur[IDX_eM] - k[6574]*y_cur[IDX_GRAINM] - - k[6575]*y_cur[IDX_GRAINM]; - data[jistart + 14831] = 0.0 + k[675]*y_cur[IDX_HCOOHI]; - data[jistart + 14832] = 0.0 - k[1101]*y_cur[IDX_HCOOHII] - - k[1102]*y_cur[IDX_HCOOHII]; - data[jistart + 14833] = 0.0 - k[2113]*y_cur[IDX_HCOOH2II]; - data[jistart + 14834] = 0.0 - k[2117]*y_cur[IDX_HCOOH2II]; - data[jistart + 14835] = 0.0 - k[2127]*y_cur[IDX_HCOOH2II]; - data[jistart + 14836] = 0.0 + k[2120]*y_cur[IDX_HCOOHI]; - data[jistart + 14837] = 0.0 + k[2208]*y_cur[IDX_O2II]; - data[jistart + 14838] = 0.0 - k[6610]*y_cur[IDX_HCOOH2II] - - k[6611]*y_cur[IDX_HCOOH2II]; - data[jistart + 14839] = 0.0 - k[2549]*y_cur[IDX_HCOOH2II] + - k[5566]*y_cur[IDX_HCOII]; - data[jistart + 14840] = 0.0 + k[2765]*y_cur[IDX_HCOOHI]; - data[jistart + 14841] = 0.0 + k[2971]*y_cur[IDX_HCOOHI] + - k[5566]*y_cur[IDX_H2OI]; - data[jistart + 14842] = 0.0 + k[2120]*y_cur[IDX_CH3OH2II] + - k[2765]*y_cur[IDX_H3COII] + k[2971]*y_cur[IDX_HCOII]; - data[jistart + 14843] = 0.0 - k[1103]*y_cur[IDX_eM] - - k[1104]*y_cur[IDX_eM] - k[2113]*y_cur[IDX_CH3CHOI] - - k[2117]*y_cur[IDX_CH3CNI] - k[2127]*y_cur[IDX_CH3OHI] - - k[2549]*y_cur[IDX_H2OI] - k[3586]*y_cur[IDX_NH3I] - - k[6610]*y_cur[IDX_GRAINM] - k[6611]*y_cur[IDX_GRAINM]; - data[jistart + 14844] = 0.0 - k[3586]*y_cur[IDX_HCOOH2II]; - data[jistart + 14845] = 0.0 + k[2208]*y_cur[IDX_CH4I]; - data[jistart + 14846] = 0.0 - k[1103]*y_cur[IDX_HCOOH2II] - - k[1104]*y_cur[IDX_HCOOH2II]; - data[jistart + 14847] = 0.0 - k[180]*y_cur[IDX_HCPI] - - k[1409]*y_cur[IDX_HCPI]; - data[jistart + 14848] = 0.0 + k[5792]; - data[jistart + 14849] = 0.0 + k[7158] + k[7340] + k[7522]; - data[jistart + 14850] = 0.0 + k[6570]*y_cur[IDX_PCH2II] + - k[6579]*y_cur[IDX_PCH3II] + k[6597]*y_cur[IDX_PCH4II]; - data[jistart + 14851] = 0.0 - k[391]*y_cur[IDX_HCPI]; - data[jistart + 14852] = 0.0 - k[2701]*y_cur[IDX_HCPI]; - data[jistart + 14853] = 0.0 - k[2808]*y_cur[IDX_HCPI]; - data[jistart + 14854] = 0.0 + k[5401]*y_cur[IDX_OI]; - data[jistart + 14855] = 0.0 - k[2972]*y_cur[IDX_HCPI]; - data[jistart + 14856] = 0.0 - k[180]*y_cur[IDX_CII] - - k[391]*y_cur[IDX_HII] - k[1409]*y_cur[IDX_CII] - - k[2701]*y_cur[IDX_H3II] - k[2808]*y_cur[IDX_H3OII] - - k[2972]*y_cur[IDX_HCOII] - k[3253]*y_cur[IDX_HeII] - - k[3254]*y_cur[IDX_HeII] - k[5407]*y_cur[IDX_OI] - k[5861] - k[6189] - - k[6976]; - data[jistart + 14857] = 0.0 - k[3253]*y_cur[IDX_HCPI] - - k[3254]*y_cur[IDX_HCPI]; - data[jistart + 14858] = 0.0 + k[5401]*y_cur[IDX_HC2PI] - - k[5407]*y_cur[IDX_HCPI]; - data[jistart + 14859] = 0.0 + k[1198]*y_cur[IDX_eM] + - k[6570]*y_cur[IDX_GRAINM]; - data[jistart + 14860] = 0.0 + k[1200]*y_cur[IDX_eM] + - k[6579]*y_cur[IDX_GRAINM]; - data[jistart + 14861] = 0.0 + k[1203]*y_cur[IDX_eM] + - k[6597]*y_cur[IDX_GRAINM]; - data[jistart + 14862] = 0.0 + k[1198]*y_cur[IDX_PCH2II] + - k[1200]*y_cur[IDX_PCH3II] + k[1203]*y_cur[IDX_PCH4II]; - data[jistart + 14863] = 0.0 - k[1906]*y_cur[IDX_HCPII]; - data[jistart + 14864] = 0.0 + k[180]*y_cur[IDX_HCPI]; - data[jistart + 14865] = 0.0 + k[2677]*y_cur[IDX_H3II] + - k[2796]*y_cur[IDX_H3OII] + k[2955]*y_cur[IDX_HCOII]; - data[jistart + 14866] = 0.0 + k[2437]*y_cur[IDX_H2I]; - data[jistart + 14867] = 0.0 - k[6543]*y_cur[IDX_HCPII] - - k[6544]*y_cur[IDX_HCPII]; - data[jistart + 14868] = 0.0 + k[391]*y_cur[IDX_HCPI]; - data[jistart + 14869] = 0.0 + k[2437]*y_cur[IDX_CPII] - - k[2451]*y_cur[IDX_HCPII]; - data[jistart + 14870] = 0.0 + k[2677]*y_cur[IDX_CPI]; - data[jistart + 14871] = 0.0 + k[2796]*y_cur[IDX_CPI]; - data[jistart + 14872] = 0.0 + k[2955]*y_cur[IDX_CPI]; - data[jistart + 14873] = 0.0 + k[180]*y_cur[IDX_CII] + - k[391]*y_cur[IDX_HII]; - data[jistart + 14874] = 0.0 - k[1105]*y_cur[IDX_eM] - - k[1106]*y_cur[IDX_eM] - k[1906]*y_cur[IDX_CI] - - k[2451]*y_cur[IDX_H2I] - k[3737]*y_cur[IDX_OI] - - k[6543]*y_cur[IDX_GRAINM] - k[6544]*y_cur[IDX_GRAINM]; - data[jistart + 14875] = 0.0 - k[3737]*y_cur[IDX_HCPII]; - data[jistart + 14876] = 0.0 - k[1105]*y_cur[IDX_HCPII] - - k[1106]*y_cur[IDX_HCPII]; - data[jistart + 14877] = 0.0 + k[3845]*y_cur[IDX_SOII]; - data[jistart + 14878] = 0.0 + k[3849]*y_cur[IDX_SOII]; - data[jistart + 14879] = 0.0 + k[5020]*y_cur[IDX_SI]; - data[jistart + 14880] = 0.0 + k[3852]*y_cur[IDX_SOII]; - data[jistart + 14881] = 0.0 + k[8713]*y_cur[IDX_GSI]; - data[jistart + 14882] = 0.0 + k[8625]*y_cur[IDX_GHI]; - data[jistart + 14883] = 0.0 + k[8625]*y_cur[IDX_GCSI]; - data[jistart + 14884] = 0.0 + k[7162] + k[7344] + k[7526]; - data[jistart + 14885] = 0.0 + k[6583]*y_cur[IDX_H2CSII]; - data[jistart + 14886] = 0.0 + k[8713]*y_cur[IDX_GCHI]; - data[jistart + 14887] = 0.0 - k[5173]*y_cur[IDX_HCSI]; - data[jistart + 14888] = 0.0 - k[2346]*y_cur[IDX_HCSI]; - data[jistart + 14889] = 0.0 + k[1001]*y_cur[IDX_eM] + - k[6583]*y_cur[IDX_GRAINM]; - data[jistart + 14890] = 0.0 - k[2702]*y_cur[IDX_HCSI]; - data[jistart + 14891] = 0.0 - k[2346]*y_cur[IDX_HII] - - k[2702]*y_cur[IDX_H3II] - k[3255]*y_cur[IDX_HeII] - - k[3256]*y_cur[IDX_HeII] - k[5173]*y_cur[IDX_HI] - - k[5268]*y_cur[IDX_NI] - k[5408]*y_cur[IDX_OI] - - k[5409]*y_cur[IDX_OI] - k[5862] - k[6190] - k[6191] - k[6980]; - data[jistart + 14892] = 0.0 - k[3255]*y_cur[IDX_HCSI] - - k[3256]*y_cur[IDX_HCSI]; - data[jistart + 14893] = 0.0 - k[5268]*y_cur[IDX_HCSI]; - data[jistart + 14894] = 0.0 - k[5408]*y_cur[IDX_HCSI] - - k[5409]*y_cur[IDX_HCSI]; - data[jistart + 14895] = 0.0 + k[5020]*y_cur[IDX_CH2I]; - data[jistart + 14896] = 0.0 + k[3845]*y_cur[IDX_C2H2I] + - k[3849]*y_cur[IDX_C2H4I] + k[3852]*y_cur[IDX_CH2CCH2I]; - data[jistart + 14897] = 0.0 + k[1001]*y_cur[IDX_H2CSII]; - data[jistart + 14898] = 0.0 + k[1900]*y_cur[IDX_H2SII]; - data[jistart + 14899] = 0.0 + k[1395]*y_cur[IDX_H2SI]; - data[jistart + 14900] = 0.0 + k[3846]*y_cur[IDX_SOII]; - data[jistart + 14901] = 0.0 + k[1717]*y_cur[IDX_SII]; - data[jistart + 14902] = 0.0 - k[3013]*y_cur[IDX_HCSII]; - data[jistart + 14903] = 0.0 + k[2575]*y_cur[IDX_H2SI]; - data[jistart + 14904] = 0.0 + k[2578]*y_cur[IDX_H2SI]; - data[jistart + 14905] = 0.0 + k[1955]*y_cur[IDX_H2SI] + - k[1970]*y_cur[IDX_OCSI]; - data[jistart + 14906] = 0.0 + k[2017]*y_cur[IDX_SII]; - data[jistart + 14907] = 0.0 + k[1985]*y_cur[IDX_H2SI] + - k[1993]*y_cur[IDX_OCSI] + k[1994]*y_cur[IDX_SI]; - data[jistart + 14908] = 0.0 + k[3855]*y_cur[IDX_SOII]; - data[jistart + 14909] = 0.0 + k[2095]*y_cur[IDX_SI]; - data[jistart + 14910] = 0.0 + k[3826]*y_cur[IDX_SII]; - data[jistart + 14911] = 0.0 - k[3014]*y_cur[IDX_HCSII]; - data[jistart + 14912] = 0.0 + k[2192]*y_cur[IDX_CSII] + - k[2216]*y_cur[IDX_SII]; - data[jistart + 14913] = 0.0 + k[2678]*y_cur[IDX_H3II] + - k[2797]*y_cur[IDX_H3OII] + k[2956]*y_cur[IDX_HCOII]; - data[jistart + 14914] = 0.0 + k[2192]*y_cur[IDX_CH4I] + - k[2438]*y_cur[IDX_H2I]; - data[jistart + 14915] = 0.0 - k[6554]*y_cur[IDX_HCSII] - - k[6555]*y_cur[IDX_HCSII]; - data[jistart + 14916] = 0.0 + k[2438]*y_cur[IDX_CSII]; - data[jistart + 14917] = 0.0 + k[1395]*y_cur[IDX_CII] + - k[1955]*y_cur[IDX_CHII] + k[1985]*y_cur[IDX_CH2II] + - k[2575]*y_cur[IDX_C2NII] + k[2578]*y_cur[IDX_C3HII]; - data[jistart + 14918] = 0.0 + k[1900]*y_cur[IDX_CI]; - data[jistart + 14919] = 0.0 + k[2678]*y_cur[IDX_CSI]; - data[jistart + 14920] = 0.0 + k[2797]*y_cur[IDX_CSI]; - data[jistart + 14921] = 0.0 + k[2956]*y_cur[IDX_CSI]; - data[jistart + 14922] = 0.0 + k[5862] + k[6191]; - data[jistart + 14923] = 0.0 - k[1107]*y_cur[IDX_eM] - - k[1108]*y_cur[IDX_eM] - k[3013]*y_cur[IDX_C2H5OHI] - - k[3014]*y_cur[IDX_CH3COCH3I] - k[3587]*y_cur[IDX_NH3I] - - k[3738]*y_cur[IDX_OI] - k[3739]*y_cur[IDX_OI] - - k[6554]*y_cur[IDX_GRAINM] - k[6555]*y_cur[IDX_GRAINM]; - data[jistart + 14924] = 0.0 - k[3587]*y_cur[IDX_HCSII]; - data[jistart + 14925] = 0.0 - k[3738]*y_cur[IDX_HCSII] - - k[3739]*y_cur[IDX_HCSII]; - data[jistart + 14926] = 0.0 + k[1970]*y_cur[IDX_CHII] + - k[1993]*y_cur[IDX_CH2II]; - data[jistart + 14927] = 0.0 + k[1994]*y_cur[IDX_CH2II] + - k[2095]*y_cur[IDX_CH3II]; - data[jistart + 14928] = 0.0 + k[1717]*y_cur[IDX_C2H4I] + - k[2017]*y_cur[IDX_CH2I] + k[2216]*y_cur[IDX_CH4I] + - k[3826]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 14929] = 0.0 + k[3846]*y_cur[IDX_C2H2I] + - k[3855]*y_cur[IDX_CH2CCH2I]; - data[jistart + 14930] = 0.0 - k[1107]*y_cur[IDX_HCSII] - - k[1108]*y_cur[IDX_HCSII]; - data[jistart + 14931] = 0.0 + k[4988]*y_cur[IDX_SiH2I]; - data[jistart + 14932] = 0.0 - k[1410]*y_cur[IDX_HCSiI]; - data[jistart + 14933] = 0.0 + k[5021]*y_cur[IDX_SiI]; - data[jistart + 14934] = 0.0 + k[7138] + k[7320] + k[7502]; - data[jistart + 14935] = 0.0 + k[6496]*y_cur[IDX_SiCH2II] + - k[6516]*y_cur[IDX_SiCH3II]; - data[jistart + 14936] = 0.0 - k[392]*y_cur[IDX_HCSiI] - - k[2347]*y_cur[IDX_HCSiI]; - data[jistart + 14937] = 0.0 - k[2703]*y_cur[IDX_HCSiI]; - data[jistart + 14938] = 0.0 - k[2809]*y_cur[IDX_HCSiI]; - data[jistart + 14939] = 0.0 - k[2973]*y_cur[IDX_HCSiI]; - data[jistart + 14940] = 0.0 - k[392]*y_cur[IDX_HII] - - k[1410]*y_cur[IDX_CII] - k[2347]*y_cur[IDX_HII] - - k[2703]*y_cur[IDX_H3II] - k[2809]*y_cur[IDX_H3OII] - - k[2973]*y_cur[IDX_HCOII] - k[3257]*y_cur[IDX_HeII] - - k[3258]*y_cur[IDX_HeII] - k[5410]*y_cur[IDX_OI] - k[5863] - k[6192] - - k[6193] - k[6956]; - data[jistart + 14941] = 0.0 - k[3257]*y_cur[IDX_HCSiI] - - k[3258]*y_cur[IDX_HCSiI]; - data[jistart + 14942] = 0.0 - k[5410]*y_cur[IDX_HCSiI]; - data[jistart + 14943] = 0.0 + k[5021]*y_cur[IDX_CH2I]; - data[jistart + 14944] = 0.0 + k[6268]; - data[jistart + 14945] = 0.0 + k[1242]*y_cur[IDX_eM] + - k[6496]*y_cur[IDX_GRAINM]; - data[jistart + 14946] = 0.0 + k[1245]*y_cur[IDX_eM] + - k[6516]*y_cur[IDX_GRAINM]; - data[jistart + 14947] = 0.0 + k[4988]*y_cur[IDX_CI]; - data[jistart + 14948] = 0.0 + k[1242]*y_cur[IDX_SiCH2II] + - k[1245]*y_cur[IDX_SiCH3II]; - data[jistart + 14949] = 0.0 + k[1926]*y_cur[IDX_SiH2II]; - data[jistart + 14950] = 0.0 + k[1439]*y_cur[IDX_SiH2I] + - k[1441]*y_cur[IDX_SiH3I]; - data[jistart + 14951] = 0.0 + k[2018]*y_cur[IDX_SiII]; - data[jistart + 14952] = 0.0 + k[2102]*y_cur[IDX_SiII]; - data[jistart + 14953] = 0.0 + k[2097]*y_cur[IDX_SiI]; - data[jistart + 14954] = 0.0 - k[6490]*y_cur[IDX_HCSiII] - - k[6491]*y_cur[IDX_HCSiII]; - data[jistart + 14955] = 0.0 + k[392]*y_cur[IDX_HCSiI] + - k[2360]*y_cur[IDX_SiCH2I]; - data[jistart + 14956] = 0.0 - k[2452]*y_cur[IDX_HCSiII] + - k[2472]*y_cur[IDX_SiCII]; - data[jistart + 14957] = 0.0 + k[2750]*y_cur[IDX_SiCI]; - data[jistart + 14958] = 0.0 + k[2821]*y_cur[IDX_SiCI]; - data[jistart + 14959] = 0.0 + k[2997]*y_cur[IDX_SiCI]; - data[jistart + 14960] = 0.0 + k[392]*y_cur[IDX_HII] + k[6192]; - data[jistart + 14961] = 0.0 - k[1109]*y_cur[IDX_eM] - - k[1110]*y_cur[IDX_eM] - k[2452]*y_cur[IDX_H2I] - - k[6490]*y_cur[IDX_GRAINM] - k[6491]*y_cur[IDX_GRAINM]; - data[jistart + 14962] = 0.0 + k[3318]*y_cur[IDX_SiCH2I]; - data[jistart + 14963] = 0.0 + k[3792]*y_cur[IDX_SiCI]; - data[jistart + 14964] = 0.0 + k[2097]*y_cur[IDX_CH3II]; - data[jistart + 14965] = 0.0 + k[2018]*y_cur[IDX_CH2I] + - k[2102]*y_cur[IDX_CH3I]; - data[jistart + 14966] = 0.0 + k[2750]*y_cur[IDX_H3II] + - k[2821]*y_cur[IDX_H3OII] + k[2997]*y_cur[IDX_HCOII] + - k[3792]*y_cur[IDX_OHII]; - data[jistart + 14967] = 0.0 + k[2472]*y_cur[IDX_H2I]; - data[jistart + 14968] = 0.0 + k[2360]*y_cur[IDX_HII] + - k[3318]*y_cur[IDX_HeII]; - data[jistart + 14969] = 0.0 + k[1439]*y_cur[IDX_CII]; - data[jistart + 14970] = 0.0 + k[1926]*y_cur[IDX_CI]; - data[jistart + 14971] = 0.0 + k[1441]*y_cur[IDX_CII]; - data[jistart + 14972] = 0.0 - k[1109]*y_cur[IDX_HCSiII] - - k[1110]*y_cur[IDX_HCSiII]; - data[jistart + 14973] = 0.0 - k[1411]*y_cur[IDX_HClI]; - data[jistart + 14974] = 0.0 + k[3566]*y_cur[IDX_NH3I]; - data[jistart + 14975] = 0.0 - k[2083]*y_cur[IDX_HClI]; - data[jistart + 14976] = 0.0 - k[2231]*y_cur[IDX_HClI]; - data[jistart + 14977] = 0.0 + k[2284]*y_cur[IDX_H2ClII]; - data[jistart + 14978] = 0.0 + k[5132]*y_cur[IDX_H2I]; - data[jistart + 14979] = 0.0 + k[8609]*y_cur[IDX_GHI]; - data[jistart + 14980] = 0.0 + k[8609]*y_cur[IDX_GClI]; - data[jistart + 14981] = 0.0 + k[7126] + k[7308] + k[7490]; - data[jistart + 14982] = 0.0 + k[6458]*y_cur[IDX_H2ClII]; - data[jistart + 14983] = 0.0 - k[5211]*y_cur[IDX_HClI]; - data[jistart + 14984] = 0.0 - k[393]*y_cur[IDX_HClI]; - data[jistart + 14985] = 0.0 + k[5132]*y_cur[IDX_ClI]; - data[jistart + 14986] = 0.0 + k[1003]*y_cur[IDX_eM] + - k[2284]*y_cur[IDX_COI] + k[2543]*y_cur[IDX_H2OI] + - k[6458]*y_cur[IDX_GRAINM]; - data[jistart + 14987] = 0.0 + k[2543]*y_cur[IDX_H2ClII]; - data[jistart + 14988] = 0.0 - k[2704]*y_cur[IDX_HClI]; - data[jistart + 14989] = 0.0 - k[393]*y_cur[IDX_HII] - - k[1411]*y_cur[IDX_CII] - k[2083]*y_cur[IDX_CH3II] - - k[2231]*y_cur[IDX_CH5II] - k[2704]*y_cur[IDX_H3II] - - k[3259]*y_cur[IDX_HeII] - k[5211]*y_cur[IDX_HI] - k[5864] - k[6194] - - k[6195] - k[6944]; - data[jistart + 14990] = 0.0 - k[3259]*y_cur[IDX_HClI]; - data[jistart + 14991] = 0.0 + k[3566]*y_cur[IDX_CClII]; - data[jistart + 14992] = 0.0 + k[1003]*y_cur[IDX_H2ClII]; - data[jistart + 14993] = 0.0 + k[2679]*y_cur[IDX_H3II]; - data[jistart + 14994] = 0.0 + k[2439]*y_cur[IDX_H2I]; - data[jistart + 14995] = 0.0 - k[6456]*y_cur[IDX_HClII]; - data[jistart + 14996] = 0.0 + k[393]*y_cur[IDX_HClI]; - data[jistart + 14997] = 0.0 + k[2439]*y_cur[IDX_ClII] - - k[2453]*y_cur[IDX_HClII]; - data[jistart + 14998] = 0.0 + k[2679]*y_cur[IDX_ClI]; - data[jistart + 14999] = 0.0 + k[393]*y_cur[IDX_HII] + k[6195]; - data[jistart + 15000] = 0.0 - k[1111]*y_cur[IDX_eM] - - k[2453]*y_cur[IDX_H2I] - k[6456]*y_cur[IDX_GRAINM]; - data[jistart + 15001] = 0.0 - k[1111]*y_cur[IDX_HClII]; - data[jistart + 15002] = 0.0 - k[1412]*y_cur[IDX_HFI]; - data[jistart + 15003] = 0.0 + k[5139]*y_cur[IDX_H2I] + - k[5151]*y_cur[IDX_H2OI] + k[5464]*y_cur[IDX_OHI]; - data[jistart + 15004] = 0.0 + k[8585]*y_cur[IDX_GHI]; - data[jistart + 15005] = 0.0 + k[8585]*y_cur[IDX_GFI]; - data[jistart + 15006] = 0.0 + k[7086] + k[7268] + k[7450]; - data[jistart + 15007] = 0.0 + k[6350]*y_cur[IDX_H2FII]; - data[jistart + 15008] = 0.0 + k[5139]*y_cur[IDX_FI]; - data[jistart + 15009] = 0.0 + k[1005]*y_cur[IDX_eM] + - k[6350]*y_cur[IDX_GRAINM]; - data[jistart + 15010] = 0.0 + k[5151]*y_cur[IDX_FI]; - data[jistart + 15011] = 0.0 - k[2705]*y_cur[IDX_HFI]; - data[jistart + 15012] = 0.0 - k[1412]*y_cur[IDX_CII] - - k[2705]*y_cur[IDX_H3II] - k[3015]*y_cur[IDX_SiII] - - k[3260]*y_cur[IDX_HeII] - k[5865] - k[6196] - k[6904]; - data[jistart + 15013] = 0.0 - k[3260]*y_cur[IDX_HFI]; - data[jistart + 15014] = 0.0 + k[5464]*y_cur[IDX_FI]; - data[jistart + 15015] = 0.0 - k[3015]*y_cur[IDX_HFI]; - data[jistart + 15016] = 0.0 + k[1005]*y_cur[IDX_H2FII]; - data[jistart + 15017] = 0.0 + k[2440]*y_cur[IDX_H2I]; - data[jistart + 15018] = 0.0 - k[6348]*y_cur[IDX_HFII]; - data[jistart + 15019] = 0.0 + k[2440]*y_cur[IDX_FII] - - k[2454]*y_cur[IDX_HFII]; - data[jistart + 15020] = 0.0 - k[1112]*y_cur[IDX_eM] - - k[2454]*y_cur[IDX_H2I] - k[6348]*y_cur[IDX_GRAINM]; - data[jistart + 15021] = 0.0 - k[1112]*y_cur[IDX_HFII]; - data[jistart + 15022] = 0.0 + k[2234]*y_cur[IDX_N2OI]; - data[jistart + 15023] = 0.0 - k[6558]*y_cur[IDX_HN2OII] - - k[6559]*y_cur[IDX_HN2OII]; - data[jistart + 15024] = 0.0 + k[2559]*y_cur[IDX_N2OII]; - data[jistart + 15025] = 0.0 + k[2581]*y_cur[IDX_N2OII]; - data[jistart + 15026] = 0.0 + k[2719]*y_cur[IDX_N2OI]; - data[jistart + 15027] = 0.0 + k[2978]*y_cur[IDX_N2OI]; - data[jistart + 15028] = 0.0 - k[1113]*y_cur[IDX_eM] - - k[1114]*y_cur[IDX_eM] - k[6558]*y_cur[IDX_GRAINM] - - k[6559]*y_cur[IDX_GRAINM]; - data[jistart + 15029] = 0.0 + k[2234]*y_cur[IDX_CH5II] + - k[2719]*y_cur[IDX_H3II] + k[2978]*y_cur[IDX_HCOII]; - data[jistart + 15030] = 0.0 + k[2559]*y_cur[IDX_H2OI] + - k[2581]*y_cur[IDX_H2SI]; - data[jistart + 15031] = 0.0 - k[1113]*y_cur[IDX_HN2OII] - - k[1114]*y_cur[IDX_HN2OII]; - data[jistart + 15032] = 0.0 + k[4970]*y_cur[IDX_NH2I] + - k[5212]*y_cur[IDX_HNC3I] + k[5214]*y_cur[IDX_HNCOI]; - data[jistart + 15033] = 0.0 - k[1413]*y_cur[IDX_HNCI] + - k[3016]*y_cur[IDX_HNC3I]; - data[jistart + 15034] = 0.0 + k[3903]*y_cur[IDX_HCNHII]; - data[jistart + 15035] = 0.0 + k[3938]*y_cur[IDX_HCNHII]; - data[jistart + 15036] = 0.0 + k[3973]*y_cur[IDX_HCNHII]; - data[jistart + 15037] = 0.0 + k[4008]*y_cur[IDX_HCNHII]; - data[jistart + 15038] = 0.0 - k[4902]*y_cur[IDX_HNCI]; - data[jistart + 15039] = 0.0 - k[1478]*y_cur[IDX_HNCI]; - data[jistart + 15040] = 0.0 + k[4043]*y_cur[IDX_HCNHII]; - data[jistart + 15041] = 0.0 - k[1525]*y_cur[IDX_HNCI]; - data[jistart + 15042] = 0.0 - k[3036]*y_cur[IDX_HNCI]; - data[jistart + 15043] = 0.0 - k[3037]*y_cur[IDX_HNCI]; - data[jistart + 15044] = 0.0 + k[769]*y_cur[IDX_eM] + - k[6671]*y_cur[IDX_GRAINM]; - data[jistart + 15045] = 0.0 + k[4078]*y_cur[IDX_HCNHII]; - data[jistart + 15046] = 0.0 + k[4113]*y_cur[IDX_HCNHII]; - data[jistart + 15047] = 0.0 + k[4148]*y_cur[IDX_HCNHII]; - data[jistart + 15048] = 0.0 + k[4183]*y_cur[IDX_HCNHII]; - data[jistart + 15049] = 0.0 - k[4907]*y_cur[IDX_HNCI]; - data[jistart + 15050] = 0.0 + k[4218]*y_cur[IDX_HCNHII]; - data[jistart + 15051] = 0.0 + k[4253]*y_cur[IDX_HCNHII]; - data[jistart + 15052] = 0.0 + k[4288]*y_cur[IDX_HCNHII]; - data[jistart + 15053] = 0.0 + k[4323]*y_cur[IDX_HCNHII]; - data[jistart + 15054] = 0.0 + k[4358]*y_cur[IDX_HCNHII]; - data[jistart + 15055] = 0.0 + k[4393]*y_cur[IDX_HCNHII]; - data[jistart + 15056] = 0.0 + k[4428]*y_cur[IDX_HCNHII]; - data[jistart + 15057] = 0.0 + k[4463]*y_cur[IDX_HCNHII]; - data[jistart + 15058] = 0.0 + k[4498]*y_cur[IDX_HCNHII]; - data[jistart + 15059] = 0.0 + k[4533]*y_cur[IDX_HCNHII]; - data[jistart + 15060] = 0.0 + k[4568]*y_cur[IDX_HCNHII]; - data[jistart + 15061] = 0.0 + k[4603]*y_cur[IDX_HCNHII]; - data[jistart + 15062] = 0.0 + k[2252]*y_cur[IDX_HCNHII]; - data[jistart + 15063] = 0.0 - k[1960]*y_cur[IDX_HNCI]; - data[jistart + 15064] = 0.0 + k[4638]*y_cur[IDX_HCNHII]; - data[jistart + 15065] = 0.0 + k[2007]*y_cur[IDX_HCNHII] + - k[5254]*y_cur[IDX_NI]; - data[jistart + 15066] = 0.0 + k[2887]*y_cur[IDX_HCNHII]; - data[jistart + 15067] = 0.0 + k[914]*y_cur[IDX_eM] + - k[6658]*y_cur[IDX_GRAINM]; - data[jistart + 15068] = 0.0 + k[6093]; - data[jistart + 15069] = 0.0 + k[3020]*y_cur[IDX_HNC3I]; - data[jistart + 15070] = 0.0 + k[2889]*y_cur[IDX_HCNHII]; - data[jistart + 15071] = 0.0 + k[947]*y_cur[IDX_eM] + - k[6503]*y_cur[IDX_GRAINM]; - data[jistart + 15072] = 0.0 - k[2232]*y_cur[IDX_HNCI]; - data[jistart + 15073] = 0.0 - k[5118]*y_cur[IDX_HNCI]; - data[jistart + 15074] = 0.0 + k[4673]*y_cur[IDX_HCNHII]; - data[jistart + 15075] = 0.0 + k[8659]*y_cur[IDX_GNHI]; - data[jistart + 15076] = 0.0 + k[7095] + k[7277] + k[7459]; - data[jistart + 15077] = 0.0 + k[8659]*y_cur[IDX_GCI]; - data[jistart + 15078] = 0.0 + k[6377]*y_cur[IDX_H2NCII] + - k[6380]*y_cur[IDX_HCNHII] + k[6503]*y_cur[IDX_CH3CNHII] + - k[6652]*y_cur[IDX_NCCNHII] + k[6658]*y_cur[IDX_CH2CHCNHII] + - k[6671]*y_cur[IDX_C2H5CNHII] + k[6795]*y_cur[IDX_HC5NHII]; - data[jistart + 15079] = 0.0 - k[5174]*y_cur[IDX_HNCI]; - data[jistart + 15080] = 0.0 - k[133]*y_cur[IDX_HNCI] + - k[3026]*y_cur[IDX_HNC3I]; - data[jistart + 15081] = 0.0 + k[4709]*y_cur[IDX_HCNHII]; - data[jistart + 15082] = 0.0 + k[2891]*y_cur[IDX_HCNHII]; - data[jistart + 15083] = 0.0 - k[3038]*y_cur[IDX_HNCI]; - data[jistart + 15084] = 0.0 + k[1007]*y_cur[IDX_eM] + - k[6377]*y_cur[IDX_GRAINM]; - data[jistart + 15085] = 0.0 - k[2515]*y_cur[IDX_HNCI]; - data[jistart + 15086] = 0.0 + k[2893]*y_cur[IDX_HCNHII]; - data[jistart + 15087] = 0.0 - k[2706]*y_cur[IDX_HNCI]; - data[jistart + 15088] = 0.0 - k[3039]*y_cur[IDX_HNCI]; - data[jistart + 15089] = 0.0 - k[2810]*y_cur[IDX_HNCI]; - data[jistart + 15090] = 0.0 - k[3040]*y_cur[IDX_HNCI]; - data[jistart + 15091] = 0.0 + k[2895]*y_cur[IDX_HCNHII]; - data[jistart + 15092] = 0.0 + k[1083]*y_cur[IDX_eM] + - k[6795]*y_cur[IDX_GRAINM]; - data[jistart + 15093] = 0.0 - k[2859]*y_cur[IDX_HNCI]; - data[jistart + 15094] = 0.0 + k[1091]*y_cur[IDX_eM] + - k[2007]*y_cur[IDX_CH2I] + k[2252]*y_cur[IDX_CHI] + - k[2887]*y_cur[IDX_CH2CHCNI] + k[2889]*y_cur[IDX_CH3CNI] + - k[2891]*y_cur[IDX_H2COI] + k[2893]*y_cur[IDX_H2SI] + - k[2895]*y_cur[IDX_HC3NI] + k[3541]*y_cur[IDX_NH2I] + - k[3583]*y_cur[IDX_NH3I] + k[3630]*y_cur[IDX_NaI] + - k[3903]*y_cur[IDX_CM] + k[3938]*y_cur[IDX_C10M] + - k[3973]*y_cur[IDX_C10HM] + k[4008]*y_cur[IDX_C2M] + - k[4043]*y_cur[IDX_C2HM] + k[4078]*y_cur[IDX_C3M] + - k[4113]*y_cur[IDX_C3HM] + k[4148]*y_cur[IDX_C3NM] + - k[4183]*y_cur[IDX_C4M] + k[4218]*y_cur[IDX_C4HM] + - k[4253]*y_cur[IDX_C5M] + k[4288]*y_cur[IDX_C5HM] + - k[4323]*y_cur[IDX_C5NM] + k[4358]*y_cur[IDX_C6M] + - k[4393]*y_cur[IDX_C6HM] + k[4428]*y_cur[IDX_C7M] + - k[4463]*y_cur[IDX_C7HM] + k[4498]*y_cur[IDX_C8M] + - k[4533]*y_cur[IDX_C8HM] + k[4568]*y_cur[IDX_C9M] + - k[4603]*y_cur[IDX_C9HM] + k[4638]*y_cur[IDX_CHM] + - k[4673]*y_cur[IDX_CNM] + k[4709]*y_cur[IDX_HM] + - k[4744]*y_cur[IDX_OM] + k[4779]*y_cur[IDX_O2M] + - k[4814]*y_cur[IDX_OHM] + k[4849]*y_cur[IDX_SM] + - k[6380]*y_cur[IDX_GRAINM]; - data[jistart + 15095] = 0.0 - k[3041]*y_cur[IDX_HNCI]; - data[jistart + 15096] = 0.0 - k[133]*y_cur[IDX_HII] - - k[1413]*y_cur[IDX_CII] - k[1478]*y_cur[IDX_C2HII] - - k[1525]*y_cur[IDX_C2H2II] - k[1960]*y_cur[IDX_CHII] - - k[2232]*y_cur[IDX_CH5II] - k[2515]*y_cur[IDX_H2OII] - - k[2706]*y_cur[IDX_H3II] - k[2810]*y_cur[IDX_H3OII] - - k[2859]*y_cur[IDX_HCNII] - k[3036]*y_cur[IDX_C2H3II] - - k[3037]*y_cur[IDX_C2H5II] - k[3038]*y_cur[IDX_H2COII] - - k[3039]*y_cur[IDX_H3COII] - k[3040]*y_cur[IDX_H3SII] - - k[3041]*y_cur[IDX_HCOII] - k[3042]*y_cur[IDX_HNOII] - - k[3043]*y_cur[IDX_HSII] - k[3044]*y_cur[IDX_N2HII] - - k[3045]*y_cur[IDX_O2HII] - k[3046]*y_cur[IDX_SiII] - - k[3261]*y_cur[IDX_HeII] - k[3262]*y_cur[IDX_HeII] - - k[3263]*y_cur[IDX_HeII] - k[3495]*y_cur[IDX_NHII] - - k[3521]*y_cur[IDX_NH2II] - k[3784]*y_cur[IDX_OHII] - - k[4902]*y_cur[IDX_C2HI] - k[4907]*y_cur[IDX_C4HI] - - k[5118]*y_cur[IDX_CNI] - k[5174]*y_cur[IDX_HI] - k[5867] - k[6198] - - k[6913]; - data[jistart + 15097] = 0.0 + k[3016]*y_cur[IDX_CII] + - k[3020]*y_cur[IDX_CH3II] + k[3026]*y_cur[IDX_HII] + - k[3030]*y_cur[IDX_HeII] + k[5212]*y_cur[IDX_CI]; - data[jistart + 15098] = 0.0 + k[5214]*y_cur[IDX_CI]; - data[jistart + 15099] = 0.0 - k[3042]*y_cur[IDX_HNCI]; - data[jistart + 15100] = 0.0 - k[3043]*y_cur[IDX_HNCI]; - data[jistart + 15101] = 0.0 + k[3030]*y_cur[IDX_HNC3I] - - k[3261]*y_cur[IDX_HNCI] - k[3262]*y_cur[IDX_HNCI] - - k[3263]*y_cur[IDX_HNCI]; - data[jistart + 15102] = 0.0 + k[5254]*y_cur[IDX_CH2I]; - data[jistart + 15103] = 0.0 - k[3044]*y_cur[IDX_HNCI]; - data[jistart + 15104] = 0.0 + k[1156]*y_cur[IDX_eM] + - k[6652]*y_cur[IDX_GRAINM]; - data[jistart + 15105] = 0.0 - k[3495]*y_cur[IDX_HNCI]; - data[jistart + 15106] = 0.0 + k[3541]*y_cur[IDX_HCNHII] + - k[4970]*y_cur[IDX_CI]; - data[jistart + 15107] = 0.0 - k[3521]*y_cur[IDX_HNCI]; - data[jistart + 15108] = 0.0 + k[3583]*y_cur[IDX_HCNHII]; - data[jistart + 15109] = 0.0 + k[3630]*y_cur[IDX_HCNHII]; - data[jistart + 15110] = 0.0 + k[4744]*y_cur[IDX_HCNHII]; - data[jistart + 15111] = 0.0 + k[4779]*y_cur[IDX_HCNHII]; - data[jistart + 15112] = 0.0 - k[3045]*y_cur[IDX_HNCI]; - data[jistart + 15113] = 0.0 - k[3784]*y_cur[IDX_HNCI]; - data[jistart + 15114] = 0.0 + k[4814]*y_cur[IDX_HCNHII]; - data[jistart + 15115] = 0.0 + k[4849]*y_cur[IDX_HCNHII]; - data[jistart + 15116] = 0.0 - k[3046]*y_cur[IDX_HNCI]; - data[jistart + 15117] = 0.0 + k[769]*y_cur[IDX_C2H5CNHII] + - k[914]*y_cur[IDX_CH2CHCNHII] + k[947]*y_cur[IDX_CH3CNHII] + - k[1007]*y_cur[IDX_H2NCII] + k[1083]*y_cur[IDX_HC5NHII] + - k[1091]*y_cur[IDX_HCNHII] + k[1156]*y_cur[IDX_NCCNHII]; - data[jistart + 15118] = 0.0 - k[5212]*y_cur[IDX_HNC3I]; - data[jistart + 15119] = 0.0 - k[3016]*y_cur[IDX_HNC3I] - - k[3017]*y_cur[IDX_HNC3I] - k[3018]*y_cur[IDX_HNC3I] - - k[3019]*y_cur[IDX_HNC3I]; - data[jistart + 15120] = 0.0 - k[3020]*y_cur[IDX_HNC3I]; - data[jistart + 15121] = 0.0 + k[7182] + k[7364] + k[7546]; - data[jistart + 15122] = 0.0 + k[6640]*y_cur[IDX_HC3NHII]; - data[jistart + 15123] = 0.0 - k[5213]*y_cur[IDX_HNC3I]; - data[jistart + 15124] = 0.0 - k[3021]*y_cur[IDX_HNC3I] - - k[3022]*y_cur[IDX_HNC3I] - k[3023]*y_cur[IDX_HNC3I] - - k[3024]*y_cur[IDX_HNC3I] - k[3025]*y_cur[IDX_HNC3I] - - k[3026]*y_cur[IDX_HNC3I]; - data[jistart + 15125] = 0.0 - k[3027]*y_cur[IDX_HNC3I]; - data[jistart + 15126] = 0.0 - k[3028]*y_cur[IDX_HNC3I]; - data[jistart + 15127] = 0.0 + k[1069]*y_cur[IDX_eM] + - k[6640]*y_cur[IDX_GRAINM]; - data[jistart + 15128] = 0.0 - k[3029]*y_cur[IDX_HNC3I]; - data[jistart + 15129] = 0.0 - k[1115]*y_cur[IDX_eM] - - k[3016]*y_cur[IDX_CII] - k[3017]*y_cur[IDX_CII] - - k[3018]*y_cur[IDX_CII] - k[3019]*y_cur[IDX_CII] - - k[3020]*y_cur[IDX_CH3II] - k[3021]*y_cur[IDX_HII] - - k[3022]*y_cur[IDX_HII] - k[3023]*y_cur[IDX_HII] - - k[3024]*y_cur[IDX_HII] - k[3025]*y_cur[IDX_HII] - - k[3026]*y_cur[IDX_HII] - k[3027]*y_cur[IDX_H3II] - - k[3028]*y_cur[IDX_H3OII] - k[3029]*y_cur[IDX_HCOII] - - k[3030]*y_cur[IDX_HeII] - k[3031]*y_cur[IDX_HeII] - - k[3032]*y_cur[IDX_HeII] - k[3033]*y_cur[IDX_HeII] - - k[3034]*y_cur[IDX_HeII] - k[3035]*y_cur[IDX_N2HII] - - k[5212]*y_cur[IDX_CI] - k[5213]*y_cur[IDX_HI] - k[5866] - k[6197] - - k[7000]; - data[jistart + 15130] = 0.0 - k[3030]*y_cur[IDX_HNC3I] - - k[3031]*y_cur[IDX_HNC3I] - k[3032]*y_cur[IDX_HNC3I] - - k[3033]*y_cur[IDX_HNC3I] - k[3034]*y_cur[IDX_HNC3I]; - data[jistart + 15131] = 0.0 - k[3035]*y_cur[IDX_HNC3I]; - data[jistart + 15132] = 0.0 + k[1069]*y_cur[IDX_HC3NHII] - - k[1115]*y_cur[IDX_HNC3I]; - data[jistart + 15133] = 0.0 - k[5214]*y_cur[IDX_HNCOI]; - data[jistart + 15134] = 0.0 + k[4886]*y_cur[IDX_OHI]; - data[jistart + 15135] = 0.0 + k[5006]*y_cur[IDX_NOI]; - data[jistart + 15136] = 0.0 + k[8744]*y_cur[IDX_GNHI]; - data[jistart + 15137] = 0.0 + k[8624]*y_cur[IDX_GOCNI]; - data[jistart + 15138] = 0.0 + k[7150] + k[7332] + k[7514]; - data[jistart + 15139] = 0.0 + k[8744]*y_cur[IDX_GCOI]; - data[jistart + 15140] = 0.0 + k[8624]*y_cur[IDX_GHI]; - data[jistart + 15141] = 0.0 + k[6538]*y_cur[IDX_H2NCOII] + - k[6549]*y_cur[IDX_HNCOHII]; - data[jistart + 15142] = 0.0 - k[2348]*y_cur[IDX_HNCOI]; - data[jistart + 15143] = 0.0 + k[1008]*y_cur[IDX_eM] + - k[6538]*y_cur[IDX_GRAINM]; - data[jistart + 15144] = 0.0 - k[2707]*y_cur[IDX_HNCOI] - - k[2708]*y_cur[IDX_HNCOI]; - data[jistart + 15145] = 0.0 - k[521]*y_cur[IDX_HeII] - - k[2348]*y_cur[IDX_HII] - k[2707]*y_cur[IDX_H3II] - - k[2708]*y_cur[IDX_H3II] - k[3264]*y_cur[IDX_HeII] - - k[5214]*y_cur[IDX_CI] - k[5868] - k[6199] - k[6968]; - data[jistart + 15146] = 0.0 + k[1118]*y_cur[IDX_eM] + - k[6549]*y_cur[IDX_GRAINM]; - data[jistart + 15147] = 0.0 - k[521]*y_cur[IDX_HNCOI] - - k[3264]*y_cur[IDX_HNCOI]; - data[jistart + 15148] = 0.0 + k[5006]*y_cur[IDX_CH2I]; - data[jistart + 15149] = 0.0 + k[4886]*y_cur[IDX_C2H5CNI]; - data[jistart + 15150] = 0.0 + k[1008]*y_cur[IDX_H2NCOII] + - k[1118]*y_cur[IDX_HNCOHII]; - data[jistart + 15151] = 0.0 + k[2538]*y_cur[IDX_H2OI]; - data[jistart + 15152] = 0.0 - k[6522]*y_cur[IDX_HNCOII] - - k[6523]*y_cur[IDX_HNCOII]; - data[jistart + 15153] = 0.0 - k[3047]*y_cur[IDX_HNCOII] - - k[3048]*y_cur[IDX_HNCOII] + k[3765]*y_cur[IDX_OCNII]; - data[jistart + 15154] = 0.0 + k[2538]*y_cur[IDX_CNII]; - data[jistart + 15155] = 0.0 + k[3767]*y_cur[IDX_OCNI]; - data[jistart + 15156] = 0.0 + k[521]*y_cur[IDX_HeII]; - data[jistart + 15157] = 0.0 - k[1116]*y_cur[IDX_eM] - - k[1117]*y_cur[IDX_eM] - k[3047]*y_cur[IDX_H2I] - - k[3048]*y_cur[IDX_H2I] - k[6522]*y_cur[IDX_GRAINM] - - k[6523]*y_cur[IDX_GRAINM]; - data[jistart + 15158] = 0.0 + k[521]*y_cur[IDX_HNCOI]; - data[jistart + 15159] = 0.0 + k[3767]*y_cur[IDX_H3II]; - data[jistart + 15160] = 0.0 + k[3765]*y_cur[IDX_H2I]; - data[jistart + 15161] = 0.0 - k[1116]*y_cur[IDX_HNCOII] - - k[1117]*y_cur[IDX_HNCOII]; - data[jistart + 15162] = 0.0 - k[6549]*y_cur[IDX_HNCOHII] - - k[6550]*y_cur[IDX_HNCOHII] - k[6551]*y_cur[IDX_HNCOHII]; - data[jistart + 15163] = 0.0 + k[3048]*y_cur[IDX_HNCOII] + - k[3052]*y_cur[IDX_HOCNII]; - data[jistart + 15164] = 0.0 + k[2708]*y_cur[IDX_HNCOI] + - k[2712]*y_cur[IDX_HOCNI]; - data[jistart + 15165] = 0.0 + k[2708]*y_cur[IDX_H3II]; - data[jistart + 15166] = 0.0 + k[3048]*y_cur[IDX_H2I]; - data[jistart + 15167] = 0.0 - k[1118]*y_cur[IDX_eM] - - k[1119]*y_cur[IDX_eM] - k[1120]*y_cur[IDX_eM] - - k[6549]*y_cur[IDX_GRAINM] - k[6550]*y_cur[IDX_GRAINM] - - k[6551]*y_cur[IDX_GRAINM]; - data[jistart + 15168] = 0.0 + k[2712]*y_cur[IDX_H3II]; - data[jistart + 15169] = 0.0 + k[3052]*y_cur[IDX_H2I]; - data[jistart + 15170] = 0.0 - k[1118]*y_cur[IDX_HNCOHII] - - k[1119]*y_cur[IDX_HNCOHII] - k[1120]*y_cur[IDX_HNCOHII]; - data[jistart + 15171] = 0.0 - k[5078]*y_cur[IDX_HNOI]; - data[jistart + 15172] = 0.0 - k[5000]*y_cur[IDX_HNOI]; - data[jistart + 15173] = 0.0 - k[5034]*y_cur[IDX_HNOI] + - k[5037]*y_cur[IDX_NO2I]; - data[jistart + 15174] = 0.0 - k[5119]*y_cur[IDX_HNOI]; - data[jistart + 15175] = 0.0 - k[5127]*y_cur[IDX_HNOI]; - data[jistart + 15176] = 0.0 + k[8604]*y_cur[IDX_GNOI]; - data[jistart + 15177] = 0.0 + k[7112] + k[7294] + k[7476]; - data[jistart + 15178] = 0.0 + k[8687]*y_cur[IDX_GOI]; - data[jistart + 15179] = 0.0 + k[8604]*y_cur[IDX_GHI]; - data[jistart + 15180] = 0.0 + k[8687]*y_cur[IDX_GNHI]; - data[jistart + 15181] = 0.0 + k[6431]*y_cur[IDX_H2NOII]; - data[jistart + 15182] = 0.0 - k[5175]*y_cur[IDX_HNOI] - - k[5176]*y_cur[IDX_HNOI] - k[5177]*y_cur[IDX_HNOI]; - data[jistart + 15183] = 0.0 - k[2349]*y_cur[IDX_HNOI]; - data[jistart + 15184] = 0.0 + k[1010]*y_cur[IDX_eM] + - k[6431]*y_cur[IDX_GRAINM]; - data[jistart + 15185] = 0.0 - k[2709]*y_cur[IDX_HNOI]; - data[jistart + 15186] = 0.0 + k[5203]*y_cur[IDX_OI]; - data[jistart + 15187] = 0.0 - k[5206]*y_cur[IDX_HNOI] + - k[5207]*y_cur[IDX_NOI]; - data[jistart + 15188] = 0.0 - k[2349]*y_cur[IDX_HII] - - k[2709]*y_cur[IDX_H3II] - k[3265]*y_cur[IDX_HeII] - - k[3266]*y_cur[IDX_HeII] - k[5000]*y_cur[IDX_CH2I] - - k[5034]*y_cur[IDX_CH3I] - k[5078]*y_cur[IDX_CHI] - - k[5119]*y_cur[IDX_CNI] - k[5127]*y_cur[IDX_COI] - - k[5175]*y_cur[IDX_HI] - k[5176]*y_cur[IDX_HI] - - k[5177]*y_cur[IDX_HI] - k[5206]*y_cur[IDX_HCOI] - - k[5269]*y_cur[IDX_NI] - k[5270]*y_cur[IDX_NI] - - k[5326]*y_cur[IDX_NOI] - k[5411]*y_cur[IDX_OI] - - k[5412]*y_cur[IDX_OI] - k[5413]*y_cur[IDX_OI] - - k[5472]*y_cur[IDX_OHI] - k[5869] - k[6200] - k[6930]; - data[jistart + 15189] = 0.0 + k[626]*y_cur[IDX_NOI]; - data[jistart + 15190] = 0.0 - k[3265]*y_cur[IDX_HNOI] - - k[3266]*y_cur[IDX_HNOI]; - data[jistart + 15191] = 0.0 - k[5269]*y_cur[IDX_HNOI] - - k[5270]*y_cur[IDX_HNOI]; - data[jistart + 15192] = 0.0 + k[5473]*y_cur[IDX_OHI]; - data[jistart + 15193] = 0.0 + k[5311]*y_cur[IDX_NO2I] + - k[5316]*y_cur[IDX_O2I] + k[5322]*y_cur[IDX_OHI]; - data[jistart + 15194] = 0.0 + k[5420]*y_cur[IDX_OI]; - data[jistart + 15195] = 0.0 + k[626]*y_cur[IDX_HNOII] + - k[5207]*y_cur[IDX_HCOI] - k[5326]*y_cur[IDX_HNOI]; - data[jistart + 15196] = 0.0 + k[5037]*y_cur[IDX_CH3I] + - k[5311]*y_cur[IDX_NHI]; - data[jistart + 15197] = 0.0 + k[5203]*y_cur[IDX_HCNOI] - - k[5411]*y_cur[IDX_HNOI] - k[5412]*y_cur[IDX_HNOI] - - k[5413]*y_cur[IDX_HNOI] + k[5420]*y_cur[IDX_NH2I]; - data[jistart + 15198] = 0.0 + k[5316]*y_cur[IDX_NHI]; - data[jistart + 15199] = 0.0 + k[5322]*y_cur[IDX_NHI] - - k[5472]*y_cur[IDX_HNOI] + k[5473]*y_cur[IDX_N2OI]; - data[jistart + 15200] = 0.0 + k[1010]*y_cur[IDX_H2NOII]; - data[jistart + 15201] = 0.0 - k[1907]*y_cur[IDX_HNOII]; - data[jistart + 15202] = 0.0 - k[1460]*y_cur[IDX_HNOII]; - data[jistart + 15203] = 0.0 - k[1747]*y_cur[IDX_HNOII]; - data[jistart + 15204] = 0.0 - k[2254]*y_cur[IDX_HNOII]; - data[jistart + 15205] = 0.0 - k[2009]*y_cur[IDX_HNOII]; - data[jistart + 15206] = 0.0 - k[2202]*y_cur[IDX_HNOII]; - data[jistart + 15207] = 0.0 - k[2278]*y_cur[IDX_HNOII]; - data[jistart + 15208] = 0.0 - k[2286]*y_cur[IDX_HNOII]; - data[jistart + 15209] = 0.0 - k[3049]*y_cur[IDX_HNOII] + - k[3483]*y_cur[IDX_NHII]; - data[jistart + 15210] = 0.0 - k[6422]*y_cur[IDX_HNOII]; - data[jistart + 15211] = 0.0 + k[2394]*y_cur[IDX_NOI]; - data[jistart + 15212] = 0.0 - k[2497]*y_cur[IDX_HNOII]; - data[jistart + 15213] = 0.0 - k[2550]*y_cur[IDX_HNOII] + - k[3490]*y_cur[IDX_NHII]; - data[jistart + 15214] = 0.0 + k[3457]*y_cur[IDX_NI]; - data[jistart + 15215] = 0.0 + k[2726]*y_cur[IDX_NOI]; - data[jistart + 15216] = 0.0 - k[2878]*y_cur[IDX_HNOII]; - data[jistart + 15217] = 0.0 - k[3008]*y_cur[IDX_HNOII]; - data[jistart + 15218] = 0.0 - k[3042]*y_cur[IDX_HNOII]; - data[jistart + 15219] = 0.0 - k[626]*y_cur[IDX_NOI] - - k[1121]*y_cur[IDX_eM] - k[1460]*y_cur[IDX_C2I] - - k[1747]*y_cur[IDX_C2HI] - k[1907]*y_cur[IDX_CI] - - k[2009]*y_cur[IDX_CH2I] - k[2202]*y_cur[IDX_CH4I] - - k[2254]*y_cur[IDX_CHI] - k[2278]*y_cur[IDX_CNI] - - k[2286]*y_cur[IDX_COI] - k[2497]*y_cur[IDX_H2COI] - - k[2550]*y_cur[IDX_H2OI] - k[2878]*y_cur[IDX_HCNI] - - k[3008]*y_cur[IDX_HCOI] - k[3042]*y_cur[IDX_HNCI] - - k[3049]*y_cur[IDX_CO2I] - k[3050]*y_cur[IDX_SI] - - k[3366]*y_cur[IDX_N2I] - k[3543]*y_cur[IDX_NH2I] - - k[3588]*y_cur[IDX_NH3I] - k[3615]*y_cur[IDX_NHI] - - k[3740]*y_cur[IDX_OI] - k[3803]*y_cur[IDX_OHI] - - k[6422]*y_cur[IDX_GRAINM]; - data[jistart + 15220] = 0.0 + k[3457]*y_cur[IDX_H2OII]; - data[jistart + 15221] = 0.0 - k[3366]*y_cur[IDX_HNOII]; - data[jistart + 15222] = 0.0 - k[3615]*y_cur[IDX_HNOII] + - k[3620]*y_cur[IDX_O2II]; - data[jistart + 15223] = 0.0 + k[3483]*y_cur[IDX_CO2I] + - k[3490]*y_cur[IDX_H2OI]; - data[jistart + 15224] = 0.0 - k[3543]*y_cur[IDX_HNOII]; - data[jistart + 15225] = 0.0 + k[3525]*y_cur[IDX_O2I] + - k[3746]*y_cur[IDX_OI]; - data[jistart + 15226] = 0.0 - k[3588]*y_cur[IDX_HNOII]; - data[jistart + 15227] = 0.0 + k[3747]*y_cur[IDX_OI]; - data[jistart + 15228] = 0.0 - k[626]*y_cur[IDX_HNOII] + - k[2394]*y_cur[IDX_H2II] + k[2726]*y_cur[IDX_H3II] + - k[3627]*y_cur[IDX_O2HII] + k[3787]*y_cur[IDX_OHII]; - data[jistart + 15229] = 0.0 - k[3740]*y_cur[IDX_HNOII] + - k[3746]*y_cur[IDX_NH2II] + k[3747]*y_cur[IDX_NH3II]; - data[jistart + 15230] = 0.0 + k[3525]*y_cur[IDX_NH2II]; - data[jistart + 15231] = 0.0 + k[3620]*y_cur[IDX_NHI]; - data[jistart + 15232] = 0.0 + k[3627]*y_cur[IDX_NOI]; - data[jistart + 15233] = 0.0 - k[3803]*y_cur[IDX_HNOII]; - data[jistart + 15234] = 0.0 + k[3787]*y_cur[IDX_NOI]; - data[jistart + 15235] = 0.0 - k[3050]*y_cur[IDX_HNOII]; - data[jistart + 15236] = 0.0 - k[1121]*y_cur[IDX_HNOII]; - data[jistart + 15237] = 0.0 - k[6589]*y_cur[IDX_HNSII]; - data[jistart + 15238] = 0.0 + k[2727]*y_cur[IDX_NSI]; - data[jistart + 15239] = 0.0 + k[2981]*y_cur[IDX_NSI]; - data[jistart + 15240] = 0.0 - k[1122]*y_cur[IDX_eM] - - k[6589]*y_cur[IDX_GRAINM]; - data[jistart + 15241] = 0.0 + k[3526]*y_cur[IDX_SI]; - data[jistart + 15242] = 0.0 + k[2727]*y_cur[IDX_H3II] + - k[2981]*y_cur[IDX_HCOII]; - data[jistart + 15243] = 0.0 + k[3526]*y_cur[IDX_NH2II]; - data[jistart + 15244] = 0.0 - k[1122]*y_cur[IDX_HNSII]; - data[jistart + 15245] = 0.0 - k[1414]*y_cur[IDX_HNSiI]; - data[jistart + 15246] = 0.0 + k[7149] + k[7331] + k[7513]; - data[jistart + 15247] = 0.0 + k[6552]*y_cur[IDX_SiNH2II]; - data[jistart + 15248] = 0.0 - k[394]*y_cur[IDX_HNSiI] - - k[2350]*y_cur[IDX_HNSiI]; - data[jistart + 15249] = 0.0 - k[2710]*y_cur[IDX_HNSiI]; - data[jistart + 15250] = 0.0 - k[2811]*y_cur[IDX_HNSiI]; - data[jistart + 15251] = 0.0 - k[2974]*y_cur[IDX_HNSiI]; - data[jistart + 15252] = 0.0 - k[394]*y_cur[IDX_HII] - - k[1414]*y_cur[IDX_CII] - k[2350]*y_cur[IDX_HII] - - k[2710]*y_cur[IDX_H3II] - k[2811]*y_cur[IDX_H3OII] - - k[2974]*y_cur[IDX_HCOII] - k[3267]*y_cur[IDX_HeII] - k[5870] - - k[6201] - k[6967]; - data[jistart + 15253] = 0.0 - k[3267]*y_cur[IDX_HNSiI]; - data[jistart + 15254] = 0.0 + k[5294]*y_cur[IDX_SiH2I] + - k[5295]*y_cur[IDX_SiH3I]; - data[jistart + 15255] = 0.0 + k[5294]*y_cur[IDX_NI]; - data[jistart + 15256] = 0.0 + k[5295]*y_cur[IDX_NI]; - data[jistart + 15257] = 0.0 + k[1264]*y_cur[IDX_eM] + - k[6552]*y_cur[IDX_GRAINM]; - data[jistart + 15258] = 0.0 + k[1264]*y_cur[IDX_SiNH2II]; - data[jistart + 15259] = 0.0 - k[2287]*y_cur[IDX_HNSiII]; - data[jistart + 15260] = 0.0 - k[6512]*y_cur[IDX_HNSiII] - - k[6513]*y_cur[IDX_HNSiII]; - data[jistart + 15261] = 0.0 + k[394]*y_cur[IDX_HNSiI]; - data[jistart + 15262] = 0.0 - k[2455]*y_cur[IDX_HNSiII]; - data[jistart + 15263] = 0.0 - k[2551]*y_cur[IDX_HNSiII]; - data[jistart + 15264] = 0.0 + k[2757]*y_cur[IDX_SiNI]; - data[jistart + 15265] = 0.0 + k[394]*y_cur[IDX_HII]; - data[jistart + 15266] = 0.0 - k[1123]*y_cur[IDX_eM] - - k[1124]*y_cur[IDX_eM] - k[2287]*y_cur[IDX_COI] - - k[2455]*y_cur[IDX_H2I] - k[2551]*y_cur[IDX_H2OI] - - k[6512]*y_cur[IDX_GRAINM] - k[6513]*y_cur[IDX_GRAINM]; - data[jistart + 15267] = 0.0 + k[3472]*y_cur[IDX_SiH2II] + - k[3473]*y_cur[IDX_SiH3II]; - data[jistart + 15268] = 0.0 + k[3472]*y_cur[IDX_NI]; - data[jistart + 15269] = 0.0 + k[3473]*y_cur[IDX_NI]; - data[jistart + 15270] = 0.0 + k[2757]*y_cur[IDX_H3II]; - data[jistart + 15271] = 0.0 - k[1123]*y_cur[IDX_HNSiII] - - k[1124]*y_cur[IDX_HNSiII]; - data[jistart + 15272] = 0.0 + k[1394]*y_cur[IDX_H2OI]; - data[jistart + 15273] = 0.0 + k[2676]*y_cur[IDX_H3II]; - data[jistart + 15274] = 0.0 + k[2435]*y_cur[IDX_H2I]; - data[jistart + 15275] = 0.0 - k[6390]*y_cur[IDX_HOCII]; - data[jistart + 15276] = 0.0 - k[137]*y_cur[IDX_HOCII] + - k[2435]*y_cur[IDX_COII]; - data[jistart + 15277] = 0.0 + k[1394]*y_cur[IDX_CII]; - data[jistart + 15278] = 0.0 + k[2676]*y_cur[IDX_COI]; - data[jistart + 15279] = 0.0 - k[137]*y_cur[IDX_H2I] - - k[1125]*y_cur[IDX_eM] - k[6390]*y_cur[IDX_GRAINM]; - data[jistart + 15280] = 0.0 - k[1125]*y_cur[IDX_HOCII]; - data[jistart + 15281] = 0.0 - k[5215]*y_cur[IDX_HOCNI]; - data[jistart + 15282] = 0.0 + k[4887]*y_cur[IDX_OHI]; - data[jistart + 15283] = 0.0 + k[8623]*y_cur[IDX_GOCNI]; - data[jistart + 15284] = 0.0 + k[7151] + k[7333] + k[7515]; - data[jistart + 15285] = 0.0 + k[8623]*y_cur[IDX_GHI]; - data[jistart + 15286] = 0.0 + k[6546]*y_cur[IDX_H2OCNII] + - k[6550]*y_cur[IDX_HNCOHII]; - data[jistart + 15287] = 0.0 - k[2351]*y_cur[IDX_HOCNI]; - data[jistart + 15288] = 0.0 + k[1016]*y_cur[IDX_eM] + - k[6546]*y_cur[IDX_GRAINM]; - data[jistart + 15289] = 0.0 - k[2711]*y_cur[IDX_HOCNI] - - k[2712]*y_cur[IDX_HOCNI]; - data[jistart + 15290] = 0.0 + k[1119]*y_cur[IDX_eM] + - k[6550]*y_cur[IDX_GRAINM]; - data[jistart + 15291] = 0.0 - k[2351]*y_cur[IDX_HII] - - k[2711]*y_cur[IDX_H3II] - k[2712]*y_cur[IDX_H3II] - - k[3268]*y_cur[IDX_HeII] - k[5215]*y_cur[IDX_CI] - - k[5216]*y_cur[IDX_OI] - k[5871] - k[6202] - k[6969]; - data[jistart + 15292] = 0.0 - k[3268]*y_cur[IDX_HOCNI]; - data[jistart + 15293] = 0.0 - k[5216]*y_cur[IDX_HOCNI]; - data[jistart + 15294] = 0.0 + k[4887]*y_cur[IDX_C2H5CNI]; - data[jistart + 15295] = 0.0 + k[1016]*y_cur[IDX_H2OCNII] + - k[1119]*y_cur[IDX_HNCOHII]; - data[jistart + 15296] = 0.0 - k[6524]*y_cur[IDX_HOCNII] - - k[6525]*y_cur[IDX_HOCNII]; - data[jistart + 15297] = 0.0 - k[3051]*y_cur[IDX_HOCNII] - - k[3052]*y_cur[IDX_HOCNII] + k[3766]*y_cur[IDX_OCNII]; - data[jistart + 15298] = 0.0 + k[3768]*y_cur[IDX_OCNI]; - data[jistart + 15299] = 0.0 - k[1126]*y_cur[IDX_eM] - - k[1127]*y_cur[IDX_eM] - k[3051]*y_cur[IDX_H2I] - - k[3052]*y_cur[IDX_H2I] - k[6524]*y_cur[IDX_GRAINM] - - k[6525]*y_cur[IDX_GRAINM]; - data[jistart + 15300] = 0.0 + k[3768]*y_cur[IDX_H3II]; - data[jistart + 15301] = 0.0 + k[3766]*y_cur[IDX_H2I]; - data[jistart + 15302] = 0.0 - k[1126]*y_cur[IDX_HOCNII] - - k[1127]*y_cur[IDX_HOCNII]; - data[jistart + 15303] = 0.0 + k[1971]*y_cur[IDX_OCSI]; - data[jistart + 15304] = 0.0 + k[2096]*y_cur[IDX_SOI]; - data[jistart + 15305] = 0.0 + k[2145]*y_cur[IDX_OCSI]; - data[jistart + 15306] = 0.0 - k[6717]*y_cur[IDX_HOCSII] - - k[6718]*y_cur[IDX_HOCSII]; - data[jistart + 15307] = 0.0 - k[2552]*y_cur[IDX_HOCSII]; - data[jistart + 15308] = 0.0 + k[2732]*y_cur[IDX_OCSI]; - data[jistart + 15309] = 0.0 + k[2982]*y_cur[IDX_OCSI]; - data[jistart + 15310] = 0.0 - k[1128]*y_cur[IDX_eM] - - k[1129]*y_cur[IDX_eM] - k[2552]*y_cur[IDX_H2OI] - - k[6717]*y_cur[IDX_GRAINM] - k[6718]*y_cur[IDX_GRAINM]; - data[jistart + 15311] = 0.0 + k[1971]*y_cur[IDX_CHII] + - k[2145]*y_cur[IDX_CH4II] + k[2732]*y_cur[IDX_H3II] + - k[2982]*y_cur[IDX_HCOII]; - data[jistart + 15312] = 0.0 + k[2096]*y_cur[IDX_CH3II]; - data[jistart + 15313] = 0.0 - k[1128]*y_cur[IDX_HOCSII] - - k[1129]*y_cur[IDX_HOCSII]; - data[jistart + 15314] = 0.0 - k[5217]*y_cur[IDX_HONCI]; - data[jistart + 15315] = 0.0 + k[8622]*y_cur[IDX_GHI]; - data[jistart + 15316] = 0.0 + k[8622]*y_cur[IDX_GCNOI]; - data[jistart + 15317] = 0.0 + k[7155] + k[7337] + k[7519]; - data[jistart + 15318] = 0.0 + k[6534]*y_cur[IDX_HCNOHII]; - data[jistart + 15319] = 0.0 - k[2352]*y_cur[IDX_HONCI]; - data[jistart + 15320] = 0.0 - k[2713]*y_cur[IDX_HONCI]; - data[jistart + 15321] = 0.0 + k[1096]*y_cur[IDX_eM] + - k[6534]*y_cur[IDX_GRAINM]; - data[jistart + 15322] = 0.0 - k[522]*y_cur[IDX_HeII] - - k[2352]*y_cur[IDX_HII] - k[2713]*y_cur[IDX_H3II] - - k[5217]*y_cur[IDX_CI] - k[5218]*y_cur[IDX_OI] - k[5872] - k[6203] - - k[6973]; - data[jistart + 15323] = 0.0 - k[522]*y_cur[IDX_HONCI]; - data[jistart + 15324] = 0.0 - k[5218]*y_cur[IDX_HONCI]; - data[jistart + 15325] = 0.0 + k[1096]*y_cur[IDX_HCNOHII]; - data[jistart + 15326] = 0.0 + k[2673]*y_cur[IDX_H3II]; - data[jistart + 15327] = 0.0 - k[6520]*y_cur[IDX_HONCII] - - k[6521]*y_cur[IDX_HONCII]; - data[jistart + 15328] = 0.0 - k[3053]*y_cur[IDX_HONCII]; - data[jistart + 15329] = 0.0 + k[2673]*y_cur[IDX_CNOI]; - data[jistart + 15330] = 0.0 + k[522]*y_cur[IDX_HeII]; - data[jistart + 15331] = 0.0 - k[1130]*y_cur[IDX_eM] - - k[1131]*y_cur[IDX_eM] - k[3053]*y_cur[IDX_H2I] - - k[6520]*y_cur[IDX_GRAINM] - k[6521]*y_cur[IDX_GRAINM]; - data[jistart + 15332] = 0.0 + k[522]*y_cur[IDX_HONCI]; - data[jistart + 15333] = 0.0 - k[1130]*y_cur[IDX_HONCII] - - k[1131]*y_cur[IDX_HONCII]; - data[jistart + 15334] = 0.0 - k[6571]*y_cur[IDX_HPNII] - - k[6572]*y_cur[IDX_HPNII] - k[6573]*y_cur[IDX_HPNII]; - data[jistart + 15335] = 0.0 + k[2737]*y_cur[IDX_PNI]; - data[jistart + 15336] = 0.0 + k[2816]*y_cur[IDX_PNI]; - data[jistart + 15337] = 0.0 + k[2986]*y_cur[IDX_PNI]; - data[jistart + 15338] = 0.0 - k[1132]*y_cur[IDX_eM] - - k[1133]*y_cur[IDX_eM] - k[1134]*y_cur[IDX_eM] - - k[6571]*y_cur[IDX_GRAINM] - k[6572]*y_cur[IDX_GRAINM] - - k[6573]*y_cur[IDX_GRAINM]; - data[jistart + 15339] = 0.0 + k[2737]*y_cur[IDX_H3II] + - k[2816]*y_cur[IDX_H3OII] + k[2986]*y_cur[IDX_HCOII]; - data[jistart + 15340] = 0.0 - k[1132]*y_cur[IDX_HPNII] - - k[1133]*y_cur[IDX_HPNII] - k[1134]*y_cur[IDX_HPNII]; - data[jistart + 15341] = 0.0 - k[4964]*y_cur[IDX_HPOI]; - data[jistart + 15342] = 0.0 - k[181]*y_cur[IDX_HPOI]; - data[jistart + 15343] = 0.0 + k[7175] + k[7357] + k[7539]; - data[jistart + 15344] = 0.0 + k[6622]*y_cur[IDX_H2POII]; - data[jistart + 15345] = 0.0 - k[395]*y_cur[IDX_HPOI]; - data[jistart + 15346] = 0.0 + k[1017]*y_cur[IDX_eM] + - k[6622]*y_cur[IDX_GRAINM]; - data[jistart + 15347] = 0.0 - k[2714]*y_cur[IDX_HPOI]; - data[jistart + 15348] = 0.0 - k[2812]*y_cur[IDX_HPOI]; - data[jistart + 15349] = 0.0 - k[2975]*y_cur[IDX_HPOI]; - data[jistart + 15350] = 0.0 - k[181]*y_cur[IDX_CII] - - k[395]*y_cur[IDX_HII] - k[2714]*y_cur[IDX_H3II] - - k[2812]*y_cur[IDX_H3OII] - k[2975]*y_cur[IDX_HCOII] - - k[3269]*y_cur[IDX_HeII] - k[3270]*y_cur[IDX_HeII] - - k[4964]*y_cur[IDX_CI] - k[5414]*y_cur[IDX_OI] - k[5873] - k[6204] - - k[6993]; - data[jistart + 15351] = 0.0 - k[3269]*y_cur[IDX_HPOI] - - k[3270]*y_cur[IDX_HPOI]; - data[jistart + 15352] = 0.0 - k[5414]*y_cur[IDX_HPOI] + - k[5433]*y_cur[IDX_PH2I]; - data[jistart + 15353] = 0.0 + k[5433]*y_cur[IDX_OI]; - data[jistart + 15354] = 0.0 + k[1017]*y_cur[IDX_H2POII]; - data[jistart + 15355] = 0.0 + k[181]*y_cur[IDX_HPOI]; - data[jistart + 15356] = 0.0 + k[3810]*y_cur[IDX_PII]; - data[jistart + 15357] = 0.0 - k[6612]*y_cur[IDX_HPOII] - - k[6613]*y_cur[IDX_HPOII] - k[6614]*y_cur[IDX_HPOII]; - data[jistart + 15358] = 0.0 + k[395]*y_cur[IDX_HPOI]; - data[jistart + 15359] = 0.0 - k[2553]*y_cur[IDX_HPOII] + - k[2562]*y_cur[IDX_PII] + k[2565]*y_cur[IDX_PHII]; - data[jistart + 15360] = 0.0 + k[2738]*y_cur[IDX_POI]; - data[jistart + 15361] = 0.0 + k[2815]*y_cur[IDX_PI]; - data[jistart + 15362] = 0.0 + k[2987]*y_cur[IDX_POI]; - data[jistart + 15363] = 0.0 + k[181]*y_cur[IDX_CII] + - k[395]*y_cur[IDX_HII]; - data[jistart + 15364] = 0.0 - k[1135]*y_cur[IDX_eM] - - k[1136]*y_cur[IDX_eM] - k[1137]*y_cur[IDX_eM] - - k[2553]*y_cur[IDX_H2OI] - k[3741]*y_cur[IDX_OI] - - k[6612]*y_cur[IDX_GRAINM] - k[6613]*y_cur[IDX_GRAINM] - - k[6614]*y_cur[IDX_GRAINM]; - data[jistart + 15365] = 0.0 - k[3741]*y_cur[IDX_HPOII]; - data[jistart + 15366] = 0.0 + k[2815]*y_cur[IDX_H3OII]; - data[jistart + 15367] = 0.0 + k[2562]*y_cur[IDX_H2OI] + - k[3810]*y_cur[IDX_CH3OHI]; - data[jistart + 15368] = 0.0 + k[2565]*y_cur[IDX_H2OI]; - data[jistart + 15369] = 0.0 + k[2738]*y_cur[IDX_H3II] + - k[2987]*y_cur[IDX_HCOII]; - data[jistart + 15370] = 0.0 - k[1135]*y_cur[IDX_HPOII] - - k[1136]*y_cur[IDX_HPOII] - k[1137]*y_cur[IDX_HPOII]; - data[jistart + 15371] = 0.0 - k[4965]*y_cur[IDX_HSI] - - k[4966]*y_cur[IDX_HSI]; - data[jistart + 15372] = 0.0 - k[1415]*y_cur[IDX_HSI]; - data[jistart + 15373] = 0.0 + k[1519]*y_cur[IDX_H2SI]; - data[jistart + 15374] = 0.0 + k[1715]*y_cur[IDX_SII]; - data[jistart + 15375] = 0.0 + k[3830]*y_cur[IDX_SII]; - data[jistart + 15376] = 0.0 + k[5101]*y_cur[IDX_SI] + - k[5102]*y_cur[IDX_SOI]; - data[jistart + 15377] = 0.0 + k[5032]*y_cur[IDX_H2SI]; - data[jistart + 15378] = 0.0 - k[2084]*y_cur[IDX_HSI]; - data[jistart + 15379] = 0.0 + k[3823]*y_cur[IDX_SII] + - k[3856]*y_cur[IDX_SOII]; - data[jistart + 15380] = 0.0 + k[5062]*y_cur[IDX_SI]; - data[jistart + 15381] = 0.0 + k[2281]*y_cur[IDX_H2SI]; - data[jistart + 15382] = 0.0 + k[5462]*y_cur[IDX_OHI]; - data[jistart + 15383] = 0.0 + k[505]*y_cur[IDX_HSII]; - data[jistart + 15384] = 0.0 + k[8607]*y_cur[IDX_GSI]; - data[jistart + 15385] = 0.0 + k[7120] + k[7302] + k[7484]; - data[jistart + 15386] = 0.0 + k[6446]*y_cur[IDX_H2SII] + - k[6451]*y_cur[IDX_H3SII] + k[6452]*y_cur[IDX_H3SII] + - k[6719]*y_cur[IDX_HSiSII] + k[6758]*y_cur[IDX_HS2II] + - k[6764]*y_cur[IDX_H2S2II] + k[6764]*y_cur[IDX_H2S2II]; - data[jistart + 15387] = 0.0 + k[8607]*y_cur[IDX_GHI]; - data[jistart + 15388] = 0.0 + k[109]*y_cur[IDX_SM] + - k[2849]*y_cur[IDX_SiSII] + k[5169]*y_cur[IDX_H2SI] - - k[5178]*y_cur[IDX_HSI] + k[5188]*y_cur[IDX_NSI] + - k[5197]*y_cur[IDX_OCSI] + k[5199]*y_cur[IDX_S2I] + - k[5200]*y_cur[IDX_SOI]; - data[jistart + 15389] = 0.0 - k[397]*y_cur[IDX_HSI] - - k[2353]*y_cur[IDX_HSI]; - data[jistart + 15390] = 0.0 - k[5140]*y_cur[IDX_HSI] + - k[5149]*y_cur[IDX_SI]; - data[jistart + 15391] = 0.0 + k[2501]*y_cur[IDX_SII]; - data[jistart + 15392] = 0.0 + k[2544]*y_cur[IDX_H2SII]; - data[jistart + 15393] = 0.0 + k[2511]*y_cur[IDX_H2SI]; - data[jistart + 15394] = 0.0 + k[1519]*y_cur[IDX_C2H2II] + - k[2281]*y_cur[IDX_COII] + k[2511]*y_cur[IDX_H2OII] + - k[2574]*y_cur[IDX_H2SII] + k[2581]*y_cur[IDX_N2OII] + - k[3348]*y_cur[IDX_NII] + k[3517]*y_cur[IDX_NH2II] + - k[3551]*y_cur[IDX_NH3II] + k[5032]*y_cur[IDX_CH3I] + - k[5169]*y_cur[IDX_HI] + k[5400]*y_cur[IDX_OI] + - k[5468]*y_cur[IDX_OHI] + k[6164]; - data[jistart + 15395] = 0.0 + k[1019]*y_cur[IDX_eM] + - k[2544]*y_cur[IDX_H2OI] + k[2574]*y_cur[IDX_H2SI] + - k[3576]*y_cur[IDX_NH3I] + k[6446]*y_cur[IDX_GRAINM]; - data[jistart + 15396] = 0.0 + k[3227]*y_cur[IDX_HeII] + k[5840] + - k[5840] + k[6162] + k[6162]; - data[jistart + 15397] = 0.0 + k[1022]*y_cur[IDX_eM] + - k[1022]*y_cur[IDX_eM] + k[6764]*y_cur[IDX_GRAINM] + - k[6764]*y_cur[IDX_GRAINM]; - data[jistart + 15398] = 0.0 - k[2716]*y_cur[IDX_HSI]; - data[jistart + 15399] = 0.0 + k[1046]*y_cur[IDX_eM] + - k[1047]*y_cur[IDX_eM] + k[6451]*y_cur[IDX_GRAINM] + - k[6452]*y_cur[IDX_GRAINM]; - data[jistart + 15400] = 0.0 + k[5487]*y_cur[IDX_SI]; - data[jistart + 15401] = 0.0 - k[2977]*y_cur[IDX_HSI]; - data[jistart + 15402] = 0.0 + k[5408]*y_cur[IDX_OI]; - data[jistart + 15403] = 0.0 - k[397]*y_cur[IDX_HII] - - k[1415]*y_cur[IDX_CII] - k[2084]*y_cur[IDX_CH3II] - - k[2353]*y_cur[IDX_HII] - k[2716]*y_cur[IDX_H3II] - - k[2977]*y_cur[IDX_HCOII] - k[3273]*y_cur[IDX_HeII] - - k[4965]*y_cur[IDX_CI] - k[4966]*y_cur[IDX_CI] - - k[5140]*y_cur[IDX_H2I] - k[5178]*y_cur[IDX_HI] - - k[5219]*y_cur[IDX_HSI] - k[5219]*y_cur[IDX_HSI] - - k[5219]*y_cur[IDX_HSI] - k[5219]*y_cur[IDX_HSI] - - k[5271]*y_cur[IDX_NI] - k[5272]*y_cur[IDX_NI] - - k[5415]*y_cur[IDX_OI] - k[5416]*y_cur[IDX_OI] - - k[5488]*y_cur[IDX_SI] - k[5875] - k[6209] - k[6938]; - data[jistart + 15404] = 0.0 + k[505]*y_cur[IDX_FeI] + - k[534]*y_cur[IDX_MgI] + k[609]*y_cur[IDX_NH3I] + - k[627]*y_cur[IDX_NOI] + k[638]*y_cur[IDX_NaI] + k[710]*y_cur[IDX_SI] - + k[720]*y_cur[IDX_SiI]; - data[jistart + 15405] = 0.0 + k[3271]*y_cur[IDX_HeII] + k[5874] + - k[6208]; - data[jistart + 15406] = 0.0 + k[1139]*y_cur[IDX_eM] + - k[6758]*y_cur[IDX_GRAINM]; - data[jistart + 15407] = 0.0 + k[1147]*y_cur[IDX_eM] + - k[6719]*y_cur[IDX_GRAINM]; - data[jistart + 15408] = 0.0 + k[3227]*y_cur[IDX_H2S2I] + - k[3271]*y_cur[IDX_HS2I] - k[3273]*y_cur[IDX_HSI]; - data[jistart + 15409] = 0.0 + k[534]*y_cur[IDX_HSII]; - data[jistart + 15410] = 0.0 - k[5271]*y_cur[IDX_HSI] - - k[5272]*y_cur[IDX_HSI]; - data[jistart + 15411] = 0.0 + k[3348]*y_cur[IDX_H2SI]; - data[jistart + 15412] = 0.0 + k[2581]*y_cur[IDX_H2SI]; - data[jistart + 15413] = 0.0 + k[5324]*y_cur[IDX_SI]; - data[jistart + 15414] = 0.0 + k[3517]*y_cur[IDX_H2SI]; - data[jistart + 15415] = 0.0 + k[609]*y_cur[IDX_HSII] + - k[3576]*y_cur[IDX_H2SII]; - data[jistart + 15416] = 0.0 + k[3551]*y_cur[IDX_H2SI]; - data[jistart + 15417] = 0.0 + k[627]*y_cur[IDX_HSII]; - data[jistart + 15418] = 0.0 + k[5188]*y_cur[IDX_HI]; - data[jistart + 15419] = 0.0 + k[638]*y_cur[IDX_HSII]; - data[jistart + 15420] = 0.0 + k[5400]*y_cur[IDX_H2SI] + - k[5408]*y_cur[IDX_HCSI] - k[5415]*y_cur[IDX_HSI] - - k[5416]*y_cur[IDX_HSI]; - data[jistart + 15421] = 0.0 + k[5197]*y_cur[IDX_HI]; - data[jistart + 15422] = 0.0 + k[5462]*y_cur[IDX_CSI] + - k[5468]*y_cur[IDX_H2SI]; - data[jistart + 15423] = 0.0 + k[710]*y_cur[IDX_HSII] + - k[5062]*y_cur[IDX_CH4I] + k[5101]*y_cur[IDX_CHI] + - k[5149]*y_cur[IDX_H2I] + k[5324]*y_cur[IDX_NHI] + - k[5487]*y_cur[IDX_HCOI] - k[5488]*y_cur[IDX_HSI]; - data[jistart + 15424] = 0.0 + k[1715]*y_cur[IDX_C2H4I] + - k[2501]*y_cur[IDX_H2COI] + k[3823]*y_cur[IDX_CH3CHCH2I] + - k[3830]*y_cur[IDX_C4H2I]; - data[jistart + 15425] = 0.0 + k[109]*y_cur[IDX_HI]; - data[jistart + 15426] = 0.0 + k[5199]*y_cur[IDX_HI]; - data[jistart + 15427] = 0.0 + k[5102]*y_cur[IDX_CHI] + - k[5200]*y_cur[IDX_HI]; - data[jistart + 15428] = 0.0 + k[3856]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 15429] = 0.0 + k[720]*y_cur[IDX_HSII]; - data[jistart + 15430] = 0.0 + k[2849]*y_cur[IDX_HI]; - data[jistart + 15431] = 0.0 + k[1019]*y_cur[IDX_H2SII] + - k[1022]*y_cur[IDX_H2S2II] + k[1022]*y_cur[IDX_H2S2II] + - k[1046]*y_cur[IDX_H3SII] + k[1047]*y_cur[IDX_H3SII] + - k[1139]*y_cur[IDX_HS2II] + k[1147]*y_cur[IDX_HSiSII]; - data[jistart + 15432] = 0.0 - k[1908]*y_cur[IDX_HSII]; - data[jistart + 15433] = 0.0 - k[2255]*y_cur[IDX_HSII]; - data[jistart + 15434] = 0.0 + k[1974]*y_cur[IDX_SI]; - data[jistart + 15435] = 0.0 - k[2203]*y_cur[IDX_HSII]; - data[jistart + 15436] = 0.0 + k[2235]*y_cur[IDX_SI]; - data[jistart + 15437] = 0.0 - k[505]*y_cur[IDX_HSII]; - data[jistart + 15438] = 0.0 - k[6445]*y_cur[IDX_HSII]; - data[jistart + 15439] = 0.0 + k[2842]*y_cur[IDX_H2SII] - - k[2844]*y_cur[IDX_HSII]; - data[jistart + 15440] = 0.0 + k[397]*y_cur[IDX_HSI] + - k[2339]*y_cur[IDX_H2SI] + k[2356]*y_cur[IDX_OCSI]; - data[jistart + 15441] = 0.0 - k[2456]*y_cur[IDX_HSII] + - k[2470]*y_cur[IDX_SII] - k[5557]*y_cur[IDX_HSII]; - data[jistart + 15442] = 0.0 + k[2387]*y_cur[IDX_H2SI]; - data[jistart + 15443] = 0.0 + k[2490]*y_cur[IDX_SI]; - data[jistart + 15444] = 0.0 - k[2554]*y_cur[IDX_HSII]; - data[jistart + 15445] = 0.0 + k[2516]*y_cur[IDX_SI]; - data[jistart + 15446] = 0.0 + k[2339]*y_cur[IDX_HII] + - k[2387]*y_cur[IDX_H2II] - k[3054]*y_cur[IDX_HSII] - - k[3055]*y_cur[IDX_HSII] + k[3229]*y_cur[IDX_HeII] + - k[3347]*y_cur[IDX_NII] + k[3362]*y_cur[IDX_N2II] + - k[3516]*y_cur[IDX_NH2II] + k[3642]*y_cur[IDX_OII]; - data[jistart + 15447] = 0.0 + k[2842]*y_cur[IDX_HI] + - k[3734]*y_cur[IDX_OI]; - data[jistart + 15448] = 0.0 + k[3227]*y_cur[IDX_HeII]; - data[jistart + 15449] = 0.0 + k[2740]*y_cur[IDX_SI]; - data[jistart + 15450] = 0.0 - k[2879]*y_cur[IDX_HSII]; - data[jistart + 15451] = 0.0 + k[2860]*y_cur[IDX_SI]; - data[jistart + 15452] = 0.0 + k[3012]*y_cur[IDX_SII]; - data[jistart + 15453] = 0.0 + k[2989]*y_cur[IDX_SI]; - data[jistart + 15454] = 0.0 - k[3043]*y_cur[IDX_HSII]; - data[jistart + 15455] = 0.0 + k[3050]*y_cur[IDX_SI]; - data[jistart + 15456] = 0.0 + k[397]*y_cur[IDX_HII]; - data[jistart + 15457] = 0.0 - k[505]*y_cur[IDX_FeI] - - k[534]*y_cur[IDX_MgI] - k[609]*y_cur[IDX_NH3I] - - k[627]*y_cur[IDX_NOI] - k[638]*y_cur[IDX_NaI] - k[710]*y_cur[IDX_SI] - - k[720]*y_cur[IDX_SiI] - k[1138]*y_cur[IDX_eM] - - k[1908]*y_cur[IDX_CI] - k[2203]*y_cur[IDX_CH4I] - - k[2255]*y_cur[IDX_CHI] - k[2456]*y_cur[IDX_H2I] - - k[2554]*y_cur[IDX_H2OI] - k[2844]*y_cur[IDX_HI] - - k[2879]*y_cur[IDX_HCNI] - k[3043]*y_cur[IDX_HNCI] - - k[3054]*y_cur[IDX_H2SI] - k[3055]*y_cur[IDX_H2SI] - - k[3462]*y_cur[IDX_NI] - k[3589]*y_cur[IDX_NH3I] - - k[3742]*y_cur[IDX_OI] - k[3743]*y_cur[IDX_OI] - - k[5557]*y_cur[IDX_H2I] - k[6205] - k[6206] - - k[6445]*y_cur[IDX_GRAINM]; - data[jistart + 15458] = 0.0 + k[3227]*y_cur[IDX_H2S2I] + - k[3229]*y_cur[IDX_H2SI]; - data[jistart + 15459] = 0.0 - k[534]*y_cur[IDX_HSII]; - data[jistart + 15460] = 0.0 - k[3462]*y_cur[IDX_HSII]; - data[jistart + 15461] = 0.0 + k[3347]*y_cur[IDX_H2SI]; - data[jistart + 15462] = 0.0 + k[3362]*y_cur[IDX_H2SI]; - data[jistart + 15463] = 0.0 + k[3376]*y_cur[IDX_SI]; - data[jistart + 15464] = 0.0 + k[3505]*y_cur[IDX_SI]; - data[jistart + 15465] = 0.0 + k[3516]*y_cur[IDX_H2SI] + - k[3527]*y_cur[IDX_SI]; - data[jistart + 15466] = 0.0 - k[609]*y_cur[IDX_HSII] - - k[3589]*y_cur[IDX_HSII]; - data[jistart + 15467] = 0.0 - k[627]*y_cur[IDX_HSII]; - data[jistart + 15468] = 0.0 - k[638]*y_cur[IDX_HSII]; - data[jistart + 15469] = 0.0 + k[3734]*y_cur[IDX_H2SII] - - k[3742]*y_cur[IDX_HSII] - k[3743]*y_cur[IDX_HSII]; - data[jistart + 15470] = 0.0 + k[3642]*y_cur[IDX_H2SI]; - data[jistart + 15471] = 0.0 + k[3840]*y_cur[IDX_SI]; - data[jistart + 15472] = 0.0 + k[2356]*y_cur[IDX_HII]; - data[jistart + 15473] = 0.0 + k[3789]*y_cur[IDX_SI]; - data[jistart + 15474] = 0.0 - k[710]*y_cur[IDX_HSII] + - k[1974]*y_cur[IDX_CHII] + k[2235]*y_cur[IDX_CH5II] + - k[2490]*y_cur[IDX_H2COII] + k[2516]*y_cur[IDX_H2OII] + - k[2740]*y_cur[IDX_H3II] + k[2860]*y_cur[IDX_HCNII] + - k[2989]*y_cur[IDX_HCOII] + k[3050]*y_cur[IDX_HNOII] + - k[3376]*y_cur[IDX_N2HII] + k[3505]*y_cur[IDX_NHII] + - k[3527]*y_cur[IDX_NH2II] + k[3789]*y_cur[IDX_OHII] + - k[3840]*y_cur[IDX_O2HII]; - data[jistart + 15475] = 0.0 + k[2470]*y_cur[IDX_H2I] + - k[3012]*y_cur[IDX_HCOI]; - data[jistart + 15476] = 0.0 - k[720]*y_cur[IDX_HSII]; - data[jistart + 15477] = 0.0 - k[1138]*y_cur[IDX_HSII]; - data[jistart + 15478] = 0.0 + k[1724]*y_cur[IDX_S2II]; - data[jistart + 15479] = 0.0 + k[2114]*y_cur[IDX_S2II]; - data[jistart + 15480] = 0.0 + k[7219] + k[7401] + k[7583]; - data[jistart + 15481] = 0.0 + k[6763]*y_cur[IDX_H2S2II] + - k[6771]*y_cur[IDX_H3S2II]; - data[jistart + 15482] = 0.0 - k[396]*y_cur[IDX_HS2I]; - data[jistart + 15483] = 0.0 + k[1021]*y_cur[IDX_eM] + - k[6763]*y_cur[IDX_GRAINM]; - data[jistart + 15484] = 0.0 - k[2715]*y_cur[IDX_HS2I]; - data[jistart + 15485] = 0.0 - k[2813]*y_cur[IDX_HS2I]; - data[jistart + 15486] = 0.0 + k[1050]*y_cur[IDX_eM] + - k[6771]*y_cur[IDX_GRAINM]; - data[jistart + 15487] = 0.0 - k[2976]*y_cur[IDX_HS2I]; - data[jistart + 15488] = 0.0 - k[396]*y_cur[IDX_HII] - - k[2715]*y_cur[IDX_H3II] - k[2813]*y_cur[IDX_H3OII] - - k[2976]*y_cur[IDX_HCOII] - k[3271]*y_cur[IDX_HeII] - - k[3272]*y_cur[IDX_HeII] - k[5874] - k[6207] - k[6208] - k[7037]; - data[jistart + 15489] = 0.0 - k[3271]*y_cur[IDX_HS2I] - - k[3272]*y_cur[IDX_HS2I]; - data[jistart + 15490] = 0.0 + k[1724]*y_cur[IDX_C2H5OHI] + - k[2114]*y_cur[IDX_CH3CHOI]; - data[jistart + 15491] = 0.0 + k[1021]*y_cur[IDX_H2S2II] + - k[1050]*y_cur[IDX_H3S2II]; - data[jistart + 15492] = 0.0 - k[6758]*y_cur[IDX_HS2II] - - k[6759]*y_cur[IDX_HS2II]; - data[jistart + 15493] = 0.0 + k[396]*y_cur[IDX_HS2I]; - data[jistart + 15494] = 0.0 - k[5558]*y_cur[IDX_HS2II]; - data[jistart + 15495] = 0.0 - k[2579]*y_cur[IDX_HS2II] + - k[3055]*y_cur[IDX_HSII] + k[3828]*y_cur[IDX_SII]; - data[jistart + 15496] = 0.0 + k[3228]*y_cur[IDX_HeII]; - data[jistart + 15497] = 0.0 + k[2739]*y_cur[IDX_S2I]; - data[jistart + 15498] = 0.0 + k[2817]*y_cur[IDX_S2I]; - data[jistart + 15499] = 0.0 + k[2988]*y_cur[IDX_S2I]; - data[jistart + 15500] = 0.0 + k[3055]*y_cur[IDX_H2SI]; - data[jistart + 15501] = 0.0 + k[396]*y_cur[IDX_HII] + k[6207]; - data[jistart + 15502] = 0.0 - k[1139]*y_cur[IDX_eM] - - k[1140]*y_cur[IDX_eM] - k[2579]*y_cur[IDX_H2SI] - - k[5558]*y_cur[IDX_H2I] - k[6758]*y_cur[IDX_GRAINM] - - k[6759]*y_cur[IDX_GRAINM]; - data[jistart + 15503] = 0.0 + k[3228]*y_cur[IDX_H2S2I]; - data[jistart + 15504] = 0.0 + k[3828]*y_cur[IDX_H2SI]; - data[jistart + 15505] = 0.0 + k[2739]*y_cur[IDX_H3II] + - k[2817]*y_cur[IDX_H3OII] + k[2988]*y_cur[IDX_HCOII]; - data[jistart + 15506] = 0.0 - k[1139]*y_cur[IDX_HS2II] - - k[1140]*y_cur[IDX_HS2II]; - data[jistart + 15507] = 0.0 - k[6625]*y_cur[IDX_HSOII]; - data[jistart + 15508] = 0.0 + k[2517]*y_cur[IDX_SI]; - data[jistart + 15509] = 0.0 + k[2742]*y_cur[IDX_SOI]; - data[jistart + 15510] = 0.0 + k[2990]*y_cur[IDX_SOI]; - data[jistart + 15511] = 0.0 - k[1141]*y_cur[IDX_eM] - - k[6625]*y_cur[IDX_GRAINM]; - data[jistart + 15512] = 0.0 + k[2517]*y_cur[IDX_H2OII]; - data[jistart + 15513] = 0.0 + k[2742]*y_cur[IDX_H3II] + - k[2990]*y_cur[IDX_HCOII]; - data[jistart + 15514] = 0.0 - k[1141]*y_cur[IDX_HSOII]; - data[jistart + 15515] = 0.0 - k[6755]*y_cur[IDX_HSO2II] - - k[6756]*y_cur[IDX_HSO2II] - k[6757]*y_cur[IDX_HSO2II]; - data[jistart + 15516] = 0.0 + k[2471]*y_cur[IDX_SO2II]; - data[jistart + 15517] = 0.0 - k[2555]*y_cur[IDX_HSO2II]; - data[jistart + 15518] = 0.0 + k[2518]*y_cur[IDX_SO2I]; - data[jistart + 15519] = 0.0 + k[2741]*y_cur[IDX_SO2I]; - data[jistart + 15520] = 0.0 - k[1142]*y_cur[IDX_eM] - - k[1143]*y_cur[IDX_eM] - k[1144]*y_cur[IDX_eM] - - k[2555]*y_cur[IDX_H2OI] - k[3590]*y_cur[IDX_NH3I] - - k[6755]*y_cur[IDX_GRAINM] - k[6756]*y_cur[IDX_GRAINM] - - k[6757]*y_cur[IDX_GRAINM]; - data[jistart + 15521] = 0.0 - k[3590]*y_cur[IDX_HSO2II]; - data[jistart + 15522] = 0.0 + k[2518]*y_cur[IDX_H2OII] + - k[2741]*y_cur[IDX_H3II]; - data[jistart + 15523] = 0.0 + k[2471]*y_cur[IDX_H2I]; - data[jistart + 15524] = 0.0 - k[1142]*y_cur[IDX_HSO2II] - - k[1143]*y_cur[IDX_HSO2II] - k[1144]*y_cur[IDX_HSO2II]; - data[jistart + 15525] = 0.0 - k[6723]*y_cur[IDX_HSiO2II] - - k[6724]*y_cur[IDX_HSiO2II]; - data[jistart + 15526] = 0.0 + k[2759]*y_cur[IDX_SiO2I]; - data[jistart + 15527] = 0.0 + k[3004]*y_cur[IDX_SiO2I]; - data[jistart + 15528] = 0.0 - k[1145]*y_cur[IDX_eM] - - k[1146]*y_cur[IDX_eM] - k[6723]*y_cur[IDX_GRAINM] - - k[6724]*y_cur[IDX_GRAINM]; - data[jistart + 15529] = 0.0 + k[2759]*y_cur[IDX_H3II] + - k[3004]*y_cur[IDX_HCOII]; - data[jistart + 15530] = 0.0 - k[1145]*y_cur[IDX_HSiO2II] - - k[1146]*y_cur[IDX_HSiO2II]; - data[jistart + 15531] = 0.0 - k[6719]*y_cur[IDX_HSiSII] - - k[6720]*y_cur[IDX_HSiSII]; - data[jistart + 15532] = 0.0 - k[2556]*y_cur[IDX_HSiSII]; - data[jistart + 15533] = 0.0 - k[2580]*y_cur[IDX_HSiSII]; - data[jistart + 15534] = 0.0 + k[2761]*y_cur[IDX_SiSI]; - data[jistart + 15535] = 0.0 - k[2880]*y_cur[IDX_HSiSII]; - data[jistart + 15536] = 0.0 + k[3006]*y_cur[IDX_SiSI]; - data[jistart + 15537] = 0.0 - k[1147]*y_cur[IDX_eM] - - k[1148]*y_cur[IDX_eM] - k[2556]*y_cur[IDX_H2OI] - - k[2580]*y_cur[IDX_H2SI] - k[2880]*y_cur[IDX_HCNI] - - k[3591]*y_cur[IDX_NH3I] - k[6719]*y_cur[IDX_GRAINM] - - k[6720]*y_cur[IDX_GRAINM]; - data[jistart + 15538] = 0.0 - k[3591]*y_cur[IDX_HSiSII]; - data[jistart + 15539] = 0.0 + k[3883]*y_cur[IDX_SiH2II]; - data[jistart + 15540] = 0.0 + k[3883]*y_cur[IDX_SI]; - data[jistart + 15541] = 0.0 + k[2761]*y_cur[IDX_H3II] + - k[3006]*y_cur[IDX_HCOII]; - data[jistart + 15542] = 0.0 - k[1147]*y_cur[IDX_HSiSII] - - k[1148]*y_cur[IDX_HSiSII]; - data[jistart + 15543] = 0.0 + k[513]*y_cur[IDX_HeII]; - data[jistart + 15544] = 0.0 + k[3906]*y_cur[IDX_HeII]; - data[jistart + 15545] = 0.0 + k[506]*y_cur[IDX_HeII] + - k[3056]*y_cur[IDX_HeII] + k[3057]*y_cur[IDX_HeII] + - k[3058]*y_cur[IDX_HeII] + k[3059]*y_cur[IDX_HeII] + - k[3060]*y_cur[IDX_HeII] + k[3061]*y_cur[IDX_HeII]; - data[jistart + 15546] = 0.0 + k[3941]*y_cur[IDX_HeII]; - data[jistart + 15547] = 0.0 + k[507]*y_cur[IDX_HeII] + - k[3067]*y_cur[IDX_HeII] + k[3068]*y_cur[IDX_HeII] + - k[3069]*y_cur[IDX_HeII] + k[3070]*y_cur[IDX_HeII] + - k[3071]*y_cur[IDX_HeII] + k[3072]*y_cur[IDX_HeII]; - data[jistart + 15548] = 0.0 + k[3976]*y_cur[IDX_HeII]; - data[jistart + 15549] = 0.0 + k[3062]*y_cur[IDX_HeII] + - k[3063]*y_cur[IDX_HeII] + k[3064]*y_cur[IDX_HeII] + - k[3065]*y_cur[IDX_HeII] + k[3066]*y_cur[IDX_HeII]; - data[jistart + 15550] = 0.0 + k[508]*y_cur[IDX_HeII] + - k[3073]*y_cur[IDX_HeII]; - data[jistart + 15551] = 0.0 + k[4011]*y_cur[IDX_HeII]; - data[jistart + 15552] = 0.0 + k[3086]*y_cur[IDX_HeII] + - k[3087]*y_cur[IDX_HeII] + k[3088]*y_cur[IDX_HeII]; - data[jistart + 15553] = 0.0 + k[4046]*y_cur[IDX_HeII]; - data[jistart + 15554] = 0.0 + k[509]*y_cur[IDX_HeII] + - k[3074]*y_cur[IDX_HeII] + k[3075]*y_cur[IDX_HeII] + - k[3076]*y_cur[IDX_HeII]; - data[jistart + 15555] = 0.0 + k[3077]*y_cur[IDX_HeII] + - k[3078]*y_cur[IDX_HeII]; - data[jistart + 15556] = 0.0 + k[510]*y_cur[IDX_HeII] + - k[3079]*y_cur[IDX_HeII] + k[3080]*y_cur[IDX_HeII] + - k[3081]*y_cur[IDX_HeII] + k[3082]*y_cur[IDX_HeII]; - data[jistart + 15557] = 0.0 + k[511]*y_cur[IDX_HeII] + - k[3083]*y_cur[IDX_HeII] + k[3084]*y_cur[IDX_HeII]; - data[jistart + 15558] = 0.0 + k[3085]*y_cur[IDX_HeII]; - data[jistart + 15559] = 0.0 + k[3188]*y_cur[IDX_HeII] + - k[3189]*y_cur[IDX_HeII] + k[3190]*y_cur[IDX_HeII]; - data[jistart + 15560] = 0.0 + k[3089]*y_cur[IDX_HeII]; - data[jistart + 15561] = 0.0 + k[3090]*y_cur[IDX_HeII]; - data[jistart + 15562] = 0.0 + k[3091]*y_cur[IDX_HeII] + - k[3092]*y_cur[IDX_HeII] + k[3093]*y_cur[IDX_HeII] + - k[3094]*y_cur[IDX_HeII]; - data[jistart + 15563] = 0.0 + k[3095]*y_cur[IDX_HeII]; - data[jistart + 15564] = 0.0 + k[4081]*y_cur[IDX_HeII]; - data[jistart + 15565] = 0.0 + k[3097]*y_cur[IDX_HeII]; - data[jistart + 15566] = 0.0 + k[4116]*y_cur[IDX_HeII]; - data[jistart + 15567] = 0.0 + k[3096]*y_cur[IDX_HeII]; - data[jistart + 15568] = 0.0 + k[512]*y_cur[IDX_HeII] + - k[3098]*y_cur[IDX_HeII]; - data[jistart + 15569] = 0.0 + k[4151]*y_cur[IDX_HeII]; - data[jistart + 15570] = 0.0 + k[3099]*y_cur[IDX_HeII] + - k[3100]*y_cur[IDX_HeII]; - data[jistart + 15571] = 0.0 + k[3101]*y_cur[IDX_HeII] + - k[3102]*y_cur[IDX_HeII]; - data[jistart + 15572] = 0.0 + k[3103]*y_cur[IDX_HeII] + - k[3104]*y_cur[IDX_HeII]; - data[jistart + 15573] = 0.0 + k[3105]*y_cur[IDX_HeII] + - k[3106]*y_cur[IDX_HeII] + k[3107]*y_cur[IDX_HeII]; - data[jistart + 15574] = 0.0 + k[4186]*y_cur[IDX_HeII]; - data[jistart + 15575] = 0.0 + k[3111]*y_cur[IDX_HeII] + - k[3112]*y_cur[IDX_HeII]; - data[jistart + 15576] = 0.0 + k[4221]*y_cur[IDX_HeII]; - data[jistart + 15577] = 0.0 + k[3238]*y_cur[IDX_HeII] + - k[3239]*y_cur[IDX_HeII] + k[3240]*y_cur[IDX_HeII]; - data[jistart + 15578] = 0.0 + k[3108]*y_cur[IDX_HeII] + - k[3109]*y_cur[IDX_HeII] + k[3110]*y_cur[IDX_HeII]; - data[jistart + 15579] = 0.0 + k[3113]*y_cur[IDX_HeII] + - k[3114]*y_cur[IDX_HeII]; - data[jistart + 15580] = 0.0 + k[3115]*y_cur[IDX_HeII] + - k[3116]*y_cur[IDX_HeII]; - data[jistart + 15581] = 0.0 + k[3117]*y_cur[IDX_HeII] + - k[3118]*y_cur[IDX_HeII]; - data[jistart + 15582] = 0.0 + k[4256]*y_cur[IDX_HeII]; - data[jistart + 15583] = 0.0 + k[3122]*y_cur[IDX_HeII] + - k[3123]*y_cur[IDX_HeII]; - data[jistart + 15584] = 0.0 + k[4291]*y_cur[IDX_HeII]; - data[jistart + 15585] = 0.0 + k[3119]*y_cur[IDX_HeII] + - k[3120]*y_cur[IDX_HeII] + k[3121]*y_cur[IDX_HeII]; - data[jistart + 15586] = 0.0 + k[3124]*y_cur[IDX_HeII]; - data[jistart + 15587] = 0.0 + k[4326]*y_cur[IDX_HeII]; - data[jistart + 15588] = 0.0 + k[3125]*y_cur[IDX_HeII] + - k[3126]*y_cur[IDX_HeII]; - data[jistart + 15589] = 0.0 + k[4361]*y_cur[IDX_HeII]; - data[jistart + 15590] = 0.0 + k[3132]*y_cur[IDX_HeII] + - k[3133]*y_cur[IDX_HeII]; - data[jistart + 15591] = 0.0 + k[4396]*y_cur[IDX_HeII]; - data[jistart + 15592] = 0.0 + k[3127]*y_cur[IDX_HeII] + - k[3128]*y_cur[IDX_HeII] + k[3129]*y_cur[IDX_HeII]; - data[jistart + 15593] = 0.0 + k[3130]*y_cur[IDX_HeII] + - k[3131]*y_cur[IDX_HeII]; - data[jistart + 15594] = 0.0 + k[3134]*y_cur[IDX_HeII] + - k[3135]*y_cur[IDX_HeII]; - data[jistart + 15595] = 0.0 + k[4431]*y_cur[IDX_HeII]; - data[jistart + 15596] = 0.0 + k[3139]*y_cur[IDX_HeII] + - k[3140]*y_cur[IDX_HeII]; - data[jistart + 15597] = 0.0 + k[4466]*y_cur[IDX_HeII]; - data[jistart + 15598] = 0.0 + k[3136]*y_cur[IDX_HeII] + - k[3137]*y_cur[IDX_HeII] + k[3138]*y_cur[IDX_HeII]; - data[jistart + 15599] = 0.0 + k[3141]*y_cur[IDX_HeII]; - data[jistart + 15600] = 0.0 + k[3142]*y_cur[IDX_HeII] + - k[3143]*y_cur[IDX_HeII]; - data[jistart + 15601] = 0.0 + k[4501]*y_cur[IDX_HeII]; - data[jistart + 15602] = 0.0 + k[3147]*y_cur[IDX_HeII] + - k[3148]*y_cur[IDX_HeII]; - data[jistart + 15603] = 0.0 + k[4536]*y_cur[IDX_HeII]; - data[jistart + 15604] = 0.0 + k[3144]*y_cur[IDX_HeII] + - k[3145]*y_cur[IDX_HeII] + k[3146]*y_cur[IDX_HeII]; - data[jistart + 15605] = 0.0 + k[3149]*y_cur[IDX_HeII] + - k[3150]*y_cur[IDX_HeII]; - data[jistart + 15606] = 0.0 + k[4571]*y_cur[IDX_HeII]; - data[jistart + 15607] = 0.0 + k[3154]*y_cur[IDX_HeII] + - k[3155]*y_cur[IDX_HeII]; - data[jistart + 15608] = 0.0 + k[4606]*y_cur[IDX_HeII]; - data[jistart + 15609] = 0.0 + k[3151]*y_cur[IDX_HeII] + - k[3152]*y_cur[IDX_HeII] + k[3153]*y_cur[IDX_HeII]; - data[jistart + 15610] = 0.0 + k[3156]*y_cur[IDX_HeII]; - data[jistart + 15611] = 0.0 + k[3157]*y_cur[IDX_HeII] + - k[3158]*y_cur[IDX_HeII]; - data[jistart + 15612] = 0.0 + k[3159]*y_cur[IDX_HeII]; - data[jistart + 15613] = 0.0 + k[515]*y_cur[IDX_HeII] + - k[3202]*y_cur[IDX_HeII]; - data[jistart + 15614] = 0.0 + k[4641]*y_cur[IDX_HeII]; - data[jistart + 15615] = 0.0 + k[3160]*y_cur[IDX_HeII] + - k[3161]*y_cur[IDX_HeII]; - data[jistart + 15616] = 0.0 + k[3162]*y_cur[IDX_HeII] + - k[3163]*y_cur[IDX_HeII] + k[3164]*y_cur[IDX_HeII]; - data[jistart + 15617] = 0.0 + k[3165]*y_cur[IDX_HeII] + - k[3166]*y_cur[IDX_HeII] + k[3167]*y_cur[IDX_HeII] + - k[3168]*y_cur[IDX_HeII] + k[3169]*y_cur[IDX_HeII]; - data[jistart + 15618] = 0.0 + k[3170]*y_cur[IDX_HeII]; - data[jistart + 15619] = 0.0 + k[3171]*y_cur[IDX_HeII] + - k[3172]*y_cur[IDX_HeII]; - data[jistart + 15620] = 0.0 + k[3173]*y_cur[IDX_HeII]; - data[jistart + 15621] = 0.0 + k[5637]*y_cur[IDX_HeII] + - k[5638]*y_cur[IDX_HeII]; - data[jistart + 15622] = 0.0 + k[5665]*y_cur[IDX_HeII] + - k[5666]*y_cur[IDX_HeII]; - data[jistart + 15623] = 0.0 + k[5659]*y_cur[IDX_HeII] + - k[5660]*y_cur[IDX_HeII]; - data[jistart + 15624] = 0.0 + k[3174]*y_cur[IDX_HeII] + - k[3175]*y_cur[IDX_HeII]; - data[jistart + 15625] = 0.0 + k[3176]*y_cur[IDX_HeII]; - data[jistart + 15626] = 0.0 + k[3177]*y_cur[IDX_HeII]; - data[jistart + 15627] = 0.0 + k[3178]*y_cur[IDX_HeII] + - k[3179]*y_cur[IDX_HeII]; - data[jistart + 15628] = 0.0 + k[3180]*y_cur[IDX_HeII]; - data[jistart + 15629] = 0.0 + k[3181]*y_cur[IDX_HeII] + - k[3182]*y_cur[IDX_HeII]; - data[jistart + 15630] = 0.0 + k[3183]*y_cur[IDX_HeII]; - data[jistart + 15631] = 0.0 + k[3184]*y_cur[IDX_HeII] + - k[3185]*y_cur[IDX_HeII] + k[3186]*y_cur[IDX_HeII] + - k[3187]*y_cur[IDX_HeII]; - data[jistart + 15632] = 0.0 + k[3191]*y_cur[IDX_HeII]; - data[jistart + 15633] = 0.0 + k[3192]*y_cur[IDX_HeII] + - k[3193]*y_cur[IDX_HeII]; - data[jistart + 15634] = 0.0 + k[5642]*y_cur[IDX_HeII] + - k[5643]*y_cur[IDX_HeII]; - data[jistart + 15635] = 0.0 + k[3194]*y_cur[IDX_HeII]; - data[jistart + 15636] = 0.0 + k[5671]*y_cur[IDX_HeII] + - k[5672]*y_cur[IDX_HeII] + k[5673]*y_cur[IDX_HeII] + - k[5674]*y_cur[IDX_HeII]; - data[jistart + 15637] = 0.0 + k[5631]*y_cur[IDX_HeII] + - k[5632]*y_cur[IDX_HeII]; - data[jistart + 15638] = 0.0 + k[3195]*y_cur[IDX_HeII]; - data[jistart + 15639] = 0.0 + k[3196]*y_cur[IDX_HeII] + - k[3197]*y_cur[IDX_HeII]; - data[jistart + 15640] = 0.0 + k[514]*y_cur[IDX_HeII] + - k[3198]*y_cur[IDX_HeII] + k[3199]*y_cur[IDX_HeII] + - k[3200]*y_cur[IDX_HeII] + k[3201]*y_cur[IDX_HeII]; - data[jistart + 15641] = 0.0 + k[3203]*y_cur[IDX_HeII] + - k[3204]*y_cur[IDX_HeII]; - data[jistart + 15642] = 0.0 + k[4676]*y_cur[IDX_HeII]; - data[jistart + 15643] = 0.0 + k[3205]*y_cur[IDX_HeII] + - k[3206]*y_cur[IDX_HeII]; - data[jistart + 15644] = 0.0 + k[3211]*y_cur[IDX_HeII]; - data[jistart + 15645] = 0.0 + k[516]*y_cur[IDX_HeII] + - k[3207]*y_cur[IDX_HeII] + k[3208]*y_cur[IDX_HeII] + - k[3209]*y_cur[IDX_HeII] + k[3210]*y_cur[IDX_HeII]; - data[jistart + 15646] = 0.0 + k[5653]*y_cur[IDX_HeII] + - k[5654]*y_cur[IDX_HeII]; - data[jistart + 15647] = 0.0 + k[5647]*y_cur[IDX_HeII] + - k[5648]*y_cur[IDX_HeII]; - data[jistart + 15648] = 0.0 + k[3212]*y_cur[IDX_HeII] + - k[3213]*y_cur[IDX_HeII]; - data[jistart + 15649] = 0.0 + k[3214]*y_cur[IDX_HeII] + - k[3215]*y_cur[IDX_HeII]; - data[jistart + 15650] = 0.0 + k[3216]*y_cur[IDX_HeII]; - data[jistart + 15651] = 0.0 + k[7072] + k[7254] + k[7436]; - data[jistart + 15652] = 0.0 + k[6312]*y_cur[IDX_HeII] + - k[6313]*y_cur[IDX_HeHII]; - data[jistart + 15653] = 0.0 + k[491]*y_cur[IDX_HeII] + - k[2845]*y_cur[IDX_HeHII]; - data[jistart + 15654] = 0.0 - k[5547]*y_cur[IDX_HeI]; - data[jistart + 15655] = 0.0 + k[4712]*y_cur[IDX_HeII]; - data[jistart + 15656] = 0.0 + k[458]*y_cur[IDX_HeII] + - k[2457]*y_cur[IDX_HeII] + k[2458]*y_cur[IDX_HeHII]; - data[jistart + 15657] = 0.0 - k[2390]*y_cur[IDX_HeI]; - data[jistart + 15658] = 0.0 + k[3217]*y_cur[IDX_HeII] + - k[3218]*y_cur[IDX_HeII]; - data[jistart + 15659] = 0.0 + k[517]*y_cur[IDX_HeII] + - k[3219]*y_cur[IDX_HeII] + k[3220]*y_cur[IDX_HeII] + - k[3221]*y_cur[IDX_HeII]; - data[jistart + 15660] = 0.0 + k[3222]*y_cur[IDX_HeII] + - k[3223]*y_cur[IDX_HeII] + k[3224]*y_cur[IDX_HeII]; - data[jistart + 15661] = 0.0 + k[518]*y_cur[IDX_HeII] + - k[3225]*y_cur[IDX_HeII] + k[3226]*y_cur[IDX_HeII]; - data[jistart + 15662] = 0.0 + k[519]*y_cur[IDX_HeII] + - k[3229]*y_cur[IDX_HeII] + k[3230]*y_cur[IDX_HeII]; - data[jistart + 15663] = 0.0 + k[3227]*y_cur[IDX_HeII] + - k[3228]*y_cur[IDX_HeII]; - data[jistart + 15664] = 0.0 + k[3231]*y_cur[IDX_HeII]; - data[jistart + 15665] = 0.0 + k[3232]*y_cur[IDX_HeII] + - k[3233]*y_cur[IDX_HeII]; - data[jistart + 15666] = 0.0 + k[3234]*y_cur[IDX_HeII] + - k[3235]*y_cur[IDX_HeII] + k[3236]*y_cur[IDX_HeII] + - k[3237]*y_cur[IDX_HeII]; - data[jistart + 15667] = 0.0 + k[3241]*y_cur[IDX_HeII] + - k[3242]*y_cur[IDX_HeII]; - data[jistart + 15668] = 0.0 + k[3243]*y_cur[IDX_HeII]; - data[jistart + 15669] = 0.0 + k[3244]*y_cur[IDX_HeII]; - data[jistart + 15670] = 0.0 + k[3245]*y_cur[IDX_HeII] + - k[3246]*y_cur[IDX_HeII] + k[3247]*y_cur[IDX_HeII] + - k[3248]*y_cur[IDX_HeII]; - data[jistart + 15671] = 0.0 + k[520]*y_cur[IDX_HeII]; - data[jistart + 15672] = 0.0 + k[3249]*y_cur[IDX_HeII] + - k[3251]*y_cur[IDX_HeII]; - data[jistart + 15673] = 0.0 + k[3252]*y_cur[IDX_HeII]; - data[jistart + 15674] = 0.0 + k[3253]*y_cur[IDX_HeII] + - k[3254]*y_cur[IDX_HeII]; - data[jistart + 15675] = 0.0 + k[3255]*y_cur[IDX_HeII] + - k[3256]*y_cur[IDX_HeII]; - data[jistart + 15676] = 0.0 + k[3257]*y_cur[IDX_HeII] + - k[3258]*y_cur[IDX_HeII]; - data[jistart + 15677] = 0.0 + k[3259]*y_cur[IDX_HeII]; - data[jistart + 15678] = 0.0 + k[3260]*y_cur[IDX_HeII]; - data[jistart + 15679] = 0.0 + k[3261]*y_cur[IDX_HeII] + - k[3262]*y_cur[IDX_HeII] + k[3263]*y_cur[IDX_HeII]; - data[jistart + 15680] = 0.0 + k[3030]*y_cur[IDX_HeII] + - k[3031]*y_cur[IDX_HeII] + k[3032]*y_cur[IDX_HeII] + - k[3033]*y_cur[IDX_HeII] + k[3034]*y_cur[IDX_HeII]; - data[jistart + 15681] = 0.0 + k[521]*y_cur[IDX_HeII] + - k[3264]*y_cur[IDX_HeII]; - data[jistart + 15682] = 0.0 + k[3265]*y_cur[IDX_HeII] + - k[3266]*y_cur[IDX_HeII]; - data[jistart + 15683] = 0.0 + k[3267]*y_cur[IDX_HeII]; - data[jistart + 15684] = 0.0 + k[3268]*y_cur[IDX_HeII]; - data[jistart + 15685] = 0.0 + k[522]*y_cur[IDX_HeII]; - data[jistart + 15686] = 0.0 + k[3269]*y_cur[IDX_HeII] + - k[3270]*y_cur[IDX_HeII]; - data[jistart + 15687] = 0.0 + k[3273]*y_cur[IDX_HeII]; - data[jistart + 15688] = 0.0 + k[3271]*y_cur[IDX_HeII] + - k[3272]*y_cur[IDX_HeII]; - data[jistart + 15689] = 0.0 - k[2390]*y_cur[IDX_H2II] - - k[5547]*y_cur[IDX_HII] - k[5683] - k[5876] - k[6298] - k[6890]; - data[jistart + 15690] = 0.0 + k[458]*y_cur[IDX_H2I] + - k[491]*y_cur[IDX_HI] + k[506]*y_cur[IDX_C10I] + - k[507]*y_cur[IDX_C10HI] + k[508]*y_cur[IDX_C2I] + - k[509]*y_cur[IDX_C2H2I] + k[510]*y_cur[IDX_C2H4I] + - k[511]*y_cur[IDX_C2H5I] + k[512]*y_cur[IDX_C3NI] + - k[513]*y_cur[IDX_CI] + k[514]*y_cur[IDX_CH4I] + - k[515]*y_cur[IDX_CHI] + k[516]*y_cur[IDX_CO2I] + - k[517]*y_cur[IDX_H2COI] + k[518]*y_cur[IDX_H2OI] + - k[519]*y_cur[IDX_H2SI] + k[520]*y_cur[IDX_HCNOI] + - k[521]*y_cur[IDX_HNCOI] + k[522]*y_cur[IDX_HONCI] + - k[523]*y_cur[IDX_N2I] + k[524]*y_cur[IDX_NH3I] + - k[525]*y_cur[IDX_O2I] + k[526]*y_cur[IDX_PI] + - k[527]*y_cur[IDX_SO2I] + k[528]*y_cur[IDX_SiI] + - k[2457]*y_cur[IDX_H2I] + k[3030]*y_cur[IDX_HNC3I] + - k[3031]*y_cur[IDX_HNC3I] + k[3032]*y_cur[IDX_HNC3I] + - k[3033]*y_cur[IDX_HNC3I] + k[3034]*y_cur[IDX_HNC3I] + - k[3056]*y_cur[IDX_C10I] + k[3057]*y_cur[IDX_C10I] + - k[3058]*y_cur[IDX_C10I] + k[3059]*y_cur[IDX_C10I] + - k[3060]*y_cur[IDX_C10I] + k[3061]*y_cur[IDX_C10I] + - k[3062]*y_cur[IDX_C10H2I] + k[3063]*y_cur[IDX_C10H2I] + - k[3064]*y_cur[IDX_C10H2I] + k[3065]*y_cur[IDX_C10H2I] + - k[3066]*y_cur[IDX_C10H2I] + k[3067]*y_cur[IDX_C10HI] + - k[3068]*y_cur[IDX_C10HI] + k[3069]*y_cur[IDX_C10HI] + - k[3070]*y_cur[IDX_C10HI] + k[3071]*y_cur[IDX_C10HI] + - k[3072]*y_cur[IDX_C10HI] + k[3073]*y_cur[IDX_C2I] + - k[3074]*y_cur[IDX_C2H2I] + k[3075]*y_cur[IDX_C2H2I] + - k[3076]*y_cur[IDX_C2H2I] + k[3077]*y_cur[IDX_C2H3I] + - k[3078]*y_cur[IDX_C2H3I] + k[3079]*y_cur[IDX_C2H4I] + - k[3080]*y_cur[IDX_C2H4I] + k[3081]*y_cur[IDX_C2H4I] + - k[3082]*y_cur[IDX_C2H4I] + k[3083]*y_cur[IDX_C2H5I] + - k[3084]*y_cur[IDX_C2H5I] + k[3085]*y_cur[IDX_C2H5OHI] + - k[3086]*y_cur[IDX_C2HI] + k[3087]*y_cur[IDX_C2HI] + - k[3088]*y_cur[IDX_C2HI] + k[3089]*y_cur[IDX_C2NI] + - k[3090]*y_cur[IDX_C2OI] + k[3091]*y_cur[IDX_C2SI] + - k[3092]*y_cur[IDX_C2SI] + k[3093]*y_cur[IDX_C2SI] + - k[3094]*y_cur[IDX_C2SI] + k[3095]*y_cur[IDX_C3I] + - k[3096]*y_cur[IDX_C3H2I] + k[3097]*y_cur[IDX_C3HI] + - k[3098]*y_cur[IDX_C3NI] + k[3099]*y_cur[IDX_C3OI] + - k[3100]*y_cur[IDX_C3OI] + k[3101]*y_cur[IDX_C3PI] + - k[3102]*y_cur[IDX_C3PI] + k[3103]*y_cur[IDX_C3SI] + - k[3104]*y_cur[IDX_C3SI] + k[3105]*y_cur[IDX_C4I] + - k[3106]*y_cur[IDX_C4I] + k[3107]*y_cur[IDX_C4I] + - k[3108]*y_cur[IDX_C4H3I] + k[3109]*y_cur[IDX_C4H3I] + - k[3110]*y_cur[IDX_C4H3I] + k[3111]*y_cur[IDX_C4HI] + - k[3112]*y_cur[IDX_C4HI] + k[3113]*y_cur[IDX_C4PI] + - k[3114]*y_cur[IDX_C4PI] + k[3115]*y_cur[IDX_C4SI] + - k[3116]*y_cur[IDX_C4SI] + k[3117]*y_cur[IDX_C5I] + - k[3118]*y_cur[IDX_C5I] + k[3119]*y_cur[IDX_C5H2I] + - k[3120]*y_cur[IDX_C5H2I] + k[3121]*y_cur[IDX_C5H2I] + - k[3122]*y_cur[IDX_C5HI] + k[3123]*y_cur[IDX_C5HI] + - k[3124]*y_cur[IDX_C5NI] + k[3125]*y_cur[IDX_C6I] + - k[3126]*y_cur[IDX_C6I] + k[3127]*y_cur[IDX_C6H2I] + - k[3128]*y_cur[IDX_C6H2I] + k[3129]*y_cur[IDX_C6H2I] + - k[3130]*y_cur[IDX_C6H6I] + k[3131]*y_cur[IDX_C6H6I] + - k[3132]*y_cur[IDX_C6HI] + k[3133]*y_cur[IDX_C6HI] + - k[3134]*y_cur[IDX_C7I] + k[3135]*y_cur[IDX_C7I] + - k[3136]*y_cur[IDX_C7H2I] + k[3137]*y_cur[IDX_C7H2I] + - k[3138]*y_cur[IDX_C7H2I] + k[3139]*y_cur[IDX_C7HI] + - k[3140]*y_cur[IDX_C7HI] + k[3141]*y_cur[IDX_C7NI] + - k[3142]*y_cur[IDX_C8I] + k[3143]*y_cur[IDX_C8I] + - k[3144]*y_cur[IDX_C8H2I] + k[3145]*y_cur[IDX_C8H2I] + - k[3146]*y_cur[IDX_C8H2I] + k[3147]*y_cur[IDX_C8HI] + - k[3148]*y_cur[IDX_C8HI] + k[3149]*y_cur[IDX_C9I] + - k[3150]*y_cur[IDX_C9I] + k[3151]*y_cur[IDX_C9H2I] + - k[3152]*y_cur[IDX_C9H2I] + k[3153]*y_cur[IDX_C9H2I] + - k[3154]*y_cur[IDX_C9HI] + k[3155]*y_cur[IDX_C9HI] + - k[3156]*y_cur[IDX_C9NI] + k[3157]*y_cur[IDX_CCPI] + - k[3158]*y_cur[IDX_CCPI] + k[3159]*y_cur[IDX_CClI] + - k[3160]*y_cur[IDX_CH2I] + k[3161]*y_cur[IDX_CH2I] + - k[3162]*y_cur[IDX_CH2CCHI] + k[3163]*y_cur[IDX_CH2CCHI] + - k[3164]*y_cur[IDX_CH2CCHI] + k[3165]*y_cur[IDX_CH2CHCNI] + - k[3166]*y_cur[IDX_CH2CHCNI] + k[3167]*y_cur[IDX_CH2CHCNI] + - k[3168]*y_cur[IDX_CH2CHCNI] + k[3169]*y_cur[IDX_CH2CHCNI] + - k[3170]*y_cur[IDX_CH2CNI] + k[3171]*y_cur[IDX_CH2COI] + - k[3172]*y_cur[IDX_CH2COI] + k[3173]*y_cur[IDX_CH2NHI] + - k[3174]*y_cur[IDX_CH2PHI] + k[3175]*y_cur[IDX_CH2PHI] + - k[3176]*y_cur[IDX_CH3I] + k[3177]*y_cur[IDX_CH3C3NI] + - k[3178]*y_cur[IDX_CH3C4HI] + k[3179]*y_cur[IDX_CH3C4HI] + - k[3180]*y_cur[IDX_CH3C5NI] + k[3181]*y_cur[IDX_CH3C6HI] + - k[3182]*y_cur[IDX_CH3C6HI] + k[3183]*y_cur[IDX_CH3C7NI] + - k[3184]*y_cur[IDX_CH3CCHI] + k[3185]*y_cur[IDX_CH3CCHI] + - k[3186]*y_cur[IDX_CH3CCHI] + k[3187]*y_cur[IDX_CH3CCHI] + - k[3188]*y_cur[IDX_C2H6I] + k[3189]*y_cur[IDX_C2H6I] + - k[3190]*y_cur[IDX_C2H6I] + k[3191]*y_cur[IDX_CH3CHOI] + - k[3192]*y_cur[IDX_CH3CNI] + k[3193]*y_cur[IDX_CH3CNI] + - k[3194]*y_cur[IDX_CH3COCH3I] + k[3195]*y_cur[IDX_CH3OCH3I] + - k[3196]*y_cur[IDX_CH3OHI] + k[3197]*y_cur[IDX_CH3OHI] + - k[3198]*y_cur[IDX_CH4I] + k[3199]*y_cur[IDX_CH4I] + - k[3200]*y_cur[IDX_CH4I] + k[3201]*y_cur[IDX_CH4I] + - k[3202]*y_cur[IDX_CHI] + k[3203]*y_cur[IDX_CNI] + - k[3204]*y_cur[IDX_CNI] + k[3205]*y_cur[IDX_CNOI] + - k[3206]*y_cur[IDX_CNOI] + k[3207]*y_cur[IDX_CO2I] + - k[3208]*y_cur[IDX_CO2I] + k[3209]*y_cur[IDX_CO2I] + - k[3210]*y_cur[IDX_CO2I] + k[3211]*y_cur[IDX_COI] + - k[3212]*y_cur[IDX_CPI] + k[3213]*y_cur[IDX_CPI] + - k[3214]*y_cur[IDX_CSI] + k[3215]*y_cur[IDX_CSI] + - k[3216]*y_cur[IDX_ClOI] + k[3217]*y_cur[IDX_H2CCCI] + - k[3218]*y_cur[IDX_H2CCCI] + k[3219]*y_cur[IDX_H2COI] + - k[3220]*y_cur[IDX_H2COI] + k[3221]*y_cur[IDX_H2COI] + - k[3222]*y_cur[IDX_H2CSI] + k[3223]*y_cur[IDX_H2CSI] + - k[3224]*y_cur[IDX_H2CSI] + k[3225]*y_cur[IDX_H2OI] + - k[3226]*y_cur[IDX_H2OI] + k[3227]*y_cur[IDX_H2S2I] + - k[3228]*y_cur[IDX_H2S2I] + k[3229]*y_cur[IDX_H2SI] + - k[3230]*y_cur[IDX_H2SI] + k[3231]*y_cur[IDX_H2SiOI] + - k[3232]*y_cur[IDX_HC2PI] + k[3233]*y_cur[IDX_HC2PI] + - k[3234]*y_cur[IDX_HC3NI] + k[3235]*y_cur[IDX_HC3NI] + - k[3236]*y_cur[IDX_HC3NI] + k[3237]*y_cur[IDX_HC3NI] + - k[3238]*y_cur[IDX_C4H2I] + k[3239]*y_cur[IDX_C4H2I] + - k[3240]*y_cur[IDX_C4H2I] + k[3241]*y_cur[IDX_HC5NI] + - k[3242]*y_cur[IDX_HC5NI] + k[3243]*y_cur[IDX_HC7NI] + - k[3244]*y_cur[IDX_HC9NI] + k[3245]*y_cur[IDX_HCNI] + - k[3246]*y_cur[IDX_HCNI] + k[3247]*y_cur[IDX_HCNI] + - k[3248]*y_cur[IDX_HCNI] + k[3249]*y_cur[IDX_HCOI] + - k[3251]*y_cur[IDX_HCOI] + k[3252]*y_cur[IDX_HCOOCH3I] + - k[3253]*y_cur[IDX_HCPI] + k[3254]*y_cur[IDX_HCPI] + - k[3255]*y_cur[IDX_HCSI] + k[3256]*y_cur[IDX_HCSI] + - k[3257]*y_cur[IDX_HCSiI] + k[3258]*y_cur[IDX_HCSiI] + - k[3259]*y_cur[IDX_HClI] + k[3260]*y_cur[IDX_HFI] + - k[3261]*y_cur[IDX_HNCI] + k[3262]*y_cur[IDX_HNCI] + - k[3263]*y_cur[IDX_HNCI] + k[3264]*y_cur[IDX_HNCOI] + - k[3265]*y_cur[IDX_HNOI] + k[3266]*y_cur[IDX_HNOI] + - k[3267]*y_cur[IDX_HNSiI] + k[3268]*y_cur[IDX_HOCNI] + - k[3269]*y_cur[IDX_HPOI] + k[3270]*y_cur[IDX_HPOI] + - k[3271]*y_cur[IDX_HS2I] + k[3272]*y_cur[IDX_HS2I] + - k[3273]*y_cur[IDX_HSI] + k[3274]*y_cur[IDX_N2I] + - k[3275]*y_cur[IDX_N2OI] + k[3276]*y_cur[IDX_N2OI] + - k[3277]*y_cur[IDX_N2OI] + k[3278]*y_cur[IDX_N2OI] + - k[3279]*y_cur[IDX_NCCNI] + k[3280]*y_cur[IDX_NH2I] + - k[3281]*y_cur[IDX_NH2I] + k[3282]*y_cur[IDX_NH2CNI] + - k[3283]*y_cur[IDX_NH3I] + k[3284]*y_cur[IDX_NH3I] + - k[3285]*y_cur[IDX_NHI] + k[3286]*y_cur[IDX_NOI] + - k[3287]*y_cur[IDX_NOI] + k[3288]*y_cur[IDX_NSI] + - k[3289]*y_cur[IDX_NSI] + k[3290]*y_cur[IDX_O2I] + - k[3291]*y_cur[IDX_OCNI] + k[3292]*y_cur[IDX_OCNI] + - k[3293]*y_cur[IDX_OCSI] + k[3294]*y_cur[IDX_OCSI] + - k[3295]*y_cur[IDX_OCSI] + k[3296]*y_cur[IDX_OCSI] + - k[3297]*y_cur[IDX_OHI] + k[3298]*y_cur[IDX_PH2I] + - k[3299]*y_cur[IDX_PHI] + k[3300]*y_cur[IDX_PNI] + - k[3301]*y_cur[IDX_POI] + k[3302]*y_cur[IDX_S2I] + - k[3303]*y_cur[IDX_SO2I] + k[3304]*y_cur[IDX_SO2I] + - k[3305]*y_cur[IDX_SOI] + k[3306]*y_cur[IDX_SOI] + - k[3307]*y_cur[IDX_SiC2I] + k[3308]*y_cur[IDX_SiC2H2I] + - k[3309]*y_cur[IDX_SiC2H2I] + k[3310]*y_cur[IDX_SiC2HI] + - k[3311]*y_cur[IDX_SiC2HI] + k[3312]*y_cur[IDX_SiC3I] + - k[3313]*y_cur[IDX_SiC3HI] + k[3314]*y_cur[IDX_SiC3HI] + - k[3315]*y_cur[IDX_SiC4I] + k[3316]*y_cur[IDX_SiCI] + - k[3317]*y_cur[IDX_SiCI] + k[3318]*y_cur[IDX_SiCH2I] + - k[3319]*y_cur[IDX_SiCH2I] + k[3320]*y_cur[IDX_SiCH3I] + - k[3321]*y_cur[IDX_SiCH3I] + k[3322]*y_cur[IDX_SiH2I] + - k[3323]*y_cur[IDX_SiH2I] + k[3324]*y_cur[IDX_SiH3I] + - k[3325]*y_cur[IDX_SiH3I] + k[3326]*y_cur[IDX_SiH4I] + - k[3327]*y_cur[IDX_SiH4I] + k[3328]*y_cur[IDX_SiHI] + - k[3329]*y_cur[IDX_SiNI] + k[3330]*y_cur[IDX_SiNCI] + - k[3331]*y_cur[IDX_SiO2I] + k[3332]*y_cur[IDX_SiOI] + - k[3333]*y_cur[IDX_SiOI] + k[3334]*y_cur[IDX_SiSI] + - k[3335]*y_cur[IDX_SiSI] + k[3906]*y_cur[IDX_CM] + - k[3941]*y_cur[IDX_C10M] + k[3976]*y_cur[IDX_C10HM] + - k[4011]*y_cur[IDX_C2M] + k[4046]*y_cur[IDX_C2HM] + - k[4081]*y_cur[IDX_C3M] + k[4116]*y_cur[IDX_C3HM] + - k[4151]*y_cur[IDX_C3NM] + k[4186]*y_cur[IDX_C4M] + - k[4221]*y_cur[IDX_C4HM] + k[4256]*y_cur[IDX_C5M] + - k[4291]*y_cur[IDX_C5HM] + k[4326]*y_cur[IDX_C5NM] + - k[4361]*y_cur[IDX_C6M] + k[4396]*y_cur[IDX_C6HM] + - k[4431]*y_cur[IDX_C7M] + k[4466]*y_cur[IDX_C7HM] + - k[4501]*y_cur[IDX_C8M] + k[4536]*y_cur[IDX_C8HM] + - k[4571]*y_cur[IDX_C9M] + k[4606]*y_cur[IDX_C9HM] + - k[4641]*y_cur[IDX_CHM] + k[4676]*y_cur[IDX_CNM] + - k[4712]*y_cur[IDX_HM] + k[4747]*y_cur[IDX_OM] + - k[4782]*y_cur[IDX_O2M] + k[4817]*y_cur[IDX_OHM] + - k[4852]*y_cur[IDX_SM] + k[5619]*y_cur[IDX_eM] + - k[5631]*y_cur[IDX_CH3OI] + k[5632]*y_cur[IDX_CH3OI] + - k[5637]*y_cur[IDX_CH2OHI] + k[5638]*y_cur[IDX_CH2OHI] + - k[5642]*y_cur[IDX_CH3COI] + k[5643]*y_cur[IDX_CH3COI] + - k[5647]*y_cur[IDX_COOHI] + k[5648]*y_cur[IDX_COOHI] + - k[5653]*y_cur[IDX_COOCH3I] + k[5654]*y_cur[IDX_COOCH3I] + - k[5659]*y_cur[IDX_CH2OHCOI] + k[5660]*y_cur[IDX_CH2OHCOI] + - k[5665]*y_cur[IDX_CH2OHCHOI] + k[5666]*y_cur[IDX_CH2OHCHOI] + - k[5671]*y_cur[IDX_CH3COOHI] + k[5672]*y_cur[IDX_CH3COOHI] + - k[5673]*y_cur[IDX_CH3COOHI] + k[5674]*y_cur[IDX_CH3COOHI] + - k[6312]*y_cur[IDX_GRAINM]; - data[jistart + 15691] = 0.0 + k[1149]*y_cur[IDX_eM] + - k[2458]*y_cur[IDX_H2I] + k[2845]*y_cur[IDX_HI] + - k[6313]*y_cur[IDX_GRAINM]; - data[jistart + 15692] = 0.0 + k[523]*y_cur[IDX_HeII] + - k[3274]*y_cur[IDX_HeII]; - data[jistart + 15693] = 0.0 + k[3275]*y_cur[IDX_HeII] + - k[3276]*y_cur[IDX_HeII] + k[3277]*y_cur[IDX_HeII] + - k[3278]*y_cur[IDX_HeII]; - data[jistart + 15694] = 0.0 + k[3279]*y_cur[IDX_HeII]; - data[jistart + 15695] = 0.0 + k[3285]*y_cur[IDX_HeII]; - data[jistart + 15696] = 0.0 + k[3280]*y_cur[IDX_HeII] + - k[3281]*y_cur[IDX_HeII]; - data[jistart + 15697] = 0.0 + k[3282]*y_cur[IDX_HeII]; - data[jistart + 15698] = 0.0 + k[524]*y_cur[IDX_HeII] + - k[3283]*y_cur[IDX_HeII] + k[3284]*y_cur[IDX_HeII]; - data[jistart + 15699] = 0.0 + k[3286]*y_cur[IDX_HeII] + - k[3287]*y_cur[IDX_HeII]; - data[jistart + 15700] = 0.0 + k[3288]*y_cur[IDX_HeII] + - k[3289]*y_cur[IDX_HeII]; - data[jistart + 15701] = 0.0 + k[4747]*y_cur[IDX_HeII]; - data[jistart + 15702] = 0.0 + k[525]*y_cur[IDX_HeII] + - k[3290]*y_cur[IDX_HeII]; - data[jistart + 15703] = 0.0 + k[4782]*y_cur[IDX_HeII]; - data[jistart + 15704] = 0.0 + k[3291]*y_cur[IDX_HeII] + - k[3292]*y_cur[IDX_HeII]; - data[jistart + 15705] = 0.0 + k[3293]*y_cur[IDX_HeII] + - k[3294]*y_cur[IDX_HeII] + k[3295]*y_cur[IDX_HeII] + - k[3296]*y_cur[IDX_HeII]; - data[jistart + 15706] = 0.0 + k[3297]*y_cur[IDX_HeII]; - data[jistart + 15707] = 0.0 + k[4817]*y_cur[IDX_HeII]; - data[jistart + 15708] = 0.0 + k[526]*y_cur[IDX_HeII]; - data[jistart + 15709] = 0.0 + k[3299]*y_cur[IDX_HeII]; - data[jistart + 15710] = 0.0 + k[3298]*y_cur[IDX_HeII]; - data[jistart + 15711] = 0.0 + k[3300]*y_cur[IDX_HeII]; - data[jistart + 15712] = 0.0 + k[3301]*y_cur[IDX_HeII]; - data[jistart + 15713] = 0.0 + k[4852]*y_cur[IDX_HeII]; - data[jistart + 15714] = 0.0 + k[3302]*y_cur[IDX_HeII]; - data[jistart + 15715] = 0.0 + k[3305]*y_cur[IDX_HeII] + - k[3306]*y_cur[IDX_HeII]; - data[jistart + 15716] = 0.0 + k[527]*y_cur[IDX_HeII] + - k[3303]*y_cur[IDX_HeII] + k[3304]*y_cur[IDX_HeII]; - data[jistart + 15717] = 0.0 + k[528]*y_cur[IDX_HeII]; - data[jistart + 15718] = 0.0 + k[3316]*y_cur[IDX_HeII] + - k[3317]*y_cur[IDX_HeII]; - data[jistart + 15719] = 0.0 + k[3307]*y_cur[IDX_HeII]; - data[jistart + 15720] = 0.0 + k[3310]*y_cur[IDX_HeII] + - k[3311]*y_cur[IDX_HeII]; - data[jistart + 15721] = 0.0 + k[3308]*y_cur[IDX_HeII] + - k[3309]*y_cur[IDX_HeII]; - data[jistart + 15722] = 0.0 + k[3312]*y_cur[IDX_HeII]; - data[jistart + 15723] = 0.0 + k[3313]*y_cur[IDX_HeII] + - k[3314]*y_cur[IDX_HeII]; - data[jistart + 15724] = 0.0 + k[3315]*y_cur[IDX_HeII]; - data[jistart + 15725] = 0.0 + k[3318]*y_cur[IDX_HeII] + - k[3319]*y_cur[IDX_HeII]; - data[jistart + 15726] = 0.0 + k[3320]*y_cur[IDX_HeII] + - k[3321]*y_cur[IDX_HeII]; - data[jistart + 15727] = 0.0 + k[3328]*y_cur[IDX_HeII]; - data[jistart + 15728] = 0.0 + k[3322]*y_cur[IDX_HeII] + - k[3323]*y_cur[IDX_HeII]; - data[jistart + 15729] = 0.0 + k[3324]*y_cur[IDX_HeII] + - k[3325]*y_cur[IDX_HeII]; - data[jistart + 15730] = 0.0 + k[3326]*y_cur[IDX_HeII] + - k[3327]*y_cur[IDX_HeII]; - data[jistart + 15731] = 0.0 + k[3329]*y_cur[IDX_HeII]; - data[jistart + 15732] = 0.0 + k[3330]*y_cur[IDX_HeII]; - data[jistart + 15733] = 0.0 + k[3332]*y_cur[IDX_HeII] + - k[3333]*y_cur[IDX_HeII]; - data[jistart + 15734] = 0.0 + k[3331]*y_cur[IDX_HeII]; - data[jistart + 15735] = 0.0 + k[3334]*y_cur[IDX_HeII] + - k[3335]*y_cur[IDX_HeII]; - data[jistart + 15736] = 0.0 + k[1149]*y_cur[IDX_HeHII] + - k[5619]*y_cur[IDX_HeII]; - data[jistart + 15737] = 0.0 - k[513]*y_cur[IDX_HeII]; - data[jistart + 15738] = 0.0 - k[3906]*y_cur[IDX_HeII]; - data[jistart + 15739] = 0.0 - k[506]*y_cur[IDX_HeII] - - k[3056]*y_cur[IDX_HeII] - k[3057]*y_cur[IDX_HeII] - - k[3058]*y_cur[IDX_HeII] - k[3059]*y_cur[IDX_HeII] - - k[3060]*y_cur[IDX_HeII] - k[3061]*y_cur[IDX_HeII]; - data[jistart + 15740] = 0.0 - k[3941]*y_cur[IDX_HeII]; - data[jistart + 15741] = 0.0 - k[507]*y_cur[IDX_HeII] - - k[3067]*y_cur[IDX_HeII] - k[3068]*y_cur[IDX_HeII] - - k[3069]*y_cur[IDX_HeII] - k[3070]*y_cur[IDX_HeII] - - k[3071]*y_cur[IDX_HeII] - k[3072]*y_cur[IDX_HeII]; - data[jistart + 15742] = 0.0 - k[3976]*y_cur[IDX_HeII]; - data[jistart + 15743] = 0.0 - k[3062]*y_cur[IDX_HeII] - - k[3063]*y_cur[IDX_HeII] - k[3064]*y_cur[IDX_HeII] - - k[3065]*y_cur[IDX_HeII] - k[3066]*y_cur[IDX_HeII]; - data[jistart + 15744] = 0.0 - k[508]*y_cur[IDX_HeII] - - k[3073]*y_cur[IDX_HeII]; - data[jistart + 15745] = 0.0 - k[4011]*y_cur[IDX_HeII]; - data[jistart + 15746] = 0.0 - k[3086]*y_cur[IDX_HeII] - - k[3087]*y_cur[IDX_HeII] - k[3088]*y_cur[IDX_HeII]; - data[jistart + 15747] = 0.0 - k[4046]*y_cur[IDX_HeII]; - data[jistart + 15748] = 0.0 - k[509]*y_cur[IDX_HeII] - - k[3074]*y_cur[IDX_HeII] - k[3075]*y_cur[IDX_HeII] - - k[3076]*y_cur[IDX_HeII]; - data[jistart + 15749] = 0.0 - k[3077]*y_cur[IDX_HeII] - - k[3078]*y_cur[IDX_HeII]; - data[jistart + 15750] = 0.0 - k[510]*y_cur[IDX_HeII] - - k[3079]*y_cur[IDX_HeII] - k[3080]*y_cur[IDX_HeII] - - k[3081]*y_cur[IDX_HeII] - k[3082]*y_cur[IDX_HeII]; - data[jistart + 15751] = 0.0 - k[511]*y_cur[IDX_HeII] - - k[3083]*y_cur[IDX_HeII] - k[3084]*y_cur[IDX_HeII]; - data[jistart + 15752] = 0.0 - k[3085]*y_cur[IDX_HeII]; - data[jistart + 15753] = 0.0 - k[3188]*y_cur[IDX_HeII] - - k[3189]*y_cur[IDX_HeII] - k[3190]*y_cur[IDX_HeII]; - data[jistart + 15754] = 0.0 - k[3089]*y_cur[IDX_HeII]; - data[jistart + 15755] = 0.0 - k[3090]*y_cur[IDX_HeII]; - data[jistart + 15756] = 0.0 - k[3091]*y_cur[IDX_HeII] - - k[3092]*y_cur[IDX_HeII] - k[3093]*y_cur[IDX_HeII] - - k[3094]*y_cur[IDX_HeII]; - data[jistart + 15757] = 0.0 - k[3095]*y_cur[IDX_HeII]; - data[jistart + 15758] = 0.0 - k[4081]*y_cur[IDX_HeII]; - data[jistart + 15759] = 0.0 - k[3097]*y_cur[IDX_HeII]; - data[jistart + 15760] = 0.0 - k[4116]*y_cur[IDX_HeII]; - data[jistart + 15761] = 0.0 - k[3096]*y_cur[IDX_HeII]; - data[jistart + 15762] = 0.0 - k[512]*y_cur[IDX_HeII] - - k[3098]*y_cur[IDX_HeII]; - data[jistart + 15763] = 0.0 - k[4151]*y_cur[IDX_HeII]; - data[jistart + 15764] = 0.0 - k[3099]*y_cur[IDX_HeII] - - k[3100]*y_cur[IDX_HeII]; - data[jistart + 15765] = 0.0 - k[3101]*y_cur[IDX_HeII] - - k[3102]*y_cur[IDX_HeII]; - data[jistart + 15766] = 0.0 - k[3103]*y_cur[IDX_HeII] - - k[3104]*y_cur[IDX_HeII]; - data[jistart + 15767] = 0.0 - k[3105]*y_cur[IDX_HeII] - - k[3106]*y_cur[IDX_HeII] - k[3107]*y_cur[IDX_HeII]; - data[jistart + 15768] = 0.0 - k[4186]*y_cur[IDX_HeII]; - data[jistart + 15769] = 0.0 - k[3111]*y_cur[IDX_HeII] - - k[3112]*y_cur[IDX_HeII]; - data[jistart + 15770] = 0.0 - k[4221]*y_cur[IDX_HeII]; - data[jistart + 15771] = 0.0 - k[3238]*y_cur[IDX_HeII] - - k[3239]*y_cur[IDX_HeII] - k[3240]*y_cur[IDX_HeII]; - data[jistart + 15772] = 0.0 - k[3108]*y_cur[IDX_HeII] - - k[3109]*y_cur[IDX_HeII] - k[3110]*y_cur[IDX_HeII]; - data[jistart + 15773] = 0.0 - k[3113]*y_cur[IDX_HeII] - - k[3114]*y_cur[IDX_HeII]; - data[jistart + 15774] = 0.0 - k[3115]*y_cur[IDX_HeII] - - k[3116]*y_cur[IDX_HeII]; - data[jistart + 15775] = 0.0 - k[3117]*y_cur[IDX_HeII] - - k[3118]*y_cur[IDX_HeII]; - data[jistart + 15776] = 0.0 - k[4256]*y_cur[IDX_HeII]; - data[jistart + 15777] = 0.0 - k[3122]*y_cur[IDX_HeII] - - k[3123]*y_cur[IDX_HeII]; - data[jistart + 15778] = 0.0 - k[4291]*y_cur[IDX_HeII]; - data[jistart + 15779] = 0.0 - k[3119]*y_cur[IDX_HeII] - - k[3120]*y_cur[IDX_HeII] - k[3121]*y_cur[IDX_HeII]; - data[jistart + 15780] = 0.0 - k[3124]*y_cur[IDX_HeII]; - data[jistart + 15781] = 0.0 - k[4326]*y_cur[IDX_HeII]; - data[jistart + 15782] = 0.0 - k[3125]*y_cur[IDX_HeII] - - k[3126]*y_cur[IDX_HeII]; - data[jistart + 15783] = 0.0 - k[4361]*y_cur[IDX_HeII]; - data[jistart + 15784] = 0.0 - k[3132]*y_cur[IDX_HeII] - - k[3133]*y_cur[IDX_HeII]; - data[jistart + 15785] = 0.0 - k[4396]*y_cur[IDX_HeII]; - data[jistart + 15786] = 0.0 - k[3127]*y_cur[IDX_HeII] - - k[3128]*y_cur[IDX_HeII] - k[3129]*y_cur[IDX_HeII]; - data[jistart + 15787] = 0.0 - k[3130]*y_cur[IDX_HeII] - - k[3131]*y_cur[IDX_HeII]; - data[jistart + 15788] = 0.0 - k[3134]*y_cur[IDX_HeII] - - k[3135]*y_cur[IDX_HeII]; - data[jistart + 15789] = 0.0 - k[4431]*y_cur[IDX_HeII]; - data[jistart + 15790] = 0.0 - k[3139]*y_cur[IDX_HeII] - - k[3140]*y_cur[IDX_HeII]; - data[jistart + 15791] = 0.0 - k[4466]*y_cur[IDX_HeII]; - data[jistart + 15792] = 0.0 - k[3136]*y_cur[IDX_HeII] - - k[3137]*y_cur[IDX_HeII] - k[3138]*y_cur[IDX_HeII]; - data[jistart + 15793] = 0.0 - k[3141]*y_cur[IDX_HeII]; - data[jistart + 15794] = 0.0 - k[3142]*y_cur[IDX_HeII] - - k[3143]*y_cur[IDX_HeII]; - data[jistart + 15795] = 0.0 - k[4501]*y_cur[IDX_HeII]; - data[jistart + 15796] = 0.0 - k[3147]*y_cur[IDX_HeII] - - k[3148]*y_cur[IDX_HeII]; - data[jistart + 15797] = 0.0 - k[4536]*y_cur[IDX_HeII]; - data[jistart + 15798] = 0.0 - k[3144]*y_cur[IDX_HeII] - - k[3145]*y_cur[IDX_HeII] - k[3146]*y_cur[IDX_HeII]; - data[jistart + 15799] = 0.0 - k[3149]*y_cur[IDX_HeII] - - k[3150]*y_cur[IDX_HeII]; - data[jistart + 15800] = 0.0 - k[4571]*y_cur[IDX_HeII]; - data[jistart + 15801] = 0.0 - k[3154]*y_cur[IDX_HeII] - - k[3155]*y_cur[IDX_HeII]; - data[jistart + 15802] = 0.0 - k[4606]*y_cur[IDX_HeII]; - data[jistart + 15803] = 0.0 - k[3151]*y_cur[IDX_HeII] - - k[3152]*y_cur[IDX_HeII] - k[3153]*y_cur[IDX_HeII]; - data[jistart + 15804] = 0.0 - k[3156]*y_cur[IDX_HeII]; - data[jistart + 15805] = 0.0 - k[3157]*y_cur[IDX_HeII] - - k[3158]*y_cur[IDX_HeII]; - data[jistart + 15806] = 0.0 - k[3159]*y_cur[IDX_HeII]; - data[jistart + 15807] = 0.0 - k[515]*y_cur[IDX_HeII] - - k[3202]*y_cur[IDX_HeII]; - data[jistart + 15808] = 0.0 - k[4641]*y_cur[IDX_HeII]; - data[jistart + 15809] = 0.0 - k[3160]*y_cur[IDX_HeII] - - k[3161]*y_cur[IDX_HeII]; - data[jistart + 15810] = 0.0 - k[3162]*y_cur[IDX_HeII] - - k[3163]*y_cur[IDX_HeII] - k[3164]*y_cur[IDX_HeII]; - data[jistart + 15811] = 0.0 - k[3165]*y_cur[IDX_HeII] - - k[3166]*y_cur[IDX_HeII] - k[3167]*y_cur[IDX_HeII] - - k[3168]*y_cur[IDX_HeII] - k[3169]*y_cur[IDX_HeII]; - data[jistart + 15812] = 0.0 - k[3170]*y_cur[IDX_HeII]; - data[jistart + 15813] = 0.0 - k[3171]*y_cur[IDX_HeII] - - k[3172]*y_cur[IDX_HeII]; - data[jistart + 15814] = 0.0 - k[3173]*y_cur[IDX_HeII]; - data[jistart + 15815] = 0.0 - k[5637]*y_cur[IDX_HeII] - - k[5638]*y_cur[IDX_HeII]; - data[jistart + 15816] = 0.0 - k[5665]*y_cur[IDX_HeII] - - k[5666]*y_cur[IDX_HeII]; - data[jistart + 15817] = 0.0 - k[5659]*y_cur[IDX_HeII] - - k[5660]*y_cur[IDX_HeII]; - data[jistart + 15818] = 0.0 - k[3174]*y_cur[IDX_HeII] - - k[3175]*y_cur[IDX_HeII]; - data[jistart + 15819] = 0.0 - k[3176]*y_cur[IDX_HeII]; - data[jistart + 15820] = 0.0 - k[3177]*y_cur[IDX_HeII]; - data[jistart + 15821] = 0.0 - k[3178]*y_cur[IDX_HeII] - - k[3179]*y_cur[IDX_HeII]; - data[jistart + 15822] = 0.0 - k[3180]*y_cur[IDX_HeII]; - data[jistart + 15823] = 0.0 - k[3181]*y_cur[IDX_HeII] - - k[3182]*y_cur[IDX_HeII]; - data[jistart + 15824] = 0.0 - k[3183]*y_cur[IDX_HeII]; - data[jistart + 15825] = 0.0 - k[3184]*y_cur[IDX_HeII] - - k[3185]*y_cur[IDX_HeII] - k[3186]*y_cur[IDX_HeII] - - k[3187]*y_cur[IDX_HeII]; - data[jistart + 15826] = 0.0 - k[3191]*y_cur[IDX_HeII]; - data[jistart + 15827] = 0.0 - k[3192]*y_cur[IDX_HeII] - - k[3193]*y_cur[IDX_HeII]; - data[jistart + 15828] = 0.0 - k[5642]*y_cur[IDX_HeII] - - k[5643]*y_cur[IDX_HeII]; - data[jistart + 15829] = 0.0 - k[3194]*y_cur[IDX_HeII]; - data[jistart + 15830] = 0.0 - k[5671]*y_cur[IDX_HeII] - - k[5672]*y_cur[IDX_HeII] - k[5673]*y_cur[IDX_HeII] - - k[5674]*y_cur[IDX_HeII]; - data[jistart + 15831] = 0.0 - k[5631]*y_cur[IDX_HeII] - - k[5632]*y_cur[IDX_HeII]; - data[jistart + 15832] = 0.0 - k[3195]*y_cur[IDX_HeII]; - data[jistart + 15833] = 0.0 - k[3196]*y_cur[IDX_HeII] - - k[3197]*y_cur[IDX_HeII]; - data[jistart + 15834] = 0.0 - k[514]*y_cur[IDX_HeII] - - k[3198]*y_cur[IDX_HeII] - k[3199]*y_cur[IDX_HeII] - - k[3200]*y_cur[IDX_HeII] - k[3201]*y_cur[IDX_HeII]; - data[jistart + 15835] = 0.0 - k[3203]*y_cur[IDX_HeII] - - k[3204]*y_cur[IDX_HeII]; - data[jistart + 15836] = 0.0 - k[4676]*y_cur[IDX_HeII]; - data[jistart + 15837] = 0.0 - k[3205]*y_cur[IDX_HeII] - - k[3206]*y_cur[IDX_HeII]; - data[jistart + 15838] = 0.0 - k[3211]*y_cur[IDX_HeII]; - data[jistart + 15839] = 0.0 - k[516]*y_cur[IDX_HeII] - - k[3207]*y_cur[IDX_HeII] - k[3208]*y_cur[IDX_HeII] - - k[3209]*y_cur[IDX_HeII] - k[3210]*y_cur[IDX_HeII]; - data[jistart + 15840] = 0.0 - k[5653]*y_cur[IDX_HeII] - - k[5654]*y_cur[IDX_HeII]; - data[jistart + 15841] = 0.0 - k[5647]*y_cur[IDX_HeII] - - k[5648]*y_cur[IDX_HeII]; - data[jistart + 15842] = 0.0 - k[3212]*y_cur[IDX_HeII] - - k[3213]*y_cur[IDX_HeII]; - data[jistart + 15843] = 0.0 - k[3214]*y_cur[IDX_HeII] - - k[3215]*y_cur[IDX_HeII]; - data[jistart + 15844] = 0.0 - k[3216]*y_cur[IDX_HeII]; - data[jistart + 15845] = 0.0 - k[6312]*y_cur[IDX_HeII]; - data[jistart + 15846] = 0.0 - k[491]*y_cur[IDX_HeII]; - data[jistart + 15847] = 0.0 - k[4712]*y_cur[IDX_HeII]; - data[jistart + 15848] = 0.0 - k[458]*y_cur[IDX_HeII] - - k[2457]*y_cur[IDX_HeII]; - data[jistart + 15849] = 0.0 - k[3217]*y_cur[IDX_HeII] - - k[3218]*y_cur[IDX_HeII]; - data[jistart + 15850] = 0.0 - k[517]*y_cur[IDX_HeII] - - k[3219]*y_cur[IDX_HeII] - k[3220]*y_cur[IDX_HeII] - - k[3221]*y_cur[IDX_HeII]; - data[jistart + 15851] = 0.0 - k[3222]*y_cur[IDX_HeII] - - k[3223]*y_cur[IDX_HeII] - k[3224]*y_cur[IDX_HeII]; - data[jistart + 15852] = 0.0 - k[518]*y_cur[IDX_HeII] - - k[3225]*y_cur[IDX_HeII] - k[3226]*y_cur[IDX_HeII]; - data[jistart + 15853] = 0.0 - k[519]*y_cur[IDX_HeII] - - k[3229]*y_cur[IDX_HeII] - k[3230]*y_cur[IDX_HeII]; - data[jistart + 15854] = 0.0 - k[3227]*y_cur[IDX_HeII] - - k[3228]*y_cur[IDX_HeII]; - data[jistart + 15855] = 0.0 - k[3231]*y_cur[IDX_HeII]; - data[jistart + 15856] = 0.0 - k[3232]*y_cur[IDX_HeII] - - k[3233]*y_cur[IDX_HeII]; - data[jistart + 15857] = 0.0 - k[3234]*y_cur[IDX_HeII] - - k[3235]*y_cur[IDX_HeII] - k[3236]*y_cur[IDX_HeII] - - k[3237]*y_cur[IDX_HeII]; - data[jistart + 15858] = 0.0 - k[3241]*y_cur[IDX_HeII] - - k[3242]*y_cur[IDX_HeII]; - data[jistart + 15859] = 0.0 - k[3243]*y_cur[IDX_HeII]; - data[jistart + 15860] = 0.0 - k[3244]*y_cur[IDX_HeII]; - data[jistart + 15861] = 0.0 - k[3245]*y_cur[IDX_HeII] - - k[3246]*y_cur[IDX_HeII] - k[3247]*y_cur[IDX_HeII] - - k[3248]*y_cur[IDX_HeII]; - data[jistart + 15862] = 0.0 - k[520]*y_cur[IDX_HeII]; - data[jistart + 15863] = 0.0 - k[3249]*y_cur[IDX_HeII] - - k[3250]*y_cur[IDX_HeII] - k[3251]*y_cur[IDX_HeII]; - data[jistart + 15864] = 0.0 - k[3252]*y_cur[IDX_HeII]; - data[jistart + 15865] = 0.0 - k[3253]*y_cur[IDX_HeII] - - k[3254]*y_cur[IDX_HeII]; - data[jistart + 15866] = 0.0 - k[3255]*y_cur[IDX_HeII] - - k[3256]*y_cur[IDX_HeII]; - data[jistart + 15867] = 0.0 - k[3257]*y_cur[IDX_HeII] - - k[3258]*y_cur[IDX_HeII]; - data[jistart + 15868] = 0.0 - k[3259]*y_cur[IDX_HeII]; - data[jistart + 15869] = 0.0 - k[3260]*y_cur[IDX_HeII]; - data[jistart + 15870] = 0.0 - k[3261]*y_cur[IDX_HeII] - - k[3262]*y_cur[IDX_HeII] - k[3263]*y_cur[IDX_HeII]; - data[jistart + 15871] = 0.0 - k[3030]*y_cur[IDX_HeII] - - k[3031]*y_cur[IDX_HeII] - k[3032]*y_cur[IDX_HeII] - - k[3033]*y_cur[IDX_HeII] - k[3034]*y_cur[IDX_HeII]; - data[jistart + 15872] = 0.0 - k[521]*y_cur[IDX_HeII] - - k[3264]*y_cur[IDX_HeII]; - data[jistart + 15873] = 0.0 - k[3265]*y_cur[IDX_HeII] - - k[3266]*y_cur[IDX_HeII]; - data[jistart + 15874] = 0.0 - k[3267]*y_cur[IDX_HeII]; - data[jistart + 15875] = 0.0 - k[3268]*y_cur[IDX_HeII]; - data[jistart + 15876] = 0.0 - k[522]*y_cur[IDX_HeII]; - data[jistart + 15877] = 0.0 - k[3269]*y_cur[IDX_HeII] - - k[3270]*y_cur[IDX_HeII]; - data[jistart + 15878] = 0.0 - k[3273]*y_cur[IDX_HeII]; - data[jistart + 15879] = 0.0 - k[3271]*y_cur[IDX_HeII] - - k[3272]*y_cur[IDX_HeII]; - data[jistart + 15880] = 0.0 + k[5683] + k[5876] + k[6298]; - data[jistart + 15881] = 0.0 - k[458]*y_cur[IDX_H2I] - - k[491]*y_cur[IDX_HI] - k[506]*y_cur[IDX_C10I] - - k[507]*y_cur[IDX_C10HI] - k[508]*y_cur[IDX_C2I] - - k[509]*y_cur[IDX_C2H2I] - k[510]*y_cur[IDX_C2H4I] - - k[511]*y_cur[IDX_C2H5I] - k[512]*y_cur[IDX_C3NI] - - k[513]*y_cur[IDX_CI] - k[514]*y_cur[IDX_CH4I] - - k[515]*y_cur[IDX_CHI] - k[516]*y_cur[IDX_CO2I] - - k[517]*y_cur[IDX_H2COI] - k[518]*y_cur[IDX_H2OI] - - k[519]*y_cur[IDX_H2SI] - k[520]*y_cur[IDX_HCNOI] - - k[521]*y_cur[IDX_HNCOI] - k[522]*y_cur[IDX_HONCI] - - k[523]*y_cur[IDX_N2I] - k[524]*y_cur[IDX_NH3I] - - k[525]*y_cur[IDX_O2I] - k[526]*y_cur[IDX_PI] - - k[527]*y_cur[IDX_SO2I] - k[528]*y_cur[IDX_SiI] - - k[2457]*y_cur[IDX_H2I] - k[3030]*y_cur[IDX_HNC3I] - - k[3031]*y_cur[IDX_HNC3I] - k[3032]*y_cur[IDX_HNC3I] - - k[3033]*y_cur[IDX_HNC3I] - k[3034]*y_cur[IDX_HNC3I] - - k[3056]*y_cur[IDX_C10I] - k[3057]*y_cur[IDX_C10I] - - k[3058]*y_cur[IDX_C10I] - k[3059]*y_cur[IDX_C10I] - - k[3060]*y_cur[IDX_C10I] - k[3061]*y_cur[IDX_C10I] - - k[3062]*y_cur[IDX_C10H2I] - k[3063]*y_cur[IDX_C10H2I] - - k[3064]*y_cur[IDX_C10H2I] - k[3065]*y_cur[IDX_C10H2I] - - k[3066]*y_cur[IDX_C10H2I] - k[3067]*y_cur[IDX_C10HI] - - k[3068]*y_cur[IDX_C10HI] - k[3069]*y_cur[IDX_C10HI] - - k[3070]*y_cur[IDX_C10HI] - k[3071]*y_cur[IDX_C10HI] - - k[3072]*y_cur[IDX_C10HI] - k[3073]*y_cur[IDX_C2I] - - k[3074]*y_cur[IDX_C2H2I] - k[3075]*y_cur[IDX_C2H2I] - - k[3076]*y_cur[IDX_C2H2I] - k[3077]*y_cur[IDX_C2H3I] - - k[3078]*y_cur[IDX_C2H3I] - k[3079]*y_cur[IDX_C2H4I] - - k[3080]*y_cur[IDX_C2H4I] - k[3081]*y_cur[IDX_C2H4I] - - k[3082]*y_cur[IDX_C2H4I] - k[3083]*y_cur[IDX_C2H5I] - - k[3084]*y_cur[IDX_C2H5I] - k[3085]*y_cur[IDX_C2H5OHI] - - k[3086]*y_cur[IDX_C2HI] - k[3087]*y_cur[IDX_C2HI] - - k[3088]*y_cur[IDX_C2HI] - k[3089]*y_cur[IDX_C2NI] - - k[3090]*y_cur[IDX_C2OI] - k[3091]*y_cur[IDX_C2SI] - - k[3092]*y_cur[IDX_C2SI] - k[3093]*y_cur[IDX_C2SI] - - k[3094]*y_cur[IDX_C2SI] - k[3095]*y_cur[IDX_C3I] - - k[3096]*y_cur[IDX_C3H2I] - k[3097]*y_cur[IDX_C3HI] - - k[3098]*y_cur[IDX_C3NI] - k[3099]*y_cur[IDX_C3OI] - - k[3100]*y_cur[IDX_C3OI] - k[3101]*y_cur[IDX_C3PI] - - k[3102]*y_cur[IDX_C3PI] - k[3103]*y_cur[IDX_C3SI] - - k[3104]*y_cur[IDX_C3SI] - k[3105]*y_cur[IDX_C4I] - - k[3106]*y_cur[IDX_C4I] - k[3107]*y_cur[IDX_C4I] - - k[3108]*y_cur[IDX_C4H3I] - k[3109]*y_cur[IDX_C4H3I] - - k[3110]*y_cur[IDX_C4H3I] - k[3111]*y_cur[IDX_C4HI] - - k[3112]*y_cur[IDX_C4HI] - k[3113]*y_cur[IDX_C4PI] - - k[3114]*y_cur[IDX_C4PI] - k[3115]*y_cur[IDX_C4SI] - - k[3116]*y_cur[IDX_C4SI] - k[3117]*y_cur[IDX_C5I] - - k[3118]*y_cur[IDX_C5I] - k[3119]*y_cur[IDX_C5H2I] - - k[3120]*y_cur[IDX_C5H2I] - k[3121]*y_cur[IDX_C5H2I] - - k[3122]*y_cur[IDX_C5HI] - k[3123]*y_cur[IDX_C5HI] - - k[3124]*y_cur[IDX_C5NI] - k[3125]*y_cur[IDX_C6I] - - k[3126]*y_cur[IDX_C6I] - k[3127]*y_cur[IDX_C6H2I] - - k[3128]*y_cur[IDX_C6H2I] - k[3129]*y_cur[IDX_C6H2I] - - k[3130]*y_cur[IDX_C6H6I] - k[3131]*y_cur[IDX_C6H6I] - - k[3132]*y_cur[IDX_C6HI] - k[3133]*y_cur[IDX_C6HI] - - k[3134]*y_cur[IDX_C7I] - k[3135]*y_cur[IDX_C7I] - - k[3136]*y_cur[IDX_C7H2I] - k[3137]*y_cur[IDX_C7H2I] - - k[3138]*y_cur[IDX_C7H2I] - k[3139]*y_cur[IDX_C7HI] - - k[3140]*y_cur[IDX_C7HI] - k[3141]*y_cur[IDX_C7NI] - - k[3142]*y_cur[IDX_C8I] - k[3143]*y_cur[IDX_C8I] - - k[3144]*y_cur[IDX_C8H2I] - k[3145]*y_cur[IDX_C8H2I] - - k[3146]*y_cur[IDX_C8H2I] - k[3147]*y_cur[IDX_C8HI] - - k[3148]*y_cur[IDX_C8HI] - k[3149]*y_cur[IDX_C9I] - - k[3150]*y_cur[IDX_C9I] - k[3151]*y_cur[IDX_C9H2I] - - k[3152]*y_cur[IDX_C9H2I] - k[3153]*y_cur[IDX_C9H2I] - - k[3154]*y_cur[IDX_C9HI] - k[3155]*y_cur[IDX_C9HI] - - k[3156]*y_cur[IDX_C9NI] - k[3157]*y_cur[IDX_CCPI] - - k[3158]*y_cur[IDX_CCPI] - k[3159]*y_cur[IDX_CClI] - - k[3160]*y_cur[IDX_CH2I] - k[3161]*y_cur[IDX_CH2I] - - k[3162]*y_cur[IDX_CH2CCHI] - k[3163]*y_cur[IDX_CH2CCHI] - - k[3164]*y_cur[IDX_CH2CCHI] - k[3165]*y_cur[IDX_CH2CHCNI] - - k[3166]*y_cur[IDX_CH2CHCNI] - k[3167]*y_cur[IDX_CH2CHCNI] - - k[3168]*y_cur[IDX_CH2CHCNI] - k[3169]*y_cur[IDX_CH2CHCNI] - - k[3170]*y_cur[IDX_CH2CNI] - k[3171]*y_cur[IDX_CH2COI] - - k[3172]*y_cur[IDX_CH2COI] - k[3173]*y_cur[IDX_CH2NHI] - - k[3174]*y_cur[IDX_CH2PHI] - k[3175]*y_cur[IDX_CH2PHI] - - k[3176]*y_cur[IDX_CH3I] - k[3177]*y_cur[IDX_CH3C3NI] - - k[3178]*y_cur[IDX_CH3C4HI] - k[3179]*y_cur[IDX_CH3C4HI] - - k[3180]*y_cur[IDX_CH3C5NI] - k[3181]*y_cur[IDX_CH3C6HI] - - k[3182]*y_cur[IDX_CH3C6HI] - k[3183]*y_cur[IDX_CH3C7NI] - - k[3184]*y_cur[IDX_CH3CCHI] - k[3185]*y_cur[IDX_CH3CCHI] - - k[3186]*y_cur[IDX_CH3CCHI] - k[3187]*y_cur[IDX_CH3CCHI] - - k[3188]*y_cur[IDX_C2H6I] - k[3189]*y_cur[IDX_C2H6I] - - k[3190]*y_cur[IDX_C2H6I] - k[3191]*y_cur[IDX_CH3CHOI] - - k[3192]*y_cur[IDX_CH3CNI] - k[3193]*y_cur[IDX_CH3CNI] - - k[3194]*y_cur[IDX_CH3COCH3I] - k[3195]*y_cur[IDX_CH3OCH3I] - - k[3196]*y_cur[IDX_CH3OHI] - k[3197]*y_cur[IDX_CH3OHI] - - k[3198]*y_cur[IDX_CH4I] - k[3199]*y_cur[IDX_CH4I] - - k[3200]*y_cur[IDX_CH4I] - k[3201]*y_cur[IDX_CH4I] - - k[3202]*y_cur[IDX_CHI] - k[3203]*y_cur[IDX_CNI] - - k[3204]*y_cur[IDX_CNI] - k[3205]*y_cur[IDX_CNOI] - - k[3206]*y_cur[IDX_CNOI] - k[3207]*y_cur[IDX_CO2I] - - k[3208]*y_cur[IDX_CO2I] - k[3209]*y_cur[IDX_CO2I] - - k[3210]*y_cur[IDX_CO2I] - k[3211]*y_cur[IDX_COI] - - k[3212]*y_cur[IDX_CPI] - k[3213]*y_cur[IDX_CPI] - - k[3214]*y_cur[IDX_CSI] - k[3215]*y_cur[IDX_CSI] - - k[3216]*y_cur[IDX_ClOI] - k[3217]*y_cur[IDX_H2CCCI] - - k[3218]*y_cur[IDX_H2CCCI] - k[3219]*y_cur[IDX_H2COI] - - k[3220]*y_cur[IDX_H2COI] - k[3221]*y_cur[IDX_H2COI] - - k[3222]*y_cur[IDX_H2CSI] - k[3223]*y_cur[IDX_H2CSI] - - k[3224]*y_cur[IDX_H2CSI] - k[3225]*y_cur[IDX_H2OI] - - k[3226]*y_cur[IDX_H2OI] - k[3227]*y_cur[IDX_H2S2I] - - k[3228]*y_cur[IDX_H2S2I] - k[3229]*y_cur[IDX_H2SI] - - k[3230]*y_cur[IDX_H2SI] - k[3231]*y_cur[IDX_H2SiOI] - - k[3232]*y_cur[IDX_HC2PI] - k[3233]*y_cur[IDX_HC2PI] - - k[3234]*y_cur[IDX_HC3NI] - k[3235]*y_cur[IDX_HC3NI] - - k[3236]*y_cur[IDX_HC3NI] - k[3237]*y_cur[IDX_HC3NI] - - k[3238]*y_cur[IDX_C4H2I] - k[3239]*y_cur[IDX_C4H2I] - - k[3240]*y_cur[IDX_C4H2I] - k[3241]*y_cur[IDX_HC5NI] - - k[3242]*y_cur[IDX_HC5NI] - k[3243]*y_cur[IDX_HC7NI] - - k[3244]*y_cur[IDX_HC9NI] - k[3245]*y_cur[IDX_HCNI] - - k[3246]*y_cur[IDX_HCNI] - k[3247]*y_cur[IDX_HCNI] - - k[3248]*y_cur[IDX_HCNI] - k[3249]*y_cur[IDX_HCOI] - - k[3250]*y_cur[IDX_HCOI] - k[3251]*y_cur[IDX_HCOI] - - k[3252]*y_cur[IDX_HCOOCH3I] - k[3253]*y_cur[IDX_HCPI] - - k[3254]*y_cur[IDX_HCPI] - k[3255]*y_cur[IDX_HCSI] - - k[3256]*y_cur[IDX_HCSI] - k[3257]*y_cur[IDX_HCSiI] - - k[3258]*y_cur[IDX_HCSiI] - k[3259]*y_cur[IDX_HClI] - - k[3260]*y_cur[IDX_HFI] - k[3261]*y_cur[IDX_HNCI] - - k[3262]*y_cur[IDX_HNCI] - k[3263]*y_cur[IDX_HNCI] - - k[3264]*y_cur[IDX_HNCOI] - k[3265]*y_cur[IDX_HNOI] - - k[3266]*y_cur[IDX_HNOI] - k[3267]*y_cur[IDX_HNSiI] - - k[3268]*y_cur[IDX_HOCNI] - k[3269]*y_cur[IDX_HPOI] - - k[3270]*y_cur[IDX_HPOI] - k[3271]*y_cur[IDX_HS2I] - - k[3272]*y_cur[IDX_HS2I] - k[3273]*y_cur[IDX_HSI] - - k[3274]*y_cur[IDX_N2I] - k[3275]*y_cur[IDX_N2OI] - - k[3276]*y_cur[IDX_N2OI] - k[3277]*y_cur[IDX_N2OI] - - k[3278]*y_cur[IDX_N2OI] - k[3279]*y_cur[IDX_NCCNI] - - k[3280]*y_cur[IDX_NH2I] - k[3281]*y_cur[IDX_NH2I] - - k[3282]*y_cur[IDX_NH2CNI] - k[3283]*y_cur[IDX_NH3I] - - k[3284]*y_cur[IDX_NH3I] - k[3285]*y_cur[IDX_NHI] - - k[3286]*y_cur[IDX_NOI] - k[3287]*y_cur[IDX_NOI] - - k[3288]*y_cur[IDX_NSI] - k[3289]*y_cur[IDX_NSI] - - k[3290]*y_cur[IDX_O2I] - k[3291]*y_cur[IDX_OCNI] - - k[3292]*y_cur[IDX_OCNI] - k[3293]*y_cur[IDX_OCSI] - - k[3294]*y_cur[IDX_OCSI] - k[3295]*y_cur[IDX_OCSI] - - k[3296]*y_cur[IDX_OCSI] - k[3297]*y_cur[IDX_OHI] - - k[3298]*y_cur[IDX_PH2I] - k[3299]*y_cur[IDX_PHI] - - k[3300]*y_cur[IDX_PNI] - k[3301]*y_cur[IDX_POI] - - k[3302]*y_cur[IDX_S2I] - k[3303]*y_cur[IDX_SO2I] - - k[3304]*y_cur[IDX_SO2I] - k[3305]*y_cur[IDX_SOI] - - k[3306]*y_cur[IDX_SOI] - k[3307]*y_cur[IDX_SiC2I] - - k[3308]*y_cur[IDX_SiC2H2I] - k[3309]*y_cur[IDX_SiC2H2I] - - k[3310]*y_cur[IDX_SiC2HI] - k[3311]*y_cur[IDX_SiC2HI] - - k[3312]*y_cur[IDX_SiC3I] - k[3313]*y_cur[IDX_SiC3HI] - - k[3314]*y_cur[IDX_SiC3HI] - k[3315]*y_cur[IDX_SiC4I] - - k[3316]*y_cur[IDX_SiCI] - k[3317]*y_cur[IDX_SiCI] - - k[3318]*y_cur[IDX_SiCH2I] - k[3319]*y_cur[IDX_SiCH2I] - - k[3320]*y_cur[IDX_SiCH3I] - k[3321]*y_cur[IDX_SiCH3I] - - k[3322]*y_cur[IDX_SiH2I] - k[3323]*y_cur[IDX_SiH2I] - - k[3324]*y_cur[IDX_SiH3I] - k[3325]*y_cur[IDX_SiH3I] - - k[3326]*y_cur[IDX_SiH4I] - k[3327]*y_cur[IDX_SiH4I] - - k[3328]*y_cur[IDX_SiHI] - k[3329]*y_cur[IDX_SiNI] - - k[3330]*y_cur[IDX_SiNCI] - k[3331]*y_cur[IDX_SiO2I] - - k[3332]*y_cur[IDX_SiOI] - k[3333]*y_cur[IDX_SiOI] - - k[3334]*y_cur[IDX_SiSI] - k[3335]*y_cur[IDX_SiSI] - - k[3906]*y_cur[IDX_CM] - k[3941]*y_cur[IDX_C10M] - - k[3976]*y_cur[IDX_C10HM] - k[4011]*y_cur[IDX_C2M] - - k[4046]*y_cur[IDX_C2HM] - k[4081]*y_cur[IDX_C3M] - - k[4116]*y_cur[IDX_C3HM] - k[4151]*y_cur[IDX_C3NM] - - k[4186]*y_cur[IDX_C4M] - k[4221]*y_cur[IDX_C4HM] - - k[4256]*y_cur[IDX_C5M] - k[4291]*y_cur[IDX_C5HM] - - k[4326]*y_cur[IDX_C5NM] - k[4361]*y_cur[IDX_C6M] - - k[4396]*y_cur[IDX_C6HM] - k[4431]*y_cur[IDX_C7M] - - k[4466]*y_cur[IDX_C7HM] - k[4501]*y_cur[IDX_C8M] - - k[4536]*y_cur[IDX_C8HM] - k[4571]*y_cur[IDX_C9M] - - k[4606]*y_cur[IDX_C9HM] - k[4641]*y_cur[IDX_CHM] - - k[4676]*y_cur[IDX_CNM] - k[4712]*y_cur[IDX_HM] - - k[4747]*y_cur[IDX_OM] - k[4782]*y_cur[IDX_O2M] - - k[4817]*y_cur[IDX_OHM] - k[4852]*y_cur[IDX_SM] - - k[5619]*y_cur[IDX_eM] - k[5631]*y_cur[IDX_CH3OI] - - k[5632]*y_cur[IDX_CH3OI] - k[5637]*y_cur[IDX_CH2OHI] - - k[5638]*y_cur[IDX_CH2OHI] - k[5642]*y_cur[IDX_CH3COI] - - k[5643]*y_cur[IDX_CH3COI] - k[5647]*y_cur[IDX_COOHI] - - k[5648]*y_cur[IDX_COOHI] - k[5653]*y_cur[IDX_COOCH3I] - - k[5654]*y_cur[IDX_COOCH3I] - k[5659]*y_cur[IDX_CH2OHCOI] - - k[5660]*y_cur[IDX_CH2OHCOI] - k[5665]*y_cur[IDX_CH2OHCHOI] - - k[5666]*y_cur[IDX_CH2OHCHOI] - k[5671]*y_cur[IDX_CH3COOHI] - - k[5672]*y_cur[IDX_CH3COOHI] - k[5673]*y_cur[IDX_CH3COOHI] - - k[5674]*y_cur[IDX_CH3COOHI] - k[6312]*y_cur[IDX_GRAINM]; - data[jistart + 15882] = 0.0 - k[523]*y_cur[IDX_HeII] - - k[3274]*y_cur[IDX_HeII]; - data[jistart + 15883] = 0.0 - k[3275]*y_cur[IDX_HeII] - - k[3276]*y_cur[IDX_HeII] - k[3277]*y_cur[IDX_HeII] - - k[3278]*y_cur[IDX_HeII]; - data[jistart + 15884] = 0.0 - k[3279]*y_cur[IDX_HeII]; - data[jistart + 15885] = 0.0 - k[3285]*y_cur[IDX_HeII]; - data[jistart + 15886] = 0.0 - k[3280]*y_cur[IDX_HeII] - - k[3281]*y_cur[IDX_HeII]; - data[jistart + 15887] = 0.0 - k[3282]*y_cur[IDX_HeII]; - data[jistart + 15888] = 0.0 - k[524]*y_cur[IDX_HeII] - - k[3283]*y_cur[IDX_HeII] - k[3284]*y_cur[IDX_HeII]; - data[jistart + 15889] = 0.0 - k[3286]*y_cur[IDX_HeII] - - k[3287]*y_cur[IDX_HeII]; - data[jistart + 15890] = 0.0 - k[3288]*y_cur[IDX_HeII] - - k[3289]*y_cur[IDX_HeII]; - data[jistart + 15891] = 0.0 - k[4747]*y_cur[IDX_HeII]; - data[jistart + 15892] = 0.0 - k[525]*y_cur[IDX_HeII] - - k[3290]*y_cur[IDX_HeII]; - data[jistart + 15893] = 0.0 - k[4782]*y_cur[IDX_HeII]; - data[jistart + 15894] = 0.0 - k[3291]*y_cur[IDX_HeII] - - k[3292]*y_cur[IDX_HeII]; - data[jistart + 15895] = 0.0 - k[3293]*y_cur[IDX_HeII] - - k[3294]*y_cur[IDX_HeII] - k[3295]*y_cur[IDX_HeII] - - k[3296]*y_cur[IDX_HeII]; - data[jistart + 15896] = 0.0 - k[3297]*y_cur[IDX_HeII]; - data[jistart + 15897] = 0.0 - k[4817]*y_cur[IDX_HeII]; - data[jistart + 15898] = 0.0 - k[526]*y_cur[IDX_HeII]; - data[jistart + 15899] = 0.0 - k[3299]*y_cur[IDX_HeII]; - data[jistart + 15900] = 0.0 - k[3298]*y_cur[IDX_HeII]; - data[jistart + 15901] = 0.0 - k[3300]*y_cur[IDX_HeII]; - data[jistart + 15902] = 0.0 - k[3301]*y_cur[IDX_HeII]; - data[jistart + 15903] = 0.0 - k[4852]*y_cur[IDX_HeII]; - data[jistart + 15904] = 0.0 - k[3302]*y_cur[IDX_HeII]; - data[jistart + 15905] = 0.0 - k[3305]*y_cur[IDX_HeII] - - k[3306]*y_cur[IDX_HeII]; - data[jistart + 15906] = 0.0 - k[527]*y_cur[IDX_HeII] - - k[3303]*y_cur[IDX_HeII] - k[3304]*y_cur[IDX_HeII]; - data[jistart + 15907] = 0.0 - k[528]*y_cur[IDX_HeII]; - data[jistart + 15908] = 0.0 - k[3316]*y_cur[IDX_HeII] - - k[3317]*y_cur[IDX_HeII]; - data[jistart + 15909] = 0.0 - k[3307]*y_cur[IDX_HeII]; - data[jistart + 15910] = 0.0 - k[3310]*y_cur[IDX_HeII] - - k[3311]*y_cur[IDX_HeII]; - data[jistart + 15911] = 0.0 - k[3308]*y_cur[IDX_HeII] - - k[3309]*y_cur[IDX_HeII]; - data[jistart + 15912] = 0.0 - k[3312]*y_cur[IDX_HeII]; - data[jistart + 15913] = 0.0 - k[3313]*y_cur[IDX_HeII] - - k[3314]*y_cur[IDX_HeII]; - data[jistart + 15914] = 0.0 - k[3315]*y_cur[IDX_HeII]; - data[jistart + 15915] = 0.0 - k[3318]*y_cur[IDX_HeII] - - k[3319]*y_cur[IDX_HeII]; - data[jistart + 15916] = 0.0 - k[3320]*y_cur[IDX_HeII] - - k[3321]*y_cur[IDX_HeII]; - data[jistart + 15917] = 0.0 - k[3328]*y_cur[IDX_HeII]; - data[jistart + 15918] = 0.0 - k[3322]*y_cur[IDX_HeII] - - k[3323]*y_cur[IDX_HeII]; - data[jistart + 15919] = 0.0 - k[3324]*y_cur[IDX_HeII] - - k[3325]*y_cur[IDX_HeII]; - data[jistart + 15920] = 0.0 - k[3326]*y_cur[IDX_HeII] - - k[3327]*y_cur[IDX_HeII]; - data[jistart + 15921] = 0.0 - k[3329]*y_cur[IDX_HeII]; - data[jistart + 15922] = 0.0 - k[3330]*y_cur[IDX_HeII]; - data[jistart + 15923] = 0.0 - k[3332]*y_cur[IDX_HeII] - - k[3333]*y_cur[IDX_HeII]; - data[jistart + 15924] = 0.0 - k[3331]*y_cur[IDX_HeII]; - data[jistart + 15925] = 0.0 - k[3334]*y_cur[IDX_HeII] - - k[3335]*y_cur[IDX_HeII]; - data[jistart + 15926] = 0.0 - k[5619]*y_cur[IDX_HeII]; - data[jistart + 15927] = 0.0 - k[6313]*y_cur[IDX_HeHII]; - data[jistart + 15928] = 0.0 - k[2845]*y_cur[IDX_HeHII]; - data[jistart + 15929] = 0.0 + k[5547]*y_cur[IDX_HeI]; - data[jistart + 15930] = 0.0 - k[2458]*y_cur[IDX_HeHII]; - data[jistart + 15931] = 0.0 + k[2390]*y_cur[IDX_HeI]; - data[jistart + 15932] = 0.0 + k[3250]*y_cur[IDX_HeII]; - data[jistart + 15933] = 0.0 + k[2390]*y_cur[IDX_H2II] + - k[5547]*y_cur[IDX_HII]; - data[jistart + 15934] = 0.0 + k[3250]*y_cur[IDX_HCOI]; - data[jistart + 15935] = 0.0 - k[1149]*y_cur[IDX_eM] - - k[2458]*y_cur[IDX_H2I] - k[2845]*y_cur[IDX_HI] - - k[6313]*y_cur[IDX_GRAINM]; - data[jistart + 15936] = 0.0 - k[1149]*y_cur[IDX_HeHII]; - data[jistart + 15937] = 0.0 - k[182]*y_cur[IDX_MgI]; - data[jistart + 15938] = 0.0 + k[3907]*y_cur[IDX_MgII]; - data[jistart + 15939] = 0.0 + k[3942]*y_cur[IDX_MgII]; - data[jistart + 15940] = 0.0 + k[3977]*y_cur[IDX_MgII]; - data[jistart + 15941] = 0.0 + k[4012]*y_cur[IDX_MgII]; - data[jistart + 15942] = 0.0 + k[4047]*y_cur[IDX_MgII]; - data[jistart + 15943] = 0.0 - k[529]*y_cur[IDX_MgI]; - data[jistart + 15944] = 0.0 + k[4082]*y_cur[IDX_MgII]; - data[jistart + 15945] = 0.0 + k[4117]*y_cur[IDX_MgII]; - data[jistart + 15946] = 0.0 + k[4152]*y_cur[IDX_MgII]; - data[jistart + 15947] = 0.0 + k[4187]*y_cur[IDX_MgII]; - data[jistart + 15948] = 0.0 + k[4222]*y_cur[IDX_MgII]; - data[jistart + 15949] = 0.0 + k[4257]*y_cur[IDX_MgII]; - data[jistart + 15950] = 0.0 + k[4292]*y_cur[IDX_MgII]; - data[jistart + 15951] = 0.0 + k[4327]*y_cur[IDX_MgII]; - data[jistart + 15952] = 0.0 + k[4362]*y_cur[IDX_MgII]; - data[jistart + 15953] = 0.0 + k[4397]*y_cur[IDX_MgII]; - data[jistart + 15954] = 0.0 + k[4432]*y_cur[IDX_MgII]; - data[jistart + 15955] = 0.0 + k[4467]*y_cur[IDX_MgII]; - data[jistart + 15956] = 0.0 + k[4502]*y_cur[IDX_MgII]; - data[jistart + 15957] = 0.0 + k[4537]*y_cur[IDX_MgII]; - data[jistart + 15958] = 0.0 + k[4572]*y_cur[IDX_MgII]; - data[jistart + 15959] = 0.0 + k[4607]*y_cur[IDX_MgII]; - data[jistart + 15960] = 0.0 - k[252]*y_cur[IDX_MgI]; - data[jistart + 15961] = 0.0 + k[4642]*y_cur[IDX_MgII]; - data[jistart + 15962] = 0.0 - k[273]*y_cur[IDX_MgI]; - data[jistart + 15963] = 0.0 - k[2233]*y_cur[IDX_MgI]; - data[jistart + 15964] = 0.0 + k[4677]*y_cur[IDX_MgII]; - data[jistart + 15965] = 0.0 - k[530]*y_cur[IDX_MgI]; - data[jistart + 15966] = 0.0 + k[7088] + k[7270] + k[7452]; - data[jistart + 15967] = 0.0 + k[6353]*y_cur[IDX_MgII]; - data[jistart + 15968] = 0.0 - k[398]*y_cur[IDX_MgI]; - data[jistart + 15969] = 0.0 + k[4713]*y_cur[IDX_MgII]; - data[jistart + 15970] = 0.0 - k[531]*y_cur[IDX_MgI]; - data[jistart + 15971] = 0.0 - k[471]*y_cur[IDX_MgI]; - data[jistart + 15972] = 0.0 - k[532]*y_cur[IDX_MgI]; - data[jistart + 15973] = 0.0 - k[2717]*y_cur[IDX_MgI]; - data[jistart + 15974] = 0.0 - k[533]*y_cur[IDX_MgI]; - data[jistart + 15975] = 0.0 - k[534]*y_cur[IDX_MgI]; - data[jistart + 15976] = 0.0 - k[182]*y_cur[IDX_CII] - - k[252]*y_cur[IDX_CHII] - k[273]*y_cur[IDX_CH3II] - - k[398]*y_cur[IDX_HII] - k[471]*y_cur[IDX_H2OII] - - k[529]*y_cur[IDX_C2H2II] - k[530]*y_cur[IDX_CSII] - - k[531]*y_cur[IDX_H2COII] - k[532]*y_cur[IDX_H2SII] - - k[533]*y_cur[IDX_HCOII] - k[534]*y_cur[IDX_HSII] - - k[535]*y_cur[IDX_N2II] - k[536]*y_cur[IDX_NOII] - - k[537]*y_cur[IDX_O2II] - k[538]*y_cur[IDX_SII] - - k[539]*y_cur[IDX_SOII] - k[540]*y_cur[IDX_SiII] - - k[541]*y_cur[IDX_SiOII] - k[556]*y_cur[IDX_NII] - - k[594]*y_cur[IDX_NH3II] - k[2233]*y_cur[IDX_CH5II] - - k[2717]*y_cur[IDX_H3II] - k[5877] - k[6210] - k[6306] - k[6906]; - data[jistart + 15977] = 0.0 + k[639]*y_cur[IDX_NaI] + - k[3907]*y_cur[IDX_CM] + k[3942]*y_cur[IDX_C10M] + - k[3977]*y_cur[IDX_C10HM] + k[4012]*y_cur[IDX_C2M] + - k[4047]*y_cur[IDX_C2HM] + k[4082]*y_cur[IDX_C3M] + - k[4117]*y_cur[IDX_C3HM] + k[4152]*y_cur[IDX_C3NM] + - k[4187]*y_cur[IDX_C4M] + k[4222]*y_cur[IDX_C4HM] + - k[4257]*y_cur[IDX_C5M] + k[4292]*y_cur[IDX_C5HM] + - k[4327]*y_cur[IDX_C5NM] + k[4362]*y_cur[IDX_C6M] + - k[4397]*y_cur[IDX_C6HM] + k[4432]*y_cur[IDX_C7M] + - k[4467]*y_cur[IDX_C7HM] + k[4502]*y_cur[IDX_C8M] + - k[4537]*y_cur[IDX_C8HM] + k[4572]*y_cur[IDX_C9M] + - k[4607]*y_cur[IDX_C9HM] + k[4642]*y_cur[IDX_CHM] + - k[4677]*y_cur[IDX_CNM] + k[4713]*y_cur[IDX_HM] + - k[4748]*y_cur[IDX_OM] + k[4783]*y_cur[IDX_O2M] + - k[4818]*y_cur[IDX_OHM] + k[4853]*y_cur[IDX_SM] + - k[5620]*y_cur[IDX_eM] + k[6353]*y_cur[IDX_GRAINM]; - data[jistart + 15978] = 0.0 - k[556]*y_cur[IDX_MgI]; - data[jistart + 15979] = 0.0 - k[535]*y_cur[IDX_MgI]; - data[jistart + 15980] = 0.0 - k[594]*y_cur[IDX_MgI]; - data[jistart + 15981] = 0.0 - k[536]*y_cur[IDX_MgI]; - data[jistart + 15982] = 0.0 + k[639]*y_cur[IDX_MgII]; - data[jistart + 15983] = 0.0 + k[4748]*y_cur[IDX_MgII]; - data[jistart + 15984] = 0.0 - k[537]*y_cur[IDX_MgI]; - data[jistart + 15985] = 0.0 + k[4783]*y_cur[IDX_MgII]; - data[jistart + 15986] = 0.0 + k[4818]*y_cur[IDX_MgII]; - data[jistart + 15987] = 0.0 - k[538]*y_cur[IDX_MgI]; - data[jistart + 15988] = 0.0 + k[4853]*y_cur[IDX_MgII]; - data[jistart + 15989] = 0.0 - k[539]*y_cur[IDX_MgI]; - data[jistart + 15990] = 0.0 - k[540]*y_cur[IDX_MgI]; - data[jistart + 15991] = 0.0 - k[541]*y_cur[IDX_MgI]; - data[jistart + 15992] = 0.0 + k[5620]*y_cur[IDX_MgII]; - data[jistart + 15993] = 0.0 + k[182]*y_cur[IDX_MgI]; - data[jistart + 15994] = 0.0 - k[3907]*y_cur[IDX_MgII]; - data[jistart + 15995] = 0.0 - k[3942]*y_cur[IDX_MgII]; - data[jistart + 15996] = 0.0 - k[3977]*y_cur[IDX_MgII]; - data[jistart + 15997] = 0.0 - k[4012]*y_cur[IDX_MgII]; - data[jistart + 15998] = 0.0 - k[4047]*y_cur[IDX_MgII]; - data[jistart + 15999] = 0.0 + k[529]*y_cur[IDX_MgI]; - data[jistart + 16000] = 0.0 - k[4082]*y_cur[IDX_MgII]; - data[jistart + 16001] = 0.0 - k[4117]*y_cur[IDX_MgII]; - data[jistart + 16002] = 0.0 - k[4152]*y_cur[IDX_MgII]; - data[jistart + 16003] = 0.0 - k[4187]*y_cur[IDX_MgII]; - data[jistart + 16004] = 0.0 - k[4222]*y_cur[IDX_MgII]; - data[jistart + 16005] = 0.0 - k[4257]*y_cur[IDX_MgII]; - data[jistart + 16006] = 0.0 - k[4292]*y_cur[IDX_MgII]; - data[jistart + 16007] = 0.0 - k[4327]*y_cur[IDX_MgII]; - data[jistart + 16008] = 0.0 - k[4362]*y_cur[IDX_MgII]; - data[jistart + 16009] = 0.0 - k[4397]*y_cur[IDX_MgII]; - data[jistart + 16010] = 0.0 - k[4432]*y_cur[IDX_MgII]; - data[jistart + 16011] = 0.0 - k[4467]*y_cur[IDX_MgII]; - data[jistart + 16012] = 0.0 - k[4502]*y_cur[IDX_MgII]; - data[jistart + 16013] = 0.0 - k[4537]*y_cur[IDX_MgII]; - data[jistart + 16014] = 0.0 - k[4572]*y_cur[IDX_MgII]; - data[jistart + 16015] = 0.0 - k[4607]*y_cur[IDX_MgII]; - data[jistart + 16016] = 0.0 + k[252]*y_cur[IDX_MgI]; - data[jistart + 16017] = 0.0 - k[4642]*y_cur[IDX_MgII]; - data[jistart + 16018] = 0.0 + k[273]*y_cur[IDX_MgI]; - data[jistart + 16019] = 0.0 + k[2233]*y_cur[IDX_MgI]; - data[jistart + 16020] = 0.0 - k[4677]*y_cur[IDX_MgII]; - data[jistart + 16021] = 0.0 + k[530]*y_cur[IDX_MgI]; - data[jistart + 16022] = 0.0 - k[6353]*y_cur[IDX_MgII]; - data[jistart + 16023] = 0.0 + k[398]*y_cur[IDX_MgI]; - data[jistart + 16024] = 0.0 - k[4713]*y_cur[IDX_MgII]; - data[jistart + 16025] = 0.0 + k[531]*y_cur[IDX_MgI]; - data[jistart + 16026] = 0.0 + k[471]*y_cur[IDX_MgI]; - data[jistart + 16027] = 0.0 + k[532]*y_cur[IDX_MgI]; - data[jistart + 16028] = 0.0 + k[2717]*y_cur[IDX_MgI]; - data[jistart + 16029] = 0.0 + k[533]*y_cur[IDX_MgI]; - data[jistart + 16030] = 0.0 + k[534]*y_cur[IDX_MgI]; - data[jistart + 16031] = 0.0 + k[182]*y_cur[IDX_CII] + - k[252]*y_cur[IDX_CHII] + k[273]*y_cur[IDX_CH3II] + - k[398]*y_cur[IDX_HII] + k[471]*y_cur[IDX_H2OII] + - k[529]*y_cur[IDX_C2H2II] + k[530]*y_cur[IDX_CSII] + - k[531]*y_cur[IDX_H2COII] + k[532]*y_cur[IDX_H2SII] + - k[533]*y_cur[IDX_HCOII] + k[534]*y_cur[IDX_HSII] + - k[535]*y_cur[IDX_N2II] + k[536]*y_cur[IDX_NOII] + - k[537]*y_cur[IDX_O2II] + k[538]*y_cur[IDX_SII] + - k[539]*y_cur[IDX_SOII] + k[540]*y_cur[IDX_SiII] + - k[541]*y_cur[IDX_SiOII] + k[556]*y_cur[IDX_NII] + - k[594]*y_cur[IDX_NH3II] + k[2233]*y_cur[IDX_CH5II] + - k[2717]*y_cur[IDX_H3II] + k[5877] + k[6210] + k[6306]; - data[jistart + 16032] = 0.0 - k[639]*y_cur[IDX_NaI] - - k[3907]*y_cur[IDX_CM] - k[3942]*y_cur[IDX_C10M] - - k[3977]*y_cur[IDX_C10HM] - k[4012]*y_cur[IDX_C2M] - - k[4047]*y_cur[IDX_C2HM] - k[4082]*y_cur[IDX_C3M] - - k[4117]*y_cur[IDX_C3HM] - k[4152]*y_cur[IDX_C3NM] - - k[4187]*y_cur[IDX_C4M] - k[4222]*y_cur[IDX_C4HM] - - k[4257]*y_cur[IDX_C5M] - k[4292]*y_cur[IDX_C5HM] - - k[4327]*y_cur[IDX_C5NM] - k[4362]*y_cur[IDX_C6M] - - k[4397]*y_cur[IDX_C6HM] - k[4432]*y_cur[IDX_C7M] - - k[4467]*y_cur[IDX_C7HM] - k[4502]*y_cur[IDX_C8M] - - k[4537]*y_cur[IDX_C8HM] - k[4572]*y_cur[IDX_C9M] - - k[4607]*y_cur[IDX_C9HM] - k[4642]*y_cur[IDX_CHM] - - k[4677]*y_cur[IDX_CNM] - k[4713]*y_cur[IDX_HM] - - k[4748]*y_cur[IDX_OM] - k[4783]*y_cur[IDX_O2M] - - k[4818]*y_cur[IDX_OHM] - k[4853]*y_cur[IDX_SM] - - k[5620]*y_cur[IDX_eM] - k[6353]*y_cur[IDX_GRAINM]; - data[jistart + 16033] = 0.0 + k[556]*y_cur[IDX_MgI]; - data[jistart + 16034] = 0.0 + k[535]*y_cur[IDX_MgI]; - data[jistart + 16035] = 0.0 + k[594]*y_cur[IDX_MgI]; - data[jistart + 16036] = 0.0 + k[536]*y_cur[IDX_MgI]; - data[jistart + 16037] = 0.0 - k[639]*y_cur[IDX_MgII]; - data[jistart + 16038] = 0.0 - k[4748]*y_cur[IDX_MgII]; - data[jistart + 16039] = 0.0 + k[537]*y_cur[IDX_MgI]; - data[jistart + 16040] = 0.0 - k[4783]*y_cur[IDX_MgII]; - data[jistart + 16041] = 0.0 - k[4818]*y_cur[IDX_MgII]; - data[jistart + 16042] = 0.0 + k[538]*y_cur[IDX_MgI]; - data[jistart + 16043] = 0.0 - k[4853]*y_cur[IDX_MgII]; - data[jistart + 16044] = 0.0 + k[539]*y_cur[IDX_MgI]; - data[jistart + 16045] = 0.0 + k[540]*y_cur[IDX_MgI]; - data[jistart + 16046] = 0.0 + k[541]*y_cur[IDX_MgI]; - data[jistart + 16047] = 0.0 - k[5620]*y_cur[IDX_MgII]; - data[jistart + 16048] = 0.0 + k[1910]*y_cur[IDX_NHII] + - k[4956]*y_cur[IDX_CNI] + k[4967]*y_cur[IDX_N2I] + - k[4973]*y_cur[IDX_NHI] + k[4975]*y_cur[IDX_NOI] + - k[4976]*y_cur[IDX_NSI] - k[5524]*y_cur[IDX_NI]; - data[jistart + 16049] = 0.0 + k[1421]*y_cur[IDX_NSI] + - k[1446]*y_cur[IDX_SiNI] - k[5504]*y_cur[IDX_NI]; - data[jistart + 16050] = 0.0 - k[5]*y_cur[IDX_NI] + - k[3908]*y_cur[IDX_NII]; - data[jistart + 16051] = 0.0 - k[5221]*y_cur[IDX_NI]; - data[jistart + 16052] = 0.0 - k[3377]*y_cur[IDX_NI] - - k[3378]*y_cur[IDX_NI] - k[3379]*y_cur[IDX_NI] - - k[3380]*y_cur[IDX_NI] + k[3943]*y_cur[IDX_NII]; - data[jistart + 16053] = 0.0 - k[3381]*y_cur[IDX_NI] - - k[3382]*y_cur[IDX_NI] + k[3978]*y_cur[IDX_NII]; - data[jistart + 16054] = 0.0 + k[542]*y_cur[IDX_NII] + - k[3477]*y_cur[IDX_NHII] - k[5222]*y_cur[IDX_NI]; - data[jistart + 16055] = 0.0 - k[3383]*y_cur[IDX_NI] + - k[3605]*y_cur[IDX_NHI]; - data[jistart + 16056] = 0.0 - k[110]*y_cur[IDX_NI] - - k[3384]*y_cur[IDX_NI] + k[4013]*y_cur[IDX_NII]; - data[jistart + 16057] = 0.0 + k[543]*y_cur[IDX_NII] + - k[3480]*y_cur[IDX_NHII] - k[5228]*y_cur[IDX_NI]; - data[jistart + 16058] = 0.0 - k[3385]*y_cur[IDX_NI] - - k[3386]*y_cur[IDX_NI]; - data[jistart + 16059] = 0.0 - k[111]*y_cur[IDX_NI] + - k[4048]*y_cur[IDX_NII]; - data[jistart + 16060] = 0.0 - k[3387]*y_cur[IDX_NI] - - k[3388]*y_cur[IDX_NI] - k[3389]*y_cur[IDX_NI]; - data[jistart + 16061] = 0.0 - k[5223]*y_cur[IDX_NI] - - k[5224]*y_cur[IDX_NI]; - data[jistart + 16062] = 0.0 - k[3390]*y_cur[IDX_NI]; - data[jistart + 16063] = 0.0 - k[5225]*y_cur[IDX_NI]; - data[jistart + 16064] = 0.0 - k[3391]*y_cur[IDX_NI]; - data[jistart + 16065] = 0.0 - k[5226]*y_cur[IDX_NI] - - k[5227]*y_cur[IDX_NI]; - data[jistart + 16066] = 0.0 - k[5229]*y_cur[IDX_NI] + k[5710] + - k[5995]; - data[jistart + 16067] = 0.0 + k[780]*y_cur[IDX_eM] + - k[6466]*y_cur[IDX_GRAINM]; - data[jistart + 16068] = 0.0 + k[782]*y_cur[IDX_eM] + - k[6635]*y_cur[IDX_GRAINM]; - data[jistart + 16069] = 0.0 - k[5230]*y_cur[IDX_NI]; - data[jistart + 16070] = 0.0 - k[5231]*y_cur[IDX_NI]; - data[jistart + 16071] = 0.0 - k[112]*y_cur[IDX_NI] - - k[3392]*y_cur[IDX_NI] - k[3393]*y_cur[IDX_NI] + - k[4083]*y_cur[IDX_NII]; - data[jistart + 16072] = 0.0 - k[5233]*y_cur[IDX_NI]; - data[jistart + 16073] = 0.0 - k[3394]*y_cur[IDX_NI]; - data[jistart + 16074] = 0.0 - k[113]*y_cur[IDX_NI] - - k[3395]*y_cur[IDX_NI] - k[3396]*y_cur[IDX_NI] + - k[4118]*y_cur[IDX_NII]; - data[jistart + 16075] = 0.0 - k[5232]*y_cur[IDX_NI]; - data[jistart + 16076] = 0.0 - k[3397]*y_cur[IDX_NI] - - k[3398]*y_cur[IDX_NI]; - data[jistart + 16077] = 0.0 - k[3399]*y_cur[IDX_NI]; - data[jistart + 16078] = 0.0 - k[3400]*y_cur[IDX_NI] - - k[3401]*y_cur[IDX_NI]; - data[jistart + 16079] = 0.0 - k[5234]*y_cur[IDX_NI]; - data[jistart + 16080] = 0.0 + k[4153]*y_cur[IDX_NII]; - data[jistart + 16081] = 0.0 - k[5235]*y_cur[IDX_NI]; - data[jistart + 16082] = 0.0 - k[114]*y_cur[IDX_NI] - - k[3402]*y_cur[IDX_NI] - k[3403]*y_cur[IDX_NI] + - k[4188]*y_cur[IDX_NII]; - data[jistart + 16083] = 0.0 - k[5236]*y_cur[IDX_NI]; - data[jistart + 16084] = 0.0 - k[115]*y_cur[IDX_NI] - - k[3404]*y_cur[IDX_NI] + k[4223]*y_cur[IDX_NII]; - data[jistart + 16085] = 0.0 - k[3405]*y_cur[IDX_NI] - - k[3406]*y_cur[IDX_NI] - k[3407]*y_cur[IDX_NI]; - data[jistart + 16086] = 0.0 - k[3408]*y_cur[IDX_NI]; - data[jistart + 16087] = 0.0 - k[5237]*y_cur[IDX_NI] + k[6019]; - data[jistart + 16088] = 0.0 - k[5238]*y_cur[IDX_NI]; - data[jistart + 16089] = 0.0 - k[116]*y_cur[IDX_NI] - - k[3409]*y_cur[IDX_NI] - k[3410]*y_cur[IDX_NI] - - k[3411]*y_cur[IDX_NI] + k[4258]*y_cur[IDX_NII]; - data[jistart + 16090] = 0.0 - k[5240]*y_cur[IDX_NI]; - data[jistart + 16091] = 0.0 - k[3412]*y_cur[IDX_NI]; - data[jistart + 16092] = 0.0 - k[117]*y_cur[IDX_NI] - - k[3413]*y_cur[IDX_NI] - k[3414]*y_cur[IDX_NI] + - k[4293]*y_cur[IDX_NII]; - data[jistart + 16093] = 0.0 - k[5239]*y_cur[IDX_NI]; - data[jistart + 16094] = 0.0 - k[3415]*y_cur[IDX_NI]; - data[jistart + 16095] = 0.0 - k[3416]*y_cur[IDX_NI]; - data[jistart + 16096] = 0.0 - k[3417]*y_cur[IDX_NI]; - data[jistart + 16097] = 0.0 - k[5241]*y_cur[IDX_NI]; - data[jistart + 16098] = 0.0 + k[4328]*y_cur[IDX_NII]; - data[jistart + 16099] = 0.0 - k[5242]*y_cur[IDX_NI]; - data[jistart + 16100] = 0.0 - k[3418]*y_cur[IDX_NI] - - k[3419]*y_cur[IDX_NI] - k[3420]*y_cur[IDX_NI] + - k[4363]*y_cur[IDX_NII]; - data[jistart + 16101] = 0.0 - k[5243]*y_cur[IDX_NI]; - data[jistart + 16102] = 0.0 - k[3421]*y_cur[IDX_NI] - - k[3422]*y_cur[IDX_NI] + k[4398]*y_cur[IDX_NII]; - data[jistart + 16103] = 0.0 - k[3423]*y_cur[IDX_NI]; - data[jistart + 16104] = 0.0 - k[3424]*y_cur[IDX_NI]; - data[jistart + 16105] = 0.0 - k[5244]*y_cur[IDX_NI]; - data[jistart + 16106] = 0.0 - k[118]*y_cur[IDX_NI] - - k[3425]*y_cur[IDX_NI] - k[3426]*y_cur[IDX_NI] - - k[3427]*y_cur[IDX_NI] - k[3428]*y_cur[IDX_NI] + - k[4433]*y_cur[IDX_NII]; - data[jistart + 16107] = 0.0 - k[5246]*y_cur[IDX_NI]; - data[jistart + 16108] = 0.0 - k[3429]*y_cur[IDX_NI]; - data[jistart + 16109] = 0.0 - k[119]*y_cur[IDX_NI] - - k[3430]*y_cur[IDX_NI] - k[3431]*y_cur[IDX_NI] + - k[4468]*y_cur[IDX_NII]; - data[jistart + 16110] = 0.0 - k[5245]*y_cur[IDX_NI]; - data[jistart + 16111] = 0.0 - k[3432]*y_cur[IDX_NI]; - data[jistart + 16112] = 0.0 - k[3433]*y_cur[IDX_NI]; - data[jistart + 16113] = 0.0 - k[3434]*y_cur[IDX_NI]; - data[jistart + 16114] = 0.0 - k[3435]*y_cur[IDX_NI]; - data[jistart + 16115] = 0.0 - k[5247]*y_cur[IDX_NI]; - data[jistart + 16116] = 0.0 - k[5248]*y_cur[IDX_NI]; - data[jistart + 16117] = 0.0 - k[3436]*y_cur[IDX_NI] - - k[3437]*y_cur[IDX_NI] - k[3438]*y_cur[IDX_NI] - - k[3439]*y_cur[IDX_NI] + k[4503]*y_cur[IDX_NII]; - data[jistart + 16118] = 0.0 - k[5249]*y_cur[IDX_NI]; - data[jistart + 16119] = 0.0 - k[3440]*y_cur[IDX_NI] - - k[3441]*y_cur[IDX_NI] + k[4538]*y_cur[IDX_NII]; - data[jistart + 16120] = 0.0 - k[5250]*y_cur[IDX_NI]; - data[jistart + 16121] = 0.0 - k[120]*y_cur[IDX_NI] - - k[3442]*y_cur[IDX_NI] - k[3443]*y_cur[IDX_NI] - - k[3444]*y_cur[IDX_NI] - k[3445]*y_cur[IDX_NI] + - k[4573]*y_cur[IDX_NII]; - data[jistart + 16122] = 0.0 - k[5251]*y_cur[IDX_NI]; - data[jistart + 16123] = 0.0 - k[3446]*y_cur[IDX_NI]; - data[jistart + 16124] = 0.0 - k[121]*y_cur[IDX_NI] - - k[3447]*y_cur[IDX_NI] - k[3448]*y_cur[IDX_NI] + - k[4608]*y_cur[IDX_NII]; - data[jistart + 16125] = 0.0 - k[3449]*y_cur[IDX_NI]; - data[jistart + 16126] = 0.0 - k[3450]*y_cur[IDX_NI]; - data[jistart + 16127] = 0.0 - k[3451]*y_cur[IDX_NI]; - data[jistart + 16128] = 0.0 - k[5252]*y_cur[IDX_NI]; - data[jistart + 16129] = 0.0 + k[292]*y_cur[IDX_NII] + - k[2258]*y_cur[IDX_NHII] + k[5079]*y_cur[IDX_N2I] - - k[5080]*y_cur[IDX_NI] - k[5081]*y_cur[IDX_NI] + - k[5084]*y_cur[IDX_NOI]; - data[jistart + 16130] = 0.0 - k[1961]*y_cur[IDX_NI]; - data[jistart + 16131] = 0.0 + k[4643]*y_cur[IDX_NII]; - data[jistart + 16132] = 0.0 + k[544]*y_cur[IDX_NII] + - k[2011]*y_cur[IDX_NHII] + k[5003]*y_cur[IDX_NOI] - - k[5253]*y_cur[IDX_NI] - k[5254]*y_cur[IDX_NI] - - k[5255]*y_cur[IDX_NI]; - data[jistart + 16133] = 0.0 - k[3452]*y_cur[IDX_NI]; - data[jistart + 16134] = 0.0 - k[5256]*y_cur[IDX_NI]; - data[jistart + 16135] = 0.0 - k[3453]*y_cur[IDX_NI]; - data[jistart + 16136] = 0.0 + k[3166]*y_cur[IDX_HeII]; - data[jistart + 16137] = 0.0 - k[5257]*y_cur[IDX_NI] - - k[5258]*y_cur[IDX_NI] - k[5259]*y_cur[IDX_NI]; - data[jistart + 16138] = 0.0 - k[3454]*y_cur[IDX_NI]; - data[jistart + 16139] = 0.0 - k[3455]*y_cur[IDX_NI]; - data[jistart + 16140] = 0.0 + k[545]*y_cur[IDX_NII]; - data[jistart + 16141] = 0.0 + k[546]*y_cur[IDX_NII] + - k[3340]*y_cur[IDX_NII]; - data[jistart + 16142] = 0.0 + k[547]*y_cur[IDX_NII] + - k[3204]*y_cur[IDX_HeII] + k[3481]*y_cur[IDX_NHII] + - k[3509]*y_cur[IDX_NH2II] + k[4956]*y_cur[IDX_CI] + - k[5122]*y_cur[IDX_NOI] - k[5260]*y_cur[IDX_NI] - - k[5261]*y_cur[IDX_NI] + k[5305]*y_cur[IDX_NHI] + - k[5386]*y_cur[IDX_OI] + k[5387]*y_cur[IDX_OI] + k[5823] + k[6134]; - data[jistart + 16143] = 0.0 + k[977]*y_cur[IDX_eM] + - k[2274]*y_cur[IDX_NOI] - k[3456]*y_cur[IDX_NI] + - k[6359]*y_cur[IDX_GRAINM]; - data[jistart + 16144] = 0.0 + k[4678]*y_cur[IDX_NII]; - data[jistart + 16145] = 0.0 + k[978]*y_cur[IDX_eM] + - k[6468]*y_cur[IDX_GRAINM]; - data[jistart + 16146] = 0.0 + k[549]*y_cur[IDX_NII] + - k[3485]*y_cur[IDX_NHII]; - data[jistart + 16147] = 0.0 + k[3610]*y_cur[IDX_NHI]; - data[jistart + 16148] = 0.0 + k[548]*y_cur[IDX_NII] + - k[3482]*y_cur[IDX_NHII] - k[5262]*y_cur[IDX_NI]; - data[jistart + 16149] = 0.0 - k[5263]*y_cur[IDX_NI]; - data[jistart + 16150] = 0.0 + k[550]*y_cur[IDX_NII]; - data[jistart + 16151] = 0.0 + k[7076] + k[7258] + k[7440]; - data[jistart + 16152] = 0.0 + k[6319]*y_cur[IDX_NII] + - k[6320]*y_cur[IDX_NHII] + k[6324]*y_cur[IDX_NH2II] + - k[6359]*y_cur[IDX_CNII] + k[6375]*y_cur[IDX_N2II] + - k[6375]*y_cur[IDX_N2II] + k[6397]*y_cur[IDX_N2HII] + - k[6407]*y_cur[IDX_NOII] + k[6466]*y_cur[IDX_C2NII] + - k[6468]*y_cur[IDX_CNCII] + k[6495]*y_cur[IDX_OCNII] + - k[6501]*y_cur[IDX_SiNII] + k[6529]*y_cur[IDX_N2OII] + - k[6530]*y_cur[IDX_N2OII] + k[6530]*y_cur[IDX_N2OII] + - k[6560]*y_cur[IDX_PNII] + k[6572]*y_cur[IDX_HPNII] + - k[6581]*y_cur[IDX_NSII] + k[6635]*y_cur[IDX_C2N2II]; - data[jistart + 16153] = 0.0 + k[5184]*y_cur[IDX_NHI] + - k[5187]*y_cur[IDX_NOI] + k[5188]*y_cur[IDX_NSI]; - data[jistart + 16154] = 0.0 - k[77]*y_cur[IDX_NI] + - k[4714]*y_cur[IDX_NII]; - data[jistart + 16155] = 0.0 + k[2461]*y_cur[IDX_NHII] - - k[5141]*y_cur[IDX_NI]; - data[jistart + 16156] = 0.0 - k[2392]*y_cur[IDX_NI]; - data[jistart + 16157] = 0.0 - k[5264]*y_cur[IDX_NI]; - data[jistart + 16158] = 0.0 + k[551]*y_cur[IDX_NII] + - k[3487]*y_cur[IDX_NHII]; - data[jistart + 16159] = 0.0 + k[3611]*y_cur[IDX_NHI]; - data[jistart + 16160] = 0.0 + k[552]*y_cur[IDX_NII] + - k[3489]*y_cur[IDX_NHII]; - data[jistart + 16161] = 0.0 - k[3457]*y_cur[IDX_NI] - - k[3458]*y_cur[IDX_NI] + k[3612]*y_cur[IDX_NHI]; - data[jistart + 16162] = 0.0 + k[553]*y_cur[IDX_NII]; - data[jistart + 16163] = 0.0 - k[3459]*y_cur[IDX_NI]; - data[jistart + 16164] = 0.0 + k[3235]*y_cur[IDX_HeII]; - data[jistart + 16165] = 0.0 - k[3460]*y_cur[IDX_NI] - - k[3461]*y_cur[IDX_NI]; - data[jistart + 16166] = 0.0 + k[554]*y_cur[IDX_NII] + - k[3247]*y_cur[IDX_HeII] + k[3248]*y_cur[IDX_HeII] + - k[3493]*y_cur[IDX_NHII] + k[3644]*y_cur[IDX_OII]; - data[jistart + 16167] = 0.0 + k[555]*y_cur[IDX_NII] + - k[3494]*y_cur[IDX_NHII] - k[5265]*y_cur[IDX_NI] - - k[5266]*y_cur[IDX_NI] - k[5267]*y_cur[IDX_NI]; - data[jistart + 16168] = 0.0 - k[5268]*y_cur[IDX_NI]; - data[jistart + 16169] = 0.0 + k[3262]*y_cur[IDX_HeII] + - k[3495]*y_cur[IDX_NHII]; - data[jistart + 16170] = 0.0 - k[5269]*y_cur[IDX_NI] - - k[5270]*y_cur[IDX_NI]; - data[jistart + 16171] = 0.0 + k[1133]*y_cur[IDX_eM] + - k[6572]*y_cur[IDX_GRAINM]; - data[jistart + 16172] = 0.0 - k[5271]*y_cur[IDX_NI] - - k[5272]*y_cur[IDX_NI]; - data[jistart + 16173] = 0.0 - k[3462]*y_cur[IDX_NI]; - data[jistart + 16174] = 0.0 + k[3166]*y_cur[IDX_CH2CHCNI] + - k[3204]*y_cur[IDX_CNI] + k[3235]*y_cur[IDX_HC3NI] + - k[3247]*y_cur[IDX_HCNI] + k[3248]*y_cur[IDX_HCNI] + - k[3262]*y_cur[IDX_HNCI] + k[3274]*y_cur[IDX_N2I] + - k[3277]*y_cur[IDX_N2OI] + k[3286]*y_cur[IDX_NOI] + - k[3288]*y_cur[IDX_NSI] + k[3300]*y_cur[IDX_PNI] + - k[3329]*y_cur[IDX_SiNI]; - data[jistart + 16175] = 0.0 + k[556]*y_cur[IDX_NII]; - data[jistart + 16176] = 0.0 - k[5]*y_cur[IDX_CM] - - k[77]*y_cur[IDX_HM] - k[110]*y_cur[IDX_C2M] - k[111]*y_cur[IDX_C2HM] - - k[112]*y_cur[IDX_C3M] - k[113]*y_cur[IDX_C3HM] - - k[114]*y_cur[IDX_C4M] - k[115]*y_cur[IDX_C4HM] - - k[116]*y_cur[IDX_C5M] - k[117]*y_cur[IDX_C5HM] - - k[118]*y_cur[IDX_C7M] - k[119]*y_cur[IDX_C7HM] - - k[120]*y_cur[IDX_C9M] - k[121]*y_cur[IDX_C9HM] - - k[122]*y_cur[IDX_OM] - k[123]*y_cur[IDX_SM] - k[573]*y_cur[IDX_N2II] - - k[1961]*y_cur[IDX_CHII] - k[2392]*y_cur[IDX_H2II] - - k[3377]*y_cur[IDX_C10M] - k[3378]*y_cur[IDX_C10M] - - k[3379]*y_cur[IDX_C10M] - k[3380]*y_cur[IDX_C10M] - - k[3381]*y_cur[IDX_C10HM] - k[3382]*y_cur[IDX_C10HM] - - k[3383]*y_cur[IDX_C2II] - k[3384]*y_cur[IDX_C2M] - - k[3385]*y_cur[IDX_C2HII] - k[3386]*y_cur[IDX_C2HII] - - k[3387]*y_cur[IDX_C2H2II] - k[3388]*y_cur[IDX_C2H2II] - - k[3389]*y_cur[IDX_C2H2II] - k[3390]*y_cur[IDX_C2H3II] - - k[3391]*y_cur[IDX_C2H4II] - k[3392]*y_cur[IDX_C3M] - - k[3393]*y_cur[IDX_C3M] - k[3394]*y_cur[IDX_C3HII] - - k[3395]*y_cur[IDX_C3HM] - k[3396]*y_cur[IDX_C3HM] - - k[3397]*y_cur[IDX_C3H2II] - k[3398]*y_cur[IDX_C3H2II] - - k[3399]*y_cur[IDX_C3H4II] - k[3400]*y_cur[IDX_C3H5II] - - k[3401]*y_cur[IDX_C3H5II] - k[3402]*y_cur[IDX_C4M] - - k[3403]*y_cur[IDX_C4M] - k[3404]*y_cur[IDX_C4HM] - - k[3405]*y_cur[IDX_C4H2II] - k[3406]*y_cur[IDX_C4H2II] - - k[3407]*y_cur[IDX_C4H2II] - k[3408]*y_cur[IDX_C4H5II] - - k[3409]*y_cur[IDX_C5M] - k[3410]*y_cur[IDX_C5M] - - k[3411]*y_cur[IDX_C5M] - k[3412]*y_cur[IDX_C5HII] - - k[3413]*y_cur[IDX_C5HM] - k[3414]*y_cur[IDX_C5HM] - - k[3415]*y_cur[IDX_C5H2II] - k[3416]*y_cur[IDX_C5H3II] - - k[3417]*y_cur[IDX_C5H5II] - k[3418]*y_cur[IDX_C6M] - - k[3419]*y_cur[IDX_C6M] - k[3420]*y_cur[IDX_C6M] - - k[3421]*y_cur[IDX_C6HM] - k[3422]*y_cur[IDX_C6HM] - - k[3423]*y_cur[IDX_C6H2II] - k[3424]*y_cur[IDX_C6H5II] - - k[3425]*y_cur[IDX_C7M] - k[3426]*y_cur[IDX_C7M] - - k[3427]*y_cur[IDX_C7M] - k[3428]*y_cur[IDX_C7M] - - k[3429]*y_cur[IDX_C7HII] - k[3430]*y_cur[IDX_C7HM] - - k[3431]*y_cur[IDX_C7HM] - k[3432]*y_cur[IDX_C7H2II] - - k[3433]*y_cur[IDX_C7H3II] - k[3434]*y_cur[IDX_C7H4II] - - k[3435]*y_cur[IDX_C7H5II] - k[3436]*y_cur[IDX_C8M] - - k[3437]*y_cur[IDX_C8M] - k[3438]*y_cur[IDX_C8M] - - k[3439]*y_cur[IDX_C8M] - k[3440]*y_cur[IDX_C8HM] - - k[3441]*y_cur[IDX_C8HM] - k[3442]*y_cur[IDX_C9M] - - k[3443]*y_cur[IDX_C9M] - k[3444]*y_cur[IDX_C9M] - - k[3445]*y_cur[IDX_C9M] - k[3446]*y_cur[IDX_C9HII] - - k[3447]*y_cur[IDX_C9HM] - k[3448]*y_cur[IDX_C9HM] - - k[3449]*y_cur[IDX_C9H2II] - k[3450]*y_cur[IDX_C9H3II] - - k[3451]*y_cur[IDX_C9H4II] - k[3452]*y_cur[IDX_CH2II] - - k[3453]*y_cur[IDX_CH2CCHII] - k[3454]*y_cur[IDX_CH3II] - - k[3455]*y_cur[IDX_CH3C4HII] - k[3456]*y_cur[IDX_CNII] - - k[3457]*y_cur[IDX_H2OII] - k[3458]*y_cur[IDX_H2OII] - - k[3459]*y_cur[IDX_H2SII] - k[3460]*y_cur[IDX_HC3NII] - - k[3461]*y_cur[IDX_HC3NII] - k[3462]*y_cur[IDX_HSII] - - k[3463]*y_cur[IDX_NHII] - k[3464]*y_cur[IDX_NH2II] - - k[3465]*y_cur[IDX_O2II] - k[3466]*y_cur[IDX_O2HII] - - k[3467]*y_cur[IDX_OHII] - k[3468]*y_cur[IDX_SOII] - - k[3469]*y_cur[IDX_SiCII] - k[3470]*y_cur[IDX_SiCH2II] - - k[3471]*y_cur[IDX_SiHII] - k[3472]*y_cur[IDX_SiH2II] - - k[3473]*y_cur[IDX_SiH3II] - k[3474]*y_cur[IDX_SiH3II] - - k[3475]*y_cur[IDX_SiOII] - k[3476]*y_cur[IDX_SiOII] - - k[5080]*y_cur[IDX_CHI] - k[5081]*y_cur[IDX_CHI] - - k[5141]*y_cur[IDX_H2I] - k[5221]*y_cur[IDX_C10I] - - k[5222]*y_cur[IDX_C2I] - k[5223]*y_cur[IDX_C2H3I] - - k[5224]*y_cur[IDX_C2H3I] - k[5225]*y_cur[IDX_C2H4I] - - k[5226]*y_cur[IDX_C2H5I] - k[5227]*y_cur[IDX_C2H5I] - - k[5228]*y_cur[IDX_C2HI] - k[5229]*y_cur[IDX_C2NI] - - k[5230]*y_cur[IDX_C2OI] - k[5231]*y_cur[IDX_C3I] - - k[5232]*y_cur[IDX_C3H2I] - k[5233]*y_cur[IDX_C3HI] - - k[5234]*y_cur[IDX_C3NI] - k[5235]*y_cur[IDX_C4I] - - k[5236]*y_cur[IDX_C4HI] - k[5237]*y_cur[IDX_C4NI] - - k[5238]*y_cur[IDX_C5I] - k[5239]*y_cur[IDX_C5H2I] - - k[5240]*y_cur[IDX_C5HI] - k[5241]*y_cur[IDX_C5NI] - - k[5242]*y_cur[IDX_C6I] - k[5243]*y_cur[IDX_C6HI] - - k[5244]*y_cur[IDX_C7I] - k[5245]*y_cur[IDX_C7H2I] - - k[5246]*y_cur[IDX_C7HI] - k[5247]*y_cur[IDX_C7NI] - - k[5248]*y_cur[IDX_C8I] - k[5249]*y_cur[IDX_C8HI] - - k[5250]*y_cur[IDX_C9I] - k[5251]*y_cur[IDX_C9HI] - - k[5252]*y_cur[IDX_C9NI] - k[5253]*y_cur[IDX_CH2I] - - k[5254]*y_cur[IDX_CH2I] - k[5255]*y_cur[IDX_CH2I] - - k[5256]*y_cur[IDX_CH2CCHI] - k[5257]*y_cur[IDX_CH3I] - - k[5258]*y_cur[IDX_CH3I] - k[5259]*y_cur[IDX_CH3I] - - k[5260]*y_cur[IDX_CNI] - k[5261]*y_cur[IDX_CNI] - - k[5262]*y_cur[IDX_CO2I] - k[5263]*y_cur[IDX_CSI] - - k[5264]*y_cur[IDX_H2CNI] - k[5265]*y_cur[IDX_HCOI] - - k[5266]*y_cur[IDX_HCOI] - k[5267]*y_cur[IDX_HCOI] - - k[5268]*y_cur[IDX_HCSI] - k[5269]*y_cur[IDX_HNOI] - - k[5270]*y_cur[IDX_HNOI] - k[5271]*y_cur[IDX_HSI] - - k[5272]*y_cur[IDX_HSI] - k[5273]*y_cur[IDX_NCCNI] - - k[5274]*y_cur[IDX_NHI] - k[5275]*y_cur[IDX_NO2I] - - k[5276]*y_cur[IDX_NO2I] - k[5277]*y_cur[IDX_NO2I] - - k[5278]*y_cur[IDX_NO2I] - k[5279]*y_cur[IDX_NOI] - - k[5280]*y_cur[IDX_NSI] - k[5281]*y_cur[IDX_O2I] - - k[5282]*y_cur[IDX_O2HI] - k[5283]*y_cur[IDX_OHI] - - k[5284]*y_cur[IDX_OHI] - k[5285]*y_cur[IDX_PHI] - - k[5286]*y_cur[IDX_PNI] - k[5287]*y_cur[IDX_POI] - - k[5288]*y_cur[IDX_POI] - k[5289]*y_cur[IDX_S2I] - - k[5290]*y_cur[IDX_SOI] - k[5291]*y_cur[IDX_SOI] - - k[5292]*y_cur[IDX_SiCI] - k[5293]*y_cur[IDX_SiCI] - - k[5294]*y_cur[IDX_SiH2I] - k[5295]*y_cur[IDX_SiH3I] - - k[5296]*y_cur[IDX_SiHI] - k[5504]*y_cur[IDX_CII] - - k[5524]*y_cur[IDX_CI] - k[5581]*y_cur[IDX_NII] - k[5684] - k[5880] - - k[6300] - k[6894]; - data[jistart + 16177] = 0.0 + k[292]*y_cur[IDX_CHI] + - k[542]*y_cur[IDX_C2I] + k[543]*y_cur[IDX_C2HI] + - k[544]*y_cur[IDX_CH2I] + k[545]*y_cur[IDX_CH3OHI] + - k[546]*y_cur[IDX_CH4I] + k[547]*y_cur[IDX_CNI] + - k[548]*y_cur[IDX_CO2I] + k[549]*y_cur[IDX_COI] + - k[550]*y_cur[IDX_FeI] + k[551]*y_cur[IDX_H2COI] + - k[552]*y_cur[IDX_H2OI] + k[553]*y_cur[IDX_H2SI] + - k[554]*y_cur[IDX_HCNI] + k[555]*y_cur[IDX_HCOI] + - k[556]*y_cur[IDX_MgI] + k[557]*y_cur[IDX_NH2I] + - k[558]*y_cur[IDX_NH3I] + k[559]*y_cur[IDX_NHI] + - k[560]*y_cur[IDX_NOI] + k[561]*y_cur[IDX_O2I] + - k[562]*y_cur[IDX_OCSI] + k[563]*y_cur[IDX_OHI] + - k[3340]*y_cur[IDX_CH4I] + k[3352]*y_cur[IDX_NCCNI] + - k[3360]*y_cur[IDX_OCSI] + k[3908]*y_cur[IDX_CM] + - k[3943]*y_cur[IDX_C10M] + k[3978]*y_cur[IDX_C10HM] + - k[4013]*y_cur[IDX_C2M] + k[4048]*y_cur[IDX_C2HM] + - k[4083]*y_cur[IDX_C3M] + k[4118]*y_cur[IDX_C3HM] + - k[4153]*y_cur[IDX_C3NM] + k[4188]*y_cur[IDX_C4M] + - k[4223]*y_cur[IDX_C4HM] + k[4258]*y_cur[IDX_C5M] + - k[4293]*y_cur[IDX_C5HM] + k[4328]*y_cur[IDX_C5NM] + - k[4363]*y_cur[IDX_C6M] + k[4398]*y_cur[IDX_C6HM] + - k[4433]*y_cur[IDX_C7M] + k[4468]*y_cur[IDX_C7HM] + - k[4503]*y_cur[IDX_C8M] + k[4538]*y_cur[IDX_C8HM] + - k[4573]*y_cur[IDX_C9M] + k[4608]*y_cur[IDX_C9HM] + - k[4643]*y_cur[IDX_CHM] + k[4678]*y_cur[IDX_CNM] + - k[4714]*y_cur[IDX_HM] + k[4749]*y_cur[IDX_OM] + - k[4784]*y_cur[IDX_O2M] + k[4819]*y_cur[IDX_OHM] + - k[4854]*y_cur[IDX_SM] - k[5581]*y_cur[IDX_NI] + - k[5621]*y_cur[IDX_eM] + k[6319]*y_cur[IDX_GRAINM]; - data[jistart + 16178] = 0.0 + k[3274]*y_cur[IDX_HeII] + - k[3496]*y_cur[IDX_NHII] + k[3647]*y_cur[IDX_OII] + - k[4967]*y_cur[IDX_CI] + k[5079]*y_cur[IDX_CHI] + - k[5417]*y_cur[IDX_OI] + k[5878] + k[5878] + k[6211] + k[6211]; - data[jistart + 16179] = 0.0 - k[573]*y_cur[IDX_NI] + - k[1150]*y_cur[IDX_eM] + k[1150]*y_cur[IDX_eM] + - k[3744]*y_cur[IDX_OI] + k[6375]*y_cur[IDX_GRAINM] + - k[6375]*y_cur[IDX_GRAINM]; - data[jistart + 16180] = 0.0 + k[1153]*y_cur[IDX_eM] + - k[1154]*y_cur[IDX_eM] + k[6397]*y_cur[IDX_GRAINM]; - data[jistart + 16181] = 0.0 + k[3277]*y_cur[IDX_HeII] + k[5879] + - k[6214]; - data[jistart + 16182] = 0.0 + k[1171]*y_cur[IDX_eM] + - k[1172]*y_cur[IDX_eM] + k[1172]*y_cur[IDX_eM] + - k[6529]*y_cur[IDX_GRAINM] + k[6530]*y_cur[IDX_GRAINM] + - k[6530]*y_cur[IDX_GRAINM]; - data[jistart + 16183] = 0.0 + k[3352]*y_cur[IDX_NII] - - k[5273]*y_cur[IDX_NI]; - data[jistart + 16184] = 0.0 + k[559]*y_cur[IDX_NII] + - k[3499]*y_cur[IDX_NHII] + k[3605]*y_cur[IDX_C2II] + - k[3610]*y_cur[IDX_COII] + k[3611]*y_cur[IDX_H2COII] + - k[3612]*y_cur[IDX_H2OII] + k[3617]*y_cur[IDX_NH2II] + - k[3618]*y_cur[IDX_NH3II] + k[4973]*y_cur[IDX_CI] + - k[5184]*y_cur[IDX_HI] - k[5274]*y_cur[IDX_NI] + - k[5305]*y_cur[IDX_CNI] + k[5310]*y_cur[IDX_NHI] + - k[5310]*y_cur[IDX_NHI] + k[5320]*y_cur[IDX_OI] + - k[5321]*y_cur[IDX_OHI] + k[5324]*y_cur[IDX_SI] + k[5888] + k[6224]; - data[jistart + 16185] = 0.0 + k[1158]*y_cur[IDX_eM] + - k[1910]*y_cur[IDX_CI] + k[2011]*y_cur[IDX_CH2I] + - k[2258]*y_cur[IDX_CHI] + k[2461]*y_cur[IDX_H2I] - - k[3463]*y_cur[IDX_NI] + k[3477]*y_cur[IDX_C2I] + - k[3480]*y_cur[IDX_C2HI] + k[3481]*y_cur[IDX_CNI] + - k[3482]*y_cur[IDX_CO2I] + k[3485]*y_cur[IDX_COI] + - k[3487]*y_cur[IDX_H2COI] + k[3489]*y_cur[IDX_H2OI] + - k[3493]*y_cur[IDX_HCNI] + k[3494]*y_cur[IDX_HCOI] + - k[3495]*y_cur[IDX_HNCI] + k[3496]*y_cur[IDX_N2I] + - k[3497]*y_cur[IDX_NH2I] + k[3498]*y_cur[IDX_NH3I] + - k[3499]*y_cur[IDX_NHI] + k[3502]*y_cur[IDX_O2I] + - k[3503]*y_cur[IDX_OI] + k[3504]*y_cur[IDX_OHI] + - k[3505]*y_cur[IDX_SI] + k[6217] + k[6320]*y_cur[IDX_GRAINM]; - data[jistart + 16186] = 0.0 + k[557]*y_cur[IDX_NII] + - k[3497]*y_cur[IDX_NHII]; - data[jistart + 16187] = 0.0 + k[1159]*y_cur[IDX_eM] - - k[3464]*y_cur[IDX_NI] + k[3509]*y_cur[IDX_CNI] + - k[3617]*y_cur[IDX_NHI] + k[6324]*y_cur[IDX_GRAINM]; - data[jistart + 16188] = 0.0 + k[558]*y_cur[IDX_NII] + - k[3498]*y_cur[IDX_NHII]; - data[jistart + 16189] = 0.0 + k[3618]*y_cur[IDX_NHI]; - data[jistart + 16190] = 0.0 + k[560]*y_cur[IDX_NII] + - k[2274]*y_cur[IDX_CNII] + k[3286]*y_cur[IDX_HeII] + - k[4975]*y_cur[IDX_CI] + k[5003]*y_cur[IDX_CH2I] + - k[5084]*y_cur[IDX_CHI] + k[5122]*y_cur[IDX_CNI] + - k[5187]*y_cur[IDX_HI] - k[5279]*y_cur[IDX_NI] + - k[5334]*y_cur[IDX_SI] + k[5424]*y_cur[IDX_OI] + - k[5493]*y_cur[IDX_SiI] + k[5892] + k[6229]; - data[jistart + 16191] = 0.0 + k[1168]*y_cur[IDX_eM] + - k[6407]*y_cur[IDX_GRAINM]; - data[jistart + 16192] = 0.0 - k[5275]*y_cur[IDX_NI] - - k[5276]*y_cur[IDX_NI] - k[5277]*y_cur[IDX_NI] - - k[5278]*y_cur[IDX_NI]; - data[jistart + 16193] = 0.0 + k[1421]*y_cur[IDX_CII] + - k[3288]*y_cur[IDX_HeII] + k[4976]*y_cur[IDX_CI] + - k[5188]*y_cur[IDX_HI] - k[5280]*y_cur[IDX_NI] + - k[5426]*y_cur[IDX_OI] + k[5893] + k[6230]; - data[jistart + 16194] = 0.0 + k[1173]*y_cur[IDX_eM] + - k[6581]*y_cur[IDX_GRAINM]; - data[jistart + 16195] = 0.0 + k[3503]*y_cur[IDX_NHII] + - k[3744]*y_cur[IDX_N2II] + k[3752]*y_cur[IDX_PNII] + - k[3761]*y_cur[IDX_SiNII] + k[5320]*y_cur[IDX_NHI] + - k[5386]*y_cur[IDX_CNI] + k[5387]*y_cur[IDX_CNI] + - k[5417]*y_cur[IDX_N2I] + k[5424]*y_cur[IDX_NOI] + - k[5426]*y_cur[IDX_NSI] + k[5451]*y_cur[IDX_SiNI]; - data[jistart + 16196] = 0.0 + k[3644]*y_cur[IDX_HCNI] + - k[3647]*y_cur[IDX_N2I]; - data[jistart + 16197] = 0.0 - k[122]*y_cur[IDX_NI] + - k[4749]*y_cur[IDX_NII]; - data[jistart + 16198] = 0.0 + k[561]*y_cur[IDX_NII] + - k[3502]*y_cur[IDX_NHII] - k[5281]*y_cur[IDX_NI]; - data[jistart + 16199] = 0.0 - k[3465]*y_cur[IDX_NI]; - data[jistart + 16200] = 0.0 + k[4784]*y_cur[IDX_NII]; - data[jistart + 16201] = 0.0 - k[5282]*y_cur[IDX_NI]; - data[jistart + 16202] = 0.0 - k[3466]*y_cur[IDX_NI]; - data[jistart + 16203] = 0.0 + k[1176]*y_cur[IDX_eM] + - k[6495]*y_cur[IDX_GRAINM]; - data[jistart + 16204] = 0.0 + k[562]*y_cur[IDX_NII] + - k[3360]*y_cur[IDX_NII]; - data[jistart + 16205] = 0.0 + k[563]*y_cur[IDX_NII] + - k[3504]*y_cur[IDX_NHII] - k[5283]*y_cur[IDX_NI] - - k[5284]*y_cur[IDX_NI] + k[5321]*y_cur[IDX_NHI]; - data[jistart + 16206] = 0.0 - k[3467]*y_cur[IDX_NI]; - data[jistart + 16207] = 0.0 + k[4819]*y_cur[IDX_NII]; - data[jistart + 16208] = 0.0 - k[5285]*y_cur[IDX_NI]; - data[jistart + 16209] = 0.0 + k[3300]*y_cur[IDX_HeII] - - k[5286]*y_cur[IDX_NI] + k[5909] + k[6250]; - data[jistart + 16210] = 0.0 + k[1211]*y_cur[IDX_eM] + - k[3752]*y_cur[IDX_OI] + k[6560]*y_cur[IDX_GRAINM]; - data[jistart + 16211] = 0.0 - k[5287]*y_cur[IDX_NI] - - k[5288]*y_cur[IDX_NI]; - data[jistart + 16212] = 0.0 + k[3505]*y_cur[IDX_NHII] + - k[5324]*y_cur[IDX_NHI] + k[5334]*y_cur[IDX_NOI]; - data[jistart + 16213] = 0.0 - k[123]*y_cur[IDX_NI] + - k[4854]*y_cur[IDX_NII]; - data[jistart + 16214] = 0.0 - k[5289]*y_cur[IDX_NI]; - data[jistart + 16215] = 0.0 - k[5290]*y_cur[IDX_NI] - - k[5291]*y_cur[IDX_NI]; - data[jistart + 16216] = 0.0 - k[3468]*y_cur[IDX_NI]; - data[jistart + 16217] = 0.0 + k[5493]*y_cur[IDX_NOI]; - data[jistart + 16218] = 0.0 - k[5292]*y_cur[IDX_NI] - - k[5293]*y_cur[IDX_NI]; - data[jistart + 16219] = 0.0 - k[3469]*y_cur[IDX_NI]; - data[jistart + 16220] = 0.0 - k[3470]*y_cur[IDX_NI]; - data[jistart + 16221] = 0.0 - k[5296]*y_cur[IDX_NI]; - data[jistart + 16222] = 0.0 - k[3471]*y_cur[IDX_NI]; - data[jistart + 16223] = 0.0 - k[5294]*y_cur[IDX_NI]; - data[jistart + 16224] = 0.0 - k[3472]*y_cur[IDX_NI]; - data[jistart + 16225] = 0.0 - k[5295]*y_cur[IDX_NI]; - data[jistart + 16226] = 0.0 - k[3473]*y_cur[IDX_NI] - - k[3474]*y_cur[IDX_NI]; - data[jistart + 16227] = 0.0 + k[1446]*y_cur[IDX_CII] + - k[3329]*y_cur[IDX_HeII] + k[5451]*y_cur[IDX_OI] + k[5931] + k[6281]; - data[jistart + 16228] = 0.0 + k[1260]*y_cur[IDX_eM] + - k[3761]*y_cur[IDX_OI] + k[6501]*y_cur[IDX_GRAINM]; - data[jistart + 16229] = 0.0 - k[3475]*y_cur[IDX_NI] - - k[3476]*y_cur[IDX_NI]; - data[jistart + 16230] = 0.0 + k[780]*y_cur[IDX_C2NII] + - k[782]*y_cur[IDX_C2N2II] + k[977]*y_cur[IDX_CNII] + - k[978]*y_cur[IDX_CNCII] + k[1133]*y_cur[IDX_HPNII] + - k[1150]*y_cur[IDX_N2II] + k[1150]*y_cur[IDX_N2II] + - k[1153]*y_cur[IDX_N2HII] + k[1154]*y_cur[IDX_N2HII] + - k[1158]*y_cur[IDX_NHII] + k[1159]*y_cur[IDX_NH2II] + - k[1168]*y_cur[IDX_NOII] + k[1171]*y_cur[IDX_N2OII] + - k[1172]*y_cur[IDX_N2OII] + k[1172]*y_cur[IDX_N2OII] + - k[1173]*y_cur[IDX_NSII] + k[1176]*y_cur[IDX_OCNII] + - k[1211]*y_cur[IDX_PNII] + k[1260]*y_cur[IDX_SiNII] + - k[5621]*y_cur[IDX_NII]; - data[jistart + 16231] = 0.0 - k[3908]*y_cur[IDX_NII]; - data[jistart + 16232] = 0.0 - k[3943]*y_cur[IDX_NII]; - data[jistart + 16233] = 0.0 - k[3978]*y_cur[IDX_NII]; - data[jistart + 16234] = 0.0 - k[542]*y_cur[IDX_NII]; - data[jistart + 16235] = 0.0 - k[4013]*y_cur[IDX_NII]; - data[jistart + 16236] = 0.0 - k[543]*y_cur[IDX_NII]; - data[jistart + 16237] = 0.0 - k[4048]*y_cur[IDX_NII]; - data[jistart + 16238] = 0.0 - k[4083]*y_cur[IDX_NII]; - data[jistart + 16239] = 0.0 - k[4118]*y_cur[IDX_NII]; - data[jistart + 16240] = 0.0 - k[4153]*y_cur[IDX_NII]; - data[jistart + 16241] = 0.0 - k[4188]*y_cur[IDX_NII]; - data[jistart + 16242] = 0.0 - k[4223]*y_cur[IDX_NII]; - data[jistart + 16243] = 0.0 - k[4258]*y_cur[IDX_NII]; - data[jistart + 16244] = 0.0 - k[4293]*y_cur[IDX_NII]; - data[jistart + 16245] = 0.0 - k[4328]*y_cur[IDX_NII]; - data[jistart + 16246] = 0.0 - k[4363]*y_cur[IDX_NII]; - data[jistart + 16247] = 0.0 - k[4398]*y_cur[IDX_NII]; - data[jistart + 16248] = 0.0 - k[4433]*y_cur[IDX_NII]; - data[jistart + 16249] = 0.0 - k[4468]*y_cur[IDX_NII]; - data[jistart + 16250] = 0.0 - k[4503]*y_cur[IDX_NII]; - data[jistart + 16251] = 0.0 - k[4538]*y_cur[IDX_NII]; - data[jistart + 16252] = 0.0 - k[4573]*y_cur[IDX_NII]; - data[jistart + 16253] = 0.0 - k[4608]*y_cur[IDX_NII]; - data[jistart + 16254] = 0.0 - k[292]*y_cur[IDX_NII] - - k[2256]*y_cur[IDX_NII]; - data[jistart + 16255] = 0.0 - k[4643]*y_cur[IDX_NII]; - data[jistart + 16256] = 0.0 - k[544]*y_cur[IDX_NII]; - data[jistart + 16257] = 0.0 - k[545]*y_cur[IDX_NII] - - k[3336]*y_cur[IDX_NII] - k[3337]*y_cur[IDX_NII] - - k[3338]*y_cur[IDX_NII] - k[3339]*y_cur[IDX_NII]; - data[jistart + 16258] = 0.0 - k[546]*y_cur[IDX_NII] - - k[3340]*y_cur[IDX_NII] - k[3341]*y_cur[IDX_NII] - - k[3342]*y_cur[IDX_NII]; - data[jistart + 16259] = 0.0 - k[547]*y_cur[IDX_NII] + - k[3203]*y_cur[IDX_HeII]; - data[jistart + 16260] = 0.0 - k[4678]*y_cur[IDX_NII]; - data[jistart + 16261] = 0.0 - k[549]*y_cur[IDX_NII] - - k[3344]*y_cur[IDX_NII]; - data[jistart + 16262] = 0.0 - k[548]*y_cur[IDX_NII] - - k[3343]*y_cur[IDX_NII]; - data[jistart + 16263] = 0.0 - k[550]*y_cur[IDX_NII]; - data[jistart + 16264] = 0.0 - k[6319]*y_cur[IDX_NII]; - data[jistart + 16265] = 0.0 - k[4714]*y_cur[IDX_NII]; - data[jistart + 16266] = 0.0 - k[2459]*y_cur[IDX_NII]; - data[jistart + 16267] = 0.0 - k[551]*y_cur[IDX_NII] - - k[3345]*y_cur[IDX_NII] - k[3346]*y_cur[IDX_NII]; - data[jistart + 16268] = 0.0 - k[552]*y_cur[IDX_NII]; - data[jistart + 16269] = 0.0 - k[553]*y_cur[IDX_NII] - - k[3347]*y_cur[IDX_NII] - k[3348]*y_cur[IDX_NII] - - k[3349]*y_cur[IDX_NII]; - data[jistart + 16270] = 0.0 - k[554]*y_cur[IDX_NII] + - k[3246]*y_cur[IDX_HeII]; - data[jistart + 16271] = 0.0 - k[555]*y_cur[IDX_NII] - - k[3350]*y_cur[IDX_NII]; - data[jistart + 16272] = 0.0 + k[3203]*y_cur[IDX_CNI] + - k[3246]*y_cur[IDX_HCNI] + k[3274]*y_cur[IDX_N2I] + - k[3278]*y_cur[IDX_N2OI] + k[3280]*y_cur[IDX_NH2I] + - k[3285]*y_cur[IDX_NHI] + k[3287]*y_cur[IDX_NOI] + - k[3289]*y_cur[IDX_NSI]; - data[jistart + 16273] = 0.0 - k[556]*y_cur[IDX_NII]; - data[jistart + 16274] = 0.0 + k[573]*y_cur[IDX_N2II] - - k[5581]*y_cur[IDX_NII] + k[5684] + k[5880] + k[6300]; - data[jistart + 16275] = 0.0 - k[292]*y_cur[IDX_CHI] - - k[542]*y_cur[IDX_C2I] - k[543]*y_cur[IDX_C2HI] - - k[544]*y_cur[IDX_CH2I] - k[545]*y_cur[IDX_CH3OHI] - - k[546]*y_cur[IDX_CH4I] - k[547]*y_cur[IDX_CNI] - - k[548]*y_cur[IDX_CO2I] - k[549]*y_cur[IDX_COI] - - k[550]*y_cur[IDX_FeI] - k[551]*y_cur[IDX_H2COI] - - k[552]*y_cur[IDX_H2OI] - k[553]*y_cur[IDX_H2SI] - - k[554]*y_cur[IDX_HCNI] - k[555]*y_cur[IDX_HCOI] - - k[556]*y_cur[IDX_MgI] - k[557]*y_cur[IDX_NH2I] - - k[558]*y_cur[IDX_NH3I] - k[559]*y_cur[IDX_NHI] - - k[560]*y_cur[IDX_NOI] - k[561]*y_cur[IDX_O2I] - - k[562]*y_cur[IDX_OCSI] - k[563]*y_cur[IDX_OHI] - - k[2256]*y_cur[IDX_CHI] - k[2459]*y_cur[IDX_H2I] - - k[3336]*y_cur[IDX_CH3OHI] - k[3337]*y_cur[IDX_CH3OHI] - - k[3338]*y_cur[IDX_CH3OHI] - k[3339]*y_cur[IDX_CH3OHI] - - k[3340]*y_cur[IDX_CH4I] - k[3341]*y_cur[IDX_CH4I] - - k[3342]*y_cur[IDX_CH4I] - k[3343]*y_cur[IDX_CO2I] - - k[3344]*y_cur[IDX_COI] - k[3345]*y_cur[IDX_H2COI] - - k[3346]*y_cur[IDX_H2COI] - k[3347]*y_cur[IDX_H2SI] - - k[3348]*y_cur[IDX_H2SI] - k[3349]*y_cur[IDX_H2SI] - - k[3350]*y_cur[IDX_HCOI] - k[3351]*y_cur[IDX_NCCNI] - - k[3352]*y_cur[IDX_NCCNI] - k[3353]*y_cur[IDX_NH3I] - - k[3354]*y_cur[IDX_NH3I] - k[3355]*y_cur[IDX_NHI] - - k[3356]*y_cur[IDX_NOI] - k[3357]*y_cur[IDX_O2I] - - k[3358]*y_cur[IDX_O2I] - k[3359]*y_cur[IDX_OCSI] - - k[3360]*y_cur[IDX_OCSI] - k[3908]*y_cur[IDX_CM] - - k[3943]*y_cur[IDX_C10M] - k[3978]*y_cur[IDX_C10HM] - - k[4013]*y_cur[IDX_C2M] - k[4048]*y_cur[IDX_C2HM] - - k[4083]*y_cur[IDX_C3M] - k[4118]*y_cur[IDX_C3HM] - - k[4153]*y_cur[IDX_C3NM] - k[4188]*y_cur[IDX_C4M] - - k[4223]*y_cur[IDX_C4HM] - k[4258]*y_cur[IDX_C5M] - - k[4293]*y_cur[IDX_C5HM] - k[4328]*y_cur[IDX_C5NM] - - k[4363]*y_cur[IDX_C6M] - k[4398]*y_cur[IDX_C6HM] - - k[4433]*y_cur[IDX_C7M] - k[4468]*y_cur[IDX_C7HM] - - k[4503]*y_cur[IDX_C8M] - k[4538]*y_cur[IDX_C8HM] - - k[4573]*y_cur[IDX_C9M] - k[4608]*y_cur[IDX_C9HM] - - k[4643]*y_cur[IDX_CHM] - k[4678]*y_cur[IDX_CNM] - - k[4714]*y_cur[IDX_HM] - k[4749]*y_cur[IDX_OM] - - k[4784]*y_cur[IDX_O2M] - k[4819]*y_cur[IDX_OHM] - - k[4854]*y_cur[IDX_SM] - k[5581]*y_cur[IDX_NI] - - k[5621]*y_cur[IDX_eM] - k[6319]*y_cur[IDX_GRAINM]; - data[jistart + 16276] = 0.0 + k[3274]*y_cur[IDX_HeII]; - data[jistart + 16277] = 0.0 + k[573]*y_cur[IDX_NI]; - data[jistart + 16278] = 0.0 + k[3278]*y_cur[IDX_HeII]; - data[jistart + 16279] = 0.0 - k[3351]*y_cur[IDX_NII] - - k[3352]*y_cur[IDX_NII]; - data[jistart + 16280] = 0.0 - k[559]*y_cur[IDX_NII] + - k[3285]*y_cur[IDX_HeII] - k[3355]*y_cur[IDX_NII]; - data[jistart + 16281] = 0.0 - k[557]*y_cur[IDX_NII] + - k[3280]*y_cur[IDX_HeII]; - data[jistart + 16282] = 0.0 - k[558]*y_cur[IDX_NII] - - k[3353]*y_cur[IDX_NII] - k[3354]*y_cur[IDX_NII]; - data[jistart + 16283] = 0.0 - k[560]*y_cur[IDX_NII] + - k[3287]*y_cur[IDX_HeII] - k[3356]*y_cur[IDX_NII]; - data[jistart + 16284] = 0.0 + k[3289]*y_cur[IDX_HeII]; - data[jistart + 16285] = 0.0 - k[4749]*y_cur[IDX_NII]; - data[jistart + 16286] = 0.0 - k[561]*y_cur[IDX_NII] - - k[3357]*y_cur[IDX_NII] - k[3358]*y_cur[IDX_NII]; - data[jistart + 16287] = 0.0 - k[4784]*y_cur[IDX_NII]; - data[jistart + 16288] = 0.0 - k[562]*y_cur[IDX_NII] - - k[3359]*y_cur[IDX_NII] - k[3360]*y_cur[IDX_NII]; - data[jistart + 16289] = 0.0 - k[563]*y_cur[IDX_NII]; - data[jistart + 16290] = 0.0 - k[4819]*y_cur[IDX_NII]; - data[jistart + 16291] = 0.0 - k[4854]*y_cur[IDX_NII]; - data[jistart + 16292] = 0.0 - k[5621]*y_cur[IDX_NII]; - data[jistart + 16293] = 0.0 + k[247]*y_cur[IDX_N2II] + - k[1909]*y_cur[IDX_N2HII] - k[4967]*y_cur[IDX_N2I]; - data[jistart + 16294] = 0.0 + k[3909]*y_cur[IDX_N2HII]; - data[jistart + 16295] = 0.0 + k[3944]*y_cur[IDX_N2HII]; - data[jistart + 16296] = 0.0 + k[3979]*y_cur[IDX_N2HII]; - data[jistart + 16297] = 0.0 + k[210]*y_cur[IDX_N2II] + - k[1461]*y_cur[IDX_N2HII]; - data[jistart + 16298] = 0.0 + k[4014]*y_cur[IDX_N2HII]; - data[jistart + 16299] = 0.0 + k[243]*y_cur[IDX_N2II] + - k[1748]*y_cur[IDX_N2HII]; - data[jistart + 16300] = 0.0 + k[4049]*y_cur[IDX_N2HII]; - data[jistart + 16301] = 0.0 + k[1568]*y_cur[IDX_N2HII]; - data[jistart + 16302] = 0.0 + k[4084]*y_cur[IDX_N2HII]; - data[jistart + 16303] = 0.0 + k[4119]*y_cur[IDX_N2HII]; - data[jistart + 16304] = 0.0 + k[4154]*y_cur[IDX_N2HII]; - data[jistart + 16305] = 0.0 + k[4189]*y_cur[IDX_N2HII]; - data[jistart + 16306] = 0.0 + k[4224]*y_cur[IDX_N2HII]; - data[jistart + 16307] = 0.0 + k[4259]*y_cur[IDX_N2HII]; - data[jistart + 16308] = 0.0 + k[4294]*y_cur[IDX_N2HII]; - data[jistart + 16309] = 0.0 + k[4329]*y_cur[IDX_N2HII]; - data[jistart + 16310] = 0.0 + k[4364]*y_cur[IDX_N2HII]; - data[jistart + 16311] = 0.0 + k[4399]*y_cur[IDX_N2HII]; - data[jistart + 16312] = 0.0 + k[3368]*y_cur[IDX_N2HII]; - data[jistart + 16313] = 0.0 + k[4434]*y_cur[IDX_N2HII]; - data[jistart + 16314] = 0.0 + k[4469]*y_cur[IDX_N2HII]; - data[jistart + 16315] = 0.0 + k[4504]*y_cur[IDX_N2HII]; - data[jistart + 16316] = 0.0 + k[4539]*y_cur[IDX_N2HII]; - data[jistart + 16317] = 0.0 + k[4574]*y_cur[IDX_N2HII]; - data[jistart + 16318] = 0.0 + k[4609]*y_cur[IDX_N2HII]; - data[jistart + 16319] = 0.0 + k[293]*y_cur[IDX_N2II] + - k[2257]*y_cur[IDX_N2HII] - k[5079]*y_cur[IDX_N2I]; - data[jistart + 16320] = 0.0 + k[4644]*y_cur[IDX_N2HII]; - data[jistart + 16321] = 0.0 + k[264]*y_cur[IDX_N2II] + - k[2010]*y_cur[IDX_N2HII] - k[5001]*y_cur[IDX_N2I]; - data[jistart + 16322] = 0.0 + k[2085]*y_cur[IDX_N2OI]; - data[jistart + 16323] = 0.0 + k[3369]*y_cur[IDX_N2HII] + - k[3370]*y_cur[IDX_N2HII]; - data[jistart + 16324] = 0.0 + k[3371]*y_cur[IDX_N2HII]; - data[jistart + 16325] = 0.0 + k[2204]*y_cur[IDX_N2II] + - k[2205]*y_cur[IDX_N2II] + k[2206]*y_cur[IDX_N2HII]; - data[jistart + 16326] = 0.0 + k[306]*y_cur[IDX_N2II] + - k[5113]*y_cur[IDX_CNI] + k[5113]*y_cur[IDX_CNI] + - k[5121]*y_cur[IDX_NOI] + k[5260]*y_cur[IDX_NI] + - k[5261]*y_cur[IDX_NI]; - data[jistart + 16327] = 0.0 + k[4679]*y_cur[IDX_N2HII]; - data[jistart + 16328] = 0.0 + k[316]*y_cur[IDX_N2II] + - k[2288]*y_cur[IDX_N2HII] + k[5128]*y_cur[IDX_N2OI]; - data[jistart + 16329] = 0.0 + k[564]*y_cur[IDX_N2II] + - k[3372]*y_cur[IDX_N2HII]; - data[jistart + 16330] = 0.0 + k[565]*y_cur[IDX_N2II]; - data[jistart + 16331] = 0.0 + k[8700]*y_cur[IDX_GNI] + - k[8700]*y_cur[IDX_GNI]; - data[jistart + 16332] = 0.0 + k[7098] + k[7280] + k[7462]; - data[jistart + 16333] = 0.0 + k[6396]*y_cur[IDX_N2HII] + - k[6528]*y_cur[IDX_N2OII] + k[6558]*y_cur[IDX_HN2OII] + - k[6559]*y_cur[IDX_HN2OII]; - data[jistart + 16334] = 0.0 + k[5179]*y_cur[IDX_N2OI]; - data[jistart + 16335] = 0.0 + k[4715]*y_cur[IDX_N2HII]; - data[jistart + 16336] = 0.0 - k[2391]*y_cur[IDX_N2I]; - data[jistart + 16337] = 0.0 + k[566]*y_cur[IDX_N2II] + - k[3361]*y_cur[IDX_N2II] + k[3373]*y_cur[IDX_N2HII]; - data[jistart + 16338] = 0.0 + k[481]*y_cur[IDX_N2II] + - k[2558]*y_cur[IDX_N2HII]; - data[jistart + 16339] = 0.0 + k[567]*y_cur[IDX_N2II] + - k[3362]*y_cur[IDX_N2II] + k[3363]*y_cur[IDX_N2II]; - data[jistart + 16340] = 0.0 - k[2718]*y_cur[IDX_N2I]; - data[jistart + 16341] = 0.0 + k[3374]*y_cur[IDX_N2HII]; - data[jistart + 16342] = 0.0 + k[3461]*y_cur[IDX_NI]; - data[jistart + 16343] = 0.0 + k[498]*y_cur[IDX_N2II] + - k[2881]*y_cur[IDX_N2HII]; - data[jistart + 16344] = 0.0 + k[568]*y_cur[IDX_N2II] + - k[3009]*y_cur[IDX_N2HII]; - data[jistart + 16345] = 0.0 + k[1113]*y_cur[IDX_eM] + - k[1114]*y_cur[IDX_eM] + k[6558]*y_cur[IDX_GRAINM] + - k[6559]*y_cur[IDX_GRAINM]; - data[jistart + 16346] = 0.0 + k[3044]*y_cur[IDX_N2HII]; - data[jistart + 16347] = 0.0 + k[3035]*y_cur[IDX_N2HII]; - data[jistart + 16348] = 0.0 - k[3366]*y_cur[IDX_N2I]; - data[jistart + 16349] = 0.0 - k[523]*y_cur[IDX_N2I] - - k[3274]*y_cur[IDX_N2I] + k[3276]*y_cur[IDX_N2OI]; - data[jistart + 16350] = 0.0 + k[535]*y_cur[IDX_N2II]; - data[jistart + 16351] = 0.0 + k[573]*y_cur[IDX_N2II] + - k[3461]*y_cur[IDX_HC3NII] + k[5260]*y_cur[IDX_CNI] + - k[5261]*y_cur[IDX_CNI] + k[5273]*y_cur[IDX_NCCNI] + - k[5274]*y_cur[IDX_NHI] + k[5275]*y_cur[IDX_NO2I] + - k[5278]*y_cur[IDX_NO2I] + k[5279]*y_cur[IDX_NOI] + - k[5280]*y_cur[IDX_NSI] + k[5286]*y_cur[IDX_PNI]; - data[jistart + 16352] = 0.0 + k[3351]*y_cur[IDX_NCCNI]; - data[jistart + 16353] = 0.0 - k[523]*y_cur[IDX_HeII] - - k[2391]*y_cur[IDX_H2II] - k[2718]*y_cur[IDX_H3II] - - k[3274]*y_cur[IDX_HeII] - k[3366]*y_cur[IDX_HNOII] - - k[3367]*y_cur[IDX_O2HII] - k[3496]*y_cur[IDX_NHII] - - k[3647]*y_cur[IDX_OII] - k[3785]*y_cur[IDX_OHII] - - k[4967]*y_cur[IDX_CI] - k[5001]*y_cur[IDX_CH2I] - - k[5079]*y_cur[IDX_CHI] - k[5220]*y_cur[IDX_O2I] - - k[5417]*y_cur[IDX_OI] - k[5878] - k[6211] - k[6916]; - data[jistart + 16354] = 0.0 + k[210]*y_cur[IDX_C2I] + - k[243]*y_cur[IDX_C2HI] + k[247]*y_cur[IDX_CI] + - k[264]*y_cur[IDX_CH2I] + k[293]*y_cur[IDX_CHI] + - k[306]*y_cur[IDX_CNI] + k[316]*y_cur[IDX_COI] + - k[481]*y_cur[IDX_H2OI] + k[498]*y_cur[IDX_HCNI] + - k[535]*y_cur[IDX_MgI] + k[564]*y_cur[IDX_CO2I] + - k[565]*y_cur[IDX_FeI] + k[566]*y_cur[IDX_H2COI] + - k[567]*y_cur[IDX_H2SI] + k[568]*y_cur[IDX_HCOI] + - k[569]*y_cur[IDX_NOI] + k[570]*y_cur[IDX_O2I] + - k[571]*y_cur[IDX_OCSI] + k[572]*y_cur[IDX_SI] + k[573]*y_cur[IDX_NI] - + k[589]*y_cur[IDX_NH2I] + k[610]*y_cur[IDX_NH3I] + - k[618]*y_cur[IDX_NHI] + k[640]*y_cur[IDX_NaI] + k[684]*y_cur[IDX_OI] - + k[700]*y_cur[IDX_OHI] + k[2204]*y_cur[IDX_CH4I] + - k[2205]*y_cur[IDX_CH4I] + k[3361]*y_cur[IDX_H2COI] + - k[3362]*y_cur[IDX_H2SI] + k[3363]*y_cur[IDX_H2SI] + + data[jistart + 18907] = 0.0 + k[2950]*y_cur[IDX_HCOII] + k[5807] + k[6112]; + data[jistart + 18908] = 0.0 + k[3811]*y_cur[IDX_CO2I]; + data[jistart + 18909] = 0.0 + k[2951]*y_cur[IDX_HCOII]; + data[jistart + 18910] = 0.0 + k[2979]*y_cur[IDX_HCOII]; + data[jistart + 18911] = 0.0 - k[2289]*y_cur[IDX_COI]; + data[jistart + 18912] = 0.0 - k[2140]*y_cur[IDX_COI]; + data[jistart + 18913] = 0.0 - k[2286]*y_cur[IDX_COI]; + data[jistart + 18914] = 0.0 + k[2957]*y_cur[IDX_HCOII] + k[5395]*y_cur[IDX_OI]; + data[jistart + 18915] = 0.0 + k[2923]*y_cur[IDX_HCOII]; + data[jistart + 18916] = 0.0 + k[2919]*y_cur[IDX_HCOII]; + data[jistart + 18917] = 0.0 + k[5382]*y_cur[IDX_OI]; + data[jistart + 18918] = 0.0 - k[299]*y_cur[IDX_COI] + k[2270]*y_cur[IDX_CO2I] + + k[2273]*y_cur[IDX_HCOI] + k[2275]*y_cur[IDX_O2I]; + data[jistart + 18919] = 0.0 + k[2949]*y_cur[IDX_HCOII]; + data[jistart + 18920] = 0.0 + k[2907]*y_cur[IDX_HCOII]; + data[jistart + 18921] = 0.0 + k[2902]*y_cur[IDX_HCOII]; + data[jistart + 18922] = 0.0 + k[8661]*y_cur[IDX_GCI]; + data[jistart + 18923] = 0.0 - k[316]*y_cur[IDX_COI] + k[3364]*y_cur[IDX_HCOI] + k[3365]*y_cur[IDX_OCSI]; - data[jistart + 16355] = 0.0 + k[1151]*y_cur[IDX_eM] + - k[1152]*y_cur[IDX_eM] + k[1461]*y_cur[IDX_C2I] + - k[1568]*y_cur[IDX_C2H2I] + k[1748]*y_cur[IDX_C2HI] + - k[1909]*y_cur[IDX_CI] + k[2010]*y_cur[IDX_CH2I] + - k[2206]*y_cur[IDX_CH4I] + k[2257]*y_cur[IDX_CHI] + - k[2288]*y_cur[IDX_COI] + k[2558]*y_cur[IDX_H2OI] + - k[2881]*y_cur[IDX_HCNI] + k[3009]*y_cur[IDX_HCOI] + - k[3035]*y_cur[IDX_HNC3I] + k[3044]*y_cur[IDX_HNCI] + - k[3368]*y_cur[IDX_C6H6I] + k[3369]*y_cur[IDX_CH3CHCH2I] + - k[3370]*y_cur[IDX_CH3CHCH2I] + k[3371]*y_cur[IDX_CH3CNI] + - k[3372]*y_cur[IDX_CO2I] + k[3373]*y_cur[IDX_H2COI] + - k[3374]*y_cur[IDX_HC3NI] + k[3375]*y_cur[IDX_NCCNI] + - k[3376]*y_cur[IDX_SI] + k[3544]*y_cur[IDX_NH2I] + - k[3592]*y_cur[IDX_NH3I] + k[3616]*y_cur[IDX_NHI] + - k[3745]*y_cur[IDX_OI] + k[3804]*y_cur[IDX_OHI] + - k[3909]*y_cur[IDX_CM] + k[3944]*y_cur[IDX_C10M] + - k[3979]*y_cur[IDX_C10HM] + k[4014]*y_cur[IDX_C2M] + - k[4049]*y_cur[IDX_C2HM] + k[4084]*y_cur[IDX_C3M] + - k[4119]*y_cur[IDX_C3HM] + k[4154]*y_cur[IDX_C3NM] + - k[4189]*y_cur[IDX_C4M] + k[4224]*y_cur[IDX_C4HM] + - k[4259]*y_cur[IDX_C5M] + k[4294]*y_cur[IDX_C5HM] + - k[4329]*y_cur[IDX_C5NM] + k[4364]*y_cur[IDX_C6M] + - k[4399]*y_cur[IDX_C6HM] + k[4434]*y_cur[IDX_C7M] + - k[4469]*y_cur[IDX_C7HM] + k[4504]*y_cur[IDX_C8M] + - k[4539]*y_cur[IDX_C8HM] + k[4574]*y_cur[IDX_C9M] + - k[4609]*y_cur[IDX_C9HM] + k[4644]*y_cur[IDX_CHM] + - k[4679]*y_cur[IDX_CNM] + k[4715]*y_cur[IDX_HM] + - k[4750]*y_cur[IDX_OM] + k[4785]*y_cur[IDX_O2M] + - k[4820]*y_cur[IDX_OHM] + k[4855]*y_cur[IDX_SM] + - k[6396]*y_cur[IDX_GRAINM]; - data[jistart + 16356] = 0.0 + k[2085]*y_cur[IDX_CH3II] + - k[3276]*y_cur[IDX_HeII] + k[5128]*y_cur[IDX_COI] + - k[5179]*y_cur[IDX_HI] + k[5327]*y_cur[IDX_NOI] + - k[5419]*y_cur[IDX_OI] + k[5474]*y_cur[IDX_OHI] + k[6212]; - data[jistart + 16357] = 0.0 + k[1170]*y_cur[IDX_eM] + - k[6528]*y_cur[IDX_GRAINM]; - data[jistart + 16358] = 0.0 + k[3351]*y_cur[IDX_NII] + - k[3375]*y_cur[IDX_N2HII] + k[5273]*y_cur[IDX_NI]; - data[jistart + 16359] = 0.0 + k[618]*y_cur[IDX_N2II] + - k[3616]*y_cur[IDX_N2HII] + k[5274]*y_cur[IDX_NI] + - k[5308]*y_cur[IDX_NHI] + k[5308]*y_cur[IDX_NHI] + - k[5309]*y_cur[IDX_NHI] + k[5309]*y_cur[IDX_NHI] + - k[5313]*y_cur[IDX_NOI] + k[5314]*y_cur[IDX_NOI]; - data[jistart + 16360] = 0.0 - k[3496]*y_cur[IDX_N2I]; - data[jistart + 16361] = 0.0 + k[589]*y_cur[IDX_N2II] + - k[3544]*y_cur[IDX_N2HII] + k[5298]*y_cur[IDX_NOI] + - k[5299]*y_cur[IDX_NOI]; - data[jistart + 16362] = 0.0 + k[610]*y_cur[IDX_N2II] + - k[3592]*y_cur[IDX_N2HII]; - data[jistart + 16363] = 0.0 + k[569]*y_cur[IDX_N2II] + - k[5121]*y_cur[IDX_CNI] + k[5279]*y_cur[IDX_NI] + - k[5298]*y_cur[IDX_NH2I] + k[5299]*y_cur[IDX_NH2I] + - k[5313]*y_cur[IDX_NHI] + k[5314]*y_cur[IDX_NHI] + - k[5327]*y_cur[IDX_N2OI] + k[5329]*y_cur[IDX_NOI] + - k[5329]*y_cur[IDX_NOI] + k[5331]*y_cur[IDX_OCNI]; - data[jistart + 16364] = 0.0 + k[5275]*y_cur[IDX_NI] + - k[5278]*y_cur[IDX_NI]; - data[jistart + 16365] = 0.0 + k[5280]*y_cur[IDX_NI]; - data[jistart + 16366] = 0.0 + k[640]*y_cur[IDX_N2II]; - data[jistart + 16367] = 0.0 + k[684]*y_cur[IDX_N2II] + - k[3745]*y_cur[IDX_N2HII] - k[5417]*y_cur[IDX_N2I] + - k[5419]*y_cur[IDX_N2OI]; - data[jistart + 16368] = 0.0 - k[3647]*y_cur[IDX_N2I]; - data[jistart + 16369] = 0.0 + k[4750]*y_cur[IDX_N2HII]; - data[jistart + 16370] = 0.0 + k[570]*y_cur[IDX_N2II] - - k[5220]*y_cur[IDX_N2I]; - data[jistart + 16371] = 0.0 + k[4785]*y_cur[IDX_N2HII]; - data[jistart + 16372] = 0.0 - k[3367]*y_cur[IDX_N2I]; - data[jistart + 16373] = 0.0 + k[5331]*y_cur[IDX_NOI]; - data[jistart + 16374] = 0.0 + k[571]*y_cur[IDX_N2II] + - k[3365]*y_cur[IDX_N2II]; - data[jistart + 16375] = 0.0 + k[700]*y_cur[IDX_N2II] + - k[3804]*y_cur[IDX_N2HII] + k[5474]*y_cur[IDX_N2OI]; - data[jistart + 16376] = 0.0 - k[3785]*y_cur[IDX_N2I]; - data[jistart + 16377] = 0.0 + k[4820]*y_cur[IDX_N2HII]; - data[jistart + 16378] = 0.0 + k[5286]*y_cur[IDX_NI]; - data[jistart + 16379] = 0.0 + k[572]*y_cur[IDX_N2II] + - k[3376]*y_cur[IDX_N2HII]; - data[jistart + 16380] = 0.0 + k[4855]*y_cur[IDX_N2HII]; - data[jistart + 16381] = 0.0 + k[1113]*y_cur[IDX_HN2OII] + - k[1114]*y_cur[IDX_HN2OII] + k[1151]*y_cur[IDX_N2HII] + - k[1152]*y_cur[IDX_N2HII] + k[1170]*y_cur[IDX_N2OII]; - data[jistart + 16382] = 0.0 - k[247]*y_cur[IDX_N2II]; - data[jistart + 16383] = 0.0 - k[210]*y_cur[IDX_N2II]; - data[jistart + 16384] = 0.0 - k[243]*y_cur[IDX_N2II]; - data[jistart + 16385] = 0.0 - k[293]*y_cur[IDX_N2II]; - data[jistart + 16386] = 0.0 - k[264]*y_cur[IDX_N2II]; - data[jistart + 16387] = 0.0 - k[2204]*y_cur[IDX_N2II] - - k[2205]*y_cur[IDX_N2II]; - data[jistart + 16388] = 0.0 - k[306]*y_cur[IDX_N2II]; - data[jistart + 16389] = 0.0 + k[3456]*y_cur[IDX_NI]; - data[jistart + 16390] = 0.0 - k[316]*y_cur[IDX_N2II]; - data[jistart + 16391] = 0.0 - k[564]*y_cur[IDX_N2II]; - data[jistart + 16392] = 0.0 - k[565]*y_cur[IDX_N2II]; - data[jistart + 16393] = 0.0 - k[6375]*y_cur[IDX_N2II]; - data[jistart + 16394] = 0.0 - k[2460]*y_cur[IDX_N2II]; - data[jistart + 16395] = 0.0 - k[566]*y_cur[IDX_N2II] - - k[3361]*y_cur[IDX_N2II]; - data[jistart + 16396] = 0.0 - k[481]*y_cur[IDX_N2II] - - k[2557]*y_cur[IDX_N2II]; - data[jistart + 16397] = 0.0 - k[567]*y_cur[IDX_N2II] - - k[3362]*y_cur[IDX_N2II] - k[3363]*y_cur[IDX_N2II]; - data[jistart + 16398] = 0.0 - k[498]*y_cur[IDX_N2II]; - data[jistart + 16399] = 0.0 - k[568]*y_cur[IDX_N2II] - - k[3364]*y_cur[IDX_N2II]; - data[jistart + 16400] = 0.0 + k[523]*y_cur[IDX_N2I] + - k[3275]*y_cur[IDX_N2OI]; - data[jistart + 16401] = 0.0 - k[535]*y_cur[IDX_N2II]; - data[jistart + 16402] = 0.0 - k[573]*y_cur[IDX_N2II] + - k[3456]*y_cur[IDX_CNII] + k[3463]*y_cur[IDX_NHII] + - k[5581]*y_cur[IDX_NII]; - data[jistart + 16403] = 0.0 + k[3355]*y_cur[IDX_NHI] + - k[3356]*y_cur[IDX_NOI] + k[5581]*y_cur[IDX_NI]; - data[jistart + 16404] = 0.0 + k[523]*y_cur[IDX_HeII]; - data[jistart + 16405] = 0.0 - k[210]*y_cur[IDX_C2I] - - k[243]*y_cur[IDX_C2HI] - k[247]*y_cur[IDX_CI] - - k[264]*y_cur[IDX_CH2I] - k[293]*y_cur[IDX_CHI] - - k[306]*y_cur[IDX_CNI] - k[316]*y_cur[IDX_COI] - - k[481]*y_cur[IDX_H2OI] - k[498]*y_cur[IDX_HCNI] - - k[535]*y_cur[IDX_MgI] - k[564]*y_cur[IDX_CO2I] - - k[565]*y_cur[IDX_FeI] - k[566]*y_cur[IDX_H2COI] - - k[567]*y_cur[IDX_H2SI] - k[568]*y_cur[IDX_HCOI] - - k[569]*y_cur[IDX_NOI] - k[570]*y_cur[IDX_O2I] - - k[571]*y_cur[IDX_OCSI] - k[572]*y_cur[IDX_SI] - k[573]*y_cur[IDX_NI] - - k[589]*y_cur[IDX_NH2I] - k[610]*y_cur[IDX_NH3I] - - k[618]*y_cur[IDX_NHI] - k[640]*y_cur[IDX_NaI] - k[684]*y_cur[IDX_OI] - - k[700]*y_cur[IDX_OHI] - k[1150]*y_cur[IDX_eM] - - k[2204]*y_cur[IDX_CH4I] - k[2205]*y_cur[IDX_CH4I] - - k[2460]*y_cur[IDX_H2I] - k[2557]*y_cur[IDX_H2OI] - - k[3361]*y_cur[IDX_H2COI] - k[3362]*y_cur[IDX_H2SI] - - k[3363]*y_cur[IDX_H2SI] - k[3364]*y_cur[IDX_HCOI] - - k[3365]*y_cur[IDX_OCSI] - k[3744]*y_cur[IDX_OI] - - k[6375]*y_cur[IDX_GRAINM]; - data[jistart + 16406] = 0.0 + k[3275]*y_cur[IDX_HeII]; - data[jistart + 16407] = 0.0 - k[618]*y_cur[IDX_N2II] + - k[3355]*y_cur[IDX_NII]; - data[jistart + 16408] = 0.0 + k[3463]*y_cur[IDX_NI]; - data[jistart + 16409] = 0.0 - k[589]*y_cur[IDX_N2II]; - data[jistart + 16410] = 0.0 - k[610]*y_cur[IDX_N2II]; - data[jistart + 16411] = 0.0 - k[569]*y_cur[IDX_N2II] + - k[3356]*y_cur[IDX_NII]; - data[jistart + 16412] = 0.0 - k[640]*y_cur[IDX_N2II]; - data[jistart + 16413] = 0.0 - k[684]*y_cur[IDX_N2II] - - k[3744]*y_cur[IDX_N2II]; - data[jistart + 16414] = 0.0 - k[570]*y_cur[IDX_N2II]; - data[jistart + 16415] = 0.0 - k[571]*y_cur[IDX_N2II] - - k[3365]*y_cur[IDX_N2II]; - data[jistart + 16416] = 0.0 - k[700]*y_cur[IDX_N2II]; - data[jistart + 16417] = 0.0 - k[572]*y_cur[IDX_N2II]; - data[jistart + 16418] = 0.0 - k[1150]*y_cur[IDX_N2II]; - data[jistart + 16419] = 0.0 - k[1909]*y_cur[IDX_N2HII]; - data[jistart + 16420] = 0.0 - k[3909]*y_cur[IDX_N2HII]; - data[jistart + 16421] = 0.0 - k[3944]*y_cur[IDX_N2HII]; - data[jistart + 16422] = 0.0 - k[3979]*y_cur[IDX_N2HII]; - data[jistart + 16423] = 0.0 - k[1461]*y_cur[IDX_N2HII]; - data[jistart + 16424] = 0.0 - k[4014]*y_cur[IDX_N2HII]; - data[jistart + 16425] = 0.0 - k[1748]*y_cur[IDX_N2HII]; - data[jistart + 16426] = 0.0 - k[4049]*y_cur[IDX_N2HII]; - data[jistart + 16427] = 0.0 - k[1568]*y_cur[IDX_N2HII]; - data[jistart + 16428] = 0.0 - k[4084]*y_cur[IDX_N2HII]; - data[jistart + 16429] = 0.0 - k[4119]*y_cur[IDX_N2HII]; - data[jistart + 16430] = 0.0 - k[4154]*y_cur[IDX_N2HII]; - data[jistart + 16431] = 0.0 - k[4189]*y_cur[IDX_N2HII]; - data[jistart + 16432] = 0.0 - k[4224]*y_cur[IDX_N2HII]; - data[jistart + 16433] = 0.0 - k[4259]*y_cur[IDX_N2HII]; - data[jistart + 16434] = 0.0 - k[4294]*y_cur[IDX_N2HII]; - data[jistart + 16435] = 0.0 - k[4329]*y_cur[IDX_N2HII]; - data[jistart + 16436] = 0.0 - k[4364]*y_cur[IDX_N2HII]; - data[jistart + 16437] = 0.0 - k[4399]*y_cur[IDX_N2HII]; - data[jistart + 16438] = 0.0 - k[3368]*y_cur[IDX_N2HII]; - data[jistart + 16439] = 0.0 - k[4434]*y_cur[IDX_N2HII]; - data[jistart + 16440] = 0.0 - k[4469]*y_cur[IDX_N2HII]; - data[jistart + 16441] = 0.0 - k[4504]*y_cur[IDX_N2HII]; - data[jistart + 16442] = 0.0 - k[4539]*y_cur[IDX_N2HII]; - data[jistart + 16443] = 0.0 - k[4574]*y_cur[IDX_N2HII]; - data[jistart + 16444] = 0.0 - k[4609]*y_cur[IDX_N2HII]; - data[jistart + 16445] = 0.0 - k[2257]*y_cur[IDX_N2HII]; - data[jistart + 16446] = 0.0 - k[4644]*y_cur[IDX_N2HII]; - data[jistart + 16447] = 0.0 - k[2010]*y_cur[IDX_N2HII]; - data[jistart + 16448] = 0.0 - k[3369]*y_cur[IDX_N2HII] - - k[3370]*y_cur[IDX_N2HII]; - data[jistart + 16449] = 0.0 - k[3371]*y_cur[IDX_N2HII]; - data[jistart + 16450] = 0.0 - k[2206]*y_cur[IDX_N2HII]; - data[jistart + 16451] = 0.0 - k[4679]*y_cur[IDX_N2HII]; - data[jistart + 16452] = 0.0 - k[2288]*y_cur[IDX_N2HII]; - data[jistart + 16453] = 0.0 - k[3372]*y_cur[IDX_N2HII]; - data[jistart + 16454] = 0.0 - k[6396]*y_cur[IDX_N2HII] - - k[6397]*y_cur[IDX_N2HII]; - data[jistart + 16455] = 0.0 + k[2354]*y_cur[IDX_N2OI]; - data[jistart + 16456] = 0.0 - k[4715]*y_cur[IDX_N2HII]; - data[jistart + 16457] = 0.0 + k[2460]*y_cur[IDX_N2II]; - data[jistart + 16458] = 0.0 + k[2391]*y_cur[IDX_N2I]; - data[jistart + 16459] = 0.0 - k[3373]*y_cur[IDX_N2HII]; - data[jistart + 16460] = 0.0 + k[2557]*y_cur[IDX_N2II] - - k[2558]*y_cur[IDX_N2HII]; - data[jistart + 16461] = 0.0 + k[2718]*y_cur[IDX_N2I]; - data[jistart + 16462] = 0.0 - k[3374]*y_cur[IDX_N2HII]; - data[jistart + 16463] = 0.0 - k[2881]*y_cur[IDX_N2HII]; - data[jistart + 16464] = 0.0 - k[3009]*y_cur[IDX_N2HII] + - k[3364]*y_cur[IDX_N2II]; - data[jistart + 16465] = 0.0 - k[3044]*y_cur[IDX_N2HII]; - data[jistart + 16466] = 0.0 - k[3035]*y_cur[IDX_N2HII]; - data[jistart + 16467] = 0.0 + k[3366]*y_cur[IDX_N2I]; - data[jistart + 16468] = 0.0 + k[3464]*y_cur[IDX_NH2II]; - data[jistart + 16469] = 0.0 + k[3353]*y_cur[IDX_NH3I]; - data[jistart + 16470] = 0.0 + k[2391]*y_cur[IDX_H2II] + - k[2718]*y_cur[IDX_H3II] + k[3366]*y_cur[IDX_HNOII] + - k[3367]*y_cur[IDX_O2HII] + k[3496]*y_cur[IDX_NHII] + - k[3785]*y_cur[IDX_OHII]; - data[jistart + 16471] = 0.0 + k[2460]*y_cur[IDX_H2I] + - k[2557]*y_cur[IDX_H2OI] + k[3364]*y_cur[IDX_HCOI]; - data[jistart + 16472] = 0.0 - k[1151]*y_cur[IDX_eM] - - k[1152]*y_cur[IDX_eM] - k[1153]*y_cur[IDX_eM] - - k[1154]*y_cur[IDX_eM] - k[1461]*y_cur[IDX_C2I] - - k[1568]*y_cur[IDX_C2H2I] - k[1748]*y_cur[IDX_C2HI] - - k[1909]*y_cur[IDX_CI] - k[2010]*y_cur[IDX_CH2I] - - k[2206]*y_cur[IDX_CH4I] - k[2257]*y_cur[IDX_CHI] - - k[2288]*y_cur[IDX_COI] - k[2558]*y_cur[IDX_H2OI] - - k[2881]*y_cur[IDX_HCNI] - k[3009]*y_cur[IDX_HCOI] - - k[3035]*y_cur[IDX_HNC3I] - k[3044]*y_cur[IDX_HNCI] - - k[3368]*y_cur[IDX_C6H6I] - k[3369]*y_cur[IDX_CH3CHCH2I] - - k[3370]*y_cur[IDX_CH3CHCH2I] - k[3371]*y_cur[IDX_CH3CNI] - - k[3372]*y_cur[IDX_CO2I] - k[3373]*y_cur[IDX_H2COI] - - k[3374]*y_cur[IDX_HC3NI] - k[3375]*y_cur[IDX_NCCNI] - - k[3376]*y_cur[IDX_SI] - k[3544]*y_cur[IDX_NH2I] - - k[3592]*y_cur[IDX_NH3I] - k[3616]*y_cur[IDX_NHI] - - k[3745]*y_cur[IDX_OI] - k[3804]*y_cur[IDX_OHI] - - k[3909]*y_cur[IDX_CM] - k[3944]*y_cur[IDX_C10M] - - k[3979]*y_cur[IDX_C10HM] - k[4014]*y_cur[IDX_C2M] - - k[4049]*y_cur[IDX_C2HM] - k[4084]*y_cur[IDX_C3M] - - k[4119]*y_cur[IDX_C3HM] - k[4154]*y_cur[IDX_C3NM] - - k[4189]*y_cur[IDX_C4M] - k[4224]*y_cur[IDX_C4HM] - - k[4259]*y_cur[IDX_C5M] - k[4294]*y_cur[IDX_C5HM] - - k[4329]*y_cur[IDX_C5NM] - k[4364]*y_cur[IDX_C6M] - - k[4399]*y_cur[IDX_C6HM] - k[4434]*y_cur[IDX_C7M] - - k[4469]*y_cur[IDX_C7HM] - k[4504]*y_cur[IDX_C8M] - - k[4539]*y_cur[IDX_C8HM] - k[4574]*y_cur[IDX_C9M] - - k[4609]*y_cur[IDX_C9HM] - k[4644]*y_cur[IDX_CHM] - - k[4679]*y_cur[IDX_CNM] - k[4715]*y_cur[IDX_HM] - - k[4750]*y_cur[IDX_OM] - k[4785]*y_cur[IDX_O2M] - - k[4820]*y_cur[IDX_OHM] - k[4855]*y_cur[IDX_SM] - - k[6396]*y_cur[IDX_GRAINM] - k[6397]*y_cur[IDX_GRAINM]; - data[jistart + 16473] = 0.0 + k[2354]*y_cur[IDX_HII]; - data[jistart + 16474] = 0.0 - k[3375]*y_cur[IDX_N2HII]; - data[jistart + 16475] = 0.0 - k[3616]*y_cur[IDX_N2HII]; - data[jistart + 16476] = 0.0 + k[3496]*y_cur[IDX_N2I] + - k[3500]*y_cur[IDX_NOI]; - data[jistart + 16477] = 0.0 - k[3544]*y_cur[IDX_N2HII]; - data[jistart + 16478] = 0.0 + k[3464]*y_cur[IDX_NI]; - data[jistart + 16479] = 0.0 + k[3353]*y_cur[IDX_NII] - - k[3592]*y_cur[IDX_N2HII]; - data[jistart + 16480] = 0.0 + k[3500]*y_cur[IDX_NHII]; - data[jistart + 16481] = 0.0 - k[3745]*y_cur[IDX_N2HII]; - data[jistart + 16482] = 0.0 - k[4750]*y_cur[IDX_N2HII]; - data[jistart + 16483] = 0.0 - k[4785]*y_cur[IDX_N2HII]; - data[jistart + 16484] = 0.0 + k[3367]*y_cur[IDX_N2I]; - data[jistart + 16485] = 0.0 - k[3804]*y_cur[IDX_N2HII]; - data[jistart + 16486] = 0.0 + k[3785]*y_cur[IDX_N2I]; - data[jistart + 16487] = 0.0 - k[4820]*y_cur[IDX_N2HII]; - data[jistart + 16488] = 0.0 - k[3376]*y_cur[IDX_N2HII]; - data[jistart + 16489] = 0.0 - k[4855]*y_cur[IDX_N2HII]; - data[jistart + 16490] = 0.0 - k[1151]*y_cur[IDX_N2HII] - - k[1152]*y_cur[IDX_N2HII] - k[1153]*y_cur[IDX_N2HII] - - k[1154]*y_cur[IDX_N2HII]; - data[jistart + 16491] = 0.0 - k[1416]*y_cur[IDX_N2OI]; - data[jistart + 16492] = 0.0 - k[2085]*y_cur[IDX_N2OI]; - data[jistart + 16493] = 0.0 - k[2234]*y_cur[IDX_N2OI]; - data[jistart + 16494] = 0.0 - k[5128]*y_cur[IDX_N2OI]; - data[jistart + 16495] = 0.0 + k[7156] + k[7338] + k[7520]; - data[jistart + 16496] = 0.0 - k[5179]*y_cur[IDX_N2OI] - - k[5180]*y_cur[IDX_N2OI]; - data[jistart + 16497] = 0.0 - k[399]*y_cur[IDX_N2OI] - - k[2354]*y_cur[IDX_N2OI]; - data[jistart + 16498] = 0.0 + k[482]*y_cur[IDX_N2OII]; - data[jistart + 16499] = 0.0 + k[485]*y_cur[IDX_N2OII]; - data[jistart + 16500] = 0.0 - k[2719]*y_cur[IDX_N2OI]; - data[jistart + 16501] = 0.0 - k[2978]*y_cur[IDX_N2OI]; - data[jistart + 16502] = 0.0 + k[5269]*y_cur[IDX_NI] + - k[5326]*y_cur[IDX_NOI]; - data[jistart + 16503] = 0.0 - k[3275]*y_cur[IDX_N2OI] - - k[3276]*y_cur[IDX_N2OI] - k[3277]*y_cur[IDX_N2OI] - - k[3278]*y_cur[IDX_N2OI]; - data[jistart + 16504] = 0.0 + k[5269]*y_cur[IDX_HNOI] + - k[5276]*y_cur[IDX_NO2I]; - data[jistart + 16505] = 0.0 + k[5220]*y_cur[IDX_O2I]; - data[jistart + 16506] = 0.0 - k[399]*y_cur[IDX_HII] - - k[659]*y_cur[IDX_OII] - k[1416]*y_cur[IDX_CII] - - k[2085]*y_cur[IDX_CH3II] - k[2234]*y_cur[IDX_CH5II] - - k[2354]*y_cur[IDX_HII] - k[2719]*y_cur[IDX_H3II] - - k[2978]*y_cur[IDX_HCOII] - k[3275]*y_cur[IDX_HeII] - - k[3276]*y_cur[IDX_HeII] - k[3277]*y_cur[IDX_HeII] - - k[3278]*y_cur[IDX_HeII] - k[5128]*y_cur[IDX_COI] - - k[5179]*y_cur[IDX_HI] - k[5180]*y_cur[IDX_HI] - - k[5327]*y_cur[IDX_NOI] - k[5418]*y_cur[IDX_OI] - - k[5419]*y_cur[IDX_OI] - k[5473]*y_cur[IDX_OHI] - - k[5474]*y_cur[IDX_OHI] - k[5879] - k[6212] - k[6213] - k[6214] - - k[6974]; - data[jistart + 16507] = 0.0 + k[482]*y_cur[IDX_H2OI] + - k[485]*y_cur[IDX_H2SI]; - data[jistart + 16508] = 0.0 + k[5312]*y_cur[IDX_NO2I] + - k[5315]*y_cur[IDX_NOI]; - data[jistart + 16509] = 0.0 + k[5315]*y_cur[IDX_NHI] + - k[5326]*y_cur[IDX_HNOI] - k[5327]*y_cur[IDX_N2OI] + - k[5328]*y_cur[IDX_NOI] + k[5328]*y_cur[IDX_NOI] + + data[jistart + 18924] = 0.0 - k[2854]*y_cur[IDX_COI] + k[2858]*y_cur[IDX_HCOI]; + data[jistart + 18925] = 0.0 + k[3659]*y_cur[IDX_O2II] + k[3662]*y_cur[IDX_O2II] + + k[3856]*y_cur[IDX_SOII]; + data[jistart + 18926] = 0.0 + k[1454]*y_cur[IDX_HCOI] + k[1455]*y_cur[IDX_O2I]; + data[jistart + 18927] = 0.0 + k[3483]*y_cur[IDX_CO2I] - k[3485]*y_cur[IDX_COI] - + k[3486]*y_cur[IDX_COI]; + data[jistart + 18928] = 0.0 + k[4780]*y_cur[IDX_HCOII]; + data[jistart + 18929] = 0.0 + k[4639]*y_cur[IDX_HCOII]; + data[jistart + 18930] = 0.0 - k[445]*y_cur[IDX_COI] - k[2383]*y_cur[IDX_COI] + + k[2389]*y_cur[IDX_HCOI]; + data[jistart + 18931] = 0.0 + k[1425]*y_cur[IDX_CII] + k[1758]*y_cur[IDX_C3HII] + + k[1970]*y_cur[IDX_CHII] + k[1992]*y_cur[IDX_CH2II] + + k[2092]*y_cur[IDX_CH3II] + k[2356]*y_cur[IDX_HII] + + k[2982]*y_cur[IDX_HCOII] + k[3295]*y_cur[IDX_HeII] + + k[3360]*y_cur[IDX_NII] + k[3365]*y_cur[IDX_N2II] + + k[3833]*y_cur[IDX_SII] + k[3871]*y_cur[IDX_SiII] + + k[4875]*y_cur[IDX_C2I] + k[4905]*y_cur[IDX_C2HI] + + k[4980]*y_cur[IDX_CI] + k[5098]*y_cur[IDX_CHI] + + k[5197]*y_cur[IDX_HI] + k[5431]*y_cur[IDX_OI] + k[5903] + k[6241]; + data[jistart + 18932] = 0.0 + k[2983]*y_cur[IDX_HCOII]; + data[jistart + 18933] = 0.0 - k[65]*y_cur[IDX_COI] + k[4850]*y_cur[IDX_HCOII]; + data[jistart + 18934] = 0.0 + k[3687]*y_cur[IDX_OI] + k[4044]*y_cur[IDX_HCOII]; + data[jistart + 18935] = 0.0 + k[3700]*y_cur[IDX_OI] + k[4219]*y_cur[IDX_HCOII]; + data[jistart + 18936] = 0.0 + k[209]*y_cur[IDX_C2I] + k[242]*y_cur[IDX_C2HI] + + k[246]*y_cur[IDX_CI] + k[261]*y_cur[IDX_CH2I] + + k[285]*y_cur[IDX_CH4I] + k[289]*y_cur[IDX_CHI] + + k[307]*y_cur[IDX_CO2I] + k[308]*y_cur[IDX_H2COI] + + k[309]*y_cur[IDX_H2SI] + k[310]*y_cur[IDX_HCOI] + + k[311]*y_cur[IDX_NOI] + k[312]*y_cur[IDX_O2I] + k[313]*y_cur[IDX_SI] + + k[478]*y_cur[IDX_H2OI] + k[488]*y_cur[IDX_HI] + + k[497]*y_cur[IDX_HCNI] + k[587]*y_cur[IDX_NH2I] + + k[602]*y_cur[IDX_NH3I] + k[617]*y_cur[IDX_NHI] + + k[682]*y_cur[IDX_OI] + k[699]*y_cur[IDX_OHI]; + data[jistart + 18937] = 0.0 + k[2948]*y_cur[IDX_HCOII]; + data[jistart + 18938] = 0.0 - k[2224]*y_cur[IDX_COI] - k[5545]*y_cur[IDX_COI]; + data[jistart + 18939] = 0.0 + k[4815]*y_cur[IDX_HCOII]; + data[jistart + 18940] = 0.0 + k[3681]*y_cur[IDX_OI] + k[3974]*y_cur[IDX_HCOII]; + data[jistart + 18941] = 0.0 + k[3694]*y_cur[IDX_OI] + k[4114]*y_cur[IDX_HCOII]; + data[jistart + 18942] = 0.0 + k[2917]*y_cur[IDX_HCOII]; + data[jistart + 18943] = 0.0 + k[3709]*y_cur[IDX_OI] + k[4394]*y_cur[IDX_HCOII]; + data[jistart + 18944] = 0.0 + k[3718]*y_cur[IDX_OI] + k[4534]*y_cur[IDX_HCOII]; + data[jistart + 18945] = 0.0 + k[3714]*y_cur[IDX_OI] + k[4464]*y_cur[IDX_HCOII]; + data[jistart + 18946] = 0.0 + k[3723]*y_cur[IDX_OI] + k[4604]*y_cur[IDX_HCOII]; + data[jistart + 18947] = 0.0 + k[3678]*y_cur[IDX_OI] + k[3939]*y_cur[IDX_HCOII]; + data[jistart + 18948] = 0.0 + k[3705]*y_cur[IDX_OI] + k[4289]*y_cur[IDX_HCOII]; + data[jistart + 18949] = 0.0 + k[131]*y_cur[IDX_OI] + k[4324]*y_cur[IDX_HCOII]; + data[jistart + 18950] = 0.0 + k[2977]*y_cur[IDX_HCOII]; + data[jistart + 18951] = 0.0 + k[3]*y_cur[IDX_CO2I] + k[3]*y_cur[IDX_CO2I] + + k[8]*y_cur[IDX_OI] + k[1450]*y_cur[IDX_O2I] + + k[3904]*y_cur[IDX_HCOII]; + data[jistart + 18952] = 0.0 + k[2956]*y_cur[IDX_HCOII] + k[5392]*y_cur[IDX_OI] + + k[5462]*y_cur[IDX_OHI]; + data[jistart + 18953] = 0.0 + k[56]*y_cur[IDX_CI] - k[124]*y_cur[IDX_COI] + + k[4745]*y_cur[IDX_HCOII]; + data[jistart + 18954] = 0.0 + k[3721]*y_cur[IDX_OI] + k[4569]*y_cur[IDX_HCOII]; + data[jistart + 18955] = 0.0 + k[2954]*y_cur[IDX_HCOII]; + data[jistart + 18956] = 0.0 - k[73]*y_cur[IDX_COI] + k[4710]*y_cur[IDX_HCOII]; + data[jistart + 18957] = 0.0 + k[2964]*y_cur[IDX_HCOII]; + data[jistart + 18958] = 0.0 + k[3006]*y_cur[IDX_HCOII]; + data[jistart + 18959] = 0.0 + k[1753]*y_cur[IDX_CO2I] + k[1758]*y_cur[IDX_OCSI] + + k[2528]*y_cur[IDX_H2OI] + k[3626]*y_cur[IDX_NOI] + + k[3670]*y_cur[IDX_O2I]; + data[jistart + 18960] = 0.0 + k[3717]*y_cur[IDX_OI] + k[4499]*y_cur[IDX_HCOII]; + data[jistart + 18961] = 0.0 + k[3685]*y_cur[IDX_OI] + k[4009]*y_cur[IDX_HCOII]; + data[jistart + 18962] = 0.0 + k[2905]*y_cur[IDX_HCOII] + k[5355]*y_cur[IDX_OI]; + data[jistart + 18963] = 0.0 + k[3693]*y_cur[IDX_OI] + k[4079]*y_cur[IDX_HCOII]; + data[jistart + 18964] = 0.0 + k[3698]*y_cur[IDX_OI] + k[4184]*y_cur[IDX_HCOII]; + data[jistart + 18965] = 0.0 + k[3708]*y_cur[IDX_OI] + k[4359]*y_cur[IDX_HCOII]; + data[jistart + 18966] = 0.0 + k[1036]*y_cur[IDX_eM] + k[6416]*y_cur[IDX_GRAINM]; + data[jistart + 18967] = 0.0 + k[3703]*y_cur[IDX_OI] + k[4254]*y_cur[IDX_HCOII]; + data[jistart + 18968] = 0.0 + k[3712]*y_cur[IDX_OI] + k[4429]*y_cur[IDX_HCOII]; + data[jistart + 18969] = 0.0 + k[1465]*y_cur[IDX_C2I] + k[1932]*y_cur[IDX_CI] - + k[2292]*y_cur[IDX_COI]; + data[jistart + 18970] = 0.0 + k[5353]*y_cur[IDX_OI]; + data[jistart + 18971] = 0.0 + k[587]*y_cur[IDX_COII] + k[3542]*y_cur[IDX_HCOII]; + data[jistart + 18972] = 0.0 + k[2914]*y_cur[IDX_HCOII]; + data[jistart + 18973] = 0.0 + k[1468]*y_cur[IDX_CO2I] + k[1477]*y_cur[IDX_HCOI]; + data[jistart + 18974] = 0.0 + k[2921]*y_cur[IDX_HCOII] + k[5367]*y_cur[IDX_OI]; + data[jistart + 18975] = 0.0 + k[1978]*y_cur[IDX_CO2I] + k[1987]*y_cur[IDX_HCOI] + + k[1992]*y_cur[IDX_OCSI]; + data[jistart + 18976] = 0.0 - k[3777]*y_cur[IDX_COI] + k[3782]*y_cur[IDX_HCOI]; + data[jistart + 18977] = 0.0 - k[2507]*y_cur[IDX_COI] + k[2513]*y_cur[IDX_HCOI]; + data[jistart + 18978] = 0.0 + k[130]*y_cur[IDX_OI] + k[4149]*y_cur[IDX_HCOII]; + data[jistart + 18979] = 0.0 + k[2909]*y_cur[IDX_HCOII] + k[5358]*y_cur[IDX_OI]; + data[jistart + 18980] = 0.0 + k[1946]*y_cur[IDX_CO2I] + k[1948]*y_cur[IDX_H2COI] + + k[1959]*y_cur[IDX_HCOI] + k[1970]*y_cur[IDX_OCSI]; + data[jistart + 18981] = 0.0 + k[3]*y_cur[IDX_CM] + k[3]*y_cur[IDX_CM] + + k[307]*y_cur[IDX_COII] + k[1387]*y_cur[IDX_CII] + + k[1468]*y_cur[IDX_C2HII] + k[1753]*y_cur[IDX_C3HII] + + k[1946]*y_cur[IDX_CHII] + k[1978]*y_cur[IDX_CH2II] + + k[2270]*y_cur[IDX_CNII] + k[3208]*y_cur[IDX_HeII] + + k[3483]*y_cur[IDX_NHII] + k[3640]*y_cur[IDX_OII] + + k[3811]*y_cur[IDX_PII] + k[5075]*y_cur[IDX_CHI] + + k[5162]*y_cur[IDX_HI] + k[5262]*y_cur[IDX_NI] + + k[5390]*y_cur[IDX_OI] + k[5491]*y_cur[IDX_SiI] + k[5825] + k[6137]; + data[jistart + 18982] = 0.0 + k[1462]*y_cur[IDX_C2I] + k[3010]*y_cur[IDX_HCOI] + + k[3655]*y_cur[IDX_C2H2I] + k[3659]*y_cur[IDX_CH3CHCH2I] + + k[3662]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 18983] = 0.0 + k[2901]*y_cur[IDX_HCOII] + k[5341]*y_cur[IDX_OI]; + data[jistart + 18984] = 0.0 + k[2935]*y_cur[IDX_HCOII] + k[5376]*y_cur[IDX_OI]; + data[jistart + 18985] = 0.0 + k[1447]*y_cur[IDX_CII] + k[3005]*y_cur[IDX_HCOII]; + data[jistart + 18986] = 0.0 + k[2899]*y_cur[IDX_HCOII] + k[5340]*y_cur[IDX_OI]; + data[jistart + 18987] = 0.0 + k[2932]*y_cur[IDX_HCOII] + k[5374]*y_cur[IDX_OI]; + data[jistart + 18988] = 0.0 + k[2926]*y_cur[IDX_HCOII] + k[5370]*y_cur[IDX_OI]; + data[jistart + 18989] = 0.0 + k[2933]*y_cur[IDX_HCOII] + k[5375]*y_cur[IDX_OI]; + data[jistart + 18990] = 0.0 + k[2930]*y_cur[IDX_HCOII] + k[5373]*y_cur[IDX_OI]; + data[jistart + 18991] = 0.0 + k[8661]*y_cur[IDX_GOI]; + data[jistart + 18992] = 0.0 + k[617]*y_cur[IDX_COII] + k[3614]*y_cur[IDX_HCOII]; + data[jistart + 18993] = 0.0 + k[2918]*y_cur[IDX_HCOII] + k[5365]*y_cur[IDX_OI]; + data[jistart + 18994] = 0.0 + k[2922]*y_cur[IDX_HCOII] + k[5368]*y_cur[IDX_OI]; + data[jistart + 18995] = 0.0 + k[4674]*y_cur[IDX_HCOII]; + data[jistart + 18996] = 0.0 + k[2913]*y_cur[IDX_HCOII] + k[5361]*y_cur[IDX_OI]; + data[jistart + 18997] = 0.0 + k[1429]*y_cur[IDX_CII] + k[2990]*y_cur[IDX_HCOII] + + k[4987]*y_cur[IDX_CI] + k[5102]*y_cur[IDX_CHI]; + data[jistart + 18998] = 0.0 + k[2928]*y_cur[IDX_HCOII] + k[5371]*y_cur[IDX_OI]; + data[jistart + 18999] = 0.0 - k[2288]*y_cur[IDX_COI]; + data[jistart + 19000] = 0.0 + k[2938]*y_cur[IDX_HCOII]; + data[jistart + 19001] = 0.0 + k[3844]*y_cur[IDX_C2H2I] + k[3856]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 19002] = 0.0 + k[2925]*y_cur[IDX_HCOII] + k[5369]*y_cur[IDX_OI]; + data[jistart + 19003] = 0.0 + k[2920]*y_cur[IDX_HCOII] + k[5366]*y_cur[IDX_OI]; + data[jistart + 19004] = 0.0 - k[549]*y_cur[IDX_COI] - k[3344]*y_cur[IDX_COI] + + k[3350]*y_cur[IDX_HCOI] + k[3360]*y_cur[IDX_OCSI]; + data[jistart + 19005] = 0.0 + k[2908]*y_cur[IDX_HCOII] + k[5357]*y_cur[IDX_OI]; + data[jistart + 19006] = 0.0 + k[997]*y_cur[IDX_eM] + k[998]*y_cur[IDX_eM] + + k[3007]*y_cur[IDX_HCOI] + k[6399]*y_cur[IDX_GRAINM] + + k[6400]*y_cur[IDX_GRAINM]; + data[jistart + 19007] = 0.0 + k[2906]*y_cur[IDX_HCOII] + k[5356]*y_cur[IDX_OI]; + data[jistart + 19008] = 0.0 + k[2915]*y_cur[IDX_HCOII] + k[5362]*y_cur[IDX_OI]; + data[jistart + 19009] = 0.0 - k[653]*y_cur[IDX_COI] + k[3640]*y_cur[IDX_CO2I] + + k[3646]*y_cur[IDX_HCOI]; + data[jistart + 19010] = 0.0 + k[2965]*y_cur[IDX_HCOII]; + data[jistart + 19011] = 0.0 + k[3701]*y_cur[IDX_OI]; + data[jistart + 19012] = 0.0 + k[261]*y_cur[IDX_COII] + k[2008]*y_cur[IDX_HCOII] + + k[4999]*y_cur[IDX_HCOI] + k[5009]*y_cur[IDX_O2I] + + k[5012]*y_cur[IDX_OI] + k[5013]*y_cur[IDX_OI]; + data[jistart + 19013] = 0.0 + k[3041]*y_cur[IDX_HCOII]; + data[jistart + 19014] = 0.0 + k[3552]*y_cur[IDX_HCOI]; + data[jistart + 19015] = 0.0 + k[1708]*y_cur[IDX_HCOII]; + data[jistart + 19016] = 0.0 + k[1644]*y_cur[IDX_HCOII]; + data[jistart + 19017] = 0.0 + k[312]*y_cur[IDX_COII] + k[1423]*y_cur[IDX_CII] + + k[1450]*y_cur[IDX_CM] + k[1455]*y_cur[IDX_C2II] + + k[2275]*y_cur[IDX_CNII] + k[3670]*y_cur[IDX_C3HII] + + k[4874]*y_cur[IDX_C2I] + k[4874]*y_cur[IDX_C2I] + + k[4904]*y_cur[IDX_C2HI] + k[4978]*y_cur[IDX_CI] + + k[5009]*y_cur[IDX_CH2I] + k[5088]*y_cur[IDX_CHI] + + k[5089]*y_cur[IDX_CHI] + k[5090]*y_cur[IDX_CHI] + + k[5091]*y_cur[IDX_CHI] + k[5123]*y_cur[IDX_CNI] - + k[5130]*y_cur[IDX_COI] + k[5209]*y_cur[IDX_HCOI] + + k[5336]*y_cur[IDX_OCNI]; + data[jistart + 19018] = 0.0 + k[3871]*y_cur[IDX_OCSI]; + data[jistart + 19019] = 0.0 + k[309]*y_cur[IDX_COII] + k[2961]*y_cur[IDX_HCOII]; + data[jistart + 19020] = 0.0 + k[2500]*y_cur[IDX_H2COI] + k[3012]*y_cur[IDX_HCOI] + + k[3833]*y_cur[IDX_OCSI]; + data[jistart + 19021] = 0.0 + k[3881]*y_cur[IDX_HCOII] + k[5491]*y_cur[IDX_CO2I] - + k[5492]*y_cur[IDX_COI]; + data[jistart + 19022] = 0.0 - k[5513]*y_cur[IDX_COI]; + data[jistart + 19023] = 0.0 + k[311]*y_cur[IDX_COII] + k[3626]*y_cur[IDX_C3HII] + + k[4878]*y_cur[IDX_C2H2I] + k[4975]*y_cur[IDX_CI] + + k[5121]*y_cur[IDX_CNI] + k[5207]*y_cur[IDX_HCOI] + k[5332]*y_cur[IDX_OCNI]; - data[jistart + 16510] = 0.0 + k[5276]*y_cur[IDX_NI] + - k[5312]*y_cur[IDX_NHI]; - data[jistart + 16511] = 0.0 - k[5418]*y_cur[IDX_N2OI] - - k[5419]*y_cur[IDX_N2OI]; - data[jistart + 16512] = 0.0 - k[659]*y_cur[IDX_N2OI]; - data[jistart + 16513] = 0.0 + k[5220]*y_cur[IDX_N2I]; - data[jistart + 16514] = 0.0 + k[5332]*y_cur[IDX_NOI]; - data[jistart + 16515] = 0.0 - k[5473]*y_cur[IDX_N2OI] - - k[5474]*y_cur[IDX_N2OI]; - data[jistart + 16516] = 0.0 - k[6528]*y_cur[IDX_N2OII] - - k[6529]*y_cur[IDX_N2OII] - k[6530]*y_cur[IDX_N2OII]; - data[jistart + 16517] = 0.0 + k[399]*y_cur[IDX_N2OI]; - data[jistart + 16518] = 0.0 - k[482]*y_cur[IDX_N2OII] - - k[2559]*y_cur[IDX_N2OII]; - data[jistart + 16519] = 0.0 - k[485]*y_cur[IDX_N2OII] - - k[2581]*y_cur[IDX_N2OII]; - data[jistart + 16520] = 0.0 + k[399]*y_cur[IDX_HII] + - k[659]*y_cur[IDX_OII] + k[6213]; - data[jistart + 16521] = 0.0 - k[482]*y_cur[IDX_H2OI] - - k[485]*y_cur[IDX_H2SI] - k[1170]*y_cur[IDX_eM] - - k[1171]*y_cur[IDX_eM] - k[1172]*y_cur[IDX_eM] - - k[2559]*y_cur[IDX_H2OI] - k[2581]*y_cur[IDX_H2SI] - - k[6528]*y_cur[IDX_GRAINM] - k[6529]*y_cur[IDX_GRAINM] - + data[jistart + 19024] = 0.0 + k[310]*y_cur[IDX_COII] + k[1408]*y_cur[IDX_CII] + + k[1454]*y_cur[IDX_C2II] + k[1477]*y_cur[IDX_C2HII] + + k[1524]*y_cur[IDX_C2H2II] + k[1959]*y_cur[IDX_CHII] + + k[1987]*y_cur[IDX_CH2II] + k[2082]*y_cur[IDX_CH3II] + + k[2273]*y_cur[IDX_CNII] + k[2345]*y_cur[IDX_HII] + + k[2389]*y_cur[IDX_H2II] + k[2513]*y_cur[IDX_H2OII] + + k[2858]*y_cur[IDX_HCNII] + k[2969]*y_cur[IDX_HCOII] + + k[3007]*y_cur[IDX_H2COII] + k[3010]*y_cur[IDX_O2II] + + k[3012]*y_cur[IDX_SII] + k[3250]*y_cur[IDX_HeII] + + k[3350]*y_cur[IDX_NII] + k[3364]*y_cur[IDX_N2II] + + k[3552]*y_cur[IDX_NH3II] + k[3646]*y_cur[IDX_OII] + + k[3782]*y_cur[IDX_OHII] + k[4963]*y_cur[IDX_CI] + + k[4999]*y_cur[IDX_CH2I] + k[5033]*y_cur[IDX_CH3I] + + k[5077]*y_cur[IDX_CHI] + k[5117]*y_cur[IDX_CNI] + + k[5171]*y_cur[IDX_HI] + k[5204]*y_cur[IDX_HCOI] + + k[5204]*y_cur[IDX_HCOI] + k[5204]*y_cur[IDX_HCOI] + + k[5204]*y_cur[IDX_HCOI] + k[5205]*y_cur[IDX_HCOI] + + k[5205]*y_cur[IDX_HCOI] + k[5207]*y_cur[IDX_NOI] + + k[5209]*y_cur[IDX_O2I] + k[5265]*y_cur[IDX_NI] + + k[5406]*y_cur[IDX_OI] + k[5471]*y_cur[IDX_OHI] + + k[5487]*y_cur[IDX_SI] + k[5856] + k[6184]; + data[jistart + 19025] = 0.0 + k[285]*y_cur[IDX_COII]; + data[jistart + 19026] = 0.0 + k[242]*y_cur[IDX_COII] + k[1746]*y_cur[IDX_HCOII] + + k[4904]*y_cur[IDX_O2I] + k[4905]*y_cur[IDX_OCSI] + + k[5352]*y_cur[IDX_OI]; + data[jistart + 19027] = 0.0 + k[308]*y_cur[IDX_COII] + k[1390]*y_cur[IDX_CII] + + k[1948]*y_cur[IDX_CHII] + k[2492]*y_cur[IDX_CClII] + + k[2500]*y_cur[IDX_SII] + k[2958]*y_cur[IDX_HCOII] + k[5836] + + k[6152] + k[6153]; + data[jistart + 19028] = 0.0 + k[497]*y_cur[IDX_COII] + k[2877]*y_cur[IDX_HCOII] + + k[5403]*y_cur[IDX_OI] + k[5470]*y_cur[IDX_OHI]; + data[jistart + 19029] = 0.0 + k[289]*y_cur[IDX_COII] + k[2253]*y_cur[IDX_HCOII] + + k[5075]*y_cur[IDX_CO2I] + k[5077]*y_cur[IDX_HCOI] + + k[5088]*y_cur[IDX_O2I] + k[5089]*y_cur[IDX_O2I] + + k[5090]*y_cur[IDX_O2I] + k[5091]*y_cur[IDX_O2I] + + k[5096]*y_cur[IDX_OI] + k[5098]*y_cur[IDX_OCSI] + + k[5102]*y_cur[IDX_SOI]; + data[jistart + 19030] = 0.0 + k[313]*y_cur[IDX_COII] + k[2989]*y_cur[IDX_HCOII] + + k[5485]*y_cur[IDX_C2OI] + k[5487]*y_cur[IDX_HCOI]; + data[jistart + 19031] = 0.0 + k[209]*y_cur[IDX_COII] + k[1459]*y_cur[IDX_HCOII] + + k[1462]*y_cur[IDX_O2II] + k[1465]*y_cur[IDX_SiOII] + + k[4874]*y_cur[IDX_O2I] + k[4874]*y_cur[IDX_O2I] + + k[4875]*y_cur[IDX_OCSI] + k[5343]*y_cur[IDX_OI]; + data[jistart + 19032] = 0.0 + k[699]*y_cur[IDX_COII] + k[3801]*y_cur[IDX_HCOII] + + k[4981]*y_cur[IDX_CI] + k[5455]*y_cur[IDX_C2H2I] - + k[5461]*y_cur[IDX_COI] + k[5462]*y_cur[IDX_CSI] + + k[5470]*y_cur[IDX_HCNI] + k[5471]*y_cur[IDX_HCOI]; + data[jistart + 19033] = 0.0 + k[602]*y_cur[IDX_COII] + k[3584]*y_cur[IDX_HCOII]; + data[jistart + 19034] = 0.0 + k[1524]*y_cur[IDX_HCOI] - k[5507]*y_cur[IDX_COI]; + data[jistart + 19035] = 0.0 + k[2082]*y_cur[IDX_HCOI] + k[2092]*y_cur[IDX_OCSI] - + k[5535]*y_cur[IDX_COI]; + data[jistart + 19036] = 0.0 + k[1566]*y_cur[IDX_HCOII] + k[3655]*y_cur[IDX_O2II] + + k[3844]*y_cur[IDX_SOII] + k[4878]*y_cur[IDX_NOI] + + k[5344]*y_cur[IDX_OI] + k[5455]*y_cur[IDX_OHI]; + data[jistart + 19037] = 0.0 + k[5117]*y_cur[IDX_HCOI] + k[5121]*y_cur[IDX_NOI] + + k[5123]*y_cur[IDX_O2I] + k[5386]*y_cur[IDX_OI] + + k[5387]*y_cur[IDX_OI]; + data[jistart + 19038] = 0.0 + k[5033]*y_cur[IDX_HCOI] + k[5043]*y_cur[IDX_OI]; + data[jistart + 19039] = 0.0 + k[5230]*y_cur[IDX_C2OI] + k[5262]*y_cur[IDX_CO2I] + + k[5265]*y_cur[IDX_HCOI]; + data[jistart + 19040] = 0.0 + k[8]*y_cur[IDX_CM] + k[130]*y_cur[IDX_C3NM] + + k[131]*y_cur[IDX_C5NM] + k[682]*y_cur[IDX_COII] + + k[3678]*y_cur[IDX_C10M] + k[3680]*y_cur[IDX_C10HII] + + k[3681]*y_cur[IDX_C10HM] + k[3685]*y_cur[IDX_C2M] + + k[3687]*y_cur[IDX_C2HM] + k[3693]*y_cur[IDX_C3M] + + k[3694]*y_cur[IDX_C3HM] + k[3698]*y_cur[IDX_C4M] + + k[3700]*y_cur[IDX_C4HM] + k[3701]*y_cur[IDX_C4H2II] + + k[3703]*y_cur[IDX_C5M] + k[3705]*y_cur[IDX_C5HM] + + k[3708]*y_cur[IDX_C6M] + k[3709]*y_cur[IDX_C6HM] + + k[3712]*y_cur[IDX_C7M] + k[3714]*y_cur[IDX_C7HM] + + k[3717]*y_cur[IDX_C8M] + k[3718]*y_cur[IDX_C8HM] + + k[3721]*y_cur[IDX_C9M] + k[3723]*y_cur[IDX_C9HM] + + k[3730]*y_cur[IDX_CO2II] + k[3731]*y_cur[IDX_CPII] + + k[3737]*y_cur[IDX_HCPII] + k[3762]*y_cur[IDX_SiNCII] + + k[5012]*y_cur[IDX_CH2I] + k[5013]*y_cur[IDX_CH2I] + + k[5043]*y_cur[IDX_CH3I] + k[5096]*y_cur[IDX_CHI] + + k[5203]*y_cur[IDX_HCNOI] + k[5340]*y_cur[IDX_C10I] + + k[5341]*y_cur[IDX_C10HI] + k[5342]*y_cur[IDX_C11I] + + k[5343]*y_cur[IDX_C2I] + k[5344]*y_cur[IDX_C2H2I] + + k[5352]*y_cur[IDX_C2HI] + k[5353]*y_cur[IDX_C2NI] + + k[5354]*y_cur[IDX_C2OI] + k[5354]*y_cur[IDX_C2OI] + + k[5355]*y_cur[IDX_C2SI] + k[5356]*y_cur[IDX_C3I] + + k[5357]*y_cur[IDX_C3HI] + k[5358]*y_cur[IDX_C3NI] + + k[5359]*y_cur[IDX_C3OI] + k[5360]*y_cur[IDX_C3PI] + + k[5361]*y_cur[IDX_C4I] + k[5362]*y_cur[IDX_C4HI] + + k[5363]*y_cur[IDX_C4NI] + k[5364]*y_cur[IDX_C4PI] + + k[5365]*y_cur[IDX_C5I] + k[5366]*y_cur[IDX_C5HI] + + k[5367]*y_cur[IDX_C5NI] + k[5368]*y_cur[IDX_C6I] + + k[5369]*y_cur[IDX_C6HI] + k[5370]*y_cur[IDX_C7I] + + k[5371]*y_cur[IDX_C7HI] + k[5373]*y_cur[IDX_C8I] + + k[5374]*y_cur[IDX_C8HI] + k[5375]*y_cur[IDX_C9I] + + k[5376]*y_cur[IDX_C9HI] + k[5378]*y_cur[IDX_CCPI] + + k[5379]*y_cur[IDX_CClI] + k[5382]*y_cur[IDX_CH2CCH2I] + + k[5384]*y_cur[IDX_CH2PHI] + k[5386]*y_cur[IDX_CNI] + + k[5387]*y_cur[IDX_CNI] + k[5389]*y_cur[IDX_CNOI] + + k[5390]*y_cur[IDX_CO2I] + k[5391]*y_cur[IDX_CPI] + + k[5392]*y_cur[IDX_CSI] + k[5395]*y_cur[IDX_H2CCCI] + + k[5401]*y_cur[IDX_HC2PI] + k[5403]*y_cur[IDX_HCNI] + + k[5406]*y_cur[IDX_HCOI] + k[5407]*y_cur[IDX_HCPI] + + k[5408]*y_cur[IDX_HCSI] + k[5428]*y_cur[IDX_OCNI] + + k[5431]*y_cur[IDX_OCSI] + k[5440]*y_cur[IDX_SiC2I] + + k[5441]*y_cur[IDX_SiC3I] + k[5442]*y_cur[IDX_SiC4I] + + k[5443]*y_cur[IDX_SiCI] + k[5452]*y_cur[IDX_SiNCI] + + k[5526]*y_cur[IDX_CI]; + data[jistart + 19041] = 0.0 + k[3090]*y_cur[IDX_C2OI] + k[3100]*y_cur[IDX_C3OI] + + k[3172]*y_cur[IDX_CH2COI] + k[3208]*y_cur[IDX_CO2I] - + k[3211]*y_cur[IDX_COI] + k[3250]*y_cur[IDX_HCOI] + + k[3295]*y_cur[IDX_OCSI] + k[5642]*y_cur[IDX_CH3COI] + + k[5648]*y_cur[IDX_COOHI] + k[5654]*y_cur[IDX_COOCH3I] + + k[5659]*y_cur[IDX_CH2OHCOI]; + data[jistart + 19042] = 0.0 + k[1313]*y_cur[IDX_C3OI] + k[1387]*y_cur[IDX_CO2I] + + k[1390]*y_cur[IDX_H2COI] + k[1408]*y_cur[IDX_HCOI] + + k[1423]*y_cur[IDX_O2I] + k[1425]*y_cur[IDX_OCSI] + + k[1427]*y_cur[IDX_SO2I] + k[1429]*y_cur[IDX_SOI] + + k[1447]*y_cur[IDX_SiOI]; + data[jistart + 19043] = 0.0 + k[478]*y_cur[IDX_COII] + k[2528]*y_cur[IDX_C3HII] + + k[2533]*y_cur[IDX_C4NII] + k[2547]*y_cur[IDX_HCOII]; + data[jistart + 19044] = 0.0 + k[2345]*y_cur[IDX_HCOI] + k[2348]*y_cur[IDX_HNCOI] + + k[2356]*y_cur[IDX_OCSI]; + data[jistart + 19045] = 0.0 + k[56]*y_cur[IDX_OM] + k[246]*y_cur[IDX_COII] + + k[1904]*y_cur[IDX_HCOII] + k[1932]*y_cur[IDX_SiOII] + + k[4918]*y_cur[IDX_C2OI] + k[4922]*y_cur[IDX_C3OI] - + k[4957]*y_cur[IDX_COI] + k[4963]*y_cur[IDX_HCOI] + + k[4964]*y_cur[IDX_HPOI] + k[4975]*y_cur[IDX_NOI] + + k[4978]*y_cur[IDX_O2I] + k[4979]*y_cur[IDX_OCNI] + + k[4980]*y_cur[IDX_OCSI] + k[4981]*y_cur[IDX_OHI] + + k[4985]*y_cur[IDX_SO2I] + k[4987]*y_cur[IDX_SOI] + + k[5214]*y_cur[IDX_HNCOI] + k[5215]*y_cur[IDX_HOCNI] + + k[5526]*y_cur[IDX_OI]; + data[jistart + 19046] = 0.0 + k[1097]*y_cur[IDX_eM] + k[1459]*y_cur[IDX_C2I] + + k[1566]*y_cur[IDX_C2H2I] + k[1644]*y_cur[IDX_C2H3I] + + k[1708]*y_cur[IDX_C2H4I] + k[1746]*y_cur[IDX_C2HI] + + k[1904]*y_cur[IDX_CI] + k[2008]*y_cur[IDX_CH2I] + + k[2253]*y_cur[IDX_CHI] + k[2547]*y_cur[IDX_H2OI] + + k[2877]*y_cur[IDX_HCNI] + k[2899]*y_cur[IDX_C10I] + + k[2900]*y_cur[IDX_C10H2I] + k[2901]*y_cur[IDX_C10HI] + + k[2902]*y_cur[IDX_C2H5I] + k[2903]*y_cur[IDX_C2H5OHI] + + k[2904]*y_cur[IDX_C2OI] + k[2905]*y_cur[IDX_C2SI] + + k[2906]*y_cur[IDX_C3I] + k[2907]*y_cur[IDX_C3H2I] + + k[2908]*y_cur[IDX_C3HI] + k[2909]*y_cur[IDX_C3NI] + + k[2910]*y_cur[IDX_C3OI] + k[2911]*y_cur[IDX_C3PI] + + k[2912]*y_cur[IDX_C3SI] + k[2913]*y_cur[IDX_C4I] + + k[2914]*y_cur[IDX_C4H3I] + k[2915]*y_cur[IDX_C4HI] + + k[2916]*y_cur[IDX_C4PI] + k[2917]*y_cur[IDX_C4SI] + + k[2918]*y_cur[IDX_C5I] + k[2919]*y_cur[IDX_C5H2I] + + k[2920]*y_cur[IDX_C5HI] + k[2921]*y_cur[IDX_C5NI] + + k[2922]*y_cur[IDX_C6I] + k[2923]*y_cur[IDX_C6H2I] + + k[2924]*y_cur[IDX_C6H6I] + k[2925]*y_cur[IDX_C6HI] + + k[2926]*y_cur[IDX_C7I] + k[2927]*y_cur[IDX_C7H2I] + + k[2928]*y_cur[IDX_C7HI] + k[2929]*y_cur[IDX_C7NI] + + k[2930]*y_cur[IDX_C8I] + k[2931]*y_cur[IDX_C8H2I] + + k[2932]*y_cur[IDX_C8HI] + k[2933]*y_cur[IDX_C9I] + + k[2934]*y_cur[IDX_C9H2I] + k[2935]*y_cur[IDX_C9HI] + + k[2936]*y_cur[IDX_C9NI] + k[2937]*y_cur[IDX_CCPI] + + k[2938]*y_cur[IDX_CH2CCHI] + k[2939]*y_cur[IDX_CH2CHCNI] + + k[2940]*y_cur[IDX_CH2COI] + k[2941]*y_cur[IDX_CH2NHI] + + k[2942]*y_cur[IDX_CH2PHI] + k[2943]*y_cur[IDX_CH3C3NI] + + k[2944]*y_cur[IDX_CH3C4HI] + k[2945]*y_cur[IDX_CH3C5NI] + + k[2946]*y_cur[IDX_CH3C6HI] + k[2947]*y_cur[IDX_CH3C7NI] + + k[2948]*y_cur[IDX_CH3CCHI] + k[2949]*y_cur[IDX_C2H6I] + + k[2950]*y_cur[IDX_CH3CHOI] + k[2951]*y_cur[IDX_CH3CNI] + + k[2952]*y_cur[IDX_CH3COCH3I] + k[2953]*y_cur[IDX_CH3OCH3I] + + k[2954]*y_cur[IDX_CH3OHI] + k[2955]*y_cur[IDX_CPI] + + k[2956]*y_cur[IDX_CSI] + k[2957]*y_cur[IDX_H2CCCI] + + k[2958]*y_cur[IDX_H2COI] + k[2959]*y_cur[IDX_H2CSI] + + k[2960]*y_cur[IDX_H2S2I] + k[2961]*y_cur[IDX_H2SI] + + k[2962]*y_cur[IDX_H2SiOI] + k[2963]*y_cur[IDX_HC2PI] + + k[2964]*y_cur[IDX_HC3NI] + k[2965]*y_cur[IDX_C4H2I] + + k[2966]*y_cur[IDX_HC5NI] + k[2967]*y_cur[IDX_HC7NI] + + k[2968]*y_cur[IDX_HC9NI] + k[2969]*y_cur[IDX_HCOI] + + k[2970]*y_cur[IDX_HCOOCH3I] + k[2971]*y_cur[IDX_HCOOHI] + + k[2972]*y_cur[IDX_HCPI] + k[2973]*y_cur[IDX_HCSiI] + + k[2974]*y_cur[IDX_HNSiI] + k[2975]*y_cur[IDX_HPOI] + + k[2976]*y_cur[IDX_HS2I] + k[2977]*y_cur[IDX_HSI] + + k[2978]*y_cur[IDX_N2OI] + k[2979]*y_cur[IDX_NCCNI] + + k[2980]*y_cur[IDX_NH2CNI] + k[2981]*y_cur[IDX_NSI] + + k[2982]*y_cur[IDX_OCSI] + k[2983]*y_cur[IDX_PI] + + k[2984]*y_cur[IDX_PH2I] + k[2985]*y_cur[IDX_PHI] + + k[2986]*y_cur[IDX_PNI] + k[2987]*y_cur[IDX_POI] + + k[2988]*y_cur[IDX_S2I] + k[2989]*y_cur[IDX_SI] + + k[2990]*y_cur[IDX_SOI] + k[2991]*y_cur[IDX_SiC2I] + + k[2992]*y_cur[IDX_SiC2H2I] + k[2993]*y_cur[IDX_SiC2HI] + + k[2994]*y_cur[IDX_SiC3I] + k[2995]*y_cur[IDX_SiC3HI] + + k[2996]*y_cur[IDX_SiC4I] + k[2997]*y_cur[IDX_SiCI] + + k[2998]*y_cur[IDX_SiCH2I] + k[2999]*y_cur[IDX_SiCH3I] + + k[3000]*y_cur[IDX_SiH2I] + k[3001]*y_cur[IDX_SiH4I] + + k[3002]*y_cur[IDX_SiHI] + k[3003]*y_cur[IDX_SiNCI] + + k[3004]*y_cur[IDX_SiO2I] + k[3005]*y_cur[IDX_SiOI] + + k[3006]*y_cur[IDX_SiSI] + k[3029]*y_cur[IDX_HNC3I] + + k[3041]*y_cur[IDX_HNCI] + k[3542]*y_cur[IDX_NH2I] + + k[3584]*y_cur[IDX_NH3I] + k[3614]*y_cur[IDX_NHI] + + k[3801]*y_cur[IDX_OHI] + k[3881]*y_cur[IDX_SiI] + + k[3904]*y_cur[IDX_CM] + k[3939]*y_cur[IDX_C10M] + + k[3974]*y_cur[IDX_C10HM] + k[4009]*y_cur[IDX_C2M] + + k[4044]*y_cur[IDX_C2HM] + k[4079]*y_cur[IDX_C3M] + + k[4114]*y_cur[IDX_C3HM] + k[4149]*y_cur[IDX_C3NM] + + k[4184]*y_cur[IDX_C4M] + k[4219]*y_cur[IDX_C4HM] + + k[4254]*y_cur[IDX_C5M] + k[4289]*y_cur[IDX_C5HM] + + k[4324]*y_cur[IDX_C5NM] + k[4359]*y_cur[IDX_C6M] + + k[4394]*y_cur[IDX_C6HM] + k[4429]*y_cur[IDX_C7M] + + k[4464]*y_cur[IDX_C7HM] + k[4499]*y_cur[IDX_C8M] + + k[4534]*y_cur[IDX_C8HM] + k[4569]*y_cur[IDX_C9M] + + k[4604]*y_cur[IDX_C9HM] + k[4639]*y_cur[IDX_CHM] + + k[4674]*y_cur[IDX_CNM] + k[4710]*y_cur[IDX_HM] + + k[4745]*y_cur[IDX_OM] + k[4780]*y_cur[IDX_O2M] + + k[4815]*y_cur[IDX_OHM] + k[4850]*y_cur[IDX_SM] + + k[5630]*y_cur[IDX_CH3OI] + k[5636]*y_cur[IDX_CH2OHI] + + k[5641]*y_cur[IDX_CH3COI] + k[5646]*y_cur[IDX_COOHI] + + k[5652]*y_cur[IDX_COOCH3I] + k[5658]*y_cur[IDX_CH2OHCOI] + + k[5664]*y_cur[IDX_CH2OHCHOI] + k[5670]*y_cur[IDX_CH3COOHI] + + k[6389]*y_cur[IDX_GRAINM]; + data[jistart + 19047] = 0.0 + k[2664]*y_cur[IDX_CH3COCH3I] - k[2675]*y_cur[IDX_COI] - + k[2676]*y_cur[IDX_COI] + k[2699]*y_cur[IDX_HCOOHI]; + data[jistart + 19048] = 0.0 - k[65]*y_cur[IDX_SM] - k[73]*y_cur[IDX_HM] - + k[124]*y_cur[IDX_OM] - k[299]*y_cur[IDX_CNII] - + k[316]*y_cur[IDX_N2II] - k[445]*y_cur[IDX_H2II] - + k[549]*y_cur[IDX_NII] - k[653]*y_cur[IDX_OII] - + k[2140]*y_cur[IDX_CH4II] - k[2224]*y_cur[IDX_CH5II] - + k[2283]*y_cur[IDX_CH3CNII] - k[2284]*y_cur[IDX_H2ClII] - + k[2285]*y_cur[IDX_HCO2II] - k[2286]*y_cur[IDX_HNOII] - + k[2287]*y_cur[IDX_HNSiII] - k[2288]*y_cur[IDX_N2HII] - + k[2289]*y_cur[IDX_O2HII] - k[2290]*y_cur[IDX_SO2II] - + k[2291]*y_cur[IDX_SiH4II] - k[2292]*y_cur[IDX_SiOII] - + k[2383]*y_cur[IDX_H2II] - k[2507]*y_cur[IDX_H2OII] - + k[2675]*y_cur[IDX_H3II] - k[2676]*y_cur[IDX_H3II] - + k[2854]*y_cur[IDX_HCNII] - k[3211]*y_cur[IDX_HeII] - + k[3344]*y_cur[IDX_NII] - k[3485]*y_cur[IDX_NHII] - + k[3486]*y_cur[IDX_NHII] - k[3777]*y_cur[IDX_OHII] - + k[4957]*y_cur[IDX_CI] - k[5127]*y_cur[IDX_HNOI] - + k[5128]*y_cur[IDX_N2OI] - k[5129]*y_cur[IDX_NO2I] - + k[5130]*y_cur[IDX_O2I] - k[5131]*y_cur[IDX_O2HI] - + k[5163]*y_cur[IDX_HI] - k[5461]*y_cur[IDX_OHI] - + k[5492]*y_cur[IDX_SiI] - k[5507]*y_cur[IDX_C2H2II] - + k[5513]*y_cur[IDX_C2H3II] - k[5535]*y_cur[IDX_CH3II] - + k[5545]*y_cur[IDX_CH5II] - k[5676] - k[5826] - k[6138] - k[6918]; + data[jistart + 19049] = 0.0 + k[6389]*y_cur[IDX_HCOII] + k[6390]*y_cur[IDX_HOCII] + + k[6399]*y_cur[IDX_H2COII] + k[6400]*y_cur[IDX_H2COII] + + k[6416]*y_cur[IDX_H3COII] + k[6474]*y_cur[IDX_C2OII] + + k[6488]*y_cur[IDX_HC2OII] + k[6489]*y_cur[IDX_HC2OII] + + k[6494]*y_cur[IDX_CH2COII] + k[6495]*y_cur[IDX_OCNII] + + k[6519]*y_cur[IDX_CH3COII] + k[6522]*y_cur[IDX_HNCOII] + + k[6539]*y_cur[IDX_H2NCOII] + k[6540]*y_cur[IDX_CO2II] + + k[6564]*y_cur[IDX_CH3CHOHII] + k[6567]*y_cur[IDX_HCO2II] + + k[6568]*y_cur[IDX_HCO2II] + k[6644]*y_cur[IDX_C3OII] + + k[6656]*y_cur[IDX_C3H2OII] + k[6684]*y_cur[IDX_CH3COCH3II] + + k[6694]*y_cur[IDX_COOCH3II] + k[6695]*y_cur[IDX_COOCH3II] + + k[6696]*y_cur[IDX_CH2OHCOII] + k[6697]*y_cur[IDX_CH2OHCOII] + + k[6698]*y_cur[IDX_CH2OHCOII] + k[6699]*y_cur[IDX_HCOOCH3II] + + k[6702]*y_cur[IDX_CH2OHCHOII] + k[6708]*y_cur[IDX_OCSII] + + k[6711]*y_cur[IDX_CH3COOHII] + k[6731]*y_cur[IDX_CH3COOH2II] + + k[6732]*y_cur[IDX_CH3COOH2II]; + data[jistart + 19050] = 0.0 + k[785]*y_cur[IDX_C2OII] + k[797]*y_cur[IDX_C3H2OII] + + k[815]*y_cur[IDX_C3OII] + k[920]*y_cur[IDX_CH2COII] + + k[942]*y_cur[IDX_CH3CHOHII] + k[949]*y_cur[IDX_CH3COII] + + k[951]*y_cur[IDX_CH3COCH3II] + k[981]*y_cur[IDX_CO2II] + + k[982]*y_cur[IDX_HCOOCH3II] + k[997]*y_cur[IDX_H2COII] + + k[998]*y_cur[IDX_H2COII] + k[1009]*y_cur[IDX_H2NCOII] + + k[1036]*y_cur[IDX_H3COII] + k[1057]*y_cur[IDX_HC2OII] + + k[1058]*y_cur[IDX_HC2OII] + k[1097]*y_cur[IDX_HCOII] + + k[1099]*y_cur[IDX_HCO2II] + k[1100]*y_cur[IDX_HCO2II] + + k[1116]*y_cur[IDX_HNCOII] + k[1125]*y_cur[IDX_HOCII] + + k[1176]*y_cur[IDX_OCNII] + k[1179]*y_cur[IDX_OCSII] + + k[1270]*y_cur[IDX_COOCH3II] + k[1271]*y_cur[IDX_COOCH3II] + + k[1272]*y_cur[IDX_CH2OHCOII] + k[1273]*y_cur[IDX_CH2OHCOII] + + k[1274]*y_cur[IDX_CH2OHCOII] + k[1276]*y_cur[IDX_CH2OHCHOII] + + k[1284]*y_cur[IDX_CH3COOHII] + k[1290]*y_cur[IDX_CH3COOH2II] + + k[1291]*y_cur[IDX_CH3COOH2II]; + data[jistart + 19051] = 0.0 + k[488]*y_cur[IDX_COII] + k[5157]*y_cur[IDX_CH2COI] + + k[5162]*y_cur[IDX_CO2I] - k[5163]*y_cur[IDX_COI] + + k[5171]*y_cur[IDX_HCOI] + k[5195]*y_cur[IDX_OCNI] + + k[5197]*y_cur[IDX_OCSI]; + data[jistart + 19052] = 0.0 - k[6769]*y_cur[IDX_GRAINM]; + data[jistart + 19053] = 0.0 - k[6655]*y_cur[IDX_GRAINM] - k[6656]*y_cur[IDX_GRAINM]; + data[jistart + 19054] = 0.0 - k[6423]*y_cur[IDX_GRAINM]; + data[jistart + 19055] = 0.0 - k[6632]*y_cur[IDX_GRAINM]; + data[jistart + 19056] = 0.0 - k[6666]*y_cur[IDX_GRAINM]; + data[jistart + 19057] = 0.0 - k[6348]*y_cur[IDX_GRAINM]; + data[jistart + 19058] = 0.0 - k[6592]*y_cur[IDX_GRAINM]; + data[jistart + 19059] = 0.0 - k[6853]*y_cur[IDX_GRAINM] - k[6854]*y_cur[IDX_GRAINM]; + data[jistart + 19060] = 0.0 - k[6865]*y_cur[IDX_GRAINM] - k[6866]*y_cur[IDX_GRAINM]; + data[jistart + 19061] = 0.0 - k[6760]*y_cur[IDX_GRAINM]; + data[jistart + 19062] = 0.0 - k[6349]*y_cur[IDX_GRAINM] - k[6350]*y_cur[IDX_GRAINM]; + data[jistart + 19063] = 0.0 - k[6809]*y_cur[IDX_GRAINM] - k[6810]*y_cur[IDX_GRAINM]; + data[jistart + 19064] = 0.0 - k[6784]*y_cur[IDX_GRAINM]; + data[jistart + 19065] = 0.0 - k[6806]*y_cur[IDX_GRAINM]; + data[jistart + 19066] = 0.0 - k[6651]*y_cur[IDX_GRAINM]; + data[jistart + 19067] = 0.0 - k[6694]*y_cur[IDX_GRAINM] - k[6695]*y_cur[IDX_GRAINM]; + data[jistart + 19068] = 0.0 - k[6347]*y_cur[IDX_GRAINM]; + data[jistart + 19069] = 0.0 - k[6536]*y_cur[IDX_GRAINM] - k[6537]*y_cur[IDX_GRAINM]; + data[jistart + 19070] = 0.0 - k[6538]*y_cur[IDX_GRAINM] - k[6539]*y_cur[IDX_GRAINM]; + data[jistart + 19071] = 0.0 - k[6545]*y_cur[IDX_GRAINM] - k[6546]*y_cur[IDX_GRAINM]; + data[jistart + 19072] = 0.0 - k[6689]*y_cur[IDX_GRAINM] - k[6690]*y_cur[IDX_GRAINM] - + k[6691]*y_cur[IDX_GRAINM]; + data[jistart + 19073] = 0.0 - k[6840]*y_cur[IDX_GRAINM]; + data[jistart + 19074] = 0.0 - k[6875]*y_cur[IDX_GRAINM]; + data[jistart + 19075] = 0.0 - k[6405]*y_cur[IDX_GRAINM] - k[6406]*y_cur[IDX_GRAINM]; + data[jistart + 19076] = 0.0 - k[6745]*y_cur[IDX_GRAINM]; + data[jistart + 19077] = 0.0 - k[6624]*y_cur[IDX_GRAINM]; + data[jistart + 19078] = 0.0 - k[6431]*y_cur[IDX_GRAINM] - k[6432]*y_cur[IDX_GRAINM]; + data[jistart + 19079] = 0.0 - k[6456]*y_cur[IDX_GRAINM]; + data[jistart + 19080] = 0.0 - k[6589]*y_cur[IDX_GRAINM]; + data[jistart + 19081] = 0.0 - k[6390]*y_cur[IDX_GRAINM]; + data[jistart + 19082] = 0.0 - k[6625]*y_cur[IDX_GRAINM]; + data[jistart + 19083] = 0.0 - k[6723]*y_cur[IDX_GRAINM] - k[6724]*y_cur[IDX_GRAINM]; + data[jistart + 19084] = 0.0 - k[6526]*y_cur[IDX_GRAINM] - k[6527]*y_cur[IDX_GRAINM]; + data[jistart + 19085] = 0.0 - k[6576]*y_cur[IDX_GRAINM] - k[6577]*y_cur[IDX_GRAINM]; + data[jistart + 19086] = 0.0 - k[6474]*y_cur[IDX_GRAINM]; + data[jistart + 19087] = 0.0 - k[6696]*y_cur[IDX_GRAINM] - k[6697]*y_cur[IDX_GRAINM] - + k[6698]*y_cur[IDX_GRAINM]; + data[jistart + 19088] = 0.0 - k[6744]*y_cur[IDX_GRAINM]; + data[jistart + 19089] = 0.0 - k[6532]*y_cur[IDX_GRAINM] - k[6533]*y_cur[IDX_GRAINM] - + k[6534]*y_cur[IDX_GRAINM]; + data[jistart + 19090] = 0.0 - k[6549]*y_cur[IDX_GRAINM] - k[6550]*y_cur[IDX_GRAINM] - + k[6551]*y_cur[IDX_GRAINM]; + data[jistart + 19091] = 0.0 - k[6524]*y_cur[IDX_GRAINM] - k[6525]*y_cur[IDX_GRAINM]; + data[jistart + 19092] = 0.0 - k[6313]*y_cur[IDX_GRAINM]; + data[jistart + 19093] = 0.0 - k[6685]*y_cur[IDX_GRAINM] - k[6686]*y_cur[IDX_GRAINM] - + k[6687]*y_cur[IDX_GRAINM]; + data[jistart + 19094] = 0.0 - k[6560]*y_cur[IDX_GRAINM]; + data[jistart + 19095] = 0.0 - k[6617]*y_cur[IDX_GRAINM] - k[6618]*y_cur[IDX_GRAINM] - + k[6619]*y_cur[IDX_GRAINM]; + data[jistart + 19096] = 0.0 - k[6688]*y_cur[IDX_GRAINM]; + data[jistart + 19097] = 0.0 - k[6849]*y_cur[IDX_GRAINM] - k[6850]*y_cur[IDX_GRAINM]; + data[jistart + 19098] = 0.0 - k[6880]*y_cur[IDX_GRAINM] - k[6881]*y_cur[IDX_GRAINM]; + data[jistart + 19099] = 0.0 - k[6770]*y_cur[IDX_GRAINM] - k[6771]*y_cur[IDX_GRAINM]; + data[jistart + 19100] = 0.0 - k[6520]*y_cur[IDX_GRAINM] - k[6521]*y_cur[IDX_GRAINM]; + data[jistart + 19101] = 0.0 - k[6578]*y_cur[IDX_GRAINM] - k[6579]*y_cur[IDX_GRAINM] - + k[6580]*y_cur[IDX_GRAINM]; + data[jistart + 19102] = 0.0 - k[6593]*y_cur[IDX_GRAINM] - k[6594]*y_cur[IDX_GRAINM] - + k[6595]*y_cur[IDX_GRAINM]; + data[jistart + 19103] = 0.0 - k[6878]*y_cur[IDX_GRAINM] - k[6879]*y_cur[IDX_GRAINM]; + data[jistart + 19104] = 0.0 - k[6671]*y_cur[IDX_GRAINM] - k[6672]*y_cur[IDX_GRAINM] - + k[6673]*y_cur[IDX_GRAINM]; + data[jistart + 19105] = 0.0 - k[6599]*y_cur[IDX_GRAINM]; + data[jistart + 19106] = 0.0 - k[6408]*y_cur[IDX_GRAINM] - k[6409]*y_cur[IDX_GRAINM]; + data[jistart + 19107] = 0.0 - k[6727]*y_cur[IDX_GRAINM] - k[6728]*y_cur[IDX_GRAINM] - + k[6729]*y_cur[IDX_GRAINM] - k[6730]*y_cur[IDX_GRAINM]; + data[jistart + 19108] = 0.0 - k[6834]*y_cur[IDX_GRAINM] - k[6835]*y_cur[IDX_GRAINM]; + data[jistart + 19109] = 0.0 - k[6867]*y_cur[IDX_GRAINM] - k[6868]*y_cur[IDX_GRAINM]; + data[jistart + 19110] = 0.0 - k[6585]*y_cur[IDX_GRAINM] - k[6586]*y_cur[IDX_GRAINM]; + data[jistart + 19111] = 0.0 - k[6804]*y_cur[IDX_GRAINM] - k[6805]*y_cur[IDX_GRAINM]; + data[jistart + 19112] = 0.0 - k[6514]*y_cur[IDX_GRAINM] - k[6515]*y_cur[IDX_GRAINM]; + data[jistart + 19113] = 0.0 - k[6711]*y_cur[IDX_GRAINM] - k[6712]*y_cur[IDX_GRAINM] - + k[6713]*y_cur[IDX_GRAINM] - k[6714]*y_cur[IDX_GRAINM] - + k[6715]*y_cur[IDX_GRAINM] - k[6716]*y_cur[IDX_GRAINM]; + data[jistart + 19114] = 0.0 - k[6454]*y_cur[IDX_GRAINM]; + data[jistart + 19115] = 0.0 - k[6457]*y_cur[IDX_GRAINM] - k[6458]*y_cur[IDX_GRAINM]; + data[jistart + 19116] = 0.0 - k[6882]*y_cur[IDX_GRAINM] - k[6883]*y_cur[IDX_GRAINM]; + data[jistart + 19117] = 0.0 - k[6725]*y_cur[IDX_GRAINM] - k[6726]*y_cur[IDX_GRAINM]; + data[jistart + 19118] = 0.0 - k[6574]*y_cur[IDX_GRAINM] - k[6575]*y_cur[IDX_GRAINM]; + data[jistart + 19119] = 0.0 - k[6571]*y_cur[IDX_GRAINM] - k[6572]*y_cur[IDX_GRAINM] - + k[6573]*y_cur[IDX_GRAINM]; + data[jistart + 19120] = 0.0 - k[6674]*y_cur[IDX_GRAINM] - k[6675]*y_cur[IDX_GRAINM]; + data[jistart + 19121] = 0.0 - k[6775]*y_cur[IDX_GRAINM] - k[6776]*y_cur[IDX_GRAINM] - + k[6777]*y_cur[IDX_GRAINM]; + data[jistart + 19122] = 0.0 - k[6731]*y_cur[IDX_GRAINM] - k[6732]*y_cur[IDX_GRAINM] - + k[6733]*y_cur[IDX_GRAINM] - k[6734]*y_cur[IDX_GRAINM] - + k[6735]*y_cur[IDX_GRAINM] - k[6736]*y_cur[IDX_GRAINM] - + k[6737]*y_cur[IDX_GRAINM]; + data[jistart + 19123] = 0.0 - k[6587]*y_cur[IDX_GRAINM] - k[6588]*y_cur[IDX_GRAINM]; + data[jistart + 19124] = 0.0 - k[6851]*y_cur[IDX_GRAINM] - k[6852]*y_cur[IDX_GRAINM]; + data[jistart + 19125] = 0.0 - k[6590]*y_cur[IDX_GRAINM] - k[6591]*y_cur[IDX_GRAINM]; + data[jistart + 19126] = 0.0 - k[6755]*y_cur[IDX_GRAINM] - k[6756]*y_cur[IDX_GRAINM] - + k[6757]*y_cur[IDX_GRAINM]; + data[jistart + 19127] = 0.0 - k[6765]*y_cur[IDX_GRAINM] - k[6766]*y_cur[IDX_GRAINM]; + data[jistart + 19128] = 0.0 - k[6603]*y_cur[IDX_GRAINM] - k[6604]*y_cur[IDX_GRAINM] - + k[6605]*y_cur[IDX_GRAINM]; + data[jistart + 19129] = 0.0 - k[6843]*y_cur[IDX_GRAINM] - k[6844]*y_cur[IDX_GRAINM]; + data[jistart + 19130] = 0.0 - k[6876]*y_cur[IDX_GRAINM] - k[6877]*y_cur[IDX_GRAINM]; + data[jistart + 19131] = 0.0 - k[6522]*y_cur[IDX_GRAINM] - k[6523]*y_cur[IDX_GRAINM]; + data[jistart + 19132] = 0.0 - k[6584]*y_cur[IDX_GRAINM]; + data[jistart + 19133] = 0.0 - k[6772]*y_cur[IDX_GRAINM] - k[6773]*y_cur[IDX_GRAINM] - + k[6774]*y_cur[IDX_GRAINM]; + data[jistart + 19134] = 0.0 - k[6596]*y_cur[IDX_GRAINM] - k[6597]*y_cur[IDX_GRAINM] - + k[6598]*y_cur[IDX_GRAINM]; + data[jistart + 19135] = 0.0 - k[6426]*y_cur[IDX_GRAINM] - k[6427]*y_cur[IDX_GRAINM]; + data[jistart + 19136] = 0.0 - k[6606]*y_cur[IDX_GRAINM] - k[6607]*y_cur[IDX_GRAINM] - + k[6608]*y_cur[IDX_GRAINM] - k[6609]*y_cur[IDX_GRAINM]; + data[jistart + 19137] = 0.0 - k[6419]*y_cur[IDX_GRAINM] - k[6420]*y_cur[IDX_GRAINM]; + data[jistart + 19138] = 0.0 - k[6662]*y_cur[IDX_GRAINM] - k[6663]*y_cur[IDX_GRAINM]; + data[jistart + 19139] = 0.0 - k[6657]*y_cur[IDX_GRAINM] - k[6658]*y_cur[IDX_GRAINM] - + k[6659]*y_cur[IDX_GRAINM]; + data[jistart + 19140] = 0.0 - k[6622]*y_cur[IDX_GRAINM] - k[6623]*y_cur[IDX_GRAINM]; + data[jistart + 19141] = 0.0 - k[6699]*y_cur[IDX_GRAINM] - k[6700]*y_cur[IDX_GRAINM]; + data[jistart + 19142] = 0.0 - k[6558]*y_cur[IDX_GRAINM] - k[6559]*y_cur[IDX_GRAINM]; + data[jistart + 19143] = 0.0 - k[6528]*y_cur[IDX_GRAINM] - k[6529]*y_cur[IDX_GRAINM] - k[6530]*y_cur[IDX_GRAINM]; - data[jistart + 16522] = 0.0 + k[659]*y_cur[IDX_N2OI]; - data[jistart + 16523] = 0.0 - k[1170]*y_cur[IDX_N2OII] - - k[1171]*y_cur[IDX_N2OII] - k[1172]*y_cur[IDX_N2OII]; - data[jistart + 16524] = 0.0 - k[4968]*y_cur[IDX_NCCNI]; - data[jistart + 16525] = 0.0 - k[183]*y_cur[IDX_NCCNI] - - k[184]*y_cur[IDX_NCCNI]; - data[jistart + 16526] = 0.0 - k[4903]*y_cur[IDX_NCCNI]; - data[jistart + 16527] = 0.0 + k[1542]*y_cur[IDX_C2N2II]; - data[jistart + 16528] = 0.0 - k[1624]*y_cur[IDX_NCCNI]; - data[jistart + 16529] = 0.0 + k[234]*y_cur[IDX_C2N2II] + - k[1709]*y_cur[IDX_NCCNHII]; - data[jistart + 16530] = 0.0 + k[234]*y_cur[IDX_C2H4I] + - k[1542]*y_cur[IDX_C2H2I] + k[2865]*y_cur[IDX_HCNI]; - data[jistart + 16531] = 0.0 - k[4908]*y_cur[IDX_NCCNI]; - data[jistart + 16532] = 0.0 - k[5541]*y_cur[IDX_NCCNI]; - data[jistart + 16533] = 0.0 + k[2128]*y_cur[IDX_NCCNHII]; - data[jistart + 16534] = 0.0 + k[5116]*y_cur[IDX_HCNI] + - k[5118]*y_cur[IDX_HNCI]; - data[jistart + 16535] = 0.0 + k[7187] + k[7369] + k[7551]; - data[jistart + 16536] = 0.0 + k[6653]*y_cur[IDX_NCCNHII] + - k[6769]*y_cur[IDX_NCCNCH3II]; - data[jistart + 16537] = 0.0 - k[5181]*y_cur[IDX_NCCNI]; - data[jistart + 16538] = 0.0 + k[2560]*y_cur[IDX_NCCNHII]; - data[jistart + 16539] = 0.0 - k[2720]*y_cur[IDX_NCCNI]; - data[jistart + 16540] = 0.0 + k[2865]*y_cur[IDX_C2N2II] + - k[2882]*y_cur[IDX_NCCNHII] + k[5116]*y_cur[IDX_CNI]; - data[jistart + 16541] = 0.0 - k[2979]*y_cur[IDX_NCCNI]; - data[jistart + 16542] = 0.0 + k[5118]*y_cur[IDX_CNI]; - data[jistart + 16543] = 0.0 - k[3279]*y_cur[IDX_NCCNI]; - data[jistart + 16544] = 0.0 - k[5273]*y_cur[IDX_NCCNI]; - data[jistart + 16545] = 0.0 - k[3351]*y_cur[IDX_NCCNI] - - k[3352]*y_cur[IDX_NCCNI]; - data[jistart + 16546] = 0.0 - k[3375]*y_cur[IDX_NCCNI]; - data[jistart + 16547] = 0.0 - k[183]*y_cur[IDX_CII] - - k[184]*y_cur[IDX_CII] - k[1624]*y_cur[IDX_C2H3II] - - k[2720]*y_cur[IDX_H3II] - k[2979]*y_cur[IDX_HCOII] - - k[3279]*y_cur[IDX_HeII] - k[3351]*y_cur[IDX_NII] - - k[3352]*y_cur[IDX_NII] - k[3375]*y_cur[IDX_N2HII] - - k[3870]*y_cur[IDX_SiII] - k[4903]*y_cur[IDX_C2HI] - - k[4908]*y_cur[IDX_C4HI] - k[4968]*y_cur[IDX_CI] - - k[5181]*y_cur[IDX_HI] - k[5273]*y_cur[IDX_NI] - - k[5475]*y_cur[IDX_OHI] - k[5541]*y_cur[IDX_CH3II] - k[5881] - - k[6215] - k[6216] - k[7005]; - data[jistart + 16548] = 0.0 + k[1155]*y_cur[IDX_eM] + - k[6769]*y_cur[IDX_GRAINM]; - data[jistart + 16549] = 0.0 + k[1157]*y_cur[IDX_eM] + - k[1709]*y_cur[IDX_C2H4I] + k[2128]*y_cur[IDX_CH3OHI] + - k[2560]*y_cur[IDX_H2OI] + k[2882]*y_cur[IDX_HCNI] + - k[3593]*y_cur[IDX_NH3I] + k[6653]*y_cur[IDX_GRAINM]; - data[jistart + 16550] = 0.0 + k[3593]*y_cur[IDX_NCCNHII]; - data[jistart + 16551] = 0.0 - k[5475]*y_cur[IDX_NCCNI]; - data[jistart + 16552] = 0.0 - k[3870]*y_cur[IDX_NCCNI]; - data[jistart + 16553] = 0.0 + k[1155]*y_cur[IDX_NCCNCH3II] + - k[1157]*y_cur[IDX_NCCNHII]; - data[jistart + 16554] = 0.0 + k[5541]*y_cur[IDX_NCCNI]; - data[jistart + 16555] = 0.0 - k[6769]*y_cur[IDX_NCCNCH3II]; - data[jistart + 16556] = 0.0 + k[5541]*y_cur[IDX_CH3II]; - data[jistart + 16557] = 0.0 - k[1155]*y_cur[IDX_eM] - - k[6769]*y_cur[IDX_GRAINM]; - data[jistart + 16558] = 0.0 - k[1155]*y_cur[IDX_NCCNCH3II]; - data[jistart + 16559] = 0.0 + k[1624]*y_cur[IDX_NCCNI]; - data[jistart + 16560] = 0.0 - k[1709]*y_cur[IDX_NCCNHII]; - data[jistart + 16561] = 0.0 + k[2404]*y_cur[IDX_H2I] + - k[2527]*y_cur[IDX_H2OI] + k[2866]*y_cur[IDX_HCNI]; - data[jistart + 16562] = 0.0 - k[2128]*y_cur[IDX_NCCNHII]; - data[jistart + 16563] = 0.0 - k[6652]*y_cur[IDX_NCCNHII] - - k[6653]*y_cur[IDX_NCCNHII]; - data[jistart + 16564] = 0.0 + k[2404]*y_cur[IDX_C2N2II]; - data[jistart + 16565] = 0.0 + k[2527]*y_cur[IDX_C2N2II] - - k[2560]*y_cur[IDX_NCCNHII]; - data[jistart + 16566] = 0.0 + k[2720]*y_cur[IDX_NCCNI]; - data[jistart + 16567] = 0.0 + k[2866]*y_cur[IDX_C2N2II] - - k[2882]*y_cur[IDX_NCCNHII]; - data[jistart + 16568] = 0.0 + k[2979]*y_cur[IDX_NCCNI]; - data[jistart + 16569] = 0.0 + k[3375]*y_cur[IDX_NCCNI]; - data[jistart + 16570] = 0.0 + k[1624]*y_cur[IDX_C2H3II] + - k[2720]*y_cur[IDX_H3II] + k[2979]*y_cur[IDX_HCOII] + - k[3375]*y_cur[IDX_N2HII]; - data[jistart + 16571] = 0.0 - k[1156]*y_cur[IDX_eM] - - k[1157]*y_cur[IDX_eM] - k[1709]*y_cur[IDX_C2H4I] - - k[2128]*y_cur[IDX_CH3OHI] - k[2560]*y_cur[IDX_H2OI] - - k[2882]*y_cur[IDX_HCNI] - k[3593]*y_cur[IDX_NH3I] - - k[6652]*y_cur[IDX_GRAINM] - k[6653]*y_cur[IDX_GRAINM]; - data[jistart + 16572] = 0.0 - k[3593]*y_cur[IDX_NCCNHII]; - data[jistart + 16573] = 0.0 - k[1156]*y_cur[IDX_NCCNHII] - - k[1157]*y_cur[IDX_NCCNHII]; - data[jistart + 16574] = 0.0 + k[4971]*y_cur[IDX_NH2I] - - k[4972]*y_cur[IDX_NHI] - k[4973]*y_cur[IDX_NHI]; - data[jistart + 16575] = 0.0 - k[1420]*y_cur[IDX_NHI]; - data[jistart + 16576] = 0.0 - k[6]*y_cur[IDX_NHI]; - data[jistart + 16577] = 0.0 + k[3507]*y_cur[IDX_NH2II] + - k[3548]*y_cur[IDX_NH3II]; - data[jistart + 16578] = 0.0 - k[3605]*y_cur[IDX_NHI] - - k[3606]*y_cur[IDX_NHI]; - data[jistart + 16579] = 0.0 + k[3508]*y_cur[IDX_NH2II]; - data[jistart + 16580] = 0.0 - k[3607]*y_cur[IDX_NHI]; - data[jistart + 16581] = 0.0 + k[5223]*y_cur[IDX_NI]; - data[jistart + 16582] = 0.0 + k[5226]*y_cur[IDX_NI]; - data[jistart + 16583] = 0.0 + k[2259]*y_cur[IDX_NH2II] + - k[5081]*y_cur[IDX_NI]; - data[jistart + 16584] = 0.0 - k[1965]*y_cur[IDX_NHI]; - data[jistart + 16585] = 0.0 + k[2012]*y_cur[IDX_NH2II] + - k[5001]*y_cur[IDX_N2I] + k[5255]*y_cur[IDX_NI]; - data[jistart + 16586] = 0.0 + k[3173]*y_cur[IDX_HeII] + k[5791]; - data[jistart + 16587] = 0.0 + k[5035]*y_cur[IDX_NH2I]; - data[jistart + 16588] = 0.0 - k[3608]*y_cur[IDX_NHI]; - data[jistart + 16589] = 0.0 + k[3336]*y_cur[IDX_NII] + - k[3337]*y_cur[IDX_NII]; - data[jistart + 16590] = 0.0 - k[5304]*y_cur[IDX_NHI]; - data[jistart + 16591] = 0.0 - k[3609]*y_cur[IDX_NHI]; - data[jistart + 16592] = 0.0 - k[5305]*y_cur[IDX_NHI]; - data[jistart + 16593] = 0.0 - k[616]*y_cur[IDX_NHI] + - k[2537]*y_cur[IDX_H2OI]; - data[jistart + 16594] = 0.0 + k[5127]*y_cur[IDX_HNOI]; - data[jistart + 16595] = 0.0 - k[617]*y_cur[IDX_NHI] + - k[3534]*y_cur[IDX_NH2I] - k[3610]*y_cur[IDX_NHI]; - data[jistart + 16596] = 0.0 + k[8580]*y_cur[IDX_GNI]; - data[jistart + 16597] = 0.0 + k[8580]*y_cur[IDX_GHI]; - data[jistart + 16598] = 0.0 + k[7078] + k[7260] + k[7442]; - data[jistart + 16599] = 0.0 + k[6325]*y_cur[IDX_NH2II] + - k[6331]*y_cur[IDX_NH3II] + k[6397]*y_cur[IDX_N2HII] + - k[6512]*y_cur[IDX_HNSiII] + k[6522]*y_cur[IDX_HNCOII] + - k[6551]*y_cur[IDX_HNCOHII] + k[6571]*y_cur[IDX_HPNII] + - k[6594]*y_cur[IDX_PNH2II]; - data[jistart + 16600] = 0.0 + k[5177]*y_cur[IDX_HNOI] + - k[5180]*y_cur[IDX_N2OI] + k[5182]*y_cur[IDX_NH2I] - - k[5184]*y_cur[IDX_NHI] + k[5186]*y_cur[IDX_NOI] + - k[5189]*y_cur[IDX_NSI] + k[5195]*y_cur[IDX_OCNI]; - data[jistart + 16601] = 0.0 - k[402]*y_cur[IDX_NHI] + - k[3021]*y_cur[IDX_HNC3I]; - data[jistart + 16602] = 0.0 + k[77]*y_cur[IDX_NI] - - k[79]*y_cur[IDX_NHI]; - data[jistart + 16603] = 0.0 + k[5141]*y_cur[IDX_NI] - - k[5143]*y_cur[IDX_NHI]; - data[jistart + 16604] = 0.0 - k[453]*y_cur[IDX_NHI] - - k[2393]*y_cur[IDX_NHI]; - data[jistart + 16605] = 0.0 + k[5264]*y_cur[IDX_NI]; - data[jistart + 16606] = 0.0 + k[574]*y_cur[IDX_NHII] + - k[3345]*y_cur[IDX_NII] + k[3510]*y_cur[IDX_NH2II]; - data[jistart + 16607] = 0.0 - k[3611]*y_cur[IDX_NHI]; - data[jistart + 16608] = 0.0 + k[575]*y_cur[IDX_NHII] + - k[2537]*y_cur[IDX_CNII] + k[3512]*y_cur[IDX_NH2II] - - k[5306]*y_cur[IDX_NHI]; - data[jistart + 16609] = 0.0 - k[3612]*y_cur[IDX_NHI]; - data[jistart + 16610] = 0.0 + k[3347]*y_cur[IDX_NII] + - k[3349]*y_cur[IDX_NII] + k[3515]*y_cur[IDX_NH2II]; - data[jistart + 16611] = 0.0 - k[2724]*y_cur[IDX_NHI]; - data[jistart + 16612] = 0.0 + k[3519]*y_cur[IDX_NH2II] + - k[5403]*y_cur[IDX_OI]; - data[jistart + 16613] = 0.0 - k[3613]*y_cur[IDX_NHI]; - data[jistart + 16614] = 0.0 + k[3520]*y_cur[IDX_NH2II] + - k[5265]*y_cur[IDX_NI]; - data[jistart + 16615] = 0.0 - k[3614]*y_cur[IDX_NHI]; - data[jistart + 16616] = 0.0 + k[3521]*y_cur[IDX_NH2II]; - data[jistart + 16617] = 0.0 + k[3021]*y_cur[IDX_HII] + - k[3032]*y_cur[IDX_HeII]; - data[jistart + 16618] = 0.0 + k[5868] + k[6199]; - data[jistart + 16619] = 0.0 + k[1116]*y_cur[IDX_eM] + - k[6522]*y_cur[IDX_GRAINM]; - data[jistart + 16620] = 0.0 + k[1120]*y_cur[IDX_eM] + + data[jistart + 19144] = 0.0 - k[6680]*y_cur[IDX_GRAINM] - k[6681]*y_cur[IDX_GRAINM] - + k[6682]*y_cur[IDX_GRAINM]; + data[jistart + 19145] = 0.0 - k[6767]*y_cur[IDX_GRAINM] - k[6768]*y_cur[IDX_GRAINM]; + data[jistart + 19146] = 0.0 - k[6798]*y_cur[IDX_GRAINM] - k[6799]*y_cur[IDX_GRAINM]; + data[jistart + 19147] = 0.0 - k[6800]*y_cur[IDX_GRAINM] - k[6801]*y_cur[IDX_GRAINM]; + data[jistart + 19148] = 0.0 - k[6438]*y_cur[IDX_GRAINM] - k[6439]*y_cur[IDX_GRAINM]; + data[jistart + 19149] = 0.0 - k[6668]*y_cur[IDX_GRAINM] - k[6669]*y_cur[IDX_GRAINM]; + data[jistart + 19150] = 0.0 - k[6644]*y_cur[IDX_GRAINM]; + data[jistart + 19151] = 0.0 - k[6645]*y_cur[IDX_GRAINM] - k[6646]*y_cur[IDX_GRAINM] - + k[6647]*y_cur[IDX_GRAINM]; + data[jistart + 19152] = 0.0 - k[6667]*y_cur[IDX_GRAINM]; + data[jistart + 19153] = 0.0 - k[6701]*y_cur[IDX_GRAINM] - k[6702]*y_cur[IDX_GRAINM] - + k[6703]*y_cur[IDX_GRAINM] - k[6704]*y_cur[IDX_GRAINM] - + k[6705]*y_cur[IDX_GRAINM]; + data[jistart + 19154] = 0.0 - k[6547]*y_cur[IDX_GRAINM] - k[6548]*y_cur[IDX_GRAINM]; + data[jistart + 19155] = 0.0 - k[6512]*y_cur[IDX_GRAINM] - k[6513]*y_cur[IDX_GRAINM]; + data[jistart + 19156] = 0.0 - k[6717]*y_cur[IDX_GRAINM] - k[6718]*y_cur[IDX_GRAINM]; + data[jistart + 19157] = 0.0 - k[6581]*y_cur[IDX_GRAINM]; + data[jistart + 19158] = 0.0 - k[6495]*y_cur[IDX_GRAINM]; + data[jistart + 19159] = 0.0 - k[6811]*y_cur[IDX_GRAINM] - k[6812]*y_cur[IDX_GRAINM] - + k[6813]*y_cur[IDX_GRAINM] - k[6814]*y_cur[IDX_GRAINM]; + data[jistart + 19160] = 0.0 - k[6448]*y_cur[IDX_GRAINM] - k[6449]*y_cur[IDX_GRAINM]; + data[jistart + 19161] = 0.0 - k[6541]*y_cur[IDX_GRAINM] - k[6542]*y_cur[IDX_GRAINM]; + data[jistart + 19162] = 0.0 - k[6869]*y_cur[IDX_GRAINM] - k[6870]*y_cur[IDX_GRAINM]; + data[jistart + 19163] = 0.0 - k[6874]*y_cur[IDX_GRAINM]; + data[jistart + 19164] = 0.0 - k[6635]*y_cur[IDX_GRAINM] - k[6636]*y_cur[IDX_GRAINM]; + data[jistart + 19165] = 0.0 - k[6484]*y_cur[IDX_GRAINM] - k[6485]*y_cur[IDX_GRAINM]; + data[jistart + 19166] = 0.0 - k[6818]*y_cur[IDX_GRAINM] - k[6819]*y_cur[IDX_GRAINM] - + k[6820]*y_cur[IDX_GRAINM]; + data[jistart + 19167] = 0.0 - k[6791]*y_cur[IDX_GRAINM] - k[6792]*y_cur[IDX_GRAINM] - + k[6793]*y_cur[IDX_GRAINM] - k[6794]*y_cur[IDX_GRAINM] - + k[6795]*y_cur[IDX_GRAINM]; + data[jistart + 19168] = 0.0 - k[6664]*y_cur[IDX_GRAINM] - k[6665]*y_cur[IDX_GRAINM]; + data[jistart + 19169] = 0.0 - k[6516]*y_cur[IDX_GRAINM] - k[6517]*y_cur[IDX_GRAINM]; + data[jistart + 19170] = 0.0 - k[6552]*y_cur[IDX_GRAINM] - k[6553]*y_cur[IDX_GRAINM]; + data[jistart + 19171] = 0.0 - k[6884]*y_cur[IDX_GRAINM] - k[6885]*y_cur[IDX_GRAINM] - + k[6886]*y_cur[IDX_GRAINM] - k[6887]*y_cur[IDX_GRAINM]; + data[jistart + 19172] = 0.0 - k[6626]*y_cur[IDX_GRAINM]; + data[jistart + 19173] = 0.0 - k[6641]*y_cur[IDX_GRAINM]; + data[jistart + 19174] = 0.0 - k[6475]*y_cur[IDX_GRAINM] - k[6476]*y_cur[IDX_GRAINM]; + data[jistart + 19175] = 0.0 - k[6683]*y_cur[IDX_GRAINM] - k[6684]*y_cur[IDX_GRAINM]; + data[jistart + 19176] = 0.0 - k[6511]*y_cur[IDX_GRAINM]; + data[jistart + 19177] = 0.0 - k[6763]*y_cur[IDX_GRAINM] - k[6764]*y_cur[IDX_GRAINM]; + data[jistart + 19178] = 0.0 - k[6676]*y_cur[IDX_GRAINM] - k[6677]*y_cur[IDX_GRAINM]; + data[jistart + 19179] = 0.0 - k[6787]*y_cur[IDX_GRAINM] - k[6788]*y_cur[IDX_GRAINM]; + data[jistart + 19180] = 0.0 - k[6719]*y_cur[IDX_GRAINM] - k[6720]*y_cur[IDX_GRAINM]; + data[jistart + 19181] = 0.0 - k[6569]*y_cur[IDX_GRAINM] - k[6570]*y_cur[IDX_GRAINM]; + data[jistart + 19182] = 0.0 - k[6750]*y_cur[IDX_GRAINM] - k[6751]*y_cur[IDX_GRAINM]; + data[jistart + 19183] = 0.0 - k[6501]*y_cur[IDX_GRAINM]; + data[jistart + 19184] = 0.0 - k[6855]*y_cur[IDX_GRAINM] - k[6856]*y_cur[IDX_GRAINM]; + data[jistart + 19185] = 0.0 - k[6376]*y_cur[IDX_GRAINM] - k[6377]*y_cur[IDX_GRAINM]; + data[jistart + 19186] = 0.0 - k[6601]*y_cur[IDX_GRAINM] - k[6602]*y_cur[IDX_GRAINM]; + data[jistart + 19187] = 0.0 - k[6486]*y_cur[IDX_GRAINM] - k[6487]*y_cur[IDX_GRAINM] - + k[6488]*y_cur[IDX_GRAINM] - k[6489]*y_cur[IDX_GRAINM]; + data[jistart + 19188] = 0.0 - k[6543]*y_cur[IDX_GRAINM] - k[6544]*y_cur[IDX_GRAINM]; + data[jistart + 19189] = 0.0 - k[6654]*y_cur[IDX_GRAINM]; + data[jistart + 19190] = 0.0 - k[6778]*y_cur[IDX_GRAINM] - k[6779]*y_cur[IDX_GRAINM]; + data[jistart + 19191] = 0.0 - k[6610]*y_cur[IDX_GRAINM] - k[6611]*y_cur[IDX_GRAINM]; + data[jistart + 19192] = 0.0 - k[6612]*y_cur[IDX_GRAINM] - k[6613]*y_cur[IDX_GRAINM] - + k[6614]*y_cur[IDX_GRAINM]; + data[jistart + 19193] = 0.0 - k[6758]*y_cur[IDX_GRAINM] - k[6759]*y_cur[IDX_GRAINM]; + data[jistart + 19194] = 0.0 - k[6746]*y_cur[IDX_GRAINM] - k[6747]*y_cur[IDX_GRAINM]; + data[jistart + 19195] = 0.0 - k[6472]*y_cur[IDX_GRAINM]; + data[jistart + 19196] = 0.0 - k[6499]*y_cur[IDX_GRAINM] - k[6500]*y_cur[IDX_GRAINM]; + data[jistart + 19197] = 0.0 - k[6807]*y_cur[IDX_GRAINM] - k[6808]*y_cur[IDX_GRAINM]; + data[jistart + 19198] = 0.0 - k[6847]*y_cur[IDX_GRAINM] - k[6848]*y_cur[IDX_GRAINM]; + data[jistart + 19199] = 0.0 - k[6648]*y_cur[IDX_GRAINM]; + data[jistart + 19200] = 0.0 - k[6761]*y_cur[IDX_GRAINM] - k[6762]*y_cur[IDX_GRAINM]; + data[jistart + 19201] = 0.0 - k[6504]*y_cur[IDX_GRAINM] - k[6505]*y_cur[IDX_GRAINM] - + k[6506]*y_cur[IDX_GRAINM] - k[6507]*y_cur[IDX_GRAINM] - + k[6508]*y_cur[IDX_GRAINM] - k[6509]*y_cur[IDX_GRAINM] - + k[6510]*y_cur[IDX_GRAINM]; + data[jistart + 19202] = 0.0 - k[6740]*y_cur[IDX_GRAINM] - k[6741]*y_cur[IDX_GRAINM]; + data[jistart + 19203] = 0.0 - k[6836]*y_cur[IDX_GRAINM] - k[6837]*y_cur[IDX_GRAINM]; + data[jistart + 19204] = 0.0 - k[6863]*y_cur[IDX_GRAINM] - k[6864]*y_cur[IDX_GRAINM]; + data[jistart + 19205] = 0.0 - k[6492]*y_cur[IDX_GRAINM] - k[6493]*y_cur[IDX_GRAINM] - + k[6494]*y_cur[IDX_GRAINM]; + data[jistart + 19206] = 0.0 - k[6642]*y_cur[IDX_GRAINM] - k[6643]*y_cur[IDX_GRAINM]; + data[jistart + 19207] = 0.0 - k[6660]*y_cur[IDX_GRAINM] - k[6661]*y_cur[IDX_GRAINM]; + data[jistart + 19208] = 0.0 - k[6796]*y_cur[IDX_GRAINM] - k[6797]*y_cur[IDX_GRAINM]; + data[jistart + 19209] = 0.0 - k[6692]*y_cur[IDX_GRAINM] - k[6693]*y_cur[IDX_GRAINM]; + data[jistart + 19210] = 0.0 - k[6428]*y_cur[IDX_GRAINM] - k[6429]*y_cur[IDX_GRAINM] - + k[6430]*y_cur[IDX_GRAINM]; + data[jistart + 19211] = 0.0 - k[6600]*y_cur[IDX_GRAINM]; + data[jistart + 19212] = 0.0 - k[6830]*y_cur[IDX_GRAINM] - k[6831]*y_cur[IDX_GRAINM]; + data[jistart + 19213] = 0.0 - k[6832]*y_cur[IDX_GRAINM] - k[6833]*y_cur[IDX_GRAINM]; + data[jistart + 19214] = 0.0 - k[6582]*y_cur[IDX_GRAINM] - k[6583]*y_cur[IDX_GRAINM]; + data[jistart + 19215] = 0.0 - k[6652]*y_cur[IDX_GRAINM] - k[6653]*y_cur[IDX_GRAINM]; + data[jistart + 19216] = 0.0 - k[6821]*y_cur[IDX_GRAINM] - k[6822]*y_cur[IDX_GRAINM] - + k[6823]*y_cur[IDX_GRAINM]; + data[jistart + 19217] = 0.0 - k[6748]*y_cur[IDX_GRAINM] - k[6749]*y_cur[IDX_GRAINM]; + data[jistart + 19218] = 0.0 - k[6434]*y_cur[IDX_GRAINM] - k[6435]*y_cur[IDX_GRAINM] - + k[6436]*y_cur[IDX_GRAINM]; + data[jistart + 19219] = 0.0 - k[6752]*y_cur[IDX_GRAINM]; + data[jistart + 19220] = 0.0 - k[6481]*y_cur[IDX_GRAINM]; + data[jistart + 19221] = 0.0 - k[6802]*y_cur[IDX_GRAINM] - k[6803]*y_cur[IDX_GRAINM]; + data[jistart + 19222] = 0.0 - k[6871]*y_cur[IDX_GRAINM] - k[6872]*y_cur[IDX_GRAINM] - + k[6873]*y_cur[IDX_GRAINM]; + data[jistart + 19223] = 0.0 - k[6490]*y_cur[IDX_GRAINM] - k[6491]*y_cur[IDX_GRAINM]; + data[jistart + 19224] = 0.0 - k[6706]*y_cur[IDX_GRAINM] - k[6707]*y_cur[IDX_GRAINM] - + k[6708]*y_cur[IDX_GRAINM]; + data[jistart + 19225] = 0.0 - k[6410]*y_cur[IDX_GRAINM] - k[6411]*y_cur[IDX_GRAINM]; + data[jistart + 19226] = 0.0 - k[6838]*y_cur[IDX_GRAINM] - k[6839]*y_cur[IDX_GRAINM]; + data[jistart + 19227] = 0.0 - k[6753]*y_cur[IDX_GRAINM] - k[6754]*y_cur[IDX_GRAINM]; + data[jistart + 19228] = 0.0 - k[6649]*y_cur[IDX_GRAINM] - k[6650]*y_cur[IDX_GRAINM]; + data[jistart + 19229] = 0.0 - k[6782]*y_cur[IDX_GRAINM] - k[6783]*y_cur[IDX_GRAINM]; + data[jistart + 19230] = 0.0 - k[6561]*y_cur[IDX_GRAINM] - k[6562]*y_cur[IDX_GRAINM] - + k[6563]*y_cur[IDX_GRAINM] - k[6564]*y_cur[IDX_GRAINM] - + k[6565]*y_cur[IDX_GRAINM]; + data[jistart + 19231] = 0.0 - k[6502]*y_cur[IDX_GRAINM] - k[6503]*y_cur[IDX_GRAINM]; + data[jistart + 19232] = 0.0 - k[6518]*y_cur[IDX_GRAINM] - k[6519]*y_cur[IDX_GRAINM]; + data[jistart + 19233] = 0.0 - k[6780]*y_cur[IDX_GRAINM] - k[6781]*y_cur[IDX_GRAINM]; + data[jistart + 19234] = 0.0 - k[6402]*y_cur[IDX_GRAINM] - k[6403]*y_cur[IDX_GRAINM] - + k[6404]*y_cur[IDX_GRAINM]; + data[jistart + 19235] = 0.0 - k[6412]*y_cur[IDX_GRAINM] - k[6413]*y_cur[IDX_GRAINM]; + data[jistart + 19236] = 0.0 - k[6615]*y_cur[IDX_GRAINM] - k[6616]*y_cur[IDX_GRAINM]; + data[jistart + 19237] = 0.0 - k[6440]*y_cur[IDX_GRAINM] - k[6441]*y_cur[IDX_GRAINM] - + k[6442]*y_cur[IDX_GRAINM] - k[6443]*y_cur[IDX_GRAINM] - + k[6444]*y_cur[IDX_GRAINM]; + data[jistart + 19238] = 0.0 - k[6466]*y_cur[IDX_GRAINM] - k[6467]*y_cur[IDX_GRAINM]; + data[jistart + 19239] = 0.0 - k[6709]*y_cur[IDX_GRAINM]; + data[jistart + 19240] = 0.0 - k[6789]*y_cur[IDX_GRAINM] - k[6790]*y_cur[IDX_GRAINM]; + data[jistart + 19241] = 0.0 - k[6845]*y_cur[IDX_GRAINM] - k[6846]*y_cur[IDX_GRAINM]; + data[jistart + 19242] = 0.0 - k[6857]*y_cur[IDX_GRAINM] - k[6858]*y_cur[IDX_GRAINM]; + data[jistart + 19243] = 0.0 - k[6861]*y_cur[IDX_GRAINM] - k[6862]*y_cur[IDX_GRAINM]; + data[jistart + 19244] = 0.0 - k[6496]*y_cur[IDX_GRAINM] - k[6497]*y_cur[IDX_GRAINM] - + k[6498]*y_cur[IDX_GRAINM]; + data[jistart + 19245] = 0.0 - k[6388]*y_cur[IDX_GRAINM]; + data[jistart + 19246] = 0.0 - k[6629]*y_cur[IDX_GRAINM] - k[6630]*y_cur[IDX_GRAINM] - + k[6631]*y_cur[IDX_GRAINM]; + data[jistart + 19247] = 0.0 - k[6540]*y_cur[IDX_GRAINM]; + data[jistart + 19248] = 0.0 - k[6824]*y_cur[IDX_GRAINM] - k[6825]*y_cur[IDX_GRAINM]; + data[jistart + 19249] = 0.0 - k[6859]*y_cur[IDX_GRAINM] - k[6860]*y_cur[IDX_GRAINM]; + data[jistart + 19250] = 0.0 - k[6554]*y_cur[IDX_GRAINM] - k[6555]*y_cur[IDX_GRAINM]; + data[jistart + 19251] = 0.0 - k[6433]*y_cur[IDX_GRAINM]; + data[jistart + 19252] = 0.0 - k[6477]*y_cur[IDX_GRAINM] - k[6478]*y_cur[IDX_GRAINM] - + k[6479]*y_cur[IDX_GRAINM] - k[6480]*y_cur[IDX_GRAINM]; + data[jistart + 19253] = 0.0 - k[6841]*y_cur[IDX_GRAINM] - k[6842]*y_cur[IDX_GRAINM]; + data[jistart + 19254] = 0.0 - k[6566]*y_cur[IDX_GRAINM] - k[6567]*y_cur[IDX_GRAINM] - + k[6568]*y_cur[IDX_GRAINM]; + data[jistart + 19255] = 0.0 - k[6742]*y_cur[IDX_GRAINM] - k[6743]*y_cur[IDX_GRAINM]; + data[jistart + 19256] = 0.0 - k[6637]*y_cur[IDX_GRAINM] - k[6638]*y_cur[IDX_GRAINM] - + k[6639]*y_cur[IDX_GRAINM] - k[6640]*y_cur[IDX_GRAINM]; + data[jistart + 19257] = 0.0 - k[6721]*y_cur[IDX_GRAINM] - k[6722]*y_cur[IDX_GRAINM]; + data[jistart + 19258] = 0.0 - k[6535]*y_cur[IDX_GRAINM]; + data[jistart + 19259] = 0.0 - k[6482]*y_cur[IDX_GRAINM] - k[6483]*y_cur[IDX_GRAINM]; + data[jistart + 19260] = 0.0 - k[6828]*y_cur[IDX_GRAINM] - k[6829]*y_cur[IDX_GRAINM]; + data[jistart + 19261] = 0.0 - k[6421]*y_cur[IDX_GRAINM]; + data[jistart + 19262] = 0.0 - k[6826]*y_cur[IDX_GRAINM] - k[6827]*y_cur[IDX_GRAINM]; + data[jistart + 19263] = 0.0 - k[6455]*y_cur[IDX_GRAINM]; + data[jistart + 19264] = 0.0 - k[6450]*y_cur[IDX_GRAINM] - k[6451]*y_cur[IDX_GRAINM] - + k[6452]*y_cur[IDX_GRAINM] - k[6453]*y_cur[IDX_GRAINM]; + data[jistart + 19265] = 0.0 - k[6437]*y_cur[IDX_GRAINM]; + data[jistart + 19266] = 0.0 - k[6785]*y_cur[IDX_GRAINM] - k[6786]*y_cur[IDX_GRAINM]; + data[jistart + 19267] = 0.0 - k[6327]*y_cur[IDX_GRAINM] - k[6328]*y_cur[IDX_GRAINM]; + data[jistart + 19268] = 0.0 - k[6422]*y_cur[IDX_GRAINM]; + data[jistart + 19269] = 0.0 - k[6391]*y_cur[IDX_GRAINM] - k[6392]*y_cur[IDX_GRAINM] - + k[6393]*y_cur[IDX_GRAINM] - k[6394]*y_cur[IDX_GRAINM] - + k[6395]*y_cur[IDX_GRAINM]; + data[jistart + 19270] = 0.0 - k[6738]*y_cur[IDX_GRAINM] - k[6739]*y_cur[IDX_GRAINM]; + data[jistart + 19271] = 0.0 - k[6359]*y_cur[IDX_GRAINM]; + data[jistart + 19272] = 0.0 - k[6375]*y_cur[IDX_GRAINM]; + data[jistart + 19273] = 0.0 - k[6815]*y_cur[IDX_GRAINM] - k[6816]*y_cur[IDX_GRAINM] - + k[6817]*y_cur[IDX_GRAINM]; + data[jistart + 19274] = 0.0 - k[6372]*y_cur[IDX_GRAINM]; + data[jistart + 19275] = 0.0 - k[6352]*y_cur[IDX_GRAINM]; + data[jistart + 19276] = 0.0 - k[6621]*y_cur[IDX_GRAINM]; + data[jistart + 19277] = 0.0 - k[6468]*y_cur[IDX_GRAINM] - k[6469]*y_cur[IDX_GRAINM]; + data[jistart + 19278] = 0.0 - k[6445]*y_cur[IDX_GRAINM]; + data[jistart + 19279] = 0.0 - k[6320]*y_cur[IDX_GRAINM]; + data[jistart + 19280] = 0.0 - k[6309]*y_cur[IDX_GRAINM]; + data[jistart + 19281] = 0.0 - k[6324]*y_cur[IDX_GRAINM] - k[6325]*y_cur[IDX_GRAINM]; + data[jistart + 19282] = 0.0 - k[6710]*y_cur[IDX_GRAINM]; + data[jistart + 19283] = 0.0 - k[6373]*y_cur[IDX_GRAINM]; + data[jistart + 19284] = 0.0 - k[6332]*y_cur[IDX_GRAINM] - k[6333]*y_cur[IDX_GRAINM] - + k[6334]*y_cur[IDX_GRAINM] - k[6335]*y_cur[IDX_GRAINM] - + k[6336]*y_cur[IDX_GRAINM]; + data[jistart + 19285] = 0.0 - k[6678]*y_cur[IDX_GRAINM] - k[6679]*y_cur[IDX_GRAINM]; + data[jistart + 19286] = 0.0 - k[6459]*y_cur[IDX_GRAINM] - k[6460]*y_cur[IDX_GRAINM]; + data[jistart + 19287] = 0.0 - k[6473]*y_cur[IDX_GRAINM]; + data[jistart + 19288] = 0.0 - k[6414]*y_cur[IDX_GRAINM] - k[6415]*y_cur[IDX_GRAINM] - + k[6416]*y_cur[IDX_GRAINM] - k[6417]*y_cur[IDX_GRAINM] - + k[6418]*y_cur[IDX_GRAINM]; + data[jistart + 19289] = 0.0 - k[6531]*y_cur[IDX_GRAINM]; + data[jistart + 19290] = 0.0 - k[6556]*y_cur[IDX_GRAINM] - k[6557]*y_cur[IDX_GRAINM]; + data[jistart + 19291] = 0.0 - k[6354]*y_cur[IDX_GRAINM] - k[6355]*y_cur[IDX_GRAINM]; + data[jistart + 19292] = 0.0 - k[6461]*y_cur[IDX_GRAINM] - k[6462]*y_cur[IDX_GRAINM] - + k[6463]*y_cur[IDX_GRAINM] - k[6464]*y_cur[IDX_GRAINM] - + k[6465]*y_cur[IDX_GRAINM]; + data[jistart + 19293] = 0.0 - k[6316]*y_cur[IDX_GRAINM] - k[6317]*y_cur[IDX_GRAINM] - + k[6318]*y_cur[IDX_GRAINM]; + data[jistart + 19294] = 0.0 - k[6329]*y_cur[IDX_GRAINM]; + data[jistart + 19295] = 0.0 - k[6340]*y_cur[IDX_GRAINM] - k[6341]*y_cur[IDX_GRAINM] - + k[6342]*y_cur[IDX_GRAINM]; + data[jistart + 19296] = 0.0 - k[6315]*y_cur[IDX_GRAINM]; + data[jistart + 19297] = 0.0 - k[6425]*y_cur[IDX_GRAINM]; + data[jistart + 19298] = 0.0 - k[6670]*y_cur[IDX_GRAINM]; + data[jistart + 19299] = 0.0 - k[6353]*y_cur[IDX_GRAINM]; + data[jistart + 19300] = 0.0 - k[6351]*y_cur[IDX_GRAINM]; + data[jistart + 19301] = 0.0 - k[6381]*y_cur[IDX_GRAINM] - k[6382]*y_cur[IDX_GRAINM] - + k[6383]*y_cur[IDX_GRAINM] - k[6384]*y_cur[IDX_GRAINM] - + k[6385]*y_cur[IDX_GRAINM] - k[6386]*y_cur[IDX_GRAINM] - + k[6387]*y_cur[IDX_GRAINM]; + data[jistart + 19302] = 0.0 - k[6633]*y_cur[IDX_GRAINM] - k[6634]*y_cur[IDX_GRAINM]; + data[jistart + 19303] = 0.0 - k[6396]*y_cur[IDX_GRAINM] - k[6397]*y_cur[IDX_GRAINM]; + data[jistart + 19304] = 0.0 - k[6620]*y_cur[IDX_GRAINM]; + data[jistart + 19305] = 0.0 - k[6470]*y_cur[IDX_GRAINM] - k[6471]*y_cur[IDX_GRAINM]; + data[jistart + 19306] = 0.0 - k[6446]*y_cur[IDX_GRAINM] - k[6447]*y_cur[IDX_GRAINM]; + data[jistart + 19307] = 0.0 - k[6319]*y_cur[IDX_GRAINM]; + data[jistart + 19308] = 0.0 - k[6398]*y_cur[IDX_GRAINM] - k[6399]*y_cur[IDX_GRAINM] - + k[6400]*y_cur[IDX_GRAINM] - k[6401]*y_cur[IDX_GRAINM]; + data[jistart + 19309] = 0.0 - k[6407]*y_cur[IDX_GRAINM]; + data[jistart + 19310] = 0.0 - k[6326]*y_cur[IDX_GRAINM]; + data[jistart + 19311] = 0.0 - k[6627]*y_cur[IDX_GRAINM] - k[6628]*y_cur[IDX_GRAINM]; + data[jistart + 19312] = 0.0 - k[6378]*y_cur[IDX_GRAINM] - k[6379]*y_cur[IDX_GRAINM] - + k[6380]*y_cur[IDX_GRAINM]; + data[jistart + 19313] = 0.0 - k[6330]*y_cur[IDX_GRAINM] - k[6331]*y_cur[IDX_GRAINM]; + data[jistart + 19314] = 0.0 - k[6337]*y_cur[IDX_GRAINM] - k[6338]*y_cur[IDX_GRAINM] - + k[6339]*y_cur[IDX_GRAINM]; + data[jistart + 19315] = 0.0 - k[6374]*y_cur[IDX_GRAINM]; + data[jistart + 19316] = 0.0 - k[6424]*y_cur[IDX_GRAINM]; + data[jistart + 19317] = 0.0 - k[6360]*y_cur[IDX_GRAINM] - k[6361]*y_cur[IDX_GRAINM] - + k[6362]*y_cur[IDX_GRAINM] - k[6363]*y_cur[IDX_GRAINM] - + k[6364]*y_cur[IDX_GRAINM] - k[6365]*y_cur[IDX_GRAINM] - + k[6366]*y_cur[IDX_GRAINM] - k[6367]*y_cur[IDX_GRAINM] - + k[6368]*y_cur[IDX_GRAINM] - k[6369]*y_cur[IDX_GRAINM] - + k[6370]*y_cur[IDX_GRAINM] - k[6371]*y_cur[IDX_GRAINM]; + data[jistart + 19318] = 0.0 - k[6356]*y_cur[IDX_GRAINM] - k[6357]*y_cur[IDX_GRAINM] - + k[6358]*y_cur[IDX_GRAINM]; + data[jistart + 19319] = 0.0 - k[6321]*y_cur[IDX_GRAINM] - k[6322]*y_cur[IDX_GRAINM] - + k[6323]*y_cur[IDX_GRAINM]; + data[jistart + 19320] = 0.0 - k[6343]*y_cur[IDX_GRAINM] - k[6344]*y_cur[IDX_GRAINM] - + k[6345]*y_cur[IDX_GRAINM] - k[6346]*y_cur[IDX_GRAINM]; + data[jistart + 19321] = 0.0 - k[6312]*y_cur[IDX_GRAINM]; + data[jistart + 19322] = 0.0 - k[6314]*y_cur[IDX_GRAINM]; + data[jistart + 19323] = 0.0 - k[6308]*y_cur[IDX_GRAINM]; + data[jistart + 19324] = 0.0 - k[6389]*y_cur[IDX_GRAINM]; + data[jistart + 19325] = 0.0 - k[6310]*y_cur[IDX_GRAINM] - k[6311]*y_cur[IDX_GRAINM]; + data[jistart + 19326] = 0.0 - k[6308]*y_cur[IDX_HII] - k[6309]*y_cur[IDX_H2II] - + k[6310]*y_cur[IDX_H3II] - k[6311]*y_cur[IDX_H3II] - + k[6312]*y_cur[IDX_HeII] - k[6313]*y_cur[IDX_HeHII] - + k[6314]*y_cur[IDX_CII] - k[6315]*y_cur[IDX_CHII] - + k[6316]*y_cur[IDX_CH2II] - k[6317]*y_cur[IDX_CH2II] - + k[6318]*y_cur[IDX_CH2II] - k[6319]*y_cur[IDX_NII] - + k[6320]*y_cur[IDX_NHII] - k[6321]*y_cur[IDX_CH3II] - + k[6322]*y_cur[IDX_CH3II] - k[6323]*y_cur[IDX_CH3II] - + k[6324]*y_cur[IDX_NH2II] - k[6325]*y_cur[IDX_NH2II] - + k[6326]*y_cur[IDX_OII] - k[6327]*y_cur[IDX_CH4II] - + k[6328]*y_cur[IDX_CH4II] - k[6329]*y_cur[IDX_OHII] - + k[6330]*y_cur[IDX_NH3II] - k[6331]*y_cur[IDX_NH3II] - + k[6332]*y_cur[IDX_CH5II] - k[6333]*y_cur[IDX_CH5II] - + k[6334]*y_cur[IDX_CH5II] - k[6335]*y_cur[IDX_CH5II] - + k[6336]*y_cur[IDX_CH5II] - k[6337]*y_cur[IDX_NH4II] - + k[6338]*y_cur[IDX_NH4II] - k[6339]*y_cur[IDX_NH4II] - + k[6340]*y_cur[IDX_H2OII] - k[6341]*y_cur[IDX_H2OII] - + k[6342]*y_cur[IDX_H2OII] - k[6343]*y_cur[IDX_H3OII] - + k[6344]*y_cur[IDX_H3OII] - k[6345]*y_cur[IDX_H3OII] - + k[6346]*y_cur[IDX_H3OII] - k[6347]*y_cur[IDX_FII] - + k[6348]*y_cur[IDX_HFII] - k[6349]*y_cur[IDX_H2FII] - + k[6350]*y_cur[IDX_H2FII] - k[6351]*y_cur[IDX_NaII] - + k[6352]*y_cur[IDX_C2II] - k[6353]*y_cur[IDX_MgII] - + k[6354]*y_cur[IDX_C2HII] - k[6355]*y_cur[IDX_C2HII] - + k[6356]*y_cur[IDX_C2H2II] - k[6357]*y_cur[IDX_C2H2II] - + k[6358]*y_cur[IDX_C2H2II] - k[6359]*y_cur[IDX_CNII] - + k[6360]*y_cur[IDX_C2H3II] - k[6361]*y_cur[IDX_C2H3II] - + k[6362]*y_cur[IDX_C2H3II] - k[6363]*y_cur[IDX_C2H3II] - + k[6364]*y_cur[IDX_C2H3II] - k[6365]*y_cur[IDX_C2H3II] - + k[6366]*y_cur[IDX_C2H3II] - k[6367]*y_cur[IDX_C2H3II] - + k[6368]*y_cur[IDX_C2H3II] - k[6369]*y_cur[IDX_C2H3II] - + k[6370]*y_cur[IDX_C2H3II] - k[6371]*y_cur[IDX_C2H3II] - + k[6372]*y_cur[IDX_HCNII] - k[6373]*y_cur[IDX_COII] - + k[6374]*y_cur[IDX_SiII] - k[6375]*y_cur[IDX_N2II] - + k[6376]*y_cur[IDX_H2NCII] - k[6377]*y_cur[IDX_H2NCII] - + k[6378]*y_cur[IDX_HCNHII] - k[6379]*y_cur[IDX_HCNHII] - + k[6380]*y_cur[IDX_HCNHII] - k[6381]*y_cur[IDX_C2H4II] - + k[6382]*y_cur[IDX_C2H4II] - k[6383]*y_cur[IDX_C2H4II] - + k[6384]*y_cur[IDX_C2H4II] - k[6385]*y_cur[IDX_C2H4II] - + k[6386]*y_cur[IDX_C2H4II] - k[6387]*y_cur[IDX_C2H4II] - + k[6388]*y_cur[IDX_SiHII] - k[6389]*y_cur[IDX_HCOII] - + k[6390]*y_cur[IDX_HOCII] - k[6391]*y_cur[IDX_C2H5II] - + k[6392]*y_cur[IDX_C2H5II] - k[6393]*y_cur[IDX_C2H5II] - + k[6394]*y_cur[IDX_C2H5II] - k[6395]*y_cur[IDX_C2H5II] - + k[6396]*y_cur[IDX_N2HII] - k[6397]*y_cur[IDX_N2HII] - + k[6398]*y_cur[IDX_H2COII] - k[6399]*y_cur[IDX_H2COII] - + k[6400]*y_cur[IDX_H2COII] - k[6401]*y_cur[IDX_H2COII] - + k[6402]*y_cur[IDX_SiH2II] - k[6403]*y_cur[IDX_SiH2II] - + k[6404]*y_cur[IDX_SiH2II] - k[6405]*y_cur[IDX_CH3NHII] - + k[6406]*y_cur[IDX_CH3NHII] - k[6407]*y_cur[IDX_NOII] - + k[6408]*y_cur[IDX_CH2NH2II] - k[6409]*y_cur[IDX_CH2NH2II] - + k[6410]*y_cur[IDX_C2H6II] - k[6411]*y_cur[IDX_C2H6II] - + k[6412]*y_cur[IDX_SiH3II] - k[6413]*y_cur[IDX_SiH3II] - + k[6414]*y_cur[IDX_H3COII] - k[6415]*y_cur[IDX_H3COII] - + k[6416]*y_cur[IDX_H3COII] - k[6417]*y_cur[IDX_H3COII] - + k[6418]*y_cur[IDX_H3COII] - k[6419]*y_cur[IDX_C2H7II] - + k[6420]*y_cur[IDX_C2H7II] - k[6421]*y_cur[IDX_PII] - + k[6422]*y_cur[IDX_HNOII] - k[6423]*y_cur[IDX_CFII] - + k[6424]*y_cur[IDX_SII] - k[6425]*y_cur[IDX_O2II] - + k[6426]*y_cur[IDX_SiH4II] - k[6427]*y_cur[IDX_SiH4II] - + k[6428]*y_cur[IDX_CH3OHII] - k[6429]*y_cur[IDX_CH3OHII] - + k[6430]*y_cur[IDX_CH3OHII] - k[6431]*y_cur[IDX_H2NOII] - + k[6432]*y_cur[IDX_H2NOII] - k[6433]*y_cur[IDX_PHII] - + k[6434]*y_cur[IDX_PH2II] - k[6435]*y_cur[IDX_PH2II] - + k[6436]*y_cur[IDX_PH2II] - k[6437]*y_cur[IDX_O2HII] - + k[6438]*y_cur[IDX_SiH5II] - k[6439]*y_cur[IDX_SiH5II] - + k[6440]*y_cur[IDX_CH3OH2II] - k[6441]*y_cur[IDX_CH3OH2II] - + k[6442]*y_cur[IDX_CH3OH2II] - k[6443]*y_cur[IDX_CH3OH2II] - + k[6444]*y_cur[IDX_CH3OH2II] - k[6445]*y_cur[IDX_HSII] - + k[6446]*y_cur[IDX_H2SII] - k[6447]*y_cur[IDX_H2SII] - + k[6448]*y_cur[IDX_PH3II] - k[6449]*y_cur[IDX_PH3II] - + k[6450]*y_cur[IDX_H3SII] - k[6451]*y_cur[IDX_H3SII] - + k[6452]*y_cur[IDX_H3SII] - k[6453]*y_cur[IDX_H3SII] - + k[6454]*y_cur[IDX_ClII] - k[6455]*y_cur[IDX_C3II] - + k[6456]*y_cur[IDX_HClII] - k[6457]*y_cur[IDX_H2ClII] - + k[6458]*y_cur[IDX_H2ClII] - k[6459]*y_cur[IDX_C3HII] - + k[6460]*y_cur[IDX_C3HII] - k[6461]*y_cur[IDX_C3H2II] - + k[6462]*y_cur[IDX_C3H2II] - k[6463]*y_cur[IDX_C3H2II] - + k[6464]*y_cur[IDX_C3H2II] - k[6465]*y_cur[IDX_C3H2II] - + k[6466]*y_cur[IDX_C2NII] - k[6467]*y_cur[IDX_C2NII] - + k[6468]*y_cur[IDX_CNCII] - k[6469]*y_cur[IDX_CNCII] - + k[6470]*y_cur[IDX_CH2CCHII] - k[6471]*y_cur[IDX_CH2CCHII] - + k[6472]*y_cur[IDX_C2NHII] - k[6473]*y_cur[IDX_C3H3II] - + k[6474]*y_cur[IDX_C2OII] - k[6475]*y_cur[IDX_CH2CNII] - + k[6476]*y_cur[IDX_CH2CNII] - k[6477]*y_cur[IDX_C3H4II] - + k[6478]*y_cur[IDX_C3H4II] - k[6479]*y_cur[IDX_C3H4II] - + k[6480]*y_cur[IDX_C3H4II] - k[6481]*y_cur[IDX_SiCII] - + k[6482]*y_cur[IDX_C3H5II] - k[6483]*y_cur[IDX_C3H5II] - + k[6484]*y_cur[IDX_CH3CNII] - k[6485]*y_cur[IDX_CH3CNII] - + k[6486]*y_cur[IDX_HC2OII] - k[6487]*y_cur[IDX_HC2OII] - + k[6488]*y_cur[IDX_HC2OII] - k[6489]*y_cur[IDX_HC2OII] - + k[6490]*y_cur[IDX_HCSiII] - k[6491]*y_cur[IDX_HCSiII] - + k[6492]*y_cur[IDX_CH2COII] - k[6493]*y_cur[IDX_CH2COII] - + k[6494]*y_cur[IDX_CH2COII] - k[6495]*y_cur[IDX_OCNII] - + k[6496]*y_cur[IDX_SiCH2II] - k[6497]*y_cur[IDX_SiCH2II] - + k[6498]*y_cur[IDX_SiCH2II] - k[6499]*y_cur[IDX_C3H6II] - + k[6500]*y_cur[IDX_C3H6II] - k[6501]*y_cur[IDX_SiNII] - + k[6502]*y_cur[IDX_CH3CNHII] - k[6503]*y_cur[IDX_CH3CNHII] - + k[6504]*y_cur[IDX_C3H7II] - k[6505]*y_cur[IDX_C3H7II] - + k[6506]*y_cur[IDX_C3H7II] - k[6507]*y_cur[IDX_C3H7II] - + k[6508]*y_cur[IDX_C3H7II] - k[6509]*y_cur[IDX_C3H7II] - + k[6510]*y_cur[IDX_C3H7II] - k[6511]*y_cur[IDX_CPII] - + k[6512]*y_cur[IDX_HNSiII] - k[6513]*y_cur[IDX_HNSiII] - + k[6514]*y_cur[IDX_HCNOII] - k[6515]*y_cur[IDX_HCNOII] - + k[6516]*y_cur[IDX_SiCH3II] - k[6517]*y_cur[IDX_SiCH3II] - + k[6518]*y_cur[IDX_CH3COII] - k[6519]*y_cur[IDX_CH3COII] - + k[6520]*y_cur[IDX_HONCII] - k[6521]*y_cur[IDX_HONCII] - + k[6522]*y_cur[IDX_HNCOII] - k[6523]*y_cur[IDX_HNCOII] - + k[6524]*y_cur[IDX_HOCNII] - k[6525]*y_cur[IDX_HOCNII] - + k[6526]*y_cur[IDX_NH2CNHII] - k[6527]*y_cur[IDX_NH2CNHII] - + k[6528]*y_cur[IDX_N2OII] - k[6529]*y_cur[IDX_N2OII] - + k[6530]*y_cur[IDX_N2OII] - k[6531]*y_cur[IDX_SiOII] - + k[6532]*y_cur[IDX_HCNOHII] - k[6533]*y_cur[IDX_HCNOHII] - + k[6534]*y_cur[IDX_HCNOHII] - k[6535]*y_cur[IDX_CSII] - + k[6536]*y_cur[IDX_H2CNOII] - k[6537]*y_cur[IDX_H2CNOII] - + k[6538]*y_cur[IDX_H2NCOII] - k[6539]*y_cur[IDX_H2NCOII] - + k[6540]*y_cur[IDX_CO2II] - k[6541]*y_cur[IDX_SiCH4II] - + k[6542]*y_cur[IDX_SiCH4II] - k[6543]*y_cur[IDX_HCPII] - + k[6544]*y_cur[IDX_HCPII] - k[6545]*y_cur[IDX_H2OCNII] - + k[6546]*y_cur[IDX_H2OCNII] - k[6547]*y_cur[IDX_CH3CHOII] - + k[6548]*y_cur[IDX_CH3CHOII] - k[6549]*y_cur[IDX_HNCOHII] - + k[6550]*y_cur[IDX_HNCOHII] - k[6551]*y_cur[IDX_HNCOHII] - + k[6552]*y_cur[IDX_SiNH2II] - k[6553]*y_cur[IDX_SiNH2II] - + k[6554]*y_cur[IDX_HCSII] - k[6555]*y_cur[IDX_HCSII] - + k[6556]*y_cur[IDX_SiOHII] - k[6557]*y_cur[IDX_SiOHII] - + k[6558]*y_cur[IDX_HN2OII] - k[6559]*y_cur[IDX_HN2OII] - + k[6560]*y_cur[IDX_PNII] - k[6561]*y_cur[IDX_CH3CHOHII] - + k[6562]*y_cur[IDX_CH3CHOHII] - k[6563]*y_cur[IDX_CH3CHOHII] - + k[6564]*y_cur[IDX_CH3CHOHII] - k[6565]*y_cur[IDX_CH3CHOHII] - + k[6566]*y_cur[IDX_HCO2II] - k[6567]*y_cur[IDX_HCO2II] - + k[6568]*y_cur[IDX_HCO2II] - k[6569]*y_cur[IDX_PCH2II] - + k[6570]*y_cur[IDX_PCH2II] - k[6571]*y_cur[IDX_HPNII] - + k[6572]*y_cur[IDX_HPNII] - k[6573]*y_cur[IDX_HPNII] - + k[6574]*y_cur[IDX_HCOOHII] - k[6575]*y_cur[IDX_HCOOHII] - + k[6576]*y_cur[IDX_C2H5OHII] - k[6577]*y_cur[IDX_C2H5OHII] - + k[6578]*y_cur[IDX_PCH3II] - k[6579]*y_cur[IDX_PCH3II] - + k[6580]*y_cur[IDX_PCH3II] - k[6581]*y_cur[IDX_NSII] - + k[6582]*y_cur[IDX_H2CSII] - k[6583]*y_cur[IDX_H2CSII] - + k[6584]*y_cur[IDX_NO2II] - k[6585]*y_cur[IDX_H2SiOII] - + k[6586]*y_cur[IDX_H2SiOII] - k[6587]*y_cur[IDX_CH3OCH3II] - + k[6588]*y_cur[IDX_CH3OCH3II] - k[6589]*y_cur[IDX_HNSII] - + k[6590]*y_cur[IDX_H3SiOII] - k[6591]*y_cur[IDX_H3SiOII] - + k[6592]*y_cur[IDX_SiFII] - k[6593]*y_cur[IDX_PNH2II] - + k[6594]*y_cur[IDX_PNH2II] - k[6595]*y_cur[IDX_PNH2II] - + k[6596]*y_cur[IDX_PCH4II] - k[6597]*y_cur[IDX_PCH4II] - + k[6598]*y_cur[IDX_PCH4II] - k[6599]*y_cur[IDX_CClII] - + k[6600]*y_cur[IDX_POII] - k[6601]*y_cur[IDX_H3CSII] - + k[6602]*y_cur[IDX_H3CSII] - k[6603]*y_cur[IDX_CH3OCH4II] - + k[6604]*y_cur[IDX_CH3OCH4II] - k[6605]*y_cur[IDX_CH3OCH4II] - + k[6606]*y_cur[IDX_C2H5OH2II] - k[6607]*y_cur[IDX_C2H5OH2II] - + k[6608]*y_cur[IDX_C2H5OH2II] - k[6609]*y_cur[IDX_C2H5OH2II] - + k[6610]*y_cur[IDX_HCOOH2II] - k[6611]*y_cur[IDX_HCOOH2II] - + k[6612]*y_cur[IDX_HPOII] - k[6613]*y_cur[IDX_HPOII] - + k[6614]*y_cur[IDX_HPOII] - k[6615]*y_cur[IDX_C4II] - + k[6616]*y_cur[IDX_C4II] - k[6617]*y_cur[IDX_PNH3II] - + k[6618]*y_cur[IDX_PNH3II] - k[6619]*y_cur[IDX_PNH3II] - + k[6620]*y_cur[IDX_SOII] - k[6621]*y_cur[IDX_C4HII] - + k[6622]*y_cur[IDX_H2POII] - k[6623]*y_cur[IDX_H2POII] - + k[6624]*y_cur[IDX_H2CClII] - k[6625]*y_cur[IDX_HSOII] - + k[6626]*y_cur[IDX_C3NII] - k[6627]*y_cur[IDX_C4H2II] - + k[6628]*y_cur[IDX_C4H2II] - k[6629]*y_cur[IDX_HC3NII] - + k[6630]*y_cur[IDX_HC3NII] - k[6631]*y_cur[IDX_HC3NII] - + k[6632]*y_cur[IDX_ClOII] - k[6633]*y_cur[IDX_C4H3II] - + k[6634]*y_cur[IDX_C4H3II] - k[6635]*y_cur[IDX_C2N2II] - + k[6636]*y_cur[IDX_C2N2II] - k[6637]*y_cur[IDX_HC3NHII] - + k[6638]*y_cur[IDX_HC3NHII] - k[6639]*y_cur[IDX_HC3NHII] - + k[6640]*y_cur[IDX_HC3NHII] - k[6641]*y_cur[IDX_C4H4II] - + k[6642]*y_cur[IDX_SiC2II] - k[6643]*y_cur[IDX_SiC2II] - + k[6644]*y_cur[IDX_C3OII] - k[6645]*y_cur[IDX_C4H5II] - + k[6646]*y_cur[IDX_C4H5II] - k[6647]*y_cur[IDX_C4H5II] - + k[6648]*y_cur[IDX_HC3OII] - k[6649]*y_cur[IDX_SiC2HII] - + k[6650]*y_cur[IDX_SiC2HII] - k[6651]*y_cur[IDX_CH2CHCNII] - + k[6652]*y_cur[IDX_NCCNHII] - k[6653]*y_cur[IDX_NCCNHII] - + k[6654]*y_cur[IDX_SiNCII] - k[6655]*y_cur[IDX_C3H2OII] - + k[6656]*y_cur[IDX_C3H2OII] - k[6657]*y_cur[IDX_CH2CHCNHII] - + k[6658]*y_cur[IDX_CH2CHCNHII] - k[6659]*y_cur[IDX_CH2CHCNHII] - + k[6660]*y_cur[IDX_SiC2H2II] - k[6661]*y_cur[IDX_SiC2H2II] - + k[6662]*y_cur[IDX_CCPII] - k[6663]*y_cur[IDX_CCPII] - + k[6664]*y_cur[IDX_SiC2H3II] - k[6665]*y_cur[IDX_SiC2H3II] - + k[6666]*y_cur[IDX_H3C3OII] - k[6667]*y_cur[IDX_C4H7II] - + k[6668]*y_cur[IDX_SiNCHII] - k[6669]*y_cur[IDX_SiNCHII] - + k[6670]*y_cur[IDX_FeII] - k[6671]*y_cur[IDX_C2H5CNHII] - + k[6672]*y_cur[IDX_C2H5CNHII] - k[6673]*y_cur[IDX_C2H5CNHII] - + k[6674]*y_cur[IDX_C2SII] - k[6675]*y_cur[IDX_C2SII] - + k[6676]*y_cur[IDX_HC2PII] - k[6677]*y_cur[IDX_HC2PII] - + k[6678]*y_cur[IDX_HC2SII] - k[6679]*y_cur[IDX_HC2SII] - + k[6680]*y_cur[IDX_PC2H2II] - k[6681]*y_cur[IDX_PC2H2II] - + k[6682]*y_cur[IDX_PC2H2II] - k[6683]*y_cur[IDX_CH3COCH3II] - + k[6684]*y_cur[IDX_CH3COCH3II] - k[6685]*y_cur[IDX_PC2H3II] - + k[6686]*y_cur[IDX_PC2H3II] - k[6687]*y_cur[IDX_PC2H3II] - + k[6688]*y_cur[IDX_CH3CSII] - k[6689]*y_cur[IDX_PC2H4II] - + k[6690]*y_cur[IDX_PC2H4II] - k[6691]*y_cur[IDX_PC2H4II] - + k[6692]*y_cur[IDX_CH3COCH4II] - k[6693]*y_cur[IDX_CH3COCH4II] - + k[6694]*y_cur[IDX_COOCH3II] - k[6695]*y_cur[IDX_COOCH3II] - + k[6696]*y_cur[IDX_CH2OHCOII] - k[6697]*y_cur[IDX_CH2OHCOII] - + k[6698]*y_cur[IDX_CH2OHCOII] - k[6699]*y_cur[IDX_HCOOCH3II] - + k[6700]*y_cur[IDX_HCOOCH3II] - k[6701]*y_cur[IDX_CH2OHCHOII] - + k[6702]*y_cur[IDX_CH2OHCHOII] - k[6703]*y_cur[IDX_CH2OHCHOII] - + k[6704]*y_cur[IDX_CH2OHCHOII] - k[6705]*y_cur[IDX_CH2OHCHOII] - + k[6706]*y_cur[IDX_OCSII] - k[6707]*y_cur[IDX_OCSII] - + k[6708]*y_cur[IDX_OCSII] - k[6709]*y_cur[IDX_C5II] - + k[6710]*y_cur[IDX_SiSII] - k[6711]*y_cur[IDX_CH3COOHII] - + k[6712]*y_cur[IDX_CH3COOHII] - k[6713]*y_cur[IDX_CH3COOHII] - + k[6714]*y_cur[IDX_CH3COOHII] - k[6715]*y_cur[IDX_CH3COOHII] - + k[6716]*y_cur[IDX_CH3COOHII] - k[6717]*y_cur[IDX_HOCSII] - + k[6718]*y_cur[IDX_HOCSII] - k[6719]*y_cur[IDX_HSiSII] - + k[6720]*y_cur[IDX_HSiSII] - k[6721]*y_cur[IDX_C5HII] - + k[6722]*y_cur[IDX_C5HII] - k[6723]*y_cur[IDX_HSiO2II] - + k[6724]*y_cur[IDX_HSiO2II] - k[6725]*y_cur[IDX_H5C2O2II] - + k[6726]*y_cur[IDX_H5C2O2II] - k[6727]*y_cur[IDX_CH2OHCH2OII] - + k[6728]*y_cur[IDX_CH2OHCH2OII] - k[6729]*y_cur[IDX_CH2OHCH2OII] - + k[6730]*y_cur[IDX_CH2OHCH2OII] - k[6731]*y_cur[IDX_CH3COOH2II] - + k[6732]*y_cur[IDX_CH3COOH2II] - k[6733]*y_cur[IDX_CH3COOH2II] - + k[6734]*y_cur[IDX_CH3COOH2II] - k[6735]*y_cur[IDX_CH3COOH2II] - + k[6736]*y_cur[IDX_CH3COOH2II] - k[6737]*y_cur[IDX_CH3COOH2II] - + k[6738]*y_cur[IDX_C5H2II] - k[6739]*y_cur[IDX_C5H2II] - + k[6740]*y_cur[IDX_C4NII] - k[6741]*y_cur[IDX_C4NII] - + k[6742]*y_cur[IDX_C5H3II] - k[6743]*y_cur[IDX_C5H3II] - + k[6744]*y_cur[IDX_HC4NII] - k[6745]*y_cur[IDX_H2C4NII] - + k[6746]*y_cur[IDX_SiC3II] - k[6747]*y_cur[IDX_SiC3II] - + k[6748]*y_cur[IDX_CH3C4HII] - k[6749]*y_cur[IDX_CH3C4HII] - + k[6750]*y_cur[IDX_SO2II] - k[6751]*y_cur[IDX_SO2II] - + k[6752]*y_cur[IDX_S2II] - k[6753]*y_cur[IDX_C5H5II] - + k[6754]*y_cur[IDX_C5H5II] - k[6755]*y_cur[IDX_HSO2II] - + k[6756]*y_cur[IDX_HSO2II] - k[6757]*y_cur[IDX_HSO2II] - + k[6758]*y_cur[IDX_HS2II] - k[6759]*y_cur[IDX_HS2II] - + k[6760]*y_cur[IDX_CH3C3NII] - k[6761]*y_cur[IDX_SiC3HII] - + k[6762]*y_cur[IDX_SiC3HII] - k[6763]*y_cur[IDX_H2S2II] - + k[6764]*y_cur[IDX_H2S2II] - k[6765]*y_cur[IDX_CH3C3NHII] - + k[6766]*y_cur[IDX_CH3C3NHII] - k[6767]*y_cur[IDX_SiC3H2II] - + k[6768]*y_cur[IDX_SiC3H2II] - k[6769]*y_cur[IDX_NCCNCH3II] - + k[6770]*y_cur[IDX_H3S2II] - k[6771]*y_cur[IDX_H3S2II] - + k[6772]*y_cur[IDX_PC3HII] - k[6773]*y_cur[IDX_PC3HII] - + k[6774]*y_cur[IDX_PC3HII] - k[6775]*y_cur[IDX_C3SII] - + k[6776]*y_cur[IDX_C3SII] - k[6777]*y_cur[IDX_C3SII] - + k[6778]*y_cur[IDX_HC3SII] - k[6779]*y_cur[IDX_HC3SII] - + k[6780]*y_cur[IDX_C6II] - k[6781]*y_cur[IDX_C6II] - + k[6782]*y_cur[IDX_C6HII] - k[6783]*y_cur[IDX_C6HII] - + k[6784]*y_cur[IDX_C5NII] - k[6785]*y_cur[IDX_C6H2II] - + k[6786]*y_cur[IDX_C6H2II] - k[6787]*y_cur[IDX_HC5NII] - + k[6788]*y_cur[IDX_HC5NII] - k[6789]*y_cur[IDX_C6H3II] - + k[6790]*y_cur[IDX_C6H3II] - k[6791]*y_cur[IDX_HC5NHII] - + k[6792]*y_cur[IDX_HC5NHII] - k[6793]*y_cur[IDX_HC5NHII] - + k[6794]*y_cur[IDX_HC5NHII] - k[6795]*y_cur[IDX_HC5NHII] - + k[6796]*y_cur[IDX_C6H4II] - k[6797]*y_cur[IDX_C6H4II] - + k[6798]*y_cur[IDX_SiC4II] - k[6799]*y_cur[IDX_SiC4II] - + k[6800]*y_cur[IDX_SiC4HII] - k[6801]*y_cur[IDX_SiC4HII] - + k[6802]*y_cur[IDX_C6H5II] - k[6803]*y_cur[IDX_C6H5II] - + k[6804]*y_cur[IDX_H3C5NII] - k[6805]*y_cur[IDX_H3C5NII] - + k[6806]*y_cur[IDX_C6H6II] - k[6807]*y_cur[IDX_C6H7II] - + k[6808]*y_cur[IDX_C6H7II] - k[6809]*y_cur[IDX_C4PII] - + k[6810]*y_cur[IDX_C4PII] - k[6811]*y_cur[IDX_PC4HII] - + k[6812]*y_cur[IDX_PC4HII] - k[6813]*y_cur[IDX_PC4HII] - + k[6814]*y_cur[IDX_PC4HII] - k[6815]*y_cur[IDX_C4SII] - + k[6816]*y_cur[IDX_C4SII] - k[6817]*y_cur[IDX_C4SII] - + k[6818]*y_cur[IDX_HC4SII] - k[6819]*y_cur[IDX_HC4SII] - + k[6820]*y_cur[IDX_HC4SII] - k[6821]*y_cur[IDX_C7II] - + k[6822]*y_cur[IDX_C7II] - k[6823]*y_cur[IDX_C7II] - + k[6824]*y_cur[IDX_C7HII] - k[6825]*y_cur[IDX_C7HII] - + k[6826]*y_cur[IDX_C7H2II] - k[6827]*y_cur[IDX_C7H2II] - + k[6828]*y_cur[IDX_C7H3II] - k[6829]*y_cur[IDX_C7H3II] - + k[6830]*y_cur[IDX_C7H4II] - k[6831]*y_cur[IDX_C7H4II] - + k[6832]*y_cur[IDX_C7H5II] - k[6833]*y_cur[IDX_C7H5II] - + k[6834]*y_cur[IDX_CH3C5NHII] - k[6835]*y_cur[IDX_CH3C5NHII] - + k[6836]*y_cur[IDX_C8II] - k[6837]*y_cur[IDX_C8II] - + k[6838]*y_cur[IDX_C8HII] - k[6839]*y_cur[IDX_C8HII] - + k[6840]*y_cur[IDX_C7NII] - k[6841]*y_cur[IDX_C8H2II] - + k[6842]*y_cur[IDX_C8H2II] - k[6843]*y_cur[IDX_HC7NII] - + k[6844]*y_cur[IDX_HC7NII] - k[6845]*y_cur[IDX_C8H3II] - + k[6846]*y_cur[IDX_C8H3II] - k[6847]*y_cur[IDX_C8H4II] - + k[6848]*y_cur[IDX_C8H4II] - k[6849]*y_cur[IDX_H2C7NII] - + k[6850]*y_cur[IDX_H2C7NII] - k[6851]*y_cur[IDX_H3C7NII] - + k[6852]*y_cur[IDX_H3C7NII] - k[6853]*y_cur[IDX_C8H5II] - + k[6854]*y_cur[IDX_C8H5II] - k[6855]*y_cur[IDX_C9II] - + k[6856]*y_cur[IDX_C9II] - k[6857]*y_cur[IDX_C9HII] - + k[6858]*y_cur[IDX_C9HII] - k[6859]*y_cur[IDX_C9H2II] - + k[6860]*y_cur[IDX_C9H2II] - k[6861]*y_cur[IDX_C9H3II] - + k[6862]*y_cur[IDX_C9H3II] - k[6863]*y_cur[IDX_C9H4II] - + k[6864]*y_cur[IDX_C9H4II] - k[6865]*y_cur[IDX_C9H5II] - + k[6866]*y_cur[IDX_C9H5II] - k[6867]*y_cur[IDX_CH3C7NHII] - + k[6868]*y_cur[IDX_CH3C7NHII] - k[6869]*y_cur[IDX_C10II] - + k[6870]*y_cur[IDX_C10II] - k[6871]*y_cur[IDX_C10HII] - + k[6872]*y_cur[IDX_C10HII] - k[6873]*y_cur[IDX_C10HII] - + k[6874]*y_cur[IDX_C10H2II] - k[6875]*y_cur[IDX_C9NII] - + k[6876]*y_cur[IDX_HC9NII] - k[6877]*y_cur[IDX_HC9NII] - + k[6878]*y_cur[IDX_C10H3II] - k[6879]*y_cur[IDX_C10H3II] - + k[6880]*y_cur[IDX_H2C9NII] - k[6881]*y_cur[IDX_H2C9NII] - + k[6882]*y_cur[IDX_H3C9NII] - k[6883]*y_cur[IDX_H3C9NII] - + k[6884]*y_cur[IDX_C11II] - k[6885]*y_cur[IDX_C11II] - + k[6886]*y_cur[IDX_C11II] - k[6887]*y_cur[IDX_C11II]; + data[jistart + 19327] = 0.0 + k[8763]*y_cur[IDX_eM]; + data[jistart + 19328] = 0.0 + k[8763]*y_cur[IDX_GRAIN0I]; + data[jistart + 19329] = 0.0 + k[6769]*y_cur[IDX_GRAINM]; + data[jistart + 19330] = 0.0 + k[6655]*y_cur[IDX_GRAINM] + k[6656]*y_cur[IDX_GRAINM]; + data[jistart + 19331] = 0.0 + k[6423]*y_cur[IDX_GRAINM]; + data[jistart + 19332] = 0.0 + k[6632]*y_cur[IDX_GRAINM]; + data[jistart + 19333] = 0.0 + k[6666]*y_cur[IDX_GRAINM]; + data[jistart + 19334] = 0.0 + k[6348]*y_cur[IDX_GRAINM]; + data[jistart + 19335] = 0.0 + k[6592]*y_cur[IDX_GRAINM]; + data[jistart + 19336] = 0.0 + k[6853]*y_cur[IDX_GRAINM] + k[6854]*y_cur[IDX_GRAINM]; + data[jistart + 19337] = 0.0 + k[6865]*y_cur[IDX_GRAINM] + k[6866]*y_cur[IDX_GRAINM]; + data[jistart + 19338] = 0.0 + k[6760]*y_cur[IDX_GRAINM]; + data[jistart + 19339] = 0.0 + k[6349]*y_cur[IDX_GRAINM] + k[6350]*y_cur[IDX_GRAINM]; + data[jistart + 19340] = 0.0 + k[6809]*y_cur[IDX_GRAINM] + k[6810]*y_cur[IDX_GRAINM]; + data[jistart + 19341] = 0.0 + k[6784]*y_cur[IDX_GRAINM]; + data[jistart + 19342] = 0.0 + k[6806]*y_cur[IDX_GRAINM]; + data[jistart + 19343] = 0.0 + k[6651]*y_cur[IDX_GRAINM]; + data[jistart + 19344] = 0.0 + k[6694]*y_cur[IDX_GRAINM] + k[6695]*y_cur[IDX_GRAINM]; + data[jistart + 19345] = 0.0 + k[6347]*y_cur[IDX_GRAINM]; + data[jistart + 19346] = 0.0 + k[6536]*y_cur[IDX_GRAINM] + k[6537]*y_cur[IDX_GRAINM]; + data[jistart + 19347] = 0.0 + k[6538]*y_cur[IDX_GRAINM] + k[6539]*y_cur[IDX_GRAINM]; + data[jistart + 19348] = 0.0 + k[6545]*y_cur[IDX_GRAINM] + k[6546]*y_cur[IDX_GRAINM]; + data[jistart + 19349] = 0.0 + k[6689]*y_cur[IDX_GRAINM] + k[6690]*y_cur[IDX_GRAINM] + + k[6691]*y_cur[IDX_GRAINM]; + data[jistart + 19350] = 0.0 + k[6840]*y_cur[IDX_GRAINM]; + data[jistart + 19351] = 0.0 + k[6875]*y_cur[IDX_GRAINM]; + data[jistart + 19352] = 0.0 + k[6405]*y_cur[IDX_GRAINM] + k[6406]*y_cur[IDX_GRAINM]; + data[jistart + 19353] = 0.0 + k[6745]*y_cur[IDX_GRAINM]; + data[jistart + 19354] = 0.0 + k[6624]*y_cur[IDX_GRAINM]; + data[jistart + 19355] = 0.0 + k[6431]*y_cur[IDX_GRAINM] + k[6432]*y_cur[IDX_GRAINM]; + data[jistart + 19356] = 0.0 + k[6456]*y_cur[IDX_GRAINM]; + data[jistart + 19357] = 0.0 + k[6589]*y_cur[IDX_GRAINM]; + data[jistart + 19358] = 0.0 + k[6390]*y_cur[IDX_GRAINM]; + data[jistart + 19359] = 0.0 + k[6625]*y_cur[IDX_GRAINM]; + data[jistart + 19360] = 0.0 + k[6723]*y_cur[IDX_GRAINM] + k[6724]*y_cur[IDX_GRAINM]; + data[jistart + 19361] = 0.0 + k[6526]*y_cur[IDX_GRAINM] + k[6527]*y_cur[IDX_GRAINM]; + data[jistart + 19362] = 0.0 + k[6576]*y_cur[IDX_GRAINM] + k[6577]*y_cur[IDX_GRAINM]; + data[jistart + 19363] = 0.0 + k[6474]*y_cur[IDX_GRAINM]; + data[jistart + 19364] = 0.0 + k[6696]*y_cur[IDX_GRAINM] + k[6697]*y_cur[IDX_GRAINM] + + k[6698]*y_cur[IDX_GRAINM]; + data[jistart + 19365] = 0.0 + k[6744]*y_cur[IDX_GRAINM]; + data[jistart + 19366] = 0.0 + k[6532]*y_cur[IDX_GRAINM] + k[6533]*y_cur[IDX_GRAINM] + + k[6534]*y_cur[IDX_GRAINM]; + data[jistart + 19367] = 0.0 + k[6549]*y_cur[IDX_GRAINM] + k[6550]*y_cur[IDX_GRAINM] + k[6551]*y_cur[IDX_GRAINM]; - data[jistart + 16621] = 0.0 + k[5127]*y_cur[IDX_COI] + - k[5177]*y_cur[IDX_HI] + k[5270]*y_cur[IDX_NI] + - k[5413]*y_cur[IDX_OI]; - data[jistart + 16622] = 0.0 - k[3615]*y_cur[IDX_NHI]; - data[jistart + 16623] = 0.0 + k[1123]*y_cur[IDX_eM] + - k[6512]*y_cur[IDX_GRAINM]; - data[jistart + 16624] = 0.0 + k[1132]*y_cur[IDX_eM] + - k[6571]*y_cur[IDX_GRAINM]; - data[jistart + 16625] = 0.0 + k[5272]*y_cur[IDX_NI]; - data[jistart + 16626] = 0.0 + k[3032]*y_cur[IDX_HNC3I] + - k[3173]*y_cur[IDX_CH2NHI] - k[3285]*y_cur[IDX_NHI]; - data[jistart + 16627] = 0.0 + k[77]*y_cur[IDX_HM] + - k[5081]*y_cur[IDX_CHI] + k[5141]*y_cur[IDX_H2I] + - k[5223]*y_cur[IDX_C2H3I] + k[5226]*y_cur[IDX_C2H5I] + - k[5255]*y_cur[IDX_CH2I] + k[5264]*y_cur[IDX_H2CNI] + - k[5265]*y_cur[IDX_HCOI] + k[5270]*y_cur[IDX_HNOI] + - k[5272]*y_cur[IDX_HSI] - k[5274]*y_cur[IDX_NHI] + - k[5282]*y_cur[IDX_O2HI] + k[5284]*y_cur[IDX_OHI]; - data[jistart + 16628] = 0.0 - k[559]*y_cur[IDX_NHI] + - k[3336]*y_cur[IDX_CH3OHI] + k[3337]*y_cur[IDX_CH3OHI] + - k[3345]*y_cur[IDX_H2COI] + k[3347]*y_cur[IDX_H2SI] + - k[3349]*y_cur[IDX_H2SI] + k[3354]*y_cur[IDX_NH3I] - - k[3355]*y_cur[IDX_NHI]; - data[jistart + 16629] = 0.0 + k[5001]*y_cur[IDX_CH2I]; - data[jistart + 16630] = 0.0 - k[618]*y_cur[IDX_NHI]; - data[jistart + 16631] = 0.0 + k[1153]*y_cur[IDX_eM] + - k[1154]*y_cur[IDX_eM] - k[3616]*y_cur[IDX_NHI] + - k[6397]*y_cur[IDX_GRAINM]; - data[jistart + 16632] = 0.0 + k[5180]*y_cur[IDX_HI]; - data[jistart + 16633] = 0.0 - k[6]*y_cur[IDX_CM] - - k[79]*y_cur[IDX_HM] - k[402]*y_cur[IDX_HII] - k[453]*y_cur[IDX_H2II] - - k[559]*y_cur[IDX_NII] - k[616]*y_cur[IDX_CNII] - - k[617]*y_cur[IDX_COII] - k[618]*y_cur[IDX_N2II] - - k[619]*y_cur[IDX_OII] - k[1420]*y_cur[IDX_CII] - - k[1965]*y_cur[IDX_CHII] - k[2393]*y_cur[IDX_H2II] - - k[2724]*y_cur[IDX_H3II] - k[3285]*y_cur[IDX_HeII] - - k[3355]*y_cur[IDX_NII] - k[3499]*y_cur[IDX_NHII] - - k[3605]*y_cur[IDX_C2II] - k[3606]*y_cur[IDX_C2II] - - k[3607]*y_cur[IDX_C2H2II] - k[3608]*y_cur[IDX_CH3II] - - k[3609]*y_cur[IDX_CH5II] - k[3610]*y_cur[IDX_COII] - - k[3611]*y_cur[IDX_H2COII] - k[3612]*y_cur[IDX_H2OII] - - k[3613]*y_cur[IDX_HCNII] - k[3614]*y_cur[IDX_HCOII] - - k[3615]*y_cur[IDX_HNOII] - k[3616]*y_cur[IDX_N2HII] - - k[3617]*y_cur[IDX_NH2II] - k[3618]*y_cur[IDX_NH3II] - - k[3619]*y_cur[IDX_OII] - k[3620]*y_cur[IDX_O2II] - - k[3621]*y_cur[IDX_O2II] - k[3622]*y_cur[IDX_O2HII] - - k[3623]*y_cur[IDX_OHII] - k[3624]*y_cur[IDX_SII] - - k[3625]*y_cur[IDX_SiII] - k[4972]*y_cur[IDX_CI] - - k[4973]*y_cur[IDX_CI] - k[5143]*y_cur[IDX_H2I] - - k[5184]*y_cur[IDX_HI] - k[5274]*y_cur[IDX_NI] - - k[5304]*y_cur[IDX_CH4I] - k[5305]*y_cur[IDX_CNI] - - k[5306]*y_cur[IDX_H2OI] - k[5307]*y_cur[IDX_NH3I] - - k[5308]*y_cur[IDX_NHI] - k[5308]*y_cur[IDX_NHI] - - k[5308]*y_cur[IDX_NHI] - k[5308]*y_cur[IDX_NHI] - - k[5309]*y_cur[IDX_NHI] - k[5309]*y_cur[IDX_NHI] - - k[5309]*y_cur[IDX_NHI] - k[5309]*y_cur[IDX_NHI] - - k[5310]*y_cur[IDX_NHI] - k[5310]*y_cur[IDX_NHI] - - k[5310]*y_cur[IDX_NHI] - k[5310]*y_cur[IDX_NHI] - - k[5311]*y_cur[IDX_NO2I] - k[5312]*y_cur[IDX_NO2I] - - k[5313]*y_cur[IDX_NOI] - k[5314]*y_cur[IDX_NOI] - - k[5315]*y_cur[IDX_NOI] - k[5316]*y_cur[IDX_O2I] - - k[5317]*y_cur[IDX_O2I] - k[5318]*y_cur[IDX_OI] - - k[5319]*y_cur[IDX_OI] - k[5320]*y_cur[IDX_OI] - - k[5321]*y_cur[IDX_OHI] - k[5322]*y_cur[IDX_OHI] - - k[5323]*y_cur[IDX_OHI] - k[5324]*y_cur[IDX_SI] - - k[5325]*y_cur[IDX_SI] - k[5888] - k[5889] - k[6224] - k[6225] - - k[6896]; - data[jistart + 16634] = 0.0 + k[574]*y_cur[IDX_H2COI] + - k[575]*y_cur[IDX_H2OI] + k[576]*y_cur[IDX_NH3I] + - k[577]*y_cur[IDX_NOI] + k[578]*y_cur[IDX_O2I] + k[579]*y_cur[IDX_SI] - - k[3499]*y_cur[IDX_NHI]; - data[jistart + 16635] = 0.0 + k[3522]*y_cur[IDX_NH2II] + - k[3534]*y_cur[IDX_COII] + k[3545]*y_cur[IDX_NH3II] + - k[4971]*y_cur[IDX_CI] + k[5035]*y_cur[IDX_CH3I] + - k[5182]*y_cur[IDX_HI] + k[5300]*y_cur[IDX_OHI] + - k[5421]*y_cur[IDX_OI] + k[5883] + k[6219]; - data[jistart + 16636] = 0.0 + k[1160]*y_cur[IDX_eM] + - k[2012]*y_cur[IDX_CH2I] + k[2259]*y_cur[IDX_CHI] + - k[3507]*y_cur[IDX_C2I] + k[3508]*y_cur[IDX_C2HI] + - k[3510]*y_cur[IDX_H2COI] + k[3512]*y_cur[IDX_H2OI] + - k[3515]*y_cur[IDX_H2SI] + k[3519]*y_cur[IDX_HCNI] + - k[3520]*y_cur[IDX_HCOI] + k[3521]*y_cur[IDX_HNCI] + - k[3522]*y_cur[IDX_NH2I] + k[3523]*y_cur[IDX_NH3I] + - k[3527]*y_cur[IDX_SI] - k[3617]*y_cur[IDX_NHI] + - k[6325]*y_cur[IDX_GRAINM]; - data[jistart + 16637] = 0.0 + k[576]*y_cur[IDX_NHII] + - k[3354]*y_cur[IDX_NII] + k[3523]*y_cur[IDX_NH2II] - - k[5307]*y_cur[IDX_NHI] + k[5887] + k[6223]; - data[jistart + 16638] = 0.0 + k[1164]*y_cur[IDX_eM] + - k[3545]*y_cur[IDX_NH2I] + k[3548]*y_cur[IDX_C2I] - - k[3618]*y_cur[IDX_NHI] + k[6331]*y_cur[IDX_GRAINM]; - data[jistart + 16639] = 0.0 + k[577]*y_cur[IDX_NHII] + - k[5186]*y_cur[IDX_HI] - k[5313]*y_cur[IDX_NHI] - - k[5314]*y_cur[IDX_NHI] - k[5315]*y_cur[IDX_NHI]; - data[jistart + 16640] = 0.0 - k[5311]*y_cur[IDX_NHI] - - k[5312]*y_cur[IDX_NHI]; - data[jistart + 16641] = 0.0 + k[5189]*y_cur[IDX_HI]; - data[jistart + 16642] = 0.0 - k[5318]*y_cur[IDX_NHI] - - k[5319]*y_cur[IDX_NHI] - k[5320]*y_cur[IDX_NHI] + - k[5403]*y_cur[IDX_HCNI] + k[5413]*y_cur[IDX_HNOI] + - k[5421]*y_cur[IDX_NH2I]; - data[jistart + 16643] = 0.0 - k[619]*y_cur[IDX_NHI] - - k[3619]*y_cur[IDX_NHI]; - data[jistart + 16644] = 0.0 + k[578]*y_cur[IDX_NHII] - - k[5316]*y_cur[IDX_NHI] - k[5317]*y_cur[IDX_NHI]; - data[jistart + 16645] = 0.0 - k[3620]*y_cur[IDX_NHI] - - k[3621]*y_cur[IDX_NHI]; - data[jistart + 16646] = 0.0 + k[5282]*y_cur[IDX_NI]; - data[jistart + 16647] = 0.0 - k[3622]*y_cur[IDX_NHI]; - data[jistart + 16648] = 0.0 + k[5195]*y_cur[IDX_HI]; - data[jistart + 16649] = 0.0 + k[5284]*y_cur[IDX_NI] + - k[5300]*y_cur[IDX_NH2I] - k[5321]*y_cur[IDX_NHI] - - k[5322]*y_cur[IDX_NHI] - k[5323]*y_cur[IDX_NHI]; - data[jistart + 16650] = 0.0 - k[3623]*y_cur[IDX_NHI]; - data[jistart + 16651] = 0.0 + k[1213]*y_cur[IDX_eM] + - k[6594]*y_cur[IDX_GRAINM]; - data[jistart + 16652] = 0.0 + k[579]*y_cur[IDX_NHII] + - k[3527]*y_cur[IDX_NH2II] - k[5324]*y_cur[IDX_NHI] - - k[5325]*y_cur[IDX_NHI]; - data[jistart + 16653] = 0.0 - k[3624]*y_cur[IDX_NHI]; - data[jistart + 16654] = 0.0 - k[3625]*y_cur[IDX_NHI]; - data[jistart + 16655] = 0.0 + k[1116]*y_cur[IDX_HNCOII] + - k[1120]*y_cur[IDX_HNCOHII] + k[1123]*y_cur[IDX_HNSiII] + - k[1132]*y_cur[IDX_HPNII] + k[1153]*y_cur[IDX_N2HII] + - k[1154]*y_cur[IDX_N2HII] + k[1160]*y_cur[IDX_NH2II] + - k[1164]*y_cur[IDX_NH3II] + k[1213]*y_cur[IDX_PNH2II]; - data[jistart + 16656] = 0.0 - k[1910]*y_cur[IDX_NHII]; - data[jistart + 16657] = 0.0 - k[3477]*y_cur[IDX_NHII] - - k[3478]*y_cur[IDX_NHII] - k[3479]*y_cur[IDX_NHII]; - data[jistart + 16658] = 0.0 - k[3480]*y_cur[IDX_NHII]; - data[jistart + 16659] = 0.0 - k[2258]*y_cur[IDX_NHII]; - data[jistart + 16660] = 0.0 - k[2011]*y_cur[IDX_NHII]; - data[jistart + 16661] = 0.0 - k[3481]*y_cur[IDX_NHII]; - data[jistart + 16662] = 0.0 + k[616]*y_cur[IDX_NHI]; - data[jistart + 16663] = 0.0 - k[3485]*y_cur[IDX_NHII] - - k[3486]*y_cur[IDX_NHII]; - data[jistart + 16664] = 0.0 + k[617]*y_cur[IDX_NHI]; - data[jistart + 16665] = 0.0 - k[3482]*y_cur[IDX_NHII] - - k[3483]*y_cur[IDX_NHII] - k[3484]*y_cur[IDX_NHII]; - data[jistart + 16666] = 0.0 - k[6320]*y_cur[IDX_NHII]; - data[jistart + 16667] = 0.0 + k[402]*y_cur[IDX_NHI]; - data[jistart + 16668] = 0.0 + k[2459]*y_cur[IDX_NII] - - k[2461]*y_cur[IDX_NHII] - k[2462]*y_cur[IDX_NHII]; - data[jistart + 16669] = 0.0 + k[453]*y_cur[IDX_NHI] + - k[2392]*y_cur[IDX_NI]; - data[jistart + 16670] = 0.0 - k[574]*y_cur[IDX_NHII] - - k[3487]*y_cur[IDX_NHII] - k[3488]*y_cur[IDX_NHII]; - data[jistart + 16671] = 0.0 - k[575]*y_cur[IDX_NHII] - - k[3489]*y_cur[IDX_NHII] - k[3490]*y_cur[IDX_NHII] - - k[3491]*y_cur[IDX_NHII] - k[3492]*y_cur[IDX_NHII]; - data[jistart + 16672] = 0.0 + k[3348]*y_cur[IDX_NII]; - data[jistart + 16673] = 0.0 - k[3493]*y_cur[IDX_NHII]; - data[jistart + 16674] = 0.0 + k[3350]*y_cur[IDX_NII] - - k[3494]*y_cur[IDX_NHII]; - data[jistart + 16675] = 0.0 + k[3263]*y_cur[IDX_HeII] - - k[3495]*y_cur[IDX_NHII]; - data[jistart + 16676] = 0.0 + k[3033]*y_cur[IDX_HeII]; - data[jistart + 16677] = 0.0 + k[3033]*y_cur[IDX_HNC3I] + - k[3263]*y_cur[IDX_HNCI] + k[3281]*y_cur[IDX_NH2I] + - k[3283]*y_cur[IDX_NH3I]; - data[jistart + 16678] = 0.0 + k[2392]*y_cur[IDX_H2II] - - k[3463]*y_cur[IDX_NHII]; - data[jistart + 16679] = 0.0 + k[559]*y_cur[IDX_NHI] + - k[2459]*y_cur[IDX_H2I] + k[3348]*y_cur[IDX_H2SI] + - k[3350]*y_cur[IDX_HCOI]; - data[jistart + 16680] = 0.0 - k[3496]*y_cur[IDX_NHII]; - data[jistart + 16681] = 0.0 + k[618]*y_cur[IDX_NHI]; - data[jistart + 16682] = 0.0 + k[402]*y_cur[IDX_HII] + - k[453]*y_cur[IDX_H2II] + k[559]*y_cur[IDX_NII] + - k[616]*y_cur[IDX_CNII] + k[617]*y_cur[IDX_COII] + - k[618]*y_cur[IDX_N2II] + k[619]*y_cur[IDX_OII] - - k[3499]*y_cur[IDX_NHII] + k[5889] + k[6225]; - data[jistart + 16683] = 0.0 - k[574]*y_cur[IDX_H2COI] - - k[575]*y_cur[IDX_H2OI] - k[576]*y_cur[IDX_NH3I] - - k[577]*y_cur[IDX_NOI] - k[578]*y_cur[IDX_O2I] - k[579]*y_cur[IDX_SI] - - k[1158]*y_cur[IDX_eM] - k[1910]*y_cur[IDX_CI] - - k[2011]*y_cur[IDX_CH2I] - k[2258]*y_cur[IDX_CHI] - - k[2461]*y_cur[IDX_H2I] - k[2462]*y_cur[IDX_H2I] - - k[3463]*y_cur[IDX_NI] - k[3477]*y_cur[IDX_C2I] - - k[3478]*y_cur[IDX_C2I] - k[3479]*y_cur[IDX_C2I] - - k[3480]*y_cur[IDX_C2HI] - k[3481]*y_cur[IDX_CNI] - - k[3482]*y_cur[IDX_CO2I] - k[3483]*y_cur[IDX_CO2I] - - k[3484]*y_cur[IDX_CO2I] - k[3485]*y_cur[IDX_COI] - - k[3486]*y_cur[IDX_COI] - k[3487]*y_cur[IDX_H2COI] - - k[3488]*y_cur[IDX_H2COI] - k[3489]*y_cur[IDX_H2OI] - - k[3490]*y_cur[IDX_H2OI] - k[3491]*y_cur[IDX_H2OI] - - k[3492]*y_cur[IDX_H2OI] - k[3493]*y_cur[IDX_HCNI] - - k[3494]*y_cur[IDX_HCOI] - k[3495]*y_cur[IDX_HNCI] - - k[3496]*y_cur[IDX_N2I] - k[3497]*y_cur[IDX_NH2I] - - k[3498]*y_cur[IDX_NH3I] - k[3499]*y_cur[IDX_NHI] - - k[3500]*y_cur[IDX_NOI] - k[3501]*y_cur[IDX_O2I] - - k[3502]*y_cur[IDX_O2I] - k[3503]*y_cur[IDX_OI] - - k[3504]*y_cur[IDX_OHI] - k[3505]*y_cur[IDX_SI] - - k[3506]*y_cur[IDX_SI] - k[6217] - k[6320]*y_cur[IDX_GRAINM]; - data[jistart + 16684] = 0.0 + k[3281]*y_cur[IDX_HeII] - - k[3497]*y_cur[IDX_NHII]; - data[jistart + 16685] = 0.0 - k[576]*y_cur[IDX_NHII] + - k[3283]*y_cur[IDX_HeII] - k[3498]*y_cur[IDX_NHII]; - data[jistart + 16686] = 0.0 - k[577]*y_cur[IDX_NHII] - - k[3500]*y_cur[IDX_NHII]; - data[jistart + 16687] = 0.0 - k[3503]*y_cur[IDX_NHII]; - data[jistart + 16688] = 0.0 + k[619]*y_cur[IDX_NHI]; - data[jistart + 16689] = 0.0 - k[578]*y_cur[IDX_NHII] - - k[3501]*y_cur[IDX_NHII] - k[3502]*y_cur[IDX_NHII]; - data[jistart + 16690] = 0.0 - k[3504]*y_cur[IDX_NHII]; - data[jistart + 16691] = 0.0 - k[579]*y_cur[IDX_NHII] - - k[3505]*y_cur[IDX_NHII] - k[3506]*y_cur[IDX_NHII]; - data[jistart + 16692] = 0.0 - k[1158]*y_cur[IDX_NHII]; - data[jistart + 16693] = 0.0 - k[4969]*y_cur[IDX_NH2I] - - k[4970]*y_cur[IDX_NH2I] - k[4971]*y_cur[IDX_NH2I]; - data[jistart + 16694] = 0.0 - k[1417]*y_cur[IDX_NH2I]; - data[jistart + 16695] = 0.0 - k[585]*y_cur[IDX_NH2I] - - k[3528]*y_cur[IDX_NH2I]; - data[jistart + 16696] = 0.0 - k[3529]*y_cur[IDX_NH2I] - - k[3530]*y_cur[IDX_NH2I]; - data[jistart + 16697] = 0.0 - k[3531]*y_cur[IDX_NH2I] - - k[3532]*y_cur[IDX_NH2I]; - data[jistart + 16698] = 0.0 + k[294]*y_cur[IDX_NH2II]; - data[jistart + 16699] = 0.0 - k[1962]*y_cur[IDX_NH2I]; - data[jistart + 16700] = 0.0 + k[265]*y_cur[IDX_NH2II] + - k[2013]*y_cur[IDX_NH3II]; - data[jistart + 16701] = 0.0 + k[2318]*y_cur[IDX_HII]; - data[jistart + 16702] = 0.0 + k[922]*y_cur[IDX_eM] + - k[6409]*y_cur[IDX_GRAINM]; - data[jistart + 16703] = 0.0 - k[5035]*y_cur[IDX_NH2I] + - k[5036]*y_cur[IDX_NH3I]; - data[jistart + 16704] = 0.0 - k[2086]*y_cur[IDX_NH2I]; - data[jistart + 16705] = 0.0 + k[2199]*y_cur[IDX_HCNII] - - k[5297]*y_cur[IDX_NH2I] + k[5304]*y_cur[IDX_NHI]; - data[jistart + 16706] = 0.0 - k[3533]*y_cur[IDX_NH2I]; - data[jistart + 16707] = 0.0 + k[5302]*y_cur[IDX_NH3I]; - data[jistart + 16708] = 0.0 - k[586]*y_cur[IDX_NH2I]; - data[jistart + 16709] = 0.0 - k[587]*y_cur[IDX_NH2I] - - k[3534]*y_cur[IDX_NH2I] + k[3573]*y_cur[IDX_NH3I]; - data[jistart + 16710] = 0.0 + k[8581]*y_cur[IDX_GNHI]; - data[jistart + 16711] = 0.0 + k[8581]*y_cur[IDX_GHI]; - data[jistart + 16712] = 0.0 + k[7079] + k[7261] + k[7443]; - data[jistart + 16713] = 0.0 + k[6330]*y_cur[IDX_NH3II] + - k[6337]*y_cur[IDX_NH4II] + k[6338]*y_cur[IDX_NH4II] + - k[6409]*y_cur[IDX_CH2NH2II] + k[6526]*y_cur[IDX_NH2CNHII] + - k[6539]*y_cur[IDX_H2NCOII] + k[6593]*y_cur[IDX_PNH2II] + - k[6618]*y_cur[IDX_PNH3II]; - data[jistart + 16714] = 0.0 + k[5175]*y_cur[IDX_HNOI] - - k[5182]*y_cur[IDX_NH2I] + k[5183]*y_cur[IDX_NH3I]; - data[jistart + 16715] = 0.0 - k[400]*y_cur[IDX_NH2I] + - k[2318]*y_cur[IDX_CH2NHI]; - data[jistart + 16716] = 0.0 - k[78]*y_cur[IDX_NH2I] + - k[79]*y_cur[IDX_NHI]; - data[jistart + 16717] = 0.0 - k[5142]*y_cur[IDX_NH2I] + - k[5143]*y_cur[IDX_NHI]; - data[jistart + 16718] = 0.0 - k[451]*y_cur[IDX_NH2I]; - data[jistart + 16719] = 0.0 + k[3488]*y_cur[IDX_NHII]; - data[jistart + 16720] = 0.0 - k[3535]*y_cur[IDX_NH2I]; - data[jistart + 16721] = 0.0 + k[1009]*y_cur[IDX_eM] + - k[6539]*y_cur[IDX_GRAINM]; - data[jistart + 16722] = 0.0 + k[5306]*y_cur[IDX_NHI]; - data[jistart + 16723] = 0.0 - k[588]*y_cur[IDX_NH2I] - - k[3536]*y_cur[IDX_NH2I]; - data[jistart + 16724] = 0.0 + k[580]*y_cur[IDX_NH2II]; - data[jistart + 16725] = 0.0 - k[2721]*y_cur[IDX_NH2I]; - data[jistart + 16726] = 0.0 - k[3537]*y_cur[IDX_NH2I]; - data[jistart + 16727] = 0.0 - k[3538]*y_cur[IDX_NH2I]; - data[jistart + 16728] = 0.0 + k[5470]*y_cur[IDX_OHI]; - data[jistart + 16729] = 0.0 + k[2199]*y_cur[IDX_CH4I] - - k[3539]*y_cur[IDX_NH2I] + k[3581]*y_cur[IDX_NH3I]; - data[jistart + 16730] = 0.0 - k[3540]*y_cur[IDX_NH2I] - - k[3541]*y_cur[IDX_NH2I]; - data[jistart + 16731] = 0.0 + k[581]*y_cur[IDX_NH2II]; - data[jistart + 16732] = 0.0 - k[3542]*y_cur[IDX_NH2I]; - data[jistart + 16733] = 0.0 + k[5175]*y_cur[IDX_HI]; - data[jistart + 16734] = 0.0 - k[3543]*y_cur[IDX_NH2I]; - data[jistart + 16735] = 0.0 - k[3280]*y_cur[IDX_NH2I] - - k[3281]*y_cur[IDX_NH2I]; - data[jistart + 16736] = 0.0 - k[557]*y_cur[IDX_NH2I]; - data[jistart + 16737] = 0.0 - k[589]*y_cur[IDX_NH2I]; - data[jistart + 16738] = 0.0 - k[3544]*y_cur[IDX_NH2I]; - data[jistart + 16739] = 0.0 + k[79]*y_cur[IDX_HM] + - k[5143]*y_cur[IDX_H2I] + k[5304]*y_cur[IDX_CH4I] + - k[5306]*y_cur[IDX_H2OI] + k[5307]*y_cur[IDX_NH3I] + - k[5307]*y_cur[IDX_NH3I] + k[5310]*y_cur[IDX_NHI] + - k[5310]*y_cur[IDX_NHI] + k[5323]*y_cur[IDX_OHI]; - data[jistart + 16740] = 0.0 + k[3488]*y_cur[IDX_H2COI] - - k[3497]*y_cur[IDX_NH2I]; - data[jistart + 16741] = 0.0 - k[78]*y_cur[IDX_HM] - - k[400]*y_cur[IDX_HII] - k[451]*y_cur[IDX_H2II] - - k[557]*y_cur[IDX_NII] - k[585]*y_cur[IDX_C2II] - - k[586]*y_cur[IDX_CNII] - k[587]*y_cur[IDX_COII] - - k[588]*y_cur[IDX_H2OII] - k[589]*y_cur[IDX_N2II] - - k[590]*y_cur[IDX_O2II] - k[591]*y_cur[IDX_OHII] - - k[660]*y_cur[IDX_OII] - k[1417]*y_cur[IDX_CII] - - k[1962]*y_cur[IDX_CHII] - k[2086]*y_cur[IDX_CH3II] - - k[2721]*y_cur[IDX_H3II] - k[3280]*y_cur[IDX_HeII] - - k[3281]*y_cur[IDX_HeII] - k[3497]*y_cur[IDX_NHII] - - k[3522]*y_cur[IDX_NH2II] - k[3528]*y_cur[IDX_C2II] - - k[3529]*y_cur[IDX_C2HII] - k[3530]*y_cur[IDX_C2HII] - - k[3531]*y_cur[IDX_C2H2II] - k[3532]*y_cur[IDX_C2H2II] - - k[3533]*y_cur[IDX_CH5II] - k[3534]*y_cur[IDX_COII] - - k[3535]*y_cur[IDX_H2COII] - k[3536]*y_cur[IDX_H2OII] - - k[3537]*y_cur[IDX_H3COII] - k[3538]*y_cur[IDX_H3OII] - - k[3539]*y_cur[IDX_HCNII] - k[3540]*y_cur[IDX_HCNHII] - - k[3541]*y_cur[IDX_HCNHII] - k[3542]*y_cur[IDX_HCOII] - - k[3543]*y_cur[IDX_HNOII] - k[3544]*y_cur[IDX_N2HII] - - k[3545]*y_cur[IDX_NH3II] - k[3546]*y_cur[IDX_O2HII] - - k[3547]*y_cur[IDX_OHII] - k[4969]*y_cur[IDX_CI] - - k[4970]*y_cur[IDX_CI] - k[4971]*y_cur[IDX_CI] - - k[5035]*y_cur[IDX_CH3I] - k[5142]*y_cur[IDX_H2I] - - k[5182]*y_cur[IDX_HI] - k[5297]*y_cur[IDX_CH4I] - - k[5298]*y_cur[IDX_NOI] - k[5299]*y_cur[IDX_NOI] - - k[5300]*y_cur[IDX_OHI] - k[5301]*y_cur[IDX_OHI] - - k[5420]*y_cur[IDX_OI] - k[5421]*y_cur[IDX_OI] - k[5882] - k[5883] - - k[6218] - k[6219] - k[6897]; - data[jistart + 16742] = 0.0 + k[265]*y_cur[IDX_CH2I] + - k[294]*y_cur[IDX_CHI] + k[580]*y_cur[IDX_H2SI] + - k[581]*y_cur[IDX_HCOI] + k[582]*y_cur[IDX_NH3I] + - k[583]*y_cur[IDX_NOI] + k[584]*y_cur[IDX_SI] - - k[3522]*y_cur[IDX_NH2I]; - data[jistart + 16743] = 0.0 + k[5884] + k[6220]; - data[jistart + 16744] = 0.0 + k[1161]*y_cur[IDX_eM] + - k[6526]*y_cur[IDX_GRAINM]; - data[jistart + 16745] = 0.0 + k[582]*y_cur[IDX_NH2II] + - k[3553]*y_cur[IDX_NH3II] + k[3573]*y_cur[IDX_COII] + - k[3581]*y_cur[IDX_HCNII] + k[5036]*y_cur[IDX_CH3I] + - k[5183]*y_cur[IDX_HI] + k[5302]*y_cur[IDX_CNI] + - k[5307]*y_cur[IDX_NHI] + k[5307]*y_cur[IDX_NHI] + - k[5422]*y_cur[IDX_OI] + k[5476]*y_cur[IDX_OHI] + k[5885] + k[6221]; - data[jistart + 16746] = 0.0 + k[1163]*y_cur[IDX_eM] + - k[2013]*y_cur[IDX_CH2I] - k[3545]*y_cur[IDX_NH2I] + - k[3553]*y_cur[IDX_NH3I] + k[6330]*y_cur[IDX_GRAINM]; - data[jistart + 16747] = 0.0 + k[1165]*y_cur[IDX_eM] + - k[1166]*y_cur[IDX_eM] + k[6337]*y_cur[IDX_GRAINM] + - k[6338]*y_cur[IDX_GRAINM]; - data[jistart + 16748] = 0.0 + k[583]*y_cur[IDX_NH2II] - - k[5298]*y_cur[IDX_NH2I] - k[5299]*y_cur[IDX_NH2I]; - data[jistart + 16749] = 0.0 - k[5420]*y_cur[IDX_NH2I] - - k[5421]*y_cur[IDX_NH2I] + k[5422]*y_cur[IDX_NH3I]; - data[jistart + 16750] = 0.0 - k[660]*y_cur[IDX_NH2I]; - data[jistart + 16751] = 0.0 - k[590]*y_cur[IDX_NH2I]; - data[jistart + 16752] = 0.0 - k[3546]*y_cur[IDX_NH2I]; - data[jistart + 16753] = 0.0 - k[5300]*y_cur[IDX_NH2I] - - k[5301]*y_cur[IDX_NH2I] + k[5323]*y_cur[IDX_NHI] + - k[5470]*y_cur[IDX_HCNI] + k[5476]*y_cur[IDX_NH3I]; - data[jistart + 16754] = 0.0 - k[591]*y_cur[IDX_NH2I] - - k[3547]*y_cur[IDX_NH2I]; - data[jistart + 16755] = 0.0 + k[1212]*y_cur[IDX_eM] + - k[6593]*y_cur[IDX_GRAINM]; - data[jistart + 16756] = 0.0 + k[1216]*y_cur[IDX_eM] + - k[6618]*y_cur[IDX_GRAINM]; - data[jistart + 16757] = 0.0 + k[584]*y_cur[IDX_NH2II]; - data[jistart + 16758] = 0.0 + k[922]*y_cur[IDX_CH2NH2II] + - k[1009]*y_cur[IDX_H2NCOII] + k[1161]*y_cur[IDX_NH2CNHII] + - k[1163]*y_cur[IDX_NH3II] + k[1165]*y_cur[IDX_NH4II] + - k[1166]*y_cur[IDX_NH4II] + k[1212]*y_cur[IDX_PNH2II] + - k[1216]*y_cur[IDX_PNH3II]; - data[jistart + 16759] = 0.0 - k[3507]*y_cur[IDX_NH2II]; - data[jistart + 16760] = 0.0 + k[585]*y_cur[IDX_NH2I]; - data[jistart + 16761] = 0.0 - k[3508]*y_cur[IDX_NH2II]; - data[jistart + 16762] = 0.0 - k[294]*y_cur[IDX_NH2II] - - k[2259]*y_cur[IDX_NH2II]; - data[jistart + 16763] = 0.0 - k[265]*y_cur[IDX_NH2II] - - k[2012]*y_cur[IDX_NH2II]; - data[jistart + 16764] = 0.0 + k[2317]*y_cur[IDX_HII]; - data[jistart + 16765] = 0.0 + k[3609]*y_cur[IDX_NHI]; - data[jistart + 16766] = 0.0 - k[3509]*y_cur[IDX_NH2II]; - data[jistart + 16767] = 0.0 + k[586]*y_cur[IDX_NH2I]; - data[jistart + 16768] = 0.0 + k[587]*y_cur[IDX_NH2I]; - data[jistart + 16769] = 0.0 - k[6324]*y_cur[IDX_NH2II] - - k[6325]*y_cur[IDX_NH2II]; - data[jistart + 16770] = 0.0 + k[400]*y_cur[IDX_NH2I] + - k[2317]*y_cur[IDX_CH2NHI] + k[2348]*y_cur[IDX_HNCOI]; - data[jistart + 16771] = 0.0 + k[2462]*y_cur[IDX_NHII] - - k[2463]*y_cur[IDX_NH2II]; - data[jistart + 16772] = 0.0 + k[451]*y_cur[IDX_NH2I] + - k[2393]*y_cur[IDX_NHI]; - data[jistart + 16773] = 0.0 - k[3510]*y_cur[IDX_NH2II] - - k[3511]*y_cur[IDX_NH2II]; - data[jistart + 16774] = 0.0 + k[3492]*y_cur[IDX_NHII] - - k[3512]*y_cur[IDX_NH2II] - k[3513]*y_cur[IDX_NH2II] - - k[3514]*y_cur[IDX_NH2II]; - data[jistart + 16775] = 0.0 + k[588]*y_cur[IDX_NH2I]; - data[jistart + 16776] = 0.0 - k[580]*y_cur[IDX_NH2II] - - k[3515]*y_cur[IDX_NH2II] - k[3516]*y_cur[IDX_NH2II] - - k[3517]*y_cur[IDX_NH2II] - k[3518]*y_cur[IDX_NH2II]; - data[jistart + 16777] = 0.0 + k[2724]*y_cur[IDX_NHI]; - data[jistart + 16778] = 0.0 - k[3519]*y_cur[IDX_NH2II]; - data[jistart + 16779] = 0.0 + k[3613]*y_cur[IDX_NHI]; - data[jistart + 16780] = 0.0 - k[581]*y_cur[IDX_NH2II] - - k[3520]*y_cur[IDX_NH2II]; - data[jistart + 16781] = 0.0 + k[3614]*y_cur[IDX_NHI]; - data[jistart + 16782] = 0.0 - k[3521]*y_cur[IDX_NH2II]; - data[jistart + 16783] = 0.0 + k[2348]*y_cur[IDX_HII]; - data[jistart + 16784] = 0.0 + k[3615]*y_cur[IDX_NHI]; - data[jistart + 16785] = 0.0 + k[3282]*y_cur[IDX_NH2CNI] + - k[3284]*y_cur[IDX_NH3I]; - data[jistart + 16786] = 0.0 - k[3464]*y_cur[IDX_NH2II]; - data[jistart + 16787] = 0.0 + k[557]*y_cur[IDX_NH2I] + - k[3354]*y_cur[IDX_NH3I]; - data[jistart + 16788] = 0.0 + k[589]*y_cur[IDX_NH2I]; - data[jistart + 16789] = 0.0 + k[3616]*y_cur[IDX_NHI]; - data[jistart + 16790] = 0.0 + k[2393]*y_cur[IDX_H2II] + - k[2724]*y_cur[IDX_H3II] + k[3499]*y_cur[IDX_NHII] + - k[3609]*y_cur[IDX_CH5II] + k[3613]*y_cur[IDX_HCNII] + - k[3614]*y_cur[IDX_HCOII] + k[3615]*y_cur[IDX_HNOII] + - k[3616]*y_cur[IDX_N2HII] - k[3617]*y_cur[IDX_NH2II] + - k[3622]*y_cur[IDX_O2HII] + k[3623]*y_cur[IDX_OHII]; - data[jistart + 16791] = 0.0 + k[2462]*y_cur[IDX_H2I] + - k[3492]*y_cur[IDX_H2OI] + k[3499]*y_cur[IDX_NHI]; - data[jistart + 16792] = 0.0 + k[400]*y_cur[IDX_HII] + - k[451]*y_cur[IDX_H2II] + k[557]*y_cur[IDX_NII] + - k[585]*y_cur[IDX_C2II] + k[586]*y_cur[IDX_CNII] + - k[587]*y_cur[IDX_COII] + k[588]*y_cur[IDX_H2OII] + - k[589]*y_cur[IDX_N2II] + k[590]*y_cur[IDX_O2II] + - k[591]*y_cur[IDX_OHII] + k[660]*y_cur[IDX_OII] - - k[3522]*y_cur[IDX_NH2II] + k[5882] + k[6218]; - data[jistart + 16793] = 0.0 - k[265]*y_cur[IDX_CH2I] - - k[294]*y_cur[IDX_CHI] - k[580]*y_cur[IDX_H2SI] - - k[581]*y_cur[IDX_HCOI] - k[582]*y_cur[IDX_NH3I] - - k[583]*y_cur[IDX_NOI] - k[584]*y_cur[IDX_SI] - k[1159]*y_cur[IDX_eM] - - k[1160]*y_cur[IDX_eM] - k[2012]*y_cur[IDX_CH2I] - - k[2259]*y_cur[IDX_CHI] - k[2463]*y_cur[IDX_H2I] - - k[3464]*y_cur[IDX_NI] - k[3507]*y_cur[IDX_C2I] - - k[3508]*y_cur[IDX_C2HI] - k[3509]*y_cur[IDX_CNI] - - k[3510]*y_cur[IDX_H2COI] - k[3511]*y_cur[IDX_H2COI] - - k[3512]*y_cur[IDX_H2OI] - k[3513]*y_cur[IDX_H2OI] - - k[3514]*y_cur[IDX_H2OI] - k[3515]*y_cur[IDX_H2SI] - - k[3516]*y_cur[IDX_H2SI] - k[3517]*y_cur[IDX_H2SI] - - k[3518]*y_cur[IDX_H2SI] - k[3519]*y_cur[IDX_HCNI] - - k[3520]*y_cur[IDX_HCOI] - k[3521]*y_cur[IDX_HNCI] - - k[3522]*y_cur[IDX_NH2I] - k[3523]*y_cur[IDX_NH3I] - - k[3524]*y_cur[IDX_O2I] - k[3525]*y_cur[IDX_O2I] - - k[3526]*y_cur[IDX_SI] - k[3527]*y_cur[IDX_SI] - - k[3617]*y_cur[IDX_NHI] - k[3746]*y_cur[IDX_OI] - - k[6324]*y_cur[IDX_GRAINM] - k[6325]*y_cur[IDX_GRAINM]; - data[jistart + 16794] = 0.0 + k[3282]*y_cur[IDX_HeII]; - data[jistart + 16795] = 0.0 - k[582]*y_cur[IDX_NH2II] + - k[3284]*y_cur[IDX_HeII] + k[3354]*y_cur[IDX_NII] - - k[3523]*y_cur[IDX_NH2II]; - data[jistart + 16796] = 0.0 - k[583]*y_cur[IDX_NH2II]; - data[jistart + 16797] = 0.0 - k[3746]*y_cur[IDX_NH2II]; - data[jistart + 16798] = 0.0 + k[660]*y_cur[IDX_NH2I]; - data[jistart + 16799] = 0.0 - k[3524]*y_cur[IDX_NH2II] - - k[3525]*y_cur[IDX_NH2II]; - data[jistart + 16800] = 0.0 + k[590]*y_cur[IDX_NH2I]; - data[jistart + 16801] = 0.0 + k[3622]*y_cur[IDX_NHI]; - data[jistart + 16802] = 0.0 + k[591]*y_cur[IDX_NH2I] + - k[3623]*y_cur[IDX_NHI]; - data[jistart + 16803] = 0.0 - k[584]*y_cur[IDX_NH2II] - - k[3526]*y_cur[IDX_NH2II] - k[3527]*y_cur[IDX_NH2II]; - data[jistart + 16804] = 0.0 - k[1159]*y_cur[IDX_NH2II] - - k[1160]*y_cur[IDX_NH2II]; - data[jistart + 16805] = 0.0 + k[5303]*y_cur[IDX_NH3I]; - data[jistart + 16806] = 0.0 + k[7144] + k[7326] + k[7508]; - data[jistart + 16807] = 0.0 + k[6527]*y_cur[IDX_NH2CNHII]; - data[jistart + 16808] = 0.0 - k[2722]*y_cur[IDX_NH2CNI]; - data[jistart + 16809] = 0.0 - k[2980]*y_cur[IDX_NH2CNI]; - data[jistart + 16810] = 0.0 - k[3282]*y_cur[IDX_NH2CNI]; - data[jistart + 16811] = 0.0 - k[2722]*y_cur[IDX_H3II] - - k[2980]*y_cur[IDX_HCOII] - k[3282]*y_cur[IDX_HeII] - k[5884] - - k[6220] - k[6962]; - data[jistart + 16812] = 0.0 + k[1162]*y_cur[IDX_eM] + - k[6527]*y_cur[IDX_GRAINM]; - data[jistart + 16813] = 0.0 + k[5303]*y_cur[IDX_CNI]; - data[jistart + 16814] = 0.0 + k[1162]*y_cur[IDX_NH2CNHII]; - data[jistart + 16815] = 0.0 - k[6526]*y_cur[IDX_NH2CNHII] - - k[6527]*y_cur[IDX_NH2CNHII]; - data[jistart + 16816] = 0.0 + k[2722]*y_cur[IDX_NH2CNI]; - data[jistart + 16817] = 0.0 + k[2980]*y_cur[IDX_NH2CNI]; - data[jistart + 16818] = 0.0 + k[2722]*y_cur[IDX_H3II] + - k[2980]*y_cur[IDX_HCOII]; - data[jistart + 16819] = 0.0 - k[1161]*y_cur[IDX_eM] - - k[1162]*y_cur[IDX_eM] - k[6526]*y_cur[IDX_GRAINM] - - k[6527]*y_cur[IDX_GRAINM]; - data[jistart + 16820] = 0.0 - k[1161]*y_cur[IDX_NH2CNHII] - - k[1162]*y_cur[IDX_NH2CNHII]; - data[jistart + 16821] = 0.0 - k[185]*y_cur[IDX_NH3I] - - k[1418]*y_cur[IDX_NH3I] - k[1419]*y_cur[IDX_NH3I]; - data[jistart + 16822] = 0.0 + k[3910]*y_cur[IDX_NH3II] + - k[3911]*y_cur[IDX_NH4II]; - data[jistart + 16823] = 0.0 + k[3945]*y_cur[IDX_NH3II] + - k[3946]*y_cur[IDX_NH4II]; - data[jistart + 16824] = 0.0 + k[3980]*y_cur[IDX_NH3II] + - k[3981]*y_cur[IDX_NH4II]; - data[jistart + 16825] = 0.0 + k[4015]*y_cur[IDX_NH3II] + - k[4016]*y_cur[IDX_NH4II]; - data[jistart + 16826] = 0.0 - k[3554]*y_cur[IDX_NH3I] - - k[3555]*y_cur[IDX_NH3I]; - data[jistart + 16827] = 0.0 + k[4050]*y_cur[IDX_NH3II] + - k[4051]*y_cur[IDX_NH4II]; - data[jistart + 16828] = 0.0 - k[598]*y_cur[IDX_NH3I] - - k[3556]*y_cur[IDX_NH3I]; - data[jistart + 16829] = 0.0 - k[3557]*y_cur[IDX_NH3I]; - data[jistart + 16830] = 0.0 - k[599]*y_cur[IDX_NH3I]; - data[jistart + 16831] = 0.0 - k[3558]*y_cur[IDX_NH3I]; - data[jistart + 16832] = 0.0 - k[3559]*y_cur[IDX_NH3I]; - data[jistart + 16833] = 0.0 - k[601]*y_cur[IDX_NH3I] - - k[3568]*y_cur[IDX_NH3I]; - data[jistart + 16834] = 0.0 - k[3560]*y_cur[IDX_NH3I]; - data[jistart + 16835] = 0.0 - k[3561]*y_cur[IDX_NH3I]; - data[jistart + 16836] = 0.0 + k[4085]*y_cur[IDX_NH3II] + - k[4086]*y_cur[IDX_NH4II]; - data[jistart + 16837] = 0.0 - k[600]*y_cur[IDX_NH3I] - - k[3562]*y_cur[IDX_NH3I] - k[3563]*y_cur[IDX_NH3I]; - data[jistart + 16838] = 0.0 + k[4120]*y_cur[IDX_NH3II] + - k[4121]*y_cur[IDX_NH4II]; - data[jistart + 16839] = 0.0 - k[3564]*y_cur[IDX_NH3I] - - k[3565]*y_cur[IDX_NH3I]; - data[jistart + 16840] = 0.0 - k[1818]*y_cur[IDX_NH3I]; - data[jistart + 16841] = 0.0 + k[4155]*y_cur[IDX_NH3II] + - k[4156]*y_cur[IDX_NH4II]; - data[jistart + 16842] = 0.0 + k[4190]*y_cur[IDX_NH3II] + - k[4191]*y_cur[IDX_NH4II]; - data[jistart + 16843] = 0.0 + k[4225]*y_cur[IDX_NH3II] + - k[4226]*y_cur[IDX_NH4II]; - data[jistart + 16844] = 0.0 + k[4260]*y_cur[IDX_NH3II] + - k[4261]*y_cur[IDX_NH4II]; - data[jistart + 16845] = 0.0 + k[4295]*y_cur[IDX_NH3II] + - k[4296]*y_cur[IDX_NH4II]; - data[jistart + 16846] = 0.0 + k[4330]*y_cur[IDX_NH3II] + - k[4331]*y_cur[IDX_NH4II]; - data[jistart + 16847] = 0.0 + k[4365]*y_cur[IDX_NH3II] + - k[4366]*y_cur[IDX_NH4II]; - data[jistart + 16848] = 0.0 + k[4400]*y_cur[IDX_NH3II] + - k[4401]*y_cur[IDX_NH4II]; - data[jistart + 16849] = 0.0 + k[4435]*y_cur[IDX_NH3II] + - k[4436]*y_cur[IDX_NH4II]; - data[jistart + 16850] = 0.0 + k[4470]*y_cur[IDX_NH3II] + - k[4471]*y_cur[IDX_NH4II]; - data[jistart + 16851] = 0.0 + k[4505]*y_cur[IDX_NH3II] + - k[4506]*y_cur[IDX_NH4II]; - data[jistart + 16852] = 0.0 + k[4540]*y_cur[IDX_NH3II] + - k[4541]*y_cur[IDX_NH4II]; - data[jistart + 16853] = 0.0 + k[4575]*y_cur[IDX_NH3II] + - k[4576]*y_cur[IDX_NH4II]; - data[jistart + 16854] = 0.0 + k[4610]*y_cur[IDX_NH3II] + - k[4611]*y_cur[IDX_NH4II]; - data[jistart + 16855] = 0.0 - k[3566]*y_cur[IDX_NH3I]; - data[jistart + 16856] = 0.0 - k[5082]*y_cur[IDX_NH3I]; - data[jistart + 16857] = 0.0 - k[253]*y_cur[IDX_NH3I] - - k[1963]*y_cur[IDX_NH3I] - k[1964]*y_cur[IDX_NH3I]; - data[jistart + 16858] = 0.0 + k[4645]*y_cur[IDX_NH3II] + - k[4646]*y_cur[IDX_NH4II]; - data[jistart + 16859] = 0.0 - k[1988]*y_cur[IDX_NH3I] - - k[1989]*y_cur[IDX_NH3I]; - data[jistart + 16860] = 0.0 - k[3567]*y_cur[IDX_NH3I]; - data[jistart + 16861] = 0.0 - k[5036]*y_cur[IDX_NH3I]; - data[jistart + 16862] = 0.0 - k[2087]*y_cur[IDX_NH3I] - - k[2088]*y_cur[IDX_NH3I]; - data[jistart + 16863] = 0.0 - k[3569]*y_cur[IDX_NH3I] - - k[3570]*y_cur[IDX_NH3I]; - data[jistart + 16864] = 0.0 - k[2121]*y_cur[IDX_NH3I]; - data[jistart + 16865] = 0.0 + k[5297]*y_cur[IDX_NH2I]; - data[jistart + 16866] = 0.0 - k[282]*y_cur[IDX_NH3I] - - k[2144]*y_cur[IDX_NH3I]; - data[jistart + 16867] = 0.0 - k[3571]*y_cur[IDX_NH3I]; - data[jistart + 16868] = 0.0 - k[5302]*y_cur[IDX_NH3I] - - k[5303]*y_cur[IDX_NH3I]; - data[jistart + 16869] = 0.0 + k[4680]*y_cur[IDX_NH3II] + - k[4681]*y_cur[IDX_NH4II]; - data[jistart + 16870] = 0.0 - k[3572]*y_cur[IDX_NH3I]; - data[jistart + 16871] = 0.0 - k[602]*y_cur[IDX_NH3I] - - k[3573]*y_cur[IDX_NH3I]; - data[jistart + 16872] = 0.0 - k[603]*y_cur[IDX_NH3I]; - data[jistart + 16873] = 0.0 + k[592]*y_cur[IDX_NH3II]; - data[jistart + 16874] = 0.0 + k[8582]*y_cur[IDX_GNH2I]; - data[jistart + 16875] = 0.0 + k[8582]*y_cur[IDX_GHI]; - data[jistart + 16876] = 0.0 + k[7082] + k[7264] + k[7446]; - data[jistart + 16877] = 0.0 + k[6339]*y_cur[IDX_NH4II] + - k[6617]*y_cur[IDX_PNH3II]; - data[jistart + 16878] = 0.0 - k[5183]*y_cur[IDX_NH3I]; - data[jistart + 16879] = 0.0 - k[401]*y_cur[IDX_NH3I]; - data[jistart + 16880] = 0.0 + k[78]*y_cur[IDX_NH2I] + - k[4716]*y_cur[IDX_NH3II] + k[4717]*y_cur[IDX_NH4II]; - data[jistart + 16881] = 0.0 + k[5142]*y_cur[IDX_NH2I]; - data[jistart + 16882] = 0.0 - k[452]*y_cur[IDX_NH3I]; - data[jistart + 16883] = 0.0 - k[604]*y_cur[IDX_NH3I] - - k[3574]*y_cur[IDX_NH3I]; - data[jistart + 16884] = 0.0 - k[605]*y_cur[IDX_NH3I] - - k[3575]*y_cur[IDX_NH3I]; - data[jistart + 16885] = 0.0 + k[3516]*y_cur[IDX_NH2II]; - data[jistart + 16886] = 0.0 - k[606]*y_cur[IDX_NH3I] - - k[3576]*y_cur[IDX_NH3I]; - data[jistart + 16887] = 0.0 - k[2723]*y_cur[IDX_NH3I]; - data[jistart + 16888] = 0.0 - k[3577]*y_cur[IDX_NH3I]; - data[jistart + 16889] = 0.0 - k[3578]*y_cur[IDX_NH3I]; - data[jistart + 16890] = 0.0 - k[3579]*y_cur[IDX_NH3I]; - data[jistart + 16891] = 0.0 - k[607]*y_cur[IDX_NH3I]; - data[jistart + 16892] = 0.0 - k[3580]*y_cur[IDX_NH3I]; - data[jistart + 16893] = 0.0 - k[608]*y_cur[IDX_NH3I] - - k[3581]*y_cur[IDX_NH3I]; - data[jistart + 16894] = 0.0 - k[3582]*y_cur[IDX_NH3I] - - k[3583]*y_cur[IDX_NH3I]; - data[jistart + 16895] = 0.0 + k[593]*y_cur[IDX_NH3II]; - data[jistart + 16896] = 0.0 - k[3584]*y_cur[IDX_NH3I]; - data[jistart + 16897] = 0.0 - k[3585]*y_cur[IDX_NH3I]; - data[jistart + 16898] = 0.0 - k[3586]*y_cur[IDX_NH3I]; - data[jistart + 16899] = 0.0 - k[3587]*y_cur[IDX_NH3I]; - data[jistart + 16900] = 0.0 - k[3588]*y_cur[IDX_NH3I]; - data[jistart + 16901] = 0.0 - k[609]*y_cur[IDX_NH3I] - - k[3589]*y_cur[IDX_NH3I]; - data[jistart + 16902] = 0.0 - k[3590]*y_cur[IDX_NH3I]; - data[jistart + 16903] = 0.0 - k[3591]*y_cur[IDX_NH3I]; - data[jistart + 16904] = 0.0 - k[524]*y_cur[IDX_NH3I] - - k[3283]*y_cur[IDX_NH3I] - k[3284]*y_cur[IDX_NH3I]; - data[jistart + 16905] = 0.0 + k[594]*y_cur[IDX_NH3II]; - data[jistart + 16906] = 0.0 - k[558]*y_cur[IDX_NH3I] - - k[3353]*y_cur[IDX_NH3I] - k[3354]*y_cur[IDX_NH3I]; - data[jistart + 16907] = 0.0 - k[610]*y_cur[IDX_NH3I]; - data[jistart + 16908] = 0.0 - k[3592]*y_cur[IDX_NH3I]; - data[jistart + 16909] = 0.0 - k[3593]*y_cur[IDX_NH3I]; - data[jistart + 16910] = 0.0 - k[5307]*y_cur[IDX_NH3I]; - data[jistart + 16911] = 0.0 - k[576]*y_cur[IDX_NH3I] - - k[3498]*y_cur[IDX_NH3I]; - data[jistart + 16912] = 0.0 + k[78]*y_cur[IDX_HM] + - k[5142]*y_cur[IDX_H2I] + k[5297]*y_cur[IDX_CH4I] + - k[5301]*y_cur[IDX_OHI]; - data[jistart + 16913] = 0.0 - k[582]*y_cur[IDX_NH3I] + - k[3516]*y_cur[IDX_H2SI] - k[3523]*y_cur[IDX_NH3I]; - data[jistart + 16914] = 0.0 - k[185]*y_cur[IDX_CII] - - k[253]*y_cur[IDX_CHII] - k[282]*y_cur[IDX_CH4II] - - k[401]*y_cur[IDX_HII] - k[452]*y_cur[IDX_H2II] - - k[524]*y_cur[IDX_HeII] - k[558]*y_cur[IDX_NII] - - k[576]*y_cur[IDX_NHII] - k[582]*y_cur[IDX_NH2II] - - k[598]*y_cur[IDX_C2H2II] - k[599]*y_cur[IDX_C2H4II] - - k[600]*y_cur[IDX_C3HII] - k[601]*y_cur[IDX_C2H6II] - - k[602]*y_cur[IDX_COII] - k[603]*y_cur[IDX_CO2II] - - k[604]*y_cur[IDX_H2COII] - k[605]*y_cur[IDX_H2OII] - - k[606]*y_cur[IDX_H2SII] - k[607]*y_cur[IDX_HC3NII] - - k[608]*y_cur[IDX_HCNII] - k[609]*y_cur[IDX_HSII] - - k[610]*y_cur[IDX_N2II] - k[611]*y_cur[IDX_O2II] - - k[612]*y_cur[IDX_OCSII] - k[613]*y_cur[IDX_PII] - - k[614]*y_cur[IDX_SII] - k[615]*y_cur[IDX_SOII] - - k[661]*y_cur[IDX_OII] - k[692]*y_cur[IDX_OHII] - - k[1418]*y_cur[IDX_CII] - k[1419]*y_cur[IDX_CII] - - k[1818]*y_cur[IDX_C3H7II] - k[1963]*y_cur[IDX_CHII] - - k[1964]*y_cur[IDX_CHII] - k[1988]*y_cur[IDX_CH2II] - - k[1989]*y_cur[IDX_CH2II] - k[2087]*y_cur[IDX_CH3II] - - k[2088]*y_cur[IDX_CH3II] - k[2121]*y_cur[IDX_CH3OH2II] - - k[2144]*y_cur[IDX_CH4II] - k[2723]*y_cur[IDX_H3II] - - k[3283]*y_cur[IDX_HeII] - k[3284]*y_cur[IDX_HeII] - - k[3353]*y_cur[IDX_NII] - k[3354]*y_cur[IDX_NII] - - k[3498]*y_cur[IDX_NHII] - k[3523]*y_cur[IDX_NH2II] - - k[3553]*y_cur[IDX_NH3II] - k[3554]*y_cur[IDX_C2HII] - - k[3555]*y_cur[IDX_C2HII] - k[3556]*y_cur[IDX_C2H2II] - - k[3557]*y_cur[IDX_C2H3II] - k[3558]*y_cur[IDX_C2H5II] - - k[3559]*y_cur[IDX_C2H5OH2II] - k[3560]*y_cur[IDX_C2H7II] - - k[3561]*y_cur[IDX_C2NII] - k[3562]*y_cur[IDX_C3HII] - - k[3563]*y_cur[IDX_C3HII] - k[3564]*y_cur[IDX_C3H3II] - - k[3565]*y_cur[IDX_C3H3II] - k[3566]*y_cur[IDX_CClII] - - k[3567]*y_cur[IDX_CH2CHCNHII] - k[3568]*y_cur[IDX_C2H6II] - - k[3569]*y_cur[IDX_CH3CHOHII] - k[3570]*y_cur[IDX_CH3CHOHII] - - k[3571]*y_cur[IDX_CH5II] - k[3572]*y_cur[IDX_CNCII] - - k[3573]*y_cur[IDX_COII] - k[3574]*y_cur[IDX_H2COII] - - k[3575]*y_cur[IDX_H2OII] - k[3576]*y_cur[IDX_H2SII] - - k[3577]*y_cur[IDX_H3COII] - k[3578]*y_cur[IDX_H3OII] - - k[3579]*y_cur[IDX_H3SII] - k[3580]*y_cur[IDX_HC3NHII] - - k[3581]*y_cur[IDX_HCNII] - k[3582]*y_cur[IDX_HCNHII] - - k[3583]*y_cur[IDX_HCNHII] - k[3584]*y_cur[IDX_HCOII] - - k[3585]*y_cur[IDX_HCO2II] - k[3586]*y_cur[IDX_HCOOH2II] - - k[3587]*y_cur[IDX_HCSII] - k[3588]*y_cur[IDX_HNOII] - - k[3589]*y_cur[IDX_HSII] - k[3590]*y_cur[IDX_HSO2II] - - k[3591]*y_cur[IDX_HSiSII] - k[3592]*y_cur[IDX_N2HII] - - k[3593]*y_cur[IDX_NCCNHII] - k[3594]*y_cur[IDX_O2HII] - - k[3595]*y_cur[IDX_PII] - k[3596]*y_cur[IDX_PHII] - - k[3597]*y_cur[IDX_PHII] - k[3598]*y_cur[IDX_PHII] - - k[3599]*y_cur[IDX_PH2II] - k[3600]*y_cur[IDX_PH2II] - - k[3601]*y_cur[IDX_PH3II] - k[3602]*y_cur[IDX_SiII] - - k[3603]*y_cur[IDX_SiHII] - k[3604]*y_cur[IDX_SiOHII] - - k[3786]*y_cur[IDX_OHII] - k[5036]*y_cur[IDX_CH3I] - - k[5082]*y_cur[IDX_CHI] - k[5183]*y_cur[IDX_HI] - - k[5302]*y_cur[IDX_CNI] - k[5303]*y_cur[IDX_CNI] - - k[5307]*y_cur[IDX_NHI] - k[5422]*y_cur[IDX_OI] - - k[5476]*y_cur[IDX_OHI] - k[5885] - k[5886] - k[5887] - k[6221] - - k[6222] - k[6223] - k[6900]; - data[jistart + 16915] = 0.0 + k[592]*y_cur[IDX_FeI] + - k[593]*y_cur[IDX_HCOI] + k[594]*y_cur[IDX_MgI] + - k[595]*y_cur[IDX_NOI] + k[596]*y_cur[IDX_NaI] + - k[597]*y_cur[IDX_SiI] - k[3553]*y_cur[IDX_NH3I] + - k[3910]*y_cur[IDX_CM] + k[3945]*y_cur[IDX_C10M] + - k[3980]*y_cur[IDX_C10HM] + k[4015]*y_cur[IDX_C2M] + - k[4050]*y_cur[IDX_C2HM] + k[4085]*y_cur[IDX_C3M] + - k[4120]*y_cur[IDX_C3HM] + k[4155]*y_cur[IDX_C3NM] + - k[4190]*y_cur[IDX_C4M] + k[4225]*y_cur[IDX_C4HM] + - k[4260]*y_cur[IDX_C5M] + k[4295]*y_cur[IDX_C5HM] + - k[4330]*y_cur[IDX_C5NM] + k[4365]*y_cur[IDX_C6M] + - k[4400]*y_cur[IDX_C6HM] + k[4435]*y_cur[IDX_C7M] + - k[4470]*y_cur[IDX_C7HM] + k[4505]*y_cur[IDX_C8M] + - k[4540]*y_cur[IDX_C8HM] + k[4575]*y_cur[IDX_C9M] + - k[4610]*y_cur[IDX_C9HM] + k[4645]*y_cur[IDX_CHM] + - k[4680]*y_cur[IDX_CNM] + k[4716]*y_cur[IDX_HM] + - k[4751]*y_cur[IDX_OM] + k[4786]*y_cur[IDX_O2M] + - k[4821]*y_cur[IDX_OHM] + k[4856]*y_cur[IDX_SM]; - data[jistart + 16916] = 0.0 + k[1167]*y_cur[IDX_eM] + - k[3911]*y_cur[IDX_CM] + k[3946]*y_cur[IDX_C10M] + - k[3981]*y_cur[IDX_C10HM] + k[4016]*y_cur[IDX_C2M] + - k[4051]*y_cur[IDX_C2HM] + k[4086]*y_cur[IDX_C3M] + - k[4121]*y_cur[IDX_C3HM] + k[4156]*y_cur[IDX_C3NM] + - k[4191]*y_cur[IDX_C4M] + k[4226]*y_cur[IDX_C4HM] + - k[4261]*y_cur[IDX_C5M] + k[4296]*y_cur[IDX_C5HM] + - k[4331]*y_cur[IDX_C5NM] + k[4366]*y_cur[IDX_C6M] + - k[4401]*y_cur[IDX_C6HM] + k[4436]*y_cur[IDX_C7M] + - k[4471]*y_cur[IDX_C7HM] + k[4506]*y_cur[IDX_C8M] + - k[4541]*y_cur[IDX_C8HM] + k[4576]*y_cur[IDX_C9M] + - k[4611]*y_cur[IDX_C9HM] + k[4646]*y_cur[IDX_CHM] + - k[4681]*y_cur[IDX_CNM] + k[4717]*y_cur[IDX_HM] + - k[4752]*y_cur[IDX_OM] + k[4787]*y_cur[IDX_O2M] + - k[4822]*y_cur[IDX_OHM] + k[4857]*y_cur[IDX_SM] + + data[jistart + 19368] = 0.0 + k[6524]*y_cur[IDX_GRAINM] + k[6525]*y_cur[IDX_GRAINM]; + data[jistart + 19369] = 0.0 + k[6313]*y_cur[IDX_GRAINM]; + data[jistart + 19370] = 0.0 + k[6685]*y_cur[IDX_GRAINM] + k[6686]*y_cur[IDX_GRAINM] + + k[6687]*y_cur[IDX_GRAINM]; + data[jistart + 19371] = 0.0 + k[6560]*y_cur[IDX_GRAINM]; + data[jistart + 19372] = 0.0 + k[6617]*y_cur[IDX_GRAINM] + k[6618]*y_cur[IDX_GRAINM] + + k[6619]*y_cur[IDX_GRAINM]; + data[jistart + 19373] = 0.0 + k[6688]*y_cur[IDX_GRAINM]; + data[jistart + 19374] = 0.0 + k[6849]*y_cur[IDX_GRAINM] + k[6850]*y_cur[IDX_GRAINM]; + data[jistart + 19375] = 0.0 + k[6880]*y_cur[IDX_GRAINM] + k[6881]*y_cur[IDX_GRAINM]; + data[jistart + 19376] = 0.0 + k[6770]*y_cur[IDX_GRAINM] + k[6771]*y_cur[IDX_GRAINM]; + data[jistart + 19377] = 0.0 + k[6520]*y_cur[IDX_GRAINM] + k[6521]*y_cur[IDX_GRAINM]; + data[jistart + 19378] = 0.0 + k[6578]*y_cur[IDX_GRAINM] + k[6579]*y_cur[IDX_GRAINM] + + k[6580]*y_cur[IDX_GRAINM]; + data[jistart + 19379] = 0.0 + k[6593]*y_cur[IDX_GRAINM] + k[6594]*y_cur[IDX_GRAINM] + + k[6595]*y_cur[IDX_GRAINM]; + data[jistart + 19380] = 0.0 + k[6878]*y_cur[IDX_GRAINM] + k[6879]*y_cur[IDX_GRAINM]; + data[jistart + 19381] = 0.0 + k[6671]*y_cur[IDX_GRAINM] + k[6672]*y_cur[IDX_GRAINM] + + k[6673]*y_cur[IDX_GRAINM]; + data[jistart + 19382] = 0.0 + k[6599]*y_cur[IDX_GRAINM]; + data[jistart + 19383] = 0.0 + k[6408]*y_cur[IDX_GRAINM] + k[6409]*y_cur[IDX_GRAINM]; + data[jistart + 19384] = 0.0 + k[6727]*y_cur[IDX_GRAINM] + k[6728]*y_cur[IDX_GRAINM] + + k[6729]*y_cur[IDX_GRAINM] + k[6730]*y_cur[IDX_GRAINM]; + data[jistart + 19385] = 0.0 + k[6834]*y_cur[IDX_GRAINM] + k[6835]*y_cur[IDX_GRAINM]; + data[jistart + 19386] = 0.0 + k[6867]*y_cur[IDX_GRAINM] + k[6868]*y_cur[IDX_GRAINM]; + data[jistart + 19387] = 0.0 + k[6585]*y_cur[IDX_GRAINM] + k[6586]*y_cur[IDX_GRAINM]; + data[jistart + 19388] = 0.0 + k[6804]*y_cur[IDX_GRAINM] + k[6805]*y_cur[IDX_GRAINM]; + data[jistart + 19389] = 0.0 + k[6514]*y_cur[IDX_GRAINM] + k[6515]*y_cur[IDX_GRAINM]; + data[jistart + 19390] = 0.0 + k[6711]*y_cur[IDX_GRAINM] + k[6712]*y_cur[IDX_GRAINM] + + k[6713]*y_cur[IDX_GRAINM] + k[6714]*y_cur[IDX_GRAINM] + + k[6715]*y_cur[IDX_GRAINM] + k[6716]*y_cur[IDX_GRAINM]; + data[jistart + 19391] = 0.0 + k[6454]*y_cur[IDX_GRAINM]; + data[jistart + 19392] = 0.0 + k[6457]*y_cur[IDX_GRAINM] + k[6458]*y_cur[IDX_GRAINM]; + data[jistart + 19393] = 0.0 + k[6882]*y_cur[IDX_GRAINM] + k[6883]*y_cur[IDX_GRAINM]; + data[jistart + 19394] = 0.0 + k[6725]*y_cur[IDX_GRAINM] + k[6726]*y_cur[IDX_GRAINM]; + data[jistart + 19395] = 0.0 + k[6574]*y_cur[IDX_GRAINM] + k[6575]*y_cur[IDX_GRAINM]; + data[jistart + 19396] = 0.0 + k[6571]*y_cur[IDX_GRAINM] + k[6572]*y_cur[IDX_GRAINM] + + k[6573]*y_cur[IDX_GRAINM]; + data[jistart + 19397] = 0.0 + k[6674]*y_cur[IDX_GRAINM] + k[6675]*y_cur[IDX_GRAINM]; + data[jistart + 19398] = 0.0 + k[6775]*y_cur[IDX_GRAINM] + k[6776]*y_cur[IDX_GRAINM] + + k[6777]*y_cur[IDX_GRAINM]; + data[jistart + 19399] = 0.0 + k[6731]*y_cur[IDX_GRAINM] + k[6732]*y_cur[IDX_GRAINM] + + k[6733]*y_cur[IDX_GRAINM] + k[6734]*y_cur[IDX_GRAINM] + + k[6735]*y_cur[IDX_GRAINM] + k[6736]*y_cur[IDX_GRAINM] + + k[6737]*y_cur[IDX_GRAINM]; + data[jistart + 19400] = 0.0 + k[6587]*y_cur[IDX_GRAINM] + k[6588]*y_cur[IDX_GRAINM]; + data[jistart + 19401] = 0.0 + k[6851]*y_cur[IDX_GRAINM] + k[6852]*y_cur[IDX_GRAINM]; + data[jistart + 19402] = 0.0 + k[6590]*y_cur[IDX_GRAINM] + k[6591]*y_cur[IDX_GRAINM]; + data[jistart + 19403] = 0.0 + k[6755]*y_cur[IDX_GRAINM] + k[6756]*y_cur[IDX_GRAINM] + + k[6757]*y_cur[IDX_GRAINM]; + data[jistart + 19404] = 0.0 + k[6765]*y_cur[IDX_GRAINM] + k[6766]*y_cur[IDX_GRAINM]; + data[jistart + 19405] = 0.0 + k[6603]*y_cur[IDX_GRAINM] + k[6604]*y_cur[IDX_GRAINM] + + k[6605]*y_cur[IDX_GRAINM]; + data[jistart + 19406] = 0.0 + k[6843]*y_cur[IDX_GRAINM] + k[6844]*y_cur[IDX_GRAINM]; + data[jistart + 19407] = 0.0 + k[6876]*y_cur[IDX_GRAINM] + k[6877]*y_cur[IDX_GRAINM]; + data[jistart + 19408] = 0.0 + k[6522]*y_cur[IDX_GRAINM] + k[6523]*y_cur[IDX_GRAINM]; + data[jistart + 19409] = 0.0 + k[6584]*y_cur[IDX_GRAINM]; + data[jistart + 19410] = 0.0 + k[6772]*y_cur[IDX_GRAINM] + k[6773]*y_cur[IDX_GRAINM] + + k[6774]*y_cur[IDX_GRAINM]; + data[jistart + 19411] = 0.0 + k[6596]*y_cur[IDX_GRAINM] + k[6597]*y_cur[IDX_GRAINM] + + k[6598]*y_cur[IDX_GRAINM]; + data[jistart + 19412] = 0.0 + k[6426]*y_cur[IDX_GRAINM] + k[6427]*y_cur[IDX_GRAINM]; + data[jistart + 19413] = 0.0 + k[6606]*y_cur[IDX_GRAINM] + k[6607]*y_cur[IDX_GRAINM] + + k[6608]*y_cur[IDX_GRAINM] + k[6609]*y_cur[IDX_GRAINM]; + data[jistart + 19414] = 0.0 + k[6419]*y_cur[IDX_GRAINM] + k[6420]*y_cur[IDX_GRAINM]; + data[jistart + 19415] = 0.0 + k[6662]*y_cur[IDX_GRAINM] + k[6663]*y_cur[IDX_GRAINM]; + data[jistart + 19416] = 0.0 + k[6657]*y_cur[IDX_GRAINM] + k[6658]*y_cur[IDX_GRAINM] + + k[6659]*y_cur[IDX_GRAINM]; + data[jistart + 19417] = 0.0 + k[6622]*y_cur[IDX_GRAINM] + k[6623]*y_cur[IDX_GRAINM]; + data[jistart + 19418] = 0.0 + k[6699]*y_cur[IDX_GRAINM] + k[6700]*y_cur[IDX_GRAINM]; + data[jistart + 19419] = 0.0 + k[6558]*y_cur[IDX_GRAINM] + k[6559]*y_cur[IDX_GRAINM]; + data[jistart + 19420] = 0.0 + k[6528]*y_cur[IDX_GRAINM] + k[6529]*y_cur[IDX_GRAINM] + + k[6530]*y_cur[IDX_GRAINM]; + data[jistart + 19421] = 0.0 + k[6680]*y_cur[IDX_GRAINM] + k[6681]*y_cur[IDX_GRAINM] + + k[6682]*y_cur[IDX_GRAINM]; + data[jistart + 19422] = 0.0 + k[6767]*y_cur[IDX_GRAINM] + k[6768]*y_cur[IDX_GRAINM]; + data[jistart + 19423] = 0.0 + k[6798]*y_cur[IDX_GRAINM] + k[6799]*y_cur[IDX_GRAINM]; + data[jistart + 19424] = 0.0 + k[6800]*y_cur[IDX_GRAINM] + k[6801]*y_cur[IDX_GRAINM]; + data[jistart + 19425] = 0.0 + k[6438]*y_cur[IDX_GRAINM] + k[6439]*y_cur[IDX_GRAINM]; + data[jistart + 19426] = 0.0 + k[6668]*y_cur[IDX_GRAINM] + k[6669]*y_cur[IDX_GRAINM]; + data[jistart + 19427] = 0.0 + k[6644]*y_cur[IDX_GRAINM]; + data[jistart + 19428] = 0.0 + k[6645]*y_cur[IDX_GRAINM] + k[6646]*y_cur[IDX_GRAINM] + + k[6647]*y_cur[IDX_GRAINM]; + data[jistart + 19429] = 0.0 + k[6667]*y_cur[IDX_GRAINM]; + data[jistart + 19430] = 0.0 + k[6701]*y_cur[IDX_GRAINM] + k[6702]*y_cur[IDX_GRAINM] + + k[6703]*y_cur[IDX_GRAINM] + k[6704]*y_cur[IDX_GRAINM] + + k[6705]*y_cur[IDX_GRAINM]; + data[jistart + 19431] = 0.0 + k[6547]*y_cur[IDX_GRAINM] + k[6548]*y_cur[IDX_GRAINM]; + data[jistart + 19432] = 0.0 + k[6512]*y_cur[IDX_GRAINM] + k[6513]*y_cur[IDX_GRAINM]; + data[jistart + 19433] = 0.0 + k[6717]*y_cur[IDX_GRAINM] + k[6718]*y_cur[IDX_GRAINM]; + data[jistart + 19434] = 0.0 + k[6581]*y_cur[IDX_GRAINM]; + data[jistart + 19435] = 0.0 + k[6495]*y_cur[IDX_GRAINM]; + data[jistart + 19436] = 0.0 + k[6811]*y_cur[IDX_GRAINM] + k[6812]*y_cur[IDX_GRAINM] + + k[6813]*y_cur[IDX_GRAINM] + k[6814]*y_cur[IDX_GRAINM]; + data[jistart + 19437] = 0.0 + k[6448]*y_cur[IDX_GRAINM] + k[6449]*y_cur[IDX_GRAINM]; + data[jistart + 19438] = 0.0 + k[6541]*y_cur[IDX_GRAINM] + k[6542]*y_cur[IDX_GRAINM]; + data[jistart + 19439] = 0.0 + k[6869]*y_cur[IDX_GRAINM] + k[6870]*y_cur[IDX_GRAINM]; + data[jistart + 19440] = 0.0 + k[6874]*y_cur[IDX_GRAINM]; + data[jistart + 19441] = 0.0 + k[6635]*y_cur[IDX_GRAINM] + k[6636]*y_cur[IDX_GRAINM]; + data[jistart + 19442] = 0.0 + k[6484]*y_cur[IDX_GRAINM] + k[6485]*y_cur[IDX_GRAINM]; + data[jistart + 19443] = 0.0 + k[6818]*y_cur[IDX_GRAINM] + k[6819]*y_cur[IDX_GRAINM] + + k[6820]*y_cur[IDX_GRAINM]; + data[jistart + 19444] = 0.0 + k[6791]*y_cur[IDX_GRAINM] + k[6792]*y_cur[IDX_GRAINM] + + k[6793]*y_cur[IDX_GRAINM] + k[6794]*y_cur[IDX_GRAINM] + + k[6795]*y_cur[IDX_GRAINM]; + data[jistart + 19445] = 0.0 + k[6664]*y_cur[IDX_GRAINM] + k[6665]*y_cur[IDX_GRAINM]; + data[jistart + 19446] = 0.0 + k[6516]*y_cur[IDX_GRAINM] + k[6517]*y_cur[IDX_GRAINM]; + data[jistart + 19447] = 0.0 + k[6552]*y_cur[IDX_GRAINM] + k[6553]*y_cur[IDX_GRAINM]; + data[jistart + 19448] = 0.0 + k[6884]*y_cur[IDX_GRAINM] + k[6885]*y_cur[IDX_GRAINM] + + k[6886]*y_cur[IDX_GRAINM] + k[6887]*y_cur[IDX_GRAINM]; + data[jistart + 19449] = 0.0 + k[6626]*y_cur[IDX_GRAINM]; + data[jistart + 19450] = 0.0 + k[6641]*y_cur[IDX_GRAINM]; + data[jistart + 19451] = 0.0 + k[6475]*y_cur[IDX_GRAINM] + k[6476]*y_cur[IDX_GRAINM]; + data[jistart + 19452] = 0.0 + k[6683]*y_cur[IDX_GRAINM] + k[6684]*y_cur[IDX_GRAINM]; + data[jistart + 19453] = 0.0 + k[6511]*y_cur[IDX_GRAINM]; + data[jistart + 19454] = 0.0 + k[6763]*y_cur[IDX_GRAINM] + k[6764]*y_cur[IDX_GRAINM]; + data[jistart + 19455] = 0.0 + k[6676]*y_cur[IDX_GRAINM] + k[6677]*y_cur[IDX_GRAINM]; + data[jistart + 19456] = 0.0 + k[6787]*y_cur[IDX_GRAINM] + k[6788]*y_cur[IDX_GRAINM]; + data[jistart + 19457] = 0.0 + k[6719]*y_cur[IDX_GRAINM] + k[6720]*y_cur[IDX_GRAINM]; + data[jistart + 19458] = 0.0 + k[6569]*y_cur[IDX_GRAINM] + k[6570]*y_cur[IDX_GRAINM]; + data[jistart + 19459] = 0.0 + k[6750]*y_cur[IDX_GRAINM] + k[6751]*y_cur[IDX_GRAINM]; + data[jistart + 19460] = 0.0 + k[6501]*y_cur[IDX_GRAINM]; + data[jistart + 19461] = 0.0 + k[6855]*y_cur[IDX_GRAINM] + k[6856]*y_cur[IDX_GRAINM]; + data[jistart + 19462] = 0.0 + k[6376]*y_cur[IDX_GRAINM] + k[6377]*y_cur[IDX_GRAINM]; + data[jistart + 19463] = 0.0 + k[6601]*y_cur[IDX_GRAINM] + k[6602]*y_cur[IDX_GRAINM]; + data[jistart + 19464] = 0.0 + k[6486]*y_cur[IDX_GRAINM] + k[6487]*y_cur[IDX_GRAINM] + + k[6488]*y_cur[IDX_GRAINM] + k[6489]*y_cur[IDX_GRAINM]; + data[jistart + 19465] = 0.0 + k[6543]*y_cur[IDX_GRAINM] + k[6544]*y_cur[IDX_GRAINM]; + data[jistart + 19466] = 0.0 + k[6654]*y_cur[IDX_GRAINM]; + data[jistart + 19467] = 0.0 + k[6778]*y_cur[IDX_GRAINM] + k[6779]*y_cur[IDX_GRAINM]; + data[jistart + 19468] = 0.0 + k[6610]*y_cur[IDX_GRAINM] + k[6611]*y_cur[IDX_GRAINM]; + data[jistart + 19469] = 0.0 + k[6612]*y_cur[IDX_GRAINM] + k[6613]*y_cur[IDX_GRAINM] + + k[6614]*y_cur[IDX_GRAINM]; + data[jistart + 19470] = 0.0 + k[6758]*y_cur[IDX_GRAINM] + k[6759]*y_cur[IDX_GRAINM]; + data[jistart + 19471] = 0.0 + k[6746]*y_cur[IDX_GRAINM] + k[6747]*y_cur[IDX_GRAINM]; + data[jistart + 19472] = 0.0 + k[6472]*y_cur[IDX_GRAINM]; + data[jistart + 19473] = 0.0 + k[6499]*y_cur[IDX_GRAINM] + k[6500]*y_cur[IDX_GRAINM]; + data[jistart + 19474] = 0.0 + k[6807]*y_cur[IDX_GRAINM] + k[6808]*y_cur[IDX_GRAINM]; + data[jistart + 19475] = 0.0 + k[6847]*y_cur[IDX_GRAINM] + k[6848]*y_cur[IDX_GRAINM]; + data[jistart + 19476] = 0.0 + k[6648]*y_cur[IDX_GRAINM]; + data[jistart + 19477] = 0.0 + k[6761]*y_cur[IDX_GRAINM] + k[6762]*y_cur[IDX_GRAINM]; + data[jistart + 19478] = 0.0 + k[6504]*y_cur[IDX_GRAINM] + k[6505]*y_cur[IDX_GRAINM] + + k[6506]*y_cur[IDX_GRAINM] + k[6507]*y_cur[IDX_GRAINM] + + k[6508]*y_cur[IDX_GRAINM] + k[6509]*y_cur[IDX_GRAINM] + + k[6510]*y_cur[IDX_GRAINM]; + data[jistart + 19479] = 0.0 + k[6740]*y_cur[IDX_GRAINM] + k[6741]*y_cur[IDX_GRAINM]; + data[jistart + 19480] = 0.0 + k[6836]*y_cur[IDX_GRAINM] + k[6837]*y_cur[IDX_GRAINM]; + data[jistart + 19481] = 0.0 + k[6863]*y_cur[IDX_GRAINM] + k[6864]*y_cur[IDX_GRAINM]; + data[jistart + 19482] = 0.0 + k[6492]*y_cur[IDX_GRAINM] + k[6493]*y_cur[IDX_GRAINM] + + k[6494]*y_cur[IDX_GRAINM]; + data[jistart + 19483] = 0.0 + k[6642]*y_cur[IDX_GRAINM] + k[6643]*y_cur[IDX_GRAINM]; + data[jistart + 19484] = 0.0 + k[6660]*y_cur[IDX_GRAINM] + k[6661]*y_cur[IDX_GRAINM]; + data[jistart + 19485] = 0.0 + k[6796]*y_cur[IDX_GRAINM] + k[6797]*y_cur[IDX_GRAINM]; + data[jistart + 19486] = 0.0 + k[6692]*y_cur[IDX_GRAINM] + k[6693]*y_cur[IDX_GRAINM]; + data[jistart + 19487] = 0.0 + k[6428]*y_cur[IDX_GRAINM] + k[6429]*y_cur[IDX_GRAINM] + + k[6430]*y_cur[IDX_GRAINM]; + data[jistart + 19488] = 0.0 + k[6600]*y_cur[IDX_GRAINM]; + data[jistart + 19489] = 0.0 + k[6830]*y_cur[IDX_GRAINM] + k[6831]*y_cur[IDX_GRAINM]; + data[jistart + 19490] = 0.0 + k[6832]*y_cur[IDX_GRAINM] + k[6833]*y_cur[IDX_GRAINM]; + data[jistart + 19491] = 0.0 + k[6582]*y_cur[IDX_GRAINM] + k[6583]*y_cur[IDX_GRAINM]; + data[jistart + 19492] = 0.0 + k[6652]*y_cur[IDX_GRAINM] + k[6653]*y_cur[IDX_GRAINM]; + data[jistart + 19493] = 0.0 + k[6821]*y_cur[IDX_GRAINM] + k[6822]*y_cur[IDX_GRAINM] + + k[6823]*y_cur[IDX_GRAINM]; + data[jistart + 19494] = 0.0 + k[6748]*y_cur[IDX_GRAINM] + k[6749]*y_cur[IDX_GRAINM]; + data[jistart + 19495] = 0.0 + k[6434]*y_cur[IDX_GRAINM] + k[6435]*y_cur[IDX_GRAINM] + + k[6436]*y_cur[IDX_GRAINM]; + data[jistart + 19496] = 0.0 + k[6752]*y_cur[IDX_GRAINM]; + data[jistart + 19497] = 0.0 + k[6481]*y_cur[IDX_GRAINM]; + data[jistart + 19498] = 0.0 + k[6802]*y_cur[IDX_GRAINM] + k[6803]*y_cur[IDX_GRAINM]; + data[jistart + 19499] = 0.0 + k[6871]*y_cur[IDX_GRAINM] + k[6872]*y_cur[IDX_GRAINM] + + k[6873]*y_cur[IDX_GRAINM]; + data[jistart + 19500] = 0.0 + k[6490]*y_cur[IDX_GRAINM] + k[6491]*y_cur[IDX_GRAINM]; + data[jistart + 19501] = 0.0 + k[6706]*y_cur[IDX_GRAINM] + k[6707]*y_cur[IDX_GRAINM] + + k[6708]*y_cur[IDX_GRAINM]; + data[jistart + 19502] = 0.0 + k[6410]*y_cur[IDX_GRAINM] + k[6411]*y_cur[IDX_GRAINM]; + data[jistart + 19503] = 0.0 + k[6838]*y_cur[IDX_GRAINM] + k[6839]*y_cur[IDX_GRAINM]; + data[jistart + 19504] = 0.0 + k[6753]*y_cur[IDX_GRAINM] + k[6754]*y_cur[IDX_GRAINM]; + data[jistart + 19505] = 0.0 + k[6649]*y_cur[IDX_GRAINM] + k[6650]*y_cur[IDX_GRAINM]; + data[jistart + 19506] = 0.0 + k[6782]*y_cur[IDX_GRAINM] + k[6783]*y_cur[IDX_GRAINM]; + data[jistart + 19507] = 0.0 + k[6561]*y_cur[IDX_GRAINM] + k[6562]*y_cur[IDX_GRAINM] + + k[6563]*y_cur[IDX_GRAINM] + k[6564]*y_cur[IDX_GRAINM] + + k[6565]*y_cur[IDX_GRAINM]; + data[jistart + 19508] = 0.0 + k[6502]*y_cur[IDX_GRAINM] + k[6503]*y_cur[IDX_GRAINM]; + data[jistart + 19509] = 0.0 + k[6518]*y_cur[IDX_GRAINM] + k[6519]*y_cur[IDX_GRAINM]; + data[jistart + 19510] = 0.0 + k[6780]*y_cur[IDX_GRAINM] + k[6781]*y_cur[IDX_GRAINM]; + data[jistart + 19511] = 0.0 + k[6402]*y_cur[IDX_GRAINM] + k[6403]*y_cur[IDX_GRAINM] + + k[6404]*y_cur[IDX_GRAINM]; + data[jistart + 19512] = 0.0 + k[6412]*y_cur[IDX_GRAINM] + k[6413]*y_cur[IDX_GRAINM]; + data[jistart + 19513] = 0.0 + k[6615]*y_cur[IDX_GRAINM] + k[6616]*y_cur[IDX_GRAINM]; + data[jistart + 19514] = 0.0 + k[6440]*y_cur[IDX_GRAINM] + k[6441]*y_cur[IDX_GRAINM] + + k[6442]*y_cur[IDX_GRAINM] + k[6443]*y_cur[IDX_GRAINM] + + k[6444]*y_cur[IDX_GRAINM]; + data[jistart + 19515] = 0.0 + k[6466]*y_cur[IDX_GRAINM] + k[6467]*y_cur[IDX_GRAINM]; + data[jistart + 19516] = 0.0 + k[6709]*y_cur[IDX_GRAINM]; + data[jistart + 19517] = 0.0 + k[6789]*y_cur[IDX_GRAINM] + k[6790]*y_cur[IDX_GRAINM]; + data[jistart + 19518] = 0.0 + k[6845]*y_cur[IDX_GRAINM] + k[6846]*y_cur[IDX_GRAINM]; + data[jistart + 19519] = 0.0 + k[6857]*y_cur[IDX_GRAINM] + k[6858]*y_cur[IDX_GRAINM]; + data[jistart + 19520] = 0.0 + k[6861]*y_cur[IDX_GRAINM] + k[6862]*y_cur[IDX_GRAINM]; + data[jistart + 19521] = 0.0 + k[6496]*y_cur[IDX_GRAINM] + k[6497]*y_cur[IDX_GRAINM] + + k[6498]*y_cur[IDX_GRAINM]; + data[jistart + 19522] = 0.0 + k[6388]*y_cur[IDX_GRAINM]; + data[jistart + 19523] = 0.0 + k[6629]*y_cur[IDX_GRAINM] + k[6630]*y_cur[IDX_GRAINM] + + k[6631]*y_cur[IDX_GRAINM]; + data[jistart + 19524] = 0.0 + k[6540]*y_cur[IDX_GRAINM]; + data[jistart + 19525] = 0.0 + k[6824]*y_cur[IDX_GRAINM] + k[6825]*y_cur[IDX_GRAINM]; + data[jistart + 19526] = 0.0 + k[6859]*y_cur[IDX_GRAINM] + k[6860]*y_cur[IDX_GRAINM]; + data[jistart + 19527] = 0.0 + k[6554]*y_cur[IDX_GRAINM] + k[6555]*y_cur[IDX_GRAINM]; + data[jistart + 19528] = 0.0 + k[6433]*y_cur[IDX_GRAINM]; + data[jistart + 19529] = 0.0 + k[6477]*y_cur[IDX_GRAINM] + k[6478]*y_cur[IDX_GRAINM] + + k[6479]*y_cur[IDX_GRAINM] + k[6480]*y_cur[IDX_GRAINM]; + data[jistart + 19530] = 0.0 + k[6841]*y_cur[IDX_GRAINM] + k[6842]*y_cur[IDX_GRAINM]; + data[jistart + 19531] = 0.0 + k[6566]*y_cur[IDX_GRAINM] + k[6567]*y_cur[IDX_GRAINM] + + k[6568]*y_cur[IDX_GRAINM]; + data[jistart + 19532] = 0.0 + k[6742]*y_cur[IDX_GRAINM] + k[6743]*y_cur[IDX_GRAINM]; + data[jistart + 19533] = 0.0 + k[6637]*y_cur[IDX_GRAINM] + k[6638]*y_cur[IDX_GRAINM] + + k[6639]*y_cur[IDX_GRAINM] + k[6640]*y_cur[IDX_GRAINM]; + data[jistart + 19534] = 0.0 + k[6721]*y_cur[IDX_GRAINM] + k[6722]*y_cur[IDX_GRAINM]; + data[jistart + 19535] = 0.0 + k[6535]*y_cur[IDX_GRAINM]; + data[jistart + 19536] = 0.0 + k[6482]*y_cur[IDX_GRAINM] + k[6483]*y_cur[IDX_GRAINM]; + data[jistart + 19537] = 0.0 + k[6828]*y_cur[IDX_GRAINM] + k[6829]*y_cur[IDX_GRAINM]; + data[jistart + 19538] = 0.0 + k[6421]*y_cur[IDX_GRAINM]; + data[jistart + 19539] = 0.0 + k[6826]*y_cur[IDX_GRAINM] + k[6827]*y_cur[IDX_GRAINM]; + data[jistart + 19540] = 0.0 + k[6455]*y_cur[IDX_GRAINM]; + data[jistart + 19541] = 0.0 + k[6450]*y_cur[IDX_GRAINM] + k[6451]*y_cur[IDX_GRAINM] + + k[6452]*y_cur[IDX_GRAINM] + k[6453]*y_cur[IDX_GRAINM]; + data[jistart + 19542] = 0.0 + k[6437]*y_cur[IDX_GRAINM]; + data[jistart + 19543] = 0.0 + k[6785]*y_cur[IDX_GRAINM] + k[6786]*y_cur[IDX_GRAINM]; + data[jistart + 19544] = 0.0 + k[6327]*y_cur[IDX_GRAINM] + k[6328]*y_cur[IDX_GRAINM]; + data[jistart + 19545] = 0.0 + k[6422]*y_cur[IDX_GRAINM]; + data[jistart + 19546] = 0.0 + k[6391]*y_cur[IDX_GRAINM] + k[6392]*y_cur[IDX_GRAINM] + + k[6393]*y_cur[IDX_GRAINM] + k[6394]*y_cur[IDX_GRAINM] + + k[6395]*y_cur[IDX_GRAINM]; + data[jistart + 19547] = 0.0 + k[6738]*y_cur[IDX_GRAINM] + k[6739]*y_cur[IDX_GRAINM]; + data[jistart + 19548] = 0.0 + k[6359]*y_cur[IDX_GRAINM]; + data[jistart + 19549] = 0.0 + k[6375]*y_cur[IDX_GRAINM]; + data[jistart + 19550] = 0.0 + k[6815]*y_cur[IDX_GRAINM] + k[6816]*y_cur[IDX_GRAINM] + + k[6817]*y_cur[IDX_GRAINM]; + data[jistart + 19551] = 0.0 + k[6372]*y_cur[IDX_GRAINM]; + data[jistart + 19552] = 0.0 + k[6352]*y_cur[IDX_GRAINM]; + data[jistart + 19553] = 0.0 + k[6621]*y_cur[IDX_GRAINM]; + data[jistart + 19554] = 0.0 + k[6468]*y_cur[IDX_GRAINM] + k[6469]*y_cur[IDX_GRAINM]; + data[jistart + 19555] = 0.0 + k[6445]*y_cur[IDX_GRAINM]; + data[jistart + 19556] = 0.0 + k[6320]*y_cur[IDX_GRAINM]; + data[jistart + 19557] = 0.0 + k[6309]*y_cur[IDX_GRAINM]; + data[jistart + 19558] = 0.0 + k[6324]*y_cur[IDX_GRAINM] + k[6325]*y_cur[IDX_GRAINM]; + data[jistart + 19559] = 0.0 + k[6710]*y_cur[IDX_GRAINM]; + data[jistart + 19560] = 0.0 + k[6373]*y_cur[IDX_GRAINM]; + data[jistart + 19561] = 0.0 + k[6332]*y_cur[IDX_GRAINM] + k[6333]*y_cur[IDX_GRAINM] + + k[6334]*y_cur[IDX_GRAINM] + k[6335]*y_cur[IDX_GRAINM] + + k[6336]*y_cur[IDX_GRAINM]; + data[jistart + 19562] = 0.0 + k[6678]*y_cur[IDX_GRAINM] + k[6679]*y_cur[IDX_GRAINM]; + data[jistart + 19563] = 0.0 + k[6459]*y_cur[IDX_GRAINM] + k[6460]*y_cur[IDX_GRAINM]; + data[jistart + 19564] = 0.0 + k[6473]*y_cur[IDX_GRAINM]; + data[jistart + 19565] = 0.0 + k[6414]*y_cur[IDX_GRAINM] + k[6415]*y_cur[IDX_GRAINM] + + k[6416]*y_cur[IDX_GRAINM] + k[6417]*y_cur[IDX_GRAINM] + + k[6418]*y_cur[IDX_GRAINM]; + data[jistart + 19566] = 0.0 + k[6531]*y_cur[IDX_GRAINM]; + data[jistart + 19567] = 0.0 + k[6556]*y_cur[IDX_GRAINM] + k[6557]*y_cur[IDX_GRAINM]; + data[jistart + 19568] = 0.0 + k[6354]*y_cur[IDX_GRAINM] + k[6355]*y_cur[IDX_GRAINM]; + data[jistart + 19569] = 0.0 + k[6461]*y_cur[IDX_GRAINM] + k[6462]*y_cur[IDX_GRAINM] + + k[6463]*y_cur[IDX_GRAINM] + k[6464]*y_cur[IDX_GRAINM] + + k[6465]*y_cur[IDX_GRAINM]; + data[jistart + 19570] = 0.0 + k[6316]*y_cur[IDX_GRAINM] + k[6317]*y_cur[IDX_GRAINM] + + k[6318]*y_cur[IDX_GRAINM]; + data[jistart + 19571] = 0.0 + k[6329]*y_cur[IDX_GRAINM]; + data[jistart + 19572] = 0.0 + k[6340]*y_cur[IDX_GRAINM] + k[6341]*y_cur[IDX_GRAINM] + + k[6342]*y_cur[IDX_GRAINM]; + data[jistart + 19573] = 0.0 + k[6315]*y_cur[IDX_GRAINM]; + data[jistart + 19574] = 0.0 + k[6425]*y_cur[IDX_GRAINM]; + data[jistart + 19575] = 0.0 + k[6670]*y_cur[IDX_GRAINM]; + data[jistart + 19576] = 0.0 + k[6353]*y_cur[IDX_GRAINM]; + data[jistart + 19577] = 0.0 + k[6351]*y_cur[IDX_GRAINM]; + data[jistart + 19578] = 0.0 + k[6381]*y_cur[IDX_GRAINM] + k[6382]*y_cur[IDX_GRAINM] + + k[6383]*y_cur[IDX_GRAINM] + k[6384]*y_cur[IDX_GRAINM] + + k[6385]*y_cur[IDX_GRAINM] + k[6386]*y_cur[IDX_GRAINM] + + k[6387]*y_cur[IDX_GRAINM]; + data[jistart + 19579] = 0.0 + k[6633]*y_cur[IDX_GRAINM] + k[6634]*y_cur[IDX_GRAINM]; + data[jistart + 19580] = 0.0 + k[6396]*y_cur[IDX_GRAINM] + k[6397]*y_cur[IDX_GRAINM]; + data[jistart + 19581] = 0.0 + k[6620]*y_cur[IDX_GRAINM]; + data[jistart + 19582] = 0.0 + k[6470]*y_cur[IDX_GRAINM] + k[6471]*y_cur[IDX_GRAINM]; + data[jistart + 19583] = 0.0 + k[6446]*y_cur[IDX_GRAINM] + k[6447]*y_cur[IDX_GRAINM]; + data[jistart + 19584] = 0.0 + k[6319]*y_cur[IDX_GRAINM]; + data[jistart + 19585] = 0.0 + k[6398]*y_cur[IDX_GRAINM] + k[6399]*y_cur[IDX_GRAINM] + + k[6400]*y_cur[IDX_GRAINM] + k[6401]*y_cur[IDX_GRAINM]; + data[jistart + 19586] = 0.0 + k[6407]*y_cur[IDX_GRAINM]; + data[jistart + 19587] = 0.0 + k[6326]*y_cur[IDX_GRAINM]; + data[jistart + 19588] = 0.0 + k[6627]*y_cur[IDX_GRAINM] + k[6628]*y_cur[IDX_GRAINM]; + data[jistart + 19589] = 0.0 + k[6378]*y_cur[IDX_GRAINM] + k[6379]*y_cur[IDX_GRAINM] + + k[6380]*y_cur[IDX_GRAINM]; + data[jistart + 19590] = 0.0 + k[6330]*y_cur[IDX_GRAINM] + k[6331]*y_cur[IDX_GRAINM]; + data[jistart + 19591] = 0.0 + k[6337]*y_cur[IDX_GRAINM] + k[6338]*y_cur[IDX_GRAINM] + k[6339]*y_cur[IDX_GRAINM]; - data[jistart + 16917] = 0.0 + k[595]*y_cur[IDX_NH3II]; - data[jistart + 16918] = 0.0 + k[596]*y_cur[IDX_NH3II]; - data[jistart + 16919] = 0.0 - k[5422]*y_cur[IDX_NH3I]; - data[jistart + 16920] = 0.0 - k[661]*y_cur[IDX_NH3I]; - data[jistart + 16921] = 0.0 + k[4751]*y_cur[IDX_NH3II] + - k[4752]*y_cur[IDX_NH4II]; - data[jistart + 16922] = 0.0 - k[611]*y_cur[IDX_NH3I]; - data[jistart + 16923] = 0.0 + k[4786]*y_cur[IDX_NH3II] + - k[4787]*y_cur[IDX_NH4II]; - data[jistart + 16924] = 0.0 - k[3594]*y_cur[IDX_NH3I]; - data[jistart + 16925] = 0.0 - k[612]*y_cur[IDX_NH3I]; - data[jistart + 16926] = 0.0 + k[5301]*y_cur[IDX_NH2I] - - k[5476]*y_cur[IDX_NH3I]; - data[jistart + 16927] = 0.0 - k[692]*y_cur[IDX_NH3I] - - k[3786]*y_cur[IDX_NH3I]; - data[jistart + 16928] = 0.0 + k[4821]*y_cur[IDX_NH3II] + - k[4822]*y_cur[IDX_NH4II]; - data[jistart + 16929] = 0.0 - k[613]*y_cur[IDX_NH3I] - - k[3595]*y_cur[IDX_NH3I]; - data[jistart + 16930] = 0.0 - k[3596]*y_cur[IDX_NH3I] - - k[3597]*y_cur[IDX_NH3I] - k[3598]*y_cur[IDX_NH3I]; - data[jistart + 16931] = 0.0 - k[3599]*y_cur[IDX_NH3I] - - k[3600]*y_cur[IDX_NH3I]; - data[jistart + 16932] = 0.0 - k[3601]*y_cur[IDX_NH3I]; - data[jistart + 16933] = 0.0 + k[1215]*y_cur[IDX_eM] + - k[6617]*y_cur[IDX_GRAINM]; - data[jistart + 16934] = 0.0 - k[614]*y_cur[IDX_NH3I]; - data[jistart + 16935] = 0.0 + k[4856]*y_cur[IDX_NH3II] + - k[4857]*y_cur[IDX_NH4II]; - data[jistart + 16936] = 0.0 - k[615]*y_cur[IDX_NH3I]; - data[jistart + 16937] = 0.0 + k[597]*y_cur[IDX_NH3II]; - data[jistart + 16938] = 0.0 - k[3602]*y_cur[IDX_NH3I]; - data[jistart + 16939] = 0.0 - k[3603]*y_cur[IDX_NH3I]; - data[jistart + 16940] = 0.0 - k[3604]*y_cur[IDX_NH3I]; - data[jistart + 16941] = 0.0 + k[1167]*y_cur[IDX_NH4II] + - k[1215]*y_cur[IDX_PNH3II]; - data[jistart + 16942] = 0.0 + k[185]*y_cur[IDX_NH3I]; - data[jistart + 16943] = 0.0 - k[3910]*y_cur[IDX_NH3II]; - data[jistart + 16944] = 0.0 - k[3945]*y_cur[IDX_NH3II]; - data[jistart + 16945] = 0.0 - k[3980]*y_cur[IDX_NH3II]; - data[jistart + 16946] = 0.0 - k[3548]*y_cur[IDX_NH3II]; - data[jistart + 16947] = 0.0 - k[4015]*y_cur[IDX_NH3II]; - data[jistart + 16948] = 0.0 + k[3529]*y_cur[IDX_NH2I]; - data[jistart + 16949] = 0.0 - k[4050]*y_cur[IDX_NH3II]; - data[jistart + 16950] = 0.0 + k[598]*y_cur[IDX_NH3I] + - k[3531]*y_cur[IDX_NH2I]; - data[jistart + 16951] = 0.0 + k[599]*y_cur[IDX_NH3I]; - data[jistart + 16952] = 0.0 + k[601]*y_cur[IDX_NH3I]; - data[jistart + 16953] = 0.0 - k[4085]*y_cur[IDX_NH3II]; - data[jistart + 16954] = 0.0 + k[600]*y_cur[IDX_NH3I]; - data[jistart + 16955] = 0.0 - k[4120]*y_cur[IDX_NH3II]; - data[jistart + 16956] = 0.0 - k[4155]*y_cur[IDX_NH3II]; - data[jistart + 16957] = 0.0 - k[4190]*y_cur[IDX_NH3II]; - data[jistart + 16958] = 0.0 - k[4225]*y_cur[IDX_NH3II]; - data[jistart + 16959] = 0.0 - k[4260]*y_cur[IDX_NH3II]; - data[jistart + 16960] = 0.0 - k[4295]*y_cur[IDX_NH3II]; - data[jistart + 16961] = 0.0 - k[4330]*y_cur[IDX_NH3II]; - data[jistart + 16962] = 0.0 - k[4365]*y_cur[IDX_NH3II]; - data[jistart + 16963] = 0.0 - k[4400]*y_cur[IDX_NH3II]; - data[jistart + 16964] = 0.0 - k[4435]*y_cur[IDX_NH3II]; - data[jistart + 16965] = 0.0 - k[4470]*y_cur[IDX_NH3II]; - data[jistart + 16966] = 0.0 - k[4505]*y_cur[IDX_NH3II]; - data[jistart + 16967] = 0.0 - k[4540]*y_cur[IDX_NH3II]; - data[jistart + 16968] = 0.0 - k[4575]*y_cur[IDX_NH3II]; - data[jistart + 16969] = 0.0 - k[4610]*y_cur[IDX_NH3II]; - data[jistart + 16970] = 0.0 - k[2260]*y_cur[IDX_NH3II]; - data[jistart + 16971] = 0.0 + k[253]*y_cur[IDX_NH3I]; - data[jistart + 16972] = 0.0 - k[4645]*y_cur[IDX_NH3II]; - data[jistart + 16973] = 0.0 - k[2013]*y_cur[IDX_NH3II]; - data[jistart + 16974] = 0.0 - k[2207]*y_cur[IDX_NH3II]; - data[jistart + 16975] = 0.0 + k[282]*y_cur[IDX_NH3I]; - data[jistart + 16976] = 0.0 + k[3533]*y_cur[IDX_NH2I]; - data[jistart + 16977] = 0.0 - k[4680]*y_cur[IDX_NH3II]; - data[jistart + 16978] = 0.0 + k[602]*y_cur[IDX_NH3I]; - data[jistart + 16979] = 0.0 + k[603]*y_cur[IDX_NH3I]; - data[jistart + 16980] = 0.0 - k[592]*y_cur[IDX_NH3II]; - data[jistart + 16981] = 0.0 - k[6330]*y_cur[IDX_NH3II] - - k[6331]*y_cur[IDX_NH3II]; - data[jistart + 16982] = 0.0 + k[401]*y_cur[IDX_NH3I]; - data[jistart + 16983] = 0.0 - k[4716]*y_cur[IDX_NH3II]; - data[jistart + 16984] = 0.0 + k[2463]*y_cur[IDX_NH2II] - - k[2464]*y_cur[IDX_NH3II]; - data[jistart + 16985] = 0.0 + k[452]*y_cur[IDX_NH3I]; - data[jistart + 16986] = 0.0 + k[3511]*y_cur[IDX_NH2II] - - k[3549]*y_cur[IDX_NH3II]; - data[jistart + 16987] = 0.0 + k[604]*y_cur[IDX_NH3I] + - k[3535]*y_cur[IDX_NH2I]; - data[jistart + 16988] = 0.0 + k[3491]*y_cur[IDX_NHII] + - k[3513]*y_cur[IDX_NH2II] - k[3550]*y_cur[IDX_NH3II]; - data[jistart + 16989] = 0.0 + k[605]*y_cur[IDX_NH3I] + - k[3536]*y_cur[IDX_NH2I]; - data[jistart + 16990] = 0.0 + k[3517]*y_cur[IDX_NH2II] - - k[3551]*y_cur[IDX_NH3II]; - data[jistart + 16991] = 0.0 + k[606]*y_cur[IDX_NH3I]; - data[jistart + 16992] = 0.0 + k[2721]*y_cur[IDX_NH2I]; - data[jistart + 16993] = 0.0 + k[3537]*y_cur[IDX_NH2I]; - data[jistart + 16994] = 0.0 + k[3538]*y_cur[IDX_NH2I]; - data[jistart + 16995] = 0.0 + k[607]*y_cur[IDX_NH3I]; - data[jistart + 16996] = 0.0 + k[608]*y_cur[IDX_NH3I] + - k[3539]*y_cur[IDX_NH2I]; - data[jistart + 16997] = 0.0 + k[3540]*y_cur[IDX_NH2I] + - k[3541]*y_cur[IDX_NH2I]; - data[jistart + 16998] = 0.0 - k[593]*y_cur[IDX_NH3II] - - k[3552]*y_cur[IDX_NH3II]; - data[jistart + 16999] = 0.0 + k[3542]*y_cur[IDX_NH2I]; - data[jistart + 17000] = 0.0 + k[3543]*y_cur[IDX_NH2I]; - data[jistart + 17001] = 0.0 + k[609]*y_cur[IDX_NH3I]; - data[jistart + 17002] = 0.0 + k[524]*y_cur[IDX_NH3I]; - data[jistart + 17003] = 0.0 - k[594]*y_cur[IDX_NH3II]; - data[jistart + 17004] = 0.0 + k[558]*y_cur[IDX_NH3I]; - data[jistart + 17005] = 0.0 + k[610]*y_cur[IDX_NH3I]; - data[jistart + 17006] = 0.0 + k[3544]*y_cur[IDX_NH2I]; - data[jistart + 17007] = 0.0 + k[3617]*y_cur[IDX_NH2II] - - k[3618]*y_cur[IDX_NH3II]; - data[jistart + 17008] = 0.0 + k[576]*y_cur[IDX_NH3I] + - k[3491]*y_cur[IDX_H2OI] + k[3497]*y_cur[IDX_NH2I]; - data[jistart + 17009] = 0.0 + k[2721]*y_cur[IDX_H3II] + - k[3497]*y_cur[IDX_NHII] + k[3522]*y_cur[IDX_NH2II] + - k[3529]*y_cur[IDX_C2HII] + k[3531]*y_cur[IDX_C2H2II] + - k[3533]*y_cur[IDX_CH5II] + k[3535]*y_cur[IDX_H2COII] + - k[3536]*y_cur[IDX_H2OII] + k[3537]*y_cur[IDX_H3COII] + - k[3538]*y_cur[IDX_H3OII] + k[3539]*y_cur[IDX_HCNII] + - k[3540]*y_cur[IDX_HCNHII] + k[3541]*y_cur[IDX_HCNHII] + - k[3542]*y_cur[IDX_HCOII] + k[3543]*y_cur[IDX_HNOII] + - k[3544]*y_cur[IDX_N2HII] - k[3545]*y_cur[IDX_NH3II] + - k[3546]*y_cur[IDX_O2HII] + k[3547]*y_cur[IDX_OHII]; - data[jistart + 17010] = 0.0 + k[582]*y_cur[IDX_NH3I] + - k[2463]*y_cur[IDX_H2I] + k[3511]*y_cur[IDX_H2COI] + - k[3513]*y_cur[IDX_H2OI] + k[3517]*y_cur[IDX_H2SI] + - k[3522]*y_cur[IDX_NH2I] + k[3617]*y_cur[IDX_NHI]; - data[jistart + 17011] = 0.0 + k[185]*y_cur[IDX_CII] + - k[253]*y_cur[IDX_CHII] + k[282]*y_cur[IDX_CH4II] + - k[401]*y_cur[IDX_HII] + k[452]*y_cur[IDX_H2II] + - k[524]*y_cur[IDX_HeII] + k[558]*y_cur[IDX_NII] + - k[576]*y_cur[IDX_NHII] + k[582]*y_cur[IDX_NH2II] + - k[598]*y_cur[IDX_C2H2II] + k[599]*y_cur[IDX_C2H4II] + - k[600]*y_cur[IDX_C3HII] + k[601]*y_cur[IDX_C2H6II] + - k[602]*y_cur[IDX_COII] + k[603]*y_cur[IDX_CO2II] + - k[604]*y_cur[IDX_H2COII] + k[605]*y_cur[IDX_H2OII] + - k[606]*y_cur[IDX_H2SII] + k[607]*y_cur[IDX_HC3NII] + - k[608]*y_cur[IDX_HCNII] + k[609]*y_cur[IDX_HSII] + - k[610]*y_cur[IDX_N2II] + k[611]*y_cur[IDX_O2II] + - k[612]*y_cur[IDX_OCSII] + k[613]*y_cur[IDX_PII] + - k[614]*y_cur[IDX_SII] + k[615]*y_cur[IDX_SOII] + - k[661]*y_cur[IDX_OII] + k[692]*y_cur[IDX_OHII] - - k[3553]*y_cur[IDX_NH3II] + k[5886] + k[6222]; - data[jistart + 17012] = 0.0 - k[592]*y_cur[IDX_FeI] - - k[593]*y_cur[IDX_HCOI] - k[594]*y_cur[IDX_MgI] - - k[595]*y_cur[IDX_NOI] - k[596]*y_cur[IDX_NaI] - - k[597]*y_cur[IDX_SiI] - k[1163]*y_cur[IDX_eM] - - k[1164]*y_cur[IDX_eM] - k[2013]*y_cur[IDX_CH2I] - - k[2207]*y_cur[IDX_CH4I] - k[2260]*y_cur[IDX_CHI] - - k[2464]*y_cur[IDX_H2I] - k[3545]*y_cur[IDX_NH2I] - - k[3548]*y_cur[IDX_C2I] - k[3549]*y_cur[IDX_H2COI] - - k[3550]*y_cur[IDX_H2OI] - k[3551]*y_cur[IDX_H2SI] - - k[3552]*y_cur[IDX_HCOI] - k[3553]*y_cur[IDX_NH3I] - - k[3618]*y_cur[IDX_NHI] - k[3747]*y_cur[IDX_OI] - - k[3805]*y_cur[IDX_OHI] - k[3910]*y_cur[IDX_CM] - - k[3945]*y_cur[IDX_C10M] - k[3980]*y_cur[IDX_C10HM] - - k[4015]*y_cur[IDX_C2M] - k[4050]*y_cur[IDX_C2HM] - - k[4085]*y_cur[IDX_C3M] - k[4120]*y_cur[IDX_C3HM] - - k[4155]*y_cur[IDX_C3NM] - k[4190]*y_cur[IDX_C4M] - - k[4225]*y_cur[IDX_C4HM] - k[4260]*y_cur[IDX_C5M] - - k[4295]*y_cur[IDX_C5HM] - k[4330]*y_cur[IDX_C5NM] - - k[4365]*y_cur[IDX_C6M] - k[4400]*y_cur[IDX_C6HM] - - k[4435]*y_cur[IDX_C7M] - k[4470]*y_cur[IDX_C7HM] - - k[4505]*y_cur[IDX_C8M] - k[4540]*y_cur[IDX_C8HM] - - k[4575]*y_cur[IDX_C9M] - k[4610]*y_cur[IDX_C9HM] - - k[4645]*y_cur[IDX_CHM] - k[4680]*y_cur[IDX_CNM] - - k[4716]*y_cur[IDX_HM] - k[4751]*y_cur[IDX_OM] - - k[4786]*y_cur[IDX_O2M] - k[4821]*y_cur[IDX_OHM] - - k[4856]*y_cur[IDX_SM] - k[6330]*y_cur[IDX_GRAINM] - - k[6331]*y_cur[IDX_GRAINM]; - data[jistart + 17013] = 0.0 - k[595]*y_cur[IDX_NH3II]; - data[jistart + 17014] = 0.0 - k[596]*y_cur[IDX_NH3II]; - data[jistart + 17015] = 0.0 - k[3747]*y_cur[IDX_NH3II]; - data[jistart + 17016] = 0.0 + k[661]*y_cur[IDX_NH3I]; - data[jistart + 17017] = 0.0 - k[4751]*y_cur[IDX_NH3II]; - data[jistart + 17018] = 0.0 + k[611]*y_cur[IDX_NH3I]; - data[jistart + 17019] = 0.0 - k[4786]*y_cur[IDX_NH3II]; - data[jistart + 17020] = 0.0 + k[3546]*y_cur[IDX_NH2I]; - data[jistart + 17021] = 0.0 + k[612]*y_cur[IDX_NH3I]; - data[jistart + 17022] = 0.0 - k[3805]*y_cur[IDX_NH3II]; - data[jistart + 17023] = 0.0 + k[692]*y_cur[IDX_NH3I] + - k[3547]*y_cur[IDX_NH2I]; - data[jistart + 17024] = 0.0 - k[4821]*y_cur[IDX_NH3II]; - data[jistart + 17025] = 0.0 + k[613]*y_cur[IDX_NH3I]; - data[jistart + 17026] = 0.0 + k[614]*y_cur[IDX_NH3I]; - data[jistart + 17027] = 0.0 - k[4856]*y_cur[IDX_NH3II]; - data[jistart + 17028] = 0.0 + k[615]*y_cur[IDX_NH3I]; - data[jistart + 17029] = 0.0 - k[597]*y_cur[IDX_NH3II]; - data[jistart + 17030] = 0.0 - k[1163]*y_cur[IDX_NH3II] - - k[1164]*y_cur[IDX_NH3II]; - data[jistart + 17031] = 0.0 - k[1911]*y_cur[IDX_NH4II]; - data[jistart + 17032] = 0.0 - k[3911]*y_cur[IDX_NH4II]; - data[jistart + 17033] = 0.0 - k[3946]*y_cur[IDX_NH4II]; - data[jistart + 17034] = 0.0 - k[3981]*y_cur[IDX_NH4II]; - data[jistart + 17035] = 0.0 - k[4016]*y_cur[IDX_NH4II]; - data[jistart + 17036] = 0.0 + k[3554]*y_cur[IDX_NH3I]; - data[jistart + 17037] = 0.0 - k[4051]*y_cur[IDX_NH4II]; - data[jistart + 17038] = 0.0 + k[3556]*y_cur[IDX_NH3I]; - data[jistart + 17039] = 0.0 + k[3557]*y_cur[IDX_NH3I]; - data[jistart + 17040] = 0.0 + k[3558]*y_cur[IDX_NH3I]; - data[jistart + 17041] = 0.0 + k[3559]*y_cur[IDX_NH3I]; - data[jistart + 17042] = 0.0 + k[3568]*y_cur[IDX_NH3I]; - data[jistart + 17043] = 0.0 + k[3560]*y_cur[IDX_NH3I]; - data[jistart + 17044] = 0.0 - k[4086]*y_cur[IDX_NH4II]; - data[jistart + 17045] = 0.0 + k[3562]*y_cur[IDX_NH3I]; - data[jistart + 17046] = 0.0 - k[4121]*y_cur[IDX_NH4II]; - data[jistart + 17047] = 0.0 + k[3565]*y_cur[IDX_NH3I]; - data[jistart + 17048] = 0.0 + k[1818]*y_cur[IDX_NH3I]; - data[jistart + 17049] = 0.0 - k[4156]*y_cur[IDX_NH4II]; - data[jistart + 17050] = 0.0 - k[4191]*y_cur[IDX_NH4II]; - data[jistart + 17051] = 0.0 - k[4226]*y_cur[IDX_NH4II]; - data[jistart + 17052] = 0.0 - k[4261]*y_cur[IDX_NH4II]; - data[jistart + 17053] = 0.0 - k[4296]*y_cur[IDX_NH4II]; - data[jistart + 17054] = 0.0 - k[4331]*y_cur[IDX_NH4II]; - data[jistart + 17055] = 0.0 - k[4366]*y_cur[IDX_NH4II]; - data[jistart + 17056] = 0.0 - k[4401]*y_cur[IDX_NH4II]; - data[jistart + 17057] = 0.0 - k[4436]*y_cur[IDX_NH4II]; - data[jistart + 17058] = 0.0 - k[4471]*y_cur[IDX_NH4II]; - data[jistart + 17059] = 0.0 - k[4506]*y_cur[IDX_NH4II]; - data[jistart + 17060] = 0.0 - k[4541]*y_cur[IDX_NH4II]; - data[jistart + 17061] = 0.0 - k[4576]*y_cur[IDX_NH4II]; - data[jistart + 17062] = 0.0 - k[4611]*y_cur[IDX_NH4II]; - data[jistart + 17063] = 0.0 + k[2260]*y_cur[IDX_NH3II]; - data[jistart + 17064] = 0.0 + k[1964]*y_cur[IDX_NH3I]; - data[jistart + 17065] = 0.0 - k[4646]*y_cur[IDX_NH4II]; - data[jistart + 17066] = 0.0 + k[1989]*y_cur[IDX_NH3I]; - data[jistart + 17067] = 0.0 + k[3567]*y_cur[IDX_NH3I]; - data[jistart + 17068] = 0.0 + k[2088]*y_cur[IDX_NH3I]; - data[jistart + 17069] = 0.0 + k[3569]*y_cur[IDX_NH3I]; - data[jistart + 17070] = 0.0 + k[2121]*y_cur[IDX_NH3I]; - data[jistart + 17071] = 0.0 + k[2207]*y_cur[IDX_NH3II]; - data[jistart + 17072] = 0.0 + k[2144]*y_cur[IDX_NH3I]; - data[jistart + 17073] = 0.0 + k[3571]*y_cur[IDX_NH3I]; - data[jistart + 17074] = 0.0 - k[4681]*y_cur[IDX_NH4II]; - data[jistart + 17075] = 0.0 - k[6337]*y_cur[IDX_NH4II] - - k[6338]*y_cur[IDX_NH4II] - k[6339]*y_cur[IDX_NH4II]; - data[jistart + 17076] = 0.0 - k[4717]*y_cur[IDX_NH4II]; - data[jistart + 17077] = 0.0 + k[2464]*y_cur[IDX_NH3II]; - data[jistart + 17078] = 0.0 + k[3549]*y_cur[IDX_NH3II]; - data[jistart + 17079] = 0.0 + k[3574]*y_cur[IDX_NH3I]; - data[jistart + 17080] = 0.0 + k[3514]*y_cur[IDX_NH2II] + - k[3550]*y_cur[IDX_NH3II]; - data[jistart + 17081] = 0.0 + k[3575]*y_cur[IDX_NH3I]; - data[jistart + 17082] = 0.0 + k[3518]*y_cur[IDX_NH2II] + - k[3551]*y_cur[IDX_NH3II]; - data[jistart + 17083] = 0.0 + k[3576]*y_cur[IDX_NH3I]; - data[jistart + 17084] = 0.0 + k[2723]*y_cur[IDX_NH3I]; - data[jistart + 17085] = 0.0 + k[3577]*y_cur[IDX_NH3I]; - data[jistart + 17086] = 0.0 + k[3578]*y_cur[IDX_NH3I]; - data[jistart + 17087] = 0.0 + k[3579]*y_cur[IDX_NH3I]; - data[jistart + 17088] = 0.0 + k[3580]*y_cur[IDX_NH3I]; - data[jistart + 17089] = 0.0 + k[3582]*y_cur[IDX_NH3I] + - k[3583]*y_cur[IDX_NH3I]; - data[jistart + 17090] = 0.0 + k[3552]*y_cur[IDX_NH3II]; - data[jistart + 17091] = 0.0 + k[3584]*y_cur[IDX_NH3I]; - data[jistart + 17092] = 0.0 + k[3585]*y_cur[IDX_NH3I]; - data[jistart + 17093] = 0.0 + k[3586]*y_cur[IDX_NH3I]; - data[jistart + 17094] = 0.0 + k[3587]*y_cur[IDX_NH3I]; - data[jistart + 17095] = 0.0 + k[3588]*y_cur[IDX_NH3I]; - data[jistart + 17096] = 0.0 + k[3589]*y_cur[IDX_NH3I]; - data[jistart + 17097] = 0.0 + k[3590]*y_cur[IDX_NH3I]; - data[jistart + 17098] = 0.0 + k[3591]*y_cur[IDX_NH3I]; - data[jistart + 17099] = 0.0 + k[3592]*y_cur[IDX_NH3I]; - data[jistart + 17100] = 0.0 + k[3593]*y_cur[IDX_NH3I]; - data[jistart + 17101] = 0.0 + k[3618]*y_cur[IDX_NH3II]; - data[jistart + 17102] = 0.0 + k[3498]*y_cur[IDX_NH3I]; - data[jistart + 17103] = 0.0 + k[3545]*y_cur[IDX_NH3II]; - data[jistart + 17104] = 0.0 + k[3514]*y_cur[IDX_H2OI] + - k[3518]*y_cur[IDX_H2SI] + k[3523]*y_cur[IDX_NH3I]; - data[jistart + 17105] = 0.0 + k[1818]*y_cur[IDX_C3H7II] + - k[1964]*y_cur[IDX_CHII] + k[1989]*y_cur[IDX_CH2II] + - k[2088]*y_cur[IDX_CH3II] + k[2121]*y_cur[IDX_CH3OH2II] + - k[2144]*y_cur[IDX_CH4II] + k[2723]*y_cur[IDX_H3II] + - k[3498]*y_cur[IDX_NHII] + k[3523]*y_cur[IDX_NH2II] + - k[3553]*y_cur[IDX_NH3II] + k[3554]*y_cur[IDX_C2HII] + - k[3556]*y_cur[IDX_C2H2II] + k[3557]*y_cur[IDX_C2H3II] + - k[3558]*y_cur[IDX_C2H5II] + k[3559]*y_cur[IDX_C2H5OH2II] + - k[3560]*y_cur[IDX_C2H7II] + k[3562]*y_cur[IDX_C3HII] + - k[3565]*y_cur[IDX_C3H3II] + k[3567]*y_cur[IDX_CH2CHCNHII] + - k[3568]*y_cur[IDX_C2H6II] + k[3569]*y_cur[IDX_CH3CHOHII] + - k[3571]*y_cur[IDX_CH5II] + k[3574]*y_cur[IDX_H2COII] + - k[3575]*y_cur[IDX_H2OII] + k[3576]*y_cur[IDX_H2SII] + - k[3577]*y_cur[IDX_H3COII] + k[3578]*y_cur[IDX_H3OII] + - k[3579]*y_cur[IDX_H3SII] + k[3580]*y_cur[IDX_HC3NHII] + - k[3582]*y_cur[IDX_HCNHII] + k[3583]*y_cur[IDX_HCNHII] + - k[3584]*y_cur[IDX_HCOII] + k[3585]*y_cur[IDX_HCO2II] + - k[3586]*y_cur[IDX_HCOOH2II] + k[3587]*y_cur[IDX_HCSII] + - k[3588]*y_cur[IDX_HNOII] + k[3589]*y_cur[IDX_HSII] + - k[3590]*y_cur[IDX_HSO2II] + k[3591]*y_cur[IDX_HSiSII] + - k[3592]*y_cur[IDX_N2HII] + k[3593]*y_cur[IDX_NCCNHII] + - k[3594]*y_cur[IDX_O2HII] + k[3596]*y_cur[IDX_PHII] + - k[3599]*y_cur[IDX_PH2II] + k[3601]*y_cur[IDX_PH3II] + - k[3603]*y_cur[IDX_SiHII] + k[3604]*y_cur[IDX_SiOHII] + - k[3786]*y_cur[IDX_OHII]; - data[jistart + 17106] = 0.0 + k[2207]*y_cur[IDX_CH4I] + - k[2260]*y_cur[IDX_CHI] + k[2464]*y_cur[IDX_H2I] + - k[3545]*y_cur[IDX_NH2I] + k[3549]*y_cur[IDX_H2COI] + - k[3550]*y_cur[IDX_H2OI] + k[3551]*y_cur[IDX_H2SI] + - k[3552]*y_cur[IDX_HCOI] + k[3553]*y_cur[IDX_NH3I] + - k[3618]*y_cur[IDX_NHI] + k[3805]*y_cur[IDX_OHI]; - data[jistart + 17107] = 0.0 - k[1165]*y_cur[IDX_eM] - - k[1166]*y_cur[IDX_eM] - k[1167]*y_cur[IDX_eM] - - k[1911]*y_cur[IDX_CI] - k[3911]*y_cur[IDX_CM] - - k[3946]*y_cur[IDX_C10M] - k[3981]*y_cur[IDX_C10HM] - - k[4016]*y_cur[IDX_C2M] - k[4051]*y_cur[IDX_C2HM] - - k[4086]*y_cur[IDX_C3M] - k[4121]*y_cur[IDX_C3HM] - - k[4156]*y_cur[IDX_C3NM] - k[4191]*y_cur[IDX_C4M] - - k[4226]*y_cur[IDX_C4HM] - k[4261]*y_cur[IDX_C5M] - - k[4296]*y_cur[IDX_C5HM] - k[4331]*y_cur[IDX_C5NM] - - k[4366]*y_cur[IDX_C6M] - k[4401]*y_cur[IDX_C6HM] - - k[4436]*y_cur[IDX_C7M] - k[4471]*y_cur[IDX_C7HM] - - k[4506]*y_cur[IDX_C8M] - k[4541]*y_cur[IDX_C8HM] - - k[4576]*y_cur[IDX_C9M] - k[4611]*y_cur[IDX_C9HM] - - k[4646]*y_cur[IDX_CHM] - k[4681]*y_cur[IDX_CNM] - - k[4717]*y_cur[IDX_HM] - k[4752]*y_cur[IDX_OM] - - k[4787]*y_cur[IDX_O2M] - k[4822]*y_cur[IDX_OHM] - - k[4857]*y_cur[IDX_SM] - k[6337]*y_cur[IDX_GRAINM] - - k[6338]*y_cur[IDX_GRAINM] - k[6339]*y_cur[IDX_GRAINM]; - data[jistart + 17108] = 0.0 - k[4752]*y_cur[IDX_NH4II]; - data[jistart + 17109] = 0.0 - k[4787]*y_cur[IDX_NH4II]; - data[jistart + 17110] = 0.0 + k[3594]*y_cur[IDX_NH3I]; - data[jistart + 17111] = 0.0 + k[3805]*y_cur[IDX_NH3II]; - data[jistart + 17112] = 0.0 + k[3786]*y_cur[IDX_NH3I]; - data[jistart + 17113] = 0.0 - k[4822]*y_cur[IDX_NH4II]; - data[jistart + 17114] = 0.0 + k[3596]*y_cur[IDX_NH3I]; - data[jistart + 17115] = 0.0 + k[3599]*y_cur[IDX_NH3I]; - data[jistart + 17116] = 0.0 + k[3601]*y_cur[IDX_NH3I]; - data[jistart + 17117] = 0.0 - k[4857]*y_cur[IDX_NH4II]; - data[jistart + 17118] = 0.0 + k[3603]*y_cur[IDX_NH3I]; - data[jistart + 17119] = 0.0 + k[3604]*y_cur[IDX_NH3I]; - data[jistart + 17120] = 0.0 - k[1165]*y_cur[IDX_NH4II] - - k[1166]*y_cur[IDX_NH4II] - k[1167]*y_cur[IDX_NH4II]; - data[jistart + 17121] = 0.0 + k[1907]*y_cur[IDX_HNOII] - - k[4974]*y_cur[IDX_NOI] - k[4975]*y_cur[IDX_NOI] + - k[5202]*y_cur[IDX_HCNOI]; - data[jistart + 17122] = 0.0 - k[186]*y_cur[IDX_NOI]; - data[jistart + 17123] = 0.0 - k[1449]*y_cur[IDX_NOI] + - k[3912]*y_cur[IDX_NOII]; - data[jistart + 17124] = 0.0 + k[3947]*y_cur[IDX_NOII]; - data[jistart + 17125] = 0.0 + k[3982]*y_cur[IDX_NOII]; - data[jistart + 17126] = 0.0 + k[1460]*y_cur[IDX_HNOII]; - data[jistart + 17127] = 0.0 - k[206]*y_cur[IDX_NOI]; - data[jistart + 17128] = 0.0 + k[4017]*y_cur[IDX_NOII]; - data[jistart + 17129] = 0.0 + k[1747]*y_cur[IDX_HNOII]; - data[jistart + 17130] = 0.0 - k[212]*y_cur[IDX_NOI]; - data[jistart + 17131] = 0.0 + k[4052]*y_cur[IDX_NOII]; - data[jistart + 17132] = 0.0 - k[4878]*y_cur[IDX_NOI]; - data[jistart + 17133] = 0.0 - k[226]*y_cur[IDX_NOI]; - data[jistart + 17134] = 0.0 + k[4087]*y_cur[IDX_NOII]; - data[jistart + 17135] = 0.0 - k[621]*y_cur[IDX_NOI] - - k[3626]*y_cur[IDX_NOI]; - data[jistart + 17136] = 0.0 + k[4122]*y_cur[IDX_NOII]; - data[jistart + 17137] = 0.0 + k[4157]*y_cur[IDX_NOII]; - data[jistart + 17138] = 0.0 + k[4192]*y_cur[IDX_NOII]; - data[jistart + 17139] = 0.0 + k[4227]*y_cur[IDX_NOII]; - data[jistart + 17140] = 0.0 - k[622]*y_cur[IDX_NOI]; - data[jistart + 17141] = 0.0 + k[4262]*y_cur[IDX_NOII]; - data[jistart + 17142] = 0.0 + k[4297]*y_cur[IDX_NOII]; - data[jistart + 17143] = 0.0 + k[4332]*y_cur[IDX_NOII]; - data[jistart + 17144] = 0.0 + k[4367]*y_cur[IDX_NOII]; - data[jistart + 17145] = 0.0 + k[4402]*y_cur[IDX_NOII]; - data[jistart + 17146] = 0.0 + k[4437]*y_cur[IDX_NOII]; - data[jistart + 17147] = 0.0 + k[4472]*y_cur[IDX_NOII]; - data[jistart + 17148] = 0.0 + k[4507]*y_cur[IDX_NOII]; - data[jistart + 17149] = 0.0 + k[4542]*y_cur[IDX_NOII]; - data[jistart + 17150] = 0.0 + k[4577]*y_cur[IDX_NOII]; - data[jistart + 17151] = 0.0 + k[4612]*y_cur[IDX_NOII]; - data[jistart + 17152] = 0.0 + k[2254]*y_cur[IDX_HNOII] + - k[5078]*y_cur[IDX_HNOI] - k[5083]*y_cur[IDX_NOI] - - k[5084]*y_cur[IDX_NOI] - k[5085]*y_cur[IDX_NOI]; - data[jistart + 17153] = 0.0 - k[254]*y_cur[IDX_NOI]; - data[jistart + 17154] = 0.0 + k[4647]*y_cur[IDX_NOII]; - data[jistart + 17155] = 0.0 + k[2009]*y_cur[IDX_HNOII] + - k[5000]*y_cur[IDX_HNOI] + k[5002]*y_cur[IDX_NO2I] - - k[5003]*y_cur[IDX_NOI] - k[5004]*y_cur[IDX_NOI] - - k[5005]*y_cur[IDX_NOI] - k[5006]*y_cur[IDX_NOI]; - data[jistart + 17156] = 0.0 - k[258]*y_cur[IDX_NOI]; - data[jistart + 17157] = 0.0 + k[5034]*y_cur[IDX_HNOI] - - k[5038]*y_cur[IDX_NOI]; - data[jistart + 17158] = 0.0 - k[274]*y_cur[IDX_NOI]; - data[jistart + 17159] = 0.0 + k[3635]*y_cur[IDX_OII]; - data[jistart + 17160] = 0.0 + k[3339]*y_cur[IDX_NII]; - data[jistart + 17161] = 0.0 + k[2202]*y_cur[IDX_HNOII]; - data[jistart + 17162] = 0.0 + k[2278]*y_cur[IDX_HNOII] + - k[5119]*y_cur[IDX_HNOI] + k[5120]*y_cur[IDX_NO2I] - - k[5121]*y_cur[IDX_NOI] - k[5122]*y_cur[IDX_NOI] + - k[5123]*y_cur[IDX_O2I] + k[5388]*y_cur[IDX_OI]; - data[jistart + 17163] = 0.0 - k[303]*y_cur[IDX_NOI] + - k[2269]*y_cur[IDX_CO2I] - k[2274]*y_cur[IDX_NOI]; - data[jistart + 17164] = 0.0 + k[4682]*y_cur[IDX_NOII]; - data[jistart + 17165] = 0.0 + k[5389]*y_cur[IDX_OI]; - data[jistart + 17166] = 0.0 + k[2286]*y_cur[IDX_HNOII] + - k[5129]*y_cur[IDX_NO2I]; - data[jistart + 17167] = 0.0 - k[311]*y_cur[IDX_NOI]; - data[jistart + 17168] = 0.0 + k[2269]*y_cur[IDX_CNII] + - k[3049]*y_cur[IDX_HNOII] + k[3343]*y_cur[IDX_NII] + - k[5262]*y_cur[IDX_NI]; - data[jistart + 17169] = 0.0 - k[623]*y_cur[IDX_NOI]; - data[jistart + 17170] = 0.0 + k[620]*y_cur[IDX_NOII]; - data[jistart + 17171] = 0.0 + k[8702]*y_cur[IDX_GOI]; - data[jistart + 17172] = 0.0 + k[7107] + k[7289] + k[7471]; - data[jistart + 17173] = 0.0 + k[8702]*y_cur[IDX_GNI]; - data[jistart + 17174] = 0.0 + k[6422]*y_cur[IDX_HNOII] + - k[6432]*y_cur[IDX_H2NOII] + k[6514]*y_cur[IDX_HCNOII] + - k[6529]*y_cur[IDX_N2OII] + k[6536]*y_cur[IDX_H2CNOII] + - k[6584]*y_cur[IDX_NO2II]; - data[jistart + 17175] = 0.0 + k[5176]*y_cur[IDX_HNOI] + - k[5180]*y_cur[IDX_N2OI] + k[5185]*y_cur[IDX_NO2I] - - k[5186]*y_cur[IDX_NOI] - k[5187]*y_cur[IDX_NOI]; - data[jistart + 17176] = 0.0 - k[403]*y_cur[IDX_NOI] + - k[2343]*y_cur[IDX_HCNOI]; - data[jistart + 17177] = 0.0 + k[4718]*y_cur[IDX_NOII]; - data[jistart + 17178] = 0.0 - k[454]*y_cur[IDX_NOI] - - k[2394]*y_cur[IDX_NOI]; - data[jistart + 17179] = 0.0 + k[994]*y_cur[IDX_eM] + - k[6536]*y_cur[IDX_GRAINM]; - data[jistart + 17180] = 0.0 + k[2497]*y_cur[IDX_HNOII]; - data[jistart + 17181] = 0.0 - k[624]*y_cur[IDX_NOI]; - data[jistart + 17182] = 0.0 + k[1011]*y_cur[IDX_eM] + - k[6432]*y_cur[IDX_GRAINM]; - data[jistart + 17183] = 0.0 + k[2550]*y_cur[IDX_HNOII]; - data[jistart + 17184] = 0.0 - k[472]*y_cur[IDX_NOI]; - data[jistart + 17185] = 0.0 - k[625]*y_cur[IDX_NOI]; - data[jistart + 17186] = 0.0 - k[2726]*y_cur[IDX_NOI]; - data[jistart + 17187] = 0.0 + k[2878]*y_cur[IDX_HNOII]; - data[jistart + 17188] = 0.0 - k[494]*y_cur[IDX_NOI]; - data[jistart + 17189] = 0.0 + k[2343]*y_cur[IDX_HII] + - k[5202]*y_cur[IDX_CI] + k[5855] + k[6182]; - data[jistart + 17190] = 0.0 + k[1092]*y_cur[IDX_eM] + - k[6514]*y_cur[IDX_GRAINM]; - data[jistart + 17191] = 0.0 + k[3008]*y_cur[IDX_HNOII] + - k[5206]*y_cur[IDX_HNOI] - k[5207]*y_cur[IDX_NOI]; - data[jistart + 17192] = 0.0 + k[3042]*y_cur[IDX_HNOII]; - data[jistart + 17193] = 0.0 + k[3266]*y_cur[IDX_HeII] + - k[5000]*y_cur[IDX_CH2I] + k[5034]*y_cur[IDX_CH3I] + - k[5078]*y_cur[IDX_CHI] + k[5119]*y_cur[IDX_CNI] + - k[5176]*y_cur[IDX_HI] + k[5206]*y_cur[IDX_HCOI] + - k[5270]*y_cur[IDX_NI] - k[5326]*y_cur[IDX_NOI] + - k[5412]*y_cur[IDX_OI] + k[5472]*y_cur[IDX_OHI] + k[5869] + k[6200]; - data[jistart + 17194] = 0.0 - k[626]*y_cur[IDX_NOI] + - k[1121]*y_cur[IDX_eM] + k[1460]*y_cur[IDX_C2I] + - k[1747]*y_cur[IDX_C2HI] + k[1907]*y_cur[IDX_CI] + - k[2009]*y_cur[IDX_CH2I] + k[2202]*y_cur[IDX_CH4I] + - k[2254]*y_cur[IDX_CHI] + k[2278]*y_cur[IDX_CNI] + - k[2286]*y_cur[IDX_COI] + k[2497]*y_cur[IDX_H2COI] + - k[2550]*y_cur[IDX_H2OI] + k[2878]*y_cur[IDX_HCNI] + - k[3008]*y_cur[IDX_HCOI] + k[3042]*y_cur[IDX_HNCI] + - k[3049]*y_cur[IDX_CO2I] + k[3050]*y_cur[IDX_SI] + - k[3366]*y_cur[IDX_N2I] + k[3543]*y_cur[IDX_NH2I] + - k[3588]*y_cur[IDX_NH3I] + k[3615]*y_cur[IDX_NHI] + - k[3803]*y_cur[IDX_OHI] + k[6422]*y_cur[IDX_GRAINM]; - data[jistart + 17195] = 0.0 - k[627]*y_cur[IDX_NOI]; - data[jistart + 17196] = 0.0 + k[3266]*y_cur[IDX_HNOI] + - k[3278]*y_cur[IDX_N2OI] - k[3286]*y_cur[IDX_NOI] - - k[3287]*y_cur[IDX_NOI]; - data[jistart + 17197] = 0.0 + k[536]*y_cur[IDX_NOII]; - data[jistart + 17198] = 0.0 + k[122]*y_cur[IDX_OM] + - k[3476]*y_cur[IDX_SiOII] + k[5262]*y_cur[IDX_CO2I] + - k[5270]*y_cur[IDX_HNOI] + k[5277]*y_cur[IDX_NO2I] + - k[5277]*y_cur[IDX_NO2I] - k[5279]*y_cur[IDX_NOI] + - k[5281]*y_cur[IDX_O2I] + k[5283]*y_cur[IDX_OHI] + - k[5287]*y_cur[IDX_POI] + k[5291]*y_cur[IDX_SOI]; - data[jistart + 17199] = 0.0 - k[560]*y_cur[IDX_NOI] + - k[3339]*y_cur[IDX_CH3OHI] + k[3343]*y_cur[IDX_CO2I] - - k[3356]*y_cur[IDX_NOI] + k[3358]*y_cur[IDX_O2I] + - k[3359]*y_cur[IDX_OCSI]; - data[jistart + 17200] = 0.0 + k[3366]*y_cur[IDX_HNOII] + - k[5417]*y_cur[IDX_OI]; - data[jistart + 17201] = 0.0 - k[569]*y_cur[IDX_NOI]; - data[jistart + 17202] = 0.0 + k[3278]*y_cur[IDX_HeII] + - k[5180]*y_cur[IDX_HI] - k[5327]*y_cur[IDX_NOI] + - k[5418]*y_cur[IDX_OI] + k[5418]*y_cur[IDX_OI] + - k[5473]*y_cur[IDX_OHI] + k[5879] + k[6214]; - data[jistart + 17203] = 0.0 + k[1171]*y_cur[IDX_eM] + - k[6529]*y_cur[IDX_GRAINM]; - data[jistart + 17204] = 0.0 + k[3615]*y_cur[IDX_HNOII] + - k[5311]*y_cur[IDX_NO2I] - k[5313]*y_cur[IDX_NOI] - - k[5314]*y_cur[IDX_NOI] - k[5315]*y_cur[IDX_NOI] + - k[5317]*y_cur[IDX_O2I] + k[5318]*y_cur[IDX_OI] + - k[5319]*y_cur[IDX_OI]; - data[jistart + 17205] = 0.0 - k[577]*y_cur[IDX_NOI] - - k[3500]*y_cur[IDX_NOI]; - data[jistart + 17206] = 0.0 + k[3543]*y_cur[IDX_HNOII] - - k[5298]*y_cur[IDX_NOI] - k[5299]*y_cur[IDX_NOI]; - data[jistart + 17207] = 0.0 - k[583]*y_cur[IDX_NOI]; - data[jistart + 17208] = 0.0 + k[3588]*y_cur[IDX_HNOII]; - data[jistart + 17209] = 0.0 - k[595]*y_cur[IDX_NOI]; - data[jistart + 17210] = 0.0 - k[125]*y_cur[IDX_OM] - - k[186]*y_cur[IDX_CII] - k[206]*y_cur[IDX_C2II] - - k[212]*y_cur[IDX_C2HII] - k[226]*y_cur[IDX_C2H2II] - - k[254]*y_cur[IDX_CHII] - k[258]*y_cur[IDX_CH2II] - - k[274]*y_cur[IDX_CH3II] - k[303]*y_cur[IDX_CNII] - - k[311]*y_cur[IDX_COII] - k[403]*y_cur[IDX_HII] - - k[454]*y_cur[IDX_H2II] - k[472]*y_cur[IDX_H2OII] - - k[494]*y_cur[IDX_HCNII] - k[560]*y_cur[IDX_NII] - - k[569]*y_cur[IDX_N2II] - k[577]*y_cur[IDX_NHII] - - k[583]*y_cur[IDX_NH2II] - k[595]*y_cur[IDX_NH3II] - - k[621]*y_cur[IDX_C3HII] - k[622]*y_cur[IDX_C4H2II] - - k[623]*y_cur[IDX_CO2II] - k[624]*y_cur[IDX_H2COII] - - k[625]*y_cur[IDX_H2SII] - k[626]*y_cur[IDX_HNOII] - - k[627]*y_cur[IDX_HSII] - k[628]*y_cur[IDX_O2II] - - k[629]*y_cur[IDX_SII] - k[630]*y_cur[IDX_S2II] - - k[631]*y_cur[IDX_SiOII] - k[693]*y_cur[IDX_OHII] - - k[1449]*y_cur[IDX_CM] - k[2274]*y_cur[IDX_CNII] - - k[2394]*y_cur[IDX_H2II] - k[2726]*y_cur[IDX_H3II] - - k[3286]*y_cur[IDX_HeII] - k[3287]*y_cur[IDX_HeII] - - k[3356]*y_cur[IDX_NII] - k[3500]*y_cur[IDX_NHII] - - k[3626]*y_cur[IDX_C3HII] - k[3627]*y_cur[IDX_O2HII] - - k[3787]*y_cur[IDX_OHII] - k[4878]*y_cur[IDX_C2H2I] - - k[4974]*y_cur[IDX_CI] - k[4975]*y_cur[IDX_CI] - - k[5003]*y_cur[IDX_CH2I] - k[5004]*y_cur[IDX_CH2I] - - k[5005]*y_cur[IDX_CH2I] - k[5006]*y_cur[IDX_CH2I] - - k[5038]*y_cur[IDX_CH3I] - k[5083]*y_cur[IDX_CHI] - - k[5084]*y_cur[IDX_CHI] - k[5085]*y_cur[IDX_CHI] - - k[5121]*y_cur[IDX_CNI] - k[5122]*y_cur[IDX_CNI] - - k[5186]*y_cur[IDX_HI] - k[5187]*y_cur[IDX_HI] - - k[5207]*y_cur[IDX_HCOI] - k[5279]*y_cur[IDX_NI] - - k[5298]*y_cur[IDX_NH2I] - k[5299]*y_cur[IDX_NH2I] - - k[5313]*y_cur[IDX_NHI] - k[5314]*y_cur[IDX_NHI] - - k[5315]*y_cur[IDX_NHI] - k[5326]*y_cur[IDX_HNOI] - - k[5327]*y_cur[IDX_N2OI] - k[5328]*y_cur[IDX_NOI] - - k[5328]*y_cur[IDX_NOI] - k[5328]*y_cur[IDX_NOI] - - k[5328]*y_cur[IDX_NOI] - k[5329]*y_cur[IDX_NOI] - - k[5329]*y_cur[IDX_NOI] - k[5329]*y_cur[IDX_NOI] - - k[5329]*y_cur[IDX_NOI] - k[5330]*y_cur[IDX_O2I] - - k[5331]*y_cur[IDX_OCNI] - k[5332]*y_cur[IDX_OCNI] - - k[5333]*y_cur[IDX_SI] - k[5334]*y_cur[IDX_SI] - - k[5424]*y_cur[IDX_OI] - k[5477]*y_cur[IDX_OHI] - - k[5493]*y_cur[IDX_SiI] - k[5891] - k[5892] - k[6228] - k[6229] - - k[6925]; - data[jistart + 17211] = 0.0 + k[536]*y_cur[IDX_MgI] + - k[620]*y_cur[IDX_FeI] + k[641]*y_cur[IDX_NaI] + - k[721]*y_cur[IDX_SiI] + k[3912]*y_cur[IDX_CM] + - k[3947]*y_cur[IDX_C10M] + k[3982]*y_cur[IDX_C10HM] + - k[4017]*y_cur[IDX_C2M] + k[4052]*y_cur[IDX_C2HM] + - k[4087]*y_cur[IDX_C3M] + k[4122]*y_cur[IDX_C3HM] + - k[4157]*y_cur[IDX_C3NM] + k[4192]*y_cur[IDX_C4M] + - k[4227]*y_cur[IDX_C4HM] + k[4262]*y_cur[IDX_C5M] + - k[4297]*y_cur[IDX_C5HM] + k[4332]*y_cur[IDX_C5NM] + - k[4367]*y_cur[IDX_C6M] + k[4402]*y_cur[IDX_C6HM] + - k[4437]*y_cur[IDX_C7M] + k[4472]*y_cur[IDX_C7HM] + - k[4507]*y_cur[IDX_C8M] + k[4542]*y_cur[IDX_C8HM] + - k[4577]*y_cur[IDX_C9M] + k[4612]*y_cur[IDX_C9HM] + - k[4647]*y_cur[IDX_CHM] + k[4682]*y_cur[IDX_CNM] + - k[4718]*y_cur[IDX_HM] + k[4753]*y_cur[IDX_OM] + - k[4788]*y_cur[IDX_O2M] + k[4823]*y_cur[IDX_OHM] + - k[4858]*y_cur[IDX_SM]; - data[jistart + 17212] = 0.0 + k[5002]*y_cur[IDX_CH2I] + - k[5120]*y_cur[IDX_CNI] + k[5129]*y_cur[IDX_COI] + - k[5185]*y_cur[IDX_HI] + k[5277]*y_cur[IDX_NI] + - k[5277]*y_cur[IDX_NI] + k[5311]*y_cur[IDX_NHI] + - k[5423]*y_cur[IDX_OI] + k[5890] + k[6227]; - data[jistart + 17213] = 0.0 + k[1169]*y_cur[IDX_eM] + - k[6584]*y_cur[IDX_GRAINM]; - data[jistart + 17214] = 0.0 + k[5425]*y_cur[IDX_OI]; - data[jistart + 17215] = 0.0 + k[641]*y_cur[IDX_NOII]; - data[jistart + 17216] = 0.0 + k[5318]*y_cur[IDX_NHI] + - k[5319]*y_cur[IDX_NHI] + k[5388]*y_cur[IDX_CNI] + - k[5389]*y_cur[IDX_CNOI] + k[5412]*y_cur[IDX_HNOI] + - k[5417]*y_cur[IDX_N2I] + k[5418]*y_cur[IDX_N2OI] + - k[5418]*y_cur[IDX_N2OI] + k[5423]*y_cur[IDX_NO2I] - - k[5424]*y_cur[IDX_NOI] + k[5425]*y_cur[IDX_NSI] + - k[5428]*y_cur[IDX_OCNI] + k[5450]*y_cur[IDX_SiNI]; - data[jistart + 17217] = 0.0 + k[3635]*y_cur[IDX_CH3CNI]; - data[jistart + 17218] = 0.0 + k[122]*y_cur[IDX_NI] - - k[125]*y_cur[IDX_NOI] + k[4753]*y_cur[IDX_NOII]; - data[jistart + 17219] = 0.0 + k[3358]*y_cur[IDX_NII] + - k[5123]*y_cur[IDX_CNI] + k[5281]*y_cur[IDX_NI] + - k[5317]*y_cur[IDX_NHI] - k[5330]*y_cur[IDX_NOI] + - k[5335]*y_cur[IDX_OCNI]; - data[jistart + 17220] = 0.0 - k[628]*y_cur[IDX_NOI]; - data[jistart + 17221] = 0.0 + k[4788]*y_cur[IDX_NOII]; - data[jistart + 17222] = 0.0 - k[3627]*y_cur[IDX_NOI]; - data[jistart + 17223] = 0.0 - k[5331]*y_cur[IDX_NOI] - - k[5332]*y_cur[IDX_NOI] + k[5335]*y_cur[IDX_O2I] + - k[5428]*y_cur[IDX_OI]; - data[jistart + 17224] = 0.0 + k[3359]*y_cur[IDX_NII]; - data[jistart + 17225] = 0.0 + k[3803]*y_cur[IDX_HNOII] + - k[5283]*y_cur[IDX_NI] + k[5472]*y_cur[IDX_HNOI] + - k[5473]*y_cur[IDX_N2OI] - k[5477]*y_cur[IDX_NOI]; - data[jistart + 17226] = 0.0 - k[693]*y_cur[IDX_NOI] - - k[3787]*y_cur[IDX_NOI]; - data[jistart + 17227] = 0.0 + k[4823]*y_cur[IDX_NOII]; - data[jistart + 17228] = 0.0 + k[5287]*y_cur[IDX_NI]; - data[jistart + 17229] = 0.0 + k[3050]*y_cur[IDX_HNOII] - - k[5333]*y_cur[IDX_NOI] - k[5334]*y_cur[IDX_NOI]; - data[jistart + 17230] = 0.0 - k[629]*y_cur[IDX_NOI]; - data[jistart + 17231] = 0.0 + k[4858]*y_cur[IDX_NOII]; - data[jistart + 17232] = 0.0 - k[630]*y_cur[IDX_NOI]; - data[jistart + 17233] = 0.0 + k[5291]*y_cur[IDX_NI]; - data[jistart + 17234] = 0.0 + k[721]*y_cur[IDX_NOII] - - k[5493]*y_cur[IDX_NOI]; - data[jistart + 17235] = 0.0 + k[5450]*y_cur[IDX_OI]; - data[jistart + 17236] = 0.0 - k[631]*y_cur[IDX_NOI] + - k[3476]*y_cur[IDX_NI]; - data[jistart + 17237] = 0.0 + k[994]*y_cur[IDX_H2CNOII] + - k[1011]*y_cur[IDX_H2NOII] + k[1092]*y_cur[IDX_HCNOII] + - k[1121]*y_cur[IDX_HNOII] + k[1169]*y_cur[IDX_NO2II] + - k[1171]*y_cur[IDX_N2OII]; - data[jistart + 17238] = 0.0 + k[186]*y_cur[IDX_NOI] + - k[1416]*y_cur[IDX_N2OI]; - data[jistart + 17239] = 0.0 - k[3912]*y_cur[IDX_NOII]; - data[jistart + 17240] = 0.0 - k[3947]*y_cur[IDX_NOII]; - data[jistart + 17241] = 0.0 - k[3982]*y_cur[IDX_NOII]; - data[jistart + 17242] = 0.0 + k[206]*y_cur[IDX_NOI]; - data[jistart + 17243] = 0.0 - k[4017]*y_cur[IDX_NOII]; - data[jistart + 17244] = 0.0 + k[212]*y_cur[IDX_NOI]; - data[jistart + 17245] = 0.0 - k[4052]*y_cur[IDX_NOII]; - data[jistart + 17246] = 0.0 + k[226]*y_cur[IDX_NOI]; - data[jistart + 17247] = 0.0 - k[4087]*y_cur[IDX_NOII]; - data[jistart + 17248] = 0.0 + k[621]*y_cur[IDX_NOI]; - data[jistart + 17249] = 0.0 - k[4122]*y_cur[IDX_NOII]; - data[jistart + 17250] = 0.0 - k[4157]*y_cur[IDX_NOII]; - data[jistart + 17251] = 0.0 - k[4192]*y_cur[IDX_NOII]; - data[jistart + 17252] = 0.0 - k[4227]*y_cur[IDX_NOII]; - data[jistart + 17253] = 0.0 + k[622]*y_cur[IDX_NOI]; - data[jistart + 17254] = 0.0 - k[4262]*y_cur[IDX_NOII]; - data[jistart + 17255] = 0.0 - k[4297]*y_cur[IDX_NOII]; - data[jistart + 17256] = 0.0 - k[4332]*y_cur[IDX_NOII]; - data[jistart + 17257] = 0.0 - k[4367]*y_cur[IDX_NOII]; - data[jistart + 17258] = 0.0 - k[4402]*y_cur[IDX_NOII]; - data[jistart + 17259] = 0.0 - k[4437]*y_cur[IDX_NOII]; - data[jistart + 17260] = 0.0 - k[4472]*y_cur[IDX_NOII]; - data[jistart + 17261] = 0.0 - k[4507]*y_cur[IDX_NOII]; - data[jistart + 17262] = 0.0 - k[4542]*y_cur[IDX_NOII]; - data[jistart + 17263] = 0.0 - k[4577]*y_cur[IDX_NOII]; - data[jistart + 17264] = 0.0 - k[4612]*y_cur[IDX_NOII]; - data[jistart + 17265] = 0.0 + k[254]*y_cur[IDX_NOI]; - data[jistart + 17266] = 0.0 - k[4647]*y_cur[IDX_NOII]; - data[jistart + 17267] = 0.0 + k[258]*y_cur[IDX_NOI]; - data[jistart + 17268] = 0.0 + k[274]*y_cur[IDX_NOI]; - data[jistart + 17269] = 0.0 + k[3338]*y_cur[IDX_NII]; - data[jistart + 17270] = 0.0 + k[3639]*y_cur[IDX_OII]; - data[jistart + 17271] = 0.0 + k[303]*y_cur[IDX_NOI] + - k[2275]*y_cur[IDX_O2I]; - data[jistart + 17272] = 0.0 - k[4682]*y_cur[IDX_NOII]; - data[jistart + 17273] = 0.0 + k[3344]*y_cur[IDX_NII]; - data[jistart + 17274] = 0.0 + k[311]*y_cur[IDX_NOI]; - data[jistart + 17275] = 0.0 + k[3484]*y_cur[IDX_NHII]; - data[jistart + 17276] = 0.0 + k[623]*y_cur[IDX_NOI]; - data[jistart + 17277] = 0.0 - k[620]*y_cur[IDX_NOII]; - data[jistart + 17278] = 0.0 - k[6407]*y_cur[IDX_NOII]; - data[jistart + 17279] = 0.0 + k[2846]*y_cur[IDX_NO2II]; - data[jistart + 17280] = 0.0 + k[403]*y_cur[IDX_NOI] + - k[2349]*y_cur[IDX_HNOI] + k[2355]*y_cur[IDX_NO2I]; - data[jistart + 17281] = 0.0 - k[4718]*y_cur[IDX_NOII]; - data[jistart + 17282] = 0.0 + k[2465]*y_cur[IDX_NO2II]; - data[jistart + 17283] = 0.0 + k[454]*y_cur[IDX_NOI]; - data[jistart + 17284] = 0.0 + k[3346]*y_cur[IDX_NII]; - data[jistart + 17285] = 0.0 + k[624]*y_cur[IDX_NOI]; - data[jistart + 17286] = 0.0 + k[472]*y_cur[IDX_NOI] + - k[3458]*y_cur[IDX_NI]; - data[jistart + 17287] = 0.0 + k[625]*y_cur[IDX_NOI]; - data[jistart + 17288] = 0.0 + k[2725]*y_cur[IDX_NO2I]; - data[jistart + 17289] = 0.0 + k[3645]*y_cur[IDX_OII]; - data[jistart + 17290] = 0.0 + k[494]*y_cur[IDX_NOI]; - data[jistart + 17291] = 0.0 + k[2349]*y_cur[IDX_HII] + - k[3265]*y_cur[IDX_HeII]; - data[jistart + 17292] = 0.0 + k[626]*y_cur[IDX_NOI]; - data[jistart + 17293] = 0.0 + k[627]*y_cur[IDX_NOI]; - data[jistart + 17294] = 0.0 + k[3265]*y_cur[IDX_HNOI] + - k[3277]*y_cur[IDX_N2OI]; - data[jistart + 17295] = 0.0 - k[536]*y_cur[IDX_NOII]; - data[jistart + 17296] = 0.0 + k[3458]*y_cur[IDX_H2OII] + - k[3465]*y_cur[IDX_O2II] + k[3467]*y_cur[IDX_OHII] + - k[3475]*y_cur[IDX_SiOII]; - data[jistart + 17297] = 0.0 + k[560]*y_cur[IDX_NOI] + - k[3338]*y_cur[IDX_CH3OHI] + k[3344]*y_cur[IDX_COI] + - k[3346]*y_cur[IDX_H2COI] + k[3357]*y_cur[IDX_O2I]; - data[jistart + 17298] = 0.0 + k[3647]*y_cur[IDX_OII]; - data[jistart + 17299] = 0.0 + k[569]*y_cur[IDX_NOI] + - k[3744]*y_cur[IDX_OI]; - data[jistart + 17300] = 0.0 + k[1416]*y_cur[IDX_CII] + - k[3277]*y_cur[IDX_HeII]; - data[jistart + 17301] = 0.0 + k[3619]*y_cur[IDX_OII]; - data[jistart + 17302] = 0.0 + k[577]*y_cur[IDX_NOI] + - k[3484]*y_cur[IDX_CO2I] + k[3501]*y_cur[IDX_O2I]; - data[jistart + 17303] = 0.0 + k[583]*y_cur[IDX_NOI]; - data[jistart + 17304] = 0.0 + k[595]*y_cur[IDX_NOI]; - data[jistart + 17305] = 0.0 + k[186]*y_cur[IDX_CII] + - k[206]*y_cur[IDX_C2II] + k[212]*y_cur[IDX_C2HII] + - k[226]*y_cur[IDX_C2H2II] + k[254]*y_cur[IDX_CHII] + - k[258]*y_cur[IDX_CH2II] + k[274]*y_cur[IDX_CH3II] + - k[303]*y_cur[IDX_CNII] + k[311]*y_cur[IDX_COII] + - k[403]*y_cur[IDX_HII] + k[454]*y_cur[IDX_H2II] + - k[472]*y_cur[IDX_H2OII] + k[494]*y_cur[IDX_HCNII] + - k[560]*y_cur[IDX_NII] + k[569]*y_cur[IDX_N2II] + - k[577]*y_cur[IDX_NHII] + k[583]*y_cur[IDX_NH2II] + - k[595]*y_cur[IDX_NH3II] + k[621]*y_cur[IDX_C3HII] + - k[622]*y_cur[IDX_C4H2II] + k[623]*y_cur[IDX_CO2II] + - k[624]*y_cur[IDX_H2COII] + k[625]*y_cur[IDX_H2SII] + - k[626]*y_cur[IDX_HNOII] + k[627]*y_cur[IDX_HSII] + - k[628]*y_cur[IDX_O2II] + k[629]*y_cur[IDX_SII] + - k[630]*y_cur[IDX_S2II] + k[631]*y_cur[IDX_SiOII] + - k[693]*y_cur[IDX_OHII] + k[5891] + k[6228]; - data[jistart + 17306] = 0.0 - k[536]*y_cur[IDX_MgI] - - k[620]*y_cur[IDX_FeI] - k[641]*y_cur[IDX_NaI] - - k[721]*y_cur[IDX_SiI] - k[1168]*y_cur[IDX_eM] - - k[3912]*y_cur[IDX_CM] - k[3947]*y_cur[IDX_C10M] - - k[3982]*y_cur[IDX_C10HM] - k[4017]*y_cur[IDX_C2M] - - k[4052]*y_cur[IDX_C2HM] - k[4087]*y_cur[IDX_C3M] - - k[4122]*y_cur[IDX_C3HM] - k[4157]*y_cur[IDX_C3NM] - - k[4192]*y_cur[IDX_C4M] - k[4227]*y_cur[IDX_C4HM] - - k[4262]*y_cur[IDX_C5M] - k[4297]*y_cur[IDX_C5HM] - - k[4332]*y_cur[IDX_C5NM] - k[4367]*y_cur[IDX_C6M] - - k[4402]*y_cur[IDX_C6HM] - k[4437]*y_cur[IDX_C7M] - - k[4472]*y_cur[IDX_C7HM] - k[4507]*y_cur[IDX_C8M] - - k[4542]*y_cur[IDX_C8HM] - k[4577]*y_cur[IDX_C9M] - - k[4612]*y_cur[IDX_C9HM] - k[4647]*y_cur[IDX_CHM] - - k[4682]*y_cur[IDX_CNM] - k[4718]*y_cur[IDX_HM] - - k[4753]*y_cur[IDX_OM] - k[4788]*y_cur[IDX_O2M] - - k[4823]*y_cur[IDX_OHM] - k[4858]*y_cur[IDX_SM] - - k[6407]*y_cur[IDX_GRAINM]; - data[jistart + 17307] = 0.0 + k[2355]*y_cur[IDX_HII] + - k[2725]*y_cur[IDX_H3II] + k[3648]*y_cur[IDX_OII]; - data[jistart + 17308] = 0.0 + k[2465]*y_cur[IDX_H2I] + - k[2846]*y_cur[IDX_HI]; - data[jistart + 17309] = 0.0 + k[3748]*y_cur[IDX_OI]; - data[jistart + 17310] = 0.0 - k[641]*y_cur[IDX_NOII]; - data[jistart + 17311] = 0.0 + k[3744]*y_cur[IDX_N2II] + - k[3748]*y_cur[IDX_NSII]; - data[jistart + 17312] = 0.0 + k[3619]*y_cur[IDX_NHI] + - k[3639]*y_cur[IDX_CNI] + k[3645]*y_cur[IDX_HCNI] + - k[3647]*y_cur[IDX_N2I] + k[3648]*y_cur[IDX_NO2I]; - data[jistart + 17313] = 0.0 - k[4753]*y_cur[IDX_NOII]; - data[jistart + 17314] = 0.0 + k[2275]*y_cur[IDX_CNII] + - k[3357]*y_cur[IDX_NII] + k[3501]*y_cur[IDX_NHII]; - data[jistart + 17315] = 0.0 + k[628]*y_cur[IDX_NOI] + - k[3465]*y_cur[IDX_NI]; - data[jistart + 17316] = 0.0 - k[4788]*y_cur[IDX_NOII]; - data[jistart + 17317] = 0.0 + k[693]*y_cur[IDX_NOI] + - k[3467]*y_cur[IDX_NI]; - data[jistart + 17318] = 0.0 - k[4823]*y_cur[IDX_NOII]; - data[jistart + 17319] = 0.0 + k[629]*y_cur[IDX_NOI]; - data[jistart + 17320] = 0.0 - k[4858]*y_cur[IDX_NOII]; - data[jistart + 17321] = 0.0 + k[630]*y_cur[IDX_NOI]; - data[jistart + 17322] = 0.0 - k[721]*y_cur[IDX_NOII]; - data[jistart + 17323] = 0.0 + k[631]*y_cur[IDX_NOI] + - k[3475]*y_cur[IDX_NI]; - data[jistart + 17324] = 0.0 - k[1168]*y_cur[IDX_NOII]; - data[jistart + 17325] = 0.0 - k[5002]*y_cur[IDX_NO2I]; - data[jistart + 17326] = 0.0 - k[5037]*y_cur[IDX_NO2I]; - data[jistart + 17327] = 0.0 - k[5120]*y_cur[IDX_NO2I]; - data[jistart + 17328] = 0.0 - k[5129]*y_cur[IDX_NO2I]; - data[jistart + 17329] = 0.0 + k[7167] + k[7349] + k[7531]; - data[jistart + 17330] = 0.0 - k[5185]*y_cur[IDX_NO2I]; - data[jistart + 17331] = 0.0 - k[2355]*y_cur[IDX_NO2I]; - data[jistart + 17332] = 0.0 - k[2725]*y_cur[IDX_NO2I]; - data[jistart + 17333] = 0.0 + k[5411]*y_cur[IDX_OI]; - data[jistart + 17334] = 0.0 - k[5275]*y_cur[IDX_NO2I] - - k[5276]*y_cur[IDX_NO2I] - k[5277]*y_cur[IDX_NO2I] - - k[5278]*y_cur[IDX_NO2I]; - data[jistart + 17335] = 0.0 + k[5327]*y_cur[IDX_NOI]; - data[jistart + 17336] = 0.0 - k[5311]*y_cur[IDX_NO2I] - - k[5312]*y_cur[IDX_NO2I]; - data[jistart + 17337] = 0.0 + k[125]*y_cur[IDX_OM] + - k[5327]*y_cur[IDX_N2OI] + k[5330]*y_cur[IDX_O2I] + - k[5477]*y_cur[IDX_OHI]; - data[jistart + 17338] = 0.0 - k[676]*y_cur[IDX_O2II] - - k[2355]*y_cur[IDX_HII] - k[2725]*y_cur[IDX_H3II] - - k[3648]*y_cur[IDX_OII] - k[5002]*y_cur[IDX_CH2I] - - k[5037]*y_cur[IDX_CH3I] - k[5120]*y_cur[IDX_CNI] - - k[5129]*y_cur[IDX_COI] - k[5185]*y_cur[IDX_HI] - - k[5275]*y_cur[IDX_NI] - k[5276]*y_cur[IDX_NI] - - k[5277]*y_cur[IDX_NI] - k[5278]*y_cur[IDX_NI] - - k[5311]*y_cur[IDX_NHI] - k[5312]*y_cur[IDX_NHI] - - k[5423]*y_cur[IDX_OI] - k[5890] - k[6226] - k[6227] - k[6985]; - data[jistart + 17339] = 0.0 + k[5411]*y_cur[IDX_HNOI] - - k[5423]*y_cur[IDX_NO2I]; - data[jistart + 17340] = 0.0 - k[3648]*y_cur[IDX_NO2I]; - data[jistart + 17341] = 0.0 + k[125]*y_cur[IDX_NOI]; - data[jistart + 17342] = 0.0 + k[5330]*y_cur[IDX_NOI] + - k[5336]*y_cur[IDX_OCNI]; - data[jistart + 17343] = 0.0 - k[676]*y_cur[IDX_NO2I]; - data[jistart + 17344] = 0.0 + k[5336]*y_cur[IDX_O2I]; - data[jistart + 17345] = 0.0 + k[5477]*y_cur[IDX_NOI]; - data[jistart + 17346] = 0.0 - k[6584]*y_cur[IDX_NO2II]; - data[jistart + 17347] = 0.0 - k[2846]*y_cur[IDX_NO2II]; - data[jistart + 17348] = 0.0 - k[2465]*y_cur[IDX_NO2II]; - data[jistart + 17349] = 0.0 + k[3740]*y_cur[IDX_OI]; - data[jistart + 17350] = 0.0 + k[3466]*y_cur[IDX_O2HII]; - data[jistart + 17351] = 0.0 + k[3621]*y_cur[IDX_O2II]; - data[jistart + 17352] = 0.0 + k[676]*y_cur[IDX_O2II] + k[6226]; - data[jistart + 17353] = 0.0 - k[1169]*y_cur[IDX_eM] - - k[2465]*y_cur[IDX_H2I] - k[2846]*y_cur[IDX_HI] - - k[6584]*y_cur[IDX_GRAINM]; - data[jistart + 17354] = 0.0 + k[3740]*y_cur[IDX_HNOII]; - data[jistart + 17355] = 0.0 + k[676]*y_cur[IDX_NO2I] + - k[3621]*y_cur[IDX_NHI]; - data[jistart + 17356] = 0.0 + k[3466]*y_cur[IDX_NI]; - data[jistart + 17357] = 0.0 - k[1169]*y_cur[IDX_NO2II]; - data[jistart + 17358] = 0.0 - k[4976]*y_cur[IDX_NSI] - - k[4977]*y_cur[IDX_NSI]; - data[jistart + 17359] = 0.0 - k[187]*y_cur[IDX_NSI] - - k[1421]*y_cur[IDX_NSI]; - data[jistart + 17360] = 0.0 + k[5125]*y_cur[IDX_SI]; - data[jistart + 17361] = 0.0 + k[8704]*y_cur[IDX_GSI]; - data[jistart + 17362] = 0.0 + k[7172] + k[7354] + k[7536]; - data[jistart + 17363] = 0.0 + k[6589]*y_cur[IDX_HNSII]; - data[jistart + 17364] = 0.0 + k[8704]*y_cur[IDX_GNI]; - data[jistart + 17365] = 0.0 - k[5188]*y_cur[IDX_NSI] - - k[5189]*y_cur[IDX_NSI]; - data[jistart + 17366] = 0.0 - k[404]*y_cur[IDX_NSI]; - data[jistart + 17367] = 0.0 - k[2727]*y_cur[IDX_NSI]; - data[jistart + 17368] = 0.0 - k[2981]*y_cur[IDX_NSI]; - data[jistart + 17369] = 0.0 + k[1122]*y_cur[IDX_eM] + - k[6589]*y_cur[IDX_GRAINM]; - data[jistart + 17370] = 0.0 + k[5271]*y_cur[IDX_NI]; - data[jistart + 17371] = 0.0 - k[3288]*y_cur[IDX_NSI] - - k[3289]*y_cur[IDX_NSI]; - data[jistart + 17372] = 0.0 + k[123]*y_cur[IDX_SM] + - k[5271]*y_cur[IDX_HSI] - k[5280]*y_cur[IDX_NSI] + - k[5289]*y_cur[IDX_S2I] + k[5290]*y_cur[IDX_SOI]; - data[jistart + 17373] = 0.0 + k[5325]*y_cur[IDX_SI]; - data[jistart + 17374] = 0.0 + k[5333]*y_cur[IDX_SI]; - data[jistart + 17375] = 0.0 - k[187]*y_cur[IDX_CII] - - k[404]*y_cur[IDX_HII] - k[1421]*y_cur[IDX_CII] - - k[2727]*y_cur[IDX_H3II] - k[2981]*y_cur[IDX_HCOII] - - k[3288]*y_cur[IDX_HeII] - k[3289]*y_cur[IDX_HeII] - - k[4976]*y_cur[IDX_CI] - k[4977]*y_cur[IDX_CI] - - k[5188]*y_cur[IDX_HI] - k[5189]*y_cur[IDX_HI] - - k[5280]*y_cur[IDX_NI] - k[5425]*y_cur[IDX_OI] - - k[5426]*y_cur[IDX_OI] - k[5893] - k[6230] - k[6990]; - data[jistart + 17376] = 0.0 - k[5425]*y_cur[IDX_NSI] - - k[5426]*y_cur[IDX_NSI]; - data[jistart + 17377] = 0.0 + k[5125]*y_cur[IDX_CNI] + - k[5325]*y_cur[IDX_NHI] + k[5333]*y_cur[IDX_NOI]; - data[jistart + 17378] = 0.0 + k[123]*y_cur[IDX_NI]; - data[jistart + 17379] = 0.0 + k[5289]*y_cur[IDX_NI]; - data[jistart + 17380] = 0.0 + k[5290]*y_cur[IDX_NI]; - data[jistart + 17381] = 0.0 + k[1122]*y_cur[IDX_HNSII]; - data[jistart + 17382] = 0.0 + k[187]*y_cur[IDX_NSI]; - data[jistart + 17383] = 0.0 - k[6581]*y_cur[IDX_NSII]; - data[jistart + 17384] = 0.0 + k[404]*y_cur[IDX_NSI]; - data[jistart + 17385] = 0.0 + k[3459]*y_cur[IDX_NI]; - data[jistart + 17386] = 0.0 + k[3462]*y_cur[IDX_NI]; - data[jistart + 17387] = 0.0 + k[3459]*y_cur[IDX_H2SII] + - k[3462]*y_cur[IDX_HSII] + k[3468]*y_cur[IDX_SOII]; - data[jistart + 17388] = 0.0 + k[3624]*y_cur[IDX_SII]; - data[jistart + 17389] = 0.0 + k[3506]*y_cur[IDX_SI]; - data[jistart + 17390] = 0.0 + k[187]*y_cur[IDX_CII] + - k[404]*y_cur[IDX_HII]; - data[jistart + 17391] = 0.0 - k[1173]*y_cur[IDX_eM] - - k[3748]*y_cur[IDX_OI] - k[6581]*y_cur[IDX_GRAINM]; - data[jistart + 17392] = 0.0 - k[3748]*y_cur[IDX_NSII]; - data[jistart + 17393] = 0.0 + k[3506]*y_cur[IDX_NHII]; - data[jistart + 17394] = 0.0 + k[3624]*y_cur[IDX_NHI]; - data[jistart + 17395] = 0.0 + k[3468]*y_cur[IDX_NI]; - data[jistart + 17396] = 0.0 - k[1173]*y_cur[IDX_NSII]; - data[jistart + 17397] = 0.0 - k[188]*y_cur[IDX_NaI]; - data[jistart + 17398] = 0.0 + k[3913]*y_cur[IDX_NaII]; - data[jistart + 17399] = 0.0 + k[3948]*y_cur[IDX_NaII]; - data[jistart + 17400] = 0.0 + k[3983]*y_cur[IDX_NaII]; - data[jistart + 17401] = 0.0 + k[4018]*y_cur[IDX_NaII]; - data[jistart + 17402] = 0.0 + k[4053]*y_cur[IDX_NaII]; - data[jistart + 17403] = 0.0 - k[632]*y_cur[IDX_NaI]; - data[jistart + 17404] = 0.0 + k[4088]*y_cur[IDX_NaII]; - data[jistart + 17405] = 0.0 + k[4123]*y_cur[IDX_NaII]; - data[jistart + 17406] = 0.0 + k[4158]*y_cur[IDX_NaII]; - data[jistart + 17407] = 0.0 + k[4193]*y_cur[IDX_NaII]; - data[jistart + 17408] = 0.0 + k[4228]*y_cur[IDX_NaII]; - data[jistart + 17409] = 0.0 + k[4263]*y_cur[IDX_NaII]; - data[jistart + 17410] = 0.0 + k[4298]*y_cur[IDX_NaII]; - data[jistart + 17411] = 0.0 + k[4333]*y_cur[IDX_NaII]; - data[jistart + 17412] = 0.0 + k[4368]*y_cur[IDX_NaII]; - data[jistart + 17413] = 0.0 + k[4403]*y_cur[IDX_NaII]; - data[jistart + 17414] = 0.0 + k[4438]*y_cur[IDX_NaII]; - data[jistart + 17415] = 0.0 + k[4473]*y_cur[IDX_NaII]; - data[jistart + 17416] = 0.0 + k[4508]*y_cur[IDX_NaII]; - data[jistart + 17417] = 0.0 + k[4543]*y_cur[IDX_NaII]; - data[jistart + 17418] = 0.0 + k[4578]*y_cur[IDX_NaII]; - data[jistart + 17419] = 0.0 + k[4613]*y_cur[IDX_NaII]; - data[jistart + 17420] = 0.0 - k[255]*y_cur[IDX_NaI]; - data[jistart + 17421] = 0.0 + k[4648]*y_cur[IDX_NaII]; - data[jistart + 17422] = 0.0 - k[275]*y_cur[IDX_NaI]; - data[jistart + 17423] = 0.0 + k[4683]*y_cur[IDX_NaII]; - data[jistart + 17424] = 0.0 - k[633]*y_cur[IDX_NaI]; - data[jistart + 17425] = 0.0 - k[634]*y_cur[IDX_NaI]; - data[jistart + 17426] = 0.0 + k[7087] + k[7269] + k[7451]; - data[jistart + 17427] = 0.0 + k[6351]*y_cur[IDX_NaII]; - data[jistart + 17428] = 0.0 + k[4719]*y_cur[IDX_NaII]; - data[jistart + 17429] = 0.0 - k[635]*y_cur[IDX_NaI]; - data[jistart + 17430] = 0.0 - k[473]*y_cur[IDX_NaI]; - data[jistart + 17431] = 0.0 - k[636]*y_cur[IDX_NaI]; - data[jistart + 17432] = 0.0 - k[2728]*y_cur[IDX_NaI]; - data[jistart + 17433] = 0.0 - k[3628]*y_cur[IDX_NaI]; - data[jistart + 17434] = 0.0 - k[2814]*y_cur[IDX_NaI]; - data[jistart + 17435] = 0.0 - k[3629]*y_cur[IDX_NaI] - - k[3630]*y_cur[IDX_NaI]; - data[jistart + 17436] = 0.0 - k[637]*y_cur[IDX_NaI]; - data[jistart + 17437] = 0.0 - k[638]*y_cur[IDX_NaI]; - data[jistart + 17438] = 0.0 - k[639]*y_cur[IDX_NaI]; - data[jistart + 17439] = 0.0 - k[640]*y_cur[IDX_NaI]; - data[jistart + 17440] = 0.0 - k[596]*y_cur[IDX_NaI]; - data[jistart + 17441] = 0.0 - k[641]*y_cur[IDX_NaI]; - data[jistart + 17442] = 0.0 - k[188]*y_cur[IDX_CII] - - k[255]*y_cur[IDX_CHII] - k[275]*y_cur[IDX_CH3II] - - k[473]*y_cur[IDX_H2OII] - k[596]*y_cur[IDX_NH3II] - - k[632]*y_cur[IDX_C2H2II] - k[633]*y_cur[IDX_CSII] - - k[634]*y_cur[IDX_FeII] - k[635]*y_cur[IDX_H2COII] - - k[636]*y_cur[IDX_H2SII] - k[637]*y_cur[IDX_HCOII] - - k[638]*y_cur[IDX_HSII] - k[639]*y_cur[IDX_MgII] - - k[640]*y_cur[IDX_N2II] - k[641]*y_cur[IDX_NOII] - - k[642]*y_cur[IDX_O2II] - k[643]*y_cur[IDX_SII] - - k[644]*y_cur[IDX_SOII] - k[645]*y_cur[IDX_SiII] - - k[2728]*y_cur[IDX_H3II] - k[2814]*y_cur[IDX_H3OII] - - k[3628]*y_cur[IDX_H3COII] - k[3629]*y_cur[IDX_HCNHII] - - k[3630]*y_cur[IDX_HCNHII] - k[5894] - k[6231] - k[6305] - k[6905]; - data[jistart + 17443] = 0.0 + k[3913]*y_cur[IDX_CM] + - k[3948]*y_cur[IDX_C10M] + k[3983]*y_cur[IDX_C10HM] + - k[4018]*y_cur[IDX_C2M] + k[4053]*y_cur[IDX_C2HM] + - k[4088]*y_cur[IDX_C3M] + k[4123]*y_cur[IDX_C3HM] + - k[4158]*y_cur[IDX_C3NM] + k[4193]*y_cur[IDX_C4M] + - k[4228]*y_cur[IDX_C4HM] + k[4263]*y_cur[IDX_C5M] + - k[4298]*y_cur[IDX_C5HM] + k[4333]*y_cur[IDX_C5NM] + - k[4368]*y_cur[IDX_C6M] + k[4403]*y_cur[IDX_C6HM] + - k[4438]*y_cur[IDX_C7M] + k[4473]*y_cur[IDX_C7HM] + - k[4508]*y_cur[IDX_C8M] + k[4543]*y_cur[IDX_C8HM] + - k[4578]*y_cur[IDX_C9M] + k[4613]*y_cur[IDX_C9HM] + - k[4648]*y_cur[IDX_CHM] + k[4683]*y_cur[IDX_CNM] + - k[4719]*y_cur[IDX_HM] + k[4754]*y_cur[IDX_OM] + - k[4789]*y_cur[IDX_O2M] + k[4824]*y_cur[IDX_OHM] + - k[4859]*y_cur[IDX_SM] + k[5622]*y_cur[IDX_eM] + - k[6351]*y_cur[IDX_GRAINM]; - data[jistart + 17444] = 0.0 + k[4754]*y_cur[IDX_NaII]; - data[jistart + 17445] = 0.0 - k[642]*y_cur[IDX_NaI]; - data[jistart + 17446] = 0.0 + k[4789]*y_cur[IDX_NaII]; - data[jistart + 17447] = 0.0 + k[4824]*y_cur[IDX_NaII]; - data[jistart + 17448] = 0.0 - k[643]*y_cur[IDX_NaI]; - data[jistart + 17449] = 0.0 + k[4859]*y_cur[IDX_NaII]; - data[jistart + 17450] = 0.0 - k[644]*y_cur[IDX_NaI]; - data[jistart + 17451] = 0.0 - k[645]*y_cur[IDX_NaI]; - data[jistart + 17452] = 0.0 + k[5622]*y_cur[IDX_NaII]; - data[jistart + 17453] = 0.0 + k[188]*y_cur[IDX_NaI]; - data[jistart + 17454] = 0.0 - k[3913]*y_cur[IDX_NaII]; - data[jistart + 17455] = 0.0 - k[3948]*y_cur[IDX_NaII]; - data[jistart + 17456] = 0.0 - k[3983]*y_cur[IDX_NaII]; - data[jistart + 17457] = 0.0 - k[4018]*y_cur[IDX_NaII]; - data[jistart + 17458] = 0.0 - k[4053]*y_cur[IDX_NaII]; - data[jistart + 17459] = 0.0 + k[632]*y_cur[IDX_NaI]; - data[jistart + 17460] = 0.0 - k[4088]*y_cur[IDX_NaII]; - data[jistart + 17461] = 0.0 - k[4123]*y_cur[IDX_NaII]; - data[jistart + 17462] = 0.0 - k[4158]*y_cur[IDX_NaII]; - data[jistart + 17463] = 0.0 - k[4193]*y_cur[IDX_NaII]; - data[jistart + 17464] = 0.0 - k[4228]*y_cur[IDX_NaII]; - data[jistart + 17465] = 0.0 - k[4263]*y_cur[IDX_NaII]; - data[jistart + 17466] = 0.0 - k[4298]*y_cur[IDX_NaII]; - data[jistart + 17467] = 0.0 - k[4333]*y_cur[IDX_NaII]; - data[jistart + 17468] = 0.0 - k[4368]*y_cur[IDX_NaII]; - data[jistart + 17469] = 0.0 - k[4403]*y_cur[IDX_NaII]; - data[jistart + 17470] = 0.0 - k[4438]*y_cur[IDX_NaII]; - data[jistart + 17471] = 0.0 - k[4473]*y_cur[IDX_NaII]; - data[jistart + 17472] = 0.0 - k[4508]*y_cur[IDX_NaII]; - data[jistart + 17473] = 0.0 - k[4543]*y_cur[IDX_NaII]; - data[jistart + 17474] = 0.0 - k[4578]*y_cur[IDX_NaII]; - data[jistart + 17475] = 0.0 - k[4613]*y_cur[IDX_NaII]; - data[jistart + 17476] = 0.0 + k[255]*y_cur[IDX_NaI]; - data[jistart + 17477] = 0.0 - k[4648]*y_cur[IDX_NaII]; - data[jistart + 17478] = 0.0 + k[275]*y_cur[IDX_NaI]; - data[jistart + 17479] = 0.0 - k[4683]*y_cur[IDX_NaII]; - data[jistart + 17480] = 0.0 + k[633]*y_cur[IDX_NaI]; - data[jistart + 17481] = 0.0 + k[634]*y_cur[IDX_NaI]; - data[jistart + 17482] = 0.0 - k[6351]*y_cur[IDX_NaII]; - data[jistart + 17483] = 0.0 - k[4719]*y_cur[IDX_NaII]; - data[jistart + 17484] = 0.0 + k[635]*y_cur[IDX_NaI]; - data[jistart + 17485] = 0.0 + k[473]*y_cur[IDX_NaI]; - data[jistart + 17486] = 0.0 + k[636]*y_cur[IDX_NaI]; - data[jistart + 17487] = 0.0 + k[2728]*y_cur[IDX_NaI]; - data[jistart + 17488] = 0.0 + k[3628]*y_cur[IDX_NaI]; - data[jistart + 17489] = 0.0 + k[2814]*y_cur[IDX_NaI]; - data[jistart + 17490] = 0.0 + k[3629]*y_cur[IDX_NaI] + - k[3630]*y_cur[IDX_NaI]; - data[jistart + 17491] = 0.0 + k[637]*y_cur[IDX_NaI]; - data[jistart + 17492] = 0.0 + k[638]*y_cur[IDX_NaI]; - data[jistart + 17493] = 0.0 + k[639]*y_cur[IDX_NaI]; - data[jistart + 17494] = 0.0 + k[640]*y_cur[IDX_NaI]; - data[jistart + 17495] = 0.0 + k[596]*y_cur[IDX_NaI]; - data[jistart + 17496] = 0.0 + k[641]*y_cur[IDX_NaI]; - data[jistart + 17497] = 0.0 + k[188]*y_cur[IDX_CII] + - k[255]*y_cur[IDX_CHII] + k[275]*y_cur[IDX_CH3II] + - k[473]*y_cur[IDX_H2OII] + k[596]*y_cur[IDX_NH3II] + - k[632]*y_cur[IDX_C2H2II] + k[633]*y_cur[IDX_CSII] + - k[634]*y_cur[IDX_FeII] + k[635]*y_cur[IDX_H2COII] + - k[636]*y_cur[IDX_H2SII] + k[637]*y_cur[IDX_HCOII] + - k[638]*y_cur[IDX_HSII] + k[639]*y_cur[IDX_MgII] + - k[640]*y_cur[IDX_N2II] + k[641]*y_cur[IDX_NOII] + - k[642]*y_cur[IDX_O2II] + k[643]*y_cur[IDX_SII] + - k[644]*y_cur[IDX_SOII] + k[645]*y_cur[IDX_SiII] + - k[2728]*y_cur[IDX_H3II] + k[2814]*y_cur[IDX_H3OII] + - k[3628]*y_cur[IDX_H3COII] + k[3629]*y_cur[IDX_HCNHII] + - k[3630]*y_cur[IDX_HCNHII] + k[5894] + k[6231] + k[6305]; - data[jistart + 17498] = 0.0 - k[3913]*y_cur[IDX_CM] - - k[3948]*y_cur[IDX_C10M] - k[3983]*y_cur[IDX_C10HM] - - k[4018]*y_cur[IDX_C2M] - k[4053]*y_cur[IDX_C2HM] - - k[4088]*y_cur[IDX_C3M] - k[4123]*y_cur[IDX_C3HM] - - k[4158]*y_cur[IDX_C3NM] - k[4193]*y_cur[IDX_C4M] - - k[4228]*y_cur[IDX_C4HM] - k[4263]*y_cur[IDX_C5M] - - k[4298]*y_cur[IDX_C5HM] - k[4333]*y_cur[IDX_C5NM] - - k[4368]*y_cur[IDX_C6M] - k[4403]*y_cur[IDX_C6HM] - - k[4438]*y_cur[IDX_C7M] - k[4473]*y_cur[IDX_C7HM] - - k[4508]*y_cur[IDX_C8M] - k[4543]*y_cur[IDX_C8HM] - - k[4578]*y_cur[IDX_C9M] - k[4613]*y_cur[IDX_C9HM] - - k[4648]*y_cur[IDX_CHM] - k[4683]*y_cur[IDX_CNM] - - k[4719]*y_cur[IDX_HM] - k[4754]*y_cur[IDX_OM] - - k[4789]*y_cur[IDX_O2M] - k[4824]*y_cur[IDX_OHM] - - k[4859]*y_cur[IDX_SM] - k[5622]*y_cur[IDX_eM] - - k[6351]*y_cur[IDX_GRAINM]; - data[jistart + 17499] = 0.0 - k[4754]*y_cur[IDX_NaII]; - data[jistart + 17500] = 0.0 + k[642]*y_cur[IDX_NaI]; - data[jistart + 17501] = 0.0 - k[4789]*y_cur[IDX_NaII]; - data[jistart + 17502] = 0.0 - k[4824]*y_cur[IDX_NaII]; - data[jistart + 17503] = 0.0 + k[643]*y_cur[IDX_NaI]; - data[jistart + 17504] = 0.0 - k[4859]*y_cur[IDX_NaII]; - data[jistart + 17505] = 0.0 + k[644]*y_cur[IDX_NaI]; - data[jistart + 17506] = 0.0 + k[645]*y_cur[IDX_NaI]; - data[jistart + 17507] = 0.0 - k[5622]*y_cur[IDX_NaII]; - data[jistart + 17508] = 0.0 + k[1912]*y_cur[IDX_O2II] + - k[1914]*y_cur[IDX_OHII] + k[4957]*y_cur[IDX_COI] + - k[4974]*y_cur[IDX_NOI] + k[4978]*y_cur[IDX_O2I] + - k[4982]*y_cur[IDX_OHI] + k[4986]*y_cur[IDX_SOI] - - k[5526]*y_cur[IDX_OI]; - data[jistart + 17509] = 0.0 + k[1314]*y_cur[IDX_C3OI] + - k[1422]*y_cur[IDX_O2I] + k[1428]*y_cur[IDX_SOI] + - k[4727]*y_cur[IDX_OM] - k[5505]*y_cur[IDX_OI]; - data[jistart + 17510] = 0.0 - k[8]*y_cur[IDX_OI] + - k[1449]*y_cur[IDX_NOI] + k[3914]*y_cur[IDX_OII]; - data[jistart + 17511] = 0.0 - k[5340]*y_cur[IDX_OI]; - data[jistart + 17512] = 0.0 - k[3678]*y_cur[IDX_OI] + - k[3949]*y_cur[IDX_OII]; - data[jistart + 17513] = 0.0 - k[5341]*y_cur[IDX_OI]; - data[jistart + 17514] = 0.0 - k[3679]*y_cur[IDX_OI] - - k[3680]*y_cur[IDX_OI]; - data[jistart + 17515] = 0.0 - k[3681]*y_cur[IDX_OI] + - k[3984]*y_cur[IDX_OII]; - data[jistart + 17516] = 0.0 - k[3682]*y_cur[IDX_OI]; - data[jistart + 17517] = 0.0 - k[3683]*y_cur[IDX_OI]; - data[jistart + 17518] = 0.0 - k[5342]*y_cur[IDX_OI]; - data[jistart + 17519] = 0.0 + k[646]*y_cur[IDX_OII] + - k[3769]*y_cur[IDX_OHII] - k[5343]*y_cur[IDX_OI]; - data[jistart + 17520] = 0.0 - k[3684]*y_cur[IDX_OI]; - data[jistart + 17521] = 0.0 - k[128]*y_cur[IDX_OI] - - k[3685]*y_cur[IDX_OI] + k[4019]*y_cur[IDX_OII]; - data[jistart + 17522] = 0.0 + k[649]*y_cur[IDX_OII] + - k[3770]*y_cur[IDX_OHII] - k[5352]*y_cur[IDX_OI]; - data[jistart + 17523] = 0.0 - k[3686]*y_cur[IDX_OI]; - data[jistart + 17524] = 0.0 - k[129]*y_cur[IDX_OI] - - k[3687]*y_cur[IDX_OI] + k[4054]*y_cur[IDX_OII]; - data[jistart + 17525] = 0.0 + k[647]*y_cur[IDX_OII] + - k[3654]*y_cur[IDX_O2II] - k[5344]*y_cur[IDX_OI]; - data[jistart + 17526] = 0.0 - k[3688]*y_cur[IDX_OI] - - k[3689]*y_cur[IDX_OI] + k[4728]*y_cur[IDX_OM]; - data[jistart + 17527] = 0.0 - k[5345]*y_cur[IDX_OI]; - data[jistart + 17528] = 0.0 - k[3690]*y_cur[IDX_OI] + - k[4729]*y_cur[IDX_OM]; - data[jistart + 17529] = 0.0 + k[648]*y_cur[IDX_OII] - - k[5346]*y_cur[IDX_OI] - k[5347]*y_cur[IDX_OI] - - k[5348]*y_cur[IDX_OI] - k[5349]*y_cur[IDX_OI]; - data[jistart + 17530] = 0.0 - k[3691]*y_cur[IDX_OI] - - k[3692]*y_cur[IDX_OI]; - data[jistart + 17531] = 0.0 - k[5350]*y_cur[IDX_OI] - - k[5351]*y_cur[IDX_OI] + k[5458]*y_cur[IDX_OHI]; - data[jistart + 17532] = 0.0 + k[3773]*y_cur[IDX_OHII] + - k[3774]*y_cur[IDX_OHII]; - data[jistart + 17533] = 0.0 - k[5353]*y_cur[IDX_OI]; - data[jistart + 17534] = 0.0 - k[5354]*y_cur[IDX_OI] + k[5712] + - k[5997]; - data[jistart + 17535] = 0.0 - k[5355]*y_cur[IDX_OI]; - data[jistart + 17536] = 0.0 - k[5356]*y_cur[IDX_OI]; - data[jistart + 17537] = 0.0 + k[3668]*y_cur[IDX_O2I]; - data[jistart + 17538] = 0.0 - k[3693]*y_cur[IDX_OI] + - k[4089]*y_cur[IDX_OII]; - data[jistart + 17539] = 0.0 - k[5357]*y_cur[IDX_OI]; - data[jistart + 17540] = 0.0 + k[3671]*y_cur[IDX_O2I]; - data[jistart + 17541] = 0.0 - k[3694]*y_cur[IDX_OI] + - k[4124]*y_cur[IDX_OII]; - data[jistart + 17542] = 0.0 - k[3695]*y_cur[IDX_OI]; - data[jistart + 17543] = 0.0 - k[3696]*y_cur[IDX_OI]; - data[jistart + 17544] = 0.0 - k[3697]*y_cur[IDX_OI]; - data[jistart + 17545] = 0.0 - k[5358]*y_cur[IDX_OI]; - data[jistart + 17546] = 0.0 - k[130]*y_cur[IDX_OI] + - k[4159]*y_cur[IDX_OII]; - data[jistart + 17547] = 0.0 + k[1314]*y_cur[IDX_CII] + - k[3099]*y_cur[IDX_HeII] - k[5359]*y_cur[IDX_OI]; - data[jistart + 17548] = 0.0 - k[5360]*y_cur[IDX_OI]; - data[jistart + 17549] = 0.0 - k[5361]*y_cur[IDX_OI]; - data[jistart + 17550] = 0.0 - k[3698]*y_cur[IDX_OI] + - k[4194]*y_cur[IDX_OII]; - data[jistart + 17551] = 0.0 - k[5362]*y_cur[IDX_OI]; - data[jistart + 17552] = 0.0 - k[3699]*y_cur[IDX_OI]; - data[jistart + 17553] = 0.0 - k[3700]*y_cur[IDX_OI] + - k[4229]*y_cur[IDX_OII]; - data[jistart + 17554] = 0.0 - k[3701]*y_cur[IDX_OI] - - k[3702]*y_cur[IDX_OI] + k[4730]*y_cur[IDX_OM]; - data[jistart + 17555] = 0.0 + k[4731]*y_cur[IDX_OM]; - data[jistart + 17556] = 0.0 - k[5363]*y_cur[IDX_OI]; - data[jistart + 17557] = 0.0 - k[5364]*y_cur[IDX_OI]; - data[jistart + 17558] = 0.0 + k[4732]*y_cur[IDX_OM]; - data[jistart + 17559] = 0.0 - k[5365]*y_cur[IDX_OI]; - data[jistart + 17560] = 0.0 - k[3703]*y_cur[IDX_OI] + - k[4264]*y_cur[IDX_OII]; - data[jistart + 17561] = 0.0 - k[5366]*y_cur[IDX_OI]; - data[jistart + 17562] = 0.0 - k[3704]*y_cur[IDX_OI]; - data[jistart + 17563] = 0.0 - k[3705]*y_cur[IDX_OI] + - k[4299]*y_cur[IDX_OII]; - data[jistart + 17564] = 0.0 - k[3706]*y_cur[IDX_OI]; - data[jistart + 17565] = 0.0 - k[3707]*y_cur[IDX_OI]; - data[jistart + 17566] = 0.0 - k[5367]*y_cur[IDX_OI]; - data[jistart + 17567] = 0.0 - k[131]*y_cur[IDX_OI] + - k[4334]*y_cur[IDX_OII]; - data[jistart + 17568] = 0.0 - k[5368]*y_cur[IDX_OI]; - data[jistart + 17569] = 0.0 - k[3708]*y_cur[IDX_OI] + - k[4369]*y_cur[IDX_OII]; - data[jistart + 17570] = 0.0 - k[5369]*y_cur[IDX_OI]; - data[jistart + 17571] = 0.0 - k[3709]*y_cur[IDX_OI] + - k[4404]*y_cur[IDX_OII]; - data[jistart + 17572] = 0.0 - k[3710]*y_cur[IDX_OI]; - data[jistart + 17573] = 0.0 - k[3711]*y_cur[IDX_OI]; - data[jistart + 17574] = 0.0 - k[5370]*y_cur[IDX_OI]; - data[jistart + 17575] = 0.0 - k[3712]*y_cur[IDX_OI] + - k[4439]*y_cur[IDX_OII]; - data[jistart + 17576] = 0.0 - k[5371]*y_cur[IDX_OI]; - data[jistart + 17577] = 0.0 - k[3713]*y_cur[IDX_OI]; - data[jistart + 17578] = 0.0 - k[3714]*y_cur[IDX_OI] + - k[4474]*y_cur[IDX_OII]; - data[jistart + 17579] = 0.0 - k[3715]*y_cur[IDX_OI]; - data[jistart + 17580] = 0.0 - k[3716]*y_cur[IDX_OI]; - data[jistart + 17581] = 0.0 - k[5372]*y_cur[IDX_OI]; - data[jistart + 17582] = 0.0 - k[5373]*y_cur[IDX_OI]; - data[jistart + 17583] = 0.0 - k[3717]*y_cur[IDX_OI] + - k[4509]*y_cur[IDX_OII]; - data[jistart + 17584] = 0.0 - k[5374]*y_cur[IDX_OI]; - data[jistart + 17585] = 0.0 - k[3718]*y_cur[IDX_OI] + - k[4544]*y_cur[IDX_OII]; - data[jistart + 17586] = 0.0 - k[3719]*y_cur[IDX_OI]; - data[jistart + 17587] = 0.0 - k[3720]*y_cur[IDX_OI]; - data[jistart + 17588] = 0.0 - k[5375]*y_cur[IDX_OI]; - data[jistart + 17589] = 0.0 - k[3721]*y_cur[IDX_OI] + - k[4579]*y_cur[IDX_OII]; - data[jistart + 17590] = 0.0 - k[5376]*y_cur[IDX_OI]; - data[jistart + 17591] = 0.0 - k[3722]*y_cur[IDX_OI]; - data[jistart + 17592] = 0.0 - k[3723]*y_cur[IDX_OI] + - k[4614]*y_cur[IDX_OII]; - data[jistart + 17593] = 0.0 - k[3724]*y_cur[IDX_OI]; - data[jistart + 17594] = 0.0 - k[3725]*y_cur[IDX_OI]; - data[jistart + 17595] = 0.0 - k[5377]*y_cur[IDX_OI]; - data[jistart + 17596] = 0.0 - k[5378]*y_cur[IDX_OI]; - data[jistart + 17597] = 0.0 - k[5379]*y_cur[IDX_OI] - - k[5380]*y_cur[IDX_OI]; - data[jistart + 17598] = 0.0 - k[63]*y_cur[IDX_OI] + - k[295]*y_cur[IDX_OII] + k[2262]*y_cur[IDX_O2II] + - k[2264]*y_cur[IDX_OHII] + k[5083]*y_cur[IDX_NOI] + - k[5088]*y_cur[IDX_O2I] + k[5089]*y_cur[IDX_O2I] + - k[5092]*y_cur[IDX_O2I] + k[5093]*y_cur[IDX_O2I] - - k[5096]*y_cur[IDX_OI] - k[5097]*y_cur[IDX_OI]; - data[jistart + 17599] = 0.0 + k[1967]*y_cur[IDX_O2I] - - k[1969]*y_cur[IDX_OI]; - data[jistart + 17600] = 0.0 + k[4649]*y_cur[IDX_OII]; - data[jistart + 17601] = 0.0 + k[266]*y_cur[IDX_OII] + - k[2014]*y_cur[IDX_O2II] + k[2016]*y_cur[IDX_OHII] + - k[5010]*y_cur[IDX_O2I] - k[5012]*y_cur[IDX_OI] - - k[5013]*y_cur[IDX_OI] - k[5014]*y_cur[IDX_OI] - - k[5015]*y_cur[IDX_OI] + k[5018]*y_cur[IDX_OHI]; - data[jistart + 17602] = 0.0 - k[1991]*y_cur[IDX_OI]; - data[jistart + 17603] = 0.0 - k[3726]*y_cur[IDX_OI] + - k[4733]*y_cur[IDX_OM]; - data[jistart + 17604] = 0.0 - k[5381]*y_cur[IDX_OI] - - k[5382]*y_cur[IDX_OI] - k[5383]*y_cur[IDX_OI]; - data[jistart + 17605] = 0.0 + k[919]*y_cur[IDX_eM] + - k[6493]*y_cur[IDX_GRAINM]; - data[jistart + 17606] = 0.0 - k[5384]*y_cur[IDX_OI]; - data[jistart + 17607] = 0.0 - k[5043]*y_cur[IDX_OI] - - k[5044]*y_cur[IDX_OI] + k[5045]*y_cur[IDX_OHI]; - data[jistart + 17608] = 0.0 + k[2089]*y_cur[IDX_O2I] - - k[2090]*y_cur[IDX_OI] - k[2091]*y_cur[IDX_OI] + - k[4734]*y_cur[IDX_OM]; - data[jistart + 17609] = 0.0 + k[650]*y_cur[IDX_OII]; - data[jistart + 17610] = 0.0 + k[5936] + k[6289]; - data[jistart + 17611] = 0.0 + k[956]*y_cur[IDX_eM] + - k[6588]*y_cur[IDX_GRAINM]; - data[jistart + 17612] = 0.0 + k[957]*y_cur[IDX_eM] + - k[6603]*y_cur[IDX_GRAINM]; - data[jistart + 17613] = 0.0 + k[651]*y_cur[IDX_OII]; - data[jistart + 17614] = 0.0 + k[652]*y_cur[IDX_OII] + - k[2209]*y_cur[IDX_OHII] - k[5385]*y_cur[IDX_OI]; - data[jistart + 17615] = 0.0 - k[3727]*y_cur[IDX_OI]; - data[jistart + 17616] = 0.0 - k[3728]*y_cur[IDX_OI] - - k[3729]*y_cur[IDX_OI]; - data[jistart + 17617] = 0.0 + k[666]*y_cur[IDX_OM] + - k[3775]*y_cur[IDX_OHII] + k[5124]*y_cur[IDX_O2I] - - k[5386]*y_cur[IDX_OI] - k[5387]*y_cur[IDX_OI] - - k[5388]*y_cur[IDX_OI] + k[5459]*y_cur[IDX_OHI]; - data[jistart + 17618] = 0.0 - k[681]*y_cur[IDX_OI] + - k[2276]*y_cur[IDX_O2I] + k[2535]*y_cur[IDX_H2OI]; - data[jistart + 17619] = 0.0 + k[4684]*y_cur[IDX_OII]; - data[jistart + 17620] = 0.0 + k[4735]*y_cur[IDX_OM]; - data[jistart + 17621] = 0.0 + k[3205]*y_cur[IDX_HeII] - - k[5389]*y_cur[IDX_OI] + k[5824] + k[6135]; - data[jistart + 17622] = 0.0 + k[653]*y_cur[IDX_OII] + - k[3211]*y_cur[IDX_HeII] + k[3777]*y_cur[IDX_OHII] + - k[4957]*y_cur[IDX_CI] + k[5130]*y_cur[IDX_O2I] + k[5826] + k[6138]; - data[jistart + 17623] = 0.0 - k[682]*y_cur[IDX_OI] + - k[980]*y_cur[IDX_eM] + k[3798]*y_cur[IDX_OHI] + k[6136] + - k[6373]*y_cur[IDX_GRAINM]; - data[jistart + 17624] = 0.0 + k[2334]*y_cur[IDX_HII] + - k[3207]*y_cur[IDX_HeII] + k[3776]*y_cur[IDX_OHII] - - k[5390]*y_cur[IDX_OI] + k[5825] + k[6137]; - data[jistart + 17625] = 0.0 - k[683]*y_cur[IDX_OI] + - k[981]*y_cur[IDX_eM] + k[2841]*y_cur[IDX_HI] - k[3730]*y_cur[IDX_OI] - + k[6540]*y_cur[IDX_GRAINM]; - data[jistart + 17626] = 0.0 - k[5391]*y_cur[IDX_OI]; - data[jistart + 17627] = 0.0 - k[3731]*y_cur[IDX_OI]; - data[jistart + 17628] = 0.0 - k[5392]*y_cur[IDX_OI] - - k[5393]*y_cur[IDX_OI]; - data[jistart + 17629] = 0.0 + k[3672]*y_cur[IDX_O2I] - - k[3732]*y_cur[IDX_OI]; - data[jistart + 17630] = 0.0 + k[3216]*y_cur[IDX_HeII] - - k[5394]*y_cur[IDX_OI] + k[5831] + k[6144]; - data[jistart + 17631] = 0.0 + k[986]*y_cur[IDX_eM] + - k[6632]*y_cur[IDX_GRAINM]; - data[jistart + 17632] = 0.0 + k[5464]*y_cur[IDX_OHI]; - data[jistart + 17633] = 0.0 + k[654]*y_cur[IDX_OII]; - data[jistart + 17634] = 0.0 + k[4736]*y_cur[IDX_OM]; - data[jistart + 17635] = 0.0 + k[7081] + k[7263] + k[7445]; - data[jistart + 17636] = 0.0 + k[6326]*y_cur[IDX_OII] + - k[6329]*y_cur[IDX_OHII] + k[6340]*y_cur[IDX_H2OII] + - k[6341]*y_cur[IDX_H2OII] + k[6344]*y_cur[IDX_H3OII] + - k[6373]*y_cur[IDX_COII] + k[6398]*y_cur[IDX_H2COII] + - k[6407]*y_cur[IDX_NOII] + k[6425]*y_cur[IDX_O2II] + - k[6425]*y_cur[IDX_O2II] + k[6486]*y_cur[IDX_HC2OII] + - k[6493]*y_cur[IDX_CH2COII] + k[6528]*y_cur[IDX_N2OII] + + data[jistart + 19592] = 0.0 + k[6374]*y_cur[IDX_GRAINM]; + data[jistart + 19593] = 0.0 + k[6424]*y_cur[IDX_GRAINM]; + data[jistart + 19594] = 0.0 + k[6360]*y_cur[IDX_GRAINM] + k[6361]*y_cur[IDX_GRAINM] + + k[6362]*y_cur[IDX_GRAINM] + k[6363]*y_cur[IDX_GRAINM] + + k[6364]*y_cur[IDX_GRAINM] + k[6365]*y_cur[IDX_GRAINM] + + k[6366]*y_cur[IDX_GRAINM] + k[6367]*y_cur[IDX_GRAINM] + + k[6368]*y_cur[IDX_GRAINM] + k[6369]*y_cur[IDX_GRAINM] + + k[6370]*y_cur[IDX_GRAINM] + k[6371]*y_cur[IDX_GRAINM]; + data[jistart + 19595] = 0.0 + k[6356]*y_cur[IDX_GRAINM] + k[6357]*y_cur[IDX_GRAINM] + + k[6358]*y_cur[IDX_GRAINM]; + data[jistart + 19596] = 0.0 + k[6321]*y_cur[IDX_GRAINM] + k[6322]*y_cur[IDX_GRAINM] + + k[6323]*y_cur[IDX_GRAINM]; + data[jistart + 19597] = 0.0 + k[6343]*y_cur[IDX_GRAINM] + k[6344]*y_cur[IDX_GRAINM] + + k[6345]*y_cur[IDX_GRAINM] + k[6346]*y_cur[IDX_GRAINM]; + data[jistart + 19598] = 0.0 + k[6312]*y_cur[IDX_GRAINM]; + data[jistart + 19599] = 0.0 + k[6314]*y_cur[IDX_GRAINM]; + data[jistart + 19600] = 0.0 + k[6308]*y_cur[IDX_GRAINM]; + data[jistart + 19601] = 0.0 + k[6389]*y_cur[IDX_GRAINM]; + data[jistart + 19602] = 0.0 + k[6310]*y_cur[IDX_GRAINM] + k[6311]*y_cur[IDX_GRAINM]; + data[jistart + 19603] = 0.0 + k[6308]*y_cur[IDX_HII] + k[6309]*y_cur[IDX_H2II] + + k[6310]*y_cur[IDX_H3II] + k[6311]*y_cur[IDX_H3II] + + k[6312]*y_cur[IDX_HeII] + k[6313]*y_cur[IDX_HeHII] + + k[6314]*y_cur[IDX_CII] + k[6315]*y_cur[IDX_CHII] + + k[6316]*y_cur[IDX_CH2II] + k[6317]*y_cur[IDX_CH2II] + + k[6318]*y_cur[IDX_CH2II] + k[6319]*y_cur[IDX_NII] + + k[6320]*y_cur[IDX_NHII] + k[6321]*y_cur[IDX_CH3II] + + k[6322]*y_cur[IDX_CH3II] + k[6323]*y_cur[IDX_CH3II] + + k[6324]*y_cur[IDX_NH2II] + k[6325]*y_cur[IDX_NH2II] + + k[6326]*y_cur[IDX_OII] + k[6327]*y_cur[IDX_CH4II] + + k[6328]*y_cur[IDX_CH4II] + k[6329]*y_cur[IDX_OHII] + + k[6330]*y_cur[IDX_NH3II] + k[6331]*y_cur[IDX_NH3II] + + k[6332]*y_cur[IDX_CH5II] + k[6333]*y_cur[IDX_CH5II] + + k[6334]*y_cur[IDX_CH5II] + k[6335]*y_cur[IDX_CH5II] + + k[6336]*y_cur[IDX_CH5II] + k[6337]*y_cur[IDX_NH4II] + + k[6338]*y_cur[IDX_NH4II] + k[6339]*y_cur[IDX_NH4II] + + k[6340]*y_cur[IDX_H2OII] + k[6341]*y_cur[IDX_H2OII] + + k[6342]*y_cur[IDX_H2OII] + k[6343]*y_cur[IDX_H3OII] + + k[6344]*y_cur[IDX_H3OII] + k[6345]*y_cur[IDX_H3OII] + + k[6346]*y_cur[IDX_H3OII] + k[6347]*y_cur[IDX_FII] + + k[6348]*y_cur[IDX_HFII] + k[6349]*y_cur[IDX_H2FII] + + k[6350]*y_cur[IDX_H2FII] + k[6351]*y_cur[IDX_NaII] + + k[6352]*y_cur[IDX_C2II] + k[6353]*y_cur[IDX_MgII] + + k[6354]*y_cur[IDX_C2HII] + k[6355]*y_cur[IDX_C2HII] + + k[6356]*y_cur[IDX_C2H2II] + k[6357]*y_cur[IDX_C2H2II] + + k[6358]*y_cur[IDX_C2H2II] + k[6359]*y_cur[IDX_CNII] + + k[6360]*y_cur[IDX_C2H3II] + k[6361]*y_cur[IDX_C2H3II] + + k[6362]*y_cur[IDX_C2H3II] + k[6363]*y_cur[IDX_C2H3II] + + k[6364]*y_cur[IDX_C2H3II] + k[6365]*y_cur[IDX_C2H3II] + + k[6366]*y_cur[IDX_C2H3II] + k[6367]*y_cur[IDX_C2H3II] + + k[6368]*y_cur[IDX_C2H3II] + k[6369]*y_cur[IDX_C2H3II] + + k[6370]*y_cur[IDX_C2H3II] + k[6371]*y_cur[IDX_C2H3II] + + k[6372]*y_cur[IDX_HCNII] + k[6373]*y_cur[IDX_COII] + + k[6374]*y_cur[IDX_SiII] + k[6375]*y_cur[IDX_N2II] + + k[6376]*y_cur[IDX_H2NCII] + k[6377]*y_cur[IDX_H2NCII] + + k[6378]*y_cur[IDX_HCNHII] + k[6379]*y_cur[IDX_HCNHII] + + k[6380]*y_cur[IDX_HCNHII] + k[6381]*y_cur[IDX_C2H4II] + + k[6382]*y_cur[IDX_C2H4II] + k[6383]*y_cur[IDX_C2H4II] + + k[6384]*y_cur[IDX_C2H4II] + k[6385]*y_cur[IDX_C2H4II] + + k[6386]*y_cur[IDX_C2H4II] + k[6387]*y_cur[IDX_C2H4II] + + k[6388]*y_cur[IDX_SiHII] + k[6389]*y_cur[IDX_HCOII] + + k[6390]*y_cur[IDX_HOCII] + k[6391]*y_cur[IDX_C2H5II] + + k[6392]*y_cur[IDX_C2H5II] + k[6393]*y_cur[IDX_C2H5II] + + k[6394]*y_cur[IDX_C2H5II] + k[6395]*y_cur[IDX_C2H5II] + + k[6396]*y_cur[IDX_N2HII] + k[6397]*y_cur[IDX_N2HII] + + k[6398]*y_cur[IDX_H2COII] + k[6399]*y_cur[IDX_H2COII] + + k[6400]*y_cur[IDX_H2COII] + k[6401]*y_cur[IDX_H2COII] + + k[6402]*y_cur[IDX_SiH2II] + k[6403]*y_cur[IDX_SiH2II] + + k[6404]*y_cur[IDX_SiH2II] + k[6405]*y_cur[IDX_CH3NHII] + + k[6406]*y_cur[IDX_CH3NHII] + k[6407]*y_cur[IDX_NOII] + + k[6408]*y_cur[IDX_CH2NH2II] + k[6409]*y_cur[IDX_CH2NH2II] + + k[6410]*y_cur[IDX_C2H6II] + k[6411]*y_cur[IDX_C2H6II] + + k[6412]*y_cur[IDX_SiH3II] + k[6413]*y_cur[IDX_SiH3II] + + k[6414]*y_cur[IDX_H3COII] + k[6415]*y_cur[IDX_H3COII] + + k[6416]*y_cur[IDX_H3COII] + k[6417]*y_cur[IDX_H3COII] + + k[6418]*y_cur[IDX_H3COII] + k[6419]*y_cur[IDX_C2H7II] + + k[6420]*y_cur[IDX_C2H7II] + k[6421]*y_cur[IDX_PII] + + k[6422]*y_cur[IDX_HNOII] + k[6423]*y_cur[IDX_CFII] + + k[6424]*y_cur[IDX_SII] + k[6425]*y_cur[IDX_O2II] + + k[6426]*y_cur[IDX_SiH4II] + k[6427]*y_cur[IDX_SiH4II] + + k[6428]*y_cur[IDX_CH3OHII] + k[6429]*y_cur[IDX_CH3OHII] + + k[6430]*y_cur[IDX_CH3OHII] + k[6431]*y_cur[IDX_H2NOII] + + k[6432]*y_cur[IDX_H2NOII] + k[6433]*y_cur[IDX_PHII] + + k[6434]*y_cur[IDX_PH2II] + k[6435]*y_cur[IDX_PH2II] + + k[6436]*y_cur[IDX_PH2II] + k[6437]*y_cur[IDX_O2HII] + + k[6438]*y_cur[IDX_SiH5II] + k[6439]*y_cur[IDX_SiH5II] + + k[6440]*y_cur[IDX_CH3OH2II] + k[6441]*y_cur[IDX_CH3OH2II] + + k[6442]*y_cur[IDX_CH3OH2II] + k[6443]*y_cur[IDX_CH3OH2II] + + k[6444]*y_cur[IDX_CH3OH2II] + k[6445]*y_cur[IDX_HSII] + + k[6446]*y_cur[IDX_H2SII] + k[6447]*y_cur[IDX_H2SII] + + k[6448]*y_cur[IDX_PH3II] + k[6449]*y_cur[IDX_PH3II] + + k[6450]*y_cur[IDX_H3SII] + k[6451]*y_cur[IDX_H3SII] + + k[6452]*y_cur[IDX_H3SII] + k[6453]*y_cur[IDX_H3SII] + + k[6454]*y_cur[IDX_ClII] + k[6455]*y_cur[IDX_C3II] + + k[6456]*y_cur[IDX_HClII] + k[6457]*y_cur[IDX_H2ClII] + + k[6458]*y_cur[IDX_H2ClII] + k[6459]*y_cur[IDX_C3HII] + + k[6460]*y_cur[IDX_C3HII] + k[6461]*y_cur[IDX_C3H2II] + + k[6462]*y_cur[IDX_C3H2II] + k[6463]*y_cur[IDX_C3H2II] + + k[6464]*y_cur[IDX_C3H2II] + k[6465]*y_cur[IDX_C3H2II] + + k[6466]*y_cur[IDX_C2NII] + k[6467]*y_cur[IDX_C2NII] + + k[6468]*y_cur[IDX_CNCII] + k[6469]*y_cur[IDX_CNCII] + + k[6470]*y_cur[IDX_CH2CCHII] + k[6471]*y_cur[IDX_CH2CCHII] + + k[6472]*y_cur[IDX_C2NHII] + k[6473]*y_cur[IDX_C3H3II] + + k[6474]*y_cur[IDX_C2OII] + k[6475]*y_cur[IDX_CH2CNII] + + k[6476]*y_cur[IDX_CH2CNII] + k[6477]*y_cur[IDX_C3H4II] + + k[6478]*y_cur[IDX_C3H4II] + k[6479]*y_cur[IDX_C3H4II] + + k[6480]*y_cur[IDX_C3H4II] + k[6481]*y_cur[IDX_SiCII] + + k[6482]*y_cur[IDX_C3H5II] + k[6483]*y_cur[IDX_C3H5II] + + k[6484]*y_cur[IDX_CH3CNII] + k[6485]*y_cur[IDX_CH3CNII] + + k[6486]*y_cur[IDX_HC2OII] + k[6487]*y_cur[IDX_HC2OII] + + k[6488]*y_cur[IDX_HC2OII] + k[6489]*y_cur[IDX_HC2OII] + + k[6490]*y_cur[IDX_HCSiII] + k[6491]*y_cur[IDX_HCSiII] + + k[6492]*y_cur[IDX_CH2COII] + k[6493]*y_cur[IDX_CH2COII] + + k[6494]*y_cur[IDX_CH2COII] + k[6495]*y_cur[IDX_OCNII] + + k[6496]*y_cur[IDX_SiCH2II] + k[6497]*y_cur[IDX_SiCH2II] + + k[6498]*y_cur[IDX_SiCH2II] + k[6499]*y_cur[IDX_C3H6II] + + k[6500]*y_cur[IDX_C3H6II] + k[6501]*y_cur[IDX_SiNII] + + k[6502]*y_cur[IDX_CH3CNHII] + k[6503]*y_cur[IDX_CH3CNHII] + + k[6504]*y_cur[IDX_C3H7II] + k[6505]*y_cur[IDX_C3H7II] + + k[6506]*y_cur[IDX_C3H7II] + k[6507]*y_cur[IDX_C3H7II] + + k[6508]*y_cur[IDX_C3H7II] + k[6509]*y_cur[IDX_C3H7II] + + k[6510]*y_cur[IDX_C3H7II] + k[6511]*y_cur[IDX_CPII] + + k[6512]*y_cur[IDX_HNSiII] + k[6513]*y_cur[IDX_HNSiII] + + k[6514]*y_cur[IDX_HCNOII] + k[6515]*y_cur[IDX_HCNOII] + + k[6516]*y_cur[IDX_SiCH3II] + k[6517]*y_cur[IDX_SiCH3II] + + k[6518]*y_cur[IDX_CH3COII] + k[6519]*y_cur[IDX_CH3COII] + + k[6520]*y_cur[IDX_HONCII] + k[6521]*y_cur[IDX_HONCII] + + k[6522]*y_cur[IDX_HNCOII] + k[6523]*y_cur[IDX_HNCOII] + + k[6524]*y_cur[IDX_HOCNII] + k[6525]*y_cur[IDX_HOCNII] + + k[6526]*y_cur[IDX_NH2CNHII] + k[6527]*y_cur[IDX_NH2CNHII] + + k[6528]*y_cur[IDX_N2OII] + k[6529]*y_cur[IDX_N2OII] + k[6530]*y_cur[IDX_N2OII] + k[6531]*y_cur[IDX_SiOII] + - k[6540]*y_cur[IDX_CO2II] + k[6558]*y_cur[IDX_HN2OII] + - k[6567]*y_cur[IDX_HCO2II] + k[6584]*y_cur[IDX_NO2II] + - k[6588]*y_cur[IDX_CH3OCH3II] + k[6600]*y_cur[IDX_POII] + - k[6603]*y_cur[IDX_CH3OCH4II] + k[6612]*y_cur[IDX_HPOII] + - k[6613]*y_cur[IDX_HPOII] + k[6620]*y_cur[IDX_SOII] + - k[6632]*y_cur[IDX_ClOII] + k[6707]*y_cur[IDX_OCSII] + - k[6750]*y_cur[IDX_SO2II] + k[6750]*y_cur[IDX_SO2II] + - k[6751]*y_cur[IDX_SO2II] + k[6756]*y_cur[IDX_HSO2II]; - data[jistart + 17637] = 0.0 + k[144]*y_cur[IDX_O2I] + - k[144]*y_cur[IDX_O2I] + k[145]*y_cur[IDX_OHI] + - k[492]*y_cur[IDX_OII] + k[2841]*y_cur[IDX_CO2II] + - k[5172]*y_cur[IDX_HCOI] + k[5175]*y_cur[IDX_HNOI] + - k[5186]*y_cur[IDX_NOI] + k[5190]*y_cur[IDX_O2I] + - k[5191]*y_cur[IDX_O2HI] + k[5194]*y_cur[IDX_OCNI] + - k[5198]*y_cur[IDX_OHI] + k[5200]*y_cur[IDX_SOI] - - k[5573]*y_cur[IDX_OI]; - data[jistart + 17638] = 0.0 - k[406]*y_cur[IDX_OI] + - k[2334]*y_cur[IDX_CO2I] + k[2354]*y_cur[IDX_N2OI] + - k[4737]*y_cur[IDX_OM]; - data[jistart + 17639] = 0.0 - k[80]*y_cur[IDX_OI] + - k[4720]*y_cur[IDX_OII]; - data[jistart + 17640] = 0.0 + k[138]*y_cur[IDX_O2I] + - k[138]*y_cur[IDX_O2I] + k[139]*y_cur[IDX_OHI] - - k[5147]*y_cur[IDX_OI]; - data[jistart + 17641] = 0.0 - k[2396]*y_cur[IDX_OI]; - data[jistart + 17642] = 0.0 - k[5395]*y_cur[IDX_OI]; - data[jistart + 17643] = 0.0 - k[5396]*y_cur[IDX_OI]; - data[jistart + 17644] = 0.0 + k[655]*y_cur[IDX_OII] + - k[3221]*y_cur[IDX_HeII] + k[3778]*y_cur[IDX_OHII] - - k[5397]*y_cur[IDX_OI]; - data[jistart + 17645] = 0.0 + k[996]*y_cur[IDX_eM] + - k[4738]*y_cur[IDX_OM] + k[6398]*y_cur[IDX_GRAINM]; - data[jistart + 17646] = 0.0 + k[656]*y_cur[IDX_OII] + - k[2535]*y_cur[IDX_CNII] + k[3491]*y_cur[IDX_NHII] + - k[3514]*y_cur[IDX_NH2II] + k[3779]*y_cur[IDX_OHII] - - k[5399]*y_cur[IDX_OI] + k[6161]; - data[jistart + 17647] = 0.0 + k[1012]*y_cur[IDX_eM] + - k[1013]*y_cur[IDX_eM] - k[3733]*y_cur[IDX_OI] + - k[3799]*y_cur[IDX_OHI] + k[6340]*y_cur[IDX_GRAINM] + - k[6341]*y_cur[IDX_GRAINM]; - data[jistart + 17648] = 0.0 - k[5398]*y_cur[IDX_OI]; - data[jistart + 17649] = 0.0 + k[657]*y_cur[IDX_OII] + - k[3780]*y_cur[IDX_OHII] - k[5400]*y_cur[IDX_OI]; - data[jistart + 17650] = 0.0 - k[3734]*y_cur[IDX_OI] - - k[3735]*y_cur[IDX_OI] + k[4739]*y_cur[IDX_OM]; - data[jistart + 17651] = 0.0 - k[2730]*y_cur[IDX_OI] - - k[2731]*y_cur[IDX_OI] + k[4740]*y_cur[IDX_OM]; - data[jistart + 17652] = 0.0 + k[1042]*y_cur[IDX_eM] + - k[4741]*y_cur[IDX_OM] + k[6344]*y_cur[IDX_GRAINM]; - data[jistart + 17653] = 0.0 + k[1055]*y_cur[IDX_eM] + - k[6486]*y_cur[IDX_GRAINM]; - data[jistart + 17654] = 0.0 - k[5401]*y_cur[IDX_OI]; - data[jistart + 17655] = 0.0 + k[4742]*y_cur[IDX_OM]; - data[jistart + 17656] = 0.0 + k[3781]*y_cur[IDX_OHII] - - k[5402]*y_cur[IDX_OI] - k[5403]*y_cur[IDX_OI] - - k[5404]*y_cur[IDX_OI]; - data[jistart + 17657] = 0.0 + k[4743]*y_cur[IDX_OM] + - k[4744]*y_cur[IDX_OM]; - data[jistart + 17658] = 0.0 - k[5203]*y_cur[IDX_OI]; - data[jistart + 17659] = 0.0 + k[658]*y_cur[IDX_OII] + - k[3251]*y_cur[IDX_HeII] + k[3783]*y_cur[IDX_OHII] + - k[5172]*y_cur[IDX_HI] + k[5266]*y_cur[IDX_NI] - - k[5405]*y_cur[IDX_OI] - k[5406]*y_cur[IDX_OI]; - data[jistart + 17660] = 0.0 + k[4745]*y_cur[IDX_OM] + - k[4746]*y_cur[IDX_OM]; - data[jistart + 17661] = 0.0 + k[1099]*y_cur[IDX_eM] - - k[3736]*y_cur[IDX_OI] + k[6567]*y_cur[IDX_GRAINM]; - data[jistart + 17662] = 0.0 - k[5407]*y_cur[IDX_OI]; - data[jistart + 17663] = 0.0 - k[3737]*y_cur[IDX_OI]; - data[jistart + 17664] = 0.0 - k[5408]*y_cur[IDX_OI] - - k[5409]*y_cur[IDX_OI]; - data[jistart + 17665] = 0.0 - k[3738]*y_cur[IDX_OI] - - k[3739]*y_cur[IDX_OI]; - data[jistart + 17666] = 0.0 - k[5410]*y_cur[IDX_OI]; - data[jistart + 17667] = 0.0 + k[1113]*y_cur[IDX_eM] + - k[6558]*y_cur[IDX_GRAINM]; - data[jistart + 17668] = 0.0 + k[3784]*y_cur[IDX_OHII]; - data[jistart + 17669] = 0.0 + k[5175]*y_cur[IDX_HI] - - k[5411]*y_cur[IDX_OI] - k[5412]*y_cur[IDX_OI] - - k[5413]*y_cur[IDX_OI]; - data[jistart + 17670] = 0.0 - k[3740]*y_cur[IDX_OI]; - data[jistart + 17671] = 0.0 - k[5216]*y_cur[IDX_OI]; - data[jistart + 17672] = 0.0 - k[5218]*y_cur[IDX_OI]; - data[jistart + 17673] = 0.0 + k[3269]*y_cur[IDX_HeII] - - k[5414]*y_cur[IDX_OI]; - data[jistart + 17674] = 0.0 + k[1135]*y_cur[IDX_eM] + - k[1136]*y_cur[IDX_eM] - k[3741]*y_cur[IDX_OI] + - k[6612]*y_cur[IDX_GRAINM] + k[6613]*y_cur[IDX_GRAINM]; - data[jistart + 17675] = 0.0 - k[5415]*y_cur[IDX_OI] - - k[5416]*y_cur[IDX_OI]; - data[jistart + 17676] = 0.0 - k[3742]*y_cur[IDX_OI] - - k[3743]*y_cur[IDX_OI]; - data[jistart + 17677] = 0.0 + k[1143]*y_cur[IDX_eM] + - k[6756]*y_cur[IDX_GRAINM]; - data[jistart + 17678] = 0.0 + k[3099]*y_cur[IDX_C3OI] + - k[3205]*y_cur[IDX_CNOI] + k[3207]*y_cur[IDX_CO2I] + - k[3211]*y_cur[IDX_COI] + k[3216]*y_cur[IDX_ClOI] + - k[3221]*y_cur[IDX_H2COI] + k[3251]*y_cur[IDX_HCOI] + - k[3269]*y_cur[IDX_HPOI] + k[3275]*y_cur[IDX_N2OI] + - k[3287]*y_cur[IDX_NOI] + k[3290]*y_cur[IDX_O2I] + - k[3291]*y_cur[IDX_OCNI] + k[3293]*y_cur[IDX_OCSI] + - k[3301]*y_cur[IDX_POI] + k[3304]*y_cur[IDX_SO2I] + - k[3305]*y_cur[IDX_SOI] + k[3332]*y_cur[IDX_SiOI] + - k[4747]*y_cur[IDX_OM]; - data[jistart + 17679] = 0.0 + k[4748]*y_cur[IDX_OM]; - data[jistart + 17680] = 0.0 + k[3465]*y_cur[IDX_O2II] + - k[3468]*y_cur[IDX_SOII] + k[5266]*y_cur[IDX_HCOI] + - k[5275]*y_cur[IDX_NO2I] + k[5275]*y_cur[IDX_NO2I] + - k[5276]*y_cur[IDX_NO2I] + k[5279]*y_cur[IDX_NOI] + - k[5281]*y_cur[IDX_O2I] + k[5284]*y_cur[IDX_OHI] + - k[5288]*y_cur[IDX_POI] + k[5290]*y_cur[IDX_SOI]; - data[jistart + 17681] = 0.0 + k[3356]*y_cur[IDX_NOI] + - k[3357]*y_cur[IDX_O2I] + k[4749]*y_cur[IDX_OM]; - data[jistart + 17682] = 0.0 + k[3785]*y_cur[IDX_OHII] + - k[5220]*y_cur[IDX_O2I] - k[5417]*y_cur[IDX_OI]; - data[jistart + 17683] = 0.0 - k[684]*y_cur[IDX_OI] - - k[3744]*y_cur[IDX_OI]; - data[jistart + 17684] = 0.0 - k[3745]*y_cur[IDX_OI] + - k[4750]*y_cur[IDX_OM]; - data[jistart + 17685] = 0.0 + k[659]*y_cur[IDX_OII] + - k[2354]*y_cur[IDX_HII] + k[3275]*y_cur[IDX_HeII] - - k[5418]*y_cur[IDX_OI] - k[5419]*y_cur[IDX_OI] + k[6212]; - data[jistart + 17686] = 0.0 + k[1170]*y_cur[IDX_eM] + - k[1172]*y_cur[IDX_eM] + k[6528]*y_cur[IDX_GRAINM] + - k[6530]*y_cur[IDX_GRAINM]; - data[jistart + 17687] = 0.0 + k[619]*y_cur[IDX_OII] + - k[3620]*y_cur[IDX_O2II] + k[3623]*y_cur[IDX_OHII] + - k[5313]*y_cur[IDX_NOI] + k[5316]*y_cur[IDX_O2I] - - k[5318]*y_cur[IDX_OI] - k[5319]*y_cur[IDX_OI] - - k[5320]*y_cur[IDX_OI] + k[5323]*y_cur[IDX_OHI]; - data[jistart + 17688] = 0.0 + k[3491]*y_cur[IDX_H2OI] + - k[3500]*y_cur[IDX_NOI] - k[3503]*y_cur[IDX_OI]; - data[jistart + 17689] = 0.0 + k[660]*y_cur[IDX_OII] + - k[3547]*y_cur[IDX_OHII] + k[5301]*y_cur[IDX_OHI] - - k[5420]*y_cur[IDX_OI] - k[5421]*y_cur[IDX_OI]; - data[jistart + 17690] = 0.0 + k[3514]*y_cur[IDX_H2OI] + - k[3524]*y_cur[IDX_O2I] - k[3746]*y_cur[IDX_OI]; - data[jistart + 17691] = 0.0 + k[661]*y_cur[IDX_OII] + - k[3786]*y_cur[IDX_OHII] - k[5422]*y_cur[IDX_OI]; - data[jistart + 17692] = 0.0 - k[3747]*y_cur[IDX_OI] + - k[3805]*y_cur[IDX_OHI] + k[4751]*y_cur[IDX_OM]; - data[jistart + 17693] = 0.0 + k[4752]*y_cur[IDX_OM]; - data[jistart + 17694] = 0.0 + k[1449]*y_cur[IDX_CM] + - k[3287]*y_cur[IDX_HeII] + k[3356]*y_cur[IDX_NII] + - k[3500]*y_cur[IDX_NHII] + k[3787]*y_cur[IDX_OHII] + - k[4974]*y_cur[IDX_CI] + k[5083]*y_cur[IDX_CHI] + - k[5186]*y_cur[IDX_HI] + k[5279]*y_cur[IDX_NI] + - k[5313]*y_cur[IDX_NHI] + k[5328]*y_cur[IDX_NOI] + - k[5328]*y_cur[IDX_NOI] + k[5330]*y_cur[IDX_O2I] + - k[5333]*y_cur[IDX_SI] - k[5424]*y_cur[IDX_OI] + k[5892] + k[6229]; - data[jistart + 17695] = 0.0 + k[1168]*y_cur[IDX_eM] + - k[4753]*y_cur[IDX_OM] + k[6407]*y_cur[IDX_GRAINM]; - data[jistart + 17696] = 0.0 + k[5275]*y_cur[IDX_NI] + - k[5275]*y_cur[IDX_NI] + k[5276]*y_cur[IDX_NI] - - k[5423]*y_cur[IDX_OI] + k[5890] + k[6227]; - data[jistart + 17697] = 0.0 + k[1169]*y_cur[IDX_eM] + - k[6584]*y_cur[IDX_GRAINM]; - data[jistart + 17698] = 0.0 - k[5425]*y_cur[IDX_OI] - - k[5426]*y_cur[IDX_OI]; - data[jistart + 17699] = 0.0 - k[3748]*y_cur[IDX_OI]; - data[jistart + 17700] = 0.0 + k[4754]*y_cur[IDX_OM]; - data[jistart + 17701] = 0.0 - k[8]*y_cur[IDX_CM] - - k[63]*y_cur[IDX_CHI] - k[80]*y_cur[IDX_HM] - k[126]*y_cur[IDX_OM] - - k[128]*y_cur[IDX_C2M] - k[129]*y_cur[IDX_C2HM] - - k[130]*y_cur[IDX_C3NM] - k[131]*y_cur[IDX_C5NM] - - k[132]*y_cur[IDX_SM] - k[406]*y_cur[IDX_HII] - - k[681]*y_cur[IDX_CNII] - k[682]*y_cur[IDX_COII] - - k[683]*y_cur[IDX_CO2II] - k[684]*y_cur[IDX_N2II] - - k[1969]*y_cur[IDX_CHII] - k[1991]*y_cur[IDX_CH2II] - - k[2090]*y_cur[IDX_CH3II] - k[2091]*y_cur[IDX_CH3II] - - k[2396]*y_cur[IDX_H2II] - k[2730]*y_cur[IDX_H3II] - - k[2731]*y_cur[IDX_H3II] - k[3503]*y_cur[IDX_NHII] - - k[3678]*y_cur[IDX_C10M] - k[3679]*y_cur[IDX_C10HII] - - k[3680]*y_cur[IDX_C10HII] - k[3681]*y_cur[IDX_C10HM] - - k[3682]*y_cur[IDX_C10H2II] - k[3683]*y_cur[IDX_C10H3II] - - k[3684]*y_cur[IDX_C2II] - k[3685]*y_cur[IDX_C2M] - - k[3686]*y_cur[IDX_C2HII] - k[3687]*y_cur[IDX_C2HM] - - k[3688]*y_cur[IDX_C2H2II] - k[3689]*y_cur[IDX_C2H2II] - - k[3690]*y_cur[IDX_C2H3II] - k[3691]*y_cur[IDX_C2H4II] - - k[3692]*y_cur[IDX_C2H4II] - k[3693]*y_cur[IDX_C3M] - - k[3694]*y_cur[IDX_C3HM] - k[3695]*y_cur[IDX_C3H2II] - - k[3696]*y_cur[IDX_C3H3II] - k[3697]*y_cur[IDX_C3H4II] - - k[3698]*y_cur[IDX_C4M] - k[3699]*y_cur[IDX_C4HII] - - k[3700]*y_cur[IDX_C4HM] - k[3701]*y_cur[IDX_C4H2II] - - k[3702]*y_cur[IDX_C4H2II] - k[3703]*y_cur[IDX_C5M] - - k[3704]*y_cur[IDX_C5HII] - k[3705]*y_cur[IDX_C5HM] - - k[3706]*y_cur[IDX_C5H2II] - k[3707]*y_cur[IDX_C5H3II] - - k[3708]*y_cur[IDX_C6M] - k[3709]*y_cur[IDX_C6HM] - - k[3710]*y_cur[IDX_C6H2II] - k[3711]*y_cur[IDX_C6H3II] - - k[3712]*y_cur[IDX_C7M] - k[3713]*y_cur[IDX_C7HII] - - k[3714]*y_cur[IDX_C7HM] - k[3715]*y_cur[IDX_C7H2II] - - k[3716]*y_cur[IDX_C7H3II] - k[3717]*y_cur[IDX_C8M] - - k[3718]*y_cur[IDX_C8HM] - k[3719]*y_cur[IDX_C8H2II] - - k[3720]*y_cur[IDX_C8H3II] - k[3721]*y_cur[IDX_C9M] - - k[3722]*y_cur[IDX_C9HII] - k[3723]*y_cur[IDX_C9HM] - - k[3724]*y_cur[IDX_C9H2II] - k[3725]*y_cur[IDX_C9H3II] - - k[3726]*y_cur[IDX_CH2CCHII] - k[3727]*y_cur[IDX_CH4II] - - k[3728]*y_cur[IDX_CH5II] - k[3729]*y_cur[IDX_CH5II] - - k[3730]*y_cur[IDX_CO2II] - k[3731]*y_cur[IDX_CPII] - - k[3732]*y_cur[IDX_CSII] - k[3733]*y_cur[IDX_H2OII] - - k[3734]*y_cur[IDX_H2SII] - k[3735]*y_cur[IDX_H2SII] - - k[3736]*y_cur[IDX_HCO2II] - k[3737]*y_cur[IDX_HCPII] - - k[3738]*y_cur[IDX_HCSII] - k[3739]*y_cur[IDX_HCSII] - - k[3740]*y_cur[IDX_HNOII] - k[3741]*y_cur[IDX_HPOII] - - k[3742]*y_cur[IDX_HSII] - k[3743]*y_cur[IDX_HSII] - - k[3744]*y_cur[IDX_N2II] - k[3745]*y_cur[IDX_N2HII] - - k[3746]*y_cur[IDX_NH2II] - k[3747]*y_cur[IDX_NH3II] - - k[3748]*y_cur[IDX_NSII] - k[3749]*y_cur[IDX_O2HII] - - k[3750]*y_cur[IDX_OHII] - k[3751]*y_cur[IDX_PHII] - - k[3752]*y_cur[IDX_PNII] - k[3753]*y_cur[IDX_SiCII] - - k[3754]*y_cur[IDX_SiCH2II] - k[3755]*y_cur[IDX_SiCH2II] - - k[3756]*y_cur[IDX_SiHII] - k[3757]*y_cur[IDX_SiH2II] - - k[3758]*y_cur[IDX_SiH3II] - k[3759]*y_cur[IDX_SiH3II] - - k[3760]*y_cur[IDX_SiH5II] - k[3761]*y_cur[IDX_SiNII] - - k[3762]*y_cur[IDX_SiNCII] - k[3763]*y_cur[IDX_SiNCHII] - - k[3764]*y_cur[IDX_SiOII] - k[5012]*y_cur[IDX_CH2I] - - k[5013]*y_cur[IDX_CH2I] - k[5014]*y_cur[IDX_CH2I] - - k[5015]*y_cur[IDX_CH2I] - k[5043]*y_cur[IDX_CH3I] - - k[5044]*y_cur[IDX_CH3I] - k[5096]*y_cur[IDX_CHI] - - k[5097]*y_cur[IDX_CHI] - k[5147]*y_cur[IDX_H2I] - - k[5203]*y_cur[IDX_HCNOI] - k[5216]*y_cur[IDX_HOCNI] - - k[5218]*y_cur[IDX_HONCI] - k[5318]*y_cur[IDX_NHI] - - k[5319]*y_cur[IDX_NHI] - k[5320]*y_cur[IDX_NHI] - - k[5340]*y_cur[IDX_C10I] - k[5341]*y_cur[IDX_C10HI] - - k[5342]*y_cur[IDX_C11I] - k[5343]*y_cur[IDX_C2I] - - k[5344]*y_cur[IDX_C2H2I] - k[5345]*y_cur[IDX_C2H3I] - - k[5346]*y_cur[IDX_C2H4I] - k[5347]*y_cur[IDX_C2H4I] - - k[5348]*y_cur[IDX_C2H4I] - k[5349]*y_cur[IDX_C2H4I] - - k[5350]*y_cur[IDX_C2H5I] - k[5351]*y_cur[IDX_C2H5I] - - k[5352]*y_cur[IDX_C2HI] - k[5353]*y_cur[IDX_C2NI] - - k[5354]*y_cur[IDX_C2OI] - k[5355]*y_cur[IDX_C2SI] - - k[5356]*y_cur[IDX_C3I] - k[5357]*y_cur[IDX_C3HI] - - k[5358]*y_cur[IDX_C3NI] - k[5359]*y_cur[IDX_C3OI] - - k[5360]*y_cur[IDX_C3PI] - k[5361]*y_cur[IDX_C4I] - - k[5362]*y_cur[IDX_C4HI] - k[5363]*y_cur[IDX_C4NI] - - k[5364]*y_cur[IDX_C4PI] - k[5365]*y_cur[IDX_C5I] - - k[5366]*y_cur[IDX_C5HI] - k[5367]*y_cur[IDX_C5NI] - - k[5368]*y_cur[IDX_C6I] - k[5369]*y_cur[IDX_C6HI] - - k[5370]*y_cur[IDX_C7I] - k[5371]*y_cur[IDX_C7HI] - - k[5372]*y_cur[IDX_C7NI] - k[5373]*y_cur[IDX_C8I] - - k[5374]*y_cur[IDX_C8HI] - k[5375]*y_cur[IDX_C9I] - - k[5376]*y_cur[IDX_C9HI] - k[5377]*y_cur[IDX_C9NI] - - k[5378]*y_cur[IDX_CCPI] - k[5379]*y_cur[IDX_CClI] - - k[5380]*y_cur[IDX_CClI] - k[5381]*y_cur[IDX_CH2CCH2I] - - k[5382]*y_cur[IDX_CH2CCH2I] - k[5383]*y_cur[IDX_CH2CCH2I] - - k[5384]*y_cur[IDX_CH2PHI] - k[5385]*y_cur[IDX_CH4I] - - k[5386]*y_cur[IDX_CNI] - k[5387]*y_cur[IDX_CNI] - - k[5388]*y_cur[IDX_CNI] - k[5389]*y_cur[IDX_CNOI] - - k[5390]*y_cur[IDX_CO2I] - k[5391]*y_cur[IDX_CPI] - - k[5392]*y_cur[IDX_CSI] - k[5393]*y_cur[IDX_CSI] - - k[5394]*y_cur[IDX_ClOI] - k[5395]*y_cur[IDX_H2CCCI] - - k[5396]*y_cur[IDX_H2CNI] - k[5397]*y_cur[IDX_H2COI] - - k[5398]*y_cur[IDX_H2O2I] - k[5399]*y_cur[IDX_H2OI] - - k[5400]*y_cur[IDX_H2SI] - k[5401]*y_cur[IDX_HC2PI] - - k[5402]*y_cur[IDX_HCNI] - k[5403]*y_cur[IDX_HCNI] - - k[5404]*y_cur[IDX_HCNI] - k[5405]*y_cur[IDX_HCOI] - - k[5406]*y_cur[IDX_HCOI] - k[5407]*y_cur[IDX_HCPI] - - k[5408]*y_cur[IDX_HCSI] - k[5409]*y_cur[IDX_HCSI] - - k[5410]*y_cur[IDX_HCSiI] - k[5411]*y_cur[IDX_HNOI] - - k[5412]*y_cur[IDX_HNOI] - k[5413]*y_cur[IDX_HNOI] - - k[5414]*y_cur[IDX_HPOI] - k[5415]*y_cur[IDX_HSI] - - k[5416]*y_cur[IDX_HSI] - k[5417]*y_cur[IDX_N2I] - - k[5418]*y_cur[IDX_N2OI] - k[5419]*y_cur[IDX_N2OI] - - k[5420]*y_cur[IDX_NH2I] - k[5421]*y_cur[IDX_NH2I] - - k[5422]*y_cur[IDX_NH3I] - k[5423]*y_cur[IDX_NO2I] - - k[5424]*y_cur[IDX_NOI] - k[5425]*y_cur[IDX_NSI] - - k[5426]*y_cur[IDX_NSI] - k[5427]*y_cur[IDX_O2HI] - - k[5428]*y_cur[IDX_OCNI] - k[5429]*y_cur[IDX_OCNI] - - k[5430]*y_cur[IDX_OCSI] - k[5431]*y_cur[IDX_OCSI] - - k[5432]*y_cur[IDX_OHI] - k[5433]*y_cur[IDX_PH2I] - - k[5434]*y_cur[IDX_PH2I] - k[5435]*y_cur[IDX_PH2I] - - k[5436]*y_cur[IDX_PHI] - k[5437]*y_cur[IDX_S2I] - - k[5438]*y_cur[IDX_SO2I] - k[5439]*y_cur[IDX_SOI] - - k[5440]*y_cur[IDX_SiC2I] - k[5441]*y_cur[IDX_SiC3I] - - k[5442]*y_cur[IDX_SiC4I] - k[5443]*y_cur[IDX_SiCI] - - k[5444]*y_cur[IDX_SiCI] - k[5445]*y_cur[IDX_SiH2I] - - k[5446]*y_cur[IDX_SiH2I] - k[5447]*y_cur[IDX_SiH3I] - - k[5448]*y_cur[IDX_SiH4I] - k[5449]*y_cur[IDX_SiHI] - - k[5450]*y_cur[IDX_SiNI] - k[5451]*y_cur[IDX_SiNI] - - k[5452]*y_cur[IDX_SiNCI] - k[5505]*y_cur[IDX_CII] - - k[5526]*y_cur[IDX_CI] - k[5573]*y_cur[IDX_HI] - - k[5582]*y_cur[IDX_OI] - k[5582]*y_cur[IDX_OI] - - k[5582]*y_cur[IDX_OI] - k[5582]*y_cur[IDX_OI] - - k[5583]*y_cur[IDX_SOI] - k[5584]*y_cur[IDX_SiII] - - k[5585]*y_cur[IDX_SiI] - k[5609]*y_cur[IDX_eM] - k[5685] - k[5900] - - k[6301] - k[6899]; - data[jistart + 17702] = 0.0 + k[266]*y_cur[IDX_CH2I] + - k[295]*y_cur[IDX_CHI] + k[492]*y_cur[IDX_HI] + k[619]*y_cur[IDX_NHI] - + k[646]*y_cur[IDX_C2I] + k[647]*y_cur[IDX_C2H2I] + - k[648]*y_cur[IDX_C2H4I] + k[649]*y_cur[IDX_C2HI] + - k[650]*y_cur[IDX_CH3CNI] + k[651]*y_cur[IDX_CH3OHI] + - k[652]*y_cur[IDX_CH4I] + k[653]*y_cur[IDX_COI] + - k[654]*y_cur[IDX_FeI] + k[655]*y_cur[IDX_H2COI] + - k[656]*y_cur[IDX_H2OI] + k[657]*y_cur[IDX_H2SI] + - k[658]*y_cur[IDX_HCOI] + k[659]*y_cur[IDX_N2OI] + - k[660]*y_cur[IDX_NH2I] + k[661]*y_cur[IDX_NH3I] + - k[662]*y_cur[IDX_O2I] + k[663]*y_cur[IDX_OCSI] + - k[664]*y_cur[IDX_OHI] + k[665]*y_cur[IDX_SO2I] + - k[3914]*y_cur[IDX_CM] + k[3949]*y_cur[IDX_C10M] + - k[3984]*y_cur[IDX_C10HM] + k[4019]*y_cur[IDX_C2M] + - k[4054]*y_cur[IDX_C2HM] + k[4089]*y_cur[IDX_C3M] + - k[4124]*y_cur[IDX_C3HM] + k[4159]*y_cur[IDX_C3NM] + - k[4194]*y_cur[IDX_C4M] + k[4229]*y_cur[IDX_C4HM] + - k[4264]*y_cur[IDX_C5M] + k[4299]*y_cur[IDX_C5HM] + - k[4334]*y_cur[IDX_C5NM] + k[4369]*y_cur[IDX_C6M] + - k[4404]*y_cur[IDX_C6HM] + k[4439]*y_cur[IDX_C7M] + - k[4474]*y_cur[IDX_C7HM] + k[4509]*y_cur[IDX_C8M] + - k[4544]*y_cur[IDX_C8HM] + k[4579]*y_cur[IDX_C9M] + - k[4614]*y_cur[IDX_C9HM] + k[4649]*y_cur[IDX_CHM] + - k[4684]*y_cur[IDX_CNM] + k[4720]*y_cur[IDX_HM] + - k[4755]*y_cur[IDX_OM] + k[4755]*y_cur[IDX_OM] + - k[4790]*y_cur[IDX_O2M] + k[4825]*y_cur[IDX_OHM] + - k[4860]*y_cur[IDX_SM] + k[5623]*y_cur[IDX_eM] + - k[6326]*y_cur[IDX_GRAINM]; - data[jistart + 17703] = 0.0 - k[126]*y_cur[IDX_OI] + - k[666]*y_cur[IDX_CNI] + k[667]*y_cur[IDX_O2I] + - k[4727]*y_cur[IDX_CII] + k[4728]*y_cur[IDX_C2H2II] + - k[4729]*y_cur[IDX_C2H3II] + k[4730]*y_cur[IDX_C4H2II] + - k[4731]*y_cur[IDX_C4H3II] + k[4732]*y_cur[IDX_C4SII] + - k[4733]*y_cur[IDX_CH2CCHII] + k[4734]*y_cur[IDX_CH3II] + - k[4735]*y_cur[IDX_CNCII] + k[4736]*y_cur[IDX_FeII] + - k[4737]*y_cur[IDX_HII] + k[4738]*y_cur[IDX_H2COII] + - k[4739]*y_cur[IDX_H2SII] + k[4740]*y_cur[IDX_H3II] + - k[4741]*y_cur[IDX_H3OII] + k[4742]*y_cur[IDX_HC2SII] + - k[4743]*y_cur[IDX_HCNHII] + k[4744]*y_cur[IDX_HCNHII] + - k[4745]*y_cur[IDX_HCOII] + k[4746]*y_cur[IDX_HCOII] + - k[4747]*y_cur[IDX_HeII] + k[4748]*y_cur[IDX_MgII] + - k[4749]*y_cur[IDX_NII] + k[4750]*y_cur[IDX_N2HII] + - k[4751]*y_cur[IDX_NH3II] + k[4752]*y_cur[IDX_NH4II] + - k[4753]*y_cur[IDX_NOII] + k[4754]*y_cur[IDX_NaII] + - k[4755]*y_cur[IDX_OII] + k[4755]*y_cur[IDX_OII] + - k[4756]*y_cur[IDX_SII] + k[4757]*y_cur[IDX_SOII] + - k[4758]*y_cur[IDX_SiII] + k[4759]*y_cur[IDX_SiOII] + - k[4760]*y_cur[IDX_SiOHII] + k[4761]*y_cur[IDX_SiSII] + k[5895] + - k[6232]; - data[jistart + 17704] = 0.0 + k[138]*y_cur[IDX_H2I] + - k[138]*y_cur[IDX_H2I] + k[144]*y_cur[IDX_HI] + k[144]*y_cur[IDX_HI] - + k[662]*y_cur[IDX_OII] + k[667]*y_cur[IDX_OM] + - k[1422]*y_cur[IDX_CII] + k[1967]*y_cur[IDX_CHII] + - k[2089]*y_cur[IDX_CH3II] + k[2276]*y_cur[IDX_CNII] + - k[3290]*y_cur[IDX_HeII] + k[3357]*y_cur[IDX_NII] + - k[3524]*y_cur[IDX_NH2II] + k[3668]*y_cur[IDX_C3II] + - k[3671]*y_cur[IDX_C3HII] + k[3672]*y_cur[IDX_CSII] + - k[3674]*y_cur[IDX_SII] + k[3812]*y_cur[IDX_PII] + - k[3884]*y_cur[IDX_SiH3II] + k[4978]*y_cur[IDX_CI] + - k[5010]*y_cur[IDX_CH2I] + k[5088]*y_cur[IDX_CHI] + - k[5089]*y_cur[IDX_CHI] + k[5092]*y_cur[IDX_CHI] + - k[5093]*y_cur[IDX_CHI] + k[5124]*y_cur[IDX_CNI] + - k[5130]*y_cur[IDX_COI] + k[5190]*y_cur[IDX_HI] + - k[5220]*y_cur[IDX_N2I] + k[5281]*y_cur[IDX_NI] + - k[5316]*y_cur[IDX_NHI] + k[5330]*y_cur[IDX_NOI] + - k[5337]*y_cur[IDX_SI] + k[5338]*y_cur[IDX_SOI] + - k[5484]*y_cur[IDX_PI] + k[5494]*y_cur[IDX_SiI] + k[5898] + k[5898] + - k[6236] + k[6236]; - data[jistart + 17705] = 0.0 + k[1174]*y_cur[IDX_eM] + - k[1174]*y_cur[IDX_eM] + k[1912]*y_cur[IDX_CI] + - k[2014]*y_cur[IDX_CH2I] + k[2262]*y_cur[IDX_CHI] + - k[3465]*y_cur[IDX_NI] + k[3620]*y_cur[IDX_NHI] + - k[3654]*y_cur[IDX_C2H2I] + k[3667]*y_cur[IDX_SI] + k[6233] + - k[6425]*y_cur[IDX_GRAINM] + k[6425]*y_cur[IDX_GRAINM]; - data[jistart + 17706] = 0.0 + k[4790]*y_cur[IDX_OII]; - data[jistart + 17707] = 0.0 + k[5191]*y_cur[IDX_HI] - - k[5427]*y_cur[IDX_OI] + k[6238]; - data[jistart + 17708] = 0.0 - k[3749]*y_cur[IDX_OI]; - data[jistart + 17709] = 0.0 + k[3291]*y_cur[IDX_HeII] + - k[5194]*y_cur[IDX_HI] - k[5428]*y_cur[IDX_OI] - - k[5429]*y_cur[IDX_OI] + k[5901] + k[6239]; - data[jistart + 17710] = 0.0 + k[663]*y_cur[IDX_OII] + - k[3293]*y_cur[IDX_HeII] - k[5430]*y_cur[IDX_OI] - - k[5431]*y_cur[IDX_OI]; - data[jistart + 17711] = 0.0 + k[1178]*y_cur[IDX_eM] + - k[6707]*y_cur[IDX_GRAINM]; - data[jistart + 17712] = 0.0 + k[139]*y_cur[IDX_H2I] + - k[145]*y_cur[IDX_HI] + k[664]*y_cur[IDX_OII] + - k[3788]*y_cur[IDX_OHII] + k[3798]*y_cur[IDX_COII] + - k[3799]*y_cur[IDX_H2OII] + k[3805]*y_cur[IDX_NH3II] + - k[4982]*y_cur[IDX_CI] + k[5018]*y_cur[IDX_CH2I] + - k[5045]*y_cur[IDX_CH3I] + k[5198]*y_cur[IDX_HI] + - k[5284]*y_cur[IDX_NI] + k[5301]*y_cur[IDX_NH2I] + - k[5323]*y_cur[IDX_NHI] - k[5432]*y_cur[IDX_OI] + - k[5458]*y_cur[IDX_C2H5I] + k[5459]*y_cur[IDX_CNI] + - k[5464]*y_cur[IDX_FI] + k[5479]*y_cur[IDX_OHI] + - k[5479]*y_cur[IDX_OHI] + k[5905] + k[6244]; - data[jistart + 17713] = 0.0 + k[1180]*y_cur[IDX_eM] + - k[1914]*y_cur[IDX_CI] + k[2016]*y_cur[IDX_CH2I] + - k[2209]*y_cur[IDX_CH4I] + k[2264]*y_cur[IDX_CHI] + - k[3547]*y_cur[IDX_NH2I] + k[3623]*y_cur[IDX_NHI] - - k[3750]*y_cur[IDX_OI] + k[3769]*y_cur[IDX_C2I] + - k[3770]*y_cur[IDX_C2HI] + k[3773]*y_cur[IDX_C2H6I] + - k[3774]*y_cur[IDX_C2H6I] + k[3775]*y_cur[IDX_CNI] + - k[3776]*y_cur[IDX_CO2I] + k[3777]*y_cur[IDX_COI] + - k[3778]*y_cur[IDX_H2COI] + k[3779]*y_cur[IDX_H2OI] + - k[3780]*y_cur[IDX_H2SI] + k[3781]*y_cur[IDX_HCNI] + - k[3783]*y_cur[IDX_HCOI] + k[3784]*y_cur[IDX_HNCI] + - k[3785]*y_cur[IDX_N2I] + k[3786]*y_cur[IDX_NH3I] + - k[3787]*y_cur[IDX_NOI] + k[3788]*y_cur[IDX_OHI] + - k[3789]*y_cur[IDX_SI] + k[3791]*y_cur[IDX_SiI] + - k[3792]*y_cur[IDX_SiCI] + k[3793]*y_cur[IDX_SiHI] + - k[3794]*y_cur[IDX_SiOI] + k[6329]*y_cur[IDX_GRAINM]; - data[jistart + 17714] = 0.0 + k[4825]*y_cur[IDX_OII]; - data[jistart + 17715] = 0.0 + k[5484]*y_cur[IDX_O2I]; - data[jistart + 17716] = 0.0 + k[3812]*y_cur[IDX_O2I]; - data[jistart + 17717] = 0.0 - k[5436]*y_cur[IDX_OI]; - data[jistart + 17718] = 0.0 - k[3751]*y_cur[IDX_OI]; - data[jistart + 17719] = 0.0 - k[5433]*y_cur[IDX_OI] - - k[5434]*y_cur[IDX_OI] - k[5435]*y_cur[IDX_OI]; - data[jistart + 17720] = 0.0 - k[3752]*y_cur[IDX_OI]; - data[jistart + 17721] = 0.0 + k[3301]*y_cur[IDX_HeII] + - k[5288]*y_cur[IDX_NI] + k[5910] + k[6251]; - data[jistart + 17722] = 0.0 + k[1218]*y_cur[IDX_eM] + - k[6600]*y_cur[IDX_GRAINM]; - data[jistart + 17723] = 0.0 + k[3667]*y_cur[IDX_O2II] + - k[3789]*y_cur[IDX_OHII] + k[5333]*y_cur[IDX_NOI] + - k[5337]*y_cur[IDX_O2I] + k[5490]*y_cur[IDX_SOI]; - data[jistart + 17724] = 0.0 + k[3674]*y_cur[IDX_O2I] + - k[4756]*y_cur[IDX_OM]; - data[jistart + 17725] = 0.0 - k[132]*y_cur[IDX_OI] + - k[4860]*y_cur[IDX_OII]; - data[jistart + 17726] = 0.0 - k[5437]*y_cur[IDX_OI]; - data[jistart + 17727] = 0.0 + k[1428]*y_cur[IDX_CII] + - k[3305]*y_cur[IDX_HeII] + k[4986]*y_cur[IDX_CI] + - k[5200]*y_cur[IDX_HI] + k[5290]*y_cur[IDX_NI] + - k[5338]*y_cur[IDX_O2I] - k[5439]*y_cur[IDX_OI] + - k[5490]*y_cur[IDX_SI] - k[5583]*y_cur[IDX_OI] + k[5915] + k[6257]; - data[jistart + 17728] = 0.0 + k[1220]*y_cur[IDX_eM] + - k[3468]*y_cur[IDX_NI] + k[4757]*y_cur[IDX_OM] + - k[6620]*y_cur[IDX_GRAINM]; - data[jistart + 17729] = 0.0 + k[665]*y_cur[IDX_OII] + - k[3304]*y_cur[IDX_HeII] - k[5438]*y_cur[IDX_OI] + k[5914] + k[6256]; - data[jistart + 17730] = 0.0 + k[1221]*y_cur[IDX_eM] + - k[1221]*y_cur[IDX_eM] + k[1222]*y_cur[IDX_eM] + - k[6750]*y_cur[IDX_GRAINM] + k[6750]*y_cur[IDX_GRAINM] + - k[6751]*y_cur[IDX_GRAINM]; - data[jistart + 17731] = 0.0 + k[3791]*y_cur[IDX_OHII] + - k[5494]*y_cur[IDX_O2I] - k[5585]*y_cur[IDX_OI]; - data[jistart + 17732] = 0.0 + k[4758]*y_cur[IDX_OM] - - k[5584]*y_cur[IDX_OI]; - data[jistart + 17733] = 0.0 + k[3792]*y_cur[IDX_OHII] - - k[5443]*y_cur[IDX_OI] - k[5444]*y_cur[IDX_OI]; - data[jistart + 17734] = 0.0 - k[3753]*y_cur[IDX_OI]; - data[jistart + 17735] = 0.0 - k[5440]*y_cur[IDX_OI]; - data[jistart + 17736] = 0.0 - k[5441]*y_cur[IDX_OI]; - data[jistart + 17737] = 0.0 - k[5442]*y_cur[IDX_OI]; - data[jistart + 17738] = 0.0 - k[3754]*y_cur[IDX_OI] - - k[3755]*y_cur[IDX_OI]; - data[jistart + 17739] = 0.0 + k[3793]*y_cur[IDX_OHII] - - k[5449]*y_cur[IDX_OI]; - data[jistart + 17740] = 0.0 - k[3756]*y_cur[IDX_OI]; - data[jistart + 17741] = 0.0 - k[5445]*y_cur[IDX_OI] - - k[5446]*y_cur[IDX_OI]; - data[jistart + 17742] = 0.0 - k[3757]*y_cur[IDX_OI]; - data[jistart + 17743] = 0.0 - k[5447]*y_cur[IDX_OI]; - data[jistart + 17744] = 0.0 - k[3758]*y_cur[IDX_OI] - - k[3759]*y_cur[IDX_OI] + k[3884]*y_cur[IDX_O2I]; - data[jistart + 17745] = 0.0 - k[5448]*y_cur[IDX_OI]; - data[jistart + 17746] = 0.0 - k[3760]*y_cur[IDX_OI]; - data[jistart + 17747] = 0.0 - k[5450]*y_cur[IDX_OI] - - k[5451]*y_cur[IDX_OI]; - data[jistart + 17748] = 0.0 - k[3761]*y_cur[IDX_OI]; - data[jistart + 17749] = 0.0 - k[5452]*y_cur[IDX_OI]; - data[jistart + 17750] = 0.0 - k[3762]*y_cur[IDX_OI]; - data[jistart + 17751] = 0.0 - k[3763]*y_cur[IDX_OI]; - data[jistart + 17752] = 0.0 + k[3332]*y_cur[IDX_HeII] + - k[3794]*y_cur[IDX_OHII] + k[5934] + k[6286]; - data[jistart + 17753] = 0.0 + k[1266]*y_cur[IDX_eM] - - k[3764]*y_cur[IDX_OI] + k[4759]*y_cur[IDX_OM] + k[6284] + - k[6531]*y_cur[IDX_GRAINM]; - data[jistart + 17754] = 0.0 + k[5933] + k[6285]; - data[jistart + 17755] = 0.0 + k[4760]*y_cur[IDX_OM]; - data[jistart + 17756] = 0.0 + k[4761]*y_cur[IDX_OM]; - data[jistart + 17757] = 0.0 + k[919]*y_cur[IDX_CH2COII] + - k[956]*y_cur[IDX_CH3OCH3II] + k[957]*y_cur[IDX_CH3OCH4II] + - k[980]*y_cur[IDX_COII] + k[981]*y_cur[IDX_CO2II] + - k[986]*y_cur[IDX_ClOII] + k[996]*y_cur[IDX_H2COII] + - k[1012]*y_cur[IDX_H2OII] + k[1013]*y_cur[IDX_H2OII] + - k[1042]*y_cur[IDX_H3OII] + k[1055]*y_cur[IDX_HC2OII] + - k[1099]*y_cur[IDX_HCO2II] + k[1113]*y_cur[IDX_HN2OII] + - k[1135]*y_cur[IDX_HPOII] + k[1136]*y_cur[IDX_HPOII] + - k[1143]*y_cur[IDX_HSO2II] + k[1168]*y_cur[IDX_NOII] + - k[1169]*y_cur[IDX_NO2II] + k[1170]*y_cur[IDX_N2OII] + - k[1172]*y_cur[IDX_N2OII] + k[1174]*y_cur[IDX_O2II] + - k[1174]*y_cur[IDX_O2II] + k[1178]*y_cur[IDX_OCSII] + - k[1180]*y_cur[IDX_OHII] + k[1218]*y_cur[IDX_POII] + - k[1220]*y_cur[IDX_SOII] + k[1221]*y_cur[IDX_SO2II] + - k[1221]*y_cur[IDX_SO2II] + k[1222]*y_cur[IDX_SO2II] + - k[1266]*y_cur[IDX_SiOII] - k[5609]*y_cur[IDX_OI] + - k[5623]*y_cur[IDX_OII]; - data[jistart + 17758] = 0.0 - k[5525]*y_cur[IDX_OII]; - data[jistart + 17759] = 0.0 + k[1423]*y_cur[IDX_O2I]; - data[jistart + 17760] = 0.0 - k[3914]*y_cur[IDX_OII]; - data[jistart + 17761] = 0.0 - k[3949]*y_cur[IDX_OII]; - data[jistart + 17762] = 0.0 - k[3984]*y_cur[IDX_OII]; - data[jistart + 17763] = 0.0 - k[646]*y_cur[IDX_OII] - - k[3631]*y_cur[IDX_OII]; - data[jistart + 17764] = 0.0 - k[4019]*y_cur[IDX_OII]; - data[jistart + 17765] = 0.0 - k[649]*y_cur[IDX_OII] - - k[3634]*y_cur[IDX_OII]; - data[jistart + 17766] = 0.0 - k[4054]*y_cur[IDX_OII]; - data[jistart + 17767] = 0.0 - k[647]*y_cur[IDX_OII]; - data[jistart + 17768] = 0.0 - k[648]*y_cur[IDX_OII] - - k[3632]*y_cur[IDX_OII] - k[3633]*y_cur[IDX_OII]; - data[jistart + 17769] = 0.0 - k[4089]*y_cur[IDX_OII]; - data[jistart + 17770] = 0.0 - k[4124]*y_cur[IDX_OII]; - data[jistart + 17771] = 0.0 - k[4159]*y_cur[IDX_OII]; - data[jistart + 17772] = 0.0 - k[4194]*y_cur[IDX_OII]; - data[jistart + 17773] = 0.0 - k[4229]*y_cur[IDX_OII]; - data[jistart + 17774] = 0.0 - k[4264]*y_cur[IDX_OII]; - data[jistart + 17775] = 0.0 - k[4299]*y_cur[IDX_OII]; - data[jistart + 17776] = 0.0 - k[4334]*y_cur[IDX_OII]; - data[jistart + 17777] = 0.0 - k[4369]*y_cur[IDX_OII]; - data[jistart + 17778] = 0.0 - k[4404]*y_cur[IDX_OII]; - data[jistart + 17779] = 0.0 - k[4439]*y_cur[IDX_OII]; - data[jistart + 17780] = 0.0 - k[4474]*y_cur[IDX_OII]; - data[jistart + 17781] = 0.0 - k[4509]*y_cur[IDX_OII]; - data[jistart + 17782] = 0.0 - k[4544]*y_cur[IDX_OII]; - data[jistart + 17783] = 0.0 - k[4579]*y_cur[IDX_OII]; - data[jistart + 17784] = 0.0 - k[4614]*y_cur[IDX_OII]; - data[jistart + 17785] = 0.0 - k[295]*y_cur[IDX_OII] - - k[2261]*y_cur[IDX_OII]; - data[jistart + 17786] = 0.0 + k[1968]*y_cur[IDX_O2I]; - data[jistart + 17787] = 0.0 - k[4649]*y_cur[IDX_OII]; - data[jistart + 17788] = 0.0 - k[266]*y_cur[IDX_OII]; - data[jistart + 17789] = 0.0 - k[650]*y_cur[IDX_OII] - - k[3635]*y_cur[IDX_OII]; - data[jistart + 17790] = 0.0 - k[651]*y_cur[IDX_OII] - - k[3636]*y_cur[IDX_OII] - k[3637]*y_cur[IDX_OII]; - data[jistart + 17791] = 0.0 - k[652]*y_cur[IDX_OII] - - k[3638]*y_cur[IDX_OII]; - data[jistart + 17792] = 0.0 - k[3639]*y_cur[IDX_OII]; - data[jistart + 17793] = 0.0 + k[681]*y_cur[IDX_OI]; - data[jistart + 17794] = 0.0 - k[4684]*y_cur[IDX_OII]; - data[jistart + 17795] = 0.0 + k[3206]*y_cur[IDX_HeII]; - data[jistart + 17796] = 0.0 - k[653]*y_cur[IDX_OII]; - data[jistart + 17797] = 0.0 + k[682]*y_cur[IDX_OI]; - data[jistart + 17798] = 0.0 + k[3208]*y_cur[IDX_HeII] - - k[3640]*y_cur[IDX_OII]; - data[jistart + 17799] = 0.0 + k[683]*y_cur[IDX_OI]; - data[jistart + 17800] = 0.0 - k[654]*y_cur[IDX_OII]; - data[jistart + 17801] = 0.0 - k[6326]*y_cur[IDX_OII]; - data[jistart + 17802] = 0.0 - k[492]*y_cur[IDX_OII]; - data[jistart + 17803] = 0.0 + k[406]*y_cur[IDX_OI]; - data[jistart + 17804] = 0.0 - k[4720]*y_cur[IDX_OII]; - data[jistart + 17805] = 0.0 - k[2466]*y_cur[IDX_OII]; - data[jistart + 17806] = 0.0 - k[655]*y_cur[IDX_OII] - - k[3641]*y_cur[IDX_OII]; - data[jistart + 17807] = 0.0 - k[656]*y_cur[IDX_OII]; - data[jistart + 17808] = 0.0 - k[657]*y_cur[IDX_OII] - - k[3642]*y_cur[IDX_OII] - k[3643]*y_cur[IDX_OII]; - data[jistart + 17809] = 0.0 - k[3644]*y_cur[IDX_OII] - - k[3645]*y_cur[IDX_OII]; - data[jistart + 17810] = 0.0 - k[658]*y_cur[IDX_OII] - - k[3646]*y_cur[IDX_OII]; - data[jistart + 17811] = 0.0 + k[3206]*y_cur[IDX_CNOI] + - k[3208]*y_cur[IDX_CO2I] + k[3276]*y_cur[IDX_N2OI] + - k[3286]*y_cur[IDX_NOI] + k[3290]*y_cur[IDX_O2I] + - k[3292]*y_cur[IDX_OCNI] + k[3294]*y_cur[IDX_OCSI] + - k[3297]*y_cur[IDX_OHI] + k[3306]*y_cur[IDX_SOI] + - k[3333]*y_cur[IDX_SiOI]; - data[jistart + 17812] = 0.0 + k[3358]*y_cur[IDX_O2I]; - data[jistart + 17813] = 0.0 - k[3647]*y_cur[IDX_OII]; - data[jistart + 17814] = 0.0 + k[684]*y_cur[IDX_OI]; - data[jistart + 17815] = 0.0 - k[659]*y_cur[IDX_OII] + - k[3276]*y_cur[IDX_HeII]; - data[jistart + 17816] = 0.0 - k[619]*y_cur[IDX_OII] - - k[3619]*y_cur[IDX_OII]; - data[jistart + 17817] = 0.0 - k[660]*y_cur[IDX_OII]; - data[jistart + 17818] = 0.0 - k[661]*y_cur[IDX_OII]; - data[jistart + 17819] = 0.0 + k[3286]*y_cur[IDX_HeII]; - data[jistart + 17820] = 0.0 - k[3648]*y_cur[IDX_OII]; - data[jistart + 17821] = 0.0 + k[406]*y_cur[IDX_HII] + - k[681]*y_cur[IDX_CNII] + k[682]*y_cur[IDX_COII] + - k[683]*y_cur[IDX_CO2II] + k[684]*y_cur[IDX_N2II] + k[5685] + k[5900] - + k[6301]; - data[jistart + 17822] = 0.0 - k[266]*y_cur[IDX_CH2I] - - k[295]*y_cur[IDX_CHI] - k[492]*y_cur[IDX_HI] - k[619]*y_cur[IDX_NHI] - - k[646]*y_cur[IDX_C2I] - k[647]*y_cur[IDX_C2H2I] - - k[648]*y_cur[IDX_C2H4I] - k[649]*y_cur[IDX_C2HI] - - k[650]*y_cur[IDX_CH3CNI] - k[651]*y_cur[IDX_CH3OHI] - - k[652]*y_cur[IDX_CH4I] - k[653]*y_cur[IDX_COI] - - k[654]*y_cur[IDX_FeI] - k[655]*y_cur[IDX_H2COI] - - k[656]*y_cur[IDX_H2OI] - k[657]*y_cur[IDX_H2SI] - - k[658]*y_cur[IDX_HCOI] - k[659]*y_cur[IDX_N2OI] - - k[660]*y_cur[IDX_NH2I] - k[661]*y_cur[IDX_NH3I] - - k[662]*y_cur[IDX_O2I] - k[663]*y_cur[IDX_OCSI] - - k[664]*y_cur[IDX_OHI] - k[665]*y_cur[IDX_SO2I] - - k[2261]*y_cur[IDX_CHI] - k[2466]*y_cur[IDX_H2I] - - k[3619]*y_cur[IDX_NHI] - k[3631]*y_cur[IDX_C2I] - - k[3632]*y_cur[IDX_C2H4I] - k[3633]*y_cur[IDX_C2H4I] - - k[3634]*y_cur[IDX_C2HI] - k[3635]*y_cur[IDX_CH3CNI] - - k[3636]*y_cur[IDX_CH3OHI] - k[3637]*y_cur[IDX_CH3OHI] - - k[3638]*y_cur[IDX_CH4I] - k[3639]*y_cur[IDX_CNI] - - k[3640]*y_cur[IDX_CO2I] - k[3641]*y_cur[IDX_H2COI] - - k[3642]*y_cur[IDX_H2SI] - k[3643]*y_cur[IDX_H2SI] - - k[3644]*y_cur[IDX_HCNI] - k[3645]*y_cur[IDX_HCNI] - - k[3646]*y_cur[IDX_HCOI] - k[3647]*y_cur[IDX_N2I] - - k[3648]*y_cur[IDX_NO2I] - k[3649]*y_cur[IDX_OCSI] - - k[3650]*y_cur[IDX_OHI] - k[3651]*y_cur[IDX_SO2I] - - k[3914]*y_cur[IDX_CM] - k[3949]*y_cur[IDX_C10M] - - k[3984]*y_cur[IDX_C10HM] - k[4019]*y_cur[IDX_C2M] - - k[4054]*y_cur[IDX_C2HM] - k[4089]*y_cur[IDX_C3M] - - k[4124]*y_cur[IDX_C3HM] - k[4159]*y_cur[IDX_C3NM] - - k[4194]*y_cur[IDX_C4M] - k[4229]*y_cur[IDX_C4HM] - - k[4264]*y_cur[IDX_C5M] - k[4299]*y_cur[IDX_C5HM] - - k[4334]*y_cur[IDX_C5NM] - k[4369]*y_cur[IDX_C6M] - - k[4404]*y_cur[IDX_C6HM] - k[4439]*y_cur[IDX_C7M] - - k[4474]*y_cur[IDX_C7HM] - k[4509]*y_cur[IDX_C8M] - - k[4544]*y_cur[IDX_C8HM] - k[4579]*y_cur[IDX_C9M] - - k[4614]*y_cur[IDX_C9HM] - k[4649]*y_cur[IDX_CHM] - - k[4684]*y_cur[IDX_CNM] - k[4720]*y_cur[IDX_HM] - - k[4755]*y_cur[IDX_OM] - k[4790]*y_cur[IDX_O2M] - - k[4825]*y_cur[IDX_OHM] - k[4860]*y_cur[IDX_SM] - - k[5525]*y_cur[IDX_CI] - k[5623]*y_cur[IDX_eM] - - k[6326]*y_cur[IDX_GRAINM]; - data[jistart + 17823] = 0.0 - k[4755]*y_cur[IDX_OII]; - data[jistart + 17824] = 0.0 - k[662]*y_cur[IDX_OII] + - k[1423]*y_cur[IDX_CII] + k[1968]*y_cur[IDX_CHII] + - k[3290]*y_cur[IDX_HeII] + k[3358]*y_cur[IDX_NII]; - data[jistart + 17825] = 0.0 + k[6233]; - data[jistart + 17826] = 0.0 - k[4790]*y_cur[IDX_OII]; - data[jistart + 17827] = 0.0 + k[3292]*y_cur[IDX_HeII]; - data[jistart + 17828] = 0.0 - k[663]*y_cur[IDX_OII] + - k[3294]*y_cur[IDX_HeII] - k[3649]*y_cur[IDX_OII]; - data[jistart + 17829] = 0.0 - k[664]*y_cur[IDX_OII] + - k[3297]*y_cur[IDX_HeII] - k[3650]*y_cur[IDX_OII]; - data[jistart + 17830] = 0.0 + k[6242]; - data[jistart + 17831] = 0.0 - k[4825]*y_cur[IDX_OII]; - data[jistart + 17832] = 0.0 - k[4860]*y_cur[IDX_OII]; - data[jistart + 17833] = 0.0 + k[3306]*y_cur[IDX_HeII]; - data[jistart + 17834] = 0.0 - k[665]*y_cur[IDX_OII] - - k[3651]*y_cur[IDX_OII]; - data[jistart + 17835] = 0.0 + k[3333]*y_cur[IDX_HeII]; - data[jistart + 17836] = 0.0 - k[5623]*y_cur[IDX_OII]; - data[jistart + 17837] = 0.0 - k[56]*y_cur[IDX_OM]; - data[jistart + 17838] = 0.0 - k[4727]*y_cur[IDX_OM]; - data[jistart + 17839] = 0.0 + k[1450]*y_cur[IDX_O2I]; - data[jistart + 17840] = 0.0 - k[4728]*y_cur[IDX_OM]; - data[jistart + 17841] = 0.0 - k[4729]*y_cur[IDX_OM]; - data[jistart + 17842] = 0.0 - k[4730]*y_cur[IDX_OM]; - data[jistart + 17843] = 0.0 - k[4731]*y_cur[IDX_OM]; - data[jistart + 17844] = 0.0 - k[4732]*y_cur[IDX_OM]; - data[jistart + 17845] = 0.0 - k[62]*y_cur[IDX_OM]; - data[jistart + 17846] = 0.0 - k[59]*y_cur[IDX_OM]; - data[jistart + 17847] = 0.0 - k[4733]*y_cur[IDX_OM]; - data[jistart + 17848] = 0.0 - k[4734]*y_cur[IDX_OM]; - data[jistart + 17849] = 0.0 - k[3652]*y_cur[IDX_OM]; - data[jistart + 17850] = 0.0 - k[666]*y_cur[IDX_OM]; - data[jistart + 17851] = 0.0 - k[4735]*y_cur[IDX_OM]; - data[jistart + 17852] = 0.0 - k[124]*y_cur[IDX_OM]; - data[jistart + 17853] = 0.0 - k[4736]*y_cur[IDX_OM]; - data[jistart + 17854] = 0.0 - k[107]*y_cur[IDX_OM]; - data[jistart + 17855] = 0.0 - k[4737]*y_cur[IDX_OM]; - data[jistart + 17856] = 0.0 - k[83]*y_cur[IDX_OM] - - k[2467]*y_cur[IDX_OM]; - data[jistart + 17857] = 0.0 - k[4738]*y_cur[IDX_OM]; - data[jistart + 17858] = 0.0 - k[4739]*y_cur[IDX_OM]; - data[jistart + 17859] = 0.0 - k[4740]*y_cur[IDX_OM]; - data[jistart + 17860] = 0.0 - k[4741]*y_cur[IDX_OM]; - data[jistart + 17861] = 0.0 - k[4742]*y_cur[IDX_OM]; - data[jistart + 17862] = 0.0 - k[3653]*y_cur[IDX_OM]; - data[jistart + 17863] = 0.0 - k[4743]*y_cur[IDX_OM] - - k[4744]*y_cur[IDX_OM]; - data[jistart + 17864] = 0.0 - k[4745]*y_cur[IDX_OM] - - k[4746]*y_cur[IDX_OM]; - data[jistart + 17865] = 0.0 - k[4747]*y_cur[IDX_OM]; - data[jistart + 17866] = 0.0 - k[4748]*y_cur[IDX_OM]; - data[jistart + 17867] = 0.0 - k[122]*y_cur[IDX_OM]; - data[jistart + 17868] = 0.0 - k[4749]*y_cur[IDX_OM]; - data[jistart + 17869] = 0.0 - k[4750]*y_cur[IDX_OM]; - data[jistart + 17870] = 0.0 - k[4751]*y_cur[IDX_OM]; - data[jistart + 17871] = 0.0 - k[4752]*y_cur[IDX_OM]; - data[jistart + 17872] = 0.0 - k[125]*y_cur[IDX_OM]; - data[jistart + 17873] = 0.0 - k[4753]*y_cur[IDX_OM]; - data[jistart + 17874] = 0.0 - k[4754]*y_cur[IDX_OM]; - data[jistart + 17875] = 0.0 - k[126]*y_cur[IDX_OM] + - k[5609]*y_cur[IDX_eM]; - data[jistart + 17876] = 0.0 - k[4755]*y_cur[IDX_OM]; - data[jistart + 17877] = 0.0 - k[56]*y_cur[IDX_CI] - - k[59]*y_cur[IDX_CH2I] - k[62]*y_cur[IDX_CHI] - k[83]*y_cur[IDX_H2I] - - k[107]*y_cur[IDX_HI] - k[122]*y_cur[IDX_NI] - - k[124]*y_cur[IDX_COI] - k[125]*y_cur[IDX_NOI] - k[126]*y_cur[IDX_OI] - - k[666]*y_cur[IDX_CNI] - k[667]*y_cur[IDX_O2I] - - k[2467]*y_cur[IDX_H2I] - k[3652]*y_cur[IDX_CH4I] - - k[3653]*y_cur[IDX_HCNI] - k[4727]*y_cur[IDX_CII] - - k[4728]*y_cur[IDX_C2H2II] - k[4729]*y_cur[IDX_C2H3II] - - k[4730]*y_cur[IDX_C4H2II] - k[4731]*y_cur[IDX_C4H3II] - - k[4732]*y_cur[IDX_C4SII] - k[4733]*y_cur[IDX_CH2CCHII] - - k[4734]*y_cur[IDX_CH3II] - k[4735]*y_cur[IDX_CNCII] - - k[4736]*y_cur[IDX_FeII] - k[4737]*y_cur[IDX_HII] - - k[4738]*y_cur[IDX_H2COII] - k[4739]*y_cur[IDX_H2SII] - - k[4740]*y_cur[IDX_H3II] - k[4741]*y_cur[IDX_H3OII] - - k[4742]*y_cur[IDX_HC2SII] - k[4743]*y_cur[IDX_HCNHII] - - k[4744]*y_cur[IDX_HCNHII] - k[4745]*y_cur[IDX_HCOII] - - k[4746]*y_cur[IDX_HCOII] - k[4747]*y_cur[IDX_HeII] - - k[4748]*y_cur[IDX_MgII] - k[4749]*y_cur[IDX_NII] - - k[4750]*y_cur[IDX_N2HII] - k[4751]*y_cur[IDX_NH3II] - - k[4752]*y_cur[IDX_NH4II] - k[4753]*y_cur[IDX_NOII] - - k[4754]*y_cur[IDX_NaII] - k[4755]*y_cur[IDX_OII] - - k[4756]*y_cur[IDX_SII] - k[4757]*y_cur[IDX_SOII] - - k[4758]*y_cur[IDX_SiII] - k[4759]*y_cur[IDX_SiOII] - - k[4760]*y_cur[IDX_SiOHII] - k[4761]*y_cur[IDX_SiSII] - k[5895] - - k[6232]; - data[jistart + 17878] = 0.0 - k[667]*y_cur[IDX_OM] + - k[1450]*y_cur[IDX_CM]; - data[jistart + 17879] = 0.0 - k[4756]*y_cur[IDX_OM]; - data[jistart + 17880] = 0.0 - k[4757]*y_cur[IDX_OM]; - data[jistart + 17881] = 0.0 - k[4758]*y_cur[IDX_OM]; - data[jistart + 17882] = 0.0 - k[4759]*y_cur[IDX_OM]; - data[jistart + 17883] = 0.0 - k[4760]*y_cur[IDX_OM]; - data[jistart + 17884] = 0.0 - k[4761]*y_cur[IDX_OM]; - data[jistart + 17885] = 0.0 + k[5609]*y_cur[IDX_OI]; - data[jistart + 17886] = 0.0 + k[248]*y_cur[IDX_O2II] + - k[1913]*y_cur[IDX_O2HII] - k[4978]*y_cur[IDX_O2I]; - data[jistart + 17887] = 0.0 - k[1422]*y_cur[IDX_O2I] - - k[1423]*y_cur[IDX_O2I] + k[4762]*y_cur[IDX_O2M]; - data[jistart + 17888] = 0.0 - k[7]*y_cur[IDX_O2I] - - k[1450]*y_cur[IDX_O2I]; - data[jistart + 17889] = 0.0 + k[211]*y_cur[IDX_O2II] + - k[1463]*y_cur[IDX_O2HII] - k[4874]*y_cur[IDX_O2I]; - data[jistart + 17890] = 0.0 - k[1455]*y_cur[IDX_O2I]; - data[jistart + 17891] = 0.0 + k[1749]*y_cur[IDX_O2HII] - - k[4904]*y_cur[IDX_O2I]; - data[jistart + 17892] = 0.0 + k[668]*y_cur[IDX_O2II]; - data[jistart + 17893] = 0.0 + k[4763]*y_cur[IDX_O2M]; - data[jistart + 17894] = 0.0 - k[4881]*y_cur[IDX_O2I] - - k[4882]*y_cur[IDX_O2I]; - data[jistart + 17895] = 0.0 + k[4764]*y_cur[IDX_O2M]; - data[jistart + 17896] = 0.0 + k[240]*y_cur[IDX_O2II]; - data[jistart + 17897] = 0.0 - k[3668]*y_cur[IDX_O2I]; - data[jistart + 17898] = 0.0 - k[3669]*y_cur[IDX_O2I] - - k[3670]*y_cur[IDX_O2I] - k[3671]*y_cur[IDX_O2I]; - data[jistart + 17899] = 0.0 + k[4765]*y_cur[IDX_O2M]; - data[jistart + 17900] = 0.0 + k[4766]*y_cur[IDX_O2M]; - data[jistart + 17901] = 0.0 + k[4767]*y_cur[IDX_O2M]; - data[jistart + 17902] = 0.0 + k[296]*y_cur[IDX_O2II] + - k[2263]*y_cur[IDX_O2HII] - k[5086]*y_cur[IDX_O2I] - - k[5087]*y_cur[IDX_O2I] - k[5088]*y_cur[IDX_O2I] - - k[5089]*y_cur[IDX_O2I] - k[5090]*y_cur[IDX_O2I] - - k[5091]*y_cur[IDX_O2I] - k[5092]*y_cur[IDX_O2I] - - k[5093]*y_cur[IDX_O2I] + k[5095]*y_cur[IDX_O2HI]; - data[jistart + 17903] = 0.0 - k[1966]*y_cur[IDX_O2I] - - k[1967]*y_cur[IDX_O2I] - k[1968]*y_cur[IDX_O2I]; - data[jistart + 17904] = 0.0 + k[267]*y_cur[IDX_O2II] + - k[2015]*y_cur[IDX_O2HII] - k[5007]*y_cur[IDX_O2I] - - k[5008]*y_cur[IDX_O2I] - k[5009]*y_cur[IDX_O2I] - - k[5010]*y_cur[IDX_O2I] - k[5011]*y_cur[IDX_O2I]; - data[jistart + 17905] = 0.0 - k[1990]*y_cur[IDX_O2I]; - data[jistart + 17906] = 0.0 + k[4768]*y_cur[IDX_O2M]; - data[jistart + 17907] = 0.0 + k[669]*y_cur[IDX_O2II]; - data[jistart + 17908] = 0.0 - k[5039]*y_cur[IDX_O2I] - - k[5040]*y_cur[IDX_O2I] - k[5041]*y_cur[IDX_O2I] + - k[5042]*y_cur[IDX_O2HI]; - data[jistart + 17909] = 0.0 - k[2089]*y_cur[IDX_O2I] + - k[4769]*y_cur[IDX_O2M]; - data[jistart + 17910] = 0.0 + k[670]*y_cur[IDX_O2II]; - data[jistart + 17911] = 0.0 + k[671]*y_cur[IDX_O2II]; - data[jistart + 17912] = 0.0 + k[672]*y_cur[IDX_O2II] + - k[3665]*y_cur[IDX_O2II]; - data[jistart + 17913] = 0.0 - k[5060]*y_cur[IDX_O2I]; - data[jistart + 17914] = 0.0 - k[283]*y_cur[IDX_O2I]; - data[jistart + 17915] = 0.0 + k[2279]*y_cur[IDX_O2HII] - - k[5123]*y_cur[IDX_O2I] - k[5124]*y_cur[IDX_O2I]; - data[jistart + 17916] = 0.0 - k[304]*y_cur[IDX_O2I] - - k[2275]*y_cur[IDX_O2I] - k[2276]*y_cur[IDX_O2I]; - data[jistart + 17917] = 0.0 + k[4770]*y_cur[IDX_O2M]; - data[jistart + 17918] = 0.0 + k[2289]*y_cur[IDX_O2HII] - - k[5130]*y_cur[IDX_O2I]; - data[jistart + 17919] = 0.0 - k[312]*y_cur[IDX_O2I]; - data[jistart + 17920] = 0.0 + k[3210]*y_cur[IDX_HeII] + - k[3677]*y_cur[IDX_O2HII] + k[5390]*y_cur[IDX_OI]; - data[jistart + 17921] = 0.0 - k[678]*y_cur[IDX_O2I]; - data[jistart + 17922] = 0.0 - k[3672]*y_cur[IDX_O2I]; - data[jistart + 17923] = 0.0 - k[679]*y_cur[IDX_O2I]; - data[jistart + 17924] = 0.0 + k[5394]*y_cur[IDX_OI]; - data[jistart + 17925] = 0.0 + k[673]*y_cur[IDX_O2II]; - data[jistart + 17926] = 0.0 + k[4771]*y_cur[IDX_O2M]; - data[jistart + 17927] = 0.0 + k[8689]*y_cur[IDX_GOI] + - k[8689]*y_cur[IDX_GOI]; - data[jistart + 17928] = 0.0 + k[7116] + k[7298] + k[7480]; - data[jistart + 17929] = 0.0 + k[6437]*y_cur[IDX_O2HII]; - data[jistart + 17930] = 0.0 - k[144]*y_cur[IDX_O2I] - - k[5190]*y_cur[IDX_O2I] + k[5192]*y_cur[IDX_O2HI]; - data[jistart + 17931] = 0.0 - k[405]*y_cur[IDX_O2I] + - k[4772]*y_cur[IDX_O2M]; - data[jistart + 17932] = 0.0 - k[138]*y_cur[IDX_O2I] + - k[2468]*y_cur[IDX_O2HII] - k[5144]*y_cur[IDX_O2I] - - k[5145]*y_cur[IDX_O2I]; - data[jistart + 17933] = 0.0 - k[455]*y_cur[IDX_O2I] - - k[2395]*y_cur[IDX_O2I]; - data[jistart + 17934] = 0.0 + k[461]*y_cur[IDX_O2II] + - k[2498]*y_cur[IDX_O2II] + k[2499]*y_cur[IDX_O2HII]; - data[jistart + 17935] = 0.0 - k[2489]*y_cur[IDX_O2I] + - k[4773]*y_cur[IDX_O2M]; - data[jistart + 17936] = 0.0 + k[2561]*y_cur[IDX_O2HII]; - data[jistart + 17937] = 0.0 - k[474]*y_cur[IDX_O2I]; - data[jistart + 17938] = 0.0 + k[674]*y_cur[IDX_O2II]; - data[jistart + 17939] = 0.0 + k[4774]*y_cur[IDX_O2M]; - data[jistart + 17940] = 0.0 - k[2729]*y_cur[IDX_O2I] + - k[4775]*y_cur[IDX_O2M]; - data[jistart + 17941] = 0.0 + k[4776]*y_cur[IDX_O2M]; - data[jistart + 17942] = 0.0 + k[4777]*y_cur[IDX_O2M]; - data[jistart + 17943] = 0.0 + k[2883]*y_cur[IDX_O2HII]; - data[jistart + 17944] = 0.0 - k[495]*y_cur[IDX_O2I]; - data[jistart + 17945] = 0.0 + k[4778]*y_cur[IDX_O2M] + - k[4779]*y_cur[IDX_O2M]; - data[jistart + 17946] = 0.0 + k[502]*y_cur[IDX_O2II] + - k[3011]*y_cur[IDX_O2HII] - k[5208]*y_cur[IDX_O2I] - - k[5209]*y_cur[IDX_O2I] + k[5210]*y_cur[IDX_O2HI]; - data[jistart + 17947] = 0.0 + k[4780]*y_cur[IDX_O2M] + - k[4781]*y_cur[IDX_O2M]; - data[jistart + 17948] = 0.0 + k[3736]*y_cur[IDX_OI]; - data[jistart + 17949] = 0.0 + k[675]*y_cur[IDX_O2II]; - data[jistart + 17950] = 0.0 + k[3045]*y_cur[IDX_O2HII]; - data[jistart + 17951] = 0.0 + k[5413]*y_cur[IDX_OI]; - data[jistart + 17952] = 0.0 + k[3741]*y_cur[IDX_OI]; - data[jistart + 17953] = 0.0 - k[525]*y_cur[IDX_O2I] + - k[3210]*y_cur[IDX_CO2I] - k[3290]*y_cur[IDX_O2I] + - k[3303]*y_cur[IDX_SO2I] + k[3331]*y_cur[IDX_SiO2I] + - k[4782]*y_cur[IDX_O2M]; - data[jistart + 17954] = 0.0 + k[537]*y_cur[IDX_O2II]; - data[jistart + 17955] = 0.0 + k[4783]*y_cur[IDX_O2M]; - data[jistart + 17956] = 0.0 + k[5278]*y_cur[IDX_NO2I] - - k[5281]*y_cur[IDX_O2I] + k[5282]*y_cur[IDX_O2HI]; - data[jistart + 17957] = 0.0 - k[561]*y_cur[IDX_O2I] - - k[3357]*y_cur[IDX_O2I] - k[3358]*y_cur[IDX_O2I] + - k[4784]*y_cur[IDX_O2M]; - data[jistart + 17958] = 0.0 + k[3367]*y_cur[IDX_O2HII] - - k[5220]*y_cur[IDX_O2I]; - data[jistart + 17959] = 0.0 - k[570]*y_cur[IDX_O2I]; - data[jistart + 17960] = 0.0 + k[4785]*y_cur[IDX_O2M]; - data[jistart + 17961] = 0.0 + k[5419]*y_cur[IDX_OI]; - data[jistart + 17962] = 0.0 + k[3622]*y_cur[IDX_O2HII] - - k[5316]*y_cur[IDX_O2I] - k[5317]*y_cur[IDX_O2I]; - data[jistart + 17963] = 0.0 - k[578]*y_cur[IDX_O2I] - - k[3501]*y_cur[IDX_O2I] - k[3502]*y_cur[IDX_O2I]; - data[jistart + 17964] = 0.0 + k[590]*y_cur[IDX_O2II] + - k[3546]*y_cur[IDX_O2HII]; - data[jistart + 17965] = 0.0 - k[3524]*y_cur[IDX_O2I] - - k[3525]*y_cur[IDX_O2I]; - data[jistart + 17966] = 0.0 + k[611]*y_cur[IDX_O2II] + - k[3594]*y_cur[IDX_O2HII]; - data[jistart + 17967] = 0.0 + k[4786]*y_cur[IDX_O2M]; - data[jistart + 17968] = 0.0 + k[4787]*y_cur[IDX_O2M]; - data[jistart + 17969] = 0.0 + k[628]*y_cur[IDX_O2II] + - k[3627]*y_cur[IDX_O2HII] + k[5329]*y_cur[IDX_NOI] + - k[5329]*y_cur[IDX_NOI] - k[5330]*y_cur[IDX_O2I] + - k[5424]*y_cur[IDX_OI]; - data[jistart + 17970] = 0.0 + k[4788]*y_cur[IDX_O2M]; - data[jistart + 17971] = 0.0 + k[676]*y_cur[IDX_O2II] + - k[3648]*y_cur[IDX_OII] + k[5278]*y_cur[IDX_NI] + - k[5423]*y_cur[IDX_OI]; - data[jistart + 17972] = 0.0 + k[642]*y_cur[IDX_O2II]; - data[jistart + 17973] = 0.0 + k[4789]*y_cur[IDX_O2M]; - data[jistart + 17974] = 0.0 + k[126]*y_cur[IDX_OM] + - k[3736]*y_cur[IDX_HCO2II] + k[3741]*y_cur[IDX_HPOII] + - k[3749]*y_cur[IDX_O2HII] + k[3764]*y_cur[IDX_SiOII] + - k[5390]*y_cur[IDX_CO2I] + k[5394]*y_cur[IDX_ClOI] + - k[5413]*y_cur[IDX_HNOI] + k[5419]*y_cur[IDX_N2OI] + - k[5423]*y_cur[IDX_NO2I] + k[5424]*y_cur[IDX_NOI] + - k[5427]*y_cur[IDX_O2HI] + k[5429]*y_cur[IDX_OCNI] + - k[5432]*y_cur[IDX_OHI] + k[5438]*y_cur[IDX_SO2I] + - k[5439]*y_cur[IDX_SOI] + k[5582]*y_cur[IDX_OI] + - k[5582]*y_cur[IDX_OI]; - data[jistart + 17975] = 0.0 - k[662]*y_cur[IDX_O2I] + - k[3648]*y_cur[IDX_NO2I] + k[3651]*y_cur[IDX_SO2I] + - k[4790]*y_cur[IDX_O2M]; - data[jistart + 17976] = 0.0 + k[126]*y_cur[IDX_OI] - - k[667]*y_cur[IDX_O2I]; - data[jistart + 17977] = 0.0 - k[7]*y_cur[IDX_CM] - - k[127]*y_cur[IDX_SM] - k[138]*y_cur[IDX_H2I] - k[144]*y_cur[IDX_HI] - - k[146]*y_cur[IDX_O2M] + k[146]*y_cur[IDX_O2M] + - k[146]*y_cur[IDX_O2M] - k[283]*y_cur[IDX_CH4II] - - k[304]*y_cur[IDX_CNII] - k[312]*y_cur[IDX_COII] - - k[405]*y_cur[IDX_HII] - k[455]*y_cur[IDX_H2II] - - k[474]*y_cur[IDX_H2OII] - k[495]*y_cur[IDX_HCNII] - - k[525]*y_cur[IDX_HeII] - k[561]*y_cur[IDX_NII] - - k[570]*y_cur[IDX_N2II] - k[578]*y_cur[IDX_NHII] - - k[662]*y_cur[IDX_OII] - k[667]*y_cur[IDX_OM] - - k[678]*y_cur[IDX_CO2II] - k[679]*y_cur[IDX_ClII] - - k[680]*y_cur[IDX_SO2II] - k[694]*y_cur[IDX_OHII] - - k[1422]*y_cur[IDX_CII] - k[1423]*y_cur[IDX_CII] - - k[1450]*y_cur[IDX_CM] - k[1455]*y_cur[IDX_C2II] - - k[1966]*y_cur[IDX_CHII] - k[1967]*y_cur[IDX_CHII] - - k[1968]*y_cur[IDX_CHII] - k[1990]*y_cur[IDX_CH2II] - - k[2089]*y_cur[IDX_CH3II] - k[2275]*y_cur[IDX_CNII] - - k[2276]*y_cur[IDX_CNII] - k[2395]*y_cur[IDX_H2II] - - k[2489]*y_cur[IDX_H2COII] - k[2729]*y_cur[IDX_H3II] - - k[3290]*y_cur[IDX_HeII] - k[3357]*y_cur[IDX_NII] - - k[3358]*y_cur[IDX_NII] - k[3501]*y_cur[IDX_NHII] - - k[3502]*y_cur[IDX_NHII] - k[3524]*y_cur[IDX_NH2II] - - k[3525]*y_cur[IDX_NH2II] - k[3668]*y_cur[IDX_C3II] - - k[3669]*y_cur[IDX_C3HII] - k[3670]*y_cur[IDX_C3HII] - - k[3671]*y_cur[IDX_C3HII] - k[3672]*y_cur[IDX_CSII] - - k[3673]*y_cur[IDX_PH2II] - k[3674]*y_cur[IDX_SII] - - k[3675]*y_cur[IDX_SiSII] - k[3676]*y_cur[IDX_SiSII] - - k[3812]*y_cur[IDX_PII] - k[3818]*y_cur[IDX_PHII] - - k[3882]*y_cur[IDX_SiH2II] - k[3884]*y_cur[IDX_SiH3II] - - k[4874]*y_cur[IDX_C2I] - k[4881]*y_cur[IDX_C2H3I] - - k[4882]*y_cur[IDX_C2H3I] - k[4904]*y_cur[IDX_C2HI] - - k[4978]*y_cur[IDX_CI] - k[5007]*y_cur[IDX_CH2I] - - k[5008]*y_cur[IDX_CH2I] - k[5009]*y_cur[IDX_CH2I] - - k[5010]*y_cur[IDX_CH2I] - k[5011]*y_cur[IDX_CH2I] - - k[5039]*y_cur[IDX_CH3I] - k[5040]*y_cur[IDX_CH3I] - - k[5041]*y_cur[IDX_CH3I] - k[5060]*y_cur[IDX_CH4I] - - k[5086]*y_cur[IDX_CHI] - k[5087]*y_cur[IDX_CHI] - - k[5088]*y_cur[IDX_CHI] - k[5089]*y_cur[IDX_CHI] - - k[5090]*y_cur[IDX_CHI] - k[5091]*y_cur[IDX_CHI] - - k[5092]*y_cur[IDX_CHI] - k[5093]*y_cur[IDX_CHI] - - k[5123]*y_cur[IDX_CNI] - k[5124]*y_cur[IDX_CNI] - - k[5130]*y_cur[IDX_COI] - k[5144]*y_cur[IDX_H2I] - - k[5145]*y_cur[IDX_H2I] - k[5190]*y_cur[IDX_HI] - - k[5208]*y_cur[IDX_HCOI] - k[5209]*y_cur[IDX_HCOI] - - k[5220]*y_cur[IDX_N2I] - k[5281]*y_cur[IDX_NI] - - k[5316]*y_cur[IDX_NHI] - k[5317]*y_cur[IDX_NHI] - - k[5330]*y_cur[IDX_NOI] - k[5335]*y_cur[IDX_OCNI] - - k[5336]*y_cur[IDX_OCNI] - k[5337]*y_cur[IDX_SI] - - k[5338]*y_cur[IDX_SOI] - k[5484]*y_cur[IDX_PI] - - k[5494]*y_cur[IDX_SiI] - k[5897] - k[5898] - k[6235] - k[6236] - - k[6934]; - data[jistart + 17978] = 0.0 + k[211]*y_cur[IDX_C2I] + - k[240]*y_cur[IDX_C2H4I] + k[248]*y_cur[IDX_CI] + - k[267]*y_cur[IDX_CH2I] + k[296]*y_cur[IDX_CHI] + - k[461]*y_cur[IDX_H2COI] + k[502]*y_cur[IDX_HCOI] + - k[537]*y_cur[IDX_MgI] + k[590]*y_cur[IDX_NH2I] + - k[611]*y_cur[IDX_NH3I] + k[628]*y_cur[IDX_NOI] + - k[642]*y_cur[IDX_NaI] + k[668]*y_cur[IDX_C2H2I] + - k[669]*y_cur[IDX_CH2CCH2I] + k[670]*y_cur[IDX_CH3CHCH2I] + - k[671]*y_cur[IDX_CH3OCH3I] + k[672]*y_cur[IDX_CH3OHI] + - k[673]*y_cur[IDX_FeI] + k[674]*y_cur[IDX_H2SI] + - k[675]*y_cur[IDX_HCOOHI] + k[676]*y_cur[IDX_NO2I] + - k[677]*y_cur[IDX_SI] + k[722]*y_cur[IDX_SiI] + - k[2498]*y_cur[IDX_H2COI] + k[3665]*y_cur[IDX_CH3OHI]; - data[jistart + 17979] = 0.0 - k[146]*y_cur[IDX_O2I] + - k[146]*y_cur[IDX_O2I] + k[146]*y_cur[IDX_O2I] + - k[4762]*y_cur[IDX_CII] + k[4763]*y_cur[IDX_C2H2II] + - k[4764]*y_cur[IDX_C2H3II] + k[4765]*y_cur[IDX_C4H2II] + - k[4766]*y_cur[IDX_C4H3II] + k[4767]*y_cur[IDX_C4SII] + - k[4768]*y_cur[IDX_CH2CCHII] + k[4769]*y_cur[IDX_CH3II] + - k[4770]*y_cur[IDX_CNCII] + k[4771]*y_cur[IDX_FeII] + - k[4772]*y_cur[IDX_HII] + k[4773]*y_cur[IDX_H2COII] + - k[4774]*y_cur[IDX_H2SII] + k[4775]*y_cur[IDX_H3II] + + k[6532]*y_cur[IDX_HCNOHII] + k[6533]*y_cur[IDX_HCNOHII] + + k[6534]*y_cur[IDX_HCNOHII] + k[6535]*y_cur[IDX_CSII] + + k[6536]*y_cur[IDX_H2CNOII] + k[6537]*y_cur[IDX_H2CNOII] + + k[6538]*y_cur[IDX_H2NCOII] + k[6539]*y_cur[IDX_H2NCOII] + + k[6540]*y_cur[IDX_CO2II] + k[6541]*y_cur[IDX_SiCH4II] + + k[6542]*y_cur[IDX_SiCH4II] + k[6543]*y_cur[IDX_HCPII] + + k[6544]*y_cur[IDX_HCPII] + k[6545]*y_cur[IDX_H2OCNII] + + k[6546]*y_cur[IDX_H2OCNII] + k[6547]*y_cur[IDX_CH3CHOII] + + k[6548]*y_cur[IDX_CH3CHOII] + k[6549]*y_cur[IDX_HNCOHII] + + k[6550]*y_cur[IDX_HNCOHII] + k[6551]*y_cur[IDX_HNCOHII] + + k[6552]*y_cur[IDX_SiNH2II] + k[6553]*y_cur[IDX_SiNH2II] + + k[6554]*y_cur[IDX_HCSII] + k[6555]*y_cur[IDX_HCSII] + + k[6556]*y_cur[IDX_SiOHII] + k[6557]*y_cur[IDX_SiOHII] + + k[6558]*y_cur[IDX_HN2OII] + k[6559]*y_cur[IDX_HN2OII] + + k[6560]*y_cur[IDX_PNII] + k[6561]*y_cur[IDX_CH3CHOHII] + + k[6562]*y_cur[IDX_CH3CHOHII] + k[6563]*y_cur[IDX_CH3CHOHII] + + k[6564]*y_cur[IDX_CH3CHOHII] + k[6565]*y_cur[IDX_CH3CHOHII] + + k[6566]*y_cur[IDX_HCO2II] + k[6567]*y_cur[IDX_HCO2II] + + k[6568]*y_cur[IDX_HCO2II] + k[6569]*y_cur[IDX_PCH2II] + + k[6570]*y_cur[IDX_PCH2II] + k[6571]*y_cur[IDX_HPNII] + + k[6572]*y_cur[IDX_HPNII] + k[6573]*y_cur[IDX_HPNII] + + k[6574]*y_cur[IDX_HCOOHII] + k[6575]*y_cur[IDX_HCOOHII] + + k[6576]*y_cur[IDX_C2H5OHII] + k[6577]*y_cur[IDX_C2H5OHII] + + k[6578]*y_cur[IDX_PCH3II] + k[6579]*y_cur[IDX_PCH3II] + + k[6580]*y_cur[IDX_PCH3II] + k[6581]*y_cur[IDX_NSII] + + k[6582]*y_cur[IDX_H2CSII] + k[6583]*y_cur[IDX_H2CSII] + + k[6584]*y_cur[IDX_NO2II] + k[6585]*y_cur[IDX_H2SiOII] + + k[6586]*y_cur[IDX_H2SiOII] + k[6587]*y_cur[IDX_CH3OCH3II] + + k[6588]*y_cur[IDX_CH3OCH3II] + k[6589]*y_cur[IDX_HNSII] + + k[6590]*y_cur[IDX_H3SiOII] + k[6591]*y_cur[IDX_H3SiOII] + + k[6592]*y_cur[IDX_SiFII] + k[6593]*y_cur[IDX_PNH2II] + + k[6594]*y_cur[IDX_PNH2II] + k[6595]*y_cur[IDX_PNH2II] + + k[6596]*y_cur[IDX_PCH4II] + k[6597]*y_cur[IDX_PCH4II] + + k[6598]*y_cur[IDX_PCH4II] + k[6599]*y_cur[IDX_CClII] + + k[6600]*y_cur[IDX_POII] + k[6601]*y_cur[IDX_H3CSII] + + k[6602]*y_cur[IDX_H3CSII] + k[6603]*y_cur[IDX_CH3OCH4II] + + k[6604]*y_cur[IDX_CH3OCH4II] + k[6605]*y_cur[IDX_CH3OCH4II] + + k[6606]*y_cur[IDX_C2H5OH2II] + k[6607]*y_cur[IDX_C2H5OH2II] + + k[6608]*y_cur[IDX_C2H5OH2II] + k[6609]*y_cur[IDX_C2H5OH2II] + + k[6610]*y_cur[IDX_HCOOH2II] + k[6611]*y_cur[IDX_HCOOH2II] + + k[6612]*y_cur[IDX_HPOII] + k[6613]*y_cur[IDX_HPOII] + + k[6614]*y_cur[IDX_HPOII] + k[6615]*y_cur[IDX_C4II] + + k[6616]*y_cur[IDX_C4II] + k[6617]*y_cur[IDX_PNH3II] + + k[6618]*y_cur[IDX_PNH3II] + k[6619]*y_cur[IDX_PNH3II] + + k[6620]*y_cur[IDX_SOII] + k[6621]*y_cur[IDX_C4HII] + + k[6622]*y_cur[IDX_H2POII] + k[6623]*y_cur[IDX_H2POII] + + k[6624]*y_cur[IDX_H2CClII] + k[6625]*y_cur[IDX_HSOII] + + k[6626]*y_cur[IDX_C3NII] + k[6627]*y_cur[IDX_C4H2II] + + k[6628]*y_cur[IDX_C4H2II] + k[6629]*y_cur[IDX_HC3NII] + + k[6630]*y_cur[IDX_HC3NII] + k[6631]*y_cur[IDX_HC3NII] + + k[6632]*y_cur[IDX_ClOII] + k[6633]*y_cur[IDX_C4H3II] + + k[6634]*y_cur[IDX_C4H3II] + k[6635]*y_cur[IDX_C2N2II] + + k[6636]*y_cur[IDX_C2N2II] + k[6637]*y_cur[IDX_HC3NHII] + + k[6638]*y_cur[IDX_HC3NHII] + k[6639]*y_cur[IDX_HC3NHII] + + k[6640]*y_cur[IDX_HC3NHII] + k[6641]*y_cur[IDX_C4H4II] + + k[6642]*y_cur[IDX_SiC2II] + k[6643]*y_cur[IDX_SiC2II] + + k[6644]*y_cur[IDX_C3OII] + k[6645]*y_cur[IDX_C4H5II] + + k[6646]*y_cur[IDX_C4H5II] + k[6647]*y_cur[IDX_C4H5II] + + k[6648]*y_cur[IDX_HC3OII] + k[6649]*y_cur[IDX_SiC2HII] + + k[6650]*y_cur[IDX_SiC2HII] + k[6651]*y_cur[IDX_CH2CHCNII] + + k[6652]*y_cur[IDX_NCCNHII] + k[6653]*y_cur[IDX_NCCNHII] + + k[6654]*y_cur[IDX_SiNCII] + k[6655]*y_cur[IDX_C3H2OII] + + k[6656]*y_cur[IDX_C3H2OII] + k[6657]*y_cur[IDX_CH2CHCNHII] + + k[6658]*y_cur[IDX_CH2CHCNHII] + k[6659]*y_cur[IDX_CH2CHCNHII] + + k[6660]*y_cur[IDX_SiC2H2II] + k[6661]*y_cur[IDX_SiC2H2II] + + k[6662]*y_cur[IDX_CCPII] + k[6663]*y_cur[IDX_CCPII] + + k[6664]*y_cur[IDX_SiC2H3II] + k[6665]*y_cur[IDX_SiC2H3II] + + k[6666]*y_cur[IDX_H3C3OII] + k[6667]*y_cur[IDX_C4H7II] + + k[6668]*y_cur[IDX_SiNCHII] + k[6669]*y_cur[IDX_SiNCHII] + + k[6670]*y_cur[IDX_FeII] + k[6671]*y_cur[IDX_C2H5CNHII] + + k[6672]*y_cur[IDX_C2H5CNHII] + k[6673]*y_cur[IDX_C2H5CNHII] + + k[6674]*y_cur[IDX_C2SII] + k[6675]*y_cur[IDX_C2SII] + + k[6676]*y_cur[IDX_HC2PII] + k[6677]*y_cur[IDX_HC2PII] + + k[6678]*y_cur[IDX_HC2SII] + k[6679]*y_cur[IDX_HC2SII] + + k[6680]*y_cur[IDX_PC2H2II] + k[6681]*y_cur[IDX_PC2H2II] + + k[6682]*y_cur[IDX_PC2H2II] + k[6683]*y_cur[IDX_CH3COCH3II] + + k[6684]*y_cur[IDX_CH3COCH3II] + k[6685]*y_cur[IDX_PC2H3II] + + k[6686]*y_cur[IDX_PC2H3II] + k[6687]*y_cur[IDX_PC2H3II] + + k[6688]*y_cur[IDX_CH3CSII] + k[6689]*y_cur[IDX_PC2H4II] + + k[6690]*y_cur[IDX_PC2H4II] + k[6691]*y_cur[IDX_PC2H4II] + + k[6692]*y_cur[IDX_CH3COCH4II] + k[6693]*y_cur[IDX_CH3COCH4II] + + k[6694]*y_cur[IDX_COOCH3II] + k[6695]*y_cur[IDX_COOCH3II] + + k[6696]*y_cur[IDX_CH2OHCOII] + k[6697]*y_cur[IDX_CH2OHCOII] + + k[6698]*y_cur[IDX_CH2OHCOII] + k[6699]*y_cur[IDX_HCOOCH3II] + + k[6700]*y_cur[IDX_HCOOCH3II] + k[6701]*y_cur[IDX_CH2OHCHOII] + + k[6702]*y_cur[IDX_CH2OHCHOII] + k[6703]*y_cur[IDX_CH2OHCHOII] + + k[6704]*y_cur[IDX_CH2OHCHOII] + k[6705]*y_cur[IDX_CH2OHCHOII] + + k[6706]*y_cur[IDX_OCSII] + k[6707]*y_cur[IDX_OCSII] + + k[6708]*y_cur[IDX_OCSII] + k[6709]*y_cur[IDX_C5II] + + k[6710]*y_cur[IDX_SiSII] + k[6711]*y_cur[IDX_CH3COOHII] + + k[6712]*y_cur[IDX_CH3COOHII] + k[6713]*y_cur[IDX_CH3COOHII] + + k[6714]*y_cur[IDX_CH3COOHII] + k[6715]*y_cur[IDX_CH3COOHII] + + k[6716]*y_cur[IDX_CH3COOHII] + k[6717]*y_cur[IDX_HOCSII] + + k[6718]*y_cur[IDX_HOCSII] + k[6719]*y_cur[IDX_HSiSII] + + k[6720]*y_cur[IDX_HSiSII] + k[6721]*y_cur[IDX_C5HII] + + k[6722]*y_cur[IDX_C5HII] + k[6723]*y_cur[IDX_HSiO2II] + + k[6724]*y_cur[IDX_HSiO2II] + k[6725]*y_cur[IDX_H5C2O2II] + + k[6726]*y_cur[IDX_H5C2O2II] + k[6727]*y_cur[IDX_CH2OHCH2OII] + + k[6728]*y_cur[IDX_CH2OHCH2OII] + k[6729]*y_cur[IDX_CH2OHCH2OII] + + k[6730]*y_cur[IDX_CH2OHCH2OII] + k[6731]*y_cur[IDX_CH3COOH2II] + + k[6732]*y_cur[IDX_CH3COOH2II] + k[6733]*y_cur[IDX_CH3COOH2II] + + k[6734]*y_cur[IDX_CH3COOH2II] + k[6735]*y_cur[IDX_CH3COOH2II] + + k[6736]*y_cur[IDX_CH3COOH2II] + k[6737]*y_cur[IDX_CH3COOH2II] + + k[6738]*y_cur[IDX_C5H2II] + k[6739]*y_cur[IDX_C5H2II] + + k[6740]*y_cur[IDX_C4NII] + k[6741]*y_cur[IDX_C4NII] + + k[6742]*y_cur[IDX_C5H3II] + k[6743]*y_cur[IDX_C5H3II] + + k[6744]*y_cur[IDX_HC4NII] + k[6745]*y_cur[IDX_H2C4NII] + + k[6746]*y_cur[IDX_SiC3II] + k[6747]*y_cur[IDX_SiC3II] + + k[6748]*y_cur[IDX_CH3C4HII] + k[6749]*y_cur[IDX_CH3C4HII] + + k[6750]*y_cur[IDX_SO2II] + k[6751]*y_cur[IDX_SO2II] + + k[6752]*y_cur[IDX_S2II] + k[6753]*y_cur[IDX_C5H5II] + + k[6754]*y_cur[IDX_C5H5II] + k[6755]*y_cur[IDX_HSO2II] + + k[6756]*y_cur[IDX_HSO2II] + k[6757]*y_cur[IDX_HSO2II] + + k[6758]*y_cur[IDX_HS2II] + k[6759]*y_cur[IDX_HS2II] + + k[6760]*y_cur[IDX_CH3C3NII] + k[6761]*y_cur[IDX_SiC3HII] + + k[6762]*y_cur[IDX_SiC3HII] + k[6763]*y_cur[IDX_H2S2II] + + k[6764]*y_cur[IDX_H2S2II] + k[6765]*y_cur[IDX_CH3C3NHII] + + k[6766]*y_cur[IDX_CH3C3NHII] + k[6767]*y_cur[IDX_SiC3H2II] + + k[6768]*y_cur[IDX_SiC3H2II] + k[6769]*y_cur[IDX_NCCNCH3II] + + k[6770]*y_cur[IDX_H3S2II] + k[6771]*y_cur[IDX_H3S2II] + + k[6772]*y_cur[IDX_PC3HII] + k[6773]*y_cur[IDX_PC3HII] + + k[6774]*y_cur[IDX_PC3HII] + k[6775]*y_cur[IDX_C3SII] + + k[6776]*y_cur[IDX_C3SII] + k[6777]*y_cur[IDX_C3SII] + + k[6778]*y_cur[IDX_HC3SII] + k[6779]*y_cur[IDX_HC3SII] + + k[6780]*y_cur[IDX_C6II] + k[6781]*y_cur[IDX_C6II] + + k[6782]*y_cur[IDX_C6HII] + k[6783]*y_cur[IDX_C6HII] + + k[6784]*y_cur[IDX_C5NII] + k[6785]*y_cur[IDX_C6H2II] + + k[6786]*y_cur[IDX_C6H2II] + k[6787]*y_cur[IDX_HC5NII] + + k[6788]*y_cur[IDX_HC5NII] + k[6789]*y_cur[IDX_C6H3II] + + k[6790]*y_cur[IDX_C6H3II] + k[6791]*y_cur[IDX_HC5NHII] + + k[6792]*y_cur[IDX_HC5NHII] + k[6793]*y_cur[IDX_HC5NHII] + + k[6794]*y_cur[IDX_HC5NHII] + k[6795]*y_cur[IDX_HC5NHII] + + k[6796]*y_cur[IDX_C6H4II] + k[6797]*y_cur[IDX_C6H4II] + + k[6798]*y_cur[IDX_SiC4II] + k[6799]*y_cur[IDX_SiC4II] + + k[6800]*y_cur[IDX_SiC4HII] + k[6801]*y_cur[IDX_SiC4HII] + + k[6802]*y_cur[IDX_C6H5II] + k[6803]*y_cur[IDX_C6H5II] + + k[6804]*y_cur[IDX_H3C5NII] + k[6805]*y_cur[IDX_H3C5NII] + + k[6806]*y_cur[IDX_C6H6II] + k[6807]*y_cur[IDX_C6H7II] + + k[6808]*y_cur[IDX_C6H7II] + k[6809]*y_cur[IDX_C4PII] + + k[6810]*y_cur[IDX_C4PII] + k[6811]*y_cur[IDX_PC4HII] + + k[6812]*y_cur[IDX_PC4HII] + k[6813]*y_cur[IDX_PC4HII] + + k[6814]*y_cur[IDX_PC4HII] + k[6815]*y_cur[IDX_C4SII] + + k[6816]*y_cur[IDX_C4SII] + k[6817]*y_cur[IDX_C4SII] + + k[6818]*y_cur[IDX_HC4SII] + k[6819]*y_cur[IDX_HC4SII] + + k[6820]*y_cur[IDX_HC4SII] + k[6821]*y_cur[IDX_C7II] + + k[6822]*y_cur[IDX_C7II] + k[6823]*y_cur[IDX_C7II] + + k[6824]*y_cur[IDX_C7HII] + k[6825]*y_cur[IDX_C7HII] + + k[6826]*y_cur[IDX_C7H2II] + k[6827]*y_cur[IDX_C7H2II] + + k[6828]*y_cur[IDX_C7H3II] + k[6829]*y_cur[IDX_C7H3II] + + k[6830]*y_cur[IDX_C7H4II] + k[6831]*y_cur[IDX_C7H4II] + + k[6832]*y_cur[IDX_C7H5II] + k[6833]*y_cur[IDX_C7H5II] + + k[6834]*y_cur[IDX_CH3C5NHII] + k[6835]*y_cur[IDX_CH3C5NHII] + + k[6836]*y_cur[IDX_C8II] + k[6837]*y_cur[IDX_C8II] + + k[6838]*y_cur[IDX_C8HII] + k[6839]*y_cur[IDX_C8HII] + + k[6840]*y_cur[IDX_C7NII] + k[6841]*y_cur[IDX_C8H2II] + + k[6842]*y_cur[IDX_C8H2II] + k[6843]*y_cur[IDX_HC7NII] + + k[6844]*y_cur[IDX_HC7NII] + k[6845]*y_cur[IDX_C8H3II] + + k[6846]*y_cur[IDX_C8H3II] + k[6847]*y_cur[IDX_C8H4II] + + k[6848]*y_cur[IDX_C8H4II] + k[6849]*y_cur[IDX_H2C7NII] + + k[6850]*y_cur[IDX_H2C7NII] + k[6851]*y_cur[IDX_H3C7NII] + + k[6852]*y_cur[IDX_H3C7NII] + k[6853]*y_cur[IDX_C8H5II] + + k[6854]*y_cur[IDX_C8H5II] + k[6855]*y_cur[IDX_C9II] + + k[6856]*y_cur[IDX_C9II] + k[6857]*y_cur[IDX_C9HII] + + k[6858]*y_cur[IDX_C9HII] + k[6859]*y_cur[IDX_C9H2II] + + k[6860]*y_cur[IDX_C9H2II] + k[6861]*y_cur[IDX_C9H3II] + + k[6862]*y_cur[IDX_C9H3II] + k[6863]*y_cur[IDX_C9H4II] + + k[6864]*y_cur[IDX_C9H4II] + k[6865]*y_cur[IDX_C9H5II] + + k[6866]*y_cur[IDX_C9H5II] + k[6867]*y_cur[IDX_CH3C7NHII] + + k[6868]*y_cur[IDX_CH3C7NHII] + k[6869]*y_cur[IDX_C10II] + + k[6870]*y_cur[IDX_C10II] + k[6871]*y_cur[IDX_C10HII] + + k[6872]*y_cur[IDX_C10HII] + k[6873]*y_cur[IDX_C10HII] + + k[6874]*y_cur[IDX_C10H2II] + k[6875]*y_cur[IDX_C9NII] + + k[6876]*y_cur[IDX_HC9NII] + k[6877]*y_cur[IDX_HC9NII] + + k[6878]*y_cur[IDX_C10H3II] + k[6879]*y_cur[IDX_C10H3II] + + k[6880]*y_cur[IDX_H2C9NII] + k[6881]*y_cur[IDX_H2C9NII] + + k[6882]*y_cur[IDX_H3C9NII] + k[6883]*y_cur[IDX_H3C9NII] + + k[6884]*y_cur[IDX_C11II] + k[6885]*y_cur[IDX_C11II] + + k[6886]*y_cur[IDX_C11II] + k[6887]*y_cur[IDX_C11II]; + data[jistart + 19604] = 0.0 - k[8763]*y_cur[IDX_eM]; + data[jistart + 19605] = 0.0 - k[8763]*y_cur[IDX_GRAIN0I]; + data[jistart + 19606] = 0.0 + k[1027]*y_cur[IDX_eM] + k[6666]*y_cur[IDX_GRAINM]; + data[jistart + 19607] = 0.0 - k[2454]*y_cur[IDX_H2I]; + data[jistart + 19608] = 0.0 + k[887]*y_cur[IDX_eM] + k[888]*y_cur[IDX_eM] + + k[888]*y_cur[IDX_eM] + k[6853]*y_cur[IDX_GRAINM] + + k[6854]*y_cur[IDX_GRAINM] + k[6854]*y_cur[IDX_GRAINM]; + data[jistart + 19609] = 0.0 + k[899]*y_cur[IDX_eM] + k[900]*y_cur[IDX_eM] + + k[900]*y_cur[IDX_eM] + k[6865]*y_cur[IDX_GRAINM] + + k[6866]*y_cur[IDX_GRAINM] + k[6866]*y_cur[IDX_GRAINM]; + data[jistart + 19610] = 0.0 - k[2430]*y_cur[IDX_H2I]; + data[jistart + 19611] = 0.0 + k[1004]*y_cur[IDX_eM] + k[6349]*y_cur[IDX_GRAINM]; + data[jistart + 19612] = 0.0 - k[2416]*y_cur[IDX_H2I]; + data[jistart + 19613] = 0.0 + k[860]*y_cur[IDX_eM] + k[860]*y_cur[IDX_eM] + + k[2834]*y_cur[IDX_HI] + k[6806]*y_cur[IDX_GRAINM] + + k[6806]*y_cur[IDX_GRAINM]; + data[jistart + 19614] = 0.0 + k[912]*y_cur[IDX_eM] - k[2429]*y_cur[IDX_H2I] + + k[6651]*y_cur[IDX_GRAINM]; + data[jistart + 19615] = 0.0 - k[457]*y_cur[IDX_H2I] - k[2440]*y_cur[IDX_H2I]; + data[jistart + 19616] = 0.0 + k[1187]*y_cur[IDX_eM] + k[1187]*y_cur[IDX_eM] + + k[1188]*y_cur[IDX_eM] + k[6689]*y_cur[IDX_GRAINM] + + k[6689]*y_cur[IDX_GRAINM] + k[6690]*y_cur[IDX_GRAINM]; + data[jistart + 19617] = 0.0 - k[2421]*y_cur[IDX_H2I]; + data[jistart + 19618] = 0.0 - k[2426]*y_cur[IDX_H2I]; + data[jistart + 19619] = 0.0 + k[970]*y_cur[IDX_eM] + k[970]*y_cur[IDX_eM] + + k[971]*y_cur[IDX_eM] + k[6405]*y_cur[IDX_GRAINM] + + k[6405]*y_cur[IDX_GRAINM] + k[6406]*y_cur[IDX_GRAINM]; + data[jistart + 19620] = 0.0 - k[2441]*y_cur[IDX_H2I]; + data[jistart + 19621] = 0.0 + k[1011]*y_cur[IDX_eM] + k[6432]*y_cur[IDX_GRAINM]; + data[jistart + 19622] = 0.0 - k[2453]*y_cur[IDX_H2I]; + data[jistart + 19623] = 0.0 - k[137]*y_cur[IDX_H2I] + k[137]*y_cur[IDX_H2I]; + data[jistart + 19624] = 0.0 - k[2446]*y_cur[IDX_H2I]; + data[jistart + 19625] = 0.0 - k[3051]*y_cur[IDX_H2I] - k[3052]*y_cur[IDX_H2I]; + data[jistart + 19626] = 0.0 - k[2458]*y_cur[IDX_H2I]; + data[jistart + 19627] = 0.0 + k[1184]*y_cur[IDX_eM] + k[1185]*y_cur[IDX_eM] + + k[6685]*y_cur[IDX_GRAINM] + k[6686]*y_cur[IDX_GRAINM]; + data[jistart + 19628] = 0.0 + k[1217]*y_cur[IDX_eM] + k[6619]*y_cur[IDX_GRAINM]; + data[jistart + 19629] = 0.0 + k[989]*y_cur[IDX_eM] + k[6849]*y_cur[IDX_GRAINM]; + data[jistart + 19630] = 0.0 + k[991]*y_cur[IDX_eM] + k[6880]*y_cur[IDX_GRAINM]; + data[jistart + 19631] = 0.0 + k[5167]*y_cur[IDX_HI]; + data[jistart + 19632] = 0.0 + k[1050]*y_cur[IDX_eM] + k[6771]*y_cur[IDX_GRAINM]; + data[jistart + 19633] = 0.0 - k[3053]*y_cur[IDX_H2I]; + data[jistart + 19634] = 0.0 + k[1199]*y_cur[IDX_eM] + k[1200]*y_cur[IDX_eM] + + k[6578]*y_cur[IDX_GRAINM] + k[6579]*y_cur[IDX_GRAINM]; + data[jistart + 19635] = 0.0 + k[1214]*y_cur[IDX_eM] + k[6595]*y_cur[IDX_GRAINM]; + data[jistart + 19636] = 0.0 + k[4960]*y_cur[IDX_CI] + k[5164]*y_cur[IDX_HI] + + k[5396]*y_cur[IDX_OI]; + data[jistart + 19637] = 0.0 + k[1024]*y_cur[IDX_eM] + k[6586]*y_cur[IDX_GRAINM]; + data[jistart + 19638] = 0.0 + k[1028]*y_cur[IDX_eM] + k[1029]*y_cur[IDX_eM] + + k[6804]*y_cur[IDX_GRAINM] + k[6805]*y_cur[IDX_GRAINM]; + data[jistart + 19639] = 0.0 - k[2897]*y_cur[IDX_H2I] - k[2898]*y_cur[IDX_H2I]; + data[jistart + 19640] = 0.0 - k[2439]*y_cur[IDX_H2I]; + data[jistart + 19641] = 0.0 + k[1032]*y_cur[IDX_eM] + k[1033]*y_cur[IDX_eM] + + k[6882]*y_cur[IDX_GRAINM] + k[6883]*y_cur[IDX_GRAINM]; + data[jistart + 19642] = 0.0 - k[2405]*y_cur[IDX_H2I]; + data[jistart + 19643] = 0.0 + k[1030]*y_cur[IDX_eM] + k[1031]*y_cur[IDX_eM] + + k[6851]*y_cur[IDX_GRAINM] + k[6852]*y_cur[IDX_GRAINM]; + data[jistart + 19644] = 0.0 + k[1052]*y_cur[IDX_eM] + k[6591]*y_cur[IDX_GRAINM]; + data[jistart + 19645] = 0.0 + k[2722]*y_cur[IDX_H3II]; + data[jistart + 19646] = 0.0 - k[2448]*y_cur[IDX_H2I]; + data[jistart + 19647] = 0.0 - k[2449]*y_cur[IDX_H2I]; + data[jistart + 19648] = 0.0 - k[3047]*y_cur[IDX_H2I] - k[3048]*y_cur[IDX_H2I]; + data[jistart + 19649] = 0.0 - k[2465]*y_cur[IDX_H2I]; + data[jistart + 19650] = 0.0 + k[1203]*y_cur[IDX_eM] + k[6597]*y_cur[IDX_GRAINM]; + data[jistart + 19651] = 0.0 + k[1256]*y_cur[IDX_eM] + k[1928]*y_cur[IDX_CI] - + k[2474]*y_cur[IDX_H2I] + k[6426]*y_cur[IDX_GRAINM]; + data[jistart + 19652] = 0.0 + k[2759]*y_cur[IDX_H3II]; + data[jistart + 19653] = 0.0 + k[778]*y_cur[IDX_eM] + k[6419]*y_cur[IDX_GRAINM]; + data[jistart + 19654] = 0.0 + k[5650]*y_cur[IDX_H3II]; + data[jistart + 19655] = 0.0 - k[5139]*y_cur[IDX_H2I]; + data[jistart + 19656] = 0.0 + k[1181]*y_cur[IDX_eM] + k[6680]*y_cur[IDX_GRAINM]; + data[jistart + 19657] = 0.0 + k[1236]*y_cur[IDX_eM] + k[6767]*y_cur[IDX_GRAINM]; + data[jistart + 19658] = 0.0 + k[1258]*y_cur[IDX_eM] + k[3760]*y_cur[IDX_OI] + + k[6438]*y_cur[IDX_GRAINM]; + data[jistart + 19659] = 0.0 - k[2410]*y_cur[IDX_H2I]; + data[jistart + 19660] = 0.0 + k[827]*y_cur[IDX_eM] + k[827]*y_cur[IDX_eM] + + k[829]*y_cur[IDX_eM] + k[6645]*y_cur[IDX_GRAINM] + + k[6645]*y_cur[IDX_GRAINM] + k[6647]*y_cur[IDX_GRAINM]; + data[jistart + 19661] = 0.0 + k[830]*y_cur[IDX_eM] + k[830]*y_cur[IDX_eM] + + k[6667]*y_cur[IDX_GRAINM] + k[6667]*y_cur[IDX_GRAINM]; + data[jistart + 19662] = 0.0 + k[2685]*y_cur[IDX_H3II]; + data[jistart + 19663] = 0.0 - k[2455]*y_cur[IDX_H2I]; + data[jistart + 19664] = 0.0 - k[3765]*y_cur[IDX_H2I] - k[3766]*y_cur[IDX_H2I]; + data[jistart + 19665] = 0.0 + k[1210]*y_cur[IDX_eM] + k[1572]*y_cur[IDX_C2H2I] + + k[6449]*y_cur[IDX_GRAINM]; + data[jistart + 19666] = 0.0 + k[1247]*y_cur[IDX_eM] + k[6541]*y_cur[IDX_GRAINM]; + data[jistart + 19667] = 0.0 - k[2399]*y_cur[IDX_H2I]; + data[jistart + 19668] = 0.0 + k[1848]*y_cur[IDX_CI]; + data[jistart + 19669] = 0.0 - k[2404]*y_cur[IDX_H2I]; + data[jistart + 19670] = 0.0 - k[2431]*y_cur[IDX_H2I]; + data[jistart + 19671] = 0.0 + k[1079]*y_cur[IDX_eM] + k[6791]*y_cur[IDX_GRAINM]; + data[jistart + 19672] = 0.0 + k[1231]*y_cur[IDX_eM] + k[6665]*y_cur[IDX_GRAINM]; + data[jistart + 19673] = 0.0 + k[2359]*y_cur[IDX_HII] + k[2748]*y_cur[IDX_H3II]; + data[jistart + 19674] = 0.0 + k[1245]*y_cur[IDX_eM] + k[6516]*y_cur[IDX_GRAINM]; + data[jistart + 19675] = 0.0 + k[1265]*y_cur[IDX_eM] + k[1930]*y_cur[IDX_CI] + + k[6553]*y_cur[IDX_GRAINM]; + data[jistart + 19676] = 0.0 - k[2409]*y_cur[IDX_H2I]; + data[jistart + 19677] = 0.0 + k[1553]*y_cur[IDX_C2H2I]; + data[jistart + 19678] = 0.0 - k[2437]*y_cur[IDX_H2I]; + data[jistart + 19679] = 0.0 - k[2447]*y_cur[IDX_H2I]; + data[jistart + 19680] = 0.0 + k[2705]*y_cur[IDX_H3II]; + data[jistart + 19681] = 0.0 + k[2713]*y_cur[IDX_H3II]; + data[jistart + 19682] = 0.0 + k[1197]*y_cur[IDX_eM] + k[6569]*y_cur[IDX_GRAINM]; + data[jistart + 19683] = 0.0 - k[2471]*y_cur[IDX_H2I]; + data[jistart + 19684] = 0.0 - k[2424]*y_cur[IDX_H2I]; + data[jistart + 19685] = 0.0 + k[5656]*y_cur[IDX_H3II]; + data[jistart + 19686] = 0.0 + k[2644]*y_cur[IDX_H3II]; + data[jistart + 19687] = 0.0 + k[2646]*y_cur[IDX_H3II]; + data[jistart + 19688] = 0.0 + k[1006]*y_cur[IDX_eM] + k[2502]*y_cur[IDX_SiI] + + k[6376]*y_cur[IDX_GRAINM]; + data[jistart + 19689] = 0.0 + k[2341]*y_cur[IDX_HII] + k[2687]*y_cur[IDX_H3II] + k[5843] + + k[6166]; + data[jistart + 19690] = 0.0 + k[1039]*y_cur[IDX_eM] + k[6601]*y_cur[IDX_GRAINM]; + data[jistart + 19691] = 0.0 - k[2451]*y_cur[IDX_H2I]; + data[jistart + 19692] = 0.0 + k[2749]*y_cur[IDX_H3II]; + data[jistart + 19693] = 0.0 + k[2758]*y_cur[IDX_H3II]; + data[jistart + 19694] = 0.0 + k[2672]*y_cur[IDX_H3II] + k[2673]*y_cur[IDX_H3II]; + data[jistart + 19695] = 0.0 + k[2350]*y_cur[IDX_HII] + k[2710]*y_cur[IDX_H3II]; + data[jistart + 19696] = 0.0 - k[5558]*y_cur[IDX_H2I]; + data[jistart + 19697] = 0.0 + k[2357]*y_cur[IDX_HII] + k[2745]*y_cur[IDX_H3II] + k[5919]; + data[jistart + 19698] = 0.0 + k[805]*y_cur[IDX_eM] + k[806]*y_cur[IDX_eM] + + k[6499]*y_cur[IDX_GRAINM] + k[6500]*y_cur[IDX_GRAINM]; + data[jistart + 19699] = 0.0 + k[861]*y_cur[IDX_eM] + k[861]*y_cur[IDX_eM] + + k[6807]*y_cur[IDX_GRAINM] + k[6807]*y_cur[IDX_GRAINM]; + data[jistart + 19700] = 0.0 + k[885]*y_cur[IDX_eM] + k[886]*y_cur[IDX_eM] + + k[6847]*y_cur[IDX_GRAINM] + k[6848]*y_cur[IDX_GRAINM]; + data[jistart + 19701] = 0.0 + k[5662]*y_cur[IDX_H3II]; + data[jistart + 19702] = 0.0 + k[2679]*y_cur[IDX_H3II] - k[5132]*y_cur[IDX_H2I]; + data[jistart + 19703] = 0.0 + k[2695]*y_cur[IDX_H3II] + k[2696]*y_cur[IDX_H3II]; + data[jistart + 19704] = 0.0 + k[1437]*y_cur[IDX_CII] + k[2361]*y_cur[IDX_HII] + + k[2752]*y_cur[IDX_H3II]; + data[jistart + 19705] = 0.0 + k[807]*y_cur[IDX_eM] + k[810]*y_cur[IDX_eM] + + k[811]*y_cur[IDX_eM] + k[2833]*y_cur[IDX_HI] + + k[6504]*y_cur[IDX_GRAINM] + k[6507]*y_cur[IDX_GRAINM] + + k[6508]*y_cur[IDX_GRAINM]; + data[jistart + 19706] = 0.0 + k[2175]*y_cur[IDX_CH4I] - k[2413]*y_cur[IDX_H2I]; + data[jistart + 19707] = 0.0 - k[2422]*y_cur[IDX_H2I]; + data[jistart + 19708] = 0.0 + k[897]*y_cur[IDX_eM] + k[898]*y_cur[IDX_eM] + + k[6863]*y_cur[IDX_GRAINM] + k[6864]*y_cur[IDX_GRAINM]; + data[jistart + 19709] = 0.0 + k[1351]*y_cur[IDX_CII] + k[2640]*y_cur[IDX_H3II] + k[5792]; + data[jistart + 19710] = 0.0 + k[2642]*y_cur[IDX_H3II]; + data[jistart + 19711] = 0.0 + k[2711]*y_cur[IDX_H3II] + k[2712]*y_cur[IDX_H3II]; + data[jistart + 19712] = 0.0 + k[2714]*y_cur[IDX_H3II]; + data[jistart + 19713] = 0.0 + k[2715]*y_cur[IDX_H3II]; + data[jistart + 19714] = 0.0 - k[2473]*y_cur[IDX_H2I]; + data[jistart + 19715] = 0.0 + k[1228]*y_cur[IDX_eM] + k[6660]*y_cur[IDX_GRAINM]; + data[jistart + 19716] = 0.0 + k[856]*y_cur[IDX_eM] + k[857]*y_cur[IDX_eM] + + k[6796]*y_cur[IDX_GRAINM] + k[6797]*y_cur[IDX_GRAINM]; + data[jistart + 19717] = 0.0 + k[5640]*y_cur[IDX_H3II]; + data[jistart + 19718] = 0.0 + k[5645]*y_cur[IDX_H3II]; + data[jistart + 19719] = 0.0 + k[872]*y_cur[IDX_eM] + k[873]*y_cur[IDX_eM] + + k[6830]*y_cur[IDX_GRAINM] + k[6831]*y_cur[IDX_GRAINM]; + data[jistart + 19720] = 0.0 + k[874]*y_cur[IDX_eM] + k[3435]*y_cur[IDX_NI] + + k[6832]*y_cur[IDX_GRAINM]; + data[jistart + 19721] = 0.0 + k[1361]*y_cur[IDX_CII] + k[2323]*y_cur[IDX_HII] + + k[2645]*y_cur[IDX_H3II] + k[3181]*y_cur[IDX_HeII] + + k[4951]*y_cur[IDX_CI]; + data[jistart + 19722] = 0.0 + k[2693]*y_cur[IDX_H3II]; + data[jistart + 19723] = 0.0 + k[2698]*y_cur[IDX_H3II]; + data[jistart + 19724] = 0.0 + k[2725]*y_cur[IDX_H3II]; + data[jistart + 19725] = 0.0 + k[2735]*y_cur[IDX_H3II] + k[3298]*y_cur[IDX_HeII] + + k[5435]*y_cur[IDX_OI]; + data[jistart + 19726] = 0.0 + k[2737]*y_cur[IDX_H3II]; + data[jistart + 19727] = 0.0 + k[2358]*y_cur[IDX_HII] + k[2746]*y_cur[IDX_H3II]; + data[jistart + 19728] = 0.0 + k[2747]*y_cur[IDX_H3II]; + data[jistart + 19729] = 0.0 + k[2611]*y_cur[IDX_H3II]; + data[jistart + 19730] = 0.0 - k[2419]*y_cur[IDX_H2I]; + data[jistart + 19731] = 0.0 + k[2638]*y_cur[IDX_H3II]; + data[jistart + 19732] = 0.0 + k[929]*y_cur[IDX_eM] + k[930]*y_cur[IDX_eM] + + k[6748]*y_cur[IDX_GRAINM] + k[6749]*y_cur[IDX_GRAINM]; + data[jistart + 19733] = 0.0 + k[2701]*y_cur[IDX_H3II]; + data[jistart + 19734] = 0.0 + k[2083]*y_cur[IDX_CH3II] + k[2704]*y_cur[IDX_H3II] + + k[5211]*y_cur[IDX_HI]; + data[jistart + 19735] = 0.0 + k[2707]*y_cur[IDX_H3II] + k[2708]*y_cur[IDX_H3II]; + data[jistart + 19736] = 0.0 + k[2606]*y_cur[IDX_H3II]; + data[jistart + 19737] = 0.0 + k[2631]*y_cur[IDX_H3II]; + data[jistart + 19738] = 0.0 + k[1357]*y_cur[IDX_CII] + k[2321]*y_cur[IDX_HII] + + k[2643]*y_cur[IDX_H3II] + k[3178]*y_cur[IDX_HeII] + + k[4950]*y_cur[IDX_CI]; + data[jistart + 19739] = 0.0 + k[5668]*y_cur[IDX_H3II]; + data[jistart + 19740] = 0.0 + k[2666]*y_cur[IDX_H3II]; + data[jistart + 19741] = 0.0 + k[2683]*y_cur[IDX_H3II] + k[3222]*y_cur[IDX_HeII] + k[5837] + + k[6156]; + data[jistart + 19742] = 0.0 + k[1206]*y_cur[IDX_eM] + k[1571]*y_cur[IDX_C2H2I] + + k[1713]*y_cur[IDX_C2H4I] + k[2214]*y_cur[IDX_CH4I] + + k[2567]*y_cur[IDX_H2OI] + k[3600]*y_cur[IDX_NH3I] + + k[6434]*y_cur[IDX_GRAINM]; + data[jistart + 19743] = 0.0 + k[2738]*y_cur[IDX_H3II]; + data[jistart + 19744] = 0.0 + k[2739]*y_cur[IDX_H3II]; + data[jistart + 19745] = 0.0 - k[2472]*y_cur[IDX_H2I]; + data[jistart + 19746] = 0.0 + k[2607]*y_cur[IDX_H3II]; + data[jistart + 19747] = 0.0 + k[858]*y_cur[IDX_eM] + k[859]*y_cur[IDX_eM] + + k[859]*y_cur[IDX_eM] - k[5553]*y_cur[IDX_H2I] + + k[6802]*y_cur[IDX_GRAINM] + k[6803]*y_cur[IDX_GRAINM] + + k[6803]*y_cur[IDX_GRAINM]; + data[jistart + 19748] = 0.0 + k[6093]; + data[jistart + 19749] = 0.0 + k[5628]*y_cur[IDX_H3II]; + data[jistart + 19750] = 0.0 + k[2688]*y_cur[IDX_H3II]; + data[jistart + 19751] = 0.0 + k[2347]*y_cur[IDX_HII] + k[2703]*y_cur[IDX_H3II]; + data[jistart + 19752] = 0.0 + k[1435]*y_cur[IDX_CII] + k[2360]*y_cur[IDX_HII] + + k[2751]*y_cur[IDX_H3II] + k[5925]; + data[jistart + 19753] = 0.0 - k[2400]*y_cur[IDX_H2I]; + data[jistart + 19754] = 0.0 - k[2452]*y_cur[IDX_H2I]; + data[jistart + 19755] = 0.0 + k[2744]*y_cur[IDX_H3II]; + data[jistart + 19756] = 0.0 + k[935]*y_cur[IDX_eM] + k[2838]*y_cur[IDX_HI] + + k[6410]*y_cur[IDX_GRAINM]; + data[jistart + 19757] = 0.0 + k[2599]*y_cur[IDX_H3II]; + data[jistart + 19758] = 0.0 - k[2423]*y_cur[IDX_H2I]; + data[jistart + 19759] = 0.0 + k[5634]*y_cur[IDX_H3II]; + data[jistart + 19760] = 0.0 + k[2757]*y_cur[IDX_H3II]; + data[jistart + 19761] = 0.0 + k[845]*y_cur[IDX_eM] + k[3417]*y_cur[IDX_NI] + + k[6753]*y_cur[IDX_GRAINM]; + data[jistart + 19762] = 0.0 + k[2346]*y_cur[IDX_HII] + k[2702]*y_cur[IDX_H3II] + + k[5173]*y_cur[IDX_HI]; + data[jistart + 19763] = 0.0 + k[2727]*y_cur[IDX_H3II]; + data[jistart + 19764] = 0.0 + k[1576]*y_cur[IDX_C2H2I] - k[5563]*y_cur[IDX_H2I]; + data[jistart + 19765] = 0.0 + k[1440]*y_cur[IDX_CII] + k[2362]*y_cur[IDX_HII] + + k[2753]*y_cur[IDX_H3II] + k[3322]*y_cur[IDX_HeII] + + k[5445]*y_cur[IDX_OI]; + data[jistart + 19766] = 0.0 + k[2605]*y_cur[IDX_H3II]; + data[jistart + 19767] = 0.0 - k[2418]*y_cur[IDX_H2I]; + data[jistart + 19768] = 0.0 + k[1338]*y_cur[IDX_CII] + k[2312]*y_cur[IDX_HII] + + k[2629]*y_cur[IDX_H3II] + k[3152]*y_cur[IDX_HeII]; + data[jistart + 19769] = 0.0 + k[2316]*y_cur[IDX_HII] + k[2637]*y_cur[IDX_H3II] + + k[3167]*y_cur[IDX_HeII]; + data[jistart + 19770] = 0.0 + k[2692]*y_cur[IDX_H3II]; + data[jistart + 19771] = 0.0 + k[2183]*y_cur[IDX_CH4I] - k[2417]*y_cur[IDX_H2I] - + k[5552]*y_cur[IDX_H2I]; + data[jistart + 19772] = 0.0 + k[2619]*y_cur[IDX_H3II] + k[5751]; + data[jistart + 19773] = 0.0 + k[2624]*y_cur[IDX_H3II]; + data[jistart + 19774] = 0.0 + k[2699]*y_cur[IDX_H3II] + k[2700]*y_cur[IDX_H3II]; + data[jistart + 19775] = 0.0 + k[1251]*y_cur[IDX_eM] + k[6402]*y_cur[IDX_GRAINM]; + data[jistart + 19776] = 0.0 + k[1255]*y_cur[IDX_eM] + k[3473]*y_cur[IDX_NI] + + k[3759]*y_cur[IDX_OI] - k[5565]*y_cur[IDX_H2I] + + k[6413]*y_cur[IDX_GRAINM]; + data[jistart + 19777] = 0.0 + k[1297]*y_cur[IDX_CII] + k[2294]*y_cur[IDX_HII] + + k[2584]*y_cur[IDX_H3II]; + data[jistart + 19778] = 0.0 + k[2166]*y_cur[IDX_CH4I] - k[2411]*y_cur[IDX_H2I]; + data[jistart + 19779] = 0.0 + k[2633]*y_cur[IDX_H3II]; + data[jistart + 19780] = 0.0 + k[2677]*y_cur[IDX_H3II]; + data[jistart + 19781] = 0.0 - k[5146]*y_cur[IDX_H2I] + k[5192]*y_cur[IDX_HI]; + data[jistart + 19782] = 0.0 + k[2741]*y_cur[IDX_H3II]; + data[jistart + 19783] = 0.0 + k[2750]*y_cur[IDX_H3II]; + data[jistart + 19784] = 0.0 + k[2592]*y_cur[IDX_H3II] + k[2592]*y_cur[IDX_H3II] + + k[2593]*y_cur[IDX_H3II] + k[2595]*y_cur[IDX_H3II] + + k[2595]*y_cur[IDX_H3II] + k[2596]*y_cur[IDX_H3II]; + data[jistart + 19785] = 0.0 + k[2349]*y_cur[IDX_HII] + k[2709]*y_cur[IDX_H3II] + + k[5176]*y_cur[IDX_HI]; + data[jistart + 19786] = 0.0 + k[2085]*y_cur[IDX_CH3II] + k[2719]*y_cur[IDX_H3II]; + data[jistart + 19787] = 0.0 + k[1441]*y_cur[IDX_CII] + k[2363]*y_cur[IDX_HII] + + k[2754]*y_cur[IDX_H3II] + k[3324]*y_cur[IDX_HeII] + + k[5295]*y_cur[IDX_NI] + k[6276]; + data[jistart + 19788] = 0.0 + k[967]*y_cur[IDX_eM] + k[2495]*y_cur[IDX_H2COI] + + k[6444]*y_cur[IDX_GRAINM]; + data[jistart + 19789] = 0.0 + k[1699]*y_cur[IDX_C2H4I] + k[2178]*y_cur[IDX_CH4I] - + k[2414]*y_cur[IDX_H2I]; + data[jistart + 19790] = 0.0 + k[855]*y_cur[IDX_eM] + k[1874]*y_cur[IDX_CI] + + k[6790]*y_cur[IDX_GRAINM]; + data[jistart + 19791] = 0.0 + k[884]*y_cur[IDX_eM] + k[1883]*y_cur[IDX_CI] + + k[6846]*y_cur[IDX_GRAINM]; + data[jistart + 19792] = 0.0 - k[2425]*y_cur[IDX_H2I]; + data[jistart + 19793] = 0.0 + k[896]*y_cur[IDX_eM] + k[1888]*y_cur[IDX_CI] + + k[6862]*y_cur[IDX_GRAINM]; + data[jistart + 19794] = 0.0 + k[2639]*y_cur[IDX_H3II]; + data[jistart + 19795] = 0.0 + k[3022]*y_cur[IDX_HII] + k[3027]*y_cur[IDX_H3II]; + data[jistart + 19796] = 0.0 + k[3767]*y_cur[IDX_H3II] + k[3768]*y_cur[IDX_H3II]; + data[jistart + 19797] = 0.0 + k[1244]*y_cur[IDX_eM] + k[1921]*y_cur[IDX_CI] + + k[6498]*y_cur[IDX_GRAINM]; + data[jistart + 19798] = 0.0 + k[2848]*y_cur[IDX_HI] - k[5564]*y_cur[IDX_H2I]; + data[jistart + 19799] = 0.0 + k[2660]*y_cur[IDX_H3II] + k[2662]*y_cur[IDX_H3II] + + k[2663]*y_cur[IDX_H3II]; + data[jistart + 19800] = 0.0 - k[2444]*y_cur[IDX_H2I] - k[2445]*y_cur[IDX_H2I]; + data[jistart + 19801] = 0.0 + k[1335]*y_cur[IDX_CII] + k[1503]*y_cur[IDX_C2H2II] + + k[2059]*y_cur[IDX_CH3II] + k[2310]*y_cur[IDX_HII] + + k[2626]*y_cur[IDX_H3II] + k[3145]*y_cur[IDX_HeII]; + data[jistart + 19802] = 0.0 - k[2436]*y_cur[IDX_H2I]; + data[jistart + 19803] = 0.0 + k[2691]*y_cur[IDX_H3II]; + data[jistart + 19804] = 0.0 + k[2100]*y_cur[IDX_CH3II] + k[2365]*y_cur[IDX_HII] + + k[2756]*y_cur[IDX_H3II]; + data[jistart + 19805] = 0.0 + k[1443]*y_cur[IDX_CII] + k[1531]*y_cur[IDX_C2H2II] + + k[2238]*y_cur[IDX_CH5II] + k[2364]*y_cur[IDX_HII] + + k[2755]*y_cur[IDX_H3II] + k[3326]*y_cur[IDX_HeII] + + k[3326]*y_cur[IDX_HeII] + k[3327]*y_cur[IDX_HeII] + k[5929] + + k[6277] + k[6279]; + data[jistart + 19806] = 0.0 - k[2420]*y_cur[IDX_H2I]; + data[jistart + 19807] = 0.0 + k[893]*y_cur[IDX_eM] + k[1886]*y_cur[IDX_CI] + + k[6859]*y_cur[IDX_GRAINM]; + data[jistart + 19808] = 0.0 + k[2736]*y_cur[IDX_H3II]; + data[jistart + 19809] = 0.0 + k[1332]*y_cur[IDX_CII] + k[1499]*y_cur[IDX_C2H2II] + + k[1603]*y_cur[IDX_C2H3II] + k[1664]*y_cur[IDX_C2H4II] + + k[2057]*y_cur[IDX_CH3II] + k[2308]*y_cur[IDX_HII] + + k[2622]*y_cur[IDX_H3II] + k[3137]*y_cur[IDX_HeII]; + data[jistart + 19810] = 0.0 + k[1711]*y_cur[IDX_C2H4I] + k[2212]*y_cur[IDX_CH4I] + + k[2565]*y_cur[IDX_H2OI] + k[3597]*y_cur[IDX_NH3I] - + k[5560]*y_cur[IDX_H2I]; + data[jistart + 19811] = 0.0 + k[1809]*y_cur[IDX_CH2CCH2I] + k[1812]*y_cur[IDX_CH3CCHI] + + k[1859]*y_cur[IDX_CI] + k[2832]*y_cur[IDX_HI] + + k[3399]*y_cur[IDX_NI]; + data[jistart + 19812] = 0.0 + k[881]*y_cur[IDX_eM] + k[1881]*y_cur[IDX_CI] + + k[2188]*y_cur[IDX_CH4I] + k[6841]*y_cur[IDX_GRAINM]; + data[jistart + 19813] = 0.0 + k[844]*y_cur[IDX_eM] + k[1870]*y_cur[IDX_CI] + + k[6743]*y_cur[IDX_GRAINM]; + data[jistart + 19814] = 0.0 + k[1067]*y_cur[IDX_eM] + k[6638]*y_cur[IDX_GRAINM]; + data[jistart + 19815] = 0.0 - k[2415]*y_cur[IDX_H2I]; + data[jistart + 19816] = 0.0 + k[2651]*y_cur[IDX_H3II] + k[2654]*y_cur[IDX_H3II] + + k[2655]*y_cur[IDX_H3II] + k[2655]*y_cur[IDX_H3II]; + data[jistart + 19817] = 0.0 - k[2438]*y_cur[IDX_H2I]; + data[jistart + 19818] = 0.0 + k[803]*y_cur[IDX_eM] + k[1548]*y_cur[IDX_C2H2I] + + k[1861]*y_cur[IDX_CI] + k[2104]*y_cur[IDX_CH3CCHI] + + k[3401]*y_cur[IDX_NI] - k[5516]*y_cur[IDX_H2I] + + k[6482]*y_cur[IDX_GRAINM]; + data[jistart + 19819] = 0.0 + k[871]*y_cur[IDX_eM] + k[1879]*y_cur[IDX_CI] + + k[6829]*y_cur[IDX_GRAINM]; + data[jistart + 19820] = 0.0 + k[1710]*y_cur[IDX_C2H4I] + k[2211]*y_cur[IDX_CH4I] + + k[2563]*y_cur[IDX_H2OI] - k[5559]*y_cur[IDX_H2I]; + data[jistart + 19821] = 0.0 + k[2328]*y_cur[IDX_HII] + k[2658]*y_cur[IDX_H3II]; + data[jistart + 19822] = 0.0 + k[2720]*y_cur[IDX_H3II]; + data[jistart + 19823] = 0.0 + k[868]*y_cur[IDX_eM] + k[1560]*y_cur[IDX_C2H2I] + + k[1641]*y_cur[IDX_C2H3I] + k[1705]*y_cur[IDX_C2H4I] + + k[1877]*y_cur[IDX_CI] + k[2187]*y_cur[IDX_CH4I] + + k[6826]*y_cur[IDX_GRAINM]; + data[jistart + 19824] = 0.0 + k[1687]*y_cur[IDX_C2H4I] + k[2158]*y_cur[IDX_CH4I] - + k[2406]*y_cur[IDX_H2I]; + data[jistart + 19825] = 0.0 + k[1046]*y_cur[IDX_eM] + k[1048]*y_cur[IDX_eM] + + k[2843]*y_cur[IDX_HI] + k[6451]*y_cur[IDX_GRAINM] + + k[6453]*y_cur[IDX_GRAINM]; + data[jistart + 19826] = 0.0 - k[2468]*y_cur[IDX_H2I]; + data[jistart + 19827] = 0.0 + k[852]*y_cur[IDX_eM] + k[1639]*y_cur[IDX_C2H3I] + + k[1703]*y_cur[IDX_C2H4I] + k[1792]*y_cur[IDX_C3H2I] + + k[1872]*y_cur[IDX_CI] + k[2039]*y_cur[IDX_CH2CCHI] + + k[2110]*y_cur[IDX_CH3CCHI] + k[2185]*y_cur[IDX_CH4I] + + k[2483]*y_cur[IDX_H2CCCI] + k[6785]*y_cur[IDX_GRAINM]; + data[jistart + 19828] = 0.0 + k[2134]*y_cur[IDX_C2H2I] - k[2432]*y_cur[IDX_H2I] + + k[2839]*y_cur[IDX_HI] + k[6125]; + data[jistart + 19829] = 0.0 + k[1388]*y_cur[IDX_CII] + k[1516]*y_cur[IDX_C2H2II] + + k[1616]*y_cur[IDX_C2H3II] + k[1782]*y_cur[IDX_C3H2II] + + k[2076]*y_cur[IDX_CH3II] + k[2335]*y_cur[IDX_HII] + + k[2476]*y_cur[IDX_C3H3II] + k[2481]*y_cur[IDX_C5H2II] + + k[2483]*y_cur[IDX_C6H2II] + k[2485]*y_cur[IDX_CH2CCHII] + + k[2681]*y_cur[IDX_H3II] + k[3217]*y_cur[IDX_HeII] + k[6149]; + data[jistart + 19830] = 0.0 + k[1326]*y_cur[IDX_CII] + k[1495]*y_cur[IDX_C2H2II] + + k[1596]*y_cur[IDX_C2H3II] + k[1660]*y_cur[IDX_C2H4II] + + k[1767]*y_cur[IDX_C3H2II] + k[1802]*y_cur[IDX_C3H3II] + + k[2026]*y_cur[IDX_CH2CCHII] + k[2055]*y_cur[IDX_CH3II] + + k[2306]*y_cur[IDX_HII] + k[2618]*y_cur[IDX_H3II] + + k[3128]*y_cur[IDX_HeII]; + data[jistart + 19831] = 0.0 + k[764]*y_cur[IDX_eM] + k[1539]*y_cur[IDX_C2H2I] + + k[2829]*y_cur[IDX_HI] + k[6391]*y_cur[IDX_GRAINM]; + data[jistart + 19832] = 0.0 + k[1323]*y_cur[IDX_CII] + k[1491]*y_cur[IDX_C2H2II] + + k[1590]*y_cur[IDX_C2H3II] + k[1763]*y_cur[IDX_C3H2II] + + k[1798]*y_cur[IDX_C3H3II] + k[1839]*y_cur[IDX_C4H3II] + + k[2022]*y_cur[IDX_CH2CCHII] + k[2053]*y_cur[IDX_CH3II] + + k[2304]*y_cur[IDX_HII] + k[2614]*y_cur[IDX_H3II] + + k[3120]*y_cur[IDX_HeII]; + data[jistart + 19833] = 0.0 + k[841]*y_cur[IDX_eM] + k[1637]*y_cur[IDX_C2H3I] + + k[1701]*y_cur[IDX_C2H4I] + k[1790]*y_cur[IDX_C3H2I] + + k[1868]*y_cur[IDX_CI] + k[2037]*y_cur[IDX_CH2CCHI] + + k[2109]*y_cur[IDX_CH3CCHI] + k[2180]*y_cur[IDX_CH4I] + + k[2481]*y_cur[IDX_H2CCCI] + k[6738]*y_cur[IDX_GRAINM]; + data[jistart + 19834] = 0.0 + k[1345]*y_cur[IDX_CII] + k[1809]*y_cur[IDX_C3H4II] + + k[2635]*y_cur[IDX_H3II] + k[2635]*y_cur[IDX_H3II] + k[6082]; + data[jistart + 19835] = 0.0 - k[2433]*y_cur[IDX_H2I]; + data[jistart + 19836] = 0.0 + k[441]*y_cur[IDX_H2II] + k[1371]*y_cur[IDX_CII] + + k[1371]*y_cur[IDX_CII] + k[1372]*y_cur[IDX_CII] + + k[1615]*y_cur[IDX_C2H3II] + k[2063]*y_cur[IDX_CH3II] + + k[2063]*y_cur[IDX_CH3II] + k[2064]*y_cur[IDX_CH3II] + + k[2326]*y_cur[IDX_HII] + k[2326]*y_cur[IDX_HII] + + k[2327]*y_cur[IDX_HII] + k[2376]*y_cur[IDX_H2II] + + k[2376]*y_cur[IDX_H2II] + k[2377]*y_cur[IDX_H2II] + + k[2505]*y_cur[IDX_H2OII] + k[2648]*y_cur[IDX_H3II] + + k[2648]*y_cur[IDX_H3II] + k[3188]*y_cur[IDX_HeII] + + k[3188]*y_cur[IDX_HeII] + k[3189]*y_cur[IDX_HeII] + + k[3190]*y_cur[IDX_HeII] + k[3771]*y_cur[IDX_OHII] + + k[3773]*y_cur[IDX_OHII] + k[5803] + k[6108]; + data[jistart + 19837] = 0.0 + k[1310]*y_cur[IDX_CII] + k[1485]*y_cur[IDX_C2H2II] + + k[1581]*y_cur[IDX_C2H3II] + k[1759]*y_cur[IDX_C3H2II] + + k[1786]*y_cur[IDX_C3H3II] + k[1790]*y_cur[IDX_C5H2II] + + k[1792]*y_cur[IDX_C6H2II] + k[1794]*y_cur[IDX_CH2CCHII] + + k[2050]*y_cur[IDX_CH3II] + k[2300]*y_cur[IDX_HII] + + k[2602]*y_cur[IDX_H3II]; + data[jistart + 19838] = 0.0 + k[327]*y_cur[IDX_HII] + k[1306]*y_cur[IDX_CII] + + k[2298]*y_cur[IDX_HII] + k[2591]*y_cur[IDX_H3II] + + k[3083]*y_cur[IDX_HeII] + k[5702] + k[5987]; + data[jistart + 19839] = 0.0 + k[2204]*y_cur[IDX_CH4I] - k[2460]*y_cur[IDX_H2I] + + k[3363]*y_cur[IDX_H2SI]; + data[jistart + 19840] = 0.0 - k[2450]*y_cur[IDX_H2I]; + data[jistart + 19841] = 0.0 + k[1377]*y_cur[IDX_CII] + k[2649]*y_cur[IDX_H3II] + + k[2650]*y_cur[IDX_H3II] + k[2650]*y_cur[IDX_H3II] + + k[3369]*y_cur[IDX_N2HII] + k[4954]*y_cur[IDX_CI] + + k[5053]*y_cur[IDX_C4HI] + k[5054]*y_cur[IDX_C4HI]; + data[jistart + 19842] = 0.0 + k[2148]*y_cur[IDX_CH4I] + k[2149]*y_cur[IDX_CH4I] - + k[2401]*y_cur[IDX_H2I]; + data[jistart + 19843] = 0.0 + k[1734]*y_cur[IDX_C2HI] + k[1822]*y_cur[IDX_C3HI] + + k[2168]*y_cur[IDX_CH4I] - k[2412]*y_cur[IDX_H2I]; + data[jistart + 19844] = 0.0 + k[2203]*y_cur[IDX_CH4I] - k[2456]*y_cur[IDX_H2I] + + k[2844]*y_cur[IDX_HI] + k[3055]*y_cur[IDX_H2SI] - + k[5557]*y_cur[IDX_H2I]; + data[jistart + 19845] = 0.0 - k[2461]*y_cur[IDX_H2I] - k[2462]*y_cur[IDX_H2I] + + k[3490]*y_cur[IDX_H2OI]; + data[jistart + 19846] = 0.0 + k[4775]*y_cur[IDX_H3II]; + data[jistart + 19847] = 0.0 + k[4634]*y_cur[IDX_H3II]; + data[jistart + 19848] = 0.0 + k[436]*y_cur[IDX_C2I] + k[437]*y_cur[IDX_C2H2I] + + k[438]*y_cur[IDX_C2H4I] + k[439]*y_cur[IDX_C2HI] + + k[440]*y_cur[IDX_CH2I] + k[441]*y_cur[IDX_C2H6I] + + k[442]*y_cur[IDX_CH4I] + k[443]*y_cur[IDX_CHI] + + k[444]*y_cur[IDX_CNI] + k[445]*y_cur[IDX_COI] + + k[446]*y_cur[IDX_H2COI] + k[447]*y_cur[IDX_H2OI] + + k[448]*y_cur[IDX_H2SI] + k[449]*y_cur[IDX_HCNI] + + k[450]*y_cur[IDX_HCOI] + k[451]*y_cur[IDX_NH2I] + + k[452]*y_cur[IDX_NH3I] + k[453]*y_cur[IDX_NHI] + + k[454]*y_cur[IDX_NOI] + k[455]*y_cur[IDX_O2I] + + k[456]*y_cur[IDX_OHI] + k[489]*y_cur[IDX_HI] + + k[2371]*y_cur[IDX_C2H4I] + k[2371]*y_cur[IDX_C2H4I] + + k[2372]*y_cur[IDX_C2H4I] + k[2376]*y_cur[IDX_C2H6I] + + k[2376]*y_cur[IDX_C2H6I] + k[2377]*y_cur[IDX_C2H6I] + + k[2378]*y_cur[IDX_CH4I] - k[2384]*y_cur[IDX_H2I] + + k[2385]*y_cur[IDX_H2COI] + k[2387]*y_cur[IDX_H2SI] + + k[2388]*y_cur[IDX_H2SI] + k[2388]*y_cur[IDX_H2SI] + + k[4702]*y_cur[IDX_HM]; + data[jistart + 19849] = 0.0 + k[2732]*y_cur[IDX_H3II]; + data[jistart + 19850] = 0.0 - k[2463]*y_cur[IDX_H2I]; + data[jistart + 19851] = 0.0 + k[2734]*y_cur[IDX_H3II] + k[2815]*y_cur[IDX_H3OII]; + data[jistart + 19852] = 0.0 + k[4845]*y_cur[IDX_H3II]; + data[jistart + 19853] = 0.0 + k[4039]*y_cur[IDX_H3II]; + data[jistart + 19854] = 0.0 + k[4214]*y_cur[IDX_H3II]; + data[jistart + 19855] = 0.0 - k[2434]*y_cur[IDX_H2I] - k[2435]*y_cur[IDX_H2I]; + data[jistart + 19856] = 0.0 + k[1365]*y_cur[IDX_CII] + k[1510]*y_cur[IDX_C2H2II] + + k[1612]*y_cur[IDX_C2H3II] + k[1812]*y_cur[IDX_C3H4II] + + k[2104]*y_cur[IDX_C3H5II] + k[2108]*y_cur[IDX_C4H3II] + + k[2109]*y_cur[IDX_C5H2II] + k[2110]*y_cur[IDX_C6H2II] + + k[2325]*y_cur[IDX_HII] + k[2647]*y_cur[IDX_H3II] + + k[2647]*y_cur[IDX_H3II] + k[3184]*y_cur[IDX_HeII] + + k[3184]*y_cur[IDX_HeII] + k[3185]*y_cur[IDX_HeII] + + k[3186]*y_cur[IDX_HeII] + k[4953]*y_cur[IDX_CI] + k[6107]; + data[jistart + 19857] = 0.0 + k[972]*y_cur[IDX_eM] + k[973]*y_cur[IDX_eM] + + k[976]*y_cur[IDX_eM] + k[976]*y_cur[IDX_eM] + k[2236]*y_cur[IDX_SiI] + + k[2238]*y_cur[IDX_SiH4I] + k[2840]*y_cur[IDX_HI] + + k[3728]*y_cur[IDX_OI] + k[6332]*y_cur[IDX_GRAINM] + + k[6333]*y_cur[IDX_GRAINM] + k[6336]*y_cur[IDX_GRAINM] + + k[6336]*y_cur[IDX_GRAINM]; + data[jistart + 19858] = 0.0 + k[4810]*y_cur[IDX_H3II]; + data[jistart + 19859] = 0.0 + k[3969]*y_cur[IDX_H3II]; + data[jistart + 19860] = 0.0 + k[4109]*y_cur[IDX_H3II]; + data[jistart + 19861] = 0.0 + k[2612]*y_cur[IDX_H3II]; + data[jistart + 19862] = 0.0 + k[4389]*y_cur[IDX_H3II]; + data[jistart + 19863] = 0.0 + k[4529]*y_cur[IDX_H3II]; + data[jistart + 19864] = 0.0 + k[4459]*y_cur[IDX_H3II]; + data[jistart + 19865] = 0.0 + k[4599]*y_cur[IDX_H3II]; + data[jistart + 19866] = 0.0 + k[3934]*y_cur[IDX_H3II]; + data[jistart + 19867] = 0.0 + k[4284]*y_cur[IDX_H3II]; + data[jistart + 19868] = 0.0 + k[4319]*y_cur[IDX_H3II]; + data[jistart + 19869] = 0.0 + k[2084]*y_cur[IDX_CH3II] + k[2353]*y_cur[IDX_HII] + + k[2716]*y_cur[IDX_H3II] - k[5140]*y_cur[IDX_H2I] + + k[5178]*y_cur[IDX_HI]; + data[jistart + 19870] = 0.0 - k[82]*y_cur[IDX_H2I] + k[3899]*y_cur[IDX_H3II]; + data[jistart + 19871] = 0.0 + k[2678]*y_cur[IDX_H3II]; + data[jistart + 19872] = 0.0 - k[83]*y_cur[IDX_H2I] - k[2467]*y_cur[IDX_H2I] + + k[4740]*y_cur[IDX_H3II]; + data[jistart + 19873] = 0.0 + k[4564]*y_cur[IDX_H3II]; + data[jistart + 19874] = 0.0 + k[2331]*y_cur[IDX_HII] + k[2332]*y_cur[IDX_HII] + + k[2332]*y_cur[IDX_HII] + k[2667]*y_cur[IDX_H3II] + + k[2668]*y_cur[IDX_H3II]; + data[jistart + 19875] = 0.0 + k[74]*y_cur[IDX_HI] + k[75]*y_cur[IDX_HI] + + k[2366]*y_cur[IDX_C2H2I] + k[2367]*y_cur[IDX_H2OI] + + k[2368]*y_cur[IDX_HCNI] + k[4702]*y_cur[IDX_H2II] + + k[4705]*y_cur[IDX_H3II]; + data[jistart + 19876] = 0.0 + k[2689]*y_cur[IDX_H3II]; + data[jistart + 19877] = 0.0 + k[2761]*y_cur[IDX_H3II]; + data[jistart + 19878] = 0.0 + k[1689]*y_cur[IDX_C2H4I] + k[2161]*y_cur[IDX_CH4I] - + k[2407]*y_cur[IDX_H2I] + k[2529]*y_cur[IDX_H2OI] + + k[2577]*y_cur[IDX_H2SI] - k[5550]*y_cur[IDX_H2I] - + k[5551]*y_cur[IDX_H2I]; + data[jistart + 19879] = 0.0 + k[1546]*y_cur[IDX_C2H2I] + k[1631]*y_cur[IDX_C2H3I] + + k[1693]*y_cur[IDX_C2H4I] + k[1732]*y_cur[IDX_C2HI] + + k[1786]*y_cur[IDX_C3H2I] + k[1796]*y_cur[IDX_C4HI] + + k[1798]*y_cur[IDX_C5H2I] + k[1800]*y_cur[IDX_C5HI] + + k[1802]*y_cur[IDX_C6H2I] + k[1803]*y_cur[IDX_C6HI] + + k[1805]*y_cur[IDX_CH2CCHI] + k[1820]*y_cur[IDX_C3HI] + + k[1857]*y_cur[IDX_CI] + k[2476]*y_cur[IDX_H2CCCI] + + k[3835]*y_cur[IDX_SI] + k[3875]*y_cur[IDX_SiI]; + data[jistart + 19880] = 0.0 + k[4494]*y_cur[IDX_H3II]; + data[jistart + 19881] = 0.0 + k[4004]*y_cur[IDX_H3II]; + data[jistart + 19882] = 0.0 + k[2600]*y_cur[IDX_H3II]; + data[jistart + 19883] = 0.0 + k[4074]*y_cur[IDX_H3II]; + data[jistart + 19884] = 0.0 + k[4179]*y_cur[IDX_H3II]; + data[jistart + 19885] = 0.0 + k[4354]*y_cur[IDX_H3II]; + data[jistart + 19886] = 0.0 + k[1036]*y_cur[IDX_eM] + k[6416]*y_cur[IDX_GRAINM]; + data[jistart + 19887] = 0.0 + k[4249]*y_cur[IDX_H3II]; + data[jistart + 19888] = 0.0 + k[4424]*y_cur[IDX_H3II]; + data[jistart + 19889] = 0.0 - k[2475]*y_cur[IDX_H2I]; + data[jistart + 19890] = 0.0 + k[2598]*y_cur[IDX_H3II]; + data[jistart + 19891] = 0.0 + k[451]*y_cur[IDX_H2II] + k[1962]*y_cur[IDX_CHII] + + k[2721]*y_cur[IDX_H3II] + k[3280]*y_cur[IDX_HeII] - + k[5142]*y_cur[IDX_H2I] + k[5182]*y_cur[IDX_HI]; + data[jistart + 19892] = 0.0 + k[1318]*y_cur[IDX_CII] + k[2302]*y_cur[IDX_HII] + + k[2609]*y_cur[IDX_H3II] + k[6014]; + data[jistart + 19893] = 0.0 + k[2153]*y_cur[IDX_CH4I] - k[2402]*y_cur[IDX_H2I] + + k[3555]*y_cur[IDX_NH3I]; + data[jistart + 19894] = 0.0 + k[793]*y_cur[IDX_eM] + k[1629]*y_cur[IDX_C2H3I] + + k[1759]*y_cur[IDX_C3H2I] + k[1761]*y_cur[IDX_C4HI] + + k[1763]*y_cur[IDX_C5H2I] + k[1765]*y_cur[IDX_C5HI] + + k[1767]*y_cur[IDX_C6H2I] + k[1769]*y_cur[IDX_C6HI] + + k[1782]*y_cur[IDX_H2CCCI] + k[1784]*y_cur[IDX_C4H2I] + + k[1855]*y_cur[IDX_CI] - k[2408]*y_cur[IDX_H2I] + + k[2831]*y_cur[IDX_HI] + k[3873]*y_cur[IDX_SiI] + + k[6463]*y_cur[IDX_GRAINM]; + data[jistart + 19895] = 0.0 + k[2616]*y_cur[IDX_H3II]; + data[jistart + 19896] = 0.0 + k[907]*y_cur[IDX_eM] + k[1976]*y_cur[IDX_CH4I] + + k[1979]*y_cur[IDX_H2COI] + k[1985]*y_cur[IDX_H2SI] - + k[2428]*y_cur[IDX_H2I] + k[2836]*y_cur[IDX_HI] + k[6075] + + k[6316]*y_cur[IDX_GRAINM]; + data[jistart + 19897] = 0.0 - k[2469]*y_cur[IDX_H2I] + k[3771]*y_cur[IDX_C2H6I] + + k[3773]*y_cur[IDX_C2H6I]; + data[jistart + 19898] = 0.0 + k[1012]*y_cur[IDX_eM] - k[2442]*y_cur[IDX_H2I] + + k[2505]*y_cur[IDX_C2H6I] + k[3458]*y_cur[IDX_NI] + + k[3733]*y_cur[IDX_OI] + k[6340]*y_cur[IDX_GRAINM]; + data[jistart + 19899] = 0.0 + k[4144]*y_cur[IDX_H3II]; + data[jistart + 19900] = 0.0 + k[7071] + k[7253] + k[7435]; + data[jistart + 19901] = 0.0 + k[2604]*y_cur[IDX_H3II]; + data[jistart + 19902] = 0.0 + k[1935]*y_cur[IDX_C2HI] + k[1936]*y_cur[IDX_CH2I] + + k[1940]*y_cur[IDX_CH4I] + k[1941]*y_cur[IDX_CH4I] + + k[1943]*y_cur[IDX_CHI] + k[1953]*y_cur[IDX_H2OI] + + k[1955]*y_cur[IDX_H2SI] + k[1956]*y_cur[IDX_HCNI] + + k[1962]*y_cur[IDX_NH2I] + k[1963]*y_cur[IDX_NH3I] + + k[1965]*y_cur[IDX_NHI] + k[1972]*y_cur[IDX_OHI] - + k[2427]*y_cur[IDX_H2I] + k[2835]*y_cur[IDX_HI]; + data[jistart + 19903] = 0.0 + k[2674]*y_cur[IDX_H3II]; + data[jistart + 19904] = 0.0 + k[2585]*y_cur[IDX_H3II]; + data[jistart + 19905] = 0.0 + k[2313]*y_cur[IDX_HII] + k[2630]*y_cur[IDX_H3II]; + data[jistart + 19906] = 0.0 + k[2760]*y_cur[IDX_H3II]; + data[jistart + 19907] = 0.0 + k[2680]*y_cur[IDX_H3II]; + data[jistart + 19908] = 0.0 + k[2717]*y_cur[IDX_H3II]; + data[jistart + 19909] = 0.0 + k[2728]*y_cur[IDX_H3II]; + data[jistart + 19910] = 0.0 + k[2583]*y_cur[IDX_H3II]; + data[jistart + 19911] = 0.0 + k[1505]*y_cur[IDX_C2H2II] + k[2060]*y_cur[IDX_CH3II] + + k[2311]*y_cur[IDX_HII] + k[2627]*y_cur[IDX_H3II]; + data[jistart + 19912] = 0.0 + k[2621]*y_cur[IDX_H3II]; + data[jistart + 19913] = 0.0 + k[2628]*y_cur[IDX_H3II]; + data[jistart + 19914] = 0.0 + k[2625]*y_cur[IDX_H3II]; + data[jistart + 19915] = 0.0 + k[453]*y_cur[IDX_H2II] + k[1965]*y_cur[IDX_CHII] + + k[2724]*y_cur[IDX_H3II] + k[3608]*y_cur[IDX_CH3II] - + k[5143]*y_cur[IDX_H2I] + k[5184]*y_cur[IDX_HI] + + k[5308]*y_cur[IDX_NHI] + k[5308]*y_cur[IDX_NHI]; + data[jistart + 19916] = 0.0 + k[2613]*y_cur[IDX_H3II]; + data[jistart + 19917] = 0.0 + k[2617]*y_cur[IDX_H3II]; + data[jistart + 19918] = 0.0 + k[4669]*y_cur[IDX_H3II]; + data[jistart + 19919] = 0.0 + k[2608]*y_cur[IDX_H3II]; + data[jistart + 19920] = 0.0 + k[2096]*y_cur[IDX_CH3II] + k[2742]*y_cur[IDX_H3II]; + data[jistart + 19921] = 0.0 + k[1501]*y_cur[IDX_C2H2II] + k[1606]*y_cur[IDX_C2H3II] + + k[2058]*y_cur[IDX_CH3II] + k[2309]*y_cur[IDX_HII] + + k[2623]*y_cur[IDX_H3II]; + data[jistart + 19922] = 0.0 + k[757]*y_cur[IDX_eM] + k[760]*y_cur[IDX_eM] + + k[1660]*y_cur[IDX_C6H2I] + k[1664]*y_cur[IDX_C7H2I] + + k[1668]*y_cur[IDX_CH2CCHI] + k[1678]*y_cur[IDX_C4H2I] + + k[1679]*y_cur[IDX_SI] + k[1680]*y_cur[IDX_SiI] + + k[1729]*y_cur[IDX_C2HI] + k[1853]*y_cur[IDX_CI] + + k[2828]*y_cur[IDX_HI] + k[6381]*y_cur[IDX_GRAINM] + + k[6384]*y_cur[IDX_GRAINM]; + data[jistart + 19923] = 0.0 + k[824]*y_cur[IDX_eM] + k[1635]*y_cur[IDX_C2H3I] + + k[1839]*y_cur[IDX_C5H2I] + k[1865]*y_cur[IDX_CI] + + k[2035]*y_cur[IDX_CH2CCHI] + k[2108]*y_cur[IDX_CH3CCHI] + + k[2171]*y_cur[IDX_CH4I] + k[3837]*y_cur[IDX_SI] + + k[6633]*y_cur[IDX_GRAINM]; + data[jistart + 19924] = 0.0 + k[3369]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 19925] = 0.0 + k[1346]*y_cur[IDX_CII] + k[1507]*y_cur[IDX_C2H2II] + + k[1610]*y_cur[IDX_C2H3II] + k[1668]*y_cur[IDX_C2H4II] + + k[1805]*y_cur[IDX_C3H3II] + k[2029]*y_cur[IDX_CH2CCHII] + + k[2033]*y_cur[IDX_C4H2II] + k[2035]*y_cur[IDX_C4H3II] + + k[2037]*y_cur[IDX_C5H2II] + k[2039]*y_cur[IDX_C6H2II] + + k[2315]*y_cur[IDX_HII] + k[2636]*y_cur[IDX_H3II] + + k[3162]*y_cur[IDX_HeII] + k[3163]*y_cur[IDX_HeII] + + k[5256]*y_cur[IDX_NI] + k[5783] + k[6084]; + data[jistart + 19926] = 0.0 + k[1643]*y_cur[IDX_C2H3I] + k[1706]*y_cur[IDX_C2H4I] + + k[1741]*y_cur[IDX_C2HI] + k[1794]*y_cur[IDX_C3H2I] + + k[1828]*y_cur[IDX_C3HI] + k[1892]*y_cur[IDX_CI] + + k[2020]*y_cur[IDX_C4HI] + k[2022]*y_cur[IDX_C5H2I] + + k[2024]*y_cur[IDX_C5HI] + k[2026]*y_cur[IDX_C6H2I] + + k[2027]*y_cur[IDX_C6HI] + k[2029]*y_cur[IDX_CH2CCHI] + + k[2485]*y_cur[IDX_H2CCCI] + k[3838]*y_cur[IDX_SI] + + k[3879]*y_cur[IDX_SiI] - k[5530]*y_cur[IDX_H2I]; + data[jistart + 19927] = 0.0 + k[1497]*y_cur[IDX_C2H2II] + k[1600]*y_cur[IDX_C2H3II] + + k[1769]*y_cur[IDX_C3H2II] + k[1803]*y_cur[IDX_C3H3II] + + k[2027]*y_cur[IDX_CH2CCHII] + k[2056]*y_cur[IDX_CH3II] + + k[2307]*y_cur[IDX_HII] + k[2620]*y_cur[IDX_H3II]; + data[jistart + 19928] = 0.0 + k[1493]*y_cur[IDX_C2H2II] + k[1593]*y_cur[IDX_C2H3II] + + k[1765]*y_cur[IDX_C3H2II] + k[1800]*y_cur[IDX_C3H3II] + + k[2024]*y_cur[IDX_CH2CCHII] + k[2054]*y_cur[IDX_CH3II] + + k[2305]*y_cur[IDX_HII] + k[2615]*y_cur[IDX_H3II]; + data[jistart + 19929] = 0.0 - k[2443]*y_cur[IDX_H2I] + k[2842]*y_cur[IDX_HI] + + k[3459]*y_cur[IDX_NI] + k[3735]*y_cur[IDX_OI]; + data[jistart + 19930] = 0.0 - k[2459]*y_cur[IDX_H2I] + k[3341]*y_cur[IDX_CH4I] + + k[3353]*y_cur[IDX_NH3I]; + data[jistart + 19931] = 0.0 + k[1487]*y_cur[IDX_C2H2II] + k[1584]*y_cur[IDX_C2H3II] + + k[1820]*y_cur[IDX_C3H3II] + k[1822]*y_cur[IDX_C4HII] + + k[1828]*y_cur[IDX_CH2CCHII] + k[2051]*y_cur[IDX_CH3II] + + k[2301]*y_cur[IDX_HII] + k[2603]*y_cur[IDX_H3II]; + data[jistart + 19932] = 0.0 + k[997]*y_cur[IDX_eM] + k[6399]*y_cur[IDX_GRAINM]; + data[jistart + 19933] = 0.0 + k[2601]*y_cur[IDX_H3II]; + data[jistart + 19934] = 0.0 + k[1489]*y_cur[IDX_C2H2II] + k[1587]*y_cur[IDX_C2H3II] + + k[1761]*y_cur[IDX_C3H2II] + k[1796]*y_cur[IDX_C3H3II] + + k[2020]*y_cur[IDX_CH2CCHII] + k[2052]*y_cur[IDX_CH3II] + + k[2303]*y_cur[IDX_HII] + k[2610]*y_cur[IDX_H3II] + + k[4884]*y_cur[IDX_C2H4I] + k[5053]*y_cur[IDX_CH3CHCH2I] + + k[5054]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 19935] = 0.0 - k[2466]*y_cur[IDX_H2I]; + data[jistart + 19936] = 0.0 + k[1520]*y_cur[IDX_C2H2II] + k[1622]*y_cur[IDX_C2H3II] + + k[1678]*y_cur[IDX_C2H4II] + k[1784]*y_cur[IDX_C3H2II] + + k[2080]*y_cur[IDX_CH3II] + k[2342]*y_cur[IDX_HII] + + k[2690]*y_cur[IDX_H3II] + k[3239]*y_cur[IDX_HeII]; + data[jistart + 19937] = 0.0 + k[1633]*y_cur[IDX_C2H3I] + k[1696]*y_cur[IDX_C2H4I] + + k[1863]*y_cur[IDX_CI] + k[2033]*y_cur[IDX_CH2CCHI] + + k[2170]*y_cur[IDX_CH4I] + k[3877]*y_cur[IDX_SiI]; + data[jistart + 19938] = 0.0 + k[2896]*y_cur[IDX_SiI]; + data[jistart + 19939] = 0.0 + k[440]*y_cur[IDX_H2II] + k[1936]*y_cur[IDX_CHII] + + k[1999]*y_cur[IDX_CH3II] + k[2314]*y_cur[IDX_HII] + + k[2634]*y_cur[IDX_H3II] + k[3160]*y_cur[IDX_HeII] + + k[4992]*y_cur[IDX_CH2I] + k[4992]*y_cur[IDX_CH2I] + + k[5007]*y_cur[IDX_O2I] + k[5012]*y_cur[IDX_OI] + + k[5019]*y_cur[IDX_SI] - k[5135]*y_cur[IDX_H2I] + + k[5156]*y_cur[IDX_HI]; + data[jistart + 19940] = 0.0 + k[2706]*y_cur[IDX_H3II]; + data[jistart + 19941] = 0.0 - k[2464]*y_cur[IDX_H2I] + k[3747]*y_cur[IDX_OI]; + data[jistart + 19942] = 0.0 + k[438]*y_cur[IDX_H2II] + k[1303]*y_cur[IDX_CII] + + k[1304]*y_cur[IDX_CII] + k[1687]*y_cur[IDX_C3II] + + k[1689]*y_cur[IDX_C3HII] + k[1693]*y_cur[IDX_C3H3II] + + k[1696]*y_cur[IDX_C4H2II] + k[1699]*y_cur[IDX_C5II] + + k[1701]*y_cur[IDX_C5H2II] + k[1703]*y_cur[IDX_C6H2II] + + k[1705]*y_cur[IDX_C7H2II] + k[1706]*y_cur[IDX_CH2CCHII] + + k[1710]*y_cur[IDX_PII] + k[1711]*y_cur[IDX_PHII] + + k[1713]*y_cur[IDX_PH2II] + k[2046]*y_cur[IDX_CH3II] + + k[2047]*y_cur[IDX_CH3II] + k[2047]*y_cur[IDX_CH3II] + + k[2296]*y_cur[IDX_HII] + k[2297]*y_cur[IDX_HII] + + k[2371]*y_cur[IDX_H2II] + k[2371]*y_cur[IDX_H2II] + + k[2372]*y_cur[IDX_H2II] + k[2589]*y_cur[IDX_H3II] + + k[2589]*y_cur[IDX_H3II] + k[2590]*y_cur[IDX_H3II] + + k[3079]*y_cur[IDX_HeII] + k[3080]*y_cur[IDX_HeII] + + k[4884]*y_cur[IDX_C4HI] + k[4885]*y_cur[IDX_SiI] + + k[5347]*y_cur[IDX_OI] + k[5700] + k[5985]; + data[jistart + 19943] = 0.0 + k[1481]*y_cur[IDX_C2H2II] + k[1629]*y_cur[IDX_C3H2II] + + k[1631]*y_cur[IDX_C3H3II] + k[1633]*y_cur[IDX_C4H2II] + + k[1635]*y_cur[IDX_C4H3II] + k[1637]*y_cur[IDX_C5H2II] + + k[1639]*y_cur[IDX_C6H2II] + k[1641]*y_cur[IDX_C7H2II] + + k[1643]*y_cur[IDX_CH2CCHII] + k[1645]*y_cur[IDX_SII] + + k[2043]*y_cur[IDX_CH3II] + k[2044]*y_cur[IDX_CH3II] + + k[2295]*y_cur[IDX_HII] + k[2588]*y_cur[IDX_H3II] + + k[3077]*y_cur[IDX_HeII] + k[5155]*y_cur[IDX_HI]; + data[jistart + 19944] = 0.0 + k[1165]*y_cur[IDX_eM] + k[1911]*y_cur[IDX_CI] + + k[6337]*y_cur[IDX_GRAINM]; + data[jistart + 19945] = 0.0 + k[2718]*y_cur[IDX_H3II]; + data[jistart + 19946] = 0.0 - k[138]*y_cur[IDX_H2I] + k[138]*y_cur[IDX_H2I] + + k[455]*y_cur[IDX_H2II] + k[2729]*y_cur[IDX_H3II] + + k[5007]*y_cur[IDX_CH2I] - k[5144]*y_cur[IDX_H2I] - + k[5145]*y_cur[IDX_H2I]; + data[jistart + 19947] = 0.0 + k[2102]*y_cur[IDX_CH3I] - k[5562]*y_cur[IDX_H2I]; + data[jistart + 19948] = 0.0 + k[448]*y_cur[IDX_H2II] + k[1955]*y_cur[IDX_CHII] + + k[1985]*y_cur[IDX_CH2II] + k[2078]*y_cur[IDX_CH3II] + + k[2339]*y_cur[IDX_HII] + k[2340]*y_cur[IDX_HII] + + k[2387]*y_cur[IDX_H2II] + k[2388]*y_cur[IDX_H2II] + + k[2388]*y_cur[IDX_H2II] + k[2577]*y_cur[IDX_C3HII] + + k[2686]*y_cur[IDX_H3II] + k[3055]*y_cur[IDX_HSII] + + k[3230]*y_cur[IDX_HeII] + k[3363]*y_cur[IDX_N2II] + + k[3829]*y_cur[IDX_SII] + k[5169]*y_cur[IDX_HI] + k[5842] + k[6165]; + data[jistart + 19949] = 0.0 + k[1645]*y_cur[IDX_C2H3I] + k[2216]*y_cur[IDX_CH4I] - + k[2470]*y_cur[IDX_H2I] + k[3829]*y_cur[IDX_H2SI] - + k[5561]*y_cur[IDX_H2I]; + data[jistart + 19950] = 0.0 + k[1529]*y_cur[IDX_C2H2II] + k[1626]*y_cur[IDX_C2H3II] + + k[1680]*y_cur[IDX_C2H4II] + k[2097]*y_cur[IDX_CH3II] + + k[2236]*y_cur[IDX_CH5II] + k[2502]*y_cur[IDX_H2NCII] + + k[2743]*y_cur[IDX_H3II] + k[2896]*y_cur[IDX_HCNHII] + + k[3873]*y_cur[IDX_C3H2II] + k[3875]*y_cur[IDX_C3H3II] + + k[3877]*y_cur[IDX_C4H2II] + k[3879]*y_cur[IDX_CH2CCHII] + + k[4879]*y_cur[IDX_C2H2I] + k[4885]*y_cur[IDX_C2H4I]; + data[jistart + 19951] = 0.0 + k[745]*y_cur[IDX_eM] + k[746]*y_cur[IDX_eM] + + k[749]*y_cur[IDX_eM] + k[750]*y_cur[IDX_eM] + + k[1535]*y_cur[IDX_C2H2I] + k[1581]*y_cur[IDX_C3H2I] + + k[1584]*y_cur[IDX_C3HI] + k[1587]*y_cur[IDX_C4HI] + + k[1590]*y_cur[IDX_C5H2I] + k[1593]*y_cur[IDX_C5HI] + + k[1596]*y_cur[IDX_C6H2I] + k[1600]*y_cur[IDX_C6HI] + + k[1603]*y_cur[IDX_C7H2I] + k[1606]*y_cur[IDX_C7HI] + + k[1610]*y_cur[IDX_CH2CCHI] + k[1612]*y_cur[IDX_CH3CCHI] + + k[1615]*y_cur[IDX_C2H6I] + k[1616]*y_cur[IDX_H2CCCI] + + k[1622]*y_cur[IDX_C4H2I] + k[1625]*y_cur[IDX_SI] + + k[1626]*y_cur[IDX_SiI] + k[1727]*y_cur[IDX_C2HI] + + k[1851]*y_cur[IDX_CI] + k[2156]*y_cur[IDX_CH4I] + + k[2827]*y_cur[IDX_HI] + k[3390]*y_cur[IDX_NI] + + k[3690]*y_cur[IDX_OI] + k[6360]*y_cur[IDX_GRAINM] + + k[6361]*y_cur[IDX_GRAINM] + k[6364]*y_cur[IDX_GRAINM] + + k[6365]*y_cur[IDX_GRAINM]; + data[jistart + 19952] = 0.0 + k[454]*y_cur[IDX_H2II] + k[2726]*y_cur[IDX_H3II]; + data[jistart + 19953] = 0.0 + k[450]*y_cur[IDX_H2II] + k[2344]*y_cur[IDX_HII] + + k[2697]*y_cur[IDX_H3II] + k[5171]*y_cur[IDX_HI] + + k[5204]*y_cur[IDX_HCOI] + k[5204]*y_cur[IDX_HCOI]; + data[jistart + 19954] = 0.0 + k[442]*y_cur[IDX_H2II] + k[1383]*y_cur[IDX_CII] + + k[1940]*y_cur[IDX_CHII] + k[1941]*y_cur[IDX_CHII] + + k[1976]*y_cur[IDX_CH2II] + k[2074]*y_cur[IDX_CH3II] + + k[2148]*y_cur[IDX_C2II] + k[2149]*y_cur[IDX_C2II] + + k[2153]*y_cur[IDX_C2HII] + k[2154]*y_cur[IDX_C2H2II] + + k[2156]*y_cur[IDX_C2H3II] + k[2158]*y_cur[IDX_C3II] + + k[2161]*y_cur[IDX_C3HII] + k[2166]*y_cur[IDX_C4II] + + k[2168]*y_cur[IDX_C4HII] + k[2170]*y_cur[IDX_C4H2II] + + k[2171]*y_cur[IDX_C4H3II] + k[2175]*y_cur[IDX_C4NII] + + k[2178]*y_cur[IDX_C5II] + k[2180]*y_cur[IDX_C5H2II] + + k[2183]*y_cur[IDX_C6II] + k[2185]*y_cur[IDX_C6H2II] + + k[2187]*y_cur[IDX_C7H2II] + k[2188]*y_cur[IDX_C8H2II] + + k[2203]*y_cur[IDX_HSII] + k[2204]*y_cur[IDX_N2II] + + k[2211]*y_cur[IDX_PII] + k[2212]*y_cur[IDX_PHII] + + k[2214]*y_cur[IDX_PH2II] + k[2216]*y_cur[IDX_SII] + + k[2333]*y_cur[IDX_HII] + k[2378]*y_cur[IDX_H2II] + + k[2669]*y_cur[IDX_H3II] + k[3198]*y_cur[IDX_HeII] + + k[3199]*y_cur[IDX_HeII] + k[3341]*y_cur[IDX_NII] + + k[5159]*y_cur[IDX_HI] + k[5820] + k[6127] + k[6130]; + data[jistart + 19955] = 0.0 + k[439]*y_cur[IDX_H2II] + k[1727]*y_cur[IDX_C2H3II] + + k[1729]*y_cur[IDX_C2H4II] + k[1732]*y_cur[IDX_C3H3II] + + k[1734]*y_cur[IDX_C4HII] + k[1741]*y_cur[IDX_CH2CCHII] + + k[1935]*y_cur[IDX_CHII] + k[2048]*y_cur[IDX_CH3II] + + k[2299]*y_cur[IDX_HII] + k[2597]*y_cur[IDX_H3II] - + k[5133]*y_cur[IDX_H2I]; + data[jistart + 19956] = 0.0 + k[446]*y_cur[IDX_H2II] + k[1979]*y_cur[IDX_CH2II] + + k[2337]*y_cur[IDX_HII] + k[2338]*y_cur[IDX_HII] + + k[2385]*y_cur[IDX_H2II] + k[2495]*y_cur[IDX_CH3OH2II] + + k[2682]*y_cur[IDX_H3II] + k[3219]*y_cur[IDX_HeII] + + k[5165]*y_cur[IDX_HI] + k[5836] + k[6152]; + data[jistart + 19957] = 0.0 + k[449]*y_cur[IDX_H2II] + k[1956]*y_cur[IDX_CHII] + + k[2368]*y_cur[IDX_HM] + k[2694]*y_cur[IDX_H3II] + + k[5170]*y_cur[IDX_HI]; + data[jistart + 19958] = 0.0 - k[134]*y_cur[IDX_H2I] + k[134]*y_cur[IDX_H2I] + + k[443]*y_cur[IDX_H2II] + k[1943]*y_cur[IDX_CHII] + + k[2243]*y_cur[IDX_CH3II] + k[2670]*y_cur[IDX_H3II] - + k[5137]*y_cur[IDX_H2I] + k[5160]*y_cur[IDX_HI] - + k[5556]*y_cur[IDX_H2I]; + data[jistart + 19959] = 0.0 + k[1527]*y_cur[IDX_C2H2II] + k[1625]*y_cur[IDX_C2H3II] + + k[1679]*y_cur[IDX_C2H4II] + k[2095]*y_cur[IDX_CH3II] + + k[2740]*y_cur[IDX_H3II] + k[3835]*y_cur[IDX_C3H3II] + + k[3837]*y_cur[IDX_C4H3II] + k[3838]*y_cur[IDX_CH2CCHII] + + k[5019]*y_cur[IDX_CH2I] - k[5149]*y_cur[IDX_H2I]; + data[jistart + 19960] = 0.0 + k[436]*y_cur[IDX_H2II] + k[2041]*y_cur[IDX_CH3II] + + k[2586]*y_cur[IDX_H3II]; + data[jistart + 19961] = 0.0 - k[139]*y_cur[IDX_H2I] + k[139]*y_cur[IDX_H2I] + + k[456]*y_cur[IDX_H2II] + k[1972]*y_cur[IDX_CHII] + + k[2093]*y_cur[IDX_CH3II] + k[2733]*y_cur[IDX_H3II] + + k[5046]*y_cur[IDX_CH3I] - k[5148]*y_cur[IDX_H2I] + + k[5198]*y_cur[IDX_HI]; + data[jistart + 19962] = 0.0 + k[452]*y_cur[IDX_H2II] + k[1419]*y_cur[IDX_CII] + + k[1963]*y_cur[IDX_CHII] + k[2087]*y_cur[IDX_CH3II] + + k[2723]*y_cur[IDX_H3II] + k[3283]*y_cur[IDX_HeII] + + k[3353]*y_cur[IDX_NII] + k[3555]*y_cur[IDX_C2HII] + + k[3597]*y_cur[IDX_PHII] + k[3600]*y_cur[IDX_PH2II] + + k[5183]*y_cur[IDX_HI] + k[5887] + k[6223]; + data[jistart + 19963] = 0.0 + k[1479]*y_cur[IDX_C2H2I] + k[1481]*y_cur[IDX_C2H3I] + + k[1485]*y_cur[IDX_C3H2I] + k[1487]*y_cur[IDX_C3HI] + + k[1489]*y_cur[IDX_C4HI] + k[1491]*y_cur[IDX_C5H2I] + + k[1493]*y_cur[IDX_C5HI] + k[1495]*y_cur[IDX_C6H2I] + + k[1497]*y_cur[IDX_C6HI] + k[1499]*y_cur[IDX_C7H2I] + + k[1501]*y_cur[IDX_C7HI] + k[1503]*y_cur[IDX_C8H2I] + + k[1505]*y_cur[IDX_C8HI] + k[1507]*y_cur[IDX_CH2CCHI] + + k[1510]*y_cur[IDX_CH3CCHI] + k[1516]*y_cur[IDX_H2CCCI] + + k[1520]*y_cur[IDX_C4H2I] + k[1527]*y_cur[IDX_SI] + + k[1529]*y_cur[IDX_SiI] + k[1531]*y_cur[IDX_SiH4I] + + k[2154]*y_cur[IDX_CH4I] - k[2403]*y_cur[IDX_H2I] + + k[3387]*y_cur[IDX_NI] - k[5549]*y_cur[IDX_H2I]; + data[jistart + 19964] = 0.0 + k[924]*y_cur[IDX_eM] + k[1894]*y_cur[IDX_CI] + + k[1999]*y_cur[IDX_CH2I] + k[2041]*y_cur[IDX_C2I] + + k[2042]*y_cur[IDX_C2H2I] + k[2043]*y_cur[IDX_C2H3I] + + k[2044]*y_cur[IDX_C2H3I] + k[2046]*y_cur[IDX_C2H4I] + + k[2047]*y_cur[IDX_C2H4I] + k[2047]*y_cur[IDX_C2H4I] + + k[2048]*y_cur[IDX_C2HI] + k[2050]*y_cur[IDX_C3H2I] + + k[2051]*y_cur[IDX_C3HI] + k[2052]*y_cur[IDX_C4HI] + + k[2053]*y_cur[IDX_C5H2I] + k[2054]*y_cur[IDX_C5HI] + + k[2055]*y_cur[IDX_C6H2I] + k[2056]*y_cur[IDX_C6HI] + + k[2057]*y_cur[IDX_C7H2I] + k[2058]*y_cur[IDX_C7HI] + + k[2059]*y_cur[IDX_C8H2I] + k[2060]*y_cur[IDX_C8HI] + + k[2063]*y_cur[IDX_C2H6I] + k[2063]*y_cur[IDX_C2H6I] + + k[2064]*y_cur[IDX_C2H6I] + k[2074]*y_cur[IDX_CH4I] + + k[2076]*y_cur[IDX_H2CCCI] + k[2078]*y_cur[IDX_H2SI] + + k[2080]*y_cur[IDX_C4H2I] + k[2083]*y_cur[IDX_HClI] + + k[2084]*y_cur[IDX_HSI] + k[2085]*y_cur[IDX_N2OI] + + k[2087]*y_cur[IDX_NH3I] + k[2091]*y_cur[IDX_OI] + + k[2093]*y_cur[IDX_OHI] + k[2095]*y_cur[IDX_SI] + + k[2096]*y_cur[IDX_SOI] + k[2097]*y_cur[IDX_SiI] + + k[2100]*y_cur[IDX_SiHI] + k[2243]*y_cur[IDX_CHI] + + k[2837]*y_cur[IDX_HI] + k[3608]*y_cur[IDX_NHI] - + k[5555]*y_cur[IDX_H2I] + k[6095] + k[6322]*y_cur[IDX_GRAINM]; + data[jistart + 19965] = 0.0 + k[437]*y_cur[IDX_H2II] + k[1479]*y_cur[IDX_C2H2II] + + k[1535]*y_cur[IDX_C2H3II] + k[1539]*y_cur[IDX_C2H5II] + + k[1546]*y_cur[IDX_C3H3II] + k[1548]*y_cur[IDX_C3H5II] + + k[1553]*y_cur[IDX_C4H4II] + k[1560]*y_cur[IDX_C7H2II] + + k[1571]*y_cur[IDX_PH2II] + k[1572]*y_cur[IDX_PH3II] + + k[1576]*y_cur[IDX_SiC2HII] + k[2042]*y_cur[IDX_CH3II] + + k[2134]*y_cur[IDX_CH4II] + k[2366]*y_cur[IDX_HM] + + k[2587]*y_cur[IDX_H3II] + k[3074]*y_cur[IDX_HeII] + + k[4879]*y_cur[IDX_SiI] + k[4911]*y_cur[IDX_CI] + + k[5154]*y_cur[IDX_HI]; + data[jistart + 19966] = 0.0 + k[444]*y_cur[IDX_H2II] + k[2671]*y_cur[IDX_H3II] - + k[5138]*y_cur[IDX_H2I]; + data[jistart + 19967] = 0.0 + k[8273]*y_cur[IDX_GHI] + k[8273]*y_cur[IDX_GHI]; + data[jistart + 19968] = 0.0 + k[1352]*y_cur[IDX_CII] + k[2102]*y_cur[IDX_SiII] + + k[2641]*y_cur[IDX_H3II] + k[3176]*y_cur[IDX_HeII] + + k[5026]*y_cur[IDX_CH3I] + k[5026]*y_cur[IDX_CH3I] + + k[5043]*y_cur[IDX_OI] + k[5046]*y_cur[IDX_OHI] - + k[5136]*y_cur[IDX_H2I] + k[5158]*y_cur[IDX_HI] + + k[5258]*y_cur[IDX_NI] + k[5795] + k[6099]; + data[jistart + 19969] = 0.0 + k[3387]*y_cur[IDX_C2H2II] + k[3390]*y_cur[IDX_C2H3II] + + k[3399]*y_cur[IDX_C3H4II] + k[3401]*y_cur[IDX_C3H5II] + + k[3417]*y_cur[IDX_C5H5II] + k[3435]*y_cur[IDX_C7H5II] + + k[3458]*y_cur[IDX_H2OII] + k[3459]*y_cur[IDX_H2SII] + + k[3473]*y_cur[IDX_SiH3II] - k[5141]*y_cur[IDX_H2I] + + k[5256]*y_cur[IDX_CH2CCHI] + k[5258]*y_cur[IDX_CH3I] + + k[5295]*y_cur[IDX_SiH3I]; + data[jistart + 19970] = 0.0 + k[1042]*y_cur[IDX_eM] + k[1043]*y_cur[IDX_eM] + + k[1901]*y_cur[IDX_CI] + k[2815]*y_cur[IDX_PI] + + k[6344]*y_cur[IDX_GRAINM] + k[6345]*y_cur[IDX_GRAINM]; + data[jistart + 19971] = 0.0 + k[2091]*y_cur[IDX_CH3II] + k[2731]*y_cur[IDX_H3II] + + k[3690]*y_cur[IDX_C2H3II] + k[3728]*y_cur[IDX_CH5II] + + k[3733]*y_cur[IDX_H2OII] + k[3735]*y_cur[IDX_H2SII] + + k[3747]*y_cur[IDX_NH3II] + k[3759]*y_cur[IDX_SiH3II] + + k[3760]*y_cur[IDX_SiH5II] + k[5012]*y_cur[IDX_CH2I] + + k[5043]*y_cur[IDX_CH3I] - k[5147]*y_cur[IDX_H2I] + + k[5347]*y_cur[IDX_C2H4I] + k[5396]*y_cur[IDX_H2CNI] + + k[5435]*y_cur[IDX_PH2I] + k[5445]*y_cur[IDX_SiH2I]; + data[jistart + 19972] = 0.0 - k[458]*y_cur[IDX_H2I] - k[2457]*y_cur[IDX_H2I] + + k[3074]*y_cur[IDX_C2H2I] + k[3077]*y_cur[IDX_C2H3I] + + k[3079]*y_cur[IDX_C2H4I] + k[3080]*y_cur[IDX_C2H4I] + + k[3083]*y_cur[IDX_C2H5I] + k[3120]*y_cur[IDX_C5H2I] + + k[3128]*y_cur[IDX_C6H2I] + k[3137]*y_cur[IDX_C7H2I] + + k[3145]*y_cur[IDX_C8H2I] + k[3152]*y_cur[IDX_C9H2I] + + k[3160]*y_cur[IDX_CH2I] + k[3162]*y_cur[IDX_CH2CCHI] + + k[3163]*y_cur[IDX_CH2CCHI] + k[3167]*y_cur[IDX_CH2CHCNI] + + k[3176]*y_cur[IDX_CH3I] + k[3178]*y_cur[IDX_CH3C4HI] + + k[3181]*y_cur[IDX_CH3C6HI] + k[3184]*y_cur[IDX_CH3CCHI] + + k[3184]*y_cur[IDX_CH3CCHI] + k[3185]*y_cur[IDX_CH3CCHI] + + k[3186]*y_cur[IDX_CH3CCHI] + k[3188]*y_cur[IDX_C2H6I] + + k[3188]*y_cur[IDX_C2H6I] + k[3189]*y_cur[IDX_C2H6I] + + k[3190]*y_cur[IDX_C2H6I] + k[3198]*y_cur[IDX_CH4I] + + k[3199]*y_cur[IDX_CH4I] + k[3217]*y_cur[IDX_H2CCCI] + + k[3219]*y_cur[IDX_H2COI] + k[3222]*y_cur[IDX_H2CSI] + + k[3230]*y_cur[IDX_H2SI] + k[3239]*y_cur[IDX_C4H2I] + + k[3280]*y_cur[IDX_NH2I] + k[3283]*y_cur[IDX_NH3I] + + k[3298]*y_cur[IDX_PH2I] + k[3322]*y_cur[IDX_SiH2I] + + k[3324]*y_cur[IDX_SiH3I] + k[3326]*y_cur[IDX_SiH4I] + + k[3326]*y_cur[IDX_SiH4I] + k[3327]*y_cur[IDX_SiH4I]; + data[jistart + 19973] = 0.0 + k[1297]*y_cur[IDX_C10H2I] + k[1303]*y_cur[IDX_C2H4I] + + k[1304]*y_cur[IDX_C2H4I] + k[1306]*y_cur[IDX_C2H5I] + + k[1310]*y_cur[IDX_C3H2I] + k[1318]*y_cur[IDX_C4H3I] + + k[1323]*y_cur[IDX_C5H2I] + k[1326]*y_cur[IDX_C6H2I] + + k[1332]*y_cur[IDX_C7H2I] + k[1335]*y_cur[IDX_C8H2I] + + k[1338]*y_cur[IDX_C9H2I] + k[1345]*y_cur[IDX_CH2CCH2I] + + k[1346]*y_cur[IDX_CH2CCHI] + k[1351]*y_cur[IDX_CH2PHI] + + k[1352]*y_cur[IDX_CH3I] + k[1357]*y_cur[IDX_CH3C4HI] + + k[1361]*y_cur[IDX_CH3C6HI] + k[1365]*y_cur[IDX_CH3CCHI] + + k[1371]*y_cur[IDX_C2H6I] + k[1371]*y_cur[IDX_C2H6I] + + k[1372]*y_cur[IDX_C2H6I] + k[1377]*y_cur[IDX_CH3CHCH2I] + + k[1383]*y_cur[IDX_CH4I] + k[1388]*y_cur[IDX_H2CCCI] + + k[1419]*y_cur[IDX_NH3I] + k[1435]*y_cur[IDX_SiCH2I] + + k[1437]*y_cur[IDX_SiCH3I] + k[1440]*y_cur[IDX_SiH2I] + + k[1441]*y_cur[IDX_SiH3I] + k[1443]*y_cur[IDX_SiH4I] - + k[2398]*y_cur[IDX_H2I] - k[5548]*y_cur[IDX_H2I]; + data[jistart + 19974] = 0.0 - k[136]*y_cur[IDX_H2I] + k[136]*y_cur[IDX_H2I] + + k[447]*y_cur[IDX_H2II] + k[1953]*y_cur[IDX_CHII] + + k[2367]*y_cur[IDX_HM] + k[2529]*y_cur[IDX_C3HII] + + k[2563]*y_cur[IDX_PII] + k[2565]*y_cur[IDX_PHII] + + k[2567]*y_cur[IDX_PH2II] + k[2684]*y_cur[IDX_H3II] + + k[3490]*y_cur[IDX_NHII] + k[5168]*y_cur[IDX_HI] + k[6161]; + data[jistart + 19975] = 0.0 + k[327]*y_cur[IDX_C2H5I] + k[2294]*y_cur[IDX_C10H2I] + + k[2295]*y_cur[IDX_C2H3I] + k[2296]*y_cur[IDX_C2H4I] + + k[2297]*y_cur[IDX_C2H4I] + k[2298]*y_cur[IDX_C2H5I] + + k[2299]*y_cur[IDX_C2HI] + k[2300]*y_cur[IDX_C3H2I] + + k[2301]*y_cur[IDX_C3HI] + k[2302]*y_cur[IDX_C4H3I] + + k[2303]*y_cur[IDX_C4HI] + k[2304]*y_cur[IDX_C5H2I] + + k[2305]*y_cur[IDX_C5HI] + k[2306]*y_cur[IDX_C6H2I] + + k[2307]*y_cur[IDX_C6HI] + k[2308]*y_cur[IDX_C7H2I] + + k[2309]*y_cur[IDX_C7HI] + k[2310]*y_cur[IDX_C8H2I] + + k[2311]*y_cur[IDX_C8HI] + k[2312]*y_cur[IDX_C9H2I] + + k[2313]*y_cur[IDX_C9HI] + k[2314]*y_cur[IDX_CH2I] + + k[2315]*y_cur[IDX_CH2CCHI] + k[2316]*y_cur[IDX_CH2CHCNI] + + k[2321]*y_cur[IDX_CH3C4HI] + k[2323]*y_cur[IDX_CH3C6HI] + + k[2325]*y_cur[IDX_CH3CCHI] + k[2326]*y_cur[IDX_C2H6I] + + k[2326]*y_cur[IDX_C2H6I] + k[2327]*y_cur[IDX_C2H6I] + + k[2328]*y_cur[IDX_CH3CNI] + k[2331]*y_cur[IDX_CH3OHI] + + k[2332]*y_cur[IDX_CH3OHI] + k[2332]*y_cur[IDX_CH3OHI] + + k[2333]*y_cur[IDX_CH4I] + k[2335]*y_cur[IDX_H2CCCI] + + k[2337]*y_cur[IDX_H2COI] + k[2338]*y_cur[IDX_H2COI] + + k[2339]*y_cur[IDX_H2SI] + k[2340]*y_cur[IDX_H2SI] + + k[2341]*y_cur[IDX_H2SiOI] + k[2342]*y_cur[IDX_C4H2I] + + k[2344]*y_cur[IDX_HCOI] + k[2346]*y_cur[IDX_HCSI] + + k[2347]*y_cur[IDX_HCSiI] + k[2349]*y_cur[IDX_HNOI] + + k[2350]*y_cur[IDX_HNSiI] + k[2353]*y_cur[IDX_HSI] + + k[2357]*y_cur[IDX_SiC2H2I] + k[2358]*y_cur[IDX_SiC2HI] + + k[2359]*y_cur[IDX_SiC3HI] + k[2360]*y_cur[IDX_SiCH2I] + + k[2361]*y_cur[IDX_SiCH3I] + k[2362]*y_cur[IDX_SiH2I] + + k[2363]*y_cur[IDX_SiH3I] + k[2364]*y_cur[IDX_SiH4I] + + k[2365]*y_cur[IDX_SiHI] + k[3022]*y_cur[IDX_HNC3I]; + data[jistart + 19976] = 0.0 + k[1848]*y_cur[IDX_C10H2II] + k[1851]*y_cur[IDX_C2H3II] + + k[1853]*y_cur[IDX_C2H4II] + k[1855]*y_cur[IDX_C3H2II] + + k[1857]*y_cur[IDX_C3H3II] + k[1859]*y_cur[IDX_C3H4II] + + k[1861]*y_cur[IDX_C3H5II] + k[1863]*y_cur[IDX_C4H2II] + + k[1865]*y_cur[IDX_C4H3II] + k[1868]*y_cur[IDX_C5H2II] + + k[1870]*y_cur[IDX_C5H3II] + k[1872]*y_cur[IDX_C6H2II] + + k[1874]*y_cur[IDX_C6H3II] + k[1877]*y_cur[IDX_C7H2II] + + k[1879]*y_cur[IDX_C7H3II] + k[1881]*y_cur[IDX_C8H2II] + + k[1883]*y_cur[IDX_C8H3II] + k[1886]*y_cur[IDX_C9H2II] + + k[1888]*y_cur[IDX_C9H3II] + k[1892]*y_cur[IDX_CH2CCHII] + + k[1894]*y_cur[IDX_CH3II] + k[1901]*y_cur[IDX_H3OII] + + k[1911]*y_cur[IDX_NH4II] + k[1921]*y_cur[IDX_SiCH2II] + + k[1928]*y_cur[IDX_SiH4II] + k[1930]*y_cur[IDX_SiNH2II] + + k[2632]*y_cur[IDX_H3II] + k[4911]*y_cur[IDX_C2H2I] + + k[4950]*y_cur[IDX_CH3C4HI] + k[4951]*y_cur[IDX_CH3C6HI] + + k[4953]*y_cur[IDX_CH3CCHI] + k[4954]*y_cur[IDX_CH3CHCH2I] + + k[4960]*y_cur[IDX_H2CNI] - k[5134]*y_cur[IDX_H2I] - + k[5554]*y_cur[IDX_H2I]; + data[jistart + 19977] = 0.0 + k[1025]*y_cur[IDX_eM] + k[2583]*y_cur[IDX_C10I] + + k[2584]*y_cur[IDX_C10H2I] + k[2585]*y_cur[IDX_C10HI] + + k[2586]*y_cur[IDX_C2I] + k[2587]*y_cur[IDX_C2H2I] + + k[2588]*y_cur[IDX_C2H3I] + k[2589]*y_cur[IDX_C2H4I] + + k[2589]*y_cur[IDX_C2H4I] + k[2590]*y_cur[IDX_C2H4I] + + k[2591]*y_cur[IDX_C2H5I] + k[2592]*y_cur[IDX_C2H5OHI] + + k[2592]*y_cur[IDX_C2H5OHI] + k[2593]*y_cur[IDX_C2H5OHI] + + k[2595]*y_cur[IDX_C2H5OHI] + k[2595]*y_cur[IDX_C2H5OHI] + + k[2596]*y_cur[IDX_C2H5OHI] + k[2597]*y_cur[IDX_C2HI] + + k[2598]*y_cur[IDX_C2NI] + k[2599]*y_cur[IDX_C2OI] + + k[2600]*y_cur[IDX_C2SI] + k[2601]*y_cur[IDX_C3I] + + k[2602]*y_cur[IDX_C3H2I] + k[2603]*y_cur[IDX_C3HI] + + k[2604]*y_cur[IDX_C3NI] + k[2605]*y_cur[IDX_C3OI] + + k[2606]*y_cur[IDX_C3PI] + k[2607]*y_cur[IDX_C3SI] + + k[2608]*y_cur[IDX_C4I] + k[2609]*y_cur[IDX_C4H3I] + + k[2610]*y_cur[IDX_C4HI] + k[2611]*y_cur[IDX_C4PI] + + k[2612]*y_cur[IDX_C4SI] + k[2613]*y_cur[IDX_C5I] + + k[2614]*y_cur[IDX_C5H2I] + k[2615]*y_cur[IDX_C5HI] + + k[2616]*y_cur[IDX_C5NI] + k[2617]*y_cur[IDX_C6I] + + k[2618]*y_cur[IDX_C6H2I] + k[2619]*y_cur[IDX_C6H6I] + + k[2620]*y_cur[IDX_C6HI] + k[2621]*y_cur[IDX_C7I] + + k[2622]*y_cur[IDX_C7H2I] + k[2623]*y_cur[IDX_C7HI] + + k[2624]*y_cur[IDX_C7NI] + k[2625]*y_cur[IDX_C8I] + + k[2626]*y_cur[IDX_C8H2I] + k[2627]*y_cur[IDX_C8HI] + + k[2628]*y_cur[IDX_C9I] + k[2629]*y_cur[IDX_C9H2I] + + k[2630]*y_cur[IDX_C9HI] + k[2631]*y_cur[IDX_C9NI] + + k[2632]*y_cur[IDX_CI] + k[2633]*y_cur[IDX_CCPI] + + k[2634]*y_cur[IDX_CH2I] + k[2635]*y_cur[IDX_CH2CCH2I] + + k[2635]*y_cur[IDX_CH2CCH2I] + k[2636]*y_cur[IDX_CH2CCHI] + + k[2637]*y_cur[IDX_CH2CHCNI] + k[2638]*y_cur[IDX_CH2CNI] + + k[2639]*y_cur[IDX_CH2COI] + k[2640]*y_cur[IDX_CH2PHI] + + k[2641]*y_cur[IDX_CH3I] + k[2642]*y_cur[IDX_CH3C3NI] + + k[2643]*y_cur[IDX_CH3C4HI] + k[2644]*y_cur[IDX_CH3C5NI] + + k[2645]*y_cur[IDX_CH3C6HI] + k[2646]*y_cur[IDX_CH3C7NI] + + k[2647]*y_cur[IDX_CH3CCHI] + k[2647]*y_cur[IDX_CH3CCHI] + + k[2648]*y_cur[IDX_C2H6I] + k[2648]*y_cur[IDX_C2H6I] + + k[2649]*y_cur[IDX_CH3CHCH2I] + k[2650]*y_cur[IDX_CH3CHCH2I] + + k[2650]*y_cur[IDX_CH3CHCH2I] + k[2651]*y_cur[IDX_CH3CHOI] + + k[2654]*y_cur[IDX_CH3CHOI] + k[2655]*y_cur[IDX_CH3CHOI] + + k[2655]*y_cur[IDX_CH3CHOI] + k[2658]*y_cur[IDX_CH3CNI] + + k[2660]*y_cur[IDX_CH3COCH3I] + k[2662]*y_cur[IDX_CH3COCH3I] + + k[2663]*y_cur[IDX_CH3COCH3I] + k[2666]*y_cur[IDX_CH3OCH3I] + + k[2667]*y_cur[IDX_CH3OHI] + k[2668]*y_cur[IDX_CH3OHI] + + k[2669]*y_cur[IDX_CH4I] + k[2670]*y_cur[IDX_CHI] + + k[2671]*y_cur[IDX_CNI] + k[2672]*y_cur[IDX_CNOI] + + k[2673]*y_cur[IDX_CNOI] + k[2674]*y_cur[IDX_CO2I] + + k[2675]*y_cur[IDX_COI] + k[2676]*y_cur[IDX_COI] + + k[2677]*y_cur[IDX_CPI] + k[2678]*y_cur[IDX_CSI] + + k[2679]*y_cur[IDX_ClI] + k[2680]*y_cur[IDX_FeI] + + k[2681]*y_cur[IDX_H2CCCI] + k[2682]*y_cur[IDX_H2COI] + + k[2683]*y_cur[IDX_H2CSI] + k[2684]*y_cur[IDX_H2OI] + + k[2685]*y_cur[IDX_H2S2I] + k[2686]*y_cur[IDX_H2SI] + + k[2687]*y_cur[IDX_H2SiOI] + k[2688]*y_cur[IDX_HC2PI] + + k[2689]*y_cur[IDX_HC3NI] + k[2690]*y_cur[IDX_C4H2I] + + k[2691]*y_cur[IDX_HC5NI] + k[2692]*y_cur[IDX_HC7NI] + + k[2693]*y_cur[IDX_HC9NI] + k[2694]*y_cur[IDX_HCNI] + + k[2695]*y_cur[IDX_HCNOI] + k[2696]*y_cur[IDX_HCNOI] + + k[2697]*y_cur[IDX_HCOI] + k[2698]*y_cur[IDX_HCOOCH3I] + + k[2699]*y_cur[IDX_HCOOHI] + k[2700]*y_cur[IDX_HCOOHI] + + k[2701]*y_cur[IDX_HCPI] + k[2702]*y_cur[IDX_HCSI] + + k[2703]*y_cur[IDX_HCSiI] + k[2704]*y_cur[IDX_HClI] + + k[2705]*y_cur[IDX_HFI] + k[2706]*y_cur[IDX_HNCI] + + k[2707]*y_cur[IDX_HNCOI] + k[2708]*y_cur[IDX_HNCOI] + + k[2709]*y_cur[IDX_HNOI] + k[2710]*y_cur[IDX_HNSiI] + + k[2711]*y_cur[IDX_HOCNI] + k[2712]*y_cur[IDX_HOCNI] + + k[2713]*y_cur[IDX_HONCI] + k[2714]*y_cur[IDX_HPOI] + + k[2715]*y_cur[IDX_HS2I] + k[2716]*y_cur[IDX_HSI] + + k[2717]*y_cur[IDX_MgI] + k[2718]*y_cur[IDX_N2I] + + k[2719]*y_cur[IDX_N2OI] + k[2720]*y_cur[IDX_NCCNI] + + k[2721]*y_cur[IDX_NH2I] + k[2722]*y_cur[IDX_NH2CNI] + + k[2723]*y_cur[IDX_NH3I] + k[2724]*y_cur[IDX_NHI] + + k[2725]*y_cur[IDX_NO2I] + k[2726]*y_cur[IDX_NOI] + + k[2727]*y_cur[IDX_NSI] + k[2728]*y_cur[IDX_NaI] + + k[2729]*y_cur[IDX_O2I] + k[2731]*y_cur[IDX_OI] + + k[2732]*y_cur[IDX_OCSI] + k[2733]*y_cur[IDX_OHI] + + k[2734]*y_cur[IDX_PI] + k[2735]*y_cur[IDX_PH2I] + + k[2736]*y_cur[IDX_PHI] + k[2737]*y_cur[IDX_PNI] + + k[2738]*y_cur[IDX_POI] + k[2739]*y_cur[IDX_S2I] + + k[2740]*y_cur[IDX_SI] + k[2741]*y_cur[IDX_SO2I] + + k[2742]*y_cur[IDX_SOI] + k[2743]*y_cur[IDX_SiI] + + k[2744]*y_cur[IDX_SiC2I] + k[2745]*y_cur[IDX_SiC2H2I] + + k[2746]*y_cur[IDX_SiC2HI] + k[2747]*y_cur[IDX_SiC3I] + + k[2748]*y_cur[IDX_SiC3HI] + k[2749]*y_cur[IDX_SiC4I] + + k[2750]*y_cur[IDX_SiCI] + k[2751]*y_cur[IDX_SiCH2I] + + k[2752]*y_cur[IDX_SiCH3I] + k[2753]*y_cur[IDX_SiH2I] + + k[2754]*y_cur[IDX_SiH3I] + k[2755]*y_cur[IDX_SiH4I] + + k[2756]*y_cur[IDX_SiHI] + k[2757]*y_cur[IDX_SiNI] + + k[2758]*y_cur[IDX_SiNCI] + k[2759]*y_cur[IDX_SiO2I] + + k[2760]*y_cur[IDX_SiOI] + k[2761]*y_cur[IDX_SiSI] + + k[3027]*y_cur[IDX_HNC3I] + k[3767]*y_cur[IDX_OCNI] + + k[3768]*y_cur[IDX_OCNI] + k[3899]*y_cur[IDX_CM] + + k[3934]*y_cur[IDX_C10M] + k[3969]*y_cur[IDX_C10HM] + + k[4004]*y_cur[IDX_C2M] + k[4039]*y_cur[IDX_C2HM] + + k[4074]*y_cur[IDX_C3M] + k[4109]*y_cur[IDX_C3HM] + + k[4144]*y_cur[IDX_C3NM] + k[4179]*y_cur[IDX_C4M] + + k[4214]*y_cur[IDX_C4HM] + k[4249]*y_cur[IDX_C5M] + + k[4284]*y_cur[IDX_C5HM] + k[4319]*y_cur[IDX_C5NM] + + k[4354]*y_cur[IDX_C6M] + k[4389]*y_cur[IDX_C6HM] + + k[4424]*y_cur[IDX_C7M] + k[4459]*y_cur[IDX_C7HM] + + k[4494]*y_cur[IDX_C8M] + k[4529]*y_cur[IDX_C8HM] + + k[4564]*y_cur[IDX_C9M] + k[4599]*y_cur[IDX_C9HM] + + k[4634]*y_cur[IDX_CHM] + k[4669]*y_cur[IDX_CNM] + + k[4705]*y_cur[IDX_HM] + k[4740]*y_cur[IDX_OM] + + k[4775]*y_cur[IDX_O2M] + k[4810]*y_cur[IDX_OHM] + + k[4845]*y_cur[IDX_SM] + k[5628]*y_cur[IDX_CH3OI] + + k[5634]*y_cur[IDX_CH2OHI] + k[5640]*y_cur[IDX_CH3COI] + + k[5645]*y_cur[IDX_COOHI] + k[5650]*y_cur[IDX_COOCH3I] + + k[5656]*y_cur[IDX_CH2OHCOI] + k[5662]*y_cur[IDX_CH2OHCHOI] + + k[5668]*y_cur[IDX_CH3COOHI] + k[6169] + k[6310]*y_cur[IDX_GRAINM]; + data[jistart + 19978] = 0.0 + k[445]*y_cur[IDX_H2II] + k[2675]*y_cur[IDX_H3II] + + k[2676]*y_cur[IDX_H3II]; + data[jistart + 19979] = 0.0 + k[6310]*y_cur[IDX_H3II] + k[6316]*y_cur[IDX_CH2II] + + k[6322]*y_cur[IDX_CH3II] + k[6332]*y_cur[IDX_CH5II] + + k[6333]*y_cur[IDX_CH5II] + k[6336]*y_cur[IDX_CH5II] + + k[6336]*y_cur[IDX_CH5II] + k[6337]*y_cur[IDX_NH4II] + + k[6340]*y_cur[IDX_H2OII] + k[6344]*y_cur[IDX_H3OII] + + k[6345]*y_cur[IDX_H3OII] + k[6349]*y_cur[IDX_H2FII] + + k[6360]*y_cur[IDX_C2H3II] + k[6361]*y_cur[IDX_C2H3II] + + k[6364]*y_cur[IDX_C2H3II] + k[6365]*y_cur[IDX_C2H3II] + + k[6376]*y_cur[IDX_H2NCII] + k[6381]*y_cur[IDX_C2H4II] + + k[6384]*y_cur[IDX_C2H4II] + k[6391]*y_cur[IDX_C2H5II] + + k[6399]*y_cur[IDX_H2COII] + k[6402]*y_cur[IDX_SiH2II] + + k[6405]*y_cur[IDX_CH3NHII] + k[6405]*y_cur[IDX_CH3NHII] + + k[6406]*y_cur[IDX_CH3NHII] + k[6410]*y_cur[IDX_C2H6II] + + k[6413]*y_cur[IDX_SiH3II] + k[6416]*y_cur[IDX_H3COII] + + k[6419]*y_cur[IDX_C2H7II] + k[6426]*y_cur[IDX_SiH4II] + + k[6432]*y_cur[IDX_H2NOII] + k[6434]*y_cur[IDX_PH2II] + + k[6438]*y_cur[IDX_SiH5II] + k[6444]*y_cur[IDX_CH3OH2II] + + k[6449]*y_cur[IDX_PH3II] + k[6451]*y_cur[IDX_H3SII] + + k[6453]*y_cur[IDX_H3SII] + k[6463]*y_cur[IDX_C3H2II] + + k[6482]*y_cur[IDX_C3H5II] + k[6498]*y_cur[IDX_SiCH2II] + + k[6499]*y_cur[IDX_C3H6II] + k[6500]*y_cur[IDX_C3H6II] + + k[6504]*y_cur[IDX_C3H7II] + k[6507]*y_cur[IDX_C3H7II] + + k[6508]*y_cur[IDX_C3H7II] + k[6516]*y_cur[IDX_SiCH3II] + + k[6541]*y_cur[IDX_SiCH4II] + k[6553]*y_cur[IDX_SiNH2II] + + k[6569]*y_cur[IDX_PCH2II] + k[6578]*y_cur[IDX_PCH3II] + + k[6579]*y_cur[IDX_PCH3II] + k[6586]*y_cur[IDX_H2SiOII] + + k[6591]*y_cur[IDX_H3SiOII] + k[6595]*y_cur[IDX_PNH2II] + + k[6597]*y_cur[IDX_PCH4II] + k[6601]*y_cur[IDX_H3CSII] + + k[6619]*y_cur[IDX_PNH3II] + k[6633]*y_cur[IDX_C4H3II] + + k[6638]*y_cur[IDX_HC3NHII] + k[6645]*y_cur[IDX_C4H5II] + + k[6645]*y_cur[IDX_C4H5II] + k[6647]*y_cur[IDX_C4H5II] + + k[6651]*y_cur[IDX_CH2CHCNII] + k[6660]*y_cur[IDX_SiC2H2II] + + k[6665]*y_cur[IDX_SiC2H3II] + k[6666]*y_cur[IDX_H3C3OII] + + k[6667]*y_cur[IDX_C4H7II] + k[6667]*y_cur[IDX_C4H7II] + + k[6680]*y_cur[IDX_PC2H2II] + k[6685]*y_cur[IDX_PC2H3II] + + k[6686]*y_cur[IDX_PC2H3II] + k[6689]*y_cur[IDX_PC2H4II] + + k[6689]*y_cur[IDX_PC2H4II] + k[6690]*y_cur[IDX_PC2H4II] + + k[6738]*y_cur[IDX_C5H2II] + k[6743]*y_cur[IDX_C5H3II] + + k[6748]*y_cur[IDX_CH3C4HII] + k[6749]*y_cur[IDX_CH3C4HII] + + k[6753]*y_cur[IDX_C5H5II] + k[6767]*y_cur[IDX_SiC3H2II] + + k[6771]*y_cur[IDX_H3S2II] + k[6785]*y_cur[IDX_C6H2II] + + k[6790]*y_cur[IDX_C6H3II] + k[6791]*y_cur[IDX_HC5NHII] + + k[6796]*y_cur[IDX_C6H4II] + k[6797]*y_cur[IDX_C6H4II] + + k[6802]*y_cur[IDX_C6H5II] + k[6803]*y_cur[IDX_C6H5II] + + k[6803]*y_cur[IDX_C6H5II] + k[6804]*y_cur[IDX_H3C5NII] + + k[6805]*y_cur[IDX_H3C5NII] + k[6806]*y_cur[IDX_C6H6II] + + k[6806]*y_cur[IDX_C6H6II] + k[6807]*y_cur[IDX_C6H7II] + + k[6807]*y_cur[IDX_C6H7II] + k[6826]*y_cur[IDX_C7H2II] + + k[6829]*y_cur[IDX_C7H3II] + k[6830]*y_cur[IDX_C7H4II] + + k[6831]*y_cur[IDX_C7H4II] + k[6832]*y_cur[IDX_C7H5II] + + k[6841]*y_cur[IDX_C8H2II] + k[6846]*y_cur[IDX_C8H3II] + + k[6847]*y_cur[IDX_C8H4II] + k[6848]*y_cur[IDX_C8H4II] + + k[6849]*y_cur[IDX_H2C7NII] + k[6851]*y_cur[IDX_H3C7NII] + + k[6852]*y_cur[IDX_H3C7NII] + k[6853]*y_cur[IDX_C8H5II] + + k[6854]*y_cur[IDX_C8H5II] + k[6854]*y_cur[IDX_C8H5II] + + k[6859]*y_cur[IDX_C9H2II] + k[6862]*y_cur[IDX_C9H3II] + + k[6863]*y_cur[IDX_C9H4II] + k[6864]*y_cur[IDX_C9H4II] + + k[6865]*y_cur[IDX_C9H5II] + k[6866]*y_cur[IDX_C9H5II] + + k[6866]*y_cur[IDX_C9H5II] + k[6880]*y_cur[IDX_H2C9NII] + + k[6882]*y_cur[IDX_H3C9NII] + k[6883]*y_cur[IDX_H3C9NII]; + data[jistart + 19980] = 0.0 - k[82]*y_cur[IDX_CM] - k[83]*y_cur[IDX_OM] - + k[134]*y_cur[IDX_CHI] + k[134]*y_cur[IDX_CHI] - + k[135]*y_cur[IDX_H2I] - k[135]*y_cur[IDX_H2I] - + k[135]*y_cur[IDX_H2I] - k[135]*y_cur[IDX_H2I] + + k[135]*y_cur[IDX_H2I] + k[135]*y_cur[IDX_H2I] - + k[136]*y_cur[IDX_H2OI] + k[136]*y_cur[IDX_H2OI] - + k[137]*y_cur[IDX_HOCII] + k[137]*y_cur[IDX_HOCII] - + k[138]*y_cur[IDX_O2I] + k[138]*y_cur[IDX_O2I] - + k[139]*y_cur[IDX_OHI] + k[139]*y_cur[IDX_OHI] - k[140]*y_cur[IDX_eM] + - k[142]*y_cur[IDX_HI] - k[457]*y_cur[IDX_FII] - + k[458]*y_cur[IDX_HeII] - k[2384]*y_cur[IDX_H2II] - + k[2398]*y_cur[IDX_CII] - k[2399]*y_cur[IDX_C10II] - + k[2400]*y_cur[IDX_C10HII] - k[2401]*y_cur[IDX_C2II] - + k[2402]*y_cur[IDX_C2HII] - k[2403]*y_cur[IDX_C2H2II] - + k[2404]*y_cur[IDX_C2N2II] - k[2405]*y_cur[IDX_C2SII] - + k[2406]*y_cur[IDX_C3II] - k[2407]*y_cur[IDX_C3HII] - + k[2408]*y_cur[IDX_C3H2II] - k[2409]*y_cur[IDX_C3NII] - + k[2410]*y_cur[IDX_C3OII] - k[2411]*y_cur[IDX_C4II] - + k[2412]*y_cur[IDX_C4HII] - k[2413]*y_cur[IDX_C4NII] - + k[2414]*y_cur[IDX_C5II] - k[2415]*y_cur[IDX_C5HII] - + k[2416]*y_cur[IDX_C5NII] - k[2417]*y_cur[IDX_C6II] - + k[2418]*y_cur[IDX_C6HII] - k[2419]*y_cur[IDX_C7II] - + k[2420]*y_cur[IDX_C7HII] - k[2421]*y_cur[IDX_C7NII] - + k[2422]*y_cur[IDX_C8II] - k[2423]*y_cur[IDX_C8HII] - + k[2424]*y_cur[IDX_C9II] - k[2425]*y_cur[IDX_C9HII] - + k[2426]*y_cur[IDX_C9NII] - k[2427]*y_cur[IDX_CHII] - + k[2428]*y_cur[IDX_CH2II] - k[2429]*y_cur[IDX_CH2CHCNII] - + k[2430]*y_cur[IDX_CH3C3NII] - k[2431]*y_cur[IDX_CH3CNII] - + k[2432]*y_cur[IDX_CH4II] - k[2433]*y_cur[IDX_CNII] - + k[2434]*y_cur[IDX_COII] - k[2435]*y_cur[IDX_COII] - + k[2436]*y_cur[IDX_CO2II] - k[2437]*y_cur[IDX_CPII] - + k[2438]*y_cur[IDX_CSII] - k[2439]*y_cur[IDX_ClII] - + k[2440]*y_cur[IDX_FII] - k[2441]*y_cur[IDX_H2C4NII] - + k[2442]*y_cur[IDX_H2OII] - k[2443]*y_cur[IDX_H2SII] - + k[2444]*y_cur[IDX_HC3NII] - k[2445]*y_cur[IDX_HC3NII] - + k[2446]*y_cur[IDX_HC4NII] - k[2447]*y_cur[IDX_HC5NII] - + k[2448]*y_cur[IDX_HC7NII] - k[2449]*y_cur[IDX_HC9NII] - + k[2450]*y_cur[IDX_HCNII] - k[2451]*y_cur[IDX_HCPII] - + k[2452]*y_cur[IDX_HCSiII] - k[2453]*y_cur[IDX_HClII] - + k[2454]*y_cur[IDX_HFII] - k[2455]*y_cur[IDX_HNSiII] - + k[2456]*y_cur[IDX_HSII] - k[2457]*y_cur[IDX_HeII] - + k[2458]*y_cur[IDX_HeHII] - k[2459]*y_cur[IDX_NII] - + k[2460]*y_cur[IDX_N2II] - k[2461]*y_cur[IDX_NHII] - + k[2462]*y_cur[IDX_NHII] - k[2463]*y_cur[IDX_NH2II] - + k[2464]*y_cur[IDX_NH3II] - k[2465]*y_cur[IDX_NO2II] - + k[2466]*y_cur[IDX_OII] - k[2467]*y_cur[IDX_OM] - + k[2468]*y_cur[IDX_O2HII] - k[2469]*y_cur[IDX_OHII] - + k[2470]*y_cur[IDX_SII] - k[2471]*y_cur[IDX_SO2II] - + k[2472]*y_cur[IDX_SiCII] - k[2473]*y_cur[IDX_SiC2II] - + k[2474]*y_cur[IDX_SiH4II] - k[2475]*y_cur[IDX_SiOII] - + k[2897]*y_cur[IDX_HCNOII] - k[2898]*y_cur[IDX_HCNOII] - + k[3047]*y_cur[IDX_HNCOII] - k[3048]*y_cur[IDX_HNCOII] - + k[3051]*y_cur[IDX_HOCNII] - k[3052]*y_cur[IDX_HOCNII] - + k[3053]*y_cur[IDX_HONCII] - k[3765]*y_cur[IDX_OCNII] - + k[3766]*y_cur[IDX_OCNII] - k[5132]*y_cur[IDX_ClI] - + k[5133]*y_cur[IDX_C2HI] - k[5134]*y_cur[IDX_CI] - + k[5135]*y_cur[IDX_CH2I] - k[5136]*y_cur[IDX_CH3I] - + k[5137]*y_cur[IDX_CHI] - k[5138]*y_cur[IDX_CNI] - + k[5139]*y_cur[IDX_FI] - k[5140]*y_cur[IDX_HSI] - + k[5141]*y_cur[IDX_NI] - k[5142]*y_cur[IDX_NH2I] - + k[5143]*y_cur[IDX_NHI] - k[5144]*y_cur[IDX_O2I] - + k[5145]*y_cur[IDX_O2I] - k[5146]*y_cur[IDX_O2HI] - + k[5147]*y_cur[IDX_OI] - k[5148]*y_cur[IDX_OHI] - + k[5149]*y_cur[IDX_SI] - k[5516]*y_cur[IDX_C3H5II] - + k[5530]*y_cur[IDX_CH2CCHII] - k[5548]*y_cur[IDX_CII] - + k[5549]*y_cur[IDX_C2H2II] - k[5550]*y_cur[IDX_C3HII] - + k[5551]*y_cur[IDX_C3HII] - k[5552]*y_cur[IDX_C6II] - + k[5553]*y_cur[IDX_C6H5II] - k[5554]*y_cur[IDX_CI] - + k[5555]*y_cur[IDX_CH3II] - k[5556]*y_cur[IDX_CHI] - + k[5557]*y_cur[IDX_HSII] - k[5558]*y_cur[IDX_HS2II] - + k[5559]*y_cur[IDX_PII] - k[5560]*y_cur[IDX_PHII] - + k[5561]*y_cur[IDX_SII] - k[5562]*y_cur[IDX_SiII] - + k[5563]*y_cur[IDX_SiC2HII] - k[5564]*y_cur[IDX_SiHII] - + k[5565]*y_cur[IDX_SiH3II] - k[5678] - k[5679] - k[5680] - k[5681] - + k[6147] - k[6889]; + data[jistart + 19981] = 0.0 - k[140]*y_cur[IDX_H2I] + k[745]*y_cur[IDX_C2H3II] + + k[746]*y_cur[IDX_C2H3II] + k[749]*y_cur[IDX_C2H3II] + + k[750]*y_cur[IDX_C2H3II] + k[757]*y_cur[IDX_C2H4II] + + k[760]*y_cur[IDX_C2H4II] + k[764]*y_cur[IDX_C2H5II] + + k[778]*y_cur[IDX_C2H7II] + k[793]*y_cur[IDX_C3H2II] + + k[803]*y_cur[IDX_C3H5II] + k[805]*y_cur[IDX_C3H6II] + + k[806]*y_cur[IDX_C3H6II] + k[807]*y_cur[IDX_C3H7II] + + k[810]*y_cur[IDX_C3H7II] + k[811]*y_cur[IDX_C3H7II] + + k[824]*y_cur[IDX_C4H3II] + k[827]*y_cur[IDX_C4H5II] + + k[827]*y_cur[IDX_C4H5II] + k[829]*y_cur[IDX_C4H5II] + + k[830]*y_cur[IDX_C4H7II] + k[830]*y_cur[IDX_C4H7II] + + k[841]*y_cur[IDX_C5H2II] + k[844]*y_cur[IDX_C5H3II] + + k[845]*y_cur[IDX_C5H5II] + k[852]*y_cur[IDX_C6H2II] + + k[855]*y_cur[IDX_C6H3II] + k[856]*y_cur[IDX_C6H4II] + + k[857]*y_cur[IDX_C6H4II] + k[858]*y_cur[IDX_C6H5II] + + k[859]*y_cur[IDX_C6H5II] + k[859]*y_cur[IDX_C6H5II] + + k[860]*y_cur[IDX_C6H6II] + k[860]*y_cur[IDX_C6H6II] + + k[861]*y_cur[IDX_C6H7II] + k[861]*y_cur[IDX_C6H7II] + + k[868]*y_cur[IDX_C7H2II] + k[871]*y_cur[IDX_C7H3II] + + k[872]*y_cur[IDX_C7H4II] + k[873]*y_cur[IDX_C7H4II] + + k[874]*y_cur[IDX_C7H5II] + k[881]*y_cur[IDX_C8H2II] + + k[884]*y_cur[IDX_C8H3II] + k[885]*y_cur[IDX_C8H4II] + + k[886]*y_cur[IDX_C8H4II] + k[887]*y_cur[IDX_C8H5II] + + k[888]*y_cur[IDX_C8H5II] + k[888]*y_cur[IDX_C8H5II] + + k[893]*y_cur[IDX_C9H2II] + k[896]*y_cur[IDX_C9H3II] + + k[897]*y_cur[IDX_C9H4II] + k[898]*y_cur[IDX_C9H4II] + + k[899]*y_cur[IDX_C9H5II] + k[900]*y_cur[IDX_C9H5II] + + k[900]*y_cur[IDX_C9H5II] + k[907]*y_cur[IDX_CH2II] + + k[912]*y_cur[IDX_CH2CHCNII] + k[924]*y_cur[IDX_CH3II] + + k[929]*y_cur[IDX_CH3C4HII] + k[930]*y_cur[IDX_CH3C4HII] + + k[935]*y_cur[IDX_C2H6II] + k[967]*y_cur[IDX_CH3OH2II] + + k[970]*y_cur[IDX_CH3NHII] + k[970]*y_cur[IDX_CH3NHII] + + k[971]*y_cur[IDX_CH3NHII] + k[972]*y_cur[IDX_CH5II] + + k[973]*y_cur[IDX_CH5II] + k[976]*y_cur[IDX_CH5II] + + k[976]*y_cur[IDX_CH5II] + k[989]*y_cur[IDX_H2C7NII] + + k[991]*y_cur[IDX_H2C9NII] + k[997]*y_cur[IDX_H2COII] + + k[1004]*y_cur[IDX_H2FII] + k[1006]*y_cur[IDX_H2NCII] + + k[1011]*y_cur[IDX_H2NOII] + k[1012]*y_cur[IDX_H2OII] + + k[1024]*y_cur[IDX_H2SiOII] + k[1025]*y_cur[IDX_H3II] + + k[1027]*y_cur[IDX_H3C3OII] + k[1028]*y_cur[IDX_H3C5NII] + + k[1029]*y_cur[IDX_H3C5NII] + k[1030]*y_cur[IDX_H3C7NII] + + k[1031]*y_cur[IDX_H3C7NII] + k[1032]*y_cur[IDX_H3C9NII] + + k[1033]*y_cur[IDX_H3C9NII] + k[1036]*y_cur[IDX_H3COII] + + k[1039]*y_cur[IDX_H3CSII] + k[1042]*y_cur[IDX_H3OII] + + k[1043]*y_cur[IDX_H3OII] + k[1046]*y_cur[IDX_H3SII] + + k[1048]*y_cur[IDX_H3SII] + k[1050]*y_cur[IDX_H3S2II] + + k[1052]*y_cur[IDX_H3SiOII] + k[1067]*y_cur[IDX_HC3NHII] + + k[1079]*y_cur[IDX_HC5NHII] + k[1165]*y_cur[IDX_NH4II] + + k[1181]*y_cur[IDX_PC2H2II] + k[1184]*y_cur[IDX_PC2H3II] + + k[1185]*y_cur[IDX_PC2H3II] + k[1187]*y_cur[IDX_PC2H4II] + + k[1187]*y_cur[IDX_PC2H4II] + k[1188]*y_cur[IDX_PC2H4II] + + k[1197]*y_cur[IDX_PCH2II] + k[1199]*y_cur[IDX_PCH3II] + + k[1200]*y_cur[IDX_PCH3II] + k[1203]*y_cur[IDX_PCH4II] + + k[1206]*y_cur[IDX_PH2II] + k[1210]*y_cur[IDX_PH3II] + + k[1214]*y_cur[IDX_PNH2II] + k[1217]*y_cur[IDX_PNH3II] + + k[1228]*y_cur[IDX_SiC2H2II] + k[1231]*y_cur[IDX_SiC2H3II] + + k[1236]*y_cur[IDX_SiC3H2II] + k[1244]*y_cur[IDX_SiCH2II] + + k[1245]*y_cur[IDX_SiCH3II] + k[1247]*y_cur[IDX_SiCH4II] + + k[1251]*y_cur[IDX_SiH2II] + k[1255]*y_cur[IDX_SiH3II] + + k[1256]*y_cur[IDX_SiH4II] + k[1258]*y_cur[IDX_SiH5II] + + k[1265]*y_cur[IDX_SiNH2II]; + data[jistart + 19982] = 0.0 + k[74]*y_cur[IDX_HM] + k[75]*y_cur[IDX_HM] - + k[142]*y_cur[IDX_H2I] + k[489]*y_cur[IDX_H2II] + + k[2827]*y_cur[IDX_C2H3II] + k[2828]*y_cur[IDX_C2H4II] + + k[2829]*y_cur[IDX_C2H5II] + k[2831]*y_cur[IDX_C3H2II] + + k[2832]*y_cur[IDX_C3H4II] + k[2833]*y_cur[IDX_C3H7II] + + k[2834]*y_cur[IDX_C6H6II] + k[2835]*y_cur[IDX_CHII] + + k[2836]*y_cur[IDX_CH2II] + k[2837]*y_cur[IDX_CH3II] + + k[2838]*y_cur[IDX_C2H6II] + k[2839]*y_cur[IDX_CH4II] + + k[2840]*y_cur[IDX_CH5II] + k[2842]*y_cur[IDX_H2SII] + + k[2843]*y_cur[IDX_H3SII] + k[2844]*y_cur[IDX_HSII] + + k[2848]*y_cur[IDX_SiHII] + k[5154]*y_cur[IDX_C2H2I] + + k[5155]*y_cur[IDX_C2H3I] + k[5156]*y_cur[IDX_CH2I] + + k[5158]*y_cur[IDX_CH3I] + k[5159]*y_cur[IDX_CH4I] + + k[5160]*y_cur[IDX_CHI] + k[5164]*y_cur[IDX_H2CNI] + + k[5165]*y_cur[IDX_H2COI] + k[5167]*y_cur[IDX_H2O2I] + + k[5168]*y_cur[IDX_H2OI] + k[5169]*y_cur[IDX_H2SI] + + k[5170]*y_cur[IDX_HCNI] + k[5171]*y_cur[IDX_HCOI] + + k[5173]*y_cur[IDX_HCSI] + k[5176]*y_cur[IDX_HNOI] + + k[5178]*y_cur[IDX_HSI] + k[5182]*y_cur[IDX_NH2I] + + k[5183]*y_cur[IDX_NH3I] + k[5184]*y_cur[IDX_NHI] + + k[5192]*y_cur[IDX_O2HI] + k[5198]*y_cur[IDX_OHI] + + k[5211]*y_cur[IDX_HClI] + (0.5 * hloss); + data[jistart + 19983] = 0.0 - k[1155]*y_cur[IDX_eM]; + data[jistart + 19984] = 0.0 - k[796]*y_cur[IDX_eM] - k[797]*y_cur[IDX_eM]; + data[jistart + 19985] = 0.0 - k[905]*y_cur[IDX_eM]; + data[jistart + 19986] = 0.0 - k[986]*y_cur[IDX_eM]; + data[jistart + 19987] = 0.0 - k[1027]*y_cur[IDX_eM]; + data[jistart + 19988] = 0.0 - k[1112]*y_cur[IDX_eM]; + data[jistart + 19989] = 0.0 - k[1249]*y_cur[IDX_eM]; + data[jistart + 19990] = 0.0 - k[887]*y_cur[IDX_eM] - k[888]*y_cur[IDX_eM]; + data[jistart + 19991] = 0.0 - k[899]*y_cur[IDX_eM] - k[900]*y_cur[IDX_eM]; + data[jistart + 19992] = 0.0 - k[926]*y_cur[IDX_eM]; + data[jistart + 19993] = 0.0 - k[1004]*y_cur[IDX_eM] - k[1005]*y_cur[IDX_eM]; + data[jistart + 19994] = 0.0 - k[833]*y_cur[IDX_eM] - k[834]*y_cur[IDX_eM]; + data[jistart + 19995] = 0.0 - k[847]*y_cur[IDX_eM]; + data[jistart + 19996] = 0.0 - k[860]*y_cur[IDX_eM]; + data[jistart + 19997] = 0.0 - k[912]*y_cur[IDX_eM]; + data[jistart + 19998] = 0.0 - k[1270]*y_cur[IDX_eM] - k[1271]*y_cur[IDX_eM]; + data[jistart + 19999] = 0.0 - k[994]*y_cur[IDX_eM] - k[995]*y_cur[IDX_eM]; + data[jistart + 20000] = 0.0 - k[1008]*y_cur[IDX_eM] - k[1009]*y_cur[IDX_eM]; + data[jistart + 20001] = 0.0 - k[1015]*y_cur[IDX_eM] - k[1016]*y_cur[IDX_eM]; + data[jistart + 20002] = 0.0 - k[1187]*y_cur[IDX_eM] - k[1188]*y_cur[IDX_eM] - + k[1189]*y_cur[IDX_eM]; + data[jistart + 20003] = 0.0 - k[876]*y_cur[IDX_eM]; + data[jistart + 20004] = 0.0 - k[901]*y_cur[IDX_eM]; + data[jistart + 20005] = 0.0 - k[970]*y_cur[IDX_eM] - k[971]*y_cur[IDX_eM]; + data[jistart + 20006] = 0.0 - k[988]*y_cur[IDX_eM]; + data[jistart + 20007] = 0.0 - k[993]*y_cur[IDX_eM]; + data[jistart + 20008] = 0.0 - k[1010]*y_cur[IDX_eM] - k[1011]*y_cur[IDX_eM]; + data[jistart + 20009] = 0.0 - k[1111]*y_cur[IDX_eM]; + data[jistart + 20010] = 0.0 - k[1122]*y_cur[IDX_eM]; + data[jistart + 20011] = 0.0 - k[1125]*y_cur[IDX_eM]; + data[jistart + 20012] = 0.0 - k[1141]*y_cur[IDX_eM]; + data[jistart + 20013] = 0.0 - k[1145]*y_cur[IDX_eM] - k[1146]*y_cur[IDX_eM]; + data[jistart + 20014] = 0.0 - k[1161]*y_cur[IDX_eM] - k[1162]*y_cur[IDX_eM]; + data[jistart + 20015] = 0.0 - k[772]*y_cur[IDX_eM] - k[773]*y_cur[IDX_eM]; + data[jistart + 20016] = 0.0 - k[785]*y_cur[IDX_eM]; + data[jistart + 20017] = 0.0 - k[1272]*y_cur[IDX_eM] - k[1273]*y_cur[IDX_eM] - + k[1274]*y_cur[IDX_eM]; + data[jistart + 20018] = 0.0 - k[1073]*y_cur[IDX_eM]; + data[jistart + 20019] = 0.0 - k[1094]*y_cur[IDX_eM] - k[1095]*y_cur[IDX_eM] - + k[1096]*y_cur[IDX_eM]; + data[jistart + 20020] = 0.0 - k[1118]*y_cur[IDX_eM] - k[1119]*y_cur[IDX_eM] - + k[1120]*y_cur[IDX_eM]; + data[jistart + 20021] = 0.0 - k[1126]*y_cur[IDX_eM] - k[1127]*y_cur[IDX_eM]; + data[jistart + 20022] = 0.0 - k[1149]*y_cur[IDX_eM]; + data[jistart + 20023] = 0.0 - k[1184]*y_cur[IDX_eM] - k[1185]*y_cur[IDX_eM] - + k[1186]*y_cur[IDX_eM]; + data[jistart + 20024] = 0.0 - k[1211]*y_cur[IDX_eM]; + data[jistart + 20025] = 0.0 - k[1215]*y_cur[IDX_eM] - k[1216]*y_cur[IDX_eM] - + k[1217]*y_cur[IDX_eM]; + data[jistart + 20026] = 0.0 - k[954]*y_cur[IDX_eM]; + data[jistart + 20027] = 0.0 - k[989]*y_cur[IDX_eM] - k[990]*y_cur[IDX_eM]; + data[jistart + 20028] = 0.0 - k[991]*y_cur[IDX_eM] - k[992]*y_cur[IDX_eM]; + data[jistart + 20029] = 0.0 - k[1049]*y_cur[IDX_eM] - k[1050]*y_cur[IDX_eM]; + data[jistart + 20030] = 0.0 - k[1130]*y_cur[IDX_eM] - k[1131]*y_cur[IDX_eM]; + data[jistart + 20031] = 0.0 - k[1199]*y_cur[IDX_eM] - k[1200]*y_cur[IDX_eM] - + k[1201]*y_cur[IDX_eM]; + data[jistart + 20032] = 0.0 - k[1212]*y_cur[IDX_eM] - k[1213]*y_cur[IDX_eM] - + k[1214]*y_cur[IDX_eM]; + data[jistart + 20033] = 0.0 - k[733]*y_cur[IDX_eM] - k[734]*y_cur[IDX_eM]; + data[jistart + 20034] = 0.0 - k[769]*y_cur[IDX_eM] - k[770]*y_cur[IDX_eM] - + k[771]*y_cur[IDX_eM]; + data[jistart + 20035] = 0.0 - k[904]*y_cur[IDX_eM]; + data[jistart + 20036] = 0.0 - k[921]*y_cur[IDX_eM] - k[922]*y_cur[IDX_eM]; + data[jistart + 20037] = 0.0 - k[1280]*y_cur[IDX_eM] - k[1281]*y_cur[IDX_eM] - + k[1282]*y_cur[IDX_eM] - k[1283]*y_cur[IDX_eM]; + data[jistart + 20038] = 0.0 - k[931]*y_cur[IDX_eM] - k[932]*y_cur[IDX_eM]; + data[jistart + 20039] = 0.0 - k[933]*y_cur[IDX_eM] - k[934]*y_cur[IDX_eM]; + data[jistart + 20040] = 0.0 - k[1023]*y_cur[IDX_eM] - k[1024]*y_cur[IDX_eM]; + data[jistart + 20041] = 0.0 - k[1028]*y_cur[IDX_eM] - k[1029]*y_cur[IDX_eM]; + data[jistart + 20042] = 0.0 - k[1092]*y_cur[IDX_eM] - k[1093]*y_cur[IDX_eM]; + data[jistart + 20043] = 0.0 - k[1284]*y_cur[IDX_eM] - k[1285]*y_cur[IDX_eM] - + k[1286]*y_cur[IDX_eM] - k[1287]*y_cur[IDX_eM] - + k[1288]*y_cur[IDX_eM] - k[1289]*y_cur[IDX_eM]; + data[jistart + 20044] = 0.0 - k[5613]*y_cur[IDX_eM]; + data[jistart + 20045] = 0.0 - k[1002]*y_cur[IDX_eM] - k[1003]*y_cur[IDX_eM]; + data[jistart + 20046] = 0.0 - k[1032]*y_cur[IDX_eM] - k[1033]*y_cur[IDX_eM]; + data[jistart + 20047] = 0.0 - k[1053]*y_cur[IDX_eM] - k[1054]*y_cur[IDX_eM]; + data[jistart + 20048] = 0.0 - k[1101]*y_cur[IDX_eM] - k[1102]*y_cur[IDX_eM]; + data[jistart + 20049] = 0.0 - k[1132]*y_cur[IDX_eM] - k[1133]*y_cur[IDX_eM] - + k[1134]*y_cur[IDX_eM]; + data[jistart + 20050] = 0.0 - k[786]*y_cur[IDX_eM] - k[787]*y_cur[IDX_eM]; + data[jistart + 20051] = 0.0 - k[816]*y_cur[IDX_eM] - k[817]*y_cur[IDX_eM] - + k[818]*y_cur[IDX_eM]; + data[jistart + 20052] = 0.0 - k[1290]*y_cur[IDX_eM] - k[1291]*y_cur[IDX_eM] - + k[1292]*y_cur[IDX_eM] - k[1293]*y_cur[IDX_eM] - + k[1294]*y_cur[IDX_eM] - k[1295]*y_cur[IDX_eM] - + k[1296]*y_cur[IDX_eM]; + data[jistart + 20053] = 0.0 - k[955]*y_cur[IDX_eM] - k[956]*y_cur[IDX_eM]; + data[jistart + 20054] = 0.0 - k[1030]*y_cur[IDX_eM] - k[1031]*y_cur[IDX_eM]; + data[jistart + 20055] = 0.0 - k[1051]*y_cur[IDX_eM] - k[1052]*y_cur[IDX_eM]; + data[jistart + 20056] = 0.0 - k[1142]*y_cur[IDX_eM] - k[1143]*y_cur[IDX_eM] - + k[1144]*y_cur[IDX_eM]; + data[jistart + 20057] = 0.0 - k[927]*y_cur[IDX_eM] - k[928]*y_cur[IDX_eM]; + data[jistart + 20058] = 0.0 - k[957]*y_cur[IDX_eM] - k[958]*y_cur[IDX_eM] - + k[959]*y_cur[IDX_eM]; + data[jistart + 20059] = 0.0 - k[1084]*y_cur[IDX_eM] - k[1085]*y_cur[IDX_eM]; + data[jistart + 20060] = 0.0 - k[1086]*y_cur[IDX_eM] - k[1087]*y_cur[IDX_eM]; + data[jistart + 20061] = 0.0 - k[1116]*y_cur[IDX_eM] - k[1117]*y_cur[IDX_eM]; + data[jistart + 20062] = 0.0 - k[1169]*y_cur[IDX_eM]; + data[jistart + 20063] = 0.0 - k[1190]*y_cur[IDX_eM] - k[1191]*y_cur[IDX_eM] - + k[1192]*y_cur[IDX_eM]; + data[jistart + 20064] = 0.0 - k[1202]*y_cur[IDX_eM] - k[1203]*y_cur[IDX_eM] - + k[1204]*y_cur[IDX_eM]; + data[jistart + 20065] = 0.0 - k[1256]*y_cur[IDX_eM] - k[1257]*y_cur[IDX_eM]; + data[jistart + 20066] = 0.0 + k[5704] + k[5989]; + data[jistart + 20067] = 0.0 - k[774]*y_cur[IDX_eM] - k[775]*y_cur[IDX_eM] - + k[776]*y_cur[IDX_eM] - k[777]*y_cur[IDX_eM]; + data[jistart + 20068] = 0.0 - k[778]*y_cur[IDX_eM] - k[779]*y_cur[IDX_eM]; + data[jistart + 20069] = 0.0 - k[902]*y_cur[IDX_eM] - k[903]*y_cur[IDX_eM]; + data[jistart + 20070] = 0.0 - k[913]*y_cur[IDX_eM] - k[914]*y_cur[IDX_eM] - + k[915]*y_cur[IDX_eM]; + data[jistart + 20071] = 0.0 - k[1017]*y_cur[IDX_eM] - k[1018]*y_cur[IDX_eM]; + data[jistart + 20072] = 0.0 - k[982]*y_cur[IDX_eM] - k[983]*y_cur[IDX_eM]; + data[jistart + 20073] = 0.0 - k[1113]*y_cur[IDX_eM] - k[1114]*y_cur[IDX_eM]; + data[jistart + 20074] = 0.0 - k[1170]*y_cur[IDX_eM] - k[1171]*y_cur[IDX_eM] - + k[1172]*y_cur[IDX_eM]; + data[jistart + 20075] = 0.0 - k[1181]*y_cur[IDX_eM] - k[1182]*y_cur[IDX_eM] - + k[1183]*y_cur[IDX_eM]; + data[jistart + 20076] = 0.0 - k[1236]*y_cur[IDX_eM] - k[1237]*y_cur[IDX_eM]; + data[jistart + 20077] = 0.0 - k[1238]*y_cur[IDX_eM] - k[1239]*y_cur[IDX_eM]; + data[jistart + 20078] = 0.0 - k[1240]*y_cur[IDX_eM] - k[1241]*y_cur[IDX_eM]; + data[jistart + 20079] = 0.0 - k[1258]*y_cur[IDX_eM] - k[1259]*y_cur[IDX_eM]; + data[jistart + 20080] = 0.0 - k[1262]*y_cur[IDX_eM] - k[1263]*y_cur[IDX_eM]; + data[jistart + 20081] = 0.0 + k[5969]; + data[jistart + 20082] = 0.0 - k[815]*y_cur[IDX_eM]; + data[jistart + 20083] = 0.0 - k[827]*y_cur[IDX_eM] - k[828]*y_cur[IDX_eM] - + k[829]*y_cur[IDX_eM]; + data[jistart + 20084] = 0.0 - k[830]*y_cur[IDX_eM]; + data[jistart + 20085] = 0.0 - k[1275]*y_cur[IDX_eM] - k[1276]*y_cur[IDX_eM] - + k[1277]*y_cur[IDX_eM] - k[1278]*y_cur[IDX_eM] - + k[1279]*y_cur[IDX_eM]; + data[jistart + 20086] = 0.0 - k[937]*y_cur[IDX_eM] - k[938]*y_cur[IDX_eM]; + data[jistart + 20087] = 0.0 - k[1123]*y_cur[IDX_eM] - k[1124]*y_cur[IDX_eM]; + data[jistart + 20088] = 0.0 - k[1128]*y_cur[IDX_eM] - k[1129]*y_cur[IDX_eM]; + data[jistart + 20089] = 0.0 - k[1173]*y_cur[IDX_eM]; + data[jistart + 20090] = 0.0 - k[1176]*y_cur[IDX_eM]; + data[jistart + 20091] = 0.0 - k[1193]*y_cur[IDX_eM] - k[1194]*y_cur[IDX_eM] - + k[1195]*y_cur[IDX_eM] - k[1196]*y_cur[IDX_eM]; + data[jistart + 20092] = 0.0 - k[1209]*y_cur[IDX_eM] - k[1210]*y_cur[IDX_eM]; + data[jistart + 20093] = 0.0 - k[1247]*y_cur[IDX_eM] - k[1248]*y_cur[IDX_eM]; + data[jistart + 20094] = 0.0 - k[727]*y_cur[IDX_eM] - k[728]*y_cur[IDX_eM]; + data[jistart + 20095] = 0.0 - k[732]*y_cur[IDX_eM]; + data[jistart + 20096] = 0.0 - k[782]*y_cur[IDX_eM] - k[783]*y_cur[IDX_eM]; + data[jistart + 20097] = 0.0 - k[944]*y_cur[IDX_eM] - k[945]*y_cur[IDX_eM]; + data[jistart + 20098] = 0.0 - k[1074]*y_cur[IDX_eM] - k[1075]*y_cur[IDX_eM] - + k[1076]*y_cur[IDX_eM]; + data[jistart + 20099] = 0.0 - k[1079]*y_cur[IDX_eM] - k[1080]*y_cur[IDX_eM] - + k[1081]*y_cur[IDX_eM] - k[1082]*y_cur[IDX_eM] - + k[1083]*y_cur[IDX_eM]; + data[jistart + 20100] = 0.0 - k[1230]*y_cur[IDX_eM] - k[1231]*y_cur[IDX_eM]; + data[jistart + 20101] = 0.0 - k[1245]*y_cur[IDX_eM] - k[1246]*y_cur[IDX_eM]; + data[jistart + 20102] = 0.0 - k[1264]*y_cur[IDX_eM] - k[1265]*y_cur[IDX_eM]; + data[jistart + 20103] = 0.0 - k[735]*y_cur[IDX_eM] - k[736]*y_cur[IDX_eM] - + k[737]*y_cur[IDX_eM] - k[738]*y_cur[IDX_eM]; + data[jistart + 20104] = 0.0 - k[814]*y_cur[IDX_eM]; + data[jistart + 20105] = 0.0 - k[826]*y_cur[IDX_eM]; + data[jistart + 20106] = 0.0 - k[916]*y_cur[IDX_eM] - k[917]*y_cur[IDX_eM]; + data[jistart + 20107] = 0.0 - k[950]*y_cur[IDX_eM] - k[951]*y_cur[IDX_eM]; + data[jistart + 20108] = 0.0 - k[984]*y_cur[IDX_eM]; + data[jistart + 20109] = 0.0 - k[1021]*y_cur[IDX_eM] - k[1022]*y_cur[IDX_eM]; + data[jistart + 20110] = 0.0 - k[1059]*y_cur[IDX_eM] - k[1060]*y_cur[IDX_eM]; + data[jistart + 20111] = 0.0 - k[1077]*y_cur[IDX_eM] - k[1078]*y_cur[IDX_eM]; + data[jistart + 20112] = 0.0 - k[1147]*y_cur[IDX_eM] - k[1148]*y_cur[IDX_eM]; + data[jistart + 20113] = 0.0 - k[1197]*y_cur[IDX_eM] - k[1198]*y_cur[IDX_eM]; + data[jistart + 20114] = 0.0 - k[1221]*y_cur[IDX_eM] - k[1222]*y_cur[IDX_eM]; + data[jistart + 20115] = 0.0 - k[1260]*y_cur[IDX_eM]; + data[jistart + 20116] = 0.0 - k[889]*y_cur[IDX_eM] - k[890]*y_cur[IDX_eM]; + data[jistart + 20117] = 0.0 - k[1006]*y_cur[IDX_eM] - k[1007]*y_cur[IDX_eM]; + data[jistart + 20118] = 0.0 - k[1039]*y_cur[IDX_eM] - k[1040]*y_cur[IDX_eM]; + data[jistart + 20119] = 0.0 - k[1055]*y_cur[IDX_eM] - k[1056]*y_cur[IDX_eM] - + k[1057]*y_cur[IDX_eM] - k[1058]*y_cur[IDX_eM]; + data[jistart + 20120] = 0.0 - k[1105]*y_cur[IDX_eM] - k[1106]*y_cur[IDX_eM]; + data[jistart + 20121] = 0.0 - k[1261]*y_cur[IDX_eM]; + data[jistart + 20122] = 0.0 - k[1071]*y_cur[IDX_eM] - k[1072]*y_cur[IDX_eM]; + data[jistart + 20123] = 0.0 - k[1103]*y_cur[IDX_eM] - k[1104]*y_cur[IDX_eM]; + data[jistart + 20124] = 0.0 - k[1135]*y_cur[IDX_eM] - k[1136]*y_cur[IDX_eM] - + k[1137]*y_cur[IDX_eM]; + data[jistart + 20125] = 0.0 - k[1139]*y_cur[IDX_eM] - k[1140]*y_cur[IDX_eM]; + data[jistart + 20126] = 0.0 - k[1232]*y_cur[IDX_eM] - k[1233]*y_cur[IDX_eM]; + data[jistart + 20127] = 0.0 - k[784]*y_cur[IDX_eM]; + data[jistart + 20128] = 0.0 - k[805]*y_cur[IDX_eM] - k[806]*y_cur[IDX_eM]; + data[jistart + 20129] = 0.0 - k[861]*y_cur[IDX_eM] - k[862]*y_cur[IDX_eM]; + data[jistart + 20130] = 0.0 - k[885]*y_cur[IDX_eM] - k[886]*y_cur[IDX_eM]; + data[jistart + 20131] = 0.0 + k[5677] + k[5830] + k[6143] + k[6307]; + data[jistart + 20132] = 0.0 - k[1070]*y_cur[IDX_eM]; + data[jistart + 20133] = 0.0 - k[1234]*y_cur[IDX_eM] - k[1235]*y_cur[IDX_eM]; + data[jistart + 20134] = 0.0 - k[807]*y_cur[IDX_eM] - k[808]*y_cur[IDX_eM] - + k[809]*y_cur[IDX_eM] - k[810]*y_cur[IDX_eM] - k[811]*y_cur[IDX_eM] - + k[812]*y_cur[IDX_eM] - k[813]*y_cur[IDX_eM]; + data[jistart + 20135] = 0.0 - k[831]*y_cur[IDX_eM] - k[832]*y_cur[IDX_eM]; + data[jistart + 20136] = 0.0 - k[877]*y_cur[IDX_eM] - k[878]*y_cur[IDX_eM]; + data[jistart + 20137] = 0.0 - k[897]*y_cur[IDX_eM] - k[898]*y_cur[IDX_eM]; + data[jistart + 20138] = 0.0 - k[918]*y_cur[IDX_eM] - k[919]*y_cur[IDX_eM] - + k[920]*y_cur[IDX_eM]; + data[jistart + 20139] = 0.0 + k[6207]; + data[jistart + 20140] = 0.0 - k[1224]*y_cur[IDX_eM] - k[1225]*y_cur[IDX_eM]; + data[jistart + 20141] = 0.0 - k[1228]*y_cur[IDX_eM] - k[1229]*y_cur[IDX_eM]; + data[jistart + 20142] = 0.0 - k[856]*y_cur[IDX_eM] - k[857]*y_cur[IDX_eM]; + data[jistart + 20143] = 0.0 - k[952]*y_cur[IDX_eM] - k[953]*y_cur[IDX_eM]; + data[jistart + 20144] = 0.0 - k[960]*y_cur[IDX_eM] - k[961]*y_cur[IDX_eM] - + k[962]*y_cur[IDX_eM]; + data[jistart + 20145] = 0.0 - k[1218]*y_cur[IDX_eM]; + data[jistart + 20146] = 0.0 - k[872]*y_cur[IDX_eM] - k[873]*y_cur[IDX_eM]; + data[jistart + 20147] = 0.0 - k[874]*y_cur[IDX_eM] - k[875]*y_cur[IDX_eM]; + data[jistart + 20148] = 0.0 - k[1000]*y_cur[IDX_eM] - k[1001]*y_cur[IDX_eM] - + k[5617]*y_cur[IDX_eM]; + data[jistart + 20149] = 0.0 + k[6180]; + data[jistart + 20150] = 0.0 + k[5859]; + data[jistart + 20151] = 0.0 - k[1156]*y_cur[IDX_eM] - k[1157]*y_cur[IDX_eM]; + data[jistart + 20152] = 0.0 + k[6226]; + data[jistart + 20153] = 0.0 + k[6247]; + data[jistart + 20154] = 0.0 - k[863]*y_cur[IDX_eM] - k[864]*y_cur[IDX_eM] - + k[865]*y_cur[IDX_eM]; + data[jistart + 20155] = 0.0 - k[929]*y_cur[IDX_eM] - k[930]*y_cur[IDX_eM]; + data[jistart + 20156] = 0.0 + k[6195]; + data[jistart + 20157] = 0.0 + k[6068]; + data[jistart + 20158] = 0.0 + k[5814] + k[6118]; + data[jistart + 20159] = 0.0 - k[1206]*y_cur[IDX_eM] - k[1207]*y_cur[IDX_eM] - + k[1208]*y_cur[IDX_eM]; + data[jistart + 20160] = 0.0 + k[6253]; + data[jistart + 20161] = 0.0 - k[1219]*y_cur[IDX_eM]; + data[jistart + 20162] = 0.0 - k[1223]*y_cur[IDX_eM]; + data[jistart + 20163] = 0.0 - k[858]*y_cur[IDX_eM] - k[859]*y_cur[IDX_eM]; + data[jistart + 20164] = 0.0 + k[6192]; + data[jistart + 20165] = 0.0 + k[6269]; + data[jistart + 20166] = 0.0 - k[729]*y_cur[IDX_eM] - k[730]*y_cur[IDX_eM] - + k[731]*y_cur[IDX_eM]; + data[jistart + 20167] = 0.0 - k[1109]*y_cur[IDX_eM] - k[1110]*y_cur[IDX_eM]; + data[jistart + 20168] = 0.0 - k[1177]*y_cur[IDX_eM] - k[1178]*y_cur[IDX_eM] - + k[1179]*y_cur[IDX_eM]; + data[jistart + 20169] = 0.0 - k[935]*y_cur[IDX_eM] - k[936]*y_cur[IDX_eM]; + data[jistart + 20170] = 0.0 - k[879]*y_cur[IDX_eM] - k[880]*y_cur[IDX_eM]; + data[jistart + 20171] = 0.0 - k[845]*y_cur[IDX_eM] - k[846]*y_cur[IDX_eM]; + data[jistart + 20172] = 0.0 + k[5862] + k[6191]; + data[jistart + 20173] = 0.0 - k[1226]*y_cur[IDX_eM] - k[1227]*y_cur[IDX_eM]; + data[jistart + 20174] = 0.0 + k[6272]; + data[jistart + 20175] = 0.0 - k[850]*y_cur[IDX_eM] - k[851]*y_cur[IDX_eM]; + data[jistart + 20176] = 0.0 + k[6063]; + data[jistart + 20177] = 0.0 + k[6089]; + data[jistart + 20178] = 0.0 - k[939]*y_cur[IDX_eM] - k[940]*y_cur[IDX_eM] - + k[941]*y_cur[IDX_eM] - k[942]*y_cur[IDX_eM] - k[943]*y_cur[IDX_eM]; + data[jistart + 20179] = 0.0 - k[946]*y_cur[IDX_eM] - k[947]*y_cur[IDX_eM]; + data[jistart + 20180] = 0.0 - k[948]*y_cur[IDX_eM] - k[949]*y_cur[IDX_eM]; + data[jistart + 20181] = 0.0 + k[6178]; + data[jistart + 20182] = 0.0 - k[848]*y_cur[IDX_eM] - k[849]*y_cur[IDX_eM]; + data[jistart + 20183] = 0.0 + k[6050]; + data[jistart + 20184] = 0.0 + k[6188]; + data[jistart + 20185] = 0.0 - k[1251]*y_cur[IDX_eM] - k[1252]*y_cur[IDX_eM] - + k[1253]*y_cur[IDX_eM]; + data[jistart + 20186] = 0.0 - k[1254]*y_cur[IDX_eM] - k[1255]*y_cur[IDX_eM]; + data[jistart + 20187] = 0.0 + k[5958]; + data[jistart + 20188] = 0.0 - k[819]*y_cur[IDX_eM] - k[820]*y_cur[IDX_eM]; + data[jistart + 20189] = 0.0 + k[5707] + k[5992]; + data[jistart + 20190] = 0.0 + k[6213]; + data[jistart + 20191] = 0.0 + k[6275]; + data[jistart + 20192] = 0.0 - k[963]*y_cur[IDX_eM] - k[964]*y_cur[IDX_eM] - + k[965]*y_cur[IDX_eM] - k[966]*y_cur[IDX_eM] - k[967]*y_cur[IDX_eM]; + data[jistart + 20193] = 0.0 - k[780]*y_cur[IDX_eM] - k[781]*y_cur[IDX_eM]; + data[jistart + 20194] = 0.0 - k[838]*y_cur[IDX_eM]; + data[jistart + 20195] = 0.0 - k[854]*y_cur[IDX_eM] - k[855]*y_cur[IDX_eM]; + data[jistart + 20196] = 0.0 - k[883]*y_cur[IDX_eM] - k[884]*y_cur[IDX_eM]; + data[jistart + 20197] = 0.0 - k[891]*y_cur[IDX_eM] - k[892]*y_cur[IDX_eM]; + data[jistart + 20198] = 0.0 - k[895]*y_cur[IDX_eM] - k[896]*y_cur[IDX_eM]; + data[jistart + 20199] = 0.0 + k[5789] + k[6091]; + data[jistart + 20200] = 0.0 - k[1115]*y_cur[IDX_eM]; + data[jistart + 20201] = 0.0 - k[1242]*y_cur[IDX_eM] - k[1243]*y_cur[IDX_eM] - + k[1244]*y_cur[IDX_eM]; + data[jistart + 20202] = 0.0 - k[1250]*y_cur[IDX_eM]; + data[jistart + 20203] = 0.0 + k[5812] + k[6116]; + data[jistart + 20204] = 0.0 - k[1063]*y_cur[IDX_eM] - k[1064]*y_cur[IDX_eM] - + k[1065]*y_cur[IDX_eM]; + data[jistart + 20205] = 0.0 + k[6055]; + data[jistart + 20206] = 0.0 - k[981]*y_cur[IDX_eM]; + data[jistart + 20207] = 0.0 - k[866]*y_cur[IDX_eM] - k[867]*y_cur[IDX_eM]; + data[jistart + 20208] = 0.0 - k[893]*y_cur[IDX_eM] - k[894]*y_cur[IDX_eM]; + data[jistart + 20209] = 0.0 + k[6045]; + data[jistart + 20210] = 0.0 - k[1107]*y_cur[IDX_eM] - k[1108]*y_cur[IDX_eM]; + data[jistart + 20211] = 0.0 - k[1205]*y_cur[IDX_eM]; + data[jistart + 20212] = 0.0 - k[799]*y_cur[IDX_eM] - k[800]*y_cur[IDX_eM] - + k[801]*y_cur[IDX_eM] - k[802]*y_cur[IDX_eM]; + data[jistart + 20213] = 0.0 - k[881]*y_cur[IDX_eM] - k[882]*y_cur[IDX_eM]; + data[jistart + 20214] = 0.0 - k[1098]*y_cur[IDX_eM] - k[1099]*y_cur[IDX_eM] - + k[1100]*y_cur[IDX_eM]; + data[jistart + 20215] = 0.0 - k[843]*y_cur[IDX_eM] - k[844]*y_cur[IDX_eM]; + data[jistart + 20216] = 0.0 - k[1066]*y_cur[IDX_eM] - k[1067]*y_cur[IDX_eM] - + k[1068]*y_cur[IDX_eM] - k[1069]*y_cur[IDX_eM]; + data[jistart + 20217] = 0.0 - k[839]*y_cur[IDX_eM] - k[840]*y_cur[IDX_eM]; + data[jistart + 20218] = 0.0 + k[5806] + k[6111]; + data[jistart + 20219] = 0.0 - k[985]*y_cur[IDX_eM]; + data[jistart + 20220] = 0.0 - k[803]*y_cur[IDX_eM] - k[804]*y_cur[IDX_eM]; + data[jistart + 20221] = 0.0 - k[870]*y_cur[IDX_eM] - k[871]*y_cur[IDX_eM]; + data[jistart + 20222] = 0.0 - k[5624]*y_cur[IDX_eM]; + data[jistart + 20223] = 0.0 + k[5809] + k[6114]; + data[jistart + 20224] = 0.0 + k[6215]; + data[jistart + 20225] = 0.0 - k[868]*y_cur[IDX_eM] - k[869]*y_cur[IDX_eM]; + data[jistart + 20226] = 0.0 - k[788]*y_cur[IDX_eM]; + data[jistart + 20227] = 0.0 - k[1045]*y_cur[IDX_eM] - k[1046]*y_cur[IDX_eM] - + k[1047]*y_cur[IDX_eM] - k[1048]*y_cur[IDX_eM]; + data[jistart + 20228] = 0.0 - k[1175]*y_cur[IDX_eM]; + data[jistart + 20229] = 0.0 - k[852]*y_cur[IDX_eM] - k[853]*y_cur[IDX_eM]; + data[jistart + 20230] = 0.0 - k[968]*y_cur[IDX_eM] - k[969]*y_cur[IDX_eM]; + data[jistart + 20231] = 0.0 - k[1121]*y_cur[IDX_eM]; + data[jistart + 20232] = 0.0 + k[6036]; + data[jistart + 20233] = 0.0 - k[764]*y_cur[IDX_eM] - k[765]*y_cur[IDX_eM] - + k[766]*y_cur[IDX_eM] - k[767]*y_cur[IDX_eM] - k[768]*y_cur[IDX_eM]; + data[jistart + 20234] = 0.0 - k[841]*y_cur[IDX_eM] - k[842]*y_cur[IDX_eM]; + data[jistart + 20235] = 0.0 + k[5780] + k[6080]; + data[jistart + 20236] = 0.0 - k[977]*y_cur[IDX_eM]; + data[jistart + 20237] = 0.0 + k[5804] + k[6109]; + data[jistart + 20238] = 0.0 + k[5703] + k[5988]; + data[jistart + 20239] = 0.0 - k[1150]*y_cur[IDX_eM]; + data[jistart + 20240] = 0.0 - k[835]*y_cur[IDX_eM] - k[836]*y_cur[IDX_eM] - + k[837]*y_cur[IDX_eM]; + data[jistart + 20241] = 0.0 - k[1088]*y_cur[IDX_eM]; + data[jistart + 20242] = 0.0 - k[739]*y_cur[IDX_eM]; + data[jistart + 20243] = 0.0 - k[821]*y_cur[IDX_eM]; + data[jistart + 20244] = 0.0 - k[978]*y_cur[IDX_eM] - k[979]*y_cur[IDX_eM]; + data[jistart + 20245] = 0.0 - k[1138]*y_cur[IDX_eM]; + data[jistart + 20246] = 0.0 - k[1158]*y_cur[IDX_eM]; + data[jistart + 20247] = 0.0 + k[146]*y_cur[IDX_O2I] + k[5896] + k[6234]; + data[jistart + 20248] = 0.0 + k[55]*y_cur[IDX_CI] + k[105]*y_cur[IDX_HI] + k[5777] + k[6074]; + data[jistart + 20249] = 0.0 - k[987]*y_cur[IDX_eM]; + data[jistart + 20250] = 0.0 + k[5902] + k[6240]; + data[jistart + 20251] = 0.0 - k[1159]*y_cur[IDX_eM] - k[1160]*y_cur[IDX_eM]; + data[jistart + 20252] = 0.0 + k[5906] + k[6246]; + data[jistart + 20253] = 0.0 + k[58]*y_cur[IDX_CI] + k[65]*y_cur[IDX_COI] + + k[109]*y_cur[IDX_HI] + k[123]*y_cur[IDX_NI] + k[127]*y_cur[IDX_O2I] + + k[132]*y_cur[IDX_OI] + k[5911] + k[6252]; + data[jistart + 20254] = 0.0 - k[1269]*y_cur[IDX_eM]; + data[jistart + 20255] = 0.0 + k[39]*y_cur[IDX_CI] + k[88]*y_cur[IDX_HI] + + k[111]*y_cur[IDX_NI] + k[129]*y_cur[IDX_OI] + k[5695] + k[5980]; + data[jistart + 20256] = 0.0 + k[44]*y_cur[IDX_CI] + k[93]*y_cur[IDX_HI] + + k[115]*y_cur[IDX_NI] + k[5729] + k[6013]; + data[jistart + 20257] = 0.0 - k[980]*y_cur[IDX_eM]; + data[jistart + 20258] = 0.0 + k[5801] + k[6105]; + data[jistart + 20259] = 0.0 - k[972]*y_cur[IDX_eM] - k[973]*y_cur[IDX_eM] - + k[974]*y_cur[IDX_eM] - k[975]*y_cur[IDX_eM] - k[976]*y_cur[IDX_eM]; + data[jistart + 20260] = 0.0 - k[1061]*y_cur[IDX_eM] - k[1062]*y_cur[IDX_eM]; + data[jistart + 20261] = 0.0 + k[57]*y_cur[IDX_CI] + k[61]*y_cur[IDX_CH3I] + + k[64]*y_cur[IDX_CHI] + k[108]*y_cur[IDX_HI] + k[5904] + k[6243]; + data[jistart + 20262] = 0.0 + k[86]*y_cur[IDX_HI] + k[5689] + k[5956]; + data[jistart + 20263] = 0.0 + k[41]*y_cur[IDX_CI] + k[90]*y_cur[IDX_HI] + + k[113]*y_cur[IDX_NI] + k[5718] + k[6002]; + data[jistart + 20264] = 0.0 + k[48]*y_cur[IDX_CI] + k[98]*y_cur[IDX_HI] + k[5749] + k[6035]; + data[jistart + 20265] = 0.0 + k[52]*y_cur[IDX_CI] + k[102]*y_cur[IDX_HI] + k[5763] + k[6054]; + data[jistart + 20266] = 0.0 + k[50]*y_cur[IDX_CI] + k[100]*y_cur[IDX_HI] + + k[119]*y_cur[IDX_NI] + k[5757] + k[6044]; + data[jistart + 20267] = 0.0 + k[54]*y_cur[IDX_CI] + k[104]*y_cur[IDX_HI] + + k[121]*y_cur[IDX_NI] + k[5768] + k[6062]; + data[jistart + 20268] = 0.0 + k[37]*y_cur[IDX_CI] + k[85]*y_cur[IDX_HI] + k[5687] + k[5949]; + data[jistart + 20269] = 0.0 + k[46]*y_cur[IDX_CI] + k[95]*y_cur[IDX_HI] + + k[117]*y_cur[IDX_NI] + k[5739] + k[6024]; + data[jistart + 20270] = 0.0 + k[96]*y_cur[IDX_HI] + k[131]*y_cur[IDX_OI] + k[5745] + k[6030]; + data[jistart + 20271] = 0.0 + k[0]*y_cur[IDX_CI] + k[1]*y_cur[IDX_CH2I] + + k[2]*y_cur[IDX_CHI] + k[3]*y_cur[IDX_CO2I] + k[4]*y_cur[IDX_H2OI] + + k[5]*y_cur[IDX_NI] + k[6]*y_cur[IDX_NHI] + k[7]*y_cur[IDX_O2I] + + k[8]*y_cur[IDX_OI] + k[9]*y_cur[IDX_OHI] + k[82]*y_cur[IDX_H2I] + + k[84]*y_cur[IDX_HI] + k[5686] + k[5948]; + data[jistart + 20272] = 0.0 + k[5828] + k[6141]; + data[jistart + 20273] = 0.0 + k[56]*y_cur[IDX_CI] + k[59]*y_cur[IDX_CH2I] + + k[62]*y_cur[IDX_CHI] + k[83]*y_cur[IDX_H2I] + k[107]*y_cur[IDX_HI] + + k[122]*y_cur[IDX_NI] + k[124]*y_cur[IDX_COI] + k[125]*y_cur[IDX_NOI] + + k[126]*y_cur[IDX_OI] + k[5895] + k[6232]; + data[jistart + 20274] = 0.0 + k[53]*y_cur[IDX_CI] + k[103]*y_cur[IDX_HI] + + k[120]*y_cur[IDX_NI] + k[5766] + k[6059]; + data[jistart + 20275] = 0.0 + k[5816] + k[6120] + k[6123]; + data[jistart + 20276] = 0.0 + k[66]*y_cur[IDX_C2I] + k[67]*y_cur[IDX_C2HI] + + k[68]*y_cur[IDX_CI] + k[69]*y_cur[IDX_CH2I] + k[70]*y_cur[IDX_CH3I] + + k[71]*y_cur[IDX_CHI] + k[72]*y_cur[IDX_CNI] + k[73]*y_cur[IDX_COI] + + k[74]*y_cur[IDX_HI] + k[75]*y_cur[IDX_HI] + k[76]*y_cur[IDX_HCOI] + + k[77]*y_cur[IDX_NI] + k[78]*y_cur[IDX_NH2I] + k[79]*y_cur[IDX_NHI] + + k[80]*y_cur[IDX_OI] + k[81]*y_cur[IDX_OHI] + k[5833] + k[6146]; + data[jistart + 20277] = 0.0 - k[789]*y_cur[IDX_eM] - k[790]*y_cur[IDX_eM]; + data[jistart + 20278] = 0.0 - k[798]*y_cur[IDX_eM]; + data[jistart + 20279] = 0.0 + k[36]*y_cur[IDX_C2I] + k[51]*y_cur[IDX_CI] + + k[101]*y_cur[IDX_HI] + k[5761] + k[6051]; + data[jistart + 20280] = 0.0 + k[10]*y_cur[IDX_C2I] + k[11]*y_cur[IDX_C3I] + + k[12]*y_cur[IDX_C4I] + k[13]*y_cur[IDX_C5I] + k[14]*y_cur[IDX_C6I] + + k[15]*y_cur[IDX_C7I] + k[16]*y_cur[IDX_C8I] + k[38]*y_cur[IDX_CI] + + k[87]*y_cur[IDX_HI] + k[110]*y_cur[IDX_NI] + k[128]*y_cur[IDX_OI] + + k[5693] + k[5976]; + data[jistart + 20281] = 0.0 + k[17]*y_cur[IDX_C3I] + k[18]*y_cur[IDX_C4I] + + k[19]*y_cur[IDX_C5I] + k[20]*y_cur[IDX_C6I] + k[21]*y_cur[IDX_C7I] + + k[40]*y_cur[IDX_CI] + k[89]*y_cur[IDX_HI] + k[112]*y_cur[IDX_NI] + + k[5716] + k[6000]; + data[jistart + 20282] = 0.0 + k[22]*y_cur[IDX_C2I] + k[23]*y_cur[IDX_C3I] + + k[24]*y_cur[IDX_C4I] + k[25]*y_cur[IDX_C5I] + k[26]*y_cur[IDX_C6I] + + k[43]*y_cur[IDX_CI] + k[92]*y_cur[IDX_HI] + k[114]*y_cur[IDX_NI] + + k[5726] + k[6010]; + data[jistart + 20283] = 0.0 + k[31]*y_cur[IDX_C2I] + k[32]*y_cur[IDX_C3I] + + k[33]*y_cur[IDX_C4I] + k[47]*y_cur[IDX_CI] + k[97]*y_cur[IDX_HI] + + k[5747] + k[6032]; + data[jistart + 20284] = 0.0 - k[1034]*y_cur[IDX_eM] - k[1035]*y_cur[IDX_eM] - + k[1036]*y_cur[IDX_eM] - k[1037]*y_cur[IDX_eM] - + k[1038]*y_cur[IDX_eM]; + data[jistart + 20285] = 0.0 + k[27]*y_cur[IDX_C2I] + k[28]*y_cur[IDX_C3I] + + k[29]*y_cur[IDX_C4I] + k[30]*y_cur[IDX_C5I] + k[45]*y_cur[IDX_CI] + + k[94]*y_cur[IDX_HI] + k[116]*y_cur[IDX_NI] + k[5736] + k[6022]; + data[jistart + 20286] = 0.0 + k[34]*y_cur[IDX_C2I] + k[35]*y_cur[IDX_C3I] + + k[49]*y_cur[IDX_CI] + k[99]*y_cur[IDX_HI] + k[118]*y_cur[IDX_NI] + + k[5755] + k[6041]; + data[jistart + 20287] = 0.0 - k[1266]*y_cur[IDX_eM]; + data[jistart + 20288] = 0.0 - k[1267]*y_cur[IDX_eM] - k[1268]*y_cur[IDX_eM]; + data[jistart + 20289] = 0.0 + k[78]*y_cur[IDX_HM] + k[5882] + k[6218]; + data[jistart + 20290] = 0.0 - k[740]*y_cur[IDX_eM] - k[741]*y_cur[IDX_eM]; + data[jistart + 20291] = 0.0 - k[791]*y_cur[IDX_eM] - k[792]*y_cur[IDX_eM] - + k[793]*y_cur[IDX_eM] - k[794]*y_cur[IDX_eM] - k[795]*y_cur[IDX_eM]; + data[jistart + 20292] = 0.0 - k[5598]*y_cur[IDX_eM]; + data[jistart + 20293] = 0.0 - k[907]*y_cur[IDX_eM] - k[908]*y_cur[IDX_eM] - + k[909]*y_cur[IDX_eM]; + data[jistart + 20294] = 0.0 - k[1180]*y_cur[IDX_eM]; + data[jistart + 20295] = 0.0 - k[1012]*y_cur[IDX_eM] - k[1013]*y_cur[IDX_eM] - + k[1014]*y_cur[IDX_eM]; + data[jistart + 20296] = 0.0 + k[42]*y_cur[IDX_CI] + k[91]*y_cur[IDX_HI] + + k[130]*y_cur[IDX_OI] + k[5721] + k[6005]; + data[jistart + 20297] = 0.0 - k[5593]*y_cur[IDX_eM]; + data[jistart + 20298] = 0.0 - k[906]*y_cur[IDX_eM]; + data[jistart + 20299] = 0.0 + k[3]*y_cur[IDX_CM]; + data[jistart + 20300] = 0.0 - k[1174]*y_cur[IDX_eM]; + data[jistart + 20301] = 0.0 - k[5588]*y_cur[IDX_eM] + k[5962]; + data[jistart + 20302] = 0.0 - k[5606]*y_cur[IDX_eM] + k[6066]; + data[jistart + 20303] = 0.0 + k[6287]; + data[jistart + 20304] = 0.0 - k[5614]*y_cur[IDX_eM]; + data[jistart + 20305] = 0.0 + k[5832] + k[6145] + k[6304]; + data[jistart + 20306] = 0.0 - k[5620]*y_cur[IDX_eM]; + data[jistart + 20307] = 0.0 - k[5622]*y_cur[IDX_eM]; + data[jistart + 20308] = 0.0 + k[5877] + k[6210] + k[6306]; + data[jistart + 20309] = 0.0 + k[5894] + k[6231] + k[6305]; + data[jistart + 20310] = 0.0 - k[5587]*y_cur[IDX_eM] + k[5950]; + data[jistart + 20311] = 0.0 - k[5604]*y_cur[IDX_eM] + k[6058]; + data[jistart + 20312] = 0.0 + k[15]*y_cur[IDX_C2M] + k[21]*y_cur[IDX_C3M] - + k[5601]*y_cur[IDX_eM] + k[6043]; + data[jistart + 20313] = 0.0 - k[5605]*y_cur[IDX_eM] + k[6061]; + data[jistart + 20314] = 0.0 + k[16]*y_cur[IDX_C2M] - k[5603]*y_cur[IDX_eM] + k[6053]; + data[jistart + 20315] = 0.0 + k[6]*y_cur[IDX_CM] + k[79]*y_cur[IDX_HM] + k[5889] + k[6225]; + data[jistart + 20316] = 0.0 + k[13]*y_cur[IDX_C2M] + k[19]*y_cur[IDX_C3M] + + k[25]*y_cur[IDX_C4M] + k[30]*y_cur[IDX_C5M] - k[5596]*y_cur[IDX_eM]; + data[jistart + 20317] = 0.0 + k[14]*y_cur[IDX_C2M] + k[20]*y_cur[IDX_C3M] + + k[26]*y_cur[IDX_C4M] - k[5599]*y_cur[IDX_eM] + k[6034]; + data[jistart + 20318] = 0.0 + k[60]*y_cur[IDX_CH3I] + k[106]*y_cur[IDX_HI] + k[5822] + + k[6133]; + data[jistart + 20319] = 0.0 + k[12]*y_cur[IDX_C2M] + k[18]*y_cur[IDX_C3M] + + k[24]*y_cur[IDX_C4M] + k[29]*y_cur[IDX_C5M] + k[33]*y_cur[IDX_C6M] - + k[5594]*y_cur[IDX_eM]; + data[jistart + 20320] = 0.0 + k[5916] + k[6258]; + data[jistart + 20321] = 0.0 - k[5602]*y_cur[IDX_eM] + k[6048]; + data[jistart + 20322] = 0.0 - k[757]*y_cur[IDX_eM] - k[758]*y_cur[IDX_eM] - + k[759]*y_cur[IDX_eM] - k[760]*y_cur[IDX_eM] - k[761]*y_cur[IDX_eM] - + k[762]*y_cur[IDX_eM] - k[763]*y_cur[IDX_eM]; + data[jistart + 20323] = 0.0 - k[824]*y_cur[IDX_eM] - k[825]*y_cur[IDX_eM]; + data[jistart + 20324] = 0.0 - k[1151]*y_cur[IDX_eM] - k[1152]*y_cur[IDX_eM] - + k[1153]*y_cur[IDX_eM] - k[1154]*y_cur[IDX_eM]; + data[jistart + 20325] = 0.0 - k[1220]*y_cur[IDX_eM]; + data[jistart + 20326] = 0.0 - k[910]*y_cur[IDX_eM] - k[911]*y_cur[IDX_eM]; + data[jistart + 20327] = 0.0 - k[5600]*y_cur[IDX_eM]; + data[jistart + 20328] = 0.0 - k[5597]*y_cur[IDX_eM]; + data[jistart + 20329] = 0.0 - k[1019]*y_cur[IDX_eM] - k[1020]*y_cur[IDX_eM] - + k[5618]*y_cur[IDX_eM]; + data[jistart + 20330] = 0.0 - k[5621]*y_cur[IDX_eM]; + data[jistart + 20331] = 0.0 - k[5592]*y_cur[IDX_eM]; + data[jistart + 20332] = 0.0 - k[996]*y_cur[IDX_eM] - k[997]*y_cur[IDX_eM] - + k[998]*y_cur[IDX_eM] - k[999]*y_cur[IDX_eM] - k[5616]*y_cur[IDX_eM]; + data[jistart + 20333] = 0.0 + k[11]*y_cur[IDX_C2M] + k[17]*y_cur[IDX_C3M] + + k[23]*y_cur[IDX_C4M] + k[28]*y_cur[IDX_C5M] + k[32]*y_cur[IDX_C6M] + + k[35]*y_cur[IDX_C7M] - k[5591]*y_cur[IDX_eM]; + data[jistart + 20334] = 0.0 - k[5595]*y_cur[IDX_eM]; + data[jistart + 20335] = 0.0 - k[1168]*y_cur[IDX_eM]; + data[jistart + 20336] = 0.0 - k[5623]*y_cur[IDX_eM]; + data[jistart + 20337] = 0.0 + k[5848] + k[6173]; + data[jistart + 20338] = 0.0 - k[822]*y_cur[IDX_eM] - k[823]*y_cur[IDX_eM]; + data[jistart + 20339] = 0.0 - k[1089]*y_cur[IDX_eM] - k[1090]*y_cur[IDX_eM] - + k[1091]*y_cur[IDX_eM]; + data[jistart + 20340] = 0.0 + k[1]*y_cur[IDX_CM] + k[59]*y_cur[IDX_OM] + k[69]*y_cur[IDX_HM] + + k[5778] + k[6078]; + data[jistart + 20341] = 0.0 - k[1163]*y_cur[IDX_eM] - k[1164]*y_cur[IDX_eM]; + data[jistart + 20342] = 0.0 + k[5701] + k[5986]; + data[jistart + 20343] = 0.0 + k[5699] + k[5984]; + data[jistart + 20344] = 0.0 - k[1165]*y_cur[IDX_eM] - k[1166]*y_cur[IDX_eM] - + k[1167]*y_cur[IDX_eM]; + data[jistart + 20345] = 0.0 + k[7]*y_cur[IDX_CM] + k[127]*y_cur[IDX_SM] + + k[146]*y_cur[IDX_O2M] + k[5897] + k[6235]; + data[jistart + 20346] = 0.0 - k[5626]*y_cur[IDX_eM]; + data[jistart + 20347] = 0.0 + k[5841] + k[6163]; + data[jistart + 20348] = 0.0 - k[5625]*y_cur[IDX_eM]; + data[jistart + 20349] = 0.0 + k[5917] + k[6259] + k[6302]; + data[jistart + 20350] = 0.0 - k[745]*y_cur[IDX_eM] - k[746]*y_cur[IDX_eM] - + k[747]*y_cur[IDX_eM] - k[748]*y_cur[IDX_eM] - k[749]*y_cur[IDX_eM] - + k[750]*y_cur[IDX_eM] - k[751]*y_cur[IDX_eM] - k[752]*y_cur[IDX_eM] - + k[753]*y_cur[IDX_eM] - k[754]*y_cur[IDX_eM] - k[755]*y_cur[IDX_eM] - + k[756]*y_cur[IDX_eM]; + data[jistart + 20351] = 0.0 + k[125]*y_cur[IDX_OM] + k[5891] + k[6228]; + data[jistart + 20352] = 0.0 + k[76]*y_cur[IDX_HM] + k[5857] + k[6185]; + data[jistart + 20353] = 0.0 + k[6129]; + data[jistart + 20354] = 0.0 + k[67]*y_cur[IDX_HM] - k[5590]*y_cur[IDX_eM] + k[5709] + + k[5994]; + data[jistart + 20355] = 0.0 + k[6154] + k[6155]; + data[jistart + 20356] = 0.0 + k[2]*y_cur[IDX_CM] + k[62]*y_cur[IDX_OM] + k[63]*y_cur[IDX_OI] + + k[64]*y_cur[IDX_OHM] + k[71]*y_cur[IDX_HM] + k[6132]; + data[jistart + 20357] = 0.0 - k[5610]*y_cur[IDX_eM] + k[5913] + k[6255] + k[6303]; + data[jistart + 20358] = 0.0 + k[10]*y_cur[IDX_C2M] + k[22]*y_cur[IDX_C4M] + + k[27]*y_cur[IDX_C5M] + k[31]*y_cur[IDX_C6M] + k[34]*y_cur[IDX_C7M] + + k[36]*y_cur[IDX_C8M] + k[66]*y_cur[IDX_HM] - k[5589]*y_cur[IDX_eM] + + k[5977]; + data[jistart + 20359] = 0.0 + k[9]*y_cur[IDX_CM] + k[81]*y_cur[IDX_HM] + k[6245]; + data[jistart + 20360] = 0.0 + k[5886] + k[6222]; + data[jistart + 20361] = 0.0 - k[742]*y_cur[IDX_eM] - k[743]*y_cur[IDX_eM] - + k[744]*y_cur[IDX_eM]; + data[jistart + 20362] = 0.0 - k[923]*y_cur[IDX_eM] - k[924]*y_cur[IDX_eM] - + k[925]*y_cur[IDX_eM] - k[5612]*y_cur[IDX_eM]; + data[jistart + 20363] = 0.0 + k[5696] + k[5981]; + data[jistart + 20364] = 0.0 + k[72]*y_cur[IDX_HM]; + data[jistart + 20365] = 0.0 + k[60]*y_cur[IDX_CNM] + k[61]*y_cur[IDX_OHM] + + k[70]*y_cur[IDX_HM] + k[5794] + k[6098]; + data[jistart + 20366] = 0.0 + k[5]*y_cur[IDX_CM] + k[77]*y_cur[IDX_HM] + + k[110]*y_cur[IDX_C2M] + k[111]*y_cur[IDX_C2HM] + + k[112]*y_cur[IDX_C3M] + k[113]*y_cur[IDX_C3HM] + + k[114]*y_cur[IDX_C4M] + k[115]*y_cur[IDX_C4HM] + + k[116]*y_cur[IDX_C5M] + k[117]*y_cur[IDX_C5HM] + + k[118]*y_cur[IDX_C7M] + k[119]*y_cur[IDX_C7HM] + + k[120]*y_cur[IDX_C9M] + k[121]*y_cur[IDX_C9HM] + + k[122]*y_cur[IDX_OM] + k[123]*y_cur[IDX_SM] + k[5684] + k[5880] + + k[6300]; + data[jistart + 20367] = 0.0 - k[1041]*y_cur[IDX_eM] - k[1042]*y_cur[IDX_eM] - + k[1043]*y_cur[IDX_eM] - k[1044]*y_cur[IDX_eM]; + data[jistart + 20368] = 0.0 + k[8]*y_cur[IDX_CM] + k[63]*y_cur[IDX_CHI] + + k[80]*y_cur[IDX_HM] + k[126]*y_cur[IDX_OM] + k[128]*y_cur[IDX_C2M] + + k[129]*y_cur[IDX_C2HM] + k[130]*y_cur[IDX_C3NM] + + k[131]*y_cur[IDX_C5NM] + k[132]*y_cur[IDX_SM] - + k[5609]*y_cur[IDX_eM] + k[5685] + k[5900] + k[6301]; + data[jistart + 20369] = 0.0 - k[5619]*y_cur[IDX_eM]; + data[jistart + 20370] = 0.0 + k[5683] + k[5876] + k[6298]; + data[jistart + 20371] = 0.0 - k[5611]*y_cur[IDX_eM]; + data[jistart + 20372] = 0.0 + k[4]*y_cur[IDX_CM] + k[6159]; + data[jistart + 20373] = 0.0 - k[5615]*y_cur[IDX_eM]; + data[jistart + 20374] = 0.0 + k[0]*y_cur[IDX_CM] + k[37]*y_cur[IDX_C10M] + + k[38]*y_cur[IDX_C2M] + k[39]*y_cur[IDX_C2HM] + k[40]*y_cur[IDX_C3M] + + k[41]*y_cur[IDX_C3HM] + k[42]*y_cur[IDX_C3NM] + + k[43]*y_cur[IDX_C4M] + k[44]*y_cur[IDX_C4HM] + k[45]*y_cur[IDX_C5M] + + k[46]*y_cur[IDX_C5HM] + k[47]*y_cur[IDX_C6M] + + k[48]*y_cur[IDX_C6HM] + k[49]*y_cur[IDX_C7M] + k[50]*y_cur[IDX_C7HM] + + k[51]*y_cur[IDX_C8M] + k[52]*y_cur[IDX_C8HM] + + k[53]*y_cur[IDX_C9M] + k[54]*y_cur[IDX_C9HM] + k[55]*y_cur[IDX_CHM] + + k[56]*y_cur[IDX_OM] + k[57]*y_cur[IDX_OHM] + k[58]*y_cur[IDX_SM] + + k[68]*y_cur[IDX_HM] - k[5607]*y_cur[IDX_eM] + k[5675] + k[5772] + + k[6069] + k[6299]; + data[jistart + 20375] = 0.0 - k[1097]*y_cur[IDX_eM]; + data[jistart + 20376] = 0.0 - k[1025]*y_cur[IDX_eM] - k[1026]*y_cur[IDX_eM]; + data[jistart + 20377] = 0.0 + k[65]*y_cur[IDX_SM] + k[73]*y_cur[IDX_HM] + + k[124]*y_cur[IDX_OM] + k[5676]; + data[jistart + 20378] = 0.0 - k[8763]*y_cur[IDX_eM]; + data[jistart + 20379] = 0.0 + k[82]*y_cur[IDX_CM] + k[83]*y_cur[IDX_OM] - + k[140]*y_cur[IDX_eM] + k[140]*y_cur[IDX_eM] + k[5679] + k[5680]; + data[jistart + 20380] = 0.0 - k[140]*y_cur[IDX_H2I] + k[140]*y_cur[IDX_H2I] - + k[727]*y_cur[IDX_C10II] - k[728]*y_cur[IDX_C10II] - + k[729]*y_cur[IDX_C10HII] - k[730]*y_cur[IDX_C10HII] - + k[731]*y_cur[IDX_C10HII] - k[732]*y_cur[IDX_C10H2II] - + k[733]*y_cur[IDX_C10H3II] - k[734]*y_cur[IDX_C10H3II] - + k[735]*y_cur[IDX_C11II] - k[736]*y_cur[IDX_C11II] - + k[737]*y_cur[IDX_C11II] - k[738]*y_cur[IDX_C11II] - + k[739]*y_cur[IDX_C2II] - k[740]*y_cur[IDX_C2HII] - + k[741]*y_cur[IDX_C2HII] - k[742]*y_cur[IDX_C2H2II] - + k[743]*y_cur[IDX_C2H2II] - k[744]*y_cur[IDX_C2H2II] - + k[745]*y_cur[IDX_C2H3II] - k[746]*y_cur[IDX_C2H3II] - + k[747]*y_cur[IDX_C2H3II] - k[748]*y_cur[IDX_C2H3II] - + k[749]*y_cur[IDX_C2H3II] - k[750]*y_cur[IDX_C2H3II] - + k[751]*y_cur[IDX_C2H3II] - k[752]*y_cur[IDX_C2H3II] - + k[753]*y_cur[IDX_C2H3II] - k[754]*y_cur[IDX_C2H3II] - + k[755]*y_cur[IDX_C2H3II] - k[756]*y_cur[IDX_C2H3II] - + k[757]*y_cur[IDX_C2H4II] - k[758]*y_cur[IDX_C2H4II] - + k[759]*y_cur[IDX_C2H4II] - k[760]*y_cur[IDX_C2H4II] - + k[761]*y_cur[IDX_C2H4II] - k[762]*y_cur[IDX_C2H4II] - + k[763]*y_cur[IDX_C2H4II] - k[764]*y_cur[IDX_C2H5II] - + k[765]*y_cur[IDX_C2H5II] - k[766]*y_cur[IDX_C2H5II] - + k[767]*y_cur[IDX_C2H5II] - k[768]*y_cur[IDX_C2H5II] - + k[769]*y_cur[IDX_C2H5CNHII] - k[770]*y_cur[IDX_C2H5CNHII] - + k[771]*y_cur[IDX_C2H5CNHII] - k[772]*y_cur[IDX_C2H5OHII] - + k[773]*y_cur[IDX_C2H5OHII] - k[774]*y_cur[IDX_C2H5OH2II] - + k[775]*y_cur[IDX_C2H5OH2II] - k[776]*y_cur[IDX_C2H5OH2II] - + k[777]*y_cur[IDX_C2H5OH2II] - k[778]*y_cur[IDX_C2H7II] - + k[779]*y_cur[IDX_C2H7II] - k[780]*y_cur[IDX_C2NII] - + k[781]*y_cur[IDX_C2NII] - k[782]*y_cur[IDX_C2N2II] - + k[783]*y_cur[IDX_C2N2II] - k[784]*y_cur[IDX_C2NHII] - + k[785]*y_cur[IDX_C2OII] - k[786]*y_cur[IDX_C2SII] - + k[787]*y_cur[IDX_C2SII] - k[788]*y_cur[IDX_C3II] - + k[789]*y_cur[IDX_C3HII] - k[790]*y_cur[IDX_C3HII] - + k[791]*y_cur[IDX_C3H2II] - k[792]*y_cur[IDX_C3H2II] - + k[793]*y_cur[IDX_C3H2II] - k[794]*y_cur[IDX_C3H2II] - + k[795]*y_cur[IDX_C3H2II] - k[796]*y_cur[IDX_C3H2OII] - + k[797]*y_cur[IDX_C3H2OII] - k[798]*y_cur[IDX_C3H3II] - + k[799]*y_cur[IDX_C3H4II] - k[800]*y_cur[IDX_C3H4II] - + k[801]*y_cur[IDX_C3H4II] - k[802]*y_cur[IDX_C3H4II] - + k[803]*y_cur[IDX_C3H5II] - k[804]*y_cur[IDX_C3H5II] - + k[805]*y_cur[IDX_C3H6II] - k[806]*y_cur[IDX_C3H6II] - + k[807]*y_cur[IDX_C3H7II] - k[808]*y_cur[IDX_C3H7II] - + k[809]*y_cur[IDX_C3H7II] - k[810]*y_cur[IDX_C3H7II] - + k[811]*y_cur[IDX_C3H7II] - k[812]*y_cur[IDX_C3H7II] - + k[813]*y_cur[IDX_C3H7II] - k[814]*y_cur[IDX_C3NII] - + k[815]*y_cur[IDX_C3OII] - k[816]*y_cur[IDX_C3SII] - + k[817]*y_cur[IDX_C3SII] - k[818]*y_cur[IDX_C3SII] - + k[819]*y_cur[IDX_C4II] - k[820]*y_cur[IDX_C4II] - + k[821]*y_cur[IDX_C4HII] - k[822]*y_cur[IDX_C4H2II] - + k[823]*y_cur[IDX_C4H2II] - k[824]*y_cur[IDX_C4H3II] - + k[825]*y_cur[IDX_C4H3II] - k[826]*y_cur[IDX_C4H4II] - + k[827]*y_cur[IDX_C4H5II] - k[828]*y_cur[IDX_C4H5II] - + k[829]*y_cur[IDX_C4H5II] - k[830]*y_cur[IDX_C4H7II] - + k[831]*y_cur[IDX_C4NII] - k[832]*y_cur[IDX_C4NII] - + k[833]*y_cur[IDX_C4PII] - k[834]*y_cur[IDX_C4PII] - + k[835]*y_cur[IDX_C4SII] - k[836]*y_cur[IDX_C4SII] - + k[837]*y_cur[IDX_C4SII] - k[838]*y_cur[IDX_C5II] - + k[839]*y_cur[IDX_C5HII] - k[840]*y_cur[IDX_C5HII] - + k[841]*y_cur[IDX_C5H2II] - k[842]*y_cur[IDX_C5H2II] - + k[843]*y_cur[IDX_C5H3II] - k[844]*y_cur[IDX_C5H3II] - + k[845]*y_cur[IDX_C5H5II] - k[846]*y_cur[IDX_C5H5II] - + k[847]*y_cur[IDX_C5NII] - k[848]*y_cur[IDX_C6II] - + k[849]*y_cur[IDX_C6II] - k[850]*y_cur[IDX_C6HII] - + k[851]*y_cur[IDX_C6HII] - k[852]*y_cur[IDX_C6H2II] - + k[853]*y_cur[IDX_C6H2II] - k[854]*y_cur[IDX_C6H3II] - + k[855]*y_cur[IDX_C6H3II] - k[856]*y_cur[IDX_C6H4II] - + k[857]*y_cur[IDX_C6H4II] - k[858]*y_cur[IDX_C6H5II] - + k[859]*y_cur[IDX_C6H5II] - k[860]*y_cur[IDX_C6H6II] - + k[861]*y_cur[IDX_C6H7II] - k[862]*y_cur[IDX_C6H7II] - + k[863]*y_cur[IDX_C7II] - k[864]*y_cur[IDX_C7II] - + k[865]*y_cur[IDX_C7II] - k[866]*y_cur[IDX_C7HII] - + k[867]*y_cur[IDX_C7HII] - k[868]*y_cur[IDX_C7H2II] - + k[869]*y_cur[IDX_C7H2II] - k[870]*y_cur[IDX_C7H3II] - + k[871]*y_cur[IDX_C7H3II] - k[872]*y_cur[IDX_C7H4II] - + k[873]*y_cur[IDX_C7H4II] - k[874]*y_cur[IDX_C7H5II] - + k[875]*y_cur[IDX_C7H5II] - k[876]*y_cur[IDX_C7NII] - + k[877]*y_cur[IDX_C8II] - k[878]*y_cur[IDX_C8II] - + k[879]*y_cur[IDX_C8HII] - k[880]*y_cur[IDX_C8HII] - + k[881]*y_cur[IDX_C8H2II] - k[882]*y_cur[IDX_C8H2II] - + k[883]*y_cur[IDX_C8H3II] - k[884]*y_cur[IDX_C8H3II] - + k[885]*y_cur[IDX_C8H4II] - k[886]*y_cur[IDX_C8H4II] - + k[887]*y_cur[IDX_C8H5II] - k[888]*y_cur[IDX_C8H5II] - + k[889]*y_cur[IDX_C9II] - k[890]*y_cur[IDX_C9II] - + k[891]*y_cur[IDX_C9HII] - k[892]*y_cur[IDX_C9HII] - + k[893]*y_cur[IDX_C9H2II] - k[894]*y_cur[IDX_C9H2II] - + k[895]*y_cur[IDX_C9H3II] - k[896]*y_cur[IDX_C9H3II] - + k[897]*y_cur[IDX_C9H4II] - k[898]*y_cur[IDX_C9H4II] - + k[899]*y_cur[IDX_C9H5II] - k[900]*y_cur[IDX_C9H5II] - + k[901]*y_cur[IDX_C9NII] - k[902]*y_cur[IDX_CCPII] - + k[903]*y_cur[IDX_CCPII] - k[904]*y_cur[IDX_CClII] - + k[905]*y_cur[IDX_CFII] - k[906]*y_cur[IDX_CHII] - + k[907]*y_cur[IDX_CH2II] - k[908]*y_cur[IDX_CH2II] - + k[909]*y_cur[IDX_CH2II] - k[910]*y_cur[IDX_CH2CCHII] - + k[911]*y_cur[IDX_CH2CCHII] - k[912]*y_cur[IDX_CH2CHCNII] - + k[913]*y_cur[IDX_CH2CHCNHII] - k[914]*y_cur[IDX_CH2CHCNHII] - + k[915]*y_cur[IDX_CH2CHCNHII] - k[916]*y_cur[IDX_CH2CNII] - + k[917]*y_cur[IDX_CH2CNII] - k[918]*y_cur[IDX_CH2COII] - + k[919]*y_cur[IDX_CH2COII] - k[920]*y_cur[IDX_CH2COII] - + k[921]*y_cur[IDX_CH2NH2II] - k[922]*y_cur[IDX_CH2NH2II] - + k[923]*y_cur[IDX_CH3II] - k[924]*y_cur[IDX_CH3II] - + k[925]*y_cur[IDX_CH3II] - k[926]*y_cur[IDX_CH3C3NII] - + k[927]*y_cur[IDX_CH3C3NHII] - k[928]*y_cur[IDX_CH3C3NHII] - + k[929]*y_cur[IDX_CH3C4HII] - k[930]*y_cur[IDX_CH3C4HII] - + k[931]*y_cur[IDX_CH3C5NHII] - k[932]*y_cur[IDX_CH3C5NHII] - + k[933]*y_cur[IDX_CH3C7NHII] - k[934]*y_cur[IDX_CH3C7NHII] - + k[935]*y_cur[IDX_C2H6II] - k[936]*y_cur[IDX_C2H6II] - + k[937]*y_cur[IDX_CH3CHOII] - k[938]*y_cur[IDX_CH3CHOII] - + k[939]*y_cur[IDX_CH3CHOHII] - k[940]*y_cur[IDX_CH3CHOHII] - + k[941]*y_cur[IDX_CH3CHOHII] - k[942]*y_cur[IDX_CH3CHOHII] - + k[943]*y_cur[IDX_CH3CHOHII] - k[944]*y_cur[IDX_CH3CNII] - + k[945]*y_cur[IDX_CH3CNII] - k[946]*y_cur[IDX_CH3CNHII] - + k[947]*y_cur[IDX_CH3CNHII] - k[948]*y_cur[IDX_CH3COII] - + k[949]*y_cur[IDX_CH3COII] - k[950]*y_cur[IDX_CH3COCH3II] - + k[951]*y_cur[IDX_CH3COCH3II] - k[952]*y_cur[IDX_CH3COCH4II] - + k[953]*y_cur[IDX_CH3COCH4II] - k[954]*y_cur[IDX_CH3CSII] - + k[955]*y_cur[IDX_CH3OCH3II] - k[956]*y_cur[IDX_CH3OCH3II] - + k[957]*y_cur[IDX_CH3OCH4II] - k[958]*y_cur[IDX_CH3OCH4II] - + k[959]*y_cur[IDX_CH3OCH4II] - k[960]*y_cur[IDX_CH3OHII] - + k[961]*y_cur[IDX_CH3OHII] - k[962]*y_cur[IDX_CH3OHII] - + k[963]*y_cur[IDX_CH3OH2II] - k[964]*y_cur[IDX_CH3OH2II] - + k[965]*y_cur[IDX_CH3OH2II] - k[966]*y_cur[IDX_CH3OH2II] - + k[967]*y_cur[IDX_CH3OH2II] - k[968]*y_cur[IDX_CH4II] - + k[969]*y_cur[IDX_CH4II] - k[970]*y_cur[IDX_CH3NHII] - + k[971]*y_cur[IDX_CH3NHII] - k[972]*y_cur[IDX_CH5II] - + k[973]*y_cur[IDX_CH5II] - k[974]*y_cur[IDX_CH5II] - + k[975]*y_cur[IDX_CH5II] - k[976]*y_cur[IDX_CH5II] - + k[977]*y_cur[IDX_CNII] - k[978]*y_cur[IDX_CNCII] - + k[979]*y_cur[IDX_CNCII] - k[980]*y_cur[IDX_COII] - + k[981]*y_cur[IDX_CO2II] - k[982]*y_cur[IDX_HCOOCH3II] - + k[983]*y_cur[IDX_HCOOCH3II] - k[984]*y_cur[IDX_CPII] - + k[985]*y_cur[IDX_CSII] - k[986]*y_cur[IDX_ClOII] - + k[987]*y_cur[IDX_H2II] - k[988]*y_cur[IDX_H2C4NII] - + k[989]*y_cur[IDX_H2C7NII] - k[990]*y_cur[IDX_H2C7NII] - + k[991]*y_cur[IDX_H2C9NII] - k[992]*y_cur[IDX_H2C9NII] - + k[993]*y_cur[IDX_H2CClII] - k[994]*y_cur[IDX_H2CNOII] - + k[995]*y_cur[IDX_H2CNOII] - k[996]*y_cur[IDX_H2COII] - + k[997]*y_cur[IDX_H2COII] - k[998]*y_cur[IDX_H2COII] - + k[999]*y_cur[IDX_H2COII] - k[1000]*y_cur[IDX_H2CSII] - + k[1001]*y_cur[IDX_H2CSII] - k[1002]*y_cur[IDX_H2ClII] - + k[1003]*y_cur[IDX_H2ClII] - k[1004]*y_cur[IDX_H2FII] - + k[1005]*y_cur[IDX_H2FII] - k[1006]*y_cur[IDX_H2NCII] - + k[1007]*y_cur[IDX_H2NCII] - k[1008]*y_cur[IDX_H2NCOII] - + k[1009]*y_cur[IDX_H2NCOII] - k[1010]*y_cur[IDX_H2NOII] - + k[1011]*y_cur[IDX_H2NOII] - k[1012]*y_cur[IDX_H2OII] - + k[1013]*y_cur[IDX_H2OII] - k[1014]*y_cur[IDX_H2OII] - + k[1015]*y_cur[IDX_H2OCNII] - k[1016]*y_cur[IDX_H2OCNII] - + k[1017]*y_cur[IDX_H2POII] - k[1018]*y_cur[IDX_H2POII] - + k[1019]*y_cur[IDX_H2SII] - k[1020]*y_cur[IDX_H2SII] - + k[1021]*y_cur[IDX_H2S2II] - k[1022]*y_cur[IDX_H2S2II] - + k[1023]*y_cur[IDX_H2SiOII] - k[1024]*y_cur[IDX_H2SiOII] - + k[1025]*y_cur[IDX_H3II] - k[1026]*y_cur[IDX_H3II] - + k[1027]*y_cur[IDX_H3C3OII] - k[1028]*y_cur[IDX_H3C5NII] - + k[1029]*y_cur[IDX_H3C5NII] - k[1030]*y_cur[IDX_H3C7NII] - + k[1031]*y_cur[IDX_H3C7NII] - k[1032]*y_cur[IDX_H3C9NII] - + k[1033]*y_cur[IDX_H3C9NII] - k[1034]*y_cur[IDX_H3COII] - + k[1035]*y_cur[IDX_H3COII] - k[1036]*y_cur[IDX_H3COII] - + k[1037]*y_cur[IDX_H3COII] - k[1038]*y_cur[IDX_H3COII] - + k[1039]*y_cur[IDX_H3CSII] - k[1040]*y_cur[IDX_H3CSII] - + k[1041]*y_cur[IDX_H3OII] - k[1042]*y_cur[IDX_H3OII] - + k[1043]*y_cur[IDX_H3OII] - k[1044]*y_cur[IDX_H3OII] - + k[1045]*y_cur[IDX_H3SII] - k[1046]*y_cur[IDX_H3SII] - + k[1047]*y_cur[IDX_H3SII] - k[1048]*y_cur[IDX_H3SII] - + k[1049]*y_cur[IDX_H3S2II] - k[1050]*y_cur[IDX_H3S2II] - + k[1051]*y_cur[IDX_H3SiOII] - k[1052]*y_cur[IDX_H3SiOII] - + k[1053]*y_cur[IDX_H5C2O2II] - k[1054]*y_cur[IDX_H5C2O2II] - + k[1055]*y_cur[IDX_HC2OII] - k[1056]*y_cur[IDX_HC2OII] - + k[1057]*y_cur[IDX_HC2OII] - k[1058]*y_cur[IDX_HC2OII] - + k[1059]*y_cur[IDX_HC2PII] - k[1060]*y_cur[IDX_HC2PII] - + k[1061]*y_cur[IDX_HC2SII] - k[1062]*y_cur[IDX_HC2SII] - + k[1063]*y_cur[IDX_HC3NII] - k[1064]*y_cur[IDX_HC3NII] - + k[1065]*y_cur[IDX_HC3NII] - k[1066]*y_cur[IDX_HC3NHII] - + k[1067]*y_cur[IDX_HC3NHII] - k[1068]*y_cur[IDX_HC3NHII] - + k[1069]*y_cur[IDX_HC3NHII] - k[1070]*y_cur[IDX_HC3OII] - + k[1071]*y_cur[IDX_HC3SII] - k[1072]*y_cur[IDX_HC3SII] - + k[1073]*y_cur[IDX_HC4NII] - k[1074]*y_cur[IDX_HC4SII] - + k[1075]*y_cur[IDX_HC4SII] - k[1076]*y_cur[IDX_HC4SII] - + k[1077]*y_cur[IDX_HC5NII] - k[1078]*y_cur[IDX_HC5NII] - + k[1079]*y_cur[IDX_HC5NHII] - k[1080]*y_cur[IDX_HC5NHII] - + k[1081]*y_cur[IDX_HC5NHII] - k[1082]*y_cur[IDX_HC5NHII] - + k[1083]*y_cur[IDX_HC5NHII] - k[1084]*y_cur[IDX_HC7NII] - + k[1085]*y_cur[IDX_HC7NII] - k[1086]*y_cur[IDX_HC9NII] - + k[1087]*y_cur[IDX_HC9NII] - k[1088]*y_cur[IDX_HCNII] - + k[1089]*y_cur[IDX_HCNHII] - k[1090]*y_cur[IDX_HCNHII] - + k[1091]*y_cur[IDX_HCNHII] - k[1092]*y_cur[IDX_HCNOII] - + k[1093]*y_cur[IDX_HCNOII] - k[1094]*y_cur[IDX_HCNOHII] - + k[1095]*y_cur[IDX_HCNOHII] - k[1096]*y_cur[IDX_HCNOHII] - + k[1097]*y_cur[IDX_HCOII] - k[1098]*y_cur[IDX_HCO2II] - + k[1099]*y_cur[IDX_HCO2II] - k[1100]*y_cur[IDX_HCO2II] - + k[1101]*y_cur[IDX_HCOOHII] - k[1102]*y_cur[IDX_HCOOHII] - + k[1103]*y_cur[IDX_HCOOH2II] - k[1104]*y_cur[IDX_HCOOH2II] - + k[1105]*y_cur[IDX_HCPII] - k[1106]*y_cur[IDX_HCPII] - + k[1107]*y_cur[IDX_HCSII] - k[1108]*y_cur[IDX_HCSII] - + k[1109]*y_cur[IDX_HCSiII] - k[1110]*y_cur[IDX_HCSiII] - + k[1111]*y_cur[IDX_HClII] - k[1112]*y_cur[IDX_HFII] - + k[1113]*y_cur[IDX_HN2OII] - k[1114]*y_cur[IDX_HN2OII] - + k[1115]*y_cur[IDX_HNC3I] - k[1116]*y_cur[IDX_HNCOII] - + k[1117]*y_cur[IDX_HNCOII] - k[1118]*y_cur[IDX_HNCOHII] - + k[1119]*y_cur[IDX_HNCOHII] - k[1120]*y_cur[IDX_HNCOHII] - + k[1121]*y_cur[IDX_HNOII] - k[1122]*y_cur[IDX_HNSII] - + k[1123]*y_cur[IDX_HNSiII] - k[1124]*y_cur[IDX_HNSiII] - + k[1125]*y_cur[IDX_HOCII] - k[1126]*y_cur[IDX_HOCNII] - + k[1127]*y_cur[IDX_HOCNII] - k[1128]*y_cur[IDX_HOCSII] - + k[1129]*y_cur[IDX_HOCSII] - k[1130]*y_cur[IDX_HONCII] - + k[1131]*y_cur[IDX_HONCII] - k[1132]*y_cur[IDX_HPNII] - + k[1133]*y_cur[IDX_HPNII] - k[1134]*y_cur[IDX_HPNII] - + k[1135]*y_cur[IDX_HPOII] - k[1136]*y_cur[IDX_HPOII] - + k[1137]*y_cur[IDX_HPOII] - k[1138]*y_cur[IDX_HSII] - + k[1139]*y_cur[IDX_HS2II] - k[1140]*y_cur[IDX_HS2II] - + k[1141]*y_cur[IDX_HSOII] - k[1142]*y_cur[IDX_HSO2II] - + k[1143]*y_cur[IDX_HSO2II] - k[1144]*y_cur[IDX_HSO2II] - + k[1145]*y_cur[IDX_HSiO2II] - k[1146]*y_cur[IDX_HSiO2II] - + k[1147]*y_cur[IDX_HSiSII] - k[1148]*y_cur[IDX_HSiSII] - + k[1149]*y_cur[IDX_HeHII] - k[1150]*y_cur[IDX_N2II] - + k[1151]*y_cur[IDX_N2HII] - k[1152]*y_cur[IDX_N2HII] - + k[1153]*y_cur[IDX_N2HII] - k[1154]*y_cur[IDX_N2HII] - + k[1155]*y_cur[IDX_NCCNCH3II] - k[1156]*y_cur[IDX_NCCNHII] - + k[1157]*y_cur[IDX_NCCNHII] - k[1158]*y_cur[IDX_NHII] - + k[1159]*y_cur[IDX_NH2II] - k[1160]*y_cur[IDX_NH2II] - + k[1161]*y_cur[IDX_NH2CNHII] - k[1162]*y_cur[IDX_NH2CNHII] - + k[1163]*y_cur[IDX_NH3II] - k[1164]*y_cur[IDX_NH3II] - + k[1165]*y_cur[IDX_NH4II] - k[1166]*y_cur[IDX_NH4II] - + k[1167]*y_cur[IDX_NH4II] - k[1168]*y_cur[IDX_NOII] - + k[1169]*y_cur[IDX_NO2II] - k[1170]*y_cur[IDX_N2OII] - + k[1171]*y_cur[IDX_N2OII] - k[1172]*y_cur[IDX_N2OII] - + k[1173]*y_cur[IDX_NSII] - k[1174]*y_cur[IDX_O2II] - + k[1175]*y_cur[IDX_O2HII] - k[1176]*y_cur[IDX_OCNII] - + k[1177]*y_cur[IDX_OCSII] - k[1178]*y_cur[IDX_OCSII] - + k[1179]*y_cur[IDX_OCSII] - k[1180]*y_cur[IDX_OHII] - + k[1181]*y_cur[IDX_PC2H2II] - k[1182]*y_cur[IDX_PC2H2II] - + k[1183]*y_cur[IDX_PC2H2II] - k[1184]*y_cur[IDX_PC2H3II] - + k[1185]*y_cur[IDX_PC2H3II] - k[1186]*y_cur[IDX_PC2H3II] - + k[1187]*y_cur[IDX_PC2H4II] - k[1188]*y_cur[IDX_PC2H4II] - + k[1189]*y_cur[IDX_PC2H4II] - k[1190]*y_cur[IDX_PC3HII] - + k[1191]*y_cur[IDX_PC3HII] - k[1192]*y_cur[IDX_PC3HII] - + k[1193]*y_cur[IDX_PC4HII] - k[1194]*y_cur[IDX_PC4HII] - + k[1195]*y_cur[IDX_PC4HII] - k[1196]*y_cur[IDX_PC4HII] - + k[1197]*y_cur[IDX_PCH2II] - k[1198]*y_cur[IDX_PCH2II] - + k[1199]*y_cur[IDX_PCH3II] - k[1200]*y_cur[IDX_PCH3II] - + k[1201]*y_cur[IDX_PCH3II] - k[1202]*y_cur[IDX_PCH4II] - + k[1203]*y_cur[IDX_PCH4II] - k[1204]*y_cur[IDX_PCH4II] - + k[1205]*y_cur[IDX_PHII] - k[1206]*y_cur[IDX_PH2II] - + k[1207]*y_cur[IDX_PH2II] - k[1208]*y_cur[IDX_PH2II] - + k[1209]*y_cur[IDX_PH3II] - k[1210]*y_cur[IDX_PH3II] - + k[1211]*y_cur[IDX_PNII] - k[1212]*y_cur[IDX_PNH2II] - + k[1213]*y_cur[IDX_PNH2II] - k[1214]*y_cur[IDX_PNH2II] - + k[1215]*y_cur[IDX_PNH3II] - k[1216]*y_cur[IDX_PNH3II] - + k[1217]*y_cur[IDX_PNH3II] - k[1218]*y_cur[IDX_POII] - + k[1219]*y_cur[IDX_S2II] - k[1220]*y_cur[IDX_SOII] - + k[1221]*y_cur[IDX_SO2II] - k[1222]*y_cur[IDX_SO2II] - + k[1223]*y_cur[IDX_SiCII] - k[1224]*y_cur[IDX_SiC2II] - + k[1225]*y_cur[IDX_SiC2II] - k[1226]*y_cur[IDX_SiC2HII] - + k[1227]*y_cur[IDX_SiC2HII] - k[1228]*y_cur[IDX_SiC2H2II] - + k[1229]*y_cur[IDX_SiC2H2II] - k[1230]*y_cur[IDX_SiC2H3II] - + k[1231]*y_cur[IDX_SiC2H3II] - k[1232]*y_cur[IDX_SiC3II] - + k[1233]*y_cur[IDX_SiC3II] - k[1234]*y_cur[IDX_SiC3HII] - + k[1235]*y_cur[IDX_SiC3HII] - k[1236]*y_cur[IDX_SiC3H2II] - + k[1237]*y_cur[IDX_SiC3H2II] - k[1238]*y_cur[IDX_SiC4II] - + k[1239]*y_cur[IDX_SiC4II] - k[1240]*y_cur[IDX_SiC4HII] - + k[1241]*y_cur[IDX_SiC4HII] - k[1242]*y_cur[IDX_SiCH2II] - + k[1243]*y_cur[IDX_SiCH2II] - k[1244]*y_cur[IDX_SiCH2II] - + k[1245]*y_cur[IDX_SiCH3II] - k[1246]*y_cur[IDX_SiCH3II] - + k[1247]*y_cur[IDX_SiCH4II] - k[1248]*y_cur[IDX_SiCH4II] - + k[1249]*y_cur[IDX_SiFII] - k[1250]*y_cur[IDX_SiHII] - + k[1251]*y_cur[IDX_SiH2II] - k[1252]*y_cur[IDX_SiH2II] - + k[1253]*y_cur[IDX_SiH2II] - k[1254]*y_cur[IDX_SiH3II] - + k[1255]*y_cur[IDX_SiH3II] - k[1256]*y_cur[IDX_SiH4II] - + k[1257]*y_cur[IDX_SiH4II] - k[1258]*y_cur[IDX_SiH5II] - + k[1259]*y_cur[IDX_SiH5II] - k[1260]*y_cur[IDX_SiNII] - + k[1261]*y_cur[IDX_SiNCII] - k[1262]*y_cur[IDX_SiNCHII] - + k[1263]*y_cur[IDX_SiNCHII] - k[1264]*y_cur[IDX_SiNH2II] - + k[1265]*y_cur[IDX_SiNH2II] - k[1266]*y_cur[IDX_SiOII] - + k[1267]*y_cur[IDX_SiOHII] - k[1268]*y_cur[IDX_SiOHII] - + k[1269]*y_cur[IDX_SiSII] - k[1270]*y_cur[IDX_COOCH3II] - + k[1271]*y_cur[IDX_COOCH3II] - k[1272]*y_cur[IDX_CH2OHCOII] - + k[1273]*y_cur[IDX_CH2OHCOII] - k[1274]*y_cur[IDX_CH2OHCOII] - + k[1275]*y_cur[IDX_CH2OHCHOII] - k[1276]*y_cur[IDX_CH2OHCHOII] - + k[1277]*y_cur[IDX_CH2OHCHOII] - k[1278]*y_cur[IDX_CH2OHCHOII] - + k[1279]*y_cur[IDX_CH2OHCHOII] - k[1280]*y_cur[IDX_CH2OHCH2OII] - + k[1281]*y_cur[IDX_CH2OHCH2OII] - k[1282]*y_cur[IDX_CH2OHCH2OII] - + k[1283]*y_cur[IDX_CH2OHCH2OII] - k[1284]*y_cur[IDX_CH3COOHII] - + k[1285]*y_cur[IDX_CH3COOHII] - k[1286]*y_cur[IDX_CH3COOHII] - + k[1287]*y_cur[IDX_CH3COOHII] - k[1288]*y_cur[IDX_CH3COOHII] - + k[1289]*y_cur[IDX_CH3COOHII] - k[1290]*y_cur[IDX_CH3COOH2II] - + k[1291]*y_cur[IDX_CH3COOH2II] - k[1292]*y_cur[IDX_CH3COOH2II] - + k[1293]*y_cur[IDX_CH3COOH2II] - k[1294]*y_cur[IDX_CH3COOH2II] - + k[1295]*y_cur[IDX_CH3COOH2II] - k[1296]*y_cur[IDX_CH3COOH2II] - + k[5587]*y_cur[IDX_C10I] - k[5588]*y_cur[IDX_C10HI] - + k[5589]*y_cur[IDX_C2I] - k[5590]*y_cur[IDX_C2HI] - + k[5591]*y_cur[IDX_C3I] - k[5592]*y_cur[IDX_C3HI] - + k[5593]*y_cur[IDX_C3NI] - k[5594]*y_cur[IDX_C4I] - + k[5595]*y_cur[IDX_C4HI] - k[5596]*y_cur[IDX_C5I] - + k[5597]*y_cur[IDX_C5HI] - k[5598]*y_cur[IDX_C5NI] - + k[5599]*y_cur[IDX_C6I] - k[5600]*y_cur[IDX_C6HI] - + k[5601]*y_cur[IDX_C7I] - k[5602]*y_cur[IDX_C7HI] - + k[5603]*y_cur[IDX_C8I] - k[5604]*y_cur[IDX_C8HI] - + k[5605]*y_cur[IDX_C9I] - k[5606]*y_cur[IDX_C9HI] - + k[5607]*y_cur[IDX_CI] - k[5608]*y_cur[IDX_HI] - + k[5609]*y_cur[IDX_OI] - k[5610]*y_cur[IDX_SI] - + k[5611]*y_cur[IDX_CII] - k[5612]*y_cur[IDX_CH3II] - + k[5613]*y_cur[IDX_ClII] - k[5614]*y_cur[IDX_FeII] - + k[5615]*y_cur[IDX_HII] - k[5616]*y_cur[IDX_H2COII] - + k[5617]*y_cur[IDX_H2CSII] - k[5618]*y_cur[IDX_H2SII] - + k[5619]*y_cur[IDX_HeII] - k[5620]*y_cur[IDX_MgII] - + k[5621]*y_cur[IDX_NII] - k[5622]*y_cur[IDX_NaII] - + k[5623]*y_cur[IDX_OII] - k[5624]*y_cur[IDX_PII] - + k[5625]*y_cur[IDX_SII] - k[5626]*y_cur[IDX_SiII] - + k[8763]*y_cur[IDX_GRAIN0I]; + data[jistart + 20381] = 0.0 + k[74]*y_cur[IDX_HM] + k[75]*y_cur[IDX_HM] + + k[84]*y_cur[IDX_CM] + k[85]*y_cur[IDX_C10M] + k[86]*y_cur[IDX_C10HM] + + k[87]*y_cur[IDX_C2M] + k[88]*y_cur[IDX_C2HM] + + k[89]*y_cur[IDX_C3M] + k[90]*y_cur[IDX_C3HM] + k[91]*y_cur[IDX_C3NM] + + k[92]*y_cur[IDX_C4M] + k[93]*y_cur[IDX_C4HM] + + k[94]*y_cur[IDX_C5M] + k[95]*y_cur[IDX_C5HM] + k[96]*y_cur[IDX_C5NM] + + k[97]*y_cur[IDX_C6M] + k[98]*y_cur[IDX_C6HM] + + k[99]*y_cur[IDX_C7M] + k[100]*y_cur[IDX_C7HM] + + k[101]*y_cur[IDX_C8M] + k[102]*y_cur[IDX_C8HM] + + k[103]*y_cur[IDX_C9M] + k[104]*y_cur[IDX_C9HM] + + k[105]*y_cur[IDX_CHM] + k[106]*y_cur[IDX_CNM] + k[107]*y_cur[IDX_OM] + + k[108]*y_cur[IDX_OHM] + k[109]*y_cur[IDX_SM] - + k[5608]*y_cur[IDX_eM] + k[5682] + k[5844]; + data[jistart + 20382] = 0.0 + k[5940]; + data[jistart + 20383] = 0.0 + k[796]*y_cur[IDX_eM] + k[796]*y_cur[IDX_eM] + + k[6655]*y_cur[IDX_GRAINM] + k[6655]*y_cur[IDX_GRAINM]; + data[jistart + 20384] = 0.0 + k[1027]*y_cur[IDX_eM] + k[6666]*y_cur[IDX_GRAINM]; + data[jistart + 20385] = 0.0 + k[1112]*y_cur[IDX_eM] + k[2454]*y_cur[IDX_H2I] + + k[6348]*y_cur[IDX_GRAINM]; + data[jistart + 20386] = 0.0 + k[887]*y_cur[IDX_eM] + k[6853]*y_cur[IDX_GRAINM]; + data[jistart + 20387] = 0.0 + k[899]*y_cur[IDX_eM] + k[6865]*y_cur[IDX_GRAINM]; + data[jistart + 20388] = 0.0 + k[2430]*y_cur[IDX_H2I]; + data[jistart + 20389] = 0.0 + k[1005]*y_cur[IDX_eM] + k[6350]*y_cur[IDX_GRAINM]; + data[jistart + 20390] = 0.0 - k[5024]*y_cur[IDX_HI]; + data[jistart + 20391] = 0.0 + k[2416]*y_cur[IDX_H2I]; + data[jistart + 20392] = 0.0 - k[2834]*y_cur[IDX_HI]; + data[jistart + 20393] = 0.0 + k[2429]*y_cur[IDX_H2I]; + data[jistart + 20394] = 0.0 + k[1270]*y_cur[IDX_eM] + k[6694]*y_cur[IDX_GRAINM]; + data[jistart + 20395] = 0.0 + k[2440]*y_cur[IDX_H2I]; + data[jistart + 20396] = 0.0 + k[995]*y_cur[IDX_eM] + k[6537]*y_cur[IDX_GRAINM]; + data[jistart + 20397] = 0.0 + k[1008]*y_cur[IDX_eM] + k[6538]*y_cur[IDX_GRAINM]; + data[jistart + 20398] = 0.0 + k[1016]*y_cur[IDX_eM] + k[6546]*y_cur[IDX_GRAINM]; + data[jistart + 20399] = 0.0 + k[1188]*y_cur[IDX_eM] + k[6690]*y_cur[IDX_GRAINM]; + data[jistart + 20400] = 0.0 + k[2421]*y_cur[IDX_H2I]; + data[jistart + 20401] = 0.0 + k[2426]*y_cur[IDX_H2I]; + data[jistart + 20402] = 0.0 + k[971]*y_cur[IDX_eM] + k[6406]*y_cur[IDX_GRAINM]; + data[jistart + 20403] = 0.0 + k[2441]*y_cur[IDX_H2I]; + data[jistart + 20404] = 0.0 + k[993]*y_cur[IDX_eM] + k[993]*y_cur[IDX_eM] + + k[6624]*y_cur[IDX_GRAINM] + k[6624]*y_cur[IDX_GRAINM]; + data[jistart + 20405] = 0.0 + k[1010]*y_cur[IDX_eM] + k[6431]*y_cur[IDX_GRAINM]; + data[jistart + 20406] = 0.0 + k[1111]*y_cur[IDX_eM] + k[2453]*y_cur[IDX_H2I] + + k[6456]*y_cur[IDX_GRAINM]; + data[jistart + 20407] = 0.0 + k[1122]*y_cur[IDX_eM] + k[6589]*y_cur[IDX_GRAINM]; + data[jistart + 20408] = 0.0 + k[1125]*y_cur[IDX_eM] + k[6390]*y_cur[IDX_GRAINM]; + data[jistart + 20409] = 0.0 + k[1141]*y_cur[IDX_eM] + k[6625]*y_cur[IDX_GRAINM]; + data[jistart + 20410] = 0.0 + k[1145]*y_cur[IDX_eM] + k[6723]*y_cur[IDX_GRAINM]; + data[jistart + 20411] = 0.0 + k[1162]*y_cur[IDX_eM] + k[6527]*y_cur[IDX_GRAINM]; + data[jistart + 20412] = 0.0 + k[1273]*y_cur[IDX_eM] + k[6697]*y_cur[IDX_GRAINM]; + data[jistart + 20413] = 0.0 + k[2446]*y_cur[IDX_H2I]; + data[jistart + 20414] = 0.0 + k[1095]*y_cur[IDX_eM] + k[1096]*y_cur[IDX_eM] + + k[6533]*y_cur[IDX_GRAINM] + k[6534]*y_cur[IDX_GRAINM]; + data[jistart + 20415] = 0.0 + k[1118]*y_cur[IDX_eM] + k[1119]*y_cur[IDX_eM] + + k[6549]*y_cur[IDX_GRAINM] + k[6550]*y_cur[IDX_GRAINM]; + data[jistart + 20416] = 0.0 + k[1126]*y_cur[IDX_eM] + k[3051]*y_cur[IDX_H2I] + + k[3052]*y_cur[IDX_H2I] + k[6524]*y_cur[IDX_GRAINM]; + data[jistart + 20417] = 0.0 + k[1149]*y_cur[IDX_eM] - k[2845]*y_cur[IDX_HI] + + k[6313]*y_cur[IDX_GRAINM]; + data[jistart + 20418] = 0.0 + k[1184]*y_cur[IDX_eM] + k[6685]*y_cur[IDX_GRAINM]; + data[jistart + 20419] = 0.0 + k[1217]*y_cur[IDX_eM] + k[6619]*y_cur[IDX_GRAINM]; + data[jistart + 20420] = 0.0 + k[990]*y_cur[IDX_eM] + k[6850]*y_cur[IDX_GRAINM]; + data[jistart + 20421] = 0.0 + k[992]*y_cur[IDX_eM] + k[6881]*y_cur[IDX_GRAINM]; + data[jistart + 20422] = 0.0 - k[5166]*y_cur[IDX_HI] - k[5167]*y_cur[IDX_HI]; + data[jistart + 20423] = 0.0 + k[1049]*y_cur[IDX_eM] + k[6770]*y_cur[IDX_GRAINM]; + data[jistart + 20424] = 0.0 + k[1130]*y_cur[IDX_eM] + k[3053]*y_cur[IDX_H2I] + + k[6520]*y_cur[IDX_GRAINM]; + data[jistart + 20425] = 0.0 + k[1199]*y_cur[IDX_eM] + k[6578]*y_cur[IDX_GRAINM]; + data[jistart + 20426] = 0.0 + k[733]*y_cur[IDX_eM] + k[734]*y_cur[IDX_eM] + + k[6878]*y_cur[IDX_GRAINM] + k[6879]*y_cur[IDX_GRAINM]; + data[jistart + 20427] = 0.0 + k[769]*y_cur[IDX_eM] + k[770]*y_cur[IDX_eM] + + k[771]*y_cur[IDX_eM] + k[6671]*y_cur[IDX_GRAINM] + + k[6672]*y_cur[IDX_GRAINM] + k[6673]*y_cur[IDX_GRAINM]; + data[jistart + 20428] = 0.0 + k[921]*y_cur[IDX_eM] + k[6408]*y_cur[IDX_GRAINM]; + data[jistart + 20429] = 0.0 + k[1280]*y_cur[IDX_eM] + k[1281]*y_cur[IDX_eM] + + k[1283]*y_cur[IDX_eM] + k[6727]*y_cur[IDX_GRAINM] + + k[6728]*y_cur[IDX_GRAINM] + k[6730]*y_cur[IDX_GRAINM]; + data[jistart + 20430] = 0.0 + k[931]*y_cur[IDX_eM] + k[1896]*y_cur[IDX_CI] + + k[6834]*y_cur[IDX_GRAINM]; + data[jistart + 20431] = 0.0 + k[933]*y_cur[IDX_eM] + k[1897]*y_cur[IDX_CI] + + k[6867]*y_cur[IDX_GRAINM]; + data[jistart + 20432] = 0.0 - k[5164]*y_cur[IDX_HI] + k[5835] + k[6151]; + data[jistart + 20433] = 0.0 + k[1028]*y_cur[IDX_eM] + k[6804]*y_cur[IDX_GRAINM]; + data[jistart + 20434] = 0.0 + k[1093]*y_cur[IDX_eM] + k[2897]*y_cur[IDX_H2I] + + k[2898]*y_cur[IDX_H2I] + k[6515]*y_cur[IDX_GRAINM]; + data[jistart + 20435] = 0.0 + k[1285]*y_cur[IDX_eM] + k[1286]*y_cur[IDX_eM] + + k[1287]*y_cur[IDX_eM] + k[6712]*y_cur[IDX_GRAINM] + + k[6713]*y_cur[IDX_GRAINM] + k[6714]*y_cur[IDX_GRAINM]; + data[jistart + 20436] = 0.0 - k[318]*y_cur[IDX_HI] + k[2439]*y_cur[IDX_H2I]; + data[jistart + 20437] = 0.0 + k[1002]*y_cur[IDX_eM] + k[1002]*y_cur[IDX_eM] + + k[1003]*y_cur[IDX_eM] + k[6457]*y_cur[IDX_GRAINM] + + k[6457]*y_cur[IDX_GRAINM] + k[6458]*y_cur[IDX_GRAINM]; + data[jistart + 20438] = 0.0 + k[1032]*y_cur[IDX_eM] + k[6882]*y_cur[IDX_GRAINM]; + data[jistart + 20439] = 0.0 + k[1054]*y_cur[IDX_eM] + k[6726]*y_cur[IDX_GRAINM]; + data[jistart + 20440] = 0.0 + k[1101]*y_cur[IDX_eM] + k[1101]*y_cur[IDX_eM] + + k[6574]*y_cur[IDX_GRAINM] + k[6574]*y_cur[IDX_GRAINM]; + data[jistart + 20441] = 0.0 + k[1134]*y_cur[IDX_eM] + k[6573]*y_cur[IDX_GRAINM]; + data[jistart + 20442] = 0.0 + k[2405]*y_cur[IDX_H2I]; + data[jistart + 20443] = 0.0 + k[1290]*y_cur[IDX_eM] + k[1292]*y_cur[IDX_eM] + + k[1293]*y_cur[IDX_eM] + k[1294]*y_cur[IDX_eM] + + k[1296]*y_cur[IDX_eM] + k[6731]*y_cur[IDX_GRAINM] + + k[6733]*y_cur[IDX_GRAINM] + k[6734]*y_cur[IDX_GRAINM] + + k[6735]*y_cur[IDX_GRAINM] + k[6737]*y_cur[IDX_GRAINM]; + data[jistart + 20444] = 0.0 + k[1030]*y_cur[IDX_eM] + k[6851]*y_cur[IDX_GRAINM]; + data[jistart + 20445] = 0.0 + k[1051]*y_cur[IDX_eM] + k[1052]*y_cur[IDX_eM] + + k[6590]*y_cur[IDX_GRAINM] + k[6591]*y_cur[IDX_GRAINM]; + data[jistart + 20446] = 0.0 + k[1142]*y_cur[IDX_eM] + k[1143]*y_cur[IDX_eM] + + k[6755]*y_cur[IDX_GRAINM] + k[6756]*y_cur[IDX_GRAINM]; + data[jistart + 20447] = 0.0 + k[927]*y_cur[IDX_eM] + k[1895]*y_cur[IDX_CI] + + k[6765]*y_cur[IDX_GRAINM]; + data[jistart + 20448] = 0.0 + k[958]*y_cur[IDX_eM] + k[6604]*y_cur[IDX_GRAINM]; + data[jistart + 20449] = 0.0 + k[1085]*y_cur[IDX_eM] + k[2448]*y_cur[IDX_H2I] + + k[6844]*y_cur[IDX_GRAINM]; + data[jistart + 20450] = 0.0 + k[1087]*y_cur[IDX_eM] + k[2449]*y_cur[IDX_H2I] + + k[6877]*y_cur[IDX_GRAINM]; + data[jistart + 20451] = 0.0 + k[1117]*y_cur[IDX_eM] + k[3047]*y_cur[IDX_H2I] + + k[3048]*y_cur[IDX_H2I] + k[6523]*y_cur[IDX_GRAINM]; + data[jistart + 20452] = 0.0 - k[2846]*y_cur[IDX_HI]; + data[jistart + 20453] = 0.0 + k[1190]*y_cur[IDX_eM] + k[6772]*y_cur[IDX_GRAINM]; + data[jistart + 20454] = 0.0 + k[1202]*y_cur[IDX_eM] + k[1203]*y_cur[IDX_eM] + + k[6596]*y_cur[IDX_GRAINM] + k[6597]*y_cur[IDX_GRAINM]; + data[jistart + 20455] = 0.0 + k[1257]*y_cur[IDX_eM] + k[2474]*y_cur[IDX_H2I] + + k[6427]*y_cur[IDX_GRAINM]; + data[jistart + 20456] = 0.0 + k[5704] + k[5989]; + data[jistart + 20457] = 0.0 + k[774]*y_cur[IDX_eM] + k[776]*y_cur[IDX_eM] + + k[777]*y_cur[IDX_eM] + k[6606]*y_cur[IDX_GRAINM] + + k[6608]*y_cur[IDX_GRAINM] + k[6609]*y_cur[IDX_GRAINM]; + data[jistart + 20458] = 0.0 + k[779]*y_cur[IDX_eM] + k[6420]*y_cur[IDX_GRAINM]; + data[jistart + 20459] = 0.0 + k[913]*y_cur[IDX_eM] + k[915]*y_cur[IDX_eM] + + k[6657]*y_cur[IDX_GRAINM] + k[6659]*y_cur[IDX_GRAINM]; + data[jistart + 20460] = 0.0 + k[5139]*y_cur[IDX_H2I]; + data[jistart + 20461] = 0.0 + k[1017]*y_cur[IDX_eM] + k[6622]*y_cur[IDX_GRAINM]; + data[jistart + 20462] = 0.0 + k[983]*y_cur[IDX_eM] + k[6700]*y_cur[IDX_GRAINM]; + data[jistart + 20463] = 0.0 + k[1113]*y_cur[IDX_eM] + k[6558]*y_cur[IDX_GRAINM]; + data[jistart + 20464] = 0.0 + k[1182]*y_cur[IDX_eM] + k[6681]*y_cur[IDX_GRAINM]; + data[jistart + 20465] = 0.0 + k[1237]*y_cur[IDX_eM] + k[1919]*y_cur[IDX_CI] + + k[6768]*y_cur[IDX_GRAINM]; + data[jistart + 20466] = 0.0 + k[1241]*y_cur[IDX_eM] + k[6801]*y_cur[IDX_GRAINM]; + data[jistart + 20467] = 0.0 + k[1259]*y_cur[IDX_eM] + k[1929]*y_cur[IDX_CI] + + k[6439]*y_cur[IDX_GRAINM]; + data[jistart + 20468] = 0.0 + k[1263]*y_cur[IDX_eM] + k[6669]*y_cur[IDX_GRAINM]; + data[jistart + 20469] = 0.0 + k[2410]*y_cur[IDX_H2I]; + data[jistart + 20470] = 0.0 + k[829]*y_cur[IDX_eM] + k[3408]*y_cur[IDX_NI] + + k[6647]*y_cur[IDX_GRAINM]; + data[jistart + 20471] = 0.0 + k[830]*y_cur[IDX_eM] + k[6667]*y_cur[IDX_GRAINM]; + data[jistart + 20472] = 0.0 + k[1276]*y_cur[IDX_eM] + k[1277]*y_cur[IDX_eM] + + k[1279]*y_cur[IDX_eM] + k[6702]*y_cur[IDX_GRAINM] + + k[6703]*y_cur[IDX_GRAINM] + k[6705]*y_cur[IDX_GRAINM]; + data[jistart + 20473] = 0.0 + k[937]*y_cur[IDX_eM] + k[937]*y_cur[IDX_eM] + + k[6547]*y_cur[IDX_GRAINM] + k[6547]*y_cur[IDX_GRAINM]; + data[jistart + 20474] = 0.0 + k[379]*y_cur[IDX_HII] + k[3228]*y_cur[IDX_HeII]; + data[jistart + 20475] = 0.0 + k[1124]*y_cur[IDX_eM] + k[2455]*y_cur[IDX_H2I] + + k[6513]*y_cur[IDX_GRAINM]; + data[jistart + 20476] = 0.0 + k[1129]*y_cur[IDX_eM] + k[6718]*y_cur[IDX_GRAINM]; + data[jistart + 20477] = 0.0 + k[3765]*y_cur[IDX_H2I] + k[3766]*y_cur[IDX_H2I]; + data[jistart + 20478] = 0.0 + k[1194]*y_cur[IDX_eM] + k[6812]*y_cur[IDX_GRAINM]; + data[jistart + 20479] = 0.0 + k[1209]*y_cur[IDX_eM] + k[6448]*y_cur[IDX_GRAINM]; + data[jistart + 20480] = 0.0 + k[1248]*y_cur[IDX_eM] + k[1924]*y_cur[IDX_CI] + + k[6542]*y_cur[IDX_GRAINM]; + data[jistart + 20481] = 0.0 + k[2399]*y_cur[IDX_H2I]; + data[jistart + 20482] = 0.0 + k[732]*y_cur[IDX_eM] + k[6874]*y_cur[IDX_GRAINM]; + data[jistart + 20483] = 0.0 + k[2404]*y_cur[IDX_H2I] - k[2830]*y_cur[IDX_HI]; + data[jistart + 20484] = 0.0 + k[944]*y_cur[IDX_eM] + k[2431]*y_cur[IDX_H2I] + + k[6484]*y_cur[IDX_GRAINM]; + data[jistart + 20485] = 0.0 + k[1076]*y_cur[IDX_eM] + k[6820]*y_cur[IDX_GRAINM]; + data[jistart + 20486] = 0.0 + k[1081]*y_cur[IDX_eM] + k[6793]*y_cur[IDX_GRAINM]; + data[jistart + 20487] = 0.0 + k[1230]*y_cur[IDX_eM] + k[1917]*y_cur[IDX_CI] + + k[6664]*y_cur[IDX_GRAINM]; + data[jistart + 20488] = 0.0 + k[423]*y_cur[IDX_HII] + k[1433]*y_cur[IDX_CII] + + k[3314]*y_cur[IDX_HeII] + k[5922] + k[6265]; + data[jistart + 20489] = 0.0 + k[1246]*y_cur[IDX_eM] + k[1923]*y_cur[IDX_CI] + + k[6517]*y_cur[IDX_GRAINM]; + data[jistart + 20490] = 0.0 + k[1264]*y_cur[IDX_eM] + k[1931]*y_cur[IDX_CI] + + k[6552]*y_cur[IDX_GRAINM]; + data[jistart + 20491] = 0.0 + k[2409]*y_cur[IDX_H2I]; + data[jistart + 20492] = 0.0 + k[826]*y_cur[IDX_eM] + k[1554]*y_cur[IDX_C2H2I] + + k[6641]*y_cur[IDX_GRAINM]; + data[jistart + 20493] = 0.0 + k[2118]*y_cur[IDX_CH3CHCH2I] + k[2119]*y_cur[IDX_CH3CHCH2I]; + data[jistart + 20494] = 0.0 + k[2437]*y_cur[IDX_H2I]; + data[jistart + 20495] = 0.0 + k[1021]*y_cur[IDX_eM] + k[6763]*y_cur[IDX_GRAINM]; + data[jistart + 20496] = 0.0 + k[1059]*y_cur[IDX_eM] + k[6676]*y_cur[IDX_GRAINM]; + data[jistart + 20497] = 0.0 + k[1078]*y_cur[IDX_eM] + k[2447]*y_cur[IDX_H2I] + + k[6788]*y_cur[IDX_GRAINM]; + data[jistart + 20498] = 0.0 + k[1412]*y_cur[IDX_CII] + k[3015]*y_cur[IDX_SiII] + + k[3260]*y_cur[IDX_HeII] + k[5865] + k[6196]; + data[jistart + 20499] = 0.0 + k[1148]*y_cur[IDX_eM] + k[6720]*y_cur[IDX_GRAINM]; + data[jistart + 20500] = 0.0 + k[1198]*y_cur[IDX_eM] + k[6570]*y_cur[IDX_GRAINM]; + data[jistart + 20501] = 0.0 + k[2471]*y_cur[IDX_H2I] - k[2847]*y_cur[IDX_HI]; + data[jistart + 20502] = 0.0 + k[2424]*y_cur[IDX_H2I]; + data[jistart + 20503] = 0.0 + k[1007]*y_cur[IDX_eM] + k[6377]*y_cur[IDX_GRAINM]; + data[jistart + 20504] = 0.0 + k[381]*y_cur[IDX_HII] + k[3231]*y_cur[IDX_HeII] + k[6167] + + k[6167]; + data[jistart + 20505] = 0.0 + k[1039]*y_cur[IDX_eM] + k[1040]*y_cur[IDX_eM] + + k[6601]*y_cur[IDX_GRAINM] + k[6602]*y_cur[IDX_GRAINM]; + data[jistart + 20506] = 0.0 + k[1056]*y_cur[IDX_eM] + k[1057]*y_cur[IDX_eM] + + k[6487]*y_cur[IDX_GRAINM] + k[6488]*y_cur[IDX_GRAINM]; + data[jistart + 20507] = 0.0 + k[1105]*y_cur[IDX_eM] + k[1906]*y_cur[IDX_CI] + + k[2451]*y_cur[IDX_H2I] + k[6543]*y_cur[IDX_GRAINM]; + data[jistart + 20508] = 0.0 + k[424]*y_cur[IDX_HII]; + data[jistart + 20509] = 0.0 + k[433]*y_cur[IDX_HII]; + data[jistart + 20510] = 0.0 - k[5161]*y_cur[IDX_HI]; + data[jistart + 20511] = 0.0 + k[1072]*y_cur[IDX_eM] + k[6779]*y_cur[IDX_GRAINM]; + data[jistart + 20512] = 0.0 + k[1103]*y_cur[IDX_eM] + k[1104]*y_cur[IDX_eM] + + k[6610]*y_cur[IDX_GRAINM] + k[6611]*y_cur[IDX_GRAINM]; + data[jistart + 20513] = 0.0 + k[394]*y_cur[IDX_HII] + k[1414]*y_cur[IDX_CII] + + k[3267]*y_cur[IDX_HeII] + k[5870] + k[6201]; + data[jistart + 20514] = 0.0 + k[1135]*y_cur[IDX_eM] + k[1137]*y_cur[IDX_eM] + + k[6612]*y_cur[IDX_GRAINM] + k[6614]*y_cur[IDX_GRAINM]; + data[jistart + 20515] = 0.0 + k[1140]*y_cur[IDX_eM] + k[6759]*y_cur[IDX_GRAINM]; + data[jistart + 20516] = 0.0 + k[420]*y_cur[IDX_HII] + k[1431]*y_cur[IDX_CII] + + k[3308]*y_cur[IDX_HeII] + k[6261]; + data[jistart + 20517] = 0.0 + k[784]*y_cur[IDX_eM] + k[6472]*y_cur[IDX_GRAINM]; + data[jistart + 20518] = 0.0 + k[805]*y_cur[IDX_eM] + k[6499]*y_cur[IDX_GRAINM]; + data[jistart + 20519] = 0.0 + k[861]*y_cur[IDX_eM] + k[862]*y_cur[IDX_eM] + + k[6807]*y_cur[IDX_GRAINM] + k[6808]*y_cur[IDX_GRAINM]; + data[jistart + 20520] = 0.0 + k[886]*y_cur[IDX_eM] + k[6848]*y_cur[IDX_GRAINM]; + data[jistart + 20521] = 0.0 + k[319]*y_cur[IDX_HII] + k[5132]*y_cur[IDX_H2I]; + data[jistart + 20522] = 0.0 + k[1070]*y_cur[IDX_eM] + k[6648]*y_cur[IDX_GRAINM]; + data[jistart + 20523] = 0.0 + k[1235]*y_cur[IDX_eM] + k[1918]*y_cur[IDX_CI] + + k[6762]*y_cur[IDX_GRAINM]; + data[jistart + 20524] = 0.0 + k[427]*y_cur[IDX_HII] + k[1438]*y_cur[IDX_CII] + + k[3320]*y_cur[IDX_HeII] + k[5926] + k[6270]; + data[jistart + 20525] = 0.0 + k[808]*y_cur[IDX_eM] + k[809]*y_cur[IDX_eM] + + k[810]*y_cur[IDX_eM] + k[811]*y_cur[IDX_eM] + k[813]*y_cur[IDX_eM] - + k[2833]*y_cur[IDX_HI] + k[6505]*y_cur[IDX_GRAINM] + + k[6506]*y_cur[IDX_GRAINM] + k[6507]*y_cur[IDX_GRAINM] + + k[6508]*y_cur[IDX_GRAINM] + k[6510]*y_cur[IDX_GRAINM]; + data[jistart + 20526] = 0.0 + k[2422]*y_cur[IDX_H2I]; + data[jistart + 20527] = 0.0 + k[898]*y_cur[IDX_eM] + k[3451]*y_cur[IDX_NI] + + k[6864]*y_cur[IDX_GRAINM]; + data[jistart + 20528] = 0.0 + k[2319]*y_cur[IDX_HII] + k[5384]*y_cur[IDX_OI]; + data[jistart + 20529] = 0.0 + k[3268]*y_cur[IDX_HeII]; + data[jistart + 20530] = 0.0 + k[395]*y_cur[IDX_HII] + k[3270]*y_cur[IDX_HeII] + k[5873] + + k[6204]; + data[jistart + 20531] = 0.0 + k[396]*y_cur[IDX_HII] + k[3272]*y_cur[IDX_HeII]; + data[jistart + 20532] = 0.0 + k[1575]*y_cur[IDX_C2H2I] + k[2473]*y_cur[IDX_H2I]; + data[jistart + 20533] = 0.0 + k[1229]*y_cur[IDX_eM] + k[1916]*y_cur[IDX_CI] + + k[6661]*y_cur[IDX_GRAINM]; + data[jistart + 20534] = 0.0 + k[857]*y_cur[IDX_eM] + k[6797]*y_cur[IDX_GRAINM]; + data[jistart + 20535] = 0.0 + k[953]*y_cur[IDX_eM] + k[6693]*y_cur[IDX_GRAINM]; + data[jistart + 20536] = 0.0 + k[960]*y_cur[IDX_eM] + k[961]*y_cur[IDX_eM] + + k[961]*y_cur[IDX_eM] + k[6428]*y_cur[IDX_GRAINM] + + k[6429]*y_cur[IDX_GRAINM] + k[6429]*y_cur[IDX_GRAINM]; + data[jistart + 20537] = 0.0 + k[873]*y_cur[IDX_eM] + k[3434]*y_cur[IDX_NI] + + k[6831]*y_cur[IDX_GRAINM]; + data[jistart + 20538] = 0.0 + k[874]*y_cur[IDX_eM] + k[875]*y_cur[IDX_eM] + + k[6832]*y_cur[IDX_GRAINM] + k[6833]*y_cur[IDX_GRAINM]; + data[jistart + 20539] = 0.0 + k[364]*y_cur[IDX_HII] + k[3182]*y_cur[IDX_HeII]; + data[jistart + 20540] = 0.0 + k[1000]*y_cur[IDX_eM] + k[1000]*y_cur[IDX_eM] + + k[1001]*y_cur[IDX_eM] + k[6582]*y_cur[IDX_GRAINM] + + k[6582]*y_cur[IDX_GRAINM] + k[6583]*y_cur[IDX_GRAINM]; + data[jistart + 20541] = 0.0 + k[387]*y_cur[IDX_HII]; + data[jistart + 20542] = 0.0 + k[390]*y_cur[IDX_HII]; + data[jistart + 20543] = 0.0 + k[1157]*y_cur[IDX_eM] + k[6653]*y_cur[IDX_GRAINM]; + data[jistart + 20544] = 0.0 - k[5185]*y_cur[IDX_HI]; + data[jistart + 20545] = 0.0 + k[410]*y_cur[IDX_HII] + k[5433]*y_cur[IDX_OI] + k[5907] + + k[6248]; + data[jistart + 20546] = 0.0 + k[412]*y_cur[IDX_HII]; + data[jistart + 20547] = 0.0 + k[421]*y_cur[IDX_HII] + k[1432]*y_cur[IDX_CII] + + k[3311]*y_cur[IDX_HeII] + k[5920] + k[6262]; + data[jistart + 20548] = 0.0 + k[422]*y_cur[IDX_HII]; + data[jistart + 20549] = 0.0 + k[341]*y_cur[IDX_HII]; + data[jistart + 20550] = 0.0 + k[2419]*y_cur[IDX_H2I]; + data[jistart + 20551] = 0.0 + k[361]*y_cur[IDX_HII] + k[4948]*y_cur[IDX_CI]; + data[jistart + 20552] = 0.0 + k[930]*y_cur[IDX_eM] + k[3455]*y_cur[IDX_NI] + + k[6749]*y_cur[IDX_GRAINM]; + data[jistart + 20553] = 0.0 + k[391]*y_cur[IDX_HII] + k[1409]*y_cur[IDX_CII] + k[5861] + + k[6189]; + data[jistart + 20554] = 0.0 + k[393]*y_cur[IDX_HII] + k[1411]*y_cur[IDX_CII] + + k[3259]*y_cur[IDX_HeII] - k[5211]*y_cur[IDX_HI] + k[5864] + k[6194]; + data[jistart + 20555] = 0.0 + k[3264]*y_cur[IDX_HeII]; + data[jistart + 20556] = 0.0 + k[363]*y_cur[IDX_HII] + k[1358]*y_cur[IDX_CII] + + k[3179]*y_cur[IDX_HeII]; + data[jistart + 20557] = 0.0 + k[369]*y_cur[IDX_HII] + k[3195]*y_cur[IDX_HeII]; + data[jistart + 20558] = 0.0 + k[377]*y_cur[IDX_HII]; + data[jistart + 20559] = 0.0 + k[1207]*y_cur[IDX_eM] + k[1207]*y_cur[IDX_eM] + + k[1208]*y_cur[IDX_eM] + k[6435]*y_cur[IDX_GRAINM] + + k[6435]*y_cur[IDX_GRAINM] + k[6436]*y_cur[IDX_GRAINM]; + data[jistart + 20560] = 0.0 + k[413]*y_cur[IDX_HII]; + data[jistart + 20561] = 0.0 + k[414]*y_cur[IDX_HII] - k[5199]*y_cur[IDX_HI]; + data[jistart + 20562] = 0.0 + k[2472]*y_cur[IDX_H2I]; + data[jistart + 20563] = 0.0 + k[337]*y_cur[IDX_HII]; + data[jistart + 20564] = 0.0 + k[858]*y_cur[IDX_eM] + k[6802]*y_cur[IDX_GRAINM]; + data[jistart + 20565] = 0.0 + k[5632]*y_cur[IDX_HeII]; + data[jistart + 20566] = 0.0 + k[382]*y_cur[IDX_HII] + k[5845] + k[6170]; + data[jistart + 20567] = 0.0 + k[392]*y_cur[IDX_HII] + k[1410]*y_cur[IDX_CII] + + k[3258]*y_cur[IDX_HeII] + k[6193]; + data[jistart + 20568] = 0.0 + k[426]*y_cur[IDX_HII] + k[1436]*y_cur[IDX_CII] + + k[3318]*y_cur[IDX_HeII] + k[6268]; + data[jistart + 20569] = 0.0 + k[729]*y_cur[IDX_eM] + k[1846]*y_cur[IDX_CI] + + k[2400]*y_cur[IDX_H2I] + k[6871]*y_cur[IDX_GRAINM]; + data[jistart + 20570] = 0.0 + k[1110]*y_cur[IDX_eM] + k[2452]*y_cur[IDX_H2I] + + k[6491]*y_cur[IDX_GRAINM]; + data[jistart + 20571] = 0.0 + k[419]*y_cur[IDX_HII]; + data[jistart + 20572] = 0.0 + k[936]*y_cur[IDX_eM] + k[1564]*y_cur[IDX_C2H2I] - + k[2838]*y_cur[IDX_HI] + k[6411]*y_cur[IDX_GRAINM]; + data[jistart + 20573] = 0.0 + k[331]*y_cur[IDX_HII]; + data[jistart + 20574] = 0.0 + k[880]*y_cur[IDX_eM] + k[2423]*y_cur[IDX_H2I] + + k[6839]*y_cur[IDX_GRAINM]; + data[jistart + 20575] = 0.0 + k[432]*y_cur[IDX_HII]; + data[jistart + 20576] = 0.0 + k[845]*y_cur[IDX_eM] + k[846]*y_cur[IDX_eM] + + k[6753]*y_cur[IDX_GRAINM] + k[6754]*y_cur[IDX_GRAINM]; + data[jistart + 20577] = 0.0 + k[3255]*y_cur[IDX_HeII] - k[5173]*y_cur[IDX_HI] + + k[5409]*y_cur[IDX_OI] + k[6190]; + data[jistart + 20578] = 0.0 + k[404]*y_cur[IDX_HII] - k[5188]*y_cur[IDX_HI] - + k[5189]*y_cur[IDX_HI]; + data[jistart + 20579] = 0.0 + k[1227]*y_cur[IDX_eM] + k[1915]*y_cur[IDX_CI] + + k[6650]*y_cur[IDX_GRAINM]; + data[jistart + 20580] = 0.0 + k[428]*y_cur[IDX_HII] + k[1439]*y_cur[IDX_CII] + + k[3323]*y_cur[IDX_HeII] + k[4988]*y_cur[IDX_CI] + + k[5294]*y_cur[IDX_NI] + k[5446]*y_cur[IDX_OI] + + k[5446]*y_cur[IDX_OI] + k[5927] + k[6273]; + data[jistart + 20581] = 0.0 + k[336]*y_cur[IDX_HII]; + data[jistart + 20582] = 0.0 + k[851]*y_cur[IDX_eM] + k[1559]*y_cur[IDX_C2H2I] + + k[2418]*y_cur[IDX_H2I] + k[6783]*y_cur[IDX_GRAINM]; + data[jistart + 20583] = 0.0 + k[356]*y_cur[IDX_HII] + k[1339]*y_cur[IDX_CII] + + k[3153]*y_cur[IDX_HeII] + k[4941]*y_cur[IDX_CI] + k[5769] + k[6064]; + data[jistart + 20584] = 0.0 + k[1350]*y_cur[IDX_CII] + k[3168]*y_cur[IDX_HeII]; + data[jistart + 20585] = 0.0 + k[939]*y_cur[IDX_eM] + k[940]*y_cur[IDX_eM] + + k[941]*y_cur[IDX_eM] + k[942]*y_cur[IDX_eM] + + k[6561]*y_cur[IDX_GRAINM] + k[6562]*y_cur[IDX_GRAINM] + + k[6563]*y_cur[IDX_GRAINM] + k[6564]*y_cur[IDX_GRAINM]; + data[jistart + 20586] = 0.0 + k[946]*y_cur[IDX_eM] + k[6502]*y_cur[IDX_GRAINM]; + data[jistart + 20587] = 0.0 + k[948]*y_cur[IDX_eM] + k[6518]*y_cur[IDX_GRAINM]; + data[jistart + 20588] = 0.0 + k[386]*y_cur[IDX_HII]; + data[jistart + 20589] = 0.0 + k[1558]*y_cur[IDX_C2H2I] + k[2184]*y_cur[IDX_CH4I] + + k[2417]*y_cur[IDX_H2I]; + data[jistart + 20590] = 0.0 + k[1330]*y_cur[IDX_CII] + k[3131]*y_cur[IDX_HeII] + k[5751] + + k[5751]; + data[jistart + 20591] = 0.0 + k[1252]*y_cur[IDX_eM] + k[1252]*y_cur[IDX_eM] + + k[1253]*y_cur[IDX_eM] + k[1926]*y_cur[IDX_CI] + + k[3472]*y_cur[IDX_NI] + k[3757]*y_cur[IDX_OI] + + k[3883]*y_cur[IDX_SI] + k[6403]*y_cur[IDX_GRAINM] + + k[6403]*y_cur[IDX_GRAINM] + k[6404]*y_cur[IDX_GRAINM]; + data[jistart + 20592] = 0.0 + k[1254]*y_cur[IDX_eM] + k[1927]*y_cur[IDX_CI] + + k[3474]*y_cur[IDX_NI] + k[3758]*y_cur[IDX_OI] + + k[6412]*y_cur[IDX_GRAINM]; + data[jistart + 20593] = 0.0 + k[321]*y_cur[IDX_HII] + k[3062]*y_cur[IDX_HeII] + + k[3062]*y_cur[IDX_HeII] + k[3064]*y_cur[IDX_HeII] + + k[3066]*y_cur[IDX_HeII] + k[5690] + k[5957] + k[5957] + k[5959] + + k[5960]; + data[jistart + 20594] = 0.0 + k[1550]*y_cur[IDX_C2H2I] + k[2167]*y_cur[IDX_CH4I] + + k[2411]*y_cur[IDX_H2I]; + data[jistart + 20595] = 0.0 + k[358]*y_cur[IDX_HII]; + data[jistart + 20596] = 0.0 + k[373]*y_cur[IDX_HII]; + data[jistart + 20597] = 0.0 + k[5146]*y_cur[IDX_H2I] - k[5191]*y_cur[IDX_HI] - + k[5192]*y_cur[IDX_HI] - k[5193]*y_cur[IDX_HI] + k[5899] + k[6237]; + data[jistart + 20598] = 0.0 + k[416]*y_cur[IDX_HII]; + data[jistart + 20599] = 0.0 + k[425]*y_cur[IDX_HII]; + data[jistart + 20600] = 0.0 + k[328]*y_cur[IDX_HII]; + data[jistart + 20601] = 0.0 + k[3265]*y_cur[IDX_HeII] - k[5175]*y_cur[IDX_HI] - + k[5176]*y_cur[IDX_HI] - k[5177]*y_cur[IDX_HI] + + k[5269]*y_cur[IDX_NI] + k[5411]*y_cur[IDX_OI] + k[5869] + k[6200]; + data[jistart + 20602] = 0.0 + k[399]*y_cur[IDX_HII] - k[5179]*y_cur[IDX_HI] - + k[5180]*y_cur[IDX_HI]; + data[jistart + 20603] = 0.0 + k[429]*y_cur[IDX_HII] + k[1442]*y_cur[IDX_CII] + + k[3325]*y_cur[IDX_HeII] + k[4989]*y_cur[IDX_CI] + + k[5447]*y_cur[IDX_OI] + k[5928] + k[6274]; + data[jistart + 20604] = 0.0 + k[963]*y_cur[IDX_eM] + k[965]*y_cur[IDX_eM] + + k[966]*y_cur[IDX_eM] + k[967]*y_cur[IDX_eM] + + k[6440]*y_cur[IDX_GRAINM] + k[6442]*y_cur[IDX_GRAINM] + + k[6443]*y_cur[IDX_GRAINM] + k[6444]*y_cur[IDX_GRAINM]; + data[jistart + 20605] = 0.0 + k[1541]*y_cur[IDX_C2H2I]; + data[jistart + 20606] = 0.0 + k[1556]*y_cur[IDX_C2H2I] + k[1700]*y_cur[IDX_C2H4I] + + k[2179]*y_cur[IDX_CH4I] + k[2414]*y_cur[IDX_H2I]; + data[jistart + 20607] = 0.0 + k[854]*y_cur[IDX_eM] + k[1875]*y_cur[IDX_CI] + + k[6789]*y_cur[IDX_GRAINM]; + data[jistart + 20608] = 0.0 + k[883]*y_cur[IDX_eM] + k[1884]*y_cur[IDX_CI] + + k[6845]*y_cur[IDX_GRAINM]; + data[jistart + 20609] = 0.0 + k[892]*y_cur[IDX_eM] + k[1885]*y_cur[IDX_CI] + + k[2425]*y_cur[IDX_H2I] + k[3446]*y_cur[IDX_NI] + + k[6858]*y_cur[IDX_GRAINM]; + data[jistart + 20610] = 0.0 + k[895]*y_cur[IDX_eM] + k[1889]*y_cur[IDX_CI] + + k[3450]*y_cur[IDX_NI] + k[6861]*y_cur[IDX_GRAINM]; + data[jistart + 20611] = 0.0 - k[5157]*y_cur[IDX_HI]; + data[jistart + 20612] = 0.0 + k[1115]*y_cur[IDX_eM] + k[3019]*y_cur[IDX_CII] + + k[3023]*y_cur[IDX_HII] + k[3034]*y_cur[IDX_HeII] - + k[5213]*y_cur[IDX_HI] + k[5213]*y_cur[IDX_HI] + k[6197]; + data[jistart + 20613] = 0.0 - k[5194]*y_cur[IDX_HI] - k[5195]*y_cur[IDX_HI] - + k[5196]*y_cur[IDX_HI]; + data[jistart + 20614] = 0.0 + k[1242]*y_cur[IDX_eM] + k[1922]*y_cur[IDX_CI] + + k[3470]*y_cur[IDX_NI] + k[6496]*y_cur[IDX_GRAINM]; + data[jistart + 20615] = 0.0 + k[1250]*y_cur[IDX_eM] + k[1925]*y_cur[IDX_CI] - + k[2848]*y_cur[IDX_HI] + k[3471]*y_cur[IDX_NI] + + k[3756]*y_cur[IDX_OI] + k[6271] + k[6388]*y_cur[IDX_GRAINM]; + data[jistart + 20616] = 0.0 + k[368]*y_cur[IDX_HII]; + data[jistart + 20617] = 0.0 + k[1063]*y_cur[IDX_eM] + k[2444]*y_cur[IDX_H2I] + + k[6629]*y_cur[IDX_GRAINM]; + data[jistart + 20618] = 0.0 + k[353]*y_cur[IDX_HII] + k[1336]*y_cur[IDX_CII] + + k[1504]*y_cur[IDX_C2H2II] + k[3146]*y_cur[IDX_HeII] + + k[4893]*y_cur[IDX_C2HI] + k[4939]*y_cur[IDX_CI] + + k[5108]*y_cur[IDX_CNI] + k[5764] + k[6056]; + data[jistart + 20619] = 0.0 + k[2436]*y_cur[IDX_H2I] - k[2841]*y_cur[IDX_HI]; + data[jistart + 20620] = 0.0 + k[385]*y_cur[IDX_HII] + k[5851] + k[6176]; + data[jistart + 20621] = 0.0 + k[431]*y_cur[IDX_HII] + k[1445]*y_cur[IDX_CII] + + k[3328]*y_cur[IDX_HeII] + k[3885]*y_cur[IDX_SII] + + k[4990]*y_cur[IDX_CI] + k[5296]*y_cur[IDX_NI] + + k[5449]*y_cur[IDX_OI] + k[5930] + k[6280]; + data[jistart + 20622] = 0.0 + k[430]*y_cur[IDX_HII] + k[1444]*y_cur[IDX_CII] + + k[3327]*y_cur[IDX_HeII] + k[6278] + k[6279]; + data[jistart + 20623] = 0.0 + k[867]*y_cur[IDX_eM] + k[1876]*y_cur[IDX_CI] + + k[2420]*y_cur[IDX_H2I] + k[3429]*y_cur[IDX_NI] + + k[6825]*y_cur[IDX_GRAINM]; + data[jistart + 20624] = 0.0 + k[894]*y_cur[IDX_eM] + k[1887]*y_cur[IDX_CI] + + k[3449]*y_cur[IDX_NI] + k[6860]*y_cur[IDX_GRAINM]; + data[jistart + 20625] = 0.0 + k[411]*y_cur[IDX_HII] + k[3299]*y_cur[IDX_HeII] + + k[4983]*y_cur[IDX_CI] + k[5285]*y_cur[IDX_NI] + + k[5436]*y_cur[IDX_OI] + k[5908] + k[6249]; + data[jistart + 20626] = 0.0 + k[350]*y_cur[IDX_HII] + k[1333]*y_cur[IDX_CII] + + k[1500]*y_cur[IDX_C2H2II] + k[1604]*y_cur[IDX_C2H3II] + + k[3138]*y_cur[IDX_HeII] + k[4892]*y_cur[IDX_C2HI] + + k[4935]*y_cur[IDX_CI] + k[5245]*y_cur[IDX_NI] + k[5758] + k[6046]; + data[jistart + 20627] = 0.0 + k[1108]*y_cur[IDX_eM] + k[3738]*y_cur[IDX_OI] + + k[6555]*y_cur[IDX_GRAINM]; + data[jistart + 20628] = 0.0 + k[1205]*y_cur[IDX_eM] + k[1570]*y_cur[IDX_C2H2I] + + k[2213]*y_cur[IDX_CH4I] + k[2564]*y_cur[IDX_H2OI] + + k[3598]*y_cur[IDX_NH3I] + k[3751]*y_cur[IDX_OI] + + k[6433]*y_cur[IDX_GRAINM]; + data[jistart + 20629] = 0.0 + k[800]*y_cur[IDX_eM] + k[802]*y_cur[IDX_eM] + + k[802]*y_cur[IDX_eM] + k[1547]*y_cur[IDX_C2H2I] + + k[1809]*y_cur[IDX_CH2CCH2I] + k[1810]*y_cur[IDX_CH2CCH2I] + + k[1812]*y_cur[IDX_CH3CCHI] + k[1813]*y_cur[IDX_CH3CCHI] + + k[1860]*y_cur[IDX_CI] - k[2832]*y_cur[IDX_HI] + + k[6478]*y_cur[IDX_GRAINM] + k[6480]*y_cur[IDX_GRAINM] + + k[6480]*y_cur[IDX_GRAINM]; + data[jistart + 20630] = 0.0 + k[882]*y_cur[IDX_eM] + k[1882]*y_cur[IDX_CI] + + k[6842]*y_cur[IDX_GRAINM]; + data[jistart + 20631] = 0.0 + k[1098]*y_cur[IDX_eM] + k[1099]*y_cur[IDX_eM] + + k[6566]*y_cur[IDX_GRAINM] + k[6567]*y_cur[IDX_GRAINM]; + data[jistart + 20632] = 0.0 + k[843]*y_cur[IDX_eM] + k[1871]*y_cur[IDX_CI] + + k[3416]*y_cur[IDX_NI] + k[6742]*y_cur[IDX_GRAINM]; + data[jistart + 20633] = 0.0 + k[1068]*y_cur[IDX_eM] + k[1069]*y_cur[IDX_eM] + + k[6639]*y_cur[IDX_GRAINM] + k[6640]*y_cur[IDX_GRAINM]; + data[jistart + 20634] = 0.0 + k[840]*y_cur[IDX_eM] + k[1867]*y_cur[IDX_CI] + + k[2415]*y_cur[IDX_H2I] + k[3412]*y_cur[IDX_NI] + + k[6722]*y_cur[IDX_GRAINM]; + data[jistart + 20635] = 0.0 + k[366]*y_cur[IDX_HII]; + data[jistart + 20636] = 0.0 + k[2438]*y_cur[IDX_H2I]; + data[jistart + 20637] = 0.0 + k[804]*y_cur[IDX_eM] + k[6483]*y_cur[IDX_GRAINM]; + data[jistart + 20638] = 0.0 + k[870]*y_cur[IDX_eM] + k[1880]*y_cur[IDX_CI] + + k[3433]*y_cur[IDX_NI] + k[6828]*y_cur[IDX_GRAINM]; + data[jistart + 20639] = 0.0 + k[1569]*y_cur[IDX_C2H2I] + k[2562]*y_cur[IDX_H2OI] + + k[3595]*y_cur[IDX_NH3I] + k[3807]*y_cur[IDX_OHI]; + data[jistart + 20640] = 0.0 + k[367]*y_cur[IDX_HII]; + data[jistart + 20641] = 0.0 - k[5181]*y_cur[IDX_HI]; + data[jistart + 20642] = 0.0 + k[869]*y_cur[IDX_eM] + k[1561]*y_cur[IDX_C2H2I] + + k[1642]*y_cur[IDX_C2H3I] + k[1740]*y_cur[IDX_C2HI] + + k[1878]*y_cur[IDX_CI] + k[3432]*y_cur[IDX_NI] + + k[6827]*y_cur[IDX_GRAINM]; + data[jistart + 20643] = 0.0 + k[1543]*y_cur[IDX_C2H2I] + k[1688]*y_cur[IDX_C2H4I] + + k[2159]*y_cur[IDX_CH4I] + k[2406]*y_cur[IDX_H2I] + + k[2868]*y_cur[IDX_HCNI]; + data[jistart + 20644] = 0.0 + k[1045]*y_cur[IDX_eM] + k[1047]*y_cur[IDX_eM] + + k[1047]*y_cur[IDX_eM] + k[1048]*y_cur[IDX_eM] - + k[2843]*y_cur[IDX_HI] + k[3839]*y_cur[IDX_SI] + + k[6450]*y_cur[IDX_GRAINM] + k[6452]*y_cur[IDX_GRAINM] + + k[6452]*y_cur[IDX_GRAINM] + k[6453]*y_cur[IDX_GRAINM]; + data[jistart + 20645] = 0.0 + k[1175]*y_cur[IDX_eM] + k[3466]*y_cur[IDX_NI] + + k[6437]*y_cur[IDX_GRAINM]; + data[jistart + 20646] = 0.0 + k[853]*y_cur[IDX_eM] + k[1640]*y_cur[IDX_C2H3I] + + k[1739]*y_cur[IDX_C2HI] + k[1793]*y_cur[IDX_C3H2I] + + k[1827]*y_cur[IDX_C3HI] + k[1873]*y_cur[IDX_CI] + + k[2040]*y_cur[IDX_CH2CCHI] + k[2186]*y_cur[IDX_CH4I] + + k[2484]*y_cur[IDX_H2CCCI] + k[6786]*y_cur[IDX_GRAINM]; + data[jistart + 20647] = 0.0 + k[968]*y_cur[IDX_eM] + k[968]*y_cur[IDX_eM] + + k[969]*y_cur[IDX_eM] + k[2134]*y_cur[IDX_C2H2I] + + k[2432]*y_cur[IDX_H2I] - k[2839]*y_cur[IDX_HI] + k[6126] + + k[6327]*y_cur[IDX_GRAINM] + k[6327]*y_cur[IDX_GRAINM] + + k[6328]*y_cur[IDX_GRAINM]; + data[jistart + 20648] = 0.0 + k[1121]*y_cur[IDX_eM] + k[3740]*y_cur[IDX_OI] + + k[6422]*y_cur[IDX_GRAINM]; + data[jistart + 20649] = 0.0 + k[1389]*y_cur[IDX_CII] + k[1517]*y_cur[IDX_C2H2II] + + k[1618]*y_cur[IDX_C2H3II] + k[1673]*y_cur[IDX_C2H4II] + + k[1783]*y_cur[IDX_C3H2II] + k[2336]*y_cur[IDX_HII] + + k[2477]*y_cur[IDX_C3H3II] + k[2478]*y_cur[IDX_C4HII] + + k[2479]*y_cur[IDX_C4H2II] + k[2480]*y_cur[IDX_C4H3II] + + k[2482]*y_cur[IDX_C5H2II] + k[2484]*y_cur[IDX_C6H2II] + + k[2486]*y_cur[IDX_CH2CCHII] + k[3218]*y_cur[IDX_HeII] + + k[3827]*y_cur[IDX_SII] + k[3868]*y_cur[IDX_SiII] + + k[4959]*y_cur[IDX_CI] + k[5834] + k[6150]; + data[jistart + 20650] = 0.0 + k[347]*y_cur[IDX_HII] + k[1327]*y_cur[IDX_CII] + + k[1496]*y_cur[IDX_C2H2II] + k[1597]*y_cur[IDX_C2H3II] + + k[1768]*y_cur[IDX_C3H2II] + k[3129]*y_cur[IDX_HeII] + + k[4891]*y_cur[IDX_C2HI] + k[4932]*y_cur[IDX_CI] + + k[5107]*y_cur[IDX_CNI] + k[6037]; + data[jistart + 20651] = 0.0 + k[764]*y_cur[IDX_eM] + k[765]*y_cur[IDX_eM] + + k[765]*y_cur[IDX_eM] + k[765]*y_cur[IDX_eM] + k[766]*y_cur[IDX_eM] + + k[766]*y_cur[IDX_eM] + k[767]*y_cur[IDX_eM] - k[2829]*y_cur[IDX_HI] + + k[6391]*y_cur[IDX_GRAINM] + k[6392]*y_cur[IDX_GRAINM] + + k[6392]*y_cur[IDX_GRAINM] + k[6392]*y_cur[IDX_GRAINM] + + k[6393]*y_cur[IDX_GRAINM] + k[6393]*y_cur[IDX_GRAINM] + + k[6394]*y_cur[IDX_GRAINM]; + data[jistart + 20652] = 0.0 + k[344]*y_cur[IDX_HII] + k[1324]*y_cur[IDX_CII] + + k[1492]*y_cur[IDX_C2H2II] + k[1591]*y_cur[IDX_C2H3II] + + k[1656]*y_cur[IDX_C2H4II] + k[1764]*y_cur[IDX_C3H2II] + + k[1799]*y_cur[IDX_C3H3II] + k[1832]*y_cur[IDX_C4HII] + + k[1835]*y_cur[IDX_C4H2II] + k[1840]*y_cur[IDX_C4H3II] + + k[2023]*y_cur[IDX_CH2CCHII] + k[3121]*y_cur[IDX_HeII] + + k[4890]*y_cur[IDX_C2HI] + k[4927]*y_cur[IDX_CI] + + k[5239]*y_cur[IDX_NI] + k[5741] + k[6026]; + data[jistart + 20653] = 0.0 + k[842]*y_cur[IDX_eM] + k[1638]*y_cur[IDX_C2H3I] + + k[1702]*y_cur[IDX_C2H4I] + k[1738]*y_cur[IDX_C2HI] + + k[1791]*y_cur[IDX_C3H2I] + k[1826]*y_cur[IDX_C3HI] + + k[1845]*y_cur[IDX_C4HI] + k[1869]*y_cur[IDX_CI] + + k[2038]*y_cur[IDX_CH2CCHI] + k[2181]*y_cur[IDX_CH4I] + + k[2482]*y_cur[IDX_H2CCCI] + k[3415]*y_cur[IDX_NI] + + k[6739]*y_cur[IDX_GRAINM]; + data[jistart + 20654] = 0.0 + k[1775]*y_cur[IDX_C3H2II] + k[1809]*y_cur[IDX_C3H4II] + + k[1810]*y_cur[IDX_C3H4II] + k[3855]*y_cur[IDX_SOII] + + k[4894]*y_cur[IDX_C2HI] + k[4895]*y_cur[IDX_C2HI] + + k[4946]*y_cur[IDX_CI] + k[5023]*y_cur[IDX_C4HI] + + k[5067]*y_cur[IDX_CHI] + k[5109]*y_cur[IDX_CNI] + k[5781] + k[6081]; + data[jistart + 20655] = 0.0 - k[487]*y_cur[IDX_HI] + k[2272]*y_cur[IDX_HCNI] + + k[2433]*y_cur[IDX_H2I] + k[2538]*y_cur[IDX_H2OI]; + data[jistart + 20656] = 0.0 + k[1372]*y_cur[IDX_CII] + k[2327]*y_cur[IDX_HII] + + k[2377]*y_cur[IDX_H2II] + k[3189]*y_cur[IDX_HeII] + + k[4869]*y_cur[IDX_C2I] + k[4869]*y_cur[IDX_C2I] + + k[5070]*y_cur[IDX_CHI]; + data[jistart + 20657] = 0.0 + k[334]*y_cur[IDX_HII] + k[1311]*y_cur[IDX_CII] + + k[1486]*y_cur[IDX_C2H2II] + k[1582]*y_cur[IDX_C2H3II] + + k[1650]*y_cur[IDX_C2H4II] + k[1760]*y_cur[IDX_C3H2II] + + k[1787]*y_cur[IDX_C3H3II] + k[1788]*y_cur[IDX_C4H2II] + + k[1789]*y_cur[IDX_C4H3II] + k[1791]*y_cur[IDX_C5H2II] + + k[1793]*y_cur[IDX_C6H2II] + k[1795]*y_cur[IDX_CH2CCHII] + + k[3096]*y_cur[IDX_HeII] + k[3820]*y_cur[IDX_SII] + + k[3860]*y_cur[IDX_SiII] + k[4889]*y_cur[IDX_C2HI] + + k[4919]*y_cur[IDX_CI] + k[5232]*y_cur[IDX_NI] + k[5719] + k[6003]; + data[jistart + 20658] = 0.0 + k[327]*y_cur[IDX_HII] + k[3084]*y_cur[IDX_HeII] + + k[4915]*y_cur[IDX_CI] + k[5350]*y_cur[IDX_OI]; + data[jistart + 20659] = 0.0 + k[2205]*y_cur[IDX_CH4I] + k[2460]*y_cur[IDX_H2I] + + k[3361]*y_cur[IDX_H2COI] + k[3362]*y_cur[IDX_H2SI]; + data[jistart + 20660] = 0.0 + k[4696]*y_cur[IDX_HM]; + data[jistart + 20661] = 0.0 - k[490]*y_cur[IDX_HI] + k[1088]*y_cur[IDX_eM] + + k[2450]*y_cur[IDX_H2I] + k[6372]*y_cur[IDX_GRAINM]; + data[jistart + 20662] = 0.0 + k[1377]*y_cur[IDX_CII] + k[2118]*y_cur[IDX_CH3COCH3II] + + k[2119]*y_cur[IDX_CH3COCH3II] + k[3662]*y_cur[IDX_O2II] + + k[3663]*y_cur[IDX_O2II] + k[4870]*y_cur[IDX_C2I] + + k[4870]*y_cur[IDX_C2I] + k[4954]*y_cur[IDX_CI] + + k[5054]*y_cur[IDX_C4HI] + k[5072]*y_cur[IDX_CHI]; + data[jistart + 20663] = 0.0 + k[1452]*y_cur[IDX_C2H2I] + k[1453]*y_cur[IDX_HCNI] + + k[1995]*y_cur[IDX_CH2I] + k[2148]*y_cur[IDX_CH4I] + + k[2150]*y_cur[IDX_CH4I] + k[2239]*y_cur[IDX_CHI] + + k[2401]*y_cur[IDX_H2I] + k[2520]*y_cur[IDX_H2OI] + + k[3528]*y_cur[IDX_NH2I] + k[3606]*y_cur[IDX_NHI]; + data[jistart + 20664] = 0.0 + k[821]*y_cur[IDX_eM] + k[1551]*y_cur[IDX_C2H2I] + + k[1632]*y_cur[IDX_C2H3I] + k[1695]*y_cur[IDX_C2H4I] + + k[1735]*y_cur[IDX_C2HI] + k[1823]*y_cur[IDX_C3HI] + + k[1831]*y_cur[IDX_C4HI] + k[1832]*y_cur[IDX_C5H2I] + + k[1833]*y_cur[IDX_C5HI] + k[1834]*y_cur[IDX_C4H2I] + + k[1862]*y_cur[IDX_CI] + k[2032]*y_cur[IDX_CH2CCHI] + + k[2105]*y_cur[IDX_CH3CCHI] + k[2412]*y_cur[IDX_H2I] + + k[2478]*y_cur[IDX_H2CCCI] + k[2870]*y_cur[IDX_HCNI] + + k[6621]*y_cur[IDX_GRAINM]; + data[jistart + 20665] = 0.0 + k[4699]*y_cur[IDX_HM]; + data[jistart + 20666] = 0.0 + k[1138]*y_cur[IDX_eM] + k[1908]*y_cur[IDX_CI] + + k[2456]*y_cur[IDX_H2I] - k[2844]*y_cur[IDX_HI] + + k[3462]*y_cur[IDX_NI] + k[3743]*y_cur[IDX_OI] + k[6205] + + k[6445]*y_cur[IDX_GRAINM]; + data[jistart + 20667] = 0.0 + k[1158]*y_cur[IDX_eM] + k[2462]*y_cur[IDX_H2I] + + k[3463]*y_cur[IDX_NI] + k[3478]*y_cur[IDX_C2I] + + k[3486]*y_cur[IDX_COI] + k[3506]*y_cur[IDX_SI] + + k[6320]*y_cur[IDX_GRAINM]; + data[jistart + 20668] = 0.0 + k[4772]*y_cur[IDX_HII] + k[4775]*y_cur[IDX_H3II] + k[4776]*y_cur[IDX_H3OII] + k[4777]*y_cur[IDX_HC2SII] + k[4778]*y_cur[IDX_HCNHII] + k[4779]*y_cur[IDX_HCNHII] + - k[4780]*y_cur[IDX_HCOII] + k[4781]*y_cur[IDX_HCOII] + - k[4782]*y_cur[IDX_HeII] + k[4783]*y_cur[IDX_MgII] + - k[4784]*y_cur[IDX_NII] + k[4785]*y_cur[IDX_N2HII] + - k[4786]*y_cur[IDX_NH3II] + k[4787]*y_cur[IDX_NH4II] + - k[4788]*y_cur[IDX_NOII] + k[4789]*y_cur[IDX_NaII] + - k[4790]*y_cur[IDX_OII] + k[4791]*y_cur[IDX_SII] + - k[4792]*y_cur[IDX_SOII] + k[4793]*y_cur[IDX_SiII] + - k[4794]*y_cur[IDX_SiOII] + k[4795]*y_cur[IDX_SiOHII] + - k[4796]*y_cur[IDX_SiSII] + k[5896] + k[6234]; - data[jistart + 17980] = 0.0 + k[5042]*y_cur[IDX_CH3I] + - k[5095]*y_cur[IDX_CHI] + k[5192]*y_cur[IDX_HI] + - k[5210]*y_cur[IDX_HCOI] + k[5282]*y_cur[IDX_NI] + - k[5339]*y_cur[IDX_O2HI] + k[5339]*y_cur[IDX_O2HI] + - k[5427]*y_cur[IDX_OI] + k[5478]*y_cur[IDX_OHI] + k[5899] + k[6237]; - data[jistart + 17981] = 0.0 + k[1175]*y_cur[IDX_eM] + - k[1463]*y_cur[IDX_C2I] + k[1749]*y_cur[IDX_C2HI] + - k[1913]*y_cur[IDX_CI] + k[2015]*y_cur[IDX_CH2I] + - k[2263]*y_cur[IDX_CHI] + k[2279]*y_cur[IDX_CNI] + - k[2289]*y_cur[IDX_COI] + k[2468]*y_cur[IDX_H2I] + - k[2499]*y_cur[IDX_H2COI] + k[2561]*y_cur[IDX_H2OI] + - k[2883]*y_cur[IDX_HCNI] + k[3011]*y_cur[IDX_HCOI] + - k[3045]*y_cur[IDX_HNCI] + k[3367]*y_cur[IDX_N2I] + - k[3546]*y_cur[IDX_NH2I] + k[3594]*y_cur[IDX_NH3I] + - k[3622]*y_cur[IDX_NHI] + k[3627]*y_cur[IDX_NOI] + - k[3677]*y_cur[IDX_CO2I] + k[3749]*y_cur[IDX_OI] + - k[3806]*y_cur[IDX_OHI] + k[3840]*y_cur[IDX_SI] + - k[6437]*y_cur[IDX_GRAINM]; - data[jistart + 17982] = 0.0 - k[5335]*y_cur[IDX_O2I] - - k[5336]*y_cur[IDX_O2I] + k[5429]*y_cur[IDX_OI]; - data[jistart + 17983] = 0.0 + k[3806]*y_cur[IDX_O2HII] + - k[5432]*y_cur[IDX_OI] + k[5478]*y_cur[IDX_O2HI]; - data[jistart + 17984] = 0.0 - k[694]*y_cur[IDX_O2I]; - data[jistart + 17985] = 0.0 - k[5484]*y_cur[IDX_O2I]; - data[jistart + 17986] = 0.0 - k[3812]*y_cur[IDX_O2I]; - data[jistart + 17987] = 0.0 - k[3818]*y_cur[IDX_O2I]; - data[jistart + 17988] = 0.0 - k[3673]*y_cur[IDX_O2I]; - data[jistart + 17989] = 0.0 + k[677]*y_cur[IDX_O2II] + - k[3840]*y_cur[IDX_O2HII] - k[5337]*y_cur[IDX_O2I]; - data[jistart + 17990] = 0.0 - k[3674]*y_cur[IDX_O2I] + - k[4791]*y_cur[IDX_O2M]; - data[jistart + 17991] = 0.0 - k[127]*y_cur[IDX_O2I]; - data[jistart + 17992] = 0.0 - k[5338]*y_cur[IDX_O2I] + - k[5439]*y_cur[IDX_OI]; - data[jistart + 17993] = 0.0 + k[4792]*y_cur[IDX_O2M]; - data[jistart + 17994] = 0.0 + k[3303]*y_cur[IDX_HeII] + - k[3651]*y_cur[IDX_OII] + k[5438]*y_cur[IDX_OI]; - data[jistart + 17995] = 0.0 - k[680]*y_cur[IDX_O2I]; - data[jistart + 17996] = 0.0 + k[722]*y_cur[IDX_O2II] - - k[5494]*y_cur[IDX_O2I]; - data[jistart + 17997] = 0.0 + k[4793]*y_cur[IDX_O2M]; - data[jistart + 17998] = 0.0 - k[3882]*y_cur[IDX_O2I]; - data[jistart + 17999] = 0.0 - k[3884]*y_cur[IDX_O2I]; - data[jistart + 18000] = 0.0 + k[3764]*y_cur[IDX_OI] + - k[4794]*y_cur[IDX_O2M]; - data[jistart + 18001] = 0.0 + k[3331]*y_cur[IDX_HeII]; - data[jistart + 18002] = 0.0 + k[4795]*y_cur[IDX_O2M]; - data[jistart + 18003] = 0.0 - k[3675]*y_cur[IDX_O2I] - - k[3676]*y_cur[IDX_O2I] + k[4796]*y_cur[IDX_O2M]; - data[jistart + 18004] = 0.0 + k[1175]*y_cur[IDX_O2HII]; - data[jistart + 18005] = 0.0 - k[248]*y_cur[IDX_O2II] - - k[1912]*y_cur[IDX_O2II]; - data[jistart + 18006] = 0.0 - k[211]*y_cur[IDX_O2II] - - k[1462]*y_cur[IDX_O2II]; - data[jistart + 18007] = 0.0 - k[668]*y_cur[IDX_O2II] - - k[3654]*y_cur[IDX_O2II] - k[3655]*y_cur[IDX_O2II]; - data[jistart + 18008] = 0.0 - k[240]*y_cur[IDX_O2II]; - data[jistart + 18009] = 0.0 - k[296]*y_cur[IDX_O2II] - - k[2262]*y_cur[IDX_O2II]; - data[jistart + 18010] = 0.0 - k[267]*y_cur[IDX_O2II] - - k[2014]*y_cur[IDX_O2II]; - data[jistart + 18011] = 0.0 - k[669]*y_cur[IDX_O2II] - - k[3656]*y_cur[IDX_O2II] - k[3657]*y_cur[IDX_O2II]; - data[jistart + 18012] = 0.0 - k[670]*y_cur[IDX_O2II] - - k[3658]*y_cur[IDX_O2II] - k[3659]*y_cur[IDX_O2II] - - k[3660]*y_cur[IDX_O2II] - k[3661]*y_cur[IDX_O2II] - - k[3662]*y_cur[IDX_O2II] - k[3663]*y_cur[IDX_O2II]; - data[jistart + 18013] = 0.0 - k[671]*y_cur[IDX_O2II] - - k[3664]*y_cur[IDX_O2II]; - data[jistart + 18014] = 0.0 - k[672]*y_cur[IDX_O2II] - - k[3665]*y_cur[IDX_O2II]; - data[jistart + 18015] = 0.0 - k[2208]*y_cur[IDX_O2II]; - data[jistart + 18016] = 0.0 + k[283]*y_cur[IDX_O2I]; - data[jistart + 18017] = 0.0 + k[304]*y_cur[IDX_O2I]; - data[jistart + 18018] = 0.0 + k[312]*y_cur[IDX_O2I]; - data[jistart + 18019] = 0.0 + k[3209]*y_cur[IDX_HeII] + - k[3640]*y_cur[IDX_OII]; - data[jistart + 18020] = 0.0 + k[678]*y_cur[IDX_O2I] + - k[3730]*y_cur[IDX_OI]; - data[jistart + 18021] = 0.0 + k[679]*y_cur[IDX_O2I]; - data[jistart + 18022] = 0.0 - k[673]*y_cur[IDX_O2II]; - data[jistart + 18023] = 0.0 - k[6425]*y_cur[IDX_O2II]; - data[jistart + 18024] = 0.0 + k[405]*y_cur[IDX_O2I]; - data[jistart + 18025] = 0.0 + k[455]*y_cur[IDX_O2I]; - data[jistart + 18026] = 0.0 - k[461]*y_cur[IDX_O2II] - - k[2498]*y_cur[IDX_O2II]; - data[jistart + 18027] = 0.0 + k[474]*y_cur[IDX_O2I] + - k[3733]*y_cur[IDX_OI]; - data[jistart + 18028] = 0.0 - k[674]*y_cur[IDX_O2II]; - data[jistart + 18029] = 0.0 + k[495]*y_cur[IDX_O2I]; - data[jistart + 18030] = 0.0 - k[502]*y_cur[IDX_O2II] - - k[3010]*y_cur[IDX_O2II]; - data[jistart + 18031] = 0.0 - k[675]*y_cur[IDX_O2II] - - k[3666]*y_cur[IDX_O2II]; - data[jistart + 18032] = 0.0 + k[525]*y_cur[IDX_O2I] + - k[3209]*y_cur[IDX_CO2I]; - data[jistart + 18033] = 0.0 - k[537]*y_cur[IDX_O2II]; - data[jistart + 18034] = 0.0 - k[3465]*y_cur[IDX_O2II]; - data[jistart + 18035] = 0.0 + k[561]*y_cur[IDX_O2I]; - data[jistart + 18036] = 0.0 + k[570]*y_cur[IDX_O2I]; - data[jistart + 18037] = 0.0 - k[3620]*y_cur[IDX_O2II] - - k[3621]*y_cur[IDX_O2II]; - data[jistart + 18038] = 0.0 + k[578]*y_cur[IDX_O2I]; - data[jistart + 18039] = 0.0 - k[590]*y_cur[IDX_O2II]; - data[jistart + 18040] = 0.0 - k[611]*y_cur[IDX_O2II]; - data[jistart + 18041] = 0.0 - k[628]*y_cur[IDX_O2II]; - data[jistart + 18042] = 0.0 - k[676]*y_cur[IDX_O2II]; - data[jistart + 18043] = 0.0 - k[642]*y_cur[IDX_O2II]; - data[jistart + 18044] = 0.0 + k[3730]*y_cur[IDX_CO2II] + - k[3733]*y_cur[IDX_H2OII] + k[3750]*y_cur[IDX_OHII]; - data[jistart + 18045] = 0.0 + k[662]*y_cur[IDX_O2I] + - k[3640]*y_cur[IDX_CO2I] + k[3650]*y_cur[IDX_OHI]; - data[jistart + 18046] = 0.0 + k[283]*y_cur[IDX_CH4II] + - k[304]*y_cur[IDX_CNII] + k[312]*y_cur[IDX_COII] + - k[405]*y_cur[IDX_HII] + k[455]*y_cur[IDX_H2II] + - k[474]*y_cur[IDX_H2OII] + k[495]*y_cur[IDX_HCNII] + - k[525]*y_cur[IDX_HeII] + k[561]*y_cur[IDX_NII] + - k[570]*y_cur[IDX_N2II] + k[578]*y_cur[IDX_NHII] + - k[662]*y_cur[IDX_OII] + k[678]*y_cur[IDX_CO2II] + - k[679]*y_cur[IDX_ClII] + k[680]*y_cur[IDX_SO2II] + - k[694]*y_cur[IDX_OHII] + k[5897] + k[6235]; - data[jistart + 18047] = 0.0 - k[211]*y_cur[IDX_C2I] - - k[240]*y_cur[IDX_C2H4I] - k[248]*y_cur[IDX_CI] - - k[267]*y_cur[IDX_CH2I] - k[296]*y_cur[IDX_CHI] - - k[461]*y_cur[IDX_H2COI] - k[502]*y_cur[IDX_HCOI] - - k[537]*y_cur[IDX_MgI] - k[590]*y_cur[IDX_NH2I] - - k[611]*y_cur[IDX_NH3I] - k[628]*y_cur[IDX_NOI] - - k[642]*y_cur[IDX_NaI] - k[668]*y_cur[IDX_C2H2I] - - k[669]*y_cur[IDX_CH2CCH2I] - k[670]*y_cur[IDX_CH3CHCH2I] - - k[671]*y_cur[IDX_CH3OCH3I] - k[672]*y_cur[IDX_CH3OHI] - - k[673]*y_cur[IDX_FeI] - k[674]*y_cur[IDX_H2SI] - - k[675]*y_cur[IDX_HCOOHI] - k[676]*y_cur[IDX_NO2I] - - k[677]*y_cur[IDX_SI] - k[722]*y_cur[IDX_SiI] - k[1174]*y_cur[IDX_eM] - - k[1462]*y_cur[IDX_C2I] - k[1912]*y_cur[IDX_CI] - - k[2014]*y_cur[IDX_CH2I] - k[2208]*y_cur[IDX_CH4I] - - k[2262]*y_cur[IDX_CHI] - k[2498]*y_cur[IDX_H2COI] - - k[3010]*y_cur[IDX_HCOI] - k[3465]*y_cur[IDX_NI] - - k[3620]*y_cur[IDX_NHI] - k[3621]*y_cur[IDX_NHI] - - k[3654]*y_cur[IDX_C2H2I] - k[3655]*y_cur[IDX_C2H2I] - - k[3656]*y_cur[IDX_CH2CCH2I] - k[3657]*y_cur[IDX_CH2CCH2I] - - k[3658]*y_cur[IDX_CH3CHCH2I] - k[3659]*y_cur[IDX_CH3CHCH2I] - - k[3660]*y_cur[IDX_CH3CHCH2I] - k[3661]*y_cur[IDX_CH3CHCH2I] - - k[3662]*y_cur[IDX_CH3CHCH2I] - k[3663]*y_cur[IDX_CH3CHCH2I] - - k[3664]*y_cur[IDX_CH3OCH3I] - k[3665]*y_cur[IDX_CH3OHI] - - k[3666]*y_cur[IDX_HCOOHI] - k[3667]*y_cur[IDX_SI] - k[6233] - - k[6425]*y_cur[IDX_GRAINM]; - data[jistart + 18048] = 0.0 + k[3650]*y_cur[IDX_OII]; - data[jistart + 18049] = 0.0 + k[694]*y_cur[IDX_O2I] + - k[3750]*y_cur[IDX_OI]; - data[jistart + 18050] = 0.0 - k[677]*y_cur[IDX_O2II] - - k[3667]*y_cur[IDX_O2II]; - data[jistart + 18051] = 0.0 + k[680]*y_cur[IDX_O2I]; - data[jistart + 18052] = 0.0 - k[722]*y_cur[IDX_O2II]; - data[jistart + 18053] = 0.0 - k[1174]*y_cur[IDX_O2II]; - data[jistart + 18054] = 0.0 - k[4762]*y_cur[IDX_O2M]; - data[jistart + 18055] = 0.0 - k[4763]*y_cur[IDX_O2M]; - data[jistart + 18056] = 0.0 - k[4764]*y_cur[IDX_O2M]; - data[jistart + 18057] = 0.0 - k[4765]*y_cur[IDX_O2M]; - data[jistart + 18058] = 0.0 - k[4766]*y_cur[IDX_O2M]; - data[jistart + 18059] = 0.0 - k[4767]*y_cur[IDX_O2M]; - data[jistart + 18060] = 0.0 - k[4768]*y_cur[IDX_O2M]; - data[jistart + 18061] = 0.0 - k[4769]*y_cur[IDX_O2M]; - data[jistart + 18062] = 0.0 - k[4770]*y_cur[IDX_O2M]; - data[jistart + 18063] = 0.0 - k[4771]*y_cur[IDX_O2M]; - data[jistart + 18064] = 0.0 - k[4772]*y_cur[IDX_O2M]; - data[jistart + 18065] = 0.0 - k[4773]*y_cur[IDX_O2M]; - data[jistart + 18066] = 0.0 - k[4774]*y_cur[IDX_O2M]; - data[jistart + 18067] = 0.0 - k[4775]*y_cur[IDX_O2M]; - data[jistart + 18068] = 0.0 - k[4776]*y_cur[IDX_O2M]; - data[jistart + 18069] = 0.0 - k[4777]*y_cur[IDX_O2M]; - data[jistart + 18070] = 0.0 - k[4778]*y_cur[IDX_O2M] - - k[4779]*y_cur[IDX_O2M]; - data[jistart + 18071] = 0.0 - k[4780]*y_cur[IDX_O2M] - - k[4781]*y_cur[IDX_O2M]; - data[jistart + 18072] = 0.0 - k[4782]*y_cur[IDX_O2M]; - data[jistart + 18073] = 0.0 - k[4783]*y_cur[IDX_O2M]; - data[jistart + 18074] = 0.0 - k[4784]*y_cur[IDX_O2M]; - data[jistart + 18075] = 0.0 - k[4785]*y_cur[IDX_O2M]; - data[jistart + 18076] = 0.0 - k[4786]*y_cur[IDX_O2M]; - data[jistart + 18077] = 0.0 - k[4787]*y_cur[IDX_O2M]; - data[jistart + 18078] = 0.0 - k[4788]*y_cur[IDX_O2M]; - data[jistart + 18079] = 0.0 - k[4789]*y_cur[IDX_O2M]; - data[jistart + 18080] = 0.0 - k[4790]*y_cur[IDX_O2M]; - data[jistart + 18081] = 0.0 + k[667]*y_cur[IDX_O2I]; - data[jistart + 18082] = 0.0 - k[146]*y_cur[IDX_O2M] + - k[667]*y_cur[IDX_OM]; - data[jistart + 18083] = 0.0 - k[146]*y_cur[IDX_O2I] - - k[4762]*y_cur[IDX_CII] - k[4763]*y_cur[IDX_C2H2II] - - k[4764]*y_cur[IDX_C2H3II] - k[4765]*y_cur[IDX_C4H2II] - - k[4766]*y_cur[IDX_C4H3II] - k[4767]*y_cur[IDX_C4SII] - - k[4768]*y_cur[IDX_CH2CCHII] - k[4769]*y_cur[IDX_CH3II] - - k[4770]*y_cur[IDX_CNCII] - k[4771]*y_cur[IDX_FeII] - - k[4772]*y_cur[IDX_HII] - k[4773]*y_cur[IDX_H2COII] - - k[4774]*y_cur[IDX_H2SII] - k[4775]*y_cur[IDX_H3II] - - k[4776]*y_cur[IDX_H3OII] - k[4777]*y_cur[IDX_HC2SII] - - k[4778]*y_cur[IDX_HCNHII] - k[4779]*y_cur[IDX_HCNHII] - - k[4780]*y_cur[IDX_HCOII] - k[4781]*y_cur[IDX_HCOII] - - k[4782]*y_cur[IDX_HeII] - k[4783]*y_cur[IDX_MgII] - - k[4784]*y_cur[IDX_NII] - k[4785]*y_cur[IDX_N2HII] - - k[4786]*y_cur[IDX_NH3II] - k[4787]*y_cur[IDX_NH4II] - - k[4788]*y_cur[IDX_NOII] - k[4789]*y_cur[IDX_NaII] - - k[4790]*y_cur[IDX_OII] - k[4791]*y_cur[IDX_SII] - - k[4792]*y_cur[IDX_SOII] - k[4793]*y_cur[IDX_SiII] - - k[4794]*y_cur[IDX_SiOII] - k[4795]*y_cur[IDX_SiOHII] - - k[4796]*y_cur[IDX_SiSII] - k[5896] - k[6234]; - data[jistart + 18084] = 0.0 - k[4791]*y_cur[IDX_O2M]; - data[jistart + 18085] = 0.0 - k[4792]*y_cur[IDX_O2M]; - data[jistart + 18086] = 0.0 - k[4793]*y_cur[IDX_O2M]; - data[jistart + 18087] = 0.0 - k[4794]*y_cur[IDX_O2M]; - data[jistart + 18088] = 0.0 - k[4795]*y_cur[IDX_O2M]; - data[jistart + 18089] = 0.0 - k[4796]*y_cur[IDX_O2M]; - data[jistart + 18090] = 0.0 + k[4882]*y_cur[IDX_O2I]; - data[jistart + 18091] = 0.0 - k[5094]*y_cur[IDX_O2HI] - - k[5095]*y_cur[IDX_O2HI]; - data[jistart + 18092] = 0.0 + k[3656]*y_cur[IDX_O2II]; - data[jistart + 18093] = 0.0 + k[5041]*y_cur[IDX_O2I] - - k[5042]*y_cur[IDX_O2HI]; - data[jistart + 18094] = 0.0 + k[3660]*y_cur[IDX_O2II]; - data[jistart + 18095] = 0.0 + k[3664]*y_cur[IDX_O2II]; - data[jistart + 18096] = 0.0 + k[5060]*y_cur[IDX_O2I]; - data[jistart + 18097] = 0.0 - k[5131]*y_cur[IDX_O2HI]; - data[jistart + 18098] = 0.0 + k[8605]*y_cur[IDX_GO2I]; - data[jistart + 18099] = 0.0 + k[8690]*y_cur[IDX_GOHI]; - data[jistart + 18100] = 0.0 + k[8605]*y_cur[IDX_GHI]; - data[jistart + 18101] = 0.0 + k[7119] + k[7301] + k[7483]; - data[jistart + 18102] = 0.0 + k[8690]*y_cur[IDX_GOI]; - data[jistart + 18103] = 0.0 + k[5167]*y_cur[IDX_H2O2I] - - k[5191]*y_cur[IDX_O2HI] - k[5192]*y_cur[IDX_O2HI] - - k[5193]*y_cur[IDX_O2HI]; - data[jistart + 18104] = 0.0 + k[5144]*y_cur[IDX_O2I] - - k[5146]*y_cur[IDX_O2HI]; - data[jistart + 18105] = 0.0 - k[5150]*y_cur[IDX_O2HI]; - data[jistart + 18106] = 0.0 + k[2489]*y_cur[IDX_O2I]; - data[jistart + 18107] = 0.0 - k[5152]*y_cur[IDX_O2HI]; - data[jistart + 18108] = 0.0 + k[5167]*y_cur[IDX_HI] + - k[5398]*y_cur[IDX_OI] + k[5467]*y_cur[IDX_OHI]; - data[jistart + 18109] = 0.0 + k[5209]*y_cur[IDX_O2I] - - k[5210]*y_cur[IDX_O2HI]; - data[jistart + 18110] = 0.0 + k[3666]*y_cur[IDX_O2II]; - data[jistart + 18111] = 0.0 - k[5282]*y_cur[IDX_O2HI]; - data[jistart + 18112] = 0.0 + k[5474]*y_cur[IDX_OHI]; - data[jistart + 18113] = 0.0 + k[5398]*y_cur[IDX_H2O2I] - - k[5427]*y_cur[IDX_O2HI]; - data[jistart + 18114] = 0.0 + k[2489]*y_cur[IDX_H2COII] + - k[4882]*y_cur[IDX_C2H3I] + k[5041]*y_cur[IDX_CH3I] + - k[5060]*y_cur[IDX_CH4I] + k[5144]*y_cur[IDX_H2I] + - k[5209]*y_cur[IDX_HCOI]; - data[jistart + 18115] = 0.0 + k[3656]*y_cur[IDX_CH2CCH2I] + - k[3660]*y_cur[IDX_CH3CHCH2I] + k[3664]*y_cur[IDX_CH3OCH3I] + - k[3666]*y_cur[IDX_HCOOHI]; - data[jistart + 18116] = 0.0 - k[5042]*y_cur[IDX_CH3I] - - k[5094]*y_cur[IDX_CHI] - k[5095]*y_cur[IDX_CHI] - - k[5131]*y_cur[IDX_COI] - k[5146]*y_cur[IDX_H2I] - - k[5150]*y_cur[IDX_H2COI] - k[5152]*y_cur[IDX_H2OI] - - k[5191]*y_cur[IDX_HI] - k[5192]*y_cur[IDX_HI] - - k[5193]*y_cur[IDX_HI] - k[5210]*y_cur[IDX_HCOI] - - k[5282]*y_cur[IDX_NI] - k[5339]*y_cur[IDX_O2HI] - - k[5339]*y_cur[IDX_O2HI] - k[5339]*y_cur[IDX_O2HI] - - k[5339]*y_cur[IDX_O2HI] - k[5427]*y_cur[IDX_OI] - - k[5478]*y_cur[IDX_OHI] - k[5899] - k[6237] - k[6238] - k[6937]; - data[jistart + 18117] = 0.0 + k[5467]*y_cur[IDX_H2O2I] + - k[5474]*y_cur[IDX_N2OI] - k[5478]*y_cur[IDX_O2HI]; - data[jistart + 18118] = 0.0 - k[1913]*y_cur[IDX_O2HII]; - data[jistart + 18119] = 0.0 - k[1463]*y_cur[IDX_O2HII]; - data[jistart + 18120] = 0.0 - k[1749]*y_cur[IDX_O2HII]; - data[jistart + 18121] = 0.0 - k[2263]*y_cur[IDX_O2HII]; - data[jistart + 18122] = 0.0 - k[2015]*y_cur[IDX_O2HII]; - data[jistart + 18123] = 0.0 - k[2279]*y_cur[IDX_O2HII]; - data[jistart + 18124] = 0.0 - k[2289]*y_cur[IDX_O2HII]; - data[jistart + 18125] = 0.0 - k[3677]*y_cur[IDX_O2HII]; - data[jistart + 18126] = 0.0 - k[6437]*y_cur[IDX_O2HII]; - data[jistart + 18127] = 0.0 - k[2468]*y_cur[IDX_O2HII]; - data[jistart + 18128] = 0.0 + k[2395]*y_cur[IDX_O2I]; - data[jistart + 18129] = 0.0 - k[2499]*y_cur[IDX_O2HII]; - data[jistart + 18130] = 0.0 - k[2561]*y_cur[IDX_O2HII]; - data[jistart + 18131] = 0.0 + k[2729]*y_cur[IDX_O2I]; - data[jistart + 18132] = 0.0 - k[2883]*y_cur[IDX_O2HII]; - data[jistart + 18133] = 0.0 + k[3010]*y_cur[IDX_O2II] - - k[3011]*y_cur[IDX_O2HII]; - data[jistart + 18134] = 0.0 - k[3045]*y_cur[IDX_O2HII]; - data[jistart + 18135] = 0.0 - k[3466]*y_cur[IDX_O2HII]; - data[jistart + 18136] = 0.0 - k[3367]*y_cur[IDX_O2HII]; - data[jistart + 18137] = 0.0 - k[3622]*y_cur[IDX_O2HII]; - data[jistart + 18138] = 0.0 + k[3502]*y_cur[IDX_O2I]; - data[jistart + 18139] = 0.0 - k[3546]*y_cur[IDX_O2HII]; - data[jistart + 18140] = 0.0 - k[3594]*y_cur[IDX_O2HII]; - data[jistart + 18141] = 0.0 - k[3627]*y_cur[IDX_O2HII]; - data[jistart + 18142] = 0.0 - k[3749]*y_cur[IDX_O2HII]; - data[jistart + 18143] = 0.0 + k[2395]*y_cur[IDX_H2II] + - k[2729]*y_cur[IDX_H3II] + k[3502]*y_cur[IDX_NHII]; - data[jistart + 18144] = 0.0 + k[3010]*y_cur[IDX_HCOI]; - data[jistart + 18145] = 0.0 - k[1175]*y_cur[IDX_eM] - - k[1463]*y_cur[IDX_C2I] - k[1749]*y_cur[IDX_C2HI] - - k[1913]*y_cur[IDX_CI] - k[2015]*y_cur[IDX_CH2I] - - k[2263]*y_cur[IDX_CHI] - k[2279]*y_cur[IDX_CNI] - - k[2289]*y_cur[IDX_COI] - k[2468]*y_cur[IDX_H2I] - - k[2499]*y_cur[IDX_H2COI] - k[2561]*y_cur[IDX_H2OI] - - k[2883]*y_cur[IDX_HCNI] - k[3011]*y_cur[IDX_HCOI] - - k[3045]*y_cur[IDX_HNCI] - k[3367]*y_cur[IDX_N2I] - - k[3466]*y_cur[IDX_NI] - k[3546]*y_cur[IDX_NH2I] - - k[3594]*y_cur[IDX_NH3I] - k[3622]*y_cur[IDX_NHI] - - k[3627]*y_cur[IDX_NOI] - k[3677]*y_cur[IDX_CO2I] - - k[3749]*y_cur[IDX_OI] - k[3806]*y_cur[IDX_OHI] - - k[3840]*y_cur[IDX_SI] - k[6437]*y_cur[IDX_GRAINM]; - data[jistart + 18146] = 0.0 - k[3806]*y_cur[IDX_O2HII]; - data[jistart + 18147] = 0.0 - k[3840]*y_cur[IDX_O2HII]; - data[jistart + 18148] = 0.0 - k[1175]*y_cur[IDX_O2HII]; - data[jistart + 18149] = 0.0 - k[4979]*y_cur[IDX_OCNI]; - data[jistart + 18150] = 0.0 - k[1424]*y_cur[IDX_OCNI]; - data[jistart + 18151] = 0.0 + k[5372]*y_cur[IDX_OI]; - data[jistart + 18152] = 0.0 + k[5377]*y_cur[IDX_OI]; - data[jistart + 18153] = 0.0 + k[5085]*y_cur[IDX_NOI]; - data[jistart + 18154] = 0.0 + k[5120]*y_cur[IDX_NO2I] + - k[5122]*y_cur[IDX_NOI] + k[5124]*y_cur[IDX_O2I] + - k[5460]*y_cur[IDX_OHI]; - data[jistart + 18155] = 0.0 + k[8692]*y_cur[IDX_GOI]; - data[jistart + 18156] = 0.0 + k[8692]*y_cur[IDX_GCNI]; - data[jistart + 18157] = 0.0 + k[7146] + k[7328] + k[7510]; - data[jistart + 18158] = 0.0 + k[6523]*y_cur[IDX_HNCOII] + - k[6524]*y_cur[IDX_HOCNII]; - data[jistart + 18159] = 0.0 - k[5194]*y_cur[IDX_OCNI] - - k[5195]*y_cur[IDX_OCNI] - k[5196]*y_cur[IDX_OCNI]; - data[jistart + 18160] = 0.0 + k[5396]*y_cur[IDX_OI]; - data[jistart + 18161] = 0.0 - k[3767]*y_cur[IDX_OCNI] - - k[3768]*y_cur[IDX_OCNI]; - data[jistart + 18162] = 0.0 + k[5404]*y_cur[IDX_OI]; - data[jistart + 18163] = 0.0 + k[5267]*y_cur[IDX_NI]; - data[jistart + 18164] = 0.0 + k[1117]*y_cur[IDX_eM] + - k[6523]*y_cur[IDX_GRAINM]; - data[jistart + 18165] = 0.0 + k[5216]*y_cur[IDX_OI]; - data[jistart + 18166] = 0.0 + k[1126]*y_cur[IDX_eM] + - k[6524]*y_cur[IDX_GRAINM]; - data[jistart + 18167] = 0.0 - k[3291]*y_cur[IDX_OCNI] - - k[3292]*y_cur[IDX_OCNI]; - data[jistart + 18168] = 0.0 + k[5267]*y_cur[IDX_HCOI]; - data[jistart + 18169] = 0.0 + k[5475]*y_cur[IDX_OHI]; - data[jistart + 18170] = 0.0 + k[5085]*y_cur[IDX_CHI] + - k[5122]*y_cur[IDX_CNI] - k[5331]*y_cur[IDX_OCNI] - - k[5332]*y_cur[IDX_OCNI]; - data[jistart + 18171] = 0.0 + k[5120]*y_cur[IDX_CNI]; - data[jistart + 18172] = 0.0 + k[5216]*y_cur[IDX_HOCNI] + - k[5372]*y_cur[IDX_C7NI] + k[5377]*y_cur[IDX_C9NI] + - k[5396]*y_cur[IDX_H2CNI] + k[5404]*y_cur[IDX_HCNI] - - k[5428]*y_cur[IDX_OCNI] - k[5429]*y_cur[IDX_OCNI]; - data[jistart + 18173] = 0.0 + k[5124]*y_cur[IDX_CNI] - - k[5335]*y_cur[IDX_OCNI] - k[5336]*y_cur[IDX_OCNI]; - data[jistart + 18174] = 0.0 - k[1424]*y_cur[IDX_CII] - - k[3291]*y_cur[IDX_HeII] - k[3292]*y_cur[IDX_HeII] - - k[3767]*y_cur[IDX_H3II] - k[3768]*y_cur[IDX_H3II] - - k[4979]*y_cur[IDX_CI] - k[5194]*y_cur[IDX_HI] - - k[5195]*y_cur[IDX_HI] - k[5196]*y_cur[IDX_HI] - - k[5331]*y_cur[IDX_NOI] - k[5332]*y_cur[IDX_NOI] - - k[5335]*y_cur[IDX_O2I] - k[5336]*y_cur[IDX_O2I] - - k[5428]*y_cur[IDX_OI] - k[5429]*y_cur[IDX_OI] - k[5901] - k[6239] - - k[6964]; - data[jistart + 18175] = 0.0 + k[5460]*y_cur[IDX_CNI] + - k[5475]*y_cur[IDX_NCCNI]; - data[jistart + 18176] = 0.0 + k[1117]*y_cur[IDX_HNCOII] + - k[1126]*y_cur[IDX_HOCNII]; - data[jistart + 18177] = 0.0 + k[2270]*y_cur[IDX_CO2I] + - k[2274]*y_cur[IDX_NOI] + k[2276]*y_cur[IDX_O2I]; - data[jistart + 18178] = 0.0 + k[3486]*y_cur[IDX_NHII]; - data[jistart + 18179] = 0.0 + k[2270]*y_cur[IDX_CNII]; - data[jistart + 18180] = 0.0 - k[6495]*y_cur[IDX_OCNII]; - data[jistart + 18181] = 0.0 - k[3765]*y_cur[IDX_OCNII] - - k[3766]*y_cur[IDX_OCNII]; - data[jistart + 18182] = 0.0 + k[3264]*y_cur[IDX_HeII]; - data[jistart + 18183] = 0.0 + k[3268]*y_cur[IDX_HeII]; - data[jistart + 18184] = 0.0 + k[3264]*y_cur[IDX_HNCOI] + - k[3268]*y_cur[IDX_HOCNI]; - data[jistart + 18185] = 0.0 + k[3486]*y_cur[IDX_COI]; - data[jistart + 18186] = 0.0 + k[2274]*y_cur[IDX_CNII]; - data[jistart + 18187] = 0.0 + k[2276]*y_cur[IDX_CNII]; - data[jistart + 18188] = 0.0 - k[1176]*y_cur[IDX_eM] - - k[3765]*y_cur[IDX_H2I] - k[3766]*y_cur[IDX_H2I] - - k[6495]*y_cur[IDX_GRAINM]; - data[jistart + 18189] = 0.0 - k[1176]*y_cur[IDX_OCNII]; - data[jistart + 18190] = 0.0 - k[4980]*y_cur[IDX_OCSI]; - data[jistart + 18191] = 0.0 - k[189]*y_cur[IDX_OCSI] - - k[1425]*y_cur[IDX_OCSI]; - data[jistart + 18192] = 0.0 - k[4875]*y_cur[IDX_OCSI]; - data[jistart + 18193] = 0.0 - k[4905]*y_cur[IDX_OCSI]; - data[jistart + 18194] = 0.0 - k[1756]*y_cur[IDX_OCSI] - - k[1757]*y_cur[IDX_OCSI] - k[1758]*y_cur[IDX_OCSI]; - data[jistart + 18195] = 0.0 - k[5098]*y_cur[IDX_OCSI] + - k[5103]*y_cur[IDX_SOI]; - data[jistart + 18196] = 0.0 - k[1970]*y_cur[IDX_OCSI] - - k[1971]*y_cur[IDX_OCSI]; - data[jistart + 18197] = 0.0 - k[1992]*y_cur[IDX_OCSI] - - k[1993]*y_cur[IDX_OCSI]; - data[jistart + 18198] = 0.0 - k[2092]*y_cur[IDX_OCSI]; - data[jistart + 18199] = 0.0 - k[284]*y_cur[IDX_OCSI] - - k[2145]*y_cur[IDX_OCSI]; - data[jistart + 18200] = 0.0 + k[65]*y_cur[IDX_SM]; - data[jistart + 18201] = 0.0 - k[314]*y_cur[IDX_OCSI]; - data[jistart + 18202] = 0.0 + k[5463]*y_cur[IDX_OHI]; - data[jistart + 18203] = 0.0 + k[8714]*y_cur[IDX_GSI]; - data[jistart + 18204] = 0.0 + k[8696]*y_cur[IDX_GOI]; - data[jistart + 18205] = 0.0 + k[8696]*y_cur[IDX_GCSI]; - data[jistart + 18206] = 0.0 + k[7204] + k[7386] + k[7570]; - data[jistart + 18207] = 0.0 + k[6718]*y_cur[IDX_HOCSII]; - data[jistart + 18208] = 0.0 + k[8714]*y_cur[IDX_GCOI]; - data[jistart + 18209] = 0.0 - k[5197]*y_cur[IDX_OCSI]; - data[jistart + 18210] = 0.0 - k[407]*y_cur[IDX_OCSI] - - k[2356]*y_cur[IDX_OCSI]; - data[jistart + 18211] = 0.0 + k[2552]*y_cur[IDX_HOCSII]; - data[jistart + 18212] = 0.0 - k[475]*y_cur[IDX_OCSI]; - data[jistart + 18213] = 0.0 + k[486]*y_cur[IDX_OCSII]; - data[jistart + 18214] = 0.0 - k[2732]*y_cur[IDX_OCSI]; - data[jistart + 18215] = 0.0 + k[5486]*y_cur[IDX_SI]; - data[jistart + 18216] = 0.0 - k[2982]*y_cur[IDX_OCSI]; - data[jistart + 18217] = 0.0 + k[5409]*y_cur[IDX_OI]; - data[jistart + 18218] = 0.0 + k[1129]*y_cur[IDX_eM] + - k[2552]*y_cur[IDX_H2OI] + k[6718]*y_cur[IDX_GRAINM]; - data[jistart + 18219] = 0.0 - k[3293]*y_cur[IDX_OCSI] - - k[3294]*y_cur[IDX_OCSI] - k[3295]*y_cur[IDX_OCSI] - - k[3296]*y_cur[IDX_OCSI]; - data[jistart + 18220] = 0.0 - k[562]*y_cur[IDX_OCSI] - - k[3359]*y_cur[IDX_OCSI] - k[3360]*y_cur[IDX_OCSI]; - data[jistart + 18221] = 0.0 - k[571]*y_cur[IDX_OCSI] - - k[3365]*y_cur[IDX_OCSI]; - data[jistart + 18222] = 0.0 + k[612]*y_cur[IDX_OCSII]; - data[jistart + 18223] = 0.0 + k[5409]*y_cur[IDX_HCSI] - - k[5430]*y_cur[IDX_OCSI] - k[5431]*y_cur[IDX_OCSI]; - data[jistart + 18224] = 0.0 - k[663]*y_cur[IDX_OCSI] - - k[3649]*y_cur[IDX_OCSI]; - data[jistart + 18225] = 0.0 - k[189]*y_cur[IDX_CII] - - k[284]*y_cur[IDX_CH4II] - k[314]*y_cur[IDX_CO2II] - - k[407]*y_cur[IDX_HII] - k[475]*y_cur[IDX_H2OII] - - k[562]*y_cur[IDX_NII] - k[571]*y_cur[IDX_N2II] - - k[663]*y_cur[IDX_OII] - k[1425]*y_cur[IDX_CII] - - k[1756]*y_cur[IDX_C3HII] - k[1757]*y_cur[IDX_C3HII] - - k[1758]*y_cur[IDX_C3HII] - k[1970]*y_cur[IDX_CHII] - - k[1971]*y_cur[IDX_CHII] - k[1992]*y_cur[IDX_CH2II] - - k[1993]*y_cur[IDX_CH2II] - k[2092]*y_cur[IDX_CH3II] - - k[2145]*y_cur[IDX_CH4II] - k[2356]*y_cur[IDX_HII] - - k[2732]*y_cur[IDX_H3II] - k[2982]*y_cur[IDX_HCOII] - - k[3293]*y_cur[IDX_HeII] - k[3294]*y_cur[IDX_HeII] - - k[3295]*y_cur[IDX_HeII] - k[3296]*y_cur[IDX_HeII] - - k[3359]*y_cur[IDX_NII] - k[3360]*y_cur[IDX_NII] - - k[3365]*y_cur[IDX_N2II] - k[3649]*y_cur[IDX_OII] - - k[3813]*y_cur[IDX_PII] - k[3833]*y_cur[IDX_SII] - - k[3858]*y_cur[IDX_SOII] - k[3871]*y_cur[IDX_SiII] - - k[4875]*y_cur[IDX_C2I] - k[4905]*y_cur[IDX_C2HI] - - k[4980]*y_cur[IDX_CI] - k[5098]*y_cur[IDX_CHI] - - k[5197]*y_cur[IDX_HI] - k[5430]*y_cur[IDX_OI] - - k[5431]*y_cur[IDX_OI] - k[5902] - k[5903] - k[6240] - k[6241] - - k[7022]; - data[jistart + 18226] = 0.0 + k[486]*y_cur[IDX_H2SI] + - k[612]*y_cur[IDX_NH3I]; - data[jistart + 18227] = 0.0 + k[5463]*y_cur[IDX_CSI]; - data[jistart + 18228] = 0.0 - k[3813]*y_cur[IDX_OCSI]; - data[jistart + 18229] = 0.0 + k[5486]*y_cur[IDX_HCOI]; - data[jistart + 18230] = 0.0 - k[3833]*y_cur[IDX_OCSI]; - data[jistart + 18231] = 0.0 + k[65]*y_cur[IDX_COI]; - data[jistart + 18232] = 0.0 + k[5103]*y_cur[IDX_CHI]; - data[jistart + 18233] = 0.0 - k[3858]*y_cur[IDX_OCSI]; - data[jistart + 18234] = 0.0 - k[3871]*y_cur[IDX_OCSI]; - data[jistart + 18235] = 0.0 + k[1129]*y_cur[IDX_HOCSII]; - data[jistart + 18236] = 0.0 + k[189]*y_cur[IDX_OCSI]; - data[jistart + 18237] = 0.0 + k[284]*y_cur[IDX_OCSI]; - data[jistart + 18238] = 0.0 + k[314]*y_cur[IDX_OCSI]; - data[jistart + 18239] = 0.0 + k[3672]*y_cur[IDX_O2I]; - data[jistart + 18240] = 0.0 - k[6706]*y_cur[IDX_OCSII] - - k[6707]*y_cur[IDX_OCSII] - k[6708]*y_cur[IDX_OCSII]; - data[jistart + 18241] = 0.0 + k[407]*y_cur[IDX_OCSI]; - data[jistart + 18242] = 0.0 + k[475]*y_cur[IDX_OCSI]; - data[jistart + 18243] = 0.0 - k[486]*y_cur[IDX_OCSII]; - data[jistart + 18244] = 0.0 + k[3738]*y_cur[IDX_OI]; - data[jistart + 18245] = 0.0 + k[562]*y_cur[IDX_OCSI]; - data[jistart + 18246] = 0.0 + k[571]*y_cur[IDX_OCSI]; - data[jistart + 18247] = 0.0 - k[612]*y_cur[IDX_OCSII]; - data[jistart + 18248] = 0.0 + k[3738]*y_cur[IDX_HCSII]; - data[jistart + 18249] = 0.0 + k[663]*y_cur[IDX_OCSI]; - data[jistart + 18250] = 0.0 + k[3672]*y_cur[IDX_CSII]; - data[jistart + 18251] = 0.0 + k[189]*y_cur[IDX_CII] + - k[284]*y_cur[IDX_CH4II] + k[314]*y_cur[IDX_CO2II] + - k[407]*y_cur[IDX_HII] + k[475]*y_cur[IDX_H2OII] + - k[562]*y_cur[IDX_NII] + k[571]*y_cur[IDX_N2II] + - k[663]*y_cur[IDX_OII] + k[5902] + k[6240]; - data[jistart + 18252] = 0.0 - k[486]*y_cur[IDX_H2SI] - - k[612]*y_cur[IDX_NH3I] - k[1177]*y_cur[IDX_eM] - - k[1178]*y_cur[IDX_eM] - k[1179]*y_cur[IDX_eM] - - k[6706]*y_cur[IDX_GRAINM] - k[6707]*y_cur[IDX_GRAINM] - - k[6708]*y_cur[IDX_GRAINM]; - data[jistart + 18253] = 0.0 - k[1177]*y_cur[IDX_OCSII] - - k[1178]*y_cur[IDX_OCSII] - k[1179]*y_cur[IDX_OCSII]; - data[jistart + 18254] = 0.0 + k[1899]*y_cur[IDX_H2OII] - - k[4981]*y_cur[IDX_OHI] - k[4982]*y_cur[IDX_OHI] + - k[5217]*y_cur[IDX_HONCI]; - data[jistart + 18255] = 0.0 - k[1426]*y_cur[IDX_OHI] + - k[4797]*y_cur[IDX_OHM]; - data[jistart + 18256] = 0.0 - k[9]*y_cur[IDX_OHI]; - data[jistart + 18257] = 0.0 + k[685]*y_cur[IDX_OHII] + - k[2503]*y_cur[IDX_H2OII]; - data[jistart + 18258] = 0.0 - k[697]*y_cur[IDX_OHI] + - k[2519]*y_cur[IDX_H2OI]; - data[jistart + 18259] = 0.0 + k[686]*y_cur[IDX_OHII] + - k[2504]*y_cur[IDX_H2OII]; - data[jistart + 18260] = 0.0 - k[5453]*y_cur[IDX_OHI] - - k[5454]*y_cur[IDX_OHI] - k[5455]*y_cur[IDX_OHI]; - data[jistart + 18261] = 0.0 - k[3796]*y_cur[IDX_OHI] + - k[4798]*y_cur[IDX_OHM]; - data[jistart + 18262] = 0.0 - k[5456]*y_cur[IDX_OHI] - - k[5586]*y_cur[IDX_OHI]; - data[jistart + 18263] = 0.0 + k[4799]*y_cur[IDX_OHM]; - data[jistart + 18264] = 0.0 + k[3633]*y_cur[IDX_OII] + - k[3847]*y_cur[IDX_SOII] + k[5346]*y_cur[IDX_OI]; - data[jistart + 18265] = 0.0 - k[5457]*y_cur[IDX_OHI] - - k[5458]*y_cur[IDX_OHI]; - data[jistart + 18266] = 0.0 - k[4886]*y_cur[IDX_OHI] - - k[4887]*y_cur[IDX_OHI]; - data[jistart + 18267] = 0.0 + k[3085]*y_cur[IDX_HeII] + k[5706] + - k[5991]; - data[jistart + 18268] = 0.0 + k[772]*y_cur[IDX_eM] + - k[6576]*y_cur[IDX_GRAINM]; - data[jistart + 18269] = 0.0 + k[776]*y_cur[IDX_eM] + - k[6608]*y_cur[IDX_GRAINM]; - data[jistart + 18270] = 0.0 + k[687]*y_cur[IDX_OHII] + - k[3771]*y_cur[IDX_OHII]; - data[jistart + 18271] = 0.0 + k[2525]*y_cur[IDX_H2OI]; - data[jistart + 18272] = 0.0 + k[2527]*y_cur[IDX_H2OI]; - data[jistart + 18273] = 0.0 + k[2531]*y_cur[IDX_H2OI]; - data[jistart + 18274] = 0.0 + k[4800]*y_cur[IDX_OHM]; - data[jistart + 18275] = 0.0 + k[4801]*y_cur[IDX_OHM]; - data[jistart + 18276] = 0.0 + k[4802]*y_cur[IDX_OHM]; - data[jistart + 18277] = 0.0 + k[297]*y_cur[IDX_OHII] + - k[2247]*y_cur[IDX_H2OII] + k[5090]*y_cur[IDX_O2I] + - k[5091]*y_cur[IDX_O2I] + k[5094]*y_cur[IDX_O2HI] + - k[5097]*y_cur[IDX_OI] - k[5099]*y_cur[IDX_OHI]; - data[jistart + 18278] = 0.0 + k[1966]*y_cur[IDX_O2I] - - k[1972]*y_cur[IDX_OHI]; - data[jistart + 18279] = 0.0 + k[268]*y_cur[IDX_OHII] + - k[2003]*y_cur[IDX_H2OII] + k[5004]*y_cur[IDX_NOI] + - k[5011]*y_cur[IDX_O2I] + k[5015]*y_cur[IDX_OI] - - k[5016]*y_cur[IDX_OHI] - k[5017]*y_cur[IDX_OHI] - - k[5018]*y_cur[IDX_OHI]; - data[jistart + 18280] = 0.0 + k[1990]*y_cur[IDX_O2I]; - data[jistart + 18281] = 0.0 + k[4803]*y_cur[IDX_OHM]; - data[jistart + 18282] = 0.0 + k[5638]*y_cur[IDX_HeII] + k[5937] + - k[6290]; - data[jistart + 18283] = 0.0 + k[1275]*y_cur[IDX_eM] + - k[6701]*y_cur[IDX_GRAINM]; - data[jistart + 18284] = 0.0 + k[1272]*y_cur[IDX_eM] + - k[6696]*y_cur[IDX_GRAINM]; - data[jistart + 18285] = 0.0 + k[5031]*y_cur[IDX_H2OI] + - k[5039]*y_cur[IDX_O2I] - k[5045]*y_cur[IDX_OHI] - - k[5046]*y_cur[IDX_OHI] - k[5047]*y_cur[IDX_OHI]; - data[jistart + 18286] = 0.0 - k[2093]*y_cur[IDX_OHI] + - k[4804]*y_cur[IDX_OHM]; - data[jistart + 18287] = 0.0 + k[3659]*y_cur[IDX_O2II] - - k[5055]*y_cur[IDX_OHI] - k[5056]*y_cur[IDX_OHI]; - data[jistart + 18288] = 0.0 + k[5674]*y_cur[IDX_HeII] + k[5947] + - k[6296]; - data[jistart + 18289] = 0.0 + k[1284]*y_cur[IDX_eM] + - k[1287]*y_cur[IDX_eM] + k[1289]*y_cur[IDX_eM] + - k[6711]*y_cur[IDX_GRAINM] + k[6714]*y_cur[IDX_GRAINM] + - k[6716]*y_cur[IDX_GRAINM]; - data[jistart + 18290] = 0.0 + k[1290]*y_cur[IDX_eM] + - k[1292]*y_cur[IDX_eM] + k[6731]*y_cur[IDX_GRAINM] + - k[6733]*y_cur[IDX_GRAINM]; - data[jistart + 18291] = 0.0 + k[3197]*y_cur[IDX_HeII] + - k[3637]*y_cur[IDX_OII] + k[5819] + k[6124]; - data[jistart + 18292] = 0.0 + k[962]*y_cur[IDX_eM] + - k[6430]*y_cur[IDX_GRAINM]; - data[jistart + 18293] = 0.0 + k[965]*y_cur[IDX_eM] + - k[6442]*y_cur[IDX_GRAINM]; - data[jistart + 18294] = 0.0 + k[3638]*y_cur[IDX_OII] - - k[5061]*y_cur[IDX_OHI] + k[5385]*y_cur[IDX_OI]; - data[jistart + 18295] = 0.0 + k[3727]*y_cur[IDX_OI]; - data[jistart + 18296] = 0.0 - k[3797]*y_cur[IDX_OHI]; - data[jistart + 18297] = 0.0 + k[696]*y_cur[IDX_OHM] - - k[5459]*y_cur[IDX_OHI] - k[5460]*y_cur[IDX_OHI]; - data[jistart + 18298] = 0.0 - k[698]*y_cur[IDX_OHI] + - k[2536]*y_cur[IDX_H2OI]; - data[jistart + 18299] = 0.0 + k[4805]*y_cur[IDX_OHM]; - data[jistart + 18300] = 0.0 + k[5161]*y_cur[IDX_HI]; - data[jistart + 18301] = 0.0 + k[2507]*y_cur[IDX_H2OII] + - k[5131]*y_cur[IDX_O2HI] + k[5163]*y_cur[IDX_HI] - - k[5461]*y_cur[IDX_OHI]; - data[jistart + 18302] = 0.0 - k[699]*y_cur[IDX_OHI] + - k[2540]*y_cur[IDX_H2OI] - k[3798]*y_cur[IDX_OHI]; - data[jistart + 18303] = 0.0 + k[5162]*y_cur[IDX_HI]; - data[jistart + 18304] = 0.0 + k[2541]*y_cur[IDX_H2OI]; - data[jistart + 18305] = 0.0 + k[5647]*y_cur[IDX_HeII] + k[5939] + - k[6292]; - data[jistart + 18306] = 0.0 - k[5462]*y_cur[IDX_OHI] - - k[5463]*y_cur[IDX_OHI]; - data[jistart + 18307] = 0.0 + k[5151]*y_cur[IDX_H2OI] - - k[5464]*y_cur[IDX_OHI]; - data[jistart + 18308] = 0.0 + k[4806]*y_cur[IDX_OHM]; - data[jistart + 18309] = 0.0 + k[8583]*y_cur[IDX_GOI]; - data[jistart + 18310] = 0.0 + k[8583]*y_cur[IDX_GHI]; - data[jistart + 18311] = 0.0 + k[7083] + k[7265] + k[7447]; - data[jistart + 18312] = 0.0 + k[6342]*y_cur[IDX_H2OII] + - k[6345]*y_cur[IDX_H3OII] + k[6346]*y_cur[IDX_H3OII] + - k[6414]*y_cur[IDX_H3COII] + k[6430]*y_cur[IDX_CH3OHII] + - k[6442]*y_cur[IDX_CH3OH2II] + k[6521]*y_cur[IDX_HONCII] + - k[6525]*y_cur[IDX_HOCNII] + k[6532]*y_cur[IDX_HCNOHII] + - k[6556]*y_cur[IDX_SiOHII] + k[6559]*y_cur[IDX_HN2OII] + - k[6568]*y_cur[IDX_HCO2II] + k[6575]*y_cur[IDX_HCOOHII] + - k[6576]*y_cur[IDX_C2H5OHII] + k[6585]*y_cur[IDX_H2SiOII] + - k[6608]*y_cur[IDX_C2H5OH2II] + k[6610]*y_cur[IDX_HCOOH2II] + - k[6623]*y_cur[IDX_H2POII] + k[6696]*y_cur[IDX_CH2OHCOII] + - k[6701]*y_cur[IDX_CH2OHCHOII] + k[6711]*y_cur[IDX_CH3COOHII] + - k[6714]*y_cur[IDX_CH3COOHII] + k[6716]*y_cur[IDX_CH3COOHII] + - k[6717]*y_cur[IDX_HOCSII] + k[6724]*y_cur[IDX_HSiO2II] + - k[6731]*y_cur[IDX_CH3COOH2II] + k[6733]*y_cur[IDX_CH3COOH2II] + - k[6757]*y_cur[IDX_HSO2II]; - data[jistart + 18313] = 0.0 + k[107]*y_cur[IDX_OM] + - k[143]*y_cur[IDX_H2OI] - k[145]*y_cur[IDX_OHI] + - k[2846]*y_cur[IDX_NO2II] + k[2847]*y_cur[IDX_SO2II] + - k[5161]*y_cur[IDX_CNOI] + k[5162]*y_cur[IDX_CO2I] + - k[5163]*y_cur[IDX_COI] + k[5166]*y_cur[IDX_H2O2I] + - k[5168]*y_cur[IDX_H2OI] + k[5177]*y_cur[IDX_HNOI] + - k[5179]*y_cur[IDX_N2OI] + k[5185]*y_cur[IDX_NO2I] + - k[5187]*y_cur[IDX_NOI] + k[5190]*y_cur[IDX_O2I] + - k[5193]*y_cur[IDX_O2HI] + k[5193]*y_cur[IDX_O2HI] + - k[5196]*y_cur[IDX_OCNI] - k[5198]*y_cur[IDX_OHI] + - k[5201]*y_cur[IDX_SOI] + k[5573]*y_cur[IDX_OI] - - k[5574]*y_cur[IDX_OHI]; - data[jistart + 18314] = 0.0 - k[408]*y_cur[IDX_OHI] + - k[2355]*y_cur[IDX_NO2I] + k[4807]*y_cur[IDX_OHM]; - data[jistart + 18315] = 0.0 + k[80]*y_cur[IDX_OI] - - k[81]*y_cur[IDX_OHI]; - data[jistart + 18316] = 0.0 + k[136]*y_cur[IDX_H2OI] - - k[139]*y_cur[IDX_OHI] + k[5145]*y_cur[IDX_O2I] + - k[5145]*y_cur[IDX_O2I] + k[5147]*y_cur[IDX_OI] - - k[5148]*y_cur[IDX_OHI]; - data[jistart + 18317] = 0.0 - k[456]*y_cur[IDX_OHI] - - k[2397]*y_cur[IDX_OHI]; - data[jistart + 18318] = 0.0 + k[688]*y_cur[IDX_OHII] + - k[2508]*y_cur[IDX_H2OII] + k[3641]*y_cur[IDX_OII] + - k[5397]*y_cur[IDX_OI] - k[5465]*y_cur[IDX_OHI] - - k[5466]*y_cur[IDX_OHI]; - data[jistart + 18319] = 0.0 + k[4808]*y_cur[IDX_OHM]; - data[jistart + 18320] = 0.0 + k[136]*y_cur[IDX_H2I] + - k[143]*y_cur[IDX_HI] + k[689]*y_cur[IDX_OHII] + - k[2509]*y_cur[IDX_H2OII] + k[2519]*y_cur[IDX_C2II] + - k[2525]*y_cur[IDX_C2NII] + k[2527]*y_cur[IDX_C2N2II] + - k[2531]*y_cur[IDX_C3OII] + k[2536]*y_cur[IDX_CNII] + - k[2540]*y_cur[IDX_COII] + k[2541]*y_cur[IDX_CO2II] + - k[2557]*y_cur[IDX_N2II] + k[2559]*y_cur[IDX_N2OII] + - k[3226]*y_cur[IDX_HeII] + k[3492]*y_cur[IDX_NHII] + - k[3513]*y_cur[IDX_NH2II] + k[3550]*y_cur[IDX_NH3II] + - k[5031]*y_cur[IDX_CH3I] + k[5151]*y_cur[IDX_FI] + - k[5152]*y_cur[IDX_O2HI] + k[5168]*y_cur[IDX_HI] + - k[5306]*y_cur[IDX_NHI] + k[5399]*y_cur[IDX_OI] + - k[5399]*y_cur[IDX_OI] + k[5839] + k[6160]; - data[jistart + 18321] = 0.0 + k[1014]*y_cur[IDX_eM] + - k[1899]*y_cur[IDX_CI] + k[2003]*y_cur[IDX_CH2I] + - k[2247]*y_cur[IDX_CHI] + k[2503]*y_cur[IDX_C2I] + - k[2504]*y_cur[IDX_C2HI] + k[2507]*y_cur[IDX_COI] + - k[2508]*y_cur[IDX_H2COI] + k[2509]*y_cur[IDX_H2OI] + - k[2510]*y_cur[IDX_H2SI] + k[2512]*y_cur[IDX_HCNI] + - k[2514]*y_cur[IDX_HCOI] + k[2515]*y_cur[IDX_HNCI] + - k[2516]*y_cur[IDX_SI] + k[2518]*y_cur[IDX_SO2I] + - k[3536]*y_cur[IDX_NH2I] + k[3575]*y_cur[IDX_NH3I] - - k[3799]*y_cur[IDX_OHI] + k[6342]*y_cur[IDX_GRAINM]; - data[jistart + 18322] = 0.0 + k[5166]*y_cur[IDX_HI] + - k[5398]*y_cur[IDX_OI] - k[5467]*y_cur[IDX_OHI] + k[5838] + k[5838] + - k[6158] + k[6158]; - data[jistart + 18323] = 0.0 + k[1018]*y_cur[IDX_eM] + - k[6623]*y_cur[IDX_GRAINM]; - data[jistart + 18324] = 0.0 + k[690]*y_cur[IDX_OHII] + - k[2510]*y_cur[IDX_H2OII] + k[3642]*y_cur[IDX_OII] + - k[5400]*y_cur[IDX_OI] - k[5468]*y_cur[IDX_OHI]; - data[jistart + 18325] = 0.0 + k[3734]*y_cur[IDX_OI] + - k[4809]*y_cur[IDX_OHM]; - data[jistart + 18326] = 0.0 + k[1023]*y_cur[IDX_eM] + - k[6585]*y_cur[IDX_GRAINM]; - data[jistart + 18327] = 0.0 + k[2725]*y_cur[IDX_NO2I] - - k[2733]*y_cur[IDX_OHI] + k[4810]*y_cur[IDX_OHM]; - data[jistart + 18328] = 0.0 + k[1034]*y_cur[IDX_eM] + - k[6414]*y_cur[IDX_GRAINM]; - data[jistart + 18329] = 0.0 + k[1043]*y_cur[IDX_eM] + - k[1044]*y_cur[IDX_eM] + k[4811]*y_cur[IDX_OHM] + - k[6345]*y_cur[IDX_GRAINM] + k[6346]*y_cur[IDX_GRAINM]; - data[jistart + 18330] = 0.0 + k[4812]*y_cur[IDX_OHM]; - data[jistart + 18331] = 0.0 + k[2512]*y_cur[IDX_H2OII] + - k[3653]*y_cur[IDX_OM] + k[5402]*y_cur[IDX_OI] - - k[5469]*y_cur[IDX_OHI] - k[5470]*y_cur[IDX_OHI]; - data[jistart + 18332] = 0.0 - k[3800]*y_cur[IDX_OHI]; - data[jistart + 18333] = 0.0 + k[4813]*y_cur[IDX_OHM] + - k[4814]*y_cur[IDX_OHM]; - data[jistart + 18334] = 0.0 + k[1094]*y_cur[IDX_eM] + - k[6532]*y_cur[IDX_GRAINM]; - data[jistart + 18335] = 0.0 + k[691]*y_cur[IDX_OHII] + - k[2514]*y_cur[IDX_H2OII] + k[5208]*y_cur[IDX_O2I] + - k[5406]*y_cur[IDX_OI] - k[5471]*y_cur[IDX_OHI]; - data[jistart + 18336] = 0.0 - k[3801]*y_cur[IDX_OHI] - - k[3802]*y_cur[IDX_OHI] + k[4815]*y_cur[IDX_OHM] + - k[4816]*y_cur[IDX_OHM]; - data[jistart + 18337] = 0.0 + k[1100]*y_cur[IDX_eM] + - k[6568]*y_cur[IDX_GRAINM]; - data[jistart + 18338] = 0.0 + k[5860] + k[6187]; - data[jistart + 18339] = 0.0 + k[1102]*y_cur[IDX_eM] + - k[6575]*y_cur[IDX_GRAINM]; - data[jistart + 18340] = 0.0 + k[1103]*y_cur[IDX_eM] + - k[6610]*y_cur[IDX_GRAINM]; - data[jistart + 18341] = 0.0 + k[1114]*y_cur[IDX_eM] + - k[6559]*y_cur[IDX_GRAINM]; - data[jistart + 18342] = 0.0 + k[2515]*y_cur[IDX_H2OII]; - data[jistart + 18343] = 0.0 + k[5177]*y_cur[IDX_HI] + - k[5326]*y_cur[IDX_NOI] + k[5412]*y_cur[IDX_OI] - - k[5472]*y_cur[IDX_OHI]; - data[jistart + 18344] = 0.0 - k[3803]*y_cur[IDX_OHI]; - data[jistart + 18345] = 0.0 + k[5216]*y_cur[IDX_OI] + k[5871] + - k[6202]; - data[jistart + 18346] = 0.0 + k[1127]*y_cur[IDX_eM] + - k[6525]*y_cur[IDX_GRAINM]; - data[jistart + 18347] = 0.0 + k[1128]*y_cur[IDX_eM] + - k[6717]*y_cur[IDX_GRAINM]; - data[jistart + 18348] = 0.0 + k[5217]*y_cur[IDX_CI] + - k[5218]*y_cur[IDX_OI] + k[5872] + k[6203]; - data[jistart + 18349] = 0.0 + k[1131]*y_cur[IDX_eM] + - k[6521]*y_cur[IDX_GRAINM]; - data[jistart + 18350] = 0.0 + k[5414]*y_cur[IDX_OI]; - data[jistart + 18351] = 0.0 + k[5415]*y_cur[IDX_OI]; - data[jistart + 18352] = 0.0 + k[3742]*y_cur[IDX_OI]; - data[jistart + 18353] = 0.0 + k[1144]*y_cur[IDX_eM] + - k[6757]*y_cur[IDX_GRAINM]; - data[jistart + 18354] = 0.0 + k[1146]*y_cur[IDX_eM] + - k[6724]*y_cur[IDX_GRAINM]; - data[jistart + 18355] = 0.0 + k[3085]*y_cur[IDX_C2H5OHI] + - k[3197]*y_cur[IDX_CH3OHI] + k[3226]*y_cur[IDX_H2OI] - - k[3297]*y_cur[IDX_OHI] + k[4817]*y_cur[IDX_OHM] + - k[5638]*y_cur[IDX_CH2OHI] + k[5647]*y_cur[IDX_COOHI] + - k[5674]*y_cur[IDX_CH3COOHI]; - data[jistart + 18356] = 0.0 + k[4818]*y_cur[IDX_OHM]; - data[jistart + 18357] = 0.0 - k[5283]*y_cur[IDX_OHI] - - k[5284]*y_cur[IDX_OHI]; - data[jistart + 18358] = 0.0 - k[563]*y_cur[IDX_OHI] + - k[4819]*y_cur[IDX_OHM]; - data[jistart + 18359] = 0.0 - k[700]*y_cur[IDX_OHI] + - k[2557]*y_cur[IDX_H2OI]; - data[jistart + 18360] = 0.0 - k[3804]*y_cur[IDX_OHI] + - k[4820]*y_cur[IDX_OHM]; - data[jistart + 18361] = 0.0 + k[5179]*y_cur[IDX_HI] - - k[5473]*y_cur[IDX_OHI] - k[5474]*y_cur[IDX_OHI]; - data[jistart + 18362] = 0.0 + k[2559]*y_cur[IDX_H2OI]; - data[jistart + 18363] = 0.0 - k[5475]*y_cur[IDX_OHI]; - data[jistart + 18364] = 0.0 + k[5306]*y_cur[IDX_H2OI] + - k[5312]*y_cur[IDX_NO2I] + k[5314]*y_cur[IDX_NOI] + - k[5317]*y_cur[IDX_O2I] + k[5320]*y_cur[IDX_OI] - - k[5321]*y_cur[IDX_OHI] - k[5322]*y_cur[IDX_OHI] - - k[5323]*y_cur[IDX_OHI]; - data[jistart + 18365] = 0.0 + k[3492]*y_cur[IDX_H2OI] + - k[3501]*y_cur[IDX_O2I] - k[3504]*y_cur[IDX_OHI]; - data[jistart + 18366] = 0.0 + k[591]*y_cur[IDX_OHII] + - k[3536]*y_cur[IDX_H2OII] + k[5299]*y_cur[IDX_NOI] - - k[5300]*y_cur[IDX_OHI] - k[5301]*y_cur[IDX_OHI] + - k[5421]*y_cur[IDX_OI]; - data[jistart + 18367] = 0.0 + k[3513]*y_cur[IDX_H2OI] + - k[3525]*y_cur[IDX_O2I]; - data[jistart + 18368] = 0.0 + k[692]*y_cur[IDX_OHII] + - k[3575]*y_cur[IDX_H2OII] + k[5422]*y_cur[IDX_OI] - - k[5476]*y_cur[IDX_OHI]; - data[jistart + 18369] = 0.0 + k[3550]*y_cur[IDX_H2OI] - - k[3805]*y_cur[IDX_OHI] + k[4821]*y_cur[IDX_OHM]; - data[jistart + 18370] = 0.0 + k[4822]*y_cur[IDX_OHM]; - data[jistart + 18371] = 0.0 + k[693]*y_cur[IDX_OHII] + - k[5004]*y_cur[IDX_CH2I] + k[5187]*y_cur[IDX_HI] + - k[5299]*y_cur[IDX_NH2I] + k[5314]*y_cur[IDX_NHI] + - k[5326]*y_cur[IDX_HNOI] - k[5477]*y_cur[IDX_OHI]; - data[jistart + 18372] = 0.0 + k[4823]*y_cur[IDX_OHM]; - data[jistart + 18373] = 0.0 + k[2355]*y_cur[IDX_HII] + - k[2725]*y_cur[IDX_H3II] + k[5185]*y_cur[IDX_HI] + - k[5312]*y_cur[IDX_NHI]; - data[jistart + 18374] = 0.0 + k[2846]*y_cur[IDX_HI]; - data[jistart + 18375] = 0.0 + k[4824]*y_cur[IDX_OHM]; - data[jistart + 18376] = 0.0 + k[80]*y_cur[IDX_HM] + - k[3727]*y_cur[IDX_CH4II] + k[3734]*y_cur[IDX_H2SII] + - k[3742]*y_cur[IDX_HSII] + k[5015]*y_cur[IDX_CH2I] + - k[5097]*y_cur[IDX_CHI] + k[5147]*y_cur[IDX_H2I] + - k[5216]*y_cur[IDX_HOCNI] + k[5218]*y_cur[IDX_HONCI] + - k[5320]*y_cur[IDX_NHI] + k[5346]*y_cur[IDX_C2H4I] + - k[5385]*y_cur[IDX_CH4I] + k[5397]*y_cur[IDX_H2COI] + - k[5398]*y_cur[IDX_H2O2I] + k[5399]*y_cur[IDX_H2OI] + - k[5399]*y_cur[IDX_H2OI] + k[5400]*y_cur[IDX_H2SI] + - k[5402]*y_cur[IDX_HCNI] + k[5406]*y_cur[IDX_HCOI] + - k[5412]*y_cur[IDX_HNOI] + k[5414]*y_cur[IDX_HPOI] + - k[5415]*y_cur[IDX_HSI] + k[5421]*y_cur[IDX_NH2I] + - k[5422]*y_cur[IDX_NH3I] + k[5427]*y_cur[IDX_O2HI] - - k[5432]*y_cur[IDX_OHI] + k[5434]*y_cur[IDX_PH2I] + - k[5448]*y_cur[IDX_SiH4I] + k[5573]*y_cur[IDX_HI]; - data[jistart + 18377] = 0.0 - k[664]*y_cur[IDX_OHI] + - k[3633]*y_cur[IDX_C2H4I] + k[3637]*y_cur[IDX_CH3OHI] + - k[3638]*y_cur[IDX_CH4I] + k[3641]*y_cur[IDX_H2COI] + - k[3642]*y_cur[IDX_H2SI] - k[3650]*y_cur[IDX_OHI] + - k[4825]*y_cur[IDX_OHM]; - data[jistart + 18378] = 0.0 + k[107]*y_cur[IDX_HI] + - k[3653]*y_cur[IDX_HCNI]; - data[jistart + 18379] = 0.0 + k[694]*y_cur[IDX_OHII] + - k[1966]*y_cur[IDX_CHII] + k[1990]*y_cur[IDX_CH2II] + - k[3501]*y_cur[IDX_NHII] + k[3525]*y_cur[IDX_NH2II] + - k[3818]*y_cur[IDX_PHII] + k[3882]*y_cur[IDX_SiH2II] + - k[5011]*y_cur[IDX_CH2I] + k[5039]*y_cur[IDX_CH3I] + - k[5090]*y_cur[IDX_CHI] + k[5091]*y_cur[IDX_CHI] + - k[5145]*y_cur[IDX_H2I] + k[5145]*y_cur[IDX_H2I] + - k[5190]*y_cur[IDX_HI] + k[5208]*y_cur[IDX_HCOI] + - k[5317]*y_cur[IDX_NHI]; - data[jistart + 18380] = 0.0 + k[3659]*y_cur[IDX_CH3CHCH2I]; - data[jistart + 18381] = 0.0 + k[5094]*y_cur[IDX_CHI] + - k[5131]*y_cur[IDX_COI] + k[5152]*y_cur[IDX_H2OI] + - k[5193]*y_cur[IDX_HI] + k[5193]*y_cur[IDX_HI] + - k[5427]*y_cur[IDX_OI] - k[5478]*y_cur[IDX_OHI] + k[6238]; - data[jistart + 18382] = 0.0 - k[3806]*y_cur[IDX_OHI]; - data[jistart + 18383] = 0.0 + k[5196]*y_cur[IDX_HI]; - data[jistart + 18384] = 0.0 - k[9]*y_cur[IDX_CM] - - k[81]*y_cur[IDX_HM] - k[139]*y_cur[IDX_H2I] - k[145]*y_cur[IDX_HI] - - k[408]*y_cur[IDX_HII] - k[456]*y_cur[IDX_H2II] - - k[563]*y_cur[IDX_NII] - k[664]*y_cur[IDX_OII] - - k[697]*y_cur[IDX_C2II] - k[698]*y_cur[IDX_CNII] - - k[699]*y_cur[IDX_COII] - k[700]*y_cur[IDX_N2II] - - k[1426]*y_cur[IDX_CII] - k[1972]*y_cur[IDX_CHII] - - k[2093]*y_cur[IDX_CH3II] - k[2397]*y_cur[IDX_H2II] - - k[2733]*y_cur[IDX_H3II] - k[3297]*y_cur[IDX_HeII] - - k[3504]*y_cur[IDX_NHII] - k[3650]*y_cur[IDX_OII] - - k[3788]*y_cur[IDX_OHII] - k[3796]*y_cur[IDX_C2H2II] - - k[3797]*y_cur[IDX_CH5II] - k[3798]*y_cur[IDX_COII] - - k[3799]*y_cur[IDX_H2OII] - k[3800]*y_cur[IDX_HCNII] - - k[3801]*y_cur[IDX_HCOII] - k[3802]*y_cur[IDX_HCOII] - - k[3803]*y_cur[IDX_HNOII] - k[3804]*y_cur[IDX_N2HII] - - k[3805]*y_cur[IDX_NH3II] - k[3806]*y_cur[IDX_O2HII] - - k[3807]*y_cur[IDX_PII] - k[3808]*y_cur[IDX_SII] - - k[3809]*y_cur[IDX_SiII] - k[4886]*y_cur[IDX_C2H5CNI] - - k[4887]*y_cur[IDX_C2H5CNI] - k[4981]*y_cur[IDX_CI] - - k[4982]*y_cur[IDX_CI] - k[5016]*y_cur[IDX_CH2I] - - k[5017]*y_cur[IDX_CH2I] - k[5018]*y_cur[IDX_CH2I] - - k[5045]*y_cur[IDX_CH3I] - k[5046]*y_cur[IDX_CH3I] - - k[5047]*y_cur[IDX_CH3I] - k[5055]*y_cur[IDX_CH3CHCH2I] - - k[5056]*y_cur[IDX_CH3CHCH2I] - k[5061]*y_cur[IDX_CH4I] - - k[5099]*y_cur[IDX_CHI] - k[5148]*y_cur[IDX_H2I] - - k[5198]*y_cur[IDX_HI] - k[5283]*y_cur[IDX_NI] - - k[5284]*y_cur[IDX_NI] - k[5300]*y_cur[IDX_NH2I] - - k[5301]*y_cur[IDX_NH2I] - k[5321]*y_cur[IDX_NHI] - - k[5322]*y_cur[IDX_NHI] - k[5323]*y_cur[IDX_NHI] - - k[5432]*y_cur[IDX_OI] - k[5453]*y_cur[IDX_C2H2I] - - k[5454]*y_cur[IDX_C2H2I] - k[5455]*y_cur[IDX_C2H2I] - - k[5456]*y_cur[IDX_C2H3I] - k[5457]*y_cur[IDX_C2H5I] - - k[5458]*y_cur[IDX_C2H5I] - k[5459]*y_cur[IDX_CNI] - - k[5460]*y_cur[IDX_CNI] - k[5461]*y_cur[IDX_COI] - - k[5462]*y_cur[IDX_CSI] - k[5463]*y_cur[IDX_CSI] - - k[5464]*y_cur[IDX_FI] - k[5465]*y_cur[IDX_H2COI] - - k[5466]*y_cur[IDX_H2COI] - k[5467]*y_cur[IDX_H2O2I] - - k[5468]*y_cur[IDX_H2SI] - k[5469]*y_cur[IDX_HCNI] - - k[5470]*y_cur[IDX_HCNI] - k[5471]*y_cur[IDX_HCOI] - - k[5472]*y_cur[IDX_HNOI] - k[5473]*y_cur[IDX_N2OI] - - k[5474]*y_cur[IDX_N2OI] - k[5475]*y_cur[IDX_NCCNI] - - k[5476]*y_cur[IDX_NH3I] - k[5477]*y_cur[IDX_NOI] - - k[5478]*y_cur[IDX_O2HI] - k[5479]*y_cur[IDX_OHI] - - k[5479]*y_cur[IDX_OHI] - k[5479]*y_cur[IDX_OHI] - - k[5479]*y_cur[IDX_OHI] - k[5480]*y_cur[IDX_SI] - - k[5481]*y_cur[IDX_SOI] - k[5482]*y_cur[IDX_SiI] - - k[5483]*y_cur[IDX_SiOI] - k[5574]*y_cur[IDX_HI] - - k[5586]*y_cur[IDX_C2H3I] - k[5905] - k[6244] - k[6245] - k[6901]; - data[jistart + 18385] = 0.0 + k[268]*y_cur[IDX_CH2I] + - k[297]*y_cur[IDX_CHI] + k[591]*y_cur[IDX_NH2I] + - k[685]*y_cur[IDX_C2I] + k[686]*y_cur[IDX_C2HI] + - k[687]*y_cur[IDX_C2H6I] + k[688]*y_cur[IDX_H2COI] + - k[689]*y_cur[IDX_H2OI] + k[690]*y_cur[IDX_H2SI] + - k[691]*y_cur[IDX_HCOI] + k[692]*y_cur[IDX_NH3I] + - k[693]*y_cur[IDX_NOI] + k[694]*y_cur[IDX_O2I] + k[695]*y_cur[IDX_SI] - + k[3771]*y_cur[IDX_C2H6I] - k[3788]*y_cur[IDX_OHI]; - data[jistart + 18386] = 0.0 + k[696]*y_cur[IDX_CNI] + - k[4797]*y_cur[IDX_CII] + k[4798]*y_cur[IDX_C2H2II] + - k[4799]*y_cur[IDX_C2H3II] + k[4800]*y_cur[IDX_C4H2II] + - k[4801]*y_cur[IDX_C4H3II] + k[4802]*y_cur[IDX_C4SII] + - k[4803]*y_cur[IDX_CH2CCHII] + k[4804]*y_cur[IDX_CH3II] + - k[4805]*y_cur[IDX_CNCII] + k[4806]*y_cur[IDX_FeII] + - k[4807]*y_cur[IDX_HII] + k[4808]*y_cur[IDX_H2COII] + - k[4809]*y_cur[IDX_H2SII] + k[4810]*y_cur[IDX_H3II] + - k[4811]*y_cur[IDX_H3OII] + k[4812]*y_cur[IDX_HC2SII] + - k[4813]*y_cur[IDX_HCNHII] + k[4814]*y_cur[IDX_HCNHII] + - k[4815]*y_cur[IDX_HCOII] + k[4816]*y_cur[IDX_HCOII] + - k[4817]*y_cur[IDX_HeII] + k[4818]*y_cur[IDX_MgII] + - k[4819]*y_cur[IDX_NII] + k[4820]*y_cur[IDX_N2HII] + - k[4821]*y_cur[IDX_NH3II] + k[4822]*y_cur[IDX_NH4II] + - k[4823]*y_cur[IDX_NOII] + k[4824]*y_cur[IDX_NaII] + - k[4825]*y_cur[IDX_OII] + k[4826]*y_cur[IDX_SII] + - k[4827]*y_cur[IDX_SOII] + k[4828]*y_cur[IDX_SiII] + - k[4829]*y_cur[IDX_SiOII] + k[4830]*y_cur[IDX_SiOHII] + - k[4831]*y_cur[IDX_SiSII] + k[5904] + k[6243]; - data[jistart + 18387] = 0.0 - k[3807]*y_cur[IDX_OHI]; - data[jistart + 18388] = 0.0 + k[3818]*y_cur[IDX_O2I]; - data[jistart + 18389] = 0.0 + k[5434]*y_cur[IDX_OI]; - data[jistart + 18390] = 0.0 + k[695]*y_cur[IDX_OHII] + - k[2516]*y_cur[IDX_H2OII] - k[5480]*y_cur[IDX_OHI]; - data[jistart + 18391] = 0.0 - k[3808]*y_cur[IDX_OHI] + - k[4826]*y_cur[IDX_OHM]; - data[jistart + 18392] = 0.0 + k[5201]*y_cur[IDX_HI] - - k[5481]*y_cur[IDX_OHI]; - data[jistart + 18393] = 0.0 + k[3847]*y_cur[IDX_C2H4I] + - k[4827]*y_cur[IDX_OHM]; - data[jistart + 18394] = 0.0 + k[2518]*y_cur[IDX_H2OII]; - data[jistart + 18395] = 0.0 + k[2847]*y_cur[IDX_HI]; - data[jistart + 18396] = 0.0 - k[5482]*y_cur[IDX_OHI]; - data[jistart + 18397] = 0.0 - k[3809]*y_cur[IDX_OHI] + - k[4828]*y_cur[IDX_OHM]; - data[jistart + 18398] = 0.0 + k[3882]*y_cur[IDX_O2I]; - data[jistart + 18399] = 0.0 + k[5448]*y_cur[IDX_OI]; - data[jistart + 18400] = 0.0 - k[5483]*y_cur[IDX_OHI]; - data[jistart + 18401] = 0.0 + k[4829]*y_cur[IDX_OHM]; - data[jistart + 18402] = 0.0 + k[1267]*y_cur[IDX_eM] + - k[4830]*y_cur[IDX_OHM] + k[6556]*y_cur[IDX_GRAINM]; - data[jistart + 18403] = 0.0 + k[4831]*y_cur[IDX_OHM]; - data[jistart + 18404] = 0.0 + k[772]*y_cur[IDX_C2H5OHII] + - k[776]*y_cur[IDX_C2H5OH2II] + k[962]*y_cur[IDX_CH3OHII] + - k[965]*y_cur[IDX_CH3OH2II] + k[1014]*y_cur[IDX_H2OII] + - k[1018]*y_cur[IDX_H2POII] + k[1023]*y_cur[IDX_H2SiOII] + - k[1034]*y_cur[IDX_H3COII] + k[1043]*y_cur[IDX_H3OII] + - k[1044]*y_cur[IDX_H3OII] + k[1094]*y_cur[IDX_HCNOHII] + - k[1100]*y_cur[IDX_HCO2II] + k[1102]*y_cur[IDX_HCOOHII] + - k[1103]*y_cur[IDX_HCOOH2II] + k[1114]*y_cur[IDX_HN2OII] + - k[1127]*y_cur[IDX_HOCNII] + k[1128]*y_cur[IDX_HOCSII] + - k[1131]*y_cur[IDX_HONCII] + k[1144]*y_cur[IDX_HSO2II] + - k[1146]*y_cur[IDX_HSiO2II] + k[1267]*y_cur[IDX_SiOHII] + - k[1272]*y_cur[IDX_CH2OHCOII] + k[1275]*y_cur[IDX_CH2OHCHOII] + - k[1284]*y_cur[IDX_CH3COOHII] + k[1287]*y_cur[IDX_CH3COOHII] + - k[1289]*y_cur[IDX_CH3COOHII] + k[1290]*y_cur[IDX_CH3COOH2II] + - k[1292]*y_cur[IDX_CH3COOH2II]; - data[jistart + 18405] = 0.0 - k[1914]*y_cur[IDX_OHII]; - data[jistart + 18406] = 0.0 - k[685]*y_cur[IDX_OHII] - - k[3769]*y_cur[IDX_OHII]; - data[jistart + 18407] = 0.0 + k[697]*y_cur[IDX_OHI]; - data[jistart + 18408] = 0.0 - k[686]*y_cur[IDX_OHII] - - k[3770]*y_cur[IDX_OHII]; - data[jistart + 18409] = 0.0 - k[687]*y_cur[IDX_OHII] - - k[3771]*y_cur[IDX_OHII] - k[3772]*y_cur[IDX_OHII] - - k[3773]*y_cur[IDX_OHII] - k[3774]*y_cur[IDX_OHII]; - data[jistart + 18410] = 0.0 - k[297]*y_cur[IDX_OHII] - - k[2264]*y_cur[IDX_OHII]; - data[jistart + 18411] = 0.0 - k[268]*y_cur[IDX_OHII] - - k[2016]*y_cur[IDX_OHII]; - data[jistart + 18412] = 0.0 + k[5637]*y_cur[IDX_HeII]; - data[jistart + 18413] = 0.0 + k[5671]*y_cur[IDX_HeII]; - data[jistart + 18414] = 0.0 + k[3196]*y_cur[IDX_HeII]; - data[jistart + 18415] = 0.0 - k[2209]*y_cur[IDX_OHII] - - k[2210]*y_cur[IDX_OHII]; - data[jistart + 18416] = 0.0 - k[3775]*y_cur[IDX_OHII]; - data[jistart + 18417] = 0.0 + k[698]*y_cur[IDX_OHI]; - data[jistart + 18418] = 0.0 - k[3777]*y_cur[IDX_OHII]; - data[jistart + 18419] = 0.0 + k[699]*y_cur[IDX_OHI]; - data[jistart + 18420] = 0.0 - k[3776]*y_cur[IDX_OHII]; - data[jistart + 18421] = 0.0 + k[5648]*y_cur[IDX_HeII]; - data[jistart + 18422] = 0.0 - k[6329]*y_cur[IDX_OHII]; - data[jistart + 18423] = 0.0 + k[408]*y_cur[IDX_OHI]; - data[jistart + 18424] = 0.0 + k[2466]*y_cur[IDX_OII] - - k[2469]*y_cur[IDX_OHII]; - data[jistart + 18425] = 0.0 + k[456]*y_cur[IDX_OHI] + - k[2396]*y_cur[IDX_OI]; - data[jistart + 18426] = 0.0 - k[688]*y_cur[IDX_OHII] - - k[3778]*y_cur[IDX_OHII]; - data[jistart + 18427] = 0.0 - k[689]*y_cur[IDX_OHII] + - k[3225]*y_cur[IDX_HeII] - k[3779]*y_cur[IDX_OHII]; - data[jistart + 18428] = 0.0 + k[6157]; - data[jistart + 18429] = 0.0 - k[690]*y_cur[IDX_OHII] - - k[3780]*y_cur[IDX_OHII]; - data[jistart + 18430] = 0.0 + k[2731]*y_cur[IDX_OI]; - data[jistart + 18431] = 0.0 - k[3781]*y_cur[IDX_OHII]; - data[jistart + 18432] = 0.0 - k[691]*y_cur[IDX_OHII] + - k[3646]*y_cur[IDX_OII] - k[3782]*y_cur[IDX_OHII] - - k[3783]*y_cur[IDX_OHII]; - data[jistart + 18433] = 0.0 - k[3784]*y_cur[IDX_OHII]; - data[jistart + 18434] = 0.0 + k[3196]*y_cur[IDX_CH3OHI] + - k[3225]*y_cur[IDX_H2OI] + k[5637]*y_cur[IDX_CH2OHI] + - k[5648]*y_cur[IDX_COOHI] + k[5671]*y_cur[IDX_CH3COOHI]; - data[jistart + 18435] = 0.0 - k[3467]*y_cur[IDX_OHII]; - data[jistart + 18436] = 0.0 + k[563]*y_cur[IDX_OHI]; - data[jistart + 18437] = 0.0 - k[3785]*y_cur[IDX_OHII]; - data[jistart + 18438] = 0.0 + k[700]*y_cur[IDX_OHI]; - data[jistart + 18439] = 0.0 + k[3745]*y_cur[IDX_OI]; - data[jistart + 18440] = 0.0 - k[3623]*y_cur[IDX_OHII]; - data[jistart + 18441] = 0.0 + k[3503]*y_cur[IDX_OI]; - data[jistart + 18442] = 0.0 - k[591]*y_cur[IDX_OHII] - - k[3547]*y_cur[IDX_OHII]; - data[jistart + 18443] = 0.0 - k[692]*y_cur[IDX_OHII] - - k[3786]*y_cur[IDX_OHII]; - data[jistart + 18444] = 0.0 - k[693]*y_cur[IDX_OHII] - - k[3787]*y_cur[IDX_OHII]; - data[jistart + 18445] = 0.0 + k[2396]*y_cur[IDX_H2II] + - k[2731]*y_cur[IDX_H3II] + k[3503]*y_cur[IDX_NHII] + - k[3745]*y_cur[IDX_N2HII] + k[3749]*y_cur[IDX_O2HII] - - k[3750]*y_cur[IDX_OHII]; - data[jistart + 18446] = 0.0 + k[664]*y_cur[IDX_OHI] + - k[2466]*y_cur[IDX_H2I] + k[3646]*y_cur[IDX_HCOI]; - data[jistart + 18447] = 0.0 - k[694]*y_cur[IDX_OHII]; - data[jistart + 18448] = 0.0 + k[3749]*y_cur[IDX_OI]; - data[jistart + 18449] = 0.0 + k[408]*y_cur[IDX_HII] + - k[456]*y_cur[IDX_H2II] + k[563]*y_cur[IDX_NII] + - k[664]*y_cur[IDX_OII] + k[697]*y_cur[IDX_C2II] + - k[698]*y_cur[IDX_CNII] + k[699]*y_cur[IDX_COII] + - k[700]*y_cur[IDX_N2II] - k[3788]*y_cur[IDX_OHII] + k[6245]; - data[jistart + 18450] = 0.0 - k[268]*y_cur[IDX_CH2I] - - k[297]*y_cur[IDX_CHI] - k[591]*y_cur[IDX_NH2I] - - k[685]*y_cur[IDX_C2I] - k[686]*y_cur[IDX_C2HI] - - k[687]*y_cur[IDX_C2H6I] - k[688]*y_cur[IDX_H2COI] - - k[689]*y_cur[IDX_H2OI] - k[690]*y_cur[IDX_H2SI] - - k[691]*y_cur[IDX_HCOI] - k[692]*y_cur[IDX_NH3I] - - k[693]*y_cur[IDX_NOI] - k[694]*y_cur[IDX_O2I] - k[695]*y_cur[IDX_SI] - - k[1180]*y_cur[IDX_eM] - k[1914]*y_cur[IDX_CI] - - k[2016]*y_cur[IDX_CH2I] - k[2209]*y_cur[IDX_CH4I] - - k[2210]*y_cur[IDX_CH4I] - k[2264]*y_cur[IDX_CHI] - - k[2469]*y_cur[IDX_H2I] - k[3467]*y_cur[IDX_NI] - - k[3547]*y_cur[IDX_NH2I] - k[3623]*y_cur[IDX_NHI] - - k[3750]*y_cur[IDX_OI] - k[3769]*y_cur[IDX_C2I] - - k[3770]*y_cur[IDX_C2HI] - k[3771]*y_cur[IDX_C2H6I] - - k[3772]*y_cur[IDX_C2H6I] - k[3773]*y_cur[IDX_C2H6I] - - k[3774]*y_cur[IDX_C2H6I] - k[3775]*y_cur[IDX_CNI] - - k[3776]*y_cur[IDX_CO2I] - k[3777]*y_cur[IDX_COI] - - k[3778]*y_cur[IDX_H2COI] - k[3779]*y_cur[IDX_H2OI] - - k[3780]*y_cur[IDX_H2SI] - k[3781]*y_cur[IDX_HCNI] - - k[3782]*y_cur[IDX_HCOI] - k[3783]*y_cur[IDX_HCOI] - - k[3784]*y_cur[IDX_HNCI] - k[3785]*y_cur[IDX_N2I] - - k[3786]*y_cur[IDX_NH3I] - k[3787]*y_cur[IDX_NOI] - - k[3788]*y_cur[IDX_OHI] - k[3789]*y_cur[IDX_SI] - - k[3790]*y_cur[IDX_SI] - k[3791]*y_cur[IDX_SiI] - - k[3792]*y_cur[IDX_SiCI] - k[3793]*y_cur[IDX_SiHI] - - k[3794]*y_cur[IDX_SiOI] - k[6242] - k[6329]*y_cur[IDX_GRAINM]; - data[jistart + 18451] = 0.0 - k[695]*y_cur[IDX_OHII] - - k[3789]*y_cur[IDX_OHII] - k[3790]*y_cur[IDX_OHII]; - data[jistart + 18452] = 0.0 - k[3791]*y_cur[IDX_OHII]; - data[jistart + 18453] = 0.0 - k[3792]*y_cur[IDX_OHII]; - data[jistart + 18454] = 0.0 - k[3793]*y_cur[IDX_OHII]; - data[jistart + 18455] = 0.0 - k[3794]*y_cur[IDX_OHII]; - data[jistart + 18456] = 0.0 - k[1180]*y_cur[IDX_OHII]; - data[jistart + 18457] = 0.0 - k[57]*y_cur[IDX_OHM]; - data[jistart + 18458] = 0.0 - k[4797]*y_cur[IDX_OHM]; - data[jistart + 18459] = 0.0 - k[4798]*y_cur[IDX_OHM]; - data[jistart + 18460] = 0.0 - k[4799]*y_cur[IDX_OHM]; - data[jistart + 18461] = 0.0 - k[4800]*y_cur[IDX_OHM]; - data[jistart + 18462] = 0.0 - k[4801]*y_cur[IDX_OHM]; - data[jistart + 18463] = 0.0 - k[4802]*y_cur[IDX_OHM]; - data[jistart + 18464] = 0.0 - k[64]*y_cur[IDX_OHM]; - data[jistart + 18465] = 0.0 - k[4803]*y_cur[IDX_OHM]; - data[jistart + 18466] = 0.0 - k[61]*y_cur[IDX_OHM]; - data[jistart + 18467] = 0.0 - k[4804]*y_cur[IDX_OHM]; - data[jistart + 18468] = 0.0 + k[3652]*y_cur[IDX_OM]; - data[jistart + 18469] = 0.0 - k[696]*y_cur[IDX_OHM]; - data[jistart + 18470] = 0.0 - k[4805]*y_cur[IDX_OHM]; - data[jistart + 18471] = 0.0 - k[4806]*y_cur[IDX_OHM]; - data[jistart + 18472] = 0.0 - k[108]*y_cur[IDX_OHM]; - data[jistart + 18473] = 0.0 - k[4807]*y_cur[IDX_OHM]; - data[jistart + 18474] = 0.0 + k[2367]*y_cur[IDX_H2OI]; - data[jistart + 18475] = 0.0 + k[2467]*y_cur[IDX_OM]; - data[jistart + 18476] = 0.0 - k[4808]*y_cur[IDX_OHM]; - data[jistart + 18477] = 0.0 + k[2367]*y_cur[IDX_HM]; - data[jistart + 18478] = 0.0 - k[4809]*y_cur[IDX_OHM]; - data[jistart + 18479] = 0.0 - k[4810]*y_cur[IDX_OHM]; - data[jistart + 18480] = 0.0 - k[4811]*y_cur[IDX_OHM]; - data[jistart + 18481] = 0.0 - k[4812]*y_cur[IDX_OHM]; - data[jistart + 18482] = 0.0 - k[3795]*y_cur[IDX_OHM]; - data[jistart + 18483] = 0.0 - k[4813]*y_cur[IDX_OHM] - - k[4814]*y_cur[IDX_OHM]; - data[jistart + 18484] = 0.0 - k[4815]*y_cur[IDX_OHM] - - k[4816]*y_cur[IDX_OHM]; - data[jistart + 18485] = 0.0 - k[4817]*y_cur[IDX_OHM]; - data[jistart + 18486] = 0.0 - k[4818]*y_cur[IDX_OHM]; - data[jistart + 18487] = 0.0 - k[4819]*y_cur[IDX_OHM]; - data[jistart + 18488] = 0.0 - k[4820]*y_cur[IDX_OHM]; - data[jistart + 18489] = 0.0 - k[4821]*y_cur[IDX_OHM]; - data[jistart + 18490] = 0.0 - k[4822]*y_cur[IDX_OHM]; - data[jistart + 18491] = 0.0 - k[4823]*y_cur[IDX_OHM]; - data[jistart + 18492] = 0.0 - k[4824]*y_cur[IDX_OHM]; - data[jistart + 18493] = 0.0 - k[4825]*y_cur[IDX_OHM]; - data[jistart + 18494] = 0.0 + k[2467]*y_cur[IDX_H2I] + - k[3652]*y_cur[IDX_CH4I]; - data[jistart + 18495] = 0.0 - k[57]*y_cur[IDX_CI] - - k[61]*y_cur[IDX_CH3I] - k[64]*y_cur[IDX_CHI] - k[108]*y_cur[IDX_HI] - - k[696]*y_cur[IDX_CNI] - k[3795]*y_cur[IDX_HCNI] - - k[4797]*y_cur[IDX_CII] - k[4798]*y_cur[IDX_C2H2II] - - k[4799]*y_cur[IDX_C2H3II] - k[4800]*y_cur[IDX_C4H2II] - - k[4801]*y_cur[IDX_C4H3II] - k[4802]*y_cur[IDX_C4SII] - - k[4803]*y_cur[IDX_CH2CCHII] - k[4804]*y_cur[IDX_CH3II] - - k[4805]*y_cur[IDX_CNCII] - k[4806]*y_cur[IDX_FeII] - - k[4807]*y_cur[IDX_HII] - k[4808]*y_cur[IDX_H2COII] - - k[4809]*y_cur[IDX_H2SII] - k[4810]*y_cur[IDX_H3II] - - k[4811]*y_cur[IDX_H3OII] - k[4812]*y_cur[IDX_HC2SII] - - k[4813]*y_cur[IDX_HCNHII] - k[4814]*y_cur[IDX_HCNHII] - - k[4815]*y_cur[IDX_HCOII] - k[4816]*y_cur[IDX_HCOII] - - k[4817]*y_cur[IDX_HeII] - k[4818]*y_cur[IDX_MgII] - - k[4819]*y_cur[IDX_NII] - k[4820]*y_cur[IDX_N2HII] - - k[4821]*y_cur[IDX_NH3II] - k[4822]*y_cur[IDX_NH4II] - - k[4823]*y_cur[IDX_NOII] - k[4824]*y_cur[IDX_NaII] - - k[4825]*y_cur[IDX_OII] - k[4826]*y_cur[IDX_SII] - - k[4827]*y_cur[IDX_SOII] - k[4828]*y_cur[IDX_SiII] - - k[4829]*y_cur[IDX_SiOII] - k[4830]*y_cur[IDX_SiOHII] - - k[4831]*y_cur[IDX_SiSII] - k[5904] - k[6243]; - data[jistart + 18496] = 0.0 - k[4826]*y_cur[IDX_OHM]; - data[jistart + 18497] = 0.0 - k[4827]*y_cur[IDX_OHM]; - data[jistart + 18498] = 0.0 - k[4828]*y_cur[IDX_OHM]; - data[jistart + 18499] = 0.0 - k[4829]*y_cur[IDX_OHM]; - data[jistart + 18500] = 0.0 - k[4830]*y_cur[IDX_OHM]; - data[jistart + 18501] = 0.0 - k[4831]*y_cur[IDX_OHM]; - data[jistart + 18502] = 0.0 - k[5527]*y_cur[IDX_PI]; - data[jistart + 18503] = 0.0 - k[190]*y_cur[IDX_PI] + - k[1315]*y_cur[IDX_C3PI] + k[1321]*y_cur[IDX_C4PI]; - data[jistart + 18504] = 0.0 - k[1526]*y_cur[IDX_PI]; - data[jistart + 18505] = 0.0 - k[3814]*y_cur[IDX_PI]; - data[jistart + 18506] = 0.0 + k[1315]*y_cur[IDX_CII] + - k[3101]*y_cur[IDX_HeII]; - data[jistart + 18507] = 0.0 - k[3815]*y_cur[IDX_PI]; - data[jistart + 18508] = 0.0 + k[1321]*y_cur[IDX_CII]; - data[jistart + 18509] = 0.0 + k[5773] + k[6070]; - data[jistart + 18510] = 0.0 + k[903]*y_cur[IDX_eM] + - k[6663]*y_cur[IDX_GRAINM]; - data[jistart + 18511] = 0.0 - k[2094]*y_cur[IDX_PI]; - data[jistart + 18512] = 0.0 + k[3213]*y_cur[IDX_HeII] + - k[5391]*y_cur[IDX_OI] + k[5827] + k[6139]; - data[jistart + 18513] = 0.0 + k[984]*y_cur[IDX_eM] + - k[6511]*y_cur[IDX_GRAINM]; - data[jistart + 18514] = 0.0 + k[7110] + k[7292] + k[7474]; - data[jistart + 18515] = 0.0 + k[6421]*y_cur[IDX_PII] + - k[6433]*y_cur[IDX_PHII] + k[6434]*y_cur[IDX_PH2II] + - k[6435]*y_cur[IDX_PH2II] + k[6511]*y_cur[IDX_CPII] + - k[6544]*y_cur[IDX_HCPII] + k[6560]*y_cur[IDX_PNII] + - k[6571]*y_cur[IDX_HPNII] + k[6580]*y_cur[IDX_PCH3II] + - k[6593]*y_cur[IDX_PNH2II] + k[6598]*y_cur[IDX_PCH4II] + - k[6600]*y_cur[IDX_POII] + k[6612]*y_cur[IDX_HPOII] + - k[6617]*y_cur[IDX_PNH3II] + k[6663]*y_cur[IDX_CCPII] + - k[6682]*y_cur[IDX_PC2H2II] + k[6691]*y_cur[IDX_PC2H4II]; - data[jistart + 18516] = 0.0 - k[409]*y_cur[IDX_PI]; - data[jistart + 18517] = 0.0 + k[2566]*y_cur[IDX_PHII]; - data[jistart + 18518] = 0.0 + k[701]*y_cur[IDX_PII] + - k[3817]*y_cur[IDX_PHII]; - data[jistart + 18519] = 0.0 - k[2734]*y_cur[IDX_PI]; - data[jistart + 18520] = 0.0 - k[2815]*y_cur[IDX_PI]; - data[jistart + 18521] = 0.0 + k[2884]*y_cur[IDX_PHII]; - data[jistart + 18522] = 0.0 - k[2983]*y_cur[IDX_PI]; - data[jistart + 18523] = 0.0 + k[1106]*y_cur[IDX_eM] + - k[6544]*y_cur[IDX_GRAINM]; - data[jistart + 18524] = 0.0 + k[1132]*y_cur[IDX_eM] + - k[6571]*y_cur[IDX_GRAINM]; - data[jistart + 18525] = 0.0 + k[1135]*y_cur[IDX_eM] + - k[6612]*y_cur[IDX_GRAINM]; - data[jistart + 18526] = 0.0 - k[526]*y_cur[IDX_PI] + - k[3101]*y_cur[IDX_C3PI] + k[3213]*y_cur[IDX_CPI]; - data[jistart + 18527] = 0.0 + k[5286]*y_cur[IDX_PNI] + - k[5287]*y_cur[IDX_POI]; - data[jistart + 18528] = 0.0 + k[613]*y_cur[IDX_PII] + - k[3596]*y_cur[IDX_PHII]; - data[jistart + 18529] = 0.0 + k[5391]*y_cur[IDX_CPI]; - data[jistart + 18530] = 0.0 - k[5484]*y_cur[IDX_PI]; - data[jistart + 18531] = 0.0 - k[190]*y_cur[IDX_CII] - - k[409]*y_cur[IDX_HII] - k[526]*y_cur[IDX_HeII] - - k[1526]*y_cur[IDX_C2H2II] - k[2094]*y_cur[IDX_CH3II] - - k[2734]*y_cur[IDX_H3II] - k[2815]*y_cur[IDX_H3OII] - - k[2983]*y_cur[IDX_HCOII] - k[3814]*y_cur[IDX_C3H2II] - - k[3815]*y_cur[IDX_C4H2II] - k[5484]*y_cur[IDX_O2I] - - k[5527]*y_cur[IDX_CI] - k[5906] - k[6246] - k[6928]; - data[jistart + 18532] = 0.0 + k[613]*y_cur[IDX_NH3I] + - k[701]*y_cur[IDX_H2SI] + k[723]*y_cur[IDX_SiI] + - k[5624]*y_cur[IDX_eM] + k[6421]*y_cur[IDX_GRAINM]; - data[jistart + 18533] = 0.0 + k[1183]*y_cur[IDX_eM] + - k[6682]*y_cur[IDX_GRAINM]; - data[jistart + 18534] = 0.0 + k[1189]*y_cur[IDX_eM] + - k[6691]*y_cur[IDX_GRAINM]; - data[jistart + 18535] = 0.0 + k[1201]*y_cur[IDX_eM] + - k[6580]*y_cur[IDX_GRAINM]; - data[jistart + 18536] = 0.0 + k[1204]*y_cur[IDX_eM] + - k[6598]*y_cur[IDX_GRAINM]; - data[jistart + 18537] = 0.0 + k[5908] + k[6249]; - data[jistart + 18538] = 0.0 + k[1205]*y_cur[IDX_eM] + - k[2566]*y_cur[IDX_H2OI] + k[2884]*y_cur[IDX_HCNI] + - k[3596]*y_cur[IDX_NH3I] + k[3817]*y_cur[IDX_H2SI] + - k[6433]*y_cur[IDX_GRAINM]; - data[jistart + 18539] = 0.0 + k[1206]*y_cur[IDX_eM] + - k[1207]*y_cur[IDX_eM] + k[6434]*y_cur[IDX_GRAINM] + - k[6435]*y_cur[IDX_GRAINM]; - data[jistart + 18540] = 0.0 + k[5286]*y_cur[IDX_NI] + k[5909] + - k[6250]; - data[jistart + 18541] = 0.0 + k[1211]*y_cur[IDX_eM] + - k[6560]*y_cur[IDX_GRAINM]; - data[jistart + 18542] = 0.0 + k[1212]*y_cur[IDX_eM] + - k[6593]*y_cur[IDX_GRAINM]; - data[jistart + 18543] = 0.0 + k[1215]*y_cur[IDX_eM] + - k[6617]*y_cur[IDX_GRAINM]; - data[jistart + 18544] = 0.0 + k[5287]*y_cur[IDX_NI] + k[5910] + - k[6251]; - data[jistart + 18545] = 0.0 + k[1218]*y_cur[IDX_eM] + - k[6600]*y_cur[IDX_GRAINM]; - data[jistart + 18546] = 0.0 + k[723]*y_cur[IDX_PII]; - data[jistart + 18547] = 0.0 + k[903]*y_cur[IDX_CCPII] + - k[984]*y_cur[IDX_CPII] + k[1106]*y_cur[IDX_HCPII] + - k[1132]*y_cur[IDX_HPNII] + k[1135]*y_cur[IDX_HPOII] + - k[1183]*y_cur[IDX_PC2H2II] + k[1189]*y_cur[IDX_PC2H4II] + - k[1201]*y_cur[IDX_PCH3II] + k[1204]*y_cur[IDX_PCH4II] + - k[1205]*y_cur[IDX_PHII] + k[1206]*y_cur[IDX_PH2II] + - k[1207]*y_cur[IDX_PH2II] + k[1211]*y_cur[IDX_PNII] + - k[1212]*y_cur[IDX_PNH2II] + k[1215]*y_cur[IDX_PNH3II] + - k[1218]*y_cur[IDX_POII] + k[5624]*y_cur[IDX_PII]; - data[jistart + 18548] = 0.0 + k[190]*y_cur[IDX_PI]; - data[jistart + 18549] = 0.0 - k[1569]*y_cur[IDX_PII]; - data[jistart + 18550] = 0.0 - k[1710]*y_cur[IDX_PII]; - data[jistart + 18551] = 0.0 + k[3102]*y_cur[IDX_HeII]; - data[jistart + 18552] = 0.0 + k[3158]*y_cur[IDX_HeII]; - data[jistart + 18553] = 0.0 - k[3810]*y_cur[IDX_PII]; - data[jistart + 18554] = 0.0 - k[2211]*y_cur[IDX_PII]; - data[jistart + 18555] = 0.0 - k[3811]*y_cur[IDX_PII]; - data[jistart + 18556] = 0.0 + k[3212]*y_cur[IDX_HeII]; - data[jistart + 18557] = 0.0 + k[3731]*y_cur[IDX_OI]; - data[jistart + 18558] = 0.0 - k[6421]*y_cur[IDX_PII]; - data[jistart + 18559] = 0.0 + k[409]*y_cur[IDX_PI]; - data[jistart + 18560] = 0.0 - k[5559]*y_cur[IDX_PII]; - data[jistart + 18561] = 0.0 - k[2562]*y_cur[IDX_PII] - - k[2563]*y_cur[IDX_PII]; - data[jistart + 18562] = 0.0 - k[701]*y_cur[IDX_PII]; - data[jistart + 18563] = 0.0 + k[3253]*y_cur[IDX_HeII]; - data[jistart + 18564] = 0.0 + k[526]*y_cur[IDX_PI] + - k[3102]*y_cur[IDX_C3PI] + k[3158]*y_cur[IDX_CCPI] + - k[3212]*y_cur[IDX_CPI] + k[3253]*y_cur[IDX_HCPI] + - k[3298]*y_cur[IDX_PH2I] + k[3299]*y_cur[IDX_PHI] + - k[3300]*y_cur[IDX_PNI] + k[3301]*y_cur[IDX_POI]; - data[jistart + 18565] = 0.0 - k[613]*y_cur[IDX_PII] - - k[3595]*y_cur[IDX_PII]; - data[jistart + 18566] = 0.0 + k[3731]*y_cur[IDX_CPII]; - data[jistart + 18567] = 0.0 - k[3812]*y_cur[IDX_PII]; - data[jistart + 18568] = 0.0 - k[3813]*y_cur[IDX_PII]; - data[jistart + 18569] = 0.0 - k[3807]*y_cur[IDX_PII]; - data[jistart + 18570] = 0.0 + k[190]*y_cur[IDX_CII] + - k[409]*y_cur[IDX_HII] + k[526]*y_cur[IDX_HeII] + k[5906] + k[6246]; - data[jistart + 18571] = 0.0 - k[613]*y_cur[IDX_NH3I] - - k[701]*y_cur[IDX_H2SI] - k[723]*y_cur[IDX_SiI] - - k[1569]*y_cur[IDX_C2H2I] - k[1710]*y_cur[IDX_C2H4I] - - k[2211]*y_cur[IDX_CH4I] - k[2562]*y_cur[IDX_H2OI] - - k[2563]*y_cur[IDX_H2OI] - k[3595]*y_cur[IDX_NH3I] - - k[3807]*y_cur[IDX_OHI] - k[3810]*y_cur[IDX_CH3OHI] - - k[3811]*y_cur[IDX_CO2I] - k[3812]*y_cur[IDX_O2I] - - k[3813]*y_cur[IDX_OCSI] - k[5559]*y_cur[IDX_H2I] - - k[5624]*y_cur[IDX_eM] - k[6421]*y_cur[IDX_GRAINM]; - data[jistart + 18572] = 0.0 + k[3299]*y_cur[IDX_HeII]; - data[jistart + 18573] = 0.0 + k[3298]*y_cur[IDX_HeII]; - data[jistart + 18574] = 0.0 + k[3300]*y_cur[IDX_HeII]; - data[jistart + 18575] = 0.0 + k[3301]*y_cur[IDX_HeII]; - data[jistart + 18576] = 0.0 - k[723]*y_cur[IDX_PII]; - data[jistart + 18577] = 0.0 - k[5624]*y_cur[IDX_PII]; - data[jistart + 18578] = 0.0 + k[1570]*y_cur[IDX_PHII] + - k[1571]*y_cur[IDX_PH2II]; - data[jistart + 18579] = 0.0 + k[1710]*y_cur[IDX_PII]; - data[jistart + 18580] = 0.0 - k[6680]*y_cur[IDX_PC2H2II] - - k[6681]*y_cur[IDX_PC2H2II] - k[6682]*y_cur[IDX_PC2H2II]; - data[jistart + 18581] = 0.0 + k[2688]*y_cur[IDX_HC2PI]; - data[jistart + 18582] = 0.0 + k[2803]*y_cur[IDX_HC2PI]; - data[jistart + 18583] = 0.0 + k[2688]*y_cur[IDX_H3II] + - k[2803]*y_cur[IDX_H3OII] + k[2963]*y_cur[IDX_HCOII]; - data[jistart + 18584] = 0.0 + k[2963]*y_cur[IDX_HC2PI]; - data[jistart + 18585] = 0.0 + k[1710]*y_cur[IDX_C2H4I]; - data[jistart + 18586] = 0.0 - k[1181]*y_cur[IDX_eM] - - k[1182]*y_cur[IDX_eM] - k[1183]*y_cur[IDX_eM] - - k[6680]*y_cur[IDX_GRAINM] - k[6681]*y_cur[IDX_GRAINM] - - k[6682]*y_cur[IDX_GRAINM]; - data[jistart + 18587] = 0.0 + k[1570]*y_cur[IDX_C2H2I]; - data[jistart + 18588] = 0.0 + k[1571]*y_cur[IDX_C2H2I]; - data[jistart + 18589] = 0.0 - k[1181]*y_cur[IDX_PC2H2II] - - k[1182]*y_cur[IDX_PC2H2II] - k[1183]*y_cur[IDX_PC2H2II]; - data[jistart + 18590] = 0.0 + k[1572]*y_cur[IDX_PH3II]; - data[jistart + 18591] = 0.0 + k[1711]*y_cur[IDX_PHII]; - data[jistart + 18592] = 0.0 - k[6685]*y_cur[IDX_PC2H3II] - - k[6686]*y_cur[IDX_PC2H3II] - k[6687]*y_cur[IDX_PC2H3II]; - data[jistart + 18593] = 0.0 - k[1184]*y_cur[IDX_eM] - - k[1185]*y_cur[IDX_eM] - k[1186]*y_cur[IDX_eM] - - k[6685]*y_cur[IDX_GRAINM] - k[6686]*y_cur[IDX_GRAINM] - - k[6687]*y_cur[IDX_GRAINM]; - data[jistart + 18594] = 0.0 + k[1711]*y_cur[IDX_C2H4I]; - data[jistart + 18595] = 0.0 + k[1572]*y_cur[IDX_C2H2I]; - data[jistart + 18596] = 0.0 - k[1184]*y_cur[IDX_PC2H3II] - - k[1185]*y_cur[IDX_PC2H3II] - k[1186]*y_cur[IDX_PC2H3II]; - data[jistart + 18597] = 0.0 + k[1713]*y_cur[IDX_PH2II]; - data[jistart + 18598] = 0.0 - k[6689]*y_cur[IDX_PC2H4II] - - k[6690]*y_cur[IDX_PC2H4II] - k[6691]*y_cur[IDX_PC2H4II]; - data[jistart + 18599] = 0.0 - k[1187]*y_cur[IDX_eM] - - k[1188]*y_cur[IDX_eM] - k[1189]*y_cur[IDX_eM] - - k[6689]*y_cur[IDX_GRAINM] - k[6690]*y_cur[IDX_GRAINM] - - k[6691]*y_cur[IDX_GRAINM]; - data[jistart + 18600] = 0.0 + k[1713]*y_cur[IDX_C2H4I]; - data[jistart + 18601] = 0.0 - k[1187]*y_cur[IDX_PC2H4II] - - k[1188]*y_cur[IDX_PC2H4II] - k[1189]*y_cur[IDX_PC2H4II]; - data[jistart + 18602] = 0.0 + k[3814]*y_cur[IDX_PI]; - data[jistart + 18603] = 0.0 + k[2606]*y_cur[IDX_H3II] + - k[2776]*y_cur[IDX_H3OII] + k[2911]*y_cur[IDX_HCOII]; - data[jistart + 18604] = 0.0 - k[6772]*y_cur[IDX_PC3HII] - - k[6773]*y_cur[IDX_PC3HII] - k[6774]*y_cur[IDX_PC3HII]; - data[jistart + 18605] = 0.0 + k[2606]*y_cur[IDX_C3PI]; - data[jistart + 18606] = 0.0 + k[2776]*y_cur[IDX_C3PI]; - data[jistart + 18607] = 0.0 + k[2911]*y_cur[IDX_C3PI]; - data[jistart + 18608] = 0.0 + k[3814]*y_cur[IDX_C3H2II]; - data[jistart + 18609] = 0.0 - k[1190]*y_cur[IDX_eM] - - k[1191]*y_cur[IDX_eM] - k[1192]*y_cur[IDX_eM] - - k[6772]*y_cur[IDX_GRAINM] - k[6773]*y_cur[IDX_GRAINM] - - k[6774]*y_cur[IDX_GRAINM]; - data[jistart + 18610] = 0.0 - k[1190]*y_cur[IDX_PC3HII] - - k[1191]*y_cur[IDX_PC3HII] - k[1192]*y_cur[IDX_PC3HII]; - data[jistart + 18611] = 0.0 + k[3815]*y_cur[IDX_PI]; - data[jistart + 18612] = 0.0 + k[2611]*y_cur[IDX_H3II] + - k[2781]*y_cur[IDX_H3OII] + k[2916]*y_cur[IDX_HCOII]; - data[jistart + 18613] = 0.0 - k[6811]*y_cur[IDX_PC4HII] - - k[6812]*y_cur[IDX_PC4HII] - k[6813]*y_cur[IDX_PC4HII] - - k[6814]*y_cur[IDX_PC4HII]; - data[jistart + 18614] = 0.0 + k[2611]*y_cur[IDX_C4PI]; - data[jistart + 18615] = 0.0 + k[2781]*y_cur[IDX_C4PI]; - data[jistart + 18616] = 0.0 + k[2916]*y_cur[IDX_C4PI]; - data[jistart + 18617] = 0.0 + k[3815]*y_cur[IDX_C4H2II]; - data[jistart + 18618] = 0.0 - k[1193]*y_cur[IDX_eM] - - k[1194]*y_cur[IDX_eM] - k[1195]*y_cur[IDX_eM] - - k[1196]*y_cur[IDX_eM] - k[6811]*y_cur[IDX_GRAINM] - - k[6812]*y_cur[IDX_GRAINM] - k[6813]*y_cur[IDX_GRAINM] - - k[6814]*y_cur[IDX_GRAINM]; - data[jistart + 18619] = 0.0 - k[1193]*y_cur[IDX_PC4HII] - - k[1194]*y_cur[IDX_PC4HII] - k[1195]*y_cur[IDX_PC4HII] - - k[1196]*y_cur[IDX_PC4HII]; - data[jistart + 18620] = 0.0 + k[1712]*y_cur[IDX_PHII] + - k[1714]*y_cur[IDX_PH2II]; - data[jistart + 18621] = 0.0 + k[2094]*y_cur[IDX_PI]; - data[jistart + 18622] = 0.0 + k[2211]*y_cur[IDX_PII]; - data[jistart + 18623] = 0.0 - k[6569]*y_cur[IDX_PCH2II] - - k[6570]*y_cur[IDX_PCH2II]; - data[jistart + 18624] = 0.0 + k[2451]*y_cur[IDX_HCPII]; - data[jistart + 18625] = 0.0 + k[2701]*y_cur[IDX_HCPI]; - data[jistart + 18626] = 0.0 + k[2808]*y_cur[IDX_HCPI]; - data[jistart + 18627] = 0.0 + k[2972]*y_cur[IDX_HCPI]; - data[jistart + 18628] = 0.0 + k[2701]*y_cur[IDX_H3II] + - k[2808]*y_cur[IDX_H3OII] + k[2972]*y_cur[IDX_HCOII]; - data[jistart + 18629] = 0.0 + k[2451]*y_cur[IDX_H2I]; - data[jistart + 18630] = 0.0 + k[2094]*y_cur[IDX_CH3II]; - data[jistart + 18631] = 0.0 + k[2211]*y_cur[IDX_CH4I]; - data[jistart + 18632] = 0.0 - k[1197]*y_cur[IDX_eM] - - k[1198]*y_cur[IDX_eM] - k[6569]*y_cur[IDX_GRAINM] - - k[6570]*y_cur[IDX_GRAINM]; - data[jistart + 18633] = 0.0 + k[1712]*y_cur[IDX_C2H4I]; - data[jistart + 18634] = 0.0 + k[1714]*y_cur[IDX_C2H4I]; - data[jistart + 18635] = 0.0 - k[1197]*y_cur[IDX_PCH2II] - - k[1198]*y_cur[IDX_PCH2II]; - data[jistart + 18636] = 0.0 + k[2319]*y_cur[IDX_HII]; - data[jistart + 18637] = 0.0 + k[2212]*y_cur[IDX_PHII]; - data[jistart + 18638] = 0.0 - k[6578]*y_cur[IDX_PCH3II] - - k[6579]*y_cur[IDX_PCH3II] - k[6580]*y_cur[IDX_PCH3II]; - data[jistart + 18639] = 0.0 + k[2319]*y_cur[IDX_CH2PHI]; - data[jistart + 18640] = 0.0 - k[1199]*y_cur[IDX_eM] - - k[1200]*y_cur[IDX_eM] - k[1201]*y_cur[IDX_eM] - - k[6578]*y_cur[IDX_GRAINM] - k[6579]*y_cur[IDX_GRAINM] - - k[6580]*y_cur[IDX_GRAINM]; - data[jistart + 18641] = 0.0 + k[2212]*y_cur[IDX_CH4I]; - data[jistart + 18642] = 0.0 - k[1199]*y_cur[IDX_PCH3II] - - k[1200]*y_cur[IDX_PCH3II] - k[1201]*y_cur[IDX_PCH3II]; - data[jistart + 18643] = 0.0 + k[2640]*y_cur[IDX_H3II] + - k[2788]*y_cur[IDX_H3OII] + k[2942]*y_cur[IDX_HCOII]; - data[jistart + 18644] = 0.0 + k[2130]*y_cur[IDX_PH2II]; - data[jistart + 18645] = 0.0 + k[2213]*y_cur[IDX_PHII] + - k[2214]*y_cur[IDX_PH2II]; - data[jistart + 18646] = 0.0 - k[6596]*y_cur[IDX_PCH4II] - - k[6597]*y_cur[IDX_PCH4II] - k[6598]*y_cur[IDX_PCH4II]; - data[jistart + 18647] = 0.0 + k[2640]*y_cur[IDX_CH2PHI]; - data[jistart + 18648] = 0.0 + k[2788]*y_cur[IDX_CH2PHI]; - data[jistart + 18649] = 0.0 + k[2942]*y_cur[IDX_CH2PHI]; - data[jistart + 18650] = 0.0 - k[1202]*y_cur[IDX_eM] - - k[1203]*y_cur[IDX_eM] - k[1204]*y_cur[IDX_eM] - - k[6596]*y_cur[IDX_GRAINM] - k[6597]*y_cur[IDX_GRAINM] - - k[6598]*y_cur[IDX_GRAINM]; - data[jistart + 18651] = 0.0 + k[2213]*y_cur[IDX_CH4I]; - data[jistart + 18652] = 0.0 + k[2130]*y_cur[IDX_CH3OHI] + - k[2214]*y_cur[IDX_CH4I]; - data[jistart + 18653] = 0.0 - k[1202]*y_cur[IDX_PCH4II] - - k[1203]*y_cur[IDX_PCH4II] - k[1204]*y_cur[IDX_PCH4II]; - data[jistart + 18654] = 0.0 + k[4964]*y_cur[IDX_HPOI] - - k[4983]*y_cur[IDX_PHI]; - data[jistart + 18655] = 0.0 - k[191]*y_cur[IDX_PHI]; - data[jistart + 18656] = 0.0 + k[3175]*y_cur[IDX_HeII] + k[6094]; - data[jistart + 18657] = 0.0 + k[7115] + k[7297] + k[7479]; - data[jistart + 18658] = 0.0 + k[6436]*y_cur[IDX_PH2II] + - k[6449]*y_cur[IDX_PH3II] + k[6572]*y_cur[IDX_HPNII] + - k[6594]*y_cur[IDX_PNH2II] + k[6613]*y_cur[IDX_HPOII] + - k[6618]*y_cur[IDX_PNH3II] + k[6623]*y_cur[IDX_H2POII] + - k[6687]*y_cur[IDX_PC2H3II]; - data[jistart + 18659] = 0.0 - k[411]*y_cur[IDX_PHI]; - data[jistart + 18660] = 0.0 + k[2568]*y_cur[IDX_PH2II]; - data[jistart + 18661] = 0.0 + k[1018]*y_cur[IDX_eM] + - k[6623]*y_cur[IDX_GRAINM]; - data[jistart + 18662] = 0.0 - k[2736]*y_cur[IDX_PHI]; - data[jistart + 18663] = 0.0 - k[2985]*y_cur[IDX_PHI]; - data[jistart + 18664] = 0.0 + k[3254]*y_cur[IDX_HeII] + - k[5407]*y_cur[IDX_OI]; - data[jistart + 18665] = 0.0 + k[1133]*y_cur[IDX_eM] + - k[6572]*y_cur[IDX_GRAINM]; - data[jistart + 18666] = 0.0 + k[4964]*y_cur[IDX_CI]; - data[jistart + 18667] = 0.0 + k[1136]*y_cur[IDX_eM] + - k[6613]*y_cur[IDX_GRAINM]; - data[jistart + 18668] = 0.0 + k[3175]*y_cur[IDX_CH2PHI] + - k[3254]*y_cur[IDX_HCPI] - k[3299]*y_cur[IDX_PHI]; - data[jistart + 18669] = 0.0 - k[5285]*y_cur[IDX_PHI]; - data[jistart + 18670] = 0.0 + k[3599]*y_cur[IDX_PH2II]; - data[jistart + 18671] = 0.0 + k[5407]*y_cur[IDX_HCPI] + - k[5434]*y_cur[IDX_PH2I] - k[5436]*y_cur[IDX_PHI]; - data[jistart + 18672] = 0.0 + k[1186]*y_cur[IDX_eM] + - k[6687]*y_cur[IDX_GRAINM]; - data[jistart + 18673] = 0.0 - k[191]*y_cur[IDX_CII] - - k[411]*y_cur[IDX_HII] - k[2736]*y_cur[IDX_H3II] - - k[2985]*y_cur[IDX_HCOII] - k[3299]*y_cur[IDX_HeII] - - k[4983]*y_cur[IDX_CI] - k[5285]*y_cur[IDX_NI] - - k[5436]*y_cur[IDX_OI] - k[5908] - k[6249] - k[6933]; - data[jistart + 18674] = 0.0 + k[5434]*y_cur[IDX_OI] + k[5907] + - k[6248]; - data[jistart + 18675] = 0.0 + k[1208]*y_cur[IDX_eM] + - k[2568]*y_cur[IDX_H2OI] + k[3599]*y_cur[IDX_NH3I] + - k[6436]*y_cur[IDX_GRAINM]; - data[jistart + 18676] = 0.0 + k[1210]*y_cur[IDX_eM] + - k[6449]*y_cur[IDX_GRAINM]; - data[jistart + 18677] = 0.0 + k[1213]*y_cur[IDX_eM] + - k[6594]*y_cur[IDX_GRAINM]; - data[jistart + 18678] = 0.0 + k[1216]*y_cur[IDX_eM] + - k[6618]*y_cur[IDX_GRAINM]; - data[jistart + 18679] = 0.0 + k[1018]*y_cur[IDX_H2POII] + - k[1133]*y_cur[IDX_HPNII] + k[1136]*y_cur[IDX_HPOII] + - k[1186]*y_cur[IDX_PC2H3II] + k[1208]*y_cur[IDX_PH2II] + - k[1210]*y_cur[IDX_PH3II] + k[1213]*y_cur[IDX_PNH2II] + - k[1216]*y_cur[IDX_PNH3II]; - data[jistart + 18680] = 0.0 + k[191]*y_cur[IDX_PHI]; - data[jistart + 18681] = 0.0 - k[1570]*y_cur[IDX_PHII]; - data[jistart + 18682] = 0.0 - k[1711]*y_cur[IDX_PHII] - - k[1712]*y_cur[IDX_PHII]; - data[jistart + 18683] = 0.0 + k[3174]*y_cur[IDX_HeII]; - data[jistart + 18684] = 0.0 - k[3816]*y_cur[IDX_PHII]; - data[jistart + 18685] = 0.0 - k[2212]*y_cur[IDX_PHII] - - k[2213]*y_cur[IDX_PHII]; - data[jistart + 18686] = 0.0 - k[6433]*y_cur[IDX_PHII]; - data[jistart + 18687] = 0.0 + k[411]*y_cur[IDX_PHI]; - data[jistart + 18688] = 0.0 - k[5560]*y_cur[IDX_PHII]; - data[jistart + 18689] = 0.0 - k[2564]*y_cur[IDX_PHII] - - k[2565]*y_cur[IDX_PHII] - k[2566]*y_cur[IDX_PHII]; - data[jistart + 18690] = 0.0 - k[3817]*y_cur[IDX_PHII]; - data[jistart + 18691] = 0.0 + k[2734]*y_cur[IDX_PI]; - data[jistart + 18692] = 0.0 - k[2884]*y_cur[IDX_PHII]; - data[jistart + 18693] = 0.0 + k[2983]*y_cur[IDX_PI]; - data[jistart + 18694] = 0.0 + k[3737]*y_cur[IDX_OI]; - data[jistart + 18695] = 0.0 + k[3269]*y_cur[IDX_HeII]; - data[jistart + 18696] = 0.0 + k[3741]*y_cur[IDX_OI]; - data[jistart + 18697] = 0.0 + k[3174]*y_cur[IDX_CH2PHI] + - k[3269]*y_cur[IDX_HPOI]; - data[jistart + 18698] = 0.0 - k[3596]*y_cur[IDX_PHII] - - k[3597]*y_cur[IDX_PHII] - k[3598]*y_cur[IDX_PHII]; - data[jistart + 18699] = 0.0 + k[3737]*y_cur[IDX_HCPII] + - k[3741]*y_cur[IDX_HPOII] - k[3751]*y_cur[IDX_PHII]; - data[jistart + 18700] = 0.0 - k[3818]*y_cur[IDX_PHII]; - data[jistart + 18701] = 0.0 + k[2734]*y_cur[IDX_H3II] + - k[2983]*y_cur[IDX_HCOII]; - data[jistart + 18702] = 0.0 + k[191]*y_cur[IDX_CII] + - k[411]*y_cur[IDX_HII]; - data[jistart + 18703] = 0.0 - k[1205]*y_cur[IDX_eM] - - k[1570]*y_cur[IDX_C2H2I] - k[1711]*y_cur[IDX_C2H4I] - - k[1712]*y_cur[IDX_C2H4I] - k[2212]*y_cur[IDX_CH4I] - - k[2213]*y_cur[IDX_CH4I] - k[2564]*y_cur[IDX_H2OI] - - k[2565]*y_cur[IDX_H2OI] - k[2566]*y_cur[IDX_H2OI] - - k[2884]*y_cur[IDX_HCNI] - k[3596]*y_cur[IDX_NH3I] - - k[3597]*y_cur[IDX_NH3I] - k[3598]*y_cur[IDX_NH3I] - - k[3751]*y_cur[IDX_OI] - k[3816]*y_cur[IDX_CH3OHI] - - k[3817]*y_cur[IDX_H2SI] - k[3818]*y_cur[IDX_O2I] - - k[5560]*y_cur[IDX_H2I] - k[6433]*y_cur[IDX_GRAINM]; - data[jistart + 18704] = 0.0 - k[1205]*y_cur[IDX_PHII]; - data[jistart + 18705] = 0.0 + k[5384]*y_cur[IDX_OI]; - data[jistart + 18706] = 0.0 + k[2131]*y_cur[IDX_PH3II]; - data[jistart + 18707] = 0.0 + k[7121] + k[7303] + k[7485]; - data[jistart + 18708] = 0.0 + k[6448]*y_cur[IDX_PH3II]; - data[jistart + 18709] = 0.0 - k[410]*y_cur[IDX_PH2I]; - data[jistart + 18710] = 0.0 + k[3819]*y_cur[IDX_PH3II]; - data[jistart + 18711] = 0.0 - k[2735]*y_cur[IDX_PH2I]; - data[jistart + 18712] = 0.0 - k[2984]*y_cur[IDX_PH2I]; - data[jistart + 18713] = 0.0 - k[3298]*y_cur[IDX_PH2I]; - data[jistart + 18714] = 0.0 + k[3601]*y_cur[IDX_PH3II]; - data[jistart + 18715] = 0.0 + k[5384]*y_cur[IDX_CH2PHI] - - k[5433]*y_cur[IDX_PH2I] - k[5434]*y_cur[IDX_PH2I] - - k[5435]*y_cur[IDX_PH2I]; - data[jistart + 18716] = 0.0 - k[410]*y_cur[IDX_HII] - - k[2735]*y_cur[IDX_H3II] - k[2984]*y_cur[IDX_HCOII] - - k[3298]*y_cur[IDX_HeII] - k[5433]*y_cur[IDX_OI] - - k[5434]*y_cur[IDX_OI] - k[5435]*y_cur[IDX_OI] - k[5907] - k[6247] - - k[6248] - k[6939]; - data[jistart + 18717] = 0.0 + k[1209]*y_cur[IDX_eM] + - k[2131]*y_cur[IDX_CH3OHI] + k[3601]*y_cur[IDX_NH3I] + - k[3819]*y_cur[IDX_H2SI] + k[6448]*y_cur[IDX_GRAINM]; - data[jistart + 18718] = 0.0 + k[1209]*y_cur[IDX_PH3II]; - data[jistart + 18719] = 0.0 - k[1571]*y_cur[IDX_PH2II]; - data[jistart + 18720] = 0.0 - k[1713]*y_cur[IDX_PH2II] - - k[1714]*y_cur[IDX_PH2II]; - data[jistart + 18721] = 0.0 - k[2129]*y_cur[IDX_PH2II] - - k[2130]*y_cur[IDX_PH2II]; - data[jistart + 18722] = 0.0 - k[2214]*y_cur[IDX_PH2II]; - data[jistart + 18723] = 0.0 - k[6434]*y_cur[IDX_PH2II] - - k[6435]*y_cur[IDX_PH2II] - k[6436]*y_cur[IDX_PH2II]; - data[jistart + 18724] = 0.0 + k[410]*y_cur[IDX_PH2I]; - data[jistart + 18725] = 0.0 + k[5559]*y_cur[IDX_PII]; - data[jistart + 18726] = 0.0 - k[2567]*y_cur[IDX_PH2II] - - k[2568]*y_cur[IDX_PH2II]; - data[jistart + 18727] = 0.0 + k[2736]*y_cur[IDX_PHI]; - data[jistart + 18728] = 0.0 + k[2985]*y_cur[IDX_PHI]; - data[jistart + 18729] = 0.0 - k[3599]*y_cur[IDX_PH2II] - - k[3600]*y_cur[IDX_PH2II]; - data[jistart + 18730] = 0.0 - k[3673]*y_cur[IDX_PH2II]; - data[jistart + 18731] = 0.0 + k[5559]*y_cur[IDX_H2I]; - data[jistart + 18732] = 0.0 + k[2736]*y_cur[IDX_H3II] + - k[2985]*y_cur[IDX_HCOII]; - data[jistart + 18733] = 0.0 + k[410]*y_cur[IDX_HII] + k[6247]; - data[jistart + 18734] = 0.0 - k[1206]*y_cur[IDX_eM] - - k[1207]*y_cur[IDX_eM] - k[1208]*y_cur[IDX_eM] - - k[1571]*y_cur[IDX_C2H2I] - k[1713]*y_cur[IDX_C2H4I] - - k[1714]*y_cur[IDX_C2H4I] - k[2129]*y_cur[IDX_CH3OHI] - - k[2130]*y_cur[IDX_CH3OHI] - k[2214]*y_cur[IDX_CH4I] - - k[2567]*y_cur[IDX_H2OI] - k[2568]*y_cur[IDX_H2OI] - - k[3599]*y_cur[IDX_NH3I] - k[3600]*y_cur[IDX_NH3I] - - k[3673]*y_cur[IDX_O2I] - k[6434]*y_cur[IDX_GRAINM] - - k[6435]*y_cur[IDX_GRAINM] - k[6436]*y_cur[IDX_GRAINM]; - data[jistart + 18735] = 0.0 - k[1206]*y_cur[IDX_PH2II] - - k[1207]*y_cur[IDX_PH2II] - k[1208]*y_cur[IDX_PH2II]; - data[jistart + 18736] = 0.0 - k[1572]*y_cur[IDX_PH3II]; - data[jistart + 18737] = 0.0 - k[2131]*y_cur[IDX_PH3II]; - data[jistart + 18738] = 0.0 - k[6448]*y_cur[IDX_PH3II] - - k[6449]*y_cur[IDX_PH3II]; - data[jistart + 18739] = 0.0 + k[5560]*y_cur[IDX_PHII]; - data[jistart + 18740] = 0.0 - k[3819]*y_cur[IDX_PH3II]; - data[jistart + 18741] = 0.0 + k[2735]*y_cur[IDX_PH2I]; - data[jistart + 18742] = 0.0 + k[2984]*y_cur[IDX_PH2I]; - data[jistart + 18743] = 0.0 - k[3601]*y_cur[IDX_PH3II]; - data[jistart + 18744] = 0.0 + k[5560]*y_cur[IDX_H2I]; - data[jistart + 18745] = 0.0 + k[2735]*y_cur[IDX_H3II] + - k[2984]*y_cur[IDX_HCOII]; - data[jistart + 18746] = 0.0 - k[1209]*y_cur[IDX_eM] - - k[1210]*y_cur[IDX_eM] - k[1572]*y_cur[IDX_C2H2I] - - k[2131]*y_cur[IDX_CH3OHI] - k[3601]*y_cur[IDX_NH3I] - - k[3819]*y_cur[IDX_H2SI] - k[6448]*y_cur[IDX_GRAINM] - - k[6449]*y_cur[IDX_GRAINM]; - data[jistart + 18747] = 0.0 - k[1209]*y_cur[IDX_PH3II] - - k[1210]*y_cur[IDX_PH3II]; - data[jistart + 18748] = 0.0 + k[249]*y_cur[IDX_PNII]; - data[jistart + 18749] = 0.0 + k[7164] + k[7346] + k[7528]; - data[jistart + 18750] = 0.0 + k[6573]*y_cur[IDX_HPNII] + - k[6595]*y_cur[IDX_PNH2II] + k[6619]*y_cur[IDX_PNH3II]; - data[jistart + 18751] = 0.0 - k[412]*y_cur[IDX_PNI]; - data[jistart + 18752] = 0.0 - k[2737]*y_cur[IDX_PNI]; - data[jistart + 18753] = 0.0 - k[2816]*y_cur[IDX_PNI]; - data[jistart + 18754] = 0.0 - k[2986]*y_cur[IDX_PNI]; - data[jistart + 18755] = 0.0 + k[1134]*y_cur[IDX_eM] + - k[6573]*y_cur[IDX_GRAINM]; - data[jistart + 18756] = 0.0 - k[3300]*y_cur[IDX_PNI]; - data[jistart + 18757] = 0.0 + k[5285]*y_cur[IDX_PHI] - - k[5286]*y_cur[IDX_PNI] + k[5288]*y_cur[IDX_POI]; - data[jistart + 18758] = 0.0 + k[5285]*y_cur[IDX_NI]; - data[jistart + 18759] = 0.0 - k[412]*y_cur[IDX_HII] - - k[2737]*y_cur[IDX_H3II] - k[2816]*y_cur[IDX_H3OII] - - k[2986]*y_cur[IDX_HCOII] - k[3300]*y_cur[IDX_HeII] - - k[5286]*y_cur[IDX_NI] - k[5909] - k[6250] - k[6982]; - data[jistart + 18760] = 0.0 + k[249]*y_cur[IDX_CI]; - data[jistart + 18761] = 0.0 + k[1214]*y_cur[IDX_eM] + - k[6595]*y_cur[IDX_GRAINM]; - data[jistart + 18762] = 0.0 + k[1217]*y_cur[IDX_eM] + - k[6619]*y_cur[IDX_GRAINM]; - data[jistart + 18763] = 0.0 + k[5288]*y_cur[IDX_NI]; - data[jistart + 18764] = 0.0 + k[1134]*y_cur[IDX_HPNII] + - k[1214]*y_cur[IDX_PNH2II] + k[1217]*y_cur[IDX_PNH3II]; - data[jistart + 18765] = 0.0 - k[249]*y_cur[IDX_PNII]; - data[jistart + 18766] = 0.0 - k[6560]*y_cur[IDX_PNII]; - data[jistart + 18767] = 0.0 + k[412]*y_cur[IDX_PNI]; - data[jistart + 18768] = 0.0 - k[3752]*y_cur[IDX_PNII]; - data[jistart + 18769] = 0.0 + k[412]*y_cur[IDX_HII]; - data[jistart + 18770] = 0.0 - k[249]*y_cur[IDX_CI] - - k[1211]*y_cur[IDX_eM] - k[3752]*y_cur[IDX_OI] - - k[6560]*y_cur[IDX_GRAINM]; - data[jistart + 18771] = 0.0 - k[1211]*y_cur[IDX_PNII]; - data[jistart + 18772] = 0.0 - k[6593]*y_cur[IDX_PNH2II] - - k[6594]*y_cur[IDX_PNH2II] - k[6595]*y_cur[IDX_PNH2II]; - data[jistart + 18773] = 0.0 + k[3595]*y_cur[IDX_PII] + - k[3597]*y_cur[IDX_PHII]; - data[jistart + 18774] = 0.0 + k[3595]*y_cur[IDX_NH3I]; - data[jistart + 18775] = 0.0 + k[3597]*y_cur[IDX_NH3I]; - data[jistart + 18776] = 0.0 - k[1212]*y_cur[IDX_eM] - - k[1213]*y_cur[IDX_eM] - k[1214]*y_cur[IDX_eM] - - k[6593]*y_cur[IDX_GRAINM] - k[6594]*y_cur[IDX_GRAINM] - - k[6595]*y_cur[IDX_GRAINM]; - data[jistart + 18777] = 0.0 - k[1212]*y_cur[IDX_PNH2II] - - k[1213]*y_cur[IDX_PNH2II] - k[1214]*y_cur[IDX_PNH2II]; - data[jistart + 18778] = 0.0 - k[6617]*y_cur[IDX_PNH3II] - - k[6618]*y_cur[IDX_PNH3II] - k[6619]*y_cur[IDX_PNH3II]; - data[jistart + 18779] = 0.0 + k[3598]*y_cur[IDX_PHII] + - k[3600]*y_cur[IDX_PH2II]; - data[jistart + 18780] = 0.0 + k[3598]*y_cur[IDX_NH3I]; - data[jistart + 18781] = 0.0 + k[3600]*y_cur[IDX_NH3I]; - data[jistart + 18782] = 0.0 - k[1215]*y_cur[IDX_eM] - - k[1216]*y_cur[IDX_eM] - k[1217]*y_cur[IDX_eM] - - k[6617]*y_cur[IDX_GRAINM] - k[6618]*y_cur[IDX_GRAINM] - - k[6619]*y_cur[IDX_GRAINM]; - data[jistart + 18783] = 0.0 - k[1215]*y_cur[IDX_PNH3II] - - k[1216]*y_cur[IDX_PNH3II] - k[1217]*y_cur[IDX_PNH3II]; - data[jistart + 18784] = 0.0 - k[192]*y_cur[IDX_POI]; - data[jistart + 18785] = 0.0 + k[7174] + k[7356] + k[7538]; - data[jistart + 18786] = 0.0 + k[6614]*y_cur[IDX_HPOII]; - data[jistart + 18787] = 0.0 - k[413]*y_cur[IDX_POI]; - data[jistart + 18788] = 0.0 + k[2553]*y_cur[IDX_HPOII]; - data[jistart + 18789] = 0.0 - k[2738]*y_cur[IDX_POI]; - data[jistart + 18790] = 0.0 - k[2987]*y_cur[IDX_POI]; - data[jistart + 18791] = 0.0 + k[5414]*y_cur[IDX_OI] + k[5873] + - k[6204]; - data[jistart + 18792] = 0.0 + k[1137]*y_cur[IDX_eM] + - k[2553]*y_cur[IDX_H2OI] + k[6614]*y_cur[IDX_GRAINM]; - data[jistart + 18793] = 0.0 - k[3301]*y_cur[IDX_POI]; - data[jistart + 18794] = 0.0 - k[5287]*y_cur[IDX_POI] - - k[5288]*y_cur[IDX_POI]; - data[jistart + 18795] = 0.0 + k[5414]*y_cur[IDX_HPOI] + - k[5435]*y_cur[IDX_PH2I] + k[5436]*y_cur[IDX_PHI]; - data[jistart + 18796] = 0.0 + k[5484]*y_cur[IDX_PI]; - data[jistart + 18797] = 0.0 + k[5484]*y_cur[IDX_O2I]; - data[jistart + 18798] = 0.0 + k[5436]*y_cur[IDX_OI]; - data[jistart + 18799] = 0.0 + k[5435]*y_cur[IDX_OI]; - data[jistart + 18800] = 0.0 - k[192]*y_cur[IDX_CII] - - k[413]*y_cur[IDX_HII] - k[2738]*y_cur[IDX_H3II] - - k[2987]*y_cur[IDX_HCOII] - k[3301]*y_cur[IDX_HeII] - - k[5287]*y_cur[IDX_NI] - k[5288]*y_cur[IDX_NI] - k[5910] - k[6251] - - k[6992]; - data[jistart + 18801] = 0.0 + k[1137]*y_cur[IDX_HPOII]; - data[jistart + 18802] = 0.0 + k[192]*y_cur[IDX_POI]; - data[jistart + 18803] = 0.0 + k[3811]*y_cur[IDX_PII]; - data[jistart + 18804] = 0.0 - k[6600]*y_cur[IDX_POII]; - data[jistart + 18805] = 0.0 + k[413]*y_cur[IDX_POI]; - data[jistart + 18806] = 0.0 + k[2563]*y_cur[IDX_PII]; - data[jistart + 18807] = 0.0 + k[3270]*y_cur[IDX_HeII]; - data[jistart + 18808] = 0.0 + k[3270]*y_cur[IDX_HPOI]; - data[jistart + 18809] = 0.0 + k[3751]*y_cur[IDX_PHII] + - k[3752]*y_cur[IDX_PNII]; - data[jistart + 18810] = 0.0 + k[3673]*y_cur[IDX_PH2II] + - k[3812]*y_cur[IDX_PII] + k[3818]*y_cur[IDX_PHII]; - data[jistart + 18811] = 0.0 + k[3813]*y_cur[IDX_PII]; - data[jistart + 18812] = 0.0 + k[3807]*y_cur[IDX_PII]; - data[jistart + 18813] = 0.0 + k[2563]*y_cur[IDX_H2OI] + - k[3807]*y_cur[IDX_OHI] + k[3811]*y_cur[IDX_CO2I] + - k[3812]*y_cur[IDX_O2I] + k[3813]*y_cur[IDX_OCSI]; - data[jistart + 18814] = 0.0 + k[3751]*y_cur[IDX_OI] + - k[3818]*y_cur[IDX_O2I]; - data[jistart + 18815] = 0.0 + k[3673]*y_cur[IDX_O2I]; - data[jistart + 18816] = 0.0 + k[3752]*y_cur[IDX_OI]; - data[jistart + 18817] = 0.0 + k[192]*y_cur[IDX_CII] + - k[413]*y_cur[IDX_HII]; - data[jistart + 18818] = 0.0 - k[1218]*y_cur[IDX_eM] - - k[6600]*y_cur[IDX_GRAINM]; - data[jistart + 18819] = 0.0 - k[1218]*y_cur[IDX_POII]; - data[jistart + 18820] = 0.0 + k[4958]*y_cur[IDX_CSI] + - k[4966]*y_cur[IDX_HSI] + k[4977]*y_cur[IDX_NSI] + - k[4984]*y_cur[IDX_S2I] + k[4987]*y_cur[IDX_SOI] - - k[5529]*y_cur[IDX_SI]; - data[jistart + 18821] = 0.0 - k[707]*y_cur[IDX_SI] - - k[708]*y_cur[IDX_SI] + k[1309]*y_cur[IDX_C2SI] + - k[1316]*y_cur[IDX_C3SI] + k[1322]*y_cur[IDX_C4SI] + - k[1430]*y_cur[IDX_SOI] + k[1448]*y_cur[IDX_SiSI] + - k[4832]*y_cur[IDX_SM] - k[5506]*y_cur[IDX_SI]; - data[jistart + 18822] = 0.0 + k[3915]*y_cur[IDX_SII]; - data[jistart + 18823] = 0.0 + k[3950]*y_cur[IDX_SII]; - data[jistart + 18824] = 0.0 + k[3985]*y_cur[IDX_SII]; - data[jistart + 18825] = 0.0 - k[4876]*y_cur[IDX_SI]; - data[jistart + 18826] = 0.0 - k[207]*y_cur[IDX_SI] - - k[1456]*y_cur[IDX_SI]; - data[jistart + 18827] = 0.0 + k[4020]*y_cur[IDX_SII]; - data[jistart + 18828] = 0.0 - k[4906]*y_cur[IDX_SI]; - data[jistart + 18829] = 0.0 - k[213]*y_cur[IDX_SI]; - data[jistart + 18830] = 0.0 + k[4055]*y_cur[IDX_SII]; - data[jistart + 18831] = 0.0 + k[3843]*y_cur[IDX_SOII]; - data[jistart + 18832] = 0.0 - k[1527]*y_cur[IDX_SI] - - k[1528]*y_cur[IDX_SI] + k[4833]*y_cur[IDX_SM]; - data[jistart + 18833] = 0.0 - k[1625]*y_cur[IDX_SI] + - k[4834]*y_cur[IDX_SM]; - data[jistart + 18834] = 0.0 - k[1679]*y_cur[IDX_SI]; - data[jistart + 18835] = 0.0 - k[5485]*y_cur[IDX_SI]; - data[jistart + 18836] = 0.0 + k[1309]*y_cur[IDX_CII] + - k[3094]*y_cur[IDX_HeII] + k[5715] + k[5999]; - data[jistart + 18837] = 0.0 + k[787]*y_cur[IDX_eM] + - k[6675]*y_cur[IDX_GRAINM]; - data[jistart + 18838] = 0.0 + k[4090]*y_cur[IDX_SII]; - data[jistart + 18839] = 0.0 + k[4125]*y_cur[IDX_SII]; - data[jistart + 18840] = 0.0 - k[3834]*y_cur[IDX_SI]; - data[jistart + 18841] = 0.0 - k[3835]*y_cur[IDX_SI]; - data[jistart + 18842] = 0.0 + k[4160]*y_cur[IDX_SII]; - data[jistart + 18843] = 0.0 + k[1316]*y_cur[IDX_CII]; - data[jistart + 18844] = 0.0 + k[817]*y_cur[IDX_eM] + - k[6776]*y_cur[IDX_GRAINM]; - data[jistart + 18845] = 0.0 + k[4195]*y_cur[IDX_SII]; - data[jistart + 18846] = 0.0 + k[4230]*y_cur[IDX_SII]; - data[jistart + 18847] = 0.0 + k[704]*y_cur[IDX_SII]; - data[jistart + 18848] = 0.0 - k[3836]*y_cur[IDX_SI] + - k[4835]*y_cur[IDX_SM]; - data[jistart + 18849] = 0.0 - k[3837]*y_cur[IDX_SI] + - k[4836]*y_cur[IDX_SM]; - data[jistart + 18850] = 0.0 + k[1322]*y_cur[IDX_CII]; - data[jistart + 18851] = 0.0 + k[4837]*y_cur[IDX_SM]; - data[jistart + 18852] = 0.0 + k[4265]*y_cur[IDX_SII]; - data[jistart + 18853] = 0.0 + k[4300]*y_cur[IDX_SII]; - data[jistart + 18854] = 0.0 + k[4335]*y_cur[IDX_SII]; - data[jistart + 18855] = 0.0 + k[4370]*y_cur[IDX_SII]; - data[jistart + 18856] = 0.0 + k[4405]*y_cur[IDX_SII]; - data[jistart + 18857] = 0.0 + k[4440]*y_cur[IDX_SII]; - data[jistart + 18858] = 0.0 + k[4475]*y_cur[IDX_SII]; - data[jistart + 18859] = 0.0 + k[4510]*y_cur[IDX_SII]; - data[jistart + 18860] = 0.0 + k[4545]*y_cur[IDX_SII]; - data[jistart + 18861] = 0.0 + k[4580]*y_cur[IDX_SII]; - data[jistart + 18862] = 0.0 + k[4615]*y_cur[IDX_SII]; - data[jistart + 18863] = 0.0 + k[2255]*y_cur[IDX_HSII] - - k[5100]*y_cur[IDX_SI] - k[5101]*y_cur[IDX_SI]; - data[jistart + 18864] = 0.0 - k[256]*y_cur[IDX_SI] - - k[1973]*y_cur[IDX_SI] - k[1974]*y_cur[IDX_SI]; - data[jistart + 18865] = 0.0 + k[4650]*y_cur[IDX_SII]; - data[jistart + 18866] = 0.0 - k[5019]*y_cur[IDX_SI] - - k[5020]*y_cur[IDX_SI]; - data[jistart + 18867] = 0.0 - k[1994]*y_cur[IDX_SI]; - data[jistart + 18868] = 0.0 - k[3838]*y_cur[IDX_SI] + - k[4838]*y_cur[IDX_SM]; - data[jistart + 18869] = 0.0 - k[5048]*y_cur[IDX_SI]; - data[jistart + 18870] = 0.0 - k[2095]*y_cur[IDX_SI] + - k[4839]*y_cur[IDX_SM]; - data[jistart + 18871] = 0.0 + k[702]*y_cur[IDX_SII]; - data[jistart + 18872] = 0.0 - k[5062]*y_cur[IDX_SI]; - data[jistart + 18873] = 0.0 - k[2235]*y_cur[IDX_SI]; - data[jistart + 18874] = 0.0 - k[5125]*y_cur[IDX_SI]; - data[jistart + 18875] = 0.0 - k[305]*y_cur[IDX_SI]; - data[jistart + 18876] = 0.0 + k[4685]*y_cur[IDX_SII]; - data[jistart + 18877] = 0.0 + k[4840]*y_cur[IDX_SM]; - data[jistart + 18878] = 0.0 - k[313]*y_cur[IDX_SI]; - data[jistart + 18879] = 0.0 + k[3215]*y_cur[IDX_HeII] + - k[4958]*y_cur[IDX_CI] + k[5263]*y_cur[IDX_NI] + - k[5392]*y_cur[IDX_OI] + k[5829] + k[6142]; - data[jistart + 18880] = 0.0 + k[985]*y_cur[IDX_eM] + - k[3732]*y_cur[IDX_OI] + k[6535]*y_cur[IDX_GRAINM]; - data[jistart + 18881] = 0.0 + k[703]*y_cur[IDX_SII]; - data[jistart + 18882] = 0.0 + k[4841]*y_cur[IDX_SM]; - data[jistart + 18883] = 0.0 + k[6424]*y_cur[IDX_SII] + - k[6445]*y_cur[IDX_HSII] + k[6447]*y_cur[IDX_H2SII] + - k[6453]*y_cur[IDX_H3SII] + k[6535]*y_cur[IDX_CSII] + - k[6554]*y_cur[IDX_HCSII] + k[6581]*y_cur[IDX_NSII] + - k[6620]*y_cur[IDX_SOII] + k[6675]*y_cur[IDX_C2SII] + - k[6708]*y_cur[IDX_OCSII] + k[6710]*y_cur[IDX_SiSII] + - k[6750]*y_cur[IDX_SO2II] + k[6752]*y_cur[IDX_S2II] + - k[6752]*y_cur[IDX_S2II] + k[6758]*y_cur[IDX_HS2II] + - k[6776]*y_cur[IDX_C3SII]; - data[jistart + 18884] = 0.0 + k[7114] + k[7296] + k[7478]; - data[jistart + 18885] = 0.0 + k[5178]*y_cur[IDX_HSI] + - k[5189]*y_cur[IDX_NSI] + k[5199]*y_cur[IDX_S2I] + - k[5201]*y_cur[IDX_SOI]; - data[jistart + 18886] = 0.0 - k[415]*y_cur[IDX_SI] + - k[4842]*y_cur[IDX_SM]; - data[jistart + 18887] = 0.0 + k[4721]*y_cur[IDX_SII]; - data[jistart + 18888] = 0.0 - k[5149]*y_cur[IDX_SI]; - data[jistart + 18889] = 0.0 - k[460]*y_cur[IDX_SI] - - k[2490]*y_cur[IDX_SI] + k[4843]*y_cur[IDX_SM]; - data[jistart + 18890] = 0.0 + k[3224]*y_cur[IDX_HeII]; - data[jistart + 18891] = 0.0 + k[2554]*y_cur[IDX_HSII]; - data[jistart + 18892] = 0.0 - k[476]*y_cur[IDX_SI] - - k[2516]*y_cur[IDX_SI] - k[2517]*y_cur[IDX_SI]; - data[jistart + 18893] = 0.0 + k[3054]*y_cur[IDX_HSII] + - k[3518]*y_cur[IDX_NH2II] + k[5842] + k[6165]; - data[jistart + 18894] = 0.0 - k[709]*y_cur[IDX_SI] + - k[1020]*y_cur[IDX_eM] + k[4844]*y_cur[IDX_SM] + - k[6447]*y_cur[IDX_GRAINM]; - data[jistart + 18895] = 0.0 - k[2740]*y_cur[IDX_SI] + - k[4845]*y_cur[IDX_SM]; - data[jistart + 18896] = 0.0 + k[4846]*y_cur[IDX_SM]; - data[jistart + 18897] = 0.0 + k[1048]*y_cur[IDX_eM] - - k[3839]*y_cur[IDX_SI] + k[6453]*y_cur[IDX_GRAINM]; - data[jistart + 18898] = 0.0 + k[4847]*y_cur[IDX_SM]; - data[jistart + 18899] = 0.0 + k[2879]*y_cur[IDX_HSII]; - data[jistart + 18900] = 0.0 - k[496]*y_cur[IDX_SI] - - k[2860]*y_cur[IDX_SI]; - data[jistart + 18901] = 0.0 + k[4848]*y_cur[IDX_SM] + - k[4849]*y_cur[IDX_SM]; - data[jistart + 18902] = 0.0 + k[503]*y_cur[IDX_SII] - - k[5486]*y_cur[IDX_SI] - k[5487]*y_cur[IDX_SI]; - data[jistart + 18903] = 0.0 - k[2989]*y_cur[IDX_SI] + - k[4850]*y_cur[IDX_SM] + k[4851]*y_cur[IDX_SM]; - data[jistart + 18904] = 0.0 + k[5268]*y_cur[IDX_NI]; - data[jistart + 18905] = 0.0 + k[1107]*y_cur[IDX_eM] + - k[3739]*y_cur[IDX_OI] + k[6554]*y_cur[IDX_GRAINM]; - data[jistart + 18906] = 0.0 + k[3043]*y_cur[IDX_HSII]; - data[jistart + 18907] = 0.0 - k[3050]*y_cur[IDX_SI]; - data[jistart + 18908] = 0.0 + k[4966]*y_cur[IDX_CI] + - k[5178]*y_cur[IDX_HI] + k[5219]*y_cur[IDX_HSI] + - k[5219]*y_cur[IDX_HSI] + k[5272]*y_cur[IDX_NI] + - k[5415]*y_cur[IDX_OI] - k[5488]*y_cur[IDX_SI] + k[5875] + k[6209]; - data[jistart + 18909] = 0.0 - k[710]*y_cur[IDX_SI] + - k[1138]*y_cur[IDX_eM] + k[2255]*y_cur[IDX_CHI] + - k[2554]*y_cur[IDX_H2OI] + k[2879]*y_cur[IDX_HCNI] + - k[3043]*y_cur[IDX_HNCI] + k[3054]*y_cur[IDX_H2SI] + - k[3589]*y_cur[IDX_NH3I] + k[6206] + k[6445]*y_cur[IDX_GRAINM]; - data[jistart + 18910] = 0.0 + k[5874] + k[6208]; - data[jistart + 18911] = 0.0 + k[1139]*y_cur[IDX_eM] + - k[6758]*y_cur[IDX_GRAINM]; - data[jistart + 18912] = 0.0 + k[3094]*y_cur[IDX_C2SI] + - k[3215]*y_cur[IDX_CSI] + k[3224]*y_cur[IDX_H2CSI] + - k[3289]*y_cur[IDX_NSI] + k[3296]*y_cur[IDX_OCSI] + - k[3302]*y_cur[IDX_S2I] + k[3306]*y_cur[IDX_SOI] + - k[3335]*y_cur[IDX_SiSI] + k[4852]*y_cur[IDX_SM]; - data[jistart + 18913] = 0.0 + k[538]*y_cur[IDX_SII]; - data[jistart + 18914] = 0.0 + k[4853]*y_cur[IDX_SM]; - data[jistart + 18915] = 0.0 + k[5263]*y_cur[IDX_CSI] + - k[5268]*y_cur[IDX_HCSI] + k[5272]*y_cur[IDX_HSI] + - k[5280]*y_cur[IDX_NSI] + k[5289]*y_cur[IDX_S2I] + - k[5291]*y_cur[IDX_SOI]; - data[jistart + 18916] = 0.0 + k[4854]*y_cur[IDX_SM]; - data[jistart + 18917] = 0.0 - k[572]*y_cur[IDX_SI]; - data[jistart + 18918] = 0.0 - k[3376]*y_cur[IDX_SI] + - k[4855]*y_cur[IDX_SM]; - data[jistart + 18919] = 0.0 - k[5324]*y_cur[IDX_SI] - - k[5325]*y_cur[IDX_SI]; - data[jistart + 18920] = 0.0 - k[579]*y_cur[IDX_SI] - - k[3505]*y_cur[IDX_SI] - k[3506]*y_cur[IDX_SI]; - data[jistart + 18921] = 0.0 - k[584]*y_cur[IDX_SI] + - k[3518]*y_cur[IDX_H2SI] - k[3526]*y_cur[IDX_SI] - - k[3527]*y_cur[IDX_SI]; - data[jistart + 18922] = 0.0 + k[614]*y_cur[IDX_SII] + - k[3589]*y_cur[IDX_HSII]; - data[jistart + 18923] = 0.0 + k[4856]*y_cur[IDX_SM]; - data[jistart + 18924] = 0.0 + k[4857]*y_cur[IDX_SM]; - data[jistart + 18925] = 0.0 + k[629]*y_cur[IDX_SII] - - k[5333]*y_cur[IDX_SI] - k[5334]*y_cur[IDX_SI]; - data[jistart + 18926] = 0.0 + k[4858]*y_cur[IDX_SM]; - data[jistart + 18927] = 0.0 + k[3289]*y_cur[IDX_HeII] + - k[4977]*y_cur[IDX_CI] + k[5189]*y_cur[IDX_HI] + - k[5280]*y_cur[IDX_NI] + k[5425]*y_cur[IDX_OI] + k[5893] + k[6230]; - data[jistart + 18928] = 0.0 + k[1173]*y_cur[IDX_eM] + - k[3748]*y_cur[IDX_OI] + k[6581]*y_cur[IDX_GRAINM]; - data[jistart + 18929] = 0.0 + k[643]*y_cur[IDX_SII]; - data[jistart + 18930] = 0.0 + k[4859]*y_cur[IDX_SM]; - data[jistart + 18931] = 0.0 + k[3732]*y_cur[IDX_CSII] + - k[3739]*y_cur[IDX_HCSII] + k[3748]*y_cur[IDX_NSII] + - k[5392]*y_cur[IDX_CSI] + k[5415]*y_cur[IDX_HSI] + - k[5425]*y_cur[IDX_NSI] + k[5430]*y_cur[IDX_OCSI] + - k[5437]*y_cur[IDX_S2I] + k[5439]*y_cur[IDX_SOI]; - data[jistart + 18932] = 0.0 + k[4860]*y_cur[IDX_SM]; - data[jistart + 18933] = 0.0 + k[4756]*y_cur[IDX_SII]; - data[jistart + 18934] = 0.0 - k[5337]*y_cur[IDX_SI]; - data[jistart + 18935] = 0.0 - k[677]*y_cur[IDX_SI] - - k[3667]*y_cur[IDX_SI]; - data[jistart + 18936] = 0.0 + k[4791]*y_cur[IDX_SII]; - data[jistart + 18937] = 0.0 - k[3840]*y_cur[IDX_SI]; - data[jistart + 18938] = 0.0 + k[3296]*y_cur[IDX_HeII] + - k[5430]*y_cur[IDX_OI] + k[5903] + k[6241]; - data[jistart + 18939] = 0.0 + k[1179]*y_cur[IDX_eM] + - k[6708]*y_cur[IDX_GRAINM]; - data[jistart + 18940] = 0.0 - k[5480]*y_cur[IDX_SI]; - data[jistart + 18941] = 0.0 - k[695]*y_cur[IDX_SI] - - k[3789]*y_cur[IDX_SI] - k[3790]*y_cur[IDX_SI]; - data[jistart + 18942] = 0.0 + k[4826]*y_cur[IDX_SII]; - data[jistart + 18943] = 0.0 - k[207]*y_cur[IDX_C2II] - - k[213]*y_cur[IDX_C2HII] - k[256]*y_cur[IDX_CHII] - - k[305]*y_cur[IDX_CNII] - k[313]*y_cur[IDX_COII] - - k[415]*y_cur[IDX_HII] - k[460]*y_cur[IDX_H2COII] - - k[476]*y_cur[IDX_H2OII] - k[496]*y_cur[IDX_HCNII] - - k[572]*y_cur[IDX_N2II] - k[579]*y_cur[IDX_NHII] - - k[584]*y_cur[IDX_NH2II] - k[677]*y_cur[IDX_O2II] - - k[695]*y_cur[IDX_OHII] - k[707]*y_cur[IDX_CII] - - k[708]*y_cur[IDX_CII] - k[709]*y_cur[IDX_H2SII] - - k[710]*y_cur[IDX_HSII] - k[1456]*y_cur[IDX_C2II] - - k[1527]*y_cur[IDX_C2H2II] - k[1528]*y_cur[IDX_C2H2II] - - k[1625]*y_cur[IDX_C2H3II] - k[1679]*y_cur[IDX_C2H4II] - - k[1973]*y_cur[IDX_CHII] - k[1974]*y_cur[IDX_CHII] - - k[1994]*y_cur[IDX_CH2II] - k[2095]*y_cur[IDX_CH3II] - - k[2235]*y_cur[IDX_CH5II] - k[2490]*y_cur[IDX_H2COII] - - k[2516]*y_cur[IDX_H2OII] - k[2517]*y_cur[IDX_H2OII] - - k[2740]*y_cur[IDX_H3II] - k[2860]*y_cur[IDX_HCNII] - - k[2989]*y_cur[IDX_HCOII] - k[3050]*y_cur[IDX_HNOII] - - k[3376]*y_cur[IDX_N2HII] - k[3505]*y_cur[IDX_NHII] - - k[3506]*y_cur[IDX_NHII] - k[3526]*y_cur[IDX_NH2II] - - k[3527]*y_cur[IDX_NH2II] - k[3667]*y_cur[IDX_O2II] - - k[3789]*y_cur[IDX_OHII] - k[3790]*y_cur[IDX_OHII] - - k[3834]*y_cur[IDX_C3H2II] - k[3835]*y_cur[IDX_C3H3II] - - k[3836]*y_cur[IDX_C4H2II] - k[3837]*y_cur[IDX_C4H3II] - - k[3838]*y_cur[IDX_CH2CCHII] - k[3839]*y_cur[IDX_H3SII] - - k[3840]*y_cur[IDX_O2HII] - k[3841]*y_cur[IDX_SiCH2II] - - k[3842]*y_cur[IDX_SiOII] - k[3883]*y_cur[IDX_SiH2II] - - k[4876]*y_cur[IDX_C2I] - k[4906]*y_cur[IDX_C2HI] - - k[5019]*y_cur[IDX_CH2I] - k[5020]*y_cur[IDX_CH2I] - - k[5048]*y_cur[IDX_CH3I] - k[5062]*y_cur[IDX_CH4I] - - k[5100]*y_cur[IDX_CHI] - k[5101]*y_cur[IDX_CHI] - - k[5125]*y_cur[IDX_CNI] - k[5149]*y_cur[IDX_H2I] - - k[5324]*y_cur[IDX_NHI] - k[5325]*y_cur[IDX_NHI] - - k[5333]*y_cur[IDX_NOI] - k[5334]*y_cur[IDX_NOI] - - k[5337]*y_cur[IDX_O2I] - k[5480]*y_cur[IDX_OHI] - - k[5485]*y_cur[IDX_C2OI] - k[5486]*y_cur[IDX_HCOI] - - k[5487]*y_cur[IDX_HCOI] - k[5488]*y_cur[IDX_HSI] - - k[5489]*y_cur[IDX_SO2I] - k[5490]*y_cur[IDX_SOI] - - k[5506]*y_cur[IDX_CII] - k[5529]*y_cur[IDX_CI] - - k[5610]*y_cur[IDX_eM] - k[5913] - k[6255] - k[6303] - k[6932]; - data[jistart + 18944] = 0.0 + k[503]*y_cur[IDX_HCOI] + - k[538]*y_cur[IDX_MgI] + k[614]*y_cur[IDX_NH3I] + - k[629]*y_cur[IDX_NOI] + k[643]*y_cur[IDX_NaI] + - k[702]*y_cur[IDX_CH3CHCH2I] + k[703]*y_cur[IDX_FeI] + - k[704]*y_cur[IDX_C4H2I] + k[705]*y_cur[IDX_SiCI] + - k[706]*y_cur[IDX_SiSI] + k[724]*y_cur[IDX_SiI] + - k[725]*y_cur[IDX_SiHI] + k[3915]*y_cur[IDX_CM] + - k[3950]*y_cur[IDX_C10M] + k[3985]*y_cur[IDX_C10HM] + - k[4020]*y_cur[IDX_C2M] + k[4055]*y_cur[IDX_C2HM] + - k[4090]*y_cur[IDX_C3M] + k[4125]*y_cur[IDX_C3HM] + - k[4160]*y_cur[IDX_C3NM] + k[4195]*y_cur[IDX_C4M] + - k[4230]*y_cur[IDX_C4HM] + k[4265]*y_cur[IDX_C5M] + - k[4300]*y_cur[IDX_C5HM] + k[4335]*y_cur[IDX_C5NM] + - k[4370]*y_cur[IDX_C6M] + k[4405]*y_cur[IDX_C6HM] + - k[4440]*y_cur[IDX_C7M] + k[4475]*y_cur[IDX_C7HM] + - k[4510]*y_cur[IDX_C8M] + k[4545]*y_cur[IDX_C8HM] + - k[4580]*y_cur[IDX_C9M] + k[4615]*y_cur[IDX_C9HM] + - k[4650]*y_cur[IDX_CHM] + k[4685]*y_cur[IDX_CNM] + - k[4721]*y_cur[IDX_HM] + k[4756]*y_cur[IDX_OM] + - k[4791]*y_cur[IDX_O2M] + k[4826]*y_cur[IDX_OHM] + - k[4861]*y_cur[IDX_SM] + k[4861]*y_cur[IDX_SM] + - k[5625]*y_cur[IDX_eM] + k[6424]*y_cur[IDX_GRAINM]; - data[jistart + 18945] = 0.0 + k[4832]*y_cur[IDX_CII] + - k[4833]*y_cur[IDX_C2H2II] + k[4834]*y_cur[IDX_C2H3II] + - k[4835]*y_cur[IDX_C4H2II] + k[4836]*y_cur[IDX_C4H3II] + - k[4837]*y_cur[IDX_C4SII] + k[4838]*y_cur[IDX_CH2CCHII] + - k[4839]*y_cur[IDX_CH3II] + k[4840]*y_cur[IDX_CNCII] + - k[4841]*y_cur[IDX_FeII] + k[4842]*y_cur[IDX_HII] + - k[4843]*y_cur[IDX_H2COII] + k[4844]*y_cur[IDX_H2SII] + + k[4780]*y_cur[IDX_HCOII] + k[4785]*y_cur[IDX_N2HII] + + k[4787]*y_cur[IDX_NH4II] + k[4795]*y_cur[IDX_SiOHII]; + data[jistart + 20669] = 0.0 - k[105]*y_cur[IDX_HI] + k[4631]*y_cur[IDX_HII] + + k[4634]*y_cur[IDX_H3II] + k[4635]*y_cur[IDX_H3OII] + + k[4636]*y_cur[IDX_HC2SII] + k[4637]*y_cur[IDX_HCNHII] + + k[4638]*y_cur[IDX_HCNHII] + k[4639]*y_cur[IDX_HCOII] + + k[4644]*y_cur[IDX_N2HII] + k[4646]*y_cur[IDX_NH4II] + + k[4654]*y_cur[IDX_SiOHII]; + data[jistart + 20670] = 0.0 - k[489]*y_cur[IDX_HI] + k[987]*y_cur[IDX_eM] + + k[987]*y_cur[IDX_eM] + k[2369]*y_cur[IDX_C2I] + + k[2370]*y_cur[IDX_C2H2I] + k[2372]*y_cur[IDX_C2H4I] + + k[2373]*y_cur[IDX_C2HI] + k[2374]*y_cur[IDX_CI] + + k[2375]*y_cur[IDX_CH2I] + k[2377]*y_cur[IDX_C2H6I] + + k[2378]*y_cur[IDX_CH4I] + k[2379]*y_cur[IDX_CH4I] + + k[2380]*y_cur[IDX_CHI] + k[2381]*y_cur[IDX_CNI] + + k[2382]*y_cur[IDX_CO2I] + k[2383]*y_cur[IDX_COI] + + k[2384]*y_cur[IDX_H2I] + k[2385]*y_cur[IDX_H2COI] + + k[2386]*y_cur[IDX_H2OI] + k[2387]*y_cur[IDX_H2SI] + + k[2390]*y_cur[IDX_HeI] + k[2391]*y_cur[IDX_N2I] + + k[2392]*y_cur[IDX_NI] + k[2393]*y_cur[IDX_NHI] + + k[2394]*y_cur[IDX_NOI] + k[2395]*y_cur[IDX_O2I] + + k[2396]*y_cur[IDX_OI] + k[2397]*y_cur[IDX_OHI] + + k[4702]*y_cur[IDX_HM] + k[6148] + k[6309]*y_cur[IDX_GRAINM] + + k[6309]*y_cur[IDX_GRAINM]; + data[jistart + 20671] = 0.0 + k[407]*y_cur[IDX_HII] + k[1756]*y_cur[IDX_C3HII] + + k[4905]*y_cur[IDX_C2HI] + k[5098]*y_cur[IDX_CHI] - + k[5197]*y_cur[IDX_HI]; + data[jistart + 20672] = 0.0 + k[1159]*y_cur[IDX_eM] + k[1159]*y_cur[IDX_eM] + + k[1160]*y_cur[IDX_eM] + k[2463]*y_cur[IDX_H2I] + + k[3464]*y_cur[IDX_NI] + k[3526]*y_cur[IDX_SI] + + k[3746]*y_cur[IDX_OI] + k[6324]*y_cur[IDX_GRAINM] + + k[6324]*y_cur[IDX_GRAINM] + k[6325]*y_cur[IDX_GRAINM]; + data[jistart + 20673] = 0.0 + k[409]*y_cur[IDX_HII] + k[1526]*y_cur[IDX_C2H2II] + + k[2094]*y_cur[IDX_CH3II] + k[3814]*y_cur[IDX_C3H2II] + + k[3815]*y_cur[IDX_C4H2II]; + data[jistart + 20674] = 0.0 - k[109]*y_cur[IDX_HI] + k[4842]*y_cur[IDX_HII] + k[4845]*y_cur[IDX_H3II] + k[4846]*y_cur[IDX_H3OII] + k[4847]*y_cur[IDX_HC2SII] + k[4848]*y_cur[IDX_HCNHII] + k[4849]*y_cur[IDX_HCNHII] + k[4850]*y_cur[IDX_HCOII] + - k[4851]*y_cur[IDX_HCOII] + k[4852]*y_cur[IDX_HeII] + - k[4853]*y_cur[IDX_MgII] + k[4854]*y_cur[IDX_NII] + - k[4855]*y_cur[IDX_N2HII] + k[4856]*y_cur[IDX_NH3II] + - k[4857]*y_cur[IDX_NH4II] + k[4858]*y_cur[IDX_NOII] + - k[4859]*y_cur[IDX_NaII] + k[4860]*y_cur[IDX_OII] + - k[4861]*y_cur[IDX_SII] + k[4861]*y_cur[IDX_SII] + - k[4862]*y_cur[IDX_SOII] + k[4863]*y_cur[IDX_SiII] + - k[4864]*y_cur[IDX_SiOII] + k[4865]*y_cur[IDX_SiOHII] + - k[4866]*y_cur[IDX_SiSII] + k[5911] + k[6252]; - data[jistart + 18946] = 0.0 + k[3302]*y_cur[IDX_HeII] + - k[4984]*y_cur[IDX_CI] + k[5199]*y_cur[IDX_HI] + - k[5289]*y_cur[IDX_NI] + k[5437]*y_cur[IDX_OI] + k[5912] + k[5912] + - k[6254] + k[6254]; - data[jistart + 18947] = 0.0 + k[1219]*y_cur[IDX_eM] + - k[1219]*y_cur[IDX_eM] + k[6752]*y_cur[IDX_GRAINM] + - k[6752]*y_cur[IDX_GRAINM]; - data[jistart + 18948] = 0.0 + k[1430]*y_cur[IDX_CII] + - k[3306]*y_cur[IDX_HeII] + k[4987]*y_cur[IDX_CI] + - k[5201]*y_cur[IDX_HI] + k[5291]*y_cur[IDX_NI] + - k[5439]*y_cur[IDX_OI] - k[5490]*y_cur[IDX_SI] + k[5915] + k[6257]; - data[jistart + 18949] = 0.0 + k[1220]*y_cur[IDX_eM] + - k[3843]*y_cur[IDX_C2H2I] + k[4862]*y_cur[IDX_SM] + - k[6620]*y_cur[IDX_GRAINM]; - data[jistart + 18950] = 0.0 - k[5489]*y_cur[IDX_SI]; - data[jistart + 18951] = 0.0 + k[1221]*y_cur[IDX_eM] + - k[6750]*y_cur[IDX_GRAINM]; - data[jistart + 18952] = 0.0 + k[724]*y_cur[IDX_SII]; - data[jistart + 18953] = 0.0 + k[4863]*y_cur[IDX_SM]; - data[jistart + 18954] = 0.0 + k[705]*y_cur[IDX_SII]; - data[jistart + 18955] = 0.0 - k[3841]*y_cur[IDX_SI]; - data[jistart + 18956] = 0.0 + k[725]*y_cur[IDX_SII]; - data[jistart + 18957] = 0.0 - k[3883]*y_cur[IDX_SI]; - data[jistart + 18958] = 0.0 - k[3842]*y_cur[IDX_SI] + - k[4864]*y_cur[IDX_SM]; - data[jistart + 18959] = 0.0 + k[4865]*y_cur[IDX_SM]; - data[jistart + 18960] = 0.0 + k[706]*y_cur[IDX_SII] + - k[1448]*y_cur[IDX_CII] + k[3335]*y_cur[IDX_HeII] + k[5935] + - k[6288]; - data[jistart + 18961] = 0.0 + k[1269]*y_cur[IDX_eM] + - k[4866]*y_cur[IDX_SM] + k[6710]*y_cur[IDX_GRAINM]; - data[jistart + 18962] = 0.0 + k[787]*y_cur[IDX_C2SII] + - k[817]*y_cur[IDX_C3SII] + k[985]*y_cur[IDX_CSII] + - k[1020]*y_cur[IDX_H2SII] + k[1048]*y_cur[IDX_H3SII] + - k[1107]*y_cur[IDX_HCSII] + k[1138]*y_cur[IDX_HSII] + - k[1139]*y_cur[IDX_HS2II] + k[1173]*y_cur[IDX_NSII] + - k[1179]*y_cur[IDX_OCSII] + k[1219]*y_cur[IDX_S2II] + - k[1219]*y_cur[IDX_S2II] + k[1220]*y_cur[IDX_SOII] + - k[1221]*y_cur[IDX_SO2II] + k[1269]*y_cur[IDX_SiSII] - - k[5610]*y_cur[IDX_SI] + k[5625]*y_cur[IDX_SII]; - data[jistart + 18963] = 0.0 - k[5528]*y_cur[IDX_SII]; - data[jistart + 18964] = 0.0 + k[707]*y_cur[IDX_SI] + - k[708]*y_cur[IDX_SI] + k[1429]*y_cur[IDX_SOI]; - data[jistart + 18965] = 0.0 - k[3915]*y_cur[IDX_SII]; - data[jistart + 18966] = 0.0 - k[3950]*y_cur[IDX_SII]; - data[jistart + 18967] = 0.0 - k[3985]*y_cur[IDX_SII]; - data[jistart + 18968] = 0.0 - k[1464]*y_cur[IDX_SII]; - data[jistart + 18969] = 0.0 + k[207]*y_cur[IDX_SI]; - data[jistart + 18970] = 0.0 - k[4020]*y_cur[IDX_SII]; - data[jistart + 18971] = 0.0 - k[1750]*y_cur[IDX_SII]; - data[jistart + 18972] = 0.0 + k[213]*y_cur[IDX_SI]; - data[jistart + 18973] = 0.0 - k[4055]*y_cur[IDX_SII]; - data[jistart + 18974] = 0.0 - k[1573]*y_cur[IDX_SII]; - data[jistart + 18975] = 0.0 - k[1645]*y_cur[IDX_SII]; - data[jistart + 18976] = 0.0 - k[1715]*y_cur[IDX_SII] - - k[1716]*y_cur[IDX_SII] - k[1717]*y_cur[IDX_SII]; - data[jistart + 18977] = 0.0 + k[3093]*y_cur[IDX_HeII]; - data[jistart + 18978] = 0.0 - k[4090]*y_cur[IDX_SII]; - data[jistart + 18979] = 0.0 - k[3821]*y_cur[IDX_SII]; - data[jistart + 18980] = 0.0 - k[4125]*y_cur[IDX_SII]; - data[jistart + 18981] = 0.0 - k[3820]*y_cur[IDX_SII]; - data[jistart + 18982] = 0.0 - k[4160]*y_cur[IDX_SII]; - data[jistart + 18983] = 0.0 - k[4195]*y_cur[IDX_SII]; - data[jistart + 18984] = 0.0 - k[3822]*y_cur[IDX_SII]; - data[jistart + 18985] = 0.0 - k[4230]*y_cur[IDX_SII]; - data[jistart + 18986] = 0.0 - k[704]*y_cur[IDX_SII] - - k[3830]*y_cur[IDX_SII] - k[3831]*y_cur[IDX_SII] - - k[3832]*y_cur[IDX_SII]; - data[jistart + 18987] = 0.0 - k[4265]*y_cur[IDX_SII]; - data[jistart + 18988] = 0.0 - k[4300]*y_cur[IDX_SII]; - data[jistart + 18989] = 0.0 - k[4335]*y_cur[IDX_SII]; - data[jistart + 18990] = 0.0 - k[4370]*y_cur[IDX_SII]; - data[jistart + 18991] = 0.0 - k[4405]*y_cur[IDX_SII]; - data[jistart + 18992] = 0.0 - k[4440]*y_cur[IDX_SII]; - data[jistart + 18993] = 0.0 - k[4475]*y_cur[IDX_SII]; - data[jistart + 18994] = 0.0 - k[4510]*y_cur[IDX_SII]; - data[jistart + 18995] = 0.0 - k[4545]*y_cur[IDX_SII]; - data[jistart + 18996] = 0.0 - k[4580]*y_cur[IDX_SII]; - data[jistart + 18997] = 0.0 - k[4615]*y_cur[IDX_SII]; - data[jistart + 18998] = 0.0 - k[2265]*y_cur[IDX_SII]; - data[jistart + 18999] = 0.0 + k[256]*y_cur[IDX_SI]; - data[jistart + 19000] = 0.0 - k[4650]*y_cur[IDX_SII]; - data[jistart + 19001] = 0.0 - k[2017]*y_cur[IDX_SII]; - data[jistart + 19002] = 0.0 - k[2101]*y_cur[IDX_SII]; - data[jistart + 19003] = 0.0 - k[702]*y_cur[IDX_SII] - - k[3823]*y_cur[IDX_SII] - k[3824]*y_cur[IDX_SII] - - k[3825]*y_cur[IDX_SII] - k[3826]*y_cur[IDX_SII]; - data[jistart + 19004] = 0.0 - k[2215]*y_cur[IDX_SII] - - k[2216]*y_cur[IDX_SII]; - data[jistart + 19005] = 0.0 + k[305]*y_cur[IDX_SI]; - data[jistart + 19006] = 0.0 - k[4685]*y_cur[IDX_SII]; - data[jistart + 19007] = 0.0 + k[313]*y_cur[IDX_SI]; - data[jistart + 19008] = 0.0 + k[3214]*y_cur[IDX_HeII]; - data[jistart + 19009] = 0.0 + k[6140]; - data[jistart + 19010] = 0.0 - k[703]*y_cur[IDX_SII]; - data[jistart + 19011] = 0.0 - k[6424]*y_cur[IDX_SII]; - data[jistart + 19012] = 0.0 + k[2844]*y_cur[IDX_HSII]; - data[jistart + 19013] = 0.0 + k[415]*y_cur[IDX_SI] + - k[2340]*y_cur[IDX_H2SI] + k[2353]*y_cur[IDX_HSI]; - data[jistart + 19014] = 0.0 - k[4721]*y_cur[IDX_SII]; - data[jistart + 19015] = 0.0 - k[2470]*y_cur[IDX_SII] - - k[5561]*y_cur[IDX_SII]; - data[jistart + 19016] = 0.0 + k[2388]*y_cur[IDX_H2SI]; - data[jistart + 19017] = 0.0 - k[3827]*y_cur[IDX_SII]; - data[jistart + 19018] = 0.0 - k[2500]*y_cur[IDX_SII] - - k[2501]*y_cur[IDX_SII]; - data[jistart + 19019] = 0.0 + k[460]*y_cur[IDX_SI]; - data[jistart + 19020] = 0.0 + k[3223]*y_cur[IDX_HeII]; - data[jistart + 19021] = 0.0 + k[476]*y_cur[IDX_SI]; - data[jistart + 19022] = 0.0 + k[2340]*y_cur[IDX_HII] + - k[2388]*y_cur[IDX_H2II] + k[3230]*y_cur[IDX_HeII] + - k[3349]*y_cur[IDX_NII] + k[3363]*y_cur[IDX_N2II] + - k[3643]*y_cur[IDX_OII] - k[3828]*y_cur[IDX_SII] - - k[3829]*y_cur[IDX_SII]; - data[jistart + 19023] = 0.0 + k[709]*y_cur[IDX_SI]; - data[jistart + 19024] = 0.0 + k[496]*y_cur[IDX_SI]; - data[jistart + 19025] = 0.0 - k[503]*y_cur[IDX_SII] - - k[3012]*y_cur[IDX_SII]; - data[jistart + 19026] = 0.0 + k[2353]*y_cur[IDX_HII] + - k[3273]*y_cur[IDX_HeII]; - data[jistart + 19027] = 0.0 + k[710]*y_cur[IDX_SI] + - k[2844]*y_cur[IDX_HI] + k[3742]*y_cur[IDX_OI] + k[6205]; - data[jistart + 19028] = 0.0 + k[3271]*y_cur[IDX_HeII]; - data[jistart + 19029] = 0.0 + k[3093]*y_cur[IDX_C2SI] + - k[3214]*y_cur[IDX_CSI] + k[3223]*y_cur[IDX_H2CSI] + - k[3230]*y_cur[IDX_H2SI] + k[3271]*y_cur[IDX_HS2I] + - k[3273]*y_cur[IDX_HSI] + k[3288]*y_cur[IDX_NSI] + - k[3295]*y_cur[IDX_OCSI] + k[3302]*y_cur[IDX_S2I] + - k[3303]*y_cur[IDX_SO2I] + k[3305]*y_cur[IDX_SOI] + - k[3334]*y_cur[IDX_SiSI]; - data[jistart + 19030] = 0.0 - k[538]*y_cur[IDX_SII]; - data[jistart + 19031] = 0.0 + k[3349]*y_cur[IDX_H2SI] + - k[3360]*y_cur[IDX_OCSI]; - data[jistart + 19032] = 0.0 + k[572]*y_cur[IDX_SI] + - k[3363]*y_cur[IDX_H2SI] + k[3365]*y_cur[IDX_OCSI]; - data[jistart + 19033] = 0.0 - k[3624]*y_cur[IDX_SII]; - data[jistart + 19034] = 0.0 + k[579]*y_cur[IDX_SI]; - data[jistart + 19035] = 0.0 + k[584]*y_cur[IDX_SI]; - data[jistart + 19036] = 0.0 - k[614]*y_cur[IDX_SII]; - data[jistart + 19037] = 0.0 - k[629]*y_cur[IDX_SII]; - data[jistart + 19038] = 0.0 + k[3288]*y_cur[IDX_HeII]; - data[jistart + 19039] = 0.0 - k[643]*y_cur[IDX_SII]; - data[jistart + 19040] = 0.0 + k[3742]*y_cur[IDX_HSII]; - data[jistart + 19041] = 0.0 + k[3643]*y_cur[IDX_H2SI] + - k[3649]*y_cur[IDX_OCSI]; - data[jistart + 19042] = 0.0 - k[4756]*y_cur[IDX_SII]; - data[jistart + 19043] = 0.0 - k[3674]*y_cur[IDX_SII]; - data[jistart + 19044] = 0.0 + k[677]*y_cur[IDX_SI]; - data[jistart + 19045] = 0.0 - k[4791]*y_cur[IDX_SII]; - data[jistart + 19046] = 0.0 + k[3295]*y_cur[IDX_HeII] + - k[3360]*y_cur[IDX_NII] + k[3365]*y_cur[IDX_N2II] + - k[3649]*y_cur[IDX_OII] - k[3833]*y_cur[IDX_SII]; - data[jistart + 19047] = 0.0 - k[3808]*y_cur[IDX_SII]; - data[jistart + 19048] = 0.0 + k[695]*y_cur[IDX_SI]; - data[jistart + 19049] = 0.0 - k[4826]*y_cur[IDX_SII]; - data[jistart + 19050] = 0.0 + k[207]*y_cur[IDX_C2II] + - k[213]*y_cur[IDX_C2HII] + k[256]*y_cur[IDX_CHII] + - k[305]*y_cur[IDX_CNII] + k[313]*y_cur[IDX_COII] + - k[415]*y_cur[IDX_HII] + k[460]*y_cur[IDX_H2COII] + - k[476]*y_cur[IDX_H2OII] + k[496]*y_cur[IDX_HCNII] + - k[572]*y_cur[IDX_N2II] + k[579]*y_cur[IDX_NHII] + - k[584]*y_cur[IDX_NH2II] + k[677]*y_cur[IDX_O2II] + - k[695]*y_cur[IDX_OHII] + k[707]*y_cur[IDX_CII] + - k[708]*y_cur[IDX_CII] + k[709]*y_cur[IDX_H2SII] + - k[710]*y_cur[IDX_HSII] + k[5913] + k[6255] + k[6303]; - data[jistart + 19051] = 0.0 - k[503]*y_cur[IDX_HCOI] - - k[538]*y_cur[IDX_MgI] - k[614]*y_cur[IDX_NH3I] - - k[629]*y_cur[IDX_NOI] - k[643]*y_cur[IDX_NaI] - - k[702]*y_cur[IDX_CH3CHCH2I] - k[703]*y_cur[IDX_FeI] - - k[704]*y_cur[IDX_C4H2I] - k[705]*y_cur[IDX_SiCI] - - k[706]*y_cur[IDX_SiSI] - k[724]*y_cur[IDX_SiI] - - k[725]*y_cur[IDX_SiHI] - k[1464]*y_cur[IDX_C2I] - - k[1573]*y_cur[IDX_C2H2I] - k[1645]*y_cur[IDX_C2H3I] - - k[1715]*y_cur[IDX_C2H4I] - k[1716]*y_cur[IDX_C2H4I] - - k[1717]*y_cur[IDX_C2H4I] - k[1750]*y_cur[IDX_C2HI] - - k[2017]*y_cur[IDX_CH2I] - k[2101]*y_cur[IDX_CH3I] - - k[2215]*y_cur[IDX_CH4I] - k[2216]*y_cur[IDX_CH4I] - - k[2265]*y_cur[IDX_CHI] - k[2470]*y_cur[IDX_H2I] - - k[2500]*y_cur[IDX_H2COI] - k[2501]*y_cur[IDX_H2COI] - - k[3012]*y_cur[IDX_HCOI] - k[3624]*y_cur[IDX_NHI] - - k[3674]*y_cur[IDX_O2I] - k[3808]*y_cur[IDX_OHI] - - k[3820]*y_cur[IDX_C3H2I] - k[3821]*y_cur[IDX_C3HI] - - k[3822]*y_cur[IDX_C4HI] - k[3823]*y_cur[IDX_CH3CHCH2I] - - k[3824]*y_cur[IDX_CH3CHCH2I] - k[3825]*y_cur[IDX_CH3CHCH2I] - - k[3826]*y_cur[IDX_CH3CHCH2I] - k[3827]*y_cur[IDX_H2CCCI] - - k[3828]*y_cur[IDX_H2SI] - k[3829]*y_cur[IDX_H2SI] - - k[3830]*y_cur[IDX_C4H2I] - k[3831]*y_cur[IDX_C4H2I] - - k[3832]*y_cur[IDX_C4H2I] - k[3833]*y_cur[IDX_OCSI] - - k[3885]*y_cur[IDX_SiHI] - k[3915]*y_cur[IDX_CM] - - k[3950]*y_cur[IDX_C10M] - k[3985]*y_cur[IDX_C10HM] - - k[4020]*y_cur[IDX_C2M] - k[4055]*y_cur[IDX_C2HM] - - k[4090]*y_cur[IDX_C3M] - k[4125]*y_cur[IDX_C3HM] - - k[4160]*y_cur[IDX_C3NM] - k[4195]*y_cur[IDX_C4M] - - k[4230]*y_cur[IDX_C4HM] - k[4265]*y_cur[IDX_C5M] - - k[4300]*y_cur[IDX_C5HM] - k[4335]*y_cur[IDX_C5NM] - - k[4370]*y_cur[IDX_C6M] - k[4405]*y_cur[IDX_C6HM] - - k[4440]*y_cur[IDX_C7M] - k[4475]*y_cur[IDX_C7HM] - - k[4510]*y_cur[IDX_C8M] - k[4545]*y_cur[IDX_C8HM] - - k[4580]*y_cur[IDX_C9M] - k[4615]*y_cur[IDX_C9HM] - - k[4650]*y_cur[IDX_CHM] - k[4685]*y_cur[IDX_CNM] - - k[4721]*y_cur[IDX_HM] - k[4756]*y_cur[IDX_OM] - - k[4791]*y_cur[IDX_O2M] - k[4826]*y_cur[IDX_OHM] - - k[4861]*y_cur[IDX_SM] - k[5528]*y_cur[IDX_CI] - - k[5561]*y_cur[IDX_H2I] - k[5625]*y_cur[IDX_eM] - - k[6424]*y_cur[IDX_GRAINM]; - data[jistart + 19052] = 0.0 - k[4861]*y_cur[IDX_SII]; - data[jistart + 19053] = 0.0 + k[3302]*y_cur[IDX_HeII]; - data[jistart + 19054] = 0.0 + k[1429]*y_cur[IDX_CII] + - k[3305]*y_cur[IDX_HeII]; - data[jistart + 19055] = 0.0 + k[3303]*y_cur[IDX_HeII]; - data[jistart + 19056] = 0.0 - k[724]*y_cur[IDX_SII]; - data[jistart + 19057] = 0.0 - k[705]*y_cur[IDX_SII]; - data[jistart + 19058] = 0.0 - k[725]*y_cur[IDX_SII] - - k[3885]*y_cur[IDX_SII]; - data[jistart + 19059] = 0.0 - k[706]*y_cur[IDX_SII] + - k[3334]*y_cur[IDX_HeII]; - data[jistart + 19060] = 0.0 - k[5625]*y_cur[IDX_SII]; - data[jistart + 19061] = 0.0 - k[58]*y_cur[IDX_SM]; - data[jistart + 19062] = 0.0 - k[4832]*y_cur[IDX_SM]; - data[jistart + 19063] = 0.0 - k[4833]*y_cur[IDX_SM]; - data[jistart + 19064] = 0.0 - k[4834]*y_cur[IDX_SM]; - data[jistart + 19065] = 0.0 - k[4835]*y_cur[IDX_SM]; - data[jistart + 19066] = 0.0 - k[4836]*y_cur[IDX_SM]; - data[jistart + 19067] = 0.0 - k[4837]*y_cur[IDX_SM]; - data[jistart + 19068] = 0.0 - k[4838]*y_cur[IDX_SM]; - data[jistart + 19069] = 0.0 - k[4839]*y_cur[IDX_SM]; - data[jistart + 19070] = 0.0 - k[4840]*y_cur[IDX_SM]; - data[jistart + 19071] = 0.0 - k[65]*y_cur[IDX_SM]; - data[jistart + 19072] = 0.0 - k[4841]*y_cur[IDX_SM]; - data[jistart + 19073] = 0.0 - k[109]*y_cur[IDX_SM]; - data[jistart + 19074] = 0.0 - k[4842]*y_cur[IDX_SM]; - data[jistart + 19075] = 0.0 - k[4843]*y_cur[IDX_SM]; - data[jistart + 19076] = 0.0 - k[4844]*y_cur[IDX_SM]; - data[jistart + 19077] = 0.0 - k[4845]*y_cur[IDX_SM]; - data[jistart + 19078] = 0.0 - k[4846]*y_cur[IDX_SM]; - data[jistart + 19079] = 0.0 - k[4847]*y_cur[IDX_SM]; - data[jistart + 19080] = 0.0 - k[4848]*y_cur[IDX_SM] - - k[4849]*y_cur[IDX_SM]; - data[jistart + 19081] = 0.0 - k[4850]*y_cur[IDX_SM] - - k[4851]*y_cur[IDX_SM]; - data[jistart + 19082] = 0.0 - k[4852]*y_cur[IDX_SM]; - data[jistart + 19083] = 0.0 - k[4853]*y_cur[IDX_SM]; - data[jistart + 19084] = 0.0 - k[123]*y_cur[IDX_SM]; - data[jistart + 19085] = 0.0 - k[4854]*y_cur[IDX_SM]; - data[jistart + 19086] = 0.0 - k[4855]*y_cur[IDX_SM]; - data[jistart + 19087] = 0.0 - k[4856]*y_cur[IDX_SM]; - data[jistart + 19088] = 0.0 - k[4857]*y_cur[IDX_SM]; - data[jistart + 19089] = 0.0 - k[4858]*y_cur[IDX_SM]; - data[jistart + 19090] = 0.0 - k[4859]*y_cur[IDX_SM]; - data[jistart + 19091] = 0.0 - k[132]*y_cur[IDX_SM]; - data[jistart + 19092] = 0.0 - k[4860]*y_cur[IDX_SM]; - data[jistart + 19093] = 0.0 - k[127]*y_cur[IDX_SM]; - data[jistart + 19094] = 0.0 + k[5610]*y_cur[IDX_eM]; - data[jistart + 19095] = 0.0 - k[4861]*y_cur[IDX_SM]; - data[jistart + 19096] = 0.0 - k[58]*y_cur[IDX_CI] - - k[65]*y_cur[IDX_COI] - k[109]*y_cur[IDX_HI] - k[123]*y_cur[IDX_NI] - - k[127]*y_cur[IDX_O2I] - k[132]*y_cur[IDX_OI] - - k[4832]*y_cur[IDX_CII] - k[4833]*y_cur[IDX_C2H2II] - - k[4834]*y_cur[IDX_C2H3II] - k[4835]*y_cur[IDX_C4H2II] - - k[4836]*y_cur[IDX_C4H3II] - k[4837]*y_cur[IDX_C4SII] - - k[4838]*y_cur[IDX_CH2CCHII] - k[4839]*y_cur[IDX_CH3II] - - k[4840]*y_cur[IDX_CNCII] - k[4841]*y_cur[IDX_FeII] - - k[4842]*y_cur[IDX_HII] - k[4843]*y_cur[IDX_H2COII] - - k[4844]*y_cur[IDX_H2SII] - k[4845]*y_cur[IDX_H3II] - - k[4846]*y_cur[IDX_H3OII] - k[4847]*y_cur[IDX_HC2SII] - - k[4848]*y_cur[IDX_HCNHII] - k[4849]*y_cur[IDX_HCNHII] - - k[4850]*y_cur[IDX_HCOII] - k[4851]*y_cur[IDX_HCOII] - - k[4852]*y_cur[IDX_HeII] - k[4853]*y_cur[IDX_MgII] - - k[4854]*y_cur[IDX_NII] - k[4855]*y_cur[IDX_N2HII] - - k[4856]*y_cur[IDX_NH3II] - k[4857]*y_cur[IDX_NH4II] - - k[4858]*y_cur[IDX_NOII] - k[4859]*y_cur[IDX_NaII] - - k[4860]*y_cur[IDX_OII] - k[4861]*y_cur[IDX_SII] - - k[4862]*y_cur[IDX_SOII] - k[4863]*y_cur[IDX_SiII] - - k[4864]*y_cur[IDX_SiOII] - k[4865]*y_cur[IDX_SiOHII] - - k[4866]*y_cur[IDX_SiSII] - k[5911] - k[6252]; - data[jistart + 19097] = 0.0 - k[4862]*y_cur[IDX_SM]; - data[jistart + 19098] = 0.0 - k[4863]*y_cur[IDX_SM]; - data[jistart + 19099] = 0.0 - k[4864]*y_cur[IDX_SM]; - data[jistart + 19100] = 0.0 - k[4865]*y_cur[IDX_SM]; - data[jistart + 19101] = 0.0 - k[4866]*y_cur[IDX_SM]; - data[jistart + 19102] = 0.0 + k[5610]*y_cur[IDX_SI]; - data[jistart + 19103] = 0.0 - k[4984]*y_cur[IDX_S2I]; - data[jistart + 19104] = 0.0 + k[6759]*y_cur[IDX_HS2II]; - data[jistart + 19105] = 0.0 + k[7215] + k[7397] + k[7579]; - data[jistart + 19106] = 0.0 - k[5199]*y_cur[IDX_S2I]; - data[jistart + 19107] = 0.0 - k[414]*y_cur[IDX_S2I]; - data[jistart + 19108] = 0.0 + k[2579]*y_cur[IDX_HS2II]; - data[jistart + 19109] = 0.0 - k[2739]*y_cur[IDX_S2I]; - data[jistart + 19110] = 0.0 - k[2817]*y_cur[IDX_S2I]; - data[jistart + 19111] = 0.0 - k[2988]*y_cur[IDX_S2I]; - data[jistart + 19112] = 0.0 + k[5488]*y_cur[IDX_SI]; - data[jistart + 19113] = 0.0 + k[1140]*y_cur[IDX_eM] + - k[2579]*y_cur[IDX_H2SI] + k[6759]*y_cur[IDX_GRAINM]; - data[jistart + 19114] = 0.0 - k[3302]*y_cur[IDX_S2I]; - data[jistart + 19115] = 0.0 - k[5289]*y_cur[IDX_S2I]; - data[jistart + 19116] = 0.0 + k[630]*y_cur[IDX_S2II]; - data[jistart + 19117] = 0.0 - k[5437]*y_cur[IDX_S2I]; - data[jistart + 19118] = 0.0 + k[5488]*y_cur[IDX_HSI] + - k[5490]*y_cur[IDX_SOI]; - data[jistart + 19119] = 0.0 - k[414]*y_cur[IDX_HII] - - k[2739]*y_cur[IDX_H3II] - k[2817]*y_cur[IDX_H3OII] - - k[2988]*y_cur[IDX_HCOII] - k[3302]*y_cur[IDX_HeII] - - k[4984]*y_cur[IDX_CI] - k[5199]*y_cur[IDX_HI] - - k[5289]*y_cur[IDX_NI] - k[5437]*y_cur[IDX_OI] - k[5912] - k[6253] - - k[6254] - k[7033]; - data[jistart + 19120] = 0.0 + k[630]*y_cur[IDX_NOI]; - data[jistart + 19121] = 0.0 + k[5490]*y_cur[IDX_SI]; - data[jistart + 19122] = 0.0 + k[1140]*y_cur[IDX_HS2II]; - data[jistart + 19123] = 0.0 - k[1724]*y_cur[IDX_S2II]; - data[jistart + 19124] = 0.0 - k[2112]*y_cur[IDX_S2II]; - data[jistart + 19125] = 0.0 - k[2114]*y_cur[IDX_S2II]; - data[jistart + 19126] = 0.0 - k[2132]*y_cur[IDX_S2II]; - data[jistart + 19127] = 0.0 - k[6752]*y_cur[IDX_S2II]; - data[jistart + 19128] = 0.0 + k[414]*y_cur[IDX_S2I]; - data[jistart + 19129] = 0.0 + k[2582]*y_cur[IDX_SOII] + - k[3829]*y_cur[IDX_SII]; - data[jistart + 19130] = 0.0 + k[3272]*y_cur[IDX_HeII]; - data[jistart + 19131] = 0.0 + k[3272]*y_cur[IDX_HS2I]; - data[jistart + 19132] = 0.0 - k[630]*y_cur[IDX_S2II]; - data[jistart + 19133] = 0.0 + k[3833]*y_cur[IDX_SII] + - k[3858]*y_cur[IDX_SOII]; - data[jistart + 19134] = 0.0 + k[3829]*y_cur[IDX_H2SI] + - k[3833]*y_cur[IDX_OCSI]; - data[jistart + 19135] = 0.0 + k[414]*y_cur[IDX_HII] + k[6253]; - data[jistart + 19136] = 0.0 - k[630]*y_cur[IDX_NOI] - - k[1219]*y_cur[IDX_eM] - k[1724]*y_cur[IDX_C2H5OHI] - - k[2112]*y_cur[IDX_C2H6I] - k[2114]*y_cur[IDX_CH3CHOI] - - k[2132]*y_cur[IDX_CH3OHI] - k[6752]*y_cur[IDX_GRAINM]; - data[jistart + 19137] = 0.0 + k[2582]*y_cur[IDX_H2SI] + - k[3858]*y_cur[IDX_OCSI]; - data[jistart + 19138] = 0.0 - k[1219]*y_cur[IDX_S2II]; - data[jistart + 19139] = 0.0 + k[4985]*y_cur[IDX_SO2I] - - k[4986]*y_cur[IDX_SOI] - k[4987]*y_cur[IDX_SOI]; - data[jistart + 19140] = 0.0 - k[193]*y_cur[IDX_SOI] - - k[1428]*y_cur[IDX_SOI] - k[1429]*y_cur[IDX_SOI] - - k[1430]*y_cur[IDX_SOI]; - data[jistart + 19141] = 0.0 + k[3916]*y_cur[IDX_SOII]; - data[jistart + 19142] = 0.0 + k[3951]*y_cur[IDX_SOII]; - data[jistart + 19143] = 0.0 + k[3986]*y_cur[IDX_SOII]; - data[jistart + 19144] = 0.0 + k[4021]*y_cur[IDX_SOII]; - data[jistart + 19145] = 0.0 + k[4056]*y_cur[IDX_SOII]; - data[jistart + 19146] = 0.0 + k[4091]*y_cur[IDX_SOII]; - data[jistart + 19147] = 0.0 + k[4126]*y_cur[IDX_SOII]; - data[jistart + 19148] = 0.0 + k[4161]*y_cur[IDX_SOII]; - data[jistart + 19149] = 0.0 + k[4196]*y_cur[IDX_SOII]; - data[jistart + 19150] = 0.0 + k[4231]*y_cur[IDX_SOII]; - data[jistart + 19151] = 0.0 + k[4266]*y_cur[IDX_SOII]; - data[jistart + 19152] = 0.0 + k[4301]*y_cur[IDX_SOII]; - data[jistart + 19153] = 0.0 + k[4336]*y_cur[IDX_SOII]; - data[jistart + 19154] = 0.0 + k[4371]*y_cur[IDX_SOII]; - data[jistart + 19155] = 0.0 + k[4406]*y_cur[IDX_SOII]; - data[jistart + 19156] = 0.0 + k[4441]*y_cur[IDX_SOII]; - data[jistart + 19157] = 0.0 + k[4476]*y_cur[IDX_SOII]; - data[jistart + 19158] = 0.0 + k[4511]*y_cur[IDX_SOII]; - data[jistart + 19159] = 0.0 + k[4546]*y_cur[IDX_SOII]; - data[jistart + 19160] = 0.0 + k[4581]*y_cur[IDX_SOII]; - data[jistart + 19161] = 0.0 + k[4616]*y_cur[IDX_SOII]; - data[jistart + 19162] = 0.0 - k[5102]*y_cur[IDX_SOI] - - k[5103]*y_cur[IDX_SOI]; - data[jistart + 19163] = 0.0 + k[4651]*y_cur[IDX_SOII]; - data[jistart + 19164] = 0.0 + k[711]*y_cur[IDX_SOII]; - data[jistart + 19165] = 0.0 - k[2096]*y_cur[IDX_SOI]; - data[jistart + 19166] = 0.0 + k[712]*y_cur[IDX_SOII]; - data[jistart + 19167] = 0.0 + k[713]*y_cur[IDX_SOII]; - data[jistart + 19168] = 0.0 + k[714]*y_cur[IDX_SOII]; - data[jistart + 19169] = 0.0 + k[4686]*y_cur[IDX_SOII]; - data[jistart + 19170] = 0.0 + k[5393]*y_cur[IDX_OI]; - data[jistart + 19171] = 0.0 + k[715]*y_cur[IDX_SOII]; - data[jistart + 19172] = 0.0 + k[8694]*y_cur[IDX_GSI]; - data[jistart + 19173] = 0.0 + k[6625]*y_cur[IDX_HSOII] + - k[6706]*y_cur[IDX_OCSII] + k[6751]*y_cur[IDX_SO2II] + - k[6756]*y_cur[IDX_HSO2II] + k[6757]*y_cur[IDX_HSO2II]; - data[jistart + 19174] = 0.0 + k[8694]*y_cur[IDX_GOI]; - data[jistart + 19175] = 0.0 + k[7176] + k[7358] + k[7540]; - data[jistart + 19176] = 0.0 - k[5200]*y_cur[IDX_SOI] - - k[5201]*y_cur[IDX_SOI]; - data[jistart + 19177] = 0.0 - k[417]*y_cur[IDX_SOI]; - data[jistart + 19178] = 0.0 + k[4722]*y_cur[IDX_SOII]; - data[jistart + 19179] = 0.0 - k[2742]*y_cur[IDX_SOI]; - data[jistart + 19180] = 0.0 - k[2990]*y_cur[IDX_SOI]; - data[jistart + 19181] = 0.0 + k[5416]*y_cur[IDX_OI]; - data[jistart + 19182] = 0.0 + k[1141]*y_cur[IDX_eM] + - k[6625]*y_cur[IDX_GRAINM]; - data[jistart + 19183] = 0.0 + k[1143]*y_cur[IDX_eM] + - k[1144]*y_cur[IDX_eM] + k[6756]*y_cur[IDX_GRAINM] + - k[6757]*y_cur[IDX_GRAINM]; - data[jistart + 19184] = 0.0 - k[3305]*y_cur[IDX_SOI] - - k[3306]*y_cur[IDX_SOI]; - data[jistart + 19185] = 0.0 + k[539]*y_cur[IDX_SOII]; - data[jistart + 19186] = 0.0 - k[5290]*y_cur[IDX_SOI] - - k[5291]*y_cur[IDX_SOI]; - data[jistart + 19187] = 0.0 + k[615]*y_cur[IDX_SOII]; - data[jistart + 19188] = 0.0 + k[5334]*y_cur[IDX_SI]; - data[jistart + 19189] = 0.0 + k[5426]*y_cur[IDX_OI]; - data[jistart + 19190] = 0.0 + k[644]*y_cur[IDX_SOII]; - data[jistart + 19191] = 0.0 + k[132]*y_cur[IDX_SM] + - k[5393]*y_cur[IDX_CSI] + k[5416]*y_cur[IDX_HSI] + - k[5426]*y_cur[IDX_NSI] + k[5431]*y_cur[IDX_OCSI] + - k[5437]*y_cur[IDX_S2I] + k[5438]*y_cur[IDX_SO2I] - - k[5439]*y_cur[IDX_SOI] - k[5583]*y_cur[IDX_SOI]; - data[jistart + 19192] = 0.0 + k[4757]*y_cur[IDX_SOII]; - data[jistart + 19193] = 0.0 + k[3676]*y_cur[IDX_SiSII] + - k[5337]*y_cur[IDX_SI] - k[5338]*y_cur[IDX_SOI]; - data[jistart + 19194] = 0.0 + k[4792]*y_cur[IDX_SOII]; - data[jistart + 19195] = 0.0 + k[5431]*y_cur[IDX_OI]; - data[jistart + 19196] = 0.0 + k[1177]*y_cur[IDX_eM] + - k[6706]*y_cur[IDX_GRAINM]; - data[jistart + 19197] = 0.0 + k[5480]*y_cur[IDX_SI] - - k[5481]*y_cur[IDX_SOI]; - data[jistart + 19198] = 0.0 + k[4827]*y_cur[IDX_SOII]; - data[jistart + 19199] = 0.0 + k[3842]*y_cur[IDX_SiOII] + - k[5334]*y_cur[IDX_NOI] + k[5337]*y_cur[IDX_O2I] + - k[5480]*y_cur[IDX_OHI] + k[5489]*y_cur[IDX_SO2I] + - k[5489]*y_cur[IDX_SO2I] - k[5490]*y_cur[IDX_SOI]; - data[jistart + 19200] = 0.0 + k[132]*y_cur[IDX_OI] + - k[4862]*y_cur[IDX_SOII]; - data[jistart + 19201] = 0.0 + k[5437]*y_cur[IDX_OI]; - data[jistart + 19202] = 0.0 - k[193]*y_cur[IDX_CII] - - k[417]*y_cur[IDX_HII] - k[1428]*y_cur[IDX_CII] - - k[1429]*y_cur[IDX_CII] - k[1430]*y_cur[IDX_CII] - - k[2096]*y_cur[IDX_CH3II] - k[2742]*y_cur[IDX_H3II] - - k[2990]*y_cur[IDX_HCOII] - k[3305]*y_cur[IDX_HeII] - - k[3306]*y_cur[IDX_HeII] - k[4986]*y_cur[IDX_CI] - - k[4987]*y_cur[IDX_CI] - k[5102]*y_cur[IDX_CHI] - - k[5103]*y_cur[IDX_CHI] - k[5200]*y_cur[IDX_HI] - - k[5201]*y_cur[IDX_HI] - k[5290]*y_cur[IDX_NI] - - k[5291]*y_cur[IDX_NI] - k[5338]*y_cur[IDX_O2I] - - k[5439]*y_cur[IDX_OI] - k[5481]*y_cur[IDX_OHI] - - k[5490]*y_cur[IDX_SI] - k[5583]*y_cur[IDX_OI] - k[5915] - k[5916] - - k[6257] - k[6258] - k[6994]; - data[jistart + 19203] = 0.0 + k[539]*y_cur[IDX_MgI] + - k[615]*y_cur[IDX_NH3I] + k[644]*y_cur[IDX_NaI] + - k[711]*y_cur[IDX_CH2CCH2I] + k[712]*y_cur[IDX_CH3CHCH2I] + - k[713]*y_cur[IDX_CH3COCH3I] + k[714]*y_cur[IDX_CH3OCH3I] + - k[715]*y_cur[IDX_FeI] + k[3916]*y_cur[IDX_CM] + - k[3951]*y_cur[IDX_C10M] + k[3986]*y_cur[IDX_C10HM] + - k[4021]*y_cur[IDX_C2M] + k[4056]*y_cur[IDX_C2HM] + - k[4091]*y_cur[IDX_C3M] + k[4126]*y_cur[IDX_C3HM] + - k[4161]*y_cur[IDX_C3NM] + k[4196]*y_cur[IDX_C4M] + - k[4231]*y_cur[IDX_C4HM] + k[4266]*y_cur[IDX_C5M] + - k[4301]*y_cur[IDX_C5HM] + k[4336]*y_cur[IDX_C5NM] + - k[4371]*y_cur[IDX_C6M] + k[4406]*y_cur[IDX_C6HM] + - k[4441]*y_cur[IDX_C7M] + k[4476]*y_cur[IDX_C7HM] + - k[4511]*y_cur[IDX_C8M] + k[4546]*y_cur[IDX_C8HM] + - k[4581]*y_cur[IDX_C9M] + k[4616]*y_cur[IDX_C9HM] + - k[4651]*y_cur[IDX_CHM] + k[4686]*y_cur[IDX_CNM] + - k[4722]*y_cur[IDX_HM] + k[4757]*y_cur[IDX_OM] + - k[4792]*y_cur[IDX_O2M] + k[4827]*y_cur[IDX_OHM] + - k[4862]*y_cur[IDX_SM]; - data[jistart + 19204] = 0.0 + k[4985]*y_cur[IDX_CI] + - k[5438]*y_cur[IDX_OI] + k[5489]*y_cur[IDX_SI] + - k[5489]*y_cur[IDX_SI] + k[5914] + k[6256]; - data[jistart + 19205] = 0.0 + k[1222]*y_cur[IDX_eM] + - k[6751]*y_cur[IDX_GRAINM]; - data[jistart + 19206] = 0.0 + k[3842]*y_cur[IDX_SI]; - data[jistart + 19207] = 0.0 + k[3676]*y_cur[IDX_O2I]; - data[jistart + 19208] = 0.0 + k[1141]*y_cur[IDX_HSOII] + - k[1143]*y_cur[IDX_HSO2II] + k[1144]*y_cur[IDX_HSO2II] + - k[1177]*y_cur[IDX_OCSII] + k[1222]*y_cur[IDX_SO2II]; - data[jistart + 19209] = 0.0 + k[193]*y_cur[IDX_SOI] + - k[1427]*y_cur[IDX_SO2I]; - data[jistart + 19210] = 0.0 - k[3916]*y_cur[IDX_SOII]; - data[jistart + 19211] = 0.0 - k[3951]*y_cur[IDX_SOII]; - data[jistart + 19212] = 0.0 - k[3986]*y_cur[IDX_SOII]; - data[jistart + 19213] = 0.0 - k[4021]*y_cur[IDX_SOII]; - data[jistart + 19214] = 0.0 - k[4056]*y_cur[IDX_SOII]; - data[jistart + 19215] = 0.0 - k[3843]*y_cur[IDX_SOII] - - k[3844]*y_cur[IDX_SOII] - k[3845]*y_cur[IDX_SOII] - - k[3846]*y_cur[IDX_SOII]; - data[jistart + 19216] = 0.0 - k[3847]*y_cur[IDX_SOII] - - k[3848]*y_cur[IDX_SOII] - k[3849]*y_cur[IDX_SOII] - - k[3850]*y_cur[IDX_SOII]; - data[jistart + 19217] = 0.0 - k[4091]*y_cur[IDX_SOII]; - data[jistart + 19218] = 0.0 - k[4126]*y_cur[IDX_SOII]; - data[jistart + 19219] = 0.0 - k[4161]*y_cur[IDX_SOII]; - data[jistart + 19220] = 0.0 - k[4196]*y_cur[IDX_SOII]; - data[jistart + 19221] = 0.0 - k[4231]*y_cur[IDX_SOII]; - data[jistart + 19222] = 0.0 - k[4266]*y_cur[IDX_SOII]; - data[jistart + 19223] = 0.0 - k[4301]*y_cur[IDX_SOII]; - data[jistart + 19224] = 0.0 - k[4336]*y_cur[IDX_SOII]; - data[jistart + 19225] = 0.0 - k[4371]*y_cur[IDX_SOII]; - data[jistart + 19226] = 0.0 - k[4406]*y_cur[IDX_SOII]; - data[jistart + 19227] = 0.0 - k[4441]*y_cur[IDX_SOII]; - data[jistart + 19228] = 0.0 - k[4476]*y_cur[IDX_SOII]; - data[jistart + 19229] = 0.0 - k[4511]*y_cur[IDX_SOII]; - data[jistart + 19230] = 0.0 - k[4546]*y_cur[IDX_SOII]; - data[jistart + 19231] = 0.0 - k[4581]*y_cur[IDX_SOII]; - data[jistart + 19232] = 0.0 - k[4616]*y_cur[IDX_SOII]; - data[jistart + 19233] = 0.0 - k[4651]*y_cur[IDX_SOII]; - data[jistart + 19234] = 0.0 - k[711]*y_cur[IDX_SOII] - - k[3851]*y_cur[IDX_SOII] - k[3852]*y_cur[IDX_SOII] - - k[3853]*y_cur[IDX_SOII] - k[3854]*y_cur[IDX_SOII] - - k[3855]*y_cur[IDX_SOII]; - data[jistart + 19235] = 0.0 - k[712]*y_cur[IDX_SOII] - - k[3856]*y_cur[IDX_SOII]; - data[jistart + 19236] = 0.0 - k[713]*y_cur[IDX_SOII] - - k[3857]*y_cur[IDX_SOII]; - data[jistart + 19237] = 0.0 - k[714]*y_cur[IDX_SOII]; - data[jistart + 19238] = 0.0 - k[4686]*y_cur[IDX_SOII]; - data[jistart + 19239] = 0.0 + k[2290]*y_cur[IDX_SO2II]; - data[jistart + 19240] = 0.0 + k[2282]*y_cur[IDX_SO2I]; - data[jistart + 19241] = 0.0 - k[715]*y_cur[IDX_SOII]; - data[jistart + 19242] = 0.0 - k[6620]*y_cur[IDX_SOII]; - data[jistart + 19243] = 0.0 + k[2847]*y_cur[IDX_SO2II]; - data[jistart + 19244] = 0.0 + k[417]*y_cur[IDX_SOI]; - data[jistart + 19245] = 0.0 - k[4722]*y_cur[IDX_SOII]; - data[jistart + 19246] = 0.0 - k[2582]*y_cur[IDX_SOII]; - data[jistart + 19247] = 0.0 + k[3735]*y_cur[IDX_OI]; - data[jistart + 19248] = 0.0 + k[3743]*y_cur[IDX_OI]; - data[jistart + 19249] = 0.0 + k[3304]*y_cur[IDX_SO2I]; - data[jistart + 19250] = 0.0 - k[539]*y_cur[IDX_SOII]; - data[jistart + 19251] = 0.0 - k[3468]*y_cur[IDX_SOII]; - data[jistart + 19252] = 0.0 - k[615]*y_cur[IDX_SOII]; - data[jistart + 19253] = 0.0 - k[644]*y_cur[IDX_SOII]; - data[jistart + 19254] = 0.0 + k[3735]*y_cur[IDX_H2SII] + - k[3743]*y_cur[IDX_HSII]; - data[jistart + 19255] = 0.0 + k[3651]*y_cur[IDX_SO2I]; - data[jistart + 19256] = 0.0 - k[4757]*y_cur[IDX_SOII]; - data[jistart + 19257] = 0.0 + k[3674]*y_cur[IDX_SII] + - k[3675]*y_cur[IDX_SiSII]; - data[jistart + 19258] = 0.0 + k[3667]*y_cur[IDX_SI]; - data[jistart + 19259] = 0.0 - k[4792]*y_cur[IDX_SOII]; - data[jistart + 19260] = 0.0 - k[3858]*y_cur[IDX_SOII]; - data[jistart + 19261] = 0.0 + k[3808]*y_cur[IDX_SII]; - data[jistart + 19262] = 0.0 + k[3790]*y_cur[IDX_SI]; - data[jistart + 19263] = 0.0 - k[4827]*y_cur[IDX_SOII]; - data[jistart + 19264] = 0.0 + k[3667]*y_cur[IDX_O2II] + - k[3790]*y_cur[IDX_OHII]; - data[jistart + 19265] = 0.0 + k[3674]*y_cur[IDX_O2I] + - k[3808]*y_cur[IDX_OHI]; - data[jistart + 19266] = 0.0 - k[4862]*y_cur[IDX_SOII]; - data[jistart + 19267] = 0.0 + k[193]*y_cur[IDX_CII] + - k[417]*y_cur[IDX_HII] + k[5916] + k[6258]; - data[jistart + 19268] = 0.0 - k[539]*y_cur[IDX_MgI] - - k[615]*y_cur[IDX_NH3I] - k[644]*y_cur[IDX_NaI] - - k[711]*y_cur[IDX_CH2CCH2I] - k[712]*y_cur[IDX_CH3CHCH2I] - - k[713]*y_cur[IDX_CH3COCH3I] - k[714]*y_cur[IDX_CH3OCH3I] - - k[715]*y_cur[IDX_FeI] - k[1220]*y_cur[IDX_eM] - - k[2582]*y_cur[IDX_H2SI] - k[3468]*y_cur[IDX_NI] - - k[3843]*y_cur[IDX_C2H2I] - k[3844]*y_cur[IDX_C2H2I] - - k[3845]*y_cur[IDX_C2H2I] - k[3846]*y_cur[IDX_C2H2I] - - k[3847]*y_cur[IDX_C2H4I] - k[3848]*y_cur[IDX_C2H4I] - - k[3849]*y_cur[IDX_C2H4I] - k[3850]*y_cur[IDX_C2H4I] - - k[3851]*y_cur[IDX_CH2CCH2I] - k[3852]*y_cur[IDX_CH2CCH2I] - - k[3853]*y_cur[IDX_CH2CCH2I] - k[3854]*y_cur[IDX_CH2CCH2I] - - k[3855]*y_cur[IDX_CH2CCH2I] - k[3856]*y_cur[IDX_CH3CHCH2I] - - k[3857]*y_cur[IDX_CH3COCH3I] - k[3858]*y_cur[IDX_OCSI] - - k[3916]*y_cur[IDX_CM] - k[3951]*y_cur[IDX_C10M] - - k[3986]*y_cur[IDX_C10HM] - k[4021]*y_cur[IDX_C2M] - - k[4056]*y_cur[IDX_C2HM] - k[4091]*y_cur[IDX_C3M] - - k[4126]*y_cur[IDX_C3HM] - k[4161]*y_cur[IDX_C3NM] - - k[4196]*y_cur[IDX_C4M] - k[4231]*y_cur[IDX_C4HM] - - k[4266]*y_cur[IDX_C5M] - k[4301]*y_cur[IDX_C5HM] - - k[4336]*y_cur[IDX_C5NM] - k[4371]*y_cur[IDX_C6M] - - k[4406]*y_cur[IDX_C6HM] - k[4441]*y_cur[IDX_C7M] - - k[4476]*y_cur[IDX_C7HM] - k[4511]*y_cur[IDX_C8M] - - k[4546]*y_cur[IDX_C8HM] - k[4581]*y_cur[IDX_C9M] - - k[4616]*y_cur[IDX_C9HM] - k[4651]*y_cur[IDX_CHM] - - k[4686]*y_cur[IDX_CNM] - k[4722]*y_cur[IDX_HM] - - k[4757]*y_cur[IDX_OM] - k[4792]*y_cur[IDX_O2M] - - k[4827]*y_cur[IDX_OHM] - k[4862]*y_cur[IDX_SM] - - k[6620]*y_cur[IDX_GRAINM]; - data[jistart + 19269] = 0.0 + k[1427]*y_cur[IDX_CII] + - k[2282]*y_cur[IDX_COII] + k[3304]*y_cur[IDX_HeII] + - k[3651]*y_cur[IDX_OII]; - data[jistart + 19270] = 0.0 + k[2290]*y_cur[IDX_COI] + - k[2847]*y_cur[IDX_HI]; - data[jistart + 19271] = 0.0 + k[3675]*y_cur[IDX_O2I]; - data[jistart + 19272] = 0.0 - k[1220]*y_cur[IDX_SOII]; - data[jistart + 19273] = 0.0 - k[4985]*y_cur[IDX_SO2I]; - data[jistart + 19274] = 0.0 - k[1427]*y_cur[IDX_SO2I]; - data[jistart + 19275] = 0.0 + k[3857]*y_cur[IDX_SOII]; - data[jistart + 19276] = 0.0 - k[2282]*y_cur[IDX_SO2I]; - data[jistart + 19277] = 0.0 - k[315]*y_cur[IDX_SO2I]; - data[jistart + 19278] = 0.0 + k[8697]*y_cur[IDX_GSOI]; - data[jistart + 19279] = 0.0 + k[6755]*y_cur[IDX_HSO2II]; - data[jistart + 19280] = 0.0 + k[8697]*y_cur[IDX_GOI]; - data[jistart + 19281] = 0.0 + k[7214] + k[7396] + k[7578]; - data[jistart + 19282] = 0.0 - k[416]*y_cur[IDX_SO2I]; - data[jistart + 19283] = 0.0 + k[2555]*y_cur[IDX_HSO2II]; - data[jistart + 19284] = 0.0 - k[2518]*y_cur[IDX_SO2I]; - data[jistart + 19285] = 0.0 - k[2741]*y_cur[IDX_SO2I]; - data[jistart + 19286] = 0.0 + k[1142]*y_cur[IDX_eM] + - k[2555]*y_cur[IDX_H2OI] + k[3590]*y_cur[IDX_NH3I] + - k[6755]*y_cur[IDX_GRAINM]; - data[jistart + 19287] = 0.0 - k[527]*y_cur[IDX_SO2I] - - k[3303]*y_cur[IDX_SO2I] - k[3304]*y_cur[IDX_SO2I]; - data[jistart + 19288] = 0.0 + k[3590]*y_cur[IDX_HSO2II]; - data[jistart + 19289] = 0.0 - k[5438]*y_cur[IDX_SO2I] + - k[5583]*y_cur[IDX_SOI]; - data[jistart + 19290] = 0.0 - k[665]*y_cur[IDX_SO2I] - - k[3651]*y_cur[IDX_SO2I]; - data[jistart + 19291] = 0.0 + k[127]*y_cur[IDX_SM] + - k[680]*y_cur[IDX_SO2II] + k[5338]*y_cur[IDX_SOI]; - data[jistart + 19292] = 0.0 + k[5481]*y_cur[IDX_SOI]; - data[jistart + 19293] = 0.0 - k[5489]*y_cur[IDX_SO2I]; - data[jistart + 19294] = 0.0 + k[127]*y_cur[IDX_O2I]; - data[jistart + 19295] = 0.0 + k[5338]*y_cur[IDX_O2I] + - k[5481]*y_cur[IDX_OHI] + k[5583]*y_cur[IDX_OI]; - data[jistart + 19296] = 0.0 + k[3857]*y_cur[IDX_CH3COCH3I]; - data[jistart + 19297] = 0.0 - k[315]*y_cur[IDX_CO2II] - - k[416]*y_cur[IDX_HII] - k[527]*y_cur[IDX_HeII] - - k[665]*y_cur[IDX_OII] - k[1427]*y_cur[IDX_CII] - - k[2282]*y_cur[IDX_COII] - k[2518]*y_cur[IDX_H2OII] - - k[2741]*y_cur[IDX_H3II] - k[3303]*y_cur[IDX_HeII] - - k[3304]*y_cur[IDX_HeII] - k[3651]*y_cur[IDX_OII] - - k[4985]*y_cur[IDX_CI] - k[5438]*y_cur[IDX_OI] - - k[5489]*y_cur[IDX_SI] - k[5914] - k[6256] - k[7032]; - data[jistart + 19298] = 0.0 + k[680]*y_cur[IDX_O2I]; - data[jistart + 19299] = 0.0 + k[1142]*y_cur[IDX_HSO2II]; - data[jistart + 19300] = 0.0 - k[2290]*y_cur[IDX_SO2II]; - data[jistart + 19301] = 0.0 + k[315]*y_cur[IDX_SO2I]; - data[jistart + 19302] = 0.0 - k[6750]*y_cur[IDX_SO2II] - - k[6751]*y_cur[IDX_SO2II]; - data[jistart + 19303] = 0.0 - k[2847]*y_cur[IDX_SO2II]; - data[jistart + 19304] = 0.0 + k[416]*y_cur[IDX_SO2I]; - data[jistart + 19305] = 0.0 - k[2471]*y_cur[IDX_SO2II]; - data[jistart + 19306] = 0.0 + k[527]*y_cur[IDX_SO2I]; - data[jistart + 19307] = 0.0 + k[665]*y_cur[IDX_SO2I]; - data[jistart + 19308] = 0.0 - k[680]*y_cur[IDX_SO2II]; - data[jistart + 19309] = 0.0 + k[315]*y_cur[IDX_CO2II] + - k[416]*y_cur[IDX_HII] + k[527]*y_cur[IDX_HeII] + - k[665]*y_cur[IDX_OII]; - data[jistart + 19310] = 0.0 - k[680]*y_cur[IDX_O2I] - - k[1221]*y_cur[IDX_eM] - k[1222]*y_cur[IDX_eM] - - k[2290]*y_cur[IDX_COI] - k[2471]*y_cur[IDX_H2I] - - k[2847]*y_cur[IDX_HI] - k[6750]*y_cur[IDX_GRAINM] - - k[6751]*y_cur[IDX_GRAINM]; - data[jistart + 19311] = 0.0 - k[1221]*y_cur[IDX_SO2II] - - k[1222]*y_cur[IDX_SO2II]; - data[jistart + 19312] = 0.0 - k[194]*y_cur[IDX_SiI]; - data[jistart + 19313] = 0.0 + k[3917]*y_cur[IDX_SiII]; - data[jistart + 19314] = 0.0 + k[3952]*y_cur[IDX_SiII]; - data[jistart + 19315] = 0.0 + k[3987]*y_cur[IDX_SiII]; - data[jistart + 19316] = 0.0 + k[4022]*y_cur[IDX_SiII]; - data[jistart + 19317] = 0.0 + k[4057]*y_cur[IDX_SiII]; - data[jistart + 19318] = 0.0 - k[4879]*y_cur[IDX_SiI] - - k[4880]*y_cur[IDX_SiI]; - data[jistart + 19319] = 0.0 - k[1529]*y_cur[IDX_SiI] - - k[1530]*y_cur[IDX_SiI]; - data[jistart + 19320] = 0.0 - k[1626]*y_cur[IDX_SiI] - - k[1627]*y_cur[IDX_SiI]; - data[jistart + 19321] = 0.0 - k[4885]*y_cur[IDX_SiI]; - data[jistart + 19322] = 0.0 - k[1680]*y_cur[IDX_SiI] - - k[1681]*y_cur[IDX_SiI]; - data[jistart + 19323] = 0.0 + k[4092]*y_cur[IDX_SiII]; - data[jistart + 19324] = 0.0 - k[3872]*y_cur[IDX_SiI]; - data[jistart + 19325] = 0.0 + k[4127]*y_cur[IDX_SiII]; - data[jistart + 19326] = 0.0 - k[3873]*y_cur[IDX_SiI] - - k[3874]*y_cur[IDX_SiI]; - data[jistart + 19327] = 0.0 - k[3875]*y_cur[IDX_SiI] - - k[3876]*y_cur[IDX_SiI]; - data[jistart + 19328] = 0.0 + k[4162]*y_cur[IDX_SiII]; - data[jistart + 19329] = 0.0 + k[4197]*y_cur[IDX_SiII]; - data[jistart + 19330] = 0.0 + k[4232]*y_cur[IDX_SiII]; - data[jistart + 19331] = 0.0 - k[3877]*y_cur[IDX_SiI] - - k[3878]*y_cur[IDX_SiI]; - data[jistart + 19332] = 0.0 + k[4267]*y_cur[IDX_SiII]; - data[jistart + 19333] = 0.0 + k[4302]*y_cur[IDX_SiII]; - data[jistart + 19334] = 0.0 + k[4337]*y_cur[IDX_SiII]; - data[jistart + 19335] = 0.0 + k[4372]*y_cur[IDX_SiII]; - data[jistart + 19336] = 0.0 + k[4407]*y_cur[IDX_SiII]; - data[jistart + 19337] = 0.0 + k[4442]*y_cur[IDX_SiII]; - data[jistart + 19338] = 0.0 + k[4477]*y_cur[IDX_SiII]; - data[jistart + 19339] = 0.0 + k[4512]*y_cur[IDX_SiII]; - data[jistart + 19340] = 0.0 + k[4547]*y_cur[IDX_SiII]; - data[jistart + 19341] = 0.0 + k[4582]*y_cur[IDX_SiII]; - data[jistart + 19342] = 0.0 + k[4617]*y_cur[IDX_SiII]; - data[jistart + 19343] = 0.0 + k[2267]*y_cur[IDX_SiHII] + - k[2268]*y_cur[IDX_SiOII]; - data[jistart + 19344] = 0.0 - k[257]*y_cur[IDX_SiI]; - data[jistart + 19345] = 0.0 + k[4652]*y_cur[IDX_SiII]; - data[jistart + 19346] = 0.0 - k[5021]*y_cur[IDX_SiI]; - data[jistart + 19347] = 0.0 - k[3879]*y_cur[IDX_SiI] - - k[3880]*y_cur[IDX_SiI]; - data[jistart + 19348] = 0.0 - k[5049]*y_cur[IDX_SiI]; - data[jistart + 19349] = 0.0 - k[2097]*y_cur[IDX_SiI] - - k[2098]*y_cur[IDX_SiI]; - data[jistart + 19350] = 0.0 - k[2236]*y_cur[IDX_SiI] - - k[2237]*y_cur[IDX_SiI]; - data[jistart + 19351] = 0.0 + k[4687]*y_cur[IDX_SiII]; - data[jistart + 19352] = 0.0 - k[5492]*y_cur[IDX_SiI]; - data[jistart + 19353] = 0.0 - k[5491]*y_cur[IDX_SiI]; - data[jistart + 19354] = 0.0 - k[717]*y_cur[IDX_SiI]; - data[jistart + 19355] = 0.0 + k[716]*y_cur[IDX_SiII]; - data[jistart + 19356] = 0.0 + k[6374]*y_cur[IDX_SiII] + - k[6388]*y_cur[IDX_SiHII] + k[6402]*y_cur[IDX_SiH2II] + - k[6403]*y_cur[IDX_SiH2II] + k[6481]*y_cur[IDX_SiCII] + - k[6490]*y_cur[IDX_HCSiII] + k[6497]*y_cur[IDX_SiCH2II] + - k[6501]*y_cur[IDX_SiNII] + k[6512]*y_cur[IDX_HNSiII] + - k[6531]*y_cur[IDX_SiOII] + k[6556]*y_cur[IDX_SiOHII] + - k[6592]*y_cur[IDX_SiFII] + k[6642]*y_cur[IDX_SiC2II] + - k[6649]*y_cur[IDX_SiC2HII] + k[6654]*y_cur[IDX_SiNCII] + - k[6710]*y_cur[IDX_SiSII] + k[6719]*y_cur[IDX_HSiSII] + - k[6761]*y_cur[IDX_SiC3HII]; - data[jistart + 19357] = 0.0 + k[7097] + k[7279] + k[7461]; - data[jistart + 19358] = 0.0 - k[418]*y_cur[IDX_SiI]; - data[jistart + 19359] = 0.0 + k[4723]*y_cur[IDX_SiII]; - data[jistart + 19360] = 0.0 - k[718]*y_cur[IDX_SiI]; - data[jistart + 19361] = 0.0 - k[2502]*y_cur[IDX_SiI]; - data[jistart + 19362] = 0.0 + k[2571]*y_cur[IDX_SiHII]; - data[jistart + 19363] = 0.0 - k[477]*y_cur[IDX_SiI]; - data[jistart + 19364] = 0.0 - k[719]*y_cur[IDX_SiI]; - data[jistart + 19365] = 0.0 - k[2743]*y_cur[IDX_SiI]; - data[jistart + 19366] = 0.0 - k[2818]*y_cur[IDX_SiI]; - data[jistart + 19367] = 0.0 - k[2896]*y_cur[IDX_SiI]; - data[jistart + 19368] = 0.0 - k[3881]*y_cur[IDX_SiI]; - data[jistart + 19369] = 0.0 + k[5863]; - data[jistart + 19370] = 0.0 + k[1109]*y_cur[IDX_eM] + - k[6490]*y_cur[IDX_GRAINM]; - data[jistart + 19371] = 0.0 + k[1123]*y_cur[IDX_eM] + - k[6512]*y_cur[IDX_GRAINM]; - data[jistart + 19372] = 0.0 - k[720]*y_cur[IDX_SiI]; - data[jistart + 19373] = 0.0 + k[1147]*y_cur[IDX_eM] + - k[6719]*y_cur[IDX_GRAINM]; - data[jistart + 19374] = 0.0 - k[528]*y_cur[IDX_SiI] + - k[3317]*y_cur[IDX_SiCI] + k[3330]*y_cur[IDX_SiNCI] + - k[3333]*y_cur[IDX_SiOI] + k[3334]*y_cur[IDX_SiSI]; - data[jistart + 19375] = 0.0 + k[540]*y_cur[IDX_SiII]; - data[jistart + 19376] = 0.0 + k[3475]*y_cur[IDX_SiOII] + - k[5292]*y_cur[IDX_SiCI]; - data[jistart + 19377] = 0.0 + k[3603]*y_cur[IDX_SiHII]; - data[jistart + 19378] = 0.0 - k[597]*y_cur[IDX_SiI]; - data[jistart + 19379] = 0.0 - k[5493]*y_cur[IDX_SiI]; - data[jistart + 19380] = 0.0 - k[721]*y_cur[IDX_SiI]; - data[jistart + 19381] = 0.0 + k[645]*y_cur[IDX_SiII]; - data[jistart + 19382] = 0.0 + k[5443]*y_cur[IDX_SiCI] + - k[5450]*y_cur[IDX_SiNI] - k[5585]*y_cur[IDX_SiI]; - data[jistart + 19383] = 0.0 + k[4758]*y_cur[IDX_SiII]; - data[jistart + 19384] = 0.0 - k[5494]*y_cur[IDX_SiI]; - data[jistart + 19385] = 0.0 - k[722]*y_cur[IDX_SiI]; - data[jistart + 19386] = 0.0 + k[4793]*y_cur[IDX_SiII]; - data[jistart + 19387] = 0.0 - k[5482]*y_cur[IDX_SiI]; - data[jistart + 19388] = 0.0 - k[3791]*y_cur[IDX_SiI]; - data[jistart + 19389] = 0.0 + k[4828]*y_cur[IDX_SiII]; - data[jistart + 19390] = 0.0 - k[723]*y_cur[IDX_SiI]; - data[jistart + 19391] = 0.0 - k[724]*y_cur[IDX_SiI]; - data[jistart + 19392] = 0.0 + k[4863]*y_cur[IDX_SiII]; - data[jistart + 19393] = 0.0 - k[194]*y_cur[IDX_CII] - - k[257]*y_cur[IDX_CHII] - k[418]*y_cur[IDX_HII] - - k[477]*y_cur[IDX_H2OII] - k[528]*y_cur[IDX_HeII] - - k[597]*y_cur[IDX_NH3II] - k[717]*y_cur[IDX_CSII] - - k[718]*y_cur[IDX_H2COII] - k[719]*y_cur[IDX_H2SII] - - k[720]*y_cur[IDX_HSII] - k[721]*y_cur[IDX_NOII] - - k[722]*y_cur[IDX_O2II] - k[723]*y_cur[IDX_PII] - - k[724]*y_cur[IDX_SII] - k[1529]*y_cur[IDX_C2H2II] - - k[1530]*y_cur[IDX_C2H2II] - k[1626]*y_cur[IDX_C2H3II] - - k[1627]*y_cur[IDX_C2H3II] - k[1680]*y_cur[IDX_C2H4II] - - k[1681]*y_cur[IDX_C2H4II] - k[2097]*y_cur[IDX_CH3II] - - k[2098]*y_cur[IDX_CH3II] - k[2236]*y_cur[IDX_CH5II] - - k[2237]*y_cur[IDX_CH5II] - k[2502]*y_cur[IDX_H2NCII] - - k[2743]*y_cur[IDX_H3II] - k[2818]*y_cur[IDX_H3OII] - - k[2896]*y_cur[IDX_HCNHII] - k[3791]*y_cur[IDX_OHII] - - k[3872]*y_cur[IDX_C3HII] - k[3873]*y_cur[IDX_C3H2II] - - k[3874]*y_cur[IDX_C3H2II] - k[3875]*y_cur[IDX_C3H3II] - - k[3876]*y_cur[IDX_C3H3II] - k[3877]*y_cur[IDX_C4H2II] - - k[3878]*y_cur[IDX_C4H2II] - k[3879]*y_cur[IDX_CH2CCHII] - - k[3880]*y_cur[IDX_CH2CCHII] - k[3881]*y_cur[IDX_HCOII] - - k[4879]*y_cur[IDX_C2H2I] - k[4880]*y_cur[IDX_C2H2I] - - k[4885]*y_cur[IDX_C2H4I] - k[5021]*y_cur[IDX_CH2I] - - k[5049]*y_cur[IDX_CH3I] - k[5482]*y_cur[IDX_OHI] - - k[5491]*y_cur[IDX_CO2I] - k[5492]*y_cur[IDX_COI] - - k[5493]*y_cur[IDX_NOI] - k[5494]*y_cur[IDX_O2I] - - k[5585]*y_cur[IDX_OI] - k[5917] - k[6259] - k[6302] - k[6915]; - data[jistart + 19394] = 0.0 + k[540]*y_cur[IDX_MgI] + - k[645]*y_cur[IDX_NaI] + k[716]*y_cur[IDX_FeI] + - k[3917]*y_cur[IDX_CM] + k[3952]*y_cur[IDX_C10M] + - k[3987]*y_cur[IDX_C10HM] + k[4022]*y_cur[IDX_C2M] + - k[4057]*y_cur[IDX_C2HM] + k[4092]*y_cur[IDX_C3M] + - k[4127]*y_cur[IDX_C3HM] + k[4162]*y_cur[IDX_C3NM] + - k[4197]*y_cur[IDX_C4M] + k[4232]*y_cur[IDX_C4HM] + - k[4267]*y_cur[IDX_C5M] + k[4302]*y_cur[IDX_C5HM] + - k[4337]*y_cur[IDX_C5NM] + k[4372]*y_cur[IDX_C6M] + - k[4407]*y_cur[IDX_C6HM] + k[4442]*y_cur[IDX_C7M] + - k[4477]*y_cur[IDX_C7HM] + k[4512]*y_cur[IDX_C8M] + - k[4547]*y_cur[IDX_C8HM] + k[4582]*y_cur[IDX_C9M] + - k[4617]*y_cur[IDX_C9HM] + k[4652]*y_cur[IDX_CHM] + - k[4687]*y_cur[IDX_CNM] + k[4723]*y_cur[IDX_HM] + - k[4758]*y_cur[IDX_OM] + k[4793]*y_cur[IDX_O2M] + - k[4828]*y_cur[IDX_OHM] + k[4863]*y_cur[IDX_SM] + - k[5626]*y_cur[IDX_eM] + k[6374]*y_cur[IDX_GRAINM]; - data[jistart + 19395] = 0.0 + k[3317]*y_cur[IDX_HeII] + - k[5292]*y_cur[IDX_NI] + k[5443]*y_cur[IDX_OI] + k[5924] + k[6267]; - data[jistart + 19396] = 0.0 + k[1223]*y_cur[IDX_eM] + - k[6481]*y_cur[IDX_GRAINM]; - data[jistart + 19397] = 0.0 + k[6260]; - data[jistart + 19398] = 0.0 + k[1224]*y_cur[IDX_eM] + - k[6642]*y_cur[IDX_GRAINM]; - data[jistart + 19399] = 0.0 + k[1226]*y_cur[IDX_eM] + - k[6649]*y_cur[IDX_GRAINM]; - data[jistart + 19400] = 0.0 + k[1234]*y_cur[IDX_eM] + - k[6761]*y_cur[IDX_GRAINM]; - data[jistart + 19401] = 0.0 + k[6266]; - data[jistart + 19402] = 0.0 + k[1243]*y_cur[IDX_eM] + - k[6497]*y_cur[IDX_GRAINM]; - data[jistart + 19403] = 0.0 + k[1249]*y_cur[IDX_eM] + - k[6592]*y_cur[IDX_GRAINM]; - data[jistart + 19404] = 0.0 + k[5930] + k[6280]; - data[jistart + 19405] = 0.0 + k[1250]*y_cur[IDX_eM] + - k[2267]*y_cur[IDX_CHI] + k[2571]*y_cur[IDX_H2OI] + - k[3603]*y_cur[IDX_NH3I] + k[6388]*y_cur[IDX_GRAINM]; - data[jistart + 19406] = 0.0 + k[1251]*y_cur[IDX_eM] + - k[1252]*y_cur[IDX_eM] + k[6402]*y_cur[IDX_GRAINM] + - k[6403]*y_cur[IDX_GRAINM]; - data[jistart + 19407] = 0.0 + k[5450]*y_cur[IDX_OI] + k[5931] + - k[6281]; - data[jistart + 19408] = 0.0 + k[1260]*y_cur[IDX_eM] + - k[6501]*y_cur[IDX_GRAINM]; - data[jistart + 19409] = 0.0 + k[3330]*y_cur[IDX_HeII] + k[5932] + - k[6283]; - data[jistart + 19410] = 0.0 + k[1261]*y_cur[IDX_eM] + - k[6654]*y_cur[IDX_GRAINM]; - data[jistart + 19411] = 0.0 + k[3333]*y_cur[IDX_HeII] + k[5934] + - k[6286]; - data[jistart + 19412] = 0.0 + k[1266]*y_cur[IDX_eM] + - k[2268]*y_cur[IDX_CHI] + k[3475]*y_cur[IDX_NI] + - k[6531]*y_cur[IDX_GRAINM]; - data[jistart + 19413] = 0.0 + k[1267]*y_cur[IDX_eM] + - k[6556]*y_cur[IDX_GRAINM]; - data[jistart + 19414] = 0.0 + k[3334]*y_cur[IDX_HeII] + k[5935] + - k[6288]; - data[jistart + 19415] = 0.0 + k[1269]*y_cur[IDX_eM] + - k[6710]*y_cur[IDX_GRAINM]; - data[jistart + 19416] = 0.0 + k[1109]*y_cur[IDX_HCSiII] + - k[1123]*y_cur[IDX_HNSiII] + k[1147]*y_cur[IDX_HSiSII] + - k[1223]*y_cur[IDX_SiCII] + k[1224]*y_cur[IDX_SiC2II] + - k[1226]*y_cur[IDX_SiC2HII] + k[1234]*y_cur[IDX_SiC3HII] + - k[1243]*y_cur[IDX_SiCH2II] + k[1249]*y_cur[IDX_SiFII] + - k[1250]*y_cur[IDX_SiHII] + k[1251]*y_cur[IDX_SiH2II] + - k[1252]*y_cur[IDX_SiH2II] + k[1260]*y_cur[IDX_SiNII] + - k[1261]*y_cur[IDX_SiNCII] + k[1266]*y_cur[IDX_SiOII] + - k[1267]*y_cur[IDX_SiOHII] + k[1269]*y_cur[IDX_SiSII] + - k[5626]*y_cur[IDX_SiII]; - data[jistart + 19417] = 0.0 + k[1920]*y_cur[IDX_SiCH2II] + - k[1932]*y_cur[IDX_SiOII]; - data[jistart + 19418] = 0.0 + k[194]*y_cur[IDX_SiI] + - k[1434]*y_cur[IDX_SiCI] + k[1447]*y_cur[IDX_SiOI]; - data[jistart + 19419] = 0.0 - k[3917]*y_cur[IDX_SiII]; - data[jistart + 19420] = 0.0 - k[3952]*y_cur[IDX_SiII]; - data[jistart + 19421] = 0.0 - k[3987]*y_cur[IDX_SiII]; - data[jistart + 19422] = 0.0 - k[4022]*y_cur[IDX_SiII]; - data[jistart + 19423] = 0.0 - k[1751]*y_cur[IDX_SiII]; - data[jistart + 19424] = 0.0 - k[4057]*y_cur[IDX_SiII]; - data[jistart + 19425] = 0.0 - k[1574]*y_cur[IDX_SiII] - - k[5512]*y_cur[IDX_SiII]; - data[jistart + 19426] = 0.0 + k[1531]*y_cur[IDX_SiH4I]; - data[jistart + 19427] = 0.0 - k[1646]*y_cur[IDX_SiII]; - data[jistart + 19428] = 0.0 - k[1718]*y_cur[IDX_SiII]; - data[jistart + 19429] = 0.0 - k[3859]*y_cur[IDX_SiII]; - data[jistart + 19430] = 0.0 - k[4092]*y_cur[IDX_SiII]; - data[jistart + 19431] = 0.0 - k[3861]*y_cur[IDX_SiII]; - data[jistart + 19432] = 0.0 - k[4127]*y_cur[IDX_SiII]; - data[jistart + 19433] = 0.0 - k[3860]*y_cur[IDX_SiII]; - data[jistart + 19434] = 0.0 - k[4162]*y_cur[IDX_SiII]; - data[jistart + 19435] = 0.0 - k[4197]*y_cur[IDX_SiII]; - data[jistart + 19436] = 0.0 - k[3862]*y_cur[IDX_SiII]; - data[jistart + 19437] = 0.0 - k[4232]*y_cur[IDX_SiII]; - data[jistart + 19438] = 0.0 - k[3869]*y_cur[IDX_SiII]; - data[jistart + 19439] = 0.0 - k[4267]*y_cur[IDX_SiII]; - data[jistart + 19440] = 0.0 - k[4302]*y_cur[IDX_SiII]; - data[jistart + 19441] = 0.0 - k[4337]*y_cur[IDX_SiII]; - data[jistart + 19442] = 0.0 - k[4372]*y_cur[IDX_SiII]; - data[jistart + 19443] = 0.0 - k[4407]*y_cur[IDX_SiII]; - data[jistart + 19444] = 0.0 - k[4442]*y_cur[IDX_SiII]; - data[jistart + 19445] = 0.0 - k[4477]*y_cur[IDX_SiII]; - data[jistart + 19446] = 0.0 - k[4512]*y_cur[IDX_SiII]; - data[jistart + 19447] = 0.0 - k[4547]*y_cur[IDX_SiII]; - data[jistart + 19448] = 0.0 - k[4582]*y_cur[IDX_SiII]; - data[jistart + 19449] = 0.0 - k[4617]*y_cur[IDX_SiII]; - data[jistart + 19450] = 0.0 - k[2266]*y_cur[IDX_SiII]; - data[jistart + 19451] = 0.0 + k[257]*y_cur[IDX_SiI]; - data[jistart + 19452] = 0.0 - k[4652]*y_cur[IDX_SiII]; - data[jistart + 19453] = 0.0 - k[2018]*y_cur[IDX_SiII] + - k[2019]*y_cur[IDX_SiOII]; - data[jistart + 19454] = 0.0 - k[3863]*y_cur[IDX_SiII]; - data[jistart + 19455] = 0.0 - k[2102]*y_cur[IDX_SiII] - - k[2103]*y_cur[IDX_SiII]; - data[jistart + 19456] = 0.0 - k[3864]*y_cur[IDX_SiII] - - k[3865]*y_cur[IDX_SiII] - k[3866]*y_cur[IDX_SiII]; - data[jistart + 19457] = 0.0 - k[3867]*y_cur[IDX_SiII]; - data[jistart + 19458] = 0.0 - k[5544]*y_cur[IDX_SiII]; - data[jistart + 19459] = 0.0 - k[4687]*y_cur[IDX_SiII]; - data[jistart + 19460] = 0.0 + k[2292]*y_cur[IDX_SiOII]; - data[jistart + 19461] = 0.0 + k[717]*y_cur[IDX_SiI]; - data[jistart + 19462] = 0.0 - k[716]*y_cur[IDX_SiII]; - data[jistart + 19463] = 0.0 - k[6374]*y_cur[IDX_SiII]; - data[jistart + 19464] = 0.0 + k[2848]*y_cur[IDX_SiHII] + - k[2849]*y_cur[IDX_SiSII] - k[5575]*y_cur[IDX_SiII]; - data[jistart + 19465] = 0.0 + k[418]*y_cur[IDX_SiI] + - k[2365]*y_cur[IDX_SiHI]; - data[jistart + 19466] = 0.0 - k[4723]*y_cur[IDX_SiII]; - data[jistart + 19467] = 0.0 - k[5562]*y_cur[IDX_SiII]; - data[jistart + 19468] = 0.0 - k[3868]*y_cur[IDX_SiII]; - data[jistart + 19469] = 0.0 + k[718]*y_cur[IDX_SiI]; - data[jistart + 19470] = 0.0 - k[2569]*y_cur[IDX_SiII]; - data[jistart + 19471] = 0.0 + k[477]*y_cur[IDX_SiI]; - data[jistart + 19472] = 0.0 + k[719]*y_cur[IDX_SiI]; - data[jistart + 19473] = 0.0 - k[2885]*y_cur[IDX_SiII] - - k[5580]*y_cur[IDX_SiII]; - data[jistart + 19474] = 0.0 + k[3257]*y_cur[IDX_HeII]; - data[jistart + 19475] = 0.0 - k[3015]*y_cur[IDX_SiII]; - data[jistart + 19476] = 0.0 - k[3046]*y_cur[IDX_SiII]; - data[jistart + 19477] = 0.0 + k[720]*y_cur[IDX_SiI]; - data[jistart + 19478] = 0.0 + k[528]*y_cur[IDX_SiI] + - k[3257]*y_cur[IDX_HCSiI] + k[3307]*y_cur[IDX_SiC2I] + - k[3310]*y_cur[IDX_SiC2HI] + k[3313]*y_cur[IDX_SiC3HI] + - k[3316]*y_cur[IDX_SiCI] + k[3322]*y_cur[IDX_SiH2I] + - k[3326]*y_cur[IDX_SiH4I] + k[3328]*y_cur[IDX_SiHI] + - k[3329]*y_cur[IDX_SiNI] + k[3331]*y_cur[IDX_SiO2I] + - k[3332]*y_cur[IDX_SiOI] + k[3335]*y_cur[IDX_SiSI]; - data[jistart + 19479] = 0.0 - k[540]*y_cur[IDX_SiII]; - data[jistart + 19480] = 0.0 + k[3469]*y_cur[IDX_SiCII] + - k[3470]*y_cur[IDX_SiCH2II] + k[3476]*y_cur[IDX_SiOII]; - data[jistart + 19481] = 0.0 - k[3870]*y_cur[IDX_SiII]; - data[jistart + 19482] = 0.0 - k[3625]*y_cur[IDX_SiII]; - data[jistart + 19483] = 0.0 - k[3602]*y_cur[IDX_SiII]; - data[jistart + 19484] = 0.0 + k[597]*y_cur[IDX_SiI]; - data[jistart + 19485] = 0.0 + k[721]*y_cur[IDX_SiI]; - data[jistart + 19486] = 0.0 - k[645]*y_cur[IDX_SiII]; - data[jistart + 19487] = 0.0 + k[3754]*y_cur[IDX_SiCH2II] + - k[3764]*y_cur[IDX_SiOII] - k[5584]*y_cur[IDX_SiII]; - data[jistart + 19488] = 0.0 - k[4758]*y_cur[IDX_SiII]; - data[jistart + 19489] = 0.0 + k[722]*y_cur[IDX_SiI]; - data[jistart + 19490] = 0.0 - k[4793]*y_cur[IDX_SiII]; - data[jistart + 19491] = 0.0 - k[3871]*y_cur[IDX_SiII]; - data[jistart + 19492] = 0.0 - k[3809]*y_cur[IDX_SiII]; - data[jistart + 19493] = 0.0 - k[4828]*y_cur[IDX_SiII]; - data[jistart + 19494] = 0.0 + k[723]*y_cur[IDX_SiI]; - data[jistart + 19495] = 0.0 + k[3841]*y_cur[IDX_SiCH2II] + - k[3842]*y_cur[IDX_SiOII]; - data[jistart + 19496] = 0.0 + k[724]*y_cur[IDX_SiI]; - data[jistart + 19497] = 0.0 - k[4863]*y_cur[IDX_SiII]; - data[jistart + 19498] = 0.0 + k[194]*y_cur[IDX_CII] + - k[257]*y_cur[IDX_CHII] + k[418]*y_cur[IDX_HII] + - k[477]*y_cur[IDX_H2OII] + k[528]*y_cur[IDX_HeII] + - k[597]*y_cur[IDX_NH3II] + k[717]*y_cur[IDX_CSII] + - k[718]*y_cur[IDX_H2COII] + k[719]*y_cur[IDX_H2SII] + - k[720]*y_cur[IDX_HSII] + k[721]*y_cur[IDX_NOII] + - k[722]*y_cur[IDX_O2II] + k[723]*y_cur[IDX_PII] + - k[724]*y_cur[IDX_SII] + k[5917] + k[6259] + k[6302]; - data[jistart + 19499] = 0.0 - k[540]*y_cur[IDX_MgI] - - k[645]*y_cur[IDX_NaI] - k[716]*y_cur[IDX_FeI] - - k[1574]*y_cur[IDX_C2H2I] - k[1646]*y_cur[IDX_C2H3I] - - k[1718]*y_cur[IDX_C2H4I] - k[1751]*y_cur[IDX_C2HI] - - k[2018]*y_cur[IDX_CH2I] - k[2102]*y_cur[IDX_CH3I] - - k[2103]*y_cur[IDX_CH3I] - k[2266]*y_cur[IDX_CHI] - - k[2569]*y_cur[IDX_H2OI] - k[2885]*y_cur[IDX_HCNI] - - k[3015]*y_cur[IDX_HFI] - k[3046]*y_cur[IDX_HNCI] - - k[3602]*y_cur[IDX_NH3I] - k[3625]*y_cur[IDX_NHI] - - k[3809]*y_cur[IDX_OHI] - k[3859]*y_cur[IDX_C2H5OHI] - - k[3860]*y_cur[IDX_C3H2I] - k[3861]*y_cur[IDX_C3HI] - - k[3862]*y_cur[IDX_C4HI] - k[3863]*y_cur[IDX_CH2CCHI] - - k[3864]*y_cur[IDX_CH3CCHI] - k[3865]*y_cur[IDX_CH3CCHI] - - k[3866]*y_cur[IDX_CH3CCHI] - k[3867]*y_cur[IDX_CH3OHI] - - k[3868]*y_cur[IDX_H2CCCI] - k[3869]*y_cur[IDX_C4H2I] - - k[3870]*y_cur[IDX_NCCNI] - k[3871]*y_cur[IDX_OCSI] - - k[3917]*y_cur[IDX_CM] - k[3952]*y_cur[IDX_C10M] - - k[3987]*y_cur[IDX_C10HM] - k[4022]*y_cur[IDX_C2M] - - k[4057]*y_cur[IDX_C2HM] - k[4092]*y_cur[IDX_C3M] - - k[4127]*y_cur[IDX_C3HM] - k[4162]*y_cur[IDX_C3NM] - - k[4197]*y_cur[IDX_C4M] - k[4232]*y_cur[IDX_C4HM] - - k[4267]*y_cur[IDX_C5M] - k[4302]*y_cur[IDX_C5HM] - - k[4337]*y_cur[IDX_C5NM] - k[4372]*y_cur[IDX_C6M] - - k[4407]*y_cur[IDX_C6HM] - k[4442]*y_cur[IDX_C7M] - - k[4477]*y_cur[IDX_C7HM] - k[4512]*y_cur[IDX_C8M] - - k[4547]*y_cur[IDX_C8HM] - k[4582]*y_cur[IDX_C9M] - - k[4617]*y_cur[IDX_C9HM] - k[4652]*y_cur[IDX_CHM] - - k[4687]*y_cur[IDX_CNM] - k[4723]*y_cur[IDX_HM] - - k[4758]*y_cur[IDX_OM] - k[4793]*y_cur[IDX_O2M] - - k[4828]*y_cur[IDX_OHM] - k[4863]*y_cur[IDX_SM] - - k[5512]*y_cur[IDX_C2H2I] - k[5544]*y_cur[IDX_CH4I] - - k[5562]*y_cur[IDX_H2I] - k[5575]*y_cur[IDX_HI] - - k[5580]*y_cur[IDX_HCNI] - k[5584]*y_cur[IDX_OI] - - k[5626]*y_cur[IDX_eM] - k[6374]*y_cur[IDX_GRAINM]; - data[jistart + 19500] = 0.0 + k[1434]*y_cur[IDX_CII] + - k[3316]*y_cur[IDX_HeII]; - data[jistart + 19501] = 0.0 + k[3469]*y_cur[IDX_NI]; - data[jistart + 19502] = 0.0 + k[3307]*y_cur[IDX_HeII]; - data[jistart + 19503] = 0.0 + k[3310]*y_cur[IDX_HeII]; - data[jistart + 19504] = 0.0 + k[3313]*y_cur[IDX_HeII]; - data[jistart + 19505] = 0.0 + k[1920]*y_cur[IDX_CI] + - k[3470]*y_cur[IDX_NI] + k[3754]*y_cur[IDX_OI] + - k[3841]*y_cur[IDX_SI]; - data[jistart + 19506] = 0.0 + k[2365]*y_cur[IDX_HII] + - k[3328]*y_cur[IDX_HeII]; - data[jistart + 19507] = 0.0 + k[2848]*y_cur[IDX_HI] + k[6271]; - data[jistart + 19508] = 0.0 + k[3322]*y_cur[IDX_HeII]; - data[jistart + 19509] = 0.0 + k[1531]*y_cur[IDX_C2H2II] + - k[3326]*y_cur[IDX_HeII]; - data[jistart + 19510] = 0.0 + k[3329]*y_cur[IDX_HeII]; - data[jistart + 19511] = 0.0 + k[1447]*y_cur[IDX_CII] + - k[3332]*y_cur[IDX_HeII]; - data[jistart + 19512] = 0.0 + k[1932]*y_cur[IDX_CI] + - k[2019]*y_cur[IDX_CH2I] + k[2292]*y_cur[IDX_COI] + - k[3476]*y_cur[IDX_NI] + k[3764]*y_cur[IDX_OI] + - k[3842]*y_cur[IDX_SI] + k[6284]; - data[jistart + 19513] = 0.0 + k[3331]*y_cur[IDX_HeII]; - data[jistart + 19514] = 0.0 + k[3335]*y_cur[IDX_HeII]; - data[jistart + 19515] = 0.0 + k[2849]*y_cur[IDX_HI]; - data[jistart + 19516] = 0.0 - k[5626]*y_cur[IDX_SiII]; - data[jistart + 19517] = 0.0 + k[4990]*y_cur[IDX_SiHI]; - data[jistart + 19518] = 0.0 - k[198]*y_cur[IDX_SiCI] - - k[1434]*y_cur[IDX_SiCI]; - data[jistart + 19519] = 0.0 + k[6491]*y_cur[IDX_HCSiII] + - k[6498]*y_cur[IDX_SiCH2II] + k[6643]*y_cur[IDX_SiC2II] + - k[6747]*y_cur[IDX_SiC3II]; - data[jistart + 19520] = 0.0 + k[7137] + k[7319] + k[7501]; - data[jistart + 19521] = 0.0 - k[425]*y_cur[IDX_SiCI]; - data[jistart + 19522] = 0.0 - k[2750]*y_cur[IDX_SiCI]; - data[jistart + 19523] = 0.0 - k[2821]*y_cur[IDX_SiCI]; - data[jistart + 19524] = 0.0 - k[2997]*y_cur[IDX_SiCI]; - data[jistart + 19525] = 0.0 + k[6193]; - data[jistart + 19526] = 0.0 + k[1110]*y_cur[IDX_eM] + - k[6491]*y_cur[IDX_GRAINM]; - data[jistart + 19527] = 0.0 - k[3316]*y_cur[IDX_SiCI] - - k[3317]*y_cur[IDX_SiCI]; - data[jistart + 19528] = 0.0 - k[5292]*y_cur[IDX_SiCI] - - k[5293]*y_cur[IDX_SiCI]; - data[jistart + 19529] = 0.0 + k[5440]*y_cur[IDX_SiC2I] - - k[5443]*y_cur[IDX_SiCI] - k[5444]*y_cur[IDX_SiCI]; - data[jistart + 19530] = 0.0 - k[3792]*y_cur[IDX_SiCI]; - data[jistart + 19531] = 0.0 - k[705]*y_cur[IDX_SiCI]; - data[jistart + 19532] = 0.0 - k[198]*y_cur[IDX_CII] - - k[425]*y_cur[IDX_HII] - k[705]*y_cur[IDX_SII] - - k[1434]*y_cur[IDX_CII] - k[2750]*y_cur[IDX_H3II] - - k[2821]*y_cur[IDX_H3OII] - k[2997]*y_cur[IDX_HCOII] - - k[3316]*y_cur[IDX_HeII] - k[3317]*y_cur[IDX_HeII] - - k[3792]*y_cur[IDX_OHII] - k[5292]*y_cur[IDX_NI] - - k[5293]*y_cur[IDX_NI] - k[5443]*y_cur[IDX_OI] - - k[5444]*y_cur[IDX_OI] - k[5924] - k[6267] - k[6955]; - data[jistart + 19533] = 0.0 + k[5440]*y_cur[IDX_OI] + k[5918]; - data[jistart + 19534] = 0.0 + k[1225]*y_cur[IDX_eM] + - k[6643]*y_cur[IDX_GRAINM]; - data[jistart + 19535] = 0.0 + k[6263]; - data[jistart + 19536] = 0.0 + k[1233]*y_cur[IDX_eM] + - k[6747]*y_cur[IDX_GRAINM]; - data[jistart + 19537] = 0.0 + k[5925]; - data[jistart + 19538] = 0.0 + k[1244]*y_cur[IDX_eM] + - k[6498]*y_cur[IDX_GRAINM]; - data[jistart + 19539] = 0.0 + k[4990]*y_cur[IDX_CI]; - data[jistart + 19540] = 0.0 + k[1110]*y_cur[IDX_HCSiII] + - k[1225]*y_cur[IDX_SiC2II] + k[1233]*y_cur[IDX_SiC3II] + - k[1244]*y_cur[IDX_SiCH2II]; - data[jistart + 19541] = 0.0 + k[1925]*y_cur[IDX_SiHII]; - data[jistart + 19542] = 0.0 + k[198]*y_cur[IDX_SiCI] + - k[1440]*y_cur[IDX_SiH2I] + k[1445]*y_cur[IDX_SiHI] + - k[1446]*y_cur[IDX_SiNI] + k[1448]*y_cur[IDX_SiSI]; - data[jistart + 19543] = 0.0 + k[1465]*y_cur[IDX_SiOII]; - data[jistart + 19544] = 0.0 + k[2266]*y_cur[IDX_SiII]; - data[jistart + 19545] = 0.0 - k[6481]*y_cur[IDX_SiCII]; - data[jistart + 19546] = 0.0 + k[425]*y_cur[IDX_SiCI] + - k[2347]*y_cur[IDX_HCSiI]; - data[jistart + 19547] = 0.0 - k[2472]*y_cur[IDX_SiCII]; - data[jistart + 19548] = 0.0 + k[2347]*y_cur[IDX_HII] + - k[3258]*y_cur[IDX_HeII]; - data[jistart + 19549] = 0.0 + k[3258]*y_cur[IDX_HCSiI]; - data[jistart + 19550] = 0.0 - k[3469]*y_cur[IDX_SiCII]; - data[jistart + 19551] = 0.0 - k[3753]*y_cur[IDX_SiCII]; - data[jistart + 19552] = 0.0 + k[705]*y_cur[IDX_SiCI]; - data[jistart + 19553] = 0.0 + k[2266]*y_cur[IDX_CHI]; - data[jistart + 19554] = 0.0 + k[198]*y_cur[IDX_CII] + - k[425]*y_cur[IDX_HII] + k[705]*y_cur[IDX_SII]; - data[jistart + 19555] = 0.0 - k[1223]*y_cur[IDX_eM] - - k[2472]*y_cur[IDX_H2I] - k[3469]*y_cur[IDX_NI] - - k[3753]*y_cur[IDX_OI] - k[6481]*y_cur[IDX_GRAINM]; - data[jistart + 19556] = 0.0 + k[1445]*y_cur[IDX_CII]; - data[jistart + 19557] = 0.0 + k[1925]*y_cur[IDX_CI]; - data[jistart + 19558] = 0.0 + k[1440]*y_cur[IDX_CII]; - data[jistart + 19559] = 0.0 + k[1446]*y_cur[IDX_CII]; - data[jistart + 19560] = 0.0 + k[1465]*y_cur[IDX_C2I]; - data[jistart + 19561] = 0.0 + k[1448]*y_cur[IDX_CII]; - data[jistart + 19562] = 0.0 - k[1223]*y_cur[IDX_SiCII]; - data[jistart + 19563] = 0.0 - k[195]*y_cur[IDX_SiC2I]; - data[jistart + 19564] = 0.0 + k[4879]*y_cur[IDX_SiI]; - data[jistart + 19565] = 0.0 + k[6650]*y_cur[IDX_SiC2HII] + - k[6660]*y_cur[IDX_SiC2H2II] + k[6746]*y_cur[IDX_SiC3II] + - k[6798]*y_cur[IDX_SiC4II]; - data[jistart + 19566] = 0.0 + k[7185] + k[7367] + k[7549]; - data[jistart + 19567] = 0.0 - k[419]*y_cur[IDX_SiC2I]; - data[jistart + 19568] = 0.0 - k[2744]*y_cur[IDX_SiC2I]; - data[jistart + 19569] = 0.0 - k[2819]*y_cur[IDX_SiC2I]; - data[jistart + 19570] = 0.0 - k[2991]*y_cur[IDX_SiC2I]; - data[jistart + 19571] = 0.0 - k[3307]*y_cur[IDX_SiC2I]; - data[jistart + 19572] = 0.0 - k[5440]*y_cur[IDX_SiC2I] + - k[5441]*y_cur[IDX_SiC3I]; - data[jistart + 19573] = 0.0 + k[4879]*y_cur[IDX_C2H2I]; - data[jistart + 19574] = 0.0 - k[195]*y_cur[IDX_CII] - - k[419]*y_cur[IDX_HII] - k[2744]*y_cur[IDX_H3II] - - k[2819]*y_cur[IDX_H3OII] - k[2991]*y_cur[IDX_HCOII] - - k[3307]*y_cur[IDX_HeII] - k[5440]*y_cur[IDX_OI] - k[5918] - k[6260] - - k[7003]; - data[jistart + 19575] = 0.0 + k[5920] + k[6262]; - data[jistart + 19576] = 0.0 + k[1227]*y_cur[IDX_eM] + - k[6650]*y_cur[IDX_GRAINM]; - data[jistart + 19577] = 0.0 + k[5919]; - data[jistart + 19578] = 0.0 + k[1228]*y_cur[IDX_eM] + - k[6660]*y_cur[IDX_GRAINM]; - data[jistart + 19579] = 0.0 + k[5441]*y_cur[IDX_OI] + k[5921] + - k[6264]; - data[jistart + 19580] = 0.0 + k[1232]*y_cur[IDX_eM] + - k[6746]*y_cur[IDX_GRAINM]; - data[jistart + 19581] = 0.0 + k[5923]; - data[jistart + 19582] = 0.0 + k[1238]*y_cur[IDX_eM] + - k[6798]*y_cur[IDX_GRAINM]; - data[jistart + 19583] = 0.0 + k[1227]*y_cur[IDX_SiC2HII] + - k[1228]*y_cur[IDX_SiC2H2II] + k[1232]*y_cur[IDX_SiC3II] + - k[1238]*y_cur[IDX_SiC4II]; - data[jistart + 19584] = 0.0 + k[1921]*y_cur[IDX_SiCH2II]; - data[jistart + 19585] = 0.0 + k[195]*y_cur[IDX_SiC2I] + - k[1410]*y_cur[IDX_HCSiI] + k[1435]*y_cur[IDX_SiCH2I]; - data[jistart + 19586] = 0.0 + k[1751]*y_cur[IDX_SiII]; - data[jistart + 19587] = 0.0 - k[1575]*y_cur[IDX_SiC2II]; - data[jistart + 19588] = 0.0 + k[1529]*y_cur[IDX_SiI]; - data[jistart + 19589] = 0.0 - k[6642]*y_cur[IDX_SiC2II] - - k[6643]*y_cur[IDX_SiC2II]; - data[jistart + 19590] = 0.0 + k[419]*y_cur[IDX_SiC2I] + - k[2358]*y_cur[IDX_SiC2HI]; - data[jistart + 19591] = 0.0 - k[2473]*y_cur[IDX_SiC2II]; - data[jistart + 19592] = 0.0 + k[1410]*y_cur[IDX_CII]; - data[jistart + 19593] = 0.0 + k[3311]*y_cur[IDX_SiC2HI] + - k[3312]*y_cur[IDX_SiC3I]; - data[jistart + 19594] = 0.0 + k[1529]*y_cur[IDX_C2H2II]; - data[jistart + 19595] = 0.0 + k[1751]*y_cur[IDX_C2HI]; - data[jistart + 19596] = 0.0 + k[195]*y_cur[IDX_CII] + - k[419]*y_cur[IDX_HII]; - data[jistart + 19597] = 0.0 - k[1224]*y_cur[IDX_eM] - - k[1225]*y_cur[IDX_eM] - k[1575]*y_cur[IDX_C2H2I] - - k[2473]*y_cur[IDX_H2I] - k[6642]*y_cur[IDX_GRAINM] - - k[6643]*y_cur[IDX_GRAINM]; - data[jistart + 19598] = 0.0 + k[2358]*y_cur[IDX_HII] + - k[3311]*y_cur[IDX_HeII]; - data[jistart + 19599] = 0.0 + k[3312]*y_cur[IDX_HeII]; - data[jistart + 19600] = 0.0 + k[1435]*y_cur[IDX_CII]; - data[jistart + 19601] = 0.0 + k[1921]*y_cur[IDX_CI]; - data[jistart + 19602] = 0.0 - k[1224]*y_cur[IDX_SiC2II] - - k[1225]*y_cur[IDX_SiC2II]; - data[jistart + 19603] = 0.0 - k[196]*y_cur[IDX_SiC2HI] - - k[1432]*y_cur[IDX_SiC2HI]; - data[jistart + 19604] = 0.0 + k[4880]*y_cur[IDX_SiI]; - data[jistart + 19605] = 0.0 + k[6661]*y_cur[IDX_SiC2H2II] + - k[6665]*y_cur[IDX_SiC2H3II]; - data[jistart + 19606] = 0.0 + k[7190] + k[7372] + k[7554]; - data[jistart + 19607] = 0.0 - k[421]*y_cur[IDX_SiC2HI] - - k[2358]*y_cur[IDX_SiC2HI]; - data[jistart + 19608] = 0.0 - k[2746]*y_cur[IDX_SiC2HI]; - data[jistart + 19609] = 0.0 - k[2820]*y_cur[IDX_SiC2HI]; - data[jistart + 19610] = 0.0 - k[2993]*y_cur[IDX_SiC2HI]; - data[jistart + 19611] = 0.0 - k[3310]*y_cur[IDX_SiC2HI] - - k[3311]*y_cur[IDX_SiC2HI]; - data[jistart + 19612] = 0.0 + k[4880]*y_cur[IDX_C2H2I]; - data[jistart + 19613] = 0.0 - k[196]*y_cur[IDX_CII] - - k[421]*y_cur[IDX_HII] - k[1432]*y_cur[IDX_CII] - - k[2358]*y_cur[IDX_HII] - k[2746]*y_cur[IDX_H3II] - - k[2820]*y_cur[IDX_H3OII] - k[2993]*y_cur[IDX_HCOII] - - k[3310]*y_cur[IDX_HeII] - k[3311]*y_cur[IDX_HeII] - k[5920] - - k[6262] - k[7008]; - data[jistart + 19614] = 0.0 + k[6261]; - data[jistart + 19615] = 0.0 + k[1229]*y_cur[IDX_eM] + - k[6661]*y_cur[IDX_GRAINM]; - data[jistart + 19616] = 0.0 + k[1231]*y_cur[IDX_eM] + - k[6665]*y_cur[IDX_GRAINM]; - data[jistart + 19617] = 0.0 + k[1229]*y_cur[IDX_SiC2H2II] + - k[1231]*y_cur[IDX_SiC2H3II]; - data[jistart + 19618] = 0.0 - k[1915]*y_cur[IDX_SiC2HII] + - k[1922]*y_cur[IDX_SiCH2II]; - data[jistart + 19619] = 0.0 + k[196]*y_cur[IDX_SiC2HI] + - k[1436]*y_cur[IDX_SiCH2I] + k[1437]*y_cur[IDX_SiCH3I]; - data[jistart + 19620] = 0.0 + k[1574]*y_cur[IDX_SiII] - - k[1576]*y_cur[IDX_SiC2HII]; - data[jistart + 19621] = 0.0 + k[1530]*y_cur[IDX_SiI]; - data[jistart + 19622] = 0.0 + k[1626]*y_cur[IDX_SiI]; - data[jistart + 19623] = 0.0 + k[3864]*y_cur[IDX_SiII]; - data[jistart + 19624] = 0.0 - k[6649]*y_cur[IDX_SiC2HII] - - k[6650]*y_cur[IDX_SiC2HII]; - data[jistart + 19625] = 0.0 + k[421]*y_cur[IDX_SiC2HI] + - k[2357]*y_cur[IDX_SiC2H2I]; - data[jistart + 19626] = 0.0 + k[2473]*y_cur[IDX_SiC2II] - - k[5563]*y_cur[IDX_SiC2HII]; - data[jistart + 19627] = 0.0 + k[2744]*y_cur[IDX_SiC2I]; - data[jistart + 19628] = 0.0 + k[2819]*y_cur[IDX_SiC2I]; - data[jistart + 19629] = 0.0 + k[2991]*y_cur[IDX_SiC2I]; - data[jistart + 19630] = 0.0 + k[3308]*y_cur[IDX_SiC2H2I]; - data[jistart + 19631] = 0.0 + k[1530]*y_cur[IDX_C2H2II] + - k[1626]*y_cur[IDX_C2H3II]; - data[jistart + 19632] = 0.0 + k[1574]*y_cur[IDX_C2H2I] + - k[3864]*y_cur[IDX_CH3CCHI]; - data[jistart + 19633] = 0.0 + k[2744]*y_cur[IDX_H3II] + - k[2819]*y_cur[IDX_H3OII] + k[2991]*y_cur[IDX_HCOII]; - data[jistart + 19634] = 0.0 + k[2473]*y_cur[IDX_H2I]; - data[jistart + 19635] = 0.0 + k[196]*y_cur[IDX_CII] + - k[421]*y_cur[IDX_HII]; - data[jistart + 19636] = 0.0 - k[1226]*y_cur[IDX_eM] - - k[1227]*y_cur[IDX_eM] - k[1576]*y_cur[IDX_C2H2I] - - k[1915]*y_cur[IDX_CI] - k[5563]*y_cur[IDX_H2I] - - k[6649]*y_cur[IDX_GRAINM] - k[6650]*y_cur[IDX_GRAINM]; - data[jistart + 19637] = 0.0 + k[2357]*y_cur[IDX_HII] + - k[3308]*y_cur[IDX_HeII]; - data[jistart + 19638] = 0.0 + k[1436]*y_cur[IDX_CII]; - data[jistart + 19639] = 0.0 + k[1922]*y_cur[IDX_CI]; - data[jistart + 19640] = 0.0 + k[1437]*y_cur[IDX_CII]; - data[jistart + 19641] = 0.0 - k[1226]*y_cur[IDX_SiC2HII] - - k[1227]*y_cur[IDX_SiC2HII]; - data[jistart + 19642] = 0.0 - k[1431]*y_cur[IDX_SiC2H2I]; - data[jistart + 19643] = 0.0 + k[4885]*y_cur[IDX_SiI]; - data[jistart + 19644] = 0.0 + k[6664]*y_cur[IDX_SiC2H3II]; - data[jistart + 19645] = 0.0 + k[7192] + k[7374] + k[7556]; - data[jistart + 19646] = 0.0 - k[420]*y_cur[IDX_SiC2H2I] - - k[2357]*y_cur[IDX_SiC2H2I]; - data[jistart + 19647] = 0.0 - k[2745]*y_cur[IDX_SiC2H2I]; - data[jistart + 19648] = 0.0 - k[2992]*y_cur[IDX_SiC2H2I]; - data[jistart + 19649] = 0.0 - k[3308]*y_cur[IDX_SiC2H2I] - - k[3309]*y_cur[IDX_SiC2H2I]; - data[jistart + 19650] = 0.0 + k[4885]*y_cur[IDX_C2H4I]; - data[jistart + 19651] = 0.0 - k[420]*y_cur[IDX_HII] - - k[1431]*y_cur[IDX_CII] - k[2357]*y_cur[IDX_HII] - - k[2745]*y_cur[IDX_H3II] - k[2992]*y_cur[IDX_HCOII] - - k[3308]*y_cur[IDX_HeII] - k[3309]*y_cur[IDX_HeII] - k[5919] - - k[6261] - k[7010]; - data[jistart + 19652] = 0.0 + k[1230]*y_cur[IDX_eM] + - k[6664]*y_cur[IDX_GRAINM]; - data[jistart + 19653] = 0.0 + k[1230]*y_cur[IDX_SiC2H3II]; - data[jistart + 19654] = 0.0 - k[1916]*y_cur[IDX_SiC2H2II] + - k[1923]*y_cur[IDX_SiCH3II]; - data[jistart + 19655] = 0.0 + k[1438]*y_cur[IDX_SiCH3I]; - data[jistart + 19656] = 0.0 + k[5512]*y_cur[IDX_SiII]; - data[jistart + 19657] = 0.0 + k[1646]*y_cur[IDX_SiII]; - data[jistart + 19658] = 0.0 + k[1627]*y_cur[IDX_SiI]; - data[jistart + 19659] = 0.0 + k[1680]*y_cur[IDX_SiI]; - data[jistart + 19660] = 0.0 - k[6660]*y_cur[IDX_SiC2H2II] - - k[6661]*y_cur[IDX_SiC2H2II]; - data[jistart + 19661] = 0.0 + k[420]*y_cur[IDX_SiC2H2I]; - data[jistart + 19662] = 0.0 + k[2746]*y_cur[IDX_SiC2HI]; - data[jistart + 19663] = 0.0 + k[2820]*y_cur[IDX_SiC2HI]; - data[jistart + 19664] = 0.0 + k[2993]*y_cur[IDX_SiC2HI]; - data[jistart + 19665] = 0.0 + k[1627]*y_cur[IDX_C2H3II] + - k[1680]*y_cur[IDX_C2H4II]; - data[jistart + 19666] = 0.0 + k[1646]*y_cur[IDX_C2H3I] + - k[5512]*y_cur[IDX_C2H2I]; - data[jistart + 19667] = 0.0 + k[2746]*y_cur[IDX_H3II] + - k[2820]*y_cur[IDX_H3OII] + k[2993]*y_cur[IDX_HCOII]; - data[jistart + 19668] = 0.0 + k[420]*y_cur[IDX_HII]; - data[jistart + 19669] = 0.0 - k[1228]*y_cur[IDX_eM] - - k[1229]*y_cur[IDX_eM] - k[1916]*y_cur[IDX_CI] - - k[6660]*y_cur[IDX_GRAINM] - k[6661]*y_cur[IDX_GRAINM]; - data[jistart + 19670] = 0.0 + k[1438]*y_cur[IDX_CII]; - data[jistart + 19671] = 0.0 + k[1923]*y_cur[IDX_CI]; - data[jistart + 19672] = 0.0 - k[1228]*y_cur[IDX_SiC2H2II] - - k[1229]*y_cur[IDX_SiC2H2II]; - data[jistart + 19673] = 0.0 - k[1917]*y_cur[IDX_SiC2H3II] + - k[1924]*y_cur[IDX_SiCH4II]; - data[jistart + 19674] = 0.0 + k[1718]*y_cur[IDX_SiII]; - data[jistart + 19675] = 0.0 + k[1681]*y_cur[IDX_SiI]; - data[jistart + 19676] = 0.0 + k[3865]*y_cur[IDX_SiII]; - data[jistart + 19677] = 0.0 - k[6664]*y_cur[IDX_SiC2H3II] - - k[6665]*y_cur[IDX_SiC2H3II]; - data[jistart + 19678] = 0.0 + k[5563]*y_cur[IDX_SiC2HII]; - data[jistart + 19679] = 0.0 + k[2745]*y_cur[IDX_SiC2H2I]; - data[jistart + 19680] = 0.0 + k[2992]*y_cur[IDX_SiC2H2I]; - data[jistart + 19681] = 0.0 + k[1681]*y_cur[IDX_C2H4II]; - data[jistart + 19682] = 0.0 + k[1718]*y_cur[IDX_C2H4I] + - k[3865]*y_cur[IDX_CH3CCHI]; - data[jistart + 19683] = 0.0 + k[5563]*y_cur[IDX_H2I]; - data[jistart + 19684] = 0.0 + k[2745]*y_cur[IDX_H3II] + - k[2992]*y_cur[IDX_HCOII]; - data[jistart + 19685] = 0.0 - k[1230]*y_cur[IDX_eM] - - k[1231]*y_cur[IDX_eM] - k[1917]*y_cur[IDX_CI] - - k[6664]*y_cur[IDX_GRAINM] - k[6665]*y_cur[IDX_GRAINM]; - data[jistart + 19686] = 0.0 + k[1924]*y_cur[IDX_CI]; - data[jistart + 19687] = 0.0 - k[1230]*y_cur[IDX_SiC2H3II] - - k[1231]*y_cur[IDX_SiC2H3II]; - data[jistart + 19688] = 0.0 - k[197]*y_cur[IDX_SiC3I]; - data[jistart + 19689] = 0.0 + k[6762]*y_cur[IDX_SiC3HII] + - k[6767]*y_cur[IDX_SiC3H2II] + k[6799]*y_cur[IDX_SiC4II] + - k[6800]*y_cur[IDX_SiC4HII]; - data[jistart + 19690] = 0.0 + k[7213] + k[7395] + k[7577]; - data[jistart + 19691] = 0.0 - k[422]*y_cur[IDX_SiC3I]; - data[jistart + 19692] = 0.0 - k[2747]*y_cur[IDX_SiC3I]; - data[jistart + 19693] = 0.0 - k[2994]*y_cur[IDX_SiC3I]; - data[jistart + 19694] = 0.0 - k[3312]*y_cur[IDX_SiC3I]; - data[jistart + 19695] = 0.0 - k[5441]*y_cur[IDX_SiC3I] + - k[5442]*y_cur[IDX_SiC4I]; - data[jistart + 19696] = 0.0 - k[197]*y_cur[IDX_CII] - - k[422]*y_cur[IDX_HII] - k[2747]*y_cur[IDX_H3II] - - k[2994]*y_cur[IDX_HCOII] - k[3312]*y_cur[IDX_HeII] - - k[5441]*y_cur[IDX_OI] - k[5921] - k[6263] - k[6264] - k[7031]; - data[jistart + 19697] = 0.0 + k[5922] + k[6265]; - data[jistart + 19698] = 0.0 + k[1235]*y_cur[IDX_eM] + - k[6762]*y_cur[IDX_GRAINM]; - data[jistart + 19699] = 0.0 + k[1236]*y_cur[IDX_eM] + - k[6767]*y_cur[IDX_GRAINM]; - data[jistart + 19700] = 0.0 + k[5442]*y_cur[IDX_OI]; - data[jistart + 19701] = 0.0 + k[1239]*y_cur[IDX_eM] + - k[6799]*y_cur[IDX_GRAINM]; - data[jistart + 19702] = 0.0 + k[1240]*y_cur[IDX_eM] + - k[6800]*y_cur[IDX_GRAINM]; - data[jistart + 19703] = 0.0 + k[1235]*y_cur[IDX_SiC3HII] + - k[1236]*y_cur[IDX_SiC3H2II] + k[1239]*y_cur[IDX_SiC4II] + - k[1240]*y_cur[IDX_SiC4HII]; - data[jistart + 19704] = 0.0 + k[1915]*y_cur[IDX_SiC2HII]; - data[jistart + 19705] = 0.0 + k[197]*y_cur[IDX_SiC3I] + - k[1432]*y_cur[IDX_SiC2HI]; - data[jistart + 19706] = 0.0 + k[3861]*y_cur[IDX_SiII]; - data[jistart + 19707] = 0.0 + k[3872]*y_cur[IDX_SiI]; - data[jistart + 19708] = 0.0 + k[3873]*y_cur[IDX_SiI]; - data[jistart + 19709] = 0.0 - k[6746]*y_cur[IDX_SiC3II] - - k[6747]*y_cur[IDX_SiC3II]; - data[jistart + 19710] = 0.0 + k[422]*y_cur[IDX_SiC3I] + - k[2359]*y_cur[IDX_SiC3HI]; - data[jistart + 19711] = 0.0 + k[3314]*y_cur[IDX_SiC3HI] + - k[3315]*y_cur[IDX_SiC4I]; - data[jistart + 19712] = 0.0 + k[3872]*y_cur[IDX_C3HII] + - k[3873]*y_cur[IDX_C3H2II]; - data[jistart + 19713] = 0.0 + k[3861]*y_cur[IDX_C3HI]; - data[jistart + 19714] = 0.0 + k[1432]*y_cur[IDX_CII]; - data[jistart + 19715] = 0.0 + k[1915]*y_cur[IDX_CI]; - data[jistart + 19716] = 0.0 + k[197]*y_cur[IDX_CII] + - k[422]*y_cur[IDX_HII]; - data[jistart + 19717] = 0.0 - k[1232]*y_cur[IDX_eM] - - k[1233]*y_cur[IDX_eM] - k[6746]*y_cur[IDX_GRAINM] - - k[6747]*y_cur[IDX_GRAINM]; - data[jistart + 19718] = 0.0 + k[2359]*y_cur[IDX_HII] + - k[3314]*y_cur[IDX_HeII]; - data[jistart + 19719] = 0.0 + k[3315]*y_cur[IDX_HeII]; - data[jistart + 19720] = 0.0 - k[1232]*y_cur[IDX_SiC3II] - - k[1233]*y_cur[IDX_SiC3II]; - data[jistart + 19721] = 0.0 - k[1433]*y_cur[IDX_SiC3HI]; - data[jistart + 19722] = 0.0 + k[6768]*y_cur[IDX_SiC3H2II]; - data[jistart + 19723] = 0.0 + k[7217] + k[7399] + k[7581]; - data[jistart + 19724] = 0.0 - k[423]*y_cur[IDX_SiC3HI] - - k[2359]*y_cur[IDX_SiC3HI]; - data[jistart + 19725] = 0.0 - k[2748]*y_cur[IDX_SiC3HI]; - data[jistart + 19726] = 0.0 - k[2995]*y_cur[IDX_SiC3HI]; - data[jistart + 19727] = 0.0 - k[3313]*y_cur[IDX_SiC3HI] - - k[3314]*y_cur[IDX_SiC3HI]; - data[jistart + 19728] = 0.0 - k[423]*y_cur[IDX_HII] - - k[1433]*y_cur[IDX_CII] - k[2359]*y_cur[IDX_HII] - - k[2748]*y_cur[IDX_H3II] - k[2995]*y_cur[IDX_HCOII] - - k[3313]*y_cur[IDX_HeII] - k[3314]*y_cur[IDX_HeII] - k[5922] - - k[6265] - k[7035]; - data[jistart + 19729] = 0.0 + k[1237]*y_cur[IDX_eM] + - k[6768]*y_cur[IDX_GRAINM]; - data[jistart + 19730] = 0.0 + k[1237]*y_cur[IDX_SiC3H2II]; - data[jistart + 19731] = 0.0 + k[1916]*y_cur[IDX_SiC2H2II] - - k[1918]*y_cur[IDX_SiC3HII]; - data[jistart + 19732] = 0.0 + k[1431]*y_cur[IDX_SiC2H2I]; - data[jistart + 19733] = 0.0 + k[3860]*y_cur[IDX_SiII]; - data[jistart + 19734] = 0.0 + k[3874]*y_cur[IDX_SiI]; - data[jistart + 19735] = 0.0 + k[3875]*y_cur[IDX_SiI]; - data[jistart + 19736] = 0.0 + k[3879]*y_cur[IDX_SiI]; - data[jistart + 19737] = 0.0 - k[6761]*y_cur[IDX_SiC3HII] - - k[6762]*y_cur[IDX_SiC3HII]; - data[jistart + 19738] = 0.0 + k[423]*y_cur[IDX_SiC3HI]; - data[jistart + 19739] = 0.0 + k[3868]*y_cur[IDX_SiII]; - data[jistart + 19740] = 0.0 + k[2747]*y_cur[IDX_SiC3I]; - data[jistart + 19741] = 0.0 + k[2994]*y_cur[IDX_SiC3I]; - data[jistart + 19742] = 0.0 + k[3874]*y_cur[IDX_C3H2II] + - k[3875]*y_cur[IDX_C3H3II] + k[3879]*y_cur[IDX_CH2CCHII]; - data[jistart + 19743] = 0.0 + k[3860]*y_cur[IDX_C3H2I] + - k[3868]*y_cur[IDX_H2CCCI]; - data[jistart + 19744] = 0.0 + k[1431]*y_cur[IDX_CII]; - data[jistart + 19745] = 0.0 + k[1916]*y_cur[IDX_CI]; - data[jistart + 19746] = 0.0 + k[2747]*y_cur[IDX_H3II] + - k[2994]*y_cur[IDX_HCOII]; - data[jistart + 19747] = 0.0 + k[423]*y_cur[IDX_HII]; - data[jistart + 19748] = 0.0 - k[1234]*y_cur[IDX_eM] - - k[1235]*y_cur[IDX_eM] - k[1918]*y_cur[IDX_CI] - - k[6761]*y_cur[IDX_GRAINM] - k[6762]*y_cur[IDX_GRAINM]; - data[jistart + 19749] = 0.0 - k[1234]*y_cur[IDX_SiC3HII] - - k[1235]*y_cur[IDX_SiC3HII]; - data[jistart + 19750] = 0.0 + k[1917]*y_cur[IDX_SiC2H3II] - - k[1919]*y_cur[IDX_SiC3H2II]; - data[jistart + 19751] = 0.0 + k[3876]*y_cur[IDX_SiI]; - data[jistart + 19752] = 0.0 + k[3863]*y_cur[IDX_SiII]; - data[jistart + 19753] = 0.0 + k[3880]*y_cur[IDX_SiI]; - data[jistart + 19754] = 0.0 - k[6767]*y_cur[IDX_SiC3H2II] - - k[6768]*y_cur[IDX_SiC3H2II]; - data[jistart + 19755] = 0.0 + k[2748]*y_cur[IDX_SiC3HI]; - data[jistart + 19756] = 0.0 + k[2995]*y_cur[IDX_SiC3HI]; - data[jistart + 19757] = 0.0 + k[3876]*y_cur[IDX_C3H3II] + - k[3880]*y_cur[IDX_CH2CCHII]; - data[jistart + 19758] = 0.0 + k[3863]*y_cur[IDX_CH2CCHI]; - data[jistart + 19759] = 0.0 + k[1917]*y_cur[IDX_CI]; - data[jistart + 19760] = 0.0 + k[2748]*y_cur[IDX_H3II] + - k[2995]*y_cur[IDX_HCOII]; - data[jistart + 19761] = 0.0 - k[1236]*y_cur[IDX_eM] - - k[1237]*y_cur[IDX_eM] - k[1919]*y_cur[IDX_CI] - - k[6767]*y_cur[IDX_GRAINM] - k[6768]*y_cur[IDX_GRAINM]; - data[jistart + 19762] = 0.0 - k[1236]*y_cur[IDX_SiC3H2II] - - k[1237]*y_cur[IDX_SiC3H2II]; - data[jistart + 19763] = 0.0 + k[6801]*y_cur[IDX_SiC4HII]; - data[jistart + 19764] = 0.0 + k[7228] + k[7410] + k[7592]; - data[jistart + 19765] = 0.0 - k[424]*y_cur[IDX_SiC4I]; - data[jistart + 19766] = 0.0 - k[2749]*y_cur[IDX_SiC4I]; - data[jistart + 19767] = 0.0 - k[2996]*y_cur[IDX_SiC4I]; - data[jistart + 19768] = 0.0 - k[3315]*y_cur[IDX_SiC4I]; - data[jistart + 19769] = 0.0 - k[5442]*y_cur[IDX_SiC4I]; - data[jistart + 19770] = 0.0 - k[424]*y_cur[IDX_HII] - - k[2749]*y_cur[IDX_H3II] - k[2996]*y_cur[IDX_HCOII] - - k[3315]*y_cur[IDX_HeII] - k[5442]*y_cur[IDX_OI] - k[5923] - k[6266] - - k[7046]; - data[jistart + 19771] = 0.0 + k[1241]*y_cur[IDX_eM] + - k[6801]*y_cur[IDX_GRAINM]; - data[jistart + 19772] = 0.0 + k[1241]*y_cur[IDX_SiC4HII]; - data[jistart + 19773] = 0.0 + k[1918]*y_cur[IDX_SiC3HII]; - data[jistart + 19774] = 0.0 + k[1433]*y_cur[IDX_SiC3HI]; - data[jistart + 19775] = 0.0 + k[3862]*y_cur[IDX_SiII]; - data[jistart + 19776] = 0.0 + k[3877]*y_cur[IDX_SiI]; - data[jistart + 19777] = 0.0 - k[6798]*y_cur[IDX_SiC4II] - - k[6799]*y_cur[IDX_SiC4II]; - data[jistart + 19778] = 0.0 + k[424]*y_cur[IDX_SiC4I]; - data[jistart + 19779] = 0.0 + k[3877]*y_cur[IDX_C4H2II]; - data[jistart + 19780] = 0.0 + k[3862]*y_cur[IDX_C4HI]; - data[jistart + 19781] = 0.0 + k[1433]*y_cur[IDX_CII]; - data[jistart + 19782] = 0.0 + k[1918]*y_cur[IDX_CI]; - data[jistart + 19783] = 0.0 + k[424]*y_cur[IDX_HII]; - data[jistart + 19784] = 0.0 - k[1238]*y_cur[IDX_eM] - - k[1239]*y_cur[IDX_eM] - k[6798]*y_cur[IDX_GRAINM] - - k[6799]*y_cur[IDX_GRAINM]; - data[jistart + 19785] = 0.0 - k[1238]*y_cur[IDX_SiC4II] - - k[1239]*y_cur[IDX_SiC4II]; - data[jistart + 19786] = 0.0 + k[1919]*y_cur[IDX_SiC3H2II]; - data[jistart + 19787] = 0.0 + k[1575]*y_cur[IDX_SiC2II] + - k[1576]*y_cur[IDX_SiC2HII]; - data[jistart + 19788] = 0.0 + k[3878]*y_cur[IDX_SiI]; - data[jistart + 19789] = 0.0 - k[6800]*y_cur[IDX_SiC4HII] - - k[6801]*y_cur[IDX_SiC4HII]; - data[jistart + 19790] = 0.0 + k[2749]*y_cur[IDX_SiC4I]; - data[jistart + 19791] = 0.0 + k[2996]*y_cur[IDX_SiC4I]; - data[jistart + 19792] = 0.0 + k[3878]*y_cur[IDX_C4H2II]; - data[jistart + 19793] = 0.0 + k[1575]*y_cur[IDX_C2H2I]; - data[jistart + 19794] = 0.0 + k[1576]*y_cur[IDX_C2H2I]; - data[jistart + 19795] = 0.0 + k[1919]*y_cur[IDX_CI]; - data[jistart + 19796] = 0.0 + k[2749]*y_cur[IDX_H3II] + - k[2996]*y_cur[IDX_HCOII]; - data[jistart + 19797] = 0.0 - k[1240]*y_cur[IDX_eM] - - k[1241]*y_cur[IDX_eM] - k[6800]*y_cur[IDX_GRAINM] - - k[6801]*y_cur[IDX_GRAINM]; - data[jistart + 19798] = 0.0 - k[1240]*y_cur[IDX_SiC4HII] - - k[1241]*y_cur[IDX_SiC4HII]; - data[jistart + 19799] = 0.0 + k[4989]*y_cur[IDX_SiH3I]; - data[jistart + 19800] = 0.0 - k[199]*y_cur[IDX_SiCH2I] - - k[1435]*y_cur[IDX_SiCH2I] - k[1436]*y_cur[IDX_SiCH2I]; - data[jistart + 19801] = 0.0 + k[5049]*y_cur[IDX_SiI]; - data[jistart + 19802] = 0.0 + k[6517]*y_cur[IDX_SiCH3II] + - k[6541]*y_cur[IDX_SiCH4II]; - data[jistart + 19803] = 0.0 + k[7145] + k[7327] + k[7509]; - data[jistart + 19804] = 0.0 - k[426]*y_cur[IDX_SiCH2I] - - k[2360]*y_cur[IDX_SiCH2I]; - data[jistart + 19805] = 0.0 + k[2570]*y_cur[IDX_SiCH3II]; - data[jistart + 19806] = 0.0 - k[2751]*y_cur[IDX_SiCH2I]; - data[jistart + 19807] = 0.0 - k[2998]*y_cur[IDX_SiCH2I]; - data[jistart + 19808] = 0.0 - k[3318]*y_cur[IDX_SiCH2I] - - k[3319]*y_cur[IDX_SiCH2I]; - data[jistart + 19809] = 0.0 + k[5049]*y_cur[IDX_CH3I]; - data[jistart + 19810] = 0.0 - k[199]*y_cur[IDX_CII] - - k[426]*y_cur[IDX_HII] - k[1435]*y_cur[IDX_CII] - - k[1436]*y_cur[IDX_CII] - k[2360]*y_cur[IDX_HII] - - k[2751]*y_cur[IDX_H3II] - k[2998]*y_cur[IDX_HCOII] - - k[3318]*y_cur[IDX_HeII] - k[3319]*y_cur[IDX_HeII] - k[5925] - - k[6268] - k[6269] - k[6963]; - data[jistart + 19811] = 0.0 + k[5926] + k[6270]; - data[jistart + 19812] = 0.0 + k[1246]*y_cur[IDX_eM] + - k[2570]*y_cur[IDX_H2OI] + k[6517]*y_cur[IDX_GRAINM]; - data[jistart + 19813] = 0.0 + k[1247]*y_cur[IDX_eM] + - k[6541]*y_cur[IDX_GRAINM]; - data[jistart + 19814] = 0.0 + k[4989]*y_cur[IDX_CI]; - data[jistart + 19815] = 0.0 + k[1246]*y_cur[IDX_SiCH3II] + - k[1247]*y_cur[IDX_SiCH4II]; - data[jistart + 19816] = 0.0 - k[1920]*y_cur[IDX_SiCH2II] - - k[1921]*y_cur[IDX_SiCH2II] - k[1922]*y_cur[IDX_SiCH2II] + - k[1927]*y_cur[IDX_SiH3II] + k[1928]*y_cur[IDX_SiH4II]; - data[jistart + 19817] = 0.0 + k[199]*y_cur[IDX_SiCH2I] + - k[1442]*y_cur[IDX_SiH3I] + k[1443]*y_cur[IDX_SiH4I]; - data[jistart + 19818] = 0.0 + k[2103]*y_cur[IDX_SiII]; - data[jistart + 19819] = 0.0 + k[2098]*y_cur[IDX_SiI] + - k[2100]*y_cur[IDX_SiHI]; - data[jistart + 19820] = 0.0 + k[3866]*y_cur[IDX_SiII]; - data[jistart + 19821] = 0.0 - k[6496]*y_cur[IDX_SiCH2II] - - k[6497]*y_cur[IDX_SiCH2II] - k[6498]*y_cur[IDX_SiCH2II]; - data[jistart + 19822] = 0.0 + k[426]*y_cur[IDX_SiCH2I] + - k[2361]*y_cur[IDX_SiCH3I]; - data[jistart + 19823] = 0.0 + k[2452]*y_cur[IDX_HCSiII]; - data[jistart + 19824] = 0.0 + k[2703]*y_cur[IDX_HCSiI]; - data[jistart + 19825] = 0.0 + k[2809]*y_cur[IDX_HCSiI]; - data[jistart + 19826] = 0.0 + k[2973]*y_cur[IDX_HCSiI]; - data[jistart + 19827] = 0.0 + k[2703]*y_cur[IDX_H3II] + - k[2809]*y_cur[IDX_H3OII] + k[2973]*y_cur[IDX_HCOII]; - data[jistart + 19828] = 0.0 + k[2452]*y_cur[IDX_H2I]; - data[jistart + 19829] = 0.0 + k[3320]*y_cur[IDX_SiCH3I]; - data[jistart + 19830] = 0.0 - k[3470]*y_cur[IDX_SiCH2II]; - data[jistart + 19831] = 0.0 - k[3754]*y_cur[IDX_SiCH2II] - - k[3755]*y_cur[IDX_SiCH2II]; - data[jistart + 19832] = 0.0 - k[3841]*y_cur[IDX_SiCH2II]; - data[jistart + 19833] = 0.0 + k[2098]*y_cur[IDX_CH3II]; - data[jistart + 19834] = 0.0 + k[2103]*y_cur[IDX_CH3I] + - k[3866]*y_cur[IDX_CH3CCHI]; - data[jistart + 19835] = 0.0 + k[199]*y_cur[IDX_CII] + - k[426]*y_cur[IDX_HII] + k[6269]; - data[jistart + 19836] = 0.0 - k[1242]*y_cur[IDX_eM] - - k[1243]*y_cur[IDX_eM] - k[1244]*y_cur[IDX_eM] - - k[1920]*y_cur[IDX_CI] - k[1921]*y_cur[IDX_CI] - - k[1922]*y_cur[IDX_CI] - k[3470]*y_cur[IDX_NI] - - k[3754]*y_cur[IDX_OI] - k[3755]*y_cur[IDX_OI] - - k[3841]*y_cur[IDX_SI] - k[6496]*y_cur[IDX_GRAINM] - - k[6497]*y_cur[IDX_GRAINM] - k[6498]*y_cur[IDX_GRAINM]; - data[jistart + 19837] = 0.0 + k[2361]*y_cur[IDX_HII] + - k[3320]*y_cur[IDX_HeII]; - data[jistart + 19838] = 0.0 + k[2100]*y_cur[IDX_CH3II]; - data[jistart + 19839] = 0.0 + k[1442]*y_cur[IDX_CII]; - data[jistart + 19840] = 0.0 + k[1927]*y_cur[IDX_CI]; - data[jistart + 19841] = 0.0 + k[1443]*y_cur[IDX_CII]; - data[jistart + 19842] = 0.0 + k[1928]*y_cur[IDX_CI]; - data[jistart + 19843] = 0.0 - k[1242]*y_cur[IDX_SiCH2II] - - k[1243]*y_cur[IDX_SiCH2II] - k[1244]*y_cur[IDX_SiCH2II]; - data[jistart + 19844] = 0.0 - k[200]*y_cur[IDX_SiCH3I] - - k[1437]*y_cur[IDX_SiCH3I] - k[1438]*y_cur[IDX_SiCH3I]; - data[jistart + 19845] = 0.0 + k[6542]*y_cur[IDX_SiCH4II]; - data[jistart + 19846] = 0.0 + k[7152] + k[7334] + k[7516]; - data[jistart + 19847] = 0.0 - k[427]*y_cur[IDX_SiCH3I] - - k[2361]*y_cur[IDX_SiCH3I]; - data[jistart + 19848] = 0.0 - k[2752]*y_cur[IDX_SiCH3I]; - data[jistart + 19849] = 0.0 - k[2822]*y_cur[IDX_SiCH3I]; - data[jistart + 19850] = 0.0 - k[2999]*y_cur[IDX_SiCH3I]; - data[jistart + 19851] = 0.0 - k[3320]*y_cur[IDX_SiCH3I] - - k[3321]*y_cur[IDX_SiCH3I]; - data[jistart + 19852] = 0.0 - k[200]*y_cur[IDX_CII] - - k[427]*y_cur[IDX_HII] - k[1437]*y_cur[IDX_CII] - - k[1438]*y_cur[IDX_CII] - k[2361]*y_cur[IDX_HII] - - k[2752]*y_cur[IDX_H3II] - k[2822]*y_cur[IDX_H3OII] - - k[2999]*y_cur[IDX_HCOII] - k[3320]*y_cur[IDX_HeII] - - k[3321]*y_cur[IDX_HeII] - k[5926] - k[6270] - k[6970]; - data[jistart + 19853] = 0.0 + k[1248]*y_cur[IDX_eM] + - k[6542]*y_cur[IDX_GRAINM]; - data[jistart + 19854] = 0.0 + k[1248]*y_cur[IDX_SiCH4II]; - data[jistart + 19855] = 0.0 - k[1923]*y_cur[IDX_SiCH3II]; - data[jistart + 19856] = 0.0 + k[200]*y_cur[IDX_SiCH3I] + - k[1444]*y_cur[IDX_SiH4I]; - data[jistart + 19857] = 0.0 + k[2236]*y_cur[IDX_SiI]; - data[jistart + 19858] = 0.0 - k[6516]*y_cur[IDX_SiCH3II] - - k[6517]*y_cur[IDX_SiCH3II]; - data[jistart + 19859] = 0.0 + k[427]*y_cur[IDX_SiCH3I]; - data[jistart + 19860] = 0.0 - k[2570]*y_cur[IDX_SiCH3II]; - data[jistart + 19861] = 0.0 + k[2751]*y_cur[IDX_SiCH2I]; - data[jistart + 19862] = 0.0 + k[2998]*y_cur[IDX_SiCH2I]; - data[jistart + 19863] = 0.0 + k[2236]*y_cur[IDX_CH5II]; - data[jistart + 19864] = 0.0 + k[2751]*y_cur[IDX_H3II] + - k[2998]*y_cur[IDX_HCOII]; - data[jistart + 19865] = 0.0 + k[200]*y_cur[IDX_CII] + - k[427]*y_cur[IDX_HII]; - data[jistart + 19866] = 0.0 - k[1245]*y_cur[IDX_eM] - - k[1246]*y_cur[IDX_eM] - k[1923]*y_cur[IDX_CI] - - k[2570]*y_cur[IDX_H2OI] - k[6516]*y_cur[IDX_GRAINM] - - k[6517]*y_cur[IDX_GRAINM]; - data[jistart + 19867] = 0.0 + k[1444]*y_cur[IDX_CII]; - data[jistart + 19868] = 0.0 - k[1245]*y_cur[IDX_SiCH3II] - - k[1246]*y_cur[IDX_SiCH3II]; - data[jistart + 19869] = 0.0 - k[1924]*y_cur[IDX_SiCH4II] + - k[1929]*y_cur[IDX_SiH5II]; - data[jistart + 19870] = 0.0 + k[5544]*y_cur[IDX_SiII]; - data[jistart + 19871] = 0.0 + k[2237]*y_cur[IDX_SiI]; - data[jistart + 19872] = 0.0 - k[6541]*y_cur[IDX_SiCH4II] - - k[6542]*y_cur[IDX_SiCH4II]; - data[jistart + 19873] = 0.0 + k[2752]*y_cur[IDX_SiCH3I]; - data[jistart + 19874] = 0.0 + k[2822]*y_cur[IDX_SiCH3I]; - data[jistart + 19875] = 0.0 + k[2999]*y_cur[IDX_SiCH3I]; - data[jistart + 19876] = 0.0 + k[2237]*y_cur[IDX_CH5II]; - data[jistart + 19877] = 0.0 + k[5544]*y_cur[IDX_CH4I]; - data[jistart + 19878] = 0.0 + k[2752]*y_cur[IDX_H3II] + - k[2822]*y_cur[IDX_H3OII] + k[2999]*y_cur[IDX_HCOII]; - data[jistart + 19879] = 0.0 - k[1247]*y_cur[IDX_eM] - - k[1248]*y_cur[IDX_eM] - k[1924]*y_cur[IDX_CI] - - k[6541]*y_cur[IDX_GRAINM] - k[6542]*y_cur[IDX_GRAINM]; - data[jistart + 19880] = 0.0 + k[1929]*y_cur[IDX_CI]; - data[jistart + 19881] = 0.0 - k[1247]*y_cur[IDX_SiCH4II] - - k[1248]*y_cur[IDX_SiCH4II]; - data[jistart + 19882] = 0.0 - k[6592]*y_cur[IDX_SiFII]; - data[jistart + 19883] = 0.0 + k[3015]*y_cur[IDX_SiII]; - data[jistart + 19884] = 0.0 + k[3015]*y_cur[IDX_HFI]; - data[jistart + 19885] = 0.0 - k[1249]*y_cur[IDX_eM] - - k[6592]*y_cur[IDX_GRAINM]; - data[jistart + 19886] = 0.0 - k[1249]*y_cur[IDX_SiFII]; - data[jistart + 19887] = 0.0 - k[4990]*y_cur[IDX_SiHI]; - data[jistart + 19888] = 0.0 - k[1445]*y_cur[IDX_SiHI]; - data[jistart + 19889] = 0.0 + k[3869]*y_cur[IDX_SiII]; - data[jistart + 19890] = 0.0 - k[2100]*y_cur[IDX_SiHI]; - data[jistart + 19891] = 0.0 + k[8600]*y_cur[IDX_GSiI]; - data[jistart + 19892] = 0.0 + k[6404]*y_cur[IDX_SiH2II] + - k[6413]*y_cur[IDX_SiH3II] + k[6585]*y_cur[IDX_H2SiOII]; - data[jistart + 19893] = 0.0 + k[8600]*y_cur[IDX_GHI]; - data[jistart + 19894] = 0.0 + k[7102] + k[7284] + k[7466]; - data[jistart + 19895] = 0.0 - k[431]*y_cur[IDX_SiHI] - - k[2365]*y_cur[IDX_SiHI]; - data[jistart + 19896] = 0.0 + k[1023]*y_cur[IDX_eM] + - k[6585]*y_cur[IDX_GRAINM]; - data[jistart + 19897] = 0.0 - k[2756]*y_cur[IDX_SiHI]; - data[jistart + 19898] = 0.0 - k[2824]*y_cur[IDX_SiHI]; - data[jistart + 19899] = 0.0 - k[3002]*y_cur[IDX_SiHI]; - data[jistart + 19900] = 0.0 - k[3328]*y_cur[IDX_SiHI]; - data[jistart + 19901] = 0.0 - k[5296]*y_cur[IDX_SiHI]; - data[jistart + 19902] = 0.0 + k[3755]*y_cur[IDX_SiCH2II] - - k[5449]*y_cur[IDX_SiHI]; - data[jistart + 19903] = 0.0 - k[3793]*y_cur[IDX_SiHI]; - data[jistart + 19904] = 0.0 - k[725]*y_cur[IDX_SiHI] - - k[3885]*y_cur[IDX_SiHI]; - data[jistart + 19905] = 0.0 + k[3869]*y_cur[IDX_C4H2I]; - data[jistart + 19906] = 0.0 + k[3755]*y_cur[IDX_OI]; - data[jistart + 19907] = 0.0 - k[431]*y_cur[IDX_HII] - - k[725]*y_cur[IDX_SII] - k[1445]*y_cur[IDX_CII] - - k[2100]*y_cur[IDX_CH3II] - k[2365]*y_cur[IDX_HII] - - k[2756]*y_cur[IDX_H3II] - k[2824]*y_cur[IDX_H3OII] - - k[3002]*y_cur[IDX_HCOII] - k[3328]*y_cur[IDX_HeII] - - k[3793]*y_cur[IDX_OHII] - k[3885]*y_cur[IDX_SII] - - k[4990]*y_cur[IDX_CI] - k[5296]*y_cur[IDX_NI] - - k[5449]*y_cur[IDX_OI] - k[5930] - k[6280] - k[6920]; - data[jistart + 19908] = 0.0 + k[5927] + k[6273]; - data[jistart + 19909] = 0.0 + k[1253]*y_cur[IDX_eM] + - k[6404]*y_cur[IDX_GRAINM]; - data[jistart + 19910] = 0.0 + k[6276]; - data[jistart + 19911] = 0.0 + k[1255]*y_cur[IDX_eM] + - k[6413]*y_cur[IDX_GRAINM]; - data[jistart + 19912] = 0.0 + k[6279]; - data[jistart + 19913] = 0.0 + k[1023]*y_cur[IDX_H2SiOII] + - k[1253]*y_cur[IDX_SiH2II] + k[1255]*y_cur[IDX_SiH3II]; - data[jistart + 19914] = 0.0 - k[1925]*y_cur[IDX_SiHII]; - data[jistart + 19915] = 0.0 + k[1532]*y_cur[IDX_SiH4I]; - data[jistart + 19916] = 0.0 - k[2267]*y_cur[IDX_SiHII]; - data[jistart + 19917] = 0.0 - k[6388]*y_cur[IDX_SiHII]; - data[jistart + 19918] = 0.0 - k[2848]*y_cur[IDX_SiHII] + - k[5575]*y_cur[IDX_SiII]; - data[jistart + 19919] = 0.0 + k[431]*y_cur[IDX_SiHI] + - k[2362]*y_cur[IDX_SiH2I]; - data[jistart + 19920] = 0.0 - k[5564]*y_cur[IDX_SiHII]; - data[jistart + 19921] = 0.0 - k[2571]*y_cur[IDX_SiHII]; - data[jistart + 19922] = 0.0 + k[2743]*y_cur[IDX_SiI]; - data[jistart + 19923] = 0.0 + k[2818]*y_cur[IDX_SiI]; - data[jistart + 19924] = 0.0 + k[3881]*y_cur[IDX_SiI]; - data[jistart + 19925] = 0.0 + k[3309]*y_cur[IDX_SiC2H2I] + - k[3319]*y_cur[IDX_SiCH2I] + k[3321]*y_cur[IDX_SiCH3I] + - k[3323]*y_cur[IDX_SiH2I] + k[3324]*y_cur[IDX_SiH3I] + - k[3327]*y_cur[IDX_SiH4I]; - data[jistart + 19926] = 0.0 - k[3471]*y_cur[IDX_SiHII]; - data[jistart + 19927] = 0.0 - k[3603]*y_cur[IDX_SiHII]; - data[jistart + 19928] = 0.0 - k[3756]*y_cur[IDX_SiHII]; - data[jistart + 19929] = 0.0 + k[3791]*y_cur[IDX_SiI]; - data[jistart + 19930] = 0.0 + k[725]*y_cur[IDX_SiHI]; - data[jistart + 19931] = 0.0 + k[2743]*y_cur[IDX_H3II] + - k[2818]*y_cur[IDX_H3OII] + k[3791]*y_cur[IDX_OHII] + - k[3881]*y_cur[IDX_HCOII]; - data[jistart + 19932] = 0.0 + k[5575]*y_cur[IDX_HI]; - data[jistart + 19933] = 0.0 + k[3309]*y_cur[IDX_HeII]; - data[jistart + 19934] = 0.0 + k[3319]*y_cur[IDX_HeII]; - data[jistart + 19935] = 0.0 + k[3321]*y_cur[IDX_HeII]; - data[jistart + 19936] = 0.0 + k[431]*y_cur[IDX_HII] + - k[725]*y_cur[IDX_SII]; - data[jistart + 19937] = 0.0 - k[1250]*y_cur[IDX_eM] - - k[1925]*y_cur[IDX_CI] - k[2267]*y_cur[IDX_CHI] - - k[2571]*y_cur[IDX_H2OI] - k[2848]*y_cur[IDX_HI] - - k[3471]*y_cur[IDX_NI] - k[3603]*y_cur[IDX_NH3I] - - k[3756]*y_cur[IDX_OI] - k[5564]*y_cur[IDX_H2I] - k[6271] - - k[6388]*y_cur[IDX_GRAINM]; - data[jistart + 19938] = 0.0 + k[2362]*y_cur[IDX_HII] + - k[3323]*y_cur[IDX_HeII]; - data[jistart + 19939] = 0.0 + k[3324]*y_cur[IDX_HeII]; - data[jistart + 19940] = 0.0 + k[1532]*y_cur[IDX_C2H2II] + - k[3327]*y_cur[IDX_HeII]; - data[jistart + 19941] = 0.0 - k[1250]*y_cur[IDX_SiHII]; - data[jistart + 19942] = 0.0 - k[4988]*y_cur[IDX_SiH2I]; - data[jistart + 19943] = 0.0 - k[201]*y_cur[IDX_SiH2I] - - k[1439]*y_cur[IDX_SiH2I] - k[1440]*y_cur[IDX_SiH2I]; - data[jistart + 19944] = 0.0 + k[8601]*y_cur[IDX_GSiHI]; - data[jistart + 19945] = 0.0 + k[6412]*y_cur[IDX_SiH3II] + - k[6426]*y_cur[IDX_SiH4II]; - data[jistart + 19946] = 0.0 + k[8601]*y_cur[IDX_GHI]; - data[jistart + 19947] = 0.0 + k[7106] + k[7288] + k[7470]; - data[jistart + 19948] = 0.0 - k[428]*y_cur[IDX_SiH2I] - - k[2362]*y_cur[IDX_SiH2I]; - data[jistart + 19949] = 0.0 - k[2753]*y_cur[IDX_SiH2I]; - data[jistart + 19950] = 0.0 - k[2823]*y_cur[IDX_SiH2I]; - data[jistart + 19951] = 0.0 - k[3000]*y_cur[IDX_SiH2I]; - data[jistart + 19952] = 0.0 - k[3322]*y_cur[IDX_SiH2I] - - k[3323]*y_cur[IDX_SiH2I]; - data[jistart + 19953] = 0.0 - k[5294]*y_cur[IDX_SiH2I]; - data[jistart + 19954] = 0.0 - k[5445]*y_cur[IDX_SiH2I] - - k[5446]*y_cur[IDX_SiH2I]; - data[jistart + 19955] = 0.0 - k[201]*y_cur[IDX_CII] - - k[428]*y_cur[IDX_HII] - k[1439]*y_cur[IDX_CII] - - k[1440]*y_cur[IDX_CII] - k[2362]*y_cur[IDX_HII] - - k[2753]*y_cur[IDX_H3II] - k[2823]*y_cur[IDX_H3OII] - - k[3000]*y_cur[IDX_HCOII] - k[3322]*y_cur[IDX_HeII] - - k[3323]*y_cur[IDX_HeII] - k[4988]*y_cur[IDX_CI] - - k[5294]*y_cur[IDX_NI] - k[5445]*y_cur[IDX_OI] - - k[5446]*y_cur[IDX_OI] - k[5927] - k[6272] - k[6273] - k[6924]; - data[jistart + 19956] = 0.0 + k[5928] + k[6274]; - data[jistart + 19957] = 0.0 + k[1254]*y_cur[IDX_eM] + - k[6412]*y_cur[IDX_GRAINM]; - data[jistart + 19958] = 0.0 + k[5929] + k[6277]; - data[jistart + 19959] = 0.0 + k[1256]*y_cur[IDX_eM] + - k[6426]*y_cur[IDX_GRAINM]; - data[jistart + 19960] = 0.0 + k[1254]*y_cur[IDX_SiH3II] + - k[1256]*y_cur[IDX_SiH4II]; - data[jistart + 19961] = 0.0 - k[1926]*y_cur[IDX_SiH2II]; - data[jistart + 19962] = 0.0 + k[201]*y_cur[IDX_SiH2I]; - data[jistart + 19963] = 0.0 + k[1533]*y_cur[IDX_SiH4I]; - data[jistart + 19964] = 0.0 + k[1682]*y_cur[IDX_SiH4I]; - data[jistart + 19965] = 0.0 - k[6402]*y_cur[IDX_SiH2II] - - k[6403]*y_cur[IDX_SiH2II] - k[6404]*y_cur[IDX_SiH2II]; - data[jistart + 19966] = 0.0 + k[428]*y_cur[IDX_SiH2I] + - k[2363]*y_cur[IDX_SiH3I]; - data[jistart + 19967] = 0.0 + k[5562]*y_cur[IDX_SiII]; - data[jistart + 19968] = 0.0 + k[2756]*y_cur[IDX_SiHI]; - data[jistart + 19969] = 0.0 + k[2824]*y_cur[IDX_SiHI]; - data[jistart + 19970] = 0.0 + k[3002]*y_cur[IDX_SiHI]; - data[jistart + 19971] = 0.0 + k[3325]*y_cur[IDX_SiH3I]; - data[jistart + 19972] = 0.0 - k[3472]*y_cur[IDX_SiH2II]; - data[jistart + 19973] = 0.0 - k[3757]*y_cur[IDX_SiH2II]; - data[jistart + 19974] = 0.0 - k[3882]*y_cur[IDX_SiH2II]; - data[jistart + 19975] = 0.0 + k[3793]*y_cur[IDX_SiHI]; - data[jistart + 19976] = 0.0 - k[3883]*y_cur[IDX_SiH2II]; - data[jistart + 19977] = 0.0 + k[5562]*y_cur[IDX_H2I]; - data[jistart + 19978] = 0.0 + k[2756]*y_cur[IDX_H3II] + - k[2824]*y_cur[IDX_H3OII] + k[3002]*y_cur[IDX_HCOII] + - k[3793]*y_cur[IDX_OHII]; - data[jistart + 19979] = 0.0 + k[201]*y_cur[IDX_CII] + - k[428]*y_cur[IDX_HII] + k[6272]; - data[jistart + 19980] = 0.0 - k[1251]*y_cur[IDX_eM] - - k[1252]*y_cur[IDX_eM] - k[1253]*y_cur[IDX_eM] - - k[1926]*y_cur[IDX_CI] - k[3472]*y_cur[IDX_NI] - - k[3757]*y_cur[IDX_OI] - k[3882]*y_cur[IDX_O2I] - - k[3883]*y_cur[IDX_SI] - k[6402]*y_cur[IDX_GRAINM] - - k[6403]*y_cur[IDX_GRAINM] - k[6404]*y_cur[IDX_GRAINM]; - data[jistart + 19981] = 0.0 + k[2363]*y_cur[IDX_HII] + - k[3325]*y_cur[IDX_HeII]; - data[jistart + 19982] = 0.0 + k[1533]*y_cur[IDX_C2H2II] + - k[1682]*y_cur[IDX_C2H4II]; - data[jistart + 19983] = 0.0 - k[1251]*y_cur[IDX_SiH2II] - - k[1252]*y_cur[IDX_SiH2II] - k[1253]*y_cur[IDX_SiH2II]; - data[jistart + 19984] = 0.0 - k[4989]*y_cur[IDX_SiH3I]; - data[jistart + 19985] = 0.0 - k[202]*y_cur[IDX_SiH3I] - - k[1441]*y_cur[IDX_SiH3I] - k[1442]*y_cur[IDX_SiH3I]; - data[jistart + 19986] = 0.0 + k[1684]*y_cur[IDX_SiH4I]; - data[jistart + 19987] = 0.0 + k[5126]*y_cur[IDX_SiH4I]; - data[jistart + 19988] = 0.0 + k[2291]*y_cur[IDX_SiH4II]; - data[jistart + 19989] = 0.0 + k[8602]*y_cur[IDX_GSiH2I]; - data[jistart + 19990] = 0.0 + k[6427]*y_cur[IDX_SiH4II] + - k[6438]*y_cur[IDX_SiH5II]; - data[jistart + 19991] = 0.0 + k[8602]*y_cur[IDX_GHI]; - data[jistart + 19992] = 0.0 + k[7109] + k[7291] + k[7473]; - data[jistart + 19993] = 0.0 - k[429]*y_cur[IDX_SiH3I] - - k[2363]*y_cur[IDX_SiH3I]; - data[jistart + 19994] = 0.0 + k[2572]*y_cur[IDX_SiH4II]; - data[jistart + 19995] = 0.0 - k[2754]*y_cur[IDX_SiH3I]; - data[jistart + 19996] = 0.0 - k[3324]*y_cur[IDX_SiH3I] - - k[3325]*y_cur[IDX_SiH3I]; - data[jistart + 19997] = 0.0 - k[5295]*y_cur[IDX_SiH3I]; - data[jistart + 19998] = 0.0 - k[5447]*y_cur[IDX_SiH3I] + - k[5448]*y_cur[IDX_SiH4I]; - data[jistart + 19999] = 0.0 - k[202]*y_cur[IDX_CII] - - k[429]*y_cur[IDX_HII] - k[1441]*y_cur[IDX_CII] - - k[1442]*y_cur[IDX_CII] - k[2363]*y_cur[IDX_HII] - - k[2754]*y_cur[IDX_H3II] - k[3324]*y_cur[IDX_HeII] - - k[3325]*y_cur[IDX_HeII] - k[4989]*y_cur[IDX_CI] - - k[5295]*y_cur[IDX_NI] - k[5447]*y_cur[IDX_OI] - k[5928] - k[6274] - - k[6275] - k[6276] - k[6927]; - data[jistart + 20000] = 0.0 + k[1684]*y_cur[IDX_C2H4II] + - k[5126]*y_cur[IDX_CNI] + k[5448]*y_cur[IDX_OI] + k[6278]; - data[jistart + 20001] = 0.0 + k[1257]*y_cur[IDX_eM] + - k[2291]*y_cur[IDX_COI] + k[2572]*y_cur[IDX_H2OI] + - k[6427]*y_cur[IDX_GRAINM]; - data[jistart + 20002] = 0.0 + k[1258]*y_cur[IDX_eM] + - k[6438]*y_cur[IDX_GRAINM]; - data[jistart + 20003] = 0.0 + k[1257]*y_cur[IDX_SiH4II] + - k[1258]*y_cur[IDX_SiH5II]; - data[jistart + 20004] = 0.0 - k[1927]*y_cur[IDX_SiH3II]; - data[jistart + 20005] = 0.0 + k[202]*y_cur[IDX_SiH3I]; - data[jistart + 20006] = 0.0 + k[1534]*y_cur[IDX_SiH4I]; - data[jistart + 20007] = 0.0 + k[1683]*y_cur[IDX_SiH4I]; - data[jistart + 20008] = 0.0 + k[2099]*y_cur[IDX_SiH4I]; - data[jistart + 20009] = 0.0 + k[2238]*y_cur[IDX_SiH4I]; - data[jistart + 20010] = 0.0 - k[6412]*y_cur[IDX_SiH3II] - - k[6413]*y_cur[IDX_SiH3II]; - data[jistart + 20011] = 0.0 + k[429]*y_cur[IDX_SiH3I] + - k[2364]*y_cur[IDX_SiH4I]; - data[jistart + 20012] = 0.0 + k[5564]*y_cur[IDX_SiHII] - - k[5565]*y_cur[IDX_SiH3II]; - data[jistart + 20013] = 0.0 + k[2753]*y_cur[IDX_SiH2I]; - data[jistart + 20014] = 0.0 + k[2823]*y_cur[IDX_SiH2I]; - data[jistart + 20015] = 0.0 + k[3000]*y_cur[IDX_SiH2I]; - data[jistart + 20016] = 0.0 - k[3473]*y_cur[IDX_SiH3II] - - k[3474]*y_cur[IDX_SiH3II]; - data[jistart + 20017] = 0.0 - k[3758]*y_cur[IDX_SiH3II] - - k[3759]*y_cur[IDX_SiH3II]; - data[jistart + 20018] = 0.0 - k[3884]*y_cur[IDX_SiH3II]; - data[jistart + 20019] = 0.0 + k[5564]*y_cur[IDX_H2I]; - data[jistart + 20020] = 0.0 + k[2753]*y_cur[IDX_H3II] + - k[2823]*y_cur[IDX_H3OII] + k[3000]*y_cur[IDX_HCOII]; - data[jistart + 20021] = 0.0 + k[202]*y_cur[IDX_CII] + - k[429]*y_cur[IDX_HII] + k[6275]; - data[jistart + 20022] = 0.0 - k[1254]*y_cur[IDX_eM] - - k[1255]*y_cur[IDX_eM] - k[1927]*y_cur[IDX_CI] - - k[3473]*y_cur[IDX_NI] - k[3474]*y_cur[IDX_NI] - - k[3758]*y_cur[IDX_OI] - k[3759]*y_cur[IDX_OI] - - k[3884]*y_cur[IDX_O2I] - k[5565]*y_cur[IDX_H2I] - - k[6412]*y_cur[IDX_GRAINM] - k[6413]*y_cur[IDX_GRAINM]; - data[jistart + 20023] = 0.0 + k[1534]*y_cur[IDX_C2H2II] + - k[1683]*y_cur[IDX_C2H4II] + k[2099]*y_cur[IDX_CH3II] + - k[2238]*y_cur[IDX_CH5II] + k[2364]*y_cur[IDX_HII]; - data[jistart + 20024] = 0.0 - k[1254]*y_cur[IDX_SiH3II] - - k[1255]*y_cur[IDX_SiH3II]; - data[jistart + 20025] = 0.0 - k[1443]*y_cur[IDX_SiH4I] - - k[1444]*y_cur[IDX_SiH4I]; - data[jistart + 20026] = 0.0 - k[1531]*y_cur[IDX_SiH4I] - - k[1532]*y_cur[IDX_SiH4I] - k[1533]*y_cur[IDX_SiH4I] - - k[1534]*y_cur[IDX_SiH4I]; - data[jistart + 20027] = 0.0 - k[1682]*y_cur[IDX_SiH4I] - - k[1683]*y_cur[IDX_SiH4I] - k[1684]*y_cur[IDX_SiH4I]; - data[jistart + 20028] = 0.0 - k[2099]*y_cur[IDX_SiH4I]; - data[jistart + 20029] = 0.0 - k[2238]*y_cur[IDX_SiH4I]; - data[jistart + 20030] = 0.0 - k[5126]*y_cur[IDX_SiH4I]; - data[jistart + 20031] = 0.0 + k[8603]*y_cur[IDX_GSiH3I]; - data[jistart + 20032] = 0.0 + k[6439]*y_cur[IDX_SiH5II]; - data[jistart + 20033] = 0.0 + k[8603]*y_cur[IDX_GHI]; - data[jistart + 20034] = 0.0 + k[7117] + k[7299] + k[7481]; - data[jistart + 20035] = 0.0 - k[430]*y_cur[IDX_SiH4I] - - k[2364]*y_cur[IDX_SiH4I]; - data[jistart + 20036] = 0.0 + k[2573]*y_cur[IDX_SiH5II]; - data[jistart + 20037] = 0.0 - k[2755]*y_cur[IDX_SiH4I]; - data[jistart + 20038] = 0.0 - k[3001]*y_cur[IDX_SiH4I]; - data[jistart + 20039] = 0.0 - k[3326]*y_cur[IDX_SiH4I] - - k[3327]*y_cur[IDX_SiH4I]; - data[jistart + 20040] = 0.0 - k[5448]*y_cur[IDX_SiH4I]; - data[jistart + 20041] = 0.0 - k[430]*y_cur[IDX_HII] - - k[1443]*y_cur[IDX_CII] - k[1444]*y_cur[IDX_CII] - - k[1531]*y_cur[IDX_C2H2II] - k[1532]*y_cur[IDX_C2H2II] - - k[1533]*y_cur[IDX_C2H2II] - k[1534]*y_cur[IDX_C2H2II] - - k[1682]*y_cur[IDX_C2H4II] - k[1683]*y_cur[IDX_C2H4II] - - k[1684]*y_cur[IDX_C2H4II] - k[2099]*y_cur[IDX_CH3II] - - k[2238]*y_cur[IDX_CH5II] - k[2364]*y_cur[IDX_HII] - - k[2755]*y_cur[IDX_H3II] - k[3001]*y_cur[IDX_HCOII] - - k[3326]*y_cur[IDX_HeII] - k[3327]*y_cur[IDX_HeII] - - k[5126]*y_cur[IDX_CNI] - k[5448]*y_cur[IDX_OI] - k[5929] - k[6277] - - k[6278] - k[6279] - k[6935]; - data[jistart + 20042] = 0.0 + k[1259]*y_cur[IDX_eM] + - k[2573]*y_cur[IDX_H2OI] + k[6439]*y_cur[IDX_GRAINM]; - data[jistart + 20043] = 0.0 + k[1259]*y_cur[IDX_SiH5II]; - data[jistart + 20044] = 0.0 - k[1928]*y_cur[IDX_SiH4II]; - data[jistart + 20045] = 0.0 - k[2291]*y_cur[IDX_SiH4II]; - data[jistart + 20046] = 0.0 - k[6426]*y_cur[IDX_SiH4II] - - k[6427]*y_cur[IDX_SiH4II]; - data[jistart + 20047] = 0.0 + k[430]*y_cur[IDX_SiH4I]; - data[jistart + 20048] = 0.0 - k[2474]*y_cur[IDX_SiH4II]; - data[jistart + 20049] = 0.0 - k[2572]*y_cur[IDX_SiH4II]; - data[jistart + 20050] = 0.0 + k[2754]*y_cur[IDX_SiH3I]; - data[jistart + 20051] = 0.0 + k[2754]*y_cur[IDX_H3II]; - data[jistart + 20052] = 0.0 + k[430]*y_cur[IDX_HII]; - data[jistart + 20053] = 0.0 - k[1256]*y_cur[IDX_eM] - - k[1257]*y_cur[IDX_eM] - k[1928]*y_cur[IDX_CI] - - k[2291]*y_cur[IDX_COI] - k[2474]*y_cur[IDX_H2I] - - k[2572]*y_cur[IDX_H2OI] - k[6426]*y_cur[IDX_GRAINM] - - k[6427]*y_cur[IDX_GRAINM]; - data[jistart + 20054] = 0.0 - k[1256]*y_cur[IDX_SiH4II] - - k[1257]*y_cur[IDX_SiH4II]; - data[jistart + 20055] = 0.0 - k[1929]*y_cur[IDX_SiH5II]; - data[jistart + 20056] = 0.0 - k[6438]*y_cur[IDX_SiH5II] - - k[6439]*y_cur[IDX_SiH5II]; - data[jistart + 20057] = 0.0 + k[2474]*y_cur[IDX_SiH4II] + - k[5565]*y_cur[IDX_SiH3II]; - data[jistart + 20058] = 0.0 - k[2573]*y_cur[IDX_SiH5II]; - data[jistart + 20059] = 0.0 + k[2755]*y_cur[IDX_SiH4I]; - data[jistart + 20060] = 0.0 + k[3001]*y_cur[IDX_SiH4I]; - data[jistart + 20061] = 0.0 - k[3760]*y_cur[IDX_SiH5II]; - data[jistart + 20062] = 0.0 + k[5565]*y_cur[IDX_H2I]; - data[jistart + 20063] = 0.0 + k[2755]*y_cur[IDX_H3II] + - k[3001]*y_cur[IDX_HCOII]; - data[jistart + 20064] = 0.0 + k[2474]*y_cur[IDX_H2I]; - data[jistart + 20065] = 0.0 - k[1258]*y_cur[IDX_eM] - - k[1259]*y_cur[IDX_eM] - k[1929]*y_cur[IDX_CI] - - k[2573]*y_cur[IDX_H2OI] - k[3760]*y_cur[IDX_OI] - - k[6438]*y_cur[IDX_GRAINM] - k[6439]*y_cur[IDX_GRAINM]; - data[jistart + 20066] = 0.0 - k[1258]*y_cur[IDX_SiH5II] - - k[1259]*y_cur[IDX_SiH5II]; - data[jistart + 20067] = 0.0 - k[203]*y_cur[IDX_SiNI] - - k[1446]*y_cur[IDX_SiNI]; - data[jistart + 20068] = 0.0 + k[2287]*y_cur[IDX_HNSiII]; - data[jistart + 20069] = 0.0 + k[6513]*y_cur[IDX_HNSiII] + - k[6553]*y_cur[IDX_SiNH2II] + k[6668]*y_cur[IDX_SiNCHII]; - data[jistart + 20070] = 0.0 + k[7147] + k[7329] + k[7511]; - data[jistart + 20071] = 0.0 - k[432]*y_cur[IDX_SiNI]; - data[jistart + 20072] = 0.0 + k[2551]*y_cur[IDX_HNSiII]; - data[jistart + 20073] = 0.0 - k[2757]*y_cur[IDX_SiNI]; - data[jistart + 20074] = 0.0 + k[5870] + k[6201]; - data[jistart + 20075] = 0.0 + k[1124]*y_cur[IDX_eM] + - k[2287]*y_cur[IDX_COI] + k[2551]*y_cur[IDX_H2OI] + - k[6513]*y_cur[IDX_GRAINM]; - data[jistart + 20076] = 0.0 - k[3329]*y_cur[IDX_SiNI]; - data[jistart + 20077] = 0.0 + k[5293]*y_cur[IDX_SiCI] + - k[5296]*y_cur[IDX_SiHI]; - data[jistart + 20078] = 0.0 + k[3763]*y_cur[IDX_SiNCHII] - - k[5450]*y_cur[IDX_SiNI] - k[5451]*y_cur[IDX_SiNI] + - k[5452]*y_cur[IDX_SiNCI]; - data[jistart + 20079] = 0.0 + k[5293]*y_cur[IDX_NI]; - data[jistart + 20080] = 0.0 + k[5296]*y_cur[IDX_NI]; - data[jistart + 20081] = 0.0 - k[203]*y_cur[IDX_CII] - - k[432]*y_cur[IDX_HII] - k[1446]*y_cur[IDX_CII] - - k[2757]*y_cur[IDX_H3II] - k[3329]*y_cur[IDX_HeII] - - k[5450]*y_cur[IDX_OI] - k[5451]*y_cur[IDX_OI] - k[5931] - k[6281] - - k[6965]; - data[jistart + 20082] = 0.0 + k[5452]*y_cur[IDX_OI] + k[6282]; - data[jistart + 20083] = 0.0 + k[1262]*y_cur[IDX_eM] + - k[3763]*y_cur[IDX_OI] + k[6668]*y_cur[IDX_GRAINM]; - data[jistart + 20084] = 0.0 + k[1265]*y_cur[IDX_eM] + - k[6553]*y_cur[IDX_GRAINM]; - data[jistart + 20085] = 0.0 + k[1124]*y_cur[IDX_HNSiII] + - k[1262]*y_cur[IDX_SiNCHII] + k[1265]*y_cur[IDX_SiNH2II]; - data[jistart + 20086] = 0.0 + k[203]*y_cur[IDX_SiNI]; - data[jistart + 20087] = 0.0 - k[6501]*y_cur[IDX_SiNII]; - data[jistart + 20088] = 0.0 + k[432]*y_cur[IDX_SiNI] + - k[2350]*y_cur[IDX_HNSiI]; - data[jistart + 20089] = 0.0 + k[2350]*y_cur[IDX_HII] + - k[3267]*y_cur[IDX_HeII]; - data[jistart + 20090] = 0.0 + k[3267]*y_cur[IDX_HNSiI]; - data[jistart + 20091] = 0.0 + k[3471]*y_cur[IDX_SiHII]; - data[jistart + 20092] = 0.0 + k[3625]*y_cur[IDX_SiII]; - data[jistart + 20093] = 0.0 - k[3761]*y_cur[IDX_SiNII] + - k[3762]*y_cur[IDX_SiNCII]; - data[jistart + 20094] = 0.0 + k[3625]*y_cur[IDX_NHI]; - data[jistart + 20095] = 0.0 + k[3471]*y_cur[IDX_NI]; - data[jistart + 20096] = 0.0 + k[203]*y_cur[IDX_CII] + - k[432]*y_cur[IDX_HII]; - data[jistart + 20097] = 0.0 - k[1260]*y_cur[IDX_eM] - - k[3761]*y_cur[IDX_OI] - k[6501]*y_cur[IDX_GRAINM]; - data[jistart + 20098] = 0.0 + k[3762]*y_cur[IDX_OI]; - data[jistart + 20099] = 0.0 - k[1260]*y_cur[IDX_SiNII]; - data[jistart + 20100] = 0.0 + k[6669]*y_cur[IDX_SiNCHII]; - data[jistart + 20101] = 0.0 + k[7194] + k[7376] + k[7560]; - data[jistart + 20102] = 0.0 - k[433]*y_cur[IDX_SiNCI]; - data[jistart + 20103] = 0.0 - k[2758]*y_cur[IDX_SiNCI]; - data[jistart + 20104] = 0.0 - k[2825]*y_cur[IDX_SiNCI]; - data[jistart + 20105] = 0.0 - k[3003]*y_cur[IDX_SiNCI]; - data[jistart + 20106] = 0.0 - k[3330]*y_cur[IDX_SiNCI]; - data[jistart + 20107] = 0.0 - k[5452]*y_cur[IDX_SiNCI]; - data[jistart + 20108] = 0.0 - k[433]*y_cur[IDX_HII] - - k[2758]*y_cur[IDX_H3II] - k[2825]*y_cur[IDX_H3OII] - - k[3003]*y_cur[IDX_HCOII] - k[3330]*y_cur[IDX_HeII] - - k[5452]*y_cur[IDX_OI] - k[5932] - k[6282] - k[6283] - k[7012]; - data[jistart + 20109] = 0.0 + k[1263]*y_cur[IDX_eM] + - k[6669]*y_cur[IDX_GRAINM]; - data[jistart + 20110] = 0.0 + k[1263]*y_cur[IDX_SiNCHII]; - data[jistart + 20111] = 0.0 + k[1930]*y_cur[IDX_SiNH2II]; - data[jistart + 20112] = 0.0 + k[1414]*y_cur[IDX_HNSiI]; - data[jistart + 20113] = 0.0 - k[6654]*y_cur[IDX_SiNCII]; - data[jistart + 20114] = 0.0 + k[433]*y_cur[IDX_SiNCI]; - data[jistart + 20115] = 0.0 + k[2502]*y_cur[IDX_SiI]; - data[jistart + 20116] = 0.0 + k[2885]*y_cur[IDX_SiII]; - data[jistart + 20117] = 0.0 + k[2896]*y_cur[IDX_SiI]; - data[jistart + 20118] = 0.0 + k[3046]*y_cur[IDX_SiII]; - data[jistart + 20119] = 0.0 + k[1414]*y_cur[IDX_CII]; - data[jistart + 20120] = 0.0 + k[3870]*y_cur[IDX_SiII]; - data[jistart + 20121] = 0.0 - k[3762]*y_cur[IDX_SiNCII]; - data[jistart + 20122] = 0.0 + k[2502]*y_cur[IDX_H2NCII] + - k[2896]*y_cur[IDX_HCNHII]; - data[jistart + 20123] = 0.0 + k[2885]*y_cur[IDX_HCNI] + - k[3046]*y_cur[IDX_HNCI] + k[3870]*y_cur[IDX_NCCNI]; - data[jistart + 20124] = 0.0 + k[433]*y_cur[IDX_HII]; - data[jistart + 20125] = 0.0 - k[1261]*y_cur[IDX_eM] - - k[3762]*y_cur[IDX_OI] - k[6654]*y_cur[IDX_GRAINM]; - data[jistart + 20126] = 0.0 + k[1930]*y_cur[IDX_CI]; - data[jistart + 20127] = 0.0 - k[1261]*y_cur[IDX_SiNCII]; - data[jistart + 20128] = 0.0 + k[1931]*y_cur[IDX_SiNH2II]; - data[jistart + 20129] = 0.0 - k[6668]*y_cur[IDX_SiNCHII] - - k[6669]*y_cur[IDX_SiNCHII]; - data[jistart + 20130] = 0.0 + k[2758]*y_cur[IDX_SiNCI]; - data[jistart + 20131] = 0.0 + k[2825]*y_cur[IDX_SiNCI]; - data[jistart + 20132] = 0.0 + k[5580]*y_cur[IDX_SiII]; - data[jistart + 20133] = 0.0 + k[3003]*y_cur[IDX_SiNCI]; - data[jistart + 20134] = 0.0 - k[3763]*y_cur[IDX_SiNCHII]; - data[jistart + 20135] = 0.0 + k[5580]*y_cur[IDX_HCNI]; - data[jistart + 20136] = 0.0 + k[2758]*y_cur[IDX_H3II] + - k[2825]*y_cur[IDX_H3OII] + k[3003]*y_cur[IDX_HCOII]; - data[jistart + 20137] = 0.0 - k[1262]*y_cur[IDX_eM] - - k[1263]*y_cur[IDX_eM] - k[3763]*y_cur[IDX_OI] - - k[6668]*y_cur[IDX_GRAINM] - k[6669]*y_cur[IDX_GRAINM]; - data[jistart + 20138] = 0.0 + k[1931]*y_cur[IDX_CI]; - data[jistart + 20139] = 0.0 - k[1262]*y_cur[IDX_SiNCHII] - - k[1263]*y_cur[IDX_SiNCHII]; - data[jistart + 20140] = 0.0 - k[1930]*y_cur[IDX_SiNH2II] - - k[1931]*y_cur[IDX_SiNH2II]; - data[jistart + 20141] = 0.0 - k[6552]*y_cur[IDX_SiNH2II] - - k[6553]*y_cur[IDX_SiNH2II]; - data[jistart + 20142] = 0.0 + k[2455]*y_cur[IDX_HNSiII]; - data[jistart + 20143] = 0.0 + k[2710]*y_cur[IDX_HNSiI]; - data[jistart + 20144] = 0.0 + k[2811]*y_cur[IDX_HNSiI]; - data[jistart + 20145] = 0.0 + k[2974]*y_cur[IDX_HNSiI]; - data[jistart + 20146] = 0.0 + k[2710]*y_cur[IDX_H3II] + - k[2811]*y_cur[IDX_H3OII] + k[2974]*y_cur[IDX_HCOII]; - data[jistart + 20147] = 0.0 + k[2455]*y_cur[IDX_H2I]; - data[jistart + 20148] = 0.0 + k[3474]*y_cur[IDX_SiH3II]; - data[jistart + 20149] = 0.0 + k[3602]*y_cur[IDX_SiII]; - data[jistart + 20150] = 0.0 + k[3602]*y_cur[IDX_NH3I]; - data[jistart + 20151] = 0.0 + k[3474]*y_cur[IDX_NI]; - data[jistart + 20152] = 0.0 - k[1264]*y_cur[IDX_eM] - - k[1265]*y_cur[IDX_eM] - k[1930]*y_cur[IDX_CI] - - k[1931]*y_cur[IDX_CI] - k[6552]*y_cur[IDX_GRAINM] - - k[6553]*y_cur[IDX_GRAINM]; - data[jistart + 20153] = 0.0 - k[1264]*y_cur[IDX_SiNH2II] - - k[1265]*y_cur[IDX_SiNH2II]; - data[jistart + 20154] = 0.0 - k[1447]*y_cur[IDX_SiOI]; - data[jistart + 20155] = 0.0 + k[3918]*y_cur[IDX_SiOII] + - k[3919]*y_cur[IDX_SiOHII]; - data[jistart + 20156] = 0.0 + k[3953]*y_cur[IDX_SiOII] + + k[4855]*y_cur[IDX_N2HII] + k[4857]*y_cur[IDX_NH4II] + + k[4865]*y_cur[IDX_SiOHII]; + data[jistart + 20675] = 0.0 - k[2849]*y_cur[IDX_HI] + k[4726]*y_cur[IDX_HM]; + data[jistart + 20676] = 0.0 - k[88]*y_cur[IDX_HI] + k[111]*y_cur[IDX_NI] + + k[129]*y_cur[IDX_OI] + k[4036]*y_cur[IDX_HII] + + k[4039]*y_cur[IDX_H3II] + k[4040]*y_cur[IDX_H3OII] + + k[4041]*y_cur[IDX_HC2SII] + k[4042]*y_cur[IDX_HCNHII] + + k[4043]*y_cur[IDX_HCNHII] + k[4044]*y_cur[IDX_HCOII] + + k[4049]*y_cur[IDX_N2HII] + k[4051]*y_cur[IDX_NH4II] + + k[4059]*y_cur[IDX_SiOHII]; + data[jistart + 20677] = 0.0 - k[93]*y_cur[IDX_HI] + k[4211]*y_cur[IDX_HII] + + k[4214]*y_cur[IDX_H3II] + k[4215]*y_cur[IDX_H3OII] + + k[4216]*y_cur[IDX_HC2SII] + k[4217]*y_cur[IDX_HCNHII] + + k[4218]*y_cur[IDX_HCNHII] + k[4219]*y_cur[IDX_HCOII] + + k[4224]*y_cur[IDX_N2HII] + k[4226]*y_cur[IDX_NH4II] + + k[4234]*y_cur[IDX_SiOHII]; + data[jistart + 20678] = 0.0 - k[488]*y_cur[IDX_HI] + k[2189]*y_cur[IDX_CH4I] + + k[2434]*y_cur[IDX_H2I] + k[2435]*y_cur[IDX_H2I]; + data[jistart + 20679] = 0.0 + k[365]*y_cur[IDX_HII] + k[1509]*y_cur[IDX_C2H2II] + + k[1781]*y_cur[IDX_C3H2II] + k[1812]*y_cur[IDX_C3H4II] + + k[1813]*y_cur[IDX_C3H4II] + k[2105]*y_cur[IDX_C4HII] + + k[2106]*y_cur[IDX_C4H2II] + k[3185]*y_cur[IDX_HeII] + + k[3187]*y_cur[IDX_HeII] + k[4896]*y_cur[IDX_C2HI] + + k[4897]*y_cur[IDX_C2HI] + k[4952]*y_cur[IDX_CI] + + k[5051]*y_cur[IDX_C4HI] + k[5068]*y_cur[IDX_CHI] + + k[5110]*y_cur[IDX_CNI] + k[5802] + k[6106]; + data[jistart + 20680] = 0.0 + k[972]*y_cur[IDX_eM] + k[974]*y_cur[IDX_eM] + + k[974]*y_cur[IDX_eM] + k[975]*y_cur[IDX_eM] + k[2233]*y_cur[IDX_MgI] + + k[2237]*y_cur[IDX_SiI] - k[2840]*y_cur[IDX_HI] + + k[6332]*y_cur[IDX_GRAINM] + k[6334]*y_cur[IDX_GRAINM] + + k[6334]*y_cur[IDX_GRAINM] + k[6335]*y_cur[IDX_GRAINM]; + data[jistart + 20681] = 0.0 + k[1061]*y_cur[IDX_eM] + k[1902]*y_cur[IDX_CI] + + k[3901]*y_cur[IDX_CM] + k[3936]*y_cur[IDX_C10M] + + k[3971]*y_cur[IDX_C10HM] + k[4006]*y_cur[IDX_C2M] + + k[4041]*y_cur[IDX_C2HM] + k[4076]*y_cur[IDX_C3M] + + k[4111]*y_cur[IDX_C3HM] + k[4146]*y_cur[IDX_C3NM] + + k[4181]*y_cur[IDX_C4M] + k[4216]*y_cur[IDX_C4HM] + + k[4251]*y_cur[IDX_C5M] + k[4286]*y_cur[IDX_C5HM] + + k[4321]*y_cur[IDX_C5NM] + k[4356]*y_cur[IDX_C6M] + + k[4391]*y_cur[IDX_C6HM] + k[4426]*y_cur[IDX_C7M] + + k[4461]*y_cur[IDX_C7HM] + k[4496]*y_cur[IDX_C8M] + + k[4531]*y_cur[IDX_C8HM] + k[4566]*y_cur[IDX_C9M] + + k[4601]*y_cur[IDX_C9HM] + k[4636]*y_cur[IDX_CHM] + + k[4671]*y_cur[IDX_CNM] + k[4707]*y_cur[IDX_HM] + + k[4707]*y_cur[IDX_HM] + k[4742]*y_cur[IDX_OM] + + k[4777]*y_cur[IDX_O2M] + k[4812]*y_cur[IDX_OHM] + + k[4847]*y_cur[IDX_SM] + k[6678]*y_cur[IDX_GRAINM]; + data[jistart + 20682] = 0.0 - k[108]*y_cur[IDX_HI] + k[4807]*y_cur[IDX_HII] + + k[4810]*y_cur[IDX_H3II] + k[4811]*y_cur[IDX_H3OII] + + k[4812]*y_cur[IDX_HC2SII] + k[4813]*y_cur[IDX_HCNHII] + + k[4814]*y_cur[IDX_HCNHII] + k[4815]*y_cur[IDX_HCOII] + + k[4820]*y_cur[IDX_N2HII] + k[4822]*y_cur[IDX_NH4II] + + k[4830]*y_cur[IDX_SiOHII]; + data[jistart + 20683] = 0.0 - k[86]*y_cur[IDX_HI] + k[3966]*y_cur[IDX_HII] + + k[3969]*y_cur[IDX_H3II] + k[3970]*y_cur[IDX_H3OII] + + k[3971]*y_cur[IDX_HC2SII] + k[3972]*y_cur[IDX_HCNHII] + + k[3973]*y_cur[IDX_HCNHII] + k[3974]*y_cur[IDX_HCOII] + + k[3979]*y_cur[IDX_N2HII] + k[3981]*y_cur[IDX_NH4II] + + k[3989]*y_cur[IDX_SiOHII]; + data[jistart + 20684] = 0.0 - k[90]*y_cur[IDX_HI] + k[4106]*y_cur[IDX_HII] + + k[4109]*y_cur[IDX_H3II] + k[4110]*y_cur[IDX_H3OII] + + k[4111]*y_cur[IDX_HC2SII] + k[4112]*y_cur[IDX_HCNHII] + + k[4113]*y_cur[IDX_HCNHII] + k[4114]*y_cur[IDX_HCOII] + + k[4119]*y_cur[IDX_N2HII] + k[4121]*y_cur[IDX_NH4II] + + k[4129]*y_cur[IDX_SiOHII]; + data[jistart + 20685] = 0.0 + k[342]*y_cur[IDX_HII]; + data[jistart + 20686] = 0.0 - k[98]*y_cur[IDX_HI] + k[4386]*y_cur[IDX_HII] + + k[4389]*y_cur[IDX_H3II] + k[4390]*y_cur[IDX_H3OII] + + k[4391]*y_cur[IDX_HC2SII] + k[4392]*y_cur[IDX_HCNHII] + + k[4393]*y_cur[IDX_HCNHII] + k[4394]*y_cur[IDX_HCOII] + + k[4399]*y_cur[IDX_N2HII] + k[4401]*y_cur[IDX_NH4II] + + k[4409]*y_cur[IDX_SiOHII]; + data[jistart + 20687] = 0.0 - k[102]*y_cur[IDX_HI] + k[4526]*y_cur[IDX_HII] + + k[4529]*y_cur[IDX_H3II] + k[4530]*y_cur[IDX_H3OII] + + k[4531]*y_cur[IDX_HC2SII] + k[4532]*y_cur[IDX_HCNHII] + + k[4533]*y_cur[IDX_HCNHII] + k[4534]*y_cur[IDX_HCOII] + + k[4539]*y_cur[IDX_N2HII] + k[4541]*y_cur[IDX_NH4II] + + k[4549]*y_cur[IDX_SiOHII]; + data[jistart + 20688] = 0.0 - k[100]*y_cur[IDX_HI] + k[4456]*y_cur[IDX_HII] + + k[4459]*y_cur[IDX_H3II] + k[4460]*y_cur[IDX_H3OII] + + k[4461]*y_cur[IDX_HC2SII] + k[4462]*y_cur[IDX_HCNHII] + + k[4463]*y_cur[IDX_HCNHII] + k[4464]*y_cur[IDX_HCOII] + + k[4469]*y_cur[IDX_N2HII] + k[4471]*y_cur[IDX_NH4II] + + k[4479]*y_cur[IDX_SiOHII]; + data[jistart + 20689] = 0.0 - k[104]*y_cur[IDX_HI] + k[4596]*y_cur[IDX_HII] + + k[4599]*y_cur[IDX_H3II] + k[4600]*y_cur[IDX_H3OII] + + k[4601]*y_cur[IDX_HC2SII] + k[4602]*y_cur[IDX_HCNHII] + + k[4603]*y_cur[IDX_HCNHII] + k[4604]*y_cur[IDX_HCOII] + + k[4609]*y_cur[IDX_N2HII] + k[4611]*y_cur[IDX_NH4II] + + k[4619]*y_cur[IDX_SiOHII]; + data[jistart + 20690] = 0.0 - k[85]*y_cur[IDX_HI] + k[3931]*y_cur[IDX_HII] + + k[3934]*y_cur[IDX_H3II] + k[3935]*y_cur[IDX_H3OII] + + k[3936]*y_cur[IDX_HC2SII] + k[3937]*y_cur[IDX_HCNHII] + + k[3938]*y_cur[IDX_HCNHII] + k[3939]*y_cur[IDX_HCOII] + + k[3944]*y_cur[IDX_N2HII] + k[3946]*y_cur[IDX_NH4II] + k[3954]*y_cur[IDX_SiOHII]; - data[jistart + 20157] = 0.0 + k[3988]*y_cur[IDX_SiOII] + - k[3989]*y_cur[IDX_SiOHII]; - data[jistart + 20158] = 0.0 + k[4023]*y_cur[IDX_SiOII] + + data[jistart + 20691] = 0.0 - k[95]*y_cur[IDX_HI] + k[4281]*y_cur[IDX_HII] + + k[4284]*y_cur[IDX_H3II] + k[4285]*y_cur[IDX_H3OII] + + k[4286]*y_cur[IDX_HC2SII] + k[4287]*y_cur[IDX_HCNHII] + + k[4288]*y_cur[IDX_HCNHII] + k[4289]*y_cur[IDX_HCOII] + + k[4294]*y_cur[IDX_N2HII] + k[4296]*y_cur[IDX_NH4II] + + k[4304]*y_cur[IDX_SiOHII]; + data[jistart + 20692] = 0.0 - k[96]*y_cur[IDX_HI] + k[4316]*y_cur[IDX_HII] + + k[4319]*y_cur[IDX_H3II] + k[4320]*y_cur[IDX_H3OII] + + k[4321]*y_cur[IDX_HC2SII] + k[4322]*y_cur[IDX_HCNHII] + + k[4323]*y_cur[IDX_HCNHII] + k[4324]*y_cur[IDX_HCOII] + + k[4329]*y_cur[IDX_N2HII] + k[4331]*y_cur[IDX_NH4II] + + k[4339]*y_cur[IDX_SiOHII]; + data[jistart + 20693] = 0.0 + k[397]*y_cur[IDX_HII] + k[1415]*y_cur[IDX_CII] + + k[3273]*y_cur[IDX_HeII] + k[4965]*y_cur[IDX_CI] + + k[5140]*y_cur[IDX_H2I] - k[5178]*y_cur[IDX_HI] + + k[5271]*y_cur[IDX_NI] + k[5416]*y_cur[IDX_OI] + + k[5488]*y_cur[IDX_SI] + k[5875] + k[6209]; + data[jistart + 20694] = 0.0 - k[84]*y_cur[IDX_HI] + k[3896]*y_cur[IDX_HII] + + k[3899]*y_cur[IDX_H3II] + k[3900]*y_cur[IDX_H3OII] + + k[3901]*y_cur[IDX_HC2SII] + k[3902]*y_cur[IDX_HCNHII] + + k[3903]*y_cur[IDX_HCNHII] + k[3904]*y_cur[IDX_HCOII] + + k[3909]*y_cur[IDX_N2HII] + k[3911]*y_cur[IDX_NH4II] + + k[3919]*y_cur[IDX_SiOHII]; + data[jistart + 20695] = 0.0 + k[374]*y_cur[IDX_HII] + k[4899]*y_cur[IDX_C2HI] + + k[5463]*y_cur[IDX_OHI]; + data[jistart + 20696] = 0.0 - k[107]*y_cur[IDX_HI] + k[2467]*y_cur[IDX_H2I] + + k[4737]*y_cur[IDX_HII] + k[4740]*y_cur[IDX_H3II] + + k[4741]*y_cur[IDX_H3OII] + k[4742]*y_cur[IDX_HC2SII] + + k[4743]*y_cur[IDX_HCNHII] + k[4744]*y_cur[IDX_HCNHII] + + k[4745]*y_cur[IDX_HCOII] + k[4750]*y_cur[IDX_N2HII] + + k[4752]*y_cur[IDX_NH4II] + k[4760]*y_cur[IDX_SiOHII]; + data[jistart + 20697] = 0.0 - k[103]*y_cur[IDX_HI] + k[4561]*y_cur[IDX_HII] + + k[4564]*y_cur[IDX_H3II] + k[4565]*y_cur[IDX_H3OII] + + k[4566]*y_cur[IDX_HC2SII] + k[4567]*y_cur[IDX_HCNHII] + + k[4568]*y_cur[IDX_HCNHII] + k[4569]*y_cur[IDX_HCOII] + + k[4574]*y_cur[IDX_N2HII] + k[4576]*y_cur[IDX_NH4II] + + k[4584]*y_cur[IDX_SiOHII]; + data[jistart + 20698] = 0.0 + k[370]*y_cur[IDX_HII] + k[3336]*y_cur[IDX_NII] + + k[3338]*y_cur[IDX_NII] + k[3339]*y_cur[IDX_NII] + + k[3665]*y_cur[IDX_O2II] + k[5073]*y_cur[IDX_CHI] + k[5817] + k[5818] + + k[6121] + k[6122] + k[6123]; + data[jistart + 20699] = 0.0 - k[74]*y_cur[IDX_HI] - k[75]*y_cur[IDX_HI] + + k[4691]*y_cur[IDX_CII] + k[4692]*y_cur[IDX_C2H2II] + + k[4693]*y_cur[IDX_C2H3II] + k[4694]*y_cur[IDX_C4H2II] + + k[4695]*y_cur[IDX_C4H3II] + k[4696]*y_cur[IDX_C4SII] + + k[4697]*y_cur[IDX_CH2CCHII] + k[4698]*y_cur[IDX_CH3II] + + k[4699]*y_cur[IDX_CNCII] + k[4700]*y_cur[IDX_FeII] + + k[4701]*y_cur[IDX_HII] + k[4701]*y_cur[IDX_HII] + + k[4702]*y_cur[IDX_H2II] + k[4703]*y_cur[IDX_H2COII] + + k[4704]*y_cur[IDX_H2SII] + k[4705]*y_cur[IDX_H3II] + + k[4705]*y_cur[IDX_H3II] + k[4706]*y_cur[IDX_H3OII] + + k[4706]*y_cur[IDX_H3OII] + k[4707]*y_cur[IDX_HC2SII] + + k[4707]*y_cur[IDX_HC2SII] + k[4708]*y_cur[IDX_HCNHII] + + k[4708]*y_cur[IDX_HCNHII] + k[4709]*y_cur[IDX_HCNHII] + + k[4709]*y_cur[IDX_HCNHII] + k[4710]*y_cur[IDX_HCOII] + + k[4710]*y_cur[IDX_HCOII] + k[4711]*y_cur[IDX_HCOII] + + k[4712]*y_cur[IDX_HeII] + k[4713]*y_cur[IDX_MgII] + + k[4714]*y_cur[IDX_NII] + k[4715]*y_cur[IDX_N2HII] + + k[4715]*y_cur[IDX_N2HII] + k[4716]*y_cur[IDX_NH3II] + + k[4717]*y_cur[IDX_NH4II] + k[4717]*y_cur[IDX_NH4II] + + k[4718]*y_cur[IDX_NOII] + k[4719]*y_cur[IDX_NaII] + + k[4720]*y_cur[IDX_OII] + k[4721]*y_cur[IDX_SII] + + k[4722]*y_cur[IDX_SOII] + k[4723]*y_cur[IDX_SiII] + + k[4724]*y_cur[IDX_SiOII] + k[4725]*y_cur[IDX_SiOHII] + + k[4725]*y_cur[IDX_SiOHII] + k[4726]*y_cur[IDX_SiSII] + k[5833] + + k[6146]; + data[jistart + 20700] = 0.0 + k[383]*y_cur[IDX_HII] + k[1401]*y_cur[IDX_CII] + + k[1473]*y_cur[IDX_C2HII] + k[3236]*y_cur[IDX_HeII]; + data[jistart + 20701] = 0.0 + k[435]*y_cur[IDX_HII]; + data[jistart + 20702] = 0.0 + k[790]*y_cur[IDX_eM] + k[1544]*y_cur[IDX_C2H2I] + + k[1756]*y_cur[IDX_OCSI] + k[2407]*y_cur[IDX_H2I] + + k[3394]*y_cur[IDX_NI] + k[3872]*y_cur[IDX_SiI] + + k[6460]*y_cur[IDX_GRAINM]; + data[jistart + 20703] = 0.0 + k[798]*y_cur[IDX_eM] + k[1733]*y_cur[IDX_C2HI] + + k[1787]*y_cur[IDX_C3H2I] + k[1797]*y_cur[IDX_C4HI] + + k[1799]*y_cur[IDX_C5H2I] + k[1801]*y_cur[IDX_C5HI] + + k[1804]*y_cur[IDX_C6HI] + k[1806]*y_cur[IDX_CH2CCHI] + + k[1821]*y_cur[IDX_C3HI] + k[1858]*y_cur[IDX_CI] + + k[2477]*y_cur[IDX_H2CCCI] + k[3876]*y_cur[IDX_SiI] + + k[6473]*y_cur[IDX_GRAINM]; + data[jistart + 20704] = 0.0 - k[101]*y_cur[IDX_HI] + k[4491]*y_cur[IDX_HII] + + k[4494]*y_cur[IDX_H3II] + k[4495]*y_cur[IDX_H3OII] + + k[4496]*y_cur[IDX_HC2SII] + k[4497]*y_cur[IDX_HCNHII] + + k[4498]*y_cur[IDX_HCNHII] + k[4499]*y_cur[IDX_HCOII] + + k[4504]*y_cur[IDX_N2HII] + k[4506]*y_cur[IDX_NH4II] + + k[4514]*y_cur[IDX_SiOHII]; + data[jistart + 20705] = 0.0 - k[87]*y_cur[IDX_HI] + k[4001]*y_cur[IDX_HII] + + k[4004]*y_cur[IDX_H3II] + k[4005]*y_cur[IDX_H3OII] + + k[4006]*y_cur[IDX_HC2SII] + k[4007]*y_cur[IDX_HCNHII] + + k[4008]*y_cur[IDX_HCNHII] + k[4009]*y_cur[IDX_HCOII] + + k[4014]*y_cur[IDX_N2HII] + k[4016]*y_cur[IDX_NH4II] + k[4024]*y_cur[IDX_SiOHII]; - data[jistart + 20159] = 0.0 + k[4058]*y_cur[IDX_SiOII] + - k[4059]*y_cur[IDX_SiOHII]; - data[jistart + 20160] = 0.0 + k[4093]*y_cur[IDX_SiOII] + + data[jistart + 20706] = 0.0 + k[332]*y_cur[IDX_HII]; + data[jistart + 20707] = 0.0 - k[89]*y_cur[IDX_HI] + k[4071]*y_cur[IDX_HII] + + k[4074]*y_cur[IDX_H3II] + k[4075]*y_cur[IDX_H3OII] + + k[4076]*y_cur[IDX_HC2SII] + k[4077]*y_cur[IDX_HCNHII] + + k[4078]*y_cur[IDX_HCNHII] + k[4079]*y_cur[IDX_HCOII] + + k[4084]*y_cur[IDX_N2HII] + k[4086]*y_cur[IDX_NH4II] + k[4094]*y_cur[IDX_SiOHII]; - data[jistart + 20161] = 0.0 + k[4128]*y_cur[IDX_SiOII] + - k[4129]*y_cur[IDX_SiOHII]; - data[jistart + 20162] = 0.0 + k[4163]*y_cur[IDX_SiOII] + - k[4164]*y_cur[IDX_SiOHII]; - data[jistart + 20163] = 0.0 + k[4198]*y_cur[IDX_SiOII] + + data[jistart + 20708] = 0.0 - k[92]*y_cur[IDX_HI] + k[4176]*y_cur[IDX_HII] + + k[4179]*y_cur[IDX_H3II] + k[4180]*y_cur[IDX_H3OII] + + k[4181]*y_cur[IDX_HC2SII] + k[4182]*y_cur[IDX_HCNHII] + + k[4183]*y_cur[IDX_HCNHII] + k[4184]*y_cur[IDX_HCOII] + + k[4189]*y_cur[IDX_N2HII] + k[4191]*y_cur[IDX_NH4II] + k[4199]*y_cur[IDX_SiOHII]; - data[jistart + 20164] = 0.0 + k[4233]*y_cur[IDX_SiOII] + - k[4234]*y_cur[IDX_SiOHII]; - data[jistart + 20165] = 0.0 + k[4268]*y_cur[IDX_SiOII] + - k[4269]*y_cur[IDX_SiOHII]; - data[jistart + 20166] = 0.0 + k[4303]*y_cur[IDX_SiOII] + - k[4304]*y_cur[IDX_SiOHII]; - data[jistart + 20167] = 0.0 + k[4338]*y_cur[IDX_SiOII] + - k[4339]*y_cur[IDX_SiOHII]; - data[jistart + 20168] = 0.0 + k[4373]*y_cur[IDX_SiOII] + + data[jistart + 20709] = 0.0 - k[97]*y_cur[IDX_HI] + k[4351]*y_cur[IDX_HII] + + k[4354]*y_cur[IDX_H3II] + k[4355]*y_cur[IDX_H3OII] + + k[4356]*y_cur[IDX_HC2SII] + k[4357]*y_cur[IDX_HCNHII] + + k[4358]*y_cur[IDX_HCNHII] + k[4359]*y_cur[IDX_HCOII] + + k[4364]*y_cur[IDX_N2HII] + k[4366]*y_cur[IDX_NH4II] + k[4374]*y_cur[IDX_SiOHII]; - data[jistart + 20169] = 0.0 + k[4408]*y_cur[IDX_SiOII] + - k[4409]*y_cur[IDX_SiOHII]; - data[jistart + 20170] = 0.0 + k[4443]*y_cur[IDX_SiOII] + + data[jistart + 20710] = 0.0 + k[1036]*y_cur[IDX_eM] + k[1037]*y_cur[IDX_eM] + + k[1038]*y_cur[IDX_eM] + k[1038]*y_cur[IDX_eM] + + k[3628]*y_cur[IDX_NaI] + k[6416]*y_cur[IDX_GRAINM] + + k[6417]*y_cur[IDX_GRAINM] + k[6418]*y_cur[IDX_GRAINM] + + k[6418]*y_cur[IDX_GRAINM]; + data[jistart + 20711] = 0.0 - k[94]*y_cur[IDX_HI] + k[4246]*y_cur[IDX_HII] + + k[4249]*y_cur[IDX_H3II] + k[4250]*y_cur[IDX_H3OII] + + k[4251]*y_cur[IDX_HC2SII] + k[4252]*y_cur[IDX_HCNHII] + + k[4253]*y_cur[IDX_HCNHII] + k[4254]*y_cur[IDX_HCOII] + + k[4259]*y_cur[IDX_N2HII] + k[4261]*y_cur[IDX_NH4II] + + k[4269]*y_cur[IDX_SiOHII]; + data[jistart + 20712] = 0.0 - k[99]*y_cur[IDX_HI] + k[4421]*y_cur[IDX_HII] + + k[4424]*y_cur[IDX_H3II] + k[4425]*y_cur[IDX_H3OII] + + k[4426]*y_cur[IDX_HC2SII] + k[4427]*y_cur[IDX_HCNHII] + + k[4428]*y_cur[IDX_HCNHII] + k[4429]*y_cur[IDX_HCOII] + + k[4434]*y_cur[IDX_N2HII] + k[4436]*y_cur[IDX_NH4II] + k[4444]*y_cur[IDX_SiOHII]; - data[jistart + 20171] = 0.0 + k[4478]*y_cur[IDX_SiOII] + - k[4479]*y_cur[IDX_SiOHII]; - data[jistart + 20172] = 0.0 + k[4513]*y_cur[IDX_SiOII] + - k[4514]*y_cur[IDX_SiOHII]; - data[jistart + 20173] = 0.0 + k[4548]*y_cur[IDX_SiOII] + - k[4549]*y_cur[IDX_SiOHII]; - data[jistart + 20174] = 0.0 + k[4583]*y_cur[IDX_SiOII] + - k[4584]*y_cur[IDX_SiOHII]; - data[jistart + 20175] = 0.0 + k[4618]*y_cur[IDX_SiOII] + - k[4619]*y_cur[IDX_SiOHII]; - data[jistart + 20176] = 0.0 + k[4653]*y_cur[IDX_SiOII] + - k[4654]*y_cur[IDX_SiOHII]; - data[jistart + 20177] = 0.0 + k[4688]*y_cur[IDX_SiOII] + - k[4689]*y_cur[IDX_SiOHII]; - data[jistart + 20178] = 0.0 + k[5492]*y_cur[IDX_SiI]; - data[jistart + 20179] = 0.0 + k[5491]*y_cur[IDX_SiI]; - data[jistart + 20180] = 0.0 + k[726]*y_cur[IDX_SiOII]; - data[jistart + 20181] = 0.0 + k[6557]*y_cur[IDX_SiOHII] + - k[6586]*y_cur[IDX_H2SiOII] + k[6591]*y_cur[IDX_H3SiOII] + - k[6724]*y_cur[IDX_HSiO2II]; - data[jistart + 20182] = 0.0 + k[7161] + k[7343] + k[7525]; - data[jistart + 20183] = 0.0 - k[434]*y_cur[IDX_SiOI]; - data[jistart + 20184] = 0.0 + k[4724]*y_cur[IDX_SiOII] + - k[4725]*y_cur[IDX_SiOHII]; - data[jistart + 20185] = 0.0 + k[5843] + k[6166] + k[6167]; - data[jistart + 20186] = 0.0 + k[1024]*y_cur[IDX_eM] + - k[6586]*y_cur[IDX_GRAINM]; - data[jistart + 20187] = 0.0 - k[2760]*y_cur[IDX_SiOI]; - data[jistart + 20188] = 0.0 - k[2826]*y_cur[IDX_SiOI]; - data[jistart + 20189] = 0.0 + k[1052]*y_cur[IDX_eM] + - k[6591]*y_cur[IDX_GRAINM]; - data[jistart + 20190] = 0.0 + k[504]*y_cur[IDX_SiOII]; - data[jistart + 20191] = 0.0 - k[3005]*y_cur[IDX_SiOI]; - data[jistart + 20192] = 0.0 + k[5410]*y_cur[IDX_OI]; - data[jistart + 20193] = 0.0 + k[1146]*y_cur[IDX_eM] + - k[6724]*y_cur[IDX_GRAINM]; - data[jistart + 20194] = 0.0 - k[3332]*y_cur[IDX_SiOI] - - k[3333]*y_cur[IDX_SiOI]; - data[jistart + 20195] = 0.0 + k[541]*y_cur[IDX_SiOII]; - data[jistart + 20196] = 0.0 + k[3604]*y_cur[IDX_SiOHII]; - data[jistart + 20197] = 0.0 + k[631]*y_cur[IDX_SiOII] + - k[5493]*y_cur[IDX_SiI]; - data[jistart + 20198] = 0.0 + k[5410]*y_cur[IDX_HCSiI] + - k[5444]*y_cur[IDX_SiCI] + k[5445]*y_cur[IDX_SiH2I] + - k[5446]*y_cur[IDX_SiH2I] + k[5449]*y_cur[IDX_SiHI] + - k[5451]*y_cur[IDX_SiNI] + k[5585]*y_cur[IDX_SiI]; - data[jistart + 20199] = 0.0 + k[4759]*y_cur[IDX_SiOII] + - k[4760]*y_cur[IDX_SiOHII]; - data[jistart + 20200] = 0.0 + k[3675]*y_cur[IDX_SiSII] + - k[5494]*y_cur[IDX_SiI]; - data[jistart + 20201] = 0.0 + k[4794]*y_cur[IDX_SiOII] + - k[4795]*y_cur[IDX_SiOHII]; - data[jistart + 20202] = 0.0 + k[5482]*y_cur[IDX_SiI] - - k[5483]*y_cur[IDX_SiOI]; - data[jistart + 20203] = 0.0 - k[3794]*y_cur[IDX_SiOI]; - data[jistart + 20204] = 0.0 + k[4829]*y_cur[IDX_SiOII] + - k[4830]*y_cur[IDX_SiOHII]; - data[jistart + 20205] = 0.0 + k[4864]*y_cur[IDX_SiOII] + - k[4865]*y_cur[IDX_SiOHII]; - data[jistart + 20206] = 0.0 + k[5482]*y_cur[IDX_OHI] + - k[5491]*y_cur[IDX_CO2I] + k[5492]*y_cur[IDX_COI] + - k[5493]*y_cur[IDX_NOI] + k[5494]*y_cur[IDX_O2I] + - k[5585]*y_cur[IDX_OI]; - data[jistart + 20207] = 0.0 + k[5444]*y_cur[IDX_OI]; - data[jistart + 20208] = 0.0 + k[5449]*y_cur[IDX_OI]; - data[jistart + 20209] = 0.0 + k[5445]*y_cur[IDX_OI] + - k[5446]*y_cur[IDX_OI]; - data[jistart + 20210] = 0.0 + k[5451]*y_cur[IDX_OI]; - data[jistart + 20211] = 0.0 - k[434]*y_cur[IDX_HII] - - k[1447]*y_cur[IDX_CII] - k[2760]*y_cur[IDX_H3II] - - k[2826]*y_cur[IDX_H3OII] - k[3005]*y_cur[IDX_HCOII] - - k[3332]*y_cur[IDX_HeII] - k[3333]*y_cur[IDX_HeII] - - k[3794]*y_cur[IDX_OHII] - k[5483]*y_cur[IDX_OHI] - k[5934] - k[6286] - - k[6287] - k[6979]; - data[jistart + 20212] = 0.0 + k[504]*y_cur[IDX_HCOI] + - k[541]*y_cur[IDX_MgI] + k[631]*y_cur[IDX_NOI] + - k[726]*y_cur[IDX_FeI] + k[3918]*y_cur[IDX_CM] + - k[3953]*y_cur[IDX_C10M] + k[3988]*y_cur[IDX_C10HM] + - k[4023]*y_cur[IDX_C2M] + k[4058]*y_cur[IDX_C2HM] + - k[4093]*y_cur[IDX_C3M] + k[4128]*y_cur[IDX_C3HM] + - k[4163]*y_cur[IDX_C3NM] + k[4198]*y_cur[IDX_C4M] + - k[4233]*y_cur[IDX_C4HM] + k[4268]*y_cur[IDX_C5M] + - k[4303]*y_cur[IDX_C5HM] + k[4338]*y_cur[IDX_C5NM] + - k[4373]*y_cur[IDX_C6M] + k[4408]*y_cur[IDX_C6HM] + - k[4443]*y_cur[IDX_C7M] + k[4478]*y_cur[IDX_C7HM] + - k[4513]*y_cur[IDX_C8M] + k[4548]*y_cur[IDX_C8HM] + - k[4583]*y_cur[IDX_C9M] + k[4618]*y_cur[IDX_C9HM] + - k[4653]*y_cur[IDX_CHM] + k[4688]*y_cur[IDX_CNM] + - k[4724]*y_cur[IDX_HM] + k[4759]*y_cur[IDX_OM] + - k[4794]*y_cur[IDX_O2M] + k[4829]*y_cur[IDX_OHM] + - k[4864]*y_cur[IDX_SM]; - data[jistart + 20213] = 0.0 + k[5933] + k[6285]; - data[jistart + 20214] = 0.0 + k[1268]*y_cur[IDX_eM] + - k[3604]*y_cur[IDX_NH3I] + k[3919]*y_cur[IDX_CM] + + data[jistart + 20713] = 0.0 + k[2475]*y_cur[IDX_H2I] + k[4724]*y_cur[IDX_HM]; + data[jistart + 20714] = 0.0 + k[330]*y_cur[IDX_HII]; + data[jistart + 20715] = 0.0 + k[1268]*y_cur[IDX_eM] + k[3919]*y_cur[IDX_CM] + k[3954]*y_cur[IDX_C10M] + k[3989]*y_cur[IDX_C10HM] + k[4024]*y_cur[IDX_C2M] + k[4059]*y_cur[IDX_C2HM] + k[4094]*y_cur[IDX_C3M] + k[4129]*y_cur[IDX_C3HM] + @@ -42409,1346 +36811,1350 @@ __global__ void JacKernel(realtype *y, realtype *data, NaunetData *d_udata, k[4514]*y_cur[IDX_C8M] + k[4549]*y_cur[IDX_C8HM] + k[4584]*y_cur[IDX_C9M] + k[4619]*y_cur[IDX_C9HM] + k[4654]*y_cur[IDX_CHM] + k[4689]*y_cur[IDX_CNM] + - k[4725]*y_cur[IDX_HM] + k[4760]*y_cur[IDX_OM] + - k[4795]*y_cur[IDX_O2M] + k[4830]*y_cur[IDX_OHM] + - k[4865]*y_cur[IDX_SM] + k[6557]*y_cur[IDX_GRAINM]; - data[jistart + 20215] = 0.0 + k[3675]*y_cur[IDX_O2I]; - data[jistart + 20216] = 0.0 + k[1024]*y_cur[IDX_H2SiOII] + - k[1052]*y_cur[IDX_H3SiOII] + k[1146]*y_cur[IDX_HSiO2II] + - k[1268]*y_cur[IDX_SiOHII]; - data[jistart + 20217] = 0.0 - k[1932]*y_cur[IDX_SiOII]; - data[jistart + 20218] = 0.0 - k[3918]*y_cur[IDX_SiOII]; - data[jistart + 20219] = 0.0 - k[3953]*y_cur[IDX_SiOII]; - data[jistart + 20220] = 0.0 - k[3988]*y_cur[IDX_SiOII]; - data[jistart + 20221] = 0.0 - k[1465]*y_cur[IDX_SiOII]; - data[jistart + 20222] = 0.0 - k[4023]*y_cur[IDX_SiOII]; - data[jistart + 20223] = 0.0 - k[4058]*y_cur[IDX_SiOII]; - data[jistart + 20224] = 0.0 - k[4093]*y_cur[IDX_SiOII]; - data[jistart + 20225] = 0.0 - k[4128]*y_cur[IDX_SiOII]; - data[jistart + 20226] = 0.0 - k[4163]*y_cur[IDX_SiOII]; - data[jistart + 20227] = 0.0 - k[4198]*y_cur[IDX_SiOII]; - data[jistart + 20228] = 0.0 - k[4233]*y_cur[IDX_SiOII]; - data[jistart + 20229] = 0.0 - k[4268]*y_cur[IDX_SiOII]; - data[jistart + 20230] = 0.0 - k[4303]*y_cur[IDX_SiOII]; - data[jistart + 20231] = 0.0 - k[4338]*y_cur[IDX_SiOII]; - data[jistart + 20232] = 0.0 - k[4373]*y_cur[IDX_SiOII]; - data[jistart + 20233] = 0.0 - k[4408]*y_cur[IDX_SiOII]; - data[jistart + 20234] = 0.0 - k[4443]*y_cur[IDX_SiOII]; - data[jistart + 20235] = 0.0 - k[4478]*y_cur[IDX_SiOII]; - data[jistart + 20236] = 0.0 - k[4513]*y_cur[IDX_SiOII]; - data[jistart + 20237] = 0.0 - k[4548]*y_cur[IDX_SiOII]; - data[jistart + 20238] = 0.0 - k[4583]*y_cur[IDX_SiOII]; - data[jistart + 20239] = 0.0 - k[4618]*y_cur[IDX_SiOII]; - data[jistart + 20240] = 0.0 - k[2268]*y_cur[IDX_SiOII]; - data[jistart + 20241] = 0.0 - k[4653]*y_cur[IDX_SiOII]; - data[jistart + 20242] = 0.0 - k[2019]*y_cur[IDX_SiOII]; - data[jistart + 20243] = 0.0 - k[4688]*y_cur[IDX_SiOII]; - data[jistart + 20244] = 0.0 - k[2292]*y_cur[IDX_SiOII]; - data[jistart + 20245] = 0.0 - k[726]*y_cur[IDX_SiOII]; - data[jistart + 20246] = 0.0 - k[6531]*y_cur[IDX_SiOII]; - data[jistart + 20247] = 0.0 + k[434]*y_cur[IDX_SiOI]; - data[jistart + 20248] = 0.0 - k[4724]*y_cur[IDX_SiOII]; - data[jistart + 20249] = 0.0 - k[2475]*y_cur[IDX_SiOII]; - data[jistart + 20250] = 0.0 - k[504]*y_cur[IDX_SiOII]; - data[jistart + 20251] = 0.0 - k[541]*y_cur[IDX_SiOII]; - data[jistart + 20252] = 0.0 - k[3475]*y_cur[IDX_SiOII] - - k[3476]*y_cur[IDX_SiOII]; - data[jistart + 20253] = 0.0 - k[631]*y_cur[IDX_SiOII]; - data[jistart + 20254] = 0.0 + k[3753]*y_cur[IDX_SiCII] + - k[3756]*y_cur[IDX_SiHII] + k[3761]*y_cur[IDX_SiNII] - - k[3764]*y_cur[IDX_SiOII] + k[5584]*y_cur[IDX_SiII]; - data[jistart + 20255] = 0.0 - k[4759]*y_cur[IDX_SiOII]; - data[jistart + 20256] = 0.0 + k[3676]*y_cur[IDX_SiSII]; - data[jistart + 20257] = 0.0 - k[4794]*y_cur[IDX_SiOII]; - data[jistart + 20258] = 0.0 + k[3809]*y_cur[IDX_SiII]; - data[jistart + 20259] = 0.0 - k[4829]*y_cur[IDX_SiOII]; - data[jistart + 20260] = 0.0 - k[3842]*y_cur[IDX_SiOII]; - data[jistart + 20261] = 0.0 - k[4864]*y_cur[IDX_SiOII]; - data[jistart + 20262] = 0.0 + k[3809]*y_cur[IDX_OHI] + - k[5584]*y_cur[IDX_OI]; - data[jistart + 20263] = 0.0 + k[3753]*y_cur[IDX_OI]; - data[jistart + 20264] = 0.0 + k[3756]*y_cur[IDX_OI]; - data[jistart + 20265] = 0.0 + k[3761]*y_cur[IDX_OI]; - data[jistart + 20266] = 0.0 + k[434]*y_cur[IDX_HII] + k[6287]; - data[jistart + 20267] = 0.0 - k[504]*y_cur[IDX_HCOI] - - k[541]*y_cur[IDX_MgI] - k[631]*y_cur[IDX_NOI] - - k[726]*y_cur[IDX_FeI] - k[1266]*y_cur[IDX_eM] - - k[1465]*y_cur[IDX_C2I] - k[1932]*y_cur[IDX_CI] - - k[2019]*y_cur[IDX_CH2I] - k[2268]*y_cur[IDX_CHI] - - k[2292]*y_cur[IDX_COI] - k[2475]*y_cur[IDX_H2I] - - k[3475]*y_cur[IDX_NI] - k[3476]*y_cur[IDX_NI] - - k[3764]*y_cur[IDX_OI] - k[3842]*y_cur[IDX_SI] - - k[3918]*y_cur[IDX_CM] - k[3953]*y_cur[IDX_C10M] - - k[3988]*y_cur[IDX_C10HM] - k[4023]*y_cur[IDX_C2M] - - k[4058]*y_cur[IDX_C2HM] - k[4093]*y_cur[IDX_C3M] - - k[4128]*y_cur[IDX_C3HM] - k[4163]*y_cur[IDX_C3NM] - - k[4198]*y_cur[IDX_C4M] - k[4233]*y_cur[IDX_C4HM] - - k[4268]*y_cur[IDX_C5M] - k[4303]*y_cur[IDX_C5HM] - - k[4338]*y_cur[IDX_C5NM] - k[4373]*y_cur[IDX_C6M] - - k[4408]*y_cur[IDX_C6HM] - k[4443]*y_cur[IDX_C7M] - - k[4478]*y_cur[IDX_C7HM] - k[4513]*y_cur[IDX_C8M] - - k[4548]*y_cur[IDX_C8HM] - k[4583]*y_cur[IDX_C9M] - - k[4618]*y_cur[IDX_C9HM] - k[4653]*y_cur[IDX_CHM] - - k[4688]*y_cur[IDX_CNM] - k[4724]*y_cur[IDX_HM] - - k[4759]*y_cur[IDX_OM] - k[4794]*y_cur[IDX_O2M] - - k[4829]*y_cur[IDX_OHM] - k[4864]*y_cur[IDX_SM] - k[6284] - - k[6531]*y_cur[IDX_GRAINM]; - data[jistart + 20268] = 0.0 + k[3676]*y_cur[IDX_O2I]; - data[jistart + 20269] = 0.0 - k[1266]*y_cur[IDX_SiOII]; - data[jistart + 20270] = 0.0 + k[6723]*y_cur[IDX_HSiO2II]; - data[jistart + 20271] = 0.0 + k[7207] + k[7389] + k[7573]; - data[jistart + 20272] = 0.0 - k[2759]*y_cur[IDX_SiO2I]; - data[jistart + 20273] = 0.0 - k[3004]*y_cur[IDX_SiO2I]; - data[jistart + 20274] = 0.0 + k[1145]*y_cur[IDX_eM] + - k[6723]*y_cur[IDX_GRAINM]; - data[jistart + 20275] = 0.0 - k[3331]*y_cur[IDX_SiO2I]; - data[jistart + 20276] = 0.0 + k[5483]*y_cur[IDX_SiOI]; - data[jistart + 20277] = 0.0 + k[5483]*y_cur[IDX_OHI]; - data[jistart + 20278] = 0.0 - k[2759]*y_cur[IDX_H3II] - - k[3004]*y_cur[IDX_HCOII] - k[3331]*y_cur[IDX_HeII] - k[5933] - - k[6285] - k[7025]; - data[jistart + 20279] = 0.0 + k[1145]*y_cur[IDX_HSiO2II]; - data[jistart + 20280] = 0.0 - k[3919]*y_cur[IDX_SiOHII]; - data[jistart + 20281] = 0.0 - k[3954]*y_cur[IDX_SiOHII]; - data[jistart + 20282] = 0.0 - k[3989]*y_cur[IDX_SiOHII]; - data[jistart + 20283] = 0.0 - k[4024]*y_cur[IDX_SiOHII]; - data[jistart + 20284] = 0.0 - k[4059]*y_cur[IDX_SiOHII]; - data[jistart + 20285] = 0.0 + k[3859]*y_cur[IDX_SiII]; - data[jistart + 20286] = 0.0 - k[4094]*y_cur[IDX_SiOHII]; - data[jistart + 20287] = 0.0 - k[4129]*y_cur[IDX_SiOHII]; - data[jistart + 20288] = 0.0 - k[4164]*y_cur[IDX_SiOHII]; - data[jistart + 20289] = 0.0 - k[4199]*y_cur[IDX_SiOHII]; - data[jistart + 20290] = 0.0 - k[4234]*y_cur[IDX_SiOHII]; - data[jistart + 20291] = 0.0 - k[4269]*y_cur[IDX_SiOHII]; - data[jistart + 20292] = 0.0 - k[4304]*y_cur[IDX_SiOHII]; - data[jistart + 20293] = 0.0 - k[4339]*y_cur[IDX_SiOHII]; - data[jistart + 20294] = 0.0 - k[4374]*y_cur[IDX_SiOHII]; - data[jistart + 20295] = 0.0 - k[4409]*y_cur[IDX_SiOHII]; - data[jistart + 20296] = 0.0 - k[4444]*y_cur[IDX_SiOHII]; - data[jistart + 20297] = 0.0 - k[4479]*y_cur[IDX_SiOHII]; - data[jistart + 20298] = 0.0 - k[4514]*y_cur[IDX_SiOHII]; - data[jistart + 20299] = 0.0 - k[4549]*y_cur[IDX_SiOHII]; - data[jistart + 20300] = 0.0 - k[4584]*y_cur[IDX_SiOHII]; - data[jistart + 20301] = 0.0 - k[4619]*y_cur[IDX_SiOHII]; - data[jistart + 20302] = 0.0 - k[4654]*y_cur[IDX_SiOHII]; - data[jistart + 20303] = 0.0 + k[3867]*y_cur[IDX_SiII]; - data[jistart + 20304] = 0.0 - k[4689]*y_cur[IDX_SiOHII]; - data[jistart + 20305] = 0.0 - k[6556]*y_cur[IDX_SiOHII] - - k[6557]*y_cur[IDX_SiOHII]; - data[jistart + 20306] = 0.0 + k[2341]*y_cur[IDX_H2SiOI]; - data[jistart + 20307] = 0.0 - k[4725]*y_cur[IDX_SiOHII]; - data[jistart + 20308] = 0.0 + k[2475]*y_cur[IDX_SiOII]; - data[jistart + 20309] = 0.0 + k[2556]*y_cur[IDX_HSiSII] + - k[2569]*y_cur[IDX_SiII]; - data[jistart + 20310] = 0.0 + k[2341]*y_cur[IDX_HII] + - k[3231]*y_cur[IDX_HeII]; - data[jistart + 20311] = 0.0 + k[2760]*y_cur[IDX_SiOI]; - data[jistart + 20312] = 0.0 + k[2826]*y_cur[IDX_SiOI]; - data[jistart + 20313] = 0.0 + k[3005]*y_cur[IDX_SiOI]; - data[jistart + 20314] = 0.0 + k[2556]*y_cur[IDX_H2OI]; - data[jistart + 20315] = 0.0 + k[3231]*y_cur[IDX_H2SiOI]; - data[jistart + 20316] = 0.0 - k[3604]*y_cur[IDX_SiOHII]; - data[jistart + 20317] = 0.0 + k[3757]*y_cur[IDX_SiH2II] + - k[3759]*y_cur[IDX_SiH3II]; - data[jistart + 20318] = 0.0 - k[4760]*y_cur[IDX_SiOHII]; - data[jistart + 20319] = 0.0 + k[3882]*y_cur[IDX_SiH2II]; - data[jistart + 20320] = 0.0 - k[4795]*y_cur[IDX_SiOHII]; - data[jistart + 20321] = 0.0 + k[3794]*y_cur[IDX_SiOI]; - data[jistart + 20322] = 0.0 - k[4830]*y_cur[IDX_SiOHII]; - data[jistart + 20323] = 0.0 - k[4865]*y_cur[IDX_SiOHII]; - data[jistart + 20324] = 0.0 + k[2569]*y_cur[IDX_H2OI] + - k[3859]*y_cur[IDX_C2H5OHI] + k[3867]*y_cur[IDX_CH3OHI]; - data[jistart + 20325] = 0.0 + k[3757]*y_cur[IDX_OI] + - k[3882]*y_cur[IDX_O2I]; - data[jistart + 20326] = 0.0 + k[3759]*y_cur[IDX_OI]; - data[jistart + 20327] = 0.0 + k[2760]*y_cur[IDX_H3II] + - k[2826]*y_cur[IDX_H3OII] + k[3005]*y_cur[IDX_HCOII] + - k[3794]*y_cur[IDX_OHII]; - data[jistart + 20328] = 0.0 + k[2475]*y_cur[IDX_H2I]; - data[jistart + 20329] = 0.0 - k[1267]*y_cur[IDX_eM] - - k[1268]*y_cur[IDX_eM] - k[3604]*y_cur[IDX_NH3I] - - k[3919]*y_cur[IDX_CM] - k[3954]*y_cur[IDX_C10M] - - k[3989]*y_cur[IDX_C10HM] - k[4024]*y_cur[IDX_C2M] - - k[4059]*y_cur[IDX_C2HM] - k[4094]*y_cur[IDX_C3M] - - k[4129]*y_cur[IDX_C3HM] - k[4164]*y_cur[IDX_C3NM] - - k[4199]*y_cur[IDX_C4M] - k[4234]*y_cur[IDX_C4HM] - - k[4269]*y_cur[IDX_C5M] - k[4304]*y_cur[IDX_C5HM] - - k[4339]*y_cur[IDX_C5NM] - k[4374]*y_cur[IDX_C6M] - - k[4409]*y_cur[IDX_C6HM] - k[4444]*y_cur[IDX_C7M] - - k[4479]*y_cur[IDX_C7HM] - k[4514]*y_cur[IDX_C8M] - - k[4549]*y_cur[IDX_C8HM] - k[4584]*y_cur[IDX_C9M] - - k[4619]*y_cur[IDX_C9HM] - k[4654]*y_cur[IDX_CHM] - - k[4689]*y_cur[IDX_CNM] - k[4725]*y_cur[IDX_HM] - - k[4760]*y_cur[IDX_OM] - k[4795]*y_cur[IDX_O2M] - - k[4830]*y_cur[IDX_OHM] - k[4865]*y_cur[IDX_SM] - - k[6556]*y_cur[IDX_GRAINM] - k[6557]*y_cur[IDX_GRAINM]; - data[jistart + 20330] = 0.0 - k[1267]*y_cur[IDX_SiOHII] - - k[1268]*y_cur[IDX_SiOHII]; - data[jistart + 20331] = 0.0 - k[204]*y_cur[IDX_SiSI] - - k[1448]*y_cur[IDX_SiSI]; - data[jistart + 20332] = 0.0 + k[3920]*y_cur[IDX_SiSII]; - data[jistart + 20333] = 0.0 + k[3955]*y_cur[IDX_SiSII]; - data[jistart + 20334] = 0.0 + k[3990]*y_cur[IDX_SiSII]; - data[jistart + 20335] = 0.0 + k[4025]*y_cur[IDX_SiSII]; - data[jistart + 20336] = 0.0 + k[4060]*y_cur[IDX_SiSII]; - data[jistart + 20337] = 0.0 + k[4095]*y_cur[IDX_SiSII]; - data[jistart + 20338] = 0.0 + k[4130]*y_cur[IDX_SiSII]; - data[jistart + 20339] = 0.0 + k[4165]*y_cur[IDX_SiSII]; - data[jistart + 20340] = 0.0 + k[4200]*y_cur[IDX_SiSII]; - data[jistart + 20341] = 0.0 + k[4235]*y_cur[IDX_SiSII]; - data[jistart + 20342] = 0.0 + k[4270]*y_cur[IDX_SiSII]; - data[jistart + 20343] = 0.0 + k[4305]*y_cur[IDX_SiSII]; - data[jistart + 20344] = 0.0 + k[4340]*y_cur[IDX_SiSII]; - data[jistart + 20345] = 0.0 + k[4375]*y_cur[IDX_SiSII]; - data[jistart + 20346] = 0.0 + k[4410]*y_cur[IDX_SiSII]; - data[jistart + 20347] = 0.0 + k[4445]*y_cur[IDX_SiSII]; - data[jistart + 20348] = 0.0 + k[4480]*y_cur[IDX_SiSII]; - data[jistart + 20349] = 0.0 + k[4515]*y_cur[IDX_SiSII]; - data[jistart + 20350] = 0.0 + k[4550]*y_cur[IDX_SiSII]; - data[jistart + 20351] = 0.0 + k[4585]*y_cur[IDX_SiSII]; - data[jistart + 20352] = 0.0 + k[4620]*y_cur[IDX_SiSII]; - data[jistart + 20353] = 0.0 + k[4655]*y_cur[IDX_SiSII]; - data[jistart + 20354] = 0.0 + k[4690]*y_cur[IDX_SiSII]; - data[jistart + 20355] = 0.0 + k[6720]*y_cur[IDX_HSiSII]; - data[jistart + 20356] = 0.0 + k[7205] + k[7387] + k[7571]; - data[jistart + 20357] = 0.0 - k[435]*y_cur[IDX_SiSI]; - data[jistart + 20358] = 0.0 + k[4726]*y_cur[IDX_SiSII]; - data[jistart + 20359] = 0.0 + k[2580]*y_cur[IDX_HSiSII]; - data[jistart + 20360] = 0.0 - k[2761]*y_cur[IDX_SiSI]; - data[jistart + 20361] = 0.0 + k[2880]*y_cur[IDX_HSiSII]; - data[jistart + 20362] = 0.0 - k[3006]*y_cur[IDX_SiSI]; - data[jistart + 20363] = 0.0 + k[1148]*y_cur[IDX_eM] + - k[2580]*y_cur[IDX_H2SI] + k[2880]*y_cur[IDX_HCNI] + - k[3591]*y_cur[IDX_NH3I] + k[6720]*y_cur[IDX_GRAINM]; - data[jistart + 20364] = 0.0 - k[3334]*y_cur[IDX_SiSI] - - k[3335]*y_cur[IDX_SiSI]; - data[jistart + 20365] = 0.0 + k[3591]*y_cur[IDX_HSiSII]; - data[jistart + 20366] = 0.0 + k[4761]*y_cur[IDX_SiSII]; - data[jistart + 20367] = 0.0 + k[4796]*y_cur[IDX_SiSII]; - data[jistart + 20368] = 0.0 + k[4831]*y_cur[IDX_SiSII]; - data[jistart + 20369] = 0.0 - k[706]*y_cur[IDX_SiSI]; - data[jistart + 20370] = 0.0 + k[4866]*y_cur[IDX_SiSII]; - data[jistart + 20371] = 0.0 - k[204]*y_cur[IDX_CII] - - k[435]*y_cur[IDX_HII] - k[706]*y_cur[IDX_SII] - - k[1448]*y_cur[IDX_CII] - k[2761]*y_cur[IDX_H3II] - - k[3006]*y_cur[IDX_HCOII] - k[3334]*y_cur[IDX_HeII] - - k[3335]*y_cur[IDX_HeII] - k[5935] - k[6288] - k[7023]; - data[jistart + 20372] = 0.0 + k[3920]*y_cur[IDX_CM] + - k[3955]*y_cur[IDX_C10M] + k[3990]*y_cur[IDX_C10HM] + - k[4025]*y_cur[IDX_C2M] + k[4060]*y_cur[IDX_C2HM] + - k[4095]*y_cur[IDX_C3M] + k[4130]*y_cur[IDX_C3HM] + - k[4165]*y_cur[IDX_C3NM] + k[4200]*y_cur[IDX_C4M] + - k[4235]*y_cur[IDX_C4HM] + k[4270]*y_cur[IDX_C5M] + - k[4305]*y_cur[IDX_C5HM] + k[4340]*y_cur[IDX_C5NM] + - k[4375]*y_cur[IDX_C6M] + k[4410]*y_cur[IDX_C6HM] + - k[4445]*y_cur[IDX_C7M] + k[4480]*y_cur[IDX_C7HM] + - k[4515]*y_cur[IDX_C8M] + k[4550]*y_cur[IDX_C8HM] + - k[4585]*y_cur[IDX_C9M] + k[4620]*y_cur[IDX_C9HM] + - k[4655]*y_cur[IDX_CHM] + k[4690]*y_cur[IDX_CNM] + - k[4726]*y_cur[IDX_HM] + k[4761]*y_cur[IDX_OM] + - k[4796]*y_cur[IDX_O2M] + k[4831]*y_cur[IDX_OHM] + - k[4866]*y_cur[IDX_SM]; - data[jistart + 20373] = 0.0 + k[1148]*y_cur[IDX_HSiSII]; - data[jistart + 20374] = 0.0 + k[204]*y_cur[IDX_SiSI]; - data[jistart + 20375] = 0.0 - k[3920]*y_cur[IDX_SiSII]; - data[jistart + 20376] = 0.0 - k[3955]*y_cur[IDX_SiSII]; - data[jistart + 20377] = 0.0 - k[3990]*y_cur[IDX_SiSII]; - data[jistart + 20378] = 0.0 - k[4025]*y_cur[IDX_SiSII]; - data[jistart + 20379] = 0.0 - k[4060]*y_cur[IDX_SiSII]; - data[jistart + 20380] = 0.0 - k[4095]*y_cur[IDX_SiSII]; - data[jistart + 20381] = 0.0 - k[4130]*y_cur[IDX_SiSII]; - data[jistart + 20382] = 0.0 - k[4165]*y_cur[IDX_SiSII]; - data[jistart + 20383] = 0.0 - k[4200]*y_cur[IDX_SiSII]; - data[jistart + 20384] = 0.0 - k[4235]*y_cur[IDX_SiSII]; - data[jistart + 20385] = 0.0 - k[4270]*y_cur[IDX_SiSII]; - data[jistart + 20386] = 0.0 - k[4305]*y_cur[IDX_SiSII]; - data[jistart + 20387] = 0.0 - k[4340]*y_cur[IDX_SiSII]; - data[jistart + 20388] = 0.0 - k[4375]*y_cur[IDX_SiSII]; - data[jistart + 20389] = 0.0 - k[4410]*y_cur[IDX_SiSII]; - data[jistart + 20390] = 0.0 - k[4445]*y_cur[IDX_SiSII]; - data[jistart + 20391] = 0.0 - k[4480]*y_cur[IDX_SiSII]; - data[jistart + 20392] = 0.0 - k[4515]*y_cur[IDX_SiSII]; - data[jistart + 20393] = 0.0 - k[4550]*y_cur[IDX_SiSII]; - data[jistart + 20394] = 0.0 - k[4585]*y_cur[IDX_SiSII]; - data[jistart + 20395] = 0.0 - k[4620]*y_cur[IDX_SiSII]; - data[jistart + 20396] = 0.0 - k[4655]*y_cur[IDX_SiSII]; - data[jistart + 20397] = 0.0 - k[4690]*y_cur[IDX_SiSII]; - data[jistart + 20398] = 0.0 - k[6710]*y_cur[IDX_SiSII]; - data[jistart + 20399] = 0.0 - k[2849]*y_cur[IDX_SiSII]; - data[jistart + 20400] = 0.0 + k[435]*y_cur[IDX_SiSI]; - data[jistart + 20401] = 0.0 - k[4726]*y_cur[IDX_SiSII]; - data[jistart + 20402] = 0.0 - k[4761]*y_cur[IDX_SiSII]; - data[jistart + 20403] = 0.0 - k[3675]*y_cur[IDX_SiSII] - - k[3676]*y_cur[IDX_SiSII]; - data[jistart + 20404] = 0.0 - k[4796]*y_cur[IDX_SiSII]; - data[jistart + 20405] = 0.0 + k[3871]*y_cur[IDX_SiII]; - data[jistart + 20406] = 0.0 - k[4831]*y_cur[IDX_SiSII]; - data[jistart + 20407] = 0.0 + k[706]*y_cur[IDX_SiSI] + - k[3885]*y_cur[IDX_SiHI]; - data[jistart + 20408] = 0.0 - k[4866]*y_cur[IDX_SiSII]; - data[jistart + 20409] = 0.0 + k[3871]*y_cur[IDX_OCSI]; - data[jistart + 20410] = 0.0 + k[3885]*y_cur[IDX_SII]; - data[jistart + 20411] = 0.0 + k[204]*y_cur[IDX_CII] + - k[435]*y_cur[IDX_HII] + k[706]*y_cur[IDX_SII]; - data[jistart + 20412] = 0.0 - k[1269]*y_cur[IDX_eM] - - k[2849]*y_cur[IDX_HI] - k[3675]*y_cur[IDX_O2I] - - k[3676]*y_cur[IDX_O2I] - k[3920]*y_cur[IDX_CM] - - k[3955]*y_cur[IDX_C10M] - k[3990]*y_cur[IDX_C10HM] - - k[4025]*y_cur[IDX_C2M] - k[4060]*y_cur[IDX_C2HM] - - k[4095]*y_cur[IDX_C3M] - k[4130]*y_cur[IDX_C3HM] - - k[4165]*y_cur[IDX_C3NM] - k[4200]*y_cur[IDX_C4M] - - k[4235]*y_cur[IDX_C4HM] - k[4270]*y_cur[IDX_C5M] - - k[4305]*y_cur[IDX_C5HM] - k[4340]*y_cur[IDX_C5NM] - - k[4375]*y_cur[IDX_C6M] - k[4410]*y_cur[IDX_C6HM] - - k[4445]*y_cur[IDX_C7M] - k[4480]*y_cur[IDX_C7HM] - - k[4515]*y_cur[IDX_C8M] - k[4550]*y_cur[IDX_C8HM] - - k[4585]*y_cur[IDX_C9M] - k[4620]*y_cur[IDX_C9HM] - - k[4655]*y_cur[IDX_CHM] - k[4690]*y_cur[IDX_CNM] - - k[4726]*y_cur[IDX_HM] - k[4761]*y_cur[IDX_OM] - - k[4796]*y_cur[IDX_O2M] - k[4831]*y_cur[IDX_OHM] - - k[4866]*y_cur[IDX_SM] - k[6710]*y_cur[IDX_GRAINM]; - data[jistart + 20413] = 0.0 - k[1269]*y_cur[IDX_SiSII]; - data[jistart + 20414] = 0.0 + k[0]*y_cur[IDX_CM] + - k[37]*y_cur[IDX_C10M] + k[38]*y_cur[IDX_C2M] + k[39]*y_cur[IDX_C2HM] - + k[40]*y_cur[IDX_C3M] + k[41]*y_cur[IDX_C3HM] + - k[42]*y_cur[IDX_C3NM] + k[43]*y_cur[IDX_C4M] + k[44]*y_cur[IDX_C4HM] - + k[45]*y_cur[IDX_C5M] + k[46]*y_cur[IDX_C5HM] + - k[47]*y_cur[IDX_C6M] + k[48]*y_cur[IDX_C6HM] + k[49]*y_cur[IDX_C7M] - + k[50]*y_cur[IDX_C7HM] + k[51]*y_cur[IDX_C8M] + - k[52]*y_cur[IDX_C8HM] + k[53]*y_cur[IDX_C9M] + k[54]*y_cur[IDX_C9HM] - + k[55]*y_cur[IDX_CHM] + k[56]*y_cur[IDX_OM] + k[57]*y_cur[IDX_OHM] - + k[58]*y_cur[IDX_SM] + k[68]*y_cur[IDX_HM] - k[5607]*y_cur[IDX_eM] - + k[5675] + k[5772] + k[6069] + k[6299]; - data[jistart + 20415] = 0.0 - k[5611]*y_cur[IDX_eM]; - data[jistart + 20416] = 0.0 + k[0]*y_cur[IDX_CI] + - k[1]*y_cur[IDX_CH2I] + k[2]*y_cur[IDX_CHI] + k[3]*y_cur[IDX_CO2I] + - k[4]*y_cur[IDX_H2OI] + k[5]*y_cur[IDX_NI] + k[6]*y_cur[IDX_NHI] + - k[7]*y_cur[IDX_O2I] + k[8]*y_cur[IDX_OI] + k[9]*y_cur[IDX_OHI] + - k[82]*y_cur[IDX_H2I] + k[84]*y_cur[IDX_HI] + k[5686] + k[5948]; - data[jistart + 20417] = 0.0 - k[5587]*y_cur[IDX_eM] + k[5950]; - data[jistart + 20418] = 0.0 - k[727]*y_cur[IDX_eM] - - k[728]*y_cur[IDX_eM]; - data[jistart + 20419] = 0.0 + k[37]*y_cur[IDX_CI] + - k[85]*y_cur[IDX_HI] + k[5687] + k[5949]; - data[jistart + 20420] = 0.0 - k[5588]*y_cur[IDX_eM] + k[5962]; - data[jistart + 20421] = 0.0 - k[729]*y_cur[IDX_eM] - - k[730]*y_cur[IDX_eM] - k[731]*y_cur[IDX_eM]; - data[jistart + 20422] = 0.0 + k[86]*y_cur[IDX_HI] + k[5689] + - k[5956]; - data[jistart + 20423] = 0.0 + k[5958]; - data[jistart + 20424] = 0.0 - k[732]*y_cur[IDX_eM]; - data[jistart + 20425] = 0.0 - k[733]*y_cur[IDX_eM] - - k[734]*y_cur[IDX_eM]; - data[jistart + 20426] = 0.0 + k[5969]; - data[jistart + 20427] = 0.0 - k[735]*y_cur[IDX_eM] - - k[736]*y_cur[IDX_eM] - k[737]*y_cur[IDX_eM] - k[738]*y_cur[IDX_eM]; - data[jistart + 20428] = 0.0 + k[10]*y_cur[IDX_C2M] + - k[22]*y_cur[IDX_C4M] + k[27]*y_cur[IDX_C5M] + k[31]*y_cur[IDX_C6M] + - k[34]*y_cur[IDX_C7M] + k[36]*y_cur[IDX_C8M] + k[66]*y_cur[IDX_HM] - - k[5589]*y_cur[IDX_eM] + k[5977]; - data[jistart + 20429] = 0.0 - k[739]*y_cur[IDX_eM]; - data[jistart + 20430] = 0.0 + k[10]*y_cur[IDX_C2I] + - k[11]*y_cur[IDX_C3I] + k[12]*y_cur[IDX_C4I] + k[13]*y_cur[IDX_C5I] + - k[14]*y_cur[IDX_C6I] + k[15]*y_cur[IDX_C7I] + k[16]*y_cur[IDX_C8I] + - k[38]*y_cur[IDX_CI] + k[87]*y_cur[IDX_HI] + k[110]*y_cur[IDX_NI] + - k[128]*y_cur[IDX_OI] + k[5693] + k[5976]; - data[jistart + 20431] = 0.0 + k[67]*y_cur[IDX_HM] - - k[5590]*y_cur[IDX_eM] + k[5709] + k[5994]; - data[jistart + 20432] = 0.0 - k[740]*y_cur[IDX_eM] - - k[741]*y_cur[IDX_eM]; - data[jistart + 20433] = 0.0 + k[39]*y_cur[IDX_CI] + - k[88]*y_cur[IDX_HI] + k[111]*y_cur[IDX_NI] + k[129]*y_cur[IDX_OI] + - k[5695] + k[5980]; - data[jistart + 20434] = 0.0 + k[5696] + k[5981]; - data[jistart + 20435] = 0.0 - k[742]*y_cur[IDX_eM] - - k[743]*y_cur[IDX_eM] - k[744]*y_cur[IDX_eM]; - data[jistart + 20436] = 0.0 + k[5699] + k[5984]; - data[jistart + 20437] = 0.0 - k[745]*y_cur[IDX_eM] - - k[746]*y_cur[IDX_eM] - k[747]*y_cur[IDX_eM] - k[748]*y_cur[IDX_eM] - - k[749]*y_cur[IDX_eM] - k[750]*y_cur[IDX_eM] - k[751]*y_cur[IDX_eM] - - k[752]*y_cur[IDX_eM] - k[753]*y_cur[IDX_eM] - k[754]*y_cur[IDX_eM] - - k[755]*y_cur[IDX_eM] - k[756]*y_cur[IDX_eM]; - data[jistart + 20438] = 0.0 + k[5701] + k[5986]; - data[jistart + 20439] = 0.0 - k[757]*y_cur[IDX_eM] - - k[758]*y_cur[IDX_eM] - k[759]*y_cur[IDX_eM] - k[760]*y_cur[IDX_eM] - - k[761]*y_cur[IDX_eM] - k[762]*y_cur[IDX_eM] - k[763]*y_cur[IDX_eM]; - data[jistart + 20440] = 0.0 + k[5703] + k[5988]; - data[jistart + 20441] = 0.0 - k[764]*y_cur[IDX_eM] - - k[765]*y_cur[IDX_eM] - k[766]*y_cur[IDX_eM] - k[767]*y_cur[IDX_eM] - - k[768]*y_cur[IDX_eM]; - data[jistart + 20442] = 0.0 + k[5704] + k[5989]; - data[jistart + 20443] = 0.0 - k[769]*y_cur[IDX_eM] - - k[770]*y_cur[IDX_eM] - k[771]*y_cur[IDX_eM]; - data[jistart + 20444] = 0.0 + k[5707] + k[5992]; - data[jistart + 20445] = 0.0 - k[772]*y_cur[IDX_eM] - - k[773]*y_cur[IDX_eM]; - data[jistart + 20446] = 0.0 - k[774]*y_cur[IDX_eM] - - k[775]*y_cur[IDX_eM] - k[776]*y_cur[IDX_eM] - k[777]*y_cur[IDX_eM]; - data[jistart + 20447] = 0.0 + k[5804] + k[6109]; - data[jistart + 20448] = 0.0 - k[935]*y_cur[IDX_eM] - - k[936]*y_cur[IDX_eM]; - data[jistart + 20449] = 0.0 - k[778]*y_cur[IDX_eM] - - k[779]*y_cur[IDX_eM]; - data[jistart + 20450] = 0.0 - k[780]*y_cur[IDX_eM] - - k[781]*y_cur[IDX_eM]; - data[jistart + 20451] = 0.0 - k[782]*y_cur[IDX_eM] - - k[783]*y_cur[IDX_eM]; - data[jistart + 20452] = 0.0 - k[784]*y_cur[IDX_eM]; - data[jistart + 20453] = 0.0 - k[785]*y_cur[IDX_eM]; - data[jistart + 20454] = 0.0 - k[786]*y_cur[IDX_eM] - - k[787]*y_cur[IDX_eM]; - data[jistart + 20455] = 0.0 + k[11]*y_cur[IDX_C2M] + - k[17]*y_cur[IDX_C3M] + k[23]*y_cur[IDX_C4M] + k[28]*y_cur[IDX_C5M] + - k[32]*y_cur[IDX_C6M] + k[35]*y_cur[IDX_C7M] - k[5591]*y_cur[IDX_eM]; - data[jistart + 20456] = 0.0 - k[788]*y_cur[IDX_eM]; - data[jistart + 20457] = 0.0 + k[17]*y_cur[IDX_C3I] + - k[18]*y_cur[IDX_C4I] + k[19]*y_cur[IDX_C5I] + k[20]*y_cur[IDX_C6I] + - k[21]*y_cur[IDX_C7I] + k[40]*y_cur[IDX_CI] + k[89]*y_cur[IDX_HI] + - k[112]*y_cur[IDX_NI] + k[5716] + k[6000]; - data[jistart + 20458] = 0.0 - k[5592]*y_cur[IDX_eM]; - data[jistart + 20459] = 0.0 - k[789]*y_cur[IDX_eM] - - k[790]*y_cur[IDX_eM]; - data[jistart + 20460] = 0.0 + k[41]*y_cur[IDX_CI] + - k[90]*y_cur[IDX_HI] + k[113]*y_cur[IDX_NI] + k[5718] + k[6002]; - data[jistart + 20461] = 0.0 - k[791]*y_cur[IDX_eM] - - k[792]*y_cur[IDX_eM] - k[793]*y_cur[IDX_eM] - k[794]*y_cur[IDX_eM] - - k[795]*y_cur[IDX_eM]; - data[jistart + 20462] = 0.0 - k[796]*y_cur[IDX_eM] - - k[797]*y_cur[IDX_eM]; - data[jistart + 20463] = 0.0 - k[798]*y_cur[IDX_eM]; - data[jistart + 20464] = 0.0 - k[799]*y_cur[IDX_eM] - - k[800]*y_cur[IDX_eM] - k[801]*y_cur[IDX_eM] - k[802]*y_cur[IDX_eM]; - data[jistart + 20465] = 0.0 - k[803]*y_cur[IDX_eM] - - k[804]*y_cur[IDX_eM]; - data[jistart + 20466] = 0.0 - k[805]*y_cur[IDX_eM] - - k[806]*y_cur[IDX_eM]; - data[jistart + 20467] = 0.0 - k[807]*y_cur[IDX_eM] - - k[808]*y_cur[IDX_eM] - k[809]*y_cur[IDX_eM] - k[810]*y_cur[IDX_eM] - - k[811]*y_cur[IDX_eM] - k[812]*y_cur[IDX_eM] - k[813]*y_cur[IDX_eM]; - data[jistart + 20468] = 0.0 - k[5593]*y_cur[IDX_eM]; - data[jistart + 20469] = 0.0 - k[814]*y_cur[IDX_eM]; - data[jistart + 20470] = 0.0 + k[42]*y_cur[IDX_CI] + - k[91]*y_cur[IDX_HI] + k[130]*y_cur[IDX_OI] + k[5721] + k[6005]; - data[jistart + 20471] = 0.0 - k[815]*y_cur[IDX_eM]; - data[jistart + 20472] = 0.0 - k[816]*y_cur[IDX_eM] - - k[817]*y_cur[IDX_eM] - k[818]*y_cur[IDX_eM]; - data[jistart + 20473] = 0.0 + k[12]*y_cur[IDX_C2M] + - k[18]*y_cur[IDX_C3M] + k[24]*y_cur[IDX_C4M] + k[29]*y_cur[IDX_C5M] + - k[33]*y_cur[IDX_C6M] - k[5594]*y_cur[IDX_eM]; - data[jistart + 20474] = 0.0 - k[819]*y_cur[IDX_eM] - - k[820]*y_cur[IDX_eM]; - data[jistart + 20475] = 0.0 + k[22]*y_cur[IDX_C2I] + - k[23]*y_cur[IDX_C3I] + k[24]*y_cur[IDX_C4I] + k[25]*y_cur[IDX_C5I] + - k[26]*y_cur[IDX_C6I] + k[43]*y_cur[IDX_CI] + k[92]*y_cur[IDX_HI] + - k[114]*y_cur[IDX_NI] + k[5726] + k[6010]; - data[jistart + 20476] = 0.0 - k[5595]*y_cur[IDX_eM]; - data[jistart + 20477] = 0.0 - k[821]*y_cur[IDX_eM]; - data[jistart + 20478] = 0.0 + k[44]*y_cur[IDX_CI] + - k[93]*y_cur[IDX_HI] + k[115]*y_cur[IDX_NI] + k[5729] + k[6013]; - data[jistart + 20479] = 0.0 + k[5848] + k[6173]; - data[jistart + 20480] = 0.0 - k[822]*y_cur[IDX_eM] - - k[823]*y_cur[IDX_eM]; - data[jistart + 20481] = 0.0 - k[824]*y_cur[IDX_eM] - - k[825]*y_cur[IDX_eM]; - data[jistart + 20482] = 0.0 - k[826]*y_cur[IDX_eM]; - data[jistart + 20483] = 0.0 - k[827]*y_cur[IDX_eM] - - k[828]*y_cur[IDX_eM] - k[829]*y_cur[IDX_eM]; - data[jistart + 20484] = 0.0 - k[830]*y_cur[IDX_eM]; - data[jistart + 20485] = 0.0 - k[831]*y_cur[IDX_eM] - - k[832]*y_cur[IDX_eM]; - data[jistart + 20486] = 0.0 - k[833]*y_cur[IDX_eM] - - k[834]*y_cur[IDX_eM]; - data[jistart + 20487] = 0.0 - k[835]*y_cur[IDX_eM] - - k[836]*y_cur[IDX_eM] - k[837]*y_cur[IDX_eM]; - data[jistart + 20488] = 0.0 + k[13]*y_cur[IDX_C2M] + - k[19]*y_cur[IDX_C3M] + k[25]*y_cur[IDX_C4M] + k[30]*y_cur[IDX_C5M] - - k[5596]*y_cur[IDX_eM]; - data[jistart + 20489] = 0.0 - k[838]*y_cur[IDX_eM]; - data[jistart + 20490] = 0.0 + k[27]*y_cur[IDX_C2I] + - k[28]*y_cur[IDX_C3I] + k[29]*y_cur[IDX_C4I] + k[30]*y_cur[IDX_C5I] + - k[45]*y_cur[IDX_CI] + k[94]*y_cur[IDX_HI] + k[116]*y_cur[IDX_NI] + - k[5736] + k[6022]; - data[jistart + 20491] = 0.0 - k[5597]*y_cur[IDX_eM]; - data[jistart + 20492] = 0.0 - k[839]*y_cur[IDX_eM] - - k[840]*y_cur[IDX_eM]; - data[jistart + 20493] = 0.0 + k[46]*y_cur[IDX_CI] + - k[95]*y_cur[IDX_HI] + k[117]*y_cur[IDX_NI] + k[5739] + k[6024]; - data[jistart + 20494] = 0.0 - k[841]*y_cur[IDX_eM] - - k[842]*y_cur[IDX_eM]; - data[jistart + 20495] = 0.0 - k[843]*y_cur[IDX_eM] - - k[844]*y_cur[IDX_eM]; - data[jistart + 20496] = 0.0 - k[845]*y_cur[IDX_eM] - - k[846]*y_cur[IDX_eM]; - data[jistart + 20497] = 0.0 - k[5598]*y_cur[IDX_eM]; - data[jistart + 20498] = 0.0 - k[847]*y_cur[IDX_eM]; - data[jistart + 20499] = 0.0 + k[96]*y_cur[IDX_HI] + - k[131]*y_cur[IDX_OI] + k[5745] + k[6030]; - data[jistart + 20500] = 0.0 + k[14]*y_cur[IDX_C2M] + - k[20]*y_cur[IDX_C3M] + k[26]*y_cur[IDX_C4M] - k[5599]*y_cur[IDX_eM] - + k[6034]; - data[jistart + 20501] = 0.0 - k[848]*y_cur[IDX_eM] - - k[849]*y_cur[IDX_eM]; - data[jistart + 20502] = 0.0 + k[31]*y_cur[IDX_C2I] + - k[32]*y_cur[IDX_C3I] + k[33]*y_cur[IDX_C4I] + k[47]*y_cur[IDX_CI] + - k[97]*y_cur[IDX_HI] + k[5747] + k[6032]; - data[jistart + 20503] = 0.0 - k[5600]*y_cur[IDX_eM]; - data[jistart + 20504] = 0.0 - k[850]*y_cur[IDX_eM] - - k[851]*y_cur[IDX_eM]; - data[jistart + 20505] = 0.0 + k[48]*y_cur[IDX_CI] + - k[98]*y_cur[IDX_HI] + k[5749] + k[6035]; - data[jistart + 20506] = 0.0 + k[6036]; - data[jistart + 20507] = 0.0 - k[852]*y_cur[IDX_eM] - - k[853]*y_cur[IDX_eM]; - data[jistart + 20508] = 0.0 - k[854]*y_cur[IDX_eM] - - k[855]*y_cur[IDX_eM]; - data[jistart + 20509] = 0.0 - k[856]*y_cur[IDX_eM] - - k[857]*y_cur[IDX_eM]; - data[jistart + 20510] = 0.0 - k[858]*y_cur[IDX_eM] - - k[859]*y_cur[IDX_eM]; - data[jistart + 20511] = 0.0 - k[860]*y_cur[IDX_eM]; - data[jistart + 20512] = 0.0 - k[861]*y_cur[IDX_eM] - - k[862]*y_cur[IDX_eM]; - data[jistart + 20513] = 0.0 + k[15]*y_cur[IDX_C2M] + - k[21]*y_cur[IDX_C3M] - k[5601]*y_cur[IDX_eM] + k[6043]; - data[jistart + 20514] = 0.0 - k[863]*y_cur[IDX_eM] - - k[864]*y_cur[IDX_eM] - k[865]*y_cur[IDX_eM]; - data[jistart + 20515] = 0.0 + k[34]*y_cur[IDX_C2I] + - k[35]*y_cur[IDX_C3I] + k[49]*y_cur[IDX_CI] + k[99]*y_cur[IDX_HI] + - k[118]*y_cur[IDX_NI] + k[5755] + k[6041]; - data[jistart + 20516] = 0.0 - k[5602]*y_cur[IDX_eM] + k[6048]; - data[jistart + 20517] = 0.0 - k[866]*y_cur[IDX_eM] - - k[867]*y_cur[IDX_eM]; - data[jistart + 20518] = 0.0 + k[50]*y_cur[IDX_CI] + - k[100]*y_cur[IDX_HI] + k[119]*y_cur[IDX_NI] + k[5757] + k[6044]; - data[jistart + 20519] = 0.0 + k[6045]; - data[jistart + 20520] = 0.0 - k[868]*y_cur[IDX_eM] - - k[869]*y_cur[IDX_eM]; - data[jistart + 20521] = 0.0 - k[870]*y_cur[IDX_eM] - - k[871]*y_cur[IDX_eM]; - data[jistart + 20522] = 0.0 - k[872]*y_cur[IDX_eM] - - k[873]*y_cur[IDX_eM]; - data[jistart + 20523] = 0.0 - k[874]*y_cur[IDX_eM] - - k[875]*y_cur[IDX_eM]; - data[jistart + 20524] = 0.0 + k[6050]; - data[jistart + 20525] = 0.0 - k[876]*y_cur[IDX_eM]; - data[jistart + 20526] = 0.0 + k[16]*y_cur[IDX_C2M] - - k[5603]*y_cur[IDX_eM] + k[6053]; - data[jistart + 20527] = 0.0 - k[877]*y_cur[IDX_eM] - - k[878]*y_cur[IDX_eM]; - data[jistart + 20528] = 0.0 + k[36]*y_cur[IDX_C2I] + - k[51]*y_cur[IDX_CI] + k[101]*y_cur[IDX_HI] + k[5761] + k[6051]; - data[jistart + 20529] = 0.0 - k[5604]*y_cur[IDX_eM] + k[6058]; - data[jistart + 20530] = 0.0 - k[879]*y_cur[IDX_eM] - - k[880]*y_cur[IDX_eM]; - data[jistart + 20531] = 0.0 + k[52]*y_cur[IDX_CI] + - k[102]*y_cur[IDX_HI] + k[5763] + k[6054]; - data[jistart + 20532] = 0.0 + k[6055]; - data[jistart + 20533] = 0.0 - k[881]*y_cur[IDX_eM] - - k[882]*y_cur[IDX_eM]; - data[jistart + 20534] = 0.0 - k[883]*y_cur[IDX_eM] - - k[884]*y_cur[IDX_eM]; - data[jistart + 20535] = 0.0 - k[885]*y_cur[IDX_eM] - - k[886]*y_cur[IDX_eM]; - data[jistart + 20536] = 0.0 - k[887]*y_cur[IDX_eM] - - k[888]*y_cur[IDX_eM]; - data[jistart + 20537] = 0.0 - k[5605]*y_cur[IDX_eM] + k[6061]; - data[jistart + 20538] = 0.0 - k[889]*y_cur[IDX_eM] - - k[890]*y_cur[IDX_eM]; - data[jistart + 20539] = 0.0 + k[53]*y_cur[IDX_CI] + - k[103]*y_cur[IDX_HI] + k[120]*y_cur[IDX_NI] + k[5766] + k[6059]; - data[jistart + 20540] = 0.0 - k[5606]*y_cur[IDX_eM] + k[6066]; - data[jistart + 20541] = 0.0 - k[891]*y_cur[IDX_eM] - - k[892]*y_cur[IDX_eM]; - data[jistart + 20542] = 0.0 + k[54]*y_cur[IDX_CI] + - k[104]*y_cur[IDX_HI] + k[121]*y_cur[IDX_NI] + k[5768] + k[6062]; - data[jistart + 20543] = 0.0 + k[6063]; - data[jistart + 20544] = 0.0 - k[893]*y_cur[IDX_eM] - - k[894]*y_cur[IDX_eM]; - data[jistart + 20545] = 0.0 - k[895]*y_cur[IDX_eM] - - k[896]*y_cur[IDX_eM]; - data[jistart + 20546] = 0.0 - k[897]*y_cur[IDX_eM] - - k[898]*y_cur[IDX_eM]; - data[jistart + 20547] = 0.0 - k[899]*y_cur[IDX_eM] - - k[900]*y_cur[IDX_eM]; - data[jistart + 20548] = 0.0 + k[6068]; - data[jistart + 20549] = 0.0 - k[901]*y_cur[IDX_eM]; - data[jistart + 20550] = 0.0 - k[902]*y_cur[IDX_eM] - - k[903]*y_cur[IDX_eM]; - data[jistart + 20551] = 0.0 - k[904]*y_cur[IDX_eM]; - data[jistart + 20552] = 0.0 - k[905]*y_cur[IDX_eM]; - data[jistart + 20553] = 0.0 + k[2]*y_cur[IDX_CM] + - k[62]*y_cur[IDX_OM] + k[63]*y_cur[IDX_OI] + k[64]*y_cur[IDX_OHM] + - k[71]*y_cur[IDX_HM] + k[6132]; - data[jistart + 20554] = 0.0 - k[906]*y_cur[IDX_eM]; - data[jistart + 20555] = 0.0 + k[55]*y_cur[IDX_CI] + - k[105]*y_cur[IDX_HI] + k[5777] + k[6074]; - data[jistart + 20556] = 0.0 + k[1]*y_cur[IDX_CM] + - k[59]*y_cur[IDX_OM] + k[69]*y_cur[IDX_HM] + k[5778] + k[6078]; - data[jistart + 20557] = 0.0 - k[907]*y_cur[IDX_eM] - - k[908]*y_cur[IDX_eM] - k[909]*y_cur[IDX_eM]; - data[jistart + 20558] = 0.0 - k[910]*y_cur[IDX_eM] - - k[911]*y_cur[IDX_eM]; - data[jistart + 20559] = 0.0 + k[5780] + k[6080]; - data[jistart + 20560] = 0.0 + k[6089]; - data[jistart + 20561] = 0.0 - k[912]*y_cur[IDX_eM]; - data[jistart + 20562] = 0.0 - k[913]*y_cur[IDX_eM] - - k[914]*y_cur[IDX_eM] - k[915]*y_cur[IDX_eM]; - data[jistart + 20563] = 0.0 - k[916]*y_cur[IDX_eM] - - k[917]*y_cur[IDX_eM]; - data[jistart + 20564] = 0.0 + k[5789] + k[6091]; - data[jistart + 20565] = 0.0 - k[918]*y_cur[IDX_eM] - - k[919]*y_cur[IDX_eM] - k[920]*y_cur[IDX_eM]; - data[jistart + 20566] = 0.0 - k[921]*y_cur[IDX_eM] - - k[922]*y_cur[IDX_eM]; - data[jistart + 20567] = 0.0 - k[1280]*y_cur[IDX_eM] - - k[1281]*y_cur[IDX_eM] - k[1282]*y_cur[IDX_eM] - - k[1283]*y_cur[IDX_eM]; - data[jistart + 20568] = 0.0 - k[1275]*y_cur[IDX_eM] - - k[1276]*y_cur[IDX_eM] - k[1277]*y_cur[IDX_eM] - - k[1278]*y_cur[IDX_eM] - k[1279]*y_cur[IDX_eM]; - data[jistart + 20569] = 0.0 - k[1272]*y_cur[IDX_eM] - - k[1273]*y_cur[IDX_eM] - k[1274]*y_cur[IDX_eM]; - data[jistart + 20570] = 0.0 + k[60]*y_cur[IDX_CNM] + - k[61]*y_cur[IDX_OHM] + k[70]*y_cur[IDX_HM] + k[5794] + k[6098]; - data[jistart + 20571] = 0.0 - k[923]*y_cur[IDX_eM] - - k[924]*y_cur[IDX_eM] - k[925]*y_cur[IDX_eM] - k[5612]*y_cur[IDX_eM]; - data[jistart + 20572] = 0.0 - k[926]*y_cur[IDX_eM]; - data[jistart + 20573] = 0.0 - k[927]*y_cur[IDX_eM] - - k[928]*y_cur[IDX_eM]; - data[jistart + 20574] = 0.0 - k[929]*y_cur[IDX_eM] - - k[930]*y_cur[IDX_eM]; - data[jistart + 20575] = 0.0 - k[931]*y_cur[IDX_eM] - - k[932]*y_cur[IDX_eM]; - data[jistart + 20576] = 0.0 - k[933]*y_cur[IDX_eM] - - k[934]*y_cur[IDX_eM]; - data[jistart + 20577] = 0.0 + k[5801] + k[6105]; - data[jistart + 20578] = 0.0 + k[5806] + k[6111]; - data[jistart + 20579] = 0.0 - k[937]*y_cur[IDX_eM] - - k[938]*y_cur[IDX_eM]; - data[jistart + 20580] = 0.0 - k[939]*y_cur[IDX_eM] - - k[940]*y_cur[IDX_eM] - k[941]*y_cur[IDX_eM] - k[942]*y_cur[IDX_eM] - - k[943]*y_cur[IDX_eM]; - data[jistart + 20581] = 0.0 + k[5809] + k[6114]; - data[jistart + 20582] = 0.0 - k[944]*y_cur[IDX_eM] - - k[945]*y_cur[IDX_eM]; - data[jistart + 20583] = 0.0 - k[946]*y_cur[IDX_eM] - - k[947]*y_cur[IDX_eM]; - data[jistart + 20584] = 0.0 - k[948]*y_cur[IDX_eM] - - k[949]*y_cur[IDX_eM]; - data[jistart + 20585] = 0.0 + k[5812] + k[6116]; - data[jistart + 20586] = 0.0 - k[950]*y_cur[IDX_eM] - - k[951]*y_cur[IDX_eM]; - data[jistart + 20587] = 0.0 - k[952]*y_cur[IDX_eM] - - k[953]*y_cur[IDX_eM]; - data[jistart + 20588] = 0.0 - k[1284]*y_cur[IDX_eM] - - k[1285]*y_cur[IDX_eM] - k[1286]*y_cur[IDX_eM] - - k[1287]*y_cur[IDX_eM] - k[1288]*y_cur[IDX_eM] - - k[1289]*y_cur[IDX_eM]; - data[jistart + 20589] = 0.0 - k[1290]*y_cur[IDX_eM] - - k[1291]*y_cur[IDX_eM] - k[1292]*y_cur[IDX_eM] - - k[1293]*y_cur[IDX_eM] - k[1294]*y_cur[IDX_eM] - - k[1295]*y_cur[IDX_eM] - k[1296]*y_cur[IDX_eM]; - data[jistart + 20590] = 0.0 - k[954]*y_cur[IDX_eM]; - data[jistart + 20591] = 0.0 - k[970]*y_cur[IDX_eM] - - k[971]*y_cur[IDX_eM]; - data[jistart + 20592] = 0.0 + k[5814] + k[6118]; - data[jistart + 20593] = 0.0 - k[955]*y_cur[IDX_eM] - - k[956]*y_cur[IDX_eM]; - data[jistart + 20594] = 0.0 - k[957]*y_cur[IDX_eM] - - k[958]*y_cur[IDX_eM] - k[959]*y_cur[IDX_eM]; - data[jistart + 20595] = 0.0 + k[5816] + k[6120] + k[6123]; - data[jistart + 20596] = 0.0 - k[960]*y_cur[IDX_eM] - - k[961]*y_cur[IDX_eM] - k[962]*y_cur[IDX_eM]; - data[jistart + 20597] = 0.0 - k[963]*y_cur[IDX_eM] - - k[964]*y_cur[IDX_eM] - k[965]*y_cur[IDX_eM] - k[966]*y_cur[IDX_eM] - - k[967]*y_cur[IDX_eM]; - data[jistart + 20598] = 0.0 + k[6129]; - data[jistart + 20599] = 0.0 - k[968]*y_cur[IDX_eM] - - k[969]*y_cur[IDX_eM]; - data[jistart + 20600] = 0.0 - k[972]*y_cur[IDX_eM] - - k[973]*y_cur[IDX_eM] - k[974]*y_cur[IDX_eM] - k[975]*y_cur[IDX_eM] - - k[976]*y_cur[IDX_eM]; - data[jistart + 20601] = 0.0 + k[72]*y_cur[IDX_HM]; - data[jistart + 20602] = 0.0 - k[977]*y_cur[IDX_eM]; - data[jistart + 20603] = 0.0 + k[60]*y_cur[IDX_CH3I] + - k[106]*y_cur[IDX_HI] + k[5822] + k[6133]; - data[jistart + 20604] = 0.0 - k[978]*y_cur[IDX_eM] - - k[979]*y_cur[IDX_eM]; - data[jistart + 20605] = 0.0 + k[65]*y_cur[IDX_SM] + - k[73]*y_cur[IDX_HM] + k[124]*y_cur[IDX_OM] + k[5676]; - data[jistart + 20606] = 0.0 - k[980]*y_cur[IDX_eM]; - data[jistart + 20607] = 0.0 + k[3]*y_cur[IDX_CM]; - data[jistart + 20608] = 0.0 - k[981]*y_cur[IDX_eM]; - data[jistart + 20609] = 0.0 - k[1270]*y_cur[IDX_eM] - - k[1271]*y_cur[IDX_eM]; - data[jistart + 20610] = 0.0 - k[984]*y_cur[IDX_eM]; - data[jistart + 20611] = 0.0 + k[5828] + k[6141]; - data[jistart + 20612] = 0.0 - k[985]*y_cur[IDX_eM]; - data[jistart + 20613] = 0.0 + k[5677] + k[5830] + k[6143] + k[6307]; - data[jistart + 20614] = 0.0 - k[5613]*y_cur[IDX_eM]; - data[jistart + 20615] = 0.0 - k[986]*y_cur[IDX_eM]; - data[jistart + 20616] = 0.0 + k[5832] + k[6145] + k[6304]; - data[jistart + 20617] = 0.0 - k[5614]*y_cur[IDX_eM]; - data[jistart + 20618] = 0.0 - k[8763]*y_cur[IDX_eM]; - data[jistart + 20619] = 0.0 + k[74]*y_cur[IDX_HM] + - k[75]*y_cur[IDX_HM] + k[84]*y_cur[IDX_CM] + k[85]*y_cur[IDX_C10M] + - k[86]*y_cur[IDX_C10HM] + k[87]*y_cur[IDX_C2M] + - k[88]*y_cur[IDX_C2HM] + k[89]*y_cur[IDX_C3M] + k[90]*y_cur[IDX_C3HM] - + k[91]*y_cur[IDX_C3NM] + k[92]*y_cur[IDX_C4M] + - k[93]*y_cur[IDX_C4HM] + k[94]*y_cur[IDX_C5M] + k[95]*y_cur[IDX_C5HM] - + k[96]*y_cur[IDX_C5NM] + k[97]*y_cur[IDX_C6M] + - k[98]*y_cur[IDX_C6HM] + k[99]*y_cur[IDX_C7M] + - k[100]*y_cur[IDX_C7HM] + k[101]*y_cur[IDX_C8M] + - k[102]*y_cur[IDX_C8HM] + k[103]*y_cur[IDX_C9M] + - k[104]*y_cur[IDX_C9HM] + k[105]*y_cur[IDX_CHM] + - k[106]*y_cur[IDX_CNM] + k[107]*y_cur[IDX_OM] + k[108]*y_cur[IDX_OHM] - + k[109]*y_cur[IDX_SM] - k[5608]*y_cur[IDX_eM] + k[5682] + k[5844]; - data[jistart + 20620] = 0.0 - k[5615]*y_cur[IDX_eM]; - data[jistart + 20621] = 0.0 + k[66]*y_cur[IDX_C2I] + - k[67]*y_cur[IDX_C2HI] + k[68]*y_cur[IDX_CI] + k[69]*y_cur[IDX_CH2I] - + k[70]*y_cur[IDX_CH3I] + k[71]*y_cur[IDX_CHI] + - k[72]*y_cur[IDX_CNI] + k[73]*y_cur[IDX_COI] + k[74]*y_cur[IDX_HI] + - k[75]*y_cur[IDX_HI] + k[76]*y_cur[IDX_HCOI] + k[77]*y_cur[IDX_NI] + - k[78]*y_cur[IDX_NH2I] + k[79]*y_cur[IDX_NHI] + k[80]*y_cur[IDX_OI] + - k[81]*y_cur[IDX_OHI] + k[5833] + k[6146]; - data[jistart + 20622] = 0.0 + k[82]*y_cur[IDX_CM] + - k[83]*y_cur[IDX_OM] - k[140]*y_cur[IDX_eM] + k[140]*y_cur[IDX_eM] + - k[5679] + k[5680]; - data[jistart + 20623] = 0.0 - k[987]*y_cur[IDX_eM]; - data[jistart + 20624] = 0.0 - k[988]*y_cur[IDX_eM]; - data[jistart + 20625] = 0.0 - k[989]*y_cur[IDX_eM] - - k[990]*y_cur[IDX_eM]; - data[jistart + 20626] = 0.0 - k[991]*y_cur[IDX_eM] - - k[992]*y_cur[IDX_eM]; - data[jistart + 20627] = 0.0 - k[993]*y_cur[IDX_eM]; - data[jistart + 20628] = 0.0 - k[994]*y_cur[IDX_eM] - - k[995]*y_cur[IDX_eM]; - data[jistart + 20629] = 0.0 + k[6154] + k[6155]; - data[jistart + 20630] = 0.0 - k[996]*y_cur[IDX_eM] - - k[997]*y_cur[IDX_eM] - k[998]*y_cur[IDX_eM] - k[999]*y_cur[IDX_eM] - - k[5616]*y_cur[IDX_eM]; - data[jistart + 20631] = 0.0 - k[1000]*y_cur[IDX_eM] - - k[1001]*y_cur[IDX_eM] - k[5617]*y_cur[IDX_eM]; - data[jistart + 20632] = 0.0 - k[1002]*y_cur[IDX_eM] - - k[1003]*y_cur[IDX_eM]; - data[jistart + 20633] = 0.0 - k[1004]*y_cur[IDX_eM] - - k[1005]*y_cur[IDX_eM]; - data[jistart + 20634] = 0.0 - k[1006]*y_cur[IDX_eM] - - k[1007]*y_cur[IDX_eM]; - data[jistart + 20635] = 0.0 - k[1008]*y_cur[IDX_eM] - - k[1009]*y_cur[IDX_eM]; - data[jistart + 20636] = 0.0 - k[1010]*y_cur[IDX_eM] - - k[1011]*y_cur[IDX_eM]; - data[jistart + 20637] = 0.0 + k[4]*y_cur[IDX_CM] + k[6159]; - data[jistart + 20638] = 0.0 - k[1012]*y_cur[IDX_eM] - - k[1013]*y_cur[IDX_eM] - k[1014]*y_cur[IDX_eM]; - data[jistart + 20639] = 0.0 - k[1015]*y_cur[IDX_eM] - - k[1016]*y_cur[IDX_eM]; - data[jistart + 20640] = 0.0 - k[1017]*y_cur[IDX_eM] - - k[1018]*y_cur[IDX_eM]; - data[jistart + 20641] = 0.0 + k[5841] + k[6163]; - data[jistart + 20642] = 0.0 - k[1019]*y_cur[IDX_eM] - - k[1020]*y_cur[IDX_eM] - k[5618]*y_cur[IDX_eM]; - data[jistart + 20643] = 0.0 - k[1021]*y_cur[IDX_eM] - - k[1022]*y_cur[IDX_eM]; - data[jistart + 20644] = 0.0 - k[1023]*y_cur[IDX_eM] - - k[1024]*y_cur[IDX_eM]; - data[jistart + 20645] = 0.0 - k[1025]*y_cur[IDX_eM] - - k[1026]*y_cur[IDX_eM]; - data[jistart + 20646] = 0.0 - k[1027]*y_cur[IDX_eM]; - data[jistart + 20647] = 0.0 - k[1028]*y_cur[IDX_eM] - - k[1029]*y_cur[IDX_eM]; - data[jistart + 20648] = 0.0 - k[1030]*y_cur[IDX_eM] - - k[1031]*y_cur[IDX_eM]; - data[jistart + 20649] = 0.0 - k[1032]*y_cur[IDX_eM] - - k[1033]*y_cur[IDX_eM]; - data[jistart + 20650] = 0.0 - k[1034]*y_cur[IDX_eM] - - k[1035]*y_cur[IDX_eM] - k[1036]*y_cur[IDX_eM] - - k[1037]*y_cur[IDX_eM] - k[1038]*y_cur[IDX_eM]; - data[jistart + 20651] = 0.0 - k[1039]*y_cur[IDX_eM] - - k[1040]*y_cur[IDX_eM]; - data[jistart + 20652] = 0.0 - k[1041]*y_cur[IDX_eM] - - k[1042]*y_cur[IDX_eM] - k[1043]*y_cur[IDX_eM] - - k[1044]*y_cur[IDX_eM]; - data[jistart + 20653] = 0.0 - k[1045]*y_cur[IDX_eM] - - k[1046]*y_cur[IDX_eM] - k[1047]*y_cur[IDX_eM] - - k[1048]*y_cur[IDX_eM]; - data[jistart + 20654] = 0.0 - k[1049]*y_cur[IDX_eM] - - k[1050]*y_cur[IDX_eM]; - data[jistart + 20655] = 0.0 - k[1051]*y_cur[IDX_eM] - - k[1052]*y_cur[IDX_eM]; - data[jistart + 20656] = 0.0 - k[1053]*y_cur[IDX_eM] - - k[1054]*y_cur[IDX_eM]; - data[jistart + 20657] = 0.0 - k[1055]*y_cur[IDX_eM] - - k[1056]*y_cur[IDX_eM] - k[1057]*y_cur[IDX_eM] - - k[1058]*y_cur[IDX_eM]; - data[jistart + 20658] = 0.0 - k[1059]*y_cur[IDX_eM] - - k[1060]*y_cur[IDX_eM]; - data[jistart + 20659] = 0.0 - k[1061]*y_cur[IDX_eM] - - k[1062]*y_cur[IDX_eM]; - data[jistart + 20660] = 0.0 - k[1063]*y_cur[IDX_eM] - - k[1064]*y_cur[IDX_eM] - k[1065]*y_cur[IDX_eM]; - data[jistart + 20661] = 0.0 - k[1066]*y_cur[IDX_eM] - - k[1067]*y_cur[IDX_eM] - k[1068]*y_cur[IDX_eM] - - k[1069]*y_cur[IDX_eM]; - data[jistart + 20662] = 0.0 - k[1070]*y_cur[IDX_eM]; - data[jistart + 20663] = 0.0 - k[1071]*y_cur[IDX_eM] - - k[1072]*y_cur[IDX_eM]; - data[jistart + 20664] = 0.0 - k[1073]*y_cur[IDX_eM]; - data[jistart + 20665] = 0.0 - k[1074]*y_cur[IDX_eM] - - k[1075]*y_cur[IDX_eM] - k[1076]*y_cur[IDX_eM]; - data[jistart + 20666] = 0.0 - k[1077]*y_cur[IDX_eM] - - k[1078]*y_cur[IDX_eM]; - data[jistart + 20667] = 0.0 - k[1079]*y_cur[IDX_eM] - - k[1080]*y_cur[IDX_eM] - k[1081]*y_cur[IDX_eM] - - k[1082]*y_cur[IDX_eM] - k[1083]*y_cur[IDX_eM]; - data[jistart + 20668] = 0.0 + k[6178]; - data[jistart + 20669] = 0.0 - k[1084]*y_cur[IDX_eM] - - k[1085]*y_cur[IDX_eM]; - data[jistart + 20670] = 0.0 + k[6180]; - data[jistart + 20671] = 0.0 - k[1086]*y_cur[IDX_eM] - - k[1087]*y_cur[IDX_eM]; - data[jistart + 20672] = 0.0 - k[1088]*y_cur[IDX_eM]; - data[jistart + 20673] = 0.0 - k[1089]*y_cur[IDX_eM] - - k[1090]*y_cur[IDX_eM] - k[1091]*y_cur[IDX_eM]; - data[jistart + 20674] = 0.0 - k[1092]*y_cur[IDX_eM] - - k[1093]*y_cur[IDX_eM]; - data[jistart + 20675] = 0.0 - k[1094]*y_cur[IDX_eM] - - k[1095]*y_cur[IDX_eM] - k[1096]*y_cur[IDX_eM]; - data[jistart + 20676] = 0.0 + k[76]*y_cur[IDX_HM] + k[5857] + - k[6185]; - data[jistart + 20677] = 0.0 - k[1097]*y_cur[IDX_eM]; - data[jistart + 20678] = 0.0 - k[1098]*y_cur[IDX_eM] - - k[1099]*y_cur[IDX_eM] - k[1100]*y_cur[IDX_eM]; - data[jistart + 20679] = 0.0 + k[5859]; - data[jistart + 20680] = 0.0 - k[982]*y_cur[IDX_eM] - - k[983]*y_cur[IDX_eM]; - data[jistart + 20681] = 0.0 + k[6188]; - data[jistart + 20682] = 0.0 - k[1101]*y_cur[IDX_eM] - - k[1102]*y_cur[IDX_eM]; - data[jistart + 20683] = 0.0 - k[1103]*y_cur[IDX_eM] - - k[1104]*y_cur[IDX_eM]; - data[jistart + 20684] = 0.0 - k[1105]*y_cur[IDX_eM] - - k[1106]*y_cur[IDX_eM]; - data[jistart + 20685] = 0.0 + k[5862] + k[6191]; - data[jistart + 20686] = 0.0 - k[1107]*y_cur[IDX_eM] - - k[1108]*y_cur[IDX_eM]; - data[jistart + 20687] = 0.0 + k[6192]; - data[jistart + 20688] = 0.0 - k[1109]*y_cur[IDX_eM] - - k[1110]*y_cur[IDX_eM]; - data[jistart + 20689] = 0.0 + k[6195]; - data[jistart + 20690] = 0.0 - k[1111]*y_cur[IDX_eM]; - data[jistart + 20691] = 0.0 - k[1112]*y_cur[IDX_eM]; - data[jistart + 20692] = 0.0 - k[1113]*y_cur[IDX_eM] - - k[1114]*y_cur[IDX_eM]; - data[jistart + 20693] = 0.0 - k[1115]*y_cur[IDX_eM]; - data[jistart + 20694] = 0.0 - k[1116]*y_cur[IDX_eM] - - k[1117]*y_cur[IDX_eM]; - data[jistart + 20695] = 0.0 - k[1118]*y_cur[IDX_eM] - - k[1119]*y_cur[IDX_eM] - k[1120]*y_cur[IDX_eM]; - data[jistart + 20696] = 0.0 - k[1121]*y_cur[IDX_eM]; - data[jistart + 20697] = 0.0 - k[1122]*y_cur[IDX_eM]; - data[jistart + 20698] = 0.0 - k[1123]*y_cur[IDX_eM] - - k[1124]*y_cur[IDX_eM]; - data[jistart + 20699] = 0.0 - k[1125]*y_cur[IDX_eM]; - data[jistart + 20700] = 0.0 - k[1126]*y_cur[IDX_eM] - - k[1127]*y_cur[IDX_eM]; - data[jistart + 20701] = 0.0 - k[1128]*y_cur[IDX_eM] - - k[1129]*y_cur[IDX_eM]; - data[jistart + 20702] = 0.0 - k[1130]*y_cur[IDX_eM] - - k[1131]*y_cur[IDX_eM]; - data[jistart + 20703] = 0.0 - k[1132]*y_cur[IDX_eM] - - k[1133]*y_cur[IDX_eM] - k[1134]*y_cur[IDX_eM]; - data[jistart + 20704] = 0.0 - k[1135]*y_cur[IDX_eM] - - k[1136]*y_cur[IDX_eM] - k[1137]*y_cur[IDX_eM]; - data[jistart + 20705] = 0.0 - k[1138]*y_cur[IDX_eM]; - data[jistart + 20706] = 0.0 + k[6207]; - data[jistart + 20707] = 0.0 - k[1139]*y_cur[IDX_eM] - - k[1140]*y_cur[IDX_eM]; - data[jistart + 20708] = 0.0 - k[1141]*y_cur[IDX_eM]; - data[jistart + 20709] = 0.0 - k[1142]*y_cur[IDX_eM] - - k[1143]*y_cur[IDX_eM] - k[1144]*y_cur[IDX_eM]; - data[jistart + 20710] = 0.0 - k[1145]*y_cur[IDX_eM] - - k[1146]*y_cur[IDX_eM]; - data[jistart + 20711] = 0.0 - k[1147]*y_cur[IDX_eM] - - k[1148]*y_cur[IDX_eM]; - data[jistart + 20712] = 0.0 + k[5683] + k[5876] + k[6298]; - data[jistart + 20713] = 0.0 - k[5619]*y_cur[IDX_eM]; - data[jistart + 20714] = 0.0 - k[1149]*y_cur[IDX_eM]; - data[jistart + 20715] = 0.0 + k[5877] + k[6210] + k[6306]; - data[jistart + 20716] = 0.0 - k[5620]*y_cur[IDX_eM]; - data[jistart + 20717] = 0.0 + k[5]*y_cur[IDX_CM] + - k[77]*y_cur[IDX_HM] + k[110]*y_cur[IDX_C2M] + k[111]*y_cur[IDX_C2HM] - + k[112]*y_cur[IDX_C3M] + k[113]*y_cur[IDX_C3HM] + - k[114]*y_cur[IDX_C4M] + k[115]*y_cur[IDX_C4HM] + - k[116]*y_cur[IDX_C5M] + k[117]*y_cur[IDX_C5HM] + - k[118]*y_cur[IDX_C7M] + k[119]*y_cur[IDX_C7HM] + - k[120]*y_cur[IDX_C9M] + k[121]*y_cur[IDX_C9HM] + - k[122]*y_cur[IDX_OM] + k[123]*y_cur[IDX_SM] + k[5684] + k[5880] + - k[6300]; - data[jistart + 20718] = 0.0 - k[5621]*y_cur[IDX_eM]; - data[jistart + 20719] = 0.0 - k[1150]*y_cur[IDX_eM]; - data[jistart + 20720] = 0.0 - k[1151]*y_cur[IDX_eM] - - k[1152]*y_cur[IDX_eM] - k[1153]*y_cur[IDX_eM] - - k[1154]*y_cur[IDX_eM]; - data[jistart + 20721] = 0.0 + k[6213]; - data[jistart + 20722] = 0.0 - k[1170]*y_cur[IDX_eM] - - k[1171]*y_cur[IDX_eM] - k[1172]*y_cur[IDX_eM]; - data[jistart + 20723] = 0.0 + k[6215]; - data[jistart + 20724] = 0.0 - k[1155]*y_cur[IDX_eM]; - data[jistart + 20725] = 0.0 - k[1156]*y_cur[IDX_eM] - - k[1157]*y_cur[IDX_eM]; - data[jistart + 20726] = 0.0 + k[6]*y_cur[IDX_CM] + - k[79]*y_cur[IDX_HM] + k[5889] + k[6225]; - data[jistart + 20727] = 0.0 - k[1158]*y_cur[IDX_eM]; - data[jistart + 20728] = 0.0 + k[78]*y_cur[IDX_HM] + k[5882] + - k[6218]; - data[jistart + 20729] = 0.0 - k[1159]*y_cur[IDX_eM] - - k[1160]*y_cur[IDX_eM]; - data[jistart + 20730] = 0.0 - k[1161]*y_cur[IDX_eM] - - k[1162]*y_cur[IDX_eM]; - data[jistart + 20731] = 0.0 + k[5886] + k[6222]; - data[jistart + 20732] = 0.0 - k[1163]*y_cur[IDX_eM] - - k[1164]*y_cur[IDX_eM]; - data[jistart + 20733] = 0.0 - k[1165]*y_cur[IDX_eM] - - k[1166]*y_cur[IDX_eM] - k[1167]*y_cur[IDX_eM]; - data[jistart + 20734] = 0.0 + k[125]*y_cur[IDX_OM] + k[5891] + - k[6228]; - data[jistart + 20735] = 0.0 - k[1168]*y_cur[IDX_eM]; - data[jistart + 20736] = 0.0 + k[6226]; - data[jistart + 20737] = 0.0 - k[1169]*y_cur[IDX_eM]; - data[jistart + 20738] = 0.0 - k[1173]*y_cur[IDX_eM]; - data[jistart + 20739] = 0.0 + k[5894] + k[6231] + k[6305]; - data[jistart + 20740] = 0.0 - k[5622]*y_cur[IDX_eM]; - data[jistart + 20741] = 0.0 + k[8]*y_cur[IDX_CM] + - k[63]*y_cur[IDX_CHI] + k[80]*y_cur[IDX_HM] + k[126]*y_cur[IDX_OM] + - k[128]*y_cur[IDX_C2M] + k[129]*y_cur[IDX_C2HM] + - k[130]*y_cur[IDX_C3NM] + k[131]*y_cur[IDX_C5NM] + - k[132]*y_cur[IDX_SM] - k[5609]*y_cur[IDX_eM] + k[5685] + k[5900] + - k[6301]; - data[jistart + 20742] = 0.0 - k[5623]*y_cur[IDX_eM]; - data[jistart + 20743] = 0.0 + k[56]*y_cur[IDX_CI] + - k[59]*y_cur[IDX_CH2I] + k[62]*y_cur[IDX_CHI] + k[83]*y_cur[IDX_H2I] - + k[107]*y_cur[IDX_HI] + k[122]*y_cur[IDX_NI] + - k[124]*y_cur[IDX_COI] + k[125]*y_cur[IDX_NOI] + k[126]*y_cur[IDX_OI] - + k[5895] + k[6232]; - data[jistart + 20744] = 0.0 + k[7]*y_cur[IDX_CM] + - k[127]*y_cur[IDX_SM] + k[146]*y_cur[IDX_O2M] + k[5897] + k[6235]; - data[jistart + 20745] = 0.0 - k[1174]*y_cur[IDX_eM]; - data[jistart + 20746] = 0.0 + k[146]*y_cur[IDX_O2I] + k[5896] + - k[6234]; - data[jistart + 20747] = 0.0 - k[1175]*y_cur[IDX_eM]; - data[jistart + 20748] = 0.0 - k[1176]*y_cur[IDX_eM]; - data[jistart + 20749] = 0.0 + k[5902] + k[6240]; - data[jistart + 20750] = 0.0 - k[1177]*y_cur[IDX_eM] - - k[1178]*y_cur[IDX_eM] - k[1179]*y_cur[IDX_eM]; - data[jistart + 20751] = 0.0 + k[9]*y_cur[IDX_CM] + - k[81]*y_cur[IDX_HM] + k[6245]; - data[jistart + 20752] = 0.0 - k[1180]*y_cur[IDX_eM]; - data[jistart + 20753] = 0.0 + k[57]*y_cur[IDX_CI] + - k[61]*y_cur[IDX_CH3I] + k[64]*y_cur[IDX_CHI] + k[108]*y_cur[IDX_HI] - + k[5904] + k[6243]; - data[jistart + 20754] = 0.0 + k[5906] + k[6246]; - data[jistart + 20755] = 0.0 - k[5624]*y_cur[IDX_eM]; - data[jistart + 20756] = 0.0 - k[1181]*y_cur[IDX_eM] - - k[1182]*y_cur[IDX_eM] - k[1183]*y_cur[IDX_eM]; - data[jistart + 20757] = 0.0 - k[1184]*y_cur[IDX_eM] - - k[1185]*y_cur[IDX_eM] - k[1186]*y_cur[IDX_eM]; - data[jistart + 20758] = 0.0 - k[1187]*y_cur[IDX_eM] - - k[1188]*y_cur[IDX_eM] - k[1189]*y_cur[IDX_eM]; - data[jistart + 20759] = 0.0 - k[1190]*y_cur[IDX_eM] - - k[1191]*y_cur[IDX_eM] - k[1192]*y_cur[IDX_eM]; - data[jistart + 20760] = 0.0 - k[1193]*y_cur[IDX_eM] - - k[1194]*y_cur[IDX_eM] - k[1195]*y_cur[IDX_eM] - - k[1196]*y_cur[IDX_eM]; - data[jistart + 20761] = 0.0 - k[1197]*y_cur[IDX_eM] - - k[1198]*y_cur[IDX_eM]; - data[jistart + 20762] = 0.0 - k[1199]*y_cur[IDX_eM] - - k[1200]*y_cur[IDX_eM] - k[1201]*y_cur[IDX_eM]; - data[jistart + 20763] = 0.0 - k[1202]*y_cur[IDX_eM] - - k[1203]*y_cur[IDX_eM] - k[1204]*y_cur[IDX_eM]; - data[jistart + 20764] = 0.0 - k[1205]*y_cur[IDX_eM]; - data[jistart + 20765] = 0.0 + k[6247]; - data[jistart + 20766] = 0.0 - k[1206]*y_cur[IDX_eM] - - k[1207]*y_cur[IDX_eM] - k[1208]*y_cur[IDX_eM]; - data[jistart + 20767] = 0.0 - k[1209]*y_cur[IDX_eM] - - k[1210]*y_cur[IDX_eM]; - data[jistart + 20768] = 0.0 - k[1211]*y_cur[IDX_eM]; - data[jistart + 20769] = 0.0 - k[1212]*y_cur[IDX_eM] - - k[1213]*y_cur[IDX_eM] - k[1214]*y_cur[IDX_eM]; - data[jistart + 20770] = 0.0 - k[1215]*y_cur[IDX_eM] - - k[1216]*y_cur[IDX_eM] - k[1217]*y_cur[IDX_eM]; - data[jistart + 20771] = 0.0 - k[1218]*y_cur[IDX_eM]; - data[jistart + 20772] = 0.0 - k[5610]*y_cur[IDX_eM] + k[5913] + - k[6255] + k[6303]; - data[jistart + 20773] = 0.0 - k[5625]*y_cur[IDX_eM]; - data[jistart + 20774] = 0.0 + k[58]*y_cur[IDX_CI] + - k[65]*y_cur[IDX_COI] + k[109]*y_cur[IDX_HI] + k[123]*y_cur[IDX_NI] + - k[127]*y_cur[IDX_O2I] + k[132]*y_cur[IDX_OI] + k[5911] + k[6252]; - data[jistart + 20775] = 0.0 + k[6253]; - data[jistart + 20776] = 0.0 - k[1219]*y_cur[IDX_eM]; - data[jistart + 20777] = 0.0 + k[5916] + k[6258]; - data[jistart + 20778] = 0.0 - k[1220]*y_cur[IDX_eM]; - data[jistart + 20779] = 0.0 - k[1221]*y_cur[IDX_eM] - - k[1222]*y_cur[IDX_eM]; - data[jistart + 20780] = 0.0 + k[5917] + k[6259] + k[6302]; - data[jistart + 20781] = 0.0 - k[5626]*y_cur[IDX_eM]; - data[jistart + 20782] = 0.0 - k[1223]*y_cur[IDX_eM]; - data[jistart + 20783] = 0.0 - k[1224]*y_cur[IDX_eM] - - k[1225]*y_cur[IDX_eM]; - data[jistart + 20784] = 0.0 - k[1226]*y_cur[IDX_eM] - - k[1227]*y_cur[IDX_eM]; - data[jistart + 20785] = 0.0 - k[1228]*y_cur[IDX_eM] - - k[1229]*y_cur[IDX_eM]; - data[jistart + 20786] = 0.0 - k[1230]*y_cur[IDX_eM] - - k[1231]*y_cur[IDX_eM]; - data[jistart + 20787] = 0.0 - k[1232]*y_cur[IDX_eM] - - k[1233]*y_cur[IDX_eM]; - data[jistart + 20788] = 0.0 - k[1234]*y_cur[IDX_eM] - - k[1235]*y_cur[IDX_eM]; - data[jistart + 20789] = 0.0 - k[1236]*y_cur[IDX_eM] - - k[1237]*y_cur[IDX_eM]; - data[jistart + 20790] = 0.0 - k[1238]*y_cur[IDX_eM] - - k[1239]*y_cur[IDX_eM]; - data[jistart + 20791] = 0.0 - k[1240]*y_cur[IDX_eM] - - k[1241]*y_cur[IDX_eM]; - data[jistart + 20792] = 0.0 + k[6269]; - data[jistart + 20793] = 0.0 - k[1242]*y_cur[IDX_eM] - - k[1243]*y_cur[IDX_eM] - k[1244]*y_cur[IDX_eM]; - data[jistart + 20794] = 0.0 - k[1245]*y_cur[IDX_eM] - - k[1246]*y_cur[IDX_eM]; - data[jistart + 20795] = 0.0 - k[1247]*y_cur[IDX_eM] - - k[1248]*y_cur[IDX_eM]; - data[jistart + 20796] = 0.0 - k[1249]*y_cur[IDX_eM]; - data[jistart + 20797] = 0.0 - k[1250]*y_cur[IDX_eM]; - data[jistart + 20798] = 0.0 + k[6272]; - data[jistart + 20799] = 0.0 - k[1251]*y_cur[IDX_eM] - - k[1252]*y_cur[IDX_eM] - k[1253]*y_cur[IDX_eM]; - data[jistart + 20800] = 0.0 + k[6275]; - data[jistart + 20801] = 0.0 - k[1254]*y_cur[IDX_eM] - - k[1255]*y_cur[IDX_eM]; - data[jistart + 20802] = 0.0 - k[1256]*y_cur[IDX_eM] - - k[1257]*y_cur[IDX_eM]; - data[jistart + 20803] = 0.0 - k[1258]*y_cur[IDX_eM] - - k[1259]*y_cur[IDX_eM]; - data[jistart + 20804] = 0.0 - k[1260]*y_cur[IDX_eM]; - data[jistart + 20805] = 0.0 - k[1261]*y_cur[IDX_eM]; - data[jistart + 20806] = 0.0 - k[1262]*y_cur[IDX_eM] - - k[1263]*y_cur[IDX_eM]; - data[jistart + 20807] = 0.0 - k[1264]*y_cur[IDX_eM] - - k[1265]*y_cur[IDX_eM]; - data[jistart + 20808] = 0.0 + k[6287]; - data[jistart + 20809] = 0.0 - k[1266]*y_cur[IDX_eM]; - data[jistart + 20810] = 0.0 - k[1267]*y_cur[IDX_eM] - - k[1268]*y_cur[IDX_eM]; - data[jistart + 20811] = 0.0 - k[1269]*y_cur[IDX_eM]; - data[jistart + 20812] = 0.0 - k[140]*y_cur[IDX_H2I] + - k[140]*y_cur[IDX_H2I] - k[727]*y_cur[IDX_C10II] - - k[728]*y_cur[IDX_C10II] - k[729]*y_cur[IDX_C10HII] - - k[730]*y_cur[IDX_C10HII] - k[731]*y_cur[IDX_C10HII] - - k[732]*y_cur[IDX_C10H2II] - k[733]*y_cur[IDX_C10H3II] - - k[734]*y_cur[IDX_C10H3II] - k[735]*y_cur[IDX_C11II] - - k[736]*y_cur[IDX_C11II] - k[737]*y_cur[IDX_C11II] - - k[738]*y_cur[IDX_C11II] - k[739]*y_cur[IDX_C2II] - - k[740]*y_cur[IDX_C2HII] - k[741]*y_cur[IDX_C2HII] - - k[742]*y_cur[IDX_C2H2II] - k[743]*y_cur[IDX_C2H2II] - - k[744]*y_cur[IDX_C2H2II] - k[745]*y_cur[IDX_C2H3II] - - k[746]*y_cur[IDX_C2H3II] - k[747]*y_cur[IDX_C2H3II] - - k[748]*y_cur[IDX_C2H3II] - k[749]*y_cur[IDX_C2H3II] - - k[750]*y_cur[IDX_C2H3II] - k[751]*y_cur[IDX_C2H3II] - - k[752]*y_cur[IDX_C2H3II] - k[753]*y_cur[IDX_C2H3II] - - k[754]*y_cur[IDX_C2H3II] - k[755]*y_cur[IDX_C2H3II] - - k[756]*y_cur[IDX_C2H3II] - k[757]*y_cur[IDX_C2H4II] - - k[758]*y_cur[IDX_C2H4II] - k[759]*y_cur[IDX_C2H4II] - - k[760]*y_cur[IDX_C2H4II] - k[761]*y_cur[IDX_C2H4II] - - k[762]*y_cur[IDX_C2H4II] - k[763]*y_cur[IDX_C2H4II] - - k[764]*y_cur[IDX_C2H5II] - k[765]*y_cur[IDX_C2H5II] - - k[766]*y_cur[IDX_C2H5II] - k[767]*y_cur[IDX_C2H5II] - - k[768]*y_cur[IDX_C2H5II] - k[769]*y_cur[IDX_C2H5CNHII] - - k[770]*y_cur[IDX_C2H5CNHII] - k[771]*y_cur[IDX_C2H5CNHII] - - k[772]*y_cur[IDX_C2H5OHII] - k[773]*y_cur[IDX_C2H5OHII] - - k[774]*y_cur[IDX_C2H5OH2II] - k[775]*y_cur[IDX_C2H5OH2II] - - k[776]*y_cur[IDX_C2H5OH2II] - k[777]*y_cur[IDX_C2H5OH2II] - - k[778]*y_cur[IDX_C2H7II] - k[779]*y_cur[IDX_C2H7II] - - k[780]*y_cur[IDX_C2NII] - k[781]*y_cur[IDX_C2NII] - - k[782]*y_cur[IDX_C2N2II] - k[783]*y_cur[IDX_C2N2II] - - k[784]*y_cur[IDX_C2NHII] - k[785]*y_cur[IDX_C2OII] - - k[786]*y_cur[IDX_C2SII] - k[787]*y_cur[IDX_C2SII] - - k[788]*y_cur[IDX_C3II] - k[789]*y_cur[IDX_C3HII] - - k[790]*y_cur[IDX_C3HII] - k[791]*y_cur[IDX_C3H2II] - - k[792]*y_cur[IDX_C3H2II] - k[793]*y_cur[IDX_C3H2II] - - k[794]*y_cur[IDX_C3H2II] - k[795]*y_cur[IDX_C3H2II] - - k[796]*y_cur[IDX_C3H2OII] - k[797]*y_cur[IDX_C3H2OII] - - k[798]*y_cur[IDX_C3H3II] - k[799]*y_cur[IDX_C3H4II] - - k[800]*y_cur[IDX_C3H4II] - k[801]*y_cur[IDX_C3H4II] - - k[802]*y_cur[IDX_C3H4II] - k[803]*y_cur[IDX_C3H5II] - - k[804]*y_cur[IDX_C3H5II] - k[805]*y_cur[IDX_C3H6II] - - k[806]*y_cur[IDX_C3H6II] - k[807]*y_cur[IDX_C3H7II] - - k[808]*y_cur[IDX_C3H7II] - k[809]*y_cur[IDX_C3H7II] - - k[810]*y_cur[IDX_C3H7II] - k[811]*y_cur[IDX_C3H7II] - - k[812]*y_cur[IDX_C3H7II] - k[813]*y_cur[IDX_C3H7II] - - k[814]*y_cur[IDX_C3NII] - k[815]*y_cur[IDX_C3OII] - - k[816]*y_cur[IDX_C3SII] - k[817]*y_cur[IDX_C3SII] - - k[818]*y_cur[IDX_C3SII] - k[819]*y_cur[IDX_C4II] - - k[820]*y_cur[IDX_C4II] - k[821]*y_cur[IDX_C4HII] - - k[822]*y_cur[IDX_C4H2II] - k[823]*y_cur[IDX_C4H2II] - - k[824]*y_cur[IDX_C4H3II] - k[825]*y_cur[IDX_C4H3II] - - k[826]*y_cur[IDX_C4H4II] - k[827]*y_cur[IDX_C4H5II] - - k[828]*y_cur[IDX_C4H5II] - k[829]*y_cur[IDX_C4H5II] - - k[830]*y_cur[IDX_C4H7II] - k[831]*y_cur[IDX_C4NII] - - k[832]*y_cur[IDX_C4NII] - k[833]*y_cur[IDX_C4PII] - - k[834]*y_cur[IDX_C4PII] - k[835]*y_cur[IDX_C4SII] - - k[836]*y_cur[IDX_C4SII] - k[837]*y_cur[IDX_C4SII] - - k[838]*y_cur[IDX_C5II] - k[839]*y_cur[IDX_C5HII] - - k[840]*y_cur[IDX_C5HII] - k[841]*y_cur[IDX_C5H2II] - - k[842]*y_cur[IDX_C5H2II] - k[843]*y_cur[IDX_C5H3II] - - k[844]*y_cur[IDX_C5H3II] - k[845]*y_cur[IDX_C5H5II] - - k[846]*y_cur[IDX_C5H5II] - k[847]*y_cur[IDX_C5NII] - - k[848]*y_cur[IDX_C6II] - k[849]*y_cur[IDX_C6II] - - k[850]*y_cur[IDX_C6HII] - k[851]*y_cur[IDX_C6HII] - - k[852]*y_cur[IDX_C6H2II] - k[853]*y_cur[IDX_C6H2II] - - k[854]*y_cur[IDX_C6H3II] - k[855]*y_cur[IDX_C6H3II] - - k[856]*y_cur[IDX_C6H4II] - k[857]*y_cur[IDX_C6H4II] - - k[858]*y_cur[IDX_C6H5II] - k[859]*y_cur[IDX_C6H5II] - - k[860]*y_cur[IDX_C6H6II] - k[861]*y_cur[IDX_C6H7II] - - k[862]*y_cur[IDX_C6H7II] - k[863]*y_cur[IDX_C7II] - - k[864]*y_cur[IDX_C7II] - k[865]*y_cur[IDX_C7II] - - k[866]*y_cur[IDX_C7HII] - k[867]*y_cur[IDX_C7HII] - - k[868]*y_cur[IDX_C7H2II] - k[869]*y_cur[IDX_C7H2II] - - k[870]*y_cur[IDX_C7H3II] - k[871]*y_cur[IDX_C7H3II] - - k[872]*y_cur[IDX_C7H4II] - k[873]*y_cur[IDX_C7H4II] - - k[874]*y_cur[IDX_C7H5II] - k[875]*y_cur[IDX_C7H5II] - - k[876]*y_cur[IDX_C7NII] - k[877]*y_cur[IDX_C8II] - - k[878]*y_cur[IDX_C8II] - k[879]*y_cur[IDX_C8HII] - - k[880]*y_cur[IDX_C8HII] - k[881]*y_cur[IDX_C8H2II] - - k[882]*y_cur[IDX_C8H2II] - k[883]*y_cur[IDX_C8H3II] - - k[884]*y_cur[IDX_C8H3II] - k[885]*y_cur[IDX_C8H4II] - - k[886]*y_cur[IDX_C8H4II] - k[887]*y_cur[IDX_C8H5II] - - k[888]*y_cur[IDX_C8H5II] - k[889]*y_cur[IDX_C9II] - - k[890]*y_cur[IDX_C9II] - k[891]*y_cur[IDX_C9HII] - - k[892]*y_cur[IDX_C9HII] - k[893]*y_cur[IDX_C9H2II] - - k[894]*y_cur[IDX_C9H2II] - k[895]*y_cur[IDX_C9H3II] - - k[896]*y_cur[IDX_C9H3II] - k[897]*y_cur[IDX_C9H4II] - - k[898]*y_cur[IDX_C9H4II] - k[899]*y_cur[IDX_C9H5II] - - k[900]*y_cur[IDX_C9H5II] - k[901]*y_cur[IDX_C9NII] - - k[902]*y_cur[IDX_CCPII] - k[903]*y_cur[IDX_CCPII] - - k[904]*y_cur[IDX_CClII] - k[905]*y_cur[IDX_CFII] - - k[906]*y_cur[IDX_CHII] - k[907]*y_cur[IDX_CH2II] - - k[908]*y_cur[IDX_CH2II] - k[909]*y_cur[IDX_CH2II] - - k[910]*y_cur[IDX_CH2CCHII] - k[911]*y_cur[IDX_CH2CCHII] - - k[912]*y_cur[IDX_CH2CHCNII] - k[913]*y_cur[IDX_CH2CHCNHII] - - k[914]*y_cur[IDX_CH2CHCNHII] - k[915]*y_cur[IDX_CH2CHCNHII] - - k[916]*y_cur[IDX_CH2CNII] - k[917]*y_cur[IDX_CH2CNII] - - k[918]*y_cur[IDX_CH2COII] - k[919]*y_cur[IDX_CH2COII] - - k[920]*y_cur[IDX_CH2COII] - k[921]*y_cur[IDX_CH2NH2II] - - k[922]*y_cur[IDX_CH2NH2II] - k[923]*y_cur[IDX_CH3II] - - k[924]*y_cur[IDX_CH3II] - k[925]*y_cur[IDX_CH3II] - - k[926]*y_cur[IDX_CH3C3NII] - k[927]*y_cur[IDX_CH3C3NHII] - - k[928]*y_cur[IDX_CH3C3NHII] - k[929]*y_cur[IDX_CH3C4HII] - - k[930]*y_cur[IDX_CH3C4HII] - k[931]*y_cur[IDX_CH3C5NHII] - - k[932]*y_cur[IDX_CH3C5NHII] - k[933]*y_cur[IDX_CH3C7NHII] - - k[934]*y_cur[IDX_CH3C7NHII] - k[935]*y_cur[IDX_C2H6II] - - k[936]*y_cur[IDX_C2H6II] - k[937]*y_cur[IDX_CH3CHOII] - - k[938]*y_cur[IDX_CH3CHOII] - k[939]*y_cur[IDX_CH3CHOHII] - - k[940]*y_cur[IDX_CH3CHOHII] - k[941]*y_cur[IDX_CH3CHOHII] - - k[942]*y_cur[IDX_CH3CHOHII] - k[943]*y_cur[IDX_CH3CHOHII] - - k[944]*y_cur[IDX_CH3CNII] - k[945]*y_cur[IDX_CH3CNII] - - k[946]*y_cur[IDX_CH3CNHII] - k[947]*y_cur[IDX_CH3CNHII] - - k[948]*y_cur[IDX_CH3COII] - k[949]*y_cur[IDX_CH3COII] - - k[950]*y_cur[IDX_CH3COCH3II] - k[951]*y_cur[IDX_CH3COCH3II] - - k[952]*y_cur[IDX_CH3COCH4II] - k[953]*y_cur[IDX_CH3COCH4II] - - k[954]*y_cur[IDX_CH3CSII] - k[955]*y_cur[IDX_CH3OCH3II] - - k[956]*y_cur[IDX_CH3OCH3II] - k[957]*y_cur[IDX_CH3OCH4II] - - k[958]*y_cur[IDX_CH3OCH4II] - k[959]*y_cur[IDX_CH3OCH4II] - - k[960]*y_cur[IDX_CH3OHII] - k[961]*y_cur[IDX_CH3OHII] - - k[962]*y_cur[IDX_CH3OHII] - k[963]*y_cur[IDX_CH3OH2II] - - k[964]*y_cur[IDX_CH3OH2II] - k[965]*y_cur[IDX_CH3OH2II] - - k[966]*y_cur[IDX_CH3OH2II] - k[967]*y_cur[IDX_CH3OH2II] - - k[968]*y_cur[IDX_CH4II] - k[969]*y_cur[IDX_CH4II] - - k[970]*y_cur[IDX_CH3NHII] - k[971]*y_cur[IDX_CH3NHII] - - k[972]*y_cur[IDX_CH5II] - k[973]*y_cur[IDX_CH5II] - - k[974]*y_cur[IDX_CH5II] - k[975]*y_cur[IDX_CH5II] - - k[976]*y_cur[IDX_CH5II] - k[977]*y_cur[IDX_CNII] - - k[978]*y_cur[IDX_CNCII] - k[979]*y_cur[IDX_CNCII] - - k[980]*y_cur[IDX_COII] - k[981]*y_cur[IDX_CO2II] - - k[982]*y_cur[IDX_HCOOCH3II] - k[983]*y_cur[IDX_HCOOCH3II] - - k[984]*y_cur[IDX_CPII] - k[985]*y_cur[IDX_CSII] - - k[986]*y_cur[IDX_ClOII] - k[987]*y_cur[IDX_H2II] - - k[988]*y_cur[IDX_H2C4NII] - k[989]*y_cur[IDX_H2C7NII] - - k[990]*y_cur[IDX_H2C7NII] - k[991]*y_cur[IDX_H2C9NII] - - k[992]*y_cur[IDX_H2C9NII] - k[993]*y_cur[IDX_H2CClII] - - k[994]*y_cur[IDX_H2CNOII] - k[995]*y_cur[IDX_H2CNOII] - - k[996]*y_cur[IDX_H2COII] - k[997]*y_cur[IDX_H2COII] - - k[998]*y_cur[IDX_H2COII] - k[999]*y_cur[IDX_H2COII] - - k[1000]*y_cur[IDX_H2CSII] - k[1001]*y_cur[IDX_H2CSII] - - k[1002]*y_cur[IDX_H2ClII] - k[1003]*y_cur[IDX_H2ClII] - - k[1004]*y_cur[IDX_H2FII] - k[1005]*y_cur[IDX_H2FII] - - k[1006]*y_cur[IDX_H2NCII] - k[1007]*y_cur[IDX_H2NCII] - - k[1008]*y_cur[IDX_H2NCOII] - k[1009]*y_cur[IDX_H2NCOII] - - k[1010]*y_cur[IDX_H2NOII] - k[1011]*y_cur[IDX_H2NOII] - - k[1012]*y_cur[IDX_H2OII] - k[1013]*y_cur[IDX_H2OII] - - k[1014]*y_cur[IDX_H2OII] - k[1015]*y_cur[IDX_H2OCNII] - - k[1016]*y_cur[IDX_H2OCNII] - k[1017]*y_cur[IDX_H2POII] - - k[1018]*y_cur[IDX_H2POII] - k[1019]*y_cur[IDX_H2SII] - - k[1020]*y_cur[IDX_H2SII] - k[1021]*y_cur[IDX_H2S2II] - - k[1022]*y_cur[IDX_H2S2II] - k[1023]*y_cur[IDX_H2SiOII] - - k[1024]*y_cur[IDX_H2SiOII] - k[1025]*y_cur[IDX_H3II] - - k[1026]*y_cur[IDX_H3II] - k[1027]*y_cur[IDX_H3C3OII] - - k[1028]*y_cur[IDX_H3C5NII] - k[1029]*y_cur[IDX_H3C5NII] - - k[1030]*y_cur[IDX_H3C7NII] - k[1031]*y_cur[IDX_H3C7NII] - - k[1032]*y_cur[IDX_H3C9NII] - k[1033]*y_cur[IDX_H3C9NII] - - k[1034]*y_cur[IDX_H3COII] - k[1035]*y_cur[IDX_H3COII] - - k[1036]*y_cur[IDX_H3COII] - k[1037]*y_cur[IDX_H3COII] - - k[1038]*y_cur[IDX_H3COII] - k[1039]*y_cur[IDX_H3CSII] - - k[1040]*y_cur[IDX_H3CSII] - k[1041]*y_cur[IDX_H3OII] - - k[1042]*y_cur[IDX_H3OII] - k[1043]*y_cur[IDX_H3OII] - - k[1044]*y_cur[IDX_H3OII] - k[1045]*y_cur[IDX_H3SII] - - k[1046]*y_cur[IDX_H3SII] - k[1047]*y_cur[IDX_H3SII] - - k[1048]*y_cur[IDX_H3SII] - k[1049]*y_cur[IDX_H3S2II] - - k[1050]*y_cur[IDX_H3S2II] - k[1051]*y_cur[IDX_H3SiOII] - - k[1052]*y_cur[IDX_H3SiOII] - k[1053]*y_cur[IDX_H5C2O2II] - - k[1054]*y_cur[IDX_H5C2O2II] - k[1055]*y_cur[IDX_HC2OII] - - k[1056]*y_cur[IDX_HC2OII] - k[1057]*y_cur[IDX_HC2OII] - - k[1058]*y_cur[IDX_HC2OII] - k[1059]*y_cur[IDX_HC2PII] - - k[1060]*y_cur[IDX_HC2PII] - k[1061]*y_cur[IDX_HC2SII] - - k[1062]*y_cur[IDX_HC2SII] - k[1063]*y_cur[IDX_HC3NII] - - k[1064]*y_cur[IDX_HC3NII] - k[1065]*y_cur[IDX_HC3NII] - - k[1066]*y_cur[IDX_HC3NHII] - k[1067]*y_cur[IDX_HC3NHII] - - k[1068]*y_cur[IDX_HC3NHII] - k[1069]*y_cur[IDX_HC3NHII] - - k[1070]*y_cur[IDX_HC3OII] - k[1071]*y_cur[IDX_HC3SII] - - k[1072]*y_cur[IDX_HC3SII] - k[1073]*y_cur[IDX_HC4NII] - - k[1074]*y_cur[IDX_HC4SII] - k[1075]*y_cur[IDX_HC4SII] - - k[1076]*y_cur[IDX_HC4SII] - k[1077]*y_cur[IDX_HC5NII] - - k[1078]*y_cur[IDX_HC5NII] - k[1079]*y_cur[IDX_HC5NHII] - - k[1080]*y_cur[IDX_HC5NHII] - k[1081]*y_cur[IDX_HC5NHII] - - k[1082]*y_cur[IDX_HC5NHII] - k[1083]*y_cur[IDX_HC5NHII] - - k[1084]*y_cur[IDX_HC7NII] - k[1085]*y_cur[IDX_HC7NII] - - k[1086]*y_cur[IDX_HC9NII] - k[1087]*y_cur[IDX_HC9NII] - - k[1088]*y_cur[IDX_HCNII] - k[1089]*y_cur[IDX_HCNHII] - - k[1090]*y_cur[IDX_HCNHII] - k[1091]*y_cur[IDX_HCNHII] - - k[1092]*y_cur[IDX_HCNOII] - k[1093]*y_cur[IDX_HCNOII] - - k[1094]*y_cur[IDX_HCNOHII] - k[1095]*y_cur[IDX_HCNOHII] - - k[1096]*y_cur[IDX_HCNOHII] - k[1097]*y_cur[IDX_HCOII] - - k[1098]*y_cur[IDX_HCO2II] - k[1099]*y_cur[IDX_HCO2II] - - k[1100]*y_cur[IDX_HCO2II] - k[1101]*y_cur[IDX_HCOOHII] - - k[1102]*y_cur[IDX_HCOOHII] - k[1103]*y_cur[IDX_HCOOH2II] - - k[1104]*y_cur[IDX_HCOOH2II] - k[1105]*y_cur[IDX_HCPII] - - k[1106]*y_cur[IDX_HCPII] - k[1107]*y_cur[IDX_HCSII] - - k[1108]*y_cur[IDX_HCSII] - k[1109]*y_cur[IDX_HCSiII] - - k[1110]*y_cur[IDX_HCSiII] - k[1111]*y_cur[IDX_HClII] - - k[1112]*y_cur[IDX_HFII] - k[1113]*y_cur[IDX_HN2OII] - - k[1114]*y_cur[IDX_HN2OII] - k[1115]*y_cur[IDX_HNC3I] - - k[1116]*y_cur[IDX_HNCOII] - k[1117]*y_cur[IDX_HNCOII] - - k[1118]*y_cur[IDX_HNCOHII] - k[1119]*y_cur[IDX_HNCOHII] - - k[1120]*y_cur[IDX_HNCOHII] - k[1121]*y_cur[IDX_HNOII] - - k[1122]*y_cur[IDX_HNSII] - k[1123]*y_cur[IDX_HNSiII] - - k[1124]*y_cur[IDX_HNSiII] - k[1125]*y_cur[IDX_HOCII] - - k[1126]*y_cur[IDX_HOCNII] - k[1127]*y_cur[IDX_HOCNII] - - k[1128]*y_cur[IDX_HOCSII] - k[1129]*y_cur[IDX_HOCSII] - - k[1130]*y_cur[IDX_HONCII] - k[1131]*y_cur[IDX_HONCII] - - k[1132]*y_cur[IDX_HPNII] - k[1133]*y_cur[IDX_HPNII] - - k[1134]*y_cur[IDX_HPNII] - k[1135]*y_cur[IDX_HPOII] - - k[1136]*y_cur[IDX_HPOII] - k[1137]*y_cur[IDX_HPOII] - - k[1138]*y_cur[IDX_HSII] - k[1139]*y_cur[IDX_HS2II] - - k[1140]*y_cur[IDX_HS2II] - k[1141]*y_cur[IDX_HSOII] - - k[1142]*y_cur[IDX_HSO2II] - k[1143]*y_cur[IDX_HSO2II] - - k[1144]*y_cur[IDX_HSO2II] - k[1145]*y_cur[IDX_HSiO2II] - - k[1146]*y_cur[IDX_HSiO2II] - k[1147]*y_cur[IDX_HSiSII] - - k[1148]*y_cur[IDX_HSiSII] - k[1149]*y_cur[IDX_HeHII] - - k[1150]*y_cur[IDX_N2II] - k[1151]*y_cur[IDX_N2HII] - - k[1152]*y_cur[IDX_N2HII] - k[1153]*y_cur[IDX_N2HII] - - k[1154]*y_cur[IDX_N2HII] - k[1155]*y_cur[IDX_NCCNCH3II] - - k[1156]*y_cur[IDX_NCCNHII] - k[1157]*y_cur[IDX_NCCNHII] - - k[1158]*y_cur[IDX_NHII] - k[1159]*y_cur[IDX_NH2II] - - k[1160]*y_cur[IDX_NH2II] - k[1161]*y_cur[IDX_NH2CNHII] - - k[1162]*y_cur[IDX_NH2CNHII] - k[1163]*y_cur[IDX_NH3II] - - k[1164]*y_cur[IDX_NH3II] - k[1165]*y_cur[IDX_NH4II] - - k[1166]*y_cur[IDX_NH4II] - k[1167]*y_cur[IDX_NH4II] - - k[1168]*y_cur[IDX_NOII] - k[1169]*y_cur[IDX_NO2II] - - k[1170]*y_cur[IDX_N2OII] - k[1171]*y_cur[IDX_N2OII] - - k[1172]*y_cur[IDX_N2OII] - k[1173]*y_cur[IDX_NSII] - - k[1174]*y_cur[IDX_O2II] - k[1175]*y_cur[IDX_O2HII] - - k[1176]*y_cur[IDX_OCNII] - k[1177]*y_cur[IDX_OCSII] - - k[1178]*y_cur[IDX_OCSII] - k[1179]*y_cur[IDX_OCSII] - - k[1180]*y_cur[IDX_OHII] - k[1181]*y_cur[IDX_PC2H2II] - - k[1182]*y_cur[IDX_PC2H2II] - k[1183]*y_cur[IDX_PC2H2II] - - k[1184]*y_cur[IDX_PC2H3II] - k[1185]*y_cur[IDX_PC2H3II] - - k[1186]*y_cur[IDX_PC2H3II] - k[1187]*y_cur[IDX_PC2H4II] - - k[1188]*y_cur[IDX_PC2H4II] - k[1189]*y_cur[IDX_PC2H4II] - - k[1190]*y_cur[IDX_PC3HII] - k[1191]*y_cur[IDX_PC3HII] - - k[1192]*y_cur[IDX_PC3HII] - k[1193]*y_cur[IDX_PC4HII] - - k[1194]*y_cur[IDX_PC4HII] - k[1195]*y_cur[IDX_PC4HII] - - k[1196]*y_cur[IDX_PC4HII] - k[1197]*y_cur[IDX_PCH2II] - - k[1198]*y_cur[IDX_PCH2II] - k[1199]*y_cur[IDX_PCH3II] - - k[1200]*y_cur[IDX_PCH3II] - k[1201]*y_cur[IDX_PCH3II] - - k[1202]*y_cur[IDX_PCH4II] - k[1203]*y_cur[IDX_PCH4II] - - k[1204]*y_cur[IDX_PCH4II] - k[1205]*y_cur[IDX_PHII] - - k[1206]*y_cur[IDX_PH2II] - k[1207]*y_cur[IDX_PH2II] - - k[1208]*y_cur[IDX_PH2II] - k[1209]*y_cur[IDX_PH3II] - - k[1210]*y_cur[IDX_PH3II] - k[1211]*y_cur[IDX_PNII] - - k[1212]*y_cur[IDX_PNH2II] - k[1213]*y_cur[IDX_PNH2II] - - k[1214]*y_cur[IDX_PNH2II] - k[1215]*y_cur[IDX_PNH3II] - - k[1216]*y_cur[IDX_PNH3II] - k[1217]*y_cur[IDX_PNH3II] - - k[1218]*y_cur[IDX_POII] - k[1219]*y_cur[IDX_S2II] - - k[1220]*y_cur[IDX_SOII] - k[1221]*y_cur[IDX_SO2II] - - k[1222]*y_cur[IDX_SO2II] - k[1223]*y_cur[IDX_SiCII] - - k[1224]*y_cur[IDX_SiC2II] - k[1225]*y_cur[IDX_SiC2II] - - k[1226]*y_cur[IDX_SiC2HII] - k[1227]*y_cur[IDX_SiC2HII] - - k[1228]*y_cur[IDX_SiC2H2II] - k[1229]*y_cur[IDX_SiC2H2II] - - k[1230]*y_cur[IDX_SiC2H3II] - k[1231]*y_cur[IDX_SiC2H3II] - - k[1232]*y_cur[IDX_SiC3II] - k[1233]*y_cur[IDX_SiC3II] - - k[1234]*y_cur[IDX_SiC3HII] - k[1235]*y_cur[IDX_SiC3HII] - - k[1236]*y_cur[IDX_SiC3H2II] - k[1237]*y_cur[IDX_SiC3H2II] - - k[1238]*y_cur[IDX_SiC4II] - k[1239]*y_cur[IDX_SiC4II] - - k[1240]*y_cur[IDX_SiC4HII] - k[1241]*y_cur[IDX_SiC4HII] - - k[1242]*y_cur[IDX_SiCH2II] - k[1243]*y_cur[IDX_SiCH2II] - - k[1244]*y_cur[IDX_SiCH2II] - k[1245]*y_cur[IDX_SiCH3II] - - k[1246]*y_cur[IDX_SiCH3II] - k[1247]*y_cur[IDX_SiCH4II] - - k[1248]*y_cur[IDX_SiCH4II] - k[1249]*y_cur[IDX_SiFII] - - k[1250]*y_cur[IDX_SiHII] - k[1251]*y_cur[IDX_SiH2II] - - k[1252]*y_cur[IDX_SiH2II] - k[1253]*y_cur[IDX_SiH2II] - - k[1254]*y_cur[IDX_SiH3II] - k[1255]*y_cur[IDX_SiH3II] - - k[1256]*y_cur[IDX_SiH4II] - k[1257]*y_cur[IDX_SiH4II] - - k[1258]*y_cur[IDX_SiH5II] - k[1259]*y_cur[IDX_SiH5II] - - k[1260]*y_cur[IDX_SiNII] - k[1261]*y_cur[IDX_SiNCII] - - k[1262]*y_cur[IDX_SiNCHII] - k[1263]*y_cur[IDX_SiNCHII] - - k[1264]*y_cur[IDX_SiNH2II] - k[1265]*y_cur[IDX_SiNH2II] - - k[1266]*y_cur[IDX_SiOII] - k[1267]*y_cur[IDX_SiOHII] - - k[1268]*y_cur[IDX_SiOHII] - k[1269]*y_cur[IDX_SiSII] - - k[1270]*y_cur[IDX_COOCH3II] - k[1271]*y_cur[IDX_COOCH3II] - - k[1272]*y_cur[IDX_CH2OHCOII] - k[1273]*y_cur[IDX_CH2OHCOII] - - k[1274]*y_cur[IDX_CH2OHCOII] - k[1275]*y_cur[IDX_CH2OHCHOII] - - k[1276]*y_cur[IDX_CH2OHCHOII] - k[1277]*y_cur[IDX_CH2OHCHOII] - - k[1278]*y_cur[IDX_CH2OHCHOII] - k[1279]*y_cur[IDX_CH2OHCHOII] - - k[1280]*y_cur[IDX_CH2OHCH2OII] - k[1281]*y_cur[IDX_CH2OHCH2OII] - - k[1282]*y_cur[IDX_CH2OHCH2OII] - k[1283]*y_cur[IDX_CH2OHCH2OII] - - k[1284]*y_cur[IDX_CH3COOHII] - k[1285]*y_cur[IDX_CH3COOHII] - - k[1286]*y_cur[IDX_CH3COOHII] - k[1287]*y_cur[IDX_CH3COOHII] - - k[1288]*y_cur[IDX_CH3COOHII] - k[1289]*y_cur[IDX_CH3COOHII] - - k[1290]*y_cur[IDX_CH3COOH2II] - k[1291]*y_cur[IDX_CH3COOH2II] - - k[1292]*y_cur[IDX_CH3COOH2II] - k[1293]*y_cur[IDX_CH3COOH2II] - - k[1294]*y_cur[IDX_CH3COOH2II] - k[1295]*y_cur[IDX_CH3COOH2II] - - k[1296]*y_cur[IDX_CH3COOH2II] - k[5587]*y_cur[IDX_C10I] - - k[5588]*y_cur[IDX_C10HI] - k[5589]*y_cur[IDX_C2I] - - k[5590]*y_cur[IDX_C2HI] - k[5591]*y_cur[IDX_C3I] - - k[5592]*y_cur[IDX_C3HI] - k[5593]*y_cur[IDX_C3NI] - - k[5594]*y_cur[IDX_C4I] - k[5595]*y_cur[IDX_C4HI] - - k[5596]*y_cur[IDX_C5I] - k[5597]*y_cur[IDX_C5HI] - - k[5598]*y_cur[IDX_C5NI] - k[5599]*y_cur[IDX_C6I] - - k[5600]*y_cur[IDX_C6HI] - k[5601]*y_cur[IDX_C7I] - - k[5602]*y_cur[IDX_C7HI] - k[5603]*y_cur[IDX_C8I] - - k[5604]*y_cur[IDX_C8HI] - k[5605]*y_cur[IDX_C9I] - - k[5606]*y_cur[IDX_C9HI] - k[5607]*y_cur[IDX_CI] - - k[5608]*y_cur[IDX_HI] - k[5609]*y_cur[IDX_OI] - - k[5610]*y_cur[IDX_SI] - k[5611]*y_cur[IDX_CII] - - k[5612]*y_cur[IDX_CH3II] - k[5613]*y_cur[IDX_ClII] - - k[5614]*y_cur[IDX_FeII] - k[5615]*y_cur[IDX_HII] - - k[5616]*y_cur[IDX_H2COII] - k[5617]*y_cur[IDX_H2CSII] - - k[5618]*y_cur[IDX_H2SII] - k[5619]*y_cur[IDX_HeII] - - k[5620]*y_cur[IDX_MgII] - k[5621]*y_cur[IDX_NII] - - k[5622]*y_cur[IDX_NaII] - k[5623]*y_cur[IDX_OII] - - k[5624]*y_cur[IDX_PII] - k[5625]*y_cur[IDX_SII] - - k[5626]*y_cur[IDX_SiII] - k[8763]*y_cur[IDX_GRAIN0I]; + k[4725]*y_cur[IDX_HM] + k[4725]*y_cur[IDX_HM] + + k[4760]*y_cur[IDX_OM] + k[4795]*y_cur[IDX_O2M] + + k[4830]*y_cur[IDX_OHM] + k[4865]*y_cur[IDX_SM] + + k[6557]*y_cur[IDX_GRAINM]; + data[jistart + 20716] = 0.0 + k[400]*y_cur[IDX_HII] + k[1417]*y_cur[IDX_CII] + + k[2086]*y_cur[IDX_CH3II] + k[3281]*y_cur[IDX_HeII] + + k[3528]*y_cur[IDX_C2II] + k[3530]*y_cur[IDX_C2HII] + + k[3532]*y_cur[IDX_C2H2II] + k[4969]*y_cur[IDX_CI] + + k[4970]*y_cur[IDX_CI] + k[5142]*y_cur[IDX_H2I] - + k[5182]*y_cur[IDX_HI] + k[5299]*y_cur[IDX_NOI] + + k[5420]*y_cur[IDX_OI] + k[5883] + k[6219]; + data[jistart + 20717] = 0.0 + k[339]*y_cur[IDX_HII] + k[1319]*y_cur[IDX_CII] + + k[3110]*y_cur[IDX_HeII] + k[4924]*y_cur[IDX_CI] + k[5730] + k[5730] + + k[6015]; + data[jistart + 20718] = 0.0 + k[740]*y_cur[IDX_eM] + k[1466]*y_cur[IDX_C2H2I] + + k[1467]*y_cur[IDX_CNI] + k[1473]*y_cur[IDX_HC3NI] + + k[1475]*y_cur[IDX_HCNI] + k[1849]*y_cur[IDX_CI] + + k[1997]*y_cur[IDX_CH2I] + k[2152]*y_cur[IDX_CH4I] + + k[2241]*y_cur[IDX_CHI] + k[2402]*y_cur[IDX_H2I] + + k[2521]*y_cur[IDX_H2OI] + k[3385]*y_cur[IDX_NI] + + k[3530]*y_cur[IDX_NH2I] + k[5979] + k[6354]*y_cur[IDX_GRAINM]; + data[jistart + 20719] = 0.0 + k[794]*y_cur[IDX_eM] + k[794]*y_cur[IDX_eM] + + k[795]*y_cur[IDX_eM] + k[1545]*y_cur[IDX_C2H2I] + + k[1630]*y_cur[IDX_C2H3I] + k[1692]*y_cur[IDX_C2H4I] + + k[1731]*y_cur[IDX_C2HI] + k[1760]*y_cur[IDX_C3H2I] + + k[1762]*y_cur[IDX_C4HI] + k[1764]*y_cur[IDX_C5H2I] + + k[1766]*y_cur[IDX_C5HI] + k[1768]*y_cur[IDX_C6H2I] + + k[1770]*y_cur[IDX_C6HI] + k[1775]*y_cur[IDX_CH2CCH2I] + + k[1776]*y_cur[IDX_CH2CCHI] + k[1781]*y_cur[IDX_CH3CCHI] + + k[1783]*y_cur[IDX_H2CCCI] + k[1785]*y_cur[IDX_C4H2I] + + k[1819]*y_cur[IDX_C3HI] + k[1856]*y_cur[IDX_CI] + + k[2408]*y_cur[IDX_H2I] - k[2831]*y_cur[IDX_HI] + + k[3814]*y_cur[IDX_PI] + k[3834]*y_cur[IDX_SI] + + k[3874]*y_cur[IDX_SiI] + k[6464]*y_cur[IDX_GRAINM] + + k[6464]*y_cur[IDX_GRAINM] + k[6465]*y_cur[IDX_GRAINM]; + data[jistart + 20720] = 0.0 + k[908]*y_cur[IDX_eM] + k[908]*y_cur[IDX_eM] + + k[909]*y_cur[IDX_eM] + k[1891]*y_cur[IDX_CI] + + k[1975]*y_cur[IDX_C2HI] + k[1977]*y_cur[IDX_CH4I] + + k[1980]*y_cur[IDX_H2COI] + k[1982]*y_cur[IDX_H2OI] + + k[1983]*y_cur[IDX_H2SI] + k[1985]*y_cur[IDX_H2SI] + + k[1986]*y_cur[IDX_HCNI] + k[1988]*y_cur[IDX_NH3I] + + k[1991]*y_cur[IDX_OI] + k[1994]*y_cur[IDX_SI] + + k[2428]*y_cur[IDX_H2I] - k[2836]*y_cur[IDX_HI] + + k[3452]*y_cur[IDX_NI] + k[6076] + k[6317]*y_cur[IDX_GRAINM] + + k[6317]*y_cur[IDX_GRAINM] + k[6318]*y_cur[IDX_GRAINM]; + data[jistart + 20721] = 0.0 + k[1180]*y_cur[IDX_eM] + k[2469]*y_cur[IDX_H2I] + + k[3467]*y_cur[IDX_NI] + k[3750]*y_cur[IDX_OI] + + k[3790]*y_cur[IDX_SI] + k[6242] + k[6329]*y_cur[IDX_GRAINM]; + data[jistart + 20722] = 0.0 + k[1013]*y_cur[IDX_eM] + k[1013]*y_cur[IDX_eM] + + k[1014]*y_cur[IDX_eM] + k[2442]*y_cur[IDX_H2I] + + k[2517]*y_cur[IDX_SI] + k[3457]*y_cur[IDX_NI] + k[6157] + + k[6341]*y_cur[IDX_GRAINM] + k[6341]*y_cur[IDX_GRAINM] + + k[6342]*y_cur[IDX_GRAINM]; + data[jistart + 20723] = 0.0 - k[91]*y_cur[IDX_HI] + k[4141]*y_cur[IDX_HII] + + k[4144]*y_cur[IDX_H3II] + k[4145]*y_cur[IDX_H3OII] + + k[4146]*y_cur[IDX_HC2SII] + k[4147]*y_cur[IDX_HCNHII] + + k[4148]*y_cur[IDX_HCNHII] + k[4149]*y_cur[IDX_HCOII] + + k[4154]*y_cur[IDX_N2HII] + k[4156]*y_cur[IDX_NH4II] + + k[4164]*y_cur[IDX_SiOHII]; + data[jistart + 20724] = 0.0 + k[906]*y_cur[IDX_eM] + k[1890]*y_cur[IDX_CI] + + k[1933]*y_cur[IDX_C2I] + k[1934]*y_cur[IDX_C2H2I] + + k[1940]*y_cur[IDX_CH4I] + k[1942]*y_cur[IDX_CH4I] + + k[1944]*y_cur[IDX_CNI] + k[1945]*y_cur[IDX_CNI] + + k[1947]*y_cur[IDX_H2COI] + k[1951]*y_cur[IDX_H2OI] + + k[1957]*y_cur[IDX_HCNI] + k[1961]*y_cur[IDX_NI] + + k[1969]*y_cur[IDX_OI] + k[1973]*y_cur[IDX_SI] + + k[2427]*y_cur[IDX_H2I] - k[2835]*y_cur[IDX_HI] + k[5776] + + k[6315]*y_cur[IDX_GRAINM]; + data[jistart + 20725] = 0.0 + k[2382]*y_cur[IDX_H2II] - k[5162]*y_cur[IDX_HI]; + data[jistart + 20726] = 0.0 + k[2208]*y_cur[IDX_CH4I] + k[2498]*y_cur[IDX_H2COI] + + k[3621]*y_cur[IDX_NHI] + k[3655]*y_cur[IDX_C2H2I] + + k[3662]*y_cur[IDX_CH3CHCH2I] + k[3663]*y_cur[IDX_CH3CHCH2I] + + k[3665]*y_cur[IDX_CH3OHI]; + data[jistart + 20727] = 0.0 + k[322]*y_cur[IDX_HII] + k[1298]*y_cur[IDX_CII] + + k[3069]*y_cur[IDX_HeII] + k[3072]*y_cur[IDX_HeII] + + k[4910]*y_cur[IDX_CI] + k[5691] + k[5961] + k[5963] + k[5965] + + k[5967] + k[5968]; + data[jistart + 20728] = 0.0 + k[357]*y_cur[IDX_HII] + k[1340]*y_cur[IDX_CII] + + k[3155]*y_cur[IDX_HeII] + k[4942]*y_cur[IDX_CI] + + k[5251]*y_cur[IDX_NI] + k[5770] + k[6065]; + data[jistart + 20729] = 0.0 + k[434]*y_cur[IDX_HII] + k[5483]*y_cur[IDX_OHI]; + data[jistart + 20730] = 0.0 + k[4700]*y_cur[IDX_HM]; + data[jistart + 20731] = 0.0 + k[375]*y_cur[IDX_HII] + k[2680]*y_cur[IDX_H3II]; + data[jistart + 20732] = 0.0 + k[4713]*y_cur[IDX_HM]; + data[jistart + 20733] = 0.0 + k[4719]*y_cur[IDX_HM]; + data[jistart + 20734] = 0.0 + k[398]*y_cur[IDX_HII] + k[2233]*y_cur[IDX_CH5II] + + k[2717]*y_cur[IDX_H3II]; + data[jistart + 20735] = 0.0 + k[2728]*y_cur[IDX_H3II] + k[2814]*y_cur[IDX_H3OII] + + k[3628]*y_cur[IDX_H3COII] + k[3629]*y_cur[IDX_HCNHII] + + k[3630]*y_cur[IDX_HCNHII]; + data[jistart + 20736] = 0.0 + k[320]*y_cur[IDX_HII]; + data[jistart + 20737] = 0.0 + k[354]*y_cur[IDX_HII] + k[1337]*y_cur[IDX_CII] + + k[1506]*y_cur[IDX_C2H2II] + k[3148]*y_cur[IDX_HeII] + + k[4940]*y_cur[IDX_CI] + k[5765] + k[6057]; + data[jistart + 20738] = 0.0 + k[349]*y_cur[IDX_HII]; + data[jistart + 20739] = 0.0 + k[355]*y_cur[IDX_HII]; + data[jistart + 20740] = 0.0 + k[352]*y_cur[IDX_HII]; + data[jistart + 20741] = 0.0 + k[402]*y_cur[IDX_HII] + k[1420]*y_cur[IDX_CII] + + k[2393]*y_cur[IDX_H2II] + k[3285]*y_cur[IDX_HeII] + + k[3355]*y_cur[IDX_NII] + k[3606]*y_cur[IDX_C2II] + + k[3607]*y_cur[IDX_C2H2II] + k[3619]*y_cur[IDX_OII] + + k[3621]*y_cur[IDX_O2II] + k[3624]*y_cur[IDX_SII] + + k[3625]*y_cur[IDX_SiII] + k[4972]*y_cur[IDX_CI] + + k[5143]*y_cur[IDX_H2I] - k[5184]*y_cur[IDX_HI] + + k[5274]*y_cur[IDX_NI] + k[5309]*y_cur[IDX_NHI] + + k[5309]*y_cur[IDX_NHI] + k[5309]*y_cur[IDX_NHI] + + k[5309]*y_cur[IDX_NHI] + k[5313]*y_cur[IDX_NOI] + + k[5315]*y_cur[IDX_NOI] + k[5318]*y_cur[IDX_OI] + + k[5319]*y_cur[IDX_OI] + k[5322]*y_cur[IDX_OHI] + + k[5325]*y_cur[IDX_SI] + k[5888] + k[6224]; + data[jistart + 20742] = 0.0 + k[343]*y_cur[IDX_HII]; + data[jistart + 20743] = 0.0 + k[346]*y_cur[IDX_HII]; + data[jistart + 20744] = 0.0 - k[106]*y_cur[IDX_HI] + k[4666]*y_cur[IDX_HII] + + k[4669]*y_cur[IDX_H3II] + k[4670]*y_cur[IDX_H3OII] + + k[4671]*y_cur[IDX_HC2SII] + k[4672]*y_cur[IDX_HCNHII] + + k[4673]*y_cur[IDX_HCNHII] + k[4674]*y_cur[IDX_HCOII] + + k[4679]*y_cur[IDX_N2HII] + k[4681]*y_cur[IDX_NH4II] + + k[4689]*y_cur[IDX_SiOHII]; + data[jistart + 20745] = 0.0 + k[338]*y_cur[IDX_HII]; + data[jistart + 20746] = 0.0 + k[417]*y_cur[IDX_HII] + k[5103]*y_cur[IDX_CHI] - + k[5200]*y_cur[IDX_HI] - k[5201]*y_cur[IDX_HI] + + k[5481]*y_cur[IDX_OHI]; + data[jistart + 20747] = 0.0 + k[351]*y_cur[IDX_HII] + k[1334]*y_cur[IDX_CII] + + k[1502]*y_cur[IDX_C2H2II] + k[1607]*y_cur[IDX_C2H3II] + + k[1666]*y_cur[IDX_C2H4II] + k[3140]*y_cur[IDX_HeII] + + k[4936]*y_cur[IDX_CI] + k[5246]*y_cur[IDX_NI] + k[5759] + k[6047]; + data[jistart + 20748] = 0.0 + k[758]*y_cur[IDX_eM] + k[758]*y_cur[IDX_eM] + + k[759]*y_cur[IDX_eM] + k[760]*y_cur[IDX_eM] + + k[1537]*y_cur[IDX_C2H2I] + k[1648]*y_cur[IDX_C2H4I] + + k[1650]*y_cur[IDX_C3H2I] + k[1652]*y_cur[IDX_C3HI] + + k[1654]*y_cur[IDX_C4HI] + k[1656]*y_cur[IDX_C5H2I] + + k[1658]*y_cur[IDX_C5HI] + k[1662]*y_cur[IDX_C6HI] + + k[1666]*y_cur[IDX_C7HI] + k[1673]*y_cur[IDX_H2CCCI] + + k[1679]*y_cur[IDX_SI] + k[1681]*y_cur[IDX_SiI] + + k[1854]*y_cur[IDX_CI] - k[2828]*y_cur[IDX_HI] + + k[3391]*y_cur[IDX_NI] + k[6382]*y_cur[IDX_GRAINM] + + k[6382]*y_cur[IDX_GRAINM] + k[6383]*y_cur[IDX_GRAINM] + + k[6384]*y_cur[IDX_GRAINM]; + data[jistart + 20749] = 0.0 + k[825]*y_cur[IDX_eM] + k[1636]*y_cur[IDX_C2H3I] + + k[1737]*y_cur[IDX_C2HI] + k[1789]*y_cur[IDX_C3H2I] + + k[1825]*y_cur[IDX_C3HI] + k[1840]*y_cur[IDX_C5H2I] + + k[1841]*y_cur[IDX_C5HI] + k[1844]*y_cur[IDX_C4HI] + + k[1866]*y_cur[IDX_CI] + k[2036]*y_cur[IDX_CH2CCHI] + + k[2480]*y_cur[IDX_H2CCCI] + k[4695]*y_cur[IDX_HM] - + k[5571]*y_cur[IDX_HI] + k[6634]*y_cur[IDX_GRAINM]; + data[jistart + 20750] = 0.0 + k[1151]*y_cur[IDX_eM] + k[1152]*y_cur[IDX_eM] + + k[3909]*y_cur[IDX_CM] + k[3944]*y_cur[IDX_C10M] + + k[3979]*y_cur[IDX_C10HM] + k[4014]*y_cur[IDX_C2M] + + k[4049]*y_cur[IDX_C2HM] + k[4084]*y_cur[IDX_C3M] + + k[4119]*y_cur[IDX_C3HM] + k[4154]*y_cur[IDX_C3NM] + + k[4189]*y_cur[IDX_C4M] + k[4224]*y_cur[IDX_C4HM] + + k[4259]*y_cur[IDX_C5M] + k[4294]*y_cur[IDX_C5HM] + + k[4329]*y_cur[IDX_C5NM] + k[4364]*y_cur[IDX_C6M] + + k[4399]*y_cur[IDX_C6HM] + k[4434]*y_cur[IDX_C7M] + + k[4469]*y_cur[IDX_C7HM] + k[4504]*y_cur[IDX_C8M] + + k[4539]*y_cur[IDX_C8HM] + k[4574]*y_cur[IDX_C9M] + + k[4609]*y_cur[IDX_C9HM] + k[4644]*y_cur[IDX_CHM] + + k[4679]*y_cur[IDX_CNM] + k[4715]*y_cur[IDX_HM] + + k[4715]*y_cur[IDX_HM] + k[4750]*y_cur[IDX_OM] + + k[4785]*y_cur[IDX_O2M] + k[4820]*y_cur[IDX_OHM] + + k[4855]*y_cur[IDX_SM] + k[6396]*y_cur[IDX_GRAINM]; + data[jistart + 20751] = 0.0 + k[360]*y_cur[IDX_HII] + k[1347]*y_cur[IDX_CII] + + k[1508]*y_cur[IDX_C2H2II] + k[1609]*y_cur[IDX_C2H3II] + + k[1776]*y_cur[IDX_C3H2II] + k[1806]*y_cur[IDX_C3H3II] + + k[2030]*y_cur[IDX_CH2CCHII] + k[2032]*y_cur[IDX_C4HII] + + k[2034]*y_cur[IDX_C4H2II] + k[2036]*y_cur[IDX_C4H3II] + + k[2038]*y_cur[IDX_C5H2II] + k[2040]*y_cur[IDX_C6H2II] + + k[2061]*y_cur[IDX_CH3II] + k[3162]*y_cur[IDX_HeII] + + k[3164]*y_cur[IDX_HeII] + k[3863]*y_cur[IDX_SiII] + + k[4947]*y_cur[IDX_CI] + k[5782] + k[6083]; + data[jistart + 20752] = 0.0 + k[3855]*y_cur[IDX_CH2CCH2I] + k[4722]*y_cur[IDX_HM]; + data[jistart + 20753] = 0.0 + k[911]*y_cur[IDX_eM] + k[1742]*y_cur[IDX_C2HI] + + k[1795]*y_cur[IDX_C3H2I] + k[1829]*y_cur[IDX_C3HI] + + k[1893]*y_cur[IDX_CI] + k[2021]*y_cur[IDX_C4HI] + + k[2023]*y_cur[IDX_C5H2I] + k[2025]*y_cur[IDX_C5HI] + + k[2028]*y_cur[IDX_C6HI] + k[2030]*y_cur[IDX_CH2CCHI] + + k[2486]*y_cur[IDX_H2CCCI] + k[3453]*y_cur[IDX_NI] + + k[3880]*y_cur[IDX_SiI] + k[4697]*y_cur[IDX_HM] + + k[6471]*y_cur[IDX_GRAINM]; + data[jistart + 20754] = 0.0 + k[348]*y_cur[IDX_HII] + k[1331]*y_cur[IDX_CII] + + k[1498]*y_cur[IDX_C2H2II] + k[1601]*y_cur[IDX_C2H3II] + + k[1662]*y_cur[IDX_C2H4II] + k[1770]*y_cur[IDX_C3H2II] + + k[1804]*y_cur[IDX_C3H3II] + k[2028]*y_cur[IDX_CH2CCHII] + + k[3133]*y_cur[IDX_HeII] + k[4933]*y_cur[IDX_CI] + k[5754]; + data[jistart + 20755] = 0.0 + k[345]*y_cur[IDX_HII] + k[1325]*y_cur[IDX_CII] + + k[1494]*y_cur[IDX_C2H2II] + k[1594]*y_cur[IDX_C2H3II] + + k[1658]*y_cur[IDX_C2H4II] + k[1766]*y_cur[IDX_C3H2II] + + k[1801]*y_cur[IDX_C3H3II] + k[1833]*y_cur[IDX_C4HII] + + k[1836]*y_cur[IDX_C4H2II] + k[1841]*y_cur[IDX_C4H3II] + + k[2025]*y_cur[IDX_CH2CCHII] + k[3123]*y_cur[IDX_HeII] + + k[4928]*y_cur[IDX_CI] + k[5240]*y_cur[IDX_NI] + k[5744] + k[6029]; + data[jistart + 20756] = 0.0 + k[1019]*y_cur[IDX_eM] + k[1020]*y_cur[IDX_eM] + + k[1020]*y_cur[IDX_eM] + k[1900]*y_cur[IDX_CI] + + k[2443]*y_cur[IDX_H2I] - k[2842]*y_cur[IDX_HI] + + k[4704]*y_cur[IDX_HM] + k[6446]*y_cur[IDX_GRAINM] + + k[6447]*y_cur[IDX_GRAINM] + k[6447]*y_cur[IDX_GRAINM]; + data[jistart + 20757] = 0.0 + k[2256]*y_cur[IDX_CHI] + k[2459]*y_cur[IDX_H2I] + + k[3336]*y_cur[IDX_CH3OHI] + k[3338]*y_cur[IDX_CH3OHI] + + k[3339]*y_cur[IDX_CH3OHI] + k[3340]*y_cur[IDX_CH4I] + + k[3341]*y_cur[IDX_CH4I] + k[3342]*y_cur[IDX_CH4I] + + k[3342]*y_cur[IDX_CH4I] + k[3349]*y_cur[IDX_H2SI] + + k[3355]*y_cur[IDX_NHI] + k[4714]*y_cur[IDX_HM]; + data[jistart + 20758] = 0.0 + k[335]*y_cur[IDX_HII] + k[1312]*y_cur[IDX_CII] + + k[1488]*y_cur[IDX_C2H2II] + k[1585]*y_cur[IDX_C2H3II] + + k[1652]*y_cur[IDX_C2H4II] + k[1819]*y_cur[IDX_C3H2II] + + k[1821]*y_cur[IDX_C3H3II] + k[1823]*y_cur[IDX_C4HII] + + k[1824]*y_cur[IDX_C4H2II] + k[1825]*y_cur[IDX_C4H3II] + + k[1826]*y_cur[IDX_C5H2II] + k[1827]*y_cur[IDX_C6H2II] + + k[1829]*y_cur[IDX_CH2CCHII] + k[3097]*y_cur[IDX_HeII] + + k[3821]*y_cur[IDX_SII] + k[3861]*y_cur[IDX_SiII] + + k[4920]*y_cur[IDX_CI] + k[5233]*y_cur[IDX_NI] + k[5720] + k[6004]; + data[jistart + 20759] = 0.0 + k[998]*y_cur[IDX_eM] + k[998]*y_cur[IDX_eM] + + k[999]*y_cur[IDX_eM] + k[2193]*y_cur[IDX_CH4I] + + k[4703]*y_cur[IDX_HM] + k[6400]*y_cur[IDX_GRAINM] + + k[6400]*y_cur[IDX_GRAINM] + k[6401]*y_cur[IDX_GRAINM]; + data[jistart + 20760] = 0.0 + k[333]*y_cur[IDX_HII]; + data[jistart + 20761] = 0.0 + k[340]*y_cur[IDX_HII] + k[1320]*y_cur[IDX_CII] + + k[1490]*y_cur[IDX_C2H2II] + k[1588]*y_cur[IDX_C2H3II] + + k[1654]*y_cur[IDX_C2H4II] + k[1762]*y_cur[IDX_C3H2II] + + k[1797]*y_cur[IDX_C3H3II] + k[1831]*y_cur[IDX_C4HII] + + k[1843]*y_cur[IDX_C4H2II] + k[1844]*y_cur[IDX_C4H3II] + + k[1845]*y_cur[IDX_C5H2II] + k[2021]*y_cur[IDX_CH2CCHII] + + k[3112]*y_cur[IDX_HeII] + k[3822]*y_cur[IDX_SII] + + k[3862]*y_cur[IDX_SiII] + k[4877]*y_cur[IDX_C2H2I] + + k[4884]*y_cur[IDX_C2H4I] + k[4907]*y_cur[IDX_HNCI] + + k[4925]*y_cur[IDX_CI] + k[5023]*y_cur[IDX_CH2CCH2I] + + k[5051]*y_cur[IDX_CH3CCHI] + k[5054]*y_cur[IDX_CH3CHCH2I] + + k[5236]*y_cur[IDX_NI] + k[5732] + k[6017]; + data[jistart + 20762] = 0.0 + k[4718]*y_cur[IDX_HM]; + data[jistart + 20763] = 0.0 - k[492]*y_cur[IDX_HI] + k[2261]*y_cur[IDX_CHI] + + k[2466]*y_cur[IDX_H2I] + k[3619]*y_cur[IDX_NHI] + + k[3650]*y_cur[IDX_OHI] + k[4720]*y_cur[IDX_HM]; + data[jistart + 20764] = 0.0 + k[384]*y_cur[IDX_HII] + k[1403]*y_cur[IDX_CII] + + k[1521]*y_cur[IDX_C2H2II] + k[1623]*y_cur[IDX_C2H3II] + + k[1785]*y_cur[IDX_C3H2II] + k[1834]*y_cur[IDX_C4HII] + + k[1838]*y_cur[IDX_C4H2II] + k[3240]*y_cur[IDX_HeII] + + k[3832]*y_cur[IDX_SII] + k[4872]*y_cur[IDX_C2I] + + k[4900]*y_cur[IDX_C2HI] + k[4961]*y_cur[IDX_CI] + + k[5115]*y_cur[IDX_CNI] + k[5849] + k[6174]; + data[jistart + 20765] = 0.0 + k[823]*y_cur[IDX_eM] + k[1552]*y_cur[IDX_C2H2I] + + k[1634]*y_cur[IDX_C2H3I] + k[1697]*y_cur[IDX_C2H4I] + + k[1736]*y_cur[IDX_C2HI] + k[1788]*y_cur[IDX_C3H2I] + + k[1824]*y_cur[IDX_C3HI] + k[1835]*y_cur[IDX_C5H2I] + + k[1836]*y_cur[IDX_C5HI] + k[1838]*y_cur[IDX_C4H2I] + + k[1843]*y_cur[IDX_C4HI] + k[1864]*y_cur[IDX_CI] + + k[2034]*y_cur[IDX_CH2CCHI] + k[2106]*y_cur[IDX_CH3CCHI] + + k[2169]*y_cur[IDX_CH4I] + k[2479]*y_cur[IDX_H2CCCI] + + k[3406]*y_cur[IDX_NI] + k[3815]*y_cur[IDX_PI] + + k[3836]*y_cur[IDX_SI] + k[3878]*y_cur[IDX_SiI] + + k[4694]*y_cur[IDX_HM] - k[5570]*y_cur[IDX_HI] + + k[6628]*y_cur[IDX_GRAINM]; + data[jistart + 20766] = 0.0 + k[1089]*y_cur[IDX_eM] + k[1089]*y_cur[IDX_eM] + + k[1090]*y_cur[IDX_eM] + k[1091]*y_cur[IDX_eM] + + k[3629]*y_cur[IDX_NaI] + k[3630]*y_cur[IDX_NaI] + + k[3902]*y_cur[IDX_CM] + k[3903]*y_cur[IDX_CM] + + k[3937]*y_cur[IDX_C10M] + k[3938]*y_cur[IDX_C10M] + + k[3972]*y_cur[IDX_C10HM] + k[3973]*y_cur[IDX_C10HM] + + k[4007]*y_cur[IDX_C2M] + k[4008]*y_cur[IDX_C2M] + + k[4042]*y_cur[IDX_C2HM] + k[4043]*y_cur[IDX_C2HM] + + k[4077]*y_cur[IDX_C3M] + k[4078]*y_cur[IDX_C3M] + + k[4112]*y_cur[IDX_C3HM] + k[4113]*y_cur[IDX_C3HM] + + k[4147]*y_cur[IDX_C3NM] + k[4148]*y_cur[IDX_C3NM] + + k[4182]*y_cur[IDX_C4M] + k[4183]*y_cur[IDX_C4M] + + k[4217]*y_cur[IDX_C4HM] + k[4218]*y_cur[IDX_C4HM] + + k[4252]*y_cur[IDX_C5M] + k[4253]*y_cur[IDX_C5M] + + k[4287]*y_cur[IDX_C5HM] + k[4288]*y_cur[IDX_C5HM] + + k[4322]*y_cur[IDX_C5NM] + k[4323]*y_cur[IDX_C5NM] + + k[4357]*y_cur[IDX_C6M] + k[4358]*y_cur[IDX_C6M] + + k[4392]*y_cur[IDX_C6HM] + k[4393]*y_cur[IDX_C6HM] + + k[4427]*y_cur[IDX_C7M] + k[4428]*y_cur[IDX_C7M] + + k[4462]*y_cur[IDX_C7HM] + k[4463]*y_cur[IDX_C7HM] + + k[4497]*y_cur[IDX_C8M] + k[4498]*y_cur[IDX_C8M] + + k[4532]*y_cur[IDX_C8HM] + k[4533]*y_cur[IDX_C8HM] + + k[4567]*y_cur[IDX_C9M] + k[4568]*y_cur[IDX_C9M] + + k[4602]*y_cur[IDX_C9HM] + k[4603]*y_cur[IDX_C9HM] + + k[4637]*y_cur[IDX_CHM] + k[4638]*y_cur[IDX_CHM] + + k[4672]*y_cur[IDX_CNM] + k[4673]*y_cur[IDX_CNM] + + k[4708]*y_cur[IDX_HM] + k[4708]*y_cur[IDX_HM] + + k[4709]*y_cur[IDX_HM] + k[4709]*y_cur[IDX_HM] + + k[4743]*y_cur[IDX_OM] + k[4744]*y_cur[IDX_OM] + + k[4778]*y_cur[IDX_O2M] + k[4779]*y_cur[IDX_O2M] + + k[4813]*y_cur[IDX_OHM] + k[4814]*y_cur[IDX_OHM] + + k[4848]*y_cur[IDX_SM] + k[4849]*y_cur[IDX_SM] + + k[6378]*y_cur[IDX_GRAINM] + k[6378]*y_cur[IDX_GRAINM] + + k[6379]*y_cur[IDX_GRAINM] + k[6380]*y_cur[IDX_GRAINM]; + data[jistart + 20767] = 0.0 + k[359]*y_cur[IDX_HII] + k[1342]*y_cur[IDX_CII] + + k[1995]*y_cur[IDX_C2II] + k[1997]*y_cur[IDX_C2HII] + + k[1998]*y_cur[IDX_C2H2II] + k[2017]*y_cur[IDX_SII] + + k[2018]*y_cur[IDX_SiII] + k[2375]*y_cur[IDX_H2II] + + k[3161]*y_cur[IDX_HeII] + k[4944]*y_cur[IDX_CI] + + k[4991]*y_cur[IDX_C2H2I] + k[4993]*y_cur[IDX_CH2I] + + k[4993]*y_cur[IDX_CH2I] + k[4993]*y_cur[IDX_CH2I] + + k[4993]*y_cur[IDX_CH2I] + k[4994]*y_cur[IDX_CH2I] + + k[4994]*y_cur[IDX_CH2I] + k[5005]*y_cur[IDX_NOI] + + k[5006]*y_cur[IDX_NOI] + k[5008]*y_cur[IDX_O2I] + + k[5008]*y_cur[IDX_O2I] + k[5013]*y_cur[IDX_OI] + + k[5013]*y_cur[IDX_OI] + k[5014]*y_cur[IDX_OI] + + k[5016]*y_cur[IDX_OHI] + k[5020]*y_cur[IDX_SI] + + k[5021]*y_cur[IDX_SiI] + k[5135]*y_cur[IDX_H2I] - + k[5156]*y_cur[IDX_HI] + k[5253]*y_cur[IDX_NI] + + k[5254]*y_cur[IDX_NI] + k[5779] + k[6079]; + data[jistart + 20768] = 0.0 + k[1413]*y_cur[IDX_CII] + k[3046]*y_cur[IDX_SiII] + + k[3261]*y_cur[IDX_HeII] + k[3262]*y_cur[IDX_HeII] + + k[4902]*y_cur[IDX_C2HI] + k[4907]*y_cur[IDX_C4HI] + + k[5118]*y_cur[IDX_CNI] - k[5174]*y_cur[IDX_HI] + + k[5174]*y_cur[IDX_HI] + k[5867] + k[6198]; + data[jistart + 20769] = 0.0 + k[1163]*y_cur[IDX_eM] + k[1164]*y_cur[IDX_eM] + + k[1164]*y_cur[IDX_eM] + k[2464]*y_cur[IDX_H2I] + + k[4716]*y_cur[IDX_HM] + k[6330]*y_cur[IDX_GRAINM] + + k[6331]*y_cur[IDX_GRAINM] + k[6331]*y_cur[IDX_GRAINM]; + data[jistart + 20770] = 0.0 + k[326]*y_cur[IDX_HII] + k[1303]*y_cur[IDX_CII] + + k[1305]*y_cur[IDX_CII] + k[1483]*y_cur[IDX_C2H2II] + + k[1648]*y_cur[IDX_C2H4II] + k[1688]*y_cur[IDX_C3II] + + k[1692]*y_cur[IDX_C3H2II] + k[1695]*y_cur[IDX_C4HII] + + k[1697]*y_cur[IDX_C4H2II] + k[1700]*y_cur[IDX_C5II] + + k[1702]*y_cur[IDX_C5H2II] + k[1716]*y_cur[IDX_SII] + + k[1718]*y_cur[IDX_SiII] + k[2296]*y_cur[IDX_HII] + + k[2372]*y_cur[IDX_H2II] + k[3079]*y_cur[IDX_HeII] + + k[3081]*y_cur[IDX_HeII] + k[4868]*y_cur[IDX_C2I] + + k[4883]*y_cur[IDX_C2H3I] + k[4884]*y_cur[IDX_C4HI] + + k[4914]*y_cur[IDX_CI] + k[5065]*y_cur[IDX_CHI] + + k[5066]*y_cur[IDX_CHI] + k[5106]*y_cur[IDX_CNI]; + data[jistart + 20771] = 0.0 + k[325]*y_cur[IDX_HII] + k[1301]*y_cur[IDX_CII] + + k[1630]*y_cur[IDX_C3H2II] + k[1632]*y_cur[IDX_C4HII] + + k[1634]*y_cur[IDX_C4H2II] + k[1636]*y_cur[IDX_C4H3II] + + k[1638]*y_cur[IDX_C5H2II] + k[1640]*y_cur[IDX_C6H2II] + + k[1642]*y_cur[IDX_C7H2II] + k[1646]*y_cur[IDX_SiII] + + k[2043]*y_cur[IDX_CH3II] + k[3078]*y_cur[IDX_HeII] + + k[4883]*y_cur[IDX_C2H4I] + k[4913]*y_cur[IDX_CI] - + k[5155]*y_cur[IDX_HI] + k[5224]*y_cur[IDX_NI] + + k[5345]*y_cur[IDX_OI] + k[5698] + k[5983]; + data[jistart + 20772] = 0.0 + k[1166]*y_cur[IDX_eM] + k[1166]*y_cur[IDX_eM] + + k[1167]*y_cur[IDX_eM] + k[3911]*y_cur[IDX_CM] + + k[3946]*y_cur[IDX_C10M] + k[3981]*y_cur[IDX_C10HM] + + k[4016]*y_cur[IDX_C2M] + k[4051]*y_cur[IDX_C2HM] + + k[4086]*y_cur[IDX_C3M] + k[4121]*y_cur[IDX_C3HM] + + k[4156]*y_cur[IDX_C3NM] + k[4191]*y_cur[IDX_C4M] + + k[4226]*y_cur[IDX_C4HM] + k[4261]*y_cur[IDX_C5M] + + k[4296]*y_cur[IDX_C5HM] + k[4331]*y_cur[IDX_C5NM] + + k[4366]*y_cur[IDX_C6M] + k[4401]*y_cur[IDX_C6HM] + + k[4436]*y_cur[IDX_C7M] + k[4471]*y_cur[IDX_C7HM] + + k[4506]*y_cur[IDX_C8M] + k[4541]*y_cur[IDX_C8HM] + + k[4576]*y_cur[IDX_C9M] + k[4611]*y_cur[IDX_C9HM] + + k[4646]*y_cur[IDX_CHM] + k[4681]*y_cur[IDX_CNM] + + k[4717]*y_cur[IDX_HM] + k[4717]*y_cur[IDX_HM] + + k[4752]*y_cur[IDX_OM] + k[4787]*y_cur[IDX_O2M] + + k[4822]*y_cur[IDX_OHM] + k[4857]*y_cur[IDX_SM] + + k[6338]*y_cur[IDX_GRAINM] + k[6338]*y_cur[IDX_GRAINM] + + k[6339]*y_cur[IDX_GRAINM]; + data[jistart + 20773] = 0.0 + k[2391]*y_cur[IDX_H2II]; + data[jistart + 20774] = 0.0 - k[144]*y_cur[IDX_HI] + k[144]*y_cur[IDX_HI] + + k[405]*y_cur[IDX_HII] + k[2395]*y_cur[IDX_H2II] + + k[5008]*y_cur[IDX_CH2I] + k[5008]*y_cur[IDX_CH2I] + + k[5086]*y_cur[IDX_CHI] + k[5087]*y_cur[IDX_CHI] + + k[5088]*y_cur[IDX_CHI] + k[5089]*y_cur[IDX_CHI] + + k[5144]*y_cur[IDX_H2I] - k[5190]*y_cur[IDX_HI]; + data[jistart + 20775] = 0.0 + k[1574]*y_cur[IDX_C2H2I] + k[1646]*y_cur[IDX_C2H3I] + + k[1718]*y_cur[IDX_C2H4I] + k[1751]*y_cur[IDX_C2HI] + + k[2018]*y_cur[IDX_CH2I] + k[2103]*y_cur[IDX_CH3I] + + k[2266]*y_cur[IDX_CHI] + k[2569]*y_cur[IDX_H2OI] + + k[2885]*y_cur[IDX_HCNI] + k[3015]*y_cur[IDX_HFI] + + k[3046]*y_cur[IDX_HNCI] + k[3602]*y_cur[IDX_NH3I] + + k[3625]*y_cur[IDX_NHI] + k[3809]*y_cur[IDX_OHI] + + k[3860]*y_cur[IDX_C3H2I] + k[3861]*y_cur[IDX_C3HI] + + k[3862]*y_cur[IDX_C4HI] + k[3863]*y_cur[IDX_CH2CCHI] + + k[3868]*y_cur[IDX_H2CCCI] + k[4723]*y_cur[IDX_HM] - + k[5575]*y_cur[IDX_HI]; + data[jistart + 20776] = 0.0 + k[380]*y_cur[IDX_HII] + k[1395]*y_cur[IDX_CII] + + k[1983]*y_cur[IDX_CH2II] + k[1985]*y_cur[IDX_CH2II] + + k[2340]*y_cur[IDX_HII] + k[2387]*y_cur[IDX_H2II] + + k[3229]*y_cur[IDX_HeII] + k[3349]*y_cur[IDX_NII] + + k[3362]*y_cur[IDX_N2II] + k[3828]*y_cur[IDX_SII] - + k[5169]*y_cur[IDX_HI] + k[6164]; + data[jistart + 20777] = 0.0 + k[1573]*y_cur[IDX_C2H2I] + k[1716]*y_cur[IDX_C2H4I] + + k[1750]*y_cur[IDX_C2HI] + k[2017]*y_cur[IDX_CH2I] + + k[2101]*y_cur[IDX_CH3I] + k[2215]*y_cur[IDX_CH4I] + + k[2216]*y_cur[IDX_CH4I] + k[2265]*y_cur[IDX_CHI] + + k[2470]*y_cur[IDX_H2I] + k[3624]*y_cur[IDX_NHI] + + k[3808]*y_cur[IDX_OHI] + k[3820]*y_cur[IDX_C3H2I] + + k[3821]*y_cur[IDX_C3HI] + k[3822]*y_cur[IDX_C4HI] + + k[3827]*y_cur[IDX_H2CCCI] + k[3828]*y_cur[IDX_H2SI] + + k[3832]*y_cur[IDX_C4H2I] + k[3885]*y_cur[IDX_SiHI] + + k[4721]*y_cur[IDX_HM]; + data[jistart + 20778] = 0.0 + k[418]*y_cur[IDX_HII] + k[1530]*y_cur[IDX_C2H2II] + + k[1627]*y_cur[IDX_C2H3II] + k[1681]*y_cur[IDX_C2H4II] + + k[2098]*y_cur[IDX_CH3II] + k[2237]*y_cur[IDX_CH5II] + + k[3872]*y_cur[IDX_C3HII] + k[3874]*y_cur[IDX_C3H2II] + + k[3876]*y_cur[IDX_C3H3II] + k[3878]*y_cur[IDX_C4H2II] + + k[3880]*y_cur[IDX_CH2CCHII] + k[4880]*y_cur[IDX_C2H2I] + + k[5021]*y_cur[IDX_CH2I] + k[5049]*y_cur[IDX_CH3I] + + k[5482]*y_cur[IDX_OHI]; + data[jistart + 20779] = 0.0 + k[745]*y_cur[IDX_eM] + k[746]*y_cur[IDX_eM] + + k[747]*y_cur[IDX_eM] + k[748]*y_cur[IDX_eM] + k[751]*y_cur[IDX_eM] + + k[751]*y_cur[IDX_eM] + k[752]*y_cur[IDX_eM] + k[752]*y_cur[IDX_eM] + + k[1582]*y_cur[IDX_C3H2I] + k[1585]*y_cur[IDX_C3HI] + + k[1588]*y_cur[IDX_C4HI] + k[1591]*y_cur[IDX_C5H2I] + + k[1594]*y_cur[IDX_C5HI] + k[1597]*y_cur[IDX_C6H2I] + + k[1601]*y_cur[IDX_C6HI] + k[1604]*y_cur[IDX_C7H2I] + + k[1607]*y_cur[IDX_C7HI] + k[1609]*y_cur[IDX_CH2CCHI] + + k[1618]*y_cur[IDX_H2CCCI] + k[1623]*y_cur[IDX_C4H2I] + + k[1627]*y_cur[IDX_SiI] + k[1728]*y_cur[IDX_C2HI] + + k[1852]*y_cur[IDX_CI] - k[2827]*y_cur[IDX_HI] + + k[4693]*y_cur[IDX_HM] + k[6360]*y_cur[IDX_GRAINM] + + k[6361]*y_cur[IDX_GRAINM] + k[6362]*y_cur[IDX_GRAINM] + + k[6363]*y_cur[IDX_GRAINM] + k[6366]*y_cur[IDX_GRAINM] + + k[6366]*y_cur[IDX_GRAINM] + k[6367]*y_cur[IDX_GRAINM] + + k[6367]*y_cur[IDX_GRAINM]; + data[jistart + 20780] = 0.0 + k[403]*y_cur[IDX_HII] + k[2394]*y_cur[IDX_H2II] + + k[4878]*y_cur[IDX_C2H2I] + k[5005]*y_cur[IDX_CH2I] + + k[5006]*y_cur[IDX_CH2I] + k[5085]*y_cur[IDX_CHI] - + k[5186]*y_cur[IDX_HI] - k[5187]*y_cur[IDX_HI] + + k[5299]*y_cur[IDX_NH2I] + k[5313]*y_cur[IDX_NHI] + + k[5315]*y_cur[IDX_NHI] + k[5477]*y_cur[IDX_OHI]; + data[jistart + 20781] = 0.0 + k[389]*y_cur[IDX_HII] + k[3249]*y_cur[IDX_HeII] + + k[4962]*y_cur[IDX_CI] - k[5171]*y_cur[IDX_HI] - + k[5172]*y_cur[IDX_HI] + k[5267]*y_cur[IDX_NI] + + k[5405]*y_cur[IDX_OI] + k[5486]*y_cur[IDX_SI] + k[5856] + k[6184]; + data[jistart + 20782] = 0.0 + k[371]*y_cur[IDX_HII] + k[1384]*y_cur[IDX_CII] + + k[1940]*y_cur[IDX_CHII] + k[1942]*y_cur[IDX_CHII] + + k[1977]*y_cur[IDX_CH2II] + k[2148]*y_cur[IDX_C2II] + + k[2150]*y_cur[IDX_C2II] + k[2152]*y_cur[IDX_C2HII] + + k[2155]*y_cur[IDX_C2H2II] + k[2159]*y_cur[IDX_C3II] + + k[2167]*y_cur[IDX_C4II] + k[2169]*y_cur[IDX_C4H2II] + + k[2179]*y_cur[IDX_C5II] + k[2181]*y_cur[IDX_C5H2II] + + k[2184]*y_cur[IDX_C6II] + k[2186]*y_cur[IDX_C6H2II] + + k[2189]*y_cur[IDX_COII] + k[2193]*y_cur[IDX_H2COII] + + k[2205]*y_cur[IDX_N2II] + k[2208]*y_cur[IDX_O2II] + + k[2213]*y_cur[IDX_PHII] + k[2215]*y_cur[IDX_SII] + + k[2216]*y_cur[IDX_SII] + k[2378]*y_cur[IDX_H2II] + + k[2379]*y_cur[IDX_H2II] + k[3198]*y_cur[IDX_HeII] + + k[3200]*y_cur[IDX_HeII] + k[3340]*y_cur[IDX_NII] + + k[3341]*y_cur[IDX_NII] + k[3342]*y_cur[IDX_NII] + + k[3342]*y_cur[IDX_NII] + k[4871]*y_cur[IDX_C2I] + + k[5074]*y_cur[IDX_CHI] - k[5159]*y_cur[IDX_HI] + k[6128] + k[6130]; + data[jistart + 20783] = 0.0 + k[329]*y_cur[IDX_HII] + k[1308]*y_cur[IDX_CII] + + k[1725]*y_cur[IDX_C2H2II] + k[1728]*y_cur[IDX_C2H3II] + + k[1731]*y_cur[IDX_C3H2II] + k[1733]*y_cur[IDX_C3H3II] + + k[1735]*y_cur[IDX_C4HII] + k[1736]*y_cur[IDX_C4H2II] + + k[1737]*y_cur[IDX_C4H3II] + k[1738]*y_cur[IDX_C5H2II] + + k[1739]*y_cur[IDX_C6H2II] + k[1740]*y_cur[IDX_C7H2II] + + k[1742]*y_cur[IDX_CH2CCHII] + k[1750]*y_cur[IDX_SII] + + k[1751]*y_cur[IDX_SiII] + k[1975]*y_cur[IDX_CH2II] + + k[2049]*y_cur[IDX_CH3II] + k[2373]*y_cur[IDX_H2II] + + k[3086]*y_cur[IDX_HeII] + k[4888]*y_cur[IDX_C2H2I] + + k[4889]*y_cur[IDX_C3H2I] + k[4890]*y_cur[IDX_C5H2I] + + k[4891]*y_cur[IDX_C6H2I] + k[4892]*y_cur[IDX_C7H2I] + + k[4893]*y_cur[IDX_C8H2I] + k[4894]*y_cur[IDX_CH2CCH2I] + + k[4895]*y_cur[IDX_CH2CCH2I] + k[4896]*y_cur[IDX_CH3CCHI] + + k[4897]*y_cur[IDX_CH3CCHI] + k[4899]*y_cur[IDX_CSI] + + k[4900]*y_cur[IDX_C4H2I] + k[4901]*y_cur[IDX_HCNI] + + k[4902]*y_cur[IDX_HNCI] + k[4905]*y_cur[IDX_OCSI] + + k[4906]*y_cur[IDX_SI] + k[4916]*y_cur[IDX_CI] + + k[5133]*y_cur[IDX_H2I] + k[5228]*y_cur[IDX_NI] + k[5708] + k[5993]; + data[jistart + 20784] = 0.0 + k[376]*y_cur[IDX_HII] + k[1947]*y_cur[IDX_CHII] + + k[1980]*y_cur[IDX_CH2II] + k[2337]*y_cur[IDX_HII] + + k[2385]*y_cur[IDX_H2II] + k[2498]*y_cur[IDX_O2II] + + k[3220]*y_cur[IDX_HeII] + k[3361]*y_cur[IDX_N2II] - + k[5165]*y_cur[IDX_HI] + k[5466]*y_cur[IDX_OHI] + k[6153] + k[6153] + + k[6155]; + data[jistart + 20785] = 0.0 + k[388]*y_cur[IDX_HII] + k[1407]*y_cur[IDX_CII] + + k[1453]*y_cur[IDX_C2II] + k[1475]*y_cur[IDX_C2HII] + + k[1522]*y_cur[IDX_C2H2II] + k[1957]*y_cur[IDX_CHII] + + k[1986]*y_cur[IDX_CH2II] + k[2272]*y_cur[IDX_CNII] + + k[2868]*y_cur[IDX_C3II] + k[2870]*y_cur[IDX_C4HII] + + k[2885]*y_cur[IDX_SiII] + k[3245]*y_cur[IDX_HeII] + + k[3247]*y_cur[IDX_HeII] + k[4873]*y_cur[IDX_C2I] + + k[4901]*y_cur[IDX_C2HI] + k[5116]*y_cur[IDX_CNI] - + k[5170]*y_cur[IDX_HI] + k[5404]*y_cur[IDX_OI] + k[5854] + k[6181]; + data[jistart + 20786] = 0.0 + k[134]*y_cur[IDX_H2I] - k[141]*y_cur[IDX_HI] + + k[141]*y_cur[IDX_HI] + k[141]*y_cur[IDX_HI] + k[372]*y_cur[IDX_HII] + + k[1385]*y_cur[IDX_CII] + k[2239]*y_cur[IDX_C2II] + + k[2241]*y_cur[IDX_C2HII] + k[2242]*y_cur[IDX_C2H2II] + + k[2256]*y_cur[IDX_NII] + k[2261]*y_cur[IDX_OII] + + k[2265]*y_cur[IDX_SII] + k[2266]*y_cur[IDX_SiII] + + k[2380]*y_cur[IDX_H2II] + k[3202]*y_cur[IDX_HeII] + + k[4955]*y_cur[IDX_CI] + k[5063]*y_cur[IDX_C2H2I] + + k[5064]*y_cur[IDX_C2H2I] + k[5065]*y_cur[IDX_C2H4I] + + k[5066]*y_cur[IDX_C2H4I] + k[5067]*y_cur[IDX_CH2CCH2I] + + k[5068]*y_cur[IDX_CH3CCHI] + k[5070]*y_cur[IDX_C2H6I] + + k[5072]*y_cur[IDX_CH3CHCH2I] + k[5073]*y_cur[IDX_CH3OHI] + + k[5074]*y_cur[IDX_CH4I] + k[5080]*y_cur[IDX_NI] + + k[5082]*y_cur[IDX_NH3I] + k[5085]*y_cur[IDX_NOI] + + k[5086]*y_cur[IDX_O2I] + k[5087]*y_cur[IDX_O2I] + + k[5088]*y_cur[IDX_O2I] + k[5089]*y_cur[IDX_O2I] + + k[5096]*y_cur[IDX_OI] + k[5098]*y_cur[IDX_OCSI] + + k[5099]*y_cur[IDX_OHI] + k[5100]*y_cur[IDX_SI] + + k[5103]*y_cur[IDX_SOI] + k[5137]*y_cur[IDX_H2I] - + k[5160]*y_cur[IDX_HI] + k[5821] + k[6131]; + data[jistart + 20787] = 0.0 + k[415]*y_cur[IDX_HII] + k[1528]*y_cur[IDX_C2H2II] + + k[1679]*y_cur[IDX_C2H4II] + k[1973]*y_cur[IDX_CHII] + + k[1994]*y_cur[IDX_CH2II] + k[2517]*y_cur[IDX_H2OII] + + k[3506]*y_cur[IDX_NHII] + k[3526]*y_cur[IDX_NH2II] + + k[3790]*y_cur[IDX_OHII] + k[3834]*y_cur[IDX_C3H2II] + + k[3836]*y_cur[IDX_C4H2II] + k[3839]*y_cur[IDX_H3SII] + + k[3883]*y_cur[IDX_SiH2II] + k[4906]*y_cur[IDX_C2HI] + + k[5020]*y_cur[IDX_CH2I] + k[5048]*y_cur[IDX_CH3I] + + k[5100]*y_cur[IDX_CHI] + k[5149]*y_cur[IDX_H2I] + + k[5325]*y_cur[IDX_NHI] + k[5480]*y_cur[IDX_OHI] + + k[5486]*y_cur[IDX_HCOI] + k[5488]*y_cur[IDX_HSI]; + data[jistart + 20788] = 0.0 + k[323]*y_cur[IDX_HII] + k[1933]*y_cur[IDX_CHII] + + k[2369]*y_cur[IDX_H2II] + k[3478]*y_cur[IDX_NHII] + + k[4867]*y_cur[IDX_C2H2I] + k[4868]*y_cur[IDX_C2H4I] + + k[4869]*y_cur[IDX_C2H6I] + k[4869]*y_cur[IDX_C2H6I] + + k[4870]*y_cur[IDX_CH3CHCH2I] + k[4870]*y_cur[IDX_CH3CHCH2I] + + k[4871]*y_cur[IDX_CH4I] + k[4872]*y_cur[IDX_C4H2I] + + k[4873]*y_cur[IDX_HCNI] - k[5153]*y_cur[IDX_HI]; + data[jistart + 20789] = 0.0 + k[139]*y_cur[IDX_H2I] - k[145]*y_cur[IDX_HI] + + k[145]*y_cur[IDX_HI] + k[145]*y_cur[IDX_HI] + k[408]*y_cur[IDX_HII] + + k[1426]*y_cur[IDX_CII] + k[2397]*y_cur[IDX_H2II] + + k[3297]*y_cur[IDX_HeII] + k[3650]*y_cur[IDX_OII] + + k[3796]*y_cur[IDX_C2H2II] + k[3802]*y_cur[IDX_HCOII] + + k[3807]*y_cur[IDX_PII] + k[3808]*y_cur[IDX_SII] + + k[3809]*y_cur[IDX_SiII] + k[4981]*y_cur[IDX_CI] + + k[5016]*y_cur[IDX_CH2I] + k[5099]*y_cur[IDX_CHI] + + k[5148]*y_cur[IDX_H2I] - k[5198]*y_cur[IDX_HI] + + k[5283]*y_cur[IDX_NI] + k[5322]*y_cur[IDX_NHI] + + k[5432]*y_cur[IDX_OI] + k[5454]*y_cur[IDX_C2H2I] + + k[5460]*y_cur[IDX_CNI] + k[5461]*y_cur[IDX_COI] + + k[5463]*y_cur[IDX_CSI] + k[5466]*y_cur[IDX_H2COI] + + k[5477]*y_cur[IDX_NOI] + k[5480]*y_cur[IDX_SI] + + k[5481]*y_cur[IDX_SOI] + k[5482]*y_cur[IDX_SiI] + + k[5483]*y_cur[IDX_SiOI] - k[5574]*y_cur[IDX_HI] + k[5905] + k[6244]; + data[jistart + 20790] = 0.0 + k[401]*y_cur[IDX_HII] + k[1418]*y_cur[IDX_CII] + + k[1988]*y_cur[IDX_CH2II] + k[3284]*y_cur[IDX_HeII] + + k[3595]*y_cur[IDX_PII] + k[3598]*y_cur[IDX_PHII] + + k[3602]*y_cur[IDX_SiII] + k[5082]*y_cur[IDX_CHI] - + k[5183]*y_cur[IDX_HI] + k[5303]*y_cur[IDX_CNI] + k[5885] + k[6221]; + data[jistart + 20791] = 0.0 + k[742]*y_cur[IDX_eM] + k[742]*y_cur[IDX_eM] + + k[743]*y_cur[IDX_eM] + k[1480]*y_cur[IDX_C2H2I] + + k[1483]*y_cur[IDX_C2H4I] + k[1486]*y_cur[IDX_C3H2I] + + k[1488]*y_cur[IDX_C3HI] + k[1490]*y_cur[IDX_C4HI] + + k[1492]*y_cur[IDX_C5H2I] + k[1494]*y_cur[IDX_C5HI] + + k[1496]*y_cur[IDX_C6H2I] + k[1498]*y_cur[IDX_C6HI] + + k[1500]*y_cur[IDX_C7H2I] + k[1502]*y_cur[IDX_C7HI] + + k[1504]*y_cur[IDX_C8H2I] + k[1506]*y_cur[IDX_C8HI] + + k[1508]*y_cur[IDX_CH2CCHI] + k[1509]*y_cur[IDX_CH3CCHI] + + k[1517]*y_cur[IDX_H2CCCI] + k[1521]*y_cur[IDX_C4H2I] + + k[1522]*y_cur[IDX_HCNI] + k[1526]*y_cur[IDX_PI] + + k[1528]*y_cur[IDX_SI] + k[1530]*y_cur[IDX_SiI] + + k[1725]*y_cur[IDX_C2HI] + k[1850]*y_cur[IDX_CI] + + k[1998]*y_cur[IDX_CH2I] + k[2155]*y_cur[IDX_CH4I] + + k[2242]*y_cur[IDX_CHI] + k[2277]*y_cur[IDX_CNI] + + k[2403]*y_cur[IDX_H2I] + k[3388]*y_cur[IDX_NI] + + k[3532]*y_cur[IDX_NH2I] + k[3607]*y_cur[IDX_NHI] + + k[3688]*y_cur[IDX_OI] + k[3796]*y_cur[IDX_OHI] + + k[4692]*y_cur[IDX_HM] + k[6356]*y_cur[IDX_GRAINM] + + k[6356]*y_cur[IDX_GRAINM] + k[6357]*y_cur[IDX_GRAINM]; + data[jistart + 20792] = 0.0 + k[923]*y_cur[IDX_eM] + k[925]*y_cur[IDX_eM] + + k[925]*y_cur[IDX_eM] + k[2043]*y_cur[IDX_C2H3I] + + k[2049]*y_cur[IDX_C2HI] + k[2061]*y_cur[IDX_CH2CCHI] + + k[2075]*y_cur[IDX_CNI] + k[2086]*y_cur[IDX_NH2I] + + k[2090]*y_cur[IDX_OI] + k[2094]*y_cur[IDX_PI] + + k[2098]*y_cur[IDX_SiI] - k[2837]*y_cur[IDX_HI] + + k[3454]*y_cur[IDX_NI] + k[4698]*y_cur[IDX_HM] + k[6096] + + k[6321]*y_cur[IDX_GRAINM] + k[6323]*y_cur[IDX_GRAINM] + + k[6323]*y_cur[IDX_GRAINM]; + data[jistart + 20793] = 0.0 + k[324]*y_cur[IDX_HII] + k[1300]*y_cur[IDX_CII] + + k[1452]*y_cur[IDX_C2II] + k[1466]*y_cur[IDX_C2HII] + + k[1480]*y_cur[IDX_C2H2II] + k[1537]*y_cur[IDX_C2H4II] + + k[1541]*y_cur[IDX_C2NII] + k[1543]*y_cur[IDX_C3II] + + k[1544]*y_cur[IDX_C3HII] + k[1545]*y_cur[IDX_C3H2II] + + k[1547]*y_cur[IDX_C3H4II] + k[1550]*y_cur[IDX_C4II] + + k[1551]*y_cur[IDX_C4HII] + k[1552]*y_cur[IDX_C4H2II] + + k[1554]*y_cur[IDX_C4H4II] + k[1556]*y_cur[IDX_C5II] + + k[1558]*y_cur[IDX_C6II] + k[1559]*y_cur[IDX_C6HII] + + k[1561]*y_cur[IDX_C7H2II] + k[1564]*y_cur[IDX_C2H6II] + + k[1569]*y_cur[IDX_PII] + k[1570]*y_cur[IDX_PHII] + + k[1573]*y_cur[IDX_SII] + k[1574]*y_cur[IDX_SiII] + + k[1575]*y_cur[IDX_SiC2II] + k[1934]*y_cur[IDX_CHII] + + k[2134]*y_cur[IDX_CH4II] + k[2370]*y_cur[IDX_H2II] + + k[3075]*y_cur[IDX_HeII] + k[3655]*y_cur[IDX_O2II] + + k[4867]*y_cur[IDX_C2I] + k[4877]*y_cur[IDX_C4HI] + + k[4878]*y_cur[IDX_NOI] + k[4880]*y_cur[IDX_SiI] + + k[4888]*y_cur[IDX_C2HI] + k[4912]*y_cur[IDX_CI] + + k[4991]*y_cur[IDX_CH2I] + k[5063]*y_cur[IDX_CHI] + + k[5064]*y_cur[IDX_CHI] + k[5104]*y_cur[IDX_CNI] - + k[5154]*y_cur[IDX_HI] + k[5454]*y_cur[IDX_OHI] + k[5697] + k[5982]; + data[jistart + 20794] = 0.0 + k[1467]*y_cur[IDX_C2HII] + k[1944]*y_cur[IDX_CHII] + + k[1945]*y_cur[IDX_CHII] + k[2075]*y_cur[IDX_CH3II] + + k[2277]*y_cur[IDX_C2H2II] + k[2381]*y_cur[IDX_H2II] + + k[5104]*y_cur[IDX_C2H2I] + k[5106]*y_cur[IDX_C2H4I] + + k[5107]*y_cur[IDX_C6H2I] + k[5108]*y_cur[IDX_C8H2I] + + k[5109]*y_cur[IDX_CH2CCH2I] + k[5110]*y_cur[IDX_CH3CCHI] + + k[5115]*y_cur[IDX_C4H2I] + k[5116]*y_cur[IDX_HCNI] + + k[5118]*y_cur[IDX_HNCI] + k[5138]*y_cur[IDX_H2I] + + k[5303]*y_cur[IDX_NH3I] + k[5460]*y_cur[IDX_OHI]; + data[jistart + 20795] = 0.0 + k[7070] + k[7252] + k[7434]; + data[jistart + 20796] = 0.0 + k[362]*y_cur[IDX_HII] + k[1353]*y_cur[IDX_CII] + + k[2101]*y_cur[IDX_SII] + k[2103]*y_cur[IDX_SiII] + + k[4949]*y_cur[IDX_CI] + k[5027]*y_cur[IDX_CH3I] + + k[5027]*y_cur[IDX_CH3I] + k[5043]*y_cur[IDX_OI] + + k[5044]*y_cur[IDX_OI] + k[5048]*y_cur[IDX_SI] + + k[5049]*y_cur[IDX_SiI] + k[5136]*y_cur[IDX_H2I] - + k[5158]*y_cur[IDX_HI] + k[5257]*y_cur[IDX_NI] + + k[5259]*y_cur[IDX_NI] + k[5259]*y_cur[IDX_NI] + k[5793] + k[6097]; + data[jistart + 20797] = 0.0 + k[111]*y_cur[IDX_C2HM] + k[1961]*y_cur[IDX_CHII] + + k[2392]*y_cur[IDX_H2II] + k[3385]*y_cur[IDX_C2HII] + + k[3388]*y_cur[IDX_C2H2II] + k[3391]*y_cur[IDX_C2H4II] + + k[3394]*y_cur[IDX_C3HII] + k[3406]*y_cur[IDX_C4H2II] + + k[3408]*y_cur[IDX_C4H5II] + k[3412]*y_cur[IDX_C5HII] + + k[3415]*y_cur[IDX_C5H2II] + k[3416]*y_cur[IDX_C5H3II] + + k[3429]*y_cur[IDX_C7HII] + k[3432]*y_cur[IDX_C7H2II] + + k[3433]*y_cur[IDX_C7H3II] + k[3434]*y_cur[IDX_C7H4II] + + k[3446]*y_cur[IDX_C9HII] + k[3449]*y_cur[IDX_C9H2II] + + k[3450]*y_cur[IDX_C9H3II] + k[3451]*y_cur[IDX_C9H4II] + + k[3452]*y_cur[IDX_CH2II] + k[3453]*y_cur[IDX_CH2CCHII] + + k[3454]*y_cur[IDX_CH3II] + k[3455]*y_cur[IDX_CH3C4HII] + + k[3457]*y_cur[IDX_H2OII] + k[3462]*y_cur[IDX_HSII] + + k[3463]*y_cur[IDX_NHII] + k[3464]*y_cur[IDX_NH2II] + + k[3466]*y_cur[IDX_O2HII] + k[3467]*y_cur[IDX_OHII] + + k[3470]*y_cur[IDX_SiCH2II] + k[3471]*y_cur[IDX_SiHII] + + k[3472]*y_cur[IDX_SiH2II] + k[3474]*y_cur[IDX_SiH3II] + + k[5080]*y_cur[IDX_CHI] + k[5141]*y_cur[IDX_H2I] + + k[5224]*y_cur[IDX_C2H3I] + k[5228]*y_cur[IDX_C2HI] + + k[5232]*y_cur[IDX_C3H2I] + k[5233]*y_cur[IDX_C3HI] + + k[5236]*y_cur[IDX_C4HI] + k[5239]*y_cur[IDX_C5H2I] + + k[5240]*y_cur[IDX_C5HI] + k[5245]*y_cur[IDX_C7H2I] + + k[5246]*y_cur[IDX_C7HI] + k[5251]*y_cur[IDX_C9HI] + + k[5253]*y_cur[IDX_CH2I] + k[5254]*y_cur[IDX_CH2I] + + k[5257]*y_cur[IDX_CH3I] + k[5259]*y_cur[IDX_CH3I] + + k[5259]*y_cur[IDX_CH3I] + k[5267]*y_cur[IDX_HCOI] + + k[5269]*y_cur[IDX_HNOI] + k[5271]*y_cur[IDX_HSI] + + k[5274]*y_cur[IDX_NHI] + k[5283]*y_cur[IDX_OHI] + + k[5285]*y_cur[IDX_PHI] + k[5294]*y_cur[IDX_SiH2I] + + k[5296]*y_cur[IDX_SiHI]; + data[jistart + 20798] = 0.0 + k[1041]*y_cur[IDX_eM] + k[1042]*y_cur[IDX_eM] + + k[1044]*y_cur[IDX_eM] + k[1044]*y_cur[IDX_eM] + + k[2814]*y_cur[IDX_NaI] + k[3900]*y_cur[IDX_CM] + + k[3935]*y_cur[IDX_C10M] + k[3970]*y_cur[IDX_C10HM] + + k[4005]*y_cur[IDX_C2M] + k[4040]*y_cur[IDX_C2HM] + + k[4075]*y_cur[IDX_C3M] + k[4110]*y_cur[IDX_C3HM] + + k[4145]*y_cur[IDX_C3NM] + k[4180]*y_cur[IDX_C4M] + + k[4215]*y_cur[IDX_C4HM] + k[4250]*y_cur[IDX_C5M] + + k[4285]*y_cur[IDX_C5HM] + k[4320]*y_cur[IDX_C5NM] + + k[4355]*y_cur[IDX_C6M] + k[4390]*y_cur[IDX_C6HM] + + k[4425]*y_cur[IDX_C7M] + k[4460]*y_cur[IDX_C7HM] + + k[4495]*y_cur[IDX_C8M] + k[4530]*y_cur[IDX_C8HM] + + k[4565]*y_cur[IDX_C9M] + k[4600]*y_cur[IDX_C9HM] + + k[4635]*y_cur[IDX_CHM] + k[4670]*y_cur[IDX_CNM] + + k[4706]*y_cur[IDX_HM] + k[4706]*y_cur[IDX_HM] + + k[4741]*y_cur[IDX_OM] + k[4776]*y_cur[IDX_O2M] + + k[4811]*y_cur[IDX_OHM] + k[4846]*y_cur[IDX_SM] + + k[6343]*y_cur[IDX_GRAINM] + k[6344]*y_cur[IDX_GRAINM] + + k[6346]*y_cur[IDX_GRAINM] + k[6346]*y_cur[IDX_GRAINM]; + data[jistart + 20799] = 0.0 + k[129]*y_cur[IDX_C2HM] + k[406]*y_cur[IDX_HII] + + k[1969]*y_cur[IDX_CHII] + k[1991]*y_cur[IDX_CH2II] + + k[2090]*y_cur[IDX_CH3II] + k[2396]*y_cur[IDX_H2II] + + k[2730]*y_cur[IDX_H3II] + k[3688]*y_cur[IDX_C2H2II] + + k[3738]*y_cur[IDX_HCSII] + k[3740]*y_cur[IDX_HNOII] + + k[3743]*y_cur[IDX_HSII] + k[3746]*y_cur[IDX_NH2II] + + k[3750]*y_cur[IDX_OHII] + k[3751]*y_cur[IDX_PHII] + + k[3756]*y_cur[IDX_SiHII] + k[3757]*y_cur[IDX_SiH2II] + + k[3758]*y_cur[IDX_SiH3II] + k[5013]*y_cur[IDX_CH2I] + + k[5013]*y_cur[IDX_CH2I] + k[5014]*y_cur[IDX_CH2I] + + k[5043]*y_cur[IDX_CH3I] + k[5044]*y_cur[IDX_CH3I] + + k[5096]*y_cur[IDX_CHI] + k[5147]*y_cur[IDX_H2I] + + k[5318]*y_cur[IDX_NHI] + k[5319]*y_cur[IDX_NHI] + + k[5345]*y_cur[IDX_C2H3I] + k[5350]*y_cur[IDX_C2H5I] + + k[5384]*y_cur[IDX_CH2PHI] + k[5404]*y_cur[IDX_HCNI] + + k[5405]*y_cur[IDX_HCOI] + k[5409]*y_cur[IDX_HCSI] + + k[5411]*y_cur[IDX_HNOI] + k[5416]*y_cur[IDX_HSI] + + k[5420]*y_cur[IDX_NH2I] + k[5432]*y_cur[IDX_OHI] + + k[5433]*y_cur[IDX_PH2I] + k[5436]*y_cur[IDX_PHI] + + k[5446]*y_cur[IDX_SiH2I] + k[5446]*y_cur[IDX_SiH2I] + + k[5447]*y_cur[IDX_SiH3I] + k[5449]*y_cur[IDX_SiHI] - + k[5573]*y_cur[IDX_HI]; + data[jistart + 20800] = 0.0 - k[491]*y_cur[IDX_HI] + k[2457]*y_cur[IDX_H2I] + + k[3034]*y_cur[IDX_HNC3I] + k[3062]*y_cur[IDX_C10H2I] + + k[3062]*y_cur[IDX_C10H2I] + k[3064]*y_cur[IDX_C10H2I] + + k[3066]*y_cur[IDX_C10H2I] + k[3069]*y_cur[IDX_C10HI] + + k[3072]*y_cur[IDX_C10HI] + k[3075]*y_cur[IDX_C2H2I] + + k[3078]*y_cur[IDX_C2H3I] + k[3079]*y_cur[IDX_C2H4I] + + k[3081]*y_cur[IDX_C2H4I] + k[3084]*y_cur[IDX_C2H5I] + + k[3086]*y_cur[IDX_C2HI] + k[3096]*y_cur[IDX_C3H2I] + + k[3097]*y_cur[IDX_C3HI] + k[3110]*y_cur[IDX_C4H3I] + + k[3112]*y_cur[IDX_C4HI] + k[3121]*y_cur[IDX_C5H2I] + + k[3123]*y_cur[IDX_C5HI] + k[3129]*y_cur[IDX_C6H2I] + + k[3131]*y_cur[IDX_C6H6I] + k[3133]*y_cur[IDX_C6HI] + + k[3138]*y_cur[IDX_C7H2I] + k[3140]*y_cur[IDX_C7HI] + + k[3146]*y_cur[IDX_C8H2I] + k[3148]*y_cur[IDX_C8HI] + + k[3153]*y_cur[IDX_C9H2I] + k[3155]*y_cur[IDX_C9HI] + + k[3161]*y_cur[IDX_CH2I] + k[3162]*y_cur[IDX_CH2CCHI] + + k[3164]*y_cur[IDX_CH2CCHI] + k[3168]*y_cur[IDX_CH2CHCNI] + + k[3179]*y_cur[IDX_CH3C4HI] + k[3182]*y_cur[IDX_CH3C6HI] + + k[3185]*y_cur[IDX_CH3CCHI] + k[3187]*y_cur[IDX_CH3CCHI] + + k[3189]*y_cur[IDX_C2H6I] + k[3195]*y_cur[IDX_CH3OCH3I] + + k[3198]*y_cur[IDX_CH4I] + k[3200]*y_cur[IDX_CH4I] + + k[3202]*y_cur[IDX_CHI] + k[3218]*y_cur[IDX_H2CCCI] + + k[3220]*y_cur[IDX_H2COI] + k[3225]*y_cur[IDX_H2OI] + + k[3228]*y_cur[IDX_H2S2I] + k[3229]*y_cur[IDX_H2SI] + + k[3231]*y_cur[IDX_H2SiOI] + k[3236]*y_cur[IDX_HC3NI] + + k[3240]*y_cur[IDX_C4H2I] + k[3245]*y_cur[IDX_HCNI] + + k[3247]*y_cur[IDX_HCNI] + k[3249]*y_cur[IDX_HCOI] + + k[3255]*y_cur[IDX_HCSI] + k[3258]*y_cur[IDX_HCSiI] + + k[3259]*y_cur[IDX_HClI] + k[3260]*y_cur[IDX_HFI] + + k[3261]*y_cur[IDX_HNCI] + k[3262]*y_cur[IDX_HNCI] + + k[3264]*y_cur[IDX_HNCOI] + k[3265]*y_cur[IDX_HNOI] + + k[3267]*y_cur[IDX_HNSiI] + k[3268]*y_cur[IDX_HOCNI] + + k[3270]*y_cur[IDX_HPOI] + k[3272]*y_cur[IDX_HS2I] + + k[3273]*y_cur[IDX_HSI] + k[3281]*y_cur[IDX_NH2I] + + k[3284]*y_cur[IDX_NH3I] + k[3285]*y_cur[IDX_NHI] + + k[3297]*y_cur[IDX_OHI] + k[3299]*y_cur[IDX_PHI] + + k[3308]*y_cur[IDX_SiC2H2I] + k[3311]*y_cur[IDX_SiC2HI] + + k[3314]*y_cur[IDX_SiC3HI] + k[3318]*y_cur[IDX_SiCH2I] + + k[3320]*y_cur[IDX_SiCH3I] + k[3323]*y_cur[IDX_SiH2I] + + k[3325]*y_cur[IDX_SiH3I] + k[3327]*y_cur[IDX_SiH4I] + + k[3328]*y_cur[IDX_SiHI] + k[4712]*y_cur[IDX_HM] + + k[5632]*y_cur[IDX_CH3OI]; + data[jistart + 20801] = 0.0 + k[2390]*y_cur[IDX_H2II]; + data[jistart + 20802] = 0.0 + k[1298]*y_cur[IDX_C10HI] + k[1300]*y_cur[IDX_C2H2I] + + k[1301]*y_cur[IDX_C2H3I] + k[1303]*y_cur[IDX_C2H4I] + + k[1305]*y_cur[IDX_C2H4I] + k[1308]*y_cur[IDX_C2HI] + + k[1311]*y_cur[IDX_C3H2I] + k[1312]*y_cur[IDX_C3HI] + + k[1319]*y_cur[IDX_C4H3I] + k[1320]*y_cur[IDX_C4HI] + + k[1324]*y_cur[IDX_C5H2I] + k[1325]*y_cur[IDX_C5HI] + + k[1327]*y_cur[IDX_C6H2I] + k[1330]*y_cur[IDX_C6H6I] + + k[1331]*y_cur[IDX_C6HI] + k[1333]*y_cur[IDX_C7H2I] + + k[1334]*y_cur[IDX_C7HI] + k[1336]*y_cur[IDX_C8H2I] + + k[1337]*y_cur[IDX_C8HI] + k[1339]*y_cur[IDX_C9H2I] + + k[1340]*y_cur[IDX_C9HI] + k[1342]*y_cur[IDX_CH2I] + + k[1347]*y_cur[IDX_CH2CCHI] + k[1350]*y_cur[IDX_CH2CHCNI] + + k[1353]*y_cur[IDX_CH3I] + k[1358]*y_cur[IDX_CH3C4HI] + + k[1372]*y_cur[IDX_C2H6I] + k[1377]*y_cur[IDX_CH3CHCH2I] + + k[1384]*y_cur[IDX_CH4I] + k[1385]*y_cur[IDX_CHI] + + k[1389]*y_cur[IDX_H2CCCI] + k[1393]*y_cur[IDX_H2OI] + + k[1394]*y_cur[IDX_H2OI] + k[1395]*y_cur[IDX_H2SI] + + k[1401]*y_cur[IDX_HC3NI] + k[1403]*y_cur[IDX_C4H2I] + + k[1407]*y_cur[IDX_HCNI] + k[1409]*y_cur[IDX_HCPI] + + k[1410]*y_cur[IDX_HCSiI] + k[1411]*y_cur[IDX_HClI] + + k[1412]*y_cur[IDX_HFI] + k[1413]*y_cur[IDX_HNCI] + + k[1414]*y_cur[IDX_HNSiI] + k[1415]*y_cur[IDX_HSI] + + k[1417]*y_cur[IDX_NH2I] + k[1418]*y_cur[IDX_NH3I] + + k[1420]*y_cur[IDX_NHI] + k[1426]*y_cur[IDX_OHI] + + k[1431]*y_cur[IDX_SiC2H2I] + k[1432]*y_cur[IDX_SiC2HI] + + k[1433]*y_cur[IDX_SiC3HI] + k[1436]*y_cur[IDX_SiCH2I] + + k[1438]*y_cur[IDX_SiCH3I] + k[1439]*y_cur[IDX_SiH2I] + + k[1442]*y_cur[IDX_SiH3I] + k[1444]*y_cur[IDX_SiH4I] + + k[1445]*y_cur[IDX_SiHI] + k[2398]*y_cur[IDX_H2I] + + k[3019]*y_cur[IDX_HNC3I] + k[4691]*y_cur[IDX_HM] - + k[5569]*y_cur[IDX_HI]; + data[jistart + 20803] = 0.0 + k[136]*y_cur[IDX_H2I] - k[143]*y_cur[IDX_HI] + + k[143]*y_cur[IDX_HI] + k[143]*y_cur[IDX_HI] + k[378]*y_cur[IDX_HII] + + k[1393]*y_cur[IDX_CII] + k[1394]*y_cur[IDX_CII] + + k[1951]*y_cur[IDX_CHII] + k[1982]*y_cur[IDX_CH2II] + + k[2386]*y_cur[IDX_H2II] + k[2520]*y_cur[IDX_C2II] + + k[2521]*y_cur[IDX_C2HII] + k[2538]*y_cur[IDX_CNII] + + k[2562]*y_cur[IDX_PII] + k[2564]*y_cur[IDX_PHII] + + k[2569]*y_cur[IDX_SiII] + k[3225]*y_cur[IDX_HeII] - + k[5168]*y_cur[IDX_HI] + k[5839] + k[6160]; + data[jistart + 20804] = 0.0 + k[319]*y_cur[IDX_ClI] + k[320]*y_cur[IDX_C10I] + + k[321]*y_cur[IDX_C10H2I] + k[322]*y_cur[IDX_C10HI] + + k[323]*y_cur[IDX_C2I] + k[324]*y_cur[IDX_C2H2I] + + k[325]*y_cur[IDX_C2H3I] + k[326]*y_cur[IDX_C2H4I] + + k[327]*y_cur[IDX_C2H5I] + k[328]*y_cur[IDX_C2H5OHI] + + k[329]*y_cur[IDX_C2HI] + k[330]*y_cur[IDX_C2NI] + + k[331]*y_cur[IDX_C2OI] + k[332]*y_cur[IDX_C2SI] + + k[333]*y_cur[IDX_C3I] + k[334]*y_cur[IDX_C3H2I] + + k[335]*y_cur[IDX_C3HI] + k[336]*y_cur[IDX_C3OI] + + k[337]*y_cur[IDX_C3SI] + k[338]*y_cur[IDX_C4I] + + k[339]*y_cur[IDX_C4H3I] + k[340]*y_cur[IDX_C4HI] + + k[341]*y_cur[IDX_C4PI] + k[342]*y_cur[IDX_C4SI] + + k[343]*y_cur[IDX_C5I] + k[344]*y_cur[IDX_C5H2I] + + k[345]*y_cur[IDX_C5HI] + k[346]*y_cur[IDX_C6I] + + k[347]*y_cur[IDX_C6H2I] + k[348]*y_cur[IDX_C6HI] + + k[349]*y_cur[IDX_C7I] + k[350]*y_cur[IDX_C7H2I] + + k[351]*y_cur[IDX_C7HI] + k[352]*y_cur[IDX_C8I] + + k[353]*y_cur[IDX_C8H2I] + k[354]*y_cur[IDX_C8HI] + + k[355]*y_cur[IDX_C9I] + k[356]*y_cur[IDX_C9H2I] + + k[357]*y_cur[IDX_C9HI] + k[358]*y_cur[IDX_CCPI] + + k[359]*y_cur[IDX_CH2I] + k[360]*y_cur[IDX_CH2CCHI] + + k[361]*y_cur[IDX_CH2CNI] + k[362]*y_cur[IDX_CH3I] + + k[363]*y_cur[IDX_CH3C4HI] + k[364]*y_cur[IDX_CH3C6HI] + + k[365]*y_cur[IDX_CH3CCHI] + k[366]*y_cur[IDX_CH3CHOI] + + k[367]*y_cur[IDX_CH3CNI] + k[368]*y_cur[IDX_CH3COCH3I] + + k[369]*y_cur[IDX_CH3OCH3I] + k[370]*y_cur[IDX_CH3OHI] + + k[371]*y_cur[IDX_CH4I] + k[372]*y_cur[IDX_CHI] + + k[373]*y_cur[IDX_CPI] + k[374]*y_cur[IDX_CSI] + + k[375]*y_cur[IDX_FeI] + k[376]*y_cur[IDX_H2COI] + + k[377]*y_cur[IDX_H2CSI] + k[378]*y_cur[IDX_H2OI] + + k[379]*y_cur[IDX_H2S2I] + k[380]*y_cur[IDX_H2SI] + + k[381]*y_cur[IDX_H2SiOI] + k[382]*y_cur[IDX_HC2PI] + + k[383]*y_cur[IDX_HC3NI] + k[384]*y_cur[IDX_C4H2I] + + k[385]*y_cur[IDX_HC5NI] + k[386]*y_cur[IDX_HC7NI] + + k[387]*y_cur[IDX_HC9NI] + k[388]*y_cur[IDX_HCNI] + + k[389]*y_cur[IDX_HCOI] + k[390]*y_cur[IDX_HCOOCH3I] + + k[391]*y_cur[IDX_HCPI] + k[392]*y_cur[IDX_HCSiI] + + k[393]*y_cur[IDX_HClI] + k[394]*y_cur[IDX_HNSiI] + + k[395]*y_cur[IDX_HPOI] + k[396]*y_cur[IDX_HS2I] + + k[397]*y_cur[IDX_HSI] + k[398]*y_cur[IDX_MgI] + + k[399]*y_cur[IDX_N2OI] + k[400]*y_cur[IDX_NH2I] + + k[401]*y_cur[IDX_NH3I] + k[402]*y_cur[IDX_NHI] + + k[403]*y_cur[IDX_NOI] + k[404]*y_cur[IDX_NSI] + + k[405]*y_cur[IDX_O2I] + k[406]*y_cur[IDX_OI] + + k[407]*y_cur[IDX_OCSI] + k[408]*y_cur[IDX_OHI] + + k[409]*y_cur[IDX_PI] + k[410]*y_cur[IDX_PH2I] + + k[411]*y_cur[IDX_PHI] + k[412]*y_cur[IDX_PNI] + + k[413]*y_cur[IDX_POI] + k[414]*y_cur[IDX_S2I] + k[415]*y_cur[IDX_SI] + + k[416]*y_cur[IDX_SO2I] + k[417]*y_cur[IDX_SOI] + + k[418]*y_cur[IDX_SiI] + k[419]*y_cur[IDX_SiC2I] + + k[420]*y_cur[IDX_SiC2H2I] + k[421]*y_cur[IDX_SiC2HI] + + k[422]*y_cur[IDX_SiC3I] + k[423]*y_cur[IDX_SiC3HI] + + k[424]*y_cur[IDX_SiC4I] + k[425]*y_cur[IDX_SiCI] + + k[426]*y_cur[IDX_SiCH2I] + k[427]*y_cur[IDX_SiCH3I] + + k[428]*y_cur[IDX_SiH2I] + k[429]*y_cur[IDX_SiH3I] + + k[430]*y_cur[IDX_SiH4I] + k[431]*y_cur[IDX_SiHI] + + k[432]*y_cur[IDX_SiNI] + k[433]*y_cur[IDX_SiNCI] + + k[434]*y_cur[IDX_SiOI] + k[435]*y_cur[IDX_SiSI] + + k[2296]*y_cur[IDX_C2H4I] + k[2319]*y_cur[IDX_CH2PHI] + + k[2327]*y_cur[IDX_C2H6I] + k[2336]*y_cur[IDX_H2CCCI] + + k[2337]*y_cur[IDX_H2COI] + k[2340]*y_cur[IDX_H2SI] + + k[3023]*y_cur[IDX_HNC3I] + k[3896]*y_cur[IDX_CM] + + k[3931]*y_cur[IDX_C10M] + k[3966]*y_cur[IDX_C10HM] + + k[4001]*y_cur[IDX_C2M] + k[4036]*y_cur[IDX_C2HM] + + k[4071]*y_cur[IDX_C3M] + k[4106]*y_cur[IDX_C3HM] + + k[4141]*y_cur[IDX_C3NM] + k[4176]*y_cur[IDX_C4M] + + k[4211]*y_cur[IDX_C4HM] + k[4246]*y_cur[IDX_C5M] + + k[4281]*y_cur[IDX_C5HM] + k[4316]*y_cur[IDX_C5NM] + + k[4351]*y_cur[IDX_C6M] + k[4386]*y_cur[IDX_C6HM] + + k[4421]*y_cur[IDX_C7M] + k[4456]*y_cur[IDX_C7HM] + + k[4491]*y_cur[IDX_C8M] + k[4526]*y_cur[IDX_C8HM] + + k[4561]*y_cur[IDX_C9M] + k[4596]*y_cur[IDX_C9HM] + + k[4631]*y_cur[IDX_CHM] + k[4666]*y_cur[IDX_CNM] + + k[4701]*y_cur[IDX_HM] + k[4701]*y_cur[IDX_HM] + + k[4737]*y_cur[IDX_OM] + k[4772]*y_cur[IDX_O2M] + + k[4807]*y_cur[IDX_OHM] + k[4842]*y_cur[IDX_SM] - + k[5546]*y_cur[IDX_HI] + k[5615]*y_cur[IDX_eM] + + k[6308]*y_cur[IDX_GRAINM]; + data[jistart + 20805] = 0.0 + k[1846]*y_cur[IDX_C10HII] + k[1849]*y_cur[IDX_C2HII] + + k[1850]*y_cur[IDX_C2H2II] + k[1852]*y_cur[IDX_C2H3II] + + k[1854]*y_cur[IDX_C2H4II] + k[1856]*y_cur[IDX_C3H2II] + + k[1858]*y_cur[IDX_C3H3II] + k[1860]*y_cur[IDX_C3H4II] + + k[1862]*y_cur[IDX_C4HII] + k[1864]*y_cur[IDX_C4H2II] + + k[1866]*y_cur[IDX_C4H3II] + k[1867]*y_cur[IDX_C5HII] + + k[1869]*y_cur[IDX_C5H2II] + k[1871]*y_cur[IDX_C5H3II] + + k[1873]*y_cur[IDX_C6H2II] + k[1875]*y_cur[IDX_C6H3II] + + k[1876]*y_cur[IDX_C7HII] + k[1878]*y_cur[IDX_C7H2II] + + k[1880]*y_cur[IDX_C7H3II] + k[1882]*y_cur[IDX_C8H2II] + + k[1884]*y_cur[IDX_C8H3II] + k[1885]*y_cur[IDX_C9HII] + + k[1887]*y_cur[IDX_C9H2II] + k[1889]*y_cur[IDX_C9H3II] + + k[1890]*y_cur[IDX_CHII] + k[1891]*y_cur[IDX_CH2II] + + k[1893]*y_cur[IDX_CH2CCHII] + k[1895]*y_cur[IDX_CH3C3NHII] + + k[1896]*y_cur[IDX_CH3C5NHII] + k[1897]*y_cur[IDX_CH3C7NHII] + + k[1900]*y_cur[IDX_H2SII] + k[1902]*y_cur[IDX_HC2SII] + + k[1906]*y_cur[IDX_HCPII] + k[1908]*y_cur[IDX_HSII] + + k[1915]*y_cur[IDX_SiC2HII] + k[1916]*y_cur[IDX_SiC2H2II] + + k[1917]*y_cur[IDX_SiC2H3II] + k[1918]*y_cur[IDX_SiC3HII] + + k[1919]*y_cur[IDX_SiC3H2II] + k[1922]*y_cur[IDX_SiCH2II] + + k[1923]*y_cur[IDX_SiCH3II] + k[1924]*y_cur[IDX_SiCH4II] + + k[1925]*y_cur[IDX_SiHII] + k[1926]*y_cur[IDX_SiH2II] + + k[1927]*y_cur[IDX_SiH3II] + k[1929]*y_cur[IDX_SiH5II] + + k[1931]*y_cur[IDX_SiNH2II] + k[2374]*y_cur[IDX_H2II] + + k[4910]*y_cur[IDX_C10HI] + k[4912]*y_cur[IDX_C2H2I] + + k[4913]*y_cur[IDX_C2H3I] + k[4914]*y_cur[IDX_C2H4I] + + k[4915]*y_cur[IDX_C2H5I] + k[4916]*y_cur[IDX_C2HI] + + k[4919]*y_cur[IDX_C3H2I] + k[4920]*y_cur[IDX_C3HI] + + k[4924]*y_cur[IDX_C4H3I] + k[4925]*y_cur[IDX_C4HI] + + k[4927]*y_cur[IDX_C5H2I] + k[4928]*y_cur[IDX_C5HI] + + k[4932]*y_cur[IDX_C6H2I] + k[4933]*y_cur[IDX_C6HI] + + k[4935]*y_cur[IDX_C7H2I] + k[4936]*y_cur[IDX_C7HI] + + k[4939]*y_cur[IDX_C8H2I] + k[4940]*y_cur[IDX_C8HI] + + k[4941]*y_cur[IDX_C9H2I] + k[4942]*y_cur[IDX_C9HI] + + k[4944]*y_cur[IDX_CH2I] + k[4946]*y_cur[IDX_CH2CCH2I] + + k[4947]*y_cur[IDX_CH2CCHI] + k[4948]*y_cur[IDX_CH2CNI] + + k[4949]*y_cur[IDX_CH3I] + k[4952]*y_cur[IDX_CH3CCHI] + + k[4954]*y_cur[IDX_CH3CHCH2I] + k[4955]*y_cur[IDX_CHI] + + k[4959]*y_cur[IDX_H2CCCI] + k[4961]*y_cur[IDX_C4H2I] + + k[4962]*y_cur[IDX_HCOI] + k[4965]*y_cur[IDX_HSI] + + k[4969]*y_cur[IDX_NH2I] + k[4970]*y_cur[IDX_NH2I] + + k[4972]*y_cur[IDX_NHI] + k[4981]*y_cur[IDX_OHI] + + k[4983]*y_cur[IDX_PHI] + k[4988]*y_cur[IDX_SiH2I] + + k[4989]*y_cur[IDX_SiH3I] + k[4990]*y_cur[IDX_SiHI] + + k[5134]*y_cur[IDX_H2I] - k[5572]*y_cur[IDX_HI]; + data[jistart + 20806] = 0.0 + k[1097]*y_cur[IDX_eM] + k[3802]*y_cur[IDX_OHI] + + k[3904]*y_cur[IDX_CM] + k[3939]*y_cur[IDX_C10M] + + k[3974]*y_cur[IDX_C10HM] + k[4009]*y_cur[IDX_C2M] + + k[4044]*y_cur[IDX_C2HM] + k[4079]*y_cur[IDX_C3M] + + k[4114]*y_cur[IDX_C3HM] + k[4149]*y_cur[IDX_C3NM] + + k[4184]*y_cur[IDX_C4M] + k[4219]*y_cur[IDX_C4HM] + + k[4254]*y_cur[IDX_C5M] + k[4289]*y_cur[IDX_C5HM] + + k[4324]*y_cur[IDX_C5NM] + k[4359]*y_cur[IDX_C6M] + + k[4394]*y_cur[IDX_C6HM] + k[4429]*y_cur[IDX_C7M] + + k[4464]*y_cur[IDX_C7HM] + k[4499]*y_cur[IDX_C8M] + + k[4534]*y_cur[IDX_C8HM] + k[4569]*y_cur[IDX_C9M] + + k[4604]*y_cur[IDX_C9HM] + k[4639]*y_cur[IDX_CHM] + + k[4674]*y_cur[IDX_CNM] + k[4710]*y_cur[IDX_HM] + + k[4710]*y_cur[IDX_HM] + k[4711]*y_cur[IDX_HM] + + k[4745]*y_cur[IDX_OM] + k[4780]*y_cur[IDX_O2M] + + k[4815]*y_cur[IDX_OHM] + k[4850]*y_cur[IDX_SM] + k[6183] + + k[6389]*y_cur[IDX_GRAINM]; + data[jistart + 20807] = 0.0 + k[1025]*y_cur[IDX_eM] + k[1026]*y_cur[IDX_eM] + + k[1026]*y_cur[IDX_eM] + k[1026]*y_cur[IDX_eM] + + k[2680]*y_cur[IDX_FeI] + k[2717]*y_cur[IDX_MgI] + + k[2728]*y_cur[IDX_NaI] + k[2730]*y_cur[IDX_OI] + + k[3899]*y_cur[IDX_CM] + k[3934]*y_cur[IDX_C10M] + + k[3969]*y_cur[IDX_C10HM] + k[4004]*y_cur[IDX_C2M] + + k[4039]*y_cur[IDX_C2HM] + k[4074]*y_cur[IDX_C3M] + + k[4109]*y_cur[IDX_C3HM] + k[4144]*y_cur[IDX_C3NM] + + k[4179]*y_cur[IDX_C4M] + k[4214]*y_cur[IDX_C4HM] + + k[4249]*y_cur[IDX_C5M] + k[4284]*y_cur[IDX_C5HM] + + k[4319]*y_cur[IDX_C5NM] + k[4354]*y_cur[IDX_C6M] + + k[4389]*y_cur[IDX_C6HM] + k[4424]*y_cur[IDX_C7M] + + k[4459]*y_cur[IDX_C7HM] + k[4494]*y_cur[IDX_C8M] + + k[4529]*y_cur[IDX_C8HM] + k[4564]*y_cur[IDX_C9M] + + k[4599]*y_cur[IDX_C9HM] + k[4634]*y_cur[IDX_CHM] + + k[4669]*y_cur[IDX_CNM] + k[4705]*y_cur[IDX_HM] + + k[4705]*y_cur[IDX_HM] + k[4740]*y_cur[IDX_OM] + + k[4775]*y_cur[IDX_O2M] + k[4810]*y_cur[IDX_OHM] + + k[4845]*y_cur[IDX_SM] + k[6168] + k[6310]*y_cur[IDX_GRAINM] + + k[6311]*y_cur[IDX_GRAINM] + k[6311]*y_cur[IDX_GRAINM] + + k[6311]*y_cur[IDX_GRAINM]; + data[jistart + 20808] = 0.0 + k[2383]*y_cur[IDX_H2II] + k[3486]*y_cur[IDX_NHII] - + k[5163]*y_cur[IDX_HI] + k[5461]*y_cur[IDX_OHI]; + data[jistart + 20809] = 0.0 + k[6308]*y_cur[IDX_HII] + k[6309]*y_cur[IDX_H2II] + + k[6309]*y_cur[IDX_H2II] + k[6310]*y_cur[IDX_H3II] + + k[6311]*y_cur[IDX_H3II] + k[6311]*y_cur[IDX_H3II] + + k[6311]*y_cur[IDX_H3II] + k[6313]*y_cur[IDX_HeHII] + + k[6315]*y_cur[IDX_CHII] + k[6317]*y_cur[IDX_CH2II] + + k[6317]*y_cur[IDX_CH2II] + k[6318]*y_cur[IDX_CH2II] + + k[6320]*y_cur[IDX_NHII] + k[6321]*y_cur[IDX_CH3II] + + k[6323]*y_cur[IDX_CH3II] + k[6323]*y_cur[IDX_CH3II] + + k[6324]*y_cur[IDX_NH2II] + k[6324]*y_cur[IDX_NH2II] + + k[6325]*y_cur[IDX_NH2II] + k[6327]*y_cur[IDX_CH4II] + + k[6327]*y_cur[IDX_CH4II] + k[6328]*y_cur[IDX_CH4II] + + k[6329]*y_cur[IDX_OHII] + k[6330]*y_cur[IDX_NH3II] + + k[6331]*y_cur[IDX_NH3II] + k[6331]*y_cur[IDX_NH3II] + + k[6332]*y_cur[IDX_CH5II] + k[6334]*y_cur[IDX_CH5II] + + k[6334]*y_cur[IDX_CH5II] + k[6335]*y_cur[IDX_CH5II] + + k[6338]*y_cur[IDX_NH4II] + k[6338]*y_cur[IDX_NH4II] + + k[6339]*y_cur[IDX_NH4II] + k[6341]*y_cur[IDX_H2OII] + + k[6341]*y_cur[IDX_H2OII] + k[6342]*y_cur[IDX_H2OII] + + k[6343]*y_cur[IDX_H3OII] + k[6344]*y_cur[IDX_H3OII] + + k[6346]*y_cur[IDX_H3OII] + k[6346]*y_cur[IDX_H3OII] + + k[6348]*y_cur[IDX_HFII] + k[6350]*y_cur[IDX_H2FII] + + k[6354]*y_cur[IDX_C2HII] + k[6356]*y_cur[IDX_C2H2II] + + k[6356]*y_cur[IDX_C2H2II] + k[6357]*y_cur[IDX_C2H2II] + + k[6360]*y_cur[IDX_C2H3II] + k[6361]*y_cur[IDX_C2H3II] + + k[6362]*y_cur[IDX_C2H3II] + k[6363]*y_cur[IDX_C2H3II] + + k[6366]*y_cur[IDX_C2H3II] + k[6366]*y_cur[IDX_C2H3II] + + k[6367]*y_cur[IDX_C2H3II] + k[6367]*y_cur[IDX_C2H3II] + + k[6372]*y_cur[IDX_HCNII] + k[6377]*y_cur[IDX_H2NCII] + + k[6378]*y_cur[IDX_HCNHII] + k[6378]*y_cur[IDX_HCNHII] + + k[6379]*y_cur[IDX_HCNHII] + k[6380]*y_cur[IDX_HCNHII] + + k[6382]*y_cur[IDX_C2H4II] + k[6382]*y_cur[IDX_C2H4II] + + k[6383]*y_cur[IDX_C2H4II] + k[6384]*y_cur[IDX_C2H4II] + + k[6388]*y_cur[IDX_SiHII] + k[6389]*y_cur[IDX_HCOII] + + k[6390]*y_cur[IDX_HOCII] + k[6391]*y_cur[IDX_C2H5II] + + k[6392]*y_cur[IDX_C2H5II] + k[6392]*y_cur[IDX_C2H5II] + + k[6392]*y_cur[IDX_C2H5II] + k[6393]*y_cur[IDX_C2H5II] + + k[6393]*y_cur[IDX_C2H5II] + k[6394]*y_cur[IDX_C2H5II] + + k[6396]*y_cur[IDX_N2HII] + k[6400]*y_cur[IDX_H2COII] + + k[6400]*y_cur[IDX_H2COII] + k[6401]*y_cur[IDX_H2COII] + + k[6403]*y_cur[IDX_SiH2II] + k[6403]*y_cur[IDX_SiH2II] + + k[6404]*y_cur[IDX_SiH2II] + k[6406]*y_cur[IDX_CH3NHII] + + k[6408]*y_cur[IDX_CH2NH2II] + k[6411]*y_cur[IDX_C2H6II] + + k[6412]*y_cur[IDX_SiH3II] + k[6416]*y_cur[IDX_H3COII] + + k[6417]*y_cur[IDX_H3COII] + k[6418]*y_cur[IDX_H3COII] + + k[6418]*y_cur[IDX_H3COII] + k[6420]*y_cur[IDX_C2H7II] + + k[6422]*y_cur[IDX_HNOII] + k[6427]*y_cur[IDX_SiH4II] + + k[6428]*y_cur[IDX_CH3OHII] + k[6429]*y_cur[IDX_CH3OHII] + + k[6429]*y_cur[IDX_CH3OHII] + k[6431]*y_cur[IDX_H2NOII] + + k[6433]*y_cur[IDX_PHII] + k[6435]*y_cur[IDX_PH2II] + + k[6435]*y_cur[IDX_PH2II] + k[6436]*y_cur[IDX_PH2II] + + k[6437]*y_cur[IDX_O2HII] + k[6439]*y_cur[IDX_SiH5II] + + k[6440]*y_cur[IDX_CH3OH2II] + k[6442]*y_cur[IDX_CH3OH2II] + + k[6443]*y_cur[IDX_CH3OH2II] + k[6444]*y_cur[IDX_CH3OH2II] + + k[6445]*y_cur[IDX_HSII] + k[6446]*y_cur[IDX_H2SII] + + k[6447]*y_cur[IDX_H2SII] + k[6447]*y_cur[IDX_H2SII] + + k[6448]*y_cur[IDX_PH3II] + k[6450]*y_cur[IDX_H3SII] + + k[6452]*y_cur[IDX_H3SII] + k[6452]*y_cur[IDX_H3SII] + + k[6453]*y_cur[IDX_H3SII] + k[6456]*y_cur[IDX_HClII] + + k[6457]*y_cur[IDX_H2ClII] + k[6457]*y_cur[IDX_H2ClII] + + k[6458]*y_cur[IDX_H2ClII] + k[6460]*y_cur[IDX_C3HII] + + k[6464]*y_cur[IDX_C3H2II] + k[6464]*y_cur[IDX_C3H2II] + + k[6465]*y_cur[IDX_C3H2II] + k[6471]*y_cur[IDX_CH2CCHII] + + k[6472]*y_cur[IDX_C2NHII] + k[6473]*y_cur[IDX_C3H3II] + + k[6478]*y_cur[IDX_C3H4II] + k[6480]*y_cur[IDX_C3H4II] + + k[6480]*y_cur[IDX_C3H4II] + k[6483]*y_cur[IDX_C3H5II] + + k[6484]*y_cur[IDX_CH3CNII] + k[6487]*y_cur[IDX_HC2OII] + + k[6488]*y_cur[IDX_HC2OII] + k[6491]*y_cur[IDX_HCSiII] + + k[6496]*y_cur[IDX_SiCH2II] + k[6499]*y_cur[IDX_C3H6II] + + k[6502]*y_cur[IDX_CH3CNHII] + k[6505]*y_cur[IDX_C3H7II] + + k[6506]*y_cur[IDX_C3H7II] + k[6507]*y_cur[IDX_C3H7II] + + k[6508]*y_cur[IDX_C3H7II] + k[6510]*y_cur[IDX_C3H7II] + + k[6513]*y_cur[IDX_HNSiII] + k[6515]*y_cur[IDX_HCNOII] + + k[6517]*y_cur[IDX_SiCH3II] + k[6518]*y_cur[IDX_CH3COII] + + k[6520]*y_cur[IDX_HONCII] + k[6523]*y_cur[IDX_HNCOII] + + k[6524]*y_cur[IDX_HOCNII] + k[6527]*y_cur[IDX_NH2CNHII] + + k[6533]*y_cur[IDX_HCNOHII] + k[6534]*y_cur[IDX_HCNOHII] + + k[6537]*y_cur[IDX_H2CNOII] + k[6538]*y_cur[IDX_H2NCOII] + + k[6542]*y_cur[IDX_SiCH4II] + k[6543]*y_cur[IDX_HCPII] + + k[6546]*y_cur[IDX_H2OCNII] + k[6547]*y_cur[IDX_CH3CHOII] + + k[6547]*y_cur[IDX_CH3CHOII] + k[6549]*y_cur[IDX_HNCOHII] + + k[6550]*y_cur[IDX_HNCOHII] + k[6552]*y_cur[IDX_SiNH2II] + + k[6555]*y_cur[IDX_HCSII] + k[6557]*y_cur[IDX_SiOHII] + + k[6558]*y_cur[IDX_HN2OII] + k[6561]*y_cur[IDX_CH3CHOHII] + + k[6562]*y_cur[IDX_CH3CHOHII] + k[6563]*y_cur[IDX_CH3CHOHII] + + k[6564]*y_cur[IDX_CH3CHOHII] + k[6566]*y_cur[IDX_HCO2II] + + k[6567]*y_cur[IDX_HCO2II] + k[6570]*y_cur[IDX_PCH2II] + + k[6573]*y_cur[IDX_HPNII] + k[6574]*y_cur[IDX_HCOOHII] + + k[6574]*y_cur[IDX_HCOOHII] + k[6578]*y_cur[IDX_PCH3II] + + k[6582]*y_cur[IDX_H2CSII] + k[6582]*y_cur[IDX_H2CSII] + + k[6583]*y_cur[IDX_H2CSII] + k[6589]*y_cur[IDX_HNSII] + + k[6590]*y_cur[IDX_H3SiOII] + k[6591]*y_cur[IDX_H3SiOII] + + k[6596]*y_cur[IDX_PCH4II] + k[6597]*y_cur[IDX_PCH4II] + + k[6601]*y_cur[IDX_H3CSII] + k[6602]*y_cur[IDX_H3CSII] + + k[6604]*y_cur[IDX_CH3OCH4II] + k[6606]*y_cur[IDX_C2H5OH2II] + + k[6608]*y_cur[IDX_C2H5OH2II] + k[6609]*y_cur[IDX_C2H5OH2II] + + k[6610]*y_cur[IDX_HCOOH2II] + k[6611]*y_cur[IDX_HCOOH2II] + + k[6612]*y_cur[IDX_HPOII] + k[6614]*y_cur[IDX_HPOII] + + k[6619]*y_cur[IDX_PNH3II] + k[6621]*y_cur[IDX_C4HII] + + k[6622]*y_cur[IDX_H2POII] + k[6624]*y_cur[IDX_H2CClII] + + k[6624]*y_cur[IDX_H2CClII] + k[6625]*y_cur[IDX_HSOII] + + k[6628]*y_cur[IDX_C4H2II] + k[6629]*y_cur[IDX_HC3NII] + + k[6634]*y_cur[IDX_C4H3II] + k[6639]*y_cur[IDX_HC3NHII] + + k[6640]*y_cur[IDX_HC3NHII] + k[6641]*y_cur[IDX_C4H4II] + + k[6647]*y_cur[IDX_C4H5II] + k[6648]*y_cur[IDX_HC3OII] + + k[6650]*y_cur[IDX_SiC2HII] + k[6653]*y_cur[IDX_NCCNHII] + + k[6655]*y_cur[IDX_C3H2OII] + k[6655]*y_cur[IDX_C3H2OII] + + k[6657]*y_cur[IDX_CH2CHCNHII] + k[6659]*y_cur[IDX_CH2CHCNHII] + + k[6661]*y_cur[IDX_SiC2H2II] + k[6664]*y_cur[IDX_SiC2H3II] + + k[6666]*y_cur[IDX_H3C3OII] + k[6667]*y_cur[IDX_C4H7II] + + k[6669]*y_cur[IDX_SiNCHII] + k[6671]*y_cur[IDX_C2H5CNHII] + + k[6672]*y_cur[IDX_C2H5CNHII] + k[6673]*y_cur[IDX_C2H5CNHII] + + k[6676]*y_cur[IDX_HC2PII] + k[6678]*y_cur[IDX_HC2SII] + + k[6681]*y_cur[IDX_PC2H2II] + k[6685]*y_cur[IDX_PC2H3II] + + k[6690]*y_cur[IDX_PC2H4II] + k[6693]*y_cur[IDX_CH3COCH4II] + + k[6694]*y_cur[IDX_COOCH3II] + k[6697]*y_cur[IDX_CH2OHCOII] + + k[6700]*y_cur[IDX_HCOOCH3II] + k[6702]*y_cur[IDX_CH2OHCHOII] + + k[6703]*y_cur[IDX_CH2OHCHOII] + k[6705]*y_cur[IDX_CH2OHCHOII] + + k[6712]*y_cur[IDX_CH3COOHII] + k[6713]*y_cur[IDX_CH3COOHII] + + k[6714]*y_cur[IDX_CH3COOHII] + k[6718]*y_cur[IDX_HOCSII] + + k[6720]*y_cur[IDX_HSiSII] + k[6722]*y_cur[IDX_C5HII] + + k[6723]*y_cur[IDX_HSiO2II] + k[6726]*y_cur[IDX_H5C2O2II] + + k[6727]*y_cur[IDX_CH2OHCH2OII] + k[6728]*y_cur[IDX_CH2OHCH2OII] + + k[6730]*y_cur[IDX_CH2OHCH2OII] + k[6731]*y_cur[IDX_CH3COOH2II] + + k[6733]*y_cur[IDX_CH3COOH2II] + k[6734]*y_cur[IDX_CH3COOH2II] + + k[6735]*y_cur[IDX_CH3COOH2II] + k[6737]*y_cur[IDX_CH3COOH2II] + + k[6739]*y_cur[IDX_C5H2II] + k[6742]*y_cur[IDX_C5H3II] + + k[6749]*y_cur[IDX_CH3C4HII] + k[6753]*y_cur[IDX_C5H5II] + + k[6754]*y_cur[IDX_C5H5II] + k[6755]*y_cur[IDX_HSO2II] + + k[6756]*y_cur[IDX_HSO2II] + k[6759]*y_cur[IDX_HS2II] + + k[6762]*y_cur[IDX_SiC3HII] + k[6763]*y_cur[IDX_H2S2II] + + k[6765]*y_cur[IDX_CH3C3NHII] + k[6768]*y_cur[IDX_SiC3H2II] + + k[6770]*y_cur[IDX_H3S2II] + k[6772]*y_cur[IDX_PC3HII] + + k[6779]*y_cur[IDX_HC3SII] + k[6783]*y_cur[IDX_C6HII] + + k[6786]*y_cur[IDX_C6H2II] + k[6788]*y_cur[IDX_HC5NII] + + k[6789]*y_cur[IDX_C6H3II] + k[6793]*y_cur[IDX_HC5NHII] + + k[6797]*y_cur[IDX_C6H4II] + k[6801]*y_cur[IDX_SiC4HII] + + k[6802]*y_cur[IDX_C6H5II] + k[6804]*y_cur[IDX_H3C5NII] + + k[6807]*y_cur[IDX_C6H7II] + k[6808]*y_cur[IDX_C6H7II] + + k[6812]*y_cur[IDX_PC4HII] + k[6820]*y_cur[IDX_HC4SII] + + k[6825]*y_cur[IDX_C7HII] + k[6827]*y_cur[IDX_C7H2II] + + k[6828]*y_cur[IDX_C7H3II] + k[6831]*y_cur[IDX_C7H4II] + + k[6832]*y_cur[IDX_C7H5II] + k[6833]*y_cur[IDX_C7H5II] + + k[6834]*y_cur[IDX_CH3C5NHII] + k[6839]*y_cur[IDX_C8HII] + + k[6842]*y_cur[IDX_C8H2II] + k[6844]*y_cur[IDX_HC7NII] + + k[6845]*y_cur[IDX_C8H3II] + k[6848]*y_cur[IDX_C8H4II] + + k[6850]*y_cur[IDX_H2C7NII] + k[6851]*y_cur[IDX_H3C7NII] + + k[6853]*y_cur[IDX_C8H5II] + k[6858]*y_cur[IDX_C9HII] + + k[6860]*y_cur[IDX_C9H2II] + k[6861]*y_cur[IDX_C9H3II] + + k[6864]*y_cur[IDX_C9H4II] + k[6865]*y_cur[IDX_C9H5II] + + k[6867]*y_cur[IDX_CH3C7NHII] + k[6871]*y_cur[IDX_C10HII] + + k[6874]*y_cur[IDX_C10H2II] + k[6877]*y_cur[IDX_HC9NII] + + k[6878]*y_cur[IDX_C10H3II] + k[6879]*y_cur[IDX_C10H3II] + + k[6881]*y_cur[IDX_H2C9NII] + k[6882]*y_cur[IDX_H3C9NII]; + data[jistart + 20810] = 0.0 + k[134]*y_cur[IDX_CHI] + k[135]*y_cur[IDX_H2I] + + k[135]*y_cur[IDX_H2I] + k[135]*y_cur[IDX_H2I] + + k[135]*y_cur[IDX_H2I] + k[136]*y_cur[IDX_H2OI] + + k[139]*y_cur[IDX_OHI] + k[140]*y_cur[IDX_eM] + k[140]*y_cur[IDX_eM] + - k[142]*y_cur[IDX_HI] + k[142]*y_cur[IDX_HI] + k[142]*y_cur[IDX_HI] + + k[142]*y_cur[IDX_HI] + k[2384]*y_cur[IDX_H2II] + + k[2398]*y_cur[IDX_CII] + k[2399]*y_cur[IDX_C10II] + + k[2400]*y_cur[IDX_C10HII] + k[2401]*y_cur[IDX_C2II] + + k[2402]*y_cur[IDX_C2HII] + k[2403]*y_cur[IDX_C2H2II] + + k[2404]*y_cur[IDX_C2N2II] + k[2405]*y_cur[IDX_C2SII] + + k[2406]*y_cur[IDX_C3II] + k[2407]*y_cur[IDX_C3HII] + + k[2408]*y_cur[IDX_C3H2II] + k[2409]*y_cur[IDX_C3NII] + + k[2410]*y_cur[IDX_C3OII] + k[2411]*y_cur[IDX_C4II] + + k[2412]*y_cur[IDX_C4HII] + k[2414]*y_cur[IDX_C5II] + + k[2415]*y_cur[IDX_C5HII] + k[2416]*y_cur[IDX_C5NII] + + k[2417]*y_cur[IDX_C6II] + k[2418]*y_cur[IDX_C6HII] + + k[2419]*y_cur[IDX_C7II] + k[2420]*y_cur[IDX_C7HII] + + k[2421]*y_cur[IDX_C7NII] + k[2422]*y_cur[IDX_C8II] + + k[2423]*y_cur[IDX_C8HII] + k[2424]*y_cur[IDX_C9II] + + k[2425]*y_cur[IDX_C9HII] + k[2426]*y_cur[IDX_C9NII] + + k[2427]*y_cur[IDX_CHII] + k[2428]*y_cur[IDX_CH2II] + + k[2429]*y_cur[IDX_CH2CHCNII] + k[2430]*y_cur[IDX_CH3C3NII] + + k[2431]*y_cur[IDX_CH3CNII] + k[2432]*y_cur[IDX_CH4II] + + k[2433]*y_cur[IDX_CNII] + k[2434]*y_cur[IDX_COII] + + k[2435]*y_cur[IDX_COII] + k[2436]*y_cur[IDX_CO2II] + + k[2437]*y_cur[IDX_CPII] + k[2438]*y_cur[IDX_CSII] + + k[2439]*y_cur[IDX_ClII] + k[2440]*y_cur[IDX_FII] + + k[2441]*y_cur[IDX_H2C4NII] + k[2442]*y_cur[IDX_H2OII] + + k[2443]*y_cur[IDX_H2SII] + k[2444]*y_cur[IDX_HC3NII] + + k[2446]*y_cur[IDX_HC4NII] + k[2447]*y_cur[IDX_HC5NII] + + k[2448]*y_cur[IDX_HC7NII] + k[2449]*y_cur[IDX_HC9NII] + + k[2450]*y_cur[IDX_HCNII] + k[2451]*y_cur[IDX_HCPII] + + k[2452]*y_cur[IDX_HCSiII] + k[2453]*y_cur[IDX_HClII] + + k[2454]*y_cur[IDX_HFII] + k[2455]*y_cur[IDX_HNSiII] + + k[2456]*y_cur[IDX_HSII] + k[2457]*y_cur[IDX_HeII] + + k[2459]*y_cur[IDX_NII] + k[2460]*y_cur[IDX_N2II] + + k[2462]*y_cur[IDX_NHII] + k[2463]*y_cur[IDX_NH2II] + + k[2464]*y_cur[IDX_NH3II] + k[2466]*y_cur[IDX_OII] + + k[2467]*y_cur[IDX_OM] + k[2469]*y_cur[IDX_OHII] + + k[2470]*y_cur[IDX_SII] + k[2471]*y_cur[IDX_SO2II] + + k[2472]*y_cur[IDX_SiCII] + k[2473]*y_cur[IDX_SiC2II] + + k[2474]*y_cur[IDX_SiH4II] + k[2475]*y_cur[IDX_SiOII] + + k[2897]*y_cur[IDX_HCNOII] + k[2898]*y_cur[IDX_HCNOII] + + k[3047]*y_cur[IDX_HNCOII] + k[3048]*y_cur[IDX_HNCOII] + + k[3051]*y_cur[IDX_HOCNII] + k[3052]*y_cur[IDX_HOCNII] + + k[3053]*y_cur[IDX_HONCII] + k[3765]*y_cur[IDX_OCNII] + + k[3766]*y_cur[IDX_OCNII] + k[5132]*y_cur[IDX_ClI] + + k[5133]*y_cur[IDX_C2HI] + k[5134]*y_cur[IDX_CI] + + k[5135]*y_cur[IDX_CH2I] + k[5136]*y_cur[IDX_CH3I] + + k[5137]*y_cur[IDX_CHI] + k[5138]*y_cur[IDX_CNI] + + k[5139]*y_cur[IDX_FI] + k[5140]*y_cur[IDX_HSI] + + k[5141]*y_cur[IDX_NI] + k[5142]*y_cur[IDX_NH2I] + + k[5143]*y_cur[IDX_NHI] + k[5144]*y_cur[IDX_O2I] + + k[5146]*y_cur[IDX_O2HI] + k[5147]*y_cur[IDX_OI] + + k[5148]*y_cur[IDX_OHI] + k[5149]*y_cur[IDX_SI] + k[5679] + k[5681] + + k[5681] + k[6147] + k[6147]; + data[jistart + 20811] = 0.0 + k[140]*y_cur[IDX_H2I] + k[140]*y_cur[IDX_H2I] + + k[729]*y_cur[IDX_C10HII] + k[732]*y_cur[IDX_C10H2II] + + k[733]*y_cur[IDX_C10H3II] + k[734]*y_cur[IDX_C10H3II] + + k[740]*y_cur[IDX_C2HII] + k[742]*y_cur[IDX_C2H2II] + + k[742]*y_cur[IDX_C2H2II] + k[743]*y_cur[IDX_C2H2II] + + k[745]*y_cur[IDX_C2H3II] + k[746]*y_cur[IDX_C2H3II] + + k[747]*y_cur[IDX_C2H3II] + k[748]*y_cur[IDX_C2H3II] + + k[751]*y_cur[IDX_C2H3II] + k[751]*y_cur[IDX_C2H3II] + + k[752]*y_cur[IDX_C2H3II] + k[752]*y_cur[IDX_C2H3II] + + k[758]*y_cur[IDX_C2H4II] + k[758]*y_cur[IDX_C2H4II] + + k[759]*y_cur[IDX_C2H4II] + k[760]*y_cur[IDX_C2H4II] + + k[764]*y_cur[IDX_C2H5II] + k[765]*y_cur[IDX_C2H5II] + + k[765]*y_cur[IDX_C2H5II] + k[765]*y_cur[IDX_C2H5II] + + k[766]*y_cur[IDX_C2H5II] + k[766]*y_cur[IDX_C2H5II] + + k[767]*y_cur[IDX_C2H5II] + k[769]*y_cur[IDX_C2H5CNHII] + + k[770]*y_cur[IDX_C2H5CNHII] + k[771]*y_cur[IDX_C2H5CNHII] + + k[774]*y_cur[IDX_C2H5OH2II] + k[776]*y_cur[IDX_C2H5OH2II] + + k[777]*y_cur[IDX_C2H5OH2II] + k[779]*y_cur[IDX_C2H7II] + + k[784]*y_cur[IDX_C2NHII] + k[790]*y_cur[IDX_C3HII] + + k[794]*y_cur[IDX_C3H2II] + k[794]*y_cur[IDX_C3H2II] + + k[795]*y_cur[IDX_C3H2II] + k[796]*y_cur[IDX_C3H2OII] + + k[796]*y_cur[IDX_C3H2OII] + k[798]*y_cur[IDX_C3H3II] + + k[800]*y_cur[IDX_C3H4II] + k[802]*y_cur[IDX_C3H4II] + + k[802]*y_cur[IDX_C3H4II] + k[804]*y_cur[IDX_C3H5II] + + k[805]*y_cur[IDX_C3H6II] + k[808]*y_cur[IDX_C3H7II] + + k[809]*y_cur[IDX_C3H7II] + k[810]*y_cur[IDX_C3H7II] + + k[811]*y_cur[IDX_C3H7II] + k[813]*y_cur[IDX_C3H7II] + + k[821]*y_cur[IDX_C4HII] + k[823]*y_cur[IDX_C4H2II] + + k[825]*y_cur[IDX_C4H3II] + k[826]*y_cur[IDX_C4H4II] + + k[829]*y_cur[IDX_C4H5II] + k[830]*y_cur[IDX_C4H7II] + + k[840]*y_cur[IDX_C5HII] + k[842]*y_cur[IDX_C5H2II] + + k[843]*y_cur[IDX_C5H3II] + k[845]*y_cur[IDX_C5H5II] + + k[846]*y_cur[IDX_C5H5II] + k[851]*y_cur[IDX_C6HII] + + k[853]*y_cur[IDX_C6H2II] + k[854]*y_cur[IDX_C6H3II] + + k[857]*y_cur[IDX_C6H4II] + k[858]*y_cur[IDX_C6H5II] + + k[861]*y_cur[IDX_C6H7II] + k[862]*y_cur[IDX_C6H7II] + + k[867]*y_cur[IDX_C7HII] + k[869]*y_cur[IDX_C7H2II] + + k[870]*y_cur[IDX_C7H3II] + k[873]*y_cur[IDX_C7H4II] + + k[874]*y_cur[IDX_C7H5II] + k[875]*y_cur[IDX_C7H5II] + + k[880]*y_cur[IDX_C8HII] + k[882]*y_cur[IDX_C8H2II] + + k[883]*y_cur[IDX_C8H3II] + k[886]*y_cur[IDX_C8H4II] + + k[887]*y_cur[IDX_C8H5II] + k[892]*y_cur[IDX_C9HII] + + k[894]*y_cur[IDX_C9H2II] + k[895]*y_cur[IDX_C9H3II] + + k[898]*y_cur[IDX_C9H4II] + k[899]*y_cur[IDX_C9H5II] + + k[906]*y_cur[IDX_CHII] + k[908]*y_cur[IDX_CH2II] + + k[908]*y_cur[IDX_CH2II] + k[909]*y_cur[IDX_CH2II] + + k[911]*y_cur[IDX_CH2CCHII] + k[913]*y_cur[IDX_CH2CHCNHII] + + k[915]*y_cur[IDX_CH2CHCNHII] + k[921]*y_cur[IDX_CH2NH2II] + + k[923]*y_cur[IDX_CH3II] + k[925]*y_cur[IDX_CH3II] + + k[925]*y_cur[IDX_CH3II] + k[927]*y_cur[IDX_CH3C3NHII] + + k[930]*y_cur[IDX_CH3C4HII] + k[931]*y_cur[IDX_CH3C5NHII] + + k[933]*y_cur[IDX_CH3C7NHII] + k[936]*y_cur[IDX_C2H6II] + + k[937]*y_cur[IDX_CH3CHOII] + k[937]*y_cur[IDX_CH3CHOII] + + k[939]*y_cur[IDX_CH3CHOHII] + k[940]*y_cur[IDX_CH3CHOHII] + + k[941]*y_cur[IDX_CH3CHOHII] + k[942]*y_cur[IDX_CH3CHOHII] + + k[944]*y_cur[IDX_CH3CNII] + k[946]*y_cur[IDX_CH3CNHII] + + k[948]*y_cur[IDX_CH3COII] + k[953]*y_cur[IDX_CH3COCH4II] + + k[958]*y_cur[IDX_CH3OCH4II] + k[960]*y_cur[IDX_CH3OHII] + + k[961]*y_cur[IDX_CH3OHII] + k[961]*y_cur[IDX_CH3OHII] + + k[963]*y_cur[IDX_CH3OH2II] + k[965]*y_cur[IDX_CH3OH2II] + + k[966]*y_cur[IDX_CH3OH2II] + k[967]*y_cur[IDX_CH3OH2II] + + k[968]*y_cur[IDX_CH4II] + k[968]*y_cur[IDX_CH4II] + + k[969]*y_cur[IDX_CH4II] + k[971]*y_cur[IDX_CH3NHII] + + k[972]*y_cur[IDX_CH5II] + k[974]*y_cur[IDX_CH5II] + + k[974]*y_cur[IDX_CH5II] + k[975]*y_cur[IDX_CH5II] + + k[983]*y_cur[IDX_HCOOCH3II] + k[987]*y_cur[IDX_H2II] + + k[987]*y_cur[IDX_H2II] + k[990]*y_cur[IDX_H2C7NII] + + k[992]*y_cur[IDX_H2C9NII] + k[993]*y_cur[IDX_H2CClII] + + k[993]*y_cur[IDX_H2CClII] + k[995]*y_cur[IDX_H2CNOII] + + k[998]*y_cur[IDX_H2COII] + k[998]*y_cur[IDX_H2COII] + + k[999]*y_cur[IDX_H2COII] + k[1000]*y_cur[IDX_H2CSII] + + k[1000]*y_cur[IDX_H2CSII] + k[1001]*y_cur[IDX_H2CSII] + + k[1002]*y_cur[IDX_H2ClII] + k[1002]*y_cur[IDX_H2ClII] + + k[1003]*y_cur[IDX_H2ClII] + k[1005]*y_cur[IDX_H2FII] + + k[1007]*y_cur[IDX_H2NCII] + k[1008]*y_cur[IDX_H2NCOII] + + k[1010]*y_cur[IDX_H2NOII] + k[1013]*y_cur[IDX_H2OII] + + k[1013]*y_cur[IDX_H2OII] + k[1014]*y_cur[IDX_H2OII] + + k[1016]*y_cur[IDX_H2OCNII] + k[1017]*y_cur[IDX_H2POII] + + k[1019]*y_cur[IDX_H2SII] + k[1020]*y_cur[IDX_H2SII] + + k[1020]*y_cur[IDX_H2SII] + k[1021]*y_cur[IDX_H2S2II] + + k[1025]*y_cur[IDX_H3II] + k[1026]*y_cur[IDX_H3II] + + k[1026]*y_cur[IDX_H3II] + k[1026]*y_cur[IDX_H3II] + + k[1027]*y_cur[IDX_H3C3OII] + k[1028]*y_cur[IDX_H3C5NII] + + k[1030]*y_cur[IDX_H3C7NII] + k[1032]*y_cur[IDX_H3C9NII] + + k[1036]*y_cur[IDX_H3COII] + k[1037]*y_cur[IDX_H3COII] + + k[1038]*y_cur[IDX_H3COII] + k[1038]*y_cur[IDX_H3COII] + + k[1039]*y_cur[IDX_H3CSII] + k[1040]*y_cur[IDX_H3CSII] + + k[1041]*y_cur[IDX_H3OII] + k[1042]*y_cur[IDX_H3OII] + + k[1044]*y_cur[IDX_H3OII] + k[1044]*y_cur[IDX_H3OII] + + k[1045]*y_cur[IDX_H3SII] + k[1047]*y_cur[IDX_H3SII] + + k[1047]*y_cur[IDX_H3SII] + k[1048]*y_cur[IDX_H3SII] + + k[1049]*y_cur[IDX_H3S2II] + k[1051]*y_cur[IDX_H3SiOII] + + k[1052]*y_cur[IDX_H3SiOII] + k[1054]*y_cur[IDX_H5C2O2II] + + k[1056]*y_cur[IDX_HC2OII] + k[1057]*y_cur[IDX_HC2OII] + + k[1059]*y_cur[IDX_HC2PII] + k[1061]*y_cur[IDX_HC2SII] + + k[1063]*y_cur[IDX_HC3NII] + k[1068]*y_cur[IDX_HC3NHII] + + k[1069]*y_cur[IDX_HC3NHII] + k[1070]*y_cur[IDX_HC3OII] + + k[1072]*y_cur[IDX_HC3SII] + k[1076]*y_cur[IDX_HC4SII] + + k[1078]*y_cur[IDX_HC5NII] + k[1081]*y_cur[IDX_HC5NHII] + + k[1085]*y_cur[IDX_HC7NII] + k[1087]*y_cur[IDX_HC9NII] + + k[1088]*y_cur[IDX_HCNII] + k[1089]*y_cur[IDX_HCNHII] + + k[1089]*y_cur[IDX_HCNHII] + k[1090]*y_cur[IDX_HCNHII] + + k[1091]*y_cur[IDX_HCNHII] + k[1093]*y_cur[IDX_HCNOII] + + k[1095]*y_cur[IDX_HCNOHII] + k[1096]*y_cur[IDX_HCNOHII] + + k[1097]*y_cur[IDX_HCOII] + k[1098]*y_cur[IDX_HCO2II] + + k[1099]*y_cur[IDX_HCO2II] + k[1101]*y_cur[IDX_HCOOHII] + + k[1101]*y_cur[IDX_HCOOHII] + k[1103]*y_cur[IDX_HCOOH2II] + + k[1104]*y_cur[IDX_HCOOH2II] + k[1105]*y_cur[IDX_HCPII] + + k[1108]*y_cur[IDX_HCSII] + k[1110]*y_cur[IDX_HCSiII] + + k[1111]*y_cur[IDX_HClII] + k[1112]*y_cur[IDX_HFII] + + k[1113]*y_cur[IDX_HN2OII] + k[1115]*y_cur[IDX_HNC3I] + + k[1117]*y_cur[IDX_HNCOII] + k[1118]*y_cur[IDX_HNCOHII] + + k[1119]*y_cur[IDX_HNCOHII] + k[1121]*y_cur[IDX_HNOII] + + k[1122]*y_cur[IDX_HNSII] + k[1124]*y_cur[IDX_HNSiII] + + k[1125]*y_cur[IDX_HOCII] + k[1126]*y_cur[IDX_HOCNII] + + k[1129]*y_cur[IDX_HOCSII] + k[1130]*y_cur[IDX_HONCII] + + k[1134]*y_cur[IDX_HPNII] + k[1135]*y_cur[IDX_HPOII] + + k[1137]*y_cur[IDX_HPOII] + k[1138]*y_cur[IDX_HSII] + + k[1140]*y_cur[IDX_HS2II] + k[1141]*y_cur[IDX_HSOII] + + k[1142]*y_cur[IDX_HSO2II] + k[1143]*y_cur[IDX_HSO2II] + + k[1145]*y_cur[IDX_HSiO2II] + k[1148]*y_cur[IDX_HSiSII] + + k[1149]*y_cur[IDX_HeHII] + k[1151]*y_cur[IDX_N2HII] + + k[1152]*y_cur[IDX_N2HII] + k[1157]*y_cur[IDX_NCCNHII] + + k[1158]*y_cur[IDX_NHII] + k[1159]*y_cur[IDX_NH2II] + + k[1159]*y_cur[IDX_NH2II] + k[1160]*y_cur[IDX_NH2II] + + k[1162]*y_cur[IDX_NH2CNHII] + k[1163]*y_cur[IDX_NH3II] + + k[1164]*y_cur[IDX_NH3II] + k[1164]*y_cur[IDX_NH3II] + + k[1166]*y_cur[IDX_NH4II] + k[1166]*y_cur[IDX_NH4II] + + k[1167]*y_cur[IDX_NH4II] + k[1175]*y_cur[IDX_O2HII] + + k[1180]*y_cur[IDX_OHII] + k[1182]*y_cur[IDX_PC2H2II] + + k[1184]*y_cur[IDX_PC2H3II] + k[1188]*y_cur[IDX_PC2H4II] + + k[1190]*y_cur[IDX_PC3HII] + k[1194]*y_cur[IDX_PC4HII] + + k[1198]*y_cur[IDX_PCH2II] + k[1199]*y_cur[IDX_PCH3II] + + k[1202]*y_cur[IDX_PCH4II] + k[1203]*y_cur[IDX_PCH4II] + + k[1205]*y_cur[IDX_PHII] + k[1207]*y_cur[IDX_PH2II] + + k[1207]*y_cur[IDX_PH2II] + k[1208]*y_cur[IDX_PH2II] + + k[1209]*y_cur[IDX_PH3II] + k[1217]*y_cur[IDX_PNH3II] + + k[1227]*y_cur[IDX_SiC2HII] + k[1229]*y_cur[IDX_SiC2H2II] + + k[1230]*y_cur[IDX_SiC2H3II] + k[1235]*y_cur[IDX_SiC3HII] + + k[1237]*y_cur[IDX_SiC3H2II] + k[1241]*y_cur[IDX_SiC4HII] + + k[1242]*y_cur[IDX_SiCH2II] + k[1246]*y_cur[IDX_SiCH3II] + + k[1248]*y_cur[IDX_SiCH4II] + k[1250]*y_cur[IDX_SiHII] + + k[1252]*y_cur[IDX_SiH2II] + k[1252]*y_cur[IDX_SiH2II] + + k[1253]*y_cur[IDX_SiH2II] + k[1254]*y_cur[IDX_SiH3II] + + k[1257]*y_cur[IDX_SiH4II] + k[1259]*y_cur[IDX_SiH5II] + + k[1263]*y_cur[IDX_SiNCHII] + k[1264]*y_cur[IDX_SiNH2II] + + k[1268]*y_cur[IDX_SiOHII] + k[1270]*y_cur[IDX_COOCH3II] + + k[1273]*y_cur[IDX_CH2OHCOII] + k[1276]*y_cur[IDX_CH2OHCHOII] + + k[1277]*y_cur[IDX_CH2OHCHOII] + k[1279]*y_cur[IDX_CH2OHCHOII] + + k[1280]*y_cur[IDX_CH2OHCH2OII] + k[1281]*y_cur[IDX_CH2OHCH2OII] + + k[1283]*y_cur[IDX_CH2OHCH2OII] + k[1285]*y_cur[IDX_CH3COOHII] + + k[1286]*y_cur[IDX_CH3COOHII] + k[1287]*y_cur[IDX_CH3COOHII] + + k[1290]*y_cur[IDX_CH3COOH2II] + k[1292]*y_cur[IDX_CH3COOH2II] + + k[1293]*y_cur[IDX_CH3COOH2II] + k[1294]*y_cur[IDX_CH3COOH2II] + + k[1296]*y_cur[IDX_CH3COOH2II] - k[5608]*y_cur[IDX_HI] + + k[5615]*y_cur[IDX_HII]; + data[jistart + 20812] = 0.0 - k[74]*y_cur[IDX_HM] - k[75]*y_cur[IDX_HM] - + k[84]*y_cur[IDX_CM] - k[85]*y_cur[IDX_C10M] - k[86]*y_cur[IDX_C10HM] + - k[87]*y_cur[IDX_C2M] - k[88]*y_cur[IDX_C2HM] - + k[89]*y_cur[IDX_C3M] - k[90]*y_cur[IDX_C3HM] - k[91]*y_cur[IDX_C3NM] + - k[92]*y_cur[IDX_C4M] - k[93]*y_cur[IDX_C4HM] - + k[94]*y_cur[IDX_C5M] - k[95]*y_cur[IDX_C5HM] - k[96]*y_cur[IDX_C5NM] + - k[97]*y_cur[IDX_C6M] - k[98]*y_cur[IDX_C6HM] - + k[99]*y_cur[IDX_C7M] - k[100]*y_cur[IDX_C7HM] - + k[101]*y_cur[IDX_C8M] - k[102]*y_cur[IDX_C8HM] - + k[103]*y_cur[IDX_C9M] - k[104]*y_cur[IDX_C9HM] - + k[105]*y_cur[IDX_CHM] - k[106]*y_cur[IDX_CNM] - k[107]*y_cur[IDX_OM] + - k[108]*y_cur[IDX_OHM] - k[109]*y_cur[IDX_SM] - + k[141]*y_cur[IDX_CHI] + k[141]*y_cur[IDX_CHI] + + k[141]*y_cur[IDX_CHI] - k[142]*y_cur[IDX_H2I] + + k[142]*y_cur[IDX_H2I] + k[142]*y_cur[IDX_H2I] + + k[142]*y_cur[IDX_H2I] - k[143]*y_cur[IDX_H2OI] + + k[143]*y_cur[IDX_H2OI] + k[143]*y_cur[IDX_H2OI] - + k[144]*y_cur[IDX_O2I] + k[144]*y_cur[IDX_O2I] - + k[145]*y_cur[IDX_OHI] + k[145]*y_cur[IDX_OHI] + + k[145]*y_cur[IDX_OHI] - k[318]*y_cur[IDX_ClII] - + k[487]*y_cur[IDX_CNII] - k[488]*y_cur[IDX_COII] - + k[489]*y_cur[IDX_H2II] - k[490]*y_cur[IDX_HCNII] - + k[491]*y_cur[IDX_HeII] - k[492]*y_cur[IDX_OII] - + k[2827]*y_cur[IDX_C2H3II] - k[2828]*y_cur[IDX_C2H4II] - + k[2829]*y_cur[IDX_C2H5II] - k[2830]*y_cur[IDX_C2N2II] - + k[2831]*y_cur[IDX_C3H2II] - k[2832]*y_cur[IDX_C3H4II] - + k[2833]*y_cur[IDX_C3H7II] - k[2834]*y_cur[IDX_C6H6II] - + k[2835]*y_cur[IDX_CHII] - k[2836]*y_cur[IDX_CH2II] - + k[2837]*y_cur[IDX_CH3II] - k[2838]*y_cur[IDX_C2H6II] - + k[2839]*y_cur[IDX_CH4II] - k[2840]*y_cur[IDX_CH5II] - + k[2841]*y_cur[IDX_CO2II] - k[2842]*y_cur[IDX_H2SII] - + k[2843]*y_cur[IDX_H3SII] - k[2844]*y_cur[IDX_HSII] - + k[2845]*y_cur[IDX_HeHII] - k[2846]*y_cur[IDX_NO2II] - + k[2847]*y_cur[IDX_SO2II] - k[2848]*y_cur[IDX_SiHII] - + k[2849]*y_cur[IDX_SiSII] - k[5024]*y_cur[IDX_C4H6I] - + k[5153]*y_cur[IDX_C2I] - k[5154]*y_cur[IDX_C2H2I] - + k[5155]*y_cur[IDX_C2H3I] - k[5156]*y_cur[IDX_CH2I] - + k[5157]*y_cur[IDX_CH2COI] - k[5158]*y_cur[IDX_CH3I] - + k[5159]*y_cur[IDX_CH4I] - k[5160]*y_cur[IDX_CHI] - + k[5161]*y_cur[IDX_CNOI] - k[5162]*y_cur[IDX_CO2I] - + k[5163]*y_cur[IDX_COI] - k[5164]*y_cur[IDX_H2CNI] - + k[5165]*y_cur[IDX_H2COI] - k[5166]*y_cur[IDX_H2O2I] - + k[5167]*y_cur[IDX_H2O2I] - k[5168]*y_cur[IDX_H2OI] - + k[5169]*y_cur[IDX_H2SI] - k[5170]*y_cur[IDX_HCNI] - + k[5171]*y_cur[IDX_HCOI] - k[5172]*y_cur[IDX_HCOI] - + k[5173]*y_cur[IDX_HCSI] - k[5174]*y_cur[IDX_HNCI] + + k[5174]*y_cur[IDX_HNCI] - k[5175]*y_cur[IDX_HNOI] - + k[5176]*y_cur[IDX_HNOI] - k[5177]*y_cur[IDX_HNOI] - + k[5178]*y_cur[IDX_HSI] - k[5179]*y_cur[IDX_N2OI] - + k[5180]*y_cur[IDX_N2OI] - k[5181]*y_cur[IDX_NCCNI] - + k[5182]*y_cur[IDX_NH2I] - k[5183]*y_cur[IDX_NH3I] - + k[5184]*y_cur[IDX_NHI] - k[5185]*y_cur[IDX_NO2I] - + k[5186]*y_cur[IDX_NOI] - k[5187]*y_cur[IDX_NOI] - + k[5188]*y_cur[IDX_NSI] - k[5189]*y_cur[IDX_NSI] - + k[5190]*y_cur[IDX_O2I] - k[5191]*y_cur[IDX_O2HI] - + k[5192]*y_cur[IDX_O2HI] - k[5193]*y_cur[IDX_O2HI] - + k[5194]*y_cur[IDX_OCNI] - k[5195]*y_cur[IDX_OCNI] - + k[5196]*y_cur[IDX_OCNI] - k[5197]*y_cur[IDX_OCSI] - + k[5198]*y_cur[IDX_OHI] - k[5199]*y_cur[IDX_S2I] - + k[5200]*y_cur[IDX_SOI] - k[5201]*y_cur[IDX_SOI] - + k[5211]*y_cur[IDX_HClI] - k[5213]*y_cur[IDX_HNC3I] + + k[5213]*y_cur[IDX_HNC3I] - k[5546]*y_cur[IDX_HII] - + k[5569]*y_cur[IDX_CII] - k[5570]*y_cur[IDX_C4H2II] - + k[5571]*y_cur[IDX_C4H3II] - k[5572]*y_cur[IDX_CI] - + k[5573]*y_cur[IDX_OI] - k[5574]*y_cur[IDX_OHI] - + k[5575]*y_cur[IDX_SiII] - k[5608]*y_cur[IDX_eM] - k[5682] - k[5844] + - k[6888] + (-hloss); // clang-format on } } @@ -43769,12 +38175,13 @@ int Jac(realtype t, N_Vector u, N_Vector fu, SUNMatrix jmatrix, void *user_data, cudaMalloc((void **)&d_udata, sizeof(NaunetData) * nsystem); cudaMemcpyAsync(d_udata, h_udata, sizeof(NaunetData) * nsystem, - cudaMemcpyHostToDevice, stream); + cudaMemcpyHostToDevice, stream); // cudaDeviceSynchronize(); // unsigned block_size = min(BLOCKSIZE, nsystem); // unsigned grid_size = - // max(1, min(MAX_NSYSTEMS_PER_STREAM / BLOCKSIZE, nsystem / BLOCKSIZE)); + // max(1, min(MAX_NSYSTEMS_PER_STREAM / BLOCKSIZE, nsystem / + // BLOCKSIZE)); size_t block_size = NVEC_CUDA_BLOCKSIZE(u); size_t grid_size = NVEC_CUDA_GRIDSIZE(u, nsystem); JacKernel<<>>(y, data, d_udata, nsystem); diff --git a/src/naunet_physics.cu b/src/naunet_physics.cu index 43f3e20..235f657 100644 --- a/src/naunet_physics.cu +++ b/src/naunet_physics.cu @@ -1,430 +1,834 @@ +// #include +#include + +#include #include "naunet_constants.h" #include "naunet_macros.h" #include "naunet_physics.h" +#include "naunet_utilities.h" +/* */ // clang-format off +__device__ __host__ double GetElementAbund(double *y, int elemidx) { + if (elemidx == IDX_ELEM_F) { + return 1.0*y[IDX_GHFI] + 1.0*y[IDX_GFI] + 1.0*y[IDX_CFII] + 1.0*y[IDX_HFII] + + 1.0*y[IDX_SiFII] + 1.0*y[IDX_H2FII] + 1.0*y[IDX_FII] + 1.0*y[IDX_FI] + + 1.0*y[IDX_HFI] + 0.0; + } + if (elemidx == IDX_ELEM_Cl) { + return 1.0*y[IDX_GCClI] + 1.0*y[IDX_GClOI] + 1.0*y[IDX_GHClI] + 1.0*y[IDX_ClOII] + + 1.0*y[IDX_GClI] + 1.0*y[IDX_ClOI] + 1.0*y[IDX_H2CClII] + 1.0*y[IDX_HClII] + + 1.0*y[IDX_CClII] + 1.0*y[IDX_CClI] + 1.0*y[IDX_ClII] + 1.0*y[IDX_H2ClII] + + 1.0*y[IDX_ClI] + 1.0*y[IDX_HClI] + 0.0; + } + if (elemidx == IDX_ELEM_P) { + return 1.0*y[IDX_GHC2PI] + 1.0*y[IDX_GHPOI] + 1.0*y[IDX_GPNI] + 1.0*y[IDX_GC4PI] + + 1.0*y[IDX_GCH2PHI] + 1.0*y[IDX_GHCPI] + 1.0*y[IDX_GPH2I] + 1.0*y[IDX_GPOI] + + 1.0*y[IDX_GC3PI] + 1.0*y[IDX_GPHI] + 1.0*y[IDX_GCCPI] + 1.0*y[IDX_C4PII] + + 1.0*y[IDX_GCPI] + 1.0*y[IDX_PC2H4II] + 1.0*y[IDX_PC2H3II] + 1.0*y[IDX_PNII] + + 1.0*y[IDX_PNH3II] + 1.0*y[IDX_GPI] + 1.0*y[IDX_PCH3II] + 1.0*y[IDX_PNH2II] + + 1.0*y[IDX_HPNII] + 1.0*y[IDX_PC3HII] + 1.0*y[IDX_PCH4II] + 1.0*y[IDX_CCPII] + + 1.0*y[IDX_H2POII] + 1.0*y[IDX_PC2H2II] + 1.0*y[IDX_PC4HII] + 1.0*y[IDX_PH3II] + + 1.0*y[IDX_CPII] + 1.0*y[IDX_HC2PII] + 1.0*y[IDX_PCH2II] + 1.0*y[IDX_HCPII] + + 1.0*y[IDX_HPOII] + 1.0*y[IDX_CH2PHI] + 1.0*y[IDX_HPOI] + 1.0*y[IDX_POII] + + 1.0*y[IDX_PH2I] + 1.0*y[IDX_PNI] + 1.0*y[IDX_C4PI] + 1.0*y[IDX_HCPI] + + 1.0*y[IDX_C3PI] + 1.0*y[IDX_PH2II] + 1.0*y[IDX_POI] + 1.0*y[IDX_HC2PI] + + 1.0*y[IDX_CCPI] + 1.0*y[IDX_CPI] + 1.0*y[IDX_PHI] + 1.0*y[IDX_PHII] + + 1.0*y[IDX_PII] + 1.0*y[IDX_PI] + 0.0; + } + if (elemidx == IDX_ELEM_Fe) { + return 1.0*y[IDX_GFeI] + 1.0*y[IDX_FeII] + 1.0*y[IDX_FeI] + 0.0; + } + if (elemidx == IDX_ELEM_Mg) { + return 1.0*y[IDX_GMgI] + 1.0*y[IDX_MgII] + 1.0*y[IDX_MgI] + 0.0; + } + if (elemidx == IDX_ELEM_Na) { + return 1.0*y[IDX_GNaI] + 1.0*y[IDX_NaII] + 1.0*y[IDX_NaI] + 0.0; + } + if (elemidx == IDX_ELEM_Si) { + return 1.0*y[IDX_GHNSiI] + 1.0*y[IDX_GSiC3HI] + 1.0*y[IDX_GSiCH3I] + 1.0*y[IDX_GSiO2I] + + 1.0*y[IDX_GSiSI] + 1.0*y[IDX_GH2SiOI] + 1.0*y[IDX_GSiC2HI] + 1.0*y[IDX_GSiC2H2I] + + 1.0*y[IDX_GSiC4I] + 1.0*y[IDX_GSiNCI] + 1.0*y[IDX_GHCSiI] + 1.0*y[IDX_GSiH4I] + + 1.0*y[IDX_GSiC3I] + 1.0*y[IDX_GSiH3I] + 1.0*y[IDX_GSiNI] + 1.0*y[IDX_GSiOI] + + 1.0*y[IDX_GSiCH2I] + 1.0*y[IDX_GSiHI] + 1.0*y[IDX_GSiH2I] + 1.0*y[IDX_SiFII] + + 1.0*y[IDX_GSiCI] + 1.0*y[IDX_GSiC2I] + 1.0*y[IDX_HSiO2II] + 1.0*y[IDX_H2SiOII] + + 1.0*y[IDX_H3SiOII] + 1.0*y[IDX_SiH4II] + 1.0*y[IDX_SiO2I] + 1.0*y[IDX_SiC3H2II] + + 1.0*y[IDX_SiC4II] + 1.0*y[IDX_SiC4HII] + 1.0*y[IDX_SiH5II] + 1.0*y[IDX_SiNCHII] + + 1.0*y[IDX_HNSiII] + 1.0*y[IDX_SiCH4II] + 1.0*y[IDX_SiC2H3II] + 1.0*y[IDX_SiC3HI] + + 1.0*y[IDX_SiCH3II] + 1.0*y[IDX_SiNH2II] + 1.0*y[IDX_HSiSII] + 1.0*y[IDX_SiNII] + + 1.0*y[IDX_H2SiOI] + 1.0*y[IDX_SiC4I] + 1.0*y[IDX_SiNCI] + 1.0*y[IDX_SiNCII] + + 1.0*y[IDX_HNSiI] + 1.0*y[IDX_SiC2H2I] + 1.0*y[IDX_SiC3II] + 1.0*y[IDX_GSiI] + + 1.0*y[IDX_SiC3HII] + 1.0*y[IDX_SiCH3I] + 1.0*y[IDX_SiC2II] + 1.0*y[IDX_SiC2H2II] + + 1.0*y[IDX_SiC2HI] + 1.0*y[IDX_SiC3I] + 1.0*y[IDX_SiCII] + 1.0*y[IDX_HCSiI] + + 1.0*y[IDX_SiCH2I] + 1.0*y[IDX_HCSiII] + 1.0*y[IDX_SiC2I] + 1.0*y[IDX_SiNI] + + 1.0*y[IDX_SiC2HII] + 1.0*y[IDX_SiH2I] + 1.0*y[IDX_SiH2II] + 1.0*y[IDX_SiH3II] + + 1.0*y[IDX_SiCI] + 1.0*y[IDX_SiH3I] + 1.0*y[IDX_SiCH2II] + 1.0*y[IDX_SiHII] + + 1.0*y[IDX_SiHI] + 1.0*y[IDX_SiH4I] + 1.0*y[IDX_SiSII] + 1.0*y[IDX_SiSI] + + 1.0*y[IDX_SiOII] + 1.0*y[IDX_SiOHII] + 1.0*y[IDX_SiOI] + 1.0*y[IDX_SiII] + + 1.0*y[IDX_SiI] + 0.0; + } + if (elemidx == IDX_ELEM_S) { + return 2.0*y[IDX_GH2S2I] + 1.0*y[IDX_GC4SI] + 1.0*y[IDX_GSiSI] + 2.0*y[IDX_GS2I] + + 1.0*y[IDX_GC3SI] + 1.0*y[IDX_GH2SI] + 2.0*y[IDX_GHS2I] + 1.0*y[IDX_GSO2I] + + 1.0*y[IDX_GC2SI] + 1.0*y[IDX_GH2CSI] + 1.0*y[IDX_GHCSI] + 1.0*y[IDX_GOCSI] + + 1.0*y[IDX_GSOI] + 1.0*y[IDX_GNSI] + 1.0*y[IDX_HNSII] + 1.0*y[IDX_HSOII] + + 1.0*y[IDX_CH3CSII] + 2.0*y[IDX_H3S2II] + 1.0*y[IDX_C2SII] + 1.0*y[IDX_C3SII] + + 1.0*y[IDX_HSO2II] + 1.0*y[IDX_GCSI] + 1.0*y[IDX_GHSI] + 2.0*y[IDX_H2S2I] + + 1.0*y[IDX_HOCSII] + 1.0*y[IDX_NSII] + 1.0*y[IDX_HC4SII] + 2.0*y[IDX_H2S2II] + + 1.0*y[IDX_HSiSII] + 1.0*y[IDX_SO2II] + 1.0*y[IDX_H3CSII] + 1.0*y[IDX_HC3SII] + + 2.0*y[IDX_HS2II] + 2.0*y[IDX_HS2I] + 1.0*y[IDX_H2CSII] + 1.0*y[IDX_H2CSI] + + 2.0*y[IDX_S2I] + 2.0*y[IDX_S2II] + 1.0*y[IDX_C3SI] + 1.0*y[IDX_OCSII] + + 1.0*y[IDX_GSI] + 1.0*y[IDX_HCSI] + 1.0*y[IDX_NSI] + 1.0*y[IDX_SO2I] + + 1.0*y[IDX_HCSII] + 1.0*y[IDX_CSII] + 1.0*y[IDX_H3SII] + 1.0*y[IDX_C4SII] + + 1.0*y[IDX_HSII] + 1.0*y[IDX_OCSI] + 1.0*y[IDX_SM] + 1.0*y[IDX_SiSII] + + 1.0*y[IDX_HC2SII] + 1.0*y[IDX_C4SI] + 1.0*y[IDX_HSI] + 1.0*y[IDX_CSI] + + 1.0*y[IDX_SiSI] + 1.0*y[IDX_C2SI] + 1.0*y[IDX_SOI] + 1.0*y[IDX_SOII] + + 1.0*y[IDX_H2SII] + 1.0*y[IDX_H2SI] + 1.0*y[IDX_SII] + 1.0*y[IDX_SI] + 0.0; + } + if (elemidx == IDX_ELEM_N) { + return 1.0*y[IDX_GCH3C3NI] + 1.0*y[IDX_GCH3C5NI] + 1.0*y[IDX_GCH3C7NI] + 1.0*y[IDX_GHNSiI] + + 2.0*y[IDX_GNH2CNI] + 1.0*y[IDX_GNO2I] + 1.0*y[IDX_GPNI] + 2.0*y[IDX_GNCCNI] + + 1.0*y[IDX_C2H4CNI] + 1.0*y[IDX_GC4NI] + 1.0*y[IDX_GHCNOI] + 1.0*y[IDX_GHNC3I] + + 1.0*y[IDX_GHNCOI] + 1.0*y[IDX_GHOCNI] + 1.0*y[IDX_GHONCI] + 2.0*y[IDX_GN2OI] + + 1.0*y[IDX_GSiNCI] + 2.0*y[IDX_NCCNCH3II] + 1.0*y[IDX_GC2H4CNI] + 1.0*y[IDX_GCH2CNI] + + 1.0*y[IDX_GCH3CNI] + 1.0*y[IDX_GH2CNI] + 1.0*y[IDX_GHC5NI] + 1.0*y[IDX_GHC7NI] + + 1.0*y[IDX_GHC9NI] + 1.0*y[IDX_GHCCNI] + 1.0*y[IDX_GSiNI] + 1.0*y[IDX_HCCNI] + + 1.0*y[IDX_CH3C3NII] + 1.0*y[IDX_GCH2CHCNI] + 1.0*y[IDX_GHC3NI] + 1.0*y[IDX_C5NII] + + 1.0*y[IDX_CH2CHCNII] + 1.0*y[IDX_GC2H5CNI] + 1.0*y[IDX_GC9NI] + 1.0*y[IDX_GOCNI] + + 1.0*y[IDX_H2CNOII] + 1.0*y[IDX_H2NCOII] + 1.0*y[IDX_H2OCNII] + 1.0*y[IDX_C7NII] + + 1.0*y[IDX_C9NII] + 1.0*y[IDX_CH3NHII] + 1.0*y[IDX_GC2NI] + 1.0*y[IDX_GCH2NHI] + + 1.0*y[IDX_GCNOI] + 1.0*y[IDX_GHNCI] + 1.0*y[IDX_GNSI] + 1.0*y[IDX_H2C4NII] + + 1.0*y[IDX_H2NOII] + 1.0*y[IDX_HNSII] + 2.0*y[IDX_NH2CNHII] + 1.0*y[IDX_GHNOI] + + 2.0*y[IDX_GN2I] + 1.0*y[IDX_HC4NII] + 1.0*y[IDX_HCNOHII] + 1.0*y[IDX_HNCOHII] + + 1.0*y[IDX_HOCNII] + 1.0*y[IDX_PNII] + 1.0*y[IDX_PNH3II] + 1.0*y[IDX_GC5NI] + + 1.0*y[IDX_H2C7NII] + 1.0*y[IDX_H2C9NII] + 1.0*y[IDX_HONCII] + 1.0*y[IDX_PNH2II] + + 1.0*y[IDX_C2H5CNHII] + 1.0*y[IDX_CH2NH2II] + 1.0*y[IDX_CH3C5NHII] + 1.0*y[IDX_CH3C7NHII] + + 1.0*y[IDX_GC3NI] + 1.0*y[IDX_GC7NI] + 1.0*y[IDX_GHCNI] + 1.0*y[IDX_H2CNI] + + 1.0*y[IDX_H3C5NII] + 1.0*y[IDX_HCNOII] + 1.0*y[IDX_GNH3I] + 1.0*y[IDX_H3C9NII] + + 1.0*y[IDX_HPNII] + 1.0*y[IDX_C4NI] + 1.0*y[IDX_H3C7NII] + 2.0*y[IDX_NH2CNI] + + 1.0*y[IDX_CH3C3NHII] + 1.0*y[IDX_HC7NII] + 1.0*y[IDX_HC9NII] + 1.0*y[IDX_HNCOII] + + 1.0*y[IDX_NO2II] + 1.0*y[IDX_C2H5CNI] + 1.0*y[IDX_CH2CHCNHII] + 2.0*y[IDX_HN2OII] + + 2.0*y[IDX_N2OII] + 1.0*y[IDX_SiNCHII] + 1.0*y[IDX_HNSiII] + 1.0*y[IDX_NSII] + + 1.0*y[IDX_OCNII] + 2.0*y[IDX_C2N2II] + 1.0*y[IDX_CH3CNII] + 1.0*y[IDX_HC5NHII] + + 1.0*y[IDX_SiNH2II] + 1.0*y[IDX_C3NII] + 1.0*y[IDX_CH2CNII] + 1.0*y[IDX_HC5NII] + + 1.0*y[IDX_HONCI] + 1.0*y[IDX_SiNII] + 1.0*y[IDX_CH3C5NI] + 1.0*y[IDX_CH3C7NI] + + 1.0*y[IDX_H2NCII] + 1.0*y[IDX_SiNCI] + 1.0*y[IDX_SiNCII] + 1.0*y[IDX_CNOI] + + 1.0*y[IDX_HNSiI] + 1.0*y[IDX_C2NHII] + 1.0*y[IDX_HCNOI] + 1.0*y[IDX_C4NII] + + 1.0*y[IDX_CH3C3NI] + 1.0*y[IDX_HOCNI] + 1.0*y[IDX_GNOI] + 1.0*y[IDX_HC9NI] + + 2.0*y[IDX_NCCNHII] + 1.0*y[IDX_NO2I] + 1.0*y[IDX_PNI] + 1.0*y[IDX_CH2CNI] + + 1.0*y[IDX_HNCOI] + 1.0*y[IDX_C9NI] + 1.0*y[IDX_GNH2I] + 1.0*y[IDX_CH2NHI] + + 1.0*y[IDX_SiNI] + 1.0*y[IDX_GNHI] + 1.0*y[IDX_NSI] + 1.0*y[IDX_CH2CHCNI] + + 1.0*y[IDX_CH3CNHII] + 1.0*y[IDX_HC7NI] + 1.0*y[IDX_C7NI] + 1.0*y[IDX_HNOI] + + 2.0*y[IDX_N2OI] + 1.0*y[IDX_C2NII] + 1.0*y[IDX_HNC3I] + 1.0*y[IDX_OCNI] + + 1.0*y[IDX_HC3NII] + 1.0*y[IDX_HC5NI] + 1.0*y[IDX_HC3NHII] + 1.0*y[IDX_CH3CNI] + + 2.0*y[IDX_NCCNI] + 1.0*y[IDX_HNOII] + 1.0*y[IDX_GCNI] + 1.0*y[IDX_CNII] + + 1.0*y[IDX_GNI] + 2.0*y[IDX_N2II] + 1.0*y[IDX_HCNII] + 1.0*y[IDX_CNCII] + + 1.0*y[IDX_NHII] + 1.0*y[IDX_NH2II] + 1.0*y[IDX_C5NM] + 1.0*y[IDX_HC3NI] + + 1.0*y[IDX_C2NI] + 1.0*y[IDX_NH2I] + 1.0*y[IDX_C5NI] + 1.0*y[IDX_C3NM] + + 1.0*y[IDX_C3NI] + 1.0*y[IDX_NHI] + 1.0*y[IDX_CNM] + 2.0*y[IDX_N2HII] + + 1.0*y[IDX_NII] + 1.0*y[IDX_NOII] + 1.0*y[IDX_HCNHII] + 1.0*y[IDX_HNCI] + + 1.0*y[IDX_NH3II] + 1.0*y[IDX_NH4II] + 2.0*y[IDX_N2I] + 1.0*y[IDX_NOI] + + 1.0*y[IDX_HCNI] + 1.0*y[IDX_NH3I] + 1.0*y[IDX_CNI] + 1.0*y[IDX_NI] + 0.0; + } + if (elemidx == IDX_ELEM_O) { + return 1.0*y[IDX_GClOI] + 1.0*y[IDX_GHPOI] + 2.0*y[IDX_GNO2I] + 2.0*y[IDX_GSiO2I] + + 1.0*y[IDX_GH2SiOI] + 2.0*y[IDX_GCH3COOHI] + 1.0*y[IDX_GHCNOI] + 1.0*y[IDX_GHNCOI] + + 1.0*y[IDX_GHOCNI] + 1.0*y[IDX_GHONCI] + 1.0*y[IDX_GN2OI] + 1.0*y[IDX_GPOI] + + 1.0*y[IDX_HC2OI] + 2.0*y[IDX_GH2O2I] + 2.0*y[IDX_GSO2I] + 1.0*y[IDX_GC3OI] + + 1.0*y[IDX_GHC2OI] + 1.0*y[IDX_GSiOI] + 1.0*y[IDX_C3H2OII] + 1.0*y[IDX_ClOII] + + 1.0*y[IDX_GCH3COCH3I] + 1.0*y[IDX_GCH3OCH3I] + 1.0*y[IDX_H3C3OII] + 1.0*y[IDX_GOCSI] + + 2.0*y[IDX_COOCH3II] + 1.0*y[IDX_GC2H5OHI] + 1.0*y[IDX_GC2OI] + 2.0*y[IDX_GCO2I] + + 2.0*y[IDX_GO2HI] + 1.0*y[IDX_GOCNI] + 1.0*y[IDX_GSOI] + 1.0*y[IDX_H2CNOII] + + 1.0*y[IDX_H2NCOII] + 1.0*y[IDX_H2OCNII] + 1.0*y[IDX_ClOI] + 1.0*y[IDX_GCNOI] + + 1.0*y[IDX_H2NOII] + 1.0*y[IDX_HOCII] + 1.0*y[IDX_HSOII] + 2.0*y[IDX_HSiO2II] + + 1.0*y[IDX_C2H5OHII] + 1.0*y[IDX_C2OII] + 2.0*y[IDX_CH2OHCOII] + 1.0*y[IDX_GCH2COI] + + 1.0*y[IDX_GHNOI] + 1.0*y[IDX_HCNOHII] + 1.0*y[IDX_HNCOHII] + 1.0*y[IDX_HOCNII] + + 2.0*y[IDX_H2O2I] + 1.0*y[IDX_HONCII] + 2.0*y[IDX_CH2OHCH2OII] + 2.0*y[IDX_GCOOCH3I] + + 1.0*y[IDX_H2SiOII] + 1.0*y[IDX_HCNOII] + 2.0*y[IDX_CH3COOHII] + 2.0*y[IDX_H5C2O2II] + + 2.0*y[IDX_HCOOHII] + 2.0*y[IDX_CH3COOH2II] + 1.0*y[IDX_CH3OCH3II] + 2.0*y[IDX_GCH2OHCOI] + + 2.0*y[IDX_GCOOHI] + 2.0*y[IDX_GO2I] + 1.0*y[IDX_H3SiOII] + 2.0*y[IDX_HSO2II] + + 1.0*y[IDX_CH3OCH4II] + 1.0*y[IDX_HNCOII] + 2.0*y[IDX_NO2II] + 2.0*y[IDX_SiO2I] + + 1.0*y[IDX_C2H5OH2II] + 2.0*y[IDX_COOCH3I] + 1.0*y[IDX_H2POII] + 2.0*y[IDX_HCOOCH3II] + + 1.0*y[IDX_HN2OII] + 1.0*y[IDX_N2OII] + 1.0*y[IDX_C3OII] + 2.0*y[IDX_CH2OHCHOII] + + 1.0*y[IDX_CH3CHOII] + 2.0*y[IDX_GCH2OHCHOI] + 2.0*y[IDX_GHCOOHI] + 1.0*y[IDX_HOCSII] + + 1.0*y[IDX_OCNII] + 1.0*y[IDX_GCH3COI] + 2.0*y[IDX_GHCOOCH3I] + 1.0*y[IDX_CH3COCH3II] + + 1.0*y[IDX_GCH2OHI] + 1.0*y[IDX_GCH3OHI] + 1.0*y[IDX_HONCI] + 2.0*y[IDX_SO2II] + + 2.0*y[IDX_CH2OHCOI] + 1.0*y[IDX_H2SiOI] + 1.0*y[IDX_HC2OII] + 1.0*y[IDX_CNOI] + + 1.0*y[IDX_GCH3OI] + 1.0*y[IDX_GH2OI] + 2.0*y[IDX_HCOOH2II] + 1.0*y[IDX_HPOII] + + 2.0*y[IDX_CH2OHCHOI] + 1.0*y[IDX_HC3OII] + 1.0*y[IDX_HCNOI] + 1.0*y[IDX_CH2COII] + + 1.0*y[IDX_GCH3CHOI] + 1.0*y[IDX_GH2COI] + 1.0*y[IDX_HOCNI] + 1.0*y[IDX_HPOI] + + 1.0*y[IDX_CH3COI] + 1.0*y[IDX_CH3COCH4II] + 1.0*y[IDX_CH3OHII] + 2.0*y[IDX_COOHI] + + 1.0*y[IDX_GNOI] + 1.0*y[IDX_POII] + 2.0*y[IDX_HCOOCH3I] + 2.0*y[IDX_NO2I] + + 1.0*y[IDX_HNCOI] + 2.0*y[IDX_CH3COOHI] + 1.0*y[IDX_CH3OCH3I] + 1.0*y[IDX_POI] + + 1.0*y[IDX_CH3OI] + 1.0*y[IDX_GHCOI] + 1.0*y[IDX_OCSII] + 1.0*y[IDX_C2OI] + + 1.0*y[IDX_CH2OHI] + 1.0*y[IDX_C3OI] + 1.0*y[IDX_CH3CHOHII] + 1.0*y[IDX_CH3COII] + + 2.0*y[IDX_HCOOHI] + 2.0*y[IDX_O2HI] + 2.0*y[IDX_SO2I] + 1.0*y[IDX_C2H5OHI] + + 1.0*y[IDX_HNOI] + 1.0*y[IDX_N2OI] + 1.0*y[IDX_CH3OH2II] + 1.0*y[IDX_CH2COI] + + 1.0*y[IDX_OCNI] + 1.0*y[IDX_CH3COCH3I] + 2.0*y[IDX_CO2II] + 1.0*y[IDX_GOHI] + + 1.0*y[IDX_GCOI] + 2.0*y[IDX_HCO2II] + 1.0*y[IDX_CH3CHOI] + 2.0*y[IDX_O2HII] + + 1.0*y[IDX_HNOII] + 1.0*y[IDX_GOI] + 2.0*y[IDX_O2M] + 1.0*y[IDX_OCSI] + + 1.0*y[IDX_COII] + 1.0*y[IDX_OHM] + 1.0*y[IDX_OM] + 1.0*y[IDX_CH3OHI] + + 1.0*y[IDX_H3COII] + 1.0*y[IDX_SiOII] + 1.0*y[IDX_SiOHII] + 1.0*y[IDX_OHII] + + 1.0*y[IDX_H2OII] + 2.0*y[IDX_CO2I] + 2.0*y[IDX_O2II] + 1.0*y[IDX_SiOI] + + 1.0*y[IDX_SOI] + 1.0*y[IDX_SOII] + 1.0*y[IDX_H2COII] + 1.0*y[IDX_NOII] + + 1.0*y[IDX_OII] + 2.0*y[IDX_O2I] + 1.0*y[IDX_NOI] + 1.0*y[IDX_HCOI] + + 1.0*y[IDX_H2COI] + 1.0*y[IDX_OHI] + 1.0*y[IDX_H3OII] + 1.0*y[IDX_OI] + + 1.0*y[IDX_H2OI] + 1.0*y[IDX_HCOII] + 1.0*y[IDX_COI] + 0.0; + } + if (elemidx == IDX_ELEM_He) { + return 1.0*y[IDX_GHeI] + 1.0*y[IDX_HeHII] + 1.0*y[IDX_HeII] + 1.0*y[IDX_HeI] + 0.0; + } + if (elemidx == IDX_ELEM_C) { + return 4.0*y[IDX_GC4H6I] + 4.0*y[IDX_GC4SI] + 1.0*y[IDX_GCClI] + 4.0*y[IDX_GCH3C3NI] + + 5.0*y[IDX_GCH3C4HI] + 6.0*y[IDX_GCH3C5NI] + 7.0*y[IDX_GCH3C6HI] + 8.0*y[IDX_GCH3C7NI] + + 2.0*y[IDX_GHC2PI] + 1.0*y[IDX_GNH2CNI] + 3.0*y[IDX_GSiC3HI] + 1.0*y[IDX_GSiCH3I] + + 2.0*y[IDX_GNCCNI] + 2.0*y[IDX_GSiC2HI] + 3.0*y[IDX_C2H4CNI] + 3.0*y[IDX_GC3SI] + + 4.0*y[IDX_GC4NI] + 4.0*y[IDX_GC4PI] + 1.0*y[IDX_GCH2PHI] + 3.0*y[IDX_GCH3CHCH2I] + + 2.0*y[IDX_GCH3COOHI] + 1.0*y[IDX_GHCNOI] + 1.0*y[IDX_GHCPI] + 3.0*y[IDX_GHNC3I] + + 1.0*y[IDX_GHNCOI] + 1.0*y[IDX_GHOCNI] + 1.0*y[IDX_GHONCI] + 2.0*y[IDX_GSiC2H2I] + + 4.0*y[IDX_GSiC4I] + 1.0*y[IDX_GSiNCI] + 2.0*y[IDX_HC2OI] + 3.0*y[IDX_GC3PI] + + 6.0*y[IDX_GC6H6I] + 1.0*y[IDX_GHCSiI] + 3.0*y[IDX_NCCNCH3II] + 3.0*y[IDX_GC2H4CNI] + + 2.0*y[IDX_GC2SI] + 3.0*y[IDX_GC3OI] + 4.0*y[IDX_GC4H3I] + 7.0*y[IDX_GC7H2I] + + 8.0*y[IDX_GC8H2I] + 9.0*y[IDX_GC9H2I] + 2.0*y[IDX_GCH2CNI] + 2.0*y[IDX_GCH3CNI] + + 1.0*y[IDX_GH2CNI] + 1.0*y[IDX_GH2CSI] + 2.0*y[IDX_GHC2OI] + 5.0*y[IDX_GHC5NI] + + 7.0*y[IDX_GHC7NI] + 9.0*y[IDX_GHC9NI] + 2.0*y[IDX_GHCCNI] + 1.0*y[IDX_GHCSI] + + 3.0*y[IDX_GSiC3I] + 2.0*y[IDX_HCCNI] + 3.0*y[IDX_C3H2OII] + 1.0*y[IDX_CFII] + + 2.0*y[IDX_GC2H6I] + 3.0*y[IDX_GC3H2I] + 5.0*y[IDX_GC5H2I] + 2.0*y[IDX_GCCPI] + + 4.0*y[IDX_GCH2CHCCHI] + 3.0*y[IDX_GCH3COCH3I] + 2.0*y[IDX_GCH3OCH3I] + 1.0*y[IDX_GSiCH2I] + + 3.0*y[IDX_H3C3OII] + 8.0*y[IDX_C8H5II] + 9.0*y[IDX_C9H5II] + 4.0*y[IDX_CH3C3NII] + + 10.0*y[IDX_GC10H2I] + 4.0*y[IDX_GC4H2I] + 3.0*y[IDX_GCH2CHCNI] + 3.0*y[IDX_GH2CCCI] + + 3.0*y[IDX_GHC3NI] + 1.0*y[IDX_GOCSI] + 4.0*y[IDX_C4H6I] + 4.0*y[IDX_C4PII] + + 5.0*y[IDX_C5NII] + 6.0*y[IDX_C6H6II] + 3.0*y[IDX_CH2CHCNII] + 2.0*y[IDX_COOCH3II] + + 3.0*y[IDX_GC2H5CNI] + 2.0*y[IDX_GC2H5OHI] + 2.0*y[IDX_GC2OI] + 6.0*y[IDX_GC6H2I] + + 9.0*y[IDX_GC9NI] + 1.0*y[IDX_GCO2I] + 1.0*y[IDX_GCPI] + 1.0*y[IDX_GOCNI] + + 1.0*y[IDX_GSiCI] + 1.0*y[IDX_H2CNOII] + 1.0*y[IDX_H2NCOII] + 1.0*y[IDX_H2OCNII] + + 2.0*y[IDX_PC2H4II] + 7.0*y[IDX_C7NII] + 9.0*y[IDX_C9NII] + 1.0*y[IDX_CH3NHII] + + 11.0*y[IDX_GC11I] + 2.0*y[IDX_GC2NI] + 3.0*y[IDX_GCH2CCH2I] + 1.0*y[IDX_GCH2NHI] + + 3.0*y[IDX_GCH3CCHI] + 1.0*y[IDX_GCNOI] + 1.0*y[IDX_GHNCI] + 2.0*y[IDX_GSiC2I] + + 4.0*y[IDX_H2C4NII] + 1.0*y[IDX_H2CClII] + 1.0*y[IDX_HOCII] + 1.0*y[IDX_NH2CNHII] + + 2.0*y[IDX_C2H5OHII] + 2.0*y[IDX_C2OII] + 4.0*y[IDX_CH2CHCCHI] + 2.0*y[IDX_CH2OHCOII] + + 3.0*y[IDX_GCH2CCHI] + 2.0*y[IDX_GCH2COI] + 4.0*y[IDX_HC4NII] + 1.0*y[IDX_HCNOHII] + + 1.0*y[IDX_HNCOHII] + 1.0*y[IDX_HOCNII] + 2.0*y[IDX_PC2H3II] + 2.0*y[IDX_CH3CSII] + + 5.0*y[IDX_GC5NI] + 7.0*y[IDX_H2C7NII] + 9.0*y[IDX_H2C9NII] + 1.0*y[IDX_HONCII] + + 1.0*y[IDX_PCH3II] + 10.0*y[IDX_C10H3II] + 3.0*y[IDX_C2H5CNHII] + 1.0*y[IDX_CClII] + + 1.0*y[IDX_CH2NH2II] + 2.0*y[IDX_CH2OHCH2OII] + 6.0*y[IDX_CH3C5NHII] + 8.0*y[IDX_CH3C7NHII] + + 2.0*y[IDX_GC2H5I] + 3.0*y[IDX_GC3NI] + 7.0*y[IDX_GC7NI] + 2.0*y[IDX_GCOOCH3I] + + 1.0*y[IDX_GHCNI] + 1.0*y[IDX_H2CNI] + 5.0*y[IDX_H3C5NII] + 1.0*y[IDX_HCNOII] + + 1.0*y[IDX_CClI] + 2.0*y[IDX_CH3COOHII] + 9.0*y[IDX_H3C9NII] + 2.0*y[IDX_H5C2O2II] + + 1.0*y[IDX_HCOOHII] + 2.0*y[IDX_C2SII] + 3.0*y[IDX_C3SII] + 4.0*y[IDX_C4NI] + + 2.0*y[IDX_CH3COOH2II] + 2.0*y[IDX_CH3OCH3II] + 10.0*y[IDX_GC10I] + 10.0*y[IDX_GC10HI] + + 8.0*y[IDX_GC8HI] + 2.0*y[IDX_GCH2OHCOI] + 1.0*y[IDX_GCOOHI] + 7.0*y[IDX_H3C7NII] + + 1.0*y[IDX_NH2CNI] + 4.0*y[IDX_CH3C3NHII] + 2.0*y[IDX_CH3OCH4II] + 2.0*y[IDX_GC2H4I] + + 9.0*y[IDX_GC9I] + 9.0*y[IDX_GC9HI] + 1.0*y[IDX_GCSI] + 7.0*y[IDX_HC7NII] + + 9.0*y[IDX_HC9NII] + 1.0*y[IDX_HNCOII] + 3.0*y[IDX_PC3HII] + 1.0*y[IDX_PCH4II] + + 3.0*y[IDX_C2H5CNI] + 2.0*y[IDX_C2H5OH2II] + 2.0*y[IDX_C2H7II] + 2.0*y[IDX_CCPII] + + 3.0*y[IDX_CH2CHCNHII] + 2.0*y[IDX_COOCH3I] + 2.0*y[IDX_HCOOCH3II] + 2.0*y[IDX_PC2H2II] + + 3.0*y[IDX_SiC3H2II] + 4.0*y[IDX_SiC4II] + 4.0*y[IDX_SiC4HII] + 1.0*y[IDX_SiNCHII] + + 11.0*y[IDX_C11I] + 3.0*y[IDX_C3OII] + 4.0*y[IDX_C4H5II] + 4.0*y[IDX_C4H7II] + + 2.0*y[IDX_CH2OHCHOII] + 2.0*y[IDX_CH3CHOII] + 2.0*y[IDX_GCH2OHCHOI] + 1.0*y[IDX_GHCOOHI] + + 1.0*y[IDX_HOCSII] + 1.0*y[IDX_OCNII] + 4.0*y[IDX_PC4HII] + 1.0*y[IDX_SiCH4II] + + 10.0*y[IDX_C10II] + 10.0*y[IDX_C10H2II] + 2.0*y[IDX_C2N2II] + 2.0*y[IDX_CH3CNII] + + 2.0*y[IDX_GC2H2I] + 5.0*y[IDX_GC5I] + 7.0*y[IDX_GC7HI] + 2.0*y[IDX_GCH3COI] + + 2.0*y[IDX_GHCOOCH3I] + 4.0*y[IDX_HC4SII] + 5.0*y[IDX_HC5NHII] + 2.0*y[IDX_SiC2H3II] + + 3.0*y[IDX_SiC3HI] + 1.0*y[IDX_SiCH3II] + 11.0*y[IDX_C11II] + 3.0*y[IDX_C3NII] + + 4.0*y[IDX_C4H4II] + 2.0*y[IDX_CH2CNII] + 3.0*y[IDX_CH3COCH3II] + 1.0*y[IDX_CPII] + + 6.0*y[IDX_GC6I] + 8.0*y[IDX_GC8I] + 1.0*y[IDX_GCH2OHI] + 1.0*y[IDX_GCH3OHI] + + 2.0*y[IDX_HC2PII] + 5.0*y[IDX_HC5NII] + 1.0*y[IDX_HONCI] + 1.0*y[IDX_PCH2II] + + 9.0*y[IDX_C9II] + 2.0*y[IDX_CH2OHCOI] + 6.0*y[IDX_CH3C5NI] + 8.0*y[IDX_CH3C7NI] + + 3.0*y[IDX_GC3HI] + 4.0*y[IDX_GC4HI] + 5.0*y[IDX_GC5HI] + 6.0*y[IDX_GC6HI] + + 1.0*y[IDX_H2NCII] + 1.0*y[IDX_H3CSII] + 2.0*y[IDX_HC2OII] + 1.0*y[IDX_HCPII] + + 4.0*y[IDX_SiC4I] + 1.0*y[IDX_SiNCI] + 1.0*y[IDX_SiNCII] + 1.0*y[IDX_CNOI] + + 2.0*y[IDX_GC2H3I] + 1.0*y[IDX_GCH3OI] + 3.0*y[IDX_HC3SII] + 1.0*y[IDX_HCOOH2II] + + 2.0*y[IDX_SiC2H2I] + 3.0*y[IDX_SiC3II] + 2.0*y[IDX_C2NHII] + 3.0*y[IDX_C3H6II] + + 6.0*y[IDX_C6H7II] + 8.0*y[IDX_C8H4II] + 2.0*y[IDX_CH2OHCHOI] + 7.0*y[IDX_GC7I] + + 3.0*y[IDX_HC3OII] + 1.0*y[IDX_HCNOI] + 3.0*y[IDX_SiC3HII] + 1.0*y[IDX_SiCH3I] + + 3.0*y[IDX_C3H7II] + 4.0*y[IDX_C4NII] + 8.0*y[IDX_C8II] + 9.0*y[IDX_C9H4II] + + 2.0*y[IDX_CH2COII] + 1.0*y[IDX_CH2PHI] + 4.0*y[IDX_CH3C3NI] + 4.0*y[IDX_GC4I] + + 2.0*y[IDX_GCH3CHOI] + 1.0*y[IDX_GH2COI] + 1.0*y[IDX_HOCNI] + 2.0*y[IDX_SiC2II] + + 2.0*y[IDX_SiC2H2II] + 6.0*y[IDX_C6H4II] + 2.0*y[IDX_CH3COI] + 3.0*y[IDX_CH3COCH4II] + + 1.0*y[IDX_CH3OHII] + 1.0*y[IDX_COOHI] + 7.0*y[IDX_C7H4II] + 7.0*y[IDX_C7H5II] + + 7.0*y[IDX_CH3C6HI] + 1.0*y[IDX_H2CSII] + 9.0*y[IDX_HC9NI] + 2.0*y[IDX_HCOOCH3I] + + 2.0*y[IDX_NCCNHII] + 2.0*y[IDX_SiC2HI] + 3.0*y[IDX_SiC3I] + 4.0*y[IDX_C4PI] + + 7.0*y[IDX_C7II] + 2.0*y[IDX_CH2CNI] + 5.0*y[IDX_CH3C4HII] + 1.0*y[IDX_GCH4I] + + 1.0*y[IDX_HCPI] + 1.0*y[IDX_HNCOI] + 3.0*y[IDX_C3PI] + 9.0*y[IDX_C9NI] + + 5.0*y[IDX_CH3C4HI] + 2.0*y[IDX_CH3COOHI] + 2.0*y[IDX_CH3OCH3I] + 2.0*y[IDX_GC2HI] + + 1.0*y[IDX_H2CSI] + 1.0*y[IDX_SiCII] + 3.0*y[IDX_C3SI] + 6.0*y[IDX_C6H5II] + + 1.0*y[IDX_CH2NHI] + 1.0*y[IDX_CH3OI] + 1.0*y[IDX_GHCOI] + 2.0*y[IDX_HC2PI] + + 1.0*y[IDX_HCSiI] + 1.0*y[IDX_SiCH2I] + 10.0*y[IDX_C10HII] + 1.0*y[IDX_HCSiII] + + 1.0*y[IDX_OCSII] + 2.0*y[IDX_SiC2I] + 2.0*y[IDX_C2H6II] + 2.0*y[IDX_C2OI] + + 8.0*y[IDX_C8HII] + 1.0*y[IDX_CH2OHI] + 5.0*y[IDX_C5H5II] + 1.0*y[IDX_HCSI] + + 2.0*y[IDX_SiC2HII] + 3.0*y[IDX_C3OI] + 6.0*y[IDX_C6HII] + 9.0*y[IDX_C9H2I] + + 3.0*y[IDX_CH2CHCNI] + 2.0*y[IDX_CH3CHOHII] + 2.0*y[IDX_CH3CNHII] + 2.0*y[IDX_CH3COII] + + 7.0*y[IDX_HC7NI] + 6.0*y[IDX_C6II] + 6.0*y[IDX_C6H6I] + 7.0*y[IDX_C7NI] + + 1.0*y[IDX_HCOOHI] + 10.0*y[IDX_C10H2I] + 4.0*y[IDX_C4II] + 2.0*y[IDX_CCPI] + + 1.0*y[IDX_CPI] + 3.0*y[IDX_GC3I] + 1.0*y[IDX_SiCI] + 2.0*y[IDX_C2H5OHI] + + 1.0*y[IDX_CH3OH2II] + 2.0*y[IDX_C2NII] + 5.0*y[IDX_C5II] + 6.0*y[IDX_C6H3II] + + 8.0*y[IDX_C8H3II] + 9.0*y[IDX_C9HII] + 9.0*y[IDX_C9H3II] + 2.0*y[IDX_CH2COI] + + 3.0*y[IDX_HNC3I] + 1.0*y[IDX_OCNI] + 1.0*y[IDX_SiCH2II] + 3.0*y[IDX_CH3COCH3I] + + 3.0*y[IDX_HC3NII] + 8.0*y[IDX_C8H2I] + 1.0*y[IDX_CO2II] + 5.0*y[IDX_HC5NI] + + 7.0*y[IDX_C7HII] + 9.0*y[IDX_C9H2II] + 7.0*y[IDX_C7H2I] + 1.0*y[IDX_GCOI] + + 1.0*y[IDX_HCSII] + 3.0*y[IDX_C3H4II] + 8.0*y[IDX_C8H2II] + 1.0*y[IDX_GCH2I] + + 1.0*y[IDX_HCO2II] + 5.0*y[IDX_C5H3II] + 3.0*y[IDX_HC3NHII] + 5.0*y[IDX_C5HII] + + 2.0*y[IDX_CH3CHOI] + 1.0*y[IDX_CSII] + 3.0*y[IDX_C3H5II] + 7.0*y[IDX_C7H3II] + + 2.0*y[IDX_CH3CNI] + 2.0*y[IDX_NCCNI] + 7.0*y[IDX_C7H2II] + 2.0*y[IDX_GC2I] + + 3.0*y[IDX_C3II] + 6.0*y[IDX_C6H2II] + 1.0*y[IDX_CH4II] + 3.0*y[IDX_H2CCCI] + + 6.0*y[IDX_C6H2I] + 1.0*y[IDX_GCNI] + 2.0*y[IDX_C2H5II] + 5.0*y[IDX_C5H2I] + + 5.0*y[IDX_C5H2II] + 3.0*y[IDX_CH2CCH2I] + 1.0*y[IDX_CNII] + 2.0*y[IDX_C2H6I] + + 3.0*y[IDX_C3H2I] + 2.0*y[IDX_C2H5I] + 4.0*y[IDX_C4SII] + 1.0*y[IDX_HCNII] + + 3.0*y[IDX_CH3CHCH2I] + 2.0*y[IDX_C2II] + 4.0*y[IDX_C4HII] + 2.0*y[IDX_CNCII] + + 1.0*y[IDX_CHM] + 1.0*y[IDX_OCSI] + 1.0*y[IDX_GCH3I] + 2.0*y[IDX_C2HM] + + 4.0*y[IDX_C4HM] + 1.0*y[IDX_COII] + 3.0*y[IDX_CH3CCHI] + 1.0*y[IDX_CH5II] + + 2.0*y[IDX_HC2SII] + 10.0*y[IDX_C10HM] + 3.0*y[IDX_C3HM] + 4.0*y[IDX_C4SI] + + 6.0*y[IDX_C6HM] + 8.0*y[IDX_C8HM] + 7.0*y[IDX_C7HM] + 9.0*y[IDX_C9HM] + + 10.0*y[IDX_C10M] + 5.0*y[IDX_C5HM] + 5.0*y[IDX_C5NM] + 1.0*y[IDX_CM] + + 1.0*y[IDX_CSI] + 9.0*y[IDX_C9M] + 1.0*y[IDX_CH3OHI] + 3.0*y[IDX_HC3NI] + + 3.0*y[IDX_C3HII] + 3.0*y[IDX_C3H3II] + 8.0*y[IDX_C8M] + 2.0*y[IDX_C2M] + + 2.0*y[IDX_C2SI] + 3.0*y[IDX_C3M] + 4.0*y[IDX_C4M] + 6.0*y[IDX_C6M] + + 1.0*y[IDX_H3COII] + 5.0*y[IDX_C5M] + 7.0*y[IDX_C7M] + 2.0*y[IDX_C2NI] + + 1.0*y[IDX_GCHI] + 4.0*y[IDX_C4H3I] + 2.0*y[IDX_C2HII] + 3.0*y[IDX_C3H2II] + + 5.0*y[IDX_C5NI] + 1.0*y[IDX_CH2II] + 3.0*y[IDX_C3NM] + 3.0*y[IDX_C3NI] + + 1.0*y[IDX_CHII] + 1.0*y[IDX_CO2I] + 10.0*y[IDX_C10HI] + 9.0*y[IDX_C9HI] + + 10.0*y[IDX_C10I] + 8.0*y[IDX_C8HI] + 7.0*y[IDX_C7I] + 9.0*y[IDX_C9I] + + 8.0*y[IDX_C8I] + 1.0*y[IDX_GCI] + 5.0*y[IDX_C5I] + 6.0*y[IDX_C6I] + + 1.0*y[IDX_CNM] + 4.0*y[IDX_C4I] + 7.0*y[IDX_C7HI] + 2.0*y[IDX_C2H4II] + + 4.0*y[IDX_C4H3II] + 3.0*y[IDX_CH2CCHI] + 3.0*y[IDX_CH2CCHII] + 6.0*y[IDX_C6HI] + + 5.0*y[IDX_C5HI] + 3.0*y[IDX_C3HI] + 1.0*y[IDX_H2COII] + 3.0*y[IDX_C3I] + + 4.0*y[IDX_C4HI] + 4.0*y[IDX_C4H2I] + 4.0*y[IDX_C4H2II] + 1.0*y[IDX_HCNHII] + + 1.0*y[IDX_CH2I] + 1.0*y[IDX_HNCI] + 2.0*y[IDX_C2H4I] + 2.0*y[IDX_C2H3I] + + 2.0*y[IDX_C2H3II] + 1.0*y[IDX_HCOI] + 1.0*y[IDX_CH4I] + 2.0*y[IDX_C2HI] + + 1.0*y[IDX_H2COI] + 1.0*y[IDX_HCNI] + 1.0*y[IDX_CHI] + 2.0*y[IDX_C2I] + + 2.0*y[IDX_C2H2II] + 1.0*y[IDX_CH3II] + 2.0*y[IDX_C2H2I] + 1.0*y[IDX_CNI] + + 1.0*y[IDX_CH3I] + 1.0*y[IDX_CII] + 1.0*y[IDX_CI] + 1.0*y[IDX_HCOII] + + 1.0*y[IDX_COI] + 0.0; + } + if (elemidx == IDX_ELEM_GRAIN) { + return 1.0*y[IDX_GRAINM] + 1.0*y[IDX_GRAIN0I] + 0.0; + } + if (elemidx == IDX_ELEM_H) { + return 2.0*y[IDX_GH2S2I] + 6.0*y[IDX_GC4H6I] + 3.0*y[IDX_GCH3C3NI] + 4.0*y[IDX_GCH3C4HI] + + 3.0*y[IDX_GCH3C5NI] + 4.0*y[IDX_GCH3C6HI] + 3.0*y[IDX_GCH3C7NI] + 1.0*y[IDX_GHC2PI] + + 1.0*y[IDX_GHClI] + 1.0*y[IDX_GHFI] + 1.0*y[IDX_GHNSiI] + 1.0*y[IDX_GHPOI] + + 2.0*y[IDX_GNH2CNI] + 1.0*y[IDX_GSiC3HI] + 3.0*y[IDX_GSiCH3I] + 2.0*y[IDX_GH2SiOI] + + 1.0*y[IDX_GSiC2HI] + 4.0*y[IDX_C2H4CNI] + 3.0*y[IDX_GCH2PHI] + 6.0*y[IDX_GCH3CHCH2I] + + 4.0*y[IDX_GCH3COOHI] + 2.0*y[IDX_GH2SI] + 1.0*y[IDX_GHCNOI] + 1.0*y[IDX_GHCPI] + + 1.0*y[IDX_GHNC3I] + 1.0*y[IDX_GHNCOI] + 1.0*y[IDX_GHOCNI] + 1.0*y[IDX_GHONCI] + + 1.0*y[IDX_GHS2I] + 2.0*y[IDX_GPH2I] + 2.0*y[IDX_GSiC2H2I] + 1.0*y[IDX_HC2OI] + + 6.0*y[IDX_GC6H6I] + 2.0*y[IDX_GH2O2I] + 1.0*y[IDX_GHCSiI] + 1.0*y[IDX_GPHI] + + 4.0*y[IDX_GSiH4I] + 3.0*y[IDX_NCCNCH3II] + 4.0*y[IDX_GC2H4CNI] + 3.0*y[IDX_GC4H3I] + + 2.0*y[IDX_GC7H2I] + 2.0*y[IDX_GC8H2I] + 2.0*y[IDX_GC9H2I] + 2.0*y[IDX_GCH2CNI] + + 3.0*y[IDX_GCH3CNI] + 2.0*y[IDX_GH2CNI] + 2.0*y[IDX_GH2CSI] + 1.0*y[IDX_GHC2OI] + + 1.0*y[IDX_GHC5NI] + 1.0*y[IDX_GHC7NI] + 1.0*y[IDX_GHC9NI] + 1.0*y[IDX_GHCCNI] + + 1.0*y[IDX_GHCSI] + 3.0*y[IDX_GSiH3I] + 1.0*y[IDX_HCCNI] + 2.0*y[IDX_C3H2OII] + + 6.0*y[IDX_GC2H6I] + 2.0*y[IDX_GC3H2I] + 2.0*y[IDX_GC5H2I] + 4.0*y[IDX_GCH2CHCCHI] + + 6.0*y[IDX_GCH3COCH3I] + 6.0*y[IDX_GCH3OCH3I] + 2.0*y[IDX_GSiCH2I] + 1.0*y[IDX_GSiHI] + + 2.0*y[IDX_GSiH2I] + 3.0*y[IDX_H3C3OII] + 1.0*y[IDX_HFII] + 5.0*y[IDX_C8H5II] + + 5.0*y[IDX_C9H5II] + 3.0*y[IDX_CH3C3NII] + 2.0*y[IDX_GC10H2I] + 2.0*y[IDX_GC4H2I] + + 3.0*y[IDX_GCH2CHCNI] + 2.0*y[IDX_GH2CCCI] + 1.0*y[IDX_GHC3NI] + 2.0*y[IDX_H2FII] + + 6.0*y[IDX_C4H6I] + 6.0*y[IDX_C6H6II] + 3.0*y[IDX_CH2CHCNII] + 3.0*y[IDX_COOCH3II] + + 5.0*y[IDX_GC2H5CNI] + 6.0*y[IDX_GC2H5OHI] + 2.0*y[IDX_GC6H2I] + 1.0*y[IDX_GO2HI] + + 2.0*y[IDX_H2CNOII] + 2.0*y[IDX_H2NCOII] + 2.0*y[IDX_H2OCNII] + 4.0*y[IDX_PC2H4II] + + 4.0*y[IDX_CH3NHII] + 4.0*y[IDX_GCH2CCH2I] + 3.0*y[IDX_GCH2NHI] + 4.0*y[IDX_GCH3CCHI] + + 1.0*y[IDX_GHNCI] + 2.0*y[IDX_H2C4NII] + 2.0*y[IDX_H2CClII] + 2.0*y[IDX_H2NOII] + + 1.0*y[IDX_HClII] + 1.0*y[IDX_HNSII] + 1.0*y[IDX_HOCII] + 1.0*y[IDX_HSOII] + + 1.0*y[IDX_HSiO2II] + 3.0*y[IDX_NH2CNHII] + 6.0*y[IDX_C2H5OHII] + 4.0*y[IDX_CH2CHCCHI] + + 3.0*y[IDX_CH2OHCOII] + 3.0*y[IDX_GCH2CCHI] + 2.0*y[IDX_GCH2COI] + 1.0*y[IDX_GHNOI] + + 1.0*y[IDX_HC4NII] + 2.0*y[IDX_HCNOHII] + 2.0*y[IDX_HNCOHII] + 1.0*y[IDX_HOCNII] + + 1.0*y[IDX_HeHII] + 3.0*y[IDX_PC2H3II] + 3.0*y[IDX_PNH3II] + 3.0*y[IDX_CH3CSII] + + 2.0*y[IDX_H2C7NII] + 2.0*y[IDX_H2C9NII] + 2.0*y[IDX_H2O2I] + 3.0*y[IDX_H3S2II] + + 1.0*y[IDX_HONCII] + 3.0*y[IDX_PCH3II] + 2.0*y[IDX_PNH2II] + 3.0*y[IDX_C10H3II] + + 6.0*y[IDX_C2H5CNHII] + 4.0*y[IDX_CH2NH2II] + 5.0*y[IDX_CH2OHCH2OII] + 4.0*y[IDX_CH3C5NHII] + + 4.0*y[IDX_CH3C7NHII] + 5.0*y[IDX_GC2H5I] + 3.0*y[IDX_GCOOCH3I] + 1.0*y[IDX_GHCNI] + + 2.0*y[IDX_H2CNI] + 2.0*y[IDX_H2SiOII] + 3.0*y[IDX_H3C5NII] + 1.0*y[IDX_HCNOII] + + 4.0*y[IDX_CH3COOHII] + 3.0*y[IDX_GNH3I] + 2.0*y[IDX_H2ClII] + 3.0*y[IDX_H3C9NII] + + 5.0*y[IDX_H5C2O2II] + 2.0*y[IDX_HCOOHII] + 1.0*y[IDX_HPNII] + 5.0*y[IDX_CH3COOH2II] + + 6.0*y[IDX_CH3OCH3II] + 1.0*y[IDX_GC10HI] + 1.0*y[IDX_GC8HI] + 3.0*y[IDX_GCH2OHCOI] + + 1.0*y[IDX_GCOOHI] + 3.0*y[IDX_H3C7NII] + 3.0*y[IDX_H3SiOII] + 1.0*y[IDX_HSO2II] + + 2.0*y[IDX_NH2CNI] + 4.0*y[IDX_CH3C3NHII] + 7.0*y[IDX_CH3OCH4II] + 4.0*y[IDX_GC2H4I] + + 1.0*y[IDX_GC9HI] + 1.0*y[IDX_HC7NII] + 1.0*y[IDX_HC9NII] + 1.0*y[IDX_HNCOII] + + 1.0*y[IDX_PC3HII] + 4.0*y[IDX_PCH4II] + 4.0*y[IDX_SiH4II] + 5.0*y[IDX_C2H5CNI] + + 7.0*y[IDX_C2H5OH2II] + 7.0*y[IDX_C2H7II] + 4.0*y[IDX_CH2CHCNHII] + 3.0*y[IDX_COOCH3I] + + 1.0*y[IDX_GHSI] + 2.0*y[IDX_H2POII] + 4.0*y[IDX_HCOOCH3II] + 1.0*y[IDX_HN2OII] + + 2.0*y[IDX_PC2H2II] + 2.0*y[IDX_SiC3H2II] + 1.0*y[IDX_SiC4HII] + 5.0*y[IDX_SiH5II] + + 1.0*y[IDX_SiNCHII] + 5.0*y[IDX_C4H5II] + 7.0*y[IDX_C4H7II] + 4.0*y[IDX_CH2OHCHOII] + + 4.0*y[IDX_CH3CHOII] + 4.0*y[IDX_GCH2OHCHOI] + 2.0*y[IDX_GHCOOHI] + 2.0*y[IDX_H2S2I] + + 1.0*y[IDX_HNSiII] + 1.0*y[IDX_HOCSII] + 1.0*y[IDX_PC4HII] + 3.0*y[IDX_PH3II] + + 4.0*y[IDX_SiCH4II] + 2.0*y[IDX_C10H2II] + 3.0*y[IDX_CH3CNII] + 2.0*y[IDX_GC2H2I] + + 1.0*y[IDX_GC7HI] + 3.0*y[IDX_GCH3COI] + 4.0*y[IDX_GHCOOCH3I] + 1.0*y[IDX_HC4SII] + + 2.0*y[IDX_HC5NHII] + 3.0*y[IDX_SiC2H3II] + 1.0*y[IDX_SiC3HI] + 3.0*y[IDX_SiCH3II] + + 2.0*y[IDX_SiNH2II] + 4.0*y[IDX_C4H4II] + 2.0*y[IDX_CH2CNII] + 6.0*y[IDX_CH3COCH3II] + + 3.0*y[IDX_GCH2OHI] + 4.0*y[IDX_GCH3OHI] + 2.0*y[IDX_H2S2II] + 1.0*y[IDX_HC2PII] + + 1.0*y[IDX_HC5NII] + 1.0*y[IDX_HFI] + 1.0*y[IDX_HONCI] + 1.0*y[IDX_HSiSII] + + 2.0*y[IDX_PCH2II] + 3.0*y[IDX_CH2OHCOI] + 3.0*y[IDX_CH3C5NI] + 3.0*y[IDX_CH3C7NI] + + 1.0*y[IDX_GC3HI] + 1.0*y[IDX_GC4HI] + 1.0*y[IDX_GC5HI] + 1.0*y[IDX_GC6HI] + + 2.0*y[IDX_H2NCII] + 2.0*y[IDX_H2SiOI] + 3.0*y[IDX_H3CSII] + 1.0*y[IDX_HC2OII] + + 1.0*y[IDX_HCPII] + 3.0*y[IDX_GC2H3I] + 3.0*y[IDX_GCH3OI] + 2.0*y[IDX_GH2OI] + + 1.0*y[IDX_HC3SII] + 3.0*y[IDX_HCOOH2II] + 1.0*y[IDX_HNSiI] + 1.0*y[IDX_HPOII] + + 1.0*y[IDX_HS2II] + 2.0*y[IDX_SiC2H2I] + 1.0*y[IDX_C2NHII] + 6.0*y[IDX_C3H6II] + + 7.0*y[IDX_C6H7II] + 4.0*y[IDX_C8H4II] + 4.0*y[IDX_CH2OHCHOI] + 1.0*y[IDX_HC3OII] + + 1.0*y[IDX_HCNOI] + 1.0*y[IDX_SiC3HII] + 3.0*y[IDX_SiCH3I] + 7.0*y[IDX_C3H7II] + + 4.0*y[IDX_C9H4II] + 2.0*y[IDX_CH2COII] + 3.0*y[IDX_CH2PHI] + 3.0*y[IDX_CH3C3NI] + + 4.0*y[IDX_GCH3CHOI] + 2.0*y[IDX_GH2COI] + 1.0*y[IDX_HOCNI] + 1.0*y[IDX_HPOI] + + 1.0*y[IDX_HS2I] + 2.0*y[IDX_SiC2H2II] + 4.0*y[IDX_C6H4II] + 3.0*y[IDX_CH3COI] + + 7.0*y[IDX_CH3COCH4II] + 4.0*y[IDX_CH3OHII] + 1.0*y[IDX_COOHI] + 4.0*y[IDX_C7H4II] + + 5.0*y[IDX_C7H5II] + 4.0*y[IDX_CH3C6HI] + 2.0*y[IDX_H2CSII] + 1.0*y[IDX_HC9NI] + + 4.0*y[IDX_HCOOCH3I] + 1.0*y[IDX_NCCNHII] + 2.0*y[IDX_PH2I] + 1.0*y[IDX_SiC2HI] + + 2.0*y[IDX_CH2CNI] + 4.0*y[IDX_CH3C4HII] + 4.0*y[IDX_GCH4I] + 1.0*y[IDX_HCPI] + + 1.0*y[IDX_HClI] + 1.0*y[IDX_HNCOI] + 4.0*y[IDX_CH3C4HI] + 4.0*y[IDX_CH3COOHI] + + 6.0*y[IDX_CH3OCH3I] + 1.0*y[IDX_GC2HI] + 2.0*y[IDX_GNH2I] + 2.0*y[IDX_H2CSI] + + 2.0*y[IDX_PH2II] + 5.0*y[IDX_C6H5II] + 3.0*y[IDX_CH2NHI] + 3.0*y[IDX_CH3OI] + + 1.0*y[IDX_GHCOI] + 1.0*y[IDX_HC2PI] + 1.0*y[IDX_HCSiI] + 2.0*y[IDX_SiCH2I] + + 1.0*y[IDX_C10HII] + 1.0*y[IDX_HCSiII] + 6.0*y[IDX_C2H6II] + 1.0*y[IDX_C8HII] + + 3.0*y[IDX_CH2OHI] + 5.0*y[IDX_C5H5II] + 1.0*y[IDX_GNHI] + 1.0*y[IDX_HCSI] + + 1.0*y[IDX_SiC2HII] + 2.0*y[IDX_SiH2I] + 1.0*y[IDX_C6HII] + 2.0*y[IDX_C9H2I] + + 3.0*y[IDX_CH2CHCNI] + 5.0*y[IDX_CH3CHOHII] + 4.0*y[IDX_CH3CNHII] + 3.0*y[IDX_CH3COII] + + 1.0*y[IDX_HC7NI] + 6.0*y[IDX_C6H6I] + 2.0*y[IDX_HCOOHI] + 2.0*y[IDX_SiH2II] + + 3.0*y[IDX_SiH3II] + 2.0*y[IDX_C10H2I] + 1.0*y[IDX_O2HI] + 6.0*y[IDX_C2H5OHI] + + 1.0*y[IDX_HNOI] + 3.0*y[IDX_SiH3I] + 5.0*y[IDX_CH3OH2II] + 3.0*y[IDX_C6H3II] + + 3.0*y[IDX_C8H3II] + 1.0*y[IDX_C9HII] + 3.0*y[IDX_C9H3II] + 2.0*y[IDX_CH2COI] + + 1.0*y[IDX_HNC3I] + 2.0*y[IDX_SiCH2II] + 1.0*y[IDX_SiHII] + 6.0*y[IDX_CH3COCH3I] + + 1.0*y[IDX_HC3NII] + 2.0*y[IDX_C8H2I] + 1.0*y[IDX_GOHI] + 1.0*y[IDX_HC5NI] + + 1.0*y[IDX_SiHI] + 4.0*y[IDX_SiH4I] + 1.0*y[IDX_C7HII] + 2.0*y[IDX_C9H2II] + + 1.0*y[IDX_PHI] + 2.0*y[IDX_C7H2I] + 1.0*y[IDX_HCSII] + 1.0*y[IDX_PHII] + + 4.0*y[IDX_C3H4II] + 2.0*y[IDX_C8H2II] + 2.0*y[IDX_GCH2I] + 1.0*y[IDX_HCO2II] + + 3.0*y[IDX_C5H3II] + 2.0*y[IDX_HC3NHII] + 1.0*y[IDX_C5HII] + 4.0*y[IDX_CH3CHOI] + + 5.0*y[IDX_C3H5II] + 3.0*y[IDX_C7H3II] + 3.0*y[IDX_CH3CNI] + 2.0*y[IDX_C7H2II] + + 3.0*y[IDX_H3SII] + 1.0*y[IDX_O2HII] + 2.0*y[IDX_C6H2II] + 4.0*y[IDX_CH4II] + + 1.0*y[IDX_HNOII] + 2.0*y[IDX_H2CCCI] + 2.0*y[IDX_C6H2I] + 5.0*y[IDX_C2H5II] + + 2.0*y[IDX_C5H2I] + 2.0*y[IDX_C5H2II] + 4.0*y[IDX_CH2CCH2I] + 6.0*y[IDX_C2H6I] + + 2.0*y[IDX_C3H2I] + 5.0*y[IDX_C2H5I] + 1.0*y[IDX_HCNII] + 6.0*y[IDX_CH3CHCH2I] + + 1.0*y[IDX_C4HII] + 1.0*y[IDX_HSII] + 1.0*y[IDX_NHII] + 1.0*y[IDX_CHM] + + 2.0*y[IDX_H2II] + 3.0*y[IDX_GCH3I] + 2.0*y[IDX_NH2II] + 1.0*y[IDX_C2HM] + + 1.0*y[IDX_C4HM] + 4.0*y[IDX_CH3CCHI] + 5.0*y[IDX_CH5II] + 1.0*y[IDX_HC2SII] + + 1.0*y[IDX_OHM] + 1.0*y[IDX_C10HM] + 1.0*y[IDX_C3HM] + 1.0*y[IDX_C6HM] + + 1.0*y[IDX_C8HM] + 1.0*y[IDX_C7HM] + 1.0*y[IDX_C9HM] + 1.0*y[IDX_C5HM] + + 1.0*y[IDX_HSI] + 4.0*y[IDX_CH3OHI] + 1.0*y[IDX_HM] + 1.0*y[IDX_HC3NI] + + 1.0*y[IDX_C3HII] + 3.0*y[IDX_C3H3II] + 3.0*y[IDX_H3COII] + 1.0*y[IDX_GCHI] + + 1.0*y[IDX_SiOHII] + 2.0*y[IDX_NH2I] + 3.0*y[IDX_C4H3I] + 1.0*y[IDX_C2HII] + + 2.0*y[IDX_C3H2II] + 2.0*y[IDX_CH2II] + 1.0*y[IDX_OHII] + 2.0*y[IDX_H2OII] + + 2.0*y[IDX_GH2I] + 1.0*y[IDX_CHII] + 1.0*y[IDX_C10HI] + 1.0*y[IDX_C9HI] + + 1.0*y[IDX_C8HI] + 1.0*y[IDX_NHI] + 1.0*y[IDX_C7HI] + 4.0*y[IDX_C2H4II] + + 3.0*y[IDX_C4H3II] + 1.0*y[IDX_N2HII] + 3.0*y[IDX_CH2CCHI] + 3.0*y[IDX_CH2CCHII] + + 1.0*y[IDX_C6HI] + 1.0*y[IDX_C5HI] + 2.0*y[IDX_H2SII] + 1.0*y[IDX_C3HI] + + 2.0*y[IDX_H2COII] + 1.0*y[IDX_C4HI] + 2.0*y[IDX_C4H2I] + 2.0*y[IDX_C4H2II] + + 2.0*y[IDX_HCNHII] + 2.0*y[IDX_CH2I] + 1.0*y[IDX_HNCI] + 3.0*y[IDX_NH3II] + + 4.0*y[IDX_C2H4I] + 3.0*y[IDX_C2H3I] + 4.0*y[IDX_NH4II] + 2.0*y[IDX_H2SI] + + 3.0*y[IDX_C2H3II] + 1.0*y[IDX_HCOI] + 4.0*y[IDX_CH4I] + 1.0*y[IDX_C2HI] + + 2.0*y[IDX_H2COI] + 1.0*y[IDX_HCNI] + 1.0*y[IDX_CHI] + 1.0*y[IDX_OHI] + + 3.0*y[IDX_NH3I] + 2.0*y[IDX_C2H2II] + 3.0*y[IDX_CH3II] + 2.0*y[IDX_C2H2I] + + 1.0*y[IDX_GHI] + 3.0*y[IDX_CH3I] + 3.0*y[IDX_H3OII] + 2.0*y[IDX_H2OI] + + 1.0*y[IDX_HII] + 1.0*y[IDX_HCOII] + 3.0*y[IDX_H3II] + 2.0*y[IDX_H2I] + + 1.0*y[IDX_HI] + 0.0; + } + +} + __device__ __host__ double GetMantleDens(double *y) { - return y[IDX_GCI] + y[IDX_GC10I] + y[IDX_GC10HI] + y[IDX_GC10H2I] + - y[IDX_GC11I] + y[IDX_GC2I] + y[IDX_GC2HI] + y[IDX_GC2H2I] + - y[IDX_GC2H3I] + y[IDX_GC2H4I] + y[IDX_GC2H4CNI] + y[IDX_GC2H5I] + - y[IDX_GC2H5CNI] + y[IDX_GC2H5OHI] + y[IDX_GC2H6I] + y[IDX_GC2NI] + - y[IDX_GC2OI] + y[IDX_GC2SI] + y[IDX_GC3I] + y[IDX_GC3HI] + y[IDX_GC3H2I] - + y[IDX_GC3NI] + y[IDX_GC3OI] + y[IDX_GC3PI] + y[IDX_GC3SI] + - y[IDX_GC4I] + y[IDX_GC4HI] + y[IDX_GC4H2I] + y[IDX_GC4H3I] + - y[IDX_GC4H6I] + y[IDX_GC4NI] + y[IDX_GC4PI] + y[IDX_GC4SI] + y[IDX_GC5I] - + y[IDX_GC5HI] + y[IDX_GC5H2I] + y[IDX_GC5NI] + y[IDX_GC6I] + - y[IDX_GC6HI] + y[IDX_GC6H2I] + y[IDX_GC6H6I] + y[IDX_GC7I] + - y[IDX_GC7HI] + y[IDX_GC7H2I] + y[IDX_GC7NI] + y[IDX_GC8I] + y[IDX_GC8HI] - + y[IDX_GC8H2I] + y[IDX_GC9I] + y[IDX_GC9HI] + y[IDX_GC9H2I] + - y[IDX_GC9NI] + y[IDX_GCCPI] + y[IDX_GCClI] + y[IDX_GCHI] + y[IDX_GCH2I] - + y[IDX_GCH2CCHI] + y[IDX_GCH2CCH2I] + y[IDX_GCH2CHCCHI] + - y[IDX_GCH2CHCNI] + y[IDX_GCH2CNI] + y[IDX_GCH2COI] + y[IDX_GCH2NHI] + - y[IDX_GCH2OHI] + y[IDX_GCH2OHCHOI] + y[IDX_GCH2OHCOI] + y[IDX_GCH2PHI] + - y[IDX_GCH3I] + y[IDX_GCH3C3NI] + y[IDX_GCH3C4HI] + y[IDX_GCH3C5NI] + - y[IDX_GCH3C6HI] + y[IDX_GCH3C7NI] + y[IDX_GCH3CCHI] + y[IDX_GCH3CHCH2I] - + y[IDX_GCH3CHOI] + y[IDX_GCH3CNI] + y[IDX_GCH3COI] + y[IDX_GCH3COCH3I] - + y[IDX_GCH3COOHI] + y[IDX_GCH3OI] + y[IDX_GCH3OCH3I] + y[IDX_GCH3OHI] + - y[IDX_GCH4I] + y[IDX_GCNI] + y[IDX_GCNOI] + y[IDX_GCOI] + y[IDX_GCO2I] + - y[IDX_GCOOCH3I] + y[IDX_GCOOHI] + y[IDX_GCPI] + y[IDX_GCSI] + - y[IDX_GClI] + y[IDX_GClOI] + y[IDX_GFI] + y[IDX_GFeI] + y[IDX_GHI] + - y[IDX_GH2I] + y[IDX_GH2CCCI] + y[IDX_GH2CNI] + y[IDX_GH2COI] + - y[IDX_GH2CSI] + y[IDX_GH2OI] + y[IDX_GH2O2I] + y[IDX_GH2SI] + - y[IDX_GH2S2I] + y[IDX_GH2SiOI] + y[IDX_GHC2OI] + y[IDX_GHC2PI] + - y[IDX_GHC3NI] + y[IDX_GHC5NI] + y[IDX_GHC7NI] + y[IDX_GHC9NI] + - y[IDX_GHCCNI] + y[IDX_GHCNI] + y[IDX_GHCNOI] + y[IDX_GHCOI] + - y[IDX_GHCOOCH3I] + y[IDX_GHCOOHI] + y[IDX_GHCPI] + y[IDX_GHCSI] + - y[IDX_GHCSiI] + y[IDX_GHClI] + y[IDX_GHFI] + y[IDX_GHNCI] + - y[IDX_GHNC3I] + y[IDX_GHNCOI] + y[IDX_GHNOI] + y[IDX_GHNSiI] + - y[IDX_GHOCNI] + y[IDX_GHONCI] + y[IDX_GHPOI] + y[IDX_GHSI] + - y[IDX_GHS2I] + y[IDX_GHeI] + y[IDX_GMgI] + y[IDX_GNI] + y[IDX_GN2I] + - y[IDX_GN2OI] + y[IDX_GNCCNI] + y[IDX_GNHI] + y[IDX_GNH2I] + - y[IDX_GNH2CNI] + y[IDX_GNH3I] + y[IDX_GNOI] + y[IDX_GNO2I] + y[IDX_GNSI] - + y[IDX_GNaI] + y[IDX_GOI] + y[IDX_GO2I] + y[IDX_GO2HI] + y[IDX_GOCNI] + - y[IDX_GOCSI] + y[IDX_GOHI] + y[IDX_GPI] + y[IDX_GPHI] + y[IDX_GPH2I] + - y[IDX_GPNI] + y[IDX_GPOI] + y[IDX_GSI] + y[IDX_GS2I] + y[IDX_GSOI] + - y[IDX_GSO2I] + y[IDX_GSiI] + y[IDX_GSiCI] + y[IDX_GSiC2I] + - y[IDX_GSiC2HI] + y[IDX_GSiC2H2I] + y[IDX_GSiC3I] + y[IDX_GSiC3HI] + - y[IDX_GSiC4I] + y[IDX_GSiCH2I] + y[IDX_GSiCH3I] + y[IDX_GSiHI] + - y[IDX_GSiH2I] + y[IDX_GSiH3I] + y[IDX_GSiH4I] + y[IDX_GSiNI] + - y[IDX_GSiNCI] + y[IDX_GSiOI] + y[IDX_GSiO2I] + y[IDX_GSiSI]; + return y[IDX_GFeI] + y[IDX_GHeI] + y[IDX_GMgI] + y[IDX_GNaI] + y[IDX_GH2S2I] + + y[IDX_GC4H6I] + y[IDX_GC4SI] + y[IDX_GCClI] + y[IDX_GCH3C3NI] + + y[IDX_GCH3C4HI] + y[IDX_GCH3C5NI] + y[IDX_GCH3C6HI] + y[IDX_GCH3C7NI] + + y[IDX_GClOI] + y[IDX_GHC2PI] + y[IDX_GHClI] + y[IDX_GHFI] + + y[IDX_GHNSiI] + y[IDX_GHPOI] + y[IDX_GNH2CNI] + y[IDX_GNO2I] + + y[IDX_GPNI] + y[IDX_GSiC3HI] + y[IDX_GSiCH3I] + y[IDX_GSiO2I] + + y[IDX_GSiSI] + y[IDX_GFI] + y[IDX_GH2SiOI] + y[IDX_GNCCNI] + y[IDX_GS2I] + + y[IDX_GSiC2HI] + y[IDX_GC3SI] + y[IDX_GC4NI] + y[IDX_GC4PI] + + y[IDX_GCH2PHI] + y[IDX_GCH3CHCH2I] + y[IDX_GCH3COOHI] + y[IDX_GH2SI] + + y[IDX_GHCNOI] + y[IDX_GHCPI] + y[IDX_GHNC3I] + y[IDX_GHNCOI] + + y[IDX_GHOCNI] + y[IDX_GHONCI] + y[IDX_GHS2I] + y[IDX_GN2OI] + + y[IDX_GPH2I] + y[IDX_GPOI] + y[IDX_GSiC2H2I] + y[IDX_GSiC4I] + + y[IDX_GSiNCI] + y[IDX_GC3PI] + y[IDX_GC6H6I] + y[IDX_GH2O2I] + + y[IDX_GHCSiI] + y[IDX_GPHI] + y[IDX_GSO2I] + y[IDX_GSiH4I] + + y[IDX_GC2H4CNI] + y[IDX_GC2SI] + y[IDX_GC3OI] + y[IDX_GC4H3I] + + y[IDX_GC7H2I] + y[IDX_GC8H2I] + y[IDX_GC9H2I] + y[IDX_GCH2CNI] + + y[IDX_GCH3CNI] + y[IDX_GH2CNI] + y[IDX_GH2CSI] + y[IDX_GHC2OI] + + y[IDX_GHC5NI] + y[IDX_GHC7NI] + y[IDX_GHC9NI] + y[IDX_GHCCNI] + + y[IDX_GHCSI] + y[IDX_GSiC3I] + y[IDX_GSiH3I] + y[IDX_GSiNI] + + y[IDX_GSiOI] + y[IDX_GC2H6I] + y[IDX_GC3H2I] + y[IDX_GC5H2I] + + y[IDX_GCCPI] + y[IDX_GCH2CHCCHI] + y[IDX_GCH3COCH3I] + y[IDX_GCH3OCH3I] + + y[IDX_GClI] + y[IDX_GSiCH2I] + y[IDX_GSiHI] + y[IDX_GSiH2I] + + y[IDX_GC10H2I] + y[IDX_GC4H2I] + y[IDX_GCH2CHCNI] + y[IDX_GH2CCCI] + + y[IDX_GHC3NI] + y[IDX_GOCSI] + y[IDX_GC2H5CNI] + y[IDX_GC2H5OHI] + + y[IDX_GC2OI] + y[IDX_GC6H2I] + y[IDX_GC9NI] + y[IDX_GCO2I] + y[IDX_GCPI] + + y[IDX_GO2HI] + y[IDX_GOCNI] + y[IDX_GSOI] + y[IDX_GSiCI] + + y[IDX_GC11I] + y[IDX_GC2NI] + y[IDX_GCH2CCH2I] + y[IDX_GCH2NHI] + + y[IDX_GCH3CCHI] + y[IDX_GCNOI] + y[IDX_GHNCI] + y[IDX_GNSI] + + y[IDX_GSiC2I] + y[IDX_GCH2CCHI] + y[IDX_GCH2COI] + y[IDX_GHNOI] + + y[IDX_GN2I] + y[IDX_GC5NI] + y[IDX_GPI] + y[IDX_GC2H5I] + y[IDX_GC3NI] + + y[IDX_GC7NI] + y[IDX_GCOOCH3I] + y[IDX_GHCNI] + y[IDX_GNH3I] + + y[IDX_GC10I] + y[IDX_GC10HI] + y[IDX_GC8HI] + y[IDX_GCH2OHCOI] + + y[IDX_GCOOHI] + y[IDX_GO2I] + y[IDX_GC2H4I] + y[IDX_GC9I] + y[IDX_GC9HI] + + y[IDX_GCSI] + y[IDX_GHSI] + y[IDX_GCH2OHCHOI] + y[IDX_GHCOOHI] + + y[IDX_GC2H2I] + y[IDX_GC5I] + y[IDX_GC7HI] + y[IDX_GCH3COI] + + y[IDX_GHCOOCH3I] + y[IDX_GC6I] + y[IDX_GC8I] + y[IDX_GCH2OHI] + + y[IDX_GCH3OHI] + y[IDX_GC3HI] + y[IDX_GC4HI] + y[IDX_GC5HI] + + y[IDX_GC6HI] + y[IDX_GC2H3I] + y[IDX_GCH3OI] + y[IDX_GH2OI] + + y[IDX_GC7I] + y[IDX_GSiI] + y[IDX_GC4I] + y[IDX_GCH3CHOI] + + y[IDX_GH2COI] + y[IDX_GNOI] + y[IDX_GCH4I] + y[IDX_GC2HI] + y[IDX_GNH2I] + + y[IDX_GHCOI] + y[IDX_GNHI] + y[IDX_GSI] + y[IDX_GC3I] + y[IDX_GOHI] + + y[IDX_GCOI] + y[IDX_GCH2I] + y[IDX_GC2I] + y[IDX_GCNI] + y[IDX_GNI] + + y[IDX_GOI] + y[IDX_GCH3I] + y[IDX_GCHI] + y[IDX_GH2I] + y[IDX_GCI] + + y[IDX_GHI] + 0.0; +} + +__device__ __host__ double GetHNuclei(double *y) { +#ifdef IDX_ELEM_H + return GetElementAbund(y, IDX_ELEM_H); +#else + return 0.0; +#endif } __device__ __host__ double GetMu(double *y) { - return (y[IDX_CI]*12.0 + y[IDX_CII]*12.0 + y[IDX_CM]*12.0 + y[IDX_C10I]*120.0 + - y[IDX_C10II]*120.0 + y[IDX_C10M]*120.0 + y[IDX_C10HI]*121.0 + - y[IDX_C10HII]*121.0 + y[IDX_C10HM]*121.0 + y[IDX_C10H2I]*122.0 + - y[IDX_C10H2II]*122.0 + y[IDX_C10H3II]*123.0 + y[IDX_C11I]*132.0 + - y[IDX_C11II]*132.0 + y[IDX_C2I]*24.0 + y[IDX_C2II]*24.0 + - y[IDX_C2M]*24.0 + y[IDX_C2HI]*25.0 + y[IDX_C2HII]*25.0 + - y[IDX_C2HM]*25.0 + y[IDX_C2H2I]*26.0 + y[IDX_C2H2II]*26.0 + - y[IDX_C2H3I]*27.0 + y[IDX_C2H3II]*27.0 + y[IDX_C2H4I]*28.0 + - y[IDX_C2H4II]*28.0 + y[IDX_C2H4CNI]*54.0 + y[IDX_C2H5I]*29.0 + - y[IDX_C2H5II]*29.0 + y[IDX_C2H5CNI]*55.0 + y[IDX_C2H5CNHII]*56.0 + - y[IDX_C2H5OHI]*46.0 + y[IDX_C2H5OHII]*46.0 + y[IDX_C2H5OH2II]*47.0 + - y[IDX_C2H6I]*30.0 + y[IDX_C2H6II]*30.0 + y[IDX_C2H7II]*31.0 + - y[IDX_C2NI]*38.0 + y[IDX_C2NII]*38.0 + y[IDX_C2N2II]*52.0 + - y[IDX_C2NHII]*39.0 + y[IDX_C2OI]*40.0 + y[IDX_C2OII]*40.0 + - y[IDX_C2SI]*56.0 + y[IDX_C2SII]*56.0 + y[IDX_C3I]*36.0 + - y[IDX_C3II]*36.0 + y[IDX_C3M]*36.0 + y[IDX_C3HI]*37.0 + - y[IDX_C3HII]*37.0 + y[IDX_C3HM]*37.0 + y[IDX_C3H2I]*38.0 + - y[IDX_C3H2II]*38.0 + y[IDX_C3H2OII]*54.0 + y[IDX_C3H3II]*39.0 + - y[IDX_C3H4II]*40.0 + y[IDX_C3H5II]*41.0 + y[IDX_C3H6II]*42.0 + - y[IDX_C3H7II]*43.0 + y[IDX_C3NI]*50.0 + y[IDX_C3NII]*50.0 + - y[IDX_C3NM]*50.0 + y[IDX_C3OI]*52.0 + y[IDX_C3OII]*52.0 + - y[IDX_C3PI]*67.0 + y[IDX_C3SI]*68.0 + y[IDX_C3SII]*68.0 + - y[IDX_C4I]*48.0 + y[IDX_C4II]*48.0 + y[IDX_C4M]*48.0 + y[IDX_C4HI]*49.0 - + y[IDX_C4HII]*49.0 + y[IDX_C4HM]*49.0 + y[IDX_C4H2I]*50.0 + - y[IDX_C4H2II]*50.0 + y[IDX_C4H3I]*51.0 + y[IDX_C4H3II]*51.0 + - y[IDX_C4H4II]*52.0 + y[IDX_C4H5II]*53.0 + y[IDX_C4H6I]*54.0 + - y[IDX_C4H7II]*55.0 + y[IDX_C4NI]*62.0 + y[IDX_C4NII]*62.0 + - y[IDX_C4PI]*79.0 + y[IDX_C4PII]*79.0 + y[IDX_C4SI]*80.0 + - y[IDX_C4SII]*80.0 + y[IDX_C5I]*60.0 + y[IDX_C5II]*60.0 + y[IDX_C5M]*60.0 - + y[IDX_C5HI]*61.0 + y[IDX_C5HII]*61.0 + y[IDX_C5HM]*61.0 + - y[IDX_C5H2I]*62.0 + y[IDX_C5H2II]*62.0 + y[IDX_C5H3II]*63.0 + - y[IDX_C5H5II]*65.0 + y[IDX_C5NI]*74.0 + y[IDX_C5NII]*74.0 + - y[IDX_C5NM]*74.0 + y[IDX_C6I]*72.0 + y[IDX_C6II]*72.0 + y[IDX_C6M]*72.0 - + y[IDX_C6HI]*73.0 + y[IDX_C6HII]*73.0 + y[IDX_C6HM]*73.0 + - y[IDX_C6H2I]*74.0 + y[IDX_C6H2II]*74.0 + y[IDX_C6H3II]*75.0 + - y[IDX_C6H4II]*76.0 + y[IDX_C6H5II]*77.0 + y[IDX_C6H6I]*78.0 + - y[IDX_C6H6II]*78.0 + y[IDX_C6H7II]*79.0 + y[IDX_C7I]*84.0 + - y[IDX_C7II]*84.0 + y[IDX_C7M]*84.0 + y[IDX_C7HI]*85.0 + - y[IDX_C7HII]*85.0 + y[IDX_C7HM]*85.0 + y[IDX_C7H2I]*86.0 + - y[IDX_C7H2II]*86.0 + y[IDX_C7H3II]*87.0 + y[IDX_C7H4II]*88.0 + - y[IDX_C7H5II]*89.0 + y[IDX_C7NI]*98.0 + y[IDX_C7NII]*98.0 + - y[IDX_C8I]*96.0 + y[IDX_C8II]*96.0 + y[IDX_C8M]*96.0 + y[IDX_C8HI]*97.0 - + y[IDX_C8HII]*97.0 + y[IDX_C8HM]*97.0 + y[IDX_C8H2I]*98.0 + - y[IDX_C8H2II]*98.0 + y[IDX_C8H3II]*99.0 + y[IDX_C8H4II]*100.0 + - y[IDX_C8H5II]*101.0 + y[IDX_C9I]*108.0 + y[IDX_C9II]*108.0 + - y[IDX_C9M]*108.0 + y[IDX_C9HI]*109.0 + y[IDX_C9HII]*109.0 + - y[IDX_C9HM]*109.0 + y[IDX_C9H2I]*110.0 + y[IDX_C9H2II]*110.0 + - y[IDX_C9H3II]*111.0 + y[IDX_C9H4II]*112.0 + y[IDX_C9H5II]*113.0 + - y[IDX_C9NI]*122.0 + y[IDX_C9NII]*122.0 + y[IDX_CCPI]*55.0 + - y[IDX_CCPII]*55.0 + y[IDX_CClI]*47.0 + y[IDX_CClII]*47.0 + - y[IDX_CFII]*31.0 + y[IDX_CHI]*13.0 + y[IDX_CHII]*13.0 + y[IDX_CHM]*13.0 - + y[IDX_CH2I]*14.0 + y[IDX_CH2II]*14.0 + y[IDX_CH2CCHI]*39.0 + - y[IDX_CH2CCHII]*39.0 + y[IDX_CH2CCH2I]*40.0 + y[IDX_CH2CHCCHI]*52.0 + - y[IDX_CH2CHCNI]*53.0 + y[IDX_CH2CHCNII]*53.0 + y[IDX_CH2CHCNHII]*54.0 + - y[IDX_CH2CNI]*40.0 + y[IDX_CH2CNII]*40.0 + y[IDX_CH2COI]*42.0 + - y[IDX_CH2COII]*42.0 + y[IDX_CH2NHI]*29.0 + y[IDX_CH2NH2II]*30.0 + - y[IDX_CH2OHI]*31.0 + y[IDX_CH2OHCH2OII]*61.0 + y[IDX_CH2OHCHOI]*60.0 + - y[IDX_CH2OHCHOII]*60.0 + y[IDX_CH2OHCOI]*59.0 + y[IDX_CH2OHCOII]*59.0 + - y[IDX_CH2PHI]*46.0 + y[IDX_CH3I]*15.0 + y[IDX_CH3II]*15.0 + - y[IDX_CH3C3NI]*65.0 + y[IDX_CH3C3NII]*65.0 + y[IDX_CH3C3NHII]*66.0 + - y[IDX_CH3C4HI]*64.0 + y[IDX_CH3C4HII]*64.0 + y[IDX_CH3C5NI]*89.0 + - y[IDX_CH3C5NHII]*90.0 + y[IDX_CH3C6HI]*88.0 + y[IDX_CH3C7NI]*113.0 + - y[IDX_CH3C7NHII]*114.0 + y[IDX_CH3CCHI]*40.0 + y[IDX_CH3CHCH2I]*42.0 + - y[IDX_CH3CHOI]*44.0 + y[IDX_CH3CHOII]*44.0 + y[IDX_CH3CHOHII]*45.0 + - y[IDX_CH3CNI]*41.0 + y[IDX_CH3CNII]*41.0 + y[IDX_CH3CNHII]*42.0 + - y[IDX_CH3COI]*43.0 + y[IDX_CH3COII]*43.0 + y[IDX_CH3COCH3I]*58.0 + - y[IDX_CH3COCH3II]*58.0 + y[IDX_CH3COCH4II]*59.0 + y[IDX_CH3COOHI]*60.0 + - y[IDX_CH3COOHII]*60.0 + y[IDX_CH3COOH2II]*61.0 + y[IDX_CH3CSII]*59.0 + - y[IDX_CH3NHII]*30.0 + y[IDX_CH3OI]*31.0 + y[IDX_CH3OCH3I]*46.0 + - y[IDX_CH3OCH3II]*46.0 + y[IDX_CH3OCH4II]*47.0 + y[IDX_CH3OHI]*32.0 + - y[IDX_CH3OHII]*32.0 + y[IDX_CH3OH2II]*33.0 + y[IDX_CH4I]*16.0 + - y[IDX_CH4II]*16.0 + y[IDX_CH5II]*17.0 + y[IDX_CNI]*26.0 + - y[IDX_CNII]*26.0 + y[IDX_CNM]*26.0 + y[IDX_CNCII]*38.0 + - y[IDX_CNOI]*42.0 + y[IDX_COI]*28.0 + y[IDX_COII]*28.0 + y[IDX_CO2I]*44.0 - + y[IDX_CO2II]*44.0 + y[IDX_COOCH3I]*59.0 + y[IDX_COOCH3II]*59.0 + - y[IDX_COOHI]*45.0 + y[IDX_CPI]*43.0 + y[IDX_CPII]*43.0 + y[IDX_CSI]*44.0 - + y[IDX_CSII]*44.0 + y[IDX_ClI]*35.0 + y[IDX_ClII]*35.0 + - y[IDX_ClOI]*51.0 + y[IDX_ClOII]*51.0 + y[IDX_FI]*19.0 + y[IDX_FII]*19.0 - + y[IDX_FeI]*56.0 + y[IDX_FeII]*56.0 + y[IDX_GCI]*12.0 + - y[IDX_GC10I]*120.0 + y[IDX_GC10HI]*121.0 + y[IDX_GC10H2I]*122.0 + - y[IDX_GC11I]*132.0 + y[IDX_GC2I]*24.0 + y[IDX_GC2HI]*25.0 + - y[IDX_GC2H2I]*26.0 + y[IDX_GC2H3I]*27.0 + y[IDX_GC2H4I]*28.0 + - y[IDX_GC2H4CNI]*54.0 + y[IDX_GC2H5I]*29.0 + y[IDX_GC2H5CNI]*55.0 + - y[IDX_GC2H5OHI]*46.0 + y[IDX_GC2H6I]*30.0 + y[IDX_GC2NI]*38.0 + - y[IDX_GC2OI]*40.0 + y[IDX_GC2SI]*56.0 + y[IDX_GC3I]*36.0 + - y[IDX_GC3HI]*37.0 + y[IDX_GC3H2I]*38.0 + y[IDX_GC3NI]*50.0 + - y[IDX_GC3OI]*52.0 + y[IDX_GC3PI]*67.0 + y[IDX_GC3SI]*68.0 + - y[IDX_GC4I]*48.0 + y[IDX_GC4HI]*49.0 + y[IDX_GC4H2I]*50.0 + - y[IDX_GC4H3I]*51.0 + y[IDX_GC4H6I]*54.0 + y[IDX_GC4NI]*62.0 + - y[IDX_GC4PI]*79.0 + y[IDX_GC4SI]*80.0 + y[IDX_GC5I]*60.0 + - y[IDX_GC5HI]*61.0 + y[IDX_GC5H2I]*62.0 + y[IDX_GC5NI]*74.0 + - y[IDX_GC6I]*72.0 + y[IDX_GC6HI]*73.0 + y[IDX_GC6H2I]*74.0 + - y[IDX_GC6H6I]*78.0 + y[IDX_GC7I]*84.0 + y[IDX_GC7HI]*85.0 + - y[IDX_GC7H2I]*86.0 + y[IDX_GC7NI]*98.0 + y[IDX_GC8I]*96.0 + - y[IDX_GC8HI]*97.0 + y[IDX_GC8H2I]*98.0 + y[IDX_GC9I]*108.0 + - y[IDX_GC9HI]*109.0 + y[IDX_GC9H2I]*110.0 + y[IDX_GC9NI]*122.0 + - y[IDX_GCCPI]*55.0 + y[IDX_GCClI]*47.0 + y[IDX_GCHI]*13.0 + - y[IDX_GCH2I]*14.0 + y[IDX_GCH2CCHI]*39.0 + y[IDX_GCH2CCH2I]*40.0 + - y[IDX_GCH2CHCCHI]*52.0 + y[IDX_GCH2CHCNI]*53.0 + y[IDX_GCH2CNI]*40.0 + - y[IDX_GCH2COI]*42.0 + y[IDX_GCH2NHI]*29.0 + y[IDX_GCH2OHI]*31.0 + - y[IDX_GCH2OHCHOI]*60.0 + y[IDX_GCH2OHCOI]*59.0 + y[IDX_GCH2PHI]*46.0 + - y[IDX_GCH3I]*15.0 + y[IDX_GCH3C3NI]*65.0 + y[IDX_GCH3C4HI]*64.0 + - y[IDX_GCH3C5NI]*89.0 + y[IDX_GCH3C6HI]*88.0 + y[IDX_GCH3C7NI]*113.0 + - y[IDX_GCH3CCHI]*40.0 + y[IDX_GCH3CHCH2I]*42.0 + y[IDX_GCH3CHOI]*44.0 + - y[IDX_GCH3CNI]*41.0 + y[IDX_GCH3COI]*43.0 + y[IDX_GCH3COCH3I]*58.0 + - y[IDX_GCH3COOHI]*60.0 + y[IDX_GCH3OI]*31.0 + y[IDX_GCH3OCH3I]*46.0 + - y[IDX_GCH3OHI]*32.0 + y[IDX_GCH4I]*16.0 + y[IDX_GCNI]*26.0 + - y[IDX_GCNOI]*42.0 + y[IDX_GCOI]*28.0 + y[IDX_GCO2I]*44.0 + - y[IDX_GCOOCH3I]*59.0 + y[IDX_GCOOHI]*45.0 + y[IDX_GCPI]*43.0 + - y[IDX_GCSI]*44.0 + y[IDX_GClI]*35.0 + y[IDX_GClOI]*51.0 + - y[IDX_GFI]*19.0 + y[IDX_GFeI]*56.0 + y[IDX_GHI]*1.0 + y[IDX_GH2I]*2.0 + - y[IDX_GH2CCCI]*38.0 + y[IDX_GH2CNI]*28.0 + y[IDX_GH2COI]*30.0 + - y[IDX_GH2CSI]*46.0 + y[IDX_GH2OI]*18.0 + y[IDX_GH2O2I]*34.0 + - y[IDX_GH2SI]*34.0 + y[IDX_GH2S2I]*66.0 + y[IDX_GH2SiOI]*46.0 + - y[IDX_GHC2OI]*41.0 + y[IDX_GHC2PI]*56.0 + y[IDX_GHC3NI]*51.0 + - y[IDX_GHC5NI]*75.0 + y[IDX_GHC7NI]*99.0 + y[IDX_GHC9NI]*123.0 + - y[IDX_GHCCNI]*39.0 + y[IDX_GHCNI]*27.0 + y[IDX_GHCNOI]*43.0 + - y[IDX_GHCOI]*29.0 + y[IDX_GHCOOCH3I]*60.0 + y[IDX_GHCOOHI]*46.0 + - y[IDX_GHCPI]*44.0 + y[IDX_GHCSI]*45.0 + y[IDX_GHCSiI]*41.0 + - y[IDX_GHClI]*36.0 + y[IDX_GHFI]*20.0 + y[IDX_GHNCI]*27.0 + - y[IDX_GHNC3I]*51.0 + y[IDX_GHNCOI]*43.0 + y[IDX_GHNOI]*31.0 + - y[IDX_GHNSiI]*43.0 + y[IDX_GHOCNI]*43.0 + y[IDX_GHONCI]*43.0 + - y[IDX_GHPOI]*48.0 + y[IDX_GHSI]*33.0 + y[IDX_GHS2I]*65.0 + - y[IDX_GHeI]*4.0 + y[IDX_GMgI]*24.0 + y[IDX_GNI]*14.0 + y[IDX_GN2I]*28.0 - + y[IDX_GN2OI]*44.0 + y[IDX_GNCCNI]*52.0 + y[IDX_GNHI]*15.0 + - y[IDX_GNH2I]*16.0 + y[IDX_GNH2CNI]*42.0 + y[IDX_GNH3I]*17.0 + - y[IDX_GNOI]*30.0 + y[IDX_GNO2I]*46.0 + y[IDX_GNSI]*46.0 + - y[IDX_GNaI]*23.0 + y[IDX_GOI]*16.0 + y[IDX_GO2I]*32.0 + - y[IDX_GO2HI]*33.0 + y[IDX_GOCNI]*42.0 + y[IDX_GOCSI]*60.0 + - y[IDX_GOHI]*17.0 + y[IDX_GPI]*31.0 + y[IDX_GPHI]*32.0 + - y[IDX_GPH2I]*33.0 + y[IDX_GPNI]*45.0 + y[IDX_GPOI]*47.0 + - y[IDX_GRAINM]*0.0 + y[IDX_GRAIN0I]*0.0 + y[IDX_GSI]*32.0 + - y[IDX_GS2I]*64.0 + y[IDX_GSOI]*48.0 + y[IDX_GSO2I]*64.0 + - y[IDX_GSiI]*28.0 + y[IDX_GSiCI]*40.0 + y[IDX_GSiC2I]*52.0 + - y[IDX_GSiC2HI]*53.0 + y[IDX_GSiC2H2I]*54.0 + y[IDX_GSiC3I]*64.0 + - y[IDX_GSiC3HI]*65.0 + y[IDX_GSiC4I]*76.0 + y[IDX_GSiCH2I]*42.0 + - y[IDX_GSiCH3I]*43.0 + y[IDX_GSiHI]*29.0 + y[IDX_GSiH2I]*30.0 + - y[IDX_GSiH3I]*31.0 + y[IDX_GSiH4I]*32.0 + y[IDX_GSiNI]*42.0 + - y[IDX_GSiNCI]*54.0 + y[IDX_GSiOI]*44.0 + y[IDX_GSiO2I]*60.0 + - y[IDX_GSiSI]*60.0 + y[IDX_HI]*1.0 + y[IDX_HII]*1.0 + y[IDX_HM]*1.0 + - y[IDX_H2I]*2.0 + y[IDX_H2II]*2.0 + y[IDX_H2C4NII]*64.0 + - y[IDX_H2C7NII]*100.0 + y[IDX_H2C9NII]*124.0 + y[IDX_H2CCCI]*38.0 + - y[IDX_H2CClII]*49.0 + y[IDX_H2CNI]*28.0 + y[IDX_H2CNOII]*44.0 + - y[IDX_H2COI]*30.0 + y[IDX_H2COII]*30.0 + y[IDX_H2CSI]*46.0 + - y[IDX_H2CSII]*46.0 + y[IDX_H2ClII]*37.0 + y[IDX_H2FII]*21.0 + - y[IDX_H2NCII]*28.0 + y[IDX_H2NCOII]*44.0 + y[IDX_H2NOII]*32.0 + - y[IDX_H2OI]*18.0 + y[IDX_H2OII]*18.0 + y[IDX_H2O2I]*34.0 + - y[IDX_H2OCNII]*44.0 + y[IDX_H2POII]*49.0 + y[IDX_H2SI]*34.0 + - y[IDX_H2SII]*34.0 + y[IDX_H2S2I]*66.0 + y[IDX_H2S2II]*66.0 + - y[IDX_H2SiOI]*46.0 + y[IDX_H2SiOII]*46.0 + y[IDX_H3II]*3.0 + - y[IDX_H3C3OII]*55.0 + y[IDX_H3C5NII]*77.0 + y[IDX_H3C7NII]*101.0 + - y[IDX_H3C9NII]*125.0 + y[IDX_H3COII]*31.0 + y[IDX_H3CSII]*47.0 + - y[IDX_H3OII]*19.0 + y[IDX_H3SII]*35.0 + y[IDX_H3S2II]*67.0 + - y[IDX_H3SiOII]*47.0 + y[IDX_H5C2O2II]*61.0 + y[IDX_HC2OI]*41.0 + - y[IDX_HC2OII]*41.0 + y[IDX_HC2PI]*56.0 + y[IDX_HC2PII]*56.0 + - y[IDX_HC2SII]*57.0 + y[IDX_HC3NI]*51.0 + y[IDX_HC3NII]*51.0 + - y[IDX_HC3NHII]*52.0 + y[IDX_HC3OII]*53.0 + y[IDX_HC3SII]*69.0 + - y[IDX_HC4NII]*63.0 + y[IDX_HC4SII]*81.0 + y[IDX_HC5NI]*75.0 + - y[IDX_HC5NII]*75.0 + y[IDX_HC5NHII]*76.0 + y[IDX_HC7NI]*99.0 + - y[IDX_HC7NII]*99.0 + y[IDX_HC9NI]*123.0 + y[IDX_HC9NII]*123.0 + - y[IDX_HCCNI]*39.0 + y[IDX_HCNI]*27.0 + y[IDX_HCNII]*27.0 + - y[IDX_HCNHII]*28.0 + y[IDX_HCNOI]*43.0 + y[IDX_HCNOII]*43.0 + - y[IDX_HCNOHII]*44.0 + y[IDX_HCOI]*29.0 + y[IDX_HCOII]*29.0 + - y[IDX_HCO2II]*45.0 + y[IDX_HCOOCH3I]*60.0 + y[IDX_HCOOCH3II]*60.0 + - y[IDX_HCOOHI]*46.0 + y[IDX_HCOOHII]*46.0 + y[IDX_HCOOH2II]*47.0 + - y[IDX_HCPI]*44.0 + y[IDX_HCPII]*44.0 + y[IDX_HCSI]*45.0 + - y[IDX_HCSII]*45.0 + y[IDX_HCSiI]*41.0 + y[IDX_HCSiII]*41.0 + - y[IDX_HClI]*36.0 + y[IDX_HClII]*36.0 + y[IDX_HFI]*20.0 + - y[IDX_HFII]*20.0 + y[IDX_HN2OII]*45.0 + y[IDX_HNCI]*27.0 + - y[IDX_HNC3I]*51.0 + y[IDX_HNCOI]*43.0 + y[IDX_HNCOII]*43.0 + - y[IDX_HNCOHII]*44.0 + y[IDX_HNOI]*31.0 + y[IDX_HNOII]*31.0 + - y[IDX_HNSII]*47.0 + y[IDX_HNSiI]*43.0 + y[IDX_HNSiII]*43.0 + - y[IDX_HOCII]*29.0 + y[IDX_HOCNI]*43.0 + y[IDX_HOCNII]*43.0 + - y[IDX_HOCSII]*61.0 + y[IDX_HONCI]*43.0 + y[IDX_HONCII]*43.0 + - y[IDX_HPNII]*46.0 + y[IDX_HPOI]*48.0 + y[IDX_HPOII]*48.0 + - y[IDX_HSI]*33.0 + y[IDX_HSII]*33.0 + y[IDX_HS2I]*65.0 + - y[IDX_HS2II]*65.0 + y[IDX_HSOII]*49.0 + y[IDX_HSO2II]*65.0 + - y[IDX_HSiO2II]*61.0 + y[IDX_HSiSII]*61.0 + y[IDX_HeI]*4.0 + - y[IDX_HeII]*4.0 + y[IDX_HeHII]*5.0 + y[IDX_MgI]*24.0 + y[IDX_MgII]*24.0 - + y[IDX_NI]*14.0 + y[IDX_NII]*14.0 + y[IDX_N2I]*28.0 + y[IDX_N2II]*28.0 - + y[IDX_N2HII]*29.0 + y[IDX_N2OI]*44.0 + y[IDX_N2OII]*44.0 + - y[IDX_NCCNI]*52.0 + y[IDX_NCCNCH3II]*67.0 + y[IDX_NCCNHII]*53.0 + - y[IDX_NHI]*15.0 + y[IDX_NHII]*15.0 + y[IDX_NH2I]*16.0 + - y[IDX_NH2II]*16.0 + y[IDX_NH2CNI]*42.0 + y[IDX_NH2CNHII]*43.0 + - y[IDX_NH3I]*17.0 + y[IDX_NH3II]*17.0 + y[IDX_NH4II]*18.0 + - y[IDX_NOI]*30.0 + y[IDX_NOII]*30.0 + y[IDX_NO2I]*46.0 + - y[IDX_NO2II]*46.0 + y[IDX_NSI]*46.0 + y[IDX_NSII]*46.0 + y[IDX_NaI]*23.0 - + y[IDX_NaII]*23.0 + y[IDX_OI]*16.0 + y[IDX_OII]*16.0 + y[IDX_OM]*16.0 + - y[IDX_O2I]*32.0 + y[IDX_O2II]*32.0 + y[IDX_O2M]*32.0 + y[IDX_O2HI]*33.0 - + y[IDX_O2HII]*33.0 + y[IDX_OCNI]*42.0 + y[IDX_OCNII]*42.0 + - y[IDX_OCSI]*60.0 + y[IDX_OCSII]*60.0 + y[IDX_OHI]*17.0 + - y[IDX_OHII]*17.0 + y[IDX_OHM]*17.0 + y[IDX_PI]*31.0 + y[IDX_PII]*31.0 + - y[IDX_PC2H2II]*57.0 + y[IDX_PC2H3II]*58.0 + y[IDX_PC2H4II]*59.0 + - y[IDX_PC3HII]*68.0 + y[IDX_PC4HII]*80.0 + y[IDX_PCH2II]*45.0 + - y[IDX_PCH3II]*46.0 + y[IDX_PCH4II]*47.0 + y[IDX_PHI]*32.0 + - y[IDX_PHII]*32.0 + y[IDX_PH2I]*33.0 + y[IDX_PH2II]*33.0 + - y[IDX_PH3II]*34.0 + y[IDX_PNI]*45.0 + y[IDX_PNII]*45.0 + - y[IDX_PNH2II]*47.0 + y[IDX_PNH3II]*48.0 + y[IDX_POI]*47.0 + - y[IDX_POII]*47.0 + y[IDX_SI]*32.0 + y[IDX_SII]*32.0 + y[IDX_SM]*32.0 + - y[IDX_S2I]*64.0 + y[IDX_S2II]*64.0 + y[IDX_SOI]*48.0 + y[IDX_SOII]*48.0 - + y[IDX_SO2I]*64.0 + y[IDX_SO2II]*64.0 + y[IDX_SiI]*28.0 + - y[IDX_SiII]*28.0 + y[IDX_SiCI]*40.0 + y[IDX_SiCII]*40.0 + - y[IDX_SiC2I]*52.0 + y[IDX_SiC2II]*52.0 + y[IDX_SiC2HI]*53.0 + - y[IDX_SiC2HII]*53.0 + y[IDX_SiC2H2I]*54.0 + y[IDX_SiC2H2II]*54.0 + - y[IDX_SiC2H3II]*55.0 + y[IDX_SiC3I]*64.0 + y[IDX_SiC3II]*64.0 + - y[IDX_SiC3HI]*65.0 + y[IDX_SiC3HII]*65.0 + y[IDX_SiC3H2II]*66.0 + - y[IDX_SiC4I]*76.0 + y[IDX_SiC4II]*76.0 + y[IDX_SiC4HII]*77.0 + - y[IDX_SiCH2I]*42.0 + y[IDX_SiCH2II]*42.0 + y[IDX_SiCH3I]*43.0 + - y[IDX_SiCH3II]*43.0 + y[IDX_SiCH4II]*44.0 + y[IDX_SiFII]*47.0 + - y[IDX_SiHI]*29.0 + y[IDX_SiHII]*29.0 + y[IDX_SiH2I]*30.0 + - y[IDX_SiH2II]*30.0 + y[IDX_SiH3I]*31.0 + y[IDX_SiH3II]*31.0 + - y[IDX_SiH4I]*32.0 + y[IDX_SiH4II]*32.0 + y[IDX_SiH5II]*33.0 + - y[IDX_SiNI]*42.0 + y[IDX_SiNII]*42.0 + y[IDX_SiNCI]*54.0 + - y[IDX_SiNCII]*54.0 + y[IDX_SiNCHII]*55.0 + y[IDX_SiNH2II]*44.0 + - y[IDX_SiOI]*44.0 + y[IDX_SiOII]*44.0 + y[IDX_SiO2I]*60.0 + - y[IDX_SiOHII]*45.0 + y[IDX_SiSI]*60.0 + y[IDX_SiSII]*60.0 + - y[IDX_eM]*0.0) / (y[IDX_CI] + y[IDX_CII] + y[IDX_CM] + y[IDX_C10I] + - y[IDX_C10II] + y[IDX_C10M] + y[IDX_C10HI] + y[IDX_C10HII] + y[IDX_C10HM] - + y[IDX_C10H2I] + y[IDX_C10H2II] + y[IDX_C10H3II] + y[IDX_C11I] + - y[IDX_C11II] + y[IDX_C2I] + y[IDX_C2II] + y[IDX_C2M] + y[IDX_C2HI] + - y[IDX_C2HII] + y[IDX_C2HM] + y[IDX_C2H2I] + y[IDX_C2H2II] + y[IDX_C2H3I] - + y[IDX_C2H3II] + y[IDX_C2H4I] + y[IDX_C2H4II] + y[IDX_C2H4CNI] + - y[IDX_C2H5I] + y[IDX_C2H5II] + y[IDX_C2H5CNI] + y[IDX_C2H5CNHII] + - y[IDX_C2H5OHI] + y[IDX_C2H5OHII] + y[IDX_C2H5OH2II] + y[IDX_C2H6I] + - y[IDX_C2H6II] + y[IDX_C2H7II] + y[IDX_C2NI] + y[IDX_C2NII] + - y[IDX_C2N2II] + y[IDX_C2NHII] + y[IDX_C2OI] + y[IDX_C2OII] + y[IDX_C2SI] - + y[IDX_C2SII] + y[IDX_C3I] + y[IDX_C3II] + y[IDX_C3M] + y[IDX_C3HI] + - y[IDX_C3HII] + y[IDX_C3HM] + y[IDX_C3H2I] + y[IDX_C3H2II] + - y[IDX_C3H2OII] + y[IDX_C3H3II] + y[IDX_C3H4II] + y[IDX_C3H5II] + - y[IDX_C3H6II] + y[IDX_C3H7II] + y[IDX_C3NI] + y[IDX_C3NII] + y[IDX_C3NM] - + y[IDX_C3OI] + y[IDX_C3OII] + y[IDX_C3PI] + y[IDX_C3SI] + y[IDX_C3SII] - + y[IDX_C4I] + y[IDX_C4II] + y[IDX_C4M] + y[IDX_C4HI] + y[IDX_C4HII] + - y[IDX_C4HM] + y[IDX_C4H2I] + y[IDX_C4H2II] + y[IDX_C4H3I] + - y[IDX_C4H3II] + y[IDX_C4H4II] + y[IDX_C4H5II] + y[IDX_C4H6I] + - y[IDX_C4H7II] + y[IDX_C4NI] + y[IDX_C4NII] + y[IDX_C4PI] + y[IDX_C4PII] - + y[IDX_C4SI] + y[IDX_C4SII] + y[IDX_C5I] + y[IDX_C5II] + y[IDX_C5M] + - y[IDX_C5HI] + y[IDX_C5HII] + y[IDX_C5HM] + y[IDX_C5H2I] + y[IDX_C5H2II] - + y[IDX_C5H3II] + y[IDX_C5H5II] + y[IDX_C5NI] + y[IDX_C5NII] + - y[IDX_C5NM] + y[IDX_C6I] + y[IDX_C6II] + y[IDX_C6M] + y[IDX_C6HI] + - y[IDX_C6HII] + y[IDX_C6HM] + y[IDX_C6H2I] + y[IDX_C6H2II] + - y[IDX_C6H3II] + y[IDX_C6H4II] + y[IDX_C6H5II] + y[IDX_C6H6I] + - y[IDX_C6H6II] + y[IDX_C6H7II] + y[IDX_C7I] + y[IDX_C7II] + y[IDX_C7M] + - y[IDX_C7HI] + y[IDX_C7HII] + y[IDX_C7HM] + y[IDX_C7H2I] + y[IDX_C7H2II] - + y[IDX_C7H3II] + y[IDX_C7H4II] + y[IDX_C7H5II] + y[IDX_C7NI] + - y[IDX_C7NII] + y[IDX_C8I] + y[IDX_C8II] + y[IDX_C8M] + y[IDX_C8HI] + - y[IDX_C8HII] + y[IDX_C8HM] + y[IDX_C8H2I] + y[IDX_C8H2II] + - y[IDX_C8H3II] + y[IDX_C8H4II] + y[IDX_C8H5II] + y[IDX_C9I] + y[IDX_C9II] - + y[IDX_C9M] + y[IDX_C9HI] + y[IDX_C9HII] + y[IDX_C9HM] + y[IDX_C9H2I] + - y[IDX_C9H2II] + y[IDX_C9H3II] + y[IDX_C9H4II] + y[IDX_C9H5II] + - y[IDX_C9NI] + y[IDX_C9NII] + y[IDX_CCPI] + y[IDX_CCPII] + y[IDX_CClI] + - y[IDX_CClII] + y[IDX_CFII] + y[IDX_CHI] + y[IDX_CHII] + y[IDX_CHM] + - y[IDX_CH2I] + y[IDX_CH2II] + y[IDX_CH2CCHI] + y[IDX_CH2CCHII] + - y[IDX_CH2CCH2I] + y[IDX_CH2CHCCHI] + y[IDX_CH2CHCNI] + y[IDX_CH2CHCNII] - + y[IDX_CH2CHCNHII] + y[IDX_CH2CNI] + y[IDX_CH2CNII] + y[IDX_CH2COI] + - y[IDX_CH2COII] + y[IDX_CH2NHI] + y[IDX_CH2NH2II] + y[IDX_CH2OHI] + - y[IDX_CH2OHCH2OII] + y[IDX_CH2OHCHOI] + y[IDX_CH2OHCHOII] + - y[IDX_CH2OHCOI] + y[IDX_CH2OHCOII] + y[IDX_CH2PHI] + y[IDX_CH3I] + - y[IDX_CH3II] + y[IDX_CH3C3NI] + y[IDX_CH3C3NII] + y[IDX_CH3C3NHII] + - y[IDX_CH3C4HI] + y[IDX_CH3C4HII] + y[IDX_CH3C5NI] + y[IDX_CH3C5NHII] + - y[IDX_CH3C6HI] + y[IDX_CH3C7NI] + y[IDX_CH3C7NHII] + y[IDX_CH3CCHI] + - y[IDX_CH3CHCH2I] + y[IDX_CH3CHOI] + y[IDX_CH3CHOII] + y[IDX_CH3CHOHII] + - y[IDX_CH3CNI] + y[IDX_CH3CNII] + y[IDX_CH3CNHII] + y[IDX_CH3COI] + - y[IDX_CH3COII] + y[IDX_CH3COCH3I] + y[IDX_CH3COCH3II] + - y[IDX_CH3COCH4II] + y[IDX_CH3COOHI] + y[IDX_CH3COOHII] + - y[IDX_CH3COOH2II] + y[IDX_CH3CSII] + y[IDX_CH3NHII] + y[IDX_CH3OI] + - y[IDX_CH3OCH3I] + y[IDX_CH3OCH3II] + y[IDX_CH3OCH4II] + y[IDX_CH3OHI] + - y[IDX_CH3OHII] + y[IDX_CH3OH2II] + y[IDX_CH4I] + y[IDX_CH4II] + - y[IDX_CH5II] + y[IDX_CNI] + y[IDX_CNII] + y[IDX_CNM] + y[IDX_CNCII] + - y[IDX_CNOI] + y[IDX_COI] + y[IDX_COII] + y[IDX_CO2I] + y[IDX_CO2II] + - y[IDX_COOCH3I] + y[IDX_COOCH3II] + y[IDX_COOHI] + y[IDX_CPI] + - y[IDX_CPII] + y[IDX_CSI] + y[IDX_CSII] + y[IDX_ClI] + y[IDX_ClII] + - y[IDX_ClOI] + y[IDX_ClOII] + y[IDX_FI] + y[IDX_FII] + y[IDX_FeI] + - y[IDX_FeII] + y[IDX_GCI] + y[IDX_GC10I] + y[IDX_GC10HI] + y[IDX_GC10H2I] - + y[IDX_GC11I] + y[IDX_GC2I] + y[IDX_GC2HI] + y[IDX_GC2H2I] + - y[IDX_GC2H3I] + y[IDX_GC2H4I] + y[IDX_GC2H4CNI] + y[IDX_GC2H5I] + - y[IDX_GC2H5CNI] + y[IDX_GC2H5OHI] + y[IDX_GC2H6I] + y[IDX_GC2NI] + - y[IDX_GC2OI] + y[IDX_GC2SI] + y[IDX_GC3I] + y[IDX_GC3HI] + y[IDX_GC3H2I] - + y[IDX_GC3NI] + y[IDX_GC3OI] + y[IDX_GC3PI] + y[IDX_GC3SI] + - y[IDX_GC4I] + y[IDX_GC4HI] + y[IDX_GC4H2I] + y[IDX_GC4H3I] + - y[IDX_GC4H6I] + y[IDX_GC4NI] + y[IDX_GC4PI] + y[IDX_GC4SI] + y[IDX_GC5I] - + y[IDX_GC5HI] + y[IDX_GC5H2I] + y[IDX_GC5NI] + y[IDX_GC6I] + - y[IDX_GC6HI] + y[IDX_GC6H2I] + y[IDX_GC6H6I] + y[IDX_GC7I] + - y[IDX_GC7HI] + y[IDX_GC7H2I] + y[IDX_GC7NI] + y[IDX_GC8I] + y[IDX_GC8HI] - + y[IDX_GC8H2I] + y[IDX_GC9I] + y[IDX_GC9HI] + y[IDX_GC9H2I] + - y[IDX_GC9NI] + y[IDX_GCCPI] + y[IDX_GCClI] + y[IDX_GCHI] + y[IDX_GCH2I] - + y[IDX_GCH2CCHI] + y[IDX_GCH2CCH2I] + y[IDX_GCH2CHCCHI] + - y[IDX_GCH2CHCNI] + y[IDX_GCH2CNI] + y[IDX_GCH2COI] + y[IDX_GCH2NHI] + - y[IDX_GCH2OHI] + y[IDX_GCH2OHCHOI] + y[IDX_GCH2OHCOI] + y[IDX_GCH2PHI] + - y[IDX_GCH3I] + y[IDX_GCH3C3NI] + y[IDX_GCH3C4HI] + y[IDX_GCH3C5NI] + - y[IDX_GCH3C6HI] + y[IDX_GCH3C7NI] + y[IDX_GCH3CCHI] + y[IDX_GCH3CHCH2I] - + y[IDX_GCH3CHOI] + y[IDX_GCH3CNI] + y[IDX_GCH3COI] + y[IDX_GCH3COCH3I] - + y[IDX_GCH3COOHI] + y[IDX_GCH3OI] + y[IDX_GCH3OCH3I] + y[IDX_GCH3OHI] + - y[IDX_GCH4I] + y[IDX_GCNI] + y[IDX_GCNOI] + y[IDX_GCOI] + y[IDX_GCO2I] + - y[IDX_GCOOCH3I] + y[IDX_GCOOHI] + y[IDX_GCPI] + y[IDX_GCSI] + - y[IDX_GClI] + y[IDX_GClOI] + y[IDX_GFI] + y[IDX_GFeI] + y[IDX_GHI] + - y[IDX_GH2I] + y[IDX_GH2CCCI] + y[IDX_GH2CNI] + y[IDX_GH2COI] + - y[IDX_GH2CSI] + y[IDX_GH2OI] + y[IDX_GH2O2I] + y[IDX_GH2SI] + - y[IDX_GH2S2I] + y[IDX_GH2SiOI] + y[IDX_GHC2OI] + y[IDX_GHC2PI] + - y[IDX_GHC3NI] + y[IDX_GHC5NI] + y[IDX_GHC7NI] + y[IDX_GHC9NI] + - y[IDX_GHCCNI] + y[IDX_GHCNI] + y[IDX_GHCNOI] + y[IDX_GHCOI] + - y[IDX_GHCOOCH3I] + y[IDX_GHCOOHI] + y[IDX_GHCPI] + y[IDX_GHCSI] + - y[IDX_GHCSiI] + y[IDX_GHClI] + y[IDX_GHFI] + y[IDX_GHNCI] + - y[IDX_GHNC3I] + y[IDX_GHNCOI] + y[IDX_GHNOI] + y[IDX_GHNSiI] + - y[IDX_GHOCNI] + y[IDX_GHONCI] + y[IDX_GHPOI] + y[IDX_GHSI] + - y[IDX_GHS2I] + y[IDX_GHeI] + y[IDX_GMgI] + y[IDX_GNI] + y[IDX_GN2I] + - y[IDX_GN2OI] + y[IDX_GNCCNI] + y[IDX_GNHI] + y[IDX_GNH2I] + - y[IDX_GNH2CNI] + y[IDX_GNH3I] + y[IDX_GNOI] + y[IDX_GNO2I] + y[IDX_GNSI] - + y[IDX_GNaI] + y[IDX_GOI] + y[IDX_GO2I] + y[IDX_GO2HI] + y[IDX_GOCNI] + - y[IDX_GOCSI] + y[IDX_GOHI] + y[IDX_GPI] + y[IDX_GPHI] + y[IDX_GPH2I] + - y[IDX_GPNI] + y[IDX_GPOI] + y[IDX_GRAINM] + y[IDX_GRAIN0I] + y[IDX_GSI] - + y[IDX_GS2I] + y[IDX_GSOI] + y[IDX_GSO2I] + y[IDX_GSiI] + y[IDX_GSiCI] - + y[IDX_GSiC2I] + y[IDX_GSiC2HI] + y[IDX_GSiC2H2I] + y[IDX_GSiC3I] + - y[IDX_GSiC3HI] + y[IDX_GSiC4I] + y[IDX_GSiCH2I] + y[IDX_GSiCH3I] + - y[IDX_GSiHI] + y[IDX_GSiH2I] + y[IDX_GSiH3I] + y[IDX_GSiH4I] + - y[IDX_GSiNI] + y[IDX_GSiNCI] + y[IDX_GSiOI] + y[IDX_GSiO2I] + - y[IDX_GSiSI] + y[IDX_HI] + y[IDX_HII] + y[IDX_HM] + y[IDX_H2I] + - y[IDX_H2II] + y[IDX_H2C4NII] + y[IDX_H2C7NII] + y[IDX_H2C9NII] + - y[IDX_H2CCCI] + y[IDX_H2CClII] + y[IDX_H2CNI] + y[IDX_H2CNOII] + - y[IDX_H2COI] + y[IDX_H2COII] + y[IDX_H2CSI] + y[IDX_H2CSII] + - y[IDX_H2ClII] + y[IDX_H2FII] + y[IDX_H2NCII] + y[IDX_H2NCOII] + - y[IDX_H2NOII] + y[IDX_H2OI] + y[IDX_H2OII] + y[IDX_H2O2I] + - y[IDX_H2OCNII] + y[IDX_H2POII] + y[IDX_H2SI] + y[IDX_H2SII] + - y[IDX_H2S2I] + y[IDX_H2S2II] + y[IDX_H2SiOI] + y[IDX_H2SiOII] + - y[IDX_H3II] + y[IDX_H3C3OII] + y[IDX_H3C5NII] + y[IDX_H3C7NII] + - y[IDX_H3C9NII] + y[IDX_H3COII] + y[IDX_H3CSII] + y[IDX_H3OII] + - y[IDX_H3SII] + y[IDX_H3S2II] + y[IDX_H3SiOII] + y[IDX_H5C2O2II] + - y[IDX_HC2OI] + y[IDX_HC2OII] + y[IDX_HC2PI] + y[IDX_HC2PII] + - y[IDX_HC2SII] + y[IDX_HC3NI] + y[IDX_HC3NII] + y[IDX_HC3NHII] + - y[IDX_HC3OII] + y[IDX_HC3SII] + y[IDX_HC4NII] + y[IDX_HC4SII] + - y[IDX_HC5NI] + y[IDX_HC5NII] + y[IDX_HC5NHII] + y[IDX_HC7NI] + - y[IDX_HC7NII] + y[IDX_HC9NI] + y[IDX_HC9NII] + y[IDX_HCCNI] + - y[IDX_HCNI] + y[IDX_HCNII] + y[IDX_HCNHII] + y[IDX_HCNOI] + - y[IDX_HCNOII] + y[IDX_HCNOHII] + y[IDX_HCOI] + y[IDX_HCOII] + - y[IDX_HCO2II] + y[IDX_HCOOCH3I] + y[IDX_HCOOCH3II] + y[IDX_HCOOHI] + - y[IDX_HCOOHII] + y[IDX_HCOOH2II] + y[IDX_HCPI] + y[IDX_HCPII] + - y[IDX_HCSI] + y[IDX_HCSII] + y[IDX_HCSiI] + y[IDX_HCSiII] + y[IDX_HClI] - + y[IDX_HClII] + y[IDX_HFI] + y[IDX_HFII] + y[IDX_HN2OII] + y[IDX_HNCI] - + y[IDX_HNC3I] + y[IDX_HNCOI] + y[IDX_HNCOII] + y[IDX_HNCOHII] + - y[IDX_HNOI] + y[IDX_HNOII] + y[IDX_HNSII] + y[IDX_HNSiI] + y[IDX_HNSiII] - + y[IDX_HOCII] + y[IDX_HOCNI] + y[IDX_HOCNII] + y[IDX_HOCSII] + - y[IDX_HONCI] + y[IDX_HONCII] + y[IDX_HPNII] + y[IDX_HPOI] + y[IDX_HPOII] - + y[IDX_HSI] + y[IDX_HSII] + y[IDX_HS2I] + y[IDX_HS2II] + y[IDX_HSOII] + - y[IDX_HSO2II] + y[IDX_HSiO2II] + y[IDX_HSiSII] + y[IDX_HeI] + - y[IDX_HeII] + y[IDX_HeHII] + y[IDX_MgI] + y[IDX_MgII] + y[IDX_NI] + - y[IDX_NII] + y[IDX_N2I] + y[IDX_N2II] + y[IDX_N2HII] + y[IDX_N2OI] + - y[IDX_N2OII] + y[IDX_NCCNI] + y[IDX_NCCNCH3II] + y[IDX_NCCNHII] + - y[IDX_NHI] + y[IDX_NHII] + y[IDX_NH2I] + y[IDX_NH2II] + y[IDX_NH2CNI] + - y[IDX_NH2CNHII] + y[IDX_NH3I] + y[IDX_NH3II] + y[IDX_NH4II] + y[IDX_NOI] - + y[IDX_NOII] + y[IDX_NO2I] + y[IDX_NO2II] + y[IDX_NSI] + y[IDX_NSII] + - y[IDX_NaI] + y[IDX_NaII] + y[IDX_OI] + y[IDX_OII] + y[IDX_OM] + - y[IDX_O2I] + y[IDX_O2II] + y[IDX_O2M] + y[IDX_O2HI] + y[IDX_O2HII] + - y[IDX_OCNI] + y[IDX_OCNII] + y[IDX_OCSI] + y[IDX_OCSII] + y[IDX_OHI] + - y[IDX_OHII] + y[IDX_OHM] + y[IDX_PI] + y[IDX_PII] + y[IDX_PC2H2II] + - y[IDX_PC2H3II] + y[IDX_PC2H4II] + y[IDX_PC3HII] + y[IDX_PC4HII] + - y[IDX_PCH2II] + y[IDX_PCH3II] + y[IDX_PCH4II] + y[IDX_PHI] + y[IDX_PHII] - + y[IDX_PH2I] + y[IDX_PH2II] + y[IDX_PH3II] + y[IDX_PNI] + y[IDX_PNII] + - y[IDX_PNH2II] + y[IDX_PNH3II] + y[IDX_POI] + y[IDX_POII] + y[IDX_SI] + - y[IDX_SII] + y[IDX_SM] + y[IDX_S2I] + y[IDX_S2II] + y[IDX_SOI] + - y[IDX_SOII] + y[IDX_SO2I] + y[IDX_SO2II] + y[IDX_SiI] + y[IDX_SiII] + - y[IDX_SiCI] + y[IDX_SiCII] + y[IDX_SiC2I] + y[IDX_SiC2II] + - y[IDX_SiC2HI] + y[IDX_SiC2HII] + y[IDX_SiC2H2I] + y[IDX_SiC2H2II] + - y[IDX_SiC2H3II] + y[IDX_SiC3I] + y[IDX_SiC3II] + y[IDX_SiC3HI] + - y[IDX_SiC3HII] + y[IDX_SiC3H2II] + y[IDX_SiC4I] + y[IDX_SiC4II] + - y[IDX_SiC4HII] + y[IDX_SiCH2I] + y[IDX_SiCH2II] + y[IDX_SiCH3I] + - y[IDX_SiCH3II] + y[IDX_SiCH4II] + y[IDX_SiFII] + y[IDX_SiHI] + - y[IDX_SiHII] + y[IDX_SiH2I] + y[IDX_SiH2II] + y[IDX_SiH3I] + - y[IDX_SiH3II] + y[IDX_SiH4I] + y[IDX_SiH4II] + y[IDX_SiH5II] + - y[IDX_SiNI] + y[IDX_SiNII] + y[IDX_SiNCI] + y[IDX_SiNCII] + - y[IDX_SiNCHII] + y[IDX_SiNH2II] + y[IDX_SiOI] + y[IDX_SiOII] + - y[IDX_SiO2I] + y[IDX_SiOHII] + y[IDX_SiSI] + y[IDX_SiSII] + y[IDX_eM]); + // TODO: exclude electron, grain? + double mass = 56.0*y[IDX_GFeI] + 4.0*y[IDX_GHeI] + 24.0*y[IDX_GMgI] + 23.0*y[IDX_GNaI] + + 66.0*y[IDX_GH2S2I] + 54.0*y[IDX_GC4H6I] + 80.0*y[IDX_GC4SI] + 47.0*y[IDX_GCClI] + + 65.0*y[IDX_GCH3C3NI] + 64.0*y[IDX_GCH3C4HI] + 89.0*y[IDX_GCH3C5NI] + 88.0*y[IDX_GCH3C6HI] + + 113.0*y[IDX_GCH3C7NI] + 51.0*y[IDX_GClOI] + 56.0*y[IDX_GHC2PI] + 36.0*y[IDX_GHClI] + + 20.0*y[IDX_GHFI] + 43.0*y[IDX_GHNSiI] + 48.0*y[IDX_GHPOI] + 42.0*y[IDX_GNH2CNI] + + 46.0*y[IDX_GNO2I] + 45.0*y[IDX_GPNI] + 65.0*y[IDX_GSiC3HI] + 43.0*y[IDX_GSiCH3I] + + 60.0*y[IDX_GSiO2I] + 60.0*y[IDX_GSiSI] + 19.0*y[IDX_GFI] + 46.0*y[IDX_GH2SiOI] + + 52.0*y[IDX_GNCCNI] + 64.0*y[IDX_GS2I] + 53.0*y[IDX_GSiC2HI] + 54.0*y[IDX_C2H4CNI] + + 68.0*y[IDX_GC3SI] + 62.0*y[IDX_GC4NI] + 79.0*y[IDX_GC4PI] + 46.0*y[IDX_GCH2PHI] + + 42.0*y[IDX_GCH3CHCH2I] + 60.0*y[IDX_GCH3COOHI] + 34.0*y[IDX_GH2SI] + 43.0*y[IDX_GHCNOI] + + 44.0*y[IDX_GHCPI] + 51.0*y[IDX_GHNC3I] + 43.0*y[IDX_GHNCOI] + 43.0*y[IDX_GHOCNI] + + 43.0*y[IDX_GHONCI] + 65.0*y[IDX_GHS2I] + 44.0*y[IDX_GN2OI] + 33.0*y[IDX_GPH2I] + + 47.0*y[IDX_GPOI] + 54.0*y[IDX_GSiC2H2I] + 76.0*y[IDX_GSiC4I] + 54.0*y[IDX_GSiNCI] + + 41.0*y[IDX_HC2OI] + 67.0*y[IDX_GC3PI] + 78.0*y[IDX_GC6H6I] + 34.0*y[IDX_GH2O2I] + + 41.0*y[IDX_GHCSiI] + 32.0*y[IDX_GPHI] + 64.0*y[IDX_GSO2I] + 32.0*y[IDX_GSiH4I] + + 67.0*y[IDX_NCCNCH3II] + 54.0*y[IDX_GC2H4CNI] + 56.0*y[IDX_GC2SI] + 52.0*y[IDX_GC3OI] + + 51.0*y[IDX_GC4H3I] + 86.0*y[IDX_GC7H2I] + 98.0*y[IDX_GC8H2I] + 110.0*y[IDX_GC9H2I] + + 40.0*y[IDX_GCH2CNI] + 41.0*y[IDX_GCH3CNI] + 28.0*y[IDX_GH2CNI] + 46.0*y[IDX_GH2CSI] + + 41.0*y[IDX_GHC2OI] + 75.0*y[IDX_GHC5NI] + 99.0*y[IDX_GHC7NI] + 123.0*y[IDX_GHC9NI] + + 39.0*y[IDX_GHCCNI] + 45.0*y[IDX_GHCSI] + 64.0*y[IDX_GSiC3I] + 31.0*y[IDX_GSiH3I] + + 42.0*y[IDX_GSiNI] + 44.0*y[IDX_GSiOI] + 39.0*y[IDX_HCCNI] + 54.0*y[IDX_C3H2OII] + + 31.0*y[IDX_CFII] + 51.0*y[IDX_ClOII] + 30.0*y[IDX_GC2H6I] + 38.0*y[IDX_GC3H2I] + + 62.0*y[IDX_GC5H2I] + 55.0*y[IDX_GCCPI] + 52.0*y[IDX_GCH2CHCCHI] + 58.0*y[IDX_GCH3COCH3I] + + 46.0*y[IDX_GCH3OCH3I] + 35.0*y[IDX_GClI] + 42.0*y[IDX_GSiCH2I] + 29.0*y[IDX_GSiHI] + + 30.0*y[IDX_GSiH2I] + 55.0*y[IDX_H3C3OII] + 20.0*y[IDX_HFII] + 47.0*y[IDX_SiFII] + + 101.0*y[IDX_C8H5II] + 113.0*y[IDX_C9H5II] + 65.0*y[IDX_CH3C3NII] + 122.0*y[IDX_GC10H2I] + + 50.0*y[IDX_GC4H2I] + 53.0*y[IDX_GCH2CHCNI] + 38.0*y[IDX_GH2CCCI] + 51.0*y[IDX_GHC3NI] + + 60.0*y[IDX_GOCSI] + 21.0*y[IDX_H2FII] + 54.0*y[IDX_C4H6I] + 79.0*y[IDX_C4PII] + + 74.0*y[IDX_C5NII] + 78.0*y[IDX_C6H6II] + 53.0*y[IDX_CH2CHCNII] + 59.0*y[IDX_COOCH3II] + + 19.0*y[IDX_FII] + 55.0*y[IDX_GC2H5CNI] + 46.0*y[IDX_GC2H5OHI] + 40.0*y[IDX_GC2OI] + + 74.0*y[IDX_GC6H2I] + 122.0*y[IDX_GC9NI] + 44.0*y[IDX_GCO2I] + 43.0*y[IDX_GCPI] + + 33.0*y[IDX_GO2HI] + 42.0*y[IDX_GOCNI] + 48.0*y[IDX_GSOI] + 40.0*y[IDX_GSiCI] + + 44.0*y[IDX_H2CNOII] + 44.0*y[IDX_H2NCOII] + 44.0*y[IDX_H2OCNII] + 59.0*y[IDX_PC2H4II] + + 98.0*y[IDX_C7NII] + 122.0*y[IDX_C9NII] + 30.0*y[IDX_CH3NHII] + 51.0*y[IDX_ClOI] + + 132.0*y[IDX_GC11I] + 38.0*y[IDX_GC2NI] + 40.0*y[IDX_GCH2CCH2I] + 29.0*y[IDX_GCH2NHI] + + 40.0*y[IDX_GCH3CCHI] + 42.0*y[IDX_GCNOI] + 27.0*y[IDX_GHNCI] + 46.0*y[IDX_GNSI] + + 52.0*y[IDX_GSiC2I] + 64.0*y[IDX_H2C4NII] + 49.0*y[IDX_H2CClII] + 32.0*y[IDX_H2NOII] + + 36.0*y[IDX_HClII] + 47.0*y[IDX_HNSII] + 29.0*y[IDX_HOCII] + 49.0*y[IDX_HSOII] + + 61.0*y[IDX_HSiO2II] + 43.0*y[IDX_NH2CNHII] + 46.0*y[IDX_C2H5OHII] + 40.0*y[IDX_C2OII] + + 52.0*y[IDX_CH2CHCCHI] + 59.0*y[IDX_CH2OHCOII] + 39.0*y[IDX_GCH2CCHI] + 42.0*y[IDX_GCH2COI] + + 31.0*y[IDX_GHNOI] + 28.0*y[IDX_GN2I] + 63.0*y[IDX_HC4NII] + 44.0*y[IDX_HCNOHII] + + 44.0*y[IDX_HNCOHII] + 43.0*y[IDX_HOCNII] + 5.0*y[IDX_HeHII] + 58.0*y[IDX_PC2H3II] + + 45.0*y[IDX_PNII] + 48.0*y[IDX_PNH3II] + 59.0*y[IDX_CH3CSII] + 74.0*y[IDX_GC5NI] + + 31.0*y[IDX_GPI] + 100.0*y[IDX_H2C7NII] + 124.0*y[IDX_H2C9NII] + 34.0*y[IDX_H2O2I] + + 67.0*y[IDX_H3S2II] + 43.0*y[IDX_HONCII] + 46.0*y[IDX_PCH3II] + 47.0*y[IDX_PNH2II] + + 123.0*y[IDX_C10H3II] + 56.0*y[IDX_C2H5CNHII] + 47.0*y[IDX_CClII] + 30.0*y[IDX_CH2NH2II] + + 61.0*y[IDX_CH2OHCH2OII] + 90.0*y[IDX_CH3C5NHII] + 114.0*y[IDX_CH3C7NHII] + 29.0*y[IDX_GC2H5I] + + 50.0*y[IDX_GC3NI] + 98.0*y[IDX_GC7NI] + 59.0*y[IDX_GCOOCH3I] + 27.0*y[IDX_GHCNI] + + 28.0*y[IDX_H2CNI] + 46.0*y[IDX_H2SiOII] + 77.0*y[IDX_H3C5NII] + 43.0*y[IDX_HCNOII] + + 47.0*y[IDX_CClI] + 60.0*y[IDX_CH3COOHII] + 35.0*y[IDX_ClII] + 17.0*y[IDX_GNH3I] + + 37.0*y[IDX_H2ClII] + 125.0*y[IDX_H3C9NII] + 61.0*y[IDX_H5C2O2II] + 46.0*y[IDX_HCOOHII] + + 46.0*y[IDX_HPNII] + 56.0*y[IDX_C2SII] + 68.0*y[IDX_C3SII] + 62.0*y[IDX_C4NI] + + 61.0*y[IDX_CH3COOH2II] + 46.0*y[IDX_CH3OCH3II] + 120.0*y[IDX_GC10I] + 121.0*y[IDX_GC10HI] + + 97.0*y[IDX_GC8HI] + 59.0*y[IDX_GCH2OHCOI] + 45.0*y[IDX_GCOOHI] + 32.0*y[IDX_GO2I] + + 101.0*y[IDX_H3C7NII] + 47.0*y[IDX_H3SiOII] + 65.0*y[IDX_HSO2II] + 42.0*y[IDX_NH2CNI] + + 66.0*y[IDX_CH3C3NHII] + 47.0*y[IDX_CH3OCH4II] + 28.0*y[IDX_GC2H4I] + 108.0*y[IDX_GC9I] + + 109.0*y[IDX_GC9HI] + 44.0*y[IDX_GCSI] + 99.0*y[IDX_HC7NII] + 123.0*y[IDX_HC9NII] + + 43.0*y[IDX_HNCOII] + 46.0*y[IDX_NO2II] + 68.0*y[IDX_PC3HII] + 47.0*y[IDX_PCH4II] + + 32.0*y[IDX_SiH4II] + 60.0*y[IDX_SiO2I] + 55.0*y[IDX_C2H5CNI] + 47.0*y[IDX_C2H5OH2II] + + 31.0*y[IDX_C2H7II] + 55.0*y[IDX_CCPII] + 54.0*y[IDX_CH2CHCNHII] + 59.0*y[IDX_COOCH3I] + + 19.0*y[IDX_FI] + 33.0*y[IDX_GHSI] + 49.0*y[IDX_H2POII] + 60.0*y[IDX_HCOOCH3II] + + 45.0*y[IDX_HN2OII] + 44.0*y[IDX_N2OII] + 57.0*y[IDX_PC2H2II] + 66.0*y[IDX_SiC3H2II] + + 76.0*y[IDX_SiC4II] + 77.0*y[IDX_SiC4HII] + 33.0*y[IDX_SiH5II] + 55.0*y[IDX_SiNCHII] + + 132.0*y[IDX_C11I] + 52.0*y[IDX_C3OII] + 53.0*y[IDX_C4H5II] + 55.0*y[IDX_C4H7II] + + 60.0*y[IDX_CH2OHCHOII] + 44.0*y[IDX_CH3CHOII] + 60.0*y[IDX_GCH2OHCHOI] + 46.0*y[IDX_GHCOOHI] + + 66.0*y[IDX_H2S2I] + 43.0*y[IDX_HNSiII] + 61.0*y[IDX_HOCSII] + 46.0*y[IDX_NSII] + + 42.0*y[IDX_OCNII] + 80.0*y[IDX_PC4HII] + 34.0*y[IDX_PH3II] + 44.0*y[IDX_SiCH4II] + + 120.0*y[IDX_C10II] + 122.0*y[IDX_C10H2II] + 52.0*y[IDX_C2N2II] + 41.0*y[IDX_CH3CNII] + + 26.0*y[IDX_GC2H2I] + 60.0*y[IDX_GC5I] + 85.0*y[IDX_GC7HI] + 43.0*y[IDX_GCH3COI] + + 60.0*y[IDX_GHCOOCH3I] + 81.0*y[IDX_HC4SII] + 76.0*y[IDX_HC5NHII] + 55.0*y[IDX_SiC2H3II] + + 65.0*y[IDX_SiC3HI] + 43.0*y[IDX_SiCH3II] + 44.0*y[IDX_SiNH2II] + 132.0*y[IDX_C11II] + + 50.0*y[IDX_C3NII] + 52.0*y[IDX_C4H4II] + 40.0*y[IDX_CH2CNII] + 58.0*y[IDX_CH3COCH3II] + + 43.0*y[IDX_CPII] + 72.0*y[IDX_GC6I] + 96.0*y[IDX_GC8I] + 31.0*y[IDX_GCH2OHI] + + 32.0*y[IDX_GCH3OHI] + 66.0*y[IDX_H2S2II] + 56.0*y[IDX_HC2PII] + 75.0*y[IDX_HC5NII] + + 20.0*y[IDX_HFI] + 43.0*y[IDX_HONCI] + 61.0*y[IDX_HSiSII] + 45.0*y[IDX_PCH2II] + + 64.0*y[IDX_SO2II] + 42.0*y[IDX_SiNII] + 108.0*y[IDX_C9II] + 59.0*y[IDX_CH2OHCOI] + + 89.0*y[IDX_CH3C5NI] + 113.0*y[IDX_CH3C7NI] + 37.0*y[IDX_GC3HI] + 49.0*y[IDX_GC4HI] + + 61.0*y[IDX_GC5HI] + 73.0*y[IDX_GC6HI] + 28.0*y[IDX_H2NCII] + 46.0*y[IDX_H2SiOI] + + 47.0*y[IDX_H3CSII] + 41.0*y[IDX_HC2OII] + 44.0*y[IDX_HCPII] + 76.0*y[IDX_SiC4I] + + 54.0*y[IDX_SiNCI] + 54.0*y[IDX_SiNCII] + 42.0*y[IDX_CNOI] + 27.0*y[IDX_GC2H3I] + + 31.0*y[IDX_GCH3OI] + 18.0*y[IDX_GH2OI] + 69.0*y[IDX_HC3SII] + 47.0*y[IDX_HCOOH2II] + + 43.0*y[IDX_HNSiI] + 48.0*y[IDX_HPOII] + 65.0*y[IDX_HS2II] + 54.0*y[IDX_SiC2H2I] + + 64.0*y[IDX_SiC3II] + 39.0*y[IDX_C2NHII] + 42.0*y[IDX_C3H6II] + 79.0*y[IDX_C6H7II] + + 100.0*y[IDX_C8H4II] + 60.0*y[IDX_CH2OHCHOI] + 35.0*y[IDX_ClI] + 84.0*y[IDX_GC7I] + + 28.0*y[IDX_GSiI] + 53.0*y[IDX_HC3OII] + 43.0*y[IDX_HCNOI] + 65.0*y[IDX_SiC3HII] + + 43.0*y[IDX_SiCH3I] + 43.0*y[IDX_C3H7II] + 62.0*y[IDX_C4NII] + 96.0*y[IDX_C8II] + + 112.0*y[IDX_C9H4II] + 42.0*y[IDX_CH2COII] + 46.0*y[IDX_CH2PHI] + 65.0*y[IDX_CH3C3NI] + + 48.0*y[IDX_GC4I] + 44.0*y[IDX_GCH3CHOI] + 30.0*y[IDX_GH2COI] + 43.0*y[IDX_HOCNI] + + 48.0*y[IDX_HPOI] + 65.0*y[IDX_HS2I] + 52.0*y[IDX_SiC2II] + 54.0*y[IDX_SiC2H2II] + + 76.0*y[IDX_C6H4II] + 43.0*y[IDX_CH3COI] + 59.0*y[IDX_CH3COCH4II] + 32.0*y[IDX_CH3OHII] + + 45.0*y[IDX_COOHI] + 30.0*y[IDX_GNOI] + 47.0*y[IDX_POII] + 88.0*y[IDX_C7H4II] + + 89.0*y[IDX_C7H5II] + 88.0*y[IDX_CH3C6HI] + 46.0*y[IDX_H2CSII] + 123.0*y[IDX_HC9NI] + + 60.0*y[IDX_HCOOCH3I] + 53.0*y[IDX_NCCNHII] + 46.0*y[IDX_NO2I] + 33.0*y[IDX_PH2I] + + 45.0*y[IDX_PNI] + 53.0*y[IDX_SiC2HI] + 64.0*y[IDX_SiC3I] + 79.0*y[IDX_C4PI] + + 84.0*y[IDX_C7II] + 40.0*y[IDX_CH2CNI] + 64.0*y[IDX_CH3C4HII] + 16.0*y[IDX_GCH4I] + + 44.0*y[IDX_HCPI] + 36.0*y[IDX_HClI] + 43.0*y[IDX_HNCOI] + 67.0*y[IDX_C3PI] + + 122.0*y[IDX_C9NI] + 64.0*y[IDX_CH3C4HI] + 60.0*y[IDX_CH3COOHI] + 46.0*y[IDX_CH3OCH3I] + + 25.0*y[IDX_GC2HI] + 16.0*y[IDX_GNH2I] + 46.0*y[IDX_H2CSI] + 33.0*y[IDX_PH2II] + + 47.0*y[IDX_POI] + 64.0*y[IDX_S2I] + 64.0*y[IDX_S2II] + 40.0*y[IDX_SiCII] + + 68.0*y[IDX_C3SI] + 77.0*y[IDX_C6H5II] + 29.0*y[IDX_CH2NHI] + 31.0*y[IDX_CH3OI] + + 29.0*y[IDX_GHCOI] + 56.0*y[IDX_HC2PI] + 41.0*y[IDX_HCSiI] + 42.0*y[IDX_SiCH2I] + + 121.0*y[IDX_C10HII] + 41.0*y[IDX_HCSiII] + 60.0*y[IDX_OCSII] + 52.0*y[IDX_SiC2I] + + 30.0*y[IDX_C2H6II] + 40.0*y[IDX_C2OI] + 97.0*y[IDX_C8HII] + 31.0*y[IDX_CH2OHI] + + 42.0*y[IDX_SiNI] + 65.0*y[IDX_C5H5II] + 15.0*y[IDX_GNHI] + 32.0*y[IDX_GSI] + + 45.0*y[IDX_HCSI] + 46.0*y[IDX_NSI] + 53.0*y[IDX_SiC2HII] + 30.0*y[IDX_SiH2I] + + 52.0*y[IDX_C3OI] + 73.0*y[IDX_C6HII] + 110.0*y[IDX_C9H2I] + 53.0*y[IDX_CH2CHCNI] + + 45.0*y[IDX_CH3CHOHII] + 42.0*y[IDX_CH3CNHII] + 43.0*y[IDX_CH3COII] + 99.0*y[IDX_HC7NI] + + 72.0*y[IDX_C6II] + 78.0*y[IDX_C6H6I] + 98.0*y[IDX_C7NI] + 46.0*y[IDX_HCOOHI] + + 30.0*y[IDX_SiH2II] + 31.0*y[IDX_SiH3II] + 122.0*y[IDX_C10H2I] + 48.0*y[IDX_C4II] + + 55.0*y[IDX_CCPI] + 43.0*y[IDX_CPI] + 36.0*y[IDX_GC3I] + 33.0*y[IDX_O2HI] + + 64.0*y[IDX_SO2I] + 40.0*y[IDX_SiCI] + 46.0*y[IDX_C2H5OHI] + 31.0*y[IDX_HNOI] + + 44.0*y[IDX_N2OI] + 31.0*y[IDX_SiH3I] + 33.0*y[IDX_CH3OH2II] + 38.0*y[IDX_C2NII] + + 60.0*y[IDX_C5II] + 75.0*y[IDX_C6H3II] + 99.0*y[IDX_C8H3II] + 109.0*y[IDX_C9HII] + + 111.0*y[IDX_C9H3II] + 42.0*y[IDX_CH2COI] + 51.0*y[IDX_HNC3I] + 42.0*y[IDX_OCNI] + + 42.0*y[IDX_SiCH2II] + 29.0*y[IDX_SiHII] + 58.0*y[IDX_CH3COCH3I] + 51.0*y[IDX_HC3NII] + + 98.0*y[IDX_C8H2I] + 44.0*y[IDX_CO2II] + 17.0*y[IDX_GOHI] + 75.0*y[IDX_HC5NI] + + 29.0*y[IDX_SiHI] + 32.0*y[IDX_SiH4I] + 85.0*y[IDX_C7HII] + 110.0*y[IDX_C9H2II] + + 32.0*y[IDX_PHI] + 86.0*y[IDX_C7H2I] + 28.0*y[IDX_GCOI] + 45.0*y[IDX_HCSII] + + 32.0*y[IDX_PHII] + 40.0*y[IDX_C3H4II] + 98.0*y[IDX_C8H2II] + 14.0*y[IDX_GCH2I] + + 45.0*y[IDX_HCO2II] + 63.0*y[IDX_C5H3II] + 52.0*y[IDX_HC3NHII] + 61.0*y[IDX_C5HII] + + 44.0*y[IDX_CH3CHOI] + 44.0*y[IDX_CSII] + 41.0*y[IDX_C3H5II] + 87.0*y[IDX_C7H3II] + + 31.0*y[IDX_PII] + 41.0*y[IDX_CH3CNI] + 52.0*y[IDX_NCCNI] + 86.0*y[IDX_C7H2II] + + 24.0*y[IDX_GC2I] + 36.0*y[IDX_C3II] + 35.0*y[IDX_H3SII] + 33.0*y[IDX_O2HII] + + 74.0*y[IDX_C6H2II] + 16.0*y[IDX_CH4II] + 31.0*y[IDX_HNOII] + 38.0*y[IDX_H2CCCI] + + 74.0*y[IDX_C6H2I] + 26.0*y[IDX_GCNI] + 29.0*y[IDX_C2H5II] + 62.0*y[IDX_C5H2I] + + 62.0*y[IDX_C5H2II] + 40.0*y[IDX_CH2CCH2I] + 26.0*y[IDX_CNII] + 30.0*y[IDX_C2H6I] + + 14.0*y[IDX_GNI] + 38.0*y[IDX_C3H2I] + 29.0*y[IDX_C2H5I] + 16.0*y[IDX_GOI] + + 28.0*y[IDX_N2II] + 80.0*y[IDX_C4SII] + 27.0*y[IDX_HCNII] + 42.0*y[IDX_CH3CHCH2I] + + 24.0*y[IDX_C2II] + 49.0*y[IDX_C4HII] + 38.0*y[IDX_CNCII] + 33.0*y[IDX_HSII] + + 15.0*y[IDX_NHII] + 32.0*y[IDX_O2M] + 13.0*y[IDX_CHM] + 2.0*y[IDX_H2II] + + 60.0*y[IDX_OCSI] + 15.0*y[IDX_GCH3I] + 16.0*y[IDX_NH2II] + 31.0*y[IDX_PI] + + 32.0*y[IDX_SM] + 60.0*y[IDX_SiSII] + 25.0*y[IDX_C2HM] + 49.0*y[IDX_C4HM] + + 28.0*y[IDX_COII] + 40.0*y[IDX_CH3CCHI] + 17.0*y[IDX_CH5II] + 57.0*y[IDX_HC2SII] + + 17.0*y[IDX_OHM] + 121.0*y[IDX_C10HM] + 37.0*y[IDX_C3HM] + 80.0*y[IDX_C4SI] + + 73.0*y[IDX_C6HM] + 97.0*y[IDX_C8HM] + 85.0*y[IDX_C7HM] + 109.0*y[IDX_C9HM] + + 120.0*y[IDX_C10M] + 61.0*y[IDX_C5HM] + 74.0*y[IDX_C5NM] + 33.0*y[IDX_HSI] + + 12.0*y[IDX_CM] + 44.0*y[IDX_CSI] + 16.0*y[IDX_OM] + 108.0*y[IDX_C9M] + + 32.0*y[IDX_CH3OHI] + 1.0*y[IDX_HM] + 51.0*y[IDX_HC3NI] + 60.0*y[IDX_SiSI] + + 37.0*y[IDX_C3HII] + 39.0*y[IDX_C3H3II] + 96.0*y[IDX_C8M] + 24.0*y[IDX_C2M] + + 56.0*y[IDX_C2SI] + 36.0*y[IDX_C3M] + 48.0*y[IDX_C4M] + 72.0*y[IDX_C6M] + + 31.0*y[IDX_H3COII] + 60.0*y[IDX_C5M] + 84.0*y[IDX_C7M] + 44.0*y[IDX_SiOII] + + 38.0*y[IDX_C2NI] + 13.0*y[IDX_GCHI] + 45.0*y[IDX_SiOHII] + 16.0*y[IDX_NH2I] + + 51.0*y[IDX_C4H3I] + 25.0*y[IDX_C2HII] + 38.0*y[IDX_C3H2II] + 74.0*y[IDX_C5NI] + + 14.0*y[IDX_CH2II] + 17.0*y[IDX_OHII] + 18.0*y[IDX_H2OII] + 50.0*y[IDX_C3NM] + + 2.0*y[IDX_GH2I] + 50.0*y[IDX_C3NI] + 13.0*y[IDX_CHII] + 44.0*y[IDX_CO2I] + + 32.0*y[IDX_O2II] + 121.0*y[IDX_C10HI] + 109.0*y[IDX_C9HI] + 44.0*y[IDX_SiOI] + + 56.0*y[IDX_FeII] + 56.0*y[IDX_FeI] + 24.0*y[IDX_MgII] + 23.0*y[IDX_NaII] + + 24.0*y[IDX_MgI] + 23.0*y[IDX_NaI] + 120.0*y[IDX_C10I] + 97.0*y[IDX_C8HI] + + 84.0*y[IDX_C7I] + 108.0*y[IDX_C9I] + 96.0*y[IDX_C8I] + 12.0*y[IDX_GCI] + + 15.0*y[IDX_NHI] + 60.0*y[IDX_C5I] + 72.0*y[IDX_C6I] + 26.0*y[IDX_CNM] + + 48.0*y[IDX_C4I] + 48.0*y[IDX_SOI] + 85.0*y[IDX_C7HI] + 28.0*y[IDX_C2H4II] + + 51.0*y[IDX_C4H3II] + 29.0*y[IDX_N2HII] + 39.0*y[IDX_CH2CCHI] + 48.0*y[IDX_SOII] + + 39.0*y[IDX_CH2CCHII] + 73.0*y[IDX_C6HI] + 61.0*y[IDX_C5HI] + 34.0*y[IDX_H2SII] + + 14.0*y[IDX_NII] + 37.0*y[IDX_C3HI] + 30.0*y[IDX_H2COII] + 36.0*y[IDX_C3I] + + 49.0*y[IDX_C4HI] + 30.0*y[IDX_NOII] + 16.0*y[IDX_OII] + 50.0*y[IDX_C4H2I] + + 50.0*y[IDX_C4H2II] + 28.0*y[IDX_HCNHII] + 14.0*y[IDX_CH2I] + 27.0*y[IDX_HNCI] + + 17.0*y[IDX_NH3II] + 28.0*y[IDX_C2H4I] + 27.0*y[IDX_C2H3I] + 18.0*y[IDX_NH4II] + + 28.0*y[IDX_N2I] + 32.0*y[IDX_O2I] + 28.0*y[IDX_SiII] + 34.0*y[IDX_H2SI] + + 32.0*y[IDX_SII] + 28.0*y[IDX_SiI] + 27.0*y[IDX_C2H3II] + 30.0*y[IDX_NOI] + + 29.0*y[IDX_HCOI] + 16.0*y[IDX_CH4I] + 25.0*y[IDX_C2HI] + 30.0*y[IDX_H2COI] + + 27.0*y[IDX_HCNI] + 13.0*y[IDX_CHI] + 32.0*y[IDX_SI] + 24.0*y[IDX_C2I] + + 17.0*y[IDX_OHI] + 17.0*y[IDX_NH3I] + 26.0*y[IDX_C2H2II] + 15.0*y[IDX_CH3II] + + 26.0*y[IDX_C2H2I] + 26.0*y[IDX_CNI] + 1.0*y[IDX_GHI] + 15.0*y[IDX_CH3I] + + 14.0*y[IDX_NI] + 19.0*y[IDX_H3OII] + 16.0*y[IDX_OI] + 4.0*y[IDX_HeII] + + 4.0*y[IDX_HeI] + 12.0*y[IDX_CII] + 18.0*y[IDX_H2OI] + 1.0*y[IDX_HII] + + 12.0*y[IDX_CI] + 29.0*y[IDX_HCOII] + 3.0*y[IDX_H3II] + 28.0*y[IDX_COI] + + 0.0*y[IDX_GRAINM] + 0.0*y[IDX_GRAIN0I] + 2.0*y[IDX_H2I] + 0.0*y[IDX_eM] + + 1.0*y[IDX_HI] + 0.0; + double num = y[IDX_GFeI] + y[IDX_GHeI] + y[IDX_GMgI] + y[IDX_GNaI] + + y[IDX_GH2S2I] + y[IDX_GC4H6I] + y[IDX_GC4SI] + y[IDX_GCClI] + + y[IDX_GCH3C3NI] + y[IDX_GCH3C4HI] + y[IDX_GCH3C5NI] + + y[IDX_GCH3C6HI] + y[IDX_GCH3C7NI] + y[IDX_GClOI] + + y[IDX_GHC2PI] + y[IDX_GHClI] + y[IDX_GHFI] + y[IDX_GHNSiI] + + y[IDX_GHPOI] + y[IDX_GNH2CNI] + y[IDX_GNO2I] + y[IDX_GPNI] + + y[IDX_GSiC3HI] + y[IDX_GSiCH3I] + y[IDX_GSiO2I] + y[IDX_GSiSI] + + y[IDX_GFI] + y[IDX_GH2SiOI] + y[IDX_GNCCNI] + y[IDX_GS2I] + + y[IDX_GSiC2HI] + y[IDX_C2H4CNI] + y[IDX_GC3SI] + y[IDX_GC4NI] + + y[IDX_GC4PI] + y[IDX_GCH2PHI] + y[IDX_GCH3CHCH2I] + + y[IDX_GCH3COOHI] + y[IDX_GH2SI] + y[IDX_GHCNOI] + y[IDX_GHCPI] + + y[IDX_GHNC3I] + y[IDX_GHNCOI] + y[IDX_GHOCNI] + y[IDX_GHONCI] + + y[IDX_GHS2I] + y[IDX_GN2OI] + y[IDX_GPH2I] + y[IDX_GPOI] + + y[IDX_GSiC2H2I] + y[IDX_GSiC4I] + y[IDX_GSiNCI] + y[IDX_HC2OI] + + y[IDX_GC3PI] + y[IDX_GC6H6I] + y[IDX_GH2O2I] + y[IDX_GHCSiI] + + y[IDX_GPHI] + y[IDX_GSO2I] + y[IDX_GSiH4I] + y[IDX_NCCNCH3II] + + y[IDX_GC2H4CNI] + y[IDX_GC2SI] + y[IDX_GC3OI] + y[IDX_GC4H3I] + + y[IDX_GC7H2I] + y[IDX_GC8H2I] + y[IDX_GC9H2I] + + y[IDX_GCH2CNI] + y[IDX_GCH3CNI] + y[IDX_GH2CNI] + y[IDX_GH2CSI] + + y[IDX_GHC2OI] + y[IDX_GHC5NI] + y[IDX_GHC7NI] + y[IDX_GHC9NI] + + y[IDX_GHCCNI] + y[IDX_GHCSI] + y[IDX_GSiC3I] + y[IDX_GSiH3I] + + y[IDX_GSiNI] + y[IDX_GSiOI] + y[IDX_HCCNI] + y[IDX_C3H2OII] + + y[IDX_CFII] + y[IDX_ClOII] + y[IDX_GC2H6I] + y[IDX_GC3H2I] + + y[IDX_GC5H2I] + y[IDX_GCCPI] + y[IDX_GCH2CHCCHI] + + y[IDX_GCH3COCH3I] + y[IDX_GCH3OCH3I] + y[IDX_GClI] + + y[IDX_GSiCH2I] + y[IDX_GSiHI] + y[IDX_GSiH2I] + y[IDX_H3C3OII] + + y[IDX_HFII] + y[IDX_SiFII] + y[IDX_C8H5II] + y[IDX_C9H5II] + + y[IDX_CH3C3NII] + y[IDX_GC10H2I] + y[IDX_GC4H2I] + + y[IDX_GCH2CHCNI] + y[IDX_GH2CCCI] + y[IDX_GHC3NI] + + y[IDX_GOCSI] + y[IDX_H2FII] + y[IDX_C4H6I] + y[IDX_C4PII] + + y[IDX_C5NII] + y[IDX_C6H6II] + y[IDX_CH2CHCNII] + + y[IDX_COOCH3II] + y[IDX_FII] + y[IDX_GC2H5CNI] + + y[IDX_GC2H5OHI] + y[IDX_GC2OI] + y[IDX_GC6H2I] + y[IDX_GC9NI] + + y[IDX_GCO2I] + y[IDX_GCPI] + y[IDX_GO2HI] + y[IDX_GOCNI] + + y[IDX_GSOI] + y[IDX_GSiCI] + y[IDX_H2CNOII] + y[IDX_H2NCOII] + + y[IDX_H2OCNII] + y[IDX_PC2H4II] + y[IDX_C7NII] + y[IDX_C9NII] + + y[IDX_CH3NHII] + y[IDX_ClOI] + y[IDX_GC11I] + y[IDX_GC2NI] + + y[IDX_GCH2CCH2I] + y[IDX_GCH2NHI] + y[IDX_GCH3CCHI] + + y[IDX_GCNOI] + y[IDX_GHNCI] + y[IDX_GNSI] + y[IDX_GSiC2I] + + y[IDX_H2C4NII] + y[IDX_H2CClII] + y[IDX_H2NOII] + y[IDX_HClII] + + y[IDX_HNSII] + y[IDX_HOCII] + y[IDX_HSOII] + y[IDX_HSiO2II] + + y[IDX_NH2CNHII] + y[IDX_C2H5OHII] + y[IDX_C2OII] + + y[IDX_CH2CHCCHI] + y[IDX_CH2OHCOII] + y[IDX_GCH2CCHI] + + y[IDX_GCH2COI] + y[IDX_GHNOI] + y[IDX_GN2I] + y[IDX_HC4NII] + + y[IDX_HCNOHII] + y[IDX_HNCOHII] + y[IDX_HOCNII] + y[IDX_HeHII] + + y[IDX_PC2H3II] + y[IDX_PNII] + y[IDX_PNH3II] + y[IDX_CH3CSII] + + y[IDX_GC5NI] + y[IDX_GPI] + y[IDX_H2C7NII] + y[IDX_H2C9NII] + + y[IDX_H2O2I] + y[IDX_H3S2II] + y[IDX_HONCII] + y[IDX_PCH3II] + + y[IDX_PNH2II] + y[IDX_C10H3II] + y[IDX_C2H5CNHII] + + y[IDX_CClII] + y[IDX_CH2NH2II] + y[IDX_CH2OHCH2OII] + + y[IDX_CH3C5NHII] + y[IDX_CH3C7NHII] + y[IDX_GC2H5I] + + y[IDX_GC3NI] + y[IDX_GC7NI] + y[IDX_GCOOCH3I] + y[IDX_GHCNI] + + y[IDX_H2CNI] + y[IDX_H2SiOII] + y[IDX_H3C5NII] + y[IDX_HCNOII] + + y[IDX_CClI] + y[IDX_CH3COOHII] + y[IDX_ClII] + y[IDX_GNH3I] + + y[IDX_H2ClII] + y[IDX_H3C9NII] + y[IDX_H5C2O2II] + + y[IDX_HCOOHII] + y[IDX_HPNII] + y[IDX_C2SII] + y[IDX_C3SII] + + y[IDX_C4NI] + y[IDX_CH3COOH2II] + y[IDX_CH3OCH3II] + + y[IDX_GC10I] + y[IDX_GC10HI] + y[IDX_GC8HI] + y[IDX_GCH2OHCOI] + + y[IDX_GCOOHI] + y[IDX_GO2I] + y[IDX_H3C7NII] + y[IDX_H3SiOII] + + y[IDX_HSO2II] + y[IDX_NH2CNI] + y[IDX_CH3C3NHII] + + y[IDX_CH3OCH4II] + y[IDX_GC2H4I] + y[IDX_GC9I] + y[IDX_GC9HI] + + y[IDX_GCSI] + y[IDX_HC7NII] + y[IDX_HC9NII] + y[IDX_HNCOII] + + y[IDX_NO2II] + y[IDX_PC3HII] + y[IDX_PCH4II] + y[IDX_SiH4II] + + y[IDX_SiO2I] + y[IDX_C2H5CNI] + y[IDX_C2H5OH2II] + + y[IDX_C2H7II] + y[IDX_CCPII] + y[IDX_CH2CHCNHII] + + y[IDX_COOCH3I] + y[IDX_FI] + y[IDX_GHSI] + y[IDX_H2POII] + + y[IDX_HCOOCH3II] + y[IDX_HN2OII] + y[IDX_N2OII] + + y[IDX_PC2H2II] + y[IDX_SiC3H2II] + y[IDX_SiC4II] + + y[IDX_SiC4HII] + y[IDX_SiH5II] + y[IDX_SiNCHII] + y[IDX_C11I] + + y[IDX_C3OII] + y[IDX_C4H5II] + y[IDX_C4H7II] + + y[IDX_CH2OHCHOII] + y[IDX_CH3CHOII] + y[IDX_GCH2OHCHOI] + + y[IDX_GHCOOHI] + y[IDX_H2S2I] + y[IDX_HNSiII] + y[IDX_HOCSII] + + y[IDX_NSII] + y[IDX_OCNII] + y[IDX_PC4HII] + y[IDX_PH3II] + + y[IDX_SiCH4II] + y[IDX_C10II] + y[IDX_C10H2II] + y[IDX_C2N2II] + + y[IDX_CH3CNII] + y[IDX_GC2H2I] + y[IDX_GC5I] + y[IDX_GC7HI] + + y[IDX_GCH3COI] + y[IDX_GHCOOCH3I] + y[IDX_HC4SII] + + y[IDX_HC5NHII] + y[IDX_SiC2H3II] + y[IDX_SiC3HI] + + y[IDX_SiCH3II] + y[IDX_SiNH2II] + y[IDX_C11II] + y[IDX_C3NII] + + y[IDX_C4H4II] + y[IDX_CH2CNII] + y[IDX_CH3COCH3II] + + y[IDX_CPII] + y[IDX_GC6I] + y[IDX_GC8I] + y[IDX_GCH2OHI] + + y[IDX_GCH3OHI] + y[IDX_H2S2II] + y[IDX_HC2PII] + y[IDX_HC5NII] + + y[IDX_HFI] + y[IDX_HONCI] + y[IDX_HSiSII] + y[IDX_PCH2II] + + y[IDX_SO2II] + y[IDX_SiNII] + y[IDX_C9II] + y[IDX_CH2OHCOI] + + y[IDX_CH3C5NI] + y[IDX_CH3C7NI] + y[IDX_GC3HI] + y[IDX_GC4HI] + + y[IDX_GC5HI] + y[IDX_GC6HI] + y[IDX_H2NCII] + y[IDX_H2SiOI] + + y[IDX_H3CSII] + y[IDX_HC2OII] + y[IDX_HCPII] + y[IDX_SiC4I] + + y[IDX_SiNCI] + y[IDX_SiNCII] + y[IDX_CNOI] + y[IDX_GC2H3I] + + y[IDX_GCH3OI] + y[IDX_GH2OI] + y[IDX_HC3SII] + y[IDX_HCOOH2II] + + y[IDX_HNSiI] + y[IDX_HPOII] + y[IDX_HS2II] + y[IDX_SiC2H2I] + + y[IDX_SiC3II] + y[IDX_C2NHII] + y[IDX_C3H6II] + y[IDX_C6H7II] + + y[IDX_C8H4II] + y[IDX_CH2OHCHOI] + y[IDX_ClI] + y[IDX_GC7I] + + y[IDX_GSiI] + y[IDX_HC3OII] + y[IDX_HCNOI] + y[IDX_SiC3HII] + + y[IDX_SiCH3I] + y[IDX_C3H7II] + y[IDX_C4NII] + y[IDX_C8II] + + y[IDX_C9H4II] + y[IDX_CH2COII] + y[IDX_CH2PHI] + y[IDX_CH3C3NI] + + y[IDX_GC4I] + y[IDX_GCH3CHOI] + y[IDX_GH2COI] + y[IDX_HOCNI] + + y[IDX_HPOI] + y[IDX_HS2I] + y[IDX_SiC2II] + y[IDX_SiC2H2II] + + y[IDX_C6H4II] + y[IDX_CH3COI] + y[IDX_CH3COCH4II] + + y[IDX_CH3OHII] + y[IDX_COOHI] + y[IDX_GNOI] + y[IDX_POII] + + y[IDX_C7H4II] + y[IDX_C7H5II] + y[IDX_CH3C6HI] + y[IDX_H2CSII] + + y[IDX_HC9NI] + y[IDX_HCOOCH3I] + y[IDX_NCCNHII] + y[IDX_NO2I] + + y[IDX_PH2I] + y[IDX_PNI] + y[IDX_SiC2HI] + y[IDX_SiC3I] + + y[IDX_C4PI] + y[IDX_C7II] + y[IDX_CH2CNI] + y[IDX_CH3C4HII] + + y[IDX_GCH4I] + y[IDX_HCPI] + y[IDX_HClI] + y[IDX_HNCOI] + + y[IDX_C3PI] + y[IDX_C9NI] + y[IDX_CH3C4HI] + y[IDX_CH3COOHI] + + y[IDX_CH3OCH3I] + y[IDX_GC2HI] + y[IDX_GNH2I] + y[IDX_H2CSI] + + y[IDX_PH2II] + y[IDX_POI] + y[IDX_S2I] + y[IDX_S2II] + + y[IDX_SiCII] + y[IDX_C3SI] + y[IDX_C6H5II] + y[IDX_CH2NHI] + + y[IDX_CH3OI] + y[IDX_GHCOI] + y[IDX_HC2PI] + y[IDX_HCSiI] + + y[IDX_SiCH2I] + y[IDX_C10HII] + y[IDX_HCSiII] + y[IDX_OCSII] + + y[IDX_SiC2I] + y[IDX_C2H6II] + y[IDX_C2OI] + y[IDX_C8HII] + + y[IDX_CH2OHI] + y[IDX_SiNI] + y[IDX_C5H5II] + y[IDX_GNHI] + + y[IDX_GSI] + y[IDX_HCSI] + y[IDX_NSI] + y[IDX_SiC2HII] + + y[IDX_SiH2I] + y[IDX_C3OI] + y[IDX_C6HII] + y[IDX_C9H2I] + + y[IDX_CH2CHCNI] + y[IDX_CH3CHOHII] + y[IDX_CH3CNHII] + + y[IDX_CH3COII] + y[IDX_HC7NI] + y[IDX_C6II] + y[IDX_C6H6I] + + y[IDX_C7NI] + y[IDX_HCOOHI] + y[IDX_SiH2II] + y[IDX_SiH3II] + + y[IDX_C10H2I] + y[IDX_C4II] + y[IDX_CCPI] + y[IDX_CPI] + + y[IDX_GC3I] + y[IDX_O2HI] + y[IDX_SO2I] + y[IDX_SiCI] + + y[IDX_C2H5OHI] + y[IDX_HNOI] + y[IDX_N2OI] + y[IDX_SiH3I] + + y[IDX_CH3OH2II] + y[IDX_C2NII] + y[IDX_C5II] + y[IDX_C6H3II] + + y[IDX_C8H3II] + y[IDX_C9HII] + y[IDX_C9H3II] + y[IDX_CH2COI] + + y[IDX_HNC3I] + y[IDX_OCNI] + y[IDX_SiCH2II] + y[IDX_SiHII] + + y[IDX_CH3COCH3I] + y[IDX_HC3NII] + y[IDX_C8H2I] + y[IDX_CO2II] + + y[IDX_GOHI] + y[IDX_HC5NI] + y[IDX_SiHI] + y[IDX_SiH4I] + + y[IDX_C7HII] + y[IDX_C9H2II] + y[IDX_PHI] + y[IDX_C7H2I] + + y[IDX_GCOI] + y[IDX_HCSII] + y[IDX_PHII] + y[IDX_C3H4II] + + y[IDX_C8H2II] + y[IDX_GCH2I] + y[IDX_HCO2II] + y[IDX_C5H3II] + + y[IDX_HC3NHII] + y[IDX_C5HII] + y[IDX_CH3CHOI] + y[IDX_CSII] + + y[IDX_C3H5II] + y[IDX_C7H3II] + y[IDX_PII] + y[IDX_CH3CNI] + + y[IDX_NCCNI] + y[IDX_C7H2II] + y[IDX_GC2I] + y[IDX_C3II] + + y[IDX_H3SII] + y[IDX_O2HII] + y[IDX_C6H2II] + y[IDX_CH4II] + + y[IDX_HNOII] + y[IDX_H2CCCI] + y[IDX_C6H2I] + y[IDX_GCNI] + + y[IDX_C2H5II] + y[IDX_C5H2I] + y[IDX_C5H2II] + y[IDX_CH2CCH2I] + + y[IDX_CNII] + y[IDX_C2H6I] + y[IDX_GNI] + y[IDX_C3H2I] + + y[IDX_C2H5I] + y[IDX_GOI] + y[IDX_N2II] + y[IDX_C4SII] + + y[IDX_HCNII] + y[IDX_CH3CHCH2I] + y[IDX_C2II] + y[IDX_C4HII] + + y[IDX_CNCII] + y[IDX_HSII] + y[IDX_NHII] + y[IDX_O2M] + + y[IDX_CHM] + y[IDX_H2II] + y[IDX_OCSI] + y[IDX_GCH3I] + + y[IDX_NH2II] + y[IDX_PI] + y[IDX_SM] + y[IDX_SiSII] + + y[IDX_C2HM] + y[IDX_C4HM] + y[IDX_COII] + y[IDX_CH3CCHI] + + y[IDX_CH5II] + y[IDX_HC2SII] + y[IDX_OHM] + y[IDX_C10HM] + + y[IDX_C3HM] + y[IDX_C4SI] + y[IDX_C6HM] + y[IDX_C8HM] + + y[IDX_C7HM] + y[IDX_C9HM] + y[IDX_C10M] + y[IDX_C5HM] + + y[IDX_C5NM] + y[IDX_HSI] + y[IDX_CM] + y[IDX_CSI] + y[IDX_OM] + + y[IDX_C9M] + y[IDX_CH3OHI] + y[IDX_HM] + y[IDX_HC3NI] + + y[IDX_SiSI] + y[IDX_C3HII] + y[IDX_C3H3II] + y[IDX_C8M] + + y[IDX_C2M] + y[IDX_C2SI] + y[IDX_C3M] + y[IDX_C4M] + y[IDX_C6M] + + y[IDX_H3COII] + y[IDX_C5M] + y[IDX_C7M] + y[IDX_SiOII] + + y[IDX_C2NI] + y[IDX_GCHI] + y[IDX_SiOHII] + y[IDX_NH2I] + + y[IDX_C4H3I] + y[IDX_C2HII] + y[IDX_C3H2II] + y[IDX_C5NI] + + y[IDX_CH2II] + y[IDX_OHII] + y[IDX_H2OII] + y[IDX_C3NM] + + y[IDX_GH2I] + y[IDX_C3NI] + y[IDX_CHII] + y[IDX_CO2I] + + y[IDX_O2II] + y[IDX_C10HI] + y[IDX_C9HI] + y[IDX_SiOI] + + y[IDX_FeII] + y[IDX_FeI] + y[IDX_MgII] + y[IDX_NaII] + + y[IDX_MgI] + y[IDX_NaI] + y[IDX_C10I] + y[IDX_C8HI] + + y[IDX_C7I] + y[IDX_C9I] + y[IDX_C8I] + y[IDX_GCI] + y[IDX_NHI] + + y[IDX_C5I] + y[IDX_C6I] + y[IDX_CNM] + y[IDX_C4I] + + y[IDX_SOI] + y[IDX_C7HI] + y[IDX_C2H4II] + y[IDX_C4H3II] + + y[IDX_N2HII] + y[IDX_CH2CCHI] + y[IDX_SOII] + y[IDX_CH2CCHII] + + y[IDX_C6HI] + y[IDX_C5HI] + y[IDX_H2SII] + y[IDX_NII] + + y[IDX_C3HI] + y[IDX_H2COII] + y[IDX_C3I] + y[IDX_C4HI] + + y[IDX_NOII] + y[IDX_OII] + y[IDX_C4H2I] + y[IDX_C4H2II] + + y[IDX_HCNHII] + y[IDX_CH2I] + y[IDX_HNCI] + y[IDX_NH3II] + + y[IDX_C2H4I] + y[IDX_C2H3I] + y[IDX_NH4II] + y[IDX_N2I] + + y[IDX_O2I] + y[IDX_SiII] + y[IDX_H2SI] + y[IDX_SII] + + y[IDX_SiI] + y[IDX_C2H3II] + y[IDX_NOI] + y[IDX_HCOI] + + y[IDX_CH4I] + y[IDX_C2HI] + y[IDX_H2COI] + y[IDX_HCNI] + + y[IDX_CHI] + y[IDX_SI] + y[IDX_C2I] + y[IDX_OHI] + y[IDX_NH3I] + + y[IDX_C2H2II] + y[IDX_CH3II] + y[IDX_C2H2I] + y[IDX_CNI] + + y[IDX_GHI] + y[IDX_CH3I] + y[IDX_NI] + y[IDX_H3OII] + y[IDX_OI] + + y[IDX_HeII] + y[IDX_HeI] + y[IDX_CII] + y[IDX_H2OI] + + y[IDX_HII] + y[IDX_CI] + y[IDX_HCOII] + y[IDX_H3II] + + y[IDX_COI] + y[IDX_GRAINM] + y[IDX_GRAIN0I] + y[IDX_H2I] + + y[IDX_eM] + y[IDX_HI] + 0.0; + + return mass / num; } __device__ __host__ double GetGamma(double *y) { + // TODO: different ways to get adiabatic index return 5.0 / 3.0; } @@ -436,8 +840,10 @@ __device__ __host__ double GetNumDens(double *y) { } // clang-format on +/* */ // clang-format off -__device__ double GetShieldingFactor(int specidx, double h2coldens, double spcoldens, +__device__ +double GetShieldingFactor(int specidx, double h2coldens, double spcoldens, double tgas, int method) { // clang-format on double factor; @@ -461,13 +867,17 @@ __device__ double GetShieldingFactor(int specidx, double h2coldens, double spcol } // clang-format off -__device__ double GetH2shielding(double coldens, int method) { +__device__ +double GetH2shielding(double coldens, int method) { // clang-format on double shielding = -1.0; switch (method) { case 0: shielding = GetH2shieldingInt(coldens); break; + case 1: + shielding = GetH2shieldingFGK(coldens); + break; default: break; } @@ -482,6 +892,9 @@ __device__ double GetCOshielding(double tgas, double h2col, double coldens, int case 0: shielding = GetCOshieldingInt(tgas, h2col, coldens); break; + case 1: + shielding = GetCOshieldingInt1(h2col, coldens); + break; default: break; } @@ -510,35 +923,71 @@ __device__ double GetH2shieldingInt(double coldens) { double shielding = -1.0; /* */ - if (coldens >= H2ShieldingTableX[104]) { - double x1 = H2ShieldingTableX[103]; - double x2 = H2ShieldingTableX[104]; - double y1 = H2ShieldingTable[103]; - double y2 = H2ShieldingTable[104]; - shielding = - log10(y1) + log10(y2 / y1) * log10(coldens / x1) / log10(x2 / x1); - shielding = pow(10.0, shielding); - return shielding; - } - - for (int i = 0; i < 104; i++) { - if (coldens >= H2ShieldingTableX[i] && - coldens < H2ShieldingTableX[i + 1]) { - double x1 = H2ShieldingTableX[i]; - double x2 = H2ShieldingTableX[i + 1]; - double y1 = H2ShieldingTable[i]; - double y2 = H2ShieldingTable[i + 1]; - shielding = log10(y1) + - log10(y2 / y1) * log10(coldens / x1) / log10(x2 / x1); - shielding = pow(10.0, shielding); - return shielding; + int i; + for (i = 0; i < 103; i++) { + if (coldens < H2ShieldingTableX[i + 1]) { + break; } } + double x1 = H2ShieldingTableX[i]; + double x2 = H2ShieldingTableX[i + 1]; + double y1 = H2ShieldingTable[i]; + double y2 = H2ShieldingTable[i + 1]; + shielding = + log10(y1) + log10(y2 / y1) * log10(coldens / x1) / log10(x2 / x1); + shielding = pow(10.0, shielding); + return shielding; + /* */ return shielding; } +// Calculates the line self shielding function +// Ref: Federman et al. apj vol.227 p.466. +// Originally implemented in UCLCHEM +// clang-format off +__device__ double GetH2shieldingFGK(double coldens) { + // clang-format on + + const double dopplerwidth = 3.0e10; + const double radiativewidth = 8.0e7; + const double oscillatorstrength = 1.0e-2; + + double shielding = -1.0; + + double taud = 0.5 * coldens * 1.5e-2 * oscillatorstrength / dopplerwidth; + + // Calculate wing contribution of self shielding function sr + if (taud < 0.0) taud = 0.0; + + double sr = 0.0; + if (radiativewidth != 0.0) { + double r = radiativewidth / (1.7724539 * dopplerwidth); + double t = 3.02 * pow(1000.0 * r, -0.064); + double u = pow(taud * r, 0.5) / t; + sr = pow((u * u + 0.78539816), -0.5) * r / t; + } + + // Calculate doppler contribution of self shielding function sj + double sj = 0.0; + if (taud == 0.0) { + sj = 1.0; + } else if (taud < 2.0) { + sj = exp(-0.6666667 * taud); + } else if (taud < 10.0) { + sj = 0.638 * pow(taud, -1.25); + } else if (taud < 100.0) { + sj = 0.505 * pow(taud, -1.15); + } else { + sj = 0.344 * pow(taud, -1.0667); + } + + shielding = sj + sr; + + return shielding; +} + // Interpolate/Extropolate from table (must be rendered in naunet constants) // clang-format off __device__ double GetCOshieldingInt(double tgas, double h2col, double coldens) { @@ -548,54 +997,32 @@ __device__ double GetCOshieldingInt(double tgas, double h2col, double coldens) { /* */ double x1, x2, y1, y2, z1, z2; int i1, i2, j1, j2, k1, k2; - for (int i = 0; i < 4; i++) { - if (tgas >= COShieldingTableX[i] && tgas < COShieldingTableX[i + 1]) { - x1 = COShieldingTableX[i]; - x2 = COShieldingTableX[i + 1]; - i1 = i; - i2 = i + 1; + for (i1 = 0; i1 < 3; i1++) { + if (tgas < COShieldingTableX[i1 + 1]) { + break; } } + i2 = i1 + 1; + x1 = COShieldingTableX[i1]; + x2 = COShieldingTableX[i2]; - if (tgas >= COShieldingTableX[4]) { - x1 = COShieldingTableX[3]; - x2 = COShieldingTableX[4]; - i1 = 3; - i2 = 4; - } - - for (int i = 0; i < 40; i++) { - if (h2col >= COShieldingTableY[i] && h2col < COShieldingTableY[i + 1]) { - y1 = COShieldingTableY[i]; - y2 = COShieldingTableY[i + 1]; - j1 = i; - j2 = i + 1; + for (j1 = 0; j1 < 39; j1++) { + if (h2col < COShieldingTableY[j1 + 1]) { + break; } } + j2 = j1 + 1; + y1 = COShieldingTableY[j1]; + y2 = COShieldingTableY[j2]; - if (h2col >= COShieldingTableY[40]) { - y1 = COShieldingTableY[39]; - y2 = COShieldingTableY[40]; - j1 = 39; - j2 = 40; - } - - for (int i = 0; i < 45; i++) { - if (coldens >= COShieldingTableZ[i] && - coldens < COShieldingTableZ[i + 1]) { - z1 = COShieldingTableZ[i]; - z2 = COShieldingTableZ[i + 1]; - k1 = i; - k2 = i + 1; + for (k1 = 0; k1 < 44; k1++) { + if (coldens < COShieldingTableZ[k1 + 1]) { + break; } } - - if (coldens >= COShieldingTableZ[45]) { - z1 = COShieldingTableZ[44]; - z2 = COShieldingTableZ[45]; - k1 = 44; - k2 = 45; - } + k2 = k1 + 1; + z1 = COShieldingTableZ[k1]; + z2 = COShieldingTableZ[k2]; double mx = log10(tgas / x1) / log10(x2 / x1); double my = log10(h2col / y1) / log10(y2 / y1); @@ -619,6 +1046,20 @@ __device__ double GetCOshieldingInt(double tgas, double h2col, double coldens) { return shielding; } +// clang-format off +__device__ double GetCOshieldingInt1(double h2col, double coldens) { + // clang-format on + double shielding = -1.0; + + /* */ + + printf("WARNING!! Not Implemented! Return CO shielding = -1.\n"); + + /* */ + + return shielding; +} + // Interpolate/Extropolate from table (must be rendered in naunet constants) // clang-format off __device__ double GetN2shieldingInt(double tgas, double h2col, double coldens) { @@ -629,54 +1070,33 @@ __device__ double GetN2shieldingInt(double tgas, double h2col, double coldens) { /* */ double x1, x2, y1, y2, z1, z2; int i1, i2, j1, j2, k1, k2; - for (int i = 0; i < 4; i++) { - if (tgas >= N2ShieldingTableX[i] && tgas < N2ShieldingTableX[i + 1]) { - x1 = N2ShieldingTableX[i]; - x2 = N2ShieldingTableX[i + 1]; - i1 = i; - i2 = i + 1; + // find the index where tags falls in the range] + for (i1 = 0; i1 < 3; i1++) { + if (tgas < N2ShieldingTableX[i1 + 1]) { + break; } } + i2 = i1 + 1; + x1 = N2ShieldingTableX[i1]; + x2 = N2ShieldingTableX[i2]; - if (tgas >= N2ShieldingTableX[4]) { - x1 = N2ShieldingTableX[3]; - x2 = N2ShieldingTableX[4]; - i1 = 3; - i2 = 4; - } - - for (int i = 0; i < 45; i++) { - if (h2col >= N2ShieldingTableY[i] && h2col < N2ShieldingTableY[i + 1]) { - y1 = N2ShieldingTableY[i]; - y2 = N2ShieldingTableY[i + 1]; - j1 = i; - j2 = i + 1; + for (j1 = 0; j1 < 44; j1++) { + if (h2col < N2ShieldingTableY[j1 + 1]) { + break; } } + j2 = j1 + 1; + y1 = N2ShieldingTableY[j1]; + y2 = N2ShieldingTableY[j2]; - if (h2col >= N2ShieldingTableY[45]) { - y1 = N2ShieldingTableY[44]; - y2 = N2ShieldingTableY[45]; - j1 = 44; - j2 = 45; - } - - for (int i = 0; i < 45; i++) { - if (coldens >= N2ShieldingTableZ[i] && - coldens < N2ShieldingTableZ[i + 1]) { - z1 = N2ShieldingTableZ[i]; - z2 = N2ShieldingTableZ[i + 1]; - k1 = i; - k2 = i + 1; + for (k1 = 0; k1 < 44; k1++) { + if (coldens < N2ShieldingTableZ[k1 + 1]) { + break; } } - - if (coldens >= N2ShieldingTableZ[45]) { - z1 = N2ShieldingTableZ[44]; - z2 = N2ShieldingTableZ[45]; - k1 = 44; - k2 = 45; - } + k2 = k1 + 1; + z1 = N2ShieldingTableZ[k1]; + z2 = N2ShieldingTableZ[k2]; double mx = log10(tgas / x1) / log10(x2 / x1); double my = log10(h2col / y1) / log10(y2 / y1); @@ -698,4 +1118,94 @@ __device__ double GetN2shieldingInt(double tgas, double h2col, double coldens) { /* */ return shielding; +} + +// Calculate xlamda := tau(lambda) / tau(visual) +// tau(lambda) is the opt. depth for dust extinction at +// wavelength x (cf. b.d.savage and j.s.mathis, annual +// review of astronomy and astrophysics vol.17(1979),p.84) +// clang-format off +__device__ double xlamda(double wavelength) { + // clang-format on + double x[29] = {910.0, 950.0, 1000.0, 1050.0, 1110.0, 1180.0, + 1250.0, 1390.0, 1490.0, 1600.0, 1700.0, 1800.0, + 1900.0, 2000.0, 2100.0, 2190.0, 2300.0, 2400.0, + 2500.0, 2740.0, 3440.0, 4000.0, 4400.0, 5500.0, + 7000.0, 9000.0, 12500.0, 22000.0, 34000.0}; + + double y[29] = {5.76, 5.18, 4.65, 4.16, 3.73, 3.4, 3.11, 2.74, 2.63, 2.62, + 2.54, 2.5, 2.58, 2.78, 3.01, 3.12, 2.86, 2.58, 2.35, 2.0, + 1.58, 1.42, 1.32, 1.0, 0.75, 0.48, 0.28, 0.12, 0.05}; + + if (wavelength < x[0]) { + return 5.76; + } + + else if (wavelength >= x[28]) { + return 0.05 - 5.16e-11 * (wavelength - x[28]); + } + + for (int i = 0; i < 28; i++) { + if (wavelength >= x[i] && wavelength < x[i + 1]) { + return y[i] + + (y[i + 1] - y[i]) * (wavelength - x[i]) / (x[i + 1] - x[i]); + } + } + + return 0.0; +} + +// Calculate the influence of dust extinction (g=0.8, omega=0.3) +// Ref: Wagenblast & Hartquist, mnras237, 1019 (1989) +// Adapted from UCLCHEM +// clang-format off +__device__ double GetGrainScattering(double av, double wavelength) { + // clang-format on + double c[6] = {1.0e0, 2.006e0, -1.438e0, 7.364e-1, -5.076e-1, -5.920e-2}; + double k[6] = {7.514e-1, 8.490e-1, 1.013e0, 1.282e0, 2.005e0, 5.832e0}; + + double tv = av / 1.086; + double tl = tv * xlamda(wavelength); + + double scat = 0.0; + double expo; + if (tl < 1.0) { + expo = k[0] * tl; + if (expo < 35.0) { + scat = c[0] * exp(-expo); + } + } else { + for (int i = 1; i < 6; i++) { + expo = k[i] * tl; + if (expo < 35.0) { + scat = scat + c[i] * exp(-expo); + } + } + } + + return scat; +} + +// Calculate lambda bar (in a) according to equ. 4 of van dishoeck +// and black, apj 334, p771 (1988) +// Adapted from UCLCHEM +// clang-format off +__device__ double GetCharactWavelength(double h2col, double cocol) { + // clang-format on + double logco = log10(abs(cocol) + 1.0); + double logh2 = log10(abs(h2col) + 1.0); + + double lbar = (5675.0 - 200.6 * logh2) - (571.6 - 24.09 * logh2) * logco + + (18.22 - 0.7664 * logh2) * pow(logco, 2.0); + + // lbar represents the mean of the wavelengths of the 33 + // dissociating bands weighted by their fractional contribution + // to the total rate of each depth. lbar cannot be larger than + // the wavelength of band 33 (1076.1a) and not be smaller than + // the wavelength of band 1 (913.6a). + + /* */ + lbar = min(1076.0, max(913.0, lbar)); + /* */ + return lbar; } \ No newline at end of file diff --git a/src/naunet_rates.cu b/src/naunet_rates.cu index 75871a8..91972c2 100644 --- a/src/naunet_rates.cu +++ b/src/naunet_rates.cu @@ -3,11 +3,9 @@ #include #include /* */ -/* */ -#include "naunet_ode.h" -/* */ #include "naunet_constants.h" #include "naunet_macros.h" +#include "naunet_ode.h" #include "naunet_physics.h" #define IJth(A, i, j) SM_ELEMENT_D(A, i, j) @@ -15,28849 +13,27481 @@ // clang-format off __device__ int EvalRates(realtype *k, realtype *y, NaunetData *u_data) { + realtype nH = u_data->nH; + realtype Tgas = u_data->Tgas; + realtype Tdust = u_data->Tdust; + realtype zeta_cr = u_data->zeta_cr; + realtype Av = u_data->Av; + realtype omega = u_data->omega; + realtype zeta_xr = u_data->zeta_xr; + realtype G0 = u_data->G0; realtype rG = u_data->rG; - realtype barr = u_data->barr; realtype sites = u_data->sites; + realtype barr = u_data->barr; realtype hop = u_data->hop; realtype nMono = u_data->nMono; + realtype opt_frz = u_data->opt_frz; + realtype opt_thd = u_data->opt_thd; + realtype opt_crd = u_data->opt_crd; realtype duty = u_data->duty; realtype Tcr = u_data->Tcr; + realtype opt_uvd = u_data->opt_uvd; + realtype opt_rcd = u_data->opt_rcd; realtype branch = u_data->branch; - realtype nH = u_data->nH; - realtype zeta_cr = u_data->zeta_cr; - realtype zeta_xr = u_data->zeta_xr; - realtype Tgas = u_data->Tgas; - realtype Tdust = u_data->Tdust; - realtype Av = u_data->Av; - realtype G0 = u_data->G0; - realtype omega = u_data->omega; - double mant = GetMantleDens(y); - double gdens = (y[IDX_GRAIN0I]+y[IDX_GRAINM]); - double garea = (4*pi*rG*rG) * gdens; - double unisites = sites * (4*pi*rG*rG); - double densites = sites * (4*pi*rG*rG) * gdens; - double freq = sqrt((2.0*sites*kerg)/((pi*pi)*amu)); - double quan = -2.0*(barr/hbar) * sqrt(2.0*amu*kerg); - double layers = mant/(nMono*densites); - double cov = (mant == 0.0) ? 0.0 : fmin(layers/mant, 1.0/mant); - double h2col = 0.5*1.59e21*Av; - double cocol = 1e-5 * h2col; - double n2col = 1e-5 * h2col; + realtype h2col = 0.5*1.59e21*Av; + realtype cocol = 1e-5 * h2col; + realtype n2col = 1e-5 * h2col; + realtype stick1 = (1.0 / (1.0 + 4.2e-2*sqrt(Tgas+Tdust) + 2.3e-3*Tgas - 1.3e-7*Tgas*Tgas)); + realtype stick2 = exp(-1741.0/Tgas) / (1.0 + 5e-2*sqrt(Tgas+Tdust) + 1e-14*pow(Tgas, 4.0)); + realtype stick = stick1 + stick2; + realtype gdens = y[IDX_GRAINM] + y[IDX_GRAIN0I]; + realtype mant = GetMantleDens(y); + realtype garea = (4.0*pi*rG*rG) * gdens; + realtype unisites = sites * (4*pi*rG*rG); + realtype densites = garea * sites; + realtype freq = sqrt((2.0*sites*kerg)/((pi*pi)*amu)); + realtype quan = -2.0*(barr/hbar) * sqrt(2.0*amu*kerg); + realtype layers = mant/(nMono*densites); + realtype cov = (mant == 0.0) ? 0.0 : fmin(layers/mant, 1.0/mant); + realtype hloss = stick * garea/4.0 * sqrt(8.0*kerg*Tgas/(pi*amu)); // clang-format on - // Some variable definitions from krome - realtype Te = Tgas * 8.617343e-5; // Tgas in eV (eV) - realtype lnTe = log(Te); // ln of Te (#) - realtype T32 = Tgas * 0.0033333333333333335; // Tgas/(300 K) (#) - realtype invT = 1.0 / Tgas; // inverse of T (1/K) - realtype invTe = 1.0 / Te; // inverse of T (1/eV) - realtype sqrTgas = sqrt(Tgas); // Tgas rootsquare (K**0.5) - // reaaction rate (k) of each reaction // clang-format off - if (Tgas>5.0 && Tgas<41000.0) { k[0] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[0] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3] = 4.7e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3] = 4.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[6] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[7] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[8] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[9] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[9] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[10] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[10] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[11] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[11] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[12] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[12] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[13] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[13] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[14] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[14] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[15] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[15] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[16] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[16] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[17] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[17] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[18] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[18] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[19] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[19] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[20] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[20] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[21] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[21] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[22] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[22] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[23] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[23] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[24] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[24] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[25] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[25] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[26] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[26] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[27] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[27] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[28] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[28] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[29] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[29] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[30] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[30] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[31] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[31] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[32] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[32] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[33] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[33] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[34] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[34] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[35] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[35] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[36] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[36] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[37] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[37] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[38] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[38] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[39] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[39] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[40] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[40] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[41] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[41] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[42] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[42] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[43] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[43] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[44] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[44] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[45] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[45] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[46] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[46] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[47] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[47] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[48] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[48] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[49] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[49] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[50] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[50] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[51] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[51] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[52] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[52] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[53] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[53] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[54] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[54] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[55] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[55] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[56] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[56] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[57] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[57] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[58] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[58] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[59] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[59] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[60] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[60] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[61] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[61] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[62] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[62] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[63] = 1.09e-11 * pow(Tgas/300.0, - -2.19) * exp(-165.1/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[63] = 1.09e-11 * pow(Tgas/300.0, + -2.19) * exp(-165.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[64] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[64] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[65] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[65] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[66] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[66] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[67] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[67] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[68] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[68] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[69] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[69] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[70] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[70] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[71] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[71] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[72] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[72] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[73] = 2e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[73] = 2e-11; } - if (Tgas>5.0 && Tgas<100.0) { k[74] = 4.82e-09 * pow(Tgas/300.0, 0.02) * - exp(-4.3/Tgas); } + if (Tgas>=5.0 && Tgas<100.0) { k[74] = 4.82e-09 * pow(Tgas/300.0, 0.02) + * exp(-4.3/Tgas); } - if (Tgas>100.0 && Tgas<3000.0) { k[75] = 4.32e-09 * pow(Tgas/300.0, - -0.39) * exp(-39.4/Tgas); } + if (Tgas>=100.0 && Tgas<3000.0) { k[75] = 4.32e-09 * pow(Tgas/300.0, + -0.39) * exp(-39.4/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[76] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[76] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[77] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[77] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[78] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[78] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[79] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[79] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[80] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[80] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[81] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[81] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[82] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[82] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[83] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[83] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[84] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[84] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[85] = 1.8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[85] = 1.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[86] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[86] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[87] = 7.7e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[87] = 7.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[88] = 1.6e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[88] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[89] = 7.7e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[89] = 7.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[90] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[90] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[91] = 5.4e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[91] = 5.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[92] = 6.2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[92] = 6.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[93] = 8.3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[93] = 8.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[94] = 6.2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[94] = 6.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[95] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[95] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[96] = 5.8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[96] = 5.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[97] = 6.1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[97] = 6.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[98] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[98] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[99] = 2.83e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[99] = 2.83e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[100] = 7.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[100] = 7.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[101] = 2.41e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[101] = 2.41e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[102] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[102] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[103] = 1.22e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[103] = 1.22e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[104] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[104] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[105] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[105] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[106] = 6.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[106] = 6.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[107] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[107] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[108] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[108] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[109] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[109] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[110] = 1.15e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[110] = 1.15e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[111] = 3e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[111] = 3e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[112] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[112] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[113] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[113] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[114] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[114] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[115] = 3e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[115] = 3e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[116] = 1.35e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[116] = 1.35e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[117] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[117] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[118] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[118] = 1.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[119] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[119] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[120] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[120] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[121] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[121] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[122] = 2.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[122] = 2.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[123] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[123] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[124] = 6.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[124] = 6.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[125] = 3.1e-10 * pow(Tgas/300.0, - -0.83) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[125] = 3.1e-10 * pow(Tgas/300.0, + -0.83); } - if (Tgas>5.0 && Tgas<41000.0) { k[126] = 1.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[126] = 1.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[127] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[127] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[128] = 2.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[128] = 2.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[129] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[129] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[130] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[130] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[131] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[131] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[132] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[132] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[133] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[133] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[134] = 6e-09 * pow(Tgas/300.0, 0.0) * - exp(-40200.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[134] = 6e-09 * exp(-40200.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[135] = 1e-08 * pow(Tgas/300.0, 0.0) * - exp(-84100.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[135] = 1e-08 * exp(-84100.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[136] = 5.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-52900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[136] = 5.8e-09 * exp(-52900.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[137] = 3.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[137] = 3.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[138] = 6e-09 * pow(Tgas/300.0, 0.0) * - exp(-52300.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[138] = 6e-09 * exp(-52300.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[139] = 6e-09 * pow(Tgas/300.0, 0.0) * - exp(-50900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[139] = 6e-09 * exp(-50900.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[140] = 3.22e-09 * pow(Tgas/300.0, - 0.35) * exp(-102000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[140] = 3.22e-09 * pow(Tgas/300.0, + 0.35) * exp(-102000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[141] = 6e-09 * pow(Tgas/300.0, 0.0) * - exp(-40200.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[141] = 6e-09 * exp(-40200.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[142] = 4.67e-07 * pow(Tgas/300.0, - -1.0) * exp(-55000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[142] = 4.67e-07 * pow(Tgas/300.0, + -1.0) * exp(-55000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[143] = 5.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-52900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[143] = 5.8e-09 * exp(-52900.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[144] = 6e-09 * pow(Tgas/300.0, 0.0) * - exp(-52300.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[144] = 6e-09 * exp(-52300.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[145] = 6e-09 * pow(Tgas/300.0, 0.0) * - exp(-50900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[145] = 6e-09 * exp(-50900.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[146] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[146] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[147] = 5e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[147] = 5e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[148] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[148] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[149] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[149] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[150] = 1.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[150] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[151] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[151] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[152] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[152] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[153] = 3.33e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[153] = 3.33e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[154] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[154] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[155] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[155] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[156] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[156] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[157] = 1.61e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[157] = 1.61e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[158] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[158] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[159] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[159] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[160] = 5.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[160] = 5.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[161] = 2.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[161] = 2.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[162] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[162] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[163] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[163] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[164] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[164] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[165] = 5.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[165] = 5.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[166] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[166] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[167] = 1.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[167] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[168] = 4.15e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[168] = 4.15e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[169] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[169] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[170] = 3.8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[170] = 3.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[171] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[171] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[172] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[172] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[173] = 2.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[173] = 2.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[174] = 7.8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[174] = 7.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[175] = 6e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[175] = 6e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[176] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[176] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[177] = 1.31e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[177] = 1.31e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[178] = 4.8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[178] = 4.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[179] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[179] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[180] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[180] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[181] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[181] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[182] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[182] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[183] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[183] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[184] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[184] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[185] = 6.72e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[185] = 6.72e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[186] = 7.05e-10 * pow(Tgas/300.0, - -0.03) * exp(+16.7/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[186] = 7.05e-10 * pow(Tgas/300.0, + -0.03) * exp(+16.7/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[187] = 7.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[187] = 7.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[188] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[188] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[189] = 4e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[189] = 4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[190] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[190] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[191] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[191] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[192] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[192] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[193] = 2.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[193] = 2.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[194] = 2.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[194] = 2.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[195] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[195] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[196] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[196] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[197] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[197] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[198] = 2.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[198] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[199] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[199] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[200] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[200] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[201] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[201] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[202] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[202] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[203] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[203] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[204] = 2.3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[204] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[205] = 3.8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[205] = 3.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[206] = 3.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[206] = 3.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[207] = 5.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[207] = 5.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[208] = 8.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[208] = 8.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[209] = 8.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[209] = 8.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[210] = 8.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[210] = 8.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[211] = 4.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[211] = 4.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[212] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[212] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[213] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[213] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[214] = 3.3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[214] = 3.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[215] = 4.14e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[215] = 4.14e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[216] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[216] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[217] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[217] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[218] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[218] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[219] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[219] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[220] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[220] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[221] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[221] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[222] = 8.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[222] = 8.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[223] = 2.2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[223] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[224] = 1.26e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[224] = 1.26e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[225] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[225] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[226] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[226] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[227] = 2.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[227] = 2.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[228] = 7.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[228] = 7.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[229] = 1.28e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[229] = 1.28e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[230] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[230] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[231] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[231] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[232] = 8e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[232] = 8e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[233] = 6.57e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[233] = 6.57e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[234] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[234] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[235] = 3.96e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[235] = 3.96e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[236] = 3.06e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[236] = 3.06e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[237] = 1.15e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[237] = 1.15e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[238] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[238] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[239] = 5.36e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[239] = 5.36e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[240] = 6.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[240] = 6.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[241] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[241] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[242] = 3.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[242] = 3.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[243] = 7.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[243] = 7.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[244] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[244] = 1.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[245] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[245] = 1.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[246] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[246] = 1.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[247] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[247] = 1.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[248] = 5.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[248] = 5.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[249] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[249] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[250] = 2.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[250] = 2.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[251] = 4.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[251] = 4.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[252] = 3.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[252] = 3.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[253] = 4.59e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[253] = 4.59e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[254] = 7.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[254] = 7.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[255] = 3.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[255] = 3.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[256] = 4.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[256] = 4.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[257] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[257] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[258] = 4.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[258] = 4.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[259] = 4.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[259] = 4.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[260] = 8.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[260] = 8.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[261] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[261] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[262] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[262] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[263] = 4.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[263] = 4.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[264] = 8.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[264] = 8.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[265] = 4.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[265] = 4.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[266] = 9.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[266] = 9.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[267] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[267] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[268] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[268] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[269] = 3e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[269] = 3e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[270] = 2.4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[270] = 2.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[271] = 2.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[271] = 2.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[272] = 4.4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[272] = 4.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[273] = 3.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[273] = 3.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[274] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[274] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[275] = 3.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[275] = 3.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[276] = 1.98e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[276] = 1.98e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[277] = 1.13e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[277] = 1.13e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[278] = 1.38e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[278] = 1.38e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[279] = 1.8e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[279] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[280] = 1.62e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[280] = 1.62e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[281] = 9.45e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[281] = 9.45e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[282] = 1.65e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[282] = 1.65e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[283] = 3.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[283] = 3.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[284] = 4.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[284] = 4.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[285] = 7.93e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[285] = 7.93e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[286] = 5.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[286] = 5.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[287] = 3.2e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[287] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[288] = 6.4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[288] = 6.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[289] = 3.2e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[289] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[290] = 3.1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[290] = 3.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[291] = 3.4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[291] = 3.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[292] = 3.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[292] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[293] = 6.3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[293] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[294] = 3.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[294] = 3.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[295] = 3.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[295] = 3.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[296] = 3.1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[296] = 3.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[297] = 3.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[297] = 3.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[298] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[298] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[299] = 6.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[299] = 6.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[300] = 5.2e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[300] = 5.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[301] = 1.79e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[301] = 1.79e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[302] = 3.7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[302] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[303] = 5.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[303] = 5.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[304] = 2.58e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[304] = 2.58e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[305] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[305] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[306] = 1e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[306] = 1e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[307] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[307] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[308] = 1.35e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[308] = 1.35e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[309] = 2.44e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[309] = 2.44e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[310] = 7.4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[310] = 7.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[311] = 3.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[311] = 3.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[312] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[312] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[313] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[313] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[314] = 9.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[314] = 9.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[315] = 1.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[315] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[316] = 7.4e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[316] = 7.4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[317] = 1.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[317] = 1.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[318] = 6.2e-11 * pow(Tgas/300.0, 0.79) - * exp(-6920.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[318] = 6.2e-11 * pow(Tgas/300.0, + 0.79) * exp(-6920.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[319] = 9.3e-11 * pow(Tgas/300.0, 0.73) - * exp(-232.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[319] = 9.3e-11 * pow(Tgas/300.0, + 0.73) * exp(-232.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[320] = 2.76e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[320] = 2.76e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[321] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[321] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[322] = 3.98e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[322] = 3.98e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[323] = 3.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[323] = 3.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[324] = 5.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[324] = 5.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[325] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[325] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[326] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[326] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[327] = 3.06e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[327] = 3.06e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[328] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[328] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[329] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[329] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[330] = 4e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[330] = 4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[331] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[331] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[332] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[332] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[333] = 4e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[333] = 4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[334] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[334] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[335] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[335] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[336] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[336] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[337] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[337] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[338] = 4e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[338] = 4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[339] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[339] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[340] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[340] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[341] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[341] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[342] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[342] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[343] = 4e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[343] = 4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[344] = 2.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[344] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[345] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[345] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[346] = 4e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[346] = 4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[347] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[347] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[348] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[348] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[349] = 4e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[349] = 4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[350] = 2.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[350] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[351] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[351] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[352] = 4e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[352] = 4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[353] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[353] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[354] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[354] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[355] = 4e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[355] = 4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[356] = 2.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[356] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[357] = 3.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[357] = 3.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[358] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[358] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[359] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[359] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[360] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[360] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[361] = 6.3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[361] = 6.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[362] = 3.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[362] = 3.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[363] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[363] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[364] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[364] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[365] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[365] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[366] = 3.6e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[366] = 3.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[367] = 8.4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[367] = 8.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[368] = 4e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[368] = 4e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[369] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[369] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[370] = 5.9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[370] = 5.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[371] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[371] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[372] = 1.9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[372] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[373] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[373] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[374] = 4.9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[374] = 4.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[375] = 7.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[375] = 7.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[376] = 2.96e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[376] = 2.96e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[377] = 4.7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[377] = 4.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[378] = 6.9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[378] = 6.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[379] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[379] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[380] = 5.28e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[380] = 5.28e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[381] = 1.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[381] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[382] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[382] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[383] = 4e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[383] = 4e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[384] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[384] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[385] = 4e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[385] = 4e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[386] = 1e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[386] = 1e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[387] = 1e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[387] = 1e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[388] = 1.05e-08 * pow(Tgas/300.0, - -0.13) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[388] = 1.05e-08 * pow(Tgas/300.0, + -0.13); } - if (Tgas>5.0 && Tgas<41000.0) { k[389] = 9.4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[389] = 9.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[390] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[390] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[391] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[391] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[392] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[392] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[393] = 3.3e-09 * pow(Tgas/300.0, 1.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[393] = 3.3e-09 * pow(Tgas/300.0, + 1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[394] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[394] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[395] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[395] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[396] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[396] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[397] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[397] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[398] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[398] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[399] = 1.85e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[399] = 1.85e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[400] = 2.9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[400] = 2.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[401] = 3.7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[401] = 3.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[402] = 2.1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[402] = 2.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[403] = 2.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[403] = 2.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[404] = 4.7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[404] = 4.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[405] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[405] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[406] = 6.86e-10 * pow(Tgas/300.0, - 0.26) * exp(-224.3/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[406] = 6.86e-10 * pow(Tgas/300.0, + 0.26) * exp(-224.3/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[407] = 2.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[407] = 2.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[408] = 2.1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[408] = 2.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[409] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[409] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[410] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[410] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[411] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[411] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[412] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[412] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[413] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[413] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[414] = 3e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[414] = 3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[415] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[415] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[416] = 5.78e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[416] = 5.78e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[417] = 3.2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[417] = 3.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[418] = 9.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[418] = 9.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[419] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[419] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[420] = 1.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[420] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[421] = 1.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[421] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[422] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[422] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[423] = 1.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[423] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[424] = 1.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[424] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[425] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[425] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[426] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[426] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[427] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[427] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[428] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[428] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[429] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[429] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[430] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[430] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[431] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[431] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[432] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[432] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[433] = 3e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[433] = 3e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[434] = 3.3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[434] = 3.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[435] = 1.5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[435] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[436] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[436] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[437] = 4.82e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[437] = 4.82e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[438] = 2.21e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[438] = 2.21e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[439] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[439] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[440] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[440] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[441] = 2.94e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[441] = 2.94e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[442] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[442] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[443] = 7.1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[443] = 7.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[444] = 1.2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[444] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[445] = 6.44e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[445] = 6.44e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[446] = 1.4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[446] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[447] = 3.9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[447] = 3.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[448] = 2.7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[448] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[449] = 2.7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[449] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[450] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[450] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[451] = 2.1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[451] = 2.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[452] = 5.7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[452] = 5.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[453] = 7.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[453] = 7.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[454] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[454] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[455] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[455] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[456] = 7.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[456] = 7.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[457] = 6.24e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[457] = 6.24e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[458] = 7.2e-15 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[458] = 7.2e-15; } - if (Tgas>5.0 && Tgas<41000.0) { k[459] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[459] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[460] = 5.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[460] = 5.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[461] = 2.07e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[461] = 2.07e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[462] = 4.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[462] = 4.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[463] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[463] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[464] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[464] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[465] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[465] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[466] = 6.4e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[466] = 6.4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[467] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[467] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[468] = 1.41e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[468] = 1.41e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[469] = 9.72e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[469] = 9.72e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[470] = 2.8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[470] = 2.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[471] = 2.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[471] = 2.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[472] = 2.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[472] = 2.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[473] = 6.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[473] = 6.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[474] = 4.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[474] = 4.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[475] = 2.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[475] = 2.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[476] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[476] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[477] = 3e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[477] = 3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[478] = 1.72e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[478] = 1.72e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[479] = 2.04e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[479] = 2.04e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[480] = 1.8e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[480] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[481] = 2.3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[481] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[482] = 1.89e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[482] = 1.89e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[483] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[483] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[484] = 1.4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[484] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[485] = 8.45e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[485] = 8.45e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[486] = 1.4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[486] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[487] = 6.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[487] = 6.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[488] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[488] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[489] = 6.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[489] = 6.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[490] = 3.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[490] = 3.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[491] = 1.2e-15 * pow(Tgas/300.0, 0.25) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[491] = 1.2e-15 * pow(Tgas/300.0, + 0.25); } - if (Tgas>5.0 && Tgas<41000.0) { k[492] = 5.66e-10 * pow(Tgas/300.0, - 0.36) * exp(+8.6/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[492] = 5.66e-10 * pow(Tgas/300.0, + 0.36) * exp(+8.6/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[493] = 8.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[493] = 8.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[494] = 8.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[494] = 8.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[495] = 3.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[495] = 3.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[496] = 5.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[496] = 5.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[497] = 3.4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[497] = 3.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[498] = 3.9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[498] = 3.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[499] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[499] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[500] = 3.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[500] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[501] = 7e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[501] = 7e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[502] = 3.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[502] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[503] = 3.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[503] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[504] = 6.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[504] = 6.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[505] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[505] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[506] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[506] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[507] = 1.5e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[507] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[508] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[508] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[509] = 2.54e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[509] = 2.54e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[510] = 2.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[510] = 2.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[511] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[511] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[512] = 8.2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[512] = 8.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[513] = 6.3e-15 * pow(Tgas/300.0, 0.75) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[513] = 6.3e-15 * pow(Tgas/300.0, + 0.75); } - if (Tgas>5.0 && Tgas<41000.0) { k[514] = 5.1e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[514] = 5.1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[515] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[515] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[516] = 1.21e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[516] = 1.21e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[517] = 9.69e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[517] = 9.69e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[518] = 6.05e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[518] = 6.05e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[519] = 3.08e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[519] = 3.08e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[520] = 8.39e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[520] = 8.39e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[521] = 5.68e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[521] = 5.68e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[522] = 1.03e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[522] = 1.03e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[523] = 6.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[523] = 6.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[524] = 2.64e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[524] = 2.64e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[525] = 3.3e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[525] = 3.3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[526] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[526] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[527] = 4.3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[527] = 4.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[528] = 3.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[528] = 3.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[529] = 3e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[529] = 3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[530] = 2.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[530] = 2.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[531] = 2.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[531] = 2.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[532] = 2.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[532] = 2.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[533] = 2.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[533] = 2.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[534] = 2.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[534] = 2.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[535] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[535] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[536] = 8.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[536] = 8.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[537] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[537] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[538] = 2.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[538] = 2.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[539] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[539] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[540] = 2.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[540] = 2.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[541] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[541] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[542] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[542] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[543] = 9.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[543] = 9.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[544] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[544] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[545] = 1.24e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[545] = 1.24e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[546] = 2.8e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[546] = 2.8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[547] = 1.1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[547] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[548] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[548] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[549] = 8.25e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[549] = 8.25e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[550] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[550] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[551] = 1.88e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[551] = 1.88e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[552] = 2.8e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[552] = 2.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[553] = 1.06e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[553] = 1.06e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[554] = 3.7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[554] = 3.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[555] = 4.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[555] = 4.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[556] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[556] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[557] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[557] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[558] = 1.97e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[558] = 1.97e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[559] = 3.7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[559] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[560] = 4.51e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[560] = 4.51e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[561] = 3.11e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[561] = 3.11e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[562] = 1.02e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[562] = 1.02e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[563] = 3.7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[563] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[564] = 7.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[564] = 7.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[565] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[565] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[566] = 3.77e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[566] = 3.77e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[567] = 1.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[567] = 1.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[568] = 3.7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[568] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[569] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[569] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[570] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[570] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[571] = 2.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[571] = 2.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[572] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[572] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[573] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[573] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[574] = 9.9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[574] = 9.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[575] = 1.05e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[575] = 1.05e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[576] = 1.8e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[576] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[577] = 7.12e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[577] = 7.12e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[578] = 4.51e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[578] = 4.51e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[579] = 6.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[579] = 6.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[580] = 7.2e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[580] = 7.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[581] = 4.3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[581] = 4.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[582] = 6.9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[582] = 6.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[583] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[583] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[584] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[584] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[585] = 4.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[585] = 4.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[586] = 9.1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[586] = 9.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[587] = 4.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[587] = 4.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[588] = 4.9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[588] = 4.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[589] = 8.9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[589] = 8.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[590] = 8.7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[590] = 8.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[591] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[591] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[592] = 2.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[592] = 2.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[593] = 4.2e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[593] = 4.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[594] = 3.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[594] = 3.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[595] = 7.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[595] = 7.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[596] = 3.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[596] = 3.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[597] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[597] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[598] = 2.14e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[598] = 2.14e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[599] = 1.8e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[599] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[600] = 3.2e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[600] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[601] = 6.24e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[601] = 6.24e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[602] = 2.02e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[602] = 2.02e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[603] = 1.9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[603] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[604] = 4.25e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[604] = 4.25e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[605] = 2.21e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[605] = 2.21e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[606] = 3.4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[606] = 3.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[607] = 1.7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[607] = 1.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[608] = 1.68e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[608] = 1.68e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[609] = 5.25e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[609] = 5.25e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[610] = 1.9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[610] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[611] = 2e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[611] = 2e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[612] = 2.3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[612] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[613] = 3.08e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[613] = 3.08e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[614] = 1.44e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[614] = 1.44e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[615] = 1.3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[615] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[616] = 6.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[616] = 6.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[617] = 3.2e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[617] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[618] = 6.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[618] = 6.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[619] = 3.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[619] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[620] = 9.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[620] = 9.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[621] = 1.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[621] = 1.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[622] = 3.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[622] = 3.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[623] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[623] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[624] = 7.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[624] = 7.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[625] = 3.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[625] = 3.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[626] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[626] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[627] = 4.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[627] = 4.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[628] = 4.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[628] = 4.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[629] = 3.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[629] = 3.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[630] = 5.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[630] = 5.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[631] = 7.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[631] = 7.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[632] = 2.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[632] = 2.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[633] = 2.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[633] = 2.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[634] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[634] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[635] = 2.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[635] = 2.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[636] = 2.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[636] = 2.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[637] = 2.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[637] = 2.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[638] = 2.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[638] = 2.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[639] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[639] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[640] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[640] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[641] = 7.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[641] = 7.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[642] = 7.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[642] = 7.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[643] = 2.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[643] = 2.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[644] = 2.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[644] = 2.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[645] = 2.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[645] = 2.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[646] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[646] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[647] = 3.9e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[647] = 3.9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[648] = 7e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[648] = 7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[649] = 4.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[649] = 4.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[650] = 2.94e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[650] = 2.94e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[651] = 4.75e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[651] = 4.75e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[652] = 8.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[652] = 8.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[653] = 4.9e-12 * pow(Tgas/300.0, 0.5) - * exp(-4580.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[653] = 4.9e-12 * pow(Tgas/300.0, 0.5) + * exp(-4580.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[654] = 2.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[654] = 2.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[655] = 2.1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[655] = 2.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[656] = 3.2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[656] = 3.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[657] = 1.36e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[657] = 1.36e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[658] = 4.3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[658] = 4.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[659] = 6.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[659] = 6.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[660] = 1e-09 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[660] = 1e-09 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[661] = 1.2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[661] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[662] = 1.9e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[662] = 1.9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[663] = 6.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[663] = 6.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[664] = 3.6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[664] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[665] = 2.04e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[665] = 2.04e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[666] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[666] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[667] = 7.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-890.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[667] = 7.3e-10 * exp(-890.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[668] = 1.11e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[668] = 1.11e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[669] = 1.22e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[669] = 1.22e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[670] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[670] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[671] = 4.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[671] = 4.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[672] = 5e-10 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[672] = 5e-10 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[673] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[673] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[674] = 1.4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[674] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[675] = 1.26e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[675] = 1.26e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[676] = 6.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[676] = 6.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[677] = 5.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[677] = 5.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[678] = 5.3e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[678] = 5.3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[679] = 4.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[679] = 4.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[680] = 2.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[680] = 2.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[681] = 6.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[681] = 6.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[682] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[682] = 1.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[683] = 9.62e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[683] = 9.62e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[684] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[684] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[685] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[685] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[686] = 4.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[686] = 4.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[687] = 4.8e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[687] = 4.8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[688] = 7.44e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[688] = 7.44e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[689] = 1.59e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[689] = 1.59e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[690] = 1.23e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[690] = 1.23e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[691] = 2.8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[691] = 2.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[692] = 1.2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[692] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[693] = 3.59e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[693] = 3.59e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[694] = 5.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[694] = 5.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[695] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[695] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[696] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[696] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[697] = 6.5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[697] = 6.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[698] = 6.4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[698] = 6.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[699] = 3.1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[699] = 3.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[700] = 6.3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[700] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[701] = 4.34e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[701] = 4.34e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[702] = 1.44e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[702] = 1.44e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[703] = 1.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[703] = 1.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[704] = 7.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[704] = 7.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[705] = 3.7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[705] = 3.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[706] = 3.2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[706] = 3.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<5000.0) { k[707] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<5000.0) { k[707] = 5e-11; } - if (Tgas>5000.0 && Tgas<50000.0) { k[708] = 5.54e-12 * pow(Tgas/300.0, - 0.86) * exp(-680.7/Tgas); } + if (Tgas>=5000.0 && Tgas<50000.0) { k[708] = 5.54e-12 * pow(Tgas/300.0, + 0.86) * exp(-680.7/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[709] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[709] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[710] = 9.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[710] = 9.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[711] = 6.84e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[711] = 6.84e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[712] = 1.82e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[712] = 1.82e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[713] = 1.26e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[713] = 1.26e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[714] = 1.8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[714] = 1.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[715] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[715] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[716] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[716] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[717] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[717] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[718] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[718] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[719] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[719] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[720] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[720] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[721] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[721] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[722] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[722] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[723] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[723] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[724] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[724] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[725] = 4.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[725] = 4.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[726] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[726] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[727] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[727] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[728] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[728] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[729] = 1.53e-06 * pow(Tgas/300.0, - -0.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[729] = 1.53e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[730] = 5.4e-08 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[730] = 5.4e-08 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[731] = 3.92e-07 * pow(Tgas/300.0, - -0.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[731] = 3.92e-07 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[732] = 1.35e-06 * pow(Tgas/300.0, - -0.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[732] = 1.35e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[733] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[733] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[734] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[734] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[735] = 8.39e-08 * pow(Tgas/300.0, - -0.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[735] = 8.39e-08 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[736] = 2.66e-08 * pow(Tgas/300.0, - -0.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[736] = 2.66e-08 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[737] = 1.2e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[737] = 1.2e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[738] = 6.76e-07 * pow(Tgas/300.0, - -0.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[738] = 6.76e-07 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[739] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[739] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[740] = 1.16e-07 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[740] = 1.16e-07 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[741] = 1.53e-07 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[741] = 1.53e-07 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[742] = 9e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[742] = 9e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[743] = 9e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[743] = 9e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[744] = 9e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[744] = 9e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<1000.0) { k[745] = 1.5e-08 * pow(Tgas/300.0, -0.84) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<1000.0) { k[745] = 1.5e-08 * pow(Tgas/300.0, + -0.84); } - if (Tgas>1000.0 && Tgas<30000.0) { k[746] = 2.87e-08 * pow(Tgas/300.0, - -1.38) * exp(-0.0/Tgas); } + if (Tgas>=1000.0 && Tgas<30000.0) { k[746] = 2.87e-08 * pow(Tgas/300.0, + -1.38); } - if (Tgas>5.0 && Tgas<1000.0) { k[747] = 1.45e-07 * pow(Tgas/300.0, - -0.84) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<1000.0) { k[747] = 1.45e-07 * pow(Tgas/300.0, + -0.84); } - if (Tgas>1000.0 && Tgas<30000.0) { k[748] = 2.78e-07 * pow(Tgas/300.0, - -1.38) * exp(-0.0/Tgas); } + if (Tgas>=1000.0 && Tgas<30000.0) { k[748] = 2.78e-07 * pow(Tgas/300.0, + -1.38); } - if (Tgas>5.0 && Tgas<1000.0) { k[749] = 3e-08 * pow(Tgas/300.0, -0.84) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<1000.0) { k[749] = 3e-08 * pow(Tgas/300.0, -0.84); + } - if (Tgas>1000.0 && Tgas<30000.0) { k[750] = 5.75e-08 * pow(Tgas/300.0, - -1.38) * exp(-0.0/Tgas); } + if (Tgas>=1000.0 && Tgas<30000.0) { k[750] = 5.75e-08 * pow(Tgas/300.0, + -1.38); } - if (Tgas>5.0 && Tgas<1000.0) { k[751] = 2.95e-07 * pow(Tgas/300.0, - -0.84) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<1000.0) { k[751] = 2.95e-07 * pow(Tgas/300.0, + -0.84); } - if (Tgas>1000.0 && Tgas<30000.0) { k[752] = 5.65e-07 * pow(Tgas/300.0, - -1.38) * exp(-0.0/Tgas); } + if (Tgas>=1000.0 && Tgas<30000.0) { k[752] = 5.65e-07 * pow(Tgas/300.0, + -1.38); } - if (Tgas>5.0 && Tgas<1000.0) { k[753] = 1.5e-08 * pow(Tgas/300.0, -0.84) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<1000.0) { k[753] = 1.5e-08 * pow(Tgas/300.0, + -0.84); } - if (Tgas>1000.0 && Tgas<30000.0) { k[754] = 2.87e-08 * pow(Tgas/300.0, - -1.38) * exp(-0.0/Tgas); } + if (Tgas>=1000.0 && Tgas<30000.0) { k[754] = 2.87e-08 * pow(Tgas/300.0, + -1.38); } - if (Tgas>5.0 && Tgas<1000.0) { k[755] = 3e-09 * pow(Tgas/300.0, -0.84) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<1000.0) { k[755] = 3e-09 * pow(Tgas/300.0, -0.84); + } - if (Tgas>1000.0 && Tgas<30000.0) { k[756] = 5.75e-09 * pow(Tgas/300.0, - -1.38) * exp(-0.0/Tgas); } + if (Tgas>=1000.0 && Tgas<30000.0) { k[756] = 5.75e-09 * pow(Tgas/300.0, + -1.38); } - if (Tgas>5.0 && Tgas<41000.0) { k[757] = 3.36e-08 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[757] = 3.36e-08 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[758] = 3.7e-07 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[758] = 3.7e-07 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[759] = 6.16e-08 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[759] = 6.16e-08 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[760] = 5.6e-08 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[760] = 5.6e-08 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[761] = 2.24e-08 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[761] = 2.24e-08 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[762] = 1.12e-08 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[762] = 1.12e-08 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[763] = 5.6e-09 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[763] = 5.6e-09 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[764] = 8.12e-08 * pow(Tgas/300.0, - -0.79) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[764] = 8.12e-08 * pow(Tgas/300.0, + -0.79); } - if (Tgas>5.0 && Tgas<41000.0) { k[765] = 3.64e-08 * pow(Tgas/300.0, - -0.79) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[765] = 3.64e-08 * pow(Tgas/300.0, + -0.79); } - if (Tgas>5.0 && Tgas<41000.0) { k[766] = 7.56e-08 * pow(Tgas/300.0, - -0.79) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[766] = 7.56e-08 * pow(Tgas/300.0, + -0.79); } - if (Tgas>5.0 && Tgas<41000.0) { k[767] = 3.36e-08 * pow(Tgas/300.0, - -0.79) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[767] = 3.36e-08 * pow(Tgas/300.0, + -0.79); } - if (Tgas>5.0 && Tgas<41000.0) { k[768] = 4.76e-08 * pow(Tgas/300.0, - -0.79) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[768] = 4.76e-08 * pow(Tgas/300.0, + -0.79); } - if (Tgas>5.0 && Tgas<41000.0) { k[769] = 2.06e-07 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[769] = 2.06e-07 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[770] = 6.32e-07 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[770] = 6.32e-07 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[771] = 6.32e-07 * pow(Tgas/300.0, - -0.76) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[771] = 6.32e-07 * pow(Tgas/300.0, + -0.76); } - if (Tgas>5.0 && Tgas<41000.0) { k[772] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[772] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[773] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[773] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[774] = 1.77e-06 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[774] = 1.77e-06 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[775] = 1.77e-06 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[775] = 1.77e-06 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[776] = 1.77e-06 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[776] = 1.77e-06 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[777] = 1.3e-07 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[777] = 1.3e-07 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[778] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[778] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[779] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[779] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[780] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[780] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[781] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[781] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[782] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[782] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[783] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[783] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[784] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[784] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[785] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[785] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[786] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[786] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[787] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[787] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[788] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[788] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[789] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[789] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[790] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[790] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[791] = 3e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[791] = 3e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[792] = 3e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[792] = 3e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[793] = 6e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[793] = 6e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[794] = 6e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[794] = 6e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[795] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[795] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[796] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[796] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[797] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[797] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[798] = 7e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[798] = 7e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[799] = 4.4e-08 * pow(Tgas/300.0, - -0.67) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[799] = 4.4e-08 * pow(Tgas/300.0, + -0.67); } - if (Tgas>5.0 && Tgas<41000.0) { k[800] = 2.56e-06 * pow(Tgas/300.0, - -0.67) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[800] = 2.56e-06 * pow(Tgas/300.0, + -0.67); } - if (Tgas>5.0 && Tgas<41000.0) { k[801] = 2.6e-07 * pow(Tgas/300.0, - -0.67) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[801] = 2.6e-07 * pow(Tgas/300.0, + -0.67); } - if (Tgas>5.0 && Tgas<41000.0) { k[802] = 1.48e-07 * pow(Tgas/300.0, - -0.67) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[802] = 1.48e-07 * pow(Tgas/300.0, + -0.67); } - if (Tgas>5.0 && Tgas<41000.0) { k[803] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[803] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[804] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[804] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[805] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[805] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[806] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[806] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[807] = 2.53e-08 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[807] = 2.53e-08 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[808] = 4.37e-08 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[808] = 4.37e-08 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[809] = 9.2e-09 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[809] = 9.2e-09 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[810] = 3.3e-08 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[810] = 3.3e-08 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[811] = 3.3e-08 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[811] = 3.3e-08 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[812] = 9.2e-09 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[812] = 9.2e-09 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[813] = 9.66e-08 * pow(Tgas/300.0, - -0.73) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[813] = 9.66e-08 * pow(Tgas/300.0, + -0.73); } - if (Tgas>5.0 && Tgas<41000.0) { k[814] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[814] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[815] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[815] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[816] = 1e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[816] = 1e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[817] = 1e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[817] = 1e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[818] = 1e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[818] = 1e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[819] = 1.2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[819] = 1.2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[820] = 1.8e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[820] = 1.8e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[821] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[821] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[822] = 2.75e-07 * pow(Tgas/300.0, - -0.79) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[822] = 2.75e-07 * pow(Tgas/300.0, + -0.79); } - if (Tgas>5.0 && Tgas<41000.0) { k[823] = 8.25e-07 * pow(Tgas/300.0, - -0.79) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[823] = 8.25e-07 * pow(Tgas/300.0, + -0.79); } - if (Tgas>5.0 && Tgas<41000.0) { k[824] = 3.1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[824] = 3.1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[825] = 3.1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[825] = 3.1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[826] = 3.3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[826] = 3.3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[827] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[827] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[828] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[828] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[829] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[829] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[830] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[830] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[831] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[831] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[832] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[832] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[833] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[833] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[834] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[834] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[835] = 1e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[835] = 1e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[836] = 1e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[836] = 1e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[837] = 1e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[837] = 1e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[838] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[838] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[839] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[839] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[840] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[840] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[841] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[841] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[842] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[842] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[843] = 4.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[843] = 4.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[844] = 4.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[844] = 4.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[845] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[845] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[846] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[846] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[847] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[847] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[848] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[848] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[849] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[849] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[850] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[850] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[851] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[851] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[852] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[852] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[853] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[853] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[854] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[854] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[855] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[855] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[856] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[856] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[857] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[857] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[858] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[858] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[859] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[859] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[860] = 1e-06 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[860] = 1e-06 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[861] = 5e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[861] = 5e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[862] = 5e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[862] = 5e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[863] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[863] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[864] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[864] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[865] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[865] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[866] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[866] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[867] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[867] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[868] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[868] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[869] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[869] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[870] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[870] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[871] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[871] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[872] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[872] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[873] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[873] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[874] = 3.5e-07 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[874] = 3.5e-07 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[875] = 3.5e-07 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[875] = 3.5e-07 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[876] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[876] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[877] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[877] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[878] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[878] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[879] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[879] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[880] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[880] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[881] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[881] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[882] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[882] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[883] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[883] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[884] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[884] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[885] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[885] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[886] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[886] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[887] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[887] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[888] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[888] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[889] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[889] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[890] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[890] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[891] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[891] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[892] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[892] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[893] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[893] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[894] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[894] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[895] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[895] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[896] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[896] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[897] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[897] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[898] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[898] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[899] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[899] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[900] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[900] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[901] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[901] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[902] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[902] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[903] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[903] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[904] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[904] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[905] = 5.2e-08 * pow(Tgas/300.0, -0.8) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[905] = 5.2e-08 * pow(Tgas/300.0, + -0.8); } - if (Tgas>5.0 && Tgas<41000.0) { k[906] = 1.5e-07 * pow(Tgas/300.0, - -0.42) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[906] = 1.5e-07 * pow(Tgas/300.0, + -0.42); } - if (Tgas>5.0 && Tgas<41000.0) { k[907] = 7.68e-08 * pow(Tgas/300.0, - -0.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[907] = 7.68e-08 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[908] = 4.03e-07 * pow(Tgas/300.0, - -0.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[908] = 4.03e-07 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[909] = 1.6e-07 * pow(Tgas/300.0, -0.6) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[909] = 1.6e-07 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[910] = 5e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[910] = 5e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[911] = 5e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[911] = 5e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[912] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[912] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[913] = 4.45e-07 * pow(Tgas/300.0, - -0.8) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[913] = 4.45e-07 * pow(Tgas/300.0, + -0.8); } - if (Tgas>5.0 && Tgas<41000.0) { k[914] = 4.45e-07 * pow(Tgas/300.0, - -0.8) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[914] = 4.45e-07 * pow(Tgas/300.0, + -0.8); } - if (Tgas>5.0 && Tgas<41000.0) { k[915] = 8.9e-07 * pow(Tgas/300.0, -0.8) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[915] = 8.9e-07 * pow(Tgas/300.0, + -0.8); } - if (Tgas>5.0 && Tgas<41000.0) { k[916] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[916] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[917] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[917] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[918] = 2e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[918] = 2e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[919] = 2e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[919] = 2e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[920] = 2e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[920] = 2e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[921] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[921] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[922] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[922] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[923] = 7.75e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[923] = 7.75e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[924] = 1.95e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[924] = 1.95e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[925] = 2e-07 * pow(Tgas/300.0, -0.4) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[925] = 2e-07 * pow(Tgas/300.0, -0.4); + } - if (Tgas>5.0 && Tgas<41000.0) { k[926] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[926] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[927] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[927] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[928] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[928] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[929] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[929] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[930] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[930] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[931] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[931] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[932] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[932] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[933] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[933] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[934] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[934] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[935] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[935] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[936] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[936] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[937] = 4.2e-07 * pow(Tgas/300.0, -0.7) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[937] = 4.2e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[938] = 1.08e-06 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[938] = 1.08e-06 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[939] = 8.47e-07 * pow(Tgas/300.0, - -0.74) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[939] = 8.47e-07 * pow(Tgas/300.0, + -0.74); } - if (Tgas>5.0 && Tgas<41000.0) { k[940] = 8.47e-07 * pow(Tgas/300.0, - -0.74) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[940] = 8.47e-07 * pow(Tgas/300.0, + -0.74); } - if (Tgas>5.0 && Tgas<41000.0) { k[941] = 3e-07 * pow(Tgas/300.0, -0.74) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[941] = 3e-07 * pow(Tgas/300.0, + -0.74); } - if (Tgas>5.0 && Tgas<41000.0) { k[942] = 8.47e-07 * pow(Tgas/300.0, - -0.74) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[942] = 8.47e-07 * pow(Tgas/300.0, + -0.74); } - if (Tgas>5.0 && Tgas<41000.0) { k[943] = 8.47e-07 * pow(Tgas/300.0, - -0.74) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[943] = 8.47e-07 * pow(Tgas/300.0, + -0.74); } - if (Tgas>5.0 && Tgas<41000.0) { k[944] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[944] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[945] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[945] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[946] = 5.28e-07 * pow(Tgas/300.0, - -0.69) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[946] = 5.28e-07 * pow(Tgas/300.0, + -0.69); } - if (Tgas>5.0 && Tgas<41000.0) { k[947] = 2.85e-07 * pow(Tgas/300.0, - -0.69) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[947] = 2.85e-07 * pow(Tgas/300.0, + -0.69); } - if (Tgas>5.0 && Tgas<41000.0) { k[948] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[948] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[949] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[949] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[950] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[950] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[951] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[951] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[952] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[952] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[953] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[953] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[954] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[954] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[955] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[955] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[956] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[956] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[957] = 7.48e-07 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[957] = 7.48e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[958] = 1.19e-07 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[958] = 1.19e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[959] = 8.33e-07 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[959] = 8.33e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[960] = 6.49e-07 * pow(Tgas/300.0, - -0.66) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[960] = 6.49e-07 * pow(Tgas/300.0, + -0.66); } - if (Tgas>5.0 && Tgas<41000.0) { k[961] = 8.61e-07 * pow(Tgas/300.0, - -0.66) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[961] = 8.61e-07 * pow(Tgas/300.0, + -0.66); } - if (Tgas>5.0 && Tgas<41000.0) { k[962] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[962] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[963] = 1.87e-07 * pow(Tgas/300.0, - -0.59) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[963] = 1.87e-07 * pow(Tgas/300.0, + -0.59); } - if (Tgas>5.0 && Tgas<41000.0) { k[964] = 8.01e-08 * pow(Tgas/300.0, - -0.59) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[964] = 8.01e-08 * pow(Tgas/300.0, + -0.59); } - if (Tgas>5.0 && Tgas<41000.0) { k[965] = 4.54e-07 * pow(Tgas/300.0, - -0.59) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[965] = 4.54e-07 * pow(Tgas/300.0, + -0.59); } - if (Tgas>5.0 && Tgas<41000.0) { k[966] = 2.67e-08 * pow(Tgas/300.0, - -0.59) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[966] = 2.67e-08 * pow(Tgas/300.0, + -0.59); } - if (Tgas>5.0 && Tgas<41000.0) { k[967] = 8.9e-08 * pow(Tgas/300.0, - -0.59) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[967] = 8.9e-08 * pow(Tgas/300.0, + -0.59); } - if (Tgas>5.0 && Tgas<41000.0) { k[968] = 1.75e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[968] = 1.75e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[969] = 1.75e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[969] = 1.75e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[970] = 3e-08 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[970] = 3e-08 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[971] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[971] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[972] = 4.76e-08 * pow(Tgas/300.0, - -0.52) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[972] = 4.76e-08 * pow(Tgas/300.0, + -0.52); } - if (Tgas>5.0 && Tgas<41000.0) { k[973] = 1.4e-08 * pow(Tgas/300.0, - -0.52) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[973] = 1.4e-08 * pow(Tgas/300.0, + -0.52); } - if (Tgas>5.0 && Tgas<41000.0) { k[974] = 1.96e-07 * pow(Tgas/300.0, - -0.52) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[974] = 1.96e-07 * pow(Tgas/300.0, + -0.52); } - if (Tgas>5.0 && Tgas<41000.0) { k[975] = 1.4e-08 * pow(Tgas/300.0, - -0.52) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[975] = 1.4e-08 * pow(Tgas/300.0, + -0.52); } - if (Tgas>5.0 && Tgas<41000.0) { k[976] = 8.4e-09 * pow(Tgas/300.0, - -0.52) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[976] = 8.4e-09 * pow(Tgas/300.0, + -0.52); } - if (Tgas>5.0 && Tgas<41000.0) { k[977] = 1.8e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[977] = 1.8e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[978] = 2e-08 * pow(Tgas/300.0, -0.6) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[978] = 2e-08 * pow(Tgas/300.0, -0.6); + } - if (Tgas>5.0 && Tgas<41000.0) { k[979] = 3.8e-07 * pow(Tgas/300.0, -0.6) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[979] = 3.8e-07 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[980] = 2e-07 * pow(Tgas/300.0, -0.48) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[980] = 2e-07 * pow(Tgas/300.0, + -0.48); } - if (Tgas>5.0 && Tgas<41000.0) { k[981] = 3.8e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[981] = 3.8e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[982] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[982] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[983] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[983] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[984] = 1e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[984] = 1e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[985] = 2e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[985] = 2e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[986] = 2e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[986] = 2e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[987] = 1.6e-08 * pow(Tgas/300.0, - -0.43) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[987] = 1.6e-08 * pow(Tgas/300.0, + -0.43); } - if (Tgas>5.0 && Tgas<41000.0) { k[988] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[988] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[989] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[989] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[990] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[990] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[991] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[991] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[992] = 1e-06 * pow(Tgas/300.0, -0.3) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[992] = 1e-06 * pow(Tgas/300.0, -0.3); + } - if (Tgas>5.0 && Tgas<41000.0) { k[993] = 3e-07 * pow(Tgas/300.0, -0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[993] = 3e-07 * pow(Tgas/300.0, -0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[994] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[994] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[995] = 1.5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[995] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[996] = 2.5e-08 * pow(Tgas/300.0, -0.7) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[996] = 2.5e-08 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[997] = 7.5e-08 * pow(Tgas/300.0, -0.7) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[997] = 7.5e-08 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[998] = 2.5e-07 * pow(Tgas/300.0, -0.7) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[998] = 2.5e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[999] = 1.6e-07 * pow(Tgas/300.0, -0.7) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[999] = 1.6e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[1000] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1000] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1001] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1001] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1002] = 1.08e-07 * pow(Tgas/300.0, - -0.85) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1002] = 1.08e-07 * pow(Tgas/300.0, + -0.85); } - if (Tgas>5.0 && Tgas<41000.0) { k[1003] = 1e-08 * pow(Tgas/300.0, -0.85) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1003] = 1e-08 * pow(Tgas/300.0, + -0.85); } - if (Tgas>5.0 && Tgas<41000.0) { k[1004] = 3.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1004] = 3.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1005] = 3.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1005] = 3.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1006] = 1.8e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1006] = 1.8e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1007] = 1.8e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1007] = 1.8e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1008] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1008] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1009] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1009] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1010] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1010] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1011] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1011] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1012] = 3.9e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1012] = 3.9e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1013] = 3.05e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1013] = 3.05e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1014] = 8.6e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1014] = 8.6e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1015] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1015] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1016] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1016] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1017] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1017] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1018] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1018] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1019] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1019] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1020] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1020] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1021] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1021] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1022] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1022] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1023] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1023] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1024] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1024] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1025] = 2.34e-08 * pow(Tgas/300.0, - -0.52) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1025] = 2.34e-08 * pow(Tgas/300.0, + -0.52); } - if (Tgas>5.0 && Tgas<41000.0) { k[1026] = 4.36e-08 * pow(Tgas/300.0, - -0.52) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1026] = 4.36e-08 * pow(Tgas/300.0, + -0.52); } - if (Tgas>5.0 && Tgas<41000.0) { k[1027] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1027] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1028] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1028] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1029] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1029] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1030] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1030] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1031] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1031] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1032] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1032] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1033] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1033] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1034] = 4.2e-08 * pow(Tgas/300.0, - -0.78) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1034] = 4.2e-08 * pow(Tgas/300.0, + -0.78); } - if (Tgas>5.0 && Tgas<41000.0) { k[1035] = 1.4e-08 * pow(Tgas/300.0, - -0.78) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1035] = 1.4e-08 * pow(Tgas/300.0, + -0.78); } - if (Tgas>5.0 && Tgas<41000.0) { k[1036] = 2.1e-07 * pow(Tgas/300.0, - -0.78) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1036] = 2.1e-07 * pow(Tgas/300.0, + -0.78); } - if (Tgas>5.0 && Tgas<41000.0) { k[1037] = 2.17e-07 * pow(Tgas/300.0, - -0.78) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1037] = 2.17e-07 * pow(Tgas/300.0, + -0.78); } - if (Tgas>5.0 && Tgas<41000.0) { k[1038] = 2.17e-07 * pow(Tgas/300.0, - -0.78) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1038] = 2.17e-07 * pow(Tgas/300.0, + -0.78); } - if (Tgas>5.0 && Tgas<41000.0) { k[1039] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1039] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1040] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1040] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1041] = 7.09e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1041] = 7.09e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1042] = 5.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1042] = 5.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1043] = 5.37e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1043] = 5.37e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1044] = 3.05e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1044] = 3.05e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1045] = 4.76e-08 * pow(Tgas/300.0, - -0.86) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1045] = 4.76e-08 * pow(Tgas/300.0, + -0.86); } - if (Tgas>5.0 && Tgas<41000.0) { k[1046] = 4.2e-08 * pow(Tgas/300.0, - -0.86) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1046] = 4.2e-08 * pow(Tgas/300.0, + -0.86); } - if (Tgas>5.0 && Tgas<41000.0) { k[1047] = 1.62e-07 * pow(Tgas/300.0, - -0.86) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1047] = 1.62e-07 * pow(Tgas/300.0, + -0.86); } - if (Tgas>5.0 && Tgas<41000.0) { k[1048] = 2.8e-08 * pow(Tgas/300.0, - -0.86) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1048] = 2.8e-08 * pow(Tgas/300.0, + -0.86); } - if (Tgas>5.0 && Tgas<41000.0) { k[1049] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1049] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1050] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1050] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1051] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1051] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1052] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1052] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1053] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1053] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1054] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1054] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1055] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1055] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1056] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1056] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1057] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1057] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1058] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1058] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1059] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1059] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1060] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1060] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1061] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1061] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1062] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1062] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1063] = 6.6e-07 * pow(Tgas/300.0, - -0.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1063] = 6.6e-07 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[1064] = 3.6e-07 * pow(Tgas/300.0, - -0.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1064] = 3.6e-07 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[1065] = 3.6e-07 * pow(Tgas/300.0, - -0.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1065] = 3.6e-07 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[1066] = 7.2e-07 * pow(Tgas/300.0, - -0.58) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1066] = 7.2e-07 * pow(Tgas/300.0, + -0.58); } - if (Tgas>5.0 && Tgas<41000.0) { k[1067] = 4.9e-08 * pow(Tgas/300.0, - -0.58) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1067] = 4.9e-08 * pow(Tgas/300.0, + -0.58); } - if (Tgas>5.0 && Tgas<41000.0) { k[1068] = 7.31e-07 * pow(Tgas/300.0, - -0.58) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1068] = 7.31e-07 * pow(Tgas/300.0, + -0.58); } - if (Tgas>5.0 && Tgas<41000.0) { k[1069] = 7.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1069] = 7.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1070] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1070] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1071] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1071] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1072] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1072] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1073] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1073] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1074] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1074] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1075] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1075] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1076] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1076] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1077] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1077] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1078] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1078] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1079] = 8e-08 * pow(Tgas/300.0, -0.7) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1079] = 8e-08 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[1080] = 1.2e-07 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1080] = 1.2e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[1081] = 9.2e-07 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1081] = 9.2e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[1082] = 4.4e-07 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1082] = 4.4e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[1083] = 4.4e-07 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1083] = 4.4e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[1084] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1084] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1085] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1085] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1086] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1086] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1087] = 1e-06 * pow(Tgas/300.0, -0.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1087] = 1e-06 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[1088] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1088] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1089] = 9.3e-08 * pow(Tgas/300.0, - -0.65) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1089] = 9.3e-08 * pow(Tgas/300.0, + -0.65); } - if (Tgas>5.0 && Tgas<41000.0) { k[1090] = 9.5e-08 * pow(Tgas/300.0, - -0.65) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1090] = 9.5e-08 * pow(Tgas/300.0, + -0.65); } - if (Tgas>5.0 && Tgas<41000.0) { k[1091] = 9.5e-08 * pow(Tgas/300.0, - -0.65) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1091] = 9.5e-08 * pow(Tgas/300.0, + -0.65); } - if (Tgas>5.0 && Tgas<41000.0) { k[1092] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1092] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1093] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1093] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1094] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1094] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1095] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1095] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1096] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1096] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1097] = 2.4e-07 * pow(Tgas/300.0, - -0.69) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1097] = 2.4e-07 * pow(Tgas/300.0, + -0.69); } - if (Tgas>5.0 && Tgas<41000.0) { k[1098] = 6e-08 * pow(Tgas/300.0, -0.64) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1098] = 6e-08 * pow(Tgas/300.0, + -0.64); } - if (Tgas>5.0 && Tgas<41000.0) { k[1099] = 8.1e-07 * pow(Tgas/300.0, - -0.64) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1099] = 8.1e-07 * pow(Tgas/300.0, + -0.64); } - if (Tgas>5.0 && Tgas<41000.0) { k[1100] = 3.2e-07 * pow(Tgas/300.0, - -0.64) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1100] = 3.2e-07 * pow(Tgas/300.0, + -0.64); } - if (Tgas>5.0 && Tgas<41000.0) { k[1101] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1101] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1102] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1102] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1103] = 7.33e-07 * pow(Tgas/300.0, - -0.78) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1103] = 7.33e-07 * pow(Tgas/300.0, + -0.78); } - if (Tgas>5.0 && Tgas<41000.0) { k[1104] = 1.1e-07 * pow(Tgas/300.0, - -0.78) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1104] = 1.1e-07 * pow(Tgas/300.0, + -0.78); } - if (Tgas>5.0 && Tgas<41000.0) { k[1105] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1105] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1106] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1106] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1107] = 7.87e-07 * pow(Tgas/300.0, - -0.57) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1107] = 7.87e-07 * pow(Tgas/300.0, + -0.57); } - if (Tgas>5.0 && Tgas<41000.0) { k[1108] = 1.84e-07 * pow(Tgas/300.0, - -0.57) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1108] = 1.84e-07 * pow(Tgas/300.0, + -0.57); } - if (Tgas>5.0 && Tgas<41000.0) { k[1109] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1109] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1110] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1110] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1111] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1111] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1112] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1112] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1113] = 5.6e-07 * pow(Tgas/300.0, - -0.74) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1113] = 5.6e-07 * pow(Tgas/300.0, + -0.74); } - if (Tgas>5.0 && Tgas<41000.0) { k[1114] = 6.44e-07 * pow(Tgas/300.0, - -0.74) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1114] = 6.44e-07 * pow(Tgas/300.0, + -0.74); } - if (Tgas>5.0 && Tgas<41000.0) { k[1115] = 2e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1115] = 2e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1116] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1116] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1117] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1117] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1118] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1118] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1119] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1119] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1120] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1120] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1121] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1121] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1122] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1122] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1123] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1123] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1124] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1124] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1125] = 1.1e-07 * pow(Tgas/300.0, - -1.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1125] = 1.1e-07 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[1126] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1126] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1127] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1127] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1128] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1128] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1129] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1129] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1130] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1130] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1131] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1131] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1132] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1132] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1133] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1133] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1134] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1134] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1135] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1135] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1136] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1136] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1137] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1137] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1138] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1138] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1139] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1139] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1140] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1140] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1141] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1141] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1142] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1142] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1143] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1143] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1144] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1144] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1145] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1145] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1146] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1146] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1147] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1147] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1148] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1148] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1149] = 1e-08 * pow(Tgas/300.0, -0.6) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1149] = 1e-08 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[1150] = 1.7e-07 * pow(Tgas/300.0, - -0.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1150] = 1.7e-07 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<150.0) { k[1151] = 2.77e-07 * pow(Tgas/300.0, - -0.74) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<150.0) { k[1151] = 2.77e-07 * pow(Tgas/300.0, + -0.74); } - if (Tgas>150.0 && Tgas<41000.0) { k[1152] = 2.55e-07 * pow(Tgas/300.0, - -0.84) * exp(-0.0/Tgas); } + if (Tgas>=150.0 && Tgas<41000.0) { k[1152] = 2.55e-07 * pow(Tgas/300.0, + -0.84); } - if (Tgas>5.0 && Tgas<150.0) { k[1153] = 2.09e-08 * pow(Tgas/300.0, - -0.74) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<150.0) { k[1153] = 2.09e-08 * pow(Tgas/300.0, + -0.74); } - if (Tgas>150.0 && Tgas<41000.0) { k[1154] = 1.92e-08 * pow(Tgas/300.0, - -0.84) * exp(-0.0/Tgas); } + if (Tgas>=150.0 && Tgas<41000.0) { k[1154] = 1.92e-08 * pow(Tgas/300.0, + -0.84); } - if (Tgas>5.0 && Tgas<41000.0) { k[1155] = 6e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1155] = 6e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1156] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1156] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1157] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1157] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1158] = 4.3e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1158] = 4.3e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<12400.0) { k[1159] = 1.78e-07 * pow(Tgas/300.0, - -0.8) * exp(-17.1/Tgas); } + if (Tgas>=5.0 && Tgas<12400.0) { k[1159] = 1.78e-07 * pow(Tgas/300.0, + -0.8) * exp(-17.1/Tgas); } - if (Tgas>5.0 && Tgas<12400.0) { k[1160] = 9.21e-08 * pow(Tgas/300.0, - -0.79) * exp(-17.1/Tgas); } + if (Tgas>=5.0 && Tgas<12400.0) { k[1160] = 9.21e-08 * pow(Tgas/300.0, + -0.79) * exp(-17.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[1161] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1161] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1162] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1162] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1163] = 1.55e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1163] = 1.55e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1164] = 1.55e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1164] = 1.55e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1165] = 4.72e-08 * pow(Tgas/300.0, - -0.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1165] = 4.72e-08 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[1166] = 3.77e-08 * pow(Tgas/300.0, - -0.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1166] = 3.77e-08 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[1167] = 8.49e-07 * pow(Tgas/300.0, - -0.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1167] = 8.49e-07 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[1168] = 4.3e-07 * pow(Tgas/300.0, - -0.37) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1168] = 4.3e-07 * pow(Tgas/300.0, + -0.37); } - if (Tgas>5.0 && Tgas<41000.0) { k[1169] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1169] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1170] = 1.6e-07 * pow(Tgas/300.0, - -0.06) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1170] = 1.6e-07 * pow(Tgas/300.0, + -0.06); } - if (Tgas>5.0 && Tgas<41000.0) { k[1171] = 1.2e-07 * pow(Tgas/300.0, - -0.06) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1171] = 1.2e-07 * pow(Tgas/300.0, + -0.06); } - if (Tgas>5.0 && Tgas<41000.0) { k[1172] = 5.34e-08 * pow(Tgas/300.0, - -0.06) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1172] = 5.34e-08 * pow(Tgas/300.0, + -0.06); } - if (Tgas>5.0 && Tgas<41000.0) { k[1173] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1173] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1174] = 1.95e-07 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1174] = 1.95e-07 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[1175] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1175] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1176] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1176] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1177] = 1.05e-08 * pow(Tgas/300.0, - -0.62) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1177] = 1.05e-08 * pow(Tgas/300.0, + -0.62); } - if (Tgas>5.0 && Tgas<41000.0) { k[1178] = 4.9e-08 * pow(Tgas/300.0, - -0.62) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1178] = 4.9e-08 * pow(Tgas/300.0, + -0.62); } - if (Tgas>5.0 && Tgas<41000.0) { k[1179] = 2.91e-07 * pow(Tgas/300.0, - -0.62) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1179] = 2.91e-07 * pow(Tgas/300.0, + -0.62); } - if (Tgas>5.0 && Tgas<41000.0) { k[1180] = 3.75e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1180] = 3.75e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1181] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1181] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1182] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1182] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1183] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1183] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1184] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1184] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1185] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1185] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1186] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1186] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1187] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1187] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1188] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1188] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1189] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1189] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1190] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1190] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1191] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1191] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1192] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1192] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1193] = 7.5e-08 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1193] = 7.5e-08; } - if (Tgas>5.0 && Tgas<41000.0) { k[1194] = 7.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1194] = 7.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1195] = 7.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1195] = 7.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1196] = 7.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1196] = 7.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1197] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1197] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1198] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1198] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1199] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1199] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1200] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1200] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1201] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1201] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1202] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1202] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1203] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1203] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1204] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1204] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1205] = 1e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1205] = 1e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1206] = 5.36e-08 * pow(Tgas/300.0, - -0.64) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1206] = 5.36e-08 * pow(Tgas/300.0, + -0.64); } - if (Tgas>5.0 && Tgas<41000.0) { k[1207] = 5.23e-07 * pow(Tgas/300.0, - -0.64) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1207] = 5.23e-07 * pow(Tgas/300.0, + -0.64); } - if (Tgas>5.0 && Tgas<41000.0) { k[1208] = 9.38e-08 * pow(Tgas/300.0, - -0.64) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1208] = 9.38e-08 * pow(Tgas/300.0, + -0.64); } - if (Tgas>5.0 && Tgas<41000.0) { k[1209] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1209] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1210] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1210] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1211] = 1.8e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1211] = 1.8e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1212] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1212] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1213] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1213] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1214] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1214] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1215] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1215] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1216] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1216] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1217] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1217] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1218] = 1.8e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1218] = 1.8e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1219] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1219] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1220] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1220] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1221] = 1.79e-07 * pow(Tgas/300.0, - -0.52) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1221] = 1.79e-07 * pow(Tgas/300.0, + -0.52); } - if (Tgas>5.0 && Tgas<41000.0) { k[1222] = 2.81e-07 * pow(Tgas/300.0, - -0.52) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1222] = 2.81e-07 * pow(Tgas/300.0, + -0.52); } - if (Tgas>5.0 && Tgas<41000.0) { k[1223] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1223] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1224] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1224] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1225] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1225] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1226] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1226] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1227] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1227] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1228] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1228] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1229] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1229] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1230] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1230] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1231] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1231] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1232] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1232] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1233] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1233] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1234] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1234] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1235] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1235] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1236] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1236] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1237] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1237] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1238] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1238] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1239] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1239] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1240] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1240] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1241] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1241] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1242] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1242] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1243] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1243] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1244] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1244] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1245] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1245] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1246] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1246] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1247] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1247] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1248] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1248] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1249] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1249] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1250] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1250] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1251] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1251] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1252] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1252] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1253] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1253] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1254] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1254] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1255] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1255] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1256] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1256] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1257] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1257] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1258] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1258] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1259] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1259] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1260] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1260] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1261] = 3e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1261] = 3e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1262] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1262] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1263] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1263] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1264] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1264] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1265] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1265] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1266] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1266] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1267] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1267] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1268] = 1.5e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1268] = 1.5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1269] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1269] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1270] = 2.7e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1270] = 2.7e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1271] = 3e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1271] = 3e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1272] = 1.43e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1272] = 1.43e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1273] = 1.43e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1273] = 1.43e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1274] = 1.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1274] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1275] = 9e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1275] = 9e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1276] = 9e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1276] = 9e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1277] = 9e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1277] = 9e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1278] = 1.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1278] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1279] = 1.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1279] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1280] = 3e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1280] = 3e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1281] = 2.4e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1281] = 2.4e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1282] = 1.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1282] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1283] = 1.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1283] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1284] = 6.75e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1284] = 6.75e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1285] = 6.75e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1285] = 6.75e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1286] = 6.75e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1286] = 6.75e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1287] = 6.75e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1287] = 6.75e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1288] = 1.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1288] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1289] = 1.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1289] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1290] = 5.4e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1290] = 5.4e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1291] = 5.4e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1291] = 5.4e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1292] = 5.4e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1292] = 5.4e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1293] = 5.4e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1293] = 5.4e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1294] = 5.4e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1294] = 5.4e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1295] = 1.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1295] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1296] = 1.5e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1296] = 1.5e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1297] = 2.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1297] = 2.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1298] = 4.75e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1298] = 4.75e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1299] = 2.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1299] = 2.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1300] = 1.78e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1300] = 1.78e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1301] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1301] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1302] = 8.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1302] = 8.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1303] = 8.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1303] = 8.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1304] = 3.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1304] = 3.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1305] = 1.02e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1305] = 1.02e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1306] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1306] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1307] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1307] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1308] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1308] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1309] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1309] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1310] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1310] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1311] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1311] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1312] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1312] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1313] = 3.33e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1313] = 3.33e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1314] = 3.33e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1314] = 3.33e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1315] = 1e-11 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1315] = 1e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1316] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1316] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1317] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1317] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1318] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1318] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1319] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1319] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1320] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1320] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1321] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1321] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1322] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1322] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1323] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1323] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1324] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1324] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1325] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1325] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1326] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1326] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1327] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1327] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1328] = 1.44e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1328] = 1.44e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1329] = 4.08e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1329] = 4.08e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1330] = 2.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1330] = 2.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1331] = 2e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1331] = 2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1332] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1332] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1333] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1333] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1334] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1334] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1335] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1335] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1336] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1336] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1337] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1337] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1338] = 2.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1338] = 2.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1339] = 4.98e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1339] = 4.98e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1340] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1340] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1341] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1341] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1342] = 5.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1342] = 5.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1343] = 2.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1343] = 2.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1344] = 3.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1344] = 3.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1345] = 5.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1345] = 5.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1346] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1346] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1347] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1347] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1348] = 9.84e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1348] = 9.84e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1349] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1349] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1350] = 1.19e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1350] = 1.19e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1351] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1351] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1352] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1352] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1353] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1353] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1354] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1354] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1355] = 5e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1355] = 5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1356] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1356] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1357] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1357] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1358] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1358] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1359] = 5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1359] = 5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1360] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1360] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1361] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1361] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1362] = 5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1362] = 5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1363] = 1.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1363] = 1.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1364] = 1.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1364] = 1.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1365] = 5.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1365] = 5.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1366] = 3.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1366] = 3.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1367] = 8.25e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1367] = 8.25e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1368] = 4.95e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1368] = 4.95e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1369] = 1.16e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1369] = 1.16e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1370] = 2.31e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1370] = 2.31e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1371] = 1.65e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1371] = 1.65e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1372] = 7.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1372] = 7.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1373] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1373] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1374] = 6e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1374] = 6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1375] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1375] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1376] = 4e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1376] = 4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1377] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1377] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1378] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1378] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1379] = 5.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1379] = 5.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1380] = 4.15e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1380] = 4.15e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1381] = 5.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1381] = 5.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1382] = 2.08e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1382] = 2.08e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1383] = 3.89e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1383] = 3.89e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1384] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1384] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1385] = 3.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1385] = 3.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1386] = 8.98e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1386] = 8.98e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1387] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1387] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1388] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1388] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1389] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1389] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1390] = 2.34e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1390] = 2.34e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1391] = 7.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1391] = 7.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1392] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1392] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1393] = 9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1393] = 9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1394] = 2.09e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1394] = 2.09e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1395] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1395] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1396] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1396] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1397] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1397] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1398] = 1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1398] = 1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1399] = 2.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1399] = 2.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1400] = 3.25e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1400] = 3.25e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1401] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1401] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1402] = 1.45e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1402] = 1.45e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1403] = 1.45e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1403] = 1.45e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1404] = 6e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1404] = 6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1405] = 6e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1405] = 6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1406] = 6e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1406] = 6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1407] = 3.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1407] = 3.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1408] = 4.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1408] = 4.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1409] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1409] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1410] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1410] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1411] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1411] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1412] = 7.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1412] = 7.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1413] = 3.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1413] = 3.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1414] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1414] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1415] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1415] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1416] = 9.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1416] = 9.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1417] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1417] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1418] = 1.61e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1418] = 1.61e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1419] = 1.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1419] = 1.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1420] = 7.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1420] = 7.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1421] = 7.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1421] = 7.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1422] = 3.42e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1422] = 3.42e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1423] = 4.54e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1423] = 4.54e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1424] = 3.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1424] = 3.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1425] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1425] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1426] = 7.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1426] = 7.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1427] = 2.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1427] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1428] = 2.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1428] = 2.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1429] = 2.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1429] = 2.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1430] = 2.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1430] = 2.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1431] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1431] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1432] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1432] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1433] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1433] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1434] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1434] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1435] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1435] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1436] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1436] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1437] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1437] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1438] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1438] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1439] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1439] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1440] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1440] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1441] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1441] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1442] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1442] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1443] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1443] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1444] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1444] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1445] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1445] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1446] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1446] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1447] = 5.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1447] = 5.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1448] = 2.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1448] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1449] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1449] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1450] = 4e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1450] = 4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1451] = 8.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1451] = 8.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1452] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1452] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1453] = 2.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1453] = 2.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1454] = 3.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1454] = 3.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1455] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1455] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1456] = 5.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1456] = 5.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1457] = 8.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1457] = 8.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1458] = 8.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1458] = 8.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1459] = 8.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1459] = 8.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1460] = 8.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1460] = 8.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1461] = 8.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1461] = 8.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1462] = 4.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1462] = 4.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1463] = 8.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1463] = 8.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1464] = 8.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1464] = 8.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1465] = 7.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1465] = 7.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1466] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1466] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1467] = 9.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1467] = 9.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1468] = 9.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1468] = 9.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1469] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1469] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1470] = 7.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1470] = 7.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1471] = 4.56e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1471] = 4.56e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1472] = 1.41e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1472] = 1.41e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1473] = 1.18e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1473] = 1.18e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1474] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1474] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1475] = 1.35e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1475] = 1.35e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1476] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1476] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1477] = 7.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1477] = 7.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1478] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1478] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1479] = 4.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1479] = 4.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1480] = 9.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1480] = 9.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1481] = 3.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1481] = 3.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1482] = 3.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1482] = 3.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1483] = 3.17e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1483] = 3.17e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1484] = 6.62e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1484] = 6.62e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1485] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1485] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1486] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1486] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1487] = 1.75e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1487] = 1.75e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1488] = 1.75e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1488] = 1.75e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1489] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1489] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1490] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1490] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1491] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1491] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1492] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1492] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1493] = 1.75e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1493] = 1.75e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1494] = 1.75e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1494] = 1.75e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1495] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1495] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1496] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1496] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1497] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1497] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1498] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1498] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1499] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1499] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1500] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1500] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1501] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1501] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1502] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1502] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1503] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1503] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1504] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1504] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1505] = 5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1505] = 5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1506] = 5e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1506] = 5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1507] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1507] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1508] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1508] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1509] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1509] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1510] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1510] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1511] = 2.48e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1511] = 2.48e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1512] = 7.45e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1512] = 7.45e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1513] = 1.06e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1513] = 1.06e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1514] = 1.06e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1514] = 1.06e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1515] = 8.36e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1515] = 8.36e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1516] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1516] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1517] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1517] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1518] = 4.6e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1518] = 4.6e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1519] = 4.6e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1519] = 4.6e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1520] = 1e-17 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1520] = 1e-17; } - if (Tgas>5.0 && Tgas<41000.0) { k[1521] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1521] = 1.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1522] = 1.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1522] = 1.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1523] = 2.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1523] = 2.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1524] = 3.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1524] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1525] = 2.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1525] = 2.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1526] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1526] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1527] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1527] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1528] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1528] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1529] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1529] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1530] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1530] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1531] = 6.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1531] = 6.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1532] = 4.4e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1532] = 4.4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1533] = 1.65e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1533] = 1.65e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1534] = 7.26e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1534] = 7.26e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1535] = 7.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1535] = 7.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1536] = 6.45e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1536] = 6.45e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1537] = 1.93e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1537] = 1.93e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1538] = 6.84e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1538] = 6.84e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1539] = 1.22e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1539] = 1.22e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1540] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1540] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1541] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1541] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1542] = 5.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1542] = 5.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1543] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1543] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1544] = 8.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1544] = 8.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1545] = 5.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1545] = 5.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1546] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1546] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1547] = 4.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1547] = 4.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1548] = 3.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1548] = 3.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1549] = 1.92e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1549] = 1.92e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1550] = 1.41e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1550] = 1.41e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1551] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1551] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1552] = 7e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1552] = 7e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[1553] = 1.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1553] = 1.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1554] = 9e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1554] = 9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1555] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1555] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1556] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1556] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1557] = 5.32e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1557] = 5.32e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1558] = 8.68e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1558] = 8.68e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1559] = 5.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1559] = 5.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1560] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1560] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1561] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1561] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1562] = 2.47e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1562] = 2.47e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1563] = 9.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1563] = 9.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1564] = 1.43e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1564] = 1.43e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1565] = 5.12e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1565] = 5.12e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1566] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1566] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1567] = 1.37e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1567] = 1.37e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1568] = 1.41e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1568] = 1.41e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1569] = 1.24e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1569] = 1.24e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1570] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1570] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1571] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1571] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1572] = 5.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1572] = 5.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1573] = 9.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1573] = 9.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1574] = 2.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1574] = 2.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1575] = 5.16e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1575] = 5.16e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1576] = 2e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1576] = 2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1577] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1577] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1578] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1578] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1579] = 8.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1579] = 8.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1580] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1580] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1581] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1581] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1582] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1582] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1583] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1583] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1584] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1584] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1585] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1585] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1586] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1586] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1587] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1587] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1588] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1588] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1589] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1589] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1590] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1590] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1591] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1591] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1592] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1592] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1593] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1593] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1594] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1594] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1595] = 3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1595] = 3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1596] = 3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1596] = 3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1597] = 3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1597] = 3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1598] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1598] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1599] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1599] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1600] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1600] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1601] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1601] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1602] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1602] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1603] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1603] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1604] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1604] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1605] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1605] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1606] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1606] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1607] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1607] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1608] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1608] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1609] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1609] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1610] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1610] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1611] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1611] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1612] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1612] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1613] = 2.91e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1613] = 2.91e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1614] = 2.48e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1614] = 2.48e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1615] = 8.06e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1615] = 8.06e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1616] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1616] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1617] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1617] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1618] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1618] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1619] = 8.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1619] = 8.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1620] = 3.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1620] = 3.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1621] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1621] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1622] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1622] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1623] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1623] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1624] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1624] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1625] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1625] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1626] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1626] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1627] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1627] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1628] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1628] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1629] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1629] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1630] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1630] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1631] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1631] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1632] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1632] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1633] = 3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1633] = 3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1634] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1634] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1635] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1635] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1636] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1636] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1637] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1637] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1638] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1638] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1639] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1639] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1640] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1640] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1641] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1641] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1642] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1642] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1643] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1643] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1644] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1644] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1645] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1645] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1646] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1646] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1647] = 7.11e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1647] = 7.11e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1648] = 7.9e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1648] = 7.9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1649] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1649] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1650] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1650] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1651] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1651] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1652] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1652] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1653] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1653] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1654] = 2.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1654] = 2.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1655] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1655] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1656] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1656] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1657] = 2.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1657] = 2.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1658] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1658] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1659] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1659] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1660] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1660] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1661] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1661] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1662] = 2.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1662] = 2.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1663] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1663] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1664] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1664] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1665] = 2.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1665] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1666] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1666] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1667] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1667] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1668] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1668] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1669] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1669] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1670] = 5.15e-13 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1670] = 5.15e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[1671] = 4.64e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1671] = 4.64e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[1672] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1672] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1673] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1673] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1674] = 7.42e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1674] = 7.42e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1675] = 3.29e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1675] = 3.29e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1676] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1676] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1677] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1677] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1678] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1678] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1679] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1679] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1680] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1680] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1681] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1681] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1682] = 1.96e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1682] = 1.96e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1683] = 6.16e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1683] = 6.16e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1684] = 5.04e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1684] = 5.04e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1685] = 3.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1685] = 3.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1686] = 1.35e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1686] = 1.35e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1687] = 2.34e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1687] = 2.34e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1688] = 1.35e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1688] = 1.35e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1689] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1689] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1690] = 9e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1690] = 9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1691] = 6.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1691] = 6.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1692] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1692] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1693] = 1.1e-19 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1693] = 1.1e-19; } - if (Tgas>5.0 && Tgas<41000.0) { k[1694] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1694] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1695] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1695] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1696] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1696] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1697] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1697] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1698] = 5.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1698] = 5.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1699] = 2.72e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1699] = 2.72e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1700] = 4.59e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1700] = 4.59e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1701] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1701] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1702] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1702] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1703] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1703] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1704] = 8.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1704] = 8.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1705] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1705] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1706] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1706] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1707] = 1.34e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1707] = 1.34e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1708] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1708] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1709] = 5.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1709] = 5.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1710] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1710] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1711] = 8.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1711] = 8.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1712] = 3.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1712] = 3.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1713] = 1.06e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1713] = 1.06e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1714] = 1.44e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1714] = 1.44e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1715] = 9.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1715] = 9.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1716] = 2.38e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1716] = 2.38e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1717] = 6.18e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1717] = 6.18e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1718] = 2.24e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1718] = 2.24e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1719] = 3.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1719] = 3.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1720] = 3.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1720] = 3.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1721] = 6.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1721] = 6.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1722] = 3.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1722] = 3.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1723] = 2.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1723] = 2.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1724] = 1.62e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1724] = 1.62e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1725] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1725] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1726] = 3.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1726] = 3.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1727] = 3.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1727] = 3.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1728] = 3.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1728] = 3.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1729] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1729] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1730] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1730] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1731] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1731] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1732] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1732] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1733] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1733] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1734] = 6e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1734] = 6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1735] = 6e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1735] = 6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1736] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1736] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1737] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1737] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1738] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1738] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1739] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1739] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1740] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1740] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1741] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1741] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1742] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1742] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1743] = 3.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1743] = 3.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1744] = 7.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1744] = 7.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1745] = 7.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1745] = 7.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1746] = 7.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1746] = 7.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1747] = 7.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1747] = 7.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1748] = 7.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1748] = 7.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1749] = 7.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1749] = 7.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1750] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1750] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1751] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1751] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1752] = 3.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1752] = 3.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1753] = 2e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1753] = 2e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[1754] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1754] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1755] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1755] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1756] = 4.27e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1756] = 4.27e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1757] = 1.22e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1757] = 1.22e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1758] = 6.1e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1758] = 6.1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1759] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1759] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1760] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1760] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1761] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1761] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1762] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1762] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1763] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1763] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1764] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1764] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1765] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1765] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1766] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1766] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1767] = 3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1767] = 3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1768] = 3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1768] = 3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1769] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1769] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1770] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1770] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1771] = 5.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1771] = 5.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1772] = 1.96e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1772] = 1.96e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1773] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1773] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1774] = 1.26e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1774] = 1.26e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1775] = 2.94e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1775] = 2.94e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1776] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1776] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1777] = 1.17e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1777] = 1.17e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1778] = 1.56e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1778] = 1.56e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1779] = 5.33e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1779] = 5.33e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1780] = 2.34e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1780] = 2.34e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1781] = 2.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1781] = 2.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1782] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1782] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1783] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1783] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1784] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1784] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1785] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1785] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1786] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1786] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1787] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1787] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1788] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1788] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1789] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1789] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1790] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1790] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1791] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1791] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1792] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1792] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1793] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1793] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1794] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1794] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1795] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1795] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1796] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1796] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1797] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1797] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1798] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1798] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1799] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1799] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1800] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1800] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1801] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1801] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1802] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1802] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1803] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1803] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1804] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1804] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1805] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1805] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1806] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1806] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1807] = 1.06e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1807] = 1.06e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1808] = 5.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1808] = 5.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1809] = 7.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1809] = 7.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1810] = 9.68e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1810] = 9.68e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1811] = 1.98e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1811] = 1.98e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1812] = 8.8e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1812] = 8.8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1813] = 7.48e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1813] = 7.48e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1814] = 1.15e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1814] = 1.15e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1815] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1815] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1816] = 1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1816] = 1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1817] = 7.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1817] = 7.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1818] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1818] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1819] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1819] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1820] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1820] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1821] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1821] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1822] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1822] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1823] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1823] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1824] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1824] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1825] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1825] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1826] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1826] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1827] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1827] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1828] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1828] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1829] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1829] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1830] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1830] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1831] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1831] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1832] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1832] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1833] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1833] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1834] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1834] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1835] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1835] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1836] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1836] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1837] = 1.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1837] = 1.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1838] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1838] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1839] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1839] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1840] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1840] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1841] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1841] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1842] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1842] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1843] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1843] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1844] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1844] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1845] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1845] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1846] = 4.75e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1846] = 4.75e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1847] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1847] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1848] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1848] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1849] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1849] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1850] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1850] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1851] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1851] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1852] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1852] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1853] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1853] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1854] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1854] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1855] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1855] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1856] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1856] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1857] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1857] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1858] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1858] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1859] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1859] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1860] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1860] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1861] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1861] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1862] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1862] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1863] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1863] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1864] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1864] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1865] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1865] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1866] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1866] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1867] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1867] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1868] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1868] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1869] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1869] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1870] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1870] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1871] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1871] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1872] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1872] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1873] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1873] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1874] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1874] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1875] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1875] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1876] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1876] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1877] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1877] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1878] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1878] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1879] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1879] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1880] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1880] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1881] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1881] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1882] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1882] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1883] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1883] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1884] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1884] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1885] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1885] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1886] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1886] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1887] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1887] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1888] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1888] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1889] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1889] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1890] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1890] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1891] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1891] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1892] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1892] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1893] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1893] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1894] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1894] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1895] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1895] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1896] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1896] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1897] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1897] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1898] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1898] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1899] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1899] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1900] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1900] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1901] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1901] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1902] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1902] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1903] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1903] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1904] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1904] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1905] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1905] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1906] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1906] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1907] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1907] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1908] = 9.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1908] = 9.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1909] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1909] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1910] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1910] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1911] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1911] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1912] = 5.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1912] = 5.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1913] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1913] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1914] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1914] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1915] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1915] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1916] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1916] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1917] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1917] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1918] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1918] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1919] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1919] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1920] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1920] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1921] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1921] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1922] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1922] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1923] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1923] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1924] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1924] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1925] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1925] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1926] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1926] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1927] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1927] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1928] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1928] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1929] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1929] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1930] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1930] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1931] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1931] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1932] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1932] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1933] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1933] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1934] = 2.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1934] = 2.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1935] = 9.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1935] = 9.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1936] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1936] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1937] = 1.16e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1937] = 1.16e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1938] = 1.45e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1938] = 1.45e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1939] = 2.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1939] = 2.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1940] = 1.43e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1940] = 1.43e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1941] = 1.09e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1941] = 1.09e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1942] = 6.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1942] = 6.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1943] = 7.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1943] = 7.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1944] = 5.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1944] = 5.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1945] = 5.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1945] = 5.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1946] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1946] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1947] = 3.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1947] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1948] = 9.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1948] = 9.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1949] = 9.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1949] = 9.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1950] = 9.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1950] = 9.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1951] = 5.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1951] = 5.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1952] = 5.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1952] = 5.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1953] = 2.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1953] = 2.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1954] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1954] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1955] = 1.47e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1955] = 1.47e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1956] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1956] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1957] = 2.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1957] = 2.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1958] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1958] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1959] = 4.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1959] = 4.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1960] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1960] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1961] = 1.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1961] = 1.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1962] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1962] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1963] = 1.84e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1963] = 1.84e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1964] = 4.05e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1964] = 4.05e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1965] = 7.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1965] = 7.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1966] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1966] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1967] = 9.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1967] = 9.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1968] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1968] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[1969] = 3.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1969] = 3.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1970] = 1.05e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1970] = 1.05e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1971] = 8.55e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1971] = 8.55e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1972] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1972] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1973] = 4.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1973] = 4.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1974] = 4.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1974] = 4.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1975] = 9.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1975] = 9.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1976] = 8.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1976] = 8.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1977] = 3.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1977] = 3.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1978] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1978] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1979] = 1.65e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1979] = 1.65e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1980] = 3.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1980] = 3.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1981] = 2.81e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1981] = 2.81e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1982] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1982] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1983] = 1.84e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1983] = 1.84e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1984] = 2.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1984] = 2.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1985] = 2.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1985] = 2.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1986] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1986] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1987] = 4.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1987] = 4.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1988] = 1.54e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1988] = 1.54e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1989] = 1.26e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1989] = 1.26e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[1990] = 9.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1990] = 9.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1991] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1991] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1992] = 7.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1992] = 7.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1993] = 1.08e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1993] = 1.08e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1994] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1994] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[1995] = 4.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1995] = 4.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1996] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1996] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1997] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1997] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1998] = 8.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1998] = 8.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[1999] = 9.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[1999] = 9.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2000] = 9.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2000] = 9.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2001] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2001] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2002] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2002] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2003] = 4.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2003] = 4.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2004] = 9.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2004] = 9.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2005] = 8.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2005] = 8.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2006] = 4.35e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2006] = 4.35e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2007] = 4.35e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2007] = 4.35e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2008] = 8.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2008] = 8.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2009] = 8.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2009] = 8.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2010] = 8.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2010] = 8.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2011] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2011] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2012] = 4.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2012] = 4.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2013] = 9.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2013] = 9.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2014] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2014] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2015] = 8.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2015] = 8.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2016] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2016] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2017] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2017] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2018] = 8.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2018] = 8.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2019] = 8.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2019] = 8.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2020] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2020] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2021] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2021] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2022] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2022] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2023] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2023] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2024] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2024] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2025] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2025] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2026] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2026] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2027] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2027] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2028] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2028] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2029] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2029] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2030] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2030] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2031] = 1.06e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2031] = 1.06e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2032] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2032] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2033] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2033] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2034] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2034] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2035] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2035] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2036] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2036] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2037] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2037] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2038] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2038] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2039] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2039] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2040] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2040] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2041] = 9.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2041] = 9.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2042] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2042] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2043] = 1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2043] = 1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2044] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2044] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2045] = 3.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2045] = 3.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2046] = 5.24e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2046] = 5.24e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2047] = 4.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2047] = 4.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2048] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2048] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2049] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2049] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2050] = 2.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2050] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2051] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2051] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2052] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2052] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2053] = 2.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2053] = 2.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2054] = 3.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2054] = 3.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2055] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2055] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2056] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2056] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2057] = 2.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2057] = 2.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2058] = 3.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2058] = 3.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2059] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2059] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2060] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2060] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2061] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2061] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2062] = 1.48e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2062] = 1.48e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2063] = 1.57e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2063] = 1.57e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2064] = 1.04e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2064] = 1.04e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2065] = 1.65e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2065] = 1.65e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2066] = 3.03e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2066] = 3.03e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2067] = 1.98e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2067] = 1.98e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2068] = 6.66e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2068] = 6.66e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2069] = 1.04e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2069] = 1.04e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2070] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2070] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2071] = 2.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2071] = 2.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2072] = 3.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2072] = 3.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2073] = 2.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2073] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2074] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2074] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2075] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2075] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2076] = 2.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2076] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2077] = 1.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2077] = 1.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2078] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2078] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2079] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2079] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2080] = 1.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2080] = 1.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2081] = 1.27e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2081] = 1.27e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2082] = 4.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2082] = 4.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2083] = 5.72e-11 * pow(Tgas/300.0, - -2.25) * exp(-47.5/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2083] = 5.72e-11 * pow(Tgas/300.0, + -2.25) * exp(-47.5/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2084] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2084] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2085] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2085] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2086] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2086] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2087] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2087] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2088] = 3.04e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2088] = 3.04e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2089] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2089] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[2090] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2090] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2091] = 4e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2091] = 4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2092] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2092] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2093] = 7.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2093] = 7.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2094] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2094] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2095] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2095] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2096] = 9.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2096] = 9.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2097] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2097] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2098] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2098] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2099] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2099] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2100] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2100] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2101] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2101] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2102] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2102] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2103] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2103] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2104] = 3.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2104] = 3.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2105] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2105] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2106] = 1.26e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2106] = 1.26e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2107] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2107] = 1.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2108] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2108] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2109] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2109] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2110] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2110] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2111] = 8.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2111] = 8.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2112] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-1057.2/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2112] = 1.1e-09 * exp(-1057.2/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[2113] = 2.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2113] = 2.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2114] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2114] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2115] = 3.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2115] = 3.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2116] = 4.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2116] = 4.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2117] = 4.07e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2117] = 4.07e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2118] = 4e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2118] = 4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2119] = 4e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2119] = 4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2120] = 3.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2120] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2121] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2121] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2122] = 2.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2122] = 2.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2123] = 1.76e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2123] = 1.76e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2124] = 3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2124] = 3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2125] = 7.6e-11 * pow(Tgas/300.0, - -1.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2125] = 7.6e-11 * pow(Tgas/300.0, + -1.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[2126] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2126] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2127] = 2.29e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2127] = 2.29e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2128] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2128] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2129] = 5.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2129] = 5.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2130] = 1.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2130] = 1.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2131] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2131] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2132] = 7.83e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2132] = 7.83e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2133] = 1.23e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2133] = 1.23e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2134] = 1.51e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2134] = 1.51e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2135] = 4.23e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2135] = 4.23e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2136] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2136] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2137] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2137] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2138] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2138] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2139] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2139] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2140] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2140] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2141] = 1.98e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2141] = 1.98e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2142] = 2.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2142] = 2.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2143] = 1.16e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2143] = 1.16e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2144] = 1.15e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2144] = 1.15e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2145] = 9.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2145] = 9.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2146] = 2.38e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2146] = 2.38e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2147] = 1.82e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2147] = 1.82e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2148] = 1.96e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2148] = 1.96e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2149] = 5.74e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2149] = 5.74e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2150] = 2.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2150] = 2.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2151] = 3.74e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2151] = 3.74e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2152] = 1.32e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2152] = 1.32e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2153] = 3.74e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2153] = 3.74e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2154] = 1.76e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2154] = 1.76e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2155] = 6.64e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2155] = 6.64e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2156] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2156] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2157] = 2.38e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2157] = 2.38e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2158] = 3.61e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2158] = 3.61e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2159] = 3.52e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2159] = 3.52e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2160] = 7.83e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2160] = 7.83e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2161] = 8.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2161] = 8.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2162] = 5.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2162] = 5.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2163] = 8.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2163] = 8.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2164] = 1.56e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2164] = 1.56e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2165] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2165] = 1.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2166] = 3.74e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2166] = 3.74e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2167] = 1.09e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2167] = 1.09e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2168] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2168] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2169] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2169] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2170] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2170] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2171] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2171] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2172] = 1.43e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2172] = 1.43e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2173] = 1.71e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2173] = 1.71e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2174] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2174] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2175] = 2.85e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2175] = 2.85e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2176] = 2.64e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2176] = 2.64e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2177] = 3.61e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2177] = 3.61e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2178] = 9.68e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2178] = 9.68e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2179] = 1.58e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2179] = 1.58e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2180] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2180] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2181] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2181] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2182] = 2.32e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2182] = 2.32e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2183] = 1.22e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2183] = 1.22e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2184] = 2.26e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2184] = 2.26e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2185] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2185] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2186] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2186] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2187] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2187] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2188] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2188] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2189] = 5.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2189] = 5.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2190] = 4.55e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2190] = 4.55e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2191] = 5.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2191] = 5.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2192] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2192] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2193] = 1.65e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2193] = 1.65e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2194] = 9.35e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2194] = 9.35e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2195] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2195] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2196] = 8.3e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2196] = 8.3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2197] = 4.57e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2197] = 4.57e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2198] = 2.91e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2198] = 2.91e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2199] = 2.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2199] = 2.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2200] = 1.04e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2200] = 1.04e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2201] = 7.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2201] = 7.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2202] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2202] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2203] = 2.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2203] = 2.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2204] = 7e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2204] = 7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2205] = 9.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2205] = 9.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2206] = 8.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2206] = 8.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2207] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2207] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2208] = 3.8e-12 * pow(Tgas/300.0, - -1.8) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2208] = 3.8e-12 * pow(Tgas/300.0, + -1.8); } - if (Tgas>5.0 && Tgas<41000.0) { k[2209] = 1.95e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2209] = 1.95e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2210] = 1.31e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2210] = 1.31e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2211] = 9.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2211] = 9.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2212] = 1.05e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2212] = 1.05e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2213] = 5.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2213] = 5.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2214] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2214] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2215] = 3.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2215] = 3.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2216] = 2e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2216] = 2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2217] = 9.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2217] = 9.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2218] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2218] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2219] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2219] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2220] = 9e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2220] = 9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2221] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2221] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2222] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2222] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2223] = 3.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2223] = 3.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2224] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2224] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2225] = 4.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2225] = 4.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2226] = 3.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2226] = 3.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2227] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2227] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2228] = 4.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2228] = 4.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2229] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2229] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2230] = 8.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2230] = 8.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2231] = 2.06e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2231] = 2.06e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2232] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2232] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2233] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2233] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2234] = 9e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2234] = 9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2235] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2235] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2236] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2236] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2237] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2237] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2238] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2238] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2239] = 3.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2239] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2240] = 3.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2240] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2241] = 3.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2241] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2242] = 6.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2242] = 6.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2243] = 7.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2243] = 7.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2244] = 6.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2244] = 6.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2245] = 3.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2245] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2246] = 3.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2246] = 3.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2247] = 3.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2247] = 3.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2248] = 6.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2248] = 6.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2249] = 6.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2249] = 6.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2250] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2250] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2251] = 3.15e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2251] = 3.15e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2252] = 3.15e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2252] = 3.15e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2253] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2253] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2254] = 6.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2254] = 6.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2255] = 5.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2255] = 5.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2256] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2256] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2257] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2257] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2258] = 9.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2258] = 9.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2259] = 3.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2259] = 3.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2260] = 6.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2260] = 6.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2261] = 3.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2261] = 3.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2262] = 3.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2262] = 3.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2263] = 6.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2263] = 6.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2264] = 3.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2264] = 3.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2265] = 6.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2265] = 6.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2266] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2266] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2267] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2267] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2268] = 5.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2268] = 5.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2269] = 2.25e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2269] = 2.25e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2270] = 2.25e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2270] = 2.25e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2271] = 5.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2271] = 5.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2272] = 3.15e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2272] = 3.15e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2273] = 3.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2273] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2274] = 1.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2274] = 1.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2275] = 8.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2275] = 8.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2276] = 8.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2276] = 8.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2277] = 9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2277] = 9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2278] = 8.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2278] = 8.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2279] = 8.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2279] = 8.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2280] = 1.65e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2280] = 1.65e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2281] = 1.56e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2281] = 1.56e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2282] = 1.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2282] = 1.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2283] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2283] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2284] = 7.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2284] = 7.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2285] = 7.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2285] = 7.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2286] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2286] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2287] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2287] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2288] = 8.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2288] = 8.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2289] = 8.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2289] = 8.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2290] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2290] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2291] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2291] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2292] = 7.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2292] = 7.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2293] = 1.23e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2293] = 1.23e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2294] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2294] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2295] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2295] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2296] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2296] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2297] = 3e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2297] = 3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2298] = 1.65e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2298] = 1.65e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2299] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2299] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2300] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2300] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2301] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2301] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2302] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2302] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2303] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2303] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2304] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2304] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2305] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2305] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2306] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2306] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2307] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2307] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2308] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2308] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2309] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2309] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2310] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2310] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2311] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2311] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2312] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2312] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2313] = 3.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2313] = 3.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2314] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2314] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2315] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2315] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2316] = 7.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2316] = 7.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2317] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2317] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2318] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2318] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2319] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2319] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2320] = 8e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2320] = 8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2321] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2321] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2322] = 9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2322] = 9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2323] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2323] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2324] = 1e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2324] = 1e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2325] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2325] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2326] = 2.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2326] = 2.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2327] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2327] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2328] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2328] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2329] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2329] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2330] = 5.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2330] = 5.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2331] = 3.84e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2331] = 3.84e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2332] = 8.85e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2332] = 8.85e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2333] = 2.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2333] = 2.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2334] = 3.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2334] = 3.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2335] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2335] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2336] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2336] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2337] = 1.06e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2337] = 1.06e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2338] = 3.57e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2338] = 3.57e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2339] = 9.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2339] = 9.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2340] = 3.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2340] = 3.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2341] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2341] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2342] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2342] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2343] = 1.17e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2343] = 1.17e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2344] = 9.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2344] = 9.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2345] = 9.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2345] = 9.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2346] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2346] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2347] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2347] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2348] = 7.94e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2348] = 7.94e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2349] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2349] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2350] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2350] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2351] = 6.25e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2351] = 6.25e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2352] = 1.45e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2352] = 1.45e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2353] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2353] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2354] = 3.52e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2354] = 3.52e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2355] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2355] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2356] = 2.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2356] = 2.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2357] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2357] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2358] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2358] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2359] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2359] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2360] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2360] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2361] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2361] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2362] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2362] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2363] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2363] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2364] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2364] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2365] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2365] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2366] = 3.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2366] = 3.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2367] = 4.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2367] = 4.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2368] = 3.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2368] = 3.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2369] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2369] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2370] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2370] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2371] = 8.82e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2371] = 8.82e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2372] = 1.81e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2372] = 1.81e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2373] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2373] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2374] = 2.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2374] = 2.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2375] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2375] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2376] = 2.35e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2376] = 2.35e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2377] = 1.37e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2377] = 1.37e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2378] = 2.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2378] = 2.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2379] = 1.14e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2379] = 1.14e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2380] = 7.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2380] = 7.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2381] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2381] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2382] = 2.35e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2382] = 2.35e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2383] = 2.16e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2383] = 2.16e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2384] = 2.08e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2384] = 2.08e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2385] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2385] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2386] = 3.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2386] = 3.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2387] = 8.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2387] = 8.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2388] = 7.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2388] = 7.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2389] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2389] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2390] = 1.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2390] = 1.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2391] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2391] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2392] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2392] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2393] = 7.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2393] = 7.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2394] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2394] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2395] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2395] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2396] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2396] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2397] = 7.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2397] = 7.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2398] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-4640.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2398] = 1e-10 * exp(-4640.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2399] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2399] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2400] = 1e-17 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2400] = 1e-17; } - if (Tgas>5.0 && Tgas<41000.0) { k[2401] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2401] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2402] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2402] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2403] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2403] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2404] = 9e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2404] = 9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2405] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2405] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2406] = 2.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2406] = 2.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2407] = 5.2e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2407] = 5.2e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[2408] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-2000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2408] = 1.5e-09 * exp(-2000.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[2409] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2409] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2410] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2410] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2411] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2411] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2412] = 1.65e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2412] = 1.65e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2413] = 2.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2413] = 2.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2414] = 6.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2414] = 6.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2415] = 1e-17 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2415] = 1e-17; } - if (Tgas>5.0 && Tgas<41000.0) { k[2416] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2416] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2417] = 5.4e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2417] = 5.4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2418] = 1.3e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2418] = 1.3e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[2419] = 1.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2419] = 1.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2420] = 1e-17 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2420] = 1e-17; } - if (Tgas>5.0 && Tgas<41000.0) { k[2421] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2421] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2422] = 4.7e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2422] = 4.7e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[2423] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2423] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2424] = 4.1e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2424] = 4.1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2425] = 1e-17 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2425] = 1e-17; } - if (Tgas>5.0 && Tgas<41000.0) { k[2426] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2426] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2427] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2427] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2428] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2428] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2429] = 1.2e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2429] = 1.2e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[2430] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2430] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2431] = 5.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2431] = 5.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2432] = 4.89e-11 * pow(Tgas/300.0, - -0.14) * exp(+36.1/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2432] = 4.89e-11 * pow(Tgas/300.0, + -0.14) * exp(+36.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2433] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2433] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2434] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2434] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2435] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2435] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2436] = 9.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2436] = 9.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2437] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2437] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2438] = 4.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2438] = 4.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2439] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2439] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2440] = 3.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2440] = 3.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2441] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2441] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2442] = 6.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2442] = 6.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2443] = 6e-10 * pow(Tgas/300.0, 0.0) * - exp(-2900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2443] = 6e-10 * exp(-2900.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2444] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2444] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[2445] = 2e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2445] = 2e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[2446] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2446] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2447] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2447] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2448] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2448] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[2449] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2449] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[2450] = 9e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2450] = 9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2451] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2451] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2452] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2452] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2453] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2453] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2454] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2454] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2455] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2455] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2456] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-6380.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2456] = 2e-10 * exp(-6380.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2457] = 3.7e-14 * pow(Tgas/300.0, 0.0) - * exp(-35.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2457] = 3.7e-14 * exp(-35.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2458] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2458] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2459] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-85.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2459] = 1e-09 * exp(-85.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2460] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2460] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2461] = 2.25e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2461] = 2.25e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2462] = 1.28e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2462] = 1.28e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2463] = 2.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2463] = 2.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2464] = 3.09e-13 * pow(Tgas/300.0, - 1.08) * exp(+50.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2464] = 3.09e-13 * pow(Tgas/300.0, + 1.08) * exp(+50.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2465] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2465] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2466] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2466] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2467] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2467] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2468] = 6.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2468] = 6.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2469] = 1.01e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2469] = 1.01e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2470] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-9860.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2470] = 1.1e-10 * exp(-9860.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[2471] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2471] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2472] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2472] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2473] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2473] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2474] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2474] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2475] = 3.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2475] = 3.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2476] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2476] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2477] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2477] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2478] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2478] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2479] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2479] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2480] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2480] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2481] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2481] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2482] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2482] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2483] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2483] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2484] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2484] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2485] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2485] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2486] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2486] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2487] = 2.16e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2487] = 2.16e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2488] = 3.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2488] = 3.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2489] = 7.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2489] = 7.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2490] = 5.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2490] = 5.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2491] = 1.7e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2491] = 1.7e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2492] = 5.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2492] = 5.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2493] = 2e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2493] = 2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2494] = 2.1e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2494] = 2.1e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2495] = 2.1e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2495] = 2.1e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2496] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2496] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2497] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2497] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2498] = 2.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2498] = 2.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2499] = 9.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2499] = 9.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2500] = 3.35e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2500] = 3.35e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2501] = 3.35e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2501] = 3.35e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2502] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2502] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2503] = 4.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2503] = 4.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2504] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2504] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2505] = 1.92e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2505] = 1.92e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2506] = 1.33e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2506] = 1.33e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2507] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2507] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2508] = 6.62e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2508] = 6.62e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2509] = 2.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2509] = 2.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2510] = 7.74e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2510] = 7.74e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2511] = 5.4e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2511] = 5.4e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2512] = 2.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2512] = 2.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2513] = 2.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2513] = 2.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2514] = 2.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2514] = 2.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2515] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2515] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2516] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2516] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2517] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2517] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2518] = 2.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2518] = 2.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2519] = 4.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2519] = 4.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2520] = 4.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2520] = 4.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2521] = 8.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2521] = 8.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2522] = 2.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2522] = 2.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2523] = 1.11e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2523] = 1.11e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2524] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2524] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2525] = 8.5e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2525] = 8.5e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2526] = 2.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2526] = 2.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2527] = 2.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2527] = 2.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2528] = 1.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2528] = 1.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2529] = 2.25e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2529] = 2.25e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2530] = 2.48e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2530] = 2.48e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2531] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2531] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2532] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2532] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2533] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2533] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2534] = 2.95e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2534] = 2.95e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2535] = 4.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2535] = 4.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2536] = 1.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2536] = 1.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2537] = 1.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2537] = 1.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2538] = 6.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2538] = 6.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2539] = 1.63e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2539] = 1.63e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2540] = 8.84e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2540] = 8.84e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2541] = 7.56e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2541] = 7.56e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2542] = 2.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2542] = 2.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2543] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2543] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2544] = 8.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2544] = 8.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2545] = 2.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2545] = 2.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2546] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2546] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2547] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2547] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2548] = 2.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2548] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2549] = 2.1e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2549] = 2.1e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2550] = 2.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2550] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2551] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2551] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2552] = 3.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2552] = 3.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2553] = 3.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2553] = 3.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2554] = 7.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2554] = 7.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2555] = 2.13e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2555] = 2.13e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2556] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2556] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2557] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2557] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2558] = 2.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2558] = 2.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2559] = 2.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2559] = 2.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2560] = 5.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2560] = 5.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2561] = 8.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2561] = 8.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2562] = 4.95e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2562] = 4.95e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2563] = 5.5e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2563] = 5.5e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2564] = 2.04e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2564] = 2.04e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2565] = 7.44e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2565] = 7.44e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2566] = 2.52e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2566] = 2.52e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2567] = 3.28e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2567] = 3.28e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2568] = 1.62e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2568] = 1.62e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2569] = 2.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2569] = 2.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2570] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2570] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2571] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2571] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2572] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2572] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2573] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2573] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2574] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2574] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2575] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2575] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2576] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2576] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2577] = 8.4e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2577] = 8.4e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2578] = 7.56e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2578] = 7.56e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2579] = 2.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2579] = 2.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2580] = 2.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2580] = 2.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2581] = 4.55e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2581] = 4.55e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2582] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2582] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2583] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2583] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2584] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2584] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2585] = 2e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2585] = 2e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2586] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2586] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2587] = 3.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2587] = 3.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2588] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2588] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2589] = 1.15e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2589] = 1.15e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2590] = 1.15e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2590] = 1.15e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2591] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2591] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2592] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2592] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2593] = 2.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2593] = 2.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2594] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2594] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2595] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2595] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2596] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2596] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2597] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2597] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2598] = 9e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2598] = 9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2599] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2599] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2600] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2600] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2601] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2601] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2602] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2602] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2603] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2603] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2604] = 9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2604] = 9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2605] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2605] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2606] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2606] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2607] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2607] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2608] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2608] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2609] = 2.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2609] = 2.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2610] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2610] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2611] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2611] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2612] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2612] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2613] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2613] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2614] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2614] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2615] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2615] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2616] = 8e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2616] = 8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2617] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2617] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2618] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2618] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2619] = 3.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2619] = 3.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2620] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2620] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2621] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2621] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2622] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2622] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2623] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2623] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2624] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2624] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2625] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2625] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2626] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2626] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2627] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2627] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2628] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2628] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2629] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2629] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2630] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2630] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2631] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2631] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2632] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2632] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2633] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2633] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2634] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2634] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2635] = 2.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2635] = 2.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2636] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2636] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2637] = 9.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2637] = 9.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2638] = 3.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2638] = 3.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2639] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2639] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2640] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2640] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2641] = 2.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2641] = 2.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2642] = 9e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2642] = 9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2643] = 2.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2643] = 2.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2644] = 9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2644] = 9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2645] = 2.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2645] = 2.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2646] = 1e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2646] = 1e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2647] = 2.25e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2647] = 2.25e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2648] = 2.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2648] = 2.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2649] = 9e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2649] = 9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2650] = 2.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2650] = 2.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2651] = 8.97e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2651] = 8.97e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2652] = 7.59e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2652] = 7.59e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2653] = 1.45e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2653] = 1.45e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2654] = 1.52e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2654] = 1.52e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2655] = 4.14e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2655] = 4.14e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2656] = 8.28e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2656] = 8.28e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2657] = 1.04e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2657] = 1.04e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2658] = 1.05e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2658] = 1.05e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2659] = 1.16e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2659] = 1.16e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2660] = 6.61e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2660] = 6.61e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2661] = 1.69e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2661] = 1.69e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2662] = 1.08e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2662] = 1.08e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2663] = 2.31e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2663] = 2.31e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2664] = 2.31e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2664] = 2.31e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2665] = 2.62e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2665] = 2.62e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2666] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2666] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2667] = 3.71e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2667] = 3.71e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2668] = 8.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2668] = 8.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2669] = 2.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2669] = 2.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2670] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2670] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2671] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2671] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2672] = 1.64e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2672] = 1.64e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2673] = 1.64e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2673] = 1.64e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2674] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2674] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2675] = 1.36e-09 * pow(Tgas/300.0, - -0.14) * exp(+3.4/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2675] = 1.36e-09 * pow(Tgas/300.0, + -0.14) * exp(+3.4/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2676] = 8.49e-10 * pow(Tgas/300.0, - 0.07) * exp(-5.2/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2676] = 8.49e-10 * pow(Tgas/300.0, + 0.07) * exp(-5.2/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2677] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2677] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2678] = 2.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2678] = 2.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2679] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2679] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2680] = 4.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2680] = 4.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2681] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2681] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2682] = 6.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2682] = 6.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2683] = 2.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2683] = 2.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2684] = 5.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2684] = 5.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2685] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2685] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2686] = 3.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2686] = 3.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2687] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2687] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2688] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2688] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2689] = 9.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2689] = 9.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2690] = 2.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2690] = 2.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2691] = 8e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2691] = 8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2692] = 9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2692] = 9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2693] = 1e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2693] = 1e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2694] = 8.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2694] = 8.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2695] = 6.92e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2695] = 6.92e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2696] = 6.92e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2696] = 6.92e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2697] = 1.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2697] = 1.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2698] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2698] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2699] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2699] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2700] = 4.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2700] = 4.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2701] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2701] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2702] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2702] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2703] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2703] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2704] = 3.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2704] = 3.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2705] = 1.2e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2705] = 1.2e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2706] = 8.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2706] = 8.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2707] = 3.69e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2707] = 3.69e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2708] = 3.69e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2708] = 3.69e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2709] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2709] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2710] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2710] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2711] = 8.54e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2711] = 8.54e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2712] = 8.54e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2712] = 8.54e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2713] = 8.54e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2713] = 8.54e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2714] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2714] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2715] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2715] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2716] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2716] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2717] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2717] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2718] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2718] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2719] = 2.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2719] = 2.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2720] = 2.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2720] = 2.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2721] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2721] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2722] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2722] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2723] = 4.39e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2723] = 4.39e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2724] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2724] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2725] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2725] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2726] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2726] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2727] = 2.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2727] = 2.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2728] = 2.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2728] = 2.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2729] = 9.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-100.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2729] = 9.3e-10 * exp(-100.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2730] = 3.42e-10 * pow(Tgas/300.0, - -0.16) * exp(-1.4/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2730] = 3.42e-10 * pow(Tgas/300.0, + -0.16) * exp(-1.4/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2731] = 7.98e-10 * pow(Tgas/300.0, - -0.16) * exp(-1.4/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2731] = 7.98e-10 * pow(Tgas/300.0, + -0.16) * exp(-1.4/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2732] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2732] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2733] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2733] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2734] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2734] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2735] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2735] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2736] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2736] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2737] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2737] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2738] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2738] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2739] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2739] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2740] = 2.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2740] = 2.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2741] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2741] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2742] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2742] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2743] = 3.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2743] = 3.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2744] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2744] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2745] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2745] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2746] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2746] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2747] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2747] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2748] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2748] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2749] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2749] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2750] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2750] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2751] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2751] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2752] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2752] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2753] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2753] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2754] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2754] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2755] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2755] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2756] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2756] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2757] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2757] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2758] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2758] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2759] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2759] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2760] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2760] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2761] = 8.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2761] = 8.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2762] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2762] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2763] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2763] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2764] = 9.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2764] = 9.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2765] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2765] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2766] = 9.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2766] = 9.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2767] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2767] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2768] = 2.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2768] = 2.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2769] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2769] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2770] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2770] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2771] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2771] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2772] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2772] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2773] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2773] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2774] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2774] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2775] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2775] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2776] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2776] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2777] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2777] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2778] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2778] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2779] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2779] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2780] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2780] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2781] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2781] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2782] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2782] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2783] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2783] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2784] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2784] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2785] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2785] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2786] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2786] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2787] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2787] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2788] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2788] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2789] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2789] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2790] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2790] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2791] = 3.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2791] = 3.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2792] = 4.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2792] = 4.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2793] = 3.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2793] = 3.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2794] = 2.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2794] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2795] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2795] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2796] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2796] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2797] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2797] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2798] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2798] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2799] = 3.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2799] = 3.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2800] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2800] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2801] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2801] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2802] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2802] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2803] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2803] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2804] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2804] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2805] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2805] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2806] = 3.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2806] = 3.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2807] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2807] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2808] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2808] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2809] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2809] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2810] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2810] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2811] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2811] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2812] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2812] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2813] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2813] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2814] = 3.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2814] = 3.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2815] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2815] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2816] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2816] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2817] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2817] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2818] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2818] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2819] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2819] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2820] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2820] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2821] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2821] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2822] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2822] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2823] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2823] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2824] = 9.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2824] = 9.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2825] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2825] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2826] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2826] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2827] = 6.8e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2827] = 6.8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2828] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2828] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2829] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2829] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2830] = 6.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2830] = 6.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2831] = 6e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2831] = 6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2832] = 2.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2832] = 2.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2833] = 3.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2833] = 3.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2834] = 7.35e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2834] = 7.35e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2835] = 9.06e-10 * pow(Tgas/300.0, - -0.37) * exp(-29.1/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2835] = 9.06e-10 * pow(Tgas/300.0, + -0.37) * exp(-29.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2836] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-7080.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2836] = 1e-09 * exp(-7080.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2837] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-10560.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2837] = 7e-10 * exp(-10560.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[2838] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2838] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2839] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2839] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2840] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2840] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2841] = 2.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2841] = 2.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2842] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2842] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2843] = 6e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2843] = 6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[2844] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2844] = 1.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2845] = 9.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2845] = 9.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2846] = 1.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2846] = 1.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2847] = 4.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2847] = 4.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2848] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2848] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2849] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2849] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2850] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2850] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2851] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2851] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2852] = 6e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2852] = 6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2853] = 2.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2853] = 2.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2854] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2854] = 1.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2855] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2855] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2856] = 1.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2856] = 1.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2857] = 3.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2857] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2858] = 3.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2858] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2859] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2859] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2860] = 5.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2860] = 5.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2861] = 2.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2861] = 2.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2862] = 2.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2862] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2863] = 2.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2863] = 2.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2864] = 1.98e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2864] = 1.98e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2865] = 5.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2865] = 5.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2866] = 2.03e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2866] = 2.03e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2867] = 2.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2867] = 2.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2868] = 1.04e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2868] = 1.04e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2869] = 9.45e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2869] = 9.45e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2870] = 1.23e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2870] = 1.23e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2871] = 3.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2871] = 3.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2872] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2872] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2873] = 2.3e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2873] = 2.3e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2874] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2874] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2875] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2875] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2876] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2876] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2877] = 3.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2877] = 3.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2878] = 9.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2878] = 9.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2879] = 8.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2879] = 8.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2880] = 6.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2880] = 6.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2881] = 3.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2881] = 3.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2882] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2882] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2883] = 9.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2883] = 9.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2884] = 3.06e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2884] = 3.06e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2885] = 1.4e-12 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2885] = 1.4e-12 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2886] = 2.25e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2886] = 2.25e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2887] = 2.25e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2887] = 2.25e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2888] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2888] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2889] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2889] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2890] = 1.05e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2890] = 1.05e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2891] = 1.05e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2891] = 1.05e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2892] = 1.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2892] = 1.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2893] = 1.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2893] = 1.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2894] = 1.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2894] = 1.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2895] = 1.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2895] = 1.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2896] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2896] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2897] = 1.51e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2897] = 1.51e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2898] = 1.51e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2898] = 1.51e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2899] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2899] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2900] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2900] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2901] = 1.4e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2901] = 1.4e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2902] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2902] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2903] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2903] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2904] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2904] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2905] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2905] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2906] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2906] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2907] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2907] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2908] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2908] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2909] = 3.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2909] = 3.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2910] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2910] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2911] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2911] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2912] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2912] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2913] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2913] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2914] = 9e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2914] = 9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2915] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2915] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2916] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2916] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2917] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2917] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2918] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2918] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2919] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2919] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2920] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2920] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2921] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2921] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2922] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2922] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2923] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2923] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2924] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2924] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2925] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2925] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2926] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2926] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2927] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2927] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2928] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2928] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2929] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2929] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2930] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2930] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2931] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2931] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2932] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2932] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2933] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2933] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2934] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2934] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2935] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2935] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2936] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2936] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2937] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2937] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2938] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2938] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2939] = 3.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2939] = 3.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2940] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2940] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2941] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2941] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2942] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2942] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2943] = 4e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2943] = 4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2944] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2944] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2945] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2945] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2946] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2946] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2947] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2947] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2948] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2948] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2949] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2949] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2950] = 3.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2950] = 3.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2951] = 4.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2951] = 4.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2952] = 2.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2952] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2953] = 2.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2953] = 2.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2954] = 2.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2954] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2955] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2955] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2956] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2956] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2957] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2957] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2958] = 3.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2958] = 3.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2959] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2959] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2960] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2960] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2961] = 1.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2961] = 1.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2962] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2962] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2963] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2963] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2964] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2964] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2965] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2965] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2966] = 8e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2966] = 8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2967] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2967] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2968] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2968] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2969] = 7.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2969] = 7.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2970] = 2.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2970] = 2.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2971] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2971] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2972] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2972] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2973] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2973] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2974] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2974] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2975] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2975] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2976] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2976] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2977] = 8.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2977] = 8.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2978] = 3.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2978] = 3.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2979] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2979] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2980] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2980] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2981] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2981] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2982] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2982] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2983] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2983] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2984] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2984] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2985] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2985] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2986] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2986] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2987] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2987] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2988] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2988] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2989] = 3.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2989] = 3.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[2990] = 7.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2990] = 7.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2991] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2991] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2992] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2992] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2993] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2993] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2994] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2994] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2995] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2995] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2996] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2996] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2997] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2997] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[2998] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2998] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[2999] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[2999] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3000] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3000] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3001] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3001] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3002] = 8.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3002] = 8.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3003] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3003] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3004] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3004] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3005] = 7.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3005] = 7.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3006] = 3.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3006] = 3.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3007] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3007] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3008] = 7.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3008] = 7.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3009] = 7.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3009] = 7.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3010] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3010] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3011] = 7.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3011] = 7.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3012] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3012] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3013] = 8.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3013] = 8.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3014] = 2.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3014] = 2.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3015] = 5.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3015] = 5.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3016] = 1.55e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3016] = 1.55e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3017] = 1.55e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3017] = 1.55e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3018] = 1.55e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3018] = 1.55e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3019] = 1.55e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3019] = 1.55e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3020] = 2.84e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3020] = 2.84e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3021] = 3.23e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3021] = 3.23e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3022] = 3.23e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3022] = 3.23e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3023] = 3.23e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3023] = 3.23e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3024] = 3.23e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3024] = 3.23e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3025] = 3.23e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3025] = 3.23e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3026] = 3.23e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3026] = 3.23e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3027] = 1.14e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3027] = 1.14e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3028] = 5.19e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3028] = 5.19e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3029] = 4.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3029] = 4.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3030] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3030] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3031] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3031] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3032] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3032] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3033] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3033] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3034] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3034] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3035] = 4.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3035] = 4.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3036] = 2.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3036] = 2.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3037] = 2.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3037] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3038] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3038] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3039] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3039] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3040] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3040] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3041] = 3.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3041] = 3.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3042] = 9.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3042] = 9.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3043] = 8.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3043] = 8.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3044] = 3.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3044] = 3.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3045] = 9.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3045] = 9.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3046] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3046] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3047] = 1.51e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3047] = 1.51e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3048] = 1.51e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3048] = 1.51e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3049] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3049] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3050] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3050] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3051] = 1.51e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3051] = 1.51e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3052] = 1.51e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3052] = 1.51e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3053] = 1.51e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3053] = 1.51e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3054] = 4.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3054] = 4.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3055] = 2.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3055] = 2.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3056] = 5.25e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3056] = 5.25e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3057] = 3.58e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3057] = 3.58e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3058] = 2.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3058] = 2.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3059] = 8.19e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3059] = 8.19e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3060] = 1.82e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3060] = 1.82e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3061] = 4.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3061] = 4.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3062] = 2.19e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3062] = 2.19e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3063] = 1.65e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3063] = 1.65e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3064] = 5.07e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3064] = 5.07e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3065] = 4.65e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3065] = 4.65e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3066] = 6.79e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3066] = 6.79e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3067] = 3.75e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3067] = 3.75e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3068] = 1.13e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3068] = 1.13e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3069] = 4.73e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3069] = 4.73e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3070] = 4.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3070] = 4.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3071] = 4.05e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3071] = 4.05e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3072] = 3.83e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3072] = 3.83e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3073] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3073] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3074] = 1.61e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3074] = 1.61e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3075] = 8.75e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3075] = 8.75e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3076] = 7.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3076] = 7.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3077] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3077] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3078] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3078] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3079] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3079] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3080] = 2.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3080] = 2.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3081] = 1.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3081] = 1.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3082] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3082] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3083] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3083] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3084] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3084] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3085] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3085] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3086] = 5.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3086] = 5.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3087] = 5.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3087] = 5.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3088] = 5.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3088] = 5.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3089] = 8e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3089] = 8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3090] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3090] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3091] = 2.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3091] = 2.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3092] = 2.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3092] = 2.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3093] = 2.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3093] = 2.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3094] = 2.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3094] = 2.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3095] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3095] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3096] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3096] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3097] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3097] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3098] = 8e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3098] = 8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3099] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3099] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3100] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3100] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3101] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3101] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3102] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3102] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3103] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3103] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3104] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3104] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3105] = 6.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3105] = 6.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3106] = 6.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3106] = 6.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3107] = 6.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3107] = 6.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3108] = 6.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3108] = 6.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3109] = 6.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3109] = 6.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3110] = 6.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3110] = 6.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3111] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3111] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3112] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3112] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3113] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3113] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3114] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3114] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3115] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3115] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3116] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3116] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3117] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3117] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3118] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3118] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3119] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3119] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3120] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3120] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3121] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3121] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3122] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3122] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3123] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3123] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3124] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3124] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3125] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3125] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3126] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3126] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3127] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3127] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3128] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3128] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3129] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3129] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3130] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3130] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3131] = 7e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3131] = 7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3132] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3132] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3133] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3133] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3134] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3134] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3135] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3135] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3136] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3136] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3137] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3137] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3138] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3138] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3139] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3139] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3140] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3140] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3141] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3141] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3142] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3142] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3143] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3143] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3144] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3144] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3145] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3145] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3146] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3146] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3147] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3147] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3148] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3148] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3149] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3149] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3150] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3150] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3151] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3151] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3152] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3152] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3153] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3153] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3154] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3154] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3155] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3155] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3156] = 4e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3156] = 4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3157] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3157] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3158] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3158] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3159] = 3.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3159] = 3.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3160] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3160] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3161] = 7.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3161] = 7.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3162] = 6.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3162] = 6.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3163] = 6.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3163] = 6.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3164] = 6.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3164] = 6.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3165] = 5.25e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3165] = 5.25e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3166] = 5.25e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3166] = 5.25e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3167] = 3.15e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3167] = 3.15e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3168] = 1.26e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3168] = 1.26e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3169] = 3.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3169] = 3.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3170] = 3.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3170] = 3.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3171] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3171] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3172] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3172] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3173] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3173] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3174] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3174] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3175] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3175] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3176] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3176] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3177] = 7e-08 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3177] = 7e-08; } - if (Tgas>5.0 && Tgas<41000.0) { k[3178] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3178] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3179] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3179] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3180] = 7e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3180] = 7e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3181] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3181] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3182] = 1.5e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3182] = 1.5e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3183] = 7e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3183] = 7e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3184] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3184] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3185] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3185] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3186] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3186] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3187] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3187] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3188] = 8.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3188] = 8.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3189] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3189] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3190] = 4.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3190] = 4.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3191] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3191] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3192] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3192] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3193] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3193] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3194] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3194] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3195] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3195] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3196] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3196] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3197] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3197] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3198] = 2.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3198] = 2.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3199] = 9.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3199] = 9.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3200] = 8.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3200] = 8.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3201] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3201] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3202] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3202] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3203] = 8.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3203] = 8.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3204] = 8.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3204] = 8.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3205] = 1.99e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3205] = 1.99e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3206] = 1.99e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3206] = 1.99e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3207] = 8.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3207] = 8.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3208] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3208] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3209] = 1.1e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3209] = 1.1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3210] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3210] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3211] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3211] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3212] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3212] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3213] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3213] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3214] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3214] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3215] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3215] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3216] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3216] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3217] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3217] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3218] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3218] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3219] = 1.88e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3219] = 1.88e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3220] = 1.14e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3220] = 1.14e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3221] = 1.71e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3221] = 1.71e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3222] = 8.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3222] = 8.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3223] = 8.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3223] = 8.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3224] = 8.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3224] = 8.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3225] = 2.86e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3225] = 2.86e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3226] = 2.04e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3226] = 2.04e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3227] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3227] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3228] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3228] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3229] = 4.84e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3229] = 4.84e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3230] = 3.61e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3230] = 3.61e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3231] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3231] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3232] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3232] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3233] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3233] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3234] = 2.84e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3234] = 2.84e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3235] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3235] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3236] = 2.45e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3236] = 2.45e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3237] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3237] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3238] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3238] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3239] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3239] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3240] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3240] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3241] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3241] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3242] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3242] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3243] = 7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3243] = 7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3244] = 7e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3244] = 7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3245] = 1.46e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3245] = 1.46e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3246] = 2.17e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3246] = 2.17e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3247] = 7.75e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3247] = 7.75e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3248] = 6.51e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3248] = 6.51e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3249] = 4.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3249] = 4.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3250] = 3e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3250] = 3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3251] = 4.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3251] = 4.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3252] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3252] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3253] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3253] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3254] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3254] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3255] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3255] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3256] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3256] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3257] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3257] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3258] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3258] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3259] = 3.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3259] = 3.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3260] = 1.1e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3260] = 1.1e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3261] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3261] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3262] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3262] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3263] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3263] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3264] = 5.68e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3264] = 5.68e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3265] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3265] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3266] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3266] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3267] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3267] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3268] = 4.47e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3268] = 4.47e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3269] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3269] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3270] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3270] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3271] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3271] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3272] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3272] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3273] = 1.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3273] = 1.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3274] = 9.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3274] = 9.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3275] = 1.24e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3275] = 1.24e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3276] = 2.76e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3276] = 2.76e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3277] = 4.83e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3277] = 4.83e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3278] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3278] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3279] = 2.7e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3279] = 2.7e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3280] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3280] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3281] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3281] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3282] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3282] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3283] = 1.76e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3283] = 1.76e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3284] = 1.76e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3284] = 1.76e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3285] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3285] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3286] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3286] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3287] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3287] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3288] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3288] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3289] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3289] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3290] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3290] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3291] = 3e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3291] = 3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3292] = 3e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3292] = 3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3293] = 7.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3293] = 7.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3294] = 7.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3294] = 7.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3295] = 7.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3295] = 7.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3296] = 7.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3296] = 7.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3297] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3297] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3298] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3298] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3299] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3299] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3300] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3300] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3301] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3301] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3302] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3302] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3303] = 9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3303] = 9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3304] = 2.97e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3304] = 2.97e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3305] = 8.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3305] = 8.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3306] = 8.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3306] = 8.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3307] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3307] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3308] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3308] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3309] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3309] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3310] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3310] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3311] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3311] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3312] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3312] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3313] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3313] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3314] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3314] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3315] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3315] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3316] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3316] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3317] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3317] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3318] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3318] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3319] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3319] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3320] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3320] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3321] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3321] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3322] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3322] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3323] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3323] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3324] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3324] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3325] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3325] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3326] = 1.41e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3326] = 1.41e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3327] = 9.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3327] = 9.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3328] = 1.8e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3328] = 1.8e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3329] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3329] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3330] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3330] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3331] = 2e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3331] = 2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3332] = 8.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3332] = 8.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3333] = 8.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3333] = 8.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3334] = 3.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3334] = 3.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3335] = 3.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3335] = 3.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3336] = 9.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3336] = 9.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3337] = 4.96e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3337] = 4.96e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3338] = 3.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3338] = 3.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3339] = 1.24e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3339] = 1.24e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3340] = 4.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3340] = 4.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3341] = 5.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3341] = 5.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3342] = 3.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3342] = 3.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3343] = 2.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3343] = 2.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3344] = 1.45e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3344] = 1.45e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3345] = 7.25e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3345] = 7.25e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3346] = 2.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3346] = 2.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3347] = 5.51e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3347] = 5.51e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3348] = 5.7e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3348] = 5.7e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3349] = 2.28e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3349] = 2.28e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3350] = 4.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3350] = 4.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3351] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3351] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3352] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3352] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3353] = 2.16e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3353] = 2.16e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3354] = 2.16e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3354] = 2.16e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3355] = 3.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3355] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3356] = 7.9e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3356] = 7.9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3357] = 2.63e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3357] = 2.63e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3358] = 3.66e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3358] = 3.66e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3359] = 7e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3359] = 7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3360] = 3.08e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3360] = 3.08e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3361] = 2.52e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3361] = 2.52e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3362] = 1.13e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3362] = 1.13e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3363] = 2.25e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3363] = 2.25e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3364] = 3.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3364] = 3.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3365] = 1.04e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3365] = 1.04e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3366] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3366] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3367] = 8e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3367] = 8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3368] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3368] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3369] = 6.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3369] = 6.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3370] = 7.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3370] = 7.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3371] = 4.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3371] = 4.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3372] = 9.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3372] = 9.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3373] = 3.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3373] = 3.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3374] = 4.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3374] = 4.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3375] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3375] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3376] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3376] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3377] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3377] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3378] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3378] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3379] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3379] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3380] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3380] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3381] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3381] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3382] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3382] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3383] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3383] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3384] = 1.15e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3384] = 1.15e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3385] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3385] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3386] = 9e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3386] = 9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3387] = 7.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3387] = 7.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3388] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3388] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3389] = 2.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3389] = 2.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3390] = 2.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3390] = 2.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3391] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3391] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3392] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3392] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3393] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3393] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3394] = 2.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3394] = 2.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3395] = 2.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3395] = 2.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3396] = 2.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3396] = 2.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3397] = 3.74e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3397] = 3.74e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3398] = 6.6e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3398] = 6.6e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3399] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3399] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3400] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3400] = 1.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3401] = 1.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3401] = 1.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3402] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3402] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3403] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3403] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3404] = 3e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3404] = 3e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3405] = 1.71e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3405] = 1.71e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3406] = 9.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3406] = 9.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3407] = 9.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3407] = 9.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3408] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3408] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3409] = 2.3e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3409] = 2.3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3410] = 8.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3410] = 8.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3411] = 2.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3411] = 2.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3412] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3412] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3413] = 2.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3413] = 2.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3414] = 2.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3414] = 2.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3415] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3415] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3416] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3416] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3417] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3417] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3418] = 8.25e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3418] = 8.25e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3419] = 5.25e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3419] = 5.25e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3420] = 1.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3420] = 1.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3421] = 4.4e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3421] = 4.4e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3422] = 5.6e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3422] = 5.6e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3423] = 1.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3423] = 1.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3424] = 3.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3424] = 3.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3425] = 2.53e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3425] = 2.53e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3426] = 1.65e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3426] = 1.65e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3427] = 1.76e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3427] = 1.76e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3428] = 5.06e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3428] = 5.06e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3429] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3429] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3430] = 2.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3430] = 2.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3431] = 2.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3431] = 2.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3432] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3432] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3433] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3433] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3434] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3434] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3435] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3435] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3436] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3436] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3437] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3437] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3438] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3438] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3439] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3439] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3440] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3440] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3441] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3441] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3442] = 2e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3442] = 2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3443] = 1.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3443] = 1.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3444] = 1.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3444] = 1.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3445] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3445] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3446] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3446] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3447] = 2.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3447] = 2.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3448] = 2.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3448] = 2.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3449] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3449] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3450] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3450] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3451] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3451] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3452] = 2.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3452] = 2.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3453] = 1.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3453] = 1.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3454] = 6.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3454] = 6.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3455] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3455] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3456] = 6.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3456] = 6.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3457] = 1.12e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3457] = 1.12e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3458] = 2.8e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3458] = 2.8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3459] = 7.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3459] = 7.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3460] = 1.44e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3460] = 1.44e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3461] = 9.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3461] = 9.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3462] = 7.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3462] = 7.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3463] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3463] = 1.3e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3464] = 9.1e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3464] = 9.1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3465] = 1.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3465] = 1.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3466] = 1e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3466] = 1e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3467] = 8.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3467] = 8.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3468] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3468] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3469] = 7.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3469] = 7.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3470] = 7.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3470] = 7.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3471] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3471] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3472] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3472] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3473] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3473] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3474] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3474] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3475] = 9e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3475] = 9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3476] = 2.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3476] = 2.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3477] = 4.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3477] = 4.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3478] = 4.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3478] = 4.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3479] = 4.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3479] = 4.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3480] = 1.4e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3480] = 1.4e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3481] = 1.6e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3481] = 1.6e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3482] = 3.85e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3482] = 3.85e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3483] = 3.85e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3483] = 3.85e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3484] = 3.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3484] = 3.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3485] = 4.41e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3485] = 4.41e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3486] = 5.39e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3486] = 5.39e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3487] = 4.95e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3487] = 4.95e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3488] = 1.82e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3488] = 1.82e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3489] = 1.05e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3489] = 1.05e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3490] = 3.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3490] = 3.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3491] = 1.75e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3491] = 1.75e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3492] = 8.75e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3492] = 8.75e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3493] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3493] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3494] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3494] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3495] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3495] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3496] = 6.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3496] = 6.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3497] = 1.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3497] = 1.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3498] = 6e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3498] = 6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3499] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3499] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3500] = 1.78e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3500] = 1.78e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3501] = 2.05e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3501] = 2.05e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3502] = 1.64e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3502] = 1.64e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3503] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3503] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3504] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3504] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3505] = 6.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3505] = 6.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3506] = 6.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3506] = 6.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3507] = 9.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3507] = 9.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3508] = 9.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3508] = 9.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3509] = 1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3509] = 1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3510] = 2.24e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3510] = 2.24e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3511] = 5.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3511] = 5.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3512] = 2.76e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3512] = 2.76e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3513] = 1e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3513] = 1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3514] = 1.45e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3514] = 1.45e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3515] = 2.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3515] = 2.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3516] = 1.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3516] = 1.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3517] = 4.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3517] = 4.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3518] = 1.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3518] = 1.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3519] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3519] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3520] = 4.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3520] = 4.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3521] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3521] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3522] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3522] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3523] = 1.61e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3523] = 1.61e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3524] = 1.19e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3524] = 1.19e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3525] = 2.1e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3525] = 2.1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3526] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3526] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3527] = 4.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3527] = 4.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3528] = 4.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3528] = 4.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3529] = 4.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3529] = 4.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3530] = 4.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3530] = 4.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3531] = 4.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3531] = 4.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3532] = 4.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3532] = 4.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3533] = 9.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3533] = 9.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3534] = 4.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3534] = 4.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3535] = 8.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3535] = 8.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3536] = 4.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3536] = 4.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3537] = 8.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3537] = 8.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3538] = 9.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3538] = 9.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3539] = 9e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3539] = 9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3540] = 4.45e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3540] = 4.45e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3541] = 4.45e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3541] = 4.45e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3542] = 8.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3542] = 8.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3543] = 8.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3543] = 8.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3544] = 8.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3544] = 8.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3545] = 1e-11 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3545] = 1e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3546] = 8.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3546] = 8.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3547] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3547] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3548] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3548] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3549] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3549] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3550] = 1.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3550] = 1.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3551] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3551] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3552] = 4.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3552] = 4.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3553] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3553] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3554] = 5.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3554] = 5.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3555] = 5.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3555] = 5.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3556] = 9.61e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3556] = 9.61e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3557] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3557] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3558] = 2.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3558] = 2.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3559] = 1.97e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3559] = 1.97e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3560] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3560] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3561] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3561] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3562] = 8e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3562] = 8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3563] = 4.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3563] = 4.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3564] = 4e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3564] = 4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3565] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3565] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3566] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3566] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3567] = 1.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3567] = 1.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3568] = 1.61e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3568] = 1.61e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3569] = 1.8e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3569] = 1.8e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3570] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3570] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3571] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3571] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3572] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3572] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3573] = 4.08e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3573] = 4.08e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3574] = 1.28e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3574] = 1.28e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3575] = 9.45e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3575] = 9.45e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3576] = 1.36e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3576] = 1.36e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3577] = 2.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3577] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3578] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3578] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3579] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3579] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3580] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3580] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3581] = 8.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3581] = 8.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3582] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3582] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3583] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3583] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3584] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3584] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3585] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3585] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3586] = 1.38e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3586] = 1.38e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3587] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3587] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3588] = 1.1e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3588] = 1.1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3589] = 9.75e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3589] = 9.75e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3590] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3590] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3591] = 9.7e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3591] = 9.7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3592] = 2.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3592] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3593] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3593] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3594] = 2e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3594] = 2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3595] = 2.67e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3595] = 2.67e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3596] = 3.99e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3596] = 3.99e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3597] = 5.88e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3597] = 5.88e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3598] = 1.11e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3598] = 1.11e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3599] = 3.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3599] = 3.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3600] = 1.62e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3600] = 1.62e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3601] = 2.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3601] = 2.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3602] = 6.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3602] = 6.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3603] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3603] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3604] = 2.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3604] = 2.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3605] = 3.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3605] = 3.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3606] = 3.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3606] = 3.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3607] = 6.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3607] = 6.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3608] = 7.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3608] = 7.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3609] = 7.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3609] = 7.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3610] = 3.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3610] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3611] = 6.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3611] = 6.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3612] = 7.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3612] = 7.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3613] = 6.5e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3613] = 6.5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3614] = 6.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3614] = 6.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3615] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3615] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3616] = 6.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3616] = 6.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3617] = 7.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3617] = 7.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3618] = 7.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3618] = 7.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3619] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3619] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3620] = 3.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3620] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3621] = 3.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3621] = 3.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3622] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3622] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3623] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3623] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3624] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3624] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3625] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3625] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3626] = 4.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3626] = 4.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3627] = 7.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3627] = 7.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3628] = 2.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3628] = 2.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3629] = 1.35e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3629] = 1.35e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3630] = 1.35e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3630] = 1.35e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3631] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3631] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3632] = 1.12e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3632] = 1.12e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3633] = 2.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3633] = 2.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3634] = 4.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3634] = 4.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3635] = 1.26e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3635] = 1.26e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3636] = 9.5e-11 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3636] = 9.5e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3637] = 1.33e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3637] = 1.33e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3638] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3638] = 1.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3639] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3639] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3640] = 9.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3640] = 9.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3641] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3641] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3642] = 4.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3642] = 4.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3643] = 2.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3643] = 2.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3644] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3644] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3645] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3645] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3646] = 4.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3646] = 4.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3647] = 2.42e-12 * pow(Tgas/300.0, - -0.21) * exp(+44.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3647] = 2.42e-12 * pow(Tgas/300.0, + -0.21) * exp(+44.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[3648] = 8.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3648] = 8.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3649] = 2e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3649] = 2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3650] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3650] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3651] = 3.6e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3651] = 3.6e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3652] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3652] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3653] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3653] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3654] = 1.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3654] = 1.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3655] = 6.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3655] = 6.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3656] = 5.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3656] = 5.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3657] = 2.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3657] = 2.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3658] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3658] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3659] = 5.55e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3659] = 5.55e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3660] = 9e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3660] = 9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3661] = 1.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3661] = 1.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3662] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3662] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3663] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3663] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3664] = 1.35e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3664] = 1.35e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3665] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3665] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3666] = 9.54e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3666] = 9.54e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3667] = 5.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3667] = 5.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3668] = 1.75e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3668] = 1.75e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3669] = 1.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3669] = 1.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3670] = 2.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3670] = 2.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3671] = 7.5e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3671] = 7.5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3672] = 1.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3672] = 1.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3673] = 7.8e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3673] = 7.8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3674] = 1.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3674] = 1.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3675] = 6.23e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3675] = 6.23e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3676] = 2.67e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3676] = 2.67e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3677] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3677] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3678] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3678] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3679] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3679] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3680] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3680] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3681] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3681] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3682] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3682] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3683] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3683] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3684] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3684] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3685] = 2.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3685] = 2.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3686] = 3.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3686] = 3.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3687] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3687] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3688] = 8.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3688] = 8.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3689] = 8.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3689] = 8.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3690] = 8.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3690] = 8.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3691] = 1.08e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3691] = 1.08e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3692] = 8.4e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3692] = 8.4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3693] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3693] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3694] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3694] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3695] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3695] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3696] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3696] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3697] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3697] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3698] = 5.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3698] = 5.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3699] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3699] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3700] = 5.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3700] = 5.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3701] = 1.08e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3701] = 1.08e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3702] = 1.35e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3702] = 1.35e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3703] = 6.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3703] = 6.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3704] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3704] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3705] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3705] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3706] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3706] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3707] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3707] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3708] = 4.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3708] = 4.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3709] = 5.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3709] = 5.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3710] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3710] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3711] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3711] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3712] = 5.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3712] = 5.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3713] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3713] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3714] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3714] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3715] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3715] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3716] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3716] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3717] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3717] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3718] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3718] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3719] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3719] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3720] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3720] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3721] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3721] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3722] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3722] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3723] = 5e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3723] = 5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3724] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3724] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3725] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3725] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3726] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3726] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3727] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3727] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3728] = 4.4e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3728] = 4.4e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3729] = 2.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3729] = 2.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3730] = 1.64e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3730] = 1.64e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3731] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3731] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3732] = 6e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3732] = 6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3733] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3733] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3734] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3734] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3735] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3735] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3736] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3736] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3737] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3737] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3738] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3738] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3739] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3739] = 5e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3740] = 1e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3740] = 1e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3741] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3741] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3742] = 2.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3742] = 2.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3743] = 2.9e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3743] = 2.9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3744] = 1.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3744] = 1.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3745] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3745] = 1.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3746] = 7.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3746] = 7.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3747] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3747] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3748] = 6.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3748] = 6.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3749] = 6.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3749] = 6.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3750] = 7.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3750] = 7.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3751] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3751] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3752] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3752] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3753] = 6e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3753] = 6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3754] = 6e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3754] = 6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3755] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3755] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3756] = 4e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3756] = 4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3757] = 6.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3757] = 6.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3758] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3758] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3759] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3759] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3760] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3760] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3761] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3761] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3762] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3762] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3763] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3763] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3764] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3764] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3765] = 1.51e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3765] = 1.51e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3766] = 1.51e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3766] = 1.51e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3767] = 1.64e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3767] = 1.64e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3768] = 1.64e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3768] = 1.64e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3769] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3769] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3770] = 4.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3770] = 4.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3771] = 1.04e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3771] = 1.04e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3772] = 1.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3772] = 1.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3773] = 3.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3773] = 3.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3774] = 3.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3774] = 3.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3775] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3775] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3776] = 1.44e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3776] = 1.44e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3777] = 1.05e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3777] = 1.05e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3778] = 1.12e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3778] = 1.12e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3779] = 1.3e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3779] = 1.3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3780] = 8.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3780] = 8.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3781] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3781] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3782] = 2.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3782] = 2.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3783] = 2.8e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3783] = 2.8e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3784] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3784] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3785] = 3.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3785] = 3.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3786] = 1.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3786] = 1.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3787] = 6.11e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3787] = 6.11e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3788] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3788] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3789] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3789] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3790] = 4.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3790] = 4.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3791] = 1.9e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3791] = 1.9e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3792] = 4.5e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3792] = 4.5e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3793] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3793] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3794] = 9.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3794] = 9.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3795] = 1.2e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3795] = 1.2e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3796] = 6.4e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3796] = 6.4e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3797] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3797] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3798] = 3.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3798] = 3.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3799] = 6.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3799] = 6.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3800] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3800] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3801] = 6.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3801] = 6.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3802] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3802] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3803] = 6.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3803] = 6.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3804] = 6.2e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3804] = 6.2e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3805] = 7e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3805] = 7e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3806] = 6.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3806] = 6.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3807] = 5e-10 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3807] = 5e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3808] = 6.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3808] = 6.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3809] = 6.3e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3809] = 6.3e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3810] = 1.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3810] = 1.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3811] = 4.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3811] = 4.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3812] = 5.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3812] = 5.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3813] = 4.18e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3813] = 4.18e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3814] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3814] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3815] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3815] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3816] = 1.9e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3816] = 1.9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3817] = 1.35e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3817] = 1.35e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3818] = 5.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3818] = 5.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3819] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3819] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3820] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3820] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3821] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3821] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3822] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3822] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3823] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3823] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3824] = 6e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3824] = 6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3825] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3825] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3826] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3826] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3827] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3827] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3828] = 1.89e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3828] = 1.89e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3829] = 5.9e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3829] = 5.9e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3830] = 1.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3830] = 1.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3831] = 2.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3831] = 2.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3832] = 4.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3832] = 4.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3833] = 9.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3833] = 9.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3834] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3834] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3835] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3835] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3836] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3836] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3837] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3837] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3838] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3838] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3839] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3839] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3840] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3840] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3841] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3841] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3842] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3842] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3843] = 1.87e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3843] = 1.87e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3844] = 6.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3844] = 6.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3845] = 1.1e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3845] = 1.1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3846] = 2.42e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3846] = 2.42e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3847] = 4.4e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3847] = 4.4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3848] = 2.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3848] = 2.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3849] = 6.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3849] = 6.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3850] = 6.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3850] = 6.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3851] = 4.8e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3851] = 4.8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3852] = 7.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3852] = 7.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3853] = 8.4e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3853] = 8.4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3854] = 7.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3854] = 7.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3855] = 1.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3855] = 1.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3856] = 1.69e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3856] = 1.69e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3857] = 5.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3857] = 5.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3858] = 2.69e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3858] = 2.69e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3859] = 2.2e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3859] = 2.2e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3860] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3860] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3861] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3861] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3862] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3862] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3863] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3863] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3864] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3864] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3865] = 7.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3865] = 7.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3866] = 1.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3866] = 1.8e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3867] = 1.65e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3867] = 1.65e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3868] = 1e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3868] = 1e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3869] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3869] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3870] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3870] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3871] = 9e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3871] = 9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3872] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3872] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3873] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3873] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3874] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3874] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3875] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3875] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3876] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3876] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3877] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3877] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3878] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3878] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3879] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3879] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3880] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3880] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3881] = 1.6e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3881] = 1.6e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3882] = 2.4e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3882] = 2.4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[3883] = 1.1e-09 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3883] = 1.1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[3884] = 2.9e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3884] = 2.9e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[3885] = 4.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3885] = 4.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[3886] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3886] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3887] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3887] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3888] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3888] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3889] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3889] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3890] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3890] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3891] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3891] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3892] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3892] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3893] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3893] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3894] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3894] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3895] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3895] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3896] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3896] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3897] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3897] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3898] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3898] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3899] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3899] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3900] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3900] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3901] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3901] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3902] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3902] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3903] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3903] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3904] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3904] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3905] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3905] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3906] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3906] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3907] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3907] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3908] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3908] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3909] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3909] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3910] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3910] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3911] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3911] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3912] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3912] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3913] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3913] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3914] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3914] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3915] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3915] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3916] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3916] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3917] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3917] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3918] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3918] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3919] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3919] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3920] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3920] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3921] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3921] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3922] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3922] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3923] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3923] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3924] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3924] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3925] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3925] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3926] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3926] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3927] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3927] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3928] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3928] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3929] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3929] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3930] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3930] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3931] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3931] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3932] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3932] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3933] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3933] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3934] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3934] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3935] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3935] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3936] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3936] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3937] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3937] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3938] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3938] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3939] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3939] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3940] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3940] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3941] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3941] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3942] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3942] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3943] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3943] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3944] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3944] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3945] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3945] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3946] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3946] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3947] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3947] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3948] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3948] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3949] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3949] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3950] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3950] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3951] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3951] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3952] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3952] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3953] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3953] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3954] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3954] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3955] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3955] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3956] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3956] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3957] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3957] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3958] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3958] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3959] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3959] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3960] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3960] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3961] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3961] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3962] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3962] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3963] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3963] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3964] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3964] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3965] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3965] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3966] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3966] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3967] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3967] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3968] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3968] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3969] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3969] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3970] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3970] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3971] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3971] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3972] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3972] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3973] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3973] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3974] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3974] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3975] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3975] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3976] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3976] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3977] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3977] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3978] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3978] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3979] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3979] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3980] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3980] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3981] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3981] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3982] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3982] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3983] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3983] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3984] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3984] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3985] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3985] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3986] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3986] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3987] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3987] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3988] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3988] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3989] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3989] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3990] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3990] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3991] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3991] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3992] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3992] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3993] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3993] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3994] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3994] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3995] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3995] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3996] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3996] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3997] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3997] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3998] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3998] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[3999] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[3999] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4000] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4000] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4001] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4001] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4002] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4002] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4003] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4003] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4004] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4004] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4005] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4005] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4006] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4006] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4007] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4007] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4008] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4008] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4009] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4009] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4010] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4010] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4011] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4011] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4012] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4012] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4013] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4013] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4014] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4014] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4015] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4015] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4016] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4016] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4017] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4017] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4018] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4018] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4019] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4019] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4020] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4020] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4021] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4021] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4022] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4022] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4023] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4023] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4024] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4024] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4025] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4025] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4026] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4026] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4027] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4027] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4028] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4028] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4029] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4029] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4030] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4030] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4031] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4031] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4032] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4032] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4033] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4033] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4034] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4034] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4035] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4035] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4036] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4036] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4037] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4037] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4038] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4038] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4039] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4039] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4040] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4040] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4041] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4041] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4042] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4042] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4043] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4043] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4044] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4044] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4045] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4045] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4046] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4046] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4047] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4047] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4048] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4048] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4049] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4049] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4050] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4050] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4051] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4051] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4052] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4052] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4053] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4053] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4054] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4054] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4055] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4055] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4056] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4056] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4057] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4057] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4058] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4058] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4059] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4059] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4060] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4060] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4061] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4061] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4062] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4062] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4063] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4063] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4064] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4064] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4065] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4065] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4066] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4066] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4067] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4067] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4068] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4068] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4069] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4069] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4070] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4070] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4071] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4071] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4072] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4072] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4073] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4073] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4074] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4074] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4075] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4075] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4076] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4076] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4077] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4077] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4078] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4078] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4079] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4079] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4080] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4080] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4081] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4081] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4082] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4082] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4083] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4083] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4084] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4084] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4085] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4085] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4086] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4086] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4087] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4087] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4088] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4088] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4089] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4089] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4090] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4090] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4091] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4091] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4092] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4092] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4093] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4093] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4094] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4094] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4095] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4095] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4096] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4096] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4097] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4097] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4098] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4098] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4099] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4099] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4100] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4100] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4101] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4101] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4102] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4102] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4103] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4103] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4104] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4104] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4105] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4105] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4106] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4106] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4107] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4107] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4108] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4108] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4109] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4109] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4110] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4110] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4111] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4111] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4112] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4112] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4113] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4113] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4114] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4114] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4115] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4115] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4116] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4116] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4117] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4117] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4118] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4118] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4119] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4119] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4120] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4120] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4121] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4121] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4122] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4122] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4123] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4123] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4124] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4124] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4125] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4125] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4126] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4126] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4127] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4127] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4128] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4128] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4129] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4129] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4130] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4130] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4131] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4131] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4132] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4132] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4133] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4133] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4134] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4134] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4135] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4135] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4136] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4136] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4137] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4137] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4138] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4138] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4139] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4139] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4140] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4140] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4141] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4141] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4142] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4142] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4143] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4143] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4144] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4144] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4145] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4145] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4146] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4146] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4147] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4147] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4148] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4148] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4149] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4149] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4150] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4150] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4151] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4151] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4152] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4152] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4153] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4153] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4154] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4154] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4155] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4155] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4156] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4156] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4157] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4157] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4158] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4158] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4159] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4159] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4160] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4160] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4161] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4161] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4162] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4162] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4163] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4163] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4164] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4164] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4165] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4165] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4166] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4166] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4167] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4167] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4168] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4168] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4169] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4169] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4170] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4170] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4171] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4171] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4172] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4172] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4173] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4173] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4174] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4174] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4175] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4175] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4176] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4176] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4177] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4177] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4178] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4178] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4179] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4179] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4180] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4180] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4181] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4181] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4182] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4182] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4183] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4183] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4184] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4184] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4185] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4185] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4186] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4186] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4187] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4187] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4188] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4188] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4189] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4189] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4190] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4190] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4191] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4191] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4192] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4192] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4193] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4193] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4194] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4194] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4195] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4195] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4196] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4196] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4197] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4197] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4198] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4198] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4199] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4199] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4200] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4200] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4201] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4201] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4202] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4202] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4203] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4203] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4204] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4204] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4205] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4205] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4206] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4206] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4207] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4207] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4208] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4208] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4209] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4209] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4210] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4210] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4211] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4211] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4212] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4212] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4213] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4213] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4214] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4214] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4215] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4215] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4216] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4216] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4217] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4217] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4218] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4218] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4219] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4219] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4220] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4220] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4221] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4221] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4222] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4222] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4223] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4223] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4224] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4224] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4225] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4225] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4226] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4226] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4227] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4227] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4228] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4228] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4229] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4229] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4230] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4230] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4231] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4231] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4232] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4232] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4233] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4233] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4234] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4234] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4235] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4235] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4236] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4236] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4237] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4237] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4238] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4238] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4239] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4239] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4240] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4240] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4241] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4241] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4242] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4242] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4243] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4243] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4244] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4244] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4245] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4245] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4246] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4246] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4247] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4247] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4248] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4248] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4249] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4249] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4250] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4250] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4251] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4251] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4252] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4252] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4253] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4253] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4254] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4254] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4255] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4255] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4256] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4256] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4257] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4257] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4258] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4258] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4259] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4259] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4260] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4260] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4261] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4261] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4262] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4262] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4263] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4263] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4264] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4264] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4265] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4265] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4266] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4266] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4267] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4267] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4268] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4268] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4269] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4269] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4270] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4270] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4271] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4271] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4272] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4272] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4273] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4273] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4274] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4274] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4275] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4275] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4276] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4276] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4277] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4277] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4278] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4278] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4279] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4279] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4280] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4280] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4281] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4281] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4282] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4282] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4283] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4283] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4284] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4284] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4285] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4285] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4286] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4286] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4287] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4287] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4288] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4288] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4289] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4289] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4290] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4290] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4291] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4291] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4292] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4292] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4293] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4293] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4294] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4294] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4295] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4295] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4296] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4296] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4297] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4297] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4298] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4298] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4299] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4299] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4300] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4300] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4301] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4301] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4302] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4302] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4303] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4303] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4304] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4304] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4305] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4305] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4306] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4306] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4307] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4307] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4308] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4308] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4309] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4309] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4310] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4310] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4311] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4311] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4312] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4312] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4313] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4313] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4314] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4314] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4315] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4315] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4316] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4316] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4317] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4317] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4318] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4318] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4319] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4319] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4320] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4320] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4321] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4321] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4322] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4322] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4323] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4323] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4324] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4324] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4325] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4325] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4326] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4326] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4327] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4327] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4328] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4328] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4329] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4329] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4330] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4330] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4331] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4331] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4332] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4332] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4333] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4333] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4334] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4334] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4335] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4335] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4336] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4336] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4337] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4337] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4338] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4338] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4339] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4339] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4340] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4340] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4341] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4341] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4342] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4342] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4343] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4343] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4344] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4344] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4345] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4345] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4346] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4346] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4347] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4347] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4348] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4348] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4349] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4349] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4350] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4350] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4351] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4351] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4352] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4352] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4353] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4353] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4354] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4354] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4355] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4355] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4356] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4356] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4357] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4357] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4358] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4358] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4359] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4359] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4360] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4360] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4361] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4361] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4362] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4362] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4363] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4363] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4364] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4364] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4365] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4365] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4366] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4366] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4367] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4367] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4368] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4368] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4369] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4369] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4370] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4370] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4371] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4371] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4372] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4372] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4373] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4373] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4374] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4374] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4375] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4375] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4376] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4376] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4377] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4377] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4378] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4378] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4379] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4379] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4380] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4380] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4381] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4381] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4382] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4382] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4383] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4383] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4384] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4384] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4385] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4385] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4386] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4386] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4387] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4387] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4388] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4388] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4389] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4389] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4390] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4390] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4391] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4391] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4392] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4392] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4393] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4393] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4394] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4394] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4395] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4395] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4396] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4396] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4397] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4397] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4398] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4398] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4399] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4399] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4400] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4400] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4401] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4401] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4402] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4402] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4403] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4403] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4404] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4404] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4405] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4405] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4406] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4406] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4407] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4407] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4408] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4408] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4409] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4409] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4410] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4410] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4411] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4411] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4412] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4412] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4413] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4413] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4414] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4414] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4415] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4415] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4416] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4416] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4417] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4417] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4418] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4418] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4419] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4419] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4420] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4420] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4421] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4421] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4422] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4422] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4423] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4423] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4424] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4424] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4425] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4425] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4426] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4426] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4427] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4427] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4428] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4428] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4429] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4429] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4430] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4430] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4431] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4431] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4432] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4432] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4433] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4433] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4434] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4434] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4435] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4435] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4436] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4436] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4437] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4437] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4438] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4438] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4439] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4439] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4440] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4440] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4441] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4441] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4442] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4442] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4443] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4443] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4444] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4444] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4445] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4445] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4446] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4446] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4447] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4447] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4448] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4448] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4449] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4449] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4450] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4450] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4451] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4451] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4452] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4452] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4453] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4453] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4454] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4454] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4455] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4455] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4456] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4456] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4457] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4457] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4458] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4458] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4459] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4459] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4460] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4460] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4461] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4461] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4462] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4462] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4463] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4463] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4464] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4464] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4465] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4465] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4466] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4466] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4467] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4467] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4468] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4468] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4469] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4469] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4470] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4470] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4471] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4471] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4472] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4472] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4473] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4473] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4474] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4474] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4475] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4475] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4476] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4476] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4477] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4477] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4478] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4478] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4479] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4479] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4480] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4480] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4481] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4481] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4482] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4482] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4483] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4483] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4484] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4484] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4485] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4485] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4486] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4486] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4487] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4487] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4488] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4488] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4489] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4489] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4490] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4490] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4491] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4491] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4492] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4492] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4493] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4493] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4494] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4494] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4495] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4495] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4496] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4496] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4497] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4497] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4498] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4498] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4499] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4499] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4500] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4500] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4501] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4501] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4502] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4502] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4503] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4503] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4504] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4504] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4505] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4505] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4506] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4506] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4507] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4507] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4508] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4508] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4509] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4509] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4510] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4510] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4511] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4511] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4512] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4512] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4513] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4513] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4514] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4514] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4515] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4515] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4516] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4516] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4517] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4517] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4518] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4518] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4519] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4519] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4520] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4520] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4521] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4521] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4522] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4522] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4523] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4523] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4524] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4524] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4525] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4525] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4526] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4526] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4527] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4527] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4528] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4528] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4529] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4529] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4530] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4530] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4531] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4531] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4532] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4532] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4533] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4533] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4534] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4534] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4535] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4535] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4536] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4536] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4537] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4537] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4538] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4538] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4539] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4539] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4540] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4540] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4541] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4541] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4542] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4542] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4543] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4543] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4544] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4544] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4545] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4545] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4546] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4546] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4547] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4547] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4548] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4548] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4549] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4549] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4550] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4550] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4551] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4551] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4552] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4552] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4553] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4553] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4554] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4554] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4555] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4555] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4556] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4556] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4557] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4557] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4558] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4558] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4559] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4559] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4560] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4560] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4561] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4561] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4562] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4562] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4563] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4563] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4564] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4564] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4565] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4565] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4566] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4566] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4567] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4567] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4568] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4568] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4569] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4569] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4570] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4570] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4571] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4571] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4572] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4572] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4573] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4573] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4574] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4574] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4575] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4575] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4576] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4576] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4577] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4577] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4578] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4578] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4579] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4579] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4580] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4580] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4581] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4581] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4582] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4582] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4583] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4583] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4584] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4584] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4585] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4585] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4586] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4586] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4587] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4587] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4588] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4588] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4589] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4589] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4590] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4590] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4591] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4591] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4592] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4592] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4593] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4593] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4594] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4594] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4595] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4595] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4596] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4596] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4597] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4597] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4598] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4598] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4599] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4599] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4600] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4600] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4601] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4601] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4602] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4602] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4603] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4603] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4604] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4604] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4605] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4605] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4606] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4606] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4607] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4607] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4608] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4608] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4609] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4609] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4610] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4610] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4611] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4611] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4612] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4612] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4613] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4613] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4614] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4614] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4615] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4615] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4616] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4616] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4617] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4617] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4618] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4618] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4619] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4619] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4620] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4620] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4621] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4621] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4622] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4622] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4623] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4623] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4624] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4624] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4625] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4625] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4626] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4626] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4627] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4627] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4628] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4628] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4629] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4629] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4630] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4630] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4631] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4631] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4632] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4632] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4633] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4633] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4634] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4634] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4635] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4635] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4636] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4636] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4637] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4637] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4638] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4638] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4639] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4639] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4640] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4640] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4641] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4641] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4642] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4642] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4643] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4643] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4644] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4644] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4645] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4645] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4646] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4646] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4647] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4647] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4648] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4648] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4649] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4649] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4650] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4650] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4651] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4651] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4652] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4652] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4653] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4653] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4654] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4654] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4655] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4655] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4656] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4656] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4657] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4657] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4658] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4658] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4659] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4659] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4660] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4660] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4661] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4661] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4662] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4662] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4663] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4663] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4664] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4664] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4665] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4665] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4666] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4666] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4667] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4667] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4668] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4668] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4669] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4669] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4670] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4670] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4671] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4671] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4672] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4672] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4673] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4673] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4674] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4674] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4675] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4675] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4676] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4676] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4677] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4677] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4678] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4678] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4679] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4679] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4680] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4680] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4681] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4681] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4682] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4682] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4683] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4683] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4684] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4684] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4685] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4685] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4686] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4686] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4687] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4687] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4688] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4688] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4689] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4689] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4690] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4690] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4691] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4691] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4692] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4692] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4693] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4693] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4694] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4694] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4695] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4695] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4696] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4696] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4697] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4697] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4698] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4698] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4699] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4699] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4700] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4700] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4701] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4701] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4702] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4702] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4703] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4703] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4704] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4704] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4705] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4705] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4706] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4706] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4707] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4707] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4708] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4708] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4709] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4709] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4710] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4710] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4711] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4711] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4712] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4712] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4713] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4713] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4714] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4714] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4715] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4715] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4716] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4716] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4717] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4717] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4718] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4718] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4719] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4719] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4720] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4720] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4721] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4721] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4722] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4722] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4723] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4723] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4724] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4724] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4725] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4725] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4726] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4726] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4727] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4727] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4728] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4728] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4729] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4729] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4730] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4730] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4731] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4731] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4732] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4732] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4733] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4733] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4734] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4734] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4735] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4735] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4736] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4736] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4737] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4737] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4738] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4738] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4739] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4739] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4740] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4740] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4741] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4741] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4742] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4742] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4743] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4743] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4744] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4744] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4745] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4745] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4746] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4746] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4747] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4747] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4748] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4748] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4749] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4749] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4750] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4750] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4751] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4751] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4752] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4752] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4753] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4753] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4754] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4754] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4755] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4755] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4756] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4756] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4757] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4757] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4758] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4758] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4759] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4759] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4760] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4760] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4761] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4761] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4762] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4762] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4763] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4763] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4764] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4764] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4765] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4765] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4766] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4766] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4767] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4767] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4768] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4768] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4769] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4769] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4770] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4770] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4771] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4771] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4772] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4772] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4773] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4773] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4774] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4774] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4775] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4775] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4776] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4776] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4777] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4777] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4778] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4778] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4779] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4779] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4780] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4780] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4781] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4781] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4782] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4782] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4783] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4783] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4784] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4784] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4785] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4785] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4786] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4786] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4787] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4787] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4788] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4788] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4789] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4789] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4790] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4790] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4791] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4791] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4792] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4792] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4793] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4793] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4794] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4794] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4795] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4795] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4796] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4796] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4797] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4797] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4798] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4798] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4799] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4799] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4800] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4800] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4801] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4801] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4802] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4802] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4803] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4803] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4804] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4804] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4805] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4805] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4806] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4806] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4807] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4807] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4808] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4808] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4809] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4809] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4810] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4810] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4811] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4811] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4812] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4812] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4813] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4813] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4814] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4814] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4815] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4815] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4816] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4816] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4817] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4817] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4818] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4818] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4819] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4819] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4820] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4820] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4821] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4821] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4822] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4822] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4823] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4823] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4824] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4824] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4825] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4825] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4826] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4826] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4827] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4827] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4828] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4828] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4829] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4829] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4830] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4830] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4831] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4831] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4832] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4832] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4833] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4833] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4834] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4834] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4835] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4835] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4836] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4836] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4837] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4837] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4838] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4838] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4839] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4839] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4840] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4840] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4841] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4841] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4842] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4842] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4843] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4843] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4844] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4844] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4845] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4845] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4846] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4846] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4847] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4847] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4848] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4848] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4849] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4849] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4850] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4850] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4851] = 3.76e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4851] = 3.76e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4852] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4852] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4853] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4853] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4854] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4854] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4855] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4855] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4856] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4856] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4857] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4857] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4858] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4858] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4859] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4859] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4860] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4860] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4861] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4861] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4862] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4862] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4863] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4863] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4864] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4864] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4865] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4865] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4866] = 7.51e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4866] = 7.51e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[4867] = 2.88e-10 * pow(Tgas/300.0, - -1.14) * exp(-77.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4867] = 2.88e-10 * pow(Tgas/300.0, + -1.14) * exp(-77.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4868] = 2.53e-10 * pow(Tgas/300.0, - -0.93) * exp(-58.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4868] = 2.53e-10 * pow(Tgas/300.0, + -0.93) * exp(-58.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4869] = 1.3e-10 * pow(Tgas/300.0, - -0.94) * exp(-44.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4869] = 1.3e-10 * pow(Tgas/300.0, + -0.94) * exp(-44.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4870] = 4.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4870] = 4.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4871] = 8.96e-12 * pow(Tgas/300.0, - -0.42) * exp(-13.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4871] = 8.96e-12 * pow(Tgas/300.0, + -0.42) * exp(-13.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4872] = 4.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4872] = 4.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4873] = 1.11e-10 * pow(Tgas/300.0, - -0.82) * exp(-9.7/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4873] = 1.11e-10 * pow(Tgas/300.0, + -0.82) * exp(-9.7/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4874] = 1.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-4300.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4874] = 1.5e-11 * exp(-4300.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[4875] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4875] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4876] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4876] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4877] = 1.81e-10 * pow(Tgas/300.0, - -1.06) * exp(-65.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4877] = 1.81e-10 * pow(Tgas/300.0, + -1.06) * exp(-65.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4878] = 8.97e-12 * pow(Tgas/300.0, - 0.0) * exp(-18973.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4878] = 8.97e-12 * + exp(-18973.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4879] = 1.3e-10 * pow(Tgas/300.0, - -0.71) * exp(-29.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4879] = 1.3e-10 * pow(Tgas/300.0, + -0.71) * exp(-29.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4880] = 2.6e-10 * pow(Tgas/300.0, - -0.71) * exp(-29.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4880] = 2.6e-10 * pow(Tgas/300.0, + -0.71) * exp(-29.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4881] = 8.87e-12 * pow(Tgas/300.0, - -0.73) * exp(-22.7/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4881] = 8.87e-12 * pow(Tgas/300.0, + -0.73) * exp(-22.7/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4882] = 3.15e-14 * pow(Tgas/300.0, - 1.45) * exp(+52.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4882] = 3.15e-14 * pow(Tgas/300.0, + 1.45) * exp(+52.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4883] = 1.5e-14 * pow(Tgas/300.0, 3.0) - * exp(-1700.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4883] = 1.5e-14 * pow(Tgas/300.0, + 3.0) * exp(-1700.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4884] = 1.96e-10 * pow(Tgas/300.0, - -0.4) * exp(+9.4/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4884] = 1.96e-10 * pow(Tgas/300.0, + -0.4) * exp(+9.4/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4885] = 1.85e-10 * pow(Tgas/300.0, - -0.34) * exp(-16.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4885] = 1.85e-10 * pow(Tgas/300.0, + -0.34) * exp(-16.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4886] = 8.81e-14 * pow(Tgas/300.0, - 6.0) * exp(-500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4886] = 8.81e-14 * pow(Tgas/300.0, + 6.0) * exp(-500.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4887] = 1.41e-14 * pow(Tgas/300.0, - 3.37) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4887] = 1.41e-14 * pow(Tgas/300.0, + 3.37); } - if (Tgas>5.0 && Tgas<41000.0) { k[4888] = 9.39e-11 * pow(Tgas/300.0, - -0.2) * exp(+4.1/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4888] = 9.39e-11 * pow(Tgas/300.0, + -0.2) * exp(+4.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4889] = 1.06e-10 * pow(Tgas/300.0, - -0.25) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4889] = 1.06e-10 * pow(Tgas/300.0, + -0.25); } - if (Tgas>5.0 && Tgas<41000.0) { k[4890] = 1.06e-10 * pow(Tgas/300.0, - -0.25) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4890] = 1.06e-10 * pow(Tgas/300.0, + -0.25); } - if (Tgas>5.0 && Tgas<41000.0) { k[4891] = 1.06e-10 * pow(Tgas/300.0, - -0.25) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4891] = 1.06e-10 * pow(Tgas/300.0, + -0.25); } - if (Tgas>5.0 && Tgas<41000.0) { k[4892] = 1.06e-10 * pow(Tgas/300.0, - -0.25) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4892] = 1.06e-10 * pow(Tgas/300.0, + -0.25); } - if (Tgas>5.0 && Tgas<41000.0) { k[4893] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4893] = 1e-10; } - if (Tgas>5.0 && Tgas<100.0) { k[4894] = 3.09e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<100.0) { k[4894] = 3.09e-10; } - if (Tgas>100.0 && Tgas<41000.0) { k[4895] = 2e-10 * pow(Tgas/300.0, - -0.4) * exp(-0.0/Tgas); } + if (Tgas>=100.0 && Tgas<41000.0) { k[4895] = 2e-10 * pow(Tgas/300.0, + -0.4); } - if (Tgas>5.0 && Tgas<100.0) { k[4896] = 2.92e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<100.0) { k[4896] = 2.92e-10; } - if (Tgas>100.0 && Tgas<41000.0) { k[4897] = 2.1e-10 * pow(Tgas/300.0, - -0.3) * exp(-0.0/Tgas); } + if (Tgas>=100.0 && Tgas<41000.0) { k[4897] = 2.1e-10 * pow(Tgas/300.0, + -0.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[4898] = 1.42e-10 * pow(Tgas/300.0, - -1.24) * exp(-57.6/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4898] = 1.42e-10 * pow(Tgas/300.0, + -1.24) * exp(-57.6/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4899] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4899] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4900] = 1.06e-10 * pow(Tgas/300.0, - -0.25) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4900] = 1.06e-10 * pow(Tgas/300.0, + -0.25); } - if (Tgas>5.0 && Tgas<41000.0) { k[4901] = 5.3e-12 * pow(Tgas/300.0, 0.0) - * exp(-770.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4901] = 5.3e-12 * exp(-770.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4902] = 2.5e-10 * pow(Tgas/300.0, - -0.2) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4902] = 2.5e-10 * pow(Tgas/300.0, + -0.2); } - if (Tgas>5.0 && Tgas<41000.0) { k[4903] = 2e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4903] = 2e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[4904] = 3.67e-11 * pow(Tgas/300.0, - -0.35) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4904] = 3.67e-11 * pow(Tgas/300.0, + -0.35); } - if (Tgas>5.0 && Tgas<41000.0) { k[4905] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4905] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4906] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4906] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4907] = 2.5e-10 * pow(Tgas/300.0, - -0.2) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4907] = 2.5e-10 * pow(Tgas/300.0, + -0.2); } - if (Tgas>5.0 && Tgas<41000.0) { k[4908] = 2e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4908] = 2e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[4909] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4909] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[4910] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4910] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4911] = 1.45e-10 * pow(Tgas/300.0, - -0.12) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4911] = 1.45e-10 * pow(Tgas/300.0, + -0.12); } - if (Tgas>5.0 && Tgas<41000.0) { k[4912] = 1.45e-10 * pow(Tgas/300.0, - -0.12) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4912] = 1.45e-10 * pow(Tgas/300.0, + -0.12); } - if (Tgas>5.0 && Tgas<41000.0) { k[4913] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4913] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4914] = 3e-10 * pow(Tgas/300.0, -0.11) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4914] = 3e-10 * pow(Tgas/300.0, + -0.11); } - if (Tgas>5.0 && Tgas<41000.0) { k[4915] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4915] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4916] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4916] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4917] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4917] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4918] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4918] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4919] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4919] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4920] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4920] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4921] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4921] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[4922] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4922] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4923] = 9e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4923] = 9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4924] = 3e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4924] = 3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4925] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4925] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4926] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4926] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4927] = 5.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4927] = 5.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4928] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4928] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4929] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4929] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[4930] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4930] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4931] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4931] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4932] = 7.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4932] = 7.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4933] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4933] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4934] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4934] = 1.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4935] = 8.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4935] = 8.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4936] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4936] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4937] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4937] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[4938] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4938] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[4939] = 9e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4939] = 9e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4940] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4940] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4941] = 2.9e-10 * pow(Tgas/300.0, - -0.08) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4941] = 2.9e-10 * pow(Tgas/300.0, + -0.08); } - if (Tgas>5.0 && Tgas<41000.0) { k[4942] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4942] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4943] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4943] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[4944] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4944] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4945] = 2.69e-12 * pow(Tgas/300.0, - 0.0) * exp(-23550.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4945] = 2.69e-12 * + exp(-23550.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4946] = 3e-10 * pow(Tgas/300.0, -0.01) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4946] = 3e-10 * pow(Tgas/300.0, + -0.01); } - if (Tgas>5.0 && Tgas<41000.0) { k[4947] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4947] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4948] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4948] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4949] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4949] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4950] = 6.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4950] = 6.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4951] = 8e-10 * pow(Tgas/300.0, 0.17) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4951] = 8e-10 * pow(Tgas/300.0, + 0.17); } - if (Tgas>5.0 && Tgas<41000.0) { k[4952] = 2.38e-10 * pow(Tgas/300.0, - -0.11) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4952] = 2.38e-10 * pow(Tgas/300.0, + -0.11); } - if (Tgas>5.0 && Tgas<41000.0) { k[4953] = 4.2e-11 * pow(Tgas/300.0, - -0.11) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4953] = 4.2e-11 * pow(Tgas/300.0, + -0.11); } - if (Tgas>5.0 && Tgas<41000.0) { k[4954] = 2.9e-10 * pow(Tgas/300.0, - -0.08) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4954] = 2.9e-10 * pow(Tgas/300.0, + -0.08); } - if (Tgas>5.0 && Tgas<41000.0) { k[4955] = 6.59e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4955] = 6.59e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4956] = 4.98e-10 * pow(Tgas/300.0, - 0.0) * exp(-18116.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4956] = 4.98e-10 * + exp(-18116.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4957] = 2.94e-11 * pow(Tgas/300.0, - 0.5) * exp(-58025.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4957] = 2.94e-11 * pow(Tgas/300.0, + 0.5) * exp(-58025.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4958] = 1.44e-11 * pow(Tgas/300.0, - 0.5) * exp(-20435.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4958] = 1.44e-11 * pow(Tgas/300.0, + 0.5) * exp(-20435.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4959] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4959] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4960] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4960] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4961] = 6.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4961] = 6.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4962] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4962] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4963] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4963] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4964] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4964] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4965] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4965] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4966] = 1.2e-11 * pow(Tgas/300.0, - 0.58) * exp(-5880.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4966] = 1.2e-11 * pow(Tgas/300.0, + 0.58) * exp(-5880.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4967] = 8.69e-11 * pow(Tgas/300.0, - 0.0) * exp(-22600.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4967] = 8.69e-11 * + exp(-22600.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4968] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4968] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4969] = 3.26e-11 * pow(Tgas/300.0, - -0.1) * exp(+9.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4969] = 3.26e-11 * pow(Tgas/300.0, + -0.1) * exp(+9.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4970] = 3.26e-11 * pow(Tgas/300.0, - -0.1) * exp(+9.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4970] = 3.26e-11 * pow(Tgas/300.0, + -0.1) * exp(+9.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4971] = 9.62e-13 * pow(Tgas/300.0, - 0.0) * exp(-10517.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4971] = 9.62e-13 * + exp(-10517.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4972] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4972] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4973] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-4000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4973] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-4000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4974] = 6e-11 * pow(Tgas/300.0, -0.16) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4974] = 6e-11 * pow(Tgas/300.0, + -0.16); } - if (Tgas>5.0 && Tgas<41000.0) { k[4975] = 9e-11 * pow(Tgas/300.0, -0.16) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4975] = 9e-11 * pow(Tgas/300.0, + -0.16); } - if (Tgas>5.0 && Tgas<41000.0) { k[4976] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-4000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4976] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-4000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4977] = 1.5e-10 * pow(Tgas/300.0, - -0.16) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4977] = 1.5e-10 * pow(Tgas/300.0, + -0.16); } - if (Tgas>5.0 && Tgas<41000.0) { k[4978] = 5.56e-11 * pow(Tgas/300.0, - 0.41) * exp(+26.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4978] = 5.56e-11 * pow(Tgas/300.0, + 0.41) * exp(+26.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4979] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4979] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4980] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4980] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4981] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4981] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4982] = 2.25e-11 * pow(Tgas/300.0, - 0.5) * exp(-14800.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4982] = 2.25e-11 * pow(Tgas/300.0, + 0.5) * exp(-14800.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4983] = 7.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4983] = 7.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4984] = 7e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4984] = 7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4985] = 7e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4985] = 7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4986] = 3.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4986] = 3.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4987] = 3.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4987] = 3.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4988] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4988] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4989] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4989] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[4990] = 6.59e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4990] = 6.59e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4991] = 2.64e-10 * pow(Tgas/300.0, - -0.9) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4991] = 2.64e-10 * pow(Tgas/300.0, + -0.9); } - if (Tgas>5.0 && Tgas<41000.0) { k[4992] = 2.63e-09 * pow(Tgas/300.0, - 0.0) * exp(-6013.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4992] = 2.63e-09 * exp(-6013.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[4993] = 1.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-400.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4993] = 1.8e-10 * exp(-400.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4994] = 3.32e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4994] = 3.32e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[4995] = 4e-10 * pow(Tgas/300.0, 0.0) * - exp(-5000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4995] = 4e-10 * exp(-5000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[4996] = 7.13e-12 * pow(Tgas/300.0, - 0.0) * exp(-5050.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4996] = 7.13e-12 * exp(-5050.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[4997] = 5.3e-12 * pow(Tgas/300.0, 0.0) - * exp(-2500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4997] = 5.3e-12 * exp(-2500.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[4998] = 3.3e-13 * pow(Tgas/300.0, 0.0) - * exp(-3270.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4998] = 3.3e-13 * exp(-3270.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[4999] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[4999] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5000] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5000] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5001] = 8e-12 * pow(Tgas/300.0, 0.0) * - exp(-18000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5001] = 8e-12 * exp(-18000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5002] = 6.91e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5002] = 6.91e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5003] = 2.7e-12 * pow(Tgas/300.0, 0.0) - * exp(-3500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5003] = 2.7e-12 * exp(-3500.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5004] = 3.65e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5004] = 3.65e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5005] = 3.65e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5005] = 3.65e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5006] = 3.65e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5006] = 3.65e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5007] = 2.92e-11 * pow(Tgas/300.0, - -3.3) * exp(-1443.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5007] = 2.92e-11 * pow(Tgas/300.0, + -3.3) * exp(-1443.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5008] = 3.65e-11 * pow(Tgas/300.0, - -3.3) * exp(-1443.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5008] = 3.65e-11 * pow(Tgas/300.0, + -3.3) * exp(-1443.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5009] = 2.48e-10 * pow(Tgas/300.0, - -3.3) * exp(-1443.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5009] = 2.48e-10 * pow(Tgas/300.0, + -3.3) * exp(-1443.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5010] = 3.65e-11 * pow(Tgas/300.0, - -3.3) * exp(-1443.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5010] = 3.65e-11 * pow(Tgas/300.0, + -3.3) * exp(-1443.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5011] = 4.1e-11 * pow(Tgas/300.0, 0.0) - * exp(-750.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5011] = 4.1e-11 * exp(-750.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5012] = 8e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5012] = 8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5013] = 1.33e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5013] = 1.33e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5014] = 5.01e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5014] = 5.01e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5015] = 4.98e-10 * pow(Tgas/300.0, - 0.0) * exp(-6000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5015] = 4.98e-10 * exp(-6000.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5016] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5016] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5017] = 1.44e-11 * pow(Tgas/300.0, - 0.5) * exp(-3000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5017] = 1.44e-11 * pow(Tgas/300.0, + 0.5) * exp(-3000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5018] = 1.44e-11 * pow(Tgas/300.0, - 0.5) * exp(-3000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5018] = 1.44e-11 * pow(Tgas/300.0, + 0.5) * exp(-3000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5019] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5019] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5020] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5020] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5021] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5021] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5022] = 1.84e-10 * pow(Tgas/300.0, - -1.18) * exp(-91.1/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5022] = 1.84e-10 * pow(Tgas/300.0, + -1.18) * exp(-91.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5023] = 1.84e-10 * pow(Tgas/300.0, - -1.18) * exp(-91.1/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5023] = 1.84e-10 * pow(Tgas/300.0, + -1.18) * exp(-91.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5024] = 6.64e-13 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5024] = 6.64e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5025] = 1.7e-10 * pow(Tgas/300.0, - -1.5) * exp(-300.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5025] = 1.7e-10 * pow(Tgas/300.0, + -1.5) * exp(-300.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5026] = 1.66e-08 * pow(Tgas/300.0, - 0.0) * exp(-16556.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5026] = 1.66e-08 * + exp(-16556.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5027] = 1.46e-11 * pow(Tgas/300.0, - 0.1) * exp(-5335.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5027] = 1.46e-11 * pow(Tgas/300.0, + 0.1) * exp(-5335.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5028] = 7.13e-12 * pow(Tgas/300.0, - 0.0) * exp(-5052.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5028] = 7.13e-12 * exp(-5052.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5029] = 9.21e-12 * pow(Tgas/300.0, - 0.7) * exp(-1500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5029] = 9.21e-12 * pow(Tgas/300.0, + 0.7) * exp(-1500.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5030] = 1.34e-15 * pow(Tgas/300.0, - 5.05) * exp(-1636.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5030] = 1.34e-15 * pow(Tgas/300.0, + 5.05) * exp(-1636.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5031] = 2.3e-15 * pow(Tgas/300.0, - 3.47) * exp(-6681.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5031] = 2.3e-15 * pow(Tgas/300.0, + 3.47) * exp(-6681.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5032] = 3.3e-13 * pow(Tgas/300.0, 0.0) - * exp(-1105.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5032] = 3.3e-13 * exp(-1105.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5033] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5033] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5034] = 3.32e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5034] = 3.32e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5035] = 4.76e-17 * pow(Tgas/300.0, - 5.77) * exp(+151.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5035] = 4.76e-17 * pow(Tgas/300.0, + 5.77) * exp(+151.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5036] = 9.55e-14 * pow(Tgas/300.0, - 0.0) * exp(-4890.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5036] = 9.55e-14 * exp(-4890.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5037] = 5.41e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5037] = 5.41e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5038] = 4e-12 * pow(Tgas/300.0, 0.0) * - exp(-7900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5038] = 4e-12 * exp(-7900.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5039] = 5.64e-13 * pow(Tgas/300.0, - 0.0) * exp(-4500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5039] = 5.64e-13 * exp(-4500.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5040] = 1.66e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5040] = 1.66e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5041] = 5.3e-12 * pow(Tgas/300.0, 0.0) - * exp(-34975.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5041] = 5.3e-12 * exp(-34975.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5042] = 6e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5042] = 6e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5043] = 3.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-202.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5043] = 3.6e-11 * exp(-202.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5044] = 1.3e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5044] = 1.3e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5045] = 3.27e-14 * pow(Tgas/300.0, - 2.2) * exp(-2240.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5045] = 3.27e-14 * pow(Tgas/300.0, + 2.2) * exp(-2240.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5046] = 1.7e-12 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5046] = 1.7e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5047] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-1400.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5047] = 1.2e-10 * exp(-1400.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5048] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5048] = 1.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5049] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5049] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5050] = 1.59e-10 * pow(Tgas/300.0, - -1.18) * exp(-91.1/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5050] = 1.59e-10 * pow(Tgas/300.0, + -1.18) * exp(-91.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5051] = 1.59e-10 * pow(Tgas/300.0, - -1.18) * exp(-91.1/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5051] = 1.59e-10 * pow(Tgas/300.0, + -1.18) * exp(-91.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5052] = 2.87e-11 * pow(Tgas/300.0, - -1.23) * exp(-24.8/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5052] = 2.87e-11 * pow(Tgas/300.0, + -1.23) * exp(-24.8/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5053] = 2.42e-10 * pow(Tgas/300.0, - -0.84) * exp(-48.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5053] = 2.42e-10 * pow(Tgas/300.0, + -0.84) * exp(-48.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5054] = 8.07e-10 * pow(Tgas/300.0, - -0.84) * exp(-48.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5054] = 8.07e-10 * pow(Tgas/300.0, + -0.84) * exp(-48.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5055] = 2.08e-11 * pow(Tgas/300.0, - -2.03) * exp(-170.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5055] = 2.08e-11 * pow(Tgas/300.0, + -2.03) * exp(-170.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5056] = 2.08e-11 * pow(Tgas/300.0, - -2.03) * exp(-170.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5056] = 2.08e-11 * pow(Tgas/300.0, + -2.03) * exp(-170.0/Tgas); } - if (Tgas>5.0 && Tgas<1000.0) { k[5057] = 2.02e-11 * pow(Tgas/300.0, 0.0) - * exp(-700.0/Tgas); } + if (Tgas>=5.0 && Tgas<1000.0) { k[5057] = 2.02e-11 * exp(-700.0/Tgas); } - if (Tgas>1000.0 && Tgas<41000.0) { k[5058] = 3.69e-13 * pow(Tgas/300.0, - 2.83) * exp(-103.2/Tgas); } + if (Tgas>=1000.0 && Tgas<41000.0) { k[5058] = 3.69e-13 * pow(Tgas/300.0, + 2.83) * exp(-103.2/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5059] = 3.14e-12 * pow(Tgas/300.0, - 1.53) * exp(-504.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5059] = 3.14e-12 * pow(Tgas/300.0, + 1.53) * exp(-504.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5060] = 6.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-28640.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5060] = 6.7e-11 * exp(-28640.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5061] = 3.77e-13 * pow(Tgas/300.0, - 2.42) * exp(-1162.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5061] = 3.77e-13 * pow(Tgas/300.0, + 2.42) * exp(-1162.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5062] = 3.39e-10 * pow(Tgas/300.0, - 0.0) * exp(-10019.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5062] = 3.39e-10 * + exp(-10019.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5063] = 3.39e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5063] = 3.39e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5064] = 3.92e-10 * pow(Tgas/300.0, - -0.45) * exp(-30.4/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5064] = 3.92e-10 * pow(Tgas/300.0, + -0.45) * exp(-30.4/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5065] = 1.11e-10 * pow(Tgas/300.0, - -0.62) * exp(-32.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5065] = 1.11e-10 * pow(Tgas/300.0, + -0.62) * exp(-32.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5066] = 2.21e-10 * pow(Tgas/300.0, - -0.62) * exp(-32.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5066] = 2.21e-10 * pow(Tgas/300.0, + -0.62) * exp(-32.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5067] = 3.17e-10 * pow(Tgas/300.0, - -4.03) * exp(-397.8/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5067] = 3.17e-10 * pow(Tgas/300.0, + -4.03) * exp(-397.8/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5068] = 4.2e-10 * pow(Tgas/300.0, - -0.23) * exp(-16.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5068] = 4.2e-10 * pow(Tgas/300.0, + -0.23) * exp(-16.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5069] = 2.47e-11 * pow(Tgas/300.0, - -0.52) * exp(-29.2/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5069] = 2.47e-11 * pow(Tgas/300.0, + -0.52) * exp(-29.2/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5070] = 6.17e-11 * pow(Tgas/300.0, - -0.52) * exp(-29.2/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5070] = 6.17e-11 * pow(Tgas/300.0, + -0.52) * exp(-29.2/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5071] = 9e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5071] = 9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5072] = 3.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5072] = 3.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5073] = 2.49e-10 * pow(Tgas/300.0, - -1.93) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5073] = 2.49e-10 * pow(Tgas/300.0, + -1.93); } - if (Tgas>5.0 && Tgas<41000.0) { k[5074] = 1.05e-10 * pow(Tgas/300.0, - -1.04) * exp(-36.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5074] = 1.05e-10 * pow(Tgas/300.0, + -1.04) * exp(-36.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5075] = 2.94e-13 * pow(Tgas/300.0, - 0.5) * exp(-3000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5075] = 2.94e-13 * pow(Tgas/300.0, + 0.5) * exp(-3000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5076] = 9.21e-12 * pow(Tgas/300.0, - 0.7) * exp(-2000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5076] = 9.21e-12 * pow(Tgas/300.0, + 0.7) * exp(-2000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5077] = 2.87e-12 * pow(Tgas/300.0, - 0.7) * exp(-500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5077] = 2.87e-12 * pow(Tgas/300.0, + 0.7) * exp(-500.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5078] = 1.73e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5078] = 1.73e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5079] = 5.6e-13 * pow(Tgas/300.0, - 0.88) * exp(-10128.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5079] = 5.6e-13 * pow(Tgas/300.0, + 0.88) * exp(-10128.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5080] = 1.66e-10 * pow(Tgas/300.0, - -0.09) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5080] = 1.66e-10 * pow(Tgas/300.0, + -0.09); } - if (Tgas>5.0 && Tgas<41000.0) { k[5081] = 3.03e-11 * pow(Tgas/300.0, - 0.65) * exp(-1207.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5081] = 3.03e-11 * pow(Tgas/300.0, + 0.65) * exp(-1207.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5082] = 1.69e-10 * pow(Tgas/300.0, - -0.41) * exp(-19.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5082] = 1.69e-10 * pow(Tgas/300.0, + -0.41) * exp(-19.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5083] = 1.2e-10 * pow(Tgas/300.0, - -0.13) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5083] = 1.2e-10 * pow(Tgas/300.0, + -0.13); } - if (Tgas>5.0 && Tgas<41000.0) { k[5084] = 1.16e-11 * pow(Tgas/300.0, - -0.13) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5084] = 1.16e-11 * pow(Tgas/300.0, + -0.13); } - if (Tgas>5.0 && Tgas<41000.0) { k[5085] = 3.49e-11 * pow(Tgas/300.0, - -0.13) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5085] = 3.49e-11 * pow(Tgas/300.0, + -0.13); } - if (Tgas>5.0 && Tgas<300.0) { k[5086] = 1.14e-11 * pow(Tgas/300.0, - -0.48) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<300.0) { k[5086] = 1.14e-11 * pow(Tgas/300.0, + -0.48); } - if (Tgas>300.0 && Tgas<41000.0) { k[5087] = 1.14e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=300.0 && Tgas<41000.0) { k[5087] = 1.14e-11; } - if (Tgas>5.0 && Tgas<300.0) { k[5088] = 1.14e-11 * pow(Tgas/300.0, - -0.48) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<300.0) { k[5088] = 1.14e-11 * pow(Tgas/300.0, + -0.48); } - if (Tgas>300.0 && Tgas<41000.0) { k[5089] = 1.14e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=300.0 && Tgas<41000.0) { k[5089] = 1.14e-11; } - if (Tgas>5.0 && Tgas<300.0) { k[5090] = 7.6e-12 * pow(Tgas/300.0, -0.48) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<300.0) { k[5090] = 7.6e-12 * pow(Tgas/300.0, + -0.48); } - if (Tgas>300.0 && Tgas<41000.0) { k[5091] = 7.6e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=300.0 && Tgas<41000.0) { k[5091] = 7.6e-12; } - if (Tgas>5.0 && Tgas<300.0) { k[5092] = 7.6e-12 * pow(Tgas/300.0, -0.48) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<300.0) { k[5092] = 7.6e-12 * pow(Tgas/300.0, + -0.48); } - if (Tgas>300.0 && Tgas<41000.0) { k[5093] = 7.6e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=300.0 && Tgas<41000.0) { k[5093] = 7.6e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5094] = 1.44e-11 * pow(Tgas/300.0, - 0.5) * exp(-3000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5094] = 1.44e-11 * pow(Tgas/300.0, + 0.5) * exp(-3000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5095] = 2.94e-13 * pow(Tgas/300.0, - 0.5) * exp(-7550.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5095] = 2.94e-13 * pow(Tgas/300.0, + 0.5) * exp(-7550.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5096] = 6.02e-11 * pow(Tgas/300.0, - 0.1) * exp(+4.5/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5096] = 6.02e-11 * pow(Tgas/300.0, + 0.1) * exp(+4.5/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5097] = 2.52e-11 * pow(Tgas/300.0, - 0.0) * exp(-2381.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5097] = 2.52e-11 * exp(-2381.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5098] = 4e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5098] = 4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5099] = 1.44e-11 * pow(Tgas/300.0, - 0.5) * exp(-5000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5099] = 1.44e-11 * pow(Tgas/300.0, + 0.5) * exp(-5000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5100] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5100] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5101] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-4000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5101] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-4000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5102] = 9e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5102] = 9e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5103] = 1.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5103] = 1.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5104] = 2.72e-10 * pow(Tgas/300.0, - -0.52) * exp(-19.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5104] = 2.72e-10 * pow(Tgas/300.0, + -0.52) * exp(-19.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5105] = 1.25e-10 * pow(Tgas/300.0, - 0.7) * exp(-30.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5105] = 1.25e-10 * pow(Tgas/300.0, + 0.7) * exp(-30.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5106] = 1.25e-10 * pow(Tgas/300.0, - 0.7) * exp(-30.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5106] = 1.25e-10 * pow(Tgas/300.0, + 0.7) * exp(-30.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5107] = 2.72e-10 * pow(Tgas/300.0, - -0.52) * exp(-19.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5107] = 2.72e-10 * pow(Tgas/300.0, + -0.52) * exp(-19.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5108] = 2.72e-10 * pow(Tgas/300.0, - -0.52) * exp(-19.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5108] = 2.72e-10 * pow(Tgas/300.0, + -0.52) * exp(-19.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5109] = 4.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5109] = 4.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5110] = 4.1e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5110] = 4.1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5111] = 2.34e-11 * pow(Tgas/300.0, - 1.02) * exp(+35.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5111] = 2.34e-11 * pow(Tgas/300.0, + 1.02) * exp(+35.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5112] = 2.23e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5112] = 2.23e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5113] = 2.66e-09 * pow(Tgas/300.0, - 0.0) * exp(-21638.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5113] = 2.66e-09 * + exp(-21638.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5114] = 2.6e-10 * pow(Tgas/300.0, - -0.47) * exp(-826.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5114] = 2.6e-10 * pow(Tgas/300.0, + -0.47) * exp(-826.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5115] = 2.72e-10 * pow(Tgas/300.0, - -0.52) * exp(-19.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5115] = 2.72e-10 * pow(Tgas/300.0, + -0.52) * exp(-19.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5116] = 2.5e-17 * pow(Tgas/300.0, - 1.71) * exp(-770.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5116] = 2.5e-17 * pow(Tgas/300.0, + 1.71) * exp(-770.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5117] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5117] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5118] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5118] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5119] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5119] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5120] = 7.02e-11 * pow(Tgas/300.0, - -0.27) * exp(-8.3/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5120] = 7.02e-11 * pow(Tgas/300.0, + -0.27) * exp(-8.3/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5121] = 1.6e-13 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5121] = 1.6e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5122] = 1.62e-10 * pow(Tgas/300.0, - 0.0) * exp(-21205.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5122] = 1.62e-10 * + exp(-21205.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5123] = 5.12e-12 * pow(Tgas/300.0, - -0.49) * exp(+5.2/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5123] = 5.12e-12 * pow(Tgas/300.0, + -0.49) * exp(+5.2/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5124] = 2.02e-11 * pow(Tgas/300.0, - -0.19) * exp(+31.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5124] = 2.02e-11 * pow(Tgas/300.0, + -0.19) * exp(+31.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5125] = 5.71e-11 * pow(Tgas/300.0, - 0.5) * exp(-32010.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5125] = 5.71e-11 * pow(Tgas/300.0, + 0.5) * exp(-32010.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5126] = 2.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5126] = 2.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5127] = 3.32e-12 * pow(Tgas/300.0, - 0.0) * exp(-6170.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5127] = 3.32e-12 * exp(-6170.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5128] = 1.62e-13 * pow(Tgas/300.0, - 0.0) * exp(-8780.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5128] = 1.62e-13 * exp(-8780.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5129] = 1.48e-10 * pow(Tgas/300.0, - 0.0) * exp(-17000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5129] = 1.48e-10 * + exp(-17000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5130] = 5.99e-12 * pow(Tgas/300.0, - 0.0) * exp(-24075.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5130] = 5.99e-12 * + exp(-24075.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5131] = 5.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-12160.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5131] = 5.6e-10 * exp(-12160.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5132] = 5.27e-12 * pow(Tgas/300.0, - 1.4) * exp(-1760.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5132] = 5.27e-12 * pow(Tgas/300.0, + 1.4) * exp(-1760.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5133] = 9.11e-13 * pow(Tgas/300.0, - 2.57) * exp(-130.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5133] = 9.11e-13 * pow(Tgas/300.0, + 2.57) * exp(-130.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5134] = 6.64e-10 * pow(Tgas/300.0, - 0.0) * exp(-11700.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5134] = 6.64e-10 * + exp(-11700.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5135] = 5.18e-11 * pow(Tgas/300.0, - 0.17) * exp(-6400.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5135] = 5.18e-11 * pow(Tgas/300.0, + 0.17) * exp(-6400.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5136] = 6.86e-14 * pow(Tgas/300.0, - 2.74) * exp(-4740.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5136] = 6.86e-14 * pow(Tgas/300.0, + 2.74) * exp(-4740.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5137] = 5.46e-10 * pow(Tgas/300.0, - 0.0) * exp(-1943.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5137] = 5.46e-10 * exp(-1943.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5138] = 4.04e-13 * pow(Tgas/300.0, - 2.87) * exp(-820.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5138] = 4.04e-13 * pow(Tgas/300.0, + 2.87) * exp(-820.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5139] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-400.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5139] = 1e-10 * exp(-400.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5140] = 6.52e-12 * pow(Tgas/300.0, - 0.09) * exp(-8050.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5140] = 6.52e-12 * pow(Tgas/300.0, + 0.09) * exp(-8050.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5141] = 1.69e-09 * pow(Tgas/300.0, - 0.0) * exp(-18095.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5141] = 1.69e-09 * + exp(-18095.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5142] = 2.05e-15 * pow(Tgas/300.0, - 3.89) * exp(-1400.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5142] = 2.05e-15 * pow(Tgas/300.0, + 3.89) * exp(-1400.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5143] = 5.96e-11 * pow(Tgas/300.0, - 0.0) * exp(-7782.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5143] = 5.96e-11 * exp(-7782.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5144] = 2.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-28500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5144] = 2.4e-10 * exp(-28500.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5145] = 3.16e-10 * pow(Tgas/300.0, - 0.0) * exp(-21890.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5145] = 3.16e-10 * + exp(-21890.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5146] = 4.38e-12 * pow(Tgas/300.0, - 0.0) * exp(-10751.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5146] = 4.38e-12 * + exp(-10751.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5147] = 3.14e-13 * pow(Tgas/300.0, - 2.7) * exp(-3150.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5147] = 3.14e-13 * pow(Tgas/300.0, + 2.7) * exp(-3150.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5148] = 2.05e-12 * pow(Tgas/300.0, - 1.52) * exp(-1736.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5148] = 2.05e-12 * pow(Tgas/300.0, + 1.52) * exp(-1736.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5149] = 1.76e-13 * pow(Tgas/300.0, - 2.88) * exp(-6126.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5149] = 1.76e-13 * pow(Tgas/300.0, + 2.88) * exp(-6126.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5150] = 3.3e-12 * pow(Tgas/300.0, 0.0) - * exp(-5870.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5150] = 3.3e-12 * exp(-5870.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5151] = 1.4e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5151] = 1.4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5152] = 4.65e-11 * pow(Tgas/300.0, - 0.0) * exp(-16500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5152] = 4.65e-11 * + exp(-16500.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5153] = 4.67e-10 * pow(Tgas/300.0, - 0.5) * exp(-30450.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5153] = 4.67e-10 * pow(Tgas/300.0, + 0.5) * exp(-30450.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5154] = 3.8e-10 * pow(Tgas/300.0, 0.0) - * exp(-13634.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5154] = 3.8e-10 * exp(-13634.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5155] = 3.32e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5155] = 3.32e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5156] = 2.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5156] = 2.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5157] = 5.68e-11 * pow(Tgas/300.0, - 0.0) * exp(-1897.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5157] = 5.68e-11 * exp(-1897.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5158] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-7600.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5158] = 1e-10 * exp(-7600.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5159] = 5.94e-13 * pow(Tgas/300.0, - 3.0) * exp(-4045.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5159] = 5.94e-13 * pow(Tgas/300.0, + 3.0) * exp(-4045.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5160] = 1.31e-10 * pow(Tgas/300.0, - 0.0) * exp(-80.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5160] = 1.31e-10 * exp(-80.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5161] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5161] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5162] = 3.38e-10 * pow(Tgas/300.0, - 0.0) * exp(-13163.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5162] = 3.38e-10 * + exp(-13163.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5163] = 1.1e-10 * pow(Tgas/300.0, 0.5) - * exp(-77700.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5163] = 1.1e-10 * pow(Tgas/300.0, + 0.5) * exp(-77700.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5164] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5164] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5165] = 4.85e-12 * pow(Tgas/300.0, - 1.9) * exp(-1379.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5165] = 4.85e-12 * pow(Tgas/300.0, + 1.9) * exp(-1379.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5166] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-1800.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5166] = 1.7e-11 * exp(-1800.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5167] = 8e-11 * pow(Tgas/300.0, 0.0) * - exp(-4000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5167] = 8e-11 * exp(-4000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5168] = 1.59e-11 * pow(Tgas/300.0, - 1.2) * exp(-9610.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5168] = 1.59e-11 * pow(Tgas/300.0, + 1.2) * exp(-9610.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5169] = 3.71e-12 * pow(Tgas/300.0, - 1.94) * exp(-455.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5169] = 3.71e-12 * pow(Tgas/300.0, + 1.94) * exp(-455.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5170] = 6.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-12500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5170] = 6.2e-10 * exp(-12500.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5171] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5171] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5172] = 6.61e-11 * pow(Tgas/300.0, - 0.0) * exp(-51598.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5172] = 6.61e-11 * + exp(-51598.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5173] = 1.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5173] = 1.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5174] = 1.14e-13 * pow(Tgas/300.0, - 4.23) * exp(+114.6/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5174] = 1.14e-13 * pow(Tgas/300.0, + 4.23) * exp(+114.6/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5175] = 1.05e-09 * pow(Tgas/300.0, - -0.3) * exp(-14730.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5175] = 1.05e-09 * pow(Tgas/300.0, + -0.3) * exp(-14730.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5176] = 4.5e-11 * pow(Tgas/300.0, - 0.72) * exp(-329.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5176] = 4.5e-11 * pow(Tgas/300.0, + 0.72) * exp(-329.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5177] = 2.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-9010.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5177] = 2.4e-09 * pow(Tgas/300.0, + -0.5) * exp(-9010.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5178] = 2.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5178] = 2.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5179] = 5.13e-14 * pow(Tgas/300.0, - 3.15) * exp(-3603.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5179] = 5.13e-14 * pow(Tgas/300.0, + 3.15) * exp(-3603.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5180] = 4.96e-07 * pow(Tgas/300.0, - -2.16) * exp(-18700.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5180] = 4.96e-07 * pow(Tgas/300.0, + -2.16) * exp(-18700.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5181] = 1.48e-10 * pow(Tgas/300.0, - 0.0) * exp(-3588.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5181] = 1.48e-10 * exp(-3588.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5182] = 4.56e-12 * pow(Tgas/300.0, - 1.02) * exp(-2161.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5182] = 4.56e-12 * pow(Tgas/300.0, + 1.02) * exp(-2161.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5183] = 7.8e-13 * pow(Tgas/300.0, 2.4) - * exp(-4990.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5183] = 7.8e-13 * pow(Tgas/300.0, + 2.4) * exp(-4990.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5184] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-2400.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5184] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-2400.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5185] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-740.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5185] = 1.4e-10 * exp(-740.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5186] = 9.29e-10 * pow(Tgas/300.0, - -0.1) * exp(-35220.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5186] = 9.29e-10 * pow(Tgas/300.0, + -0.1) * exp(-35220.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5187] = 3.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-24910.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5187] = 3.6e-10 * exp(-24910.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5188] = 7.27e-11 * pow(Tgas/300.0, - 0.5) * exp(-15700.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5188] = 7.27e-11 * pow(Tgas/300.0, + 0.5) * exp(-15700.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5189] = 7.27e-11 * pow(Tgas/300.0, - 0.5) * exp(-20735.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5189] = 7.27e-11 * pow(Tgas/300.0, + 0.5) * exp(-20735.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5190] = 2.61e-10 * pow(Tgas/300.0, - 0.0) * exp(-8156.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5190] = 2.61e-10 * exp(-8156.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5191] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-866.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5191] = 5e-11 * exp(-866.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5192] = 2.06e-11 * pow(Tgas/300.0, - 0.84) * exp(-277.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5192] = 2.06e-11 * pow(Tgas/300.0, + 0.84) * exp(-277.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5193] = 1.66e-10 * pow(Tgas/300.0, - 0.0) * exp(-413.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5193] = 1.66e-10 * exp(-413.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5194] = 1.87e-11 * pow(Tgas/300.0, - 0.9) * exp(-2924.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5194] = 1.87e-11 * pow(Tgas/300.0, + 0.9) * exp(-2924.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5195] = 1.26e-10 * pow(Tgas/300.0, - 0.0) * exp(-515.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5195] = 1.26e-10 * exp(-515.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5196] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5196] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5197] = 1.23e-11 * pow(Tgas/300.0, - 0.0) * exp(-1949.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5197] = 1.23e-11 * exp(-1949.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5198] = 6.99e-14 * pow(Tgas/300.0, - 2.8) * exp(-1950.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5198] = 6.99e-14 * pow(Tgas/300.0, + 2.8) * exp(-1950.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5199] = 2.25e-10 * pow(Tgas/300.0, - 0.5) * exp(-8355.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5199] = 2.25e-10 * pow(Tgas/300.0, + 0.5) * exp(-8355.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5200] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-19930.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5200] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-19930.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5201] = 5.9e-10 * pow(Tgas/300.0, - -0.31) * exp(-11100.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5201] = 5.9e-10 * pow(Tgas/300.0, + -0.31) * exp(-11100.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5202] = 3.33e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5202] = 3.33e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5203] = 3.33e-11 * pow(Tgas/300.0, - 0.0) * exp(-195.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5203] = 3.33e-11 * exp(-195.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5204] = 3.63e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5204] = 3.63e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5205] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5205] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5206] = 1e-12 * pow(Tgas/300.0, 0.0) * - exp(-1000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5206] = 1e-12 * exp(-1000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5207] = 1.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5207] = 1.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5208] = 7.6e-13 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5208] = 7.6e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5209] = 4.64e-12 * pow(Tgas/300.0, - 0.7) * exp(+25.6/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5209] = 4.64e-12 * pow(Tgas/300.0, + 0.7) * exp(+25.6/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5210] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5210] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5211] = 2.43e-12 * pow(Tgas/300.0, - 1.44) * exp(-1240.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5211] = 2.43e-12 * pow(Tgas/300.0, + 1.44) * exp(-1240.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5212] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5212] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5213] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5213] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5214] = 1e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5214] = 1e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5215] = 3.33e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5215] = 3.33e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5216] = 3.33e-11 * pow(Tgas/300.0, - 0.0) * exp(-2470.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5216] = 3.33e-11 * exp(-2470.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5217] = 3.33e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5217] = 3.33e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5218] = 3.33e-11 * pow(Tgas/300.0, - 0.0) * exp(-3570.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5218] = 3.33e-11 * exp(-3570.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5219] = 1.3e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5219] = 1.3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5220] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-55200.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5220] = 1e-10 * exp(-55200.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5221] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5221] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5222] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5222] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5223] = 1.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5223] = 1.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5224] = 6.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5224] = 6.2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5225] = 3.69e-14 * pow(Tgas/300.0, - 0.0) * exp(-161.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5225] = 3.69e-14 * exp(-161.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5226] = 7.15e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5226] = 7.15e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5227] = 3.85e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5227] = 3.85e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5228] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5228] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5229] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5229] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5230] = 5.5e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5230] = 5.5e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5231] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5231] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5232] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5232] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5233] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5233] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5234] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5234] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5235] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5235] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5236] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5236] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5237] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5237] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5238] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5238] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5239] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5239] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5240] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5240] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5241] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5241] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5242] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5242] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5243] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5243] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5244] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5244] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5245] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5245] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5246] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5246] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5247] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5247] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5248] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5248] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5249] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5249] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5250] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5250] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5251] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5251] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5252] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5252] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5253] = 3.95e-11 * pow(Tgas/300.0, - 0.17) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5253] = 3.95e-11 * pow(Tgas/300.0, + 0.17); } - if (Tgas>5.0 && Tgas<41000.0) { k[5254] = 3.95e-11 * pow(Tgas/300.0, - 0.17) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5254] = 3.95e-11 * pow(Tgas/300.0, + 0.17); } - if (Tgas>5.0 && Tgas<41000.0) { k[5255] = 9.96e-13 * pow(Tgas/300.0, - 0.0) * exp(-20380.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5255] = 9.96e-13 * + exp(-20380.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5256] = 8e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5256] = 8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5257] = 7.4e-11 * pow(Tgas/300.0, - 0.26) * exp(-8.4/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5257] = 7.4e-11 * pow(Tgas/300.0, + 0.26) * exp(-8.4/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5258] = 1.3e-11 * pow(Tgas/300.0, 0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5258] = 1.3e-11 * pow(Tgas/300.0, + 0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5259] = 3.32e-13 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5259] = 3.32e-13; } - if (Tgas>5.0 && Tgas<300.0) { k[5260] = 1e-10 * pow(Tgas/300.0, 0.18) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<300.0) { k[5260] = 1e-10 * pow(Tgas/300.0, 0.18); + } - if (Tgas>300.0 && Tgas<41000.0) { k[5261] = 1e-10 * pow(Tgas/300.0, 0.4) - * exp(-0.0/Tgas); } + if (Tgas>=300.0 && Tgas<41000.0) { k[5261] = 1e-10 * pow(Tgas/300.0, + 0.4); } - if (Tgas>5.0 && Tgas<41000.0) { k[5262] = 3.2e-13 * pow(Tgas/300.0, 0.0) - * exp(-1710.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5262] = 3.2e-13 * exp(-1710.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5263] = 3.8e-11 * pow(Tgas/300.0, 0.5) - * exp(-1160.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5263] = 3.8e-11 * pow(Tgas/300.0, + 0.5) * exp(-1160.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5264] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-200.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5264] = 1e-10 * exp(-200.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5265] = 5.71e-12 * pow(Tgas/300.0, - 0.5) * exp(-1000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5265] = 5.71e-12 * pow(Tgas/300.0, + 0.5) * exp(-1000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5266] = 1.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5266] = 1.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5267] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5267] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5268] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5268] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5269] = 1.43e-12 * pow(Tgas/300.0, - 0.5) * exp(-1500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5269] = 1.43e-12 * pow(Tgas/300.0, + 0.5) * exp(-1500.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5270] = 2.94e-12 * pow(Tgas/300.0, - 0.5) * exp(-1000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5270] = 2.94e-12 * pow(Tgas/300.0, + 0.5) * exp(-1000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5271] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5271] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5272] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-9060.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5272] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-9060.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5273] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5273] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5274] = 4.98e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5274] = 4.98e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5275] = 2.41e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5275] = 2.41e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5276] = 3e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5276] = 3e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5277] = 1e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5277] = 1e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5278] = 1e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5278] = 1e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5279] = 3.38e-11 * pow(Tgas/300.0, - -0.17) * exp(+2.8/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5279] = 3.38e-11 * pow(Tgas/300.0, + -0.17) * exp(+2.8/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5280] = 3e-11 * pow(Tgas/300.0, -0.6) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5280] = 3e-11 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[5281] = 2.26e-12 * pow(Tgas/300.0, - 0.86) * exp(-3134.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5281] = 2.26e-12 * pow(Tgas/300.0, + 0.86) * exp(-3134.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5282] = 1.7e-13 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5282] = 1.7e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5283] = 6.05e-11 * pow(Tgas/300.0, - -0.23) * exp(-14.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5283] = 6.05e-11 * pow(Tgas/300.0, + -0.23) * exp(-14.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5284] = 1.88e-11 * pow(Tgas/300.0, - 0.1) * exp(-10700.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5284] = 1.88e-11 * pow(Tgas/300.0, + 0.1) * exp(-10700.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5285] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5285] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5286] = 1e-18 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5286] = 1e-18; } - if (Tgas>5.0 && Tgas<41000.0) { k[5287] = 2.55e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5287] = 2.55e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5288] = 3e-11 * pow(Tgas/300.0, -0.6) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5288] = 3e-11 * pow(Tgas/300.0, + -0.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[5289] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-4000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5289] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-4000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5290] = 4.68e-11 * pow(Tgas/300.0, - 0.5) * exp(-8254.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5290] = 4.68e-11 * pow(Tgas/300.0, + 0.5) * exp(-8254.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5291] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-750.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5291] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-750.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5292] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5292] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5293] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5293] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5294] = 8e-11 * pow(Tgas/300.0, 0.17) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5294] = 8e-11 * pow(Tgas/300.0, + 0.17); } - if (Tgas>5.0 && Tgas<41000.0) { k[5295] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5295] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5296] = 1.66e-10 * pow(Tgas/300.0, - -0.09) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5296] = 1.66e-10 * pow(Tgas/300.0, + -0.09); } - if (Tgas>5.0 && Tgas<41000.0) { k[5297] = 2.9e-13 * pow(Tgas/300.0, - 2.87) * exp(-5380.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5297] = 2.9e-13 * pow(Tgas/300.0, + 2.87) * exp(-5380.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5298] = 4.27e-11 * pow(Tgas/300.0, - -2.5) * exp(-331.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5298] = 4.27e-11 * pow(Tgas/300.0, + -2.5) * exp(-331.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5299] = 1.49e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5299] = 1.49e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5300] = 1.35e-12 * pow(Tgas/300.0, - 1.25) * exp(+43.5/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5300] = 1.35e-12 * pow(Tgas/300.0, + 1.25) * exp(+43.5/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5301] = 2.08e-13 * pow(Tgas/300.0, - 0.76) * exp(-262.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5301] = 2.08e-13 * pow(Tgas/300.0, + 0.76) * exp(-262.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5302] = 2.75e-11 * pow(Tgas/300.0, - -1.14) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5302] = 2.75e-11 * pow(Tgas/300.0, + -1.14); } - if (Tgas>5.0 && Tgas<41000.0) { k[5303] = 1.38e-11 * pow(Tgas/300.0, - -1.14) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5303] = 1.38e-11 * pow(Tgas/300.0, + -1.14); } - if (Tgas>5.0 && Tgas<41000.0) { k[5304] = 6.63e-16 * pow(Tgas/300.0, - 6.13) * exp(-5895.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5304] = 6.63e-16 * pow(Tgas/300.0, + 6.13) * exp(-5895.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5305] = 2.94e-12 * pow(Tgas/300.0, - 0.5) * exp(-1000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5305] = 2.94e-12 * pow(Tgas/300.0, + 0.5) * exp(-1000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5306] = 1.83e-12 * pow(Tgas/300.0, - 1.6) * exp(-14090.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5306] = 1.83e-12 * pow(Tgas/300.0, + 1.6) * exp(-14090.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5307] = 5.25e-10 * pow(Tgas/300.0, - 0.0) * exp(-13470.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5307] = 5.25e-10 * + exp(-13470.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5308] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5308] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5309] = 1.16e-09 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5309] = 1.16e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[5310] = 1.81e-13 * pow(Tgas/300.0, - 1.8) * exp(+70.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5310] = 1.81e-13 * pow(Tgas/300.0, + 1.8) * exp(+70.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5311] = 2.44e-11 * pow(Tgas/300.0, - -1.94) * exp(-56.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5311] = 2.44e-11 * pow(Tgas/300.0, + -1.94) * exp(-56.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5312] = 1.7e-11 * pow(Tgas/300.0, - -1.94) * exp(-56.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5312] = 1.7e-11 * pow(Tgas/300.0, + -1.94) * exp(-56.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5313] = 7.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-10540.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5313] = 7.4e-10 * exp(-10540.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5314] = 1.33e-11 * pow(Tgas/300.0, - -0.78) * exp(-40.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5314] = 1.33e-11 * pow(Tgas/300.0, + -0.78) * exp(-40.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5315] = 5.33e-11 * pow(Tgas/300.0, - -0.78) * exp(-40.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5315] = 5.33e-11 * pow(Tgas/300.0, + -0.78) * exp(-40.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5316] = 6.88e-14 * pow(Tgas/300.0, - 2.07) * exp(-3281.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5316] = 6.88e-14 * pow(Tgas/300.0, + 2.07) * exp(-3281.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5317] = 2.54e-14 * pow(Tgas/300.0, - 1.18) * exp(-312.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5317] = 2.54e-14 * pow(Tgas/300.0, + 1.18) * exp(-312.0/Tgas); } - if (Tgas>5.0 && Tgas<300.0) { k[5318] = 6.6e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<300.0) { k[5318] = 6.6e-11; } - if (Tgas>300.0 && Tgas<41000.0) { k[5319] = 1.8e-10 * pow(Tgas/300.0, - 0.0) * exp(-300.0/Tgas); } + if (Tgas>=300.0 && Tgas<41000.0) { k[5319] = 1.8e-10 * exp(-300.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5320] = 1.16e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5320] = 1.16e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5321] = 3.11e-12 * pow(Tgas/300.0, - 1.2) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5321] = 3.11e-12 * pow(Tgas/300.0, + 1.2); } - if (Tgas>5.0 && Tgas<41000.0) { k[5322] = 3.32e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5322] = 3.32e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5323] = 2.93e-12 * pow(Tgas/300.0, - 0.1) * exp(-5800.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5323] = 2.93e-12 * pow(Tgas/300.0, + 0.1) * exp(-5800.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5324] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-4000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5324] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-4000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5325] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5325] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5326] = 1.41e-11 * pow(Tgas/300.0, - 0.0) * exp(-14890.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5326] = 1.41e-11 * + exp(-14890.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5327] = 2.92e-13 * pow(Tgas/300.0, - 2.23) * exp(-23292.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5327] = 2.92e-13 * pow(Tgas/300.0, + 2.23) * exp(-23292.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5328] = 7.22e-12 * pow(Tgas/300.0, - 0.0) * exp(-33155.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5328] = 7.22e-12 * + exp(-33155.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5329] = 2.51e-11 * pow(Tgas/300.0, - 0.0) * exp(-30653.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5329] = 2.51e-11 * + exp(-30653.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5330] = 2.8e-12 * pow(Tgas/300.0, 0.0) - * exp(-23400.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5330] = 2.8e-12 * exp(-23400.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5331] = 4.55e-11 * pow(Tgas/300.0, - -1.33) * exp(-242.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5331] = 4.55e-11 * pow(Tgas/300.0, + -1.33) * exp(-242.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5332] = 3.47e-11 * pow(Tgas/300.0, - -1.33) * exp(-242.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5332] = 3.47e-11 * pow(Tgas/300.0, + -1.33) * exp(-242.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5333] = 2.94e-11 * pow(Tgas/300.0, - 0.5) * exp(-17465.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5333] = 2.94e-11 * pow(Tgas/300.0, + 0.5) * exp(-17465.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5334] = 1.75e-10 * pow(Tgas/300.0, - 0.0) * exp(-20200.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5334] = 1.75e-10 * + exp(-20200.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5335] = 1.32e-12 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5335] = 1.32e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5336] = 8.1e-11 * pow(Tgas/300.0, 0.0) - * exp(-773.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5336] = 8.1e-11 * exp(-773.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5337] = 1.76e-12 * pow(Tgas/300.0, - 0.81) * exp(+30.8/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5337] = 1.76e-12 * pow(Tgas/300.0, + 0.81) * exp(+30.8/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5338] = 1.1e-14 * pow(Tgas/300.0, - 1.89) * exp(-1538.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5338] = 1.1e-14 * pow(Tgas/300.0, + 1.89) * exp(-1538.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5339] = 1e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5339] = 1e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5340] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5340] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5341] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5341] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5342] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5342] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5343] = 2e-10 * pow(Tgas/300.0, -0.12) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5343] = 2e-10 * pow(Tgas/300.0, + -0.12); } - if (Tgas>5.0 && Tgas<41000.0) { k[5344] = 1.15e-12 * pow(Tgas/300.0, - 1.4) * exp(-1110.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5344] = 1.15e-12 * pow(Tgas/300.0, + 1.4) * exp(-1110.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5345] = 1.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5345] = 1.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5346] = 2.42e-13 * pow(Tgas/300.0, - 2.13) * exp(-1338.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5346] = 2.42e-13 * pow(Tgas/300.0, + 2.13) * exp(-1338.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5347] = 5.11e-14 * pow(Tgas/300.0, - 1.88) * exp(-92.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5347] = 5.11e-14 * pow(Tgas/300.0, + 1.88) * exp(-92.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5348] = 4.2e-11 * pow(Tgas/300.0, 0.0) - * exp(-2520.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5348] = 4.2e-11 * exp(-2520.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5349] = 1.52e-12 * pow(Tgas/300.0, - 1.55) * exp(-215.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5349] = 1.52e-12 * pow(Tgas/300.0, + 1.55) * exp(-215.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5350] = 1.33e-10 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5350] = 1.33e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5351] = 2.67e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5351] = 2.67e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5352] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5352] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5353] = 6e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5353] = 6e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5354] = 8.59e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5354] = 8.59e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5355] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5355] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5356] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5356] = 5e-12 * exp(-900.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5357] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5357] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5358] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5358] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5359] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5359] = 5e-12 * exp(-900.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5360] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5360] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5361] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5361] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5362] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5362] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5363] = 6e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5363] = 6e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5364] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5364] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5365] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5365] = 5e-12 * exp(-900.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5366] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5366] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5367] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5367] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5368] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5368] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5369] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5369] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5370] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5370] = 5e-12 * exp(-900.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5371] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5371] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5372] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5372] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5373] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5373] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5374] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5374] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5375] = 5e-12 * pow(Tgas/300.0, 0.0) * - exp(-900.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5375] = 5e-12 * exp(-900.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5376] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5376] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5377] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5377] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5378] = 6e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5378] = 6e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5379] = 9.96e-11 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5379] = 9.96e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5380] = 1.38e-10 * pow(Tgas/300.0, - 0.0) * exp(-16050.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5380] = 1.38e-10 * + exp(-16050.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5381] = 1.27e-11 * pow(Tgas/300.0, - -0.09) * exp(-798.7/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5381] = 1.27e-11 * pow(Tgas/300.0, + -0.09) * exp(-798.7/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5382] = 2.3e-12 * pow(Tgas/300.0, - 2.04) * exp(-90.5/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5382] = 2.3e-12 * pow(Tgas/300.0, + 2.04) * exp(-90.5/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5383] = 2.11e-12 * pow(Tgas/300.0, - 2.04) * exp(-90.5/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5383] = 2.11e-12 * pow(Tgas/300.0, + 2.04) * exp(-90.5/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5384] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5384] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5385] = 2.29e-12 * pow(Tgas/300.0, - 2.2) * exp(-3820.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5385] = 2.29e-12 * pow(Tgas/300.0, + 2.2) * exp(-3820.0/Tgas); } - if (Tgas>5.0 && Tgas<295.0) { k[5386] = 2.54e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<295.0) { k[5386] = 2.54e-11; } - if (Tgas>295.0 && Tgas<41000.0) { k[5387] = 5e-11 * pow(Tgas/300.0, 0.0) - * exp(-200.0/Tgas); } + if (Tgas>=295.0 && Tgas<41000.0) { k[5387] = 5e-11 * exp(-200.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5388] = 5.37e-11 * pow(Tgas/300.0, - 0.0) * exp(-13800.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5388] = 5.37e-11 * + exp(-13800.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5389] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5389] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5390] = 2.46e-11 * pow(Tgas/300.0, - 0.0) * exp(-26567.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5390] = 2.46e-11 * + exp(-26567.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5391] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5391] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5392] = 2.48e-10 * pow(Tgas/300.0, - -0.65) * exp(-783.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5392] = 2.48e-10 * pow(Tgas/300.0, + -0.65) * exp(-783.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5393] = 4.68e-11 * pow(Tgas/300.0, - 0.5) * exp(-28940.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5393] = 4.68e-11 * pow(Tgas/300.0, + 0.5) * exp(-28940.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5394] = 3.8e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5394] = 3.8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5395] = 5e-11 * pow(Tgas/300.0, 0.5) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5395] = 5e-11 * pow(Tgas/300.0, 0.5); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5396] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5396] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5397] = 1.07e-11 * pow(Tgas/300.0, - 1.17) * exp(-1242.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5397] = 1.07e-11 * pow(Tgas/300.0, + 1.17) * exp(-1242.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5398] = 8.54e-14 * pow(Tgas/300.0, - 3.25) * exp(-1200.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5398] = 8.54e-14 * pow(Tgas/300.0, + 3.25) * exp(-1200.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5399] = 1.85e-11 * pow(Tgas/300.0, - 0.95) * exp(-8571.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5399] = 1.85e-11 * pow(Tgas/300.0, + 0.95) * exp(-8571.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5400] = 2.98e-12 * pow(Tgas/300.0, - 1.62) * exp(-1462.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5400] = 2.98e-12 * pow(Tgas/300.0, + 1.62) * exp(-1462.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5401] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5401] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5402] = 6.21e-10 * pow(Tgas/300.0, - 0.0) * exp(-12439.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5402] = 6.21e-10 * + exp(-12439.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5403] = 7.3e-13 * pow(Tgas/300.0, - 1.14) * exp(-3742.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5403] = 7.3e-13 * pow(Tgas/300.0, + 1.14) * exp(-3742.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5404] = 1.36e-12 * pow(Tgas/300.0, - 1.38) * exp(-3693.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5404] = 1.36e-12 * pow(Tgas/300.0, + 1.38) * exp(-3693.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5405] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5405] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5406] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5406] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5407] = 3.61e-13 * pow(Tgas/300.0, - 2.1) * exp(-3080.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5407] = 3.61e-13 * pow(Tgas/300.0, + 2.1) * exp(-3080.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5408] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5408] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5409] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5409] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5410] = 2e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5410] = 2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5411] = 1e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5411] = 1e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5412] = 3.8e-11 * pow(Tgas/300.0, - -0.08) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5412] = 3.8e-11 * pow(Tgas/300.0, + -0.08); } - if (Tgas>5.0 && Tgas<41000.0) { k[5413] = 2.94e-12 * pow(Tgas/300.0, - 0.5) * exp(-3500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5413] = 2.94e-12 * pow(Tgas/300.0, + 0.5) * exp(-3500.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5414] = 3.8e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5414] = 3.8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5415] = 1.74e-11 * pow(Tgas/300.0, - 0.67) * exp(-956.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5415] = 1.74e-11 * pow(Tgas/300.0, + 0.67) * exp(-956.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5416] = 1.74e-10 * pow(Tgas/300.0, - -0.2) * exp(-5.7/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5416] = 1.74e-10 * pow(Tgas/300.0, + -0.2) * exp(-5.7/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5417] = 2.51e-10 * pow(Tgas/300.0, - 0.0) * exp(-38602.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5417] = 2.51e-10 * + exp(-38602.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5418] = 1.15e-10 * pow(Tgas/300.0, - 0.0) * exp(-13400.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5418] = 1.15e-10 * + exp(-13400.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5419] = 1.66e-10 * pow(Tgas/300.0, - 0.0) * exp(-14100.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5419] = 1.66e-10 * + exp(-14100.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5420] = 6.3e-11 * pow(Tgas/300.0, - -0.1) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5420] = 6.3e-11 * pow(Tgas/300.0, + -0.1); } - if (Tgas>5.0 && Tgas<41000.0) { k[5421] = 7e-12 * pow(Tgas/300.0, -0.1) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5421] = 7e-12 * pow(Tgas/300.0, + -0.1); } - if (Tgas>5.0 && Tgas<41000.0) { k[5422] = 1.89e-11 * pow(Tgas/300.0, - 0.0) * exp(-4003.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5422] = 1.89e-11 * exp(-4003.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5423] = 9.82e-12 * pow(Tgas/300.0, - -0.21) * exp(-5.2/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5423] = 9.82e-12 * pow(Tgas/300.0, + -0.21) * exp(-5.2/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5424] = 1.18e-11 * pow(Tgas/300.0, - 0.0) * exp(-20413.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5424] = 1.18e-11 * + exp(-20413.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5425] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5425] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5426] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5426] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5427] = 5.76e-11 * pow(Tgas/300.0, - -0.3) * exp(-7.5/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5427] = 5.76e-11 * pow(Tgas/300.0, + -0.3) * exp(-7.5/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5428] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5428] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5429] = 4.02e-10 * pow(Tgas/300.0, - -1.43) * exp(-3501.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5429] = 4.02e-10 * pow(Tgas/300.0, + -1.43) * exp(-3501.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5430] = 8.3e-11 * pow(Tgas/300.0, 0.0) - * exp(-5530.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5430] = 8.3e-11 * exp(-5530.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5431] = 1.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-2150.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5431] = 1.6e-11 * exp(-2150.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5432] = 3.69e-11 * pow(Tgas/300.0, - -0.27) * exp(-12.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5432] = 3.69e-11 * pow(Tgas/300.0, + -0.27) * exp(-12.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5433] = 8e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5433] = 8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5434] = 2e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5434] = 2e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5435] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5435] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5436] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5436] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5437] = 1.7e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5437] = 1.7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5438] = 9.01e-12 * pow(Tgas/300.0, - 0.0) * exp(-9837.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5438] = 9.01e-12 * exp(-9837.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5439] = 6.6e-13 * pow(Tgas/300.0, 0.0) - * exp(-2760.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5439] = 6.6e-13 * exp(-2760.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5440] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5440] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5441] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5441] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5442] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5442] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5443] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5443] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5444] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5444] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5445] = 8e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5445] = 8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5446] = 1.2e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5446] = 1.2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5447] = 1.4e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5447] = 1.4e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5448] = 1.98e-11 * pow(Tgas/300.0, - 0.0) * exp(-1183.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5448] = 1.98e-11 * exp(-1183.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5449] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5449] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5450] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5450] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5451] = 5.75e-11 * pow(Tgas/300.0, - 0.1) * exp(-200.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5451] = 5.75e-11 * pow(Tgas/300.0, + 0.1) * exp(-200.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5452] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5452] = 1e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5453] = 1.05e-13 * pow(Tgas/300.0, - 2.68) * exp(-6060.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5453] = 1.05e-13 * pow(Tgas/300.0, + 2.68) * exp(-6060.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5454] = 1.84e-11 * pow(Tgas/300.0, - 0.0) * exp(-5027.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5454] = 1.84e-11 * exp(-5027.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5455] = 4.75e-17 * pow(Tgas/300.0, - 3.16) * exp(+128.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5455] = 4.75e-17 * pow(Tgas/300.0, + 3.16) * exp(+128.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5456] = 5e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5456] = 5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5457] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5457] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5458] = 1.04e-18 * pow(Tgas/300.0, - 8.8) * exp(-250.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5458] = 1.04e-18 * pow(Tgas/300.0, + 8.8) * exp(-250.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5459] = 1e-11 * pow(Tgas/300.0, 0.0) * - exp(-1000.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5459] = 1e-11 * exp(-1000.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5460] = 7e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5460] = 7e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5461] = 2.81e-13 * pow(Tgas/300.0, - 0.0) * exp(-176.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5461] = 2.81e-13 * exp(-176.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5462] = 3e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5462] = 3e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5463] = 1.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5463] = 1.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5464] = 1.6e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5464] = 1.6e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5465] = 7.76e-12 * pow(Tgas/300.0, - 0.82) * exp(+30.6/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5465] = 7.76e-12 * pow(Tgas/300.0, + 0.82) * exp(+30.6/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5466] = 2e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5466] = 2e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5467] = 5.26e-12 * pow(Tgas/300.0, - 0.0) * exp(-307.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5467] = 5.26e-12 * exp(-307.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5468] = 6.3e-12 * pow(Tgas/300.0, 0.0) - * exp(-80.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5468] = 6.3e-12 * exp(-80.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5469] = 1.87e-13 * pow(Tgas/300.0, - 1.5) * exp(-3887.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5469] = 1.87e-13 * pow(Tgas/300.0, + 1.5) * exp(-3887.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5470] = 1.07e-13 * pow(Tgas/300.0, - 0.0) * exp(-5892.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5470] = 1.07e-13 * exp(-5892.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5471] = 1.7e-10 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5471] = 1.7e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5472] = 6.17e-12 * pow(Tgas/300.0, - 1.23) * exp(+44.3/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5472] = 6.17e-12 * pow(Tgas/300.0, + 1.23) * exp(+44.3/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5473] = 1.04e-17 * pow(Tgas/300.0, - 4.33) * exp(-12623.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5473] = 1.04e-17 * pow(Tgas/300.0, + 4.33) * exp(-12623.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5474] = 3.7e-13 * pow(Tgas/300.0, 0.0) - * exp(-2740.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5474] = 3.7e-13 * exp(-2740.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5475] = 3.11e-13 * pow(Tgas/300.0, - 0.0) * exp(-1450.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5475] = 3.11e-13 * exp(-1450.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5476] = 1.47e-13 * pow(Tgas/300.0, - 2.05) * exp(-7.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5476] = 1.47e-13 * pow(Tgas/300.0, + 2.05) * exp(-7.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5477] = 5.2e-12 * pow(Tgas/300.0, 0.0) - * exp(-15100.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5477] = 5.2e-12 * exp(-15100.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5478] = 8.58e-11 * pow(Tgas/300.0, - -0.56) * exp(-14.8/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5478] = 8.58e-11 * pow(Tgas/300.0, + -0.56) * exp(-14.8/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5479] = 1.65e-12 * pow(Tgas/300.0, - 1.14) * exp(-50.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5479] = 1.65e-12 * pow(Tgas/300.0, + 1.14) * exp(-50.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5480] = 6.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5480] = 6.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5481] = 8.6e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5481] = 8.6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5482] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5482] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5483] = 2e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5483] = 2e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5484] = 1e-13 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5484] = 1e-13; } - if (Tgas>5.0 && Tgas<41000.0) { k[5485] = 1e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5485] = 1e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5486] = 8e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5486] = 8e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5487] = 4e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5487] = 4e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5488] = 4.5e-11 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5488] = 4.5e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5489] = 9.76e-12 * pow(Tgas/300.0, - 0.0) * exp(-4545.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5489] = 9.76e-12 * exp(-4545.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5490] = 1.73e-11 * pow(Tgas/300.0, - 0.5) * exp(-11500.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5490] = 1.73e-11 * pow(Tgas/300.0, + 0.5) * exp(-11500.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5491] = 2.72e-11 * pow(Tgas/300.0, - 0.0) * exp(-282.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5491] = 2.72e-11 * exp(-282.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5492] = 1.3e-09 * pow(Tgas/300.0, 0.0) - * exp(-34513.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5492] = 1.3e-09 * exp(-34513.0/Tgas); + } - if (Tgas>5.0 && Tgas<41000.0) { k[5493] = 9e-11 * pow(Tgas/300.0, -0.96) - * exp(-28.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5493] = 9e-11 * pow(Tgas/300.0, + -0.96) * exp(-28.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5494] = 1.72e-10 * pow(Tgas/300.0, - -0.53) * exp(-17.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5494] = 1.72e-10 * pow(Tgas/300.0, + -0.53) * exp(-17.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5495] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5495] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[5496] = 1e-13 * pow(Tgas/300.0, -1.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5496] = 1e-13 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5497] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5497] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[5498] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5498] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[5499] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5499] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[5500] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5500] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[5501] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5501] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[5502] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5502] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[5503] = 4.01e-18 * pow(Tgas/300.0, - 0.17) * exp(-101.5/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5503] = 4.01e-18 * pow(Tgas/300.0, + 0.17) * exp(-101.5/Tgas); } - if (Tgas>5.0 && Tgas<14700.0) { k[5504] = 1.08e-18 * pow(Tgas/300.0, - 0.07) * exp(-57.5/Tgas); } + if (Tgas>=5.0 && Tgas<14700.0) { k[5504] = 1.08e-18 * pow(Tgas/300.0, + 0.07) * exp(-57.5/Tgas); } - if (Tgas>5.0 && Tgas<13900.0) { k[5505] = 3.14e-18 * pow(Tgas/300.0, - -0.15) * exp(-68.0/Tgas); } + if (Tgas>=5.0 && Tgas<13900.0) { k[5505] = 3.14e-18 * pow(Tgas/300.0, + -0.15) * exp(-68.0/Tgas); } - if (Tgas>5.0 && Tgas<14700.0) { k[5506] = 3.07e-19 * pow(Tgas/300.0, - 0.15) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<14700.0) { k[5506] = 3.07e-19 * pow(Tgas/300.0, + 0.15); } - if (Tgas>5.0 && Tgas<41000.0) { k[5507] = 1.1e-15 * pow(Tgas/300.0, - -2.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5507] = 1.1e-15 * pow(Tgas/300.0, + -2.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5508] = 2e-12 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5508] = 2e-12 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5509] = 2e-12 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5509] = 2e-12 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5510] = 2e-12 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5510] = 2e-12 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5511] = 1e-09 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5511] = 1e-09; } - if (Tgas>5.0 && Tgas<41000.0) { k[5512] = 1e-13 * pow(Tgas/300.0, -1.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5512] = 1e-13 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5513] = 2e-15 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5513] = 2e-15 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5514] = 1e-16 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5514] = 1e-16; } - if (Tgas>5.0 && Tgas<41000.0) { k[5515] = 1e-13 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5515] = 1e-13 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5516] = 1e-13 * pow(Tgas/300.0, -2.9) - * exp(-15.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5516] = 1e-13 * pow(Tgas/300.0, -2.9) + * exp(-15.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5517] = 2e-12 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5517] = 2e-12 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5518] = 1e-13 * pow(Tgas/300.0, -2.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5518] = 1e-13 * pow(Tgas/300.0, + -2.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5519] = 2e-12 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5519] = 2e-12 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5520] = 2e-10 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5520] = 2e-10; } - if (Tgas>5.0 && Tgas<41000.0) { k[5521] = 3e-16 * pow(Tgas/300.0, -1.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5521] = 3e-16 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5522] = 4e-14 * pow(Tgas/300.0, -1.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5522] = 4e-14 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5523] = 4.36e-18 * pow(Tgas/300.0, - 0.35) * exp(-161.3/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5523] = 4.36e-18 * pow(Tgas/300.0, + 0.35) * exp(-161.3/Tgas); } - if (Tgas>5.0 && Tgas<14700.0) { k[5524] = 5.72e-19 * pow(Tgas/300.0, - 0.37) * exp(-51.0/Tgas); } + if (Tgas>=5.0 && Tgas<14700.0) { k[5524] = 5.72e-19 * pow(Tgas/300.0, + 0.37) * exp(-51.0/Tgas); } - if (Tgas>5.0 && Tgas<10000.0) { k[5525] = 5e-10 * pow(Tgas/300.0, -3.7) - * exp(-800.0/Tgas); } + if (Tgas>=5.0 && Tgas<10000.0) { k[5525] = 5e-10 * pow(Tgas/300.0, -3.7) + * exp(-800.0/Tgas); } - if (Tgas>5.0 && Tgas<14700.0) { k[5526] = 4.69e-19 * pow(Tgas/300.0, - 1.52) * exp(+50.5/Tgas); } + if (Tgas>=5.0 && Tgas<14700.0) { k[5526] = 4.69e-19 * pow(Tgas/300.0, + 1.52) * exp(+50.5/Tgas); } - if (Tgas>5.0 && Tgas<14100.0) { k[5527] = 1.41e-18 * pow(Tgas/300.0, - 0.03) * exp(-55.0/Tgas); } + if (Tgas>=5.0 && Tgas<14100.0) { k[5527] = 1.41e-18 * pow(Tgas/300.0, + 0.03) * exp(-55.0/Tgas); } - if (Tgas>5.0 && Tgas<14700.0) { k[5528] = 2.01e-18 * pow(Tgas/300.0, - 0.07) * exp(-301.0/Tgas); } + if (Tgas>=5.0 && Tgas<14700.0) { k[5528] = 2.01e-18 * pow(Tgas/300.0, + 0.07) * exp(-301.0/Tgas); } - if (Tgas>5.0 && Tgas<14700.0) { k[5529] = 4.36e-19 * pow(Tgas/300.0, - 0.22) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<14700.0) { k[5529] = 4.36e-19 * pow(Tgas/300.0, + 0.22); } - if (Tgas>5.0 && Tgas<41000.0) { k[5530] = 8e-13 * pow(Tgas/300.0, -2.5) - * exp(-9.9/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5530] = 8e-13 * pow(Tgas/300.0, -2.5) + * exp(-9.9/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5531] = 1e-13 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5531] = 1e-13 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5532] = 2.15e-11 * pow(Tgas/300.0, - -0.66) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5532] = 2.15e-11 * pow(Tgas/300.0, + -0.66); } - if (Tgas>5.0 && Tgas<41000.0) { k[5533] = 9e-11 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5533] = 9e-11 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5534] = 7.8e-12 * pow(Tgas/300.0, - -1.1) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5534] = 7.8e-12 * pow(Tgas/300.0, + -1.1); } - if (Tgas>5.0 && Tgas<41000.0) { k[5535] = 1.2e-13 * pow(Tgas/300.0, - -1.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5535] = 1.2e-13 * pow(Tgas/300.0, + -1.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[5536] = 2e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5536] = 2e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5537] = 8.6e-11 * pow(Tgas/300.0, - -1.4) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5537] = 8.6e-11 * pow(Tgas/300.0, + -1.4); } - if (Tgas>5.0 && Tgas<41000.0) { k[5538] = 8.6e-11 * pow(Tgas/300.0, - -1.4) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5538] = 8.6e-11 * pow(Tgas/300.0, + -1.4); } - if (Tgas>5.0 && Tgas<41000.0) { k[5539] = 8.6e-11 * pow(Tgas/300.0, - -1.4) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5539] = 8.6e-11 * pow(Tgas/300.0, + -1.4); } - if (Tgas>5.0 && Tgas<41000.0) { k[5540] = 9e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5540] = 9e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5541] = 8e-12 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5541] = 8e-12; } - if (Tgas>5.0 && Tgas<41000.0) { k[5542] = 1e-16 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5542] = 1e-16; } - if (Tgas>5.0 && Tgas<41000.0) { k[5543] = 1e-17 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5543] = 1e-17; } - if (Tgas>5.0 && Tgas<41000.0) { k[5544] = 4e-16 * pow(Tgas/300.0, -1.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5544] = 4e-16 * pow(Tgas/300.0, + -1.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5545] = 7.2e-24 * pow(Tgas/300.0, - -2.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5545] = 7.2e-24 * pow(Tgas/300.0, + -2.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[5546] = 1.15e-18 * pow(Tgas/300.0, - 1.49) * exp(-228.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5546] = 1.15e-18 * pow(Tgas/300.0, + 1.49) * exp(-228.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5547] = 5.26e-20 * pow(Tgas/300.0, - -0.51) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5547] = 5.26e-20 * pow(Tgas/300.0, + -0.51); } - if (Tgas>5.0 && Tgas<41000.0) { k[5548] = 2e-16 * pow(Tgas/300.0, -1.3) - * exp(-23.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5548] = 2e-16 * pow(Tgas/300.0, -1.3) + * exp(-23.0/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5549] = 1.03e-14 * pow(Tgas/300.0, - -2.01) * exp(-7.2/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5549] = 1.03e-14 * pow(Tgas/300.0, + -2.01) * exp(-7.2/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5550] = 1.69e-12 * pow(Tgas/300.0, - -1.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5550] = 1.69e-12 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5551] = 1.69e-12 * pow(Tgas/300.0, - -1.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5551] = 1.69e-12 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5552] = 5.2e-14 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5552] = 5.2e-14 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5553] = 6e-11 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5553] = 6e-11; } - if (Tgas>5.0 && Tgas<41000.0) { k[5554] = 1e-17 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5554] = 1e-17; } - if (Tgas>5.0 && Tgas<41000.0) { k[5555] = 3.92e-16 * pow(Tgas/300.0, - -2.29) * exp(-21.3/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5555] = 3.92e-16 * pow(Tgas/300.0, + -2.29) * exp(-21.3/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5556] = 5.09e-18 * pow(Tgas/300.0, - -0.71) * exp(-11.6/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5556] = 5.09e-18 * pow(Tgas/300.0, + -0.71) * exp(-11.6/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5557] = 2.4e-16 * pow(Tgas/300.0, - -0.8) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5557] = 2.4e-16 * pow(Tgas/300.0, + -0.8); } - if (Tgas>5.0 && Tgas<41000.0) { k[5558] = 1e-14 * pow(Tgas/300.0, -1.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5558] = 1e-14 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5559] = 7.5e-18 * pow(Tgas/300.0, - -1.3) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5559] = 7.5e-18 * pow(Tgas/300.0, + -1.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[5560] = 2.4e-17 * pow(Tgas/300.0, - -1.4) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5560] = 2.4e-17 * pow(Tgas/300.0, + -1.4); } - if (Tgas>5.0 && Tgas<41000.0) { k[5561] = 1e-17 * pow(Tgas/300.0, -0.2) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5561] = 1e-17 * pow(Tgas/300.0, + -0.2); } - if (Tgas>5.0 && Tgas<41000.0) { k[5562] = 3e-18 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5562] = 3e-18; } - if (Tgas>5.0 && Tgas<41000.0) { k[5563] = 3e-16 * pow(Tgas/300.0, -1.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5563] = 3e-16 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5564] = 3e-17 * pow(Tgas/300.0, -1.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5564] = 3e-17 * pow(Tgas/300.0, + -1.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5565] = 1e-18 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5565] = 1e-18 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5566] = 4e-13 * pow(Tgas/300.0, -1.3) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5566] = 4e-13 * pow(Tgas/300.0, + -1.3); } - if (Tgas>5.0 && Tgas<41000.0) { k[5567] = 4.5e-12 * pow(Tgas/300.0, - -1.6) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5567] = 4.5e-12 * pow(Tgas/300.0, + -1.6); } - if (Tgas>5.0 && Tgas<41000.0) { k[5568] = 2.4e-14 * pow(Tgas/300.0, - -2.8) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5568] = 2.4e-14 * pow(Tgas/300.0, + -2.8); } - if (Tgas>5.0 && Tgas<41000.0) { k[5569] = 1.7e-17 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5569] = 1.7e-17; } - if (Tgas>5.0 && Tgas<41000.0) { k[5570] = 7e-11 * pow(Tgas/300.0, -0.1) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5570] = 7e-11 * pow(Tgas/300.0, + -0.1); } - if (Tgas>5.0 && Tgas<41000.0) { k[5571] = 6e-14 * pow(Tgas/300.0, -0.7) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5571] = 6e-14 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[5572] = 1e-17 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5572] = 1e-17; } - if (Tgas>5.0 && Tgas<41000.0) { k[5573] = 9.9e-19 * pow(Tgas/300.0, - -0.38) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5573] = 9.9e-19 * pow(Tgas/300.0, + -0.38); } - if (Tgas>5.0 && Tgas<41000.0) { k[5574] = 5.26e-18 * pow(Tgas/300.0, - -5.22) * exp(-90.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5574] = 5.26e-18 * pow(Tgas/300.0, + -5.22) * exp(-90.0/Tgas); } - if (Tgas>5.0 && Tgas<10000.0) { k[5575] = 1.17e-17 * pow(Tgas/300.0, - -0.14) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<10000.0) { k[5575] = 1.17e-17 * pow(Tgas/300.0, + -0.14); } - if (Tgas>5.0 && Tgas<41000.0) { k[5576] = 1e-13 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5576] = 1e-13 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5577] = 1e-13 * pow(Tgas/300.0, -2.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5577] = 1e-13 * pow(Tgas/300.0, + -2.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5578] = 1e-13 * pow(Tgas/300.0, -2.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5578] = 1e-13 * pow(Tgas/300.0, + -2.0); } - if (Tgas>5.0 && Tgas<41000.0) { k[5579] = 1e-13 * pow(Tgas/300.0, -2.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5579] = 1e-13 * pow(Tgas/300.0, + -2.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5580] = 6e-15 * pow(Tgas/300.0, -1.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5580] = 6e-15 * pow(Tgas/300.0, + -1.5); } - if (Tgas>5.0 && Tgas<14700.0) { k[5581] = 3.71e-18 * pow(Tgas/300.0, - 0.24) * exp(-26.1/Tgas); } + if (Tgas>=5.0 && Tgas<14700.0) { k[5581] = 3.71e-18 * pow(Tgas/300.0, + 0.24) * exp(-26.1/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5582] = 4.9e-20 * pow(Tgas/300.0, - 1.58) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5582] = 4.9e-20 * pow(Tgas/300.0, + 1.58); } - if (Tgas>5.0 && Tgas<41000.0) { k[5583] = 3.2e-16 * pow(Tgas/300.0, - -1.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5583] = 3.2e-16 * pow(Tgas/300.0, + -1.5); } - if (Tgas>5.0 && Tgas<14700.0) { k[5584] = 9.22e-19 * pow(Tgas/300.0, - -0.08) * exp(+21.2/Tgas); } + if (Tgas>=5.0 && Tgas<14700.0) { k[5584] = 9.22e-19 * pow(Tgas/300.0, + -0.08) * exp(+21.2/Tgas); } - if (Tgas>5.0 && Tgas<14700.0) { k[5585] = 5.52e-18 * pow(Tgas/300.0, - 0.31) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<14700.0) { k[5585] = 5.52e-18 * pow(Tgas/300.0, + 0.31); } - if (Tgas>5.0 && Tgas<41000.0) { k[5586] = 5e-21 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5586] = 5e-21; } - if (Tgas>5.0 && Tgas<41000.0) { k[5587] = 1.7e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5587] = 1.7e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5588] = 6e-08 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5588] = 6e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5589] = 2e-15 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5589] = 2e-15 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5590] = 2e-15 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5590] = 2e-15 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5591] = 1.7e-14 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5591] = 1.7e-14 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5592] = 1.7e-14 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5592] = 1.7e-14 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5593] = 2.63e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5593] = 2.63e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5594] = 1.1e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5594] = 1.1e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5595] = 1.1e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5595] = 1.1e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5596] = 3.3e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5596] = 3.3e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5597] = 4.1e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5597] = 4.1e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5598] = 1.25e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5598] = 1.25e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5599] = 1.7e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5599] = 1.7e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5600] = 6.2e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5600] = 6.2e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5601] = 5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5601] = 5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5602] = 1.9e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5602] = 1.9e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5603] = 1.7e-07 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5603] = 1.7e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5604] = 6.2e-08 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5604] = 6.2e-08 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5605] = 5e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5605] = 5e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5606] = 2e-07 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5606] = 2e-07 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5607] = 2.25e-15 * pow(Tgas/300.0, - 0.0) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5607] = 2.25e-15; } - if (Tgas>5.0 && Tgas<41000.0) { k[5608] = 3.37e-16 * pow(Tgas/300.0, - 0.64) * exp(-9.2/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5608] = 3.37e-16 * pow(Tgas/300.0, + 0.64) * exp(-9.2/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5609] = 1.5e-15 * pow(Tgas/300.0, 0.0) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5609] = 1.5e-15; } - if (Tgas>5.0 && Tgas<41000.0) { k[5610] = 5e-15 * pow(Tgas/300.0, 0.0) * - exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5610] = 5e-15; } - if (Tgas>5.0 && Tgas<41000.0) { k[5611] = 2.36e-12 * pow(Tgas/300.0, - -0.29) * exp(+17.6/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5611] = 2.36e-12 * pow(Tgas/300.0, + -0.29) * exp(+17.6/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5612] = 1.1e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5612] = 1.1e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5613] = 4.14e-12 * pow(Tgas/300.0, - -0.61) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5613] = 4.14e-12 * pow(Tgas/300.0, + -0.61); } - if (Tgas>5.0 && Tgas<41000.0) { k[5614] = 2.55e-12 * pow(Tgas/300.0, - -0.69) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5614] = 2.55e-12 * pow(Tgas/300.0, + -0.69); } - if (Tgas>5.0 && Tgas<20000.0) { k[5615] = 3.5e-12 * pow(Tgas/300.0, - -0.75) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<20000.0) { k[5615] = 3.5e-12 * pow(Tgas/300.0, + -0.75); } - if (Tgas>5.0 && Tgas<41000.0) { k[5616] = 1.1e-10 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5616] = 1.1e-10 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[5617] = 1.1e-10 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5617] = 1.1e-10 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[5618] = 1.1e-10 * pow(Tgas/300.0, - -0.7) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5618] = 1.1e-10 * pow(Tgas/300.0, + -0.7); } - if (Tgas>5.0 && Tgas<41000.0) { k[5619] = 5.36e-12 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5619] = 5.36e-12 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5620] = 2.78e-12 * pow(Tgas/300.0, - -0.68) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5620] = 2.78e-12 * pow(Tgas/300.0, + -0.68); } - if (Tgas>5.0 && Tgas<41000.0) { k[5621] = 3.5e-12 * pow(Tgas/300.0, - -0.53) * exp(+3.2/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5621] = 3.5e-12 * pow(Tgas/300.0, + -0.53) * exp(+3.2/Tgas); } - if (Tgas>5.0 && Tgas<41000.0) { k[5622] = 2.76e-12 * pow(Tgas/300.0, - -0.68) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5622] = 2.76e-12 * pow(Tgas/300.0, + -0.68); } - if (Tgas>5.0 && Tgas<41000.0) { k[5623] = 3.24e-12 * pow(Tgas/300.0, - -0.66) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5623] = 3.24e-12 * pow(Tgas/300.0, + -0.66); } - if (Tgas>5.0 && Tgas<41000.0) { k[5624] = 3.41e-12 * pow(Tgas/300.0, - -0.65) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5624] = 3.41e-12 * pow(Tgas/300.0, + -0.65); } - if (Tgas>5.0 && Tgas<41000.0) { k[5625] = 5.49e-12 * pow(Tgas/300.0, - -0.59) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5625] = 5.49e-12 * pow(Tgas/300.0, + -0.59); } - if (Tgas>5.0 && Tgas<41000.0) { k[5626] = 4.26e-12 * pow(Tgas/300.0, - -0.62) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5626] = 4.26e-12 * pow(Tgas/300.0, + -0.62); } - if (Tgas>5.0 && Tgas<41000.0) { k[5627] = 2.46e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5627] = 2.46e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5628] = 4.58e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5628] = 4.58e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5629] = 2.05e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5629] = 2.05e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5630] = 1.76e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5630] = 1.76e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5631] = 2.01e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5631] = 2.01e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5632] = 2.01e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5632] = 2.01e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5633] = 1.61e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5633] = 1.61e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5634] = 3e-09 * pow(Tgas/300.0, -0.5) - * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5634] = 3e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5635] = 1.34e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5635] = 1.34e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5636] = 1.15e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5636] = 1.15e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5637] = 1.32e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5637] = 1.32e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5638] = 1.32e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5638] = 1.32e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5639] = 2.37e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5639] = 2.37e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5640] = 4.47e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5640] = 4.47e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5641] = 1.67e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5641] = 1.67e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5642] = 1.96e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5642] = 1.96e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5643] = 1.96e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5643] = 1.96e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5644] = 3.69e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5644] = 3.69e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5645] = 6.74e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5645] = 6.74e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5646] = 2.71e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5646] = 2.71e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5647] = 2.96e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5647] = 2.96e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5648] = 2.96e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5648] = 2.96e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5649] = 1.77e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5649] = 1.77e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5650] = 3.4e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5650] = 3.4e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5651] = 1.44e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5651] = 1.44e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5652] = 1.21e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5652] = 1.21e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5653] = 1.49e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5653] = 1.49e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5654] = 1.49e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5654] = 1.49e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5655] = 2.72e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5655] = 2.72e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5656] = 5.24e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5656] = 5.24e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5657] = 2.22e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5657] = 2.22e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5658] = 1.86e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5658] = 1.86e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5659] = 2.29e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5659] = 2.29e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5660] = 2.29e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5660] = 2.29e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5661] = 2.7e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5661] = 2.7e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5662] = 5.22e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5662] = 5.22e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5663] = 2.19e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5663] = 2.19e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5664] = 1.82e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5664] = 1.82e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5665] = 2.28e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5665] = 2.28e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5666] = 2.28e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5666] = 2.28e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5667] = 1.72e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5667] = 1.72e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5668] = 3.33e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5668] = 3.33e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5669] = 7.41e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5669] = 7.41e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5670] = 1.16e-09 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5670] = 1.16e-09 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5671] = 7.28e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5671] = 7.28e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5672] = 7.28e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5672] = 7.28e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5673] = 7.28e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5673] = 7.28e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5674] = 7.28e-10 * pow(Tgas/300.0, - -0.5) * exp(-0.0/Tgas); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5674] = 7.28e-10 * pow(Tgas/300.0, + -0.5); } - if (Tgas>5.0 && Tgas<41000.0) { k[5675] = 2.3e-17 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5675] = 2.3e-17 * (zeta_cr + zeta_xr) + / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5676] = 3.9e-17 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5676] = 3.9e-17 * (zeta_cr + zeta_xr) + / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5677] = 3.9e-17 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5677] = 3.9e-17 * (zeta_cr + zeta_xr) + / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5678] = 3.9e-21 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5678] = 3.9e-21 * (zeta_cr + zeta_xr) + / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5679] = 2.86e-19 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5679] = 2.86e-19 * (zeta_cr + + zeta_xr) / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5680] = 1.2e-17 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5680] = 1.2e-17 * (zeta_cr + zeta_xr) + / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5681] = 1.3e-18 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5681] = 1.3e-18 * (zeta_cr + zeta_xr) + / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5682] = 5.98e-18 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5682] = 5.98e-18 * (zeta_cr + + zeta_xr) / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5683] = 6.5e-18 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5683] = 6.5e-18 * (zeta_cr + zeta_xr) + / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5684] = 2.7e-17 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5684] = 2.7e-17 * (zeta_cr + zeta_xr) + / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5685] = 3.4e-17 * (zeta_cr + zeta_xr) - / 1.3e-17; } + if (Tgas>=5.0 && Tgas<41000.0) { k[5685] = 3.4e-17 * (zeta_cr + zeta_xr) + / zism; } - if (Tgas>5.0 && Tgas<41000.0) { k[5686] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5686] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5687] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5687] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5688] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5688] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5689] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5689] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5690] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5690] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5691] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5691] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5692] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5692] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5693] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5693] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5694] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 119.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5694] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 119.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5695] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5695] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5696] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 654.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5696] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 654.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5697] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2577.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5697] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2577.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5698] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5698] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5699] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5699] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5700] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5700] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5701] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5701] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5702] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5702] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5703] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5703] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5704] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5704] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5705] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2388.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5705] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2388.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5706] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2153.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5706] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2153.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5707] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1368.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5707] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1368.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5708] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5708] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5709] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5709] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5710] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5710] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5711] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5711] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5712] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5712] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5713] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5713] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5714] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5714] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5715] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5715] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5716] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5716] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5717] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5717] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5718] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5718] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5719] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5719] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5720] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5720] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5721] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5721] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5722] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5722] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5723] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 3304.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5723] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 3304.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5724] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5724] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5725] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5725] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5726] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5726] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5727] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5727] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5728] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5728] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5729] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5729] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5730] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 5000.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5730] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 5000.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5731] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5731] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5732] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5732] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5733] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5733] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5734] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5734] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5735] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5735] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5736] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5736] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5737] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5737] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5738] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5738] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5739] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5739] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5740] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5740] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5741] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5741] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5742] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5742] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5743] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5743] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5744] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5744] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5745] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5745] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5746] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5746] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5747] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5747] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5748] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5748] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5749] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5749] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5750] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5750] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5751] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5751] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5752] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5752] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5753] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5753] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5754] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5754] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5755] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5755] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5756] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5756] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5757] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5757] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5758] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5758] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5759] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5759] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5760] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5760] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5761] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5761] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5762] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5762] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5763] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5763] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5764] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5764] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5765] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5765] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5766] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5766] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5767] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5767] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5768] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5768] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5769] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5769] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5770] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5770] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5771] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5771] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5772] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 255.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5772] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 255.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5773] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5773] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5774] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5774] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5775] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5775] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5776] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 88.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5776] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 88.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5777] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5777] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5778] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5778] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5779] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5779] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5780] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5780] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5781] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1642.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5781] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1642.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5782] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5782] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5783] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5783] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5784] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5784] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5785] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5785] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5786] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5786] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5787] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5787] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5788] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5788] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5789] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 609.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5789] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 609.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5790] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 456.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5790] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 456.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5791] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5791] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5792] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5792] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5793] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5793] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5794] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5794] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5795] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5795] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5796] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5796] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5797] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5797] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5798] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5798] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5799] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5799] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5800] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5800] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5801] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5801] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5802] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1642.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5802] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1642.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5803] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5803] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5804] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5804] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5805] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5805] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5806] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5806] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5807] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 263.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5807] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 263.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5808] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 263.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5808] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 263.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5809] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5809] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5810] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2388.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5810] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2388.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5811] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5811] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5812] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5812] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5813] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5813] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5814] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5814] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5815] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 857.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5815] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 857.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5816] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 717.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5816] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 717.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5817] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5817] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5818] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5818] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5819] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5819] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5820] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1169.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5820] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1169.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5821] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 365.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5821] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 365.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5822] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5822] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5823] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 5290.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5823] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 5290.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5824] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5824] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5825] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 854.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5825] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 854.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5826] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 1.17) * 105.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5826] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 1.17) * 105.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5827] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5827] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5828] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5828] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5829] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5829] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5830] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 61.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5830] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 61.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5831] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5831] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5832] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5832] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5833] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5833] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5834] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5834] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5835] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5835] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5836] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1329.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5836] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1329.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5837] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5837] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5838] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5838] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5839] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 485.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5839] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 485.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5840] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5840] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5841] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 848.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5841] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 848.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5842] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2577.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5842] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2577.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5843] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5843] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5844] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 0.2 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5844] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 0.2 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5845] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5845] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5846] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 863.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5846] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 863.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5847] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 865.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5847] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 865.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5848] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5848] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5849] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 865.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5849] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 865.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5850] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5850] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5851] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5851] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5852] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5852] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5853] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5853] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5854] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1557.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5854] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1557.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5855] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5855] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5856] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 210.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5856] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 210.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5857] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 584.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5857] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 584.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5858] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5858] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5859] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5859] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5860] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 124.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5860] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 124.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5861] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5861] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5862] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5862] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5863] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5863] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5864] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1370.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5864] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1370.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5865] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 124.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5865] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 124.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5866] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1725.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5866] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1725.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5867] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5867] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5868] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5868] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5869] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5869] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5870] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5870] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5871] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5871] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5872] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5872] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5873] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5873] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5874] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5874] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5875] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5875] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5876] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 0.2 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5876] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 0.2 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5877] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 66.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5877] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 66.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5878] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 25.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5878] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 25.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5879] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5879] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5880] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1.1 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5880] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1.1 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5881] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 474.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5881] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 474.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5882] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 324.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5882] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 324.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5883] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 40.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5883] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 40.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5884] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 475.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5884] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 475.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5885] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 657.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5885] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 657.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5886] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 288.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5886] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 288.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5887] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 270.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5887] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 270.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5888] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5888] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5889] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5889] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5890] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5890] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5891] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 247.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5891] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 247.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5892] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 231.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5892] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 231.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5893] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5893] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5894] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 8.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5894] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 8.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5895] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5895] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5896] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5896] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5897] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 58.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5897] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 58.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5898] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 375.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5898] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 375.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5899] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5899] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5900] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1.4 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5900] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1.4 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5901] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5901] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5902] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 722.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5902] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 722.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5903] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2680.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5903] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2680.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5904] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5904] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5905] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 254.5 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5905] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 254.5 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5906] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5906] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5907] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5907] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5908] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5908] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5909] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5909] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5910] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5910] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5911] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5911] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5912] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5912] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5913] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 480.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5913] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 480.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5914] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 922.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5914] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 922.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5915] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5915] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5916] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5916] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5917] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 2115.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5917] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 2115.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5918] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5918] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5919] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5919] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5920] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5920] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5921] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5921] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5922] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5922] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5923] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5923] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5924] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5924] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5925] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5925] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5926] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5926] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5927] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5927] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5928] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5928] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5929] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5929] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5930] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5930] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5931] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5931] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5932] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5932] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5933] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5933] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5934] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5934] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5935] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5935] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5936] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5936] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5937] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5937] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5938] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5938] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5939] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5939] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5940] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5940] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5941] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 5000.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5941] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 5000.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5942] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5942] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5943] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5943] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5944] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5944] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5945] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5945] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5946] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5946] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5947] = 1.3e-17 * ((zeta_cr + zeta_xr) - / 1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5947] = 1.3e-17 * ((zeta_cr + + zeta_xr) / zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[5948] = G0 * 4.9e-08 * exp(-0.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5948] = G0 * 4.9e-08 * exp(-0.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5949] = G0 * 5.41e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5949] = G0 * 5.41e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5950] = G0 * 5.49e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5950] = G0 * 5.49e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5951] = G0 * 1.16e-12 * exp(-5.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5951] = G0 * 1.16e-12 * exp(-5.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5952] = G0 * 9.47e-12 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5952] = G0 * 9.47e-12 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5953] = G0 * 3.46e-12 * exp(-5.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5953] = G0 * 3.46e-12 * exp(-5.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5954] = G0 * 1.96e-10 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5954] = G0 * 1.96e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5955] = G0 * 9.37e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5955] = G0 * 9.37e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5956] = G0 * 1.4e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5956] = G0 * 1.4e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5957] = G0 * 3.1e-12 * exp(-5.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5957] = G0 * 3.1e-12 * exp(-5.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5958] = G0 * 4.94e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5958] = G0 * 4.94e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5959] = G0 * 5.27e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5959] = G0 * 5.27e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5960] = G0 * 6.14e-13 * exp(-5.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5960] = G0 * 6.14e-13 * exp(-5.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5961] = G0 * 7.36e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5961] = G0 * 7.36e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5962] = G0 * 5.45e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5962] = G0 * 5.45e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5963] = G0 * 2.3e-11 * exp(-3.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5963] = G0 * 2.3e-11 * exp(-3.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5964] = G0 * 3.19e-11 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5964] = G0 * 3.19e-11 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5965] = G0 * 5.95e-11 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5965] = G0 * 5.95e-11 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5966] = G0 * 1.86e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5966] = G0 * 1.86e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5967] = G0 * 1.42e-12 * exp(-5.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5967] = G0 * 1.42e-12 * exp(-5.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5968] = G0 * 2.07e-11 * exp(-4.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5968] = G0 * 2.07e-11 * exp(-4.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5969] = G0 * 5.73e-10 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5969] = G0 * 5.73e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5970] = G0 * 3.83e-11 * exp(-4.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5970] = G0 * 3.83e-11 * exp(-4.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5971] = G0 * 5.28e-11 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5971] = G0 * 5.28e-11 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5972] = G0 * 2.31e-11 * exp(-3.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5972] = G0 * 2.31e-11 * exp(-3.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5973] = G0 * 4.41e-10 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5973] = G0 * 4.41e-10 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5974] = G0 * 2.86e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5974] = G0 * 2.86e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5975] = G0 * 1e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5975] = G0 * 1e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5976] = G0 * 2.96e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5976] = G0 * 2.96e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5977] = G0 * 4.1e-10 * exp(-3.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5977] = G0 * 4.1e-10 * exp(-3.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5978] = G0 * 2.4e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5978] = G0 * 2.4e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5979] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5979] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5980] = G0 * 2.99e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5980] = G0 * 2.99e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5981] = G0 * 3.3e-10 * exp(-3.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5981] = G0 * 3.3e-10 * exp(-3.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5982] = G0 * 3.3e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5982] = G0 * 3.3e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5983] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5983] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5984] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5984] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5985] = G0 * 3e-09 * exp(-2.1*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5985] = G0 * 3e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5986] = G0 * 4.1e-10 * exp(-3.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5986] = G0 * 4.1e-10 * exp(-3.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5987] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5987] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5988] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5988] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5989] = G0 * 6.2e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5989] = G0 * 6.2e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5990] = G0 * 3.4e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5990] = G0 * 3.4e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5991] = G0 * 2.9e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5991] = G0 * 2.9e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5992] = G0 * 1e-09 * exp(-2.4*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5992] = G0 * 1e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5993] = G0 * 5.2e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[5993] = G0 * 5.2e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5994] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5994] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5995] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5995] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5996] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5996] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5997] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5997] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5998] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5998] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[5999] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[5999] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6000] = G0 * 6.88e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6000] = G0 * 6.88e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6001] = G0 * 5e-09 * exp(-2.1*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6001] = G0 * 5e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6002] = G0 * 7.28e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6002] = G0 * 7.28e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6003] = G0 * 1.4e-09 * exp(-1.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6003] = G0 * 1.4e-09 * exp(-1.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6004] = G0 * 1.1e-09 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6004] = G0 * 1.1e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6005] = G0 * 2e-09 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6005] = G0 * 2e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6006] = G0 * 5e-10 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6006] = G0 * 5e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6007] = G0 * 7e-09 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6007] = G0 * 7e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6008] = G0 * 5e-10 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6008] = G0 * 5e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6009] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6009] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6010] = G0 * 2.2e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6010] = G0 * 2.2e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6011] = G0 * 4.25e-09 * exp(-1.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6011] = G0 * 4.25e-09 * exp(-1.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6012] = G0 * 4.25e-09 * exp(-1.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6012] = G0 * 4.25e-09 * exp(-1.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6013] = G0 * 1.97e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6013] = G0 * 1.97e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6014] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6014] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6015] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6015] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6016] = G0 * 1.85e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6016] = G0 * 1.85e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6017] = G0 * 1.85e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6017] = G0 * 1.85e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6018] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6018] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6019] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6019] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6020] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6020] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6021] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6021] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6022] = G0 * 3.77e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6022] = G0 * 3.77e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6023] = G0 * 1e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6023] = G0 * 1e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6024] = G0 * 3.75e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6024] = G0 * 3.75e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6025] = G0 * 1e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6025] = G0 * 1e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6026] = G0 * 1e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6026] = G0 * 1e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6027] = G0 * 4.33e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6027] = G0 * 4.33e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6028] = G0 * 4.33e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6028] = G0 * 4.33e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6029] = G0 * 4.33e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6029] = G0 * 4.33e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6030] = G0 * 1.1e-08 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6030] = G0 * 1.1e-08 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6031] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6031] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6032] = G0 * 1.93e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6032] = G0 * 1.93e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6033] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6033] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6034] = G0 * 2e-10 * exp(-2.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6034] = G0 * 2e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6035] = G0 * 1.1e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6035] = G0 * 1.1e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6036] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6036] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6037] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6037] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6038] = G0 * 1e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6038] = G0 * 1e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6039] = G0 * 5e-12 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6039] = G0 * 5e-12 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6040] = G0 * 5e-12 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6040] = G0 * 5e-12 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6041] = G0 * 2.83e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6041] = G0 * 2.83e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6042] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6042] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6043] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6043] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6044] = G0 * 3.46e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6044] = G0 * 3.46e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6045] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6045] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6046] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6046] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6047] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6047] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6048] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6048] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6049] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6049] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6050] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6050] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6051] = G0 * 1.77e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6051] = G0 * 1.77e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6052] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6052] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6053] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6053] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6054] = G0 * 8.67e-08 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6054] = G0 * 8.67e-08 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6055] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6055] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6056] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6056] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6057] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6057] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6058] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6058] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6059] = G0 * 2.41e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6059] = G0 * 2.41e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6060] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6060] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6061] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6061] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6062] = G0 * 3.18e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6062] = G0 * 3.18e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6063] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6063] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6064] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6064] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6065] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6065] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6066] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6066] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6067] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6067] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6068] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6068] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6069] = G0 * 3.1e-10 * exp(-3.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6069] = G0 * 3.1e-10 * exp(-3.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6070] = G0 * 1e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6070] = G0 * 1e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6071] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6071] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6072] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6072] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6073] = G0 * 3.3e-10 * exp(-2.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6073] = G0 * 3.3e-10 * exp(-2.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6074] = G0 * 1.36e-08 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6074] = G0 * 1.36e-08 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6075] = G0 * 4.67e-11 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6075] = G0 * 4.67e-11 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6076] = G0 * 4.67e-11 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6076] = G0 * 4.67e-11 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6077] = G0 * 4.67e-11 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6077] = G0 * 4.67e-11 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6078] = G0 * 1e-09 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6078] = G0 * 1e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6079] = G0 * 5.8e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6079] = G0 * 5.8e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6080] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6080] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6081] = G0 * 3.3e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6081] = G0 * 3.3e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6082] = G0 * 2.25e-10 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6082] = G0 * 2.25e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6083] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6083] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6084] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6084] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6085] = G0 * 5.65e-10 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6085] = G0 * 5.65e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6086] = G0 * 5.65e-10 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6086] = G0 * 5.65e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6087] = G0 * 1.13e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6087] = G0 * 1.13e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6088] = G0 * 1e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6088] = G0 * 1e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6089] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6089] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6090] = G0 * 1.56e-09 * exp(-1.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6090] = G0 * 1.56e-09 * exp(-1.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6091] = G0 * 6.6e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6091] = G0 * 6.6e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6092] = G0 * 1.4e-09 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6092] = G0 * 1.4e-09 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6093] = G0 * 3.5e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6093] = G0 * 3.5e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6094] = G0 * 9.54e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6094] = G0 * 9.54e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6095] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6095] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6096] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6096] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6097] = G0 * 1.35e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6097] = G0 * 1.35e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6098] = G0 * 1e-10 * exp(-2.1*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6098] = G0 * 1e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6099] = G0 * 1.35e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6099] = G0 * 1.35e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6100] = G0 * 2e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6100] = G0 * 2e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6101] = G0 * 2e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6101] = G0 * 2e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6102] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6102] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6103] = G0 * 2e-11 * exp(-5.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6103] = G0 * 2e-11 * exp(-5.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6104] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6104] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6105] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6105] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6106] = G0 * 3.3e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6106] = G0 * 3.3e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6107] = G0 * 2.25e-10 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6107] = G0 * 2.25e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6108] = G0 * 2.31e-09 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6108] = G0 * 2.31e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6109] = G0 * 2.3e-10 * exp(-3.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6109] = G0 * 2.3e-10 * exp(-3.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6110] = G0 * 1.13e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6110] = G0 * 1.13e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6111] = G0 * 4.6e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6111] = G0 * 4.6e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6112] = G0 * 1.1e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6112] = G0 * 1.1e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6113] = G0 * 1.1e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6113] = G0 * 1.1e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6114] = G0 * 6.2e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6114] = G0 * 6.2e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6115] = G0 * 2.5e-09 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6115] = G0 * 2.5e-09 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6116] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6116] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6117] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6117] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6118] = G0 * 4.6e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6118] = G0 * 4.6e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6119] = G0 * 1.5e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6119] = G0 * 1.5e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6120] = G0 * 1.3e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6120] = G0 * 1.3e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6121] = G0 * 1.4e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6121] = G0 * 1.4e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6122] = G0 * 1.4e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6122] = G0 * 1.4e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6123] = G0 * 1.3e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6123] = G0 * 1.3e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6124] = G0 * 1.4e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6124] = G0 * 1.4e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6125] = G0 * 2.27e-10 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6125] = G0 * 2.27e-10 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6126] = G0 * 5.33e-11 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6126] = G0 * 5.33e-11 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6127] = G0 * 9.8e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6127] = G0 * 9.8e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6128] = G0 * 2.2e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6128] = G0 * 2.2e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6129] = G0 * 6.8e-12 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6129] = G0 * 6.8e-12 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6130] = G0 * 2.2e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6130] = G0 * 2.2e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6131] = G0 * 9.2e-10 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6131] = G0 * 9.2e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6132] = G0 * 7.6e-10 * exp(-3.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6132] = G0 * 7.6e-10 * exp(-3.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6133] = G0 * 2.22e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6133] = G0 * 2.22e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6134] = G0 * 2.9e-10 * exp(-3.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6134] = G0 * 2.9e-10 * exp(-3.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6135] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6135] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6136] = G0 * 1e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6136] = G0 * 1e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6137] = G0 * 8.9e-10 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6137] = G0 * 8.9e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6138] = G0 * 2e-10 * exp(-3.5*Av) * - GetShieldingFactor(IDX_COI, h2col, cocol, Tgas, 0); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6138] = G0 * 2e-10 * exp(-3.5*Av) * + GetShieldingFactor(IDX_COI, h2col, cocol, Tgas, 0); } - if (Tgas>5.0 && Tgas<41000.0) { k[6139] = G0 * 1e-09 * exp(-2.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6139] = G0 * 1e-09 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6140] = G0 * 2e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6140] = G0 * 2e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6141] = G0 * 2e-10 * exp(-3.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6141] = G0 * 2e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6142] = G0 * 9.8e-10 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6142] = G0 * 9.8e-10 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6143] = G0 * 9.5e-11 * exp(-4.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6143] = G0 * 9.5e-11 * exp(-4.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6144] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6144] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6145] = G0 * 2.8e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6145] = G0 * 2.8e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6146] = G0 * 1.43e-07 * exp(-0.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6146] = G0 * 1.43e-07 * exp(-0.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6147] = G0 * 5e-11 * exp(-0.0*Av) * - GetShieldingFactor(IDX_H2I, h2col, h2col, Tgas, 0); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6147] = G0 * 5e-11 * exp(-0.0*Av) * + GetShieldingFactor(IDX_H2I, h2col, h2col, Tgas, 0); } - if (Tgas>5.0 && Tgas<41000.0) { k[6148] = G0 * 5.7e-10 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6148] = G0 * 5.7e-10 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6149] = G0 * 1.1e-09 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6149] = G0 * 1.1e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6150] = G0 * 1.1e-09 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6150] = G0 * 1.1e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6151] = G0 * 5.48e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6151] = G0 * 5.48e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6152] = G0 * 1e-09 * exp(-2.2*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6152] = G0 * 1e-09 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6153] = G0 * 7e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6153] = G0 * 7e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6154] = G0 * 4.7e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6154] = G0 * 4.7e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6155] = G0 * 1.4e-11 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6155] = G0 * 1.4e-11 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6156] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6156] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6157] = G0 * 1e-12 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6157] = G0 * 1e-12 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6158] = G0 * 9.5e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6158] = G0 * 9.5e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6159] = G0 * 3.1e-11 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6159] = G0 * 3.1e-11 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6160] = G0 * 7.5e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6160] = G0 * 7.5e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6161] = G0 * 4.8e-11 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6161] = G0 * 4.8e-11 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6162] = G0 * 8.3e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6162] = G0 * 8.3e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6163] = G0 * 7.3e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6163] = G0 * 7.3e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6164] = G0 * 1.55e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6164] = G0 * 1.55e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6165] = G0 * 1.55e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6165] = G0 * 1.55e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6166] = G0 * 4.4e-10 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6166] = G0 * 4.4e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6167] = G0 * 4.4e-10 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6167] = G0 * 4.4e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6168] = G0 * 5e-15 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6168] = G0 * 5e-15 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6169] = G0 * 5e-15 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6169] = G0 * 5e-15 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6170] = G0 * 5.48e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6170] = G0 * 5.48e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6171] = G0 * 5.6e-09 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6171] = G0 * 5.6e-09 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6172] = G0 * 1.9e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6172] = G0 * 1.9e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6173] = G0 * 4.6e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6173] = G0 * 4.6e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6174] = G0 * 1.9e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6174] = G0 * 1.9e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6175] = G0 * 5e-10 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6175] = G0 * 5e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6176] = G0 * 5e-10 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6176] = G0 * 5e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6177] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6177] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6178] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6178] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6179] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6179] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6180] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6180] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6181] = G0 * 1.6e-09 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6181] = G0 * 1.6e-09 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6182] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6182] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6183] = G0 * 5.4e-12 * exp(-3.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6183] = G0 * 5.4e-12 * exp(-3.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6184] = G0 * 1.1e-09 * exp(-1.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6184] = G0 * 1.1e-09 * exp(-1.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6185] = G0 * 5.6e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6185] = G0 * 5.6e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6186] = G0 * 1.38e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6186] = G0 * 1.38e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6187] = G0 * 4.1e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6187] = G0 * 4.1e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6188] = G0 * 2.6e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6188] = G0 * 2.6e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6189] = G0 * 5.48e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6189] = G0 * 5.48e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6190] = G0 * 1.1e-09 * exp(-1.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6190] = G0 * 1.1e-09 * exp(-1.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6191] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6191] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6192] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6192] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6193] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6193] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6194] = G0 * 1.7e-09 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6194] = G0 * 1.7e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6195] = G0 * 1.9e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6195] = G0 * 1.9e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6196] = G0 * 1.17e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6196] = G0 * 1.17e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6197] = G0 * 9.54e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6197] = G0 * 9.54e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6198] = G0 * 1.5e-09 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6198] = G0 * 1.5e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6199] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6199] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6200] = G0 * 1.7e-10 * exp(-0.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6200] = G0 * 1.7e-10 * exp(-0.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6201] = G0 * 5.48e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6201] = G0 * 5.48e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6202] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6202] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6203] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6203] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6204] = G0 * 1.7e-10 * exp(-5.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6204] = G0 * 1.7e-10 * exp(-5.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6205] = G0 * 3e-10 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6205] = G0 * 3e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6206] = G0 * 2.5e-10 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6206] = G0 * 2.5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6207] = G0 * 6.2e-12 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6207] = G0 * 6.2e-12 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6208] = G0 * 3.3e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6208] = G0 * 3.3e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6209] = G0 * 9.8e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6209] = G0 * 9.8e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6210] = G0 * 7.9e-11 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6210] = G0 * 7.9e-11 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6211] = G0 * 1.65e-10 * exp(-3.9*Av) * - GetShieldingFactor(IDX_N2I, h2col, n2col, Tgas, 0); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6211] = G0 * 1.65e-10 * exp(-3.9*Av) + * GetShieldingFactor(IDX_N2I, h2col, n2col, Tgas, 0); } - if (Tgas>5.0 && Tgas<41000.0) { k[6212] = G0 * 9.5e-10 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6212] = G0 * 9.5e-10 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6213] = G0 * 1.7e-10 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6213] = G0 * 1.7e-10 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6214] = G0 * 9.5e-10 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6214] = G0 * 9.5e-10 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6215] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6215] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6216] = G0 * 4.7e-11 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6216] = G0 * 4.7e-11 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6217] = G0 * 5.4e-11 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6217] = G0 * 5.4e-11 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6218] = G0 * 1.73e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6218] = G0 * 1.73e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6219] = G0 * 7.5e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6219] = G0 * 7.5e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6220] = G0 * 1.38e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6220] = G0 * 1.38e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6221] = G0 * 9.23e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6221] = G0 * 9.23e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6222] = G0 * 2.8e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6222] = G0 * 2.8e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6223] = G0 * 2.76e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6223] = G0 * 2.76e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6224] = G0 * 5e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6224] = G0 * 5e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6225] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6225] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6226] = G0 * 1.5e-10 * exp(-3.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6226] = G0 * 1.5e-10 * exp(-3.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6227] = G0 * 1.4e-09 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6227] = G0 * 1.4e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6228] = G0 * 2.6e-10 * exp(-2.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6228] = G0 * 2.6e-10 * exp(-2.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6229] = G0 * 4.7e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6229] = G0 * 4.7e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6230] = G0 * 2e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6230] = G0 * 2e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6231] = G0 * 1.5e-11 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6231] = G0 * 1.5e-11 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6232] = G0 * 1.09e-08 * exp(-0.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6232] = G0 * 1.09e-08 * exp(-0.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6233] = G0 * 3.5e-11 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6233] = G0 * 3.5e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6234] = G0 * 6.1e-09 * exp(-0.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6234] = G0 * 6.1e-09 * exp(-0.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6235] = G0 * 7.6e-11 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6235] = G0 * 7.6e-11 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6236] = G0 * 7.9e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6236] = G0 * 7.9e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6237] = G0 * 3.35e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6237] = G0 * 3.35e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6238] = G0 * 3.35e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6238] = G0 * 3.35e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6239] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6239] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6240] = G0 * 6.9e-10 * exp(-3.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6240] = G0 * 6.9e-10 * exp(-3.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6241] = G0 * 3.7e-09 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6241] = G0 * 3.7e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6242] = G0 * 1.1e-11 * exp(-3.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6242] = G0 * 1.1e-11 * exp(-3.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6243] = G0 * 1.57e-08 * exp(-1.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6243] = G0 * 1.57e-08 * exp(-1.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6244] = G0 * 3.9e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6244] = G0 * 3.9e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6245] = G0 * 1.6e-12 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6245] = G0 * 1.6e-12 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6246] = G0 * 1e-09 * exp(-2.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6246] = G0 * 1e-09 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6247] = G0 * 1.73e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6247] = G0 * 1.73e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6248] = G0 * 2.11e-10 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6248] = G0 * 2.11e-10 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6249] = G0 * 4e-10 * exp(-1.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6249] = G0 * 4e-10 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6250] = G0 * 5e-12 * exp(-3.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6250] = G0 * 5e-12 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6251] = G0 * 3e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6251] = G0 * 3e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6252] = G0 * 2.4e-07 * exp(-0.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6252] = G0 * 2.4e-07 * exp(-0.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6253] = G0 * 6.2e-12 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6253] = G0 * 6.2e-12 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6254] = G0 * 3.3e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6254] = G0 * 3.3e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6255] = G0 * 6e-10 * exp(-3.1*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6255] = G0 * 6e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6256] = G0 * 1.9e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6256] = G0 * 1.9e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6257] = G0 * 4.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6257] = G0 * 4.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6258] = G0 * 6e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6258] = G0 * 6e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6259] = G0 * 3.1e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6259] = G0 * 3.1e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6260] = G0 * 2.6e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6260] = G0 * 2.6e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6261] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6261] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6262] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6262] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6263] = G0 * 2e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6263] = G0 * 2e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6264] = G0 * 2e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6264] = G0 * 2e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6265] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6265] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6266] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6266] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6267] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6267] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6268] = G0 * 1.81e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6268] = G0 * 1.81e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6269] = G0 * 2.07e-10 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6269] = G0 * 2.07e-10 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6270] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6270] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6271] = G0 * 2.7e-09 * exp(-1.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6271] = G0 * 2.7e-09 * exp(-1.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6272] = G0 * 1e-09 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6272] = G0 * 1e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6273] = G0 * 5e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6273] = G0 * 5e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6274] = G0 * 3e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6274] = G0 * 3e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6275] = G0 * 1e-10 * exp(-2.1*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6275] = G0 * 1e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6276] = G0 * 3e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6276] = G0 * 3e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6277] = G0 * 4.8e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6277] = G0 * 4.8e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6278] = G0 * 1.6e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6278] = G0 * 1.6e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6279] = G0 * 1.6e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6279] = G0 * 1.6e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6280] = G0 * 2.8e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6280] = G0 * 2.8e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6281] = G0 * 1e-09 * exp(-2.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6281] = G0 * 1e-09 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6282] = G0 * 1e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6282] = G0 * 1e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6283] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6283] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6284] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6284] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6285] = G0 * 3.13e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6285] = G0 * 3.13e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6286] = G0 * 1.6e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6286] = G0 * 1.6e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6287] = G0 * 2.4e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[6287] = G0 * 2.4e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6288] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6288] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6289] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6289] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6290] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6290] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6291] = G0 * 9e-10 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6291] = G0 * 9e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6292] = G0 * 1e-09 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6292] = G0 * 1e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6293] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6293] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6294] = G0 * 9e-10 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6294] = G0 * 9e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6295] = G0 * 9e-10 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6295] = G0 * 9e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6296] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6296] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6297] = G0 * 9e-10 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6297] = G0 * 9e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[6298] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6298] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6299] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6299] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6300] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6300] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6301] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6301] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6302] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6302] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6303] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6303] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6304] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6304] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6305] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6305] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6306] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6306] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6307] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[6307] = 0.0; } - if (Tgas>5.0 && Tgas<41000.0) { k[6308] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*1.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6308] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*1.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6309] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*2.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6309] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*2.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6310] = 0.349 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*3.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6310] = 0.349 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*3.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6311] = 0.651 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*3.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6311] = 0.651 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*3.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6312] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*4.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6312] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*4.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6313] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*5.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6313] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*5.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6314] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*12.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6314] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*12.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6315] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*13.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6315] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*13.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6316] = 0.12 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*14.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6316] = 0.12 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*14.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6317] = 0.63 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*14.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6317] = 0.63 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*14.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6318] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*14.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6318] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*14.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6319] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*14.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6319] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*14.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6320] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*15.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6320] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*15.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6321] = 0.164 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*15.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6321] = 0.164 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*15.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6322] = 0.413 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*15.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6322] = 0.413 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*15.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6323] = 0.423 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*15.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6323] = 0.423 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*15.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6324] = 0.659 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6324] = 0.659 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6325] = 0.341 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6325] = 0.341 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6326] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6326] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6327] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6327] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6328] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6328] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*16.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6329] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6329] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6330] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6330] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6331] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6331] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6332] = 0.17 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6332] = 0.17 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6333] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6333] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6334] = 0.7 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6334] = 0.7 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6335] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6335] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6336] = 0.03 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6336] = 0.03 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*17.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6337] = 0.0505 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6337] = 0.0505 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6338] = 0.0404 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6338] = 0.0404 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6339] = 0.909 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6339] = 0.909 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6340] = 0.0907 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6340] = 0.0907 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6341] = 0.709 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6341] = 0.709 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6342] = 0.2 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6342] = 0.2 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*18.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6343] = 0.163 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6343] = 0.163 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6344] = 0.0129 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6344] = 0.0129 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6345] = 0.123 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6345] = 0.123 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6346] = 0.701 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6346] = 0.701 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6347] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6347] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*19.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6348] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*20.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6348] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*20.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6349] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*21.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6349] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*21.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6350] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*21.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6350] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*21.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6351] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*23.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6351] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*23.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6352] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*24.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6352] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*24.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6353] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*24.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6353] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*24.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6354] = 0.431 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*25.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6354] = 0.431 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*25.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6355] = 0.569 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*25.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6355] = 0.569 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*25.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6356] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*26.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6356] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*26.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6357] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*26.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6357] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*26.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6358] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*26.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6358] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*26.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6359] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*26.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6359] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*26.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6360] = 0.0102 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6360] = 0.0102 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6361] = 0.0196 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6361] = 0.0196 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6362] = 0.0987 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6362] = 0.0987 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6363] = 0.19 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6363] = 0.19 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6364] = 0.0205 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6364] = 0.0205 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6365] = 0.0392 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6365] = 0.0392 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6366] = 0.201 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6366] = 0.201 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6367] = 0.385 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6367] = 0.385 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6368] = 0.0102 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6368] = 0.0102 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6369] = 0.0196 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6369] = 0.0196 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6370] = 0.00205 * pi * pow(rG, 2.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[6370] = 0.00205 * pi * rG * rG * gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6371] = 0.00392 * pi * pow(rG, 2.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[6371] = 0.00392 * pi * rG * rG * gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6372] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6372] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*27.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6373] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6373] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6374] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6374] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6375] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6375] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6376] = 0.0909 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6376] = 0.0909 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6377] = 0.909 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6377] = 0.909 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6378] = 0.329 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6378] = 0.329 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6379] = 0.336 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6379] = 0.336 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6380] = 0.336 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6380] = 0.336 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6381] = 0.06 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6381] = 0.06 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6382] = 0.66 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6382] = 0.66 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6383] = 0.11 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6383] = 0.11 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6384] = 0.1 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6384] = 0.1 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6385] = 0.04 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6385] = 0.04 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6386] = 0.02 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6386] = 0.02 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6387] = 0.01 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6387] = 0.01 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*28.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6388] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6388] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6389] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6389] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6390] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6390] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6391] = 0.296 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6391] = 0.296 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6392] = 0.133 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6392] = 0.133 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6393] = 0.276 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6393] = 0.276 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6394] = 0.122 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6394] = 0.122 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6395] = 0.173 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6395] = 0.173 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6396] = 0.924 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6396] = 0.924 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6397] = 0.0758 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6397] = 0.0758 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*29.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6398] = 0.049 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6398] = 0.049 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6399] = 0.147 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6399] = 0.147 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6400] = 0.49 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6400] = 0.49 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6401] = 0.314 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6401] = 0.314 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6402] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6402] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6403] = 0.4 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6403] = 0.4 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6404] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6404] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6405] = 0.0909 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6405] = 0.0909 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6406] = 0.909 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6406] = 0.909 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6407] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6407] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6408] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6408] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6409] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6409] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6410] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6410] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6411] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6411] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*30.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6412] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6412] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6413] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6413] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6414] = 0.06 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6414] = 0.06 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6415] = 0.02 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6415] = 0.02 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6416] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6416] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6417] = 0.31 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6417] = 0.31 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6418] = 0.31 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6418] = 0.31 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6419] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6419] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6420] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6420] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6421] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6421] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6422] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6422] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6423] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6423] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*31.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6424] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6424] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6425] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6425] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6426] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6426] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6427] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6427] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6428] = 0.359 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6428] = 0.359 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6429] = 0.476 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6429] = 0.476 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6430] = 0.166 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6430] = 0.166 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6431] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6431] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6432] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6432] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6433] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6433] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*32.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6434] = 0.08 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6434] = 0.08 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6435] = 0.78 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6435] = 0.78 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6436] = 0.14 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6436] = 0.14 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6437] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6437] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6438] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6438] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6439] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6439] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6440] = 0.223 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6440] = 0.223 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6441] = 0.0957 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6441] = 0.0957 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6442] = 0.543 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6442] = 0.543 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6443] = 0.0319 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6443] = 0.0319 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6444] = 0.106 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6444] = 0.106 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6445] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6445] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*33.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6446] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*34.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6446] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*34.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6447] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*34.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6447] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*34.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6448] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*34.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6448] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*34.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6449] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*34.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6449] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*34.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6450] = 0.17 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6450] = 0.17 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6451] = 0.15 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6451] = 0.15 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6452] = 0.579 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6452] = 0.579 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6453] = 0.1 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6453] = 0.1 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6454] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6454] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*35.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6455] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*36.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6455] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*36.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6456] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*36.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6456] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*36.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6457] = 0.915 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*37.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6457] = 0.915 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*37.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6458] = 0.0847 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*37.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6458] = 0.0847 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*37.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6459] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*37.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6459] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*37.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6460] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*37.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6460] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*37.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6461] = 0.0625 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6461] = 0.0625 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6462] = 0.0625 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6462] = 0.0625 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6463] = 0.125 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6463] = 0.125 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6464] = 0.125 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6464] = 0.125 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6465] = 0.625 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6465] = 0.625 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6466] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6466] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6467] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6467] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6468] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6468] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6469] = 0.95 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6469] = 0.95 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*38.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6470] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*39.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6470] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*39.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6471] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*39.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6471] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*39.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6472] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*39.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6472] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*39.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6473] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*39.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6473] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*39.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6474] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6474] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6475] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6475] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6476] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6476] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6477] = 0.0146 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6477] = 0.0146 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6478] = 0.85 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6478] = 0.85 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6479] = 0.0863 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6479] = 0.0863 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6480] = 0.0491 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6480] = 0.0491 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6481] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6481] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*40.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6482] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6482] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6483] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6483] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6484] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6484] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6485] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6485] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6486] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6486] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6487] = 0.2 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6487] = 0.2 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6488] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6488] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6489] = 0.2 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6489] = 0.2 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6490] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6490] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6491] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6491] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*41.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6492] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6492] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6493] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6493] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6494] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6494] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6495] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6495] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6496] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6496] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6497] = 0.4 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6497] = 0.4 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6498] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6498] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6499] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6499] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6500] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6500] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6501] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6501] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6502] = 0.649 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6502] = 0.649 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6503] = 0.351 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6503] = 0.351 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*42.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6504] = 0.101 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6504] = 0.101 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6505] = 0.175 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6505] = 0.175 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6506] = 0.0368 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6506] = 0.0368 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6507] = 0.132 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6507] = 0.132 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6508] = 0.132 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6508] = 0.132 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6509] = 0.0368 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6509] = 0.0368 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6510] = 0.386 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6510] = 0.386 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6511] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6511] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6512] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6512] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6513] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6513] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6514] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6514] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6515] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6515] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6516] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6516] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6517] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6517] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6518] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6518] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6519] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6519] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6520] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6520] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6521] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6521] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6522] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6522] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6523] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6523] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6524] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6524] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6525] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6525] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6526] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6526] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6527] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6527] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*43.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6528] = 0.48 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6528] = 0.48 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6529] = 0.36 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6529] = 0.36 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6530] = 0.16 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6530] = 0.16 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6531] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6531] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6532] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6532] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6533] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6533] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6534] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6534] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6535] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6535] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6536] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6536] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6537] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6537] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6538] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6538] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6539] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6539] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6540] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6540] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6541] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6541] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6542] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6542] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6543] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6543] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6544] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6544] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6545] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6545] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6546] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6546] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6547] = 0.28 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6547] = 0.28 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6548] = 0.72 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6548] = 0.72 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6549] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6549] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6550] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6550] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6551] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6551] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6552] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6552] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6553] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6553] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*44.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6554] = 0.811 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6554] = 0.811 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6555] = 0.189 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6555] = 0.189 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6556] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6556] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6557] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6557] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6558] = 0.465 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6558] = 0.465 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6559] = 0.535 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6559] = 0.535 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6560] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6560] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6561] = 0.23 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6561] = 0.23 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6562] = 0.23 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6562] = 0.23 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6563] = 0.0813 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6563] = 0.0813 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6564] = 0.23 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6564] = 0.23 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6565] = 0.23 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6565] = 0.23 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6566] = 0.0504 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6566] = 0.0504 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6567] = 0.681 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6567] = 0.681 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6568] = 0.269 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6568] = 0.269 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6569] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6569] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6570] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6570] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*45.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6571] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6571] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6572] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6572] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6573] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6573] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6574] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6574] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6575] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6575] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6576] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6576] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6577] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6577] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6578] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6578] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6579] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6579] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6580] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6580] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6581] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6581] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6582] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6582] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6583] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6583] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6584] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6584] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6585] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6585] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6586] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6586] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6587] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6587] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6588] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6588] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*46.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6589] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6589] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6590] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6590] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6591] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6591] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6592] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6592] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6593] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6593] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6594] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6594] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6595] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6595] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6596] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6596] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6597] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6597] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6598] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6598] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6599] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6599] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6600] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6600] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6601] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6601] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6602] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6602] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6603] = 0.44 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6603] = 0.44 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6604] = 0.07 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6604] = 0.07 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6605] = 0.49 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6605] = 0.49 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6606] = 0.325 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6606] = 0.325 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6607] = 0.325 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6607] = 0.325 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6608] = 0.325 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6608] = 0.325 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6609] = 0.024 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6609] = 0.024 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6610] = 0.87 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6610] = 0.87 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6611] = 0.13 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6611] = 0.13 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*47.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6612] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6612] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6613] = 0.375 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6613] = 0.375 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6614] = 0.375 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6614] = 0.375 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6615] = 0.4 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6615] = 0.4 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6616] = 0.6 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6616] = 0.6 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6617] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6617] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6618] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6618] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6619] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6619] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6620] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6620] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*48.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6621] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6621] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6622] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6622] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6623] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6623] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6624] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6624] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6625] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6625] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*49.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6626] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*50.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6626] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*50.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6627] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*50.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6627] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*50.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6628] = 0.75 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*50.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6628] = 0.75 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*50.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6629] = 0.478 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6629] = 0.478 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6630] = 0.261 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6630] = 0.261 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6631] = 0.261 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6631] = 0.261 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6632] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6632] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6633] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6633] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6634] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6634] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*51.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6635] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6635] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6636] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6636] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6637] = 0.457 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6637] = 0.457 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6638] = 0.0311 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6638] = 0.0311 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6639] = 0.464 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6639] = 0.464 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6640] = 0.0476 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6640] = 0.0476 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6641] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6641] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6642] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6642] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6643] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6643] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6644] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6644] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*52.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6645] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6645] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6646] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6646] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6647] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6647] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6648] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6648] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6649] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6649] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6650] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6650] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6651] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6651] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6652] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6652] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6653] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6653] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*53.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6654] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6654] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6655] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6655] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6656] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6656] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6657] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6657] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6658] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6658] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6659] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6659] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6660] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6660] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6661] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6661] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*54.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6662] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6662] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6663] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6663] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6664] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6664] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6665] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6665] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6666] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6666] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6667] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6667] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6668] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6668] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6669] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6669] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*55.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6670] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6670] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6671] = 0.14 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6671] = 0.14 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6672] = 0.43 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6672] = 0.43 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6673] = 0.43 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6673] = 0.43 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6674] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6674] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6675] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6675] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6676] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6676] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6677] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6677] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*56.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6678] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6678] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6679] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6679] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6680] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6680] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6681] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6681] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6682] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6682] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*57.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6683] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6683] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6684] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6684] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6685] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6685] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6686] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6686] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6687] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6687] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*58.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6688] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6688] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6689] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6689] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6690] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6690] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6691] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6691] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6692] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6692] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6693] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6693] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6694] = 0.9 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6694] = 0.9 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6695] = 0.1 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6695] = 0.1 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6696] = 0.475 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6696] = 0.475 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6697] = 0.475 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6697] = 0.475 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6698] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6698] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*59.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6699] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6699] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6700] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6700] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6701] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6701] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6702] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6702] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6703] = 0.3 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6703] = 0.3 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6704] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6704] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6705] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6705] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6706] = 0.03 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6706] = 0.03 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6707] = 0.14 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6707] = 0.14 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6708] = 0.83 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6708] = 0.83 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6709] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6709] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6710] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6710] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6711] = 0.225 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6711] = 0.225 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6712] = 0.225 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6712] = 0.225 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6713] = 0.225 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6713] = 0.225 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6714] = 0.225 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6714] = 0.225 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6715] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6715] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6716] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6716] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*60.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6717] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6717] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6718] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6718] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6719] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6719] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6720] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6720] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6721] = 0.769 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6721] = 0.769 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6722] = 0.231 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6722] = 0.231 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6723] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6723] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6724] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6724] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6725] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6725] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6726] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6726] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6727] = 0.1 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6727] = 0.1 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6728] = 0.8 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6728] = 0.8 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6729] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6729] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6730] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6730] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6731] = 0.18 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6731] = 0.18 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6732] = 0.18 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6732] = 0.18 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6733] = 0.18 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6733] = 0.18 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6734] = 0.18 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6734] = 0.18 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6735] = 0.18 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6735] = 0.18 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6736] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6736] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6737] = 0.05 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6737] = 0.05 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*61.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6738] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*62.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6738] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*62.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6739] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*62.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6739] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*62.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6740] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*62.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6740] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*62.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6741] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*62.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6741] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*62.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6742] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*63.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6742] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*63.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6743] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*63.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6743] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*63.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6744] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*63.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6744] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*63.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6745] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6745] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6746] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6746] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6747] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6747] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6748] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6748] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6749] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6749] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6750] = 0.389 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6750] = 0.389 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6751] = 0.611 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6751] = 0.611 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6752] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6752] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*64.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6753] = 0.769 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6753] = 0.769 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6754] = 0.231 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6754] = 0.231 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6755] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6755] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6756] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6756] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6757] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6757] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6758] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6758] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6759] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6759] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6760] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6760] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6761] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6761] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6762] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6762] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*65.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6763] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6763] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6764] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6764] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6765] = 0.231 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6765] = 0.231 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6766] = 0.769 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6766] = 0.769 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6767] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6767] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6768] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6768] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*66.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6769] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*67.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6769] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*67.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6770] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*67.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6770] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*67.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6771] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*67.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6771] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*67.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6772] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6772] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6773] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6773] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6774] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6774] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6775] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6775] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6776] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6776] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6777] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6777] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*68.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6778] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*69.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6778] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*69.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6779] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*69.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6779] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*69.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6780] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*72.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6780] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*72.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6781] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*72.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6781] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*72.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6782] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*73.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6782] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*73.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6783] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*73.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6783] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*73.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6784] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*74.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6784] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*74.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6785] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*74.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6785] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*74.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6786] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*74.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6786] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*74.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6787] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*75.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6787] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*75.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6788] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*75.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6788] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*75.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6789] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*75.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6789] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*75.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6790] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*75.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6790] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*75.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6791] = 0.039 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6791] = 0.039 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6792] = 0.0585 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6792] = 0.0585 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6793] = 0.473 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6793] = 0.473 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6794] = 0.215 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6794] = 0.215 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6795] = 0.215 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6795] = 0.215 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6796] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6796] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6797] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6797] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6798] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6798] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6799] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6799] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*76.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6800] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6800] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6801] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6801] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6802] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6802] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6803] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6803] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6804] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6804] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6805] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6805] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*77.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6806] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*78.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6806] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*78.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6807] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*79.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6807] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*79.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6808] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*79.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6808] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*79.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6809] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*79.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6809] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*79.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6810] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*79.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6810] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*79.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6811] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6811] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6812] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6812] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6813] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6813] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6814] = 0.25 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6814] = 0.25 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6815] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6815] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6816] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6816] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6817] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6817] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*80.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6818] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*81.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6818] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*81.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6819] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*81.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6819] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*81.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6820] = 0.333 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*81.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6820] = 0.333 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*81.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6821] = 0.13 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*84.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6821] = 0.13 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*84.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6822] = 0.435 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*84.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6822] = 0.435 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*84.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6823] = 0.435 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*84.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6823] = 0.435 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*84.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6824] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*85.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6824] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*85.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6825] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*85.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6825] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*85.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6826] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*86.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6826] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*86.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6827] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*86.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6827] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*86.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6828] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*87.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6828] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*87.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6829] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*87.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6829] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*87.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6830] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*88.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6830] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*88.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6831] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*88.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6831] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*88.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6832] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*89.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6832] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*89.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6833] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*89.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6833] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*89.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6834] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*90.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6834] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*90.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6835] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*90.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6835] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*90.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6836] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*96.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6836] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*96.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6837] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*96.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6837] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*96.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6838] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*97.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6838] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*97.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6839] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*97.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6839] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*97.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6840] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*98.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6840] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*98.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6841] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*98.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6841] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*98.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6842] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*98.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6842] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*98.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6843] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*99.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6843] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*99.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6844] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*99.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6844] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*99.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6845] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*99.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6845] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*99.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6846] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*99.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6846] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*99.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6847] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*100.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6847] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*100.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6848] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*100.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6848] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*100.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6849] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*100.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6849] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*100.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6850] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*100.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6850] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*100.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6851] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*101.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6851] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*101.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6852] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*101.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6852] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*101.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6853] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*101.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6853] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*101.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6854] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*101.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6854] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*101.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6855] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*108.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6855] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*108.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6856] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*108.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6856] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*108.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6857] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*109.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6857] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*109.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6858] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*109.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6858] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*109.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6859] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*110.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6859] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*110.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6860] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*110.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6860] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*110.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6861] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*111.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6861] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*111.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6862] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*111.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6862] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*111.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6863] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*112.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6863] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*112.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6864] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*112.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6864] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*112.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6865] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*113.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6865] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*113.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6866] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*113.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6866] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*113.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6867] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*114.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6867] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*114.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6868] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*114.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6868] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*114.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6869] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*120.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6869] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*120.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6870] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*120.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6870] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*120.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6871] = 0.774 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*121.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6871] = 0.774 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*121.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6872] = 0.0273 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*121.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6872] = 0.0273 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*121.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6873] = 0.198 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*121.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6873] = 0.198 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*121.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6874] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*122.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6874] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*122.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6875] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*122.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6875] = 1.0 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*122.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6876] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*123.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6876] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*123.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6877] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*123.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6877] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*123.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6878] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*123.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6878] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*123.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6879] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*123.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6879] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*123.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6880] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*124.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6880] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*124.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6881] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*124.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6881] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*124.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6882] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*125.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6882] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*125.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6883] = 0.5 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*125.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6883] = 0.5 * pi * rG * rG * gdens * + sqrt(8.0*kerg*Tgas/(pi*amu*125.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6884] = 0.0424 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*132.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6884] = 0.0424 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*132.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6885] = 0.0135 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*132.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6885] = 0.0135 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*132.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6886] = 0.607 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*132.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6886] = 0.607 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*132.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6887] = 0.337 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0*kerg*Tgas/(pi*amu*132.0)) * (1.0 + pow(echarge, + if (Tgas>=5.0 && Tgas<41000.0) { k[6887] = 0.337 * pi * rG * rG * gdens + * sqrt(8.0*kerg*Tgas/(pi*amu*132.0)) * (1.0 + pow(echarge, 2.0)/rG/kerg/Tgas) * (1.0 + sqrt(2.0*pow(echarge, - 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } + 2.0)/(rG*kerg*Tgas+2.0*pow(echarge, 2.0)))); } - if (Tgas>5.0 && Tgas<41000.0) { k[6888] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*1.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6888] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*1.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6889] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*2.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6889] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*2.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6890] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*4.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6890] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*4.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6891] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*12.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6891] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*12.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6892] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*13.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6892] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*13.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6893] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*14.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6893] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*14.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6894] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*14.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6894] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*14.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6895] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*15.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6895] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*15.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6896] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*15.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6896] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*15.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6897] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*16.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6897] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*16.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6898] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*16.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6898] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*16.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6899] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*16.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6899] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*16.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6900] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*17.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6900] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*17.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6901] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*17.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6901] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*17.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6902] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*18.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6902] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*18.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6903] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*19.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6903] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*19.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6904] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*20.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6904] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*20.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6905] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*23.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6905] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*23.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6906] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*24.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6906] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*24.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6907] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*24.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6907] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*24.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6908] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*25.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6908] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*25.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6909] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*26.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6909] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*26.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6910] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*26.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6910] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*26.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6911] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*27.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6911] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*27.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6912] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*27.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6912] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*27.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6913] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*27.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6913] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*27.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6914] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6914] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6915] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6915] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6916] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6916] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6917] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6917] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6918] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6918] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*28.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6919] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*29.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6919] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*29.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6920] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*29.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6920] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*29.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6921] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*29.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6921] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*29.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6922] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*29.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6922] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*29.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6923] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*30.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6923] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*30.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6924] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*30.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6924] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*30.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6925] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*30.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6925] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*30.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6926] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*30.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6926] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*30.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6927] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6927] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6928] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6928] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6929] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6929] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6930] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6930] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6931] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6931] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*31.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6932] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6932] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6933] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6933] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6934] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6934] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6935] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6935] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6936] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6936] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*32.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6937] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*33.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6937] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*33.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6938] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*33.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6938] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*33.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6939] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*33.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6939] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*33.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6940] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*34.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6940] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*34.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6941] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*34.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6941] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*34.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6942] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*35.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6942] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*35.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6943] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*36.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6943] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*36.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6944] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*36.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6944] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*36.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6945] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*37.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6945] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*37.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6946] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*38.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6946] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*38.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6947] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*38.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6947] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*38.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6948] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*38.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6948] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*38.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6949] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*39.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6949] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*39.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6950] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*39.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6950] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*39.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6951] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6951] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6952] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6952] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6953] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6953] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6954] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6954] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6955] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6955] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*40.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6956] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*41.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6956] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*41.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6957] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*41.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6957] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*41.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6958] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*41.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6958] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*41.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6959] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6959] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6960] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6960] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6961] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6961] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6962] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6962] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6963] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6963] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6964] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6964] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6965] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6965] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*42.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6966] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6966] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6967] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6967] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6968] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6968] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6969] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6969] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6970] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6970] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6971] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6971] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6972] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6972] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6973] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6973] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*43.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6974] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6974] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6975] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6975] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6976] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6976] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6977] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6977] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6978] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6978] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6979] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6979] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*44.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6980] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*45.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6980] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*45.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6981] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*45.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6981] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*45.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6982] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*45.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6982] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*45.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6983] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6983] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6984] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6984] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6985] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6985] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6986] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6986] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6987] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6987] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6988] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6988] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6989] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6989] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6990] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6990] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*46.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6991] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*47.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6991] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*47.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6992] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*47.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6992] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*47.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6993] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*48.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6993] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*48.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6994] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*48.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6994] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*48.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6995] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*48.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6995] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*48.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6996] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*49.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6996] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*49.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6997] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*50.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6997] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*50.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6998] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*50.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6998] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*50.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[6999] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*51.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[6999] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*51.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7000] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*51.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7000] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*51.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7001] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*51.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7001] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*51.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7002] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*51.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7002] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*51.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7003] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*52.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7003] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*52.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7004] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*52.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7004] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*52.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7005] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*52.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7005] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*52.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7006] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*52.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7006] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*52.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7007] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*53.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7007] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*53.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7008] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*53.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7008] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*53.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7009] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*54.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7009] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*54.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7010] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*54.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7010] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*54.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7011] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*54.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7011] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*54.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7012] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*54.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7012] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*54.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7013] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*55.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7013] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*55.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7014] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*55.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7014] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*55.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7015] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*56.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7015] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*56.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7016] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*56.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7016] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*56.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7017] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*56.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7017] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*56.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7018] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*58.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7018] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*58.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7019] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*59.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7019] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*59.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7020] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*59.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7020] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*59.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7021] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7021] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7022] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7022] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7023] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7023] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7024] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7024] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7025] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7025] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7026] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7026] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7027] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7027] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*60.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7028] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*61.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7028] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*61.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7029] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*62.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7029] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*62.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7030] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*62.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7030] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*62.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7031] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*64.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7031] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*64.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7032] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*64.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7032] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*64.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7033] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*64.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7033] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*64.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7034] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*64.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7034] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*64.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7035] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*65.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7035] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*65.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7036] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*65.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7036] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*65.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7037] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*65.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7037] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*65.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7038] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*66.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7038] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*66.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7039] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*67.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7039] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*67.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7040] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*68.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7040] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*68.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7041] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*72.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7041] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*72.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7042] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*73.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7042] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*73.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7043] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*74.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7043] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*74.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7044] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*74.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7044] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*74.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7045] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*75.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7045] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*75.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7046] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*76.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7046] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*76.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7047] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*78.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7047] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*78.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7048] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*79.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7048] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*79.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7049] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*80.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7049] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*80.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7050] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*84.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7050] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*84.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7051] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*85.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7051] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*85.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7052] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*86.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7052] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*86.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7053] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*88.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7053] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*88.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7054] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*89.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7054] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*89.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7055] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*96.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7055] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*96.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7056] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*97.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7056] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*97.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7057] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*98.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7057] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*98.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7058] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*98.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7058] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*98.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7059] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*99.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7059] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*99.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7060] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*108.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7060] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*108.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7061] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*109.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7061] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*109.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7062] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*110.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7062] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*110.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7063] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*113.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7063] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*113.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7064] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*120.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7064] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*120.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7065] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*121.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7065] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*121.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7066] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*122.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7066] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*122.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7067] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*122.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7067] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*122.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7068] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*123.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7068] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*123.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7069] = 1.0 * pi * pow(rG, 2.0) * - gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*132.0)); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7069] = opt_frz * 1.0 * pi * rG * rG + * gdens * sqrt(8.0 * kerg * Tgas/ (pi*amu*132.0)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7070] = - sqrt(2.0*sites*kerg*eb_GHI/(pi*pi*amu*1.0)) * nMono * densites * - exp(-eb_GHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7070] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHI/(pi*pi*amu*1.0)) * + exp(-eb_GHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7071] = - sqrt(2.0*sites*kerg*eb_GH2I/(pi*pi*amu*2.0)) * nMono * densites * - exp(-eb_GH2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7071] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2I/(pi*pi*amu*2.0)) * + exp(-eb_GH2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7072] = - sqrt(2.0*sites*kerg*eb_GHeI/(pi*pi*amu*4.0)) * nMono * densites * - exp(-eb_GHeI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7072] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHeI/(pi*pi*amu*4.0)) * + exp(-eb_GHeI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7073] = - sqrt(2.0*sites*kerg*eb_GCI/(pi*pi*amu*12.0)) * nMono * densites * - exp(-eb_GCI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7073] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCI/(pi*pi*amu*12.0)) * + exp(-eb_GCI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7074] = - sqrt(2.0*sites*kerg*eb_GCHI/(pi*pi*amu*13.0)) * nMono * densites * - exp(-eb_GCHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7074] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCHI/(pi*pi*amu*13.0)) * + exp(-eb_GCHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7075] = - sqrt(2.0*sites*kerg*eb_GCH2I/(pi*pi*amu*14.0)) * nMono * densites * - exp(-eb_GCH2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7075] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2I/(pi*pi*amu*14.0)) * + exp(-eb_GCH2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7076] = - sqrt(2.0*sites*kerg*eb_GNI/(pi*pi*amu*14.0)) * nMono * densites * - exp(-eb_GNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7076] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNI/(pi*pi*amu*14.0)) * + exp(-eb_GNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7077] = - sqrt(2.0*sites*kerg*eb_GCH3I/(pi*pi*amu*15.0)) * nMono * densites * - exp(-eb_GCH3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7077] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3I/(pi*pi*amu*15.0)) * + exp(-eb_GCH3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7078] = - sqrt(2.0*sites*kerg*eb_GNHI/(pi*pi*amu*15.0)) * nMono * densites * - exp(-eb_GNHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7078] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNHI/(pi*pi*amu*15.0)) * + exp(-eb_GNHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7079] = - sqrt(2.0*sites*kerg*eb_GNH2I/(pi*pi*amu*16.0)) * nMono * densites * - exp(-eb_GNH2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7079] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNH2I/(pi*pi*amu*16.0)) * + exp(-eb_GNH2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7080] = - sqrt(2.0*sites*kerg*eb_GCH4I/(pi*pi*amu*16.0)) * nMono * densites * - exp(-eb_GCH4I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7080] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH4I/(pi*pi*amu*16.0)) * + exp(-eb_GCH4I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7081] = - sqrt(2.0*sites*kerg*eb_GOI/(pi*pi*amu*16.0)) * nMono * densites * - exp(-eb_GOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7081] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GOI/(pi*pi*amu*16.0)) * + exp(-eb_GOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7082] = - sqrt(2.0*sites*kerg*eb_GNH3I/(pi*pi*amu*17.0)) * nMono * densites * - exp(-eb_GNH3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7082] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNH3I/(pi*pi*amu*17.0)) * + exp(-eb_GNH3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7083] = - sqrt(2.0*sites*kerg*eb_GOHI/(pi*pi*amu*17.0)) * nMono * densites * - exp(-eb_GOHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7083] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GOHI/(pi*pi*amu*17.0)) * + exp(-eb_GOHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7084] = - sqrt(2.0*sites*kerg*eb_GH2OI/(pi*pi*amu*18.0)) * nMono * densites * - exp(-eb_GH2OI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7084] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2OI/(pi*pi*amu*18.0)) * + exp(-eb_GH2OI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7085] = - sqrt(2.0*sites*kerg*eb_GFI/(pi*pi*amu*19.0)) * nMono * densites * - exp(-eb_GFI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7085] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GFI/(pi*pi*amu*19.0)) * + exp(-eb_GFI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7086] = - sqrt(2.0*sites*kerg*eb_GHFI/(pi*pi*amu*20.0)) * nMono * densites * - exp(-eb_GHFI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7086] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHFI/(pi*pi*amu*20.0)) * + exp(-eb_GHFI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7087] = - sqrt(2.0*sites*kerg*eb_GNaI/(pi*pi*amu*23.0)) * nMono * densites * - exp(-eb_GNaI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7087] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNaI/(pi*pi*amu*23.0)) * + exp(-eb_GNaI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7088] = - sqrt(2.0*sites*kerg*eb_GMgI/(pi*pi*amu*24.0)) * nMono * densites * - exp(-eb_GMgI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7088] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GMgI/(pi*pi*amu*24.0)) * + exp(-eb_GMgI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7089] = - sqrt(2.0*sites*kerg*eb_GC2I/(pi*pi*amu*24.0)) * nMono * densites * - exp(-eb_GC2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7089] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2I/(pi*pi*amu*24.0)) * + exp(-eb_GC2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7090] = - sqrt(2.0*sites*kerg*eb_GC2HI/(pi*pi*amu*25.0)) * nMono * densites * - exp(-eb_GC2HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7090] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2HI/(pi*pi*amu*25.0)) * + exp(-eb_GC2HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7091] = - sqrt(2.0*sites*kerg*eb_GCNI/(pi*pi*amu*26.0)) * nMono * densites * - exp(-eb_GCNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7091] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCNI/(pi*pi*amu*26.0)) * + exp(-eb_GCNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7092] = - sqrt(2.0*sites*kerg*eb_GC2H2I/(pi*pi*amu*26.0)) * nMono * densites * - exp(-eb_GC2H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7092] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2H2I/(pi*pi*amu*26.0)) * + exp(-eb_GC2H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7093] = - sqrt(2.0*sites*kerg*eb_GHCNI/(pi*pi*amu*27.0)) * nMono * densites * - exp(-eb_GHCNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7093] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHCNI/(pi*pi*amu*27.0)) * + exp(-eb_GHCNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7094] = - sqrt(2.0*sites*kerg*eb_GC2H3I/(pi*pi*amu*27.0)) * nMono * densites * - exp(-eb_GC2H3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7094] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2H3I/(pi*pi*amu*27.0)) * + exp(-eb_GC2H3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7095] = - sqrt(2.0*sites*kerg*eb_GHNCI/(pi*pi*amu*27.0)) * nMono * densites * - exp(-eb_GHNCI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7095] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHNCI/(pi*pi*amu*27.0)) * + exp(-eb_GHNCI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7096] = - sqrt(2.0*sites*kerg*eb_GH2CNI/(pi*pi*amu*28.0)) * nMono * densites * - exp(-eb_GH2CNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7096] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2CNI/(pi*pi*amu*28.0)) * + exp(-eb_GH2CNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7097] = - sqrt(2.0*sites*kerg*eb_GSiI/(pi*pi*amu*28.0)) * nMono * densites * - exp(-eb_GSiI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7097] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiI/(pi*pi*amu*28.0)) * + exp(-eb_GSiI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7098] = - sqrt(2.0*sites*kerg*eb_GN2I/(pi*pi*amu*28.0)) * nMono * densites * - exp(-eb_GN2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7098] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GN2I/(pi*pi*amu*28.0)) * + exp(-eb_GN2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7099] = - sqrt(2.0*sites*kerg*eb_GC2H4I/(pi*pi*amu*28.0)) * nMono * densites * - exp(-eb_GC2H4I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7099] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2H4I/(pi*pi*amu*28.0)) * + exp(-eb_GC2H4I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7100] = - sqrt(2.0*sites*kerg*eb_GCOI/(pi*pi*amu*28.0)) * nMono * densites * - exp(-eb_GCOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7100] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCOI/(pi*pi*amu*28.0)) * + exp(-eb_GCOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7101] = - sqrt(2.0*sites*kerg*eb_GHCOI/(pi*pi*amu*29.0)) * nMono * densites * - exp(-eb_GHCOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7101] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHCOI/(pi*pi*amu*29.0)) * + exp(-eb_GHCOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7102] = - sqrt(2.0*sites*kerg*eb_GSiHI/(pi*pi*amu*29.0)) * nMono * densites * - exp(-eb_GSiHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7102] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiHI/(pi*pi*amu*29.0)) * + exp(-eb_GSiHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7103] = - sqrt(2.0*sites*kerg*eb_GCH2NHI/(pi*pi*amu*29.0)) * nMono * densites * - exp(-eb_GCH2NHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7103] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2NHI/(pi*pi*amu*29.0)) * + exp(-eb_GCH2NHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7104] = - sqrt(2.0*sites*kerg*eb_GC2H5I/(pi*pi*amu*29.0)) * nMono * densites * - exp(-eb_GC2H5I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7104] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2H5I/(pi*pi*amu*29.0)) * + exp(-eb_GC2H5I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7105] = - sqrt(2.0*sites*kerg*eb_GC2H6I/(pi*pi*amu*30.0)) * nMono * densites * - exp(-eb_GC2H6I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7105] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2H6I/(pi*pi*amu*30.0)) * + exp(-eb_GC2H6I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7106] = - sqrt(2.0*sites*kerg*eb_GSiH2I/(pi*pi*amu*30.0)) * nMono * densites * - exp(-eb_GSiH2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7106] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiH2I/(pi*pi*amu*30.0)) * + exp(-eb_GSiH2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7107] = - sqrt(2.0*sites*kerg*eb_GNOI/(pi*pi*amu*30.0)) * nMono * densites * - exp(-eb_GNOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7107] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNOI/(pi*pi*amu*30.0)) * + exp(-eb_GNOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7108] = - sqrt(2.0*sites*kerg*eb_GH2COI/(pi*pi*amu*30.0)) * nMono * densites * - exp(-eb_GH2COI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7108] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2COI/(pi*pi*amu*30.0)) * + exp(-eb_GH2COI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7109] = - sqrt(2.0*sites*kerg*eb_GSiH3I/(pi*pi*amu*31.0)) * nMono * densites * - exp(-eb_GSiH3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7109] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiH3I/(pi*pi*amu*31.0)) * + exp(-eb_GSiH3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7110] = - sqrt(2.0*sites*kerg*eb_GPI/(pi*pi*amu*31.0)) * nMono * densites * - exp(-eb_GPI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7110] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GPI/(pi*pi*amu*31.0)) * + exp(-eb_GPI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7111] = - sqrt(2.0*sites*kerg*eb_GCH2OHI/(pi*pi*amu*31.0)) * nMono * densites * - exp(-eb_GCH2OHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7111] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2OHI/(pi*pi*amu*31.0)) * + exp(-eb_GCH2OHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7112] = - sqrt(2.0*sites*kerg*eb_GHNOI/(pi*pi*amu*31.0)) * nMono * densites * - exp(-eb_GHNOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7112] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHNOI/(pi*pi*amu*31.0)) * + exp(-eb_GHNOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7113] = - sqrt(2.0*sites*kerg*eb_GCH3OI/(pi*pi*amu*31.0)) * nMono * densites * - exp(-eb_GCH3OI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7113] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3OI/(pi*pi*amu*31.0)) * + exp(-eb_GCH3OI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7114] = - sqrt(2.0*sites*kerg*eb_GSI/(pi*pi*amu*32.0)) * nMono * densites * - exp(-eb_GSI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7114] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSI/(pi*pi*amu*32.0)) * + exp(-eb_GSI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7115] = - sqrt(2.0*sites*kerg*eb_GPHI/(pi*pi*amu*32.0)) * nMono * densites * - exp(-eb_GPHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7115] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GPHI/(pi*pi*amu*32.0)) * + exp(-eb_GPHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7116] = - sqrt(2.0*sites*kerg*eb_GO2I/(pi*pi*amu*32.0)) * nMono * densites * - exp(-eb_GO2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7116] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GO2I/(pi*pi*amu*32.0)) * + exp(-eb_GO2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7117] = - sqrt(2.0*sites*kerg*eb_GSiH4I/(pi*pi*amu*32.0)) * nMono * densites * - exp(-eb_GSiH4I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7117] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiH4I/(pi*pi*amu*32.0)) * + exp(-eb_GSiH4I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7118] = - sqrt(2.0*sites*kerg*eb_GCH3OHI/(pi*pi*amu*32.0)) * nMono * densites * - exp(-eb_GCH3OHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7118] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3OHI/(pi*pi*amu*32.0)) * + exp(-eb_GCH3OHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7119] = - sqrt(2.0*sites*kerg*eb_GO2HI/(pi*pi*amu*33.0)) * nMono * densites * - exp(-eb_GO2HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7119] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GO2HI/(pi*pi*amu*33.0)) * + exp(-eb_GO2HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7120] = - sqrt(2.0*sites*kerg*eb_GHSI/(pi*pi*amu*33.0)) * nMono * densites * - exp(-eb_GHSI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7120] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHSI/(pi*pi*amu*33.0)) * + exp(-eb_GHSI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7121] = - sqrt(2.0*sites*kerg*eb_GPH2I/(pi*pi*amu*33.0)) * nMono * densites * - exp(-eb_GPH2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7121] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GPH2I/(pi*pi*amu*33.0)) * + exp(-eb_GPH2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7122] = - sqrt(2.0*sites*kerg*eb_GH2O2I/(pi*pi*amu*34.0)) * nMono * densites * - exp(-eb_GH2O2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7122] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2O2I/(pi*pi*amu*34.0)) * + exp(-eb_GH2O2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7123] = - sqrt(2.0*sites*kerg*eb_GH2SI/(pi*pi*amu*34.0)) * nMono * densites * - exp(-eb_GH2SI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7123] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2SI/(pi*pi*amu*34.0)) * + exp(-eb_GH2SI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7124] = - sqrt(2.0*sites*kerg*eb_GClI/(pi*pi*amu*35.0)) * nMono * densites * - exp(-eb_GClI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7124] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GClI/(pi*pi*amu*35.0)) * + exp(-eb_GClI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7125] = - sqrt(2.0*sites*kerg*eb_GC3I/(pi*pi*amu*36.0)) * nMono * densites * - exp(-eb_GC3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7125] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC3I/(pi*pi*amu*36.0)) * + exp(-eb_GC3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7126] = - sqrt(2.0*sites*kerg*eb_GHClI/(pi*pi*amu*36.0)) * nMono * densites * - exp(-eb_GHClI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7126] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHClI/(pi*pi*amu*36.0)) * + exp(-eb_GHClI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7127] = - sqrt(2.0*sites*kerg*eb_GC3HI/(pi*pi*amu*37.0)) * nMono * densites * - exp(-eb_GC3HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7127] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC3HI/(pi*pi*amu*37.0)) * + exp(-eb_GC3HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7128] = - sqrt(2.0*sites*kerg*eb_GH2CCCI/(pi*pi*amu*38.0)) * nMono * densites * - exp(-eb_GH2CCCI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7128] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2CCCI/(pi*pi*amu*38.0)) * + exp(-eb_GH2CCCI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7129] = - sqrt(2.0*sites*kerg*eb_GC2NI/(pi*pi*amu*38.0)) * nMono * densites * - exp(-eb_GC2NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7129] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2NI/(pi*pi*amu*38.0)) * + exp(-eb_GC2NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7130] = - sqrt(2.0*sites*kerg*eb_GC3H2I/(pi*pi*amu*38.0)) * nMono * densites * - exp(-eb_GC3H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7130] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC3H2I/(pi*pi*amu*38.0)) * + exp(-eb_GC3H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7131] = - sqrt(2.0*sites*kerg*eb_GHCCNI/(pi*pi*amu*39.0)) * nMono * densites * - exp(-eb_GHCCNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7131] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHCCNI/(pi*pi*amu*39.0)) * + exp(-eb_GHCCNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7132] = - sqrt(2.0*sites*kerg*eb_GCH2CCHI/(pi*pi*amu*39.0)) * nMono * densites * - exp(-eb_GCH2CCHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7132] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2CCHI/(pi*pi*amu*39.0)) * + exp(-eb_GCH2CCHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7133] = - sqrt(2.0*sites*kerg*eb_GCH2CCH2I/(pi*pi*amu*40.0)) * nMono * densites * - exp(-eb_GCH2CCH2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7133] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2CCH2I/(pi*pi*amu*40.0)) * + exp(-eb_GCH2CCH2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7134] = - sqrt(2.0*sites*kerg*eb_GCH3CCHI/(pi*pi*amu*40.0)) * nMono * densites * - exp(-eb_GCH3CCHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7134] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3CCHI/(pi*pi*amu*40.0)) * + exp(-eb_GCH3CCHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7135] = - sqrt(2.0*sites*kerg*eb_GCH2CNI/(pi*pi*amu*40.0)) * nMono * densites * - exp(-eb_GCH2CNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7135] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2CNI/(pi*pi*amu*40.0)) * + exp(-eb_GCH2CNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7136] = - sqrt(2.0*sites*kerg*eb_GC2OI/(pi*pi*amu*40.0)) * nMono * densites * - exp(-eb_GC2OI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7136] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2OI/(pi*pi*amu*40.0)) * + exp(-eb_GC2OI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7137] = - sqrt(2.0*sites*kerg*eb_GSiCI/(pi*pi*amu*40.0)) * nMono * densites * - exp(-eb_GSiCI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7137] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiCI/(pi*pi*amu*40.0)) * + exp(-eb_GSiCI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7138] = - sqrt(2.0*sites*kerg*eb_GHCSiI/(pi*pi*amu*41.0)) * nMono * densites * - exp(-eb_GHCSiI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7138] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHCSiI/(pi*pi*amu*41.0)) * + exp(-eb_GHCSiI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7139] = - sqrt(2.0*sites*kerg*eb_GCH3CNI/(pi*pi*amu*41.0)) * nMono * densites * - exp(-eb_GCH3CNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7139] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3CNI/(pi*pi*amu*41.0)) * + exp(-eb_GCH3CNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7140] = - sqrt(2.0*sites*kerg*eb_GHC2OI/(pi*pi*amu*41.0)) * nMono * densites * - exp(-eb_GHC2OI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7140] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHC2OI/(pi*pi*amu*41.0)) * + exp(-eb_GHC2OI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7141] = - sqrt(2.0*sites*kerg*eb_GCH3CHCH2I/(pi*pi*amu*42.0)) * nMono * densites * - exp(-eb_GCH3CHCH2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7141] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3CHCH2I/(pi*pi*amu*42.0)) * + exp(-eb_GCH3CHCH2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7142] = - sqrt(2.0*sites*kerg*eb_GCNOI/(pi*pi*amu*42.0)) * nMono * densites * - exp(-eb_GCNOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7142] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCNOI/(pi*pi*amu*42.0)) * + exp(-eb_GCNOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7143] = - sqrt(2.0*sites*kerg*eb_GCH2COI/(pi*pi*amu*42.0)) * nMono * densites * - exp(-eb_GCH2COI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7143] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2COI/(pi*pi*amu*42.0)) * + exp(-eb_GCH2COI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7144] = - sqrt(2.0*sites*kerg*eb_GNH2CNI/(pi*pi*amu*42.0)) * nMono * densites * - exp(-eb_GNH2CNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7144] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNH2CNI/(pi*pi*amu*42.0)) * + exp(-eb_GNH2CNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7145] = - sqrt(2.0*sites*kerg*eb_GSiCH2I/(pi*pi*amu*42.0)) * nMono * densites * - exp(-eb_GSiCH2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7145] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiCH2I/(pi*pi*amu*42.0)) * + exp(-eb_GSiCH2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7146] = - sqrt(2.0*sites*kerg*eb_GOCNI/(pi*pi*amu*42.0)) * nMono * densites * - exp(-eb_GOCNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7146] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GOCNI/(pi*pi*amu*42.0)) * + exp(-eb_GOCNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7147] = - sqrt(2.0*sites*kerg*eb_GSiNI/(pi*pi*amu*42.0)) * nMono * densites * - exp(-eb_GSiNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7147] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiNI/(pi*pi*amu*42.0)) * + exp(-eb_GSiNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7148] = - sqrt(2.0*sites*kerg*eb_GCH3COI/(pi*pi*amu*43.0)) * nMono * densites * - exp(-eb_GCH3COI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7148] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3COI/(pi*pi*amu*43.0)) * + exp(-eb_GCH3COI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7149] = - sqrt(2.0*sites*kerg*eb_GHNSiI/(pi*pi*amu*43.0)) * nMono * densites * - exp(-eb_GHNSiI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7149] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHNSiI/(pi*pi*amu*43.0)) * + exp(-eb_GHNSiI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7150] = - sqrt(2.0*sites*kerg*eb_GHNCOI/(pi*pi*amu*43.0)) * nMono * densites * - exp(-eb_GHNCOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7150] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHNCOI/(pi*pi*amu*43.0)) * + exp(-eb_GHNCOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7151] = - sqrt(2.0*sites*kerg*eb_GHOCNI/(pi*pi*amu*43.0)) * nMono * densites * - exp(-eb_GHOCNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7151] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHOCNI/(pi*pi*amu*43.0)) * + exp(-eb_GHOCNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7152] = - sqrt(2.0*sites*kerg*eb_GSiCH3I/(pi*pi*amu*43.0)) * nMono * densites * - exp(-eb_GSiCH3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7152] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiCH3I/(pi*pi*amu*43.0)) * + exp(-eb_GSiCH3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7153] = - sqrt(2.0*sites*kerg*eb_GHCNOI/(pi*pi*amu*43.0)) * nMono * densites * - exp(-eb_GHCNOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7153] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHCNOI/(pi*pi*amu*43.0)) * + exp(-eb_GHCNOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7154] = - sqrt(2.0*sites*kerg*eb_GCPI/(pi*pi*amu*43.0)) * nMono * densites * - exp(-eb_GCPI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7154] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCPI/(pi*pi*amu*43.0)) * + exp(-eb_GCPI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7155] = - sqrt(2.0*sites*kerg*eb_GHONCI/(pi*pi*amu*43.0)) * nMono * densites * - exp(-eb_GHONCI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7155] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHONCI/(pi*pi*amu*43.0)) * + exp(-eb_GHONCI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7156] = - sqrt(2.0*sites*kerg*eb_GN2OI/(pi*pi*amu*44.0)) * nMono * densites * - exp(-eb_GN2OI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7156] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GN2OI/(pi*pi*amu*44.0)) * + exp(-eb_GN2OI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7157] = - sqrt(2.0*sites*kerg*eb_GCSI/(pi*pi*amu*44.0)) * nMono * densites * - exp(-eb_GCSI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7157] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCSI/(pi*pi*amu*44.0)) * + exp(-eb_GCSI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7158] = - sqrt(2.0*sites*kerg*eb_GHCPI/(pi*pi*amu*44.0)) * nMono * densites * - exp(-eb_GHCPI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7158] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHCPI/(pi*pi*amu*44.0)) * + exp(-eb_GHCPI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7159] = - sqrt(2.0*sites*kerg*eb_GCH3CHOI/(pi*pi*amu*44.0)) * nMono * densites * - exp(-eb_GCH3CHOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7159] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3CHOI/(pi*pi*amu*44.0)) * + exp(-eb_GCH3CHOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7160] = - sqrt(2.0*sites*kerg*eb_GCO2I/(pi*pi*amu*44.0)) * nMono * densites * - exp(-eb_GCO2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7160] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCO2I/(pi*pi*amu*44.0)) * + exp(-eb_GCO2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7161] = - sqrt(2.0*sites*kerg*eb_GSiOI/(pi*pi*amu*44.0)) * nMono * densites * - exp(-eb_GSiOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7161] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiOI/(pi*pi*amu*44.0)) * + exp(-eb_GSiOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7162] = - sqrt(2.0*sites*kerg*eb_GHCSI/(pi*pi*amu*45.0)) * nMono * densites * - exp(-eb_GHCSI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7162] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHCSI/(pi*pi*amu*45.0)) * + exp(-eb_GHCSI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7163] = - sqrt(2.0*sites*kerg*eb_GCOOHI/(pi*pi*amu*45.0)) * nMono * densites * - exp(-eb_GCOOHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7163] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCOOHI/(pi*pi*amu*45.0)) * + exp(-eb_GCOOHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7164] = - sqrt(2.0*sites*kerg*eb_GPNI/(pi*pi*amu*45.0)) * nMono * densites * - exp(-eb_GPNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7164] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GPNI/(pi*pi*amu*45.0)) * + exp(-eb_GPNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7165] = - sqrt(2.0*sites*kerg*eb_GCH3OCH3I/(pi*pi*amu*46.0)) * nMono * densites * - exp(-eb_GCH3OCH3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7165] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3OCH3I/(pi*pi*amu*46.0)) * + exp(-eb_GCH3OCH3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7166] = - sqrt(2.0*sites*kerg*eb_GCH2PHI/(pi*pi*amu*46.0)) * nMono * densites * - exp(-eb_GCH2PHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7166] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2PHI/(pi*pi*amu*46.0)) * + exp(-eb_GCH2PHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7167] = - sqrt(2.0*sites*kerg*eb_GNO2I/(pi*pi*amu*46.0)) * nMono * densites * - exp(-eb_GNO2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7167] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNO2I/(pi*pi*amu*46.0)) * + exp(-eb_GNO2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7168] = - sqrt(2.0*sites*kerg*eb_GHCOOHI/(pi*pi*amu*46.0)) * nMono * densites * - exp(-eb_GHCOOHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7168] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHCOOHI/(pi*pi*amu*46.0)) * + exp(-eb_GHCOOHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7169] = - sqrt(2.0*sites*kerg*eb_GC2H5OHI/(pi*pi*amu*46.0)) * nMono * densites * - exp(-eb_GC2H5OHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7169] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2H5OHI/(pi*pi*amu*46.0)) * + exp(-eb_GC2H5OHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7170] = - sqrt(2.0*sites*kerg*eb_GH2SiOI/(pi*pi*amu*46.0)) * nMono * densites * - exp(-eb_GH2SiOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7170] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2SiOI/(pi*pi*amu*46.0)) * + exp(-eb_GH2SiOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7171] = - sqrt(2.0*sites*kerg*eb_GH2CSI/(pi*pi*amu*46.0)) * nMono * densites * - exp(-eb_GH2CSI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7171] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2CSI/(pi*pi*amu*46.0)) * + exp(-eb_GH2CSI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7172] = - sqrt(2.0*sites*kerg*eb_GNSI/(pi*pi*amu*46.0)) * nMono * densites * - exp(-eb_GNSI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7172] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNSI/(pi*pi*amu*46.0)) * + exp(-eb_GNSI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7173] = - sqrt(2.0*sites*kerg*eb_GCClI/(pi*pi*amu*47.0)) * nMono * densites * - exp(-eb_GCClI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7173] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCClI/(pi*pi*amu*47.0)) * + exp(-eb_GCClI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7174] = - sqrt(2.0*sites*kerg*eb_GPOI/(pi*pi*amu*47.0)) * nMono * densites * - exp(-eb_GPOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7174] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GPOI/(pi*pi*amu*47.0)) * + exp(-eb_GPOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7175] = - sqrt(2.0*sites*kerg*eb_GHPOI/(pi*pi*amu*48.0)) * nMono * densites * - exp(-eb_GHPOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7175] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHPOI/(pi*pi*amu*48.0)) * + exp(-eb_GHPOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7176] = - sqrt(2.0*sites*kerg*eb_GSOI/(pi*pi*amu*48.0)) * nMono * densites * - exp(-eb_GSOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7176] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSOI/(pi*pi*amu*48.0)) * + exp(-eb_GSOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7177] = - sqrt(2.0*sites*kerg*eb_GC4I/(pi*pi*amu*48.0)) * nMono * densites * - exp(-eb_GC4I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7177] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC4I/(pi*pi*amu*48.0)) * + exp(-eb_GC4I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7178] = - sqrt(2.0*sites*kerg*eb_GC4HI/(pi*pi*amu*49.0)) * nMono * densites * - exp(-eb_GC4HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7178] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC4HI/(pi*pi*amu*49.0)) * + exp(-eb_GC4HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7179] = - sqrt(2.0*sites*kerg*eb_GC3NI/(pi*pi*amu*50.0)) * nMono * densites * - exp(-eb_GC3NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7179] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC3NI/(pi*pi*amu*50.0)) * + exp(-eb_GC3NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7180] = - sqrt(2.0*sites*kerg*eb_GC4H2I/(pi*pi*amu*50.0)) * nMono * densites * - exp(-eb_GC4H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7180] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC4H2I/(pi*pi*amu*50.0)) * + exp(-eb_GC4H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7181] = - sqrt(2.0*sites*kerg*eb_GClOI/(pi*pi*amu*51.0)) * nMono * densites * - exp(-eb_GClOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7181] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GClOI/(pi*pi*amu*51.0)) * + exp(-eb_GClOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7182] = - sqrt(2.0*sites*kerg*eb_GHNC3I/(pi*pi*amu*51.0)) * nMono * densites * - exp(-eb_GHNC3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7182] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHNC3I/(pi*pi*amu*51.0)) * + exp(-eb_GHNC3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7183] = - sqrt(2.0*sites*kerg*eb_GHC3NI/(pi*pi*amu*51.0)) * nMono * densites * - exp(-eb_GHC3NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7183] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHC3NI/(pi*pi*amu*51.0)) * + exp(-eb_GHC3NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7184] = - sqrt(2.0*sites*kerg*eb_GC4H3I/(pi*pi*amu*51.0)) * nMono * densites * - exp(-eb_GC4H3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7184] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC4H3I/(pi*pi*amu*51.0)) * + exp(-eb_GC4H3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7185] = - sqrt(2.0*sites*kerg*eb_GSiC2I/(pi*pi*amu*52.0)) * nMono * densites * - exp(-eb_GSiC2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7185] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiC2I/(pi*pi*amu*52.0)) * + exp(-eb_GSiC2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7186] = - sqrt(2.0*sites*kerg*eb_GCH2CHCCHI/(pi*pi*amu*52.0)) * nMono * densites * - exp(-eb_GCH2CHCCHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7186] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2CHCCHI/(pi*pi*amu*52.0)) * + exp(-eb_GCH2CHCCHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7187] = - sqrt(2.0*sites*kerg*eb_GNCCNI/(pi*pi*amu*52.0)) * nMono * densites * - exp(-eb_GNCCNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7187] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GNCCNI/(pi*pi*amu*52.0)) * + exp(-eb_GNCCNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7188] = - sqrt(2.0*sites*kerg*eb_GC3OI/(pi*pi*amu*52.0)) * nMono * densites * - exp(-eb_GC3OI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7188] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC3OI/(pi*pi*amu*52.0)) * + exp(-eb_GC3OI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7189] = - sqrt(2.0*sites*kerg*eb_GCH2CHCNI/(pi*pi*amu*53.0)) * nMono * densites * - exp(-eb_GCH2CHCNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7189] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2CHCNI/(pi*pi*amu*53.0)) * + exp(-eb_GCH2CHCNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7190] = - sqrt(2.0*sites*kerg*eb_GSiC2HI/(pi*pi*amu*53.0)) * nMono * densites * - exp(-eb_GSiC2HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7190] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiC2HI/(pi*pi*amu*53.0)) * + exp(-eb_GSiC2HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7191] = - sqrt(2.0*sites*kerg*eb_GC4H6I/(pi*pi*amu*54.0)) * nMono * densites * - exp(-eb_GC4H6I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7191] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC4H6I/(pi*pi*amu*54.0)) * + exp(-eb_GC4H6I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7192] = - sqrt(2.0*sites*kerg*eb_GSiC2H2I/(pi*pi*amu*54.0)) * nMono * densites * - exp(-eb_GSiC2H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7192] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiC2H2I/(pi*pi*amu*54.0)) * + exp(-eb_GSiC2H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7193] = - sqrt(2.0*sites*kerg*eb_GC2H4CNI/(pi*pi*amu*54.0)) * nMono * densites * - exp(-eb_GC2H4CNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7193] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2H4CNI/(pi*pi*amu*54.0)) * + exp(-eb_GC2H4CNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7194] = - sqrt(2.0*sites*kerg*eb_GSiNCI/(pi*pi*amu*54.0)) * nMono * densites * - exp(-eb_GSiNCI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7194] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiNCI/(pi*pi*amu*54.0)) * + exp(-eb_GSiNCI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7195] = - sqrt(2.0*sites*kerg*eb_GC2H5CNI/(pi*pi*amu*55.0)) * nMono * densites * - exp(-eb_GC2H5CNI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7195] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2H5CNI/(pi*pi*amu*55.0)) * + exp(-eb_GC2H5CNI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7196] = - sqrt(2.0*sites*kerg*eb_GCCPI/(pi*pi*amu*55.0)) * nMono * densites * - exp(-eb_GCCPI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7196] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCCPI/(pi*pi*amu*55.0)) * + exp(-eb_GCCPI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7197] = - sqrt(2.0*sites*kerg*eb_GC2SI/(pi*pi*amu*56.0)) * nMono * densites * - exp(-eb_GC2SI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7197] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC2SI/(pi*pi*amu*56.0)) * + exp(-eb_GC2SI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7198] = - sqrt(2.0*sites*kerg*eb_GFeI/(pi*pi*amu*56.0)) * nMono * densites * - exp(-eb_GFeI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7198] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GFeI/(pi*pi*amu*56.0)) * + exp(-eb_GFeI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7199] = - sqrt(2.0*sites*kerg*eb_GHC2PI/(pi*pi*amu*56.0)) * nMono * densites * - exp(-eb_GHC2PI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7199] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHC2PI/(pi*pi*amu*56.0)) * + exp(-eb_GHC2PI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7200] = - sqrt(2.0*sites*kerg*eb_GCH3COCH3I/(pi*pi*amu*58.0)) * nMono * densites * - exp(-eb_GCH3COCH3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7200] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3COCH3I/(pi*pi*amu*58.0)) * + exp(-eb_GCH3COCH3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7201] = - sqrt(2.0*sites*kerg*eb_GCOOCH3I/(pi*pi*amu*59.0)) * nMono * densites * - exp(-eb_GCOOCH3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7201] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCOOCH3I/(pi*pi*amu*59.0)) * + exp(-eb_GCOOCH3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7202] = - sqrt(2.0*sites*kerg*eb_GCH2OHCOI/(pi*pi*amu*59.0)) * nMono * densites * - exp(-eb_GCH2OHCOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7202] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2OHCOI/(pi*pi*amu*59.0)) * + exp(-eb_GCH2OHCOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7203] = - sqrt(2.0*sites*kerg*eb_GHCOOCH3I/(pi*pi*amu*60.0)) * nMono * densites * - exp(-eb_GHCOOCH3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7203] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHCOOCH3I/(pi*pi*amu*60.0)) * + exp(-eb_GHCOOCH3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7204] = - sqrt(2.0*sites*kerg*eb_GOCSI/(pi*pi*amu*60.0)) * nMono * densites * - exp(-eb_GOCSI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7204] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GOCSI/(pi*pi*amu*60.0)) * + exp(-eb_GOCSI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7205] = - sqrt(2.0*sites*kerg*eb_GSiSI/(pi*pi*amu*60.0)) * nMono * densites * - exp(-eb_GSiSI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7205] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiSI/(pi*pi*amu*60.0)) * + exp(-eb_GSiSI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7206] = - sqrt(2.0*sites*kerg*eb_GC5I/(pi*pi*amu*60.0)) * nMono * densites * - exp(-eb_GC5I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7206] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC5I/(pi*pi*amu*60.0)) * + exp(-eb_GC5I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7207] = - sqrt(2.0*sites*kerg*eb_GSiO2I/(pi*pi*amu*60.0)) * nMono * densites * - exp(-eb_GSiO2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7207] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiO2I/(pi*pi*amu*60.0)) * + exp(-eb_GSiO2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7208] = - sqrt(2.0*sites*kerg*eb_GCH2OHCHOI/(pi*pi*amu*60.0)) * nMono * densites * - exp(-eb_GCH2OHCHOI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7208] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH2OHCHOI/(pi*pi*amu*60.0)) * + exp(-eb_GCH2OHCHOI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7209] = - sqrt(2.0*sites*kerg*eb_GCH3COOHI/(pi*pi*amu*60.0)) * nMono * densites * - exp(-eb_GCH3COOHI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7209] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3COOHI/(pi*pi*amu*60.0)) * + exp(-eb_GCH3COOHI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7210] = - sqrt(2.0*sites*kerg*eb_GC5HI/(pi*pi*amu*61.0)) * nMono * densites * - exp(-eb_GC5HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7210] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC5HI/(pi*pi*amu*61.0)) * + exp(-eb_GC5HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7211] = - sqrt(2.0*sites*kerg*eb_GC5H2I/(pi*pi*amu*62.0)) * nMono * densites * - exp(-eb_GC5H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7211] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC5H2I/(pi*pi*amu*62.0)) * + exp(-eb_GC5H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7212] = - sqrt(2.0*sites*kerg*eb_GC4NI/(pi*pi*amu*62.0)) * nMono * densites * - exp(-eb_GC4NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7212] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC4NI/(pi*pi*amu*62.0)) * + exp(-eb_GC4NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7213] = - sqrt(2.0*sites*kerg*eb_GSiC3I/(pi*pi*amu*64.0)) * nMono * densites * - exp(-eb_GSiC3I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7213] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiC3I/(pi*pi*amu*64.0)) * + exp(-eb_GSiC3I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7214] = - sqrt(2.0*sites*kerg*eb_GSO2I/(pi*pi*amu*64.0)) * nMono * densites * - exp(-eb_GSO2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7214] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSO2I/(pi*pi*amu*64.0)) * + exp(-eb_GSO2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7215] = - sqrt(2.0*sites*kerg*eb_GS2I/(pi*pi*amu*64.0)) * nMono * densites * - exp(-eb_GS2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7215] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GS2I/(pi*pi*amu*64.0)) * + exp(-eb_GS2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7216] = - sqrt(2.0*sites*kerg*eb_GCH3C4HI/(pi*pi*amu*64.0)) * nMono * densites * - exp(-eb_GCH3C4HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7216] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3C4HI/(pi*pi*amu*64.0)) * + exp(-eb_GCH3C4HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7217] = - sqrt(2.0*sites*kerg*eb_GSiC3HI/(pi*pi*amu*65.0)) * nMono * densites * - exp(-eb_GSiC3HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7217] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiC3HI/(pi*pi*amu*65.0)) * + exp(-eb_GSiC3HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7218] = - sqrt(2.0*sites*kerg*eb_GCH3C3NI/(pi*pi*amu*65.0)) * nMono * densites * - exp(-eb_GCH3C3NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7218] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3C3NI/(pi*pi*amu*65.0)) * + exp(-eb_GCH3C3NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7219] = - sqrt(2.0*sites*kerg*eb_GHS2I/(pi*pi*amu*65.0)) * nMono * densites * - exp(-eb_GHS2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7219] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHS2I/(pi*pi*amu*65.0)) * + exp(-eb_GHS2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7220] = - sqrt(2.0*sites*kerg*eb_GH2S2I/(pi*pi*amu*66.0)) * nMono * densites * - exp(-eb_GH2S2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7220] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GH2S2I/(pi*pi*amu*66.0)) * + exp(-eb_GH2S2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7221] = - sqrt(2.0*sites*kerg*eb_GC3PI/(pi*pi*amu*67.0)) * nMono * densites * - exp(-eb_GC3PI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7221] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC3PI/(pi*pi*amu*67.0)) * + exp(-eb_GC3PI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7222] = - sqrt(2.0*sites*kerg*eb_GC3SI/(pi*pi*amu*68.0)) * nMono * densites * - exp(-eb_GC3SI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7222] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC3SI/(pi*pi*amu*68.0)) * + exp(-eb_GC3SI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7223] = - sqrt(2.0*sites*kerg*eb_GC6I/(pi*pi*amu*72.0)) * nMono * densites * - exp(-eb_GC6I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7223] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC6I/(pi*pi*amu*72.0)) * + exp(-eb_GC6I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7224] = - sqrt(2.0*sites*kerg*eb_GC6HI/(pi*pi*amu*73.0)) * nMono * densites * - exp(-eb_GC6HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7224] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC6HI/(pi*pi*amu*73.0)) * + exp(-eb_GC6HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7225] = - sqrt(2.0*sites*kerg*eb_GC6H2I/(pi*pi*amu*74.0)) * nMono * densites * - exp(-eb_GC6H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7225] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC6H2I/(pi*pi*amu*74.0)) * + exp(-eb_GC6H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7226] = - sqrt(2.0*sites*kerg*eb_GC5NI/(pi*pi*amu*74.0)) * nMono * densites * - exp(-eb_GC5NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7226] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC5NI/(pi*pi*amu*74.0)) * + exp(-eb_GC5NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7227] = - sqrt(2.0*sites*kerg*eb_GHC5NI/(pi*pi*amu*75.0)) * nMono * densites * - exp(-eb_GHC5NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7227] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHC5NI/(pi*pi*amu*75.0)) * + exp(-eb_GHC5NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7228] = - sqrt(2.0*sites*kerg*eb_GSiC4I/(pi*pi*amu*76.0)) * nMono * densites * - exp(-eb_GSiC4I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7228] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GSiC4I/(pi*pi*amu*76.0)) * + exp(-eb_GSiC4I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7229] = - sqrt(2.0*sites*kerg*eb_GC6H6I/(pi*pi*amu*78.0)) * nMono * densites * - exp(-eb_GC6H6I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7229] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC6H6I/(pi*pi*amu*78.0)) * + exp(-eb_GC6H6I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7230] = - sqrt(2.0*sites*kerg*eb_GC4PI/(pi*pi*amu*79.0)) * nMono * densites * - exp(-eb_GC4PI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7230] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC4PI/(pi*pi*amu*79.0)) * + exp(-eb_GC4PI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7231] = - sqrt(2.0*sites*kerg*eb_GC4SI/(pi*pi*amu*80.0)) * nMono * densites * - exp(-eb_GC4SI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7231] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC4SI/(pi*pi*amu*80.0)) * + exp(-eb_GC4SI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7232] = - sqrt(2.0*sites*kerg*eb_GC7I/(pi*pi*amu*84.0)) * nMono * densites * - exp(-eb_GC7I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7232] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC7I/(pi*pi*amu*84.0)) * + exp(-eb_GC7I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7233] = - sqrt(2.0*sites*kerg*eb_GC7HI/(pi*pi*amu*85.0)) * nMono * densites * - exp(-eb_GC7HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7233] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC7HI/(pi*pi*amu*85.0)) * + exp(-eb_GC7HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7234] = - sqrt(2.0*sites*kerg*eb_GC7H2I/(pi*pi*amu*86.0)) * nMono * densites * - exp(-eb_GC7H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7234] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC7H2I/(pi*pi*amu*86.0)) * + exp(-eb_GC7H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7235] = - sqrt(2.0*sites*kerg*eb_GCH3C6HI/(pi*pi*amu*88.0)) * nMono * densites * - exp(-eb_GCH3C6HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7235] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3C6HI/(pi*pi*amu*88.0)) * + exp(-eb_GCH3C6HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7236] = - sqrt(2.0*sites*kerg*eb_GCH3C5NI/(pi*pi*amu*89.0)) * nMono * densites * - exp(-eb_GCH3C5NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7236] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3C5NI/(pi*pi*amu*89.0)) * + exp(-eb_GCH3C5NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7237] = - sqrt(2.0*sites*kerg*eb_GC8I/(pi*pi*amu*96.0)) * nMono * densites * - exp(-eb_GC8I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7237] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC8I/(pi*pi*amu*96.0)) * + exp(-eb_GC8I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7238] = - sqrt(2.0*sites*kerg*eb_GC8HI/(pi*pi*amu*97.0)) * nMono * densites * - exp(-eb_GC8HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7238] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC8HI/(pi*pi*amu*97.0)) * + exp(-eb_GC8HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7239] = - sqrt(2.0*sites*kerg*eb_GC7NI/(pi*pi*amu*98.0)) * nMono * densites * - exp(-eb_GC7NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7239] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC7NI/(pi*pi*amu*98.0)) * + exp(-eb_GC7NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7240] = - sqrt(2.0*sites*kerg*eb_GC8H2I/(pi*pi*amu*98.0)) * nMono * densites * - exp(-eb_GC8H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7240] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC8H2I/(pi*pi*amu*98.0)) * + exp(-eb_GC8H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7241] = - sqrt(2.0*sites*kerg*eb_GHC7NI/(pi*pi*amu*99.0)) * nMono * densites * - exp(-eb_GHC7NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7241] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHC7NI/(pi*pi*amu*99.0)) * + exp(-eb_GHC7NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7242] = - sqrt(2.0*sites*kerg*eb_GC9I/(pi*pi*amu*108.0)) * nMono * densites * - exp(-eb_GC9I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7242] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC9I/(pi*pi*amu*108.0)) * + exp(-eb_GC9I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7243] = - sqrt(2.0*sites*kerg*eb_GC9HI/(pi*pi*amu*109.0)) * nMono * densites * - exp(-eb_GC9HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7243] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC9HI/(pi*pi*amu*109.0)) * + exp(-eb_GC9HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7244] = - sqrt(2.0*sites*kerg*eb_GC9H2I/(pi*pi*amu*110.0)) * nMono * densites * - exp(-eb_GC9H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7244] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC9H2I/(pi*pi*amu*110.0)) * + exp(-eb_GC9H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7245] = - sqrt(2.0*sites*kerg*eb_GCH3C7NI/(pi*pi*amu*113.0)) * nMono * densites * - exp(-eb_GCH3C7NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7245] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GCH3C7NI/(pi*pi*amu*113.0)) * + exp(-eb_GCH3C7NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7246] = - sqrt(2.0*sites*kerg*eb_GC10I/(pi*pi*amu*120.0)) * nMono * densites * - exp(-eb_GC10I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7246] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC10I/(pi*pi*amu*120.0)) * + exp(-eb_GC10I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7247] = - sqrt(2.0*sites*kerg*eb_GC10HI/(pi*pi*amu*121.0)) * nMono * densites * - exp(-eb_GC10HI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7247] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC10HI/(pi*pi*amu*121.0)) * + exp(-eb_GC10HI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7248] = - sqrt(2.0*sites*kerg*eb_GC9NI/(pi*pi*amu*122.0)) * nMono * densites * - exp(-eb_GC9NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7248] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC9NI/(pi*pi*amu*122.0)) * + exp(-eb_GC9NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7249] = - sqrt(2.0*sites*kerg*eb_GC10H2I/(pi*pi*amu*122.0)) * nMono * densites * - exp(-eb_GC10H2I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7249] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC10H2I/(pi*pi*amu*122.0)) * + exp(-eb_GC10H2I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7250] = - sqrt(2.0*sites*kerg*eb_GHC9NI/(pi*pi*amu*123.0)) * nMono * densites * - exp(-eb_GHC9NI/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7250] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GHC9NI/(pi*pi*amu*123.0)) * + exp(-eb_GHC9NI/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7251] = - sqrt(2.0*sites*kerg*eb_GC11I/(pi*pi*amu*132.0)) * nMono * densites * - exp(-eb_GC11I/Tdust) * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7251] = opt_thd * cov * nMono * + densites * sqrt(2.0*sites*kerg*eb_GC11I/(pi*pi*amu*132.0)) * + exp(-eb_GC11I/(Tdust)); } - if (Tgas>5.0 && Tgas<41000.0) { k[7252] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7252] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHI/(pi*pi*amu*1.0)) * exp(-eb_GHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7253] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7253] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2I/(pi*pi*amu*2.0)) * exp(-eb_GH2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7254] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7254] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHeI/(pi*pi*amu*4.0)) * exp(-eb_GHeI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7255] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7255] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCI/(pi*pi*amu*12.0)) * exp(-eb_GCI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7256] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7256] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCHI/(pi*pi*amu*13.0)) * exp(-eb_GCHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7257] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7257] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2I/(pi*pi*amu*14.0)) * exp(-eb_GCH2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7258] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7258] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNI/(pi*pi*amu*14.0)) * exp(-eb_GNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7259] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7259] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3I/(pi*pi*amu*15.0)) * exp(-eb_GCH3I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7260] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7260] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNHI/(pi*pi*amu*15.0)) * exp(-eb_GNHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7261] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7261] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNH2I/(pi*pi*amu*16.0)) * exp(-eb_GNH2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7262] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7262] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH4I/(pi*pi*amu*16.0)) * exp(-eb_GCH4I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7263] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7263] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GOI/(pi*pi*amu*16.0)) * exp(-eb_GOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7264] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7264] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNH3I/(pi*pi*amu*17.0)) * exp(-eb_GNH3I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7265] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7265] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GOHI/(pi*pi*amu*17.0)) * exp(-eb_GOHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7266] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7266] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2OI/(pi*pi*amu*18.0)) * exp(-eb_GH2OI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7267] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7267] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GFI/(pi*pi*amu*19.0)) * exp(-eb_GFI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7268] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7268] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHFI/(pi*pi*amu*20.0)) * exp(-eb_GHFI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7269] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7269] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNaI/(pi*pi*amu*23.0)) * exp(-eb_GNaI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7270] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7270] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GMgI/(pi*pi*amu*24.0)) * exp(-eb_GMgI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7271] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7271] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2I/(pi*pi*amu*24.0)) * exp(-eb_GC2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7272] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7272] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2HI/(pi*pi*amu*25.0)) * exp(-eb_GC2HI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7273] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7273] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCNI/(pi*pi*amu*26.0)) * exp(-eb_GCNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7274] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7274] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2H2I/(pi*pi*amu*26.0)) * exp(-eb_GC2H2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7275] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7275] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHCNI/(pi*pi*amu*27.0)) * exp(-eb_GHCNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7276] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7276] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2H3I/(pi*pi*amu*27.0)) * exp(-eb_GC2H3I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7277] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7277] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHNCI/(pi*pi*amu*27.0)) * exp(-eb_GHNCI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7278] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7278] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2CNI/(pi*pi*amu*28.0)) * exp(-eb_GH2CNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7279] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7279] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiI/(pi*pi*amu*28.0)) * exp(-eb_GSiI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7280] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7280] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GN2I/(pi*pi*amu*28.0)) * exp(-eb_GN2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7281] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7281] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2H4I/(pi*pi*amu*28.0)) * exp(-eb_GC2H4I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7282] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7282] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCOI/(pi*pi*amu*28.0)) * exp(-eb_GCOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7283] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7283] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHCOI/(pi*pi*amu*29.0)) * exp(-eb_GHCOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7284] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7284] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiHI/(pi*pi*amu*29.0)) * exp(-eb_GSiHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7285] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7285] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2NHI/(pi*pi*amu*29.0)) * exp(-eb_GCH2NHI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7286] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7286] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2H5I/(pi*pi*amu*29.0)) * exp(-eb_GC2H5I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7287] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7287] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2H6I/(pi*pi*amu*30.0)) * exp(-eb_GC2H6I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7288] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7288] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiH2I/(pi*pi*amu*30.0)) * exp(-eb_GSiH2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7289] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7289] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNOI/(pi*pi*amu*30.0)) * exp(-eb_GNOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7290] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7290] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2COI/(pi*pi*amu*30.0)) * exp(-eb_GH2COI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7291] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7291] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiH3I/(pi*pi*amu*31.0)) * exp(-eb_GSiH3I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7292] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7292] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GPI/(pi*pi*amu*31.0)) * exp(-eb_GPI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7293] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7293] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2OHI/(pi*pi*amu*31.0)) * exp(-eb_GCH2OHI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7294] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7294] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHNOI/(pi*pi*amu*31.0)) * exp(-eb_GHNOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7295] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7295] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3OI/(pi*pi*amu*31.0)) * exp(-eb_GCH3OI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7296] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7296] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSI/(pi*pi*amu*32.0)) * exp(-eb_GSI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7297] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7297] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GPHI/(pi*pi*amu*32.0)) * exp(-eb_GPHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7298] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7298] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GO2I/(pi*pi*amu*32.0)) * exp(-eb_GO2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7299] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7299] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiH4I/(pi*pi*amu*32.0)) * exp(-eb_GSiH4I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7300] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7300] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3OHI/(pi*pi*amu*32.0)) * exp(-eb_GCH3OHI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7301] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7301] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GO2HI/(pi*pi*amu*33.0)) * exp(-eb_GO2HI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7302] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7302] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHSI/(pi*pi*amu*33.0)) * exp(-eb_GHSI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7303] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7303] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GPH2I/(pi*pi*amu*33.0)) * exp(-eb_GPH2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7304] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7304] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2O2I/(pi*pi*amu*34.0)) * exp(-eb_GH2O2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7305] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7305] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2SI/(pi*pi*amu*34.0)) * exp(-eb_GH2SI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7306] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7306] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GClI/(pi*pi*amu*35.0)) * exp(-eb_GClI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7307] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7307] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC3I/(pi*pi*amu*36.0)) * exp(-eb_GC3I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7308] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7308] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHClI/(pi*pi*amu*36.0)) * exp(-eb_GHClI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7309] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7309] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC3HI/(pi*pi*amu*37.0)) * exp(-eb_GC3HI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7310] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7310] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2CCCI/(pi*pi*amu*38.0)) * exp(-eb_GH2CCCI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7311] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7311] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2NI/(pi*pi*amu*38.0)) * exp(-eb_GC2NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7312] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7312] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC3H2I/(pi*pi*amu*38.0)) * exp(-eb_GC3H2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7313] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7313] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHCCNI/(pi*pi*amu*39.0)) * exp(-eb_GHCCNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7314] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7314] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2CCHI/(pi*pi*amu*39.0)) * + exp(-eb_GCH2CCHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7315] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7315] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2CCH2I/(pi*pi*amu*40.0)) * + exp(-eb_GCH2CCH2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7316] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7316] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3CCHI/(pi*pi*amu*40.0)) * + exp(-eb_GCH3CCHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7317] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7317] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2CNI/(pi*pi*amu*40.0)) * exp(-eb_GCH2CNI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7318] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7318] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2OI/(pi*pi*amu*40.0)) * exp(-eb_GC2OI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7319] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7319] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiCI/(pi*pi*amu*40.0)) * exp(-eb_GSiCI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7320] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7320] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHCSiI/(pi*pi*amu*41.0)) * exp(-eb_GHCSiI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7321] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7321] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3CNI/(pi*pi*amu*41.0)) * exp(-eb_GCH3CNI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7322] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7322] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHC2OI/(pi*pi*amu*41.0)) * exp(-eb_GHC2OI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7323] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7323] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3CHCH2I/(pi*pi*amu*42.0)) * + exp(-eb_GCH3CHCH2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7324] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7324] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCNOI/(pi*pi*amu*42.0)) * exp(-eb_GCNOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7325] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7325] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2COI/(pi*pi*amu*42.0)) * exp(-eb_GCH2COI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7326] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7326] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNH2CNI/(pi*pi*amu*42.0)) * exp(-eb_GNH2CNI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7327] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7327] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiCH2I/(pi*pi*amu*42.0)) * exp(-eb_GSiCH2I/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7328] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7328] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GOCNI/(pi*pi*amu*42.0)) * exp(-eb_GOCNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7329] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7329] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiNI/(pi*pi*amu*42.0)) * exp(-eb_GSiNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7330] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7330] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3COI/(pi*pi*amu*43.0)) * exp(-eb_GCH3COI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7331] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7331] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHNSiI/(pi*pi*amu*43.0)) * exp(-eb_GHNSiI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7332] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7332] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHNCOI/(pi*pi*amu*43.0)) * exp(-eb_GHNCOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7333] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7333] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHOCNI/(pi*pi*amu*43.0)) * exp(-eb_GHOCNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7334] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7334] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiCH3I/(pi*pi*amu*43.0)) * exp(-eb_GSiCH3I/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7335] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7335] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHCNOI/(pi*pi*amu*43.0)) * exp(-eb_GHCNOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7336] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7336] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCPI/(pi*pi*amu*43.0)) * exp(-eb_GCPI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7337] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7337] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHONCI/(pi*pi*amu*43.0)) * exp(-eb_GHONCI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7338] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7338] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GN2OI/(pi*pi*amu*44.0)) * exp(-eb_GN2OI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7339] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7339] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCSI/(pi*pi*amu*44.0)) * exp(-eb_GCSI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7340] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7340] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHCPI/(pi*pi*amu*44.0)) * exp(-eb_GHCPI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7341] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7341] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3CHOI/(pi*pi*amu*44.0)) * + exp(-eb_GCH3CHOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7342] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7342] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCO2I/(pi*pi*amu*44.0)) * exp(-eb_GCO2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7343] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7343] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiOI/(pi*pi*amu*44.0)) * exp(-eb_GSiOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7344] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7344] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHCSI/(pi*pi*amu*45.0)) * exp(-eb_GHCSI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7345] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7345] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCOOHI/(pi*pi*amu*45.0)) * exp(-eb_GCOOHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7346] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7346] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GPNI/(pi*pi*amu*45.0)) * exp(-eb_GPNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7347] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7347] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3OCH3I/(pi*pi*amu*46.0)) * + exp(-eb_GCH3OCH3I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7348] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7348] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2PHI/(pi*pi*amu*46.0)) * exp(-eb_GCH2PHI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7349] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7349] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNO2I/(pi*pi*amu*46.0)) * exp(-eb_GNO2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7350] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7350] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHCOOHI/(pi*pi*amu*46.0)) * exp(-eb_GHCOOHI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7351] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7351] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2H5OHI/(pi*pi*amu*46.0)) * + exp(-eb_GC2H5OHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7352] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7352] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2SiOI/(pi*pi*amu*46.0)) * exp(-eb_GH2SiOI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7353] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7353] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2CSI/(pi*pi*amu*46.0)) * exp(-eb_GH2CSI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7354] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7354] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNSI/(pi*pi*amu*46.0)) * exp(-eb_GNSI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7355] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7355] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCClI/(pi*pi*amu*47.0)) * exp(-eb_GCClI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7356] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7356] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GPOI/(pi*pi*amu*47.0)) * exp(-eb_GPOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7357] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7357] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHPOI/(pi*pi*amu*48.0)) * exp(-eb_GHPOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7358] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7358] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSOI/(pi*pi*amu*48.0)) * exp(-eb_GSOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7359] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7359] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC4I/(pi*pi*amu*48.0)) * exp(-eb_GC4I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7360] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7360] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC4HI/(pi*pi*amu*49.0)) * exp(-eb_GC4HI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7361] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7361] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC3NI/(pi*pi*amu*50.0)) * exp(-eb_GC3NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7362] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7362] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC4H2I/(pi*pi*amu*50.0)) * exp(-eb_GC4H2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7363] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7363] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GClOI/(pi*pi*amu*51.0)) * exp(-eb_GClOI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7364] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7364] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHNC3I/(pi*pi*amu*51.0)) * exp(-eb_GHNC3I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7365] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7365] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHC3NI/(pi*pi*amu*51.0)) * exp(-eb_GHC3NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7366] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7366] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC4H3I/(pi*pi*amu*51.0)) * exp(-eb_GC4H3I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7367] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7367] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiC2I/(pi*pi*amu*52.0)) * exp(-eb_GSiC2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7368] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7368] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2CHCCHI/(pi*pi*amu*52.0)) * + exp(-eb_GCH2CHCCHI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7369] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7369] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GNCCNI/(pi*pi*amu*52.0)) * exp(-eb_GNCCNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7370] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7370] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC3OI/(pi*pi*amu*52.0)) * exp(-eb_GC3OI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7371] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7371] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2CHCNI/(pi*pi*amu*53.0)) * + exp(-eb_GCH2CHCNI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7372] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7372] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiC2HI/(pi*pi*amu*53.0)) * exp(-eb_GSiC2HI/Tcr); + } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7373] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC4H6I/(pi*pi*amu*54.0)) * exp(-eb_GC4H6I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7374] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiC2H2I/(pi*pi*amu*54.0)) * + exp(-eb_GSiC2H2I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7375] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2H4CNI/(pi*pi*amu*54.0)) * + exp(-eb_GC2H4CNI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7376] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiNCI/(pi*pi*amu*54.0)) * exp(-eb_GSiNCI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7377] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2H5CNI/(pi*pi*amu*55.0)) * + exp(-eb_GC2H5CNI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7378] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCCPI/(pi*pi*amu*55.0)) * exp(-eb_GCCPI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7379] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC2SI/(pi*pi*amu*56.0)) * exp(-eb_GC2SI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7380] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GFeI/(pi*pi*amu*56.0)) * exp(-eb_GFeI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7381] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHC2PI/(pi*pi*amu*56.0)) * exp(-eb_GHC2PI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7382] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3COCH3I/(pi*pi*amu*58.0)) * + exp(-eb_GCH3COCH3I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7383] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCOOCH3I/(pi*pi*amu*59.0)) * + exp(-eb_GCOOCH3I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7384] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2OHCOI/(pi*pi*amu*59.0)) * + exp(-eb_GCH2OHCOI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7385] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHCOOCH3I/(pi*pi*amu*60.0)) * + exp(-eb_GHCOOCH3I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7386] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GOCSI/(pi*pi*amu*60.0)) * exp(-eb_GOCSI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7387] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiSI/(pi*pi*amu*60.0)) * exp(-eb_GSiSI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7388] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC5I/(pi*pi*amu*60.0)) * exp(-eb_GC5I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7389] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiO2I/(pi*pi*amu*60.0)) * exp(-eb_GSiO2I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7390] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH2OHCHOI/(pi*pi*amu*60.0)) * + exp(-eb_GCH2OHCHOI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7391] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3COOHI/(pi*pi*amu*60.0)) * + exp(-eb_GCH3COOHI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7392] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC5HI/(pi*pi*amu*61.0)) * exp(-eb_GC5HI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7393] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC5H2I/(pi*pi*amu*62.0)) * exp(-eb_GC5H2I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7394] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC4NI/(pi*pi*amu*62.0)) * exp(-eb_GC4NI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7395] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiC3I/(pi*pi*amu*64.0)) * exp(-eb_GSiC3I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7396] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSO2I/(pi*pi*amu*64.0)) * exp(-eb_GSO2I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7397] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GS2I/(pi*pi*amu*64.0)) * exp(-eb_GS2I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7398] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3C4HI/(pi*pi*amu*64.0)) * + exp(-eb_GCH3C4HI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7399] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiC3HI/(pi*pi*amu*65.0)) * exp(-eb_GSiC3HI/Tcr); + } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7400] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3C3NI/(pi*pi*amu*65.0)) * + exp(-eb_GCH3C3NI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7401] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHS2I/(pi*pi*amu*65.0)) * exp(-eb_GHS2I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7402] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GH2S2I/(pi*pi*amu*66.0)) * exp(-eb_GH2S2I/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7403] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC3PI/(pi*pi*amu*67.0)) * exp(-eb_GC3PI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7404] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC3SI/(pi*pi*amu*68.0)) * exp(-eb_GC3SI/Tcr); } + + if (Tgas>=5.0 && Tgas<41000.0) { k[7405] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC6I/(pi*pi*amu*72.0)) * exp(-eb_GC6I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7373] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7406] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC6HI/(pi*pi*amu*73.0)) * exp(-eb_GC6HI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7374] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7407] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC6H2I/(pi*pi*amu*74.0)) * exp(-eb_GC6H2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7375] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7408] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC5NI/(pi*pi*amu*74.0)) * exp(-eb_GC5NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7376] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7409] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHC5NI/(pi*pi*amu*75.0)) * exp(-eb_GHC5NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7377] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7410] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GSiC4I/(pi*pi*amu*76.0)) * exp(-eb_GSiC4I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7378] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7411] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC6H6I/(pi*pi*amu*78.0)) * exp(-eb_GC6H6I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7379] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7412] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC4PI/(pi*pi*amu*79.0)) * exp(-eb_GC4PI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7380] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7413] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC4SI/(pi*pi*amu*80.0)) * exp(-eb_GC4SI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7381] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7414] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC7I/(pi*pi*amu*84.0)) * exp(-eb_GC7I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7382] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7415] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC7HI/(pi*pi*amu*85.0)) * exp(-eb_GC7HI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7383] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7416] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC7H2I/(pi*pi*amu*86.0)) * exp(-eb_GC7H2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7384] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7417] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3C6HI/(pi*pi*amu*88.0)) * + exp(-eb_GCH3C6HI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7385] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7418] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3C5NI/(pi*pi*amu*89.0)) * + exp(-eb_GCH3C5NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7386] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7419] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC8I/(pi*pi*amu*96.0)) * exp(-eb_GC8I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7387] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7420] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC8HI/(pi*pi*amu*97.0)) * exp(-eb_GC8HI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7388] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7421] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC7NI/(pi*pi*amu*98.0)) * exp(-eb_GC7NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7389] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7422] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC8H2I/(pi*pi*amu*98.0)) * exp(-eb_GC8H2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7390] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7423] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHC7NI/(pi*pi*amu*99.0)) * exp(-eb_GHC7NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7391] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7424] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC9I/(pi*pi*amu*108.0)) * exp(-eb_GC9I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7392] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7425] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC9HI/(pi*pi*amu*109.0)) * exp(-eb_GC9HI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7393] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7426] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC9H2I/(pi*pi*amu*110.0)) * exp(-eb_GC9H2I/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7394] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7427] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GCH3C7NI/(pi*pi*amu*113.0)) * + exp(-eb_GCH3C7NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7395] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7428] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC10I/(pi*pi*amu*120.0)) * exp(-eb_GC10I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7396] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7429] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC10HI/(pi*pi*amu*121.0)) * exp(-eb_GC10HI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7397] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7430] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC9NI/(pi*pi*amu*122.0)) * exp(-eb_GC9NI/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7398] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7431] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC10H2I/(pi*pi*amu*122.0)) * + exp(-eb_GC10H2I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7399] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7432] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GHC9NI/(pi*pi*amu*123.0)) * exp(-eb_GHC9NI/Tcr); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7400] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7433] = opt_crd * cov * duty * nMono + * densites * (zeta_cr/zism) * + sqrt(2.0*sites*kerg*eb_GC11I/(pi*pi*amu*132.0)) * exp(-eb_GC11I/Tcr); } - if (Tgas>5.0 && Tgas<41000.0) { k[7401] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7434] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7402] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7435] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7403] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7436] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7404] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7437] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7405] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7438] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7406] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7439] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7407] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7440] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7408] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7441] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7409] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7442] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7410] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7443] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7411] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7444] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7412] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7445] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7413] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7446] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7414] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7447] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7415] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7448] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.0013 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7416] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7449] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7417] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7450] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7418] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7451] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7419] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7452] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7420] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7453] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7421] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7454] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7422] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7455] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7423] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7456] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7424] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7457] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7425] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7458] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7426] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7459] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7427] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7460] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7428] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7461] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7429] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7462] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.00018 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7430] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7463] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7431] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7464] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.0027 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7432] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7465] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7433] = 0.0; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7466] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7434] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7467] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7435] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7468] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7436] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7469] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7437] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7470] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7438] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7471] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7439] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7472] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7440] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7473] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7441] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7474] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7442] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7475] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7443] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7476] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7444] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7477] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7445] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7478] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7446] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7479] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7447] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7480] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7448] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.0013 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7481] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7449] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7482] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.0021 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7450] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7483] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7451] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7484] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7452] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7485] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7453] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7486] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7454] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7487] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7455] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7488] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7456] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7489] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7457] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7490] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7458] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7491] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7459] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7492] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7460] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7493] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7461] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7494] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7462] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.00018 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7495] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7463] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7496] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7464] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.0027 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7497] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7465] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7498] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7466] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7499] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7467] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7500] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7468] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7501] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7469] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7502] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7470] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7503] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7471] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7504] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7472] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7505] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7473] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7506] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7474] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7507] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7475] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7508] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7476] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7509] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7477] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7510] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7478] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7511] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7479] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7512] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7480] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7513] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7481] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7514] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7482] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.0021 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7515] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7483] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7516] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7484] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7517] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7485] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7518] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7486] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7519] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7487] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7520] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7488] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7521] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7489] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7522] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7490] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7523] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7491] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7524] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.0023 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7492] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7525] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7493] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7526] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7494] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7527] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7495] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7528] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7496] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7529] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7497] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7530] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7498] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7531] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7499] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7532] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7500] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7533] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7501] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7534] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7502] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7535] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7503] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7536] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7504] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7537] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7505] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7538] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7506] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7539] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7507] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7540] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7508] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7541] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7509] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7542] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7510] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7543] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7511] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7544] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7512] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7545] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7513] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7546] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7514] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7547] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7515] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7548] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7516] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7549] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7517] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7550] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7518] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7551] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7519] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7552] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7520] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7553] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7521] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7554] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7522] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7555] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7523] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7556] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7524] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.0023 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7557] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7525] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7558] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7526] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7559] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7527] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7560] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7528] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7561] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7529] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7562] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7530] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7563] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7531] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7564] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7532] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7565] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7533] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7566] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7534] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7567] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7535] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7568] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7536] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7569] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7537] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7570] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7538] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7571] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7539] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7572] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7540] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7573] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7541] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7574] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7542] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7575] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7543] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7576] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7544] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7577] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7545] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7578] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7546] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7579] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7547] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7580] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7548] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7581] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7549] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7582] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7550] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7583] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7551] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7584] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7552] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7585] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7553] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7586] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7554] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7587] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7555] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7588] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7556] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7589] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7557] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7590] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7558] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7591] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7559] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7592] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7560] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7593] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7561] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7594] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7562] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7595] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7563] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7596] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7564] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7597] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7565] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7598] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7566] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7599] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7567] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7600] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7568] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7601] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7569] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7602] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7570] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7603] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7571] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7604] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7572] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7605] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7573] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7606] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7574] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7607] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7575] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7608] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7576] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7609] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7577] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7610] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7578] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7611] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7579] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7612] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7580] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7613] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7581] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7614] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7582] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7615] = opt_uvd * cov * + (G0*habing*exp(-Av*3.02) + crphot * (zeta_cr/zism)) * 0.001 * nMono * + garea; } - if (Tgas>5.0 && Tgas<41000.0) { k[7583] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7616] = 3.9e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 0.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7584] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7617] = 1.36e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 0.0 / (1.0 - omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7585] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7618] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 365.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7586] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7619] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7587] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7620] = 1.56e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7588] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7621] = 8.19e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7589] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7622] = 3.25e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7590] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7623] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7591] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7624] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7592] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7625] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7593] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7626] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7594] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7627] = 2.13e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7595] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7628] = 5.37e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7596] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7629] = 5.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7597] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7630] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 40.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7598] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7631] = 8.57e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 324.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7599] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7632] = 4.43e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 324.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7600] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7633] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1169.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7601] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7634] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 657.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7602] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7635] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 270.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7603] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7636] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 288.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7604] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7637] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 288.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7605] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7638] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 254.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7606] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7639] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 485.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7607] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7640] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 124.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7608] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7641] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 119.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7609] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7642] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7610] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7643] = 5.6e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7611] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7644] = 7.4e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7612] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7645] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2577.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7613] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7646] = 4.33e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 654.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7614] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7647] = 4.33e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 654.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7615] = (G0*100000000.0*exp(-Av*3.02) - + 10000.0 * zeta_cr/1.3e-17) * 0.001 * nMono * garea * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[7648] = 4.33e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 654.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7616] = 3.9e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 0.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7649] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 5290.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7617] = 1.36e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 0.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7650] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7618] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 365.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7651] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1557.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7619] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7652] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7620] = 1.56e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7653] = 1.32e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7621] = 8.19e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7654] = 2.55e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7622] = 3.25e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7655] = 1.28e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7623] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7656] = 2.47e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7624] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7657] = 2.67e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7625] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7658] = 5.1e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7626] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7659] = 2.61e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7627] = 2.13e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7660] = 5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7628] = 5.37e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7661] = 1.32e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7629] = 5.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7662] = 2.55e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7630] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 40.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7663] = 2.67e-20 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7631] = 8.57e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 324.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7664] = 5.1e-20 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7632] = 4.43e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 324.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7665] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7633] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1169.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7666] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 25.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7634] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 657.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7667] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7635] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 270.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7668] = 7.8e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7636] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 288.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7669] = 8.58e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7637] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 288.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7670] = 1.43e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7638] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 254.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7671] = 1.3e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7639] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 485.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7672] = 5.2e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7640] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 124.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7673] = 2.6e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7641] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 119.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7674] = 1.3e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7642] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7675] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 1.17) * 105.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7643] = 5.6e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7676] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7644] = 7.4e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7677] = 3.85e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7645] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2577.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7678] = 1.73e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7646] = 4.33e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 654.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7679] = 3.59e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7647] = 4.33e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 654.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7680] = 1.59e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7648] = 4.33e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 654.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7681] = 2.25e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7649] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 5290.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7682] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 210.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7650] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7683] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 584.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7651] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1557.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7684] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7652] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7685] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7653] = 1.32e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7686] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7654] = 2.55e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7687] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7655] = 1.28e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7688] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7656] = 2.47e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7689] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7657] = 2.67e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7690] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 231.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7658] = 5.1e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7691] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 247.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7659] = 2.61e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7692] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1329.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7660] = 5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7693] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7661] = 1.32e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7694] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7662] = 2.55e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7695] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7663] = 2.67e-20 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7696] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7664] = 5.1e-20 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7697] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7665] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7698] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7666] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 25.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7699] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7667] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7700] = 4.67e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 717.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7668] = 7.8e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7701] = 6.19e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 717.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7669] = 8.58e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7702] = 2.16e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 717.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7670] = 1.43e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7703] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 375.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7671] = 1.3e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7704] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 58.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7672] = 5.2e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7705] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7673] = 2.6e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7706] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7674] = 1.3e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7707] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7675] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 1.17) * 105.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7708] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7676] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7709] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2577.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7677] = 3.85e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7710] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 848.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7678] = 1.73e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7711] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 848.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7679] = 3.59e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7712] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7680] = 1.59e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7713] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1370.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7681] = 2.25e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7714] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7682] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 210.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7715] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7683] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 584.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7716] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7684] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7717] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7685] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7718] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7686] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7719] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7687] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1881.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7720] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7688] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7721] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1642.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7689] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 389.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7722] = 1.9e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7690] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 231.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7723] = 1.11e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7691] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 247.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7724] = 1.12e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7692] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1329.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7725] = 6.38e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7693] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7726] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7694] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7727] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7695] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7728] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7696] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7729] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1642.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7697] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7730] = 1.9e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7698] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7731] = 1.11e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7699] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7732] = 1.12e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7700] = 4.67e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 717.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7733] = 6.38e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7701] = 6.19e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 717.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7734] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7702] = 2.16e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 717.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7735] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2388.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7703] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 375.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7736] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7704] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 58.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7737] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7705] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7738] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7706] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7739] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 475.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7707] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7740] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7708] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7741] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7709] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2577.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7742] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 456.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7710] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 848.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7743] = 4.33e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 609.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7711] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 848.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7744] = 4.33e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 609.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7712] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7745] = 4.33e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 609.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7713] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1370.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7746] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7714] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7747] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7715] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7748] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7716] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7749] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7717] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7750] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7718] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7751] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7719] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7752] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7720] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7753] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7721] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1642.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7754] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7722] = 1.9e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7755] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7723] = 1.11e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7756] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7724] = 1.12e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7757] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7725] = 6.38e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7758] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7726] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7759] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7727] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7760] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 263.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7728] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7761] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 263.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7729] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1642.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7762] = 3.64e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7730] = 1.9e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7763] = 9.36e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7731] = 1.11e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7764] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 854.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7732] = 1.12e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7765] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7733] = 6.38e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2652.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7766] = 1.05e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7734] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7767] = 2.46e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7735] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2388.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7768] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7736] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7769] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 857.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7737] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7770] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7738] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7771] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7739] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 475.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7772] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2153.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7740] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7773] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1368.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7741] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7774] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1368.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7742] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 456.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7775] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7743] = 4.33e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 609.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7776] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7744] = 4.33e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 609.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7777] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7745] = 4.33e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 609.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7778] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7746] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7779] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7747] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7780] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 124.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7748] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7781] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7749] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7782] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7750] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7783] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7751] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7784] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7752] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7785] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7753] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7786] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7754] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7787] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7755] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7788] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7756] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7789] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7757] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7790] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7758] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7791] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 865.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7759] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7792] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 865.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7760] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 263.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7793] = 3.25e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7761] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 263.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7794] = 9.75e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7762] = 3.64e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7795] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 5000.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7763] = 9.36e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7796] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7764] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 854.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7797] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1725.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7765] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7798] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 863.5 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7766] = 1.05e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7799] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7767] = 2.46e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7800] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7768] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7801] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 474.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7769] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 857.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7802] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7770] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7803] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 3304.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7771] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7804] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7772] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2153.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7805] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7773] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1368.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7806] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7774] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1368.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7807] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7775] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7808] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7776] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7809] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2388.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7777] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7810] = 3.25e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7778] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7811] = 3.25e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7779] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7812] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7780] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 124.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7813] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7781] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7814] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7782] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7815] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7783] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7816] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7784] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7817] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7785] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7818] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7786] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7819] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7787] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7820] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7788] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7821] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7789] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7822] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7790] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7823] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7791] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 865.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7824] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7792] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 865.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7825] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7793] = 3.25e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7826] = 6.5e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7794] = 9.75e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 559.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7827] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2680.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7795] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 5000.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7828] = 3.9e-19 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 722.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7796] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7829] = 1.82e-18 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 722.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7797] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1725.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7830] = 1.08e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 722.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7798] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 863.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7831] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7799] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7832] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7800] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7833] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7801] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 474.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7834] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7802] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7835] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7803] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 3304.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7836] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7804] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7837] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7805] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7838] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7806] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7839] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 922.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7807] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7840] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7808] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7841] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7809] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2388.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7842] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7810] = 3.25e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7843] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7811] = 3.25e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7844] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7812] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1122.5 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7845] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7813] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7846] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7814] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 375.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7847] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7815] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7848] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7816] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7849] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7817] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7850] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7818] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7851] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7819] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7852] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7820] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7853] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7821] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7854] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7822] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7855] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7823] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7856] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7824] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1000.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7857] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7825] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7858] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7826] = 6.5e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7859] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7827] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2680.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7860] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7828] = 3.9e-19 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 722.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7861] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7829] = 1.82e-18 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 722.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7862] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7830] = 1.08e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 722.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7863] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7831] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7864] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7832] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7865] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7833] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7866] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7834] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7867] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7835] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7868] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7836] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7869] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7837] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7870] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7838] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7871] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7839] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 922.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7872] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7840] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7873] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7841] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7874] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7842] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7875] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7843] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7876] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7844] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7877] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7845] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7878] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7846] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7879] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7847] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7880] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7848] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7881] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7849] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7882] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7850] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7883] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7851] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7884] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7852] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7885] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7853] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7886] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 5000.0 / (1.0 - + omega); } - if (Tgas>5.0 && Tgas<41000.0) { k[7854] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7887] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7855] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7888] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7856] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7889] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7857] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7890] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7858] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7891] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7859] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7892] = 1.3e-17 * + ((zeta_xr+zeta_cr)/zism) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - omega); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7860] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7893] = G0 * 5e-11 * exp(-0.0*Av) * + GetShieldingFactor(IDX_H2I, h2col, h2col, Tgas, 0); } - if (Tgas>5.0 && Tgas<41000.0) { k[7861] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7894] = G0 * 9.2e-10 * exp(-1.7*Av); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7862] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7895] = G0 * 7.6e-10 * exp(-3.3*Av); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7863] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7896] = G0 * 5.8e-10 * exp(-2.0*Av); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7864] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7897] = G0 * 1e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7865] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7898] = G0 * 1e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7866] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7899] = G0 * 1e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7867] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7900] = G0 * 5e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7868] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7901] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7869] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7902] = G0 * 1.35e-10 * exp(-2.3*Av); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7870] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7903] = G0 * 1.35e-10 * exp(-2.3*Av); + } - if (Tgas>5.0 && Tgas<41000.0) { k[7871] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7904] = G0 * 1e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7872] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7905] = G0 * 1e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7873] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7906] = G0 * 1e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7874] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7875] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7876] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 2500.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7877] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7878] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7879] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 875.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7880] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 500.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7881] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7882] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7883] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7884] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7885] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 1500.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7886] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 5000.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7887] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7888] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7889] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7890] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7891] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 250.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7892] = 1.3e-17 * - ((zeta_xr+zeta_cr)/1.3e-17) * pow(Tgas/300.0, 0.0) * 750.0 / (1.0 - - omega); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7893] = G0 * 5e-11 * exp(-0.0*Av) * - GetShieldingFactor(IDX_H2I, h2col, h2col, Tgas, 0); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7894] = G0 * 9.2e-10 * exp(-1.7*Av); - } - - if (Tgas>5.0 && Tgas<41000.0) { k[7895] = G0 * 7.6e-10 * exp(-3.3*Av); - } - - if (Tgas>5.0 && Tgas<41000.0) { k[7896] = G0 * 5.8e-10 * exp(-2.0*Av); - } - - if (Tgas>5.0 && Tgas<41000.0) { k[7897] = G0 * 1e-09 * exp(-2.3*Av); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7898] = G0 * 1e-09 * exp(-2.3*Av); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7899] = G0 * 1e-09 * exp(-2.3*Av); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7900] = G0 * 5e-10 * exp(-2.3*Av); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7901] = G0 * 1e-11 * exp(-2.0*Av); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7902] = G0 * 1.35e-10 * exp(-2.3*Av); - } - - if (Tgas>5.0 && Tgas<41000.0) { k[7903] = G0 * 1.35e-10 * exp(-2.3*Av); - } - - if (Tgas>5.0 && Tgas<41000.0) { k[7904] = G0 * 1e-10 * exp(-2.1*Av); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7905] = G0 * 1e-10 * exp(-2.1*Av); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7906] = G0 * 1e-10 * exp(-2.1*Av); } - - if (Tgas>5.0 && Tgas<41000.0) { k[7907] = G0 * 7.5e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7907] = G0 * 7.5e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7908] = G0 * 1.73e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7908] = G0 * 1.73e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7909] = G0 * 1.73e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7909] = G0 * 1.73e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7910] = G0 * 9.8e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7910] = G0 * 9.8e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7911] = G0 * 2.2e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7911] = G0 * 2.2e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7912] = G0 * 2.2e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7912] = G0 * 2.2e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7913] = G0 * 6.8e-12 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7913] = G0 * 6.8e-12 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7914] = G0 * 6.8e-12 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7914] = G0 * 6.8e-12 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7915] = G0 * 9.23e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7915] = G0 * 9.23e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7916] = G0 * 2.76e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7916] = G0 * 2.76e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7917] = G0 * 2.8e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7917] = G0 * 2.8e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7918] = G0 * 2.8e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7918] = G0 * 2.8e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7919] = G0 * 3.9e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7919] = G0 * 3.9e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7920] = G0 * 1.6e-12 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7920] = G0 * 1.6e-12 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7921] = G0 * 7.5e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7921] = G0 * 7.5e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7922] = G0 * 4.8e-11 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7922] = G0 * 4.8e-11 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7923] = G0 * 3.1e-11 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7923] = G0 * 3.1e-11 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7924] = G0 * 3.1e-11 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7924] = G0 * 3.1e-11 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7925] = G0 * 3.1e-11 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7925] = G0 * 3.1e-11 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7926] = G0 * 1.17e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7926] = G0 * 1.17e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7927] = G0 * 2.4e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7927] = G0 * 2.4e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7928] = G0 * 4.1e-10 * exp(-3.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7928] = G0 * 4.1e-10 * exp(-3.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7929] = G0 * 5.2e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7929] = G0 * 5.2e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7930] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7930] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7931] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7931] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7932] = G0 * 3.3e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7932] = G0 * 3.3e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7933] = G0 * 3.3e-10 * exp(-3.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7933] = G0 * 3.3e-10 * exp(-3.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7934] = G0 * 3.3e-10 * exp(-3.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7934] = G0 * 3.3e-10 * exp(-3.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7935] = G0 * 3.3e-10 * exp(-3.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7935] = G0 * 3.3e-10 * exp(-3.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7936] = G0 * 2.9e-10 * exp(-3.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7936] = G0 * 2.9e-10 * exp(-3.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7937] = G0 * 1.5e-09 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7937] = G0 * 1.5e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7938] = G0 * 1.6e-09 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7938] = G0 * 1.6e-09 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7939] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7939] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7940] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7940] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7941] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7941] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7942] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7942] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7943] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7943] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7944] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7944] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7945] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7945] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7946] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7946] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7947] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7947] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7948] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7948] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7949] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7949] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7950] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7950] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7951] = G0 * 3e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7951] = G0 * 3e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7952] = G0 * 5.48e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7952] = G0 * 5.48e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7953] = G0 * 1.65e-10 * exp(-3.9*Av) * - GetShieldingFactor(IDX_N2I, h2col, n2col, Tgas, 0); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7953] = G0 * 1.65e-10 * exp(-3.9*Av) + * GetShieldingFactor(IDX_N2I, h2col, n2col, Tgas, 0); } - if (Tgas>5.0 && Tgas<41000.0) { k[7954] = G0 * 3e-09 * exp(-2.1*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7954] = G0 * 3e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7955] = G0 * 4.1e-10 * exp(-3.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7955] = G0 * 4.1e-10 * exp(-3.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7956] = G0 * 4.1e-10 * exp(-3.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7956] = G0 * 4.1e-10 * exp(-3.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7957] = G0 * 4.1e-10 * exp(-3.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7957] = G0 * 4.1e-10 * exp(-3.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7958] = G0 * 4.1e-10 * exp(-3.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7958] = G0 * 4.1e-10 * exp(-3.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7959] = G0 * 4.1e-10 * exp(-3.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7959] = G0 * 4.1e-10 * exp(-3.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7960] = G0 * 4.1e-10 * exp(-3.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7960] = G0 * 4.1e-10 * exp(-3.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7961] = G0 * 4.1e-10 * exp(-3.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7961] = G0 * 4.1e-10 * exp(-3.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7962] = G0 * 2e-10 * exp(-3.5*Av) * - GetShieldingFactor(IDX_COI, h2col, cocol, Tgas, 0); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7962] = G0 * 2e-10 * exp(-3.5*Av) * + GetShieldingFactor(IDX_COI, h2col, cocol, Tgas, 0); } - if (Tgas>5.0 && Tgas<41000.0) { k[7963] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7963] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7964] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7964] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7965] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7965] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7966] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7966] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7967] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7967] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7968] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7968] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7969] = G0 * 1.1e-09 * exp(-1.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7969] = G0 * 1.1e-09 * exp(-1.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7970] = G0 * 5.6e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7970] = G0 * 5.6e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7971] = G0 * 2.8e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7971] = G0 * 2.8e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7972] = G0 * 3.5e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7972] = G0 * 3.5e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7973] = G0 * 5e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7973] = G0 * 5e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7974] = G0 * 1e-09 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7974] = G0 * 1e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7975] = G0 * 1e-09 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7975] = G0 * 1e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7976] = G0 * 1e-09 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7976] = G0 * 1e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7977] = G0 * 2.31e-09 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7977] = G0 * 2.31e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7978] = G0 * 2.3e-10 * exp(-3.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7978] = G0 * 2.3e-10 * exp(-3.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7979] = G0 * 2.3e-10 * exp(-3.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7979] = G0 * 2.3e-10 * exp(-3.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7980] = G0 * 4.7e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7980] = G0 * 4.7e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7981] = G0 * 2.6e-10 * exp(-2.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7981] = G0 * 2.6e-10 * exp(-2.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7982] = G0 * 1e-09 * exp(-2.2*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7982] = G0 * 1e-09 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7983] = G0 * 7e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7983] = G0 * 7e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7984] = G0 * 4.7e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7984] = G0 * 4.7e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7985] = G0 * 4.7e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7985] = G0 * 4.7e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7986] = G0 * 4.7e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7986] = G0 * 4.7e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7987] = G0 * 4.7e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7987] = G0 * 4.7e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7988] = G0 * 3e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7988] = G0 * 3e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7989] = G0 * 3e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7989] = G0 * 3e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7990] = G0 * 1e-10 * exp(-2.1*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7990] = G0 * 1e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7991] = G0 * 1e-10 * exp(-2.1*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7991] = G0 * 1e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7992] = G0 * 1.7e-10 * exp(-0.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7992] = G0 * 1.7e-10 * exp(-0.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7993] = G0 * 4.8e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7993] = G0 * 4.8e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7994] = G0 * 1.6e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7994] = G0 * 1.6e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7995] = G0 * 1.6e-10 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7995] = G0 * 1.6e-10 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7996] = G0 * 4e-10 * exp(-1.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[7996] = G0 * 4e-10 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7997] = G0 * 1.4e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7997] = G0 * 1.4e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7998] = G0 * 1.4e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7998] = G0 * 1.4e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[7999] = G0 * 1.4e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[7999] = G0 * 1.4e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8000] = G0 * 1.3e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8000] = G0 * 1.3e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8001] = G0 * 1.3e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8001] = G0 * 1.3e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8002] = G0 * 1.3e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8002] = G0 * 1.3e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8003] = G0 * 7.9e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8003] = G0 * 7.9e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8004] = G0 * 7.6e-11 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8004] = G0 * 7.6e-11 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8005] = G0 * 3.35e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8005] = G0 * 3.35e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8006] = G0 * 3.35e-10 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8006] = G0 * 3.35e-10 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8007] = G0 * 2.11e-10 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8007] = G0 * 2.11e-10 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8008] = G0 * 1.73e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8008] = G0 * 1.73e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8009] = G0 * 1.73e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8009] = G0 * 1.73e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8010] = G0 * 1.73e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8010] = G0 * 1.73e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8011] = G0 * 9.8e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8011] = G0 * 9.8e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8012] = G0 * 9.5e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8012] = G0 * 9.5e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8013] = G0 * 1.55e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8013] = G0 * 1.55e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8014] = G0 * 1.55e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8014] = G0 * 1.55e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8015] = G0 * 7.3e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8015] = G0 * 7.3e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8016] = G0 * 7.3e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8016] = G0 * 7.3e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8017] = G0 * 5e-09 * exp(-2.1*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8017] = G0 * 5e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8018] = G0 * 1.7e-09 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8018] = G0 * 1.7e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8019] = G0 * 1.9e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8019] = G0 * 1.9e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8020] = G0 * 1.1e-09 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8020] = G0 * 1.1e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8021] = G0 * 1.4e-09 * exp(-1.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8021] = G0 * 1.4e-09 * exp(-1.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8022] = G0 * 1.1e-09 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8022] = G0 * 1.1e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8023] = G0 * 1.1e-09 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8023] = G0 * 1.1e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8024] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8024] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8025] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8025] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8026] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8026] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8027] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8027] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8028] = G0 * 3.3e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8028] = G0 * 3.3e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8029] = G0 * 2.25e-10 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8029] = G0 * 2.25e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8030] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8030] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8031] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8031] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8032] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8032] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8033] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8033] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8034] = G0 * 1.56e-09 * exp(-1.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8034] = G0 * 1.56e-09 * exp(-1.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8035] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8035] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8036] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8036] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8037] = G0 * 3.3e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8037] = G0 * 3.3e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8038] = G0 * 2.25e-10 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8038] = G0 * 2.25e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8039] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8039] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8040] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8040] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8041] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8041] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8042] = G0 * 2.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8042] = G0 * 2.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8043] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8043] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8044] = G0 * 2.5e-09 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8044] = G0 * 2.5e-09 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8045] = G0 * 6.2e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8045] = G0 * 6.2e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8046] = G0 * 6.2e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8046] = G0 * 6.2e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8047] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8047] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8048] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8048] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8049] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8049] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8050] = G0 * 1.38e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8050] = G0 * 1.38e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8051] = G0 * 1.13e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8051] = G0 * 1.13e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8052] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8052] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8053] = G0 * 1.4e-09 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8053] = G0 * 1.4e-09 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8054] = G0 * 6.6e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8054] = G0 * 6.6e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8055] = G0 * 6.6e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8055] = G0 * 6.6e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8056] = G0 * 6.6e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8056] = G0 * 6.6e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8057] = G0 * 1.81e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8057] = G0 * 1.81e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8058] = G0 * 2.07e-10 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8058] = G0 * 2.07e-10 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8059] = G0 * 2.07e-10 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8059] = G0 * 2.07e-10 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8060] = G0 * 2.07e-10 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8060] = G0 * 2.07e-10 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8061] = G0 * 1e-11 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8061] = G0 * 1e-11 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8062] = G0 * 1e-09 * exp(-2.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8062] = G0 * 1e-09 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8063] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8063] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8064] = G0 * 5.48e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8064] = G0 * 5.48e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8065] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8065] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8066] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8066] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8067] = G0 * 1e-09 * exp(-2.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8067] = G0 * 1e-09 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8068] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8068] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8069] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8069] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8070] = G0 * 9.5e-10 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8070] = G0 * 9.5e-10 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8071] = G0 * 9.5e-10 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8071] = G0 * 9.5e-10 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8072] = G0 * 1.7e-10 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8072] = G0 * 1.7e-10 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8073] = G0 * 1.7e-10 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8073] = G0 * 1.7e-10 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8074] = G0 * 1.7e-10 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8074] = G0 * 1.7e-10 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8075] = G0 * 9.8e-10 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8075] = G0 * 9.8e-10 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8076] = G0 * 2e-10 * exp(-3.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8076] = G0 * 2e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8077] = G0 * 5.48e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8077] = G0 * 5.48e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8078] = G0 * 1.1e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8078] = G0 * 1.1e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8079] = G0 * 1.1e-09 * exp(-1.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8079] = G0 * 1.1e-09 * exp(-1.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8080] = G0 * 4.6e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8080] = G0 * 4.6e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8081] = G0 * 4.6e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8081] = G0 * 4.6e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8082] = G0 * 8.9e-10 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8082] = G0 * 8.9e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8083] = G0 * 1.6e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8083] = G0 * 1.6e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8084] = G0 * 2.4e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8084] = G0 * 2.4e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8085] = G0 * 1.1e-09 * exp(-1.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8085] = G0 * 1.1e-09 * exp(-1.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8086] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8086] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8087] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8087] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8088] = G0 * 5e-12 * exp(-3.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8088] = G0 * 5e-12 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8089] = G0 * 1.5e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8089] = G0 * 1.5e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8090] = G0 * 4.6e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8090] = G0 * 4.6e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8091] = G0 * 4.6e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8091] = G0 * 4.6e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8092] = G0 * 2.9e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8092] = G0 * 2.9e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8093] = G0 * 1e-09 * exp(-2.4*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8093] = G0 * 1e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8094] = G0 * 1e-09 * exp(-2.4*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8094] = G0 * 1e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8095] = G0 * 9.54e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8095] = G0 * 9.54e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8096] = G0 * 4.4e-10 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8096] = G0 * 4.4e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8097] = G0 * 4.4e-10 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8097] = G0 * 4.4e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8098] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8098] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8099] = G0 * 1.4e-09 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8099] = G0 * 1.4e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8100] = G0 * 1.5e-10 * exp(-3.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8100] = G0 * 1.5e-10 * exp(-3.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8101] = G0 * 2e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8101] = G0 * 2e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8102] = G0 * 4.1e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8102] = G0 * 4.1e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8103] = G0 * 2.6e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8103] = G0 * 2.6e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8104] = G0 * 2.6e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8104] = G0 * 2.6e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8105] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8105] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8106] = G0 * 3e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8106] = G0 * 3e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8107] = G0 * 4.25e-09 * exp(-1.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8107] = G0 * 4.25e-09 * exp(-1.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8108] = G0 * 4.25e-09 * exp(-1.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8108] = G0 * 4.25e-09 * exp(-1.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8109] = G0 * 1.7e-10 * exp(-5.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8109] = G0 * 1.7e-10 * exp(-5.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8110] = G0 * 4.2e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8110] = G0 * 4.2e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8111] = G0 * 6e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8111] = G0 * 6e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8112] = G0 * 1.85e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8112] = G0 * 1.85e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8113] = G0 * 1.85e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8113] = G0 * 1.85e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8114] = G0 * 5e-10 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8114] = G0 * 5e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8115] = G0 * 1.9e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8115] = G0 * 1.9e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8116] = G0 * 1.9e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8116] = G0 * 1.9e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8117] = G0 * 1.9e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8117] = G0 * 1.9e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8118] = G0 * 1.9e-09 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8118] = G0 * 1.9e-09 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8119] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8119] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8120] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8120] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8121] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8121] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8122] = G0 * 9.54e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8122] = G0 * 9.54e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8123] = G0 * 5.6e-09 * exp(-2.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8123] = G0 * 5.6e-09 * exp(-2.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8124] = G0 * 5.65e-10 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8124] = G0 * 5.65e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8125] = G0 * 5.65e-10 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8125] = G0 * 5.65e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8126] = G0 * 4.7e-11 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8126] = G0 * 4.7e-11 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8127] = G0 * 5e-12 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8127] = G0 * 5e-12 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8128] = G0 * 5e-12 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8128] = G0 * 5e-12 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8129] = G0 * 2.6e-10 * exp(-2.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8129] = G0 * 2.6e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8130] = G0 * 7e-09 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8130] = G0 * 7e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8131] = G0 * 1e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8131] = G0 * 1e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8132] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8132] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8133] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8133] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8134] = G0 * 1e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8134] = G0 * 1e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8135] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8135] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8136] = G0 * 1.13e-09 * exp(-1.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8136] = G0 * 1.13e-09 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8137] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8137] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8138] = G0 * 3.4e-09 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8138] = G0 * 3.4e-09 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8139] = G0 * 6.2e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8139] = G0 * 6.2e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8140] = G0 * 6.2e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8140] = G0 * 6.2e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8141] = G0 * 6.2e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8141] = G0 * 6.2e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8142] = G0 * 1e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8142] = G0 * 1e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8143] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8143] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8144] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8144] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8145] = G0 * 5.48e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8145] = G0 * 5.48e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8146] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8146] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8147] = G0 * 1e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8147] = G0 * 1e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8148] = G0 * 1e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8148] = G0 * 1e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8149] = G0 * 1e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8149] = G0 * 1e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8150] = G0 * 1.38e-09 * exp(-1.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8150] = G0 * 1.38e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8151] = G0 * 3.7e-09 * exp(-2.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8151] = G0 * 3.7e-09 * exp(-2.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8152] = G0 * 6.9e-10 * exp(-3.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8152] = G0 * 6.9e-10 * exp(-3.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8153] = G0 * 6.9e-10 * exp(-3.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8153] = G0 * 6.9e-10 * exp(-3.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8154] = G0 * 6.9e-10 * exp(-3.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8154] = G0 * 6.9e-10 * exp(-3.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8155] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8155] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8156] = G0 * 3.13e-10 * exp(-2.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8156] = G0 * 3.13e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8157] = G0 * 4.33e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8157] = G0 * 4.33e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8158] = G0 * 4.33e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8158] = G0 * 4.33e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8159] = G0 * 4.33e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8159] = G0 * 4.33e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8160] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8160] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8161] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8161] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8162] = G0 * 1e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8162] = G0 * 1e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8163] = G0 * 1e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8163] = G0 * 1e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8164] = G0 * 1.9e-09 * exp(-2.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8164] = G0 * 1.9e-09 * exp(-2.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8165] = G0 * 3.3e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8165] = G0 * 3.3e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8166] = G0 * 6.2e-12 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8166] = G0 * 6.2e-12 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8167] = G0 * 2e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8167] = G0 * 2e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8168] = G0 * 2e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8168] = G0 * 2e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8169] = G0 * 2e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8169] = G0 * 2e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8170] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8170] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8171] = G0 * 2e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8171] = G0 * 2e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8172] = G0 * 3.3e-10 * exp(-1.4*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8172] = G0 * 3.3e-10 * exp(-1.4*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8173] = G0 * 6.2e-12 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8173] = G0 * 6.2e-12 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8174] = G0 * 6.2e-12 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8174] = G0 * 6.2e-12 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8175] = G0 * 8.3e-10 * exp(-1.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8175] = G0 * 8.3e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8176] = G0 * 5e-10 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8176] = G0 * 5e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8177] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8177] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8178] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8178] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8179] = G0 * 1e-10 * exp(-2.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8179] = G0 * 1e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8180] = G0 * 1e-10 * exp(-2.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8180] = G0 * 1e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8181] = G0 * 5e-12 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8181] = G0 * 5e-12 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8182] = G0 * 5e-12 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8182] = G0 * 5e-12 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8183] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8183] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8184] = G0 * 1e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8184] = G0 * 1e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8185] = G0 * 1e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8185] = G0 * 1e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8186] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8186] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8187] = G0 * 5e-10 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8187] = G0 * 5e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8188] = G0 * 5e-10 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8188] = G0 * 5e-10 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8189] = G0 * 1e-10 * exp(-2.3*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8189] = G0 * 1e-10 * exp(-2.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8190] = G0 * 1e-11 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8190] = G0 * 1e-11 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8191] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8191] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8192] = G0 * 1e-10 * exp(-2.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8192] = G0 * 1e-10 * exp(-2.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8193] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8193] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8194] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8194] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8195] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8195] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8196] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8196] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8197] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8197] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8198] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8198] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8199] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8199] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8200] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8200] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8201] = G0 * 1e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8201] = G0 * 1e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8202] = G0 * 1e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8202] = G0 * 1e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8203] = G0 * 2e-11 * exp(-5.0*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8203] = G0 * 2e-11 * exp(-5.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8204] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8204] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8205] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8205] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8206] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8206] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8207] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8207] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8208] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8208] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8209] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8209] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8210] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8210] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8211] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8211] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8212] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8212] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8213] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8213] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8214] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8214] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8215] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8215] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8216] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8216] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8217] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8217] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8218] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8218] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8219] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8219] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8220] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8220] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8221] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8221] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8222] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8222] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8223] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8223] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8224] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8224] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8225] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8225] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8226] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8226] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8227] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8227] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8228] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8228] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8229] = G0 * 1.16e-12 * exp(-5.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8229] = G0 * 1.16e-12 * exp(-5.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8230] = G0 * 9.47e-12 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8230] = G0 * 9.47e-12 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8231] = G0 * 3.46e-12 * exp(-5.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8231] = G0 * 3.46e-12 * exp(-5.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8232] = G0 * 1.96e-10 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8232] = G0 * 1.96e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8233] = G0 * 9.37e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8233] = G0 * 9.37e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8234] = G0 * 5.49e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8234] = G0 * 5.49e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8235] = G0 * 5.49e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8235] = G0 * 5.49e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8236] = G0 * 7.36e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8236] = G0 * 7.36e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8237] = G0 * 2.3e-11 * exp(-3.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8237] = G0 * 2.3e-11 * exp(-3.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8238] = G0 * 3.19e-11 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8238] = G0 * 3.19e-11 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8239] = G0 * 5.95e-11 * exp(-3.9*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8239] = G0 * 5.95e-11 * exp(-3.9*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8240] = G0 * 1.86e-10 * exp(-2.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8240] = G0 * 1.86e-10 * exp(-2.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8241] = G0 * 1.42e-12 * exp(-5.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8241] = G0 * 1.42e-12 * exp(-5.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8242] = G0 * 2.07e-11 * exp(-4.6*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8242] = G0 * 2.07e-11 * exp(-4.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8243] = G0 * 5.45e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8243] = G0 * 5.45e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8244] = G0 * 5.45e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8244] = G0 * 5.45e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8245] = G0 * 5.45e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8245] = G0 * 5.45e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8246] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8246] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8247] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8247] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8248] = G0 * 3.1e-12 * exp(-5.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8248] = G0 * 3.1e-12 * exp(-5.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8249] = G0 * 5.27e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8249] = G0 * 5.27e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8250] = G0 * 6.14e-13 * exp(-5.2*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8250] = G0 * 6.14e-13 * exp(-5.2*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8251] = G0 * 4.94e-10 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8251] = G0 * 4.94e-10 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8252] = G0 * 1e-09 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8252] = G0 * 1e-09 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8253] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8253] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8254] = G0 * 2e-10 * exp(-2.5*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8254] = G0 * 2e-10 * exp(-2.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8255] = G0 * 3.83e-11 * exp(-4.5*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8255] = G0 * 3.83e-11 * exp(-4.5*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8256] = G0 * 5.28e-11 * exp(-3.1*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8256] = G0 * 5.28e-11 * exp(-3.1*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8257] = G0 * 2.31e-11 * exp(-3.3*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8257] = G0 * 2.31e-11 * exp(-3.3*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8258] = G0 * 4.41e-10 * exp(-2.7*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8258] = G0 * 4.41e-10 * exp(-2.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8259] = G0 * 2.86e-10 * exp(-2.8*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8259] = G0 * 2.86e-10 * exp(-2.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8260] = G0 * 5.73e-10 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8260] = G0 * 5.73e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8261] = G0 * 5.73e-10 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8261] = G0 * 5.73e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8262] = G0 * 5.73e-10 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8262] = G0 * 5.73e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8263] = G0 * 5.73e-10 * exp(-3.0*Av); + if (Tgas>=5.0 && Tgas<41000.0) { k[8263] = G0 * 5.73e-10 * exp(-3.0*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8264] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8264] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8265] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8265] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8266] = G0 * 9e-10 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8266] = G0 * 9e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8267] = G0 * 1e-09 * exp(-1.8*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8267] = G0 * 1e-09 * exp(-1.8*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8268] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8268] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8269] = G0 * 9e-10 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8269] = G0 * 9e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8270] = G0 * 9e-10 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8270] = G0 * 9e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8271] = G0 * 5e-10 * exp(-1.7*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8271] = G0 * 5e-10 * exp(-1.7*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8272] = G0 * 9e-10 * exp(-1.6*Av); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8272] = G0 * 9e-10 * exp(-1.6*Av); } - if (Tgas>5.0 && Tgas<41000.0) { k[8273] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*1.0)/(1.0+1.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + k[8273] = 0.0; - if (Tgas>5.0 && Tgas<41000.0) { k[8274] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*12.0)/(1.0+12.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(800.0/12.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8274] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*12.0)/(1.0+12.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8275] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*13.0)/(1.0+13.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(873.0/13.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8275] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*13.0)/(1.0+13.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8276] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*14.0)/(1.0+14.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(945.0/14.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8276] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*14.0)/(1.0+14.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8277] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*15.0)/(1.0+15.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1018.0/15.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8277] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*15.0)/(1.0+15.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8278] = fmax(exp(-5940.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8278] = fmax(exp(-5940.0/Tdust), exp(quan * sqrt(((1.0*16.0)/(1.0+16.0))*5940.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1090.0/16.0) * exp(-1090.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8279] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*14.0)/(1.0+14.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(800.0/14.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8279] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*14.0)/(1.0+14.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8280] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*15.0)/(1.0+15.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1577.0/15.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8280] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*15.0)/(1.0+15.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8281] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*16.0)/(1.0+16.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2354.0/16.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8281] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*16.0)/(1.0+16.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8282] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*16.0)/(1.0+16.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(800.0/16.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8282] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*16.0)/(1.0+16.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8283] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*17.0)/(1.0+17.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2850.0/17.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8283] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*17.0)/(1.0+17.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8284] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*19.0)/(1.0+19.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(450.0/19.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8284] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*19.0)/(1.0+19.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(450.0/19.0) * exp(-450.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8285] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*24.0)/(1.0+24.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/24.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8285] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*24.0)/(1.0+24.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8286] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*25.0)/(1.0+25.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2137.0/25.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8286] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*25.0)/(1.0+25.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2137.0/25.0) * exp(-2137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8287] = fmax(exp(-1210.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8287] = fmax(exp(-1210.0/Tdust), exp(quan * sqrt(((1.0*26.0)/(1.0+26.0))*1210.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2587.0/26.0) * exp(-2587.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8288] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*27.0)/(1.0+27.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3037.0/27.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8288] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*27.0)/(1.0+27.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3037.0/27.0) * exp(-3037.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8289] = fmax(exp(-750.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8289] = fmax(exp(-750.0/Tdust), exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*750.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3487.0/28.0) * exp(-3487.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8290] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3937.0/29.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8290] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3937.0/29.0) * exp(-3937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8291] = fmax(exp(-4890.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8291] = fmax(exp(-4890.0/Tdust), exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*4890.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2300.0/30.0) * exp(-2300.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8292] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*26.0)/(1.0+26.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/26.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8292] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*26.0)/(1.0+26.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8293] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*28.0)/(1.0+28.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/28.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8293] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/28.0) * exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8294] = fmax(exp(-2500.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8294] = fmax(exp(-2500.0/Tdust), exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*2500.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8295] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/29.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8295] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8296] = fmax(exp(-2500.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8296] = fmax(exp(-2500.0/Tdust), exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*2500.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8297] = fmax(exp(-2500.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8297] = fmax(exp(-2500.0/Tdust), exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*2500.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8298] = fmax(exp(-1850.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8298] = fmax(exp(-1850.0/Tdust), exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*1850.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8299] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2655.0/31.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8299] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8300] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4330.0/31.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8300] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8301] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*28.0)/(1.0+28.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2700.0/28.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8301] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2700.0/28.0) * exp(-2700.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8302] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3150.0/29.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8302] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3150.0/29.0) * exp(-3150.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8303] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*30.0)/(1.0+30.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3600.0/30.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8303] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3600.0/30.0) * exp(-3600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8304] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4050.0/31.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8304] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4050.0/31.0) * exp(-4050.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8305] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*30.0)/(1.0+30.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/30.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8305] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/30.0) * exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8306] = fmax(exp(-750.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8306] = fmax(exp(-750.0/Tdust), exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*750.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2050.0/31.0) * exp(-2050.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8307] = fmax(exp(-1200.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8307] = fmax(exp(-1200.0/Tdust), exp(quan * sqrt(((1.0*32.0)/(1.0+32.0))*1200.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1000.0/32.0) * exp(-1000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8308] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*33.0)/(1.0+33.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3650.0/33.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8308] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*33.0)/(1.0+33.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3650.0/33.0) * exp(-3650.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8309] = fmax(exp(-1900.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8309] = fmax(exp(-1900.0/Tdust), exp(quan * sqrt(((1.0*34.0)/(1.0+34.0))*1900.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5700.0/34.0) * exp(-5700.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8310] = fmax(exp(-1400.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8310] = fmax(exp(-1400.0/Tdust), exp(quan * sqrt(((1.0*34.0)/(1.0+34.0))*1400.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5700.0/34.0) * exp(-5700.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8311] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*32.0)/(1.0+32.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1100.0/32.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8311] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*32.0)/(1.0+32.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8312] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*33.0)/(1.0+33.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1500.0/33.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8312] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*33.0)/(1.0+33.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1500.0/33.0) * exp(-1500.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8313] = fmax(exp(-860.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8313] = fmax(exp(-860.0/Tdust), exp(quan * sqrt(((1.0*34.0)/(1.0+34.0))*860.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2743.0/34.0) * exp(-2743.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8314] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*35.0)/(1.0+35.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(850.0/35.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8314] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*35.0)/(1.0+35.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(850.0/35.0) * exp(-850.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8315] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*36.0)/(1.0+36.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/36.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8315] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*36.0)/(1.0+36.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8316] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*37.0)/(1.0+37.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2937.0/37.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8316] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*37.0)/(1.0+37.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8317] = fmax(exp(-1210.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8317] = fmax(exp(-1210.0/Tdust), exp(quan * sqrt(((1.0*38.0)/(1.0+38.0))*1210.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3387.0/38.0) * exp(-3387.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8318] = fmax(exp(-1210.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8318] = fmax(exp(-1210.0/Tdust), exp(quan * sqrt(((1.0*38.0)/(1.0+38.0))*1210.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2110.0/38.0) * exp(-2110.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8319] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3837.0/39.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8319] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3837.0/39.0) * exp(-3837.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8320] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3837.0/39.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8320] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3837.0/39.0) * exp(-3837.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8321] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*38.0)/(1.0+38.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/38.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8321] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*38.0)/(1.0+38.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/38.0) * exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8322] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3780.0/39.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8322] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3780.0/39.0) * exp(-3780.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8323] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*40.0)/(1.0+40.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4230.0/40.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8323] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*40.0)/(1.0+40.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4230.0/40.0) * exp(-4230.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8324] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*40.0)/(1.0+40.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1950.0/40.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8324] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*40.0)/(1.0+40.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1950.0/40.0) * exp(-1950.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8325] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*41.0)/(1.0+41.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/41.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8325] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*41.0)/(1.0+41.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/41.0) * exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8326] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8326] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8327] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8327] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8328] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8328] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8329] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8329] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8330] = fmax(exp(-1000.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8330] = fmax(exp(-1000.0/Tdust), exp(quan * sqrt(((1.0*44.0)/(1.0+44.0))*1000.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1900.0/44.0) * exp(-1900.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8331] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*43.0)/(1.0+43.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2320.0/43.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8331] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*43.0)/(1.0+43.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2320.0/43.0) * exp(-2320.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8332] = fmax(exp(-2120.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8332] = fmax(exp(-2120.0/Tdust), exp(quan * sqrt(((1.0*44.0)/(1.0+44.0))*2120.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8333] = fmax(exp(-2400.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8333] = fmax(exp(-2400.0/Tdust), exp(quan * sqrt(((1.0*44.0)/(1.0+44.0))*2400.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8334] = fmax(exp(-2400.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8334] = fmax(exp(-2400.0/Tdust), exp(quan * sqrt(((1.0*44.0)/(1.0+44.0))*2400.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8335] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*45.0)/(1.0+45.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2350.0/45.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8335] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*45.0)/(1.0+45.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2350.0/45.0) * exp(-2350.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8336] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*45.0)/(1.0+45.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5120.0/45.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8336] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*45.0)/(1.0+45.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5120.0/45.0) * exp(-5120.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8337] = fmax(exp(-2850.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8337] = fmax(exp(-2850.0/Tdust), exp(quan * sqrt(((1.0*46.0)/(1.0+46.0))*2850.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5000.0/46.0) * exp(-5000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8338] = fmax(exp(-2450.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8338] = fmax(exp(-2450.0/Tdust), exp(quan * sqrt(((1.0*46.0)/(1.0+46.0))*2450.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5000.0/46.0) * exp(-5000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8339] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*48.0)/(1.0+48.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3200.0/48.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8339] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*48.0)/(1.0+48.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3200.0/48.0) * exp(-3200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8340] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*49.0)/(1.0+49.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3737.0/49.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8340] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*49.0)/(1.0+49.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3737.0/49.0) * exp(-3737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8341] = fmax(exp(-1210.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8341] = fmax(exp(-1210.0/Tdust), exp(quan * sqrt(((1.0*50.0)/(1.0+50.0))*1210.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4187.0/50.0) * exp(-4187.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8342] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*51.0)/(1.0+51.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4637.0/51.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8342] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*51.0)/(1.0+51.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4637.0/51.0) * exp(-4637.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8343] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*50.0)/(1.0+50.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3200.0/50.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8343] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*50.0)/(1.0+50.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3200.0/50.0) * exp(-3200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8344] = fmax(exp(-750.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8344] = fmax(exp(-750.0/Tdust), exp(quan * sqrt(((1.0*53.0)/(1.0+53.0))*750.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5480.0/53.0) * exp(-5480.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8345] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*54.0)/(1.0+54.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5930.0/54.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8345] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*54.0)/(1.0+54.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5930.0/54.0) * exp(-5930.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8346] = fmax(exp(-2450.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8346] = fmax(exp(-2450.0/Tdust), exp(quan * sqrt(((1.0*60.0)/(1.0+60.0))*2450.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8347] = fmax(exp(-3970.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8347] = fmax(exp(-3970.0/Tdust), exp(quan * sqrt(((1.0*60.0)/(1.0+60.0))*3970.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8348] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*60.0)/(1.0+60.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2888.0/60.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8348] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*60.0)/(1.0+60.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2888.0/60.0) * exp(-2888.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8349] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*64.0)/(1.0+64.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5330.0/64.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8349] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*64.0)/(1.0+64.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5330.0/64.0) * exp(-5330.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8350] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*60.0)/(1.0+60.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4000.0/60.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8350] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*60.0)/(1.0+60.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8351] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*61.0)/(1.0+61.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4537.0/61.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8351] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*61.0)/(1.0+61.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4537.0/61.0) * exp(-4537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8352] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*72.0)/(1.0+72.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4800.0/72.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8352] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*72.0)/(1.0+72.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4800.0/72.0) * exp(-4800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8353] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*73.0)/(1.0+73.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5337.0/73.0) * - exp(-5337.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8353] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*73.0)/(1.0+73.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5337.0/73.0) * + exp(-5337.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8354] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*74.0)/(1.0+74.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4800.0/74.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8354] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*74.0)/(1.0+74.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4800.0/74.0) * exp(-4800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8355] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*84.0)/(1.0+84.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5600.0/84.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8355] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*84.0)/(1.0+84.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5600.0/84.0) * exp(-5600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8356] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*85.0)/(1.0+85.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6137.0/85.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8356] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*85.0)/(1.0+85.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6137.0/85.0) * exp(-6137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8357] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*96.0)/(1.0+96.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6400.0/96.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8357] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*96.0)/(1.0+96.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6400.0/96.0) * exp(-6400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8358] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*97.0)/(1.0+97.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6937.0/97.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8358] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*97.0)/(1.0+97.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6937.0/97.0) * exp(-6937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8359] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*98.0)/(1.0+98.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6400.0/98.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8359] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*98.0)/(1.0+98.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6400.0/98.0) * exp(-6400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8360] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*108.0)/(1.0+108.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(7200.0/108.0) * - exp(-7200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8360] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*108.0)/(1.0+108.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(7200.0/108.0) + * exp(-7200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens + * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8361] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*109.0)/(1.0+109.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(7737.0/109.0) * - exp(-7737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8361] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*109.0)/(1.0+109.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(7737.0/109.0) + * exp(-7737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens + * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8362] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*120.0)/(1.0+120.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(8000.0/120.0) * - exp(-8000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8362] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*120.0)/(1.0+120.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(8000.0/120.0) + * exp(-8000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens + * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8363] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*121.0)/(1.0+121.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(8537.0/121.0) * - exp(-8537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8363] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*121.0)/(1.0+121.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(8537.0/121.0) + * exp(-8537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens + * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8364] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*122.0)/(1.0+122.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(8000.0/122.0) * - exp(-8000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8364] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*122.0)/(1.0+122.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(8000.0/122.0) + * exp(-8000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens + * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8365] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*59.0)/(1.0+59.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3650.0/59.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8365] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*59.0)/(1.0+59.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3650.0/59.0) * exp(-3650.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8366] = fmax(exp(-0.0/Tdust), exp(quan - * sqrt(((1.0*59.0)/(1.0+59.0))*0.0))) * (fmax(freq * sqrt(600.0/1.0) * - exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * - sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6230.0/59.0) * + if (Tgas>=5.0 && Tgas<41000.0) { k[8366] = fmax(exp(-0.0/Tdust), + exp(quan * sqrt(((1.0*59.0)/(1.0+59.0))*0.0))) * (fmax(freq * + sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) + * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6230.0/59.0) * exp(-6230.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8367] = fmax(exp(-2850.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8367] = fmax(exp(-2850.0/Tdust), exp(quan * sqrt(((1.0*60.0)/(1.0+60.0))*2850.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8368] = fmax(exp(-2400.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8368] = fmax(exp(-2400.0/Tdust), exp(quan * sqrt(((1.0*60.0)/(1.0+60.0))*2400.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8369] = fmax(exp(-2500.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8369] = fmax(exp(-2500.0/Tdust), exp(quan * sqrt(((2.0*12.0)/(2.0+12.0))*2500.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8370] = fmax(exp(-3530.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8370] = fmax(exp(-3530.0/Tdust), exp(quan * sqrt(((2.0*14.0)/(2.0+14.0))*3530.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8371] = fmax(exp(-6440.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8371] = fmax(exp(-6440.0/Tdust), exp(quan * sqrt(((2.0*15.0)/(2.0+15.0))*6440.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8372] = fmax(exp(-6300.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8372] = fmax(exp(-6300.0/Tdust), exp(quan * sqrt(((2.0*16.0)/(2.0+16.0))*6300.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8373] = fmax(exp(-2600.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8373] = fmax(exp(-2600.0/Tdust), exp(quan * sqrt(((2.0*17.0)/(2.0+17.0))*2600.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8374] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8374] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*24.0)/(2.0+24.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8375] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8375] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*25.0)/(2.0+25.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(2137.0/25.0) * exp(-2137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8376] = fmax(exp(-2070.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8376] = fmax(exp(-2070.0/Tdust), exp(quan * sqrt(((2.0*26.0)/(2.0+26.0))*2070.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8377] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8377] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*36.0)/(2.0+36.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8378] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8378] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*37.0)/(2.0+37.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8379] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8379] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*37.0)/(2.0+37.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8380] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8380] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*48.0)/(2.0+48.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(3200.0/48.0) * exp(-3200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8381] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8381] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*49.0)/(2.0+49.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(3737.0/49.0) * exp(-3737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8382] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8382] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*60.0)/(2.0+60.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8383] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8383] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*61.0)/(2.0+61.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(4537.0/61.0) * exp(-4537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8384] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8384] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*72.0)/(2.0+72.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(4800.0/72.0) * exp(-4800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8385] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8385] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*73.0)/(2.0+73.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(5337.0/73.0) * exp(-5337.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8386] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8386] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*84.0)/(2.0+84.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(5600.0/84.0) * exp(-5600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8387] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8387] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*85.0)/(2.0+85.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(6137.0/85.0) * exp(-6137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8388] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8388] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*96.0)/(2.0+96.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(6400.0/96.0) * exp(-6400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8389] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8389] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*97.0)/(2.0+97.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(6937.0/97.0) * exp(-6937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8390] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8390] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*108.0)/(2.0+108.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(7200.0/108.0) * exp(-7200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens - * cov * cov; } + * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8391] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8391] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*109.0)/(2.0+109.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(7737.0/109.0) * exp(-7737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens - * cov * cov; } + * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8392] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8392] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*120.0)/(2.0+120.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(8000.0/120.0) * exp(-8000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens - * cov * cov; } + * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8393] = fmax(exp(-2100.0/Tdust), + if (Tgas>=5.0 && Tgas<41000.0) { k[8393] = fmax(exp(-2100.0/Tdust), exp(quan * sqrt(((2.0*121.0)/(2.0+121.0))*2100.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(8537.0/121.0) * exp(-8537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens - * cov * cov; } + * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8394] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8394] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8395] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8395] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8396] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8396] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8397] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8397] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8398] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8398] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/30.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8399] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8399] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/30.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8400] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8400] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1900.0/46.0) * exp(-1900.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8401] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8401] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8402] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8402] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8403] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8403] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8404] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8404] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8405] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8405] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8406] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8406] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8407] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8407] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1000.0/32.0) * exp(-1000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8408] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8408] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8409] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8409] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2600.0/48.0) * exp(-2600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8410] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8410] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8411] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8411] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2137.0/25.0) * exp(-2137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8412] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8412] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8413] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8413] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(3037.0/27.0) * exp(-3037.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8414] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8414] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1500.0/33.0) * exp(-1500.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8415] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8415] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8416] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8416] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8417] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8417] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8418] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8418] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/38.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8419] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8419] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1950.0/40.0) * exp(-1950.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8420] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8420] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(3200.0/48.0) * exp(-3200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8421] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8421] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(3737.0/49.0) * exp(-3737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8422] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8422] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(5320.0/56.0) * exp(-5320.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8423] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8423] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8424] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8424] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4537.0/61.0) * exp(-4537.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8425] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8425] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4800.0/72.0) * exp(-4800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8426] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8426] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(5337.0/73.0) * exp(-5337.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8427] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8427] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(5600.0/84.0) * exp(-5600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8428] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8428] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(6137.0/85.0) * exp(-6137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8429] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8429] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(6400.0/96.0) * exp(-6400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8430] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8430] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(6937.0/97.0) * exp(-6937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8431] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8431] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(7200.0/108.0) * exp(-7200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8432] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8432] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(7737.0/109.0) * exp(-7737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8433] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8433] = exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(8000.0/120.0) * exp(-8000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8434] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8434] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8435] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8435] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2050.0/31.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8436] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8436] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(3650.0/33.0) * exp(-3650.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8437] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8437] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8438] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8438] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8439] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8439] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8440] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8440] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8441] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8441] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8442] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8442] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1900.0/46.0) * exp(-1900.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8443] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8443] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8444] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8444] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8445] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8445] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8446] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8446] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8447] = exp(-1000.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8447] = exp(-1000.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8448] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8448] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8449] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8449] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1500.0/33.0) * exp(-1500.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8450] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8450] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8451] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8451] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8452] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8452] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1900.0/44.0) * exp(-1900.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8453] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8453] = exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2600.0/48.0) * exp(-2600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8454] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8454] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(3650.0/33.0) * exp(-3650.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8455] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8455] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8456] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8456] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8457] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8457] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8458] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8458] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8459] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8459] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1900.0/46.0) * exp(-1900.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8460] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8460] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8461] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8461] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8462] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8462] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8463] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8463] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1500.0/33.0) * exp(-1500.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8464] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8464] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8465] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8465] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8466] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8466] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8467] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8467] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8468] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8468] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4537.0/61.0) * exp(-4537.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8469] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8469] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(5600.0/84.0) * exp(-5600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8470] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8470] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(6137.0/85.0) * exp(-6137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8471] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8471] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(7200.0/108.0) * exp(-7200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8472] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8472] = exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * sqrt(7737.0/109.0) * exp(-7737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8473] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8473] = exp(-0.0/Tdust) * (freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8474] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8474] = exp(-0.0/Tdust) * (freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8475] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8475] = exp(-0.0/Tdust) * (freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites+freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8476] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8476] = exp(-0.0/Tdust) * (freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8477] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8477] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(2050.0/31.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8478] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8478] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8479] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8479] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8480] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8480] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8481] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8481] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1600.0/30.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8482] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8482] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8483] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8483] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8484] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8484] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8485] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8485] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1000.0/32.0) * exp(-1000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8486] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8486] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8487] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8487] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(2137.0/25.0) * exp(-2137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8488] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8488] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8489] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8489] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(3037.0/27.0) * exp(-3037.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8490] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8490] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(3037.0/27.0) * exp(-3037.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8491] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8491] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8492] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8492] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8493] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8493] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(3200.0/48.0) * exp(-3200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8494] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8494] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(3737.0/49.0) * exp(-3737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8495] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8495] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8496] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8496] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(4537.0/61.0) * exp(-4537.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8497] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8497] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(4800.0/72.0) * exp(-4800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8498] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8498] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(5337.0/73.0) * exp(-5337.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8499] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8499] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(5600.0/84.0) * exp(-5600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8500] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8500] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(6137.0/85.0) * exp(-6137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8501] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8501] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(6400.0/96.0) * exp(-6400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8502] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8502] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(6937.0/97.0) * exp(-6937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8503] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8503] = exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * sqrt(7737.0/109.0) * exp(-7737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8504] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8504] = exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(2320.0/43.0) * exp(-2320.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8505] = exp(-2400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8505] = exp(-2400.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8506] = exp(-1500.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8506] = exp(-1500.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8507] = exp(-2400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8507] = exp(-2400.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8508] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8508] = exp(-2850.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8509] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8509] = exp(-2850.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8510] = exp(-1500.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8510] = exp(-1500.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(5000.0/46.0) * exp(-5000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8511] = exp(-2450.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8511] = exp(-2450.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8512] = exp(-1500.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8512] = exp(-1500.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8513] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8513] = exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8514] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8514] = exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8515] = exp(-400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8515] = exp(-400.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8516] = exp(-3000.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8516] = exp(-3000.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8517] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8517] = exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8518] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8518] = exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8519] = exp(-1500.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8519] = exp(-1500.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8520] = exp(-2400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8520] = exp(-2400.0/Tdust) * (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8521] = exp(-5770.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8521] = exp(-5770.0/Tdust) * (freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8522] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8522] = exp(-2850.0/Tdust) * (freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8523] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8523] = exp(-0.0/Tdust) * (freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8524] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8524] = exp(-0.0/Tdust) * (freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites+freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8525] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8525] = exp(-0.0/Tdust) * (freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites+freq * sqrt(1600.0/30.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8526] = exp(-3000.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8526] = exp(-3000.0/Tdust) * (freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8527] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8527] = exp(-2850.0/Tdust) * (freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8528] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8528] = exp(-0.0/Tdust) * (freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites+freq * sqrt(1000.0/32.0) * exp(-1000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8529] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8529] = exp(-0.0/Tdust) * (freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8530] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8530] = exp(-0.0/Tdust) * (freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites+freq * sqrt(1600.0/30.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8531] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8531] = exp(-0.0/Tdust) * (freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8532] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8532] = exp(-0.0/Tdust) * (freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8533] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8533] = exp(-0.0/Tdust) * (freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites+freq * sqrt(2050.0/31.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8534] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8534] = exp(-2850.0/Tdust) * (freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8535] = exp(-1250.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8535] = exp(-1250.0/Tdust) * (freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8536] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8536] = exp(-2850.0/Tdust) * (freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites+freq * sqrt(5000.0/46.0) * exp(-5000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8537] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8537] = exp(-2850.0/Tdust) * (freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8538] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8538] = exp(-2850.0/Tdust) * (freq * sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8539] = exp(-3460.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8539] = exp(-3460.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8540] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8540] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8541] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8541] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(2050.0/31.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8542] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8542] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8543] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8543] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8544] = exp(-4450.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8544] = exp(-4450.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8545] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8545] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8546] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8546] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8547] = exp(-3020.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8547] = exp(-3020.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8548] = exp(-2400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8548] = exp(-2400.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8549] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8549] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(5120.0/45.0) * exp(-5120.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8550] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8550] = exp(-2850.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(5000.0/46.0) * exp(-5000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8551] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8551] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(2320.0/43.0) * exp(-2320.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8552] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8552] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(3200.0/50.0) * exp(-3200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8553] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8553] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(4800.0/74.0) * exp(-4800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8554] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8554] = exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(6400.0/98.0) * exp(-6400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8555] = exp(-5180.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8555] = exp(-5180.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8556] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8556] = exp(-2850.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8557] = exp(-2400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8557] = exp(-2400.0/Tdust) * (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8558] = exp(-3000.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8558] = exp(-3000.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8559] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8559] = exp(-0.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8560] = exp(-1500.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8560] = exp(-1500.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8561] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8561] = exp(-2850.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8562] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8562] = exp(-2850.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8563] = exp(-2400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8563] = exp(-2400.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8564] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8564] = exp(-2850.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(5000.0/46.0) * exp(-5000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8565] = exp(-4120.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8565] = exp(-4120.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8566] = exp(-2400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8566] = exp(-2400.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8567] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8567] = exp(-2850.0/Tdust) * (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8568] = exp(-3000.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8568] = exp(-3000.0/Tdust) * (freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8569] = exp(-0.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8569] = exp(-0.0/Tdust) * (freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8570] = exp(-2950.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8570] = exp(-2950.0/Tdust) * (freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8571] = exp(-2400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8571] = exp(-2400.0/Tdust) * (freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8572] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8572] = exp(-2850.0/Tdust) * (freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8573] = exp(-2400.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8573] = exp(-2400.0/Tdust) * (freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites+freq * sqrt(3800.0/44.0) * exp(-3800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8574] = exp(-2850.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8574] = exp(-2850.0/Tdust) * (freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites+freq * sqrt(6680.0/60.0) * exp(-6680.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8575] = exp(-250.0/Tdust) * (freq * + if (Tgas>=5.0 && Tgas<41000.0) { k[8575] = exp(-250.0/Tdust) * (freq * sqrt(2137.0/25.0) * exp(-2137.0*hop/Tdust)/unisites+freq * sqrt(1090.0/16.0) * exp(-1090.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8576] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*12.0)/(1.0+12.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(800.0/12.0) * - exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8576] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*12.0)/(1.0+12.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8577] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*13.0)/(1.0+13.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(873.0/13.0) * - exp(-873.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8577] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*13.0)/(1.0+13.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8578] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*14.0)/(1.0+14.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(945.0/14.0) * - exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8578] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*14.0)/(1.0+14.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8579] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*15.0)/(1.0+15.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1018.0/15.0) * - exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8579] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*15.0)/(1.0+15.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8580] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*14.0)/(1.0+14.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(800.0/14.0) * - exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8580] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*14.0)/(1.0+14.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8581] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*15.0)/(1.0+15.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1577.0/15.0) * - exp(-1577.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8581] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*15.0)/(1.0+15.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8582] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*16.0)/(1.0+16.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2354.0/16.0) * - exp(-2354.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8582] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*16.0)/(1.0+16.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8583] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*16.0)/(1.0+16.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(800.0/16.0) * - exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8583] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*16.0)/(1.0+16.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8584] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*17.0)/(1.0+17.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2850.0/17.0) * - exp(-2850.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8584] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*17.0)/(1.0+17.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8585] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*19.0)/(1.0+19.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(450.0/19.0) * - exp(-450.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8585] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*19.0)/(1.0+19.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(450.0/19.0) * exp(-450.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8586] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*24.0)/(1.0+24.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/24.0) * - exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8586] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*24.0)/(1.0+24.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8587] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*25.0)/(1.0+25.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2137.0/25.0) * - exp(-2137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8587] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*25.0)/(1.0+25.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2137.0/25.0) * exp(-2137.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8588] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8588] = opt_rcd * branch * fmax(exp(-1210.0/Tdust), exp(quan * sqrt(((1.0*26.0)/(1.0+26.0))*1210.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2587.0/26.0) * exp(-2587.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8589] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*27.0)/(1.0+27.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3037.0/27.0) * - exp(-3037.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8589] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*27.0)/(1.0+27.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3037.0/27.0) * exp(-3037.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8590] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8590] = opt_rcd * branch * fmax(exp(-750.0/Tdust), exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*750.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3487.0/28.0) * exp(-3487.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8591] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3937.0/29.0) * - exp(-3937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8591] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3937.0/29.0) * exp(-3937.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8592] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*26.0)/(1.0+26.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/26.0) * - exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8592] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*26.0)/(1.0+26.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8593] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/28.0) * - exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8593] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2400.0/28.0) * exp(-2400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8594] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8594] = opt_rcd * branch * fmax(exp(-2500.0/Tdust), exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*2500.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8595] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/29.0) * - exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8595] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8596] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8596] = opt_rcd * branch * fmax(exp(-2500.0/Tdust), exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*2500.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8597] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8597] = opt_rcd * branch * fmax(exp(-2500.0/Tdust), exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*2500.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2050.0/30.0) * exp(-2050.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8598] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2655.0/31.0) * - exp(-2655.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8598] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8599] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4330.0/31.0) * - exp(-4330.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8599] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8600] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2700.0/28.0) * - exp(-2700.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8600] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*28.0)/(1.0+28.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2700.0/28.0) * exp(-2700.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8601] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3150.0/29.0) * - exp(-3150.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8601] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*29.0)/(1.0+29.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3150.0/29.0) * exp(-3150.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8602] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3600.0/30.0) * - exp(-3600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8602] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3600.0/30.0) * exp(-3600.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8603] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4050.0/31.0) * - exp(-4050.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8603] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*31.0)/(1.0+31.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(4050.0/31.0) * exp(-4050.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8604] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1600.0/30.0) * - exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8604] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*30.0)/(1.0+30.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(1600.0/30.0) * exp(-1600.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8605] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8605] = opt_rcd * branch * fmax(exp(-1200.0/Tdust), exp(quan * sqrt(((1.0*32.0)/(1.0+32.0))*1200.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1000.0/32.0) * exp(-1000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8606] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*33.0)/(1.0+33.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3650.0/33.0) * - exp(-3650.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8606] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*33.0)/(1.0+33.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3650.0/33.0) * exp(-3650.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8607] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*32.0)/(1.0+32.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1100.0/32.0) * - exp(-1100.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8607] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*32.0)/(1.0+32.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8608] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*33.0)/(1.0+33.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1500.0/33.0) * - exp(-1500.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8608] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*33.0)/(1.0+33.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(1500.0/33.0) * exp(-1500.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8609] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*35.0)/(1.0+35.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(850.0/35.0) * - exp(-850.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8609] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*35.0)/(1.0+35.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(850.0/35.0) * exp(-850.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8610] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*36.0)/(1.0+36.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/36.0) * - exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8610] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*36.0)/(1.0+36.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8611] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*37.0)/(1.0+37.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2937.0/37.0) * - exp(-2937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8611] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*37.0)/(1.0+37.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8612] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8612] = opt_rcd * branch * fmax(exp(-1210.0/Tdust), exp(quan * sqrt(((1.0*38.0)/(1.0+38.0))*1210.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3387.0/38.0) * exp(-3387.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8613] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8613] = opt_rcd * branch * fmax(exp(-1210.0/Tdust), exp(quan * sqrt(((1.0*38.0)/(1.0+38.0))*1210.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2110.0/38.0) * exp(-2110.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8614] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3837.0/39.0) * - exp(-3837.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8614] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3837.0/39.0) * exp(-3837.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8615] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3837.0/39.0) * - exp(-3837.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8615] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3837.0/39.0) * exp(-3837.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8616] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*38.0)/(1.0+38.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/38.0) * - exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8616] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*38.0)/(1.0+38.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2400.0/38.0) * exp(-2400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8617] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3780.0/39.0) * - exp(-3780.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8617] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*39.0)/(1.0+39.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3780.0/39.0) * exp(-3780.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8618] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*40.0)/(1.0+40.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4230.0/40.0) * - exp(-4230.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8618] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*40.0)/(1.0+40.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(4230.0/40.0) * exp(-4230.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8619] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*40.0)/(1.0+40.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1950.0/40.0) * - exp(-1950.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8619] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*40.0)/(1.0+40.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(1950.0/40.0) * exp(-1950.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8620] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*41.0)/(1.0+41.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/41.0) * - exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8620] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*41.0)/(1.0+41.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2400.0/41.0) * exp(-2400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8621] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * - exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8621] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8622] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * - exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8622] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8623] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * - exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8623] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8624] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2400.0/42.0) * - exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8624] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*42.0)/(1.0+42.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2400.0/42.0) * exp(-2400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8625] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8625] = opt_rcd * branch * fmax(exp(-1000.0/Tdust), exp(quan * sqrt(((1.0*44.0)/(1.0+44.0))*1000.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(1900.0/44.0) * exp(-1900.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8626] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*43.0)/(1.0+43.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2320.0/43.0) * - exp(-2320.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8626] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*43.0)/(1.0+43.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2320.0/43.0) * exp(-2320.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8627] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*45.0)/(1.0+45.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(2350.0/45.0) * - exp(-2350.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8627] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*45.0)/(1.0+45.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(2350.0/45.0) * exp(-2350.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8628] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*45.0)/(1.0+45.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5120.0/45.0) * - exp(-5120.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8628] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*45.0)/(1.0+45.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(5120.0/45.0) * exp(-5120.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8629] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*48.0)/(1.0+48.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3200.0/48.0) * - exp(-3200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8629] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*48.0)/(1.0+48.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3200.0/48.0) * exp(-3200.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8630] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*49.0)/(1.0+49.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3737.0/49.0) * - exp(-3737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8630] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*49.0)/(1.0+49.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3737.0/49.0) * exp(-3737.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8631] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8631] = opt_rcd * branch * fmax(exp(-1210.0/Tdust), exp(quan * sqrt(((1.0*50.0)/(1.0+50.0))*1210.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4187.0/50.0) * exp(-4187.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8632] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*51.0)/(1.0+51.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4637.0/51.0) * - exp(-4637.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8632] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*51.0)/(1.0+51.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(4637.0/51.0) * exp(-4637.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8633] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*50.0)/(1.0+50.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3200.0/50.0) * - exp(-3200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8633] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*50.0)/(1.0+50.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3200.0/50.0) * exp(-3200.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8634] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8634] = opt_rcd * branch * fmax(exp(-750.0/Tdust), exp(quan * sqrt(((1.0*53.0)/(1.0+53.0))*750.0))) * (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5480.0/53.0) * exp(-5480.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8635] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*54.0)/(1.0+54.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5930.0/54.0) * - exp(-5930.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8635] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*54.0)/(1.0+54.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(5930.0/54.0) * exp(-5930.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8636] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*60.0)/(1.0+60.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4000.0/60.0) * - exp(-4000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8636] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*60.0)/(1.0+60.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8637] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*61.0)/(1.0+61.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4537.0/61.0) * - exp(-4537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8637] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*61.0)/(1.0+61.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(4537.0/61.0) * exp(-4537.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8638] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*72.0)/(1.0+72.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4800.0/72.0) * - exp(-4800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8638] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*72.0)/(1.0+72.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(4800.0/72.0) * exp(-4800.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8639] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*73.0)/(1.0+73.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5337.0/73.0) * - exp(-5337.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8639] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*73.0)/(1.0+73.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(5337.0/73.0) * exp(-5337.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8640] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*74.0)/(1.0+74.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(4800.0/74.0) * - exp(-4800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8640] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*74.0)/(1.0+74.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(4800.0/74.0) * exp(-4800.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8641] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*84.0)/(1.0+84.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(5600.0/84.0) * - exp(-5600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8641] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*84.0)/(1.0+84.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(5600.0/84.0) * exp(-5600.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8642] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*85.0)/(1.0+85.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6137.0/85.0) * - exp(-6137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8642] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*85.0)/(1.0+85.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(6137.0/85.0) * exp(-6137.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8643] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*96.0)/(1.0+96.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6400.0/96.0) * - exp(-6400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8643] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*96.0)/(1.0+96.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(6400.0/96.0) * exp(-6400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8644] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*97.0)/(1.0+97.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6937.0/97.0) * - exp(-6937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8644] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*97.0)/(1.0+97.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(6937.0/97.0) * exp(-6937.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8645] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*98.0)/(1.0+98.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6400.0/98.0) * - exp(-6400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8645] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*98.0)/(1.0+98.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(6400.0/98.0) * exp(-6400.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8646] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*108.0)/(1.0+108.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(7200.0/108.0) - * exp(-7200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens - * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8646] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*108.0)/(1.0+108.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(7200.0/108.0) * exp(-7200.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8647] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*109.0)/(1.0+109.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(7737.0/109.0) - * exp(-7737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens - * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8647] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*109.0)/(1.0+109.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(7737.0/109.0) * exp(-7737.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8648] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*120.0)/(1.0+120.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(8000.0/120.0) - * exp(-8000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens - * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8648] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*120.0)/(1.0+120.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(8000.0/120.0) * exp(-8000.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8649] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*121.0)/(1.0+121.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(8537.0/121.0) - * exp(-8537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens - * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8649] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*121.0)/(1.0+121.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(8537.0/121.0) * exp(-8537.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8650] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*122.0)/(1.0+122.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(8000.0/122.0) - * exp(-8000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens - * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8650] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*122.0)/(1.0+122.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(8000.0/122.0) * exp(-8000.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8651] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*59.0)/(1.0+59.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(3650.0/59.0) * - exp(-3650.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8651] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*59.0)/(1.0+59.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(3650.0/59.0) * exp(-3650.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8652] = branch * fmax(exp(-0.0/Tdust), - exp(quan * sqrt(((1.0*59.0)/(1.0+59.0))*0.0))) * (fmax(freq * - sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * sqrt(600.0/1.0) - * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * sqrt(6230.0/59.0) * - exp(-6230.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8652] = opt_rcd * branch * + fmax(exp(-0.0/Tdust), exp(quan * sqrt(((1.0*59.0)/(1.0+59.0))*0.0))) * + (fmax(freq * sqrt(600.0/1.0) * exp(-600.0*hop/Tdust)/unisites, freq * + sqrt(600.0/1.0) * exp(quan * sqrt(hop*1.0*600.0)) / unisites)+freq * + sqrt(6230.0/59.0) * exp(-6230.0*hop/Tdust)/unisites) * + pow((nMono*densites), 2.0) / gdens * cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8653] = branch * + if (Tgas>=5.0 && Tgas<41000.0) { k[8653] = opt_rcd * branch * fmax(exp(-2500.0/Tdust), exp(quan * sqrt(((2.0*12.0)/(2.0+12.0))*2500.0))) * (fmax(freq * sqrt(430.0/2.0) * exp(-430.0*hop/Tdust)/unisites, freq * sqrt(430.0/2.0) * exp(quan * sqrt(hop*2.0*430.0)) / unisites)+freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * - cov * cov; } + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8654] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8654] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8655] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8655] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8656] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8656] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8657] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8657] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8658] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/30.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8658] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/30.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8659] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8659] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1577.0/15.0) * + exp(-1577.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8660] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8660] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8661] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8661] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8662] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8662] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/24.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8663] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(2137.0/25.0) * exp(-2137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8663] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2137.0/25.0) * + exp(-2137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8664] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8664] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8665] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(3037.0/27.0) * exp(-3037.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8665] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(3037.0/27.0) * + exp(-3037.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8666] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8666] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1100.0/32.0) * + exp(-1100.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8667] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8667] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/36.0) * + exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8668] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8668] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2937.0/37.0) * + exp(-2937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8669] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(2400.0/38.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8669] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/38.0) * + exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8670] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1950.0/40.0) * exp(-1950.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8670] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1950.0/40.0) * + exp(-1950.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8671] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(3200.0/48.0) * exp(-3200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8671] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(3200.0/48.0) * + exp(-3200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8672] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(3737.0/49.0) * exp(-3737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8672] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(3737.0/49.0) * + exp(-3737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8673] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(5320.0/56.0) * exp(-5320.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8673] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(5320.0/56.0) * + exp(-5320.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8674] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8674] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * + exp(-4000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8675] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(4537.0/61.0) * exp(-4537.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8675] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4537.0/61.0) * + exp(-4537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8676] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(4800.0/72.0) * exp(-4800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8676] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4800.0/72.0) * + exp(-4800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8677] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(5337.0/73.0) * exp(-5337.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8677] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(5337.0/73.0) * + exp(-5337.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8678] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(5600.0/84.0) * exp(-5600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8678] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(5600.0/84.0) * + exp(-5600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8679] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(6137.0/85.0) * exp(-6137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8679] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(6137.0/85.0) * + exp(-6137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8680] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(6400.0/96.0) * exp(-6400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8680] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(6400.0/96.0) * + exp(-6400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8681] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(6937.0/97.0) * exp(-6937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8681] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(6937.0/97.0) * + exp(-6937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8682] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(7200.0/108.0) * exp(-7200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8682] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(7200.0/108.0) * + exp(-7200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8683] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(7737.0/109.0) * exp(-7737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8683] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(7737.0/109.0) * + exp(-7737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8684] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/12.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(8000.0/120.0) * exp(-8000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8684] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/12.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(8000.0/120.0) * + exp(-8000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8685] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8685] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8686] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8686] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8687] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8687] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1577.0/15.0) * + exp(-1577.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8688] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8688] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8689] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8689] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8690] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8690] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2850.0/17.0) * + exp(-2850.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8691] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8691] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/24.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8692] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8692] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8693] = branch * exp(-1000.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8693] = opt_rcd * branch * + exp(-1000.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * + exp(-855.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8694] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8694] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1100.0/32.0) * + exp(-1100.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8695] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8695] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/36.0) * + exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8696] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1900.0/44.0) * exp(-1900.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8696] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1900.0/44.0) * + exp(-1900.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8697] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(2600.0/48.0) * exp(-2600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8697] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2600.0/48.0) * + exp(-2600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8698] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8698] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8699] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8699] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8700] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8700] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8701] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8701] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8702] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(800.0/16.0) * exp(-800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8702] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(800.0/16.0) * + exp(-800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8703] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8703] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1600.0/24.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8704] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8704] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(1100.0/32.0) * + exp(-1100.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8705] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8705] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2400.0/36.0) * + exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8706] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8706] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(2937.0/37.0) * + exp(-2937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8707] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8707] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * + exp(-4000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8708] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(4537.0/61.0) * exp(-4537.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8708] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(4537.0/61.0) * + exp(-4537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8709] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(5600.0/84.0) * exp(-5600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8709] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(5600.0/84.0) * + exp(-5600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8710] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(6137.0/85.0) * exp(-6137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8710] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(6137.0/85.0) * + exp(-6137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8711] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(7200.0/108.0) * exp(-7200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8711] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(7200.0/108.0) * + exp(-7200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8712] = branch * exp(-0.0/Tdust) * - (freq * sqrt(800.0/14.0) * exp(-800.0*hop/Tdust)/unisites+freq * - sqrt(7737.0/109.0) * exp(-7737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8712] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(800.0/14.0) * + exp(-800.0*hop/Tdust)/unisites+freq * sqrt(7737.0/109.0) * + exp(-7737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8713] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites+freq * - sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8713] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1100.0/32.0) * + exp(-1100.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8714] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1100.0/32.0) * exp(-1100.0*hop/Tdust)/unisites+freq * - sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8714] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1100.0/32.0) * + exp(-1100.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * + exp(-855.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8715] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8715] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8716] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8716] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8717] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(2354.0/16.0) * exp(-2354.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8717] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(2354.0/16.0) * + exp(-2354.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8718] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8718] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8719] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/24.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8719] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1600.0/24.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8720] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(2137.0/25.0) * exp(-2137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8720] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(2137.0/25.0) * + exp(-2137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8721] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8721] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8722] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(3037.0/27.0) * exp(-3037.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8722] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(3037.0/27.0) * + exp(-3037.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8723] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(3037.0/27.0) * exp(-3037.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8723] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(3037.0/27.0) * + exp(-3037.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8724] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(2400.0/36.0) * exp(-2400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8724] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(2400.0/36.0) * + exp(-2400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8725] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(2937.0/37.0) * exp(-2937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8725] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(2937.0/37.0) * + exp(-2937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8726] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(3200.0/48.0) * exp(-3200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8726] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(3200.0/48.0) * + exp(-3200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8727] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(3737.0/49.0) * exp(-3737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8727] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(3737.0/49.0) * + exp(-3737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8728] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(4000.0/60.0) * exp(-4000.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8728] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(4000.0/60.0) * + exp(-4000.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8729] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(4537.0/61.0) * exp(-4537.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8729] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(4537.0/61.0) * + exp(-4537.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8730] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(4800.0/72.0) * exp(-4800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8730] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(4800.0/72.0) * + exp(-4800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8731] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(5337.0/73.0) * exp(-5337.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8731] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(5337.0/73.0) * + exp(-5337.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8732] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(5600.0/84.0) * exp(-5600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8732] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(5600.0/84.0) * + exp(-5600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8733] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(6137.0/85.0) * exp(-6137.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8733] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(6137.0/85.0) * + exp(-6137.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8734] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(6400.0/96.0) * exp(-6400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8734] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(6400.0/96.0) * + exp(-6400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8735] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(6937.0/97.0) * exp(-6937.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8735] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(6937.0/97.0) * + exp(-6937.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8736] = branch * exp(-0.0/Tdust) * - (freq * sqrt(873.0/13.0) * exp(-873.0*hop/Tdust)/unisites+freq * - sqrt(7737.0/109.0) * exp(-7737.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8736] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(873.0/13.0) * + exp(-873.0*hop/Tdust)/unisites+freq * sqrt(7737.0/109.0) * + exp(-7737.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8737] = branch * exp(-0.0/Tdust) * - (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * - sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8737] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * + exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8738] = branch * exp(-0.0/Tdust) * - (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * - sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8738] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * + exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(2850.0/17.0) * + exp(-2850.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8739] = branch * exp(-3000.0/Tdust) * - (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * - sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8739] = opt_rcd * branch * + exp(-3000.0/Tdust) * (freq * sqrt(2850.0/17.0) * + exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * + exp(-855.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8740] = branch * exp(-0.0/Tdust) * - (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8740] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * + exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8741] = branch * exp(-0.0/Tdust) * - (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * - sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8741] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * + exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8742] = branch * exp(-0.0/Tdust) * - (freq * sqrt(2850.0/17.0) * exp(-2850.0*hop/Tdust)/unisites+freq * - sqrt(2320.0/43.0) * exp(-2320.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8742] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(2850.0/17.0) * + exp(-2850.0*hop/Tdust)/unisites+freq * sqrt(2320.0/43.0) * + exp(-2320.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8743] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites+freq * - sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8743] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1577.0/15.0) * + exp(-1577.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8744] = branch * exp(-3000.0/Tdust) * - (freq * sqrt(1577.0/15.0) * exp(-1577.0*hop/Tdust)/unisites+freq * - sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8744] = opt_rcd * branch * + exp(-3000.0/Tdust) * (freq * sqrt(1577.0/15.0) * + exp(-1577.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * + exp(-855.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8745] = branch * exp(-0.0/Tdust) * - (freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites+freq * - sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8745] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites+freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8746] = branch * exp(-0.0/Tdust) * - (freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites+freq * - sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8746] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8747] = branch * exp(-0.0/Tdust) * - (freq * sqrt(945.0/14.0) * exp(-945.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8747] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(945.0/14.0) * + exp(-945.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8748] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8748] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8749] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/26.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8749] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(1600.0/26.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8750] = branch * exp(-3460.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8750] = opt_rcd * branch * + exp(-3460.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * + exp(-855.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8751] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8751] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8752] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8752] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(2655.0/31.0) * + exp(-2655.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8753] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8753] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(4330.0/31.0) * + exp(-4330.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8754] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(2320.0/43.0) * exp(-2320.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8754] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(2320.0/43.0) * + exp(-2320.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8755] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(5120.0/45.0) * exp(-5120.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8755] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(5120.0/45.0) * + exp(-5120.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8756] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(3200.0/50.0) * exp(-3200.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8756] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(3200.0/50.0) * + exp(-3200.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8757] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(4800.0/74.0) * exp(-4800.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8757] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(4800.0/74.0) * + exp(-4800.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8758] = branch * exp(-0.0/Tdust) * - (freq * sqrt(1018.0/15.0) * exp(-1018.0*hop/Tdust)/unisites+freq * - sqrt(6400.0/98.0) * exp(-6400.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8758] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(1018.0/15.0) * + exp(-1018.0*hop/Tdust)/unisites+freq * sqrt(6400.0/98.0) * + exp(-6400.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8759] = branch * exp(-0.0/Tdust) * - (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8759] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(2655.0/31.0) * + exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8760] = branch * exp(-3000.0/Tdust) * - (freq * sqrt(2655.0/31.0) * exp(-2655.0*hop/Tdust)/unisites+freq * - sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8760] = opt_rcd * branch * + exp(-3000.0/Tdust) * (freq * sqrt(2655.0/31.0) * + exp(-2655.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * + exp(-855.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8761] = branch * exp(-3000.0/Tdust) * - (freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites+freq * - sqrt(855.0/28.0) * exp(-855.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8761] = opt_rcd * branch * + exp(-3000.0/Tdust) * (freq * sqrt(4330.0/31.0) * + exp(-4330.0*hop/Tdust)/unisites+freq * sqrt(855.0/28.0) * + exp(-855.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8762] = branch * exp(-0.0/Tdust) * - (freq * sqrt(4330.0/31.0) * exp(-4330.0*hop/Tdust)/unisites+freq * - sqrt(1600.0/29.0) * exp(-1600.0*hop/Tdust)/unisites) * - pow((nMono*densites), 2.0) / gdens * cov * cov; } + if (Tgas>=5.0 && Tgas<41000.0) { k[8762] = opt_rcd * branch * + exp(-0.0/Tdust) * (freq * sqrt(4330.0/31.0) * + exp(-4330.0*hop/Tdust)/unisites+freq * sqrt(1600.0/29.0) * + exp(-1600.0*hop/Tdust)/unisites) * pow((nMono*densites), 2.0) / gdens * + cov * cov; } - if (Tgas>5.0 && Tgas<41000.0) { k[8763] = pi * rG * rG * - sqrt(8.0*kerg*Tgas/pi/amu/meu); } + if (Tgas>=5.0 && Tgas<41000.0) { k[8763] = pi * rG * rG * + sqrt(8.0*kerg*(Tgas)/pi/amu/meu); } - - k[8273] = 0.0; // clang-format on + return NAUNET_SUCCESS; +} + +// clang-format off +__device__ int EvalHeatingRates(realtype *kh, realtype *y, NaunetData *u_data) { + + + + // clang-format on + + // reaaction rate (k) of each reaction + // clang-format off + + // clang-format on + + return NAUNET_SUCCESS; +} + +// clang-format off +__device__ int EvalCoolingRates(realtype *kc, realtype *y, NaunetData *u_data) { + + + + // clang-format on + + // reaaction rate (k) of each reaction + // clang-format off + + // clang-format on + return NAUNET_SUCCESS; } \ No newline at end of file diff --git a/src/naunet_renorm.cu b/src/naunet_renorm.cu new file mode 100644 index 0000000..5c9d671 --- /dev/null +++ b/src/naunet_renorm.cu @@ -0,0 +1,4567 @@ +#include "naunet_macros.h" +#include "naunet_physics.h" +#include "naunet_renorm.h" + +// clang-format off +__host__ int InitRenorm(realtype *ab, SUNMatrix A) { + // clang-format on + realtype Hnuclei = GetHNuclei(ab); + + // clang-format off + + IJth(A, IDX_ELEM_F, IDX_ELEM_F) = 0.0 + 19.0 * ab[IDX_GHFI] / 20.0 / Hnuclei + + 19.0 * ab[IDX_GFI] / 19.0 / Hnuclei + 19.0 * + ab[IDX_CFII] / 31.0 / Hnuclei + 19.0 * + ab[IDX_HFII] / 20.0 / Hnuclei + 19.0 * + ab[IDX_SiFII] / 47.0 / Hnuclei + 19.0 * + ab[IDX_H2FII] / 21.0 / Hnuclei + 19.0 * + ab[IDX_FII] / 19.0 / Hnuclei + 19.0 * + ab[IDX_FI] / 19.0 / Hnuclei + 19.0 * + ab[IDX_HFI] / 20.0 / Hnuclei; + IJth(A, IDX_ELEM_F, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_P) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_Si) = 0.0 + 28.0 * ab[IDX_SiFII] / 47.0 / Hnuclei; + IJth(A, IDX_ELEM_F, IDX_ELEM_S) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_N) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_O) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_C) = 0.0 + 12.0 * ab[IDX_CFII] / 31.0 / Hnuclei; + IJth(A, IDX_ELEM_F, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_F, IDX_ELEM_H) = 0.0 + 1.0 * ab[IDX_GHFI] / 20.0 / Hnuclei + + 1.0 * ab[IDX_HFII] / 20.0 / Hnuclei + 2.0 * + ab[IDX_H2FII] / 21.0 / Hnuclei + 1.0 * + ab[IDX_HFI] / 20.0 / Hnuclei; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_Cl) = 0.0 + 35.0 * ab[IDX_GCClI] / 47.0 / Hnuclei + + 35.0 * ab[IDX_GClOI] / 51.0 / Hnuclei + + 35.0 * ab[IDX_GHClI] / 36.0 / Hnuclei + 35.0 + * ab[IDX_ClOII] / 51.0 / Hnuclei + 35.0 * + ab[IDX_GClI] / 35.0 / Hnuclei + 35.0 * + ab[IDX_ClOI] / 51.0 / Hnuclei + 35.0 * + ab[IDX_H2CClII] / 49.0 / Hnuclei + 35.0 * + ab[IDX_HClII] / 36.0 / Hnuclei + 35.0 * + ab[IDX_CClII] / 47.0 / Hnuclei + 35.0 * + ab[IDX_CClI] / 47.0 / Hnuclei + 35.0 * + ab[IDX_ClII] / 35.0 / Hnuclei + 35.0 * + ab[IDX_H2ClII] / 37.0 / Hnuclei + 35.0 * + ab[IDX_ClI] / 35.0 / Hnuclei + 35.0 * + ab[IDX_HClI] / 36.0 / Hnuclei; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_P) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_Si) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_S) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_N) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_O) = 0.0 + 16.0 * ab[IDX_GClOI] / 51.0 / Hnuclei + + 16.0 * ab[IDX_ClOII] / 51.0 / Hnuclei + + 16.0 * ab[IDX_ClOI] / 51.0 / Hnuclei; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_C) = 0.0 + 12.0 * ab[IDX_GCClI] / 47.0 / Hnuclei + + 12.0 * ab[IDX_H2CClII] / 49.0 / Hnuclei + + 12.0 * ab[IDX_CClII] / 47.0 / Hnuclei + 12.0 + * ab[IDX_CClI] / 47.0 / Hnuclei; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_Cl, IDX_ELEM_H) = 0.0 + 1.0 * ab[IDX_GHClI] / 36.0 / Hnuclei + + 2.0 * ab[IDX_H2CClII] / 49.0 / Hnuclei + 1.0 + * ab[IDX_HClII] / 36.0 / Hnuclei + 2.0 * + ab[IDX_H2ClII] / 37.0 / Hnuclei + 1.0 * + ab[IDX_HClI] / 36.0 / Hnuclei; + IJth(A, IDX_ELEM_P, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_P, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_P, IDX_ELEM_P) = 0.0 + 31.0 * ab[IDX_GHC2PI] / 56.0 / Hnuclei + + 31.0 * ab[IDX_GHPOI] / 48.0 / Hnuclei + + 31.0 * ab[IDX_GPNI] / 45.0 / Hnuclei + 31.0 + * ab[IDX_GC4PI] / 79.0 / Hnuclei + 31.0 * + ab[IDX_GCH2PHI] / 46.0 / Hnuclei + 31.0 * + ab[IDX_GHCPI] / 44.0 / Hnuclei + 31.0 * + ab[IDX_GPH2I] / 33.0 / Hnuclei + 31.0 * + ab[IDX_GPOI] / 47.0 / Hnuclei + 31.0 * + ab[IDX_GC3PI] / 67.0 / Hnuclei + 31.0 * + ab[IDX_GPHI] / 32.0 / Hnuclei + 31.0 * + ab[IDX_GCCPI] / 55.0 / Hnuclei + 31.0 * + ab[IDX_C4PII] / 79.0 / Hnuclei + 31.0 * + ab[IDX_GCPI] / 43.0 / Hnuclei + 31.0 * + ab[IDX_PC2H4II] / 59.0 / Hnuclei + 31.0 * + ab[IDX_PC2H3II] / 58.0 / Hnuclei + 31.0 * + ab[IDX_PNII] / 45.0 / Hnuclei + 31.0 * + ab[IDX_PNH3II] / 48.0 / Hnuclei + 31.0 * + ab[IDX_GPI] / 31.0 / Hnuclei + 31.0 * + ab[IDX_PCH3II] / 46.0 / Hnuclei + 31.0 * + ab[IDX_PNH2II] / 47.0 / Hnuclei + 31.0 * + ab[IDX_HPNII] / 46.0 / Hnuclei + 31.0 * + ab[IDX_PC3HII] / 68.0 / Hnuclei + 31.0 * + ab[IDX_PCH4II] / 47.0 / Hnuclei + 31.0 * + ab[IDX_CCPII] / 55.0 / Hnuclei + 31.0 * + ab[IDX_H2POII] / 49.0 / Hnuclei + 31.0 * + ab[IDX_PC2H2II] / 57.0 / Hnuclei + 31.0 * + ab[IDX_PC4HII] / 80.0 / Hnuclei + 31.0 * + ab[IDX_PH3II] / 34.0 / Hnuclei + 31.0 * + ab[IDX_CPII] / 43.0 / Hnuclei + 31.0 * + ab[IDX_HC2PII] / 56.0 / Hnuclei + 31.0 * + ab[IDX_PCH2II] / 45.0 / Hnuclei + 31.0 * + ab[IDX_HCPII] / 44.0 / Hnuclei + 31.0 * + ab[IDX_HPOII] / 48.0 / Hnuclei + 31.0 * + ab[IDX_CH2PHI] / 46.0 / Hnuclei + 31.0 * + ab[IDX_HPOI] / 48.0 / Hnuclei + 31.0 * + ab[IDX_POII] / 47.0 / Hnuclei + 31.0 * + ab[IDX_PH2I] / 33.0 / Hnuclei + 31.0 * + ab[IDX_PNI] / 45.0 / Hnuclei + 31.0 * + ab[IDX_C4PI] / 79.0 / Hnuclei + 31.0 * + ab[IDX_HCPI] / 44.0 / Hnuclei + 31.0 * + ab[IDX_C3PI] / 67.0 / Hnuclei + 31.0 * + ab[IDX_PH2II] / 33.0 / Hnuclei + 31.0 * + ab[IDX_POI] / 47.0 / Hnuclei + 31.0 * + ab[IDX_HC2PI] / 56.0 / Hnuclei + 31.0 * + ab[IDX_CCPI] / 55.0 / Hnuclei + 31.0 * + ab[IDX_CPI] / 43.0 / Hnuclei + 31.0 * + ab[IDX_PHI] / 32.0 / Hnuclei + 31.0 * + ab[IDX_PHII] / 32.0 / Hnuclei + 31.0 * + ab[IDX_PII] / 31.0 / Hnuclei + 31.0 * + ab[IDX_PI] / 31.0 / Hnuclei; + IJth(A, IDX_ELEM_P, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_P, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_P, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_P, IDX_ELEM_Si) = 0.0; + IJth(A, IDX_ELEM_P, IDX_ELEM_S) = 0.0; + IJth(A, IDX_ELEM_P, IDX_ELEM_N) = 0.0 + 14.0 * ab[IDX_GPNI] / 45.0 / Hnuclei + + 14.0 * ab[IDX_PNII] / 45.0 / Hnuclei + 14.0 + * ab[IDX_PNH3II] / 48.0 / Hnuclei + 14.0 * + ab[IDX_PNH2II] / 47.0 / Hnuclei + 14.0 * + ab[IDX_HPNII] / 46.0 / Hnuclei + 14.0 * + ab[IDX_PNI] / 45.0 / Hnuclei; + IJth(A, IDX_ELEM_P, IDX_ELEM_O) = 0.0 + 16.0 * ab[IDX_GHPOI] / 48.0 / Hnuclei + + 16.0 * ab[IDX_GPOI] / 47.0 / Hnuclei + + 16.0 * ab[IDX_H2POII] / 49.0 / Hnuclei + + 16.0 * ab[IDX_HPOII] / 48.0 / Hnuclei + 16.0 + * ab[IDX_HPOI] / 48.0 / Hnuclei + 16.0 * + ab[IDX_POII] / 47.0 / Hnuclei + 16.0 * + ab[IDX_POI] / 47.0 / Hnuclei; + IJth(A, IDX_ELEM_P, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_P, IDX_ELEM_C) = 0.0 + 24.0 * ab[IDX_GHC2PI] / 56.0 / Hnuclei + + 48.0 * ab[IDX_GC4PI] / 79.0 / Hnuclei + + 12.0 * ab[IDX_GCH2PHI] / 46.0 / Hnuclei + + 12.0 * ab[IDX_GHCPI] / 44.0 / Hnuclei + 36.0 + * ab[IDX_GC3PI] / 67.0 / Hnuclei + 24.0 * + ab[IDX_GCCPI] / 55.0 / Hnuclei + 48.0 * + ab[IDX_C4PII] / 79.0 / Hnuclei + 12.0 * + ab[IDX_GCPI] / 43.0 / Hnuclei + 24.0 * + ab[IDX_PC2H4II] / 59.0 / Hnuclei + 24.0 * + ab[IDX_PC2H3II] / 58.0 / Hnuclei + 12.0 * + ab[IDX_PCH3II] / 46.0 / Hnuclei + 36.0 * + ab[IDX_PC3HII] / 68.0 / Hnuclei + 12.0 * + ab[IDX_PCH4II] / 47.0 / Hnuclei + 24.0 * + ab[IDX_CCPII] / 55.0 / Hnuclei + 24.0 * + ab[IDX_PC2H2II] / 57.0 / Hnuclei + 48.0 * + ab[IDX_PC4HII] / 80.0 / Hnuclei + 12.0 * + ab[IDX_CPII] / 43.0 / Hnuclei + 24.0 * + ab[IDX_HC2PII] / 56.0 / Hnuclei + 12.0 * + ab[IDX_PCH2II] / 45.0 / Hnuclei + 12.0 * + ab[IDX_HCPII] / 44.0 / Hnuclei + 12.0 * + ab[IDX_CH2PHI] / 46.0 / Hnuclei + 48.0 * + ab[IDX_C4PI] / 79.0 / Hnuclei + 12.0 * + ab[IDX_HCPI] / 44.0 / Hnuclei + 36.0 * + ab[IDX_C3PI] / 67.0 / Hnuclei + 24.0 * + ab[IDX_HC2PI] / 56.0 / Hnuclei + 24.0 * + ab[IDX_CCPI] / 55.0 / Hnuclei + 12.0 * + ab[IDX_CPI] / 43.0 / Hnuclei; + IJth(A, IDX_ELEM_P, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_P, IDX_ELEM_H) = 0.0 + 1.0 * ab[IDX_GHC2PI] / 56.0 / Hnuclei + + 1.0 * ab[IDX_GHPOI] / 48.0 / Hnuclei + 3.0 + * ab[IDX_GCH2PHI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_GHCPI] / 44.0 / Hnuclei + 2.0 * + ab[IDX_GPH2I] / 33.0 / Hnuclei + 1.0 * + ab[IDX_GPHI] / 32.0 / Hnuclei + 4.0 * + ab[IDX_PC2H4II] / 59.0 / Hnuclei + 3.0 * + ab[IDX_PC2H3II] / 58.0 / Hnuclei + 3.0 * + ab[IDX_PNH3II] / 48.0 / Hnuclei + 3.0 * + ab[IDX_PCH3II] / 46.0 / Hnuclei + 2.0 * + ab[IDX_PNH2II] / 47.0 / Hnuclei + 1.0 * + ab[IDX_HPNII] / 46.0 / Hnuclei + 1.0 * + ab[IDX_PC3HII] / 68.0 / Hnuclei + 4.0 * + ab[IDX_PCH4II] / 47.0 / Hnuclei + 2.0 * + ab[IDX_H2POII] / 49.0 / Hnuclei + 2.0 * + ab[IDX_PC2H2II] / 57.0 / Hnuclei + 1.0 * + ab[IDX_PC4HII] / 80.0 / Hnuclei + 3.0 * + ab[IDX_PH3II] / 34.0 / Hnuclei + 1.0 * + ab[IDX_HC2PII] / 56.0 / Hnuclei + 2.0 * + ab[IDX_PCH2II] / 45.0 / Hnuclei + 1.0 * + ab[IDX_HCPII] / 44.0 / Hnuclei + 1.0 * + ab[IDX_HPOII] / 48.0 / Hnuclei + 3.0 * + ab[IDX_CH2PHI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HPOI] / 48.0 / Hnuclei + 2.0 * + ab[IDX_PH2I] / 33.0 / Hnuclei + 1.0 * + ab[IDX_HCPI] / 44.0 / Hnuclei + 2.0 * + ab[IDX_PH2II] / 33.0 / Hnuclei + 1.0 * + ab[IDX_HC2PI] / 56.0 / Hnuclei + 1.0 * + ab[IDX_PHI] / 32.0 / Hnuclei + 1.0 * + ab[IDX_PHII] / 32.0 / Hnuclei; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_P) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_Fe) = 0.0 + 56.0 * ab[IDX_GFeI] / 56.0 / Hnuclei + + 56.0 * ab[IDX_FeII] / 56.0 / Hnuclei + 56.0 + * ab[IDX_FeI] / 56.0 / Hnuclei; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_Si) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_S) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_N) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_O) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_C) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_Fe, IDX_ELEM_H) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_P) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_Mg) = 0.0 + 24.0 * ab[IDX_GMgI] / 24.0 / Hnuclei + + 24.0 * ab[IDX_MgII] / 24.0 / Hnuclei + 24.0 + * ab[IDX_MgI] / 24.0 / Hnuclei; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_Si) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_S) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_N) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_O) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_C) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_Mg, IDX_ELEM_H) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_P) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_Na) = 0.0 + 23.0 * ab[IDX_GNaI] / 23.0 / Hnuclei + + 23.0 * ab[IDX_NaII] / 23.0 / Hnuclei + 23.0 + * ab[IDX_NaI] / 23.0 / Hnuclei; + IJth(A, IDX_ELEM_Na, IDX_ELEM_Si) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_S) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_N) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_O) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_C) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_Na, IDX_ELEM_H) = 0.0; + IJth(A, IDX_ELEM_Si, IDX_ELEM_F) = 0.0 + 19.0 * ab[IDX_SiFII] / 47.0 / Hnuclei; + IJth(A, IDX_ELEM_Si, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_Si, IDX_ELEM_P) = 0.0; + IJth(A, IDX_ELEM_Si, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_Si, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_Si, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_Si, IDX_ELEM_Si) = 0.0 + 28.0 * ab[IDX_GHNSiI] / 43.0 / Hnuclei + + 28.0 * ab[IDX_GSiC3HI] / 65.0 / Hnuclei + + 28.0 * ab[IDX_GSiCH3I] / 43.0 / Hnuclei + + 28.0 * ab[IDX_GSiO2I] / 60.0 / Hnuclei + + 28.0 * ab[IDX_GSiSI] / 60.0 / Hnuclei + 28.0 + * ab[IDX_GH2SiOI] / 46.0 / Hnuclei + 28.0 * + ab[IDX_GSiC2HI] / 53.0 / Hnuclei + 28.0 * + ab[IDX_GSiC2H2I] / 54.0 / Hnuclei + 28.0 * + ab[IDX_GSiC4I] / 76.0 / Hnuclei + 28.0 * + ab[IDX_GSiNCI] / 54.0 / Hnuclei + 28.0 * + ab[IDX_GHCSiI] / 41.0 / Hnuclei + 28.0 * + ab[IDX_GSiH4I] / 32.0 / Hnuclei + 28.0 * + ab[IDX_GSiC3I] / 64.0 / Hnuclei + 28.0 * + ab[IDX_GSiH3I] / 31.0 / Hnuclei + 28.0 * + ab[IDX_GSiNI] / 42.0 / Hnuclei + 28.0 * + ab[IDX_GSiOI] / 44.0 / Hnuclei + 28.0 * + ab[IDX_GSiCH2I] / 42.0 / Hnuclei + 28.0 * + ab[IDX_GSiHI] / 29.0 / Hnuclei + 28.0 * + ab[IDX_GSiH2I] / 30.0 / Hnuclei + 28.0 * + ab[IDX_SiFII] / 47.0 / Hnuclei + 28.0 * + ab[IDX_GSiCI] / 40.0 / Hnuclei + 28.0 * + ab[IDX_GSiC2I] / 52.0 / Hnuclei + 28.0 * + ab[IDX_HSiO2II] / 61.0 / Hnuclei + 28.0 * + ab[IDX_H2SiOII] / 46.0 / Hnuclei + 28.0 * + ab[IDX_H3SiOII] / 47.0 / Hnuclei + 28.0 * + ab[IDX_SiH4II] / 32.0 / Hnuclei + 28.0 * + ab[IDX_SiO2I] / 60.0 / Hnuclei + 28.0 * + ab[IDX_SiC3H2II] / 66.0 / Hnuclei + 28.0 * + ab[IDX_SiC4II] / 76.0 / Hnuclei + 28.0 * + ab[IDX_SiC4HII] / 77.0 / Hnuclei + 28.0 * + ab[IDX_SiH5II] / 33.0 / Hnuclei + 28.0 * + ab[IDX_SiNCHII] / 55.0 / Hnuclei + 28.0 * + ab[IDX_HNSiII] / 43.0 / Hnuclei + 28.0 * + ab[IDX_SiCH4II] / 44.0 / Hnuclei + 28.0 * + ab[IDX_SiC2H3II] / 55.0 / Hnuclei + 28.0 * + ab[IDX_SiC3HI] / 65.0 / Hnuclei + 28.0 * + ab[IDX_SiCH3II] / 43.0 / Hnuclei + 28.0 * + ab[IDX_SiNH2II] / 44.0 / Hnuclei + 28.0 * + ab[IDX_HSiSII] / 61.0 / Hnuclei + 28.0 * + ab[IDX_SiNII] / 42.0 / Hnuclei + 28.0 * + ab[IDX_H2SiOI] / 46.0 / Hnuclei + 28.0 * + ab[IDX_SiC4I] / 76.0 / Hnuclei + 28.0 * + ab[IDX_SiNCI] / 54.0 / Hnuclei + 28.0 * + ab[IDX_SiNCII] / 54.0 / Hnuclei + 28.0 * + ab[IDX_HNSiI] / 43.0 / Hnuclei + 28.0 * + ab[IDX_SiC2H2I] / 54.0 / Hnuclei + 28.0 * + ab[IDX_SiC3II] / 64.0 / Hnuclei + 28.0 * + ab[IDX_GSiI] / 28.0 / Hnuclei + 28.0 * + ab[IDX_SiC3HII] / 65.0 / Hnuclei + 28.0 * + ab[IDX_SiCH3I] / 43.0 / Hnuclei + 28.0 * + ab[IDX_SiC2II] / 52.0 / Hnuclei + 28.0 * + ab[IDX_SiC2H2II] / 54.0 / Hnuclei + 28.0 * + ab[IDX_SiC2HI] / 53.0 / Hnuclei + 28.0 * + ab[IDX_SiC3I] / 64.0 / Hnuclei + 28.0 * + ab[IDX_SiCII] / 40.0 / Hnuclei + 28.0 * + ab[IDX_HCSiI] / 41.0 / Hnuclei + 28.0 * + ab[IDX_SiCH2I] / 42.0 / Hnuclei + 28.0 * + ab[IDX_HCSiII] / 41.0 / Hnuclei + 28.0 * + ab[IDX_SiC2I] / 52.0 / Hnuclei + 28.0 * + ab[IDX_SiNI] / 42.0 / Hnuclei + 28.0 * + ab[IDX_SiC2HII] / 53.0 / Hnuclei + 28.0 * + ab[IDX_SiH2I] / 30.0 / Hnuclei + 28.0 * + ab[IDX_SiH2II] / 30.0 / Hnuclei + 28.0 * + ab[IDX_SiH3II] / 31.0 / Hnuclei + 28.0 * + ab[IDX_SiCI] / 40.0 / Hnuclei + 28.0 * + ab[IDX_SiH3I] / 31.0 / Hnuclei + 28.0 * + ab[IDX_SiCH2II] / 42.0 / Hnuclei + 28.0 * + ab[IDX_SiHII] / 29.0 / Hnuclei + 28.0 * + ab[IDX_SiHI] / 29.0 / Hnuclei + 28.0 * + ab[IDX_SiH4I] / 32.0 / Hnuclei + 28.0 * + ab[IDX_SiSII] / 60.0 / Hnuclei + 28.0 * + ab[IDX_SiSI] / 60.0 / Hnuclei + 28.0 * + ab[IDX_SiOII] / 44.0 / Hnuclei + 28.0 * + ab[IDX_SiOHII] / 45.0 / Hnuclei + 28.0 * + ab[IDX_SiOI] / 44.0 / Hnuclei + 28.0 * + ab[IDX_SiII] / 28.0 / Hnuclei + 28.0 * + ab[IDX_SiI] / 28.0 / Hnuclei; + IJth(A, IDX_ELEM_Si, IDX_ELEM_S) = 0.0 + 32.0 * ab[IDX_GSiSI] / 60.0 / Hnuclei + + 32.0 * ab[IDX_HSiSII] / 61.0 / Hnuclei + + 32.0 * ab[IDX_SiSII] / 60.0 / Hnuclei + 32.0 + * ab[IDX_SiSI] / 60.0 / Hnuclei; + IJth(A, IDX_ELEM_Si, IDX_ELEM_N) = 0.0 + 14.0 * ab[IDX_GHNSiI] / 43.0 / Hnuclei + + 14.0 * ab[IDX_GSiNCI] / 54.0 / Hnuclei + + 14.0 * ab[IDX_GSiNI] / 42.0 / Hnuclei + 14.0 + * ab[IDX_SiNCHII] / 55.0 / Hnuclei + 14.0 * + ab[IDX_HNSiII] / 43.0 / Hnuclei + 14.0 * + ab[IDX_SiNH2II] / 44.0 / Hnuclei + 14.0 * + ab[IDX_SiNII] / 42.0 / Hnuclei + 14.0 * + ab[IDX_SiNCI] / 54.0 / Hnuclei + 14.0 * + ab[IDX_SiNCII] / 54.0 / Hnuclei + 14.0 * + ab[IDX_HNSiI] / 43.0 / Hnuclei + 14.0 * + ab[IDX_SiNI] / 42.0 / Hnuclei; + IJth(A, IDX_ELEM_Si, IDX_ELEM_O) = 0.0 + 32.0 * ab[IDX_GSiO2I] / 60.0 / Hnuclei + + 16.0 * ab[IDX_GH2SiOI] / 46.0 / Hnuclei + + 16.0 * ab[IDX_GSiOI] / 44.0 / Hnuclei + 32.0 + * ab[IDX_HSiO2II] / 61.0 / Hnuclei + 16.0 * + ab[IDX_H2SiOII] / 46.0 / Hnuclei + 16.0 * + ab[IDX_H3SiOII] / 47.0 / Hnuclei + 32.0 * + ab[IDX_SiO2I] / 60.0 / Hnuclei + 16.0 * + ab[IDX_H2SiOI] / 46.0 / Hnuclei + 16.0 * + ab[IDX_SiOII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_SiOHII] / 45.0 / Hnuclei + 16.0 * + ab[IDX_SiOI] / 44.0 / Hnuclei; + IJth(A, IDX_ELEM_Si, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_Si, IDX_ELEM_C) = 0.0 + 36.0 * ab[IDX_GSiC3HI] / 65.0 / + Hnuclei + 12.0 * ab[IDX_GSiCH3I] / 43.0 / + Hnuclei + 24.0 * ab[IDX_GSiC2HI] / 53.0 / + Hnuclei + 24.0 * ab[IDX_GSiC2H2I] / 54.0 / + Hnuclei + 48.0 * ab[IDX_GSiC4I] / 76.0 / + Hnuclei + 12.0 * ab[IDX_GSiNCI] / 54.0 / + Hnuclei + 12.0 * ab[IDX_GHCSiI] / 41.0 / + Hnuclei + 36.0 * ab[IDX_GSiC3I] / 64.0 / + Hnuclei + 12.0 * ab[IDX_GSiCH2I] / 42.0 / + Hnuclei + 12.0 * ab[IDX_GSiCI] / 40.0 / + Hnuclei + 24.0 * ab[IDX_GSiC2I] / 52.0 / + Hnuclei + 36.0 * ab[IDX_SiC3H2II] / 66.0 / + Hnuclei + 48.0 * ab[IDX_SiC4II] / 76.0 / + Hnuclei + 48.0 * ab[IDX_SiC4HII] / 77.0 / + Hnuclei + 12.0 * ab[IDX_SiNCHII] / 55.0 / + Hnuclei + 12.0 * ab[IDX_SiCH4II] / 44.0 / + Hnuclei + 24.0 * ab[IDX_SiC2H3II] / 55.0 / + Hnuclei + 36.0 * ab[IDX_SiC3HI] / 65.0 / + Hnuclei + 12.0 * ab[IDX_SiCH3II] / 43.0 / + Hnuclei + 48.0 * ab[IDX_SiC4I] / 76.0 / + Hnuclei + 12.0 * ab[IDX_SiNCI] / 54.0 / + Hnuclei + 12.0 * ab[IDX_SiNCII] / 54.0 / + Hnuclei + 24.0 * ab[IDX_SiC2H2I] / 54.0 / + Hnuclei + 36.0 * ab[IDX_SiC3II] / 64.0 / + Hnuclei + 36.0 * ab[IDX_SiC3HII] / 65.0 / + Hnuclei + 12.0 * ab[IDX_SiCH3I] / 43.0 / + Hnuclei + 24.0 * ab[IDX_SiC2II] / 52.0 / + Hnuclei + 24.0 * ab[IDX_SiC2H2II] / 54.0 / + Hnuclei + 24.0 * ab[IDX_SiC2HI] / 53.0 / + Hnuclei + 36.0 * ab[IDX_SiC3I] / 64.0 / + Hnuclei + 12.0 * ab[IDX_SiCII] / 40.0 / + Hnuclei + 12.0 * ab[IDX_HCSiI] / 41.0 / + Hnuclei + 12.0 * ab[IDX_SiCH2I] / 42.0 / + Hnuclei + 12.0 * ab[IDX_HCSiII] / 41.0 / + Hnuclei + 24.0 * ab[IDX_SiC2I] / 52.0 / + Hnuclei + 24.0 * ab[IDX_SiC2HII] / 53.0 / + Hnuclei + 12.0 * ab[IDX_SiCI] / 40.0 / + Hnuclei + 12.0 * ab[IDX_SiCH2II] / 42.0 / + Hnuclei; + IJth(A, IDX_ELEM_Si, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_Si, IDX_ELEM_H) = 0.0 + 1.0 * ab[IDX_GHNSiI] / 43.0 / Hnuclei + + 1.0 * ab[IDX_GSiC3HI] / 65.0 / Hnuclei + + 3.0 * ab[IDX_GSiCH3I] / 43.0 / Hnuclei + 2.0 + * ab[IDX_GH2SiOI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_GSiC2HI] / 53.0 / Hnuclei + 2.0 * + ab[IDX_GSiC2H2I] / 54.0 / Hnuclei + 1.0 * + ab[IDX_GHCSiI] / 41.0 / Hnuclei + 4.0 * + ab[IDX_GSiH4I] / 32.0 / Hnuclei + 3.0 * + ab[IDX_GSiH3I] / 31.0 / Hnuclei + 2.0 * + ab[IDX_GSiCH2I] / 42.0 / Hnuclei + 1.0 * + ab[IDX_GSiHI] / 29.0 / Hnuclei + 2.0 * + ab[IDX_GSiH2I] / 30.0 / Hnuclei + 1.0 * + ab[IDX_HSiO2II] / 61.0 / Hnuclei + 2.0 * + ab[IDX_H2SiOII] / 46.0 / Hnuclei + 3.0 * + ab[IDX_H3SiOII] / 47.0 / Hnuclei + 4.0 * + ab[IDX_SiH4II] / 32.0 / Hnuclei + 2.0 * + ab[IDX_SiC3H2II] / 66.0 / Hnuclei + 1.0 * + ab[IDX_SiC4HII] / 77.0 / Hnuclei + 5.0 * + ab[IDX_SiH5II] / 33.0 / Hnuclei + 1.0 * + ab[IDX_SiNCHII] / 55.0 / Hnuclei + 1.0 * + ab[IDX_HNSiII] / 43.0 / Hnuclei + 4.0 * + ab[IDX_SiCH4II] / 44.0 / Hnuclei + 3.0 * + ab[IDX_SiC2H3II] / 55.0 / Hnuclei + 1.0 * + ab[IDX_SiC3HI] / 65.0 / Hnuclei + 3.0 * + ab[IDX_SiCH3II] / 43.0 / Hnuclei + 2.0 * + ab[IDX_SiNH2II] / 44.0 / Hnuclei + 1.0 * + ab[IDX_HSiSII] / 61.0 / Hnuclei + 2.0 * + ab[IDX_H2SiOI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HNSiI] / 43.0 / Hnuclei + 2.0 * + ab[IDX_SiC2H2I] / 54.0 / Hnuclei + 1.0 * + ab[IDX_SiC3HII] / 65.0 / Hnuclei + 3.0 * + ab[IDX_SiCH3I] / 43.0 / Hnuclei + 2.0 * + ab[IDX_SiC2H2II] / 54.0 / Hnuclei + 1.0 * + ab[IDX_SiC2HI] / 53.0 / Hnuclei + 1.0 * + ab[IDX_HCSiI] / 41.0 / Hnuclei + 2.0 * + ab[IDX_SiCH2I] / 42.0 / Hnuclei + 1.0 * + ab[IDX_HCSiII] / 41.0 / Hnuclei + 1.0 * + ab[IDX_SiC2HII] / 53.0 / Hnuclei + 2.0 * + ab[IDX_SiH2I] / 30.0 / Hnuclei + 2.0 * + ab[IDX_SiH2II] / 30.0 / Hnuclei + 3.0 * + ab[IDX_SiH3II] / 31.0 / Hnuclei + 3.0 * + ab[IDX_SiH3I] / 31.0 / Hnuclei + 2.0 * + ab[IDX_SiCH2II] / 42.0 / Hnuclei + 1.0 * + ab[IDX_SiHII] / 29.0 / Hnuclei + 1.0 * + ab[IDX_SiHI] / 29.0 / Hnuclei + 4.0 * + ab[IDX_SiH4I] / 32.0 / Hnuclei + 1.0 * + ab[IDX_SiOHII] / 45.0 / Hnuclei; + IJth(A, IDX_ELEM_S, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_S, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_S, IDX_ELEM_P) = 0.0; + IJth(A, IDX_ELEM_S, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_S, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_S, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_S, IDX_ELEM_Si) = 0.0 + 28.0 * ab[IDX_GSiSI] / 60.0 / Hnuclei + + 28.0 * ab[IDX_HSiSII] / 61.0 / Hnuclei + + 28.0 * ab[IDX_SiSII] / 60.0 / Hnuclei + 28.0 + * ab[IDX_SiSI] / 60.0 / Hnuclei; + IJth(A, IDX_ELEM_S, IDX_ELEM_S) = 0.0 + 128.0 * ab[IDX_GH2S2I] / 66.0 / + Hnuclei + 32.0 * ab[IDX_GC4SI] / 80.0 / + Hnuclei + 32.0 * ab[IDX_GSiSI] / 60.0 / + Hnuclei + 128.0 * ab[IDX_GS2I] / 64.0 / + Hnuclei + 32.0 * ab[IDX_GC3SI] / 68.0 / + Hnuclei + 32.0 * ab[IDX_GH2SI] / 34.0 / + Hnuclei + 128.0 * ab[IDX_GHS2I] / 65.0 / + Hnuclei + 32.0 * ab[IDX_GSO2I] / 64.0 / + Hnuclei + 32.0 * ab[IDX_GC2SI] / 56.0 / + Hnuclei + 32.0 * ab[IDX_GH2CSI] / 46.0 / + Hnuclei + 32.0 * ab[IDX_GHCSI] / 45.0 / + Hnuclei + 32.0 * ab[IDX_GOCSI] / 60.0 / + Hnuclei + 32.0 * ab[IDX_GSOI] / 48.0 / + Hnuclei + 32.0 * ab[IDX_GNSI] / 46.0 / + Hnuclei + 32.0 * ab[IDX_HNSII] / 47.0 / + Hnuclei + 32.0 * ab[IDX_HSOII] / 49.0 / + Hnuclei + 32.0 * ab[IDX_CH3CSII] / 59.0 / + Hnuclei + 128.0 * ab[IDX_H3S2II] / 67.0 / + Hnuclei + 32.0 * ab[IDX_C2SII] / 56.0 / + Hnuclei + 32.0 * ab[IDX_C3SII] / 68.0 / + Hnuclei + 32.0 * ab[IDX_HSO2II] / 65.0 / + Hnuclei + 32.0 * ab[IDX_GCSI] / 44.0 / + Hnuclei + 32.0 * ab[IDX_GHSI] / 33.0 / + Hnuclei + 128.0 * ab[IDX_H2S2I] / 66.0 / + Hnuclei + 32.0 * ab[IDX_HOCSII] / 61.0 / + Hnuclei + 32.0 * ab[IDX_NSII] / 46.0 / + Hnuclei + 32.0 * ab[IDX_HC4SII] / 81.0 / + Hnuclei + 128.0 * ab[IDX_H2S2II] / 66.0 / + Hnuclei + 32.0 * ab[IDX_HSiSII] / 61.0 / + Hnuclei + 32.0 * ab[IDX_SO2II] / 64.0 / + Hnuclei + 32.0 * ab[IDX_H3CSII] / 47.0 / + Hnuclei + 32.0 * ab[IDX_HC3SII] / 69.0 / + Hnuclei + 128.0 * ab[IDX_HS2II] / 65.0 / + Hnuclei + 128.0 * ab[IDX_HS2I] / 65.0 / + Hnuclei + 32.0 * ab[IDX_H2CSII] / 46.0 / + Hnuclei + 32.0 * ab[IDX_H2CSI] / 46.0 / + Hnuclei + 128.0 * ab[IDX_S2I] / 64.0 / + Hnuclei + 128.0 * ab[IDX_S2II] / 64.0 / + Hnuclei + 32.0 * ab[IDX_C3SI] / 68.0 / + Hnuclei + 32.0 * ab[IDX_OCSII] / 60.0 / + Hnuclei + 32.0 * ab[IDX_GSI] / 32.0 / + Hnuclei + 32.0 * ab[IDX_HCSI] / 45.0 / + Hnuclei + 32.0 * ab[IDX_NSI] / 46.0 / + Hnuclei + 32.0 * ab[IDX_SO2I] / 64.0 / + Hnuclei + 32.0 * ab[IDX_HCSII] / 45.0 / + Hnuclei + 32.0 * ab[IDX_CSII] / 44.0 / + Hnuclei + 32.0 * ab[IDX_H3SII] / 35.0 / + Hnuclei + 32.0 * ab[IDX_C4SII] / 80.0 / + Hnuclei + 32.0 * ab[IDX_HSII] / 33.0 / + Hnuclei + 32.0 * ab[IDX_OCSI] / 60.0 / + Hnuclei + 32.0 * ab[IDX_SM] / 32.0 / Hnuclei + + 32.0 * ab[IDX_SiSII] / 60.0 / Hnuclei + + 32.0 * ab[IDX_HC2SII] / 57.0 / Hnuclei + + 32.0 * ab[IDX_C4SI] / 80.0 / Hnuclei + 32.0 + * ab[IDX_HSI] / 33.0 / Hnuclei + 32.0 * + ab[IDX_CSI] / 44.0 / Hnuclei + 32.0 * + ab[IDX_SiSI] / 60.0 / Hnuclei + 32.0 * + ab[IDX_C2SI] / 56.0 / Hnuclei + 32.0 * + ab[IDX_SOI] / 48.0 / Hnuclei + 32.0 * + ab[IDX_SOII] / 48.0 / Hnuclei + 32.0 * + ab[IDX_H2SII] / 34.0 / Hnuclei + 32.0 * + ab[IDX_H2SI] / 34.0 / Hnuclei + 32.0 * + ab[IDX_SII] / 32.0 / Hnuclei + 32.0 * + ab[IDX_SI] / 32.0 / Hnuclei; + IJth(A, IDX_ELEM_S, IDX_ELEM_N) = 0.0 + 14.0 * ab[IDX_GNSI] / 46.0 / Hnuclei + + 14.0 * ab[IDX_HNSII] / 47.0 / Hnuclei + 14.0 + * ab[IDX_NSII] / 46.0 / Hnuclei + 14.0 * + ab[IDX_NSI] / 46.0 / Hnuclei; + IJth(A, IDX_ELEM_S, IDX_ELEM_O) = 0.0 + 32.0 * ab[IDX_GSO2I] / 64.0 / Hnuclei + + 16.0 * ab[IDX_GOCSI] / 60.0 / Hnuclei + + 16.0 * ab[IDX_GSOI] / 48.0 / Hnuclei + 16.0 + * ab[IDX_HSOII] / 49.0 / Hnuclei + 32.0 * + ab[IDX_HSO2II] / 65.0 / Hnuclei + 16.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 32.0 * + ab[IDX_SO2II] / 64.0 / Hnuclei + 16.0 * + ab[IDX_OCSII] / 60.0 / Hnuclei + 32.0 * + ab[IDX_SO2I] / 64.0 / Hnuclei + 16.0 * + ab[IDX_OCSI] / 60.0 / Hnuclei + 16.0 * + ab[IDX_SOI] / 48.0 / Hnuclei + 16.0 * + ab[IDX_SOII] / 48.0 / Hnuclei; + IJth(A, IDX_ELEM_S, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_S, IDX_ELEM_C) = 0.0 + 48.0 * ab[IDX_GC4SI] / 80.0 / Hnuclei + + 36.0 * ab[IDX_GC3SI] / 68.0 / Hnuclei + + 24.0 * ab[IDX_GC2SI] / 56.0 / Hnuclei + 12.0 + * ab[IDX_GH2CSI] / 46.0 / Hnuclei + 12.0 * + ab[IDX_GHCSI] / 45.0 / Hnuclei + 12.0 * + ab[IDX_GOCSI] / 60.0 / Hnuclei + 24.0 * + ab[IDX_CH3CSII] / 59.0 / Hnuclei + 24.0 * + ab[IDX_C2SII] / 56.0 / Hnuclei + 36.0 * + ab[IDX_C3SII] / 68.0 / Hnuclei + 12.0 * + ab[IDX_GCSI] / 44.0 / Hnuclei + 12.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 48.0 * + ab[IDX_HC4SII] / 81.0 / Hnuclei + 12.0 * + ab[IDX_H3CSII] / 47.0 / Hnuclei + 36.0 * + ab[IDX_HC3SII] / 69.0 / Hnuclei + 12.0 * + ab[IDX_H2CSII] / 46.0 / Hnuclei + 12.0 * + ab[IDX_H2CSI] / 46.0 / Hnuclei + 36.0 * + ab[IDX_C3SI] / 68.0 / Hnuclei + 12.0 * + ab[IDX_OCSII] / 60.0 / Hnuclei + 12.0 * + ab[IDX_HCSI] / 45.0 / Hnuclei + 12.0 * + ab[IDX_HCSII] / 45.0 / Hnuclei + 12.0 * + ab[IDX_CSII] / 44.0 / Hnuclei + 48.0 * + ab[IDX_C4SII] / 80.0 / Hnuclei + 12.0 * + ab[IDX_OCSI] / 60.0 / Hnuclei + 24.0 * + ab[IDX_HC2SII] / 57.0 / Hnuclei + 48.0 * + ab[IDX_C4SI] / 80.0 / Hnuclei + 12.0 * + ab[IDX_CSI] / 44.0 / Hnuclei + 24.0 * + ab[IDX_C2SI] / 56.0 / Hnuclei; + IJth(A, IDX_ELEM_S, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_S, IDX_ELEM_H) = 0.0 + 4.0 * ab[IDX_GH2S2I] / 66.0 / Hnuclei + + 2.0 * ab[IDX_GH2SI] / 34.0 / Hnuclei + 2.0 + * ab[IDX_GHS2I] / 65.0 / Hnuclei + 2.0 * + ab[IDX_GH2CSI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_GHCSI] / 45.0 / Hnuclei + 1.0 * + ab[IDX_HNSII] / 47.0 / Hnuclei + 1.0 * + ab[IDX_HSOII] / 49.0 / Hnuclei + 3.0 * + ab[IDX_CH3CSII] / 59.0 / Hnuclei + 6.0 * + ab[IDX_H3S2II] / 67.0 / Hnuclei + 1.0 * + ab[IDX_HSO2II] / 65.0 / Hnuclei + 1.0 * + ab[IDX_GHSI] / 33.0 / Hnuclei + 4.0 * + ab[IDX_H2S2I] / 66.0 / Hnuclei + 1.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 1.0 * + ab[IDX_HC4SII] / 81.0 / Hnuclei + 4.0 * + ab[IDX_H2S2II] / 66.0 / Hnuclei + 1.0 * + ab[IDX_HSiSII] / 61.0 / Hnuclei + 3.0 * + ab[IDX_H3CSII] / 47.0 / Hnuclei + 1.0 * + ab[IDX_HC3SII] / 69.0 / Hnuclei + 2.0 * + ab[IDX_HS2II] / 65.0 / Hnuclei + 2.0 * + ab[IDX_HS2I] / 65.0 / Hnuclei + 2.0 * + ab[IDX_H2CSII] / 46.0 / Hnuclei + 2.0 * + ab[IDX_H2CSI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HCSI] / 45.0 / Hnuclei + 1.0 * + ab[IDX_HCSII] / 45.0 / Hnuclei + 3.0 * + ab[IDX_H3SII] / 35.0 / Hnuclei + 1.0 * + ab[IDX_HSII] / 33.0 / Hnuclei + 1.0 * + ab[IDX_HC2SII] / 57.0 / Hnuclei + 1.0 * + ab[IDX_HSI] / 33.0 / Hnuclei + 2.0 * + ab[IDX_H2SII] / 34.0 / Hnuclei + 2.0 * + ab[IDX_H2SI] / 34.0 / Hnuclei; + IJth(A, IDX_ELEM_N, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_N, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_N, IDX_ELEM_P) = 0.0 + 31.0 * ab[IDX_GPNI] / 45.0 / Hnuclei + + 31.0 * ab[IDX_PNII] / 45.0 / Hnuclei + 31.0 + * ab[IDX_PNH3II] / 48.0 / Hnuclei + 31.0 * + ab[IDX_PNH2II] / 47.0 / Hnuclei + 31.0 * + ab[IDX_HPNII] / 46.0 / Hnuclei + 31.0 * + ab[IDX_PNI] / 45.0 / Hnuclei; + IJth(A, IDX_ELEM_N, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_N, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_N, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_N, IDX_ELEM_Si) = 0.0 + 28.0 * ab[IDX_GHNSiI] / 43.0 / Hnuclei + + 28.0 * ab[IDX_GSiNCI] / 54.0 / Hnuclei + + 28.0 * ab[IDX_GSiNI] / 42.0 / Hnuclei + 28.0 + * ab[IDX_SiNCHII] / 55.0 / Hnuclei + 28.0 * + ab[IDX_HNSiII] / 43.0 / Hnuclei + 28.0 * + ab[IDX_SiNH2II] / 44.0 / Hnuclei + 28.0 * + ab[IDX_SiNII] / 42.0 / Hnuclei + 28.0 * + ab[IDX_SiNCI] / 54.0 / Hnuclei + 28.0 * + ab[IDX_SiNCII] / 54.0 / Hnuclei + 28.0 * + ab[IDX_HNSiI] / 43.0 / Hnuclei + 28.0 * + ab[IDX_SiNI] / 42.0 / Hnuclei; + IJth(A, IDX_ELEM_N, IDX_ELEM_S) = 0.0 + 32.0 * ab[IDX_GNSI] / 46.0 / Hnuclei + + 32.0 * ab[IDX_HNSII] / 47.0 / Hnuclei + 32.0 + * ab[IDX_NSII] / 46.0 / Hnuclei + 32.0 * + ab[IDX_NSI] / 46.0 / Hnuclei; + IJth(A, IDX_ELEM_N, IDX_ELEM_N) = 0.0 + 14.0 * ab[IDX_GCH3C3NI] / 65.0 / + Hnuclei + 14.0 * ab[IDX_GCH3C5NI] / 89.0 / + Hnuclei + 14.0 * ab[IDX_GCH3C7NI] / 113.0 / + Hnuclei + 14.0 * ab[IDX_GHNSiI] / 43.0 / + Hnuclei + 56.0 * ab[IDX_GNH2CNI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_GNO2I] / 46.0 / + Hnuclei + 14.0 * ab[IDX_GPNI] / 45.0 / + Hnuclei + 56.0 * ab[IDX_GNCCNI] / 52.0 / + Hnuclei + 14.0 * ab[IDX_C2H4CNI] / 54.0 / + Hnuclei + 14.0 * ab[IDX_GC4NI] / 62.0 / + Hnuclei + 14.0 * ab[IDX_GHCNOI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHNC3I] / 51.0 / + Hnuclei + 14.0 * ab[IDX_GHNCOI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHOCNI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHONCI] / 43.0 / + Hnuclei + 56.0 * ab[IDX_GN2OI] / 44.0 / + Hnuclei + 14.0 * ab[IDX_GSiNCI] / 54.0 / + Hnuclei + 56.0 * ab[IDX_NCCNCH3II] / 67.0 / + Hnuclei + 14.0 * ab[IDX_GC2H4CNI] / 54.0 / + Hnuclei + 14.0 * ab[IDX_GCH2CNI] / 40.0 / + Hnuclei + 14.0 * ab[IDX_GCH3CNI] / 41.0 / + Hnuclei + 14.0 * ab[IDX_GH2CNI] / 28.0 / + Hnuclei + 14.0 * ab[IDX_GHC5NI] / 75.0 / + Hnuclei + 14.0 * ab[IDX_GHC7NI] / 99.0 / + Hnuclei + 14.0 * ab[IDX_GHC9NI] / 123.0 / + Hnuclei + 14.0 * ab[IDX_GHCCNI] / 39.0 / + Hnuclei + 14.0 * ab[IDX_GSiNI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_HCCNI] / 39.0 / + Hnuclei + 14.0 * ab[IDX_CH3C3NII] / 65.0 / + Hnuclei + 14.0 * ab[IDX_GCH2CHCNI] / 53.0 / + Hnuclei + 14.0 * ab[IDX_GHC3NI] / 51.0 / + Hnuclei + 14.0 * ab[IDX_C5NII] / 74.0 / + Hnuclei + 14.0 * ab[IDX_CH2CHCNII] / 53.0 / + Hnuclei + 14.0 * ab[IDX_GC2H5CNI] / 55.0 / + Hnuclei + 14.0 * ab[IDX_GC9NI] / 122.0 / + Hnuclei + 14.0 * ab[IDX_GOCNI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_H2CNOII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_H2NCOII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_H2OCNII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_C7NII] / 98.0 / + Hnuclei + 14.0 * ab[IDX_C9NII] / 122.0 / + Hnuclei + 14.0 * ab[IDX_CH3NHII] / 30.0 / + Hnuclei + 14.0 * ab[IDX_GC2NI] / 38.0 / + Hnuclei + 14.0 * ab[IDX_GCH2NHI] / 29.0 / + Hnuclei + 14.0 * ab[IDX_GCNOI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_GHNCI] / 27.0 / + Hnuclei + 14.0 * ab[IDX_GNSI] / 46.0 / + Hnuclei + 14.0 * ab[IDX_H2C4NII] / 64.0 / + Hnuclei + 14.0 * ab[IDX_H2NOII] / 32.0 / + Hnuclei + 14.0 * ab[IDX_HNSII] / 47.0 / + Hnuclei + 56.0 * ab[IDX_NH2CNHII] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHNOI] / 31.0 / + Hnuclei + 56.0 * ab[IDX_GN2I] / 28.0 / + Hnuclei + 14.0 * ab[IDX_HC4NII] / 63.0 / + Hnuclei + 14.0 * ab[IDX_HCNOHII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_HNCOHII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_HOCNII] / 43.0 / + Hnuclei + 14.0 * ab[IDX_PNII] / 45.0 / + Hnuclei + 14.0 * ab[IDX_PNH3II] / 48.0 / + Hnuclei + 14.0 * ab[IDX_GC5NI] / 74.0 / + Hnuclei + 14.0 * ab[IDX_H2C7NII] / 100.0 / + Hnuclei + 14.0 * ab[IDX_H2C9NII] / 124.0 / + Hnuclei + 14.0 * ab[IDX_HONCII] / 43.0 / + Hnuclei + 14.0 * ab[IDX_PNH2II] / 47.0 / + Hnuclei + 14.0 * ab[IDX_C2H5CNHII] / 56.0 / + Hnuclei + 14.0 * ab[IDX_CH2NH2II] / 30.0 / + Hnuclei + 14.0 * ab[IDX_CH3C5NHII] / 90.0 / + Hnuclei + 14.0 * ab[IDX_CH3C7NHII] / 114.0 / + Hnuclei + 14.0 * ab[IDX_GC3NI] / 50.0 / + Hnuclei + 14.0 * ab[IDX_GC7NI] / 98.0 / + Hnuclei + 14.0 * ab[IDX_GHCNI] / 27.0 / + Hnuclei + 14.0 * ab[IDX_H2CNI] / 28.0 / + Hnuclei + 14.0 * ab[IDX_H3C5NII] / 77.0 / + Hnuclei + 14.0 * ab[IDX_HCNOII] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GNH3I] / 17.0 / + Hnuclei + 14.0 * ab[IDX_H3C9NII] / 125.0 / + Hnuclei + 14.0 * ab[IDX_HPNII] / 46.0 / + Hnuclei + 14.0 * ab[IDX_C4NI] / 62.0 / + Hnuclei + 14.0 * ab[IDX_H3C7NII] / 101.0 / + Hnuclei + 56.0 * ab[IDX_NH2CNI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_CH3C3NHII] / 66.0 / + Hnuclei + 14.0 * ab[IDX_HC7NII] / 99.0 / + Hnuclei + 14.0 * ab[IDX_HC9NII] / 123.0 / + Hnuclei + 14.0 * ab[IDX_HNCOII] / 43.0 / + Hnuclei + 14.0 * ab[IDX_NO2II] / 46.0 / + Hnuclei + 14.0 * ab[IDX_C2H5CNI] / 55.0 / + Hnuclei + 14.0 * ab[IDX_CH2CHCNHII] / 54.0 / + Hnuclei + 56.0 * ab[IDX_HN2OII] / 45.0 / + Hnuclei + 56.0 * ab[IDX_N2OII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_SiNCHII] / 55.0 / + Hnuclei + 14.0 * ab[IDX_HNSiII] / 43.0 / + Hnuclei + 14.0 * ab[IDX_NSII] / 46.0 / + Hnuclei + 14.0 * ab[IDX_OCNII] / 42.0 / + Hnuclei + 56.0 * ab[IDX_C2N2II] / 52.0 / + Hnuclei + 14.0 * ab[IDX_CH3CNII] / 41.0 / + Hnuclei + 14.0 * ab[IDX_HC5NHII] / 76.0 / + Hnuclei + 14.0 * ab[IDX_SiNH2II] / 44.0 / + Hnuclei + 14.0 * ab[IDX_C3NII] / 50.0 / + Hnuclei + 14.0 * ab[IDX_CH2CNII] / 40.0 / + Hnuclei + 14.0 * ab[IDX_HC5NII] / 75.0 / + Hnuclei + 14.0 * ab[IDX_HONCI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_SiNII] / 42.0 / + Hnuclei + 14.0 * ab[IDX_CH3C5NI] / 89.0 / + Hnuclei + 14.0 * ab[IDX_CH3C7NI] / 113.0 / + Hnuclei + 14.0 * ab[IDX_H2NCII] / 28.0 / + Hnuclei + 14.0 * ab[IDX_SiNCI] / 54.0 / + Hnuclei + 14.0 * ab[IDX_SiNCII] / 54.0 / + Hnuclei + 14.0 * ab[IDX_CNOI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_HNSiI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_C2NHII] / 39.0 / + Hnuclei + 14.0 * ab[IDX_HCNOI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_C4NII] / 62.0 / + Hnuclei + 14.0 * ab[IDX_CH3C3NI] / 65.0 / + Hnuclei + 14.0 * ab[IDX_HOCNI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GNOI] / 30.0 / + Hnuclei + 14.0 * ab[IDX_HC9NI] / 123.0 / + Hnuclei + 56.0 * ab[IDX_NCCNHII] / 53.0 / + Hnuclei + 14.0 * ab[IDX_NO2I] / 46.0 / + Hnuclei + 14.0 * ab[IDX_PNI] / 45.0 / + Hnuclei + 14.0 * ab[IDX_CH2CNI] / 40.0 / + Hnuclei + 14.0 * ab[IDX_HNCOI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_C9NI] / 122.0 / + Hnuclei + 14.0 * ab[IDX_GNH2I] / 16.0 / + Hnuclei + 14.0 * ab[IDX_CH2NHI] / 29.0 / + Hnuclei + 14.0 * ab[IDX_SiNI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_GNHI] / 15.0 / + Hnuclei + 14.0 * ab[IDX_NSI] / 46.0 / + Hnuclei + 14.0 * ab[IDX_CH2CHCNI] / 53.0 / + Hnuclei + 14.0 * ab[IDX_CH3CNHII] / 42.0 / + Hnuclei + 14.0 * ab[IDX_HC7NI] / 99.0 / + Hnuclei + 14.0 * ab[IDX_C7NI] / 98.0 / + Hnuclei + 14.0 * ab[IDX_HNOI] / 31.0 / + Hnuclei + 56.0 * ab[IDX_N2OI] / 44.0 / + Hnuclei + 14.0 * ab[IDX_C2NII] / 38.0 / + Hnuclei + 14.0 * ab[IDX_HNC3I] / 51.0 / + Hnuclei + 14.0 * ab[IDX_OCNI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_HC3NII] / 51.0 / + Hnuclei + 14.0 * ab[IDX_HC5NI] / 75.0 / + Hnuclei + 14.0 * ab[IDX_HC3NHII] / 52.0 / + Hnuclei + 14.0 * ab[IDX_CH3CNI] / 41.0 / + Hnuclei + 56.0 * ab[IDX_NCCNI] / 52.0 / + Hnuclei + 14.0 * ab[IDX_HNOII] / 31.0 / + Hnuclei + 14.0 * ab[IDX_GCNI] / 26.0 / + Hnuclei + 14.0 * ab[IDX_CNII] / 26.0 / + Hnuclei + 14.0 * ab[IDX_GNI] / 14.0 / + Hnuclei + 56.0 * ab[IDX_N2II] / 28.0 / + Hnuclei + 14.0 * ab[IDX_HCNII] / 27.0 / + Hnuclei + 14.0 * ab[IDX_CNCII] / 38.0 / + Hnuclei + 14.0 * ab[IDX_NHII] / 15.0 / + Hnuclei + 14.0 * ab[IDX_NH2II] / 16.0 / + Hnuclei + 14.0 * ab[IDX_C5NM] / 74.0 / + Hnuclei + 14.0 * ab[IDX_HC3NI] / 51.0 / + Hnuclei + 14.0 * ab[IDX_C2NI] / 38.0 / + Hnuclei + 14.0 * ab[IDX_NH2I] / 16.0 / + Hnuclei + 14.0 * ab[IDX_C5NI] / 74.0 / + Hnuclei + 14.0 * ab[IDX_C3NM] / 50.0 / + Hnuclei + 14.0 * ab[IDX_C3NI] / 50.0 / + Hnuclei + 14.0 * ab[IDX_NHI] / 15.0 / + Hnuclei + 14.0 * ab[IDX_CNM] / 26.0 / + Hnuclei + 56.0 * ab[IDX_N2HII] / 29.0 / + Hnuclei + 14.0 * ab[IDX_NII] / 14.0 / + Hnuclei + 14.0 * ab[IDX_NOII] / 30.0 / + Hnuclei + 14.0 * ab[IDX_HCNHII] / 28.0 / + Hnuclei + 14.0 * ab[IDX_HNCI] / 27.0 / + Hnuclei + 14.0 * ab[IDX_NH3II] / 17.0 / + Hnuclei + 14.0 * ab[IDX_NH4II] / 18.0 / + Hnuclei + 56.0 * ab[IDX_N2I] / 28.0 / + Hnuclei + 14.0 * ab[IDX_NOI] / 30.0 / + Hnuclei + 14.0 * ab[IDX_HCNI] / 27.0 / + Hnuclei + 14.0 * ab[IDX_NH3I] / 17.0 / + Hnuclei + 14.0 * ab[IDX_CNI] / 26.0 / + Hnuclei + 14.0 * ab[IDX_NI] / 14.0 / Hnuclei; + IJth(A, IDX_ELEM_N, IDX_ELEM_O) = 0.0 + 32.0 * ab[IDX_GNO2I] / 46.0 / Hnuclei + + 16.0 * ab[IDX_GHCNOI] / 43.0 / Hnuclei + + 16.0 * ab[IDX_GHNCOI] / 43.0 / Hnuclei + + 16.0 * ab[IDX_GHOCNI] / 43.0 / Hnuclei + + 16.0 * ab[IDX_GHONCI] / 43.0 / Hnuclei + + 32.0 * ab[IDX_GN2OI] / 44.0 / Hnuclei + 16.0 + * ab[IDX_GOCNI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_H2CNOII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_H2NCOII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_H2OCNII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_GCNOI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_H2NOII] / 32.0 / Hnuclei + 16.0 * + ab[IDX_GHNOI] / 31.0 / Hnuclei + 16.0 * + ab[IDX_HCNOHII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_HNCOHII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_HOCNII] / 43.0 / Hnuclei + 16.0 * + ab[IDX_HONCII] / 43.0 / Hnuclei + 16.0 * + ab[IDX_HCNOII] / 43.0 / Hnuclei + 16.0 * + ab[IDX_HNCOII] / 43.0 / Hnuclei + 32.0 * + ab[IDX_NO2II] / 46.0 / Hnuclei + 32.0 * + ab[IDX_HN2OII] / 45.0 / Hnuclei + 32.0 * + ab[IDX_N2OII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_OCNII] / 42.0 / Hnuclei + 16.0 * + ab[IDX_HONCI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_CNOI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_HCNOI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_HOCNI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_GNOI] / 30.0 / Hnuclei + 32.0 * + ab[IDX_NO2I] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HNCOI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_HNOI] / 31.0 / Hnuclei + 32.0 * + ab[IDX_N2OI] / 44.0 / Hnuclei + 16.0 * + ab[IDX_OCNI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_HNOII] / 31.0 / Hnuclei + 16.0 * + ab[IDX_NOII] / 30.0 / Hnuclei + 16.0 * + ab[IDX_NOI] / 30.0 / Hnuclei; + IJth(A, IDX_ELEM_N, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_N, IDX_ELEM_C) = 0.0 + 48.0 * ab[IDX_GCH3C3NI] / 65.0 / + Hnuclei + 72.0 * ab[IDX_GCH3C5NI] / 89.0 / + Hnuclei + 96.0 * ab[IDX_GCH3C7NI] / 113.0 / + Hnuclei + 24.0 * ab[IDX_GNH2CNI] / 42.0 / + Hnuclei + 48.0 * ab[IDX_GNCCNI] / 52.0 / + Hnuclei + 36.0 * ab[IDX_C2H4CNI] / 54.0 / + Hnuclei + 48.0 * ab[IDX_GC4NI] / 62.0 / + Hnuclei + 12.0 * ab[IDX_GHCNOI] / 43.0 / + Hnuclei + 36.0 * ab[IDX_GHNC3I] / 51.0 / + Hnuclei + 12.0 * ab[IDX_GHNCOI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHOCNI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHONCI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GSiNCI] / 54.0 / + Hnuclei + 72.0 * ab[IDX_NCCNCH3II] / 67.0 / + Hnuclei + 36.0 * ab[IDX_GC2H4CNI] / 54.0 / + Hnuclei + 24.0 * ab[IDX_GCH2CNI] / 40.0 / + Hnuclei + 24.0 * ab[IDX_GCH3CNI] / 41.0 / + Hnuclei + 12.0 * ab[IDX_GH2CNI] / 28.0 / + Hnuclei + 60.0 * ab[IDX_GHC5NI] / 75.0 / + Hnuclei + 84.0 * ab[IDX_GHC7NI] / 99.0 / + Hnuclei + 108.0 * ab[IDX_GHC9NI] / 123.0 / + Hnuclei + 24.0 * ab[IDX_GHCCNI] / 39.0 / + Hnuclei + 24.0 * ab[IDX_HCCNI] / 39.0 / + Hnuclei + 48.0 * ab[IDX_CH3C3NII] / 65.0 / + Hnuclei + 36.0 * ab[IDX_GCH2CHCNI] / 53.0 / + Hnuclei + 36.0 * ab[IDX_GHC3NI] / 51.0 / + Hnuclei + 60.0 * ab[IDX_C5NII] / 74.0 / + Hnuclei + 36.0 * ab[IDX_CH2CHCNII] / 53.0 / + Hnuclei + 36.0 * ab[IDX_GC2H5CNI] / 55.0 / + Hnuclei + 108.0 * ab[IDX_GC9NI] / 122.0 / + Hnuclei + 12.0 * ab[IDX_GOCNI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_H2CNOII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_H2NCOII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_H2OCNII] / 44.0 / + Hnuclei + 84.0 * ab[IDX_C7NII] / 98.0 / + Hnuclei + 108.0 * ab[IDX_C9NII] / 122.0 / + Hnuclei + 12.0 * ab[IDX_CH3NHII] / 30.0 / + Hnuclei + 24.0 * ab[IDX_GC2NI] / 38.0 / + Hnuclei + 12.0 * ab[IDX_GCH2NHI] / 29.0 / + Hnuclei + 12.0 * ab[IDX_GCNOI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_GHNCI] / 27.0 / + Hnuclei + 48.0 * ab[IDX_H2C4NII] / 64.0 / + Hnuclei + 24.0 * ab[IDX_NH2CNHII] / 43.0 / + Hnuclei + 48.0 * ab[IDX_HC4NII] / 63.0 / + Hnuclei + 12.0 * ab[IDX_HCNOHII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_HNCOHII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_HOCNII] / 43.0 / + Hnuclei + 60.0 * ab[IDX_GC5NI] / 74.0 / + Hnuclei + 84.0 * ab[IDX_H2C7NII] / 100.0 / + Hnuclei + 108.0 * ab[IDX_H2C9NII] / 124.0 / + Hnuclei + 12.0 * ab[IDX_HONCII] / 43.0 / + Hnuclei + 36.0 * ab[IDX_C2H5CNHII] / 56.0 / + Hnuclei + 12.0 * ab[IDX_CH2NH2II] / 30.0 / + Hnuclei + 72.0 * ab[IDX_CH3C5NHII] / 90.0 / + Hnuclei + 96.0 * ab[IDX_CH3C7NHII] / 114.0 / + Hnuclei + 36.0 * ab[IDX_GC3NI] / 50.0 / + Hnuclei + 84.0 * ab[IDX_GC7NI] / 98.0 / + Hnuclei + 12.0 * ab[IDX_GHCNI] / 27.0 / + Hnuclei + 12.0 * ab[IDX_H2CNI] / 28.0 / + Hnuclei + 60.0 * ab[IDX_H3C5NII] / 77.0 / + Hnuclei + 12.0 * ab[IDX_HCNOII] / 43.0 / + Hnuclei + 108.0 * ab[IDX_H3C9NII] / 125.0 / + Hnuclei + 48.0 * ab[IDX_C4NI] / 62.0 / + Hnuclei + 84.0 * ab[IDX_H3C7NII] / 101.0 / + Hnuclei + 24.0 * ab[IDX_NH2CNI] / 42.0 / + Hnuclei + 48.0 * ab[IDX_CH3C3NHII] / 66.0 / + Hnuclei + 84.0 * ab[IDX_HC7NII] / 99.0 / + Hnuclei + 108.0 * ab[IDX_HC9NII] / 123.0 / + Hnuclei + 12.0 * ab[IDX_HNCOII] / 43.0 / + Hnuclei + 36.0 * ab[IDX_C2H5CNI] / 55.0 / + Hnuclei + 36.0 * ab[IDX_CH2CHCNHII] / 54.0 / + Hnuclei + 12.0 * ab[IDX_SiNCHII] / 55.0 / + Hnuclei + 12.0 * ab[IDX_OCNII] / 42.0 / + Hnuclei + 48.0 * ab[IDX_C2N2II] / 52.0 / + Hnuclei + 24.0 * ab[IDX_CH3CNII] / 41.0 / + Hnuclei + 60.0 * ab[IDX_HC5NHII] / 76.0 / + Hnuclei + 36.0 * ab[IDX_C3NII] / 50.0 / + Hnuclei + 24.0 * ab[IDX_CH2CNII] / 40.0 / + Hnuclei + 60.0 * ab[IDX_HC5NII] / 75.0 / + Hnuclei + 12.0 * ab[IDX_HONCI] / 43.0 / + Hnuclei + 72.0 * ab[IDX_CH3C5NI] / 89.0 / + Hnuclei + 96.0 * ab[IDX_CH3C7NI] / 113.0 / + Hnuclei + 12.0 * ab[IDX_H2NCII] / 28.0 / + Hnuclei + 12.0 * ab[IDX_SiNCI] / 54.0 / + Hnuclei + 12.0 * ab[IDX_SiNCII] / 54.0 / + Hnuclei + 12.0 * ab[IDX_CNOI] / 42.0 / + Hnuclei + 24.0 * ab[IDX_C2NHII] / 39.0 / + Hnuclei + 12.0 * ab[IDX_HCNOI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_C4NII] / 62.0 / + Hnuclei + 48.0 * ab[IDX_CH3C3NI] / 65.0 / + Hnuclei + 12.0 * ab[IDX_HOCNI] / 43.0 / + Hnuclei + 108.0 * ab[IDX_HC9NI] / 123.0 / + Hnuclei + 48.0 * ab[IDX_NCCNHII] / 53.0 / + Hnuclei + 24.0 * ab[IDX_CH2CNI] / 40.0 / + Hnuclei + 12.0 * ab[IDX_HNCOI] / 43.0 / + Hnuclei + 108.0 * ab[IDX_C9NI] / 122.0 / + Hnuclei + 12.0 * ab[IDX_CH2NHI] / 29.0 / + Hnuclei + 36.0 * ab[IDX_CH2CHCNI] / 53.0 / + Hnuclei + 24.0 * ab[IDX_CH3CNHII] / 42.0 / + Hnuclei + 84.0 * ab[IDX_HC7NI] / 99.0 / + Hnuclei + 84.0 * ab[IDX_C7NI] / 98.0 / + Hnuclei + 24.0 * ab[IDX_C2NII] / 38.0 / + Hnuclei + 36.0 * ab[IDX_HNC3I] / 51.0 / + Hnuclei + 12.0 * ab[IDX_OCNI] / 42.0 / + Hnuclei + 36.0 * ab[IDX_HC3NII] / 51.0 / + Hnuclei + 60.0 * ab[IDX_HC5NI] / 75.0 / + Hnuclei + 36.0 * ab[IDX_HC3NHII] / 52.0 / + Hnuclei + 24.0 * ab[IDX_CH3CNI] / 41.0 / + Hnuclei + 48.0 * ab[IDX_NCCNI] / 52.0 / + Hnuclei + 12.0 * ab[IDX_GCNI] / 26.0 / + Hnuclei + 12.0 * ab[IDX_CNII] / 26.0 / + Hnuclei + 12.0 * ab[IDX_HCNII] / 27.0 / + Hnuclei + 24.0 * ab[IDX_CNCII] / 38.0 / + Hnuclei + 60.0 * ab[IDX_C5NM] / 74.0 / + Hnuclei + 36.0 * ab[IDX_HC3NI] / 51.0 / + Hnuclei + 24.0 * ab[IDX_C2NI] / 38.0 / + Hnuclei + 60.0 * ab[IDX_C5NI] / 74.0 / + Hnuclei + 36.0 * ab[IDX_C3NM] / 50.0 / + Hnuclei + 36.0 * ab[IDX_C3NI] / 50.0 / + Hnuclei + 12.0 * ab[IDX_CNM] / 26.0 / + Hnuclei + 12.0 * ab[IDX_HCNHII] / 28.0 / + Hnuclei + 12.0 * ab[IDX_HNCI] / 27.0 / + Hnuclei + 12.0 * ab[IDX_HCNI] / 27.0 / + Hnuclei + 12.0 * ab[IDX_CNI] / 26.0 / + Hnuclei; + IJth(A, IDX_ELEM_N, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_N, IDX_ELEM_H) = 0.0 + 3.0 * ab[IDX_GCH3C3NI] / 65.0 / + Hnuclei + 3.0 * ab[IDX_GCH3C5NI] / 89.0 / + Hnuclei + 3.0 * ab[IDX_GCH3C7NI] / 113.0 / + Hnuclei + 1.0 * ab[IDX_GHNSiI] / 43.0 / + Hnuclei + 4.0 * ab[IDX_GNH2CNI] / 42.0 / + Hnuclei + 4.0 * ab[IDX_C2H4CNI] / 54.0 / + Hnuclei + 1.0 * ab[IDX_GHCNOI] / 43.0 / + Hnuclei + 1.0 * ab[IDX_GHNC3I] / 51.0 / + Hnuclei + 1.0 * ab[IDX_GHNCOI] / 43.0 / + Hnuclei + 1.0 * ab[IDX_GHOCNI] / 43.0 / + Hnuclei + 1.0 * ab[IDX_GHONCI] / 43.0 / + Hnuclei + 6.0 * ab[IDX_NCCNCH3II] / 67.0 / + Hnuclei + 4.0 * ab[IDX_GC2H4CNI] / 54.0 / + Hnuclei + 2.0 * ab[IDX_GCH2CNI] / 40.0 / + Hnuclei + 3.0 * ab[IDX_GCH3CNI] / 41.0 / + Hnuclei + 2.0 * ab[IDX_GH2CNI] / 28.0 / + Hnuclei + 1.0 * ab[IDX_GHC5NI] / 75.0 / + Hnuclei + 1.0 * ab[IDX_GHC7NI] / 99.0 / + Hnuclei + 1.0 * ab[IDX_GHC9NI] / 123.0 / + Hnuclei + 1.0 * ab[IDX_GHCCNI] / 39.0 / + Hnuclei + 1.0 * ab[IDX_HCCNI] / 39.0 / + Hnuclei + 3.0 * ab[IDX_CH3C3NII] / 65.0 / + Hnuclei + 3.0 * ab[IDX_GCH2CHCNI] / 53.0 / + Hnuclei + 1.0 * ab[IDX_GHC3NI] / 51.0 / + Hnuclei + 3.0 * ab[IDX_CH2CHCNII] / 53.0 / + Hnuclei + 5.0 * ab[IDX_GC2H5CNI] / 55.0 / + Hnuclei + 2.0 * ab[IDX_H2CNOII] / 44.0 / + Hnuclei + 2.0 * ab[IDX_H2NCOII] / 44.0 / + Hnuclei + 2.0 * ab[IDX_H2OCNII] / 44.0 / + Hnuclei + 4.0 * ab[IDX_CH3NHII] / 30.0 / + Hnuclei + 3.0 * ab[IDX_GCH2NHI] / 29.0 / + Hnuclei + 1.0 * ab[IDX_GHNCI] / 27.0 / + Hnuclei + 2.0 * ab[IDX_H2C4NII] / 64.0 / + Hnuclei + 2.0 * ab[IDX_H2NOII] / 32.0 / + Hnuclei + 1.0 * ab[IDX_HNSII] / 47.0 / + Hnuclei + 6.0 * ab[IDX_NH2CNHII] / 43.0 / + Hnuclei + 1.0 * ab[IDX_GHNOI] / 31.0 / + Hnuclei + 1.0 * ab[IDX_HC4NII] / 63.0 / + Hnuclei + 2.0 * ab[IDX_HCNOHII] / 44.0 / + Hnuclei + 2.0 * ab[IDX_HNCOHII] / 44.0 / + Hnuclei + 1.0 * ab[IDX_HOCNII] / 43.0 / + Hnuclei + 3.0 * ab[IDX_PNH3II] / 48.0 / + Hnuclei + 2.0 * ab[IDX_H2C7NII] / 100.0 / + Hnuclei + 2.0 * ab[IDX_H2C9NII] / 124.0 / + Hnuclei + 1.0 * ab[IDX_HONCII] / 43.0 / + Hnuclei + 2.0 * ab[IDX_PNH2II] / 47.0 / + Hnuclei + 6.0 * ab[IDX_C2H5CNHII] / 56.0 / + Hnuclei + 4.0 * ab[IDX_CH2NH2II] / 30.0 / + Hnuclei + 4.0 * ab[IDX_CH3C5NHII] / 90.0 / + Hnuclei + 4.0 * ab[IDX_CH3C7NHII] / 114.0 / + Hnuclei + 1.0 * ab[IDX_GHCNI] / 27.0 / + Hnuclei + 2.0 * ab[IDX_H2CNI] / 28.0 / + Hnuclei + 3.0 * ab[IDX_H3C5NII] / 77.0 / + Hnuclei + 1.0 * ab[IDX_HCNOII] / 43.0 / + Hnuclei + 3.0 * ab[IDX_GNH3I] / 17.0 / + Hnuclei + 3.0 * ab[IDX_H3C9NII] / 125.0 / + Hnuclei + 1.0 * ab[IDX_HPNII] / 46.0 / + Hnuclei + 3.0 * ab[IDX_H3C7NII] / 101.0 / + Hnuclei + 4.0 * ab[IDX_NH2CNI] / 42.0 / + Hnuclei + 4.0 * ab[IDX_CH3C3NHII] / 66.0 / + Hnuclei + 1.0 * ab[IDX_HC7NII] / 99.0 / + Hnuclei + 1.0 * ab[IDX_HC9NII] / 123.0 / + Hnuclei + 1.0 * ab[IDX_HNCOII] / 43.0 / + Hnuclei + 5.0 * ab[IDX_C2H5CNI] / 55.0 / + Hnuclei + 4.0 * ab[IDX_CH2CHCNHII] / 54.0 / + Hnuclei + 2.0 * ab[IDX_HN2OII] / 45.0 / + Hnuclei + 1.0 * ab[IDX_SiNCHII] / 55.0 / + Hnuclei + 1.0 * ab[IDX_HNSiII] / 43.0 / + Hnuclei + 3.0 * ab[IDX_CH3CNII] / 41.0 / + Hnuclei + 2.0 * ab[IDX_HC5NHII] / 76.0 / + Hnuclei + 2.0 * ab[IDX_SiNH2II] / 44.0 / + Hnuclei + 2.0 * ab[IDX_CH2CNII] / 40.0 / + Hnuclei + 1.0 * ab[IDX_HC5NII] / 75.0 / + Hnuclei + 1.0 * ab[IDX_HONCI] / 43.0 / + Hnuclei + 3.0 * ab[IDX_CH3C5NI] / 89.0 / + Hnuclei + 3.0 * ab[IDX_CH3C7NI] / 113.0 / + Hnuclei + 2.0 * ab[IDX_H2NCII] / 28.0 / + Hnuclei + 1.0 * ab[IDX_HNSiI] / 43.0 / + Hnuclei + 1.0 * ab[IDX_C2NHII] / 39.0 / + Hnuclei + 1.0 * ab[IDX_HCNOI] / 43.0 / + Hnuclei + 3.0 * ab[IDX_CH3C3NI] / 65.0 / + Hnuclei + 1.0 * ab[IDX_HOCNI] / 43.0 / + Hnuclei + 1.0 * ab[IDX_HC9NI] / 123.0 / + Hnuclei + 2.0 * ab[IDX_NCCNHII] / 53.0 / + Hnuclei + 2.0 * ab[IDX_CH2CNI] / 40.0 / + Hnuclei + 1.0 * ab[IDX_HNCOI] / 43.0 / + Hnuclei + 2.0 * ab[IDX_GNH2I] / 16.0 / + Hnuclei + 3.0 * ab[IDX_CH2NHI] / 29.0 / + Hnuclei + 1.0 * ab[IDX_GNHI] / 15.0 / + Hnuclei + 3.0 * ab[IDX_CH2CHCNI] / 53.0 / + Hnuclei + 4.0 * ab[IDX_CH3CNHII] / 42.0 / + Hnuclei + 1.0 * ab[IDX_HC7NI] / 99.0 / + Hnuclei + 1.0 * ab[IDX_HNOI] / 31.0 / + Hnuclei + 1.0 * ab[IDX_HNC3I] / 51.0 / + Hnuclei + 1.0 * ab[IDX_HC3NII] / 51.0 / + Hnuclei + 1.0 * ab[IDX_HC5NI] / 75.0 / + Hnuclei + 2.0 * ab[IDX_HC3NHII] / 52.0 / + Hnuclei + 3.0 * ab[IDX_CH3CNI] / 41.0 / + Hnuclei + 1.0 * ab[IDX_HNOII] / 31.0 / + Hnuclei + 1.0 * ab[IDX_HCNII] / 27.0 / + Hnuclei + 1.0 * ab[IDX_NHII] / 15.0 / + Hnuclei + 2.0 * ab[IDX_NH2II] / 16.0 / + Hnuclei + 1.0 * ab[IDX_HC3NI] / 51.0 / + Hnuclei + 2.0 * ab[IDX_NH2I] / 16.0 / + Hnuclei + 1.0 * ab[IDX_NHI] / 15.0 / Hnuclei + + 2.0 * ab[IDX_N2HII] / 29.0 / Hnuclei + 2.0 + * ab[IDX_HCNHII] / 28.0 / Hnuclei + 1.0 * + ab[IDX_HNCI] / 27.0 / Hnuclei + 3.0 * + ab[IDX_NH3II] / 17.0 / Hnuclei + 4.0 * + ab[IDX_NH4II] / 18.0 / Hnuclei + 1.0 * + ab[IDX_HCNI] / 27.0 / Hnuclei + 3.0 * + ab[IDX_NH3I] / 17.0 / Hnuclei; + IJth(A, IDX_ELEM_O, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_O, IDX_ELEM_Cl) = 0.0 + 35.0 * ab[IDX_GClOI] / 51.0 / Hnuclei + + 35.0 * ab[IDX_ClOII] / 51.0 / Hnuclei + + 35.0 * ab[IDX_ClOI] / 51.0 / Hnuclei; + IJth(A, IDX_ELEM_O, IDX_ELEM_P) = 0.0 + 31.0 * ab[IDX_GHPOI] / 48.0 / Hnuclei + + 31.0 * ab[IDX_GPOI] / 47.0 / Hnuclei + + 31.0 * ab[IDX_H2POII] / 49.0 / Hnuclei + + 31.0 * ab[IDX_HPOII] / 48.0 / Hnuclei + 31.0 + * ab[IDX_HPOI] / 48.0 / Hnuclei + 31.0 * + ab[IDX_POII] / 47.0 / Hnuclei + 31.0 * + ab[IDX_POI] / 47.0 / Hnuclei; + IJth(A, IDX_ELEM_O, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_O, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_O, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_O, IDX_ELEM_Si) = 0.0 + 56.0 * ab[IDX_GSiO2I] / 60.0 / Hnuclei + + 28.0 * ab[IDX_GH2SiOI] / 46.0 / Hnuclei + + 28.0 * ab[IDX_GSiOI] / 44.0 / Hnuclei + 56.0 + * ab[IDX_HSiO2II] / 61.0 / Hnuclei + 28.0 * + ab[IDX_H2SiOII] / 46.0 / Hnuclei + 28.0 * + ab[IDX_H3SiOII] / 47.0 / Hnuclei + 56.0 * + ab[IDX_SiO2I] / 60.0 / Hnuclei + 28.0 * + ab[IDX_H2SiOI] / 46.0 / Hnuclei + 28.0 * + ab[IDX_SiOII] / 44.0 / Hnuclei + 28.0 * + ab[IDX_SiOHII] / 45.0 / Hnuclei + 28.0 * + ab[IDX_SiOI] / 44.0 / Hnuclei; + IJth(A, IDX_ELEM_O, IDX_ELEM_S) = 0.0 + 64.0 * ab[IDX_GSO2I] / 64.0 / Hnuclei + + 32.0 * ab[IDX_GOCSI] / 60.0 / Hnuclei + + 32.0 * ab[IDX_GSOI] / 48.0 / Hnuclei + 32.0 + * ab[IDX_HSOII] / 49.0 / Hnuclei + 64.0 * + ab[IDX_HSO2II] / 65.0 / Hnuclei + 32.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 64.0 * + ab[IDX_SO2II] / 64.0 / Hnuclei + 32.0 * + ab[IDX_OCSII] / 60.0 / Hnuclei + 64.0 * + ab[IDX_SO2I] / 64.0 / Hnuclei + 32.0 * + ab[IDX_OCSI] / 60.0 / Hnuclei + 32.0 * + ab[IDX_SOI] / 48.0 / Hnuclei + 32.0 * + ab[IDX_SOII] / 48.0 / Hnuclei; + IJth(A, IDX_ELEM_O, IDX_ELEM_N) = 0.0 + 28.0 * ab[IDX_GNO2I] / 46.0 / Hnuclei + + 14.0 * ab[IDX_GHCNOI] / 43.0 / Hnuclei + + 14.0 * ab[IDX_GHNCOI] / 43.0 / Hnuclei + + 14.0 * ab[IDX_GHOCNI] / 43.0 / Hnuclei + + 14.0 * ab[IDX_GHONCI] / 43.0 / Hnuclei + + 28.0 * ab[IDX_GN2OI] / 44.0 / Hnuclei + 14.0 + * ab[IDX_GOCNI] / 42.0 / Hnuclei + 14.0 * + ab[IDX_H2CNOII] / 44.0 / Hnuclei + 14.0 * + ab[IDX_H2NCOII] / 44.0 / Hnuclei + 14.0 * + ab[IDX_H2OCNII] / 44.0 / Hnuclei + 14.0 * + ab[IDX_GCNOI] / 42.0 / Hnuclei + 14.0 * + ab[IDX_H2NOII] / 32.0 / Hnuclei + 14.0 * + ab[IDX_GHNOI] / 31.0 / Hnuclei + 14.0 * + ab[IDX_HCNOHII] / 44.0 / Hnuclei + 14.0 * + ab[IDX_HNCOHII] / 44.0 / Hnuclei + 14.0 * + ab[IDX_HOCNII] / 43.0 / Hnuclei + 14.0 * + ab[IDX_HONCII] / 43.0 / Hnuclei + 14.0 * + ab[IDX_HCNOII] / 43.0 / Hnuclei + 14.0 * + ab[IDX_HNCOII] / 43.0 / Hnuclei + 28.0 * + ab[IDX_NO2II] / 46.0 / Hnuclei + 28.0 * + ab[IDX_HN2OII] / 45.0 / Hnuclei + 28.0 * + ab[IDX_N2OII] / 44.0 / Hnuclei + 14.0 * + ab[IDX_OCNII] / 42.0 / Hnuclei + 14.0 * + ab[IDX_HONCI] / 43.0 / Hnuclei + 14.0 * + ab[IDX_CNOI] / 42.0 / Hnuclei + 14.0 * + ab[IDX_HCNOI] / 43.0 / Hnuclei + 14.0 * + ab[IDX_HOCNI] / 43.0 / Hnuclei + 14.0 * + ab[IDX_GNOI] / 30.0 / Hnuclei + 28.0 * + ab[IDX_NO2I] / 46.0 / Hnuclei + 14.0 * + ab[IDX_HNCOI] / 43.0 / Hnuclei + 14.0 * + ab[IDX_HNOI] / 31.0 / Hnuclei + 28.0 * + ab[IDX_N2OI] / 44.0 / Hnuclei + 14.0 * + ab[IDX_OCNI] / 42.0 / Hnuclei + 14.0 * + ab[IDX_HNOII] / 31.0 / Hnuclei + 14.0 * + ab[IDX_NOII] / 30.0 / Hnuclei + 14.0 * + ab[IDX_NOI] / 30.0 / Hnuclei; + IJth(A, IDX_ELEM_O, IDX_ELEM_O) = 0.0 + 16.0 * ab[IDX_GClOI] / 51.0 / Hnuclei + + 16.0 * ab[IDX_GHPOI] / 48.0 / Hnuclei + + 64.0 * ab[IDX_GNO2I] / 46.0 / Hnuclei + 64.0 + * ab[IDX_GSiO2I] / 60.0 / Hnuclei + 16.0 * + ab[IDX_GH2SiOI] / 46.0 / Hnuclei + 64.0 * + ab[IDX_GCH3COOHI] / 60.0 / Hnuclei + 16.0 * + ab[IDX_GHCNOI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_GHNCOI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_GHOCNI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_GHONCI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_GN2OI] / 44.0 / Hnuclei + 16.0 * + ab[IDX_GPOI] / 47.0 / Hnuclei + 16.0 * + ab[IDX_HC2OI] / 41.0 / Hnuclei + 64.0 * + ab[IDX_GH2O2I] / 34.0 / Hnuclei + 64.0 * + ab[IDX_GSO2I] / 64.0 / Hnuclei + 16.0 * + ab[IDX_GC3OI] / 52.0 / Hnuclei + 16.0 * + ab[IDX_GHC2OI] / 41.0 / Hnuclei + 16.0 * + ab[IDX_GSiOI] / 44.0 / Hnuclei + 16.0 * + ab[IDX_C3H2OII] / 54.0 / Hnuclei + 16.0 * + ab[IDX_ClOII] / 51.0 / Hnuclei + 16.0 * + ab[IDX_GCH3COCH3I] / 58.0 / Hnuclei + 16.0 * + ab[IDX_GCH3OCH3I] / 46.0 / Hnuclei + 16.0 * + ab[IDX_H3C3OII] / 55.0 / Hnuclei + 16.0 * + ab[IDX_GOCSI] / 60.0 / Hnuclei + 64.0 * + ab[IDX_COOCH3II] / 59.0 / Hnuclei + 16.0 * + ab[IDX_GC2H5OHI] / 46.0 / Hnuclei + 16.0 * + ab[IDX_GC2OI] / 40.0 / Hnuclei + 64.0 * + ab[IDX_GCO2I] / 44.0 / Hnuclei + 64.0 * + ab[IDX_GO2HI] / 33.0 / Hnuclei + 16.0 * + ab[IDX_GOCNI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_GSOI] / 48.0 / Hnuclei + 16.0 * + ab[IDX_H2CNOII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_H2NCOII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_H2OCNII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_ClOI] / 51.0 / Hnuclei + 16.0 * + ab[IDX_GCNOI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_H2NOII] / 32.0 / Hnuclei + 16.0 * + ab[IDX_HOCII] / 29.0 / Hnuclei + 16.0 * + ab[IDX_HSOII] / 49.0 / Hnuclei + 64.0 * + ab[IDX_HSiO2II] / 61.0 / Hnuclei + 16.0 * + ab[IDX_C2H5OHII] / 46.0 / Hnuclei + 16.0 * + ab[IDX_C2OII] / 40.0 / Hnuclei + 64.0 * + ab[IDX_CH2OHCOII] / 59.0 / Hnuclei + 16.0 * + ab[IDX_GCH2COI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_GHNOI] / 31.0 / Hnuclei + 16.0 * + ab[IDX_HCNOHII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_HNCOHII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_HOCNII] / 43.0 / Hnuclei + 64.0 * + ab[IDX_H2O2I] / 34.0 / Hnuclei + 16.0 * + ab[IDX_HONCII] / 43.0 / Hnuclei + 64.0 * + ab[IDX_CH2OHCH2OII] / 61.0 / Hnuclei + 64.0 + * ab[IDX_GCOOCH3I] / 59.0 / Hnuclei + 16.0 * + ab[IDX_H2SiOII] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HCNOII] / 43.0 / Hnuclei + 64.0 * + ab[IDX_CH3COOHII] / 60.0 / Hnuclei + 64.0 * + ab[IDX_H5C2O2II] / 61.0 / Hnuclei + 64.0 * + ab[IDX_HCOOHII] / 46.0 / Hnuclei + 64.0 * + ab[IDX_CH3COOH2II] / 61.0 / Hnuclei + 16.0 * + ab[IDX_CH3OCH3II] / 46.0 / Hnuclei + 64.0 * + ab[IDX_GCH2OHCOI] / 59.0 / Hnuclei + 64.0 * + ab[IDX_GCOOHI] / 45.0 / Hnuclei + 64.0 * + ab[IDX_GO2I] / 32.0 / Hnuclei + 16.0 * + ab[IDX_H3SiOII] / 47.0 / Hnuclei + 64.0 * + ab[IDX_HSO2II] / 65.0 / Hnuclei + 16.0 * + ab[IDX_CH3OCH4II] / 47.0 / Hnuclei + 16.0 * + ab[IDX_HNCOII] / 43.0 / Hnuclei + 64.0 * + ab[IDX_NO2II] / 46.0 / Hnuclei + 64.0 * + ab[IDX_SiO2I] / 60.0 / Hnuclei + 16.0 * + ab[IDX_C2H5OH2II] / 47.0 / Hnuclei + 64.0 * + ab[IDX_COOCH3I] / 59.0 / Hnuclei + 16.0 * + ab[IDX_H2POII] / 49.0 / Hnuclei + 64.0 * + ab[IDX_HCOOCH3II] / 60.0 / Hnuclei + 16.0 * + ab[IDX_HN2OII] / 45.0 / Hnuclei + 16.0 * + ab[IDX_N2OII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_C3OII] / 52.0 / Hnuclei + 64.0 * + ab[IDX_CH2OHCHOII] / 60.0 / Hnuclei + 16.0 * + ab[IDX_CH3CHOII] / 44.0 / Hnuclei + 64.0 * + ab[IDX_GCH2OHCHOI] / 60.0 / Hnuclei + 64.0 * + ab[IDX_GHCOOHI] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 16.0 * + ab[IDX_OCNII] / 42.0 / Hnuclei + 16.0 * + ab[IDX_GCH3COI] / 43.0 / Hnuclei + 64.0 * + ab[IDX_GHCOOCH3I] / 60.0 / Hnuclei + 16.0 * + ab[IDX_CH3COCH3II] / 58.0 / Hnuclei + 16.0 * + ab[IDX_GCH2OHI] / 31.0 / Hnuclei + 16.0 * + ab[IDX_GCH3OHI] / 32.0 / Hnuclei + 16.0 * + ab[IDX_HONCI] / 43.0 / Hnuclei + 64.0 * + ab[IDX_SO2II] / 64.0 / Hnuclei + 64.0 * + ab[IDX_CH2OHCOI] / 59.0 / Hnuclei + 16.0 * + ab[IDX_H2SiOI] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HC2OII] / 41.0 / Hnuclei + 16.0 * + ab[IDX_CNOI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_GCH3OI] / 31.0 / Hnuclei + 16.0 * + ab[IDX_GH2OI] / 18.0 / Hnuclei + 64.0 * + ab[IDX_HCOOH2II] / 47.0 / Hnuclei + 16.0 * + ab[IDX_HPOII] / 48.0 / Hnuclei + 64.0 * + ab[IDX_CH2OHCHOI] / 60.0 / Hnuclei + 16.0 * + ab[IDX_HC3OII] / 53.0 / Hnuclei + 16.0 * + ab[IDX_HCNOI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_CH2COII] / 42.0 / Hnuclei + 16.0 * + ab[IDX_GCH3CHOI] / 44.0 / Hnuclei + 16.0 * + ab[IDX_GH2COI] / 30.0 / Hnuclei + 16.0 * + ab[IDX_HOCNI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_HPOI] / 48.0 / Hnuclei + 16.0 * + ab[IDX_CH3COI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_CH3COCH4II] / 59.0 / Hnuclei + 16.0 * + ab[IDX_CH3OHII] / 32.0 / Hnuclei + 64.0 * + ab[IDX_COOHI] / 45.0 / Hnuclei + 16.0 * + ab[IDX_GNOI] / 30.0 / Hnuclei + 16.0 * + ab[IDX_POII] / 47.0 / Hnuclei + 64.0 * + ab[IDX_HCOOCH3I] / 60.0 / Hnuclei + 64.0 * + ab[IDX_NO2I] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HNCOI] / 43.0 / Hnuclei + 64.0 * + ab[IDX_CH3COOHI] / 60.0 / Hnuclei + 16.0 * + ab[IDX_CH3OCH3I] / 46.0 / Hnuclei + 16.0 * + ab[IDX_POI] / 47.0 / Hnuclei + 16.0 * + ab[IDX_CH3OI] / 31.0 / Hnuclei + 16.0 * + ab[IDX_GHCOI] / 29.0 / Hnuclei + 16.0 * + ab[IDX_OCSII] / 60.0 / Hnuclei + 16.0 * + ab[IDX_C2OI] / 40.0 / Hnuclei + 16.0 * + ab[IDX_CH2OHI] / 31.0 / Hnuclei + 16.0 * + ab[IDX_C3OI] / 52.0 / Hnuclei + 16.0 * + ab[IDX_CH3CHOHII] / 45.0 / Hnuclei + 16.0 * + ab[IDX_CH3COII] / 43.0 / Hnuclei + 64.0 * + ab[IDX_HCOOHI] / 46.0 / Hnuclei + 64.0 * + ab[IDX_O2HI] / 33.0 / Hnuclei + 64.0 * + ab[IDX_SO2I] / 64.0 / Hnuclei + 16.0 * + ab[IDX_C2H5OHI] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HNOI] / 31.0 / Hnuclei + 16.0 * + ab[IDX_N2OI] / 44.0 / Hnuclei + 16.0 * + ab[IDX_CH3OH2II] / 33.0 / Hnuclei + 16.0 * + ab[IDX_CH2COI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_OCNI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_CH3COCH3I] / 58.0 / Hnuclei + 64.0 * + ab[IDX_CO2II] / 44.0 / Hnuclei + 16.0 * + ab[IDX_GOHI] / 17.0 / Hnuclei + 16.0 * + ab[IDX_GCOI] / 28.0 / Hnuclei + 64.0 * + ab[IDX_HCO2II] / 45.0 / Hnuclei + 16.0 * + ab[IDX_CH3CHOI] / 44.0 / Hnuclei + 64.0 * + ab[IDX_O2HII] / 33.0 / Hnuclei + 16.0 * + ab[IDX_HNOII] / 31.0 / Hnuclei + 16.0 * + ab[IDX_GOI] / 16.0 / Hnuclei + 64.0 * + ab[IDX_O2M] / 32.0 / Hnuclei + 16.0 * + ab[IDX_OCSI] / 60.0 / Hnuclei + 16.0 * + ab[IDX_COII] / 28.0 / Hnuclei + 16.0 * + ab[IDX_OHM] / 17.0 / Hnuclei + 16.0 * + ab[IDX_OM] / 16.0 / Hnuclei + 16.0 * + ab[IDX_CH3OHI] / 32.0 / Hnuclei + 16.0 * + ab[IDX_H3COII] / 31.0 / Hnuclei + 16.0 * + ab[IDX_SiOII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_SiOHII] / 45.0 / Hnuclei + 16.0 * + ab[IDX_OHII] / 17.0 / Hnuclei + 16.0 * + ab[IDX_H2OII] / 18.0 / Hnuclei + 64.0 * + ab[IDX_CO2I] / 44.0 / Hnuclei + 64.0 * + ab[IDX_O2II] / 32.0 / Hnuclei + 16.0 * + ab[IDX_SiOI] / 44.0 / Hnuclei + 16.0 * + ab[IDX_SOI] / 48.0 / Hnuclei + 16.0 * + ab[IDX_SOII] / 48.0 / Hnuclei + 16.0 * + ab[IDX_H2COII] / 30.0 / Hnuclei + 16.0 * + ab[IDX_NOII] / 30.0 / Hnuclei + 16.0 * + ab[IDX_OII] / 16.0 / Hnuclei + 64.0 * + ab[IDX_O2I] / 32.0 / Hnuclei + 16.0 * + ab[IDX_NOI] / 30.0 / Hnuclei + 16.0 * + ab[IDX_HCOI] / 29.0 / Hnuclei + 16.0 * + ab[IDX_H2COI] / 30.0 / Hnuclei + 16.0 * + ab[IDX_OHI] / 17.0 / Hnuclei + 16.0 * + ab[IDX_H3OII] / 19.0 / Hnuclei + 16.0 * + ab[IDX_OI] / 16.0 / Hnuclei + 16.0 * + ab[IDX_H2OI] / 18.0 / Hnuclei + 16.0 * + ab[IDX_HCOII] / 29.0 / Hnuclei + 16.0 * + ab[IDX_COI] / 28.0 / Hnuclei; + IJth(A, IDX_ELEM_O, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_O, IDX_ELEM_C) = 0.0 + 48.0 * ab[IDX_GCH3COOHI] / 60.0 / + Hnuclei + 12.0 * ab[IDX_GHCNOI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHNCOI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHOCNI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHONCI] / 43.0 / + Hnuclei + 24.0 * ab[IDX_HC2OI] / 41.0 / + Hnuclei + 36.0 * ab[IDX_GC3OI] / 52.0 / + Hnuclei + 24.0 * ab[IDX_GHC2OI] / 41.0 / + Hnuclei + 36.0 * ab[IDX_C3H2OII] / 54.0 / + Hnuclei + 36.0 * ab[IDX_GCH3COCH3I] / 58.0 / + Hnuclei + 24.0 * ab[IDX_GCH3OCH3I] / 46.0 / + Hnuclei + 36.0 * ab[IDX_H3C3OII] / 55.0 / + Hnuclei + 12.0 * ab[IDX_GOCSI] / 60.0 / + Hnuclei + 48.0 * ab[IDX_COOCH3II] / 59.0 / + Hnuclei + 24.0 * ab[IDX_GC2H5OHI] / 46.0 / + Hnuclei + 24.0 * ab[IDX_GC2OI] / 40.0 / + Hnuclei + 24.0 * ab[IDX_GCO2I] / 44.0 / + Hnuclei + 12.0 * ab[IDX_GOCNI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_H2CNOII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_H2NCOII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_H2OCNII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_GCNOI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_HOCII] / 29.0 / + Hnuclei + 24.0 * ab[IDX_C2H5OHII] / 46.0 / + Hnuclei + 24.0 * ab[IDX_C2OII] / 40.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCOII] / 59.0 / + Hnuclei + 24.0 * ab[IDX_GCH2COI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_HCNOHII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_HNCOHII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_HOCNII] / 43.0 / + Hnuclei + 12.0 * ab[IDX_HONCII] / 43.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCH2OII] / 61.0 + / Hnuclei + 48.0 * ab[IDX_GCOOCH3I] / 59.0 / + Hnuclei + 12.0 * ab[IDX_HCNOII] / 43.0 / + Hnuclei + 48.0 * ab[IDX_CH3COOHII] / 60.0 / + Hnuclei + 48.0 * ab[IDX_H5C2O2II] / 61.0 / + Hnuclei + 24.0 * ab[IDX_HCOOHII] / 46.0 / + Hnuclei + 48.0 * ab[IDX_CH3COOH2II] / 61.0 / + Hnuclei + 24.0 * ab[IDX_CH3OCH3II] / 46.0 / + Hnuclei + 48.0 * ab[IDX_GCH2OHCOI] / 59.0 / + Hnuclei + 24.0 * ab[IDX_GCOOHI] / 45.0 / + Hnuclei + 24.0 * ab[IDX_CH3OCH4II] / 47.0 / + Hnuclei + 12.0 * ab[IDX_HNCOII] / 43.0 / + Hnuclei + 24.0 * ab[IDX_C2H5OH2II] / 47.0 / + Hnuclei + 48.0 * ab[IDX_COOCH3I] / 59.0 / + Hnuclei + 48.0 * ab[IDX_HCOOCH3II] / 60.0 / + Hnuclei + 36.0 * ab[IDX_C3OII] / 52.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCHOII] / 60.0 / + Hnuclei + 24.0 * ab[IDX_CH3CHOII] / 44.0 / + Hnuclei + 48.0 * ab[IDX_GCH2OHCHOI] / 60.0 / + Hnuclei + 24.0 * ab[IDX_GHCOOHI] / 46.0 / + Hnuclei + 12.0 * ab[IDX_HOCSII] / 61.0 / + Hnuclei + 12.0 * ab[IDX_OCNII] / 42.0 / + Hnuclei + 24.0 * ab[IDX_GCH3COI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_GHCOOCH3I] / 60.0 / + Hnuclei + 36.0 * ab[IDX_CH3COCH3II] / 58.0 / + Hnuclei + 12.0 * ab[IDX_GCH2OHI] / 31.0 / + Hnuclei + 12.0 * ab[IDX_GCH3OHI] / 32.0 / + Hnuclei + 12.0 * ab[IDX_HONCI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCOI] / 59.0 / + Hnuclei + 24.0 * ab[IDX_HC2OII] / 41.0 / + Hnuclei + 12.0 * ab[IDX_CNOI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_GCH3OI] / 31.0 / + Hnuclei + 24.0 * ab[IDX_HCOOH2II] / 47.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCHOI] / 60.0 / + Hnuclei + 36.0 * ab[IDX_HC3OII] / 53.0 / + Hnuclei + 12.0 * ab[IDX_HCNOI] / 43.0 / + Hnuclei + 24.0 * ab[IDX_CH2COII] / 42.0 / + Hnuclei + 24.0 * ab[IDX_GCH3CHOI] / 44.0 / + Hnuclei + 12.0 * ab[IDX_GH2COI] / 30.0 / + Hnuclei + 12.0 * ab[IDX_HOCNI] / 43.0 / + Hnuclei + 24.0 * ab[IDX_CH3COI] / 43.0 / + Hnuclei + 36.0 * ab[IDX_CH3COCH4II] / 59.0 / + Hnuclei + 12.0 * ab[IDX_CH3OHII] / 32.0 / + Hnuclei + 24.0 * ab[IDX_COOHI] / 45.0 / + Hnuclei + 48.0 * ab[IDX_HCOOCH3I] / 60.0 / + Hnuclei + 12.0 * ab[IDX_HNCOI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_CH3COOHI] / 60.0 / + Hnuclei + 24.0 * ab[IDX_CH3OCH3I] / 46.0 / + Hnuclei + 12.0 * ab[IDX_CH3OI] / 31.0 / + Hnuclei + 12.0 * ab[IDX_GHCOI] / 29.0 / + Hnuclei + 12.0 * ab[IDX_OCSII] / 60.0 / + Hnuclei + 24.0 * ab[IDX_C2OI] / 40.0 / + Hnuclei + 12.0 * ab[IDX_CH2OHI] / 31.0 / + Hnuclei + 36.0 * ab[IDX_C3OI] / 52.0 / + Hnuclei + 24.0 * ab[IDX_CH3CHOHII] / 45.0 / + Hnuclei + 24.0 * ab[IDX_CH3COII] / 43.0 / + Hnuclei + 24.0 * ab[IDX_HCOOHI] / 46.0 / + Hnuclei + 24.0 * ab[IDX_C2H5OHI] / 46.0 / + Hnuclei + 12.0 * ab[IDX_CH3OH2II] / 33.0 / + Hnuclei + 24.0 * ab[IDX_CH2COI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_OCNI] / 42.0 / + Hnuclei + 36.0 * ab[IDX_CH3COCH3I] / 58.0 / + Hnuclei + 24.0 * ab[IDX_CO2II] / 44.0 / + Hnuclei + 12.0 * ab[IDX_GCOI] / 28.0 / + Hnuclei + 24.0 * ab[IDX_HCO2II] / 45.0 / + Hnuclei + 24.0 * ab[IDX_CH3CHOI] / 44.0 / + Hnuclei + 12.0 * ab[IDX_OCSI] / 60.0 / + Hnuclei + 12.0 * ab[IDX_COII] / 28.0 / + Hnuclei + 12.0 * ab[IDX_CH3OHI] / 32.0 / + Hnuclei + 12.0 * ab[IDX_H3COII] / 31.0 / + Hnuclei + 24.0 * ab[IDX_CO2I] / 44.0 / + Hnuclei + 12.0 * ab[IDX_H2COII] / 30.0 / + Hnuclei + 12.0 * ab[IDX_HCOI] / 29.0 / + Hnuclei + 12.0 * ab[IDX_H2COI] / 30.0 / + Hnuclei + 12.0 * ab[IDX_HCOII] / 29.0 / + Hnuclei + 12.0 * ab[IDX_COI] / 28.0 / + Hnuclei; + IJth(A, IDX_ELEM_O, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_O, IDX_ELEM_H) = 0.0 + 1.0 * ab[IDX_GHPOI] / 48.0 / Hnuclei + + 2.0 * ab[IDX_GH2SiOI] / 46.0 / Hnuclei + 8.0 + * ab[IDX_GCH3COOHI] / 60.0 / Hnuclei + 1.0 * + ab[IDX_GHCNOI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHNCOI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHOCNI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHONCI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_HC2OI] / 41.0 / Hnuclei + 4.0 * + ab[IDX_GH2O2I] / 34.0 / Hnuclei + 1.0 * + ab[IDX_GHC2OI] / 41.0 / Hnuclei + 2.0 * + ab[IDX_C3H2OII] / 54.0 / Hnuclei + 6.0 * + ab[IDX_GCH3COCH3I] / 58.0 / Hnuclei + 6.0 * + ab[IDX_GCH3OCH3I] / 46.0 / Hnuclei + 3.0 * + ab[IDX_H3C3OII] / 55.0 / Hnuclei + 6.0 * + ab[IDX_COOCH3II] / 59.0 / Hnuclei + 6.0 * + ab[IDX_GC2H5OHI] / 46.0 / Hnuclei + 2.0 * + ab[IDX_GO2HI] / 33.0 / Hnuclei + 2.0 * + ab[IDX_H2CNOII] / 44.0 / Hnuclei + 2.0 * + ab[IDX_H2NCOII] / 44.0 / Hnuclei + 2.0 * + ab[IDX_H2OCNII] / 44.0 / Hnuclei + 2.0 * + ab[IDX_H2NOII] / 32.0 / Hnuclei + 1.0 * + ab[IDX_HOCII] / 29.0 / Hnuclei + 1.0 * + ab[IDX_HSOII] / 49.0 / Hnuclei + 2.0 * + ab[IDX_HSiO2II] / 61.0 / Hnuclei + 6.0 * + ab[IDX_C2H5OHII] / 46.0 / Hnuclei + 6.0 * + ab[IDX_CH2OHCOII] / 59.0 / Hnuclei + 2.0 * + ab[IDX_GCH2COI] / 42.0 / Hnuclei + 1.0 * + ab[IDX_GHNOI] / 31.0 / Hnuclei + 2.0 * + ab[IDX_HCNOHII] / 44.0 / Hnuclei + 2.0 * + ab[IDX_HNCOHII] / 44.0 / Hnuclei + 1.0 * + ab[IDX_HOCNII] / 43.0 / Hnuclei + 4.0 * + ab[IDX_H2O2I] / 34.0 / Hnuclei + 1.0 * + ab[IDX_HONCII] / 43.0 / Hnuclei + 10.0 * + ab[IDX_CH2OHCH2OII] / 61.0 / Hnuclei + 6.0 * + ab[IDX_GCOOCH3I] / 59.0 / Hnuclei + 2.0 * + ab[IDX_H2SiOII] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HCNOII] / 43.0 / Hnuclei + 8.0 * + ab[IDX_CH3COOHII] / 60.0 / Hnuclei + 10.0 * + ab[IDX_H5C2O2II] / 61.0 / Hnuclei + 4.0 * + ab[IDX_HCOOHII] / 46.0 / Hnuclei + 10.0 * + ab[IDX_CH3COOH2II] / 61.0 / Hnuclei + 6.0 * + ab[IDX_CH3OCH3II] / 46.0 / Hnuclei + 6.0 * + ab[IDX_GCH2OHCOI] / 59.0 / Hnuclei + 2.0 * + ab[IDX_GCOOHI] / 45.0 / Hnuclei + 3.0 * + ab[IDX_H3SiOII] / 47.0 / Hnuclei + 2.0 * + ab[IDX_HSO2II] / 65.0 / Hnuclei + 7.0 * + ab[IDX_CH3OCH4II] / 47.0 / Hnuclei + 1.0 * + ab[IDX_HNCOII] / 43.0 / Hnuclei + 7.0 * + ab[IDX_C2H5OH2II] / 47.0 / Hnuclei + 6.0 * + ab[IDX_COOCH3I] / 59.0 / Hnuclei + 2.0 * + ab[IDX_H2POII] / 49.0 / Hnuclei + 8.0 * + ab[IDX_HCOOCH3II] / 60.0 / Hnuclei + 1.0 * + ab[IDX_HN2OII] / 45.0 / Hnuclei + 8.0 * + ab[IDX_CH2OHCHOII] / 60.0 / Hnuclei + 4.0 * + ab[IDX_CH3CHOII] / 44.0 / Hnuclei + 8.0 * + ab[IDX_GCH2OHCHOI] / 60.0 / Hnuclei + 4.0 * + ab[IDX_GHCOOHI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 3.0 * + ab[IDX_GCH3COI] / 43.0 / Hnuclei + 8.0 * + ab[IDX_GHCOOCH3I] / 60.0 / Hnuclei + 6.0 * + ab[IDX_CH3COCH3II] / 58.0 / Hnuclei + 3.0 * + ab[IDX_GCH2OHI] / 31.0 / Hnuclei + 4.0 * + ab[IDX_GCH3OHI] / 32.0 / Hnuclei + 1.0 * + ab[IDX_HONCI] / 43.0 / Hnuclei + 6.0 * + ab[IDX_CH2OHCOI] / 59.0 / Hnuclei + 2.0 * + ab[IDX_H2SiOI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HC2OII] / 41.0 / Hnuclei + 3.0 * + ab[IDX_GCH3OI] / 31.0 / Hnuclei + 2.0 * + ab[IDX_GH2OI] / 18.0 / Hnuclei + 6.0 * + ab[IDX_HCOOH2II] / 47.0 / Hnuclei + 1.0 * + ab[IDX_HPOII] / 48.0 / Hnuclei + 8.0 * + ab[IDX_CH2OHCHOI] / 60.0 / Hnuclei + 1.0 * + ab[IDX_HC3OII] / 53.0 / Hnuclei + 1.0 * + ab[IDX_HCNOI] / 43.0 / Hnuclei + 2.0 * + ab[IDX_CH2COII] / 42.0 / Hnuclei + 4.0 * + ab[IDX_GCH3CHOI] / 44.0 / Hnuclei + 2.0 * + ab[IDX_GH2COI] / 30.0 / Hnuclei + 1.0 * + ab[IDX_HOCNI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_HPOI] / 48.0 / Hnuclei + 3.0 * + ab[IDX_CH3COI] / 43.0 / Hnuclei + 7.0 * + ab[IDX_CH3COCH4II] / 59.0 / Hnuclei + 4.0 * + ab[IDX_CH3OHII] / 32.0 / Hnuclei + 2.0 * + ab[IDX_COOHI] / 45.0 / Hnuclei + 8.0 * + ab[IDX_HCOOCH3I] / 60.0 / Hnuclei + 1.0 * + ab[IDX_HNCOI] / 43.0 / Hnuclei + 8.0 * + ab[IDX_CH3COOHI] / 60.0 / Hnuclei + 6.0 * + ab[IDX_CH3OCH3I] / 46.0 / Hnuclei + 3.0 * + ab[IDX_CH3OI] / 31.0 / Hnuclei + 1.0 * + ab[IDX_GHCOI] / 29.0 / Hnuclei + 3.0 * + ab[IDX_CH2OHI] / 31.0 / Hnuclei + 5.0 * + ab[IDX_CH3CHOHII] / 45.0 / Hnuclei + 3.0 * + ab[IDX_CH3COII] / 43.0 / Hnuclei + 4.0 * + ab[IDX_HCOOHI] / 46.0 / Hnuclei + 2.0 * + ab[IDX_O2HI] / 33.0 / Hnuclei + 6.0 * + ab[IDX_C2H5OHI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HNOI] / 31.0 / Hnuclei + 5.0 * + ab[IDX_CH3OH2II] / 33.0 / Hnuclei + 2.0 * + ab[IDX_CH2COI] / 42.0 / Hnuclei + 6.0 * + ab[IDX_CH3COCH3I] / 58.0 / Hnuclei + 1.0 * + ab[IDX_GOHI] / 17.0 / Hnuclei + 2.0 * + ab[IDX_HCO2II] / 45.0 / Hnuclei + 4.0 * + ab[IDX_CH3CHOI] / 44.0 / Hnuclei + 2.0 * + ab[IDX_O2HII] / 33.0 / Hnuclei + 1.0 * + ab[IDX_HNOII] / 31.0 / Hnuclei + 1.0 * + ab[IDX_OHM] / 17.0 / Hnuclei + 4.0 * + ab[IDX_CH3OHI] / 32.0 / Hnuclei + 3.0 * + ab[IDX_H3COII] / 31.0 / Hnuclei + 1.0 * + ab[IDX_SiOHII] / 45.0 / Hnuclei + 1.0 * + ab[IDX_OHII] / 17.0 / Hnuclei + 2.0 * + ab[IDX_H2OII] / 18.0 / Hnuclei + 2.0 * + ab[IDX_H2COII] / 30.0 / Hnuclei + 1.0 * + ab[IDX_HCOI] / 29.0 / Hnuclei + 2.0 * + ab[IDX_H2COI] / 30.0 / Hnuclei + 1.0 * + ab[IDX_OHI] / 17.0 / Hnuclei + 3.0 * + ab[IDX_H3OII] / 19.0 / Hnuclei + 2.0 * + ab[IDX_H2OI] / 18.0 / Hnuclei + 1.0 * + ab[IDX_HCOII] / 29.0 / Hnuclei; + IJth(A, IDX_ELEM_He, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_P) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_Si) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_S) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_N) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_O) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_He) = 0.0 + 4.0 * ab[IDX_GHeI] / 4.0 / Hnuclei + + 4.0 * ab[IDX_HeHII] / 5.0 / Hnuclei + 4.0 * + ab[IDX_HeII] / 4.0 / Hnuclei + 4.0 * + ab[IDX_HeI] / 4.0 / Hnuclei; + IJth(A, IDX_ELEM_He, IDX_ELEM_C) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_He, IDX_ELEM_H) = 0.0 + 1.0 * ab[IDX_HeHII] / 5.0 / Hnuclei; + IJth(A, IDX_ELEM_C, IDX_ELEM_F) = 0.0 + 19.0 * ab[IDX_CFII] / 31.0 / Hnuclei; + IJth(A, IDX_ELEM_C, IDX_ELEM_Cl) = 0.0 + 35.0 * ab[IDX_GCClI] / 47.0 / Hnuclei + + 35.0 * ab[IDX_H2CClII] / 49.0 / Hnuclei + + 35.0 * ab[IDX_CClII] / 47.0 / Hnuclei + 35.0 + * ab[IDX_CClI] / 47.0 / Hnuclei; + IJth(A, IDX_ELEM_C, IDX_ELEM_P) = 0.0 + 62.0 * ab[IDX_GHC2PI] / 56.0 / Hnuclei + + 124.0 * ab[IDX_GC4PI] / 79.0 / Hnuclei + + 31.0 * ab[IDX_GCH2PHI] / 46.0 / Hnuclei + + 31.0 * ab[IDX_GHCPI] / 44.0 / Hnuclei + 93.0 + * ab[IDX_GC3PI] / 67.0 / Hnuclei + 62.0 * + ab[IDX_GCCPI] / 55.0 / Hnuclei + 124.0 * + ab[IDX_C4PII] / 79.0 / Hnuclei + 31.0 * + ab[IDX_GCPI] / 43.0 / Hnuclei + 62.0 * + ab[IDX_PC2H4II] / 59.0 / Hnuclei + 62.0 * + ab[IDX_PC2H3II] / 58.0 / Hnuclei + 31.0 * + ab[IDX_PCH3II] / 46.0 / Hnuclei + 93.0 * + ab[IDX_PC3HII] / 68.0 / Hnuclei + 31.0 * + ab[IDX_PCH4II] / 47.0 / Hnuclei + 62.0 * + ab[IDX_CCPII] / 55.0 / Hnuclei + 62.0 * + ab[IDX_PC2H2II] / 57.0 / Hnuclei + 124.0 * + ab[IDX_PC4HII] / 80.0 / Hnuclei + 31.0 * + ab[IDX_CPII] / 43.0 / Hnuclei + 62.0 * + ab[IDX_HC2PII] / 56.0 / Hnuclei + 31.0 * + ab[IDX_PCH2II] / 45.0 / Hnuclei + 31.0 * + ab[IDX_HCPII] / 44.0 / Hnuclei + 31.0 * + ab[IDX_CH2PHI] / 46.0 / Hnuclei + 124.0 * + ab[IDX_C4PI] / 79.0 / Hnuclei + 31.0 * + ab[IDX_HCPI] / 44.0 / Hnuclei + 93.0 * + ab[IDX_C3PI] / 67.0 / Hnuclei + 62.0 * + ab[IDX_HC2PI] / 56.0 / Hnuclei + 62.0 * + ab[IDX_CCPI] / 55.0 / Hnuclei + 31.0 * + ab[IDX_CPI] / 43.0 / Hnuclei; + IJth(A, IDX_ELEM_C, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_C, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_C, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_C, IDX_ELEM_Si) = 0.0 + 84.0 * ab[IDX_GSiC3HI] / 65.0 / + Hnuclei + 28.0 * ab[IDX_GSiCH3I] / 43.0 / + Hnuclei + 56.0 * ab[IDX_GSiC2HI] / 53.0 / + Hnuclei + 56.0 * ab[IDX_GSiC2H2I] / 54.0 / + Hnuclei + 112.0 * ab[IDX_GSiC4I] / 76.0 / + Hnuclei + 28.0 * ab[IDX_GSiNCI] / 54.0 / + Hnuclei + 28.0 * ab[IDX_GHCSiI] / 41.0 / + Hnuclei + 84.0 * ab[IDX_GSiC3I] / 64.0 / + Hnuclei + 28.0 * ab[IDX_GSiCH2I] / 42.0 / + Hnuclei + 28.0 * ab[IDX_GSiCI] / 40.0 / + Hnuclei + 56.0 * ab[IDX_GSiC2I] / 52.0 / + Hnuclei + 84.0 * ab[IDX_SiC3H2II] / 66.0 / + Hnuclei + 112.0 * ab[IDX_SiC4II] / 76.0 / + Hnuclei + 112.0 * ab[IDX_SiC4HII] / 77.0 / + Hnuclei + 28.0 * ab[IDX_SiNCHII] / 55.0 / + Hnuclei + 28.0 * ab[IDX_SiCH4II] / 44.0 / + Hnuclei + 56.0 * ab[IDX_SiC2H3II] / 55.0 / + Hnuclei + 84.0 * ab[IDX_SiC3HI] / 65.0 / + Hnuclei + 28.0 * ab[IDX_SiCH3II] / 43.0 / + Hnuclei + 112.0 * ab[IDX_SiC4I] / 76.0 / + Hnuclei + 28.0 * ab[IDX_SiNCI] / 54.0 / + Hnuclei + 28.0 * ab[IDX_SiNCII] / 54.0 / + Hnuclei + 56.0 * ab[IDX_SiC2H2I] / 54.0 / + Hnuclei + 84.0 * ab[IDX_SiC3II] / 64.0 / + Hnuclei + 84.0 * ab[IDX_SiC3HII] / 65.0 / + Hnuclei + 28.0 * ab[IDX_SiCH3I] / 43.0 / + Hnuclei + 56.0 * ab[IDX_SiC2II] / 52.0 / + Hnuclei + 56.0 * ab[IDX_SiC2H2II] / 54.0 / + Hnuclei + 56.0 * ab[IDX_SiC2HI] / 53.0 / + Hnuclei + 84.0 * ab[IDX_SiC3I] / 64.0 / + Hnuclei + 28.0 * ab[IDX_SiCII] / 40.0 / + Hnuclei + 28.0 * ab[IDX_HCSiI] / 41.0 / + Hnuclei + 28.0 * ab[IDX_SiCH2I] / 42.0 / + Hnuclei + 28.0 * ab[IDX_HCSiII] / 41.0 / + Hnuclei + 56.0 * ab[IDX_SiC2I] / 52.0 / + Hnuclei + 56.0 * ab[IDX_SiC2HII] / 53.0 / + Hnuclei + 28.0 * ab[IDX_SiCI] / 40.0 / + Hnuclei + 28.0 * ab[IDX_SiCH2II] / 42.0 / + Hnuclei; + IJth(A, IDX_ELEM_C, IDX_ELEM_S) = 0.0 + 128.0 * ab[IDX_GC4SI] / 80.0 / Hnuclei + + 96.0 * ab[IDX_GC3SI] / 68.0 / Hnuclei + + 64.0 * ab[IDX_GC2SI] / 56.0 / Hnuclei + 32.0 + * ab[IDX_GH2CSI] / 46.0 / Hnuclei + 32.0 * + ab[IDX_GHCSI] / 45.0 / Hnuclei + 32.0 * + ab[IDX_GOCSI] / 60.0 / Hnuclei + 64.0 * + ab[IDX_CH3CSII] / 59.0 / Hnuclei + 64.0 * + ab[IDX_C2SII] / 56.0 / Hnuclei + 96.0 * + ab[IDX_C3SII] / 68.0 / Hnuclei + 32.0 * + ab[IDX_GCSI] / 44.0 / Hnuclei + 32.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 128.0 * + ab[IDX_HC4SII] / 81.0 / Hnuclei + 32.0 * + ab[IDX_H3CSII] / 47.0 / Hnuclei + 96.0 * + ab[IDX_HC3SII] / 69.0 / Hnuclei + 32.0 * + ab[IDX_H2CSII] / 46.0 / Hnuclei + 32.0 * + ab[IDX_H2CSI] / 46.0 / Hnuclei + 96.0 * + ab[IDX_C3SI] / 68.0 / Hnuclei + 32.0 * + ab[IDX_OCSII] / 60.0 / Hnuclei + 32.0 * + ab[IDX_HCSI] / 45.0 / Hnuclei + 32.0 * + ab[IDX_HCSII] / 45.0 / Hnuclei + 32.0 * + ab[IDX_CSII] / 44.0 / Hnuclei + 128.0 * + ab[IDX_C4SII] / 80.0 / Hnuclei + 32.0 * + ab[IDX_OCSI] / 60.0 / Hnuclei + 64.0 * + ab[IDX_HC2SII] / 57.0 / Hnuclei + 128.0 * + ab[IDX_C4SI] / 80.0 / Hnuclei + 32.0 * + ab[IDX_CSI] / 44.0 / Hnuclei + 64.0 * + ab[IDX_C2SI] / 56.0 / Hnuclei; + IJth(A, IDX_ELEM_C, IDX_ELEM_N) = 0.0 + 56.0 * ab[IDX_GCH3C3NI] / 65.0 / + Hnuclei + 84.0 * ab[IDX_GCH3C5NI] / 89.0 / + Hnuclei + 112.0 * ab[IDX_GCH3C7NI] / 113.0 / + Hnuclei + 28.0 * ab[IDX_GNH2CNI] / 42.0 / + Hnuclei + 56.0 * ab[IDX_GNCCNI] / 52.0 / + Hnuclei + 42.0 * ab[IDX_C2H4CNI] / 54.0 / + Hnuclei + 56.0 * ab[IDX_GC4NI] / 62.0 / + Hnuclei + 14.0 * ab[IDX_GHCNOI] / 43.0 / + Hnuclei + 42.0 * ab[IDX_GHNC3I] / 51.0 / + Hnuclei + 14.0 * ab[IDX_GHNCOI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHOCNI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHONCI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GSiNCI] / 54.0 / + Hnuclei + 84.0 * ab[IDX_NCCNCH3II] / 67.0 / + Hnuclei + 42.0 * ab[IDX_GC2H4CNI] / 54.0 / + Hnuclei + 28.0 * ab[IDX_GCH2CNI] / 40.0 / + Hnuclei + 28.0 * ab[IDX_GCH3CNI] / 41.0 / + Hnuclei + 14.0 * ab[IDX_GH2CNI] / 28.0 / + Hnuclei + 70.0 * ab[IDX_GHC5NI] / 75.0 / + Hnuclei + 98.0 * ab[IDX_GHC7NI] / 99.0 / + Hnuclei + 126.0 * ab[IDX_GHC9NI] / 123.0 / + Hnuclei + 28.0 * ab[IDX_GHCCNI] / 39.0 / + Hnuclei + 28.0 * ab[IDX_HCCNI] / 39.0 / + Hnuclei + 56.0 * ab[IDX_CH3C3NII] / 65.0 / + Hnuclei + 42.0 * ab[IDX_GCH2CHCNI] / 53.0 / + Hnuclei + 42.0 * ab[IDX_GHC3NI] / 51.0 / + Hnuclei + 70.0 * ab[IDX_C5NII] / 74.0 / + Hnuclei + 42.0 * ab[IDX_CH2CHCNII] / 53.0 / + Hnuclei + 42.0 * ab[IDX_GC2H5CNI] / 55.0 / + Hnuclei + 126.0 * ab[IDX_GC9NI] / 122.0 / + Hnuclei + 14.0 * ab[IDX_GOCNI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_H2CNOII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_H2NCOII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_H2OCNII] / 44.0 / + Hnuclei + 98.0 * ab[IDX_C7NII] / 98.0 / + Hnuclei + 126.0 * ab[IDX_C9NII] / 122.0 / + Hnuclei + 14.0 * ab[IDX_CH3NHII] / 30.0 / + Hnuclei + 28.0 * ab[IDX_GC2NI] / 38.0 / + Hnuclei + 14.0 * ab[IDX_GCH2NHI] / 29.0 / + Hnuclei + 14.0 * ab[IDX_GCNOI] / 42.0 / + Hnuclei + 14.0 * ab[IDX_GHNCI] / 27.0 / + Hnuclei + 56.0 * ab[IDX_H2C4NII] / 64.0 / + Hnuclei + 28.0 * ab[IDX_NH2CNHII] / 43.0 / + Hnuclei + 56.0 * ab[IDX_HC4NII] / 63.0 / + Hnuclei + 14.0 * ab[IDX_HCNOHII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_HNCOHII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_HOCNII] / 43.0 / + Hnuclei + 70.0 * ab[IDX_GC5NI] / 74.0 / + Hnuclei + 98.0 * ab[IDX_H2C7NII] / 100.0 / + Hnuclei + 126.0 * ab[IDX_H2C9NII] / 124.0 / + Hnuclei + 14.0 * ab[IDX_HONCII] / 43.0 / + Hnuclei + 42.0 * ab[IDX_C2H5CNHII] / 56.0 / + Hnuclei + 14.0 * ab[IDX_CH2NH2II] / 30.0 / + Hnuclei + 84.0 * ab[IDX_CH3C5NHII] / 90.0 / + Hnuclei + 112.0 * ab[IDX_CH3C7NHII] / 114.0 + / Hnuclei + 42.0 * ab[IDX_GC3NI] / 50.0 / + Hnuclei + 98.0 * ab[IDX_GC7NI] / 98.0 / + Hnuclei + 14.0 * ab[IDX_GHCNI] / 27.0 / + Hnuclei + 14.0 * ab[IDX_H2CNI] / 28.0 / + Hnuclei + 70.0 * ab[IDX_H3C5NII] / 77.0 / + Hnuclei + 14.0 * ab[IDX_HCNOII] / 43.0 / + Hnuclei + 126.0 * ab[IDX_H3C9NII] / 125.0 / + Hnuclei + 56.0 * ab[IDX_C4NI] / 62.0 / + Hnuclei + 98.0 * ab[IDX_H3C7NII] / 101.0 / + Hnuclei + 28.0 * ab[IDX_NH2CNI] / 42.0 / + Hnuclei + 56.0 * ab[IDX_CH3C3NHII] / 66.0 / + Hnuclei + 98.0 * ab[IDX_HC7NII] / 99.0 / + Hnuclei + 126.0 * ab[IDX_HC9NII] / 123.0 / + Hnuclei + 14.0 * ab[IDX_HNCOII] / 43.0 / + Hnuclei + 42.0 * ab[IDX_C2H5CNI] / 55.0 / + Hnuclei + 42.0 * ab[IDX_CH2CHCNHII] / 54.0 / + Hnuclei + 14.0 * ab[IDX_SiNCHII] / 55.0 / + Hnuclei + 14.0 * ab[IDX_OCNII] / 42.0 / + Hnuclei + 56.0 * ab[IDX_C2N2II] / 52.0 / + Hnuclei + 28.0 * ab[IDX_CH3CNII] / 41.0 / + Hnuclei + 70.0 * ab[IDX_HC5NHII] / 76.0 / + Hnuclei + 42.0 * ab[IDX_C3NII] / 50.0 / + Hnuclei + 28.0 * ab[IDX_CH2CNII] / 40.0 / + Hnuclei + 70.0 * ab[IDX_HC5NII] / 75.0 / + Hnuclei + 14.0 * ab[IDX_HONCI] / 43.0 / + Hnuclei + 84.0 * ab[IDX_CH3C5NI] / 89.0 / + Hnuclei + 112.0 * ab[IDX_CH3C7NI] / 113.0 / + Hnuclei + 14.0 * ab[IDX_H2NCII] / 28.0 / + Hnuclei + 14.0 * ab[IDX_SiNCI] / 54.0 / + Hnuclei + 14.0 * ab[IDX_SiNCII] / 54.0 / + Hnuclei + 14.0 * ab[IDX_CNOI] / 42.0 / + Hnuclei + 28.0 * ab[IDX_C2NHII] / 39.0 / + Hnuclei + 14.0 * ab[IDX_HCNOI] / 43.0 / + Hnuclei + 56.0 * ab[IDX_C4NII] / 62.0 / + Hnuclei + 56.0 * ab[IDX_CH3C3NI] / 65.0 / + Hnuclei + 14.0 * ab[IDX_HOCNI] / 43.0 / + Hnuclei + 126.0 * ab[IDX_HC9NI] / 123.0 / + Hnuclei + 56.0 * ab[IDX_NCCNHII] / 53.0 / + Hnuclei + 28.0 * ab[IDX_CH2CNI] / 40.0 / + Hnuclei + 14.0 * ab[IDX_HNCOI] / 43.0 / + Hnuclei + 126.0 * ab[IDX_C9NI] / 122.0 / + Hnuclei + 14.0 * ab[IDX_CH2NHI] / 29.0 / + Hnuclei + 42.0 * ab[IDX_CH2CHCNI] / 53.0 / + Hnuclei + 28.0 * ab[IDX_CH3CNHII] / 42.0 / + Hnuclei + 98.0 * ab[IDX_HC7NI] / 99.0 / + Hnuclei + 98.0 * ab[IDX_C7NI] / 98.0 / + Hnuclei + 28.0 * ab[IDX_C2NII] / 38.0 / + Hnuclei + 42.0 * ab[IDX_HNC3I] / 51.0 / + Hnuclei + 14.0 * ab[IDX_OCNI] / 42.0 / + Hnuclei + 42.0 * ab[IDX_HC3NII] / 51.0 / + Hnuclei + 70.0 * ab[IDX_HC5NI] / 75.0 / + Hnuclei + 42.0 * ab[IDX_HC3NHII] / 52.0 / + Hnuclei + 28.0 * ab[IDX_CH3CNI] / 41.0 / + Hnuclei + 56.0 * ab[IDX_NCCNI] / 52.0 / + Hnuclei + 14.0 * ab[IDX_GCNI] / 26.0 / + Hnuclei + 14.0 * ab[IDX_CNII] / 26.0 / + Hnuclei + 14.0 * ab[IDX_HCNII] / 27.0 / + Hnuclei + 28.0 * ab[IDX_CNCII] / 38.0 / + Hnuclei + 70.0 * ab[IDX_C5NM] / 74.0 / + Hnuclei + 42.0 * ab[IDX_HC3NI] / 51.0 / + Hnuclei + 28.0 * ab[IDX_C2NI] / 38.0 / + Hnuclei + 70.0 * ab[IDX_C5NI] / 74.0 / + Hnuclei + 42.0 * ab[IDX_C3NM] / 50.0 / + Hnuclei + 42.0 * ab[IDX_C3NI] / 50.0 / + Hnuclei + 14.0 * ab[IDX_CNM] / 26.0 / + Hnuclei + 14.0 * ab[IDX_HCNHII] / 28.0 / + Hnuclei + 14.0 * ab[IDX_HNCI] / 27.0 / + Hnuclei + 14.0 * ab[IDX_HCNI] / 27.0 / + Hnuclei + 14.0 * ab[IDX_CNI] / 26.0 / + Hnuclei; + IJth(A, IDX_ELEM_C, IDX_ELEM_O) = 0.0 + 64.0 * ab[IDX_GCH3COOHI] / 60.0 / + Hnuclei + 16.0 * ab[IDX_GHCNOI] / 43.0 / + Hnuclei + 16.0 * ab[IDX_GHNCOI] / 43.0 / + Hnuclei + 16.0 * ab[IDX_GHOCNI] / 43.0 / + Hnuclei + 16.0 * ab[IDX_GHONCI] / 43.0 / + Hnuclei + 32.0 * ab[IDX_HC2OI] / 41.0 / + Hnuclei + 48.0 * ab[IDX_GC3OI] / 52.0 / + Hnuclei + 32.0 * ab[IDX_GHC2OI] / 41.0 / + Hnuclei + 48.0 * ab[IDX_C3H2OII] / 54.0 / + Hnuclei + 48.0 * ab[IDX_GCH3COCH3I] / 58.0 / + Hnuclei + 32.0 * ab[IDX_GCH3OCH3I] / 46.0 / + Hnuclei + 48.0 * ab[IDX_H3C3OII] / 55.0 / + Hnuclei + 16.0 * ab[IDX_GOCSI] / 60.0 / + Hnuclei + 64.0 * ab[IDX_COOCH3II] / 59.0 / + Hnuclei + 32.0 * ab[IDX_GC2H5OHI] / 46.0 / + Hnuclei + 32.0 * ab[IDX_GC2OI] / 40.0 / + Hnuclei + 32.0 * ab[IDX_GCO2I] / 44.0 / + Hnuclei + 16.0 * ab[IDX_GOCNI] / 42.0 / + Hnuclei + 16.0 * ab[IDX_H2CNOII] / 44.0 / + Hnuclei + 16.0 * ab[IDX_H2NCOII] / 44.0 / + Hnuclei + 16.0 * ab[IDX_H2OCNII] / 44.0 / + Hnuclei + 16.0 * ab[IDX_GCNOI] / 42.0 / + Hnuclei + 16.0 * ab[IDX_HOCII] / 29.0 / + Hnuclei + 32.0 * ab[IDX_C2H5OHII] / 46.0 / + Hnuclei + 32.0 * ab[IDX_C2OII] / 40.0 / + Hnuclei + 64.0 * ab[IDX_CH2OHCOII] / 59.0 / + Hnuclei + 32.0 * ab[IDX_GCH2COI] / 42.0 / + Hnuclei + 16.0 * ab[IDX_HCNOHII] / 44.0 / + Hnuclei + 16.0 * ab[IDX_HNCOHII] / 44.0 / + Hnuclei + 16.0 * ab[IDX_HOCNII] / 43.0 / + Hnuclei + 16.0 * ab[IDX_HONCII] / 43.0 / + Hnuclei + 64.0 * ab[IDX_CH2OHCH2OII] / 61.0 + / Hnuclei + 64.0 * ab[IDX_GCOOCH3I] / 59.0 / + Hnuclei + 16.0 * ab[IDX_HCNOII] / 43.0 / + Hnuclei + 64.0 * ab[IDX_CH3COOHII] / 60.0 / + Hnuclei + 64.0 * ab[IDX_H5C2O2II] / 61.0 / + Hnuclei + 32.0 * ab[IDX_HCOOHII] / 46.0 / + Hnuclei + 64.0 * ab[IDX_CH3COOH2II] / 61.0 / + Hnuclei + 32.0 * ab[IDX_CH3OCH3II] / 46.0 / + Hnuclei + 64.0 * ab[IDX_GCH2OHCOI] / 59.0 / + Hnuclei + 32.0 * ab[IDX_GCOOHI] / 45.0 / + Hnuclei + 32.0 * ab[IDX_CH3OCH4II] / 47.0 / + Hnuclei + 16.0 * ab[IDX_HNCOII] / 43.0 / + Hnuclei + 32.0 * ab[IDX_C2H5OH2II] / 47.0 / + Hnuclei + 64.0 * ab[IDX_COOCH3I] / 59.0 / + Hnuclei + 64.0 * ab[IDX_HCOOCH3II] / 60.0 / + Hnuclei + 48.0 * ab[IDX_C3OII] / 52.0 / + Hnuclei + 64.0 * ab[IDX_CH2OHCHOII] / 60.0 / + Hnuclei + 32.0 * ab[IDX_CH3CHOII] / 44.0 / + Hnuclei + 64.0 * ab[IDX_GCH2OHCHOI] / 60.0 / + Hnuclei + 32.0 * ab[IDX_GHCOOHI] / 46.0 / + Hnuclei + 16.0 * ab[IDX_HOCSII] / 61.0 / + Hnuclei + 16.0 * ab[IDX_OCNII] / 42.0 / + Hnuclei + 32.0 * ab[IDX_GCH3COI] / 43.0 / + Hnuclei + 64.0 * ab[IDX_GHCOOCH3I] / 60.0 / + Hnuclei + 48.0 * ab[IDX_CH3COCH3II] / 58.0 / + Hnuclei + 16.0 * ab[IDX_GCH2OHI] / 31.0 / + Hnuclei + 16.0 * ab[IDX_GCH3OHI] / 32.0 / + Hnuclei + 16.0 * ab[IDX_HONCI] / 43.0 / + Hnuclei + 64.0 * ab[IDX_CH2OHCOI] / 59.0 / + Hnuclei + 32.0 * ab[IDX_HC2OII] / 41.0 / + Hnuclei + 16.0 * ab[IDX_CNOI] / 42.0 / + Hnuclei + 16.0 * ab[IDX_GCH3OI] / 31.0 / + Hnuclei + 32.0 * ab[IDX_HCOOH2II] / 47.0 / + Hnuclei + 64.0 * ab[IDX_CH2OHCHOI] / 60.0 / + Hnuclei + 48.0 * ab[IDX_HC3OII] / 53.0 / + Hnuclei + 16.0 * ab[IDX_HCNOI] / 43.0 / + Hnuclei + 32.0 * ab[IDX_CH2COII] / 42.0 / + Hnuclei + 32.0 * ab[IDX_GCH3CHOI] / 44.0 / + Hnuclei + 16.0 * ab[IDX_GH2COI] / 30.0 / + Hnuclei + 16.0 * ab[IDX_HOCNI] / 43.0 / + Hnuclei + 32.0 * ab[IDX_CH3COI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_CH3COCH4II] / 59.0 / + Hnuclei + 16.0 * ab[IDX_CH3OHII] / 32.0 / + Hnuclei + 32.0 * ab[IDX_COOHI] / 45.0 / + Hnuclei + 64.0 * ab[IDX_HCOOCH3I] / 60.0 / + Hnuclei + 16.0 * ab[IDX_HNCOI] / 43.0 / + Hnuclei + 64.0 * ab[IDX_CH3COOHI] / 60.0 / + Hnuclei + 32.0 * ab[IDX_CH3OCH3I] / 46.0 / + Hnuclei + 16.0 * ab[IDX_CH3OI] / 31.0 / + Hnuclei + 16.0 * ab[IDX_GHCOI] / 29.0 / + Hnuclei + 16.0 * ab[IDX_OCSII] / 60.0 / + Hnuclei + 32.0 * ab[IDX_C2OI] / 40.0 / + Hnuclei + 16.0 * ab[IDX_CH2OHI] / 31.0 / + Hnuclei + 48.0 * ab[IDX_C3OI] / 52.0 / + Hnuclei + 32.0 * ab[IDX_CH3CHOHII] / 45.0 / + Hnuclei + 32.0 * ab[IDX_CH3COII] / 43.0 / + Hnuclei + 32.0 * ab[IDX_HCOOHI] / 46.0 / + Hnuclei + 32.0 * ab[IDX_C2H5OHI] / 46.0 / + Hnuclei + 16.0 * ab[IDX_CH3OH2II] / 33.0 / + Hnuclei + 32.0 * ab[IDX_CH2COI] / 42.0 / + Hnuclei + 16.0 * ab[IDX_OCNI] / 42.0 / + Hnuclei + 48.0 * ab[IDX_CH3COCH3I] / 58.0 / + Hnuclei + 32.0 * ab[IDX_CO2II] / 44.0 / + Hnuclei + 16.0 * ab[IDX_GCOI] / 28.0 / + Hnuclei + 32.0 * ab[IDX_HCO2II] / 45.0 / + Hnuclei + 32.0 * ab[IDX_CH3CHOI] / 44.0 / + Hnuclei + 16.0 * ab[IDX_OCSI] / 60.0 / + Hnuclei + 16.0 * ab[IDX_COII] / 28.0 / + Hnuclei + 16.0 * ab[IDX_CH3OHI] / 32.0 / + Hnuclei + 16.0 * ab[IDX_H3COII] / 31.0 / + Hnuclei + 32.0 * ab[IDX_CO2I] / 44.0 / + Hnuclei + 16.0 * ab[IDX_H2COII] / 30.0 / + Hnuclei + 16.0 * ab[IDX_HCOI] / 29.0 / + Hnuclei + 16.0 * ab[IDX_H2COI] / 30.0 / + Hnuclei + 16.0 * ab[IDX_HCOII] / 29.0 / + Hnuclei + 16.0 * ab[IDX_COI] / 28.0 / + Hnuclei; + IJth(A, IDX_ELEM_C, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_C, IDX_ELEM_C) = 0.0 + 192.0 * ab[IDX_GC4H6I] / 54.0 / + Hnuclei + 192.0 * ab[IDX_GC4SI] / 80.0 / + Hnuclei + 12.0 * ab[IDX_GCClI] / 47.0 / + Hnuclei + 192.0 * ab[IDX_GCH3C3NI] / 65.0 / + Hnuclei + 300.0 * ab[IDX_GCH3C4HI] / 64.0 / + Hnuclei + 432.0 * ab[IDX_GCH3C5NI] / 89.0 / + Hnuclei + 588.0 * ab[IDX_GCH3C6HI] / 88.0 / + Hnuclei + 768.0 * ab[IDX_GCH3C7NI] / 113.0 / + Hnuclei + 48.0 * ab[IDX_GHC2PI] / 56.0 / + Hnuclei + 12.0 * ab[IDX_GNH2CNI] / 42.0 / + Hnuclei + 108.0 * ab[IDX_GSiC3HI] / 65.0 / + Hnuclei + 12.0 * ab[IDX_GSiCH3I] / 43.0 / + Hnuclei + 48.0 * ab[IDX_GNCCNI] / 52.0 / + Hnuclei + 48.0 * ab[IDX_GSiC2HI] / 53.0 / + Hnuclei + 108.0 * ab[IDX_C2H4CNI] / 54.0 / + Hnuclei + 108.0 * ab[IDX_GC3SI] / 68.0 / + Hnuclei + 192.0 * ab[IDX_GC4NI] / 62.0 / + Hnuclei + 192.0 * ab[IDX_GC4PI] / 79.0 / + Hnuclei + 12.0 * ab[IDX_GCH2PHI] / 46.0 / + Hnuclei + 108.0 * ab[IDX_GCH3CHCH2I] / 42.0 + / Hnuclei + 48.0 * ab[IDX_GCH3COOHI] / 60.0 + / Hnuclei + 12.0 * ab[IDX_GHCNOI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHCPI] / 44.0 / + Hnuclei + 108.0 * ab[IDX_GHNC3I] / 51.0 / + Hnuclei + 12.0 * ab[IDX_GHNCOI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHOCNI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHONCI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_GSiC2H2I] / 54.0 / + Hnuclei + 192.0 * ab[IDX_GSiC4I] / 76.0 / + Hnuclei + 12.0 * ab[IDX_GSiNCI] / 54.0 / + Hnuclei + 48.0 * ab[IDX_HC2OI] / 41.0 / + Hnuclei + 108.0 * ab[IDX_GC3PI] / 67.0 / + Hnuclei + 432.0 * ab[IDX_GC6H6I] / 78.0 / + Hnuclei + 12.0 * ab[IDX_GHCSiI] / 41.0 / + Hnuclei + 108.0 * ab[IDX_NCCNCH3II] / 67.0 / + Hnuclei + 108.0 * ab[IDX_GC2H4CNI] / 54.0 / + Hnuclei + 48.0 * ab[IDX_GC2SI] / 56.0 / + Hnuclei + 108.0 * ab[IDX_GC3OI] / 52.0 / + Hnuclei + 192.0 * ab[IDX_GC4H3I] / 51.0 / + Hnuclei + 588.0 * ab[IDX_GC7H2I] / 86.0 / + Hnuclei + 768.0 * ab[IDX_GC8H2I] / 98.0 / + Hnuclei + 972.0 * ab[IDX_GC9H2I] / 110.0 / + Hnuclei + 48.0 * ab[IDX_GCH2CNI] / 40.0 / + Hnuclei + 48.0 * ab[IDX_GCH3CNI] / 41.0 / + Hnuclei + 12.0 * ab[IDX_GH2CNI] / 28.0 / + Hnuclei + 12.0 * ab[IDX_GH2CSI] / 46.0 / + Hnuclei + 48.0 * ab[IDX_GHC2OI] / 41.0 / + Hnuclei + 300.0 * ab[IDX_GHC5NI] / 75.0 / + Hnuclei + 588.0 * ab[IDX_GHC7NI] / 99.0 / + Hnuclei + 972.0 * ab[IDX_GHC9NI] / 123.0 / + Hnuclei + 48.0 * ab[IDX_GHCCNI] / 39.0 / + Hnuclei + 12.0 * ab[IDX_GHCSI] / 45.0 / + Hnuclei + 108.0 * ab[IDX_GSiC3I] / 64.0 / + Hnuclei + 48.0 * ab[IDX_HCCNI] / 39.0 / + Hnuclei + 108.0 * ab[IDX_C3H2OII] / 54.0 / + Hnuclei + 12.0 * ab[IDX_CFII] / 31.0 / + Hnuclei + 48.0 * ab[IDX_GC2H6I] / 30.0 / + Hnuclei + 108.0 * ab[IDX_GC3H2I] / 38.0 / + Hnuclei + 300.0 * ab[IDX_GC5H2I] / 62.0 / + Hnuclei + 48.0 * ab[IDX_GCCPI] / 55.0 / + Hnuclei + 192.0 * ab[IDX_GCH2CHCCHI] / 52.0 + / Hnuclei + 108.0 * ab[IDX_GCH3COCH3I] / + 58.0 / Hnuclei + 48.0 * ab[IDX_GCH3OCH3I] / + 46.0 / Hnuclei + 12.0 * ab[IDX_GSiCH2I] / + 42.0 / Hnuclei + 108.0 * ab[IDX_H3C3OII] / + 55.0 / Hnuclei + 768.0 * ab[IDX_C8H5II] / + 101.0 / Hnuclei + 972.0 * ab[IDX_C9H5II] / + 113.0 / Hnuclei + 192.0 * ab[IDX_CH3C3NII] / + 65.0 / Hnuclei + 1200.0 * ab[IDX_GC10H2I] / + 122.0 / Hnuclei + 192.0 * ab[IDX_GC4H2I] / + 50.0 / Hnuclei + 108.0 * ab[IDX_GCH2CHCNI] / + 53.0 / Hnuclei + 108.0 * ab[IDX_GH2CCCI] / + 38.0 / Hnuclei + 108.0 * ab[IDX_GHC3NI] / + 51.0 / Hnuclei + 12.0 * ab[IDX_GOCSI] / 60.0 + / Hnuclei + 192.0 * ab[IDX_C4H6I] / 54.0 / + Hnuclei + 192.0 * ab[IDX_C4PII] / 79.0 / + Hnuclei + 300.0 * ab[IDX_C5NII] / 74.0 / + Hnuclei + 432.0 * ab[IDX_C6H6II] / 78.0 / + Hnuclei + 108.0 * ab[IDX_CH2CHCNII] / 53.0 / + Hnuclei + 48.0 * ab[IDX_COOCH3II] / 59.0 / + Hnuclei + 108.0 * ab[IDX_GC2H5CNI] / 55.0 / + Hnuclei + 48.0 * ab[IDX_GC2H5OHI] / 46.0 / + Hnuclei + 48.0 * ab[IDX_GC2OI] / 40.0 / + Hnuclei + 432.0 * ab[IDX_GC6H2I] / 74.0 / + Hnuclei + 972.0 * ab[IDX_GC9NI] / 122.0 / + Hnuclei + 12.0 * ab[IDX_GCO2I] / 44.0 / + Hnuclei + 12.0 * ab[IDX_GCPI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GOCNI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_GSiCI] / 40.0 / + Hnuclei + 12.0 * ab[IDX_H2CNOII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_H2NCOII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_H2OCNII] / 44.0 / + Hnuclei + 48.0 * ab[IDX_PC2H4II] / 59.0 / + Hnuclei + 588.0 * ab[IDX_C7NII] / 98.0 / + Hnuclei + 972.0 * ab[IDX_C9NII] / 122.0 / + Hnuclei + 12.0 * ab[IDX_CH3NHII] / 30.0 / + Hnuclei + 1452.0 * ab[IDX_GC11I] / 132.0 / + Hnuclei + 48.0 * ab[IDX_GC2NI] / 38.0 / + Hnuclei + 108.0 * ab[IDX_GCH2CCH2I] / 40.0 / + Hnuclei + 12.0 * ab[IDX_GCH2NHI] / 29.0 / + Hnuclei + 108.0 * ab[IDX_GCH3CCHI] / 40.0 / + Hnuclei + 12.0 * ab[IDX_GCNOI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_GHNCI] / 27.0 / + Hnuclei + 48.0 * ab[IDX_GSiC2I] / 52.0 / + Hnuclei + 192.0 * ab[IDX_H2C4NII] / 64.0 / + Hnuclei + 12.0 * ab[IDX_H2CClII] / 49.0 / + Hnuclei + 12.0 * ab[IDX_HOCII] / 29.0 / + Hnuclei + 12.0 * ab[IDX_NH2CNHII] / 43.0 / + Hnuclei + 48.0 * ab[IDX_C2H5OHII] / 46.0 / + Hnuclei + 48.0 * ab[IDX_C2OII] / 40.0 / + Hnuclei + 192.0 * ab[IDX_CH2CHCCHI] / 52.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCOII] / 59.0 / + Hnuclei + 108.0 * ab[IDX_GCH2CCHI] / 39.0 / + Hnuclei + 48.0 * ab[IDX_GCH2COI] / 42.0 / + Hnuclei + 192.0 * ab[IDX_HC4NII] / 63.0 / + Hnuclei + 12.0 * ab[IDX_HCNOHII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_HNCOHII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_HOCNII] / 43.0 / + Hnuclei + 48.0 * ab[IDX_PC2H3II] / 58.0 / + Hnuclei + 48.0 * ab[IDX_CH3CSII] / 59.0 / + Hnuclei + 300.0 * ab[IDX_GC5NI] / 74.0 / + Hnuclei + 588.0 * ab[IDX_H2C7NII] / 100.0 / + Hnuclei + 972.0 * ab[IDX_H2C9NII] / 124.0 / + Hnuclei + 12.0 * ab[IDX_HONCII] / 43.0 / + Hnuclei + 12.0 * ab[IDX_PCH3II] / 46.0 / + Hnuclei + 1200.0 * ab[IDX_C10H3II] / 123.0 / + Hnuclei + 108.0 * ab[IDX_C2H5CNHII] / 56.0 / + Hnuclei + 12.0 * ab[IDX_CClII] / 47.0 / + Hnuclei + 12.0 * ab[IDX_CH2NH2II] / 30.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCH2OII] / 61.0 + / Hnuclei + 432.0 * ab[IDX_CH3C5NHII] / 90.0 + / Hnuclei + 768.0 * ab[IDX_CH3C7NHII] / + 114.0 / Hnuclei + 48.0 * ab[IDX_GC2H5I] / + 29.0 / Hnuclei + 108.0 * ab[IDX_GC3NI] / + 50.0 / Hnuclei + 588.0 * ab[IDX_GC7NI] / + 98.0 / Hnuclei + 48.0 * ab[IDX_GCOOCH3I] / + 59.0 / Hnuclei + 12.0 * ab[IDX_GHCNI] / 27.0 + / Hnuclei + 12.0 * ab[IDX_H2CNI] / 28.0 / + Hnuclei + 300.0 * ab[IDX_H3C5NII] / 77.0 / + Hnuclei + 12.0 * ab[IDX_HCNOII] / 43.0 / + Hnuclei + 12.0 * ab[IDX_CClI] / 47.0 / + Hnuclei + 48.0 * ab[IDX_CH3COOHII] / 60.0 / + Hnuclei + 972.0 * ab[IDX_H3C9NII] / 125.0 / + Hnuclei + 48.0 * ab[IDX_H5C2O2II] / 61.0 / + Hnuclei + 12.0 * ab[IDX_HCOOHII] / 46.0 / + Hnuclei + 48.0 * ab[IDX_C2SII] / 56.0 / + Hnuclei + 108.0 * ab[IDX_C3SII] / 68.0 / + Hnuclei + 192.0 * ab[IDX_C4NI] / 62.0 / + Hnuclei + 48.0 * ab[IDX_CH3COOH2II] / 61.0 / + Hnuclei + 48.0 * ab[IDX_CH3OCH3II] / 46.0 / + Hnuclei + 1200.0 * ab[IDX_GC10I] / 120.0 / + Hnuclei + 1200.0 * ab[IDX_GC10HI] / 121.0 / + Hnuclei + 768.0 * ab[IDX_GC8HI] / 97.0 / + Hnuclei + 48.0 * ab[IDX_GCH2OHCOI] / 59.0 / + Hnuclei + 12.0 * ab[IDX_GCOOHI] / 45.0 / + Hnuclei + 588.0 * ab[IDX_H3C7NII] / 101.0 / + Hnuclei + 12.0 * ab[IDX_NH2CNI] / 42.0 / + Hnuclei + 192.0 * ab[IDX_CH3C3NHII] / 66.0 / + Hnuclei + 48.0 * ab[IDX_CH3OCH4II] / 47.0 / + Hnuclei + 48.0 * ab[IDX_GC2H4I] / 28.0 / + Hnuclei + 972.0 * ab[IDX_GC9I] / 108.0 / + Hnuclei + 972.0 * ab[IDX_GC9HI] / 109.0 / + Hnuclei + 12.0 * ab[IDX_GCSI] / 44.0 / + Hnuclei + 588.0 * ab[IDX_HC7NII] / 99.0 / + Hnuclei + 972.0 * ab[IDX_HC9NII] / 123.0 / + Hnuclei + 12.0 * ab[IDX_HNCOII] / 43.0 / + Hnuclei + 108.0 * ab[IDX_PC3HII] / 68.0 / + Hnuclei + 12.0 * ab[IDX_PCH4II] / 47.0 / + Hnuclei + 108.0 * ab[IDX_C2H5CNI] / 55.0 / + Hnuclei + 48.0 * ab[IDX_C2H5OH2II] / 47.0 / + Hnuclei + 48.0 * ab[IDX_C2H7II] / 31.0 / + Hnuclei + 48.0 * ab[IDX_CCPII] / 55.0 / + Hnuclei + 108.0 * ab[IDX_CH2CHCNHII] / 54.0 + / Hnuclei + 48.0 * ab[IDX_COOCH3I] / 59.0 / + Hnuclei + 48.0 * ab[IDX_HCOOCH3II] / 60.0 / + Hnuclei + 48.0 * ab[IDX_PC2H2II] / 57.0 / + Hnuclei + 108.0 * ab[IDX_SiC3H2II] / 66.0 / + Hnuclei + 192.0 * ab[IDX_SiC4II] / 76.0 / + Hnuclei + 192.0 * ab[IDX_SiC4HII] / 77.0 / + Hnuclei + 12.0 * ab[IDX_SiNCHII] / 55.0 / + Hnuclei + 1452.0 * ab[IDX_C11I] / 132.0 / + Hnuclei + 108.0 * ab[IDX_C3OII] / 52.0 / + Hnuclei + 192.0 * ab[IDX_C4H5II] / 53.0 / + Hnuclei + 192.0 * ab[IDX_C4H7II] / 55.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCHOII] / 60.0 / + Hnuclei + 48.0 * ab[IDX_CH3CHOII] / 44.0 / + Hnuclei + 48.0 * ab[IDX_GCH2OHCHOI] / 60.0 / + Hnuclei + 12.0 * ab[IDX_GHCOOHI] / 46.0 / + Hnuclei + 12.0 * ab[IDX_HOCSII] / 61.0 / + Hnuclei + 12.0 * ab[IDX_OCNII] / 42.0 / + Hnuclei + 192.0 * ab[IDX_PC4HII] / 80.0 / + Hnuclei + 12.0 * ab[IDX_SiCH4II] / 44.0 / + Hnuclei + 1200.0 * ab[IDX_C10II] / 120.0 / + Hnuclei + 1200.0 * ab[IDX_C10H2II] / 122.0 / + Hnuclei + 48.0 * ab[IDX_C2N2II] / 52.0 / + Hnuclei + 48.0 * ab[IDX_CH3CNII] / 41.0 / + Hnuclei + 48.0 * ab[IDX_GC2H2I] / 26.0 / + Hnuclei + 300.0 * ab[IDX_GC5I] / 60.0 / + Hnuclei + 588.0 * ab[IDX_GC7HI] / 85.0 / + Hnuclei + 48.0 * ab[IDX_GCH3COI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_GHCOOCH3I] / 60.0 / + Hnuclei + 192.0 * ab[IDX_HC4SII] / 81.0 / + Hnuclei + 300.0 * ab[IDX_HC5NHII] / 76.0 / + Hnuclei + 48.0 * ab[IDX_SiC2H3II] / 55.0 / + Hnuclei + 108.0 * ab[IDX_SiC3HI] / 65.0 / + Hnuclei + 12.0 * ab[IDX_SiCH3II] / 43.0 / + Hnuclei + 1452.0 * ab[IDX_C11II] / 132.0 / + Hnuclei + 108.0 * ab[IDX_C3NII] / 50.0 / + Hnuclei + 192.0 * ab[IDX_C4H4II] / 52.0 / + Hnuclei + 48.0 * ab[IDX_CH2CNII] / 40.0 / + Hnuclei + 108.0 * ab[IDX_CH3COCH3II] / 58.0 + / Hnuclei + 12.0 * ab[IDX_CPII] / 43.0 / + Hnuclei + 432.0 * ab[IDX_GC6I] / 72.0 / + Hnuclei + 768.0 * ab[IDX_GC8I] / 96.0 / + Hnuclei + 12.0 * ab[IDX_GCH2OHI] / 31.0 / + Hnuclei + 12.0 * ab[IDX_GCH3OHI] / 32.0 / + Hnuclei + 48.0 * ab[IDX_HC2PII] / 56.0 / + Hnuclei + 300.0 * ab[IDX_HC5NII] / 75.0 / + Hnuclei + 12.0 * ab[IDX_HONCI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_PCH2II] / 45.0 / + Hnuclei + 972.0 * ab[IDX_C9II] / 108.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCOI] / 59.0 / + Hnuclei + 432.0 * ab[IDX_CH3C5NI] / 89.0 / + Hnuclei + 768.0 * ab[IDX_CH3C7NI] / 113.0 / + Hnuclei + 108.0 * ab[IDX_GC3HI] / 37.0 / + Hnuclei + 192.0 * ab[IDX_GC4HI] / 49.0 / + Hnuclei + 300.0 * ab[IDX_GC5HI] / 61.0 / + Hnuclei + 432.0 * ab[IDX_GC6HI] / 73.0 / + Hnuclei + 12.0 * ab[IDX_H2NCII] / 28.0 / + Hnuclei + 12.0 * ab[IDX_H3CSII] / 47.0 / + Hnuclei + 48.0 * ab[IDX_HC2OII] / 41.0 / + Hnuclei + 12.0 * ab[IDX_HCPII] / 44.0 / + Hnuclei + 192.0 * ab[IDX_SiC4I] / 76.0 / + Hnuclei + 12.0 * ab[IDX_SiNCI] / 54.0 / + Hnuclei + 12.0 * ab[IDX_SiNCII] / 54.0 / + Hnuclei + 12.0 * ab[IDX_CNOI] / 42.0 / + Hnuclei + 48.0 * ab[IDX_GC2H3I] / 27.0 / + Hnuclei + 12.0 * ab[IDX_GCH3OI] / 31.0 / + Hnuclei + 108.0 * ab[IDX_HC3SII] / 69.0 / + Hnuclei + 12.0 * ab[IDX_HCOOH2II] / 47.0 / + Hnuclei + 48.0 * ab[IDX_SiC2H2I] / 54.0 / + Hnuclei + 108.0 * ab[IDX_SiC3II] / 64.0 / + Hnuclei + 48.0 * ab[IDX_C2NHII] / 39.0 / + Hnuclei + 108.0 * ab[IDX_C3H6II] / 42.0 / + Hnuclei + 432.0 * ab[IDX_C6H7II] / 79.0 / + Hnuclei + 768.0 * ab[IDX_C8H4II] / 100.0 / + Hnuclei + 48.0 * ab[IDX_CH2OHCHOI] / 60.0 / + Hnuclei + 588.0 * ab[IDX_GC7I] / 84.0 / + Hnuclei + 108.0 * ab[IDX_HC3OII] / 53.0 / + Hnuclei + 12.0 * ab[IDX_HCNOI] / 43.0 / + Hnuclei + 108.0 * ab[IDX_SiC3HII] / 65.0 / + Hnuclei + 12.0 * ab[IDX_SiCH3I] / 43.0 / + Hnuclei + 108.0 * ab[IDX_C3H7II] / 43.0 / + Hnuclei + 192.0 * ab[IDX_C4NII] / 62.0 / + Hnuclei + 768.0 * ab[IDX_C8II] / 96.0 / + Hnuclei + 972.0 * ab[IDX_C9H4II] / 112.0 / + Hnuclei + 48.0 * ab[IDX_CH2COII] / 42.0 / + Hnuclei + 12.0 * ab[IDX_CH2PHI] / 46.0 / + Hnuclei + 192.0 * ab[IDX_CH3C3NI] / 65.0 / + Hnuclei + 192.0 * ab[IDX_GC4I] / 48.0 / + Hnuclei + 48.0 * ab[IDX_GCH3CHOI] / 44.0 / + Hnuclei + 12.0 * ab[IDX_GH2COI] / 30.0 / + Hnuclei + 12.0 * ab[IDX_HOCNI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_SiC2II] / 52.0 / + Hnuclei + 48.0 * ab[IDX_SiC2H2II] / 54.0 / + Hnuclei + 432.0 * ab[IDX_C6H4II] / 76.0 / + Hnuclei + 48.0 * ab[IDX_CH3COI] / 43.0 / + Hnuclei + 108.0 * ab[IDX_CH3COCH4II] / 59.0 + / Hnuclei + 12.0 * ab[IDX_CH3OHII] / 32.0 / + Hnuclei + 12.0 * ab[IDX_COOHI] / 45.0 / + Hnuclei + 588.0 * ab[IDX_C7H4II] / 88.0 / + Hnuclei + 588.0 * ab[IDX_C7H5II] / 89.0 / + Hnuclei + 588.0 * ab[IDX_CH3C6HI] / 88.0 / + Hnuclei + 12.0 * ab[IDX_H2CSII] / 46.0 / + Hnuclei + 972.0 * ab[IDX_HC9NI] / 123.0 / + Hnuclei + 48.0 * ab[IDX_HCOOCH3I] / 60.0 / + Hnuclei + 48.0 * ab[IDX_NCCNHII] / 53.0 / + Hnuclei + 48.0 * ab[IDX_SiC2HI] / 53.0 / + Hnuclei + 108.0 * ab[IDX_SiC3I] / 64.0 / + Hnuclei + 192.0 * ab[IDX_C4PI] / 79.0 / + Hnuclei + 588.0 * ab[IDX_C7II] / 84.0 / + Hnuclei + 48.0 * ab[IDX_CH2CNI] / 40.0 / + Hnuclei + 300.0 * ab[IDX_CH3C4HII] / 64.0 / + Hnuclei + 12.0 * ab[IDX_GCH4I] / 16.0 / + Hnuclei + 12.0 * ab[IDX_HCPI] / 44.0 / + Hnuclei + 12.0 * ab[IDX_HNCOI] / 43.0 / + Hnuclei + 108.0 * ab[IDX_C3PI] / 67.0 / + Hnuclei + 972.0 * ab[IDX_C9NI] / 122.0 / + Hnuclei + 300.0 * ab[IDX_CH3C4HI] / 64.0 / + Hnuclei + 48.0 * ab[IDX_CH3COOHI] / 60.0 / + Hnuclei + 48.0 * ab[IDX_CH3OCH3I] / 46.0 / + Hnuclei + 48.0 * ab[IDX_GC2HI] / 25.0 / + Hnuclei + 12.0 * ab[IDX_H2CSI] / 46.0 / + Hnuclei + 12.0 * ab[IDX_SiCII] / 40.0 / + Hnuclei + 108.0 * ab[IDX_C3SI] / 68.0 / + Hnuclei + 432.0 * ab[IDX_C6H5II] / 77.0 / + Hnuclei + 12.0 * ab[IDX_CH2NHI] / 29.0 / + Hnuclei + 12.0 * ab[IDX_CH3OI] / 31.0 / + Hnuclei + 12.0 * ab[IDX_GHCOI] / 29.0 / + Hnuclei + 48.0 * ab[IDX_HC2PI] / 56.0 / + Hnuclei + 12.0 * ab[IDX_HCSiI] / 41.0 / + Hnuclei + 12.0 * ab[IDX_SiCH2I] / 42.0 / + Hnuclei + 1200.0 * ab[IDX_C10HII] / 121.0 / + Hnuclei + 12.0 * ab[IDX_HCSiII] / 41.0 / + Hnuclei + 12.0 * ab[IDX_OCSII] / 60.0 / + Hnuclei + 48.0 * ab[IDX_SiC2I] / 52.0 / + Hnuclei + 48.0 * ab[IDX_C2H6II] / 30.0 / + Hnuclei + 48.0 * ab[IDX_C2OI] / 40.0 / + Hnuclei + 768.0 * ab[IDX_C8HII] / 97.0 / + Hnuclei + 12.0 * ab[IDX_CH2OHI] / 31.0 / + Hnuclei + 300.0 * ab[IDX_C5H5II] / 65.0 / + Hnuclei + 12.0 * ab[IDX_HCSI] / 45.0 / + Hnuclei + 48.0 * ab[IDX_SiC2HII] / 53.0 / + Hnuclei + 108.0 * ab[IDX_C3OI] / 52.0 / + Hnuclei + 432.0 * ab[IDX_C6HII] / 73.0 / + Hnuclei + 972.0 * ab[IDX_C9H2I] / 110.0 / + Hnuclei + 108.0 * ab[IDX_CH2CHCNI] / 53.0 / + Hnuclei + 48.0 * ab[IDX_CH3CHOHII] / 45.0 / + Hnuclei + 48.0 * ab[IDX_CH3CNHII] / 42.0 / + Hnuclei + 48.0 * ab[IDX_CH3COII] / 43.0 / + Hnuclei + 588.0 * ab[IDX_HC7NI] / 99.0 / + Hnuclei + 432.0 * ab[IDX_C6II] / 72.0 / + Hnuclei + 432.0 * ab[IDX_C6H6I] / 78.0 / + Hnuclei + 588.0 * ab[IDX_C7NI] / 98.0 / + Hnuclei + 12.0 * ab[IDX_HCOOHI] / 46.0 / + Hnuclei + 1200.0 * ab[IDX_C10H2I] / 122.0 / + Hnuclei + 192.0 * ab[IDX_C4II] / 48.0 / + Hnuclei + 48.0 * ab[IDX_CCPI] / 55.0 / + Hnuclei + 12.0 * ab[IDX_CPI] / 43.0 / + Hnuclei + 108.0 * ab[IDX_GC3I] / 36.0 / + Hnuclei + 12.0 * ab[IDX_SiCI] / 40.0 / + Hnuclei + 48.0 * ab[IDX_C2H5OHI] / 46.0 / + Hnuclei + 12.0 * ab[IDX_CH3OH2II] / 33.0 / + Hnuclei + 48.0 * ab[IDX_C2NII] / 38.0 / + Hnuclei + 300.0 * ab[IDX_C5II] / 60.0 / + Hnuclei + 432.0 * ab[IDX_C6H3II] / 75.0 / + Hnuclei + 768.0 * ab[IDX_C8H3II] / 99.0 / + Hnuclei + 972.0 * ab[IDX_C9HII] / 109.0 / + Hnuclei + 972.0 * ab[IDX_C9H3II] / 111.0 / + Hnuclei + 48.0 * ab[IDX_CH2COI] / 42.0 / + Hnuclei + 108.0 * ab[IDX_HNC3I] / 51.0 / + Hnuclei + 12.0 * ab[IDX_OCNI] / 42.0 / + Hnuclei + 12.0 * ab[IDX_SiCH2II] / 42.0 / + Hnuclei + 108.0 * ab[IDX_CH3COCH3I] / 58.0 / + Hnuclei + 108.0 * ab[IDX_HC3NII] / 51.0 / + Hnuclei + 768.0 * ab[IDX_C8H2I] / 98.0 / + Hnuclei + 12.0 * ab[IDX_CO2II] / 44.0 / + Hnuclei + 300.0 * ab[IDX_HC5NI] / 75.0 / + Hnuclei + 588.0 * ab[IDX_C7HII] / 85.0 / + Hnuclei + 972.0 * ab[IDX_C9H2II] / 110.0 / + Hnuclei + 588.0 * ab[IDX_C7H2I] / 86.0 / + Hnuclei + 12.0 * ab[IDX_GCOI] / 28.0 / + Hnuclei + 12.0 * ab[IDX_HCSII] / 45.0 / + Hnuclei + 108.0 * ab[IDX_C3H4II] / 40.0 / + Hnuclei + 768.0 * ab[IDX_C8H2II] / 98.0 / + Hnuclei + 12.0 * ab[IDX_GCH2I] / 14.0 / + Hnuclei + 12.0 * ab[IDX_HCO2II] / 45.0 / + Hnuclei + 300.0 * ab[IDX_C5H3II] / 63.0 / + Hnuclei + 108.0 * ab[IDX_HC3NHII] / 52.0 / + Hnuclei + 300.0 * ab[IDX_C5HII] / 61.0 / + Hnuclei + 48.0 * ab[IDX_CH3CHOI] / 44.0 / + Hnuclei + 12.0 * ab[IDX_CSII] / 44.0 / + Hnuclei + 108.0 * ab[IDX_C3H5II] / 41.0 / + Hnuclei + 588.0 * ab[IDX_C7H3II] / 87.0 / + Hnuclei + 48.0 * ab[IDX_CH3CNI] / 41.0 / + Hnuclei + 48.0 * ab[IDX_NCCNI] / 52.0 / + Hnuclei + 588.0 * ab[IDX_C7H2II] / 86.0 / + Hnuclei + 48.0 * ab[IDX_GC2I] / 24.0 / + Hnuclei + 108.0 * ab[IDX_C3II] / 36.0 / + Hnuclei + 432.0 * ab[IDX_C6H2II] / 74.0 / + Hnuclei + 12.0 * ab[IDX_CH4II] / 16.0 / + Hnuclei + 108.0 * ab[IDX_H2CCCI] / 38.0 / + Hnuclei + 432.0 * ab[IDX_C6H2I] / 74.0 / + Hnuclei + 12.0 * ab[IDX_GCNI] / 26.0 / + Hnuclei + 48.0 * ab[IDX_C2H5II] / 29.0 / + Hnuclei + 300.0 * ab[IDX_C5H2I] / 62.0 / + Hnuclei + 300.0 * ab[IDX_C5H2II] / 62.0 / + Hnuclei + 108.0 * ab[IDX_CH2CCH2I] / 40.0 / + Hnuclei + 12.0 * ab[IDX_CNII] / 26.0 / + Hnuclei + 48.0 * ab[IDX_C2H6I] / 30.0 / + Hnuclei + 108.0 * ab[IDX_C3H2I] / 38.0 / + Hnuclei + 48.0 * ab[IDX_C2H5I] / 29.0 / + Hnuclei + 192.0 * ab[IDX_C4SII] / 80.0 / + Hnuclei + 12.0 * ab[IDX_HCNII] / 27.0 / + Hnuclei + 108.0 * ab[IDX_CH3CHCH2I] / 42.0 / + Hnuclei + 48.0 * ab[IDX_C2II] / 24.0 / + Hnuclei + 192.0 * ab[IDX_C4HII] / 49.0 / + Hnuclei + 48.0 * ab[IDX_CNCII] / 38.0 / + Hnuclei + 12.0 * ab[IDX_CHM] / 13.0 / + Hnuclei + 12.0 * ab[IDX_OCSI] / 60.0 / + Hnuclei + 12.0 * ab[IDX_GCH3I] / 15.0 / + Hnuclei + 48.0 * ab[IDX_C2HM] / 25.0 / + Hnuclei + 192.0 * ab[IDX_C4HM] / 49.0 / + Hnuclei + 12.0 * ab[IDX_COII] / 28.0 / + Hnuclei + 108.0 * ab[IDX_CH3CCHI] / 40.0 / + Hnuclei + 12.0 * ab[IDX_CH5II] / 17.0 / + Hnuclei + 48.0 * ab[IDX_HC2SII] / 57.0 / + Hnuclei + 1200.0 * ab[IDX_C10HM] / 121.0 / + Hnuclei + 108.0 * ab[IDX_C3HM] / 37.0 / + Hnuclei + 192.0 * ab[IDX_C4SI] / 80.0 / + Hnuclei + 432.0 * ab[IDX_C6HM] / 73.0 / + Hnuclei + 768.0 * ab[IDX_C8HM] / 97.0 / + Hnuclei + 588.0 * ab[IDX_C7HM] / 85.0 / + Hnuclei + 972.0 * ab[IDX_C9HM] / 109.0 / + Hnuclei + 1200.0 * ab[IDX_C10M] / 120.0 / + Hnuclei + 300.0 * ab[IDX_C5HM] / 61.0 / + Hnuclei + 300.0 * ab[IDX_C5NM] / 74.0 / + Hnuclei + 12.0 * ab[IDX_CM] / 12.0 / Hnuclei + + 12.0 * ab[IDX_CSI] / 44.0 / Hnuclei + + 972.0 * ab[IDX_C9M] / 108.0 / Hnuclei + 12.0 + * ab[IDX_CH3OHI] / 32.0 / Hnuclei + 108.0 * + ab[IDX_HC3NI] / 51.0 / Hnuclei + 108.0 * + ab[IDX_C3HII] / 37.0 / Hnuclei + 108.0 * + ab[IDX_C3H3II] / 39.0 / Hnuclei + 768.0 * + ab[IDX_C8M] / 96.0 / Hnuclei + 48.0 * + ab[IDX_C2M] / 24.0 / Hnuclei + 48.0 * + ab[IDX_C2SI] / 56.0 / Hnuclei + 108.0 * + ab[IDX_C3M] / 36.0 / Hnuclei + 192.0 * + ab[IDX_C4M] / 48.0 / Hnuclei + 432.0 * + ab[IDX_C6M] / 72.0 / Hnuclei + 12.0 * + ab[IDX_H3COII] / 31.0 / Hnuclei + 300.0 * + ab[IDX_C5M] / 60.0 / Hnuclei + 588.0 * + ab[IDX_C7M] / 84.0 / Hnuclei + 48.0 * + ab[IDX_C2NI] / 38.0 / Hnuclei + 12.0 * + ab[IDX_GCHI] / 13.0 / Hnuclei + 192.0 * + ab[IDX_C4H3I] / 51.0 / Hnuclei + 48.0 * + ab[IDX_C2HII] / 25.0 / Hnuclei + 108.0 * + ab[IDX_C3H2II] / 38.0 / Hnuclei + 300.0 * + ab[IDX_C5NI] / 74.0 / Hnuclei + 12.0 * + ab[IDX_CH2II] / 14.0 / Hnuclei + 108.0 * + ab[IDX_C3NM] / 50.0 / Hnuclei + 108.0 * + ab[IDX_C3NI] / 50.0 / Hnuclei + 12.0 * + ab[IDX_CHII] / 13.0 / Hnuclei + 12.0 * + ab[IDX_CO2I] / 44.0 / Hnuclei + 1200.0 * + ab[IDX_C10HI] / 121.0 / Hnuclei + 972.0 * + ab[IDX_C9HI] / 109.0 / Hnuclei + 1200.0 * + ab[IDX_C10I] / 120.0 / Hnuclei + 768.0 * + ab[IDX_C8HI] / 97.0 / Hnuclei + 588.0 * + ab[IDX_C7I] / 84.0 / Hnuclei + 972.0 * + ab[IDX_C9I] / 108.0 / Hnuclei + 768.0 * + ab[IDX_C8I] / 96.0 / Hnuclei + 12.0 * + ab[IDX_GCI] / 12.0 / Hnuclei + 300.0 * + ab[IDX_C5I] / 60.0 / Hnuclei + 432.0 * + ab[IDX_C6I] / 72.0 / Hnuclei + 12.0 * + ab[IDX_CNM] / 26.0 / Hnuclei + 192.0 * + ab[IDX_C4I] / 48.0 / Hnuclei + 588.0 * + ab[IDX_C7HI] / 85.0 / Hnuclei + 48.0 * + ab[IDX_C2H4II] / 28.0 / Hnuclei + 192.0 * + ab[IDX_C4H3II] / 51.0 / Hnuclei + 108.0 * + ab[IDX_CH2CCHI] / 39.0 / Hnuclei + 108.0 * + ab[IDX_CH2CCHII] / 39.0 / Hnuclei + 432.0 * + ab[IDX_C6HI] / 73.0 / Hnuclei + 300.0 * + ab[IDX_C5HI] / 61.0 / Hnuclei + 108.0 * + ab[IDX_C3HI] / 37.0 / Hnuclei + 12.0 * + ab[IDX_H2COII] / 30.0 / Hnuclei + 108.0 * + ab[IDX_C3I] / 36.0 / Hnuclei + 192.0 * + ab[IDX_C4HI] / 49.0 / Hnuclei + 192.0 * + ab[IDX_C4H2I] / 50.0 / Hnuclei + 192.0 * + ab[IDX_C4H2II] / 50.0 / Hnuclei + 12.0 * + ab[IDX_HCNHII] / 28.0 / Hnuclei + 12.0 * + ab[IDX_CH2I] / 14.0 / Hnuclei + 12.0 * + ab[IDX_HNCI] / 27.0 / Hnuclei + 48.0 * + ab[IDX_C2H4I] / 28.0 / Hnuclei + 48.0 * + ab[IDX_C2H3I] / 27.0 / Hnuclei + 48.0 * + ab[IDX_C2H3II] / 27.0 / Hnuclei + 12.0 * + ab[IDX_HCOI] / 29.0 / Hnuclei + 12.0 * + ab[IDX_CH4I] / 16.0 / Hnuclei + 48.0 * + ab[IDX_C2HI] / 25.0 / Hnuclei + 12.0 * + ab[IDX_H2COI] / 30.0 / Hnuclei + 12.0 * + ab[IDX_HCNI] / 27.0 / Hnuclei + 12.0 * + ab[IDX_CHI] / 13.0 / Hnuclei + 48.0 * + ab[IDX_C2I] / 24.0 / Hnuclei + 48.0 * + ab[IDX_C2H2II] / 26.0 / Hnuclei + 12.0 * + ab[IDX_CH3II] / 15.0 / Hnuclei + 48.0 * + ab[IDX_C2H2I] / 26.0 / Hnuclei + 12.0 * + ab[IDX_CNI] / 26.0 / Hnuclei + 12.0 * + ab[IDX_CH3I] / 15.0 / Hnuclei + 12.0 * + ab[IDX_CII] / 12.0 / Hnuclei + 12.0 * + ab[IDX_CI] / 12.0 / Hnuclei + 12.0 * + ab[IDX_HCOII] / 29.0 / Hnuclei + 12.0 * + ab[IDX_COI] / 28.0 / Hnuclei; + IJth(A, IDX_ELEM_C, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_C, IDX_ELEM_H) = 0.0 + 24.0 * ab[IDX_GC4H6I] / 54.0 / Hnuclei + + 12.0 * ab[IDX_GCH3C3NI] / 65.0 / Hnuclei + + 20.0 * ab[IDX_GCH3C4HI] / 64.0 / Hnuclei + + 18.0 * ab[IDX_GCH3C5NI] / 89.0 / Hnuclei + + 28.0 * ab[IDX_GCH3C6HI] / 88.0 / Hnuclei + + 24.0 * ab[IDX_GCH3C7NI] / 113.0 / Hnuclei + + 2.0 * ab[IDX_GHC2PI] / 56.0 / Hnuclei + 2.0 + * ab[IDX_GNH2CNI] / 42.0 / Hnuclei + 3.0 * + ab[IDX_GSiC3HI] / 65.0 / Hnuclei + 3.0 * + ab[IDX_GSiCH3I] / 43.0 / Hnuclei + 2.0 * + ab[IDX_GSiC2HI] / 53.0 / Hnuclei + 12.0 * + ab[IDX_C2H4CNI] / 54.0 / Hnuclei + 3.0 * + ab[IDX_GCH2PHI] / 46.0 / Hnuclei + 18.0 * + ab[IDX_GCH3CHCH2I] / 42.0 / Hnuclei + 8.0 * + ab[IDX_GCH3COOHI] / 60.0 / Hnuclei + 1.0 * + ab[IDX_GHCNOI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHCPI] / 44.0 / Hnuclei + 3.0 * + ab[IDX_GHNC3I] / 51.0 / Hnuclei + 1.0 * + ab[IDX_GHNCOI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHOCNI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHONCI] / 43.0 / Hnuclei + 4.0 * + ab[IDX_GSiC2H2I] / 54.0 / Hnuclei + 2.0 * + ab[IDX_HC2OI] / 41.0 / Hnuclei + 36.0 * + ab[IDX_GC6H6I] / 78.0 / Hnuclei + 1.0 * + ab[IDX_GHCSiI] / 41.0 / Hnuclei + 9.0 * + ab[IDX_NCCNCH3II] / 67.0 / Hnuclei + 12.0 * + ab[IDX_GC2H4CNI] / 54.0 / Hnuclei + 12.0 * + ab[IDX_GC4H3I] / 51.0 / Hnuclei + 14.0 * + ab[IDX_GC7H2I] / 86.0 / Hnuclei + 16.0 * + ab[IDX_GC8H2I] / 98.0 / Hnuclei + 18.0 * + ab[IDX_GC9H2I] / 110.0 / Hnuclei + 4.0 * + ab[IDX_GCH2CNI] / 40.0 / Hnuclei + 6.0 * + ab[IDX_GCH3CNI] / 41.0 / Hnuclei + 2.0 * + ab[IDX_GH2CNI] / 28.0 / Hnuclei + 2.0 * + ab[IDX_GH2CSI] / 46.0 / Hnuclei + 2.0 * + ab[IDX_GHC2OI] / 41.0 / Hnuclei + 5.0 * + ab[IDX_GHC5NI] / 75.0 / Hnuclei + 7.0 * + ab[IDX_GHC7NI] / 99.0 / Hnuclei + 9.0 * + ab[IDX_GHC9NI] / 123.0 / Hnuclei + 2.0 * + ab[IDX_GHCCNI] / 39.0 / Hnuclei + 1.0 * + ab[IDX_GHCSI] / 45.0 / Hnuclei + 2.0 * + ab[IDX_HCCNI] / 39.0 / Hnuclei + 6.0 * + ab[IDX_C3H2OII] / 54.0 / Hnuclei + 12.0 * + ab[IDX_GC2H6I] / 30.0 / Hnuclei + 6.0 * + ab[IDX_GC3H2I] / 38.0 / Hnuclei + 10.0 * + ab[IDX_GC5H2I] / 62.0 / Hnuclei + 16.0 * + ab[IDX_GCH2CHCCHI] / 52.0 / Hnuclei + 18.0 * + ab[IDX_GCH3COCH3I] / 58.0 / Hnuclei + 12.0 * + ab[IDX_GCH3OCH3I] / 46.0 / Hnuclei + 2.0 * + ab[IDX_GSiCH2I] / 42.0 / Hnuclei + 9.0 * + ab[IDX_H3C3OII] / 55.0 / Hnuclei + 40.0 * + ab[IDX_C8H5II] / 101.0 / Hnuclei + 45.0 * + ab[IDX_C9H5II] / 113.0 / Hnuclei + 12.0 * + ab[IDX_CH3C3NII] / 65.0 / Hnuclei + 20.0 * + ab[IDX_GC10H2I] / 122.0 / Hnuclei + 8.0 * + ab[IDX_GC4H2I] / 50.0 / Hnuclei + 9.0 * + ab[IDX_GCH2CHCNI] / 53.0 / Hnuclei + 6.0 * + ab[IDX_GH2CCCI] / 38.0 / Hnuclei + 3.0 * + ab[IDX_GHC3NI] / 51.0 / Hnuclei + 24.0 * + ab[IDX_C4H6I] / 54.0 / Hnuclei + 36.0 * + ab[IDX_C6H6II] / 78.0 / Hnuclei + 9.0 * + ab[IDX_CH2CHCNII] / 53.0 / Hnuclei + 6.0 * + ab[IDX_COOCH3II] / 59.0 / Hnuclei + 15.0 * + ab[IDX_GC2H5CNI] / 55.0 / Hnuclei + 12.0 * + ab[IDX_GC2H5OHI] / 46.0 / Hnuclei + 12.0 * + ab[IDX_GC6H2I] / 74.0 / Hnuclei + 2.0 * + ab[IDX_H2CNOII] / 44.0 / Hnuclei + 2.0 * + ab[IDX_H2NCOII] / 44.0 / Hnuclei + 2.0 * + ab[IDX_H2OCNII] / 44.0 / Hnuclei + 8.0 * + ab[IDX_PC2H4II] / 59.0 / Hnuclei + 4.0 * + ab[IDX_CH3NHII] / 30.0 / Hnuclei + 12.0 * + ab[IDX_GCH2CCH2I] / 40.0 / Hnuclei + 3.0 * + ab[IDX_GCH2NHI] / 29.0 / Hnuclei + 12.0 * + ab[IDX_GCH3CCHI] / 40.0 / Hnuclei + 1.0 * + ab[IDX_GHNCI] / 27.0 / Hnuclei + 8.0 * + ab[IDX_H2C4NII] / 64.0 / Hnuclei + 2.0 * + ab[IDX_H2CClII] / 49.0 / Hnuclei + 1.0 * + ab[IDX_HOCII] / 29.0 / Hnuclei + 3.0 * + ab[IDX_NH2CNHII] / 43.0 / Hnuclei + 12.0 * + ab[IDX_C2H5OHII] / 46.0 / Hnuclei + 16.0 * + ab[IDX_CH2CHCCHI] / 52.0 / Hnuclei + 6.0 * + ab[IDX_CH2OHCOII] / 59.0 / Hnuclei + 9.0 * + ab[IDX_GCH2CCHI] / 39.0 / Hnuclei + 4.0 * + ab[IDX_GCH2COI] / 42.0 / Hnuclei + 4.0 * + ab[IDX_HC4NII] / 63.0 / Hnuclei + 2.0 * + ab[IDX_HCNOHII] / 44.0 / Hnuclei + 2.0 * + ab[IDX_HNCOHII] / 44.0 / Hnuclei + 1.0 * + ab[IDX_HOCNII] / 43.0 / Hnuclei + 6.0 * + ab[IDX_PC2H3II] / 58.0 / Hnuclei + 6.0 * + ab[IDX_CH3CSII] / 59.0 / Hnuclei + 14.0 * + ab[IDX_H2C7NII] / 100.0 / Hnuclei + 18.0 * + ab[IDX_H2C9NII] / 124.0 / Hnuclei + 1.0 * + ab[IDX_HONCII] / 43.0 / Hnuclei + 3.0 * + ab[IDX_PCH3II] / 46.0 / Hnuclei + 30.0 * + ab[IDX_C10H3II] / 123.0 / Hnuclei + 18.0 * + ab[IDX_C2H5CNHII] / 56.0 / Hnuclei + 4.0 * + ab[IDX_CH2NH2II] / 30.0 / Hnuclei + 10.0 * + ab[IDX_CH2OHCH2OII] / 61.0 / Hnuclei + 24.0 + * ab[IDX_CH3C5NHII] / 90.0 / Hnuclei + 32.0 + * ab[IDX_CH3C7NHII] / 114.0 / Hnuclei + 10.0 + * ab[IDX_GC2H5I] / 29.0 / Hnuclei + 6.0 * + ab[IDX_GCOOCH3I] / 59.0 / Hnuclei + 1.0 * + ab[IDX_GHCNI] / 27.0 / Hnuclei + 2.0 * + ab[IDX_H2CNI] / 28.0 / Hnuclei + 15.0 * + ab[IDX_H3C5NII] / 77.0 / Hnuclei + 1.0 * + ab[IDX_HCNOII] / 43.0 / Hnuclei + 8.0 * + ab[IDX_CH3COOHII] / 60.0 / Hnuclei + 27.0 * + ab[IDX_H3C9NII] / 125.0 / Hnuclei + 10.0 * + ab[IDX_H5C2O2II] / 61.0 / Hnuclei + 2.0 * + ab[IDX_HCOOHII] / 46.0 / Hnuclei + 10.0 * + ab[IDX_CH3COOH2II] / 61.0 / Hnuclei + 12.0 * + ab[IDX_CH3OCH3II] / 46.0 / Hnuclei + 10.0 * + ab[IDX_GC10HI] / 121.0 / Hnuclei + 8.0 * + ab[IDX_GC8HI] / 97.0 / Hnuclei + 6.0 * + ab[IDX_GCH2OHCOI] / 59.0 / Hnuclei + 1.0 * + ab[IDX_GCOOHI] / 45.0 / Hnuclei + 21.0 * + ab[IDX_H3C7NII] / 101.0 / Hnuclei + 2.0 * + ab[IDX_NH2CNI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_CH3C3NHII] / 66.0 / Hnuclei + 14.0 * + ab[IDX_CH3OCH4II] / 47.0 / Hnuclei + 8.0 * + ab[IDX_GC2H4I] / 28.0 / Hnuclei + 9.0 * + ab[IDX_GC9HI] / 109.0 / Hnuclei + 7.0 * + ab[IDX_HC7NII] / 99.0 / Hnuclei + 9.0 * + ab[IDX_HC9NII] / 123.0 / Hnuclei + 1.0 * + ab[IDX_HNCOII] / 43.0 / Hnuclei + 3.0 * + ab[IDX_PC3HII] / 68.0 / Hnuclei + 4.0 * + ab[IDX_PCH4II] / 47.0 / Hnuclei + 15.0 * + ab[IDX_C2H5CNI] / 55.0 / Hnuclei + 14.0 * + ab[IDX_C2H5OH2II] / 47.0 / Hnuclei + 14.0 * + ab[IDX_C2H7II] / 31.0 / Hnuclei + 12.0 * + ab[IDX_CH2CHCNHII] / 54.0 / Hnuclei + 6.0 * + ab[IDX_COOCH3I] / 59.0 / Hnuclei + 8.0 * + ab[IDX_HCOOCH3II] / 60.0 / Hnuclei + 4.0 * + ab[IDX_PC2H2II] / 57.0 / Hnuclei + 6.0 * + ab[IDX_SiC3H2II] / 66.0 / Hnuclei + 4.0 * + ab[IDX_SiC4HII] / 77.0 / Hnuclei + 1.0 * + ab[IDX_SiNCHII] / 55.0 / Hnuclei + 20.0 * + ab[IDX_C4H5II] / 53.0 / Hnuclei + 28.0 * + ab[IDX_C4H7II] / 55.0 / Hnuclei + 8.0 * + ab[IDX_CH2OHCHOII] / 60.0 / Hnuclei + 8.0 * + ab[IDX_CH3CHOII] / 44.0 / Hnuclei + 8.0 * + ab[IDX_GCH2OHCHOI] / 60.0 / Hnuclei + 2.0 * + ab[IDX_GHCOOHI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 4.0 * + ab[IDX_PC4HII] / 80.0 / Hnuclei + 4.0 * + ab[IDX_SiCH4II] / 44.0 / Hnuclei + 20.0 * + ab[IDX_C10H2II] / 122.0 / Hnuclei + 6.0 * + ab[IDX_CH3CNII] / 41.0 / Hnuclei + 4.0 * + ab[IDX_GC2H2I] / 26.0 / Hnuclei + 7.0 * + ab[IDX_GC7HI] / 85.0 / Hnuclei + 6.0 * + ab[IDX_GCH3COI] / 43.0 / Hnuclei + 8.0 * + ab[IDX_GHCOOCH3I] / 60.0 / Hnuclei + 4.0 * + ab[IDX_HC4SII] / 81.0 / Hnuclei + 10.0 * + ab[IDX_HC5NHII] / 76.0 / Hnuclei + 6.0 * + ab[IDX_SiC2H3II] / 55.0 / Hnuclei + 3.0 * + ab[IDX_SiC3HI] / 65.0 / Hnuclei + 3.0 * + ab[IDX_SiCH3II] / 43.0 / Hnuclei + 16.0 * + ab[IDX_C4H4II] / 52.0 / Hnuclei + 4.0 * + ab[IDX_CH2CNII] / 40.0 / Hnuclei + 18.0 * + ab[IDX_CH3COCH3II] / 58.0 / Hnuclei + 3.0 * + ab[IDX_GCH2OHI] / 31.0 / Hnuclei + 4.0 * + ab[IDX_GCH3OHI] / 32.0 / Hnuclei + 2.0 * + ab[IDX_HC2PII] / 56.0 / Hnuclei + 5.0 * + ab[IDX_HC5NII] / 75.0 / Hnuclei + 1.0 * + ab[IDX_HONCI] / 43.0 / Hnuclei + 2.0 * + ab[IDX_PCH2II] / 45.0 / Hnuclei + 6.0 * + ab[IDX_CH2OHCOI] / 59.0 / Hnuclei + 18.0 * + ab[IDX_CH3C5NI] / 89.0 / Hnuclei + 24.0 * + ab[IDX_CH3C7NI] / 113.0 / Hnuclei + 3.0 * + ab[IDX_GC3HI] / 37.0 / Hnuclei + 4.0 * + ab[IDX_GC4HI] / 49.0 / Hnuclei + 5.0 * + ab[IDX_GC5HI] / 61.0 / Hnuclei + 6.0 * + ab[IDX_GC6HI] / 73.0 / Hnuclei + 2.0 * + ab[IDX_H2NCII] / 28.0 / Hnuclei + 3.0 * + ab[IDX_H3CSII] / 47.0 / Hnuclei + 2.0 * + ab[IDX_HC2OII] / 41.0 / Hnuclei + 1.0 * + ab[IDX_HCPII] / 44.0 / Hnuclei + 6.0 * + ab[IDX_GC2H3I] / 27.0 / Hnuclei + 3.0 * + ab[IDX_GCH3OI] / 31.0 / Hnuclei + 3.0 * + ab[IDX_HC3SII] / 69.0 / Hnuclei + 3.0 * + ab[IDX_HCOOH2II] / 47.0 / Hnuclei + 4.0 * + ab[IDX_SiC2H2I] / 54.0 / Hnuclei + 2.0 * + ab[IDX_C2NHII] / 39.0 / Hnuclei + 18.0 * + ab[IDX_C3H6II] / 42.0 / Hnuclei + 42.0 * + ab[IDX_C6H7II] / 79.0 / Hnuclei + 32.0 * + ab[IDX_C8H4II] / 100.0 / Hnuclei + 8.0 * + ab[IDX_CH2OHCHOI] / 60.0 / Hnuclei + 3.0 * + ab[IDX_HC3OII] / 53.0 / Hnuclei + 1.0 * + ab[IDX_HCNOI] / 43.0 / Hnuclei + 3.0 * + ab[IDX_SiC3HII] / 65.0 / Hnuclei + 3.0 * + ab[IDX_SiCH3I] / 43.0 / Hnuclei + 21.0 * + ab[IDX_C3H7II] / 43.0 / Hnuclei + 36.0 * + ab[IDX_C9H4II] / 112.0 / Hnuclei + 4.0 * + ab[IDX_CH2COII] / 42.0 / Hnuclei + 3.0 * + ab[IDX_CH2PHI] / 46.0 / Hnuclei + 12.0 * + ab[IDX_CH3C3NI] / 65.0 / Hnuclei + 8.0 * + ab[IDX_GCH3CHOI] / 44.0 / Hnuclei + 2.0 * + ab[IDX_GH2COI] / 30.0 / Hnuclei + 1.0 * + ab[IDX_HOCNI] / 43.0 / Hnuclei + 4.0 * + ab[IDX_SiC2H2II] / 54.0 / Hnuclei + 24.0 * + ab[IDX_C6H4II] / 76.0 / Hnuclei + 6.0 * + ab[IDX_CH3COI] / 43.0 / Hnuclei + 21.0 * + ab[IDX_CH3COCH4II] / 59.0 / Hnuclei + 4.0 * + ab[IDX_CH3OHII] / 32.0 / Hnuclei + 1.0 * + ab[IDX_COOHI] / 45.0 / Hnuclei + 28.0 * + ab[IDX_C7H4II] / 88.0 / Hnuclei + 35.0 * + ab[IDX_C7H5II] / 89.0 / Hnuclei + 28.0 * + ab[IDX_CH3C6HI] / 88.0 / Hnuclei + 2.0 * + ab[IDX_H2CSII] / 46.0 / Hnuclei + 9.0 * + ab[IDX_HC9NI] / 123.0 / Hnuclei + 8.0 * + ab[IDX_HCOOCH3I] / 60.0 / Hnuclei + 2.0 * + ab[IDX_NCCNHII] / 53.0 / Hnuclei + 2.0 * + ab[IDX_SiC2HI] / 53.0 / Hnuclei + 4.0 * + ab[IDX_CH2CNI] / 40.0 / Hnuclei + 20.0 * + ab[IDX_CH3C4HII] / 64.0 / Hnuclei + 4.0 * + ab[IDX_GCH4I] / 16.0 / Hnuclei + 1.0 * + ab[IDX_HCPI] / 44.0 / Hnuclei + 1.0 * + ab[IDX_HNCOI] / 43.0 / Hnuclei + 20.0 * + ab[IDX_CH3C4HI] / 64.0 / Hnuclei + 8.0 * + ab[IDX_CH3COOHI] / 60.0 / Hnuclei + 12.0 * + ab[IDX_CH3OCH3I] / 46.0 / Hnuclei + 2.0 * + ab[IDX_GC2HI] / 25.0 / Hnuclei + 2.0 * + ab[IDX_H2CSI] / 46.0 / Hnuclei + 30.0 * + ab[IDX_C6H5II] / 77.0 / Hnuclei + 3.0 * + ab[IDX_CH2NHI] / 29.0 / Hnuclei + 3.0 * + ab[IDX_CH3OI] / 31.0 / Hnuclei + 1.0 * + ab[IDX_GHCOI] / 29.0 / Hnuclei + 2.0 * + ab[IDX_HC2PI] / 56.0 / Hnuclei + 1.0 * + ab[IDX_HCSiI] / 41.0 / Hnuclei + 2.0 * + ab[IDX_SiCH2I] / 42.0 / Hnuclei + 10.0 * + ab[IDX_C10HII] / 121.0 / Hnuclei + 1.0 * + ab[IDX_HCSiII] / 41.0 / Hnuclei + 12.0 * + ab[IDX_C2H6II] / 30.0 / Hnuclei + 8.0 * + ab[IDX_C8HII] / 97.0 / Hnuclei + 3.0 * + ab[IDX_CH2OHI] / 31.0 / Hnuclei + 25.0 * + ab[IDX_C5H5II] / 65.0 / Hnuclei + 1.0 * + ab[IDX_HCSI] / 45.0 / Hnuclei + 2.0 * + ab[IDX_SiC2HII] / 53.0 / Hnuclei + 6.0 * + ab[IDX_C6HII] / 73.0 / Hnuclei + 18.0 * + ab[IDX_C9H2I] / 110.0 / Hnuclei + 9.0 * + ab[IDX_CH2CHCNI] / 53.0 / Hnuclei + 10.0 * + ab[IDX_CH3CHOHII] / 45.0 / Hnuclei + 8.0 * + ab[IDX_CH3CNHII] / 42.0 / Hnuclei + 6.0 * + ab[IDX_CH3COII] / 43.0 / Hnuclei + 7.0 * + ab[IDX_HC7NI] / 99.0 / Hnuclei + 36.0 * + ab[IDX_C6H6I] / 78.0 / Hnuclei + 2.0 * + ab[IDX_HCOOHI] / 46.0 / Hnuclei + 20.0 * + ab[IDX_C10H2I] / 122.0 / Hnuclei + 12.0 * + ab[IDX_C2H5OHI] / 46.0 / Hnuclei + 5.0 * + ab[IDX_CH3OH2II] / 33.0 / Hnuclei + 18.0 * + ab[IDX_C6H3II] / 75.0 / Hnuclei + 24.0 * + ab[IDX_C8H3II] / 99.0 / Hnuclei + 9.0 * + ab[IDX_C9HII] / 109.0 / Hnuclei + 27.0 * + ab[IDX_C9H3II] / 111.0 / Hnuclei + 4.0 * + ab[IDX_CH2COI] / 42.0 / Hnuclei + 3.0 * + ab[IDX_HNC3I] / 51.0 / Hnuclei + 2.0 * + ab[IDX_SiCH2II] / 42.0 / Hnuclei + 18.0 * + ab[IDX_CH3COCH3I] / 58.0 / Hnuclei + 3.0 * + ab[IDX_HC3NII] / 51.0 / Hnuclei + 16.0 * + ab[IDX_C8H2I] / 98.0 / Hnuclei + 5.0 * + ab[IDX_HC5NI] / 75.0 / Hnuclei + 7.0 * + ab[IDX_C7HII] / 85.0 / Hnuclei + 18.0 * + ab[IDX_C9H2II] / 110.0 / Hnuclei + 14.0 * + ab[IDX_C7H2I] / 86.0 / Hnuclei + 1.0 * + ab[IDX_HCSII] / 45.0 / Hnuclei + 12.0 * + ab[IDX_C3H4II] / 40.0 / Hnuclei + 16.0 * + ab[IDX_C8H2II] / 98.0 / Hnuclei + 2.0 * + ab[IDX_GCH2I] / 14.0 / Hnuclei + 1.0 * + ab[IDX_HCO2II] / 45.0 / Hnuclei + 15.0 * + ab[IDX_C5H3II] / 63.0 / Hnuclei + 6.0 * + ab[IDX_HC3NHII] / 52.0 / Hnuclei + 5.0 * + ab[IDX_C5HII] / 61.0 / Hnuclei + 8.0 * + ab[IDX_CH3CHOI] / 44.0 / Hnuclei + 15.0 * + ab[IDX_C3H5II] / 41.0 / Hnuclei + 21.0 * + ab[IDX_C7H3II] / 87.0 / Hnuclei + 6.0 * + ab[IDX_CH3CNI] / 41.0 / Hnuclei + 14.0 * + ab[IDX_C7H2II] / 86.0 / Hnuclei + 12.0 * + ab[IDX_C6H2II] / 74.0 / Hnuclei + 4.0 * + ab[IDX_CH4II] / 16.0 / Hnuclei + 6.0 * + ab[IDX_H2CCCI] / 38.0 / Hnuclei + 12.0 * + ab[IDX_C6H2I] / 74.0 / Hnuclei + 10.0 * + ab[IDX_C2H5II] / 29.0 / Hnuclei + 10.0 * + ab[IDX_C5H2I] / 62.0 / Hnuclei + 10.0 * + ab[IDX_C5H2II] / 62.0 / Hnuclei + 12.0 * + ab[IDX_CH2CCH2I] / 40.0 / Hnuclei + 12.0 * + ab[IDX_C2H6I] / 30.0 / Hnuclei + 6.0 * + ab[IDX_C3H2I] / 38.0 / Hnuclei + 10.0 * + ab[IDX_C2H5I] / 29.0 / Hnuclei + 1.0 * + ab[IDX_HCNII] / 27.0 / Hnuclei + 18.0 * + ab[IDX_CH3CHCH2I] / 42.0 / Hnuclei + 4.0 * + ab[IDX_C4HII] / 49.0 / Hnuclei + 1.0 * + ab[IDX_CHM] / 13.0 / Hnuclei + 3.0 * + ab[IDX_GCH3I] / 15.0 / Hnuclei + 2.0 * + ab[IDX_C2HM] / 25.0 / Hnuclei + 4.0 * + ab[IDX_C4HM] / 49.0 / Hnuclei + 12.0 * + ab[IDX_CH3CCHI] / 40.0 / Hnuclei + 5.0 * + ab[IDX_CH5II] / 17.0 / Hnuclei + 2.0 * + ab[IDX_HC2SII] / 57.0 / Hnuclei + 10.0 * + ab[IDX_C10HM] / 121.0 / Hnuclei + 3.0 * + ab[IDX_C3HM] / 37.0 / Hnuclei + 6.0 * + ab[IDX_C6HM] / 73.0 / Hnuclei + 8.0 * + ab[IDX_C8HM] / 97.0 / Hnuclei + 7.0 * + ab[IDX_C7HM] / 85.0 / Hnuclei + 9.0 * + ab[IDX_C9HM] / 109.0 / Hnuclei + 5.0 * + ab[IDX_C5HM] / 61.0 / Hnuclei + 4.0 * + ab[IDX_CH3OHI] / 32.0 / Hnuclei + 3.0 * + ab[IDX_HC3NI] / 51.0 / Hnuclei + 3.0 * + ab[IDX_C3HII] / 37.0 / Hnuclei + 9.0 * + ab[IDX_C3H3II] / 39.0 / Hnuclei + 3.0 * + ab[IDX_H3COII] / 31.0 / Hnuclei + 1.0 * + ab[IDX_GCHI] / 13.0 / Hnuclei + 12.0 * + ab[IDX_C4H3I] / 51.0 / Hnuclei + 2.0 * + ab[IDX_C2HII] / 25.0 / Hnuclei + 6.0 * + ab[IDX_C3H2II] / 38.0 / Hnuclei + 2.0 * + ab[IDX_CH2II] / 14.0 / Hnuclei + 1.0 * + ab[IDX_CHII] / 13.0 / Hnuclei + 10.0 * + ab[IDX_C10HI] / 121.0 / Hnuclei + 9.0 * + ab[IDX_C9HI] / 109.0 / Hnuclei + 8.0 * + ab[IDX_C8HI] / 97.0 / Hnuclei + 7.0 * + ab[IDX_C7HI] / 85.0 / Hnuclei + 8.0 * + ab[IDX_C2H4II] / 28.0 / Hnuclei + 12.0 * + ab[IDX_C4H3II] / 51.0 / Hnuclei + 9.0 * + ab[IDX_CH2CCHI] / 39.0 / Hnuclei + 9.0 * + ab[IDX_CH2CCHII] / 39.0 / Hnuclei + 6.0 * + ab[IDX_C6HI] / 73.0 / Hnuclei + 5.0 * + ab[IDX_C5HI] / 61.0 / Hnuclei + 3.0 * + ab[IDX_C3HI] / 37.0 / Hnuclei + 2.0 * + ab[IDX_H2COII] / 30.0 / Hnuclei + 4.0 * + ab[IDX_C4HI] / 49.0 / Hnuclei + 8.0 * + ab[IDX_C4H2I] / 50.0 / Hnuclei + 8.0 * + ab[IDX_C4H2II] / 50.0 / Hnuclei + 2.0 * + ab[IDX_HCNHII] / 28.0 / Hnuclei + 2.0 * + ab[IDX_CH2I] / 14.0 / Hnuclei + 1.0 * + ab[IDX_HNCI] / 27.0 / Hnuclei + 8.0 * + ab[IDX_C2H4I] / 28.0 / Hnuclei + 6.0 * + ab[IDX_C2H3I] / 27.0 / Hnuclei + 6.0 * + ab[IDX_C2H3II] / 27.0 / Hnuclei + 1.0 * + ab[IDX_HCOI] / 29.0 / Hnuclei + 4.0 * + ab[IDX_CH4I] / 16.0 / Hnuclei + 2.0 * + ab[IDX_C2HI] / 25.0 / Hnuclei + 2.0 * + ab[IDX_H2COI] / 30.0 / Hnuclei + 1.0 * + ab[IDX_HCNI] / 27.0 / Hnuclei + 1.0 * + ab[IDX_CHI] / 13.0 / Hnuclei + 4.0 * + ab[IDX_C2H2II] / 26.0 / Hnuclei + 3.0 * + ab[IDX_CH3II] / 15.0 / Hnuclei + 4.0 * + ab[IDX_C2H2I] / 26.0 / Hnuclei + 3.0 * + ab[IDX_CH3I] / 15.0 / Hnuclei + 1.0 * + ab[IDX_HCOII] / 29.0 / Hnuclei; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_F) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_Cl) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_P) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_Si) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_S) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_N) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_O) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_He) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_C) = 0.0; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_GRAIN) = 0.0 + 0.0 * ab[IDX_GRAINM] / 0.0 / Hnuclei + + 0.0 * ab[IDX_GRAIN0I] / 0.0 / Hnuclei; + IJth(A, IDX_ELEM_GRAIN, IDX_ELEM_H) = 0.0; + IJth(A, IDX_ELEM_H, IDX_ELEM_F) = 0.0 + 19.0 * ab[IDX_GHFI] / 20.0 / Hnuclei + + 19.0 * ab[IDX_HFII] / 20.0 / Hnuclei + 38.0 + * ab[IDX_H2FII] / 21.0 / Hnuclei + 19.0 * + ab[IDX_HFI] / 20.0 / Hnuclei; + IJth(A, IDX_ELEM_H, IDX_ELEM_Cl) = 0.0 + 35.0 * ab[IDX_GHClI] / 36.0 / Hnuclei + + 70.0 * ab[IDX_H2CClII] / 49.0 / Hnuclei + + 35.0 * ab[IDX_HClII] / 36.0 / Hnuclei + 70.0 + * ab[IDX_H2ClII] / 37.0 / Hnuclei + 35.0 * + ab[IDX_HClI] / 36.0 / Hnuclei; + IJth(A, IDX_ELEM_H, IDX_ELEM_P) = 0.0 + 31.0 * ab[IDX_GHC2PI] / 56.0 / Hnuclei + + 31.0 * ab[IDX_GHPOI] / 48.0 / Hnuclei + + 93.0 * ab[IDX_GCH2PHI] / 46.0 / Hnuclei + + 31.0 * ab[IDX_GHCPI] / 44.0 / Hnuclei + 62.0 + * ab[IDX_GPH2I] / 33.0 / Hnuclei + 31.0 * + ab[IDX_GPHI] / 32.0 / Hnuclei + 124.0 * + ab[IDX_PC2H4II] / 59.0 / Hnuclei + 93.0 * + ab[IDX_PC2H3II] / 58.0 / Hnuclei + 93.0 * + ab[IDX_PNH3II] / 48.0 / Hnuclei + 93.0 * + ab[IDX_PCH3II] / 46.0 / Hnuclei + 62.0 * + ab[IDX_PNH2II] / 47.0 / Hnuclei + 31.0 * + ab[IDX_HPNII] / 46.0 / Hnuclei + 31.0 * + ab[IDX_PC3HII] / 68.0 / Hnuclei + 124.0 * + ab[IDX_PCH4II] / 47.0 / Hnuclei + 62.0 * + ab[IDX_H2POII] / 49.0 / Hnuclei + 62.0 * + ab[IDX_PC2H2II] / 57.0 / Hnuclei + 31.0 * + ab[IDX_PC4HII] / 80.0 / Hnuclei + 93.0 * + ab[IDX_PH3II] / 34.0 / Hnuclei + 31.0 * + ab[IDX_HC2PII] / 56.0 / Hnuclei + 62.0 * + ab[IDX_PCH2II] / 45.0 / Hnuclei + 31.0 * + ab[IDX_HCPII] / 44.0 / Hnuclei + 31.0 * + ab[IDX_HPOII] / 48.0 / Hnuclei + 93.0 * + ab[IDX_CH2PHI] / 46.0 / Hnuclei + 31.0 * + ab[IDX_HPOI] / 48.0 / Hnuclei + 62.0 * + ab[IDX_PH2I] / 33.0 / Hnuclei + 31.0 * + ab[IDX_HCPI] / 44.0 / Hnuclei + 62.0 * + ab[IDX_PH2II] / 33.0 / Hnuclei + 31.0 * + ab[IDX_HC2PI] / 56.0 / Hnuclei + 31.0 * + ab[IDX_PHI] / 32.0 / Hnuclei + 31.0 * + ab[IDX_PHII] / 32.0 / Hnuclei; + IJth(A, IDX_ELEM_H, IDX_ELEM_Fe) = 0.0; + IJth(A, IDX_ELEM_H, IDX_ELEM_Mg) = 0.0; + IJth(A, IDX_ELEM_H, IDX_ELEM_Na) = 0.0; + IJth(A, IDX_ELEM_H, IDX_ELEM_Si) = 0.0 + 28.0 * ab[IDX_GHNSiI] / 43.0 / Hnuclei + + 28.0 * ab[IDX_GSiC3HI] / 65.0 / Hnuclei + + 84.0 * ab[IDX_GSiCH3I] / 43.0 / Hnuclei + + 56.0 * ab[IDX_GH2SiOI] / 46.0 / Hnuclei + + 28.0 * ab[IDX_GSiC2HI] / 53.0 / Hnuclei + + 56.0 * ab[IDX_GSiC2H2I] / 54.0 / Hnuclei + + 28.0 * ab[IDX_GHCSiI] / 41.0 / Hnuclei + + 112.0 * ab[IDX_GSiH4I] / 32.0 / Hnuclei + + 84.0 * ab[IDX_GSiH3I] / 31.0 / Hnuclei + + 56.0 * ab[IDX_GSiCH2I] / 42.0 / Hnuclei + + 28.0 * ab[IDX_GSiHI] / 29.0 / Hnuclei + 56.0 + * ab[IDX_GSiH2I] / 30.0 / Hnuclei + 28.0 * + ab[IDX_HSiO2II] / 61.0 / Hnuclei + 56.0 * + ab[IDX_H2SiOII] / 46.0 / Hnuclei + 84.0 * + ab[IDX_H3SiOII] / 47.0 / Hnuclei + 112.0 * + ab[IDX_SiH4II] / 32.0 / Hnuclei + 56.0 * + ab[IDX_SiC3H2II] / 66.0 / Hnuclei + 28.0 * + ab[IDX_SiC4HII] / 77.0 / Hnuclei + 140.0 * + ab[IDX_SiH5II] / 33.0 / Hnuclei + 28.0 * + ab[IDX_SiNCHII] / 55.0 / Hnuclei + 28.0 * + ab[IDX_HNSiII] / 43.0 / Hnuclei + 112.0 * + ab[IDX_SiCH4II] / 44.0 / Hnuclei + 84.0 * + ab[IDX_SiC2H3II] / 55.0 / Hnuclei + 28.0 * + ab[IDX_SiC3HI] / 65.0 / Hnuclei + 84.0 * + ab[IDX_SiCH3II] / 43.0 / Hnuclei + 56.0 * + ab[IDX_SiNH2II] / 44.0 / Hnuclei + 28.0 * + ab[IDX_HSiSII] / 61.0 / Hnuclei + 56.0 * + ab[IDX_H2SiOI] / 46.0 / Hnuclei + 28.0 * + ab[IDX_HNSiI] / 43.0 / Hnuclei + 56.0 * + ab[IDX_SiC2H2I] / 54.0 / Hnuclei + 28.0 * + ab[IDX_SiC3HII] / 65.0 / Hnuclei + 84.0 * + ab[IDX_SiCH3I] / 43.0 / Hnuclei + 56.0 * + ab[IDX_SiC2H2II] / 54.0 / Hnuclei + 28.0 * + ab[IDX_SiC2HI] / 53.0 / Hnuclei + 28.0 * + ab[IDX_HCSiI] / 41.0 / Hnuclei + 56.0 * + ab[IDX_SiCH2I] / 42.0 / Hnuclei + 28.0 * + ab[IDX_HCSiII] / 41.0 / Hnuclei + 28.0 * + ab[IDX_SiC2HII] / 53.0 / Hnuclei + 56.0 * + ab[IDX_SiH2I] / 30.0 / Hnuclei + 56.0 * + ab[IDX_SiH2II] / 30.0 / Hnuclei + 84.0 * + ab[IDX_SiH3II] / 31.0 / Hnuclei + 84.0 * + ab[IDX_SiH3I] / 31.0 / Hnuclei + 56.0 * + ab[IDX_SiCH2II] / 42.0 / Hnuclei + 28.0 * + ab[IDX_SiHII] / 29.0 / Hnuclei + 28.0 * + ab[IDX_SiHI] / 29.0 / Hnuclei + 112.0 * + ab[IDX_SiH4I] / 32.0 / Hnuclei + 28.0 * + ab[IDX_SiOHII] / 45.0 / Hnuclei; + IJth(A, IDX_ELEM_H, IDX_ELEM_S) = 0.0 + 128.0 * ab[IDX_GH2S2I] / 66.0 / + Hnuclei + 64.0 * ab[IDX_GH2SI] / 34.0 / + Hnuclei + 64.0 * ab[IDX_GHS2I] / 65.0 / + Hnuclei + 64.0 * ab[IDX_GH2CSI] / 46.0 / + Hnuclei + 32.0 * ab[IDX_GHCSI] / 45.0 / + Hnuclei + 32.0 * ab[IDX_HNSII] / 47.0 / + Hnuclei + 32.0 * ab[IDX_HSOII] / 49.0 / + Hnuclei + 96.0 * ab[IDX_CH3CSII] / 59.0 / + Hnuclei + 192.0 * ab[IDX_H3S2II] / 67.0 / + Hnuclei + 32.0 * ab[IDX_HSO2II] / 65.0 / + Hnuclei + 32.0 * ab[IDX_GHSI] / 33.0 / + Hnuclei + 128.0 * ab[IDX_H2S2I] / 66.0 / + Hnuclei + 32.0 * ab[IDX_HOCSII] / 61.0 / + Hnuclei + 32.0 * ab[IDX_HC4SII] / 81.0 / + Hnuclei + 128.0 * ab[IDX_H2S2II] / 66.0 / + Hnuclei + 32.0 * ab[IDX_HSiSII] / 61.0 / + Hnuclei + 96.0 * ab[IDX_H3CSII] / 47.0 / + Hnuclei + 32.0 * ab[IDX_HC3SII] / 69.0 / + Hnuclei + 64.0 * ab[IDX_HS2II] / 65.0 / + Hnuclei + 64.0 * ab[IDX_HS2I] / 65.0 / + Hnuclei + 64.0 * ab[IDX_H2CSII] / 46.0 / + Hnuclei + 64.0 * ab[IDX_H2CSI] / 46.0 / + Hnuclei + 32.0 * ab[IDX_HCSI] / 45.0 / + Hnuclei + 32.0 * ab[IDX_HCSII] / 45.0 / + Hnuclei + 96.0 * ab[IDX_H3SII] / 35.0 / + Hnuclei + 32.0 * ab[IDX_HSII] / 33.0 / + Hnuclei + 32.0 * ab[IDX_HC2SII] / 57.0 / + Hnuclei + 32.0 * ab[IDX_HSI] / 33.0 / + Hnuclei + 64.0 * ab[IDX_H2SII] / 34.0 / + Hnuclei + 64.0 * ab[IDX_H2SI] / 34.0 / + Hnuclei; + IJth(A, IDX_ELEM_H, IDX_ELEM_N) = 0.0 + 42.0 * ab[IDX_GCH3C3NI] / 65.0 / + Hnuclei + 42.0 * ab[IDX_GCH3C5NI] / 89.0 / + Hnuclei + 42.0 * ab[IDX_GCH3C7NI] / 113.0 / + Hnuclei + 14.0 * ab[IDX_GHNSiI] / 43.0 / + Hnuclei + 56.0 * ab[IDX_GNH2CNI] / 42.0 / + Hnuclei + 56.0 * ab[IDX_C2H4CNI] / 54.0 / + Hnuclei + 14.0 * ab[IDX_GHCNOI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHNC3I] / 51.0 / + Hnuclei + 14.0 * ab[IDX_GHNCOI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHOCNI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHONCI] / 43.0 / + Hnuclei + 84.0 * ab[IDX_NCCNCH3II] / 67.0 / + Hnuclei + 56.0 * ab[IDX_GC2H4CNI] / 54.0 / + Hnuclei + 28.0 * ab[IDX_GCH2CNI] / 40.0 / + Hnuclei + 42.0 * ab[IDX_GCH3CNI] / 41.0 / + Hnuclei + 28.0 * ab[IDX_GH2CNI] / 28.0 / + Hnuclei + 14.0 * ab[IDX_GHC5NI] / 75.0 / + Hnuclei + 14.0 * ab[IDX_GHC7NI] / 99.0 / + Hnuclei + 14.0 * ab[IDX_GHC9NI] / 123.0 / + Hnuclei + 14.0 * ab[IDX_GHCCNI] / 39.0 / + Hnuclei + 14.0 * ab[IDX_HCCNI] / 39.0 / + Hnuclei + 42.0 * ab[IDX_CH3C3NII] / 65.0 / + Hnuclei + 42.0 * ab[IDX_GCH2CHCNI] / 53.0 / + Hnuclei + 14.0 * ab[IDX_GHC3NI] / 51.0 / + Hnuclei + 42.0 * ab[IDX_CH2CHCNII] / 53.0 / + Hnuclei + 70.0 * ab[IDX_GC2H5CNI] / 55.0 / + Hnuclei + 28.0 * ab[IDX_H2CNOII] / 44.0 / + Hnuclei + 28.0 * ab[IDX_H2NCOII] / 44.0 / + Hnuclei + 28.0 * ab[IDX_H2OCNII] / 44.0 / + Hnuclei + 56.0 * ab[IDX_CH3NHII] / 30.0 / + Hnuclei + 42.0 * ab[IDX_GCH2NHI] / 29.0 / + Hnuclei + 14.0 * ab[IDX_GHNCI] / 27.0 / + Hnuclei + 28.0 * ab[IDX_H2C4NII] / 64.0 / + Hnuclei + 28.0 * ab[IDX_H2NOII] / 32.0 / + Hnuclei + 14.0 * ab[IDX_HNSII] / 47.0 / + Hnuclei + 84.0 * ab[IDX_NH2CNHII] / 43.0 / + Hnuclei + 14.0 * ab[IDX_GHNOI] / 31.0 / + Hnuclei + 14.0 * ab[IDX_HC4NII] / 63.0 / + Hnuclei + 28.0 * ab[IDX_HCNOHII] / 44.0 / + Hnuclei + 28.0 * ab[IDX_HNCOHII] / 44.0 / + Hnuclei + 14.0 * ab[IDX_HOCNII] / 43.0 / + Hnuclei + 42.0 * ab[IDX_PNH3II] / 48.0 / + Hnuclei + 28.0 * ab[IDX_H2C7NII] / 100.0 / + Hnuclei + 28.0 * ab[IDX_H2C9NII] / 124.0 / + Hnuclei + 14.0 * ab[IDX_HONCII] / 43.0 / + Hnuclei + 28.0 * ab[IDX_PNH2II] / 47.0 / + Hnuclei + 84.0 * ab[IDX_C2H5CNHII] / 56.0 / + Hnuclei + 56.0 * ab[IDX_CH2NH2II] / 30.0 / + Hnuclei + 56.0 * ab[IDX_CH3C5NHII] / 90.0 / + Hnuclei + 56.0 * ab[IDX_CH3C7NHII] / 114.0 / + Hnuclei + 14.0 * ab[IDX_GHCNI] / 27.0 / + Hnuclei + 28.0 * ab[IDX_H2CNI] / 28.0 / + Hnuclei + 42.0 * ab[IDX_H3C5NII] / 77.0 / + Hnuclei + 14.0 * ab[IDX_HCNOII] / 43.0 / + Hnuclei + 42.0 * ab[IDX_GNH3I] / 17.0 / + Hnuclei + 42.0 * ab[IDX_H3C9NII] / 125.0 / + Hnuclei + 14.0 * ab[IDX_HPNII] / 46.0 / + Hnuclei + 42.0 * ab[IDX_H3C7NII] / 101.0 / + Hnuclei + 56.0 * ab[IDX_NH2CNI] / 42.0 / + Hnuclei + 56.0 * ab[IDX_CH3C3NHII] / 66.0 / + Hnuclei + 14.0 * ab[IDX_HC7NII] / 99.0 / + Hnuclei + 14.0 * ab[IDX_HC9NII] / 123.0 / + Hnuclei + 14.0 * ab[IDX_HNCOII] / 43.0 / + Hnuclei + 70.0 * ab[IDX_C2H5CNI] / 55.0 / + Hnuclei + 56.0 * ab[IDX_CH2CHCNHII] / 54.0 / + Hnuclei + 28.0 * ab[IDX_HN2OII] / 45.0 / + Hnuclei + 14.0 * ab[IDX_SiNCHII] / 55.0 / + Hnuclei + 14.0 * ab[IDX_HNSiII] / 43.0 / + Hnuclei + 42.0 * ab[IDX_CH3CNII] / 41.0 / + Hnuclei + 28.0 * ab[IDX_HC5NHII] / 76.0 / + Hnuclei + 28.0 * ab[IDX_SiNH2II] / 44.0 / + Hnuclei + 28.0 * ab[IDX_CH2CNII] / 40.0 / + Hnuclei + 14.0 * ab[IDX_HC5NII] / 75.0 / + Hnuclei + 14.0 * ab[IDX_HONCI] / 43.0 / + Hnuclei + 42.0 * ab[IDX_CH3C5NI] / 89.0 / + Hnuclei + 42.0 * ab[IDX_CH3C7NI] / 113.0 / + Hnuclei + 28.0 * ab[IDX_H2NCII] / 28.0 / + Hnuclei + 14.0 * ab[IDX_HNSiI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_C2NHII] / 39.0 / + Hnuclei + 14.0 * ab[IDX_HCNOI] / 43.0 / + Hnuclei + 42.0 * ab[IDX_CH3C3NI] / 65.0 / + Hnuclei + 14.0 * ab[IDX_HOCNI] / 43.0 / + Hnuclei + 14.0 * ab[IDX_HC9NI] / 123.0 / + Hnuclei + 28.0 * ab[IDX_NCCNHII] / 53.0 / + Hnuclei + 28.0 * ab[IDX_CH2CNI] / 40.0 / + Hnuclei + 14.0 * ab[IDX_HNCOI] / 43.0 / + Hnuclei + 28.0 * ab[IDX_GNH2I] / 16.0 / + Hnuclei + 42.0 * ab[IDX_CH2NHI] / 29.0 / + Hnuclei + 14.0 * ab[IDX_GNHI] / 15.0 / + Hnuclei + 42.0 * ab[IDX_CH2CHCNI] / 53.0 / + Hnuclei + 56.0 * ab[IDX_CH3CNHII] / 42.0 / + Hnuclei + 14.0 * ab[IDX_HC7NI] / 99.0 / + Hnuclei + 14.0 * ab[IDX_HNOI] / 31.0 / + Hnuclei + 14.0 * ab[IDX_HNC3I] / 51.0 / + Hnuclei + 14.0 * ab[IDX_HC3NII] / 51.0 / + Hnuclei + 14.0 * ab[IDX_HC5NI] / 75.0 / + Hnuclei + 28.0 * ab[IDX_HC3NHII] / 52.0 / + Hnuclei + 42.0 * ab[IDX_CH3CNI] / 41.0 / + Hnuclei + 14.0 * ab[IDX_HNOII] / 31.0 / + Hnuclei + 14.0 * ab[IDX_HCNII] / 27.0 / + Hnuclei + 14.0 * ab[IDX_NHII] / 15.0 / + Hnuclei + 28.0 * ab[IDX_NH2II] / 16.0 / + Hnuclei + 14.0 * ab[IDX_HC3NI] / 51.0 / + Hnuclei + 28.0 * ab[IDX_NH2I] / 16.0 / + Hnuclei + 14.0 * ab[IDX_NHI] / 15.0 / + Hnuclei + 28.0 * ab[IDX_N2HII] / 29.0 / + Hnuclei + 28.0 * ab[IDX_HCNHII] / 28.0 / + Hnuclei + 14.0 * ab[IDX_HNCI] / 27.0 / + Hnuclei + 42.0 * ab[IDX_NH3II] / 17.0 / + Hnuclei + 56.0 * ab[IDX_NH4II] / 18.0 / + Hnuclei + 14.0 * ab[IDX_HCNI] / 27.0 / + Hnuclei + 42.0 * ab[IDX_NH3I] / 17.0 / + Hnuclei; + IJth(A, IDX_ELEM_H, IDX_ELEM_O) = 0.0 + 16.0 * ab[IDX_GHPOI] / 48.0 / Hnuclei + + 32.0 * ab[IDX_GH2SiOI] / 46.0 / Hnuclei + + 128.0 * ab[IDX_GCH3COOHI] / 60.0 / Hnuclei + + 16.0 * ab[IDX_GHCNOI] / 43.0 / Hnuclei + + 16.0 * ab[IDX_GHNCOI] / 43.0 / Hnuclei + + 16.0 * ab[IDX_GHOCNI] / 43.0 / Hnuclei + + 16.0 * ab[IDX_GHONCI] / 43.0 / Hnuclei + + 16.0 * ab[IDX_HC2OI] / 41.0 / Hnuclei + 64.0 + * ab[IDX_GH2O2I] / 34.0 / Hnuclei + 16.0 * + ab[IDX_GHC2OI] / 41.0 / Hnuclei + 32.0 * + ab[IDX_C3H2OII] / 54.0 / Hnuclei + 96.0 * + ab[IDX_GCH3COCH3I] / 58.0 / Hnuclei + 96.0 * + ab[IDX_GCH3OCH3I] / 46.0 / Hnuclei + 48.0 * + ab[IDX_H3C3OII] / 55.0 / Hnuclei + 96.0 * + ab[IDX_COOCH3II] / 59.0 / Hnuclei + 96.0 * + ab[IDX_GC2H5OHI] / 46.0 / Hnuclei + 32.0 * + ab[IDX_GO2HI] / 33.0 / Hnuclei + 32.0 * + ab[IDX_H2CNOII] / 44.0 / Hnuclei + 32.0 * + ab[IDX_H2NCOII] / 44.0 / Hnuclei + 32.0 * + ab[IDX_H2OCNII] / 44.0 / Hnuclei + 32.0 * + ab[IDX_H2NOII] / 32.0 / Hnuclei + 16.0 * + ab[IDX_HOCII] / 29.0 / Hnuclei + 16.0 * + ab[IDX_HSOII] / 49.0 / Hnuclei + 32.0 * + ab[IDX_HSiO2II] / 61.0 / Hnuclei + 96.0 * + ab[IDX_C2H5OHII] / 46.0 / Hnuclei + 96.0 * + ab[IDX_CH2OHCOII] / 59.0 / Hnuclei + 32.0 * + ab[IDX_GCH2COI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_GHNOI] / 31.0 / Hnuclei + 32.0 * + ab[IDX_HCNOHII] / 44.0 / Hnuclei + 32.0 * + ab[IDX_HNCOHII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_HOCNII] / 43.0 / Hnuclei + 64.0 * + ab[IDX_H2O2I] / 34.0 / Hnuclei + 16.0 * + ab[IDX_HONCII] / 43.0 / Hnuclei + 160.0 * + ab[IDX_CH2OHCH2OII] / 61.0 / Hnuclei + 96.0 + * ab[IDX_GCOOCH3I] / 59.0 / Hnuclei + 32.0 * + ab[IDX_H2SiOII] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HCNOII] / 43.0 / Hnuclei + 128.0 * + ab[IDX_CH3COOHII] / 60.0 / Hnuclei + 160.0 * + ab[IDX_H5C2O2II] / 61.0 / Hnuclei + 64.0 * + ab[IDX_HCOOHII] / 46.0 / Hnuclei + 160.0 * + ab[IDX_CH3COOH2II] / 61.0 / Hnuclei + 96.0 * + ab[IDX_CH3OCH3II] / 46.0 / Hnuclei + 96.0 * + ab[IDX_GCH2OHCOI] / 59.0 / Hnuclei + 32.0 * + ab[IDX_GCOOHI] / 45.0 / Hnuclei + 48.0 * + ab[IDX_H3SiOII] / 47.0 / Hnuclei + 32.0 * + ab[IDX_HSO2II] / 65.0 / Hnuclei + 112.0 * + ab[IDX_CH3OCH4II] / 47.0 / Hnuclei + 16.0 * + ab[IDX_HNCOII] / 43.0 / Hnuclei + 112.0 * + ab[IDX_C2H5OH2II] / 47.0 / Hnuclei + 96.0 * + ab[IDX_COOCH3I] / 59.0 / Hnuclei + 32.0 * + ab[IDX_H2POII] / 49.0 / Hnuclei + 128.0 * + ab[IDX_HCOOCH3II] / 60.0 / Hnuclei + 16.0 * + ab[IDX_HN2OII] / 45.0 / Hnuclei + 128.0 * + ab[IDX_CH2OHCHOII] / 60.0 / Hnuclei + 64.0 * + ab[IDX_CH3CHOII] / 44.0 / Hnuclei + 128.0 * + ab[IDX_GCH2OHCHOI] / 60.0 / Hnuclei + 64.0 * + ab[IDX_GHCOOHI] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 48.0 * + ab[IDX_GCH3COI] / 43.0 / Hnuclei + 128.0 * + ab[IDX_GHCOOCH3I] / 60.0 / Hnuclei + 96.0 * + ab[IDX_CH3COCH3II] / 58.0 / Hnuclei + 48.0 * + ab[IDX_GCH2OHI] / 31.0 / Hnuclei + 64.0 * + ab[IDX_GCH3OHI] / 32.0 / Hnuclei + 16.0 * + ab[IDX_HONCI] / 43.0 / Hnuclei + 96.0 * + ab[IDX_CH2OHCOI] / 59.0 / Hnuclei + 32.0 * + ab[IDX_H2SiOI] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HC2OII] / 41.0 / Hnuclei + 48.0 * + ab[IDX_GCH3OI] / 31.0 / Hnuclei + 32.0 * + ab[IDX_GH2OI] / 18.0 / Hnuclei + 96.0 * + ab[IDX_HCOOH2II] / 47.0 / Hnuclei + 16.0 * + ab[IDX_HPOII] / 48.0 / Hnuclei + 128.0 * + ab[IDX_CH2OHCHOI] / 60.0 / Hnuclei + 16.0 * + ab[IDX_HC3OII] / 53.0 / Hnuclei + 16.0 * + ab[IDX_HCNOI] / 43.0 / Hnuclei + 32.0 * + ab[IDX_CH2COII] / 42.0 / Hnuclei + 64.0 * + ab[IDX_GCH3CHOI] / 44.0 / Hnuclei + 32.0 * + ab[IDX_GH2COI] / 30.0 / Hnuclei + 16.0 * + ab[IDX_HOCNI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_HPOI] / 48.0 / Hnuclei + 48.0 * + ab[IDX_CH3COI] / 43.0 / Hnuclei + 112.0 * + ab[IDX_CH3COCH4II] / 59.0 / Hnuclei + 64.0 * + ab[IDX_CH3OHII] / 32.0 / Hnuclei + 32.0 * + ab[IDX_COOHI] / 45.0 / Hnuclei + 128.0 * + ab[IDX_HCOOCH3I] / 60.0 / Hnuclei + 16.0 * + ab[IDX_HNCOI] / 43.0 / Hnuclei + 128.0 * + ab[IDX_CH3COOHI] / 60.0 / Hnuclei + 96.0 * + ab[IDX_CH3OCH3I] / 46.0 / Hnuclei + 48.0 * + ab[IDX_CH3OI] / 31.0 / Hnuclei + 16.0 * + ab[IDX_GHCOI] / 29.0 / Hnuclei + 48.0 * + ab[IDX_CH2OHI] / 31.0 / Hnuclei + 80.0 * + ab[IDX_CH3CHOHII] / 45.0 / Hnuclei + 48.0 * + ab[IDX_CH3COII] / 43.0 / Hnuclei + 64.0 * + ab[IDX_HCOOHI] / 46.0 / Hnuclei + 32.0 * + ab[IDX_O2HI] / 33.0 / Hnuclei + 96.0 * + ab[IDX_C2H5OHI] / 46.0 / Hnuclei + 16.0 * + ab[IDX_HNOI] / 31.0 / Hnuclei + 80.0 * + ab[IDX_CH3OH2II] / 33.0 / Hnuclei + 32.0 * + ab[IDX_CH2COI] / 42.0 / Hnuclei + 96.0 * + ab[IDX_CH3COCH3I] / 58.0 / Hnuclei + 16.0 * + ab[IDX_GOHI] / 17.0 / Hnuclei + 32.0 * + ab[IDX_HCO2II] / 45.0 / Hnuclei + 64.0 * + ab[IDX_CH3CHOI] / 44.0 / Hnuclei + 32.0 * + ab[IDX_O2HII] / 33.0 / Hnuclei + 16.0 * + ab[IDX_HNOII] / 31.0 / Hnuclei + 16.0 * + ab[IDX_OHM] / 17.0 / Hnuclei + 64.0 * + ab[IDX_CH3OHI] / 32.0 / Hnuclei + 48.0 * + ab[IDX_H3COII] / 31.0 / Hnuclei + 16.0 * + ab[IDX_SiOHII] / 45.0 / Hnuclei + 16.0 * + ab[IDX_OHII] / 17.0 / Hnuclei + 32.0 * + ab[IDX_H2OII] / 18.0 / Hnuclei + 32.0 * + ab[IDX_H2COII] / 30.0 / Hnuclei + 16.0 * + ab[IDX_HCOI] / 29.0 / Hnuclei + 32.0 * + ab[IDX_H2COI] / 30.0 / Hnuclei + 16.0 * + ab[IDX_OHI] / 17.0 / Hnuclei + 48.0 * + ab[IDX_H3OII] / 19.0 / Hnuclei + 32.0 * + ab[IDX_H2OI] / 18.0 / Hnuclei + 16.0 * + ab[IDX_HCOII] / 29.0 / Hnuclei; + IJth(A, IDX_ELEM_H, IDX_ELEM_He) = 0.0 + 4.0 * ab[IDX_HeHII] / 5.0 / Hnuclei; + IJth(A, IDX_ELEM_H, IDX_ELEM_C) = 0.0 + 288.0 * ab[IDX_GC4H6I] / 54.0 / + Hnuclei + 144.0 * ab[IDX_GCH3C3NI] / 65.0 / + Hnuclei + 240.0 * ab[IDX_GCH3C4HI] / 64.0 / + Hnuclei + 216.0 * ab[IDX_GCH3C5NI] / 89.0 / + Hnuclei + 336.0 * ab[IDX_GCH3C6HI] / 88.0 / + Hnuclei + 288.0 * ab[IDX_GCH3C7NI] / 113.0 / + Hnuclei + 24.0 * ab[IDX_GHC2PI] / 56.0 / + Hnuclei + 24.0 * ab[IDX_GNH2CNI] / 42.0 / + Hnuclei + 36.0 * ab[IDX_GSiC3HI] / 65.0 / + Hnuclei + 36.0 * ab[IDX_GSiCH3I] / 43.0 / + Hnuclei + 24.0 * ab[IDX_GSiC2HI] / 53.0 / + Hnuclei + 144.0 * ab[IDX_C2H4CNI] / 54.0 / + Hnuclei + 36.0 * ab[IDX_GCH2PHI] / 46.0 / + Hnuclei + 216.0 * ab[IDX_GCH3CHCH2I] / 42.0 + / Hnuclei + 96.0 * ab[IDX_GCH3COOHI] / 60.0 + / Hnuclei + 12.0 * ab[IDX_GHCNOI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHCPI] / 44.0 / + Hnuclei + 36.0 * ab[IDX_GHNC3I] / 51.0 / + Hnuclei + 12.0 * ab[IDX_GHNCOI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHOCNI] / 43.0 / + Hnuclei + 12.0 * ab[IDX_GHONCI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_GSiC2H2I] / 54.0 / + Hnuclei + 24.0 * ab[IDX_HC2OI] / 41.0 / + Hnuclei + 432.0 * ab[IDX_GC6H6I] / 78.0 / + Hnuclei + 12.0 * ab[IDX_GHCSiI] / 41.0 / + Hnuclei + 108.0 * ab[IDX_NCCNCH3II] / 67.0 / + Hnuclei + 144.0 * ab[IDX_GC2H4CNI] / 54.0 / + Hnuclei + 144.0 * ab[IDX_GC4H3I] / 51.0 / + Hnuclei + 168.0 * ab[IDX_GC7H2I] / 86.0 / + Hnuclei + 192.0 * ab[IDX_GC8H2I] / 98.0 / + Hnuclei + 216.0 * ab[IDX_GC9H2I] / 110.0 / + Hnuclei + 48.0 * ab[IDX_GCH2CNI] / 40.0 / + Hnuclei + 72.0 * ab[IDX_GCH3CNI] / 41.0 / + Hnuclei + 24.0 * ab[IDX_GH2CNI] / 28.0 / + Hnuclei + 24.0 * ab[IDX_GH2CSI] / 46.0 / + Hnuclei + 24.0 * ab[IDX_GHC2OI] / 41.0 / + Hnuclei + 60.0 * ab[IDX_GHC5NI] / 75.0 / + Hnuclei + 84.0 * ab[IDX_GHC7NI] / 99.0 / + Hnuclei + 108.0 * ab[IDX_GHC9NI] / 123.0 / + Hnuclei + 24.0 * ab[IDX_GHCCNI] / 39.0 / + Hnuclei + 12.0 * ab[IDX_GHCSI] / 45.0 / + Hnuclei + 24.0 * ab[IDX_HCCNI] / 39.0 / + Hnuclei + 72.0 * ab[IDX_C3H2OII] / 54.0 / + Hnuclei + 144.0 * ab[IDX_GC2H6I] / 30.0 / + Hnuclei + 72.0 * ab[IDX_GC3H2I] / 38.0 / + Hnuclei + 120.0 * ab[IDX_GC5H2I] / 62.0 / + Hnuclei + 192.0 * ab[IDX_GCH2CHCCHI] / 52.0 + / Hnuclei + 216.0 * ab[IDX_GCH3COCH3I] / + 58.0 / Hnuclei + 144.0 * ab[IDX_GCH3OCH3I] / + 46.0 / Hnuclei + 24.0 * ab[IDX_GSiCH2I] / + 42.0 / Hnuclei + 108.0 * ab[IDX_H3C3OII] / + 55.0 / Hnuclei + 480.0 * ab[IDX_C8H5II] / + 101.0 / Hnuclei + 540.0 * ab[IDX_C9H5II] / + 113.0 / Hnuclei + 144.0 * ab[IDX_CH3C3NII] / + 65.0 / Hnuclei + 240.0 * ab[IDX_GC10H2I] / + 122.0 / Hnuclei + 96.0 * ab[IDX_GC4H2I] / + 50.0 / Hnuclei + 108.0 * ab[IDX_GCH2CHCNI] / + 53.0 / Hnuclei + 72.0 * ab[IDX_GH2CCCI] / + 38.0 / Hnuclei + 36.0 * ab[IDX_GHC3NI] / + 51.0 / Hnuclei + 288.0 * ab[IDX_C4H6I] / + 54.0 / Hnuclei + 432.0 * ab[IDX_C6H6II] / + 78.0 / Hnuclei + 108.0 * ab[IDX_CH2CHCNII] / + 53.0 / Hnuclei + 72.0 * ab[IDX_COOCH3II] / + 59.0 / Hnuclei + 180.0 * ab[IDX_GC2H5CNI] / + 55.0 / Hnuclei + 144.0 * ab[IDX_GC2H5OHI] / + 46.0 / Hnuclei + 144.0 * ab[IDX_GC6H2I] / + 74.0 / Hnuclei + 24.0 * ab[IDX_H2CNOII] / + 44.0 / Hnuclei + 24.0 * ab[IDX_H2NCOII] / + 44.0 / Hnuclei + 24.0 * ab[IDX_H2OCNII] / + 44.0 / Hnuclei + 96.0 * ab[IDX_PC2H4II] / + 59.0 / Hnuclei + 48.0 * ab[IDX_CH3NHII] / + 30.0 / Hnuclei + 144.0 * ab[IDX_GCH2CCH2I] / + 40.0 / Hnuclei + 36.0 * ab[IDX_GCH2NHI] / + 29.0 / Hnuclei + 144.0 * ab[IDX_GCH3CCHI] / + 40.0 / Hnuclei + 12.0 * ab[IDX_GHNCI] / 27.0 + / Hnuclei + 96.0 * ab[IDX_H2C4NII] / 64.0 / + Hnuclei + 24.0 * ab[IDX_H2CClII] / 49.0 / + Hnuclei + 12.0 * ab[IDX_HOCII] / 29.0 / + Hnuclei + 36.0 * ab[IDX_NH2CNHII] / 43.0 / + Hnuclei + 144.0 * ab[IDX_C2H5OHII] / 46.0 / + Hnuclei + 192.0 * ab[IDX_CH2CHCCHI] / 52.0 / + Hnuclei + 72.0 * ab[IDX_CH2OHCOII] / 59.0 / + Hnuclei + 108.0 * ab[IDX_GCH2CCHI] / 39.0 / + Hnuclei + 48.0 * ab[IDX_GCH2COI] / 42.0 / + Hnuclei + 48.0 * ab[IDX_HC4NII] / 63.0 / + Hnuclei + 24.0 * ab[IDX_HCNOHII] / 44.0 / + Hnuclei + 24.0 * ab[IDX_HNCOHII] / 44.0 / + Hnuclei + 12.0 * ab[IDX_HOCNII] / 43.0 / + Hnuclei + 72.0 * ab[IDX_PC2H3II] / 58.0 / + Hnuclei + 72.0 * ab[IDX_CH3CSII] / 59.0 / + Hnuclei + 168.0 * ab[IDX_H2C7NII] / 100.0 / + Hnuclei + 216.0 * ab[IDX_H2C9NII] / 124.0 / + Hnuclei + 12.0 * ab[IDX_HONCII] / 43.0 / + Hnuclei + 36.0 * ab[IDX_PCH3II] / 46.0 / + Hnuclei + 360.0 * ab[IDX_C10H3II] / 123.0 / + Hnuclei + 216.0 * ab[IDX_C2H5CNHII] / 56.0 / + Hnuclei + 48.0 * ab[IDX_CH2NH2II] / 30.0 / + Hnuclei + 120.0 * ab[IDX_CH2OHCH2OII] / 61.0 + / Hnuclei + 288.0 * ab[IDX_CH3C5NHII] / 90.0 + / Hnuclei + 384.0 * ab[IDX_CH3C7NHII] / + 114.0 / Hnuclei + 120.0 * ab[IDX_GC2H5I] / + 29.0 / Hnuclei + 72.0 * ab[IDX_GCOOCH3I] / + 59.0 / Hnuclei + 12.0 * ab[IDX_GHCNI] / 27.0 + / Hnuclei + 24.0 * ab[IDX_H2CNI] / 28.0 / + Hnuclei + 180.0 * ab[IDX_H3C5NII] / 77.0 / + Hnuclei + 12.0 * ab[IDX_HCNOII] / 43.0 / + Hnuclei + 96.0 * ab[IDX_CH3COOHII] / 60.0 / + Hnuclei + 324.0 * ab[IDX_H3C9NII] / 125.0 / + Hnuclei + 120.0 * ab[IDX_H5C2O2II] / 61.0 / + Hnuclei + 24.0 * ab[IDX_HCOOHII] / 46.0 / + Hnuclei + 120.0 * ab[IDX_CH3COOH2II] / 61.0 + / Hnuclei + 144.0 * ab[IDX_CH3OCH3II] / 46.0 + / Hnuclei + 120.0 * ab[IDX_GC10HI] / 121.0 / + Hnuclei + 96.0 * ab[IDX_GC8HI] / 97.0 / + Hnuclei + 72.0 * ab[IDX_GCH2OHCOI] / 59.0 / + Hnuclei + 12.0 * ab[IDX_GCOOHI] / 45.0 / + Hnuclei + 252.0 * ab[IDX_H3C7NII] / 101.0 / + Hnuclei + 24.0 * ab[IDX_NH2CNI] / 42.0 / + Hnuclei + 192.0 * ab[IDX_CH3C3NHII] / 66.0 / + Hnuclei + 168.0 * ab[IDX_CH3OCH4II] / 47.0 / + Hnuclei + 96.0 * ab[IDX_GC2H4I] / 28.0 / + Hnuclei + 108.0 * ab[IDX_GC9HI] / 109.0 / + Hnuclei + 84.0 * ab[IDX_HC7NII] / 99.0 / + Hnuclei + 108.0 * ab[IDX_HC9NII] / 123.0 / + Hnuclei + 12.0 * ab[IDX_HNCOII] / 43.0 / + Hnuclei + 36.0 * ab[IDX_PC3HII] / 68.0 / + Hnuclei + 48.0 * ab[IDX_PCH4II] / 47.0 / + Hnuclei + 180.0 * ab[IDX_C2H5CNI] / 55.0 / + Hnuclei + 168.0 * ab[IDX_C2H5OH2II] / 47.0 / + Hnuclei + 168.0 * ab[IDX_C2H7II] / 31.0 / + Hnuclei + 144.0 * ab[IDX_CH2CHCNHII] / 54.0 + / Hnuclei + 72.0 * ab[IDX_COOCH3I] / 59.0 / + Hnuclei + 96.0 * ab[IDX_HCOOCH3II] / 60.0 / + Hnuclei + 48.0 * ab[IDX_PC2H2II] / 57.0 / + Hnuclei + 72.0 * ab[IDX_SiC3H2II] / 66.0 / + Hnuclei + 48.0 * ab[IDX_SiC4HII] / 77.0 / + Hnuclei + 12.0 * ab[IDX_SiNCHII] / 55.0 / + Hnuclei + 240.0 * ab[IDX_C4H5II] / 53.0 / + Hnuclei + 336.0 * ab[IDX_C4H7II] / 55.0 / + Hnuclei + 96.0 * ab[IDX_CH2OHCHOII] / 60.0 / + Hnuclei + 96.0 * ab[IDX_CH3CHOII] / 44.0 / + Hnuclei + 96.0 * ab[IDX_GCH2OHCHOI] / 60.0 / + Hnuclei + 24.0 * ab[IDX_GHCOOHI] / 46.0 / + Hnuclei + 12.0 * ab[IDX_HOCSII] / 61.0 / + Hnuclei + 48.0 * ab[IDX_PC4HII] / 80.0 / + Hnuclei + 48.0 * ab[IDX_SiCH4II] / 44.0 / + Hnuclei + 240.0 * ab[IDX_C10H2II] / 122.0 / + Hnuclei + 72.0 * ab[IDX_CH3CNII] / 41.0 / + Hnuclei + 48.0 * ab[IDX_GC2H2I] / 26.0 / + Hnuclei + 84.0 * ab[IDX_GC7HI] / 85.0 / + Hnuclei + 72.0 * ab[IDX_GCH3COI] / 43.0 / + Hnuclei + 96.0 * ab[IDX_GHCOOCH3I] / 60.0 / + Hnuclei + 48.0 * ab[IDX_HC4SII] / 81.0 / + Hnuclei + 120.0 * ab[IDX_HC5NHII] / 76.0 / + Hnuclei + 72.0 * ab[IDX_SiC2H3II] / 55.0 / + Hnuclei + 36.0 * ab[IDX_SiC3HI] / 65.0 / + Hnuclei + 36.0 * ab[IDX_SiCH3II] / 43.0 / + Hnuclei + 192.0 * ab[IDX_C4H4II] / 52.0 / + Hnuclei + 48.0 * ab[IDX_CH2CNII] / 40.0 / + Hnuclei + 216.0 * ab[IDX_CH3COCH3II] / 58.0 + / Hnuclei + 36.0 * ab[IDX_GCH2OHI] / 31.0 / + Hnuclei + 48.0 * ab[IDX_GCH3OHI] / 32.0 / + Hnuclei + 24.0 * ab[IDX_HC2PII] / 56.0 / + Hnuclei + 60.0 * ab[IDX_HC5NII] / 75.0 / + Hnuclei + 12.0 * ab[IDX_HONCI] / 43.0 / + Hnuclei + 24.0 * ab[IDX_PCH2II] / 45.0 / + Hnuclei + 72.0 * ab[IDX_CH2OHCOI] / 59.0 / + Hnuclei + 216.0 * ab[IDX_CH3C5NI] / 89.0 / + Hnuclei + 288.0 * ab[IDX_CH3C7NI] / 113.0 / + Hnuclei + 36.0 * ab[IDX_GC3HI] / 37.0 / + Hnuclei + 48.0 * ab[IDX_GC4HI] / 49.0 / + Hnuclei + 60.0 * ab[IDX_GC5HI] / 61.0 / + Hnuclei + 72.0 * ab[IDX_GC6HI] / 73.0 / + Hnuclei + 24.0 * ab[IDX_H2NCII] / 28.0 / + Hnuclei + 36.0 * ab[IDX_H3CSII] / 47.0 / + Hnuclei + 24.0 * ab[IDX_HC2OII] / 41.0 / + Hnuclei + 12.0 * ab[IDX_HCPII] / 44.0 / + Hnuclei + 72.0 * ab[IDX_GC2H3I] / 27.0 / + Hnuclei + 36.0 * ab[IDX_GCH3OI] / 31.0 / + Hnuclei + 36.0 * ab[IDX_HC3SII] / 69.0 / + Hnuclei + 36.0 * ab[IDX_HCOOH2II] / 47.0 / + Hnuclei + 48.0 * ab[IDX_SiC2H2I] / 54.0 / + Hnuclei + 24.0 * ab[IDX_C2NHII] / 39.0 / + Hnuclei + 216.0 * ab[IDX_C3H6II] / 42.0 / + Hnuclei + 504.0 * ab[IDX_C6H7II] / 79.0 / + Hnuclei + 384.0 * ab[IDX_C8H4II] / 100.0 / + Hnuclei + 96.0 * ab[IDX_CH2OHCHOI] / 60.0 / + Hnuclei + 36.0 * ab[IDX_HC3OII] / 53.0 / + Hnuclei + 12.0 * ab[IDX_HCNOI] / 43.0 / + Hnuclei + 36.0 * ab[IDX_SiC3HII] / 65.0 / + Hnuclei + 36.0 * ab[IDX_SiCH3I] / 43.0 / + Hnuclei + 252.0 * ab[IDX_C3H7II] / 43.0 / + Hnuclei + 432.0 * ab[IDX_C9H4II] / 112.0 / + Hnuclei + 48.0 * ab[IDX_CH2COII] / 42.0 / + Hnuclei + 36.0 * ab[IDX_CH2PHI] / 46.0 / + Hnuclei + 144.0 * ab[IDX_CH3C3NI] / 65.0 / + Hnuclei + 96.0 * ab[IDX_GCH3CHOI] / 44.0 / + Hnuclei + 24.0 * ab[IDX_GH2COI] / 30.0 / + Hnuclei + 12.0 * ab[IDX_HOCNI] / 43.0 / + Hnuclei + 48.0 * ab[IDX_SiC2H2II] / 54.0 / + Hnuclei + 288.0 * ab[IDX_C6H4II] / 76.0 / + Hnuclei + 72.0 * ab[IDX_CH3COI] / 43.0 / + Hnuclei + 252.0 * ab[IDX_CH3COCH4II] / 59.0 + / Hnuclei + 48.0 * ab[IDX_CH3OHII] / 32.0 / + Hnuclei + 12.0 * ab[IDX_COOHI] / 45.0 / + Hnuclei + 336.0 * ab[IDX_C7H4II] / 88.0 / + Hnuclei + 420.0 * ab[IDX_C7H5II] / 89.0 / + Hnuclei + 336.0 * ab[IDX_CH3C6HI] / 88.0 / + Hnuclei + 24.0 * ab[IDX_H2CSII] / 46.0 / + Hnuclei + 108.0 * ab[IDX_HC9NI] / 123.0 / + Hnuclei + 96.0 * ab[IDX_HCOOCH3I] / 60.0 / + Hnuclei + 24.0 * ab[IDX_NCCNHII] / 53.0 / + Hnuclei + 24.0 * ab[IDX_SiC2HI] / 53.0 / + Hnuclei + 48.0 * ab[IDX_CH2CNI] / 40.0 / + Hnuclei + 240.0 * ab[IDX_CH3C4HII] / 64.0 / + Hnuclei + 48.0 * ab[IDX_GCH4I] / 16.0 / + Hnuclei + 12.0 * ab[IDX_HCPI] / 44.0 / + Hnuclei + 12.0 * ab[IDX_HNCOI] / 43.0 / + Hnuclei + 240.0 * ab[IDX_CH3C4HI] / 64.0 / + Hnuclei + 96.0 * ab[IDX_CH3COOHI] / 60.0 / + Hnuclei + 144.0 * ab[IDX_CH3OCH3I] / 46.0 / + Hnuclei + 24.0 * ab[IDX_GC2HI] / 25.0 / + Hnuclei + 24.0 * ab[IDX_H2CSI] / 46.0 / + Hnuclei + 360.0 * ab[IDX_C6H5II] / 77.0 / + Hnuclei + 36.0 * ab[IDX_CH2NHI] / 29.0 / + Hnuclei + 36.0 * ab[IDX_CH3OI] / 31.0 / + Hnuclei + 12.0 * ab[IDX_GHCOI] / 29.0 / + Hnuclei + 24.0 * ab[IDX_HC2PI] / 56.0 / + Hnuclei + 12.0 * ab[IDX_HCSiI] / 41.0 / + Hnuclei + 24.0 * ab[IDX_SiCH2I] / 42.0 / + Hnuclei + 120.0 * ab[IDX_C10HII] / 121.0 / + Hnuclei + 12.0 * ab[IDX_HCSiII] / 41.0 / + Hnuclei + 144.0 * ab[IDX_C2H6II] / 30.0 / + Hnuclei + 96.0 * ab[IDX_C8HII] / 97.0 / + Hnuclei + 36.0 * ab[IDX_CH2OHI] / 31.0 / + Hnuclei + 300.0 * ab[IDX_C5H5II] / 65.0 / + Hnuclei + 12.0 * ab[IDX_HCSI] / 45.0 / + Hnuclei + 24.0 * ab[IDX_SiC2HII] / 53.0 / + Hnuclei + 72.0 * ab[IDX_C6HII] / 73.0 / + Hnuclei + 216.0 * ab[IDX_C9H2I] / 110.0 / + Hnuclei + 108.0 * ab[IDX_CH2CHCNI] / 53.0 / + Hnuclei + 120.0 * ab[IDX_CH3CHOHII] / 45.0 / + Hnuclei + 96.0 * ab[IDX_CH3CNHII] / 42.0 / + Hnuclei + 72.0 * ab[IDX_CH3COII] / 43.0 / + Hnuclei + 84.0 * ab[IDX_HC7NI] / 99.0 / + Hnuclei + 432.0 * ab[IDX_C6H6I] / 78.0 / + Hnuclei + 24.0 * ab[IDX_HCOOHI] / 46.0 / + Hnuclei + 240.0 * ab[IDX_C10H2I] / 122.0 / + Hnuclei + 144.0 * ab[IDX_C2H5OHI] / 46.0 / + Hnuclei + 60.0 * ab[IDX_CH3OH2II] / 33.0 / + Hnuclei + 216.0 * ab[IDX_C6H3II] / 75.0 / + Hnuclei + 288.0 * ab[IDX_C8H3II] / 99.0 / + Hnuclei + 108.0 * ab[IDX_C9HII] / 109.0 / + Hnuclei + 324.0 * ab[IDX_C9H3II] / 111.0 / + Hnuclei + 48.0 * ab[IDX_CH2COI] / 42.0 / + Hnuclei + 36.0 * ab[IDX_HNC3I] / 51.0 / + Hnuclei + 24.0 * ab[IDX_SiCH2II] / 42.0 / + Hnuclei + 216.0 * ab[IDX_CH3COCH3I] / 58.0 / + Hnuclei + 36.0 * ab[IDX_HC3NII] / 51.0 / + Hnuclei + 192.0 * ab[IDX_C8H2I] / 98.0 / + Hnuclei + 60.0 * ab[IDX_HC5NI] / 75.0 / + Hnuclei + 84.0 * ab[IDX_C7HII] / 85.0 / + Hnuclei + 216.0 * ab[IDX_C9H2II] / 110.0 / + Hnuclei + 168.0 * ab[IDX_C7H2I] / 86.0 / + Hnuclei + 12.0 * ab[IDX_HCSII] / 45.0 / + Hnuclei + 144.0 * ab[IDX_C3H4II] / 40.0 / + Hnuclei + 192.0 * ab[IDX_C8H2II] / 98.0 / + Hnuclei + 24.0 * ab[IDX_GCH2I] / 14.0 / + Hnuclei + 12.0 * ab[IDX_HCO2II] / 45.0 / + Hnuclei + 180.0 * ab[IDX_C5H3II] / 63.0 / + Hnuclei + 72.0 * ab[IDX_HC3NHII] / 52.0 / + Hnuclei + 60.0 * ab[IDX_C5HII] / 61.0 / + Hnuclei + 96.0 * ab[IDX_CH3CHOI] / 44.0 / + Hnuclei + 180.0 * ab[IDX_C3H5II] / 41.0 / + Hnuclei + 252.0 * ab[IDX_C7H3II] / 87.0 / + Hnuclei + 72.0 * ab[IDX_CH3CNI] / 41.0 / + Hnuclei + 168.0 * ab[IDX_C7H2II] / 86.0 / + Hnuclei + 144.0 * ab[IDX_C6H2II] / 74.0 / + Hnuclei + 48.0 * ab[IDX_CH4II] / 16.0 / + Hnuclei + 72.0 * ab[IDX_H2CCCI] / 38.0 / + Hnuclei + 144.0 * ab[IDX_C6H2I] / 74.0 / + Hnuclei + 120.0 * ab[IDX_C2H5II] / 29.0 / + Hnuclei + 120.0 * ab[IDX_C5H2I] / 62.0 / + Hnuclei + 120.0 * ab[IDX_C5H2II] / 62.0 / + Hnuclei + 144.0 * ab[IDX_CH2CCH2I] / 40.0 / + Hnuclei + 144.0 * ab[IDX_C2H6I] / 30.0 / + Hnuclei + 72.0 * ab[IDX_C3H2I] / 38.0 / + Hnuclei + 120.0 * ab[IDX_C2H5I] / 29.0 / + Hnuclei + 12.0 * ab[IDX_HCNII] / 27.0 / + Hnuclei + 216.0 * ab[IDX_CH3CHCH2I] / 42.0 / + Hnuclei + 48.0 * ab[IDX_C4HII] / 49.0 / + Hnuclei + 12.0 * ab[IDX_CHM] / 13.0 / + Hnuclei + 36.0 * ab[IDX_GCH3I] / 15.0 / + Hnuclei + 24.0 * ab[IDX_C2HM] / 25.0 / + Hnuclei + 48.0 * ab[IDX_C4HM] / 49.0 / + Hnuclei + 144.0 * ab[IDX_CH3CCHI] / 40.0 / + Hnuclei + 60.0 * ab[IDX_CH5II] / 17.0 / + Hnuclei + 24.0 * ab[IDX_HC2SII] / 57.0 / + Hnuclei + 120.0 * ab[IDX_C10HM] / 121.0 / + Hnuclei + 36.0 * ab[IDX_C3HM] / 37.0 / + Hnuclei + 72.0 * ab[IDX_C6HM] / 73.0 / + Hnuclei + 96.0 * ab[IDX_C8HM] / 97.0 / + Hnuclei + 84.0 * ab[IDX_C7HM] / 85.0 / + Hnuclei + 108.0 * ab[IDX_C9HM] / 109.0 / + Hnuclei + 60.0 * ab[IDX_C5HM] / 61.0 / + Hnuclei + 48.0 * ab[IDX_CH3OHI] / 32.0 / + Hnuclei + 36.0 * ab[IDX_HC3NI] / 51.0 / + Hnuclei + 36.0 * ab[IDX_C3HII] / 37.0 / + Hnuclei + 108.0 * ab[IDX_C3H3II] / 39.0 / + Hnuclei + 36.0 * ab[IDX_H3COII] / 31.0 / + Hnuclei + 12.0 * ab[IDX_GCHI] / 13.0 / + Hnuclei + 144.0 * ab[IDX_C4H3I] / 51.0 / + Hnuclei + 24.0 * ab[IDX_C2HII] / 25.0 / + Hnuclei + 72.0 * ab[IDX_C3H2II] / 38.0 / + Hnuclei + 24.0 * ab[IDX_CH2II] / 14.0 / + Hnuclei + 12.0 * ab[IDX_CHII] / 13.0 / + Hnuclei + 120.0 * ab[IDX_C10HI] / 121.0 / + Hnuclei + 108.0 * ab[IDX_C9HI] / 109.0 / + Hnuclei + 96.0 * ab[IDX_C8HI] / 97.0 / + Hnuclei + 84.0 * ab[IDX_C7HI] / 85.0 / + Hnuclei + 96.0 * ab[IDX_C2H4II] / 28.0 / + Hnuclei + 144.0 * ab[IDX_C4H3II] / 51.0 / + Hnuclei + 108.0 * ab[IDX_CH2CCHI] / 39.0 / + Hnuclei + 108.0 * ab[IDX_CH2CCHII] / 39.0 / + Hnuclei + 72.0 * ab[IDX_C6HI] / 73.0 / + Hnuclei + 60.0 * ab[IDX_C5HI] / 61.0 / + Hnuclei + 36.0 * ab[IDX_C3HI] / 37.0 / + Hnuclei + 24.0 * ab[IDX_H2COII] / 30.0 / + Hnuclei + 48.0 * ab[IDX_C4HI] / 49.0 / + Hnuclei + 96.0 * ab[IDX_C4H2I] / 50.0 / + Hnuclei + 96.0 * ab[IDX_C4H2II] / 50.0 / + Hnuclei + 24.0 * ab[IDX_HCNHII] / 28.0 / + Hnuclei + 24.0 * ab[IDX_CH2I] / 14.0 / + Hnuclei + 12.0 * ab[IDX_HNCI] / 27.0 / + Hnuclei + 96.0 * ab[IDX_C2H4I] / 28.0 / + Hnuclei + 72.0 * ab[IDX_C2H3I] / 27.0 / + Hnuclei + 72.0 * ab[IDX_C2H3II] / 27.0 / + Hnuclei + 12.0 * ab[IDX_HCOI] / 29.0 / + Hnuclei + 48.0 * ab[IDX_CH4I] / 16.0 / + Hnuclei + 24.0 * ab[IDX_C2HI] / 25.0 / + Hnuclei + 24.0 * ab[IDX_H2COI] / 30.0 / + Hnuclei + 12.0 * ab[IDX_HCNI] / 27.0 / + Hnuclei + 12.0 * ab[IDX_CHI] / 13.0 / + Hnuclei + 48.0 * ab[IDX_C2H2II] / 26.0 / + Hnuclei + 36.0 * ab[IDX_CH3II] / 15.0 / + Hnuclei + 48.0 * ab[IDX_C2H2I] / 26.0 / + Hnuclei + 36.0 * ab[IDX_CH3I] / 15.0 / + Hnuclei + 12.0 * ab[IDX_HCOII] / 29.0 / + Hnuclei; + IJth(A, IDX_ELEM_H, IDX_ELEM_GRAIN) = 0.0; + IJth(A, IDX_ELEM_H, IDX_ELEM_H) = 0.0 + 4.0 * ab[IDX_GH2S2I] / 66.0 / Hnuclei + + 36.0 * ab[IDX_GC4H6I] / 54.0 / Hnuclei + + 9.0 * ab[IDX_GCH3C3NI] / 65.0 / Hnuclei + + 16.0 * ab[IDX_GCH3C4HI] / 64.0 / Hnuclei + + 9.0 * ab[IDX_GCH3C5NI] / 89.0 / Hnuclei + + 16.0 * ab[IDX_GCH3C6HI] / 88.0 / Hnuclei + + 9.0 * ab[IDX_GCH3C7NI] / 113.0 / Hnuclei + + 1.0 * ab[IDX_GHC2PI] / 56.0 / Hnuclei + 1.0 + * ab[IDX_GHClI] / 36.0 / Hnuclei + 1.0 * + ab[IDX_GHFI] / 20.0 / Hnuclei + 1.0 * + ab[IDX_GHNSiI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHPOI] / 48.0 / Hnuclei + 4.0 * + ab[IDX_GNH2CNI] / 42.0 / Hnuclei + 1.0 * + ab[IDX_GSiC3HI] / 65.0 / Hnuclei + 9.0 * + ab[IDX_GSiCH3I] / 43.0 / Hnuclei + 4.0 * + ab[IDX_GH2SiOI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_GSiC2HI] / 53.0 / Hnuclei + 16.0 * + ab[IDX_C2H4CNI] / 54.0 / Hnuclei + 9.0 * + ab[IDX_GCH2PHI] / 46.0 / Hnuclei + 36.0 * + ab[IDX_GCH3CHCH2I] / 42.0 / Hnuclei + 16.0 * + ab[IDX_GCH3COOHI] / 60.0 / Hnuclei + 4.0 * + ab[IDX_GH2SI] / 34.0 / Hnuclei + 1.0 * + ab[IDX_GHCNOI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHCPI] / 44.0 / Hnuclei + 1.0 * + ab[IDX_GHNC3I] / 51.0 / Hnuclei + 1.0 * + ab[IDX_GHNCOI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHOCNI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHONCI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_GHS2I] / 65.0 / Hnuclei + 4.0 * + ab[IDX_GPH2I] / 33.0 / Hnuclei + 4.0 * + ab[IDX_GSiC2H2I] / 54.0 / Hnuclei + 1.0 * + ab[IDX_HC2OI] / 41.0 / Hnuclei + 36.0 * + ab[IDX_GC6H6I] / 78.0 / Hnuclei + 4.0 * + ab[IDX_GH2O2I] / 34.0 / Hnuclei + 1.0 * + ab[IDX_GHCSiI] / 41.0 / Hnuclei + 1.0 * + ab[IDX_GPHI] / 32.0 / Hnuclei + 16.0 * + ab[IDX_GSiH4I] / 32.0 / Hnuclei + 9.0 * + ab[IDX_NCCNCH3II] / 67.0 / Hnuclei + 16.0 * + ab[IDX_GC2H4CNI] / 54.0 / Hnuclei + 9.0 * + ab[IDX_GC4H3I] / 51.0 / Hnuclei + 4.0 * + ab[IDX_GC7H2I] / 86.0 / Hnuclei + 4.0 * + ab[IDX_GC8H2I] / 98.0 / Hnuclei + 4.0 * + ab[IDX_GC9H2I] / 110.0 / Hnuclei + 4.0 * + ab[IDX_GCH2CNI] / 40.0 / Hnuclei + 9.0 * + ab[IDX_GCH3CNI] / 41.0 / Hnuclei + 4.0 * + ab[IDX_GH2CNI] / 28.0 / Hnuclei + 4.0 * + ab[IDX_GH2CSI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_GHC2OI] / 41.0 / Hnuclei + 1.0 * + ab[IDX_GHC5NI] / 75.0 / Hnuclei + 1.0 * + ab[IDX_GHC7NI] / 99.0 / Hnuclei + 1.0 * + ab[IDX_GHC9NI] / 123.0 / Hnuclei + 1.0 * + ab[IDX_GHCCNI] / 39.0 / Hnuclei + 1.0 * + ab[IDX_GHCSI] / 45.0 / Hnuclei + 9.0 * + ab[IDX_GSiH3I] / 31.0 / Hnuclei + 1.0 * + ab[IDX_HCCNI] / 39.0 / Hnuclei + 4.0 * + ab[IDX_C3H2OII] / 54.0 / Hnuclei + 36.0 * + ab[IDX_GC2H6I] / 30.0 / Hnuclei + 4.0 * + ab[IDX_GC3H2I] / 38.0 / Hnuclei + 4.0 * + ab[IDX_GC5H2I] / 62.0 / Hnuclei + 16.0 * + ab[IDX_GCH2CHCCHI] / 52.0 / Hnuclei + 36.0 * + ab[IDX_GCH3COCH3I] / 58.0 / Hnuclei + 36.0 * + ab[IDX_GCH3OCH3I] / 46.0 / Hnuclei + 4.0 * + ab[IDX_GSiCH2I] / 42.0 / Hnuclei + 1.0 * + ab[IDX_GSiHI] / 29.0 / Hnuclei + 4.0 * + ab[IDX_GSiH2I] / 30.0 / Hnuclei + 9.0 * + ab[IDX_H3C3OII] / 55.0 / Hnuclei + 1.0 * + ab[IDX_HFII] / 20.0 / Hnuclei + 25.0 * + ab[IDX_C8H5II] / 101.0 / Hnuclei + 25.0 * + ab[IDX_C9H5II] / 113.0 / Hnuclei + 9.0 * + ab[IDX_CH3C3NII] / 65.0 / Hnuclei + 4.0 * + ab[IDX_GC10H2I] / 122.0 / Hnuclei + 4.0 * + ab[IDX_GC4H2I] / 50.0 / Hnuclei + 9.0 * + ab[IDX_GCH2CHCNI] / 53.0 / Hnuclei + 4.0 * + ab[IDX_GH2CCCI] / 38.0 / Hnuclei + 1.0 * + ab[IDX_GHC3NI] / 51.0 / Hnuclei + 4.0 * + ab[IDX_H2FII] / 21.0 / Hnuclei + 36.0 * + ab[IDX_C4H6I] / 54.0 / Hnuclei + 36.0 * + ab[IDX_C6H6II] / 78.0 / Hnuclei + 9.0 * + ab[IDX_CH2CHCNII] / 53.0 / Hnuclei + 9.0 * + ab[IDX_COOCH3II] / 59.0 / Hnuclei + 25.0 * + ab[IDX_GC2H5CNI] / 55.0 / Hnuclei + 36.0 * + ab[IDX_GC2H5OHI] / 46.0 / Hnuclei + 4.0 * + ab[IDX_GC6H2I] / 74.0 / Hnuclei + 1.0 * + ab[IDX_GO2HI] / 33.0 / Hnuclei + 4.0 * + ab[IDX_H2CNOII] / 44.0 / Hnuclei + 4.0 * + ab[IDX_H2NCOII] / 44.0 / Hnuclei + 4.0 * + ab[IDX_H2OCNII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_PC2H4II] / 59.0 / Hnuclei + 16.0 * + ab[IDX_CH3NHII] / 30.0 / Hnuclei + 16.0 * + ab[IDX_GCH2CCH2I] / 40.0 / Hnuclei + 9.0 * + ab[IDX_GCH2NHI] / 29.0 / Hnuclei + 16.0 * + ab[IDX_GCH3CCHI] / 40.0 / Hnuclei + 1.0 * + ab[IDX_GHNCI] / 27.0 / Hnuclei + 4.0 * + ab[IDX_H2C4NII] / 64.0 / Hnuclei + 4.0 * + ab[IDX_H2CClII] / 49.0 / Hnuclei + 4.0 * + ab[IDX_H2NOII] / 32.0 / Hnuclei + 1.0 * + ab[IDX_HClII] / 36.0 / Hnuclei + 1.0 * + ab[IDX_HNSII] / 47.0 / Hnuclei + 1.0 * + ab[IDX_HOCII] / 29.0 / Hnuclei + 1.0 * + ab[IDX_HSOII] / 49.0 / Hnuclei + 1.0 * + ab[IDX_HSiO2II] / 61.0 / Hnuclei + 9.0 * + ab[IDX_NH2CNHII] / 43.0 / Hnuclei + 36.0 * + ab[IDX_C2H5OHII] / 46.0 / Hnuclei + 16.0 * + ab[IDX_CH2CHCCHI] / 52.0 / Hnuclei + 9.0 * + ab[IDX_CH2OHCOII] / 59.0 / Hnuclei + 9.0 * + ab[IDX_GCH2CCHI] / 39.0 / Hnuclei + 4.0 * + ab[IDX_GCH2COI] / 42.0 / Hnuclei + 1.0 * + ab[IDX_GHNOI] / 31.0 / Hnuclei + 1.0 * + ab[IDX_HC4NII] / 63.0 / Hnuclei + 4.0 * + ab[IDX_HCNOHII] / 44.0 / Hnuclei + 4.0 * + ab[IDX_HNCOHII] / 44.0 / Hnuclei + 1.0 * + ab[IDX_HOCNII] / 43.0 / Hnuclei + 1.0 * + ab[IDX_HeHII] / 5.0 / Hnuclei + 9.0 * + ab[IDX_PC2H3II] / 58.0 / Hnuclei + 9.0 * + ab[IDX_PNH3II] / 48.0 / Hnuclei + 9.0 * + ab[IDX_CH3CSII] / 59.0 / Hnuclei + 4.0 * + ab[IDX_H2C7NII] / 100.0 / Hnuclei + 4.0 * + ab[IDX_H2C9NII] / 124.0 / Hnuclei + 4.0 * + ab[IDX_H2O2I] / 34.0 / Hnuclei + 9.0 * + ab[IDX_H3S2II] / 67.0 / Hnuclei + 1.0 * + ab[IDX_HONCII] / 43.0 / Hnuclei + 9.0 * + ab[IDX_PCH3II] / 46.0 / Hnuclei + 4.0 * + ab[IDX_PNH2II] / 47.0 / Hnuclei + 9.0 * + ab[IDX_C10H3II] / 123.0 / Hnuclei + 36.0 * + ab[IDX_C2H5CNHII] / 56.0 / Hnuclei + 16.0 * + ab[IDX_CH2NH2II] / 30.0 / Hnuclei + 25.0 * + ab[IDX_CH2OHCH2OII] / 61.0 / Hnuclei + 16.0 + * ab[IDX_CH3C5NHII] / 90.0 / Hnuclei + 16.0 + * ab[IDX_CH3C7NHII] / 114.0 / Hnuclei + 25.0 + * ab[IDX_GC2H5I] / 29.0 / Hnuclei + 9.0 * + ab[IDX_GCOOCH3I] / 59.0 / Hnuclei + 1.0 * + ab[IDX_GHCNI] / 27.0 / Hnuclei + 4.0 * + ab[IDX_H2CNI] / 28.0 / Hnuclei + 4.0 * + ab[IDX_H2SiOII] / 46.0 / Hnuclei + 9.0 * + ab[IDX_H3C5NII] / 77.0 / Hnuclei + 1.0 * + ab[IDX_HCNOII] / 43.0 / Hnuclei + 16.0 * + ab[IDX_CH3COOHII] / 60.0 / Hnuclei + 9.0 * + ab[IDX_GNH3I] / 17.0 / Hnuclei + 4.0 * + ab[IDX_H2ClII] / 37.0 / Hnuclei + 9.0 * + ab[IDX_H3C9NII] / 125.0 / Hnuclei + 25.0 * + ab[IDX_H5C2O2II] / 61.0 / Hnuclei + 4.0 * + ab[IDX_HCOOHII] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HPNII] / 46.0 / Hnuclei + 25.0 * + ab[IDX_CH3COOH2II] / 61.0 / Hnuclei + 36.0 * + ab[IDX_CH3OCH3II] / 46.0 / Hnuclei + 1.0 * + ab[IDX_GC10HI] / 121.0 / Hnuclei + 1.0 * + ab[IDX_GC8HI] / 97.0 / Hnuclei + 9.0 * + ab[IDX_GCH2OHCOI] / 59.0 / Hnuclei + 1.0 * + ab[IDX_GCOOHI] / 45.0 / Hnuclei + 9.0 * + ab[IDX_H3C7NII] / 101.0 / Hnuclei + 9.0 * + ab[IDX_H3SiOII] / 47.0 / Hnuclei + 1.0 * + ab[IDX_HSO2II] / 65.0 / Hnuclei + 4.0 * + ab[IDX_NH2CNI] / 42.0 / Hnuclei + 16.0 * + ab[IDX_CH3C3NHII] / 66.0 / Hnuclei + 49.0 * + ab[IDX_CH3OCH4II] / 47.0 / Hnuclei + 16.0 * + ab[IDX_GC2H4I] / 28.0 / Hnuclei + 1.0 * + ab[IDX_GC9HI] / 109.0 / Hnuclei + 1.0 * + ab[IDX_HC7NII] / 99.0 / Hnuclei + 1.0 * + ab[IDX_HC9NII] / 123.0 / Hnuclei + 1.0 * + ab[IDX_HNCOII] / 43.0 / Hnuclei + 1.0 * + ab[IDX_PC3HII] / 68.0 / Hnuclei + 16.0 * + ab[IDX_PCH4II] / 47.0 / Hnuclei + 16.0 * + ab[IDX_SiH4II] / 32.0 / Hnuclei + 25.0 * + ab[IDX_C2H5CNI] / 55.0 / Hnuclei + 49.0 * + ab[IDX_C2H5OH2II] / 47.0 / Hnuclei + 49.0 * + ab[IDX_C2H7II] / 31.0 / Hnuclei + 16.0 * + ab[IDX_CH2CHCNHII] / 54.0 / Hnuclei + 9.0 * + ab[IDX_COOCH3I] / 59.0 / Hnuclei + 1.0 * + ab[IDX_GHSI] / 33.0 / Hnuclei + 4.0 * + ab[IDX_H2POII] / 49.0 / Hnuclei + 16.0 * + ab[IDX_HCOOCH3II] / 60.0 / Hnuclei + 1.0 * + ab[IDX_HN2OII] / 45.0 / Hnuclei + 4.0 * + ab[IDX_PC2H2II] / 57.0 / Hnuclei + 4.0 * + ab[IDX_SiC3H2II] / 66.0 / Hnuclei + 1.0 * + ab[IDX_SiC4HII] / 77.0 / Hnuclei + 25.0 * + ab[IDX_SiH5II] / 33.0 / Hnuclei + 1.0 * + ab[IDX_SiNCHII] / 55.0 / Hnuclei + 25.0 * + ab[IDX_C4H5II] / 53.0 / Hnuclei + 49.0 * + ab[IDX_C4H7II] / 55.0 / Hnuclei + 16.0 * + ab[IDX_CH2OHCHOII] / 60.0 / Hnuclei + 16.0 * + ab[IDX_CH3CHOII] / 44.0 / Hnuclei + 16.0 * + ab[IDX_GCH2OHCHOI] / 60.0 / Hnuclei + 4.0 * + ab[IDX_GHCOOHI] / 46.0 / Hnuclei + 4.0 * + ab[IDX_H2S2I] / 66.0 / Hnuclei + 1.0 * + ab[IDX_HNSiII] / 43.0 / Hnuclei + 1.0 * + ab[IDX_HOCSII] / 61.0 / Hnuclei + 1.0 * + ab[IDX_PC4HII] / 80.0 / Hnuclei + 9.0 * + ab[IDX_PH3II] / 34.0 / Hnuclei + 16.0 * + ab[IDX_SiCH4II] / 44.0 / Hnuclei + 4.0 * + ab[IDX_C10H2II] / 122.0 / Hnuclei + 9.0 * + ab[IDX_CH3CNII] / 41.0 / Hnuclei + 4.0 * + ab[IDX_GC2H2I] / 26.0 / Hnuclei + 1.0 * + ab[IDX_GC7HI] / 85.0 / Hnuclei + 9.0 * + ab[IDX_GCH3COI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_GHCOOCH3I] / 60.0 / Hnuclei + 1.0 * + ab[IDX_HC4SII] / 81.0 / Hnuclei + 4.0 * + ab[IDX_HC5NHII] / 76.0 / Hnuclei + 9.0 * + ab[IDX_SiC2H3II] / 55.0 / Hnuclei + 1.0 * + ab[IDX_SiC3HI] / 65.0 / Hnuclei + 9.0 * + ab[IDX_SiCH3II] / 43.0 / Hnuclei + 4.0 * + ab[IDX_SiNH2II] / 44.0 / Hnuclei + 16.0 * + ab[IDX_C4H4II] / 52.0 / Hnuclei + 4.0 * + ab[IDX_CH2CNII] / 40.0 / Hnuclei + 36.0 * + ab[IDX_CH3COCH3II] / 58.0 / Hnuclei + 9.0 * + ab[IDX_GCH2OHI] / 31.0 / Hnuclei + 16.0 * + ab[IDX_GCH3OHI] / 32.0 / Hnuclei + 4.0 * + ab[IDX_H2S2II] / 66.0 / Hnuclei + 1.0 * + ab[IDX_HC2PII] / 56.0 / Hnuclei + 1.0 * + ab[IDX_HC5NII] / 75.0 / Hnuclei + 1.0 * + ab[IDX_HFI] / 20.0 / Hnuclei + 1.0 * + ab[IDX_HONCI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_HSiSII] / 61.0 / Hnuclei + 4.0 * + ab[IDX_PCH2II] / 45.0 / Hnuclei + 9.0 * + ab[IDX_CH2OHCOI] / 59.0 / Hnuclei + 9.0 * + ab[IDX_CH3C5NI] / 89.0 / Hnuclei + 9.0 * + ab[IDX_CH3C7NI] / 113.0 / Hnuclei + 1.0 * + ab[IDX_GC3HI] / 37.0 / Hnuclei + 1.0 * + ab[IDX_GC4HI] / 49.0 / Hnuclei + 1.0 * + ab[IDX_GC5HI] / 61.0 / Hnuclei + 1.0 * + ab[IDX_GC6HI] / 73.0 / Hnuclei + 4.0 * + ab[IDX_H2NCII] / 28.0 / Hnuclei + 4.0 * + ab[IDX_H2SiOI] / 46.0 / Hnuclei + 9.0 * + ab[IDX_H3CSII] / 47.0 / Hnuclei + 1.0 * + ab[IDX_HC2OII] / 41.0 / Hnuclei + 1.0 * + ab[IDX_HCPII] / 44.0 / Hnuclei + 9.0 * + ab[IDX_GC2H3I] / 27.0 / Hnuclei + 9.0 * + ab[IDX_GCH3OI] / 31.0 / Hnuclei + 4.0 * + ab[IDX_GH2OI] / 18.0 / Hnuclei + 1.0 * + ab[IDX_HC3SII] / 69.0 / Hnuclei + 9.0 * + ab[IDX_HCOOH2II] / 47.0 / Hnuclei + 1.0 * + ab[IDX_HNSiI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_HPOII] / 48.0 / Hnuclei + 1.0 * + ab[IDX_HS2II] / 65.0 / Hnuclei + 4.0 * + ab[IDX_SiC2H2I] / 54.0 / Hnuclei + 1.0 * + ab[IDX_C2NHII] / 39.0 / Hnuclei + 36.0 * + ab[IDX_C3H6II] / 42.0 / Hnuclei + 49.0 * + ab[IDX_C6H7II] / 79.0 / Hnuclei + 16.0 * + ab[IDX_C8H4II] / 100.0 / Hnuclei + 16.0 * + ab[IDX_CH2OHCHOI] / 60.0 / Hnuclei + 1.0 * + ab[IDX_HC3OII] / 53.0 / Hnuclei + 1.0 * + ab[IDX_HCNOI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_SiC3HII] / 65.0 / Hnuclei + 9.0 * + ab[IDX_SiCH3I] / 43.0 / Hnuclei + 49.0 * + ab[IDX_C3H7II] / 43.0 / Hnuclei + 16.0 * + ab[IDX_C9H4II] / 112.0 / Hnuclei + 4.0 * + ab[IDX_CH2COII] / 42.0 / Hnuclei + 9.0 * + ab[IDX_CH2PHI] / 46.0 / Hnuclei + 9.0 * + ab[IDX_CH3C3NI] / 65.0 / Hnuclei + 16.0 * + ab[IDX_GCH3CHOI] / 44.0 / Hnuclei + 4.0 * + ab[IDX_GH2COI] / 30.0 / Hnuclei + 1.0 * + ab[IDX_HOCNI] / 43.0 / Hnuclei + 1.0 * + ab[IDX_HPOI] / 48.0 / Hnuclei + 1.0 * + ab[IDX_HS2I] / 65.0 / Hnuclei + 4.0 * + ab[IDX_SiC2H2II] / 54.0 / Hnuclei + 16.0 * + ab[IDX_C6H4II] / 76.0 / Hnuclei + 9.0 * + ab[IDX_CH3COI] / 43.0 / Hnuclei + 49.0 * + ab[IDX_CH3COCH4II] / 59.0 / Hnuclei + 16.0 * + ab[IDX_CH3OHII] / 32.0 / Hnuclei + 1.0 * + ab[IDX_COOHI] / 45.0 / Hnuclei + 16.0 * + ab[IDX_C7H4II] / 88.0 / Hnuclei + 25.0 * + ab[IDX_C7H5II] / 89.0 / Hnuclei + 16.0 * + ab[IDX_CH3C6HI] / 88.0 / Hnuclei + 4.0 * + ab[IDX_H2CSII] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HC9NI] / 123.0 / Hnuclei + 16.0 * + ab[IDX_HCOOCH3I] / 60.0 / Hnuclei + 1.0 * + ab[IDX_NCCNHII] / 53.0 / Hnuclei + 4.0 * + ab[IDX_PH2I] / 33.0 / Hnuclei + 1.0 * + ab[IDX_SiC2HI] / 53.0 / Hnuclei + 4.0 * + ab[IDX_CH2CNI] / 40.0 / Hnuclei + 16.0 * + ab[IDX_CH3C4HII] / 64.0 / Hnuclei + 16.0 * + ab[IDX_GCH4I] / 16.0 / Hnuclei + 1.0 * + ab[IDX_HCPI] / 44.0 / Hnuclei + 1.0 * + ab[IDX_HClI] / 36.0 / Hnuclei + 1.0 * + ab[IDX_HNCOI] / 43.0 / Hnuclei + 16.0 * + ab[IDX_CH3C4HI] / 64.0 / Hnuclei + 16.0 * + ab[IDX_CH3COOHI] / 60.0 / Hnuclei + 36.0 * + ab[IDX_CH3OCH3I] / 46.0 / Hnuclei + 1.0 * + ab[IDX_GC2HI] / 25.0 / Hnuclei + 4.0 * + ab[IDX_GNH2I] / 16.0 / Hnuclei + 4.0 * + ab[IDX_H2CSI] / 46.0 / Hnuclei + 4.0 * + ab[IDX_PH2II] / 33.0 / Hnuclei + 25.0 * + ab[IDX_C6H5II] / 77.0 / Hnuclei + 9.0 * + ab[IDX_CH2NHI] / 29.0 / Hnuclei + 9.0 * + ab[IDX_CH3OI] / 31.0 / Hnuclei + 1.0 * + ab[IDX_GHCOI] / 29.0 / Hnuclei + 1.0 * + ab[IDX_HC2PI] / 56.0 / Hnuclei + 1.0 * + ab[IDX_HCSiI] / 41.0 / Hnuclei + 4.0 * + ab[IDX_SiCH2I] / 42.0 / Hnuclei + 1.0 * + ab[IDX_C10HII] / 121.0 / Hnuclei + 1.0 * + ab[IDX_HCSiII] / 41.0 / Hnuclei + 36.0 * + ab[IDX_C2H6II] / 30.0 / Hnuclei + 1.0 * + ab[IDX_C8HII] / 97.0 / Hnuclei + 9.0 * + ab[IDX_CH2OHI] / 31.0 / Hnuclei + 25.0 * + ab[IDX_C5H5II] / 65.0 / Hnuclei + 1.0 * + ab[IDX_GNHI] / 15.0 / Hnuclei + 1.0 * + ab[IDX_HCSI] / 45.0 / Hnuclei + 1.0 * + ab[IDX_SiC2HII] / 53.0 / Hnuclei + 4.0 * + ab[IDX_SiH2I] / 30.0 / Hnuclei + 1.0 * + ab[IDX_C6HII] / 73.0 / Hnuclei + 4.0 * + ab[IDX_C9H2I] / 110.0 / Hnuclei + 9.0 * + ab[IDX_CH2CHCNI] / 53.0 / Hnuclei + 25.0 * + ab[IDX_CH3CHOHII] / 45.0 / Hnuclei + 16.0 * + ab[IDX_CH3CNHII] / 42.0 / Hnuclei + 9.0 * + ab[IDX_CH3COII] / 43.0 / Hnuclei + 1.0 * + ab[IDX_HC7NI] / 99.0 / Hnuclei + 36.0 * + ab[IDX_C6H6I] / 78.0 / Hnuclei + 4.0 * + ab[IDX_HCOOHI] / 46.0 / Hnuclei + 4.0 * + ab[IDX_SiH2II] / 30.0 / Hnuclei + 9.0 * + ab[IDX_SiH3II] / 31.0 / Hnuclei + 4.0 * + ab[IDX_C10H2I] / 122.0 / Hnuclei + 1.0 * + ab[IDX_O2HI] / 33.0 / Hnuclei + 36.0 * + ab[IDX_C2H5OHI] / 46.0 / Hnuclei + 1.0 * + ab[IDX_HNOI] / 31.0 / Hnuclei + 9.0 * + ab[IDX_SiH3I] / 31.0 / Hnuclei + 25.0 * + ab[IDX_CH3OH2II] / 33.0 / Hnuclei + 9.0 * + ab[IDX_C6H3II] / 75.0 / Hnuclei + 9.0 * + ab[IDX_C8H3II] / 99.0 / Hnuclei + 1.0 * + ab[IDX_C9HII] / 109.0 / Hnuclei + 9.0 * + ab[IDX_C9H3II] / 111.0 / Hnuclei + 4.0 * + ab[IDX_CH2COI] / 42.0 / Hnuclei + 1.0 * + ab[IDX_HNC3I] / 51.0 / Hnuclei + 4.0 * + ab[IDX_SiCH2II] / 42.0 / Hnuclei + 1.0 * + ab[IDX_SiHII] / 29.0 / Hnuclei + 36.0 * + ab[IDX_CH3COCH3I] / 58.0 / Hnuclei + 1.0 * + ab[IDX_HC3NII] / 51.0 / Hnuclei + 4.0 * + ab[IDX_C8H2I] / 98.0 / Hnuclei + 1.0 * + ab[IDX_GOHI] / 17.0 / Hnuclei + 1.0 * + ab[IDX_HC5NI] / 75.0 / Hnuclei + 1.0 * + ab[IDX_SiHI] / 29.0 / Hnuclei + 16.0 * + ab[IDX_SiH4I] / 32.0 / Hnuclei + 1.0 * + ab[IDX_C7HII] / 85.0 / Hnuclei + 4.0 * + ab[IDX_C9H2II] / 110.0 / Hnuclei + 1.0 * + ab[IDX_PHI] / 32.0 / Hnuclei + 4.0 * + ab[IDX_C7H2I] / 86.0 / Hnuclei + 1.0 * + ab[IDX_HCSII] / 45.0 / Hnuclei + 1.0 * + ab[IDX_PHII] / 32.0 / Hnuclei + 16.0 * + ab[IDX_C3H4II] / 40.0 / Hnuclei + 4.0 * + ab[IDX_C8H2II] / 98.0 / Hnuclei + 4.0 * + ab[IDX_GCH2I] / 14.0 / Hnuclei + 1.0 * + ab[IDX_HCO2II] / 45.0 / Hnuclei + 9.0 * + ab[IDX_C5H3II] / 63.0 / Hnuclei + 4.0 * + ab[IDX_HC3NHII] / 52.0 / Hnuclei + 1.0 * + ab[IDX_C5HII] / 61.0 / Hnuclei + 16.0 * + ab[IDX_CH3CHOI] / 44.0 / Hnuclei + 25.0 * + ab[IDX_C3H5II] / 41.0 / Hnuclei + 9.0 * + ab[IDX_C7H3II] / 87.0 / Hnuclei + 9.0 * + ab[IDX_CH3CNI] / 41.0 / Hnuclei + 4.0 * + ab[IDX_C7H2II] / 86.0 / Hnuclei + 9.0 * + ab[IDX_H3SII] / 35.0 / Hnuclei + 1.0 * + ab[IDX_O2HII] / 33.0 / Hnuclei + 4.0 * + ab[IDX_C6H2II] / 74.0 / Hnuclei + 16.0 * + ab[IDX_CH4II] / 16.0 / Hnuclei + 1.0 * + ab[IDX_HNOII] / 31.0 / Hnuclei + 4.0 * + ab[IDX_H2CCCI] / 38.0 / Hnuclei + 4.0 * + ab[IDX_C6H2I] / 74.0 / Hnuclei + 25.0 * + ab[IDX_C2H5II] / 29.0 / Hnuclei + 4.0 * + ab[IDX_C5H2I] / 62.0 / Hnuclei + 4.0 * + ab[IDX_C5H2II] / 62.0 / Hnuclei + 16.0 * + ab[IDX_CH2CCH2I] / 40.0 / Hnuclei + 36.0 * + ab[IDX_C2H6I] / 30.0 / Hnuclei + 4.0 * + ab[IDX_C3H2I] / 38.0 / Hnuclei + 25.0 * + ab[IDX_C2H5I] / 29.0 / Hnuclei + 1.0 * + ab[IDX_HCNII] / 27.0 / Hnuclei + 36.0 * + ab[IDX_CH3CHCH2I] / 42.0 / Hnuclei + 1.0 * + ab[IDX_C4HII] / 49.0 / Hnuclei + 1.0 * + ab[IDX_HSII] / 33.0 / Hnuclei + 1.0 * + ab[IDX_NHII] / 15.0 / Hnuclei + 1.0 * + ab[IDX_CHM] / 13.0 / Hnuclei + 4.0 * + ab[IDX_H2II] / 2.0 / Hnuclei + 9.0 * + ab[IDX_GCH3I] / 15.0 / Hnuclei + 4.0 * + ab[IDX_NH2II] / 16.0 / Hnuclei + 1.0 * + ab[IDX_C2HM] / 25.0 / Hnuclei + 1.0 * + ab[IDX_C4HM] / 49.0 / Hnuclei + 16.0 * + ab[IDX_CH3CCHI] / 40.0 / Hnuclei + 25.0 * + ab[IDX_CH5II] / 17.0 / Hnuclei + 1.0 * + ab[IDX_HC2SII] / 57.0 / Hnuclei + 1.0 * + ab[IDX_OHM] / 17.0 / Hnuclei + 1.0 * + ab[IDX_C10HM] / 121.0 / Hnuclei + 1.0 * + ab[IDX_C3HM] / 37.0 / Hnuclei + 1.0 * + ab[IDX_C6HM] / 73.0 / Hnuclei + 1.0 * + ab[IDX_C8HM] / 97.0 / Hnuclei + 1.0 * + ab[IDX_C7HM] / 85.0 / Hnuclei + 1.0 * + ab[IDX_C9HM] / 109.0 / Hnuclei + 1.0 * + ab[IDX_C5HM] / 61.0 / Hnuclei + 1.0 * + ab[IDX_HSI] / 33.0 / Hnuclei + 16.0 * + ab[IDX_CH3OHI] / 32.0 / Hnuclei + 1.0 * + ab[IDX_HM] / 1.0 / Hnuclei + 1.0 * + ab[IDX_HC3NI] / 51.0 / Hnuclei + 1.0 * + ab[IDX_C3HII] / 37.0 / Hnuclei + 9.0 * + ab[IDX_C3H3II] / 39.0 / Hnuclei + 9.0 * + ab[IDX_H3COII] / 31.0 / Hnuclei + 1.0 * + ab[IDX_GCHI] / 13.0 / Hnuclei + 1.0 * + ab[IDX_SiOHII] / 45.0 / Hnuclei + 4.0 * + ab[IDX_NH2I] / 16.0 / Hnuclei + 9.0 * + ab[IDX_C4H3I] / 51.0 / Hnuclei + 1.0 * + ab[IDX_C2HII] / 25.0 / Hnuclei + 4.0 * + ab[IDX_C3H2II] / 38.0 / Hnuclei + 4.0 * + ab[IDX_CH2II] / 14.0 / Hnuclei + 1.0 * + ab[IDX_OHII] / 17.0 / Hnuclei + 4.0 * + ab[IDX_H2OII] / 18.0 / Hnuclei + 4.0 * + ab[IDX_GH2I] / 2.0 / Hnuclei + 1.0 * + ab[IDX_CHII] / 13.0 / Hnuclei + 1.0 * + ab[IDX_C10HI] / 121.0 / Hnuclei + 1.0 * + ab[IDX_C9HI] / 109.0 / Hnuclei + 1.0 * + ab[IDX_C8HI] / 97.0 / Hnuclei + 1.0 * + ab[IDX_NHI] / 15.0 / Hnuclei + 1.0 * + ab[IDX_C7HI] / 85.0 / Hnuclei + 16.0 * + ab[IDX_C2H4II] / 28.0 / Hnuclei + 9.0 * + ab[IDX_C4H3II] / 51.0 / Hnuclei + 1.0 * + ab[IDX_N2HII] / 29.0 / Hnuclei + 9.0 * + ab[IDX_CH2CCHI] / 39.0 / Hnuclei + 9.0 * + ab[IDX_CH2CCHII] / 39.0 / Hnuclei + 1.0 * + ab[IDX_C6HI] / 73.0 / Hnuclei + 1.0 * + ab[IDX_C5HI] / 61.0 / Hnuclei + 4.0 * + ab[IDX_H2SII] / 34.0 / Hnuclei + 1.0 * + ab[IDX_C3HI] / 37.0 / Hnuclei + 4.0 * + ab[IDX_H2COII] / 30.0 / Hnuclei + 1.0 * + ab[IDX_C4HI] / 49.0 / Hnuclei + 4.0 * + ab[IDX_C4H2I] / 50.0 / Hnuclei + 4.0 * + ab[IDX_C4H2II] / 50.0 / Hnuclei + 4.0 * + ab[IDX_HCNHII] / 28.0 / Hnuclei + 4.0 * + ab[IDX_CH2I] / 14.0 / Hnuclei + 1.0 * + ab[IDX_HNCI] / 27.0 / Hnuclei + 9.0 * + ab[IDX_NH3II] / 17.0 / Hnuclei + 16.0 * + ab[IDX_C2H4I] / 28.0 / Hnuclei + 9.0 * + ab[IDX_C2H3I] / 27.0 / Hnuclei + 16.0 * + ab[IDX_NH4II] / 18.0 / Hnuclei + 4.0 * + ab[IDX_H2SI] / 34.0 / Hnuclei + 9.0 * + ab[IDX_C2H3II] / 27.0 / Hnuclei + 1.0 * + ab[IDX_HCOI] / 29.0 / Hnuclei + 16.0 * + ab[IDX_CH4I] / 16.0 / Hnuclei + 1.0 * + ab[IDX_C2HI] / 25.0 / Hnuclei + 4.0 * + ab[IDX_H2COI] / 30.0 / Hnuclei + 1.0 * + ab[IDX_HCNI] / 27.0 / Hnuclei + 1.0 * + ab[IDX_CHI] / 13.0 / Hnuclei + 1.0 * + ab[IDX_OHI] / 17.0 / Hnuclei + 9.0 * + ab[IDX_NH3I] / 17.0 / Hnuclei + 4.0 * + ab[IDX_C2H2II] / 26.0 / Hnuclei + 9.0 * + ab[IDX_CH3II] / 15.0 / Hnuclei + 4.0 * + ab[IDX_C2H2I] / 26.0 / Hnuclei + 1.0 * + ab[IDX_GHI] / 1.0 / Hnuclei + 9.0 * + ab[IDX_CH3I] / 15.0 / Hnuclei + 9.0 * + ab[IDX_H3OII] / 19.0 / Hnuclei + 4.0 * + ab[IDX_H2OI] / 18.0 / Hnuclei + 1.0 * + ab[IDX_HII] / 1.0 / Hnuclei + 1.0 * + ab[IDX_HCOII] / 29.0 / Hnuclei + 9.0 * + ab[IDX_H3II] / 3.0 / Hnuclei + 4.0 * + ab[IDX_H2I] / 2.0 / Hnuclei + 1.0 * + ab[IDX_HI] / 1.0 / Hnuclei; + // clang-format on + + return NAUNET_SUCCESS; +} + +// clang-format off +__host__ int RenormAbundance(realtype *rptr, realtype *ab) { + + ab[IDX_GFeI] = ab[IDX_GFeI] * (56.0 * rptr[IDX_ELEM_Fe] / 56.0); + ab[IDX_GHeI] = ab[IDX_GHeI] * (4.0 * rptr[IDX_ELEM_He] / 4.0); + ab[IDX_GMgI] = ab[IDX_GMgI] * (24.0 * rptr[IDX_ELEM_Mg] / 24.0); + ab[IDX_GNaI] = ab[IDX_GNaI] * (23.0 * rptr[IDX_ELEM_Na] / 23.0); + ab[IDX_GH2S2I] = ab[IDX_GH2S2I] * (64.0 * rptr[IDX_ELEM_S] / 66.0 + 2.0 * rptr[IDX_ELEM_H] / 66.0); + ab[IDX_GC4H6I] = ab[IDX_GC4H6I] * (48.0 * rptr[IDX_ELEM_C] / 54.0 + 6.0 * rptr[IDX_ELEM_H] / 54.0); + ab[IDX_GC4SI] = ab[IDX_GC4SI] * (32.0 * rptr[IDX_ELEM_S] / 80.0 + 48.0 * rptr[IDX_ELEM_C] / 80.0); + ab[IDX_GCClI] = ab[IDX_GCClI] * (35.0 * rptr[IDX_ELEM_Cl] / 47.0 + 12.0 * rptr[IDX_ELEM_C] / 47.0); + ab[IDX_GCH3C3NI] = ab[IDX_GCH3C3NI] * (14.0 * rptr[IDX_ELEM_N] / 65.0 + 48.0 * rptr[IDX_ELEM_C] / 65.0 + 3.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_GCH3C4HI] = ab[IDX_GCH3C4HI] * (60.0 * rptr[IDX_ELEM_C] / 64.0 + 4.0 * rptr[IDX_ELEM_H] / 64.0); + ab[IDX_GCH3C5NI] = ab[IDX_GCH3C5NI] * (14.0 * rptr[IDX_ELEM_N] / 89.0 + 72.0 * rptr[IDX_ELEM_C] / 89.0 + 3.0 * rptr[IDX_ELEM_H] / 89.0); + ab[IDX_GCH3C6HI] = ab[IDX_GCH3C6HI] * (84.0 * rptr[IDX_ELEM_C] / 88.0 + 4.0 * rptr[IDX_ELEM_H] / 88.0); + ab[IDX_GCH3C7NI] = ab[IDX_GCH3C7NI] * (14.0 * rptr[IDX_ELEM_N] / 113.0 + 96.0 * rptr[IDX_ELEM_C] / 113.0 + 3.0 * rptr[IDX_ELEM_H] / 113.0); + ab[IDX_GClOI] = ab[IDX_GClOI] * (35.0 * rptr[IDX_ELEM_Cl] / 51.0 + 16.0 * rptr[IDX_ELEM_O] / 51.0); + ab[IDX_GHC2PI] = ab[IDX_GHC2PI] * (31.0 * rptr[IDX_ELEM_P] / 56.0 + 24.0 * rptr[IDX_ELEM_C] / 56.0 + 1.0 * rptr[IDX_ELEM_H] / 56.0); + ab[IDX_GHClI] = ab[IDX_GHClI] * (35.0 * rptr[IDX_ELEM_Cl] / 36.0 + 1.0 * rptr[IDX_ELEM_H] / 36.0); + ab[IDX_GHFI] = ab[IDX_GHFI] * (19.0 * rptr[IDX_ELEM_F] / 20.0 + 1.0 * rptr[IDX_ELEM_H] / 20.0); + ab[IDX_GHNSiI] = ab[IDX_GHNSiI] * (28.0 * rptr[IDX_ELEM_Si] / 43.0 + 14.0 * rptr[IDX_ELEM_N] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_GHPOI] = ab[IDX_GHPOI] * (31.0 * rptr[IDX_ELEM_P] / 48.0 + 16.0 * rptr[IDX_ELEM_O] / 48.0 + 1.0 * rptr[IDX_ELEM_H] / 48.0); + ab[IDX_GNH2CNI] = ab[IDX_GNH2CNI] * (28.0 * rptr[IDX_ELEM_N] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0 + 2.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_GNO2I] = ab[IDX_GNO2I] * (14.0 * rptr[IDX_ELEM_N] / 46.0 + 32.0 * rptr[IDX_ELEM_O] / 46.0); + ab[IDX_GPNI] = ab[IDX_GPNI] * (31.0 * rptr[IDX_ELEM_P] / 45.0 + 14.0 * rptr[IDX_ELEM_N] / 45.0); + ab[IDX_GSiC3HI] = ab[IDX_GSiC3HI] * (28.0 * rptr[IDX_ELEM_Si] / 65.0 + 36.0 * rptr[IDX_ELEM_C] / 65.0 + 1.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_GSiCH3I] = ab[IDX_GSiCH3I] * (28.0 * rptr[IDX_ELEM_Si] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 3.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_GSiO2I] = ab[IDX_GSiO2I] * (28.0 * rptr[IDX_ELEM_Si] / 60.0 + 32.0 * rptr[IDX_ELEM_O] / 60.0); + ab[IDX_GSiSI] = ab[IDX_GSiSI] * (28.0 * rptr[IDX_ELEM_Si] / 60.0 + 32.0 * rptr[IDX_ELEM_S] / 60.0); + ab[IDX_GFI] = ab[IDX_GFI] * (19.0 * rptr[IDX_ELEM_F] / 19.0); + ab[IDX_GH2SiOI] = ab[IDX_GH2SiOI] * (28.0 * rptr[IDX_ELEM_Si] / 46.0 + 16.0 * rptr[IDX_ELEM_O] / 46.0 + 2.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_GNCCNI] = ab[IDX_GNCCNI] * (28.0 * rptr[IDX_ELEM_N] / 52.0 + 24.0 * rptr[IDX_ELEM_C] / 52.0); + ab[IDX_GS2I] = ab[IDX_GS2I] * (64.0 * rptr[IDX_ELEM_S] / 64.0); + ab[IDX_GSiC2HI] = ab[IDX_GSiC2HI] * (28.0 * rptr[IDX_ELEM_Si] / 53.0 + 24.0 * rptr[IDX_ELEM_C] / 53.0 + 1.0 * rptr[IDX_ELEM_H] / 53.0); + ab[IDX_C2H4CNI] = ab[IDX_C2H4CNI] * (14.0 * rptr[IDX_ELEM_N] / 54.0 + 36.0 * rptr[IDX_ELEM_C] / 54.0 + 4.0 * rptr[IDX_ELEM_H] / 54.0); + ab[IDX_GC3SI] = ab[IDX_GC3SI] * (32.0 * rptr[IDX_ELEM_S] / 68.0 + 36.0 * rptr[IDX_ELEM_C] / 68.0); + ab[IDX_GC4NI] = ab[IDX_GC4NI] * (14.0 * rptr[IDX_ELEM_N] / 62.0 + 48.0 * rptr[IDX_ELEM_C] / 62.0); + ab[IDX_GC4PI] = ab[IDX_GC4PI] * (31.0 * rptr[IDX_ELEM_P] / 79.0 + 48.0 * rptr[IDX_ELEM_C] / 79.0); + ab[IDX_GCH2PHI] = ab[IDX_GCH2PHI] * (31.0 * rptr[IDX_ELEM_P] / 46.0 + 12.0 * rptr[IDX_ELEM_C] / 46.0 + 3.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_GCH3CHCH2I] = ab[IDX_GCH3CHCH2I] * (36.0 * rptr[IDX_ELEM_C] / 42.0 + 6.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_GCH3COOHI] = ab[IDX_GCH3COOHI] * (32.0 * rptr[IDX_ELEM_O] / 60.0 + 24.0 * rptr[IDX_ELEM_C] / 60.0 + 4.0 * rptr[IDX_ELEM_H] / 60.0); + ab[IDX_GH2SI] = ab[IDX_GH2SI] * (32.0 * rptr[IDX_ELEM_S] / 34.0 + 2.0 * rptr[IDX_ELEM_H] / 34.0); + ab[IDX_GHCNOI] = ab[IDX_GHCNOI] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_GHCPI] = ab[IDX_GHCPI] * (31.0 * rptr[IDX_ELEM_P] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0 + 1.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_GHNC3I] = ab[IDX_GHNC3I] * (14.0 * rptr[IDX_ELEM_N] / 51.0 + 36.0 * rptr[IDX_ELEM_C] / 51.0 + 1.0 * rptr[IDX_ELEM_H] / 51.0); + ab[IDX_GHNCOI] = ab[IDX_GHNCOI] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_GHOCNI] = ab[IDX_GHOCNI] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_GHONCI] = ab[IDX_GHONCI] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_GHS2I] = ab[IDX_GHS2I] * (64.0 * rptr[IDX_ELEM_S] / 65.0 + 1.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_GN2OI] = ab[IDX_GN2OI] * (28.0 * rptr[IDX_ELEM_N] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0); + ab[IDX_GPH2I] = ab[IDX_GPH2I] * (31.0 * rptr[IDX_ELEM_P] / 33.0 + 2.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_GPOI] = ab[IDX_GPOI] * (31.0 * rptr[IDX_ELEM_P] / 47.0 + 16.0 * rptr[IDX_ELEM_O] / 47.0); + ab[IDX_GSiC2H2I] = ab[IDX_GSiC2H2I] * (28.0 * rptr[IDX_ELEM_Si] / 54.0 + 24.0 * rptr[IDX_ELEM_C] / 54.0 + 2.0 * rptr[IDX_ELEM_H] / 54.0); + ab[IDX_GSiC4I] = ab[IDX_GSiC4I] * (28.0 * rptr[IDX_ELEM_Si] / 76.0 + 48.0 * rptr[IDX_ELEM_C] / 76.0); + ab[IDX_GSiNCI] = ab[IDX_GSiNCI] * (28.0 * rptr[IDX_ELEM_Si] / 54.0 + 14.0 * rptr[IDX_ELEM_N] / 54.0 + 12.0 * rptr[IDX_ELEM_C] / 54.0); + ab[IDX_HC2OI] = ab[IDX_HC2OI] * (16.0 * rptr[IDX_ELEM_O] / 41.0 + 24.0 * rptr[IDX_ELEM_C] / 41.0 + 1.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_GC3PI] = ab[IDX_GC3PI] * (31.0 * rptr[IDX_ELEM_P] / 67.0 + 36.0 * rptr[IDX_ELEM_C] / 67.0); + ab[IDX_GC6H6I] = ab[IDX_GC6H6I] * (72.0 * rptr[IDX_ELEM_C] / 78.0 + 6.0 * rptr[IDX_ELEM_H] / 78.0); + ab[IDX_GH2O2I] = ab[IDX_GH2O2I] * (32.0 * rptr[IDX_ELEM_O] / 34.0 + 2.0 * rptr[IDX_ELEM_H] / 34.0); + ab[IDX_GHCSiI] = ab[IDX_GHCSiI] * (28.0 * rptr[IDX_ELEM_Si] / 41.0 + 12.0 * rptr[IDX_ELEM_C] / 41.0 + 1.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_GPHI] = ab[IDX_GPHI] * (31.0 * rptr[IDX_ELEM_P] / 32.0 + 1.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_GSO2I] = ab[IDX_GSO2I] * (32.0 * rptr[IDX_ELEM_S] / 64.0 + 32.0 * rptr[IDX_ELEM_O] / 64.0); + ab[IDX_GSiH4I] = ab[IDX_GSiH4I] * (28.0 * rptr[IDX_ELEM_Si] / 32.0 + 4.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_NCCNCH3II] = ab[IDX_NCCNCH3II] * (28.0 * rptr[IDX_ELEM_N] / 67.0 + 36.0 * rptr[IDX_ELEM_C] / 67.0 + 3.0 * rptr[IDX_ELEM_H] / 67.0); + ab[IDX_GC2H4CNI] = ab[IDX_GC2H4CNI] * (14.0 * rptr[IDX_ELEM_N] / 54.0 + 36.0 * rptr[IDX_ELEM_C] / 54.0 + 4.0 * rptr[IDX_ELEM_H] / 54.0); + ab[IDX_GC2SI] = ab[IDX_GC2SI] * (32.0 * rptr[IDX_ELEM_S] / 56.0 + 24.0 * rptr[IDX_ELEM_C] / 56.0); + ab[IDX_GC3OI] = ab[IDX_GC3OI] * (16.0 * rptr[IDX_ELEM_O] / 52.0 + 36.0 * rptr[IDX_ELEM_C] / 52.0); + ab[IDX_GC4H3I] = ab[IDX_GC4H3I] * (48.0 * rptr[IDX_ELEM_C] / 51.0 + 3.0 * rptr[IDX_ELEM_H] / 51.0); + ab[IDX_GC7H2I] = ab[IDX_GC7H2I] * (84.0 * rptr[IDX_ELEM_C] / 86.0 + 2.0 * rptr[IDX_ELEM_H] / 86.0); + ab[IDX_GC8H2I] = ab[IDX_GC8H2I] * (96.0 * rptr[IDX_ELEM_C] / 98.0 + 2.0 * rptr[IDX_ELEM_H] / 98.0); + ab[IDX_GC9H2I] = ab[IDX_GC9H2I] * (108.0 * rptr[IDX_ELEM_C] / 110.0 + 2.0 * rptr[IDX_ELEM_H] / 110.0); + ab[IDX_GCH2CNI] = ab[IDX_GCH2CNI] * (14.0 * rptr[IDX_ELEM_N] / 40.0 + 24.0 * rptr[IDX_ELEM_C] / 40.0 + 2.0 * rptr[IDX_ELEM_H] / 40.0); + ab[IDX_GCH3CNI] = ab[IDX_GCH3CNI] * (14.0 * rptr[IDX_ELEM_N] / 41.0 + 24.0 * rptr[IDX_ELEM_C] / 41.0 + 3.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_GH2CNI] = ab[IDX_GH2CNI] * (14.0 * rptr[IDX_ELEM_N] / 28.0 + 12.0 * rptr[IDX_ELEM_C] / 28.0 + 2.0 * rptr[IDX_ELEM_H] / 28.0); + ab[IDX_GH2CSI] = ab[IDX_GH2CSI] * (32.0 * rptr[IDX_ELEM_S] / 46.0 + 12.0 * rptr[IDX_ELEM_C] / 46.0 + 2.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_GHC2OI] = ab[IDX_GHC2OI] * (16.0 * rptr[IDX_ELEM_O] / 41.0 + 24.0 * rptr[IDX_ELEM_C] / 41.0 + 1.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_GHC5NI] = ab[IDX_GHC5NI] * (14.0 * rptr[IDX_ELEM_N] / 75.0 + 60.0 * rptr[IDX_ELEM_C] / 75.0 + 1.0 * rptr[IDX_ELEM_H] / 75.0); + ab[IDX_GHC7NI] = ab[IDX_GHC7NI] * (14.0 * rptr[IDX_ELEM_N] / 99.0 + 84.0 * rptr[IDX_ELEM_C] / 99.0 + 1.0 * rptr[IDX_ELEM_H] / 99.0); + ab[IDX_GHC9NI] = ab[IDX_GHC9NI] * (14.0 * rptr[IDX_ELEM_N] / 123.0 + 108.0 * rptr[IDX_ELEM_C] / 123.0 + 1.0 * rptr[IDX_ELEM_H] / 123.0); + ab[IDX_GHCCNI] = ab[IDX_GHCCNI] * (14.0 * rptr[IDX_ELEM_N] / 39.0 + 24.0 * rptr[IDX_ELEM_C] / 39.0 + 1.0 * rptr[IDX_ELEM_H] / 39.0); + ab[IDX_GHCSI] = ab[IDX_GHCSI] * (32.0 * rptr[IDX_ELEM_S] / 45.0 + 12.0 * rptr[IDX_ELEM_C] / 45.0 + 1.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_GSiC3I] = ab[IDX_GSiC3I] * (28.0 * rptr[IDX_ELEM_Si] / 64.0 + 36.0 * rptr[IDX_ELEM_C] / 64.0); + ab[IDX_GSiH3I] = ab[IDX_GSiH3I] * (28.0 * rptr[IDX_ELEM_Si] / 31.0 + 3.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_GSiNI] = ab[IDX_GSiNI] * (28.0 * rptr[IDX_ELEM_Si] / 42.0 + 14.0 * rptr[IDX_ELEM_N] / 42.0); + ab[IDX_GSiOI] = ab[IDX_GSiOI] * (28.0 * rptr[IDX_ELEM_Si] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0); + ab[IDX_HCCNI] = ab[IDX_HCCNI] * (14.0 * rptr[IDX_ELEM_N] / 39.0 + 24.0 * rptr[IDX_ELEM_C] / 39.0 + 1.0 * rptr[IDX_ELEM_H] / 39.0); + ab[IDX_C3H2OII] = ab[IDX_C3H2OII] * (16.0 * rptr[IDX_ELEM_O] / 54.0 + 36.0 * rptr[IDX_ELEM_C] / 54.0 + 2.0 * rptr[IDX_ELEM_H] / 54.0); + ab[IDX_CFII] = ab[IDX_CFII] * (19.0 * rptr[IDX_ELEM_F] / 31.0 + 12.0 * rptr[IDX_ELEM_C] / 31.0); + ab[IDX_ClOII] = ab[IDX_ClOII] * (35.0 * rptr[IDX_ELEM_Cl] / 51.0 + 16.0 * rptr[IDX_ELEM_O] / 51.0); + ab[IDX_GC2H6I] = ab[IDX_GC2H6I] * (24.0 * rptr[IDX_ELEM_C] / 30.0 + 6.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_GC3H2I] = ab[IDX_GC3H2I] * (36.0 * rptr[IDX_ELEM_C] / 38.0 + 2.0 * rptr[IDX_ELEM_H] / 38.0); + ab[IDX_GC5H2I] = ab[IDX_GC5H2I] * (60.0 * rptr[IDX_ELEM_C] / 62.0 + 2.0 * rptr[IDX_ELEM_H] / 62.0); + ab[IDX_GCCPI] = ab[IDX_GCCPI] * (31.0 * rptr[IDX_ELEM_P] / 55.0 + 24.0 * rptr[IDX_ELEM_C] / 55.0); + ab[IDX_GCH2CHCCHI] = ab[IDX_GCH2CHCCHI] * (48.0 * rptr[IDX_ELEM_C] / 52.0 + 4.0 * rptr[IDX_ELEM_H] / 52.0); + ab[IDX_GCH3COCH3I] = ab[IDX_GCH3COCH3I] * (16.0 * rptr[IDX_ELEM_O] / 58.0 + 36.0 * rptr[IDX_ELEM_C] / 58.0 + 6.0 * rptr[IDX_ELEM_H] / 58.0); + ab[IDX_GCH3OCH3I] = ab[IDX_GCH3OCH3I] * (16.0 * rptr[IDX_ELEM_O] / 46.0 + 24.0 * rptr[IDX_ELEM_C] / 46.0 + 6.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_GClI] = ab[IDX_GClI] * (35.0 * rptr[IDX_ELEM_Cl] / 35.0); + ab[IDX_GSiCH2I] = ab[IDX_GSiCH2I] * (28.0 * rptr[IDX_ELEM_Si] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0 + 2.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_GSiHI] = ab[IDX_GSiHI] * (28.0 * rptr[IDX_ELEM_Si] / 29.0 + 1.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_GSiH2I] = ab[IDX_GSiH2I] * (28.0 * rptr[IDX_ELEM_Si] / 30.0 + 2.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_H3C3OII] = ab[IDX_H3C3OII] * (16.0 * rptr[IDX_ELEM_O] / 55.0 + 36.0 * rptr[IDX_ELEM_C] / 55.0 + 3.0 * rptr[IDX_ELEM_H] / 55.0); + ab[IDX_HFII] = ab[IDX_HFII] * (19.0 * rptr[IDX_ELEM_F] / 20.0 + 1.0 * rptr[IDX_ELEM_H] / 20.0); + ab[IDX_SiFII] = ab[IDX_SiFII] * (19.0 * rptr[IDX_ELEM_F] / 47.0 + 28.0 * rptr[IDX_ELEM_Si] / 47.0); + ab[IDX_C8H5II] = ab[IDX_C8H5II] * (96.0 * rptr[IDX_ELEM_C] / 101.0 + 5.0 * rptr[IDX_ELEM_H] / 101.0); + ab[IDX_C9H5II] = ab[IDX_C9H5II] * (108.0 * rptr[IDX_ELEM_C] / 113.0 + 5.0 * rptr[IDX_ELEM_H] / 113.0); + ab[IDX_CH3C3NII] = ab[IDX_CH3C3NII] * (14.0 * rptr[IDX_ELEM_N] / 65.0 + 48.0 * rptr[IDX_ELEM_C] / 65.0 + 3.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_GC10H2I] = ab[IDX_GC10H2I] * (120.0 * rptr[IDX_ELEM_C] / 122.0 + 2.0 * rptr[IDX_ELEM_H] / 122.0); + ab[IDX_GC4H2I] = ab[IDX_GC4H2I] * (48.0 * rptr[IDX_ELEM_C] / 50.0 + 2.0 * rptr[IDX_ELEM_H] / 50.0); + ab[IDX_GCH2CHCNI] = ab[IDX_GCH2CHCNI] * (14.0 * rptr[IDX_ELEM_N] / 53.0 + 36.0 * rptr[IDX_ELEM_C] / 53.0 + 3.0 * rptr[IDX_ELEM_H] / 53.0); + ab[IDX_GH2CCCI] = ab[IDX_GH2CCCI] * (36.0 * rptr[IDX_ELEM_C] / 38.0 + 2.0 * rptr[IDX_ELEM_H] / 38.0); + ab[IDX_GHC3NI] = ab[IDX_GHC3NI] * (14.0 * rptr[IDX_ELEM_N] / 51.0 + 36.0 * rptr[IDX_ELEM_C] / 51.0 + 1.0 * rptr[IDX_ELEM_H] / 51.0); + ab[IDX_GOCSI] = ab[IDX_GOCSI] * (32.0 * rptr[IDX_ELEM_S] / 60.0 + 16.0 * rptr[IDX_ELEM_O] / 60.0 + 12.0 * rptr[IDX_ELEM_C] / 60.0); + ab[IDX_H2FII] = ab[IDX_H2FII] * (19.0 * rptr[IDX_ELEM_F] / 21.0 + 2.0 * rptr[IDX_ELEM_H] / 21.0); + ab[IDX_C4H6I] = ab[IDX_C4H6I] * (48.0 * rptr[IDX_ELEM_C] / 54.0 + 6.0 * rptr[IDX_ELEM_H] / 54.0); + ab[IDX_C4PII] = ab[IDX_C4PII] * (31.0 * rptr[IDX_ELEM_P] / 79.0 + 48.0 * rptr[IDX_ELEM_C] / 79.0); + ab[IDX_C5NII] = ab[IDX_C5NII] * (14.0 * rptr[IDX_ELEM_N] / 74.0 + 60.0 * rptr[IDX_ELEM_C] / 74.0); + ab[IDX_C6H6II] = ab[IDX_C6H6II] * (72.0 * rptr[IDX_ELEM_C] / 78.0 + 6.0 * rptr[IDX_ELEM_H] / 78.0); + ab[IDX_CH2CHCNII] = ab[IDX_CH2CHCNII] * (14.0 * rptr[IDX_ELEM_N] / 53.0 + 36.0 * rptr[IDX_ELEM_C] / 53.0 + 3.0 * rptr[IDX_ELEM_H] / 53.0); + ab[IDX_COOCH3II] = ab[IDX_COOCH3II] * (32.0 * rptr[IDX_ELEM_O] / 59.0 + 24.0 * rptr[IDX_ELEM_C] / 59.0 + 3.0 * rptr[IDX_ELEM_H] / 59.0); + ab[IDX_FII] = ab[IDX_FII] * (19.0 * rptr[IDX_ELEM_F] / 19.0); + ab[IDX_GC2H5CNI] = ab[IDX_GC2H5CNI] * (14.0 * rptr[IDX_ELEM_N] / 55.0 + 36.0 * rptr[IDX_ELEM_C] / 55.0 + 5.0 * rptr[IDX_ELEM_H] / 55.0); + ab[IDX_GC2H5OHI] = ab[IDX_GC2H5OHI] * (16.0 * rptr[IDX_ELEM_O] / 46.0 + 24.0 * rptr[IDX_ELEM_C] / 46.0 + 6.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_GC2OI] = ab[IDX_GC2OI] * (16.0 * rptr[IDX_ELEM_O] / 40.0 + 24.0 * rptr[IDX_ELEM_C] / 40.0); + ab[IDX_GC6H2I] = ab[IDX_GC6H2I] * (72.0 * rptr[IDX_ELEM_C] / 74.0 + 2.0 * rptr[IDX_ELEM_H] / 74.0); + ab[IDX_GC9NI] = ab[IDX_GC9NI] * (14.0 * rptr[IDX_ELEM_N] / 122.0 + 108.0 * rptr[IDX_ELEM_C] / 122.0); + ab[IDX_GCO2I] = ab[IDX_GCO2I] * (32.0 * rptr[IDX_ELEM_O] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0); + ab[IDX_GCPI] = ab[IDX_GCPI] * (31.0 * rptr[IDX_ELEM_P] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0); + ab[IDX_GO2HI] = ab[IDX_GO2HI] * (32.0 * rptr[IDX_ELEM_O] / 33.0 + 1.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_GOCNI] = ab[IDX_GOCNI] * (14.0 * rptr[IDX_ELEM_N] / 42.0 + 16.0 * rptr[IDX_ELEM_O] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0); + ab[IDX_GSOI] = ab[IDX_GSOI] * (32.0 * rptr[IDX_ELEM_S] / 48.0 + 16.0 * rptr[IDX_ELEM_O] / 48.0); + ab[IDX_GSiCI] = ab[IDX_GSiCI] * (28.0 * rptr[IDX_ELEM_Si] / 40.0 + 12.0 * rptr[IDX_ELEM_C] / 40.0); + ab[IDX_H2CNOII] = ab[IDX_H2CNOII] * (14.0 * rptr[IDX_ELEM_N] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0 + 2.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_H2NCOII] = ab[IDX_H2NCOII] * (14.0 * rptr[IDX_ELEM_N] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0 + 2.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_H2OCNII] = ab[IDX_H2OCNII] * (14.0 * rptr[IDX_ELEM_N] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0 + 2.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_PC2H4II] = ab[IDX_PC2H4II] * (31.0 * rptr[IDX_ELEM_P] / 59.0 + 24.0 * rptr[IDX_ELEM_C] / 59.0 + 4.0 * rptr[IDX_ELEM_H] / 59.0); + ab[IDX_C7NII] = ab[IDX_C7NII] * (14.0 * rptr[IDX_ELEM_N] / 98.0 + 84.0 * rptr[IDX_ELEM_C] / 98.0); + ab[IDX_C9NII] = ab[IDX_C9NII] * (14.0 * rptr[IDX_ELEM_N] / 122.0 + 108.0 * rptr[IDX_ELEM_C] / 122.0); + ab[IDX_CH3NHII] = ab[IDX_CH3NHII] * (14.0 * rptr[IDX_ELEM_N] / 30.0 + 12.0 * rptr[IDX_ELEM_C] / 30.0 + 4.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_ClOI] = ab[IDX_ClOI] * (35.0 * rptr[IDX_ELEM_Cl] / 51.0 + 16.0 * rptr[IDX_ELEM_O] / 51.0); + ab[IDX_GC11I] = ab[IDX_GC11I] * (132.0 * rptr[IDX_ELEM_C] / 132.0); + ab[IDX_GC2NI] = ab[IDX_GC2NI] * (14.0 * rptr[IDX_ELEM_N] / 38.0 + 24.0 * rptr[IDX_ELEM_C] / 38.0); + ab[IDX_GCH2CCH2I] = ab[IDX_GCH2CCH2I] * (36.0 * rptr[IDX_ELEM_C] / 40.0 + 4.0 * rptr[IDX_ELEM_H] / 40.0); + ab[IDX_GCH2NHI] = ab[IDX_GCH2NHI] * (14.0 * rptr[IDX_ELEM_N] / 29.0 + 12.0 * rptr[IDX_ELEM_C] / 29.0 + 3.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_GCH3CCHI] = ab[IDX_GCH3CCHI] * (36.0 * rptr[IDX_ELEM_C] / 40.0 + 4.0 * rptr[IDX_ELEM_H] / 40.0); + ab[IDX_GCNOI] = ab[IDX_GCNOI] * (14.0 * rptr[IDX_ELEM_N] / 42.0 + 16.0 * rptr[IDX_ELEM_O] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0); + ab[IDX_GHNCI] = ab[IDX_GHNCI] * (14.0 * rptr[IDX_ELEM_N] / 27.0 + 12.0 * rptr[IDX_ELEM_C] / 27.0 + 1.0 * rptr[IDX_ELEM_H] / 27.0); + ab[IDX_GNSI] = ab[IDX_GNSI] * (32.0 * rptr[IDX_ELEM_S] / 46.0 + 14.0 * rptr[IDX_ELEM_N] / 46.0); + ab[IDX_GSiC2I] = ab[IDX_GSiC2I] * (28.0 * rptr[IDX_ELEM_Si] / 52.0 + 24.0 * rptr[IDX_ELEM_C] / 52.0); + ab[IDX_H2C4NII] = ab[IDX_H2C4NII] * (14.0 * rptr[IDX_ELEM_N] / 64.0 + 48.0 * rptr[IDX_ELEM_C] / 64.0 + 2.0 * rptr[IDX_ELEM_H] / 64.0); + ab[IDX_H2CClII] = ab[IDX_H2CClII] * (35.0 * rptr[IDX_ELEM_Cl] / 49.0 + 12.0 * rptr[IDX_ELEM_C] / 49.0 + 2.0 * rptr[IDX_ELEM_H] / 49.0); + ab[IDX_H2NOII] = ab[IDX_H2NOII] * (14.0 * rptr[IDX_ELEM_N] / 32.0 + 16.0 * rptr[IDX_ELEM_O] / 32.0 + 2.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_HClII] = ab[IDX_HClII] * (35.0 * rptr[IDX_ELEM_Cl] / 36.0 + 1.0 * rptr[IDX_ELEM_H] / 36.0); + ab[IDX_HNSII] = ab[IDX_HNSII] * (32.0 * rptr[IDX_ELEM_S] / 47.0 + 14.0 * rptr[IDX_ELEM_N] / 47.0 + 1.0 * rptr[IDX_ELEM_H] / 47.0); + ab[IDX_HOCII] = ab[IDX_HOCII] * (16.0 * rptr[IDX_ELEM_O] / 29.0 + 12.0 * rptr[IDX_ELEM_C] / 29.0 + 1.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_HSOII] = ab[IDX_HSOII] * (32.0 * rptr[IDX_ELEM_S] / 49.0 + 16.0 * rptr[IDX_ELEM_O] / 49.0 + 1.0 * rptr[IDX_ELEM_H] / 49.0); + ab[IDX_HSiO2II] = ab[IDX_HSiO2II] * (28.0 * rptr[IDX_ELEM_Si] / 61.0 + 32.0 * rptr[IDX_ELEM_O] / 61.0 + 1.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_NH2CNHII] = ab[IDX_NH2CNHII] * (28.0 * rptr[IDX_ELEM_N] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 3.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_C2H5OHII] = ab[IDX_C2H5OHII] * (16.0 * rptr[IDX_ELEM_O] / 46.0 + 24.0 * rptr[IDX_ELEM_C] / 46.0 + 6.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_C2OII] = ab[IDX_C2OII] * (16.0 * rptr[IDX_ELEM_O] / 40.0 + 24.0 * rptr[IDX_ELEM_C] / 40.0); + ab[IDX_CH2CHCCHI] = ab[IDX_CH2CHCCHI] * (48.0 * rptr[IDX_ELEM_C] / 52.0 + 4.0 * rptr[IDX_ELEM_H] / 52.0); + ab[IDX_CH2OHCOII] = ab[IDX_CH2OHCOII] * (32.0 * rptr[IDX_ELEM_O] / 59.0 + 24.0 * rptr[IDX_ELEM_C] / 59.0 + 3.0 * rptr[IDX_ELEM_H] / 59.0); + ab[IDX_GCH2CCHI] = ab[IDX_GCH2CCHI] * (36.0 * rptr[IDX_ELEM_C] / 39.0 + 3.0 * rptr[IDX_ELEM_H] / 39.0); + ab[IDX_GCH2COI] = ab[IDX_GCH2COI] * (16.0 * rptr[IDX_ELEM_O] / 42.0 + 24.0 * rptr[IDX_ELEM_C] / 42.0 + 2.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_GHNOI] = ab[IDX_GHNOI] * (14.0 * rptr[IDX_ELEM_N] / 31.0 + 16.0 * rptr[IDX_ELEM_O] / 31.0 + 1.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_GN2I] = ab[IDX_GN2I] * (28.0 * rptr[IDX_ELEM_N] / 28.0); + ab[IDX_HC4NII] = ab[IDX_HC4NII] * (14.0 * rptr[IDX_ELEM_N] / 63.0 + 48.0 * rptr[IDX_ELEM_C] / 63.0 + 1.0 * rptr[IDX_ELEM_H] / 63.0); + ab[IDX_HCNOHII] = ab[IDX_HCNOHII] * (14.0 * rptr[IDX_ELEM_N] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0 + 2.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_HNCOHII] = ab[IDX_HNCOHII] * (14.0 * rptr[IDX_ELEM_N] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0 + 2.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_HOCNII] = ab[IDX_HOCNII] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_HeHII] = ab[IDX_HeHII] * (4.0 * rptr[IDX_ELEM_He] / 5.0 + 1.0 * rptr[IDX_ELEM_H] / 5.0); + ab[IDX_PC2H3II] = ab[IDX_PC2H3II] * (31.0 * rptr[IDX_ELEM_P] / 58.0 + 24.0 * rptr[IDX_ELEM_C] / 58.0 + 3.0 * rptr[IDX_ELEM_H] / 58.0); + ab[IDX_PNII] = ab[IDX_PNII] * (31.0 * rptr[IDX_ELEM_P] / 45.0 + 14.0 * rptr[IDX_ELEM_N] / 45.0); + ab[IDX_PNH3II] = ab[IDX_PNH3II] * (31.0 * rptr[IDX_ELEM_P] / 48.0 + 14.0 * rptr[IDX_ELEM_N] / 48.0 + 3.0 * rptr[IDX_ELEM_H] / 48.0); + ab[IDX_CH3CSII] = ab[IDX_CH3CSII] * (32.0 * rptr[IDX_ELEM_S] / 59.0 + 24.0 * rptr[IDX_ELEM_C] / 59.0 + 3.0 * rptr[IDX_ELEM_H] / 59.0); + ab[IDX_GC5NI] = ab[IDX_GC5NI] * (14.0 * rptr[IDX_ELEM_N] / 74.0 + 60.0 * rptr[IDX_ELEM_C] / 74.0); + ab[IDX_GPI] = ab[IDX_GPI] * (31.0 * rptr[IDX_ELEM_P] / 31.0); + ab[IDX_H2C7NII] = ab[IDX_H2C7NII] * (14.0 * rptr[IDX_ELEM_N] / 100.0 + 84.0 * rptr[IDX_ELEM_C] / 100.0 + 2.0 * rptr[IDX_ELEM_H] / 100.0); + ab[IDX_H2C9NII] = ab[IDX_H2C9NII] * (14.0 * rptr[IDX_ELEM_N] / 124.0 + 108.0 * rptr[IDX_ELEM_C] / 124.0 + 2.0 * rptr[IDX_ELEM_H] / 124.0); + ab[IDX_H2O2I] = ab[IDX_H2O2I] * (32.0 * rptr[IDX_ELEM_O] / 34.0 + 2.0 * rptr[IDX_ELEM_H] / 34.0); + ab[IDX_H3S2II] = ab[IDX_H3S2II] * (64.0 * rptr[IDX_ELEM_S] / 67.0 + 3.0 * rptr[IDX_ELEM_H] / 67.0); + ab[IDX_HONCII] = ab[IDX_HONCII] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_PCH3II] = ab[IDX_PCH3II] * (31.0 * rptr[IDX_ELEM_P] / 46.0 + 12.0 * rptr[IDX_ELEM_C] / 46.0 + 3.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_PNH2II] = ab[IDX_PNH2II] * (31.0 * rptr[IDX_ELEM_P] / 47.0 + 14.0 * rptr[IDX_ELEM_N] / 47.0 + 2.0 * rptr[IDX_ELEM_H] / 47.0); + ab[IDX_C10H3II] = ab[IDX_C10H3II] * (120.0 * rptr[IDX_ELEM_C] / 123.0 + 3.0 * rptr[IDX_ELEM_H] / 123.0); + ab[IDX_C2H5CNHII] = ab[IDX_C2H5CNHII] * (14.0 * rptr[IDX_ELEM_N] / 56.0 + 36.0 * rptr[IDX_ELEM_C] / 56.0 + 6.0 * rptr[IDX_ELEM_H] / 56.0); + ab[IDX_CClII] = ab[IDX_CClII] * (35.0 * rptr[IDX_ELEM_Cl] / 47.0 + 12.0 * rptr[IDX_ELEM_C] / 47.0); + ab[IDX_CH2NH2II] = ab[IDX_CH2NH2II] * (14.0 * rptr[IDX_ELEM_N] / 30.0 + 12.0 * rptr[IDX_ELEM_C] / 30.0 + 4.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_CH2OHCH2OII] = ab[IDX_CH2OHCH2OII] * (32.0 * rptr[IDX_ELEM_O] / 61.0 + 24.0 * rptr[IDX_ELEM_C] / 61.0 + 5.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_CH3C5NHII] = ab[IDX_CH3C5NHII] * (14.0 * rptr[IDX_ELEM_N] / 90.0 + 72.0 * rptr[IDX_ELEM_C] / 90.0 + 4.0 * rptr[IDX_ELEM_H] / 90.0); + ab[IDX_CH3C7NHII] = ab[IDX_CH3C7NHII] * (14.0 * rptr[IDX_ELEM_N] / 114.0 + 96.0 * rptr[IDX_ELEM_C] / 114.0 + 4.0 * rptr[IDX_ELEM_H] / 114.0); + ab[IDX_GC2H5I] = ab[IDX_GC2H5I] * (24.0 * rptr[IDX_ELEM_C] / 29.0 + 5.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_GC3NI] = ab[IDX_GC3NI] * (14.0 * rptr[IDX_ELEM_N] / 50.0 + 36.0 * rptr[IDX_ELEM_C] / 50.0); + ab[IDX_GC7NI] = ab[IDX_GC7NI] * (14.0 * rptr[IDX_ELEM_N] / 98.0 + 84.0 * rptr[IDX_ELEM_C] / 98.0); + ab[IDX_GCOOCH3I] = ab[IDX_GCOOCH3I] * (32.0 * rptr[IDX_ELEM_O] / 59.0 + 24.0 * rptr[IDX_ELEM_C] / 59.0 + 3.0 * rptr[IDX_ELEM_H] / 59.0); + ab[IDX_GHCNI] = ab[IDX_GHCNI] * (14.0 * rptr[IDX_ELEM_N] / 27.0 + 12.0 * rptr[IDX_ELEM_C] / 27.0 + 1.0 * rptr[IDX_ELEM_H] / 27.0); + ab[IDX_H2CNI] = ab[IDX_H2CNI] * (14.0 * rptr[IDX_ELEM_N] / 28.0 + 12.0 * rptr[IDX_ELEM_C] / 28.0 + 2.0 * rptr[IDX_ELEM_H] / 28.0); + ab[IDX_H2SiOII] = ab[IDX_H2SiOII] * (28.0 * rptr[IDX_ELEM_Si] / 46.0 + 16.0 * rptr[IDX_ELEM_O] / 46.0 + 2.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_H3C5NII] = ab[IDX_H3C5NII] * (14.0 * rptr[IDX_ELEM_N] / 77.0 + 60.0 * rptr[IDX_ELEM_C] / 77.0 + 3.0 * rptr[IDX_ELEM_H] / 77.0); + ab[IDX_HCNOII] = ab[IDX_HCNOII] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_CClI] = ab[IDX_CClI] * (35.0 * rptr[IDX_ELEM_Cl] / 47.0 + 12.0 * rptr[IDX_ELEM_C] / 47.0); + ab[IDX_CH3COOHII] = ab[IDX_CH3COOHII] * (32.0 * rptr[IDX_ELEM_O] / 60.0 + 24.0 * rptr[IDX_ELEM_C] / 60.0 + 4.0 * rptr[IDX_ELEM_H] / 60.0); + ab[IDX_ClII] = ab[IDX_ClII] * (35.0 * rptr[IDX_ELEM_Cl] / 35.0); + ab[IDX_GNH3I] = ab[IDX_GNH3I] * (14.0 * rptr[IDX_ELEM_N] / 17.0 + 3.0 * rptr[IDX_ELEM_H] / 17.0); + ab[IDX_H2ClII] = ab[IDX_H2ClII] * (35.0 * rptr[IDX_ELEM_Cl] / 37.0 + 2.0 * rptr[IDX_ELEM_H] / 37.0); + ab[IDX_H3C9NII] = ab[IDX_H3C9NII] * (14.0 * rptr[IDX_ELEM_N] / 125.0 + 108.0 * rptr[IDX_ELEM_C] / 125.0 + 3.0 * rptr[IDX_ELEM_H] / 125.0); + ab[IDX_H5C2O2II] = ab[IDX_H5C2O2II] * (32.0 * rptr[IDX_ELEM_O] / 61.0 + 24.0 * rptr[IDX_ELEM_C] / 61.0 + 5.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_HCOOHII] = ab[IDX_HCOOHII] * (32.0 * rptr[IDX_ELEM_O] / 46.0 + 12.0 * rptr[IDX_ELEM_C] / 46.0 + 2.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_HPNII] = ab[IDX_HPNII] * (31.0 * rptr[IDX_ELEM_P] / 46.0 + 14.0 * rptr[IDX_ELEM_N] / 46.0 + 1.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_C2SII] = ab[IDX_C2SII] * (32.0 * rptr[IDX_ELEM_S] / 56.0 + 24.0 * rptr[IDX_ELEM_C] / 56.0); + ab[IDX_C3SII] = ab[IDX_C3SII] * (32.0 * rptr[IDX_ELEM_S] / 68.0 + 36.0 * rptr[IDX_ELEM_C] / 68.0); + ab[IDX_C4NI] = ab[IDX_C4NI] * (14.0 * rptr[IDX_ELEM_N] / 62.0 + 48.0 * rptr[IDX_ELEM_C] / 62.0); + ab[IDX_CH3COOH2II] = ab[IDX_CH3COOH2II] * (32.0 * rptr[IDX_ELEM_O] / 61.0 + 24.0 * rptr[IDX_ELEM_C] / 61.0 + 5.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_CH3OCH3II] = ab[IDX_CH3OCH3II] * (16.0 * rptr[IDX_ELEM_O] / 46.0 + 24.0 * rptr[IDX_ELEM_C] / 46.0 + 6.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_GC10I] = ab[IDX_GC10I] * (120.0 * rptr[IDX_ELEM_C] / 120.0); + ab[IDX_GC10HI] = ab[IDX_GC10HI] * (120.0 * rptr[IDX_ELEM_C] / 121.0 + 1.0 * rptr[IDX_ELEM_H] / 121.0); + ab[IDX_GC8HI] = ab[IDX_GC8HI] * (96.0 * rptr[IDX_ELEM_C] / 97.0 + 1.0 * rptr[IDX_ELEM_H] / 97.0); + ab[IDX_GCH2OHCOI] = ab[IDX_GCH2OHCOI] * (32.0 * rptr[IDX_ELEM_O] / 59.0 + 24.0 * rptr[IDX_ELEM_C] / 59.0 + 3.0 * rptr[IDX_ELEM_H] / 59.0); + ab[IDX_GCOOHI] = ab[IDX_GCOOHI] * (32.0 * rptr[IDX_ELEM_O] / 45.0 + 12.0 * rptr[IDX_ELEM_C] / 45.0 + 1.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_GO2I] = ab[IDX_GO2I] * (32.0 * rptr[IDX_ELEM_O] / 32.0); + ab[IDX_H3C7NII] = ab[IDX_H3C7NII] * (14.0 * rptr[IDX_ELEM_N] / 101.0 + 84.0 * rptr[IDX_ELEM_C] / 101.0 + 3.0 * rptr[IDX_ELEM_H] / 101.0); + ab[IDX_H3SiOII] = ab[IDX_H3SiOII] * (28.0 * rptr[IDX_ELEM_Si] / 47.0 + 16.0 * rptr[IDX_ELEM_O] / 47.0 + 3.0 * rptr[IDX_ELEM_H] / 47.0); + ab[IDX_HSO2II] = ab[IDX_HSO2II] * (32.0 * rptr[IDX_ELEM_S] / 65.0 + 32.0 * rptr[IDX_ELEM_O] / 65.0 + 1.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_NH2CNI] = ab[IDX_NH2CNI] * (28.0 * rptr[IDX_ELEM_N] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0 + 2.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_CH3C3NHII] = ab[IDX_CH3C3NHII] * (14.0 * rptr[IDX_ELEM_N] / 66.0 + 48.0 * rptr[IDX_ELEM_C] / 66.0 + 4.0 * rptr[IDX_ELEM_H] / 66.0); + ab[IDX_CH3OCH4II] = ab[IDX_CH3OCH4II] * (16.0 * rptr[IDX_ELEM_O] / 47.0 + 24.0 * rptr[IDX_ELEM_C] / 47.0 + 7.0 * rptr[IDX_ELEM_H] / 47.0); + ab[IDX_GC2H4I] = ab[IDX_GC2H4I] * (24.0 * rptr[IDX_ELEM_C] / 28.0 + 4.0 * rptr[IDX_ELEM_H] / 28.0); + ab[IDX_GC9I] = ab[IDX_GC9I] * (108.0 * rptr[IDX_ELEM_C] / 108.0); + ab[IDX_GC9HI] = ab[IDX_GC9HI] * (108.0 * rptr[IDX_ELEM_C] / 109.0 + 1.0 * rptr[IDX_ELEM_H] / 109.0); + ab[IDX_GCSI] = ab[IDX_GCSI] * (32.0 * rptr[IDX_ELEM_S] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0); + ab[IDX_HC7NII] = ab[IDX_HC7NII] * (14.0 * rptr[IDX_ELEM_N] / 99.0 + 84.0 * rptr[IDX_ELEM_C] / 99.0 + 1.0 * rptr[IDX_ELEM_H] / 99.0); + ab[IDX_HC9NII] = ab[IDX_HC9NII] * (14.0 * rptr[IDX_ELEM_N] / 123.0 + 108.0 * rptr[IDX_ELEM_C] / 123.0 + 1.0 * rptr[IDX_ELEM_H] / 123.0); + ab[IDX_HNCOII] = ab[IDX_HNCOII] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_NO2II] = ab[IDX_NO2II] * (14.0 * rptr[IDX_ELEM_N] / 46.0 + 32.0 * rptr[IDX_ELEM_O] / 46.0); + ab[IDX_PC3HII] = ab[IDX_PC3HII] * (31.0 * rptr[IDX_ELEM_P] / 68.0 + 36.0 * rptr[IDX_ELEM_C] / 68.0 + 1.0 * rptr[IDX_ELEM_H] / 68.0); + ab[IDX_PCH4II] = ab[IDX_PCH4II] * (31.0 * rptr[IDX_ELEM_P] / 47.0 + 12.0 * rptr[IDX_ELEM_C] / 47.0 + 4.0 * rptr[IDX_ELEM_H] / 47.0); + ab[IDX_SiH4II] = ab[IDX_SiH4II] * (28.0 * rptr[IDX_ELEM_Si] / 32.0 + 4.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_SiO2I] = ab[IDX_SiO2I] * (28.0 * rptr[IDX_ELEM_Si] / 60.0 + 32.0 * rptr[IDX_ELEM_O] / 60.0); + ab[IDX_C2H5CNI] = ab[IDX_C2H5CNI] * (14.0 * rptr[IDX_ELEM_N] / 55.0 + 36.0 * rptr[IDX_ELEM_C] / 55.0 + 5.0 * rptr[IDX_ELEM_H] / 55.0); + ab[IDX_C2H5OH2II] = ab[IDX_C2H5OH2II] * (16.0 * rptr[IDX_ELEM_O] / 47.0 + 24.0 * rptr[IDX_ELEM_C] / 47.0 + 7.0 * rptr[IDX_ELEM_H] / 47.0); + ab[IDX_C2H7II] = ab[IDX_C2H7II] * (24.0 * rptr[IDX_ELEM_C] / 31.0 + 7.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_CCPII] = ab[IDX_CCPII] * (31.0 * rptr[IDX_ELEM_P] / 55.0 + 24.0 * rptr[IDX_ELEM_C] / 55.0); + ab[IDX_CH2CHCNHII] = ab[IDX_CH2CHCNHII] * (14.0 * rptr[IDX_ELEM_N] / 54.0 + 36.0 * rptr[IDX_ELEM_C] / 54.0 + 4.0 * rptr[IDX_ELEM_H] / 54.0); + ab[IDX_COOCH3I] = ab[IDX_COOCH3I] * (32.0 * rptr[IDX_ELEM_O] / 59.0 + 24.0 * rptr[IDX_ELEM_C] / 59.0 + 3.0 * rptr[IDX_ELEM_H] / 59.0); + ab[IDX_FI] = ab[IDX_FI] * (19.0 * rptr[IDX_ELEM_F] / 19.0); + ab[IDX_GHSI] = ab[IDX_GHSI] * (32.0 * rptr[IDX_ELEM_S] / 33.0 + 1.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_H2POII] = ab[IDX_H2POII] * (31.0 * rptr[IDX_ELEM_P] / 49.0 + 16.0 * rptr[IDX_ELEM_O] / 49.0 + 2.0 * rptr[IDX_ELEM_H] / 49.0); + ab[IDX_HCOOCH3II] = ab[IDX_HCOOCH3II] * (32.0 * rptr[IDX_ELEM_O] / 60.0 + 24.0 * rptr[IDX_ELEM_C] / 60.0 + 4.0 * rptr[IDX_ELEM_H] / 60.0); + ab[IDX_HN2OII] = ab[IDX_HN2OII] * (28.0 * rptr[IDX_ELEM_N] / 45.0 + 16.0 * rptr[IDX_ELEM_O] / 45.0 + 1.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_N2OII] = ab[IDX_N2OII] * (28.0 * rptr[IDX_ELEM_N] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0); + ab[IDX_PC2H2II] = ab[IDX_PC2H2II] * (31.0 * rptr[IDX_ELEM_P] / 57.0 + 24.0 * rptr[IDX_ELEM_C] / 57.0 + 2.0 * rptr[IDX_ELEM_H] / 57.0); + ab[IDX_SiC3H2II] = ab[IDX_SiC3H2II] * (28.0 * rptr[IDX_ELEM_Si] / 66.0 + 36.0 * rptr[IDX_ELEM_C] / 66.0 + 2.0 * rptr[IDX_ELEM_H] / 66.0); + ab[IDX_SiC4II] = ab[IDX_SiC4II] * (28.0 * rptr[IDX_ELEM_Si] / 76.0 + 48.0 * rptr[IDX_ELEM_C] / 76.0); + ab[IDX_SiC4HII] = ab[IDX_SiC4HII] * (28.0 * rptr[IDX_ELEM_Si] / 77.0 + 48.0 * rptr[IDX_ELEM_C] / 77.0 + 1.0 * rptr[IDX_ELEM_H] / 77.0); + ab[IDX_SiH5II] = ab[IDX_SiH5II] * (28.0 * rptr[IDX_ELEM_Si] / 33.0 + 5.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_SiNCHII] = ab[IDX_SiNCHII] * (28.0 * rptr[IDX_ELEM_Si] / 55.0 + 14.0 * rptr[IDX_ELEM_N] / 55.0 + 12.0 * rptr[IDX_ELEM_C] / 55.0 + 1.0 * rptr[IDX_ELEM_H] / 55.0); + ab[IDX_C11I] = ab[IDX_C11I] * (132.0 * rptr[IDX_ELEM_C] / 132.0); + ab[IDX_C3OII] = ab[IDX_C3OII] * (16.0 * rptr[IDX_ELEM_O] / 52.0 + 36.0 * rptr[IDX_ELEM_C] / 52.0); + ab[IDX_C4H5II] = ab[IDX_C4H5II] * (48.0 * rptr[IDX_ELEM_C] / 53.0 + 5.0 * rptr[IDX_ELEM_H] / 53.0); + ab[IDX_C4H7II] = ab[IDX_C4H7II] * (48.0 * rptr[IDX_ELEM_C] / 55.0 + 7.0 * rptr[IDX_ELEM_H] / 55.0); + ab[IDX_CH2OHCHOII] = ab[IDX_CH2OHCHOII] * (32.0 * rptr[IDX_ELEM_O] / 60.0 + 24.0 * rptr[IDX_ELEM_C] / 60.0 + 4.0 * rptr[IDX_ELEM_H] / 60.0); + ab[IDX_CH3CHOII] = ab[IDX_CH3CHOII] * (16.0 * rptr[IDX_ELEM_O] / 44.0 + 24.0 * rptr[IDX_ELEM_C] / 44.0 + 4.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_GCH2OHCHOI] = ab[IDX_GCH2OHCHOI] * (32.0 * rptr[IDX_ELEM_O] / 60.0 + 24.0 * rptr[IDX_ELEM_C] / 60.0 + 4.0 * rptr[IDX_ELEM_H] / 60.0); + ab[IDX_GHCOOHI] = ab[IDX_GHCOOHI] * (32.0 * rptr[IDX_ELEM_O] / 46.0 + 12.0 * rptr[IDX_ELEM_C] / 46.0 + 2.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_H2S2I] = ab[IDX_H2S2I] * (64.0 * rptr[IDX_ELEM_S] / 66.0 + 2.0 * rptr[IDX_ELEM_H] / 66.0); + ab[IDX_HNSiII] = ab[IDX_HNSiII] * (28.0 * rptr[IDX_ELEM_Si] / 43.0 + 14.0 * rptr[IDX_ELEM_N] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_HOCSII] = ab[IDX_HOCSII] * (32.0 * rptr[IDX_ELEM_S] / 61.0 + 16.0 * rptr[IDX_ELEM_O] / 61.0 + 12.0 * rptr[IDX_ELEM_C] / 61.0 + 1.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_NSII] = ab[IDX_NSII] * (32.0 * rptr[IDX_ELEM_S] / 46.0 + 14.0 * rptr[IDX_ELEM_N] / 46.0); + ab[IDX_OCNII] = ab[IDX_OCNII] * (14.0 * rptr[IDX_ELEM_N] / 42.0 + 16.0 * rptr[IDX_ELEM_O] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0); + ab[IDX_PC4HII] = ab[IDX_PC4HII] * (31.0 * rptr[IDX_ELEM_P] / 80.0 + 48.0 * rptr[IDX_ELEM_C] / 80.0 + 1.0 * rptr[IDX_ELEM_H] / 80.0); + ab[IDX_PH3II] = ab[IDX_PH3II] * (31.0 * rptr[IDX_ELEM_P] / 34.0 + 3.0 * rptr[IDX_ELEM_H] / 34.0); + ab[IDX_SiCH4II] = ab[IDX_SiCH4II] * (28.0 * rptr[IDX_ELEM_Si] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0 + 4.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_C10II] = ab[IDX_C10II] * (120.0 * rptr[IDX_ELEM_C] / 120.0); + ab[IDX_C10H2II] = ab[IDX_C10H2II] * (120.0 * rptr[IDX_ELEM_C] / 122.0 + 2.0 * rptr[IDX_ELEM_H] / 122.0); + ab[IDX_C2N2II] = ab[IDX_C2N2II] * (28.0 * rptr[IDX_ELEM_N] / 52.0 + 24.0 * rptr[IDX_ELEM_C] / 52.0); + ab[IDX_CH3CNII] = ab[IDX_CH3CNII] * (14.0 * rptr[IDX_ELEM_N] / 41.0 + 24.0 * rptr[IDX_ELEM_C] / 41.0 + 3.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_GC2H2I] = ab[IDX_GC2H2I] * (24.0 * rptr[IDX_ELEM_C] / 26.0 + 2.0 * rptr[IDX_ELEM_H] / 26.0); + ab[IDX_GC5I] = ab[IDX_GC5I] * (60.0 * rptr[IDX_ELEM_C] / 60.0); + ab[IDX_GC7HI] = ab[IDX_GC7HI] * (84.0 * rptr[IDX_ELEM_C] / 85.0 + 1.0 * rptr[IDX_ELEM_H] / 85.0); + ab[IDX_GCH3COI] = ab[IDX_GCH3COI] * (16.0 * rptr[IDX_ELEM_O] / 43.0 + 24.0 * rptr[IDX_ELEM_C] / 43.0 + 3.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_GHCOOCH3I] = ab[IDX_GHCOOCH3I] * (32.0 * rptr[IDX_ELEM_O] / 60.0 + 24.0 * rptr[IDX_ELEM_C] / 60.0 + 4.0 * rptr[IDX_ELEM_H] / 60.0); + ab[IDX_HC4SII] = ab[IDX_HC4SII] * (32.0 * rptr[IDX_ELEM_S] / 81.0 + 48.0 * rptr[IDX_ELEM_C] / 81.0 + 1.0 * rptr[IDX_ELEM_H] / 81.0); + ab[IDX_HC5NHII] = ab[IDX_HC5NHII] * (14.0 * rptr[IDX_ELEM_N] / 76.0 + 60.0 * rptr[IDX_ELEM_C] / 76.0 + 2.0 * rptr[IDX_ELEM_H] / 76.0); + ab[IDX_SiC2H3II] = ab[IDX_SiC2H3II] * (28.0 * rptr[IDX_ELEM_Si] / 55.0 + 24.0 * rptr[IDX_ELEM_C] / 55.0 + 3.0 * rptr[IDX_ELEM_H] / 55.0); + ab[IDX_SiC3HI] = ab[IDX_SiC3HI] * (28.0 * rptr[IDX_ELEM_Si] / 65.0 + 36.0 * rptr[IDX_ELEM_C] / 65.0 + 1.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_SiCH3II] = ab[IDX_SiCH3II] * (28.0 * rptr[IDX_ELEM_Si] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 3.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_SiNH2II] = ab[IDX_SiNH2II] * (28.0 * rptr[IDX_ELEM_Si] / 44.0 + 14.0 * rptr[IDX_ELEM_N] / 44.0 + 2.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_C11II] = ab[IDX_C11II] * (132.0 * rptr[IDX_ELEM_C] / 132.0); + ab[IDX_C3NII] = ab[IDX_C3NII] * (14.0 * rptr[IDX_ELEM_N] / 50.0 + 36.0 * rptr[IDX_ELEM_C] / 50.0); + ab[IDX_C4H4II] = ab[IDX_C4H4II] * (48.0 * rptr[IDX_ELEM_C] / 52.0 + 4.0 * rptr[IDX_ELEM_H] / 52.0); + ab[IDX_CH2CNII] = ab[IDX_CH2CNII] * (14.0 * rptr[IDX_ELEM_N] / 40.0 + 24.0 * rptr[IDX_ELEM_C] / 40.0 + 2.0 * rptr[IDX_ELEM_H] / 40.0); + ab[IDX_CH3COCH3II] = ab[IDX_CH3COCH3II] * (16.0 * rptr[IDX_ELEM_O] / 58.0 + 36.0 * rptr[IDX_ELEM_C] / 58.0 + 6.0 * rptr[IDX_ELEM_H] / 58.0); + ab[IDX_CPII] = ab[IDX_CPII] * (31.0 * rptr[IDX_ELEM_P] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0); + ab[IDX_GC6I] = ab[IDX_GC6I] * (72.0 * rptr[IDX_ELEM_C] / 72.0); + ab[IDX_GC8I] = ab[IDX_GC8I] * (96.0 * rptr[IDX_ELEM_C] / 96.0); + ab[IDX_GCH2OHI] = ab[IDX_GCH2OHI] * (16.0 * rptr[IDX_ELEM_O] / 31.0 + 12.0 * rptr[IDX_ELEM_C] / 31.0 + 3.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_GCH3OHI] = ab[IDX_GCH3OHI] * (16.0 * rptr[IDX_ELEM_O] / 32.0 + 12.0 * rptr[IDX_ELEM_C] / 32.0 + 4.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_H2S2II] = ab[IDX_H2S2II] * (64.0 * rptr[IDX_ELEM_S] / 66.0 + 2.0 * rptr[IDX_ELEM_H] / 66.0); + ab[IDX_HC2PII] = ab[IDX_HC2PII] * (31.0 * rptr[IDX_ELEM_P] / 56.0 + 24.0 * rptr[IDX_ELEM_C] / 56.0 + 1.0 * rptr[IDX_ELEM_H] / 56.0); + ab[IDX_HC5NII] = ab[IDX_HC5NII] * (14.0 * rptr[IDX_ELEM_N] / 75.0 + 60.0 * rptr[IDX_ELEM_C] / 75.0 + 1.0 * rptr[IDX_ELEM_H] / 75.0); + ab[IDX_HFI] = ab[IDX_HFI] * (19.0 * rptr[IDX_ELEM_F] / 20.0 + 1.0 * rptr[IDX_ELEM_H] / 20.0); + ab[IDX_HONCI] = ab[IDX_HONCI] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_HSiSII] = ab[IDX_HSiSII] * (28.0 * rptr[IDX_ELEM_Si] / 61.0 + 32.0 * rptr[IDX_ELEM_S] / 61.0 + 1.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_PCH2II] = ab[IDX_PCH2II] * (31.0 * rptr[IDX_ELEM_P] / 45.0 + 12.0 * rptr[IDX_ELEM_C] / 45.0 + 2.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_SO2II] = ab[IDX_SO2II] * (32.0 * rptr[IDX_ELEM_S] / 64.0 + 32.0 * rptr[IDX_ELEM_O] / 64.0); + ab[IDX_SiNII] = ab[IDX_SiNII] * (28.0 * rptr[IDX_ELEM_Si] / 42.0 + 14.0 * rptr[IDX_ELEM_N] / 42.0); + ab[IDX_C9II] = ab[IDX_C9II] * (108.0 * rptr[IDX_ELEM_C] / 108.0); + ab[IDX_CH2OHCOI] = ab[IDX_CH2OHCOI] * (32.0 * rptr[IDX_ELEM_O] / 59.0 + 24.0 * rptr[IDX_ELEM_C] / 59.0 + 3.0 * rptr[IDX_ELEM_H] / 59.0); + ab[IDX_CH3C5NI] = ab[IDX_CH3C5NI] * (14.0 * rptr[IDX_ELEM_N] / 89.0 + 72.0 * rptr[IDX_ELEM_C] / 89.0 + 3.0 * rptr[IDX_ELEM_H] / 89.0); + ab[IDX_CH3C7NI] = ab[IDX_CH3C7NI] * (14.0 * rptr[IDX_ELEM_N] / 113.0 + 96.0 * rptr[IDX_ELEM_C] / 113.0 + 3.0 * rptr[IDX_ELEM_H] / 113.0); + ab[IDX_GC3HI] = ab[IDX_GC3HI] * (36.0 * rptr[IDX_ELEM_C] / 37.0 + 1.0 * rptr[IDX_ELEM_H] / 37.0); + ab[IDX_GC4HI] = ab[IDX_GC4HI] * (48.0 * rptr[IDX_ELEM_C] / 49.0 + 1.0 * rptr[IDX_ELEM_H] / 49.0); + ab[IDX_GC5HI] = ab[IDX_GC5HI] * (60.0 * rptr[IDX_ELEM_C] / 61.0 + 1.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_GC6HI] = ab[IDX_GC6HI] * (72.0 * rptr[IDX_ELEM_C] / 73.0 + 1.0 * rptr[IDX_ELEM_H] / 73.0); + ab[IDX_H2NCII] = ab[IDX_H2NCII] * (14.0 * rptr[IDX_ELEM_N] / 28.0 + 12.0 * rptr[IDX_ELEM_C] / 28.0 + 2.0 * rptr[IDX_ELEM_H] / 28.0); + ab[IDX_H2SiOI] = ab[IDX_H2SiOI] * (28.0 * rptr[IDX_ELEM_Si] / 46.0 + 16.0 * rptr[IDX_ELEM_O] / 46.0 + 2.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_H3CSII] = ab[IDX_H3CSII] * (32.0 * rptr[IDX_ELEM_S] / 47.0 + 12.0 * rptr[IDX_ELEM_C] / 47.0 + 3.0 * rptr[IDX_ELEM_H] / 47.0); + ab[IDX_HC2OII] = ab[IDX_HC2OII] * (16.0 * rptr[IDX_ELEM_O] / 41.0 + 24.0 * rptr[IDX_ELEM_C] / 41.0 + 1.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_HCPII] = ab[IDX_HCPII] * (31.0 * rptr[IDX_ELEM_P] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0 + 1.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_SiC4I] = ab[IDX_SiC4I] * (28.0 * rptr[IDX_ELEM_Si] / 76.0 + 48.0 * rptr[IDX_ELEM_C] / 76.0); + ab[IDX_SiNCI] = ab[IDX_SiNCI] * (28.0 * rptr[IDX_ELEM_Si] / 54.0 + 14.0 * rptr[IDX_ELEM_N] / 54.0 + 12.0 * rptr[IDX_ELEM_C] / 54.0); + ab[IDX_SiNCII] = ab[IDX_SiNCII] * (28.0 * rptr[IDX_ELEM_Si] / 54.0 + 14.0 * rptr[IDX_ELEM_N] / 54.0 + 12.0 * rptr[IDX_ELEM_C] / 54.0); + ab[IDX_CNOI] = ab[IDX_CNOI] * (14.0 * rptr[IDX_ELEM_N] / 42.0 + 16.0 * rptr[IDX_ELEM_O] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0); + ab[IDX_GC2H3I] = ab[IDX_GC2H3I] * (24.0 * rptr[IDX_ELEM_C] / 27.0 + 3.0 * rptr[IDX_ELEM_H] / 27.0); + ab[IDX_GCH3OI] = ab[IDX_GCH3OI] * (16.0 * rptr[IDX_ELEM_O] / 31.0 + 12.0 * rptr[IDX_ELEM_C] / 31.0 + 3.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_GH2OI] = ab[IDX_GH2OI] * (16.0 * rptr[IDX_ELEM_O] / 18.0 + 2.0 * rptr[IDX_ELEM_H] / 18.0); + ab[IDX_HC3SII] = ab[IDX_HC3SII] * (32.0 * rptr[IDX_ELEM_S] / 69.0 + 36.0 * rptr[IDX_ELEM_C] / 69.0 + 1.0 * rptr[IDX_ELEM_H] / 69.0); + ab[IDX_HCOOH2II] = ab[IDX_HCOOH2II] * (32.0 * rptr[IDX_ELEM_O] / 47.0 + 12.0 * rptr[IDX_ELEM_C] / 47.0 + 3.0 * rptr[IDX_ELEM_H] / 47.0); + ab[IDX_HNSiI] = ab[IDX_HNSiI] * (28.0 * rptr[IDX_ELEM_Si] / 43.0 + 14.0 * rptr[IDX_ELEM_N] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_HPOII] = ab[IDX_HPOII] * (31.0 * rptr[IDX_ELEM_P] / 48.0 + 16.0 * rptr[IDX_ELEM_O] / 48.0 + 1.0 * rptr[IDX_ELEM_H] / 48.0); + ab[IDX_HS2II] = ab[IDX_HS2II] * (64.0 * rptr[IDX_ELEM_S] / 65.0 + 1.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_SiC2H2I] = ab[IDX_SiC2H2I] * (28.0 * rptr[IDX_ELEM_Si] / 54.0 + 24.0 * rptr[IDX_ELEM_C] / 54.0 + 2.0 * rptr[IDX_ELEM_H] / 54.0); + ab[IDX_SiC3II] = ab[IDX_SiC3II] * (28.0 * rptr[IDX_ELEM_Si] / 64.0 + 36.0 * rptr[IDX_ELEM_C] / 64.0); + ab[IDX_C2NHII] = ab[IDX_C2NHII] * (14.0 * rptr[IDX_ELEM_N] / 39.0 + 24.0 * rptr[IDX_ELEM_C] / 39.0 + 1.0 * rptr[IDX_ELEM_H] / 39.0); + ab[IDX_C3H6II] = ab[IDX_C3H6II] * (36.0 * rptr[IDX_ELEM_C] / 42.0 + 6.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_C6H7II] = ab[IDX_C6H7II] * (72.0 * rptr[IDX_ELEM_C] / 79.0 + 7.0 * rptr[IDX_ELEM_H] / 79.0); + ab[IDX_C8H4II] = ab[IDX_C8H4II] * (96.0 * rptr[IDX_ELEM_C] / 100.0 + 4.0 * rptr[IDX_ELEM_H] / 100.0); + ab[IDX_CH2OHCHOI] = ab[IDX_CH2OHCHOI] * (32.0 * rptr[IDX_ELEM_O] / 60.0 + 24.0 * rptr[IDX_ELEM_C] / 60.0 + 4.0 * rptr[IDX_ELEM_H] / 60.0); + ab[IDX_ClI] = ab[IDX_ClI] * (35.0 * rptr[IDX_ELEM_Cl] / 35.0); + ab[IDX_GC7I] = ab[IDX_GC7I] * (84.0 * rptr[IDX_ELEM_C] / 84.0); + ab[IDX_GSiI] = ab[IDX_GSiI] * (28.0 * rptr[IDX_ELEM_Si] / 28.0); + ab[IDX_HC3OII] = ab[IDX_HC3OII] * (16.0 * rptr[IDX_ELEM_O] / 53.0 + 36.0 * rptr[IDX_ELEM_C] / 53.0 + 1.0 * rptr[IDX_ELEM_H] / 53.0); + ab[IDX_HCNOI] = ab[IDX_HCNOI] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_SiC3HII] = ab[IDX_SiC3HII] * (28.0 * rptr[IDX_ELEM_Si] / 65.0 + 36.0 * rptr[IDX_ELEM_C] / 65.0 + 1.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_SiCH3I] = ab[IDX_SiCH3I] * (28.0 * rptr[IDX_ELEM_Si] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 3.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_C3H7II] = ab[IDX_C3H7II] * (36.0 * rptr[IDX_ELEM_C] / 43.0 + 7.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_C4NII] = ab[IDX_C4NII] * (14.0 * rptr[IDX_ELEM_N] / 62.0 + 48.0 * rptr[IDX_ELEM_C] / 62.0); + ab[IDX_C8II] = ab[IDX_C8II] * (96.0 * rptr[IDX_ELEM_C] / 96.0); + ab[IDX_C9H4II] = ab[IDX_C9H4II] * (108.0 * rptr[IDX_ELEM_C] / 112.0 + 4.0 * rptr[IDX_ELEM_H] / 112.0); + ab[IDX_CH2COII] = ab[IDX_CH2COII] * (16.0 * rptr[IDX_ELEM_O] / 42.0 + 24.0 * rptr[IDX_ELEM_C] / 42.0 + 2.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_CH2PHI] = ab[IDX_CH2PHI] * (31.0 * rptr[IDX_ELEM_P] / 46.0 + 12.0 * rptr[IDX_ELEM_C] / 46.0 + 3.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_CH3C3NI] = ab[IDX_CH3C3NI] * (14.0 * rptr[IDX_ELEM_N] / 65.0 + 48.0 * rptr[IDX_ELEM_C] / 65.0 + 3.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_GC4I] = ab[IDX_GC4I] * (48.0 * rptr[IDX_ELEM_C] / 48.0); + ab[IDX_GCH3CHOI] = ab[IDX_GCH3CHOI] * (16.0 * rptr[IDX_ELEM_O] / 44.0 + 24.0 * rptr[IDX_ELEM_C] / 44.0 + 4.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_GH2COI] = ab[IDX_GH2COI] * (16.0 * rptr[IDX_ELEM_O] / 30.0 + 12.0 * rptr[IDX_ELEM_C] / 30.0 + 2.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_HOCNI] = ab[IDX_HOCNI] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_HPOI] = ab[IDX_HPOI] * (31.0 * rptr[IDX_ELEM_P] / 48.0 + 16.0 * rptr[IDX_ELEM_O] / 48.0 + 1.0 * rptr[IDX_ELEM_H] / 48.0); + ab[IDX_HS2I] = ab[IDX_HS2I] * (64.0 * rptr[IDX_ELEM_S] / 65.0 + 1.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_SiC2II] = ab[IDX_SiC2II] * (28.0 * rptr[IDX_ELEM_Si] / 52.0 + 24.0 * rptr[IDX_ELEM_C] / 52.0); + ab[IDX_SiC2H2II] = ab[IDX_SiC2H2II] * (28.0 * rptr[IDX_ELEM_Si] / 54.0 + 24.0 * rptr[IDX_ELEM_C] / 54.0 + 2.0 * rptr[IDX_ELEM_H] / 54.0); + ab[IDX_C6H4II] = ab[IDX_C6H4II] * (72.0 * rptr[IDX_ELEM_C] / 76.0 + 4.0 * rptr[IDX_ELEM_H] / 76.0); + ab[IDX_CH3COI] = ab[IDX_CH3COI] * (16.0 * rptr[IDX_ELEM_O] / 43.0 + 24.0 * rptr[IDX_ELEM_C] / 43.0 + 3.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_CH3COCH4II] = ab[IDX_CH3COCH4II] * (16.0 * rptr[IDX_ELEM_O] / 59.0 + 36.0 * rptr[IDX_ELEM_C] / 59.0 + 7.0 * rptr[IDX_ELEM_H] / 59.0); + ab[IDX_CH3OHII] = ab[IDX_CH3OHII] * (16.0 * rptr[IDX_ELEM_O] / 32.0 + 12.0 * rptr[IDX_ELEM_C] / 32.0 + 4.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_COOHI] = ab[IDX_COOHI] * (32.0 * rptr[IDX_ELEM_O] / 45.0 + 12.0 * rptr[IDX_ELEM_C] / 45.0 + 1.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_GNOI] = ab[IDX_GNOI] * (14.0 * rptr[IDX_ELEM_N] / 30.0 + 16.0 * rptr[IDX_ELEM_O] / 30.0); + ab[IDX_POII] = ab[IDX_POII] * (31.0 * rptr[IDX_ELEM_P] / 47.0 + 16.0 * rptr[IDX_ELEM_O] / 47.0); + ab[IDX_C7H4II] = ab[IDX_C7H4II] * (84.0 * rptr[IDX_ELEM_C] / 88.0 + 4.0 * rptr[IDX_ELEM_H] / 88.0); + ab[IDX_C7H5II] = ab[IDX_C7H5II] * (84.0 * rptr[IDX_ELEM_C] / 89.0 + 5.0 * rptr[IDX_ELEM_H] / 89.0); + ab[IDX_CH3C6HI] = ab[IDX_CH3C6HI] * (84.0 * rptr[IDX_ELEM_C] / 88.0 + 4.0 * rptr[IDX_ELEM_H] / 88.0); + ab[IDX_H2CSII] = ab[IDX_H2CSII] * (32.0 * rptr[IDX_ELEM_S] / 46.0 + 12.0 * rptr[IDX_ELEM_C] / 46.0 + 2.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_HC9NI] = ab[IDX_HC9NI] * (14.0 * rptr[IDX_ELEM_N] / 123.0 + 108.0 * rptr[IDX_ELEM_C] / 123.0 + 1.0 * rptr[IDX_ELEM_H] / 123.0); + ab[IDX_HCOOCH3I] = ab[IDX_HCOOCH3I] * (32.0 * rptr[IDX_ELEM_O] / 60.0 + 24.0 * rptr[IDX_ELEM_C] / 60.0 + 4.0 * rptr[IDX_ELEM_H] / 60.0); + ab[IDX_NCCNHII] = ab[IDX_NCCNHII] * (28.0 * rptr[IDX_ELEM_N] / 53.0 + 24.0 * rptr[IDX_ELEM_C] / 53.0 + 1.0 * rptr[IDX_ELEM_H] / 53.0); + ab[IDX_NO2I] = ab[IDX_NO2I] * (14.0 * rptr[IDX_ELEM_N] / 46.0 + 32.0 * rptr[IDX_ELEM_O] / 46.0); + ab[IDX_PH2I] = ab[IDX_PH2I] * (31.0 * rptr[IDX_ELEM_P] / 33.0 + 2.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_PNI] = ab[IDX_PNI] * (31.0 * rptr[IDX_ELEM_P] / 45.0 + 14.0 * rptr[IDX_ELEM_N] / 45.0); + ab[IDX_SiC2HI] = ab[IDX_SiC2HI] * (28.0 * rptr[IDX_ELEM_Si] / 53.0 + 24.0 * rptr[IDX_ELEM_C] / 53.0 + 1.0 * rptr[IDX_ELEM_H] / 53.0); + ab[IDX_SiC3I] = ab[IDX_SiC3I] * (28.0 * rptr[IDX_ELEM_Si] / 64.0 + 36.0 * rptr[IDX_ELEM_C] / 64.0); + ab[IDX_C4PI] = ab[IDX_C4PI] * (31.0 * rptr[IDX_ELEM_P] / 79.0 + 48.0 * rptr[IDX_ELEM_C] / 79.0); + ab[IDX_C7II] = ab[IDX_C7II] * (84.0 * rptr[IDX_ELEM_C] / 84.0); + ab[IDX_CH2CNI] = ab[IDX_CH2CNI] * (14.0 * rptr[IDX_ELEM_N] / 40.0 + 24.0 * rptr[IDX_ELEM_C] / 40.0 + 2.0 * rptr[IDX_ELEM_H] / 40.0); + ab[IDX_CH3C4HII] = ab[IDX_CH3C4HII] * (60.0 * rptr[IDX_ELEM_C] / 64.0 + 4.0 * rptr[IDX_ELEM_H] / 64.0); + ab[IDX_GCH4I] = ab[IDX_GCH4I] * (12.0 * rptr[IDX_ELEM_C] / 16.0 + 4.0 * rptr[IDX_ELEM_H] / 16.0); + ab[IDX_HCPI] = ab[IDX_HCPI] * (31.0 * rptr[IDX_ELEM_P] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0 + 1.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_HClI] = ab[IDX_HClI] * (35.0 * rptr[IDX_ELEM_Cl] / 36.0 + 1.0 * rptr[IDX_ELEM_H] / 36.0); + ab[IDX_HNCOI] = ab[IDX_HNCOI] * (14.0 * rptr[IDX_ELEM_N] / 43.0 + 16.0 * rptr[IDX_ELEM_O] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0 + 1.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_C3PI] = ab[IDX_C3PI] * (31.0 * rptr[IDX_ELEM_P] / 67.0 + 36.0 * rptr[IDX_ELEM_C] / 67.0); + ab[IDX_C9NI] = ab[IDX_C9NI] * (14.0 * rptr[IDX_ELEM_N] / 122.0 + 108.0 * rptr[IDX_ELEM_C] / 122.0); + ab[IDX_CH3C4HI] = ab[IDX_CH3C4HI] * (60.0 * rptr[IDX_ELEM_C] / 64.0 + 4.0 * rptr[IDX_ELEM_H] / 64.0); + ab[IDX_CH3COOHI] = ab[IDX_CH3COOHI] * (32.0 * rptr[IDX_ELEM_O] / 60.0 + 24.0 * rptr[IDX_ELEM_C] / 60.0 + 4.0 * rptr[IDX_ELEM_H] / 60.0); + ab[IDX_CH3OCH3I] = ab[IDX_CH3OCH3I] * (16.0 * rptr[IDX_ELEM_O] / 46.0 + 24.0 * rptr[IDX_ELEM_C] / 46.0 + 6.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_GC2HI] = ab[IDX_GC2HI] * (24.0 * rptr[IDX_ELEM_C] / 25.0 + 1.0 * rptr[IDX_ELEM_H] / 25.0); + ab[IDX_GNH2I] = ab[IDX_GNH2I] * (14.0 * rptr[IDX_ELEM_N] / 16.0 + 2.0 * rptr[IDX_ELEM_H] / 16.0); + ab[IDX_H2CSI] = ab[IDX_H2CSI] * (32.0 * rptr[IDX_ELEM_S] / 46.0 + 12.0 * rptr[IDX_ELEM_C] / 46.0 + 2.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_PH2II] = ab[IDX_PH2II] * (31.0 * rptr[IDX_ELEM_P] / 33.0 + 2.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_POI] = ab[IDX_POI] * (31.0 * rptr[IDX_ELEM_P] / 47.0 + 16.0 * rptr[IDX_ELEM_O] / 47.0); + ab[IDX_S2I] = ab[IDX_S2I] * (64.0 * rptr[IDX_ELEM_S] / 64.0); + ab[IDX_S2II] = ab[IDX_S2II] * (64.0 * rptr[IDX_ELEM_S] / 64.0); + ab[IDX_SiCII] = ab[IDX_SiCII] * (28.0 * rptr[IDX_ELEM_Si] / 40.0 + 12.0 * rptr[IDX_ELEM_C] / 40.0); + ab[IDX_C3SI] = ab[IDX_C3SI] * (32.0 * rptr[IDX_ELEM_S] / 68.0 + 36.0 * rptr[IDX_ELEM_C] / 68.0); + ab[IDX_C6H5II] = ab[IDX_C6H5II] * (72.0 * rptr[IDX_ELEM_C] / 77.0 + 5.0 * rptr[IDX_ELEM_H] / 77.0); + ab[IDX_CH2NHI] = ab[IDX_CH2NHI] * (14.0 * rptr[IDX_ELEM_N] / 29.0 + 12.0 * rptr[IDX_ELEM_C] / 29.0 + 3.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_CH3OI] = ab[IDX_CH3OI] * (16.0 * rptr[IDX_ELEM_O] / 31.0 + 12.0 * rptr[IDX_ELEM_C] / 31.0 + 3.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_GHCOI] = ab[IDX_GHCOI] * (16.0 * rptr[IDX_ELEM_O] / 29.0 + 12.0 * rptr[IDX_ELEM_C] / 29.0 + 1.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_HC2PI] = ab[IDX_HC2PI] * (31.0 * rptr[IDX_ELEM_P] / 56.0 + 24.0 * rptr[IDX_ELEM_C] / 56.0 + 1.0 * rptr[IDX_ELEM_H] / 56.0); + ab[IDX_HCSiI] = ab[IDX_HCSiI] * (28.0 * rptr[IDX_ELEM_Si] / 41.0 + 12.0 * rptr[IDX_ELEM_C] / 41.0 + 1.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_SiCH2I] = ab[IDX_SiCH2I] * (28.0 * rptr[IDX_ELEM_Si] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0 + 2.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_C10HII] = ab[IDX_C10HII] * (120.0 * rptr[IDX_ELEM_C] / 121.0 + 1.0 * rptr[IDX_ELEM_H] / 121.0); + ab[IDX_HCSiII] = ab[IDX_HCSiII] * (28.0 * rptr[IDX_ELEM_Si] / 41.0 + 12.0 * rptr[IDX_ELEM_C] / 41.0 + 1.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_OCSII] = ab[IDX_OCSII] * (32.0 * rptr[IDX_ELEM_S] / 60.0 + 16.0 * rptr[IDX_ELEM_O] / 60.0 + 12.0 * rptr[IDX_ELEM_C] / 60.0); + ab[IDX_SiC2I] = ab[IDX_SiC2I] * (28.0 * rptr[IDX_ELEM_Si] / 52.0 + 24.0 * rptr[IDX_ELEM_C] / 52.0); + ab[IDX_C2H6II] = ab[IDX_C2H6II] * (24.0 * rptr[IDX_ELEM_C] / 30.0 + 6.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_C2OI] = ab[IDX_C2OI] * (16.0 * rptr[IDX_ELEM_O] / 40.0 + 24.0 * rptr[IDX_ELEM_C] / 40.0); + ab[IDX_C8HII] = ab[IDX_C8HII] * (96.0 * rptr[IDX_ELEM_C] / 97.0 + 1.0 * rptr[IDX_ELEM_H] / 97.0); + ab[IDX_CH2OHI] = ab[IDX_CH2OHI] * (16.0 * rptr[IDX_ELEM_O] / 31.0 + 12.0 * rptr[IDX_ELEM_C] / 31.0 + 3.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_SiNI] = ab[IDX_SiNI] * (28.0 * rptr[IDX_ELEM_Si] / 42.0 + 14.0 * rptr[IDX_ELEM_N] / 42.0); + ab[IDX_C5H5II] = ab[IDX_C5H5II] * (60.0 * rptr[IDX_ELEM_C] / 65.0 + 5.0 * rptr[IDX_ELEM_H] / 65.0); + ab[IDX_GNHI] = ab[IDX_GNHI] * (14.0 * rptr[IDX_ELEM_N] / 15.0 + 1.0 * rptr[IDX_ELEM_H] / 15.0); + ab[IDX_GSI] = ab[IDX_GSI] * (32.0 * rptr[IDX_ELEM_S] / 32.0); + ab[IDX_HCSI] = ab[IDX_HCSI] * (32.0 * rptr[IDX_ELEM_S] / 45.0 + 12.0 * rptr[IDX_ELEM_C] / 45.0 + 1.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_NSI] = ab[IDX_NSI] * (32.0 * rptr[IDX_ELEM_S] / 46.0 + 14.0 * rptr[IDX_ELEM_N] / 46.0); + ab[IDX_SiC2HII] = ab[IDX_SiC2HII] * (28.0 * rptr[IDX_ELEM_Si] / 53.0 + 24.0 * rptr[IDX_ELEM_C] / 53.0 + 1.0 * rptr[IDX_ELEM_H] / 53.0); + ab[IDX_SiH2I] = ab[IDX_SiH2I] * (28.0 * rptr[IDX_ELEM_Si] / 30.0 + 2.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_C3OI] = ab[IDX_C3OI] * (16.0 * rptr[IDX_ELEM_O] / 52.0 + 36.0 * rptr[IDX_ELEM_C] / 52.0); + ab[IDX_C6HII] = ab[IDX_C6HII] * (72.0 * rptr[IDX_ELEM_C] / 73.0 + 1.0 * rptr[IDX_ELEM_H] / 73.0); + ab[IDX_C9H2I] = ab[IDX_C9H2I] * (108.0 * rptr[IDX_ELEM_C] / 110.0 + 2.0 * rptr[IDX_ELEM_H] / 110.0); + ab[IDX_CH2CHCNI] = ab[IDX_CH2CHCNI] * (14.0 * rptr[IDX_ELEM_N] / 53.0 + 36.0 * rptr[IDX_ELEM_C] / 53.0 + 3.0 * rptr[IDX_ELEM_H] / 53.0); + ab[IDX_CH3CHOHII] = ab[IDX_CH3CHOHII] * (16.0 * rptr[IDX_ELEM_O] / 45.0 + 24.0 * rptr[IDX_ELEM_C] / 45.0 + 5.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_CH3CNHII] = ab[IDX_CH3CNHII] * (14.0 * rptr[IDX_ELEM_N] / 42.0 + 24.0 * rptr[IDX_ELEM_C] / 42.0 + 4.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_CH3COII] = ab[IDX_CH3COII] * (16.0 * rptr[IDX_ELEM_O] / 43.0 + 24.0 * rptr[IDX_ELEM_C] / 43.0 + 3.0 * rptr[IDX_ELEM_H] / 43.0); + ab[IDX_HC7NI] = ab[IDX_HC7NI] * (14.0 * rptr[IDX_ELEM_N] / 99.0 + 84.0 * rptr[IDX_ELEM_C] / 99.0 + 1.0 * rptr[IDX_ELEM_H] / 99.0); + ab[IDX_C6II] = ab[IDX_C6II] * (72.0 * rptr[IDX_ELEM_C] / 72.0); + ab[IDX_C6H6I] = ab[IDX_C6H6I] * (72.0 * rptr[IDX_ELEM_C] / 78.0 + 6.0 * rptr[IDX_ELEM_H] / 78.0); + ab[IDX_C7NI] = ab[IDX_C7NI] * (14.0 * rptr[IDX_ELEM_N] / 98.0 + 84.0 * rptr[IDX_ELEM_C] / 98.0); + ab[IDX_HCOOHI] = ab[IDX_HCOOHI] * (32.0 * rptr[IDX_ELEM_O] / 46.0 + 12.0 * rptr[IDX_ELEM_C] / 46.0 + 2.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_SiH2II] = ab[IDX_SiH2II] * (28.0 * rptr[IDX_ELEM_Si] / 30.0 + 2.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_SiH3II] = ab[IDX_SiH3II] * (28.0 * rptr[IDX_ELEM_Si] / 31.0 + 3.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_C10H2I] = ab[IDX_C10H2I] * (120.0 * rptr[IDX_ELEM_C] / 122.0 + 2.0 * rptr[IDX_ELEM_H] / 122.0); + ab[IDX_C4II] = ab[IDX_C4II] * (48.0 * rptr[IDX_ELEM_C] / 48.0); + ab[IDX_CCPI] = ab[IDX_CCPI] * (31.0 * rptr[IDX_ELEM_P] / 55.0 + 24.0 * rptr[IDX_ELEM_C] / 55.0); + ab[IDX_CPI] = ab[IDX_CPI] * (31.0 * rptr[IDX_ELEM_P] / 43.0 + 12.0 * rptr[IDX_ELEM_C] / 43.0); + ab[IDX_GC3I] = ab[IDX_GC3I] * (36.0 * rptr[IDX_ELEM_C] / 36.0); + ab[IDX_O2HI] = ab[IDX_O2HI] * (32.0 * rptr[IDX_ELEM_O] / 33.0 + 1.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_SO2I] = ab[IDX_SO2I] * (32.0 * rptr[IDX_ELEM_S] / 64.0 + 32.0 * rptr[IDX_ELEM_O] / 64.0); + ab[IDX_SiCI] = ab[IDX_SiCI] * (28.0 * rptr[IDX_ELEM_Si] / 40.0 + 12.0 * rptr[IDX_ELEM_C] / 40.0); + ab[IDX_C2H5OHI] = ab[IDX_C2H5OHI] * (16.0 * rptr[IDX_ELEM_O] / 46.0 + 24.0 * rptr[IDX_ELEM_C] / 46.0 + 6.0 * rptr[IDX_ELEM_H] / 46.0); + ab[IDX_HNOI] = ab[IDX_HNOI] * (14.0 * rptr[IDX_ELEM_N] / 31.0 + 16.0 * rptr[IDX_ELEM_O] / 31.0 + 1.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_N2OI] = ab[IDX_N2OI] * (28.0 * rptr[IDX_ELEM_N] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0); + ab[IDX_SiH3I] = ab[IDX_SiH3I] * (28.0 * rptr[IDX_ELEM_Si] / 31.0 + 3.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_CH3OH2II] = ab[IDX_CH3OH2II] * (16.0 * rptr[IDX_ELEM_O] / 33.0 + 12.0 * rptr[IDX_ELEM_C] / 33.0 + 5.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_C2NII] = ab[IDX_C2NII] * (14.0 * rptr[IDX_ELEM_N] / 38.0 + 24.0 * rptr[IDX_ELEM_C] / 38.0); + ab[IDX_C5II] = ab[IDX_C5II] * (60.0 * rptr[IDX_ELEM_C] / 60.0); + ab[IDX_C6H3II] = ab[IDX_C6H3II] * (72.0 * rptr[IDX_ELEM_C] / 75.0 + 3.0 * rptr[IDX_ELEM_H] / 75.0); + ab[IDX_C8H3II] = ab[IDX_C8H3II] * (96.0 * rptr[IDX_ELEM_C] / 99.0 + 3.0 * rptr[IDX_ELEM_H] / 99.0); + ab[IDX_C9HII] = ab[IDX_C9HII] * (108.0 * rptr[IDX_ELEM_C] / 109.0 + 1.0 * rptr[IDX_ELEM_H] / 109.0); + ab[IDX_C9H3II] = ab[IDX_C9H3II] * (108.0 * rptr[IDX_ELEM_C] / 111.0 + 3.0 * rptr[IDX_ELEM_H] / 111.0); + ab[IDX_CH2COI] = ab[IDX_CH2COI] * (16.0 * rptr[IDX_ELEM_O] / 42.0 + 24.0 * rptr[IDX_ELEM_C] / 42.0 + 2.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_HNC3I] = ab[IDX_HNC3I] * (14.0 * rptr[IDX_ELEM_N] / 51.0 + 36.0 * rptr[IDX_ELEM_C] / 51.0 + 1.0 * rptr[IDX_ELEM_H] / 51.0); + ab[IDX_OCNI] = ab[IDX_OCNI] * (14.0 * rptr[IDX_ELEM_N] / 42.0 + 16.0 * rptr[IDX_ELEM_O] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0); + ab[IDX_SiCH2II] = ab[IDX_SiCH2II] * (28.0 * rptr[IDX_ELEM_Si] / 42.0 + 12.0 * rptr[IDX_ELEM_C] / 42.0 + 2.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_SiHII] = ab[IDX_SiHII] * (28.0 * rptr[IDX_ELEM_Si] / 29.0 + 1.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_CH3COCH3I] = ab[IDX_CH3COCH3I] * (16.0 * rptr[IDX_ELEM_O] / 58.0 + 36.0 * rptr[IDX_ELEM_C] / 58.0 + 6.0 * rptr[IDX_ELEM_H] / 58.0); + ab[IDX_HC3NII] = ab[IDX_HC3NII] * (14.0 * rptr[IDX_ELEM_N] / 51.0 + 36.0 * rptr[IDX_ELEM_C] / 51.0 + 1.0 * rptr[IDX_ELEM_H] / 51.0); + ab[IDX_C8H2I] = ab[IDX_C8H2I] * (96.0 * rptr[IDX_ELEM_C] / 98.0 + 2.0 * rptr[IDX_ELEM_H] / 98.0); + ab[IDX_CO2II] = ab[IDX_CO2II] * (32.0 * rptr[IDX_ELEM_O] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0); + ab[IDX_GOHI] = ab[IDX_GOHI] * (16.0 * rptr[IDX_ELEM_O] / 17.0 + 1.0 * rptr[IDX_ELEM_H] / 17.0); + ab[IDX_HC5NI] = ab[IDX_HC5NI] * (14.0 * rptr[IDX_ELEM_N] / 75.0 + 60.0 * rptr[IDX_ELEM_C] / 75.0 + 1.0 * rptr[IDX_ELEM_H] / 75.0); + ab[IDX_SiHI] = ab[IDX_SiHI] * (28.0 * rptr[IDX_ELEM_Si] / 29.0 + 1.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_SiH4I] = ab[IDX_SiH4I] * (28.0 * rptr[IDX_ELEM_Si] / 32.0 + 4.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_C7HII] = ab[IDX_C7HII] * (84.0 * rptr[IDX_ELEM_C] / 85.0 + 1.0 * rptr[IDX_ELEM_H] / 85.0); + ab[IDX_C9H2II] = ab[IDX_C9H2II] * (108.0 * rptr[IDX_ELEM_C] / 110.0 + 2.0 * rptr[IDX_ELEM_H] / 110.0); + ab[IDX_PHI] = ab[IDX_PHI] * (31.0 * rptr[IDX_ELEM_P] / 32.0 + 1.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_C7H2I] = ab[IDX_C7H2I] * (84.0 * rptr[IDX_ELEM_C] / 86.0 + 2.0 * rptr[IDX_ELEM_H] / 86.0); + ab[IDX_GCOI] = ab[IDX_GCOI] * (16.0 * rptr[IDX_ELEM_O] / 28.0 + 12.0 * rptr[IDX_ELEM_C] / 28.0); + ab[IDX_HCSII] = ab[IDX_HCSII] * (32.0 * rptr[IDX_ELEM_S] / 45.0 + 12.0 * rptr[IDX_ELEM_C] / 45.0 + 1.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_PHII] = ab[IDX_PHII] * (31.0 * rptr[IDX_ELEM_P] / 32.0 + 1.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_C3H4II] = ab[IDX_C3H4II] * (36.0 * rptr[IDX_ELEM_C] / 40.0 + 4.0 * rptr[IDX_ELEM_H] / 40.0); + ab[IDX_C8H2II] = ab[IDX_C8H2II] * (96.0 * rptr[IDX_ELEM_C] / 98.0 + 2.0 * rptr[IDX_ELEM_H] / 98.0); + ab[IDX_GCH2I] = ab[IDX_GCH2I] * (12.0 * rptr[IDX_ELEM_C] / 14.0 + 2.0 * rptr[IDX_ELEM_H] / 14.0); + ab[IDX_HCO2II] = ab[IDX_HCO2II] * (32.0 * rptr[IDX_ELEM_O] / 45.0 + 12.0 * rptr[IDX_ELEM_C] / 45.0 + 1.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_C5H3II] = ab[IDX_C5H3II] * (60.0 * rptr[IDX_ELEM_C] / 63.0 + 3.0 * rptr[IDX_ELEM_H] / 63.0); + ab[IDX_HC3NHII] = ab[IDX_HC3NHII] * (14.0 * rptr[IDX_ELEM_N] / 52.0 + 36.0 * rptr[IDX_ELEM_C] / 52.0 + 2.0 * rptr[IDX_ELEM_H] / 52.0); + ab[IDX_C5HII] = ab[IDX_C5HII] * (60.0 * rptr[IDX_ELEM_C] / 61.0 + 1.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_CH3CHOI] = ab[IDX_CH3CHOI] * (16.0 * rptr[IDX_ELEM_O] / 44.0 + 24.0 * rptr[IDX_ELEM_C] / 44.0 + 4.0 * rptr[IDX_ELEM_H] / 44.0); + ab[IDX_CSII] = ab[IDX_CSII] * (32.0 * rptr[IDX_ELEM_S] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0); + ab[IDX_C3H5II] = ab[IDX_C3H5II] * (36.0 * rptr[IDX_ELEM_C] / 41.0 + 5.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_C7H3II] = ab[IDX_C7H3II] * (84.0 * rptr[IDX_ELEM_C] / 87.0 + 3.0 * rptr[IDX_ELEM_H] / 87.0); + ab[IDX_PII] = ab[IDX_PII] * (31.0 * rptr[IDX_ELEM_P] / 31.0); + ab[IDX_CH3CNI] = ab[IDX_CH3CNI] * (14.0 * rptr[IDX_ELEM_N] / 41.0 + 24.0 * rptr[IDX_ELEM_C] / 41.0 + 3.0 * rptr[IDX_ELEM_H] / 41.0); + ab[IDX_NCCNI] = ab[IDX_NCCNI] * (28.0 * rptr[IDX_ELEM_N] / 52.0 + 24.0 * rptr[IDX_ELEM_C] / 52.0); + ab[IDX_C7H2II] = ab[IDX_C7H2II] * (84.0 * rptr[IDX_ELEM_C] / 86.0 + 2.0 * rptr[IDX_ELEM_H] / 86.0); + ab[IDX_GC2I] = ab[IDX_GC2I] * (24.0 * rptr[IDX_ELEM_C] / 24.0); + ab[IDX_C3II] = ab[IDX_C3II] * (36.0 * rptr[IDX_ELEM_C] / 36.0); + ab[IDX_H3SII] = ab[IDX_H3SII] * (32.0 * rptr[IDX_ELEM_S] / 35.0 + 3.0 * rptr[IDX_ELEM_H] / 35.0); + ab[IDX_O2HII] = ab[IDX_O2HII] * (32.0 * rptr[IDX_ELEM_O] / 33.0 + 1.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_C6H2II] = ab[IDX_C6H2II] * (72.0 * rptr[IDX_ELEM_C] / 74.0 + 2.0 * rptr[IDX_ELEM_H] / 74.0); + ab[IDX_CH4II] = ab[IDX_CH4II] * (12.0 * rptr[IDX_ELEM_C] / 16.0 + 4.0 * rptr[IDX_ELEM_H] / 16.0); + ab[IDX_HNOII] = ab[IDX_HNOII] * (14.0 * rptr[IDX_ELEM_N] / 31.0 + 16.0 * rptr[IDX_ELEM_O] / 31.0 + 1.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_H2CCCI] = ab[IDX_H2CCCI] * (36.0 * rptr[IDX_ELEM_C] / 38.0 + 2.0 * rptr[IDX_ELEM_H] / 38.0); + ab[IDX_C6H2I] = ab[IDX_C6H2I] * (72.0 * rptr[IDX_ELEM_C] / 74.0 + 2.0 * rptr[IDX_ELEM_H] / 74.0); + ab[IDX_GCNI] = ab[IDX_GCNI] * (14.0 * rptr[IDX_ELEM_N] / 26.0 + 12.0 * rptr[IDX_ELEM_C] / 26.0); + ab[IDX_C2H5II] = ab[IDX_C2H5II] * (24.0 * rptr[IDX_ELEM_C] / 29.0 + 5.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_C5H2I] = ab[IDX_C5H2I] * (60.0 * rptr[IDX_ELEM_C] / 62.0 + 2.0 * rptr[IDX_ELEM_H] / 62.0); + ab[IDX_C5H2II] = ab[IDX_C5H2II] * (60.0 * rptr[IDX_ELEM_C] / 62.0 + 2.0 * rptr[IDX_ELEM_H] / 62.0); + ab[IDX_CH2CCH2I] = ab[IDX_CH2CCH2I] * (36.0 * rptr[IDX_ELEM_C] / 40.0 + 4.0 * rptr[IDX_ELEM_H] / 40.0); + ab[IDX_CNII] = ab[IDX_CNII] * (14.0 * rptr[IDX_ELEM_N] / 26.0 + 12.0 * rptr[IDX_ELEM_C] / 26.0); + ab[IDX_C2H6I] = ab[IDX_C2H6I] * (24.0 * rptr[IDX_ELEM_C] / 30.0 + 6.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_GNI] = ab[IDX_GNI] * (14.0 * rptr[IDX_ELEM_N] / 14.0); + ab[IDX_C3H2I] = ab[IDX_C3H2I] * (36.0 * rptr[IDX_ELEM_C] / 38.0 + 2.0 * rptr[IDX_ELEM_H] / 38.0); + ab[IDX_C2H5I] = ab[IDX_C2H5I] * (24.0 * rptr[IDX_ELEM_C] / 29.0 + 5.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_GOI] = ab[IDX_GOI] * (16.0 * rptr[IDX_ELEM_O] / 16.0); + ab[IDX_N2II] = ab[IDX_N2II] * (28.0 * rptr[IDX_ELEM_N] / 28.0); + ab[IDX_C4SII] = ab[IDX_C4SII] * (32.0 * rptr[IDX_ELEM_S] / 80.0 + 48.0 * rptr[IDX_ELEM_C] / 80.0); + ab[IDX_HCNII] = ab[IDX_HCNII] * (14.0 * rptr[IDX_ELEM_N] / 27.0 + 12.0 * rptr[IDX_ELEM_C] / 27.0 + 1.0 * rptr[IDX_ELEM_H] / 27.0); + ab[IDX_CH3CHCH2I] = ab[IDX_CH3CHCH2I] * (36.0 * rptr[IDX_ELEM_C] / 42.0 + 6.0 * rptr[IDX_ELEM_H] / 42.0); + ab[IDX_C2II] = ab[IDX_C2II] * (24.0 * rptr[IDX_ELEM_C] / 24.0); + ab[IDX_C4HII] = ab[IDX_C4HII] * (48.0 * rptr[IDX_ELEM_C] / 49.0 + 1.0 * rptr[IDX_ELEM_H] / 49.0); + ab[IDX_CNCII] = ab[IDX_CNCII] * (14.0 * rptr[IDX_ELEM_N] / 38.0 + 24.0 * rptr[IDX_ELEM_C] / 38.0); + ab[IDX_HSII] = ab[IDX_HSII] * (32.0 * rptr[IDX_ELEM_S] / 33.0 + 1.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_NHII] = ab[IDX_NHII] * (14.0 * rptr[IDX_ELEM_N] / 15.0 + 1.0 * rptr[IDX_ELEM_H] / 15.0); + ab[IDX_O2M] = ab[IDX_O2M] * (32.0 * rptr[IDX_ELEM_O] / 32.0); + ab[IDX_CHM] = ab[IDX_CHM] * (12.0 * rptr[IDX_ELEM_C] / 13.0 + 1.0 * rptr[IDX_ELEM_H] / 13.0); + ab[IDX_H2II] = ab[IDX_H2II] * (2.0 * rptr[IDX_ELEM_H] / 2.0); + ab[IDX_OCSI] = ab[IDX_OCSI] * (32.0 * rptr[IDX_ELEM_S] / 60.0 + 16.0 * rptr[IDX_ELEM_O] / 60.0 + 12.0 * rptr[IDX_ELEM_C] / 60.0); + ab[IDX_GCH3I] = ab[IDX_GCH3I] * (12.0 * rptr[IDX_ELEM_C] / 15.0 + 3.0 * rptr[IDX_ELEM_H] / 15.0); + ab[IDX_NH2II] = ab[IDX_NH2II] * (14.0 * rptr[IDX_ELEM_N] / 16.0 + 2.0 * rptr[IDX_ELEM_H] / 16.0); + ab[IDX_PI] = ab[IDX_PI] * (31.0 * rptr[IDX_ELEM_P] / 31.0); + ab[IDX_SM] = ab[IDX_SM] * (32.0 * rptr[IDX_ELEM_S] / 32.0); + ab[IDX_SiSII] = ab[IDX_SiSII] * (28.0 * rptr[IDX_ELEM_Si] / 60.0 + 32.0 * rptr[IDX_ELEM_S] / 60.0); + ab[IDX_C2HM] = ab[IDX_C2HM] * (24.0 * rptr[IDX_ELEM_C] / 25.0 + 1.0 * rptr[IDX_ELEM_H] / 25.0); + ab[IDX_C4HM] = ab[IDX_C4HM] * (48.0 * rptr[IDX_ELEM_C] / 49.0 + 1.0 * rptr[IDX_ELEM_H] / 49.0); + ab[IDX_COII] = ab[IDX_COII] * (16.0 * rptr[IDX_ELEM_O] / 28.0 + 12.0 * rptr[IDX_ELEM_C] / 28.0); + ab[IDX_CH3CCHI] = ab[IDX_CH3CCHI] * (36.0 * rptr[IDX_ELEM_C] / 40.0 + 4.0 * rptr[IDX_ELEM_H] / 40.0); + ab[IDX_CH5II] = ab[IDX_CH5II] * (12.0 * rptr[IDX_ELEM_C] / 17.0 + 5.0 * rptr[IDX_ELEM_H] / 17.0); + ab[IDX_HC2SII] = ab[IDX_HC2SII] * (32.0 * rptr[IDX_ELEM_S] / 57.0 + 24.0 * rptr[IDX_ELEM_C] / 57.0 + 1.0 * rptr[IDX_ELEM_H] / 57.0); + ab[IDX_OHM] = ab[IDX_OHM] * (16.0 * rptr[IDX_ELEM_O] / 17.0 + 1.0 * rptr[IDX_ELEM_H] / 17.0); + ab[IDX_C10HM] = ab[IDX_C10HM] * (120.0 * rptr[IDX_ELEM_C] / 121.0 + 1.0 * rptr[IDX_ELEM_H] / 121.0); + ab[IDX_C3HM] = ab[IDX_C3HM] * (36.0 * rptr[IDX_ELEM_C] / 37.0 + 1.0 * rptr[IDX_ELEM_H] / 37.0); + ab[IDX_C4SI] = ab[IDX_C4SI] * (32.0 * rptr[IDX_ELEM_S] / 80.0 + 48.0 * rptr[IDX_ELEM_C] / 80.0); + ab[IDX_C6HM] = ab[IDX_C6HM] * (72.0 * rptr[IDX_ELEM_C] / 73.0 + 1.0 * rptr[IDX_ELEM_H] / 73.0); + ab[IDX_C8HM] = ab[IDX_C8HM] * (96.0 * rptr[IDX_ELEM_C] / 97.0 + 1.0 * rptr[IDX_ELEM_H] / 97.0); + ab[IDX_C7HM] = ab[IDX_C7HM] * (84.0 * rptr[IDX_ELEM_C] / 85.0 + 1.0 * rptr[IDX_ELEM_H] / 85.0); + ab[IDX_C9HM] = ab[IDX_C9HM] * (108.0 * rptr[IDX_ELEM_C] / 109.0 + 1.0 * rptr[IDX_ELEM_H] / 109.0); + ab[IDX_C10M] = ab[IDX_C10M] * (120.0 * rptr[IDX_ELEM_C] / 120.0); + ab[IDX_C5HM] = ab[IDX_C5HM] * (60.0 * rptr[IDX_ELEM_C] / 61.0 + 1.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_C5NM] = ab[IDX_C5NM] * (14.0 * rptr[IDX_ELEM_N] / 74.0 + 60.0 * rptr[IDX_ELEM_C] / 74.0); + ab[IDX_HSI] = ab[IDX_HSI] * (32.0 * rptr[IDX_ELEM_S] / 33.0 + 1.0 * rptr[IDX_ELEM_H] / 33.0); + ab[IDX_CM] = ab[IDX_CM] * (12.0 * rptr[IDX_ELEM_C] / 12.0); + ab[IDX_CSI] = ab[IDX_CSI] * (32.0 * rptr[IDX_ELEM_S] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0); + ab[IDX_OM] = ab[IDX_OM] * (16.0 * rptr[IDX_ELEM_O] / 16.0); + ab[IDX_C9M] = ab[IDX_C9M] * (108.0 * rptr[IDX_ELEM_C] / 108.0); + ab[IDX_CH3OHI] = ab[IDX_CH3OHI] * (16.0 * rptr[IDX_ELEM_O] / 32.0 + 12.0 * rptr[IDX_ELEM_C] / 32.0 + 4.0 * rptr[IDX_ELEM_H] / 32.0); + ab[IDX_HM] = ab[IDX_HM] * (1.0 * rptr[IDX_ELEM_H] / 1.0); + ab[IDX_HC3NI] = ab[IDX_HC3NI] * (14.0 * rptr[IDX_ELEM_N] / 51.0 + 36.0 * rptr[IDX_ELEM_C] / 51.0 + 1.0 * rptr[IDX_ELEM_H] / 51.0); + ab[IDX_SiSI] = ab[IDX_SiSI] * (28.0 * rptr[IDX_ELEM_Si] / 60.0 + 32.0 * rptr[IDX_ELEM_S] / 60.0); + ab[IDX_C3HII] = ab[IDX_C3HII] * (36.0 * rptr[IDX_ELEM_C] / 37.0 + 1.0 * rptr[IDX_ELEM_H] / 37.0); + ab[IDX_C3H3II] = ab[IDX_C3H3II] * (36.0 * rptr[IDX_ELEM_C] / 39.0 + 3.0 * rptr[IDX_ELEM_H] / 39.0); + ab[IDX_C8M] = ab[IDX_C8M] * (96.0 * rptr[IDX_ELEM_C] / 96.0); + ab[IDX_C2M] = ab[IDX_C2M] * (24.0 * rptr[IDX_ELEM_C] / 24.0); + ab[IDX_C2SI] = ab[IDX_C2SI] * (32.0 * rptr[IDX_ELEM_S] / 56.0 + 24.0 * rptr[IDX_ELEM_C] / 56.0); + ab[IDX_C3M] = ab[IDX_C3M] * (36.0 * rptr[IDX_ELEM_C] / 36.0); + ab[IDX_C4M] = ab[IDX_C4M] * (48.0 * rptr[IDX_ELEM_C] / 48.0); + ab[IDX_C6M] = ab[IDX_C6M] * (72.0 * rptr[IDX_ELEM_C] / 72.0); + ab[IDX_H3COII] = ab[IDX_H3COII] * (16.0 * rptr[IDX_ELEM_O] / 31.0 + 12.0 * rptr[IDX_ELEM_C] / 31.0 + 3.0 * rptr[IDX_ELEM_H] / 31.0); + ab[IDX_C5M] = ab[IDX_C5M] * (60.0 * rptr[IDX_ELEM_C] / 60.0); + ab[IDX_C7M] = ab[IDX_C7M] * (84.0 * rptr[IDX_ELEM_C] / 84.0); + ab[IDX_SiOII] = ab[IDX_SiOII] * (28.0 * rptr[IDX_ELEM_Si] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0); + ab[IDX_C2NI] = ab[IDX_C2NI] * (14.0 * rptr[IDX_ELEM_N] / 38.0 + 24.0 * rptr[IDX_ELEM_C] / 38.0); + ab[IDX_GCHI] = ab[IDX_GCHI] * (12.0 * rptr[IDX_ELEM_C] / 13.0 + 1.0 * rptr[IDX_ELEM_H] / 13.0); + ab[IDX_SiOHII] = ab[IDX_SiOHII] * (28.0 * rptr[IDX_ELEM_Si] / 45.0 + 16.0 * rptr[IDX_ELEM_O] / 45.0 + 1.0 * rptr[IDX_ELEM_H] / 45.0); + ab[IDX_NH2I] = ab[IDX_NH2I] * (14.0 * rptr[IDX_ELEM_N] / 16.0 + 2.0 * rptr[IDX_ELEM_H] / 16.0); + ab[IDX_C4H3I] = ab[IDX_C4H3I] * (48.0 * rptr[IDX_ELEM_C] / 51.0 + 3.0 * rptr[IDX_ELEM_H] / 51.0); + ab[IDX_C2HII] = ab[IDX_C2HII] * (24.0 * rptr[IDX_ELEM_C] / 25.0 + 1.0 * rptr[IDX_ELEM_H] / 25.0); + ab[IDX_C3H2II] = ab[IDX_C3H2II] * (36.0 * rptr[IDX_ELEM_C] / 38.0 + 2.0 * rptr[IDX_ELEM_H] / 38.0); + ab[IDX_C5NI] = ab[IDX_C5NI] * (14.0 * rptr[IDX_ELEM_N] / 74.0 + 60.0 * rptr[IDX_ELEM_C] / 74.0); + ab[IDX_CH2II] = ab[IDX_CH2II] * (12.0 * rptr[IDX_ELEM_C] / 14.0 + 2.0 * rptr[IDX_ELEM_H] / 14.0); + ab[IDX_OHII] = ab[IDX_OHII] * (16.0 * rptr[IDX_ELEM_O] / 17.0 + 1.0 * rptr[IDX_ELEM_H] / 17.0); + ab[IDX_H2OII] = ab[IDX_H2OII] * (16.0 * rptr[IDX_ELEM_O] / 18.0 + 2.0 * rptr[IDX_ELEM_H] / 18.0); + ab[IDX_C3NM] = ab[IDX_C3NM] * (14.0 * rptr[IDX_ELEM_N] / 50.0 + 36.0 * rptr[IDX_ELEM_C] / 50.0); + ab[IDX_GH2I] = ab[IDX_GH2I] * (2.0 * rptr[IDX_ELEM_H] / 2.0); + ab[IDX_C3NI] = ab[IDX_C3NI] * (14.0 * rptr[IDX_ELEM_N] / 50.0 + 36.0 * rptr[IDX_ELEM_C] / 50.0); + ab[IDX_CHII] = ab[IDX_CHII] * (12.0 * rptr[IDX_ELEM_C] / 13.0 + 1.0 * rptr[IDX_ELEM_H] / 13.0); + ab[IDX_CO2I] = ab[IDX_CO2I] * (32.0 * rptr[IDX_ELEM_O] / 44.0 + 12.0 * rptr[IDX_ELEM_C] / 44.0); + ab[IDX_O2II] = ab[IDX_O2II] * (32.0 * rptr[IDX_ELEM_O] / 32.0); + ab[IDX_C10HI] = ab[IDX_C10HI] * (120.0 * rptr[IDX_ELEM_C] / 121.0 + 1.0 * rptr[IDX_ELEM_H] / 121.0); + ab[IDX_C9HI] = ab[IDX_C9HI] * (108.0 * rptr[IDX_ELEM_C] / 109.0 + 1.0 * rptr[IDX_ELEM_H] / 109.0); + ab[IDX_SiOI] = ab[IDX_SiOI] * (28.0 * rptr[IDX_ELEM_Si] / 44.0 + 16.0 * rptr[IDX_ELEM_O] / 44.0); + ab[IDX_FeII] = ab[IDX_FeII] * (56.0 * rptr[IDX_ELEM_Fe] / 56.0); + ab[IDX_FeI] = ab[IDX_FeI] * (56.0 * rptr[IDX_ELEM_Fe] / 56.0); + ab[IDX_MgII] = ab[IDX_MgII] * (24.0 * rptr[IDX_ELEM_Mg] / 24.0); + ab[IDX_NaII] = ab[IDX_NaII] * (23.0 * rptr[IDX_ELEM_Na] / 23.0); + ab[IDX_MgI] = ab[IDX_MgI] * (24.0 * rptr[IDX_ELEM_Mg] / 24.0); + ab[IDX_NaI] = ab[IDX_NaI] * (23.0 * rptr[IDX_ELEM_Na] / 23.0); + ab[IDX_C10I] = ab[IDX_C10I] * (120.0 * rptr[IDX_ELEM_C] / 120.0); + ab[IDX_C8HI] = ab[IDX_C8HI] * (96.0 * rptr[IDX_ELEM_C] / 97.0 + 1.0 * rptr[IDX_ELEM_H] / 97.0); + ab[IDX_C7I] = ab[IDX_C7I] * (84.0 * rptr[IDX_ELEM_C] / 84.0); + ab[IDX_C9I] = ab[IDX_C9I] * (108.0 * rptr[IDX_ELEM_C] / 108.0); + ab[IDX_C8I] = ab[IDX_C8I] * (96.0 * rptr[IDX_ELEM_C] / 96.0); + ab[IDX_GCI] = ab[IDX_GCI] * (12.0 * rptr[IDX_ELEM_C] / 12.0); + ab[IDX_NHI] = ab[IDX_NHI] * (14.0 * rptr[IDX_ELEM_N] / 15.0 + 1.0 * rptr[IDX_ELEM_H] / 15.0); + ab[IDX_C5I] = ab[IDX_C5I] * (60.0 * rptr[IDX_ELEM_C] / 60.0); + ab[IDX_C6I] = ab[IDX_C6I] * (72.0 * rptr[IDX_ELEM_C] / 72.0); + ab[IDX_CNM] = ab[IDX_CNM] * (14.0 * rptr[IDX_ELEM_N] / 26.0 + 12.0 * rptr[IDX_ELEM_C] / 26.0); + ab[IDX_C4I] = ab[IDX_C4I] * (48.0 * rptr[IDX_ELEM_C] / 48.0); + ab[IDX_SOI] = ab[IDX_SOI] * (32.0 * rptr[IDX_ELEM_S] / 48.0 + 16.0 * rptr[IDX_ELEM_O] / 48.0); + ab[IDX_C7HI] = ab[IDX_C7HI] * (84.0 * rptr[IDX_ELEM_C] / 85.0 + 1.0 * rptr[IDX_ELEM_H] / 85.0); + ab[IDX_C2H4II] = ab[IDX_C2H4II] * (24.0 * rptr[IDX_ELEM_C] / 28.0 + 4.0 * rptr[IDX_ELEM_H] / 28.0); + ab[IDX_C4H3II] = ab[IDX_C4H3II] * (48.0 * rptr[IDX_ELEM_C] / 51.0 + 3.0 * rptr[IDX_ELEM_H] / 51.0); + ab[IDX_N2HII] = ab[IDX_N2HII] * (28.0 * rptr[IDX_ELEM_N] / 29.0 + 1.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_CH2CCHI] = ab[IDX_CH2CCHI] * (36.0 * rptr[IDX_ELEM_C] / 39.0 + 3.0 * rptr[IDX_ELEM_H] / 39.0); + ab[IDX_SOII] = ab[IDX_SOII] * (32.0 * rptr[IDX_ELEM_S] / 48.0 + 16.0 * rptr[IDX_ELEM_O] / 48.0); + ab[IDX_CH2CCHII] = ab[IDX_CH2CCHII] * (36.0 * rptr[IDX_ELEM_C] / 39.0 + 3.0 * rptr[IDX_ELEM_H] / 39.0); + ab[IDX_C6HI] = ab[IDX_C6HI] * (72.0 * rptr[IDX_ELEM_C] / 73.0 + 1.0 * rptr[IDX_ELEM_H] / 73.0); + ab[IDX_C5HI] = ab[IDX_C5HI] * (60.0 * rptr[IDX_ELEM_C] / 61.0 + 1.0 * rptr[IDX_ELEM_H] / 61.0); + ab[IDX_H2SII] = ab[IDX_H2SII] * (32.0 * rptr[IDX_ELEM_S] / 34.0 + 2.0 * rptr[IDX_ELEM_H] / 34.0); + ab[IDX_NII] = ab[IDX_NII] * (14.0 * rptr[IDX_ELEM_N] / 14.0); + ab[IDX_C3HI] = ab[IDX_C3HI] * (36.0 * rptr[IDX_ELEM_C] / 37.0 + 1.0 * rptr[IDX_ELEM_H] / 37.0); + ab[IDX_H2COII] = ab[IDX_H2COII] * (16.0 * rptr[IDX_ELEM_O] / 30.0 + 12.0 * rptr[IDX_ELEM_C] / 30.0 + 2.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_C3I] = ab[IDX_C3I] * (36.0 * rptr[IDX_ELEM_C] / 36.0); + ab[IDX_C4HI] = ab[IDX_C4HI] * (48.0 * rptr[IDX_ELEM_C] / 49.0 + 1.0 * rptr[IDX_ELEM_H] / 49.0); + ab[IDX_NOII] = ab[IDX_NOII] * (14.0 * rptr[IDX_ELEM_N] / 30.0 + 16.0 * rptr[IDX_ELEM_O] / 30.0); + ab[IDX_OII] = ab[IDX_OII] * (16.0 * rptr[IDX_ELEM_O] / 16.0); + ab[IDX_C4H2I] = ab[IDX_C4H2I] * (48.0 * rptr[IDX_ELEM_C] / 50.0 + 2.0 * rptr[IDX_ELEM_H] / 50.0); + ab[IDX_C4H2II] = ab[IDX_C4H2II] * (48.0 * rptr[IDX_ELEM_C] / 50.0 + 2.0 * rptr[IDX_ELEM_H] / 50.0); + ab[IDX_HCNHII] = ab[IDX_HCNHII] * (14.0 * rptr[IDX_ELEM_N] / 28.0 + 12.0 * rptr[IDX_ELEM_C] / 28.0 + 2.0 * rptr[IDX_ELEM_H] / 28.0); + ab[IDX_CH2I] = ab[IDX_CH2I] * (12.0 * rptr[IDX_ELEM_C] / 14.0 + 2.0 * rptr[IDX_ELEM_H] / 14.0); + ab[IDX_HNCI] = ab[IDX_HNCI] * (14.0 * rptr[IDX_ELEM_N] / 27.0 + 12.0 * rptr[IDX_ELEM_C] / 27.0 + 1.0 * rptr[IDX_ELEM_H] / 27.0); + ab[IDX_NH3II] = ab[IDX_NH3II] * (14.0 * rptr[IDX_ELEM_N] / 17.0 + 3.0 * rptr[IDX_ELEM_H] / 17.0); + ab[IDX_C2H4I] = ab[IDX_C2H4I] * (24.0 * rptr[IDX_ELEM_C] / 28.0 + 4.0 * rptr[IDX_ELEM_H] / 28.0); + ab[IDX_C2H3I] = ab[IDX_C2H3I] * (24.0 * rptr[IDX_ELEM_C] / 27.0 + 3.0 * rptr[IDX_ELEM_H] / 27.0); + ab[IDX_NH4II] = ab[IDX_NH4II] * (14.0 * rptr[IDX_ELEM_N] / 18.0 + 4.0 * rptr[IDX_ELEM_H] / 18.0); + ab[IDX_N2I] = ab[IDX_N2I] * (28.0 * rptr[IDX_ELEM_N] / 28.0); + ab[IDX_O2I] = ab[IDX_O2I] * (32.0 * rptr[IDX_ELEM_O] / 32.0); + ab[IDX_SiII] = ab[IDX_SiII] * (28.0 * rptr[IDX_ELEM_Si] / 28.0); + ab[IDX_H2SI] = ab[IDX_H2SI] * (32.0 * rptr[IDX_ELEM_S] / 34.0 + 2.0 * rptr[IDX_ELEM_H] / 34.0); + ab[IDX_SII] = ab[IDX_SII] * (32.0 * rptr[IDX_ELEM_S] / 32.0); + ab[IDX_SiI] = ab[IDX_SiI] * (28.0 * rptr[IDX_ELEM_Si] / 28.0); + ab[IDX_C2H3II] = ab[IDX_C2H3II] * (24.0 * rptr[IDX_ELEM_C] / 27.0 + 3.0 * rptr[IDX_ELEM_H] / 27.0); + ab[IDX_NOI] = ab[IDX_NOI] * (14.0 * rptr[IDX_ELEM_N] / 30.0 + 16.0 * rptr[IDX_ELEM_O] / 30.0); + ab[IDX_HCOI] = ab[IDX_HCOI] * (16.0 * rptr[IDX_ELEM_O] / 29.0 + 12.0 * rptr[IDX_ELEM_C] / 29.0 + 1.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_CH4I] = ab[IDX_CH4I] * (12.0 * rptr[IDX_ELEM_C] / 16.0 + 4.0 * rptr[IDX_ELEM_H] / 16.0); + ab[IDX_C2HI] = ab[IDX_C2HI] * (24.0 * rptr[IDX_ELEM_C] / 25.0 + 1.0 * rptr[IDX_ELEM_H] / 25.0); + ab[IDX_H2COI] = ab[IDX_H2COI] * (16.0 * rptr[IDX_ELEM_O] / 30.0 + 12.0 * rptr[IDX_ELEM_C] / 30.0 + 2.0 * rptr[IDX_ELEM_H] / 30.0); + ab[IDX_HCNI] = ab[IDX_HCNI] * (14.0 * rptr[IDX_ELEM_N] / 27.0 + 12.0 * rptr[IDX_ELEM_C] / 27.0 + 1.0 * rptr[IDX_ELEM_H] / 27.0); + ab[IDX_CHI] = ab[IDX_CHI] * (12.0 * rptr[IDX_ELEM_C] / 13.0 + 1.0 * rptr[IDX_ELEM_H] / 13.0); + ab[IDX_SI] = ab[IDX_SI] * (32.0 * rptr[IDX_ELEM_S] / 32.0); + ab[IDX_C2I] = ab[IDX_C2I] * (24.0 * rptr[IDX_ELEM_C] / 24.0); + ab[IDX_OHI] = ab[IDX_OHI] * (16.0 * rptr[IDX_ELEM_O] / 17.0 + 1.0 * rptr[IDX_ELEM_H] / 17.0); + ab[IDX_NH3I] = ab[IDX_NH3I] * (14.0 * rptr[IDX_ELEM_N] / 17.0 + 3.0 * rptr[IDX_ELEM_H] / 17.0); + ab[IDX_C2H2II] = ab[IDX_C2H2II] * (24.0 * rptr[IDX_ELEM_C] / 26.0 + 2.0 * rptr[IDX_ELEM_H] / 26.0); + ab[IDX_CH3II] = ab[IDX_CH3II] * (12.0 * rptr[IDX_ELEM_C] / 15.0 + 3.0 * rptr[IDX_ELEM_H] / 15.0); + ab[IDX_C2H2I] = ab[IDX_C2H2I] * (24.0 * rptr[IDX_ELEM_C] / 26.0 + 2.0 * rptr[IDX_ELEM_H] / 26.0); + ab[IDX_CNI] = ab[IDX_CNI] * (14.0 * rptr[IDX_ELEM_N] / 26.0 + 12.0 * rptr[IDX_ELEM_C] / 26.0); + ab[IDX_GHI] = ab[IDX_GHI] * (1.0 * rptr[IDX_ELEM_H] / 1.0); + ab[IDX_CH3I] = ab[IDX_CH3I] * (12.0 * rptr[IDX_ELEM_C] / 15.0 + 3.0 * rptr[IDX_ELEM_H] / 15.0); + ab[IDX_NI] = ab[IDX_NI] * (14.0 * rptr[IDX_ELEM_N] / 14.0); + ab[IDX_H3OII] = ab[IDX_H3OII] * (16.0 * rptr[IDX_ELEM_O] / 19.0 + 3.0 * rptr[IDX_ELEM_H] / 19.0); + ab[IDX_OI] = ab[IDX_OI] * (16.0 * rptr[IDX_ELEM_O] / 16.0); + ab[IDX_HeII] = ab[IDX_HeII] * (4.0 * rptr[IDX_ELEM_He] / 4.0); + ab[IDX_HeI] = ab[IDX_HeI] * (4.0 * rptr[IDX_ELEM_He] / 4.0); + ab[IDX_CII] = ab[IDX_CII] * (12.0 * rptr[IDX_ELEM_C] / 12.0); + ab[IDX_H2OI] = ab[IDX_H2OI] * (16.0 * rptr[IDX_ELEM_O] / 18.0 + 2.0 * rptr[IDX_ELEM_H] / 18.0); + ab[IDX_HII] = ab[IDX_HII] * (1.0 * rptr[IDX_ELEM_H] / 1.0); + ab[IDX_CI] = ab[IDX_CI] * (12.0 * rptr[IDX_ELEM_C] / 12.0); + ab[IDX_HCOII] = ab[IDX_HCOII] * (16.0 * rptr[IDX_ELEM_O] / 29.0 + 12.0 * rptr[IDX_ELEM_C] / 29.0 + 1.0 * rptr[IDX_ELEM_H] / 29.0); + ab[IDX_H3II] = ab[IDX_H3II] * (3.0 * rptr[IDX_ELEM_H] / 3.0); + ab[IDX_COI] = ab[IDX_COI] * (16.0 * rptr[IDX_ELEM_O] / 28.0 + 12.0 * rptr[IDX_ELEM_C] / 28.0); + ab[IDX_GRAINM] = ab[IDX_GRAINM] * (0.0 * rptr[IDX_ELEM_GRAIN] / 0.0); + ab[IDX_GRAIN0I] = ab[IDX_GRAIN0I] * (0.0 * rptr[IDX_ELEM_GRAIN] / 0.0); + ab[IDX_H2I] = ab[IDX_H2I] * (2.0 * rptr[IDX_ELEM_H] / 2.0); + ab[IDX_eM] = ab[IDX_eM] * (1.0); + ab[IDX_HI] = ab[IDX_HI] * (1.0 * rptr[IDX_ELEM_H] / 1.0); + // clang-format on + + return NAUNET_SUCCESS; +} \ No newline at end of file diff --git a/src/naunet_utilities.cpp b/src/naunet_utilities.cpp new file mode 100644 index 0000000..f7dcb22 --- /dev/null +++ b/src/naunet_utilities.cpp @@ -0,0 +1,152 @@ +// +#include +#include + +#include "naunet_utilities.h" + +#define NR_END 1 +#define FREE_ARG char * + +namespace naunet_util { + +void nrerror(char error_text[]) +/* Numerical Recipes standard error handler */ +{ + fprintf(stderr, "Numerical Recipes run-time error...\n"); + fprintf(stderr, "%s\n", error_text); + fprintf(stderr, "...now exiting to system...\n"); + exit(1); +} + +double *vector(long nl, long nh) +/* allocate a double vector with subscript range v[nl..nh] */ +{ + double *v; + + v = (double *)malloc((size_t)((nh - nl + 1 + NR_END) * sizeof(double))); + if (!v) nrerror("allocation failure in vector()"); + return v - nl + NR_END; +} + +void free_vector(double *v, long nl, long nh) +/* free a double vector allocated with vector() */ +{ + free((FREE_ARG)(v + nl - NR_END)); +} + +double **matrix(long nrl, long nrh, long ncl, long nch) +/* allocate a double matrix with subscript range m[nrl..nrh][ncl..nch] */ +{ + long i, nrow = nrh - nrl + 1, ncol = nch - ncl + 1; + double **m; + + /* allocate pointers to rows */ + m = (double **)malloc((size_t)((nrow + NR_END) * sizeof(double *))); + if (!m) nrerror("allocation failure 1 in matrix()"); + m += NR_END; + m -= nrl; + + /* allocate rows and set pointers to them */ + m[nrl] = + (double *)malloc((size_t)((nrow * ncol + NR_END) * sizeof(double))); + if (!m[nrl]) nrerror("allocation failure 2 in matrix()"); + m[nrl] += NR_END; + m[nrl] -= ncl; + + for (i = nrl + 1; i <= nrh; i++) m[i] = m[i - 1] + ncol; + + /* return pointer to array of pointers to rows */ + return m; +} + +void free_matrix(double **m, long nrl, long nrh, long ncl, long nch) +/* free a double matrix allocated by dmatrix() */ +{ + free((FREE_ARG)(m[nrl] + ncl - NR_END)); + free((FREE_ARG)(m + nrl - NR_END)); +} + +void spline(double x[], double y[], int n, double yp1, double ypn, + double y2[]) { + int i, k; + double p, qn, sig, un, *u; + + u = vector(1, n - 1); + if (yp1 > 0.99e30) + y2[1] = u[1] = 0.0; + else { + y2[1] = -0.5; + u[1] = (3.0 / (x[2] - x[1])) * ((y[2] - y[1]) / (x[2] - x[1]) - yp1); + } + for (i = 2; i <= n - 1; i++) { + sig = (x[i] - x[i - 1]) / (x[i + 1] - x[i - 1]); + p = sig * y2[i - 1] + 2.0; + y2[i] = (sig - 1.0) / p; + u[i] = (y[i + 1] - y[i]) / (x[i + 1] - x[i]) - + (y[i] - y[i - 1]) / (x[i] - x[i - 1]); + u[i] = (6.0 * u[i] / (x[i + 1] - x[i - 1]) - sig * u[i - 1]) / p; + } + if (ypn > 0.99e30) + qn = un = 0.0; + else { + qn = 0.5; + un = (3.0 / (x[n] - x[n - 1])) * + (ypn - (y[n] - y[n - 1]) / (x[n] - x[n - 1])); + } + y2[n] = (un - qn * u[n - 1]) / (qn * y2[n - 1] + 1.0); + for (k = n - 1; k >= 1; k--) y2[k] = y2[k] * y2[k + 1] + u[k]; + free_vector(u, 1, n - 1); +} + +void splint(double xa[], double ya[], double y2a[], int n, double x, + double *y) { + void nrerror(char error_text[]); + int klo, khi, k; + double h, b, a; + + klo = 1; + khi = n; + while (khi - klo > 1) { + k = (khi + klo) >> 1; + if (xa[k] > x) + khi = k; + else + klo = k; + } + h = xa[khi] - xa[klo]; + if (h == 0.0) nrerror("Bad xa input to routine splint"); + a = (xa[khi] - x) / h; + b = (x - xa[klo]) / h; + *y = a * ya[klo] + b * ya[khi] + + ((a * a * a - a) * y2a[klo] + (b * b * b - b) * y2a[khi]) * (h * h) / + 6.0; +} + +void splie2(double x1a[], double x2a[], double *ya[], int m, int n, + double **y2a) { + void spline(double x[], double y[], int n, double yp1, double ypn, + double y2[]); + int j; + + for (j = 1; j <= m; j++) spline(x2a, ya[j], n, 1.0e30, 1.0e30, y2a[j]); +} + +void splin2(double x1a[], double x2a[], double *ya[], double *y2a[], int m, + int n, double x1, double x2, double *y) { + void spline(double x[], double y[], int n, double yp1, double ypn, + double y2[]); + void splint(double xa[], double ya[], double y2a[], int n, double x, + double *y); + int j; + double *ytmp, *yytmp; + + ytmp = vector(1, m); + yytmp = vector(1, m); + for (j = 1; j <= m; j++) splint(x2a, ya[j], y2a[j], n, x2, &yytmp[j]); + spline(x1a, yytmp, m, 1.0e30, 1.0e30, ytmp); + splint(x1a, yytmp, ytmp, m, x1, y); + free_vector(yytmp, 1, m); + free_vector(ytmp, 1, m); +} + +} // namespace naunet_util \ No newline at end of file diff --git a/test/CMakeLists.txt b/tests/CMakeLists.txt similarity index 68% rename from test/CMakeLists.txt rename to tests/CMakeLists.txt index 54cb44d..c71aabb 100644 --- a/test/CMakeLists.txt +++ b/tests/CMakeLists.txt @@ -14,7 +14,7 @@ get_property( set( TESTTARGETS singlegrid -) + ) # force cmake to have the same macro defined in naunet_macros.h # use CapWords convention to use in test.py @@ -26,6 +26,7 @@ if("CUDA" IN_LIST languages) list( APPEND TESTTARGETS multiplegrid + ) endif() @@ -42,14 +43,6 @@ foreach(name ${TESTTARGETS}) OUTPUT_NAME ${targetname}.x ) - if("CUDA" IN_LIST languages) - target_include_directories( - ${targetname} - PRIVATE - ${CMAKE_CUDA_TOOLKIT_INCLUDE_DIRECTORIES} - ) - endif() - # for odeint test if(USE_BOOST) target_include_directories( @@ -76,17 +69,26 @@ foreach(name ${TESTTARGETS}) endforeach(name ${TESTTARGETS}) if(MAKE_PYTHON) - configure_file(test.py.in test.py) - - if( ${NVIDIA_GPU_COUNT} OR NOT ("CUDA" IN_LIST languages) ) - add_test( - NAME - test_pymodule - COMMAND - ${CMAKE_COMMAND} -E env - CHEMISTRY_MODULE_PATH=$ - NAUNET_CONFIG_PATH=${CMAKE_SOURCE_DIR} - ${PYTHON_EXECUTABLE} ${CMAKE_CURRENT_BINARY_DIR}/test.py + set( + PYTESTTARGETS + singlegrid ) - endif() + + foreach(name ${PYTESTTARGETS}) + configure_file(${name}.py.in ${name}.py) + + if( ${NVIDIA_GPU_COUNT} OR NOT ("CUDA" IN_LIST languages) ) + add_test( + NAME + test_${name}_py + COMMAND + ${CMAKE_COMMAND} -E env + PYNAUNET_PATH=$ + NAUNET_CONFIG_PATH=${CMAKE_SOURCE_DIR} + ${Python_EXECUTABLE} ${CMAKE_CURRENT_BINARY_DIR}/${name}.py + ) + endif() + endforeach(name ${PYTESTTARGETS}) + endif() + diff --git a/test/multiplegrid.cpp b/tests/multiplegrid.cpp similarity index 80% rename from test/multiplegrid.cpp rename to tests/multiplegrid.cpp index 8948bb1..ece47f6 100644 --- a/test/multiplegrid.cpp +++ b/tests/multiplegrid.cpp @@ -1,5 +1,9 @@ +// #include +#include +#include + #include "naunet.h" #include "naunet_data.h" #include "naunet_macros.h" @@ -10,13 +14,15 @@ int main() { int nsystem = 2048; double spy = 86400.0 * 365.0; + NaunetData *data = new NaunetData[nsystem]; + // double nH = 2e4; double zeta_cr = 1.3e-17; double zeta_xr = 0.0; double Tgas = 10.0; double Tdust = 10.0; double Av = 10.0; - double G0 = 1.0; + double G0 = 4.0; double rG = 1e-5; double omega = 0.5; double barr = 1.5e-8; @@ -27,7 +33,6 @@ int main() { double Tcr = 70.0; double branch = 1e-2; - NaunetData *data = new NaunetData[nsystem]; for (int isys = 0; isys < nsystem; isys++) { data[isys].nH = nH; data[isys].zeta_cr = zeta_cr; @@ -47,15 +52,18 @@ int main() { data[isys].branch = branch; } + Naunet naunet; if (naunet.Init() == NAUNET_FAIL) { printf("Initialize Fail\n"); + return 1; } if (naunet.Reset(nsystem) == NAUNET_FAIL) { - printf("Reset Fail\n"); + throw std::runtime_error("Fail to reset the number of systems"); } + // double *y = new double[nsystem * NEQUATIONS]; for (int isys = 0; isys < nsystem; isys++) { for (int i = 0; i < NEQUATIONS; i++) { @@ -77,6 +85,7 @@ int main() { y[isys * NEQUATIONS + IDX_GRAIN0I] = 1.3e-12 * nH; } + FILE *fbin = fopen("evolution_multiplegrid.bin", "w"); FILE *ftxt = fopen("evolution_multiplegrid.txt", "w"); FILE *ttxt = fopen("time_parallel.txt", "w"); @@ -87,9 +96,34 @@ int main() { // double rates[NREACTIONS]; #endif - double logtstart = 2.0, logtend = 4.0; - double dtyr = 0.0, time = 0.0; - for (double logtime = logtstart; logtime < logtend; logtime += 0.1) { + // + std::vector timesteps; + double logtstart = 2.0, logtend = 4.0, logtstep = 0.1; + double time = 0.0; + for (double logtime = logtstart; logtime < logtend + 0.1 * logtstep; + logtime += logtstep) { + double dtyr = pow(10.0, logtime) - time; + timesteps.push_back(dtyr); + time += dtyr; + } + // + + double dtyr = 0.0, curtime = 0.0; + + // write the initial abundances + for (int isys = 0; isys < nsystem; isys++) { + fwrite((double *)&isys, sizeof(double), 1, fbin); + fwrite(&curtime, sizeof(double), 1, fbin); + fwrite(&y[isys * NEQUATIONS], sizeof(double), NEQUATIONS, fbin); + + fprintf(ftxt, "%13.7e ", (double)isys); + fprintf(ftxt, "%13.7e ", curtime); + for (int j = 0; j < NEQUATIONS; j++) { + fprintf(ftxt, "%13.7e ", y[isys * NEQUATIONS + j]); + } + fprintf(ftxt, "\n"); + } + for (auto step = timesteps.begin(); step != timesteps.end(); step++) { #ifdef NAUNET_DEBUG // EvalRates only receive one system as input, disabled in parallel test // EvalRates(rates, y, data); @@ -99,45 +133,36 @@ int main() { // fprintf(rtxt, "\n"); #endif - dtyr = pow(10.0, logtime) - time; + // + // + + dtyr = *step; + + Timer timer; + timer.start(); + naunet.Solve(y, dtyr * spy, data); + timer.stop(); + + curtime += dtyr; + // write the abundances after each step for (int isys = 0; isys < nsystem; isys++) { fwrite((double *)&isys, sizeof(double), 1, fbin); - fwrite(&time, sizeof(double), 1, fbin); + fwrite(&curtime, sizeof(double), 1, fbin); fwrite(&y[isys * NEQUATIONS], sizeof(double), NEQUATIONS, fbin); fprintf(ftxt, "%13.7e ", (double)isys); - fprintf(ftxt, "%13.7e ", time); + fprintf(ftxt, "%13.7e ", curtime); for (int j = 0; j < NEQUATIONS; j++) { fprintf(ftxt, "%13.7e ", y[isys * NEQUATIONS + j]); } fprintf(ftxt, "\n"); } - Timer timer; - timer.start(); - naunet.Solve(y, dtyr * spy, data); - timer.stop(); - - time += dtyr; - // float duration = (float)timer.elapsed() / 1e6; double duration = timer.elapsed(); fprintf(ttxt, "%8.5e \n", duration); - printf("Time = %13.7e yr, elapsed: %8.5e sec\n", time, duration); - } - - for (int isys = 0; isys < nsystem; isys++) { - fwrite((double *)&isys, sizeof(double), 1, fbin); - fwrite(&time, sizeof(double), 1, fbin); - fwrite(&y[isys * NEQUATIONS], sizeof(double), NEQUATIONS, fbin); - - fprintf(ftxt, "%13.7e ", (double)isys); - fprintf(ftxt, "%13.7e ", time); - for (int j = 0; j < NEQUATIONS; j++) { - fprintf(ftxt, "%13.7e ", y[isys * NEQUATIONS + j]); - } - fprintf(ftxt, "\n"); + printf("Time = %13.7e yr, elapsed: %8.5e sec\n", curtime, duration); } fclose(fbin); @@ -150,10 +175,11 @@ int main() { if (naunet.Finalize() == NAUNET_FAIL) { printf("Finalize Fail\n"); + return 1; } delete[] data; delete[] y; return 0; -} +} \ No newline at end of file diff --git a/test/singlegrid.cpp b/tests/singlegrid.cpp similarity index 58% rename from test/singlegrid.cpp rename to tests/singlegrid.cpp index 772bbb1..f2d5056 100644 --- a/test/singlegrid.cpp +++ b/tests/singlegrid.cpp @@ -1,5 +1,9 @@ +// #include +#include +#include + #include "naunet.h" #include "naunet_data.h" #include "naunet_macros.h" @@ -7,15 +11,17 @@ #include "naunet_timer.h" int main() { - double spy = 86400.0 * 365.0; + double spy = 86400.0 * 365.0; + NaunetData data; + // double nH = 2e4; double zeta_cr = 1.3e-17; double zeta_xr = 0.0; double Tgas = 10.0; double Tdust = 10.0; double Av = 10.0; - double G0 = 1.0; + double G0 = 4.0; double rG = 1e-5; double omega = 0.5; double barr = 1.5e-8; @@ -26,7 +32,6 @@ int main() { double Tcr = 70.0; double branch = 1e-2; - NaunetData data; data.nH = nH; data.zeta_cr = zeta_cr; data.zeta_xr = zeta_xr; @@ -44,13 +49,20 @@ int main() { data.Tcr = Tcr; data.branch = branch; + Naunet naunet; - naunet.Init(); + if (naunet.Init() == NAUNET_FAIL) { + printf("Initialize Fail\n"); + return 1; + } #ifdef USE_CUDA - naunet.Reset(1); + if (naunet.Reset(1) == NAUNET_FAIL) { + throw std::runtime_error("Fail to reset the number of systems"); + } #endif + // double y[NEQUATIONS] = {0.0}; // for (int i = 0; i < NEQUATIONS; i++) // { @@ -71,69 +83,88 @@ int main() { y[IDX_FI] = 2.0e-8 * nH; y[IDX_GRAIN0I] = 1.3e-12 * nH; - FILE *fbin = fopen("evolution_singlegrid.bin", "w"); - FILE *ftxt = fopen("evolution_singlegrid.txt", "w"); - FILE *ttxt = fopen("time_singlegrid.txt", "w"); -#ifdef NAUNET_DEBUG - // printf("Initialization is done. Start to evolve.\n"); - // FILE *rtxt = fopen("reactionrates.txt", "w"); - // double rates[NREACTIONS]; -#endif - double logtstart = 3.0, logtend = 8.0; - double dtyr = 0.0, time = 0.0; - for (double logtime = logtstart; logtime < logtend; logtime += 0.1) { + FILE *fbin = fopen("evolution_singlegrid.bin", "w"); + FILE *ftxt = fopen("evolution_singlegrid.txt", "w"); + FILE *ttxt = fopen("time_singlegrid.txt", "w"); #ifdef NAUNET_DEBUG - // EvalRates(rates, y, &data); - // for (int j = 0; j < NREACTIONS; j++) - // { - // fprintf(rtxt, "%13.7e ", rates[j]); - // } - // fprintf(rtxt, "\n"); + printf("Initialization is done. Start to evolve.\n"); + FILE *rtxt = fopen("reactionrates.txt", "w"); + double rates[NREACTIONS] = {0.0}; #endif - dtyr = pow(10.0, logtime) - time; + // + std::vector timesteps; + double logtstart = 3.0, logtend = 7.0, logtstep = 0.1; + double time = 0.0; + for (double logtime = logtstart; logtime < logtend + 0.1 * logtstep; + logtime += logtstep) { + double dtyr = pow(10.0, logtime) - time; + timesteps.push_back(dtyr); + time += dtyr; + } + // - fwrite(&time, sizeof(double), 1, fbin); - fwrite(y, sizeof(double), NEQUATIONS, fbin); + double dtyr = 0.0, curtime = 0.0; - fprintf(ftxt, "%13.7e ", time); - for (int j = 0; j < NEQUATIONS; j++) { - fprintf(ftxt, "%13.7e ", y[j]); + // write the initial abundances + fwrite(&curtime, sizeof(double), 1, fbin); + fwrite(y, sizeof(double), NEQUATIONS, fbin); + + fprintf(ftxt, "%13.7e ", curtime); + for (int j = 0; j < NEQUATIONS; j++) { + fprintf(ftxt, "%13.7e ", y[j]); + } + fprintf(ftxt, "\n"); + + for (auto step = timesteps.begin(); step != timesteps.end(); step++) { +#ifdef NAUNET_DEBUG + EvalRates(rates, y, &data); + for (int j = 0; j < NREACTIONS; j++) { + fprintf(rtxt, "%13.7e ", rates[j]); } - fprintf(ftxt, "\n"); + fprintf(rtxt, "\n"); +#endif + + // + // + + dtyr = *step; Timer timer; timer.start(); naunet.Solve(y, dtyr * spy, &data); timer.stop(); - time += dtyr; + curtime += dtyr; + + // write the abundances after each step + fwrite(&curtime, sizeof(double), 1, fbin); + fwrite(y, sizeof(double), NEQUATIONS, fbin); + + fprintf(ftxt, "%13.7e ", curtime); + for (int j = 0; j < NEQUATIONS; j++) { + fprintf(ftxt, "%13.7e ", y[j]); + } + fprintf(ftxt, "\n"); // float duration = (float)timer.elapsed() / 1e6; double duration = timer.elapsed(); fprintf(ttxt, "%8.5e \n", duration); - printf("Time = %13.7e yr, elapsed: %8.5e sec\n", time, duration); - } - - // save the final results - fwrite(&time, sizeof(double), 1, fbin); - fwrite(y, sizeof(double), NEQUATIONS, fbin); - - fprintf(ftxt, "%13.7e ", time); - for (int j = 0; j < NEQUATIONS; j++) { - fprintf(ftxt, "%13.7e ", y[j]); + printf("Time = %13.7e yr, elapsed: %8.5e sec\n", curtime, duration); } - fprintf(ftxt, "\n"); fclose(fbin); fclose(ftxt); fclose(ttxt); #ifdef NAUNET_DEBUG - // fclose(rtxt); + fclose(rtxt); #endif - naunet.Finalize(); + if (naunet.Finalize() == NAUNET_FAIL) { + printf("Finalize Fail\n"); + return 1; + } return 0; -} +} \ No newline at end of file diff --git a/test/test.py.in b/tests/singlegrid.py.in similarity index 71% rename from test/test.py.in rename to tests/singlegrid.py.in index dc48560..b8c74bf 100644 --- a/test/test.py.in +++ b/tests/singlegrid.py.in @@ -1,22 +1,30 @@ import os import sys -sys.path.append(os.getenv('CHEMISTRY_MODULE_PATH')) +sys.path.append(os.getenv('PYNAUNET_PATH')) import numpy as np +from pathlib import Path from tomlkit.toml_file import TOMLFile from @PYMODNAME@ import Naunet, NaunetData -config_path = os.getenv('NAUNET_CONFIG_PATH') -config = TOMLFile(os.path.join(config_path, "naunet_config.toml")) +config_path = Path(os.getenv('NAUNET_CONFIG_PATH')) +config = TOMLFile(config_path / "naunet_config.toml") content = config.read() chemistry = content["chemistry"] -species = chemistry["species"] +heating = chemistry["thermal"]["heating"] +cooling = chemistry["thermal"]["cooling"] +has_thermal = True if heating or cooling else False +summary = content["summary"] +species = summary["list_of_species"] +nspec = len(species) naunet_solver = Naunet() naunet_data = NaunetData() spy = 86400.0 * 365.0 + + nH = 2e4 zeta_cr = 1.3e-17 zeta_xr = 0.0 @@ -51,13 +59,13 @@ naunet_data.duty = duty naunet_data.Tcr = Tcr naunet_data.branch = branch + naunet_solver.Init() if @USE_CUDA@: naunet_solver.Reset(1) + y = np.ones(len(species)) * 1e-40 -# Only works if the species list in naunet_config.toml has been updated -# Otherwise check the macros in naunet_macros.h y[species.index("H2")] = 0.5 * nH y[species.index("H")] = 5.0e-5 * nH y[species.index("He")] = 9.75e-2 * nH @@ -73,19 +81,29 @@ y[species.index("Cl")] = 4.0e-9 * nH y[species.index("F")] = 2.0e-8 * nH y[species.index("GRAIN0")] = 1.3e-12 * nH -naunet_solver.Solve(y, 1e4, naunet_data) -times = np.logspace(3, 8, num=51) + +times = np.logspace(2, 7, 51) +times = np.append(0.0, times) timesteps = times[1:] - times[:-1] + with open("evolution_pymodule.dat", "w") as evoldat: + curtime = 0.0 + fmty = [f"{yi:13.7e}" for yi in y] + evoldat.write(" ".join([f"{curtime:13.7e}", *fmty])) + evoldat.write("\n") + for ti, dtyr in enumerate(timesteps): dt = dtyr * spy y = naunet_solver.Solve(y, dt, naunet_data) + + + curtime += dtyr fmty = [f"{yi:13.7e}" for yi in y] - evoldat.write(" ".join([f"{times[ti+1]:13.7e}", *fmty])) + evoldat.write(" ".join([f"{curtime:13.7e}", *fmty])) evoldat.write("\n") -naunet_solver.Finalize(); +naunet_solver.Finalize(); \ No newline at end of file